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