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