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