From e1c4cc110d907beb0df23d132c56825c55bbb5ad Mon Sep 17 00:00:00 2001 From: Tim Bishop Date: Wed, 6 Jun 2001 16:39:28 +0000 Subject: [PATCH] We no longer need to use this. It's all automated now :-) --- cgi-bin/cvswww-extract.cgi | 95 -------------------------------------- 1 file changed, 95 deletions(-) delete mode 100755 cgi-bin/cvswww-extract.cgi diff --git a/cgi-bin/cvswww-extract.cgi b/cgi-bin/cvswww-extract.cgi deleted file mode 100755 index 099d848..0000000 --- a/cgi-bin/cvswww-extract.cgi +++ /dev/null @@ -1,95 +0,0 @@ -#!/usr/bin/perl - -#--------------------------------------------------------- -# cvswww-extract.cgi -# -# Script to extract webpages onto webserver -# Written by Tim Bishop [tdb1@ukc.ac.uk] 20/10/2000 -# -# Copyright i-Scream, 2000 -# http://www.i-scream.org.uk -#--------------------------------------------------------- - -#grab some info -use CGI; -$query=new CGI; -$site=$query->param('site'); - -# Settings -my ($left) = "http://www.i-scream.org.uk/left.inc"; -my ($title) = "http://www.i-scream.org.uk/title.inc"; -my ($bottom) = "http://www.i-scream.org.uk/bottom.inc"; - -print "Content-type: text/html\n\n"; - -print << "EOF"; - - - - - - - - The i-Scream Project CVS Website Extracter - - - - - - - - - -
-EOF - -print `/usr/local/bin/wget -O - -q $left 2>&1`; - -print << "EOF"; - - -EOF - -print `/usr/local/bin/wget -O - -q $title 2>&1`; - -print "
\n";
-
-#decide which site we're running on
-if($site eq "raptor" && -e "/usr/local/proj/co600_10" && -d "/usr/local/proj/co600_10"){
-
-print "Debugging output from run on Raptor:\n";
-print `/usr/local/proj/co600_10/scripts/cvswww-extract-cmd 2>&1`;
-
-print "\nDebugging output from cleanup:\n";
-print `/usr/local/proj/co600_10/scripts/cvswww-clean 2>&1`;
-
-}
-elsif($site eq "main" && -e "/home/sites/www.i-scream.org.uk" && -d "/home/sites/www.i-scream.org.uk"){
-
-print "Debugging output from extract:\n";
-print `cd /home/sites/www.i-scream.org.uk/web && gunzip cvswww-extract.tar.gz && tar -xvf cvswww-extract.tar && rm -f cvswww-extract.tar 2>&1`;
-
-}
-else{
-    print "whoops, forget to say which site... or you lied :)\n";
-}
-
-print "
\n"; - -print `/usr/local/bin/wget -O - -q $bottom 2>&1`; - -print << "EOF"; - -
- - - - -EOF - -exit 0; -- 2.44.0