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 147 2006-11-13 12:35:45Z spb $
36 #include "ircd_defs.h"
39 #include "s_newconf.h"
50 #include "sprintf_irc.h"
52 dlink_list shared_conf_list
;
53 dlink_list cluster_conf_list
;
54 dlink_list oper_conf_list
;
55 dlink_list hubleaf_conf_list
;
56 dlink_list server_conf_list
;
57 dlink_list xline_conf_list
;
58 dlink_list resv_conf_list
; /* nicks only! */
59 dlink_list nd_list
; /* nick delay */
60 dlink_list tgchange_list
;
62 patricia_tree_t
*tgchange_tree
;
64 static BlockHeap
*nd_heap
= NULL
;
66 static void expire_temp_rxlines(void *unused
);
67 static void expire_nd_entries(void *unused
);
72 tgchange_tree
= New_Patricia(PATRICIA_BITS
);
73 nd_heap
= BlockHeapCreate(sizeof(struct nd_entry
), ND_HEAP_SIZE
);
74 eventAddIsh("expire_nd_entries", expire_nd_entries
, NULL
, 30);
75 eventAddIsh("expire_temp_rxlines", expire_temp_rxlines
, NULL
, 60);
81 struct server_conf
*server_p
;
85 DLINK_FOREACH_SAFE(ptr
, next_ptr
, shared_conf_list
.head
)
87 /* ptr here is ptr->data->node */
88 dlinkDelete(ptr
, &shared_conf_list
);
89 free_remote_conf(ptr
->data
);
92 DLINK_FOREACH_SAFE(ptr
, next_ptr
, cluster_conf_list
.head
)
94 dlinkDelete(ptr
, &cluster_conf_list
);
95 free_remote_conf(ptr
->data
);
98 DLINK_FOREACH_SAFE(ptr
, next_ptr
, hubleaf_conf_list
.head
)
100 dlinkDelete(ptr
, &hubleaf_conf_list
);
101 free_remote_conf(ptr
->data
);
104 DLINK_FOREACH_SAFE(ptr
, next_ptr
, oper_conf_list
.head
)
106 free_oper_conf(ptr
->data
);
107 dlinkDestroy(ptr
, &oper_conf_list
);
110 DLINK_FOREACH_SAFE(ptr
, next_ptr
, server_conf_list
.head
)
112 server_p
= ptr
->data
;
114 if(!server_p
->servers
)
116 dlinkDelete(ptr
, &server_conf_list
);
117 free_server_conf(ptr
->data
);
120 server_p
->flags
|= SERVER_ILLEGAL
;
125 clear_s_newconf_bans(void)
127 struct ConfItem
*aconf
;
128 dlink_node
*ptr
, *next_ptr
;
130 DLINK_FOREACH_SAFE(ptr
, next_ptr
, xline_conf_list
.head
)
138 dlinkDestroy(ptr
, &xline_conf_list
);
141 DLINK_FOREACH_SAFE(ptr
, next_ptr
, resv_conf_list
.head
)
150 dlinkDestroy(ptr
, &resv_conf_list
);
157 make_remote_conf(void)
159 struct remote_conf
*remote_p
= MyMalloc(sizeof(struct remote_conf
));
164 free_remote_conf(struct remote_conf
*remote_p
)
166 s_assert(remote_p
!= NULL
);
170 MyFree(remote_p
->username
);
171 MyFree(remote_p
->host
);
172 MyFree(remote_p
->server
);
177 find_shared_conf(const char *username
, const char *host
,
178 const char *server
, int flags
)
180 struct remote_conf
*shared_p
;
183 DLINK_FOREACH(ptr
, shared_conf_list
.head
)
185 shared_p
= ptr
->data
;
187 if(match(shared_p
->username
, username
) &&
188 match(shared_p
->host
, host
) &&
189 match(shared_p
->server
, server
))
191 if(shared_p
->flags
& flags
)
202 propagate_generic(struct Client
*source_p
, const char *command
,
203 const char *target
, int cap
, const char *format
, ...)
205 char buffer
[BUFSIZE
];
208 va_start(args
, format
);
209 ircvsnprintf(buffer
, sizeof(buffer
), format
, args
);
212 sendto_match_servs(source_p
, target
, cap
, NOCAPS
,
214 command
, target
, buffer
);
215 sendto_match_servs(source_p
, target
, CAP_ENCAP
, cap
,
217 target
, command
, buffer
);
221 cluster_generic(struct Client
*source_p
, const char *command
,
222 int cltype
, int cap
, const char *format
, ...)
224 char buffer
[BUFSIZE
];
225 struct remote_conf
*shared_p
;
229 va_start(args
, format
);
230 ircvsnprintf(buffer
, sizeof(buffer
), format
, args
);
233 DLINK_FOREACH(ptr
, cluster_conf_list
.head
)
235 shared_p
= ptr
->data
;
237 if(!(shared_p
->flags
& cltype
))
240 sendto_match_servs(source_p
, shared_p
->server
, cap
, NOCAPS
,
242 command
, shared_p
->server
, buffer
);
243 sendto_match_servs(source_p
, shared_p
->server
, CAP_ENCAP
, cap
,
245 shared_p
->server
, command
, buffer
);
252 struct oper_conf
*oper_p
= MyMalloc(sizeof(struct oper_conf
));
257 free_oper_conf(struct oper_conf
*oper_p
)
259 s_assert(oper_p
!= NULL
);
263 MyFree(oper_p
->username
);
264 MyFree(oper_p
->host
);
265 MyFree(oper_p
->name
);
269 memset(oper_p
->passwd
, 0, strlen(oper_p
->passwd
));
270 MyFree(oper_p
->passwd
);
273 #ifdef HAVE_LIBCRYPTO
274 MyFree(oper_p
->rsa_pubkey_file
);
276 if(oper_p
->rsa_pubkey
)
277 RSA_free(oper_p
->rsa_pubkey
);
284 find_oper_conf(const char *username
, const char *host
, const char *locip
, const char *name
)
286 struct oper_conf
*oper_p
;
287 struct irc_sockaddr_storage ip
, cip
;
288 char addr
[HOSTLEN
+1];
292 parse_netmask(locip
, (struct sockaddr
*)&cip
, &cbits
);
294 DLINK_FOREACH(ptr
, oper_conf_list
.head
)
298 /* name/username doesnt match.. */
299 if(irccmp(oper_p
->name
, name
) || !match(oper_p
->username
, username
))
302 strlcpy(addr
, oper_p
->host
, sizeof(addr
));
304 if(parse_netmask(addr
, (struct sockaddr
*)&ip
, &bits
) != HM_HOST
)
306 if(ip
.ss_family
== cip
.ss_family
&&
307 comp_with_mask_sock((struct sockaddr
*)&ip
, (struct sockaddr
*)&cip
, bits
))
311 /* we have to compare against the host as well, because its
312 * valid to set a spoof to an IP, which if we only compare
313 * in ip form to sockhost will not necessarily match --anfl
315 if(match(oper_p
->host
, host
))
322 struct oper_flags oper_flagtable
[] =
324 { OPER_ADMIN
, 'A', 'a' },
325 { OPER_REMOTEBAN
, 'B', 'b' },
326 { OPER_KILL
, 'C', 'c' },
327 { OPER_DIE
, 'D', 'd' },
328 { OPER_EXPERIMENTAL
, 'E', 'e' },
329 { OPER_STAFFER
, 'F', 'f' },
330 { OPER_GRANT
, 'G', 'g' },
331 { OPER_REHASH
, 'H', 'h' },
332 { OPER_KLINE
, 'K', 'k' },
333 { OPER_OPERWALL
, 'L', 'l' },
334 { OPER_CMODES
, 'M', 'm' },
335 { OPER_MASSNOTICE
, 'N', 'n' },
336 { OPER_OVERRIDE
, 'O', 'o' },
337 { OPER_RESV
, 'Q', 'q' },
338 { OPER_ROUTING
, 'R', 'r' },
339 { OPER_AUSPEX
, 'S', 's' },
340 { OPER_HELPER
, 'T', 't' },
341 { OPER_UNKLINE
, 'U', 'u' },
342 { OPER_WALLOPS
, 'W', 'w' },
343 { OPER_XLINE
, 'X', 'x' },
348 get_oper_privs(int flags
)
356 for(i
= 0; oper_flagtable
[i
].flag
; i
++)
358 if(flags
& oper_flagtable
[i
].flag
)
359 *p
++ = oper_flagtable
[i
].has
;
361 *p
++ = oper_flagtable
[i
].hasnt
;
370 make_server_conf(void)
372 struct server_conf
*server_p
= MyMalloc(sizeof(struct server_conf
));
373 server_p
->aftype
= AF_INET
;
378 free_server_conf(struct server_conf
*server_p
)
380 s_assert(server_p
!= NULL
);
384 if(!EmptyString(server_p
->passwd
))
386 memset(server_p
->passwd
, 0, strlen(server_p
->passwd
));
387 MyFree(server_p
->passwd
);
390 if(!EmptyString(server_p
->spasswd
))
392 memset(server_p
->spasswd
, 0, strlen(server_p
->spasswd
));
393 MyFree(server_p
->spasswd
);
396 MyFree(server_p
->name
);
397 MyFree(server_p
->host
);
398 MyFree(server_p
->class_name
);
403 add_server_conf(struct server_conf
*server_p
)
405 if(EmptyString(server_p
->class_name
))
407 DupString(server_p
->class_name
, "default");
408 server_p
->class = default_class
;
412 server_p
->class = find_class(server_p
->class_name
);
414 if(server_p
->class == default_class
)
416 conf_report_error("Warning connect::class invalid for %s",
419 MyFree(server_p
->class_name
);
420 DupString(server_p
->class_name
, "default");
423 if(strchr(server_p
->host
, '*') || strchr(server_p
->host
, '?'))
428 find_server_conf(const char *name
)
430 struct server_conf
*server_p
;
433 DLINK_FOREACH(ptr
, server_conf_list
.head
)
435 server_p
= ptr
->data
;
437 if(ServerConfIllegal(server_p
))
440 if(match(name
, server_p
->name
))
448 attach_server_conf(struct Client
*client_p
, struct server_conf
*server_p
)
450 /* already have an attached conf */
451 if(client_p
->localClient
->att_sconf
)
453 /* short circuit this special case :) */
454 if(client_p
->localClient
->att_sconf
== server_p
)
457 detach_server_conf(client_p
);
460 CurrUsers(server_p
->class)++;
462 client_p
->localClient
->att_sconf
= server_p
;
467 detach_server_conf(struct Client
*client_p
)
469 struct server_conf
*server_p
= client_p
->localClient
->att_sconf
;
474 client_p
->localClient
->att_sconf
= NULL
;
476 CurrUsers(server_p
->class)--;
478 if(ServerConfIllegal(server_p
) && !server_p
->servers
)
480 /* the class this one is using may need destroying too */
481 if(MaxUsers(server_p
->class) < 0 && CurrUsers(server_p
->class) <= 0)
482 free_class(server_p
->class);
484 dlinkDelete(&server_p
->node
, &server_conf_list
);
485 free_server_conf(server_p
);
490 set_server_conf_autoconn(struct Client
*source_p
, char *name
, int newval
)
492 struct server_conf
*server_p
;
494 if((server_p
= find_server_conf(name
)) != NULL
)
497 server_p
->flags
|= SERVER_AUTOCONN
;
499 server_p
->flags
&= ~SERVER_AUTOCONN
;
501 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
502 "%s has changed AUTOCONN for %s to %i",
503 get_oper_name(source_p
), name
, newval
);
506 sendto_one(source_p
, ":%s NOTICE %s :Can't find %s",
507 me
.name
, source_p
->name
, name
);
511 find_xline(const char *gecos
, int counter
)
513 struct ConfItem
*aconf
;
516 DLINK_FOREACH(ptr
, xline_conf_list
.head
)
520 if(match_esc(aconf
->name
, gecos
))
532 find_nick_resv(const char *name
)
534 struct ConfItem
*aconf
;
537 DLINK_FOREACH(ptr
, resv_conf_list
.head
)
541 if(match_esc(aconf
->name
, name
))
554 * outputs - 1 if nick is vaild resv, 0 otherwise
558 clean_resv_nick(const char *nick
)
565 if(*nick
== '-' || IsDigit(*nick
))
568 while ((tmpch
= *nick
++))
570 if(tmpch
== '?' || tmpch
== '@' || tmpch
== '#')
572 else if(tmpch
== '*')
574 else if(IsNickChar(tmpch
))
586 /* valid_wild_card_simple()
588 * inputs - "thing" to test
589 * outputs - 1 if enough wildcards, else 0
593 valid_wild_card_simple(const char *data
)
599 /* check the string for minimum number of nonwildcard chars */
602 while((tmpch
= *p
++))
604 /* found an escape, p points to the char after it, so skip
611 else if(!IsMWildChar(tmpch
))
613 /* if we have enough nonwildchars, return */
614 if(++nonwild
>= ConfigFileEntry
.min_nonwildcard_simple
)
623 valid_temp_time(const char *p
)
632 result
+= ((*p
) & 0xF);
639 if(result
> (60 * 24 * 7 * 52))
640 result
= (60 * 24 * 7 * 52);
646 expire_temp_rxlines(void *unused
)
648 struct ConfItem
*aconf
;
650 dlink_node
*next_ptr
;
653 HASH_WALK_SAFE(i
, R_MAX
, ptr
, next_ptr
, resvTable
)
657 if(aconf
->hold
&& aconf
->hold
<= CurrentTime
)
659 if(ConfigFileEntry
.tkline_expire_notices
)
660 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
661 "Temporary RESV for [%s] expired",
665 dlinkDestroy(ptr
, &resvTable
[i
]);
670 DLINK_FOREACH_SAFE(ptr
, next_ptr
, resv_conf_list
.head
)
674 if(aconf
->hold
&& aconf
->hold
<= CurrentTime
)
676 if(ConfigFileEntry
.tkline_expire_notices
)
677 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
678 "Temporary RESV for [%s] expired",
681 dlinkDestroy(ptr
, &resv_conf_list
);
685 DLINK_FOREACH_SAFE(ptr
, next_ptr
, xline_conf_list
.head
)
689 if(aconf
->hold
&& aconf
->hold
<= CurrentTime
)
691 if(ConfigFileEntry
.tkline_expire_notices
)
692 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
693 "Temporary X-line for [%s] expired",
696 dlinkDestroy(ptr
, &xline_conf_list
);
704 return(dlink_list_length(&nd_list
));
709 add_nd_entry(const char *name
)
713 if(hash_find_nd(name
) != NULL
)
716 nd
= BlockHeapAlloc(nd_heap
);
718 strlcpy(nd
->name
, name
, sizeof(nd
->name
));
719 nd
->expire
= CurrentTime
+ ConfigFileEntry
.nick_delay
;
721 /* this list is ordered */
722 dlinkAddTail(nd
, &nd
->lnode
, &nd_list
);
723 add_to_nd_hash(name
, nd
);
727 free_nd_entry(struct nd_entry
*nd
)
729 dlinkDelete(&nd
->lnode
, &nd_list
);
730 dlinkDelete(&nd
->hnode
, &ndTable
[nd
->hashv
]);
731 BlockHeapFree(nd_heap
, nd
);
735 expire_nd_entries(void *unused
)
739 dlink_node
*next_ptr
;
741 DLINK_FOREACH_SAFE(ptr
, next_ptr
, nd_list
.head
)
745 /* this list is ordered - we can stop when we hit the first
746 * entry that doesnt expire..
748 if(nd
->expire
> CurrentTime
)
756 add_tgchange(const char *host
)
759 patricia_node_t
*pnode
;
761 if(find_tgchange(host
))
764 target
= MyMalloc(sizeof(tgchange
));
765 pnode
= make_and_lookup(tgchange_tree
, host
);
767 pnode
->data
= target
;
768 target
->pnode
= pnode
;
770 DupString(target
->ip
, host
);
771 target
->expiry
= CurrentTime
+ (60*60*12);
773 dlinkAdd(target
, &target
->node
, &tgchange_list
);
777 find_tgchange(const char *host
)
779 patricia_node_t
*pnode
;
781 if((pnode
= match_exact_string(tgchange_tree
, host
)))