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