]> arthur.barton.de Git - ngircd-alex.git/blob - src/ngircd/client.c
- weitere Anpassungen an Chennals, v.a. ueber Server-Links.
[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.33 2002/01/27 21:56:54 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.33  2002/01/27 21:56:54  alex
25  * - weitere Anpassungen an Chennals, v.a. ueber Server-Links.
26  *
27  * Revision 1.32  2002/01/27 18:27:12  alex
28  * - Client_GetFromID() kommt nun auch mit Host-Masken zurecht.
29  *
30  * Revision 1.31  2002/01/21 00:08:50  alex
31  * - wird ein Client entfernt, so wird er auch aus allen Channels geloescht.
32  *
33  * Revision 1.30  2002/01/18 15:32:01  alex
34  * - bei Client_SetModes() wurde das NULL-Byte falsch gesetzt. Opsa.
35  *
36  * Revision 1.29  2002/01/16 22:10:35  alex
37  * - neue Funktionen Client_xxxCount().
38  *
39  * Revision 1.28  2002/01/11 23:50:40  alex
40  * - Hop-Count fuer den Server selber (0) wird korrekt initialisiert.
41  *
42  * Revision 1.27  2002/01/09 01:08:08  alex
43  * - wird ein Server abgemeldet, so wird anderen Server ein SQUIT geschickt.
44  *
45  * Revision 1.26  2002/01/07 23:42:12  alex
46  * - Es werden fuer alle Server eigene Token generiert,
47  * - QUIT von einem Server fuer einen User wird an andere Server geforwarded,
48  * - ebenso NICK-Befehle, die "fremde" User einfuehren.
49  *
50  * Revision 1.25  2002/01/07 15:31:00  alex
51  * - Bei Log-Meldungen ueber Clients wird nun immer die "Client Mask" verwendet.
52  *
53  * Revision 1.24  2002/01/06 15:18:14  alex
54  * - Loglevel und Meldungen nochmals geaendert. Level passen nun besser.
55  *
56  * Revision 1.23  2002/01/05 23:26:05  alex
57  * - Vorbereitungen fuer Ident-Abfragen in Client-Strukturen.
58  *
59  * Revision 1.22  2002/01/05 20:08:17  alex
60  * - neue Funktion Client_NextHop().
61  *
62  * Revision 1.21  2002/01/05 19:15:03  alex
63  * - Fehlerpruefung bei select() in der "Hauptschleife" korrigiert.
64  *
65  * Revision 1.20  2002/01/04 17:57:08  alex
66  * - Client_Destroy() an Server-Links angepasst.
67  *
68  * Revision 1.19  2002/01/04 01:21:22  alex
69  * - Client-Strukturen koennen von anderen Modulen nun nur noch ueber die
70  *   enstprechenden (zum Teil neuen) Funktionen angesprochen werden.
71  *
72  * Revision 1.18  2002/01/03 02:28:06  alex
73  * - neue Funktion Client_CheckID(), diverse Aenderungen fuer Server-Links.
74  *
75  * Revision 1.17  2002/01/02 02:42:58  alex
76  * - Copyright-Texte aktualisiert.
77  *
78  * Revision 1.16  2002/01/01 18:25:44  alex
79  * - #include's fuer stdlib.h ergaenzt.
80  *
81  * Revision 1.15  2001/12/31 15:33:13  alex
82  * - neuer Befehl NAMES, kleinere Bugfixes.
83  * - Bug bei PING behoben: war zu restriktiv implementiert :-)
84  *
85  * Revision 1.14  2001/12/31 02:18:51  alex
86  * - viele neue Befehle (WHOIS, ISON, OPER, DIE, RESTART),
87  * - neuen Header "defines.h" mit (fast) allen Konstanten.
88  * - Code Cleanups und viele "kleine" Aenderungen & Bugfixes.
89  *
90  * Revision 1.13  2001/12/30 19:26:11  alex
91  * - Unterstuetzung fuer die Konfigurationsdatei eingebaut.
92  *
93  * Revision 1.12  2001/12/29 20:18:18  alex
94  * - neue Funktion Client_SetHostname().
95  *
96  * Revision 1.11  2001/12/29 03:10:47  alex
97  * - Client-Modes implementiert; Loglevel mal wieder angepasst.
98  *
99  * Revision 1.10  2001/12/27 19:13:47  alex
100  * - neue Funktion Client_Search(), besseres Logging.
101  *
102  * Revision 1.9  2001/12/27 17:15:29  alex
103  * - der eigene Hostname wird nun komplet (als FQDN) ermittelt.
104  *
105  * Revision 1.8  2001/12/27 16:54:51  alex
106  * - neue Funktion Client_GetID(), liefert die "Client ID".
107  *
108  * Revision 1.7  2001/12/26 14:45:37  alex
109  * - "Code Cleanups".
110  *
111  * Revision 1.6  2001/12/26 03:19:16  alex
112  * - neue Funktion Client_Nick().
113  *
114  * Revision 1.5  2001/12/25 22:04:26  alex
115  * - Aenderungen an den Debug- und Logging-Funktionen.
116  *
117  * Revision 1.4  2001/12/25 19:21:26  alex
118  * - Client-Typ ("Status") besser unterteilt, My_Clients ist zudem nun global.
119  *
120  * Revision 1.3  2001/12/24 01:31:14  alex
121  * - einige assert()'s eingestraeut.
122  *
123  * Revision 1.2  2001/12/23 22:04:37  alex
124  * - einige neue Funktionen,
125  * - CLIENT-Struktur erweitert.
126  *
127  * Revision 1.1  2001/12/14 08:13:43  alex
128  * - neues Modul begonnen :-)
129  */
130
131
132 #define __client_c__
133
134
135 #include <portab.h>
136 #include "global.h"
137
138 #include <imp.h>
139 #include <assert.h>
140 #include <unistd.h>
141 #include <stdio.h>
142 #include <stdlib.h>
143 #include <string.h>
144 #include <netdb.h>
145
146 #include <exp.h>
147 #include "client.h"
148
149 #include <imp.h>
150 #include "ngircd.h"
151 #include "channel.h"
152 #include "conf.h"
153 #include "conn.h"
154 #include "irc.h"
155 #include "log.h"
156 #include "messages.h"
157
158 #include <exp.h>
159
160
161 LOCAL CLIENT *This_Server, *My_Clients;
162 LOCAL CHAR GetID_Buffer[CLIENT_ID_LEN];
163
164
165 LOCAL INT Count( CLIENT_TYPE Type );
166 LOCAL INT MyCount( CLIENT_TYPE Type );
167
168 LOCAL CLIENT *New_Client_Struct( VOID );
169 LOCAL VOID Generate_MyToken( CLIENT *Client );
170
171
172 GLOBAL VOID Client_Init( VOID )
173 {
174         struct hostent *h;
175         
176         This_Server = New_Client_Struct( );
177         if( ! This_Server )
178         {
179                 Log( LOG_EMERG, "Can't allocate client structure for server! Going down." );
180                 Log( LOG_ALERT, PACKAGE" exiting due to fatal errors!" );
181                 exit( 1 );
182         }
183
184         /* Client-Struktur dieses Servers */
185         This_Server->next = NULL;
186         This_Server->type = CLIENT_SERVER;
187         This_Server->conn_id = NONE;
188         This_Server->introducer = This_Server;
189         This_Server->mytoken = 1;
190         This_Server->hops = 0;
191
192         gethostname( This_Server->host, CLIENT_HOST_LEN );
193         h = gethostbyname( This_Server->host );
194         if( h ) strcpy( This_Server->host, h->h_name );
195
196         strcpy( This_Server->id, Conf_ServerName );
197         strcpy( This_Server->info, Conf_ServerInfo );
198
199         My_Clients = This_Server;
200 } /* Client_Init */
201
202
203 GLOBAL VOID Client_Exit( VOID )
204 {
205         CLIENT *c, *next;
206         INT cnt;
207
208         Client_Destroy( This_Server, "Server going down.", NULL );
209         
210         cnt = 0;
211         c = My_Clients;
212         while( c )
213         {
214                 cnt++;
215                 next = c->next;
216                 free( c );
217                 c = next;
218         }
219         if( cnt ) Log( LOG_INFO, "Freed %d client structure%s.", cnt, cnt == 1 ? "" : "s" );
220 } /* Client_Exit */
221
222
223 GLOBAL CLIENT *Client_ThisServer( VOID )
224 {
225         return This_Server;
226 } /* Client_ThisServer */
227
228
229 GLOBAL CLIENT *Client_NewLocal( CONN_ID Idx, CHAR *Hostname, INT Type, BOOLEAN Idented )
230 {
231         /* Neuen lokalen Client erzeugen: Wrapper-Funktion fuer Client_New(). */
232         return Client_New( Idx, This_Server, Type, NULL, NULL, Hostname, NULL, 0, 0, NULL, Idented );
233 } /* Client_NewLocal */
234
235
236 GLOBAL CLIENT *Client_NewRemoteServer( CLIENT *Introducer, CHAR *Hostname, INT Hops, INT Token, CHAR *Info, BOOLEAN Idented )
237 {
238         /* Neuen Remote-Client erzeugen: Wrapper-Funktion fuer Client_New (). */
239         return Client_New( NONE, Introducer, CLIENT_SERVER, Hostname, NULL, Hostname, Info, Hops, Token, NULL, Idented );
240 } /* Client_NewRemoteServer */
241
242
243 GLOBAL CLIENT *Client_NewRemoteUser( CLIENT *Introducer, CHAR *Nick, INT Hops, CHAR *User, CHAR *Hostname, INT Token, CHAR *Modes, CHAR *Info, BOOLEAN Idented )
244 {
245         /* Neuen Remote-Client erzeugen: Wrapper-Funktion fuer Client_New (). */
246         return Client_New( NONE, Introducer, CLIENT_USER, Nick, User, Hostname, Info, Hops, Token, Modes, Idented );
247 } /* Client_NewRemoteUser */
248
249
250 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, BOOLEAN Idented )
251 {
252         CLIENT *client;
253
254         assert( Idx >= NONE );
255         assert( Introducer != NULL );
256         assert( Hostname != NULL );
257
258         client = New_Client_Struct( );
259         if( ! client ) return NULL;
260
261         /* Initialisieren */
262         client->conn_id = Idx;
263         client->introducer = Introducer;
264         client->type = Type;
265         if( ID ) Client_SetID( client, ID );
266         if( User ) Client_SetUser( client, User, Idented );
267         if( Hostname ) Client_SetHostname( client, Hostname );
268         if( Info ) Client_SetInfo( client, Info );
269         client->hops = Hops;
270         client->token = Token;
271         if( Modes ) Client_SetModes( client, Modes );
272         if( Type == CLIENT_SERVER ) Generate_MyToken( client );
273
274         /* Verketten */
275         client->next = My_Clients;
276         My_Clients = client;
277
278         return client;
279 } /* Client_New */
280
281
282 GLOBAL VOID Client_Destroy( CLIENT *Client, CHAR *LogMsg, CHAR *FwdMsg )
283 {
284         /* Client entfernen. */
285         
286         CLIENT *last, *c;
287         CHAR *txt;
288
289         assert( Client != NULL );
290
291         if( LogMsg ) txt = LogMsg;
292         else txt = FwdMsg;
293         if( ! txt ) txt = "Reason unknown.";
294
295         last = NULL;
296         c = My_Clients;
297         while( c )
298         {
299                 if(( Client->type == CLIENT_SERVER ) && ( c->introducer == Client ) && ( c != Client ))
300                 {
301                         Client_Destroy( c, LogMsg, FwdMsg );
302                         last = NULL;
303                         c = My_Clients;
304                         continue;
305                 }
306                 if( c == Client )
307                 {
308                         if( last ) last->next = c->next;
309                         else My_Clients = c->next;
310
311                         if( c->type == CLIENT_USER )
312                         {
313                                 if( c->conn_id != NONE )
314                                 {
315                                         /* Ein lokaler User. Alle andere Server informieren! */
316                                         Log( LOG_NOTICE, "User \"%s\" unregistered (connection %d): %s", Client_Mask( c ), c->conn_id, txt );
317
318                                         if( FwdMsg ) IRC_WriteStrServersPrefix( NULL, c, "QUIT :%s", FwdMsg );
319                                         else IRC_WriteStrServersPrefix( NULL, c, "QUIT :" );
320                                 }
321                                 else
322                                 {
323                                         /* Remote User. Andere Server informieren, ausser denen,
324                                          * die "in Richtung dem liegen", auf dem der User registriert
325                                          * ist. Von denen haben wir das QUIT ja wohl bekommen. */
326                                         Log( LOG_DEBUG, "User \"%s\" unregistered: %s", Client_Mask( c ), txt );
327                                         
328                                         if( FwdMsg ) IRC_WriteStrServersPrefix( Client_NextHop( c ), c, "QUIT :%s", FwdMsg );
329                                         else IRC_WriteStrServersPrefix( Client_NextHop( c ), c, "QUIT :" );
330                                 }
331                                 Channel_RemoveClient( c, FwdMsg ? FwdMsg : c->id );
332                         }
333                         else if( c->type == CLIENT_SERVER )
334                         {
335                                 if( c != This_Server ) Log( LOG_NOTICE, "Server \"%s\" unregistered: %s", c->id, txt );
336
337                                 /* andere Server informieren */
338                                 if( ! NGIRCd_Quit )
339                                 {
340                                         if( FwdMsg ) IRC_WriteStrServersPrefix( Client_NextHop( c ), c, "SQUIT %s :%s", c->id, FwdMsg );
341                                         else IRC_WriteStrServersPrefix( Client_NextHop( c ), c, "SQUIT %s :", c->id );
342                                 }
343                         }
344                         else Log( LOG_NOTICE, "Unknown client \"%s\" unregistered: %s", c->id, txt );
345
346                         free( c );
347                         break;
348                 }
349                 last = c;
350                 c = c->next;
351         }
352 } /* Client_Destroy */
353
354
355 GLOBAL VOID Client_SetHostname( CLIENT *Client, CHAR *Hostname )
356 {
357         /* Hostname eines Clients setzen */
358         
359         assert( Client != NULL );
360         strncpy( Client->host, Hostname, CLIENT_HOST_LEN );
361         Client->host[CLIENT_HOST_LEN - 1] = '\0';
362 } /* Client_SetHostname */
363
364
365 GLOBAL VOID Client_SetID( CLIENT *Client, CHAR *ID )
366 {
367         /* Hostname eines Clients setzen */
368
369         assert( Client != NULL );
370         strncpy( Client->id, ID, CLIENT_ID_LEN );
371         Client->id[CLIENT_ID_LEN - 1] = '\0';
372 } /* Client_SetID */
373
374
375 GLOBAL VOID Client_SetUser( CLIENT *Client, CHAR *User, BOOLEAN Idented )
376 {
377         /* Username eines Clients setzen */
378
379         assert( Client != NULL );
380         if( Idented ) strncpy( Client->user, User, CLIENT_USER_LEN );
381         else
382         {
383                 Client->user[0] = '~';
384                 strncpy( Client->user + 1, User, CLIENT_USER_LEN - 1 );
385         }
386         Client->user[CLIENT_USER_LEN - 1] = '\0';
387 } /* Client_SetUser */
388
389
390 GLOBAL VOID Client_SetInfo( CLIENT *Client, CHAR *Info )
391 {
392         /* Hostname eines Clients setzen */
393
394         assert( Client != NULL );
395         strncpy( Client->info, Info, CLIENT_INFO_LEN );
396         Client->info[CLIENT_INFO_LEN - 1] = '\0';
397 } /* Client_SetInfo */
398
399
400 GLOBAL VOID Client_SetModes( CLIENT *Client, CHAR *Modes )
401 {
402         /* Hostname eines Clients setzen */
403
404         assert( Client != NULL );
405         strncpy( Client->modes, Modes, CLIENT_MODE_LEN );
406         Client->modes[CLIENT_MODE_LEN - 1] = '\0';
407 } /* Client_SetModes */
408
409
410 GLOBAL VOID Client_SetPassword( CLIENT *Client, CHAR *Pwd )
411 {
412         /* Von einem Client geliefertes Passwort */
413
414         assert( Client != NULL );
415         strncpy( Client->pwd, Pwd, CLIENT_PASS_LEN );
416         Client->pwd[CLIENT_PASS_LEN - 1] = '\0';
417 } /* Client_SetPassword */
418
419
420 GLOBAL VOID Client_SetType( CLIENT *Client, INT Type )
421 {
422         assert( Client != NULL );
423         Client->type = Type;
424         if( Type == CLIENT_SERVER ) Generate_MyToken( Client );
425 } /* Client_SetType */
426
427
428 GLOBAL VOID Client_SetHops( CLIENT *Client, INT Hops )
429 {
430         assert( Client != NULL );
431         Client->hops = Hops;
432 } /* Client_SetHops */
433
434
435 GLOBAL VOID Client_SetToken( CLIENT *Client, INT Token )
436 {
437         assert( Client != NULL );
438         Client->token = Token;
439 } /* Client_SetToken */
440
441
442 GLOBAL VOID Client_SetIntroducer( CLIENT *Client, CLIENT *Introducer )
443 {
444         assert( Client != NULL );
445         Client->introducer = Introducer;
446 } /* Client_SetIntroducer */
447
448
449 GLOBAL VOID Client_SetOperByMe( CLIENT *Client, BOOLEAN OperByMe )
450 {
451         assert( Client != NULL );
452         Client->oper_by_me = OperByMe;
453 } /* Client_SetOperByMe */
454
455
456 GLOBAL BOOLEAN Client_ModeAdd( CLIENT *Client, CHAR Mode )
457 {
458         /* Mode soll gesetzt werden. TRUE wird geliefert, wenn der
459          * Mode neu gesetzt wurde, FALSE, wenn der Client den Mode
460          * bereits hatte. */
461
462         CHAR x[2];
463         
464         assert( Client != NULL );
465
466         x[0] = Mode; x[1] = '\0';
467         if( ! strchr( Client->modes, x[0] ))
468         {
469                 /* Client hat den Mode noch nicht -> setzen */
470                 strcat( Client->modes, x );
471                 return TRUE;
472         }
473         else return FALSE;
474 } /* Client_ModeAdd */
475
476
477 GLOBAL BOOLEAN Client_ModeDel( CLIENT *Client, CHAR Mode )
478 {
479         /* Mode soll geloescht werden. TRUE wird geliefert, wenn der
480         * Mode entfernt wurde, FALSE, wenn der Client den Mode
481         * ueberhaupt nicht hatte. */
482
483         CHAR x[2], *p;
484
485         assert( Client != NULL );
486
487         x[0] = Mode; x[1] = '\0';
488
489         p = strchr( Client->modes, x[0] );
490         if( ! p ) return FALSE;
491
492         /* Client hat den Mode -> loeschen */
493         while( *p )
494         {
495                 *p = *(p + 1);
496                 p++;
497         }
498         return TRUE;
499 } /* Client_ModeDel */
500
501
502 GLOBAL CLIENT *Client_GetFromConn( CONN_ID Idx )
503 {
504         /* Client-Struktur, die zur lokalen Verbindung Idx gehoert,
505          * liefern. Wird keine gefunden, so wird NULL geliefert. */
506
507         CLIENT *c;
508
509         assert( Idx >= 0 );
510         
511         c = My_Clients;
512         while( c )
513         {
514                 if( c->conn_id == Idx ) return c;
515                 c = c->next;
516         }
517         return NULL;
518 } /* Client_GetFromConn */
519
520
521 GLOBAL CLIENT *Client_GetFromID( CHAR *Nick )
522 {
523         /* Client-Struktur, die den entsprechenden Nick hat,
524         * liefern. Wird keine gefunden, so wird NULL geliefert. */
525
526         CLIENT *c;
527         CHAR nick[CLIENT_ID_LEN + 1], *ptr;
528
529         assert( Nick != NULL );
530
531         strncpy( nick, Nick, CLIENT_ID_LEN );
532         nick[CLIENT_ID_LEN] = '\0';
533         
534         ptr = strchr( nick, '!' );
535         if( ptr ) *ptr = '\0';
536
537         c = My_Clients;
538         while( c )
539         {
540                 if( strcasecmp( c->id, nick ) == 0 ) return c;
541                 c = c->next;
542         }
543         return NULL;
544 } /* Client_GetFromID */
545
546
547 GLOBAL CLIENT *Client_GetFromToken( CLIENT *Client, INT Token )
548 {
549         /* Client-Struktur, die den entsprechenden Introducer (=Client)
550          * und das gegebene Token hat, liefern. Wird keine gefunden,
551          * so wird NULL geliefert. */
552
553         CLIENT *c;
554
555         assert( Client != NULL );
556         assert( Token > 0 );
557
558         c = My_Clients;
559         while( c )
560         {
561                 if(( c->type == CLIENT_SERVER ) && ( c->introducer == Client ) && ( c->token == Token )) return c;
562                 c = c->next;
563         }
564         return NULL;
565 } /* Client_GetFromToken */
566
567
568 GLOBAL INT Client_Type( CLIENT *Client )
569 {
570         assert( Client != NULL );
571         return Client->type;
572 } /* Client_Type */
573
574
575 GLOBAL CONN_ID Client_Conn( CLIENT *Client )
576 {
577         assert( Client != NULL );
578         return Client->conn_id;
579 } /* Client_Conn */
580
581
582 GLOBAL CHAR *Client_ID( CLIENT *Client )
583 {
584         assert( Client != NULL );
585
586         if( Client->id[0] ) return Client->id;
587         else return "*";
588 } /* Client_ID */
589
590
591 GLOBAL CHAR *Client_Info( CLIENT *Client )
592 {
593         assert( Client != NULL );
594         return Client->info;
595 } /* Client_Info */
596
597
598 GLOBAL CHAR *Client_User( CLIENT *Client )
599 {
600         assert( Client != NULL );
601         if( Client->user ) return Client->user;
602         else return "~";
603 } /* Client_User */
604
605
606 GLOBAL CHAR *Client_Hostname( CLIENT *Client )
607 {
608         assert( Client != NULL );
609         return Client->host;
610 } /* Client_Hostname */
611
612
613 GLOBAL CHAR *Client_Password( CLIENT *Client )
614 {
615         assert( Client != NULL );
616         return Client->pwd;
617 } /* Client_Password */
618
619
620 GLOBAL CHAR *Client_Modes( CLIENT *Client )
621 {
622         assert( Client != NULL );
623         return Client->modes;
624 } /* Client_Modes */
625
626
627 GLOBAL BOOLEAN Client_OperByMe( CLIENT *Client )
628 {
629         assert( Client != NULL );
630         return Client->oper_by_me;
631 } /* Client_OperByMe */
632
633
634 GLOBAL INT Client_Hops( CLIENT *Client )
635 {
636         assert( Client != NULL );
637         return Client->hops;
638 } /* Client_Hops */
639
640
641 GLOBAL INT Client_Token( CLIENT *Client )
642 {
643         assert( Client != NULL );
644         return Client->token;
645 } /* Client_Token */
646
647
648 GLOBAL INT Client_MyToken( CLIENT *Client )
649 {
650         assert( Client != NULL );
651         return Client->mytoken;
652 } /* Client_MyToken */
653
654
655 GLOBAL CLIENT *Client_NextHop( CLIENT *Client )
656 {
657         CLIENT *c;
658         
659         assert( Client != NULL );
660
661         c = Client;
662         while( c->introducer && ( c->introducer != c ) && ( c->introducer != This_Server )) c = c->introducer;
663         return c;
664 } /* Client_NextHop */
665
666
667 GLOBAL CHAR *Client_Mask( CLIENT *Client )
668 {
669         /* Client-"ID" liefern, wie sie z.B. fuer
670          * Prefixe benoetigt wird. */
671
672         assert( Client != NULL );
673         
674         if( Client->type == CLIENT_SERVER ) return Client->id;
675
676         sprintf( GetID_Buffer, "%s!%s@%s", Client->id, Client->user, Client->host );
677         return GetID_Buffer;
678 } /* Client_Mask */
679
680
681 GLOBAL CLIENT *Client_Introducer( CLIENT *Client )
682 {
683         assert( Client != NULL );
684         return Client->introducer;
685 } /* Client_Introducer */
686
687
688 GLOBAL BOOLEAN Client_HasMode( CLIENT *Client, CHAR Mode )
689 {
690         assert( Client != NULL );
691         return strchr( Client->modes, Mode ) != NULL;
692 } /* Client_HasMode */
693
694
695 GLOBAL BOOLEAN Client_CheckNick( CLIENT *Client, CHAR *Nick )
696 {
697         /* Nick ueberpruefen */
698
699         CLIENT *c;
700         
701         assert( Client != NULL );
702         assert( Nick != NULL );
703         
704         /* Nick zu lang? */
705         if( strlen( Nick ) > CLIENT_NICK_LEN ) return IRC_WriteStrClient( Client, ERR_ERRONEUSNICKNAME_MSG, Client_ID( Client ), Nick );
706
707         /* Nick bereits vergeben? */
708         c = My_Clients;
709         while( c )
710         {
711                 if( strcasecmp( c->id, Nick ) == 0 )
712                 {
713                         /* den Nick gibt es bereits */
714                         IRC_WriteStrClient( Client, ERR_NICKNAMEINUSE_MSG, Client_ID( Client ), Nick );
715                         return FALSE;
716                 }
717                 c = c->next;
718         }
719
720         return TRUE;
721 } /* Client_CheckNick */
722
723
724 GLOBAL BOOLEAN Client_CheckID( CLIENT *Client, CHAR *ID )
725 {
726         /* Nick ueberpruefen */
727
728         CHAR str[COMMAND_LEN];
729         CLIENT *c;
730
731         assert( Client != NULL );
732         assert( Client->conn_id > NONE );
733         assert( ID != NULL );
734
735         /* Nick zu lang? */
736         if( strlen( ID ) > CLIENT_ID_LEN ) return IRC_WriteStrClient( Client, ERR_ERRONEUSNICKNAME_MSG, Client_ID( Client ), ID );
737
738         /* ID bereits vergeben? */
739         c = My_Clients;
740         while( c )
741         {
742                 if( strcasecmp( c->id, ID ) == 0 )
743                 {
744                         /* die Server-ID gibt es bereits */
745                         sprintf( str, "ID \"%s\" already registered!", ID );
746                         Log( LOG_ERR, "%s (on connection %d)", str, Client->conn_id );
747                         Conn_Close( Client->conn_id, str, str, TRUE );
748                         return FALSE;
749                 }
750                 c = c->next;
751         }
752
753         return TRUE;
754 } /* Client_CheckID */
755
756
757 GLOBAL CLIENT *Client_Search( CHAR *ID )
758 {
759         /* Client suchen, auf den ID passt */
760
761         CLIENT *c;
762
763         assert( ID != NULL );
764
765         c = My_Clients;
766         while( c )
767         {
768                 if( strcasecmp( c->id, ID ) == 0 ) return c;
769                 c = c->next;
770         }
771         
772         return NULL;
773 } /* Client_Search */
774
775
776 GLOBAL CLIENT *Client_First( VOID )
777 {
778         /* Ersten Client liefern. */
779
780         return My_Clients;
781 } /* Client_First */
782
783
784 GLOBAL CLIENT *Client_Next( CLIENT *c )
785 {
786         /* Naechsten Client liefern. Existiert keiner,
787          * so wird NULL geliefert. */
788
789         assert( c != NULL );
790         return c->next;
791 } /* Client_Next */
792
793
794 GLOBAL INT Client_UserCount( VOID )
795 {
796         return Count( CLIENT_USER );
797 } /* Client_UserCount */
798
799
800 GLOBAL INT Client_ServiceCount( VOID )
801 {
802         return Count( CLIENT_SERVICE );;
803 } /* Client_ServiceCount */
804
805
806 GLOBAL INT Client_ServerCount( VOID )
807 {
808         return Count( CLIENT_SERVER );
809 } /* Client_ServerCount */
810
811
812 GLOBAL INT Client_MyUserCount( VOID )
813 {
814         return MyCount( CLIENT_USER );
815 } /* Client_MyUserCount */
816
817
818 GLOBAL INT Client_MyServiceCount( VOID )
819 {
820         return MyCount( CLIENT_SERVICE );
821 } /* Client_MyServiceCount */
822
823
824 GLOBAL INT Client_MyServerCount( VOID )
825 {
826         return MyCount( CLIENT_SERVER );
827 } /* Client_MyServerCount */
828
829
830 GLOBAL INT Client_OperCount( VOID )
831 {
832         CLIENT *c;
833         INT cnt;
834
835         cnt = 0;
836         c = My_Clients;
837         while( c )
838         {
839                 if( c && ( c->type == CLIENT_USER ) && ( strchr( c->modes, 'o' ))) cnt++;
840                 c = c->next;
841         }
842         return cnt;
843 } /* Client_OperCount */
844
845
846 GLOBAL INT Client_UnknownCount( VOID )
847 {
848         CLIENT *c;
849         INT cnt;
850
851         cnt = 0;
852         c = My_Clients;
853         while( c )
854         {
855                 if( c && ( c->type != CLIENT_USER ) && ( c->type != CLIENT_SERVICE ) && ( c->type != CLIENT_SERVER )) cnt++;
856                 c = c->next;
857         }
858         return cnt;
859 } /* Client_UnknownCount */
860
861
862 LOCAL INT Count( CLIENT_TYPE Type )
863 {
864         CLIENT *c;
865         INT cnt;
866
867         cnt = 0;
868         c = My_Clients;
869         while( c )
870         {
871                 if( c && ( c->type == Type )) cnt++;
872                 c = c->next;
873         }
874         return cnt;
875 } /* Count */
876
877
878 LOCAL INT MyCount( CLIENT_TYPE Type )
879 {
880         CLIENT *c;
881         INT cnt;
882
883         cnt = 0;
884         c = My_Clients;
885         while( c )
886         {
887                 if( c && ( c->introducer == This_Server ) && ( c->type == Type )) cnt++;
888                 c = c->next;
889         }
890         return cnt;
891 } /* MyCount */
892
893
894 LOCAL CLIENT *New_Client_Struct( VOID )
895 {
896         /* Neue CLIENT-Struktur pre-initialisieren */
897         
898         CLIENT *c;
899         
900         c = malloc( sizeof( CLIENT ));
901         if( ! c )
902         {
903                 Log( LOG_EMERG, "Can't allocate memory!" );
904                 return NULL;
905         }
906
907         c->next = NULL;
908         c->type = CLIENT_UNKNOWN;
909         c->conn_id = NONE;
910         c->introducer = NULL;
911         strcpy( c->id, "" );
912         strcpy( c->pwd, "" );
913         strcpy( c->host, "" );
914         strcpy( c->user, "" );
915         strcpy( c->info, "" );
916         strcpy( c->modes, "" );
917         c->oper_by_me = FALSE;
918         c->hops = -1;
919         c->token = -1;
920         c->mytoken = -1;
921
922         return c;
923 } /* New_Client */
924
925
926 LOCAL VOID Generate_MyToken( CLIENT *Client )
927 {
928         CLIENT *c;
929         INT token;
930
931         c = My_Clients;
932         token = 2;
933         while( c )
934         {
935                 if( c->mytoken == token )
936                 {
937                         /* Das Token wurde bereits vergeben */
938                         token++;
939                         c = My_Clients;
940                         continue;
941                 }
942                 else c = c->next;
943         }
944         Client->mytoken = token;
945         Log( LOG_DEBUG, "Assigned token %d to server \"%s\".", token, Client->id );
946 } /* Generate_MyToken */
947
948
949 /* -eof- */