b5bad65e903a36d3ed7c0782c6e39bab552c5908
[ngircd-alex.git] / src / ngircd / irc-login.c
1 /*
2  * ngIRCd -- The Next Generation IRC Daemon
3  * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
4  *
5  * Dieses Programm ist freie Software. Sie koennen es unter den Bedingungen
6  * der GNU General Public License (GPL), wie von der Free Software Foundation
7  * herausgegeben, weitergeben und/oder modifizieren, entweder unter Version 2
8  * der Lizenz oder (wenn Sie es wuenschen) jeder spaeteren Version.
9  * Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
10  * der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
11  *
12  * $Id: irc-login.c,v 1.4 2002/03/10 22:40:22 alex Exp $
13  *
14  * irc-login.c: Anmeldung und Abmeldung im IRC
15  *
16  * $Log: irc-login.c,v $
17  * Revision 1.4  2002/03/10 22:40:22  alex
18  * - IRC_PING() ist, wenn nicht im "strict RFC"-Mode, toleranter und akzptiert
19  *   beliebig viele Parameter: z.B. BitchX sendet soetwas.
20  *
21  * Revision 1.3  2002/03/03 17:15:11  alex
22  * - Source in weitere Module fuer IRC-Befehle aufgesplitted.
23  *
24  * Revision 1.2  2002/03/02 00:49:11  alex
25  * - Bei der USER-Registrierung wird NICK nicht mehr sofort geforwarded,
26  *   sondern erst dann, wenn auch ein gueltiges USER empfangen wurde.
27  *
28  * Revision 1.1  2002/02/27 23:26:21  alex
29  * - Modul aus irc.c bzw. irc.h ausgegliedert.
30  */
31
32
33 #include <portab.h>
34 #include "global.h"
35
36 #include <imp.h>
37 #include <assert.h>
38 #include <stdio.h>
39 #include <stdlib.h>
40 #include <string.h>
41
42 #include "ngircd.h"
43 #include "conf.h"
44 #include "irc.h"
45 #include "irc-write.h"
46 #include "log.h"
47 #include "messages.h"
48
49 #include <exp.h>
50 #include "irc-login.h"
51
52
53 LOCAL BOOLEAN Hello_User( CLIENT *Client );
54 LOCAL VOID Kill_Nick( CHAR *Nick, CHAR *Reason );
55
56
57 GLOBAL BOOLEAN IRC_PASS( CLIENT *Client, REQUEST *Req )
58 {
59         assert( Client != NULL );
60         assert( Req != NULL );
61
62         /* Fehler liefern, wenn kein lokaler Client */
63         if( Client_Conn( Client ) <= NONE ) return IRC_WriteStrClient( Client, ERR_UNKNOWNCOMMAND_MSG, Client_ID( Client ), Req->command );
64         
65         if(( Client_Type( Client ) == CLIENT_UNKNOWN ) && ( Req->argc == 1))
66         {
67                 /* noch nicht registrierte unbekannte Verbindung */
68                 Log( LOG_DEBUG, "Connection %d: got PASS command ...", Client_Conn( Client ));
69
70                 /* Passwort speichern */
71                 Client_SetPassword( Client, Req->argv[0] );
72
73                 Client_SetType( Client, CLIENT_GOTPASS );
74                 return CONNECTED;
75         }
76         else if((( Client_Type( Client ) == CLIENT_UNKNOWN ) || ( Client_Type( Client ) == CLIENT_UNKNOWNSERVER )) && (( Req->argc == 3 ) || ( Req->argc == 4 )))
77         {
78                 /* noch nicht registrierte Server-Verbindung */
79                 Log( LOG_DEBUG, "Connection %d: got PASS command (new server link) ...", Client_Conn( Client ));
80
81                 /* Passwort speichern */
82                 Client_SetPassword( Client, Req->argv[0] );
83
84                 Client_SetType( Client, CLIENT_GOTPASSSERVER );
85                 return CONNECTED;
86         }
87         else if(( Client_Type( Client ) == CLIENT_UNKNOWN  ) || ( Client_Type( Client ) == CLIENT_UNKNOWNSERVER ))
88         {
89                 /* Falsche Anzahl Parameter? */
90                 return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
91         }
92         else return IRC_WriteStrClient( Client, ERR_ALREADYREGISTRED_MSG, Client_ID( Client ));
93 } /* IRC_PASS */
94
95
96 GLOBAL BOOLEAN IRC_NICK( CLIENT *Client, REQUEST *Req )
97 {
98         CLIENT *intr_c, *target, *c;
99         CHAR *modes;
100
101         assert( Client != NULL );
102         assert( Req != NULL );
103
104         /* Zumindest BitchX sendet NICK-USER in der falschen Reihenfolge. */
105 #ifndef STRICT_RFC
106         if( Client_Type( Client ) == CLIENT_UNKNOWN || Client_Type( Client ) == CLIENT_GOTPASS || Client_Type( Client ) == CLIENT_GOTNICK || Client_Type( Client ) == CLIENT_GOTUSER || Client_Type( Client ) == CLIENT_USER || ( Client_Type( Client ) == CLIENT_SERVER && Req->argc == 1 ))
107 #else
108         if( Client_Type( Client ) == CLIENT_UNKNOWN || Client_Type( Client ) == CLIENT_GOTPASS || Client_Type( Client ) == CLIENT_GOTNICK || Client_Type( Client ) == CLIENT_USER || ( Client_Type( Client ) == CLIENT_SERVER && Req->argc == 1 ))
109 #endif
110         {
111                 /* User-Registrierung bzw. Nick-Aenderung */
112
113                 /* Falsche Anzahl Parameter? */
114                 if( Req->argc != 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
115
116                 /* "Ziel-Client" ermitteln */
117                 if( Client_Type( Client ) == CLIENT_SERVER )
118                 {
119                         target = Client_GetFromID( Req->prefix );
120                         if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[0] );
121                 }
122                 else
123                 {
124                         /* Ist der Client "restricted"? */
125                         if( Client_HasMode( Client, 'r' )) return IRC_WriteStrClient( Client, ERR_RESTRICTED_MSG, Client_ID( Client ));
126                         target = Client;
127                 }
128
129 #ifndef STRICT_RFC
130                 /* Wenn der Client zu seinem eigenen Nick wechseln will, so machen
131                  * wir nichts. So macht es das Original und mind. Snak hat probleme,
132                  * wenn wir es nicht so machen. Ob es so okay ist? Hm ... */
133                 if( strcmp( Client_ID( target ), Req->argv[0] ) == 0 ) return CONNECTED;
134 #endif
135                 
136                 /* pruefen, ob Nick bereits vergeben. Speziallfall: der Client
137                  * will nur die Gross- und Kleinschreibung aendern. Das darf
138                  * er natuerlich machen :-) */
139                 if( strcasecmp( Client_ID( target ), Req->argv[0] ) != 0 )
140                 {
141                         if( ! Client_CheckNick( target, Req->argv[0] )) return CONNECTED;
142                 }
143
144                 if(( Client_Type( target ) != CLIENT_USER ) && ( Client_Type( target ) != CLIENT_SERVER ))
145                 {
146                         /* Neuer Client */
147                         Log( LOG_DEBUG, "Connection %d: got valid NICK command ...", Client_Conn( Client ));
148
149                         /* Client-Nick registrieren */
150                         Client_SetID( target, Req->argv[0] );
151
152                         /* schon ein USER da? Dann registrieren! */
153                         if( Client_Type( Client ) == CLIENT_GOTUSER ) return Hello_User( Client );
154                         else Client_SetType( Client, CLIENT_GOTNICK );
155                 }
156                 else
157                 {
158                         /* Nick-Aenderung */
159                         Log( LOG_INFO, "User \"%s\" changed nick: \"%s\" -> \"%s\".", Client_Mask( target ), Client_ID( target ), Req->argv[0] );
160
161                         /* alle betroffenen User und Server ueber Nick-Aenderung informieren */
162                         if( Client_Type( Client ) == CLIENT_USER ) IRC_WriteStrClientPrefix( Client, Client, "NICK :%s", Req->argv[0] );
163                         IRC_WriteStrServersPrefix( Client, target, "NICK :%s", Req->argv[0] );
164                         IRC_WriteStrRelatedPrefix( target, target, FALSE, "NICK :%s", Req->argv[0] );
165                         
166                         /* neuen Client-Nick speichern */
167                         Client_SetID( target, Req->argv[0] );
168                 }
169
170                 return CONNECTED;
171         }
172         else if( Client_Type( Client ) == CLIENT_SERVER )
173         {
174                 /* Server fuehrt neuen Client ein */
175
176                 /* Falsche Anzahl Parameter? */
177                 if( Req->argc != 7 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
178
179                 /* Nick ueberpruefen */
180                 c = Client_GetFromID( Req->argv[0] );
181                 if( c )
182                 {
183                         /* Der neue Nick ist auf diesem Server bereits registriert:
184                          * sowohl der neue, als auch der alte Client muessen nun
185                          * disconnectiert werden. */
186                         Log( LOG_ERR, "Server %s introduces already registered nick \"%s\"!", Client_ID( Client ), Req->argv[0] );
187                         Kill_Nick( Req->argv[0], "Nick collision" );
188                         return CONNECTED;
189                 }
190
191                 /* Server, zu dem der Client connectiert ist, suchen */
192                 intr_c = Client_GetFromToken( Client, atoi( Req->argv[4] ));
193                 if( ! intr_c )
194                 {
195                         Log( LOG_ERR, "Server %s introduces nick \"%s\" on unknown server!?", Client_ID( Client ), Req->argv[0] );
196                         Kill_Nick( Req->argv[0], "Unknown server" );
197                         return CONNECTED;
198                 }
199
200                 /* Neue Client-Struktur anlegen */
201                 c = Client_NewRemoteUser( intr_c, Req->argv[0], atoi( Req->argv[1] ), Req->argv[2], Req->argv[3], atoi( Req->argv[4] ), Req->argv[5] + 1, Req->argv[6], TRUE );
202                 if( ! c )
203                 {
204                         /* Eine neue Client-Struktur konnte nicht angelegt werden.
205                          * Der Client muss disconnectiert werden, damit der Netz-
206                          * status konsistent bleibt. */
207                         Log( LOG_ALERT, "Can't create client structure! (on connection %d)", Client_Conn( Client ));
208                         Kill_Nick( Req->argv[0], "Server error" );
209                         return CONNECTED;
210                 }
211
212                 modes = Client_Modes( c );
213                 if( *modes ) Log( LOG_DEBUG, "User \"%s\" (+%s) registered (via %s, on %s, %d hop%s).", Client_Mask( c ), modes, Client_ID( Client ), Client_ID( intr_c ), Client_Hops( c ), Client_Hops( c ) > 1 ? "s": "" );
214                 else Log( LOG_DEBUG, "User \"%s\" registered (via %s, on %s, %d hop%s).", Client_Mask( c ), Client_ID( Client ), Client_ID( intr_c ), Client_Hops( c ), Client_Hops( c ) > 1 ? "s": "" );
215
216                 /* Andere Server, ausser dem Introducer, informieren */
217                 IRC_WriteStrServersPrefix( Client, Client, "NICK %s %d %s %s %d %s :%s", Req->argv[0], atoi( Req->argv[1] ) + 1, Req->argv[2], Req->argv[3], Client_MyToken( intr_c ), Req->argv[5], Req->argv[6] );
218
219                 return CONNECTED;
220         }
221         else return IRC_WriteStrClient( Client, ERR_ALREADYREGISTRED_MSG, Client_ID( Client ));
222 } /* IRC_NICK */
223
224
225 GLOBAL BOOLEAN IRC_USER( CLIENT *Client, REQUEST *Req )
226 {
227         assert( Client != NULL );
228         assert( Req != NULL );
229
230 #ifndef STRICT_RFC
231         if( Client_Type( Client ) == CLIENT_GOTNICK || Client_Type( Client ) == CLIENT_GOTPASS || Client_Type( Client ) == CLIENT_UNKNOWN )
232 #else
233         if( Client_Type( Client ) == CLIENT_GOTNICK || Client_Type( Client ) == CLIENT_GOTPASS )
234 #endif
235         {
236                 /* Falsche Anzahl Parameter? */
237                 if( Req->argc != 4 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
238
239                 Client_SetUser( Client, Req->argv[0], FALSE );
240                 Client_SetInfo( Client, Req->argv[3] );
241
242                 Log( LOG_DEBUG, "Connection %d: got valid USER command ...", Client_Conn( Client ));
243                 if( Client_Type( Client ) == CLIENT_GOTNICK ) return Hello_User( Client );
244                 else Client_SetType( Client, CLIENT_GOTUSER );
245                 return CONNECTED;
246         }
247         else if( Client_Type( Client ) == CLIENT_USER || Client_Type( Client ) == CLIENT_SERVER || Client_Type( Client ) == CLIENT_SERVICE )
248         {
249                 return IRC_WriteStrClient( Client, ERR_ALREADYREGISTRED_MSG, Client_ID( Client ));
250         }
251         else return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
252 } /* IRC_USER */
253
254
255 GLOBAL BOOLEAN IRC_QUIT( CLIENT *Client, REQUEST *Req )
256 {
257         CLIENT *target;
258         
259         assert( Client != NULL );
260         assert( Req != NULL );
261
262         if(( Client_Type( Client ) == CLIENT_USER ) || ( Client_Type( Client ) == CLIENT_SERVICE ))
263         {
264                 /* User / Service */
265                 
266                 /* Falsche Anzahl Parameter? */
267                 if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
268
269                 if( Req->argc == 0 ) Conn_Close( Client_Conn( Client ), "Got QUIT command.", NULL, TRUE );
270                 else Conn_Close( Client_Conn( Client ), "Got QUIT command.", Req->argv[0], TRUE );
271                 
272                 return DISCONNECTED;
273         }
274         else if ( Client_Type( Client ) == CLIENT_SERVER )
275         {
276                 /* Server */
277
278                 /* Falsche Anzahl Parameter? */
279                 if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
280
281                 target = Client_Search( Req->prefix );
282                 if( ! target )
283                 {
284                         Log( LOG_ERR, "Got QUIT from %s for unknown client!?", Client_ID( Client ));
285                         return CONNECTED;
286                 }
287
288                 if( Req->argc == 0 ) Client_Destroy( target, "Got QUIT command.", NULL );
289                 else Client_Destroy( target, "Got QUIT command.", Req->argv[0] );
290
291                 return CONNECTED;
292         }
293         else return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
294 } /* IRC_QUIT */
295
296
297 GLOBAL BOOLEAN IRC_PING( CLIENT *Client, REQUEST *Req )
298 {
299         CLIENT *target, *from;
300
301         assert( Client != NULL );
302         assert( Req != NULL );
303
304         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
305
306         /* Falsche Anzahl Parameter? */
307         if( Req->argc < 1 ) return IRC_WriteStrClient( Client, ERR_NOORIGIN_MSG, Client_ID( Client ));
308 #ifdef STRICT_RFC
309         if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
310 #endif
311
312         if( Req->argc > 1 )
313         {
314                 /* es wurde ein Ziel-Client angegeben */
315                 target = Client_GetFromID( Req->argv[1] );
316                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
317                 if( target != Client_ThisServer( ))
318                 {
319                         /* ok, forwarden */
320                         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
321                         else from = Client;
322                         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
323                         return IRC_WriteStrClientPrefix( target, from, "PING %s :%s", Client_ID( from ), Req->argv[1] );
324                 }
325         }
326
327         Log( LOG_DEBUG, "Connection %d: got PING, sending PONG ...", Client_Conn( Client ));
328         return IRC_WriteStrClient( Client, "PONG %s :%s", Client_ID( Client_ThisServer( )), Client_ID( Client ));
329 } /* IRC_PING */
330
331
332 GLOBAL BOOLEAN IRC_PONG( CLIENT *Client, REQUEST *Req )
333 {
334         CLIENT *target, *from;
335
336         assert( Client != NULL );
337         assert( Req != NULL );
338
339         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
340
341         /* Falsche Anzahl Parameter? */
342         if( Req->argc < 1 ) return IRC_WriteStrClient( Client, ERR_NOORIGIN_MSG, Client_ID( Client ));
343         if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
344
345         /* forwarden? */
346         if( Req->argc == 2 )
347         {
348                 target = Client_GetFromID( Req->argv[1] );
349                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
350                 if( target != Client_ThisServer( ))
351                 {
352                         /* ok, forwarden */
353                         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
354                         else from = Client;
355                         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
356                         return IRC_WriteStrClientPrefix( target, from, "PONG %s :%s", Client_ID( from ), Req->argv[1] );
357                 }
358         }
359
360         /* Der Connection-Timestamp wurde schon beim Lesen aus dem Socket
361                 * aktualisiert, daher muss das hier nicht mehr gemacht werden. */
362
363         if( Client_Conn( Client ) > NONE ) Log( LOG_DEBUG, "Connection %d: received PONG. Lag: %ld seconds.", Client_Conn( Client ), time( NULL ) - Conn_LastPing( Client_Conn( Client )));
364         else Log( LOG_DEBUG, "Connection %d: received PONG.", Client_Conn( Client ));
365
366         return CONNECTED;
367 } /* IRC_PONG */
368
369
370 LOCAL BOOLEAN Hello_User( CLIENT *Client )
371 {
372         assert( Client != NULL );
373
374         /* Passwort ueberpruefen */
375         if( strcmp( Client_Password( Client ), Conf_ServerPwd ) != 0 )
376         {
377                 /* Falsches Passwort */
378                 Log( LOG_ERR, "User \"%s\" rejected (connection %d): Bad password!", Client_Mask( Client ), Client_Conn( Client ));
379                 Conn_Close( Client_Conn( Client ), NULL, "Bad password", TRUE );
380                 return DISCONNECTED;
381         }
382
383         Log( LOG_NOTICE, "User \"%s\" registered (connection %d).", Client_Mask( Client ), Client_Conn( Client ));
384
385         /* Andere Server informieren */
386         IRC_WriteStrServers( NULL, "NICK %s 1 %s %s 1 +%s :%s", Client_ID( Client ), Client_User( Client ), Client_Hostname( Client ), Client_Modes( Client ), Client_Info( Client ));
387
388         if( ! IRC_WriteStrClient( Client, RPL_WELCOME_MSG, Client_ID( Client ), Client_Mask( Client ))) return FALSE;
389         if( ! IRC_WriteStrClient( Client, RPL_YOURHOST_MSG, Client_ID( Client ), Client_ID( Client_ThisServer( )))) return FALSE;
390         if( ! IRC_WriteStrClient( Client, RPL_CREATED_MSG, Client_ID( Client ), NGIRCd_StartStr )) return FALSE;
391         if( ! IRC_WriteStrClient( Client, RPL_MYINFO_MSG, Client_ID( Client ), Client_ID( Client_ThisServer( )))) return FALSE;
392
393         Client_SetType( Client, CLIENT_USER );
394
395         if( ! IRC_Send_LUSERS( Client )) return DISCONNECTED;
396         if( ! IRC_Show_MOTD( Client )) return DISCONNECTED;
397
398         return CONNECTED;
399 } /* Hello_User */
400
401
402 LOCAL VOID Kill_Nick( CHAR *Nick, CHAR *Reason )
403 {
404         CLIENT *c;
405
406         assert( Nick != NULL );
407         assert( Reason != NULL );
408
409         Log( LOG_ERR, "User(s) with nick \"%s\" will be disconnected: %s", Nick, Reason );
410
411         /* andere Server benachrichtigen */
412         IRC_WriteStrServers( NULL, "KILL %s :%s", Nick, Reason );
413
414         /* Ggf. einen eigenen Client toeten */
415         c = Client_GetFromID( Nick );
416         if( c && ( Client_Conn( c ) != NONE )) Conn_Close( Client_Conn( c ), NULL, Reason, TRUE );
417 } /* Kill_Nick */
418
419
420 /* -eof- */