Display detailed usercounts in !peek (ops/voices/regulars)
[srvx.git] / src / chanserv.c
1 /* chanserv.c - Channel service bot
2  * Copyright 2000-2007 srvx Development Team
3  *
4  * This file is part of srvx.
5  *
6  * srvx 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 "chanserv.h"
22 #include "conf.h"
23 #include "global.h"
24 #include "modcmd.h"
25 #include "opserv.h" /* for opserv_bad_channel() */
26 #include "nickserv.h" /* for oper_outranks() */
27 #include "saxdb.h"
28 #include "timeq.h"
29
30 #define CHANSERV_CONF_NAME  "services/chanserv"
31
32 /* ChanServ options */
33 #define KEY_SUPPORT_CHANNEL         "support_channel"
34 #define KEY_SUPPORT_CHANNEL_MODES   "support_channel_modes"
35 #define KEY_DB_BACKUP_FREQ          "db_backup_freq"
36 #define KEY_INFO_DELAY              "info_delay"
37 #define KEY_MAX_GREETLEN            "max_greetlen"
38 #define KEY_ADJUST_THRESHOLD        "adjust_threshold"
39 #define KEY_ADJUST_DELAY            "adjust_delay"
40 #define KEY_CHAN_EXPIRE_FREQ        "chan_expire_freq"
41 #define KEY_CHAN_EXPIRE_DELAY       "chan_expire_delay"
42 #define KEY_DNR_EXPIRE_FREQ         "dnr_expire_freq"
43 #define KEY_MAX_CHAN_USERS          "max_chan_users"
44 #define KEY_MAX_CHAN_BANS           "max_chan_bans"
45 #define KEY_NICK                    "nick"
46 #define KEY_OLD_CHANSERV_NAME       "old_chanserv_name"
47 #define KEY_8BALL_RESPONSES         "8ball"
48 #define KEY_OLD_BAN_NAMES           "old_ban_names"
49 #define KEY_REFRESH_PERIOD          "refresh_period"
50 #define KEY_CTCP_SHORT_BAN_DURATION "ctcp_short_ban_duration"
51 #define KEY_CTCP_LONG_BAN_DURATION  "ctcp_long_ban_duration"
52 #define KEY_MAX_OWNED               "max_owned"
53 #define KEY_IRC_OPERATOR_EPITHET    "irc_operator_epithet"
54 #define KEY_NETWORK_HELPER_EPITHET  "network_helper_epithet"
55 #define KEY_SUPPORT_HELPER_EPITHET  "support_helper_epithet"
56 #define KEY_NODELETE_LEVEL          "nodelete_level"
57 #define KEY_MAX_USERINFO_LENGTH     "max_userinfo_length"
58 #define KEY_GIVEOWNERSHIP_PERIOD    "giveownership_timeout"
59
60 /* ChanServ database */
61 #define KEY_CHANNELS                "channels"
62 #define KEY_NOTE_TYPES              "note_types"
63
64 /* Note type parameters */
65 #define KEY_NOTE_OPSERV_ACCESS      "opserv_access"
66 #define KEY_NOTE_CHANNEL_ACCESS     "channel_access"
67 #define KEY_NOTE_SETTER_ACCESS      "setter_access"
68 #define KEY_NOTE_VISIBILITY         "visibility"
69 #define KEY_NOTE_VIS_PRIVILEGED     "privileged"
70 #define KEY_NOTE_VIS_CHANNEL_USERS  "channel_users"
71 #define KEY_NOTE_VIS_ALL            "all"
72 #define KEY_NOTE_MAX_LENGTH         "max_length"
73 #define KEY_NOTE_SETTER             "setter"
74 #define KEY_NOTE_NOTE               "note"
75
76 /* Do-not-register channels */
77 #define KEY_DNR             "dnr"
78 #define KEY_DNR_SET         "set"
79 #define KEY_DNR_SETTER      "setter"
80 #define KEY_DNR_REASON      "reason"
81
82 /* Channel data */
83 #define KEY_REGISTERED      "registered"
84 #define KEY_REGISTRAR       "registrar"
85 #define KEY_SUSPENDED       "suspended"
86 #define KEY_PREVIOUS        "previous"
87 #define KEY_SUSPENDER       "suspender"
88 #define KEY_ISSUED          "issued"
89 #define KEY_REVOKED         "revoked"
90 #define KEY_SUSPEND_EXPIRES "suspend_expires"
91 #define KEY_SUSPEND_REASON  "suspend_reason"
92 #define KEY_VISITED         "visited"
93 #define KEY_TOPIC           "topic"
94 #define KEY_GREETING        "greeting"
95 #define KEY_USER_GREETING   "user_greeting"
96 #define KEY_MODES           "modes"
97 #define KEY_FLAGS           "flags"
98 #define KEY_OPTIONS         "options"
99 #define KEY_USERS           "users"
100 #define KEY_BANS            "bans"
101 #define KEY_MAX             "max"
102 #define KEY_NOTES           "notes"
103 #define KEY_TOPIC_MASK      "topic_mask"
104 #define KEY_OWNER_TRANSFER  "owner_transfer"
105
106 /* User data */
107 #define KEY_LEVEL   "level"
108 #define KEY_INFO    "info"
109 #define KEY_SEEN    "seen"
110
111 /* Ban data */
112 #define KEY_OWNER       "owner"
113 #define KEY_REASON      "reason"
114 #define KEY_SET         "set"
115 #define KEY_DURATION    "duration"
116 #define KEY_EXPIRES     "expires"
117 #define KEY_TRIGGERED   "triggered"
118
119 #define CHANNEL_DEFAULT_FLAGS   (CHANNEL_OFFCHANNEL | CHANNEL_UNREVIEWED)
120 #define CHANNEL_PRESERVED_FLAGS (CHANNEL_UNREVIEWED)
121 #define CHANNEL_DEFAULT_OPTIONS "lmoooanpcnat"
122
123 /* Administrative messages */
124 static const struct message_entry msgtab[] = {
125     { "CSMSG_CHANNELS_EXPIRED", "%i channels expired." },
126
127 /* Channel registration */
128     { "CSMSG_REG_SUCCESS", "You now have ownership of $b%s$b." },
129     { "CSMSG_PROXY_SUCCESS", "%s now has ownership of $b%s$b." },
130     { "CSMSG_ALREADY_REGGED", "$b%s$b is registered to someone else." },
131     { "CSMSG_MUST_BE_OPPED", "You must be a channel operator in $b%s$b to register it." },
132     { "CSMSG_PROXY_FORBIDDEN", "You may not register a channel for someone else." },
133     { "CSMSG_OWN_TOO_MANY", "%s already owns enough channels (at least %d); use FORCE to override." },
134
135 /* Do-not-register channels */
136     { "CSMSG_NOT_DNR", "$b%s$b is not a valid channel name or *account." },
137     { "CSMSG_DNR_SEARCH_RESULTS", "The following do-not-registers were found:" },
138     { "CSMSG_DNR_INFO", "$b%s$b is do-not-register (by $b%s$b): %s" },
139     { "CSMSG_DNR_INFO_SET", "$b%s$b is do-not-register (set %s by $b%s$b): %s" },
140     { "CSMSG_DNR_INFO_SET_EXPIRES", "$b%s$b is do-not-register (set %s by $b%s$b; expires %s): %s" },
141     { "CSMSG_MORE_DNRS", "%d more do-not-register entries skipped." },
142     { "CSMSG_DNR_CHANNEL", "Only network staff may register $b%s$b." },
143     { "CSMSG_DNR_CHANNEL_MOVE", "Only network staff may move $b%s$b." },
144     { "CSMSG_DNR_ACCOUNT", "Only network staff may register channels to $b%s$b." },
145     { "CSMSG_NOREGISTER_CHANNEL", "$b%s$b has been added to the do-not-register list." },
146     { "CSMSG_NO_SUCH_DNR", "$b%s$b is not in the do-not-register list." },
147     { "CSMSG_DNR_REMOVED", "$b%s$b has been removed from the do-not-register list." },
148     { "CSMSG_DNR_BAD_ACTION", "$b%s$b is not a recognized do-not-register action." },
149     { "CSMSG_DNR_SEARCH_RESULTS", "The following do-not-registers were found:" },
150
151 /* Channel unregistration */
152     { "CSMSG_UNREG_SUCCESS", "$b%s$b has been unregistered." },
153     { "CSMSG_UNREG_NODELETE", "$b%s$b is protected from unregistration." },
154     { "CSMSG_CHAN_SUSPENDED", "$b$C$b access to $b%s$b has been temporarily suspended (%s)." },
155     { "CSMSG_CONFIRM_UNREG", "To confirm this unregistration, you must use 'unregister %s'." },
156
157 /* Channel moving */
158     { "CSMSG_MOVE_SUCCESS", "Channel registration has been moved to $b%s$b." },
159     { "CSMSG_MOVE_NODELETE", "$b%s$b is protected from unregistration, and cannot be moved." },
160
161 /* Channel merging */
162     { "CSMSG_MERGE_SUCCESS", "Channel successfully merged into $b%s$b." },
163     { "CSMSG_MERGE_SELF", "Merging cannot be performed if the source and target channels are the same." },
164     { "CSMSG_MERGE_NODELETE", "You may not merge a channel that is marked NoDelete." },
165     { "CSMSG_MERGE_SUSPENDED", "Merging cannot be performed if the source or target channel is suspended." },
166     { "CSMSG_MERGE_NOT_OWNER", "You must be the owner of the target channel (or a helper) to merge into the channel." },
167
168 /* Handle unregistration */
169     { "CSMSG_HANDLE_UNREGISTERED", "As a result of your account unregistration, you have been deleted from all of your channels' userlists." },
170
171 /* Error messages */
172     { "CSMSG_NOT_USER", "You lack access to $b%s$b." },
173     { "CSMSG_NO_CHAN_USER", "%s lacks access to $b%s$b." },
174     { "CSMSG_NO_ACCESS", "You lack sufficient access to use this command." },
175     { "CSMSG_NOT_REGISTERED", "$b%s$b has not been registered with $b$C$b." },
176     { "CSMSG_MAXIMUM_BANS", "This channel has reached the ban count limit of $b%d$b." },
177     { "CSMSG_MAXIMUM_USERS", "This channel has reached the user count limit of $b%d$b." },
178     { "CSMSG_ILLEGAL_CHANNEL", "$b%s$b is an illegal channel, and cannot be registered." },
179     { "CSMSG_GODMODE_UP", "You may not use $b%s$b to op yourself unless you are on the user list.  Use the $bop$b command instead." },
180     { "CSMSG_ALREADY_OPPED", "You are already opped in $b%s$b." },
181     { "CSMSG_ALREADY_VOICED", "You are already voiced in $b%s$b." },
182     { "CSMSG_ALREADY_DOWN", "You are not opped or voiced in $b%s$b." },
183     { "CSMSG_ALREADY_OPCHANNED", "There has been no net.join since the last opchan in $b%s$b." },
184     { "CSMSG_OUT_OF_CHANNEL", "For some reason I don't seem to be in $b%s$b." },
185     { "CSMSG_OPCHAN_DONE", "I have (re-)opped myself in $b%s$b." },
186
187 /* Removing yourself from a channel. */
188     { "CSMSG_NO_OWNER_DELETEME", "You cannot delete your owner access in $b%s$b." },
189     { "CSMSG_CONFIRM_DELETEME", "To really remove yourself, you must use 'deleteme %s'." },
190     { "CSMSG_DELETED_YOU", "Your $b%d$b access has been deleted from $b%s$b." },
191
192 /* User management */
193     { "CSMSG_ADDED_USER", "Added %s to the %s user list with access %d." },
194     { "CSMSG_DELETED_USER", "Deleted %s (with access %d) from the %s user list." },
195     { "CSMSG_BAD_RANGE", "Invalid access range; minimum (%d) must be greater than maximum (%d)." },
196     { "CSMSG_DELETED_USERS", "Deleted accounts matching $b%s$b with access from $b%d$b to $b%d$b from the %s user list." },
197     { "CSMSG_TRIMMED_USERS", "Trimmed $b%d users$b with access from %d to %d from the %s user list who were inactive for at least %s." },
198     { "CSMSG_INCORRECT_ACCESS", "%s has access $b%d$b, not %s." },
199     { "CSMSG_USER_EXISTS", "%s is already on the $b%s$b user list (with access %d)." },
200     { "CSMSG_CANNOT_TRIM", "You must include a minimum inactivity duration of at least 60 seconds to trim." },
201
202     { "CSMSG_NO_SELF_CLVL", "You cannot change your own access." },
203     { "CSMSG_NO_BUMP_ACCESS", "You cannot give users access greater than or equal to your own." },
204     { "CSMSG_MULTIPLE_OWNERS", "There is more than one owner in %s; please use $bCLVL$b, $bDELOWNER$b and/or $bADDOWNER$b instead." },
205     { "CSMSG_TRANSFER_WAIT", "You must wait %s before you can give ownership of $b%s$b to someone else." },
206     { "CSMSG_NO_TRANSFER_SELF", "You cannot give ownership to your own account." },
207     { "CSMSG_CONFIRM_GIVEOWNERSHIP", "To really give ownership to $b%1$s$b, you must use 'giveownership *%1$s %2$s'." },
208     { "CSMSG_OWNERSHIP_GIVEN", "Ownership of $b%s$b has been transferred to account $b%s$b." },
209
210 /* Ban management */
211     { "CSMSG_BAN_ADDED", "Permanently banned $b%s$b from %s." },
212     { "CSMSG_TIMED_BAN_ADDED", "Banned $b%s$b from %s for %s." },
213     { "CSMSG_KICK_BAN_DONE", "Kickbanned $b%s$b from %s." },
214     { "CSMSG_BAN_DONE", "Banned $b%s$b from %s." },
215     { "CSMSG_REASON_CHANGE", "Reason for ban $b%s$b changed." },
216     { "CSMSG_BAN_EXTENDED", "Extended ban for $b%s$b expires in %s." },
217     { "CSMSG_BAN_REMOVED", "Matching ban(s) for $b%s$b removed." },
218     { "CSMSG_TRIMMED_BANS", "Trimmed $b%d bans$b from the %s ban list that were inactive for at least %s." },
219     { "CSMSG_REDUNDANT_BAN", "$b%s$b is already banned in %s." },
220     { "CSMSG_DURATION_TOO_LOW", "Timed bans must last for at least 15 seconds." },
221     { "CSMSG_DURATION_TOO_HIGH", "Timed bans must last for less than 2 years." },
222     { "CSMSG_LAME_MASK", "$b%s$b is a little too general. Try making it more specific." },
223     { "CSMSG_MASK_PROTECTED", "Sorry, ban for $b%s$b conflicts with a protected user's hostmask." },
224     { "CSMSG_NO_MATCHING_USERS", "No one in $b%s$b has a hostmask matching $b%s$b." },
225     { "CSMSG_BAN_NOT_FOUND", "Sorry, no ban found for $b%s$b." },
226     { "CSMSG_BANLIST_FULL", "The $b%s$b channel ban list is $bfull$b." },
227
228     { "CSMSG_INVALID_TRIM", "$b%s$b isn't a valid trim target." },
229
230 /* Channel management */
231     { "CSMSG_CHANNEL_OPENED", "$b%s$b has been opened." },
232     { "CSMSG_WIPED_INFO_LINE", "Removed $b%s$b's infoline in $b%s$b." },
233     { "CSMSG_RESYNCED_USERS", "Synchronized users in $b%s$b with the userlist." },
234
235     { "CSMSG_TOPIC_SET", "Topic is now '%s'." },
236     { "CSMSG_NO_TOPIC", "$b%s$b does not have a default topic." },
237     { "CSMSG_TOPICMASK_CONFLICT1", "I do not know how to make that topic work with the current topic mask in $b%s$b, which is: %s" },
238     { "CSMSG_TOPICMASK_CONFLICT2", "Please make sure your topic is at most %d characters and matches the topic mask pattern." },
239     { "CSMSG_TOPIC_LOCKED", "The %s topic is locked." },
240     { "CSMSG_MASK_BUT_NO_TOPIC", "Warning: $b%s$b does not have a default topic, but you just set the topic mask." },
241     { "CSMSG_TOPIC_MISMATCH", "Warning: The default topic for $b%s$b does not match the topic mask; changing it anyway." },
242
243     { "CSMSG_MODES_SET", "Channel modes are now $b%s$b." },
244     { "CSMSG_DEFAULTED_MODES", "Channel modes for $b%s$b are set to their defaults." },
245     { "CSMSG_NO_MODES", "$b%s$b does not have any default modes." },
246     { "CSMSG_MODE_LOCKED", "Modes conflicting with $b%s$b are not allowed in %s." },
247     { "CSMSG_CANNOT_SET", "That setting is above your current level, so you cannot change it." },
248     { "CSMSG_OWNER_DEFAULTS", "You must have access 500 in %s to reset it to the default options." },
249     { "CSMSG_CONFIRM_DEFAULTS", "To reset %s's settings to the defaults, you must use 'set defaults %s'." },
250     { "CSMSG_SETTINGS_DEFAULTED", "All settings for %s have been reset to default values." },
251     { "CSMSG_BAD_SETLEVEL", "You cannot change any setting to above your level." },
252     { "CSMSG_BAD_GIVEVOICE", "You cannot change GiveVoice to above GiveOps (%d)." },
253     { "CSMSG_BAD_GIVEOPS", "You cannot change GiveOps to below GiveVoice (%d)." },
254     { "CSMSG_BAD_SETTERS", "You cannot change Setters to above your level." },
255     { "CSMSG_INVALID_MODE_LOCK", "$b%s$b is an invalid mode lock." },
256     { "CSMSG_INVALID_NUMERIC",   "$b%d$b is not a valid choice.  Choose one:" },
257     { "CSMSG_SET_DEFAULT_TOPIC", "$bDefaultTopic$b %s" },
258     { "CSMSG_SET_TOPICMASK",     "$bTopicMask   $b %s" },
259     { "CSMSG_SET_GREETING",      "$bGreeting    $b %s" },
260     { "CSMSG_SET_USERGREETING",  "$bUserGreeting$b %s" },
261     { "CSMSG_SET_MODES",         "$bModes       $b %s" },
262     { "CSMSG_SET_NODELETE",      "$bNoDelete    $b %s" },
263     { "CSMSG_SET_DYNLIMIT",      "$bDynLimit    $b %s" },
264     { "CSMSG_SET_OFFCHANNEL",    "$bOffChannel  $b %s" },
265     { "CSMSG_SET_USERINFO",      "$bUserInfo    $b %d" },
266     { "CSMSG_SET_GIVE_VOICE",    "$bGiveVoice   $b %d" },
267     { "CSMSG_SET_TOPICSNARF",    "$bTopicSnarf  $b %d" },
268     { "CSMSG_SET_INVITEME",      "$bInviteMe    $b %d" },
269     { "CSMSG_SET_ENFOPS",        "$bEnfOps      $b %d" },
270     { "CSMSG_SET_GIVE_OPS",      "$bGiveOps     $b %d" },
271     { "CSMSG_SET_ENFMODES",      "$bEnfModes    $b %d" },
272     { "CSMSG_SET_ENFTOPIC",      "$bEnfTopic    $b %d" },
273     { "CSMSG_SET_PUBCMD",        "$bPubCmd      $b %d" },
274     { "CSMSG_SET_SETTERS",       "$bSetters     $b %d" },
275     { "CSMSG_SET_CTCPUSERS",     "$bCTCPUsers   $b %d" },
276     { "CSMSG_SET_PROTECT",       "$bProtect     $b %d - %s" },
277     { "CSMSG_SET_TOYS",          "$bToys        $b %d - %s" },
278     { "CSMSG_SET_CTCPREACTION",  "$bCTCPReaction$b %d - %s" },
279     { "CSMSG_SET_TOPICREFRESH",  "$bTopicRefresh$b %d - %s" },
280     { "CSMSG_SET_UNREVIEWED",    "$bUnreviewed  $b %s" },
281     { "CSMSG_USET_NOAUTOOP",     "$bNoAutoOp    $b %s" },
282     { "CSMSG_USET_NOAUTOVOICE",  "$bNoAutoVoice $b %s" },
283     { "CSMSG_USET_AUTOINVITE",   "$bAutoInvite  $b %s" },
284     { "CSMSG_USET_INFO",         "$bInfo        $b %s" },
285
286     { "CSMSG_USER_PROTECTED", "Sorry, $b%s$b is protected." },
287     { "CSMSG_OPBY_LOCKED", "You may not op users who lack op or greater access." },
288     { "CSMSG_PROCESS_FAILED", "$b$C$b could not process some of the nicks you provided." },
289     { "CSMSG_OPPED_USERS", "Opped users in $b%s$b." },
290     { "CSMSG_DEOPPED_USERS", "Deopped users in $b%s$b." },
291     { "CSMSG_VOICED_USERS", "Voiced users in $b%s$b." },
292     { "CSMSG_DEVOICED_USERS", "Devoiced users in $b%s$b." },
293     { "CSMSG_PROTECT_ALL", "Non-users and users will be protected from those of equal or lower access." },
294     { "CSMSG_PROTECT_EQUAL", "Users will be protected from those of equal or lower access." },
295     { "CSMSG_PROTECT_LOWER", "Users will be protected from those of lower access." },
296     { "CSMSG_PROTECT_NONE", "No users will be protected." },
297     { "CSMSG_TOYS_DISABLED", "Toys are completely disabled." },
298     { "CSMSG_TOYS_PRIVATE", "Toys will only reply privately." },
299     { "CSMSG_TOYS_PUBLIC", "Toys will reply publicly." },
300     { "CSMSG_TOPICREFRESH_NEVER", "Never refresh topic." },
301     { "CSMSG_TOPICREFRESH_3_HOURS", "Refresh every 3 hours." },
302     { "CSMSG_TOPICREFRESH_6_HOURS", "Refresh every 6 hours." },
303     { "CSMSG_TOPICREFRESH_12_HOURS", "Refresh every 12 hours." },
304     { "CSMSG_TOPICREFRESH_24_HOURS", "Refresh every 24 hours." },
305     { "CSMSG_CTCPREACTION_KICK", "Kick on disallowed CTCPs" },
306     { "CSMSG_CTCPREACTION_KICKBAN", "Kickban on disallowed CTCPs" },
307     { "CSMSG_CTCPREACTION_SHORTBAN",  "Short timed ban on disallowed CTCPs" },
308     { "CSMSG_CTCPREACTION_LONGBAN", "Long timed ban on disallowed CTCPs" },
309
310     { "CSMSG_INVITED_USER", "Invited $b%s$b to join %s." },
311     { "CSMSG_INVITING_YOU_REASON", "$b%s$b invites you to join %s: %s" },
312     { "CSMSG_INVITING_YOU", "$b%s$b invites you to join %s." },
313     { "CSMSG_ALREADY_PRESENT", "%s is already in $b%s$b." },
314     { "CSMSG_YOU_ALREADY_PRESENT", "You are already in $b%s$b." },
315     { "CSMSG_LOW_CHANNEL_ACCESS", "You lack sufficient access in %s for $S to invite you." },
316     { "CSMSG_INFOLINE_TOO_LONG", "Your infoline may not exceed %u characters." },
317     { "CSMSG_BAD_INFOLINE", "You may not use the character \\%03o in your infoline." },
318
319     { "CSMSG_KICK_DONE", "Kicked $b%s$b from %s." },
320     { "CSMSG_NO_BANS", "No channel bans found on $b%s$b." },
321     { "CSMSG_BANS_REMOVED", "Removed all channel bans from $b%s$b." },
322
323 /* Channel userlist */
324     { "CSMSG_ACCESS_ALL_HEADER", "%s users from level %d to %d:" },
325     { "CSMSG_ACCESS_SEARCH_HEADER", "%s users from level %d to %d matching %s:" },
326     { "CSMSG_INVALID_ACCESS", "$b%s$b is an invalid access level." },
327     { "CSMSG_CHANGED_ACCESS", "%s now has access $b%d$b in %s." },
328
329 /* Channel note list */
330     { "CSMSG_NOTELIST_HEADER", "Notes for $b%s$b:" },
331     { "CSMSG_REPLACED_NOTE", "Replaced old $b%s$b note on %s (set by %s): %s" },
332     { "CSMSG_NOTE_FORMAT", "%s (set by %s): %s" },
333     { "CSMSG_NOTELIST_END", "End of notes for $b%s$b." },
334     { "CSMSG_NOTELIST_EMPTY", "There are no (visible) notes for $b%s$b." },
335     { "CSMSG_NO_SUCH_NOTE", "Channel $b%s$b does not have a note named $b%s$b." },
336     { "CSMSG_BAD_NOTE_TYPE", "Note type $b%s$b does not exist." },
337     { "CSMSG_NOTE_SET", "Note $b%s$b set in channel $b%s$b." },
338     { "CSMSG_NOTE_REMOVED", "Note $b%s$b removed in channel $b%s$b." },
339     { "CSMSG_BAD_NOTE_ACCESS", "$b%s$b is not a valid note access type." },
340     { "CSMSG_BAD_MAX_LENGTH", "$b%s$b is not a valid maximum length (must be between 20 and 450 inclusive)." },
341     { "CSMSG_NOTE_MODIFIED", "Note type $b%s$b modified." },
342     { "CSMSG_NOTE_CREATED", "Note type $b%s$b created." },
343     { "CSMSG_NOTE_TYPE_USED", "Note type $b%s$b is in use; give the FORCE argument to delete it." },
344     { "CSMSG_NOTE_DELETED", "Note type $b%s$b deleted." },
345
346 /* Channel [un]suspension */
347     { "CSMSG_ALREADY_SUSPENDED", "$b%s$b is already suspended." },
348     { "CSMSG_NOT_SUSPENDED", "$b%s$b is not suspended." },
349     { "CSMSG_SUSPENDED", "$b$C$b access to $b%s$b has been temporarily suspended." },
350     { "CSMSG_UNSUSPENDED", "$b$C$b access to $b%s$b has been restored." },
351     { "CSMSG_SUSPEND_NODELETE", "$b%s$b is protected from unregistration, and cannot be suspended." },
352     { "CSMSG_USER_SUSPENDED", "$b%s$b's access to $b%s$b has been suspended." },
353     { "CSMSG_USER_UNSUSPENDED", "$b%s$b's access to $b%s$b has been restored." },
354
355 /* Access information */
356     { "CSMSG_IS_CHANSERV", "$b$C$b is the $bchannel service bot$b." },
357     { "CSMSG_MYACCESS_SELF_ONLY", "You may only see the list of infolines for yourself (by using $b%s$b with no arguments)." },
358     { "CSMSG_SQUAT_ACCESS", "$b%s$b does not have access to any channels." },
359     { "CSMSG_INFOLINE_LIST", "Showing all channel entries for account $b%s$b:" },
360     { "CSMSG_USER_NO_ACCESS", "%s lacks access to %s." },
361     { "CSMSG_USER_HAS_ACCESS", "%s has access $b%d$b in %s." },
362     { "CSMSG_HELPER_NO_ACCESS", "%s lacks access to %s but has $bsecurity override$b enabled." },
363     { "CSMSG_HELPER_HAS_ACCESS", "%s has access $b%d$b in %s and has $bsecurity override$b enabled." },
364     { "CSMSG_LAZY_SMURF_TARGET", "%s is %s ($bIRCOp$b; not logged in)." },
365     { "CSMSG_SMURF_TARGET", "%s is %s ($b%s$b)." },
366     { "CSMSG_OPERATOR_TITLE", "IRC operator" },
367     { "CSMSG_UC_H_TITLE", "network helper" },
368     { "CSMSG_LC_H_TITLE", "support helper" },
369     { "CSMSG_LAME_SMURF_TARGET", "%s is an IRC operator." },
370
371 /* Seen information */
372     { "CSMSG_NEVER_SEEN", "%s has never been seen in $b%s$b." },
373     { "CSMSG_USER_SEEN", "%s was last seen in $b%s$b %s ago." },
374     { "CSMSG_USER_VACATION", "%s is currently on vacation." },
375     { "CSMSG_USER_PRESENT", "%s is in the channel $bright now$b." },
376
377 /* Names information */
378     { "CSMSG_CHANNEL_NAMES", "Users in $b%s$b:%s" },
379     { "CSMSG_END_NAMES", "End of names in $b%s$b" },
380
381 /* Channel information */
382     { "CSMSG_CHANNEL_INFO", "$b%s$b Information:" },
383     { "CSMSG_CHANNEL_TOPIC", "$bDefault Topic:       $b%s" },
384     { "CSMSG_CHANNEL_MODES", "$bMode Lock:           $b%s" },
385     { "CSMSG_CHANNEL_NOTE", "$b%s:%*s$b%s" },
386     { "CSMSG_CHANNEL_MAX", "$bRecord Visitors:     $b%i" },
387     { "CSMSG_CHANNEL_OWNER", "$bOwner:               $b%s" },
388     { "CSMSG_CHANNEL_BANS", "$bBan Count:           $b%i" },
389     { "CSMSG_CHANNEL_USERS", "$bTotal User Count:    $b%i" },
390     { "CSMSG_CHANNEL_REGISTRAR", "$bRegistrar:           $b%s" },
391     { "CSMSG_CHANNEL_SUSPENDED", "$b%s$b is suspended:" },
392     { "CSMSG_CHANNEL_HISTORY", "Suspension history for $b%s$b:" },
393     { "CSMSG_CHANNEL_SUSPENDED_0", " by %s: %s" },
394     { "CSMSG_CHANNEL_SUSPENDED_1", " by %s; expires in %s: %s" },
395     { "CSMSG_CHANNEL_SUSPENDED_2", " by %s; expired %s ago: %s" },
396     { "CSMSG_CHANNEL_SUSPENDED_3", " by %s; revoked %s ago: %s" },
397     { "CSMSG_CHANNEL_SUSPENDED_4", " %s ago by %s: %s" },
398     { "CSMSG_CHANNEL_SUSPENDED_5", " %s ago by %s; expires in %s: %s" },
399     { "CSMSG_CHANNEL_SUSPENDED_6", " %s ago by %s; expired %s ago: %s" },
400     { "CSMSG_CHANNEL_SUSPENDED_7", " %s ago by %s; revoked %s ago: %s" },
401     { "CSMSG_CHANNEL_REGISTERED", "$bRegistered:          $b%s ago." },
402     { "CSMSG_CHANNEL_VISITED", "$bVisited:             $b%s ago." },
403
404     { "CSMSG_PEEK_INFO", "$b%s$b Status:" },
405     { "CSMSG_PEEK_TOPIC", "$bTopic:          $b%s" },
406     { "CSMSG_PEEK_MODES", "$bModes:          $b%s" },
407     { "CSMSG_PEEK_USERS", "$bTotal users:    $b%d (%d ops, %d voices, %d regulars)" },
408     { "CSMSG_PEEK_OPS", "$bOps:$b" },
409     { "CSMSG_PEEK_NO_OPS", "$bOps:            $bNone present" },
410
411 /* Network information */
412     { "CSMSG_NETWORK_INFO", "Network Information:" },
413     { "CSMSG_NETWORK_SERVERS", "$bServers:             $b%i" },
414     { "CSMSG_NETWORK_USERS",   "$bTotal Users:         $b%i" },
415     { "CSMSG_NETWORK_BANS",    "$bTotal Ban Count:     $b%i" },
416     { "CSMSG_NETWORK_CHANUSERS", "$bTotal User Count:    $b%i" },
417     { "CSMSG_NETWORK_OPERS",   "$bIRC Operators:       $b%i" },
418     { "CSMSG_NETWORK_CHANNELS","$bRegistered Channels: $b%i" },
419     { "CSMSG_SERVICES_UPTIME", "$bServices Uptime:     $b%s" },
420     { "CSMSG_BURST_LENGTH",    "$bLast Burst Length:   $b%s" },
421
422 /* Staff list */
423     { "CSMSG_NETWORK_STAFF", "$bOnline Network Staff:$b" },
424     { "CSMSG_STAFF_OPERS", "$bIRC Operators:$b" },
425     { "CSMSG_STAFF_HELPERS", "$bHelpers:$b" },
426
427 /* Channel searches */
428     { "CSMSG_ACTION_INVALID", "$b%s$b is not a recognized search action." },
429     { "CSMSG_UNVISITED_HEADER", "Showing a maximum of %d channels unvisited for $b%s$b:" },
430     { "CSMSG_UNVISITED_DATA", "%s: $b%s$b" },
431     { "CSMSG_CHANNEL_SEARCH_RESULTS", "The following channels were found:" },
432
433 /* Channel configuration */
434     { "CSMSG_INVALID_OPTION", "$b%s$b is not a valid %s option." },
435     { "CSMSG_INVALID_CFLAG", "$b%s$b is not a recognized channel flag." },
436     { "CSMSG_CHANNEL_OPTIONS", "Channel Options:" },
437     { "CSMSG_GREETING_TOO_LONG", "Your greeting ($b%d$b characters) must be shorter than $b%d$b characters." },
438
439 /* User settings */
440     { "CSMSG_USER_OPTIONS", "User Options:" },
441     { "CSMSG_USER_PROTECTED_2", "That user is protected." },
442
443 /* Toys */
444     { "CSMSG_UNF_RESPONSE", "I don't want to be part of your sick fantasies!" },
445     { "CSMSG_PING_RESPONSE", "Pong!" },
446     { "CSMSG_WUT_RESPONSE", "wut" },
447     { "CSMSG_BAD_NUMBER", "$b%s$b is an invalid number.  Please use a number greater than 1 with this command." },
448     { "CSMSG_BAD_DIE_FORMAT", "I do not understand $b%s$b.  Please use either a single number or standard 4d6+3 format." },
449     { "CSMSG_BAD_DICE_COUNT", "%lu is too many dice.  Please use at most %lu." },
450     { "CSMSG_DICE_ROLL", "The total is $b%lu$b from rolling %lud%lu+%lu." },
451     { "CSMSG_DIE_ROLL", "A $b%lu$b shows on the %lu-sided die." },
452     { "CSMSG_HUGGLES_HIM", "\001ACTION huggles %s\001" },
453     { "CSMSG_HUGGLES_YOU", "\001ACTION huggles you\001" },
454
455 /* Other things */
456     { "CSMSG_EVENT_SEARCH_RESULTS", "The following channel events were found:" },
457     { NULL, NULL }
458 };
459
460 /* eject_user and unban_user flags */
461 #define ACTION_KICK             0x0001
462 #define ACTION_BAN              0x0002
463 #define ACTION_ADD_BAN          0x0004
464 #define ACTION_ADD_TIMED_BAN    0x0008
465 #define ACTION_UNBAN            0x0010
466 #define ACTION_DEL_BAN          0x0020
467
468 /* The 40 allows for [+-ntlksimprD] and lots of fudge factor. */
469 #define MODELEN     40 + KEYLEN
470 #define PADLEN      21
471 #define ACCESSLEN   10
472
473 #define CSFUNC_ARGS user, channel, argc, argv, cmd
474
475 #define CHANSERV_FUNC(NAME) MODCMD_FUNC(NAME)
476 #define CHANSERV_SYNTAX() svccmd_send_help(user, chanserv, cmd)
477 #define REQUIRE_PARAMS(N)   if(argc < (N)) {            \
478         reply("MSG_MISSING_PARAMS", argv[0]); \
479         CHANSERV_SYNTAX(); \
480         return 0; }
481
482 DECLARE_LIST(dnrList, struct do_not_register *);
483 DEFINE_LIST(dnrList, struct do_not_register *)
484
485 static int eject_user(struct userNode *user, struct chanNode *channel, unsigned int argc, char *argv[], struct svccmd *cmd, int action);
486
487 struct userNode *chanserv;
488 dict_t note_types;
489 int off_channel;
490 static dict_t plain_dnrs, mask_dnrs, handle_dnrs;
491 static struct log_type *CS_LOG;
492
493 static struct
494 {
495     struct channelList  support_channels;
496     struct mod_chanmode default_modes;
497
498     unsigned long   db_backup_frequency;
499     unsigned long   channel_expire_frequency;
500     unsigned long   dnr_expire_frequency;
501
502     unsigned long   info_delay;
503     unsigned long   adjust_delay;
504     unsigned long   channel_expire_delay;
505     unsigned int    nodelete_level;
506
507     unsigned int    adjust_threshold;
508     int             join_flood_threshold;
509
510     unsigned int    greeting_length;
511     unsigned int    refresh_period;
512     unsigned int    giveownership_period;
513
514     unsigned int    max_owned;
515     unsigned int    max_chan_users;
516     unsigned int    max_chan_bans;
517     unsigned int    max_userinfo_length;
518
519     struct string_list  *set_shows;
520     struct string_list  *eightball;
521     struct string_list  *old_ban_names;
522
523     const char          *ctcp_short_ban_duration;
524     const char          *ctcp_long_ban_duration;
525
526     const char          *irc_operator_epithet;
527     const char          *network_helper_epithet;
528     const char          *support_helper_epithet;
529 } chanserv_conf;
530
531 struct listData
532 {
533     struct userNode *user;
534     struct userNode *bot;
535     struct chanNode *channel;
536     const char      *search;
537     unsigned short  lowest;
538     unsigned short  highest;
539     struct userData **users;
540     struct helpfile_table table;
541 };
542
543 enum note_access_type
544 {
545     NOTE_SET_CHANNEL_ACCESS,
546     NOTE_SET_CHANNEL_SETTER,
547     NOTE_SET_PRIVILEGED
548 };
549
550 enum note_visible_type
551 {
552     NOTE_VIS_ALL,
553     NOTE_VIS_CHANNEL_USERS,
554     NOTE_VIS_PRIVILEGED
555 };
556
557 struct note_type
558 {
559     enum note_access_type set_access_type;
560     union {
561         unsigned int     min_opserv;
562         unsigned short   min_ulevel;
563     } set_access;
564     enum note_visible_type visible_type;
565     unsigned int         max_length;
566     unsigned int         refs;
567     char                 name[1];
568 };
569
570 struct note
571 {
572     struct note_type     *type;
573     char                 setter[NICKSERV_HANDLE_LEN+1];
574     char                 note[1];
575 };
576
577 static unsigned int registered_channels;
578 static unsigned int banCount;
579
580 static const struct {
581     char *name;
582     char *title;
583     unsigned short level;
584     char ch;
585 } accessLevels[] = {
586     { "peon", "Peon", UL_PEON, '+' },
587     { "op", "Op", UL_OP, '@' },
588     { "master", "Master", UL_MASTER, '%' },
589     { "coowner", "Coowner", UL_COOWNER, '*' },
590     { "owner", "Owner", UL_OWNER, '!' },
591     { "helper", "BUG:", UL_HELPER, 'X' }
592 };
593
594 static const struct {
595     char *format_name;
596     char *db_name;
597     unsigned short default_value;
598     unsigned int old_idx;
599     unsigned int old_flag;
600     unsigned short flag_value;
601 } levelOptions[] = {
602     { "CSMSG_SET_GIVE_VOICE", "givevoice", 100, ~0, CHANNEL_VOICE_ALL, 0 },
603     { "CSMSG_SET_GIVE_OPS", "giveops", 200, 2, 0, 0 },
604     { "CSMSG_SET_ENFOPS", "enfops", 300, 1, 0, 0 },
605     { "CSMSG_SET_ENFMODES", "enfmodes", 200, 3, 0, 0 },
606     { "CSMSG_SET_ENFTOPIC", "enftopic", 200, 4, 0, 0 },
607     { "CSMSG_SET_PUBCMD", "pubcmd", 0, 5, 0, 0 },
608     { "CSMSG_SET_SETTERS", "setters", 400, 7, 0, 0 },
609     { "CSMSG_SET_CTCPUSERS", "ctcpusers", 0, 9, 0, 0 },
610     { "CSMSG_SET_USERINFO", "userinfo", 1, ~0, CHANNEL_INFO_LINES, 1 },
611     { "CSMSG_SET_INVITEME", "inviteme", 1, ~0, CHANNEL_PEON_INVITE, 200 },
612     { "CSMSG_SET_TOPICSNARF", "topicsnarf", 501, ~0, CHANNEL_TOPIC_SNARF, 1 }
613 };
614
615 struct charOptionValues {
616     char value;
617     char *format_name;
618 } protectValues[] = {
619     { 'a', "CSMSG_PROTECT_ALL" },
620     { 'e', "CSMSG_PROTECT_EQUAL" },
621     { 'l', "CSMSG_PROTECT_LOWER" },
622     { 'n', "CSMSG_PROTECT_NONE" }
623 }, toysValues[] = {
624     { 'd', "CSMSG_TOYS_DISABLED" },
625     { 'n', "CSMSG_TOYS_PRIVATE" },
626     { 'p', "CSMSG_TOYS_PUBLIC" }
627 }, topicRefreshValues[] = {
628     { 'n', "CSMSG_TOPICREFRESH_NEVER" },
629     { '1', "CSMSG_TOPICREFRESH_3_HOURS" },
630     { '2', "CSMSG_TOPICREFRESH_6_HOURS" },
631     { '3', "CSMSG_TOPICREFRESH_12_HOURS" },
632     { '4', "CSMSG_TOPICREFRESH_24_HOURS" }
633 }, ctcpReactionValues[] = {
634     { 'k', "CSMSG_CTCPREACTION_KICK" },
635     { 'b', "CSMSG_CTCPREACTION_KICKBAN" },
636     { 't', "CSMSG_CTCPREACTION_SHORTBAN" },
637     { 'T', "CSMSG_CTCPREACTION_LONGBAN" }
638 };
639
640 static const struct {
641     char *format_name;
642     char *db_name;
643     char default_value;
644     unsigned int old_idx;
645     unsigned char count;
646     struct charOptionValues *values;
647 } charOptions[] = {
648     { "CSMSG_SET_PROTECT", "protect", 'l', 0, ArrayLength(protectValues), protectValues },
649     { "CSMSG_SET_TOYS", "toys", 'p', 6, ArrayLength(toysValues), toysValues },
650     { "CSMSG_SET_TOPICREFRESH", "topicrefresh", 'n', 8, ArrayLength(topicRefreshValues), topicRefreshValues },
651     { "CSMSG_SET_CTCPREACTION", "ctcpreaction", 't', 10, ArrayLength(ctcpReactionValues), ctcpReactionValues }
652 };
653
654 struct userData *helperList;
655 struct chanData *channelList;
656 static struct module *chanserv_module;
657 static unsigned int userCount;
658
659 #define GetChannelUser(channel, handle) _GetChannelUser(channel, handle, 1, 0)
660 #define GetChannelAccess(channel, handle) _GetChannelUser(channel, handle, 0, 0)
661 #define GetTrueChannelAccess(channel, handle) _GetChannelUser(channel, handle, 0, 1)
662
663 unsigned short
664 user_level_from_name(const char *name, unsigned short clamp_level)
665 {
666     unsigned int level = 0, ii;
667     if(isdigit(name[0]))
668         level = strtoul(name, NULL, 10);
669     else for(ii = 0; (ii < ArrayLength(accessLevels)) && !level; ++ii)
670         if(!irccasecmp(name, accessLevels[ii].name))
671             level = accessLevels[ii].level;
672     if(level > clamp_level)
673         return 0;
674     return level;
675 }
676
677 int
678 parse_level_range(unsigned short *minl, unsigned short *maxl, const char *arg)
679 {
680     char *sep;
681     *minl = strtoul(arg, &sep, 10);
682     if(*sep == '\0')
683     {
684         *maxl = *minl;
685         return 1;
686     }
687     else if(*sep == '-')
688     {
689         *maxl = strtoul(sep+1, &sep, 10);
690         return *sep == '\0';
691     }
692     else
693         return 0;
694 }
695
696 struct userData*
697 _GetChannelUser(struct chanData *channel, struct handle_info *handle, int override, int allow_suspended)
698 {
699     struct userData *uData, **head;
700
701     if(!channel || !handle)
702         return NULL;
703
704     if(override && HANDLE_FLAGGED(handle, HELPING)
705        && ((handle->opserv_level >= chanserv_conf.nodelete_level) || !IsProtected(channel)))
706     {
707         for(uData = helperList;
708             uData && uData->handle != handle;
709             uData = uData->next);
710
711         if(!uData)
712         {
713             uData = calloc(1, sizeof(struct userData));
714             uData->handle = handle;
715
716             uData->access = UL_HELPER;
717             uData->seen = 0;
718
719             uData->info = NULL;
720
721             uData->prev = NULL;
722             uData->next = helperList;
723             if(helperList)
724                 helperList->prev = uData;
725             helperList = uData;
726         }
727
728         head = &helperList;
729     }
730     else
731     {
732         for(uData = channel->users; uData; uData = uData->next)
733             if((uData->handle == handle) && (allow_suspended || !IsUserSuspended(uData)))
734                 break;
735
736         head = &(channel->users);
737     }
738
739     if(uData && (uData != *head))
740     {
741         /* Shuffle the user to the head of whatever list he was in. */
742         if(uData->next)
743             uData->next->prev = uData->prev;
744         if(uData->prev)
745             uData->prev->next = uData->next;
746
747         uData->prev = NULL;
748         uData->next = *head;
749
750         if(*head)
751             (**head).prev = uData;
752         *head = uData;
753     }
754
755     return uData;
756 }
757
758 /* Returns non-zero if user has at least the minimum access.
759  * exempt_owner is set when handling !set, so the owner can set things
760  * to/from >500.
761  */
762 int check_user_level(struct chanNode *channel, struct userNode *user, enum levelOption opt, int allow_override, int exempt_owner)
763 {
764     struct userData *uData;
765     struct chanData *cData = channel->channel_info;
766     unsigned short minimum = cData->lvlOpts[opt];
767     if(!minimum)
768         return 1;
769     uData = _GetChannelUser(cData, user->handle_info, allow_override, 0);
770     if(!uData)
771         return 0;
772     if(minimum <= uData->access)
773         return 1;
774     if((minimum > UL_OWNER) && (uData->access == UL_OWNER) && exempt_owner)
775         return 1;
776     return 0;
777 }
778
779 /* Scan for other users authenticated to the same handle
780    still in the channel. If so, keep them listed as present.
781
782    user is optional, if not null, it skips checking that userNode
783    (for the handle_part function) */
784 static void
785 scan_user_presence(struct userData *uData, struct userNode *user)
786 {
787     struct modeNode *mn;
788
789     if(IsSuspended(uData->channel)
790        || IsUserSuspended(uData)
791        || !(mn = find_handle_in_channel(uData->channel->channel, uData->handle, user)))
792     {
793         uData->present = 0;
794     }
795     else
796     {
797         uData->present = 1;
798         uData->seen = now;
799     }
800 }
801
802 static void
803 chanserv_ctcp_check(struct userNode *user, struct chanNode *channel, const char *text, UNUSED_ARG(struct userNode *bot), UNUSED_ARG(unsigned int is_notice))
804 {
805     unsigned int eflags, argc;
806     char *argv[4];
807     static char *bad_ctcp_reason = "CTCPs to this channel are forbidden.";
808
809     /* Bail early if channel is inactive or doesn't restrict CTCPs, or sender is a service */
810     if(!channel->channel_info
811        || IsSuspended(channel->channel_info)
812        || IsService(user)
813        || !ircncasecmp(text, "ACTION ", 7))
814         return;
815     /* Figure out the minimum level needed to CTCP the channel */
816     if(check_user_level(channel, user, lvlCTCPUsers, 1, 0))
817         return;
818     /* We need to enforce against them; do so. */
819     eflags = 0;
820     argv[0] = (char*)text;
821     argv[1] = user->nick;
822     argc = 2;
823     if(GetUserMode(channel, user))
824         eflags |= ACTION_KICK;
825     switch(channel->channel_info->chOpts[chCTCPReaction]) {
826     default: case 'k': /* just do the kick */ break;
827     case 'b':
828         eflags |= ACTION_BAN;
829         break;
830     case 't':
831         eflags |= ACTION_BAN | ACTION_ADD_BAN | ACTION_ADD_TIMED_BAN;
832         argv[argc++] = (char*)chanserv_conf.ctcp_short_ban_duration;
833         break;
834     case 'T':
835         eflags |= ACTION_BAN | ACTION_ADD_BAN | ACTION_ADD_TIMED_BAN;
836         argv[argc++] = (char*)chanserv_conf.ctcp_long_ban_duration;
837         break;
838     }
839     argv[argc++] = bad_ctcp_reason;
840     eject_user(chanserv, channel, argc, argv, NULL, eflags);
841 }
842
843 struct note_type *
844 chanserv_create_note_type(const char *name)
845 {
846     struct note_type *ntype = calloc(1, sizeof(*ntype) + strlen(name));
847     strcpy(ntype->name, name);
848     ntype->refs = 1;
849     dict_insert(note_types, ntype->name, ntype);
850     return ntype;
851 }
852
853 static void
854 chanserv_deref_note_type(void *data)
855 {
856     struct note_type *ntype = data;
857
858     if(--ntype->refs > 0)
859         return;
860     free(ntype);
861 }
862
863 static void
864 chanserv_flush_note_type(struct note_type *ntype)
865 {
866     struct chanData *cData;
867     for(cData = channelList; cData; cData = cData->next)
868         dict_remove(cData->notes, ntype->name);
869 }
870
871 static void
872 chanserv_truncate_notes(struct note_type *ntype)
873 {
874     struct chanData *cData;
875     struct note *note;
876     unsigned int size = sizeof(*note) + ntype->max_length;
877
878     for(cData = channelList; cData; cData = cData->next) {
879         note = dict_find(cData->notes, ntype->name, NULL);
880         if(!note)
881             continue;
882         if(strlen(note->note) <= ntype->max_length)
883             continue;
884         dict_remove2(cData->notes, ntype->name, 1);
885         note = realloc(note, size);
886         note->note[ntype->max_length] = 0;
887         dict_insert(cData->notes, ntype->name, note);
888     }
889 }
890
891 static int note_type_visible_to_user(struct chanData *channel, struct note_type *ntype, struct userNode *user);
892
893 static struct note *
894 chanserv_add_channel_note(struct chanData *channel, struct note_type *type, const char *setter, const char *text)
895 {
896     struct note *note;
897     unsigned int len = strlen(text);
898
899     if(len > type->max_length) len = type->max_length;
900     note = calloc(1, sizeof(*note) + len);
901     note->type = type;
902     strncpy(note->setter, setter, sizeof(note->setter)-1);
903     memcpy(note->note, text, len);
904     note->note[len] = 0;
905     dict_insert(channel->notes, type->name, note);
906     type->refs++;
907     return note;
908 }
909
910 static void
911 chanserv_free_note(void *data)
912 {
913     struct note *note = data;
914
915     chanserv_deref_note_type(note->type);
916     assert(note->type->refs > 0); /* must use delnote to remove the type */
917     free(note);
918 }
919
920 static MODCMD_FUNC(cmd_createnote) {
921     struct note_type *ntype;
922     unsigned int arg = 1, existed = 0, max_length;
923
924     if((ntype = dict_find(note_types, argv[1], NULL)))
925         existed = 1;
926     else
927         ntype = chanserv_create_note_type(argv[arg]);
928     if(!irccasecmp(argv[++arg], "privileged"))
929     {
930         arg++;
931         ntype->set_access_type = NOTE_SET_PRIVILEGED;
932         ntype->set_access.min_opserv = strtoul(argv[arg], NULL, 0);
933     }
934     else if(!irccasecmp(argv[arg], "channel"))
935     {
936         unsigned short ulvl = user_level_from_name(argv[++arg], UL_OWNER);
937         if(!ulvl)
938         {
939             reply("CSMSG_INVALID_ACCESS", argv[arg]);
940             goto fail;
941         }
942         ntype->set_access_type = NOTE_SET_CHANNEL_ACCESS;
943         ntype->set_access.min_ulevel = ulvl;
944     }
945     else if(!irccasecmp(argv[arg], "setter"))
946     {
947         ntype->set_access_type = NOTE_SET_CHANNEL_SETTER;
948     }
949     else
950     {
951         reply("CSMSG_BAD_NOTE_ACCESS", argv[arg]);
952         goto fail;
953     }
954
955     if(!irccasecmp(argv[++arg], "privileged"))
956         ntype->visible_type = NOTE_VIS_PRIVILEGED;
957     else if(!irccasecmp(argv[arg], "channel_users"))
958         ntype->visible_type = NOTE_VIS_CHANNEL_USERS;
959     else if(!irccasecmp(argv[arg], "all"))
960         ntype->visible_type = NOTE_VIS_ALL;
961     else {
962         reply("CSMSG_BAD_NOTE_ACCESS", argv[arg]);
963         goto fail;
964     }
965
966     if((arg+1) >= argc) {
967         reply("MSG_MISSING_PARAMS", argv[0]);
968         goto fail;
969     }
970     max_length = strtoul(argv[++arg], NULL, 0);
971     if(max_length < 20 || max_length > 450)
972     {
973         reply("CSMSG_BAD_MAX_LENGTH", argv[arg]);
974         goto fail;
975     }
976     if(existed && (max_length < ntype->max_length))
977     {
978         ntype->max_length = max_length;
979         chanserv_truncate_notes(ntype);
980     }
981     ntype->max_length = max_length;
982
983     if(existed)
984         reply("CSMSG_NOTE_MODIFIED", ntype->name);
985     else
986         reply("CSMSG_NOTE_CREATED", ntype->name);
987     return 1;
988
989 fail:
990     if(!existed)
991         dict_remove(note_types, ntype->name);
992     return 0;
993 }
994
995 static MODCMD_FUNC(cmd_removenote) {
996     struct note_type *ntype;
997     int force;
998
999     ntype = dict_find(note_types, argv[1], NULL);
1000     force = (argc > 2) && !irccasecmp(argv[2], "force");
1001     if(!ntype)
1002     {
1003         reply("CSMSG_BAD_NOTE_TYPE", argv[1]);
1004         return 0;
1005     }
1006     if(ntype->refs > 1)
1007     {
1008         if(!force)
1009         {
1010             reply("CSMSG_NOTE_TYPE_USED", ntype->name);
1011             return 0;
1012         }
1013         chanserv_flush_note_type(ntype);
1014     }
1015     dict_remove(note_types, argv[1]);
1016     reply("CSMSG_NOTE_DELETED", argv[1]);
1017     return 1;
1018 }
1019
1020 static int
1021 mode_lock_violated(const struct mod_chanmode *orig, const struct mod_chanmode *change)
1022 {
1023     if(!orig)
1024         return 0;
1025     if(orig->modes_set & change->modes_clear)
1026         return 1;
1027     if(orig->modes_clear & change->modes_set)
1028         return 1;
1029     if((orig->modes_set & MODE_KEY) && (change->modes_set & MODE_KEY)
1030        && strcmp(orig->new_key, change->new_key))
1031         return 1;
1032     if((orig->modes_set & MODE_LIMIT) && (change->modes_set & MODE_LIMIT)
1033        && (orig->new_limit != change->new_limit))
1034         return 1;
1035     return 0;
1036 }
1037
1038 static char max_length_text[MAXLEN+1][16];
1039
1040 static struct helpfile_expansion
1041 chanserv_expand_variable(const char *variable)
1042 {
1043     struct helpfile_expansion exp;
1044
1045     if(!irccasecmp(variable, "notes"))
1046     {
1047         dict_iterator_t it;
1048         exp.type = HF_TABLE;
1049         exp.value.table.length = 1;
1050         exp.value.table.width = 3;
1051         exp.value.table.flags = 0;
1052         exp.value.table.contents = calloc(dict_size(note_types)+1, sizeof(char**));
1053         exp.value.table.contents[0] = calloc(exp.value.table.width, sizeof(char*));
1054         exp.value.table.contents[0][0] = "Note Type";
1055         exp.value.table.contents[0][1] = "Visibility";
1056         exp.value.table.contents[0][2] = "Max Length";
1057         for(it=dict_first(note_types); it; it=iter_next(it))
1058         {
1059             struct note_type *ntype = iter_data(it);
1060             int row;
1061
1062             if(!note_type_visible_to_user(NULL, ntype, message_dest)) continue;
1063             row = exp.value.table.length++;
1064             exp.value.table.contents[row] = calloc(exp.value.table.width, sizeof(char*));
1065             exp.value.table.contents[row][0] = ntype->name;
1066             exp.value.table.contents[row][1] = (ntype->visible_type == NOTE_VIS_ALL) ? "all" :
1067                 (ntype->visible_type == NOTE_VIS_CHANNEL_USERS) ? "chan users" :
1068                 "unknown";
1069             if(!max_length_text[ntype->max_length][0])
1070                 snprintf(max_length_text[ntype->max_length], sizeof(max_length_text[ntype->max_length]), "%u", ntype->max_length);
1071             exp.value.table.contents[row][2] = max_length_text[ntype->max_length];
1072         }
1073         return exp;
1074     }
1075
1076     exp.type = HF_STRING;
1077     exp.value.str = NULL;
1078     return exp;
1079 }
1080
1081 static struct chanData*
1082 register_channel(struct chanNode *cNode, char *registrar)
1083 {
1084     struct chanData *channel;
1085     enum levelOption lvlOpt;
1086     enum charOption chOpt;
1087
1088     channel = calloc(1, sizeof(struct chanData));
1089
1090     channel->notes = dict_new();
1091     dict_set_free_data(channel->notes, chanserv_free_note);
1092
1093     channel->registrar = strdup(registrar);
1094     channel->registered = now;
1095     channel->visited = now;
1096     channel->limitAdjusted = now;
1097     channel->ownerTransfer = now;
1098     channel->flags = CHANNEL_DEFAULT_FLAGS;
1099     for(lvlOpt = 0; lvlOpt < NUM_LEVEL_OPTIONS; ++lvlOpt)
1100         channel->lvlOpts[lvlOpt] = levelOptions[lvlOpt].default_value;
1101     for(chOpt = 0; chOpt < NUM_CHAR_OPTIONS; ++chOpt)
1102         channel->chOpts[chOpt] = charOptions[chOpt].default_value;
1103
1104     channel->prev = NULL;
1105     channel->next = channelList;
1106
1107     if(channelList)
1108         channelList->prev = channel;
1109     channelList = channel;
1110     registered_channels++;
1111
1112     channel->channel = cNode;
1113     LockChannel(cNode);
1114     cNode->channel_info = channel;
1115
1116     return channel;
1117 }
1118
1119 static struct userData*
1120 add_channel_user(struct chanData *channel, struct handle_info *handle, unsigned short access_level, unsigned long seen, const char *info)
1121 {
1122     struct userData *ud;
1123
1124     if(access_level > UL_OWNER)
1125         return NULL;
1126
1127     ud = calloc(1, sizeof(*ud));
1128     ud->channel = channel;
1129     ud->handle = handle;
1130     ud->seen = seen;
1131     ud->access = access_level;
1132     ud->info = info ? strdup(info) : NULL;
1133
1134     ud->prev = NULL;
1135     ud->next = channel->users;
1136     if(channel->users)
1137         channel->users->prev = ud;
1138     channel->users = ud;
1139
1140     channel->userCount++;
1141     userCount++;
1142
1143     ud->u_prev = NULL;
1144     ud->u_next = ud->handle->channels;
1145     if(ud->u_next)
1146         ud->u_next->u_prev = ud;
1147     ud->handle->channels = ud;
1148
1149     return ud;
1150 }
1151
1152 static void unregister_channel(struct chanData *channel, const char *reason);
1153
1154 void
1155 del_channel_user(struct userData *user, int do_gc)
1156 {
1157     struct chanData *channel = user->channel;
1158
1159     channel->userCount--;
1160     userCount--;
1161
1162     if(user->prev)
1163         user->prev->next = user->next;
1164     else
1165         channel->users = user->next;
1166     if(user->next)
1167         user->next->prev = user->prev;
1168
1169     if(user->u_prev)
1170         user->u_prev->u_next = user->u_next;
1171     else
1172         user->handle->channels = user->u_next;
1173     if(user->u_next)
1174         user->u_next->u_prev = user->u_prev;
1175
1176     free(user->info);
1177     free(user);
1178     if(do_gc && !channel->users && !IsProtected(channel))
1179         unregister_channel(channel, "lost all users.");
1180 }
1181
1182 static void expire_ban(void *data);
1183
1184 static struct banData*
1185 add_channel_ban(struct chanData *channel, const char *mask, char *owner, unsigned long set, unsigned long triggered, unsigned long expires, char *reason)
1186 {
1187     struct banData *bd;
1188     unsigned int ii, l1, l2;
1189
1190     if(!mask)
1191         return NULL;
1192
1193     bd = malloc(sizeof(struct banData));
1194
1195     bd->channel = channel;
1196     bd->set = set;
1197     bd->triggered = triggered;
1198     bd->expires = expires;
1199
1200     for(ii = 0; ii < chanserv_conf.old_ban_names->used; ++ii)
1201     {
1202         extern const char *hidden_host_suffix;
1203         const char *old_name = chanserv_conf.old_ban_names->list[ii];
1204         char *new_mask;
1205
1206         l1 = strlen(mask);
1207         l2 = strlen(old_name);
1208         if(l2+2 > l1)
1209             continue;
1210         if(irccasecmp(mask + l1 - l2, old_name))
1211             continue;
1212         new_mask = alloca(MAXLEN);
1213         sprintf(new_mask, "%.*s%s", (int)(l1-l2), mask, hidden_host_suffix);
1214         mask = new_mask;
1215     }
1216     safestrncpy(bd->mask, mask, sizeof(bd->mask));
1217     if(owner)
1218         safestrncpy(bd->owner, owner, sizeof(bd->owner));
1219     bd->reason = strdup(reason);
1220
1221     if(expires)
1222         timeq_add(expires, expire_ban, bd);
1223
1224     bd->prev = NULL;
1225     bd->next = channel->bans;
1226     if(channel->bans)
1227         channel->bans->prev = bd;
1228     channel->bans = bd;
1229     channel->banCount++;
1230     banCount++;
1231
1232     return bd;
1233 }
1234
1235 static void
1236 del_channel_ban(struct banData *ban)
1237 {
1238     ban->channel->banCount--;
1239     banCount--;
1240
1241     if(ban->prev)
1242         ban->prev->next = ban->next;
1243     else
1244         ban->channel->bans = ban->next;
1245
1246     if(ban->next)
1247         ban->next->prev = ban->prev;
1248
1249     if(ban->expires)
1250         timeq_del(0, expire_ban, ban, TIMEQ_IGNORE_WHEN);
1251
1252     if(ban->reason)
1253         free(ban->reason);
1254
1255     free(ban);
1256 }
1257
1258 static void
1259 expire_ban(void *data)
1260 {
1261     struct banData *bd = data;
1262     if(!IsSuspended(bd->channel))
1263     {
1264         struct banList bans;
1265         struct mod_chanmode change;
1266         unsigned int ii;
1267         bans = bd->channel->channel->banlist;
1268         mod_chanmode_init(&change);
1269         for(ii=0; ii<bans.used; ii++)
1270         {
1271             if(!strcmp(bans.list[ii]->ban, bd->mask))
1272             {
1273                 change.argc = 1;
1274                 change.args[0].mode = MODE_REMOVE|MODE_BAN;
1275                 change.args[0].u.hostmask = bd->mask;
1276                 mod_chanmode_announce(chanserv, bd->channel->channel, &change);
1277                 break;
1278             }
1279         }
1280     }
1281     bd->expires = 0;
1282     del_channel_ban(bd);
1283 }
1284
1285 static void chanserv_expire_suspension(void *data);
1286
1287 static void
1288 unregister_channel(struct chanData *channel, const char *reason)
1289 {
1290     struct mod_chanmode change;
1291     char msgbuf[MAXLEN];
1292
1293     /* After channel unregistration, the following must be cleaned
1294        up:
1295        - Channel information.
1296        - Channel users.
1297        - Channel bans.
1298        - Channel suspension data.
1299        - Timeq entries. (Except timed bans, which are handled elsewhere.)
1300     */
1301
1302     if(!channel)
1303         return;
1304
1305     timeq_del(0, NULL, channel, TIMEQ_IGNORE_FUNC | TIMEQ_IGNORE_WHEN);
1306
1307     if(off_channel > 0)
1308     {
1309       mod_chanmode_init(&change);
1310       change.modes_clear |= MODE_REGISTERED;
1311       mod_chanmode_announce(chanserv, channel->channel, &change);
1312     }
1313
1314     while(channel->users)
1315         del_channel_user(channel->users, 0);
1316
1317     while(channel->bans)
1318         del_channel_ban(channel->bans);
1319
1320     free(channel->topic);
1321     free(channel->registrar);
1322     free(channel->greeting);
1323     free(channel->user_greeting);
1324     free(channel->topic_mask);
1325
1326     if(channel->prev)
1327         channel->prev->next = channel->next;
1328     else
1329         channelList = channel->next;
1330
1331     if(channel->next)
1332         channel->next->prev = channel->prev;
1333
1334     if(channel->suspended)
1335     {
1336         struct chanNode *cNode = channel->channel;
1337         struct suspended *suspended, *next_suspended;
1338
1339         for(suspended = channel->suspended; suspended; suspended = next_suspended)
1340         {
1341             next_suspended = suspended->previous;
1342             free(suspended->suspender);
1343             free(suspended->reason);
1344             if(suspended->expires)
1345                 timeq_del(suspended->expires, chanserv_expire_suspension, suspended, 0);
1346             free(suspended);
1347         }
1348
1349         if(cNode)
1350             cNode->channel_info = NULL;
1351     }
1352     channel->channel->channel_info = NULL;
1353
1354     dict_delete(channel->notes);
1355     sprintf(msgbuf, "%s %s", channel->channel->name, reason);
1356     if(!IsSuspended(channel))
1357         DelChannelUser(chanserv, channel->channel, msgbuf, 0);
1358     global_message(MESSAGE_RECIPIENT_OPERS | MESSAGE_RECIPIENT_HELPERS, msgbuf);
1359     UnlockChannel(channel->channel);
1360     free(channel);
1361     registered_channels--;
1362 }
1363
1364 static void
1365 expire_channels(UNUSED_ARG(void *data))
1366 {
1367     struct chanData *channel, *next;
1368     struct userData *user;
1369     char delay[INTERVALLEN], reason[INTERVALLEN + 64];
1370
1371     intervalString(delay, chanserv_conf.channel_expire_delay, NULL);
1372     sprintf(reason, "Channel registration automatically expired after %s of disuse.", delay);
1373
1374     for(channel = channelList; channel; channel = next)
1375     {
1376         next = channel->next;
1377
1378         /* See if the channel can be expired. */
1379         if(((now - channel->visited) <= chanserv_conf.channel_expire_delay)
1380            || IsProtected(channel))
1381             continue;
1382
1383         /* Make sure there are no high-ranking users still in the channel. */
1384         for(user=channel->users; user; user=user->next)
1385             if(user->present && (user->access >= UL_PRESENT) && !HANDLE_FLAGGED(user->handle, BOT))
1386                 break;
1387         if(user)
1388             continue;
1389
1390         /* Unregister the channel */
1391         log_module(CS_LOG, LOG_INFO, "(%s) Channel registration expired.", channel->channel->name);
1392         unregister_channel(channel, "registration expired.");
1393     }
1394
1395     if(chanserv_conf.channel_expire_frequency)
1396         timeq_add(now + chanserv_conf.channel_expire_frequency, expire_channels, NULL);
1397 }
1398
1399 static void
1400 expire_dnrs(UNUSED_ARG(void *data))
1401 {
1402     dict_iterator_t it, next;
1403     struct do_not_register *dnr;
1404
1405     for(it = dict_first(handle_dnrs); it; it = next)
1406     {
1407         dnr = iter_data(it);
1408         next = iter_next(it);
1409         if(dnr->expires && dnr->expires <= now)
1410             dict_remove(handle_dnrs, dnr->chan_name + 1);
1411     }
1412     for(it = dict_first(plain_dnrs); it; it = next)
1413     {
1414         dnr = iter_data(it);
1415         next = iter_next(it);
1416         if(dnr->expires && dnr->expires <= now)
1417             dict_remove(plain_dnrs, dnr->chan_name + 1);
1418     }
1419     for(it = dict_first(mask_dnrs); it; it = next)
1420     {
1421         dnr = iter_data(it);
1422         next = iter_next(it);
1423         if(dnr->expires && dnr->expires <= now)
1424             dict_remove(mask_dnrs, dnr->chan_name + 1);
1425     }
1426
1427     if(chanserv_conf.dnr_expire_frequency)
1428         timeq_add(now + chanserv_conf.dnr_expire_frequency, expire_dnrs, NULL);
1429 }
1430
1431 static int
1432 protect_user(const struct userNode *victim, const struct userNode *aggressor, struct chanData *channel)
1433 {
1434     char protect = channel->chOpts[chProtect];
1435     struct userData *cs_victim, *cs_aggressor;
1436
1437     /* Don't protect if no one is to be protected, someone is attacking
1438        himself, or if the aggressor is an IRC Operator. */
1439     if(protect == 'n' || victim == aggressor || IsOper(aggressor))
1440         return 0;
1441
1442     /* Don't protect if the victim isn't authenticated (because they
1443        can't be a channel user), unless we are to protect non-users
1444        also. */
1445     cs_victim = GetChannelAccess(channel, victim->handle_info);
1446     if(protect != 'a' && !cs_victim)
1447         return 0;
1448
1449     /* Protect if the aggressor isn't a user because at this point,
1450        the aggressor can only be less than or equal to the victim. */
1451     cs_aggressor = GetChannelAccess(channel, aggressor->handle_info);
1452     if(!cs_aggressor)
1453         return 1;
1454
1455     /* If the aggressor was a user, then the victim can't be helped. */
1456     if(!cs_victim)
1457         return 0;
1458
1459     switch(protect)
1460     {
1461     case 'l':
1462         if(cs_victim->access > cs_aggressor->access)
1463             return 1;
1464         break;
1465     case 'a':
1466     case 'e':
1467         if(cs_victim->access >= cs_aggressor->access)
1468             return 1;
1469         break;
1470     }
1471
1472     return 0;
1473 }
1474
1475 static int
1476 validate_op(struct userNode *user, struct chanNode *channel, struct userNode *victim)
1477 {
1478     struct chanData *cData = channel->channel_info;
1479     struct userData *cs_victim;
1480
1481     if((!(cs_victim = GetChannelUser(cData, victim->handle_info))
1482         || (cs_victim->access < cData->lvlOpts[lvlGiveOps]))
1483        && !check_user_level(channel, user, lvlEnfOps, 0, 0))
1484     {
1485         send_message(user, chanserv, "CSMSG_OPBY_LOCKED");
1486         return 0;
1487     }
1488
1489     return 1;
1490 }
1491
1492 static int
1493 validate_deop(struct userNode *user, struct chanNode *channel, struct userNode *victim)
1494 {
1495     if(IsService(victim))
1496     {
1497         send_message(user, chanserv, "MSG_SERVICE_IMMUNE", victim->nick);
1498         return 0;
1499     }
1500
1501     if(protect_user(victim, user, channel->channel_info))
1502     {
1503         send_message(user, chanserv, "CSMSG_USER_PROTECTED", victim->nick);
1504         return 0;
1505     }
1506
1507     return 1;
1508 }
1509
1510 static struct do_not_register *
1511 chanserv_add_dnr(const char *chan_name, const char *setter, unsigned long expires, const char *reason)
1512 {
1513     struct do_not_register *dnr = calloc(1, sizeof(*dnr)+strlen(reason));
1514     safestrncpy(dnr->chan_name, chan_name, sizeof(dnr->chan_name));
1515     safestrncpy(dnr->setter, setter, sizeof(dnr->setter));
1516     strcpy(dnr->reason, reason);
1517     dnr->set = now;
1518     dnr->expires = expires;
1519     if(dnr->chan_name[0] == '*')
1520         dict_insert(handle_dnrs, dnr->chan_name+1, dnr);
1521     else if(strpbrk(dnr->chan_name, "*?"))
1522         dict_insert(mask_dnrs, dnr->chan_name, dnr);
1523     else
1524         dict_insert(plain_dnrs, dnr->chan_name, dnr);
1525     return dnr;
1526 }
1527
1528 static struct dnrList
1529 chanserv_find_dnrs(const char *chan_name, const char *handle, unsigned int max)
1530 {
1531     struct dnrList list;
1532     dict_iterator_t it, next;
1533     struct do_not_register *dnr;
1534
1535     dnrList_init(&list);
1536
1537     if(handle && (dnr = dict_find(handle_dnrs, handle, NULL)))
1538     {
1539         if(dnr->expires && dnr->expires <= now)
1540             dict_remove(handle_dnrs, handle);
1541         else if(list.used < max)
1542             dnrList_append(&list, dnr);
1543     }
1544
1545     if(chan_name && (dnr = dict_find(plain_dnrs, chan_name, NULL)))
1546     {
1547         if(dnr->expires && dnr->expires <= now)
1548             dict_remove(plain_dnrs, chan_name);
1549         else if(list.used < max)
1550             dnrList_append(&list, dnr);
1551     }
1552
1553     if(chan_name)
1554     {
1555         for(it = dict_first(mask_dnrs); it && list.used < max; it = next)
1556         {
1557             next = iter_next(it);
1558             if(!match_ircglob(chan_name, iter_key(it)))
1559                 continue;
1560             dnr = iter_data(it);
1561             if(dnr->expires && dnr->expires <= now)
1562                 dict_remove(mask_dnrs, iter_key(it));
1563             else
1564                 dnrList_append(&list, dnr);
1565         }
1566     }
1567
1568     return list;
1569 }
1570
1571 static int dnr_print_func(struct do_not_register *dnr, void *extra)
1572 {
1573     struct userNode *user;
1574     char buf1[INTERVALLEN];
1575     char buf2[INTERVALLEN];
1576     time_t feh;
1577
1578     user = extra;
1579     if(dnr->set)
1580     {
1581         feh = dnr->set;
1582         strftime(buf1, sizeof(buf1), "%d %b %Y", localtime(&feh));
1583     }
1584     if(dnr->expires)
1585     {
1586         feh = dnr->expires;
1587         strftime(buf2, sizeof(buf2), "%d %b %Y", localtime(&feh));
1588         send_message(user, chanserv, "CSMSG_DNR_INFO_SET_EXPIRES", dnr->chan_name, buf1, dnr->setter, buf2, dnr->reason);
1589     }
1590     else if(dnr->set)
1591     {
1592         send_message(user, chanserv, "CSMSG_DNR_INFO_SET", dnr->chan_name, buf1, dnr->setter, dnr->reason);
1593     }
1594     else
1595         send_message(user, chanserv, "CSMSG_DNR_INFO", dnr->chan_name, dnr->setter, dnr->reason);
1596     return 0;
1597 }
1598
1599 static unsigned int
1600 chanserv_show_dnrs(struct userNode *user, struct svccmd *cmd, const char *chan_name, const char *handle)
1601 {
1602     struct dnrList list;
1603     unsigned int ii;
1604
1605     list = chanserv_find_dnrs(chan_name, handle, UINT_MAX);
1606     for(ii = 0; (ii < list.used) && (ii < 10); ++ii)
1607         dnr_print_func(list.list[ii], user);
1608     if(ii < list.used)
1609         reply("CSMSG_MORE_DNRS", list.used - ii);
1610     free(list.list);
1611     return ii;
1612 }
1613
1614 struct do_not_register *
1615 chanserv_is_dnr(const char *chan_name, struct handle_info *handle)
1616 {
1617     struct dnrList list;
1618     struct do_not_register *dnr;
1619
1620     list = chanserv_find_dnrs(chan_name, handle ? handle->handle : NULL, 1);
1621     dnr = list.used ? list.list[0] : NULL;
1622     free(list.list);
1623     return dnr;
1624 }
1625
1626 static unsigned int send_dnrs(struct userNode *user, dict_t dict)
1627 {
1628     struct do_not_register *dnr;
1629     dict_iterator_t it, next;
1630     unsigned int matches = 0;
1631
1632     for(it = dict_first(dict); it; it = next)
1633     {
1634         dnr = iter_data(it);
1635         next = iter_next(it);
1636         if(dnr->expires && dnr->expires <= now)
1637         {
1638             dict_remove(dict, iter_key(it));
1639             continue;
1640         }
1641         dnr_print_func(dnr, user);
1642         matches++;
1643     }
1644
1645     return matches;
1646 }
1647
1648 static CHANSERV_FUNC(cmd_noregister)
1649 {
1650     const char *target;
1651     const char *reason;
1652     unsigned long expiry, duration;
1653     unsigned int matches;
1654
1655     if(argc < 2)
1656     {
1657         reply("CSMSG_DNR_SEARCH_RESULTS");
1658         matches = send_dnrs(user, handle_dnrs);
1659         matches += send_dnrs(user, plain_dnrs);
1660         matches += send_dnrs(user, mask_dnrs);
1661         if(matches)
1662             reply("MSG_MATCH_COUNT", matches);
1663         else
1664             reply("MSG_NO_MATCHES");
1665         return 0;
1666     }
1667
1668     target = argv[1];
1669
1670     if(!IsChannelName(target) && (*target != '*'))
1671     {
1672         reply("CSMSG_NOT_DNR", target);
1673         return 0;
1674     }
1675
1676     if(argc > 2)
1677     {
1678         if(argc == 3)
1679         {
1680             reply("MSG_INVALID_DURATION", argv[2]);
1681             return 0;
1682         }
1683
1684         if(!strcmp(argv[2], "0"))
1685             expiry = 0;
1686         else if((duration = ParseInterval(argv[2])))
1687             expiry = now + duration;
1688         else
1689         {
1690             reply("MSG_INVALID_DURATION", argv[2]);
1691             return 0;
1692         }
1693
1694         reason = unsplit_string(argv + 3, argc - 3, NULL);
1695         if((*target == '*') && !get_handle_info(target + 1))
1696         {
1697             reply("MSG_HANDLE_UNKNOWN", target + 1);
1698             return 0;
1699         }
1700         chanserv_add_dnr(target, user->handle_info->handle, expiry, reason);
1701         reply("CSMSG_NOREGISTER_CHANNEL", target);
1702         return 1;
1703     }
1704
1705     reply("CSMSG_DNR_SEARCH_RESULTS");
1706     if(*target == '*')
1707         matches = chanserv_show_dnrs(user, cmd, NULL, target + 1);
1708     else
1709         matches = chanserv_show_dnrs(user, cmd, target, NULL);
1710     if(!matches)
1711         reply("MSG_NO_MATCHES");
1712     return 0;
1713 }
1714
1715 static CHANSERV_FUNC(cmd_allowregister)
1716 {
1717     const char *chan_name = argv[1];
1718
1719     if(((chan_name[0] == '*') && dict_remove(handle_dnrs, chan_name+1))
1720        || dict_remove(plain_dnrs, chan_name)
1721        || dict_remove(mask_dnrs, chan_name))
1722     {
1723         reply("CSMSG_DNR_REMOVED", chan_name);
1724         return 1;
1725     }
1726     reply("CSMSG_NO_SUCH_DNR", chan_name);
1727     return 0;
1728 }
1729
1730 struct dnr_search {
1731     struct userNode *source;
1732     char *chan_mask;
1733     char *setter_mask;
1734     char *reason_mask;
1735     unsigned long min_set, max_set;
1736     unsigned long min_expires, max_expires;
1737     unsigned int limit;
1738 };
1739
1740 static int
1741 dnr_search_matches(const struct do_not_register *dnr, const struct dnr_search *search)
1742 {
1743     return !((dnr->set < search->min_set)
1744              || (dnr->set > search->max_set)
1745              || (dnr->expires < search->min_expires)
1746              || (search->max_expires
1747                  && ((dnr->expires == 0)
1748                      || (dnr->expires > search->max_expires)))
1749              || (search->chan_mask
1750                  && !match_ircglob(dnr->chan_name, search->chan_mask))
1751              || (search->setter_mask
1752                  && !match_ircglob(dnr->setter, search->setter_mask))
1753              || (search->reason_mask
1754                  && !match_ircglob(dnr->reason, search->reason_mask)));
1755 }
1756
1757 static struct dnr_search *
1758 dnr_search_create(struct userNode *user, struct svccmd *cmd, unsigned int argc, char *argv[])
1759 {
1760     struct dnr_search *discrim;
1761     unsigned int ii;
1762
1763     discrim = calloc(1, sizeof(*discrim));
1764     discrim->source = user;
1765     discrim->chan_mask = NULL;
1766     discrim->setter_mask = NULL;
1767     discrim->reason_mask = NULL;
1768     discrim->max_set = INT_MAX;
1769     discrim->limit = 50;
1770
1771     for(ii=0; ii<argc; ++ii)
1772     {
1773         if(ii == argc - 1)
1774         {
1775             reply("MSG_MISSING_PARAMS", argv[ii]);
1776             goto fail;
1777         }
1778         else if(0 == irccasecmp(argv[ii], "channel"))
1779         {
1780             discrim->chan_mask = argv[++ii];
1781         }
1782         else if(0 == irccasecmp(argv[ii], "setter"))
1783         {
1784             discrim->setter_mask = argv[++ii];
1785         }
1786         else if(0 == irccasecmp(argv[ii], "reason"))
1787         {
1788             discrim->reason_mask = argv[++ii];
1789         }
1790         else if(0 == irccasecmp(argv[ii], "limit"))
1791         {
1792             discrim->limit = strtoul(argv[++ii], NULL, 0);
1793         }
1794         else if(0 == irccasecmp(argv[ii], "set"))
1795         {
1796             const char *cmp = argv[++ii];
1797             if(cmp[0] == '<') {
1798                 if(cmp[1] == '=')
1799                     discrim->min_set = now - ParseInterval(cmp + 2);
1800                 else
1801                     discrim->min_set = now - (ParseInterval(cmp + 1) - 1);
1802             } else if(cmp[0] == '=') {
1803                 discrim->min_set = discrim->max_set = now - ParseInterval(cmp + 1);
1804             } else if(cmp[0] == '>') {
1805                 if(cmp[1] == '=')
1806                     discrim->max_set = now - ParseInterval(cmp + 2);
1807                 else
1808                     discrim->max_set = now - (ParseInterval(cmp + 1) - 1);
1809             } else {
1810                 discrim->max_set = now - (ParseInterval(cmp) - 1);
1811             }
1812         }
1813         else if(0 == irccasecmp(argv[ii], "expires"))
1814         {
1815             const char *cmp = argv[++ii];
1816             if(cmp[0] == '<') {
1817                 if(cmp[1] == '=')
1818                     discrim->max_expires = now + ParseInterval(cmp + 2);
1819                 else
1820                     discrim->max_expires = now + (ParseInterval(cmp + 1) - 1);
1821             } else if(cmp[0] == '=') {
1822                 discrim->min_expires = discrim->max_expires = now + ParseInterval(cmp + 1);
1823             } else if(cmp[0] == '>') {
1824                 if(cmp[1] == '=')
1825                     discrim->min_expires = now + ParseInterval(cmp + 2);
1826                 else
1827                     discrim->min_expires = now + (ParseInterval(cmp + 1) - 1);
1828             } else {
1829                 discrim->min_expires = now + (ParseInterval(cmp) - 1);
1830             }
1831         }
1832         else
1833         {
1834             reply("MSG_INVALID_CRITERIA", argv[ii]);
1835             goto fail;
1836         }
1837     }
1838     return discrim;
1839
1840   fail:
1841     free(discrim);
1842     return NULL;
1843 }
1844
1845 typedef int (*dnr_search_func)(struct do_not_register *match, void *extra);
1846
1847 static unsigned int
1848 dnr_search(struct dnr_search *discrim, dnr_search_func dsf, void *data)
1849 {
1850     struct do_not_register *dnr;
1851     dict_iterator_t next;
1852     dict_iterator_t it;
1853     unsigned int count;
1854     int target_fixed;
1855
1856     /* Initialize local variables. */
1857     count = 0;
1858     target_fixed = 0;
1859     if(discrim->chan_mask)
1860     {
1861         int shift = (discrim->chan_mask[0] == '\\' && discrim->chan_mask[1] == '*') ? 2 : 0;
1862         if('\0' == discrim->chan_mask[shift + strcspn(discrim->chan_mask+shift, "*?")])
1863             target_fixed = 1;
1864     }
1865
1866     if(target_fixed && discrim->chan_mask[0] == '\\' && discrim->chan_mask[1] == '*')
1867     {
1868         /* Check against account-based DNRs. */
1869         dnr = dict_find(handle_dnrs, discrim->chan_mask + 2, NULL);
1870         if(dnr && dnr_search_matches(dnr, discrim) && (count++ < discrim->limit))
1871             dsf(dnr, data);
1872     }
1873     else if(target_fixed)
1874     {
1875         /* Check against channel-based DNRs. */
1876         dnr = dict_find(plain_dnrs, discrim->chan_mask, NULL);
1877         if(dnr && dnr_search_matches(dnr, discrim) && (count++ < discrim->limit))
1878             dsf(dnr, data);
1879     }
1880     else
1881     {
1882         /* Exhaustively search account DNRs. */
1883         for(it = dict_first(handle_dnrs); it; it = next)
1884         {
1885             next = iter_next(it);
1886             dnr = iter_data(it);
1887             if(dnr_search_matches(dnr, discrim) && (count++ < discrim->limit) && dsf(dnr, data))
1888                 break;
1889         }
1890
1891         /* Do the same for channel DNRs. */
1892         for(it = dict_first(plain_dnrs); it; it = next)
1893         {
1894             next = iter_next(it);
1895             dnr = iter_data(it);
1896             if(dnr_search_matches(dnr, discrim) && (count++ < discrim->limit) && dsf(dnr, data))
1897                 break;
1898         }
1899
1900         /* Do the same for wildcarded channel DNRs. */
1901         for(it = dict_first(mask_dnrs); it; it = next)
1902         {
1903             next = iter_next(it);
1904             dnr = iter_data(it);
1905             if(dnr_search_matches(dnr, discrim) && (count++ < discrim->limit) && dsf(dnr, data))
1906                 break;
1907         }
1908     }
1909     return count;
1910 }
1911
1912 static int
1913 dnr_remove_func(struct do_not_register *match, void *extra)
1914 {
1915     struct userNode *user;
1916     char *chan_name;
1917
1918     chan_name = alloca(strlen(match->chan_name) + 1);
1919     strcpy(chan_name, match->chan_name);
1920     user = extra;
1921     if(((chan_name[0] == '*') && dict_remove(handle_dnrs, chan_name+1))
1922        || dict_remove(plain_dnrs, chan_name)
1923        || dict_remove(mask_dnrs, chan_name))
1924     {
1925         send_message(user, chanserv, "CSMSG_DNR_REMOVED", chan_name);
1926     }
1927     return 0;
1928 }
1929
1930 static int
1931 dnr_count_func(struct do_not_register *match, void *extra)
1932 {
1933     return 0; (void)match; (void)extra;
1934 }
1935
1936 static MODCMD_FUNC(cmd_dnrsearch)
1937 {
1938     struct dnr_search *discrim;
1939     dnr_search_func action;
1940     struct svccmd *subcmd;
1941     unsigned int matches;
1942     char buf[MAXLEN];
1943
1944     sprintf(buf, "dnrsearch %s", argv[1]);
1945     subcmd = dict_find(cmd->parent->commands, buf, NULL);
1946     if(!subcmd)
1947     {
1948         reply("CSMSG_DNR_BAD_ACTION", argv[1]);
1949         return 0;
1950     }
1951     if(!svccmd_can_invoke(user, cmd->parent->bot, subcmd, channel, SVCCMD_NOISY))
1952         return 0;
1953     if(!irccasecmp(argv[1], "print"))
1954         action = dnr_print_func;
1955     else if(!irccasecmp(argv[1], "remove"))
1956         action = dnr_remove_func;
1957     else if(!irccasecmp(argv[1], "count"))
1958         action = dnr_count_func;
1959     else
1960     {
1961         reply("CSMSG_DNR_BAD_ACTION", argv[1]);
1962         return 0;
1963     }
1964
1965     discrim = dnr_search_create(user, cmd, argc-2, argv+2);
1966     if(!discrim)
1967         return 0;
1968
1969     if(action == dnr_print_func)
1970         reply("CSMSG_DNR_SEARCH_RESULTS");
1971     matches = dnr_search(discrim, action, user);
1972     if(matches)
1973         reply("MSG_MATCH_COUNT", matches);
1974     else
1975         reply("MSG_NO_MATCHES");
1976     free(discrim);
1977     return 1;
1978 }
1979
1980 unsigned int
1981 chanserv_get_owned_count(struct handle_info *hi)
1982 {
1983     struct userData *cList;
1984     unsigned int owned;
1985
1986     for(owned=0, cList=hi->channels; cList; cList=cList->u_next)
1987         if(cList->access == UL_OWNER)
1988             owned++;
1989     return owned;
1990 }
1991
1992 static CHANSERV_FUNC(cmd_register)
1993 {
1994     struct handle_info *handle;
1995     struct chanData *cData;
1996     struct modeNode *mn;
1997     char reason[MAXLEN];
1998     char *chan_name;
1999     unsigned int new_channel, force=0;
2000     struct do_not_register *dnr;
2001
2002     if(channel)
2003     {
2004         if(channel->channel_info)
2005         {
2006             reply("CSMSG_ALREADY_REGGED", channel->name);
2007             return 0;
2008         }
2009
2010         if(channel->bad_channel)
2011         {
2012             reply("CSMSG_ILLEGAL_CHANNEL", channel->name);
2013             return 0;
2014         }
2015
2016         if(!IsHelping(user)
2017            && (!(mn = GetUserMode(channel, user)) || !(mn->modes & MODE_CHANOP)))
2018         {
2019             reply("CSMSG_MUST_BE_OPPED", channel->name);
2020             return 0;
2021         }
2022
2023         new_channel = 0;
2024         chan_name = channel->name;
2025     }
2026     else
2027     {
2028         if((argc < 2) || !IsChannelName(argv[1]))
2029         {
2030             reply("MSG_NOT_CHANNEL_NAME");
2031             return 0;
2032         }
2033
2034         if(opserv_bad_channel(argv[1]))
2035         {
2036             reply("CSMSG_ILLEGAL_CHANNEL", argv[1]);
2037             return 0;
2038         }
2039
2040         new_channel = 1;
2041         chan_name = argv[1];
2042     }
2043
2044     if(argc >= (new_channel+2))
2045     {
2046         if(!IsHelping(user))
2047         {
2048             reply("CSMSG_PROXY_FORBIDDEN");
2049             return 0;
2050         }
2051
2052         if(!(handle = modcmd_get_handle_info(user, argv[new_channel+1])))
2053             return 0;
2054         force = (argc > (new_channel+2)) && !irccasecmp(argv[new_channel+2], "force");
2055         dnr = chanserv_is_dnr(chan_name, handle);
2056     }
2057     else
2058     {
2059         handle = user->handle_info;
2060         dnr = chanserv_is_dnr(chan_name, handle);
2061     }
2062     if(dnr && !force)
2063     {
2064         if(!IsHelping(user))
2065             reply("CSMSG_DNR_CHANNEL", chan_name);
2066         else
2067             chanserv_show_dnrs(user, cmd, chan_name, handle->handle);
2068         return 0;
2069     }
2070
2071     if((chanserv_get_owned_count(handle) >= chanserv_conf.max_owned) && !force)
2072     {
2073         reply("CSMSG_OWN_TOO_MANY", handle->handle, chanserv_conf.max_owned);
2074         return 0;
2075     }
2076
2077     if(new_channel)
2078         channel = AddChannel(argv[1], now, NULL, NULL);
2079
2080     cData = register_channel(channel, user->handle_info->handle);
2081     scan_user_presence(add_channel_user(cData, handle, UL_OWNER, 0, NULL), NULL);
2082     cData->modes = chanserv_conf.default_modes;
2083     if(off_channel > 0)
2084         cData->modes.modes_set |= MODE_REGISTERED;
2085     if (IsOffChannel(cData))
2086     {
2087         mod_chanmode_announce(chanserv, channel, &cData->modes);
2088     }
2089     else
2090     {
2091         struct mod_chanmode *change = mod_chanmode_dup(&cData->modes, 1);
2092         change->args[change->argc].mode = MODE_CHANOP;
2093         change->args[change->argc].u.member = AddChannelUser(chanserv, channel);
2094         change->argc++;
2095         mod_chanmode_announce(chanserv, channel, change);
2096         mod_chanmode_free(change);
2097     }
2098
2099     /* Initialize the channel's max user record. */
2100     cData->max = channel->members.used;
2101
2102     if(handle != user->handle_info)
2103         reply("CSMSG_PROXY_SUCCESS", handle->handle, channel->name);
2104     else
2105         reply("CSMSG_REG_SUCCESS", channel->name);
2106
2107     sprintf(reason, "%s registered to %s by %s.", channel->name, handle->handle, user->handle_info->handle);
2108     global_message(MESSAGE_RECIPIENT_OPERS | MESSAGE_RECIPIENT_HELPERS, reason);
2109     return 1;
2110 }
2111
2112 static const char *
2113 make_confirmation_string(struct userData *uData)
2114 {
2115     static char strbuf[16];
2116     char *src;
2117     unsigned int accum;
2118
2119     accum = 0;
2120     for(src = uData->handle->handle; *src; )
2121         accum = accum * 31 + toupper(*src++);
2122     if(uData->channel)
2123         for(src = uData->channel->channel->name; *src; )
2124             accum = accum * 31 + toupper(*src++);
2125     sprintf(strbuf, "%08x", accum);
2126     return strbuf;
2127 }
2128
2129 static CHANSERV_FUNC(cmd_unregister)
2130 {
2131     char *name;
2132     char reason[MAXLEN];
2133     struct chanData *cData;
2134     struct userData *uData;
2135
2136     cData = channel->channel_info;
2137     if(!cData)
2138     {
2139         reply("CSMSG_NOT_REGISTERED", channel->name);
2140         return 0;
2141     }
2142
2143     uData = GetChannelUser(cData, user->handle_info);
2144     if(!uData || (uData->access < UL_OWNER))
2145     {
2146         reply("CSMSG_NO_ACCESS");
2147         return 0;
2148     }
2149
2150     if(IsProtected(cData))
2151     {
2152         reply("CSMSG_UNREG_NODELETE", channel->name);
2153         return 0;
2154     }
2155
2156     if(!IsHelping(user))
2157     {
2158         const char *confirm_string;
2159         if(IsSuspended(cData))
2160         {
2161             reply("CSMSG_CHAN_SUSPENDED", channel->name, cData->suspended->reason);
2162             return 0;
2163         }
2164         confirm_string = make_confirmation_string(uData);
2165         if((argc < 2) || strcmp(argv[1], confirm_string))
2166         {
2167             reply("CSMSG_CONFIRM_UNREG", confirm_string);
2168             return 0;
2169         }
2170     }
2171
2172     sprintf(reason, "unregistered by %s.", user->handle_info->handle);
2173     name = strdup(channel->name);
2174     unregister_channel(cData, reason);
2175     reply("CSMSG_UNREG_SUCCESS", name);
2176     free(name);
2177     return 1;
2178 }
2179
2180 static CHANSERV_FUNC(cmd_move)
2181 {
2182     struct mod_chanmode change;
2183     struct chanNode *target;
2184     struct modeNode *mn;
2185     struct userData *uData;
2186     char reason[MAXLEN];
2187     struct do_not_register *dnr;
2188
2189     REQUIRE_PARAMS(2);
2190
2191     if(IsProtected(channel->channel_info))
2192     {
2193         reply("CSMSG_MOVE_NODELETE", channel->name);
2194         return 0;
2195     }
2196
2197     if(!IsChannelName(argv[1]))
2198     {
2199         reply("MSG_NOT_CHANNEL_NAME");
2200         return 0;
2201     }
2202
2203     if(opserv_bad_channel(argv[1]))
2204     {
2205         reply("CSMSG_ILLEGAL_CHANNEL", argv[1]);
2206         return 0;
2207     }
2208
2209     if(!IsHelping(user) || (argc < 3) || irccasecmp(argv[2], "force"))
2210     {
2211         for(uData = channel->channel_info->users; uData; uData = uData->next)
2212         {
2213             if((uData->access == UL_OWNER) && (dnr = chanserv_is_dnr(argv[1], uData->handle)))
2214             {
2215                 if(!IsHelping(user))
2216                     reply("CSMSG_DNR_CHANNEL_MOVE", argv[1]);
2217                 else
2218                     chanserv_show_dnrs(user, cmd, argv[1], uData->handle->handle);
2219                 return 0;
2220             }
2221         }
2222     }
2223
2224     mod_chanmode_init(&change);
2225     if(!(target = GetChannel(argv[1])))
2226     {
2227         target = AddChannel(argv[1], now, NULL, NULL);
2228         if(!IsSuspended(channel->channel_info))
2229             AddChannelUser(chanserv, target);
2230     }
2231     else if(target->channel_info)
2232     {
2233         reply("CSMSG_ALREADY_REGGED", target->name);
2234         return 0;
2235     }
2236     else if((!(mn = GetUserMode(target, user)) || !(mn->modes && MODE_CHANOP))
2237             && !IsHelping(user))
2238     {
2239         reply("CSMSG_MUST_BE_OPPED", target->name);
2240         return 0;
2241     }
2242     else if(!IsSuspended(channel->channel_info))
2243     {
2244         change.argc = 1;
2245         change.args[0].mode = MODE_CHANOP;
2246         change.args[0].u.member = AddChannelUser(chanserv, target);
2247         mod_chanmode_announce(chanserv, target, &change);
2248     }
2249
2250     if(off_channel > 0)
2251     {
2252         /* Clear MODE_REGISTERED from old channel, add it to new. */
2253         change.argc = 0;
2254         change.modes_clear = MODE_REGISTERED;
2255         mod_chanmode_announce(chanserv, channel, &change);
2256         change.modes_clear = 0;
2257         change.modes_set = MODE_REGISTERED;
2258         mod_chanmode_announce(chanserv, target, &change);
2259     }
2260
2261     /* Move the channel_info to the target channel; it
2262        shouldn't be necessary to clear timeq callbacks
2263        for the old channel. */
2264     target->channel_info = channel->channel_info;
2265     target->channel_info->channel = target;
2266     channel->channel_info = NULL;
2267
2268     /* Check whether users are present in the new channel. */
2269     for(uData = target->channel_info->users; uData; uData = uData->next)
2270         scan_user_presence(uData, NULL);
2271
2272     reply("CSMSG_MOVE_SUCCESS", target->name);
2273
2274     sprintf(reason, "%s moved to %s by %s.", channel->name, target->name, user->handle_info->handle);
2275     if(!IsSuspended(target->channel_info))
2276     {
2277         char reason2[MAXLEN];
2278         sprintf(reason2, "Channel moved to %s by %s.", target->name, user->handle_info->handle);
2279         DelChannelUser(chanserv, channel, reason2, 0);
2280     }
2281     UnlockChannel(channel);
2282     LockChannel(target);
2283     global_message(MESSAGE_RECIPIENT_OPERS | MESSAGE_RECIPIENT_HELPERS, reason);
2284     return 1;
2285 }
2286
2287 static void
2288 merge_users(struct chanData *source, struct chanData *target)
2289 {
2290     struct userData *suData, *tuData, *next;
2291     dict_iterator_t it;
2292     dict_t merge;
2293
2294     merge = dict_new();
2295
2296     /* Insert the source's users into the scratch area. */
2297     for(suData = source->users; suData; suData = suData->next)
2298         dict_insert(merge, suData->handle->handle, suData);
2299
2300     /* Iterate through the target's users, looking for
2301        users common to both channels. The lower access is
2302        removed from either the scratch area or target user
2303        list. */
2304     for(tuData = target->users; tuData; tuData = next)
2305     {
2306         struct userData *choice;
2307
2308         next = tuData->next;
2309
2310         /* If a source user exists with the same handle as a target
2311            channel's user, resolve the conflict by removing one. */
2312         suData = dict_find(merge, tuData->handle->handle, NULL);
2313         if(!suData)
2314             continue;
2315
2316         /* Pick the data we want to keep. */
2317         /* If the access is the same, use the later seen time. */
2318         if(suData->access == tuData->access)
2319             choice = (suData->seen > tuData->seen) ? suData : tuData;
2320         else /* Otherwise, keep the higher access level. */
2321             choice = (suData->access > tuData->access) ? suData : tuData;
2322         /* Use the later seen time. */
2323         if(suData->seen < tuData->seen)
2324             suData->seen = tuData->seen;
2325         else
2326             tuData->seen = suData->seen;
2327
2328         /* Remove the user that wasn't picked. */
2329         if(choice == tuData)
2330         {
2331             dict_remove(merge, suData->handle->handle);
2332             del_channel_user(suData, 0);
2333         }
2334         else
2335             del_channel_user(tuData, 0);
2336     }
2337
2338     /* Move the remaining users to the target channel. */
2339     for(it = dict_first(merge); it; it = iter_next(it))
2340     {
2341         suData = iter_data(it);
2342
2343         /* Insert the user into the target channel's linked list. */
2344         suData->prev = NULL;
2345         suData->next = target->users;
2346         suData->channel = target;
2347
2348         if(target->users)
2349             target->users->prev = suData;
2350         target->users = suData;
2351
2352         /* Update the user counts for the target channel; the
2353            source counts are left alone. */
2354         target->userCount++;
2355
2356         /* Check whether the user is in the target channel. */
2357         scan_user_presence(suData, NULL);
2358     }
2359
2360     /* Possible to assert (source->users == NULL) here. */
2361     source->users = NULL;
2362     dict_delete(merge);
2363 }
2364
2365 static void
2366 merge_bans(struct chanData *source, struct chanData *target)
2367 {
2368     struct banData *sbData, *tbData, *sNext, *tNext, *tFront;
2369
2370     /* Hold on to the original head of the target ban list
2371        to avoid comparing source bans with source bans. */
2372     tFront = target->bans;
2373
2374     /* Perform a totally expensive O(n*m) merge, ick. */
2375     for(sbData = source->bans; sbData; sbData = sNext)
2376     {
2377         /* Flag to track whether the ban's been moved
2378            to the destination yet. */
2379         int moved = 0;
2380
2381         /* Possible to assert (sbData->prev == NULL) here. */
2382         sNext = sbData->next;
2383
2384         for(tbData = tFront; tbData; tbData = tNext)
2385         {
2386             tNext = tbData->next;
2387
2388             /* Perform two comparisons between each source
2389                and target ban, conflicts are resolved by
2390                keeping the broader ban and copying the later
2391                expiration and triggered time. */
2392             if(match_ircglobs(tbData->mask, sbData->mask))
2393             {
2394                 /* There is a broader ban in the target channel that
2395                    overrides one in the source channel; remove the
2396                    source ban and break. */
2397                 if(sbData->expires > tbData->expires)
2398                     tbData->expires = sbData->expires;
2399                 if(sbData->triggered > tbData->triggered)
2400                     tbData->triggered = sbData->triggered;
2401                 del_channel_ban(sbData);
2402                 break;
2403             }
2404             else if(match_ircglobs(sbData->mask, tbData->mask))
2405             {
2406                 /* There is a broader ban in the source channel that
2407                    overrides one in the target channel; remove the
2408                    target ban, fall through and move the source over. */
2409                 if(tbData->expires > sbData->expires)
2410                     sbData->expires = tbData->expires;
2411                 if(tbData->triggered > sbData->triggered)
2412                     sbData->triggered = tbData->triggered;
2413                 if(tbData == tFront)
2414                     tFront = tNext;
2415                 del_channel_ban(tbData);
2416             }
2417
2418             /* Source bans can override multiple target bans, so
2419                we allow a source to run through this loop multiple
2420                times, but we can only move it once. */
2421             if(moved)
2422                 continue;
2423             moved = 1;
2424
2425             /* Remove the source ban from the source ban list. */
2426             if(sbData->next)
2427                 sbData->next->prev = sbData->prev;
2428
2429             /* Modify the source ban's associated channel. */
2430             sbData->channel = target;
2431
2432             /* Insert the ban into the target channel's linked list. */
2433             sbData->prev = NULL;
2434             sbData->next = target->bans;
2435
2436             if(target->bans)
2437                 target->bans->prev = sbData;
2438             target->bans = sbData;
2439
2440             /* Update the user counts for the target channel. */
2441             target->banCount++;
2442         }
2443     }
2444
2445     /* Possible to assert (source->bans == NULL) here. */
2446     source->bans = NULL;
2447 }
2448
2449 static void
2450 merge_data(struct chanData *source, struct chanData *target)
2451 {
2452     /* Use more recent visited and owner-transfer time; use older
2453      * registered time.  Bitwise or may_opchan.  Use higher max.
2454      * Do not touch last_refresh, ban count or user counts.
2455      */
2456     if(source->visited > target->visited)
2457         target->visited = source->visited;
2458     if(source->registered < target->registered)
2459         target->registered = source->registered;
2460     if(source->ownerTransfer > target->ownerTransfer)
2461         target->ownerTransfer = source->ownerTransfer;
2462     if(source->may_opchan)
2463         target->may_opchan = 1;
2464     if(source->max > target->max)
2465         target->max = source->max;
2466 }
2467
2468 static void
2469 merge_channel(struct chanData *source, struct chanData *target)
2470 {
2471     merge_users(source, target);
2472     merge_bans(source, target);
2473     merge_data(source, target);
2474 }
2475
2476 static CHANSERV_FUNC(cmd_merge)
2477 {
2478     struct userData *target_user;
2479     struct chanNode *target;
2480     char reason[MAXLEN];
2481
2482     REQUIRE_PARAMS(2);
2483
2484     /* Make sure the target channel exists and is registered to the user
2485        performing the command. */
2486     if(!(target = GetChannel(argv[1])))
2487     {
2488         reply("MSG_INVALID_CHANNEL");
2489         return 0;
2490     }
2491
2492     if(!target->channel_info)
2493     {
2494         reply("CSMSG_NOT_REGISTERED", target->name);
2495         return 0;
2496     }
2497
2498     if(IsProtected(channel->channel_info))
2499     {
2500         reply("CSMSG_MERGE_NODELETE");
2501         return 0;
2502     }
2503
2504     if(IsSuspended(target->channel_info))
2505     {
2506         reply("CSMSG_MERGE_SUSPENDED");
2507         return 0;
2508     }
2509
2510     if(channel == target)
2511     {
2512         reply("CSMSG_MERGE_SELF");
2513         return 0;
2514     }
2515
2516     target_user = GetChannelUser(target->channel_info, user->handle_info);
2517     if(!target_user || (target_user->access < UL_OWNER))
2518     {
2519         reply("CSMSG_MERGE_NOT_OWNER");
2520         return 0;
2521     }
2522
2523     /* Merge the channel structures and associated data. */
2524     merge_channel(channel->channel_info, target->channel_info);
2525     sprintf(reason, "merged into %s by %s.", target->name, user->handle_info->handle);
2526     unregister_channel(channel->channel_info, reason);
2527     reply("CSMSG_MERGE_SUCCESS", target->name);
2528     return 1;
2529 }
2530
2531 static CHANSERV_FUNC(cmd_opchan)
2532 {
2533     struct mod_chanmode change;
2534     if(!IsHelping(user) && !channel->channel_info->may_opchan)
2535     {
2536         reply("CSMSG_ALREADY_OPCHANNED", channel->name);
2537         return 0;
2538     }
2539     channel->channel_info->may_opchan = 0;
2540     mod_chanmode_init(&change);
2541     change.argc = 1;
2542     change.args[0].mode = MODE_CHANOP;
2543     change.args[0].u.member = GetUserMode(channel, chanserv);
2544     if(!change.args[0].u.member)
2545     {
2546         reply("CSMSG_OUT_OF_CHANNEL", channel->name);
2547         return 0;
2548     }
2549     mod_chanmode_announce(chanserv, channel, &change);
2550     reply("CSMSG_OPCHAN_DONE", channel->name);
2551     return 1;
2552 }
2553
2554 static CHANSERV_FUNC(cmd_adduser)
2555 {
2556     struct userData *actee;
2557     struct userData *actor, *real_actor;
2558     struct handle_info *handle;
2559     unsigned short access_level, override = 0;
2560
2561     REQUIRE_PARAMS(3);
2562
2563     if(channel->channel_info->userCount >= chanserv_conf.max_chan_users)
2564     {
2565         reply("CSMSG_MAXIMUM_USERS", chanserv_conf.max_chan_users);
2566         return 0;
2567     }
2568
2569     access_level = user_level_from_name(argv[2], UL_OWNER);
2570     if(!access_level)
2571     {
2572         reply("CSMSG_INVALID_ACCESS", argv[2]);
2573         return 0;
2574     }
2575
2576     actor = GetChannelUser(channel->channel_info, user->handle_info);
2577     real_actor = GetChannelAccess(channel->channel_info, user->handle_info);
2578
2579     if(actor->access <= access_level)
2580     {
2581         reply("CSMSG_NO_BUMP_ACCESS");
2582         return 0;
2583     }
2584
2585     /* Trying to add someone with equal/more access? */
2586     if (!real_actor || real_actor->access <= access_level)
2587         override = CMD_LOG_OVERRIDE;
2588
2589     if(!(handle = modcmd_get_handle_info(user, argv[1])))
2590         return 0;
2591
2592     if((actee = GetTrueChannelAccess(channel->channel_info, handle)))
2593     {
2594         reply("CSMSG_USER_EXISTS", handle->handle, channel->name, actee->access);
2595         return 0;
2596     }
2597
2598     actee = add_channel_user(channel->channel_info, handle, access_level, 0, NULL);
2599     scan_user_presence(actee, NULL);
2600     reply("CSMSG_ADDED_USER", handle->handle, channel->name, access_level);
2601     return 1 | override;
2602 }
2603
2604 static CHANSERV_FUNC(cmd_clvl)
2605 {
2606     struct handle_info *handle;
2607     struct userData *victim;
2608     struct userData *actor, *real_actor;
2609     unsigned short new_access, override = 0;
2610     int privileged = IsHelping(user) && ((user->handle_info->opserv_level >= chanserv_conf.nodelete_level) || !IsProtected(channel->channel_info));
2611
2612     REQUIRE_PARAMS(3);
2613
2614     actor = GetChannelUser(channel->channel_info, user->handle_info);
2615     real_actor = GetChannelAccess(channel->channel_info, user->handle_info);
2616
2617     if(!(handle = modcmd_get_handle_info(user, argv[1])))
2618         return 0;
2619
2620     if(handle == user->handle_info && !privileged)
2621     {
2622         reply("CSMSG_NO_SELF_CLVL");
2623         return 0;
2624     }
2625
2626     if(!(victim = GetTrueChannelAccess(channel->channel_info, handle)))
2627     {
2628         reply("CSMSG_NO_CHAN_USER", handle->handle, channel->name);
2629         return 0;
2630     }
2631
2632     if(actor->access <= victim->access && !privileged)
2633     {
2634         reply("MSG_USER_OUTRANKED", handle->handle);
2635         return 0;
2636     }
2637
2638     new_access = user_level_from_name(argv[2], UL_OWNER);
2639
2640     if(!new_access)
2641     {
2642         reply("CSMSG_INVALID_ACCESS", argv[2]);
2643         return 0;
2644     }
2645
2646     if(new_access >= actor->access && !privileged)
2647     {
2648         reply("CSMSG_NO_BUMP_ACCESS");
2649         return 0;
2650     }
2651
2652     /* Trying to clvl a equal/higher user? */
2653     if(!real_actor || (real_actor->access <= victim->access && handle != user->handle_info))
2654         override = CMD_LOG_OVERRIDE;
2655     /* Trying to clvl someone to equal/higher access? */
2656     if(!real_actor || new_access >= real_actor->access)
2657         override = CMD_LOG_OVERRIDE;
2658     /* Helpers clvling themselves get caught by the "clvl someone to equal/higher access" check.
2659      * If they lower their own access it's not a big problem.
2660      */
2661
2662     victim->access = new_access;
2663     reply("CSMSG_CHANGED_ACCESS", handle->handle, new_access, channel->name);
2664     return 1 | override;
2665 }
2666
2667 static CHANSERV_FUNC(cmd_deluser)
2668 {
2669     struct handle_info *handle;
2670     struct userData *victim;
2671     struct userData *actor, *real_actor;
2672     unsigned short access_level, override = 0;
2673     char *chan_name;
2674
2675     REQUIRE_PARAMS(2);
2676
2677     actor = GetChannelUser(channel->channel_info, user->handle_info);
2678     real_actor = GetChannelAccess(channel->channel_info, user->handle_info);
2679
2680     if(!(handle = modcmd_get_handle_info(user, argv[argc-1])))
2681         return 0;
2682
2683     if(!(victim = GetTrueChannelAccess(channel->channel_info, handle)))
2684     {
2685         reply("CSMSG_NO_CHAN_USER", handle->handle, channel->name);
2686         return 0;
2687     }
2688
2689     if(argc > 2)
2690     {
2691         access_level = user_level_from_name(argv[1], UL_OWNER);
2692         if(!access_level)
2693         {
2694             reply("CSMSG_INVALID_ACCESS", argv[1]);
2695             return 0;
2696         }
2697         if(access_level != victim->access)
2698         {
2699             reply("CSMSG_INCORRECT_ACCESS", handle->handle, victim->access, argv[1]);
2700             return 0;
2701         }
2702     }
2703     else
2704     {
2705         access_level = victim->access;
2706     }
2707
2708     if((actor->access <= victim->access) && !IsHelping(user))
2709     {
2710         reply("MSG_USER_OUTRANKED", victim->handle->handle);
2711         return 0;
2712     }
2713
2714     /* If people delete themselves it is an override, but they
2715      * could've used deleteme so we don't log it as an override
2716      */
2717     if(!real_actor || (real_actor->access <= victim->access && real_actor != victim))
2718         override = CMD_LOG_OVERRIDE;
2719
2720     chan_name = strdup(channel->name);
2721     del_channel_user(victim, 1);
2722     reply("CSMSG_DELETED_USER", handle->handle, access_level, chan_name);
2723     free(chan_name);
2724     return 1 | override;
2725 }
2726
2727 static int
2728 cmd_mdel_user(struct userNode *user, struct chanNode *channel, unsigned short min_access, unsigned short max_access, char *mask, struct svccmd *cmd)
2729 {
2730     struct userData *actor, *real_actor, *uData, *next;
2731     unsigned int override = 0;
2732
2733     actor = GetChannelUser(channel->channel_info, user->handle_info);
2734     real_actor = GetChannelAccess(channel->channel_info, user->handle_info);
2735
2736     if(min_access > max_access)
2737     {
2738         reply("CSMSG_BAD_RANGE", min_access, max_access);
2739         return 0;
2740     }
2741
2742     if(actor->access <= max_access)
2743     {
2744         reply("CSMSG_NO_ACCESS");
2745         return 0;
2746     }
2747
2748     if(!real_actor || real_actor->access <= max_access)
2749         override = CMD_LOG_OVERRIDE;
2750
2751     for(uData = channel->channel_info->users; uData; uData = next)
2752     {
2753         next = uData->next;
2754
2755         if((uData->access >= min_access)
2756            && (uData->access <= max_access)
2757            && match_ircglob(uData->handle->handle, mask))
2758             del_channel_user(uData, 1);
2759     }
2760
2761     reply("CSMSG_DELETED_USERS", mask, min_access, max_access, channel->name);
2762     return 1 | override;
2763 }
2764
2765 static CHANSERV_FUNC(cmd_mdelowner)
2766 {
2767     return cmd_mdel_user(user, channel, UL_OWNER, UL_OWNER, argv[1], cmd);
2768 }
2769
2770 static CHANSERV_FUNC(cmd_mdelcoowner)
2771 {
2772     return cmd_mdel_user(user, channel, UL_COOWNER, UL_COOWNER, argv[1], cmd);
2773 }
2774
2775 static CHANSERV_FUNC(cmd_mdelmaster)
2776 {
2777     return cmd_mdel_user(user, channel, UL_MASTER, UL_MASTER, argv[1], cmd);
2778 }
2779
2780 static CHANSERV_FUNC(cmd_mdelop)
2781 {
2782     return cmd_mdel_user(user, channel, UL_OP, UL_OP, argv[1], cmd);
2783 }
2784
2785 static CHANSERV_FUNC(cmd_mdelpeon)
2786 {
2787     return cmd_mdel_user(user, channel, UL_PEON, UL_PEON, argv[1], cmd);
2788 }
2789
2790 static int
2791 cmd_trim_bans(struct userNode *user, struct chanNode *channel, unsigned long duration)
2792 {
2793     struct banData *bData, *next;
2794     char interval[INTERVALLEN];
2795     unsigned int count;
2796     unsigned long limit;
2797
2798     count = 0;
2799     limit = now - duration;
2800     for(bData = channel->channel_info->bans; bData; bData = next)
2801     {
2802         next = bData->next;
2803
2804         if((bData->triggered && bData->triggered >= limit) || (bData->set && bData->set >= limit))
2805             continue;
2806
2807         del_channel_ban(bData);
2808         count++;
2809     }
2810
2811     intervalString(interval, duration, user->handle_info);
2812     send_message(user, chanserv, "CSMSG_TRIMMED_BANS", count, channel->name, interval);
2813     return 1;
2814 }
2815
2816 static int
2817 cmd_trim_users(struct userNode *user, struct chanNode *channel, unsigned short min_access, unsigned short max_access, unsigned long duration, int vacation)
2818 {
2819     struct userData *actor, *uData, *next;
2820     char interval[INTERVALLEN];
2821     unsigned int count;
2822     unsigned long limit;
2823
2824     actor = GetChannelAccess(channel->channel_info, user->handle_info);
2825     if(min_access > max_access)
2826     {
2827         send_message(user, chanserv, "CSMSG_BAD_RANGE", min_access, max_access);
2828         return 0;
2829     }
2830
2831     if(!actor || actor->access <= max_access)
2832     {
2833         send_message(user, chanserv, "CSMSG_NO_ACCESS");
2834         return 0;
2835     }
2836
2837     count = 0;
2838     limit = now - duration;
2839     for(uData = channel->channel_info->users; uData; uData = next)
2840     {
2841         next = uData->next;
2842
2843         if((uData->seen > limit)
2844            || uData->present
2845            || (HANDLE_FLAGGED(uData->handle, FROZEN) && !vacation))
2846             continue;
2847
2848         if(((uData->access >= min_access) && (uData->access <= max_access))
2849            || (!max_access && (uData->access < actor->access)))
2850         {
2851             del_channel_user(uData, 1);
2852             count++;
2853         }
2854     }
2855
2856     if(!max_access)
2857     {
2858         min_access = 1;
2859         max_access = (actor->access > UL_OWNER) ? UL_OWNER : (actor->access - 1);
2860     }
2861     send_message(user, chanserv, "CSMSG_TRIMMED_USERS", count, min_access, max_access, channel->name, intervalString(interval, duration, user->handle_info));
2862     return 1;
2863 }
2864
2865 static CHANSERV_FUNC(cmd_trim)
2866 {
2867     unsigned long duration;
2868     unsigned short min_level, max_level;
2869     int vacation;
2870
2871     REQUIRE_PARAMS(3);
2872
2873     vacation = argc > 3 && !strcmp(argv[3], "vacation");
2874     duration = ParseInterval(argv[2]);
2875     if(duration < 60)
2876     {
2877         reply("CSMSG_CANNOT_TRIM");
2878         return 0;
2879     }
2880
2881     if(!irccasecmp(argv[1], "bans"))
2882     {
2883         cmd_trim_bans(user, channel, duration);
2884         return 1;
2885     }
2886     else if(!irccasecmp(argv[1], "users"))
2887     {
2888         cmd_trim_users(user, channel, 0, 0, duration, vacation);
2889         return 1;
2890     }
2891     else if(parse_level_range(&min_level, &max_level, argv[1]))
2892     {
2893         cmd_trim_users(user, channel, min_level, max_level, duration, vacation);
2894         return 1;
2895     }
2896     else if((min_level = user_level_from_name(argv[1], UL_OWNER)))
2897     {
2898         cmd_trim_users(user, channel, min_level, min_level, duration, vacation);
2899         return 1;
2900     }
2901     else
2902     {
2903         reply("CSMSG_INVALID_TRIM", argv[1]);
2904         return 0;
2905     }
2906 }
2907
2908 /* If argc is 0 in cmd_up or cmd_down, no notices will be sent
2909    to the user. cmd_all takes advantage of this. */
2910 static CHANSERV_FUNC(cmd_up)
2911 {
2912     struct mod_chanmode change;
2913     struct userData *uData;
2914     const char *errmsg;
2915
2916     mod_chanmode_init(&change);
2917     change.argc = 1;
2918     change.args[0].u.member = GetUserMode(channel, user);
2919     if(!change.args[0].u.member)
2920     {
2921         if(argc)
2922             reply("MSG_CHANNEL_ABSENT", channel->name);
2923         return 0;
2924     }
2925
2926     uData = GetChannelAccess(channel->channel_info, user->handle_info);
2927     if(!uData)
2928     {
2929         if(argc)
2930             reply("CSMSG_GODMODE_UP", argv[0]);
2931         return 0;
2932     }
2933     else if(uData->access >= channel->channel_info->lvlOpts[lvlGiveOps])
2934     {
2935         change.args[0].mode = MODE_CHANOP;
2936         errmsg = "CSMSG_ALREADY_OPPED";
2937     }
2938     else if(uData->access >= channel->channel_info->lvlOpts[lvlGiveVoice])
2939     {
2940         change.args[0].mode = MODE_VOICE;
2941         errmsg = "CSMSG_ALREADY_VOICED";
2942     }
2943     else
2944     {
2945         if(argc)
2946             reply("CSMSG_NO_ACCESS");
2947         return 0;
2948     }
2949     change.args[0].mode &= ~change.args[0].u.member->modes;
2950     if(!change.args[0].mode)
2951     {
2952         if(argc)
2953             reply(errmsg, channel->name);
2954         return 0;
2955     }
2956     modcmd_chanmode_announce(&change);
2957     return 1;
2958 }
2959
2960 static CHANSERV_FUNC(cmd_down)
2961 {
2962     struct mod_chanmode change;
2963
2964     mod_chanmode_init(&change);
2965     change.argc = 1;
2966     change.args[0].u.member = GetUserMode(channel, user);
2967     if(!change.args[0].u.member)
2968     {
2969         if(argc)
2970             reply("MSG_CHANNEL_ABSENT", channel->name);
2971         return 0;
2972     }
2973
2974     if(!change.args[0].u.member->modes)
2975     {
2976         if(argc)
2977             reply("CSMSG_ALREADY_DOWN", channel->name);
2978         return 0;
2979     }
2980
2981     change.args[0].mode = MODE_REMOVE | change.args[0].u.member->modes;
2982     modcmd_chanmode_announce(&change);
2983     return 1;
2984 }
2985
2986 static int cmd_all(struct userNode *user, UNUSED_ARG(struct chanNode *channel), UNUSED_ARG(unsigned int argc), UNUSED_ARG(char *argv[]), struct svccmd *cmd, modcmd_func_t mcmd)
2987 {
2988     struct userData *cList;
2989
2990     for(cList = user->handle_info->channels; cList; cList = cList->u_next)
2991     {
2992         if(IsSuspended(cList->channel)
2993            || IsUserSuspended(cList)
2994            || !GetUserMode(cList->channel->channel, user))
2995             continue;
2996
2997         mcmd(user, cList->channel->channel, 0, NULL, cmd);
2998     }
2999
3000     return 1;
3001 }
3002
3003 static CHANSERV_FUNC(cmd_upall)
3004 {
3005     return cmd_all(CSFUNC_ARGS, cmd_up);
3006 }
3007
3008 static CHANSERV_FUNC(cmd_downall)
3009 {
3010     return cmd_all(CSFUNC_ARGS, cmd_down);
3011 }
3012
3013 typedef int validate_func_t(struct userNode *user, struct chanNode *channel, struct userNode *victim);
3014 typedef void process_func_t(unsigned int num, struct userNode **newops, struct chanNode *channel, struct userNode *who, int announce);
3015
3016 static int
3017 modify_users(struct userNode *user, struct chanNode *channel, unsigned int argc, char *argv[], struct svccmd *cmd, validate_func_t validate, chan_mode_t mode, char *action)
3018 {
3019     unsigned int ii, valid;
3020     struct userNode *victim;
3021     struct mod_chanmode *change;
3022
3023     change = mod_chanmode_alloc(argc - 1);
3024
3025     for(ii=valid=0; ++ii < argc; )
3026     {
3027         if(!(victim = GetUserH(argv[ii])))
3028             continue;
3029         change->args[valid].mode = mode;
3030         change->args[valid].u.member = GetUserMode(channel, victim);
3031         if(!change->args[valid].u.member)
3032             continue;
3033         if(validate && !validate(user, channel, victim))
3034             continue;
3035         valid++;
3036     }
3037
3038     change->argc = valid;
3039     if(valid < (argc-1))
3040         reply("CSMSG_PROCESS_FAILED");
3041     if(valid)
3042     {
3043         modcmd_chanmode_announce(change);
3044         reply(action, channel->name);
3045     }
3046     mod_chanmode_free(change);
3047     return 1;
3048 }
3049
3050 static CHANSERV_FUNC(cmd_op)
3051 {
3052     return modify_users(CSFUNC_ARGS, validate_op, MODE_CHANOP, "CSMSG_OPPED_USERS");
3053 }
3054
3055 static CHANSERV_FUNC(cmd_deop)
3056 {
3057     return modify_users(CSFUNC_ARGS, validate_deop, MODE_REMOVE|MODE_CHANOP, "CSMSG_DEOPPED_USERS");
3058 }
3059
3060 static CHANSERV_FUNC(cmd_voice)
3061 {
3062     return modify_users(CSFUNC_ARGS, NULL, MODE_VOICE, "CSMSG_VOICED_USERS");
3063 }
3064
3065 static CHANSERV_FUNC(cmd_devoice)
3066 {
3067     return modify_users(CSFUNC_ARGS, NULL, MODE_REMOVE|MODE_VOICE, "CSMSG_DEVOICED_USERS");
3068 }
3069
3070 static int
3071 bad_channel_ban(struct chanNode *channel, struct userNode *user, const char *ban, unsigned int *victimCount, struct modeNode **victims)
3072 {
3073     unsigned int ii;
3074
3075     if(victimCount)
3076         *victimCount = 0;
3077     for(ii=0; ii<channel->members.used; ii++)
3078     {
3079         struct modeNode *mn = channel->members.list[ii];
3080
3081         if(IsService(mn->user))
3082             continue;
3083
3084         if(!user_matches_glob(mn->user, ban, MATCH_USENICK | MATCH_VISIBLE))
3085             continue;
3086
3087         if(protect_user(mn->user, user, channel->channel_info))
3088             return 1;
3089
3090         if(victims)
3091             victims[(*victimCount)++] = mn;
3092     }
3093     return 0;
3094 }
3095
3096 static int
3097 eject_user(struct userNode *user, struct chanNode *channel, unsigned int argc, char *argv[], struct svccmd *cmd, int action)
3098 {
3099     struct userNode *victim;
3100     struct modeNode **victims;
3101     unsigned int offset, n, victimCount, duration = 0;
3102     char *reason = "Bye.", *ban, *name;
3103     char interval[INTERVALLEN];
3104
3105     offset = (action & ACTION_ADD_TIMED_BAN) ? 3 : 2;
3106     REQUIRE_PARAMS(offset);
3107     if(argc > offset)
3108     {
3109         reason = unsplit_string(argv + offset, argc - offset, NULL);
3110         if(strlen(reason) > (TOPICLEN - (NICKLEN + 3)))
3111         {
3112             /* Truncate the reason to a length of TOPICLEN, as
3113                the ircd does; however, leave room for an ellipsis
3114                and the kicker's nick. */
3115             sprintf(reason + (TOPICLEN - (NICKLEN + 6)), "...");
3116         }
3117     }
3118
3119     if((victim = GetUserH(argv[1])))
3120     {
3121         victims = alloca(sizeof(victims[0]));
3122         victims[0] = GetUserMode(channel, victim);
3123         /* XXX: The comparison with ACTION_KICK is just because all
3124          * other actions can work on users outside the channel, and we
3125          * want to allow those (e.g.  unbans) in that case.  If we add
3126          * some other ejection action for in-channel users, change
3127          * this too. */
3128         victimCount = victims[0] ? 1 : 0;
3129
3130         if(IsService(victim))
3131         {
3132             reply("MSG_SERVICE_IMMUNE", victim->nick);
3133             return 0;
3134         }
3135
3136         if((action == ACTION_KICK) && !victimCount)
3137         {
3138             reply("MSG_CHANNEL_USER_ABSENT", victim->nick, channel->name);
3139             return 0;
3140         }
3141
3142         if(protect_user(victim, user, channel->channel_info))
3143         {
3144             reply("CSMSG_USER_PROTECTED", victim->nick);
3145             return 0;
3146         }
3147
3148         ban = generate_hostmask(victim, GENMASK_STRICT_HOST|GENMASK_ANY_IDENT);
3149         name = victim->nick;
3150     }
3151     else if(!is_ircmask(argv[1]) && (*argv[1] == '*'))
3152     {
3153         struct handle_info *hi;
3154         extern const char *titlehost_suffix;
3155         char banmask[NICKLEN + USERLEN + HOSTLEN + 3];
3156         const char *accountname = argv[1] + 1;
3157
3158         if(!(hi = get_handle_info(accountname)))
3159         {
3160             reply("MSG_HANDLE_UNKNOWN", accountname);
3161             return 0;
3162         }
3163
3164         snprintf(banmask, sizeof(banmask), "*!*@%s.*.%s", hi->handle, titlehost_suffix);
3165         victims = alloca(sizeof(victims[0]) * channel->members.used);
3166
3167         if(bad_channel_ban(channel, user, banmask, &victimCount, victims))
3168         {
3169             reply("CSMSG_MASK_PROTECTED", banmask);
3170             return 0;
3171         }
3172
3173         if((action == ACTION_KICK) && (victimCount == 0))
3174         {
3175             reply("CSMSG_NO_MATCHING_USERS", channel->name, banmask);
3176             return 0;
3177         }
3178
3179         name = ban = strdup(banmask);
3180     }
3181     else
3182     {
3183         if(!is_ircmask(argv[1]))
3184         {
3185             reply("MSG_NICK_UNKNOWN", argv[1]);
3186             return 0;
3187         }
3188
3189         victims = alloca(sizeof(victims[0]) * channel->members.used);
3190
3191         if(bad_channel_ban(channel, user, argv[1], &victimCount, victims))
3192         {
3193             reply("CSMSG_MASK_PROTECTED", argv[1]);
3194             return 0;
3195         }
3196
3197         if((victimCount > 4) && ((victimCount * 3) > channel->members.used) && !IsOper(user))
3198         {
3199             reply("CSMSG_LAME_MASK", argv[1]);
3200             return 0;
3201         }
3202
3203         if((action == ACTION_KICK) && (victimCount == 0))
3204         {
3205             reply("CSMSG_NO_MATCHING_USERS", channel->name, argv[1]);
3206             return 0;
3207         }
3208
3209         name = ban = strdup(argv[1]);
3210     }
3211
3212     /* Truncate the ban in place if necessary; we must ensure
3213        that 'ban' is a valid ban mask before sanitizing it. */
3214     sanitize_ircmask(ban);
3215
3216     if(action & ACTION_ADD_BAN)
3217     {
3218         struct banData *bData, *next;
3219
3220         if(channel->channel_info->banCount >= chanserv_conf.max_chan_bans)
3221         {
3222             reply("CSMSG_MAXIMUM_BANS", chanserv_conf.max_chan_bans);
3223             free(ban);
3224             return 0;
3225         }
3226
3227         if(action & ACTION_ADD_TIMED_BAN)
3228         {
3229             duration = ParseInterval(argv[2]);
3230
3231             if(duration < 15)
3232             {
3233                 reply("CSMSG_DURATION_TOO_LOW");
3234                 free(ban);
3235                 return 0;
3236             }
3237             else if(duration > (86400 * 365 * 2))
3238             {
3239                 reply("CSMSG_DURATION_TOO_HIGH");
3240                 free(ban);
3241                 return 0;
3242             }
3243         }
3244
3245         for(bData = channel->channel_info->bans; bData; bData = next)
3246         {
3247             if(match_ircglobs(bData->mask, ban))
3248             {
3249                 int exact = !irccasecmp(bData->mask, ban);
3250
3251                 /* The ban is redundant; there is already a ban
3252                    with the same effect in place. */
3253                 if(exact)
3254                 {
3255                     if(bData->reason)
3256                         free(bData->reason);
3257                     bData->reason = strdup(reason);
3258                     safestrncpy(bData->owner, (user->handle_info ? user->handle_info->handle : user->nick), sizeof(bData->owner));
3259                     if(cmd)
3260                         reply("CSMSG_REASON_CHANGE", ban);
3261                     if(!bData->expires)
3262                         goto post_add_ban;
3263                 }
3264                 if(exact && bData->expires)
3265                 {
3266                     int reset = 0;
3267
3268                     /* If the ban matches an existing one exactly,
3269                        extend the expiration time if the provided
3270                        duration is longer. */
3271                     if(duration && (now + duration > bData->expires))
3272                     {
3273                         bData->expires = now + duration;
3274                         reset = 1;
3275                     }
3276                     else if(!duration)
3277                     {
3278                         bData->expires = 0;
3279                         reset = 1;
3280                     }
3281
3282                     if(reset)
3283                     {
3284                         /* Delete the expiration timeq entry and
3285                            requeue if necessary. */
3286                         timeq_del(0, expire_ban, bData, TIMEQ_IGNORE_WHEN);
3287
3288                         if(bData->expires)
3289                             timeq_add(bData->expires, expire_ban, bData);
3290
3291                         if(!cmd)
3292                         {
3293                             /* automated kickban */
3294                         }
3295                         else if(duration)
3296                             reply("CSMSG_BAN_EXTENDED", ban, intervalString(interval, duration, user->handle_info));
3297                         else
3298                             reply("CSMSG_BAN_ADDED", name, channel->name);
3299
3300                         goto post_add_ban;
3301                     }
3302                 }
3303                 if(cmd)
3304                     reply("CSMSG_REDUNDANT_BAN", name, channel->name);
3305
3306                 free(ban);
3307                 return 0;
3308             }
3309
3310             next = bData->next;
3311             if(match_ircglobs(ban, bData->mask))
3312             {
3313                 /* The ban we are adding makes previously existing
3314                    bans redundant; silently remove them. */
3315                 del_channel_ban(bData);
3316             }
3317         }
3318
3319         bData = add_channel_ban(channel->channel_info, ban, (user->handle_info ? user->handle_info->handle : user->nick), now, (victimCount ? now : 0), (duration ? now + duration : 0), reason);
3320         free(ban);
3321         name = ban = strdup(bData->mask);
3322     }
3323     else if(ban)
3324     {
3325         for(n = 0; n < chanserv_conf.old_ban_names->used; ++n)
3326         {
3327             extern const char *hidden_host_suffix;
3328             const char *old_name = chanserv_conf.old_ban_names->list[n];
3329             char *new_mask;
3330             unsigned int l1, l2;
3331
3332             l1 = strlen(ban);
3333             l2 = strlen(old_name);
3334             if(l2+2 > l1)
3335                 continue;
3336             if(irccasecmp(ban + l1 - l2, old_name))
3337                 continue;
3338             new_mask = malloc(MAXLEN);
3339             sprintf(new_mask, "%.*s%s", (int)(l1-l2), ban, hidden_host_suffix);
3340             free(ban);
3341             name = ban = new_mask;
3342         }
3343     }
3344
3345     post_add_ban:
3346     if(action & ACTION_BAN)
3347     {
3348         unsigned int exists;
3349         struct mod_chanmode *change;
3350
3351         if(channel->banlist.used >= MAXBANS)
3352         {
3353             if(cmd)
3354                 reply("CSMSG_BANLIST_FULL", channel->name);
3355             free(ban);
3356             return 0;
3357         }
3358
3359         exists = ChannelBanExists(channel, ban);
3360         change = mod_chanmode_alloc(victimCount + 1);
3361         for(n = 0; n < victimCount; ++n)
3362         {
3363             change->args[n].mode = MODE_REMOVE|MODE_CHANOP|MODE_VOICE;
3364             change->args[n].u.member = victims[n];
3365         }
3366         if(!exists)
3367         {
3368             change->args[n].mode = MODE_BAN;
3369             change->args[n++].u.hostmask = ban;
3370         }
3371         change->argc = n;
3372         if(cmd)
3373             modcmd_chanmode_announce(change);
3374         else
3375             mod_chanmode_announce(chanserv, channel, change);
3376         mod_chanmode_free(change);
3377
3378         if(exists && (action == ACTION_BAN))
3379         {
3380             if(cmd)
3381                 reply("CSMSG_REDUNDANT_BAN", name, channel->name);
3382             free(ban);
3383             return 0;
3384         }
3385     }
3386
3387     if(action & ACTION_KICK)
3388     {
3389         char kick_reason[MAXLEN];
3390         sprintf(kick_reason, "(%s) %s", user->nick, reason);
3391
3392         for(n = 0; n < victimCount; n++)
3393             KickChannelUser(victims[n]->user, channel, chanserv, kick_reason);
3394     }
3395
3396     if(!cmd)
3397     {
3398         /* No response, since it was automated. */
3399     }
3400     else if(action & ACTION_ADD_BAN)
3401     {
3402         if(duration)
3403             reply("CSMSG_TIMED_BAN_ADDED", name, channel->name, intervalString(interval, duration, user->handle_info));
3404         else
3405             reply("CSMSG_BAN_ADDED", name, channel->name);
3406     }
3407     else if((action & (ACTION_BAN | ACTION_KICK)) == (ACTION_BAN | ACTION_KICK))
3408         reply("CSMSG_KICK_BAN_DONE", name, channel->name);
3409     else if(action & ACTION_BAN)
3410         reply("CSMSG_BAN_DONE", name, channel->name);
3411     else if(action & ACTION_KICK && victimCount)
3412         reply("CSMSG_KICK_DONE", name, channel->name);
3413
3414     free(ban);
3415     return 1;
3416 }
3417
3418 static CHANSERV_FUNC(cmd_kickban)
3419 {
3420     return eject_user(CSFUNC_ARGS, ACTION_KICK | ACTION_BAN);
3421 }
3422
3423 static CHANSERV_FUNC(cmd_kick)
3424 {
3425     return eject_user(CSFUNC_ARGS, ACTION_KICK);
3426 }
3427
3428 static CHANSERV_FUNC(cmd_ban)
3429 {
3430     return eject_user(CSFUNC_ARGS, ACTION_BAN);
3431 }
3432
3433 static CHANSERV_FUNC(cmd_addban)
3434 {
3435     return eject_user(CSFUNC_ARGS, ACTION_KICK | ACTION_BAN | ACTION_ADD_BAN);
3436 }
3437
3438 static CHANSERV_FUNC(cmd_addtimedban)
3439 {
3440     return eject_user(CSFUNC_ARGS, ACTION_KICK | ACTION_BAN | ACTION_ADD_BAN | ACTION_ADD_TIMED_BAN);
3441 }
3442
3443 static struct mod_chanmode *
3444 find_matching_bans(struct banList *bans, struct userNode *actee, const char *mask)
3445 {
3446     struct mod_chanmode *change;
3447     unsigned char *match;
3448     unsigned int ii, count;
3449
3450     match = alloca(bans->used);
3451     if(actee)
3452     {
3453         for(ii = count = 0; ii < bans->used; ++ii)
3454         {
3455             match[ii] = user_matches_glob(actee, bans->list[ii]->ban,
3456                                           MATCH_USENICK | MATCH_VISIBLE);
3457             if(match[ii])
3458                 count++;
3459         }
3460     }
3461     else
3462     {
3463         for(ii = count = 0; ii < bans->used; ++ii)
3464         {
3465             match[ii] = match_ircglobs(mask, bans->list[ii]->ban);
3466             if(match[ii])
3467                 count++;
3468         }
3469     }
3470     if(!count)
3471         return NULL;
3472     change = mod_chanmode_alloc(count);
3473     for(ii = count = 0; ii < bans->used; ++ii)
3474     {
3475         if(!match[ii])
3476             continue;
3477         change->args[count].mode = MODE_REMOVE | MODE_BAN;
3478         change->args[count++].u.hostmask = strdup(bans->list[ii]->ban);
3479     }
3480     assert(count == change->argc);
3481     return change;
3482 }
3483
3484 static int
3485 unban_user(struct userNode *user, struct chanNode *channel, unsigned int argc, char *argv[], struct svccmd *cmd, int action)
3486 {
3487     struct userNode *actee;
3488     char *mask = NULL;
3489     int acted = 0;
3490
3491     REQUIRE_PARAMS(2);
3492
3493     /* may want to allow a comma delimited list of users... */
3494     if(!(actee = GetUserH(argv[1])))
3495     {
3496         if(!is_ircmask(argv[1]) && *argv[1] == '*')
3497         {
3498             char banmask[NICKLEN + USERLEN + HOSTLEN + 3];
3499             const char *accountname = argv[1] + 1;
3500
3501             snprintf(banmask, sizeof(banmask), "*!*@%s.*", accountname);
3502             mask = strdup(banmask);
3503         }
3504         else if(!is_ircmask(argv[1]))
3505         {
3506             reply("MSG_NICK_UNKNOWN", argv[1]);
3507             return 0;
3508         }
3509         else
3510         {
3511             mask = strdup(argv[1]);
3512         }
3513     }
3514
3515     /* We don't sanitize the mask here because ircu
3516        doesn't do it. */
3517     if(action & ACTION_UNBAN)
3518     {
3519         struct mod_chanmode *change;
3520         change = find_matching_bans(&channel->banlist, actee, mask);
3521         if(change)
3522         {
3523             unsigned int ii;
3524
3525             modcmd_chanmode_announce(change);
3526             for(ii = 0; ii < change->argc; ++ii)
3527                 free((char*)change->args[ii].u.hostmask);
3528             mod_chanmode_free(change);
3529             acted = 1;
3530         }
3531     }
3532
3533     if(action & ACTION_DEL_BAN)
3534     {
3535         struct banData *ban, *next;
3536
3537         ban = channel->channel_info->bans;
3538         while(ban)
3539         {
3540             if(actee)
3541                 for( ; ban && !user_matches_glob(actee, ban->mask,
3542                                                  MATCH_USENICK | MATCH_VISIBLE);
3543                      ban = ban->next);
3544             else
3545                 for( ; ban && !match_ircglobs(mask, ban->mask);
3546                      ban = ban->next);
3547             if(!ban)
3548                 break;
3549             next = ban->next;
3550             del_channel_ban(ban);
3551             ban = next;
3552             acted = 1;
3553         }
3554     }
3555
3556     if(!acted)
3557         reply("CSMSG_BAN_NOT_FOUND", actee ? actee->nick : mask);
3558     else
3559         reply("CSMSG_BAN_REMOVED", actee ? actee->nick : mask);
3560     if(mask)
3561         free(mask);
3562     return 1;
3563 }
3564
3565 static CHANSERV_FUNC(cmd_unban)
3566 {
3567     return unban_user(CSFUNC_ARGS, ACTION_UNBAN);
3568 }
3569
3570 static CHANSERV_FUNC(cmd_delban)
3571 {
3572     /* it doesn't necessarily have to remove the channel ban - may want
3573        to make that an option. */
3574     return unban_user(CSFUNC_ARGS, ACTION_UNBAN | ACTION_DEL_BAN);
3575 }
3576
3577 static CHANSERV_FUNC(cmd_unbanme)
3578 {
3579     struct userData *uData = GetChannelUser(channel->channel_info, user->handle_info);
3580     long flags = ACTION_UNBAN;
3581
3582     /* remove permanent bans if the user has the proper access. */
3583     if(uData->access >= UL_MASTER)
3584         flags |= ACTION_DEL_BAN;
3585
3586     argv[1] = user->nick;
3587     return unban_user(user, channel, 2, argv, cmd, flags);
3588 }
3589
3590 static CHANSERV_FUNC(cmd_unbanall)
3591 {
3592     struct mod_chanmode *change;
3593     unsigned int ii;
3594
3595     if(!channel->banlist.used)
3596     {
3597         reply("CSMSG_NO_BANS", channel->name);
3598         return 0;
3599     }
3600
3601     change = mod_chanmode_alloc(channel->banlist.used);
3602     for(ii=0; ii<channel->banlist.used; ii++)
3603     {
3604         change->args[ii].mode = MODE_REMOVE | MODE_BAN;
3605         change->args[ii].u.hostmask = strdup(channel->banlist.list[ii]->ban);
3606     }
3607     modcmd_chanmode_announce(change);
3608     for(ii = 0; ii < change->argc; ++ii)
3609         free((char*)change->args[ii].u.hostmask);
3610     mod_chanmode_free(change);
3611     reply("CSMSG_BANS_REMOVED", channel->name);
3612     return 1;
3613 }
3614
3615 static CHANSERV_FUNC(cmd_open)
3616 {
3617     struct mod_chanmode *change;
3618     unsigned int ii;
3619
3620     change = find_matching_bans(&channel->banlist, user, NULL);
3621     if(!change)
3622         change = mod_chanmode_alloc(0);
3623     change->modes_clear |= MODE_INVITEONLY | MODE_LIMIT | MODE_KEY;
3624     if(!check_user_level(channel, user, lvlEnfModes, 1, 0)
3625        && channel->channel_info->modes.modes_set)
3626         change->modes_clear &= ~channel->channel_info->modes.modes_set;
3627     modcmd_chanmode_announce(change);
3628     reply("CSMSG_CHANNEL_OPENED", channel->name);
3629     for(ii = 0; ii < change->argc; ++ii)
3630         free((char*)change->args[ii].u.hostmask);
3631     mod_chanmode_free(change);
3632     return 1;
3633 }
3634
3635 static CHANSERV_FUNC(cmd_myaccess)
3636 {
3637     static struct string_buffer sbuf;
3638     struct handle_info *target_handle;
3639     struct userData *uData;
3640
3641     if(argc < 2)
3642         target_handle = user->handle_info;
3643     else if(!IsStaff(user))
3644     {
3645         reply("CSMSG_MYACCESS_SELF_ONLY", argv[0]);
3646         return 0;
3647     }
3648     else if(!(target_handle = modcmd_get_handle_info(user, argv[1])))
3649         return 0;
3650
3651     if(!oper_outranks(user, target_handle))
3652         return 0;
3653
3654     if(!target_handle->channels)
3655     {
3656         reply("CSMSG_SQUAT_ACCESS", target_handle->handle);
3657         return 1;
3658     }
3659
3660     reply("CSMSG_INFOLINE_LIST", target_handle->handle);
3661     for(uData = target_handle->channels; uData; uData = uData->u_next)
3662     {
3663         struct chanData *cData = uData->channel;
3664
3665         if(uData->access > UL_OWNER)
3666             continue;
3667         if(IsProtected(cData)
3668            && (target_handle != user->handle_info)
3669            && !GetTrueChannelAccess(cData, user->handle_info))
3670             continue;
3671         sbuf.used = 0;
3672         string_buffer_append_printf(&sbuf, "[%s (%d", cData->channel->name, uData->access);
3673         if(uData->flags != USER_AUTO_OP)
3674             string_buffer_append(&sbuf, ',');
3675         if(IsUserSuspended(uData))
3676             string_buffer_append(&sbuf, 's');
3677         if(IsUserAutoOp(uData))
3678         {
3679             if(uData->access >= cData->lvlOpts[lvlGiveOps])
3680                 string_buffer_append(&sbuf, 'o');
3681             else if(uData->access >= cData->lvlOpts[lvlGiveVoice])
3682                 string_buffer_append(&sbuf, 'v');
3683         }
3684         if(IsUserAutoInvite(uData) && (uData->access >= cData->lvlOpts[lvlInviteMe]))
3685             string_buffer_append(&sbuf, 'i');
3686         if(uData->info)
3687             string_buffer_append_printf(&sbuf, ")] %s", uData->info);
3688         else
3689             string_buffer_append_string(&sbuf, ")]");
3690         string_buffer_append(&sbuf, '\0');
3691         send_message_type(4, user, cmd->parent->bot, "%s", sbuf.list);
3692     }
3693
3694     return 1;
3695 }
3696
3697 static CHANSERV_FUNC(cmd_access)
3698 {
3699     struct userNode *target;
3700     struct handle_info *target_handle;
3701     struct userData *uData;
3702     int helping;
3703     char prefix[MAXLEN];
3704
3705     if(argc < 2)
3706     {
3707         target = user;
3708         target_handle = target->handle_info;
3709     }
3710     else if((target = GetUserH(argv[1])))
3711     {
3712         target_handle = target->handle_info;
3713     }
3714     else if(argv[1][0] == '*')
3715     {
3716         if(!(target_handle = get_handle_info(argv[1]+1)))
3717         {
3718             reply("MSG_HANDLE_UNKNOWN", argv[1]+1);
3719             return 0;
3720         }
3721     }
3722     else
3723     {
3724         reply("MSG_NICK_UNKNOWN", argv[1]);
3725         return 0;
3726     }
3727
3728     assert(target || target_handle);
3729
3730     if(target == chanserv)
3731     {
3732         reply("CSMSG_IS_CHANSERV");
3733         return 1;
3734     }
3735
3736     if(!target_handle)
3737     {
3738         if(IsOper(target))
3739         {
3740             reply("CSMSG_LAZY_SMURF_TARGET", target->nick, chanserv_conf.irc_operator_epithet);
3741             return 0;
3742         }
3743         if(target != user)
3744         {
3745             reply("MSG_USER_AUTHENTICATE", target->nick);
3746             return 0;
3747         }
3748         reply("MSG_AUTHENTICATE");
3749         return 0;
3750     }
3751
3752     if(target)
3753     {
3754         const char *epithet = NULL, *type = NULL;
3755         if(IsOper(target))
3756         {
3757             epithet = chanserv_conf.irc_operator_epithet;
3758             type = user_find_message(user, "CSMSG_OPERATOR_TITLE");
3759         }
3760         else if(IsNetworkHelper(target))
3761         {
3762             epithet = chanserv_conf.network_helper_epithet;
3763             type = user_find_message(user, "CSMSG_UC_H_TITLE");
3764         }
3765         else if(IsSupportHelper(target))
3766         {
3767             epithet = chanserv_conf.support_helper_epithet;
3768             type = user_find_message(user, "CSMSG_LC_H_TITLE");
3769         }
3770         if(epithet)
3771         {
3772             if(target_handle->epithet)
3773                 reply("CSMSG_SMURF_TARGET", target->nick, target_handle->epithet, type);
3774             else if(epithet)
3775                 reply("CSMSG_SMURF_TARGET", target->nick, epithet, type);
3776         }
3777         sprintf(prefix, "%s (%s)", target->nick, target_handle->handle);
3778     }
3779     else
3780     {
3781         sprintf(prefix, "%s", target_handle->handle);
3782     }
3783
3784     if(!channel->channel_info)
3785     {
3786         reply("CSMSG_NOT_REGISTERED", channel->name);
3787         return 1;
3788     }
3789
3790     helping = HANDLE_FLAGGED(target_handle, HELPING)
3791         && ((target_handle->opserv_level >= chanserv_conf.nodelete_level) || !IsProtected(channel->channel_info));
3792     if((uData = GetTrueChannelAccess(channel->channel_info, target_handle)))
3793     {
3794         reply((helping ? "CSMSG_HELPER_HAS_ACCESS" : "CSMSG_USER_HAS_ACCESS"), prefix, uData->access, channel->name);
3795         /* To prevent possible information leaks, only show infolines
3796          * if the requestor is in the channel or it's their own
3797          * handle. */
3798         if(uData->info && (GetUserMode(channel, user) || (target_handle == user->handle_info)))
3799         {
3800             send_message_type(4, user, cmd->parent->bot, "[%s] %s", (target ? target->nick : target_handle->handle), uData->info);
3801         }
3802         /* Likewise, only say it's suspended if the user has active
3803          * access in that channel or it's their own entry. */
3804         if(IsUserSuspended(uData)
3805            && (GetChannelUser(channel->channel_info, user->handle_info)
3806                || (user->handle_info == uData->handle)))
3807         {
3808             reply("CSMSG_USER_SUSPENDED", (target ? target->nick : target_handle->handle), channel->name);
3809         }
3810     }
3811     else
3812     {
3813         reply((helping ? "CSMSG_HELPER_NO_ACCESS" : "CSMSG_USER_NO_ACCESS"), prefix, channel->name);
3814     }
3815
3816     return 1;
3817 }
3818
3819 static void
3820 zoot_list(struct listData *list)
3821 {
3822     struct userData *uData;
3823     unsigned int start, curr, highest, lowest;
3824     struct helpfile_table tmp_table;
3825     const char **temp, *msg;
3826
3827     if(list->table.length == 1)
3828     {
3829         if(list->search)
3830             send_message(list->user, list->bot, "CSMSG_ACCESS_SEARCH_HEADER", list->channel->name, list->lowest, list->highest, list->search);
3831         else
3832             send_message(list->user, list->bot, "CSMSG_ACCESS_ALL_HEADER", list->channel->name, list->lowest, list->highest);
3833         msg = user_find_message(list->user, "MSG_NONE");
3834         send_message_type(4, list->user, list->bot, "  %s", msg);
3835     }
3836     tmp_table.width = list->table.width;
3837     tmp_table.flags = list->table.flags;
3838     list->table.contents[0][0] = " ";
3839     highest = list->highest;
3840     if(list->lowest != 0)
3841         lowest = list->lowest;
3842     else if(highest < 100)
3843         lowest = 1;
3844     else
3845         lowest = highest - 100;
3846     for(start = curr = 1; curr < list->table.length; )
3847     {
3848         uData = list->users[curr-1];
3849         list->table.contents[curr++][0] = " ";
3850         if((curr == list->table.length) || (list->users[curr-1]->access < lowest))
3851         {
3852             if(list->search)
3853                 send_message(list->user, list->bot, "CSMSG_ACCESS_SEARCH_HEADER", list->channel->name, lowest, highest, list->search);
3854             else
3855                 send_message(list->user, list->bot, "CSMSG_ACCESS_ALL_HEADER", list->channel->name, lowest, highest);
3856             temp = list->table.contents[--start];
3857             list->table.contents[start] = list->table.contents[0];
3858             tmp_table.contents = list->table.contents + start;
3859             tmp_table.length = curr - start;
3860             table_send(list->bot, list->user->nick, 0, NULL, tmp_table);
3861             list->table.contents[start] = temp;
3862             start = curr;
3863             highest = lowest - 1;
3864             lowest = (highest < 100) ? 0 : (highest - 99);
3865         }
3866     }
3867 }
3868
3869 static void
3870 def_list(struct listData *list)
3871 {
3872     const char *msg;
3873     if(list->search)
3874         send_message(list->user, list->bot, "CSMSG_ACCESS_SEARCH_HEADER", list->channel->name, list->lowest, list->highest, list->search);
3875     else
3876         send_message(list->user, list->bot, "CSMSG_ACCESS_ALL_HEADER", list->channel->name, list->lowest, list->highest);
3877     table_send(list->bot, list->user->nick, 0, NULL, list->table);
3878     if(list->table.length == 1)
3879     {
3880         msg = user_find_message(list->user, "MSG_NONE");
3881         send_message_type(4, list->user, list->bot, "  %s", msg);
3882     }
3883 }
3884
3885 static int
3886 userData_access_comp(const void *arg_a, const void *arg_b)
3887 {
3888     const struct userData *a = *(struct userData**)arg_a;
3889     const struct userData *b = *(struct userData**)arg_b;
3890     int res;
3891     if(a->access != b->access)
3892         res = b->access - a->access;
3893     else
3894         res = irccasecmp(a->handle->handle, b->handle->handle);
3895     return res;
3896 }
3897
3898 static int
3899 cmd_list_users(struct userNode *user, struct chanNode *channel, unsigned int argc, char *argv[], struct svccmd *cmd, unsigned short lowest, unsigned short highest)
3900 {
3901     void (*send_list)(struct listData *);
3902     struct userData *uData;
3903     struct listData lData;
3904     unsigned int matches;
3905     const char **ary;
3906
3907     lData.user = user;
3908     lData.bot = cmd->parent->bot;
3909     lData.channel = channel;
3910     lData.lowest = lowest;
3911     lData.highest = highest;
3912     lData.search = (argc > 1) ? argv[1] : NULL;
3913     send_list = def_list;
3914     (void)zoot_list; /* since it doesn't show user levels */
3915
3916     if(user->handle_info)
3917     {
3918         switch(user->handle_info->userlist_style)
3919         {
3920         case HI_STYLE_DEF: send_list = def_list; break;
3921         case HI_STYLE_ZOOT: send_list = def_list; break;
3922         }
3923     }
3924
3925     lData.users = alloca(channel->channel_info->userCount * sizeof(struct userData *));
3926     matches = 0;
3927     for(uData = channel->channel_info->users; uData; uData = uData->next)
3928     {
3929         if((uData->access < lowest)
3930            || (uData->access > highest)
3931            || (lData.search && !match_ircglob(uData->handle->handle, lData.search)))
3932             continue;
3933         lData.users[matches++] = uData;
3934     }
3935     qsort(lData.users, matches, sizeof(lData.users[0]), userData_access_comp);
3936
3937     lData.table.length = matches+1;
3938     lData.table.width = 4;
3939     lData.table.flags = TABLE_NO_FREE;
3940     lData.table.contents = malloc(lData.table.length*sizeof(*lData.table.contents));
3941     ary = malloc(lData.table.width*sizeof(**lData.table.contents));
3942     lData.table.contents[0] = ary;
3943     ary[0] = "Access";
3944     ary[1] = "Account";
3945     ary[2] = "Last Seen";
3946     ary[3] = "Status";
3947     for(matches = 1; matches < lData.table.length; ++matches)
3948     {
3949         char seen[INTERVALLEN];
3950
3951         uData = lData.users[matches-1];
3952         ary = malloc(lData.table.width*sizeof(**lData.table.contents));
3953         lData.table.contents[matches] = ary;
3954         ary[0] = strtab(uData->access);
3955         ary[1] = uData->handle->handle;
3956         if(uData->present)
3957             ary[2] = "Here";
3958         else if(!uData->seen)
3959             ary[2] = "Never";
3960         else
3961             ary[2] = intervalString(seen, now - uData->seen, user->handle_info);
3962         ary[2] = strdup(ary[2]);
3963         if(IsUserSuspended(uData))
3964             ary[3] = "Suspended";
3965         else if(HANDLE_FLAGGED(uData->handle, FROZEN))
3966             ary[3] = "Vacation";
3967         else if(HANDLE_FLAGGED(uData->handle, BOT))
3968             ary[3] = "Bot";
3969         else
3970             ary[3] = "Normal";
3971     }
3972     send_list(&lData);
3973     for(matches = 1; matches < lData.table.length; ++matches)
3974     {
3975         free((char*)lData.table.contents[matches][2]);
3976         free(lData.table.contents[matches]);
3977     }
3978     free(lData.table.contents[0]);
3979     free(lData.table.contents);
3980     return 1;
3981 }
3982
3983 static CHANSERV_FUNC(cmd_users)
3984 {
3985     return cmd_list_users(CSFUNC_ARGS, 1, UL_OWNER);
3986 }
3987
3988 static CHANSERV_FUNC(cmd_wlist)
3989 {
3990     return cmd_list_users(CSFUNC_ARGS, UL_OWNER, UL_OWNER);
3991 }
3992
3993 static CHANSERV_FUNC(cmd_clist)
3994 {
3995     return cmd_list_users(CSFUNC_ARGS, UL_COOWNER, UL_OWNER-1);
3996 }
3997
3998 static CHANSERV_FUNC(cmd_mlist)
3999 {
4000     return cmd_list_users(CSFUNC_ARGS, UL_MASTER, UL_COOWNER-1);
4001 }
4002
4003 static CHANSERV_FUNC(cmd_olist)
4004 {
4005     return cmd_list_users(CSFUNC_ARGS, UL_OP, UL_MASTER-1);
4006 }
4007
4008 static CHANSERV_FUNC(cmd_plist)
4009 {
4010     return cmd_list_users(CSFUNC_ARGS, 1, UL_OP-1);
4011 }
4012
4013 static CHANSERV_FUNC(cmd_bans)
4014 {
4015     struct userNode *search_u = NULL;
4016     struct helpfile_table tbl;
4017     unsigned int matches = 0, timed = 0, search_wilds = 0, ii;
4018     char t_buffer[INTERVALLEN], e_buffer[INTERVALLEN], *search;
4019     const char *msg_never, *triggered, *expires;
4020     struct banData *ban, **bans;
4021
4022     if(argc < 2)
4023         search = NULL;
4024     else if(strchr(search = argv[1], '!'))
4025     {
4026         search = argv[1];
4027         search_wilds = search[strcspn(search, "?*")];
4028     }
4029     else if(!(search_u = GetUserH(search)))
4030         reply("MSG_NICK_UNKNOWN", search);
4031
4032     bans = alloca(channel->channel_info->banCount * sizeof(struct banData *));
4033
4034     for(ban = channel->channel_info->bans; ban; ban = ban->next)
4035     {
4036         if(search_u)
4037         {
4038             if(!user_matches_glob(search_u, ban->mask, MATCH_USENICK | MATCH_VISIBLE))
4039                 continue;
4040         }
4041         else if(search)
4042         {
4043             if(search_wilds ? !match_ircglobs(search, ban->mask) : !match_ircglob(search, ban->mask))
4044                 continue;
4045         }
4046         bans[matches++] = ban;
4047         if(ban->expires)
4048             timed = 1;
4049     }
4050
4051     tbl.length = matches + 1;
4052     tbl.width = 4 + timed;
4053     tbl.flags = 0;
4054     tbl.flags = TABLE_NO_FREE;
4055     tbl.contents = malloc(tbl.length * sizeof(tbl.contents[0]));
4056     tbl.contents[0] = malloc(tbl.width * sizeof(tbl.contents[0][0]));
4057     tbl.contents[0][0] = "Mask";
4058     tbl.contents[0][1] = "Set By";
4059     tbl.contents[0][2] = "Triggered";
4060     if(timed)
4061     {
4062         tbl.contents[0][3] = "Expires";
4063         tbl.contents[0][4] = "Reason";
4064     }
4065     else
4066         tbl.contents[0][3] = "Reason";
4067     if(!matches)
4068     {
4069         table_send(cmd->parent->bot, user->nick, 0, NULL, tbl);
4070         reply("MSG_NONE");
4071         free(tbl.contents[0]);
4072         free(tbl.contents);
4073         return 0;
4074     }
4075
4076     msg_never = user_find_message(user, "MSG_NEVER");
4077     for(ii = 0; ii < matches; )
4078     {
4079         ban = bans[ii];
4080
4081         if(!timed)
4082             expires = "";
4083         else if(ban->expires)
4084             expires = intervalString(e_buffer, ban->expires - now, user->handle_info);
4085         else
4086             expires = msg_never;
4087
4088         if(ban->triggered)
4089             triggered = intervalString(t_buffer, now - ban->triggered, user->handle_info);
4090         else
4091             triggered = msg_never;
4092
4093         tbl.contents[++ii] = malloc(tbl.width * sizeof(tbl.contents[0][0]));
4094         tbl.contents[ii][0] = ban->mask;
4095         tbl.contents[ii][1] = ban->owner;
4096         tbl.contents[ii][2] = strdup(triggered);
4097         if(timed)
4098         {
4099             tbl.contents[ii][3] = strdup(expires);
4100             tbl.contents[ii][4] = ban->reason;
4101         }
4102         else
4103             tbl.contents[ii][3] = ban->reason;
4104     }
4105     table_send(cmd->parent->bot, user->nick, 0, NULL, tbl);
4106     reply("MSG_MATCH_COUNT", matches);
4107     for(ii = 1; ii < tbl.length; ++ii)
4108     {
4109         free((char*)tbl.contents[ii][2]);
4110         if(timed)
4111             free((char*)tbl.contents[ii][3]);
4112         free(tbl.contents[ii]);
4113     }
4114     free(tbl.contents[0]);
4115     free(tbl.contents);
4116     return 1;
4117 }
4118
4119 static int
4120 bad_topic(struct chanNode *channel, struct userNode *user, const char *new_topic)
4121 {
4122     struct chanData *cData = channel->channel_info;
4123     if(check_user_level(channel, user, lvlEnfTopic, 1, 0))
4124         return 0;
4125     if(cData->topic_mask)
4126         return !match_ircglob(new_topic, cData->topic_mask);
4127     else if(cData->topic)
4128         return irccasecmp(new_topic, cData->topic);
4129     else
4130         return 0;
4131 }
4132
4133 static CHANSERV_FUNC(cmd_topic)
4134 {
4135     struct chanData *cData;
4136     char *topic;
4137
4138     cData = channel->channel_info;
4139     if(argc < 2)
4140     {
4141         if(cData->topic)
4142         {
4143             SetChannelTopic(channel, chanserv, cData->topic, 1);
4144             reply("CSMSG_TOPIC_SET", cData->topic);
4145             return 1;
4146         }
4147
4148         reply("CSMSG_NO_TOPIC", channel->name);
4149         return 0;
4150     }
4151
4152     topic = unsplit_string(argv + 1, argc - 1, NULL);
4153     /* If they say "!topic *", use an empty topic. */
4154     if((topic[0] == '*') && (topic[1] == 0))
4155         topic[0] = 0;
4156     if(bad_topic(channel, user, topic))
4157     {
4158         char *topic_mask = cData->topic_mask;
4159         if(topic_mask)
4160         {
4161             char new_topic[TOPICLEN+1], tchar;
4162             int pos=0, starpos=-1, dpos=0, len;
4163
4164             while((tchar = topic_mask[pos++]) && (dpos <= TOPICLEN))
4165             {
4166                 switch(tchar)
4167                 {
4168                 case '*':
4169                     if(starpos != -1)
4170                         goto bad_mask;
4171                     len = strlen(topic);
4172                     if((dpos + len) > TOPICLEN)
4173                         len = TOPICLEN + 1 - dpos;
4174                     memcpy(new_topic+dpos, topic, len);
4175                     dpos += len;
4176                     starpos = pos;
4177                     break;
4178                 case '\\': tchar = topic_mask[pos++]; /* and fall through */
4179                 default: new_topic[dpos++] = tchar; break;
4180                 }
4181             }
4182             if((dpos > TOPICLEN) || tchar)
4183             {
4184             bad_mask:
4185                 reply("CSMSG_TOPICMASK_CONFLICT1", channel->name, topic_mask);
4186                 reply("CSMSG_TOPICMASK_CONFLICT2", TOPICLEN);
4187                 return 0;
4188             }
4189             new_topic[dpos] = 0;
4190             SetChannelTopic(channel, chanserv, new_topic, 1);
4191         } else {
4192             reply("CSMSG_TOPIC_LOCKED", channel->name);
4193             return 0;
4194         }
4195     }
4196     else
4197         SetChannelTopic(channel, chanserv, topic, 1);
4198
4199     if(check_user_level(channel, user, lvlTopicSnarf, 1, 0))
4200     {
4201         /* Grab the topic and save it as the default topic. */
4202         free(cData->topic);
4203         cData->topic = strdup(channel->topic);
4204     }
4205
4206     return 1;
4207 }
4208
4209 static CHANSERV_FUNC(cmd_mode)
4210 {
4211     struct userData *uData;
4212     struct mod_chanmode *change;
4213     short base_oplevel;
4214
4215     if(argc < 2)
4216     {
4217         change = &channel->channel_info->modes;
4218         if(change->modes_set || change->modes_clear) {
4219             modcmd_chanmode_announce(change);
4220             reply("CSMSG_DEFAULTED_MODES", channel->name);
4221         } else
4222             reply("CSMSG_NO_MODES", channel->name);
4223         return 1;
4224     }
4225
4226     uData = GetChannelUser(channel->channel_info, user->handle_info);
4227     if (!uData)
4228         base_oplevel = MAXOPLEVEL;
4229     else if (uData->access >= UL_OWNER)
4230         base_oplevel = 1;
4231     else
4232         base_oplevel = 1 + UL_OWNER - uData->access;
4233     change = mod_chanmode_parse(channel, argv+1, argc-1, MCP_KEY_FREE|MCP_REGISTERED, base_oplevel);
4234     if(!change)
4235     {
4236         reply("MSG_INVALID_MODES", unsplit_string(argv+1, argc-1, NULL));
4237         return 0;
4238     }
4239
4240     if(!check_user_level(channel, user, lvlEnfModes, 1, 0)
4241        && mode_lock_violated(&channel->channel_info->modes, change))
4242     {
4243         char modes[MAXLEN];
4244         mod_chanmode_format(&channel->channel_info->modes, modes);
4245         reply("CSMSG_MODE_LOCKED", modes, channel->name);
4246         return 0;
4247     }
4248
4249     modcmd_chanmode_announce(change);
4250     mod_chanmode_free(change);
4251     reply("CSMSG_MODES_SET", unsplit_string(argv+1, argc-1, NULL));
4252     return 1;
4253 }
4254
4255 static CHANSERV_FUNC(cmd_invite)
4256 {
4257     struct userData *uData;
4258     struct userNode *invite;
4259
4260     uData = GetChannelUser(channel->channel_info, user->handle_info);
4261
4262     if(argc > 1)
4263     {
4264         if(!(invite = GetUserH(argv[1])))
4265         {
4266             reply("MSG_NICK_UNKNOWN", argv[1]);
4267             return 0;
4268         }
4269     }
4270     else
4271         invite = user;
4272
4273     if(GetUserMode(channel, invite))
4274     {
4275         reply("CSMSG_ALREADY_PRESENT", invite->nick, channel->name);
4276         return 0;
4277     }
4278
4279     if(user != invite)
4280     {
4281         if(argc > 2)
4282         {
4283             char *reason = unsplit_string(argv + 2, argc - 2, NULL);
4284             send_message(invite, chanserv, "CSMSG_INVITING_YOU_REASON", user->nick, channel->name, reason);
4285         }
4286         else
4287             send_message(invite, chanserv, "CSMSG_INVITING_YOU", user->nick, channel->name);
4288     }
4289     irc_invite(chanserv, invite, channel);
4290     if(argc > 1)
4291         reply("CSMSG_INVITED_USER", argv[1], channel->name);
4292
4293     return 1;
4294 }
4295
4296 static CHANSERV_FUNC(cmd_inviteme)
4297 {
4298     if(GetUserMode(channel, user))
4299     {
4300         reply("CSMSG_YOU_ALREADY_PRESENT", channel->name);
4301         return 0;
4302     }
4303     if(channel->channel_info
4304        && !check_user_level(channel, user, lvlInviteMe, 1, 0))
4305     {
4306         reply("CSMSG_LOW_CHANNEL_ACCESS", channel->name);
4307         return 0;
4308     }
4309     irc_invite(cmd->parent->bot, user, channel);
4310     return 1;
4311 }
4312
4313 static void
4314 show_suspension_info(struct svccmd *cmd, struct userNode *user, struct suspended *suspended)
4315 {
4316     unsigned int combo;
4317     char buf1[INTERVALLEN], buf2[INTERVALLEN];
4318
4319     /* We display things based on two dimensions:
4320      * - Issue time: present or absent
4321      * - Expiration: revoked, expired, expires in future, or indefinite expiration
4322      * (in order of precedence, so something both expired and revoked
4323      * only counts as revoked)
4324      */
4325     combo = (suspended->issued ? 4 : 0)
4326         + (suspended->revoked ? 3 : suspended->expires ? ((suspended->expires < now) ? 2 : 1) : 0);
4327     switch(combo) {
4328     case 0: /* no issue time, indefinite expiration */
4329         reply("CSMSG_CHANNEL_SUSPENDED_0", suspended->suspender, suspended->reason);
4330         break;
4331     case 1: /* no issue time, expires in future */
4332         intervalString(buf1, suspended->expires-now, user->handle_info);
4333         reply("CSMSG_CHANNEL_SUSPENDED_1", suspended->suspender, buf1, suspended->reason);
4334         break;
4335     case 2: /* no issue time, expired */
4336         intervalString(buf1, now-suspended->expires, user->handle_info);
4337         reply("CSMSG_CHANNEL_SUSPENDED_2", suspended->suspender, buf1, suspended->reason);
4338         break;
4339     case 3: /* no issue time, revoked */
4340         intervalString(buf1, now-suspended->revoked, user->handle_info);
4341         reply("CSMSG_CHANNEL_SUSPENDED_3", suspended->suspender, buf1, suspended->reason);
4342         break;
4343     case 4: /* issue time set, indefinite expiration */
4344         intervalString(buf1, now-suspended->issued, user->handle_info);
4345         reply("CSMSG_CHANNEL_SUSPENDED_4", buf1, suspended->suspender, suspended->reason);
4346         break;
4347     case 5: /* issue time set, expires in future */
4348         intervalString(buf1, now-suspended->issued, user->handle_info);
4349         intervalString(buf2, suspended->expires-now, user->handle_info);
4350         reply("CSMSG_CHANNEL_SUSPENDED_5", buf1, suspended->suspender, buf2, suspended->reason);
4351         break;
4352     case 6: /* issue time set, expired */
4353         intervalString(buf1, now-suspended->issued, user->handle_info);
4354         intervalString(buf2, now-suspended->expires, user->handle_info);
4355         reply("CSMSG_CHANNEL_SUSPENDED_6", buf1, suspended->suspender, buf2, suspended->reason);
4356         break;
4357     case 7: /* issue time set, revoked */
4358         intervalString(buf1, now-suspended->issued, user->handle_info);
4359         intervalString(buf2, now-suspended->revoked, user->handle_info);
4360         reply("CSMSG_CHANNEL_SUSPENDED_7", buf1, suspended->suspender, buf2, suspended->reason);
4361         break;
4362     default:
4363         log_module(CS_LOG, LOG_ERROR, "Invalid combo value %d in show_suspension_info()", combo);
4364         return;
4365     }
4366 }
4367
4368 static CHANSERV_FUNC(cmd_info)
4369 {
4370     char modes[MAXLEN], buffer[INTERVALLEN];
4371     struct userData *uData, *owner;
4372     struct chanData *cData;
4373     struct do_not_register *dnr;
4374     struct note *note;
4375     dict_iterator_t it;
4376     int privileged;
4377
4378     cData = channel->channel_info;
4379     reply("CSMSG_CHANNEL_INFO", channel->name);
4380
4381     uData = GetChannelUser(cData, user->handle_info);
4382     if(uData && (uData->access >= cData->lvlOpts[lvlGiveOps]))
4383     {
4384         mod_chanmode_format(&cData->modes, modes);
4385         reply("CSMSG_CHANNEL_TOPIC", cData->topic);
4386         reply("CSMSG_CHANNEL_MODES", modes[0] ? modes : user_find_message(user, "MSG_NONE"));
4387     }
4388
4389     for(it = dict_first(cData->notes); it; it = iter_next(it))
4390     {
4391         int padding;
4392
4393         note = iter_data(it);
4394         if(!note_type_visible_to_user(cData, note->type, user))
4395             continue;
4396
4397         padding = PADLEN - 1 - strlen(iter_key(it));
4398         reply("CSMSG_CHANNEL_NOTE", iter_key(it), padding > 0 ? padding : 1, "", note->note);
4399     }
4400
4401     reply("CSMSG_CHANNEL_MAX", cData->max);
4402     for(owner = cData->users; owner; owner = owner->next)
4403         if(owner->access == UL_OWNER)
4404             reply("CSMSG_CHANNEL_OWNER", owner->handle->handle);
4405     reply("CSMSG_CHANNEL_USERS", cData->userCount);
4406     reply("CSMSG_CHANNEL_BANS", cData->banCount);
4407     reply("CSMSG_CHANNEL_VISITED", intervalString(buffer, now - cData->visited, user->handle_info));
4408
4409     privileged = IsStaff(user);
4410     if(privileged)
4411         reply("CSMSG_CHANNEL_REGISTERED", intervalString(buffer, now - cData->registered, user->handle_info));
4412     if(((uData && uData->access >= UL_COOWNER) || privileged) && cData->registrar)
4413         reply("CSMSG_CHANNEL_REGISTRAR", cData->registrar);
4414
4415     if(privileged && (dnr = chanserv_is_dnr(channel->name, NULL)))
4416         chanserv_show_dnrs(user, cmd, channel->name, NULL);
4417
4418     if(cData->suspended && ((uData && (uData->access >= UL_COOWNER)) || IsHelping(user)))
4419     {
4420         struct suspended *suspended;
4421         reply((IsSuspended(cData) ? "CSMSG_CHANNEL_SUSPENDED" : "CSMSG_CHANNEL_HISTORY"), channel->name);
4422         for(suspended = cData->suspended; suspended; suspended = suspended->previous)
4423             show_suspension_info(cmd, user, suspended);
4424     }
4425     else if(IsSuspended(cData))
4426     {
4427         reply("CSMSG_CHANNEL_SUSPENDED", channel->name);
4428         show_suspension_info(cmd, user, cData->suspended);
4429     }
4430     return 1;
4431 }
4432
4433 static CHANSERV_FUNC(cmd_netinfo)
4434 {
4435     extern unsigned long boot_time;
4436     extern unsigned long burst_length;
4437     char interval[INTERVALLEN];
4438
4439     reply("CSMSG_NETWORK_INFO");
4440     reply("CSMSG_NETWORK_SERVERS", dict_size(servers));
4441     reply("CSMSG_NETWORK_USERS", dict_size(clients));
4442     reply("CSMSG_NETWORK_OPERS", curr_opers.used);
4443     reply("CSMSG_NETWORK_CHANNELS", registered_channels);
4444     reply("CSMSG_NETWORK_BANS", banCount);
4445     reply("CSMSG_NETWORK_CHANUSERS", userCount);
4446     reply("CSMSG_SERVICES_UPTIME", intervalString(interval, time(NULL) - boot_time, user->handle_info));
4447     reply("CSMSG_BURST_LENGTH", intervalString(interval, burst_length, user->handle_info));
4448     return 1;
4449 }
4450
4451 static void
4452 send_staff_list(struct userNode *to, struct userList *list, int skip_flags)
4453 {
4454     struct helpfile_table table;
4455     unsigned int nn;
4456     struct userNode *user;
4457     char *nick;
4458
4459     table.length = 0;
4460     table.width = 1;
4461     table.flags = TABLE_REPEAT_ROWS | TABLE_NO_FREE | TABLE_NO_HEADERS;
4462     table.contents = alloca(list->used*sizeof(*table.contents));
4463     for(nn=0; nn<list->used; nn++)
4464     {
4465         user = list->list[nn];
4466         if(user->modes & skip_flags)
4467             continue;
4468         if(IsBot(user))
4469             continue;
4470         table.contents[table.length] = alloca(table.width*sizeof(**table.contents));
4471         if(IsAway(user))
4472         {
4473             nick = alloca(strlen(user->nick)+3);
4474             sprintf(nick, "(%s)", user->nick);
4475         }
4476         else
4477             nick = user->nick;
4478         table.contents[table.length][0] = nick;
4479         table.length++;
4480     }
4481     table_send(chanserv, to->nick, 0, NULL, table);
4482 }
4483
4484 static CHANSERV_FUNC(cmd_ircops)
4485 {
4486     reply("CSMSG_STAFF_OPERS");
4487     send_staff_list(user, &curr_opers, FLAGS_SERVICE);
4488     return 1;
4489 }
4490
4491 static CHANSERV_FUNC(cmd_helpers)
4492 {
4493     reply("CSMSG_STAFF_HELPERS");
4494     send_staff_list(user, &curr_helpers, FLAGS_OPER);
4495     return 1;
4496 }
4497
4498 static CHANSERV_FUNC(cmd_staff)
4499 {
4500     reply("CSMSG_NETWORK_STAFF");
4501     cmd_ircops(CSFUNC_ARGS);
4502     cmd_helpers(CSFUNC_ARGS);
4503     return 1;
4504 }
4505
4506 static CHANSERV_FUNC(cmd_peek)
4507 {
4508     struct modeNode *mn;
4509     char modes[MODELEN];
4510     unsigned int n;
4511     struct helpfile_table table;
4512     int opcount = 0, voicecount = 0, srvcount = 0;
4513
4514     irc_make_chanmode(channel, modes);
4515
4516     reply("CSMSG_PEEK_INFO", channel->name);
4517     reply("CSMSG_PEEK_TOPIC", channel->topic);
4518     reply("CSMSG_PEEK_MODES", modes);
4519
4520     table.length = 0;
4521     table.width = 1;
4522     table.flags = TABLE_REPEAT_ROWS | TABLE_NO_FREE | TABLE_NO_HEADERS;
4523     table.contents = alloca(channel->members.used*sizeof(*table.contents));
4524     for(n = 0; n < channel->members.used; n++)
4525     {
4526         mn = channel->members.list[n];
4527         if(IsLocal(mn->user))
4528             srvcount++;
4529         else if(mn->modes & MODE_CHANOP)
4530             opcount++;
4531         else if(mn->modes & MODE_VOICE)
4532             voicecount++;
4533
4534         if(!(mn->modes & MODE_CHANOP) || IsLocal(mn->user))
4535             continue;
4536         table.contents[table.length] = alloca(sizeof(**table.contents));
4537         table.contents[table.length][0] = mn->user->nick;
4538         table.length++;
4539     }
4540
4541     reply("CSMSG_PEEK_USERS", channel->members.used, opcount, voicecount,
4542           (channel->members.used - opcount - voicecount - srvcount));
4543
4544     if(table.length)
4545     {
4546         reply("CSMSG_PEEK_OPS");
4547         table_send(chanserv, user->nick, 0, NULL, table);
4548     }
4549     else
4550         reply("CSMSG_PEEK_NO_OPS");
4551     return 1;
4552 }
4553
4554 static MODCMD_FUNC(cmd_wipeinfo)
4555 {
4556     struct handle_info *victim;
4557     struct userData *ud, *actor, *real_actor;
4558     unsigned int override = 0;
4559
4560     REQUIRE_PARAMS(2);
4561     actor = GetChannelUser(channel->channel_info, user->handle_info);
4562     real_actor = GetChannelAccess(channel->channel_info, user->handle_info);
4563     if(!(victim = modcmd_get_handle_info(user, argv[1])))
4564         return 0;
4565     if(!(ud = GetTrueChannelAccess(channel->channel_info, victim)))
4566     {
4567         reply("CSMSG_NO_CHAN_USER", argv[1], channel->name);
4568         return 0;
4569     }
4570     if((ud->access >= actor->access) && (ud != actor))
4571     {
4572         reply("MSG_USER_OUTRANKED", victim->handle);
4573         return 0;
4574     }
4575     if((ud != real_actor) && (!real_actor || (ud->access >= real_actor->access)))
4576         override = CMD_LOG_OVERRIDE;
4577     if(ud->info)
4578         free(ud->info);
4579     ud->info = NULL;
4580     reply("CSMSG_WIPED_INFO_LINE", argv[1], channel->name);
4581     return 1 | override;
4582 }
4583
4584 static CHANSERV_FUNC(cmd_resync)
4585 {
4586     struct mod_chanmode *changes;
4587     struct chanData *cData = channel->channel_info;
4588     unsigned int ii, used;
4589
4590     changes = mod_chanmode_alloc(channel->members.used * 2);
4591     for(ii = used = 0; ii < channel->members.used; ++ii)
4592     {
4593         struct modeNode *mn = channel->members.list[ii];
4594         struct userData *uData;
4595
4596         if(IsService(mn->user))
4597             continue;
4598
4599         uData = GetChannelAccess(cData, mn->user->handle_info);
4600         if(!cData->lvlOpts[lvlGiveOps]
4601            || (uData && uData->access >= cData->lvlOpts[lvlGiveOps]))
4602         {
4603             if(!(mn->modes & MODE_CHANOP))
4604             {
4605                 changes->args[used].mode = MODE_CHANOP;
4606                 changes->args[used++].u.member = mn;
4607             }
4608         }
4609         else if(!cData->lvlOpts[lvlGiveVoice]
4610                 || (uData && uData->access >= cData->lvlOpts[lvlGiveVoice]))
4611         {
4612             if(mn->modes & MODE_CHANOP)
4613             {
4614                 changes->args[used].mode = MODE_REMOVE | (mn->modes & ~MODE_VOICE);
4615                 changes->args[used++].u.member = mn;
4616             }
4617             if(!(mn->modes & MODE_VOICE))
4618             {
4619                 changes->args[used].mode = MODE_VOICE;
4620                 changes->args[used++].u.member = mn;
4621             }
4622         }
4623         else
4624         {
4625             if(mn->modes)
4626             {
4627                 changes->args[used].mode = MODE_REMOVE | mn->modes;
4628                 changes->args[used++].u.member = mn;
4629             }
4630         }
4631     }
4632     changes->argc = used;
4633     modcmd_chanmode_announce(changes);
4634     mod_chanmode_free(changes);
4635     reply("CSMSG_RESYNCED_USERS", channel->name);
4636     return 1;
4637 }
4638
4639 static CHANSERV_FUNC(cmd_seen)
4640 {
4641     struct userData *uData;
4642     struct handle_info *handle;
4643     char seen[INTERVALLEN];
4644
4645     REQUIRE_PARAMS(2);
4646
4647     if(!irccasecmp(argv[1], chanserv->nick))
4648     {
4649         reply("CSMSG_IS_CHANSERV");
4650         return 1;
4651     }
4652
4653     if(!(handle = get_handle_info(argv[1])))
4654     {
4655         reply("MSG_HANDLE_UNKNOWN", argv[1]);
4656         return 0;
4657     }
4658
4659     if(!(uData = GetTrueChannelAccess(channel->channel_info, handle)))
4660     {
4661         reply("CSMSG_NO_CHAN_USER", handle->handle, channel->name);
4662         return 0;
4663     }
4664
4665     if(uData->present)
4666         reply("CSMSG_USER_PRESENT", handle->handle);
4667     else if(uData->seen)
4668         reply("CSMSG_USER_SEEN", handle->handle, channel->name, intervalString(seen, now - uData->seen, user->handle_info));
4669     else
4670         reply("CSMSG_NEVER_SEEN", handle->handle, channel->name);
4671
4672     if(!uData->present && HANDLE_FLAGGED(handle, FROZEN))
4673         reply("CSMSG_USER_VACATION", handle->handle);
4674
4675     return 1;
4676 }
4677
4678 static MODCMD_FUNC(cmd_names)
4679 {
4680     struct userNode *targ;
4681     struct userData *targData;
4682     unsigned int ii, pos;
4683     char buf[400];
4684
4685     for(ii=pos=0; ii<channel->members.used; ++ii)
4686     {
4687         targ = channel->members.list[ii]->user;
4688         targData = GetTrueChannelAccess(channel->channel_info, targ->handle_info);
4689         if(!targData)
4690             continue;
4691         if(pos + strlen(targ->nick) + strlen(targ->handle_info->handle) + 8 > sizeof(buf))
4692         {
4693             buf[pos] = 0;
4694             reply("CSMSG_CHANNEL_NAMES", channel->name, buf);
4695             pos = 0;
4696         }
4697         buf[pos++] = ' ';
4698         if(IsUserSuspended(targData))
4699             buf[pos++] = 's';
4700         pos += sprintf(buf+pos, "%d:%s(%s)", targData->access, targ->nick, targ->handle_info->handle);
4701     }
4702     buf[pos] = 0;
4703     reply("CSMSG_CHANNEL_NAMES", channel->name, buf);
4704     reply("CSMSG_END_NAMES", channel->name);
4705     return 1;
4706 }
4707
4708 static int
4709 note_type_visible_to_user(struct chanData *channel, struct note_type *ntype, struct userNode *user)
4710 {
4711     switch(ntype->visible_type)
4712     {
4713     case NOTE_VIS_ALL: return 1;
4714     case NOTE_VIS_CHANNEL_USERS: return !channel || !user || (user->handle_info && GetChannelUser(channel, user->handle_info));
4715     case NOTE_VIS_PRIVILEGED: default: return user && (IsOper(user) || IsSupportHelper(user) || IsNetworkHelper(user));
4716     }
4717 }
4718
4719 static int
4720 note_type_settable_by_user(struct chanNode *channel, struct note_type *ntype, struct userNode *user)
4721 {
4722     struct userData *uData;
4723
4724     switch(ntype->set_access_type)
4725     {
4726     case NOTE_SET_CHANNEL_ACCESS:
4727         if(!user->handle_info)
4728             return 0;
4729         if(!(uData = GetChannelUser(channel->channel_info, user->handle_info)))
4730             return 0;
4731         return uData->access >= ntype->set_access.min_ulevel;
4732     case NOTE_SET_CHANNEL_SETTER:
4733         return check_user_level(channel, user, lvlSetters, 1, 0);
4734     case NOTE_SET_PRIVILEGED: default:
4735         return IsHelping(user) && (user->handle_info->opserv_level >= ntype->set_access.min_opserv);
4736     }
4737 }
4738
4739 static CHANSERV_FUNC(cmd_note)
4740 {
4741     struct chanData *cData;
4742     struct note *note;
4743     struct note_type *ntype;
4744
4745     cData = channel->channel_info;
4746     if(!cData)
4747     {
4748         reply("CSMSG_NOT_REGISTERED", channel->name);
4749         return 0;
4750     }
4751
4752     /* If no arguments, show all visible notes for the channel. */
4753     if(argc < 2)
4754     {
4755         dict_iterator_t it;
4756         unsigned int count;
4757
4758         for(count=0, it=dict_first(cData->notes); it; it=iter_next(it))
4759         {
4760             note = iter_data(it);
4761             if(!note_type_visible_to_user(cData, note->type, user))
4762                 continue;
4763             if(!count++)
4764                 reply("CSMSG_NOTELIST_HEADER", channel->name);
4765             reply("CSMSG_NOTE_FORMAT", iter_key(it), note->setter, note->note);
4766         }
4767         if(count)
4768             reply("CSMSG_NOTELIST_END", channel->name);
4769         else
4770             reply("CSMSG_NOTELIST_EMPTY", channel->name);
4771     }
4772     /* If one argument, show the named note. */
4773     else if(argc == 2)
4774     {
4775         if((note = dict_find(cData->notes, argv[1], NULL))
4776            && note_type_visible_to_user(cData, note->type, user))
4777         {
4778             reply("CSMSG_NOTE_FORMAT", note->type->name, note->setter, note->note);
4779         }
4780         else if((ntype = dict_find(note_types, argv[1], NULL))
4781                 && note_type_visible_to_user(NULL, ntype, user))
4782         {
4783             reply("CSMSG_NO_SUCH_NOTE", channel->name, ntype->name);
4784             return 0;
4785         }
4786         else
4787         {
4788             reply("CSMSG_BAD_NOTE_TYPE", argv[1]);
4789             return 0;
4790         }
4791     }
4792     /* Assume they're trying to set a note. */
4793     else
4794     {
4795         char *note_text;
4796         ntype = dict_find(note_types, argv[1], NULL);
4797         if(!ntype)
4798         {
4799             reply("CSMSG_BAD_NOTE_TYPE", argv[1]);
4800             return 0;
4801         }
4802         else if(note_type_settable_by_user(channel, ntype, user))
4803         {
4804             note_text = unsplit_string(argv+2, argc-2, NULL);
4805             if((note = dict_find(cData->notes, argv[1], NULL)))
4806                 reply("CSMSG_REPLACED_NOTE", ntype->name, channel->name, note->setter, note->note);
4807             chanserv_add_channel_note(cData, ntype, user->handle_info->handle, note_text);
4808             reply("CSMSG_NOTE_SET", ntype->name, channel->name);
4809
4810             if(ntype->visible_type == NOTE_VIS_PRIVILEGED)
4811             {
4812                 /* The note is viewable to staff only, so return 0
4813                    to keep the invocation from getting logged (or
4814                    regular users can see it in !events). */
4815                 return 0;
4816             }
4817         }
4818         else
4819         {
4820             reply("CSMSG_NO_ACCESS");
4821             return 0;
4822         }
4823     }
4824     return 1;
4825 }
4826
4827 static CHANSERV_FUNC(cmd_delnote)
4828 {
4829     struct note *note;
4830
4831     REQUIRE_PARAMS(2);
4832     if(!(note = dict_find(channel->channel_info->notes, argv[1], NULL))
4833        || !note_type_settable_by_user(channel, note->type, user))
4834     {
4835         reply("CSMSG_NO_SUCH_NOTE", channel->name, argv[1]);
4836         return 0;
4837     }
4838     dict_remove(channel->channel_info->notes, note->type->name);
4839     reply("CSMSG_NOTE_REMOVED", argv[1], channel->name);
4840     return 1;
4841 }
4842
4843 static CHANSERV_FUNC(cmd_events)
4844 {
4845     struct logSearch discrim;
4846     struct logReport report;
4847     unsigned int matches, limit;
4848
4849     limit = (argc > 1) ? atoi(argv[1]) : 10;
4850     if(limit < 1 || limit > 200)
4851         limit = 10;
4852
4853     memset(&discrim, 0, sizeof(discrim));
4854     discrim.masks.bot = chanserv;
4855     discrim.masks.channel_name = channel->name;
4856     if(argc > 2)
4857         discrim.masks.command = argv[2];
4858     discrim.limit = limit;
4859     discrim.max_time = INT_MAX;
4860     discrim.severities = 1 << LOG_COMMAND;
4861     report.reporter = chanserv;
4862     report.user = user;
4863     reply("CSMSG_EVENT_SEARCH_RESULTS");
4864     matches = log_entry_search(&discrim, log_report_entry, &report);
4865     if(matches)
4866         reply("MSG_MATCH_COUNT", matches);
4867     else
4868         reply("MSG_NO_MATCHES");
4869     return 1;
4870 }
4871
4872 static CHANSERV_FUNC(cmd_say)
4873 {
4874     char *msg;
4875     if(channel)
4876     {
4877         REQUIRE_PARAMS(2);
4878         msg = unsplit_string(argv + 1, argc - 1, NULL);
4879         send_channel_message(channel, cmd->parent->bot, "%s", msg);
4880     }
4881     else if(*argv[1] == '*' && argv[1][1] != '\0')
4882     {
4883         struct handle_info *hi;
4884         struct userNode *authed;
4885
4886         REQUIRE_PARAMS(3);
4887         msg = unsplit_string(argv + 2, argc - 2, NULL);
4888
4889         if (!(hi = get_handle_info(argv[1] + 1)))
4890         {
4891             reply("MSG_HANDLE_UNKNOWN", argv[1] + 1);
4892             return 0;
4893         }
4894
4895         for (authed = hi->users; authed; authed = authed->next_authed)
4896             send_target_message(5, authed->nick, cmd->parent->bot, "%s", msg);
4897     }
4898     else if(GetUserH(argv[1]))
4899     {
4900         REQUIRE_PARAMS(3);
4901         msg = unsplit_string(argv + 2, argc - 2, NULL);
4902         send_target_message(5, argv[1], cmd->parent->bot, "%s", msg);
4903     }
4904     else
4905     {
4906         reply("MSG_NOT_TARGET_NAME");
4907         return 0;
4908     }
4909     return 1;
4910 }
4911
4912 static CHANSERV_FUNC(cmd_emote)
4913 {
4914     char *msg;
4915     assert(argc >= 2);
4916     if(channel)
4917     {
4918         /* CTCP is so annoying. */
4919         msg = unsplit_string(argv + 1, argc - 1, NULL);
4920         send_channel_message(channel, cmd->parent->bot, "\001ACTION %s\001", msg);
4921     }
4922     else if(*argv[1] == '*' && argv[1][1] != '\0')
4923     {
4924         struct handle_info *hi;
4925         struct userNode *authed;
4926
4927         REQUIRE_PARAMS(3);
4928         msg = unsplit_string(argv + 2, argc - 2, NULL);
4929
4930         if (!(hi = get_handle_info(argv[1] + 1)))
4931         {
4932             reply("MSG_HANDLE_UNKNOWN", argv[1] + 1);
4933             return 0;
4934         }
4935
4936         for (authed = hi->users; authed; authed = authed->next_authed)
4937             send_target_message(5, authed->nick, cmd->parent->bot, "\001ACTION %s\001", msg);
4938     }
4939     else if(GetUserH(argv[1]))
4940     {
4941         msg = unsplit_string(argv + 2, argc - 2, NULL);
4942         send_target_message(5, argv[1], cmd->parent->bot, "\001ACTION %s\001", msg);
4943     }
4944     else
4945     {
4946         reply("MSG_NOT_TARGET_NAME");
4947         return 0;
4948     }
4949     return 1;
4950 }
4951
4952 struct channelList *
4953 chanserv_support_channels(void)
4954 {
4955     return &chanserv_conf.support_channels;
4956 }
4957
4958 static CHANSERV_FUNC(cmd_expire)
4959 {
4960     int channel_count = registered_channels;
4961     expire_channels(NULL);
4962     reply("CSMSG_CHANNELS_EXPIRED", channel_count - registered_channels);
4963     return 1;
4964 }
4965
4966 static void
4967 chanserv_expire_suspension(void *data)
4968 {
4969     struct suspended *suspended = data;
4970     struct chanNode *channel;
4971     unsigned int ii;
4972
4973     /* Update the channel registration data structure. */
4974     if(!suspended->expires || (now < suspended->expires))
4975         suspended->revoked = now;
4976     channel = suspended->cData->channel;
4977     suspended->cData->channel = channel;
4978     suspended->cData->flags &= ~CHANNEL_SUSPENDED;
4979
4980     /* If appropriate, re-join ChanServ to the channel. */
4981     if(!IsOffChannel(suspended->cData))
4982     {
4983         struct mod_chanmode change;
4984         mod_chanmode_init(&change);
4985         change.argc = 1;
4986         change.args[0].mode = MODE_CHANOP;
4987         change.args[0].u.member = AddChannelUser(chanserv, channel);
4988         mod_chanmode_announce(chanserv, channel, &change);
4989     }
4990
4991     /* Mark everyone currently in the channel as present. */
4992     for(ii = 0; ii < channel->members.used; ++ii)
4993     {
4994         struct userData *uData = GetChannelAccess(suspended->cData, channel->members.list[ii]->user->handle_info);
4995         if(uData)
4996         {
4997             uData->present = 1;
4998             uData->seen = now;
4999         }
5000     }
5001 }
5002
5003 static CHANSERV_FUNC(cmd_csuspend)
5004 {
5005     struct suspended *suspended;
5006     char reason[MAXLEN];
5007     unsigned long expiry, duration;
5008     struct userData *uData;
5009
5010     REQUIRE_PARAMS(3);
5011
5012     if(IsProtected(channel->channel_info))
5013     {
5014         reply("CSMSG_SUSPEND_NODELETE", channel->name);
5015         return 0;
5016     }
5017
5018     if(argv[1][0] == '!')
5019         argv[1]++;
5020     else if(IsSuspended(channel->channel_info))
5021     {
5022         reply("CSMSG_ALREADY_SUSPENDED", channel->name);
5023         show_suspension_info(cmd, user, channel->channel_info->suspended);
5024         return 0;
5025     }
5026
5027     if(!strcmp(argv[1], "0"))
5028         expiry = 0;
5029     else if((duration = ParseInterval(argv[1])))
5030         expiry = now + duration;
5031     else
5032     {
5033         reply("MSG_INVALID_DURATION", argv[1]);
5034         return 0;
5035     }
5036
5037     unsplit_string(argv + 2, argc - 2, reason);
5038
5039     suspended = calloc(1, sizeof(*suspended));
5040     suspended->revoked = 0;
5041     suspended->issued = now;
5042     suspended->suspender = strdup(user->handle_info->handle);
5043     suspended->expires = expiry;
5044     suspended->reason = strdup(reason);
5045     suspended->cData = channel->channel_info;
5046     suspended->previous = suspended->cData->suspended;
5047     suspended->cData->suspended = suspended;
5048
5049     if(suspended->expires)
5050         timeq_add(suspended->expires, chanserv_expire_suspension, suspended);
5051
5052     if(IsSuspended(channel->channel_info))
5053     {
5054         suspended->previous->revoked = now;
5055         if(suspended->previous->expires)
5056             timeq_del(suspended->previous->expires, chanserv_expire_suspension, suspended->previous, 0);
5057         sprintf(reason, "%s suspension modified by %s.", channel->name, suspended->suspender);
5058         global_message(MESSAGE_RECIPIENT_OPERS | MESSAGE_RECIPIENT_HELPERS, reason);
5059     }
5060     else
5061     {
5062         /* Mark all users in channel as absent. */
5063         for(uData = channel->channel_info->users; uData; uData = uData->next)
5064         {
5065             if(uData->present)
5066             {
5067                 uData->seen = now;
5068                 uData->present = 0;
5069             }
5070         }
5071
5072         /* Mark the channel as suspended, then part. */
5073         channel->channel_info->flags |= CHANNEL_SUSPENDED;
5074         DelChannelUser(chanserv, channel, suspended->reason, 0);
5075         reply("CSMSG_SUSPENDED", channel->name);
5076         sprintf(reason, "%s suspended by %s.", channel->name, suspended->suspender);
5077         global_message(MESSAGE_RECIPIENT_OPERS | MESSAGE_RECIPIENT_HELPERS, reason);
5078     }
5079     return 1;
5080 }
5081
5082 static CHANSERV_FUNC(cmd_cunsuspend)
5083 {
5084     struct suspended *suspended;
5085     char message[MAXLEN];
5086
5087     if(!IsSuspended(channel->channel_info))
5088     {
5089         reply("CSMSG_NOT_SUSPENDED", channel->name);
5090         return 0;
5091     }
5092
5093     suspended = channel->channel_info->suspended;
5094
5095     /* Expire the suspension and join ChanServ to the channel. */
5096     timeq_del(suspended->expires, chanserv_expire_suspension, suspended, 0);
5097     chanserv_expire_suspension(suspended);
5098     reply("CSMSG_UNSUSPENDED", channel->name);
5099     sprintf(message, "%s unsuspended by %s.", channel->name, user->handle_info->handle);
5100     global_message(MESSAGE_RECIPIENT_OPERS|MESSAGE_RECIPIENT_HELPERS, message);
5101     return 1;
5102 }
5103
5104 typedef struct chanservSearch
5105 {
5106     char *name;
5107     char *registrar;
5108
5109     unsigned long unvisited;
5110     unsigned long registered;
5111
5112     unsigned long flags;
5113     unsigned int limit;
5114 } *search_t;
5115
5116 typedef void (*channel_search_func)(struct chanData *channel, void *data);
5117
5118 static search_t
5119 chanserv_search_create(struct userNode *user, unsigned int argc, char *argv[])
5120 {
5121     search_t search;
5122     unsigned int i;
5123
5124     search = malloc(sizeof(struct chanservSearch));
5125     memset(search, 0, sizeof(*search));
5126     search->limit = 25;
5127
5128     for(i = 0; i < argc; i++)
5129     {
5130         /* Assume all criteria require arguments. */
5131         if(i == (argc - 1))
5132         {
5133             send_message(user, chanserv, "MSG_MISSING_PARAMS", argv[i]);
5134             goto fail;
5135         }
5136
5137         if(!irccasecmp(argv[i], "name"))
5138             search->name = argv[++i];
5139         else if(!irccasecmp(argv[i], "registrar"))
5140             search->registrar = argv[++i];
5141         else if(!irccasecmp(argv[i], "unvisited"))
5142             search->unvisited = ParseInterval(argv[++i]);
5143         else if(!irccasecmp(argv[i], "registered"))
5144             search->registered = ParseInterval(argv[++i]);
5145         else if(!irccasecmp(argv[i], "flags"))
5146         {
5147             i++;
5148             if(!irccasecmp(argv[i], "nodelete"))
5149                 search->flags |= CHANNEL_NODELETE;
5150             else if(!irccasecmp(argv[i], "suspended"))
5151                 search->flags |= CHANNEL_SUSPENDED;
5152             else if(!irccasecmp(argv[i], "unreviewed"))
5153                 search->flags |= CHANNEL_UNREVIEWED;
5154             else
5155             {
5156                 send_message(user, chanserv, "CSMSG_INVALID_CFLAG", argv[i]);
5157                 goto fail;
5158             }
5159         }
5160         else if(!irccasecmp(argv[i], "limit"))
5161             search->limit = strtoul(argv[++i], NULL, 10);
5162         else
5163         {
5164             send_message(user, chanserv, "MSG_INVALID_CRITERIA", argv[i]);
5165             goto fail;
5166         }
5167     }
5168
5169     if(search->name && !strcmp(search->name, "*"))
5170         search->name = 0;
5171     if(search->registrar && !strcmp(search->registrar, "*"))
5172         search->registrar = 0;
5173
5174     return search;
5175   fail:
5176     free(search);
5177     return NULL;
5178 }
5179
5180 static int
5181 chanserv_channel_match(struct chanData *channel, search_t search)
5182 {
5183     const char *name = channel->channel->name;
5184     if((search->name && !match_ircglob(name, search->name)) ||
5185        (search->registrar && !channel->registrar) ||
5186        (search->registrar && !match_ircglob(channel->registrar, search->registrar)) ||
5187        (search->unvisited && (now - channel->visited) < search->unvisited) ||
5188        (search->registered && (now - channel->registered) > search->registered) ||
5189        (search->flags && ((search->flags & channel->flags) != search->flags)))
5190         return 0;
5191
5192     return 1;
5193 }
5194
5195 static unsigned int
5196 chanserv_channel_search(search_t search, channel_search_func smf, void *data)
5197 {
5198     struct chanData *channel;
5199     unsigned int matches = 0;
5200
5201     for(channel = channelList; channel && matches < search->limit; channel = channel->next)
5202     {
5203         if(!chanserv_channel_match(channel, search))
5204             continue;
5205         matches++;
5206         smf(channel, data);
5207     }
5208
5209     return matches;
5210 }
5211
5212 static void
5213 search_count(UNUSED_ARG(struct chanData *channel), UNUSED_ARG(void *data))
5214 {
5215 }
5216
5217 static void
5218 search_print(struct chanData *channel, void *data)
5219 {
5220     send_message_type(4, data, chanserv, "%s", channel->channel->name);
5221 }
5222
5223 static CHANSERV_FUNC(cmd_search)
5224 {
5225     search_t search;
5226     unsigned int matches;
5227     channel_search_func action;
5228
5229     REQUIRE_PARAMS(3);
5230
5231     if(!irccasecmp(argv[1], "count"))
5232         action = search_count;
5233     else if(!irccasecmp(argv[1], "print"))
5234         action = search_print;
5235     else
5236     {
5237         reply("CSMSG_ACTION_INVALID", argv[1]);
5238         return 0;
5239     }
5240
5241     search = chanserv_search_create(user, argc - 2, argv + 2);
5242     if(!search)
5243         return 0;
5244
5245     if(action == search_count)
5246         search->limit = INT_MAX;
5247
5248     if(action == search_print)
5249         reply("CSMSG_CHANNEL_SEARCH_RESULTS");
5250
5251     matches = chanserv_channel_search(search, action, user);
5252
5253     if(matches)
5254         reply("MSG_MATCH_COUNT", matches);
5255     else
5256         reply("MSG_NO_MATCHES");
5257
5258     free(search);
5259     return 1;
5260 }
5261
5262 static CHANSERV_FUNC(cmd_unvisited)
5263 {
5264     struct chanData *cData;
5265     unsigned long interval = chanserv_conf.channel_expire_delay;
5266     char buffer[INTERVALLEN];
5267     unsigned int limit = 25, matches = 0;
5268
5269     if(argc > 1)
5270     {
5271         interval = ParseInterval(argv[1]);
5272         if(argc > 2)
5273             limit = atoi(argv[2]);
5274     }
5275
5276     intervalString(buffer, interval, user->handle_info);
5277     reply("CSMSG_UNVISITED_HEADER", limit, buffer);
5278
5279     for(cData = channelList; cData && matches < limit; cData = cData->next)
5280     {
5281         if((now - cData->visited) < interval)
5282             continue;
5283
5284         intervalString(buffer, now - cData->visited, user->handle_info);
5285         reply("CSMSG_UNVISITED_DATA", cData->channel->name, buffer);
5286         matches++;
5287     }
5288
5289     return 1;
5290 }
5291
5292 static MODCMD_FUNC(chan_opt_defaulttopic)
5293 {
5294     if(argc > 1)
5295     {
5296         char *topic;
5297
5298         if(!check_user_level(channel, user, lvlEnfTopic, 1, 0))
5299         {
5300             reply("CSMSG_TOPIC_LOCKED", channel->name);
5301             return 0;
5302         }
5303
5304         topic = unsplit_string(argv+1, argc-1, NULL);
5305
5306         free(channel->channel_info->topic);
5307         if(topic[0] == '*' && topic[1] == 0)
5308         {
5309             topic = channel->channel_info->topic = NULL;
5310         }
5311         else
5312         {
5313             topic = channel->channel_info->topic = strdup(topic);
5314             if(channel->channel_info->topic_mask
5315                && !match_ircglob(channel->channel_info->topic, channel->channel_info->topic_mask))
5316                 reply("CSMSG_TOPIC_MISMATCH", channel->name);
5317         }
5318         SetChannelTopic(channel, chanserv, topic ? topic : "", 1);
5319     }
5320
5321     if(channel->channel_info->topic)
5322         reply("CSMSG_SET_DEFAULT_TOPIC", channel->channel_info->topic);
5323     else
5324         reply("CSMSG_SET_DEFAULT_TOPIC", user_find_message(user, "MSG_NONE"));
5325     return 1;
5326 }
5327
5328 static MODCMD_FUNC(chan_opt_topicmask)
5329 {
5330     if(argc > 1)
5331     {
5332         struct chanData *cData = channel->channel_info;
5333         char *mask;
5334
5335         if(!check_user_level(channel, user, lvlEnfTopic, 1, 0))
5336         {
5337             reply("CSMSG_TOPIC_LOCKED", channel->name);
5338             return 0;
5339         }
5340
5341         mask = unsplit_string(argv+1, argc-1, NULL);
5342
5343         if(cData->topic_mask)
5344             free(cData->topic_mask);
5345         if(mask[0] == '*' && mask[1] == 0)
5346         {
5347             cData->topic_mask = 0;
5348         }
5349         else
5350         {
5351             cData->topic_mask = strdup(mask);
5352             if(!cData->topic)
5353                 reply("CSMSG_MASK_BUT_NO_TOPIC", channel->name);
5354             else if(!match_ircglob(cData->topic, cData->topic_mask))
5355                 reply("CSMSG_TOPIC_MISMATCH", channel->name);
5356         }
5357     }
5358
5359     if(channel->channel_info->topic_mask)
5360         reply("CSMSG_SET_TOPICMASK", channel->channel_info->topic_mask);
5361     else
5362         reply("CSMSG_SET_TOPICMASK", user_find_message(user, "MSG_NONE"));
5363     return 1;
5364 }
5365
5366 int opt_greeting_common(struct userNode *user, struct svccmd *cmd, int argc, char *argv[], char *name, char **data)
5367 {
5368     if(argc > 1)
5369     {
5370         char *greeting = unsplit_string(argv+1, argc-1, NULL);
5371         char *previous;
5372
5373         previous = *data;
5374         if(greeting[0] == '*' && greeting[1] == 0)
5375             *data = NULL;
5376         else
5377         {
5378             unsigned int length = strlen(greeting);
5379             if(length > chanserv_conf.greeting_length)
5380             {
5381                 reply("CSMSG_GREETING_TOO_LONG", length, chanserv_conf.greeting_length);
5382                 return 0;
5383             }
5384             *data = strdup(greeting);
5385         }
5386         if(previous)
5387             free(previous);
5388     }
5389
5390     if(*data)
5391         reply(name, *data);
5392     else
5393         reply(name, user_find_message(user, "MSG_NONE"));
5394     return 1;
5395 }
5396
5397 static MODCMD_FUNC(chan_opt_greeting)
5398 {
5399     return opt_greeting_common(user, cmd, argc, argv, "CSMSG_SET_GREETING", &channel->channel_info->greeting);
5400 }
5401
5402 static MODCMD_FUNC(chan_opt_usergreeting)
5403 {
5404     return opt_greeting_common(user, cmd, argc, argv, "CSMSG_SET_USERGREETING", &channel->channel_info->user_greeting);
5405 }
5406
5407 static MODCMD_FUNC(chan_opt_modes)
5408 {
5409     struct mod_chanmode *new_modes;
5410     char modes[MODELEN];
5411
5412     if(argc > 1)
5413     {
5414         if(!check_user_level(channel, user, lvlEnfModes, 1, 0))
5415         {
5416             reply("CSMSG_NO_ACCESS");
5417             return 0;
5418         }
5419         if(argv[1][0] == '*' && argv[1][1] == 0)
5420         {
5421             memset(&channel->channel_info->modes, 0, sizeof(channel->channel_info->modes));
5422         }
5423         else if(!(new_modes = mod_chanmode_parse(channel, argv+1, argc-1, MCP_KEY_FREE|MCP_REGISTERED, 0)))
5424         {
5425             reply("CSMSG_INVALID_MODE_LOCK", unsplit_string(argv+1, argc-1, NULL));
5426             return 0;
5427         }
5428         else if(new_modes->argc > 1)
5429         {
5430             reply("CSMSG_INVALID_MODE_LOCK", unsplit_string(argv+1, argc-1, NULL));
5431             mod_chanmode_free(new_modes);
5432             return 0;
5433         }
5434         else
5435         {
5436             channel->channel_info->modes = *new_modes;
5437             modcmd_chanmode_announce(new_modes);
5438             mod_chanmode_free(new_modes);
5439         }
5440     }
5441
5442     mod_chanmode_format(&channel->channel_info->modes, modes);
5443     if(modes[0])
5444         reply("CSMSG_SET_MODES", modes);
5445     else
5446         reply("CSMSG_SET_MODES", user_find_message(user, "MSG_NONE"));
5447     return 1;
5448 }
5449
5450 #define CHANNEL_BINARY_OPTION(MSG, FLAG) return channel_binary_option(MSG, FLAG, CSFUNC_ARGS);
5451 static int
5452 channel_binary_option(char *name, unsigned long mask, struct userNode *user, struct chanNode *channel, int argc, char *argv[], struct svccmd *cmd)
5453 {
5454     struct chanData *cData = channel->channel_info;
5455     int value;
5456
5457     if(argc > 1)
5458     {
5459         /* Set flag according to value. */
5460         if(enabled_string(argv[1]))
5461         {
5462             cData->flags |= mask;
5463             value = 1;
5464         }
5465         else if(disabled_string(argv[1]))
5466         {
5467             cData->flags &= ~mask;
5468             value = 0;
5469         }
5470         else
5471         {
5472             reply("MSG_INVALID_BINARY", argv[1]);
5473             return 0;
5474         }
5475     }
5476     else
5477     {
5478         /* Find current option value. */
5479         value = (cData->flags & mask) ? 1 : 0;
5480     }
5481
5482     if(value)
5483         reply(name, user_find_message(user, "MSG_ON"));
5484     else
5485         reply(name, user_find_message(user, "MSG_OFF"));
5486     return 1;
5487 }
5488
5489 static MODCMD_FUNC(chan_opt_nodelete)
5490 {
5491     if((argc > 1) && (!IsOper(user) || !user->handle_info || (user->handle_info->opserv_level < chanserv_conf.nodelete_level)))
5492     {
5493         reply("MSG_SETTING_PRIVILEGED", argv[0]);
5494         return 0;
5495     }
5496
5497     CHANNEL_BINARY_OPTION("CSMSG_SET_NODELETE", CHANNEL_NODELETE);
5498 }
5499
5500 static MODCMD_FUNC(chan_opt_dynlimit)
5501 {
5502     CHANNEL_BINARY_OPTION("CSMSG_SET_DYNLIMIT", CHANNEL_DYNAMIC_LIMIT);
5503 }
5504
5505 static MODCMD_FUNC(chan_opt_offchannel)
5506 {
5507     struct chanData *cData = channel->channel_info;
5508     int value;
5509
5510     if(argc > 1)
5511     {
5512         /* Set flag according to value. */
5513         if(enabled_string(argv[1]))
5514         {
5515             if(!IsOffChannel(cData))
5516                 DelChannelUser(chanserv, channel, "Going off-channel.", 0);
5517             cData->flags |= CHANNEL_OFFCHANNEL;
5518             value = 1;
5519         }
5520         else if(disabled_string(argv[1]))
5521         {
5522             if(IsOffChannel(cData))
5523             {
5524                 struct mod_chanmode change;
5525                 mod_chanmode_init(&change);
5526                 change.argc = 1;
5527                 change.args[0].mode = MODE_CHANOP;
5528                 change.args[0].u.member = AddChannelUser(chanserv, channel);
5529                 mod_chanmode_announce(chanserv, channel, &change);
5530             }
5531             cData->flags &= ~CHANNEL_OFFCHANNEL;
5532             value = 0;
5533         }
5534         else
5535         {
5536             reply("MSG_INVALID_BINARY", argv[1]);
5537             return 0;
5538         }
5539     }
5540     else
5541     {
5542         /* Find current option value. */
5543         value = (cData->flags & CHANNEL_OFFCHANNEL) ? 1 : 0;
5544     }
5545
5546     if(value)
5547         reply("CSMSG_SET_OFFCHANNEL", user_find_message(user, "MSG_ON"));
5548     else
5549         reply("CSMSG_SET_OFFCHANNEL", user_find_message(user, "MSG_OFF"));
5550     return 1;
5551 }
5552
5553 static MODCMD_FUNC(chan_opt_unreviewed)
5554 {
5555     struct chanData *cData = channel->channel_info;
5556     int value = (cData->flags & CHANNEL_UNREVIEWED) ? 1 : 0;
5557
5558     if(argc > 1)
5559     {
5560         int new_value;
5561
5562         /* The two directions can have different ACLs. */
5563         if(enabled_string(argv[1]))
5564             new_value = 1;
5565         else if(disabled_string(argv[1]))
5566             new_value = 0;
5567         else
5568         {
5569             reply("MSG_INVALID_BINARY", argv[1]);
5570             return 0;
5571         }
5572
5573         if (new_value != value)
5574         {
5575             struct svccmd *subcmd;
5576             char subcmd_name[32];
5577
5578             snprintf(subcmd_name, sizeof(subcmd_name), "%s %s", argv[0], (new_value ? "on" : "off"));
5579             subcmd = dict_find(cmd->parent->commands, subcmd_name, NULL);
5580             if(!subcmd)
5581             {
5582                 reply("MSG_COMMAND_DISABLED", subcmd_name);
5583                 return 0;
5584             }
5585             else if(!svccmd_can_invoke(user, cmd->parent->bot, subcmd, channel, SVCCMD_NOISY))
5586                 return 0;
5587
5588             if (new_value)
5589                 cData->flags |= CHANNEL_UNREVIEWED;
5590             else
5591             {
5592                 free(cData->registrar);
5593                 cData->registrar = strdup(user->handle_info->handle);
5594                 cData->flags &= ~CHANNEL_UNREVIEWED;
5595             }
5596             value = new_value;
5597         }
5598     }
5599
5600     if(value)
5601         reply("CSMSG_SET_UNREVIEWED", user_find_message(user, "MSG_ON"));
5602     else
5603         reply("CSMSG_SET_UNREVIEWED", user_find_message(user, "MSG_OFF"));
5604     return 1;
5605 }
5606
5607 static MODCMD_FUNC(chan_opt_defaults)
5608 {
5609     struct userData *uData;
5610     struct chanData *cData;
5611     const char *confirm;
5612     enum levelOption lvlOpt;
5613     enum charOption chOpt;
5614
5615     cData = channel->channel_info;
5616     uData = GetChannelUser(cData, user->handle_info);
5617     if(!uData || (uData->access < UL_OWNER))
5618     {
5619         reply("CSMSG_OWNER_DEFAULTS", channel->name);
5620         return 0;
5621     }
5622     confirm = make_confirmation_string(uData);
5623     if((argc < 2) || strcmp(argv[1], confirm))
5624     {
5625         reply("CSMSG_CONFIRM_DEFAULTS", channel->name, confirm);
5626         return 0;
5627     }
5628     cData->flags = (CHANNEL_DEFAULT_FLAGS & ~CHANNEL_PRESERVED_FLAGS)
5629         | (cData->flags & CHANNEL_PRESERVED_FLAGS);
5630     cData->modes = chanserv_conf.default_modes;
5631     for(lvlOpt = 0; lvlOpt < NUM_LEVEL_OPTIONS; ++lvlOpt)
5632         cData->lvlOpts[lvlOpt] = levelOptions[lvlOpt].default_value;
5633     for(chOpt = 0; chOpt < NUM_CHAR_OPTIONS; ++chOpt)
5634         cData->chOpts[chOpt] = charOptions[chOpt].default_value;
5635     reply("CSMSG_SETTINGS_DEFAULTED", channel->name);
5636     return 1;
5637 }
5638
5639 static int
5640 channel_level_option(enum levelOption option, struct userNode *user, struct chanNode *channel, int argc, char *argv[], struct svccmd *cmd)
5641 {
5642     struct chanData *cData = channel->channel_info;
5643     struct userData *uData;
5644     unsigned short value;
5645
5646     if(argc > 1)
5647     {
5648         if(!check_user_level(channel, user, option, 1, 1))
5649         {
5650             reply("CSMSG_CANNOT_SET");
5651             return 0;
5652         }
5653         value = user_level_from_name(argv[1], UL_OWNER+1);
5654         if(!value && strcmp(argv[1], "0"))
5655         {
5656             reply("CSMSG_INVALID_ACCESS", argv[1]);
5657             return 0;
5658         }
5659         uData = GetChannelUser(cData, user->handle_info);
5660         if(!uData || ((uData->access < UL_OWNER) && (value > uData->access)))
5661         {
5662             reply("CSMSG_BAD_SETLEVEL");
5663             return 0;
5664         }
5665         switch(option)
5666         {
5667         case lvlGiveVoice:
5668             if(value > cData->lvlOpts[lvlGiveOps])
5669             {
5670                 reply("CSMSG_BAD_GIVEVOICE", cData->lvlOpts[lvlGiveOps]);
5671                 return 0;
5672             }
5673             break;
5674         case lvlGiveOps:
5675             if(value < cData->lvlOpts[lvlGiveVoice])
5676             {
5677                 reply("CSMSG_BAD_GIVEOPS", cData->lvlOpts[lvlGiveVoice]);
5678                 return 0;
5679             }
5680             break;
5681         case lvlSetters:
5682             /* This test only applies to owners, since non-owners
5683              * trying to set an option to above their level get caught
5684              * by the CSMSG_BAD_SETLEVEL test above.
5685              */
5686             if(value > uData->access)
5687             {
5688                 reply("CSMSG_BAD_SETTERS");
5689                 return 0;
5690             }
5691             break;
5692         default:
5693             break;
5694         }
5695         cData->lvlOpts[option] = value;
5696     }
5697     reply(levelOptions[option].format_name, cData->lvlOpts[option]);
5698     return argc > 1;
5699 }
5700
5701 static MODCMD_FUNC(chan_opt_enfops)
5702 {
5703     return channel_level_option(lvlEnfOps, CSFUNC_ARGS);
5704 }
5705
5706 static MODCMD_FUNC(chan_opt_giveops)
5707 {
5708     return channel_level_option(lvlGiveOps, CSFUNC_ARGS);
5709 }
5710
5711 static MODCMD_FUNC(chan_opt_enfmodes)
5712 {
5713     return channel_level_option(lvlEnfModes, CSFUNC_ARGS);
5714 }
5715
5716 static MODCMD_FUNC(chan_opt_enftopic)
5717 {
5718     return channel_level_option(lvlEnfTopic, CSFUNC_ARGS);
5719 }
5720
5721 static MODCMD_FUNC(chan_opt_pubcmd)
5722 {
5723     return channel_level_option(lvlPubCmd, CSFUNC_ARGS);
5724 }
5725
5726 static MODCMD_FUNC(chan_opt_setters)
5727 {
5728     return channel_level_option(lvlSetters, CSFUNC_ARGS);
5729 }
5730
5731 static MODCMD_FUNC(chan_opt_ctcpusers)
5732 {
5733     return channel_level_option(lvlCTCPUsers, CSFUNC_ARGS);
5734 }
5735
5736 static MODCMD_FUNC(chan_opt_userinfo)
5737 {
5738     return channel_level_option(lvlUserInfo, CSFUNC_ARGS);
5739 }
5740
5741 static MODCMD_FUNC(chan_opt_givevoice)
5742 {
5743     return channel_level_option(lvlGiveVoice, CSFUNC_ARGS);
5744 }
5745
5746 static MODCMD_FUNC(chan_opt_topicsnarf)
5747 {
5748     return channel_level_option(lvlTopicSnarf, CSFUNC_ARGS);
5749 }
5750
5751 static MODCMD_FUNC(chan_opt_inviteme)
5752 {
5753     return channel_level_option(lvlInviteMe, CSFUNC_ARGS);
5754 }
5755
5756 static int
5757 channel_multiple_option(enum charOption option, struct userNode *user, struct chanNode *channel, int argc, char *argv[], struct svccmd *cmd)
5758 {
5759     struct chanData *cData = channel->channel_info;
5760     int count = charOptions[option].count, idx;
5761
5762     if(argc > 1)
5763     {
5764         idx = atoi(argv[1]);
5765
5766         if(!isdigit(argv[1][0]) || (idx < 0) || (idx >= count))
5767         {
5768             reply("CSMSG_INVALID_NUMERIC", idx);
5769             /* Show possible values. */
5770             for(idx = 0; idx < count; idx++)
5771                 reply(charOptions[option].format_name, idx, user_find_message(user, charOptions[option].values[idx].format_name));
5772             return 0;
5773         }
5774
5775         cData->chOpts[option] = charOptions[option].values[idx].value;
5776     }
5777     else
5778     {
5779         /* Find current option value. */
5780       find_value:
5781         for(idx = 0;
5782             (idx < count) && (cData->chOpts[option] != charOptions[option].values[idx].value);
5783             idx++);
5784         if(idx == count)
5785         {
5786             /* Somehow, the option value is corrupt; reset it to the default. */
5787             cData->chOpts[option] = charOptions[option].default_value;
5788             goto find_value;
5789         }
5790     }
5791
5792     reply(charOptions[option].format_name, idx, user_find_message(user, charOptions[option].values[idx].format_name));
5793     return 1;
5794 }
5795
5796 static MODCMD_FUNC(chan_opt_protect)
5797 {
5798     return channel_multiple_option(chProtect, CSFUNC_ARGS);
5799 }
5800
5801 static MODCMD_FUNC(chan_opt_toys)
5802 {
5803     return channel_multiple_option(chToys, CSFUNC_ARGS);
5804 }
5805
5806 static MODCMD_FUNC(chan_opt_ctcpreaction)
5807 {
5808     return channel_multiple_option(chCTCPReaction, CSFUNC_ARGS);
5809 }
5810
5811 static MODCMD_FUNC(chan_opt_topicrefresh)
5812 {
5813     return channel_multiple_option(chTopicRefresh, CSFUNC_ARGS);
5814 }
5815
5816 static struct svccmd_list set_shows_list;
5817
5818 static void
5819 handle_svccmd_unbind(struct svccmd *target) {
5820     unsigned int ii;
5821     for(ii=0; ii<set_shows_list.used; ++ii)
5822         if(target == set_shows_list.list[ii])
5823             set_shows_list.used = 0;
5824 }
5825
5826 static CHANSERV_FUNC(cmd_set)
5827 {
5828     struct svccmd *subcmd;
5829     char buf[MAXLEN];
5830     unsigned int ii;
5831
5832     /* Check if we need to (re-)initialize set_shows_list. */
5833     if(!set_shows_list.used)
5834     {
5835         if(!set_shows_list.size)
5836         {
5837             set_shows_list.size = chanserv_conf.set_shows->used;
5838             set_shows_list.list = calloc(set_shows_list.size, sizeof(set_shows_list.list[0]));
5839         }
5840         for(ii = 0; ii < chanserv_conf.set_shows->used; ii++)
5841         {
5842             const char *name = chanserv_conf.set_shows->list[ii];
5843             sprintf(buf, "%s %s", argv[0], name);
5844             subcmd = dict_find(cmd->parent->commands, buf, NULL);
5845             if(!subcmd)
5846             {
5847                 log_module(CS_LOG, LOG_ERROR, "Unable to find set option \"%s\".", name);
5848                 continue;
5849             }
5850             svccmd_list_append(&set_shows_list, subcmd);
5851         }
5852     }
5853
5854     if(argc < 2)
5855     {
5856         reply("CSMSG_CHANNEL_OPTIONS");
5857         for(ii = 0; ii < set_shows_list.used; ii++)
5858         {
5859             subcmd = set_shows_list.list[ii];
5860             subcmd->command->func(user, channel, 1, argv+1, subcmd);
5861         }
5862         return 1;
5863     }
5864
5865     sprintf(buf, "%s %s", argv[0], argv[1]);
5866     subcmd = dict_find(cmd->parent->commands, buf, NULL);
5867     if(!subcmd)
5868     {
5869         reply("CSMSG_INVALID_OPTION", argv[1], argv[0]);
5870         return 0;
5871     }
5872     if((argc > 2) && !check_user_level(channel, user, lvlSetters, 1, 0))
5873     {
5874         reply("CSMSG_NO_ACCESS");
5875         return 0;
5876     }
5877
5878     argv[0] = "";
5879     argv[1] = buf;
5880     return subcmd->command->func(user, channel, argc - 1, argv + 1, subcmd);
5881 }
5882
5883 static int
5884 user_binary_option(char *name, unsigned long mask, struct userNode *user, struct chanNode *channel, int argc, char *argv[], struct svccmd *cmd)
5885 {
5886     struct userData *uData;
5887
5888     uData = GetChannelAccess(channel->channel_info, user->handle_info);
5889     if(!uData)
5890     {
5891         reply("CSMSG_NOT_USER", channel->name);
5892         return 0;
5893     }
5894
5895     if(argc < 2)
5896     {
5897         /* Just show current option value. */
5898     }
5899     else if(enabled_string(argv[1]))
5900     {
5901         uData->flags |= mask;
5902     }
5903     else if(disabled_string(argv[1]))
5904     {
5905         uData->flags &= ~mask;
5906     }
5907     else
5908     {
5909         reply("MSG_INVALID_BINARY", argv[1]);
5910         return 0;
5911     }
5912
5913     reply(name, user_find_message(user, (uData->flags & mask) ? "MSG_ON" : "MSG_OFF"));
5914     return 1;
5915 }
5916
5917 static MODCMD_FUNC(user_opt_noautoop)
5918 {
5919     struct userData *uData;
5920
5921     uData = GetChannelAccess(channel->channel_info, user->handle_info);
5922     if(!uData)
5923     {
5924         reply("CSMSG_NOT_USER", channel->name);
5925         return 0;
5926     }
5927     if(uData->access < channel->channel_info->lvlOpts[lvlGiveOps])
5928         return user_binary_option("CSMSG_USET_NOAUTOVOICE", USER_AUTO_OP, CSFUNC_ARGS);
5929     else
5930         return user_binary_option("CSMSG_USET_NOAUTOOP", USER_AUTO_OP, CSFUNC_ARGS);
5931 }
5932
5933 static MODCMD_FUNC(user_opt_autoinvite)
5934 {
5935     if((argc > 1) && !check_user_level(channel, user, lvlInviteMe, 1, 0))
5936     {
5937         reply("CSMSG_LOW_CHANNEL_ACCESS", channel->name);
5938     }
5939     return user_binary_option("CSMSG_USET_AUTOINVITE", USER_AUTO_INVITE, CSFUNC_ARGS);
5940 }
5941
5942 static MODCMD_FUNC(user_opt_info)
5943 {
5944     struct userData *uData;
5945     char *infoline;
5946
5947     uData = GetChannelAccess(channel->channel_info, user->handle_info);
5948
5949     if(!uData)
5950     {
5951         /* If they got past the command restrictions (which require access)
5952          * but fail this test, we have some fool with security override on.
5953          */
5954         reply("CSMSG_NOT_USER", channel->name);
5955         return 0;
5956     }
5957
5958     if(argc > 1)
5959     {
5960         size_t bp;
5961         infoline = unsplit_string(argv + 1, argc - 1, NULL);
5962         if(strlen(infoline) > chanserv_conf.max_userinfo_length)
5963         {
5964             reply("CSMSG_INFOLINE_TOO_LONG", chanserv_conf.max_userinfo_length);
5965             return 0;
5966         }
5967         bp = strcspn(infoline, "\001");
5968         if(infoline[bp])
5969         {
5970             reply("CSMSG_BAD_INFOLINE", infoline[bp]);
5971             return 0;
5972         }
5973         if(uData->info)
5974             free(uData->info);
5975         if(infoline[0] == '*' && infoline[1] == 0)
5976             uData->info = NULL;
5977         else
5978             uData->info = strdup(infoline);
5979     }
5980     if(uData->info)
5981         reply("CSMSG_USET_INFO", uData->info);
5982     else
5983         reply("CSMSG_USET_INFO", user_find_message(user, "MSG_NONE"));
5984     return 1;
5985 }
5986
5987 struct svccmd_list uset_shows_list;
5988
5989 static CHANSERV_FUNC(cmd_uset)
5990 {
5991     struct svccmd *subcmd;
5992     char buf[MAXLEN];
5993     unsigned int ii;
5994
5995     /* Check if we need to (re-)initialize uset_shows_list. */
5996     if(!uset_shows_list.used)
5997     {
5998         char *options[] =
5999         {
6000             "NoAutoOp", "AutoInvite", "Info"
6001         };
6002
6003         if(!uset_shows_list.size)
6004         {
6005             uset_shows_list.size = ArrayLength(options);
6006             uset_shows_list.list = calloc(uset_shows_list.size, sizeof(uset_shows_list.list[0]));
6007         }
6008         for(ii = 0; ii < ArrayLength(options); ii++)
6009         {
6010             const char *name = options[ii];
6011             sprintf(buf, "%s %s", argv[0], name);
6012             subcmd = dict_find(cmd->parent->commands, buf, NULL);
6013             if(!subcmd)
6014             {
6015                 log_module(CS_LOG, LOG_ERROR, "Unable to find uset option %s.", name);
6016                 continue;
6017             }
6018             svccmd_list_append(&uset_shows_list, subcmd);
6019         }
6020     }
6021
6022     if(argc < 2)
6023     {
6024         /* Do this so options are presented in a consistent order. */
6025         reply("CSMSG_USER_OPTIONS");
6026         for(ii = 0; ii < uset_shows_list.used; ii++)
6027             uset_shows_list.list[ii]->command->func(user, channel, 1, argv+1, uset_shows_list.list[ii]);
6028         return 1;
6029     }
6030
6031     sprintf(buf, "%s %s", argv[0], argv[1]);
6032     subcmd = dict_find(cmd->parent->commands, buf, NULL);
6033     if(!subcmd)
6034     {
6035         reply("CSMSG_INVALID_OPTION", argv[1], argv[0]);
6036         return 0;
6037     }
6038
6039     return subcmd->command->func(user, channel, argc - 1, argv + 1, subcmd);
6040 }
6041
6042 static CHANSERV_FUNC(cmd_giveownership)
6043 {
6044     struct handle_info *new_owner_hi;
6045     struct userData *new_owner;
6046     struct userData *curr_user;
6047     struct userData *invoker;
6048     struct chanData *cData = channel->channel_info;
6049     struct do_not_register *dnr;
6050     const char *confirm;
6051     unsigned int force;
6052     unsigned short co_access;
6053     char reason[MAXLEN];
6054
6055     REQUIRE_PARAMS(2);
6056     curr_user = GetChannelAccess(cData, user->handle_info);
6057     force = IsHelping(user) && (argc > 2) && !irccasecmp(argv[2], "force");
6058     if(!curr_user || (curr_user->access != UL_OWNER))
6059     {
6060         struct userData *owner = NULL;
6061         for(curr_user = channel->channel_info->users;
6062             curr_user;
6063             curr_user = curr_user->next)
6064         {
6065             if(curr_user->access != UL_OWNER)
6066                 continue;
6067             if(owner)
6068             {
6069                 reply("CSMSG_MULTIPLE_OWNERS", channel->name);
6070                 return 0;
6071             }
6072             owner = curr_user;
6073         }
6074         curr_user = owner;
6075     }
6076     else if(!force && (now < cData->ownerTransfer + chanserv_conf.giveownership_period))
6077     {
6078         char delay[INTERVALLEN];
6079         intervalString(delay, cData->ownerTransfer + chanserv_conf.giveownership_period - now, user->handle_info);
6080         reply("CSMSG_TRANSFER_WAIT", delay, channel->name);
6081         return 0;
6082     }
6083     if(!(new_owner_hi = modcmd_get_handle_info(user, argv[1])))
6084         return 0;
6085     if(new_owner_hi == user->handle_info)
6086     {
6087         reply("CSMSG_NO_TRANSFER_SELF");
6088         return 0;
6089     }
6090     new_owner = GetChannelAccess(cData, new_owner_hi);
6091     if(!new_owner)
6092     {
6093         if(force)
6094         {
6095             new_owner = add_channel_user(cData, new_owner_hi, UL_OWNER - 1, 0, NULL);
6096         }
6097         else
6098         {
6099             reply("CSMSG_NO_CHAN_USER", new_owner_hi->handle, channel->name);
6100             return 0;
6101         }
6102     }
6103     if((chanserv_get_owned_count(new_owner_hi) >= chanserv_conf.max_owned) && !force)
6104     {
6105         reply("CSMSG_OWN_TOO_MANY", new_owner_hi->handle, chanserv_conf.max_owned);
6106         return 0;
6107     }
6108     if((dnr = chanserv_is_dnr(NULL, new_owner_hi)) && !force) {
6109         if(!IsHelping(user))
6110             reply("CSMSG_DNR_ACCOUNT", new_owner_hi->handle);
6111         else
6112             chanserv_show_dnrs(user, cmd, NULL, new_owner_hi->handle);
6113         return 0;
6114     }
6115     invoker = GetChannelUser(cData, user->handle_info);
6116     if(invoker->access <= UL_OWNER)
6117     {
6118         confirm = make_confirmation_string(curr_user);
6119         if((argc < 3) || strcmp(argv[2], confirm))
6120         {
6121             reply("CSMSG_CONFIRM_GIVEOWNERSHIP", new_owner_hi->handle, confirm);
6122             return 0;
6123         }
6124     }
6125     if(new_owner->access >= UL_COOWNER)
6126         co_access = new_owner->access;
6127     else
6128         co_access = UL_COOWNER;
6129     new_owner->access = UL_OWNER;
6130     if(curr_user)
6131         curr_user->access = co_access;
6132     cData->ownerTransfer = now;
6133     reply("CSMSG_OWNERSHIP_GIVEN", channel->name, new_owner_hi->handle);
6134     sprintf(reason, "%s ownership transferred to %s by %s.", channel->name, new_owner_hi->handle, user->handle_info->handle);
6135     global_message(MESSAGE_RECIPIENT_OPERS | MESSAGE_RECIPIENT_HELPERS, reason);
6136     return 1;
6137 }
6138
6139 static CHANSERV_FUNC(cmd_suspend)
6140 {
6141     struct handle_info *hi;
6142     struct userData *actor, *real_actor, *target;
6143     unsigned int override = 0;
6144
6145     REQUIRE_PARAMS(2);
6146     if(!(hi = modcmd_get_handle_info(user, argv[1]))) return 0;
6147     actor = GetChannelUser(channel->channel_info, user->handle_info);
6148     real_actor = GetChannelAccess(channel->channel_info, user->handle_info);
6149     if(!(target = GetTrueChannelAccess(channel->channel_info, hi)))
6150     {
6151         reply("CSMSG_NO_CHAN_USER", hi->handle, channel->name);
6152         return 0;
6153     }
6154     if(target->access >= actor->access)
6155     {
6156         reply("MSG_USER_OUTRANKED", hi->handle);
6157         return 0;
6158     }
6159     if(target->flags & USER_SUSPENDED)
6160     {
6161         reply("CSMSG_ALREADY_SUSPENDED", hi->handle);
6162         return 0;
6163     }
6164     if(target->present)
6165     {
6166         target->present = 0;
6167         target->seen = now;
6168     }
6169     if(!real_actor || target->access >= real_actor->access)
6170         override = CMD_LOG_OVERRIDE;
6171     target->flags |= USER_SUSPENDED;
6172     reply("CSMSG_USER_SUSPENDED", hi->handle, channel->name);
6173     return 1 | override;
6174 }
6175
6176 static CHANSERV_FUNC(cmd_unsuspend)
6177 {
6178     struct handle_info *hi;
6179     struct userData *actor, *real_actor, *target;
6180     unsigned int override = 0;
6181
6182     REQUIRE_PARAMS(2);
6183     if(!(hi = modcmd_get_handle_info(user, argv[1]))) return 0;
6184     actor = GetChannelUser(channel->channel_info, user->handle_info);
6185     real_actor = GetChannelAccess(channel->channel_info, user->handle_info);
6186     if(!(target = GetTrueChannelAccess(channel->channel_info, hi)))
6187     {
6188         reply("CSMSG_NO_CHAN_USER", hi->handle, channel->name);
6189         return 0;
6190     }
6191     if(target->access >= actor->access)
6192     {
6193         reply("MSG_USER_OUTRANKED", hi->handle);
6194         return 0;
6195     }
6196     if(!(target->flags & USER_SUSPENDED))
6197     {
6198         reply("CSMSG_NOT_SUSPENDED", hi->handle);
6199         return 0;
6200     }
6201     if(!real_actor || target->access >= real_actor->access)
6202         override = CMD_LOG_OVERRIDE;
6203     target->flags &= ~USER_SUSPENDED;
6204     scan_user_presence(target, NULL);
6205     reply("CSMSG_USER_UNSUSPENDED", hi->handle, channel->name);
6206     return 1 | override;
6207 }
6208
6209 static MODCMD_FUNC(cmd_deleteme)
6210 {
6211     struct handle_info *hi;
6212     struct userData *target;
6213     const char *confirm_string;
6214     unsigned short access_level;
6215     char *channel_name;
6216
6217     hi = user->handle_info;
6218     if(!(target = GetTrueChannelAccess(channel->channel_info, hi)))
6219     {
6220         reply("CSMSG_NO_CHAN_USER", hi->handle, channel->name);
6221         return 0;
6222     }
6223     if(target->access == UL_OWNER)
6224     {
6225         reply("CSMSG_NO_OWNER_DELETEME", channel->name);
6226         return 0;
6227     }
6228     confirm_string = make_confirmation_string(target);
6229     if((argc < 2) || strcmp(argv[1], confirm_string))
6230     {
6231         reply("CSMSG_CONFIRM_DELETEME", confirm_string);
6232         return 0;
6233     }
6234     access_level = target->access;
6235     channel_name = strdup(channel->name);
6236     del_channel_user(target, 1);
6237     reply("CSMSG_DELETED_YOU", access_level, channel_name);
6238     free(channel_name);
6239     return 1;
6240 }
6241
6242 static void
6243 chanserv_refresh_topics(UNUSED_ARG(void *data))
6244 {
6245     unsigned int refresh_num = (now - self->link_time) / chanserv_conf.refresh_period;
6246     struct chanData *cData;
6247     char opt;
6248
6249     for(cData = channelList; cData; cData = cData->next)
6250     {
6251         if(IsSuspended(cData))
6252             continue;
6253         opt = cData->chOpts[chTopicRefresh];
6254         if(opt == 'n')
6255             continue;
6256         if((refresh_num - cData->last_refresh) < (unsigned int)(1 << (opt - '1')))
6257             continue;
6258         if(cData->topic)
6259             SetChannelTopic(cData->channel, chanserv, cData->topic, 1);
6260         cData->last_refresh = refresh_num;
6261     }
6262     timeq_add(now + chanserv_conf.refresh_period, chanserv_refresh_topics, NULL);
6263 }
6264
6265 static CHANSERV_FUNC(cmd_unf)
6266 {
6267     if(channel)
6268     {
6269         char response[MAXLEN];
6270         const char *fmt = user_find_message(user, "CSMSG_UNF_RESPONSE");
6271         sprintf(response, "\ 2%s\ 2: %s", user->nick, fmt);
6272         irc_privmsg(cmd->parent->bot, channel->name, response);
6273     }
6274     else
6275         reply("CSMSG_UNF_RESPONSE");
6276     return 1;
6277 }
6278
6279 static CHANSERV_FUNC(cmd_ping)
6280 {
6281     if(channel)
6282     {
6283         char response[MAXLEN];
6284         const char *fmt = user_find_message(user, "CSMSG_PING_RESPONSE");
6285         sprintf(response, "\ 2%s\ 2: %s", user->nick, fmt);
6286         irc_privmsg(cmd->parent->bot, channel->name, response);
6287     }
6288     else
6289         reply("CSMSG_PING_RESPONSE");
6290     return 1;
6291 }
6292
6293 static CHANSERV_FUNC(cmd_wut)
6294 {
6295     if(channel)
6296     {
6297         char response[MAXLEN];
6298         const char *fmt = user_find_message(user, "CSMSG_WUT_RESPONSE");
6299         sprintf(response, "\ 2%s\ 2: %s", user->nick, fmt);
6300         irc_privmsg(cmd->parent->bot, channel->name, response);
6301     }
6302     else
6303         reply("CSMSG_WUT_RESPONSE");
6304     return 1;
6305 }
6306
6307 static CHANSERV_FUNC(cmd_8ball)
6308 {
6309     unsigned int i, j, accum;
6310     const char *resp;
6311
6312     REQUIRE_PARAMS(2);
6313     accum = 0;
6314     for(i=1; i<argc; i++)
6315         for(j=0; argv[i][j]; j++)
6316             accum = (accum << 5) - accum + toupper(argv[i][j]);
6317     resp = chanserv_conf.eightball->list[accum % chanserv_conf.eightball->used];
6318     if(channel)
6319     {
6320         char response[MAXLEN];
6321         sprintf(response, "\ 2%s\ 2: %s", user->nick, resp);
6322         irc_privmsg(cmd->parent->bot, channel->name, response);
6323     }
6324     else
6325         send_message_type(4, user, cmd->parent->bot, "%s", resp);
6326     return 1;
6327 }
6328
6329 static CHANSERV_FUNC(cmd_d)
6330 {
6331     unsigned long sides, count, modifier, ii, total;
6332     char response[MAXLEN], *sep;
6333     const char *fmt;
6334
6335     REQUIRE_PARAMS(2);
6336     if((count = strtoul(argv[1], &sep, 10)) < 1)
6337         goto no_dice;
6338     if(sep[0] == 0)
6339     {
6340         if(count == 1)
6341             goto no_dice;
6342         sides = count;
6343         count = 1;
6344         modifier = 0;
6345     }
6346     else if(((sep[0] == 'd') || (sep[0] == 'D')) && isdigit(sep[1])
6347             && (sides = strtoul(sep+1, &sep, 10)) > 1)
6348     {
6349         if(sep[0] == 0)
6350             modifier = 0;
6351         else if((sep[0] == '-') && isdigit(sep[1]))
6352             modifier = strtoul(sep, NULL, 10);
6353         else if((sep[0] == '+') && isdigit(sep[1]))
6354             modifier = strtoul(sep+1, NULL, 10);
6355         else
6356             goto no_dice;
6357     }
6358     else
6359     {
6360       no_dice:
6361         reply("CSMSG_BAD_DIE_FORMAT", argv[1]);
6362         return 0;
6363     }
6364     if(count > 10)
6365     {
6366         reply("CSMSG_BAD_DICE_COUNT", count, 10);
6367         return 0;
6368     }
6369     for(total = ii = 0; ii < count; ++ii)
6370         total += (rand() % sides) + 1;
6371     total += modifier;
6372
6373     if((count > 1) || modifier)
6374     {
6375         fmt = user_find_message(user, "CSMSG_DICE_ROLL");
6376         sprintf(response, fmt, total, count, sides, modifier);
6377     }
6378     else
6379     {
6380         fmt = user_find_message(user, "CSMSG_DIE_ROLL");
6381         sprintf(response, fmt, total, sides);
6382     }
6383     if(channel)
6384         send_channel_message(channel, cmd->parent->bot, "$b%s$b: %s", user->nick, response);
6385     else
6386         send_message_type(4, user, cmd->parent->bot, "%s", response);
6387     return 1;
6388 }
6389
6390 static CHANSERV_FUNC(cmd_huggle)
6391 {
6392     /* CTCP must be via PRIVMSG, never notice */
6393     if(channel)
6394         send_target_message(1, channel->name, cmd->parent->bot, "CSMSG_HUGGLES_HIM", user->nick);
6395     else
6396         send_target_message(1, user->nick, cmd->parent->bot, "CSMSG_HUGGLES_YOU");
6397     return 1;
6398 }
6399
6400 static void
6401 chanserv_adjust_limit(void *data)
6402 {
6403     struct mod_chanmode change;
6404     struct chanData *cData = data;
6405     struct chanNode *channel = cData->channel;
6406     unsigned int limit;
6407
6408     if(IsSuspended(cData))
6409         return;
6410
6411     cData->limitAdjusted = now;
6412     limit = channel->members.used + chanserv_conf.adjust_threshold + 5;
6413     if(cData->modes.modes_set & MODE_LIMIT)
6414     {
6415         if(limit > cData->modes.new_limit)
6416             limit = cData->modes.new_limit;
6417         else if(limit == cData->modes.new_limit)
6418             return;
6419     }
6420
6421     mod_chanmode_init(&change);
6422     change.modes_set = MODE_LIMIT;
6423     change.new_limit = limit;
6424     mod_chanmode_announce(chanserv, channel, &change);
6425 }
6426
6427 static void
6428 handle_new_channel(struct chanNode *channel)
6429 {
6430     struct chanData *cData;
6431
6432     if(!(cData = channel->channel_info))
6433         return;
6434
6435     if(cData->modes.modes_set || cData->modes.modes_clear)
6436         mod_chanmode_announce(chanserv, cData->channel, &cData->modes);
6437
6438     if(self->uplink && !self->uplink->burst && channel->channel_info->topic)
6439         SetChannelTopic(channel, chanserv, channel->channel_info->topic, 1);
6440 }
6441
6442 /* Welcome to my worst nightmare. Warning: Read (or modify)
6443    the code below at your own risk. */
6444 static int
6445 handle_join(struct modeNode *mNode)
6446 {
6447     struct mod_chanmode change;
6448     struct userNode *user = mNode->user;
6449     struct chanNode *channel = mNode->channel;
6450     struct chanData *cData;
6451     struct userData *uData = NULL;
6452     struct banData *bData;
6453     struct handle_info *handle;
6454     unsigned int modes = 0, info = 0;
6455     char *greeting;
6456
6457     if(IsLocal(user) || !channel->channel_info || IsSuspended(channel->channel_info))
6458         return 0;
6459
6460     cData = channel->channel_info;
6461     if(channel->members.used > cData->max)
6462         cData->max = channel->members.used;
6463
6464     /* Check for bans.  If they're joining through a ban, one of two
6465      * cases applies:
6466      *   1: Join during a netburst, by riding the break.  Kick them
6467      *      unless they have ops or voice in the channel.
6468      *   2: They're allowed to join through the ban (an invite in
6469      *   ircu2.10, or a +e on Hybrid, or something).
6470      * If they're not joining through a ban, and the banlist is not
6471      * full, see if they're on the banlist for the channel.  If so,
6472      * kickban them.
6473      */
6474     if(user->uplink->burst && !mNode->modes)
6475     {
6476         unsigned int ii;
6477         for(ii = 0; ii < channel->banlist.used; ii++)
6478         {
6479             if(user_matches_glob(user, channel->banlist.list[ii]->ban, MATCH_USENICK))
6480             {
6481                 /* Riding a netburst.  Naughty. */
6482                 KickChannelUser(user, channel, chanserv, "User from far side of netsplit should have been banned - bye.");
6483                 return 1;
6484             }
6485         }
6486     }
6487
6488     mod_chanmode_init(&change);
6489     change.argc = 1;
6490     if(channel->banlist.used < MAXBANS)
6491     {
6492         /* Not joining through a ban. */
6493         for(bData = cData->bans;
6494             bData && !user_matches_glob(user, bData->mask, MATCH_USENICK);
6495             bData = bData->next);
6496
6497         if(bData)
6498         {
6499             char kick_reason[MAXLEN];
6500             sprintf(kick_reason, "(%s) %s", bData->owner, bData->reason);
6501
6502             bData->triggered = now;
6503             if(bData != cData->bans)
6504             {
6505                 /* Shuffle the ban to the head of the list. */
6506                 if(bData->next)
6507                     bData->next->prev = bData->prev;
6508                 if(bData->prev)
6509                     bData->prev->next = bData->next;
6510
6511                 bData->prev = NULL;
6512                 bData->next = cData->bans;
6513
6514                 if(cData->bans)
6515                     cData->bans->prev = bData;
6516                 cData->bans = bData;
6517             }
6518
6519             change.args[0].mode = MODE_BAN;
6520             change.args[0].u.hostmask = bData->mask;
6521             mod_chanmode_announce(chanserv, channel, &change);
6522             KickChannelUser(user, channel, chanserv, kick_reason);
6523             return 1;
6524         }
6525     }
6526
6527     /* ChanServ will not modify the limits in join-flooded channels,
6528        or when there are enough slots left below the limit. */
6529     if((cData->flags & CHANNEL_DYNAMIC_LIMIT)
6530        && !channel->join_flooded
6531        && (channel->limit - channel->members.used) < chanserv_conf.adjust_threshold)
6532     {
6533         /* The user count has begun "bumping" into the channel limit,
6534            so set a timer to raise the limit a bit. Any previous
6535            timers are removed so three incoming users within the delay
6536            results in one limit change, not three. */
6537
6538         timeq_del(0, chanserv_adjust_limit, cData, TIMEQ_IGNORE_WHEN);
6539         timeq_add(now + chanserv_conf.adjust_delay, chanserv_adjust_limit, cData);
6540     }
6541
6542     if(channel->join_flooded)
6543     {
6544         /* don't automatically give ops or voice during a join flood */
6545     }
6546     else if(cData->lvlOpts[lvlGiveOps] == 0)
6547         modes |= MODE_CHANOP;
6548     else if(cData->lvlOpts[lvlGiveVoice] == 0)
6549         modes |= MODE_VOICE;
6550
6551     greeting = cData->greeting;
6552     if(user->handle_info)
6553     {
6554         handle = user->handle_info;
6555
6556         if(IsHelper(user) && !IsHelping(user))
6557         {
6558             unsigned int ii;
6559             for(ii = 0; ii < chanserv_conf.support_channels.used; ++ii)
6560             {
6561                 if(channel == chanserv_conf.support_channels.list[ii])
6562                 {
6563                     HANDLE_SET_FLAG(user->handle_info, HELPING);
6564                     break;
6565                 }
6566             }
6567         }
6568
6569         uData = GetTrueChannelAccess(cData, handle);
6570         if(uData && !IsUserSuspended(uData))
6571         {
6572             /* Ops and above were handled by the above case. */
6573             if(IsUserAutoOp(uData))
6574             {
6575                 if(uData->access >= cData->lvlOpts[lvlGiveOps])
6576                     modes |= MODE_CHANOP;
6577                 else if(uData->access >= cData->lvlOpts[lvlGiveVoice])
6578                     modes |= MODE_VOICE;
6579             }
6580             if(uData->access >= UL_PRESENT && !HANDLE_FLAGGED(uData->handle, BOT))
6581                 cData->visited = now;
6582             if(cData->user_greeting)
6583                 greeting = cData->user_greeting;
6584             if(uData->info
6585                && (uData->access >= cData->lvlOpts[lvlUserInfo])
6586                && ((now - uData->seen) >= chanserv_conf.info_delay)
6587                && !uData->present)
6588                 info = 1;
6589             uData->seen = now;
6590             uData->present = 1;
6591         }
6592     }
6593
6594     /* If user joining normally (not during burst), apply op or voice,
6595      * and send greeting/userinfo as appropriate.
6596      */
6597     if(!user->uplink->burst)
6598     {
6599         if(modes)
6600         {
6601             if(modes & MODE_CHANOP)
6602                 modes &= ~MODE_VOICE;
6603             change.args[0].mode = modes;
6604             change.args[0].u.member = mNode;
6605             mod_chanmode_announce(chanserv, channel, &change);
6606         }
6607         if(greeting)
6608             send_message_type(4, user, chanserv, "(%s) %s", channel->name, greeting);
6609         if(uData && info)
6610             send_target_message(5, channel->name, chanserv, "[%s] %s", user->nick, uData->info);
6611     }
6612     return 0;
6613 }
6614
6615 static void
6616 handle_auth(struct userNode *user, UNUSED_ARG(struct handle_info *old_handle))
6617 {
6618     struct mod_chanmode change;
6619     struct userData *channel;
6620     unsigned int ii, jj;
6621
6622     if(!user->handle_info)
6623         return;
6624
6625     mod_chanmode_init(&change);
6626     change.argc = 1;
6627     for(channel = user->handle_info->channels; channel; channel = channel->u_next)
6628     {
6629         struct chanNode *cn;
6630         struct modeNode *mn;
6631         if(IsUserSuspended(channel)
6632            || IsSuspended(channel->channel)
6633            || !(cn = channel->channel->channel))
6634             continue;
6635
6636         mn = GetUserMode(cn, user);
6637         if(!mn)
6638         {
6639             if(!IsUserSuspended(channel)
6640                && IsUserAutoInvite(channel)
6641                && (channel->access >= channel->channel->lvlOpts[lvlInviteMe])
6642                && !self->burst
6643                && !user->uplink->burst)
6644                 irc_invite(chanserv, user, cn);
6645             continue;
6646         }
6647
6648         if(channel->access >= UL_PRESENT && !HANDLE_FLAGGED(channel->handle, BOT))
6649             channel->channel->visited = now;
6650
6651         if(IsUserAutoOp(channel))
6652         {
6653             if(channel->access >= cn->channel_info->lvlOpts[lvlGiveOps])
6654                 change.args[0].mode = MODE_CHANOP;
6655             else if(channel->access >= cn->channel_info->lvlOpts[lvlGiveVoice])
6656                 change.args[0].mode = MODE_VOICE;
6657             else
6658                 change.args[0].mode = 0;
6659             change.args[0].u.member = mn;
6660             if(change.args[0].mode)
6661                 mod_chanmode_announce(chanserv, cn, &change);
6662         }
6663
6664         channel->seen = now;
6665         channel->present = 1;
6666     }
6667
6668     for(ii = 0; ii < user->channels.used; ++ii)
6669     {
6670         struct chanNode *chan = user->channels.list[ii]->channel;
6671         struct banData *ban;
6672
6673         if((user->channels.list[ii]->modes & (MODE_CHANOP|MODE_VOICE))
6674            || !chan->channel_info
6675            || IsSuspended(chan->channel_info))
6676             continue;
6677         for(jj = 0; jj < chan->banlist.used; ++jj)
6678             if(user_matches_glob(user, chan->banlist.list[jj]->ban, MATCH_USENICK))
6679                 break;
6680         if(jj < chan->banlist.used)
6681             continue;
6682         for(ban = chan->channel_info->bans; ban; ban = ban->next)
6683         {
6684             char kick_reason[MAXLEN];
6685             if(!user_matches_glob(user, ban->mask, MATCH_USENICK | MATCH_VISIBLE))
6686                 continue;
6687             change.args[0].mode = MODE_BAN;
6688             change.args[0].u.hostmask = ban->mask;
6689             mod_chanmode_announce(chanserv, chan, &change);
6690             sprintf(kick_reason, "(%s) %s", ban->owner, ban->reason);
6691             KickChannelUser(user, chan, chanserv, kick_reason);
6692             ban->triggered = now;
6693             break;
6694         }
6695     }
6696
6697     if(IsSupportHelper(user))
6698     {
6699         for(ii = 0; ii < chanserv_conf.support_channels.used; ++ii)
6700         {
6701             if(GetUserMode(chanserv_conf.support_channels.list[ii], user))
6702             {
6703                 HANDLE_SET_FLAG(user->handle_info, HELPING);
6704                 break;
6705             }
6706         }
6707     }
6708 }
6709
6710 static void
6711 handle_part(struct modeNode *mn, UNUSED_ARG(const char *reason))
6712 {
6713     struct chanData *cData;
6714     struct userData *uData;
6715
6716     cData = mn->channel->channel_info;
6717     if(!cData || IsSuspended(cData) || IsLocal(mn->user))
6718         return;
6719
6720     if((cData->flags & CHANNEL_DYNAMIC_LIMIT) && !mn->channel->join_flooded)
6721     {
6722         /* Allow for a bit of padding so that the limit doesn't
6723            track the user count exactly, which could get annoying. */
6724         if((mn->channel->limit - mn->channel->members.used) > chanserv_conf.adjust_threshold + 5)
6725         {
6726             timeq_del(0, chanserv_adjust_limit, cData, TIMEQ_IGNORE_WHEN);
6727             timeq_add(now + chanserv_conf.adjust_delay, chanserv_adjust_limit, cData);
6728         }
6729     }
6730
6731     if((uData = GetTrueChannelAccess(cData, mn->user->handle_info)))
6732     {
6733         scan_user_presence(uData, mn->user);
6734         uData->seen = now;
6735         if (uData->access >= UL_PRESENT && !HANDLE_FLAGGED(uData->handle, BOT))
6736             cData->visited = now;
6737     }
6738
6739     if(IsHelping(mn->user) && IsSupportHelper(mn->user))
6740     {
6741         unsigned int ii;
6742         for(ii = 0; ii < chanserv_conf.support_channels.used; ++ii) {
6743             struct chanNode *channel;
6744             struct userNode *exclude;
6745             /* When looking at the channel that is being /part'ed, we
6746              * have to skip over the client that is leaving.  For
6747              * other channels, we must not do that.
6748              */
6749             channel = chanserv_conf.support_channels.list[ii];
6750             exclude = (channel == mn->channel) ? mn->user : NULL;
6751             if(find_handle_in_channel(channel, mn->user->handle_info, exclude))
6752                 break;
6753         }
6754         if(ii == chanserv_conf.support_channels.used)
6755             HANDLE_CLEAR_FLAG(mn->user->handle_info, HELPING);
6756     }
6757 }
6758
6759 static void
6760 handle_kick(struct userNode *kicker, struct userNode *victim, struct chanNode *channel)
6761 {
6762     struct userData *uData;
6763
6764     if(!channel->channel_info || !kicker || IsService(kicker)
6765        || (kicker == victim) || IsSuspended(channel->channel_info)
6766        || (kicker->handle_info && kicker->handle_info == victim->handle_info))
6767         return;
6768
6769     if(protect_user(victim, kicker, channel->channel_info))
6770     {
6771         const char *reason = user_find_message(kicker, "CSMSG_USER_PROTECTED_2");
6772         KickChannelUser(kicker, channel, chanserv, reason);
6773     }
6774
6775     if((uData = GetTrueChannelAccess(channel->channel_info, victim->handle_info)))
6776         uData->seen = now;
6777 }
6778
6779 static int
6780 handle_topic(struct userNode *user, struct chanNode *channel, const char *old_topic)
6781 {
6782     struct chanData *cData;
6783
6784     if(!channel->channel_info || !user || IsSuspended(channel->channel_info) || IsService(user))
6785         return 0;
6786
6787     cData = channel->channel_info;
6788     if(bad_topic(channel, user, channel->topic))
6789     {
6790         send_message(user, chanserv, "CSMSG_TOPIC_LOCKED", channel->name);
6791         if(cData->topic_mask && match_ircglob(old_topic, cData->topic_mask))
6792             SetChannelTopic(channel, chanserv, old_topic, 1);
6793         else if(cData->topic)
6794             SetChannelTopic(channel, chanserv, cData->topic, 1);
6795         return 1;
6796     }
6797     /* With topicsnarf, grab the topic and save it as the default topic. */
6798     if(check_user_level(channel, user, lvlTopicSnarf, 0, 0))
6799     {
6800         free(cData->topic);
6801         cData->topic = strdup(channel->topic);
6802     }
6803     return 0;
6804 }
6805
6806 static void
6807 handle_mode(struct chanNode *channel, struct userNode *user, const struct mod_chanmode *change)
6808 {
6809     struct mod_chanmode *bounce = NULL;
6810     unsigned int bnc, ii;
6811     char deopped = 0;
6812
6813     if(!channel->channel_info || IsLocal(user) || IsSuspended(channel->channel_info) || IsService(user))
6814         return;
6815
6816     if(!check_user_level(channel, user, lvlEnfModes, 1, 0)
6817        && mode_lock_violated(&channel->channel_info->modes, change))
6818     {
6819         char correct[MAXLEN];
6820         bounce = mod_chanmode_dup(&channel->channel_info->modes, change->argc + 1);
6821         mod_chanmode_format(&channel->channel_info->modes, correct);
6822         send_message(user, chanserv, "CSMSG_MODE_LOCKED", correct, channel->name);
6823     }
6824     for(ii = bnc = 0; ii < change->argc; ++ii)
6825     {
6826         if((change->args[ii].mode & (MODE_REMOVE|MODE_CHANOP)) == (MODE_REMOVE|MODE_CHANOP))
6827         {
6828             const struct userNode *victim = change->args[ii].u.member->user;
6829             if(!protect_user(victim, user, channel->channel_info))
6830                 continue;
6831             if(!bounce)
6832                 bounce = mod_chanmode_alloc(change->argc + 1 - ii);
6833             if(!deopped)
6834             {
6835                 bounce->args[bnc].mode = MODE_REMOVE | MODE_CHANOP;
6836                 bounce->args[bnc].u.member = GetUserMode(channel, user);
6837                 if(bounce->args[bnc].u.member)
6838                     bnc++;
6839                 deopped = 1;
6840             }
6841             bounce->args[bnc].mode = MODE_CHANOP;
6842             bounce->args[bnc].u.member = change->args[ii].u.member;
6843             bnc++;
6844             send_message(user, chanserv, "CSMSG_USER_PROTECTED", victim->nick);
6845         }
6846         else if(change->args[ii].mode & MODE_CHANOP)
6847         {
6848             const struct userNode *victim = change->args[ii].u.member->user;
6849             if(IsService(victim) || validate_op(user, channel, (struct userNode*)victim))
6850                 continue;
6851             if(!bounce)
6852                 bounce = mod_chanmode_alloc(change->argc + 1 - ii);
6853             bounce->args[bnc].mode = MODE_REMOVE | MODE_CHANOP;
6854             bounce->args[bnc].u.member = change->args[ii].u.member;
6855             bnc++;
6856         }
6857         else if((change->args[ii].mode & (MODE_REMOVE | MODE_BAN)) == MODE_BAN)
6858         {
6859             const char *ban = change->args[ii].u.hostmask;
6860             if(!bad_channel_ban(channel, user, ban, NULL, NULL))
6861                 continue;
6862             if(!bounce)
6863                 bounce = mod_chanmode_alloc(change->argc + 1 - ii);
6864             bounce->args[bnc].mode = MODE_REMOVE | MODE_BAN;
6865             bounce->args[bnc].u.hostmask = strdup(ban);
6866             bnc++;
6867             send_message(user, chanserv, "CSMSG_MASK_PROTECTED", ban);
6868         }
6869     }
6870     if(bounce)
6871     {
6872         if((bounce->argc = bnc) || bounce->modes_set || bounce->modes_clear)
6873             mod_chanmode_announce(chanserv, channel, bounce);
6874         for(ii = 0; ii < change->argc; ++ii)
6875             if(bounce->args[ii].mode == (MODE_REMOVE | MODE_BAN))
6876                 free((char*)bounce->args[ii].u.hostmask);
6877         mod_chanmode_free(bounce);
6878     }
6879 }
6880
6881 static void
6882 handle_nick_change(struct userNode *user, UNUSED_ARG(const char *old_nick))
6883 {
6884     struct chanNode *channel;
6885     struct banData *bData;
6886     struct mod_chanmode change;
6887     unsigned int ii, jj;
6888     char kick_reason[MAXLEN];
6889
6890     mod_chanmode_init(&change);
6891     change.argc = 1;
6892     change.args[0].mode = MODE_BAN;
6893     for(ii = 0; ii < user->channels.used; ++ii)
6894     {
6895         channel = user->channels.list[ii]->channel;
6896         /* Need not check for bans if they're opped or voiced. */
6897         if(user->channels.list[ii]->modes & (MODE_CHANOP|MODE_VOICE))
6898             continue;
6899         /* Need not check for bans unless channel registration is active. */
6900         if(!channel->channel_info || IsSuspended(channel->channel_info))
6901             continue;
6902         /* Look for a matching ban already on the channel. */
6903         for(jj = 0; jj < channel->banlist.used; ++jj)
6904             if(user_matches_glob(user, channel->banlist.list[jj]->ban, MATCH_USENICK))
6905                 break;
6906         /* Need not act if we found one. */
6907         if(jj < channel->banlist.used)
6908             continue;
6909         /* Look for a matching ban in this channel. */
6910         for(bData = channel->channel_info->bans; bData; bData = bData->next)
6911         {
6912             if(!user_matches_glob(user, bData->mask, MATCH_USENICK | MATCH_VISIBLE))
6913                 continue;
6914             change.args[0].u.hostmask = bData->mask;
6915             mod_chanmode_announce(chanserv, channel, &change);
6916             sprintf(kick_reason, "(%s) %s", bData->owner, bData->reason);
6917             KickChannelUser(user, channel, chanserv, kick_reason);
6918             bData->triggered = now;
6919             break; /* we don't need to check any more bans in the channel */
6920         }
6921     }
6922 }
6923
6924 static void handle_rename(struct handle_info *handle, const char *old_handle)
6925 {
6926     struct do_not_register *dnr = dict_find(handle_dnrs, old_handle, NULL);
6927
6928     if(dnr)
6929     {
6930         dict_remove2(handle_dnrs, old_handle, 1);
6931         safestrncpy(dnr->chan_name + 1, handle->handle, sizeof(dnr->chan_name) - 1);
6932         dict_insert(handle_dnrs, dnr->chan_name + 1, dnr);
6933     }
6934 }
6935
6936 static void
6937 handle_unreg(UNUSED_ARG(struct userNode *user), struct handle_info *handle)
6938 {
6939     struct userNode *h_user;
6940
6941     if(handle->channels)
6942     {
6943         for(h_user = handle->users; h_user; h_user = h_user->next_authed)
6944             send_message(h_user, chanserv, "CSMSG_HANDLE_UNREGISTERED");
6945
6946         while(handle->channels)
6947             del_channel_user(handle->channels, 1);
6948     }
6949 }
6950
6951 static void
6952 handle_server_link(UNUSED_ARG(struct server *server))
6953 {
6954     struct chanData *cData;
6955
6956     for(cData = channelList; cData; cData = cData->next)
6957     {
6958         if(!IsSuspended(cData))
6959             cData->may_opchan = 1;
6960         if((cData->flags & CHANNEL_DYNAMIC_LIMIT)
6961            && !cData->channel->join_flooded
6962            && ((cData->channel->limit - cData->channel->members.used)
6963                < chanserv_conf.adjust_threshold))
6964         {
6965             timeq_del(0, chanserv_adjust_limit, cData, TIMEQ_IGNORE_WHEN);
6966             timeq_add(now + chanserv_conf.adjust_delay, chanserv_adjust_limit, cData);
6967         }
6968     }
6969 }
6970
6971 static void
6972 chanserv_conf_read(void)
6973 {
6974     dict_t conf_node;
6975     const char *str;
6976     char mode_line[MAXLEN], *modes[MAXNUMPARAMS];
6977     struct mod_chanmode *change;
6978     struct string_list *strlist;
6979     struct chanNode *chan;
6980     unsigned int ii;
6981
6982     if(!(conf_node = conf_get_data(CHANSERV_CONF_NAME, RECDB_OBJECT)))
6983     {
6984         log_module(CS_LOG, LOG_ERROR, "Invalid config node `%s'.", CHANSERV_CONF_NAME);
6985         return;
6986     }
6987     for(ii = 0; ii < chanserv_conf.support_channels.used; ++ii)
6988         UnlockChannel(chanserv_conf.support_channels.list[ii]);
6989     chanserv_conf.support_channels.used = 0;
6990     if((strlist = database_get_data(conf_node, KEY_SUPPORT_CHANNEL, RECDB_STRING_LIST)))
6991     {
6992         for(ii = 0; ii < strlist->used; ++ii)
6993         {
6994             const char *str2 = database_get_data(conf_node, KEY_SUPPORT_CHANNEL_MODES, RECDB_QSTRING);
6995             if(!str2)
6996                 str2 = "+nt";
6997             chan = AddChannel(strlist->list[ii], now, str2, NULL);
6998             LockChannel(chan);
6999             channelList_append(&chanserv_conf.support_channels, chan);
7000         }
7001     }
7002     else if((str = database_get_data(conf_node, KEY_SUPPORT_CHANNEL, RECDB_QSTRING)))
7003     {
7004         const char *str2;
7005         str2 = database_get_data(conf_node, KEY_SUPPORT_CHANNEL_MODES, RECDB_QSTRING);
7006         if(!str2)
7007             str2 = "+nt";
7008         chan = AddChannel(str, now, str2, NULL);
7009         LockChannel(chan);
7010         channelList_append(&chanserv_conf.support_channels, chan);
7011     }
7012     str = database_get_data(conf_node, KEY_DB_BACKUP_FREQ, RECDB_QSTRING);
7013     chanserv_conf.db_backup_frequency = str ? ParseInterval(str) : 7200;
7014     str = database_get_data(conf_node, KEY_INFO_DELAY, RECDB_QSTRING);
7015     chanserv_conf.info_delay = str ? ParseInterval(str) : 180;
7016     str = database_get_data(conf_node, KEY_MAX_GREETLEN, RECDB_QSTRING);
7017     chanserv_conf.greeting_length = str ? atoi(str) : 200;
7018     str = database_get_data(conf_node, KEY_ADJUST_THRESHOLD, RECDB_QSTRING);
7019     chanserv_conf.adjust_threshold = str ? atoi(str) : 15;
7020     str = database_get_data(conf_node, KEY_ADJUST_DELAY, RECDB_QSTRING);
7021     chanserv_conf.adjust_delay = str ? ParseInterval(str) : 30;
7022     str = database_get_data(conf_node, KEY_CHAN_EXPIRE_FREQ, RECDB_QSTRING);
7023     chanserv_conf.channel_expire_frequency = str ? ParseInterval(str) : 86400;
7024     str = database_get_data(conf_node, KEY_CHAN_EXPIRE_DELAY, RECDB_QSTRING);
7025     chanserv_conf.channel_expire_delay = str ? ParseInterval(str) : 86400*30;
7026     str = database_get_data(conf_node, KEY_DNR_EXPIRE_FREQ, RECDB_QSTRING);
7027     chanserv_conf.dnr_expire_frequency = str ? ParseInterval(str) : 3600;
7028     str = database_get_data(conf_node, KEY_NODELETE_LEVEL, RECDB_QSTRING);
7029     chanserv_conf.nodelete_level = str ? atoi(str) : 1;
7030     str = database_get_data(conf_node, KEY_MAX_CHAN_USERS, RECDB_QSTRING);
7031     chanserv_conf.max_chan_users = str ? atoi(str) : 512;
7032     str = database_get_data(conf_node, KEY_MAX_CHAN_BANS, RECDB_QSTRING);
7033     chanserv_conf.max_chan_bans = str ? atoi(str) : 512;
7034     str = database_get_data(conf_node, KEY_MAX_USERINFO_LENGTH, RECDB_QSTRING);
7035     chanserv_conf.max_userinfo_length = str ? atoi(str) : 400;
7036     str = database_get_data(conf_node, KEY_NICK, RECDB_QSTRING);
7037     if(chanserv && str)
7038         NickChange(chanserv, str, 0);
7039     str = database_get_data(conf_node, KEY_REFRESH_PERIOD, RECDB_QSTRING);
7040     chanserv_conf.refresh_period = str ? ParseInterval(str) : 3*60*60;
7041     str = database_get_data(conf_node, KEY_GIVEOWNERSHIP_PERIOD, RECDB_QSTRING);
7042     chanserv_conf.giveownership_period = str ? ParseInterval(str) : 0;
7043     str = database_get_data(conf_node, KEY_CTCP_SHORT_BAN_DURATION, RECDB_QSTRING);
7044     chanserv_conf.ctcp_short_ban_duration = str ? str : "3m";
7045     str = database_get_data(conf_node, KEY_CTCP_LONG_BAN_DURATION, RECDB_QSTRING);
7046     chanserv_conf.ctcp_long_ban_duration = str ? str : "1h";
7047     str = database_get_data(conf_node, KEY_MAX_OWNED, RECDB_QSTRING);
7048     chanserv_conf.max_owned = str ? atoi(str) : 5;
7049     str = database_get_data(conf_node, KEY_IRC_OPERATOR_EPITHET, RECDB_QSTRING);
7050     chanserv_conf.irc_operator_epithet = str ? str : "a megalomaniacal power hungry tyrant";
7051     str = database_get_data(conf_node, KEY_NETWORK_HELPER_EPITHET, RECDB_QSTRING);
7052     chanserv_conf.network_helper_epithet = str ? str : "a wannabe tyrant";
7053     str = database_get_data(conf_node, KEY_SUPPORT_HELPER_EPITHET, RECDB_QSTRING);
7054     chanserv_conf.support_helper_epithet = str ? str : "a wannabe tyrant";
7055     str = database_get_data(conf_node, "default_modes", RECDB_QSTRING);
7056     if(!str)
7057         str = "+nt";
7058     safestrncpy(mode_line, str, sizeof(mode_line));
7059     ii = split_line(mode_line, 0, ArrayLength(modes), modes);
7060     if((change = mod_chanmode_parse(NULL, modes, ii, MCP_KEY_FREE, 0))
7061        && (change->argc < 2))
7062     {
7063         chanserv_conf.default_modes = *change;
7064         mod_chanmode_free(change);
7065     }
7066     free_string_list(chanserv_conf.set_shows);
7067     strlist = database_get_data(conf_node, "set_shows", RECDB_STRING_LIST);
7068     if(strlist)
7069         strlist = string_list_copy(strlist);
7070     else
7071     {
7072         static const char *list[] = {
7073             /* free form text */
7074             "DefaultTopic", "TopicMask", "Greeting", "UserGreeting", "Modes",
7075             /* options based on user level */
7076             "PubCmd", "InviteMe", "UserInfo", "GiveVoice", "GiveOps", "EnfOps",
7077             "EnfModes", "EnfTopic", "TopicSnarf", "Setters", "CtcpUsers",
7078             /* multiple choice options */
7079             "CtcpReaction", "Protect", "Toys", "TopicRefresh",
7080             /* binary options */
7081             "DynLimit", "NoDelete",
7082             /* delimiter */
7083             NULL
7084         };
7085         strlist = alloc_string_list(ArrayLength(list)-1);
7086         for(ii=0; list[ii]; ii++)
7087             string_list_append(strlist, strdup(list[ii]));
7088     }
7089     chanserv_conf.set_shows = strlist;
7090     /* We don't look things up now, in case the list refers to options
7091      * defined by modules initialized after this point.  Just mark the
7092      * function list as invalid, so it will be initialized.
7093      */
7094     set_shows_list.used = 0;
7095     free_string_list(chanserv_conf.eightball);
7096     strlist = database_get_data(conf_node, KEY_8BALL_RESPONSES, RECDB_STRING_LIST);
7097     if(strlist)
7098     {
7099         strlist = string_list_copy(strlist);
7100     }
7101     else
7102     {
7103         strlist = alloc_string_list(4);
7104         string_list_append(strlist, strdup("Yes."));
7105         string_list_append(strlist, strdup("No."));
7106         string_list_append(strlist, strdup("Maybe so."));
7107     }
7108     chanserv_conf.eightball = strlist;
7109     free_string_list(chanserv_conf.old_ban_names);
7110     strlist = database_get_data(conf_node, KEY_OLD_BAN_NAMES, RECDB_STRING_LIST);
7111     if(strlist)
7112         strlist = string_list_copy(strlist);
7113     else
7114         strlist = alloc_string_list(2);
7115     chanserv_conf.old_ban_names = strlist;
7116     str = database_get_data(conf_node, "off_channel", RECDB_QSTRING);
7117     off_channel = str ? atoi(str) : 0;
7118 }
7119
7120 static void
7121 chanserv_note_type_read(const char *key, struct record_data *rd)
7122 {
7123     dict_t obj;
7124     struct note_type *ntype;
7125     const char *str;
7126
7127     if(!(obj = GET_RECORD_OBJECT(rd)))
7128     {
7129         log_module(CS_LOG, LOG_ERROR, "Invalid note type %s.", key);
7130         return;
7131     }
7132     if(!(ntype = chanserv_create_note_type(key)))
7133     {
7134         log_module(CS_LOG, LOG_ERROR, "Memory allocation failed for note %s.", key);
7135         return;
7136     }
7137
7138     /* Figure out set access */
7139     if((str = database_get_data(obj, KEY_NOTE_OPSERV_ACCESS, RECDB_QSTRING)))
7140     {
7141         ntype->set_access_type = NOTE_SET_PRIVILEGED;
7142         ntype->set_access.min_opserv = strtoul(str, NULL, 0);
7143     }
7144     else if((str = database_get_data(obj, KEY_NOTE_CHANNEL_ACCESS, RECDB_QSTRING)))
7145     {
7146         ntype->set_access_type = NOTE_SET_CHANNEL_ACCESS;
7147         ntype->set_access.min_ulevel = strtoul(str, NULL, 0);
7148     }
7149     else if((str = database_get_data(obj, KEY_NOTE_SETTER_ACCESS, RECDB_QSTRING)))
7150     {
7151         ntype->set_access_type = NOTE_SET_CHANNEL_SETTER;
7152     }
7153     else
7154     {
7155         log_module(CS_LOG, LOG_ERROR, "Could not find access type for note %s; defaulting to OpServ access level 0.", key);
7156         ntype->set_access_type = NOTE_SET_PRIVILEGED;
7157         ntype->set_access.min_opserv = 0;
7158     }
7159
7160     /* Figure out visibility */
7161     if(!(str = database_get_data(obj, KEY_NOTE_VISIBILITY, RECDB_QSTRING)))
7162         ntype->visible_type = NOTE_VIS_PRIVILEGED;
7163     else if(!irccasecmp(str, KEY_NOTE_VIS_PRIVILEGED))
7164         ntype->visible_type = NOTE_VIS_PRIVILEGED;
7165     else if(!irccasecmp(str, KEY_NOTE_VIS_CHANNEL_USERS))
7166         ntype->visible_type = NOTE_VIS_CHANNEL_USERS;
7167     else if(!irccasecmp(str, KEY_NOTE_VIS_ALL))
7168         ntype->visible_type = NOTE_VIS_ALL;
7169     else
7170         ntype->visible_type = NOTE_VIS_PRIVILEGED;
7171
7172     str = database_get_data(obj, KEY_NOTE_MAX_LENGTH, RECDB_QSTRING);
7173     ntype->max_length = str ? strtoul(str, NULL, 0) : 400;
7174 }
7175
7176 static void
7177 user_read_helper(const char *key, struct record_data *rd, struct chanData *chan)
7178 {
7179     struct handle_info *handle;
7180     struct userData *uData;
7181     char *seen, *inf, *flags;
7182     unsigned long last_seen;
7183     unsigned short access_level;
7184
7185     if(rd->type != RECDB_OBJECT || !dict_size(rd->d.object))
7186     {
7187         log_module(CS_LOG, LOG_ERROR, "Invalid user in %s.", chan->channel->name);
7188         return;
7189     }
7190
7191     access_level = atoi(database_get_data(rd->d.object, KEY_LEVEL, RECDB_QSTRING));
7192     if(access_level > UL_OWNER)
7193     {
7194         log_module(CS_LOG, LOG_ERROR, "Invalid access level for %s in %s.", key, chan->channel->name);
7195         return;
7196     }
7197
7198     inf = database_get_data(rd->d.object, KEY_INFO, RECDB_QSTRING);
7199     seen = database_get_data(rd->d.object, KEY_SEEN, RECDB_QSTRING);
7200     last_seen = seen ? strtoul(seen, NULL, 0) : now;
7201     flags = database_get_data(rd->d.object, KEY_FLAGS, RECDB_QSTRING);
7202     handle = get_handle_info(key);
7203     if(!handle)
7204     {
7205         log_module(CS_LOG, LOG_ERROR, "Nonexistent account %s in %s.", key, chan->channel->name);
7206         return;
7207     }
7208
7209     uData = add_channel_user(chan, handle, access_level, last_seen, inf);
7210     uData->flags = flags ? strtoul(flags, NULL, 0) : 0;
7211 }
7212
7213 static void
7214 ban_read_helper(const char *key, struct record_data *rd, struct chanData *chan)
7215 {
7216     struct banData *bData;
7217     char *set, *triggered, *s_duration, *s_expires, *reason, *owner;
7218     unsigned long set_time, triggered_time, expires_time;
7219
7220     if(rd->type != RECDB_OBJECT || !dict_size(rd->d.object))
7221     {
7222         log_module(CS_LOG, LOG_ERROR, "Invalid ban in %s.", chan->channel->name);
7223         return;
7224     }
7225
7226     set = database_get_data(rd->d.object, KEY_SET, RECDB_QSTRING);
7227     triggered = database_get_data(rd->d.object, KEY_TRIGGERED, RECDB_QSTRING);
7228     s_duration = database_get_data(rd->d.object, KEY_DURATION, RECDB_QSTRING);
7229     s_expires = database_get_data(rd->d.object, KEY_EXPIRES, RECDB_QSTRING);
7230     owner = database_get_data(rd->d.object, KEY_OWNER, RECDB_QSTRING);
7231     reason = database_get_data(rd->d.object, KEY_REASON, RECDB_QSTRING);
7232     if (!reason || !owner)
7233         return;
7234
7235     set_time = set ? strtoul(set, NULL, 0) : now;
7236     triggered_time = triggered ? strtoul(triggered, NULL, 0) : 0;
7237     if(s_expires)
7238         expires_time = strtoul(s_expires, NULL, 0);
7239     else if(s_duration)
7240         expires_time = set_time + atoi(s_duration);
7241     else
7242         expires_time = 0;
7243
7244     if(!reason || (expires_time && (expires_time < now)))
7245         return;
7246
7247     bData = add_channel_ban(chan, key, owner, set_time, triggered_time, expires_time, reason);
7248 }
7249
7250 static struct suspended *
7251 chanserv_read_suspended(dict_t obj)
7252 {
7253     struct suspended *suspended = calloc(1, sizeof(*suspended));
7254     char *str;
7255     dict_t previous;
7256
7257     str = database_get_data(obj, KEY_EXPIRES, RECDB_QSTRING);
7258     suspended->expires = str ? strtoul(str, NULL, 0) : 0;
7259     str = database_get_data(obj, KEY_REVOKED, RECDB_QSTRING);
7260     suspended->revoked = str ? strtoul(str, NULL, 0) : 0;
7261     str = database_get_data(obj, KEY_ISSUED, RECDB_QSTRING);
7262     suspended->issued = str ? strtoul(str, NULL, 0) : 0;
7263     suspended->suspender = strdup(database_get_data(obj, KEY_SUSPENDER, RECDB_QSTRING));
7264     suspended->reason = strdup(database_get_data(obj, KEY_REASON, RECDB_QSTRING));
7265     previous = database_get_data(obj, KEY_PREVIOUS, RECDB_OBJECT);
7266     suspended->previous = previous ? chanserv_read_suspended(previous) : NULL;
7267     return suspended;
7268 }
7269
7270 static int
7271 chanserv_channel_read(const char *key, struct record_data *hir)
7272 {
7273     struct suspended *suspended;
7274     struct mod_chanmode *modes;
7275     struct chanNode *cNode;
7276     struct chanData *cData;
7277     struct dict *channel, *obj;
7278     char *str, *argv[10];
7279     dict_iterator_t it;
7280     unsigned int argc;
7281
7282     channel = hir->d.object;
7283
7284     str = database_get_data(channel, KEY_REGISTRAR, RECDB_QSTRING);
7285     if(!str)
7286         str = "<unknown>";
7287     cNode = AddChannel(key, now, NULL, NULL);
7288     if(!cNode)
7289     {
7290         log_module(CS_LOG, LOG_ERROR, "Unable to create registered channel %s.", key);
7291         return 0;
7292     }
7293     cData = register_channel(cNode, str);
7294     if(!cData)
7295     {
7296         log_module(CS_LOG, LOG_ERROR, "Unable to register channel %s from database.", key);
7297         return 0;
7298     }
7299
7300     if((obj = database_get_data(channel, KEY_OPTIONS, RECDB_OBJECT)))
7301     {
7302         enum levelOption lvlOpt;
7303         enum charOption chOpt;
7304
7305         if((str = database_get_data(obj, KEY_FLAGS, RECDB_QSTRING)))
7306             cData->flags = atoi(str);
7307
7308         for(lvlOpt = 0; lvlOpt < NUM_LEVEL_OPTIONS; ++lvlOpt)
7309         {
7310             str = database_get_data(obj, levelOptions[lvlOpt].db_name, RECDB_QSTRING);
7311             if(str)
7312                 cData->lvlOpts[lvlOpt] = user_level_from_name(str, UL_OWNER+1);
7313             else if(levelOptions[lvlOpt].old_flag)
7314             {
7315                 if(cData->flags & levelOptions[lvlOpt].old_flag)
7316                     cData->lvlOpts[lvlOpt] = levelOptions[lvlOpt].flag_value;
7317                 else
7318                     cData->lvlOpts[lvlOpt] = levelOptions[lvlOpt].default_value;
7319             }
7320         }
7321
7322         for(chOpt = 0; chOpt < NUM_CHAR_OPTIONS; ++chOpt)
7323         {
7324             if(!(str = database_get_data(obj, charOptions[chOpt].db_name, RECDB_QSTRING)))
7325                 continue;
7326             cData->chOpts[chOpt] = str[0];
7327         }
7328     }
7329     else if((str = database_get_data(channel, KEY_FLAGS, RECDB_QSTRING)))
7330     {
7331         enum levelOption lvlOpt;
7332         enum charOption chOpt;
7333         unsigned int count;
7334
7335         cData->flags = base64toint(str, 5);
7336         count = strlen(str += 5);
7337         for(lvlOpt = 0; lvlOpt < NUM_LEVEL_OPTIONS; ++lvlOpt)
7338         {
7339             unsigned short lvl;
7340             if(levelOptions[lvlOpt].old_flag)
7341             {
7342                 if(cData->flags & levelOptions[lvlOpt].old_flag)
7343                     lvl = levelOptions[lvlOpt].flag_value;
7344                 else
7345                     lvl = levelOptions[lvlOpt].default_value;
7346             }
7347             else switch(((count <= levelOptions[lvlOpt].old_idx) ? str : CHANNEL_DEFAULT_OPTIONS)[levelOptions[lvlOpt].old_idx])
7348             {
7349             case 'c': lvl = UL_COOWNER; break;
7350             case 'm': lvl = UL_MASTER; break;
7351             case 'n': lvl = UL_OWNER+1; break;
7352             case 'o': lvl = UL_OP; break;
7353             case 'p': lvl = UL_PEON; break;
7354             case 'w': lvl = UL_OWNER; break;
7355             default: lvl = 0; break;
7356             }
7357             cData->lvlOpts[lvlOpt] = lvl;
7358         }
7359         for(chOpt = 0; chOpt < NUM_CHAR_OPTIONS; ++chOpt)
7360             cData->chOpts[chOpt] = ((count <= charOptions[chOpt].old_idx) ? str : CHANNEL_DEFAULT_OPTIONS)[charOptions[chOpt].old_idx];
7361     }
7362
7363     if((obj = database_get_data(hir->d.object, KEY_SUSPENDED, RECDB_OBJECT)))
7364     {
7365         suspended = chanserv_read_suspended(obj);
7366         cData->suspended = suspended;
7367         suspended->cData = cData;
7368         /* We could use suspended->expires and suspended->revoked to
7369          * set the CHANNEL_SUSPENDED flag, but we don't. */
7370     }
7371     else if(IsSuspended(cData) && (str = database_get_data(hir->d.object, KEY_SUSPENDER, RECDB_QSTRING)))
7372     {
7373         suspended = calloc(1, sizeof(*suspended));
7374         suspended->issued = 0;
7375         suspended->revoked = 0;
7376         suspended->suspender = strdup(str);
7377         str = database_get_data(hir->d.object, KEY_SUSPEND_EXPIRES, RECDB_QSTRING);
7378         suspended->expires = str ? atoi(str) : 0;
7379         str = database_get_data(hir->d.object, KEY_SUSPEND_REASON, RECDB_QSTRING);
7380         suspended->reason = strdup(str ? str : "No reason");
7381         suspended->previous = NULL;
7382         cData->suspended = suspended;
7383         suspended->cData = cData;
7384     }
7385     else
7386     {
7387         cData->flags &= ~CHANNEL_SUSPENDED;
7388         suspended = NULL; /* to squelch a warning */
7389     }
7390
7391     if(IsSuspended(cData)) {
7392         if(suspended->expires > now)
7393             timeq_add(suspended->expires, chanserv_expire_suspension, suspended);
7394         else if(suspended->expires)
7395             cData->flags &= ~CHANNEL_SUSPENDED;
7396     }
7397
7398     if((!off_channel || !IsOffChannel(cData)) && !IsSuspended(cData)) {
7399         struct mod_chanmode change;
7400         mod_chanmode_init(&change);
7401         change.argc = 1;
7402         change.args[0].mode = MODE_CHANOP;
7403         change.args[0].u.member = AddChannelUser(chanserv, cNode);
7404         mod_chanmode_announce(chanserv, cNode, &change);
7405     }
7406
7407     str = database_get_data(channel, KEY_REGISTERED, RECDB_QSTRING);
7408     cData->registered = str ? strtoul(str, NULL, 0) : now;
7409     str = database_get_data(channel, KEY_VISITED, RECDB_QSTRING);
7410     cData->visited = str ? strtoul(str, NULL, 0) : now;
7411     str = database_get_data(channel, KEY_OWNER_TRANSFER, RECDB_QSTRING);
7412     cData->ownerTransfer = str ? strtoul(str, NULL, 0) : 0;
7413     str = database_get_data(channel, KEY_MAX, RECDB_QSTRING);
7414     cData->max = str ? atoi(str) : 0;
7415     str = database_get_data(channel, KEY_GREETING, RECDB_QSTRING);
7416     cData->greeting = str ? strdup(str) : NULL;
7417     str = database_get_data(channel, KEY_USER_GREETING, RECDB_QSTRING);
7418     cData->user_greeting = str ? strdup(str) : NULL;
7419     str = database_get_data(channel, KEY_TOPIC_MASK, RECDB_QSTRING);
7420     cData->topic_mask = str ? strdup(str) : NULL;
7421     str = database_get_data(channel, KEY_TOPIC, RECDB_QSTRING);
7422     cData->topic = str ? strdup(str) : NULL;
7423
7424     if(!IsSuspended(cData)
7425        && (str = database_get_data(channel, KEY_MODES, RECDB_QSTRING))
7426        && (argc = split_line(str, 0, ArrayLength(argv), argv))
7427        && (modes = mod_chanmode_parse(cNode, argv, argc, MCP_KEY_FREE, 0))) {
7428         cData->modes = *modes;
7429         if(off_channel > 0)
7430           cData->modes.modes_set |= MODE_REGISTERED;
7431         if(cData->modes.argc > 1)
7432             cData->modes.argc = 1;
7433         mod_chanmode_announce(chanserv, cNode, &cData->modes);
7434         mod_chanmode_free(modes);
7435     }
7436
7437     obj = database_get_data(channel, KEY_USERS, RECDB_OBJECT);
7438     for(it = dict_first(obj); it; it = iter_next(it))
7439         user_read_helper(iter_key(it), iter_data(it), cData);
7440
7441     if(!cData->users && !IsProtected(cData))
7442     {
7443         log_module(CS_LOG, LOG_ERROR, "Channel %s had no users in database, unregistering it.", key);
7444         unregister_channel(cData, "has empty user list.");
7445         return 0;
7446     }
7447
7448     obj = database_get_data(channel, KEY_BANS, RECDB_OBJECT);
7449     for(it = dict_first(obj); it; it = iter_next(it))
7450         ban_read_helper(iter_key(it), iter_data(it), cData);
7451
7452     obj = database_get_data(channel, KEY_NOTES, RECDB_OBJECT);
7453     for(it = dict_first(obj); it; it = iter_next(it))
7454     {
7455         struct note_type *ntype = dict_find(note_types, iter_key(it), NULL);
7456         struct record_data *rd = iter_data(it);
7457         const char *note, *setter;
7458
7459         if(rd->type != RECDB_OBJECT)
7460         {
7461             log_module(CS_LOG, LOG_ERROR, "Bad record type for note %s in channel %s.", iter_key(it), key);
7462         }
7463         else if(!ntype)
7464         {
7465             log_module(CS_LOG, LOG_ERROR, "Bad note type name %s in channel %s.", iter_key(it), key);
7466         }
7467         else if(!(note = database_get_data(rd->d.object, KEY_NOTE_NOTE, RECDB_QSTRING)))
7468         {
7469             log_module(CS_LOG, LOG_ERROR, "Missing note text for note %s in channel %s.", iter_key(it), key);
7470         }
7471         else
7472         {
7473             setter = database_get_data(rd->d.object, KEY_NOTE_SETTER, RECDB_QSTRING);
7474             if(!setter) setter = "<unknown>";
7475             chanserv_add_channel_note(cData, ntype, setter, note);
7476         }
7477     }
7478
7479     return 0;
7480 }
7481
7482 static void
7483 chanserv_dnr_read(const char *key, struct record_data *hir)
7484 {
7485     const char *setter, *reason, *str;
7486     struct do_not_register *dnr;
7487     unsigned long expiry;
7488
7489     setter = database_get_data(hir->d.object, KEY_DNR_SETTER, RECDB_QSTRING);
7490     if(!setter)
7491     {
7492         log_module(CS_LOG, LOG_ERROR, "Missing setter for DNR %s.", key);
7493         return;
7494     }
7495     reason = database_get_data(hir->d.object, KEY_DNR_REASON, RECDB_QSTRING);
7496     if(!reason)
7497     {
7498         log_module(CS_LOG, LOG_ERROR, "Missing reason for DNR %s.", key);
7499         return;
7500     }
7501     str = database_get_data(hir->d.object, KEY_EXPIRES, RECDB_QSTRING);
7502     expiry = str ? strtoul(str, NULL, 0) : 0;
7503     if(expiry && expiry <= now)
7504         return;
7505     dnr = chanserv_add_dnr(key, setter, expiry, reason);
7506     if(!dnr)
7507         return;
7508     str = database_get_data(hir->d.object, KEY_DNR_SET, RECDB_QSTRING);
7509     if(str)
7510         dnr->set = atoi(str);
7511     else
7512         dnr->set = 0;
7513 }
7514
7515 static int
7516 chanserv_saxdb_read(struct dict *database)
7517 {
7518     struct dict *section;
7519     dict_iterator_t it;
7520
7521     if((section = database_get_data(database, KEY_NOTE_TYPES, RECDB_OBJECT)))
7522         for(it = dict_first(section); it; it = iter_next(it))
7523             chanserv_note_type_read(iter_key(it), iter_data(it));
7524
7525     if((section = database_get_data(database, KEY_CHANNELS, RECDB_OBJECT)))
7526         for(it = dict_first(section); it; it = iter_next(it))
7527             chanserv_channel_read(iter_key(it), iter_data(it));
7528
7529     if((section = database_get_data(database, KEY_DNR, RECDB_OBJECT)))
7530         for(it = dict_first(section); it; it = iter_next(it))
7531             chanserv_dnr_read(iter_key(it), iter_data(it));
7532
7533     return 0;
7534 }
7535
7536 static int
7537 chanserv_write_users(struct saxdb_context *ctx, struct userData *uData)
7538 {
7539     int high_present = 0;
7540     saxdb_start_record(ctx, KEY_USERS, 1);
7541     for(; uData; uData = uData->next)
7542     {
7543         if((uData->access >= UL_PRESENT) && uData->present && !HANDLE_FLAGGED(uData->handle, BOT))
7544             high_present = 1;
7545         saxdb_start_record(ctx, uData->handle->handle, 0);
7546         saxdb_write_int(ctx, KEY_LEVEL, uData->access);
7547         saxdb_write_int(ctx, KEY_SEEN, uData->seen);
7548         if(uData->flags)
7549             saxdb_write_int(ctx, KEY_FLAGS, uData->flags);
7550         if(uData->info)
7551             saxdb_write_string(ctx, KEY_INFO, uData->info);
7552         saxdb_end_record(ctx);
7553     }
7554     saxdb_end_record(ctx);
7555     return high_present;
7556 }
7557
7558 static void
7559 chanserv_write_bans(struct saxdb_context *ctx, struct banData *bData)
7560 {
7561     if(!bData)
7562         return;
7563     saxdb_start_record(ctx, KEY_BANS, 1);
7564     for(; bData; bData = bData->next)
7565     {
7566         saxdb_start_record(ctx, bData->mask, 0);
7567         saxdb_write_int(ctx, KEY_SET, bData->set);
7568         if(bData->triggered)
7569             saxdb_write_int(ctx, KEY_TRIGGERED, bData->triggered);
7570         if(bData->expires)
7571             saxdb_write_int(ctx, KEY_EXPIRES, bData->expires);
7572         if(bData->owner[0])
7573             saxdb_write_string(ctx, KEY_OWNER, bData->owner);
7574         if(bData->reason)
7575             saxdb_write_string(ctx, KEY_REASON, bData->reason);
7576         saxdb_end_record(ctx);
7577     }
7578     saxdb_end_record(ctx);
7579 }
7580
7581 static void
7582 chanserv_write_suspended(struct saxdb_context *ctx, const char *name, struct suspended *susp)
7583 {
7584     saxdb_start_record(ctx, name, 0);
7585     saxdb_write_string(ctx, KEY_SUSPENDER, susp->suspender);
7586     saxdb_write_string(ctx, KEY_REASON, susp->reason);
7587     if(susp->issued)
7588         saxdb_write_int(ctx, KEY_ISSUED, susp->issued);
7589     if(susp->expires)
7590         saxdb_write_int(ctx, KEY_EXPIRES, susp->expires);
7591     if(susp->revoked)
7592         saxdb_write_int(ctx, KEY_REVOKED, susp->revoked);
7593     if(susp->previous)
7594         chanserv_write_suspended(ctx, KEY_PREVIOUS, susp->previous);
7595     saxdb_end_record(ctx);
7596 }
7597
7598 static void
7599 chanserv_write_channel(struct saxdb_context *ctx, struct chanData *channel)
7600 {
7601     char buf[MAXLEN];
7602     int high_present;
7603     enum levelOption lvlOpt;
7604     enum charOption chOpt;
7605
7606     saxdb_start_record(ctx, channel->channel->name, 1);
7607
7608     saxdb_write_int(ctx, KEY_REGISTERED, channel->registered);
7609     saxdb_write_int(ctx, KEY_MAX, channel->max);
7610     if(channel->topic)
7611         saxdb_write_string(ctx, KEY_TOPIC, channel->topic);
7612     if(channel->registrar)
7613         saxdb_write_string(ctx, KEY_REGISTRAR, channel->registrar);
7614     if(channel->greeting)
7615         saxdb_write_string(ctx, KEY_GREETING, channel->greeting);
7616     if(channel->user_greeting)
7617         saxdb_write_string(ctx, KEY_USER_GREETING, channel->user_greeting);
7618     if(channel->topic_mask)
7619         saxdb_write_string(ctx, KEY_TOPIC_MASK, channel->topic_mask);
7620     if(channel->suspended)
7621         chanserv_write_suspended(ctx, "suspended", channel->suspended);
7622
7623     saxdb_start_record(ctx, KEY_OPTIONS, 0);
7624     saxdb_write_int(ctx, KEY_FLAGS, channel->flags);
7625     for(lvlOpt = 0; lvlOpt < NUM_LEVEL_OPTIONS; ++lvlOpt)
7626         saxdb_write_int(ctx, levelOptions[lvlOpt].db_name, channel->lvlOpts[lvlOpt]);
7627     for(chOpt = 0; chOpt < NUM_CHAR_OPTIONS; ++chOpt)
7628     {
7629         buf[0] = channel->chOpts[chOpt];
7630         buf[1] = '\0';
7631         saxdb_write_string(ctx, charOptions[chOpt].db_name, buf);
7632     }
7633     saxdb_end_record(ctx);
7634
7635     if(channel->modes.modes_set || channel->modes.modes_clear)
7636     {
7637         mod_chanmode_format(&channel->modes, buf);
7638         saxdb_write_string(ctx, KEY_MODES, buf);
7639     }
7640
7641     high_present = chanserv_write_users(ctx, channel->users);
7642     chanserv_write_bans(ctx, channel->bans);
7643
7644     if(dict_size(channel->notes))
7645     {
7646         dict_iterator_t it;
7647
7648         saxdb_start_record(ctx, KEY_NOTES, 1);
7649         for(it = dict_first(channel->notes); it; it = iter_next(it))
7650         {
7651             struct note *note = iter_data(it);
7652             saxdb_start_record(ctx, iter_key(it), 0);
7653             saxdb_write_string(ctx, KEY_NOTE_SETTER, note->setter);
7654             saxdb_write_string(ctx, KEY_NOTE_NOTE, note->note);
7655             saxdb_end_record(ctx);
7656         }
7657         saxdb_end_record(ctx);
7658     }
7659
7660     if(channel->ownerTransfer)
7661         saxdb_write_int(ctx, KEY_OWNER_TRANSFER, channel->ownerTransfer);
7662     saxdb_write_int(ctx, KEY_VISITED, high_present ? now : channel->visited);
7663     saxdb_end_record(ctx);
7664 }
7665
7666 static void
7667 chanserv_write_note_type(struct saxdb_context *ctx, struct note_type *ntype)
7668 {
7669     const char *str;
7670
7671     saxdb_start_record(ctx, ntype->name, 0);
7672     switch(ntype->set_access_type)
7673     {
7674     case NOTE_SET_CHANNEL_ACCESS:
7675         saxdb_write_int(ctx, KEY_NOTE_CHANNEL_ACCESS, ntype->set_access.min_ulevel);
7676         break;
7677     case NOTE_SET_CHANNEL_SETTER:
7678         saxdb_write_int(ctx, KEY_NOTE_SETTER_ACCESS, 1);
7679         break;
7680     case NOTE_SET_PRIVILEGED: default:
7681         saxdb_write_int(ctx, KEY_NOTE_OPSERV_ACCESS, ntype->set_access.min_opserv);
7682         break;
7683     }
7684     switch(ntype->visible_type)
7685     {
7686     case NOTE_VIS_ALL: str = KEY_NOTE_VIS_ALL; break;
7687     case NOTE_VIS_CHANNEL_USERS: str = KEY_NOTE_VIS_CHANNEL_USERS; break;
7688     case NOTE_VIS_PRIVILEGED: default: str = KEY_NOTE_VIS_PRIVILEGED; break;
7689     }
7690     saxdb_write_string(ctx, KEY_NOTE_VISIBILITY, str);
7691     saxdb_write_int(ctx, KEY_NOTE_MAX_LENGTH, ntype->max_length);
7692     saxdb_end_record(ctx);
7693 }
7694
7695 static void
7696 write_dnrs_helper(struct saxdb_context *ctx, struct dict *dnrs)
7697 {
7698     struct do_not_register *dnr;
7699     dict_iterator_t it, next;
7700
7701     for(it = dict_first(dnrs); it; it = next)
7702     {
7703         next = iter_next(it);
7704         dnr = iter_data(it);
7705         if(dnr->expires && dnr->expires <= now)
7706         {
7707             dict_remove(dnrs, iter_key(it));
7708             continue;
7709         }
7710         saxdb_start_record(ctx, dnr->chan_name, 0);
7711         if(dnr->set)
7712             saxdb_write_int(ctx, KEY_DNR_SET, dnr->set);
7713         if(dnr->expires)
7714             saxdb_write_int(ctx, KEY_EXPIRES, dnr->expires);
7715         saxdb_write_string(ctx, KEY_DNR_SETTER, dnr->setter);
7716         saxdb_write_string(ctx, KEY_DNR_REASON, dnr->reason);
7717         saxdb_end_record(ctx);
7718     }
7719 }
7720
7721 static int
7722 chanserv_saxdb_write(struct saxdb_context *ctx)
7723 {
7724     dict_iterator_t it;
7725     struct chanData *channel;
7726
7727     /* Notes */
7728     saxdb_start_record(ctx, KEY_NOTE_TYPES, 1);
7729     for(it = dict_first(note_types); it; it = iter_next(it))
7730         chanserv_write_note_type(ctx, iter_data(it));
7731     saxdb_end_record(ctx);
7732
7733     /* DNRs */
7734     saxdb_start_record(ctx, KEY_DNR, 1);
7735     write_dnrs_helper(ctx, handle_dnrs);
7736     write_dnrs_helper(ctx, plain_dnrs);
7737     write_dnrs_helper(ctx, mask_dnrs);
7738     saxdb_end_record(ctx);
7739
7740     /* Channels */
7741     saxdb_start_record(ctx, KEY_CHANNELS, 1);
7742     for(channel = channelList; channel; channel = channel->next)
7743         chanserv_write_channel(ctx, channel);
7744     saxdb_end_record(ctx);
7745
7746     return 0;
7747 }
7748
7749 static void
7750 chanserv_db_cleanup(void) {
7751     unsigned int ii;
7752     unreg_part_func(handle_part);
7753     while(channelList)
7754         unregister_channel(channelList, "terminating.");
7755     for(ii = 0; ii < chanserv_conf.support_channels.used; ++ii)
7756         UnlockChannel(chanserv_conf.support_channels.list[ii]);
7757     free(chanserv_conf.support_channels.list);
7758     dict_delete(handle_dnrs);
7759     dict_delete(plain_dnrs);
7760     dict_delete(mask_dnrs);
7761     dict_delete(note_types);
7762     free_string_list(chanserv_conf.eightball);
7763     free_string_list(chanserv_conf.old_ban_names);
7764     free_string_list(chanserv_conf.set_shows);
7765     free(set_shows_list.list);
7766     free(uset_shows_list.list);
7767     while(helperList)
7768     {
7769         struct userData *helper = helperList;
7770         helperList = helperList->next;
7771         free(helper);
7772     }
7773 }
7774
7775 #if defined(GCC_VARMACROS)
7776 # define DEFINE_COMMAND(NAME, MIN_ARGC, FLAGS, ARGS...) modcmd_register(chanserv_module, #NAME, cmd_##NAME, MIN_ARGC, FLAGS, ARGS)
7777 #elif defined(C99_VARMACROS)
7778 # define DEFINE_COMMAND(NAME, MIN_ARGC, FLAGS, ...) modcmd_register(chanserv_module, #NAME, cmd_##NAME, MIN_ARGC, FLAGS, __VA_ARGS__)
7779 #endif
7780 #define DEFINE_CHANNEL_OPTION(NAME) modcmd_register(chanserv_module, "set "#NAME, chan_opt_##NAME, 1, 0, NULL)
7781 #define DEFINE_USER_OPTION(NAME) modcmd_register(chanserv_module, "uset "#NAME, user_opt_##NAME, 1, MODCMD_REQUIRE_REGCHAN, NULL)
7782
7783 void
7784 init_chanserv(const char *nick)
7785 {
7786     CS_LOG = log_register_type("ChanServ", "file:chanserv.log");
7787     conf_register_reload(chanserv_conf_read);
7788
7789     if(nick)
7790     {
7791         reg_server_link_func(handle_server_link);
7792         reg_new_channel_func(handle_new_channel);
7793         reg_join_func(handle_join);
7794         reg_part_func(handle_part);
7795         reg_kick_func(handle_kick);
7796         reg_topic_func(handle_topic);
7797         reg_mode_change_func(handle_mode);
7798         reg_nick_change_func(handle_nick_change);
7799         reg_auth_func(handle_auth);
7800     }
7801
7802     reg_handle_rename_func(handle_rename);
7803     reg_unreg_func(handle_unreg);
7804
7805     handle_dnrs = dict_new();
7806     dict_set_free_data(handle_dnrs, free);
7807     plain_dnrs = dict_new();
7808     dict_set_free_data(plain_dnrs, free);
7809     mask_dnrs = dict_new();
7810     dict_set_free_data(mask_dnrs, free);
7811
7812     reg_svccmd_unbind_func(handle_svccmd_unbind);
7813     chanserv_module = module_register("ChanServ", CS_LOG, "chanserv.help", chanserv_expand_variable);
7814     DEFINE_COMMAND(register, 1, MODCMD_REQUIRE_AUTHED, "flags", "+acceptchan,+helping", NULL);
7815     DEFINE_COMMAND(noregister, 1, MODCMD_REQUIRE_AUTHED, "flags", "+helping", NULL);
7816     DEFINE_COMMAND(allowregister, 2, 0, "template", "noregister", NULL);
7817     DEFINE_COMMAND(dnrsearch, 3, 0, "template", "noregister", NULL);
7818     modcmd_register(chanserv_module, "dnrsearch print", NULL, 0, 0, NULL);
7819     modcmd_register(chanserv_module, "dnrsearch remove", NULL, 0, 0, NULL);
7820     modcmd_register(chanserv_module, "dnrsearch count", NULL, 0, 0, NULL);
7821     DEFINE_COMMAND(move, 1, MODCMD_REQUIRE_AUTHED|MODCMD_REQUIRE_REGCHAN, "template", "register", NULL);
7822     DEFINE_COMMAND(csuspend, 2, MODCMD_REQUIRE_AUTHED|MODCMD_REQUIRE_REGCHAN, "flags", "+helping", NULL);
7823     DEFINE_COMMAND(cunsuspend, 1, MODCMD_REQUIRE_AUTHED|MODCMD_REQUIRE_REGCHAN, "flags", "+helping", NULL);
7824     DEFINE_COMMAND(createnote, 5, 0, "level", "800", NULL);
7825     DEFINE_COMMAND(removenote, 2, 0, "level", "800", NULL);
7826
7827     DEFINE_COMMAND(unregister, 1, MODCMD_REQUIRE_AUTHED|MODCMD_REQUIRE_REGCHAN, "flags", "+loghostmask", NULL);
7828     DEFINE_COMMAND(merge, 2, MODCMD_REQUIRE_AUTHED|MODCMD_REQUIRE_REGCHAN, "access", "owner", NULL);
7829
7830     DEFINE_COMMAND(adduser, 3, MODCMD_REQUIRE_CHANUSER, "access", "master", NULL);
7831     DEFINE_COMMAND(deluser, 2, MODCMD_REQUIRE_CHANUSER, "access", "master", NULL);
7832     DEFINE_COMMAND(suspend, 2, MODCMD_REQUIRE_CHANUSER, "access", "master", NULL);
7833     DEFINE_COMMAND(unsuspend, 2, MODCMD_REQUIRE_CHANUSER, "access", "master", NULL);
7834     DEFINE_COMMAND(deleteme, 1, MODCMD_REQUIRE_CHANUSER, NULL);
7835
7836     DEFINE_COMMAND(mdelowner, 2, MODCMD_REQUIRE_CHANUSER, "flags", "+helping", NULL);
7837     DEFINE_COMMAND(mdelcoowner, 2, MODCMD_REQUIRE_CHANUSER, "access", "owner", NULL);
7838     DEFINE_COMMAND(mdelmaster, 2, MODCMD_REQUIRE_CHANUSER, "access", "coowner", NULL);
7839     DEFINE_COMMAND(mdelop, 2, MODCMD_REQUIRE_CHANUSER, "access", "master", NULL);
7840     DEFINE_COMMAND(mdelpeon, 2, MODCMD_REQUIRE_CHANUSER, "access", "master", NULL);
7841
7842     DEFINE_COMMAND(trim, 3, MODCMD_REQUIRE_CHANUSER, "access", "master", NULL);
7843     DEFINE_COMMAND(opchan, 1, MODCMD_REQUIRE_REGCHAN|MODCMD_NEVER_CSUSPEND, "access", "1", NULL);
7844     DEFINE_COMMAND(clvl, 3, MODCMD_REQUIRE_CHANUSER, "access", "master", NULL);
7845     DEFINE_COMMAND(giveownership, 2, MODCMD_REQUIRE_CHANUSER, "access", "owner", "flags", "+loghostmask", NULL);
7846
7847     DEFINE_COMMAND(up, 1, MODCMD_REQUIRE_CHANUSER, NULL);
7848     DEFINE_COMMAND(down, 1, MODCMD_REQUIRE_REGCHAN, NULL);
7849     DEFINE_COMMAND(upall, 1, MODCMD_REQUIRE_AUTHED, NULL);
7850     DEFINE_COMMAND(downall, 1, MODCMD_REQUIRE_AUTHED, NULL);
7851     DEFINE_COMMAND(op, 2, MODCMD_REQUIRE_CHANNEL, "access", "op", NULL);
7852     DEFINE_COMMAND(deop, 2, MODCMD_REQUIRE_CHANNEL, "template", "op", NULL);
7853     DEFINE_COMMAND(voice, 2, MODCMD_REQUIRE_CHANNEL, "template", "op", NULL);
7854     DEFINE_COMMAND(devoice, 2, MODCMD_REQUIRE_CHANNEL, "template", "op", NULL);
7855
7856     DEFINE_COMMAND(kickban, 2, MODCMD_REQUIRE_REGCHAN, "template", "op", NULL);
7857     DEFINE_COMMAND(kick, 2, MODCMD_REQUIRE_REGCHAN, "template", "op", NULL);
7858     DEFINE_COMMAND(ban, 2, MODCMD_REQUIRE_REGCHAN, "template", "op", NULL);
7859     DEFINE_COMMAND(unban, 2, 0, "template", "op", NULL);
7860     DEFINE_COMMAND(unbanall, 1, 0, "template", "op", NULL);
7861     DEFINE_COMMAND(unbanme, 1, MODCMD_REQUIRE_CHANUSER, "template", "op", NULL);
7862     DEFINE_COMMAND(open, 1, MODCMD_REQUIRE_CHANUSER, "template", "op", NULL);
7863     DEFINE_COMMAND(topic, 1, MODCMD_REQUIRE_REGCHAN, "template", "op", "flags", "+never_csuspend", NULL);
7864     DEFINE_COMMAND(mode, 1, MODCMD_REQUIRE_REGCHAN, "template", "op", NULL);
7865     DEFINE_COMMAND(inviteme, 1, MODCMD_REQUIRE_CHANNEL, "access", "1", NULL);
7866     DEFINE_COMMAND(invite, 1, MODCMD_REQUIRE_CHANNEL, "access", "master", NULL);
7867     DEFINE_COMMAND(set, 1, MODCMD_REQUIRE_CHANUSER, "access", "op", NULL);
7868     DEFINE_COMMAND(wipeinfo, 2, MODCMD_REQUIRE_CHANUSER, "access", "master", NULL);
7869     DEFINE_COMMAND(resync, 1, MODCMD_REQUIRE_CHANUSER, "access", "master", NULL);
7870
7871     DEFINE_COMMAND(events, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog", "access", "350", NULL);
7872     DEFINE_COMMAND(addban, 2, MODCMD_REQUIRE_REGCHAN, "access", "250", NULL);
7873     DEFINE_COMMAND(addtimedban, 3, MODCMD_REQUIRE_REGCHAN, "access", "250", NULL);
7874     DEFINE_COMMAND(delban, 2, MODCMD_REQUIRE_REGCHAN, "access", "250", NULL);
7875     DEFINE_COMMAND(uset, 1, MODCMD_REQUIRE_CHANUSER, "access", "1", NULL);
7876
7877     DEFINE_COMMAND(bans, 1, MODCMD_REQUIRE_REGCHAN, "access", "1", "flags", "+nolog", NULL);
7878     DEFINE_COMMAND(peek, 1, MODCMD_REQUIRE_REGCHAN, "access", "op", "flags", "+nolog", NULL);
7879
7880     DEFINE_COMMAND(myaccess, 1, MODCMD_REQUIRE_AUTHED, NULL);
7881     DEFINE_COMMAND(access, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog,+joinable", NULL);
7882     DEFINE_COMMAND(users, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog,+joinable", NULL);
7883     DEFINE_COMMAND(wlist, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog,+joinable", NULL);
7884     DEFINE_COMMAND(clist, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog,+joinable", NULL);
7885     DEFINE_COMMAND(mlist, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog,+joinable", NULL);
7886     DEFINE_COMMAND(olist, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog,+joinable", NULL);
7887     DEFINE_COMMAND(plist, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog,+joinable", NULL);
7888     DEFINE_COMMAND(info, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog,+joinable", NULL);
7889     DEFINE_COMMAND(seen, 2, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog,+joinable", NULL);
7890     DEFINE_COMMAND(names, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+nolog,+joinable", NULL);
7891
7892     DEFINE_COMMAND(note, 1, MODCMD_REQUIRE_REGCHAN, "flags", "+joinable,+acceptchan", NULL);
7893     DEFINE_COMMAND(delnote, 2, MODCMD_REQUIRE_CHANUSER, NULL);
7894
7895     DEFINE_COMMAND(netinfo, 1, 0, "flags", "+nolog", NULL);
7896     DEFINE_COMMAND(ircops, 1, 0, "flags", "+nolog", NULL);
7897     DEFINE_COMMAND(helpers, 1, 0, "flags", "+nolog", NULL);
7898     DEFINE_COMMAND(staff, 1, 0, "flags", "+nolog", NULL);
7899
7900     DEFINE_COMMAND(say, 2, 0, "flags", "+oper,+acceptchan", NULL);
7901     DEFINE_COMMAND(emote, 2, 0, "flags", "+oper,+acceptchan", NULL);
7902     DEFINE_COMMAND(expire, 1, 0, "flags", "+oper", NULL);
7903     DEFINE_COMMAND(search, 3, 0, "flags", "+nolog,+helping", NULL);
7904     DEFINE_COMMAND(unvisited, 1, 0, "flags", "+nolog,+helping", NULL);
7905
7906     DEFINE_COMMAND(unf, 1, 0, "flags", "+nolog,+toy,+acceptchan", NULL);
7907     DEFINE_COMMAND(ping, 1, 0, "flags", "+nolog,+toy,+acceptchan", NULL);
7908     DEFINE_COMMAND(wut, 1, 0, "flags", "+nolog,+toy,+acceptchan", NULL);
7909     DEFINE_COMMAND(8ball, 1, 0, "flags", "+nolog,+toy,+acceptchan", NULL);
7910     DEFINE_COMMAND(d, 1, 0, "flags", "+nolog,+toy,+acceptchan", NULL);
7911     DEFINE_COMMAND(huggle, 1, 0, "flags", "+nolog,+toy,+acceptchan", NULL);
7912
7913     /* Channel options */
7914     DEFINE_CHANNEL_OPTION(defaulttopic);
7915     DEFINE_CHANNEL_OPTION(topicmask);
7916     DEFINE_CHANNEL_OPTION(greeting);
7917     DEFINE_CHANNEL_OPTION(usergreeting);
7918     DEFINE_CHANNEL_OPTION(modes);
7919     DEFINE_CHANNEL_OPTION(enfops);
7920     DEFINE_CHANNEL_OPTION(giveops);
7921     DEFINE_CHANNEL_OPTION(protect);
7922     DEFINE_CHANNEL_OPTION(enfmodes);
7923     DEFINE_CHANNEL_OPTION(enftopic);
7924     DEFINE_CHANNEL_OPTION(pubcmd);
7925     DEFINE_CHANNEL_OPTION(givevoice);
7926     DEFINE_CHANNEL_OPTION(userinfo);
7927     DEFINE_CHANNEL_OPTION(dynlimit);
7928     DEFINE_CHANNEL_OPTION(topicsnarf);
7929     DEFINE_CHANNEL_OPTION(nodelete);
7930     DEFINE_CHANNEL_OPTION(toys);
7931     DEFINE_CHANNEL_OPTION(setters);
7932     DEFINE_CHANNEL_OPTION(topicrefresh);
7933     DEFINE_CHANNEL_OPTION(ctcpusers);
7934     DEFINE_CHANNEL_OPTION(ctcpreaction);
7935     DEFINE_CHANNEL_OPTION(inviteme);
7936     DEFINE_CHANNEL_OPTION(unreviewed);
7937     modcmd_register(chanserv_module, "set unreviewed on", NULL, 0, 0, "flags", "+helping", NULL);
7938     modcmd_register(chanserv_module, "set unreviewed off", NULL, 0, 0, "flags", "+oper", NULL);
7939     if(off_channel > 1)
7940         DEFINE_CHANNEL_OPTION(offchannel);
7941     modcmd_register(chanserv_module, "set defaults", chan_opt_defaults, 1, 0, "access", "owner", NULL);
7942
7943     /* Alias set topic to set defaulttopic for compatibility. */
7944     modcmd_register(chanserv_module, "set topic", chan_opt_defaulttopic, 1, 0, NULL);
7945
7946     /* User options */
7947     DEFINE_USER_OPTION(noautoop);
7948     DEFINE_USER_OPTION(autoinvite);
7949     DEFINE_USER_OPTION(info);
7950
7951     /* Alias uset autovoice to uset autoop. */
7952     modcmd_register(chanserv_module, "uset noautovoice", user_opt_noautoop, 1, 0, NULL);
7953
7954     note_types = dict_new();
7955     dict_set_free_data(note_types, chanserv_deref_note_type);
7956     if(nick)
7957     {
7958         const char *modes = conf_get_data("services/chanserv/modes", RECDB_QSTRING);
7959         chanserv = AddLocalUser(nick, nick, NULL, "Channel Services", modes);
7960         service_register(chanserv)->trigger = '!';
7961         reg_chanmsg_func('\001', chanserv, chanserv_ctcp_check);
7962     }
7963     saxdb_register("ChanServ", chanserv_saxdb_read, chanserv_saxdb_write);
7964
7965     if(chanserv_conf.channel_expire_frequency)
7966         timeq_add(now + chanserv_conf.channel_expire_frequency, expire_channels, NULL);
7967
7968     if(chanserv_conf.dnr_expire_frequency)
7969         timeq_add(now + chanserv_conf.dnr_expire_frequency, expire_dnrs, NULL);
7970
7971     if(chanserv_conf.refresh_period)
7972     {
7973         unsigned long next_refresh;
7974         next_refresh = (now + chanserv_conf.refresh_period - 1) / chanserv_conf.refresh_period * chanserv_conf.refresh_period;
7975         timeq_add(next_refresh, chanserv_refresh_topics, NULL);
7976     }
7977
7978     reg_exit_func(chanserv_db_cleanup);
7979     message_register_table(msgtab);
7980 }