# | Inspire Internet Relay Chat Daemon |
# +------------------------------------+
#
-# (C) 2002-2007 InspIRCd Development Team
-# http://www.inspircd.org/wiki/Credits
+# (C) 2002-2008 InspIRCd Development Team
+# http://www.inspircd.org/wiki/index.php/Credits
#
# Written by Craig Edwards, Craig McLure, and others.
# This program is free but copyrighted software; see
if (getstatus() == 1) { print "InspIRCd is already running.\n"; return 0; }
# If we are still alive here.. Try starting the IRCd..
print "$binpath/$executable doesn't exist\n" and return 0 unless(-e "$binpath/$executable");
+ print "$binpath/$executable is not executable\n" and return 0 unless(-f "$binpath/$executable" && -x "$binpath/$executable");
system("$binpath/$executable");
return 1;
if (getstatus() == 1) { print "InspIRCd is already running.\n"; return 0; }
print "$binpath/$executable doesn't exist\n" and return 0 unless(-e "$binpath/$executable");
+ print "$binpath/$executable is not executable\n" and return 0 unless(-f "$binpath/$executable" && -x "$binpath/$executable");
# Check we have gdb
checkgdb();
# If we are still alive here.. Try starting the IRCd..
- system("gdb --command=$basepath/.gdbargs --args $binpath/$executable -nofork -debug -nolog");
+ system("gdb --command=$basepath/.gdbargs --args $binpath/$executable -nofork -debug");
}
sub screendebug
if (getstatus() == 1) { print "InspIRCd is already running.\n"; return 0; }
print "$binpath/$executable doesn't exist\n" and return 0 unless(-e "$binpath/$executable");
+ print "$binpath/$executable is not executable\n" and return 0 unless(-f "$binpath/$executable" && -x "$binpath/$executable");
# Check we have valgrind and gdb
checkvalgrind();
if (getstatus() == 1) { print "InspIRCd is already running.\n"; return 0; }
print "$binpath/$executable doesn't exist\n" and return 0 unless(-e "$binpath/$executable");
+ print "$binpath/$executable is not executable\n" and return 0 unless(-f "$binpath/$executable" && -x "$binpath/$executable");
#Check we have gdb
checkvalgrind();