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