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