ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/branches/8.2.x/src/conf.c
Revision: 4342
Committed: Sat Aug 2 16:58:21 2014 UTC (9 years, 7 months ago) by michael
Content type: text/x-csrc
File size: 51794 byte(s)
Log Message:
- Removed unused ConfigServerInfo structure member

File Contents

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

Properties

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