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