2 * ircd-ratbox: A slightly useful ircd.
3 * m_resv.c: Reserves(jupes) a nickname or channel.
5 * Copyright (C) 2001-2002 Hybrid Development Team
6 * Copyright (C) 2002-2005 ircd-ratbox development team
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
23 * $Id: m_resv.c 3045 2006-12-26 23:16:57Z jilles $
37 #include "s_newconf.h"
41 static int mo_resv(struct Client
*, struct Client
*, int, const char **);
42 static int ms_resv(struct Client
*, struct Client
*, int, const char **);
43 static int me_resv(struct Client
*, struct Client
*, int, const char **);
44 static int mo_unresv(struct Client
*, struct Client
*, int, const char **);
45 static int ms_unresv(struct Client
*, struct Client
*, int, const char **);
46 static int me_unresv(struct Client
*, struct Client
*, int, const char **);
48 struct Message resv_msgtab
= {
49 "RESV", 0, 0, 0, MFLG_SLOW
| MFLG_UNREG
,
50 {mg_ignore
, mg_not_oper
, {ms_resv
, 4}, {ms_resv
, 4}, {me_resv
, 5}, {mo_resv
, 3}}
52 struct Message unresv_msgtab
= {
53 "UNRESV", 0, 0, 0, MFLG_SLOW
| MFLG_UNREG
,
54 {mg_ignore
, mg_not_oper
, {ms_unresv
, 3}, {ms_unresv
, 3}, {me_unresv
, 2}, {mo_unresv
, 2}}
57 mapi_clist_av1 resv_clist
[] = { &resv_msgtab
, &unresv_msgtab
, NULL
};
58 DECLARE_MODULE_AV1(resv
, NULL
, NULL
, resv_clist
, NULL
, NULL
, "$Revision: 3045 $");
60 static void parse_resv(struct Client
*source_p
, const char *name
,
61 const char *reason
, int temp_time
);
62 static void propagate_resv(struct Client
*source_p
, const char *target
,
63 int temp_time
, const char *name
, const char *reason
);
64 static void cluster_resv(struct Client
*source_p
, int temp_time
,
65 const char *name
, const char *reason
);
67 static void handle_remote_unresv(struct Client
*source_p
, const char *name
);
68 static void remove_resv(struct Client
*source_p
, const char *name
);
69 static int remove_resv_from_file(struct Client
*source_p
, const char *name
);
70 static void resv_chan_forcepart(const char *name
, const char *reason
, int temp_time
);
74 * parv[1] = channel/nick to forbid
78 mo_resv(struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
82 const char *target_server
= NULL
;
86 if(!IsOperResv(source_p
))
88 sendto_one(source_p
, form_str(ERR_NOPRIVS
),
89 me
.name
, source_p
->name
, "resv");
93 /* RESV [time] <name> [ON <server>] :<reason> */
95 if((temp_time
= valid_temp_time(parv
[loc
])) >= 0)
97 /* we just set temp_time to -1! */
104 if((parc
>= loc
+2) && (irccmp(parv
[loc
], "ON") == 0))
106 if(!IsOperRemoteBan(source_p
))
108 sendto_one(source_p
, form_str(ERR_NOPRIVS
),
109 me
.name
, source_p
->name
, "remoteban");
113 target_server
= parv
[loc
+1];
117 if(parc
<= loc
|| EmptyString(parv
[loc
]))
119 sendto_one(source_p
, form_str(ERR_NEEDMOREPARAMS
),
120 me
.name
, source_p
->name
, "RESV");
129 propagate_resv(source_p
, target_server
, temp_time
, name
, reason
);
131 if(match(target_server
, me
.name
) == 0)
134 else if(rb_dlink_list_length(&cluster_conf_list
) > 0)
135 cluster_resv(source_p
, temp_time
, name
, reason
);
137 parse_resv(source_p
, name
, reason
, temp_time
);
143 * parv[1] = target server
144 * parv[2] = channel/nick to forbid
148 ms_resv(struct Client
*client_p
, struct Client
*source_p
,
149 int parc
, const char *parv
[])
151 /* source_p parv[1] parv[2] parv[3]
152 * oper target server resv reason
154 propagate_resv(source_p
, parv
[1], 0, parv
[2], parv
[3]);
156 if(!match(parv
[1], me
.name
))
159 if(!IsPerson(source_p
))
162 parse_resv(source_p
, parv
[2], parv
[3], 0);
167 me_resv(struct Client
*client_p
, struct Client
*source_p
,
168 int parc
, const char *parv
[])
170 /* time name 0 :reason */
171 if(!IsPerson(source_p
))
174 parse_resv(source_p
, parv
[2], parv
[4], atoi(parv
[1]));
180 * inputs - source_p if error messages wanted
184 * side effects - will parse the resv and create it if valid
187 parse_resv(struct Client
*source_p
, const char *name
,
188 const char *reason
, int temp_time
)
190 struct ConfItem
*aconf
;
192 if(!MyClient(source_p
) &&
193 !find_shared_conf(source_p
->username
, source_p
->host
,
194 source_p
->servptr
->name
,
195 (temp_time
> 0) ? SHARED_TRESV
: SHARED_PRESV
))
198 if(IsChannelName(name
))
200 if(hash_find_resv(name
))
202 sendto_one_notice(source_p
,
203 ":A RESV has already been placed on channel: %s",
208 if(strlen(name
) > CHANNELLEN
)
210 sendto_one_notice(source_p
, ":Invalid RESV length: %s",
215 if(strchr(name
, ','))
217 sendto_one_notice(source_p
,
218 ":Invalid character ',' in channel RESV");
222 if(strchr(reason
, '"'))
224 sendto_one_notice(source_p
,
225 ":Invalid character '\"' in comment");
230 aconf
->status
= CONF_RESV_CHANNEL
;
232 aconf
->name
= rb_strdup(name
);
233 aconf
->passwd
= rb_strdup(reason
);
234 add_to_resv_hash(aconf
->name
, aconf
);
235 resv_chan_forcepart(aconf
->name
, aconf
->passwd
, temp_time
);
239 aconf
->hold
= rb_current_time() + temp_time
;
241 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
242 "%s added temporary %d min. RESV for [%s] [%s]",
243 get_oper_name(source_p
), temp_time
/ 60,
245 ilog(L_KLINE
, "R %s %d %s %s",
246 get_oper_name(source_p
), temp_time
/ 60,
248 sendto_one_notice(source_p
, ":Added temporary %d min. RESV [%s]",
249 temp_time
/ 60, name
);
252 write_confitem(RESV_TYPE
, source_p
, NULL
, aconf
->name
,
253 aconf
->passwd
, NULL
, NULL
, 0);
255 else if(clean_resv_nick(name
))
257 if(strlen(name
) > NICKLEN
*2)
259 sendto_one_notice(source_p
, ":Invalid RESV length: %s",
264 if(strchr(reason
, '"'))
266 sendto_one_notice(source_p
,
267 ":Invalid character '\"' in comment");
271 if(!valid_wild_card_simple(name
))
273 sendto_one_notice(source_p
,
274 ":Please include at least %d non-wildcard "
275 "characters with the resv",
276 ConfigFileEntry
.min_nonwildcard_simple
);
280 if(find_nick_resv_mask(name
))
282 sendto_one_notice(source_p
,
283 ":A RESV has already been placed on nick: %s",
289 aconf
->status
= CONF_RESV_NICK
;
291 aconf
->name
= rb_strdup(name
);
292 aconf
->passwd
= rb_strdup(reason
);
293 rb_dlinkAddAlloc(aconf
, &resv_conf_list
);
297 aconf
->hold
= rb_current_time() + temp_time
;
299 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
300 "%s added temporary %d min. RESV for [%s] [%s]",
301 get_oper_name(source_p
), temp_time
/ 60,
303 ilog(L_KLINE
, "R %s %d %s %s",
304 get_oper_name(source_p
), temp_time
/ 60,
306 sendto_one_notice(source_p
, ":Added temporary %d min. RESV [%s]",
307 temp_time
/ 60, name
);
310 write_confitem(RESV_TYPE
, source_p
, NULL
, aconf
->name
,
311 aconf
->passwd
, NULL
, NULL
, 0);
314 sendto_one_notice(source_p
,
315 ":You have specified an invalid resv: [%s]",
320 propagate_resv(struct Client
*source_p
, const char *target
,
321 int temp_time
, const char *name
, const char *reason
)
325 sendto_match_servs(source_p
, target
,
328 target
, name
, reason
);
329 sendto_match_servs(source_p
, target
,
330 CAP_ENCAP
, CAP_CLUSTER
,
331 "ENCAP %s RESV %d %s 0 :%s",
332 target
, temp_time
, name
, reason
);
335 sendto_match_servs(source_p
, target
,
337 "ENCAP %s RESV %d %s 0 :%s",
338 target
, temp_time
, name
, reason
);
342 cluster_resv(struct Client
*source_p
, int temp_time
, const char *name
,
345 struct remote_conf
*shared_p
;
348 RB_DLINK_FOREACH(ptr
, cluster_conf_list
.head
)
350 shared_p
= ptr
->data
;
352 /* old protocol cant handle temps, and we dont really want
353 * to convert them to perm.. --fl
357 if(!(shared_p
->flags
& SHARED_PRESV
))
360 sendto_match_servs(source_p
, shared_p
->server
,
363 shared_p
->server
, name
, reason
);
364 sendto_match_servs(source_p
, shared_p
->server
,
365 CAP_ENCAP
, CAP_CLUSTER
,
366 "ENCAP %s RESV 0 %s 0 :%s",
367 shared_p
->server
, name
, reason
);
369 else if(shared_p
->flags
& SHARED_TRESV
)
370 sendto_match_servs(source_p
, shared_p
->server
,
372 "ENCAP %s RESV %d %s 0 :%s",
373 shared_p
->server
, temp_time
, name
, reason
);
380 * parv[1] = channel/nick to unforbid
383 mo_unresv(struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
385 if(!IsOperResv(source_p
))
387 sendto_one(source_p
, form_str(ERR_NOPRIVS
),
388 me
.name
, source_p
->name
, "resv");
392 if((parc
== 4) && (irccmp(parv
[2], "ON") == 0))
394 if(!IsOperRemoteBan(source_p
))
396 sendto_one(source_p
, form_str(ERR_NOPRIVS
),
397 me
.name
, source_p
->name
, "remoteban");
401 propagate_generic(source_p
, "UNRESV", parv
[3], CAP_CLUSTER
,
404 if(match(parv
[3], me
.name
) == 0)
407 else if(rb_dlink_list_length(&cluster_conf_list
) > 0)
408 cluster_generic(source_p
, "UNRESV", SHARED_UNRESV
, CAP_CLUSTER
,
411 remove_resv(source_p
, parv
[1]);
416 * parv[1] = target server
417 * parv[2] = resv to remove
420 ms_unresv(struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
422 /* source_p parv[1] parv[2]
423 * oper target server resv to remove
425 propagate_generic(source_p
, "UNRESV", parv
[1], CAP_CLUSTER
,
428 if(!match(parv
[1], me
.name
))
431 if(!IsPerson(source_p
))
434 handle_remote_unresv(source_p
, parv
[2]);
439 me_unresv(struct Client
*client_p
, struct Client
*source_p
, int parc
, const char *parv
[])
442 if(!IsPerson(source_p
))
445 handle_remote_unresv(source_p
, parv
[1]);
450 handle_remote_unresv(struct Client
*source_p
, const char *name
)
452 if(!find_shared_conf(source_p
->username
, source_p
->host
,
453 source_p
->servptr
->name
, SHARED_UNRESV
))
456 remove_resv(source_p
, name
);
462 remove_resv(struct Client
*source_p
, const char *name
)
464 struct ConfItem
*aconf
= NULL
;
466 if(IsChannelName(name
))
468 if((aconf
= hash_find_resv(name
)) == NULL
)
470 sendto_one_notice(source_p
, ":No RESV for %s", name
);
476 if (!remove_resv_from_file(source_p
, name
))
481 sendto_one_notice(source_p
, ":RESV for [%s] is removed", name
);
482 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
483 "%s has removed the RESV for: [%s]",
484 get_oper_name(source_p
), name
);
485 ilog(L_KLINE
, "UR %s %s", get_oper_name(source_p
), name
);
487 del_from_resv_hash(name
, aconf
);
493 RB_DLINK_FOREACH(ptr
, resv_conf_list
.head
)
497 if(irccmp(aconf
->name
, name
))
505 sendto_one_notice(source_p
, ":No RESV for %s", name
);
511 if (!remove_resv_from_file(source_p
, name
))
516 sendto_one_notice(source_p
, ":RESV for [%s] is removed", name
);
517 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
518 "%s has removed the RESV for: [%s]",
519 get_oper_name(source_p
), name
);
520 ilog(L_KLINE
, "UR %s %s", get_oper_name(source_p
), name
);
522 /* already have ptr from the loop above.. */
523 rb_dlinkDestroy(ptr
, &resv_conf_list
);
530 /* remove_resv_from_file()
532 * inputs - client removing the resv
535 * side effects - resv if found, is removed from conf
536 * - does not touch resv hash or resv_conf_list
539 remove_resv_from_file(struct Client
*source_p
, const char *name
)
544 char temppath
[BUFSIZE
];
545 const char *filename
;
548 int error_on_write
= 0;
551 rb_sprintf(temppath
, "%s.tmp", ConfigFileEntry
.resvfile
);
552 filename
= get_conf_name(RESV_TYPE
);
554 if((in
= fopen(filename
, "r")) == NULL
)
556 sendto_one_notice(source_p
, ":Cannot open %s", filename
);
562 if((out
= fopen(temppath
, "w")) == NULL
)
564 sendto_one_notice(source_p
, ":Cannot open %s", temppath
);
572 while (fgets(buf
, sizeof(buf
), in
))
574 const char *resv_name
;
579 (void) unlink(temppath
);
584 rb_strlcpy(buff
, buf
, sizeof(buff
));
586 if((p
= strchr(buff
, '\n')) != NULL
)
589 if((*buff
== '\0') || (*buff
== '#'))
591 error_on_write
= (fputs(buf
, out
) < 0) ? YES
: NO
;
595 if((resv_name
= getfield(buff
)) == NULL
)
597 error_on_write
= (fputs(buf
, out
) < 0) ? YES
: NO
;
601 if(irccmp(resv_name
, name
) == 0)
607 error_on_write
= (fputs(buf
, out
) < 0) ? YES
: NO
;
613 error_on_write
= YES
;
617 sendto_one_notice(source_p
, ":Couldn't write temp resv file, aborted");
622 sendto_one_notice(source_p
, ":Cannot find RESV for %s in file", name
);
625 (void) unlink(temppath
);
630 if (rename(temppath
, filename
))
632 sendto_one_notice(source_p
, ":Couldn't rename temp file, aborted");
636 sendto_one_notice(source_p
, ":RESV for [%s] is removed", name
);
637 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
638 "%s has removed the RESV for: [%s]", get_oper_name(source_p
), name
);
639 ilog(L_KLINE
, "UR %s %s", get_oper_name(source_p
), name
);
645 resv_chan_forcepart(const char *name
, const char *reason
, int temp_time
)
648 rb_dlink_node
*next_ptr
;
649 struct Channel
*chptr
;
650 struct membership
*msptr
;
651 struct Client
*target_p
;
653 if(!ConfigChannel
.resv_forcepart
)
656 /* for each user on our server in the channel list
657 * send them a PART, and notify opers.
659 chptr
= find_channel(name
);
662 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, chptr
->locmembers
.head
)
665 target_p
= msptr
->client_p
;
667 if(IsExemptResv(target_p
))
670 sendto_server(target_p
, chptr
, CAP_TS6
, NOCAPS
,
671 ":%s PART %s", target_p
->id
, chptr
->chname
);
673 sendto_channel_local(ALL_MEMBERS
, chptr
, ":%s!%s@%s PART %s :%s",
674 target_p
->name
, target_p
->username
,
675 target_p
->host
, chptr
->chname
, target_p
->name
);
677 remove_user_from_channel(msptr
);
679 /* notify opers & user they were removed from the channel */
680 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
681 "Forced PART for %s!%s@%s from %s (%s)",
682 target_p
->name
, target_p
->username
,
683 target_p
->host
, name
, reason
);
686 sendto_one_notice(target_p
, ":*** Channel %s is temporarily unavailable on this server.",
689 sendto_one_notice(target_p
, ":*** Channel %s is no longer available on this server.",