src/inspircd.cpp

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