VMSeti for CSWS (Apache)

4th May 2005, version 1.5.3

VMSeti Copyright © 2000-2005 Mark G. Daniel.
This package comes with ABSOLUTELY NO WARRANTY.
This is free software, and you are welcome to redistribute it
under the conditions of the GNU GENERAL PUBLIC LICENSE, version 2.

VMSeti  provides a simple, efficient interface for monitoring the progress of VMS-based SETI@home processing.  Works with SETI@home versions 2.n and 3.n.  VMSeti version 1.5.3 has been tested against CSWS 1.2 and 1.3 and SWS 2.0.


Installation

  1. $ SET DEFAULT APACHE$COMMON:[SRC.VMSETI]

  2. compile+link the executable (requires DECC):
    $ @BUILD_VMSETI BUILD

    -OR-  just link the executable (using supplied object module):
    $ @BUILD_VMSETI LINK

  3. copy executable and support procedure
    $ COPY VMSETI_AXP.EXE,VMSETI.COM APACHE$COMMON:[CGI-BIN]

  4. access to establish it works using demonstration data files
    http://your.hosts.name/cgi-bin/vmseti

  5. ensure the server script can read the SETI data files
    $ SET PROTECTION=W:RE device:[000000]SETI.DIR
    v1.3: $ SET PROTECTION=W:RE device:[SETI]*.TXT
    v2.n: $ SET PROTECTION=W:RE device:[SETI]*.SAH
    v3.n: $ SET PROTECTION=W:RE device:[SETI]*.SAH

  6. customize to suit the local site
    $ EDIT APACHE$COMMON:[CGI-BIN]VMSETI.COM

  7. INSTALL to allow access to OUTFILE (reporting of power spikes)
    $ INSTALL ADD APACHE$COMMON:[CGI-BIN]VMSETI_AXP.EXE /PRIV=(SYSPRV)

Usage

VMSeti locates data files either from the environment variables established during installation above, or the path supplied with the request. Any such path must be mapped by server configuration.

In this way a default location can be provided using the script wrapping procedure and if the site supports multiple processing streams these can be selected by supplying a URL containing a path along with the script.

To include some local information on the report page use the VMSETI_LOCAL environment variable to supply text (plain or HTML), or if the first character is a '@' the location of a file containing this text. Local information is included towards the bottom of the page. This information could provide links to other instances of site processing.


Mark G. Daniel
Mark.Daniel@wasd.vsm.com.au
(Should the above address present problems or provide no response for an extended period then use Mark.Daniel@dsto.defence.gov.au)

Demonstration & Download
http://wasd.vsm.com.au/cgi-bin/vmseti
http://wasd.vsm.com.au/wasd/
ftp://wasd.vsm.com.au/wasd/index.html PWASD_SITTER_MAILWASD_SITTER_OPCOM%08.08X %d |%s|%s|%s| %%%s-I-HELP, usage for the WASD HTTPd Sitter (%s) The sitter utility is designed to monitor WASD on a node and/or in a cluster and alert operations staff of conditions that might cause production to be adversely impacted. Configurable triggers include server image exit, percentage thresholds on process quotas (down to 10%), rates of HTTP statuses (e.g. 503). Alerts are provided via OPCOM messages and/or email. $ SITTER [qualifiers..] [parameters..] /CHECK /HELP /MAIL[=address(es)] /OPCOM[=target] Usage examples: $ SITTER %%%s-E-IVQUAL, unrecognized qualifier \%s\ %%%s-E-MAXPARM, too many parameters \%s\ %%%s-E-UNRKEY, "%s" is an unrecognised keyword GetParameters() ReportThis() |%s| %d lki$b_grmode: %d %%%s-E-INSTANCE, group number range 1 to %d GetInstanceInformation() %%%s-E-SERVER, no such server! -SYSTEM-E-NOSUCHSEC, no such (global) section %%%s-E-GBLSEC_MISMATCH, global section mismatch (%s %s)! sys$mgblsc() %%X%08.08X begin:%d end:%d MapGlobalSection() WASD Sitter (!AZ) reports   p"P  "p8 sanity check@SITTER#8^0[~ "0#@^4GHcGG#  (#ݶ8b}Zkb#@BG4GbqZkcG8]@]HP#k///#~^^GG{#@hb#// @G]]4G #/k///#(H;"^~TG^ GGH[#Pb9jZkXbBGGGGGbG0s"AZkGX""B"TGb#:@ , HGB"1(HBtGPb@Br.SrJr> (""BjZkXBGGGGGbGX`"AZkG8""B"Gb#@0 B"  8 DX Dx D /  Tà" /"/ "#4/b#t"1U.G1&JUJ&JCDBBF/XK?@/Y/9#YKCBpGy.9#yJC$@!F .9#JCBFY/bZYKY?G{"b(HBS``> "Pb1"iZk Gb#"J@//Gb#/_@Ӹ" "B"GGb#1"@ "b#x"4@ ,(" H "GB"b#Gx1"@Ӱ 4GBb`"-/!AZk "hB"CtGpb`1"J@Zk= BG BTG@@R"GzDZk.""="8b#WJ>//c@( ]"}"b# `" *@ /G]] 0#k//.P J0DxB4G4GbpZk///#;TG^~ ^(~ [08GG#;(b1"iZk b00""b""PBGP"Xb D"GE>="/+Zk0""tG"b B(bP vH!2_J@FPB R"/hZk0b@B""G="GHbGs;Zk""GG BG} !1"(b /hZk= (b @#G0@..JV JFC"G] ](}084G@#k/($ $ //""G BB(b`1"hZkPB&4GXb"/+pZk" BtGB(b"1"hZkPB&4GXbx "/pZkPBG4GXbpZk//#;TG^~ ^(~08@޴H[PX>`^h~pG0{#G/;1"brhZkPB4G("GXbGG~Zk " 0"x0!0 D/0!@!D"@ 0,xO%"HC0 @FG=/9`///2/zHF"Y2KR"QB:G2?v/vK"CwJF% r.SrJwFR"QBr>,H"CaH:G .TJF>.JCR"QB"yJF R/ZRKR"QBYGR?,HCFQB`.xJPJFR">QB 2,4G{2KA2HR";D2<2EB2v@J@BTGGG"HbGGԢ"6JF E"Բ (/Zk $G%"`e"qB0"!v HD0,HCTF`"/9@////yHF"XK"BG?U/UK"C`PKF% .VJF"B>.J"C`J;G 0,A0H D0<U.UJC"B"`PJXG 0/Y0K"B G0?5,5HCFB]@0/{PJY0K;G"0?`BT/`¢TKTKCF/9////yJF"XK"BG?v/vK"CtJD%P.RPJTF"BP>/K"CrKaG ,@HD<.JC"B"`JYG 0,A0H"B D0<V.VJCGBG ,aPK@HD"<¦0B0vJTG@E"G"GG@BHb4JFG" >(~Zk@G%vHD/BxBT%"R"}"GGGGb"Zk $GpBP xb!v HD8RJ !J 0vJ~ZkG/G`""BGbtGgZkGM /#"tGBb .1"JfZk'1@ BB$%"}"GGGGR"b~Zk@ĠGpBxb&vHD8RJ!J 0vJ/~ZkG/G`""BGbtG//fZkGC GbME!/#"tGBb .1" J fZk ,)1 A HJ!C@?X0B GbM %! B4DX/8///c"tGB b`.1"JfZk,G""B XDbH 0@AG/fZkX E'1@)! //cB "" btG/` ,),HA &HDC/kfZkPBG("GXbGGw}ZkG] ](}08@ݤHPX=`]h}p#/k///BG4GbmZk"BGGBbB1"AfZkB&4Gb"mZkB4GbmZkB4GbmZkB4GbmZkBG4GbmZkB4GbmZkBG4GbmZk/#h;G^~^~޴([ GG`[GG">~R"G"AZk`B(BG"R"/AZk`B(BX"GxR"AZk`B(BG0"PR"AZkE?&G>G (4~@`"B~b01"eZkG`,BG4GbH}Zk= vH!?H D0&HC=J2_JB_F]8B"="]"tG@bTZk8B"="]"tG@bTZkG"" B"@"8b#@}h,Hf/G///D`D/$#.c #JC%BqF/ .c JCBF/.c JCB7G/ C/c CKCEC:D/ .c J.JVJ >c B\G4Gb!}ZkX vH4vH0JF1JCX&J3J?BtF X}B\]""tGb/[eZkhB"X="]"tGpb/VZkG//G B"S"8b#^@,HBG4Gb|Zk0} vH!vH#H`D%fHC0}H$H@D0B"0="]"tGbWZk`"G B"Y"8b#1"9@}-IZ/},H/,///XD`D/$#.c #JCU!BqF/ .c JCUBF/.c JCUB7G/ C/c CKCUACE/,c H'g@5vH0J'vHF2JCFJ1?J_B5F/@=.HBJC"="tGPb]"t@]ZkG`" B"d"8b#1"@-I/B"="tGb]"/^Zk`"//G B"8b#h"1"@XB"="]"tG`bRZkG]]4G}ݤ 0#k/# ^([~4G"(^0GG0b/zZk(8B="]"@btG"eZk(b==""HBPbGs""S"A3@azZk" vH  @ .PJ>G ](]0@#k//#> @h#C^~"^~"GGG@0;{#["k@("GG0"PB]Xb1"JdZk#1`@ = %``@////!#`@8! `@ aG `! aq `//G#1`@!  ղB?""]""G}b/;zZkG` ""B"`@"b#`D`!@}tG]"0"PBXb#v`HC.PJ>0""/cZkG]]}#/k///X #> /@h[;G^~^~R1"GGGG[b@^//cZkBc@|""4Gb/SkZkP#1`@"="$``@@///q#`@81"`@pG"10qpQP `//G#1`@1"" b0B=TG"8b zZkpBG4Gxb/A{Zk vH@B_"G}"="Hb0JF5J"FC"}c}"yZk""GB""b#@"GbBb2vH!C0.Q0J0> ""}fcZk=]""$`BTGhb! 1?J!v H!F H$DGp@yZkGGp""B""b#]@G]G]}#/k///;#8[tG~^^~1X[ GGGG 0;`b(1"'cZkGX""Pb#_"n@//4G/G_"""Pb#c@TGG_"P""Pb#[@GG_"""Pb#S@GG_"h""Pb#K@GG_"""Pb#C@GG_"0""Pb#;@GG_"""Pb#3@GG_" ""Pb#+@ |G_"""Pb##@ tG_"@""Pb#@ lG_"""Pb#@ dG_"""Pb# @ \G_"""Pb#@  TG_"""Pb#@@ LG_"""Pb#@///$ @G_"""Pb#@$8G_"""Pb#@$0G_"""Pb#@$(G_"""Pb#@$ G_"x""Pb#@$G_"""Pb#@ $G_"""Pb#@@$G$""Pb#_"@ӃDGG]]} 0#k/#H;GtG~^^~ (0޴8GGGGh[(;"pb/?bZkx¤BG4Gbf yZk& vH!?H D& x"8B1"Q" GG"G@bzZkŠ@"GGH"hBtGpb1"bZkH `P""hBpbTGbZkG/ bHGH""hBpbtGc#v`H@#,A#H#<aZkGG]]} (0ݤ8@#/k///G#(; ^~G0P[^ GG#^~GC1"GXb/aZk=@ G6HHb]4G] 0# DN)k//p#;?&TG^~1" ^(~08! @޴HPX>`^h~px޵G{G{0B>" >/8bx1"aZkPB4G"XbWZk@bBG"]"GGbs"]ZkG$vHB  ,A H <$.G4GBD"Q2J'Jb" /.JVJeF`>@""O/yHXKG8bGtG?C /@0B//_aZk,H/(/// ("/ $,A0H'HA1@!!D/ //D.0B4Gd"8bRSJGJ/bZk///,EH <$,$H/?$.$J%BG@d.dJN`///"/ .VJJVB֢F/> //$/8bD#Y:K0B'K4G/bZk1,H%DX$D,/  %/D.$"QJ/@///XDF"@.JXF1".$/J1"zJY$K :G$?q/qK/_.PJ>1,1HC!B.Jd/dK"WvKJ[dKd?0B ""GtG8b/`Zk,H/OGx""(b#_"@//E/G_"""(b#@<GG`""(b#@///G""(b#G@=F.GFJFJ/, ///GF F/$@.1"JCBF//1"K