- Modul aus irc.c bzw. irc.h ausgegliedert.
authorAlexander Barton <alex@barton.de>
Wed, 27 Feb 2002 23:26:21 +0000 (23:26 +0000)
committerAlexander Barton <alex@barton.de>
Wed, 27 Feb 2002 23:26:21 +0000 (23:26 +0000)
src/ngircd/irc-login.c [new file with mode: 0644]
src/ngircd/irc-login.h [new file with mode: 0644]
src/ngircd/irc-mode.c [new file with mode: 0644]
src/ngircd/irc-mode.h [new file with mode: 0644]
src/ngircd/irc-write.c [new file with mode: 0644]
src/ngircd/irc-write.h [new file with mode: 0644]

diff --git a/src/ngircd/irc-login.c b/src/ngircd/irc-login.c
new file mode 100644 (file)
index 0000000..6686dc6
--- /dev/null
@@ -0,0 +1,723 @@
+/*
+ * ngIRCd -- The Next Generation IRC Daemon
+ * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
+ *
+ * Dieses Programm ist freie Software. Sie koennen es unter den Bedingungen
+ * der GNU General Public License (GPL), wie von der Free Software Foundation
+ * herausgegeben, weitergeben und/oder modifizieren, entweder unter Version 2
+ * der Lizenz oder (wenn Sie es wuenschen) jeder spaeteren Version.
+ * Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
+ * der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
+ *
+ * $Id: irc-login.c,v 1.1 2002/02/27 23:26:21 alex Exp $
+ *
+ * irc-login.c: Anmeldung und Abmeldung im IRC
+ *
+ * $Log: irc-login.c,v $
+ * Revision 1.1  2002/02/27 23:26:21  alex
+ * - Modul aus irc.c bzw. irc.h ausgegliedert.
+ *
+ */
+
+
+#include <portab.h>
+#include "global.h"
+
+#include <imp.h>
+#include <assert.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "ngircd.h"
+#include "conf.h"
+#include "irc.h"
+#include "irc-write.h"
+#include "log.h"
+#include "messages.h"
+
+#include <exp.h>
+#include "irc-login.h"
+
+
+LOCAL BOOLEAN Hello_User( CLIENT *Client );
+LOCAL VOID Kill_Nick( CHAR *Nick, CHAR *Reason );
+
+
+GLOBAL BOOLEAN IRC_PASS( CLIENT *Client, REQUEST *Req )
+{
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       /* Fehler liefern, wenn kein lokaler Client */
+       if( Client_Conn( Client ) <= NONE ) return IRC_WriteStrClient( Client, ERR_UNKNOWNCOMMAND_MSG, Client_ID( Client ), Req->command );
+       
+       if(( Client_Type( Client ) == CLIENT_UNKNOWN ) && ( Req->argc == 1))
+       {
+               /* noch nicht registrierte unbekannte Verbindung */
+               Log( LOG_DEBUG, "Connection %d: got PASS command ...", Client_Conn( Client ));
+
+               /* Passwort speichern */
+               Client_SetPassword( Client, Req->argv[0] );
+
+               Client_SetType( Client, CLIENT_GOTPASS );
+               return CONNECTED;
+       }
+       else if((( Client_Type( Client ) == CLIENT_UNKNOWN ) || ( Client_Type( Client ) == CLIENT_UNKNOWNSERVER )) && (( Req->argc == 3 ) || ( Req->argc == 4 )))
+       {
+               /* noch nicht registrierte Server-Verbindung */
+               Log( LOG_DEBUG, "Connection %d: got PASS command (new server link) ...", Client_Conn( Client ));
+
+               /* Passwort speichern */
+               Client_SetPassword( Client, Req->argv[0] );
+
+               Client_SetType( Client, CLIENT_GOTPASSSERVER );
+               return CONNECTED;
+       }
+       else if(( Client_Type( Client ) == CLIENT_UNKNOWN  ) || ( Client_Type( Client ) == CLIENT_UNKNOWNSERVER ))
+       {
+               /* Falsche Anzahl Parameter? */
+               return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+       }
+       else return IRC_WriteStrClient( Client, ERR_ALREADYREGISTRED_MSG, Client_ID( Client ));
+} /* IRC_PASS */
+
+
+GLOBAL BOOLEAN IRC_SERVER( CLIENT *Client, REQUEST *Req )
+{
+       CHAR str[LINE_LEN], *ptr;
+       CLIENT *from, *c, *cl;
+       CL2CHAN *cl2chan;
+       INT max_hops, i;
+       CHANNEL *chan;
+       BOOLEAN ok;
+       
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       /* Fehler liefern, wenn kein lokaler Client */
+       if( Client_Conn( Client ) <= NONE ) return IRC_WriteStrClient( Client, ERR_UNKNOWNCOMMAND_MSG, Client_ID( Client ), Req->command );
+
+       if( Client_Type( Client ) == CLIENT_GOTPASSSERVER )
+       {
+               /* Verbindung soll als Server-Server-Verbindung registriert werden */
+               Log( LOG_DEBUG, "Connection %d: got SERVER command (new server link) ...", Client_Conn( Client ));
+
+               /* Falsche Anzahl Parameter? */
+               if(( Req->argc != 2 ) && ( Req->argc != 3 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+               /* Ist dieser Server bei uns konfiguriert? */
+               for( i = 0; i < Conf_Server_Count; i++ ) if( strcasecmp( Req->argv[0], Conf_Server[i].name ) == 0 ) break;
+               if( i >= Conf_Server_Count )
+               {
+                       /* Server ist nicht konfiguriert! */
+                       Log( LOG_ERR, "Connection %d: Server \"%s\" not configured here!", Client_Conn( Client ), Req->argv[0] );
+                       Conn_Close( Client_Conn( Client ), NULL, "Server not configured here", TRUE );
+                       return DISCONNECTED;
+               }
+               if( strcmp( Client_Password( Client ), Conf_Server[i].pwd ) != 0 )
+               {
+                       /* Falsches Passwort */
+                       Log( LOG_ERR, "Connection %d: Bad password for server \"%s\"!", Client_Conn( Client ), Req->argv[0] );
+                       Conn_Close( Client_Conn( Client ), NULL, "Bad password", TRUE );
+                       return DISCONNECTED;
+               }
+               
+               /* Ist ein Server mit dieser ID bereits registriert? */
+               if( ! Client_CheckID( Client, Req->argv[0] )) return DISCONNECTED;
+
+               /* Server-Strukturen fuellen ;-) */
+               Client_SetID( Client, Req->argv[0] );
+               Client_SetHops( Client, 1 );
+               Client_SetInfo( Client, Req->argv[Req->argc - 1] );
+               
+               /* Meldet sich der Server bei uns an? */
+               if( Req->argc == 2 )
+               {
+                       /* Unseren SERVER- und PASS-Befehl senden */
+                       ok = TRUE;
+                       if( ! IRC_WriteStrClient( Client, "PASS %s "PASSSERVERADD, Conf_Server[i].pwd )) ok = FALSE;
+                       else ok = IRC_WriteStrClient( Client, "SERVER %s 1 :%s", Conf_ServerName, Conf_ServerInfo );
+                       if( ! ok )
+                       {
+                               Conn_Close( Client_Conn( Client ), "Unexpected server behavior!", NULL, FALSE );
+                               return DISCONNECTED;
+                       }
+                       Client_SetIntroducer( Client, Client );
+                       Client_SetToken( Client, 1 );
+               }
+               else  Client_SetToken( Client, atoi( Req->argv[1] ));
+
+               Log( LOG_NOTICE, "Server \"%s\" registered (connection %d, 1 hop - direct link).", Client_ID( Client ), Client_Conn( Client ));
+
+               Client_SetType( Client, CLIENT_SERVER );
+
+               /* maximalen Hop Count ermitteln */
+               max_hops = 0;
+               c = Client_First( );
+               while( c )
+               {
+                       if( Client_Hops( c ) > max_hops ) max_hops = Client_Hops( c );
+                       c = Client_Next( c );
+               }
+               
+               /* Alle bisherigen Server dem neuen Server bekannt machen,
+                * die bisherigen Server ueber den neuen informierenn */
+               for( i = 0; i < ( max_hops + 1 ); i++ )
+               {
+                       c = Client_First( );
+                       while( c )
+                       {
+                               if(( Client_Type( c ) == CLIENT_SERVER ) && ( c != Client ) && ( c != Client_ThisServer( )) && ( Client_Hops( c ) == i ))
+                               {
+                                       if( Client_Conn( c ) > NONE )
+                                       {
+                                               /* Dem gefundenen Server gleich den neuen
+                                                * Server bekannt machen */
+                                               if( ! IRC_WriteStrClient( c, "SERVER %s %d %d :%s", Client_ID( Client ), Client_Hops( Client ) + 1, Client_MyToken( Client ), Client_Info( Client ))) return DISCONNECTED;
+                                       }
+                                       
+                                       /* Den neuen Server ueber den alten informieren */
+                                       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;
+                               }
+                               c = Client_Next( c );
+                       }
+               }
+
+               /* alle User dem neuen Server bekannt machen */
+               c = Client_First( );
+               while( c )
+               {
+                       if( Client_Type( c ) == CLIENT_USER )
+                       {
+                               /* User an neuen Server melden */
+                               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;
+                       }
+                       c = Client_Next( c );
+               }
+
+               /* Channels dem neuen Server bekannt machen */
+               chan = Channel_First( );
+               while( chan )
+               {
+                       sprintf( str, "NJOIN %s :", Channel_Name( chan ));
+
+                       /* alle Member suchen */
+                       cl2chan = Channel_FirstMember( chan );
+                       while( cl2chan )
+                       {
+                               cl = Channel_GetClient( cl2chan );
+                               assert( cl != NULL );
+
+                               /* Nick, ggf. mit Modes, anhaengen */
+                               if( str[strlen( str ) - 1] != ':' ) strcat( str, "," );
+                               if( strchr( Channel_UserModes( chan, cl ), 'v' )) strcat( str, "+" );
+                               if( strchr( Channel_UserModes( chan, cl ), 'o' )) strcat( str, "@" );
+                               strcat( str, Client_ID( cl ));
+
+                               if( strlen( str ) > ( LINE_LEN - CLIENT_NICK_LEN - 4 ))
+                               {
+                                       /* Zeile senden */
+                                       if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
+                                       sprintf( str, "NJOIN %s :", Channel_Name( chan ));
+                               }
+                               
+                               cl2chan = Channel_NextMember( chan, cl2chan );
+                       }
+
+                       /* noch Daten da? */
+                       if( str[strlen( str ) - 1] != ':')
+                       {
+                               /* Ja; Also senden ... */
+                               if( ! IRC_WriteStrClient( Client, str )) return DISCONNECTED;
+                       }
+
+                       /* naechsten Channel suchen */
+                       chan = Channel_Next( chan );
+               }
+               
+               return CONNECTED;
+       }
+       else if( Client_Type( Client ) == CLIENT_SERVER )
+       {
+               /* Neuer Server wird im Netz angekuendigt */
+
+               /* Falsche Anzahl Parameter? */
+               if( Req->argc != 4 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+               /* Ist ein Server mit dieser ID bereits registriert? */
+               if( ! Client_CheckID( Client, Req->argv[0] )) return DISCONNECTED;
+
+               /* Ueberfluessige Hostnamen aus Info-Text entfernen */
+               ptr = strchr( Req->argv[3] + 2, '[' );
+               if( ! ptr ) ptr = Req->argv[3];
+
+               from = Client_GetFromID( Req->prefix );
+               if( ! from )
+               {
+                       /* Hm, Server, der diesen einfuehrt, ist nicht bekannt!? */
+                       Log( LOG_ALERT, "Unknown ID in prefix of SERVER: \"%s\"! (on connection %d)", Req->prefix, Client_Conn( Client ));
+                       Conn_Close( Client_Conn( Client ), NULL, "Unknown ID in prefix of SERVER", TRUE );
+                       return DISCONNECTED;
+               }
+
+               /* Neue Client-Struktur anlegen */
+               c = Client_NewRemoteServer( Client, Req->argv[0], from, atoi( Req->argv[1] ), atoi( Req->argv[2] ), ptr, TRUE );
+               if( ! c )
+               {
+                       /* Neue Client-Struktur konnte nicht angelegt werden */
+                       Log( LOG_ALERT, "Can't create client structure for server! (on connection %d)", Client_Conn( Client ));
+                       Conn_Close( Client_Conn( Client ), NULL, "Can't allocate client structure for remote server", TRUE );
+                       return DISCONNECTED;
+               }
+
+               /* Log-Meldung zusammenbauen und ausgeben */
+               if(( Client_Hops( c ) > 1 ) && ( Req->prefix[0] )) sprintf( str, "connected to %s, ", Client_ID( from ));
+               else strcpy( str, "" );
+               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": "" );
+
+               /* Andere Server informieren */
+               IRC_WriteStrServersPrefix( Client, from, "SERVER %s %d %d :%s", Client_ID( c ), Client_Hops( c ) + 1, Client_MyToken( c ), Client_Info( c ));
+
+               return CONNECTED;
+       }
+       else return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+} /* IRC_SERVER */
+
+
+GLOBAL BOOLEAN IRC_NJOIN( CLIENT *Client, REQUEST *Req )
+{
+       CHAR *channame, *ptr, modes[8];
+       BOOLEAN is_op, is_voiced;
+       CHANNEL *chan;
+       CLIENT *c;
+       
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       if( Client_Type( Client ) != CLIENT_SERVER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTEREDSERVER_MSG, Client_ID( Client ));
+
+       /* Falsche Anzahl Parameter? */
+       if( Req->argc != 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+       channame = Req->argv[0];
+       ptr = strtok( Req->argv[1], "," );
+       while( ptr )
+       {
+               is_op = is_voiced = FALSE;
+               
+               /* Prefixe abschneiden */
+               while(( *ptr == '@' ) || ( *ptr == '+' ))
+               {
+                       if( *ptr == '@' ) is_op = TRUE;
+                       if( *ptr == '+' ) is_voiced = TRUE;
+                       ptr++;
+               }
+
+               c = Client_GetFromID( ptr );
+               if( c )
+               {
+                       Channel_Join( c, channame );
+                       chan = Channel_Search( channame );
+                       assert( chan != NULL );
+                       
+                       if( is_op ) Channel_UserModeAdd( chan, c, 'o' );
+                       if( is_voiced ) Channel_UserModeAdd( chan, c, 'v' );
+
+                       /* im Channel bekannt machen */
+                       IRC_WriteStrChannelPrefix( Client, chan, c, FALSE, "JOIN :%s", channame );
+
+                       /* Channel-User-Modes setzen */
+                       strcpy( modes, Channel_UserModes( chan, c ));
+                       if( modes[0] )
+                       {
+                               /* Modes im Channel bekannt machen */
+                               IRC_WriteStrChannelPrefix( Client, chan, Client, FALSE, "MODE %s +%s %s", channame, modes, Client_ID( c ));
+                       }
+               }
+               else Log( LOG_ERR, "Got NJOIN for unknown nick \"%s\" for channel \"%s\"!", ptr, channame );
+               
+               /* naechsten Nick suchen */
+               ptr = strtok( NULL, "," );
+       }
+
+       /* an andere Server weiterleiten */
+       IRC_WriteStrServersPrefix( Client, Client_ThisServer( ), "NJOIN %s :%s", Req->argv[0], Req->argv[1] );
+
+       return CONNECTED;
+} /* IRC_NJOIN */
+
+
+GLOBAL BOOLEAN IRC_NICK( CLIENT *Client, REQUEST *Req )
+{
+       CLIENT *intr_c, *target, *c;
+       CHAR *modes;
+
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       /* Zumindest BitchX sendet NICK-USER in der falschen Reihenfolge. */
+#ifndef STRICT_RFC
+       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 ))
+#else
+       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 ))
+#endif
+       {
+               /* User-Registrierung bzw. Nick-Aenderung */
+
+               /* Falsche Anzahl Parameter? */
+               if( Req->argc != 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+               /* "Ziel-Client" ermitteln */
+               if( Client_Type( Client ) == CLIENT_SERVER )
+               {
+                       target = Client_GetFromID( Req->prefix );
+                       if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[0] );
+               }
+               else
+               {
+                       /* Ist der Client "restricted"? */
+                       if( Client_HasMode( Client, 'r' )) return IRC_WriteStrClient( Client, ERR_RESTRICTED_MSG, Client_ID( Client ));
+                       target = Client;
+               }
+
+#ifndef STRICT_RFC
+               /* Wenn der Client zu seinem eigenen Nick wechseln will, so machen
+                * wir nichts. So macht es das Original und mind. Snak hat probleme,
+                * wenn wir es nicht so machen. Ob es so okay ist? Hm ... */
+               if( strcmp( Client_ID( target ), Req->argv[0] ) == 0 ) return CONNECTED;
+#endif
+               
+               /* pruefen, ob Nick bereits vergeben. Speziallfall: der Client
+                * will nur die Gross- und Kleinschreibung aendern. Das darf
+                * er natuerlich machen :-) */
+               if( strcasecmp( Client_ID( target ), Req->argv[0] ) != 0 )
+               {
+                       if( ! Client_CheckNick( target, Req->argv[0] )) return CONNECTED;
+               }
+
+               /* Nick-Aenderung: allen mitteilen! */
+               
+               if( Client_Type( Client ) == CLIENT_USER ) IRC_WriteStrClientPrefix( Client, Client, "NICK :%s", Req->argv[0] );
+               IRC_WriteStrServersPrefix( Client, target, "NICK :%s", Req->argv[0] );
+               IRC_WriteStrRelatedPrefix( target, target, FALSE, "NICK :%s", Req->argv[0] );
+
+               if(( Client_Type( target ) != CLIENT_USER ) && ( Client_Type( target ) != CLIENT_SERVER ))
+               {
+                       /* Neuer Client */
+                       Log( LOG_DEBUG, "Connection %d: got valid NICK command ...", Client_Conn( Client ));
+
+                       /* Client-Nick registrieren */
+                       Client_SetID( target, Req->argv[0] );
+
+                       /* schon ein USER da? Dann registrieren! */
+                       if( Client_Type( Client ) == CLIENT_GOTUSER ) return Hello_User( Client );
+                       else Client_SetType( Client, CLIENT_GOTNICK );
+               }
+               else
+               {
+                       /* Nick-Aenderung */
+                       Log( LOG_INFO, "User \"%s\" changed nick: \"%s\" -> \"%s\".", Client_Mask( target ), Client_ID( target ), Req->argv[0] );
+
+                       /* neuen Client-Nick speichern */
+                       Client_SetID( target, Req->argv[0] );
+               }
+
+               return CONNECTED;
+       }
+       else if( Client_Type( Client ) == CLIENT_SERVER )
+       {
+               /* Server fuehrt neuen Client ein */
+
+               /* Falsche Anzahl Parameter? */
+               if( Req->argc != 7 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+               /* Nick ueberpruefen */
+               c = Client_GetFromID( Req->argv[0] );
+               if( c )
+               {
+                       /* Der neue Nick ist auf diesem Server bereits registriert:
+                        * sowohl der neue, als auch der alte Client muessen nun
+                        * disconnectiert werden. */
+                       Log( LOG_ERR, "Server %s introduces already registered nick \"%s\"!", Client_ID( Client ), Req->argv[0] );
+                       Kill_Nick( Req->argv[0], "Nick collision" );
+                       return CONNECTED;
+               }
+
+               /* Server, zu dem der Client connectiert ist, suchen */
+               intr_c = Client_GetFromToken( Client, atoi( Req->argv[4] ));
+               if( ! intr_c )
+               {
+                       Log( LOG_ERR, "Server %s introduces nick \"%s\" on unknown server!?", Client_ID( Client ), Req->argv[0] );
+                       Kill_Nick( Req->argv[0], "Unknown server" );
+                       return CONNECTED;
+               }
+
+               /* Neue Client-Struktur anlegen */
+               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 );
+               if( ! c )
+               {
+                       /* Eine neue Client-Struktur konnte nicht angelegt werden.
+                        * Der Client muss disconnectiert werden, damit der Netz-
+                        * status konsistent bleibt. */
+                       Log( LOG_ALERT, "Can't create client structure! (on connection %d)", Client_Conn( Client ));
+                       Kill_Nick( Req->argv[0], "Server error" );
+                       return CONNECTED;
+               }
+
+               modes = Client_Modes( c );
+               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": "" );
+               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": "" );
+
+               /* Andere Server, ausser dem Introducer, informieren */
+               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] );
+
+               return CONNECTED;
+       }
+       else return IRC_WriteStrClient( Client, ERR_ALREADYREGISTRED_MSG, Client_ID( Client ));
+} /* IRC_NICK */
+
+
+GLOBAL BOOLEAN IRC_USER( CLIENT *Client, REQUEST *Req )
+{
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+#ifndef STRICT_RFC
+       if( Client_Type( Client ) == CLIENT_GOTNICK || Client_Type( Client ) == CLIENT_GOTPASS || Client_Type( Client ) == CLIENT_UNKNOWN )
+#else
+       if( Client_Type( Client ) == CLIENT_GOTNICK || Client_Type( Client ) == CLIENT_GOTPASS )
+#endif
+       {
+               /* Falsche Anzahl Parameter? */
+               if( Req->argc != 4 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+               Client_SetUser( Client, Req->argv[0], FALSE );
+               Client_SetInfo( Client, Req->argv[3] );
+
+               Log( LOG_DEBUG, "Connection %d: got valid USER command ...", Client_Conn( Client ));
+               if( Client_Type( Client ) == CLIENT_GOTNICK ) return Hello_User( Client );
+               else Client_SetType( Client, CLIENT_GOTUSER );
+               return CONNECTED;
+       }
+       else if( Client_Type( Client ) == CLIENT_USER || Client_Type( Client ) == CLIENT_SERVER || Client_Type( Client ) == CLIENT_SERVICE )
+       {
+               return IRC_WriteStrClient( Client, ERR_ALREADYREGISTRED_MSG, Client_ID( Client ));
+       }
+       else return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
+} /* IRC_USER */
+
+
+GLOBAL BOOLEAN IRC_QUIT( CLIENT *Client, REQUEST *Req )
+{
+       CLIENT *target;
+       
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       if(( Client_Type( Client ) == CLIENT_USER ) || ( Client_Type( Client ) == CLIENT_SERVICE ))
+       {
+               /* User / Service */
+               
+               /* Falsche Anzahl Parameter? */
+               if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+               if( Req->argc == 0 ) Conn_Close( Client_Conn( Client ), "Got QUIT command.", NULL, TRUE );
+               else Conn_Close( Client_Conn( Client ), "Got QUIT command.", Req->argv[0], TRUE );
+               
+               return DISCONNECTED;
+       }
+       else if ( Client_Type( Client ) == CLIENT_SERVER )
+       {
+               /* Server */
+
+               /* Falsche Anzahl Parameter? */
+               if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+               target = Client_Search( Req->prefix );
+               if( ! target )
+               {
+                       Log( LOG_ERR, "Got QUIT from %s for unknown client!?", Client_ID( Client ));
+                       return CONNECTED;
+               }
+
+               if( Req->argc == 0 ) Client_Destroy( target, "Got QUIT command.", NULL );
+               else Client_Destroy( target, "Got QUIT command.", Req->argv[0] );
+
+               return CONNECTED;
+       }
+       else return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
+} /* IRC_QUIT */
+
+
+GLOBAL BOOLEAN IRC_SQUIT( CLIENT *Client, REQUEST *Req )
+{
+       CLIENT *target;
+       CHAR msg[LINE_LEN + 64];
+       
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       /* SQUIT ist nur fuer Server erlaubt */
+       if( Client_Type( Client ) != CLIENT_SERVER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
+
+       /* Falsche Anzahl Parameter? */
+       if( Req->argc != 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+       Log( LOG_DEBUG, "Got SQUIT from %s for \"%s\": \"%s\" ...", Client_ID( Client ), Req->argv[0], Req->argv[1] );
+       
+       /* SQUIT an alle Server weiterleiten */
+       IRC_WriteStrServers( Client, "SQUIT %s :%s", Req->argv[0], Req->argv[1] );
+
+       target = Client_GetFromID( Req->argv[0] );
+       if( ! target )
+       {
+               Log( LOG_ERR, "Got SQUIT from %s for unknown server \"%s\"!?", Client_ID( Client ), Req->argv[0] );
+               return CONNECTED;
+       }
+
+       if( Req->argv[1][0] )
+       {
+               if( strlen( Req->argv[1] ) > LINE_LEN ) Req->argv[1][LINE_LEN] = '\0';
+               sprintf( msg, "%s (SQUIT from %s).", Req->argv[1], Client_ID( Client ));
+       }
+       else sprintf( msg, "Got SQUIT from %s.", Client_ID( Client ));
+
+       if( Client_Conn( target ) > NONE )
+       {
+               /* dieser Server hat die Connection */
+               if( Req->argv[1][0] ) Conn_Close( Client_Conn( target ), msg, Req->argv[1], TRUE );
+               else Conn_Close( Client_Conn( target ), msg, NULL, TRUE );
+               return DISCONNECTED;
+       }
+       else
+       {
+               /* Verbindung hielt anderer Server */
+               Client_Destroy( target, msg, Req->argv[1] );
+               return CONNECTED;
+       }
+} /* IRC_SQUIT */
+
+
+GLOBAL BOOLEAN IRC_PING( CLIENT *Client, REQUEST *Req )
+{
+       CLIENT *target, *from;
+
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
+
+       /* Falsche Anzahl Parameter? */
+       if( Req->argc < 1 ) return IRC_WriteStrClient( Client, ERR_NOORIGIN_MSG, Client_ID( Client ));
+       if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+       if( Req->argc == 2 )
+       {
+               /* es wurde ein Ziel-Client angegeben */
+               target = Client_GetFromID( Req->argv[1] );
+               if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
+               if( target != Client_ThisServer( ))
+               {
+                       /* ok, forwarden */
+                       if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
+                       else from = Client;
+                       if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
+                       return IRC_WriteStrClientPrefix( target, from, "PING %s :%s", Client_ID( from ), Req->argv[1] );
+               }
+       }
+
+       Log( LOG_DEBUG, "Connection %d: got PING, sending PONG ...", Client_Conn( Client ));
+       return IRC_WriteStrClient( Client, "PONG %s :%s", Client_ID( Client_ThisServer( )), Client_ID( Client ));
+} /* IRC_PING */
+
+
+GLOBAL BOOLEAN IRC_PONG( CLIENT *Client, REQUEST *Req )
+{
+       CLIENT *target, *from;
+
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
+
+       /* Falsche Anzahl Parameter? */
+       if( Req->argc < 1 ) return IRC_WriteStrClient( Client, ERR_NOORIGIN_MSG, Client_ID( Client ));
+       if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+       /* forwarden? */
+       if( Req->argc == 2 )
+       {
+               target = Client_GetFromID( Req->argv[1] );
+               if( ! target ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->argv[1] );
+               if( target != Client_ThisServer( ))
+               {
+                       /* ok, forwarden */
+                       if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_GetFromID( Req->prefix );
+                       else from = Client;
+                       if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHSERVER_MSG, Client_ID( Client ), Req->prefix );
+                       return IRC_WriteStrClientPrefix( target, from, "PONG %s :%s", Client_ID( from ), Req->argv[1] );
+               }
+       }
+
+       /* Der Connection-Timestamp wurde schon beim Lesen aus dem Socket
+               * aktualisiert, daher muss das hier nicht mehr gemacht werden. */
+
+       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 )));
+       else Log( LOG_DEBUG, "Connection %d: received PONG.", Client_Conn( Client ));
+
+       return CONNECTED;
+} /* IRC_PONG */
+
+
+LOCAL BOOLEAN Hello_User( CLIENT *Client )
+{
+       assert( Client != NULL );
+
+       /* Passwort ueberpruefen */
+       if( strcmp( Client_Password( Client ), Conf_ServerPwd ) != 0 )
+       {
+               /* Falsches Passwort */
+               Log( LOG_ERR, "User \"%s\" rejected (connection %d): Bad password!", Client_Mask( Client ), Client_Conn( Client ));
+               Conn_Close( Client_Conn( Client ), NULL, "Bad password", TRUE );
+               return DISCONNECTED;
+       }
+
+       Log( LOG_NOTICE, "User \"%s\" registered (connection %d).", Client_Mask( Client ), Client_Conn( Client ));
+
+       /* Andere Server informieren */
+       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 ));
+
+       if( ! IRC_WriteStrClient( Client, RPL_WELCOME_MSG, Client_ID( Client ), Client_Mask( Client ))) return FALSE;
+       if( ! IRC_WriteStrClient( Client, RPL_YOURHOST_MSG, Client_ID( Client ), Client_ID( Client_ThisServer( )))) return FALSE;
+       if( ! IRC_WriteStrClient( Client, RPL_CREATED_MSG, Client_ID( Client ), NGIRCd_StartStr )) return FALSE;
+       if( ! IRC_WriteStrClient( Client, RPL_MYINFO_MSG, Client_ID( Client ), Client_ID( Client_ThisServer( )))) return FALSE;
+
+       Client_SetType( Client, CLIENT_USER );
+
+       if( ! IRC_Send_LUSERS( Client )) return DISCONNECTED;
+       if( ! IRC_Show_MOTD( Client )) return DISCONNECTED;
+
+       return CONNECTED;
+} /* Hello_User */
+
+
+LOCAL VOID Kill_Nick( CHAR *Nick, CHAR *Reason )
+{
+       CLIENT *c;
+
+       assert( Nick != NULL );
+       assert( Reason != NULL );
+
+       Log( LOG_ERR, "User(s) with nick \"%s\" will be disconnected: %s", Nick, Reason );
+
+       /* andere Server benachrichtigen */
+       IRC_WriteStrServers( NULL, "KILL %s :%s", Nick, Reason );
+
+       /* Ggf. einen eigenen Client toeten */
+       c = Client_GetFromID( Nick );
+       if( c && ( Client_Conn( c ) != NONE )) Conn_Close( Client_Conn( c ), NULL, Reason, TRUE );
+} /* Kill_Nick */
+
+
+/* -eof- */
diff --git a/src/ngircd/irc-login.h b/src/ngircd/irc-login.h
new file mode 100644 (file)
index 0000000..5c53aee
--- /dev/null
@@ -0,0 +1,44 @@
+/*
+ * ngIRCd -- The Next Generation IRC Daemon
+ * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
+ *
+ * Dieses Programm ist freie Software. Sie koennen es unter den Bedingungen
+ * der GNU General Public License (GPL), wie von der Free Software Foundation
+ * herausgegeben, weitergeben und/oder modifizieren, entweder unter Version 2
+ * der Lizenz oder (wenn Sie es wuenschen) jeder spaeteren Version.
+ * Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
+ * der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
+ *
+ * $Id: irc-login.h,v 1.1 2002/02/27 23:26:21 alex Exp $
+ *
+ * irc-login.h: Anmeldung und Abmeldung im IRC (Header)
+ *
+ * $Log: irc-login.h,v $
+ * Revision 1.1  2002/02/27 23:26:21  alex
+ * - Modul aus irc.c bzw. irc.h ausgegliedert.
+ *
+ */
+
+
+#ifndef __irc_login_h__
+#define __irc_login_h__
+
+#include "parse.h"
+#include "client.h"
+
+
+GLOBAL BOOLEAN IRC_PASS( CLIENT *Client, REQUEST *Req );
+GLOBAL BOOLEAN IRC_NICK( CLIENT *Client, REQUEST *Req );
+GLOBAL BOOLEAN IRC_USER( CLIENT *Client, REQUEST *Req );
+GLOBAL BOOLEAN IRC_SERVER( CLIENT *Client, REQUEST *Req );
+GLOBAL BOOLEAN IRC_NJOIN( CLIENT *Client, REQUEST *Req );
+GLOBAL BOOLEAN IRC_PING( CLIENT *Client, REQUEST *Req );
+GLOBAL BOOLEAN IRC_PONG( CLIENT *Client, REQUEST *Req );
+GLOBAL BOOLEAN IRC_QUIT( CLIENT *Client, REQUEST *Req );
+GLOBAL BOOLEAN IRC_SQUIT( CLIENT *Client, REQUEST *Req );
+
+
+#endif
+
+
+/* -eof- */
diff --git a/src/ngircd/irc-mode.c b/src/ngircd/irc-mode.c
new file mode 100644 (file)
index 0000000..966f0cc
--- /dev/null
@@ -0,0 +1,393 @@
+/*
+ * ngIRCd -- The Next Generation IRC Daemon
+ * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
+ *
+ * Dieses Programm ist freie Software. Sie koennen es unter den Bedingungen
+ * der GNU General Public License (GPL), wie von der Free Software Foundation
+ * herausgegeben, weitergeben und/oder modifizieren, entweder unter Version 2
+ * der Lizenz oder (wenn Sie es wuenschen) jeder spaeteren Version.
+ * Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
+ * der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
+ *
+ * $Id: irc-mode.c,v 1.1 2002/02/27 23:26:21 alex Exp $
+ *
+ * irc-mode.c: IRC-Befehle zur Mode-Aenderung (MODE, AWAY, ...)
+ *
+ * $Log: irc-mode.c,v $
+ * Revision 1.1  2002/02/27 23:26:21  alex
+ * - Modul aus irc.c bzw. irc.h ausgegliedert.
+ *
+ */
+
+
+#include <portab.h>
+#include "global.h"
+
+#include <imp.h>
+#include <assert.h>
+#include <string.h>
+
+#include "channel.h"
+#include "irc-write.h"
+#include "log.h"
+#include "messages.h"
+
+#include <exp.h>
+#include "irc-mode.h"
+
+
+GLOBAL BOOLEAN IRC_MODE( CLIENT *Client, REQUEST *Req )
+{
+       CHAR *mode_ptr, the_modes[CLIENT_MODE_LEN], x[2];
+       CLIENT *cl, *chan_cl, *prefix;
+       BOOLEAN set, ok;
+       CHANNEL *chan;
+       
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       cl = chan_cl = prefix = NULL;
+       chan = NULL;
+
+       /* Valider Client? */
+       if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
+
+       /* Keine Parameter? */
+       if( Req->argc < 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+       /* Ziel suchen: Client bzw. Channel */
+       if( Client_IsValidNick( Req->argv[0] )) cl = Client_Search( Req->argv[0] );
+       if( Channel_IsValidName( Req->argv[0] )) chan = Channel_Search( Req->argv[0] );
+
+       /* Kein Ziel gefunden? */
+       if(( ! cl ) && ( ! chan )) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[0] );
+
+       assert(( cl && chan ) != TRUE );
+
+       /* Falsche Anzahl Parameter? */
+       if(( cl ) && ( Req->argc > 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+       if(( chan ) && ( Req->argc > 3 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+       /* Client ermitteln, wenn bei Channel-Modes mit 3 Parametern */
+       if(( chan ) && (Req->argc == 3 ))
+       {
+               chan_cl = Client_Search( Req->argv[2] );
+               if( ! chan_cl ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->argv[0] );
+       }
+       
+       /* Wenn Anfragender ein User ist: Zugriff erlaubt? */
+       if( Client_Type( Client ) == CLIENT_USER )
+       {
+               if( cl )
+               {
+                       /* MODE ist nur fuer sich selber zulaessig! */
+                       if( cl != Client ) return IRC_WriteStrClient( Client, ERR_USERSDONTMATCH_MSG, Client_ID( Client ));
+               }
+               if( chan )
+               {
+                       /* Darf der User die Channel-Modes ermitteln? */
+               }
+       }
+
+       /* Werden die Modes "nur" erfragt? */
+       if(( cl ) && ( Req->argc == 1 )) return IRC_WriteStrClient( Client, RPL_UMODEIS_MSG, Client_ID( Client ), Client_Modes( cl ));
+       if(( chan ) && ( Req->argc == 1 )) return IRC_WriteStrClient( Client, RPL_CHANNELMODEIS_MSG, Client_ID( Client ), Channel_Name( chan ), Channel_Modes( chan ));
+
+       mode_ptr = Req->argv[1];
+
+       /* Sollen Modes gesetzt oder geloescht werden? */
+       if( cl )
+       {
+               if( *mode_ptr == '+' ) set = TRUE;
+               else if( *mode_ptr == '-' ) set = FALSE;
+               else return IRC_WriteStrClient( Client, ERR_UMODEUNKNOWNFLAG_MSG, Client_ID( Client ));
+               mode_ptr++;
+       }
+       else
+       {
+               if( *mode_ptr == '-' ) set = FALSE;
+               else set = TRUE;
+               if(( *mode_ptr == '-' ) || ( *mode_ptr == '+' )) mode_ptr++;
+       }
+       
+       /* Prefix fuer Antworten etc. ermitteln */
+       if( Client_Type( Client ) == CLIENT_SERVER )
+       {
+               prefix = Client_GetFromID( Req->prefix );
+               if( ! prefix ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
+       }
+       else prefix = Client;
+
+       /* Reply-String mit Aenderungen vorbereiten */
+       if( set ) strcpy( the_modes, "+" );
+       else strcpy( the_modes, "-" );
+
+       ok = TRUE;
+       x[1] = '\0';
+       while( *mode_ptr )
+       {
+               x[0] = '\0';
+               if( Client_Type( Client ) == CLIENT_SERVER )
+               {
+                       /* Befehl kommt von einem Server, daher
+                        * trauen wir ihm "unbesehen" ... */
+                       x[0] = *mode_ptr;
+
+                       if(( cl ) && ( x[0] == 'a' ))
+                       {
+                               /* away */
+                               if( set ) Client_SetAway( cl, "Away" );
+                               else Client_SetAway( cl, NULL );
+                       }
+                       
+               }
+               else
+               {
+                       /* Modes validieren */
+                       if( cl )
+                       {
+                               /* User-Modes */
+                               switch( *mode_ptr )
+                               {
+                                       case 'i':
+                                               /* invisible */
+                                               x[0] = 'i';
+                                               break;
+                                       case 'r':
+                                               /* restricted (kann nur gesetzt werden) */
+                                               if( set ) x[0] = 'r';
+                                               else ok = IRC_WriteStrClient( Client, ERR_RESTRICTED_MSG, Client_ID( Client ));
+                                               break;
+                                       case 'o':
+                                               /* operator (kann nur geloescht werden) */
+                                               if( ! set )
+                                               {
+                                                       Client_SetOperByMe( Client, FALSE );
+                                                       x[0] = 'o';
+                                               }
+                                               else ok = IRC_WriteStrClient( Client, ERR_UMODEUNKNOWNFLAG_MSG, Client_ID( Client ));
+                                               break;
+                                       default:
+                                               Log( LOG_DEBUG, "Unknown mode \"%c%c\" from \"%s\"!?", set ? '+' : '-', *mode_ptr, Client_ID( Client ));
+                                               ok = IRC_WriteStrClient( Client, ERR_UMODEUNKNOWNFLAG2_MSG, Client_ID( Client ), set ? '+' : '-', *mode_ptr );
+                                               x[0] = '\0';
+                               }
+                       }
+                       if( chan )
+                       {
+                               /* Ist der User ein Channel Operator? */
+                               if( ! strchr( Channel_UserModes( chan, Client ), 'o' ))
+                               {
+                                       Log( LOG_DEBUG, "Can't change modes: \"%s\" is not operator on %s!", Client_ID( Client ), Channel_Name( chan ));
+                                       ok = IRC_WriteStrClient( Client, ERR_CHANOPRIVSNEEDED_MSG, Client_ID( Client ), Channel_Name( chan ));
+                                       break;
+                               }
+                               
+                               /* Channel-Modes oder Channel-User-Modes */
+                               if( chan_cl )
+                               {
+                                       /* Channel-User-Modes */
+                                       switch( *mode_ptr )
+                                       {
+                                               case 'o':
+                                                       /* Channel Operator */
+                                                       x[0] = 'o';
+                                                       break;
+                                               case 'v':
+                                                       /* Voice */
+                                                       x[0] = 'v';
+                                                       break;
+                                               default:
+                                                       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 ));
+                                                       ok = IRC_WriteStrClient( Client, ERR_UMODEUNKNOWNFLAG2_MSG, Client_ID( Client ), set ? '+' : '-', *mode_ptr );
+                                                       x[0] = '\0';
+                                       }
+                               }
+                               else
+                               {
+                                       /* Channel-Modes */
+                                       switch( *mode_ptr )
+                                       {
+                                               case 'a':
+                                                       /* Anonymous */
+                                                       x[0] = 'a';
+                                                       break;
+                                               case 'm':
+                                                       /* Moderated */
+                                                       x[0] = 'm';
+                                                       break;
+                                               case 'n':
+                                                       /* kein Schreiben in den Channel von aussen */
+                                                       x[0] = 'n';
+                                                       break;
+                                               case 'p':
+                                                       /* Private */
+                                                       x[0] = 'p';
+                                                       break;
+                                               case 'q':
+                                                       /* Quiet */
+                                                       x[0] = 'q';
+                                                       break;
+                                               case 's':
+                                                       /* Secret */
+                                                       x[0] = 's';
+                                                       break;
+                                               case 't':
+                                                       /* Topic Lock */
+                                                       x[0] = 't';
+                                                       break;
+                                               default:
+                                                       Log( LOG_DEBUG, "Unknown channel-mode \"%c%c\" from \"%s\" at %s!?", set ? '+' : '-', *mode_ptr, Client_ID( Client ), Channel_Name( chan ));
+                                                       ok = IRC_WriteStrClient( Client, ERR_UMODEUNKNOWNFLAG2_MSG, Client_ID( Client ), set ? '+' : '-', *mode_ptr );
+                                                       x[0] = '\0';
+                                       }
+                               }
+                       }
+               }
+               if( ! ok ) break;
+               
+               mode_ptr++;
+               if( ! x[0] ) continue;
+
+               /* Okay, gueltigen Mode gefunden */
+               if( cl )
+               {
+                       /* Es geht um User-Modes */
+                       if( set )
+                       {
+                               /* Mode setzen. Wenn der Client ihn noch nicht hatte: merken */
+                               if( Client_ModeAdd( cl, x[0] )) strcat( the_modes, x );
+                       }
+                       else
+                       {
+                               /* Modes geloescht. Wenn der Client ihn hatte: merken */
+                               if( Client_ModeDel( cl, x[0] )) strcat( the_modes, x );
+                       }
+               }
+               if( chan )
+               {
+                       /* Es geht um Channel-Modes oder Channel-User-Modes */
+                       if( chan_cl )
+                       {
+                               /* Channel-User-Modes */
+                               if( set )
+                               {
+                                       /* Mode setzen. Wenn der Channel ihn noch nicht hatte: merken */
+                                       if( Channel_UserModeAdd( chan, chan_cl, x[0] )) strcat( the_modes, x );
+                               }
+                               else
+                               {
+                                       /* Mode setzen. Wenn der Channel ihn noch nicht hatte: merken */
+                                       if( Channel_UserModeDel( chan, chan_cl, x[0] )) strcat( the_modes, x );
+                               }
+                       }
+                       else
+                       {
+                               /* Channel-Mode */
+                               if( set )
+                               {
+                                       /* Mode setzen. Wenn der Channel ihn noch nicht hatte: merken */
+                                       if( Channel_ModeAdd( chan, x[0] )) strcat( the_modes, x );
+                               }
+                               else
+                               {
+                                       /* Mode setzen. Wenn der Channel ihn noch nicht hatte: merken */
+                                       if( Channel_ModeDel( chan, x[0] )) strcat( the_modes, x );
+                               }
+                       }
+               }
+       }
+
+       /* Wurden Modes geaendert? */
+       if( the_modes[1] )
+       {
+               if( cl )
+               {
+                       /* Client-Mode */
+                       if( Client_Type( Client ) == CLIENT_SERVER )
+                       {
+                               /* Modes an andere Server forwarden */
+                               IRC_WriteStrServersPrefix( Client, prefix, "MODE %s :%s", Client_ID( cl ), the_modes );
+                       }
+                       else
+                       {
+                               /* Bestaetigung an Client schicken & andere Server informieren */
+                               ok = IRC_WriteStrClientPrefix( Client, prefix, "MODE %s %s", Client_ID( cl ), the_modes );
+                               IRC_WriteStrServersPrefix( Client, prefix, "MODE %s :%s", Client_ID( cl ), the_modes );
+                       }
+                       Log( LOG_DEBUG, "User \"%s\": Mode change, now \"%s\".", Client_Mask( cl ), Client_Modes( cl ));
+               }
+               if( chan )
+               {
+                       /* Channel-Modes oder Channel-User-Mode */
+                       if( chan_cl )
+                       {
+                               /* Channel-User-Mode */
+                               if( Client_Type( Client ) == CLIENT_SERVER )
+                               {
+                                       /* Modes an andere Server und Channel-User forwarden */
+                                       IRC_WriteStrServersPrefix( Client, prefix, "MODE %s %s :%s", Channel_Name( chan ), the_modes, Client_ID( chan_cl));
+                                       IRC_WriteStrChannelPrefix( Client, chan, prefix, FALSE, "MODE %s %s %s", Channel_Name( chan ), the_modes, Client_ID( chan_cl));
+                               }
+                               else
+                               {
+                                       /* Bestaetigung an Client schicken & andere Server sowie Channel-User informieren */
+                                       ok = IRC_WriteStrClientPrefix( Client, prefix, "MODE %s %s %s", Channel_Name( chan ), the_modes, Client_ID( chan_cl));
+                                       IRC_WriteStrServersPrefix( Client, prefix, "MODE %s %s :%s", Channel_Name( chan ), the_modes, Client_ID( chan_cl));
+                                       IRC_WriteStrChannelPrefix( Client, chan, prefix, FALSE, "MODE %s %s %s", Channel_Name( chan ), the_modes, Client_ID( chan_cl));
+                               }
+                               Log( LOG_DEBUG, "User \"%s\" on %s: Mode change, now \"%s\".", Client_Mask( chan_cl), Channel_Name( chan ), Channel_UserModes( chan, chan_cl ));
+                       }
+                       else
+                       {
+                               /* Channel-Mode */
+                               if( Client_Type( Client ) == CLIENT_SERVER )
+                               {
+                                       /* Modes an andere Server und Channel-User forwarden */
+                                       IRC_WriteStrServersPrefix( Client, prefix, "MODE %s :%s", Channel_Name( chan ), the_modes );
+                                       IRC_WriteStrChannelPrefix( Client, chan, prefix, FALSE, "MODE %s %s", Channel_Name( chan ), the_modes );
+                               }
+                               else
+                               {
+                                       /* Bestaetigung an Client schicken & andere Server sowie Channel-User informieren */
+                                       ok = IRC_WriteStrClientPrefix( Client, prefix, "MODE %s %s", Channel_Name( chan ), the_modes );
+                                       IRC_WriteStrServersPrefix( Client, prefix, "MODE %s :%s", Channel_Name( chan ), the_modes );
+                                       IRC_WriteStrChannelPrefix( Client, chan, prefix, FALSE, "MODE %s %s", Channel_Name( chan ), the_modes );
+                               }
+                               Log( LOG_DEBUG, "Channel \"%s\": Mode change, now \"%s\".", Channel_Name( chan ), Channel_Modes( chan ));
+                       }
+               }
+       }
+
+       return ok;
+} /* IRC_MODE */
+
+
+GLOBAL BOOLEAN IRC_AWAY( CLIENT *Client, REQUEST *Req )
+{
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       if( Client_Type( Client ) != CLIENT_USER ) return IRC_WriteStrClient( Client, ERR_NOTREGISTERED_MSG, Client_ID( Client ));
+
+       /* Falsche Anzahl Parameter? */
+       if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+       if(( Req->argc == 1 ) && (Req->argv[0][0] ))
+       {
+               /* AWAY setzen */
+               Client_SetAway( Client, Req->argv[0] );
+               IRC_WriteStrServersPrefix( Client, Client, "MODE %s :+a", Client_ID( Client ));
+               return IRC_WriteStrClient( Client, RPL_NOWAWAY_MSG, Client_ID( Client ));
+       }
+       else
+       {
+               /* AWAY loeschen */
+               Client_SetAway( Client, NULL );
+               IRC_WriteStrServersPrefix( Client, Client, "MODE %s :-a", Client_ID( Client ));
+               return IRC_WriteStrClient( Client, RPL_UNAWAY_MSG, Client_ID( Client ));
+       }
+} /* IRC_AWAY */
+
+
+/* -eof- */
diff --git a/src/ngircd/irc-mode.h b/src/ngircd/irc-mode.h
new file mode 100644 (file)
index 0000000..cef76b3
--- /dev/null
@@ -0,0 +1,37 @@
+/*
+ * ngIRCd -- The Next Generation IRC Daemon
+ * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
+ *
+ * Dieses Programm ist freie Software. Sie koennen es unter den Bedingungen
+ * der GNU General Public License (GPL), wie von der Free Software Foundation
+ * herausgegeben, weitergeben und/oder modifizieren, entweder unter Version 2
+ * der Lizenz oder (wenn Sie es wuenschen) jeder spaeteren Version.
+ * Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
+ * der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
+ *
+ * $Id: irc-mode.h,v 1.1 2002/02/27 23:26:21 alex Exp $
+ *
+ * irc-mode.h: IRC-Befehle zur Mode-Aenderung (MODE, AWAY, ...) (Header)
+ *
+ * $Log: irc-mode.h,v $
+ * Revision 1.1  2002/02/27 23:26:21  alex
+ * - Modul aus irc.c bzw. irc.h ausgegliedert.
+ *
+ */
+
+
+#ifndef __irc_mode_h__
+#define __irc_mode_h__
+
+#include "parse.h"
+#include "client.h"
+
+
+GLOBAL BOOLEAN IRC_MODE( CLIENT *Client, REQUEST *Req );
+GLOBAL BOOLEAN IRC_AWAY( CLIENT *Client, REQUEST *Req );
+
+
+#endif
+
+
+/* -eof- */
\ No newline at end of file
diff --git a/src/ngircd/irc-write.c b/src/ngircd/irc-write.c
new file mode 100644 (file)
index 0000000..e72cec9
--- /dev/null
@@ -0,0 +1,275 @@
+/*
+ * ngIRCd -- The Next Generation IRC Daemon
+ * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
+ *
+ * Dieses Programm ist freie Software. Sie koennen es unter den Bedingungen
+ * der GNU General Public License (GPL), wie von der Free Software Foundation
+ * herausgegeben, weitergeben und/oder modifizieren, entweder unter Version 2
+ * der Lizenz oder (wenn Sie es wuenschen) jeder spaeteren Version.
+ * Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
+ * der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
+ *
+ * $Id: irc-write.c,v 1.1 2002/02/27 23:26:21 alex Exp $
+ *
+ * irc-write.c: IRC-Texte und Befehle ueber Netzwerk versenden
+ *
+ * $Log: irc-write.c,v $
+ * Revision 1.1  2002/02/27 23:26:21  alex
+ * - Modul aus irc.c bzw. irc.h ausgegliedert.
+ *
+ */
+
+
+#include <portab.h>
+#include "global.h"
+
+#include <imp.h>
+#include <assert.h>
+#include <stdarg.h>
+#include <stdio.h>
+
+#include <exp.h>
+#include "irc-write.h"
+
+
+CHAR *Get_Prefix( CLIENT *Target, CLIENT *Client );
+
+
+GLOBAL BOOLEAN IRC_WriteStrClient( CLIENT *Client, CHAR *Format, ... )
+{
+       CHAR buffer[1000];
+       BOOLEAN ok = CONNECTED;
+       va_list ap;
+
+       assert( Client != NULL );
+       assert( Format != NULL );
+
+       va_start( ap, Format );
+       vsnprintf( buffer, 1000, Format, ap );
+       va_end( ap );
+
+       /* an den Client selber */
+       ok = IRC_WriteStrClientPrefix( Client, Client_ThisServer( ), buffer );
+
+       return ok;
+} /* IRC_WriteStrClient */
+
+
+GLOBAL BOOLEAN IRC_WriteStrClientPrefix( CLIENT *Client, CLIENT *Prefix, CHAR *Format, ... )
+{
+       /* Text an Clients, lokal bzw. remote, senden. */
+
+       CHAR buffer[1000];
+       va_list ap;
+
+       assert( Client != NULL );
+       assert( Format != NULL );
+       assert( Prefix != NULL );
+
+       va_start( ap, Format );
+       vsnprintf( buffer, 1000, Format, ap );
+       va_end( ap );
+
+       return Conn_WriteStr( Client_Conn( Client_NextHop( Client )), ":%s %s", Get_Prefix( Client_NextHop( Client ), Prefix ), buffer );
+} /* IRC_WriteStrClientPrefix */
+
+
+GLOBAL BOOLEAN IRC_WriteStrChannel( CLIENT *Client, CHANNEL *Chan, BOOLEAN Remote, CHAR *Format, ... )
+{
+       CHAR buffer[1000];
+       va_list ap;
+
+       assert( Client != NULL );
+       assert( Format != NULL );
+
+       va_start( ap, Format );
+       vsnprintf( buffer, 1000, Format, ap );
+       va_end( ap );
+
+       return IRC_WriteStrChannelPrefix( Client, Chan, Client_ThisServer( ), Remote, buffer );
+} /* IRC_WriteStrChannel */
+
+
+GLOBAL BOOLEAN IRC_WriteStrChannelPrefix( CLIENT *Client, CHANNEL *Chan, CLIENT *Prefix, BOOLEAN Remote, CHAR *Format, ... )
+{
+       BOOLEAN sock[MAX_CONNECTIONS], is_server[MAX_CONNECTIONS], ok = CONNECTED;
+       CHAR buffer[1000];
+       CL2CHAN *cl2chan;
+       CLIENT *c;
+       INT s, i;
+       va_list ap;
+
+       assert( Client != NULL );
+       assert( Chan != NULL );
+       assert( Prefix != NULL );
+       assert( Format != NULL );
+
+       va_start( ap, Format );
+       vsnprintf( buffer, 1000, Format, ap );
+       va_end( ap );
+
+       for( i = 0; i < MAX_CONNECTIONS; i++ ) sock[i] = FALSE;
+
+       /* An alle Clients, die in den selben Channels sind.
+        * Dabei aber nur einmal je Remote-Server */
+       cl2chan = Channel_FirstMember( Chan );
+       while( cl2chan )
+       {
+               c = Channel_GetClient( cl2chan );
+               if( ! Remote )
+               {
+                       if( Client_Conn( c ) <= NONE ) c = NULL;
+                       else if( Client_Type( c ) == CLIENT_SERVER ) c = NULL;
+               }
+               if( c ) c = Client_NextHop( c );
+                       
+               if( c && ( c != Client ))
+               {
+                       /* Ok, anderer Client */
+                       s = Client_Conn( c );
+                       assert( s >= 0 );
+                       assert( s < MAX_CONNECTIONS );
+                       sock[s] = TRUE;
+                       if( Client_Type( c ) == CLIENT_SERVER ) is_server[s] = TRUE;
+                       else is_server[s] = FALSE;
+               }
+               cl2chan = Channel_NextMember( Chan, cl2chan );
+       }
+
+       /* Senden ... */
+       for( i = 0; i < MAX_CONNECTIONS; i++ )
+       {
+               if( sock[i] )
+               {
+                       if( is_server[i] ) ok = Conn_WriteStr( i, ":%s %s", Client_ID( Prefix ), buffer );
+                       else ok = Conn_WriteStr( i, ":%s %s", Client_Mask( Prefix ), buffer );
+                       if( ! ok ) break;
+               }
+       }
+       return ok;
+} /* IRC_WriteStrChannelPrefix */
+
+
+GLOBAL VOID IRC_WriteStrServers( CLIENT *ExceptOf, CHAR *Format, ... )
+{
+       CHAR buffer[1000];
+       va_list ap;
+
+       assert( Format != NULL );
+
+       va_start( ap, Format );
+       vsnprintf( buffer, 1000, Format, ap );
+       va_end( ap );
+
+       /* an den Client selber */
+       return IRC_WriteStrServersPrefix( ExceptOf, Client_ThisServer( ), buffer );
+} /* IRC_WriteStrServers */
+
+
+GLOBAL VOID IRC_WriteStrServersPrefix( CLIENT *ExceptOf, CLIENT *Prefix, CHAR *Format, ... )
+{
+       CHAR buffer[1000];
+       CLIENT *c;
+       va_list ap;
+       
+       assert( Format != NULL );
+       assert( Prefix != NULL );
+
+       va_start( ap, Format );
+       vsnprintf( buffer, 1000, Format, ap );
+       va_end( ap );
+       
+       c = Client_First( );
+       while( c )
+       {
+               if(( Client_Type( c ) == CLIENT_SERVER ) && ( Client_Conn( c ) > NONE ) && ( c != Client_ThisServer( )) && ( c != ExceptOf ))
+               {
+                       /* Ziel-Server gefunden */
+                       IRC_WriteStrClientPrefix( c, Prefix, buffer );
+               }
+               c = Client_Next( c );
+       }
+} /* IRC_WriteStrServersPrefix */
+
+
+GLOBAL BOOLEAN IRC_WriteStrRelatedPrefix( CLIENT *Client, CLIENT *Prefix, BOOLEAN Remote, CHAR *Format, ... )
+{
+       BOOLEAN sock[MAX_CONNECTIONS], is_server[MAX_CONNECTIONS], ok = CONNECTED;
+       CL2CHAN *chan_cl2chan, *cl2chan;
+       CHAR buffer[1000];
+       CHANNEL *chan;
+       va_list ap;
+       CLIENT *c;
+       INT i, s;
+
+       assert( Client != NULL );
+       assert( Prefix != NULL );
+       assert( Format != NULL );
+
+       va_start( ap, Format );
+       vsnprintf( buffer, 1000, Format, ap );
+       va_end( ap );
+
+       /* initialisieren */
+       for( i = 0; i < MAX_CONNECTIONS; i++ ) sock[i] = FALSE;
+
+       /* An alle Clients, die in einem Channel mit dem "Ausloeser" sind,
+        * den Text schicken. An Remote-Server aber jeweils nur einmal. */
+       chan_cl2chan = Channel_FirstChannelOf( Client );
+       while( chan_cl2chan )
+       {
+               /* Channel des Users durchsuchen */
+               chan = Channel_GetChannel( chan_cl2chan );
+               cl2chan = Channel_FirstMember( chan );
+               while( cl2chan )
+               {
+                       c = Channel_GetClient( cl2chan );
+                       if( ! Remote )
+                       {
+                               if( Client_Conn( c ) <= NONE ) c = NULL;
+                               else if( Client_Type( c ) == CLIENT_SERVER ) c = NULL;
+                       }
+                       if( c ) c = Client_NextHop( c );
+
+                       if( c && ( c != Client ))
+                       {
+                               /* Ok, anderer Client */
+                               s = Client_Conn( c );
+                               assert( s >= 0 );
+                               assert( s < MAX_CONNECTIONS );
+                               sock[s] = TRUE;
+                               if( Client_Type( c ) == CLIENT_SERVER ) is_server[s] = TRUE;
+                               else is_server[s] = FALSE;
+                       }
+                       cl2chan = Channel_NextMember( chan, cl2chan );
+               }
+               
+               /* naechsten Channel */
+               chan_cl2chan = Channel_NextChannelOf( Client, chan_cl2chan );
+       }
+
+       /* Senden ... */
+       for( i = 0; i < MAX_CONNECTIONS; i++ )
+       {
+               if( sock[i] )
+               {
+                       if( is_server[i] ) ok = Conn_WriteStr( i, ":%s %s", Client_ID( Prefix ), buffer );
+                       else ok = Conn_WriteStr( i, ":%s %s", Client_Mask( Prefix ), buffer );
+                       if( ! ok ) break;
+               }
+       }
+       return ok;
+} /* IRC_WriteStrRelatedPrefix */
+
+
+CHAR *Get_Prefix( CLIENT *Target, CLIENT *Client )
+{
+       assert( Target != NULL );
+       assert( Client != NULL );
+
+       if( Client_Type( Target ) == CLIENT_SERVER ) return Client_ID( Client );
+       else return Client_Mask( Client );
+} /* Get_Prefix */
+
+
+/* -eof- */
diff --git a/src/ngircd/irc-write.h b/src/ngircd/irc-write.h
new file mode 100644 (file)
index 0000000..087d12e
--- /dev/null
@@ -0,0 +1,44 @@
+/*
+ * ngIRCd -- The Next Generation IRC Daemon
+ * Copyright (c)2001,2002 by Alexander Barton (alex@barton.de)
+ *
+ * Dieses Programm ist freie Software. Sie koennen es unter den Bedingungen
+ * der GNU General Public License (GPL), wie von der Free Software Foundation
+ * herausgegeben, weitergeben und/oder modifizieren, entweder unter Version 2
+ * der Lizenz oder (wenn Sie es wuenschen) jeder spaeteren Version.
+ * Naehere Informationen entnehmen Sie bitter der Datei COPYING. Eine Liste
+ * der an ngIRCd beteiligten Autoren finden Sie in der Datei AUTHORS.
+ *
+ * $Id: irc-write.h,v 1.1 2002/02/27 23:26:21 alex Exp $
+ *
+ * irc-write.h: IRC-Texte und Befehle ueber Netzwerk versenden (Header)
+ *
+ * $Log: irc-write.h,v $
+ * Revision 1.1  2002/02/27 23:26:21  alex
+ * - Modul aus irc.c bzw. irc.h ausgegliedert.
+ *
+ */
+
+
+#ifndef __irc_write_h__
+#define __irc_write_h__
+
+#include "channel.h"
+
+
+GLOBAL BOOLEAN IRC_WriteStrClient( CLIENT *Client, CHAR *Format, ... );
+GLOBAL BOOLEAN IRC_WriteStrClientPrefix( CLIENT *Client, CLIENT *Prefix, CHAR *Format, ... );
+
+GLOBAL BOOLEAN IRC_WriteStrChannel( CLIENT *Client, CHANNEL *Chan, BOOLEAN Remote, CHAR *Format, ... );
+GLOBAL BOOLEAN IRC_WriteStrChannelPrefix( CLIENT *Client, CHANNEL *Chan, CLIENT *Prefix, BOOLEAN Remote, CHAR *Format, ... );
+
+GLOBAL VOID IRC_WriteStrServers( CLIENT *ExceptOf, CHAR *Format, ... );
+GLOBAL VOID IRC_WriteStrServersPrefix( CLIENT *ExceptOf, CLIENT *Prefix, CHAR *Format, ... );
+
+GLOBAL BOOLEAN IRC_WriteStrRelatedPrefix( CLIENT *Client, CLIENT *Prefix, BOOLEAN Remote, CHAR *Format, ... );
+
+
+#endif
+
+
+/* -eof- */