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 #if 0
  83 /*
  84  * No need to include handlers.h here the signatures must match
  85  * and we don't need to force a rebuild of all the handlers everytime
  86  * we add a new one to the list. --Bleep
  87  */
  88 #include "handlers.h"
  89 #endif /* 0 */
  90 #include "client.h"
  91 #include "ircd.h"
  92 #include "ircd_chattr.h"
  93 #include "ircd_features.h"
  94 #include "ircd_relay.h"
  95 #include "ircd_reply.h"
  96 #include "ircd_string.h"
  97 #include "match.h"
  98 #include "msg.h"
  99 #include "numeric.h"
 100 #include "send.h"
 101
 102 #include <assert.h>
 103 #include <string.h>
 104
 105 /*
 106  * m_privmsg - generic message handler
 107  */
 108 int m_privmsg(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
 109 {
 110   char*           name;
 111   char*           server;
 112   int             i;
 113   int             count;
 114   char*           vector[MAXTARGETS];
 115
 116   assert(0 != cptr);
 117   assert(cptr == sptr);
 118   assert(0 != cli_user(sptr));
 119
 120   cli_flags(sptr) &= ~FLAGS_TS8;
 121
 122   if (feature_bool(FEAT_IDLE_FROM_MSG))
 123     cli_user(sptr)->last = CurrentTime;
 124
 125   if (parc < 2 || EmptyString(parv[1]))
 126     return send_reply(sptr, ERR_NORECIPIENT, MSG_PRIVATE);
 127
 128   if (parc < 3 || EmptyString(parv[parc - 1]))
 129     return send_reply(sptr, ERR_NOTEXTTOSEND);
 130
 131   count = unique_name_vector(parv[1], ',', vector, MAXTARGETS);
 132
 133   for (i = 0; i < count; ++i) {
 134     name = vector[i];
 135     /*
 136      * channel msg?
 137      */
 138     if (IsChannelPrefix(*name)) {
 139       relay_channel_message(sptr, name, parv[parc - 1]);
 140     }
 141     /*
 142      * we have to check for the '@' at least once no matter what we do
 143      * handle it first so we don't have to do it twice
 144      */
 145     else if ((server = strchr(name, '@')))
 146       relay_directed_message(sptr, name, server, parv[parc - 1]);
 147     else
 148       relay_private_message(sptr, name, parv[parc - 1]);
 149   }
 150   return 0;
 151 }
 152
 153 /*
 154  * ms_privmsg - server message handler template
 155  */
 156 int ms_privmsg(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
 157 {
 158   char* name;
 159   char* server;
 160
 161   cli_flags(sptr) &= ~FLAGS_TS8;
 162
 163   if (parc < 3) {
 164     /*
 165      * we can't deliver it, sending an error back is pointless
 166      */
 167     return 0;
 168   }
 169   name = parv[1];
 170   /*
 171    * channel msg?
 172    */
 173   if (IsChannelPrefix(*name)) {
 174     server_relay_channel_message(sptr, name, parv[parc - 1]);
 175   }
 176   /*
 177    * coming from another server, we have to check this here
 178    */
 179   else if ('$' == *name && IsOper(sptr)) {
 180     server_relay_masked_message(sptr, name, parv[parc - 1]);
 181   }
 182   else if ((server = strchr(name, '@'))) {
 183     /*
 184      * XXX - can't get away with not doing everything
 185      * relay_directed_message has to do
 186      */
 187     relay_directed_message(sptr, name, server, parv[parc - 1]);
 188   }
 189   else {
 190     server_relay_private_message(sptr, name, parv[parc - 1]);
 191   }
 192   return 0;
 193 }
 194
 195
 196 /*
 197  * mo_privmsg - oper message handler
 198  */
 199 int mo_privmsg(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
 200 {
 201   char*           name;
 202   char*           server;
 203   int             i;
 204   int             count;
 205   char*           vector[MAXTARGETS];
 206   assert(0 != cptr);
 207   assert(cptr == sptr);
 208   assert(0 != cli_user(sptr));
 209
 210   cli_flags(sptr) &= ~FLAGS_TS8;
 211
 212   if (feature_bool(FEAT_IDLE_FROM_MSG))
 213     cli_user(sptr)->last = CurrentTime;
 214
 215   if (parc < 2 || EmptyString(parv[1]))
 216     return send_reply(sptr, ERR_NORECIPIENT, MSG_PRIVATE);
 217
 218   if (parc < 3 || EmptyString(parv[parc - 1]))
 219     return send_reply(sptr, ERR_NOTEXTTOSEND);
 220
 221   count = unique_name_vector(parv[1], ',', vector, MAXTARGETS);
 222
 223   for (i = 0; i < count; ++i) {
 224     name = vector[i];
 225     /*
 226      * channel msg?
 227      */
 228     if (IsChannelPrefix(*name))
 229       relay_channel_message(sptr, name, parv[parc - 1]);
 230
 231     else if (*name == '$')
 232       relay_masked_message(sptr, name, parv[parc - 1]);
 233
 234     else if ((server = strchr(name, '@')))
 235       relay_directed_message(sptr, name, server, parv[parc - 1]);
 236
 237     else
 238       relay_private_message(sptr, name, parv[parc - 1]);
 239   }
 240   return 0;
 241 }
 242
 243
 244 #if 0
 245 /*
 246  * m_message (used in m_private() and m_notice())
 247  *
 248  * The general function to deliver MSG's between users/channels
 249  *
 250  * parv[0] = sender prefix
 251  * parv[1] = receiver list
 252  * parv[parc-1] = message text
 253  *
 254  * massive cleanup
 255  * rev argv 6/91
 256  */
 257 static int m_message(struct Client *cptr, struct Client *sptr,
 258     int parc, char *parv[], int notice)
 259 {
 260   struct Client*  acptr;
 261   char*           s;
 262   struct Channel* chptr;
 263   char*           nick;
 264   char*           server;
 265   char*           cmd;
 266   char*           host;
 267   int             i;
 268   int             count;
 269   char*           vector[MAXTARGETS];
 270
 271   sptr->flags &= ~FLAGS_TS8;
 272
 273   cmd = notice ? MSG_NOTICE : MSG_PRIVATE;
 274
 275   if (parc < 2 || EmptyString(parv[1]))
 276     return send_error_to_client(sptr, ERR_NORECIPIENT, cmd); /* XXX DEAD */
 277
 278   if (parc < 3 || EmptyString(parv[parc - 1]))
 279     return send_error_to_client(sptr, ERR_NOTEXTTOSEND); /* XXX DEAD */
 280
 281
 282 #if 0
 283   if (MyUser(sptr))
 284     parv[1] = canonize(parv[1]);
 285   for (p = 0, nick = ircd_strtok(&p, parv[1], ","); nick;
 286       nick = ircd_strtok(&p, 0, ","))
 287 #endif
 288
 289   count = unique_name_vector(parv[1], ',', vector, MAXTARGETS);
 290   for (i = 0; i < count; ++i) {
 291     nick = vector[i];
 292     /*
 293      * channel msg?
 294      */
 295     if (IsChannelName(nick))
 296     {
 297       if ((chptr = FindChannel(nick)))
 298       {
 299         /* This first: Almost never a server/service */
 300         if (client_can_send_to_channel(sptr, chptr) || IsChannelService(sptr))
 301         {
 302           if (MyUser(sptr) && (chptr->mode.mode & MODE_NOPRIVMSGS) &&
 303               check_target_limit(sptr, chptr, chptr->chname, 0))
 304             continue;
 305           sendmsgto_channel_butone(cptr, sptr, chptr, /* XXX DEAD */
 306               parv[0], (notice ? TOK_NOTICE : TOK_PRIVATE),
 307               chptr->chname, parv[parc - 1]);
 308         }
 309         else if (!notice)
 310           sendto_one(sptr, err_str(ERR_CANNOTSENDTOCHAN), /* XXX DEAD */
 311               me.name, parv[0], chptr->chname);
 312         continue;
 313       }
 314     }
 315     else if (*nick != '$' && !strchr(nick, '@'))
 316     {
 317       /*
 318        * nickname addressed?
 319        */
 320       if (MyUser(sptr))
 321         acptr = FindUser(nick);
 322       else if ((acptr = findNUser(nick)) && !IsUser(acptr))
 323         acptr = 0;
 324       if (acptr)
 325       {
 326         if (MyUser(sptr) && check_target_limit(sptr, acptr, acptr->name, 0))
 327           continue;
 328         if (!is_silenced(sptr, acptr))
 329         {
 330           if (!notice && MyConnect(sptr) && acptr->user && acptr->user->away)
 331             sendto_one(sptr, rpl_str(RPL_AWAY), /* XXX DEAD */
 332                 me.name, parv[0], acptr->name, acptr->user->away);
 333           if (MyUser(acptr))
 334           {
 335             add_target(acptr, sptr);
 336             sendto_prefix_one(acptr, sptr, ":%s %s %s :%s", /* XXX DEAD */
 337                 parv[0], cmd, acptr->name, parv[parc - 1]);
 338           }
 339           else
 340             sendto_prefix_one(acptr, sptr, ":%s %s %s%s :%s", /* XXX DEAD */
 341                 parv[0], (notice ? TOK_NOTICE : TOK_PRIVATE),
 342                 NumNick(acptr), parv[parc - 1]);
 343         }
 344       }
 345       else if (MyUser(sptr))
 346         sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], nick); /* XXX DEAD */
 347       else
 348         sendto_one(sptr, /* XXX DEAD */
 349             ":%s %d %s * :Target left UnderNet. Failed to deliver: [%.50s]",
 350             me.name, ERR_NOSUCHNICK, sptr->name, parv[parc - 1]);
 351       continue;
 352     }
 353     /*
 354      * The following two cases allow masks in NOTICEs
 355      * (for OPERs only)
 356      *
 357      * Armin, 8Jun90 (gruner@informatik.tu-muenchen.de)
 358      */
 359     if ((*nick == '$' || *nick == '#') && IsAnOper(sptr))
 360     {
 361       if (MyConnect(sptr))
 362       {
 363         if (!(s = strrchr(nick, '.')))
 364         {
 365           sendto_one(sptr, err_str(ERR_NOTOPLEVEL), me.name, parv[0], nick); /* XXX DEAD */
 366           continue;
 367         }
 368         while (*++s)
 369           if (*s == '.' || *s == '*' || *s == '?')
 370             break;
 371         if (*s == '*' || *s == '?')
 372         {
 373           sendto_one(sptr, err_str(ERR_WILDTOPLEVEL), me.name, parv[0], nick); /* XXX DEAD */
 374           continue;
 375         }
 376       }
 377       sendto_match_butone(IsServer(cptr) ? cptr : 0, /* XXX DEAD */
 378           sptr, nick + 1, (*nick == '#') ? MATCH_HOST : MATCH_SERVER,
 379           ":%s %s %s :%s", parv[0], cmd, nick, parv[parc - 1]);
 380       continue;
 381     }
 382     else if ((server = strchr(nick, '@')) && (acptr = FindServer(server + 1)))
 383     {
 384       /*
 385        * NICK[%host]@server addressed? See if <server> is me first
 386        */
 387       if (!IsMe(acptr))
 388       {
 389         sendto_one(acptr, ":%s %s %s :%s", parv[0], cmd, nick, parv[parc - 1]); /* XXX DEAD */
 390         continue;
 391       }
 392
 393       /* Look for an user whose NICK is equal to <nick> and then
 394        * check if it's hostname matches <host> and if it's a local
 395        * user. */
 396       *server = '\0';
 397       if ((host = strchr(nick, '%')))
 398         *host++ = '\0';
 399
 400       if ((!(acptr = FindUser(nick))) ||
 401           (!(MyUser(acptr))) ||
 402           ((!(EmptyString(host))) && match(host, acptr->user->host)))
 403         acptr = 0;
 404
 405       *server = '@';
 406       if (host)
 407         *--host = '%';
 408
 409       if (acptr)
 410       {
 411         if (!(is_silenced(sptr, acptr)))
 412           sendto_prefix_one(acptr, sptr, ":%s %s %s :%s", /* XXX DEAD */
 413               parv[0], cmd, nick, parv[parc - 1]);
 414         continue;
 415       }
 416     }
 417     if (IsChannelName(nick))
 418       sendto_one(sptr, err_str(ERR_NOSUCHCHANNEL), me.name, parv[0], nick); /* XXX DEAD */
 419     else
 420       sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], nick); /* XXX DEAD */
 421   }
 422   return 0;
 423 }
 424
 425 /*
 426  * m_private
 427  *
 428  * parv[0] = sender prefix
 429  * parv[1] = receiver list
 430  * parv[parc-1] = message text
 431  */
 432 int m_private(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
 433 {
 434   return m_message(cptr, sptr, parc, parv, 0);
 435 }
 436
 437 #if !defined(XXX_BOGUS_TEMP_HACK)
 438 #include "handlers.h"
 439 #endif
 440 /*
 441  * m_notice
 442  *
 443  * parv[0] = sender prefix
 444  * parv[1] = receiver list
 445  * parv[parc-1] = notice text
 446  */
 447 int m_notice(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
 448 {
 449   if (MyUser(sptr) && parv[1] && parv[1][0] == '@' &&
 450       IsChannelName(&parv[1][1]))
 451   {
 452     parv[1]++;                        /* Get rid of '@' */
 453     return m_wallchops(cptr, sptr, parc, parv);
 454   }
 455   return m_message(cptr, sptr, parc, parv, 1);
 456 }
 457
 458 #endif