initial import

1 files changed, 17 insertions, 0 deletions

diff --git a/htdocs/smokeping.cgi.dist b/htdocs/smokeping.cgi.dist
new file mode 100755
index 0000000..e44340b
--- /dev/null
+++ b/htdocs/smokeping.cgi.dist
@@ -0,0 +1,17 @@
+#!/usr/sepp/bin/speedy -w
+# -*-perl-*-
+
+use lib qw(/usr/pack/rrdtool-1.0.33-to/lib/perl);
+use lib qw(/home/oetiker/data/projects/AADJ-smokeping/dist/lib);
+
+use Smokeping 1.38;
+
+Smokeping::cgi("/home/oetiker/data/projects/AADJ-smokeping/dist/etc/config");
+
+
+BEGIN {
+    if ($ENV{SERVER_SOFTWARE}) {
+        $SIG{__WARN__} = sub { print "Content-Type: text/plain\n\n".(shift)."\n"; };
+        $SIG{__DIE__} = sub { print "Content-Type: text/plain\n\n".(shift)."\n"; exit 1 }
+    };
+}