]> arthur.barton.de Git - ngircd-alex.git/blobdiff - src/ngircd/irc.c
Implement IRC commands SERVICE, SERVLIST, and SQUERY as dummy functions
[ngircd-alex.git] / src / ngircd / irc.c
index dfa0e94d35822b89fe830ec5a07cafb868f2b81a..0418e7b4cb31cb82f4be6006c021c1af37c5f41a 100644 (file)
@@ -1,27 +1,30 @@
 /*
  * ngIRCd -- The Next Generation IRC Daemon
- * Copyright (c)2001,2002 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 ngIRCd 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.105 2002/12/06 17:02:39 alex Exp $
- *
- * irc.c: IRC-Befehle
+ * IRC commands
  */
 
 
 #include "portab.h"
 
+static char UNUSED id[] = "$Id: irc.c,v 1.132 2008/01/15 22:28:14 fw Exp $";
+
 #include "imp.h"
 #include <assert.h>
+#include <stdio.h>
 #include <string.h>
 
-#include "conn.h"
+#include "ngircd.h"
+#include "resolve.h"
+#include "conn-func.h"
+#include "conf.h"
 #include "client.h"
 #include "channel.h"
 #include "defines.h"
 #include "irc.h"
 
 
-GLOBAL BOOLEAN
+static char *Option_String PARAMS((CONN_ID Idx));
+static bool Send_Message PARAMS((CLIENT *Client, REQUEST *Req, int ForceType));
+
+
+GLOBAL bool
 IRC_ERROR( CLIENT *Client, REQUEST *Req )
 {
        assert( Client != NULL );
@@ -47,56 +54,124 @@ IRC_ERROR( CLIENT *Client, REQUEST *Req )
 } /* IRC_ERROR */
 
 
-GLOBAL BOOLEAN
+/**
+ * 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 )
 {
        CLIENT *prefix, *c;
-       CHAR reason[COMMAND_LEN];
+       char reason[COMMAND_LEN], *msg;
+       CONN_ID my_conn, conn;
 
        assert( Client != NULL );
        assert( Req != NULL );
 
-       /* is the user an IRC operator? */
-       if(( Client_Type( Client ) != CLIENT_SERVER ) && ( ! Client_OperByMe( Client ))) return IRC_WriteStrClient( Client, ERR_NOPRIVILEGES_MSG, Client_ID( Client ));
+       if(( Client_Type( Client ) != CLIENT_SERVER ) &&
+          ( ! Client_OperByMe( Client )))
+       {
+               /* 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 ));
+       }
 
-       /* Falsche Anzahl Parameter? */
-       if(( Req->argc != 2 )) return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG, Client_ID( Client ), Req->command );
+       if( Req->argc != 2 )
+       {
+               /* This command requires exactly 2 parameters! */
+               return IRC_WriteStrClient( Client, ERR_NEEDMOREPARAMS_MSG,
+                                          Client_ID( Client ), Req->command );
+       }
 
        if( Req->prefix ) prefix = Client_Search( Req->prefix );
        else prefix = Client;
        if( ! prefix )
        {
-               Log( LOG_WARNING, "Got KILL with invalid prefix: \"%s\"!", Req->prefix );
+               Log( LOG_WARNING, "Got KILL with invalid prefix: \"%s\"!",
+                    Req->prefix );
                prefix = Client_ThisServer( );
        }
 
-       Log( LOG_NOTICE|LOG_snotice, "Got KILL command from \"%s\" for \"%s\": %s", Client_Mask( prefix ), Req->argv[0], Req->argv[1] );
+       if( Client != Client_ThisServer( ))
+       {
+               /* 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] );
+       }
+
+       /* 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 ));
 
-       /* build reason string */
-       if( Client_Type( Client ) == CLIENT_USER ) sprintf( reason, "KILLed by %s: %s", Client_ID( Client ), Req->argv[1] );
-       else strcpy( reason, Req->argv[1] );
+       /* Inform other servers */
+       IRC_WriteStrServersPrefix( Client, prefix, "KILL %s :%s",
+                                  Req->argv[0], reason );
 
-       /* andere Server benachrichtigen */
-       IRC_WriteStrServersPrefix( Client, prefix, "KILL %s :%s", Req->argv[0], reason );
+       /* Save ID of this connection */
+       my_conn = Client_Conn( Client );
 
-       /* haben wir selber einen solchen Client? */
+       /* Do we host such a client? */
        c = Client_Search( Req->argv[0] );
        if( c )
        {
-               /* Ja, wir haben einen solchen Client */
-               if( Client_Conn( c ) != NONE ) Conn_Close( Client_Conn( c ), NULL, reason, TRUE );
-               else Client_Destroy( c, NULL, reason, TRUE );
-       }
-       else Log( LOG_NOTICE, "Client with nick \"%s\" is unknown here.", Req->argv[0] );
+               if(( Client_Type( c ) != CLIENT_USER ) &&
+                  ( Client_Type( c ) != CLIENT_GOTNICK ))
+               {
+                       /* 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( ))
+                       {
+                               /* 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 ));
+                       }
+
+                       Log( LOG_ERR, "Got KILL for invalid client type: %d, \"%s\"!",
+                            Client_Type( c ), Req->argv[0] );
+               }
 
-       return CONNECTED;
+               /* 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] );
+
+       /* Are we still connected or were we killed, too? */
+       if(( my_conn > NONE ) && ( Conn_GetClient( my_conn )))
+               return CONNECTED;
+       else
+               return DISCONNECTED;
 } /* IRC_KILL */
 
 
-GLOBAL BOOLEAN
+GLOBAL bool
 IRC_NOTICE( CLIENT *Client, REQUEST *Req )
 {
        CLIENT *to, *from;
+       CHANNEL *chan;
 
        assert( Client != NULL );
        assert( Req != NULL );
@@ -116,51 +191,201 @@ IRC_NOTICE( CLIENT *Client, REQUEST *Req )
                /* Okay, Ziel ist ein User */
                return IRC_WriteStrClientPrefix( to, from, "NOTICE %s :%s", Client_ID( to ), Req->argv[1] );
        }
-       else return CONNECTED;
+       else
+       {
+               chan = Channel_Search(Req->argv[0]);
+               if (chan)
+                       return Channel_Notice(chan, from, Client, Req->argv[1]);
+       }
+
+       return CONNECTED;
 } /* IRC_NOTICE */
 
 
-GLOBAL BOOLEAN
-IRC_PRIVMSG( CLIENT *Client, REQUEST *Req )
+/**
+ * Handler for the IRC command PRIVMSG.
+ */
+GLOBAL bool
+IRC_PRIVMSG(CLIENT *Client, REQUEST *Req)
 {
-       CLIENT *cl, *from;
-       CHANNEL *chan;
-       
+       return Send_Message(Client, Req, CLIENT_USER);
+} /* IRC_PRIVMSG */
+
+
+/**
+ * Handler for the IRC command SQUERY.
+ */
+GLOBAL bool
+IRC_SQUERY(CLIENT *Client, REQUEST *Req)
+{
+       return Send_Message(Client, Req, CLIENT_SERVICE);
+} /* IRC_SQUERY */
+
+
+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 );
 
-       /* 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 );
+       /* Bad number of arguments? */
+       if( Req->argc > 1 ) return IRC_WriteStrClient( Client, ERR_NORECIPIENT_MSG, Client_ID( Client ), Req->command );
 
+       /* 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 );
 
-       cl = Client_Search( Req->argv[0] );
-       if( cl )
+       /* 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( ))
        {
-               /* 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] );
+               if(( ! target ) || ( Client_Type( target ) != CLIENT_SERVER )) return IRC_WriteStrClient( from, ERR_NOSUCHSERVER_MSG, Client_ID( from ), Req->argv[0] );
 
-               /* Okay, Ziel ist ein User */
-               if(( Client_Type( Client ) != CLIENT_SERVER ) && ( strchr( Client_Modes( cl ), 'a' )))
+               /* 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;
+
+               /* Forward command */
+               IRC_WriteStrClientPrefix( target, from, "TRACE %s", Req->argv[0] );
+               return CONNECTED;
+       }
+
+       /* Infos about all connected servers */
+       c = Client_First( );
+       while( c )
+       {
+               if( Client_Conn( c ) > NONE )
                {
-                       /* Ziel-User ist AWAY: Meldung verschicken */
-                       if( ! IRC_WriteStrClient( from, RPL_AWAY_MSG, Client_ID( from ), Client_ID( cl ), Client_Away( cl ))) return DISCONNECTED;
+                       /* 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 );
+       }
+
+       IRC_SetPenalty( Client, 3 );
+       return IRC_WriteStrClient( from, RPL_TRACEEND_MSG, Client_ID( from ), Conf_ServerName, PACKAGE_NAME, PACKAGE_VERSION, NGIRCd_DebugLevel );
+} /* IRC_TRACE */
+
+
+GLOBAL bool
+IRC_HELP( CLIENT *Client, REQUEST *Req )
+{
+       COMMAND *cmd;
+
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       /* Bad number of arguments? */
+       if( Req->argc > 0 ) return IRC_WriteStrClient( Client, ERR_NORECIPIENT_MSG, Client_ID( Client ), Req->command );
+
+       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 */
+
+
+static char *
+Option_String( CONN_ID Idx )
+{
+       static char option_txt[8];
+       UINT16 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)          /* zlib compression supported. */
+               strcat(option_txt, "z");
+#endif
+
+       return option_txt;
+} /* Option_String */
+
+
+static bool
+Send_Message(CLIENT * Client, REQUEST * Req, int ForceType)
+{
+       CLIENT *cl, *from;
+       CHANNEL *chan;
+
+       assert(Client != NULL);
+       assert(Req != NULL);
+
+       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) {
+               /* Target is a user, enforce type */
+               if (Client_Type(cl) != ForceType)
+                       return IRC_WriteStrClient(from, ERR_NOSUCHNICK_MSG,
+                                                 Client_ID(from),
+                                                 Req->argv[0]);
+
+               if ((Client_Type(Client) != CLIENT_SERVER)
+                   && (strchr(Client_Modes(cl), 'a'))) {
+                       /* Target is away */
+                       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] );
+               if (Client_Conn(from) > NONE)
+                       Conn_UpdateIdle(Client_Conn(from));
+               return IRC_WriteStrClientPrefix(cl, from, "PRIVMSG %s :%s",
+                                               Client_ID(cl), Req->argv[1]);
        }
 
-       chan = Channel_Search( Req->argv[0] );
-       if( chan ) return Channel_Write( chan, from, Client, Req->argv[1] );
+       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 */
+       return IRC_WriteStrClient(from, ERR_NOSUCHNICK_MSG,
+                                 Client_ID(from), Req->argv[0]);
+} /* Send_Message */
 
 
 /* -eof- */