ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/branches/8.2.x/src/conf.c
Revision: 6640
Committed: Sat Oct 24 18:36:54 2015 UTC (8 years, 5 months ago) by michael
Content type: text/x-csrc
File size: 49476 byte(s)
Log Message:
- conf.c:set_default_conf(): removed useless NULL assignments already done by clear_out_old_conf()

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

Properties

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