]> arthur.barton.de Git - ngircd-alex.git/blob - src/ngircd/client.c
c8176280f96cac384aa0d51a7218c410472bc3d1
[ngircd-alex.git] / src / ngircd / client.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: client.c,v 1.21 2002/01/05 19:15:03 alex Exp $
13  *
14  * client.c: Management aller Clients
15  *
16  * Der Begriff "Client" ist in diesem Fall evtl. etwas verwirrend: Clients sind
17  * alle Verbindungen, die im gesamten(!) IRC-Netzwerk bekannt sind. Das sind IRC-
18  * Clients (User), andere Server und IRC-Services.
19  * Ueber welchen IRC-Server die Verbindung nun tatsaechlich in das Netzwerk her-
20  * gestellt wurde, muss der jeweiligen Struktur entnommen werden. Ist es dieser
21  * Server gewesen, so existiert eine entsprechende CONNECTION-Struktur.
22  *
23  * $Log: client.c,v $
24  * Revision 1.21  2002/01/05 19:15:03  alex
25  * - Fehlerpruefung bei select() in der "Hauptschleife" korrigiert.
26  *
27  * Revision 1.20  2002/01/04 17:57:08  alex
28  * - Client_Destroy() an Server-Links angepasst.
29  *
30  * Revision 1.19  2002/01/04 01:21:22  alex
31  * - Client-Strukturen koennen von anderen Modulen nun nur noch ueber die
32  *   enstprechenden (zum Teil neuen) Funktionen angesprochen werden.
33  *
34  * Revision 1.18  2002/01/03 02:28:06  alex
35  * - neue Funktion Client_CheckID(), diverse Aenderungen fuer Server-Links.
36  *
37  * Revision 1.17  2002/01/02 02:42:58  alex
38  * - Copyright-Texte aktualisiert.
39  *
40  * Revision 1.16  2002/01/01 18:25:44  alex
41  * - #include's fuer stdlib.h ergaenzt.
42  *
43  * Revision 1.15  2001/12/31 15:33:13  alex
44  * - neuer Befehl NAMES, kleinere Bugfixes.
45  * - Bug bei PING behoben: war zu restriktiv implementiert :-)
46  *
47  * Revision 1.14  2001/12/31 02:18:51  alex
48  * - viele neue Befehle (WHOIS, ISON, OPER, DIE, RESTART),
49  * - neuen Header "defines.h" mit (fast) allen Konstanten.
50  * - Code Cleanups und viele "kleine" Aenderungen & Bugfixes.
51  *
52  * Revision 1.13  2001/12/30 19:26:11  alex
53  * - Unterstuetzung fuer die Konfigurationsdatei eingebaut.
54  *
55  * Revision 1.12  2001/12/29 20:18:18  alex
56  * - neue Funktion Client_SetHostname().
57  *
58  * Revision 1.11  2001/12/29 03:10:47  alex
59  * - Client-Modes implementiert; Loglevel mal wieder angepasst.
60  *
61  * Revision 1.10  2001/12/27 19:13:47  alex
62  * - neue Funktion Client_Search(), besseres Logging.
63  *
64  * Revision 1.9  2001/12/27 17:15:29  alex
65  * - der eigene Hostname wird nun komplet (als FQDN) ermittelt.
66  *
67  * Revision 1.8  2001/12/27 16:54:51  alex
68  * - neue Funktion Client_GetID(), liefert die "Client ID".
69  *
70  * Revision 1.7  2001/12/26 14:45:37  alex
71  * - "Code Cleanups".
72  *
73  * Revision 1.6  2001/12/26 03:19:16  alex
74  * - neue Funktion Client_Nick().
75  *
76  * Revision 1.5  2001/12/25 22:04:26  alex
77  * - Aenderungen an den Debug- und Logging-Funktionen.
78  *
79  * Revision 1.4  2001/12/25 19:21:26  alex
80  * - Client-Typ ("Status") besser unterteilt, My_Clients ist zudem nun global.
81  *
82  * Revision 1.3  2001/12/24 01:31:14  alex
83  * - einige assert()'s eingestraeut.
84  *
85  * Revision 1.2  2001/12/23 22:04:37  alex
86  * - einige neue Funktionen,
87  * - CLIENT-Struktur erweitert.
88  *
89  * Revision 1.1  2001/12/14 08:13:43  alex
90  * - neues Modul begonnen :-)
91  */
92
93
94 #define __client_c__
95
96
97 #include <portab.h>
98 #include "global.h"
99
100 #include <imp.h>
101 #include <assert.h>
102 #include <unistd.h>
103 #include <stdio.h>
104 #include <stdlib.h>
105 #include <string.h>
106 #include <netdb.h>
107
108 #include <exp.h>
109 #include "client.h"
110
111 #include <imp.h>
112 #include "channel.h"
113 #include "conf.h"
114 #include "conn.h"
115 #include "irc.h"
116 #include "log.h"
117 #include "messages.h"
118
119 #include <exp.h>
120
121
122 LOCAL CLIENT *This_Server, *My_Clients;
123 LOCAL CHAR GetID_Buffer[CLIENT_ID_LEN];
124
125
126 LOCAL CLIENT *New_Client_Struct( VOID );
127
128
129 GLOBAL VOID Client_Init( VOID )
130 {
131         struct hostent *h;
132         
133         This_Server = New_Client_Struct( );
134         if( ! This_Server )
135         {
136                 Log( LOG_EMERG, "Can't allocate client structure for server! Going down." );
137                 Log( LOG_ALERT, PACKAGE" exiting due to fatal errors!" );
138                 exit( 1 );
139         }
140
141         /* Client-Struktur dieses Servers */
142         This_Server->next = NULL;
143         This_Server->type = CLIENT_SERVER;
144         This_Server->conn_id = NONE;
145         This_Server->introducer = This_Server;
146
147         gethostname( This_Server->host, CLIENT_HOST_LEN );
148         h = gethostbyname( This_Server->host );
149         if( h ) strcpy( This_Server->host, h->h_name );
150
151         strcpy( This_Server->id, Conf_ServerName );
152         strcpy( This_Server->info, Conf_ServerInfo );
153
154         My_Clients = This_Server;
155 } /* Client_Init */
156
157
158 GLOBAL VOID Client_Exit( VOID )
159 {
160         CLIENT *c, *next;
161         INT cnt;
162
163         Client_Destroy( This_Server );
164         
165         cnt = 0;
166         c = My_Clients;
167         while( c )
168         {
169                 cnt++;
170                 next = c->next;
171                 free( c );
172                 c = next;
173         }
174         if( cnt ) Log( LOG_INFO, "Freed %d client structure%s.", cnt, cnt == 1 ? "" : "s" );
175 } /* Client Exit */
176
177
178 GLOBAL CLIENT *Client_ThisServer( VOID )
179 {
180         return This_Server;
181 } /* Client_ThisServer */
182
183
184 GLOBAL CLIENT *Client_NewLocal( CONN_ID Idx, CHAR *Hostname, INT Type )
185 {
186         /* Neuen lokalen Client erzeugen: Wrapper-Funktion fuer Client_New(). */
187         return Client_New( Idx, This_Server, Type, NULL, NULL, Hostname, NULL, 0, 0, NULL );
188 } /* Client_NewLocal */
189
190
191 GLOBAL CLIENT *Client_NewRemoteServer( CLIENT *Introducer, CHAR *Hostname, INT Hops, INT Token, CHAR *Info )
192 {
193         /* Neuen Remote-Client erzeugen: Wrapper-Funktion fuer Client_New (). */
194         return Client_New( NONE, Introducer, CLIENT_SERVER, Hostname, NULL, Hostname, Info, Hops, Token, NULL );
195 } /* Client_NewRemoteServer */
196
197
198 GLOBAL CLIENT *Client_NewRemoteUser( CLIENT *Introducer, CHAR *Nick, INT Hops, CHAR *User, CHAR *Hostname, INT Token, CHAR *Modes, CHAR *Info )
199 {
200         /* Neuen Remote-Client erzeugen: Wrapper-Funktion fuer Client_New (). */
201         return Client_New( NONE, Introducer, CLIENT_USER, Nick, User, Hostname, Info, Hops, Token, NULL );
202 } /* Client_NewRemoteUser */
203
204
205 GLOBAL CLIENT *Client_New( CONN_ID Idx, CLIENT *Introducer, INT Type, CHAR *ID, CHAR *User, CHAR *Hostname, CHAR *Info, INT Hops, INT Token, CHAR *Modes )
206 {
207         CLIENT *client;
208
209         assert( Idx >= NONE );
210         assert( Introducer != NULL );
211         assert( Hostname != NULL );
212
213         client = New_Client_Struct( );
214         if( ! client ) return NULL;
215
216         /* Initialisieren */
217         client->conn_id = Idx;
218         client->introducer = Introducer;
219         client->type = Type;
220         if( ID ) Client_SetID( client, ID );
221         if( User ) Client_SetUser( client, User );
222         if( Hostname ) Client_SetHostname( client, Hostname );
223         if( Info ) Client_SetInfo( client, Info );
224         client->hops = Hops;
225         client->token = Token;
226         if( Modes ) Client_SetModes( client, Modes );
227
228         /* Verketten */
229         client->next = My_Clients;
230         My_Clients = client;
231
232         return client;
233 } /* Client_New */
234
235
236 GLOBAL VOID Client_Destroy( CLIENT *Client )
237 {
238         /* Client entfernen. */
239         
240         CLIENT *last, *c;
241
242         assert( Client != NULL );
243
244         last = NULL;
245         c = My_Clients;
246         while( c )
247         {
248                 if(( Client->type == CLIENT_SERVER ) && ( c->introducer == Client ) && ( c != Client ))
249                 {
250                         Client_Destroy( c );
251                         last = NULL;
252                         c = My_Clients;
253                         continue;
254                 }
255                 if( c == Client )
256                 {
257                         if( last ) last->next = c->next;
258                         else My_Clients = c->next;
259
260                         if( c->type == CLIENT_USER )
261                         {
262                                 if( c->conn_id != NONE )
263                                 {
264                                         /* Ein lokaler User. Andere Server informieren! */
265                                         Log( LOG_NOTICE, "User \"%s!%s@%s\" exited (connection %d).", c->id, c->user, c->host, c->conn_id );
266                                         IRC_WriteStrServersPrefix( NULL, c, "QUIT :" );
267                                 }
268                                 else Log( LOG_DEBUG, "User \"%s!%s@%s\" exited.", c->id, c->user, c->host );
269                         }
270                         else if( c->type == CLIENT_SERVER ) Log( LOG_NOTICE, "Server \"%s\" exited.", c->id );
271                         else Log( LOG_NOTICE, "Unknown client \"%s\" exited.", c->id );
272
273                         free( c );
274                         break;
275                 }
276                 last = c;
277                 c = c->next;
278         }
279 } /* Client_Destroy */
280
281
282 GLOBAL VOID Client_SetHostname( CLIENT *Client, CHAR *Hostname )
283 {
284         /* Hostname eines Clients setzen */
285         
286         assert( Client != NULL );
287         strncpy( Client->host, Hostname, CLIENT_HOST_LEN );
288         Client->host[CLIENT_HOST_LEN - 1] = '\0';
289 } /* Client_SetHostname */
290
291
292 GLOBAL VOID Client_SetID( CLIENT *Client, CHAR *ID )
293 {
294         /* Hostname eines Clients setzen */
295
296         assert( Client != NULL );
297         strncpy( Client->id, ID, CLIENT_ID_LEN );
298         Client->id[CLIENT_ID_LEN - 1] = '\0';
299 } /* Client_SetID */
300
301
302 GLOBAL VOID Client_SetUser( CLIENT *Client, CHAR *User )
303 {
304         /* Username eines Clients setzen */
305
306         assert( Client != NULL );
307         strncpy( Client->user, User, CLIENT_USER_LEN );
308         Client->user[CLIENT_USER_LEN - 1] = '\0';
309 } /* Client_SetUser */
310
311
312 GLOBAL VOID Client_SetInfo( CLIENT *Client, CHAR *Info )
313 {
314         /* Hostname eines Clients setzen */
315
316         assert( Client != NULL );
317         strncpy( Client->info, Info, CLIENT_INFO_LEN );
318         Client->info[CLIENT_INFO_LEN - 1] = '\0';
319 } /* Client_SetInfo */
320
321
322 GLOBAL VOID Client_SetModes( CLIENT *Client, CHAR *Modes )
323 {
324         /* Hostname eines Clients setzen */
325
326         assert( Client != NULL );
327         strncpy( Client->modes, Modes, CLIENT_MODE_LEN );
328         Client->info[CLIENT_MODE_LEN - 1] = '\0';
329 } /* Client_SetModes */
330
331
332 GLOBAL VOID Client_SetPassword( CLIENT *Client, CHAR *Pwd )
333 {
334         /* Von einem Client geliefertes Passwort */
335
336         assert( Client != NULL );
337         strncpy( Client->pwd, Pwd, CLIENT_PASS_LEN );
338         Client->pwd[CLIENT_PASS_LEN - 1] = '\0';
339 } /* Client_SetPassword */
340
341
342 GLOBAL VOID Client_SetType( CLIENT *Client, INT Type )
343 {
344         assert( Client != NULL );
345         Client->type = Type;
346 } /* Client_SetType */
347
348
349 GLOBAL VOID Client_SetHops( CLIENT *Client, INT Hops )
350 {
351         assert( Client != NULL );
352         Client->hops = Hops;
353 } /* Client_SetHops */
354
355
356 GLOBAL VOID Client_SetToken( CLIENT *Client, INT Token )
357 {
358         assert( Client != NULL );
359         Client->token = Token;
360 } /* Client_SetToken */
361
362
363 GLOBAL VOID Client_SetIntroducer( CLIENT *Client, CLIENT *Introducer )
364 {
365         assert( Client != NULL );
366         Client->introducer = Introducer;
367 } /* Client_SetIntroducer */
368
369
370 GLOBAL VOID Client_SetOperByMe( CLIENT *Client, BOOLEAN OperByMe )
371 {
372         assert( Client != NULL );
373         Client->oper_by_me = OperByMe;
374 } /* Client_SetOperByMe */
375
376
377 GLOBAL BOOLEAN Client_ModeAdd( CLIENT *Client, CHAR Mode )
378 {
379         /* Mode soll gesetzt werden. TRUE wird geliefert, wenn der
380          * Mode neu gesetzt wurde, FALSE, wenn der Client den Mode
381          * bereits hatte. */
382
383         CHAR x[2];
384         
385         assert( Client != NULL );
386
387         x[0] = Mode; x[1] = '\0';
388         if( ! strchr( Client->modes, x[0] ))
389         {
390                 /* Client hat den Mode noch nicht -> setzen */
391                 strcat( Client->modes, x );
392                 return TRUE;
393         }
394         else return FALSE;
395 } /* Client_ModeAdd */
396
397
398 GLOBAL BOOLEAN Client_ModeDel( CLIENT *Client, CHAR Mode )
399 {
400         /* Mode soll geloescht werden. TRUE wird geliefert, wenn der
401         * Mode entfernt wurde, FALSE, wenn der Client den Mode
402         * ueberhaupt nicht hatte. */
403
404         CHAR x[2], *p;
405
406         assert( Client != NULL );
407
408         x[0] = Mode; x[1] = '\0';
409
410         p = strchr( Client->modes, x[0] );
411         if( ! p ) return FALSE;
412
413         /* Client hat den Mode -> loeschen */
414         while( *p )
415         {
416                 *p = *(p + 1);
417                 p++;
418         }
419         return TRUE;
420 } /* Client_ModeDel */
421
422
423 GLOBAL CLIENT *Client_GetFromConn( CONN_ID Idx )
424 {
425         /* Client-Struktur, die zur lokalen Verbindung Idx gehoert,
426          * liefern. Wird keine gefunden, so wird NULL geliefert. */
427
428         CLIENT *c;
429
430         assert( Idx >= 0 );
431         
432         c = My_Clients;
433         while( c )
434         {
435                 if( c->conn_id == Idx ) return c;
436                 c = c->next;
437         }
438         return NULL;
439 } /* Client_GetFromConn */
440
441
442 GLOBAL CLIENT *Client_GetFromID( CHAR *Nick )
443 {
444         /* Client-Struktur, die den entsprechenden Nick hat,
445         * liefern. Wird keine gefunden, so wird NULL geliefert. */
446
447         CLIENT *c;
448
449         assert( Nick != NULL );
450
451         c = My_Clients;
452         while( c )
453         {
454                 if( strcasecmp( c->id, Nick ) == 0 ) return c;
455                 c = c->next;
456         }
457         return NULL;
458 } /* Client_GetFromID */
459
460
461 GLOBAL CLIENT *Client_GetFromToken( CLIENT *Client, INT Token )
462 {
463         /* Client-Struktur, die den entsprechenden Introducer (=Client)
464          * und das gegebene Token hat, liefern. Wird keine gefunden,
465          * so wird NULL geliefert. */
466
467         CLIENT *c;
468
469         assert( Client != NULL );
470         assert( Token > 0 );
471
472         c = My_Clients;
473         while( c )
474         {
475                 if(( c->type == CLIENT_SERVER ) && ( c->introducer == Client ) && ( c->token == Token )) return c;
476                 c = c->next;
477         }
478         return NULL;
479 } /* Client_GetFromToken */
480
481
482 GLOBAL INT Client_Type( CLIENT *Client )
483 {
484         assert( Client != NULL );
485         return Client->type;
486 } /* Client_Type */
487
488
489 GLOBAL CONN_ID Client_Conn( CLIENT *Client )
490 {
491         assert( Client != NULL );
492         return Client->conn_id;
493 } /* Client_Conn */
494
495
496 GLOBAL CHAR *Client_ID( CLIENT *Client )
497 {
498         assert( Client != NULL );
499
500         if( Client->id[0] ) return Client->id;
501         else return "*";
502 } /* Client_ID */
503
504
505 GLOBAL CHAR *Client_Info( CLIENT *Client )
506 {
507         assert( Client != NULL );
508         return Client->info;
509 } /* Client_Info */
510
511
512 GLOBAL CHAR *Client_User( CLIENT *Client )
513 {
514         assert( Client != NULL );
515         if( Client->user ) return Client->user;
516         else return "~";
517 } /* Client_User */
518
519
520 GLOBAL CHAR *Client_Hostname( CLIENT *Client )
521 {
522         assert( Client != NULL );
523         return Client->host;
524 } /* Client_Hostname */
525
526
527 GLOBAL CHAR *Client_Password( CLIENT *Client )
528 {
529         assert( Client != NULL );
530         return Client->pwd;
531 } /* Client_Password */
532
533
534 GLOBAL CHAR *Client_Modes( CLIENT *Client )
535 {
536         assert( Client != NULL );
537         return Client->modes;
538 } /* Client_Modes */
539
540
541 GLOBAL BOOLEAN Client_OperByMe( CLIENT *Client )
542 {
543         assert( Client != NULL );
544         return Client->oper_by_me;
545 } /* Client_OperByMe */
546
547
548 GLOBAL INT Client_Hops( CLIENT *Client )
549 {
550         assert( Client != NULL );
551         return Client->hops;
552 } /* Client_Hops */
553
554
555 GLOBAL INT Client_Token( CLIENT *Client )
556 {
557         assert( Client != NULL );
558         return Client->token;
559 } /* Client_Token */
560
561
562 GLOBAL CHAR *Client_Mask( CLIENT *Client )
563 {
564         /* Client-"ID" liefern, wie sie z.B. fuer
565          * Prefixe benoetigt wird. */
566
567         assert( Client != NULL );
568         
569         if( Client->type == CLIENT_SERVER ) return Client->id;
570
571         sprintf( GetID_Buffer, "%s!%s@%s", Client->id, Client->user, Client->host );
572         return GetID_Buffer;
573 } /* Client_Mask */
574
575
576 GLOBAL CLIENT *Client_Introducer( CLIENT *Client )
577 {
578         assert( Client != NULL );
579         return Client->introducer;
580 } /* Client_Introducer */
581
582
583 GLOBAL BOOLEAN Client_HasMode( CLIENT *Client, CHAR Mode )
584 {
585         assert( Client != NULL );
586         return strchr( Client->modes, Mode ) != NULL;
587 } /* Client_HasMode */
588
589
590 GLOBAL BOOLEAN Client_CheckNick( CLIENT *Client, CHAR *Nick )
591 {
592         /* Nick ueberpruefen */
593
594         CLIENT *c;
595         
596         assert( Client != NULL );
597         assert( Nick != NULL );
598         
599         /* Nick zu lang? */
600         if( strlen( Nick ) > CLIENT_NICK_LEN ) return IRC_WriteStrClient( Client, ERR_ERRONEUSNICKNAME_MSG, Client_ID( Client ), Nick );
601
602         /* Nick bereits vergeben? */
603         c = My_Clients;
604         while( c )
605         {
606                 if( strcasecmp( c->id, Nick ) == 0 )
607                 {
608                         /* den Nick gibt es bereits */
609                         IRC_WriteStrClient( Client, ERR_NICKNAMEINUSE_MSG, Client_ID( Client ), Nick );
610                         return FALSE;
611                 }
612                 c = c->next;
613         }
614
615         return TRUE;
616 } /* Client_CheckNick */
617
618
619 GLOBAL BOOLEAN Client_CheckID( CLIENT *Client, CHAR *ID )
620 {
621         /* Nick ueberpruefen */
622
623         CHAR str[COMMAND_LEN];
624         CLIENT *c;
625
626         assert( Client != NULL );
627         assert( Client->conn_id > NONE );
628         assert( ID != NULL );
629
630         /* Nick zu lang? */
631         if( strlen( ID ) > CLIENT_ID_LEN ) return IRC_WriteStrClient( Client, ERR_ERRONEUSNICKNAME_MSG, Client_ID( Client ), ID );
632
633         /* ID bereits vergeben? */
634         c = My_Clients;
635         while( c )
636         {
637                 if( strcasecmp( c->id, ID ) == 0 )
638                 {
639                         /* die Server-ID gibt es bereits */
640                         sprintf( str, "ID \"%s\" already registered!", ID );
641                         Log( LOG_ALERT, "%s (on connection %d)", str, Client->conn_id );
642                         Conn_Close( Client->conn_id, str );
643                         return FALSE;
644                 }
645                 c = c->next;
646         }
647
648         return TRUE;
649 } /* Client_CheckID */
650
651
652 GLOBAL CLIENT *Client_Search( CHAR *ID )
653 {
654         /* Client suchen, auf den ID passt */
655
656         CLIENT *c;
657
658         assert( ID != NULL );
659
660         c = My_Clients;
661         while( c )
662         {
663                 if( strcasecmp( c->id, ID ) == 0 ) return c;
664                 c = c->next;
665         }
666         
667         return NULL;
668 } /* Client_Search */
669
670
671 GLOBAL CLIENT *Client_First( VOID )
672 {
673         /* Ersten Client liefern. */
674
675         return My_Clients;
676 } /* Client_First */
677
678
679 GLOBAL CLIENT *Client_Next( CLIENT *c )
680 {
681         /* Naechsten Client liefern. Existiert keiner,
682          * so wird NULL geliefert. */
683
684         assert( c != NULL );
685         return c->next;
686 } /* Client_Next */
687
688
689 LOCAL CLIENT *New_Client_Struct( VOID )
690 {
691         /* Neue CLIENT-Struktur pre-initialisieren */
692         
693         CLIENT *c;
694         INT i;
695         
696         c = malloc( sizeof( CLIENT ));
697         if( ! c )
698         {
699                 Log( LOG_EMERG, "Can't allocate memory!" );
700                 return NULL;
701         }
702
703         c->next = NULL;
704         c->type = CLIENT_UNKNOWN;
705         c->conn_id = NONE;
706         c->introducer = NULL;
707         strcpy( c->id, "" );
708         strcpy( c->pwd, "" );
709         strcpy( c->host, "" );
710         strcpy( c->user, "" );
711         strcpy( c->info, "" );
712         for( i = 0; i < MAX_CHANNELS; c->channels[i++] = NULL );
713         strcpy( c->modes, "" );
714         c->oper_by_me = FALSE;
715         c->hops = -1;
716         c->token = -1;
717
718         return c;
719 } /* New_Client */
720
721
722 /* -eof- */