src/ngircd/irc.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: irc.c,v 1.80 2002/02/27 20:33:13 alex Exp $
  13  *
  14  * irc.c: IRC-Befehle
  15  *
  16  * $Log: irc.c,v $
  17  * Revision 1.80  2002/02/27 20:33:13  alex
  18  * - Channel-Topics implementiert.
  19  *
  20  * Revision 1.79  2002/02/27 18:57:21  alex
  21  * - PRIVMSG zeugt nun bei Texten an User an, wenn diese "away" sind.
  22  *
  23  * Revision 1.78  2002/02/27 18:23:45  alex
  24  * - IRC-Befehl "AWAY" implementert.
  25  *
  26  * Revision 1.77  2002/02/27 17:05:41  alex
  27  * - PRIVMSG beachtet nun die Channel-Modes "n" und "m".
  28  *
  29  * Revision 1.76  2002/02/27 16:04:14  alex
  30  * - Bug bei belegtem Nickname bei User-Registrierung (NICK-Befehl) behoben.
  31  *
  32  * Revision 1.75  2002/02/27 15:23:27  alex
  33  * - NAMES beachtet nun das "invisible" Flag ("i") von Usern.
  34  *
  35  * Revision 1.74  2002/02/27 03:44:53  alex
  36  * - gerade eben in SQUIT eingefuehrten Bug behoben: entfernte Server werden nun
  37  *   nur noch geloescht, die Verbindung, von der SQUIT kam, bleibt wieder offen.
  38  *
  39  * Revision 1.73  2002/02/27 03:08:05  alex
  40  * - Log-Meldungen bei SQUIT erneut ueberarbeitet ...
  41  *
  42  * Revision 1.72  2002/02/27 02:26:58  alex
  43  * - SQUIT wird auf jeden Fall geforwarded, zudem besseres Logging.
  44  *
  45  * Revision 1.71  2002/02/27 00:50:05  alex
  46  * - einige unnoetige Client_NextHop()-Aufrufe entfernt.
  47  * - NAMES korrigiert und komplett implementiert.
  48  *
  49  * Revision 1.70  2002/02/26 22:06:40  alex
  50  * - Nick-Aenderungen werden nun wieder korrekt ins Logfile geschrieben.
  51  *
  52  * Revision 1.69  2002/02/26 20:52:40  alex
  53  * - VERSION wurde falsch weitergeleitet und beantwortet (Prefix nicht beachtet)
  54  *
  55  * Revision 1.68  2002/02/25 17:46:27  alex
  56  * - an User wird nun immer ein "komplettes" Prefix verschickt.
  57  *
  58  * Revision 1.67  2002/02/25 13:21:25  alex
  59  * - WHOIS wird nicht mehr automatisch an den "Original-Server" weiterge-
  60  *   leitet: war eh nicht RFC-konform und machte Probleme mit Clients.
  61  *
  62  * Revision 1.66  2002/02/23 21:39:48  alex
  63  * - IRC-Befehl KILL sowie Kills bei Nick Collsisions implementiert.
  64  *
  65  * Revision 1.65  2002/02/23 00:03:54  alex
  66  * - Ergebnistyp von Conn_GetIdle() und Conn_LastPing() auf "time_t" geaendert.
  67  *
  68  * Revision 1.64  2002/02/19 20:06:45  alex
  69  * - User-Registrierung wird nicht mehr als Nick-Aenderung protokolliert,
  70  * - VERSION liefert nun doch wieder den Debug-Status im Reply.
  71  *
  72  * Revision 1.63  2002/02/19 02:21:17  alex
  73  * - der Debug-Level wird bei VERSION nicht mehr geliefert. Grund: a) absolut
  74  *   unnoetig und b) Compiler-Fehler, wenn ohne Debug-Code configure'd ;-))
  75  *
  76  * Revision 1.62  2002/02/17 23:38:58  alex
  77  * - neuer IRC-Befehl VERSION implementiert: IRC_VERSION().
  78  *
  79  * Revision 1.61  2002/02/17 19:03:12  alex
  80  * - NICK-Aenderungen wurden dem User selber mit dem falschen Prefix geliefert.
  81  *
  82  * Revision 1.60  2002/02/17 17:43:14  alex
  83  * - Fehlerhafte Modes werden nun ausfuehrlicher an den Client gemeldet.
  84  *
  85  * Revision 1.59  2002/02/17 17:30:21  alex
  86  * - NICK-Aenderungen werden an alle Server und betroffene Clients gemeldet.
  87  * - Neue Funktion IRC_WriteStrRelatedPrefix().
  88  *
  89  * Revision 1.58  2002/02/17 17:18:59  alex
  90  * - NICK korrigiert.
  91  *
  92  * Revision 1.57  2002/02/13 23:05:29  alex
  93  * - Nach Connect eines Users werden LUSERS-Informationen angezeigt.
  94  *
  95  * Revision 1.56  2002/02/13 17:52:27  alex
  96  * - es werden nun Channel- und User-Modes von Usern angenommen.
  97  *
  98  * Revision 1.55  2002/02/12 14:40:37  alex
  99  * - via NJOIN gemeldete Benutzer wurden nicht in Channels bekannt gemacht.
 100  *
 101  * Revision 1.54  2002/02/11 23:33:35  alex
 102  * - weitere Anpassungen an Channel-Modes und Channel-User-Modes.
 103  *
 104  * Revision 1.53  2002/02/11 16:06:21  alex
 105  * - Die Quelle von MODE-Aenderungen wird nun korrekt weitergegeben.
 106  *
 107  * Revision 1.52  2002/02/11 15:52:21  alex
 108  * - PONG an den Server selber wurde faelschlicherweise versucht zu forwarden.
 109  * - Channel-Modes wurden falsch geliefert (als User-Modes).
 110  *
 111  * Revision 1.51  2002/02/11 15:15:53  alex
 112  * - PING und PONG werden nun auch korrekt an andere Server geforwarded.
 113  * - bei MODE-Meldungen wird der letzte Parameter nicht mehr mit ":" getrennt.
 114  *
 115  * Revision 1.50  2002/02/11 01:03:20  alex
 116  * - Aenderungen und Anpassungen an Channel-Modes und Channel-User-Modes:
 117  *   Modes werden besser geforwarded, lokale User, fuer die ein Channel
 118  *   angelegt wird, werden Channel-Operator, etc. pp. ...
 119  * - NJOIN's von Servern werden nun korrekt an andere Server weitergeleitet.
 120  *
 121  * Revision 1.49  2002/02/06 16:51:22  alex
 122  * - neue Funktion zur MODE-Behandlung, fuer Channel-Modes vorbereitet.
 123  *
 124  * Revision 1.48  2002/01/29 00:13:45  alex
 125  * - WHOIS zeigt nun auch die Channels an, in denen der jeweilige User Mitglied ist.
 126  * - zu jedem Server wird nun der "Top-Server" gespeichert, somit funktioniert
 127  *   LINKS wieder korrekt.
 128  *
 129  * Revision 1.47  2002/01/28 13:05:48  alex
 130  * - nach einem JOIN wird die Liste der Mitglieder an den Client geschickt.
 131  * - MODE fuer Channels wird nun komplett ignoriert (keine Fehlermeldung mehr).
 132  *
 133  * Revision 1.46  2002/01/28 01:45:43  alex
 134  * - SERVER-Meldungen an neue Server sind nun in der richtigen Reihenfolge.
 135  *
 136  * Revision 1.45  2002/01/28 01:18:14  alex
 137  * - connectierenden Servern werden Channels nun mit NJOIN bekannt gemacht.
 138  *
 139  * Revision 1.44  2002/01/28 00:55:08  alex
 140  * - ein neu connectierender Server wird nun korrekt im Netz bekannt gemacht.
 141  *
 142  * Revision 1.43  2002/01/27 21:56:39  alex
 143  * - IRC_WriteStrServersPrefixID() und IRC_WriteStrClientPrefixID() wieder entfernt.
 144  * - einige kleinere Fixes bezueglich Channels ...
 145  *
 146  * Revision 1.42  2002/01/27 18:28:01  alex
 147  * - bei NICK wurde das falsche Prefix an andere Server weitergegeben.
 148  *
 149  * Revision 1.41  2002/01/27 17:15:49  alex
 150  * - anderungen an den Funktions-Prototypen von IRC_WriteStrChannel() und
 151  *   IRC_WriteStrChannelPrefix(),
 152  * - neue: IRC_WriteStrClientPrefixID() und IRC_WriteStrServersPrefixID().
 153  *
 154  * Revision 1.40  2002/01/26 18:43:11  alex
 155  * - neue Funktionen IRC_WriteStrChannelPrefix() und IRC_WriteStrChannel(),
 156  *   die IRC_Write_xxx_Related() sind dafuer entfallen.
 157  * - IRC_PRIVMSG() kann nun auch mit Channels als Ziel umgehen.
 158  *
 159  * Revision 1.39  2002/01/21 00:05:11  alex
 160  * - neue Funktionen IRC_JOIN und IRC_PART begonnen, ebenso die Funktionen
 161  *   IRC_WriteStrRelatedPrefix und IRC_WriteStrRelatedChannelPrefix().
 162  * - diverse Aenderungen im Zusammenhang mit Channels.
 163  *
 164  * Revision 1.38  2002/01/18 15:31:32  alex
 165  * - die User-Modes bei einem NICK von einem Server wurden falsch uebernommen.
 166  *
 167  * Revision 1.37  2002/01/16 22:10:18  alex
 168  * - IRC_LUSERS() implementiert.
 169  *
 170  * Revision 1.36  2002/01/11 23:50:55  alex
 171  * - LINKS implementiert, LUSERS begonnen.
 172  *
 173  * Revision 1.35  2002/01/09 21:30:45  alex
 174  * - WHOIS wurde faelschlicherweise an User geforwarded statt vom Server beantwortet.
 175  *
 176  * Revision 1.34  2002/01/09 01:09:58  alex
 177  * - WHOIS wird im "Strict-RFC-Mode" nicht mehr automatisch geforwarded,
 178  * - andere Server werden nun ueber bisherige Server und User informiert.
 179  *
 180  * Revision 1.33  2002/01/07 23:42:12  alex
 181  * - Es werden fuer alle Server eigene Token generiert,
 182  * - QUIT von einem Server fuer einen User wird an andere Server geforwarded,
 183  * - ebenso NICK-Befehle, die "fremde" User einfuehren.
 184  *
 185  * Revision 1.32  2002/01/07 16:02:36  alex
 186  * - Loglevel von Remote-Mode-Aenderungen angepasst (nun Debug).
 187  * - Im Debug-Mode werden nun auch PING's protokolliert.
 188  *
 189  * Revision 1.31  2002/01/07 15:39:46  alex
 190  * - Server nimmt nun Server-Links an: PASS und SERVER entsprechend angepasst.
 191  * - MODE und NICK melden nun die Aenderungen an andere Server.
 192  *
 193  * Revision 1.30  2002/01/06 15:21:29  alex
 194  * - Loglevel und Meldungen nochmals ueberarbeitet.
 195  * - QUIT und SQUIT forwarden nun den Grund der Trennung,
 196  * - WHOIS wird nun immer an den "Original-Server" weitergeleitet.
 197  *
 198  * Revision 1.29  2002/01/05 23:24:54  alex
 199  * - WHOIS erweitert: Anfragen koennen an andere Server weitergeleitet werden.
 200  * - Vorbereitungen fuer Ident-Abfragen bei neuen Client-Strukturen.
 201  *
 202  * Revision 1.28  2002/01/05 20:08:02  alex
 203  * - Div. Aenderungen fuer die Server-Links (u.a. WHOIS, QUIT, NICK angepasst).
 204  * - Neue Funktionen IRC_WriteStrServer() und IRC_WriteStrServerPrefix().
 205  *
 206  * Revision 1.27  2002/01/05 19:15:03  alex
 207  * - Fehlerpruefung bei select() in der "Hauptschleife" korrigiert.
 208  *
 209  * Revision 1.26  2002/01/05 16:51:18  alex
 210  * - das Passwort von Servern wird nun ueberprueft (PASS- und SERVER-Befehl).
 211  *
 212  * Revision 1.25  2002/01/05 00:48:33  alex
 213  * - bei SQUIT wurde immer die Verbindung getrennt, auch bei Remote-Servern.
 214  *
 215  * Revision 1.24  2002/01/04 17:58:44  alex
 216  * - IRC_WriteStrXXX()-Funktionen eingefuehrt, groessere Anpassungen daran.
 217  * - neuer Befehl SQUIT, QUIT an Server-Links angepasst.
 218  *
 219  * Revision 1.23  2002/01/04 01:36:40  alex
 220  * - Loglevel ein wenig angepasst.
 221  *
 222  * Revision 1.22  2002/01/04 01:21:47  alex
 223  * - Client-Strukruren werden nur noch ueber Funktionen angesprochen.
 224  * - Weitere Anpassungen und Erweiterungen der Server-Links.
 225  *
 226  * Revision 1.21  2002/01/03 02:26:51  alex
 227  * - neue Befehle SERVER und NJOIN begonnen,
 228  * - begonnen, diverse IRC-Befehle an Server-Links anzupassen.
 229  *
 230  * Revision 1.20  2002/01/02 12:46:41  alex
 231  * - die Gross- und Kleinschreibung des Nicks kann mit NICK nun geaendert werden.
 232  *
 233  * Revision 1.19  2002/01/02 02:51:39  alex
 234  * - Copyright-Texte angepasst.
 235  * - neuer Befehl "ERROR".
 236  *
 237  * Revision 1.17  2001/12/31 15:33:13  alex
 238  * - neuer Befehl NAMES, kleinere Bugfixes.
 239  * - Bug bei PING behoben: war zu restriktiv implementiert :-)
 240  *
 241  * Revision 1.16  2001/12/31 02:18:51  alex
 242  * - viele neue Befehle (WHOIS, ISON, OPER, DIE, RESTART),
 243  * - neuen Header "defines.h" mit (fast) allen Konstanten.
 244  * - Code Cleanups und viele "kleine" Aenderungen & Bugfixes.
 245  *
 246  * Revision 1.15  2001/12/30 19:26:11  alex
 247  * - Unterstuetzung fuer die Konfigurationsdatei eingebaut.
 248  *
 249  * Revision 1.14  2001/12/30 11:42:00  alex
 250  * - der Server meldet nun eine ordentliche "Start-Zeit".
 251  *
 252  * Revision 1.13  2001/12/29 03:10:06  alex
 253  * - Neue Funktion IRC_MODE() implementiert, div. Aenderungen.
 254  * - neue configure-Optione "--enable-strict-rfc".
 255  *
 256  * Revision 1.12  2001/12/27 19:17:26  alex
 257  * - neue Befehle PRIVMSG, NOTICE, PING.
 258  *
 259  * Revision 1.11  2001/12/27 16:55:41  alex
 260  * - neu: IRC_WriteStrRelated(), Aenderungen auch in IRC_WriteStrClient().
 261  *
 262  * Revision 1.10  2001/12/26 22:48:53  alex
 263  * - MOTD-Datei ist nun konfigurierbar und wird gelesen.
 264  *
 265  * Revision 1.9  2001/12/26 14:45:37  alex
 266  * - "Code Cleanups".
 267  *
 268  * Revision 1.8  2001/12/26 03:21:46  alex
 269  * - PING/PONG-Befehle implementiert,
 270  * - Meldungen ueberarbeitet: enthalten nun (fast) immer den Nick.
 271  *
 272  * Revision 1.7  2001/12/25 23:25:18  alex
 273  * - und nochmal Aenderungen am Logging ;-)
 274  *
 275  * Revision 1.6  2001/12/25 23:13:33  alex
 276  * - Debug-Meldungen angepasst.
 277  *
 278  * Revision 1.5  2001/12/25 22:02:42  alex
 279  * - neuer IRC-Befehl "/QUIT". Verbessertes Logging & Debug-Ausgaben.
 280  *
 281  * Revision 1.4  2001/12/25 19:19:30  alex
 282  * - bessere Fehler-Abfragen, diverse Bugfixes.
 283  * - Nicks werden nur einmal vergeben :-)
 284  * - /MOTD wird unterstuetzt.
 285  *
 286  * Revision 1.3  2001/12/24 01:34:06  alex
 287  * - USER und NICK wird nun in beliebiger Reihenfolge akzeptiert (wg. BitchX)
 288  * - MOTD-Ausgabe begonnen zu implementieren.
 289  *
 290  * Revision 1.2  2001/12/23 21:57:16  alex
 291  * - erste IRC-Befehle zu implementieren begonnen.
 292  *
 293  * Revision 1.1  2001/12/14 08:13:43  alex
 294  * - neues Modul begonnen :-)
 295  */
 296
 297
 298 #include <portab.h>
 299 #include "global.h"
 300
 301 #include <imp.h>
 302 #include <assert.h>
 303 #include <errno.h>
 304 #include <stdarg.h>
 305 #include <stdio.h>
 306 #include <stdlib.h>
 307 #include <string.h>
 308
 309 #include "ngircd.h"
 310 #include "channel.h"
 311 #include "client.h"
 312 #include "conf.h"
 313 #include "conn.h"
 314 #include "log.h"
 315 #include "messages.h"
 316 #include "parse.h"
 317 #include "tool.h"
 318
 319 #include <exp.h>
 320 #include "irc.h"
 321
 322
 323 #define CONNECTED TRUE
 324 #define DISCONNECTED FALSE
 325
 326
 327 LOCAL BOOLEAN Hello_User( CLIENT *Client );
 328 LOCAL BOOLEAN Show_MOTD( CLIENT *Client );
 329
 330 LOCAL VOID Kill_Nick( CHAR *Nick, CHAR *Reason );
 331
 332 LOCAL BOOLEAN Send_NAMES( CLIENT *Client, CHANNEL *Chan );
 333 LOCAL BOOLEAN Send_LUSERS( CLIENT *Client );
 334
 335 CHAR *Get_Prefix( CLIENT *Target, CLIENT *Client );
 336
 337
 338 GLOBAL VOID IRC_Init( VOID )
 339 {
 340 } /* IRC_Init */
 341
 342
 343 GLOBAL VOID IRC_Exit( VOID )
 344 {
 345 } /* IRC_Exit */
 346
 347
 348 GLOBAL BOOLEAN IRC_WriteStrClient( CLIENT *Client, CHAR *Format, ... )
 349 {
 350         CHAR buffer[1000];
 351         BOOLEAN ok = CONNECTED;
 352         va_list ap;
 353
 354         assert( Client != NULL );
 355         assert( Format != NULL );
 356
 357         va_start( ap, Format );
 358         vsnprintf( buffer, 1000, Format, ap );
 359         va_end( ap );
 360
 361         /* an den Client selber */
 362         ok = IRC_WriteStrClientPrefix( Client, Client_ThisServer( ), buffer );
 363
 364         return ok;
 365 } /* IRC_WriteStrClient */
 366
 367
 368 GLOBAL BOOLEAN IRC_WriteStrClientPrefix( CLIENT *Client, CLIENT *Prefix, CHAR *Format, ... )
 369 {
 370         /* Text an Clients, lokal bzw. remote, senden. */
 371
 372         CHAR buffer[1000];
 373         va_list ap;
 374
 375         assert( Client != NULL );
 376         assert( Format != NULL );
 377         assert( Prefix != NULL );
 378
 379         va_start( ap, Format );
 380         vsnprintf( buffer, 1000, Format, ap );
 381         va_end( ap );
 382
 383         return Conn_WriteStr( Client_Conn( Client_NextHop( Client )), ":%s %s", Get_Prefix( Client_NextHop( Client ), Prefix ), buffer );
 384 } /* IRC_WriteStrClientPrefix */
 385
 386
 387 GLOBAL BOOLEAN IRC_WriteStrChannel( CLIENT *Client, CHANNEL *Chan, BOOLEAN Remote, CHAR *Format, ... )
 388 {
 389         CHAR buffer[1000];
 390         va_list ap;
 391
 392         assert( Client != NULL );
 393         assert( Format != NULL );
 394
 395         va_start( ap, Format );
 396         vsnprintf( buffer, 1000, Format, ap );
 397         va_end( ap );
 398
 399         return IRC_WriteStrChannelPrefix( Client, Chan, Client_ThisServer( ), Remote, buffer );
 400 } /* IRC_WriteStrChannel */
 401
 402
 403 GLOBAL BOOLEAN IRC_WriteStrChannelPrefix( CLIENT *Client, CHANNEL *Chan, CLIENT *Prefix, BOOLEAN Remote, CHAR *Format, ... )
 404 {
 405         BOOLEAN sock[MAX_CONNECTIONS], is_server[MAX_CONNECTIONS], ok = CONNECTED;
 406         CHAR buffer[1000];
 407         CL2CHAN *cl2chan;
 408         CLIENT *c;
 409         INT s, i;
 410         va_list ap;
 411
 412         assert( Client != NULL );
 413         assert( Chan != NULL );
 414         assert( Prefix != NULL );
 415         assert( Format != NULL );
 416
 417         va_start( ap, Format );
 418         vsnprintf( buffer, 1000, Format, ap );
 419         va_end( ap );
 420
 421         for( i = 0; i < MAX_CONNECTIONS; i++ ) sock[i] = FALSE;
 422
 423         /* An alle Clients, die in den selben Channels sind.
 424          * Dabei aber nur einmal je Remote-Server */
 425         cl2chan = Channel_FirstMember( Chan );
 426         while( cl2chan )
 427         {
 428                 c = Channel_GetClient( cl2chan );
 429                 if( ! Remote )
 430                 {
 431                         if( Client_Conn( c ) <= NONE ) c = NULL;
 432                         else if( Client_Type( c ) == CLIENT_SERVER ) c = NULL;
 433                 }
 434                 if( c ) c = Client_NextHop( c );
 435
 436                 if( c && ( c != Client ))
 437                 {
 438                         /* Ok, anderer Client */
 439                         s = Client_Conn( c );
 440                         assert( s >= 0 );
 441                         assert( s < MAX_CONNECTIONS );
 442                         sock[s] = TRUE;
 443                         if( Client_Type( c ) == CLIENT_SERVER ) is_server[s] = TRUE;
 444                         else is_server[s] = FALSE;
 445                 }
 446                 cl2chan = Channel_NextMember( Chan, cl2chan );
 447         }
 448
 449         /* Senden ... */
 450         for( i = 0; i < MAX_CONNECTIONS; i++ )
 451         {
 452                 if( sock[i] )
 453                 {
 454                         if( is_server[i] ) ok = Conn_WriteStr( i, ":%s %s", Client_ID( Prefix ), buffer );
 455                         else ok = Conn_WriteStr( i, ":%s %s", Client_Mask( Prefix ), buffer );
 456                         if( ! ok ) break;
 457                 }
 458         }
 459         return ok;
 460 } /* IRC_WriteStrChannelPrefix */
 461
 462
 463 GLOBAL VOID IRC_WriteStrServers( CLIENT *ExceptOf, CHAR *Format, ... )
 464 {
 465         CHAR buffer[1000];
 466         va_list ap;
 467
 468         assert( Format != NULL );
 469
 470         va_start( ap, Format );
 471         vsnprintf( buffer, 1000, Format, ap );
 472         va_end( ap );
 473
 474         /* an den Client selber */
 475         return IRC_WriteStrServersPrefix( ExceptOf, Client_ThisServer( ), buffer );
 476 } /* IRC_WriteStrServers */
 477
 478
 479 GLOBAL VOID IRC_WriteStrServersPrefix( CLIENT *ExceptOf, CLIENT *Prefix, CHAR *Format, ... )
 480 {
 481         CHAR buffer[1000];
 482         CLIENT *c;
 483         va_list ap;
 484
 485         assert( Format != NULL );
 486         assert( Prefix != NULL );
 487
 488         va_start( ap, Format );
 489         vsnprintf( buffer, 1000, Format, ap );
 490         va_end( ap );
 491
 492         c = Client_First( );
 493         while( c )
 494         {
 495                 if(( Client_Type( c ) == CLIENT_SERVER ) && ( Client_Conn( c ) > NONE ) && ( c != Client_ThisServer( )) && ( c != ExceptOf ))
 496                 {
 497                         /* Ziel-Server gefunden */
 498                         IRC_WriteStrClientPrefix( c, Prefix, buffer );
 499                 }
 500                 c = Client_Next( c );
 501         }
 502 } /* IRC_WriteStrServersPrefix */
 503
 504
 505 GLOBAL BOOLEAN IRC_WriteStrRelatedPrefix( CLIENT *Client, CLIENT *Prefix, BOOLEAN Remote, CHAR *Format, ... )
 506 {
 507         BOOLEAN sock[MAX_CONNECTIONS], is_server[MAX_CONNECTIONS], ok = CONNECTED;
 508         CL2CHAN *chan_cl2chan, *cl2chan;
 509         CHAR buffer[1000];
 510         CHANNEL *chan;
 511         va_list ap;
 512         CLIENT *c;
 513         INT i, s;
 514
 515         assert( Client != NULL );
 516         assert( Prefix != NULL );
 517         assert( Format != NULL );
 518
 519         va_start( ap, Format );
 520         vsnprintf( buffer, 1000, Format, ap );
 521         va_end( ap );
 522
 523         /* initialisieren */
 524         for( i = 0; i < MAX_CONNECTIONS; i++ ) sock[i] = FALSE;
 525
 526         /* An alle Clients, die in einem Channel mit dem "Ausloeser" sind,
 527          * den Text schicken. An Remote-Server aber jeweils nur einmal. */
 528         chan_cl2chan = Channel_FirstChannelOf( Client );
 529         while( chan_cl2chan )
 530         {
 531                 /* Channel des Users durchsuchen */
 532                 chan = Channel_GetChannel( chan_cl2chan );
 533                 cl2chan = Channel_FirstMember( chan );
 534                 while( cl2chan )
 535                 {
 536                         c = Channel_GetClient( cl2chan );
 537                         if( ! Remote )
 538                         {
 539                                 if( Client_Conn( c ) <= NONE ) c = NULL;
 540                                 else if( Client_Type( c ) == CLIENT_SERVER ) c = NULL;
 541                         }
 542                         if( c ) c = Client_NextHop( c );
 543
 544                         if( c && ( c != Client ))
 545                         {
 546                                 /* Ok, anderer Client */
 547                                 s = Client_Conn( c );
 548                                 assert( s >= 0 );
 549                                 assert( s < MAX_CONNECTIONS );
 550                                 sock[s] = TRUE;
 551                                 if( Client_Type( c ) == CLIENT_SERVER ) is_server[s] = TRUE;
 552                                 else is_server[s] = FALSE;
 553                         }
 554                         cl2chan = Channel_NextMember( chan, cl2chan );
 555                 }
 556
 557                 /* naechsten Channel */
 558                 chan_cl2chan = Channel_NextChannelOf( Client, chan_cl2chan );
 559         }
 560
 561         /* Senden ... */
 562         for( i = 0; i < MAX_CONNECTIONS; i++ )
 563         {
 564                 if( sock[i] )
 565                 {
 566                         if( is_server[i] ) ok = Conn_WriteStr( i, ":%s %s", Client_ID( Prefix ), buffer );
 567                         else ok = Conn_WriteStr( i, ":%s %s", Client_Mask( Prefix ), buffer );
 568                         if( ! ok ) break;
 569                 }
 570         }
 571         return ok;
 572 } /* IRC_WriteStrRelatedPrefix */
 573
 574
 575
 576 GLOBAL BOOLEAN IRC_PASS( CLIENT *Client, REQUEST *Req )
 577 {
 578         assert( Client != NULL );
 579         assert( Req != NULL );
 580
 581         /* Fehler liefern, wenn kein lokaler Client */
 582         if( Client_Conn( Client ) <= NONE ) return IRC_WriteStrClient( Client, ERR_UNKNOWNCOMMAND_MSG, Client_ID( Client ), Req->command );
 583
 584         if(( Client_Type( Client ) == CLIENT_UNKNOWN ) && ( Req->argc == 1))
 585         {
 586                 /* noch nicht registrierte unbekannte Verbindung */
 587                 Log( LOG_DEBUG, "Connection %d: got PASS command ...", Client_Conn( Client ));
 588
 589                 /* Passwort speichern */
 590                 Client_SetPassword( Client, Req->argv[0] );
 591
 592                 Client_SetType( Client, CLIENT_GOTPASS );
 593                 return CONNECTED;
 594         }
 595         else if((( Client_Type( Client ) == CLIENT_UNKNOWN ) || ( Client_Type( Client ) == CLIENT_UNKNOWNSERVER )) && (( Req->argc == 3 ) || ( Req->argc == 4 )))
 596         {
 597                 /* noch nicht registrierte Server-Verbindung */
 598                 Log( LOG_DEBUG, "Connection %d: got PASS command (new server link) ...", Client_Conn( Client ));
 599
 600                 /* Passwort speichern */
 601                 Client_SetPassword( Client, Req->argv[0] );
 602
 603                 Client_SetType( Client, CLIENT_GOTPASSSERVER );
 604                 return CONNECTED;
 605         }
 606         else if(( Client_Type( Client ) == CLIENT_UNKNOWN  ) || ( Client_Type( Client ) == CLIENT_UNKNOWNSERVER ))
 607         {
 608                 /* Falsche Anzahl Parameter? */
 609                 return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 610         }
 611         else return IRC_WriteStrClient( Client, ERR_ALREADYREGISTRED_MSG, Client_ID( Client ));
 612 } /* IRC_PASS */
 613
 614
 615 GLOBAL BOOLEAN IRC_SERVER( CLIENT *Client, REQUEST *Req )
 616 {
 617         CHAR str[LINE_LEN], *ptr;
 618         CLIENT *from, *c, *cl;
 619         CL2CHAN *cl2chan;
 620         INT max_hops, i;
 621         CHANNEL *chan;
 622         BOOLEAN ok;
 623
 624         assert( Client != NULL );
 625         assert( Req != NULL );
 626
 627         /* Fehler liefern, wenn kein lokaler Client */
 628         if( Client_Conn( Client ) <= NONE ) return IRC_WriteStrClient( Client, ERR_UNKNOWNCOMMAND_MSG, Client_ID( Client ), Req->command );
 629
 630         if( Client_Type( Client ) == CLIENT_GOTPASSSERVER )
 631         {
 632                 /* Verbindung soll als Server-Server-Verbindung registriert werden */
 633                 Log( LOG_DEBUG, "Connection %d: got SERVER command (new server link) ...", Client_Conn( Client ));
 634
 635                 /* Falsche Anzahl Parameter? */
 636                 if(( Req->argc != 2 ) && ( Req->argc != 3 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 637
 638                 /* Ist dieser Server bei uns konfiguriert? */
 639                 for( i = 0; i < Conf_Server_Count; i++ ) if( strcasecmp( Req->argv[0], Conf_Server[i].name ) == 0 ) break;
 640                 if( i >= Conf_Server_Count )
 641                 {
 642                         /* Server ist nicht konfiguriert! */
 643                         Log( LOG_ERR, "Connection %d: Server \"%s\" not configured here!", Client_Conn( Client ), Req->argv[0] );
 644                         Conn_Close( Client_Conn( Client ), NULL, "Server not configured here", TRUE );
 645                         return DISCONNECTED;
 646                 }
 647                 if( strcmp( Client_Password( Client ), Conf_Server[i].pwd ) != 0 )
 648                 {
 649                         /* Falsches Passwort */
 650                         Log( LOG_ERR, "Connection %d: Bad password for server \"%s\"!", Client_Conn( Client ), Req->argv[0] );
 651                         Conn_Close( Client_Conn( Client ), NULL, "Bad password", TRUE );
 652                         return DISCONNECTED;
 653                 }
 654
 655                 /* Ist ein Server mit dieser ID bereits registriert? */
 656                 if( ! Client_CheckID( Client, Req->argv[0] )) return DISCONNECTED;
 657
 658                 /* Server-Strukturen fuellen ;-) */
 659                 Client_SetID( Client, Req->argv[0] );
 660                 Client_SetHops( Client, 1 );
 661                 Client_SetInfo( Client, Req->argv[Req->argc - 1] );
 662
 663                 /* Meldet sich der Server bei uns an? */
 664                 if( Req->argc == 2 )
 665                 {
 666                         /* Unseren SERVER- und PASS-Befehl senden */
 667                         ok = TRUE;
 668                         if( ! IRC_WriteStrClient( Client, "PASS %s "PASSSERVERADD, Conf_Server[i].pwd )) ok = FALSE;
 669                         else ok = IRC_WriteStrClient( Client, "SERVER %s 1 :%s", Conf_ServerName, Conf_ServerInfo );
 670                         if( ! ok )
 671                         {
 672                                 Conn_Close( Client_Conn( Client ), "Unexpected server behavior!", NULL, FALSE );
 673                                 return DISCONNECTED;
 674                         }
 675                         Client_SetIntroducer( Client, Client );
 676                         Client_SetToken( Client, 1 );
 677                 }
 678                 else  Client_SetToken( Client, atoi( Req->argv[1] ));
 679
 680                 Log( LOG_NOTICE, "Server \"%s\" registered (connection %d, 1 hop - direct link).", Client_ID( Client ), Client_Conn( Client ));
 681
 682                 Client_SetType( Client, CLIENT_SERVER );
 683
 684                 /* maximalen Hop Count ermitteln */
 685                 max_hops = 0;
 686                 c = Client_First( );
 687                 while( c )
 688                 {
 689                         if( Client_Hops( c ) > max_hops ) max_hops = Client_Hops( c );
 690                         c = Client_Next( c );
 691                 }
 692
 693                 /* Alle bisherigen Server dem neuen Server bekannt machen,
 694                  * die bisherigen Server ueber den neuen informierenn */
 695                 for( i = 0; i < ( max_hops + 1 ); i++ )
 696                 {
 697                         c = Client_First( );
 698                         while( c )
 699                         {
 700                                 if(( Client_Type( c ) == CLIENT_SERVER ) && ( c != Client ) && ( c != Client_ThisServer( )) && ( Client_Hops( c ) == i ))
 701                                 {
 702                                         if( Client_Conn( c ) > NONE )
 703                                         {
 704                                                 /* Dem gefundenen Server gleich den neuen
 705                                                  * Server bekannt machen */
 706                                                 if( ! IRC_WriteStrClient( c, "SERVER %s %d %d :%s", Client_ID( Client ), Client_Hops( Client ) + 1, Client_MyToken( Client ), Client_Info( Client ))) return DISCONNECTED;
 707                                         }
 708
 709                                         /* Den neuen Server ueber den alten informieren */
 710                                         if( ! IRC_WriteStrClientPrefix( Client, Client_Hops( c ) == 1 ? Client_ThisServer( ) : Client_Introducer( c ), "SERVER %s %d %d :%s", Client_ID( c ), Client_Hops( c ) + 1, Client_MyToken( c ), Client_Info( c ))) return DISCONNECTED;
 711                                 }
 712                                 c = Client_Next( c );
 713                         }
 714                 }
 715
 716                 /* alle User dem neuen Server bekannt machen */
 717                 c = Client_First( );
 718                 while( c )
 719                 {
 720                         if( Client_Type( c ) == CLIENT_USER )
 721                         {
 722                                 /* User an neuen Server melden */
 723                                 if( ! IRC_WriteStrClient( Client, "NICK %s %d %s %s %d +%s :%s", Client_ID( c ), Client_Hops( c ) + 1, Client_User( c ), Client_Hostname( c ), Client_MyToken( Client_Introducer( c )), Client_Modes( c ), Client_Info( c ))) return DISCONNECTED;
 724                         }
 725                         c = Client_Next( c );
 726                 }
 727
 728                 /* Channels dem neuen Server bekannt machen */
 729                 chan = Channel_First( );
 730                 while( chan )
 731                 {
 732                         sprintf( str, "NJOIN %s :", Channel_Name( chan ));
 733
 734                         /* alle Member suchen */
 735                         cl2chan = Channel_FirstMember( chan );
 736                         while( cl2chan )
 737                         {
 738                                 cl = Channel_GetClient( cl2chan );
 739                                 assert( cl != NULL );
 740
 741                                 /* Nick, ggf. mit Modes, anhaengen */
 742                                 if( str[strlen( str ) - 1] != ':' ) strcat( str, "," );
 743                                 if( strchr( Channel_UserModes( chan, cl ), 'v' )) strcat( str, "+" );
 744                                 if( strchr( Channel_UserModes( chan, cl ), 'o' )) strcat( str, "@" );
 745                                 strcat( str, Client_ID( cl ));
 746
 747                                 if( strlen( str ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
 748                                 {
 749                                         /* Zeile senden */
 750                                         if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
 751                                         sprintf( str, "NJOIN %s :", Channel_Name( chan ));
 752                                 }
 753
 754                                 cl2chan = Channel_NextMember( chan, cl2chan );
 755                         }
 756
 757                         /* noch Daten da? */
 758                         if( str[strlen( str ) - 1] != ':')
 759                         {
 760                                 /* Ja; Also senden ... */
 761                                 if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
 762                         }
 763
 764                         /* naechsten Channel suchen */
 765                         chan = Channel_Next( chan );
 766                 }
 767
 768                 return CONNECTED;
 769         }
 770         else if( Client_Type( Client ) == CLIENT_SERVER )
 771         {
 772                 /* Neuer Server wird im Netz angekuendigt */
 773
 774                 /* Falsche Anzahl Parameter? */
 775                 if( Req->argc != 4 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 776
 777                 /* Ist ein Server mit dieser ID bereits registriert? */
 778                 if( ! Client_CheckID( Client, Req->argv[0] )) return DISCONNECTED;
 779
 780                 /* Ueberfluessige Hostnamen aus Info-Text entfernen */
 781                 ptr = strchr( Req->argv[3] + 2, '[' );
 782                 if( ! ptr ) ptr = Req->argv[3];
 783
 784                 from = Client_GetFromID( Req->prefix );
 785                 if( ! from )
 786                 {
 787                         /* Hm, Server, der diesen einfuehrt, ist nicht bekannt!? */
 788                         Log( LOG_ALERT, "Unknown ID in prefix of SERVER: \"%s\"! (on connection %d)", Req->prefix, Client_Conn( Client ));
 789                         Conn_Close( Client_Conn( Client ), NULL, "Unknown ID in prefix of SERVER", TRUE );
 790                         return DISCONNECTED;
 791                 }
 792
 793                 /* Neue Client-Struktur anlegen */
 794                 c = Client_NewRemoteServer( Client, Req->argv[0], from, atoi( Req->argv[1] ), atoi( Req->argv[2] ), ptr, TRUE );
 795                 if( ! c )
 796                 {
 797                         /* Neue Client-Struktur konnte nicht angelegt werden */
 798                         Log( LOG_ALERT, "Can't create client structure for server! (on connection %d)", Client_Conn( Client ));
 799                         Conn_Close( Client_Conn( Client ), NULL, "Can't allocate client structure for remote server", TRUE );
 800                         return DISCONNECTED;
 801                 }
 802
 803                 /* Log-Meldung zusammenbauen und ausgeben */
 804                 if(( Client_Hops( c ) > 1 ) && ( Req->prefix[0] )) sprintf( str, "connected to %s, ", Client_ID( from ));
 805                 else strcpy( str, "" );
 806                 Log( LOG_NOTICE, "Server \"%s\" registered (via %s, %s%d hop%s).", Client_ID( c ), Client_ID( Client ), str, Client_Hops( c ), Client_Hops( c ) > 1 ? "s": "" );
 807
 808                 /* Andere Server informieren */
 809                 IRC_WriteStrServersPrefix( Client, from, "SERVER %s %d %d :%s", Client_ID( c ), Client_Hops( c ) + 1, Client_MyToken( c ), Client_Info( c ));
 810
 811                 return CONNECTED;
 812         }
 813         else return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 814 } /* IRC_SERVER */
 815
 816
 817 GLOBAL BOOLEAN IRC_NJOIN( CLIENT *Client, REQUEST *Req )
 818 {
 819         CHAR *channame, *ptr, modes[8];
 820         BOOLEAN is_op, is_voiced;
 821         CHANNEL *chan;
 822         CLIENT *c;
 823
 824         assert( Client != NULL );
 825         assert( Req != NULL );
 826
 827         if( Client_Type( Client ) != CLIENT_SERVER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTEREDSERVER_MSG, Client_ID( Client ));
 828
 829         /* Falsche Anzahl Parameter? */
 830         if( Req->argc != 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 831
 832         channame = Req->argv[0];
 833         ptr = strtok( Req->argv[1], "," );
 834         while( ptr )
 835         {
 836                 is_op = is_voiced = FALSE;
 837
 838                 /* Prefixe abschneiden */
 839                 while(( *ptr == '@' ) || ( *ptr == '+' ))
 840                 {
 841                         if( *ptr == '@' ) is_op = TRUE;
 842                         if( *ptr == '+' ) is_voiced = TRUE;
 843                         ptr++;
 844                 }
 845
 846                 c = Client_GetFromID( ptr );
 847                 if( c )
 848                 {
 849                         Channel_Join( c, channame );
 850                         chan = Channel_Search( channame );
 851                         assert( chan != NULL );
 852
 853                         if( is_op ) Channel_UserModeAdd( chan, c, 'o' );
 854                         if( is_voiced ) Channel_UserModeAdd( chan, c, 'v' );
 855
 856                         /* im Channel bekannt machen */
 857                         IRC_WriteStrChannelPrefix( Client, chan, c, FALSE, "JOIN :%s", channame );
 858
 859                         /* Channel-User-Modes setzen */
 860                         strcpy( modes, Channel_UserModes( chan, c ));
 861                         if( modes[0] )
 862                         {
 863                                 /* Modes im Channel bekannt machen */
 864                                 IRC_WriteStrChannelPrefix( Client, chan, Client, FALSE, "MODE %s +%s %s", channame, modes, Client_ID( c ));
 865                         }
 866                 }
 867                 else Log( LOG_ERR, "Got NJOIN for unknown nick \"%s\" for channel \"%s\"!", ptr, channame );
 868
 869                 /* naechsten Nick suchen */
 870                 ptr = strtok( NULL, "," );
 871         }
 872
 873         /* an andere Server weiterleiten */
 874         IRC_WriteStrServersPrefix( Client, Client_ThisServer( ), "NJOIN %s :%s", Req->argv[0], Req->argv[1] );
 875
 876         return CONNECTED;
 877 } /* IRC_NJOIN */
 878
 879
 880 GLOBAL BOOLEAN IRC_NICK( CLIENT *Client, REQUEST *Req )
 881 {
 882         CLIENT *intr_c, *target, *c;
 883         CHAR *modes;
 884
 885         assert( Client != NULL );
 886         assert( Req != NULL );
 887
 888         /* Zumindest BitchX sendet NICK-USER in der falschen Reihenfolge. */
 889 #ifndef STRICT_RFC
 890         if( Client_Type( Client ) == CLIENT_UNKNOWN || Client_Type( Client ) == CLIENT_GOTPASS || Client_Type( Client ) == CLIENT_GOTNICK || Client_Type( Client ) == CLIENT_GOTUSER || Client_Type( Client ) == CLIENT_USER || ( Client_Type( Client ) == CLIENT_SERVER && Req->argc == 1 ))
 891 #else
 892         if( Client_Type( Client ) == CLIENT_UNKNOWN || Client_Type( Client ) == CLIENT_GOTPASS || Client_Type( Client ) == CLIENT_GOTNICK || Client_Type( Client ) == CLIENT_USER || ( Client_Type( Client ) == CLIENT_SERVER && Req->argc == 1 ))
 893 #endif
 894         {
 895                 /* User-Registrierung bzw. Nick-Aenderung */
 896
 897                 /* Falsche Anzahl Parameter? */
 898                 if( Req->argc != 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 899
 900                 /* "Ziel-Client" ermitteln */
 901                 if( Client_Type( Client ) == CLIENT_SERVER )
 902                 {
 903                         target = Client_GetFromID( Req->prefix );
 904                         if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[0] );
 905                 }
 906                 else
 907                 {
 908                         /* Ist der Client "restricted"? */
 909                         if( Client_HasMode( Client, 'r' )) return IRC_WriteStrClient( Client, ERR_RESTRICTED_MSG, Client_ID( Client ));
 910                         target = Client;
 911                 }
 912
 913 #ifndef STRICT_RFC
 914                 /* Wenn der Client zu seinem eigenen Nick wechseln will, so machen
 915                  * wir nichts. So macht es das Original und mind. Snak hat probleme,
 916                  * wenn wir es nicht so machen. Ob es so okay ist? Hm ... */
 917                 if( strcmp( Client_ID( target ), Req->argv[0] ) == 0 ) return CONNECTED;
 918 #endif
 919
 920                 /* pruefen, ob Nick bereits vergeben. Speziallfall: der Client
 921                  * will nur die Gross- und Kleinschreibung aendern. Das darf
 922                  * er natuerlich machen :-) */
 923                 if( strcasecmp( Client_ID( target ), Req->argv[0] ) != 0 )
 924                 {
 925                         if( ! Client_CheckNick( target, Req->argv[0] )) return CONNECTED;
 926                 }
 927
 928                 /* Nick-Aenderung: allen mitteilen! */
 929
 930                 if( Client_Type( Client ) == CLIENT_USER ) IRC_WriteStrClientPrefix( Client, Client, "NICK :%s", Req->argv[0] );
 931                 IRC_WriteStrServersPrefix( Client, target, "NICK :%s", Req->argv[0] );
 932                 IRC_WriteStrRelatedPrefix( target, target, FALSE, "NICK :%s", Req->argv[0] );
 933
 934                 if(( Client_Type( target ) != CLIENT_USER ) && ( Client_Type( target ) != CLIENT_SERVER ))
 935                 {
 936                         /* Neuer Client */
 937                         Log( LOG_DEBUG, "Connection %d: got valid NICK command ...", Client_Conn( Client ));
 938
 939                         /* Client-Nick registrieren */
 940                         Client_SetID( target, Req->argv[0] );
 941
 942                         /* schon ein USER da? Dann registrieren! */
 943                         if( Client_Type( Client ) == CLIENT_GOTUSER ) return Hello_User( Client );
 944                         else Client_SetType( Client, CLIENT_GOTNICK );
 945                 }
 946                 else
 947                 {
 948                         /* Nick-Aenderung */
 949                         Log( LOG_INFO, "User \"%s\" changed nick: \"%s\" -> \"%s\".", Client_Mask( target ), Client_ID( target ), Req->argv[0] );
 950
 951                         /* neuen Client-Nick speichern */
 952                         Client_SetID( target, Req->argv[0] );
 953                 }
 954
 955                 return CONNECTED;
 956         }
 957         else if( Client_Type( Client ) == CLIENT_SERVER )
 958         {
 959                 /* Server fuehrt neuen Client ein */
 960
 961                 /* Falsche Anzahl Parameter? */
 962                 if( Req->argc != 7 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
 963
 964                 /* Nick ueberpruefen */
 965                 c = Client_GetFromID( Req->argv[0] );
 966                 if( c )
 967                 {
 968                         /* Der neue Nick ist auf diesem Server bereits registriert:
 969                          * sowohl der neue, als auch der alte Client muessen nun
 970                          * disconnectiert werden. */
 971                         Log( LOG_ERR, "Server %s introduces already registered nick \"%s\"!", Client_ID( Client ), Req->argv[0] );
 972                         Kill_Nick( Req->argv[0], "Nick collision" );
 973                         return CONNECTED;
 974                 }
 975
 976                 /* Server, zu dem der Client connectiert ist, suchen */
 977                 intr_c = Client_GetFromToken( Client, atoi( Req->argv[4] ));
 978                 if( ! intr_c )
 979                 {
 980                         Log( LOG_ERR, "Server %s introduces nick \"%s\" on unknown server!?", Client_ID( Client ), Req->argv[0] );
 981                         Kill_Nick( Req->argv[0], "Unknown server" );
 982                         return CONNECTED;
 983                 }
 984
 985                 /* Neue Client-Struktur anlegen */
 986                 c = Client_NewRemoteUser( intr_c, Req->argv[0], atoi( Req->argv[1] ), Req->argv[2], Req->argv[3], atoi( Req->argv[4] ), Req->argv[5] + 1, Req->argv[6], TRUE );
 987                 if( ! c )
 988                 {
 989                         /* Eine neue Client-Struktur konnte nicht angelegt werden.
 990                          * Der Client muss disconnectiert werden, damit der Netz-
 991                          * status konsistent bleibt. */
 992                         Log( LOG_ALERT, "Can't create client structure! (on connection %d)", Client_Conn( Client ));
 993                         Kill_Nick( Req->argv[0], "Server error" );
 994                         return CONNECTED;
 995                 }
 996
 997                 modes = Client_Modes( c );
 998                 if( *modes ) Log( LOG_DEBUG, "User \"%s\" (+%s) registered (via %s, on %s, %d hop%s).", Client_Mask( c ), modes, Client_ID( Client ), Client_ID( intr_c ), Client_Hops( c ), Client_Hops( c ) > 1 ? "s": "" );
 999                 else Log( LOG_DEBUG, "User \"%s\" registered (via %s, on %s, %d hop%s).", Client_Mask( c ), Client_ID( Client ), Client_ID( intr_c ), Client_Hops( c ), Client_Hops( c ) > 1 ? "s": "" );
1000
1001                 /* Andere Server, ausser dem Introducer, informieren */
1002                 IRC_WriteStrServersPrefix( Client, Client, "NICK %s %d %s %s %d %s :%s", Req->argv[0], atoi( Req->argv[1] ) + 1, Req->argv[2], Req->argv[3], Client_MyToken( intr_c ), Req->argv[5], Req->argv[6] );
1003
1004                 return CONNECTED;
1005         }
1006         else return IRC_WriteStrClient( Client, ERR_ALREADYREGISTRED_MSG, Client_ID( Client ));
1007 } /* IRC_NICK */
1008
1009
1010 GLOBAL BOOLEAN IRC_USER( CLIENT *Client, REQUEST *Req )
1011 {
1012         assert( Client != NULL );
1013         assert( Req != NULL );
1014
1015 #ifndef STRICT_RFC
1016         if( Client_Type( Client ) == CLIENT_GOTNICK || Client_Type( Client ) == CLIENT_GOTPASS || Client_Type( Client ) == CLIENT_UNKNOWN )
1017 #else
1018         if( Client_Type( Client ) == CLIENT_GOTNICK || Client_Type( Client ) == CLIENT_GOTPASS )
1019 #endif
1020         {
1021                 /* Falsche Anzahl Parameter? */
1022                 if( Req->argc != 4 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1023
1024                 Client_SetUser( Client, Req->argv[0], FALSE );
1025                 Client_SetInfo( Client, Req->argv[3] );
1026
1027                 Log( LOG_DEBUG, "Connection %d: got valid USER command ...", Client_Conn( Client ));
1028                 if( Client_Type( Client ) == CLIENT_GOTNICK ) return Hello_User( Client );
1029                 else Client_SetType( Client, CLIENT_GOTUSER );
1030                 return CONNECTED;
1031         }
1032         else if( Client_Type( Client ) == CLIENT_USER || Client_Type( Client ) == CLIENT_SERVER || Client_Type( Client ) == CLIENT_SERVICE )
1033         {
1034                 return IRC_WriteStrClient( Client, ERR_ALREADYREGISTRED_MSG, Client_ID( Client ));
1035         }
1036         else return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1037 } /* IRC_USER */
1038
1039
1040 GLOBAL BOOLEAN IRC_QUIT( CLIENT *Client, REQUEST *Req )
1041 {
1042         CLIENT *target;
1043
1044         assert( Client != NULL );
1045         assert( Req != NULL );
1046
1047         if(( Client_Type( Client ) == CLIENT_USER ) || ( Client_Type( Client ) == CLIENT_SERVICE ))
1048         {
1049                 /* User / Service */
1050
1051                 /* Falsche Anzahl Parameter? */
1052                 if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1053
1054                 if( Req->argc == 0 ) Conn_Close( Client_Conn( Client ), "Got QUIT command.", NULL, TRUE );
1055                 else Conn_Close( Client_Conn( Client ), "Got QUIT command.", Req->argv[0], TRUE );
1056
1057                 return DISCONNECTED;
1058         }
1059         else if ( Client_Type( Client ) == CLIENT_SERVER )
1060         {
1061                 /* Server */
1062
1063                 /* Falsche Anzahl Parameter? */
1064                 if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1065
1066                 target = Client_Search( Req->prefix );
1067                 if( ! target )
1068                 {
1069                         Log( LOG_ERR, "Got QUIT from %s for unknown client!?", Client_ID( Client ));
1070                         return CONNECTED;
1071                 }
1072
1073                 if( Req->argc == 0 ) Client_Destroy( target, "Got QUIT command.", NULL );
1074                 else Client_Destroy( target, "Got QUIT command.", Req->argv[0] );
1075
1076                 return CONNECTED;
1077         }
1078         else return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1079 } /* IRC_QUIT */
1080
1081
1082 GLOBAL BOOLEAN IRC_SQUIT( CLIENT *Client, REQUEST *Req )
1083 {
1084         CLIENT *target;
1085         CHAR msg[LINE_LEN + 64];
1086
1087         assert( Client != NULL );
1088         assert( Req != NULL );
1089
1090         /* SQUIT ist nur fuer Server erlaubt */
1091         if( Client_Type( Client ) != CLIENT_SERVER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1092
1093         /* Falsche Anzahl Parameter? */
1094         if( Req->argc != 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1095
1096         Log( LOG_DEBUG, "Got SQUIT from %s for \"%s\": \"%s\" ...", Client_ID( Client ), Req->argv[0], Req->argv[1] );
1097
1098         /* SQUIT an alle Server weiterleiten */
1099         IRC_WriteStrServers( Client, "SQUIT %s :%s", Req->argv[0], Req->argv[1] );
1100
1101         target = Client_GetFromID( Req->argv[0] );
1102         if( ! target )
1103         {
1104                 Log( LOG_ERR, "Got SQUIT from %s for unknown server \"%s\"!?", Client_ID( Client ), Req->argv[0] );
1105                 return CONNECTED;
1106         }
1107
1108         if( Req->argv[1][0] )
1109         {
1110                 if( strlen( Req->argv[1] ) > LINE_LEN ) Req->argv[1][LINE_LEN] = '\0';
1111                 sprintf( msg, "%s (SQUIT from %s).", Req->argv[1], Client_ID( Client ));
1112         }
1113         else sprintf( msg, "Got SQUIT from %s.", Client_ID( Client ));
1114
1115         if( Client_Conn( target ) > NONE )
1116         {
1117                 /* dieser Server hat die Connection */
1118                 if( Req->argv[1][0] ) Conn_Close( Client_Conn( target ), msg, Req->argv[1], TRUE );
1119                 else Conn_Close( Client_Conn( target ), msg, NULL, TRUE );
1120                 return DISCONNECTED;
1121         }
1122         else
1123         {
1124                 /* Verbindung hielt anderer Server */
1125                 Client_Destroy( target, msg, Req->argv[1] );
1126                 return CONNECTED;
1127         }
1128 } /* IRC_SQUIT */
1129
1130
1131 GLOBAL BOOLEAN IRC_PING( CLIENT *Client, REQUEST *Req )
1132 {
1133         CLIENT *target, *from;
1134
1135         assert( Client != NULL );
1136         assert( Req != NULL );
1137
1138         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1139
1140         /* Falsche Anzahl Parameter? */
1141         if( Req->argc < 1 ) return IRC_WriteStrClient( Client, ERR_NOORIGIN_MSG, Client_ID( Client ));
1142         if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1143
1144         if( Req->argc == 2 )
1145         {
1146                 /* es wurde ein Ziel-Client angegeben */
1147                 target = Client_GetFromID( Req->argv[1] );
1148                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
1149                 if( target != Client_ThisServer( ))
1150                 {
1151                         /* ok, forwarden */
1152                         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
1153                         else from = Client;
1154                         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
1155                         return IRC_WriteStrClientPrefix( target, from, "PING %s :%s", Client_ID( from ), Req->argv[1] );
1156                 }
1157         }
1158
1159         Log( LOG_DEBUG, "Connection %d: got PING, sending PONG ...", Client_Conn( Client ));
1160         return IRC_WriteStrClient( Client, "PONG %s :%s", Client_ID( Client_ThisServer( )), Client_ID( Client ));
1161 } /* IRC_PING */
1162
1163
1164 GLOBAL BOOLEAN IRC_PONG( CLIENT *Client, REQUEST *Req )
1165 {
1166         CLIENT *target, *from;
1167
1168         assert( Client != NULL );
1169         assert( Req != NULL );
1170
1171         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1172
1173         /* Falsche Anzahl Parameter? */
1174         if( Req->argc < 1 ) return IRC_WriteStrClient( Client, ERR_NOORIGIN_MSG, Client_ID( Client ));
1175         if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1176
1177         /* forwarden? */
1178         if( Req->argc == 2 )
1179         {
1180                 target = Client_GetFromID( Req->argv[1] );
1181                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
1182                 if( target != Client_ThisServer( ))
1183                 {
1184                         /* ok, forwarden */
1185                         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
1186                         else from = Client;
1187                         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
1188                         return IRC_WriteStrClientPrefix( target, from, "PONG %s :%s", Client_ID( from ), Req->argv[1] );
1189                 }
1190         }
1191
1192         /* Der Connection-Timestamp wurde schon beim Lesen aus dem Socket
1193          * aktualisiert, daher muss das hier nicht mehr gemacht werden. */
1194
1195         if( Client_Conn( Client ) > NONE ) Log( LOG_DEBUG, "Connection %d: received PONG. Lag: %ld seconds.", Client_Conn( Client ), time( NULL ) - Conn_LastPing( Client_Conn( Client )));
1196         else Log( LOG_DEBUG, "Connection %d: received PONG.", Client_Conn( Client ));
1197
1198         return CONNECTED;
1199 } /* IRC_PONG */
1200
1201
1202 GLOBAL BOOLEAN IRC_MOTD( CLIENT *Client, REQUEST *Req )
1203 {
1204         assert( Client != NULL );
1205         assert( Req != NULL );
1206
1207         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1208
1209         /* Falsche Anzahl Parameter? */
1210         if( Req->argc != 0 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1211
1212         return Show_MOTD( Client );
1213 } /* IRC_MOTD */
1214
1215
1216 GLOBAL BOOLEAN IRC_PRIVMSG( CLIENT *Client, REQUEST *Req )
1217 {
1218         BOOLEAN is_member, has_voice, is_op, ok;
1219         CLIENT *cl, *from;
1220         CHANNEL *chan;
1221
1222         assert( Client != NULL );
1223         assert( Req != NULL );
1224
1225         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1226
1227         /* Falsche Anzahl Parameter? */
1228         if( Req->argc == 0 ) return IRC_WriteStrClient( Client, ERR_NORECIPIENT_MSG, Client_ID( Client ), Req->command );
1229         if( Req->argc == 1 ) return IRC_WriteStrClient( Client, ERR_NOTEXTTOSEND_MSG, Client_ID( Client ));
1230         if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1231
1232         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
1233         else from = Client;
1234         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
1235
1236         cl = Client_Search( Req->argv[0] );
1237         if( cl )
1238         {
1239                 /* Okay, Ziel ist ein User */
1240                 if(( Client_Type( Client ) != CLIENT_SERVER ) && ( strchr( Client_Modes( cl ), 'a' )))
1241                 {
1242                         /* Ziel-User ist AWAY: Meldung verschicken */
1243                         if( ! IRC_WriteStrClient( from, RPL_AWAY_MSG, Client_ID( from ), Client_ID( cl ), Client_Away( cl ))) return DISCONNECTED;
1244                 }
1245
1246                 /* Text senden */
1247                 if( Client_Conn( from ) > NONE ) Conn_UpdateIdle( Client_Conn( from ));
1248                 return IRC_WriteStrClientPrefix( cl, from, "PRIVMSG %s :%s", Client_ID( cl ), Req->argv[1] );
1249         }
1250
1251         chan = Channel_Search( Req->argv[0] );
1252         if( chan )
1253         {
1254                 /* Okay, Ziel ist ein Channel */
1255                 is_member = has_voice = is_op = FALSE;
1256                 if( Channel_IsMemberOf( chan, from ))
1257                 {
1258                         is_member = TRUE;
1259                         if( strchr( Channel_UserModes( chan, from ), 'v' )) has_voice = TRUE;
1260                         if( strchr( Channel_UserModes( chan, from ), 'o' )) is_op = TRUE;
1261                 }
1262
1263                 /* pruefen, ob Client in Channel schreiben darf */
1264                 ok = TRUE;
1265                 if( strchr( Channel_Modes( chan ), 'n' ) && ( ! is_member )) ok = FALSE;
1266                 if( strchr( Channel_Modes( chan ), 'm' ) && ( ! is_op ) && ( ! has_voice )) ok = FALSE;
1267
1268                 if( ! ok ) return IRC_WriteStrClient( from, ERR_CANNOTSENDTOCHAN_MSG, Client_ID( from ), Req->argv[0] );
1269
1270                 /* Text senden */
1271                 if( Client_Conn( from ) > NONE ) Conn_UpdateIdle( Client_Conn( from ));
1272                 return IRC_WriteStrChannelPrefix( Client, chan, from, TRUE, "PRIVMSG %s :%s", Req->argv[0], Req->argv[1] );
1273         }
1274
1275         return IRC_WriteStrClient( from, ERR_NOSUCHNICK_MSG, Client_ID( from ), Req->argv[0] );
1276 } /* IRC_PRIVMSG */
1277
1278
1279 GLOBAL BOOLEAN IRC_NOTICE( CLIENT *Client, REQUEST *Req )
1280 {
1281         CLIENT *to, *from;
1282
1283         assert( Client != NULL );
1284         assert( Req != NULL );
1285
1286         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1287
1288         /* Falsche Anzahl Parameter? */
1289         if( Req->argc != 2 ) return CONNECTED;
1290
1291         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
1292         else from = Client;
1293         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
1294
1295         to = Client_Search( Req->argv[0] );
1296         if( to )
1297         {
1298                 /* Okay, Ziel ist ein User */
1299                 return IRC_WriteStrClientPrefix( to, from, "NOTICE %s :%s", Client_ID( to ), Req->argv[1] );
1300         }
1301         else return CONNECTED;
1302 } /* IRC_NOTICE */
1303
1304
1305 GLOBAL BOOLEAN IRC_MODE( CLIENT *Client, REQUEST *Req )
1306 {
1307         CHAR *mode_ptr, the_modes[CLIENT_MODE_LEN], x[2];
1308         CLIENT *cl, *chan_cl, *prefix;
1309         BOOLEAN set, ok;
1310         CHANNEL *chan;
1311
1312         assert( Client != NULL );
1313         assert( Req != NULL );
1314
1315         cl = chan_cl = prefix = NULL;
1316         chan = NULL;
1317
1318         /* Valider Client? */
1319         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1320
1321         /* Keine Parameter? */
1322         if( Req->argc < 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1323
1324         /* Ziel suchen: Client bzw. Channel */
1325         if( Client_IsValidNick( Req->argv[0] )) cl = Client_Search( Req->argv[0] );
1326         if( Channel_IsValidName( Req->argv[0] )) chan = Channel_Search( Req->argv[0] );
1327
1328         /* Kein Ziel gefunden? */
1329         if(( ! cl ) && ( ! chan )) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[0] );
1330
1331         assert(( cl && chan ) != TRUE );
1332
1333         /* Falsche Anzahl Parameter? */
1334         if(( cl ) && ( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1335         if(( chan ) && ( Req->argc > 3 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1336
1337         /* Client ermitteln, wenn bei Channel-Modes mit 3 Parametern */
1338         if(( chan ) && (Req->argc == 3 ))
1339         {
1340                 chan_cl = Client_Search( Req->argv[2] );
1341                 if( ! chan_cl ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[0] );
1342         }
1343
1344         /* Wenn Anfragender ein User ist: Zugriff erlaubt? */
1345         if( Client_Type( Client ) == CLIENT_USER )
1346         {
1347                 if( cl )
1348                 {
1349                         /* MODE ist nur fuer sich selber zulaessig! */
1350                         if( cl != Client ) return IRC_WriteStrClient( Client, ERR_USERSDONTMATCH_MSG, Client_ID( Client ));
1351                 }
1352                 if( chan )
1353                 {
1354                         /* Darf der User die Channel-Modes ermitteln? */
1355                 }
1356         }
1357
1358         /* Werden die Modes "nur" erfragt? */
1359         if(( cl ) && ( Req->argc == 1 )) return IRC_WriteStrClient( Client, RPL_UMODEIS_MSG, Client_ID( Client ), Client_Modes( cl ));
1360         if(( chan ) && ( Req->argc == 1 )) return IRC_WriteStrClient( Client, RPL_CHANNELMODEIS_MSG, Client_ID( Client ), Channel_Name( chan ), Channel_Modes( chan ));
1361
1362         mode_ptr = Req->argv[1];
1363
1364         /* Sollen Modes gesetzt oder geloescht werden? */
1365         if( cl )
1366         {
1367                 if( *mode_ptr == '+' ) set = TRUE;
1368                 else if( *mode_ptr == '-' ) set = FALSE;
1369                 else return IRC_WriteStrClient( Client, ERR_UMODEUNKNOWNFLAG_MSG, Client_ID( Client ));
1370                 mode_ptr++;
1371         }
1372         else
1373         {
1374                 if( *mode_ptr == '-' ) set = FALSE;
1375                 else set = TRUE;
1376                 if(( *mode_ptr == '-' ) || ( *mode_ptr == '+' )) mode_ptr++;
1377         }
1378
1379         /* Prefix fuer Antworten etc. ermitteln */
1380         if( Client_Type( Client ) == CLIENT_SERVER )
1381         {
1382                 prefix = Client_GetFromID( Req->prefix );
1383                 if( ! prefix ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
1384         }
1385         else prefix = Client;
1386
1387         /* Reply-String mit Aenderungen vorbereiten */
1388         if( set ) strcpy( the_modes, "+" );
1389         else strcpy( the_modes, "-" );
1390
1391         ok = TRUE;
1392         x[1] = '\0';
1393         while( *mode_ptr )
1394         {
1395                 x[0] = '\0';
1396                 if( Client_Type( Client ) == CLIENT_SERVER )
1397                 {
1398                         /* Befehl kommt von einem Server, daher
1399                          * trauen wir ihm "unbesehen" ... */
1400                         x[0] = *mode_ptr;
1401
1402                         if(( cl ) && ( x[0] == 'a' ))
1403                         {
1404                                 /* away */
1405                                 if( set ) Client_SetAway( cl, "Away" );
1406                                 else Client_SetAway( cl, NULL );
1407                         }
1408
1409                 }
1410                 else
1411                 {
1412                         /* Modes validieren */
1413                         if( cl )
1414                         {
1415                                 /* User-Modes */
1416                                 switch( *mode_ptr )
1417                                 {
1418                                         case 'i':
1419                                                 /* invisible */
1420                                                 x[0] = 'i';
1421                                                 break;
1422                                         case 'r':
1423                                                 /* restricted (kann nur gesetzt werden) */
1424                                                 if( set ) x[0] = 'r';
1425                                                 else ok = IRC_WriteStrClient( Client, ERR_RESTRICTED_MSG, Client_ID( Client ));
1426                                                 break;
1427                                         case 'o':
1428                                                 /* operator (kann nur geloescht werden) */
1429                                                 if( ! set )
1430                                                 {
1431                                                         Client_SetOperByMe( Client, FALSE );
1432                                                         x[0] = 'o';
1433                                                 }
1434                                                 else ok = IRC_WriteStrClient( Client, ERR_UMODEUNKNOWNFLAG_MSG, Client_ID( Client ));
1435                                                 break;
1436                                         default:
1437                                                 Log( LOG_DEBUG, "Unknown mode \"%c%c\" from \"%s\"!?", set ? '+' : '-', *mode_ptr, Client_ID( Client ));
1438                                                 ok = IRC_WriteStrClient( Client, ERR_UMODEUNKNOWNFLAG2_MSG, Client_ID( Client ), set ? '+' : '-', *mode_ptr );
1439                                                 x[0] = '\0';
1440                                 }
1441                         }
1442                         if( chan )
1443                         {
1444                                 /* Ist der User ein Channel Operator? */
1445                                 if( ! strchr( Channel_UserModes( chan, Client ), 'o' ))
1446                                 {
1447                                         Log( LOG_DEBUG, "Can't change modes: \"%s\" is not operator on %s!", Client_ID( Client ), Channel_Name( chan ));
1448                                         ok = IRC_WriteStrClient( Client, ERR_CHANOPRIVSNEEDED_MSG, Client_ID( Client ), Channel_Name( chan ));
1449                                         break;
1450                                 }
1451
1452                                 /* Channel-Modes oder Channel-User-Modes */
1453                                 if( chan_cl )
1454                                 {
1455                                         /* Channel-User-Modes */
1456                                         switch( *mode_ptr )
1457                                         {
1458                                                 case 'o':
1459                                                         /* Channel Operator */
1460                                                         x[0] = 'o';
1461                                                         break;
1462                                                 case 'v':
1463                                                         /* Voice */
1464                                                         x[0] = 'v';
1465                                                         break;
1466                                                 default:
1467                                                         Log( LOG_DEBUG, "Unknown channel-user-mode \"%c%c\" from \"%s\" on \"%s\" at %s!?", set ? '+' : '-', *mode_ptr, Client_ID( Client ), Client_ID( chan_cl ), Channel_Name( chan ));
1468                                                         ok = IRC_WriteStrClient( Client, ERR_UMODEUNKNOWNFLAG2_MSG, Client_ID( Client ), set ? '+' : '-', *mode_ptr );
1469                                                         x[0] = '\0';
1470                                         }
1471                                 }
1472                                 else
1473                                 {
1474                                         /* Channel-Modes */
1475                                         switch( *mode_ptr )
1476                                         {
1477                                                 case 'a':
1478                                                         /* Anonymous */
1479                                                         x[0] = 'a';
1480                                                         break;
1481                                                 case 'm':
1482                                                         /* Moderated */
1483                                                         x[0] = 'm';
1484                                                         break;
1485                                                 case 'n':
1486                                                         /* kein Schreiben in den Channel von aussen */
1487                                                         x[0] = 'n';
1488                                                         break;
1489                                                 case 'p':
1490                                                         /* Private */
1491                                                         x[0] = 'p';
1492                                                         break;
1493                                                 case 'q':
1494                                                         /* Quiet */
1495                                                         x[0] = 'q';
1496                                                         break;
1497                                                 case 's':
1498                                                         /* Secret */
1499                                                         x[0] = 's';
1500                                                         break;
1501                                                 case 't':
1502                                                         /* Topic Lock */
1503                                                         x[0] = 't';
1504                                                         break;
1505                                                 default:
1506                                                         Log( LOG_DEBUG, "Unknown channel-mode \"%c%c\" from \"%s\" at %s!?", set ? '+' : '-', *mode_ptr, Client_ID( Client ), Channel_Name( chan ));
1507                                                         ok = IRC_WriteStrClient( Client, ERR_UMODEUNKNOWNFLAG2_MSG, Client_ID( Client ), set ? '+' : '-', *mode_ptr );
1508                                                         x[0] = '\0';
1509                                         }
1510                                 }
1511                         }
1512                 }
1513                 if( ! ok ) break;
1514
1515                 mode_ptr++;
1516                 if( ! x[0] ) continue;
1517
1518                 /* Okay, gueltigen Mode gefunden */
1519                 if( cl )
1520                 {
1521                         /* Es geht um User-Modes */
1522                         if( set )
1523                         {
1524                                 /* Mode setzen. Wenn der Client ihn noch nicht hatte: merken */
1525                                 if( Client_ModeAdd( cl, x[0] )) strcat( the_modes, x );
1526                         }
1527                         else
1528                         {
1529                                 /* Modes geloescht. Wenn der Client ihn hatte: merken */
1530                                 if( Client_ModeDel( cl, x[0] )) strcat( the_modes, x );
1531                         }
1532                 }
1533                 if( chan )
1534                 {
1535                         /* Es geht um Channel-Modes oder Channel-User-Modes */
1536                         if( chan_cl )
1537                         {
1538                                 /* Channel-User-Modes */
1539                                 if( set )
1540                                 {
1541                                         /* Mode setzen. Wenn der Channel ihn noch nicht hatte: merken */
1542                                         if( Channel_UserModeAdd( chan, chan_cl, x[0] )) strcat( the_modes, x );
1543                                 }
1544                                 else
1545                                 {
1546                                         /* Mode setzen. Wenn der Channel ihn noch nicht hatte: merken */
1547                                         if( Channel_UserModeDel( chan, chan_cl, x[0] )) strcat( the_modes, x );
1548                                 }
1549                         }
1550                         else
1551                         {
1552                                 /* Channel-Mode */
1553                                 if( set )
1554                                 {
1555                                         /* Mode setzen. Wenn der Channel ihn noch nicht hatte: merken */
1556                                         if( Channel_ModeAdd( chan, x[0] )) strcat( the_modes, x );
1557                                 }
1558                                 else
1559                                 {
1560                                         /* Mode setzen. Wenn der Channel ihn noch nicht hatte: merken */
1561                                         if( Channel_ModeDel( chan, x[0] )) strcat( the_modes, x );
1562                                 }
1563                         }
1564                 }
1565         }
1566
1567         /* Wurden Modes geaendert? */
1568         if( the_modes[1] )
1569         {
1570                 if( cl )
1571                 {
1572                         /* Client-Mode */
1573                         if( Client_Type( Client ) == CLIENT_SERVER )
1574                         {
1575                                 /* Modes an andere Server forwarden */
1576                                 IRC_WriteStrServersPrefix( Client, prefix, "MODE %s :%s", Client_ID( cl ), the_modes );
1577                         }
1578                         else
1579                         {
1580                                 /* Bestaetigung an Client schicken & andere Server informieren */
1581                                 ok = IRC_WriteStrClientPrefix( Client, prefix, "MODE %s %s", Client_ID( cl ), the_modes );
1582                                 IRC_WriteStrServersPrefix( Client, prefix, "MODE %s :%s", Client_ID( cl ), the_modes );
1583                         }
1584                         Log( LOG_DEBUG, "User \"%s\": Mode change, now \"%s\".", Client_Mask( cl ), Client_Modes( cl ));
1585                 }
1586                 if( chan )
1587                 {
1588                         /* Channel-Modes oder Channel-User-Mode */
1589                         if( chan_cl )
1590                         {
1591                                 /* Channel-User-Mode */
1592                                 if( Client_Type( Client ) == CLIENT_SERVER )
1593                                 {
1594                                         /* Modes an andere Server und Channel-User forwarden */
1595                                         IRC_WriteStrServersPrefix( Client, prefix, "MODE %s %s :%s", Channel_Name( chan ), the_modes, Client_ID( chan_cl));
1596                                         IRC_WriteStrChannelPrefix( Client, chan, prefix, FALSE, "MODE %s %s %s", Channel_Name( chan ), the_modes, Client_ID( chan_cl));
1597                                 }
1598                                 else
1599                                 {
1600                                         /* Bestaetigung an Client schicken & andere Server sowie Channel-User informieren */
1601                                         ok = IRC_WriteStrClientPrefix( Client, prefix, "MODE %s %s %s", Channel_Name( chan ), the_modes, Client_ID( chan_cl));
1602                                         IRC_WriteStrServersPrefix( Client, prefix, "MODE %s %s :%s", Channel_Name( chan ), the_modes, Client_ID( chan_cl));
1603                                         IRC_WriteStrChannelPrefix( Client, chan, prefix, FALSE, "MODE %s %s %s", Channel_Name( chan ), the_modes, Client_ID( chan_cl));
1604                                 }
1605                                 Log( LOG_DEBUG, "User \"%s\" on %s: Mode change, now \"%s\".", Client_Mask( chan_cl), Channel_Name( chan ), Channel_UserModes( chan, chan_cl ));
1606                         }
1607                         else
1608                         {
1609                                 /* Channel-Mode */
1610                                 if( Client_Type( Client ) == CLIENT_SERVER )
1611                                 {
1612                                         /* Modes an andere Server und Channel-User forwarden */
1613                                         IRC_WriteStrServersPrefix( Client, prefix, "MODE %s :%s", Channel_Name( chan ), the_modes );
1614                                         IRC_WriteStrChannelPrefix( Client, chan, prefix, FALSE, "MODE %s %s", Channel_Name( chan ), the_modes );
1615                                 }
1616                                 else
1617                                 {
1618                                         /* Bestaetigung an Client schicken & andere Server sowie Channel-User informieren */
1619                                         ok = IRC_WriteStrClientPrefix( Client, prefix, "MODE %s %s", Channel_Name( chan ), the_modes );
1620                                         IRC_WriteStrServersPrefix( Client, prefix, "MODE %s :%s", Channel_Name( chan ), the_modes );
1621                                         IRC_WriteStrChannelPrefix( Client, chan, prefix, FALSE, "MODE %s %s", Channel_Name( chan ), the_modes );
1622                                 }
1623                                 Log( LOG_DEBUG, "Channel \"%s\": Mode change, now \"%s\".", Channel_Name( chan ), Channel_Modes( chan ));
1624                         }
1625                 }
1626         }
1627
1628         return ok;
1629 } /* IRC_MODE */
1630
1631
1632 GLOBAL BOOLEAN IRC_AWAY( CLIENT *Client, REQUEST *Req )
1633 {
1634         assert( Client != NULL );
1635         assert( Req != NULL );
1636
1637         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1638
1639         /* Falsche Anzahl Parameter? */
1640         if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1641
1642         if(( Req->argc == 1 ) && (Req->argv[0][0] ))
1643         {
1644                 /* AWAY setzen */
1645                 Client_SetAway( Client, Req->argv[0] );
1646                 IRC_WriteStrServersPrefix( Client, Client, "MODE %s :+a", Client_ID( Client ));
1647                 return IRC_WriteStrClient( Client, RPL_NOWAWAY_MSG, Client_ID( Client ));
1648         }
1649         else
1650         {
1651                 /* AWAY loeschen */
1652                 Client_SetAway( Client, NULL );
1653                 IRC_WriteStrServersPrefix( Client, Client, "MODE %s :-a", Client_ID( Client ));
1654                 return IRC_WriteStrClient( Client, RPL_UNAWAY_MSG, Client_ID( Client ));
1655         }
1656 } /* IRC_AWAY */
1657
1658
1659 GLOBAL BOOLEAN IRC_OPER( CLIENT *Client, REQUEST *Req )
1660 {
1661         INT i;
1662
1663         assert( Client != NULL );
1664         assert( Req != NULL );
1665
1666         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1667
1668         /* Falsche Anzahl Parameter? */
1669         if( Req->argc != 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1670
1671         /* Operator suchen */
1672         for( i = 0; i < Conf_Oper_Count; i++)
1673         {
1674                 if( Conf_Oper[i].name[0] && Conf_Oper[i].pwd[0] && ( strcmp( Conf_Oper[i].name, Req->argv[0] ) == 0 )) break;
1675         }
1676         if( i >= Conf_Oper_Count )
1677         {
1678                 Log( LOG_WARNING, "Got invalid OPER from \"%s\": Name \"%s\" not configured!", Client_Mask( Client ), Req->argv[0] );
1679                 return IRC_WriteStrClient( Client, ERR_PASSWDMISMATCH_MSG, Client_ID( Client ));
1680         }
1681
1682         /* Stimmt das Passwort? */
1683         if( strcmp( Conf_Oper[i].pwd, Req->argv[1] ) != 0 )
1684         {
1685                 Log( LOG_WARNING, "Got invalid OPER from \"%s\": Bad password for \"%s\"!", Client_Mask( Client ), Conf_Oper[i].name );
1686                 return IRC_WriteStrClient( Client, ERR_PASSWDMISMATCH_MSG, Client_ID( Client ));
1687         }
1688
1689         if( ! Client_HasMode( Client, 'o' ))
1690         {
1691                 /* noch kein o-Mode gesetzt */
1692                 Client_ModeAdd( Client, 'o' );
1693                 if( ! IRC_WriteStrClient( Client, "MODE %s :+o", Client_ID( Client ))) return DISCONNECTED;
1694                 IRC_WriteStrServersPrefix( NULL, Client, "MODE %s :+o", Client_ID( Client ));
1695         }
1696
1697         if( ! Client_OperByMe( Client )) Log( LOG_NOTICE, "Got valid OPER from \"%s\", user is an IRC operator now.", Client_Mask( Client ));
1698
1699         Client_SetOperByMe( Client, TRUE );
1700         return IRC_WriteStrClient( Client, RPL_YOUREOPER_MSG, Client_ID( Client ));
1701 } /* IRC_OPER */
1702
1703
1704 GLOBAL BOOLEAN IRC_DIE( CLIENT *Client, REQUEST *Req )
1705 {
1706         assert( Client != NULL );
1707         assert( Req != NULL );
1708
1709         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1710
1711         /* Falsche Anzahl Parameter? */
1712         if( Req->argc != 0 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1713
1714         if(( ! Client_HasMode( Client, 'o' )) || ( ! Client_OperByMe( Client ))) return IRC_WriteStrClient( Client, ERR_NOPRIVILEGES_MSG, Client_ID( Client ));
1715
1716         Log( LOG_NOTICE, "Got DIE command from \"%s\", going down!", Client_Mask( Client ));
1717         NGIRCd_Quit = TRUE;
1718         return CONNECTED;
1719 } /* IRC_DIE */
1720
1721
1722 GLOBAL BOOLEAN IRC_RESTART( CLIENT *Client, REQUEST *Req )
1723 {
1724         assert( Client != NULL );
1725         assert( Req != NULL );
1726
1727         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1728
1729         /* Falsche Anzahl Parameter? */
1730         if( Req->argc != 0 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1731
1732         if(( ! Client_HasMode( Client, 'o' )) || ( ! Client_OperByMe( Client ))) return IRC_WriteStrClient( Client, ERR_NOPRIVILEGES_MSG, Client_ID( Client ));
1733
1734         Log( LOG_NOTICE, "Got RESTART command from \"%s\", going down!", Client_Mask( Client ));
1735         NGIRCd_Restart = TRUE;
1736         return CONNECTED;
1737 } /* IRC_RESTART */
1738
1739
1740 GLOBAL BOOLEAN IRC_NAMES( CLIENT *Client, REQUEST *Req )
1741 {
1742         CHAR rpl[COMMAND_LEN], *ptr;
1743         CLIENT *target, *from, *c;
1744         CHANNEL *chan;
1745
1746         assert( Client != NULL );
1747         assert( Req != NULL );
1748
1749         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1750
1751         /* Falsche Anzahl Parameter? */
1752         if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1753
1754         /* From aus Prefix ermitteln */
1755         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
1756         else from = Client;
1757         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
1758
1759         if( Req->argc == 2 )
1760         {
1761                 /* an anderen Server forwarden */
1762                 target = Client_GetFromID( Req->argv[1] );
1763                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
1764
1765                 if( target != Client_ThisServer( ))
1766                 {
1767                         /* Ok, anderer Server ist das Ziel: forwarden */
1768                         return IRC_WriteStrClientPrefix( target, from, "NAMES %s :%s", Req->argv[0], Req->argv[1] );
1769                 }
1770         }
1771
1772         if( Req->argc > 0 )
1773         {
1774                 /* bestimmte Channels durchgehen */
1775                 ptr = strtok( Req->argv[0], "," );
1776                 while( ptr )
1777                 {
1778                         chan = Channel_Search( ptr );
1779                         if( chan )
1780                         {
1781                                 /* Namen ausgeben */
1782                                 if( ! Send_NAMES( from, chan )) return DISCONNECTED;
1783                         }
1784                         if( ! IRC_WriteStrClient( from, RPL_ENDOFNAMES_MSG, Client_ID( from ), ptr )) return DISCONNECTED;
1785
1786                         /* naechsten Namen ermitteln */
1787                         ptr = strtok( NULL, "," );
1788                 }
1789                 return CONNECTED;
1790         }
1791
1792         /* alle Channels durchgehen */
1793         chan = Channel_First( );
1794         while( chan )
1795         {
1796                 /* Namen ausgeben */
1797                 if( ! Send_NAMES( from, chan )) return DISCONNECTED;
1798
1799                 /* naechster Channel */
1800                 chan = Channel_Next( chan );
1801         }
1802
1803         /* Nun noch alle Clients ausgeben, die in keinem Channel sind */
1804         c = Client_First( );
1805         sprintf( rpl, RPL_NAMREPLY_MSG, Client_ID( from ), "*", "*" );
1806         while( c )
1807         {
1808                 if(( Client_Type( c ) == CLIENT_USER ) && ( Channel_FirstChannelOf( c ) == NULL ) && ( ! strchr( Client_Modes( c ), 'i' )))
1809                 {
1810                         /* Okay, das ist ein User: anhaengen */
1811                         if( rpl[strlen( rpl ) - 1] != ':' ) strcat( rpl, " " );
1812                         strcat( rpl, Client_ID( c ));
1813
1814                         if( strlen( rpl ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
1815                         {
1816                                 /* Zeile wird zu lang: senden! */
1817                                 if( ! IRC_WriteStrClient( from, rpl )) return DISCONNECTED;
1818                                 sprintf( rpl, RPL_NAMREPLY_MSG, Client_ID( from ), "*", "*" );
1819                         }
1820                 }
1821
1822                 /* naechster Client */
1823                 c = Client_Next( c );
1824         }
1825         if( rpl[strlen( rpl ) - 1] != ':')
1826         {
1827                 /* es wurden User gefunden */
1828                 if( ! IRC_WriteStrClient( from, rpl )) return DISCONNECTED;
1829         }
1830
1831         return IRC_WriteStrClient( from, RPL_ENDOFNAMES_MSG, Client_ID( from ), "*" );
1832 } /* IRC_NAMES */
1833
1834
1835 GLOBAL BOOLEAN IRC_ISON( CLIENT *Client, REQUEST *Req )
1836 {
1837         CHAR rpl[COMMAND_LEN];
1838         CLIENT *c;
1839         CHAR *ptr;
1840         INT i;
1841
1842         assert( Client != NULL );
1843         assert( Req != NULL );
1844
1845         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1846
1847         /* Falsche Anzahl Parameter? */
1848         if(( Req->argc < 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1849
1850         strcpy( rpl, RPL_ISON_MSG );
1851         for( i = 0; i < Req->argc; i++ )
1852         {
1853                 ptr = strtok( Req->argv[i], " " );
1854                 while( ptr )
1855                 {
1856                         ngt_TrimStr( ptr );
1857                         c = Client_GetFromID( ptr );
1858                         if( c && ( Client_Type( c ) == CLIENT_USER ))
1859                         {
1860                                 /* Dieser Nick ist "online" */
1861                                 strcat( rpl, ptr );
1862                                 strcat( rpl, " " );
1863                         }
1864                         ptr = strtok( NULL, " " );
1865                 }
1866         }
1867         if( rpl[strlen( rpl ) - 1] == ' ' ) rpl[strlen( rpl ) - 1] = '\0';
1868
1869         return IRC_WriteStrClient( Client, rpl, Client_ID( Client ) );
1870 } /* IRC_ISON */
1871
1872
1873 GLOBAL BOOLEAN IRC_WHOIS( CLIENT *Client, REQUEST *Req )
1874 {
1875         CLIENT *from, *target, *c;
1876         CHAR str[LINE_LEN + 1], *ptr = NULL;
1877         CL2CHAN *cl2chan;
1878         CHANNEL *chan;
1879
1880         assert( Client != NULL );
1881         assert( Req != NULL );
1882
1883         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1884
1885         /* Falsche Anzahl Parameter? */
1886         if(( Req->argc < 1 ) || ( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1887
1888         /* Client suchen */
1889         c = Client_GetFromID( Req->argv[Req->argc - 1] );
1890         if(( ! c ) || ( Client_Type( c ) != CLIENT_USER )) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[Req->argc - 1] );
1891
1892         /* Empfaenger des WHOIS suchen */
1893         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
1894         else from = Client;
1895         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
1896
1897         /* Forwarden an anderen Server? */
1898         if( Req->argc > 1 )
1899         {
1900                 /* angegebenen Ziel-Server suchen */
1901                 target = Client_GetFromID( Req->argv[1] );
1902                 if( ! target ) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[1] );
1903                 ptr = Req->argv[1];
1904         }
1905         else target = Client_ThisServer( );
1906
1907         assert( target != NULL );
1908
1909         if(( Client_NextHop( target ) != Client_ThisServer( )) && ( Client_Type( Client_NextHop( target )) == CLIENT_SERVER )) return IRC_WriteStrClientPrefix( target, from, "WHOIS %s :%s", Req->argv[0], ptr );
1910
1911         /* Nick, User und Name */
1912         if( ! IRC_WriteStrClient( from, RPL_WHOISUSER_MSG, Client_ID( from ), Client_ID( c ), Client_User( c ), Client_Hostname( c ), Client_Info( c ))) return DISCONNECTED;
1913
1914         /* Server */
1915         if( ! IRC_WriteStrClient( from, RPL_WHOISSERVER_MSG, Client_ID( from ), Client_ID( c ), Client_ID( Client_Introducer( c )), Client_Info( Client_Introducer( c )))) return DISCONNECTED;
1916
1917         /* Channels */
1918         sprintf( str, RPL_WHOISCHANNELS_MSG, Client_ID( from ), Client_ID( c ));
1919         cl2chan = Channel_FirstChannelOf( c );
1920         while( cl2chan )
1921         {
1922                 chan = Channel_GetChannel( cl2chan );
1923                 assert( chan != NULL );
1924
1925                 /* Channel-Name anhaengen */
1926                 if( str[strlen( str ) - 1] != ':' ) strcat( str, " " );
1927                 if( strchr( Channel_UserModes( chan, c ), 'v' )) strcat( str, "+" );
1928                 if( strchr( Channel_UserModes( chan, c ), 'o' )) strcat( str, "@" );
1929                 strcat( str, Channel_Name( chan ));
1930
1931                 if( strlen( str ) > ( LINE_LEN - CHANNEL_NAME_LEN - 4 ))
1932                 {
1933                         /* Zeile wird zu lang: senden! */
1934                         if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
1935                         sprintf( str, RPL_WHOISCHANNELS_MSG, Client_ID( from ), Client_ID( c ));
1936                 }
1937
1938                 /* naechstes Mitglied suchen */
1939                 cl2chan = Channel_NextChannelOf( c, cl2chan );
1940         }
1941         if( str[strlen( str ) - 1] != ':')
1942         {
1943                 /* Es sind noch Daten da, die gesendet werden muessen */
1944                 if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
1945         }
1946
1947         /* IRC-Operator? */
1948         if( Client_HasMode( c, 'o' ))
1949         {
1950                 if( ! IRC_WriteStrClient( from, RPL_WHOISOPERATOR_MSG, Client_ID( from ), Client_ID( c ))) return DISCONNECTED;
1951         }
1952
1953         /* Idle (nur lokale Clients) */
1954         if( Client_Conn( c ) > NONE )
1955         {
1956                 if( ! IRC_WriteStrClient( from, RPL_WHOISIDLE_MSG, Client_ID( from ), Client_ID( c ), Conn_GetIdle( Client_Conn ( c )))) return DISCONNECTED;
1957         }
1958
1959         /* Away? */
1960         if( Client_HasMode( c, 'a' ))
1961         {
1962                 if( ! IRC_WriteStrClient( from, RPL_AWAY_MSG, Client_ID( from ), Client_ID( c ), Client_Away( c ))) return DISCONNECTED;
1963         }
1964
1965         /* End of Whois */
1966         return IRC_WriteStrClient( from, RPL_ENDOFWHOIS_MSG, Client_ID( from ), Client_ID( c ));
1967 } /* IRC_WHOIS */
1968
1969
1970 GLOBAL BOOLEAN IRC_USERHOST( CLIENT *Client, REQUEST *Req )
1971 {
1972         CHAR rpl[COMMAND_LEN];
1973         CLIENT *c;
1974         INT max, i;
1975
1976         assert( Client != NULL );
1977         assert( Req != NULL );
1978
1979         if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
1980
1981         /* Falsche Anzahl Parameter? */
1982         if(( Req->argc < 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
1983
1984         if( Req->argc > 5 ) max = 5;
1985         else max = Req->argc;
1986
1987         strcpy( rpl, RPL_USERHOST_MSG );
1988         for( i = 0; i < max; i++ )
1989         {
1990                 c = Client_GetFromID( Req->argv[i] );
1991                 if( c && ( Client_Type( c ) == CLIENT_USER ))
1992                 {
1993                         /* Dieser Nick ist "online" */
1994                         strcat( rpl, Client_ID( c ));
1995                         if( Client_HasMode( c, 'o' )) strcat( rpl, "*" );
1996                         strcat( rpl, "=" );
1997                         if( Client_HasMode( c, 'a' )) strcat( rpl, "-" );
1998                         else strcat( rpl, "+" );
1999                         strcat( rpl, Client_User( c ));
2000                         strcat( rpl, "@" );
2001                         strcat( rpl, Client_Hostname( c ));
2002                         strcat( rpl, " " );
2003                 }
2004         }
2005         if( rpl[strlen( rpl ) - 1] == ' ' ) rpl[strlen( rpl ) - 1] = '\0';
2006
2007         return IRC_WriteStrClient( Client, rpl, Client_ID( Client ) );
2008 } /* IRC_USERHOST */
2009
2010
2011 GLOBAL BOOLEAN IRC_ERROR( CLIENT *Client, REQUEST *Req )
2012 {
2013         assert( Client != NULL );
2014         assert( Req != NULL );
2015
2016         if( Req->argc < 1 ) Log( LOG_NOTICE, "Got ERROR from \"%s\"!", Client_Mask( Client ));
2017         else Log( LOG_NOTICE, "Got ERROR from \"%s\": %s!", Client_Mask( Client ), Req->argv[0] );
2018
2019         return CONNECTED;
2020 } /* IRC_ERROR */
2021
2022
2023 GLOBAL BOOLEAN IRC_LUSERS( CLIENT *Client, REQUEST *Req )
2024 {
2025         CLIENT *target, *from;
2026
2027         assert( Client != NULL );
2028         assert( Req != NULL );
2029
2030         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
2031
2032         /* Falsche Anzahl Parameter? */
2033         if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
2034
2035         /* Absender ermitteln */
2036         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
2037         else from = Client;
2038         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
2039
2040         /* An anderen Server forwarden? */
2041         if( Req->argc == 2 )
2042         {
2043                 target = Client_GetFromID( Req->argv[1] );
2044                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
2045                 else if( target != Client_ThisServer( )) return IRC_WriteStrClientPrefix( target, from, "LUSERS %s %s", Req->argv[0], Req->argv[1] );
2046         }
2047
2048         /* Wer ist der Absender? */
2049         if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_GetFromID( Req->prefix );
2050         else target = Client;
2051         if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
2052
2053         Send_LUSERS( target );
2054
2055         return CONNECTED;
2056 } /* IRC_LUSERS */
2057
2058
2059 GLOBAL BOOLEAN IRC_LINKS( CLIENT *Client, REQUEST *Req )
2060 {
2061         CLIENT *target, *from, *c;
2062         CHAR *mask;
2063
2064         assert( Client != NULL );
2065         assert( Req != NULL );
2066
2067         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
2068
2069         /* Falsche Anzahl Parameter? */
2070         if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
2071
2072         /* Server-Mask ermitteln */
2073         if( Req->argc > 0 ) mask = Req->argv[Req->argc - 1];
2074         else mask = "*";
2075
2076         /* Absender ermitteln */
2077         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
2078         else from = Client;
2079         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
2080
2081         /* An anderen Server forwarden? */
2082         if( Req->argc == 2 )
2083         {
2084                 target = Client_GetFromID( Req->argv[0] );
2085                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[0] );
2086                 else if( target != Client_ThisServer( )) return IRC_WriteStrClientPrefix( target, from, "LINKS %s %s", Req->argv[0], Req->argv[1] );
2087         }
2088
2089         /* Wer ist der Absender? */
2090         if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_GetFromID( Req->prefix );
2091         else target = Client;
2092         if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
2093
2094         c = Client_First( );
2095         while( c )
2096         {
2097                 if( Client_Type( c ) == CLIENT_SERVER )
2098                 {
2099                         if( ! IRC_WriteStrClient( target, RPL_LINKS_MSG, Client_ID( target ), Client_ID( c ), Client_ID( Client_TopServer( c ) ? Client_TopServer( c ) : Client_ThisServer( )), Client_Hops( c ), Client_Info( c ))) return DISCONNECTED;
2100                 }
2101                 c = Client_Next( c );
2102         }
2103
2104         return IRC_WriteStrClient( target, RPL_ENDOFLINKS_MSG, Client_ID( target ), mask );
2105 } /* IRC_LINKS */
2106
2107
2108 GLOBAL BOOLEAN IRC_JOIN( CLIENT *Client, REQUEST *Req )
2109 {
2110         CHAR *channame, *flags, *topic, modes[8];
2111         BOOLEAN is_new_chan;
2112         CLIENT *target;
2113         CHANNEL *chan;
2114
2115         assert( Client != NULL );
2116         assert( Req != NULL );
2117
2118         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
2119
2120         /* Falsche Anzahl Parameter? */
2121         if(( Req->argc > 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
2122
2123         /* Wer ist der Absender? */
2124         if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_GetFromID( Req->prefix );
2125         else target = Client;
2126         if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
2127
2128         /* Channel-Namen durchgehen */
2129         channame = strtok( Req->argv[0], "," );
2130         while( channame )
2131         {
2132                 /* wird der Channel neu angelegt? */
2133                 flags = NULL;
2134
2135                 if( Channel_Search( channame )) is_new_chan = FALSE;
2136                 else is_new_chan = TRUE;
2137
2138                 /* Hat ein Server Channel-User-Modes uebergeben? */
2139                 if( Client_Type( Client ) == CLIENT_SERVER )
2140                 {
2141                         /* Channel-Flags extrahieren */
2142                         flags = strchr( channame, 0x7 );
2143                         if( flags ) *flags++ = '\0';
2144                 }
2145
2146                 /* neuer Channel udn lokaler Client? */
2147                 if( is_new_chan && ( Client_Type( Client ) == CLIENT_USER ))
2148                 {
2149                         /* Dann soll der Client Channel-Operator werden! */
2150                         flags = "o";
2151                 }
2152
2153                 /* Channel joinen (und ggf. anlegen) */
2154                 if( ! Channel_Join( target, channame ))
2155                 {
2156                         /* naechsten Namen ermitteln */
2157                         channame = strtok( NULL, "," );
2158                         continue;
2159                 }
2160                 chan = Channel_Search( channame );
2161                 assert( chan != NULL );
2162
2163                 /* Modes setzen (wenn vorhanden) */
2164                 while( flags && *flags )
2165                 {
2166                         Channel_UserModeAdd( chan, target, *flags );
2167                         flags++;
2168                 }
2169
2170                 /* Muessen Modes an andere Server gemeldet werden? */
2171                 strcpy( &modes[1], Channel_UserModes( chan, target ));
2172                 if( modes[1] ) modes[0] = 0x7;
2173                 else modes[0] = '\0';
2174
2175                 /* An andere Server weiterleiten */
2176                 IRC_WriteStrServersPrefix( Client, target, "JOIN :%s%s", channame, modes );
2177
2178                 /* im Channel bekannt machen */
2179                 IRC_WriteStrChannelPrefix( Client, chan, target, FALSE, "JOIN :%s", channame );
2180                 if( modes[1] )
2181                 {
2182                         /* Modes im Channel bekannt machen */
2183                         IRC_WriteStrChannelPrefix( Client, chan, target, FALSE, "MODE %s %s :%s", channame, modes, Client_ID( target ));
2184                 }
2185
2186                 if( Client_Type( Client ) == CLIENT_USER )
2187                 {
2188                         /* an Client bestaetigen */
2189                         IRC_WriteStrClientPrefix( Client, target, "JOIN :%s", channame );
2190
2191                         /* Topic an Client schicken */
2192                         topic = Channel_Topic( chan );
2193                         if( *topic ) IRC_WriteStrClient( Client, RPL_TOPIC_MSG, Client_ID( Client ), channame, topic );
2194
2195                         /* Mitglieder an Client Melden */
2196                         Send_NAMES( Client, chan );
2197                         IRC_WriteStrClient( Client, RPL_ENDOFNAMES_MSG, Client_ID( Client ), Channel_Name( chan ));
2198                 }
2199
2200                 /* naechsten Namen ermitteln */
2201                 channame = strtok( NULL, "," );
2202         }
2203         return CONNECTED;
2204 } /* IRC_JOIN */
2205
2206
2207 GLOBAL BOOLEAN IRC_PART( CLIENT *Client, REQUEST *Req )
2208 {
2209         CLIENT *target;
2210         CHAR *chan;
2211
2212         assert( Client != NULL );
2213         assert( Req != NULL );
2214
2215         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
2216
2217         /* Falsche Anzahl Parameter? */
2218         if(( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
2219
2220         /* Wer ist der Absender? */
2221         if( Client_Type( Client ) == CLIENT_SERVER ) target = Client_GetFromID( Req->prefix );
2222         else target = Client;
2223         if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
2224
2225         /* Channel-Namen durchgehen */
2226         chan = strtok( Req->argv[0], "," );
2227         while( chan )
2228         {
2229                 if( ! Channel_Part( target, Client, chan, Req->argc > 1 ? Req->argv[1] : Client_ID( target )))
2230                 {
2231                         /* naechsten Namen ermitteln */
2232                         chan = strtok( NULL, "," );
2233                         continue;
2234                 }
2235
2236                 /* naechsten Namen ermitteln */
2237                 chan = strtok( NULL, "," );
2238         }
2239         return CONNECTED;
2240 } /* IRC_PART */
2241
2242
2243 GLOBAL BOOLEAN IRC_TOPIC( CLIENT *Client, REQUEST *Req )
2244 {
2245         CHANNEL *chan;
2246         CLIENT *from;
2247         CHAR *topic;
2248
2249         assert( Client != NULL );
2250         assert( Req != NULL );
2251
2252         if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_USER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
2253
2254         /* Falsche Anzahl Parameter? */
2255         if(( Req->argc < 1 ) || ( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
2256
2257         if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
2258         else from = Client;
2259         if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
2260
2261         /* Welcher Channel? */
2262         chan = Channel_Search( Req->argv[0] );
2263         if( ! chan ) return IRC_WriteStrClient( from, ERR_NOTONCHANNEL_MSG, Client_ID( from ), Req->argv[0] );
2264
2265         /* Ist der User Mitglied in dem Channel? */
2266         if( ! Channel_IsMemberOf( chan, from )) return IRC_WriteStrClient( from, ERR_NOTONCHANNEL_MSG, Client_ID( from ), Req->argv[0] );
2267
2268         if( Req->argc == 1 )
2269         {
2270                 /* Topic erfragen */
2271                 topic = Channel_Topic( chan );
2272                 if( *topic ) return IRC_WriteStrClient( from, RPL_TOPIC_MSG, Client_ID( from ), Channel_Name( chan ), topic );
2273                 else return IRC_WriteStrClient( from, RPL_NOTOPIC_MSG, Client_ID( from ), Channel_Name( chan ));
2274         }
2275
2276         if( strchr( Channel_Modes( chan ), 't' ))
2277         {
2278                 /* Topic Lock. Ist der User ein Channel Operator? */
2279                 if( ! strchr( Channel_UserModes( chan, from ), 'o' )) return IRC_WriteStrClient( from, ERR_CHANOPRIVSNEEDED_MSG, Client_ID( from ), Channel_Name( chan ));
2280         }
2281
2282         /* Topic setzen */
2283         Channel_SetTopic( chan, Req->argv[1] );
2284         Log( LOG_DEBUG, "User \"%s\" set topic on \"%s\": %s", Client_Mask( from ), Channel_Name( chan ), Req->argv[1][0] ? Req->argv[1] : "<none>" );
2285
2286         /* im Channel bekannt machen */
2287         IRC_WriteStrChannelPrefix( from, chan, from, TRUE, "TOPIC %s :%s", Req->argv[0], Req->argv[1] );
2288         return IRC_WriteStrClientPrefix( from, from, "TOPIC %s :%s", Req->argv[0], Req->argv[1] );
2289 } /* IRC_TOPIC */
2290
2291
2292 GLOBAL BOOLEAN IRC_VERSION( CLIENT *Client, REQUEST *Req )
2293 {
2294         CLIENT *target, *prefix;
2295
2296         assert( Client != NULL );
2297         assert( Req != NULL );
2298
2299         /* Falsche Anzahl Parameter? */
2300         if(( Req->argc > 1 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
2301
2302         /* Ziel suchen */
2303         if( Req->argc == 1 ) target = Client_GetFromID( Req->argv[0] );
2304         else target = Client_ThisServer( );
2305
2306         /* Prefix ermitteln */
2307         if( Client_Type( Client ) == CLIENT_SERVER ) prefix = Client_GetFromID( Req->prefix );
2308         else prefix = Client;
2309         if( ! prefix ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
2310
2311         /* An anderen Server weiterleiten? */
2312         if( target != Client_ThisServer( ))
2313         {
2314                 if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[0] );
2315
2316                 /* forwarden */
2317                 IRC_WriteStrClientPrefix( target, prefix, "VERSION %s", Req->argv[0] );
2318                 return CONNECTED;
2319         }
2320
2321         /* mit Versionsinfo antworten */
2322         return IRC_WriteStrClient( Client, RPL_VERSION_MSG, Client_ID( prefix ), NGIRCd_DebugLevel, Conf_ServerName, NGIRCd_VersionAddition( ));
2323 } /* IRC_VERSION */
2324
2325
2326 GLOBAL BOOLEAN IRC_KILL( CLIENT *Client, REQUEST *Req )
2327 {
2328         CLIENT *prefix, *c;
2329
2330         assert( Client != NULL );
2331         assert( Req != NULL );
2332
2333         if( Client_Type( Client ) != CLIENT_SERVER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
2334
2335         /* Falsche Anzahl Parameter? */
2336         if(( Req->argc != 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
2337
2338         prefix = Client_GetFromID( Req->prefix );
2339         if( ! prefix )
2340         {
2341                 Log( LOG_WARNING, "Got KILL with invalid prefix: \"%s\"!", Req->prefix );
2342                 prefix = Client_ThisServer( );
2343         }
2344
2345         Log( LOG_NOTICE, "Got KILL command from \"%s\" for \"%s\": %s", Client_Mask( prefix ), Req->argv[0], Req->argv[1] );
2346
2347         /* andere Server benachrichtigen */
2348         IRC_WriteStrServersPrefix( Client, prefix, "KILL %s :%s", Req->argv[0], Req->argv[1] );
2349
2350         /* haben wir selber einen solchen Client? */
2351         c = Client_GetFromID( Req->argv[0] );
2352         if( c && ( Client_Conn( c ) != NONE )) Conn_Close( Client_Conn( c ), NULL, Req->argv[1], TRUE );
2353
2354         return CONNECTED;
2355 } /* IRC_KILL */
2356
2357
2358 LOCAL BOOLEAN Hello_User( CLIENT *Client )
2359 {
2360         assert( Client != NULL );
2361
2362         /* Passwort ueberpruefen */
2363         if( strcmp( Client_Password( Client ), Conf_ServerPwd ) != 0 )
2364         {
2365                 /* Falsches Passwort */
2366                 Log( LOG_ERR, "User \"%s\" rejected (connection %d): Bad password!", Client_Mask( Client ), Client_Conn( Client ));
2367                 Conn_Close( Client_Conn( Client ), NULL, "Bad password", TRUE );
2368                 return DISCONNECTED;
2369         }
2370
2371         Log( LOG_NOTICE, "User \"%s\" registered (connection %d).", Client_Mask( Client ), Client_Conn( Client ));
2372
2373         /* Andere Server informieren */
2374         IRC_WriteStrServers( NULL, "NICK %s 1 %s %s 1 +%s :%s", Client_ID( Client ), Client_User( Client ), Client_Hostname( Client ), Client_Modes( Client ), Client_Info( Client ));
2375
2376         if( ! IRC_WriteStrClient( Client, RPL_WELCOME_MSG, Client_ID( Client ), Client_Mask( Client ))) return FALSE;
2377         if( ! IRC_WriteStrClient( Client, RPL_YOURHOST_MSG, Client_ID( Client ), Client_ID( Client_ThisServer( )))) return FALSE;
2378         if( ! IRC_WriteStrClient( Client, RPL_CREATED_MSG, Client_ID( Client ), NGIRCd_StartStr )) return FALSE;
2379         if( ! IRC_WriteStrClient( Client, RPL_MYINFO_MSG, Client_ID( Client ), Client_ID( Client_ThisServer( )))) return FALSE;
2380
2381         Client_SetType( Client, CLIENT_USER );
2382
2383         if( ! Send_LUSERS( Client )) return DISCONNECTED;
2384         if( ! Show_MOTD( Client )) return DISCONNECTED;
2385
2386         return CONNECTED;
2387 } /* Hello_User */
2388
2389
2390 LOCAL BOOLEAN Show_MOTD( CLIENT *Client )
2391 {
2392         BOOLEAN ok;
2393         CHAR line[127];
2394         FILE *fd;
2395
2396         assert( Client != NULL );
2397
2398         fd = fopen( Conf_MotdFile, "r" );
2399         if( ! fd )
2400         {
2401                 Log( LOG_WARNING, "Can't read MOTD file \"%s\": %s", Conf_MotdFile, strerror( errno ));
2402                 return IRC_WriteStrClient( Client, ERR_NOMOTD_MSG, Client_ID( Client ) );
2403         }
2404
2405         IRC_WriteStrClient( Client, RPL_MOTDSTART_MSG, Client_ID( Client ), Client_ID( Client_ThisServer( )));
2406         while( TRUE )
2407         {
2408                 if( ! fgets( line, 126, fd )) break;
2409                 if( line[strlen( line ) - 1] == '\n' ) line[strlen( line ) - 1] = '\0';
2410                 if( ! IRC_WriteStrClient( Client, RPL_MOTD_MSG, Client_ID( Client ), line ))
2411                 {
2412                         fclose( fd );
2413                         return FALSE;
2414                 }
2415         }
2416         ok = IRC_WriteStrClient( Client, RPL_ENDOFMOTD_MSG, Client_ID( Client ) );
2417
2418         fclose( fd );
2419
2420         return ok;
2421 } /* Show_MOTD */
2422
2423
2424 LOCAL VOID Kill_Nick( CHAR *Nick, CHAR *Reason )
2425 {
2426         CLIENT *c;
2427
2428         assert( Nick != NULL );
2429         assert( Reason != NULL );
2430
2431         Log( LOG_ERR, "User(s) with nick \"%s\" will be disconnected: %s", Nick, Reason );
2432
2433         /* andere Server benachrichtigen */
2434         IRC_WriteStrServers( NULL, "KILL %s :%s", Nick, Reason );
2435
2436         /* Ggf. einen eigenen Client toeten */
2437         c = Client_GetFromID( Nick );
2438         if( c && ( Client_Conn( c ) != NONE )) Conn_Close( Client_Conn( c ), NULL, Reason, TRUE );
2439 } /* Kill_Nick */
2440
2441
2442 LOCAL BOOLEAN Send_NAMES( CLIENT *Client, CHANNEL *Chan )
2443 {
2444         BOOLEAN is_visible, is_member;
2445         CHAR str[LINE_LEN + 1];
2446         CL2CHAN *cl2chan;
2447         CLIENT *cl;
2448
2449         assert( Client != NULL );
2450         assert( Chan != NULL );
2451
2452         if( Channel_IsMemberOf( Chan, Client )) is_member = TRUE;
2453         else is_member = FALSE;
2454
2455         /* Alle Mitglieder suchen */
2456         sprintf( str, RPL_NAMREPLY_MSG, Client_ID( Client ), "=", Channel_Name( Chan ));
2457         cl2chan = Channel_FirstMember( Chan );
2458         while( cl2chan )
2459         {
2460                 cl = Channel_GetClient( cl2chan );
2461
2462                 if( strchr( Client_Modes( cl ), 'i' )) is_visible = FALSE;
2463                 else is_visible = TRUE;
2464
2465                 if( is_member || is_visible )
2466                 {
2467                         /* Nick anhaengen */
2468                         if( str[strlen( str ) - 1] != ':' ) strcat( str, " " );
2469                         if( strchr( Channel_UserModes( Chan, cl ), 'v' )) strcat( str, "+" );
2470                         if( strchr( Channel_UserModes( Chan, cl ), 'o' )) strcat( str, "@" );
2471                         strcat( str, Client_ID( cl ));
2472
2473                         if( strlen( str ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
2474                         {
2475                                 /* Zeile wird zu lang: senden! */
2476                                 if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
2477                                 sprintf( str, RPL_NAMREPLY_MSG, Client_ID( Client ), "=", Channel_Name( Chan ));
2478                         }
2479                 }
2480
2481                 /* naechstes Mitglied suchen */
2482                 cl2chan = Channel_NextMember( Chan, cl2chan );
2483         }
2484         if( str[strlen( str ) - 1] != ':')
2485         {
2486                 /* Es sind noch Daten da, die gesendet werden muessen */
2487                 if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
2488         }
2489
2490         return CONNECTED;
2491 } /* Send_NAMES */
2492
2493
2494 LOCAL BOOLEAN Send_LUSERS( CLIENT *Client )
2495 {
2496         INT cnt;
2497
2498         assert( Client != NULL );
2499
2500         /* Users, Services und Serevr im Netz */
2501         if( ! IRC_WriteStrClient( Client, RPL_LUSERCLIENT_MSG, Client_ID( Client ), Client_UserCount( ), Client_ServiceCount( ), Client_ServerCount( ))) return DISCONNECTED;
2502
2503         /* IRC-Operatoren im Netz */
2504         cnt = Client_OperCount( );
2505         if( cnt > 0 )
2506         {
2507                 if( ! IRC_WriteStrClient( Client, RPL_LUSEROP_MSG, Client_ID( Client ), cnt )) return DISCONNECTED;
2508         }
2509
2510         /* Unbekannt Verbindungen */
2511         cnt = Client_UnknownCount( );
2512         if( cnt > 0 )
2513         {
2514                 if( ! IRC_WriteStrClient( Client, RPL_LUSERUNKNOWN_MSG, Client_ID( Client ), cnt )) return DISCONNECTED;
2515         }
2516
2517         /* Channels im Netz */
2518         if( ! IRC_WriteStrClient( Client, RPL_LUSERCHANNELS_MSG, Client_ID( Client ), Channel_Count( ))) return DISCONNECTED;
2519
2520         /* Channels im Netz */
2521         if( ! IRC_WriteStrClient( Client, RPL_LUSERME_MSG, Client_ID( Client ), Client_MyUserCount( ), Client_MyServiceCount( ), Client_MyServerCount( ))) return DISCONNECTED;
2522
2523         return CONNECTED;
2524 } /* Send_LUSERS */
2525
2526
2527 CHAR *Get_Prefix( CLIENT *Target, CLIENT *Client )
2528 {
2529         assert( Target != NULL );
2530         assert( Client != NULL );
2531
2532         if( Client_Type( Target ) == CLIENT_SERVER ) return Client_ID( Client );
2533         else return Client_Mask( Client );
2534 } /* Get_Prefix */
2535
2536
2537 /* -eof- */