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