ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/trunk/src/conf.c
Revision: 4439
Committed: Sat Aug 9 18:36:19 2014 UTC (9 years, 7 months ago) by michael
Content type: text/x-csrc
File size: 51723 byte(s)
Log Message:
- Renamed various variables

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 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->password);
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->password);
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 AddFlag(client_p, FLAGS_IPHASH);
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 case HM_IPV6:
716 if (who->localClient->aftype == AF_INET6)
717 if (match_ipv6(&who->localClient->ip, &conf->addr, conf->bits))
718 if (!conf->class->max_total || conf->class->ref_count < conf->class->max_total)
719 return conf;
720 break;
721 default:
722 assert(0);
723 }
724 }
725 }
726 }
727
728 break;
729
730 case CONF_SERVER:
731 DLINK_FOREACH(ptr, list_p->head)
732 {
733 conf = ptr->data;
734
735 if (EmptyString(conf->name))
736 continue;
737
738 if (name == NULL)
739 {
740 if (EmptyString(conf->host))
741 continue;
742 if (irccmp(conf->host, host) == 0)
743 return conf;
744 }
745 else if (irccmp(conf->name, name) == 0)
746 return conf;
747 }
748
749 break;
750
751 default:
752 break;
753 }
754
755 return NULL;
756 }
757
758 /* rehash()
759 *
760 * Actual REHASH service routine. Called with sig == 0 if it has been called
761 * as a result of an operator issuing this command, else assume it has been
762 * called as a result of the server receiving a HUP signal.
763 */
764 int
765 rehash(int sig)
766 {
767 if (sig)
768 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
769 "Got signal SIGHUP, reloading configuration file(s)");
770
771 restart_resolver();
772
773 /* don't close listeners until we know we can go ahead with the rehash */
774
775 read_conf_files(0);
776
777 if (ConfigServerInfo.description)
778 strlcpy(me.info, ConfigServerInfo.description, sizeof(me.info));
779
780 load_conf_modules();
781 check_conf_klines();
782
783 return 0;
784 }
785
786 /* set_default_conf()
787 *
788 * inputs - NONE
789 * output - NONE
790 * side effects - Set default values here.
791 * This is called **PRIOR** to parsing the
792 * configuration file. If you want to do some validation
793 * of values later, put them in validate_conf().
794 */
795 static void
796 set_default_conf(void)
797 {
798 /* verify init_class() ran, this should be an unnecessary check
799 * but its not much work.
800 */
801 assert(class_default == class_get_list()->tail->data);
802
803 #ifdef HAVE_LIBCRYPTO
804 ConfigServerInfo.message_digest_algorithm = EVP_sha256();
805 ConfigServerInfo.rsa_private_key = NULL;
806 ConfigServerInfo.rsa_private_key_file = NULL;
807 #endif
808
809 /* ConfigServerInfo.name is not rehashable */
810 /* ConfigServerInfo.name = ConfigServerInfo.name; */
811 ConfigServerInfo.description = NULL;
812 ConfigServerInfo.network_name = xstrdup(NETWORK_NAME_DEFAULT);
813 ConfigServerInfo.network_desc = xstrdup(NETWORK_DESC_DEFAULT);
814
815 memset(&ConfigServerInfo.ip, 0, sizeof(ConfigServerInfo.ip));
816 ConfigServerInfo.specific_ipv4_vhost = 0;
817 memset(&ConfigServerInfo.ip6, 0, sizeof(ConfigServerInfo.ip6));
818 ConfigServerInfo.specific_ipv6_vhost = 0;
819
820 ConfigServerInfo.max_clients = MAXCLIENTS_MAX;
821 ConfigServerInfo.max_nick_length = 9;
822 ConfigServerInfo.max_topic_length = 80;
823 ConfigServerInfo.hub = 0;
824
825 ConfigAdminInfo.name = NULL;
826 ConfigAdminInfo.email = NULL;
827 ConfigAdminInfo.description = NULL;
828
829 log_del_all();
830
831 ConfigLog.use_logging = 1;
832
833 ConfigChannel.disable_fake_channels = 0;
834 ConfigChannel.invite_client_count = 10;
835 ConfigChannel.invite_client_time = 300;
836 ConfigChannel.knock_client_count = 1;
837 ConfigChannel.knock_client_time = 300;
838 ConfigChannel.knock_delay_channel = 60;
839 ConfigChannel.max_channels = 25;
840 ConfigChannel.max_bans = 25;
841 ConfigChannel.default_split_user_count = 0;
842 ConfigChannel.default_split_server_count = 0;
843 ConfigChannel.no_join_on_split = 0;
844 ConfigChannel.no_create_on_split = 0;
845
846 ConfigServerHide.flatten_links = 0;
847 ConfigServerHide.links_delay = 300;
848 ConfigServerHide.hidden = 0;
849 ConfigServerHide.hide_servers = 0;
850 ConfigServerHide.hide_services = 0;
851 ConfigServerHide.hidden_name = xstrdup(NETWORK_NAME_DEFAULT);
852 ConfigServerHide.hide_server_ips = 0;
853 ConfigServerHide.disable_remote_commands = 0;
854
855 ConfigGeneral.away_count = 2;
856 ConfigGeneral.away_time = 10;
857 ConfigGeneral.service_name = xstrdup(SERVICE_NAME_DEFAULT);
858 ConfigGeneral.max_watch = WATCHSIZE_DEFAULT;
859 ConfigGeneral.cycle_on_host_change = 1;
860 ConfigGeneral.glines = 0;
861 ConfigGeneral.gline_time = 12 * 3600;
862 ConfigGeneral.gline_request_time = GLINE_REQUEST_EXPIRE_DEFAULT;
863 ConfigGeneral.gline_min_cidr = 16;
864 ConfigGeneral.gline_min_cidr6 = 48;
865 ConfigGeneral.invisible_on_connect = 1;
866 ConfigGeneral.tkline_expire_notices = 1;
867 ConfigGeneral.hide_spoof_ips = 1;
868 ConfigGeneral.ignore_bogus_ts = 0;
869 ConfigGeneral.disable_auth = 0;
870 ConfigGeneral.kill_chase_time_limit = 90;
871 ConfigGeneral.default_floodcount = 8;
872 ConfigGeneral.failed_oper_notice = 1;
873 ConfigGeneral.dots_in_ident = 0;
874 ConfigGeneral.min_nonwildcard = 4;
875 ConfigGeneral.min_nonwildcard_simple = 3;
876 ConfigGeneral.max_accept = 20;
877 ConfigGeneral.anti_nick_flood = 0;
878 ConfigGeneral.max_nick_time = 20;
879 ConfigGeneral.max_nick_changes = 5;
880 ConfigGeneral.anti_spam_exit_message_time = 0;
881 ConfigGeneral.ts_warn_delta = TS_WARN_DELTA_DEFAULT;
882 ConfigGeneral.ts_max_delta = TS_MAX_DELTA_DEFAULT;
883 ConfigGeneral.warn_no_connect_block = 1;
884 ConfigGeneral.stats_e_disabled = 0;
885 ConfigGeneral.stats_o_oper_only = 0;
886 ConfigGeneral.stats_k_oper_only = 1; /* 1 = masked */
887 ConfigGeneral.stats_i_oper_only = 1; /* 1 = masked */
888 ConfigGeneral.stats_P_oper_only = 0;
889 ConfigGeneral.stats_u_oper_only = 0;
890 ConfigGeneral.caller_id_wait = 60;
891 ConfigGeneral.opers_bypass_callerid = 0;
892 ConfigGeneral.pace_wait = 10;
893 ConfigGeneral.pace_wait_simple = 1;
894 ConfigGeneral.short_motd = 0;
895 ConfigGeneral.ping_cookie = 0;
896 ConfigGeneral.no_oper_flood = 0;
897 ConfigGeneral.true_no_oper_flood = 0;
898 ConfigGeneral.oper_pass_resv = 1;
899 ConfigGeneral.max_targets = MAX_TARGETS_DEFAULT;
900 ConfigGeneral.oper_only_umodes = UMODE_DEBUG;
901 ConfigGeneral.oper_umodes = UMODE_BOTS | UMODE_LOCOPS | UMODE_SERVNOTICE | UMODE_WALLOP;
902 ConfigGeneral.throttle_count = 1;
903 ConfigGeneral.throttle_time = 1;
904 }
905
906 static void
907 validate_conf(void)
908 {
909 if (ConfigGeneral.ts_warn_delta < TS_WARN_DELTA_MIN)
910 ConfigGeneral.ts_warn_delta = TS_WARN_DELTA_DEFAULT;
911
912 if (ConfigGeneral.ts_max_delta < TS_MAX_DELTA_MIN)
913 ConfigGeneral.ts_max_delta = TS_MAX_DELTA_DEFAULT;
914
915 if (ConfigServerInfo.network_name == NULL)
916 ConfigServerInfo.network_name = xstrdup(NETWORK_NAME_DEFAULT);
917
918 if (ConfigServerInfo.network_desc == NULL)
919 ConfigServerInfo.network_desc = xstrdup(NETWORK_DESC_DEFAULT);
920
921 if (ConfigGeneral.service_name == NULL)
922 ConfigGeneral.service_name = xstrdup(SERVICE_NAME_DEFAULT);
923
924 ConfigGeneral.max_watch = IRCD_MAX(ConfigGeneral.max_watch, WATCHSIZE_MIN);
925 }
926
927 /* read_conf()
928 *
929 * inputs - file descriptor pointing to config file to use
930 * output - None
931 * side effects - Read configuration file.
932 */
933 static void
934 read_conf(FILE *file)
935 {
936 lineno = 0;
937
938 set_default_conf(); /* Set default values prior to conf parsing */
939 conf_parser_ctx.pass = 1;
940 yyparse(); /* Pick up the classes first */
941
942 rewind(file);
943
944 conf_parser_ctx.pass = 2;
945 yyparse(); /* Load the values from the conf */
946 validate_conf(); /* Check to make sure some values are still okay. */
947 /* Some global values are also loaded here. */
948 class_delete_marked(); /* Delete unused classes that are marked for deletion */
949 }
950
951 /* lookup_confhost()
952 *
953 * start DNS lookups of all hostnames in the conf
954 * line and convert an IP addresses in a.b.c.d number for to IP#s.
955 */
956 void
957 lookup_confhost(struct MaskItem *conf)
958 {
959 struct addrinfo hints, *res;
960
961 /*
962 * Do name lookup now on hostnames given and store the
963 * ip numbers in conf structure.
964 */
965 memset(&hints, 0, sizeof(hints));
966
967 hints.ai_family = AF_UNSPEC;
968 hints.ai_socktype = SOCK_STREAM;
969
970 /* Get us ready for a bind() and don't bother doing dns lookup */
971 hints.ai_flags = AI_PASSIVE | AI_NUMERICHOST;
972
973 if (getaddrinfo(conf->host, NULL, &hints, &res))
974 {
975 conf_dns_lookup(conf);
976 return;
977 }
978
979 assert(res);
980
981 memcpy(&conf->addr, res->ai_addr, res->ai_addrlen);
982 conf->addr.ss_len = res->ai_addrlen;
983 conf->addr.ss.ss_family = res->ai_family;
984
985 freeaddrinfo(res);
986 }
987
988 /* conf_connect_allowed()
989 *
990 * inputs - pointer to inaddr
991 * - int type ipv4 or ipv6
992 * output - BANNED or accepted
993 * side effects - none
994 */
995 int
996 conf_connect_allowed(struct irc_ssaddr *addr, int aftype)
997 {
998 struct ip_entry *ip_found = NULL;
999 struct MaskItem *conf = find_dline_conf(addr, aftype);
1000
1001 /* DLINE exempt also gets you out of static limits/pacing... */
1002 if (conf && (conf->type == CONF_EXEMPT))
1003 return 0;
1004
1005 if (conf)
1006 return BANNED_CLIENT;
1007
1008 ip_found = ipcache_find_or_add_address(addr);
1009
1010 if ((CurrentTime - ip_found->last_attempt) < ConfigGeneral.throttle_time)
1011 {
1012 if (ip_found->connection_count >= ConfigGeneral.throttle_count)
1013 return TOO_FAST;
1014
1015 ++ip_found->connection_count;
1016 }
1017 else
1018 ip_found->connection_count = 1;
1019
1020 ip_found->last_attempt = CurrentTime;
1021 return 0;
1022 }
1023
1024 /* cleanup_tklines()
1025 *
1026 * inputs - NONE
1027 * output - NONE
1028 * side effects - call function to expire temporary k/d lines
1029 * This is an event started off in ircd.c
1030 */
1031 void
1032 cleanup_tklines(void *unused)
1033 {
1034 hostmask_expire_temporary();
1035 expire_tklines(&xconf_items);
1036 expire_tklines(&nresv_items);
1037 expire_tklines(&cresv_items);
1038 }
1039
1040 /* expire_tklines()
1041 *
1042 * inputs - tkline list pointer
1043 * output - NONE
1044 * side effects - expire tklines
1045 */
1046 static void
1047 expire_tklines(dlink_list *tklist)
1048 {
1049 dlink_node *ptr = NULL, *ptr_next = NULL;
1050 struct MaskItem *conf = NULL;
1051
1052 DLINK_FOREACH_SAFE(ptr, ptr_next, tklist->head)
1053 {
1054 conf = ptr->data;
1055
1056 if (!conf->until || conf->until > CurrentTime)
1057 continue;
1058
1059 if (conf->type == CONF_XLINE)
1060 {
1061 if (ConfigGeneral.tkline_expire_notices)
1062 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1063 "Temporary X-line for [%s] expired", conf->name);
1064 conf_free(conf);
1065 }
1066 else if (conf->type == CONF_NRESV || conf->type == CONF_CRESV)
1067 {
1068 if (ConfigGeneral.tkline_expire_notices)
1069 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1070 "Temporary RESV for [%s] expired", conf->name);
1071 conf_free(conf);
1072 }
1073 }
1074 }
1075
1076 /* oper_privs_as_string()
1077 *
1078 * inputs - pointer to client_p
1079 * output - pointer to static string showing oper privs
1080 * side effects - return as string, the oper privs as derived from port
1081 */
1082 static const struct oper_privs
1083 {
1084 const unsigned int flag;
1085 const unsigned char c;
1086 } flag_list[] = {
1087 { OPER_FLAG_ADMIN, 'A' },
1088 { OPER_FLAG_REMOTEBAN, 'B' },
1089 { OPER_FLAG_DIE, 'D' },
1090 { OPER_FLAG_GLINE, 'G' },
1091 { OPER_FLAG_REHASH, 'H' },
1092 { OPER_FLAG_KLINE, 'K' },
1093 { OPER_FLAG_KILL, 'N' },
1094 { OPER_FLAG_KILL_REMOTE, 'O' },
1095 { OPER_FLAG_CONNECT, 'P' },
1096 { OPER_FLAG_CONNECT_REMOTE, 'Q' },
1097 { OPER_FLAG_SQUIT, 'R' },
1098 { OPER_FLAG_SQUIT_REMOTE, 'S' },
1099 { OPER_FLAG_UNKLINE, 'U' },
1100 { OPER_FLAG_XLINE, 'X' },
1101 { 0, '\0' }
1102 };
1103
1104 char *
1105 oper_privs_as_string(const unsigned int port)
1106 {
1107 static char privs_out[IRCD_BUFSIZE];
1108 char *privs_ptr = privs_out;
1109
1110 for (const struct oper_privs *opriv = flag_list; opriv->flag; ++opriv)
1111 {
1112 if (port & opriv->flag)
1113 *privs_ptr++ = opriv->c;
1114 else
1115 *privs_ptr++ = ToLower(opriv->c);
1116 }
1117
1118 *privs_ptr = '\0';
1119
1120 return privs_out;
1121 }
1122
1123 /*
1124 * Input: A client to find the active operator {} name for.
1125 * Output: The nick!user@host{oper} of the oper.
1126 * "oper" is server name for remote opers
1127 * Side effects: None.
1128 */
1129 const char *
1130 get_oper_name(const struct Client *client_p)
1131 {
1132 const dlink_node *cnode = NULL;
1133 /* +5 for !,@,{,} and null */
1134 static char buffer[NICKLEN + USERLEN + HOSTLEN + HOSTLEN + 5];
1135
1136 if (MyConnect(client_p))
1137 {
1138 if ((cnode = client_p->localClient->confs.head))
1139 {
1140 const struct MaskItem *conf = cnode->data;
1141
1142 if (IsConfOperator(conf))
1143 {
1144 snprintf(buffer, sizeof(buffer), "%s!%s@%s{%s}", client_p->name,
1145 client_p->username, client_p->host, conf->name);
1146 return buffer;
1147 }
1148 }
1149
1150 /*
1151 * Probably should assert here for now. If there is an oper out there
1152 * with no operator {} conf attached, it would be good for us to know...
1153 */
1154 assert(0); /* Oper without oper conf! */
1155 }
1156
1157 snprintf(buffer, sizeof(buffer), "%s!%s@%s{%s}", client_p->name,
1158 client_p->username, client_p->host, client_p->servptr->name);
1159 return buffer;
1160 }
1161
1162 /* read_conf_files()
1163 *
1164 * inputs - cold start YES or NO
1165 * output - none
1166 * side effects - read all conf files needed, ircd.conf kline.conf etc.
1167 */
1168 void
1169 read_conf_files(int cold)
1170 {
1171 const char *filename = NULL;
1172 char chanmodes[IRCD_BUFSIZE] = "";
1173 char chanlimit[IRCD_BUFSIZE] = "";
1174
1175 conf_parser_ctx.boot = cold;
1176 filename = ConfigGeneral.configfile;
1177
1178 /* We need to know the initial filename for the yyerror() to report
1179 FIXME: The full path is in conffilenamebuf first time since we
1180 don't know anything else
1181
1182 - Gozem 2002-07-21
1183 */
1184 strlcpy(conffilebuf, filename, sizeof(conffilebuf));
1185
1186 if ((conf_parser_ctx.conf_file = fopen(filename, "r")) == NULL)
1187 {
1188 if (cold)
1189 {
1190 ilog(LOG_TYPE_IRCD, "Unable to read configuration file '%s': %s",
1191 filename, strerror(errno));
1192 exit(-1);
1193 }
1194 else
1195 {
1196 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1197 "Unable to read configuration file '%s': %s",
1198 filename, strerror(errno));
1199 return;
1200 }
1201 }
1202
1203 if (!cold)
1204 clear_out_old_conf();
1205
1206 read_conf(conf_parser_ctx.conf_file);
1207 fclose(conf_parser_ctx.conf_file);
1208
1209 log_reopen_all();
1210
1211 add_isupport("NICKLEN", NULL, ConfigServerInfo.max_nick_length);
1212 add_isupport("NETWORK", ConfigServerInfo.network_name, -1);
1213
1214 snprintf(chanmodes, sizeof(chanmodes), "beI:%d", ConfigChannel.max_bans);
1215 add_isupport("MAXLIST", chanmodes, -1);
1216 add_isupport("MAXTARGETS", NULL, ConfigGeneral.max_targets);
1217 add_isupport("CHANTYPES", "#", -1);
1218
1219 snprintf(chanlimit, sizeof(chanlimit), "#:%d",
1220 ConfigChannel.max_channels);
1221 add_isupport("CHANLIMIT", chanlimit, -1);
1222 snprintf(chanmodes, sizeof(chanmodes), "%s", "beI,k,l,cimnprstMORS");
1223 add_isupport("CHANNELLEN", NULL, CHANNELLEN);
1224 add_isupport("TOPICLEN", NULL, ConfigServerInfo.max_topic_length);
1225 add_isupport("CHANMODES", chanmodes, -1);
1226
1227 /*
1228 * message_locale may have changed. rebuild isupport since it relies
1229 * on strlen(form_str(RPL_ISUPPORT))
1230 */
1231 rebuild_isupport_message_line();
1232 }
1233
1234 /* clear_out_old_conf()
1235 *
1236 * inputs - none
1237 * output - none
1238 * side effects - Clear out the old configuration
1239 */
1240 static void
1241 clear_out_old_conf(void)
1242 {
1243 dlink_node *ptr = NULL, *next_ptr = NULL;
1244 struct MaskItem *conf;
1245 dlink_list *free_items [] = {
1246 &server_items, &oconf_items,
1247 &uconf_items, &xconf_items,
1248 &nresv_items, &cluster_items, &service_items, &cresv_items, NULL
1249 };
1250
1251 dlink_list ** iterator = free_items; /* C is dumb */
1252
1253 /* We only need to free anything allocated by yyparse() here.
1254 * Resetting structs, etc, is taken care of by set_default_conf().
1255 */
1256
1257 for (; *iterator != NULL; iterator++)
1258 {
1259 DLINK_FOREACH_SAFE(ptr, next_ptr, (*iterator)->head)
1260 {
1261 conf = ptr->data;
1262
1263 dlinkDelete(&conf->node, map_to_list(conf->type));
1264
1265 /* XXX This is less than pretty */
1266 if (conf->type == CONF_SERVER || conf->type == CONF_OPER)
1267 {
1268 if (!conf->ref_count)
1269 conf_free(conf);
1270 }
1271 else if (conf->type == CONF_XLINE)
1272 {
1273 if (!conf->until)
1274 conf_free(conf);
1275 }
1276 else
1277 conf_free(conf);
1278 }
1279 }
1280
1281 motd_clear();
1282
1283 /*
1284 * don't delete the class table, rather mark all entries
1285 * for deletion. The table is cleaned up by class_delete_marked. - avalon
1286 */
1287 class_mark_for_deletion();
1288
1289 clear_out_address_conf();
1290
1291 /* clean out module paths */
1292 mod_clear_paths();
1293
1294 /* clean out ConfigServerInfo */
1295 MyFree(ConfigServerInfo.description);
1296 ConfigServerInfo.description = NULL;
1297 MyFree(ConfigServerInfo.network_name);
1298 ConfigServerInfo.network_name = NULL;
1299 MyFree(ConfigServerInfo.network_desc);
1300 ConfigServerInfo.network_desc = NULL;
1301 #ifdef HAVE_LIBCRYPTO
1302 if (ConfigServerInfo.rsa_private_key)
1303 {
1304 RSA_free(ConfigServerInfo.rsa_private_key);
1305 ConfigServerInfo.rsa_private_key = NULL;
1306 }
1307
1308 MyFree(ConfigServerInfo.rsa_private_key_file);
1309 ConfigServerInfo.rsa_private_key_file = NULL;
1310 #endif
1311
1312 /* clean out ConfigAdminInfo */
1313 MyFree(ConfigAdminInfo.name);
1314 ConfigAdminInfo.name = NULL;
1315 MyFree(ConfigAdminInfo.email);
1316 ConfigAdminInfo.email = NULL;
1317 MyFree(ConfigAdminInfo.description);
1318 ConfigAdminInfo.description = NULL;
1319
1320 /* clean out listeners */
1321 close_listeners();
1322
1323 /* clean out general */
1324 MyFree(ConfigGeneral.service_name);
1325 ConfigGeneral.service_name = NULL;
1326 }
1327
1328 /* conf_add_class_to_conf()
1329 *
1330 * inputs - pointer to config item
1331 * output - NONE
1332 * side effects - Add a class pointer to a conf
1333 */
1334 void
1335 conf_add_class_to_conf(struct MaskItem *conf, const char *class_name)
1336 {
1337 if (class_name == NULL)
1338 {
1339 conf->class = class_default;
1340
1341 if (conf->type == CONF_CLIENT)
1342 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1343 "Warning *** Defaulting to default class for %s@%s",
1344 conf->user, conf->host);
1345 else
1346 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1347 "Warning *** Defaulting to default class for %s",
1348 conf->name);
1349 }
1350 else
1351 conf->class = class_find(class_name, 1);
1352
1353 if (conf->class == NULL)
1354 {
1355 if (conf->type == CONF_CLIENT)
1356 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1357 "Warning *** Defaulting to default class for %s@%s",
1358 conf->user, conf->host);
1359 else
1360 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1361 "Warning *** Defaulting to default class for %s",
1362 conf->name);
1363 conf->class = class_default;
1364 }
1365 }
1366
1367 /* yyerror()
1368 *
1369 * inputs - message from parser
1370 * output - NONE
1371 * side effects - message to opers and log file entry is made
1372 */
1373 void
1374 yyerror(const char *msg)
1375 {
1376 char newlinebuf[IRCD_BUFSIZE];
1377
1378 if (conf_parser_ctx.pass != 1)
1379 return;
1380
1381 strip_tabs(newlinebuf, linebuf, sizeof(newlinebuf));
1382 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1383 "\"%s\", line %u: %s: %s",
1384 conffilebuf, lineno + 1, msg, newlinebuf);
1385 ilog(LOG_TYPE_IRCD, "\"%s\", line %u: %s: %s",
1386 conffilebuf, lineno + 1, msg, newlinebuf);
1387 }
1388
1389 void
1390 conf_error_report(const char *msg)
1391 {
1392 char newlinebuf[IRCD_BUFSIZE];
1393
1394 strip_tabs(newlinebuf, linebuf, sizeof(newlinebuf));
1395 sendto_realops_flags(UMODE_ALL, L_ALL, SEND_NOTICE,
1396 "\"%s\", line %u: %s: %s",
1397 conffilebuf, lineno + 1, msg, newlinebuf);
1398 ilog(LOG_TYPE_IRCD, "\"%s\", line %u: %s: %s",
1399 conffilebuf, lineno + 1, msg, newlinebuf);
1400 }
1401
1402 /*
1403 * valid_tkline()
1404 *
1405 * inputs - pointer to ascii string to check
1406 * - whether the specified time is in seconds or minutes
1407 * output - -1 not enough parameters
1408 * - 0 if not an integer number, else the number
1409 * side effects - none
1410 * Originally written by Dianora (Diane, db@db.net)
1411 */
1412 time_t
1413 valid_tkline(const char *data, const int minutes)
1414 {
1415 const unsigned char *p = (const unsigned char *)data;
1416 unsigned char tmpch = '\0';
1417 time_t result = 0;
1418
1419 while ((tmpch = *p++))
1420 {
1421 if (!IsDigit(tmpch))
1422 return 0;
1423
1424 result *= 10;
1425 result += (tmpch & 0xF);
1426 }
1427
1428 /*
1429 * In the degenerate case where oper does a /quote kline 0 user@host :reason
1430 * i.e. they specifically use 0, I am going to return 1 instead
1431 * as a return value of non-zero is used to flag it as a temporary kline
1432 */
1433 if (result == 0)
1434 result = 1;
1435
1436 /*
1437 * If the incoming time is in seconds convert it to minutes for the purpose
1438 * of this calculation
1439 */
1440 if (!minutes)
1441 result = result / 60;
1442
1443 if (result > MAX_TDKLINE_TIME)
1444 result = MAX_TDKLINE_TIME;
1445
1446 result = result * 60; /* turn it into seconds */
1447
1448 return result;
1449 }
1450
1451 /* valid_wild_card_simple()
1452 *
1453 * inputs - data to check for sufficient non-wildcard characters
1454 * outputs - 1 if valid, else 0
1455 * side effects - none
1456 */
1457 int
1458 valid_wild_card_simple(const char *data)
1459 {
1460 const unsigned char *p = (const unsigned char *)data;
1461 unsigned char tmpch = '\0';
1462 unsigned int nonwild = 0;
1463
1464 while ((tmpch = *p++))
1465 {
1466 if (tmpch == '\\' && *p)
1467 {
1468 ++p;
1469 if (++nonwild >= ConfigGeneral.min_nonwildcard_simple)
1470 return 1;
1471 }
1472 else if (!IsMWildChar(tmpch))
1473 {
1474 if (++nonwild >= ConfigGeneral.min_nonwildcard_simple)
1475 return 1;
1476 }
1477 }
1478
1479 return 0;
1480 }
1481
1482 /* valid_wild_card()
1483 *
1484 * input - pointer to client
1485 * - int flag, 0 for no warning oper 1 for warning oper
1486 * - count of following varargs to check
1487 * output - 0 if not valid, 1 if valid
1488 * side effects - NOTICE is given to source_p if warn is 1
1489 */
1490 int
1491 valid_wild_card(struct Client *source_p, int warn, int count, ...)
1492 {
1493 unsigned char tmpch = '\0';
1494 unsigned int nonwild = 0;
1495 va_list args;
1496
1497 /*
1498 * Now we must check the user and host to make sure there
1499 * are at least NONWILDCHARS non-wildcard characters in
1500 * them, otherwise assume they are attempting to kline
1501 * *@* or some variant of that. This code will also catch
1502 * people attempting to kline *@*.tld, as long as NONWILDCHARS
1503 * is greater than 3. In that case, there are only 3 non-wild
1504 * characters (tld), so if NONWILDCHARS is 4, the kline will
1505 * be disallowed.
1506 * -wnder
1507 */
1508
1509 va_start(args, count);
1510
1511 while (count--)
1512 {
1513 const unsigned char *p = va_arg(args, const unsigned char *);
1514 if (p == NULL)
1515 continue;
1516
1517 while ((tmpch = *p++))
1518 {
1519 if (!IsKWildChar(tmpch))
1520 {
1521 /*
1522 * If we find enough non-wild characters, we can
1523 * break - no point in searching further.
1524 */
1525 if (++nonwild >= ConfigGeneral.min_nonwildcard)
1526 {
1527 va_end(args);
1528 return 1;
1529 }
1530 }
1531 }
1532 }
1533
1534 if (warn)
1535 sendto_one_notice(source_p, &me,
1536 ":Please include at least %u non-wildcard characters with the mask",
1537 ConfigGeneral.min_nonwildcard);
1538 va_end(args);
1539 return 0;
1540 }
1541
1542 /* XXX should this go into a separate file ? -Dianora */
1543 /* parse_aline
1544 *
1545 * input - pointer to cmd name being used
1546 * - pointer to client using cmd
1547 * - parc parameter count
1548 * - parv[] list of parameters to parse
1549 * - parse_flags bit map of things to test
1550 * - pointer to user or string to parse into
1551 * - pointer to host or NULL to parse into if non NULL
1552 * - pointer to optional tkline time or NULL
1553 * - pointer to target_server to parse into if non NULL
1554 * - pointer to reason to parse into
1555 *
1556 * output - 1 if valid, -1 if not valid
1557 * side effects - A generalised k/d/x etc. line parser,
1558 * "ALINE [time] user@host|string [ON] target :reason"
1559 * will parse returning a parsed user, host if
1560 * h_p pointer is non NULL, string otherwise.
1561 * if tkline_time pointer is non NULL a tk line will be set
1562 * to non zero if found.
1563 * if tkline_time pointer is NULL and tk line is found,
1564 * error is reported.
1565 * if target_server is NULL and an "ON" is found error
1566 * is reported.
1567 * if reason pointer is NULL ignore pointer,
1568 * this allows use of parse_a_line in unkline etc.
1569 *
1570 * - Dianora
1571 */
1572 int
1573 parse_aline(const char *cmd, struct Client *source_p,
1574 int parc, char **parv,
1575 int parse_flags, char **up_p, char **h_p, time_t *tkline_time,
1576 char **target_server, char **reason)
1577 {
1578 int found_tkline_time=0;
1579 static char def_reason[] = CONF_NOREASON;
1580 static char user[USERLEN*4+1];
1581 static char host[HOSTLEN*4+1];
1582
1583 parv++;
1584 parc--;
1585
1586 found_tkline_time = valid_tkline(*parv, TK_MINUTES);
1587
1588 if (found_tkline_time != 0)
1589 {
1590 parv++;
1591 parc--;
1592
1593 if (tkline_time != NULL)
1594 *tkline_time = found_tkline_time;
1595 else
1596 {
1597 sendto_one_notice(source_p, &me, ":temp_line not supported by %s", cmd);
1598 return -1;
1599 }
1600 }
1601
1602 if (parc == 0)
1603 {
1604 sendto_one_numeric(source_p, &me, ERR_NEEDMOREPARAMS, cmd);
1605 return -1;
1606 }
1607
1608 if (h_p == NULL)
1609 *up_p = *parv;
1610 else
1611 {
1612 if (find_user_host(source_p, *parv, user, host, parse_flags) == 0)
1613 return -1;
1614
1615 *up_p = user;
1616 *h_p = host;
1617 }
1618
1619 parc--;
1620 parv++;
1621
1622 if (parc != 0)
1623 {
1624 if (irccmp(*parv, "ON") == 0)
1625 {
1626 parc--;
1627 parv++;
1628
1629 if (target_server == NULL)
1630 {
1631 sendto_one_notice(source_p, &me, ":ON server not supported by %s", cmd);
1632 return -1;
1633 }
1634
1635 if (!HasOFlag(source_p, OPER_FLAG_REMOTEBAN))
1636 {
1637 sendto_one_numeric(source_p, &me, ERR_NOPRIVS, "remoteban");
1638 return -1;
1639 }
1640
1641 if (parc == 0 || EmptyString(*parv))
1642 {
1643 sendto_one_numeric(source_p, &me, ERR_NEEDMOREPARAMS, cmd);
1644 return -1;
1645 }
1646
1647 *target_server = *parv;
1648 parc--;
1649 parv++;
1650 }
1651 else
1652 {
1653 /* Make sure target_server *is* NULL if no ON server found
1654 * caller probably NULL'd it first, but no harm to do it again -db
1655 */
1656 if (target_server != NULL)
1657 *target_server = NULL;
1658 }
1659 }
1660
1661 if (h_p != NULL)
1662 {
1663 if (strchr(user, '!') != NULL)
1664 {
1665 sendto_one_notice(source_p, &me, ":Invalid character '!' in kline");
1666 return -1;
1667 }
1668
1669 if ((parse_flags & AWILD) && !valid_wild_card(source_p, 1, 2, *up_p, *h_p))
1670 return -1;
1671 }
1672 else
1673 if ((parse_flags & AWILD) && !valid_wild_card(source_p, 1, 1, *up_p))
1674 return -1;
1675
1676 if (reason != NULL)
1677 {
1678 if (parc != 0 && !EmptyString(*parv))
1679 {
1680 *reason = *parv;
1681 if (!valid_comment(source_p, *reason, 1))
1682 return -1;
1683 }
1684 else
1685 *reason = def_reason;
1686 }
1687
1688 return 1;
1689 }
1690
1691 /* find_user_host()
1692 *
1693 * inputs - pointer to client placing kline
1694 * - pointer to user_host_or_nick
1695 * - pointer to user buffer
1696 * - pointer to host buffer
1697 * output - 0 if not ok to kline, 1 to kline i.e. if valid user host
1698 * side effects -
1699 */
1700 static int
1701 find_user_host(struct Client *source_p, char *user_host_or_nick,
1702 char *luser, char *lhost, unsigned int flags)
1703 {
1704 struct Client *target_p = NULL;
1705 char *hostp = NULL;
1706
1707 if (lhost == NULL)
1708 {
1709 strlcpy(luser, user_host_or_nick, USERLEN*4 + 1);
1710 return 1;
1711 }
1712
1713 if ((hostp = strchr(user_host_or_nick, '@')) || *user_host_or_nick == '*')
1714 {
1715 /* Explicit user@host mask given */
1716
1717 if (hostp != NULL) /* I'm a little user@host */
1718 {
1719 *(hostp++) = '\0'; /* short and squat */
1720 if (*user_host_or_nick)
1721 strlcpy(luser, user_host_or_nick, USERLEN*4 + 1); /* here is my user */
1722 else
1723 strcpy(luser, "*");
1724
1725 if (*hostp)
1726 strlcpy(lhost, hostp, HOSTLEN + 1); /* here is my host */
1727 else
1728 strcpy(lhost, "*");
1729 }
1730 else
1731 {
1732 luser[0] = '*'; /* no @ found, assume its *@somehost */
1733 luser[1] = '\0';
1734 strlcpy(lhost, user_host_or_nick, HOSTLEN*4 + 1);
1735 }
1736
1737 return 1;
1738 }
1739 else
1740 {
1741 /* Try to find user@host mask from nick */
1742 /* Okay to use source_p as the first param, because source_p == client_p */
1743 if ((target_p =
1744 find_chasing(source_p, user_host_or_nick)) == NULL)
1745 return 0; /* find_chasing sends ERR_NOSUCHNICK */
1746
1747 if (IsExemptKline(target_p))
1748 {
1749 if (!IsServer(source_p))
1750 sendto_one_notice(source_p, &me, ":%s is E-lined", target_p->name);
1751 return 0;
1752 }
1753
1754 /*
1755 * turn the "user" bit into "*user", blow away '~'
1756 * if found in original user name (non-idented)
1757 */
1758 strlcpy(luser, target_p->username, USERLEN*4 + 1);
1759
1760 if (target_p->username[0] == '~')
1761 luser[0] = '*';
1762
1763 if (target_p->sockhost[0] == '\0' ||
1764 (target_p->sockhost[0] == '0' && target_p->sockhost[1] == '\0'))
1765 strlcpy(lhost, target_p->host, HOSTLEN*4 + 1);
1766 else
1767 strlcpy(lhost, target_p->sockhost, HOSTLEN*4 + 1);
1768 return 1;
1769 }
1770
1771 return 0;
1772 }
1773
1774 /* valid_comment()
1775 *
1776 * inputs - pointer to client
1777 * - pointer to comment
1778 * output - 0 if no valid comment,
1779 * - 1 if valid
1780 * side effects - truncates reason where necessary
1781 */
1782 int
1783 valid_comment(struct Client *source_p, char *comment, int warn)
1784 {
1785 if (strlen(comment) > REASONLEN)
1786 comment[REASONLEN-1] = '\0';
1787
1788 return 1;
1789 }
1790
1791 /* match_conf_password()
1792 *
1793 * inputs - pointer to given password
1794 * - pointer to Conf
1795 * output - 1 or 0 if match
1796 * side effects - none
1797 */
1798 int
1799 match_conf_password(const char *password, const struct MaskItem *conf)
1800 {
1801 const char *encr = NULL;
1802
1803 if (EmptyString(password) || EmptyString(conf->passwd))
1804 return 0;
1805
1806 if (conf->flags & CONF_FLAGS_ENCRYPTED)
1807 encr = crypt(password, conf->passwd);
1808 else
1809 encr = password;
1810
1811 return encr && !strcmp(encr, conf->passwd);
1812 }
1813
1814 /*
1815 * cluster_a_line
1816 *
1817 * inputs - client sending the cluster
1818 * - command name "KLINE" "XLINE" etc.
1819 * - capab -- CAP_KLN etc. from server.h
1820 * - cluster type -- CLUSTER_KLINE etc. from conf.h
1821 * - pattern and args to send along
1822 * output - none
1823 * side effects - Take source_p send the pattern with args given
1824 * along to all servers that match capab and cluster type
1825 */
1826 void
1827 cluster_a_line(struct Client *source_p, const char *command,
1828 int capab, int cluster_type, const char *pattern, ...)
1829 {
1830 va_list args;
1831 char buffer[IRCD_BUFSIZE] = "";
1832 const dlink_node *ptr = NULL;
1833
1834 va_start(args, pattern);
1835 vsnprintf(buffer, sizeof(buffer), pattern, args);
1836 va_end(args);
1837
1838 DLINK_FOREACH(ptr, cluster_items.head)
1839 {
1840 const struct MaskItem *conf = ptr->data;
1841
1842 if (conf->flags & cluster_type)
1843 sendto_match_servs(source_p, conf->name, CAP_CLUSTER|capab,
1844 "%s %s %s", command, conf->name, buffer);
1845 }
1846 }
1847
1848 /*
1849 * split_nuh
1850 *
1851 * inputs - pointer to original mask (modified in place)
1852 * - pointer to pointer where nick should go
1853 * - pointer to pointer where user should go
1854 * - pointer to pointer where host should go
1855 * output - NONE
1856 * side effects - mask is modified in place
1857 * If nick pointer is NULL, ignore writing to it
1858 * this allows us to use this function elsewhere.
1859 *
1860 * mask nick user host
1861 * ---------------------- ------- ------- ------
1862 * Dianora!db@db.net Dianora db db.net
1863 * Dianora Dianora * *
1864 * db.net * * db.net
1865 * OR if nick pointer is NULL
1866 * Dianora - * Dianora
1867 * Dianora! Dianora * *
1868 * Dianora!@ Dianora * *
1869 * Dianora!db Dianora db *
1870 * Dianora!@db.net Dianora * db.net
1871 * db@db.net * db db.net
1872 * !@ * * *
1873 * @ * * *
1874 * ! * * *
1875 */
1876 void
1877 split_nuh(struct split_nuh_item *const iptr)
1878 {
1879 char *p = NULL, *q = NULL;
1880
1881 if (iptr->nickptr)
1882 strlcpy(iptr->nickptr, "*", iptr->nicksize);
1883 if (iptr->userptr)
1884 strlcpy(iptr->userptr, "*", iptr->usersize);
1885 if (iptr->hostptr)
1886 strlcpy(iptr->hostptr, "*", iptr->hostsize);
1887
1888 if ((p = strchr(iptr->nuhmask, '!')))
1889 {
1890 *p = '\0';
1891
1892 if (iptr->nickptr && *iptr->nuhmask)
1893 strlcpy(iptr->nickptr, iptr->nuhmask, iptr->nicksize);
1894
1895 if ((q = strchr(++p, '@')))
1896 {
1897 *q++ = '\0';
1898
1899 if (*p)
1900 strlcpy(iptr->userptr, p, iptr->usersize);
1901
1902 if (*q)
1903 strlcpy(iptr->hostptr, q, iptr->hostsize);
1904 }
1905 else
1906 {
1907 if (*p)
1908 strlcpy(iptr->userptr, p, iptr->usersize);
1909 }
1910 }
1911 else
1912 {
1913 /* No ! found so lets look for a user@host */
1914 if ((p = strchr(iptr->nuhmask, '@')))
1915 {
1916 /* if found a @ */
1917 *p++ = '\0';
1918
1919 if (*iptr->nuhmask)
1920 strlcpy(iptr->userptr, iptr->nuhmask, iptr->usersize);
1921
1922 if (*p)
1923 strlcpy(iptr->hostptr, p, iptr->hostsize);
1924 }
1925 else
1926 {
1927 /* no @ found */
1928 if (!iptr->nickptr || strpbrk(iptr->nuhmask, ".:"))
1929 strlcpy(iptr->hostptr, iptr->nuhmask, iptr->hostsize);
1930 else
1931 strlcpy(iptr->nickptr, iptr->nuhmask, iptr->nicksize);
1932 }
1933 }
1934 }

Properties

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