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