2 * IRC - Internet Relay Chat, ircd/m_map.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 #include "ircd_policy.h"
87 #include "ircd_reply.h"
88 #include "ircd_snprintf.h"
89 #include "ircd_string.h"
97 #include "querycmds.h"
103 static void dump_map(struct Client *cptr, struct Client *server, char *mask, int prompt_length)
105 static char prompt[64];
107 char *p = &prompt[prompt_length];
111 if (prompt_length > 60)
112 send_reply(cptr, RPL_MAPMORE, prompt, cli_name(server));
115 if (cli_serv(server)->lag>10000)
117 else if (cli_serv(server)->lag<0)
120 sprintf(lag,"(%is)",cli_serv(server)->lag);
121 send_reply(cptr, RPL_MAP, prompt, (
122 (IsBurst(server)) ? "*" : (IsBurstAck(server) ? "!" : "")),
123 cli_name(server), lag, (server == &me) ? UserStats.local_clients :
124 cli_serv(server)->clients);
126 if (prompt_length > 0)
132 if (prompt_length > 60)
135 for (lp = cli_serv(server)->down; lp; lp = lp->next)
136 if (match(mask, cli_name(lp->value.cptr)))
137 cli_flags(lp->value.cptr) &= ~FLAGS_MAP;
140 cli_flags(lp->value.cptr) |= FLAGS_MAP;
143 for (lp = cli_serv(server)->down; lp; lp = lp->next)
145 if ((cli_flags(lp->value.cptr) & FLAGS_MAP) == 0)
149 dump_map(cptr, lp->value.cptr, mask, prompt_length + 2);
151 if (prompt_length > 0)
157 * m_map - generic message handler
160 * parv[0] = sender prefix
161 * parv[1] = server mask
163 int m_map(struct Client* cptr, struct Client* sptr, int parc, char* parv[])
168 dump_map(sptr, &me, parv[1], 0);
169 send_reply(sptr, RPL_MAPEND);
174 #ifdef HEAD_IN_SAND_MAP
175 int m_map_redirect(struct Client* cptr, struct Client* sptr, int parc,
178 sendcmdto_one(&me, CMD_NOTICE, sptr, "%C :%s", sptr,
179 "/MAP has been disabled, from CFV-165. "
180 "Visit http://www.undernet.org/servers.php");