X-Git-Url: http://git.pk910.de/?a=blobdiff_plain;f=ircd%2Fsend.c;h=b9309b85337fb67f7a5a41f3459c759721648ea3;hb=refs%2Fheads%2Fupstream;hp=cd4913271f3f0420a021c150698804434e7e6f45;hpb=5dd2f85ef757744d4586ac5bedf4a81fdebcc520;p=ircu2.10.12-pk.git diff --git a/ircd/send.c b/ircd/send.c index cd49132..b9309b8 100644 --- a/ircd/send.c +++ b/ircd/send.c @@ -17,72 +17,124 @@ * 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$ + */ +#include "config.h" -#include "sys.h" -#include -#include "h.h" -#include "struct.h" -#include "s_bsd.h" -#include "s_serv.h" #include "send.h" -#include "s_misc.h" -#include "common.h" -#include "match.h" -#include "s_bsd.h" -#include "list.h" -#include "ircd.h" #include "channel.h" -#include "bsd.h" #include "class.h" +#include "client.h" +#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 "sprintf_irc.h" +#include "struct.h" +#include "sys.h" -RCSTAG_CC("$Id$"); +/* #include -- Now using assert in ircd_log.h */ +#include +#include -char sendbuf[2048]; -static int sentalong[MAXCONNECTIONS]; +/** Last used marker value. */ static int sentalong_marker; -struct SLink *opsarray[32]; /* don't use highest bit unless you change +/** 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() */ -#ifdef GODMODE -char sendbuf2[2048]; -int sdbflag; -#endif /* GODMODE */ +/** Linked list of all connections with data queued to send. */ +static struct Connection *send_queues; /* * dead_link * * An error has been detected. The link *must* be closed, * but *cannot* call ExitClient (m_bye) from here. - * Instead, mark it with FLAGS_DEADSOCKET. This should + * 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. I can contain only one + * 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... */ - -static void dead_link(aClient *to, char *notice) +/** 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) { - to->flags |= FLAGS_DEADSOCKET; + SetFlag(to, FLAG_DEADSOCKET); /* * If because of BUFFERPOOL problem then clean dbuf's now so that * notices don't hurt operators below. */ - DBufClear(&to->recvQ); - DBufClear(&to->sendQ); + DBufClear(&(cli_recvQ(to))); + MsgQClear(&(cli_sendQ(to))); + client_drop_sendq(cli_connect(to)); - /* Keep a copy of the last comment, for later use... */ - strncpy(LastDeadComment(to), notice, sizeof(LastDeadComment(to))); - LastDeadComment(to)[sizeof(LastDeadComment(to)) - 1] = 0; + /* + * Keep a copy of the last comment, for later use... + */ + ircd_strncpy(cli_info(to), notice, REALLEN); + + 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 (!IsUser(to) && !IsUnknown(to) && !(to->flags & FLAGS_CLOSING)) - sendto_ops("%s for %s", LastDeadComment(to), to->name); - Debug((DEBUG_ERROR, LastDeadComment(to))); + if (highest_client) + dead_link(highest_client, "Buffer allocation error"); } /* @@ -95,19 +147,25 @@ static void dead_link(aClient *to, char *notice) * client and try to send it. if we cant send it, it goes into the sendQ * -avalon */ -void flush_connections(int fd) +/** Flush data queued for one or all connections. + * @param[in] cptr Client to flush (if NULL, do all). + */ +void flush_connections(struct Client* cptr) { - Reg1 int i; - Reg2 aClient *cptr; - - if (fd == me.fd) - { - for (i = highest_fd; i >= 0; i--) - if ((cptr = loc_clients[i]) && DBufLength(&cptr->sendQ) > 0) - send_queued(cptr); - } - else if (fd >= 0 && (cptr = loc_clients[fd]) && DBufLength(&cptr->sendQ) > 0) + struct SSLConnection *ssl = cli_connect(cptr)->con_ssl; + if (cptr) { + if(ssl) + ssl_connection_flush(ssl); 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)); + } + ssl_connection_flush(NULL); + } } /* @@ -117,165 +175,84 @@ void flush_connections(int fd) * when there is a chance that some output would be possible. This * attempts to empty the send queue as far as possible... */ -void send_queued(aClient *to) +/** Attempt to send data queued for a client. + * @param[in] to Client to send data to. + */ +void send_queued(struct Client *to) { -#ifndef pyr - if (to->flags & FLAGS_BLOCKED) - return; /* Don't bother */ -#endif - /* - * Once socket is marked dead, we cannot start writing to it, - * even if the error is removed... - */ - if (IsDead(to)) - { - /* - * Actually, we should *NEVER* get here--something is - * not working correct if send_queued is called for a - * dead socket... --msa - * - * But we DO get here since flush_connections() is called - * from the main loop when a server still had remaining data - * in its buffer (not ending on a new-line). - * I rather leave the test here then move it to the main loop - * though: It wouldn't save cpu and it might introduce a bug :/. - * --Run - */ - return; - } - while (DBufLength(&to->sendQ) > 0) - { - const char *msg; - size_t len, rlen; - int tmp; + assert(0 != to); + assert(0 != cli_local(to)); - msg = dbuf_map(&to->sendQ, &len); - /* Returns always len > 0 */ - if ((tmp = deliver_it(to, msg, len)) < 0) - { - dead_link(to, "Write error, closing link"); - return; + 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; + } } - rlen = tmp; - dbuf_delete(&to->sendQ, rlen); - to->lastsq = DBufLength(&to->sendQ) / 1024; - if (rlen < len) - { - to->flags |= FLAGS_BLOCKED; /* Wait till select() says - we can write again */ - break; + else { + if (IsDead(to)) { + char tmp[512]; + sprintf(tmp,"Write error: %s",(strerror(cli_error(to))) ? (strerror(cli_error(to))) : "Unknown error" ); + dead_link(to, tmp); + } + return; } } - return; + /* Ok, sendq is now empty... */ + client_drop_sendq(cli_connect(to)); + update_write(to); } -/* - * send message to single client +/** 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 sendto_one(aClient *to, char *pattern, ...) -{ - va_list vl; - va_start(vl, pattern); - vsendto_one(to, pattern, vl); - va_end(vl); -} - -void vsendto_one(aClient *to, char *pattern, va_list vl) +void send_buffer(struct Client* to, struct MsgBuf* buf, int prio) { - vsprintf_irc(sendbuf, pattern, vl); - sendbufto_one(to); -} + assert(0 != to); + assert(0 != buf); -void sendbufto_one(aClient *to) -{ - int len; + if (cli_from(to)) + to = cli_from(to); - Debug((DEBUG_SEND, "Sending [%s] to %s", sendbuf, to->name)); - - if (to->from) - to = to->from; - if (IsDead(to)) - return; /* This socket has already - been marked as dead */ - if (to->fd < 0) - { - /* This is normal when 'to' was being closed (via exit_client - * and close_connection) --Run - * Print the debug message anyway... + if (!can_send(to)) + /* + * This socket has already been marked as dead */ - Debug((DEBUG_ERROR, "Local socket %s with negative fd %d... AARGH!", - to->name, to->fd)); return; - } - - len = strlen(sendbuf); - if (sendbuf[len - 1] != '\n') - { - if (len > 510) - len = 510; - sendbuf[len++] = '\r'; - sendbuf[len++] = '\n'; - sendbuf[len] = '\0'; - } - - if (IsMe(to)) - { - char tmp_sendbuf[sizeof(sendbuf)]; - strcpy(tmp_sendbuf, sendbuf); - sendto_ops("Trying to send [%s] to myself!", tmp_sendbuf); - return; - } - - if (DBufLength(&to->sendQ) > get_sendq(to)) - { + if (MsgQLength(&(cli_sendQ(to))) > get_sendq(to)) { if (IsServer(to)) - sendto_ops("Max SendQ limit exceeded for %s: " - SIZE_T_FMT " > " SIZE_T_FMT, to->name, - DBufLength(&to->sendQ), get_sendq(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; } - else if (!dbuf_put(&to->sendQ, sendbuf, len)) - { - dead_link(to, "Buffer allocation error"); - return; - } -#ifdef GODMODE + Debug((DEBUG_SEND, "Sending [%p] to %s", buf, cli_name(to))); - if (!sdbflag && !IsUser(to)) - { - size_t len = strlen(sendbuf) - 2; /* Remove "\r\n" */ - sdbflag = 1; - strncpy(sendbuf2, sendbuf, len); - sendbuf2[len] = '\0'; - if (len > 402) - { - char c = sendbuf2[200]; - sendbuf2[200] = 0; - sendto_ops("SND:%-8.8s(%.4d): \"%s...%s\"", - to->name, len, sendbuf2, &sendbuf2[len - 200]); - sendbuf2[200] = c; - } - else - sendto_ops("SND:%-8.8s(%.4d): \"%s\"", to->name, len, sendbuf2); - strcpy(sendbuf, sendbuf2); - strcat(sendbuf, "\r\n"); - sdbflag = 0; - } + msgq_add(&(cli_sendQ(to)), buf, prio); + client_add_sendq(cli_connect(to), &send_queues); + update_write(to); -#endif /* GODMODE */ /* * 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. */ - to->sendM += 1; - me.sendM += 1; - if (to->acpt != &me) - to->acpt->sendM += 1; + ++(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 @@ -284,612 +261,598 @@ void sendbufto_one(aClient *to) * trying to flood that link with data (possible during the net * relinking done by servers with a large load). */ - if (DBufLength(&to->sendQ) / 1024 > to->lastsq) + if (MsgQLength(&(cli_sendQ(to))) / 1024 > cli_lastsq(to)) send_queued(to); } -static void vsendto_prefix_one(register aClient *to, register aClient *from, - char *pattern, va_list vl) +/* + * 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) { - if (to && from && MyUser(to) && IsUser(from)) + switch (what) { - static char sender[HOSTLEN + NICKLEN + USERLEN + 5]; - char *par; - int flag = 0; - Reg3 anUser *user = from->user; - - par = va_arg(vl, char *); - strcpy(sender, from->name); - if (user) - { - if (*user->username) - { - strcat(sender, "!"); - strcat(sender, user->username); - } - if (*user->host && !MyConnect(from)) - { - strcat(sender, "@"); - strcat(sender, user->host); - flag = 1; - } - } - /* - * Flag is used instead of strchr(sender, '@') for speed and - * also since username/nick may have had a '@' in them. -avalon - */ - if (!flag && MyConnect(from) && *user->host) - { - strcat(sender, "@"); - if (IsUnixSocket(from)) - strcat(sender, user->host); - else - strcat(sender, from->sockhost); - } - *sendbuf = ':'; - strcpy(&sendbuf[1], sender); - /* Assuming 'pattern' always starts with ":%s ..." */ - vsprintf_irc(sendbuf + strlen(sendbuf), &pattern[3], vl); + case MATCH_HOST: + return (match(mask, cli_user(one)->host) == 0 || + (HasHiddenHost(one) && match(mask, cli_user(one)->realhost) == 0)); + case MATCH_SERVER: + default: + return (match(mask, cli_name(cli_user(one)->server)) == 0); } - else - vsprintf_irc(sendbuf, pattern, vl); - sendbufto_one(to); } -void sendto_channel_butone(aClient *one, aClient *from, aChannel *chptr, - char *pattern, ...) +/** 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; - Reg1 Link *lp; - Reg2 aClient *acptr; - Reg3 int i; va_start(vl, pattern); - - ++sentalong_marker; - for (lp = chptr->members; lp; lp = lp->next) - { - acptr = lp->value.cptr; - if (acptr->from == one || /* ...was the one I should skip */ - (lp->flags & CHFL_ZOMBIE) || IsDeaf(acptr)) - continue; - if (MyConnect(acptr)) /* (It is always a client) */ - vsendto_prefix_one(acptr, from, pattern, vl); - else if (sentalong[(i = acptr->from->fd)] != sentalong_marker) - { - sentalong[i] = sentalong_marker; - /* Don't send channel messages to links that are still eating - the net.burst: -- Run 2/1/1997 */ - if (!IsBurstOrBurstAck(acptr->from)) - vsendto_prefix_one(acptr, from, pattern, vl); - } - } + mb = msgq_vmake(to, pattern, vl); va_end(vl); - return; -} - -void sendto_lchanops_butone(aClient *one, aClient *from, aChannel *chptr, - char *pattern, ...) -{ - va_list vl; - Reg1 Link *lp; - Reg2 aClient *acptr; - va_start(vl, pattern); + send_buffer(to, mb, 0); - for (lp = chptr->members; lp; lp = lp->next) - { - acptr = lp->value.cptr; - if (acptr == one || /* ...was the one I should skip */ - !(lp->flags & CHFL_CHANOP) || /* Skip non chanops */ - (lp->flags & CHFL_ZOMBIE) || IsDeaf(acptr)) - continue; - if (MyConnect(acptr)) /* (It is always a client) */ - vsendto_prefix_one(acptr, from, pattern, vl); - } - va_end(vl); - return; + msgq_clean(mb); } -void sendto_chanopsserv_butone(aClient *one, aClient *from, aChannel *chptr, - char *pattern, ...) +/** 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, ...) { - va_list vl; - Reg1 Link *lp; - Reg2 aClient *acptr; - Reg3 int i; -#ifndef NO_PROTOCOL9 - char target[128]; - char *source, *tp, *msg; -#endif + struct VarData vd; + struct MsgBuf *mb; - va_start(vl, pattern); + to = cli_from(to); - ++sentalong_marker; - for (lp = chptr->members; lp; lp = lp->next) - { - acptr = lp->value.cptr; - if (acptr->from == acptr || /* Skip local clients */ -#ifndef NO_PROTOCOL9 - Protocol(acptr->from) < 10 || /* Skip P09 links */ -#endif - acptr->from == one || /* ...was the one I should skip */ - !(lp->flags & CHFL_CHANOP) || /* Skip non chanops */ - (lp->flags & CHFL_ZOMBIE) || IsDeaf(acptr)) - continue; - if (sentalong[(i = acptr->from->fd)] != sentalong_marker) - { - sentalong[i] = sentalong_marker; - /* Don't send channel messages to links that are - still eating the net.burst: -- Run 2/1/1997 */ - if (!IsBurstOrBurstAck(acptr->from)) - vsendto_prefix_one(acptr, from, pattern, vl); - } - } + vd.vd_format = pattern; /* set up the struct VarData for %v */ + va_start(vd.vd_args, pattern); -#ifndef NO_PROTOCOL9 - /* Send message to all 2.9 servers */ - /* This is a hack, because it assumes that we know how `vl' is build up */ - source = va_arg(vl, char *); - tp = va_arg(vl, char *); /* Channel */ - msg = va_arg(vl, char *); - for (lp = chptr->members; lp; lp = lp->next) - { - acptr = lp->value.cptr; - if (acptr->from == acptr || /* Skip local clients */ - Protocol(acptr->from) > 9 || /* Skip P10 servers */ - acptr->from == one || /* ...was the one I should skip */ - !(lp->flags & CHFL_CHANOP) || /* Skip non chanops */ - (lp->flags & CHFL_ZOMBIE) || IsDeaf(acptr)) - continue; - if (sentalong[(i = acptr->from->fd)] != sentalong_marker) - { - sentalong[i] = sentalong_marker; - /* Don't send channel messages to links that are - still eating the net.burst: -- Run 2/1/1997 */ - if (!IsBurstOrBurstAck(acptr->from)) - { - Link *lp2; - aClient *acptr2; - tp = target; - *tp = 0; - /* Find all chanops in this direction: */ - for (lp2 = chptr->members; lp2; lp2 = lp2->next) - { - acptr2 = lp2->value.cptr; - if (acptr2->from == acptr->from && acptr2->from != one && - (lp2->flags & CHFL_CHANOP) && !(lp2->flags & CHFL_ZOMBIE) && - !IsDeaf(acptr2)) - { - int len = strlen(acptr2->name); - if (tp + len + 2 > target + sizeof(target)) - { - sendto_prefix_one(acptr, from, - ":%s NOTICE %s :%s", source, target, msg); - tp = target; - *tp = 0; - } - if (*target) - strcpy(tp++, ","); - strcpy(tp, acptr2->name); - tp += len; - } - } - sendto_prefix_one(acptr, from, - ":%s NOTICE %s :%s", source, target, msg); - } - } - } -#endif + mb = msgq_make(to, "%:#C %s %v", from, IsServer(to) || IsMe(to) ? tok : cmd, + &vd); - va_end(vl); - return; + va_end(vd.vd_args); + + send_buffer(to, mb, 0); + + msgq_clean(mb); } -/* - * sendto_server_butone - * - * Send a message to all connected servers except the client 'one'. +/** + * 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 sendto_serv_butone(aClient *one, char *pattern, ...) +void sendcmdto_prio_one(struct Client *from, const char *cmd, const char *tok, + struct Client *to, const char *pattern, ...) { - va_list vl; - Reg1 Dlink *lp; + struct VarData vd; + struct MsgBuf *mb; - va_start(vl, pattern); - vsprintf_irc(sendbuf, pattern, vl); - va_end(vl); + to = cli_from(to); - for (lp = me.serv->down; lp; lp = lp->next) - { - if (one && lp->value.cptr == one->from) - continue; - sendbufto_one(lp->value.cptr); - } + 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); } -/* - * sendbufto_serv_butone() - * - * Send prepared sendbuf to all connected servers except the client 'one' - * -Ghostwolf 18-May-97 +/** + * 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 sendbufto_serv_butone(aClient *one) +void sendcmdto_flag_serv_butone(struct Client *from, const char *cmd, + const char *tok, struct Client *one, + int require, int forbid, + const char *pattern, ...) { - Reg1 Dlink *lp; + struct VarData vd; + struct MsgBuf *mb; + struct DLink *lp; - for (lp = me.serv->down; lp; lp = lp->next) - { - if (one && lp->value.cptr == one->from) + 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; - sendbufto_one(lp->value.cptr); + if ((forbid < FLAG_LAST_FLAG) && HasFlag(lp->value.cptr, forbid)) + continue; + send_buffer(lp->value.cptr, mb, 0); } + + msgq_clean(mb); } -/* - * sendto_common_channels() - * - * Sends a message to all people (inclusing `acptr') on local server - * who are in same channel with client `acptr'. +/** + * 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 sendto_common_channels(aClient *acptr, char *pattern, ...) +void sendcmdto_serv_butone(struct Client *from, const char *cmd, + const char *tok, struct Client *one, + const char *pattern, ...) { - va_list vl; - Reg1 Link *chan; - Reg2 Link *member; + struct VarData vd; + struct MsgBuf *mb; + struct DLink *lp; - va_start(vl, pattern); + vd.vd_format = pattern; /* set up the struct VarData for %v */ + va_start(vd.vd_args, pattern); - ++sentalong_marker; - if (acptr->fd >= 0) - sentalong[acptr->fd] = sentalong_marker; - /* loop through acptr's channels, and the members on their channels */ - if (acptr->user) - for (chan = acptr->user->channel; chan; chan = chan->next) - for (member = chan->value.chptr->members; member; member = member->next) - { - Reg3 aClient *cptr = member->value.cptr; - if (MyConnect(cptr) && sentalong[cptr->fd] != sentalong_marker) - { - sentalong[cptr->fd] = sentalong_marker; - vsendto_prefix_one(cptr, acptr, pattern, vl); - } - } - if (MyConnect(acptr)) - vsendto_prefix_one(acptr, acptr, pattern, vl); - va_end(vl); - return; -} + /* use token */ + mb = msgq_make(&me, "%C %s %v", from, tok, &vd); + va_end(vd.vd_args); -/* - * sendto_channel_butserv - * - * Send a message to all members of a channel that - * are connected to this server. - */ -void sendto_channel_butserv(aChannel *chptr, aClient *from, char *pattern, ...) -{ - va_list vl; - Reg1 Link *lp; - Reg2 aClient *acptr; + /* 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); + } - for (va_start(vl, pattern), lp = chptr->members; lp; lp = lp->next) - if (MyConnect(acptr = lp->value.cptr) && !(lp->flags & CHFL_ZOMBIE)) - vsendto_prefix_one(acptr, from, pattern, vl); - va_end(vl); - return; + msgq_clean(mb); } -/* - * 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) +/** 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 int match_it(aClient *one, char *mask, int what) +static void +bump_sentalong(struct Client *one) { - switch (what) + if (!++sentalong_marker) { - case MATCH_HOST: - return (match(mask, one->user->host) == 0); - case MATCH_SERVER: - default: - return (match(mask, one->user->server->name) == 0); + 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; } -/* - * sendto_match_butone - * - * Send to all clients which match the mask in a way defined on 'what'; - * either by user hostname or user servername. +/** 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 sendto_match_butone(aClient *one, aClient *from, - char *mask, int what, char *pattern, ...) +void sendcmdto_common_channels_butone(struct Client *from, const char *cmd, + const char *tok, struct Client *one, + const char *pattern, ...) { - va_list vl; - Reg1 int i; - Reg2 aClient *cptr, *acptr; + struct VarData vd; + struct MsgBuf *mb; + struct Membership *chan; + struct Membership *member; - va_start(vl, pattern); - for (i = 0; i <= highest_fd; i++) - { - if (!(cptr = loc_clients[i])) - continue; /* that clients are not mine */ - if (cptr == one) /* must skip the origin !! */ - continue; - if (IsServer(cptr)) - { - for (acptr = client; acptr; acptr = acptr->next) - if (IsUser(acptr) && match_it(acptr, mask, what) && acptr->from == cptr) - break; - /* a person on that server matches the mask, so we - * send *one* msg to that server ... - */ - if (acptr == NULL) - continue; - /* ... but only if there *IS* a matching person */ - } - /* my client, does he match ? */ - else if (!(IsUser(cptr) && match_it(cptr, mask, what))) + 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; - vsendto_prefix_one(cptr, from, pattern, vl); + 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); + } } - va_end(vl); - - return; -} -/* - * sendto_lops_butone - * - * Send to *local* ops but one. - */ -void sendto_lops_butone(aClient *one, char *pattern, ...) -{ - va_list vl; - Reg1 aClient *cptr; - aClient **cptrp; - int i; - char nbuf[1024]; + if (MyConnect(from) && from != one) + send_buffer(from, mb, 0); - sprintf_irc(nbuf, ":%s NOTICE %%s :*** Notice -- ", me.name); - va_start(vl, pattern); - vsprintf_irc(nbuf + strlen(nbuf), pattern, vl); - va_end(vl); - for (cptrp = me.serv->client_list, i = 0; i <= me.serv->nn_mask; ++cptrp, ++i) - if ((cptr = *cptrp) && cptr != one && SendServNotice(cptr)) - { - sprintf_irc(sendbuf, nbuf, cptr->name); - sendbufto_one(cptr); - } - return; + msgq_clean(mb); } -/* - * sendto_op_mask - * - * Sends message to the list indicated by the bitmask field. - * Don't try to send to more than one list! That is not supported. - * Xorath 5/1/97 +/** 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 vsendto_op_mask(register snomask_t mask, const char *pattern, va_list vl) +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, ...) { - static char fmt[1024]; - char *fmt_target; - register int i = 0; /* so that 1 points to opsarray[0] */ - Link *opslist; - - while ((mask >>= 1)) - i++; - if (!(opslist = opsarray[i])) - return; - - fmt_target = sprintf_irc(fmt, ":%s NOTICE ", me.name); - do - { - strcpy(fmt_target, opslist->value.cptr->name); - strcat(fmt_target, " :*** Notice -- "); - strcat(fmt_target, pattern); - vsendto_one(opslist->value.cptr, fmt, vl); - opslist = opslist->next; + 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_NONVOICES && !IsChanOp(member) && !HasVoice(member))) + continue; + send_buffer(member->user, mb, 0); } - while (opslist); + + msgq_clean(mb); } -/* - * sendbufto_op_mask - * - * Send a prepared sendbuf to the list indicated by the bitmask field. - * Ghostwolf 16-May-97 +/** 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 sendbufto_op_mask(snomask_t mask) +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, ...) { - register int i = 0; /* so that 1 points to opsarray[0] */ - Link *opslist; - while ((mask >>= 1)) - i++; - if (!(opslist = opsarray[i])) - return; - do - { - sendbufto_one(opslist->value.cptr); - opslist = opslist->next; + 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_NONVOICES && !IsChanOp(member) && !HasVoice(member))) + continue; + cli_sentalong(member->user) = sentalong_marker; + send_buffer(member->user, serv_mb, 0); } - while (opslist); + msgq_clean(serv_mb); } -/* - * sendto_ops - * - * Send to *local* ops only. +/** 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 vsendto_ops(const char *pattern, va_list vl) +void sendcmdto_channel_butone(struct Client *from, const char *cmd, + const char *tok, struct Channel *to, + struct Client *one, unsigned int skip, + const char *pattern, ...) { - Reg1 aClient *cptr; - Reg2 int i; - char fmt[1024]; - char *fmt_target; - - fmt_target = sprintf_irc(fmt, ":%s NOTICE ", me.name); - - for (i = 0; i <= highest_fd; i++) - if ((cptr = loc_clients[i]) && !IsServer(cptr) && !IsMe(cptr) && - SendServNotice(cptr)) - { - strcpy(fmt_target, cptr->name); - strcat(fmt_target, " :*** Notice -- "); - strcat(fmt_target, pattern); - vsendto_one(cptr, fmt, vl); - } - - return; -} + struct Membership *member; + struct VarData vd; + 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, skip & (SKIP_NONOPS | SKIP_NONVOICES) ? "%:#C %s @%v" : "%:#C %s %v", + from, skip & (SKIP_NONOPS | SKIP_NONVOICES) ? MSG_NOTICE : 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 (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_NONVOICES && !IsChanOp(member) && !HasVoice(member)) || + (skip & SKIP_BURST && IsBurstOrBurstAck(cli_from(member->user))) || + cli_fd(cli_from(member->user)) < 0 || + cli_sentalong(member->user) == sentalong_marker) + continue; + cli_sentalong(member->user) = sentalong_marker; -void sendto_op_mask(snomask_t mask, const char *pattern, ...) -{ - va_list vl; - va_start(vl, pattern); - vsendto_op_mask(mask, pattern, vl); - va_end(vl); -} + if (MyConnect(member->user)) /* pick right buffer to send */ + send_buffer(member->user, user_mb, 0); + else + send_buffer(member->user, serv_mb, 0); + } -void sendto_ops(const char *pattern, ...) -{ - va_list vl; - va_start(vl, pattern); - vsendto_op_mask(SNO_OLDSNO, pattern, vl); - va_end(vl); + msgq_clean(user_mb); + msgq_clean(serv_mb); } -/* - * sendto_ops_butone - * - * Send message to all operators. - * one - client not to send message to - * from- client which message is from *NEVER* NULL!! +/** 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 sendto_ops_butone(aClient *one, aClient *from, char *pattern, ...) +void sendwallto_group_butone(struct Client *from, int type, struct Client *one, + const char *pattern, ...) { - va_list vl; - Reg1 int i; - Reg2 aClient *cptr; + struct VarData vd; + struct Client *cptr; + struct MsgBuf *mb; + struct DLink *lp; + char *prefix=NULL; + char *tok=NULL; + int his_wallops; + int i; - va_start(vl, pattern); - ++sentalong_marker; - for (cptr = client; cptr; cptr = cptr->next) + 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 (!IsAnOper(cptr)) */ - if (!SendWallops(cptr)) - continue; - i = cptr->from->fd; /* find connection oper is on */ - if (sentalong[i] == sentalong_marker) /* sent message along it already ? */ - continue; - if (cptr->from == one) - continue; /* ...was the one I should skip */ - sentalong[i] = sentalong_marker; - vsendto_prefix_one(cptr->from, from, pattern, vl); + 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); } - va_end(vl); - return; -} + msgq_clean(mb); -/* - * sendto_g_serv_butone - * - * Send message to all remote +g users (server links). - * - * one - server not to send message to. - */ -void sendto_g_serv_butone(aClient *one, char *pattern, ...) -{ - va_list vl; - aClient *cptr; - int i; + /* 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); - va_start(vl, pattern); - ++sentalong_marker; - vsprintf_irc(sendbuf, pattern, vl); - for (cptr = client; cptr; cptr = cptr->next) - { - if (!SendDebug(cptr)) - continue; - i = cptr->from->fd; /* find connection user is on */ - if (sentalong[i] == sentalong_marker) /* sent message along it already ? */ - continue; - if (MyConnect(cptr)) + /* send buffer along! */ + for (lp = cli_serv(&me)->down; lp; lp = lp->next) { + if (one && lp->value.cptr == cli_from(one)) continue; - sentalong[i] = sentalong_marker; - if (cptr->from == one) - continue; - sendbufto_one(cptr); + send_buffer(lp->value.cptr, mb, 1); } - va_end(vl); - return; + msgq_clean(mb); } -/* - * sendto_prefix_one - * - * to - destination client - * from - client which message is from - * - * NOTE: NEITHER OF THESE SHOULD *EVER* BE NULL!! - * -avalon +/** 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 sendto_prefix_one(Reg1 aClient *to, Reg2 aClient *from, char *pattern, ...) +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, ...) { - va_list vl; - va_start(vl, pattern); - vsendto_prefix_one(to, from, pattern, vl); - va_end(vl); + 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); } -/* - * sendto_realops - * - * Send to *local* ops only but NOT +s nonopers. +/** 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_realops(const char *pattern, ...) +void sendto_opmask_butone(struct Client *one, unsigned int mask, + const char *pattern, ...) { va_list vl; va_start(vl, pattern); - vsendto_op_mask(SNO_OLDREALOP, pattern, vl); - + vsendto_opmask_butone(one, mask, pattern, vl); va_end(vl); - return; } -/* - * Send message to all servers of protocol 'p' and lower. +/** 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_lowprot_butone(aClient *cptr, int p, char *pattern, ...) +void sendto_opmask_butone_ratelimited(struct Client *one, unsigned int mask, + time_t *rate, const char *pattern, ...) { va_list vl; - Dlink *lp; + + if ((CurrentTime - *rate) < 30) + return; + else + *rate = CurrentTime; + va_start(vl, pattern); - for (lp = me.serv->down; lp; lp = lp->next) - if (lp->value.cptr != cptr && Protocol(lp->value.cptr) <= p) - vsendto_one(lp->value.cptr, pattern, vl); + vsendto_opmask_butone(one, mask, pattern, vl); va_end(vl); } -/* - * Send message to all servers of protocol 'p' and higher. + +/** 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 sendto_highprot_butone(aClient *cptr, int p, char *pattern, ...) +void vsendto_opmask_butone(struct Client *one, unsigned int mask, + const char *pattern, va_list vl) { - va_list vl; - Dlink *lp; - va_start(vl, pattern); - for (lp = me.serv->down; lp; lp = lp->next) - if (lp->value.cptr != cptr && Protocol(lp->value.cptr) >= p) - vsendto_one(lp->value.cptr, pattern, vl); - va_end(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(&me), + &vd); + + for (; opslist; opslist = opslist->next) + if (opslist->value.cptr != one) + send_buffer(opslist->value.cptr, mb, 0); + + msgq_clean(mb); }