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