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