1 /* +------------------------------------+
2 * | Inspire Internet Relay Chat Daemon |
3 * +------------------------------------+
5 * InspIRCd: (C) 2002-2007 InspIRCd Development Team
6 * See: http://www.inspircd.org/wiki/index.php/Credits
8 * This program is free but copyrighted software; see
9 * the file COPYING for details.
11 * ---------------------------------------------------
15 #include "configreader.h"
21 #include <sys/resource.h>
25 /* Some systems don't define RUSAGE_SELF. This should fix them. */
36 #include "socketengine.h"
37 #include "inspircd_se_config.h"
40 #include "command_parse.h"
41 #include "exitcodes.h"
45 /* This MUST remain static and delcared outside the class, so that WriteProcessMemory can reference it properly */
46 static DWORD owner_processid = 0;
48 DWORD WindowsForkStart(InspIRCd * Instance)
50 /* Windows implementation of fork() :P */
52 char module[MAX_PATH];
53 if(!GetModuleFileName(NULL, module, MAX_PATH))
55 printf("GetModuleFileName() failed.\n");
59 STARTUPINFO startupinfo;
60 PROCESS_INFORMATION procinfo;
61 ZeroMemory(&startupinfo, sizeof(STARTUPINFO));
62 ZeroMemory(&procinfo, sizeof(PROCESS_INFORMATION));
64 // Fill in the startup info struct
65 GetStartupInfo(&startupinfo);
67 /* Default creation flags create the processes suspended */
68 DWORD startupflags = CREATE_SUSPENDED;
70 /* On windows 2003/XP and above, we can use the value
71 * CREATE_PRESERVE_CODE_AUTHZ_LEVEL which gives more access
72 * to the process which we may require on these operating systems.
75 vi.dwOSVersionInfoSize = sizeof(OSVERSIONINFO);
77 if ((vi.dwMajorVersion >= 5) && (vi.dwMinorVersion > 0))
78 startupflags |= CREATE_PRESERVE_CODE_AUTHZ_LEVEL;
80 // Launch our "forked" process.
81 BOOL bSuccess = CreateProcess ( module, // Module (exe) filename
82 strdup(GetCommandLine()), // Command line (exe plus parameters from the OS)
83 // NOTE: We cannot return the direct value of the
84 // GetCommandLine function here, as the pointer is
85 // passed straight to the child process, and will be
86 // invalid once we exit as it goes out of context.
87 // strdup() seems ok, though.
88 0, // PROCESS_SECURITY_ATTRIBUTES
89 0, // THREAD_SECURITY_ATTRIBUTES
90 TRUE, // We went to inherit handles.
91 startupflags, // Allow us full access to the process and suspend it.
93 0, // CURRENT_DIRECTORY
94 &startupinfo, // startup info
95 &procinfo); // process info
99 printf("CreateProcess() error: %s\n", dlerror());
103 // Set the owner process id in the target process.
105 DWORD pid = GetCurrentProcessId();
106 if(!WriteProcessMemory(procinfo.hProcess, &owner_processid, &pid, sizeof(DWORD), &written) || written != sizeof(DWORD))
108 printf("WriteProcessMemory() failed: %s\n", dlerror());
112 // Resume the other thread (let it start)
113 ResumeThread(procinfo.hThread);
115 // Wait for the new process to kill us. If there is some error, the new process will end and we will end up at the next line.
116 WaitForSingleObject(procinfo.hProcess, INFINITE);
118 // If we hit this it means startup failed, default to 14 if this fails.
120 GetExitCodeProcess(procinfo.hProcess, &ExitCode);
121 CloseHandle(procinfo.hThread);
122 CloseHandle(procinfo.hProcess);
126 void WindowsForkKillOwner(InspIRCd * Instance)
128 HANDLE hProcess = OpenProcess(PROCESS_TERMINATE, FALSE, owner_processid);
129 if(!hProcess || !owner_processid)
131 printf("Could not open process id %u: %s.\n", owner_processid, dlerror());
136 if(!TerminateProcess(hProcess, 0))
138 printf("Could not TerminateProcess(): %s\n", dlerror());
142 CloseHandle(hProcess);
147 using irc::sockets::NonBlocking;
148 using irc::sockets::Blocking;
149 using irc::sockets::insp_ntoa;
150 using irc::sockets::insp_inaddr;
151 using irc::sockets::insp_sockaddr;
155 /* Burlex: Moved from exitcodes.h -- due to duplicate symbols */
156 const char* ExitCodes[] =
159 "DIE command", /* 1 */
160 "execv() failed", /* 2 */
161 "Internal error", /* 3 */
162 "Config file error", /* 4 */
163 "Logfile error", /* 5 */
164 "POSIX fork failed", /* 6 */
165 "Bad commandline parameters", /* 7 */
166 "No ports could be bound", /* 8 */
167 "Can't write PID file", /* 9 */
168 "SocketEngine could not initialize", /* 10 */
169 "Refusing to start up as root", /* 11 */
170 "Found a <die> tag!", /* 12 */
171 "Couldn't load module on startup", /* 13 */
172 "Could not create windows forked process", /* 14 */
173 "Received SIGTERM", /* 15 */
176 void InspIRCd::Exit(int status)
183 SI->SendError("Exiting with status " + ConvToStr(status) + " (" + std::string(ExitCodes[status]) + ")");
189 void InspIRCd::Cleanup()
191 std::vector<std::string> mymodnames;
192 int MyModCount = this->GetModuleCount();
194 for (unsigned int i = 0; i < Config->ports.size(); i++)
196 /* This calls the constructor and closes the listening socket */
197 delete Config->ports[i];
200 Config->ports.clear();
202 /* Close all client sockets, or the new process inherits them */
203 for (std::vector<userrec*>::const_iterator i = this->local_users.begin(); i != this->local_users.end(); i++)
205 (*i)->SetWriteError("Server shutdown");
209 /* We do this more than once, so that any service providers get a
210 * chance to be unhooked by the modules using them, but then get
211 * a chance to be removed themsleves.
213 for (int tries = 0; tries < 3; tries++)
215 MyModCount = this->GetModuleCount();
218 /* Unload all modules, so they get a chance to clean up their listeners */
219 for (int j = 0; j <= MyModCount; j++)
220 mymodnames.push_back(Config->module_names[j]);
222 for (int k = 0; k <= MyModCount; k++)
223 this->UnloadModule(mymodnames[k].c_str());
227 this->Logger->Close();
229 /* Cleanup Server Names */
230 for(servernamelist::iterator itr = servernames.begin(); itr != servernames.end(); ++itr)
239 void InspIRCd::Restart(const std::string &reason)
241 /* SendError flushes each client's queue,
242 * regardless of writeability state
244 this->SendError(reason);
248 /* Figure out our filename (if theyve renamed it, we're boned) */
252 char module[MAX_PATH];
253 if (GetModuleFileName(NULL, module, MAX_PATH))
256 me = Config->MyDir + "/inspircd";
259 if (execv(me.c_str(), Config->argv) == -1)
261 /* Will raise a SIGABRT if not trapped */
262 throw CoreException(std::string("Failed to execv()! error: ") + strerror(errno));
266 void InspIRCd::Rehash(int status)
268 SI->WriteOpers("*** Rehashing config file %s due to SIGHUP",ServerConfig::CleanFilename(SI->ConfigFileName));
270 SI->OpenLog(SI->Config->argv, SI->Config->argc);
271 SI->RehashUsersAndChans();
272 FOREACH_MOD_I(SI, I_OnGarbageCollect, OnGarbageCollect());
273 SI->Config->Read(false,NULL);
276 FOREACH_MOD_I(SI,I_OnRehash,OnRehash(NULL,""));
280 void InspIRCd::ResetMaxBans()
282 for (chan_hash::const_iterator i = chanlist->begin(); i != chanlist->end(); i++)
283 i->second->ResetMaxBans();
287 /** Because hash_map doesnt free its buckets when we delete items (this is a 'feature')
288 * we must occasionally rehash the hash (yes really).
289 * We do this by copying the entries from the old hash to a new hash, causing all
290 * empty buckets to be weeded out of the hash. We dont do this on a timer, as its
291 * very expensive, so instead we do it when the user types /REHASH and expects a
292 * short delay anyway.
294 void InspIRCd::RehashUsersAndChans()
296 user_hash* old_users = this->clientlist;
297 chan_hash* old_chans = this->chanlist;
299 this->clientlist = new user_hash();
300 this->chanlist = new chan_hash();
302 for (user_hash::const_iterator n = old_users->begin(); n != old_users->end(); n++)
303 this->clientlist->insert(*n);
307 for (chan_hash::const_iterator n = old_chans->begin(); n != old_chans->end(); n++)
308 this->chanlist->insert(*n);
313 void InspIRCd::CloseLog()
315 this->Logger->Close();
318 void InspIRCd::SetSignals()
321 signal(SIGALRM, SIG_IGN);
322 signal(SIGHUP, InspIRCd::Rehash);
323 signal(SIGPIPE, SIG_IGN);
324 signal(SIGCHLD, SIG_IGN);
326 signal(SIGTERM, InspIRCd::Exit);
329 void InspIRCd::QuickExit(int status)
334 bool InspIRCd::DaemonSeed()
337 printf_c("InspIRCd Process ID: \033[1;32m%lu\033[0m\n", GetCurrentProcessId());
340 signal(SIGTERM, InspIRCd::QuickExit);
343 if ((childpid = fork ()) < 0)
345 else if (childpid > 0)
347 /* We wait here for the child process to kill us,
348 * so that the shell prompt doesnt come back over
350 * Sending a kill with a signal of 0 just checks
351 * if the child pid is still around. If theyre not,
352 * they threw an error and we should give up.
354 while (kill(childpid, 0) != -1)
360 printf("InspIRCd Process ID: \033[1;32m%lu\033[0m\n",(unsigned long)getpid());
362 signal(SIGTERM, InspIRCd::Exit);
365 if (getrlimit(RLIMIT_CORE, &rl) == -1)
367 this->Log(DEFAULT,"Failed to getrlimit()!");
372 rl.rlim_cur = rl.rlim_max;
373 if (setrlimit(RLIMIT_CORE, &rl) == -1)
374 this->Log(DEFAULT,"setrlimit() failed, cannot increase coredump size.");
381 void InspIRCd::WritePID(const std::string &filename)
383 std::string fname = (filename.empty() ? "inspircd.pid" : filename);
384 if (*(fname.begin()) != '/')
386 std::string::size_type pos;
387 std::string confpath = this->ConfigFileName;
388 if ((pos = confpath.rfind("/")) != std::string::npos)
390 /* Leaves us with just the path */
391 fname = confpath.substr(0, pos) + std::string("/") + fname;
394 std::ofstream outfile(fname.c_str());
395 if (outfile.is_open())
402 printf("Failed to write PID-file '%s', exiting.\n",fname.c_str());
403 this->Log(DEFAULT,"Failed to write PID-file '%s', exiting.",fname.c_str());
404 Exit(EXIT_STATUS_PID);
408 InspIRCd::InspIRCd(int argc, char** argv)
409 : ModCount(-1), GlobalCulls(this)
413 int do_version = 0, do_nofork = 0, do_debug = 0, do_nolog = 0, do_root = 0; /* flag variables */
418 memset(&server, 0, sizeof(server));
419 memset(&client, 0, sizeof(client));
421 this->unregistered_count = 0;
423 this->clientlist = new user_hash();
424 this->chanlist = new chan_hash();
426 this->Config = new ServerConfig(this);
428 this->Config->argv = argv;
429 this->Config->argc = argc;
431 chdir(Config->GetFullProgDir().c_str());
433 this->Config->opertypes.clear();
434 this->Config->operclass.clear();
435 this->SNO = new SnomaskManager(this);
436 this->TIME = this->OLDTIME = this->startup_time = time(NULL);
437 this->time_delta = 0;
438 this->next_call = this->TIME + 3;
441 *this->LogFileName = 0;
442 strlcpy(this->ConfigFileName, CONFIG_FILE, MAXBUF);
444 struct option longopts[] =
446 { "nofork", no_argument, &do_nofork, 1 },
447 { "logfile", required_argument, NULL, 'f' },
448 { "config", required_argument, NULL, 'c' },
449 { "debug", no_argument, &do_debug, 1 },
450 { "nolog", no_argument, &do_nolog, 1 },
451 { "runasroot", no_argument, &do_root, 1 },
452 { "version", no_argument, &do_version, 1 },
456 while ((c = getopt_long_only(argc, argv, ":f:", longopts, NULL)) != -1)
461 /* Log filename was set */
462 strlcpy(LogFileName, optarg, MAXBUF);
465 /* Config filename was set */
466 strlcpy(ConfigFileName, optarg, MAXBUF);
469 /* getopt_long_only() set an int variable, just keep going */
472 /* Unknown parameter! DANGER, INTRUDER.... err.... yeah. */
473 printf("Usage: %s [--nofork] [--nolog] [--debug] [--logfile <filename>] [--runasroot] [--version] [--config <config>]\n", argv[0]);
474 Exit(EXIT_STATUS_ARGV);
481 printf("\n%s r%s\n", VERSION, REVISION);
482 Exit(EXIT_STATUS_NOERROR);
488 if(!do_nofork && !owner_processid)
490 DWORD ExitCode = WindowsForkStart(this);
497 WSAStartup(MAKEWORD(2,0), &wsadata);
500 if (!ServerConfig::FileExists(this->ConfigFileName))
502 printf("ERROR: Cannot open config file: %s\nExiting...\n", this->ConfigFileName);
503 this->Log(DEFAULT,"Unable to open config file %s", this->ConfigFileName);
504 Exit(EXIT_STATUS_CONFIG);
507 printf_c("\033[1;32mInspire Internet Relay Chat Server, compiled %s at %s\n",__DATE__,__TIME__);
508 printf_c("(C) InspIRCd Development Team.\033[0m\n\n");
509 printf_c("Developers:\t\t\033[1;32mBrain, FrostyCoolSlug, w00t, Om, Special, pippijn, peavey, Burlex\033[0m\n");
510 printf_c("Others:\t\t\t\033[1;32mSee /INFO Output\033[0m\n");
512 /* Set the finished argument values */
513 Config->nofork = do_nofork;
514 Config->forcedebug = do_debug;
515 Config->writelog = !do_nolog;
517 strlcpy(Config->MyExecutable,argv[0],MAXBUF);
519 this->OpenLog(argv, argc);
521 this->stats = new serverstats();
522 this->Timers = new TimerManager(this);
523 this->Parser = new CommandParser(this);
524 this->XLines = new XLineManager(this);
525 Config->ClearStack();
526 Config->Read(true, NULL);
532 printf("* WARNING * WARNING * WARNING * WARNING * WARNING * \n\n");
533 printf("YOU ARE RUNNING INSPIRCD AS ROOT. THIS IS UNSUPPORTED\n");
534 printf("AND IF YOU ARE HACKED, CRACKED, SPINDLED OR MUTILATED\n");
535 printf("OR ANYTHING ELSE UNEXPECTED HAPPENS TO YOU OR YOUR\n");
536 printf("SERVER, THEN IT IS YOUR OWN FAULT. IF YOU DID NOT MEAN\n");
537 printf("TO START INSPIRCD AS ROOT, HIT CTRL+C NOW AND RESTART\n");
538 printf("THE PROGRAM AS A NORMAL USER. YOU HAVE BEEN WARNED!\n");
539 printf("\nInspIRCd starting in 20 seconds, ctrl+c to abort...\n");
547 if (!this->DaemonSeed())
549 printf("ERROR: could not go into daemon mode. Shutting down.\n");
550 Log(DEFAULT,"ERROR: could not go into daemon mode. Shutting down.");
551 Exit(EXIT_STATUS_FORK);
556 /* Because of limitations in kqueue on freebsd, we must fork BEFORE we
557 * initialize the socket engine.
559 SocketEngineFactory* SEF = new SocketEngineFactory();
560 SE = SEF->Create(this);
563 this->Modes = new ModeParser(this);
564 this->AddServerName(Config->ServerName);
566 int bounditems = BindPorts(true, found_ports, pl);
568 for(int t = 0; t < 255; t++)
569 Config->global_implementation[t] = 0;
571 memset(&Config->implement_lists,0,sizeof(Config->implement_lists));
575 this->Res = new DNS(this);
577 this->LoadAllModules();
578 /* Just in case no modules were loaded - fix for bug #101 */
579 this->BuildISupport();
580 InitializeDisabledCommands(Config->DisabledCommands, this);
582 if ((Config->ports.size() == 0) && (found_ports > 0))
584 printf("\nERROR: I couldn't bind any ports! Are you sure you didn't start InspIRCd twice?\n");
585 Log(DEFAULT,"ERROR: I couldn't bind any ports! Are you sure you didn't start InspIRCd twice?");
586 Exit(EXIT_STATUS_BIND);
589 if (Config->ports.size() != (unsigned int)found_ports)
591 printf("\nWARNING: Not all your client ports could be bound --\nstarting anyway with %d of %d client ports bound.\n\n", bounditems, found_ports);
592 printf("The following port(s) failed to bind:\n");
594 for (FailedPortList::iterator i = pl.begin(); i != pl.end(); i++, j++)
596 printf("%d.\tIP: %s\tPort: %lu\n", j, i->first.empty() ? "<all>" : i->first.c_str(), (unsigned long)i->second);
602 if (kill(getppid(), SIGTERM) == -1)
604 printf("Error killing parent process: %s\n",strerror(errno));
605 Log(DEFAULT,"Error killing parent process: %s",strerror(errno));
609 if (isatty(0) && isatty(1) && isatty(2))
611 /* We didn't start from a TTY, we must have started from a background process -
612 * e.g. we are restarting, or being launched by cron. Dont kill parent, and dont
623 Log(DEFAULT,"Keeping pseudo-tty open as we are running in the foreground.");
630 WindowsForkKillOwner(this);
634 printf("\nInspIRCd is now running!\n");
635 Log(DEFAULT,"Startup complete.");
637 this->WritePID(Config->PID);
640 void InspIRCd::DoOneIteration(bool process_module_sockets)
645 static time_t uptime;
646 static struct tm * stime;
647 static char window_title[100];
650 /* time() seems to be a pretty expensive syscall, so avoid calling it too much.
651 * Once per loop iteration is pleanty.
656 /* Run background module timers every few seconds
657 * (the docs say modules shouldnt rely on accurate
658 * timing using this event, so we dont have to
659 * time this exactly).
664 WriteOpers("*** \002EH?!\002 -- Time is flowing BACKWARDS in this dimension! Clock drifted backwards %d secs.",abs(OLDTIME-TIME));
665 if ((TIME % 3600) == 0)
667 this->RehashUsersAndChans();
668 FOREACH_MOD_I(this, I_OnGarbageCollect, OnGarbageCollect());
670 Timers->TickTimers(TIME);
671 this->DoBackgroundUserStuff(TIME);
675 XLines->expire_lines();
676 FOREACH_MOD_I(this,I_OnBackgroundTimer,OnBackgroundTimer(TIME));
677 Timers->TickMissedTimers(TIME);
680 /* Same change as in cmd_stats.cpp, use RUSAGE_SELF rather than '0' -- Om */
681 if (!getrusage(RUSAGE_SELF, &ru))
683 gettimeofday(&this->stats->LastSampled, NULL);
684 this->stats->LastCPU = ru.ru_utime;
691 uptime = Time() - startup_time;
692 stime = gmtime(&uptime);
693 snprintf(window_title, 100, "InspIRCd - %u clients, %u accepted connections - Up %u days, %.2u:%.2u:%.2u",
694 LocalUserCount(), stats->statsAccept, stime->tm_yday, stime->tm_hour, stime->tm_min, stime->tm_sec);
695 SetConsoleTitle(window_title);
700 /* Call the socket engine to wait on the active
701 * file descriptors. The socket engine has everything's
702 * descriptors in its list... dns, modules, users,
703 * servers... so its nice and easy, just one call.
704 * This will cause any read or write events to be
705 * dispatched to their handlers.
707 this->SE->DispatchEvents();
709 /* if any users was quit, take them out */
710 this->GlobalCulls.Apply();
712 /* If any inspsockets closed, remove them */
713 this->InspSocketCull();
716 void InspIRCd::InspSocketCull()
718 for (std::map<InspSocket*,InspSocket*>::iterator x = SocketCull.begin(); x != SocketCull.end(); ++x)
720 SE->DelFd(x->second);
731 DoOneIteration(true);
733 /* This is never reached -- we hope! */
737 /**********************************************************************************/
740 * An ircd in four lines! bwahahaha. ahahahahaha. ahahah *cough*.
743 int main(int argc, char** argv)
745 SI = new InspIRCd(argc, argv);
751 /* this returns true when all modules are satisfied that the user should be allowed onto the irc server
752 * (until this returns true, a user will block in the waiting state, waiting to connect up to the
753 * registration timeout maximum seconds)
755 bool InspIRCd::AllModulesReportReady(userrec* user)
757 if (!Config->global_implementation[I_OnCheckReady])
760 for (int i = 0; i <= this->GetModuleCount(); i++)
762 if (Config->implement_lists[i][I_OnCheckReady])
764 int res = modules[i]->OnCheckReady(user);
772 int InspIRCd::GetModuleCount()
774 return this->ModCount;
777 time_t InspIRCd::Time(bool delta)
780 return TIME + time_delta;
784 int InspIRCd::SetTimeDelta(int delta)
786 int old = time_delta;
788 this->Log(DEBUG, "Time delta set to %d (was %d)", time_delta, old);
792 void InspIRCd::AddLocalClone(userrec* user)
794 clonemap::iterator x = local_clones.find(user->GetIPString());
795 if (x != local_clones.end())
798 local_clones[user->GetIPString()] = 1;
801 void InspIRCd::AddGlobalClone(userrec* user)
803 clonemap::iterator y = global_clones.find(user->GetIPString());
804 if (y != global_clones.end())
807 global_clones[user->GetIPString()] = 1;
810 int InspIRCd::GetTimeDelta()
815 bool FileLogger::Readable()
820 void FileLogger::HandleEvent(EventType et, int errornum)
822 this->WriteLogLine("");
824 ServerInstance->SE->DelFd(this);
827 void FileLogger::WriteLogLine(const std::string &line)
834 int written = fprintf(log,"%s",buffer.c_str());
838 if ((written >= 0) && (written < (int)buffer.length()))
840 buffer.erase(0, buffer.length());
841 ServerInstance->SE->AddFd(this);
843 else if (written == -1)
846 ServerInstance->SE->AddFd(this);
850 /* Wrote the whole buffer, and no need for write callback */
861 void FileLogger::Close()
865 /* Burlex: Windows assumes nonblocking on FILE* pointers anyway, and also "file" fd's aren't the same
868 int flags = fcntl(fileno(log), F_GETFL, 0);
869 fcntl(fileno(log), F_SETFL, flags ^ O_NONBLOCK);
872 fprintf(log,"%s",buffer.c_str());
875 ServerInstance->SE->DelFd(this);
885 FileLogger::FileLogger(InspIRCd* Instance, FILE* logfile) : ServerInstance(Instance), log(logfile), writeops(0)
889 irc::sockets::NonBlocking(fileno(log));
890 this->SetFd(fileno(log));
895 FileLogger::~FileLogger()