web/footer.html web/header.html web/index.html web/job_detail.html web/jobs.html web/job_submit.html web/media
8:31 a.m.
dev/null |binary
web/footer.html | 5 ----
web/header.html | 18 ---------------
web/index.html | 37 --------------------------------
web/job_detail.html | 27 -----------------------
web/job_submit.html | 42 -------------------------------------
web/jobs.html | 34 ------------------------------
web/media/css/cas-web.css | 52 ----------------------------------------------
8 files changed, 215 deletions(-)
New commits:
commit b47ff348aa8fdb369314b8e98c4a5b8e4a73f1e5
Author: adam stokes <uzr(a)jak.rebo>
Date: Thu Oct 15 09:34:49 2009 -0400
- altering web
diff --git a/web/footer.html b/web/footer.html
deleted file mode 100644
index da211cc..0000000
--- a/web/footer.html
+++ /dev/null
@@ -1,5 +0,0 @@
-<div id="footer">
-cas_web_ui © 2007-2009 Adam Stokes
-</div>
-</body>
-</html>
diff --git a/web/header.html b/web/header.html
deleted file mode 100644
index 43a5b8c..0000000
--- a/web/header.html
+++ /dev/null
@@ -1,18 +0,0 @@
-<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN"
"http://www.w3.org/TR/html4/strict.dtd">
-<html>
-<head>
- <meta http-equiv="Content-type" content="text/html;
charset=utf-8">
- <link rel="stylesheet" href="/media/css/cas-web.css"
type="text/css" media="screen" />
-
- <title><% $title %></title>
-</head>
-<body>
-<div id="header">
- <p><a href="/"><img
src="/media/img/cas_logo.png"></a></p>
- :// <a href="/">go home</a>, <a
href="/jobs.html">jobs</a>
-</div>
-
-<%init>
-my $title="cas-web-ui";
-</%init>
-
diff --git a/web/index.html b/web/index.html
deleted file mode 100644
index f59d914..0000000
--- a/web/index.html
+++ /dev/null
@@ -1,37 +0,0 @@
-<& header.html &>
-<div id="content">
-<h3>Core submission<h3>
-<div id="form_submit">
- <form method="POST" action="job_submit.html"
enctype="multipart/form-data">
- <table>
- <tr>
- <th> </th><th>Complete below form</th>
- </tr>
- <tr>
- <td>Job Identifier</td>
- <td><input type="text" size="25"
name="form_identifier" />
- </tr>
- <tr>
- <td>Submitter</td>
- <td><input type="text" size="25"
name="form_submitter" />
- </tr>
- <tr>
- <td colspan="2" style="background-color: red; color:
white;">Please choose a method for providing the core file</td>
- </tr>
- <tr>
- <td>Upload a File</td>
- <td><input type="file" size="45"
name="form_file"/></td>
- </tr>
- <tr>
- <td>HTTP or FTP URL</td>
- <td><input type="text" size="45"
name="form_url"/></td>
- </tr>
- <tr>
- <td colspan="2"><input type="submit" value="Process
Job" /></td>
- </tr>
- </table>
-
- </form>
-</div>
-</div>
-<& footer.html &>
diff --git a/web/job_detail.html b/web/job_detail.html
deleted file mode 100644
index eb50606..0000000
--- a/web/job_detail.html
+++ /dev/null
@@ -1,27 +0,0 @@
-<!-- mason -->
-<& header.html &>
-<div id="content">
-<h3>Job Detail for <% $work_dir %>/<% $view_log %></h3>
-<ul>
-% while (<DATA>) {
-<li><% $_ %></li>
-% }
-</ul>
-<& footer.html &>
-
-<%init>
-use Data::Dumper;
-
-my $work_dir;
-open DATA, "</etc/cas.conf" or die $!;
-while (<DATA>) {
- if (/^workDirectory=(.*)/) {
- $work_dir = $1;
- }
-}
-open DATA, "<$work_dir/$view_log" or die $!;
-</%init>
-
-<%args>
-$view_log
-</%args>
diff --git a/web/job_submit.html b/web/job_submit.html
deleted file mode 100644
index d1a33bc..0000000
--- a/web/job_submit.html
+++ /dev/null
@@ -1,42 +0,0 @@
-<!-- mason -->
-<& header.html &>
-<div id="content">
-<h3>Form submitted</h3>
-</div>
-
-<& footer.html &>
-<%init>
-use File::Path;
-
-# create path if doesn't exist
-if ($form_identifier && ! -f "/cores/$form_identifier") {
- mkpath("/cores/$form_identifier", {verbose => 1});
-}
-
-# File uploads
-if ($form_file) {
- my $query = $m->cgi_object;
-
- # get a filehandle for the uploaded file
- my $fh = $query->upload('form_file');
-
- # setup file
- open FORMFILE, '>>/tmp/formfile';
-
- # print out the contents of the uploaded file
- while (<$fh>) {
- print FORMFILE $_;
- }
- close($fh);
-
- close FORMFILE;
-}
-</%init>
-
-<%args>
-$form_identifier
-$form_file
-$form_submitter
-$form_url
-</%args>
-
diff --git a/web/jobs.html b/web/jobs.html
deleted file mode 100644
index b6846ff..0000000
--- a/web/jobs.html
+++ /dev/null
@@ -1,34 +0,0 @@
-<!-- mason -->
-<& header.html &>
-<div id="content">
-<h3>Jobs</h3>
-<table>
-<tr>
-<th> </th>
-<th>id</th><th>identifier</th><th>timestamp</th><th>email</th>
-</tr>
-% foreach my $item (@{$data}) {
-% my ($id, $identify, $timestamp, $email) = @{$item};
-% if (-f "/cores/$identify") {
- <tr>
- <td><a href="/job_detail.html?view_log=<% $identify %>/<%
$timestamp %>/<% $identify %>.log">view log</a></td>
- <td><% $id %></td>
- <td><% $identify %></td>
- <td><% $timestamp %></td>
- <td><% $email %></td>
- </tr>
-% }
-% }
-</table>
-</div>
-<& footer.html &>
-
-<%init>
-use DBI;
-my $dbh =
DBI->connect("dbi:SQLite:dbname=/var/db/cas/cas.db","","");
-
-# query all jobs
-my $sth = $dbh->prepare("SELECT * FROM jobs");
-$sth->execute();
-my $data = $sth->fetchall_arrayref;
-</%init>
diff --git a/web/media/css/cas-web.css b/web/media/css/cas-web.css
deleted file mode 100644
index d6880f3..0000000
--- a/web/media/css/cas-web.css
+++ /dev/null
@@ -1,52 +0,0 @@
-/* GLOBAL ATTRIBUTES */
-body {
- font-family: sans-serif;
- margin: 0;
- padding: 5px;
-}
-
-h1 {
- padding: 0;
- margin: 0;
-}
-
-td, th {
- padding: 5px;
- text-align: left;
- vertical-align: middle;
-}
-
-img {
- border: 0;
-}
-
-/* CUSTOM */
-
-#header {
- font-size: small;
- padding: 5px;
- width: 600px;
- margin-left: auto;
- margin-right: auto;
-}
-
-#content {
- font-size: small;
- width: 600px;
- margin-left: auto;
- margin-right: auto;
-}
-
-#footer {
- font-size: small;
- padding: 5px;
- width: 600px;
- margin-left: auto;
- margin-right: auto;
-}
-
-/* FORM ELEMENTS */
-#form_submit {
- font-size: small;
- font-style: normal;
-}
diff --git a/web/media/img/cas_logo.png b/web/media/img/cas_logo.png
deleted file mode 100644
index 39e2302..0000000
Binary files a/web/media/img/cas_logo.png and /dev/null differ
5319
days inactive
5319
days old
0 comments
1 participants
participants (1)
-
Adam Stokes