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