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