ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/trunk/src/conf.c
Revision: 4460
Committed: Mon Aug 11 19:45:11 2014 UTC (9 years, 7 months ago) by michael
Content type: text/x-csrc
File size: 51850 byte(s)
Log Message:
- conf.c:conf_dns_lookup(): use gethost_byname_type()
- res.h, res.c: removed gethost_byname()

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

Properties

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