ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/trunk/src/conf.c
Revision: 7217
Committed: Wed Feb 3 15:22:21 2016 UTC (8 years, 1 month ago) by michael
Content type: text/x-csrc
File size: 48698 byte(s)
Log Message:
- conf.c:clear_out_old_conf(): clear ClusterItems

File Contents

# User Rev Content
1 adx 30 /*
2 michael 2916 * ircd-hybrid: an advanced, lightweight Internet Relay Chat Daemon (ircd)
3 adx 30 *
4 michael 7006 * Copyright (c) 1997-2016 ircd-hybrid development team
5 adx 30 *
6     * This program 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 this program; if not, write to the Free Software
18 michael 4565 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301
19 adx 30 * USA
20     */
21    
22 michael 2916 /*! \file conf.c
23     * \brief Configuration file functions.
24     * \version $Id$
25     */
26    
27 adx 30 #include "stdinc.h"
28 michael 1011 #include "list.h"
29 adx 30 #include "ircd_defs.h"
30 michael 1309 #include "conf.h"
31 michael 7217 #include "conf_cluster.h"
32 michael 4545 #include "conf_pseudo.h"
33 michael 7209 #include "conf_shared.h"
34 michael 3347 #include "server.h"
35 adx 30 #include "resv.h"
36     #include "channel.h"
37     #include "client.h"
38     #include "event.h"
39     #include "irc_string.h"
40     #include "s_bsd.h"
41     #include "ircd.h"
42     #include "listener.h"
43     #include "hostmask.h"
44     #include "modules.h"
45     #include "numeric.h"
46     #include "fdlist.h"
47 michael 1309 #include "log.h"
48 adx 30 #include "send.h"
49     #include "memory.h"
50 michael 3322 #include "res.h"
51 adx 30 #include "userhost.h"
52 michael 3347 #include "user.h"
53 adx 30 #include "channel_mode.h"
54 michael 1243 #include "parse.h"
55 michael 3347 #include "misc.h"
56 michael 1622 #include "conf_db.h"
57 michael 1632 #include "conf_class.h"
58 michael 2150 #include "motd.h"
59 michael 4325 #include "ipcache.h"
60 michael 6185 #include "isupport.h"
61 adx 30
62 michael 2872
63 michael 5602 struct config_channel_entry ConfigChannel;
64 michael 5644 struct config_serverhide_entry ConfigServerHide;
65 michael 5602 struct config_general_entry ConfigGeneral;
66 michael 5644 struct config_log_entry ConfigLog = { .use_logging = 1 };
67     struct config_serverinfo_entry ConfigServerInfo;
68     struct config_admin_entry ConfigAdminInfo;
69 michael 5602 struct conf_parser_context conf_parser_ctx;
70    
71 adx 30 /* general conf items link list root, other than k lines etc. */
72 michael 4982 dlink_list service_items;
73     dlink_list server_items;
74 michael 6628 dlink_list operator_items;
75 michael 6716 dlink_list gecos_items;
76 michael 4982 dlink_list nresv_items;
77     dlink_list cresv_items;
78 adx 30
79     extern unsigned int lineno;
80     extern char linebuf[];
81     extern char conffilebuf[IRCD_BUFSIZE];
82     extern int yyparse(); /* defined in y.tab.c */
83    
84    
85     /* conf_dns_callback()
86     *
87 michael 1632 * inputs - pointer to struct MaskItem
88 adx 30 * - pointer to DNSReply reply
89     * output - none
90     * side effects - called when resolver query finishes
91     * if the query resulted in a successful search, hp will contain
92     * a non-null pointer, otherwise hp will be null.
93     * if successful save hp in the conf item it was called with
94     */
95     static void
96 michael 4408 conf_dns_callback(void *vptr, const struct irc_ssaddr *addr, const char *name, size_t namelength)
97 adx 30 {
98 michael 4874 struct MaskItem *const conf = vptr;
99 adx 30
100 michael 1632 conf->dns_pending = 0;
101 adx 30
102 michael 3235 if (addr)
103 michael 1632 memcpy(&conf->addr, addr, sizeof(conf->addr));
104 michael 992 else
105 michael 1632 conf->dns_failed = 1;
106 adx 30 }
107    
108     /* conf_dns_lookup()
109     *
110     * do a nameserver lookup of the conf host
111     * if the conf entry is currently doing a ns lookup do nothing, otherwise
112     * allocate a dns_query and start ns lookup.
113     */
114     static void
115 michael 1632 conf_dns_lookup(struct MaskItem *conf)
116 adx 30 {
117 michael 4982 if (conf->dns_pending)
118     return;
119    
120     conf->dns_pending = 1;
121    
122     if (conf->aftype == AF_INET)
123     gethost_byname_type(conf_dns_callback, conf, conf->host, T_A);
124     else
125     gethost_byname_type(conf_dns_callback, conf, conf->host, T_AAAA);
126     }
127    
128     /* map_to_list()
129     *
130     * inputs - ConfType conf
131     * output - pointer to dlink_list to use
132     * side effects - none
133     */
134     static dlink_list *
135     map_to_list(enum maskitem_type type)
136     {
137     switch (type)
138 adx 30 {
139 michael 4982 case CONF_XLINE:
140 michael 6716 return &gecos_items;
141 michael 4982 break;
142     case CONF_NRESV:
143     return &nresv_items;
144     break;
145     case CONF_CRESV:
146     return &cresv_items;
147     break;
148     case CONF_OPER:
149 michael 6628 return &operator_items;
150 michael 4982 break;
151     case CONF_SERVER:
152     return &server_items;
153     break;
154     case CONF_SERVICE:
155     return &service_items;
156     break;
157     default:
158     return NULL;
159 adx 30 }
160     }
161    
162 michael 1632 struct MaskItem *
163     conf_make(enum maskitem_type type)
164     {
165 michael 7032 struct MaskItem *const conf = xcalloc(sizeof(*conf));
166 michael 1632 dlink_list *list = NULL;
167    
168     conf->type = type;
169     conf->active = 1;
170     conf->aftype = AF_INET;
171    
172     if ((list = map_to_list(type)))
173     dlinkAdd(conf, &conf->node, list);
174     return conf;
175     }
176    
177     void
178     conf_free(struct MaskItem *conf)
179     {
180 michael 4815 dlink_node *node = NULL, *node_next = NULL;
181 michael 1636 dlink_list *list = NULL;
182    
183 michael 4511 if ((list = map_to_list(conf->type)))
184 michael 4523 dlinkFindDelete(list, conf);
185 michael 4511
186 michael 7032 xfree(conf->name);
187 michael 1632
188     if (conf->dns_pending)
189     delete_resolver_queries(conf);
190 michael 3235 if (conf->passwd)
191 michael 1632 memset(conf->passwd, 0, strlen(conf->passwd));
192 michael 3235 if (conf->spasswd)
193 michael 1632 memset(conf->spasswd, 0, strlen(conf->spasswd));
194    
195     conf->class = NULL;
196    
197 michael 7032 xfree(conf->passwd);
198     xfree(conf->spasswd);
199     xfree(conf->reason);
200     xfree(conf->certfp);
201     xfree(conf->whois);
202     xfree(conf->user);
203     xfree(conf->host);
204     xfree(conf->cipher_list);
205 michael 1632
206 michael 4815 DLINK_FOREACH_SAFE(node, node_next, conf->hub_list.head)
207 michael 1632 {
208 michael 7032 xfree(node->data);
209 michael 4815 dlinkDelete(node, &conf->hub_list);
210     free_dlink_node(node);
211 michael 1632 }
212    
213 michael 4815 DLINK_FOREACH_SAFE(node, node_next, conf->leaf_list.head)
214 michael 1632 {
215 michael 7032 xfree(node->data);
216 michael 4815 dlinkDelete(node, &conf->leaf_list);
217     free_dlink_node(node);
218 michael 1632 }
219 adx 30
220 michael 4815 DLINK_FOREACH_SAFE(node, node_next, conf->exempt_list.head)
221 michael 1858 {
222 michael 4815 struct exempt *exptr = node->data;
223 michael 1858
224 michael 4815 dlinkDelete(node, &conf->exempt_list);
225 michael 7032 xfree(exptr->name);
226     xfree(exptr->user);
227     xfree(exptr->host);
228     xfree(exptr);
229 michael 1858 }
230    
231 michael 7032 xfree(conf);
232 adx 30 }
233    
234 michael 4982 /* attach_iline()
235 adx 30 *
236 michael 4982 * inputs - client pointer
237     * - conf pointer
238     * output -
239     * side effects - do actual attach
240 adx 30 */
241 michael 4982 static int
242     attach_iline(struct Client *client_p, struct MaskItem *conf)
243 adx 30 {
244 michael 4982 const struct ClassItem *const class = conf->class;
245     struct ip_entry *ip_found;
246     int a_limit_reached = 0;
247     unsigned int local = 0, global = 0, ident = 0;
248 michael 2916
249 michael 4982 ip_found = ipcache_find_or_add_address(&client_p->connection->ip);
250     ip_found->count++;
251     AddFlag(client_p, FLAGS_IPHASH);
252 adx 30
253 michael 6441 userhost_count(client_p->username, client_p->host,
254     &global, &local, &ident);
255 adx 30
256 michael 4982 /* XXX blah. go down checking the various silly limits
257     * setting a_limit_reached if any limit is reached.
258     * - Dianora
259     */
260     if (class->max_total && class->ref_count >= class->max_total)
261     a_limit_reached = 1;
262     else if (class->max_perip && ip_found->count > class->max_perip)
263     a_limit_reached = 1;
264     else if (class->max_local && local >= class->max_local)
265     a_limit_reached = 1;
266     else if (class->max_global && global >= class->max_global)
267     a_limit_reached = 1;
268     else if (class->max_ident && ident >= class->max_ident &&
269     client_p->username[0] != '~')
270     a_limit_reached = 1;
271 adx 30
272 michael 4982 if (a_limit_reached)
273     {
274     if (!IsConfExemptLimits(conf))
275     return TOO_MANY; /* Already at maximum allowed */
276 adx 30
277 michael 4982 sendto_one_notice(client_p, &me, ":*** Your connection class is full, "
278     "but you have exceed_limit = yes;");
279 adx 30 }
280    
281 michael 4982 return attach_conf(client_p, conf);
282 adx 30 }
283    
284     /* verify_access()
285     *
286 michael 4982 * inputs - pointer to client to verify
287     * output - 0 if success -'ve if not
288     * side effect - find the first (best) I line to attach.
289 adx 30 */
290     static int
291 michael 1644 verify_access(struct Client *client_p)
292 adx 30 {
293 michael 1949 struct MaskItem *conf = NULL;
294 adx 30
295 michael 6313 if (HasFlag(client_p, FLAGS_GOTID))
296 adx 30 {
297 michael 1632 conf = find_address_conf(client_p->host, client_p->username,
298 michael 4588 &client_p->connection->ip,
299     client_p->connection->aftype,
300     client_p->connection->password);
301 adx 30 }
302     else
303     {
304 michael 5583 char non_ident[USERLEN + 1] = "~";
305    
306 michael 2182 strlcpy(non_ident + 1, client_p->username, sizeof(non_ident) - 1);
307 michael 4982 conf = find_address_conf(client_p->host, non_ident,
308 michael 4588 &client_p->connection->ip,
309     client_p->connection->aftype,
310     client_p->connection->password);
311 adx 30 }
312    
313 michael 5805 if (!conf)
314     return NOT_AUTHORIZED;
315    
316     assert(IsConfClient(conf) || IsConfKill(conf));
317    
318     if (IsConfClient(conf))
319 adx 30 {
320 michael 5805 if (IsConfRedir(conf))
321 adx 30 {
322 michael 5805 sendto_one_numeric(client_p, &me, RPL_REDIR,
323     conf->name ? conf->name : "",
324     conf->port);
325     return NOT_AUTHORIZED;
326     }
327 adx 30
328 michael 5805 if (IsConfDoSpoofIp(conf))
329     {
330     if (IsConfSpoofNotice(conf))
331 michael 6318 sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE, "%s spoofing: %s as %s",
332 michael 5805 client_p->name, client_p->host, conf->name);
333 michael 4982
334 michael 5805 strlcpy(client_p->host, conf->name, sizeof(client_p->host));
335 adx 30 }
336 michael 4982
337 michael 5805 return attach_iline(client_p, conf);
338 adx 30 }
339    
340 michael 5805 sendto_one_notice(client_p, &me, ":*** Banned: %s", conf->reason);
341     return BANNED_CLIENT;
342 adx 30 }
343    
344 michael 4982 /* check_client()
345 adx 30 *
346 michael 4982 * inputs - pointer to client
347     * output - 0 = Success
348     * NOT_AUTHORIZED (-1) = Access denied (no I line match)
349     * IRCD_SOCKET_ERROR (-2) = Bad socket.
350     * I_LINE_FULL (-3) = I-line is full
351     * TOO_MANY (-4) = Too many connections from hostname
352     * BANNED_CLIENT (-5) = K-lined
353     * side effects - Ordinary client access check.
354     * Look for conf lines which have the same
355     * status as the flags passed.
356 adx 30 */
357 michael 4982 int
358     check_client(struct Client *source_p)
359 adx 30 {
360 michael 4982 int i;
361 adx 30
362 michael 4982 if ((i = verify_access(source_p)))
363     ilog(LOG_TYPE_IRCD, "Access denied: %s[%s]",
364     source_p->name, source_p->sockhost);
365 adx 30
366 michael 4982 switch (i)
367     {
368     case TOO_MANY:
369     sendto_realops_flags(UMODE_FULL, L_ALL, SEND_NOTICE,
370     "Too many on IP for %s (%s).",
371     get_client_name(source_p, SHOW_IP),
372     source_p->sockhost);
373     ilog(LOG_TYPE_IRCD, "Too many connections on IP from %s.",
374     get_client_name(source_p, SHOW_IP));
375     ++ServerStats.is_ref;
376     exit_client(source_p, "No more connections allowed on that IP");
377     break;
378 adx 30
379 michael 4982 case I_LINE_FULL:
380     sendto_realops_flags(UMODE_FULL, L_ALL, SEND_NOTICE,
381     "auth {} block is full for %s (%s).",
382     get_client_name(source_p, SHOW_IP),
383     source_p->sockhost);
384     ilog(LOG_TYPE_IRCD, "Too many connections from %s.",
385     get_client_name(source_p, SHOW_IP));
386     ++ServerStats.is_ref;
387     exit_client(source_p, "No more connections allowed in your connection class");
388     break;
389 adx 30
390 michael 4982 case NOT_AUTHORIZED:
391     /* jdc - lists server name & port connections are on */
392     /* a purely cosmetical change */
393     sendto_realops_flags(UMODE_UNAUTH, L_ALL, SEND_NOTICE,
394     "Unauthorized client connection from %s [%s] on [%s/%u].",
395     get_client_name(source_p, SHOW_IP),
396     source_p->sockhost,
397     source_p->connection->listener->name,
398     source_p->connection->listener->port);
399     ilog(LOG_TYPE_IRCD, "Unauthorized client connection from %s on [%s/%u].",
400     get_client_name(source_p, SHOW_IP),
401     source_p->connection->listener->name,
402     source_p->connection->listener->port);
403 adx 30
404 michael 4982 ++ServerStats.is_ref;
405     exit_client(source_p, "You are not authorized to use this server");
406     break;
407    
408     case BANNED_CLIENT:
409     ++ServerStats.is_ref;
410     exit_client(source_p, "Banned");
411     break;
412    
413     case 0:
414     default:
415     break;
416 adx 30 }
417    
418 michael 4982 return !(i < 0);
419 adx 30 }
420    
421     /* detach_conf()
422     *
423     * inputs - pointer to client to detach
424     * - type of conf to detach
425     * output - 0 for success, -1 for failure
426     * side effects - Disassociate configuration from the client.
427     * Also removes a class from the list if marked for deleting.
428     */
429 michael 1632 void
430     detach_conf(struct Client *client_p, enum maskitem_type type)
431 adx 30 {
432 michael 4815 dlink_node *node = NULL, *node_next = NULL;
433 adx 30
434 michael 4815 DLINK_FOREACH_SAFE(node, node_next, client_p->connection->confs.head)
435 adx 30 {
436 michael 4815 struct MaskItem *conf = node->data;
437 adx 30
438 michael 1645 assert(conf->type & (CONF_CLIENT | CONF_OPER | CONF_SERVER));
439     assert(conf->ref_count > 0);
440     assert(conf->class->ref_count > 0);
441 adx 30
442 michael 1645 if (!(conf->type & type))
443     continue;
444 michael 671
445 michael 4815 dlinkDelete(node, &client_p->connection->confs);
446     free_dlink_node(node);
447 michael 1644
448 michael 2278 if (conf->type == CONF_CLIENT)
449 michael 4588 remove_from_cidr_check(&client_p->connection->ip, conf->class);
450 adx 30
451 michael 1645 if (--conf->class->ref_count == 0 && conf->class->active == 0)
452     {
453     class_free(conf->class);
454     conf->class = NULL;
455 adx 30 }
456 michael 1645
457     if (--conf->ref_count == 0 && conf->active == 0)
458     conf_free(conf);
459 adx 30 }
460     }
461    
462     /* attach_conf()
463     *
464     * inputs - client pointer
465     * - conf pointer
466     * output -
467     * side effects - Associate a specific configuration entry to a *local*
468     * client (this is the one which used in accepting the
469     * connection). Note, that this automatically changes the
470     * attachment if there was an old one...
471     */
472     int
473 michael 1632 attach_conf(struct Client *client_p, struct MaskItem *conf)
474 adx 30 {
475 michael 4588 if (dlinkFind(&client_p->connection->confs, conf))
476 adx 30 return 1;
477    
478 michael 1632 if (conf->type == CONF_CLIENT)
479     if (cidr_limit_reached(IsConfExemptLimits(conf),
480 michael 4588 &client_p->connection->ip, conf->class))
481 michael 1394 return TOO_MANY; /* Already at maximum allowed */
482 adx 30
483 michael 1632 conf->class->ref_count++;
484 michael 1644 conf->ref_count++;
485 adx 30
486 michael 4588 dlinkAdd(conf, make_dlink_node(), &client_p->connection->confs);
487 adx 30
488     return 0;
489     }
490    
491     /* attach_connect_block()
492     *
493     * inputs - pointer to server to attach
494     * - name of server
495     * - hostname of server
496     * output - true (1) if both are found, otherwise return false (0)
497     * side effects - find connect block and attach them to connecting client
498     */
499     int
500     attach_connect_block(struct Client *client_p, const char *name,
501     const char *host)
502     {
503 michael 4815 dlink_node *node = NULL;
504 adx 30
505 michael 5003 assert(host);
506 adx 30
507 michael 4815 DLINK_FOREACH(node, server_items.head)
508 adx 30 {
509 michael 4815 struct MaskItem *conf = node->data;
510 adx 30
511 michael 1652 if (match(conf->name, name) || match(conf->host, host))
512 adx 30 continue;
513    
514     attach_conf(client_p, conf);
515 michael 5776 return 1;
516 adx 30 }
517    
518     return 0;
519     }
520    
521     /* find_conf_name()
522     *
523     * inputs - pointer to conf link list to search
524     * - pointer to name to find
525     * - int mask of type of conf to find
526     * output - NULL or pointer to conf found
527     * side effects - find a conf entry which matches the name
528     * and has the given mask.
529     */
530 michael 1632 struct MaskItem *
531     find_conf_name(dlink_list *list, const char *name, enum maskitem_type type)
532 adx 30 {
533 michael 4815 dlink_node *node = NULL;
534 adx 30
535 michael 4815 DLINK_FOREACH(node, list->head)
536 adx 30 {
537 michael 4815 struct MaskItem *conf = node->data;
538 michael 2916
539 adx 30 if (conf->type == type)
540     {
541 michael 4596 if (conf->name && !irccmp(conf->name, name))
542     return conf;
543 adx 30 }
544     }
545    
546     return NULL;
547     }
548    
549     /* find_matching_name_conf()
550     *
551     * inputs - type of link list to look in
552     * - pointer to name string to find
553     * - pointer to user
554     * - pointer to host
555 michael 1644 * - optional flags to match on as well
556 michael 1632 * output - NULL or pointer to found struct MaskItem
557 adx 30 * side effects - looks for a match on name field
558     */
559 michael 1632 struct MaskItem *
560     find_matching_name_conf(enum maskitem_type type, const char *name, const char *user,
561 michael 1644 const char *host, unsigned int flags)
562 adx 30 {
563 michael 4815 dlink_node *node = NULL;
564     dlink_list *list = map_to_list(type);
565     struct MaskItem *conf = NULL;
566 adx 30
567     switch (type)
568     {
569 michael 1632 case CONF_SERVICE:
570 michael 4815 DLINK_FOREACH(node, list->head)
571 michael 1157 {
572 michael 4815 conf = node->data;
573 michael 1157
574     if (EmptyString(conf->name))
575     continue;
576 michael 5003 if (name && !irccmp(name, conf->name))
577 michael 1157 return conf;
578     }
579     break;
580    
581 michael 1632 case CONF_XLINE:
582     case CONF_NRESV:
583 michael 1825 case CONF_CRESV:
584 michael 4815 DLINK_FOREACH(node, list->head)
585 adx 30 {
586 michael 4815 conf = node->data;
587 adx 30
588     if (EmptyString(conf->name))
589 michael 2182 continue;
590 michael 5003 if (name && !match(conf->name, name))
591 adx 30 {
592 michael 2182 if ((user == NULL && (host == NULL)))
593     return conf;
594 michael 7159 if ((conf->modes & flags) != flags)
595 adx 30 continue;
596 michael 2182 if (EmptyString(conf->user) || EmptyString(conf->host))
597     return conf;
598     if (!match(conf->user, user) && !match(conf->host, host))
599     return conf;
600 adx 30 }
601     }
602     break;
603    
604 michael 1632 case CONF_SERVER:
605 michael 4815 DLINK_FOREACH(node, list->head)
606 adx 30 {
607 michael 4815 conf = node->data;
608 adx 30
609 michael 5003 if (name && !match(name, conf->name))
610 adx 30 return conf;
611 michael 5003 if (host && !match(host, conf->host))
612 adx 30 return conf;
613     }
614     break;
615 michael 2916
616 adx 30 default:
617     break;
618     }
619     return NULL;
620     }
621    
622     /* find_exact_name_conf()
623     *
624     * inputs - type of link list to look in
625     * - pointer to name string to find
626     * - pointer to user
627     * - pointer to host
628 michael 1632 * output - NULL or pointer to found struct MaskItem
629 adx 30 * side effects - looks for an exact match on name field
630     */
631 michael 1632 struct MaskItem *
632     find_exact_name_conf(enum maskitem_type type, const struct Client *who, const char *name,
633 adx 30 const char *user, const char *host)
634     {
635 michael 4815 dlink_node *node = NULL;
636     dlink_list *list = map_to_list(type);
637     struct MaskItem *conf = NULL;
638 adx 30
639     switch(type)
640     {
641 michael 1632 case CONF_XLINE:
642     case CONF_NRESV:
643 michael 1825 case CONF_CRESV:
644 adx 30
645 michael 4815 DLINK_FOREACH(node, list->head)
646 adx 30 {
647 michael 4815 conf = node->data;
648 michael 1632
649 adx 30 if (EmptyString(conf->name))
650 michael 2182 continue;
651 michael 2916
652 adx 30 if (irccmp(conf->name, name) == 0)
653     {
654 michael 2182 if ((user == NULL && (host == NULL)))
655     return conf;
656     if (EmptyString(conf->user) || EmptyString(conf->host))
657     return conf;
658     if (!match(conf->user, user) && !match(conf->host, host))
659     return conf;
660 adx 30 }
661     }
662     break;
663    
664 michael 1632 case CONF_OPER:
665 michael 4815 DLINK_FOREACH(node, list->head)
666 adx 30 {
667 michael 4815 conf = node->data;
668 michael 1285
669 adx 30 if (EmptyString(conf->name))
670 michael 1285 continue;
671    
672     if (!irccmp(conf->name, name))
673 adx 30 {
674 michael 1285 if (!who)
675     return conf;
676 michael 1632 if (EmptyString(conf->user) || EmptyString(conf->host))
677 michael 1636 return NULL;
678 michael 1652 if (!match(conf->user, who->username))
679 michael 1285 {
680 michael 1632 switch (conf->htype)
681 michael 1285 {
682     case HM_HOST:
683 michael 1652 if (!match(conf->host, who->host) || !match(conf->host, who->sockhost))
684 michael 1637 if (!conf->class->max_total || conf->class->ref_count < conf->class->max_total)
685     return conf;
686 michael 1285 break;
687     case HM_IPV4:
688 michael 4588 if (who->connection->aftype == AF_INET)
689     if (match_ipv4(&who->connection->ip, &conf->addr, conf->bits))
690 michael 1637 if (!conf->class->max_total || conf->class->ref_count < conf->class->max_total)
691     return conf;
692 michael 1285 break;
693     case HM_IPV6:
694 michael 4588 if (who->connection->aftype == AF_INET6)
695     if (match_ipv6(&who->connection->ip, &conf->addr, conf->bits))
696 michael 1637 if (!conf->class->max_total || conf->class->ref_count < conf->class->max_total)
697     return conf;
698 michael 1285 break;
699     default:
700     assert(0);
701     }
702     }
703 adx 30 }
704     }
705 michael 1285
706 adx 30 break;
707    
708 michael 1632 case CONF_SERVER:
709 michael 4815 DLINK_FOREACH(node, list->head)
710 adx 30 {
711 michael 4815 conf = node->data;
712 michael 1632
713 adx 30 if (EmptyString(conf->name))
714 michael 2182 continue;
715 michael 2916
716 adx 30 if (name == NULL)
717     {
718 michael 2182 if (EmptyString(conf->host))
719     continue;
720     if (irccmp(conf->host, host) == 0)
721     return conf;
722 adx 30 }
723     else if (irccmp(conf->name, name) == 0)
724 michael 2182 return conf;
725 adx 30 }
726 michael 2182
727 adx 30 break;
728    
729     default:
730     break;
731     }
732 michael 2182
733     return NULL;
734 adx 30 }
735    
736     /* set_default_conf()
737     *
738     * inputs - NONE
739     * output - NONE
740     * side effects - Set default values here.
741     * This is called **PRIOR** to parsing the
742     * configuration file. If you want to do some validation
743     * of values later, put them in validate_conf().
744     */
745     static void
746     set_default_conf(void)
747     {
748     /* verify init_class() ran, this should be an unnecessary check
749     * but its not much work.
750     */
751 michael 1644 assert(class_default == class_get_list()->tail->data);
752 adx 30
753 michael 4340 ConfigServerInfo.network_name = xstrdup(NETWORK_NAME_DEFAULT);
754     ConfigServerInfo.network_desc = xstrdup(NETWORK_DESC_DEFAULT);
755 adx 30
756 michael 4340 memset(&ConfigServerInfo.ip, 0, sizeof(ConfigServerInfo.ip));
757     ConfigServerInfo.specific_ipv4_vhost = 0;
758     memset(&ConfigServerInfo.ip6, 0, sizeof(ConfigServerInfo.ip6));
759     ConfigServerInfo.specific_ipv6_vhost = 0;
760 adx 30
761 michael 5489 ConfigServerInfo.default_max_clients = MAXCLIENTS_MAX;
762 michael 4340 ConfigServerInfo.max_nick_length = 9;
763     ConfigServerInfo.max_topic_length = 80;
764     ConfigServerInfo.hub = 0;
765 michael 4313
766 michael 1831 log_del_all();
767 michael 1247
768 michael 4340 ConfigLog.use_logging = 1;
769 adx 30
770 michael 1243 ConfigChannel.disable_fake_channels = 0;
771 michael 3860 ConfigChannel.invite_client_count = 10;
772     ConfigChannel.invite_client_time = 300;
773 michael 6792 ConfigChannel.invite_delay_channel = 5;
774 michael 3860 ConfigChannel.knock_client_count = 1;
775     ConfigChannel.knock_client_time = 300;
776 adx 30 ConfigChannel.knock_delay_channel = 60;
777 michael 3933 ConfigChannel.max_channels = 25;
778 adx 30 ConfigChannel.max_bans = 25;
779 michael 5489 ConfigChannel.default_join_flood_count = 18;
780     ConfigChannel.default_join_flood_time = 6;
781 adx 30
782 michael 1243 ConfigServerHide.flatten_links = 0;
783 michael 6597 ConfigServerHide.flatten_links_delay = 300;
784 michael 1243 ConfigServerHide.hidden = 0;
785     ConfigServerHide.hide_servers = 0;
786 michael 1851 ConfigServerHide.hide_services = 0;
787 michael 1646 ConfigServerHide.hidden_name = xstrdup(NETWORK_NAME_DEFAULT);
788 michael 1243 ConfigServerHide.hide_server_ips = 0;
789 michael 2196 ConfigServerHide.disable_remote_commands = 0;
790 adx 30
791 michael 4340 ConfigGeneral.away_count = 2;
792     ConfigGeneral.away_time = 10;
793 michael 6740 ConfigGeneral.max_watch = 50;
794 michael 4340 ConfigGeneral.cycle_on_host_change = 1;
795 michael 5805 ConfigGeneral.dline_min_cidr = 16;
796     ConfigGeneral.dline_min_cidr6 = 48;
797     ConfigGeneral.kline_min_cidr = 16;
798     ConfigGeneral.kline_min_cidr6 = 48;
799 michael 4340 ConfigGeneral.invisible_on_connect = 1;
800     ConfigGeneral.tkline_expire_notices = 1;
801     ConfigGeneral.ignore_bogus_ts = 0;
802     ConfigGeneral.disable_auth = 0;
803     ConfigGeneral.kill_chase_time_limit = 90;
804     ConfigGeneral.default_floodcount = 8;
805     ConfigGeneral.failed_oper_notice = 1;
806     ConfigGeneral.dots_in_ident = 0;
807     ConfigGeneral.min_nonwildcard = 4;
808     ConfigGeneral.min_nonwildcard_simple = 3;
809 michael 6740 ConfigGeneral.max_accept = 50;
810 michael 4340 ConfigGeneral.anti_nick_flood = 0;
811     ConfigGeneral.max_nick_time = 20;
812     ConfigGeneral.max_nick_changes = 5;
813     ConfigGeneral.anti_spam_exit_message_time = 0;
814 michael 6956 ConfigGeneral.ts_warn_delta = 30;
815     ConfigGeneral.ts_max_delta = 600;
816 michael 4340 ConfigGeneral.warn_no_connect_block = 1;
817     ConfigGeneral.stats_e_disabled = 0;
818 michael 5025 ConfigGeneral.stats_i_oper_only = 1; /* 1 = masked */
819 michael 4340 ConfigGeneral.stats_k_oper_only = 1; /* 1 = masked */
820 michael 5025 ConfigGeneral.stats_o_oper_only = 1;
821     ConfigGeneral.stats_m_oper_only = 1;
822 michael 4340 ConfigGeneral.stats_P_oper_only = 0;
823     ConfigGeneral.stats_u_oper_only = 0;
824     ConfigGeneral.caller_id_wait = 60;
825     ConfigGeneral.opers_bypass_callerid = 0;
826     ConfigGeneral.pace_wait = 10;
827     ConfigGeneral.pace_wait_simple = 1;
828     ConfigGeneral.short_motd = 0;
829     ConfigGeneral.ping_cookie = 0;
830     ConfigGeneral.no_oper_flood = 0;
831     ConfigGeneral.max_targets = MAX_TARGETS_DEFAULT;
832 michael 5506 ConfigGeneral.oper_only_umodes = UMODE_DEBUG | UMODE_LOCOPS | UMODE_HIDDEN | UMODE_FARCONNECT |
833     UMODE_UNAUTH | UMODE_EXTERNAL | UMODE_BOTS | UMODE_NCHANGE |
834     UMODE_SPY | UMODE_FULL | UMODE_SKILL | UMODE_REJ | UMODE_CCONN;
835 michael 4340 ConfigGeneral.oper_umodes = UMODE_BOTS | UMODE_LOCOPS | UMODE_SERVNOTICE | UMODE_WALLOP;
836     ConfigGeneral.throttle_count = 1;
837     ConfigGeneral.throttle_time = 1;
838 adx 30 }
839    
840     static void
841     validate_conf(void)
842     {
843 michael 5039 if (EmptyString(ConfigServerInfo.network_name))
844 michael 4340 ConfigServerInfo.network_name = xstrdup(NETWORK_NAME_DEFAULT);
845 adx 30
846 michael 5039 if (EmptyString(ConfigServerInfo.network_desc))
847 michael 4340 ConfigServerInfo.network_desc = xstrdup(NETWORK_DESC_DEFAULT);
848 adx 30 }
849    
850 michael 2916 /* read_conf()
851 michael 1363 *
852     * inputs - file descriptor pointing to config file to use
853     * output - None
854     * side effects - Read configuration file.
855     */
856     static void
857     read_conf(FILE *file)
858     {
859     lineno = 0;
860    
861 michael 3375 set_default_conf(); /* Set default values prior to conf parsing */
862 michael 1363 conf_parser_ctx.pass = 1;
863 michael 3375 yyparse(); /* Pick up the classes first */
864 michael 1363
865     rewind(file);
866    
867     conf_parser_ctx.pass = 2;
868 michael 3375 yyparse(); /* Load the values from the conf */
869     validate_conf(); /* Check to make sure some values are still okay. */
870     /* Some global values are also loaded here. */
871     class_delete_marked(); /* Delete unused classes that are marked for deletion */
872 michael 1363 }
873    
874 michael 4982 /* conf_rehash()
875     *
876     * Actual REHASH service routine. Called with sig == 0 if it has been called
877     * as a result of an operator issuing this command, else assume it has been
878     * called as a result of the server receiving a HUP signal.
879     */
880 michael 5776 void
881 michael 4982 conf_rehash(int sig)
882     {
883     if (sig)
884 michael 6318 sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
885 michael 4982 "Got signal SIGHUP, reloading configuration file(s)");
886    
887     restart_resolver();
888    
889     /* don't close listeners until we know we can go ahead with the rehash */
890    
891     read_conf_files(0);
892    
893     load_conf_modules();
894     check_conf_klines();
895     }
896    
897 adx 30 /* lookup_confhost()
898     *
899     * start DNS lookups of all hostnames in the conf
900     * line and convert an IP addresses in a.b.c.d number for to IP#s.
901     */
902 michael 1647 void
903 michael 1632 lookup_confhost(struct MaskItem *conf)
904 adx 30 {
905     struct addrinfo hints, *res;
906    
907 michael 3375 /*
908     * Do name lookup now on hostnames given and store the
909 adx 30 * ip numbers in conf structure.
910     */
911     memset(&hints, 0, sizeof(hints));
912    
913     hints.ai_family = AF_UNSPEC;
914     hints.ai_socktype = SOCK_STREAM;
915    
916     /* Get us ready for a bind() and don't bother doing dns lookup */
917     hints.ai_flags = AI_PASSIVE | AI_NUMERICHOST;
918    
919 michael 1632 if (getaddrinfo(conf->host, NULL, &hints, &res))
920 adx 30 {
921 michael 1632 conf_dns_lookup(conf);
922 adx 30 return;
923     }
924    
925 michael 3235 assert(res);
926 adx 30
927 michael 1632 memcpy(&conf->addr, res->ai_addr, res->ai_addrlen);
928     conf->addr.ss_len = res->ai_addrlen;
929     conf->addr.ss.ss_family = res->ai_family;
930    
931 michael 1123 freeaddrinfo(res);
932 adx 30 }
933    
934     /* conf_connect_allowed()
935     *
936     * inputs - pointer to inaddr
937     * - int type ipv4 or ipv6
938     * output - BANNED or accepted
939     * side effects - none
940     */
941     int
942     conf_connect_allowed(struct irc_ssaddr *addr, int aftype)
943     {
944 michael 3877 struct ip_entry *ip_found = NULL;
945 michael 6549 const struct MaskItem *conf = find_dline_conf(addr, aftype);
946 adx 30
947 michael 3235 if (conf)
948 michael 6549 {
949     /* DLINE exempt also gets you out of static limits/pacing... */
950     if (conf->type == CONF_EXEMPT)
951     return 0;
952 adx 30 return BANNED_CLIENT;
953 michael 6549 }
954 adx 30
955 michael 4325 ip_found = ipcache_find_or_add_address(addr);
956 adx 30
957 michael 4340 if ((CurrentTime - ip_found->last_attempt) < ConfigGeneral.throttle_time)
958 adx 30 {
959 michael 4340 if (ip_found->connection_count >= ConfigGeneral.throttle_count)
960 michael 3877 return TOO_FAST;
961 michael 4055
962     ++ip_found->connection_count;
963 adx 30 }
964 michael 3877 else
965     ip_found->connection_count = 1;
966 adx 30
967     ip_found->last_attempt = CurrentTime;
968     return 0;
969     }
970    
971     /* expire_tklines()
972     *
973     * inputs - tkline list pointer
974     * output - NONE
975     * side effects - expire tklines
976     */
977     static void
978 michael 4815 expire_tklines(dlink_list *list)
979 adx 30 {
980 michael 4815 dlink_node *node = NULL, *node_next = NULL;
981 adx 30
982 michael 4815 DLINK_FOREACH_SAFE(node, node_next, list->head)
983 adx 30 {
984 michael 4815 struct MaskItem *conf = node->data;
985 adx 30
986 michael 1649 if (!conf->until || conf->until > CurrentTime)
987 michael 1644 continue;
988    
989 michael 5871 if (ConfigGeneral.tkline_expire_notices)
990 michael 6318 sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE, "Temporary %s for [%s] expired",
991 michael 5871 (conf->type == CONF_XLINE) ? "X-line" : "RESV", conf->name);
992     conf_free(conf);
993 adx 30 }
994     }
995    
996 michael 4982 /* cleanup_tklines()
997     *
998     * inputs - NONE
999     * output - NONE
1000     * side effects - call function to expire temporary k/d lines
1001     * This is an event started off in ircd.c
1002     */
1003     void
1004     cleanup_tklines(void *unused)
1005     {
1006     hostmask_expire_temporary();
1007 michael 6716 expire_tklines(&gecos_items);
1008 michael 4982 expire_tklines(&nresv_items);
1009     expire_tklines(&cresv_items);
1010     }
1011    
1012 adx 30 /* oper_privs_as_string()
1013     *
1014 michael 58 * inputs - pointer to client_p
1015 adx 30 * output - pointer to static string showing oper privs
1016     * side effects - return as string, the oper privs as derived from port
1017     */
1018 michael 58 static const struct oper_privs
1019     {
1020 michael 1644 const unsigned int flag;
1021 michael 58 const unsigned char c;
1022     } flag_list[] = {
1023 michael 2012 { OPER_FLAG_ADMIN, 'A' },
1024 michael 6691 { OPER_FLAG_CLOSE, 'B' },
1025     { OPER_FLAG_CONNECT, 'C' },
1026     { OPER_FLAG_CONNECT_REMOTE, 'D' },
1027     { OPER_FLAG_DIE, 'E' },
1028     { OPER_FLAG_DLINE, 'F' },
1029     { OPER_FLAG_GLOBOPS, 'G' },
1030     { OPER_FLAG_JOIN_RESV, 'H' },
1031     { OPER_FLAG_KILL, 'I' },
1032     { OPER_FLAG_KILL_REMOTE, 'J' },
1033 michael 4019 { OPER_FLAG_KLINE, 'K' },
1034 michael 6691 { OPER_FLAG_LOCOPS, 'L' },
1035     { OPER_FLAG_MODULE, 'M' },
1036     { OPER_FLAG_NICK_RESV, 'N' },
1037     { OPER_FLAG_OPME, 'O' },
1038     { OPER_FLAG_REHASH, 'P' },
1039     { OPER_FLAG_REMOTEBAN, 'Q' },
1040     { OPER_FLAG_RESTART, 'R' },
1041     { OPER_FLAG_RESV, 'S' },
1042     { OPER_FLAG_SET, 'T' },
1043     { OPER_FLAG_SQUIT, 'U' },
1044     { OPER_FLAG_SQUIT_REMOTE, 'V' },
1045     { OPER_FLAG_UNDLINE, 'W' },
1046     { OPER_FLAG_UNKLINE, 'X' },
1047     { OPER_FLAG_UNRESV, 'Y' },
1048     { OPER_FLAG_UNXLINE, 'Z' },
1049     { OPER_FLAG_WALLOPS, 'a' },
1050     { OPER_FLAG_XLINE, 'b' },
1051 michael 1294 { 0, '\0' }
1052 michael 58 };
1053 adx 30
1054 michael 5639 const char *
1055 adx 30 oper_privs_as_string(const unsigned int port)
1056     {
1057 michael 2694 static char privs_out[IRCD_BUFSIZE];
1058 michael 58 char *privs_ptr = privs_out;
1059 adx 30
1060 michael 3283 for (const struct oper_privs *opriv = flag_list; opriv->flag; ++opriv)
1061 michael 6698 if (port & opriv->flag)
1062     *privs_ptr++ = opriv->c;
1063 michael 58
1064 michael 6700 if (privs_ptr == privs_out)
1065     *privs_ptr++ = '0';
1066    
1067 michael 58 *privs_ptr = '\0';
1068    
1069 adx 30 return privs_out;
1070     }
1071    
1072     /*
1073 michael 4298 * Input: A client to find the active operator {} name for.
1074 adx 30 * Output: The nick!user@host{oper} of the oper.
1075     * "oper" is server name for remote opers
1076     * Side effects: None.
1077     */
1078 michael 1364 const char *
1079 adx 30 get_oper_name(const struct Client *client_p)
1080     {
1081 michael 5514 static char buffer[IRCD_BUFSIZE];
1082 adx 30
1083 michael 4628 if (IsServer(client_p))
1084     return client_p->name;
1085    
1086 adx 30 if (MyConnect(client_p))
1087     {
1088 michael 4977 const dlink_node *const node = client_p->connection->confs.head;
1089    
1090     if (node)
1091 adx 30 {
1092 michael 4937 const struct MaskItem *const conf = node->data;
1093 adx 30
1094 michael 4937 if (conf->type == CONF_OPER)
1095 adx 30 {
1096 michael 2182 snprintf(buffer, sizeof(buffer), "%s!%s@%s{%s}", client_p->name,
1097 michael 1147 client_p->username, client_p->host, conf->name);
1098 michael 2182 return buffer;
1099 adx 30 }
1100     }
1101    
1102 michael 4298 /*
1103     * Probably should assert here for now. If there is an oper out there
1104     * with no operator {} conf attached, it would be good for us to know...
1105 adx 30 */
1106 michael 4298 assert(0); /* Oper without oper conf! */
1107 adx 30 }
1108    
1109 michael 1147 snprintf(buffer, sizeof(buffer), "%s!%s@%s{%s}", client_p->name,
1110 michael 2182 client_p->username, client_p->host, client_p->servptr->name);
1111 adx 30 return buffer;
1112     }
1113    
1114     /* clear_out_old_conf()
1115     *
1116     * inputs - none
1117     * output - none
1118     * side effects - Clear out the old configuration
1119     */
1120     static void
1121     clear_out_old_conf(void)
1122     {
1123 michael 4815 dlink_node *node = NULL, *node_next = NULL;
1124 adx 30 dlink_list *free_items [] = {
1125 michael 6628 &server_items, &operator_items,
1126 michael 7209 &gecos_items,
1127     &nresv_items, &service_items, &cresv_items, NULL
1128 adx 30 };
1129    
1130     dlink_list ** iterator = free_items; /* C is dumb */
1131    
1132     /* We only need to free anything allocated by yyparse() here.
1133     * Resetting structs, etc, is taken care of by set_default_conf().
1134     */
1135 michael 2916
1136 michael 5003 for (; *iterator; iterator++)
1137 adx 30 {
1138 michael 4815 DLINK_FOREACH_SAFE(node, node_next, (*iterator)->head)
1139 adx 30 {
1140 michael 4815 struct MaskItem *conf = node->data;
1141 michael 1632
1142 michael 4523 conf->active = 0;
1143 michael 1632
1144 michael 5847 if (!IsConfDatabase(conf))
1145 adx 30 {
1146 michael 5847 dlinkDelete(&conf->node, *iterator);
1147    
1148 michael 5843 if (!conf->ref_count)
1149 michael 2182 conf_free(conf);
1150 adx 30 }
1151     }
1152     }
1153    
1154 michael 2150 motd_clear();
1155    
1156 michael 671 /*
1157 michael 5583 * Don't delete the class table, rather mark all entries for deletion.
1158     * The table is cleaned up by class_delete_marked. - avalon
1159 adx 30 */
1160 michael 1632 class_mark_for_deletion();
1161 michael 671
1162 adx 30 clear_out_address_conf();
1163    
1164 michael 5583 /* Clean out module paths */
1165 adx 30 mod_clear_paths();
1166    
1167 michael 7217 cluster_clear(); /* Clear cluster {} items */
1168 michael 4545
1169 michael 7209 shared_clear(); /* Clear shared {} items */
1170    
1171 michael 7217 pseudo_clear(); /* Clear pseudo {} items */
1172    
1173 michael 5583 /* Clean out ConfigServerInfo */
1174 michael 7032 xfree(ConfigServerInfo.description);
1175 michael 4340 ConfigServerInfo.description = NULL;
1176 michael 7032 xfree(ConfigServerInfo.network_name);
1177 michael 4340 ConfigServerInfo.network_name = NULL;
1178 michael 7032 xfree(ConfigServerInfo.network_desc);
1179 michael 4340 ConfigServerInfo.network_desc = NULL;
1180 adx 30
1181 michael 7032 xfree(ConfigServerInfo.rsa_private_key_file);
1182 michael 4340 ConfigServerInfo.rsa_private_key_file = NULL;
1183 michael 7105 xfree(ConfigServerInfo.ssl_certificate_file);
1184     ConfigServerInfo.ssl_certificate_file = NULL;
1185     xfree(ConfigServerInfo.ssl_dh_param_file);
1186     ConfigServerInfo.ssl_dh_param_file = NULL;
1187     xfree(ConfigServerInfo.ssl_dh_elliptic_curve);
1188     ConfigServerInfo.ssl_dh_elliptic_curve = NULL;
1189     xfree(ConfigServerInfo.ssl_cipher_list);
1190     ConfigServerInfo.ssl_cipher_list = NULL;
1191     xfree(ConfigServerInfo.ssl_message_digest_algorithm);
1192     ConfigServerInfo.ssl_message_digest_algorithm = NULL;
1193 adx 30
1194 michael 5583 /* Clean out ConfigAdminInfo */
1195 michael 7032 xfree(ConfigAdminInfo.name);
1196 michael 4340 ConfigAdminInfo.name = NULL;
1197 michael 7032 xfree(ConfigAdminInfo.email);
1198 michael 4340 ConfigAdminInfo.email = NULL;
1199 michael 7032 xfree(ConfigAdminInfo.description);
1200 michael 4340 ConfigAdminInfo.description = NULL;
1201 adx 30
1202 michael 7032 xfree(ConfigServerHide.flatten_links_file);
1203 michael 6599 ConfigServerHide.flatten_links_file = NULL;
1204    
1205 michael 5583 /* Clean out listeners */
1206 michael 6367 listener_close_marked();
1207 adx 30 }
1208    
1209 michael 7105 static void
1210     conf_handle_tls(int cold)
1211     {
1212     if (!tls_new_cred())
1213     {
1214     if (cold)
1215     {
1216     ilog(LOG_TYPE_IRCD, "Error while initializing TLS");
1217     exit(-1);
1218     }
1219     else
1220     {
1221     /* Failed to load new settings/certs, old ones remain active */
1222     sendto_realops_flags(UMODE_SERVNOTICE, L_ALL, SEND_NOTICE,
1223     "Error reloading TLS settings, check the ircd log"); // report_crypto_errors logs this
1224     }
1225     }
1226     }
1227    
1228 michael 4982 /* read_conf_files()
1229     *
1230     * inputs - cold start YES or NO
1231     * output - none
1232     * side effects - read all conf files needed, ircd.conf kline.conf etc.
1233     */
1234     void
1235     read_conf_files(int cold)
1236     {
1237     const char *filename = NULL;
1238     char chanmodes[IRCD_BUFSIZE] = "";
1239     char chanlimit[IRCD_BUFSIZE] = "";
1240    
1241     conf_parser_ctx.boot = cold;
1242     filename = ConfigGeneral.configfile;
1243    
1244     /* We need to know the initial filename for the yyerror() to report
1245     FIXME: The full path is in conffilenamebuf first time since we
1246     don't know anything else
1247    
1248     - Gozem 2002-07-21
1249     */
1250     strlcpy(conffilebuf, filename, sizeof(conffilebuf));
1251    
1252     if ((conf_parser_ctx.conf_file = fopen(filename, "r")) == NULL)
1253     {
1254     if (cold)
1255     {
1256     ilog(LOG_TYPE_IRCD, "Unable to read configuration file '%s': %s",
1257     filename, strerror(errno));
1258 michael 6645 exit(EXIT_FAILURE);
1259 michael 4982 }
1260     else
1261     {
1262 michael 6318 sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
1263 michael 4982 "Unable to read configuration file '%s': %s",
1264     filename, strerror(errno));
1265     return;
1266     }
1267     }
1268    
1269     if (!cold)
1270     clear_out_old_conf();
1271    
1272     read_conf(conf_parser_ctx.conf_file);
1273     fclose(conf_parser_ctx.conf_file);
1274    
1275     log_reopen_all();
1276 michael 7105 conf_handle_tls(cold);
1277 michael 4982
1278 michael 6185 isupport_add("NICKLEN", NULL, ConfigServerInfo.max_nick_length);
1279     isupport_add("NETWORK", ConfigServerInfo.network_name, -1);
1280 michael 4982
1281 michael 6842 snprintf(chanmodes, sizeof(chanmodes), "beI:%u", ConfigChannel.max_bans);
1282 michael 6185 isupport_add("MAXLIST", chanmodes, -1);
1283     isupport_add("MAXTARGETS", NULL, ConfigGeneral.max_targets);
1284     isupport_add("CHANTYPES", "#", -1);
1285 michael 4982
1286 michael 6842 snprintf(chanlimit, sizeof(chanlimit), "#:%u",
1287 michael 4982 ConfigChannel.max_channels);
1288 michael 6185 isupport_add("CHANLIMIT", chanlimit, -1);
1289 michael 6936 snprintf(chanmodes, sizeof(chanmodes), "%s", "beI,k,l,cimnprstCMORST");
1290 michael 6185 isupport_add("CHANNELLEN", NULL, CHANNELLEN);
1291     isupport_add("TOPICLEN", NULL, ConfigServerInfo.max_topic_length);
1292     isupport_add("CHANMODES", chanmodes, -1);
1293 michael 4982
1294     /*
1295     * message_locale may have changed. rebuild isupport since it relies
1296     * on strlen(form_str(RPL_ISUPPORT))
1297     */
1298 michael 6185 isupport_rebuild();
1299 michael 4982 }
1300    
1301 adx 30 /* conf_add_class_to_conf()
1302     *
1303     * inputs - pointer to config item
1304     * output - NONE
1305 michael 2916 * side effects - Add a class pointer to a conf
1306 adx 30 */
1307     void
1308 michael 5797 conf_add_class_to_conf(struct MaskItem *conf, const char *name)
1309 adx 30 {
1310 michael 5797 if (EmptyString(name) || (conf->class = class_find(name, 1)) == NULL)
1311 adx 30 {
1312 michael 1632 conf->class = class_default;
1313 michael 671
1314 michael 4941 if (conf->type == CONF_CLIENT || conf->type == CONF_OPER)
1315 michael 6318 sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
1316 michael 2182 "Warning *** Defaulting to default class for %s@%s",
1317     conf->user, conf->host);
1318 adx 30 else
1319 michael 6318 sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
1320 michael 2182 "Warning *** Defaulting to default class for %s",
1321     conf->name);
1322 adx 30 }
1323     }
1324    
1325     /* yyerror()
1326     *
1327     * inputs - message from parser
1328     * output - NONE
1329     * side effects - message to opers and log file entry is made
1330     */
1331     void
1332     yyerror(const char *msg)
1333     {
1334     char newlinebuf[IRCD_BUFSIZE];
1335    
1336 michael 967 if (conf_parser_ctx.pass != 1)
1337 adx 30 return;
1338    
1339     strip_tabs(newlinebuf, linebuf, sizeof(newlinebuf));
1340 michael 6318 sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
1341 michael 1618 "\"%s\", line %u: %s: %s",
1342 adx 30 conffilebuf, lineno + 1, msg, newlinebuf);
1343 michael 1247 ilog(LOG_TYPE_IRCD, "\"%s\", line %u: %s: %s",
1344 adx 30 conffilebuf, lineno + 1, msg, newlinebuf);
1345     }
1346    
1347 michael 1751 void
1348     conf_error_report(const char *msg)
1349     {
1350     char newlinebuf[IRCD_BUFSIZE];
1351    
1352     strip_tabs(newlinebuf, linebuf, sizeof(newlinebuf));
1353 michael 6318 sendto_realops_flags(UMODE_SERVNOTICE, L_ADMIN, SEND_NOTICE,
1354 michael 1751 "\"%s\", line %u: %s: %s",
1355     conffilebuf, lineno + 1, msg, newlinebuf);
1356     ilog(LOG_TYPE_IRCD, "\"%s\", line %u: %s: %s",
1357     conffilebuf, lineno + 1, msg, newlinebuf);
1358     }
1359    
1360 adx 30 /*
1361     * valid_tkline()
1362 michael 2916 *
1363 adx 30 * inputs - pointer to ascii string to check
1364     * - whether the specified time is in seconds or minutes
1365     * output - -1 not enough parameters
1366     * - 0 if not an integer number, else the number
1367     * side effects - none
1368     * Originally written by Dianora (Diane, db@db.net)
1369     */
1370     time_t
1371 michael 2313 valid_tkline(const char *data, const int minutes)
1372 adx 30 {
1373 michael 2313 const unsigned char *p = (const unsigned char *)data;
1374     unsigned char tmpch = '\0';
1375 adx 30 time_t result = 0;
1376    
1377 michael 2313 while ((tmpch = *p++))
1378 adx 30 {
1379 michael 2313 if (!IsDigit(tmpch))
1380 michael 1121 return 0;
1381 michael 1120
1382     result *= 10;
1383 michael 2313 result += (tmpch & 0xF);
1384 adx 30 }
1385    
1386 michael 1120 /*
1387 michael 2916 * In the degenerate case where oper does a /quote kline 0 user@host :reason
1388 michael 5583 * i.e. they specifically use 0, I am going to return 1 instead as a return
1389     * value of non-zero is used to flag it as a temporary kline
1390 adx 30 */
1391     if (result == 0)
1392     result = 1;
1393    
1394 michael 2916 /*
1395 adx 30 * If the incoming time is in seconds convert it to minutes for the purpose
1396     * of this calculation
1397     */
1398     if (!minutes)
1399 michael 2916 result = result / 60;
1400 adx 30
1401     if (result > MAX_TDKLINE_TIME)
1402     result = MAX_TDKLINE_TIME;
1403    
1404 michael 5583 result = result * 60; /* Turn it into seconds */
1405 adx 30
1406     return result;
1407     }
1408    
1409 michael 2130 /* valid_wild_card_simple()
1410     *
1411     * inputs - data to check for sufficient non-wildcard characters
1412     * outputs - 1 if valid, else 0
1413     * side effects - none
1414     */
1415     int
1416     valid_wild_card_simple(const char *data)
1417     {
1418     const unsigned char *p = (const unsigned char *)data;
1419     unsigned char tmpch = '\0';
1420 michael 6332 unsigned int nonwild = 0, wild = 0;
1421 michael 2130
1422     while ((tmpch = *p++))
1423     {
1424 michael 4265 if (tmpch == '\\' && *p)
1425 michael 2130 {
1426     ++p;
1427 michael 4340 if (++nonwild >= ConfigGeneral.min_nonwildcard_simple)
1428 michael 2130 return 1;
1429     }
1430     else if (!IsMWildChar(tmpch))
1431     {
1432 michael 4340 if (++nonwild >= ConfigGeneral.min_nonwildcard_simple)
1433 michael 2130 return 1;
1434     }
1435 michael 6332 else
1436     ++wild;
1437 michael 2130 }
1438    
1439 michael 6332 return !wild;
1440 michael 2130 }
1441    
1442 adx 30 /* valid_wild_card()
1443     *
1444     * input - pointer to client
1445     * - int flag, 0 for no warning oper 1 for warning oper
1446     * - count of following varargs to check
1447     * output - 0 if not valid, 1 if valid
1448     * side effects - NOTICE is given to source_p if warn is 1
1449     */
1450     int
1451 michael 5791 valid_wild_card(struct Client *source_p, int count, ...)
1452 adx 30 {
1453 michael 3931 unsigned char tmpch = '\0';
1454 michael 3870 unsigned int nonwild = 0;
1455 adx 30 va_list args;
1456    
1457     /*
1458     * Now we must check the user and host to make sure there
1459     * are at least NONWILDCHARS non-wildcard characters in
1460     * them, otherwise assume they are attempting to kline
1461     * *@* or some variant of that. This code will also catch
1462     * people attempting to kline *@*.tld, as long as NONWILDCHARS
1463     * is greater than 3. In that case, there are only 3 non-wild
1464     * characters (tld), so if NONWILDCHARS is 4, the kline will
1465     * be disallowed.
1466     * -wnder
1467     */
1468    
1469     va_start(args, count);
1470    
1471     while (count--)
1472     {
1473 michael 3931 const unsigned char *p = va_arg(args, const unsigned char *);
1474 adx 30 if (p == NULL)
1475     continue;
1476    
1477     while ((tmpch = *p++))
1478     {
1479     if (!IsKWildChar(tmpch))
1480     {
1481     /*
1482     * If we find enough non-wild characters, we can
1483     * break - no point in searching further.
1484     */
1485 michael 4340 if (++nonwild >= ConfigGeneral.min_nonwildcard)
1486 michael 2659 {
1487     va_end(args);
1488 adx 30 return 1;
1489 michael 2659 }
1490 adx 30 }
1491     }
1492     }
1493    
1494 michael 5791 if (IsClient(source_p))
1495 michael 3110 sendto_one_notice(source_p, &me,
1496 michael 4058 ":Please include at least %u non-wildcard characters with the mask",
1497 michael 4340 ConfigGeneral.min_nonwildcard);
1498 michael 2659 va_end(args);
1499 adx 30 return 0;
1500     }
1501    
1502 michael 4982 /* find_user_host()
1503     *
1504     * inputs - pointer to client placing kline
1505     * - pointer to user_host_or_nick
1506     * - pointer to user buffer
1507     * - pointer to host buffer
1508     * output - 0 if not ok to kline, 1 to kline i.e. if valid user host
1509     * side effects -
1510     */
1511     static int
1512     find_user_host(struct Client *source_p, char *user_host_or_nick,
1513 michael 5783 char *luser, char *lhost)
1514 michael 4982 {
1515     struct Client *target_p = NULL;
1516     char *hostp = NULL;
1517    
1518     if (lhost == NULL)
1519     {
1520     strlcpy(luser, user_host_or_nick, USERLEN*4 + 1);
1521     return 1;
1522     }
1523    
1524     if ((hostp = strchr(user_host_or_nick, '@')) || *user_host_or_nick == '*')
1525     {
1526     /* Explicit user@host mask given */
1527     if (hostp) /* I'm a little user@host */
1528     {
1529     *(hostp++) = '\0'; /* short and squat */
1530    
1531     if (*user_host_or_nick)
1532     strlcpy(luser, user_host_or_nick, USERLEN*4 + 1); /* here is my user */
1533     else
1534     strcpy(luser, "*");
1535    
1536     if (*hostp)
1537     strlcpy(lhost, hostp, HOSTLEN + 1); /* here is my host */
1538     else
1539     strcpy(lhost, "*");
1540     }
1541     else
1542     {
1543     luser[0] = '*'; /* no @ found, assume its *@somehost */
1544     luser[1] = '\0';
1545     strlcpy(lhost, user_host_or_nick, HOSTLEN*4 + 1);
1546     }
1547    
1548     return 1;
1549     }
1550     else
1551     {
1552     /* Try to find user@host mask from nick */
1553     /* Okay to use source_p as the first param, because source_p == client_p */
1554     if ((target_p =
1555     find_chasing(source_p, user_host_or_nick)) == NULL)
1556     return 0; /* find_chasing sends ERR_NOSUCHNICK */
1557    
1558 michael 6313 if (HasFlag(target_p, FLAGS_EXEMPTKLINE))
1559 michael 4982 {
1560     if (IsClient(source_p))
1561     sendto_one_notice(source_p, &me, ":%s is E-lined", target_p->name);
1562     return 0;
1563     }
1564    
1565     /*
1566 michael 5583 * Turn the "user" bit into "*user", blow away '~'
1567 michael 4982 * if found in original user name (non-idented)
1568     */
1569     strlcpy(luser, target_p->username, USERLEN*4 + 1);
1570    
1571     if (target_p->username[0] == '~')
1572     luser[0] = '*';
1573    
1574 michael 6831 strlcpy(lhost, target_p->sockhost, HOSTLEN*4 + 1);
1575 michael 4982 return 1;
1576     }
1577    
1578     return 0;
1579     }
1580    
1581 adx 30 /* XXX should this go into a separate file ? -Dianora */
1582     /* parse_aline
1583     *
1584     * input - pointer to cmd name being used
1585     * - pointer to client using cmd
1586     * - parc parameter count
1587     * - parv[] list of parameters to parse
1588     * - parse_flags bit map of things to test
1589     * - pointer to user or string to parse into
1590     * - pointer to host or NULL to parse into if non NULL
1591 michael 2916 * - pointer to optional tkline time or NULL
1592 adx 30 * - pointer to target_server to parse into if non NULL
1593     * - pointer to reason to parse into
1594     *
1595 michael 5776 * output - 1 if valid, 0 if not valid
1596 adx 30 * side effects - A generalised k/d/x etc. line parser,
1597     * "ALINE [time] user@host|string [ON] target :reason"
1598     * will parse returning a parsed user, host if
1599     * h_p pointer is non NULL, string otherwise.
1600     * if tkline_time pointer is non NULL a tk line will be set
1601     * to non zero if found.
1602     * if tkline_time pointer is NULL and tk line is found,
1603     * error is reported.
1604     * if target_server is NULL and an "ON" is found error
1605     * is reported.
1606     * if reason pointer is NULL ignore pointer,
1607 db 936 * this allows use of parse_a_line in unkline etc.
1608 adx 30 *
1609     * - Dianora
1610     */
1611     int
1612     parse_aline(const char *cmd, struct Client *source_p,
1613 michael 2182 int parc, char **parv,
1614     int parse_flags, char **up_p, char **h_p, time_t *tkline_time,
1615     char **target_server, char **reason)
1616 adx 30 {
1617     int found_tkline_time=0;
1618 michael 5823 static char default_reason[] = CONF_NOREASON;
1619 adx 30 static char user[USERLEN*4+1];
1620     static char host[HOSTLEN*4+1];
1621    
1622     parv++;
1623     parc--;
1624    
1625     found_tkline_time = valid_tkline(*parv, TK_MINUTES);
1626    
1627 michael 4982 if (found_tkline_time)
1628 adx 30 {
1629     parv++;
1630     parc--;
1631    
1632 michael 4982 if (tkline_time)
1633 adx 30 *tkline_time = found_tkline_time;
1634     else
1635     {
1636 michael 3110 sendto_one_notice(source_p, &me, ":temp_line not supported by %s", cmd);
1637 michael 5776 return 0;
1638 adx 30 }
1639     }
1640    
1641     if (parc == 0)
1642     {
1643 michael 3109 sendto_one_numeric(source_p, &me, ERR_NEEDMOREPARAMS, cmd);
1644 michael 5776 return 0;
1645 adx 30 }
1646    
1647     if (h_p == NULL)
1648     *up_p = *parv;
1649     else
1650     {
1651 michael 5783 if (find_user_host(source_p, *parv, user, host) == 0)
1652 michael 5776 return 0;
1653 adx 30
1654     *up_p = user;
1655     *h_p = host;
1656     }
1657 michael 2916
1658 adx 30 parc--;
1659     parv++;
1660    
1661 michael 4982 if (parc)
1662 adx 30 {
1663     if (irccmp(*parv, "ON") == 0)
1664     {
1665     parc--;
1666     parv++;
1667    
1668 michael 1219 if (!HasOFlag(source_p, OPER_FLAG_REMOTEBAN))
1669 adx 30 {
1670 michael 3109 sendto_one_numeric(source_p, &me, ERR_NOPRIVS, "remoteban");
1671 michael 5776 return 0;
1672 adx 30 }
1673    
1674     if (parc == 0 || EmptyString(*parv))
1675     {
1676 michael 3109 sendto_one_numeric(source_p, &me, ERR_NEEDMOREPARAMS, cmd);
1677 michael 5776 return 0;
1678 adx 30 }
1679    
1680     *target_server = *parv;
1681     parc--;
1682     parv++;
1683     }
1684     else
1685     {
1686     /* Make sure target_server *is* NULL if no ON server found
1687     * caller probably NULL'd it first, but no harm to do it again -db
1688     */
1689 michael 4982 if (target_server)
1690 michael 2182 *target_server = NULL;
1691 adx 30 }
1692     }
1693    
1694 michael 4982 if (h_p)
1695 adx 30 {
1696 michael 4982 if (strchr(user, '!'))
1697 adx 30 {
1698 michael 3110 sendto_one_notice(source_p, &me, ":Invalid character '!' in kline");
1699 michael 5776 return 0;
1700 adx 30 }
1701    
1702 michael 5791 if ((parse_flags & AWILD) && !valid_wild_card(source_p, 2, *up_p, *h_p))
1703 michael 5776 return 0;
1704 adx 30 }
1705     else
1706 michael 5791 if ((parse_flags & AWILD) && !valid_wild_card(source_p, 1, *up_p))
1707 michael 5776 return 0;
1708 adx 30
1709 michael 4982 if (reason)
1710 adx 30 {
1711 michael 4982 if (parc && !EmptyString(*parv))
1712 adx 30 *reason = *parv;
1713     else
1714 michael 5823 *reason = default_reason;
1715 adx 30 }
1716    
1717     return 1;
1718     }
1719    
1720     /* match_conf_password()
1721     *
1722     * inputs - pointer to given password
1723     * - pointer to Conf
1724     * output - 1 or 0 if match
1725     * side effects - none
1726     */
1727     int
1728 michael 1632 match_conf_password(const char *password, const struct MaskItem *conf)
1729 adx 30 {
1730     const char *encr = NULL;
1731    
1732 michael 1632 if (EmptyString(password) || EmptyString(conf->passwd))
1733 adx 30 return 0;
1734    
1735 michael 1632 if (conf->flags & CONF_FLAGS_ENCRYPTED)
1736     encr = crypt(password, conf->passwd);
1737 adx 30 else
1738     encr = password;
1739    
1740 michael 3263 return encr && !strcmp(encr, conf->passwd);
1741 adx 30 }
1742    
1743     /*
1744     * split_nuh
1745     *
1746     * inputs - pointer to original mask (modified in place)
1747     * - pointer to pointer where nick should go
1748     * - pointer to pointer where user should go
1749     * - pointer to pointer where host should go
1750     * output - NONE
1751     * side effects - mask is modified in place
1752     * If nick pointer is NULL, ignore writing to it
1753     * this allows us to use this function elsewhere.
1754     *
1755     * mask nick user host
1756     * ---------------------- ------- ------- ------
1757     * Dianora!db@db.net Dianora db db.net
1758     * Dianora Dianora * *
1759     * db.net * * db.net
1760     * OR if nick pointer is NULL
1761     * Dianora - * Dianora
1762     * Dianora! Dianora * *
1763     * Dianora!@ Dianora * *
1764     * Dianora!db Dianora db *
1765     * Dianora!@db.net Dianora * db.net
1766     * db@db.net * db db.net
1767     * !@ * * *
1768     * @ * * *
1769     * ! * * *
1770     */
1771     void
1772 michael 593 split_nuh(struct split_nuh_item *const iptr)
1773 adx 30 {
1774     char *p = NULL, *q = NULL;
1775    
1776 michael 593 if (iptr->nickptr)
1777     strlcpy(iptr->nickptr, "*", iptr->nicksize);
1778 michael 4982
1779 michael 593 if (iptr->userptr)
1780     strlcpy(iptr->userptr, "*", iptr->usersize);
1781 michael 4982
1782 michael 593 if (iptr->hostptr)
1783     strlcpy(iptr->hostptr, "*", iptr->hostsize);
1784    
1785     if ((p = strchr(iptr->nuhmask, '!')))
1786 adx 30 {
1787     *p = '\0';
1788    
1789 michael 3375 if (iptr->nickptr && *iptr->nuhmask)
1790 michael 593 strlcpy(iptr->nickptr, iptr->nuhmask, iptr->nicksize);
1791 adx 30
1792 michael 2525 if ((q = strchr(++p, '@')))
1793     {
1794 michael 593 *q++ = '\0';
1795    
1796 michael 3375 if (*p)
1797 michael 593 strlcpy(iptr->userptr, p, iptr->usersize);
1798 adx 30
1799 michael 3375 if (*q)
1800 michael 593 strlcpy(iptr->hostptr, q, iptr->hostsize);
1801 adx 30 }
1802     else
1803     {
1804 michael 3375 if (*p)
1805 michael 593 strlcpy(iptr->userptr, p, iptr->usersize);
1806 adx 30 }
1807     }
1808 michael 593 else
1809 adx 30 {
1810 michael 593 /* No ! found so lets look for a user@host */
1811     if ((p = strchr(iptr->nuhmask, '@')))
1812 adx 30 {
1813 michael 593 /* if found a @ */
1814     *p++ = '\0';
1815 adx 30
1816 michael 3375 if (*iptr->nuhmask)
1817 michael 593 strlcpy(iptr->userptr, iptr->nuhmask, iptr->usersize);
1818 adx 30
1819 michael 3375 if (*p)
1820 michael 593 strlcpy(iptr->hostptr, p, iptr->hostsize);
1821 adx 30 }
1822 michael 593 else
1823 adx 30 {
1824 michael 5583 /* No @ found */
1825 michael 593 if (!iptr->nickptr || strpbrk(iptr->nuhmask, ".:"))
1826     strlcpy(iptr->hostptr, iptr->nuhmask, iptr->hostsize);
1827 adx 30 else
1828 michael 593 strlcpy(iptr->nickptr, iptr->nuhmask, iptr->nicksize);
1829 adx 30 }
1830     }
1831     }

Properties

Name Value
svn:eol-style native
svn:keywords Id Revision