ircd/m_privmsg.c

   1 /*
   2  * IRC - Internet Relay Chat, ircd/m_privmsg.c
   3  * Copyright (C) 1990 Jarkko Oikarinen and
   4  *                    University of Oulu, Computing Center
   5  *
   6  * See file AUTHORS in IRC package for additional names of
   7  * the programmers.
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License as published by
  11  * the Free Software Foundation; either version 1, or (at your option)
  12  * any later version.
  13  *
  14  * This program is distributed in the hope that it will be useful,
  15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  * GNU General Public License for more details.
  18  *
  19  * You should have received a copy of the GNU General Public License
  20  * along with this program; if not, write to the Free Software
  21  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22  *
  23  * $Id$
  24  */
  25
  26 /*
  27  * m_functions execute protocol messages on this server:
  28  *
  29  *    cptr    is always NON-NULL, pointing to a *LOCAL* client
  30  *            structure (with an open socket connected!). This
  31  *            identifies the physical socket where the message
  32  *            originated (or which caused the m_function to be
  33  *            executed--some m_functions may call others...).
  34  *
  35  *    sptr    is the source of the message, defined by the
  36  *            prefix part of the message if present. If not
  37  *            or prefix not found, then sptr==cptr.
  38  *
  39  *            (!IsServer(cptr)) => (cptr == sptr), because
  40  *            prefixes are taken *only* from servers...
  41  *
  42  *            (IsServer(cptr))
  43  *                    (sptr == cptr) => the message didn't
  44  *                    have the prefix.
  45  *
  46  *                    (sptr != cptr && IsServer(sptr) means
  47  *                    the prefix specified servername. (?)
  48  *
  49  *                    (sptr != cptr && !IsServer(sptr) means
  50  *                    that message originated from a remote
  51  *                    user (not local).
  52  *
  53  *            combining
  54  *
  55  *            (!IsServer(sptr)) means that, sptr can safely
  56  *            taken as defining the target structure of the
  57  *            message in this server.
  58  *
  59  *    *Always* true (if 'parse' and others are working correct):
  60  *
  61  *    1)      sptr->from == cptr  (note: cptr->from == cptr)
  62  *
  63  *    2)      MyConnect(sptr) <=> sptr == cptr (e.g. sptr
  64  *            *cannot* be a local connection, unless it's
  65  *            actually cptr!). [MyConnect(x) should probably
  66  *            be defined as (x == x->from) --msa ]
  67  *
  68  *    parc    number of variable parameter strings (if zero,
  69  *            parv is allowed to be NULL)
  70  *
  71  *    parv    a NULL terminated list of parameter pointers,
  72  *
  73  *                    parv[0], sender (prefix string), if not present
  74  *                            this points to an empty string.
  75  *                    parv[1]...parv[parc-1]
  76  *                            pointers to additional parameters
  77  *                    parv[parc] == NULL, *always*
  78  *
  79  *            note:   it is guaranteed that parv[0]..parv[parc-1] are all
  80  *                    non-NULL pointers.
  81  */
  82 #include "config.h"
  83
  84 #if 0
  85 /*
  86  * No need to include handlers.h here the signatures must match
  87  * and we don't need to force a rebuild of all the handlers everytime
  88  * we add a new one to the list. --Bleep
  89  */
  90 #include "handlers.h"
  91 #endif /* 0 */
  92 #include "client.h"
  93 #include "ircd.h"
  94 #include "ircd_chattr.h"
  95 #include "ircd_features.h"
  96 #include "ircd_relay.h"
  97 #include "ircd_reply.h"
  98 #include "ircd_string.h"
  99 #include "match.h"
 100 #include "msg.h"
 101 #include "numeric.h"
 102 #include "send.h"
 103
 104 #include <assert.h>
 105 #include <string.h>
 106
 107 /*
 108  * m_privmsg - generic message handler
 109  */
 110 int m_privmsg(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
 111 {
 112   char*           name;
 113   char*           server;
 114   int             i;
 115   int             count;
 116   char*           vector[MAXTARGETS];
 117
 118   assert(0 != cptr);
 119   assert(cptr == sptr);
 120   assert(0 != cli_user(sptr));
 121
 122   cli_flags(sptr) &= ~FLAGS_TS8;
 123
 124   if (feature_bool(FEAT_IDLE_FROM_MSG))
 125     cli_user(sptr)->last = CurrentTime;
 126
 127   if (parc < 2 || EmptyString(parv[1]))
 128     return send_reply(sptr, ERR_NORECIPIENT, MSG_PRIVATE);
 129
 130   if (parc < 3 || EmptyString(parv[parc - 1]))
 131     return send_reply(sptr, ERR_NOTEXTTOSEND);
 132
 133   count = unique_name_vector(parv[1], ',', vector, MAXTARGETS);
 134
 135   for (i = 0; i < count; ++i) {
 136     name = vector[i];
 137     /*
 138      * channel msg?
 139      */
 140     if (IsChannelPrefix(*name)) {
 141       relay_channel_message(sptr, name, parv[parc - 1]);
 142     }
 143     /*
 144      * we have to check for the '@' at least once no matter what we do
 145      * handle it first so we don't have to do it twice
 146      */
 147     else if ((server = strchr(name, '@')))
 148       relay_directed_message(sptr, name, server, parv[parc - 1]);
 149     else
 150       relay_private_message(sptr, name, parv[parc - 1]);
 151   }
 152   return 0;
 153 }
 154
 155 /*
 156  * ms_privmsg - server message handler template
 157  */
 158 int ms_privmsg(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
 159 {
 160   char* name;
 161   char* server;
 162
 163   cli_flags(sptr) &= ~FLAGS_TS8;
 164
 165   if (parc < 3) {
 166     /*
 167      * we can't deliver it, sending an error back is pointless
 168      */
 169     return 0;
 170   }
 171   name = parv[1];
 172   /*
 173    * channel msg?
 174    */
 175   if (IsChannelPrefix(*name)) {
 176     server_relay_channel_message(sptr, name, parv[parc - 1]);
 177   }
 178   /*
 179    * coming from another server, we have to check this here
 180    */
 181   else if ('$' == *name && IsOper(sptr)) {
 182     server_relay_masked_message(sptr, name, parv[parc - 1]);
 183   }
 184   else if ((server = strchr(name, '@'))) {
 185     /*
 186      * XXX - can't get away with not doing everything
 187      * relay_directed_message has to do
 188      */
 189     relay_directed_message(sptr, name, server, parv[parc - 1]);
 190   }
 191   else {
 192     server_relay_private_message(sptr, name, parv[parc - 1]);
 193   }
 194   return 0;
 195 }
 196
 197
 198 /*
 199  * mo_privmsg - oper message handler
 200  */
 201 int mo_privmsg(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
 202 {
 203   char*           name;
 204   char*           server;
 205   int             i;
 206   int             count;
 207   char*           vector[MAXTARGETS];
 208   assert(0 != cptr);
 209   assert(cptr == sptr);
 210   assert(0 != cli_user(sptr));
 211
 212   cli_flags(sptr) &= ~FLAGS_TS8;
 213
 214   if (feature_bool(FEAT_IDLE_FROM_MSG))
 215     cli_user(sptr)->last = CurrentTime;
 216
 217   if (parc < 2 || EmptyString(parv[1]))
 218     return send_reply(sptr, ERR_NORECIPIENT, MSG_PRIVATE);
 219
 220   if (parc < 3 || EmptyString(parv[parc - 1]))
 221     return send_reply(sptr, ERR_NOTEXTTOSEND);
 222
 223   count = unique_name_vector(parv[1], ',', vector, MAXTARGETS);
 224
 225   for (i = 0; i < count; ++i) {
 226     name = vector[i];
 227     /*
 228      * channel msg?
 229      */
 230     if (IsChannelPrefix(*name))
 231       relay_channel_message(sptr, name, parv[parc - 1]);
 232
 233     else if (*name == '$')
 234       relay_masked_message(sptr, name, parv[parc - 1]);
 235
 236     else if ((server = strchr(name, '@')))
 237       relay_directed_message(sptr, name, server, parv[parc - 1]);
 238
 239     else
 240       relay_private_message(sptr, name, parv[parc - 1]);
 241   }
 242   return 0;
 243 }
 244
 245
 246 #if 0
 247 /*
 248  * m_message (used in m_private() and m_notice())
 249  *
 250  * The general function to deliver MSG's between users/channels
 251  *
 252  * parv[0] = sender prefix
 253  * parv[1] = receiver list
 254  * parv[parc-1] = message text
 255  *
 256  * massive cleanup
 257  * rev argv 6/91
 258  */
 259 static int m_message(struct Client *cptr, struct Client *sptr,
 260     int parc, char *parv[], int notice)
 261 {
 262   struct Client*  acptr;
 263   char*           s;
 264   struct Channel* chptr;
 265   char*           nick;
 266   char*           server;
 267   char*           cmd;
 268   char*           host;
 269   int             i;
 270   int             count;
 271   char*           vector[MAXTARGETS];
 272
 273   sptr->flags &= ~FLAGS_TS8;
 274
 275   cmd = notice ? MSG_NOTICE : MSG_PRIVATE;
 276
 277   if (parc < 2 || EmptyString(parv[1]))
 278     return send_error_to_client(sptr, ERR_NORECIPIENT, cmd); /* XXX DEAD */
 279
 280   if (parc < 3 || EmptyString(parv[parc - 1]))
 281     return send_error_to_client(sptr, ERR_NOTEXTTOSEND); /* XXX DEAD */
 282
 283
 284 #if 0
 285   if (MyUser(sptr))
 286     parv[1] = canonize(parv[1]);
 287   for (p = 0, nick = ircd_strtok(&p, parv[1], ","); nick;
 288       nick = ircd_strtok(&p, 0, ","))
 289 #endif
 290
 291   count = unique_name_vector(parv[1], ',', vector, MAXTARGETS);
 292   for (i = 0; i < count; ++i) {
 293     nick = vector[i];
 294     /*
 295      * channel msg?
 296      */
 297     if (IsChannelName(nick))
 298     {
 299       if ((chptr = FindChannel(nick)))
 300       {
 301         /* This first: Almost never a server/service */
 302         if (client_can_send_to_channel(sptr, chptr) || IsChannelService(sptr))
 303         {
 304           if (MyUser(sptr) && (chptr->mode.mode & MODE_NOPRIVMSGS) &&
 305               check_target_limit(sptr, chptr, chptr->chname, 0))
 306             continue;
 307           sendmsgto_channel_butone(cptr, sptr, chptr, /* XXX DEAD */
 308               parv[0], (notice ? TOK_NOTICE : TOK_PRIVATE),
 309               chptr->chname, parv[parc - 1]);
 310         }
 311         else if (!notice)
 312           sendto_one(sptr, err_str(ERR_CANNOTSENDTOCHAN), /* XXX DEAD */
 313               me.name, parv[0], chptr->chname);
 314         continue;
 315       }
 316     }
 317     else if (*nick != '$' && !strchr(nick, '@'))
 318     {
 319       /*
 320        * nickname addressed?
 321        */
 322       if (MyUser(sptr))
 323         acptr = FindUser(nick);
 324       else if ((acptr = findNUser(nick)) && !IsUser(acptr))
 325         acptr = 0;
 326       if (acptr)
 327       {
 328         if (MyUser(sptr) && check_target_limit(sptr, acptr, acptr->name, 0))
 329           continue;
 330         if (!is_silenced(sptr, acptr))
 331         {
 332           if (!notice && MyConnect(sptr) && acptr->user && acptr->user->away)
 333             sendto_one(sptr, rpl_str(RPL_AWAY), /* XXX DEAD */
 334                 me.name, parv[0], acptr->name, acptr->user->away);
 335           if (MyUser(acptr))
 336           {
 337             add_target(acptr, sptr);
 338             sendto_prefix_one(acptr, sptr, ":%s %s %s :%s", /* XXX DEAD */
 339                 parv[0], cmd, acptr->name, parv[parc - 1]);
 340           }
 341           else
 342             sendto_prefix_one(acptr, sptr, ":%s %s %s%s :%s", /* XXX DEAD */
 343                 parv[0], (notice ? TOK_NOTICE : TOK_PRIVATE),
 344                 NumNick(acptr), parv[parc - 1]);
 345         }
 346       }
 347       else if (MyUser(sptr))
 348         sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], nick); /* XXX DEAD */
 349       else
 350         sendto_one(sptr, /* XXX DEAD */
 351             ":%s %d %s * :Target left UnderNet. Failed to deliver: [%.50s]",
 352             me.name, ERR_NOSUCHNICK, sptr->name, parv[parc - 1]);
 353       continue;
 354     }
 355     /*
 356      * The following two cases allow masks in NOTICEs
 357      * (for OPERs only)
 358      *
 359      * Armin, 8Jun90 (gruner@informatik.tu-muenchen.de)
 360      */
 361     if ((*nick == '$' || *nick == '#') && IsAnOper(sptr))
 362     {
 363       if (MyConnect(sptr))
 364       {
 365         if (!(s = strrchr(nick, '.')))
 366         {
 367           sendto_one(sptr, err_str(ERR_NOTOPLEVEL), me.name, parv[0], nick); /* XXX DEAD */
 368           continue;
 369         }
 370         while (*++s)
 371           if (*s == '.' || *s == '*' || *s == '?')
 372             break;
 373         if (*s == '*' || *s == '?')
 374         {
 375           sendto_one(sptr, err_str(ERR_WILDTOPLEVEL), me.name, parv[0], nick); /* XXX DEAD */
 376           continue;
 377         }
 378       }
 379       sendto_match_butone(IsServer(cptr) ? cptr : 0, /* XXX DEAD */
 380           sptr, nick + 1, (*nick == '#') ? MATCH_HOST : MATCH_SERVER,
 381           ":%s %s %s :%s", parv[0], cmd, nick, parv[parc - 1]);
 382       continue;
 383     }
 384     else if ((server = strchr(nick, '@')) && (acptr = FindServer(server + 1)))
 385     {
 386       /*
 387        * NICK[%host]@server addressed? See if <server> is me first
 388        */
 389       if (!IsMe(acptr))
 390       {
 391         sendto_one(acptr, ":%s %s %s :%s", parv[0], cmd, nick, parv[parc - 1]); /* XXX DEAD */
 392         continue;
 393       }
 394
 395       /* Look for an user whose NICK is equal to <nick> and then
 396        * check if it's hostname matches <host> and if it's a local
 397        * user. */
 398       *server = '\0';
 399       if ((host = strchr(nick, '%')))
 400         *host++ = '\0';
 401
 402       if ((!(acptr = FindUser(nick))) ||
 403           (!(MyUser(acptr))) ||
 404           ((!(EmptyString(host))) && match(host, acptr->user->host)))
 405         acptr = 0;
 406
 407       *server = '@';
 408       if (host)
 409         *--host = '%';
 410
 411       if (acptr)
 412       {
 413         if (!(is_silenced(sptr, acptr)))
 414           sendto_prefix_one(acptr, sptr, ":%s %s %s :%s", /* XXX DEAD */
 415               parv[0], cmd, nick, parv[parc - 1]);
 416         continue;
 417       }
 418     }
 419     if (IsChannelName(nick))
 420       sendto_one(sptr, err_str(ERR_NOSUCHCHANNEL), me.name, parv[0], nick); /* XXX DEAD */
 421     else
 422       sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], nick); /* XXX DEAD */
 423   }
 424   return 0;
 425 }
 426
 427 /*
 428  * m_private
 429  *
 430  * parv[0] = sender prefix
 431  * parv[1] = receiver list
 432  * parv[parc-1] = message text
 433  */
 434 int m_private(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
 435 {
 436   return m_message(cptr, sptr, parc, parv, 0);
 437 }
 438
 439 #if !defined(XXX_BOGUS_TEMP_HACK)
 440 #include "handlers.h"
 441 #endif
 442 /*
 443  * m_notice
 444  *
 445  * parv[0] = sender prefix
 446  * parv[1] = receiver list
 447  * parv[parc-1] = notice text
 448  */
 449 int m_notice(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
 450 {
 451   if (MyUser(sptr) && parv[1] && parv[1][0] == '@' &&
 452       IsChannelName(&parv[1][1]))
 453   {
 454     parv[1]++;                        /* Get rid of '@' */
 455     return m_wallchops(cptr, sptr, parc, parv);
 456   }
 457   return m_message(cptr, sptr, parc, parv, 1);
 458 }
 459
 460 #endif