]> jfr.im git - irc/evilnet/x3.git/blob - src/opserv.c
projects / irc / evilnet / x3.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Fixed header comments
[irc/evilnet/x3.git] / src / opserv.c
1 /* opserv.c - IRC Operator assistance service
2 * Copyright 2000-2004 srvx Development Team
3 *
4 * This file is part of x3.
5 *
6 * x3 is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
10 *
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with srvx; if not, write to the Free Software Foundation,
18 * Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
19 */
20
21 #include "conf.h"
22 #include "gline.h"
23 #include "global.h"
24 #include "nickserv.h"
25 #include "modcmd.h"
26 #include "modules.h"
27 #include "opserv.h"
28 #include "timeq.h"
29 #include "saxdb.h"
30 #include "shun.h"
31
32 #ifdef HAVE_SYS_TIMES_H
33 #include <sys/times.h>
34 #endif
35 #ifdef HAVE_NETINET_IN_H
36 #include <netinet/in.h>
37 #endif
38 #ifdef HAVE_ARPA_INET_H
39 #include <arpa/inet.h>
40 #endif
41 #ifdef HAVE_REGEX_H
42 #include <regex.h>
43 #endif
44
45 #define OPSERV_CONF_NAME "services/opserv"
46
47 #define KEY_ALERT_CHANNEL "alert_channel"
48 #define KEY_ALERT_CHANNEL_MODES "alert_channel_modes"
49 #define KEY_DEBUG_CHANNEL "debug_channel"
50 #define KEY_DEBUG_CHANNEL_MODES "debug_channel_modes"
51 #define KEY_UNTRUSTED_MAX "untrusted_max"
52 #define KEY_PURGE_LOCK_DELAY "purge_lock_delay"
53 #define KEY_JOIN_FLOOD_MODERATE "join_flood_moderate"
54 #define KEY_JOIN_FLOOD_MODERATE_THRESH "join_flood_moderate_threshold"
55 #define KEY_NICK "nick"
56 #define KEY_JOIN_POLICER "join_policer"
57 #define KEY_NEW_USER_POLICER "new_user_policer"
58 #define KEY_REASON "reason"
59 #define KEY_RESERVES "reserves"
60 #define KEY_IDENT "username" /* for compatibility with 1.0 DBs */
61 #define KEY_HOSTNAME "hostname"
62 #define KEY_DESC "description"
63 #define KEY_BAD_WORDS "bad"
64 #define KEY_EXEMPT_CHANNELS "exempt"
65 #define KEY_SECRET_WORDS "secret"
66 #define KEY_TRUSTED_HOSTS "trusted"
67 #define KEY_OWNER "owner"
68 #define KEY_GAGS "gags"
69 #define KEY_ALERTS "alerts"
70 #define KEY_REACTION "reaction"
71 #define KEY_DISCRIM "discrim"
72 #define KEY_WARN "chanwarn"
73 #define KEY_MAX "max"
74 #define KEY_TIME "time"
75 #define KEY_MAX_CLIENTS "max_clients"
76 #define KEY_LIMIT "limit"
77 #define KEY_EXPIRES "expires"
78 #define KEY_STAFF_AUTH_CHANNEL "staff_auth_channel"
79 #define KEY_STAFF_AUTH_CHANNEL_MODES "staff_auth_channel_modes"
80 #define KEY_CLONE_GLINE_DURATION "clone_gline_duration"
81 #define KEY_BLOCK_GLINE_DURATION "block_gline_duration"
82 #define KEY_BLOCK_SHUN_DURATION "block_shun_duration"
83 #define KEY_ISSUER "issuer"
84 #define KEY_ISSUED "issued"
85 #define KEY_ADMIN_LEVEL "admin_level"
86
87 #define IDENT_FORMAT "%s [%s@%s/%s]"
88 #define IDENT_DATA(user) user->nick, user->ident, user->hostname, irc_ntoa(&user->ip)
89 #define MAX_CHANNELS_WHOIS 50
90 #define OSMSG_PART_REASON "%s has no reason."
91 #define OSMSG_KICK_REQUESTED "Kick requested by %s."
92 #define OSMSG_KILL_REQUESTED "Kill requested by %s."
93 #define OSMSG_GAG_REQUESTED "Gag requested by %s."
94
95 static const struct message_entry msgtab[] = {
96 { "OSMSG_BAR", "----------------------------------------" },
97 { "OSMSG_USER_ACCESS_IS", "$b%s$b (account $b%s$b) has %d access." },
98 { "OSMSG_LEVEL_TOO_LOW", "You lack sufficient access to use this command." },
99 { "OSMSG_NEED_CHANNEL", "You must specify a channel for $b%s$b." },
100 { "OSMSG_INVALID_IRCMASK", "$b%s$b is an invalid IRC hostmask." },
101 { "OSMSG_ADDED_BAN", "I have banned $b%s$b from $b%s$b." },
102 { "OSMSG_SHUN_ISSUED", "Shun issued for $b%s$b." },
103 { "OSMSG_SHUN_REMOVED", "Shun removed for $b%s$b." },
104 { "OSMSG_SHUN_FORCE_REMOVED", "Unknown/expired Shun removed for $b%s$b." },
105 { "OSMSG_SHUN_ONE_REFRESHED", "All Shuns resent to $b%s$b." },
106 { "OSMSG_SHUN_REFRESHED", "All Shuns refreshed." },
107 { "OSMSG_GLINE_ISSUED", "G-line issued for $b%s$b." },
108 { "OSMSG_GLINE_REMOVED", "G-line removed for $b%s$b." },
109 { "OSMSG_GLINE_FORCE_REMOVED", "Unknown/expired G-line removed for $b%s$b." },
110 { "OSMSG_GLINES_ONE_REFRESHED", "All G-lines resent to $b%s$b." },
111 { "OSMSG_GLINES_REFRESHED", "All G-lines refreshed." },
112 { "OSMSG_CLEARBANS_DONE", "Cleared all bans from channel $b%s$b." },
113 { "OSMSG_CLEARMODES_DONE", "Cleared all modes from channel $b%s$b." },
114 { "OSMSG_NO_CHANNEL_MODES", "Channel $b%s$b had no modes to clear." },
115 { "OSMSG_DEOP_DONE", "Deopped the requested lusers." },
116 { "OSMSG_DEOPALL_DONE", "Deopped everyone on $b%s$b." },
117 { "OSMSG_DEHOP_DONE", "Dehalfopped the requested lusers." },
118 { "OSMSG_DEHOPALL_DONE", "Dehalfopped everyone on $b%s$b." },
119 { "OSMSG_NO_DEBUG_CHANNEL", "No debug channel has been configured." },
120 { "OSMSG_INVITE_DONE", "Invited $b%s$b to $b%s$b." },
121 { "OSMSG_ALREADY_THERE", "You are already in $b%s$b." },
122 { "OSMSG_JOIN_DONE", "I have joined $b%s$b." },
123 { "OSMSG_ALREADY_JOINED", "I am already in $b%s$b." },
124 { "OSMSG_NOT_ON_CHANNEL", "$b%s$b does not seem to be on $b%s$b." },
125 { "OSMSG_KICKALL_DONE", "I have cleared out %s." },
126 { "OSMSG_LEAVING", "Leaving $b%s$b." },
127 { "OSMSG_MODE_SET", "I have set the modes for $b%s$b." },
128 { "OSMSG_OP_DONE", "Opped the requested lusers." },
129 { "OSMSG_OPALL_DONE", "Opped everyone on $b%s$b." },
130 { "OSMSG_HOP_DONE", "Halfopped the requested lusers." },
131 { "OSMSG_HOPALL_DONE", "Halfopped everyone on $b%s$b." },
132 { "OSMSG_WHOIS_IDENT", "%s (%s@%s) from %d.%d.%d.%d" },
133 { "OSMSG_WHOIS_NICK", "Nick : %s" },
134 { "OSMSG_WHOIS_HOST", "Host : %s@%s" },
135 { "OSMSG_WHOIS_FAKEHOST", "Fakehost: %s" },
136 { "OSMSG_WHOIS_IP", "Real IP : %s" },
137 { "OSMSG_WHOIS_MODES", "Modes : +%s " },
138 { "OSMSG_WHOIS_INFO", "Info : %s" },
139 { "OSMSG_WHOIS_NUMERIC", "Numnick : %s" },
140 { "OSMSG_WHOIS_SERVER", "Server : %s" },
141 { "OSMSG_WHOIS_NICK_AGE", "Nick Age: %s" },
142 { "OSMSG_WHOIS_ACCOUNT", "Account : %s" },
143 { "OSMSG_WHOIS_CHANNELS", "Channels: %s" },
144 { "OSMSG_WHOIS_HIDECHANS", "Channel list omitted for your sanity." },
145 { "OSMSG_UNBAN_DONE", "Ban(s) removed from channel %s." },
146 { "OSMSG_CHANNEL_VOICED", "All users on %s voiced." },
147 { "OSMSG_CHANNEL_DEVOICED", "All voiced users on %s de-voiced." },
148 { "OSMSG_BAD_MODIFIER", "Unknown bad-word modifier $b%s$b." },
149 { "OSMSG_BAD_REDUNDANT", "$b%s$b is already covered by a bad word ($b%s$b)." },
150 { "OSMSG_BAD_GROWING", "Replacing bad word $b%s$b with shorter bad word $b%s$b." },
151 { "OSMSG_BAD_NUKING", " .. and removing redundant bad word $b%s$b." },
152 { "OSMSG_ADDED_BAD", "Added $b%s$b to the bad-word list." },
153 { "OSMSG_REMOVED_BAD", "Removed $b%s$b from the bad-word list." },
154 { "OSMSG_NOT_BAD_WORD", "$b%s$b is not a bad word." },
155 { "OSMSG_ADDED_EXEMPTION", "Added $b%s$b to the bad-word exemption list." },
156 { "OSMSG_ADDED_EXEMPTIONS", "Added %d exception(s) to the bad word list." },
157 { "OSMSG_REMOVED_EXEMPTION", "Removed $b%s$b from the exemption list." },
158 { "OSMSG_NOT_EXEMPT", "$b%s$b is not on the exempt list." },
159 { "OSMSG_ALREADY_TRUSTED", "Host $b%s$b is already trusted (use $bdeltrust$b and then $baddtrust$b to adjust)." },
160 { "OSMSG_NOT_TRUSTED", "Host $b%s$b is not trusted." },
161 { "OSMSG_BAD_IP", "$b%s$b is not a valid IP address" },
162 { "OSMSG_BAD_NUMBER", "$b%s$b is not a number" },
163 { "OSMSG_ADDED_TRUSTED", "Added trusted hosts to the trusted-hosts list." },
164 { "OSMSG_UPDATED_TRUSTED", "Updated trusted host $b%s$b." },
165 { "OSMSG_REMOVED_TRUSTED", "Removed trusted hosts from the trusted-hosts list." },
166 { "OSMSG_CLONE_EXISTS", "Nick $b%s$b is already in use." },
167 { "OSMSG_NOT_A_HOSTMASK", "The hostmask must be in user@host form." },
168 { "OSMSG_BADWORD_LIST", "Bad words: %s" },
169 { "OSMSG_EXEMPTED_LIST", "Exempted channels: %s" },
170 { "OSMSG_GLINE_COUNT", "There are %d glines active on the network." },
171 { "OSMSG_SHUN_COUNT", "There are %d shuns active on the network." },
172 { "OSMSG_LINKS_SERVER", "%s%s (%u clients; %s)" },
173 { "OSMSG_MAX_CLIENTS", "Max clients: %d at %s" },
174 { "OSMSG_NETWORK_INFO", "Total users: %d (%d invisible, %d opers)" },
175 { "OSMSG_RESERVED_LIST", "List of reserved nicks:" },
176 { "OSMSG_TRUSTED_LIST", "$bTrusted Hosts$b" },
177 { "OSMSG_TRUSTED_LIST_HEADER", "IP Address Limit By Time" },
178 { "OSMSG_HOST_IS_TRUSTED", "%-15s %-5s %-10s set %s ago, expires %s" },
179 { "OSMSG_HOST_IS_TRUSTED_DESC", " Reason: %s" },
180 { "OSMSG_TRUSTED_LIST_BAR", "----------------------------------------" },
181 { "OSMSG_TRUSTED_LIST_END", "----------End of Trusted Hosts----------" },
182 { "OSMSG_HOST_NOT_TRUSTED", "%s does not have a special trust." },
183 { "OSMSG_UPTIME_STATS", "Uptime: %s (%u lines processed, CPU time %.2fu/%.2fs)" },
184 { "OSMSG_LINE_DUMPED", "Raw line sent." },
185 { "OSMSG_RAW_PARSE_ERROR", "Error parsing raw line (not dumping to uplink)." },
186 { "OSMSG_COLLIDED_NICK", "Now temporarily holding nick $b%s$b." },
187 { "OSMSG_RESERVED_NICK", "Now reserving nick $b%s$b." },
188 { "OSMSG_NICK_UNRESERVED", "Nick $b%s$b is no longer reserved." },
189 { "OSMSG_NOT_RESERVED", "Nick $b%s$b is not reserved." },
190 { "OSMSG_ILLEGAL_REASON", "This channel is illegal." },
191 { "OSMSG_ILLEGAL_KILL_REASON", "Joined an illegal modeless channel - do not repeat." },
192 { "OSMSG_ILLEGAL_CHANNEL", "$b%s$b is an ILLEGAL channel. Do not re-join it." },
193 { "OSMSG_FLOOD_MODERATE", "This channel has been temporarily moderated due to a possible join flood attack detected in this channel; network staff have been notified and will investigate." },
194 { "OSMSG_CLONE_WARNING", "WARNING: You have connected the maximum permitted number of clients from one IP address (clones). If you connect any more, your host will be temporarily banned from the network." },
195 { "OSMSG_CLONE_ADDED", "Added clone $b%s$b." },
196 { "OSMSG_CLONE_FAILED", "Unable to add user $b%s$b." },
197 { "OSMSG_NOT_A_CLONE", "Har har. $b%s$b isn't a clone." },
198 { "OSMSG_CLONE_REMOVED", "Removed clone $b%s$b." },
199 { "OSMSG_CLONE_JOINED", "$b%s$b has joined $b%s$b." },
200 { "OSMSG_CLONE_PARTED", "$b%s$b has left $b%s$b." },
201 { "OSMSG_OPS_GIVEN", "I have given ops in $b%s$b to $b%s$b." },
202 { "OSMSG_HOPS_GIVEN", "I have given halfops in $b%s$b to $b%s$b." },
203 { "OSMSG_CLONE_SAID", "$b%s$b has spoken to $b%s$b." },
204 { "OSMSG_UNKNOWN_SUBCOMMAND", "$b%s$b is not a valid subcommand of $b%s$b." },
205 { "OSMSG_UNKNOWN_OPTION", "$b%s$b has not been set." },
206 { "OSMSG_OPTION_IS", "$b%s$b is set to $b%s$b." },
207 { "OSMSG_OPTION_ROOT", "The following keys can be queried:" },
208 { "OSMSG_OPTION_LIST", "$b%s$b contains the following values:" },
209 { "OSMSG_OPTION_KEYS", "$b%s$b contains the following keys:" },
210 { "OSMSG_OPTION_LIST_EMPTY", "Empty list." },
211 { "OSMSG_SET_NOT_SET", "$b%s$b does not exist, and cannot be set." },
212 { "OSMSG_SET_BAD_TYPE", "$b%s$b is not a string, and cannot be set." },
213 { "OSMSG_SET_SUCCESS", "$b%s$b has been set to $b%s$b." },
214 { "OSMSG_SETTIME_SUCCESS", "Set time for servers named like $b%s$b." },
215 { "OSMSG_BAD_ACTION", "Unrecognized trace action $b%s$b." },
216 { "OSMSG_USER_SEARCH_RESULTS", "The following users were found:" },
217 { "OSMSG_USER_SEARCH_HEADER", "Nick User@Host (Account)" },
218 { "OSMSG_USER_SEARCH_BAR", "-------------------------------------------" },
219 { "OSMSG_USER_SEARCH_COUNT", "There were %4u matches" },
220 { "OSMSG_USER_SEARCH_COUNT_BAR", "------------ Found %4u matches -----------" },
221 { "OSMSG_CHANNEL_SEARCH_RESULTS", "The following channels were found:" },
222 { "OSMSG_GLINE_SEARCH_RESULTS", "The following glines were found:" },
223 { "OSMSG_SHUN_SEARCH_RESULTS", "The following shun were found:" },
224 { "OSMSG_LOG_SEARCH_RESULTS", "The following log entries were found:" },
225 { "OSMSG_GSYNC_RUNNING", "Synchronizing glines from %s." },
226 { "OSMSG_SSYNC_RUNNING", "Synchronizing shuns from %s." },
227 { "OSMSG_GTRACE_FORMAT", "%s (issued %s by %s, expires %s): %s" },
228 { "OSMSG_STRACE_FORMAT", "%s (issued %s by %s, expires %s): %s" },
229 { "OSMSG_GAG_APPLIED", "Gagged $b%s$b, affecting %d users." },
230 { "OSMSG_GAG_ADDED", "Gagged $b%s$b." },
231 { "OSMSG_REDUNDANT_GAG", "Gag $b%s$b is redundant." },
232 { "OSMSG_GAG_NOT_FOUND", "Could not find gag $b%s$b." },
233 { "OSMSG_NO_GAGS", "No gags have been set." },
234 { "OSMSG_UNGAG_APPLIED", "Ungagged $b%s$b, affecting %d users." },
235 { "OSMSG_UNGAG_ADDED", "Ungagged $b%s$b." },
236 { "OSMSG_TIMEQ_INFO", "%u events in timeq; next in %lu seconds." },
237 { "OSMSG_ALERT_EXISTS", "An alert named $b%s$b already exists." },
238 { "OSMSG_UNKNOWN_REACTION", "Unknown alert reaction $b%s$b." },
239 { "OSMSG_ADDED_ALERT", "Added alert named $b%s$b." },
240 { "OSMSG_REMOVED_ALERT", "Removed alert named $b%s$b." },
241 { "OSMSG_NO_SUCH_ALERT", "No alert named $b%s$b could be found." },
242 { "OSMSG_ALERTS_LIST", "$bCurrent $O alerts$b" },
243 { "OSMSG_ALERTS_BAR", "----------------------------------------------" },
244 { "OSMSG_ALERTS_HEADER", "Name Action (by Oper)" },
245 { "OSMSG_ALERTS_DESC", " Criteria: %s" },
246 { "OSMSG_ALERT_IS", "$b%-20s$b %-6s (by %s)" },
247 { "OSMSG_ALERT_END", "----------------End of Alerts-----------------" },
248 { "OSMSG_REHASH_COMPLETE", "Completed rehash of configuration database." },
249 { "OSMSG_REHASH_FAILED", "Rehash of configuration database failed, previous configuration is intact." },
250 { "OSMSG_REOPEN_COMPLETE", "Closed and reopened all log files." },
251 { "OSMSG_RECONNECTING", "Reconnecting to my uplink." },
252 { "OSMSG_NUMERIC_COLLIDE", "Numeric %d (%s) is already in use." },
253 { "OSMSG_NAME_COLLIDE", "That name is already in use." },
254 { "OSMSG_SRV_CREATE_FAILED", "Server creation failed -- check log files." },
255 { "OSMSG_SERVER_JUPED", "Added new jupe server %s." },
256 { "OSMSG_SERVER_NOT_JUPE", "That server is not a juped server." },
257 { "OSMSG_SERVER_UNJUPED", "Server jupe removed." },
258 /*
259 { "OSMSG_WARN_ADDED", "Added channel activity warning for $b%s$b (%s)" },
260 { "OSMSG_WARN_EXISTS", "Channel activity warning for $b%s$b already exists." },
261 { "OSMSG_WARN_DELETED", "Removed channel activity warning for $b%s$b" },
262 { "OSMSG_WARN_NOEXIST", "Channel activity warning for $b%s$b does not exist." },
263 { "OSMSG_WARN_LISTSTART", "Channel activity warnings:" },
264 { "OSMSG_WARN_LISTENTRY", "%s (%s)" },
265 { "OSMSG_WARN_LISTEND", "End of activity warning list." },
266 */
267 { "OSMSG_UPLINK_CONNECTING", "Establishing connection with %s (%s:%d)." },
268 { "OSMSG_CURRENT_UPLINK", "$b%s$b is already the current uplink." },
269 { "OSMSG_INVALID_UPLINK", "$b%s$b is not a valid uplink name." },
270 { "OSMSG_UPLINK_DISABLED", "$b%s$b is a disabled or unavailable uplink." },
271 { "OSMSG_UPLINK_START", "Uplink $b%s$b:" },
272 { "OSMSG_UPLINK_ADDRESS", "Address: %s:%d" },
273 { "OSMSG_STUPID_GLINE", "Gline %s? Now $bthat$b would be smooth." },
274 { "OSMSG_STUPID_SHUN", "Shun %s? Now $bthat$b would be smooth." },
275 { "OSMSG_ACCOUNTMASK_AUTHED", "Invalid criteria: it is impossible to match an account mask but not be authed" },
276 { "OSMSG_CHANINFO_HEADER", "%s Information" },
277 { "OSMSG_CHANINFO_TIMESTAMP", "Created on: %a %b %d %H:%M:%S %Y (%s)" },
278 { "OSMSG_CHANINFO_MODES", "Modes: %s" },
279 { "OSMSG_CHANINFO_MODES_BADWORD", "Modes: %s; bad-word channel" },
280 { "OSMSG_CHANINFO_TOPIC", "Topic (set by %%s, %a %b %d %H:%M:%S %Y): %%s" },
281 { "OSMSG_CHANINFO_TOPIC_UNKNOWN", "Topic: (none / not gathered)" },
282 { "OSMSG_CHANINFO_BAN_COUNT", "Bans (%d):" },
283 { "OSMSG_CHANINFO_BAN", "%%s by %%s (%a %b %d %H:%M:%S %Y)" },
284 { "OSMSG_CHANINFO_EXEMPT_COUNT", "Exempts (%d):" },
285 { "OSMSG_CHANINFO_EXEMPT", "%%s by %%s (%a %b %d %H:%M:%S %Y)" },
286 { "OSMSG_CHANINFO_MANY_USERS", "%d users (\"/msg $S %s %s users\" for the list)" },
287 { "OSMSG_CHANINFO_USER_COUNT", "Users (%d):" },
288 { "OSMSG_CSEARCH_CHANNEL_INFO", "%s [%d users] %s %s" },
289 { "OSMSG_INVALID_REGEX", "Invalid regex: %s: %s (%d)" },
290 { "OSMSG_TRACK_DISABLED", "Tracking is not currently compiled into X3" },
291 { NULL, NULL }
292 };
293
294 #define OPSERV_SYNTAX() svccmd_send_help_brief(user, opserv, cmd)
295
296 extern void add_track_user(struct userNode *user);
297 typedef int (*discrim_search_func)(struct userNode *match, void *extra);
298
299 struct userNode *opserv;
300 static struct service *opserv_service;
301
302 /*static dict_t opserv_chan_warn; */ /* data is char* */
303 static dict_t opserv_reserved_nick_dict; /* data is struct userNode* */
304 static struct string_list *opserv_bad_words;
305 static dict_t opserv_exempt_channels; /* data is not used */
306 static dict_t opserv_trusted_hosts; /* data is struct trusted_host* */
307 static dict_t opserv_hostinfo_dict; /* data is struct opserv_hostinfo* */
308 static dict_t opserv_user_alerts; /* data is struct opserv_user_alert* */
309 static dict_t opserv_nick_based_alerts; /* data is struct opserv_user_alert* */
310 static dict_t opserv_channel_alerts; /* data is struct opserv_user_alert* */
311 static struct module *opserv_module;
312 static struct log_type *OS_LOG;
313 static unsigned int new_user_flood;
314 static char *level_strings[1001];
315
316 static struct {
317 struct chanNode *debug_channel;
318 struct chanNode *alert_channel;
319 struct chanNode *staff_auth_channel;
320 struct policer_params *join_policer_params;
321 struct policer new_user_policer;
322 unsigned long untrusted_max;
323 unsigned long clone_gline_duration;
324 unsigned long block_gline_duration;
325 unsigned long block_shun_duration;
326 unsigned long purge_lock_delay;
327 unsigned long join_flood_moderate;
328 unsigned long join_flood_moderate_threshold;
329 unsigned long admin_level;
330 } opserv_conf;
331
332 struct trusted_host {
333 char *ipaddr;
334 char *issuer;
335 char *reason;
336 unsigned long limit;
337 time_t issued;
338 time_t expires;
339 };
340
341 struct gag_entry {
342 char *mask;
343 char *owner;
344 char *reason;
345 time_t expires;
346 struct gag_entry *next;
347 };
348
349 static struct gag_entry *gagList;
350
351 struct opserv_hostinfo {
352 struct userList clients;
353 struct trusted_host *trusted;
354 };
355
356 static void
357 opserv_free_hostinfo(void *data)
358 {
359 struct opserv_hostinfo *ohi = data;
360 userList_clean(&ohi->clients);
361 free(ohi);
362 }
363
364 typedef struct opservDiscrim {
365 struct chanNode *channel;
366 char *mask_nick, *mask_ident, *mask_host, *mask_info, *server, *reason, *accountmask;
367 irc_in_addr_t ip_mask;
368 unsigned long limit;
369 time_t min_ts, max_ts;
370 regex_t regex_nick, regex_ident, regex_host, regex_info;
371 unsigned int has_regex_nick : 1, has_regex_ident : 1, has_regex_host : 1, has_regex_info : 1;
372 unsigned int min_level, max_level, domain_depth, duration, min_clones, min_channels, max_channels;
373 unsigned char ip_mask_bits;
374 unsigned int match_opers : 1, option_log : 1;
375 unsigned int chan_req_modes : 2, chan_no_modes : 2;
376 int authed : 2, info_space : 2;
377 unsigned int intra_scmp : 2, intra_dcmp : 2;
378 unsigned int use_regex : 1;
379 } *discrim_t;
380
381 struct discrim_and_source {
382 discrim_t discrim;
383 struct userNode *source;
384 struct userNode *destination;
385 dict_t dict;
386 unsigned int disp_limit;
387 };
388
389 static discrim_t opserv_discrim_create(struct userNode *user, struct userNode *bot, unsigned int argc, char *argv[], int allow_channel);
390 static unsigned int opserv_discrim_search(discrim_t discrim, discrim_search_func dsf, void *data);
391 static int gag_helper_func(struct userNode *match, void *extra);
392 static int ungag_helper_func(struct userNode *match, void *extra);
393
394 typedef enum {
395 REACT_NOTICE,
396 REACT_KILL,
397 REACT_SILENT,
398 REACT_GLINE,
399 REACT_TRACK,
400 REACT_SHUN
401 } opserv_alert_reaction;
402
403 struct opserv_user_alert {
404 char *owner;
405 char *text_discrim, *split_discrim;
406 discrim_t discrim;
407 opserv_alert_reaction reaction;
408 };
409
410 /* funny type to make it acceptible to dict_set_free_data, far below */
411 static void
412 opserv_free_user_alert(void *data)
413 {
414 struct opserv_user_alert *alert = data;
415 if (alert->discrim->channel)
416 UnlockChannel(alert->discrim->channel);
417 free(alert->owner);
418 free(alert->text_discrim);
419 free(alert->split_discrim);
420 if(alert->discrim->has_regex_nick)
421 regfree(&alert->discrim->regex_nick);
422 if(alert->discrim->has_regex_ident)
423 regfree(&alert->discrim->regex_ident);
424 if(alert->discrim->has_regex_host)
425 regfree(&alert->discrim->regex_host);
426 if(alert->discrim->has_regex_info)
427 regfree(&alert->discrim->regex_info);
428 free(alert->discrim->reason);
429 free(alert->discrim);
430 free(alert);
431 }
432
433 #define opserv_debug(format...) do { if (opserv_conf.debug_channel) send_channel_notice(opserv_conf.debug_channel , opserv , ## format); } while (0)
434 #define opserv_alert(format...) do { if (opserv_conf.alert_channel) send_channel_notice(opserv_conf.alert_channel , opserv , ## format); } while (0)
435
436 /* A lot of these commands are very similar to what ChanServ can do,
437 * but OpServ can do them even on channels that aren't registered.
438 */
439
440 static MODCMD_FUNC(cmd_access)
441 {
442 struct handle_info *hi;
443 const char *target;
444 unsigned int res;
445
446 target = (argc > 1) ? (const char*)argv[1] : user->nick;
447 if (!irccasecmp(target, "*")) {
448 nickserv_show_oper_accounts(user, cmd);
449 return 1;
450 }
451 if (!(hi = modcmd_get_handle_info(user, target)))
452 return 0;
453 res = (argc > 2) ? oper_try_set_access(user, opserv_service->bot, hi, strtoul(argv[2], NULL, 0)) : 0;
454 reply("OSMSG_USER_ACCESS_IS", target, hi->handle, hi->opserv_level);
455 return res;
456 }
457
458 static MODCMD_FUNC(cmd_ban)
459 {
460 struct mod_chanmode change;
461 struct userNode *victim;
462
463 mod_chanmode_init(&change);
464 change.argc = 1;
465 change.args[0].mode = MODE_BAN;
466 if (is_ircmask(argv[1]))
467 change.args[0].u.hostmask = strdup(argv[1]);
468 else if ((victim = GetUserH(argv[1])))
469 change.args[0].u.hostmask = generate_hostmask(victim, 0);
470 else {
471 reply("OSMSG_INVALID_IRCMASK", argv[1]);
472 return 0;
473 }
474 modcmd_chanmode_announce(&change);
475 reply("OSMSG_ADDED_BAN", change.args[0].u.hostmask, channel->name);
476 free((char*)change.args[0].u.hostmask);
477 return 1;
478 }
479
480 static MODCMD_FUNC(cmd_chaninfo)
481 {
482 char buffer[MAXLEN];
483 const char *fmt;
484 struct banNode *ban;
485 struct exemptNode *exempt;
486 struct modeNode *moden;
487 unsigned int n;
488
489 reply("OSMSG_CHANINFO_HEADER", channel->name);
490 fmt = user_find_message(user, "OSMSG_CHANINFO_TIMESTAMP");
491 strftime(buffer, sizeof(buffer), fmt, gmtime(&channel->timestamp));
492 send_message_type(4, user, cmd->parent->bot, "%s", buffer);
493 irc_make_chanmode(channel, buffer);
494 if (channel->bad_channel)
495 reply("OSMSG_CHANINFO_MODES_BADWORD", buffer);
496 else
497 reply("OSMSG_CHANINFO_MODES", buffer);
498 if (channel->topic_time) {
499 fmt = user_find_message(user, "OSMSG_CHANINFO_TOPIC");
500 strftime(buffer, sizeof(buffer), fmt, gmtime(&channel->topic_time));
501 send_message_type(4, user, cmd->parent->bot, buffer, channel->topic_nick, channel->topic);
502 } else {
503 irc_fetchtopic(cmd->parent->bot, channel->name);
504 reply("OSMSG_CHANINFO_TOPIC_UNKNOWN");
505 }
506 if (channel->banlist.used) {
507 reply("OSMSG_CHANINFO_BAN_COUNT", channel->banlist.used);
508 fmt = user_find_message(user, "OSMSG_CHANINFO_BAN");
509 for (n = 0; n < channel->banlist.used; n++) {
510 ban = channel->banlist.list[n];
511 strftime(buffer, sizeof(buffer), fmt, localtime(&ban->set));
512 send_message_type(4, user, cmd->parent->bot, buffer, ban->ban, ban->who);
513 }
514 }
515 if (channel->exemptlist.used) {
516 reply("OSMSG_CHANINFO_EXEMPT_COUNT", channel->exemptlist.used);
517 fmt = user_find_message(user, "OSMSG_CHANINFO_EXEMPT");
518 for (n = 0; n < channel->exemptlist.used; n++) {
519 exempt = channel->exemptlist.list[n];
520 strftime(buffer, sizeof(buffer), fmt, localtime(&exempt->set));
521 send_message_type(4, user, cmd->parent->bot, buffer, exempt->exempt, exempt->who);
522 }
523 }
524 if ((argc < 2) && (channel->members.used >= 50)) {
525 /* early out unless they ask for users */
526 reply("OSMSG_CHANINFO_MANY_USERS", channel->members.used, argv[0], channel->name);
527 return 1;
528 }
529 reply("OSMSG_CHANINFO_USER_COUNT", channel->members.used);
530 for (n=0; n<channel->members.used; n++) {
531 moden = channel->members.list[n];
532 if (moden->modes & MODE_CHANOP) {
533 if (moden->oplevel >= 0)
534 send_message_type(4, user, cmd->parent->bot, " @%s:%d (%s@%s)", moden->user->nick, moden->oplevel, moden->user->ident, moden->user->hostname);
535 else
536 send_message_type(4, user, cmd->parent->bot, " @%s (%s@%s)", moden->user->nick, moden->user->ident, moden->user->hostname);
537 }
538 }
539 for (n=0; n<channel->members.used; n++) {
540 moden = channel->members.list[n];
541 if ((moden->modes & (MODE_CHANOP|MODE_HALFOP|MODE_VOICE)) == MODE_HALFOP)
542 send_message_type(4, user, cmd->parent->bot, " %s%s (%s@%s)", "%", moden->user->nick, moden->user->ident, moden->user->hostname);
543 }
544 for (n=0; n<channel->members.used; n++) {
545 moden = channel->members.list[n];
546 if ((moden->modes & (MODE_CHANOP|MODE_HALFOP|MODE_VOICE)) == MODE_VOICE)
547 send_message_type(4, user, cmd->parent->bot, " +%s (%s@%s)", moden->user->nick, moden->user->ident, moden->user->hostname);
548 }
549 for (n=0; n<channel->members.used; n++) {
550 moden = channel->members.list[n];
551 if ((moden->modes & (MODE_CHANOP|MODE_HALFOP|MODE_VOICE)) == 0)
552 send_message_type(4, user, cmd->parent->bot, " %s (%s@%s)", moden->user->nick, moden->user->ident, moden->user->hostname);
553 }
554 return 1;
555 }
556
557 /* This command has been replaced by 'alert notice channel #foo' */
558 /*
559 static MODCMD_FUNC(cmd_warn)
560 {
561 char *reason, *message;
562
563 if (!IsChannelName(argv[1])) {
564 reply("OSMSG_NEED_CHANNEL", argv[0]);
565 return 0;
566 }
567 reason = dict_find(opserv_chan_warn, argv[1], NULL);
568 if (reason) {
569 reply("OSMSG_WARN_EXISTS", argv[1]);
570 return 0;
571 }
572 if (argv[2])
573 reason = strdup(unsplit_string(argv+2, argc-2, NULL));
574 else
575 reason = strdup("No reason");
576 dict_insert(opserv_chan_warn, strdup(argv[1]), reason);
577 reply("OSMSG_WARN_ADDED", argv[1], reason);
578 if (dict_find(channels, argv[1], NULL)) {
579 message = alloca(strlen(reason) + strlen(argv[1]) + 55);
580 sprintf(message, "Channel activity warning for channel %s: %s", argv[1], reason);
581 global_message(MESSAGE_RECIPIENT_OPERS, message);
582 }
583 return 1;
584 }
585
586 static MODCMD_FUNC(cmd_unwarn)
587 {
588 if ((argc < 2) || !IsChannelName(argv[1])) {
589 reply("OSMSG_NEED_CHANNEL", argv[0]);
590 return 0;
591 }
592 if (!dict_remove(opserv_chan_warn, argv[1])) {
593 reply("OSMSG_WARN_NOEXIST", argv[1]);
594 return 0;
595 }
596 reply("OSMSG_WARN_DELETED", argv[1]);
597 return 1;
598 }
599 */
600
601 static MODCMD_FUNC(cmd_clearbans)
602 {
603 struct mod_chanmode *change;
604 unsigned int ii;
605
606 change = mod_chanmode_alloc(channel->banlist.used);
607 for (ii=0; ii<channel->banlist.used; ii++) {
608 change->args[ii].mode = MODE_REMOVE | MODE_BAN;
609 change->args[ii].u.hostmask = strdup(channel->banlist.list[ii]->ban);
610 }
611 modcmd_chanmode_announce(change);
612 for (ii=0; ii<change->argc; ++ii)
613 free((char*)change->args[ii].u.hostmask);
614 mod_chanmode_free(change);
615 reply("OSMSG_CLEARBANS_DONE", channel->name);
616 return 1;
617 }
618
619 static MODCMD_FUNC(cmd_clearmodes)
620 {
621 struct mod_chanmode change;
622
623 if (!channel->modes) {
624 reply("OSMSG_NO_CHANNEL_MODES", channel->name);
625 return 0;
626 }
627 mod_chanmode_init(&change);
628 change.modes_clear = channel->modes;
629 modcmd_chanmode_announce(&change);
630 reply("OSMSG_CLEARMODES_DONE", channel->name);
631 return 1;
632 }
633
634 static MODCMD_FUNC(cmd_deop)
635 {
636 struct mod_chanmode *change;
637 unsigned int arg, count;
638
639 change = mod_chanmode_alloc(argc-1);
640 for (arg = 1, count = 0; arg < argc; ++arg) {
641 struct userNode *victim = GetUserH(argv[arg]);
642 struct modeNode *mn;
643 if (!victim || IsService(victim)
644 || !(mn = GetUserMode(channel, victim))
645 || !(mn->modes & MODE_CHANOP))
646 continue;
647 change->args[count].mode = MODE_REMOVE | MODE_CHANOP;
648 change->args[count++].u.member = mn;
649 }
650 if (count) {
651 change->argc = count;
652 modcmd_chanmode_announce(change);
653 }
654 mod_chanmode_free(change);
655 reply("OSMSG_DEOP_DONE");
656 return 1;
657 }
658
659 static MODCMD_FUNC(cmd_dehop)
660 {
661 struct mod_chanmode *change;
662 unsigned int arg, count;
663
664 change = mod_chanmode_alloc(argc-1);
665 for (arg = 1, count = 0; arg < argc; ++arg) {
666 struct userNode *victim = GetUserH(argv[arg]);
667 struct modeNode *mn;
668 if (!victim || IsService(victim)
669 || !(mn = GetUserMode(channel, victim))
670 || !(mn->modes & MODE_HALFOP))
671 continue;
672 change->args[count].mode = MODE_REMOVE | MODE_HALFOP;
673 change->args[count++].u.member = mn;
674 }
675 if (count) {
676 change->argc = count;
677 modcmd_chanmode_announce(change);
678 }
679 mod_chanmode_free(change);
680 reply("OSMSG_DEHOP_DONE");
681 return 1;
682 }
683
684 static MODCMD_FUNC(cmd_deopall)
685 {
686 struct mod_chanmode *change;
687 unsigned int ii, count;
688
689 change = mod_chanmode_alloc(channel->members.used);
690 for (ii = count = 0; ii < channel->members.used; ++ii) {
691 struct modeNode *mn = channel->members.list[ii];
692 if (IsService(mn->user) || !(mn->modes & MODE_CHANOP))
693 continue;
694 change->args[count].mode = MODE_REMOVE | MODE_CHANOP;
695 change->args[count++].u.member = mn;
696 }
697 if (count) {
698 change->argc = count;
699 modcmd_chanmode_announce(change);
700 }
701 mod_chanmode_free(change);
702 reply("OSMSG_DEOPALL_DONE", channel->name);
703 return 1;
704 }
705
706 static MODCMD_FUNC(cmd_dehopall)
707 {
708 struct mod_chanmode *change;
709 unsigned int ii, count;
710
711 change = mod_chanmode_alloc(channel->members.used);
712 for (ii = count = 0; ii < channel->members.used; ++ii) {
713 struct modeNode *mn = channel->members.list[ii];
714 if (IsService(mn->user) || !(mn->modes & MODE_HALFOP))
715 continue;
716 change->args[count].mode = MODE_REMOVE | MODE_HALFOP;
717 change->args[count++].u.member = mn;
718 }
719 if (count) {
720 change->argc = count;
721 modcmd_chanmode_announce(change);
722 }
723 mod_chanmode_free(change);
724 reply("OSMSG_DEHOPALL_DONE", channel->name);
725 return 1;
726 }
727
728 static MODCMD_FUNC(cmd_rehash)
729 {
730 extern char *services_config;
731
732 if (conf_read(services_config))
733 reply("OSMSG_REHASH_COMPLETE");
734 else
735 reply("OSMSG_REHASH_FAILED");
736 return 1;
737 }
738
739 static MODCMD_FUNC(cmd_reopen)
740 {
741 log_reopen();
742 reply("OSMSG_REOPEN_COMPLETE");
743 return 1;
744 }
745
746 static MODCMD_FUNC(cmd_reconnect)
747 {
748 reply("OSMSG_RECONNECTING");
749 irc_squit(self, "Reconnecting.", NULL);
750 return 1;
751 }
752
753 static MODCMD_FUNC(cmd_jupe)
754 {
755 extern int force_n2k;
756 struct server *newsrv;
757 unsigned int num;
758 char numeric[COMBO_NUMERIC_LEN+1], srvdesc[SERVERDESCRIPTMAX+1];
759
760 num = atoi(argv[2]);
761 if ((num < 64) && !force_n2k) {
762 inttobase64(numeric, num, 1);
763 inttobase64(numeric+1, 64*64-1, 2);
764 } else {
765 inttobase64(numeric, num, 2);
766 inttobase64(numeric+2, 64*64*64-1, 3);
767 }
768 #ifdef WITH_PROTOCOL_P10
769 if (GetServerN(numeric)) {
770 reply("OSMSG_NUMERIC_COLLIDE", num, numeric);
771 return 0;
772 }
773 #endif
774 if (GetServerH(argv[1])) {
775 reply("OSMSG_NAME_COLLIDE");
776 return 0;
777 }
778 snprintf(srvdesc, sizeof(srvdesc), "JUPE %s", unsplit_string(argv+3, argc-3, NULL));
779 newsrv = AddServer(self, argv[1], 1, now, now, numeric, srvdesc);
780 if (!newsrv) {
781 reply("OSMSG_SRV_CREATE_FAILED");
782 return 0;
783 }
784 irc_server(newsrv);
785 reply("OSMSG_SERVER_JUPED", argv[1]);
786 return 1;
787 }
788
789 static MODCMD_FUNC(cmd_unjupe)
790 {
791 struct server *srv;
792 char *reason;
793
794 srv = GetServerH(argv[1]);
795 if (!srv) {
796 reply("MSG_SERVER_UNKNOWN", argv[1]);
797 return 0;
798 }
799 if (strncmp(srv->description, "JUPE", 4)) {
800 reply("OSMSG_SERVER_NOT_JUPE");
801 return 0;
802 }
803 reason = (argc > 2) ? unsplit_string(argv+2, argc-2, NULL) : "Unjuping server";
804 DelServer(srv, 1, reason);
805 reply("OSMSG_SERVER_UNJUPED");
806 return 1;
807 }
808
809 static MODCMD_FUNC(cmd_jump)
810 {
811 extern struct cManagerNode cManager;
812 void uplink_select(char *name);
813 struct uplinkNode *uplink_find(char *name);
814 struct uplinkNode *uplink;
815 char *target;
816
817 target = unsplit_string(argv+1, argc-1, NULL);
818
819 if (!strcmp(cManager.uplink->name, target)) {
820 reply("OSMSG_CURRENT_UPLINK", cManager.uplink->name);
821 return 0;
822 }
823
824 uplink = uplink_find(target);
825 if (!uplink) {
826 reply("OSMSG_INVALID_UPLINK", target);
827 return 0;
828 }
829 if (uplink->flags & UPLINK_UNAVAILABLE) {
830 reply("OSMSG_UPLINK_DISABLED", uplink->name);
831 return 0;
832 }
833
834 reply("OSMSG_UPLINK_CONNECTING", uplink->name, uplink->host, uplink->port);
835 uplink_select(target);
836 irc_squit(self, "Reconnecting.", NULL);
837 return 1;
838 }
839
840 static MODCMD_FUNC(cmd_die)
841 {
842 char *reason, *text;
843
844 text = unsplit_string(argv+1, argc-1, NULL);
845 reason = alloca(strlen(text) + strlen(user->nick) + 20);
846 sprintf(reason, "Disconnected by %s [%s]", user->nick, text);
847 irc_squit(self, reason, text);
848 quit_services = 1;
849 return 1;
850 }
851
852 static MODCMD_FUNC(cmd_restart)
853 {
854 extern int services_argc;
855 extern char **services_argv;
856 char **restart_argv, *reason, *text;
857
858 text = unsplit_string(argv+1, argc-1, NULL);
859 reason = alloca(strlen(text) + strlen(user->nick) + 17);
860 sprintf(reason, "Restarted by %s [%s]", user->nick, text);
861 irc_squit(self, reason, text);
862
863 /* Append a NULL to the end of argv[]. */
864 restart_argv = (char **)alloca((services_argc + 1) * sizeof(char *));
865 memcpy(restart_argv, services_argv, services_argc * sizeof(char *));
866 restart_argv[services_argc] = NULL;
867
868 call_exit_funcs();
869
870 /* Don't blink. */
871 execv(services_argv[0], restart_argv);
872
873 /* If we're still here, that means something went wrong. Reconnect. */
874 return 1;
875 }
876
877 static struct gline *
878 opserv_block(struct userNode *target, char *src_handle, char *reason, unsigned long duration, int silent)
879 {
880 char mask[IRC_NTOP_MAX_SIZE+3] = { '*', '@', '\0' };
881 irc_ntop(mask + 2, sizeof(mask) - 2, &target->ip);
882 if (!reason)
883 snprintf(reason = alloca(MAXLEN), MAXLEN,
884 "G-line requested by %s.", src_handle);
885 if (!duration)
886 duration = opserv_conf.block_gline_duration;
887 return gline_add(src_handle, mask, duration, reason, now, 1, silent ? 1 : 0);
888 }
889
890 static MODCMD_FUNC(cmd_block)
891 {
892 struct userNode *target;
893 struct gline *gline;
894 char *reason;
895
896 target = GetUserH(argv[1]);
897 if (!target) {
898 reply("MSG_NICK_UNKNOWN", argv[1]);
899 return 0;
900 }
901 if (IsService(target)) {
902 reply("MSG_SERVICE_IMMUNE", target->nick);
903 return 0;
904 }
905 reason = (argc > 2) ? unsplit_string(argv+2, argc-2, NULL) : NULL;
906 gline = opserv_block(target, user->handle_info->handle, reason, 0, 0);
907 reply("OSMSG_GLINE_ISSUED", gline->target);
908 return 1;
909 }
910
911 static MODCMD_FUNC(cmd_gline)
912 {
913 unsigned long duration;
914 char *reason;
915 struct gline *gline;
916
917 reason = unsplit_string(argv+3, argc-3, NULL);
918 if (!is_gline(argv[1]) && !IsChannelName(argv[1]) && (argv[1][0] != '&')) {
919 reply("MSG_INVALID_GLINE", argv[1]);
920 return 0;
921 }
922 if (!argv[1][strspn(argv[1], "#&*?@.")] && (strlen(argv[1]) < 10)) {
923 reply("OSMSG_STUPID_GLINE", argv[1]);
924 return 0;
925 }
926 duration = ParseInterval(argv[2]);
927 if (!duration) {
928 reply("MSG_INVALID_DURATION", argv[2]);
929 return 0;
930 }
931 gline = gline_add(user->handle_info->handle, argv[1], duration, reason, now, 1, 0);
932 reply("OSMSG_GLINE_ISSUED", gline->target);
933 return 1;
934 }
935
936 static MODCMD_FUNC(cmd_ungline)
937 {
938 if (gline_remove(argv[1], 1))
939 reply("OSMSG_GLINE_REMOVED", argv[1]);
940 else
941 reply("OSMSG_GLINE_FORCE_REMOVED", argv[1]);
942 return 1;
943 }
944
945 static MODCMD_FUNC(cmd_refreshg)
946 {
947 if (argc > 1) {
948 unsigned int count;
949 dict_iterator_t it;
950 struct server *srv;
951
952 for (it=dict_first(servers), count=0; it; it=iter_next(it)) {
953 srv = iter_data(it);
954 if ((srv == self) || !match_ircglob(srv->name, argv[1]))
955 continue;
956 gline_refresh_server(srv);
957 reply("OSMSG_GLINES_ONE_REFRESHED", srv->name);
958 count++;
959 }
960 if (!count) {
961 reply("MSG_SERVER_UNKNOWN", argv[1]);
962 return 0;
963 }
964 } else {
965 gline_refresh_all();
966 reply("OSMSG_GLINES_REFRESHED");
967 }
968 return 1;
969 }
970
971 static struct shun *
972 opserv_shun(struct userNode *target, char *src_handle, char *reason, unsigned long duration)
973 {
974 char *mask;
975 mask = alloca(MAXLEN);
976 snprintf(mask, MAXLEN, "*@%s", target->hostname);
977 if (!reason) {
978 reason = alloca(MAXLEN);
979 snprintf(reason, MAXLEN, "Shun requested by %s.", src_handle);
980 }
981 if (!duration) duration = opserv_conf.block_shun_duration;
982 return shun_add(src_handle, mask, duration, reason, now, 1);
983 }
984
985 static MODCMD_FUNC(cmd_sblock)
986 {
987 struct userNode *target;
988 struct shun *shun;
989 char *reason;
990
991 target = GetUserH(argv[1]);
992 if (!target) {
993 reply("MSG_NICK_UNKNOWN", argv[1]);
994 return 0;
995 }
996 if (IsService(target)) {
997 reply("MSG_SERVICE_IMMUNE", target->nick);
998 return 0;
999 }
1000 reason = (argc > 2) ? unsplit_string(argv+2, argc-2, NULL) : NULL;
1001 shun = opserv_shun(target, user->handle_info->handle, reason, 0);
1002 reply("OSMSG_SHUN_ISSUED", shun->target);
1003 return 1;
1004 }
1005
1006 static MODCMD_FUNC(cmd_shun)
1007 {
1008 unsigned long duration;
1009 char *reason;
1010 struct shun *shun;
1011
1012 reason = unsplit_string(argv+3, argc-3, NULL);
1013 if (!is_shun(argv[1]) && !IsChannelName(argv[1]) && (argv[1][0] != '&')) {
1014 reply("MSG_INVALID_SHUN", argv[1]);
1015 return 0;
1016 }
1017 if (!argv[1][strspn(argv[1], "#&*?@.")] && (strlen(argv[1]) < 10)) {
1018 reply("OSMSG_STUPID_SHUN", argv[1]);
1019 return 0;
1020 }
1021 duration = ParseInterval(argv[2]);
1022 if (!duration) {
1023 reply("MSG_INVALID_DURATION", argv[2]);
1024 return 0;
1025 }
1026 shun = shun_add(user->handle_info->handle, argv[1], duration, reason, now, 1);
1027 reply("OSMSG_SHUN_ISSUED", shun->target);
1028 return 1;
1029 }
1030
1031 static MODCMD_FUNC(cmd_unshun)
1032 {
1033 if (shun_remove(argv[1], 1))
1034 reply("OSMSG_SHUN_REMOVED", argv[1]);
1035 else
1036 reply("OSMSG_SHUN_FORCE_REMOVED", argv[1]);
1037 return 1;
1038 }
1039
1040 static MODCMD_FUNC(cmd_refreshs)
1041 {
1042 if (argc > 1) {
1043 unsigned int count;
1044 dict_iterator_t it;
1045 struct server *srv;
1046
1047 for (it=dict_first(servers), count=0; it; it=iter_next(it)) {
1048 srv = iter_data(it);
1049 if ((srv == self) || !match_ircglob(srv->name, argv[1]))
1050 continue;
1051 shun_refresh_server(srv);
1052 reply("OSMSG_SHUNS_ONE_REFRESHED", srv->name);
1053 count++;
1054 }
1055 if (!count) {
1056 reply("MSG_SERVER_UNKNOWN", argv[1]);
1057 return 0;
1058 }
1059 } else {
1060 shun_refresh_all();
1061 reply("OSMSG_SHUNS_REFRESHED");
1062 }
1063 return 1;
1064 }
1065
1066 static void
1067 opserv_ison(struct userNode *tell, struct userNode *target, const char *message)
1068 {
1069 struct modeNode *mn;
1070 unsigned int count, here_len, n, maxlen;
1071 char buff[MAXLEN];
1072
1073 maxlen = tell->handle_info ? tell->handle_info->screen_width : 0;
1074 if (!maxlen)
1075 maxlen = MAX_LINE_SIZE;
1076 for (n=count=0; n<target->channels.used; n++) {
1077 mn = target->channels.list[n];
1078 here_len = strlen(mn->channel->name);
1079 if ((count + here_len + 4) > maxlen) {
1080 buff[count] = 0;
1081 send_message(tell, opserv, message, buff);
1082 count = 0;
1083 }
1084 if (mn->modes & MODE_CHANOP)
1085 buff[count++] = '@';
1086 if (mn->modes & MODE_HALFOP)
1087 buff[count++] = '%';
1088 if (mn->modes & MODE_VOICE)
1089 buff[count++] = '+';
1090 memcpy(buff+count, mn->channel->name, here_len);
1091 count += here_len;
1092 buff[count++] = ' ';
1093 }
1094 if (count) {
1095 buff[count] = 0;
1096 send_message(tell, opserv, message, buff);
1097 }
1098 }
1099
1100 static MODCMD_FUNC(cmd_inviteme)
1101 {
1102 struct userNode *target;
1103
1104 if (argc < 2) {
1105 target = user;
1106 } else {
1107 target = GetUserH(argv[1]);
1108 if (!target) {
1109 reply("MSG_NICK_UNKNOWN", argv[1]);
1110 return 0;
1111 }
1112 }
1113 if (opserv_conf.debug_channel == NULL) {
1114 reply("OSMSG_NO_DEBUG_CHANNEL");
1115 return 0;
1116 }
1117 if (GetUserMode(opserv_conf.debug_channel, user)) {
1118 reply("OSMSG_ALREADY_THERE", opserv_conf.debug_channel->name);
1119 return 0;
1120 }
1121 irc_invite(cmd->parent->bot, target, opserv_conf.debug_channel);
1122 if (target != user)
1123 reply("OSMSG_INVITE_DONE", target->nick, opserv_conf.debug_channel->name);
1124 return 1;
1125 }
1126
1127 static MODCMD_FUNC(cmd_invite)
1128 {
1129 if (GetUserMode(channel, user)) {
1130 reply("OSMSG_ALREADY_THERE", channel->name);
1131 return 0;
1132 }
1133 irc_invite(cmd->parent->bot, user, channel);
1134 return 1;
1135 }
1136
1137 static MODCMD_FUNC(cmd_join)
1138 {
1139 struct userNode *bot = cmd->parent->bot;
1140
1141 if (!IsChannelName(argv[1])) {
1142 reply("MSG_NOT_CHANNEL_NAME");
1143 return 0;
1144 } else if (!(channel = GetChannel(argv[1]))) {
1145 channel = AddChannel(argv[1], now, NULL, NULL, NULL);
1146 AddChannelUser(bot, channel)->modes |= MODE_CHANOP;
1147 } else if (GetUserMode(channel, bot)) {
1148 reply("OSMSG_ALREADY_JOINED", channel->name);
1149 return 0;
1150 } else {
1151 struct mod_chanmode change;
1152 mod_chanmode_init(&change);
1153 change.argc = 1;
1154 change.args[0].mode = MODE_CHANOP;
1155 change.args[0].u.member = AddChannelUser(bot, channel);
1156 modcmd_chanmode_announce(&change);
1157 }
1158 irc_fetchtopic(bot, channel->name);
1159 reply("OSMSG_JOIN_DONE", channel->name);
1160 return 1;
1161 }
1162
1163 static MODCMD_FUNC(cmd_kick)
1164 {
1165 struct userNode *target;
1166 char *reason;
1167
1168 if (argc < 3) {
1169 reason = alloca(strlen(OSMSG_KICK_REQUESTED)+strlen(user->nick)+1);
1170 sprintf(reason, OSMSG_KICK_REQUESTED, user->nick);
1171 } else {
1172 reason = unsplit_string(argv+2, argc-2, NULL);
1173 }
1174 target = GetUserH(argv[1]);
1175 if (!target) {
1176 reply("MSG_NICK_UNKNOWN", argv[1]);
1177 return 0;
1178 }
1179 if (!GetUserMode(channel, target)) {
1180 reply("OSMSG_NOT_ON_CHANNEL", target->nick, channel->name);
1181 return 0;
1182 }
1183 KickChannelUser(target, channel, cmd->parent->bot, reason);
1184 return 1;
1185 }
1186
1187 static MODCMD_FUNC(cmd_kickall)
1188 {
1189 unsigned int limit, n, inchan;
1190 struct modeNode *mn;
1191 char *reason;
1192 struct userNode *bot = cmd->parent->bot;
1193
1194 /* ircu doesn't let servers KICK users, so if OpServ's not in the
1195 * channel, we have to join it in temporarily. */
1196 if (!(inchan = GetUserMode(channel, bot) ? 1 : 0)) {
1197 struct mod_chanmode change;
1198 mod_chanmode_init(&change);
1199 change.args[0].mode = MODE_CHANOP;
1200 change.args[0].u.member = AddChannelUser(bot, channel);
1201 modcmd_chanmode_announce(&change);
1202 }
1203 if (argc < 2) {
1204 reason = alloca(strlen(OSMSG_KICK_REQUESTED)+strlen(user->nick)+1);
1205 sprintf(reason, OSMSG_KICK_REQUESTED, user->nick);
1206 } else {
1207 reason = unsplit_string(argv+1, argc-1, NULL);
1208 }
1209 limit = user->handle_info->opserv_level;
1210 for (n=channel->members.used; n>0;) {
1211 mn = channel->members.list[--n];
1212 if (IsService(mn->user)
1213 || (mn->user->handle_info
1214 && (mn->user->handle_info->opserv_level >= limit))) {
1215 continue;
1216 }
1217 KickChannelUser(mn->user, channel, bot, reason);
1218 }
1219 if (!inchan)
1220 DelChannelUser(bot, channel, "My work here is done", 0);
1221 reply("OSMSG_KICKALL_DONE", channel->name);
1222 return 1;
1223 }
1224
1225 static MODCMD_FUNC(cmd_kickban)
1226 {
1227 struct mod_chanmode change;
1228 struct userNode *target;
1229 char *reason;
1230 char *mask;
1231
1232 if (argc == 2) {
1233 reason = alloca(strlen(OSMSG_KICK_REQUESTED)+strlen(user->nick)+1);
1234 sprintf(reason, OSMSG_KICK_REQUESTED, user->nick);
1235 } else {
1236 reason = unsplit_string(argv+2, argc-2, NULL);
1237 }
1238 target = GetUserH(argv[1]);
1239 if (!target) {
1240 reply("MSG_NICK_UNKNOWN", argv[1]);
1241 return 0;
1242 }
1243 if (!GetUserMode(channel, target)) {
1244 reply("OSMSG_NOT_ON_CHANNEL", target->nick, channel->name);
1245 return 0;
1246 }
1247 mod_chanmode_init(&change);
1248 change.argc = 1;
1249 change.args[0].mode = MODE_BAN;
1250 change.args[0].u.hostmask = mask = generate_hostmask(target, 0);
1251 modcmd_chanmode_announce(&change);
1252 KickChannelUser(target, channel, cmd->parent->bot, reason);
1253 free(mask);
1254 return 1;
1255 }
1256
1257 static MODCMD_FUNC(cmd_kickbanall)
1258 {
1259 struct modeNode *mn;
1260 struct userNode *bot = cmd->parent->bot;
1261 struct mod_chanmode *change;
1262 char *reason;
1263 unsigned int limit, n, inchan;
1264
1265 /* ircu doesn't let servers KICK users, so if OpServ's not in the
1266 * channel, we have to join it in temporarily. */
1267 if (!(inchan = GetUserMode(channel, bot) ? 1 : 0)) {
1268 change = mod_chanmode_alloc(2);
1269 change->args[0].mode = MODE_CHANOP;
1270 change->args[0].u.member = AddChannelUser(bot, channel);
1271 change->args[1].mode = MODE_BAN;
1272 change->args[1].u.hostmask = "*!*@*";
1273 } else {
1274 change = mod_chanmode_alloc(1);
1275 change->args[0].mode = MODE_BAN;
1276 change->args[0].u.hostmask = "*!*@*";
1277 }
1278 modcmd_chanmode_announce(change);
1279 mod_chanmode_free(change);
1280 if (argc < 2) {
1281 reason = alloca(strlen(OSMSG_KICK_REQUESTED)+strlen(user->nick)+1);
1282 sprintf(reason, OSMSG_KICK_REQUESTED, user->nick);
1283 } else {
1284 reason = unsplit_string(argv+1, argc-1, NULL);
1285 }
1286 /* now kick them */
1287 limit = user->handle_info->opserv_level;
1288 for (n=channel->members.used; n>0; ) {
1289 mn = channel->members.list[--n];
1290 if (IsService(mn->user)
1291 || (mn->user->handle_info
1292 && (mn->user->handle_info->opserv_level >= limit))) {
1293 continue;
1294 }
1295 KickChannelUser(mn->user, channel, bot, reason);
1296 }
1297 if (!inchan)
1298 DelChannelUser(bot, channel, "My work here is done", 0);
1299 reply("OSMSG_KICKALL_DONE", channel->name);
1300 return 1;
1301 }
1302
1303 static MODCMD_FUNC(cmd_part)
1304 {
1305 char *reason;
1306
1307 if (!IsChannelName(argv[1])) {
1308 reply("MSG_NOT_CHANNEL_NAME");
1309 return 0;
1310 }
1311 if ((channel = GetChannel(argv[1]))) {
1312 if (!GetUserMode(channel, cmd->parent->bot)) {
1313 reply("OSMSG_NOT_ON_CHANNEL", cmd->parent->bot->nick, channel->name);
1314 return 0;
1315 }
1316 reason = (argc < 3) ? "Leaving." : unsplit_string(argv+2, argc-2, NULL);
1317 reply("OSMSG_LEAVING", channel->name);
1318 DelChannelUser(cmd->parent->bot, channel, reason, 0);
1319 }
1320 return 1;
1321 }
1322
1323 static MODCMD_FUNC(cmd_mode)
1324 {
1325 if (!modcmd_chanmode(argv+1, argc-1, MCP_ALLOW_OVB|MCP_KEY_FREE|MC_ANNOUNCE)) {
1326 reply("MSG_INVALID_MODES", unsplit_string(argv+1, argc-1, NULL));
1327 return 0;
1328 }
1329 reply("OSMSG_MODE_SET", channel->name);
1330 return 1;
1331 }
1332
1333 static MODCMD_FUNC(cmd_op)
1334 {
1335 struct mod_chanmode *change;
1336 unsigned int arg, count;
1337
1338 change = mod_chanmode_alloc(argc-1);
1339 for (arg = 1, count = 0; arg < argc; ++arg) {
1340 struct userNode *victim;
1341 struct modeNode *mn;
1342 if (!(victim = GetUserH(argv[arg])))
1343 continue;
1344 if (!(mn = GetUserMode(channel, victim)))
1345 continue;
1346 if (mn->modes & MODE_CHANOP)
1347 continue;
1348 change->args[count].mode = MODE_CHANOP;
1349 change->args[count++].u.member = mn;
1350 }
1351 if (count) {
1352 change->argc = count;
1353 modcmd_chanmode_announce(change);
1354 }
1355 mod_chanmode_free(change);
1356 reply("OSMSG_OP_DONE");
1357 return 1;
1358 }
1359
1360 static MODCMD_FUNC(cmd_hop)
1361 {
1362 struct mod_chanmode *change;
1363 unsigned int arg, count;
1364
1365 change = mod_chanmode_alloc(argc-1);
1366 for (arg = 1, count = 0; arg < argc; ++arg) {
1367 struct userNode *victim;
1368 struct modeNode *mn;
1369 if (!(victim = GetUserH(argv[arg])))
1370 continue;
1371 if (!(mn = GetUserMode(channel, victim)))
1372 continue;
1373 if (mn->modes & MODE_HALFOP)
1374 continue;
1375 change->args[count].mode = MODE_HALFOP;
1376 change->args[count++].u.member = mn;
1377 }
1378 if (count) {
1379 change->argc = count;
1380 modcmd_chanmode_announce(change);
1381 }
1382 mod_chanmode_free(change);
1383 reply("OSMSG_HOP_DONE");
1384 return 1;
1385 }
1386
1387 static MODCMD_FUNC(cmd_opall)
1388 {
1389 struct mod_chanmode *change;
1390 unsigned int ii, count;
1391
1392 change = mod_chanmode_alloc(channel->members.used);
1393 for (ii = count = 0; ii < channel->members.used; ++ii) {
1394 struct modeNode *mn = channel->members.list[ii];
1395 if (mn->modes & MODE_CHANOP)
1396 continue;
1397 change->args[count].mode = MODE_CHANOP;
1398 change->args[count++].u.member = mn;
1399 }
1400 if (count) {
1401 change->argc = count;
1402 modcmd_chanmode_announce(change);
1403 }
1404 mod_chanmode_free(change);
1405 reply("OSMSG_OPALL_DONE", channel->name);
1406 return 1;
1407 }
1408
1409 static MODCMD_FUNC(cmd_hopall)
1410 {
1411 struct mod_chanmode *change;
1412 unsigned int ii, count;
1413
1414 change = mod_chanmode_alloc(channel->members.used);
1415 for (ii = count = 0; ii < channel->members.used; ++ii) {
1416 struct modeNode *mn = channel->members.list[ii];
1417 if (mn->modes & MODE_HALFOP)
1418 continue;
1419 change->args[count].mode = MODE_HALFOP;
1420 change->args[count++].u.member = mn;
1421 }
1422 if (count) {
1423 change->argc = count;
1424 modcmd_chanmode_announce(change);
1425 }
1426 mod_chanmode_free(change);
1427 reply("OSMSG_HOPALL_DONE", channel->name);
1428 return 1;
1429 }
1430
1431 static MODCMD_FUNC(cmd_whois)
1432 {
1433 struct userNode *target;
1434 char buffer[128];
1435 int bpos, herelen;
1436
1437 #ifdef WITH_PROTOCOL_P10
1438 if (argv[1][0] == '*')
1439 target = GetUserN(argv[1]+1);
1440 else
1441 #endif
1442 target = GetUserH(argv[1]);
1443 if (!target) {
1444 reply("MSG_NICK_UNKNOWN", argv[1]);
1445 return 0;
1446 }
1447 reply("OSMSG_WHOIS_NICK", target->nick);
1448 reply("OSMSG_WHOIS_HOST", target->ident, target->hostname);
1449 if (IsFakeHost(target))
1450 reply("OSMSG_WHOIS_FAKEHOST", target->fakehost);
1451 reply("OSMSG_WHOIS_IP", irc_ntoa(&target->ip));
1452 if (target->modes) {
1453 bpos = 0;
1454 #define buffer_cat(str) (herelen = strlen(str), memcpy(buffer+bpos, str, herelen), bpos += herelen)
1455 if (IsInvisible(target)) buffer[bpos++] = 'i';
1456 if (IsWallOp(target)) buffer[bpos++] = 'w';
1457 if (IsOper(target)) buffer[bpos++] = 'o';
1458 if (IsGlobal(target)) buffer[bpos++] = 'g';
1459 if (IsServNotice(target)) buffer[bpos++] = 's';
1460
1461 // sethost - reed/apples
1462 // if (IsHelperIrcu(target)) buffer[bpos++] = 'h';
1463 if (IsSetHost(target)) buffer[bpos++] = 'h';
1464
1465 if (IsService(target)) buffer[bpos++] = 'k';
1466 if (IsDeaf(target)) buffer[bpos++] = 'd';
1467 if (target->handle_info) buffer[bpos++] = 'r';
1468 if (IsHiddenHost(target)) buffer[bpos++] = 'x';
1469 if (IsGagged(target)) buffer_cat(" (gagged)");
1470 if (IsRegistering(target)) buffer_cat(" (registered account)");
1471 buffer[bpos] = 0;
1472 if (bpos > 0)
1473 reply("OSMSG_WHOIS_MODES", buffer);
1474 }
1475 reply("OSMSG_WHOIS_INFO", target->info);
1476 #ifdef WITH_PROTOCOL_P10
1477 reply("OSMSG_WHOIS_NUMERIC", target->numeric);
1478 #endif
1479 reply("OSMSG_WHOIS_SERVER", target->uplink->name);
1480 reply("OSMSG_WHOIS_ACCOUNT", (target->handle_info ? target->handle_info->handle : "Not authenticated"));
1481 intervalString(buffer, now - target->timestamp, user->handle_info);
1482 reply("OSMSG_WHOIS_NICK_AGE", buffer);
1483 if (target->channels.used <= MAX_CHANNELS_WHOIS)
1484 opserv_ison(user, target, "OSMSG_WHOIS_CHANNELS");
1485 else
1486 reply("OSMSG_WHOIS_HIDECHANS");
1487 return 1;
1488 }
1489
1490 static MODCMD_FUNC(cmd_unban)
1491 {
1492 struct mod_chanmode change;
1493 mod_chanmode_init(&change);
1494 change.argc = 1;
1495 change.args[0].mode = MODE_REMOVE | MODE_BAN;
1496 change.args[0].u.hostmask = argv[1];
1497 modcmd_chanmode_announce(&change);
1498 reply("OSMSG_UNBAN_DONE", channel->name);
1499 return 1;
1500 }
1501
1502 static MODCMD_FUNC(cmd_voiceall)
1503 {
1504 struct mod_chanmode *change;
1505 unsigned int ii, count;
1506
1507 change = mod_chanmode_alloc(channel->members.used);
1508 for (ii = count = 0; ii < channel->members.used; ++ii) {
1509 struct modeNode *mn = channel->members.list[ii];
1510 if (mn->modes & (MODE_CHANOP|MODE_HALFOP|MODE_VOICE))
1511 continue;
1512 change->args[count].mode = MODE_VOICE;
1513 change->args[count++].u.member = mn;
1514 }
1515 if (count) {
1516 change->argc = count;
1517 modcmd_chanmode_announce(change);
1518 }
1519 mod_chanmode_free(change);
1520 reply("OSMSG_CHANNEL_VOICED", channel->name);
1521 return 1;
1522 }
1523
1524 static MODCMD_FUNC(cmd_devoiceall)
1525 {
1526 struct mod_chanmode *change;
1527 unsigned int ii, count;
1528
1529 change = mod_chanmode_alloc(channel->members.used);
1530 for (ii = count = 0; ii < channel->members.used; ++ii) {
1531 struct modeNode *mn = channel->members.list[ii];
1532 if (!(mn->modes & MODE_VOICE))
1533 continue;
1534 change->args[count].mode = MODE_REMOVE | MODE_VOICE;
1535 change->args[count++].u.member = mn;
1536 }
1537 if (count) {
1538 change->argc = count;
1539 modcmd_chanmode_announce(change);
1540 }
1541 mod_chanmode_free(change);
1542 reply("OSMSG_CHANNEL_DEVOICED", channel->name);
1543 return 1;
1544 }
1545
1546 static MODCMD_FUNC(cmd_stats_bad) {
1547 dict_iterator_t it;
1548 unsigned int ii, end, here_len;
1549 char buffer[400];
1550
1551 /* Show the bad word list.. */
1552 /* TODO: convert nonprinting chars like bold to $b etc in a usable way */
1553 for (ii=end=0; ii<opserv_bad_words->used; ii++) {
1554 here_len = strlen(opserv_bad_words->list[ii]);
1555 /* If the line is full output it & start again */
1556 if ((end + here_len + 2) > sizeof(buffer)) {
1557 buffer[end] = 0;
1558 reply("OSMSG_BADWORD_LIST", buffer);
1559 end = 0;
1560 }
1561 memcpy(buffer+end, opserv_bad_words->list[ii], here_len);
1562 end += here_len;
1563 buffer[end++] = ' ';
1564 }
1565 buffer[end] = 0;
1566 reply("OSMSG_BADWORD_LIST", buffer);
1567
1568 /* Show the exemption list.. */
1569 for (it=dict_first(opserv_exempt_channels), end=0; it; it=iter_next(it)) {
1570 here_len = strlen(iter_key(it));
1571 if ((end + here_len + 2) > sizeof(buffer)) {
1572 buffer[end] = 0;
1573 reply("OSMSG_EXEMPTED_LIST", buffer);
1574 end = 0;
1575 }
1576 memcpy(buffer+end, iter_key(it), here_len);
1577 end += here_len;
1578 buffer[end++] = ' ';
1579 }
1580 buffer[end] = 0;
1581 reply("OSMSG_EXEMPTED_LIST", buffer);
1582 return 1;
1583 }
1584
1585 static MODCMD_FUNC(cmd_stats_glines) {
1586 reply("OSMSG_GLINE_COUNT", gline_count());
1587 return 1;
1588 }
1589
1590 static MODCMD_FUNC(cmd_stats_shuns) {
1591 reply("OSMSG_SHUN_COUNT", shun_count());
1592 return 1;
1593 }
1594
1595 static void
1596 trace_links(struct userNode *bot, struct userNode *user, struct server *server, unsigned int depth) {
1597 unsigned int nn, pos;
1598 char buffer[400];
1599
1600 for (nn=1; nn<=depth; nn<<=1) ;
1601 for (pos=0, nn>>=1; nn>1; ) {
1602 nn >>= 1;
1603 buffer[pos++] = (depth & nn) ? ((nn == 1) ? '`' : ' ') : '|';
1604 buffer[pos++] = (nn == 1) ? '-': ' ';
1605 }
1606 buffer[pos] = 0;
1607 send_message(user, bot, "OSMSG_LINKS_SERVER", buffer, server->name, server->clients, server->description);
1608 if (!server->children.used)
1609 return;
1610 for (nn=0; nn<server->children.used-1; nn++) {
1611 trace_links(bot, user, server->children.list[nn], depth<<1);
1612 }
1613 trace_links(bot, user, server->children.list[nn], (depth<<1)|1);
1614 }
1615
1616 static MODCMD_FUNC(cmd_stats_links) {
1617 trace_links(cmd->parent->bot, user, self, 1);
1618 return 1;
1619 }
1620
1621
1622 static MODCMD_FUNC(cmd_stats_max) {
1623 reply("OSMSG_MAX_CLIENTS", max_clients, asctime(localtime(&max_clients_time)));
1624 return 1;
1625 }
1626
1627 static MODCMD_FUNC(cmd_stats_network) {
1628 struct helpfile_table tbl;
1629 unsigned int nn, tot_clients;
1630 dict_iterator_t it;
1631
1632 tot_clients = dict_size(clients);
1633 reply("OSMSG_NETWORK_INFO", tot_clients, invis_clients, curr_opers.used);
1634 tbl.length = dict_size(servers)+1;
1635 tbl.width = 3;
1636 tbl.flags = TABLE_NO_FREE;
1637 tbl.contents = calloc(tbl.length, sizeof(*tbl.contents));
1638 tbl.contents[0] = calloc(tbl.width, sizeof(**tbl.contents));
1639 tbl.contents[0][0] = "Server Name";
1640 tbl.contents[0][1] = "Clients";
1641 tbl.contents[0][2] = "Load";
1642 for (it=dict_first(servers), nn=1; it; it=iter_next(it)) {
1643 struct server *server = iter_data(it);
1644 char *buffer = malloc(32);
1645 tbl.contents[nn] = calloc(tbl.width, sizeof(**tbl.contents));
1646 tbl.contents[nn][0] = server->name;
1647 tbl.contents[nn][1] = buffer;
1648 sprintf(buffer, "%u", server->clients);
1649 tbl.contents[nn][2] = buffer + 16;
1650 sprintf(buffer+16, "%3.3g%%", ((double)server->clients/tot_clients)*100);
1651 nn++;
1652 }
1653 table_send(cmd->parent->bot, user->nick, 0, 0, tbl);
1654 for (nn=1; nn<tbl.length; nn++) {
1655 free((char*)tbl.contents[nn][1]);
1656 free(tbl.contents[nn]);
1657 }
1658 free(tbl.contents[0]);
1659 free(tbl.contents);
1660 return 1;
1661 }
1662
1663 static MODCMD_FUNC(cmd_stats_network2) {
1664 struct helpfile_table tbl;
1665 unsigned int nn;
1666 dict_iterator_t it;
1667
1668 tbl.length = dict_size(servers)+1;
1669 tbl.width = 3;
1670 tbl.flags = TABLE_NO_FREE;
1671 tbl.contents = calloc(tbl.length, sizeof(*tbl.contents));
1672 tbl.contents[0] = calloc(tbl.width, sizeof(**tbl.contents));
1673 tbl.contents[0][0] = "Server Name";
1674 tbl.contents[0][1] = "Numeric";
1675 tbl.contents[0][2] = "Link Time";
1676 for (it=dict_first(servers), nn=1; it; it=iter_next(it)) {
1677 struct server *server = iter_data(it);
1678 char *buffer = malloc(64);
1679 int ofs;
1680
1681 tbl.contents[nn] = calloc(tbl.width, sizeof(**tbl.contents));
1682 tbl.contents[nn][0] = server->name;
1683 #ifdef WITH_PROTOCOL_P10
1684 sprintf(buffer, "%s (%ld)", server->numeric, base64toint(server->numeric, strlen(server->numeric)));
1685 #else
1686 buffer[0] = 0;
1687 #endif
1688 tbl.contents[nn][1] = buffer;
1689 ofs = strlen(buffer) + 1;
1690 intervalString(buffer + ofs, now - server->link, user->handle_info);
1691 if (server->self_burst)
1692 strcat(buffer + ofs, " Bursting");
1693 tbl.contents[nn][2] = buffer + ofs;
1694 nn++;
1695 }
1696 table_send(cmd->parent->bot, user->nick, 0, 0, tbl);
1697 for (nn=1; nn<tbl.length; nn++) {
1698 free((char*)tbl.contents[nn][1]);
1699 free(tbl.contents[nn]);
1700 }
1701 free(tbl.contents[0]);
1702 free(tbl.contents);
1703 return 1;
1704 }
1705
1706 static MODCMD_FUNC(cmd_stats_reserved) {
1707 dict_iterator_t it;
1708
1709 reply("OSMSG_RESERVED_LIST");
1710 for (it = dict_first(opserv_reserved_nick_dict); it; it = iter_next(it))
1711 send_message_type(4, user, cmd->parent->bot, "%s", iter_key(it));
1712 return 1;
1713 }
1714
1715 static MODCMD_FUNC(cmd_stats_trusted) {
1716 dict_iterator_t it;
1717 struct trusted_host *th;
1718 char length[INTERVALLEN], issued[INTERVALLEN], limit[32];
1719
1720 reply("OSMSG_TRUSTED_LIST");
1721 reply("OSMSG_TRUSTED_LIST_BAR");
1722 reply("OSMSG_TRUSTED_LIST_HEADER");
1723 reply("OSMSG_TRUSTED_LIST_BAR");
1724 if (argc > 1) {
1725 th = dict_find(opserv_trusted_hosts, argv[1], NULL);
1726 if (th) {
1727 if (th->issued)
1728 intervalString(issued, now - th->issued, user->handle_info);
1729 if (th->expires)
1730 intervalString(length, th->expires - now, user->handle_info);
1731 if (th->limit)
1732 sprintf(limit, "%lu", th->limit);
1733 reply("OSMSG_HOST_IS_TRUSTED",
1734 th->ipaddr,
1735 (th->limit ? limit : "none"),
1736 (th->issuer ? th->issuer : "<unknown>"),
1737 (th->issued ? issued : "some time"),
1738 (th->expires ? length : "never"));
1739 reply("OSMSG_HOST_IS_TRUSTED_DESC", (th->reason ? th->reason : "<unknown>"));
1740 } else {
1741 reply("OSMSG_HOST_NOT_TRUSTED", argv[1]);
1742 }
1743 } else {
1744 for (it = dict_first(opserv_trusted_hosts); it; it = iter_next(it)) {
1745 th = iter_data(it);
1746 if (th->issued)
1747 intervalString(issued, now - th->issued, user->handle_info);
1748 if (th->expires)
1749 intervalString(length, th->expires - now, user->handle_info);
1750 if (th->limit)
1751 sprintf(limit, "%lu", th->limit);
1752 reply("OSMSG_HOST_IS_TRUSTED", iter_key(it),
1753 (th->limit ? limit : "none"),
1754 (th->issuer ? th->issuer : "<unknown>"),
1755 (th->issued ? issued : "some time"),
1756 (th->expires ? length : "never"));
1757 reply("OSMSG_HOST_IS_TRUSTED_DESC", (th->reason ? th->reason : "<unknown>"));
1758 }
1759 }
1760 reply("OSMSG_TRUSTED_LIST_END");
1761 return 1;
1762 }
1763
1764 static MODCMD_FUNC(cmd_stats_uplink) {
1765 extern struct cManagerNode cManager;
1766 struct uplinkNode *uplink;
1767
1768 uplink = cManager.uplink;
1769 reply("OSMSG_UPLINK_START", uplink->name);
1770 reply("OSMSG_UPLINK_ADDRESS", uplink->host, uplink->port);
1771 return 1;
1772 }
1773
1774 static MODCMD_FUNC(cmd_stats_uptime) {
1775 char uptime[INTERVALLEN];
1776 struct tms buf;
1777 extern time_t boot_time;
1778 extern int lines_processed;
1779 static long clocks_per_sec;
1780
1781 if (!clocks_per_sec) {
1782 #if defined(HAVE_SYSCONF) && defined(_SC_CLK_TCK)
1783 clocks_per_sec = sysconf(_SC_CLK_TCK);
1784 if (clocks_per_sec <= 0)
1785 #endif
1786 {
1787 log_module(OS_LOG, LOG_ERROR, "Unable to query sysconf(_SC_CLK_TCK), output of 'stats uptime' will be wrong");
1788 clocks_per_sec = CLOCKS_PER_SEC;
1789 }
1790 }
1791 intervalString(uptime, time(NULL)-boot_time, user->handle_info);
1792 times(&buf);
1793 reply("OSMSG_UPTIME_STATS",
1794 uptime, lines_processed,
1795 buf.tms_utime/(double)clocks_per_sec,
1796 buf.tms_stime/(double)clocks_per_sec);
1797 return 1;
1798 }
1799
1800 static MODCMD_FUNC(cmd_stats_alerts) {
1801 dict_iterator_t it;
1802 struct opserv_user_alert *alert;
1803 const char *reaction;
1804
1805 reply("OSMSG_ALERTS_LIST");
1806 reply("OSMSG_ALERTS_BAR");
1807 reply("OSMSG_ALERTS_HEADER");
1808 reply("OSMSG_ALERTS_BAR");
1809 for (it = dict_first(opserv_user_alerts); it; it = iter_next(it)) {
1810 alert = iter_data(it);
1811 switch (alert->reaction) {
1812 case REACT_NOTICE: reaction = "notice"; break;
1813 case REACT_KILL: reaction = "kill"; break;
1814 case REACT_SILENT: reaction = "silent"; break;
1815 case REACT_GLINE: reaction = "gline"; break;
1816 case REACT_TRACK: reaction = "track"; break;
1817 case REACT_SHUN: reaction = "shun"; break;
1818 default: reaction = "<unknown>"; break;
1819 }
1820 reply("OSMSG_ALERT_IS", iter_key(it), reaction, alert->owner);
1821 reply("OSMSG_ALERTS_DESC", alert->text_discrim);
1822 }
1823 reply("OSMSG_ALERT_END");
1824 return 1;
1825 }
1826
1827 static MODCMD_FUNC(cmd_stats_gags) {
1828 struct gag_entry *gag;
1829 struct helpfile_table table;
1830 unsigned int nn;
1831
1832 if (!gagList) {
1833 reply("OSMSG_NO_GAGS");
1834 return 1;
1835 }
1836 for (nn=0, gag=gagList; gag; nn++, gag=gag->next) ;
1837 table.length = nn+1;
1838 table.width = 4;
1839 table.flags = TABLE_NO_FREE;
1840 table.contents = calloc(table.length, sizeof(char**));
1841 table.contents[0] = calloc(table.width, sizeof(char*));
1842 table.contents[0][0] = "Mask";
1843 table.contents[0][1] = "Owner";
1844 table.contents[0][2] = "Expires";
1845 table.contents[0][3] = "Reason";
1846 for (nn=1, gag=gagList; gag; nn++, gag=gag->next) {
1847 char expstr[INTERVALLEN];
1848 if (gag->expires)
1849 intervalString(expstr, gag->expires - now, user->handle_info);
1850 else
1851 strcpy(expstr, "Never");
1852 table.contents[nn] = calloc(table.width, sizeof(char*));
1853 table.contents[nn][0] = gag->mask;
1854 table.contents[nn][1] = gag->owner;
1855 table.contents[nn][2] = strdup(expstr);
1856 table.contents[nn][3] = gag->reason;
1857 }
1858 table_send(cmd->parent->bot, user->nick, 0, NULL, table);
1859 for (nn=1; nn<table.length; nn++) {
1860 free((char*)table.contents[nn][2]);
1861 free(table.contents[nn]);
1862 }
1863 free(table.contents[0]);
1864 free(table.contents);
1865 return 1;
1866 }
1867
1868 static MODCMD_FUNC(cmd_stats_timeq) {
1869 reply("OSMSG_TIMEQ_INFO", timeq_size(), timeq_next()-now);
1870 return 1;
1871 }
1872
1873 /*
1874 static MODCMD_FUNC(cmd_stats_warn) {
1875 dict_iterator_t it;
1876
1877 reply("OSMSG_WARN_LISTSTART");
1878 for (it=dict_first(opserv_chan_warn); it; it=iter_next(it))
1879 reply("OSMSG_WARN_LISTENTRY", iter_key(it), (char*)iter_data(it));
1880 reply("OSMSG_WARN_LISTEND");
1881 return 1;
1882 }
1883 */
1884
1885 #if defined(WITH_MALLOC_X3)
1886 static MODCMD_FUNC(cmd_stats_memory) {
1887 extern unsigned long alloc_count, alloc_size;
1888 send_message_type(MSG_TYPE_NOXLATE, user, cmd->parent->bot,
1889 "%u allocations totalling %u bytes.",
1890 alloc_count, alloc_size);
1891 return 1;
1892 }
1893 #elif defined(WITH_MALLOC_SLAB)
1894 static MODCMD_FUNC(cmd_stats_memory) {
1895 extern unsigned long slab_alloc_count, slab_count, slab_alloc_size;
1896 extern unsigned long big_alloc_count, big_alloc_size;
1897 send_message_type(MSG_TYPE_NOXLATE, user, cmd->parent->bot,
1898 "%u allocations in %u slabs totalling %u bytes.",
1899 slab_alloc_count, slab_count, slab_alloc_size);
1900 /* send_message_type(MSG_TYPE_NOXLATE, user, cmd->parent->bot,
1901 "%u big allocations totalling %u bytes.",
1902 */
1903 return 1;
1904 }
1905 #endif
1906
1907 static MODCMD_FUNC(cmd_dump)
1908 {
1909 char linedup[MAXLEN], original[MAXLEN];
1910
1911 unsplit_string(argv+1, argc-1, original);
1912 safestrncpy(linedup, original, sizeof(linedup));
1913 /* assume it's only valid IRC if we can parse it */
1914 if (parse_line(linedup, 1)) {
1915 irc_raw(original);
1916 reply("OSMSG_LINE_DUMPED");
1917 } else
1918 reply("OSMSG_RAW_PARSE_ERROR");
1919 return 1;
1920 }
1921
1922 static MODCMD_FUNC(cmd_raw)
1923 {
1924 char linedup[MAXLEN], original[MAXLEN];
1925
1926 unsplit_string(argv+1, argc-1, original);
1927 safestrncpy(linedup, original, sizeof(linedup));
1928 /* Try to parse the line before sending it; if it's too wrong,
1929 * maybe it will core us instead of our uplink. */
1930 parse_line(linedup, 1);
1931 irc_raw(original);
1932 reply("OSMSG_LINE_DUMPED");
1933 return 1;
1934 }
1935
1936 static struct userNode *
1937 opserv_add_reserve(struct svccmd *cmd, struct userNode *user, const char *nick, const char *ident, const char *host, const char *desc)
1938 {
1939 struct userNode *resv = GetUserH(nick);
1940 if (resv) {
1941 if (IsService(resv)) {
1942 reply("MSG_SERVICE_IMMUNE", resv->nick);
1943 return NULL;
1944 }
1945 if (resv->handle_info
1946 && resv->handle_info->opserv_level > user->handle_info->opserv_level) {
1947 reply("OSMSG_LEVEL_TOO_LOW");
1948 return NULL;
1949 }
1950 }
1951 if ((resv = AddClone(nick, ident, host, desc))) {
1952 dict_insert(opserv_reserved_nick_dict, resv->nick, resv);
1953 }
1954 return resv;
1955 }
1956
1957 static MODCMD_FUNC(cmd_collide)
1958 {
1959 struct userNode *resv;
1960
1961 resv = opserv_add_reserve(cmd, user, argv[1], argv[2], argv[3], unsplit_string(argv+4, argc-4, NULL));
1962 if (resv) {
1963 reply("OSMSG_COLLIDED_NICK", resv->nick);
1964 return 1;
1965 } else {
1966 reply("OSMSG_CLONE_FAILED", argv[1]);
1967 return 0;
1968 }
1969 }
1970
1971 static MODCMD_FUNC(cmd_reserve)
1972 {
1973 struct userNode *resv;
1974
1975 resv = opserv_add_reserve(cmd, user, argv[1], argv[2], argv[3], unsplit_string(argv+4, argc-4, NULL));
1976 if (resv) {
1977 resv->modes |= FLAGS_PERSISTENT;
1978 reply("OSMSG_RESERVED_NICK", resv->nick);
1979 return 1;
1980 } else {
1981 reply("OSMSG_CLONE_FAILED", argv[1]);
1982 return 0;
1983 }
1984 }
1985
1986 static int
1987 free_reserve(char *nick)
1988 {
1989 struct userNode *resv;
1990 unsigned int rlen;
1991 char *reason;
1992
1993 resv = dict_find(opserv_reserved_nick_dict, nick, NULL);
1994 if (!resv)
1995 return 0;
1996
1997 rlen = strlen(resv->nick)+strlen(OSMSG_PART_REASON);
1998 reason = alloca(rlen);
1999 snprintf(reason, rlen, OSMSG_PART_REASON, resv->nick);
2000 DelUser(resv, NULL, 1, reason);
2001 dict_remove(opserv_reserved_nick_dict, nick);
2002 return 1;
2003 }
2004
2005 static MODCMD_FUNC(cmd_unreserve)
2006 {
2007 if (free_reserve(argv[1]))
2008 reply("OSMSG_NICK_UNRESERVED", argv[1]);
2009 else
2010 reply("OSMSG_NOT_RESERVED", argv[1]);
2011 return 1;
2012 }
2013
2014 static void
2015 opserv_part_channel(void *data)
2016 {
2017 DelChannelUser(opserv, data, "Leaving.", 0);
2018 }
2019
2020 static int alert_check_user(const char *key, void *data, void *extra);
2021
2022 static int
2023 opserv_new_user_check(struct userNode *user)
2024 {
2025 struct opserv_hostinfo *ohi;
2026 struct gag_entry *gag;
2027 char addr[IRC_NTOP_MAX_SIZE];
2028
2029 /* Check to see if we should ignore them entirely. */
2030 if (IsLocal(user) || IsService(user))
2031 return 0;
2032
2033 /* Check for alerts, and stop if we find one that kills them. */
2034 if (dict_foreach(opserv_user_alerts, alert_check_user, user))
2035 return 1;
2036
2037 /* Gag them if appropriate. */
2038 for (gag = gagList; gag; gag = gag->next) {
2039 if (user_matches_glob(user, gag->mask, MATCH_USENICK)) {
2040 gag_helper_func(user, NULL);
2041 break;
2042 }
2043 }
2044
2045 /* Add to host info struct */
2046 irc_ntop(addr, sizeof(addr), &user->ip);
2047 if (!(ohi = dict_find(opserv_hostinfo_dict, addr, NULL))) {
2048 ohi = calloc(1, sizeof(*ohi));
2049 dict_insert(opserv_hostinfo_dict, strdup(addr), ohi);
2050 userList_init(&ohi->clients);
2051 }
2052 userList_append(&ohi->clients, user);
2053
2054 /* Only warn of new user floods outside of bursts. */
2055 if (!user->uplink->burst) {
2056 if (!policer_conforms(&opserv_conf.new_user_policer, now, 10)) {
2057 if (!new_user_flood) {
2058 new_user_flood = 1;
2059 opserv_alert("Warning: Possible new-user flood.");
2060 }
2061 } else {
2062 new_user_flood = 0;
2063 }
2064 }
2065
2066 /* Only warn or G-line if there's an untrusted max and their IP is sane. */
2067 if (opserv_conf.untrusted_max
2068 && irc_in_addr_is_valid(user->ip)
2069 && !irc_in_addr_is_loopback(user->ip)) {
2070 struct trusted_host *th = dict_find(opserv_trusted_hosts, addr, NULL);
2071 unsigned int limit = th ? th->limit : opserv_conf.untrusted_max;
2072 if (!limit) {
2073 /* 0 means unlimited hosts */
2074 } else if (ohi->clients.used == limit) {
2075 unsigned int nn;
2076 for (nn=0; nn<ohi->clients.used; nn++)
2077 send_message(ohi->clients.list[nn], opserv, "OSMSG_CLONE_WARNING");
2078 } else if (ohi->clients.used > limit) {
2079 char target[IRC_NTOP_MAX_SIZE + 3] = { '*', '@', '\0' };
2080 strcpy(target + 2, addr);
2081 gline_add(opserv->nick, target, opserv_conf.clone_gline_duration, "Excessive connections from a single host.", now, 1, 1);
2082 }
2083 }
2084
2085 return 0;
2086 }
2087
2088 static void
2089 opserv_user_cleanup(struct userNode *user, UNUSED_ARG(struct userNode *killer), UNUSED_ARG(const char *why))
2090 {
2091 struct opserv_hostinfo *ohi;
2092 char addr[IRC_NTOP_MAX_SIZE];
2093
2094 if (IsLocal(user)) {
2095 /* Try to remove it from the reserved nick dict without
2096 * calling free_reserve, because that would call DelUser(),
2097 * and we'd loop back to here. */
2098 dict_remove(opserv_reserved_nick_dict, user->nick);
2099 return;
2100 }
2101 irc_ntop(addr, sizeof(addr), &user->ip);
2102 if ((ohi = dict_find(opserv_hostinfo_dict, addr, NULL))) {
2103 userList_remove(&ohi->clients, user);
2104 if (ohi->clients.used == 0)
2105 dict_remove(opserv_hostinfo_dict, addr);
2106 }
2107 }
2108
2109 int
2110 opserv_bad_channel(const char *name)
2111 {
2112 unsigned int found;
2113 int present;
2114
2115 dict_find(opserv_exempt_channels, name, &present);
2116 if (present)
2117 return 0;
2118
2119 if (gline_find(name))
2120 return 1;
2121
2122 for (found=0; found<opserv_bad_words->used; ++found)
2123 if (irccasestr(name, opserv_bad_words->list[found]))
2124 return 1;
2125
2126 return 0;
2127 }
2128
2129 static void
2130 opserv_shutdown_channel(struct chanNode *channel, const char *reason)
2131 {
2132 struct mod_chanmode *change;
2133 unsigned int nn;
2134
2135 change = mod_chanmode_alloc(2);
2136 change->modes_set = MODE_SECRET | MODE_INVITEONLY;
2137 change->args[0].mode = MODE_CHANOP;
2138 change->args[0].u.member = AddChannelUser(opserv, channel);
2139 change->args[1].mode = MODE_BAN;
2140 change->args[1].u.hostmask = "*!*@*";
2141 mod_chanmode_announce(opserv, channel, change);
2142 mod_chanmode_free(change);
2143 for (nn=channel->members.used; nn>0; ) {
2144 struct modeNode *mNode = channel->members.list[--nn];
2145 if (IsService(mNode->user))
2146 continue;
2147 KickChannelUser(mNode->user, channel, opserv, user_find_message(mNode->user, reason));
2148 }
2149 timeq_add(now + opserv_conf.purge_lock_delay, opserv_part_channel, channel);
2150 }
2151
2152 static void
2153 opserv_channel_check(struct chanNode *newchan)
2154 {
2155 /*char *warning; */
2156
2157 if (!newchan->join_policer.params) {
2158 newchan->join_policer.last_req = now;
2159 newchan->join_policer.params = opserv_conf.join_policer_params;
2160 }
2161 /*
2162 if ((warning = dict_find(opserv_chan_warn, newchan->name, NULL))) {
2163 char message[MAXLEN];
2164 snprintf(message, sizeof(message), "Channel activity warning for channel %s: %s", newchan->name, warning);
2165 global_message(MESSAGE_RECIPIENT_OPERS, message);
2166 }
2167 */
2168
2169 /* Wait until the join check to shut channels down. */
2170 newchan->bad_channel = opserv_bad_channel(newchan->name);
2171 }
2172
2173 static void
2174 opserv_channel_delete(struct chanNode *chan)
2175 {
2176 timeq_del(0, opserv_part_channel, chan, TIMEQ_IGNORE_WHEN);
2177 }
2178
2179 static int
2180 opserv_join_check(struct modeNode *mNode)
2181 {
2182 struct userNode *user = mNode->user;
2183 struct chanNode *channel = mNode->channel;
2184 const char *msg;
2185
2186 if (IsService(user))
2187 return 0;
2188
2189 dict_foreach(opserv_channel_alerts, alert_check_user, user);
2190
2191 if (channel->bad_channel) {
2192 opserv_debug("Found $b%s$b in bad-word channel $b%s$b; removing the user.", user->nick, channel->name);
2193 if (channel->name[0] != '#')
2194 DelUser(user, opserv, 1, "OSMSG_ILLEGAL_KILL_REASON");
2195 else if (!GetUserMode(channel, opserv))
2196 opserv_shutdown_channel(channel, "OSMSG_ILLEGAL_REASON");
2197 else {
2198 send_message(user, opserv, "OSMSG_ILLEGAL_CHANNEL", channel->name);
2199 msg = user_find_message(user, "OSMSG_ILLEGAL_REASON");
2200 KickChannelUser(user, channel, opserv, msg);
2201 }
2202 return 1;
2203 }
2204
2205 if (user->uplink->burst)
2206 return 0;
2207 if (policer_conforms(&channel->join_policer, now, 1.0)) {
2208 channel->join_flooded = 0;
2209 return 0;
2210 }
2211 if (!channel->join_flooded) {
2212 /* Don't moderate the channel unless it is activated and
2213 the number of users in the channel is over the threshold. */
2214 struct mod_chanmode change;
2215 mod_chanmode_init(&change);
2216 channel->join_flooded = 1;
2217 if (opserv_conf.join_flood_moderate && (channel->members.used > opserv_conf.join_flood_moderate_threshold)) {
2218 if (!GetUserMode(channel, opserv)) {
2219 /* If we aren't in the channel, join it. */
2220 change.args[0].mode = MODE_CHANOP;
2221 change.args[0].u.member = AddChannelUser(opserv, channel);
2222 change.argc++;
2223 }
2224 if (!(channel->modes & MODE_MODERATED))
2225 change.modes_set |= MODE_MODERATED;
2226 if (change.modes_set || change.argc)
2227 mod_chanmode_announce(opserv, channel, &change);
2228 send_target_message(0, channel->name, opserv, "OSMSG_FLOOD_MODERATE");
2229 opserv_alert("Warning: Possible join flood in %s (currently %d users; channel moderated).", channel->name, channel->members.used);
2230 } else {
2231 opserv_alert("Warning: Possible join flood in %s (currently %d users).", channel->name, channel->members.used);
2232 }
2233 }
2234 log_module(OS_LOG, LOG_INFO, "Join to %s during flood: "IDENT_FORMAT, channel->name, IDENT_DATA(user));
2235 return 0;
2236 }
2237
2238 static int
2239 opserv_add_bad_word(struct svccmd *cmd, struct userNode *user, const char *new_bad) {
2240 unsigned int bad_idx;
2241
2242 for (bad_idx = 0; bad_idx < opserv_bad_words->used; ++bad_idx) {
2243 char *orig_bad = opserv_bad_words->list[bad_idx];
2244 if (irccasestr(new_bad, orig_bad)) {
2245 if (user)
2246 reply("OSMSG_BAD_REDUNDANT", new_bad, orig_bad);
2247 return 0;
2248 } else if (irccasestr(orig_bad, new_bad)) {
2249 if (user)
2250 reply("OSMSG_BAD_GROWING", orig_bad, new_bad);
2251 free(orig_bad);
2252 opserv_bad_words->list[bad_idx] = strdup(new_bad);
2253 for (bad_idx++; bad_idx < opserv_bad_words->used; bad_idx++) {
2254 orig_bad = opserv_bad_words->list[bad_idx];
2255 if (!irccasestr(orig_bad, new_bad))
2256 continue;
2257 if (user)
2258 reply("OSMSG_BAD_NUKING", orig_bad);
2259 string_list_delete(opserv_bad_words, bad_idx);
2260 bad_idx--;
2261 free(orig_bad);
2262 }
2263 return 1;
2264 }
2265 }
2266 string_list_append(opserv_bad_words, strdup(new_bad));
2267 if (user)
2268 reply("OSMSG_ADDED_BAD", new_bad);
2269 return 1;
2270 }
2271
2272 static MODCMD_FUNC(cmd_addbad)
2273 {
2274 unsigned int arg, count;
2275 dict_iterator_t it;
2276 int bad_found, exempt_found;
2277
2278 /* Create the bad word if it doesn't exist. */
2279 bad_found = !opserv_add_bad_word(cmd, user, argv[1]);
2280
2281 /* Look for exception modifiers. */
2282 for (arg=2; arg<argc; arg++) {
2283 if (!irccasecmp(argv[arg], "except")) {
2284 reply("MSG_DEPRECATED_COMMAND", "addbad ... except", "addexempt");
2285 if (++arg > argc) {
2286 reply("MSG_MISSING_PARAMS", "except");
2287 break;
2288 }
2289 for (count = 0; (arg < argc) && IsChannelName(argv[arg]); arg++) {
2290 dict_find(opserv_exempt_channels, argv[arg], &exempt_found);
2291 if (!exempt_found) {
2292 dict_insert(opserv_exempt_channels, strdup(argv[arg]), NULL);
2293 count++;
2294 }
2295 }
2296 reply("OSMSG_ADDED_EXEMPTIONS", count);
2297 } else {
2298 reply("MSG_DEPRECATED_COMMAND", "addbad (with modifiers)", "addbad");
2299 reply("OSMSG_BAD_MODIFIER", argv[arg]);
2300 }
2301 }
2302
2303 /* Scan for existing channels that match the new bad word. */
2304 if (!bad_found) {
2305 for (it = dict_first(channels); it; it = iter_next(it)) {
2306 struct chanNode *channel = iter_data(it);
2307
2308 if (!opserv_bad_channel(channel->name))
2309 continue;
2310 channel->bad_channel = 1;
2311 if (channel->name[0] == '#')
2312 opserv_shutdown_channel(channel, "OSMSG_ILLEGAL_REASON");
2313 else {
2314 unsigned int nn;
2315 for (nn=0; nn<channel->members.used; nn++) {
2316 struct userNode *user = channel->members.list[nn]->user;
2317 DelUser(user, cmd->parent->bot, 1, "OSMSG_ILLEGAL_KILL_REASON");
2318 }
2319 }
2320 }
2321 }
2322
2323 return 1;
2324 }
2325
2326 static MODCMD_FUNC(cmd_delbad)
2327 {
2328 dict_iterator_t it;
2329 unsigned int nn;
2330
2331 for (nn=0; nn<opserv_bad_words->used; nn++) {
2332 if (!irccasecmp(opserv_bad_words->list[nn], argv[1])) {
2333 string_list_delete(opserv_bad_words, nn);
2334 for (it = dict_first(channels); it; it = iter_next(it)) {
2335 channel = iter_data(it);
2336 if (irccasestr(channel->name, argv[1])
2337 && !opserv_bad_channel(channel->name)) {
2338 DelChannelUser(cmd->parent->bot, channel, "Channel name no longer contains a bad word.", 1);
2339 timeq_del(0, opserv_part_channel, channel, TIMEQ_IGNORE_WHEN);
2340 channel->bad_channel = 0;
2341 }
2342 }
2343 reply("OSMSG_REMOVED_BAD", argv[1]);
2344 return 1;
2345 }
2346 }
2347 reply("OSMSG_NOT_BAD_WORD", argv[1]);
2348 return 0;
2349 }
2350
2351 static MODCMD_FUNC(cmd_addexempt)
2352 {
2353 const char *chanName;
2354
2355 if ((argc > 1) && IsChannelName(argv[1])) {
2356 chanName = argv[1];
2357 } else {
2358 reply("MSG_NOT_CHANNEL_NAME");
2359 OPSERV_SYNTAX();
2360 return 0;
2361 }
2362 dict_insert(opserv_exempt_channels, strdup(chanName), NULL);
2363 channel = GetChannel(chanName);
2364 if (channel) {
2365 if (channel->bad_channel) {
2366 DelChannelUser(cmd->parent->bot, channel, "Channel is now exempt from bad-word checking.", 1);
2367 timeq_del(0, opserv_part_channel, channel, TIMEQ_IGNORE_WHEN);
2368 }
2369 channel->bad_channel = 0;
2370 }
2371 reply("OSMSG_ADDED_EXEMPTION", chanName);
2372 return 1;
2373 }
2374
2375 static MODCMD_FUNC(cmd_delexempt)
2376 {
2377 const char *chanName;
2378
2379 if ((argc > 1) && IsChannelName(argv[1])) {
2380 chanName = argv[1];
2381 } else {
2382 reply("MSG_NOT_CHANNEL_NAME");
2383 OPSERV_SYNTAX();
2384 return 0;
2385 }
2386 if (!dict_remove(opserv_exempt_channels, chanName)) {
2387 reply("OSMSG_NOT_EXEMPT", chanName);
2388 return 0;
2389 }
2390 reply("OSMSG_REMOVED_EXEMPTION", chanName);
2391 return 1;
2392 }
2393
2394 static void
2395 opserv_expire_trusted_host(void *data)
2396 {
2397 struct trusted_host *th = data;
2398 dict_remove(opserv_trusted_hosts, th->ipaddr);
2399 }
2400
2401 static void
2402 opserv_add_trusted_host(const char *ipaddr, unsigned int limit, const char *issuer, time_t issued, time_t expires, const char *reason)
2403 {
2404 struct trusted_host *th;
2405 th = calloc(1, sizeof(*th));
2406 if (!th)
2407 return;
2408 th->ipaddr = strdup(ipaddr);
2409 th->reason = reason ? strdup(reason) : NULL;
2410 th->issuer = issuer ? strdup(issuer) : NULL;
2411 th->issued = issued;
2412 th->limit = limit;
2413 th->expires = expires;
2414 dict_insert(opserv_trusted_hosts, th->ipaddr, th);
2415 if (th->expires)
2416 timeq_add(th->expires, opserv_expire_trusted_host, th);
2417 }
2418
2419 static void
2420 free_trusted_host(void *data)
2421 {
2422 struct trusted_host *th = data;
2423 free(th->ipaddr);
2424 free(th->reason);
2425 free(th->issuer);
2426 free(th);
2427 }
2428
2429 static MODCMD_FUNC(cmd_addtrust)
2430 {
2431 unsigned long interval;
2432 char *reason, *tmp;
2433 irc_in_addr_t tmpaddr;
2434 unsigned int count;
2435
2436 if (dict_find(opserv_trusted_hosts, argv[1], NULL)) {
2437 reply("OSMSG_ALREADY_TRUSTED", argv[1]);
2438 return 0;
2439 }
2440
2441 if (!irc_pton(&tmpaddr, NULL, argv[1])) {
2442 reply("OSMSG_BAD_IP", argv[1]);
2443 return 0;
2444 }
2445
2446 count = strtoul(argv[2], &tmp, 10);
2447 if (*tmp != '\0') {
2448 reply("OSMSG_BAD_NUMBER", argv[2]);
2449 return 0;
2450 }
2451
2452 interval = ParseInterval(argv[3]);
2453 if (!interval && strcmp(argv[3], "0")) {
2454 reply("MSG_INVALID_DURATION", argv[3]);
2455 return 0;
2456 }
2457
2458 reason = unsplit_string(argv+4, argc-4, NULL);
2459 opserv_add_trusted_host(argv[1], count, user->handle_info->handle, now, interval ? (now + interval) : 0, reason);
2460 reply("OSMSG_ADDED_TRUSTED");
2461 return 1;
2462 }
2463
2464 static MODCMD_FUNC(cmd_edittrust)
2465 {
2466 unsigned long interval;
2467 struct trusted_host *th;
2468 char *reason, *tmp;
2469 unsigned int count;
2470
2471 th = dict_find(opserv_trusted_hosts, argv[1], NULL);
2472 if (!th) {
2473 reply("OSMSG_NOT_TRUSTED", argv[1]);
2474 return 0;
2475 }
2476 count = strtoul(argv[2], &tmp, 10);
2477 if (!count || *tmp) {
2478 reply("OSMSG_BAD_NUMBER", argv[2]);
2479 return 0;
2480 }
2481 interval = ParseInterval(argv[3]);
2482 if (!interval && strcmp(argv[3], "0")) {
2483 reply("MSG_INVALID_DURATION", argv[3]);
2484 return 0;
2485 }
2486 reason = unsplit_string(argv+4, argc-4, NULL);
2487 if (th->expires)
2488 timeq_del(th->expires, opserv_expire_trusted_host, th, 0);
2489
2490 free(th->reason);
2491 th->reason = strdup(reason);
2492 free(th->issuer);
2493 th->issuer = strdup(user->handle_info->handle);
2494 th->issued = now;
2495 th->limit = count;
2496 if (interval) {
2497 th->expires = now + interval;
2498 timeq_add(th->expires, opserv_expire_trusted_host, th);
2499 } else
2500 th->expires = 0;
2501 reply("OSMSG_UPDATED_TRUSTED", th->ipaddr);
2502 return 1;
2503 }
2504
2505 static MODCMD_FUNC(cmd_deltrust)
2506 {
2507 unsigned int n;
2508
2509 for (n=1; n<argc; n++) {
2510 struct trusted_host *th = dict_find(opserv_trusted_hosts, argv[n], NULL);
2511 if (!th)
2512 continue;
2513 if (th->expires)
2514 timeq_del(th->expires, opserv_expire_trusted_host, th, 0);
2515 dict_remove(opserv_trusted_hosts, argv[n]);
2516 }
2517 reply("OSMSG_REMOVED_TRUSTED");
2518 return 1;
2519 }
2520
2521 /* This doesn't use dict_t because it's a little simpler to open-code the
2522 * comparisons (and simpler arg-passing for the ADD subcommand).
2523 */
2524 static MODCMD_FUNC(cmd_clone)
2525 {
2526 int i;
2527 struct userNode *clone;
2528
2529 clone = GetUserH(argv[2]);
2530 if (!irccasecmp(argv[1], "ADD")) {
2531 char *userinfo;
2532 char ident[USERLEN+1];
2533
2534 if (argc < 5) {
2535 reply("MSG_MISSING_PARAMS", argv[1]);
2536 OPSERV_SYNTAX();
2537 return 0;
2538 }
2539 if (clone) {
2540 reply("OSMSG_CLONE_EXISTS", argv[2]);
2541 return 0;
2542 }
2543 userinfo = unsplit_string(argv+4, argc-4, NULL);
2544 for (i=0; argv[3][i] && (i<USERLEN); i++) {
2545 if (argv[3][i] == '@') {
2546 ident[i++] = 0;
2547 break;
2548 } else {
2549 ident[i] = argv[3][i];
2550 }
2551 }
2552 if (!argv[3][i] || (i==USERLEN)) {
2553 reply("OSMSG_NOT_A_HOSTMASK");
2554 return 0;
2555 }
2556 if (!(clone = AddClone(argv[2], ident, argv[3]+i, userinfo))) {
2557 reply("OSMSG_CLONE_FAILED", argv[2]);
2558 return 0;
2559 }
2560 reply("OSMSG_CLONE_ADDED", clone->nick);
2561 return 1;
2562 }
2563 if (!clone) {
2564 reply("MSG_NICK_UNKNOWN", argv[2]);
2565 return 0;
2566 }
2567 if (clone->uplink != self || IsService(clone)) {
2568 reply("OSMSG_NOT_A_CLONE", clone->nick);
2569 return 0;
2570 }
2571 if (!irccasecmp(argv[1], "REMOVE")) {
2572 const char *reason;
2573 if (argc > 3) {
2574 reason = unsplit_string(argv+3, argc-3, NULL);
2575 } else {
2576 char *tmp;
2577 tmp = alloca(strlen(clone->nick) + strlen(OSMSG_PART_REASON));
2578 sprintf(tmp, OSMSG_PART_REASON, clone->nick);
2579 reason = tmp;
2580 }
2581 DelUser(clone, NULL, 1, reason);
2582 reply("OSMSG_CLONE_REMOVED", argv[2]);
2583 return 1;
2584 }
2585 if (argc < 4) {
2586 reply("MSG_MISSING_PARAMS", argv[1]);
2587 OPSERV_SYNTAX();
2588 return 0;
2589 }
2590 channel = GetChannel(argv[3]);
2591 if (!irccasecmp(argv[1], "JOIN")) {
2592 if (!channel
2593 && !(channel = AddChannel(argv[3], now, NULL, NULL, NULL))) {
2594 reply("MSG_CHANNEL_UNKNOWN", argv[3]);
2595 return 0;
2596 }
2597 AddChannelUser(clone, channel);
2598 reply("OSMSG_CLONE_JOINED", clone->nick, channel->name);
2599 return 1;
2600 }
2601 if (!irccasecmp(argv[1], "PART")) {
2602 if (!channel) {
2603 reply("MSG_CHANNEL_UNKNOWN", argv[3]);
2604 return 0;
2605 }
2606 if (!GetUserMode(channel, clone)) {
2607 reply("OSMSG_NOT_ON_CHANNEL", clone->nick, channel->name);
2608 return 0;
2609 }
2610 reply("OSMSG_CLONE_PARTED", clone->nick, channel->name);
2611 DelChannelUser(clone, channel, "Leaving.", 0);
2612 return 1;
2613 }
2614 if (!irccasecmp(argv[1], "OP")) {
2615 struct mod_chanmode change;
2616 if (!channel) {
2617 reply("MSG_CHANNEL_UNKNOWN", argv[3]);
2618 return 0;
2619 }
2620 mod_chanmode_init(&change);
2621 change.argc = 1;
2622 change.args[0].mode = MODE_CHANOP;
2623 change.args[0].u.member = GetUserMode(channel, clone);
2624 if (!change.args[0].u.member) {
2625 reply("OSMSG_NOT_ON_CHANNEL", clone->nick, channel->name);
2626 return 0;
2627 }
2628 modcmd_chanmode_announce(&change);
2629 reply("OSMSG_OPS_GIVEN", channel->name, clone->nick);
2630 return 1;
2631 }
2632 if (!irccasecmp(argv[1], "HOP")) {
2633 struct mod_chanmode change;
2634 if (!channel) {
2635 reply("MSG_CHANNEL_UNKNOWN", argv[3]);
2636 return 0;
2637 }
2638 mod_chanmode_init(&change);
2639 change.argc = 1;
2640 change.args[0].mode = MODE_HALFOP;
2641 change.args[0].u.member = GetUserMode(channel, clone);
2642 if (!change.args[0].u.member) {
2643 reply("OSMSG_NOT_ON_CHANNEL", clone->nick, channel->name);
2644 return 0;
2645 }
2646 modcmd_chanmode_announce(&change);
2647 reply("OSMSG_HOPS_GIVEN", channel->name, clone->nick);
2648 return 1;
2649 }
2650 if (argc < 5) {
2651 reply("MSG_MISSING_PARAMS", argv[1]);
2652 OPSERV_SYNTAX();
2653 return 0;
2654 }
2655 if (!irccasecmp(argv[1], "SAY")) {
2656 char *text = unsplit_string(argv+4, argc-4, NULL);
2657 irc_privmsg(clone, argv[3], text);
2658 reply("OSMSG_CLONE_SAID", clone->nick, argv[3]);
2659 return 1;
2660 }
2661 reply("OSMSG_UNKNOWN_SUBCOMMAND", argv[1], argv[0]);
2662 return 0;
2663 }
2664
2665 static struct helpfile_expansion
2666 opserv_help_expand(const char *variable)
2667 {
2668 extern struct userNode *message_source;
2669 struct helpfile_expansion exp;
2670 struct service *service;
2671 struct svccmd *cmd;
2672 dict_iterator_t it;
2673 int row;
2674 unsigned int level;
2675
2676 if (!(service = service_find(message_source->nick))) {
2677 exp.type = HF_STRING;
2678 exp.value.str = NULL;
2679 } else if (!irccasecmp(variable, "index")) {
2680 exp.type = HF_TABLE;
2681 exp.value.table.length = 1;
2682 exp.value.table.width = 2;
2683 exp.value.table.flags = TABLE_REPEAT_HEADERS | TABLE_REPEAT_ROWS;
2684 exp.value.table.contents = calloc(dict_size(service->commands)+1, sizeof(char**));
2685 exp.value.table.contents[0] = calloc(exp.value.table.width, sizeof(char*));
2686 exp.value.table.contents[0][0] = "Command";
2687 exp.value.table.contents[0][1] = "Level";
2688 for (it=dict_first(service->commands); it; it=iter_next(it)) {
2689 cmd = iter_data(it);
2690 row = exp.value.table.length++;
2691 exp.value.table.contents[row] = calloc(exp.value.table.width, sizeof(char*));
2692 exp.value.table.contents[row][0] = iter_key(it);
2693 level = cmd->min_opserv_level;
2694 if (!level_strings[level]) {
2695 level_strings[level] = malloc(16);
2696 snprintf(level_strings[level], 16, "%3d", level);
2697 }
2698 exp.value.table.contents[row][1] = level_strings[level];
2699 }
2700 } else if (!strncasecmp(variable, "level", 5)) {
2701 cmd = dict_find(service->commands, variable+6, NULL);
2702 exp.type = HF_STRING;
2703 if (cmd) {
2704 level = cmd->min_opserv_level;
2705 exp.value.str = malloc(16);
2706 snprintf(exp.value.str, 16, "%3d", level);
2707 } else {
2708 exp.value.str = NULL;
2709 }
2710 } else {
2711 exp.type = HF_STRING;
2712 exp.value.str = NULL;
2713 }
2714 return exp;
2715 }
2716
2717 struct modcmd *
2718 opserv_define_func(const char *name, modcmd_func_t *func, int min_level, int reqchan, int min_argc)
2719 {
2720 char buf[16], *flags = NULL;
2721 unsigned int iflags = 0;
2722 sprintf(buf, "%d", min_level);
2723 switch (reqchan) {
2724 case 1: flags = "+acceptchan"; break;
2725 case 3: flags = "+acceptpluschan"; /* fall through */
2726 case 2: iflags = MODCMD_REQUIRE_CHANNEL; break;
2727 }
2728 if (flags) {
2729 return modcmd_register(opserv_module, name, func, min_argc, iflags, "level", buf, "flags", flags, "flags", "+oper", NULL);
2730 } else {
2731 return modcmd_register(opserv_module, name, func, min_argc, iflags, "level", buf, "flags", "+oper", NULL);
2732 }
2733 }
2734
2735 int add_reserved(const char *key, void *data, void *extra)
2736 {
2737 struct record_data *rd = data;
2738 const char *ident, *hostname, *desc;
2739 struct userNode *reserve;
2740 ident = database_get_data(rd->d.object, KEY_IDENT, RECDB_QSTRING);
2741 if (!ident) {
2742 log_module(OS_LOG, LOG_ERROR, "Missing ident for reserve of %s", key);
2743 return 0;
2744 }
2745 hostname = database_get_data(rd->d.object, KEY_HOSTNAME, RECDB_QSTRING);
2746 if (!hostname) {
2747 log_module(OS_LOG, LOG_ERROR, "Missing hostname for reserve of %s", key);
2748 return 0;
2749 }
2750 desc = database_get_data(rd->d.object, KEY_DESC, RECDB_QSTRING);
2751 if (!desc) {
2752 log_module(OS_LOG, LOG_ERROR, "Missing description for reserve of %s", key);
2753 return 0;
2754 }
2755 if ((reserve = AddClone(key, ident, hostname, desc))) {
2756 reserve->modes |= FLAGS_PERSISTENT;
2757 dict_insert(extra, reserve->nick, reserve);
2758 }
2759 return 0;
2760 }
2761
2762 static unsigned int
2763 foreach_matching_user(const char *hostmask, discrim_search_func func, void *extra)
2764 {
2765 discrim_t discrim;
2766 char *dupmask;
2767 unsigned int matched;
2768
2769 if (!self->uplink) return 0;
2770 discrim = calloc(1, sizeof(*discrim));
2771 discrim->limit = dict_size(clients);
2772 discrim->max_level = ~0;
2773 discrim->max_ts = now;
2774 discrim->max_channels = INT_MAX;
2775 discrim->authed = -1;
2776 discrim->info_space = -1;
2777 discrim->intra_scmp = 0;
2778 discrim->intra_dcmp = 0;
2779 discrim->use_regex = 0;
2780 dupmask = strdup(hostmask);
2781 if (split_ircmask(dupmask, &discrim->mask_nick, &discrim->mask_ident, &discrim->mask_host)) {
2782 if (!irc_pton(&discrim->ip_mask, &discrim->ip_mask_bits, discrim->mask_host))
2783 discrim->ip_mask_bits = 0;
2784 matched = opserv_discrim_search(discrim, func, extra);
2785 } else {
2786 log_module(OS_LOG, LOG_ERROR, "Couldn't split IRC mask for gag %s!", hostmask);
2787 matched = 0;
2788 }
2789 free(discrim);
2790 free(dupmask);
2791 return matched;
2792 }
2793
2794 static unsigned int
2795 gag_free(struct gag_entry *gag)
2796 {
2797 unsigned int ungagged;
2798
2799 /* Remove from gag list */
2800 if (gagList == gag) {
2801 gagList = gag->next;
2802 } else {
2803 struct gag_entry *prev;
2804 for (prev = gagList; prev->next != gag; prev = prev->next) ;
2805 prev->next = gag->next;
2806 }
2807
2808 ungagged = foreach_matching_user(gag->mask, ungag_helper_func, NULL);
2809
2810 /* Deallocate storage */
2811 free(gag->reason);
2812 free(gag->owner);
2813 free(gag->mask);
2814 free(gag);
2815
2816 return ungagged;
2817 }
2818
2819 static void
2820 gag_expire(void *data)
2821 {
2822 gag_free(data);
2823 }
2824
2825 unsigned int
2826 gag_create(const char *mask, const char *owner, const char *reason, time_t expires)
2827 {
2828 struct gag_entry *gag;
2829
2830 /* Create gag and put it into linked list */
2831 gag = calloc(1, sizeof(*gag));
2832 gag->mask = strdup(mask);
2833 gag->owner = strdup(owner ? owner : "<unknown>");
2834 gag->reason = strdup(reason ? reason : "<unknown>");
2835 gag->expires = expires;
2836 if (gag->expires)
2837 timeq_add(gag->expires, gag_expire, gag);
2838 gag->next = gagList;
2839 gagList = gag;
2840
2841 /* If we're linked, see if who the gag applies to */
2842 return foreach_matching_user(mask, gag_helper_func, gag);
2843 }
2844
2845 static int
2846 add_gag_helper(const char *key, void *data, UNUSED_ARG(void *extra))
2847 {
2848 struct record_data *rd = data;
2849 char *owner, *reason, *expstr;
2850 time_t expires;
2851
2852 owner = database_get_data(rd->d.object, KEY_OWNER, RECDB_QSTRING);
2853 reason = database_get_data(rd->d.object, KEY_REASON, RECDB_QSTRING);
2854 expstr = database_get_data(rd->d.object, KEY_EXPIRES, RECDB_QSTRING);
2855 expires = expstr ? strtoul(expstr, NULL, 0) : 0;
2856 gag_create(key, owner, reason, expires);
2857
2858 return 0;
2859 }
2860
2861 static struct opserv_user_alert *
2862 opserv_add_user_alert(struct userNode *req, const char *name, opserv_alert_reaction reaction, const char *text_discrim)
2863 {
2864 unsigned int wordc;
2865 char *wordv[MAXNUMPARAMS], *discrim_copy;
2866 struct opserv_user_alert *alert;
2867 char *name_dup;
2868
2869 if (dict_find(opserv_user_alerts, name, NULL)) {
2870 send_message(req, opserv, "OSMSG_ALERT_EXISTS", name);
2871 return NULL;
2872 }
2873 alert = malloc(sizeof(*alert));
2874 alert->owner = strdup(req->handle_info ? req->handle_info->handle : req->nick);
2875 alert->text_discrim = strdup(text_discrim);
2876 discrim_copy = strdup(text_discrim); /* save a copy of the discrim */
2877 wordc = split_line(discrim_copy, false, ArrayLength(wordv), wordv);
2878 alert->discrim = opserv_discrim_create(req, opserv, wordc, wordv, 0);
2879 if (!alert->discrim) {
2880 free(alert->text_discrim);
2881 free(discrim_copy);
2882 free(alert);
2883 return NULL;
2884 }
2885 alert->split_discrim = discrim_copy;
2886 name_dup = strdup(name);
2887 if (!alert->discrim->reason)
2888 alert->discrim->reason = strdup(name);
2889 alert->reaction = reaction;
2890 dict_insert(opserv_user_alerts, name_dup, alert);
2891 /* Stick the alert into the appropriate additional alert dict(s).
2892 * For channel alerts, we only use channels and min_channels;
2893 * max_channels would have to be checked on /part, which we do not
2894 * yet do, and which seems of questionable value.
2895 */
2896 if (alert->discrim->channel || alert->discrim->min_channels)
2897 dict_insert(opserv_channel_alerts, name_dup, alert);
2898 if (alert->discrim->mask_nick)
2899 dict_insert(opserv_nick_based_alerts, name_dup, alert);
2900 return alert;
2901 }
2902
2903 /*
2904 static int
2905 add_chan_warn(const char *key, void *data, UNUSED_ARG(void *extra))
2906 {
2907 struct record_data *rd = data;
2908 char *reason = GET_RECORD_QSTRING(rd);
2909
2910 * i hope this can't happen *
2911 if (!reason)
2912 reason = "No Reason";
2913
2914 dict_insert(opserv_chan_warn, strdup(key), strdup(reason));
2915 return 0;
2916 }
2917 */
2918
2919 static int
2920 add_user_alert(const char *key, void *data, UNUSED_ARG(void *extra))
2921 {
2922 dict_t alert_dict;
2923 const char *discrim, *react, *owner;
2924 opserv_alert_reaction reaction;
2925 struct opserv_user_alert *alert;
2926
2927 if (!(alert_dict = GET_RECORD_OBJECT((struct record_data *)data))) {
2928 log_module(OS_LOG, LOG_ERROR, "Bad type (not a record) for alert %s.", key);
2929 return 1;
2930 }
2931 discrim = database_get_data(alert_dict, KEY_DISCRIM, RECDB_QSTRING);
2932 react = database_get_data(alert_dict, KEY_REACTION, RECDB_QSTRING);
2933 if (!react || !irccasecmp(react, "notice"))
2934 reaction = REACT_NOTICE;
2935 else if (!irccasecmp(react, "kill"))
2936 reaction = REACT_KILL;
2937 else if (!irccasecmp(react, "silent"))
2938 reaction = REACT_SILENT;
2939 else if (!irccasecmp(react, "gline"))
2940 reaction = REACT_GLINE;
2941 else if (!irccasecmp(react, "track"))
2942 reaction = REACT_TRACK;
2943 else if (!irccasecmp(react, "shun"))
2944 reaction = REACT_SHUN;
2945 else {
2946 log_module(OS_LOG, LOG_ERROR, "Invalid reaction %s for alert %s.", react, key);
2947 return 0;
2948 }
2949 alert = opserv_add_user_alert(opserv, key, reaction, discrim);
2950 if (!alert) {
2951 log_module(OS_LOG, LOG_ERROR, "Unable to create alert %s from database.", key);
2952 return 0;
2953 }
2954 owner = database_get_data(alert_dict, KEY_OWNER, RECDB_QSTRING);
2955 free(alert->owner);
2956 alert->owner = strdup(owner ? owner : "<unknown>");
2957 return 0;
2958 }
2959
2960 static int
2961 trusted_host_read(const char *host, void *data, UNUSED_ARG(void *extra))
2962 {
2963 struct record_data *rd = data;
2964 const char *limit, *str, *reason, *issuer;
2965 time_t issued, expires;
2966
2967 if (rd->type == RECDB_QSTRING) {
2968 /* old style host by itself */
2969 limit = GET_RECORD_QSTRING(rd);
2970 issued = 0;
2971 issuer = NULL;
2972 expires = 0;
2973 reason = NULL;
2974 } else if (rd->type == RECDB_OBJECT) {
2975 dict_t obj = GET_RECORD_OBJECT(rd);
2976 /* new style structure */
2977 limit = database_get_data(obj, KEY_LIMIT, RECDB_QSTRING);
2978 str = database_get_data(obj, KEY_EXPIRES, RECDB_QSTRING);
2979 expires = str ? ParseInterval(str) : 0;
2980 reason = database_get_data(obj, KEY_REASON, RECDB_QSTRING);
2981 issuer = database_get_data(obj, KEY_ISSUER, RECDB_QSTRING);
2982 str = database_get_data(obj, KEY_ISSUED, RECDB_QSTRING);
2983 issued = str ? ParseInterval(str) : 0;
2984 } else
2985 return 0;
2986
2987 if (expires && (expires < now))
2988 return 0;
2989 opserv_add_trusted_host(host, (limit ? strtoul(limit, NULL, 0) : 0), issuer, issued, expires, reason);
2990 return 0;
2991 }
2992
2993 static int
2994 opserv_saxdb_read(struct dict *conf_db)
2995 {
2996 dict_t object;
2997 struct record_data *rd;
2998 dict_iterator_t it;
2999 unsigned int nn;
3000
3001 if ((object = database_get_data(conf_db, KEY_RESERVES, RECDB_OBJECT)))
3002 dict_foreach(object, add_reserved, opserv_reserved_nick_dict);
3003 if ((rd = database_get_path(conf_db, KEY_BAD_WORDS))) {
3004 switch (rd->type) {
3005 case RECDB_STRING_LIST:
3006 /* Add words one by one just in case there are overlaps from an old DB. */
3007 for (nn=0; nn<rd->d.slist->used; ++nn)
3008 opserv_add_bad_word(NULL, NULL, rd->d.slist->list[nn]);
3009 break;
3010 case RECDB_OBJECT:
3011 for (it=dict_first(rd->d.object); it; it=iter_next(it)) {
3012 opserv_add_bad_word(NULL, NULL, iter_key(it));
3013 rd = iter_data(it);
3014 if (rd->type == RECDB_STRING_LIST)
3015 for (nn=0; nn<rd->d.slist->used; nn++)
3016 dict_insert(opserv_exempt_channels, strdup(rd->d.slist->list[nn]), NULL);
3017 }
3018 break;
3019 default:
3020 /* do nothing */;
3021 }
3022 }
3023 if ((rd = database_get_path(conf_db, KEY_EXEMPT_CHANNELS))
3024 && (rd->type == RECDB_STRING_LIST)) {
3025 for (nn=0; nn<rd->d.slist->used; ++nn)
3026 dict_insert(opserv_exempt_channels, strdup(rd->d.slist->list[nn]), NULL);
3027 }
3028 if ((object = database_get_data(conf_db, KEY_MAX_CLIENTS, RECDB_OBJECT))) {
3029 char *str;
3030 if ((str = database_get_data(object, KEY_MAX, RECDB_QSTRING)))
3031 max_clients = atoi(str);
3032 if ((str = database_get_data(object, KEY_TIME, RECDB_QSTRING)))
3033 max_clients_time = atoi(str);
3034 }
3035 if ((object = database_get_data(conf_db, KEY_TRUSTED_HOSTS, RECDB_OBJECT)))
3036 dict_foreach(object, trusted_host_read, opserv_trusted_hosts);
3037 if ((object = database_get_data(conf_db, KEY_GAGS, RECDB_OBJECT)))
3038 dict_foreach(object, add_gag_helper, NULL);
3039 if ((object = database_get_data(conf_db, KEY_ALERTS, RECDB_OBJECT)))
3040 dict_foreach(object, add_user_alert, NULL);
3041 /*
3042 if ((object = database_get_data(conf_db, KEY_WARN, RECDB_OBJECT)))
3043 dict_foreach(object, add_chan_warn, NULL);
3044 */
3045 return 0;
3046 }
3047
3048 static int
3049 opserv_saxdb_write(struct saxdb_context *ctx)
3050 {
3051 struct string_list *slist;
3052 dict_iterator_t it;
3053
3054 /* reserved nicks */
3055 if (dict_size(opserv_reserved_nick_dict)) {
3056 saxdb_start_record(ctx, KEY_RESERVES, 1);
3057 for (it = dict_first(opserv_reserved_nick_dict); it; it = iter_next(it)) {
3058 struct userNode *user = iter_data(it);
3059 if (!IsPersistent(user)) continue;
3060 saxdb_start_record(ctx, iter_key(it), 0);
3061 saxdb_write_string(ctx, KEY_IDENT, user->ident);
3062 saxdb_write_string(ctx, KEY_HOSTNAME, user->hostname);
3063 saxdb_write_string(ctx, KEY_DESC, user->info);
3064 saxdb_end_record(ctx);
3065 }
3066 saxdb_end_record(ctx);
3067 }
3068 /* bad word set */
3069 if (opserv_bad_words->used) {
3070 saxdb_write_string_list(ctx, KEY_BAD_WORDS, opserv_bad_words);
3071 }
3072 /* insert exempt channel names */
3073 if (dict_size(opserv_exempt_channels)) {
3074 slist = alloc_string_list(dict_size(opserv_exempt_channels));
3075 for (it=dict_first(opserv_exempt_channels); it; it=iter_next(it)) {
3076 string_list_append(slist, strdup(iter_key(it)));
3077 }
3078 saxdb_write_string_list(ctx, KEY_EXEMPT_CHANNELS, slist);
3079 free_string_list(slist);
3080 }
3081 /* trusted hosts takes a little more work */
3082 if (dict_size(opserv_trusted_hosts)) {
3083 saxdb_start_record(ctx, KEY_TRUSTED_HOSTS, 1);
3084 for (it = dict_first(opserv_trusted_hosts); it; it = iter_next(it)) {
3085 struct trusted_host *th = iter_data(it);
3086 saxdb_start_record(ctx, iter_key(it), 0);
3087 if (th->limit) saxdb_write_int(ctx, KEY_LIMIT, th->limit);
3088 if (th->expires) saxdb_write_int(ctx, KEY_EXPIRES, th->expires);
3089 if (th->issued) saxdb_write_int(ctx, KEY_ISSUED, th->issued);
3090 if (th->issuer) saxdb_write_string(ctx, KEY_ISSUER, th->issuer);
3091 if (th->reason) saxdb_write_string(ctx, KEY_REASON, th->reason);
3092 saxdb_end_record(ctx);
3093 }
3094 saxdb_end_record(ctx);
3095 }
3096 /* gags */
3097 if (gagList) {
3098 struct gag_entry *gag;
3099 saxdb_start_record(ctx, KEY_GAGS, 1);
3100 for (gag = gagList; gag; gag = gag->next) {
3101 saxdb_start_record(ctx, gag->mask, 0);
3102 saxdb_write_string(ctx, KEY_OWNER, gag->owner);
3103 saxdb_write_string(ctx, KEY_REASON, gag->reason);
3104 if (gag->expires) saxdb_write_int(ctx, KEY_EXPIRES, gag->expires);
3105 saxdb_end_record(ctx);
3106 }
3107 saxdb_end_record(ctx);
3108 }
3109 /* channel warnings */
3110 /*
3111 if (dict_size(opserv_chan_warn)) {
3112 saxdb_start_record(ctx, KEY_WARN, 0);
3113 for (it = dict_first(opserv_chan_warn); it; it = iter_next(it)) {
3114 saxdb_write_string(ctx, iter_key(it), iter_data(it));
3115 }
3116 saxdb_end_record(ctx);
3117 }
3118 */
3119 /* alerts */
3120 if (dict_size(opserv_user_alerts)) {
3121 saxdb_start_record(ctx, KEY_ALERTS, 1);
3122 for (it = dict_first(opserv_user_alerts); it; it = iter_next(it)) {
3123 struct opserv_user_alert *alert = iter_data(it);
3124 const char *reaction;
3125 saxdb_start_record(ctx, iter_key(it), 0);
3126 saxdb_write_string(ctx, KEY_DISCRIM, alert->text_discrim);
3127 saxdb_write_string(ctx, KEY_OWNER, alert->owner);
3128 switch (alert->reaction) {
3129 case REACT_NOTICE: reaction = "notice"; break;
3130 case REACT_KILL: reaction = "kill"; break;
3131 case REACT_SILENT: reaction = "silent"; break;
3132 case REACT_GLINE: reaction = "gline"; break;
3133 case REACT_TRACK: reaction = "track"; break;
3134 case REACT_SHUN: reaction = "shun"; break;
3135 default:
3136 reaction = NULL;
3137 log_module(OS_LOG, LOG_ERROR, "Invalid reaction type %d for alert %s (while writing database).", alert->reaction, iter_key(it));
3138 break;
3139 }
3140 if (reaction) saxdb_write_string(ctx, KEY_REACTION, reaction);
3141 saxdb_end_record(ctx);
3142 }
3143 saxdb_end_record(ctx);
3144 }
3145 /* max clients */
3146 saxdb_start_record(ctx, KEY_MAX_CLIENTS, 0);
3147 saxdb_write_int(ctx, KEY_MAX, max_clients);
3148 saxdb_write_int(ctx, KEY_TIME, max_clients_time);
3149 saxdb_end_record(ctx);
3150 return 0;
3151 }
3152
3153 static int
3154 query_keys_helper(const char *key, UNUSED_ARG(void *data), void *extra)
3155 {
3156 send_message_type(4, extra, opserv, "$b%s$b", key);
3157 return 0;
3158 }
3159
3160 static MODCMD_FUNC(cmd_query)
3161 {
3162 struct record_data *rd;
3163 unsigned int i;
3164 char *nodename;
3165
3166 if (argc < 2) {
3167 reply("OSMSG_OPTION_ROOT");
3168 conf_enum_root(query_keys_helper, user);
3169 return 1;
3170 }
3171
3172 nodename = unsplit_string(argv+1, argc-1, NULL);
3173 if (!(rd = conf_get_node(nodename))) {
3174 reply("OSMSG_UNKNOWN_OPTION", nodename);
3175 return 0;
3176 }
3177
3178 if (rd->type == RECDB_QSTRING)
3179 reply("OSMSG_OPTION_IS", nodename, rd->d.qstring);
3180 else if (rd->type == RECDB_STRING_LIST) {
3181 reply("OSMSG_OPTION_LIST", nodename);
3182 if (rd->d.slist->used)
3183 for (i=0; i<rd->d.slist->used; i++)
3184 send_message_type(4, user, cmd->parent->bot, "$b%s$b", rd->d.slist->list[i]);
3185 else
3186 reply("OSMSG_OPTION_LIST_EMPTY");
3187 } else if (rd->type == RECDB_OBJECT) {
3188 reply("OSMSG_OPTION_KEYS", nodename);
3189 dict_foreach(rd->d.object, query_keys_helper, user);
3190 }
3191
3192 return 1;
3193 }
3194
3195 static MODCMD_FUNC(cmd_set)
3196 {
3197 struct record_data *rd;
3198
3199 /* I originally wanted to be able to fully manipulate the config
3200 db with this, but i wussed out. feel free to fix this - you'll
3201 need to handle quoted strings which have been split, and likely
3202 invent a syntax for it. -Zoot */
3203
3204 if (!(rd = conf_get_node(argv[1]))) {
3205 reply("OSMSG_SET_NOT_SET", argv[1]);
3206 return 0;
3207 }
3208
3209 if (rd->type != RECDB_QSTRING) {
3210 reply("OSMSG_SET_BAD_TYPE", argv[1]);
3211 return 0;
3212 }
3213
3214 free(rd->d.qstring);
3215 rd->d.qstring = strdup(argv[2]);
3216 conf_call_reload_funcs();
3217 reply("OSMSG_SET_SUCCESS", argv[1], argv[2]);
3218 return 1;
3219 }
3220
3221 static MODCMD_FUNC(cmd_settime)
3222 {
3223 const char *srv_name_mask = "*";
3224 time_t new_time = now;
3225
3226 if (argc > 1)
3227 srv_name_mask = argv[1];
3228 if (argc > 2)
3229 new_time = time(NULL);
3230 irc_settime(srv_name_mask, new_time);
3231 reply("OSMSG_SETTIME_SUCCESS", srv_name_mask);
3232 return 1;
3233 }
3234
3235 static discrim_t
3236 opserv_discrim_create(struct userNode *user, struct userNode *bot, unsigned int argc, char *argv[], int allow_channel)
3237 {
3238 unsigned int i, j;
3239 discrim_t discrim;
3240
3241 discrim = calloc(1, sizeof(*discrim));
3242 discrim->limit = 250;
3243 discrim->max_level = ~0;
3244 discrim->max_ts = INT_MAX;
3245 discrim->domain_depth = 2;
3246 discrim->max_channels = INT_MAX;
3247 discrim->authed = -1;
3248 discrim->info_space = -1;
3249 discrim->intra_dcmp = 0;
3250 discrim->intra_scmp = 0;
3251
3252 for (i=0; i<argc; i++) {
3253 if (irccasecmp(argv[i], "log") == 0) {
3254 discrim->option_log = 1;
3255 continue;
3256 }
3257 /* Assume all other criteria require arguments. */
3258 if (i == argc - 1) {
3259 send_message(user, bot, "MSG_MISSING_PARAMS", argv[i]);
3260 goto fail;
3261 }
3262 if (argv[i+1][0] == '&') {
3263 /* Looking for intra-userNode matches */
3264 char *tmp = &(argv[i+1][1]);
3265 if (strcasecmp(tmp, argv[i]) != 0) { /* Don't allow "nick &nick" etc */
3266 if (!strcasecmp(tmp, "nick"))
3267 discrim->intra_dcmp = 1;
3268 else if (!strcasecmp(tmp, "ident"))
3269 discrim->intra_dcmp = 2;
3270 else if (!strcasecmp(tmp, "info"))
3271 discrim->intra_dcmp = 3;
3272 }
3273 }
3274 if (irccasecmp(argv[i], "mask") == 0) {
3275 if (!is_ircmask(argv[++i])) {
3276 send_message(user, bot, "OSMSG_INVALID_IRCMASK", argv[i]);
3277 goto fail;
3278 }
3279 if (!split_ircmask(argv[i],
3280 &discrim->mask_nick,
3281 &discrim->mask_ident,
3282 &discrim->mask_host)) {
3283 send_message(user, bot, "OSMSG_INVALID_IRCMASK", argv[i]);
3284 goto fail;
3285 }
3286 } else if (irccasecmp(argv[i], "nick") == 0) {
3287 i++;
3288 if (discrim->intra_dcmp > 0)
3289 discrim->intra_scmp = 1;
3290 else
3291 discrim->mask_nick = argv[i];
3292 } else if (irccasecmp(argv[i], "ident") == 0) {
3293 i++;
3294 if (discrim->intra_dcmp > 0)
3295 discrim->intra_scmp = 2;
3296 else
3297 discrim->mask_ident = argv[i];
3298 } else if (irccasecmp(argv[i], "host") == 0) {
3299 discrim->mask_host = argv[++i];
3300 } else if (irccasecmp(argv[i], "info") == 0) {
3301 i++;
3302 if (discrim->intra_dcmp > 0)
3303 discrim->intra_scmp = 3;
3304 else
3305 discrim->mask_info = argv[i];
3306 } else if (irccasecmp(argv[i], "server") == 0) {
3307 discrim->server = argv[++i];
3308 } else if (irccasecmp(argv[i], "ip") == 0) {
3309 j = irc_pton(&discrim->ip_mask, &discrim->ip_mask_bits, argv[++i]);
3310 if (!j) {
3311 send_message(user, opserv, "OSMSG_BAD_IP", argv[i]);
3312 goto fail;
3313 }
3314 } else if (irccasecmp(argv[i], "account") == 0) {
3315 if (discrim->authed == 0) {
3316 send_message(user, bot, "OSMSG_ACCOUNTMASK_AUTHED");
3317 goto fail;
3318 }
3319 discrim->accountmask = argv[++i];
3320 discrim->authed = 1;
3321 } else if (irccasecmp(argv[i], "authed") == 0) {
3322 i++; /* true_string and false_string are macros! */
3323 if (true_string(argv[i])) {
3324 discrim->authed = 1;
3325 } else if (false_string(argv[i])) {
3326 if (discrim->accountmask) {
3327 send_message(user, bot, "OSMSG_ACCOUNTMASK_AUTHED");
3328 goto fail;
3329 }
3330 discrim->authed = 0;
3331 } else {
3332 send_message(user, bot, "MSG_INVALID_BINARY", argv[i]);
3333 goto fail;
3334 }
3335 } else if (irccasecmp(argv[i], "info_space") == 0) {
3336 /* XXX: A hack because you can't check explicitly for a space through
3337 * any other means */
3338 i++;
3339 if (true_string(argv[i])) {
3340 discrim->info_space = 1;
3341 } else if (false_string(argv[i])) {
3342 discrim->info_space = 0;
3343 } else {
3344 send_message(user, bot, "MSG_INVALID_BINARY", argv[i]);
3345 goto fail;
3346 }
3347 } else if (irccasecmp(argv[i], "regex") == 0) {
3348 i++;
3349 if (true_string(argv[i])) {
3350 discrim->use_regex = 1;
3351 } else if (false_string(argv[i])) {
3352 discrim->use_regex = 0;
3353 } else {
3354 send_message(user, opserv, "MSG_INVALID_BINARY", argv[i]);
3355 goto fail;
3356 }
3357 } else if (irccasecmp(argv[i], "duration") == 0) {
3358 discrim->duration = ParseInterval(argv[++i]);
3359 } else if (irccasecmp(argv[i], "channel") == 0) {
3360 for (j=0, i++; ; j++) {
3361 switch (argv[i][j]) {
3362 case '#':
3363 goto find_channel;
3364 case '-':
3365 discrim->chan_no_modes |= MODE_CHANOP | MODE_HALFOP | MODE_VOICE;
3366 break;
3367 case '+':
3368 discrim->chan_req_modes |= MODE_VOICE;
3369 discrim->chan_no_modes |= MODE_CHANOP;
3370 discrim->chan_no_modes |= MODE_HALFOP;
3371 break;
3372 case '%':
3373 discrim->chan_req_modes |= MODE_HALFOP;
3374 discrim->chan_no_modes |= MODE_CHANOP;
3375 discrim->chan_no_modes |= MODE_VOICE;
3376 break;
3377 case '@':
3378 discrim->chan_req_modes |= MODE_CHANOP;
3379 break;
3380 case '\0':
3381 send_message(user, bot, "MSG_NOT_CHANNEL_NAME");
3382 goto fail;
3383 }
3384 }
3385 find_channel:
3386 discrim->chan_no_modes &= ~discrim->chan_req_modes;
3387 if (!(discrim->channel = GetChannel(argv[i]+j))) {
3388 /* secretly "allow_channel" now means "if a channel name is
3389 * specified, require that it currently exist" */
3390 if (allow_channel) {
3391 send_message(user, bot, "MSG_CHANNEL_UNKNOWN", argv[i]);
3392 goto fail;
3393 } else {
3394 discrim->channel = AddChannel(argv[i]+j, now, NULL, NULL, NULL);
3395 }
3396 }
3397 LockChannel(discrim->channel);
3398 } else if (irccasecmp(argv[i], "numchannels") == 0) {
3399 discrim->min_channels = discrim->max_channels = strtoul(argv[++i], NULL, 10);
3400 } else if (irccasecmp(argv[i], "limit") == 0) {
3401 discrim->limit = strtoul(argv[++i], NULL, 10);
3402 } else if (irccasecmp(argv[i], "reason") == 0) {
3403 discrim->reason = strdup(unsplit_string(argv+i+1, argc-i-1, NULL));
3404 i = argc;
3405 } else if (irccasecmp(argv[i], "last") == 0) {
3406 discrim->min_ts = now - ParseInterval(argv[++i]);
3407 } else if ((irccasecmp(argv[i], "linked") == 0)
3408 || (irccasecmp(argv[i], "nickage") == 0)) {
3409 const char *cmp = argv[++i];
3410 if (cmp[0] == '<') {
3411 if (cmp[1] == '=') {
3412 discrim->min_ts = now - ParseInterval(cmp+2);
3413 } else {
3414 discrim->min_ts = now - (ParseInterval(cmp+1) - 1);
3415 }
3416 } else if (cmp[0] == '>') {
3417 if (cmp[1] == '=') {
3418 discrim->max_ts = now - ParseInterval(cmp+2);
3419 } else {
3420 discrim->max_ts = now - (ParseInterval(cmp+1) - 1);
3421 }
3422 } else {
3423 discrim->min_ts = now - ParseInterval(cmp+2);
3424 }
3425 } else if (irccasecmp(argv[i], "access") == 0) {
3426 const char *cmp = argv[++i];
3427 if (cmp[0] == '<') {
3428 if (discrim->min_level == 0) discrim->min_level = 1;
3429 if (cmp[1] == '=') {
3430 discrim->max_level = strtoul(cmp+2, NULL, 0);
3431 } else {
3432 discrim->max_level = strtoul(cmp+1, NULL, 0) - 1;
3433 }
3434 } else if (cmp[0] == '=') {
3435 discrim->min_level = discrim->max_level = strtoul(cmp+1, NULL, 0);
3436 } else if (cmp[0] == '>') {
3437 if (cmp[1] == '=') {
3438 discrim->min_level = strtoul(cmp+2, NULL, 0);
3439 } else {
3440 discrim->min_level = strtoul(cmp+1, NULL, 0) + 1;
3441 }
3442 } else {
3443 discrim->min_level = strtoul(cmp+2, NULL, 0);
3444 }
3445 } else if ((irccasecmp(argv[i], "abuse") == 0)
3446 && (irccasecmp(argv[++i], "opers") == 0)) {
3447 discrim->match_opers = 1;
3448 } else if (irccasecmp(argv[i], "depth") == 0) {
3449 discrim->domain_depth = strtoul(argv[++i], NULL, 0);
3450 } else if (irccasecmp(argv[i], "clones") == 0) {
3451 discrim->min_clones = strtoul(argv[++i], NULL, 0);
3452 } else {
3453 send_message(user, bot, "MSG_INVALID_CRITERIA", argv[i]);
3454 goto fail;
3455 }
3456 }
3457
3458 if (discrim->mask_nick && !strcmp(discrim->mask_nick, "*")) {
3459 discrim->mask_nick = 0;
3460 }
3461 if (discrim->mask_ident && !strcmp(discrim->mask_ident, "*")) {
3462 discrim->mask_ident = 0;
3463 }
3464 if (discrim->mask_info && !strcmp(discrim->mask_info, "*")) {
3465 discrim->mask_info = 0;
3466 }
3467 if (discrim->mask_host && !discrim->mask_host[strspn(discrim->mask_host, "*.")]) {
3468 discrim->mask_host = 0;
3469 }
3470
3471 if(discrim->use_regex)
3472 {
3473 if(discrim->mask_nick)
3474 {
3475 int err = regcomp(&discrim->regex_nick, discrim->mask_nick, REG_EXTENDED|REG_ICASE|REG_NOSUB);
3476 discrim->has_regex_nick = !err;
3477 if(err)
3478 {
3479 char buff[256];
3480 buff[regerror(err, &discrim->regex_nick, buff, sizeof(buff))] = 0;
3481
3482 send_message(user, opserv, "OSMSG_INVALID_REGEX", discrim->mask_nick, buff, err);
3483 goto regfail;
3484 }
3485 }
3486
3487 if(discrim->mask_ident)
3488 {
3489 int err = regcomp(&discrim->regex_ident, discrim->mask_ident, REG_EXTENDED|REG_ICASE|REG_NOSUB);
3490 discrim->has_regex_ident = !err;
3491 if(err)
3492 {
3493 char buff[256];
3494 buff[regerror(err, &discrim->regex_ident, buff, sizeof(buff))] = 0;
3495
3496 send_message(user, opserv, "OSMSG_INVALID_REGEX", discrim->mask_ident, buff, err);
3497 goto regfail;
3498 }
3499 }
3500
3501 if(discrim->mask_host)
3502 {
3503 int err = regcomp(&discrim->regex_host, discrim->mask_host, REG_EXTENDED|REG_ICASE|REG_NOSUB);
3504 discrim->has_regex_host = !err;
3505 if(err)
3506 {
3507 char buff[256];
3508 buff[regerror(err, &discrim->regex_host, buff, sizeof(buff))] = 0;
3509
3510 send_message(user, opserv, "OSMSG_INVALID_REGEX", discrim->mask_host, buff, err);
3511 goto regfail;
3512 }
3513 }
3514
3515 if(discrim->mask_info)
3516 {
3517 int err = regcomp(&discrim->regex_info, discrim->mask_info, REG_EXTENDED|REG_ICASE|REG_NOSUB);
3518 discrim->has_regex_info = !err;
3519 if(err)
3520 {
3521 char buff[256];
3522 buff[regerror(err, &discrim->regex_info, buff, sizeof(buff))] = 0;
3523
3524 send_message(user, opserv, "OSMSG_INVALID_REGEX", discrim->mask_info, buff, err);
3525 goto regfail;
3526 }
3527 }
3528 }
3529
3530 return discrim;
3531
3532 fail:
3533 free(discrim);
3534 return NULL;
3535
3536 regfail:
3537 if(discrim->has_regex_nick)
3538 regfree(&discrim->regex_nick);
3539 if(discrim->has_regex_ident)
3540 regfree(&discrim->regex_ident);
3541 if(discrim->has_regex_host)
3542 regfree(&discrim->regex_host);
3543 if(discrim->has_regex_info)
3544 regfree(&discrim->regex_info);
3545
3546 free(discrim);
3547 return NULL;
3548 }
3549
3550 static int
3551 discrim_match(discrim_t discrim, struct userNode *user)
3552 {
3553 unsigned int access;
3554 char *scmp=NULL, *dcmp=NULL;
3555
3556 if ((user->timestamp < discrim->min_ts)
3557 || (user->timestamp > discrim->max_ts)
3558 || (user->channels.used < discrim->min_channels)
3559 || (user->channels.used > discrim->max_channels)
3560 || (discrim->authed == 0 && user->handle_info)
3561 || (discrim->authed == 1 && !user->handle_info)
3562 || (discrim->info_space == 0 && user->info[0] == ' ')
3563 || (discrim->info_space == 1 && user->info[0] != ' ')
3564 || (discrim->server && !match_ircglob(user->uplink->name, discrim->server))
3565 || (discrim->accountmask && (!user->handle_info || !match_ircglob(user->handle_info->handle, discrim->accountmask)))
3566 || (discrim->ip_mask_bits && !irc_check_mask(&user->ip, &discrim->ip_mask, discrim->ip_mask_bits))
3567 )
3568 return 0;
3569
3570 if (discrim->channel && !GetUserMode(discrim->channel, user))
3571 return 0;
3572
3573 if(discrim->use_regex)
3574 {
3575 if((discrim->has_regex_nick && regexec(&discrim->regex_nick, user->nick, 0, 0, 0))
3576 || (discrim->has_regex_ident && regexec(&discrim->regex_ident, user->ident, 0, 0, 0))
3577 || (discrim->has_regex_host && regexec(&discrim->regex_host, user->hostname, 0, 0, 0))
3578 || (discrim->has_regex_info && regexec(&discrim->regex_info, user->info, 0, 0, 0))) {
3579 return 0;
3580 }
3581 }
3582 else
3583 {
3584 if ((discrim->mask_nick && !match_ircglob(user->nick, discrim->mask_nick))
3585 || (discrim->mask_ident && !match_ircglob(user->ident, discrim->mask_ident))
3586 || (discrim->mask_host && !match_ircglob(user->hostname, discrim->mask_host))
3587 || (discrim->mask_info && !match_ircglob(user->info, discrim->mask_info))) {
3588 return 0;
3589 }
3590 }
3591
3592 if ((discrim->intra_scmp > 0 && discrim->intra_dcmp > 0)) {
3593 switch(discrim->intra_scmp) {
3594 case 1: scmp=user->nick; break;
3595 case 2: scmp=user->ident; break;
3596 case 3:
3597 scmp=user->info;
3598 if (discrim->info_space == 1) scmp++;
3599 break;
3600 }
3601 switch(discrim->intra_dcmp) {
3602 case 1: dcmp=user->nick; break;
3603 case 2: dcmp=user->ident; break;
3604 case 3: /* When checking INFO, and info_space is enabled
3605 * ignore the first character in a search
3606 * XXX: Should we ignore ALL leading whitespace?
3607 * Also, what about ignoring ~ in ident?
3608 */
3609 dcmp=user->info;
3610 if (discrim->info_space == 1) dcmp++;
3611 break;
3612 }
3613 if (irccasecmp(scmp,dcmp))
3614 return 0;
3615 }
3616
3617 access = user->handle_info ? user->handle_info->opserv_level : 0;
3618 if ((access < discrim->min_level)
3619 || (access > discrim->max_level)) {
3620 return 0;
3621 }
3622 if (discrim->min_clones > 1) {
3623 struct opserv_hostinfo *ohi = dict_find(opserv_hostinfo_dict, irc_ntoa(&user->ip), NULL);
3624 if (!ohi || (ohi->clients.used < discrim->min_clones))
3625 return 0;
3626 }
3627 return 1;
3628 }
3629
3630 static unsigned int
3631 opserv_discrim_search(discrim_t discrim, discrim_search_func dsf, void *data)
3632 {
3633 unsigned int nn, count;
3634 struct userList matched;
3635
3636 userList_init(&matched);
3637 /* Try most optimized search methods first */
3638 if (discrim->channel) {
3639 for (nn=0;
3640 (nn < discrim->channel->members.used)
3641 && (matched.used < discrim->limit);
3642 nn++) {
3643 struct modeNode *mn = discrim->channel->members.list[nn];
3644 if (((mn->modes & discrim->chan_req_modes) != discrim->chan_req_modes)
3645 || ((mn->modes & discrim->chan_no_modes) != 0)) {
3646 continue;
3647 }
3648 if (discrim_match(discrim, mn->user)) {
3649 userList_append(&matched, mn->user);
3650 }
3651 }
3652 } else if (discrim->ip_mask_bits == 128) {
3653 struct opserv_hostinfo *ohi = dict_find(opserv_hostinfo_dict, irc_ntoa(&discrim->ip_mask), NULL);
3654 if (!ohi) {
3655 userList_clean(&matched);
3656 return 0;
3657 }
3658 for (nn=0; (nn<ohi->clients.used) && (matched.used < discrim->limit); nn++) {
3659 if (discrim_match(discrim, ohi->clients.list[nn])) {
3660 userList_append(&matched, ohi->clients.list[nn]);
3661 }
3662 }
3663 } else {
3664 dict_iterator_t it;
3665 for (it=dict_first(clients); it && (matched.used < discrim->limit); it=iter_next(it)) {
3666 if (discrim_match(discrim, iter_data(it))) {
3667 userList_append(&matched, iter_data(it));
3668 }
3669 }
3670 }
3671
3672 if (!matched.used) {
3673 userList_clean(&matched);
3674 return 0;
3675 }
3676
3677 if (discrim->option_log) {
3678 log_module(OS_LOG, LOG_INFO, "Logging matches for search:");
3679 }
3680 for (nn=0; nn<matched.used; nn++) {
3681 struct userNode *user = matched.list[nn];
3682 if (discrim->option_log) {
3683 log_module(OS_LOG, LOG_INFO, " %s!%s@%s", user->nick, user->ident, user->hostname);
3684 }
3685 if (dsf(user, data)) {
3686 /* If a search function returns true, it ran into a
3687 problem. Stop going through the list. */
3688 break;
3689 }
3690 }
3691 if (discrim->option_log) {
3692 log_module(OS_LOG, LOG_INFO, "End of matching users.");
3693 }
3694 count = matched.used;
3695 userList_clean(&matched);
3696 return count;
3697 }
3698
3699 static int
3700 trace_print_func(struct userNode *match, void *extra)
3701 {
3702 struct discrim_and_source *das = extra;
3703 if (match->handle_info) {
3704 send_message_type(4, das->source, das->destination, "%-15s\002 \002%10s\002@\002%s (%s)", match->nick, match->ident, match->hostname, match->handle_info->handle);
3705 } else {
3706 send_message_type(4, das->source, das->destination, "%-15s\002 \002%10s\002@\002%s", match->nick, match->ident, match->hostname);
3707 }
3708 return 0;
3709 }
3710
3711 static int
3712 trace_count_func(UNUSED_ARG(struct userNode *match), UNUSED_ARG(void *extra))
3713 {
3714 return 0;
3715 }
3716
3717 static int
3718 is_oper_victim(struct userNode *user, struct userNode *target, int match_opers)
3719 {
3720 return !(IsService(target)
3721 || (!match_opers && IsOper(target))
3722 || (target->handle_info
3723 && target->handle_info->opserv_level > user->handle_info->opserv_level));
3724 }
3725
3726 static int
3727 trace_gline_func(struct userNode *match, void *extra)
3728 {
3729 struct discrim_and_source *das = extra;
3730
3731 if (is_oper_victim(das->source, match, das->discrim->match_opers)) {
3732 opserv_block(match, das->source->handle_info->handle, das->discrim->reason, das->discrim->duration, 0);
3733 }
3734
3735 return 0;
3736 }
3737
3738 static int
3739 trace_shun_func(struct userNode *match, void *extra)
3740 {
3741 struct discrim_and_source *das = extra;
3742
3743 if (is_oper_victim(das->source, match, das->discrim->match_opers)) {
3744 opserv_shun(match, das->source->handle_info->handle, das->discrim->reason, das->discrim->duration);
3745 }
3746
3747 return 0;
3748 }
3749
3750 static int
3751 trace_kill_func(struct userNode *match, void *extra)
3752 {
3753 struct discrim_and_source *das = extra;
3754
3755 if (is_oper_victim(das->source, match, das->discrim->match_opers)) {
3756 char *reason;
3757 if (das->discrim->reason) {
3758 reason = das->discrim->reason;
3759 } else {
3760 reason = alloca(strlen(OSMSG_KILL_REQUESTED)+strlen(das->source->nick)+1);
3761 sprintf(reason, OSMSG_KILL_REQUESTED, das->source->nick);
3762 }
3763 DelUser(match, opserv, 1, reason);
3764 }
3765
3766 return 0;
3767 }
3768
3769 static int
3770 is_gagged(char *mask)
3771 {
3772 struct gag_entry *gag;
3773
3774 for (gag = gagList; gag; gag = gag->next) {
3775 if (match_ircglobs(gag->mask, mask)) return 1;
3776 }
3777 return 0;
3778 }
3779
3780 static int
3781 trace_gag_func(struct userNode *match, void *extra)
3782 {
3783 struct discrim_and_source *das = extra;
3784
3785 if (is_oper_victim(das->source, match, das->discrim->match_opers)) {
3786 char *reason, *mask;
3787 int masksize;
3788 if (das->discrim->reason) {
3789 reason = das->discrim->reason;
3790 } else {
3791 reason = alloca(strlen(OSMSG_GAG_REQUESTED)+strlen(das->source->nick)+1);
3792 sprintf(reason, OSMSG_GAG_REQUESTED, das->source->nick);
3793 }
3794 masksize = 5+strlen(match->hostname);
3795 mask = alloca(masksize);
3796 snprintf(mask, masksize, "*!*@%s", match->hostname);
3797 if (!is_gagged(mask)) {
3798 gag_create(mask, das->source->handle_info->handle, reason,
3799 das->discrim->duration ? (now + das->discrim->duration) : 0);
3800 }
3801 }
3802
3803 return 0;
3804 }
3805
3806 static int
3807 trace_domains_func(struct userNode *match, void *extra)
3808 {
3809 struct discrim_and_source *das = extra;
3810 irc_in_addr_t ip;
3811 unsigned long *count;
3812 unsigned int depth;
3813 char *hostname;
3814 char ipmask[IRC_NTOP_MASK_MAX_SIZE];
3815
3816 if (irc_pton(&ip, NULL, match->hostname)) {
3817 if (irc_in_addr_is_ipv4(ip)) {
3818 unsigned long matchip = ntohl(ip.in6_32[3]);
3819 /* raw IP address.. use up to first three octets of IP */
3820 switch (das->discrim->domain_depth) {
3821 default:
3822 snprintf(ipmask, sizeof(ipmask), "%lu.%lu.%lu.*", (matchip>>24)&255, (matchip>>16)&255, (matchip>>8)&255);
3823 break;
3824 case 2:
3825 snprintf(ipmask, sizeof(ipmask), "%lu.%lu.*", (matchip>>24)&255, (matchip>>16)&255);
3826 break;
3827 case 1:
3828 snprintf(ipmask, sizeof(ipmask), "%lu.*", (matchip>>24)&255);
3829 break;
3830 }
3831 } else if (irc_in_addr_is_ipv6(ip)) {
3832 switch (das->discrim->domain_depth) {
3833 case 1: depth = 16; goto ipv6_pfx;
3834 case 2: depth = 24; goto ipv6_pfx;
3835 case 3: depth = 32; goto ipv6_pfx;
3836 default: depth = das->discrim->domain_depth;
3837 ipv6_pfx:
3838 irc_ntop_mask(ipmask, sizeof(ipmask), &ip, depth);
3839 }
3840 } else safestrncpy(ipmask, match->hostname, sizeof(ipmask));
3841 ipmask[sizeof(ipmask) - 1] = '\0';
3842 hostname = ipmask;
3843 } else {
3844 hostname = match->hostname + strlen(match->hostname);
3845 for (depth=das->discrim->domain_depth;
3846 depth && (hostname > match->hostname);
3847 depth--) {
3848 hostname--;
3849 while ((hostname > match->hostname) && (*hostname != '.')) hostname--;
3850 }
3851 if (*hostname == '.') hostname++; /* advance past last dot we saw */
3852 }
3853 if (!(count = dict_find(das->dict, hostname, NULL))) {
3854 count = calloc(1, sizeof(*count));
3855 dict_insert(das->dict, strdup(hostname), count);
3856 }
3857 (*count)++;
3858 return 0;
3859 }
3860
3861 static int
3862 opserv_show_hostinfo(const char *key, void *data, void *extra)
3863 {
3864 unsigned long *count = data;
3865 struct discrim_and_source *das = extra;
3866
3867 send_message_type(4, das->source, das->destination, "%s %lu", key, *count);
3868 return !--das->disp_limit;
3869 }
3870
3871 static MODCMD_FUNC(cmd_trace)
3872 {
3873 struct discrim_and_source das;
3874 discrim_search_func action;
3875 unsigned int matches;
3876 struct svccmd *subcmd;
3877 char buf[MAXLEN];
3878
3879 sprintf(buf, "trace %s", argv[1]);
3880 if (!(subcmd = dict_find(opserv_service->commands, buf, NULL))) {
3881 reply("OSMSG_BAD_ACTION", argv[1]);
3882 return 0;
3883 }
3884 if (!svccmd_can_invoke(user, opserv_service->bot, subcmd, channel, SVCCMD_NOISY))
3885 return 0;
3886 if (!irccasecmp(argv[1], "print"))
3887 action = trace_print_func;
3888 else if (!irccasecmp(argv[1], "count"))
3889 action = trace_count_func;
3890 else if (!irccasecmp(argv[1], "domains"))
3891 action = trace_domains_func;
3892 else if (!irccasecmp(argv[1], "gline"))
3893 action = trace_gline_func;
3894 else if (!irccasecmp(argv[1], "shun"))
3895 action = trace_shun_func;
3896 else if (!irccasecmp(argv[1], "kill"))
3897 action = trace_kill_func;
3898 else if (!irccasecmp(argv[1], "gag"))
3899 action = trace_gag_func;
3900 else {
3901 reply("OSMSG_BAD_ACTION", argv[1]);
3902 return 0;
3903 }
3904
3905 if (user->handle_info->opserv_level < subcmd->min_opserv_level) {
3906 reply("OSMSG_LEVEL_TOO_LOW");
3907 return 0;
3908 }
3909
3910 das.dict = NULL;
3911 das.source = user;
3912 das.destination = cmd->parent->bot;
3913 das.discrim = opserv_discrim_create(user, cmd->parent->bot, argc-2, argv+2, 1);
3914 if (!das.discrim)
3915 return 0;
3916
3917 if (action == trace_print_func)
3918 {
3919 reply("OSMSG_USER_SEARCH_RESULTS");
3920 reply("OSMSG_USER_SEARCH_BAR");
3921 reply("OSMSG_USER_SEARCH_HEADER");
3922 reply("OSMSG_USER_SEARCH_BAR");
3923 }
3924 else if (action == trace_count_func)
3925 das.discrim->limit = INT_MAX;
3926 else if ((action == trace_gline_func) && !das.discrim->duration)
3927 das.discrim->duration = opserv_conf.block_gline_duration;
3928 else if ((action == trace_shun_func) && !das.discrim->duration)
3929 das.discrim->duration = opserv_conf.block_shun_duration;
3930 else if (action == trace_domains_func) {
3931 das.dict = dict_new();
3932 dict_set_free_data(das.dict, free);
3933 dict_set_free_keys(das.dict, free);
3934 das.disp_limit = das.discrim->limit;
3935 das.discrim->limit = INT_MAX;
3936 }
3937 matches = opserv_discrim_search(das.discrim, action, &das);
3938
3939 if (action == trace_domains_func)
3940 dict_foreach(das.dict, opserv_show_hostinfo, &das);
3941
3942 if (matches)
3943 {
3944 if(action == trace_print_func)
3945 reply("OSMSG_USER_SEARCH_COUNT_BAR", matches);
3946 else
3947 reply("OSMSG_USER_SEARCH_COUNT", matches);
3948 }
3949 else
3950 reply("MSG_NO_MATCHES");
3951
3952 if (das.discrim->channel)
3953 UnlockChannel(das.discrim->channel);
3954 free(das.discrim->reason);
3955
3956 if(das.discrim->has_regex_nick)
3957 regfree(&das.discrim->regex_nick);
3958 if(das.discrim->has_regex_ident)
3959 regfree(&das.discrim->regex_ident);
3960 if(das.discrim->has_regex_host)
3961 regfree(&das.discrim->regex_host);
3962 if(das.discrim->has_regex_info)
3963 regfree(&das.discrim->regex_info);
3964
3965 free(das.discrim);
3966 dict_delete(das.dict);
3967 return 1;
3968 }
3969
3970 typedef void (*cdiscrim_search_func)(struct chanNode *match, void *data, struct userNode *bot);
3971
3972 typedef struct channel_discrim {
3973 char *name, *topic;
3974
3975 unsigned int min_users, max_users;
3976 time_t min_ts, max_ts;
3977 unsigned int limit;
3978 } *cdiscrim_t;
3979
3980 static cdiscrim_t opserv_cdiscrim_create(struct userNode *user, struct userNode *bot, unsigned int argc, char *argv[]);
3981 static unsigned int opserv_cdiscrim_search(cdiscrim_t discrim, cdiscrim_search_func dsf, void *data, struct userNode *bot);
3982
3983 static time_t
3984 smart_parse_time(const char *str) {
3985 /* If an interval-style string is given, treat as time before now.
3986 * If it's all digits, treat directly as a Unix timestamp. */
3987 return str[strspn(str, "0123456789")] ? (time_t)(now - ParseInterval(str)) : (time_t)atoi(str);
3988 }
3989
3990 static cdiscrim_t
3991 opserv_cdiscrim_create(struct userNode *user, struct userNode *bot, unsigned int argc, char *argv[])
3992 {
3993 cdiscrim_t discrim;
3994 unsigned int i;
3995
3996 discrim = calloc(1, sizeof(*discrim));
3997 discrim->limit = 25;
3998
3999 for (i = 0; i < argc; i++) {
4000 /* Assume all criteria require arguments. */
4001 if (i == (argc - 1)) {
4002 send_message(user, bot, "MSG_MISSING_PARAMS", argv[i]);
4003 return NULL;
4004 }
4005
4006 if (!irccasecmp(argv[i], "name"))
4007 discrim->name = argv[++i];
4008 else if (!irccasecmp(argv[i], "topic"))
4009 discrim->topic = argv[++i];
4010 else if (!irccasecmp(argv[i], "users")) {
4011 const char *cmp = argv[++i];
4012 if (cmp[0] == '<') {
4013 if (cmp[1] == '=')
4014 discrim->max_users = strtoul(cmp+2, NULL, 0);
4015 else
4016 discrim->max_users = strtoul(cmp+1, NULL, 0) - 1;
4017 } else if (cmp[0] == '=') {
4018 discrim->min_users = discrim->max_users = strtoul(cmp+1, NULL, 0);
4019 } else if (cmp[0] == '>') {
4020 if (cmp[1] == '=')
4021 discrim->min_users = strtoul(cmp+2, NULL, 0);
4022 else
4023 discrim->min_users = strtoul(cmp+1, NULL, 0) + 1;
4024 } else {
4025 discrim->min_users = strtoul(cmp+2, NULL, 0);
4026 }
4027 } else if (!irccasecmp(argv[i], "timestamp")) {
4028 const char *cmp = argv[++i];
4029 if (cmp[0] == '<') {
4030 if (cmp[1] == '=')
4031 discrim->max_ts = smart_parse_time(cmp+2);
4032 else
4033 discrim->max_ts = smart_parse_time(cmp+1)-1;
4034 } else if (cmp[0] == '=') {
4035 discrim->min_ts = discrim->max_ts = smart_parse_time(cmp+1);
4036 } else if (cmp[0] == '>') {
4037 if (cmp[1] == '=')
4038 discrim->min_ts = smart_parse_time(cmp+2);
4039 else
4040 discrim->min_ts = smart_parse_time(cmp+1)+1;
4041 } else {
4042 discrim->min_ts = smart_parse_time(cmp);
4043 }
4044 } else if (!irccasecmp(argv[i], "limit")) {
4045 discrim->limit = strtoul(argv[++i], NULL, 10);
4046 } else {
4047 send_message(user, bot, "MSG_INVALID_CRITERIA", argv[i]);
4048 goto fail;
4049 }
4050 }
4051
4052 if (discrim->name && !strcmp(discrim->name, "*"))
4053 discrim->name = 0;
4054 if (discrim->topic && !strcmp(discrim->topic, "*"))
4055 discrim->topic = 0;
4056
4057 return discrim;
4058 fail:
4059 free(discrim);
4060 return NULL;
4061 }
4062
4063 static int
4064 cdiscrim_match(cdiscrim_t discrim, struct chanNode *chan)
4065 {
4066 if ((discrim->name && !match_ircglob(chan->name, discrim->name)) ||
4067 (discrim->topic && !match_ircglob(chan->topic, discrim->topic)) ||
4068 (discrim->min_users && chan->members.used < discrim->min_users) ||
4069 (discrim->max_users && chan->members.used > discrim->max_users) ||
4070 (discrim->min_ts && chan->timestamp < discrim->min_ts) ||
4071 (discrim->max_ts && chan->timestamp > discrim->max_ts)) {
4072 return 0;
4073 }
4074 return 1;
4075 }
4076
4077 static unsigned int opserv_cdiscrim_search(cdiscrim_t discrim, cdiscrim_search_func dsf, void *data, struct userNode *bot)
4078 {
4079 unsigned int count = 0;
4080 dict_iterator_t it, next;
4081
4082 for (it = dict_first(channels); it && count < discrim->limit ; it = next) {
4083 struct chanNode *chan = iter_data(it);
4084
4085 /* Hold on to the next channel in case we decide to
4086 add actions that destructively modify the channel. */
4087 next = iter_next(it);
4088 if ((chan->members.used > 0) && cdiscrim_match(discrim, chan)) {
4089 dsf(chan, data, bot);
4090 count++;
4091 }
4092 }
4093
4094 return count;
4095 }
4096
4097 void channel_count(UNUSED_ARG(struct chanNode *channel), UNUSED_ARG(void *data), UNUSED_ARG(struct userNode *bot))
4098 {
4099 }
4100
4101 void channel_print(struct chanNode *channel, void *data, struct userNode *bot)
4102 {
4103 char modes[MAXLEN];
4104 irc_make_chanmode(channel, modes);
4105 send_message(data, bot, "OSMSG_CSEARCH_CHANNEL_INFO", channel->name, channel->members.used, modes, channel->topic);
4106 }
4107
4108 static MODCMD_FUNC(cmd_csearch)
4109 {
4110 cdiscrim_t discrim;
4111 unsigned int matches;
4112 cdiscrim_search_func action;
4113 struct svccmd *subcmd;
4114 char buf[MAXLEN];
4115
4116 if (!irccasecmp(argv[1], "count"))
4117 action = channel_count;
4118 else if (!irccasecmp(argv[1], "print"))
4119 action = channel_print;
4120 else {
4121 reply("OSMSG_BAD_ACTION", argv[1]);
4122 return 0;
4123 }
4124
4125 sprintf(buf, "%s %s", argv[0], argv[0]);
4126 if ((subcmd = dict_find(opserv_service->commands, buf, NULL))
4127 && !svccmd_can_invoke(user, opserv_service->bot, subcmd, channel, SVCCMD_NOISY)) {
4128 return 0;
4129 }
4130
4131 discrim = opserv_cdiscrim_create(user, cmd->parent->bot, argc - 2, argv + 2);
4132 if (!discrim)
4133 return 0;
4134
4135 if (action == channel_print)
4136 reply("OSMSG_CHANNEL_SEARCH_RESULTS");
4137 else if (action == channel_count)
4138 discrim->limit = INT_MAX;
4139
4140 matches = opserv_cdiscrim_search(discrim, action, user, cmd->parent->bot);
4141
4142 if (matches)
4143 reply("MSG_MATCH_COUNT", matches);
4144 else
4145 reply("MSG_NO_MATCHES");
4146
4147 free(discrim);
4148 return 1;
4149 }
4150
4151 static MODCMD_FUNC(cmd_gsync)
4152 {
4153 struct server *src;
4154 if (argc > 1) {
4155 src = GetServerH(argv[1]);
4156 if (!src) {
4157 reply("MSG_SERVER_UNKNOWN", argv[1]);
4158 return 0;
4159 }
4160 } else {
4161 src = self->uplink;
4162 }
4163 irc_stats(cmd->parent->bot, src, 'G');
4164 reply("OSMSG_GSYNC_RUNNING", src->name);
4165 return 1;
4166 }
4167
4168 static MODCMD_FUNC(cmd_ssync)
4169 {
4170 struct server *src;
4171 if (argc > 1) {
4172 src = GetServerH(argv[1]);
4173 if (!src) {
4174 reply("MSG_SERVER_UNKNOWN", argv[1]);
4175 return 0;
4176 }
4177 } else {
4178 src = self->uplink;
4179 }
4180 irc_stats(cmd->parent->bot, src, 'S');
4181 reply("OSMSG_SSYNC_RUNNING", src->name);
4182 return 1;
4183 }
4184
4185 struct gline_extra {
4186 struct userNode *user;
4187 struct string_list *glines;
4188 struct userNode *bot;
4189 };
4190
4191 static void
4192 gtrace_print_func(struct gline *gline, void *extra)
4193 {
4194 struct gline_extra *xtra = extra;
4195 char *when_text, set_text[20];
4196 strftime(set_text, sizeof(set_text), "%Y-%m-%d", localtime(&gline->issued));
4197 when_text = asctime(localtime(&gline->expires));
4198 when_text[strlen(when_text)-1] = 0; /* strip lame \n */
4199 send_message(xtra->user, xtra->bot, "OSMSG_GTRACE_FORMAT", gline->target, set_text, gline->issuer, when_text, gline->reason);
4200 }
4201
4202 static void
4203 gtrace_count_func(UNUSED_ARG(struct gline *gline), UNUSED_ARG(void *extra))
4204 {
4205 }
4206
4207 static void
4208 gtrace_ungline_func(struct gline *gline, void *extra)
4209 {
4210 struct gline_extra *xtra = extra;
4211 string_list_append(xtra->glines, strdup(gline->target));
4212 }
4213
4214 static MODCMD_FUNC(cmd_gtrace)
4215 {
4216 struct gline_discrim *discrim;
4217 gline_search_func action;
4218 unsigned int matches, nn;
4219 struct gline_extra extra;
4220 struct svccmd *subcmd;
4221 char buf[MAXLEN];
4222
4223 if (!irccasecmp(argv[1], "print"))
4224 action = gtrace_print_func;
4225 else if (!irccasecmp(argv[1], "count"))
4226 action = gtrace_count_func;
4227 else if (!irccasecmp(argv[1], "ungline"))
4228 action = gtrace_ungline_func;
4229 else {
4230 reply("OSMSG_BAD_ACTION", argv[1]);
4231 return 0;
4232 }
4233 sprintf(buf, "%s %s", argv[0], argv[0]);
4234 if ((subcmd = dict_find(opserv_service->commands, buf, NULL))
4235 && !svccmd_can_invoke(user, opserv_service->bot, subcmd, channel, SVCCMD_NOISY)) {
4236 return 0;
4237 }
4238
4239 discrim = gline_discrim_create(user, cmd->parent->bot, argc-2, argv+2);
4240 if (!discrim)
4241 return 0;
4242
4243 if (action == gtrace_print_func)
4244 reply("OSMSG_GLINE_SEARCH_RESULTS");
4245 else if (action == gtrace_count_func)
4246 discrim->limit = INT_MAX;
4247
4248 extra.user = user;
4249 extra.glines = alloc_string_list(4);
4250 extra.bot = cmd->parent->bot;
4251 matches = gline_discrim_search(discrim, action, &extra);
4252
4253 if (action == gtrace_ungline_func)
4254 for (nn=0; nn<extra.glines->used; nn++)
4255 gline_remove(extra.glines->list[nn], 1);
4256 free_string_list(extra.glines);
4257
4258 if (matches)
4259 reply("MSG_MATCH_COUNT", matches);
4260 else
4261 reply("MSG_NO_MATCHES");
4262 free(discrim->alt_target_mask);
4263 free(discrim);
4264 return 1;
4265 }
4266
4267 struct shun_extra {
4268 struct userNode *user;
4269 struct string_list *shuns;
4270 struct userNode *bot;
4271 };
4272
4273 static void
4274 strace_print_func(struct shun *shun, void *extra)
4275 {
4276 struct shun_extra *xtra = extra;
4277 char *when_text, set_text[20];
4278 strftime(set_text, sizeof(set_text), "%Y-%m-%d", localtime(&shun->issued));
4279 when_text = asctime(localtime(&shun->expires));
4280 when_text[strlen(when_text)-1] = 0; /* strip lame \n */
4281 send_message(xtra->user, xtra->bot, "OSMSG_STRACE_FORMAT", shun->target, set_text, shun->issuer, when_text, shun->reason);
4282 }
4283
4284 static void
4285 strace_count_func(UNUSED_ARG(struct shun *shun), UNUSED_ARG(void *extra))
4286 {
4287 }
4288
4289 static void
4290 strace_unshun_func(struct shun *shun, void *extra)
4291 {
4292 struct shun_extra *xtra = extra;
4293 string_list_append(xtra->shuns, strdup(shun->target));
4294 }
4295
4296 static MODCMD_FUNC(cmd_strace)
4297 {
4298 struct shun_discrim *discrim;
4299 shun_search_func action;
4300 unsigned int matches, nn;
4301 struct shun_extra extra;
4302 struct svccmd *subcmd;
4303 char buf[MAXLEN];
4304
4305 if (!irccasecmp(argv[1], "print"))
4306 action = strace_print_func;
4307 else if (!irccasecmp(argv[1], "count"))
4308 action = strace_count_func;
4309 else if (!irccasecmp(argv[1], "unshun"))
4310 action = strace_unshun_func;
4311 else {
4312 reply("OSMSG_BAD_ACTION", argv[1]);
4313 return 0;
4314 }
4315 sprintf(buf, "%s %s", argv[0], argv[0]);
4316 if ((subcmd = dict_find(opserv_service->commands, buf, NULL))
4317 && !svccmd_can_invoke(user, opserv_service->bot, subcmd, channel, SVCCMD_NOISY)) {
4318 return 0;
4319 }
4320
4321 discrim = shun_discrim_create(user, cmd->parent->bot, argc-2, argv+2);
4322 if (!discrim)
4323 return 0;
4324
4325 if (action == strace_print_func)
4326 reply("OSMSG_SHUN_SEARCH_RESULTS");
4327 else if (action == strace_count_func)
4328 discrim->limit = INT_MAX;
4329
4330 extra.user = user;
4331 extra.shuns = alloc_string_list(4);
4332 extra.bot = cmd->parent->bot;
4333 matches = shun_discrim_search(discrim, action, &extra);
4334
4335 if (action == strace_unshun_func)
4336 for (nn=0; nn<extra.shuns->used; nn++)
4337 shun_remove(extra.shuns->list[nn], 1);
4338 free_string_list(extra.shuns);
4339
4340 if (matches)
4341 reply("MSG_MATCH_COUNT", matches);
4342 else
4343 reply("MSG_NO_MATCHES");
4344 free(discrim->alt_target_mask);
4345 free(discrim);
4346 return 1;
4347 }
4348
4349 static int
4350 alert_check_user(const char *key, void *data, void *extra)
4351 {
4352 struct opserv_user_alert *alert = data;
4353 struct userNode *user = extra;
4354
4355 if (!discrim_match(alert->discrim, user))
4356 return 0;
4357
4358 if ((alert->reaction != REACT_NOTICE)
4359 && IsOper(user)
4360 && !alert->discrim->match_opers) {
4361 return 0;
4362 }
4363
4364 /* The user matches the alert criteria, so trigger the reaction. */
4365 if (alert->discrim->option_log)
4366 log_module(OS_LOG, LOG_INFO, "Alert %s triggered by user %s!%s@%s (%s).", key, user->nick, user->ident, user->hostname, alert->discrim->reason);
4367
4368 /* Return 1 to halt alert matching, such as when killing the user
4369 that triggered the alert. */
4370 switch (alert->reaction) {
4371 case REACT_KILL:
4372 DelUser(user, opserv, 1, alert->discrim->reason);
4373 return 1;
4374 case REACT_SILENT:
4375 opserv_block(user, alert->owner, alert->discrim->reason, alert->discrim->duration, 1);
4376 return 1;
4377 case REACT_GLINE:
4378 opserv_block(user, alert->owner, alert->discrim->reason, alert->discrim->duration, 0);
4379 return 1;
4380 case REACT_SHUN:
4381 opserv_shun(user, alert->owner, alert->discrim->reason, alert->discrim->duration);
4382 return 1;
4383 default:
4384 log_module(OS_LOG, LOG_ERROR, "Invalid reaction type %d for alert %s.", alert->reaction, key);
4385 /* fall through to REACT_NOTICE case */
4386 case REACT_NOTICE:
4387 opserv_alert("Alert $b%s$b triggered by user $b%s$b!%s@%s (%s).", key, user->nick, user->ident, user->hostname, alert->discrim->reason);
4388 break;
4389 case REACT_TRACK:
4390 #ifdef HAVE_TRACK
4391 opserv_alert("Alert $b%s$b triggered by user $b%s$b!%s@%s (%s) (Tracking).", key, user->nick, user->ident, user->hostname, alert->discrim->reason);
4392 add_track_user(user);
4393 #endif
4394 break;
4395 }
4396 return 0;
4397 }
4398
4399 static void
4400 opserv_alert_check_nick(struct userNode *user, UNUSED_ARG(const char *old_nick))
4401 {
4402 struct gag_entry *gag;
4403 dict_foreach(opserv_nick_based_alerts, alert_check_user, user);
4404 /* Gag them if appropriate (and only if). */
4405 user->modes &= ~FLAGS_GAGGED;
4406 for (gag = gagList; gag; gag = gag->next) {
4407 if (user_matches_glob(user, gag->mask, MATCH_USENICK)) {
4408 gag_helper_func(user, NULL);
4409 break;
4410 }
4411 }
4412 }
4413
4414 static void
4415 opserv_staff_alert(struct userNode *user, UNUSED_ARG(struct handle_info *old_handle))
4416 {
4417 const char *type;
4418
4419 if (!opserv_conf.staff_auth_channel
4420 || user->uplink->burst
4421 || !user->handle_info)
4422 return;
4423 else if (user->handle_info->opserv_level)
4424 type = "OPER";
4425 else if (IsNetworkHelper(user))
4426 type = "NETWORK HELPER";
4427 else if (IsSupportHelper(user))
4428 type = "SUPPORT HELPER";
4429 else
4430 return;
4431
4432 if (irc_in_addr_is_valid(user->ip))
4433 send_channel_notice(opserv_conf.staff_auth_channel, opserv, IDENT_FORMAT" authed to %s account %s", IDENT_DATA(user), type, user->handle_info->handle);
4434 else
4435 send_channel_notice(opserv_conf.staff_auth_channel, opserv, "%s [%s@%s] authed to %s account %s", user->nick, user->ident, user->hostname, type, user->handle_info->handle);
4436 }
4437
4438 static MODCMD_FUNC(cmd_log)
4439 {
4440 struct logSearch *discrim;
4441 unsigned int matches;
4442 struct logReport report;
4443
4444 discrim = log_discrim_create(cmd->parent->bot, user, argc, argv);
4445 if (!discrim)
4446 return 0;
4447
4448 reply("OSMSG_LOG_SEARCH_RESULTS");
4449 report.reporter = opserv;
4450 report.user = user;
4451 matches = log_entry_search(discrim, log_report_entry, &report);
4452
4453 if (matches)
4454 reply("MSG_MATCH_COUNT", matches);
4455 else
4456 reply("MSG_NO_MATCHES");
4457
4458 free(discrim);
4459 return 1;
4460 }
4461
4462 static int
4463 gag_helper_func(struct userNode *match, UNUSED_ARG(void *extra))
4464 {
4465 if (IsOper(match) || IsLocal(match))
4466 return 0;
4467 match->modes |= FLAGS_GAGGED;
4468 return 0;
4469 }
4470
4471 static MODCMD_FUNC(cmd_gag)
4472 {
4473 struct gag_entry *gag;
4474 unsigned int gagged;
4475 unsigned long duration;
4476 char *reason;
4477
4478 reason = unsplit_string(argv + 3, argc - 3, NULL);
4479
4480 if (!is_ircmask(argv[1])) {
4481 reply("OSMSG_INVALID_IRCMASK", argv[1]);
4482 return 0;
4483 }
4484
4485 for (gag = gagList; gag; gag = gag->next)
4486 if (match_ircglobs(gag->mask, argv[1]))
4487 break;
4488
4489 if (gag) {
4490 reply("OSMSG_REDUNDANT_GAG", argv[1]);
4491 return 0;
4492 }
4493
4494 duration = ParseInterval(argv[2]);
4495 gagged = gag_create(argv[1], user->handle_info->handle, reason, (duration?now+duration:0));
4496
4497 if (gagged)
4498 reply("OSMSG_GAG_APPLIED", argv[1], gagged);
4499 else
4500 reply("OSMSG_GAG_ADDED", argv[1]);
4501 return 1;
4502 }
4503
4504 static int
4505 ungag_helper_func(struct userNode *match, UNUSED_ARG(void *extra))
4506 {
4507 match->modes &= ~FLAGS_GAGGED;
4508 return 0;
4509 }
4510
4511 static MODCMD_FUNC(cmd_ungag)
4512 {
4513 struct gag_entry *gag;
4514 unsigned int ungagged;
4515
4516 for (gag = gagList; gag; gag = gag->next)
4517 if (!strcmp(gag->mask, argv[1]))
4518 break;
4519
4520 if (!gag) {
4521 reply("OSMSG_GAG_NOT_FOUND", argv[1]);
4522 return 0;
4523 }
4524
4525 timeq_del(gag->expires, gag_expire, gag, 0);
4526 ungagged = gag_free(gag);
4527
4528 if (ungagged)
4529 reply("OSMSG_UNGAG_APPLIED", argv[1], ungagged);
4530 else
4531 reply("OSMSG_UNGAG_ADDED", argv[1]);
4532 return 1;
4533 }
4534
4535 static MODCMD_FUNC(cmd_addalert)
4536 {
4537 opserv_alert_reaction reaction;
4538 struct svccmd *subcmd;
4539 const char *name;
4540 char buf[MAXLEN];
4541
4542 name = argv[1];
4543 sprintf(buf, "addalert %s", argv[2]);
4544 if (!(subcmd = dict_find(opserv_service->commands, buf, NULL))) {
4545 reply("OSMSG_UNKNOWN_REACTION", argv[2]);
4546 return 0;
4547 }
4548 if (!irccasecmp(argv[2], "notice"))
4549 reaction = REACT_NOTICE;
4550 else if (!irccasecmp(argv[2], "kill"))
4551 reaction = REACT_KILL;
4552 else if (!irccasecmp(argv[2], "silent"))
4553 reaction = REACT_SILENT;
4554 else if (!irccasecmp(argv[2], "gline"))
4555 reaction = REACT_GLINE;
4556 else if (!irccasecmp(argv[2], "track")) {
4557 #ifndef HAVE_TRACK
4558 send_message(user, opserv, "OSMSG_TRACK_DISABLED");
4559 return 0;
4560 #else
4561 reaction = REACT_TRACK;
4562 #endif
4563 } else if (!irccasecmp(argv[2], "shun"))
4564 reaction = REACT_SHUN;
4565 else {
4566 reply("OSMSG_UNKNOWN_REACTION", argv[2]);
4567 return 0;
4568 }
4569 if (!svccmd_can_invoke(user, opserv_service->bot, subcmd, channel, SVCCMD_NOISY)
4570 || !opserv_add_user_alert(user, name, reaction, unsplit_string(argv + 3, argc - 3, NULL)))
4571 return 0;
4572 reply("OSMSG_ADDED_ALERT", name);
4573 return 1;
4574 }
4575
4576 static MODCMD_FUNC(cmd_delalert)
4577 {
4578 unsigned int i;
4579 for (i=1; i<argc; i++) {
4580 dict_remove(opserv_nick_based_alerts, argv[i]);
4581 dict_remove(opserv_channel_alerts, argv[i]);
4582 if (dict_remove(opserv_user_alerts, argv[i]))
4583 reply("OSMSG_REMOVED_ALERT", argv[i]);
4584 else
4585 reply("OSMSG_NO_SUCH_ALERT", argv[i]);
4586 }
4587 return 1;
4588 }
4589
4590 static void
4591 opserv_conf_read(void)
4592 {
4593 struct record_data *rd;
4594 dict_t conf_node, child;
4595 const char *str, *str2;
4596 struct policer_params *pp;
4597 dict_iterator_t it;
4598
4599 rd = conf_get_node(OPSERV_CONF_NAME);
4600 if (!rd || rd->type != RECDB_OBJECT) {
4601 log_module(OS_LOG, LOG_ERROR, "config node `%s' is missing or has wrong type.", OPSERV_CONF_NAME);
4602 return;
4603 }
4604 conf_node = rd->d.object;
4605 str = database_get_data(conf_node, KEY_DEBUG_CHANNEL, RECDB_QSTRING);
4606 if (opserv && str) {
4607 str2 = database_get_data(conf_node, KEY_DEBUG_CHANNEL_MODES, RECDB_QSTRING);
4608 if (!str2)
4609 str2 = "+tinms";
4610 opserv_conf.debug_channel = AddChannel(str, now, str2, NULL, NULL);
4611 AddChannelUser(opserv, opserv_conf.debug_channel)->modes |= MODE_CHANOP;
4612 } else {
4613 opserv_conf.debug_channel = NULL;
4614 }
4615 str = database_get_data(conf_node, KEY_ALERT_CHANNEL, RECDB_QSTRING);
4616 if (opserv && str) {
4617 str2 = database_get_data(conf_node, KEY_ALERT_CHANNEL_MODES, RECDB_QSTRING);
4618 if (!str2)
4619 str2 = "+tns";
4620 opserv_conf.alert_channel = AddChannel(str, now, str2, NULL, NULL);
4621 AddChannelUser(opserv, opserv_conf.alert_channel)->modes |= MODE_CHANOP;
4622 } else {
4623 opserv_conf.alert_channel = NULL;
4624 }
4625 str = database_get_data(conf_node, KEY_STAFF_AUTH_CHANNEL, RECDB_QSTRING);
4626 if (opserv && str) {
4627 str2 = database_get_data(conf_node, KEY_STAFF_AUTH_CHANNEL_MODES, RECDB_QSTRING);
4628 if (!str2)
4629 str2 = "+timns";
4630 opserv_conf.staff_auth_channel = AddChannel(str, now, str2, NULL, NULL);
4631 AddChannelUser(opserv, opserv_conf.staff_auth_channel)->modes |= MODE_CHANOP;
4632 } else {
4633 opserv_conf.staff_auth_channel = NULL;
4634 }
4635
4636 str = database_get_data(conf_node, KEY_ADMIN_LEVEL, RECDB_QSTRING);
4637 opserv_conf.admin_level = str ? strtoul(str, NULL, 0): 800;
4638
4639 str = database_get_data(conf_node, KEY_UNTRUSTED_MAX, RECDB_QSTRING);
4640 opserv_conf.untrusted_max = str ? strtoul(str, NULL, 0) : 5;
4641 str = database_get_data(conf_node, KEY_PURGE_LOCK_DELAY, RECDB_QSTRING);
4642 opserv_conf.purge_lock_delay = str ? strtoul(str, NULL, 0) : 60;
4643 str = database_get_data(conf_node, KEY_JOIN_FLOOD_MODERATE, RECDB_QSTRING);
4644 opserv_conf.join_flood_moderate = str ? strtoul(str, NULL, 0) : 1;
4645 str = database_get_data(conf_node, KEY_JOIN_FLOOD_MODERATE_THRESH, RECDB_QSTRING);
4646 opserv_conf.join_flood_moderate_threshold = str ? strtoul(str, NULL, 0) : 50;
4647 str = database_get_data(conf_node, KEY_NICK, RECDB_QSTRING);
4648 if (opserv && str)
4649 NickChange(opserv, str, 0);
4650
4651 str = database_get_data(conf_node, KEY_CLONE_GLINE_DURATION, RECDB_QSTRING);
4652 opserv_conf.clone_gline_duration = str ? ParseInterval(str) : 3600;
4653 str = database_get_data(conf_node, KEY_BLOCK_GLINE_DURATION, RECDB_QSTRING);
4654 opserv_conf.block_gline_duration = str ? ParseInterval(str) : 3600;
4655
4656 str = database_get_data(conf_node, KEY_BLOCK_SHUN_DURATION, RECDB_QSTRING);
4657 opserv_conf.block_shun_duration = str ? ParseInterval(str) : 3600;
4658
4659 if (!opserv_conf.join_policer_params)
4660 opserv_conf.join_policer_params = policer_params_new();
4661 policer_params_set(opserv_conf.join_policer_params, "size", "20");
4662 policer_params_set(opserv_conf.join_policer_params, "drain-rate", "1");
4663 if ((child = database_get_data(conf_node, KEY_JOIN_POLICER, RECDB_OBJECT)))
4664 dict_foreach(child, set_policer_param, opserv_conf.join_policer_params);
4665
4666 for (it = dict_first(channels); it; it = iter_next(it)) {
4667 struct chanNode *cNode = iter_data(it);
4668 cNode->join_policer.params = opserv_conf.join_policer_params;
4669 }
4670
4671 if (opserv_conf.new_user_policer.params)
4672 pp = opserv_conf.new_user_policer.params;
4673 else
4674 pp = opserv_conf.new_user_policer.params = policer_params_new();
4675 policer_params_set(pp, "size", "200");
4676 policer_params_set(pp, "drain-rate", "3");
4677 if ((child = database_get_data(conf_node, KEY_NEW_USER_POLICER, RECDB_OBJECT)))
4678 dict_foreach(child, set_policer_param, pp);
4679 }
4680
4681 /* lame way to export opserv_conf value to nickserv.c ... */
4682 unsigned int
4683 opserv_conf_admin_level()
4684 {
4685 return(opserv_conf.admin_level);
4686 }
4687
4688 static void
4689 opserv_db_init(void) {
4690 /* set up opserv_trusted_hosts dict */
4691 dict_delete(opserv_trusted_hosts);
4692 opserv_trusted_hosts = dict_new();
4693 dict_set_free_data(opserv_trusted_hosts, free_trusted_host);
4694 /* set up opserv_chan_warn dict */
4695
4696 /* alert trace notice channel #x replaces warnings
4697 dict_delete(opserv_chan_warn);
4698 opserv_chan_warn = dict_new();
4699 dict_set_free_keys(opserv_chan_warn, free);
4700 dict_set_free_data(opserv_chan_warn, free);
4701 */
4702 /* set up opserv_user_alerts */
4703 dict_delete(opserv_channel_alerts);
4704 opserv_channel_alerts = dict_new();
4705 dict_delete(opserv_nick_based_alerts);
4706 opserv_nick_based_alerts = dict_new();
4707 dict_delete(opserv_user_alerts);
4708 opserv_user_alerts = dict_new();
4709 dict_set_free_keys(opserv_user_alerts, free);
4710 dict_set_free_data(opserv_user_alerts, opserv_free_user_alert);
4711 /* set up opserv_bad_words */
4712 free_string_list(opserv_bad_words);
4713 opserv_bad_words = alloc_string_list(4);
4714 /* and opserv_exempt_channels */
4715 dict_delete(opserv_exempt_channels);
4716 opserv_exempt_channels = dict_new();
4717 dict_set_free_keys(opserv_exempt_channels, free);
4718 }
4719
4720 static void
4721 opserv_db_cleanup(void)
4722 {
4723 unsigned int nn;
4724
4725 /* dict_delete(opserv_chan_warn); */
4726 dict_delete(opserv_reserved_nick_dict);
4727 free_string_list(opserv_bad_words);
4728 dict_delete(opserv_exempt_channels);
4729 dict_delete(opserv_trusted_hosts);
4730 unreg_del_user_func(opserv_user_cleanup);
4731 dict_delete(opserv_hostinfo_dict);
4732 dict_delete(opserv_nick_based_alerts);
4733 dict_delete(opserv_channel_alerts);
4734 dict_delete(opserv_user_alerts);
4735 for (nn=0; nn<ArrayLength(level_strings); ++nn)
4736 free(level_strings[nn]);
4737 while (gagList)
4738 gag_free(gagList);
4739 policer_params_delete(opserv_conf.join_policer_params);
4740 policer_params_delete(opserv_conf.new_user_policer.params);
4741 }
4742
4743 void
4744 init_opserv(const char *nick)
4745 {
4746 OS_LOG = log_register_type("OpServ", "file:opserv.log");
4747 if (nick) {
4748 const char *modes = conf_get_data("services/opserv/modes", RECDB_QSTRING);
4749 opserv = AddService(nick, modes ? modes : NULL, "Oper Services", NULL);
4750 }
4751 conf_register_reload(opserv_conf_read);
4752
4753 memset(level_strings, 0, sizeof(level_strings));
4754 opserv_module = module_register("OpServ", OS_LOG, "opserv.help", opserv_help_expand);
4755 opserv_define_func("ACCESS", cmd_access, 0, 0, 0);
4756 opserv_define_func("ADDALERT", cmd_addalert, 800, 0, 4);
4757 opserv_define_func("ADDALERT NOTICE", NULL, 0, 0, 0);
4758 opserv_define_func("ADDALERT SILENT", NULL, 900, 0, 0);
4759 opserv_define_func("ADDALERT GLINE", NULL, 900, 0, 0);
4760 opserv_define_func("ADDALERT SHUN", NULL, 900, 0, 0);
4761 opserv_define_func("ADDALERT TRACK", NULL, 900, 0, 0);
4762 opserv_define_func("ADDALERT KILL", NULL, 900, 0, 0);
4763 opserv_define_func("ADDBAD", cmd_addbad, 800, 0, 2);
4764 opserv_define_func("ADDEXEMPT", cmd_addexempt, 800, 0, 2);
4765 opserv_define_func("ADDTRUST", cmd_addtrust, 800, 0, 5);
4766 opserv_define_func("BAN", cmd_ban, 100, 2, 2);
4767 opserv_define_func("BLOCK", cmd_block, 100, 0, 2);
4768 opserv_define_func("CHANINFO", cmd_chaninfo, 0, 3, 0);
4769 opserv_define_func("CLEARBANS", cmd_clearbans, 300, 2, 0);
4770 opserv_define_func("CLEARMODES", cmd_clearmodes, 400, 2, 0);
4771 opserv_define_func("CLONE", cmd_clone, 999, 0, 3);
4772 opserv_define_func("COLLIDE", cmd_collide, 800, 0, 5);
4773 opserv_define_func("CSEARCH", cmd_csearch, 100, 0, 3);
4774 opserv_define_func("CSEARCH COUNT", cmd_csearch, 0, 0, 0);
4775 opserv_define_func("CSEARCH PRINT", cmd_csearch, 0, 0, 0);
4776 opserv_define_func("DELALERT", cmd_delalert, 800, 0, 2);
4777 opserv_define_func("DELBAD", cmd_delbad, 800, 0, 2);
4778 opserv_define_func("DELEXEMPT", cmd_delexempt, 800, 0, 2);
4779 opserv_define_func("DELTRUST", cmd_deltrust, 800, 0, 2);
4780 opserv_define_func("DEOP", cmd_deop, 100, 2, 2);
4781 opserv_define_func("DEOPALL", cmd_deopall, 400, 2, 0);
4782 opserv_define_func("DEHOP", cmd_dehop, 100, 2, 2);
4783 opserv_define_func("DEHOPALL", cmd_dehopall, 400, 2, 0);
4784 opserv_define_func("DEVOICEALL", cmd_devoiceall, 300, 2, 0);
4785 opserv_define_func("DIE", cmd_die, 900, 0, 2);
4786 opserv_define_func("DUMP", cmd_dump, 999, 0, 2);
4787 opserv_define_func("EDITTRUST", cmd_edittrust, 800, 0, 5);
4788 opserv_define_func("GAG", cmd_gag, 600, 0, 4);
4789 opserv_define_func("GLINE", cmd_gline, 600, 0, 4);
4790 opserv_define_func("GSYNC", cmd_gsync, 600, 0, 0);
4791 opserv_define_func("GTRACE", cmd_gtrace, 100, 0, 3);
4792 opserv_define_func("GTRACE COUNT", NULL, 0, 0, 0);
4793 opserv_define_func("GTRACE PRINT", NULL, 0, 0, 0);
4794 opserv_define_func("SBLOCK", cmd_sblock, 100, 0, 2);
4795 opserv_define_func("SHUN", cmd_shun, 600, 0, 4);
4796 opserv_define_func("SSYNC", cmd_ssync, 600, 0, 0);
4797 opserv_define_func("STRACE", cmd_strace, 100, 0, 3);
4798 opserv_define_func("STRACE COUNT", NULL, 0, 0, 0);
4799 opserv_define_func("STRACE PRINT", NULL, 0, 0, 0);
4800 opserv_define_func("INVITE", cmd_invite, 100, 2, 0);
4801 opserv_define_func("INVITEME", cmd_inviteme, 100, 0, 0);
4802 opserv_define_func("JOIN", cmd_join, 601, 0, 2);
4803 opserv_define_func("JUMP", cmd_jump, 900, 0, 2);
4804 opserv_define_func("JUPE", cmd_jupe, 900, 0, 4);
4805 opserv_define_func("KICK", cmd_kick, 100, 2, 2);
4806 opserv_define_func("KICKALL", cmd_kickall, 400, 2, 0);
4807 opserv_define_func("KICKBAN", cmd_kickban, 100, 2, 2);
4808 opserv_define_func("KICKBANALL", cmd_kickbanall, 450, 2, 0);
4809 opserv_define_func("LOG", cmd_log, 900, 0, 2);
4810 opserv_define_func("MODE", cmd_mode, 100, 2, 2);
4811 opserv_define_func("OP", cmd_op, 100, 2, 2);
4812 opserv_define_func("OPALL", cmd_opall, 400, 2, 0);
4813 opserv_define_func("HOP", cmd_hop, 100, 2, 2);
4814 opserv_define_func("HOPALL", cmd_hopall, 400, 2, 0);
4815 opserv_define_func("PART", cmd_part, 601, 0, 2);
4816 opserv_define_func("QUERY", cmd_query, 0, 0, 0);
4817 opserv_define_func("RAW", cmd_raw, 999, 0, 2);
4818 opserv_define_func("RECONNECT", cmd_reconnect, 900, 0, 0);
4819 opserv_define_func("REFRESHG", cmd_refreshg, 600, 0, 0);
4820 opserv_define_func("REFRESHS", cmd_refreshs, 600, 0, 0);
4821 opserv_define_func("REHASH", cmd_rehash, 900, 0, 0);
4822 opserv_define_func("REOPEN", cmd_reopen, 900, 0, 0);
4823 opserv_define_func("RESERVE", cmd_reserve, 800, 0, 5);
4824 opserv_define_func("RESTART", cmd_restart, 900, 0, 2);
4825 opserv_define_func("SET", cmd_set, 900, 0, 3);
4826 opserv_define_func("SETTIME", cmd_settime, 901, 0, 0);
4827 opserv_define_func("STATS ALERTS", cmd_stats_alerts, 0, 0, 0);
4828 opserv_define_func("STATS BAD", cmd_stats_bad, 0, 0, 0);
4829 opserv_define_func("STATS GAGS", cmd_stats_gags, 0, 0, 0);
4830 opserv_define_func("STATS GLINES", cmd_stats_glines, 0, 0, 0);
4831 opserv_define_func("STATS SHUNS", cmd_stats_shuns, 0, 0, 0);
4832 opserv_define_func("STATS LINKS", cmd_stats_links, 0, 0, 0);
4833 opserv_define_func("STATS MAX", cmd_stats_max, 0, 0, 0);
4834 opserv_define_func("STATS NETWORK", cmd_stats_network, 0, 0, 0);
4835 opserv_define_func("STATS NETWORK2", cmd_stats_network2, 0, 0, 0);
4836 opserv_define_func("STATS RESERVED", cmd_stats_reserved, 0, 0, 0);
4837 opserv_define_func("STATS TIMEQ", cmd_stats_timeq, 0, 0, 0);
4838 opserv_define_func("STATS TRUSTED", cmd_stats_trusted, 0, 0, 0);
4839 opserv_define_func("STATS UPLINK", cmd_stats_uplink, 0, 0, 0);
4840 opserv_define_func("STATS UPTIME", cmd_stats_uptime, 0, 0, 0);
4841 /* opserv_define_func("STATS WARN", cmd_stats_warn, 0, 0, 0); */
4842 #if defined(WITH_MALLOC_X3) || defined(WITH_MALLOC_SLAB)
4843 opserv_define_func("STATS MEMORY", cmd_stats_memory, 0, 0, 0);
4844 #endif
4845 opserv_define_func("TRACE", cmd_trace, 100, 0, 3);
4846 opserv_define_func("TRACE PRINT", NULL, 0, 0, 0);
4847 opserv_define_func("TRACE COUNT", NULL, 0, 0, 0);
4848 opserv_define_func("TRACE DOMAINS", NULL, 0, 0, 0);
4849 opserv_define_func("TRACE GLINE", NULL, 600, 0, 0);
4850 opserv_define_func("TRACE SHUN", NULL, 600, 0, 0);
4851 opserv_define_func("TRACE GAG", NULL, 600, 0, 0);
4852 opserv_define_func("TRACE KILL", NULL, 600, 0, 0);
4853 opserv_define_func("UNBAN", cmd_unban, 100, 2, 2);
4854 opserv_define_func("UNGAG", cmd_ungag, 600, 0, 2);
4855 opserv_define_func("UNGLINE", cmd_ungline, 600, 0, 2);
4856 modcmd_register(opserv_module, "GTRACE UNGLINE", NULL, 0, 0, "template", "ungline", NULL);
4857 opserv_define_func("UNSHUN", cmd_unshun, 600, 0, 2);
4858 modcmd_register(opserv_module, "GTRACE UNSHUN", NULL, 0, 0, "template", "unshun", NULL);
4859 opserv_define_func("UNJUPE", cmd_unjupe, 900, 0, 2);
4860 opserv_define_func("UNRESERVE", cmd_unreserve, 800, 0, 2);
4861 /* opserv_define_func("UNWARN", cmd_unwarn, 800, 0, 0); */
4862 opserv_define_func("VOICEALL", cmd_voiceall, 300, 2, 0);
4863 /* opserv_define_func("WARN", cmd_warn, 800, 0, 2); */
4864 opserv_define_func("WHOIS", cmd_whois, 0, 0, 2);
4865
4866 opserv_reserved_nick_dict = dict_new();
4867 opserv_hostinfo_dict = dict_new();
4868 dict_set_free_keys(opserv_hostinfo_dict, free);
4869 dict_set_free_data(opserv_hostinfo_dict, opserv_free_hostinfo);
4870
4871 reg_new_user_func(opserv_new_user_check);
4872 reg_nick_change_func(opserv_alert_check_nick);
4873 reg_del_user_func(opserv_user_cleanup);
4874 reg_new_channel_func(opserv_channel_check);
4875 reg_del_channel_func(opserv_channel_delete);
4876 reg_join_func(opserv_join_check);
4877 reg_auth_func(opserv_staff_alert);
4878
4879 opserv_db_init();
4880 saxdb_register("OpServ", opserv_saxdb_read, opserv_saxdb_write);
4881 if (nick)
4882 {
4883 opserv_service = service_register(opserv);
4884 opserv_service->trigger = '?';
4885 }
4886
4887 reg_exit_func(opserv_db_cleanup);
4888 message_register_table(msgtab);
4889 }
Unnamed repository; edit this file 'description' to name the repository.