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