1 INFO-VAX	Sun, 08 Aug 2004	Volume 2004 : Issue 436       Contents: Re: Questions About ICC  RE: rx2600 and SAS? Re: Structure of SMTP Receiver - simple spam and content filter C Re: TECO manual location, was: Re: [Somewhat OT] What your non-OVMS C Re: TECO manual location, was: Re: [Somewhat OT] What your non-OVMS   F ----------------------------------------------------------------------  # Date: Sun, 08 Aug 2004 02:31:49 GMT  From: danco@ns2.pebble.org  Subject: Re: Questions About ICC1 Message-ID: <slrnchb0d0.rnu.danco@ns2.pebble.org>   J In article <hjg2h0t8n7vcf6l52udt1ghhcf25qrim84@4ax.com>, Sarah Page wrote:  G > 2) I am perplexed (and hopefully not missing something obvious) about H > how my application is to know the connection handle of an association.  H If you're perplexed, then so was I when I implemented ICC as a low-levelB transport mechanism for our own software, so that makes two of us.@ I gather the designers of ICC didn't consider the possibility ofB that one process might want to have more than one association withD a need to keep track of them in a generalized rather than hard-codedF sort of way.  The SYS$ICC routines don't provide any mechanism to passA through a user provided AST parameter to the incomming connection C AST routine.  So when one must deal with multiple associations in a A single process, how is one supposed to know which association the G incomming connection AST is associated with?  I solved this by creating @ a pool of 64 separate connection AST routines, then allocating aC separate connection AST routine from the pool for each association. G Each connection AST routine is then nothing more than a wrapper for the E real connection AST routine.  The wrapper does nothing more than pass E through all the parameters that were passed to it, plus an indication F of which association to which it was allocated, to the real connectionA routine.  In other words, I'm effectively using the PC address of G the conneciton AST routine to determine which association the incomming 9 connection AST is associated with.  Crude, but effective.    - Dan    ------------------------------  $ Date: Sat, 7 Aug 2004 17:08:32 -0700# From: "Tom Linden" <tom@kednos.com>  Subject: RE: rx2600 and SAS 9 Message-ID: <NDEMLKKEBOIFBMJLCECIGEDNDKAA.tom@kednos.com>    < -----Original Message-----; < From: David J Dachtera [mailto:djesys.nospam@comcast.net] ) < Sent: Saturday, August 07, 2004 9:28 AM  < To: Info-VAX@Mvb.Saic.Com  < Subject: Re: rx2600 and SAS  <  <  < Tom Linden wrote:  < >   < > < -----Original Message-----9 < > < From: Paul Repacholi [mailto:prep@prep.synonet.com] + < > < Sent: Friday, August 06, 2004 1:59 PM  < > < To: Info-VAX@Mvb.Saic.Com ! < > < Subject: Re: rx2600 and SAS  < > <  < > < ; < > < Patrick Young <patrick@hilux.ace.unsw.EDU.AU> writes:  < > < E < > < > Cobol? - we have an application still written in it would you  < > < > believe? < > < K < > < A bank as part of the total rewrite they did for Y2K dropped PL/I and 6 < > < did it ALL in COBOL. Not a line of C to be seen. < >  < > And that is progress?  < 5 < If it solved their Y2K problem, why wouldn't it be?   D PL/I never had a Y2K problem and Cobol is a more primitive language.K (Of course if they used the DATE function rather than the DATETIME function L http://www.kednos.com/pli/docs/REFERENCE_MANUAL/6291pro_036.html#index_x_161 0 . then they would have had to modify their code) <  < D.J.D. <  < --- ( < Incoming mail is certified Virus Free.< < Checked by AVG anti-virus system (http://www.grisoft.com).A < Version: 6.0.735 / Virus Database: 489 - Release Date: 8/6/2004  <  --- & Outgoing mail is certified Virus Free.: Checked by AVG anti-virus system (http://www.grisoft.com).? Version: 6.0.735 / Virus Database: 489 - Release Date: 8/6/2004    ------------------------------  $ Date: Sun, 8 Aug 2004 00:53:22 -04000 From: "Jeff Morgan" <vmswiz@geonospamcities.com>H Subject: Re: Structure of SMTP Receiver - simple spam and content filter- Message-ID: <cf4bk5$55gb$1@news3.infoave.net>    Ian:  A That's a good improvement to the code to watch for updates to the E test_email_content.com command file. The idea is that you can add new J anti-spam and filtering routines and it will automatically resubmit itself% any time the command file is changed.   H When I wrote it, I never intended to share the code, so I didn't make it universal like it should be.  I Here's some code to check for virus attachments in all incoming emails. I @ don't think it is in the file I posted on geocities years ago...   $ ! Test for virus attachments $ B $       SEARCH/NOLOG/NOWARN 'FNAME'.*TEXT "name=",".pif"/match=and" $       IF $STATUS .NE. %X08D78053 $       then$ $               goto kill_this_virus
 $       endif  $ B $       SEARCH/NOLOG/NOWARN 'FNAME'.*TEXT "name=",".scr"/match=and" $       IF $STATUS .NE. %X08D78053 $       then$ $               goto kill_this_virus
 $       endif  $ B $       SEARCH/NOLOG/NOWARN 'FNAME'.*TEXT "name=",".bat"/match=and" $       IF $STATUS .NE. %X08D78053 $       then$ $               goto kill_this_virus
 $       endif  $ B $       SEARCH/NOLOG/NOWARN 'FNAME'.*TEXT "name=",".exe"/match=and" $       IF $STATUS .NE. %X08D78053 $       then$ $               goto kill_this_virus
 $       endif B $       SEARCH/NOLOG/NOWARN 'FNAME'.*TEXT "name=",".cmd"/match=and" $       IF $STATUS .NE. %X08D78053 $       then$ $               goto kill_this_virus
 $       endif  $ B $       SEARCH/NOLOG/NOWARN 'FNAME'.*TEXT "name=",".zip"/match=and" $       IF $STATUS .NE. %X08D78053 $       then$ $               goto kill_this_virus
 $       endif  $ B $       SEARCH/NOLOG/NOWARN 'FNAME'.*TEXT "name=",".com"/match=and" $       IF $STATUS .NE. %X08D78053 $       then$ $               goto kill_this_virus
 $       endif  $   6 And then anywhere down at the end of the command file:   $ KILL_THIS_VIRUS:$ $       disp "**** VIRUS KILLED ***" $       DELETE/ENT='WENTRY'  $       goto jloop2   J Notice that I throw away all zip files these days. It just isn't worth the= risk. Too many viruses/worms are using zip files to sneak in.   J You could also move the job to the spam que, but then you have to manually
 kill them.  J Once a job is in the tcpip$spam que, simply reque it to the tcpip$approved que to deliver it normally.   H I just wish search would allow a data file of searches to be passed like- most vms utilities using @filename or /input=   ! It would make TEC more efficient.    Comments appreciated.   +                                        Jeff   5 "Ian Burgess" <qagcwest@hotmail.com> wrote in message 7 news:d03f1df2.0408041758.538b7955@posting.google.com...   > Thanks for posting that, Jeff. >  > A comment on the procedure... B > The part that decides whether a new version exists is a bit site
 dependent. > : > How about this: (just see if the version number changed) > % > $ This = f$environment("procedure")  > $Top: 4 > $ Latest_version = F$search(F$element(0,";",This))3 > $ If This .nes. Latest_version then goto resubmit  > $  > $  > $ wait 0:1:00  > $ goto Top >  >  > $resubmit:. > $ Submit 'Latest_version' /after="+00:01:00" > $Exit    ------------------------------   Date: 7 Aug 2004 18:04:58 -0700  From: lsk55@hotmail.com (Scott) L Subject: Re: TECO manual location, was: Re: [Somewhat OT] What your non-OVMS= Message-ID: <926edf3b.0408071704.2f72c037@posting.google.com>   E I have to confess that I still use TECO and have done so for lo these E 30+ years.  Don't get me wrong, I've written over 10,000 lines of TPU B to augment my use of EVE.  But, sometimes smart editing is just soC much easier in TECO's terse language.  Now that I'm older, however, E there are times I have to do the Zen thing... you know, stop thinking F about it and just type.  My fingers remember more TECO commands than IE can conjure up consciously!  But its lonely not having anyone to talk 6 TECO with anymore. <heartfelt>sigh</heartfelt> --Scott   ------------------------------  % Date: Sun, 08 Aug 2004 03:39:38 +0000 - From: David B Sneddon <dbsneddon@bigpond.com> L Subject: Re: TECO manual location, was: Re: [Somewhat OT] What your non-OVMS* Message-ID: <4115A07A.8050401@bigpond.com>   Scott was overheard to say: G > I have to confess that I still use TECO and have done so for lo these G > 30+ years.  Don't get me wrong, I've written over 10,000 lines of TPU D > to augment my use of EVE.  But, sometimes smart editing is just soE > much easier in TECO's terse language.  Now that I'm older, however, G > there are times I have to do the Zen thing... you know, stop thinking H > about it and just type.  My fingers remember more TECO commands than IG > can conjure up consciously!  But its lonely not having anyone to talk 8 > TECO with anymore. <heartfelt>sigh</heartfelt> --Scott >   E What you need to do is have some offspring and teach them in the ways 1 of Teco, to carry on the tradition -- like I did.    Regards, Dave.  --  I David B Sneddon (dbs)    VMS Systems Programmer     dbsneddon@bigpond.com I Sneddo's quick guide ...          http://www.users.bigpond.com/dbsneddon/ I DBS freeware at ...   http://www.users.bigpond.com/dbsneddon/software.htm I "Life is what happens to you while you're busy making other plans" Lennon    ------------------------------   End of INFO-VAX 2004.436 ************************