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