my $executable = "@EXECUTABLE@";
my @filesparsed;
-$ENV{"LD_LIBRARY_PATH"} = $ENV{"LD_LIBRARY_PATH"} . ":/usr/local/lib/mysql:/usr/lib/mysql";
-
# Lets see what they want to do.. Set the variable (Cause i'm a lazy coder)
my $arg = $ARGV[0];
getpidfile($confpath."inspircd.conf");
if (getstatus() == 1) { print "InspIRCd is already running.\n"; return 0; }
# If we are still alive here.. Try starting the IRCd..
system("$binpath/$executable");
- sleep 2;
return 1;
}
# 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/$executable -nofork -debug");
+ system("gdb --command=.gdbargs --args $binpath/$executable -nofork -debug");
}
my $pid = getprocessid();
print "Stopping InspIRCd...\n";
system("kill -TERM $pid >/dev/null 2>&1");
- sleep 2;
if (getstatus() == 1)
{
print "InspIRCd not dying Quietly -- Forcing Kill\n";
close PIDFILE;
return $pid;
}
-