2 * IRC - Internet Relay Chat, ircd/m_privmsg.c
3 * Copyright (C) 1990 Jarkko Oikarinen and
4 * University of Oulu, Computing Center
6 * See file AUTHORS in IRC package for additional names of
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)
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.
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.
27 * m_functions execute protocol messages on this server:
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...).
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.
39 * (!IsServer(cptr)) => (cptr == sptr), because
40 * prefixes are taken *only* from servers...
43 * (sptr == cptr) => the message didn't
46 * (sptr != cptr && IsServer(sptr) means
47 * the prefix specified servername. (?)
49 * (sptr != cptr && !IsServer(sptr) means
50 * that message originated from a remote
55 * (!IsServer(sptr)) means that, sptr can safely
56 * taken as defining the target structure of the
57 * message in this server.
59 * *Always* true (if 'parse' and others are working correct):
61 * 1) sptr->from == cptr (note: cptr->from == cptr)
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 ]
68 * parc number of variable parameter strings (if zero,
69 * parv is allowed to be NULL)
71 * parv a NULL terminated list of parameter pointers,
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*
79 * note: it is guaranteed that parv[0]..parv[parc-1] are all
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
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"
108 * m_privmsg - generic message handler
110 int m_privmsg(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
116 char* vector[MAXTARGETS];
119 assert(cptr == sptr);
120 assert(0 != cli_user(sptr));
122 cli_flags(sptr) &= ~FLAGS_TS8;
124 if (feature_bool(FEAT_IDLE_FROM_MSG))
125 cli_user(sptr)->last = CurrentTime;
127 if (parc < 2 || EmptyString(parv[1]))
128 return send_reply(sptr, ERR_NORECIPIENT, MSG_PRIVATE);
130 if (parc < 3 || EmptyString(parv[parc - 1]))
131 return send_reply(sptr, ERR_NOTEXTTOSEND);
133 count = unique_name_vector(parv[1], ',', vector, MAXTARGETS);
135 for (i = 0; i < count; ++i) {
140 if (IsChannelPrefix(*name)) {
141 relay_channel_message(sptr, name, parv[parc - 1]);
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
147 else if ((server = strchr(name, '@')))
148 relay_directed_message(sptr, name, server, parv[parc - 1]);
150 relay_private_message(sptr, name, parv[parc - 1]);
156 * ms_privmsg - server message handler template
158 int ms_privmsg(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
163 cli_flags(sptr) &= ~FLAGS_TS8;
167 * we can't deliver it, sending an error back is pointless
175 if (IsChannelPrefix(*name)) {
176 server_relay_channel_message(sptr, name, parv[parc - 1]);
179 * coming from another server, we have to check this here
181 else if ('$' == *name && IsOper(sptr)) {
182 server_relay_masked_message(sptr, name, parv[parc - 1]);
184 else if ((server = strchr(name, '@'))) {
186 * XXX - can't get away with not doing everything
187 * relay_directed_message has to do
189 relay_directed_message(sptr, name, server, parv[parc - 1]);
192 server_relay_private_message(sptr, name, parv[parc - 1]);
199 * mo_privmsg - oper message handler
201 int mo_privmsg(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
207 char* vector[MAXTARGETS];
209 assert(cptr == sptr);
210 assert(0 != cli_user(sptr));
212 cli_flags(sptr) &= ~FLAGS_TS8;
214 if (feature_bool(FEAT_IDLE_FROM_MSG))
215 cli_user(sptr)->last = CurrentTime;
217 if (parc < 2 || EmptyString(parv[1]))
218 return send_reply(sptr, ERR_NORECIPIENT, MSG_PRIVATE);
220 if (parc < 3 || EmptyString(parv[parc - 1]))
221 return send_reply(sptr, ERR_NOTEXTTOSEND);
223 count = unique_name_vector(parv[1], ',', vector, MAXTARGETS);
225 for (i = 0; i < count; ++i) {
230 if (IsChannelPrefix(*name))
231 relay_channel_message(sptr, name, parv[parc - 1]);
233 else if (*name == '$')
234 relay_masked_message(sptr, name, parv[parc - 1]);
236 else if ((server = strchr(name, '@')))
237 relay_directed_message(sptr, name, server, parv[parc - 1]);
240 relay_private_message(sptr, name, parv[parc - 1]);
248 * m_message (used in m_private() and m_notice())
250 * The general function to deliver MSG's between users/channels
252 * parv[0] = sender prefix
253 * parv[1] = receiver list
254 * parv[parc-1] = message text
259 static int m_message(struct Client *cptr, struct Client *sptr,
260 int parc, char *parv[], int notice)
262 struct Client* acptr;
264 struct Channel* chptr;
271 char* vector[MAXTARGETS];
273 sptr->flags &= ~FLAGS_TS8;
275 cmd = notice ? MSG_NOTICE : MSG_PRIVATE;
277 if (parc < 2 || EmptyString(parv[1]))
278 return send_error_to_client(sptr, ERR_NORECIPIENT, cmd); /* XXX DEAD */
280 if (parc < 3 || EmptyString(parv[parc - 1]))
281 return send_error_to_client(sptr, ERR_NOTEXTTOSEND); /* XXX DEAD */
286 parv[1] = canonize(parv[1]);
287 for (p = 0, nick = ircd_strtok(&p, parv[1], ","); nick;
288 nick = ircd_strtok(&p, 0, ","))
291 count = unique_name_vector(parv[1], ',', vector, MAXTARGETS);
292 for (i = 0; i < count; ++i) {
297 if (IsChannelName(nick))
299 if ((chptr = FindChannel(nick)))
301 /* This first: Almost never a server/service */
302 if (client_can_send_to_channel(sptr, chptr) || IsChannelService(sptr))
304 if (MyUser(sptr) && (chptr->mode.mode & MODE_NOPRIVMSGS) &&
305 check_target_limit(sptr, chptr, chptr->chname, 0))
307 sendmsgto_channel_butone(cptr, sptr, chptr, /* XXX DEAD */
308 parv[0], (notice ? TOK_NOTICE : TOK_PRIVATE),
309 chptr->chname, parv[parc - 1]);
312 sendto_one(sptr, err_str(ERR_CANNOTSENDTOCHAN), /* XXX DEAD */
313 me.name, parv[0], chptr->chname);
317 else if (*nick != '$' && !strchr(nick, '@'))
320 * nickname addressed?
323 acptr = FindUser(nick);
324 else if ((acptr = findNUser(nick)) && !IsUser(acptr))
328 if (MyUser(sptr) && check_target_limit(sptr, acptr, acptr->name, 0))
330 if (!is_silenced(sptr, acptr))
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);
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]);
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]);
347 else if (MyUser(sptr))
348 sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], nick); /* XXX DEAD */
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]);
356 * The following two cases allow masks in NOTICEs
359 * Armin, 8Jun90 (gruner@informatik.tu-muenchen.de)
361 if ((*nick == '$' || *nick == '#') && IsAnOper(sptr))
365 if (!(s = strrchr(nick, '.')))
367 sendto_one(sptr, err_str(ERR_NOTOPLEVEL), me.name, parv[0], nick); /* XXX DEAD */
371 if (*s == '.' || *s == '*' || *s == '?')
373 if (*s == '*' || *s == '?')
375 sendto_one(sptr, err_str(ERR_WILDTOPLEVEL), me.name, parv[0], nick); /* XXX DEAD */
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]);
384 else if ((server = strchr(nick, '@')) && (acptr = FindServer(server + 1)))
387 * NICK[%host]@server addressed? See if <server> is me first
391 sendto_one(acptr, ":%s %s %s :%s", parv[0], cmd, nick, parv[parc - 1]); /* XXX DEAD */
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
399 if ((host = strchr(nick, '%')))
402 if ((!(acptr = FindUser(nick))) ||
403 (!(MyUser(acptr))) ||
404 ((!(EmptyString(host))) && match(host, acptr->user->host)))
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]);
419 if (IsChannelName(nick))
420 sendto_one(sptr, err_str(ERR_NOSUCHCHANNEL), me.name, parv[0], nick); /* XXX DEAD */
422 sendto_one(sptr, err_str(ERR_NOSUCHNICK), me.name, parv[0], nick); /* XXX DEAD */
430 * parv[0] = sender prefix
431 * parv[1] = receiver list
432 * parv[parc-1] = message text
434 int m_private(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
436 return m_message(cptr, sptr, parc, parv, 0);
439 #if !defined(XXX_BOGUS_TEMP_HACK)
440 #include "handlers.h"
445 * parv[0] = sender prefix
446 * parv[1] = receiver list
447 * parv[parc-1] = notice text
449 int m_notice(struct Client *cptr, struct Client *sptr, int parc, char *parv[])
451 if (MyUser(sptr) && parv[1] && parv[1][0] == '@' &&
452 IsChannelName(&parv[1][1]))
454 parv[1]++; /* Get rid of '@' */
455 return m_wallchops(cptr, sptr, parc, parv);
457 return m_message(cptr, sptr, parc, parv, 1);