LSTSRV-L Archives

LISTSERV Site Administrators' Forum

LSTSRV-L

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Topic: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Sun, 31 Oct 1993 20:47:15 EST
text/plain (35 lines)
On Sun, 31 Oct 1993 14:35:45 EST Jeff Findlay said:
>I would be curious to know if there is any way of finding or getting listserv
>to acknowledge when the fileserver has been accessed by a subscriber?  I've
>put a lot of work into creating the fileserver, and it is frustrating to me
>not to know whether it's being used.  . .
 
One way to do this is to cause the following GETLOG EXEC to be executed when-
ever a file is sent to a recipient:
------------------------------GETLOG EXEC-------------------------------
/* This File access validation exit logs user GET requests.           */
/* It was modified 4/1/92 at the suggestion of R N Hathhorn (SYSMAINT@
PCCVM) to bypass any AFD flags associated with the file.              */
 
tellme = <your_userid>
ADDRESS COMMAND
ARG , req origin filelist . "*" fn ft remainder
IF req ^= "GET1" THEN EXIT 0
IF fn = "/" | ft = "D/" THEN PARSE VAR remainder fn ft .
entry = DATE("U") TIME() LEFT(filelist,8) LEFT(fn,8) LEFT(ft,8) origin
"EXECIO 1 DISKW" fn "GETLOG A1 0 (VAR ENTRY FINIS"
CALL DIAG 8,"MSGNOH" tellme "LISTSERV sent" fn ft "from" filelist,
  "library to" origin"."
EXIT 0
--------------------------------CUT HERE--------------------------------
The exec is caused to be executed by modifying entries in the FILEID
file by appending to each line the command "GETLOG" or, equivalently,
changing the second line of the file to look something like
 
*DEFAULT* X5/200 GETLOG
 
Each request for file <fn> <ft> causes a record to be added to file <fn>
NETLOG (on LISTSERV 191) and also a message sent to the userid designated at
the top of the exec.
                                             /b

ATOM RSS1 RSS2