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