]> arthur.barton.de Git - ngircd-alex.git/blobdiff - src/ngircd/irc.c
The KILL command killed much more than desired (including server links!)
[ngircd-alex.git] / src / ngircd / irc.c
index 1209901d3e1b89259f16a6e76609407c832e93fd..98dda7af2ad6dc198ff61ad368c1e471b4b95d5d 100644 (file)
 /*
  * ngIRCd -- The Next Generation IRC Daemon
- * Copyright (c)2001 by Alexander Barton (alex@barton.de)
+ * Copyright (c)2001-2004 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 comBase beteiligten Autoren finden Sie in der Datei AUTHORS.
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ * Please read the file COPYING, README and AUTHORS for more information.
  *
- * $Id: irc.c,v 1.6 2001/12/25 23:13:33 alex Exp $
- *
- * irc.c: IRC-Befehle
- *
- * $Log: irc.c,v $
- * Revision 1.6  2001/12/25 23:13:33  alex
- * - Debug-Meldungen angepasst.
- *
- * Revision 1.5  2001/12/25 22:02:42  alex
- * - neuer IRC-Befehl "/QUIT". Verbessertes Logging & Debug-Ausgaben.
- *
- * Revision 1.4  2001/12/25 19:19:30  alex
- * - bessere Fehler-Abfragen, diverse Bugfixes.
- * - Nicks werden nur einmal vergeben :-)
- * - /MOTD wird unterstuetzt.
- *
- * Revision 1.3  2001/12/24 01:34:06  alex
- * - USER und NICK wird nun in beliebiger Reihenfolge akzeptiert (wg. BitchX)
- * - MOTD-Ausgabe begonnen zu implementieren.
- *
- * Revision 1.2  2001/12/23 21:57:16  alex
- * - erste IRC-Befehle zu implementieren begonnen.
- *
- * Revision 1.1  2001/12/14 08:13:43  alex
- * - neues Modul begonnen :-)
+ * IRC commands
  */
 
 
-#include <portab.h>
-#include "global.h"
+#include "portab.h"
+
+static char UNUSED id[] = "$Id: irc.c,v 1.128 2005/08/02 23:19:22 alex Exp $";
 
-#include <imp.h>
+#include "imp.h"
 #include <assert.h>
-#include <stdarg.h>
 #include <stdio.h>
 #include <string.h>
 
+#include "ngircd.h"
+#include "conn.h"
+#include "resolve.h"
+#include "conf.h"
+#include "conn-func.h"
 #include "client.h"
+#include "channel.h"
+#include "defines.h"
+#include "irc-write.h"
 #include "log.h"
 #include "messages.h"
 #include "parse.h"
 
-#include <exp.h>
+#include "exp.h"
 #include "irc.h"
 
 
-#define CONNECTED TRUE
-#define DISCONNECTED FALSE
-
-
-LOCAL BOOLEAN Check_Valid_User( CLIENT *Client );
+static char *Option_String PARAMS(( CONN_ID Idx ));
 
-LOCAL BOOLEAN Hello_User( CLIENT *Client );
-LOCAL BOOLEAN Show_MOTD( CLIENT *Client );
 
-
-GLOBAL VOID IRC_Init( VOID )
+GLOBAL bool
+IRC_ERROR( CLIENT *Client, REQUEST *Req )
 {
-} /* IRC_Init */
+       assert( Client != NULL );
+       assert( Req != NULL );
 
+       if( Req->argc < 1 ) Log( LOG_NOTICE, "Got ERROR from \"%s\"!", Client_Mask( Client ));
+       else Log( LOG_NOTICE, "Got ERROR from \"%s\": %s!", Client_Mask( Client ), Req->argv[0] );
 
-GLOBAL VOID IRC_Exit( VOID )
-{
-} /* IRC_Exit */
+       return CONNECTED;
+} /* IRC_ERROR */
 
 
-GLOBAL BOOLEAN IRC_WriteStr_Client( CLIENT *Client, CLIENT *Prefix, CHAR *Format, ... )
+/**
+ * Kill client on request.
+ * This function implements the IRC command "KILL" wich is used to selectively
+ * disconnect clients. It can be used by IRC operators and servers, for example
+ * to "solve" nick collisions after netsplits.
+ * Please note that this function is also called internally, without a real
+ * KILL command beeing received over the network! Client is Client_ThisServer()
+ * in this case. */
+GLOBAL bool
+IRC_KILL( CLIENT *Client, REQUEST *Req )
 {
-       /* Text an Clients, lokal bzw. remote, senden. */
-
-       CHAR buffer[1000];
-       BOOLEAN ok = CONNECTED;
-       va_list ap;
+       CLIENT *prefix, *c;
+       char reason[COMMAND_LEN], *msg;
+       CONN_ID my_conn, conn;
 
        assert( Client != NULL );
-       assert( Format != NULL );
-
-       va_start( ap, Format );
+       assert( Req != NULL );
 
-       if( Client->conn_id != NONE )
+       if(( Client_Type( Client ) != CLIENT_SERVER ) &&
+          ( ! Client_OperByMe( Client )))
        {
-               /* Lokaler Client */
-               vsnprintf( buffer, 1000, Format, ap );
-               if( Prefix ) ok = Conn_WriteStr( Client->conn_id, ":%s %s", Prefix->host, buffer );
-               else ok = Conn_WriteStr( Client->conn_id, buffer );
+               /* The originator of the KILL is neither an IRC operator of
+                * this server nor a server. */
+               return IRC_WriteStrClient( Client, ERR_NOPRIVILEGES_MSG,
+                                          Client_ID( Client ));
        }
-       else
+
+       if( Req->argc != 2 )
        {
-               /* Remote-Client */
-               Log( LOG_EMERG, "not implemented: IRC_WriteStr_Client()" );
+               /* This command requires exactly 2 parameters! */
+               return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG,
+                                          Client_ID( Client ), Req->command );
        }
 
-       va_end( ap );
-       return ok;
-} /* IRC_WriteStr_Client */
-
-
-GLOBAL BOOLEAN IRC_PASS( CLIENT *Client, REQUEST *Req )
-{
-       assert( Client != NULL );
-       assert( Req != NULL );
+       if( Req->prefix ) prefix = Client_Search( Req->prefix );
+       else prefix = Client;
+       if( ! prefix )
+       {
+               Log( LOG_WARNING, "Got KILL with invalid prefix: \"%s\"!",
+                    Req->prefix );
+               prefix = Client_ThisServer( );
+       }
 
-       if( Client->type == CLIENT_UNKNOWN )
+       if( Client != Client_ThisServer( ))
        {
-               Log( LOG_DEBUG, "Connection %d: got PASS command ...", Client->conn_id );
-               return IRC_WriteStr_Client( Client, This_Server, ERR_UNKNOWNCOMMAND_MSG, Req->command );
+               /* This is a "real" KILL received from the network. */
+               Log( LOG_NOTICE|LOG_snotice, "Got KILL command from \"%s\" for \"%s\": %s",
+                    Client_Mask( prefix ), Req->argv[0], Req->argv[1] );
        }
-       else return IRC_WriteStr_Client( Client, This_Server, ERR_ALREADYREGISTRED_MSG );
-} /* IRC_PASS */
 
+       /* Build reason string */
+       if( Client_Type( Client ) == CLIENT_USER )
+       {
+               /* Prefix the "reason" if the originator is a regular user,
+                * so users can't spoof KILLs of servers. */
+               snprintf( reason, sizeof( reason ), "KILLed by %s: %s",
+                         Client_ID( Client ), Req->argv[1] );
+       }
+       else
+               strlcpy( reason, Req->argv[1], sizeof( reason ));
 
-GLOBAL BOOLEAN IRC_NICK( CLIENT *Client, REQUEST *Req )
-{
-       CLIENT *c;
+       /* Inform other servers */
+       IRC_WriteStrServersPrefix( Client, prefix, "KILL %s :%s",
+                                  Req->argv[0], reason );
 
-       assert( Client != NULL );
-       assert( Req != NULL );
+       /* Save ID of this connection */
+       my_conn = Client_Conn( Client );
 
-       if( Client->type != CLIENT_SERVER && Client->type != CLIENT_SERVICE )
+       /* Do we host such a client? */
+       c = Client_Search( Req->argv[0] );
+       if( c )
        {
-               /* Falsche Anzahl Parameter? */
-               if( Req->argc != 1 ) return IRC_WriteStr_Client( Client, This_Server, ERR_NEEDMOREPARAMS_MSG );
-
-               /* Nick zu lang? */
-               if( strlen( Req->argv[0] ) > CLIENT_NICK_LEN ) return IRC_WriteStr_Client( Client, This_Server, ERR_ERRONEUSNICKNAME_MSG, Req->argv[0] );
-
-               /* pruefen, ob Nick bereits vergeben */
-               c = My_Clients;
-               while( c )
+               if(( Client_Type( c ) != CLIENT_USER ) &&
+                  ( Client_Type( c ) != CLIENT_GOTNICK ))
                {
-                       if( strcasecmp( c->nick, Req->argv[0] ) == 0 )
+                       /* Target of this KILL is not a regular user, this is
+                        * invalid! So we ignore this case if we received a
+                        * regular KILL from the network and try to kill the
+                        * client/connection anyway (but log an error!) if the
+                        * origin is the local server. */
+
+                       if( Client != Client_ThisServer( ))
                        {
-                               /* den Nick gibt es bereits */
-                               return IRC_WriteStr_Client( Client, This_Server, ERR_NICKNAMEINUSE_MSG, Req->argv[0] );
+                               /* Invalid KILL received from remote */
+                               if( Client_Type( c ) == CLIENT_SERVER )
+                                       msg = ERR_CANTKILLSERVER_MSG;
+                               else
+                                       msg = ERR_NOPRIVILEGES_MSG;
+                               return IRC_WriteStrClient( Client, msg,
+                                       Client_ID( Client ));
                        }
-                       c = c->next;
+
+                       Log( LOG_ERR, "Got KILL for invalid client type: %d, \"%s\"!",
+                            Client_Type( c ), Req->argv[0] );
                }
 
-               /* Client-Nick registrieren */
-               strcpy( Client->nick, Req->argv[0] );
+               /* Kill client NOW! */
+               conn = Client_Conn( c );
+               Client_Destroy( c, NULL, reason, false );
+               if( conn > NONE )
+                       Conn_Close( conn, NULL, reason, true );
+       }
+       else
+               Log( LOG_NOTICE, "Client with nick \"%s\" is unknown here.", Req->argv[0] );
 
-               if( Client->type != CLIENT_USER )
-               {
-                       /* Neuer Client */
-                       Log( LOG_DEBUG, "Connection %d: got NICK command ...", Client->conn_id );
-                       if( Client->type == CLIENT_GOTUSER ) return Hello_User( Client );
-                       else Client->type = CLIENT_GOTNICK;
-               }
+       /* Are we still connected or were we killed, too? */
+       if(( my_conn > NONE ) && ( Client_GetFromConn( my_conn )))
                return CONNECTED;
-       }
-       else return IRC_WriteStr_Client( Client, This_Server, ERR_ALREADYREGISTRED_MSG );
-} /* IRC_NICK */
+       else
+               return DISCONNECTED;
+} /* IRC_KILL */
 
 
-GLOBAL BOOLEAN IRC_USER( CLIENT *Client, REQUEST *Req )
+GLOBAL bool
+IRC_NOTICE( CLIENT *Client, REQUEST *Req )
 {
+       CLIENT *to, *from;
+
        assert( Client != NULL );
        assert( Req != NULL );
 
-       if( Client->type == CLIENT_UNKNOWN || Client->type == CLIENT_GOTNICK || Client->type == CLIENT_GOTPASS )
-       {
-               /* Falsche Anzahl Parameter? */
-               if( Req->argc != 4 ) return IRC_WriteStr_Client( Client, This_Server, ERR_NEEDMOREPARAMS_MSG );
+       if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return CONNECTED;
 
-               strncpy( Client->user, Req->argv[0], CLIENT_USER_LEN );
-               Client->user[CLIENT_USER_LEN] = '\0';
-               strncpy( Client->name, Req->argv[3], CLIENT_NAME_LEN );
-               Client->name[CLIENT_NAME_LEN] = '\0';
+       /* Falsche Anzahl Parameter? */
+       if( Req->argc != 2 ) return CONNECTED;
 
-               Log( LOG_DEBUG, "Connection %d: got USER command ...", Client->conn_id );
-               if( Client->type == CLIENT_GOTNICK ) return Hello_User( Client );
-               else Client->type = CLIENT_GOTUSER;
-               return CONNECTED;
-       }
-       else if( Client->type == CLIENT_USER || Client->type == CLIENT_SERVER || Client->type == CLIENT_SERVICE )
+       if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
+       else from = Client;
+       if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
+
+       to = Client_Search( Req->argv[0] );
+       if(( to ) && ( Client_Type( to ) == CLIENT_USER ))
        {
-               return IRC_WriteStr_Client( Client, This_Server, ERR_ALREADYREGISTRED_MSG );
+               /* Okay, Ziel ist ein User */
+               return IRC_WriteStrClientPrefix( to, from, "NOTICE %s :%s", Client_ID( to ), Req->argv[1] );
        }
-       else return IRC_WriteStr_Client( Client, This_Server, ERR_NOTREGISTERED_MSG );
-} /* IRC_USER */
+       else return CONNECTED;
+} /* IRC_NOTICE */
 
 
-GLOBAL BOOLEAN IRC_QUIT( CLIENT *Client, REQUEST *Req )
+GLOBAL bool
+IRC_PRIVMSG( CLIENT *Client, REQUEST *Req )
 {
+       CLIENT *cl, *from;
+       CHANNEL *chan;
+       
        assert( Client != NULL );
        assert( Req != NULL );
 
-       if( Client->type != CLIENT_SERVER && Client->type != CLIENT_SERVICE )
+       /* Falsche Anzahl Parameter? */
+       if( Req->argc == 0 ) return IRC_WriteStrClient( Client, ERR_NORECIPIENT_MSG, Client_ID( Client ), Req->command );
+       if( Req->argc == 1 ) return IRC_WriteStrClient( Client, ERR_NOTEXTTOSEND_MSG, Client_ID( Client ));
+       if( Req->argc > 2 ) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+
+       if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
+       else from = Client;
+       if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
+
+       cl = Client_Search( Req->argv[0] );
+       if( cl )
        {
-               /* Falsche Anzahl Parameter? */
-               if( Req->argc > 1 ) return IRC_WriteStr_Client( Client, This_Server, ERR_NEEDMOREPARAMS_MSG );
+               /* Okay, Ziel ist ein Client. Aber ist es auch ein User? */
+               if( Client_Type( cl ) != CLIENT_USER ) return IRC_WriteStrClient( from, ERR_NOSUCHNICK_MSG, Client_ID( from ), Req->argv[0] );
 
-               Conn_Close( Client->conn_id, "Client wants to quit." );
-               return DISCONNECTED;
+               /* Okay, Ziel ist ein User */
+               if(( Client_Type( Client ) != CLIENT_SERVER ) && ( strchr( Client_Modes( cl ), 'a' )))
+               {
+                       /* Ziel-User ist AWAY: Meldung verschicken */
+                       if( ! IRC_WriteStrClient( from, RPL_AWAY_MSG, Client_ID( from ), Client_ID( cl ), Client_Away( cl ))) return DISCONNECTED;
+               }
+
+               /* Text senden */
+               if( Client_Conn( from ) > NONE ) Conn_UpdateIdle( Client_Conn( from ));
+               return IRC_WriteStrClientPrefix( cl, from, "PRIVMSG %s :%s", Client_ID( cl ), Req->argv[1] );
        }
-       else return IRC_WriteStr_Client( Client, This_Server, ERR_NOTREGISTERED_MSG );
-} /* IRC_QUIT */
+
+       chan = Channel_Search( Req->argv[0] );
+       if( chan ) return Channel_Write( chan, from, Client, Req->argv[1] );
+
+       return IRC_WriteStrClient( from, ERR_NOSUCHNICK_MSG, Client_ID( from ), Req->argv[0] );
+} /* IRC_PRIVMSG */
 
 
-GLOBAL BOOLEAN IRC_MOTD( CLIENT *Client, REQUEST *Req )
+GLOBAL bool
+IRC_TRACE( CLIENT *Client, REQUEST *Req )
 {
+       CLIENT *from, *target, *c;
+       CONN_ID idx, idx2;
+       char user[CLIENT_USER_LEN];
+
        assert( Client != NULL );
        assert( Req != NULL );
 
-       if( ! Check_Valid_User( Client )) return CONNECTED;
+       /* Bad number of arguments? */
+       if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NORECIPIENT_MSG, Client_ID( Client ), Req->command );
 
-       /* Falsche Anzahl Parameter? */
-       if( Req->argc != 0 ) return IRC_WriteStr_Client( Client, This_Server, ERR_NEEDMOREPARAMS_MSG );
+       /* Search sender */
+       if( Client_Type( Client ) == CLIENT_SERVER ) from = Client_Search( Req->prefix );
+       else from = Client;
+       if( ! from ) return IRC_WriteStrClient( Client, ERR_NOSUCHNICK_MSG, Client_ID( Client ), Req->prefix );
 
-       return Show_MOTD( Client );
-} /* IRC_MOTD */
+       /* Search target */
+       if( Req->argc == 1 ) target = Client_Search( Req->argv[0] );
+       else target = Client_ThisServer( );
+       
+       /* Forward command to other server? */
+       if( target != Client_ThisServer( ))
+       {
+               if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[0] );
 
+               /* Send RPL_TRACELINK back to initiator */
+               idx = Client_Conn( Client ); assert( idx > NONE );
+               idx2 = Client_Conn( Client_NextHop( target )); assert( idx2 > NONE );
+               if( ! IRC_WriteStrClient( from, RPL_TRACELINK_MSG, Client_ID( from ), PACKAGE_NAME, PACKAGE_VERSION, Client_ID( target ), Client_ID( Client_NextHop( target )), Option_String( idx2 ), time( NULL ) - Conn_StartTime( idx2 ), Conn_SendQ( idx ), Conn_SendQ( idx2 ))) return DISCONNECTED;
 
-LOCAL BOOLEAN Check_Valid_User( CLIENT *Client )
-{
-       assert( Client != NULL );
+               /* Forward command */
+               IRC_WriteStrClientPrefix( target, from, "TRACE %s", Req->argv[0] );
+               return CONNECTED;
+       }
 
-       if( Client->type != CLIENT_USER )
+       /* Infos about all connected servers */
+       c = Client_First( );
+       while( c )
        {
-               IRC_WriteStr_Client( Client, This_Server, ERR_NOTREGISTERED_MSG );
-               return FALSE;
+               if( Client_Conn( c ) > NONE )
+               {
+                       /* Local client */
+                       if( Client_Type( c ) == CLIENT_SERVER )
+                       {
+                               /* Server link */
+                               strlcpy( user, Client_User( c ), sizeof( user ));
+                               if( user[0] == '~' ) strlcpy( user, "unknown", sizeof( user ));
+                               if( ! IRC_WriteStrClient( from, RPL_TRACESERVER_MSG, Client_ID( from ), Client_ID( c ), user, Client_Hostname( c ), Client_Mask( Client_ThisServer( )), Option_String( Client_Conn( c )))) return DISCONNECTED;
+                       }
+                       if(( Client_Type( c ) == CLIENT_USER ) && ( strchr( Client_Modes( c ), 'o' )))
+                       {
+                               /* IRC Operator */
+                               if( ! IRC_WriteStrClient( from, RPL_TRACEOPERATOR_MSG, Client_ID( from ), Client_ID( c ))) return DISCONNECTED;
+                       }
+               }
+               c = Client_Next( c );
        }
-       else return TRUE;
-} /* Check_Valid_User */
+
+       IRC_SetPenalty( Client, 3 );
+       return IRC_WriteStrClient( from, RPL_TRACEEND_MSG, Client_ID( from ), Conf_ServerName, PACKAGE_NAME, PACKAGE_VERSION, NGIRCd_DebugLevel );
+} /* IRC_TRACE */
 
 
-LOCAL BOOLEAN Hello_User( CLIENT *Client )
+GLOBAL bool
+IRC_HELP( CLIENT *Client, REQUEST *Req )
 {
-       Log( LOG_INFO, "User \"%s!%s@%s\" (%s) registered.", Client->nick, Client->user, Client->host, Client->name );
+       COMMAND *cmd;
 
-       IRC_WriteStr_Client( Client, This_Server, RPL_WELCOME_MSG, Client->nick, Client->nick, Client->user, Client->host );
-       IRC_WriteStr_Client( Client, This_Server, RPL_YOURHOST_MSG, Client->nick, This_Server->host );
-       IRC_WriteStr_Client( Client, This_Server, RPL_CREATED_MSG, Client->nick );
-       IRC_WriteStr_Client( Client, This_Server, RPL_MYINFO_MSG, Client->nick, This_Server->host );
+       assert( Client != NULL );
+       assert( Req != NULL );
 
-       Client->type = CLIENT_USER;
+       /* Bad number of arguments? */
+       if( Req->argc > 0 ) return IRC_WriteStrClient( Client, ERR_NORECIPIENT_MSG, Client_ID( Client ), Req->command );
 
-       return Show_MOTD( Client );
-} /* Hello_User */
+       cmd = Parse_GetCommandStruct( );
+       while( cmd->name )
+       {
+               if( ! IRC_WriteStrClient( Client, "NOTICE %s :%s", Client_ID( Client ), cmd->name )) return DISCONNECTED;
+               cmd++;
+       }
+       
+       IRC_SetPenalty( Client, 2 );
+       return CONNECTED;
+} /* IRC_HELP */
 
 
-LOCAL BOOLEAN Show_MOTD( CLIENT *Client )
+static char *
+Option_String( CONN_ID Idx )
 {
-       IRC_WriteStr_Client( Client, This_Server, RPL_MOTDSTART_MSG, Client->nick, This_Server->host );
-       IRC_WriteStr_Client( Client, This_Server, RPL_MOTD_MSG, Client->nick, "Some cool IRC server welcome message ;-)" );
-       return IRC_WriteStr_Client( Client, This_Server, RPL_ENDOFMOTD_MSG, Client->nick );
-} /* Show_MOTD */
+       static char option_txt[8];
+       int options;
+
+       options = Conn_Options( Idx );
+
+       strcpy( option_txt, "F" );      /* No idea what this means but the original ircd sends it ... */
+#ifdef ZLIB
+       if( options & CONN_ZIP ) strcat( option_txt, "z" );
+#endif
+
+       return option_txt;
+} /* Option_String */
 
 
 /* -eof- */