<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
</head>
<body>
<p>I finished my changes to FAL and DAPLIB to support ANONYMOUS
usage on HECnet with some degree of security.</p>
<p>Naturally, the first thing I did was regression testing, both
with one of my 20's and another 20 on HECnet (TWENEX).
Unfortunately, I couldn't do anything on TWENEX because it didn't
know about my node definitions, so NFT had no syntactical way to
specify the connection (that I could remember). Intrigued, I went
to a number of other 20's to see what a SYSTAT might show. Aside
from the fact that most of them appeared down, none of them knew
about either TOMMYT:: or VENTI2::... Well!!</p>
<p>However, before I got too huffy, I wondered when the last time <b>*I*</b>
updated was, the answer turning out to be "never"... Shame on
me. So I knocked together a weekly batch job to pull a specially
formatted node list from MIM::, suitable for swallowing by SETNOD
(you have to have a RETURN statement at the end or you get an
error which can blow up a batch job). This also allows me to
track (somewhat) the comings and goings of nodes which is of
interest.</p>
<p>So the question is, how frequently are the rest of you updating
and how are you doing it? My batch control file is below in case
anyone with a 20 wants it.</p>
<p>Meanwhile, I am looking for a few volunteers to contact me
off-list to do a little alpha testing before I post the code for
ANONYMOUS usage.</p>
<hr width="100%" size="2">
<p><font size="+2"><tt>@DayTime</tt><tt><br>
</tt><tt>@Enable</tt><tt><br>
</tt><tt>@Set Trap File</tt><tt><br>
</tt><tt>@Define OLDS: PS:<OLD-SYSTEM></tt><tt><br>
</tt><tt>@Rename SYSTEM:NODE-DATA.TXT OLDS:</tt><tt><br>
</tt><tt>@NFT</tt><tt><br>
</tt><tt>*SET DEFAULTS MIM:: /USER:</tt><tt><br>
</tt><tt>*SET DEFAULTS MIM:: /PASSWORD:</tt><tt><br>
</tt><tt>*SET DEFAULTS MIM:: /ACCOUNT:</tt><tt><br>
</tt><tt>*DIR MIM::FIX.T20;0</tt><tt><br>
</tt><tt>*COPY MIM::FIX.T20;0 SYSTEM:NODE-DATA.TXT</tt><tt><br>
</tt><tt>*EXIT</tt><tt><br>
</tt><tt>@Define OLD: OLDS:NODE-DATA.TXT.0</tt><tt><br>
</tt><tt>@Define NEW: SYSTEM:NODE-DATA.TXT.0</tt><tt><br>
</tt><tt>@Define DIF: OLDS:NODE-DATA.DIF.-1</tt><tt><br>
</tt><tt>@FILCOM</tt><tt><br>
</tt><tt>*DIF:=OLD:,NEW:</tt><tt><br>
</tt><tt>=^Z</tt><tt><br>
</tt><tt>@SETNOD</tt><tt><br>
</tt><tt>*TAKE SYSTEM:NODE-DATA.TXT.0</tt><tt><br>
</tt><tt>*SAVE</tt><tt><br>
</tt><tt>*INSERT</tt><tt><br>
</tt><tt>*EXIT</tt><tt><br>
</tt><tt>@Information DECnet</tt><tt><br>
</tt><tt>@VD OLD:,NEW:</tt><tt><br>
</tt><tt>WEEKLY:: @CHKPNT WEEKLY</tt><tt><br>
</tt><tt>@Submit GETNOD.CTL.0 -</tt><tt><br>
</tt><tt>@ /After:+167:59:59 -</tt><tt><br>
</tt><tt>@ /Assistance:Yes -</tt><tt><br>
</tt><tt>@ /Batch-Log:Append -</tt><tt><br>
</tt><tt>@ /LogDisposition:Keep -</tt><tt><br>
</tt><tt>@ /LogName:GETNOD.LOG.0 -</tt><tt><br>
</tt><tt>@ /Notify:No -</tt><tt><br>
</tt><tt>@ /Output:NoLog -</tt><tt><br>
</tt><tt>@ /Restartable:YES -</tt><tt><br>
</tt><tt>@ /Time:00:01:00 -</tt><tt><br>
</tt><tt>@ /Unique:No </tt><tt><br>
</tt><tt>@Goto END</tt><tt><br>
</tt><tt>%ERR::</tt><tt><br>
</tt><tt>@Original ERun NEW:MM.EXE.0</tt><tt><br>
</tt><tt>*DayTime</tt><tt><br>
</tt><tt>*Send Nag</tt><tt><br>
</tt><tt>*DECnet Node Update Error</tt><tt><br>
</tt><tt>*Go figure out what went wrong and restart the batch
job</tt><tt><br>
</tt><tt>*^Z</tt><tt><br>
</tt><tt>*User-Header Importance High </tt><tt><br>
</tt><tt>*User-Header Priority Urgent </tt><tt><br>
</tt><tt>*User-Header X-Priority 1 </tt><tt><br>
</tt><tt>*Erase Bcc</tt><tt><br>
</tt><tt>*Send</tt><tt><br>
</tt><tt>*Quit</tt><tt><br>
</tt><tt>END::</tt><tt><br>
</tt><tt>@Information (about) Batch-Requests</tt><tt><br>
</tt><tt>@Echo That's all folks!</tt></font></p>
<p><br>
</p>
</body>
</html>