]> arthur.barton.de Git - ngircd-alex.git/blobdiff - src/ngircd/irc.c
Cumulative Message Patch
[ngircd-alex.git] / src / ngircd / irc.c
index 1c1212af38d83c06cff1ecb59a3b6f4fc63e5f2e..2e3af757584b0d9630640da16029a6fe9e18b03f 100644 (file)
@@ -1,6 +1,6 @@
 /*
  * ngIRCd -- The Next Generation IRC Daemon
- * Copyright (c)2001-2003 by Alexander Barton (alex@barton.de)
+ * Copyright (c)2001-2004 Alexander Barton <alex@barton.de>
  *
  * 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
@@ -14,7 +14,7 @@
 
 #include "portab.h"
 
-static char UNUSED id[] = "$Id: irc.c,v 1.121 2003/04/29 12:19:20 alex Exp $";
+static char UNUSED id[] = "$Id: irc.c,v 1.132 2008/01/15 22:28:14 fw Exp $";
 
 #include "imp.h"
 #include <assert.h>
@@ -22,15 +22,15 @@ static char UNUSED id[] = "$Id: irc.c,v 1.121 2003/04/29 12:19:20 alex Exp $";
 #include <string.h>
 
 #include "ngircd.h"
-#include "conn.h"
 #include "resolve.h"
-#include "conf.h"
 #include "conn-func.h"
+#include "conf.h"
 #include "client.h"
 #include "channel.h"
 #include "defines.h"
 #include "irc-write.h"
 #include "log.h"
+#include "match.h"
 #include "messages.h"
 #include "parse.h"
 
@@ -38,10 +38,13 @@ static char UNUSED id[] = "$Id: irc.c,v 1.121 2003/04/29 12:19:20 alex Exp $";
 #include "irc.h"
 
 
-LOCAL CHAR *Option_String PARAMS(( CONN_ID Idx ));
+static char *Option_String PARAMS((CONN_ID Idx));
+static bool Send_Message PARAMS((CLIENT *Client, REQUEST *Req, int ForceType, bool SendErrors));
+static bool Send_Message_Mask PARAMS((CLIENT *from, char *targetMask, char *message, bool SendErrors));
+static bool MatchCaseInsensitive PARAMS((const char *pattern, const char *searchme));
 
 
-GLOBAL BOOLEAN
+GLOBAL bool
 IRC_ERROR( CLIENT *Client, REQUEST *Req )
 {
        assert( Client != NULL );
@@ -54,162 +57,152 @@ 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 ));
+       }
 
-       /* Bad number of parameters? */
-       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( );
        }
 
-       if( Client != 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 ) snprintf( reason, sizeof( reason ), "KILLed by %s: %s", Client_ID( Client ), Req->argv[1] );
-       else strlcpy( reason, Req->argv[1], sizeof( reason ));
+       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 ));
 
        /* Inform other servers */
-       IRC_WriteStrServersPrefix( Client, prefix, "KILL %s :%s", Req->argv[0], reason );
+       IRC_WriteStrServersPrefix( Client, prefix, "KILL %s :%s",
+                                  Req->argv[0], reason );
 
        /* Save ID of this connection */
        my_conn = Client_Conn( Client );
-       
+
        /* Do we host such a client? */
        c = Client_Search( Req->argv[0] );
        if( c )
        {
-               /* Yes, there is such a client -- but is it a valid user? */
-               if( Client_Type( c ) == CLIENT_SERVER )
-               {
-                       if( Client != Client_ThisServer( )) IRC_WriteStrClient( Client, ERR_CANTKILLSERVER_MSG, Client_ID( Client ));
-                       else
-                       {
-                               /* Oops, I should kill another server!? */
-                               Log( LOG_ERR, "Can't KILL server \"%s\"!", Req->argv[0] );
-                               conn = Client_Conn( Client_NextHop( c ));
-                               assert( conn > NONE );
-                               Conn_Close( conn, NULL, "Nick collision for server!?", TRUE );
-                       }
-               }
-               else if( Client_Type( c ) != CLIENT_USER  )
+               if(( Client_Type( c ) != CLIENT_USER ) &&
+                  ( Client_Type( c ) != CLIENT_GOTNICK ))
                {
-                       if( Client != Client_ThisServer( )) IRC_WriteStrClient( Client, ERR_NOPRIVILEGES_MSG, Client_ID( Client ));
-                       else
+                       /* 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( ))
                        {
-                               /* Oops, what sould I close?? */
-                               Log( LOG_ERR, "Can't KILL \"%s\": invalid client type!", Req->argv[0] );
-                               conn = Client_Conn( Client_NextHop( c ));
-                               assert( conn > NONE );
-                               Conn_Close( conn, NULL, "Collision for invalid client type!?", TRUE );
+                               /* 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] );
                }
-               else
-               {
-                       /* Kill user NOW! */
-                       conn = Client_Conn( c );
-                       Client_Destroy( c, NULL, reason, FALSE );
-                       if( conn != NONE ) Conn_Close( conn, NULL, reason, TRUE );
-               }
+
+               /* 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] );
+       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 ) && ( Client_GetFromConn( my_conn ))) return CONNECTED;
-       else return DISCONNECTED;
+       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;
-
-       assert( Client != NULL );
-       assert( Req != NULL );
-
-       if(( Client_Type( Client ) != CLIENT_USER ) && ( Client_Type( Client ) != CLIENT_SERVER )) return CONNECTED;
-
-       /* Falsche Anzahl Parameter? */
-       if( Req->argc != 2 ) return CONNECTED;
-
-       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 ))
-       {
-               /* Okay, Ziel ist ein User */
-               return IRC_WriteStrClientPrefix( to, from, "NOTICE %s :%s", Client_ID( to ), Req->argv[1] );
-       }
-       else return CONNECTED;
+       return Send_Message(Client, Req, CLIENT_USER, false);
 } /* 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;
-       
-       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 );
-
-       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 )
-       {
-               /* 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] );
-
-               /* 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] );
-       }
+       return Send_Message(Client, Req, CLIENT_USER, true);
+} /* IRC_PRIVMSG */
 
-       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 */
+/**
+ * Handler for the IRC command SQUERY.
+ */
+GLOBAL bool
+IRC_SQUERY(CLIENT *Client, REQUEST *Req)
+{
+       return Send_Message(Client, Req, CLIENT_SERVICE, true);
+} /* IRC_SQUERY */
 
 
-GLOBAL BOOLEAN
+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 );
@@ -251,7 +244,9 @@ IRC_TRACE( CLIENT *Client, REQUEST *Req )
                        if( Client_Type( c ) == CLIENT_SERVER )
                        {
                                /* Server link */
-                               if( ! IRC_WriteStrClient( from, RPL_TRACESERVER_MSG, Client_ID( from ), Client_ID( c ), Client_Mask( c ), Option_String( Client_Conn( c )))) return DISCONNECTED;
+                               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' )))
                        {
@@ -262,14 +257,12 @@ IRC_TRACE( CLIENT *Client, REQUEST *Req )
                c = Client_Next( c );
        }
 
-       /* Some information about us */
-       if( ! IRC_WriteStrClient( from, RPL_TRACESERVER_MSG, Client_ID( from ), Conf_ServerName, Client_Mask( Client_ThisServer( )), Option_String( Client_Conn( Client )))) return DISCONNECTED;
-
+       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 BOOLEAN
+GLOBAL bool
 IRC_HELP( CLIENT *Client, REQUEST *Req )
 {
        COMMAND *cmd;
@@ -286,25 +279,232 @@ IRC_HELP( CLIENT *Client, REQUEST *Req )
                if( ! IRC_WriteStrClient( Client, "NOTICE %s :%s", Client_ID( Client ), cmd->name )) return DISCONNECTED;
                cmd++;
        }
+       
+       IRC_SetPenalty( Client, 2 );
        return CONNECTED;
 } /* IRC_HELP */
 
 
-LOCAL CHAR *
+static char *
 Option_String( CONN_ID Idx )
 {
-       STATIC CHAR option_txt[8];
-       INT options;
+       static char option_txt[8];
+       UINT16 options;
 
-       options = Conn_Options( Idx );
+       options = Conn_Options(Idx);
 
-       strcpy( option_txt, "F" );      /* No idea what this means but the original ircd sends it ... */
-#ifdef USE_ZLIB
-       if( options & CONN_ZIP ) strcat( option_txt, "z" );
+       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, bool SendErrors)
+{
+       CLIENT *cl, *from;
+       CHANNEL *chan;
+       char *targetList = Req->argv[0];
+       char *currentTarget = Req->argv[0];
+       unsigned int targetCount = 1;
+
+       assert( Client != NULL );
+       assert( Req != NULL );
+
+       if (Req->argc == 0) {
+               if (!SendErrors)
+                       return true;
+               return IRC_WriteStrClient(Client, ERR_NORECIPIENT_MSG,
+                                         Client_ID(Client), Req->command);
+       }
+       if (Req->argc == 1) {
+               if (!SendErrors)
+                       return true;
+               return IRC_WriteStrClient(Client, ERR_NOTEXTTOSEND_MSG,
+                                         Client_ID(Client));
+       }
+       if (Req->argc > 2) {
+               if (!SendErrors)
+                       return true;
+               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);
+       }
+
+       while (*targetList) {
+               if (*targetList == ',') {
+                       *targetList = '\0';
+                       targetCount++;
+               }
+               targetList++;
+       }
+
+       while (targetCount > 0) {
+               if (strchr(currentTarget, '!') == NULL)
+                       cl = Client_Search(currentTarget);
+               else
+                       cl = NULL;
+               if (cl == NULL) {
+                       char target[513]; // max mesage length plus null terminator
+                       char * nick = NULL;
+                       char * user = NULL;
+                       char * host = NULL;
+                       char * server = NULL;
+
+                       strncpy(target, currentTarget, 512);
+                       target[512] = '\0';
+                       server = strchr(target, '@');
+                       if (server) {
+                               *server = '\0';
+                               server++;
+                       }
+                       host = strchr(target, '%');
+                       if (host) {
+                               *host = '\0';
+                               host++;
+                       }
+                       user = strchr(target, '!');
+                       if (user) {
+                               *user = '\0';
+                               user++;
+                               nick = target;
+                               host = server; // <msgto> form: nick!user@host
+                       } else {
+                               user = target;
+                       }
+
+                       if (user != NULL) {
+                               for (cl = Client_First(); cl != NULL; cl = Client_Next(cl)) {
+                                       if (Client_Type(cl) != CLIENT_USER)
+                                               continue;
+                                       if (nick != NULL) {
+                                               if (strcmp(nick, Client_ID(cl)) == 0 && strcmp(user, Client_User(cl)) == 0 && strcasecmp(host, Client_Hostname(cl)) == 0)
+                                                       break;
+                                               else
+                                                       continue;
+                                       }
+                                       if (strcasecmp(user, Client_User(cl)) != 0)
+                                               continue;
+                                       if (host != NULL && strcasecmp(host, Client_Hostname(cl)) != 0)
+                                               continue;
+                                       if (server != NULL && strcasecmp(server, Client_ID(Client_Introducer(cl))) != 0)
+                                               continue;
+                                       break;
+                               }
+                       }
+               }
+
+               if (cl) {
+                       /* Target is a user, enforce type */
+                       if (Client_Type(cl) != ForceType) {
+                               if (!SendErrors)
+                                       return true;
+                               if (!IRC_WriteStrClient(from, ERR_NOSUCHNICK_MSG,
+                                                         Client_ID(from),
+                                                         currentTarget))
+                                       return false;
+                       } else if ((Client_Type(Client) != CLIENT_SERVER
+                                               && (strchr(Client_Modes(cl), 'a')))) {
+                               /* Target is away */
+                               if (!SendErrors)
+                                       return true;
+                               if (!IRC_WriteStrClient
+                                   (from, RPL_AWAY_MSG, Client_ID(from), Client_ID(cl),
+                                    Client_Away(cl)))
+                                       return DISCONNECTED;
+                       }       if (Client_Conn(from) > NONE) {
+                               Conn_UpdateIdle(Client_Conn(from));
+                       }
+                       if (!IRC_WriteStrClientPrefix(cl, from, "PRIVMSG %s :%s",
+                                               Client_ID(cl), Req->argv[1]))
+                               return false;
+               } else if (strchr("$#", currentTarget[0]) && strchr(currentTarget, '.')) {
+                       if (!Send_Message_Mask(from, currentTarget, Req->argv[1], SendErrors))
+                               return false;
+               } else if ((chan = Channel_Search(currentTarget))) {
+                               if (!Channel_Write(chan, from, Client, Req->argv[1]))
+                                       return false;
+               } else {
+                       if (!SendErrors)
+                               return true;
+                       if (!IRC_WriteStrClient(from, ERR_NOSUCHNICK_MSG,
+                                               Client_ID(from), currentTarget))
+                               return false;
+               }
+
+               while (*currentTarget)
+                       currentTarget++;
+
+               currentTarget++;
+               targetCount--;
+       }
+
+       return CONNECTED;
+
+} /* Send_Message */
+
+
+static bool
+Send_Message_Mask(CLIENT * from, char * targetMask, char * message, bool SendErrors)
+{
+       CLIENT *cl;
+       bool client_match;
+       char *mask = targetMask + 1;
+
+       cl = NULL;
+
+       if (strchr(Client_Modes(from), 'o') == NULL) {
+               if (!SendErrors)
+                       return true;
+               return IRC_WriteStrClient(from, ERR_NOPRIVILEGES_MSG, Client_ID(from));
+       }
+
+       if (targetMask[0] == '#') {
+               for (cl = Client_First(); cl != NULL; cl = Client_Next(cl)) {
+                       if (Client_Type(cl) != CLIENT_USER)
+                               continue;
+                       client_match = MatchCaseInsensitive(mask, Client_Hostname(cl));
+                       if (client_match)
+                               if (!IRC_WriteStrClientPrefix(cl, from, "PRIVMSG %s :%s", Client_ID(cl), message))
+                                       return false;
+               }
+       } else {
+               for (cl = Client_First(); cl != NULL; cl = Client_Next(cl)) {
+                       if (Client_Type(cl) != CLIENT_USER)
+                               continue;
+                       client_match = MatchCaseInsensitive(mask, Client_ID(Client_Introducer(cl)));
+                       if (client_match)
+                               if (!IRC_WriteStrClientPrefix(cl, from, "PRIVMSG %s :%s", Client_ID(cl), message))
+                                       return false;
+               }
+       }
+       return CONNECTED;
+} /* Send_Message_Mask */
+
+
+static bool
+MatchCaseInsensitive(const char *pattern, const char *searchme)
+{
+       char haystack[COMMAND_LEN];
+
+       strlcpy(haystack, searchme, sizeof(haystack));
+
+       ngt_LowerStr(haystack);
+
+       return Match(pattern, haystack);
+}
+
 /* -eof- */