ViewVC Help
View File | Revision Log | Show Annotations | View Changeset | Root Listing
root/svn/ircd-hybrid/branches/8.2.x/src/conf.c
Revision: 7520
Committed: Sat Apr 2 15:55:25 2016 UTC (8 years ago) by michael
Content type: text/x-csrc
File size: 45043 byte(s)
Log Message:
- attach_connect_block(), check_server(): replace match() calls with irccmp() since the
  strings that are to be compared cannot contain wildcards anyway

File Contents

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

Properties

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