]> git.netwichtig.de Git - user/henk/code/inspircd.git/blob - src/inspircd.cpp
Force heap allocation of refcountbase, create usecountbase for non-allocation referen...
[user/henk/code/inspircd.git] / src / inspircd.cpp
1 /*       +------------------------------------+
2  *       | Inspire Internet Relay Chat Daemon |
3  *       +------------------------------------+
4  *
5  *  InspIRCd: (C) 2002-2009 InspIRCd Development Team
6  * See: http://wiki.inspircd.org/Credits
7  *
8  * This program is free but copyrighted software; see
9  *          the file COPYING for details.
10  *
11  * ---------------------------------------------------
12  */
13
14 /* $Core */
15 #include "inspircd.h"
16 #include "inspircd_version.h"
17 #include <signal.h>
18
19 #ifndef WIN32
20         #include <dirent.h>
21         #include <unistd.h>
22         #include <sys/resource.h>
23         #include <dlfcn.h>
24         #include <getopt.h>
25
26         /* Some systems don't define RUSAGE_SELF. This should fix them. */
27         #ifndef RUSAGE_SELF
28                 #define RUSAGE_SELF 0
29         #endif
30
31         #include <pwd.h> // setuid
32         #include <grp.h> // setgid
33 #endif
34
35 #include <fstream>
36 #include "xline.h"
37 #include "bancache.h"
38 #include "socketengine.h"
39 #include "socket.h"
40 #include "command_parse.h"
41 #include "exitcodes.h"
42 #include "caller.h"
43 #include "testsuite.h"
44
45 InspIRCd* ServerInstance = NULL;
46 int* mysig = NULL;
47
48 /** Seperate from the other casemap tables so that code *can* still exclusively rely on RFC casemapping
49  * if it must.
50  *
51  * This is provided as a pointer so that modules can change it to their custom mapping tables,
52  * e.g. for national character support.
53  */
54 unsigned const char *national_case_insensitive_map = rfc_case_insensitive_map;
55
56
57 /* Moved from exitcodes.h -- due to duplicate symbols -- Burlex
58  * XXX this is a bit ugly. -- w00t
59  */
60 const char* ExitCodes[] =
61 {
62                 "No error", /* 0 */
63                 "DIE command", /* 1 */
64                 "execv() failed", /* 2 */
65                 "Internal error", /* 3 */
66                 "Config file error", /* 4 */
67                 "Logfile error", /* 5 */
68                 "POSIX fork failed", /* 6 */
69                 "Bad commandline parameters", /* 7 */
70                 "No ports could be bound", /* 8 */
71                 "Can't write PID file", /* 9 */
72                 "SocketEngine could not initialize", /* 10 */
73                 "Refusing to start up as root", /* 11 */
74                 "Found a <die> tag!", /* 12 */
75                 "Couldn't load module on startup", /* 13 */
76                 "Could not create windows forked process", /* 14 */
77                 "Received SIGTERM", /* 15 */
78                 "Bad command handler loaded", /* 16 */
79                 "RegisterServiceCtrlHandler failed", /* 17 */
80                 "UpdateSCMStatus failed", /* 18 */
81                 "CreateEvent failed" /* 19 */
82 };
83
84 template<typename T> static void DeleteZero(T*&n)
85 {
86         T* t = n;
87         n = NULL;
88         delete t;
89 }
90
91 void InspIRCd::Cleanup()
92 {
93         for (unsigned int i = 0; i < ports.size(); i++)
94         {
95                 /* This calls the constructor and closes the listening socket */
96                 ports[i]->cull();
97                 delete ports[i];
98         }
99         ports.clear();
100
101         /* Close all client sockets, or the new process inherits them */
102         std::vector<LocalUser*>::reverse_iterator i = Users->local_users.rbegin();
103         while (i != this->Users->local_users.rend())
104         {
105                 User* u = *i++;
106                 Users->QuitUser(u, "Server shutdown");
107         }
108
109         GlobalCulls.Apply();
110         Modules->UnloadAll();
111
112         /* Delete objects dynamically allocated in constructor (destructor would be more appropriate, but we're likely exiting) */
113         /* Must be deleted before modes as it decrements modelines */
114         if (FakeClient)
115                 FakeClient->cull();
116         if (Res)
117                 Res->cull();
118         DeleteZero(this->FakeClient);
119         DeleteZero(this->Users);
120         DeleteZero(this->Modes);
121         DeleteZero(this->XLines);
122         DeleteZero(this->Parser);
123         DeleteZero(this->stats);
124         DeleteZero(this->Modules);
125         DeleteZero(this->BanCache);
126         DeleteZero(this->SNO);
127         DeleteZero(this->Config);
128         DeleteZero(this->Res);
129         DeleteZero(this->chanlist);
130         DeleteZero(this->PI);
131         DeleteZero(this->Threads);
132         DeleteZero(this->Timers);
133         DeleteZero(this->SE);
134         /* Close logging */
135         this->Logs->CloseLogs();
136         DeleteZero(this->Logs);
137 }
138
139 void InspIRCd::Restart(const std::string &reason)
140 {
141         /* SendError flushes each client's queue,
142          * regardless of writeability state
143          */
144         this->SendError(reason);
145
146         /* Figure out our filename (if theyve renamed it, we're boned) */
147         std::string me;
148
149         char** argv = Config->cmdline.argv;
150
151 #ifdef WINDOWS
152         char module[MAX_PATH];
153         if (GetModuleFileName(NULL, module, MAX_PATH))
154                 me = module;
155 #else
156         me = argv[0];
157 #endif
158
159         this->Cleanup();
160
161         if (execv(me.c_str(), argv) == -1)
162         {
163                 /* Will raise a SIGABRT if not trapped */
164                 throw CoreException(std::string("Failed to execv()! error: ") + strerror(errno));
165         }
166 }
167
168 void InspIRCd::ResetMaxBans()
169 {
170         for (chan_hash::const_iterator i = chanlist->begin(); i != chanlist->end(); i++)
171                 i->second->ResetMaxBans();
172 }
173
174 /** Because hash_map doesnt free its buckets when we delete items (this is a 'feature')
175  * we must occasionally rehash the hash (yes really).
176  * We do this by copying the entries from the old hash to a new hash, causing all
177  * empty buckets to be weeded out of the hash. We dont do this on a timer, as its
178  * very expensive, so instead we do it when the user types /REHASH and expects a
179  * short delay anyway.
180  */
181 void InspIRCd::RehashUsersAndChans()
182 {
183         user_hash* old_users = this->Users->clientlist;
184         user_hash* old_uuid  = this->Users->uuidlist;
185         chan_hash* old_chans = this->chanlist;
186
187         this->Users->clientlist = new user_hash();
188         this->Users->uuidlist = new user_hash();
189         this->chanlist = new chan_hash();
190
191         for (user_hash::const_iterator n = old_users->begin(); n != old_users->end(); n++)
192                 this->Users->clientlist->insert(*n);
193
194         delete old_users;
195
196         for (user_hash::const_iterator n = old_uuid->begin(); n != old_uuid->end(); n++)
197                 this->Users->uuidlist->insert(*n);
198
199         delete old_uuid;
200
201         for (chan_hash::const_iterator n = old_chans->begin(); n != old_chans->end(); n++)
202                 this->chanlist->insert(*n);
203
204         delete old_chans;
205 }
206
207 void InspIRCd::SetSignals()
208 {
209 #ifndef WIN32
210         signal(SIGALRM, SIG_IGN);
211         signal(SIGHUP, InspIRCd::SetSignal);
212         signal(SIGPIPE, SIG_IGN);
213         signal(SIGCHLD, SIG_IGN);
214         /* We want E2BIG not a signal! */
215         signal(SIGXFSZ, SIG_IGN);
216 #endif
217         signal(SIGTERM, InspIRCd::SetSignal);
218 }
219
220 void InspIRCd::QuickExit(int status)
221 {
222         exit(0);
223 }
224
225 bool InspIRCd::DaemonSeed()
226 {
227 #ifdef WINDOWS
228         printf_c("InspIRCd Process ID: \033[1;32m%lu\033[0m\n", GetCurrentProcessId());
229         return true;
230 #else
231         signal(SIGTERM, InspIRCd::QuickExit);
232
233         int childpid;
234         if ((childpid = fork ()) < 0)
235                 return false;
236         else if (childpid > 0)
237         {
238                 /* We wait here for the child process to kill us,
239                  * so that the shell prompt doesnt come back over
240                  * the output.
241                  * Sending a kill with a signal of 0 just checks
242                  * if the child pid is still around. If theyre not,
243                  * they threw an error and we should give up.
244                  */
245                 while (kill(childpid, 0) != -1)
246                         sleep(1);
247                 exit(0);
248         }
249         setsid ();
250         umask (007);
251         printf("InspIRCd Process ID: \033[1;32m%lu\033[0m\n",(unsigned long)getpid());
252
253         signal(SIGTERM, InspIRCd::SetSignal);
254
255         rlimit rl;
256         if (getrlimit(RLIMIT_CORE, &rl) == -1)
257         {
258                 this->Logs->Log("STARTUP",DEFAULT,"Failed to getrlimit()!");
259                 return false;
260         }
261         rl.rlim_cur = rl.rlim_max;
262
263         if (setrlimit(RLIMIT_CORE, &rl) == -1)
264                         this->Logs->Log("STARTUP",DEFAULT,"setrlimit() failed, cannot increase coredump size.");
265
266         return true;
267 #endif
268 }
269
270 void InspIRCd::WritePID(const std::string &filename)
271 {
272         std::string fname(filename);
273         if (fname.empty())
274                 fname = "data/inspircd.pid";
275         std::ofstream outfile(fname.c_str());
276         if (outfile.is_open())
277         {
278                 outfile << getpid();
279                 outfile.close();
280         }
281         else
282         {
283                 printf("Failed to write PID-file '%s', exiting.\n",fname.c_str());
284                 this->Logs->Log("STARTUP",DEFAULT,"Failed to write PID-file '%s', exiting.",fname.c_str());
285                 Exit(EXIT_STATUS_PID);
286         }
287 }
288
289 InspIRCd::InspIRCd(int argc, char** argv) :
290          ConfigFileName("conf/inspircd.conf"),
291
292          /* Functor pointer initialisation.
293           *
294           * THIS MUST MATCH THE ORDER OF DECLARATION OF THE FUNCTORS, e.g. the methods
295           * themselves within the class.
296           */
297          NICKForced("NICKForced", NULL),
298          OperQuit("OperQuit", NULL),
299          IsChannel(&HandleIsChannel),
300          IsSID(&HandleIsSID),
301          Rehash(&HandleRehash),
302          IsNick(&HandleIsNick),
303          IsIdent(&HandleIsIdent),
304          FloodQuitUser(&HandleFloodQuitUser)
305 {
306 #ifdef WIN32
307         // Strict, frequent checking of memory on debug builds
308         _CrtSetDbgFlag ( _CRTDBG_CHECK_ALWAYS_DF | _CRTDBG_ALLOC_MEM_DF | _CRTDBG_LEAK_CHECK_DF );
309
310         // Avoid erroneous frees on early exit
311         WindowsIPC = 0;
312 #endif
313
314         ServerInstance = this;
315
316         Extensions.Register(&NICKForced);
317         Extensions.Register(&OperQuit);
318
319         FailedPortList pl;
320         int do_version = 0, do_nofork = 0, do_debug = 0,
321             do_nolog = 0, do_root = 0, do_testsuite = 0;    /* flag variables */
322         int c = 0;
323
324         // Initialize so that if we exit before proper initialization they're not deleted
325         this->Logs = 0;
326         this->Threads = 0;
327         this->PI = 0;
328         this->Users = 0;
329         this->chanlist = 0;
330         this->Config = 0;
331         this->SNO = 0;
332         this->BanCache = 0;
333         this->Modules = 0;
334         this->stats = 0;
335         this->Timers = 0;
336         this->Parser = 0;
337         this->XLines = 0;
338         this->Modes = 0;
339         this->Res = 0;
340         this->ConfigThread = NULL;
341
342         // Initialise TIME
343         this->TIME = this->OLDTIME = this->startup_time = time(NULL);
344
345         // This must be created first, so other parts of Insp can use it while starting up
346         this->Logs = new LogManager;
347
348         SE = CreateSocketEngine();
349
350         this->Threads = new ThreadEngine;
351
352         /* Default implementation does nothing */
353         this->PI = new ProtocolInterface;
354
355         this->s_signal = 0;
356
357         // Create base manager classes early, so nothing breaks
358         this->Users = new UserManager;
359
360         this->Users->unregistered_count = 0;
361
362         this->Users->clientlist = new user_hash();
363         this->Users->uuidlist = new user_hash();
364         this->chanlist = new chan_hash();
365
366         this->Config = new ServerConfig;
367         this->SNO = new SnomaskManager;
368         this->BanCache = new BanCacheManager;
369         this->Modules = new ModuleManager();
370         this->stats = new serverstats();
371         this->Timers = new TimerManager;
372         this->Parser = new CommandParser;
373         this->XLines = new XLineManager;
374
375         this->Config->cmdline.argv = argv;
376         this->Config->cmdline.argc = argc;
377
378         srand(this->TIME);
379
380         struct option longopts[] =
381         {
382                 { "nofork",     no_argument,            &do_nofork,     1       },
383                 { "logfile",    required_argument,      NULL,           'f'     },
384                 { "config",     required_argument,      NULL,           'c'     },
385                 { "debug",      no_argument,            &do_debug,      1       },
386                 { "nolog",      no_argument,            &do_nolog,      1       },
387                 { "runasroot",  no_argument,            &do_root,       1       },
388                 { "version",    no_argument,            &do_version,    1       },
389                 { "testsuite",  no_argument,            &do_testsuite,  1       },
390                 { 0, 0, 0, 0 }
391         };
392
393         int index;
394         while ((c = getopt_long_only(argc, argv, ":f:", longopts, &index)) != -1)
395         {
396                 switch (c)
397                 {
398                         case 'f':
399                                 /* Log filename was set */
400                                 Config->cmdline.startup_log = optarg;
401                         break;
402                         case 'c':
403                                 /* Config filename was set */
404                                 ConfigFileName = optarg;
405                         break;
406                         case 0:
407                                 /* getopt_long_only() set an int variable, just keep going */
408                         break;
409                         case '?':
410                                 /* Unknown parameter */
411                         default:
412                                 /* Fall through to handle other weird values too */
413                                 printf("Unknown parameter '%s'\n", argv[optind-1]);
414                                 printf("Usage: %s [--nofork] [--nolog] [--debug] [--logfile <filename>]\n%*s[--runasroot] [--version] [--config <config>] [--testsuite]\n", argv[0], static_cast<int>(8+strlen(argv[0])), " ");
415                                 Exit(EXIT_STATUS_ARGV);
416                         break;
417                 }
418         }
419
420         if (do_testsuite)
421                 do_nofork = do_debug = true;
422
423         if (do_version)
424         {
425                 printf("\n%s r%s\n", VERSION, REVISION);
426                 Exit(EXIT_STATUS_NOERROR);
427         }
428
429 #ifdef WIN32
430
431         // Handle forking
432         if(!do_nofork)
433         {
434                 DWORD ExitCode = WindowsForkStart();
435                 if(ExitCode)
436                         exit(ExitCode);
437         }
438
439         // Set up winsock
440         WSADATA wsadata;
441         WSAStartup(MAKEWORD(2,0), &wsadata);
442         ChangeWindowsSpecificPointers();
443 #endif
444
445         /* Set the finished argument values */
446         Config->cmdline.nofork = do_nofork;
447         Config->cmdline.forcedebug = do_debug;
448         Config->cmdline.writelog = !do_nolog;
449         Config->cmdline.TestSuite = do_testsuite;
450
451         if (do_debug)
452         {
453                 FileWriter* fw = new FileWriter(stdout);
454                 FileLogStream* fls = new FileLogStream(DEBUG, fw);
455                 Logs->AddLogTypes("*", fls, true);
456         }
457         else if (!this->OpenLog(argv, argc))
458         {
459                 printf("ERROR: Could not open initial logfile %s: %s\n\n", Config->cmdline.startup_log.c_str(), strerror(errno));
460                 Exit(EXIT_STATUS_LOG);
461         }
462
463         if (!ServerConfig::FileExists(ConfigFileName.c_str()))
464         {
465 #ifdef WIN32
466                 /* Windows can (and defaults to) hide file extensions, so let's play a bit nice for windows users. */
467                 std::string txtconf = this->ConfigFileName;
468                 txtconf.append(".txt");
469
470                 if (ServerConfig::FileExists(txtconf.c_str()))
471                 {
472                         ConfigFileName = txtconf;
473                 }
474                 else
475 #endif
476                 {
477                         printf("ERROR: Cannot open config file: %s\nExiting...\n", ConfigFileName.c_str());
478                         this->Logs->Log("STARTUP",DEFAULT,"Unable to open config file %s", ConfigFileName.c_str());
479                         Exit(EXIT_STATUS_CONFIG);
480                 }
481         }
482
483         printf_c("\033[1;32mInspire Internet Relay Chat Server, compiled %s at %s\n",__DATE__,__TIME__);
484         printf_c("(C) InspIRCd Development Team.\033[0m\n\n");
485         printf_c("Developers:\n");
486         printf_c("\t\033[1;32mBrain, FrostyCoolSlug, w00t, Om, Special\n");
487         printf_c("\t\033[1;32mpeavey, aquanight, psychon, dz, danieldg\033[0m\n\n");
488         printf_c("Others:\t\t\t\033[1;32mSee /INFO Output\033[0m\n");
489
490         this->Modes = new ModeParser;
491
492         if (!do_root)
493                 this->CheckRoot();
494         else
495         {
496                 printf("* WARNING * WARNING * WARNING * WARNING * WARNING * \n\n");
497                 printf("YOU ARE RUNNING INSPIRCD AS ROOT. THIS IS UNSUPPORTED\n");
498                 printf("AND IF YOU ARE HACKED, CRACKED, SPINDLED OR MUTILATED\n");
499                 printf("OR ANYTHING ELSE UNEXPECTED HAPPENS TO YOU OR YOUR\n");
500                 printf("SERVER, THEN IT IS YOUR OWN FAULT. IF YOU DID NOT MEAN\n");
501                 printf("TO START INSPIRCD AS ROOT, HIT CTRL+C NOW AND RESTART\n");
502                 printf("THE PROGRAM AS A NORMAL USER. YOU HAVE BEEN WARNED!\n");
503                 printf("\nInspIRCd starting in 20 seconds, ctrl+c to abort...\n");
504                 sleep(20);
505         }
506
507         this->SetSignals();
508
509         if (!Config->cmdline.nofork)
510         {
511                 if (!this->DaemonSeed())
512                 {
513                         printf("ERROR: could not go into daemon mode. Shutting down.\n");
514                         Logs->Log("STARTUP", DEFAULT, "ERROR: could not go into daemon mode. Shutting down.");
515                         Exit(EXIT_STATUS_FORK);
516                 }
517         }
518
519         SE->RecoverFromFork();
520
521         /* During startup we don't actually initialize this
522          * in the thread engine.
523          */
524         this->Config->Read();
525         this->Config->Apply(NULL, "");
526         Logs->OpenFileLogs();
527
528         this->Res = new DNS();
529
530         /*
531          * Initialise SID/UID.
532          * For an explanation as to exactly how this works, and why it works this way, see GetUID().
533          *   -- w00t
534          */
535         if (Config->sid.empty())
536         {
537                 // Generate one
538                 unsigned int sid = 0;
539                 char sidstr[4];
540
541                 for (const char* x = Config->ServerName.c_str(); *x; ++x)
542                         sid = 5 * sid + *x;
543                 for (const char* y = Config->ServerDesc.c_str(); *y; ++y)
544                         sid = 5 * sid + *y;
545                 sprintf(sidstr, "%03d", sid % 1000);
546
547                 Config->sid = sidstr;
548         }
549
550         /* set up fake client again this time with the correct uid */
551         this->FakeClient = new FakeUser(Config->sid, Config->ServerName);
552
553         // Get XLine to do it's thing.
554         this->XLines->CheckELines();
555         this->XLines->ApplyLines();
556
557         int bounditems = BindPorts(pl);
558
559         printf("\n");
560
561         this->Modules->LoadAll();
562
563         /* Just in case no modules were loaded - fix for bug #101 */
564         this->BuildISupport();
565         Config->ApplyDisabledCommands(Config->DisabledCommands);
566
567         if (!pl.empty())
568         {
569                 printf("\nWARNING: Not all your client ports could be bound --\nstarting anyway with %d of %d client ports bound.\n\n",
570                         bounditems, bounditems + (int)pl.size());
571                 printf("The following port(s) failed to bind:\n");
572                 printf("Hint: Try using a public IP instead of blank or *\n\n");
573                 int j = 1;
574                 for (FailedPortList::iterator i = pl.begin(); i != pl.end(); i++, j++)
575                 {
576                         printf("%d.\tAddress: %s\tReason: %s\n", j, i->first.empty() ? "<all>" : i->first.c_str(), i->second.c_str());
577                 }
578         }
579
580         printf("\nInspIRCd is now running as '%s'[%s] with %d max open sockets\n",
581                 Config->ServerName.c_str(),Config->GetSID().c_str(), SE->GetMaxFds());
582
583 #ifndef WINDOWS
584         if (!Config->cmdline.nofork)
585         {
586                 if (kill(getppid(), SIGTERM) == -1)
587                 {
588                         printf("Error killing parent process: %s\n",strerror(errno));
589                         Logs->Log("STARTUP", DEFAULT, "Error killing parent process: %s",strerror(errno));
590                 }
591         }
592
593         if (isatty(0) && isatty(1) && isatty(2))
594         {
595                 /* We didn't start from a TTY, we must have started from a background process -
596                  * e.g. we are restarting, or being launched by cron. Dont kill parent, and dont
597                  * close stdin/stdout
598                  */
599                 if ((!do_nofork) && (!do_testsuite))
600                 {
601                         fclose(stdin);
602                         fclose(stderr);
603                         if (!Config->cmdline.forcedebug)
604                                 fclose(stdout);
605                 }
606                 else
607                 {
608                         Logs->Log("STARTUP", DEFAULT,"Keeping pseudo-tty open as we are running in the foreground.");
609                 }
610         }
611 #else
612         WindowsIPC = new IPC;
613         if(!Config->nofork)
614         {
615                 WindowsForkKillOwner();
616                 FreeConsole();
617         }
618         /* Set win32 service as running, if we are running as a service */
619         SetServiceRunning();
620 #endif
621
622         Logs->Log("STARTUP", DEFAULT, "Startup complete as '%s'[%s], %d max open sockets", Config->ServerName.c_str(),Config->GetSID().c_str(), SE->GetMaxFds());
623
624 #ifndef WIN32
625         std::string SetUser = Config->ConfValue("security")->getString("runasuser");
626         std::string SetGroup = Config->ConfValue("security")->getString("runasgroup");
627         if (!SetGroup.empty())
628         {
629                 int ret;
630
631                 // setgroups
632                 ret = setgroups(0, NULL);
633
634                 if (ret == -1)
635                 {
636                         this->Logs->Log("SETGROUPS", DEFAULT, "setgroups() failed (wtf?): %s", strerror(errno));
637                         this->QuickExit(0);
638                 }
639
640                 // setgid
641                 struct group *g;
642
643                 errno = 0;
644                 g = getgrnam(SetGroup.c_str());
645
646                 if (!g)
647                 {
648                         this->Logs->Log("SETGUID", DEFAULT, "getgrnam() failed (bad user?): %s", strerror(errno));
649                         this->QuickExit(0);
650                 }
651
652                 ret = setgid(g->gr_gid);
653
654                 if (ret == -1)
655                 {
656                         this->Logs->Log("SETGUID", DEFAULT, "setgid() failed (bad user?): %s", strerror(errno));
657                         this->QuickExit(0);
658                 }
659         }
660
661         if (!SetUser.empty())
662         {
663                 // setuid
664                 struct passwd *u;
665
666                 errno = 0;
667                 u = getpwnam(SetUser.c_str());
668
669                 if (!u)
670                 {
671                         this->Logs->Log("SETGUID", DEFAULT, "getpwnam() failed (bad user?): %s", strerror(errno));
672                         this->QuickExit(0);
673                 }
674
675                 int ret = setuid(u->pw_uid);
676
677                 if (ret == -1)
678                 {
679                         this->Logs->Log("SETGUID", DEFAULT, "setuid() failed (bad user?): %s", strerror(errno));
680                         this->QuickExit(0);
681                 }
682         }
683 #endif
684
685         this->WritePID(Config->PID);
686 }
687
688 int InspIRCd::Run()
689 {
690         /* See if we're supposed to be running the test suite rather than entering the mainloop */
691         if (Config->cmdline.TestSuite)
692         {
693                 TestSuite* ts = new TestSuite;
694                 delete ts;
695                 Exit(0);
696         }
697
698         while (true)
699         {
700 #ifndef WIN32
701                 static rusage ru;
702 #else
703                 static time_t uptime;
704                 static struct tm * stime;
705                 static char window_title[100];
706 #endif
707
708                 /* Check if there is a config thread which has finished executing but has not yet been freed */
709                 if (this->ConfigThread && this->ConfigThread->IsDone())
710                 {
711                         /* Rehash has completed */
712                         this->Logs->Log("CONFIG",DEBUG,"Detected ConfigThread exiting, tidying up...");
713
714                         this->ConfigThread->Finish();
715
716                         ConfigThread->join();
717                         delete ConfigThread;
718                         ConfigThread = NULL;
719                 }
720
721                 /* time() seems to be a pretty expensive syscall, so avoid calling it too much.
722                  * Once per loop iteration is pleanty.
723                  */
724                 OLDTIME = TIME;
725                 TIME = time(NULL);
726
727                 /* Run background module timers every few seconds
728                  * (the docs say modules shouldnt rely on accurate
729                  * timing using this event, so we dont have to
730                  * time this exactly).
731                  */
732                 if (TIME != OLDTIME)
733                 {
734                         /* Allow a buffer of two seconds drift on this so that ntpdate etc dont harass admins */
735                         if (TIME < OLDTIME - 2)
736                         {
737                                 SNO->WriteToSnoMask('d', "\002EH?!\002 -- Time is flowing BACKWARDS in this dimension! Clock drifted backwards %lu secs.", (unsigned long)OLDTIME-TIME);
738                         }
739                         else if (TIME > OLDTIME + 2)
740                         {
741                                 SNO->WriteToSnoMask('d', "\002EH?!\002 -- Time is jumping FORWARDS! Clock skipped %lu secs.", (unsigned long)TIME - OLDTIME);
742                         }
743
744                         if ((TIME % 3600) == 0)
745                         {
746                                 this->RehashUsersAndChans();
747                                 FOREACH_MOD(I_OnGarbageCollect, OnGarbageCollect());
748                         }
749
750                         Timers->TickTimers(TIME);
751                         this->DoBackgroundUserStuff();
752
753                         if ((TIME % 5) == 0)
754                         {
755                                 FOREACH_MOD(I_OnBackgroundTimer,OnBackgroundTimer(TIME));
756                                 SNO->FlushSnotices();
757                         }
758 #ifndef WIN32
759                         /* Same change as in cmd_stats.cpp, use RUSAGE_SELF rather than '0' -- Om */
760                         if (!getrusage(RUSAGE_SELF, &ru))
761                         {
762                                 gettimeofday(&this->stats->LastSampled, NULL);
763                                 this->stats->LastCPU = ru.ru_utime;
764                         }
765 #else
766                         WindowsIPC->Check();
767 #endif
768                 }
769
770                 /* Call the socket engine to wait on the active
771                  * file descriptors. The socket engine has everything's
772                  * descriptors in its list... dns, modules, users,
773                  * servers... so its nice and easy, just one call.
774                  * This will cause any read or write events to be
775                  * dispatched to their handlers.
776                  */
777                 this->SE->DispatchTrialWrites();
778                 this->SE->DispatchEvents();
779
780                 /* if any users were quit, take them out */
781                 GlobalCulls.Apply();
782                 AtomicActions.Run();
783
784                 if (this->s_signal)
785                 {
786                         this->SignalHandler(s_signal);
787                         this->s_signal = 0;
788                 }
789         }
790
791         return 0;
792 }
793
794 /**********************************************************************************/
795
796 /**
797  * An ircd in five lines! bwahahaha. ahahahahaha. ahahah *cough*.
798  */
799
800 /* this returns true when all modules are satisfied that the user should be allowed onto the irc server
801  * (until this returns true, a user will block in the waiting state, waiting to connect up to the
802  * registration timeout maximum seconds)
803  */
804 bool InspIRCd::AllModulesReportReady(LocalUser* user)
805 {
806         ModResult res;
807         FIRST_MOD_RESULT(OnCheckReady, res, (user));
808         return (res == MOD_RES_PASSTHRU);
809 }
810
811 time_t InspIRCd::Time()
812 {
813         return TIME;
814 }
815
816 void InspIRCd::SetSignal(int signal)
817 {
818         *mysig = signal;
819 }
820
821 /* On posix systems, the flow of the program starts right here, with
822  * ENTRYPOINT being a #define that defines main(). On Windows, ENTRYPOINT
823  * defines smain() and the real main() is in the service code under
824  * win32service.cpp. This allows the service control manager to control
825  * the process where we are running as a windows service.
826  */
827 ENTRYPOINT
828 {
829         new InspIRCd(argc, argv);
830         mysig = &ServerInstance->s_signal;
831         ServerInstance->Run();
832         delete ServerInstance;
833         return 0;
834 }