Changeset 8984
- Timestamp:
- Sep 26, 2006, 10:40:55 AM (20 years ago)
- Location:
- trunk/ippMonitor
- Files:
-
- 8 added
- 33 edited
-
Makefile (modified) (2 diffs)
-
def/autocode.php (modified) (1 diff)
-
def/detInputExp.d (modified) (1 diff)
-
def/detMasterFrame.d (modified) (1 diff)
-
def/detMasterImfile.d (modified) (1 diff)
-
def/detNormalizedImfile.d (modified) (1 diff)
-
def/detNormalizedStatImfile.d (modified) (1 diff)
-
def/detProcessedImfile.d (modified) (1 diff)
-
def/detResidExp.d (modified) (1 diff)
-
def/detResidImfile.d (modified) (1 diff)
-
def/detRun.d (modified) (1 diff)
-
def/detRunSummary.d (modified) (1 diff)
-
def/detStackedImfile.d (modified) (1 diff)
-
def/newExp.d (modified) (1 diff)
-
def/newImfile.d (modified) (1 diff)
-
def/p1PendingExp.d (modified) (1 diff)
-
def/p2PendingExp.d (modified) (1 diff)
-
def/p2PendingImfile.d (modified) (1 diff)
-
def/p2ProcessedExp.d (modified) (1 diff)
-
def/p2ProcessedImfile.d (modified) (1 diff)
-
def/p3PendingExp.d (modified) (1 diff)
-
def/pzPendingExp.d (modified) (1 diff)
-
def/pzPendingImfile.d (modified) (1 diff)
-
def/rawDetrendExp.d (modified) (1 diff)
-
def/rawImfile.d (modified) (1 diff)
-
def/rawScienceExp.d (modified) (1 diff)
-
def/summitExp.d (modified) (1 diff)
-
generate (modified) (5 diffs)
-
raw/DetrendSteps.php (added)
-
raw/ImfileTables.php (added)
-
raw/LoadSetup.php (added)
-
raw/Login.php (modified) (5 diffs)
-
raw/ScienceSteps.php (added)
-
raw/SelectProject.php (modified) (2 diffs)
-
raw/ipp.copy.dat (added)
-
raw/ipp.detrend.dat (added)
-
raw/ipp.imfiles.dat (added)
-
raw/ipp.menu.dat (modified) (1 diff)
-
raw/ipp.php (modified) (7 diffs)
-
raw/ipp.science.dat (added)
-
raw/phptest.php (modified) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippMonitor/Makefile
r8980 r8984 8 8 DESTBIN = /var/www/kiawe/phpipp 9 9 10 INSTALL= \10 RAWSRC = \ 11 11 $(DESTBIN)/ipp.css \ 12 12 $(DESTBIN)/ipp.php \ 13 13 $(DESTBIN)/ipp.menu.dat \ 14 $(DESTBIN)/ipp.copy.dat \ 15 $(DESTBIN)/ipp.science.dat \ 16 $(DESTBIN)/ipp.detrend.dat \ 17 $(DESTBIN)/ipp.imfiles.dat \ 14 18 $(DESTBIN)/Login.php \ 15 19 $(DESTBIN)/SelectProject.php \ 16 $(DESTBIN)/phptest.php \ 20 $(DESTBIN)/LoadSetup.php \ 21 $(DESTBIN)/ScienceSteps.php \ 22 $(DESTBIN)/DetrendSteps.php \ 23 $(DESTBIN)/ImfileTables.php \ 24 $(DESTBIN)/phptest.php 25 26 DEFSRC = \ 17 27 $(DESTBIN)/detInputExp.php \ 18 28 $(DESTBIN)/detMasterFrame.php \ … … 44 54 $(DESTBIN)/PScolorlogo2.jpg 45 55 46 php: $( INSTALL) $(PICTURES)56 php: $(RAWSRC) $(DEFSRC) $(PICTURES) 47 57 48 58 # dependancy rules for binary code ######################### -
trunk/ippMonitor/def/autocode.php
r8980 r8984 5 5 $ID = checkID (); 6 6 7 menu(' Login', 'ipp.css', $ID['link']);7 menu('$MENU', '$TITLE', '$STYLE', $ID['link']); 8 8 9 9 echo "<p> $TITLE </p>"; -
trunk/ippMonitor/def/detInputExp.d
r8980 r8984 2 2 TITLE detInputExp 3 3 FILE detInputExp.php 4 MENU ipp.detrend.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/detMasterFrame.d
r8980 r8984 2 2 TITLE detMasterFrame 3 3 FILE detMasterFrame.php 4 MENU ipp.detrend.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/detMasterImfile.d
r8980 r8984 2 2 TITLE detMasterImfile 3 3 FILE detMasterImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/detNormalizedImfile.d
r8980 r8984 2 2 TITLE detNormalizedImfile 3 3 FILE detNormalizedImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/detNormalizedStatImfile.d
r8980 r8984 2 2 TITLE detNormalizedStatImfile 3 3 FILE detNormalizedStatImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/detProcessedImfile.d
r8980 r8984 2 2 TITLE detProcessedImfile 3 3 FILE detProcessedImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/detResidExp.d
r8980 r8984 2 2 TITLE detResidExp 3 3 FILE detResidExp.php 4 MENU ipp.detrend.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/detResidImfile.d
r8980 r8984 2 2 TITLE detResidImfile 3 3 FILE detResidImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/detRun.d
r8980 r8984 2 2 TITLE detRun 3 3 FILE detRun.php 4 MENU ipp.detrend.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/detRunSummary.d
r8980 r8984 2 2 TITLE detRunSummary 3 3 FILE detRunSummary.php 4 MENU ipp.detrend.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/detStackedImfile.d
r8980 r8984 2 2 TITLE detStackedImfile 3 3 FILE detStackedImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/newExp.d
r8980 r8984 2 2 TITLE Raw Science Exposures 3 3 FILE newExp.php 4 MENU ipp.copy.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/newImfile.d
r8980 r8984 2 2 TITLE Raw Science Exposures 3 3 FILE newImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/p1PendingExp.d
r8982 r8984 2 2 TITLE p1PendingExp 3 3 FILE p1PendingExp.php 4 MENU ipp.science.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/p2PendingExp.d
r8982 r8984 2 2 TITLE p2PendingExp 3 3 FILE p2PendingExp.php 4 MENU ipp.science.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/p2PendingImfile.d
r8980 r8984 2 2 TITLE p2PendingImfile 3 3 FILE p2PendingImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/p2ProcessedExp.d
r8982 r8984 2 2 TITLE p2ProcessedExp 3 3 FILE p2ProcessedExp.php 4 MENU ipp.science.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/p2ProcessedImfile.d
r8980 r8984 2 2 TITLE p2ProcessedImfile 3 3 FILE p2ProcessedImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/p3PendingExp.d
r8982 r8984 2 2 TITLE p3PendingExp 3 3 FILE p3PendingExp.php 4 MENU ipp.science.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/pzPendingExp.d
r8980 r8984 2 2 TITLE pending exposures 3 3 FILE pzPendingExp.php 4 MENU ipp.copy.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/pzPendingImfile.d
r8980 r8984 2 2 TITLE Pending Image Files 3 3 FILE pzPendingImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/rawDetrendExp.d
r8982 r8984 2 2 TITLE Raw Detrend Exposures 3 3 FILE rawDetrendExp.php 4 MENU ipp.copy.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/rawImfile.d
r8980 r8984 2 2 TITLE Raw Image File 3 3 FILE rawImfile.php 4 MENU ipp.imfiles.dat 4 5 5 6 RESTRICT exp_id -
trunk/ippMonitor/def/rawScienceExp.d
r8980 r8984 2 2 TITLE Raw Science Exposures 3 3 FILE rawScienceExp.php 4 MENU ipp.copy.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/def/summitExp.d
r8980 r8984 2 2 TITLE Summit Exposures 3 3 FILE summitExp.php 4 MENU ipp.copy.dat 4 5 5 6 # field name link to extras -
trunk/ippMonitor/generate
r8980 r8984 2 2 3 3 $VERBOSE = 0; 4 4 5 if ($ARGV[0] eq "-v") { $VERBOSE = 1; shift @ARGV; } 5 6 if (@ARGV != 3) { die "generate (schema) (template) (output)\n"; } … … 18 19 close (FILE); 19 20 21 &init_key ("MENU"); 22 &init_key ("STYLE"); 20 23 &init_key ("TABLE"); 21 24 &init_key ("TITLE"); 22 25 &init_key ("FILE"); 26 23 27 &init_key ("FIELDS"); 24 28 … … 54 58 } 55 59 } 60 61 # check on keys 62 &check_key ("MENU", "ipp.menu.dat"); 63 &check_key ("STYLE", "ipp.css"); 64 &check_key ("TABLE", ""); 65 &check_key ("TITLE", ""); 66 &check_key ("FILE", ""); 67 56 68 # define query string, add to keypairs 57 69 &define_query_fields; … … 192 204 if ($value[$i] ne "") { die "key is multiply defined\n"; } 193 205 $value[$i] = $value; 206 if ($VERBOSE) { print STDERR "setting $key = $value\n"; } 194 207 return; 195 208 } 196 209 } 210 } 211 212 sub check_key { 213 my ($i); 214 my ($key) = $_[0]; 215 my ($default) = $_[1]; 216 217 for ($i = 0; $i < @key; $i++) { 218 if ($key eq $key[$i]) { 219 if ($VERBOSE) { print "found $key: $key[$i] -- $value[$i] (def: $default)\n"; } 220 if (($default eq "") && ($value[$i] eq "")) { die "missing value for required key $key[$i]\n"; } 221 if ($value[$i] eq "") { $value[$i] = $default; } 222 return; 223 } 224 } 225 die "unknown key $key\n"; 197 226 } 198 227 … … 200 229 my ($i); 201 230 for ($i = 0; $i < @key; $i++) { 202 #if ($VERBOSE) { print "$key[$i] -- $value[$i]\n"; }231 if ($VERBOSE) { print "$key[$i] -- $value[$i]\n"; } 203 232 if ($line =~ m|\$$key[$i]|) { 204 233 if ($value[$i] eq "") { die "missing value for required key $key[$i]\n"; } -
trunk/ippMonitor/raw/Login.php
r8980 r8984 4 4 5 5 if (($_SERVER[REQUEST_METHOD] != 'POST') && ($_SERVER[REQUEST_METHOD] != 'GET')) { 6 menu (' Login', 'ipp.css', '');6 menu ('ipp.menu.dat', 'Login', 'ipp.css', ''); 7 7 echo "Invalid Client Request<br>\n"; 8 8 menu_end (); … … 14 14 $ID = checkID (); 15 15 16 menu (' Login', 'ipp.css', $ID['link']);16 menu ('ipp.menu.dat', 'Login', 'ipp.css', $ID['link']); 17 17 18 18 $pass = $ID['pass']; … … 34 34 $ID = checkLogin (); 35 35 36 menu (' Login', 'ipp.css', $ID['link']);36 menu ('ipp.menu.dat', 'Login', 'ipp.css', $ID['link']); 37 37 echo "Login Accepted\n"; 38 38 menu_end(); … … 41 41 42 42 if (key_exists (logout, $_POST)) { 43 menu (' Login', 'ipp.css', '');43 menu ('ipp.menu.dat', 'Login', 'ipp.css', ''); 44 44 echo "You are now logged out<br>\n"; 45 45 logintext (); … … 50 50 51 51 // missing a valid POST state (login or logout) 52 menu (' Login', 'ipp.css', '');52 menu ('ipp.menu.dat', 'Login', 'ipp.css', ''); 53 53 echo "Invalid Client Post Request<br>\n"; 54 54 foreach ($_POST as $key => $value) { -
trunk/ippMonitor/raw/SelectProject.php
r8980 r8984 1 2 <? function projectform () { ?>3 <p>4 Select the project of interest5 </p>6 <form action="<? $myPage ?>" method="POST">7 Project: <input type="text" name="proj"><br>8 <input type="submit" name="project">9 </form>10 <? } ?>11 12 1 <?php 13 2 14 include ' menu.php';3 include 'ipp.php'; 15 4 16 5 checkID (); 17 6 18 7 if ($_SERVER[REQUEST_METHOD] == 'GET') { 19 menu ('Project', 'ipp.css'); 20 projectform (); 8 menu ('ipp.menu.dat', 'Project', 'ipp.css', ''); 9 echo "<p> Select the project of interest </p>\n"; 10 echo "<form action=\"$myPage\" method=\"POST\">\n"; 11 echo "Project: <input type=\"text\" name=\"proj\"><br>\n"; 12 echo "<input type=\"submit\" name=\"project\">\n"; 13 echo "</form>\n"; 14 21 15 menu_end (); 22 16 } 23 17 24 18 if ($_SERVER[REQUEST_METHOD] != 'POST') { 25 menu (' Project', 'ipp.css');19 menu ('ipp.menu.dat', 'Project', 'ipp.css', ''); 26 20 echo "Invalid Client Request<br>\n"; 27 21 menu_end (); … … 32 26 # validate the existence of the project 33 27 $_GET[proj] = $myProj; 34 menu (' Project', 'ipp.css');28 menu ('ipp.menu.dat', 'Project', 'ipp.css', ''); 35 29 echo "New project is : $myProj\n"; 36 30 menu_end(); 37 31 } 38 32 39 menu (' Project', 'ipp.css');33 menu ('ipp.menu.dat', 'Project', 'ipp.css', ''); 40 34 echo "Invalid Client Post Request<br>\n"; 41 35 foreach ($_POST as $key => $value) { -
trunk/ippMonitor/raw/ipp.menu.dat
r8982 r8984 17 17 18 18 menutop | menutop | plain | | 19 menutop | menutop | plain | Load and Setup | 20 menulink | menuselect | link | Summit Exp | summitExp.php 21 menulink | menuselect | link | New Exp | newExp.php 22 menulink | menuselect | link | Copy Pending Exp | pzPendingExp.php 23 menulink | menuselect | link | Raw Detrend Exp | rawDetrendExp.php 24 menulink | menuselect | link | Raw Science Exp | rawScienceExp.php 19 menutop | menutop | link | Load and Setup | LoadSetup.php 20 menutop | menutop | link | Science Steps | ScienceSteps.php 21 menutop | menutop | link | Detrend Steps | DetrendSteps.php 22 menutop | menutop | link | Imfile Tables | ImfileTables.php 25 23 26 24 menutop | menutop | plain | | 27 menutop | menutop | plain | Science Steps |28 menulink | menuselect | link | P1 Pending Exp | p1PendingExp.php29 menulink | menuselect | link | P2 Pending Exp | p2PendingExp.php30 menulink | menuselect | link | P2 Processed Exp | p2ProcessedExp.php31 menulink | menuselect | link | P3 Pending Exp | p3PendingExp.php32 25 33 menutop | menutop | plain | |34 menutop | menutop | plain | Detrend Steps |35 menulink | menuselect | link | Det Run | detRun.php36 menulink | menuselect | link | Det Run Summary | detRunSummary.php37 menulink | menuselect | link | Det Master Frame | detMasterFrame.php38 menulink | menuselect | link | Det Input Exp | detInputExp.php39 menulink | menuselect | link | Det Resid Exp | detResidExp.php40 41 menutop | menutop | plain | |42 menutop | menutop | plain | Imfile Tables | none43 menulink | menuselect | link | detMasterImfile | detMasterImfile.php44 menulink | menuselect | link | detNormalizedImfile | detNormalizedImfile.php45 menulink | menuselect | link | detNormalizedStatImfile | detNormalizedStatImfile.php46 menulink | menuselect | link | detProcessedImfile | detProcessedImfile.php47 menulink | menuselect | link | detResidImfile | detResidImfile.php48 menulink | menuselect | link | detStackedImfile | detStackedImfile.php49 menulink | menuselect | link | newImfile | newImfile.php50 menulink | menuselect | link | p2PendingImfile | p2PendingImfile.php51 menulink | menuselect | link | p2ProcessedImfile | p2ProcessedImfile.php52 menulink | menuselect | link | pzPendingImfile | pzPendingImfile.php53 menulink | menuselect | link | rawImfile | rawImfile.php54 55 menutop | menutop | plain | |56 26 menutop | menutop | plain | External Links | none 57 27 menutop | menutop | link | test page | phptest.php -
trunk/ippMonitor/raw/ipp.php
r8980 r8984 33 33 // - pass (NOT the same as the user password: randomly generated for the session and given a timeout) 34 34 35 // have this function take the current menu and style? 35 36 function checkLogin () { 36 37 … … 42 43 43 44 if (!$success) { 44 menu (' Login', 'ipp.css', '');45 menu ('ipp.menu.dat', 'Login', 'ipp.css', ''); 45 46 echo "Login Failed, please try again<br>\n"; 46 47 loginform (); … … 67 68 // check for valid server method 68 69 if (($_SERVER[REQUEST_METHOD] != 'POST') && ($_SERVER[REQUEST_METHOD] != 'GET')) { 69 menu (' Login', 'ipp.css', '');70 menu ('ipp.menu.dat', 'Login', 'ipp.css', ''); 70 71 echo "Invalid Client Request<br>\n"; 71 72 menu_end (); … … 77 78 $ID['pass'] = $_GET[pass]; 78 79 $ID['proj'] = $_GET[proj]; 79 echo "using GET: ", $ID['pass'], $ID['proj'];80 // echo "using GET: ", $ID['pass'], $ID['proj']; 80 81 } 81 82 if ($_SERVER[REQUEST_METHOD] == 'POST') { 82 83 $ID['pass'] = $_POST[pass]; 83 84 $ID['proj'] = $_POST[proj]; 84 echo "using POST: ", $ID['pass'], $ID['proj'];85 // echo "using POST: ", $ID['pass'], $ID['proj']; 85 86 } 86 87 87 88 // user is not logged in at all 88 89 if ($ID['pass'] == "") { 89 menu(' Login', 'ipp.css', '');90 menu('ipp.menu.dat', 'Login', 'ipp.css', ''); 90 91 logintext (); 91 92 loginform (); … … 95 96 // user supplied an invalid pass 96 97 if ($ID['pass'] != "foobar") { 97 menu(' Login', 'ipp.css', '');98 menu('ipp.menu.dat', 'Login', 'ipp.css', ''); 98 99 echo "unknown user, please login again<br>\n"; 99 100 loginform (); … … 113 114 } 114 115 115 function menu ($ title, $sheet, $append) {116 function menu ($source, $title, $sheet, $append) { 116 117 117 118 echo "<html><head><title> $title </title></head>\n\n"; … … 121 122 $root = "/phpipp"; 122 123 123 $file = fopen ( "ipp.menu.dat", "r");124 $file = fopen ($source, "r"); 124 125 125 126 echo "<table class=page cellspacing=10px><tr><td valign=top>\n"; -
trunk/ippMonitor/raw/phptest.php
r8980 r8984 1 <?php include 'ipp.php'; ?>1 <?php 2 2 3 <?php menu('test.page', 'ipp.css', ''); ?> 3 include 'ipp.php'; 4 4 5 <? 5 menu('ipp.menu.dat', 'test.page', 'ipp.css', ''); 6 6 7 7 $varlist = array ('SERVER_NAME', 'GATEWAY_INTERFACE', 'SERVER_PROTOCOL', … … 19 19 } 20 20 21 menu_end(); 21 22 ?> 22 23 <?php menu_end(); ?>24 25 </body>26 </html>
Note:
See TracChangeset
for help on using the changeset viewer.
