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