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