]> jfr.im git - irc/rqf/shadowircd.git/blob - src/ircd.c
Change license version in version.c.SH (GPLv1 -> GPLv2) so that it agrees with the...
[irc/rqf/shadowircd.git] / src / ircd.c
1 /*
2 * charybdis: A slightly useful ircd.
3 * ircd.c: Starts up and runs the ircd.
4 *
5 * Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
6 * Copyright (C) 1996-2002 Hybrid Development Team
7 * Copyright (C) 2002-2008 ircd-ratbox development team
8 * Copyright (C) 2005-2008 charybdis development team
9 *
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
23 * USA
24 *
25 * $Id$
26 */
27
28 #include "ratbox_lib.h"
29 #include "stdinc.h"
30 #include "setup.h"
31 #include "config.h"
32 #include "ircd.h"
33 #include "channel.h"
34 #include "class.h"
35 #include "client.h"
36 #include "common.h"
37 #include "hash.h"
38 #include "match.h"
39 #include "ircd_signal.h"
40 #include "msg.h" /* msgtab */
41 #include "hostmask.h"
42 #include "numeric.h"
43 #include "parse.h"
44 #include "res.h"
45 #include "restart.h"
46 #include "s_auth.h"
47 #include "s_conf.h"
48 #include "logger.h"
49 #include "s_serv.h" /* try_connections */
50 #include "s_user.h"
51 #include "s_stats.h"
52 #include "scache.h"
53 #include "send.h"
54 #include "supported.h"
55 #include "whowas.h"
56 #include "modules.h"
57 #include "hook.h"
58 #include "ircd_getopt.h"
59 #include "newconf.h"
60 #include "reject.h"
61 #include "s_conf.h"
62 #include "s_newconf.h"
63 #include "cache.h"
64 #include "monitor.h"
65 #include "patchlevel.h"
66 #include "serno.h"
67 #include "sslproc.h"
68 #include "chmode.h"
69 #include "privilege.h"
70 #include "bandbi.h"
71
72 /* /quote set variables */
73 struct SetOptions GlobalSetOptions;
74
75 /* configuration set from ircd.conf */
76 struct config_file_entry ConfigFileEntry;
77 /* server info set from ircd.conf */
78 struct server_info ServerInfo;
79 /* admin info set from ircd.conf */
80 struct admin_info AdminInfo;
81
82 struct Counter Count;
83 struct ServerStatistics ServerStats;
84
85 int maxconnections;
86 struct Client me; /* That's me */
87 struct LocalUser meLocalUser; /* That's also part of me */
88
89 rb_dlink_list global_client_list;
90
91 /* unknown/client pointer lists */
92 rb_dlink_list unknown_list; /* unknown clients ON this server only */
93 rb_dlink_list lclient_list; /* local clients only ON this server */
94 rb_dlink_list serv_list; /* local servers to this server ONLY */
95 rb_dlink_list global_serv_list; /* global servers on the network */
96 rb_dlink_list local_oper_list; /* our opers, duplicated in lclient_list */
97 rb_dlink_list oper_list; /* network opers */
98
99 const char *logFileName = LPATH;
100 const char *pidFileName = PPATH;
101
102 char **myargv;
103 int dorehash = 0;
104 int dorehashbans = 0;
105 int doremotd = 0;
106 int kline_queued = 0;
107 int server_state_foreground = 0;
108 int opers_see_all_users = 0;
109 int ssl_ok = 0;
110 int zlib_ok = 1;
111
112 int testing_conf = 0;
113 time_t startup_time;
114
115 int default_server_capabs = CAP_MASK;
116
117 int splitmode;
118 int splitchecking;
119 int split_users;
120 int split_servers;
121 int eob_count;
122
123 void
124 ircd_shutdown(const char *reason)
125 {
126 struct Client *target_p;
127 rb_dlink_node *ptr;
128
129 RB_DLINK_FOREACH(ptr, lclient_list.head)
130 {
131 target_p = ptr->data;
132
133 sendto_one(target_p, ":%s NOTICE %s :Server Terminating. %s",
134 me.name, target_p->name, reason);
135 }
136
137 RB_DLINK_FOREACH(ptr, serv_list.head)
138 {
139 target_p = ptr->data;
140
141 sendto_one(target_p, ":%s ERROR :Terminated by %s",
142 me.name, reason);
143 }
144
145 ilog(L_MAIN, "Server Terminating. %s", reason);
146 close_logfiles();
147
148 unlink(pidFileName);
149 exit(0);
150 }
151
152 /*
153 * print_startup - print startup information
154 */
155 static void
156 print_startup(int pid)
157 {
158 inotice("now running in %s mode from %s as pid %d ...",
159 !server_state_foreground ? "background" : "foreground",
160 ConfigFileEntry.dpath, pid);
161
162 /* let the parent process know the initialization was successful
163 * -- jilles */
164 if (!server_state_foreground)
165 write(0, ".", 1);
166 fclose(stdin);
167 fclose(stdout);
168 fclose(stderr);
169 open("/dev/null", O_RDWR);
170 dup2(0, 1);
171 dup2(0, 2);
172 }
173
174 /*
175 * init_sys
176 *
177 * inputs - boot_daemon flag
178 * output - none
179 * side effects - if boot_daemon flag is not set, don't daemonize
180 */
181 static void
182 init_sys(void)
183 {
184 #if defined(RLIMIT_NOFILE) && defined(HAVE_SYS_RESOURCE_H)
185 struct rlimit limit;
186
187 if(!getrlimit(RLIMIT_NOFILE, &limit))
188 {
189 maxconnections = limit.rlim_cur;
190 if(maxconnections <= MAX_BUFFER)
191 {
192 fprintf(stderr, "ERROR: Shell FD limits are too low.\n");
193 fprintf(stderr, "ERROR: charybdis reserves %d FDs, shell limits must be above this\n", MAX_BUFFER);
194 exit(EXIT_FAILURE);
195 }
196 return;
197 }
198 #endif /* RLIMIT_FD_MAX */
199 maxconnections = MAXCONNECTIONS;
200 }
201
202 static int
203 make_daemon(void)
204 {
205 int pid;
206 int pip[2];
207 char c;
208
209 if (pipe(pip) < 0)
210 {
211 perror("pipe");
212 exit(EXIT_FAILURE);
213 }
214 dup2(pip[1], 0);
215 close(pip[1]);
216 if((pid = fork()) < 0)
217 {
218 perror("fork");
219 exit(EXIT_FAILURE);
220 }
221 else if(pid > 0)
222 {
223 close(0);
224 /* Wait for initialization to finish, successfully or
225 * unsuccessfully. Until this point the child may still
226 * write to stdout/stderr.
227 * -- jilles */
228 if (read(pip[0], &c, 1) > 0)
229 exit(EXIT_SUCCESS);
230 else
231 exit(EXIT_FAILURE);
232 }
233
234 close(pip[0]);
235 setsid();
236 /* fclose(stdin);
237 fclose(stdout);
238 fclose(stderr); */
239
240 return 0;
241 }
242
243 static int printVersion = 0;
244
245 struct lgetopt myopts[] = {
246 {"dlinefile", &ConfigFileEntry.dlinefile,
247 STRING, "File to use for dlines.conf"},
248 {"configfile", &ConfigFileEntry.configfile,
249 STRING, "File to use for ircd.conf"},
250 {"klinefile", &ConfigFileEntry.klinefile,
251 STRING, "File to use for kline.conf"},
252 {"xlinefile", &ConfigFileEntry.xlinefile,
253 STRING, "File to use for xline.conf"},
254 {"resvfile", &ConfigFileEntry.resvfile,
255 STRING, "File to use for resv.conf"},
256 {"logfile", &logFileName,
257 STRING, "File to use for ircd.log"},
258 {"pidfile", &pidFileName,
259 STRING, "File to use for process ID"},
260 {"foreground", &server_state_foreground,
261 YESNO, "Run in foreground (don't detach)"},
262 {"version", &printVersion,
263 YESNO, "Print version and exit"},
264 {"conftest", &testing_conf,
265 YESNO, "Test the configuration files and exit"},
266 {"help", NULL, USAGE, "Print this text"},
267 {NULL, NULL, STRING, NULL},
268 };
269
270 static void
271 check_rehash(void *unused)
272 {
273 /*
274 * Check to see whether we have to rehash the configuration ..
275 */
276 if(dorehash)
277 {
278 rehash(1);
279 dorehash = 0;
280 }
281
282 if(dorehashbans)
283 {
284 rehash_bans(1);
285 dorehashbans = 0;
286 }
287
288 if(doremotd)
289 {
290 sendto_realops_snomask(SNO_GENERAL, L_ALL,
291 "Got signal SIGUSR1, reloading ircd motd file");
292 cache_user_motd();
293 doremotd = 0;
294 }
295 }
296
297 /*
298 * initalialize_global_set_options
299 *
300 * inputs - none
301 * output - none
302 * side effects - This sets all global set options needed
303 */
304 static void
305 initialize_global_set_options(void)
306 {
307 memset(&GlobalSetOptions, 0, sizeof(GlobalSetOptions));
308 /* memset( &ConfigFileEntry, 0, sizeof(ConfigFileEntry)); */
309
310 GlobalSetOptions.maxclients = ServerInfo.default_max_clients;
311
312 if(GlobalSetOptions.maxclients > (maxconnections - MAX_BUFFER) || (GlobalSetOptions.maxclients <= 0))
313 GlobalSetOptions.maxclients = maxconnections - MAX_BUFFER;
314
315 GlobalSetOptions.autoconn = 1;
316
317 GlobalSetOptions.spam_time = MIN_JOIN_LEAVE_TIME;
318 GlobalSetOptions.spam_num = MAX_JOIN_LEAVE_COUNT;
319
320 if(ConfigFileEntry.default_floodcount)
321 GlobalSetOptions.floodcount = ConfigFileEntry.default_floodcount;
322 else
323 GlobalSetOptions.floodcount = 10;
324
325 split_servers = ConfigChannel.default_split_server_count;
326 split_users = ConfigChannel.default_split_user_count;
327
328 if(split_users && split_servers
329 && (ConfigChannel.no_create_on_split || ConfigChannel.no_join_on_split))
330 {
331 splitmode = 1;
332 splitchecking = 1;
333 }
334
335 GlobalSetOptions.ident_timeout = IDENT_TIMEOUT;
336
337 rb_strlcpy(GlobalSetOptions.operstring,
338 ConfigFileEntry.default_operstring,
339 sizeof(GlobalSetOptions.operstring));
340 rb_strlcpy(GlobalSetOptions.adminstring,
341 ConfigFileEntry.default_adminstring,
342 sizeof(GlobalSetOptions.adminstring));
343
344 /* memset( &ConfigChannel, 0, sizeof(ConfigChannel)); */
345
346 /* End of global set options */
347
348 }
349
350 /*
351 * initialize_server_capabs
352 *
353 * inputs - none
354 * output - none
355 */
356 static void
357 initialize_server_capabs(void)
358 {
359 default_server_capabs &= ~CAP_ZIP;
360 }
361
362
363 /*
364 * write_pidfile
365 *
366 * inputs - filename+path of pid file
367 * output - none
368 * side effects - write the pid of the ircd to filename
369 */
370 static void
371 write_pidfile(const char *filename)
372 {
373 FILE *fb;
374 char buff[32];
375 if((fb = fopen(filename, "w")))
376 {
377 unsigned int pid = (unsigned int) getpid();
378
379 rb_snprintf(buff, sizeof(buff), "%u\n", pid);
380 if((fputs(buff, fb) == -1))
381 {
382 ilog(L_MAIN, "Error writing %u to pid file %s (%s)",
383 pid, filename, strerror(errno));
384 }
385 fclose(fb);
386 return;
387 }
388 else
389 {
390 ilog(L_MAIN, "Error opening pid file %s", filename);
391 }
392 }
393
394 /*
395 * check_pidfile
396 *
397 * inputs - filename+path of pid file
398 * output - none
399 * side effects - reads pid from pidfile and checks if ircd is in process
400 * list. if it is, gracefully exits
401 * -kre
402 */
403 static void
404 check_pidfile(const char *filename)
405 {
406 FILE *fb;
407 char buff[32];
408 pid_t pidfromfile;
409
410 /* Don't do logging here, since we don't have log() initialised */
411 if((fb = fopen(filename, "r")))
412 {
413 if(fgets(buff, 20, fb) != NULL)
414 {
415 pidfromfile = atoi(buff);
416 if(!kill(pidfromfile, 0))
417 {
418 printf("ircd: daemon is already running\n");
419 exit(-1);
420 }
421 }
422 fclose(fb);
423 }
424 }
425
426 /*
427 * setup_corefile
428 *
429 * inputs - nothing
430 * output - nothing
431 * side effects - setups corefile to system limits.
432 * -kre
433 */
434 static void
435 setup_corefile(void)
436 {
437 #ifdef HAVE_SYS_RESOURCE_H
438 struct rlimit rlim; /* resource limits */
439
440 /* Set corefilesize to maximum */
441 if(!getrlimit(RLIMIT_CORE, &rlim))
442 {
443 rlim.rlim_cur = rlim.rlim_max;
444 setrlimit(RLIMIT_CORE, &rlim);
445 }
446 #endif
447 }
448
449 static void
450 ircd_log_cb(const char *str)
451 {
452 ilog(L_MAIN, "libratbox reports: %s", str);
453 }
454
455 static void
456 ircd_restart_cb(const char *str)
457 {
458 inotice("libratbox has called the restart callback: %s", str);
459 restart(str);
460 }
461
462 /*
463 * Why EXIT_FAILURE here?
464 * Because if ircd_die_cb() is called it's because of a fatal
465 * error inside libcharybdis, and we don't know how to handle the
466 * exception, so it is logical to return a FAILURE exit code here.
467 * --nenolod
468 */
469 static void
470 ircd_die_cb(const char *str)
471 {
472 if(str != NULL)
473 {
474 /* Try to get the message out to currently logged in operators. */
475 sendto_realops_snomask(SNO_GENERAL, L_NETWIDE, "libratbox has called the die callback..aborting: %s", str);
476 inotice("libratbox has called the die callback..aborting: %s", str);
477 }
478 else
479 inotice("libratbox has called the die callback..aborting");
480
481 unlink(pidFileName);
482 exit(EXIT_FAILURE);
483 }
484
485 struct ev_entry *check_splitmode_ev = NULL;
486
487 static int
488 seed_with_urandom(void)
489 {
490 unsigned int seed;
491 int fd;
492
493 fd = open("/dev/urandom", O_RDONLY);
494 if(fd >= 0)
495 {
496 if(read(fd, &seed, sizeof(seed)) == sizeof(seed))
497 {
498 close(fd);
499 srand(seed);
500 return 1;
501 }
502 }
503 return 0;
504 }
505
506 static void
507 seed_with_clock(void)
508 {
509 const struct timeval *tv;
510 rb_set_time();
511 tv = rb_current_time_tv();
512 srand(tv->tv_sec ^ (tv->tv_usec | (getpid() << 20)));
513 }
514
515 static void
516 seed_random(void *unused)
517 {
518 unsigned int seed;
519 if(rb_get_random(&seed, sizeof(seed)) == -1)
520 {
521 if(!seed_with_urandom())
522 seed_with_clock();
523 return;
524 }
525 srand(seed);
526 }
527
528 /*
529 * main
530 *
531 * Initializes the IRCd.
532 *
533 * Inputs - number of commandline args, args themselves
534 * Outputs - none
535 * Side Effects - this is where the ircd gets going right now
536 */
537 int
538 main(int argc, char *argv[])
539 {
540 int fd;
541
542 /* Check to see if the user is running us as root, which is a nono */
543 if(geteuid() == 0)
544 {
545 fprintf(stderr, "Don't run ircd as root!!!\n");
546 return -1;
547 }
548
549 init_sys();
550
551 ConfigFileEntry.dpath = DPATH;
552 ConfigFileEntry.configfile = CPATH; /* Server configuration file */
553 ConfigFileEntry.klinefile = KPATH; /* Server kline file */
554 ConfigFileEntry.dlinefile = DLPATH; /* dline file */
555 ConfigFileEntry.xlinefile = XPATH;
556 ConfigFileEntry.resvfile = RESVPATH;
557 ConfigFileEntry.connect_timeout = 30; /* Default to 30 */
558
559 umask(077); /* better safe than sorry --SRB */
560
561 myargv = argv;
562 parseargs(&argc, &argv, myopts);
563
564 if(chdir(ConfigFileEntry.dpath))
565 {
566 fprintf(stderr, "Unable to chdir to %s: %s\n", ConfigFileEntry.dpath, strerror(errno));
567 exit(EXIT_FAILURE);
568 }
569
570 rb_set_time();
571
572 /*
573 * Setup corefile size immediately after boot -kre
574 */
575 setup_corefile();
576
577 memset(&me, 0, sizeof(me));
578 memset(&meLocalUser, 0, sizeof(meLocalUser));
579 me.localClient = &meLocalUser;
580
581 /* Make sure all lists are zeroed */
582 memset(&unknown_list, 0, sizeof(unknown_list));
583 memset(&lclient_list, 0, sizeof(lclient_list));
584 memset(&serv_list, 0, sizeof(serv_list));
585 memset(&global_serv_list, 0, sizeof(global_serv_list));
586 memset(&local_oper_list, 0, sizeof(local_oper_list));
587 memset(&oper_list, 0, sizeof(oper_list));
588
589 rb_dlinkAddTail(&me, &me.node, &global_client_list);
590
591 memset(&Count, 0, sizeof(Count));
592 memset(&ServerInfo, 0, sizeof(ServerInfo));
593 memset(&AdminInfo, 0, sizeof(AdminInfo));
594 memset(&ServerStats, 0, sizeof(struct ServerStatistics));
595
596 /* Initialise the channel capability usage counts... */
597 init_chcap_usage_counts();
598
599 if(printVersion)
600 {
601 printf("ircd: version %s(%s)\n", ircd_version, serno);
602 printf("ircd: %s\n", rb_lib_version());
603 exit(EXIT_SUCCESS);
604 }
605
606
607
608 setup_signals();
609
610 if (testing_conf)
611 server_state_foreground = 1;
612
613 /* Make sure fd 0, 1 and 2 are in use -- jilles */
614 do
615 {
616 fd = open("/dev/null", O_RDWR);
617 } while (fd < 2 && fd != -1);
618 if (fd > 2)
619 close(fd);
620 else if (fd == -1)
621 exit(1);
622
623 /* Check if there is pidfile and daemon already running */
624 if(!testing_conf)
625 {
626 check_pidfile(pidFileName);
627
628 if(!server_state_foreground)
629 make_daemon();
630 inotice("starting %s ...", ircd_version);
631 inotice("%s", rb_lib_version());
632 }
633
634 /* Init the event subsystem */
635 rb_lib_init(ircd_log_cb, ircd_restart_cb, ircd_die_cb, !server_state_foreground, maxconnections, DNODE_HEAP_SIZE, FD_HEAP_SIZE);
636 rb_linebuf_init(LINEBUF_HEAP_SIZE);
637
638 if(ConfigFileEntry.use_egd && (ConfigFileEntry.egdpool_path != NULL))
639 {
640 rb_init_prng(ConfigFileEntry.egdpool_path, RB_PRNG_EGD);
641 } else
642 rb_init_prng(NULL, RB_PRNG_DEFAULT);
643
644 seed_random(NULL);
645
646 init_main_logfile();
647 newconf_init();
648 init_s_conf();
649 init_s_newconf();
650 init_hash();
651 clear_scache_hash_table(); /* server cache name table */
652 init_host_hash();
653 clear_hash_parse();
654 init_client();
655 init_hook();
656 init_channels();
657 initclass();
658 initwhowas();
659 init_reject();
660 init_cache();
661 init_monitor();
662 init_isupport();
663 load_all_modules(1);
664 #ifndef STATIC_MODULES
665 load_core_modules(1);
666 #endif
667 init_auth(); /* Initialise the auth code */
668 init_resolver(); /* Needs to be setup before the io loop */
669 privilegeset_set_new("default", "", 0);
670
671 if (testing_conf)
672 fprintf(stderr, "\nBeginning config test\n");
673 read_conf_files(YES); /* cold start init conf files */
674 #ifndef STATIC_MODULES
675
676 mod_add_path(MODULE_DIR);
677 mod_add_path(MODULE_DIR "/autoload");
678 #endif
679
680 init_bandb();
681 init_ssld();
682
683 rehash_bans(0);
684
685 initialize_server_capabs(); /* Set up default_server_capabs */
686 initialize_global_set_options();
687
688 if(ServerInfo.name == NULL)
689 {
690 ierror("no server name specified in serverinfo block.");
691 return -1;
692 }
693 rb_strlcpy(me.name, ServerInfo.name, sizeof(me.name));
694
695 if(ServerInfo.sid[0] == '\0')
696 {
697 ierror("no server sid specified in serverinfo block.");
698 return -2;
699 }
700 strcpy(me.id, ServerInfo.sid);
701 init_uid();
702
703 /* serverinfo{} description must exist. If not, error out. */
704 if(ServerInfo.description == NULL)
705 {
706 ierror("no server description specified in serverinfo block.");
707 return -3;
708 }
709 rb_strlcpy(me.info, ServerInfo.description, sizeof(me.info));
710
711 if(ServerInfo.ssl_cert != NULL && ServerInfo.ssl_private_key != NULL)
712 {
713 /* just do the rb_setup_ssl_server to validate the config */
714 if(!rb_setup_ssl_server(ServerInfo.ssl_cert, ServerInfo.ssl_private_key, ServerInfo.ssl_dh_params))
715 {
716 ilog(L_MAIN, "WARNING: Unable to setup SSL.");
717 ssl_ok = 0;
718 }
719 else
720 ssl_ok = 1;
721 }
722
723 if (testing_conf)
724 {
725 fprintf(stderr, "\nConfig testing complete.\n");
726 fflush(stderr);
727 return 0; /* Why? We want the launcher to exit out. */
728 }
729
730 me.from = &me;
731 me.servptr = &me;
732 SetMe(&me);
733 make_server(&me);
734 startup_time = rb_current_time();
735 add_to_client_hash(me.name, &me);
736 add_to_id_hash(me.id, &me);
737 me.serv->nameinfo = scache_connect(me.name, me.info, 0);
738
739 rb_dlinkAddAlloc(&me, &global_serv_list);
740
741 construct_umodebuf();
742 construct_noparam_modes();
743
744 check_class();
745 write_pidfile(pidFileName);
746 load_help();
747 open_logfiles();
748
749 ilog(L_MAIN, "Server Ready");
750
751 /* We want try_connections to be called as soon as possible now! -- adrian */
752 /* No, 'cause after a restart it would cause all sorts of nick collides */
753 /* um. by waiting even longer, that just means we have even *more*
754 * nick collisions. what a stupid idea. set an event for the IO loop --fl
755 */
756 rb_event_addish("try_connections", try_connections, NULL, STARTUP_CONNECTIONS_TIME);
757 rb_event_addonce("try_connections_startup", try_connections, NULL, 2);
758 rb_event_add("check_rehash", check_rehash, NULL, 3);
759 rb_event_addish("reseed_srand", seed_random, NULL, 300); /* reseed every 10 minutes */
760
761 if(splitmode)
762 check_splitmode_ev = rb_event_add("check_splitmode", check_splitmode, NULL, 5);
763
764 print_startup(getpid());
765
766 rb_lib_loop(0);
767
768 return 0;
769 }