2 * ircd-ratbox: an advanced Internet Relay Chat Daemon(ircd).
3 * s_newconf.c - code for dealing with conf stuff
5 * Copyright (C) 2004 Lee Hardy <lee@leeh.co.uk>
6 * Copyright (C) 2004-2005 ircd-ratbox development team
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions are
12 * 1.Redistributions of source code must retain the above copyright notice,
13 * this list of conditions and the following disclaimer.
14 * 2.Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 * 3.The name of the author may not be used to endorse or promote products
18 * derived from this software without specific prior written permission.
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
22 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
23 * DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT,
24 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
25 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
26 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
28 * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
29 * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
30 * POSSIBILITY OF SUCH DAMAGE.
32 * $Id: s_newconf.c 3508 2007-06-04 16:04:49Z jilles $
36 #include "ircd_defs.h"
39 #include "s_newconf.h"
46 #include "irc_dictionary.h"
48 rb_dlink_list shared_conf_list
;
49 rb_dlink_list cluster_conf_list
;
50 rb_dlink_list oper_conf_list
;
51 rb_dlink_list hubleaf_conf_list
;
52 rb_dlink_list server_conf_list
;
53 rb_dlink_list xline_conf_list
;
54 rb_dlink_list resv_conf_list
; /* nicks only! */
55 rb_dlink_list nd_list
; /* nick delay */
56 rb_dlink_list tgchange_list
;
58 rb_patricia_tree_t
*tgchange_tree
;
60 static rb_bh
*nd_heap
= NULL
;
62 static void expire_temp_rxlines(void *unused
);
63 static void expire_nd_entries(void *unused
);
65 struct ev_entry
*expire_nd_entries_ev
= NULL
;
66 struct ev_entry
*expire_temp_rxlines_ev
= NULL
;
71 tgchange_tree
= rb_new_patricia(PATRICIA_BITS
);
72 nd_heap
= rb_bh_create(sizeof(struct nd_entry
), ND_HEAP_SIZE
, "nd_heap");
73 expire_nd_entries_ev
= rb_event_addish("expire_nd_entries", expire_nd_entries
, NULL
, 30);
74 expire_temp_rxlines_ev
= rb_event_addish("expire_temp_rxlines", expire_temp_rxlines
, NULL
, 60);
80 struct server_conf
*server_p
;
82 rb_dlink_node
*next_ptr
;
84 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, shared_conf_list
.head
)
86 /* ptr here is ptr->data->node */
87 rb_dlinkDelete(ptr
, &shared_conf_list
);
88 free_remote_conf(ptr
->data
);
91 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, cluster_conf_list
.head
)
93 rb_dlinkDelete(ptr
, &cluster_conf_list
);
94 free_remote_conf(ptr
->data
);
97 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, hubleaf_conf_list
.head
)
99 rb_dlinkDelete(ptr
, &hubleaf_conf_list
);
100 free_remote_conf(ptr
->data
);
103 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, oper_conf_list
.head
)
105 free_oper_conf(ptr
->data
);
106 rb_dlinkDestroy(ptr
, &oper_conf_list
);
109 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, server_conf_list
.head
)
111 server_p
= ptr
->data
;
113 if(!server_p
->servers
)
115 rb_dlinkDelete(ptr
, &server_conf_list
);
116 free_server_conf(ptr
->data
);
119 server_p
->flags
|= SERVER_ILLEGAL
;
124 clear_s_newconf_bans(void)
126 struct ConfItem
*aconf
;
127 rb_dlink_node
*ptr
, *next_ptr
;
129 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, xline_conf_list
.head
)
137 rb_dlinkDestroy(ptr
, &xline_conf_list
);
140 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, resv_conf_list
.head
)
149 rb_dlinkDestroy(ptr
, &resv_conf_list
);
156 make_remote_conf(void)
158 struct remote_conf
*remote_p
= rb_malloc(sizeof(struct remote_conf
));
163 free_remote_conf(struct remote_conf
*remote_p
)
165 s_assert(remote_p
!= NULL
);
169 rb_free(remote_p
->username
);
170 rb_free(remote_p
->host
);
171 rb_free(remote_p
->server
);
176 find_shared_conf(const char *username
, const char *host
,
177 const char *server
, int flags
)
179 struct remote_conf
*shared_p
;
182 RB_DLINK_FOREACH(ptr
, shared_conf_list
.head
)
184 shared_p
= ptr
->data
;
186 if(match(shared_p
->username
, username
) &&
187 match(shared_p
->host
, host
) &&
188 match(shared_p
->server
, server
))
190 if(shared_p
->flags
& flags
)
201 propagate_generic(struct Client
*source_p
, const char *command
,
202 const char *target
, int cap
, const char *format
, ...)
204 char buffer
[BUFSIZE
];
207 va_start(args
, format
);
208 rb_vsnprintf(buffer
, sizeof(buffer
), format
, args
);
211 sendto_match_servs(source_p
, target
, cap
, NOCAPS
,
213 command
, target
, buffer
);
214 sendto_match_servs(source_p
, target
, CAP_ENCAP
, cap
,
216 target
, command
, buffer
);
220 cluster_generic(struct Client
*source_p
, const char *command
,
221 int cltype
, int cap
, const char *format
, ...)
223 char buffer
[BUFSIZE
];
224 struct remote_conf
*shared_p
;
228 va_start(args
, format
);
229 rb_vsnprintf(buffer
, sizeof(buffer
), format
, args
);
232 RB_DLINK_FOREACH(ptr
, cluster_conf_list
.head
)
234 shared_p
= ptr
->data
;
236 if(!(shared_p
->flags
& cltype
))
239 sendto_match_servs(source_p
, shared_p
->server
, cap
, NOCAPS
,
241 command
, shared_p
->server
, buffer
);
242 sendto_match_servs(source_p
, shared_p
->server
, CAP_ENCAP
, cap
,
244 shared_p
->server
, command
, buffer
);
251 struct oper_conf
*oper_p
= rb_malloc(sizeof(struct oper_conf
));
256 free_oper_conf(struct oper_conf
*oper_p
)
258 s_assert(oper_p
!= NULL
);
262 rb_free(oper_p
->username
);
263 rb_free(oper_p
->host
);
264 rb_free(oper_p
->name
);
268 memset(oper_p
->passwd
, 0, strlen(oper_p
->passwd
));
269 rb_free(oper_p
->passwd
);
272 #ifdef HAVE_LIBCRYPTO
273 rb_free(oper_p
->rsa_pubkey_file
);
275 if(oper_p
->rsa_pubkey
)
276 RSA_free(oper_p
->rsa_pubkey
);
283 find_oper_conf(const char *username
, const char *host
, const char *locip
, const char *name
)
285 struct oper_conf
*oper_p
;
286 struct rb_sockaddr_storage ip
, cip
;
287 char addr
[HOSTLEN
+1];
291 parse_netmask(locip
, (struct sockaddr
*)&cip
, &cbits
);
293 RB_DLINK_FOREACH(ptr
, oper_conf_list
.head
)
297 /* name/username doesnt match.. */
298 if(irccmp(oper_p
->name
, name
) || !match(oper_p
->username
, username
))
301 rb_strlcpy(addr
, oper_p
->host
, sizeof(addr
));
303 if(parse_netmask(addr
, (struct sockaddr
*)&ip
, &bits
) != HM_HOST
)
305 if(ip
.ss_family
== cip
.ss_family
&&
306 comp_with_mask_sock((struct sockaddr
*)&ip
, (struct sockaddr
*)&cip
, bits
))
310 /* we have to compare against the host as well, because its
311 * valid to set a spoof to an IP, which if we only compare
312 * in ip form to sockhost will not necessarily match --anfl
314 if(match(oper_p
->host
, host
))
326 static struct oper_flags oper_flagtable
[] =
328 { OPER_KLINE
, "kline" },
329 { OPER_XLINE
, "xline" },
330 { OPER_RESV
, "resv" },
331 { OPER_GLOBKILL
, "global_kill" },
332 { OPER_LOCKILL
, "local_kill" },
333 { OPER_REMOTE
, "remote" },
334 { OPER_UNKLINE
, "unkline" },
335 { OPER_REHASH
, "rehash" },
337 { OPER_ADMIN
, "admin" },
338 { OPER_HADMIN
, "hidden_admin" },
339 { OPER_NICKS
, "nick_changes" },
340 { OPER_OPERWALL
, "operwall" },
342 { OPER_INVIS
, "hidden_oper" },
343 { OPER_REMOTEBAN
, "remoteban" },
344 { OPER_MASSNOTICE
, "mass_notice" },
349 get_oper_privs(int flags
)
351 static char buf
[BUFSIZE
];
358 for(i
= 0; oper_flagtable
[i
].flag
; i
++)
359 if (flags
& oper_flagtable
[i
].flag
)
362 rb_strlcat(buf
, ", ", sizeof(buf
));
364 rb_strlcat(buf
, oper_flagtable
[i
].name
, sizeof(buf
));
371 make_server_conf(void)
373 struct server_conf
*server_p
= rb_malloc(sizeof(struct server_conf
));
374 server_p
->aftype
= AF_INET
;
379 free_server_conf(struct server_conf
*server_p
)
381 s_assert(server_p
!= NULL
);
385 if(!EmptyString(server_p
->passwd
))
387 memset(server_p
->passwd
, 0, strlen(server_p
->passwd
));
388 rb_free(server_p
->passwd
);
391 if(!EmptyString(server_p
->spasswd
))
393 memset(server_p
->spasswd
, 0, strlen(server_p
->spasswd
));
394 rb_free(server_p
->spasswd
);
397 rb_free(server_p
->name
);
398 rb_free(server_p
->host
);
399 rb_free(server_p
->class_name
);
404 add_server_conf(struct server_conf
*server_p
)
406 if(EmptyString(server_p
->class_name
))
408 server_p
->class_name
= rb_strdup("default");
409 server_p
->class = default_class
;
413 server_p
->class = find_class(server_p
->class_name
);
415 if(server_p
->class == default_class
)
417 conf_report_error("Warning connect::class invalid for %s",
420 rb_free(server_p
->class_name
);
421 server_p
->class_name
= rb_strdup("default");
424 if(strchr(server_p
->host
, '*') || strchr(server_p
->host
, '?'))
429 find_server_conf(const char *name
)
431 struct server_conf
*server_p
;
434 RB_DLINK_FOREACH(ptr
, server_conf_list
.head
)
436 server_p
= ptr
->data
;
438 if(ServerConfIllegal(server_p
))
441 if(match(name
, server_p
->name
))
449 attach_server_conf(struct Client
*client_p
, struct server_conf
*server_p
)
451 /* already have an attached conf */
452 if(client_p
->localClient
->att_sconf
)
454 /* short circuit this special case :) */
455 if(client_p
->localClient
->att_sconf
== server_p
)
458 detach_server_conf(client_p
);
461 CurrUsers(server_p
->class)++;
463 client_p
->localClient
->att_sconf
= server_p
;
468 detach_server_conf(struct Client
*client_p
)
470 struct server_conf
*server_p
= client_p
->localClient
->att_sconf
;
475 client_p
->localClient
->att_sconf
= NULL
;
477 CurrUsers(server_p
->class)--;
479 if(ServerConfIllegal(server_p
) && !server_p
->servers
)
481 /* the class this one is using may need destroying too */
482 if(MaxUsers(server_p
->class) < 0 && CurrUsers(server_p
->class) <= 0)
483 free_class(server_p
->class);
485 rb_dlinkDelete(&server_p
->node
, &server_conf_list
);
486 free_server_conf(server_p
);
491 set_server_conf_autoconn(struct Client
*source_p
, const char *name
, int newval
)
493 struct server_conf
*server_p
;
495 if((server_p
= find_server_conf(name
)) != NULL
)
498 server_p
->flags
|= SERVER_AUTOCONN
;
500 server_p
->flags
&= ~SERVER_AUTOCONN
;
502 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
503 "%s has changed AUTOCONN for %s to %i",
504 get_oper_name(source_p
), name
, newval
);
507 sendto_one_notice(source_p
, ":Can't find %s", name
);
511 find_xline(const char *gecos
, int counter
)
513 struct ConfItem
*aconf
;
516 RB_DLINK_FOREACH(ptr
, xline_conf_list
.head
)
520 if(match_esc(aconf
->name
, gecos
))
532 find_xline_mask(const char *gecos
)
534 struct ConfItem
*aconf
;
537 RB_DLINK_FOREACH(ptr
, xline_conf_list
.head
)
541 if(!irccmp(aconf
->name
, gecos
))
549 find_nick_resv(const char *name
)
551 struct ConfItem
*aconf
;
554 RB_DLINK_FOREACH(ptr
, resv_conf_list
.head
)
558 if(match_esc(aconf
->name
, name
))
569 find_nick_resv_mask(const char *name
)
571 struct ConfItem
*aconf
;
574 RB_DLINK_FOREACH(ptr
, resv_conf_list
.head
)
578 if(!irccmp(aconf
->name
, name
))
588 * outputs - 1 if nick is vaild resv, 0 otherwise
592 clean_resv_nick(const char *nick
)
599 if(*nick
== '-' || IsDigit(*nick
))
602 while ((tmpch
= *nick
++))
604 if(tmpch
== '?' || tmpch
== '@' || tmpch
== '#')
606 else if(tmpch
== '*')
608 else if(IsNickChar(tmpch
))
620 /* valid_wild_card_simple()
622 * inputs - "thing" to test
623 * outputs - 1 if enough wildcards, else 0
627 valid_wild_card_simple(const char *data
)
634 /* check the string for minimum number of nonwildcard chars */
637 while((tmpch
= *p
++))
639 /* found an escape, p points to the char after it, so skip
642 if(tmpch
== '\\' && *p
)
645 if(++nonwild
>= ConfigFileEntry
.min_nonwildcard_simple
)
648 else if(!IsMWildChar(tmpch
))
650 /* if we have enough nonwildchars, return */
651 if(++nonwild
>= ConfigFileEntry
.min_nonwildcard_simple
)
658 /* strings without wilds are also ok */
663 valid_temp_time(const char *p
)
672 result
+= ((*p
) & 0xF);
679 if(result
> (60 * 24 * 7 * 52))
680 result
= (60 * 24 * 7 * 52);
686 expire_temp_rxlines(void *unused
)
688 struct ConfItem
*aconf
;
690 rb_dlink_node
*next_ptr
;
693 HASH_WALK_SAFE(i
, R_MAX
, ptr
, next_ptr
, resvTable
)
697 if(aconf
->hold
&& aconf
->hold
<= rb_current_time())
699 if(ConfigFileEntry
.tkline_expire_notices
)
700 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
701 "Temporary RESV for [%s] expired",
705 rb_dlinkDestroy(ptr
, &resvTable
[i
]);
710 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, resv_conf_list
.head
)
714 if(aconf
->hold
&& aconf
->hold
<= rb_current_time())
716 if(ConfigFileEntry
.tkline_expire_notices
)
717 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
718 "Temporary RESV for [%s] expired",
721 rb_dlinkDestroy(ptr
, &resv_conf_list
);
725 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, xline_conf_list
.head
)
729 if(aconf
->hold
&& aconf
->hold
<= rb_current_time())
731 if(ConfigFileEntry
.tkline_expire_notices
)
732 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
733 "Temporary X-line for [%s] expired",
736 rb_dlinkDestroy(ptr
, &xline_conf_list
);
744 return(rb_dlink_list_length(&nd_list
));
748 add_nd_entry(const char *name
)
752 if(irc_dictionary_find(nd_dict
, name
) != NULL
)
755 nd
= rb_bh_alloc(nd_heap
);
757 rb_strlcpy(nd
->name
, name
, sizeof(nd
->name
));
758 nd
->expire
= rb_current_time() + ConfigFileEntry
.nick_delay
;
760 /* this list is ordered */
761 rb_dlinkAddTail(nd
, &nd
->lnode
, &nd_list
);
763 irc_dictionary_add(nd_dict
, nd
->name
, nd
);
767 free_nd_entry(struct nd_entry
*nd
)
769 irc_dictionary_delete(nd_dict
, nd
->name
);
771 rb_dlinkDelete(&nd
->lnode
, &nd_list
);
772 rb_bh_free(nd_heap
, nd
);
776 expire_nd_entries(void *unused
)
780 rb_dlink_node
*next_ptr
;
782 RB_DLINK_FOREACH_SAFE(ptr
, next_ptr
, nd_list
.head
)
786 /* this list is ordered - we can stop when we hit the first
787 * entry that doesnt expire..
789 if(nd
->expire
> rb_current_time())
797 add_tgchange(const char *host
)
800 rb_patricia_node_t
*pnode
;
802 if(find_tgchange(host
))
805 target
= rb_malloc(sizeof(tgchange
));
806 pnode
= make_and_lookup(tgchange_tree
, host
);
808 pnode
->data
= target
;
809 target
->pnode
= pnode
;
811 target
->ip
= rb_strdup(host
);
812 target
->expiry
= rb_current_time() + (60*60*12);
814 rb_dlinkAdd(target
, &target
->node
, &tgchange_list
);
818 find_tgchange(const char *host
)
820 rb_patricia_node_t
*pnode
;
822 if((pnode
= rb_match_exact_string(tgchange_tree
, host
)))