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