------- =_aaaaaaaaaa0 Content-Type: text/plain; charset="us-ascii" Content-ID: <[log in to unmask]> On Tue, 19 Mar 1996 11:06:28 CST, you said: > Is it possible as a list owner to get a list of my users who have > been served off? I'll do you one better.. Appended are a Rexx script and a Korn shell script to do a 'serve on' for everybody who isn't served off by the postmaster. Works for me, your mileage may vary.... ------- =_aaaaaaaaaa0 Content-Type: text/plain; charset="us-ascii" Content-ID: <[log in to unmask]> #!/bin/ksh cd ~listserv/lsv/home strings permvars.file|grep SERVEOFF | awk '{if ($2 == "") printf "lcmd quiet serve "substr($0,9,length($0)-10)" on\n"}' ------- =_aaaaaaaaaa0 Content-Type: text/plain; charset="us-ascii" Content-ID: <[log in to unmask]> I run this on our Unix listserv machine, as 're-serve | sh -v'. To just *see* who is served off, leave off the "| sh -v". ------- =_aaaaaaaaaa0 Content-Type: text/plain; charset="us-ascii" Content-ID: <[log in to unmask]> /* rexx */ parse upper arg server '(' testmode; if testmode = 'TEST' then tester = 'SAY'; else tester = ''; if server = '' then server ='LISTSERV'; 'LDISK' server '191 (STACK'; pull addr mode; do forever; 'EXECIO 1 DISKR PERMVARS FILE' mode ' (VAR LINE'; if rc <> 0 then leave; if substr(line,4,8) = 'SERVEOFF' then do; parse var line . 12 target; if words(target) > 1 then do; say 'Admin serve off' target; end; else do; rip = length(target) -1 if substr(target,rip,2) = 21 then do; target = substr(target,1,rip-1); tester 'CP MSG' server 'QUIET SERVE ' target' ON'; tester 'CP SLEEP 5 SEC'; end; else if substr(target,rip-1,3) = 100 then do; target = substr(target,1,rip-2); tester 'CP MSG' server 'QUIET SERVE ' target' ON'; tester 'CP SLEEP 5 SEC'; end; else say "whoops" target; end; end; end; 'REL' mode '(DET'; ------- =_aaaaaaaaaa0 Content-Type: text/plain; charset="us-ascii" Content-ID: <[log in to unmask]> Run this on a VM userid that has postmaster privs on Listserv. The one gotcha here is the 'LDISK' command, which is a local homegrown. Basically, it does a "CP LINK"/"ACCESS' and stacks the address and mode it used. If run as 're-serve (test' it will just list what users are served off. The junk about 'server' is there only because we run two Listserv machines on one physical 3090 (Caution: do not try this at home. These are highly trained professional stunt idiots ;) -- Valdis Kletnieks Computer Systems Engineer Virginia Tech ------- =_aaaaaaaaaa0--