X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=.inspircd.inc;h=37d23b8c5eab7c800e0e7d515ec0996c9367eb3f;hb=ffc039651676e0f679726b15fac4bf133e7e5bc2;hp=0ba1f88def9fe6da77a348aedf0eb2962a377d14;hpb=cbefea57e9b68df8a272e9041e079b647f627554;p=user%2Fhenk%2Fcode%2Finspircd.git

diff --git a/.inspircd.inc b/.inspircd.inc
index 0ba1f88de..37d23b8c5 100644
--- a/.inspircd.inc
+++ b/.inspircd.inc
@@ -3,7 +3,7 @@
 #       | Inspire Internet Relay Chat Daemon |
 #       +------------------------------------+
 #
-#      (C) 2002-2007 InspIRCd Development Team
+#      (C) 2002-2008 InspIRCd Development Team
 #   http://www.inspircd.org/wiki/index.php/Credits
 #
 # Written by Craig Edwards, Craig McLure, and others.
@@ -100,6 +100,7 @@ sub start {
 	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;
@@ -110,6 +111,7 @@ sub debug {
 	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();
@@ -141,6 +143,7 @@ sub valdebug
 	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();
@@ -158,6 +161,7 @@ sub screenvaldebug
 	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();