underchat
/
ircu2
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
ircu2/ircd/send.c

1110 lines
34 KiB
C
Raw Blame History

/*
* IRC - Internet Relay Chat, common/send.c
* Copyright (C) 1990 Jarkko Oikarinen and
* University of Oulu, Computing Center
*
* 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 1, or (at your option)
* any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/
/** @file
* @brief Send messages to certain targets.
* @version $Id: send.c 1909 2009-03-18 03:31:58Z entrope $
*/
#include "config.h"
#include "send.h"
#include "channel.h"
#include "class.h"
#include "client.h"
#include "hash.h"
#include "ircd_limits.h" /* Security fix: SendQ/RecvQ limits */
#include "ircd.h"
#include "ircd_features.h"
#include "ircd_log.h"
#include "ircd_snprintf.h"
#include "ircd_string.h"
#include "list.h"
#include "match.h"
#include "msg.h"
#include "numnicks.h"
#include "parse.h"
#include "s_bsd.h"
#include "s_debug.h"
#include "s_misc.h"
#include "s_user.h"
#include "struct.h"
#include "sys.h"
/* #include <assert.h> -- Now using assert in ircd_log.h */
#include <stdio.h>
#include <string.h>
/** Last used marker value. */
static int sentalong_marker;
/** Array of users with the corresponding server notice mask bit set. */
struct SLink *opsarray[32]; /* don't use highest bit unless you change
atoi to strtoul in sendto_op_mask() */
/** Linked list of all connections with data queued to send. */
static struct Connection *send_queues;
char *GlobalForwards[256];
/*
* dead_link
*
* An error has been detected. The link *must* be closed,
* but *cannot* call ExitClient (m_bye) from here.
* Instead, mark it with FLAG_DEADSOCKET. This should
* generate ExitClient from the main loop.
*
* If 'notice' is not NULL, it is assumed to be a format
* for a message to local opers. It can contain only one
* '%s', which will be replaced by the sockhost field of
* the failing link.
*
* Also, the notice is skipped for "uninteresting" cases,
* like Persons and yet unknown connections...
*/
/** Mark a client as dead, even if they are not the current message source.
* This is done by setting the DEADSOCKET flag on the user and letting the
* main loop perform the actual exit logic.
* @param[in,out] to Client being killed.
* @param[in] notice Message for local opers.
*/
static void dead_link(struct Client *to, char *notice)
{
SetFlag(to, FLAG_DEADSOCKET);
/*
* If because of BUFFERPOOL problem then clean dbuf's now so that
* notices don't hurt operators below.
*/
DBufClear(&(cli_recvQ(to)));
MsgQClear(&(cli_sendQ(to)));
client_drop_sendq(cli_connect(to));
/*
* Keep a copy of the last comment, for later use...
*/
ircd_strncpy(cli_info(to), notice, REALLEN + 1);
if (!IsUser(to) && !IsUnknown(to) && !HasFlag(to, FLAG_CLOSING))
sendto_opmask_butone(0, SNO_OLDSNO, "%s for %s", cli_info(to), cli_name(to));
Debug((DEBUG_ERROR, cli_info(to)));
}
/** Test whether we can send to a client.
* @param[in] to Client we want to send to.
* @return Non-zero if we can send to the client.
*/
static int can_send(struct Client* to)
{
assert(0 != to);
return (IsDead(to) || IsMe(to) || -1 == cli_fd(to)) ? 0 : 1;
}
/** Close the connection with the highest sendq.
* This should be called when we need to free buffer memory.
* @param[in] servers_too If non-zero, consider killing servers, too.
*/
void
kill_highest_sendq(int servers_too)
{
int i;
unsigned int highest_sendq = 0;
struct Client *highest_client = 0;
for (i = HighestFd; i >= 0; i--)
{
if (!LocalClientArray[i] || (!servers_too && cli_serv(LocalClientArray[i])))
continue; /* skip servers */
/* If this sendq is higher than one we last saw, remember it */
if (MsgQLength(&(cli_sendQ(LocalClientArray[i]))) > highest_sendq)
{
highest_client = LocalClientArray[i];
highest_sendq = MsgQLength(&(cli_sendQ(highest_client)));
}
}
if (highest_client)
dead_link(highest_client, "Buffer allocation error");
}
/*
* flush_connections
*
* Used to empty all output buffers for all connections. Should only
* be called once per scan of connections. There should be a select in
* here perhaps but that means either forcing a timeout or doing a poll.
* When flushing, all we do is empty the obuffer array for each local
* client and try to send it. if we cant send it, it goes into the sendQ
* -avalon
*/
/** Flush data queued for one or all connections.
* @param[in] cptr Client to flush (if NULL, do all).
*/
void flush_connections(struct Client* cptr)
{
if (cptr) {
send_queued(cptr);
}
else {
struct Connection* con;
for (con = send_queues; con; con = con_next(con)) {
assert(0 < MsgQLength(&(con_sendQ(con))));
send_queued(con_client(con));
}
}
}
/*
* send_queued
*
* This function is called from the main select-loop (or whatever)
* when there is a chance that some output would be possible. This
* attempts to empty the send queue as far as possible...
*/
/** Attempt to send data queued for a client.
* @param[in] to Client to send data to.
*/
void send_queued(struct Client *to)
{
assert(0 != to);
assert(0 != cli_local(to));
if (IsBlocked(to) || !can_send(to))
return; /* Don't bother */
while (MsgQLength(&(cli_sendQ(to))) > 0) {
unsigned int len;
if ((len = deliver_it(to, &(cli_sendQ(to))))) {
msgq_delete(&(cli_sendQ(to)), len);
cli_lastsq(to) = MsgQLength(&(cli_sendQ(to))) / 1024;
if (IsBlocked(to)) {
update_write(to);
return;
}
}
else {
if (IsDead(to)) {
char tmp[512];
sprintf(tmp,"Write error: %s", ((cli_sslerror(to)) ? (cli_sslerror(to)) :
((strerror(cli_error(to))) ? (strerror(cli_error(to))) : "Unknown error")) );
dead_link(to, tmp);
}
return;
}
}
/* Ok, sendq is now empty... */
client_drop_sendq(cli_connect(to));
update_write(to);
}
/** Try to send a buffer to a client, queueing it if needed.
* @param[in,out] to Client to send message to.
* @param[in] buf Message to send.
* @param[in] prio If non-zero, send as high priority.
*/
void send_buffer(struct Client* to, struct MsgBuf* buf, int prio)
{
assert(0 != to);
assert(0 != buf);
if (cli_from(to))
to = cli_from(to);
if (!can_send(to))
/*
* This socket has already been marked as dead
*/
return;
if (MsgQLength(&(cli_sendQ(to))) > get_sendq(to)) {
if (IsServer(to))
sendto_opmask_butone(0, SNO_OLDSNO, "Max SendQ limit exceeded for %C: "
"%zu > %zu", to, MsgQLength(&(cli_sendQ(to))),
get_sendq(to));
dead_link(to, "Max sendQ exceeded");
return;
}
Debug((DEBUG_SEND, "Sending [%p] to %s", buf, cli_name(to)));
/* Security fix: Verifică SendQ limits înainte de adăugare */
unsigned int current_sendq = MsgQLength(&(cli_sendQ(to)));
unsigned int max_sendq;
if (IsServer(to))
max_sendq = MAX_SENDQ_SERVER;
else if (IsOper(to))
max_sendq = MAX_SENDQ_OPER;
else
max_sendq = MAX_SENDQ_USER;
if (current_sendq >= max_sendq) {
/* SendQ depășit - kill connection pentru protecție DoS */
dead_link(to, "SendQ exceeded");
return;
}
msgq_add(&(cli_sendQ(to)), buf, prio);
client_add_sendq(cli_connect(to), &send_queues);
update_write(to);
/*
* Update statistics. The following is slightly incorrect
* because it counts messages even if queued, but bytes
* only really sent. Queued bytes get updated in SendQueued.
*/
++(cli_sendM(to));
++(cli_sendM(&me));
/*
* This little bit is to stop the sendQ from growing too large when
* there is no need for it to. Thus we call send_queued() every time
* 2k has been added to the queue since the last non-fatal write.
* Also stops us from deliberately building a large sendQ and then
* trying to flood that link with data (possible during the net
* relinking done by servers with a large load).
*/
if (MsgQLength(&(cli_sendQ(to))) / 1024 > cli_lastsq(to))
send_queued(to);
}
/*
* Send a msg to all ppl on servers/hosts that match a specified mask
* (used for enhanced PRIVMSGs)
*
* addition -- Armin, 8jun90 (gruner@informatik.tu-muenchen.de)
*/
/** Check whether a client matches a target mask.
* @param[in] from Client trying to send a message (ignored).
* @param[in] one Client being considered as a target.
* @param[in] mask Mask for matching against.
* @param[in] what Type of match (either MATCH_HOST or MATCH_SERVER).
* @return Non-zero if \a one matches, zero if not.
*/
static int match_it(struct Client *from, struct Client *one, const char *mask, int what)
{
switch (what)
{
case MATCH_HOST:
return (match(mask, cli_user(one)->host) == 0 ||
(IsHiddenHost(one) && match(mask, cli_user(one)->realhost) == 0));
case MATCH_SERVER:
default:
return (match(mask, cli_name(cli_user(one)->server)) == 0);
}
}
/** Send an unprefixed line to a client.
* @param[in] to Client receiving message.
* @param[in] pattern Format string of message.
*/
void sendrawto_one(struct Client *to, const char *pattern, ...)
{
struct MsgBuf *mb;
va_list vl;
va_start(vl, pattern);
mb = msgq_vmake(to, pattern, vl);
va_end(vl);
send_buffer(to, mb, 0);
msgq_clean(mb);
}
/** Send a (prefixed) command to a single client.
* @param[in] from Client sending the command.
* @param[in] cmd Long name of command (used if \a to is a user).
* @param[in] tok Short name of command (used if \a to is a server).
* @param[in] to Destination of command.
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_one(struct Client *from, const char *cmd, const char *tok,
struct Client *to, const char *pattern, ...)
{
struct VarData vd;
struct MsgBuf *mb;
to = cli_from(to);
vd.vd_format = pattern; /* set up the struct VarData for %v */
va_start(vd.vd_args, pattern);
mb = msgq_make(to, "%:#C %s %v", from, IsServer(to) || IsMe(to) ? tok : cmd,
&vd);
va_end(vd.vd_args);
send_buffer(to, mb, 0);
msgq_clean(mb);
}
/**
* Send a (prefixed) command to a single client in the priority queue.
* @param[in] from Client sending the command.
* @param[in] cmd Long name of command (used if \a to is a user).
* @param[in] tok Short name of command (used if \a to is a server).
* @param[in] to Destination of command.
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_prio_one(struct Client *from, const char *cmd, const char *tok,
struct Client *to, const char *pattern, ...)
{
struct VarData vd;
struct MsgBuf *mb;
to = cli_from(to);
vd.vd_format = pattern; /* set up the struct VarData for %v */
va_start(vd.vd_args, pattern);
mb = msgq_make(to, "%:#C %s %v", from, IsServer(to) || IsMe(to) ? tok : cmd,
&vd);
va_end(vd.vd_args);
send_buffer(to, mb, 1);
msgq_clean(mb);
}
/**
* Send a (prefixed) command to all servers matching or not matching a
* flag but one.
* @param[in] from Client sending the command.
* @param[in] cmd Long name of command (ignored).
* @param[in] tok Short name of command.
* @param[in] one Client direction to skip (or NULL).
* @param[in] require Only send to servers with this Flag bit set.
* @param[in] forbid Do not send to servers with this Flag bit set.
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_flag_serv_butone(struct Client *from, const char *cmd,
const char *tok, struct Client *one,
int require, int forbid,
const char *pattern, ...)
{
struct VarData vd;
struct MsgBuf *mb;
struct DLink *lp;
vd.vd_format = pattern; /* set up the struct VarData for %v */
va_start(vd.vd_args, pattern);
/* use token */
mb = msgq_make(&me, "%C %s %v", from, tok, &vd);
va_end(vd.vd_args);
/* send it to our downlinks */
for (lp = cli_serv(&me)->down; lp; lp = lp->next) {
if (one && lp->value.cptr == cli_from(one))
continue;
if ((require < FLAG_LAST_FLAG) && !HasFlag(lp->value.cptr, require))
continue;
if ((forbid < FLAG_LAST_FLAG) && HasFlag(lp->value.cptr, forbid))
continue;
send_buffer(lp->value.cptr, mb, 0);
}
msgq_clean(mb);
}
/**
* Send a (prefixed) command to all servers but one.
* @param[in] from Client sending the command.
* @param[in] cmd Long name of command (ignored).
* @param[in] tok Short name of command.
* @param[in] one Client direction to skip (or NULL).
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_serv_butone(struct Client *from, const char *cmd,
const char *tok, struct Client *one,
const char *pattern, ...)
{
struct VarData vd;
struct MsgBuf *mb;
struct DLink *lp;
vd.vd_format = pattern; /* set up the struct VarData for %v */
va_start(vd.vd_args, pattern);
/* use token */
mb = msgq_make(&me, "%C %s %v", from, tok, &vd);
va_end(vd.vd_args);
/* send it to our downlinks */
for (lp = cli_serv(&me)->down; lp; lp = lp->next) {
if (one && lp->value.cptr == cli_from(one))
continue;
send_buffer(lp->value.cptr, mb, 0);
}
msgq_clean(mb);
}
/** Safely increment the sentalong marker.
* This increments the sentalong marker. Since new connections will
* have con_sentalong() == 0, and to avoid confusion when the counter
* wraps, we reset all sentalong markers to zero when the sentalong
* marker hits zero.
* @param[in,out] one Client to mark with new sentalong marker (if any).
*/
static void
bump_sentalong(struct Client *one)
{
if (!++sentalong_marker)
{
int ii;
for (ii = 0; ii < HighestFd; ++ii)
if (LocalClientArray[ii])
cli_sentalong(LocalClientArray[ii]) = 0;
++sentalong_marker;
}
if (one)
cli_sentalong(one) = sentalong_marker;
}
/** Send a (prefixed) command to all channels that \a from is on.
* @param[in] from Client originating the command.
* @param[in] cmd Long name of command.
* @param[in] tok Short name of command.
* @param[in] one Client direction to skip (or NULL).
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_common_channels_butone(struct Client *from, const char *cmd,
const char *tok, struct Client *one,
const char *pattern, ...)
{
struct VarData vd;
struct MsgBuf *mb;
struct Membership *chan;
struct Membership *member;
assert(0 != from);
assert(0 != cli_from(from));
assert(0 != pattern);
assert(!IsServer(from) && !IsMe(from));
vd.vd_format = pattern; /* set up the struct VarData for %v */
va_start(vd.vd_args, pattern);
/* build the buffer */
mb = msgq_make(0, "%:#C %s %v", from, cmd, &vd);
va_end(vd.vd_args);
bump_sentalong(from);
/*
* loop through from's channels, and the members on their channels
*/
for (chan = cli_user(from)->channel; chan; chan = chan->next_channel) {
if (IsZombie(chan) || IsDelayedJoin(chan))
continue;
for (member = chan->channel->members; member;
member = member->next_member)
if (MyConnect(member->user)
&& -1 < cli_fd(cli_from(member->user))
&& member->user != one
&& cli_sentalong(member->user) != sentalong_marker) {
cli_sentalong(member->user) = sentalong_marker;
send_buffer(member->user, mb, 0);
}
}
if (MyConnect(from) && from != one)
send_buffer(from, mb, 0);
msgq_clean(mb);
}
/** Send a (prefixed) command to all channels that \a from is on.
* @param[in] from Client originating the command.
* @param[in] cmd Long name of command.
* @param[in] tok Short name of command.
* @param[in] one Client direction to skip (or NULL).
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_common_channels_capab_butone(struct Client *from, const char *cmd,
const char *tok, struct Client *one,
int withcap, int skipcap,
const char *pattern, ...)
{
struct VarData vd;
struct MsgBuf *mb;
struct Membership *chan;
struct Membership *member;
assert(0 != from);
assert(0 != cli_from(from));
assert(0 != pattern);
assert(!IsServer(from) && !IsMe(from));
vd.vd_format = pattern; /* set up the struct VarData for %v */
va_start(vd.vd_args, pattern);
/* build the buffer */
mb = msgq_make(0, "%:#C %s %v", from, cmd, &vd);
va_end(vd.vd_args);
bump_sentalong(from);
/*
* loop through from's channels, and the members on their channels
*/
for (chan = cli_user(from)->channel; chan; chan = chan->next_channel) {
if (IsZombie(chan) || IsDelayedJoin(chan))
continue;
for (member = chan->channel->members; member;
member = member->next_member)
if (MyConnect(member->user)
&& -1 < cli_fd(cli_from(member->user))
&& member->user != one
&& cli_sentalong(member->user) != sentalong_marker
&& ((withcap == CAP_NONE) || CapActive(member->user, withcap))
&& ((skipcap == CAP_NONE) || !CapActive(member->user, skipcap))) {
cli_sentalong(member->user) = sentalong_marker;
send_buffer(member->user, mb, 0);
}
}
if (MyConnect(from) && from != one)
send_buffer(from, mb, 0);
msgq_clean(mb);
}
/** Send a (prefixed) command to all local users on a channel.
* @param[in] from Client originating the command.
* @param[in] cmd Long name of command.
* @param[in] tok Short name of command (ignored).
* @param[in] to Destination channel.
* @param[in] one Client direction to skip (or NULL).
* @param[in] skip Bitmask of SKIP_DEAF, SKIP_NONOPS, SKIP_NONVOICES indicating which clients to skip.
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_channel_butserv_butone(struct Client *from, const char *cmd,
const char *tok, struct Channel *to,
struct Client *one, unsigned int skip,
const char *pattern, ...)
{
struct VarData vd;
struct MsgBuf *mb;
struct Membership *member;
vd.vd_format = pattern; /* set up the struct VarData for %v */
va_start(vd.vd_args, pattern);
/* build the buffer */
mb = msgq_make(0, "%:#C %s %v", from, cmd, &vd);
va_end(vd.vd_args);
/* send the buffer to each local channel member */
for (member = to->members; member; member = member->next_member) {
if (!MyConnect(member->user)
|| member->user == one
|| IsZombie(member)
|| (skip & SKIP_DEAF && IsDeaf(member->user))
|| (skip & SKIP_NONOPS && !IsChanOp(member))
|| (skip & SKIP_NONHOPS && !IsChanOp(member) && !IsHalfOp(member))
|| (skip & SKIP_NONVOICES && !IsChanOp(member) && !IsHalfOp(member)&& !HasVoice(member)))
continue;
send_buffer(member->user, mb, 0);
}
msgq_clean(mb);
}
/** Send a (prefixed) command to all local users on a channel with or without
* a client capability specified.
* @param[in] from Client originating the command.
* @param[in] cmd Long name of command.
* @param[in] tok Short name of command (ignored).
* @param[in] to Destination channel.
* @param[in] one Client direction to skip (or NULL).
* @param[in] skip Bitmask of SKIP_DEAF, SKIP_NONOPS, SKIP_NONVOICES indicating which clients to skip.
* @param[in] withcap CAP_* that the user must have active to receive the message.
* @param[in] skipcap CAP_* that the user must not have active to receive the message.
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_channel_capab_butserv_butone(struct Client *from, const char *cmd,
const char *tok, struct Channel *to,
struct Client *one, unsigned int skip,
int withcap, int skipcap,
const char *pattern, ...)
{
struct VarData vd;
struct MsgBuf *mb;
struct Membership *member;
vd.vd_format = pattern; /* set up the struct VarData for %v */
va_start(vd.vd_args, pattern);
/* build the buffer */
mb = msgq_make(0, "%:#C %s %v", from, cmd, &vd);
va_end(vd.vd_args);
/* send the buffer to each local channel member */
for (member = to->members; member; member = member->next_member) {
if (!MyConnect(member->user)
|| member->user == one
|| IsZombie(member)
|| (skip & SKIP_DEAF && IsDeaf(member->user))
|| (skip & SKIP_NONOPS && !IsChanOp(member))
|| (skip & SKIP_NONHOPS && !IsChanOp(member) && !IsHalfOp(member))
|| (skip & SKIP_NONVOICES && !IsChanOp(member) && !IsHalfOp(member)&& !HasVoice(member))
|| ((withcap != CAP_NONE) && !CapActive(member->user, withcap))
|| ((skipcap != CAP_NONE) && CapActive(member->user, skipcap)))
continue;
send_buffer(member->user, mb, 0);
}
msgq_clean(mb);
}
/** Send a (prefixed) command to all servers with users on \a to.
* Skip \a from and \a one plus those indicated in \a skip.
* @param[in] from Client originating the command.
* @param[in] cmd Long name of command (ignored).
* @param[in] tok Short name of command.
* @param[in] to Destination channel.
* @param[in] one Client direction to skip (or NULL).
* @param[in] skip Bitmask of SKIP_NONOPS and SKIP_NONVOICES indicating which clients to skip.
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_channel_servers_butone(struct Client *from, const char *cmd,
const char *tok, struct Channel *to,
struct Client *one, unsigned int skip,
const char *pattern, ...)
{
struct VarData vd;
struct MsgBuf *serv_mb;
struct Membership *member;
/* build the buffer */
vd.vd_format = pattern;
va_start(vd.vd_args, pattern);
serv_mb = msgq_make(&me, "%:#C %s %v", from, tok, &vd);
va_end(vd.vd_args);
/* send the buffer to each server */
bump_sentalong(one);
cli_sentalong(from) = sentalong_marker;
for (member = to->members; member; member = member->next_member) {
if (MyConnect(member->user)
|| IsZombie(member)
|| cli_fd(cli_from(member->user)) < 0
|| cli_sentalong(member->user) == sentalong_marker
|| (skip & SKIP_NONOPS && !IsChanOp(member))
|| (skip & SKIP_NONHOPS && !IsChanOp(member) && !IsHalfOp(member))
|| (skip & SKIP_NONVOICES && !IsChanOp(member) && !IsHalfOp(member)&& !HasVoice(member)))
continue;
cli_sentalong(member->user) = sentalong_marker;
send_buffer(member->user, serv_mb, 0);
}
msgq_clean(serv_mb);
}
/** Send a (prefixed) command to all users on this channel, except for
* \a one and those matching \a skip.
* @warning \a pattern must not contain %v.
* @param[in] from Client originating the command.
* @param[in] cmd Long name of command.
* @param[in] tok Short name of command.
* @param[in] to Destination channel.
* @param[in] one Client direction to skip (or NULL).
* @param[in] skip Bitmask of SKIP_NONOPS, SKIP_NONVOICES, SKIP_DEAF, SKIP_BURST.
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_channel_butone(struct Client *from, const char *cmd,
const char *tok, struct Channel *to,
struct Client *one, unsigned int skip,
unsigned char prefix, const char *pattern, ...)
{
struct Membership *member;
struct VarData vd;
struct MsgBuf *user_mb;
struct MsgBuf *serv_mb;
struct Client *service;
const char *userfmt;
const char *usercmd;
vd.vd_format = pattern;
/* Build buffer to send to users */
usercmd = cmd;
userfmt = "%:#C %s %v";
if (skip & (SKIP_NONOPS | SKIP_NONHOPS | SKIP_NONVOICES)) {
usercmd = MSG_NOTICE;
if (skip & SKIP_NONVOICES)
userfmt = "%:#C %s +%v";
else if (skip & SKIP_NONHOPS)
userfmt = "%:#C %s %%%v";
else
userfmt = "%:#C %s @%v";
}
va_start(vd.vd_args, pattern);
user_mb = msgq_make(0, userfmt, from, usercmd, &vd);
va_end(vd.vd_args);
/* Build buffer to send to servers */
va_start(vd.vd_args, pattern);
serv_mb = msgq_make(&me, "%C %s %v", from, tok, &vd);
va_end(vd.vd_args);
/* send buffer along! */
bump_sentalong(one);
for (member = to->members; member; member = member->next_member) {
/* skip one, zombies, and deaf users... */
if (IsZombie(member) ||
(skip & SKIP_DEAF && IsDeaf(member->user)) ||
(skip & SKIP_NONOPS && !IsChanOp(member)) ||
(skip & SKIP_NONHOPS && !IsChanOp(member) && !IsHalfOp(member)) ||
(skip & SKIP_NONVOICES && !IsChanOp(member) && !IsHalfOp(member) && !HasVoice(member)) ||
(skip & SKIP_BURST && IsBurstOrBurstAck(cli_from(member->user))) ||
(is_silenced(from, member->user, 1)) ||
cli_fd(cli_from(member->user)) < 0 ||
cli_sentalong(member->user) == sentalong_marker)
continue;
cli_sentalong(member->user) = sentalong_marker;
if (MyConnect(member->user)) /* pick right buffer to send */
send_buffer(member->user, user_mb, 0);
else
send_buffer(member->user, serv_mb, 0);
}
/* Consult service forwarding table. */
if(GlobalForwards[prefix]
&& (service = FindServer(GlobalForwards[prefix]))
&& cli_sentalong(service) != sentalong_marker) {
cli_sentalong(service) = sentalong_marker;
send_buffer(service, serv_mb, 0);
}
msgq_clean(user_mb);
msgq_clean(serv_mb);
}
/** Send a (prefixed) WALL of type \a type to all users except \a one.
* @warning \a pattern must not contain %v.
* @param[in] from Source of the command.
* @param[in] type One of WALL_DESYNCH, WALL_WALLOPS or WALL_WALLUSERS.
* @param[in] one Client direction to skip (or NULL).
* @param[in] pattern Format string for command arguments.
*/
void sendwallto_group_butone(struct Client *from, int type, struct Client *one,
const char *pattern, ...)
{
struct VarData vd;
struct Client *cptr;
struct MsgBuf *mb;
struct DLink *lp;
char *prefix=NULL;
char *tok=NULL;
int his_wallops;
int i;
vd.vd_format = pattern;
/* Build buffer to send to users */
va_start(vd.vd_args, pattern);
switch (type) {
case WALL_DESYNCH:
prefix="";
tok=TOK_DESYNCH;
break;
case WALL_WALLOPS:
prefix="* ";
tok=TOK_WALLOPS;
break;
case WALL_WALLUSERS:
prefix="$ ";
tok=TOK_WALLUSERS;
break;
default:
assert(0);
}
mb = msgq_make(0, "%:#C " MSG_WALLOPS " :%s%v", from, prefix,&vd);
va_end(vd.vd_args);
/* send buffer along! */
his_wallops = feature_bool(FEAT_HIS_WALLOPS);
for (i = 0; i <= HighestFd; i++)
{
if (!(cptr = LocalClientArray[i]) ||
(cli_fd(cli_from(cptr)) < 0) ||
(type == WALL_DESYNCH && !SendDebug(cptr)) ||
(type == WALL_WALLOPS &&
(!SendWallops(cptr) || (his_wallops && !IsAnOper(cptr)))) ||
(type == WALL_WALLUSERS && !SendWallops(cptr)))
continue; /* skip it */
send_buffer(cptr, mb, 1);
}
msgq_clean(mb);
/* Build buffer to send to servers */
va_start(vd.vd_args, pattern);
mb = msgq_make(&me, "%C %s :%v", from, tok, &vd);
va_end(vd.vd_args);
/* send buffer along! */
for (lp = cli_serv(&me)->down; lp; lp = lp->next) {
if (one && lp->value.cptr == cli_from(one))
continue;
send_buffer(lp->value.cptr, mb, 1);
}
msgq_clean(mb);
}
/** Send a (prefixed) command to all users matching \a to as \a who.
* @warning \a pattern must not contain %v.
* @param[in] from Source of the command.
* @param[in] cmd Long name of command.
* @param[in] tok Short name of command.
* @param[in] to Destination host/server mask.
* @param[in] one Client direction to skip (or NULL).
* @param[in] who Type of match for \a to (either MATCH_HOST or MATCH_SERVER).
* @param[in] pattern Format string for command arguments.
*/
void sendcmdto_match_butone(struct Client *from, const char *cmd,
const char *tok, const char *to,
struct Client *one, unsigned int who,
const char *pattern, ...)
{
struct VarData vd;
struct Client *cptr;
struct MsgBuf *user_mb;
struct MsgBuf *serv_mb;
vd.vd_format = pattern;
/* Build buffer to send to users */
va_start(vd.vd_args, pattern);
user_mb = msgq_make(0, "%:#C %s %v", from, cmd, &vd);
va_end(vd.vd_args);
/* Build buffer to send to servers */
va_start(vd.vd_args, pattern);
serv_mb = msgq_make(&me, "%C %s %v", from, tok, &vd);
va_end(vd.vd_args);
/* send buffer along */
bump_sentalong(one);
for (cptr = GlobalClientList; cptr; cptr = cli_next(cptr)) {
if (!IsRegistered(cptr) || IsServer(cptr) || cli_fd(cli_from(cptr)) < 0 ||
cli_sentalong(cptr) == sentalong_marker ||
!match_it(from, cptr, to, who))
continue; /* skip it */
cli_sentalong(cptr) = sentalong_marker;
if (MyConnect(cptr)) /* send right buffer */
send_buffer(cptr, user_mb, 0);
else
send_buffer(cptr, serv_mb, 0);
}
msgq_clean(user_mb);
msgq_clean(serv_mb);
}
/** Send a server notice out across the network before sending to all
* users subscribing to the indicated \a mask except for \a one.
* @param[in] from Client TOK_SNO is sent from.
* @param[in] mask One of the SNO_* constants.
* @param[in] pattern Format string for server notice.
*/
void sendto_opmask_butone_global(struct Client *one, unsigned int mask,
const char *pattern, ...)
{
va_list vl;
struct VarData vd;
struct MsgBuf *mb;
struct DLink *lp;
va_start(vl, pattern);
if (cli_serv(&me) && (lp = cli_serv(&me)->down)) {
vd.vd_format = pattern;
va_copy(vd.vd_args, vl);
mb = msgq_make(&me, "%C " TOK_SNO " %d :%v", &me, mask, &vd);
for (lp = cli_serv(&me)->down; lp; lp = lp->next) {
if (one && lp->value.cptr == cli_from(one))
continue;
send_buffer(lp->value.cptr, mb, 0);
}
msgq_clean(mb);
}
vsendto_opmask_butone(&me, one, mask, pattern, vl);
va_end(vl);
}
/** Send a server notice to all users subscribing to the indicated \a
* mask except for \a one.
* @param[in] one Client direction to skip (or NULL).
* @param[in] mask One of the SNO_* constants.
* @param[in] pattern Format string for server notice.
*/
void sendto_opmask_butone(struct Client *one, unsigned int mask,
const char *pattern, ...)
{
va_list vl;
va_start(vl, pattern);
vsendto_opmask_butone(&me, one, mask, pattern, vl);
va_end(vl);
}
/** Send a server notice to all users subscribing to the indicated \a
* mask except for \a one from \a from.
* @param[in] one Client direction to skip (or NULL).
* @param[in] mask One of the SNO_* constants.
* @param[in] pattern Format string for server notice.
*/
void sendto_opmask_butone_from(struct Client *from, struct Client *one,
unsigned int mask, const char *pattern, ...)
{
va_list vl;
va_start(vl, pattern);
vsendto_opmask_butone(from, one, mask, pattern, vl);
va_end(vl);
}
/** Send a server notice to all users subscribing to the indicated \a
* mask except for \a one, rate-limited to once per 30 seconds.
* @param[in] one Client direction to skip (or NULL).
* @param[in] mask One of the SNO_* constants.
* @param[in,out] rate Pointer to the last time the message was sent.
* @param[in] pattern Format string for server notice.
*/
void sendto_opmask_butone_ratelimited(struct Client *one, unsigned int mask,
time_t *rate, const char *pattern, ...)
{
va_list vl;
if ((CurrentTime - *rate) < 30)
return;
else
*rate = CurrentTime;
va_start(vl, pattern);
vsendto_opmask_butone(&me, one, mask, pattern, vl);
va_end(vl);
}
/** Send a server notice to all users subscribing to the indicated \a
* mask except for \a one.
* @param[in] one Client direction to skip (or NULL).
* @param[in] mask One of the SNO_* constants.
* @param[in] pattern Format string for server notice.
* @param[in] vl Argument list for format string.
*/
void vsendto_opmask_butone(struct Client *from, struct Client *one,
unsigned int mask, const char *pattern, va_list vl)
{
struct VarData vd;
struct MsgBuf *mb;
int i = 0; /* so that 1 points to opsarray[0] */
struct SLink *opslist;
while ((mask >>= 1))
i++;
if (!(opslist = opsarray[i]))
return;
/*
* build string; I don't want to bother with client nicknames, so I hope
* this is ok...
*/
vd.vd_format = pattern;
va_copy(vd.vd_args, vl);
mb = msgq_make(0, ":%s " MSG_NOTICE " * :*** Notice -- %v", cli_name(from),
&vd);
for (; opslist; opslist = opslist->next)
if (opslist->value.cptr != one)
send_buffer(opslist->value.cptr, mb, 0);
msgq_clean(mb);
}
/** Send a server notice to all users with the indicated \a mode except
* for \a one.
* @param[in] one Client direction to skip (or NULL).
* @param[in] mode One mode character.
* @param[in] pattern Format string for server notice.
*/
void sendto_mode_butone(struct Client *one, struct Client *from, const char *mode,
const char *pattern, ...)
{
va_list vl;
va_start(vl, pattern);
vsendto_mode_butone(one, from, mode, pattern, vl);
va_end(vl);
}
/** Send a server notice to all users with the indicated \a mode except
* for \a one.
* @param[in] one Client direction to skip (or NULL).
* @param[in] mode One mode character.
* @param[in] pattern Format string for server notice.
* @param[in] vl Argument list for format string.
*/
void vsendto_mode_butone(struct Client *one, struct Client *from, const char *mode,
const char *pattern, va_list vl)
{
struct VarData vd;
struct MsgBuf *mb;
struct Client* acptr = 0;
vd.vd_format = pattern;
va_copy(vd.vd_args, vl);
/* send to local users */
mb = msgq_make(0, ":%s " MSG_NOTICE " * :*** Notice -- %v", cli_name(from),
&vd);
for (acptr = &me; acptr; acptr = cli_prev(acptr)) {
if (IsUser(acptr)) {
switch (*mode) {
case 'O':
if (IsLocOp(acptr))
send_buffer(acptr, mb, 0);
break;
case 'o':
if (IsOper(acptr))
send_buffer(acptr, mb, 0);
break;
default:
break; /* ignore, should only happen if incorrectly injected via raw */
}
}
}
msgq_clean(mb);
}
Reference in New Issue View Git Blame Copy Permalink