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