2 * ircd-ratbox: A slightly useful ircd.
3 * ircd.c: Starts up and runs the ircd.
5 * Copyright (C) 1990 Jarkko Oikarinen and University of Oulu, Co Center
6 * Copyright (C) 1996-2002 Hybrid Development Team
7 * Copyright (C) 2002-2005 ircd-ratbox development team
9 * This program is free software; you can redistribute it and/or modify
10 * it under the terms of the GNU General Public License as published by
11 * the Free Software Foundation; either version 2 of the License, or
12 * (at your option) any later version.
14 * This program is distributed in the hope that it will be useful,
15 * but WITHOUT ANY WARRANTY; without even the implied warranty of
16 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 * GNU General Public License for more details.
19 * You should have received a copy of the GNU General Public License
20 * along with this program; if not, write to the Free Software
21 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
24 * $Id: ircd.c 3047 2006-12-26 23:18:05Z jilles $
39 #include "irc_string.h"
40 #include "ircd_signal.h"
41 #include "sprintf_irc.h"
43 #include "msg.h" /* msgtab */
53 #include "s_serv.h" /* try_connections */
58 #include "supported.h"
63 #include "ircd_getopt.h"
69 #include "s_newconf.h"
72 #include "libcharybdis.h"
73 #include "patchlevel.h"
77 * Try and find the correct name to use with getrlimit() for setting the max.
78 * number of files allowed to be open by this process.
80 int _charybdis_data_version
= CHARYBDIS_DV
;
82 extern int ServerRunning
, initialVMTop
;
83 extern struct LocalUser meLocalUser
;
87 * get_vm_top - get the operating systems notion of the resident set size
93 * NOTE: sbrk is not part of the ANSI C library or the POSIX.1 standard
94 * however it seems that everyone defines it. Calling sbrk with a 0
95 * argument will return a pointer to the top of the process virtual
96 * memory without changing the process size, so this call should be
97 * reasonably safe (sbrk returns the new value for the top of memory).
98 * This code relies on the notion that the address returned will be an
99 * offset from 0 (NULL), so the result of sbrk is cast to a size_t and
100 * returned. We really shouldn't be using it here but...
102 void *vptr
= sbrk(0);
103 return (unsigned long) vptr
;
107 * get_maxrss - get the operating systems notion of the resident set size
112 return get_vm_top() - initialVMTop
;
116 * print_startup - print startup information
119 print_startup(int pid
)
121 inotice("now running in %s mode from %s as pid %d ...",
122 !server_state_foreground
? "background" : "foreground",
123 ConfigFileEntry
.dpath
, pid
);
125 /* let the parent process know the initialization was successful
127 if (!server_state_foreground
)
132 open("/dev/null", O_RDWR
);
138 ircd_log_cb(const char *str
)
140 ilog(L_MAIN
, "%s", str
);
144 * Why EXIT_FAILURE here?
145 * Because if ircd_die_cb() is called it's because of a fatal
146 * error inside libcharybdis, and we don't know how to handle the
147 * exception, so it is logical to return a FAILURE exit code here.
151 ircd_die_cb(const char *str
)
153 /* Try to get the message out to currently logged in operators. */
154 sendto_realops_snomask(SNO_GENERAL
, L_NETWIDE
, "Server panic! %s", str
);
155 inotice("server panic: %s", str
);
164 * inputs - boot_daemon flag
166 * side effects - if boot_daemon flag is not set, don't daemonize
171 #if defined(RLIMIT_FD_MAX) && defined(HAVE_SYS_RLIMIT_H)
174 if(!getrlimit(RLIMIT_FD_MAX
, &limit
))
177 if(limit
.rlim_max
< MAXCONNECTIONS
)
179 fprintf(stderr
, "ircd fd table too big\n");
180 fprintf(stderr
, "Hard Limit: %ld IRC max: %d\n",
181 (long) limit
.rlim_max
, MAXCONNECTIONS
);
182 fprintf(stderr
, "Fix MAXCONNECTIONS\n");
186 limit
.rlim_cur
= limit
.rlim_max
; /* make soft limit the max */
187 if(setrlimit(RLIMIT_FD_MAX
, &limit
) == -1)
189 fprintf(stderr
, "error setting max fd's to %ld\n", (long) limit
.rlim_cur
);
193 #endif /* RLIMIT_FD_MAX */
210 if((pid
= fork()) < 0)
218 /* Wait for initialization to finish, successfully or
219 * unsuccessfully. Until this point the child may still
220 * write to stdout/stderr.
222 if (read(pip
[0], &c
, 1) > 0)
237 static int printVersion
= 0;
239 struct lgetopt myopts
[] = {
240 {"dlinefile", &ConfigFileEntry
.dlinefile
,
241 STRING
, "File to use for dlines.conf"},
242 {"configfile", &ConfigFileEntry
.configfile
,
243 STRING
, "File to use for ircd.conf"},
244 {"klinefile", &ConfigFileEntry
.klinefile
,
245 STRING
, "File to use for kline.conf"},
246 {"xlinefile", &ConfigFileEntry
.xlinefile
,
247 STRING
, "File to use for xline.conf"},
248 {"resvfile", &ConfigFileEntry
.resvfile
,
249 STRING
, "File to use for resv.conf"},
250 {"logfile", &logFileName
,
251 STRING
, "File to use for ircd.log"},
252 {"pidfile", &pidFileName
,
253 STRING
, "File to use for process ID"},
254 {"foreground", &server_state_foreground
,
255 YESNO
, "Run in foreground (don't detach)"},
256 {"version", &printVersion
,
257 YESNO
, "Print version and exit"},
258 {"conftest", &testing_conf
,
259 YESNO
, "Test the configuration files and exit"},
260 {"help", NULL
, USAGE
, "Print this text"},
261 {NULL
, NULL
, STRING
, NULL
},
267 struct timeval newtime
;
270 #ifdef HAVE_GETTIMEOFDAY
271 if(gettimeofday(&newtime
, NULL
) == -1)
273 ilog(L_MAIN
, "Clock Failure (%d)", errno
);
274 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
275 "Clock Failure (%d), TS can be corrupted", errno
);
277 restart("Clock Failure");
280 newtime
.tv_sec
= time(NULL
);
283 if(newtime
.tv_sec
< CurrentTime
)
284 set_back_events(CurrentTime
- newtime
.tv_sec
);
286 SystemTime
.tv_sec
= newtime
.tv_sec
;
287 SystemTime
.tv_usec
= newtime
.tv_usec
;
291 check_rehash(void *unused
)
294 * Check to see whether we have to rehash the configuration ..
310 sendto_realops_snomask(SNO_GENERAL
, L_ALL
,
311 "Got signal SIGUSR1, reloading ircd motd file");
312 free_cachefile(user_motd
);
313 user_motd
= cache_file(MPATH
, "ircd.motd", 0);
319 charybdis_io_loop(void)
323 while (ServerRunning
)
325 /* Run pending events, then get the number of seconds to the next
329 delay
= eventNextTime();
330 if(delay
<= CurrentTime
)
339 * initalialize_global_set_options
343 * side effects - This sets all global set options needed
346 initialize_global_set_options(void)
348 memset(&GlobalSetOptions
, 0, sizeof(GlobalSetOptions
));
349 /* memset( &ConfigFileEntry, 0, sizeof(ConfigFileEntry)); */
351 GlobalSetOptions
.maxclients
= MAX_CLIENTS
;
352 GlobalSetOptions
.autoconn
= 1;
354 GlobalSetOptions
.spam_time
= MIN_JOIN_LEAVE_TIME
;
355 GlobalSetOptions
.spam_num
= MAX_JOIN_LEAVE_COUNT
;
357 if(ConfigFileEntry
.default_floodcount
)
358 GlobalSetOptions
.floodcount
= ConfigFileEntry
.default_floodcount
;
360 GlobalSetOptions
.floodcount
= 10;
362 split_servers
= ConfigChannel
.default_split_server_count
;
363 split_users
= ConfigChannel
.default_split_user_count
;
365 if(split_users
&& split_servers
366 && (ConfigChannel
.no_create_on_split
|| ConfigChannel
.no_join_on_split
))
372 GlobalSetOptions
.ident_timeout
= IDENT_TIMEOUT
;
374 strlcpy(GlobalSetOptions
.operstring
,
375 ConfigFileEntry
.default_operstring
,
376 sizeof(GlobalSetOptions
.operstring
));
377 strlcpy(GlobalSetOptions
.adminstring
,
378 ConfigFileEntry
.default_adminstring
,
379 sizeof(GlobalSetOptions
.adminstring
));
381 /* memset( &ConfigChannel, 0, sizeof(ConfigChannel)); */
383 /* End of global set options */
388 * initialize_server_capabs
394 initialize_server_capabs(void)
396 default_server_capabs
&= ~CAP_ZIP
;
403 * inputs - filename+path of pid file
405 * side effects - write the pid of the ircd to filename
408 write_pidfile(const char *filename
)
412 if((fb
= fopen(filename
, "w")))
414 unsigned int pid
= (unsigned int) getpid();
416 ircsnprintf(buff
, sizeof(buff
), "%u\n", pid
);
417 if((fputs(buff
, fb
) == -1))
419 ilog(L_MAIN
, "Error writing %u to pid file %s (%s)",
420 pid
, filename
, strerror(errno
));
427 ilog(L_MAIN
, "Error opening pid file %s", filename
);
434 * inputs - filename+path of pid file
436 * side effects - reads pid from pidfile and checks if ircd is in process
437 * list. if it is, gracefully exits
441 check_pidfile(const char *filename
)
447 /* Don't do logging here, since we don't have log() initialised */
448 if((fb
= fopen(filename
, "r")))
450 if(fgets(buff
, 20, fb
) != NULL
)
452 pidfromfile
= atoi(buff
);
453 if(!kill(pidfromfile
, 0))
455 printf("ircd: daemon is already running\n");
468 * side effects - setups corefile to system limits.
474 #ifdef HAVE_SYS_RESOURCE_H
475 struct rlimit rlim
; /* resource limits */
477 /* Set corefilesize to maximum */
478 if(!getrlimit(RLIMIT_CORE
, &rlim
))
480 rlim
.rlim_cur
= rlim
.rlim_max
;
481 setrlimit(RLIMIT_CORE
, &rlim
);
489 * Initializes the IRCd.
491 * Inputs - number of commandline args, args themselves
493 * Side Effects - this is where the ircd gets going right now
496 main(int argc
, char *argv
[])
500 /* Check to see if the user is running us as root, which is a nono */
503 fprintf(stderr
, "Don't run ircd as root!!!\n");
508 * save server boot time right away, so getrusage works correctly
512 * Setup corefile size immediately after boot -kre
517 * set initialVMTop before we allocate any memory
519 initialVMTop
= get_vm_top();
522 /* It ain't random, but it ought to be a little harder to guess */
523 srand(SystemTime
.tv_sec
^ (SystemTime
.tv_usec
| (getpid() << 20)));
524 memset(&me
, 0, sizeof(me
));
525 memset(&meLocalUser
, 0, sizeof(meLocalUser
));
526 me
.localClient
= &meLocalUser
;
528 /* Make sure all lists are zeroed */
529 memset(&unknown_list
, 0, sizeof(unknown_list
));
530 memset(&lclient_list
, 0, sizeof(lclient_list
));
531 memset(&serv_list
, 0, sizeof(serv_list
));
532 memset(&global_serv_list
, 0, sizeof(global_serv_list
));
533 memset(&local_oper_list
, 0, sizeof(local_oper_list
));
534 memset(&oper_list
, 0, sizeof(oper_list
));
536 dlinkAddTail(&me
, &me
.node
, &global_client_list
);
538 memset((void *) &Count
, 0, sizeof(Count
));
539 memset((void *) &ServerInfo
, 0, sizeof(ServerInfo
));
540 memset((void *) &AdminInfo
, 0, sizeof(AdminInfo
));
542 /* Initialise the channel capability usage counts... */
543 init_chcap_usage_counts();
545 ConfigFileEntry
.dpath
= DPATH
;
546 ConfigFileEntry
.configfile
= CPATH
; /* Server configuration file */
547 ConfigFileEntry
.klinefile
= KPATH
; /* Server kline file */
548 ConfigFileEntry
.dlinefile
= DLPATH
; /* dline file */
549 ConfigFileEntry
.xlinefile
= XPATH
;
550 ConfigFileEntry
.resvfile
= RESVPATH
;
551 ConfigFileEntry
.connect_timeout
= 30; /* Default to 30 */
553 umask(077); /* better safe than sorry --SRB */
555 parseargs(&argc
, &argv
, myopts
);
559 printf("ircd: version %s\n", ircd_version
);
563 if(chdir(ConfigFileEntry
.dpath
))
565 fprintf(stderr
, "Unable to chdir to %s: %s\n", ConfigFileEntry
.dpath
, strerror(errno
));
572 server_state_foreground
= 1;
576 server_state_foreground
= 1;
578 /* Make sure fd 0, 1 and 2 are in use -- jilles */
581 fd
= open("/dev/null", O_RDWR
);
582 } while (fd
< 2 && fd
!= -1);
588 /* Check if there is pidfile and daemon already running */
591 check_pidfile(pidFileName
);
593 if(!server_state_foreground
)
595 inotice("starting %s ...", ircd_version
);
598 /* Init the event subsystem */
599 libcharybdis_init(ircd_log_cb
, restart
, ircd_die_cb
);
603 if(!server_state_foreground
)
614 clear_scache_hash_table(); /* server cache name table */
629 #ifndef STATIC_MODULES
630 load_core_modules(1);
632 init_auth(); /* Initialise the auth code */
633 init_resolver(); /* Needs to be setup before the io loop */
636 fprintf(stderr
, "\nBeginning config test\n");
637 read_conf_files(YES
); /* cold start init conf files */
639 #ifndef STATIC_MODULES
641 mod_add_path(MODULE_DIR
);
642 mod_add_path(MODULE_DIR
"/autoload");
645 initialize_server_capabs(); /* Set up default_server_capabs */
646 initialize_global_set_options();
648 if(ServerInfo
.name
== NULL
)
650 ierror("no server name specified in serverinfo block.");
653 strlcpy(me
.name
, ServerInfo
.name
, sizeof(me
.name
));
655 if(ServerInfo
.sid
[0] == '\0')
657 ierror("no server sid specified in serverinfo block.");
660 strcpy(me
.id
, ServerInfo
.sid
);
663 /* serverinfo{} description must exist. If not, error out. */
664 if(ServerInfo
.description
== NULL
)
666 ierror("no server description specified in serverinfo block.");
669 strlcpy(me
.info
, ServerInfo
.description
, sizeof(me
.info
));
673 fprintf(stderr
, "\nConfig testing complete.\n");
675 return 0; /* Why? We want the launcher to exit out. */
682 me
.serv
->up
= me
.name
;
683 startup_time
= CurrentTime
;
684 add_to_client_hash(me
.name
, &me
);
685 add_to_id_hash(me
.id
, &me
);
687 dlinkAddAlloc(&me
, &global_serv_list
);
689 construct_umodebuf();
692 write_pidfile(pidFileName
);
696 ilog(L_MAIN
, "Server Ready");
698 eventAddIsh("cleanup_glines", cleanup_glines
, NULL
, CLEANUP_GLINES_TIME
);
700 /* We want try_connections to be called as soon as possible now! -- adrian */
701 /* No, 'cause after a restart it would cause all sorts of nick collides */
702 /* um. by waiting even longer, that just means we have even *more*
703 * nick collisions. what a stupid idea. set an event for the IO loop --fl
705 eventAddIsh("try_connections", try_connections
, NULL
, STARTUP_CONNECTIONS_TIME
);
706 eventAddOnce("try_connections_startup", try_connections
, NULL
, 0);
708 eventAddIsh("collect_zipstats", collect_zipstats
, NULL
, ZIPSTATS_TIME
);
710 /* Setup the timeout check. I'll shift it later :) -- adrian */
711 eventAddIsh("comm_checktimeouts", comm_checktimeouts
, NULL
, 1);
713 eventAdd("check_rehash", check_rehash
, NULL
, 1);
715 if(ConfigServerHide
.links_delay
> 0)
716 eventAdd("cache_links", cache_links
, NULL
,
717 ConfigServerHide
.links_delay
);
719 ConfigServerHide
.links_disabled
= 1;
722 eventAdd("check_splitmode", check_splitmode
, NULL
, 2);
726 print_startup(getpid());