ouch/inspircd
2
0
Fork 0
mirror of https://github.com/inspircd/inspircd.git synced 2025-03-10 02:59:01 -04:00
Code Issues Packages Projects Releases Wiki Activity

Fixed to allow debugging

Browse Source 
git-svn-id: http://svn.inspircd.org/repository/trunk/inspircd@1151 e03df62e-2008-0410-955e-edbf42e46eb7
This commit is contained in:
brain 2005-04-21 13:22:15 +00:00
parent 2eafeefbb1
commit 3f839fc4ed
1 changed files with 17 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
.inspircd.inc
View File

@ -25,6 +25,7 @@ my $arg = $ARGV[0];
getpidfile();
if ($arg eq "start") { start(); exit(); }
if ($arg eq "debug") { debug(); exit(); }
if ($arg eq "stop") { stop(); exit(); }
if ($arg eq "status") {
if (getstatus() == 1) {
@ -92,6 +93,22 @@ sub start {
}
}
sub debug {
# Check to see its not 'running' already.
if (getstatus() == 1) { print "InspIRCd is already running.\n"; return 0; }
# If we are still alive here.. Try starting the IRCd..
system("gdb --args $binpath -nofork -debug");
sleep 1;
if (getstatus() == 0) {
print "InspIRCd Seemingly not started, Log follows:\n";
system("tail ircd.log");
} else {
# We're good!
return 1;
}
}
sub stop {
if (getstatus() == 0) { print "InspIRCd is not running. (Or PID File not found)"; return 0; }
# Get to here, we have something to kill.