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