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