]> i-scream Git - www.i-scream.org.git/commitdiff
i-scream / www.i-scream.org.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 7be02e0)
Added the i-scream look and feel
authorPaul Mutton <pjm2@i-scream.org>
Sat, 31 Mar 2001 12:00:29 +0000 (12:00 +0000)
committerPaul Mutton <pjm2@i-scream.org>
Sat, 31 Mar 2001 12:00:29 +0000 (12:00 +0000)
cgi-bin/download.cgi patch | blob | history

diff --git a/cgi-bin/download.cgi b/cgi-bin/download.cgi
index 9ae0bbfab27f075390082fffe3393dc8e7f9690b..3ad3ae8b7bed85c01adddc203dc886788a900d85 100755 (executable)
--- a/cgi-bin/download.cgi
+++ b/cgi-bin/download.cgi
@@ -21,6 +21,9 @@ $| = 1;
 #--------------------------------------------------------------
 my ($build_dir) = "/builds";
 my ($log_file) = "download_log";
+my ($left) = "../left.inc" ;
+my ($title) = "../title.inc";
+my ($bottom) = "../bottom.inc";
 #--------------------------------------------------------------
 
 
@@ -51,11 +54,42 @@ if (defined($submit) && $submit eq "Download") {
 }
 else {
     print "Content-type: text/html\n\n";
-   
-    print <<EOT;
+
+    print <<"END";
+        <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
+
+        <!--
+            download.cgi
+            Created by pjm2 31/03/2001
+            Last modified 31/03/2001
+        -->
+
         <html>
-        <basefont face="arial,sans-serif" size="2">
-        <body bgcolor="white" text="#000066">
+
+        <head>
+         <title>i-scream downloads</title>
+         <meta name="description" content="The i-scream Project is a central monitoring system for Unix, Linux and NT servers.">
+         <meta name="keywords" content="i-scream, project, central monitoring system, unix, linux, nt, server, alert">
+         <meta name="generator" content="notepad on acid, aye.">
+        </head>
+
+        <body bgcolor="#ffffff" link="#0000ff" alink="#3333cc" vlink="#3333cc" text="#000066">
+
+        <table border="0" cellpadding="2" cellspacing="2">
+         <tr>
+          <td valign="top">
+END
+
+    &print_html($left);
+
+    print <<"END";
+        </td>
+        <td valign="top">
+END
+
+    &print_html($title);
+
+    print <<EOT;
         <table align="center" width="600">
          <tr>
           <td>
@@ -102,7 +136,26 @@ else {
         </html>
 EOT
 
+    &print_html($bottom);
+
+    print <<"END";
+
+          </td>
+         </tr>
+        </table>
+
+        </body>
+
+        </html>
+END
+
 }
 
+exit;
+
 
-exit;
\ No newline at end of file
+# Print a file without escaping HTML: -
+sub print_html ($) {
+    my ($filename) = @_;
+    print `cat $filename`;
+}
\ No newline at end of file
www.i-scream.org