%%s 0/0/0
%%d D 1.1 25-Mar-82 12:16:27 v1.1 1 0
%%c Version 1.1 is the Spring 1982 Distribution of the LBL/Hughes release
%%c of the Software Tools Virtual Operating System software and documentation.
%%T
%%I 1
#-h- usersym          112  asc  25-mar-82 09:05:08  v1.1 (sw-tools v1.1)
# symbol definitions used by:    users
# should be placed on a file named    usersym
#
 define(RIGHT_MARGIN,80)
#-h- users.r         1038  asc  25-mar-82 09:05:09  v1.1 (sw-tools v1.1)
#-h- main             965  asc  25-mar-82 09:04:52  v1.1 (sw-tools v1.1)
 include usersym

 DRIVER(users)

 character buf(MAXLINE), file(FILENAMESIZE), obuf(MAXLINE)
 integer getlin, open, length, isatty, getarg, equal
 integer nxtcol, packit, int, i

 call query("usage:  users [-1].")
 packit = isatty(STDOUT)
 if (getarg(1, file, FILENAMESIZE) != EOF)
    if (file(1) == '-' & file(2) == '1')
	packit = NO
    else
	call badarg(file)
 call adrfil(file)
 if (packit == YES)
    call inpack(nxtcol, RIGHT_MARGIN, obuf, STDOUT)
 int = open(file, READ)
 if (int != ERR)
    {
    while (getlin(buf, int) != EOF)
	{
	for (i=1; buf(i)!=' ' & buf(i)!='@t' & buf(i) != '@@'; i=i+1)
	    file(i) = buf(i)
	file(i) = EOS
	if (packit == YES)
	    call dopack(file, nxtcol, RIGHT_MARGIN, obuf, STDOUT)
	else
	    {
	    call putlin(file, STDOUT)
	    call putch('@n', STDOUT)
	    }
	}
    if (packit == YES)
	call flpack(nxtcol, RIGHT_MARGIN, obuf, STDOUT)
    call close(int)
    }
 else
    call remark("Cannot open user file!")

 DRETURN
 end
#-h- users.fmt        925  asc  25-mar-82 09:05:10  v1.1 (sw-tools v1.1)
.so ~bin/manhdr
.hd Users (1) 25-Aug-80
list valid mail users
.sy
users [-1]
.ds
users lists the valid user name to which mail may be sent on the standard
output.  If the standard output has been redirected to a file or pipeline,
the names are listed one per line.  If the standard output is to a terminal,
then the names are listed in five columns across the terminal, sorted
alphabetically from left to right.  If single-column output is desired,
the -1 switch will force a single column to the terminal.  The output of
users may be edited and used
as a mailing list file for the utility sndmsg.
.fl
users uses the file "address" in the mail directory to obtain the names of
valid users of the mail system.
.sa
.nf
sndmsg - utility to send mail
msg - utility for reading and filing mail
postmn - utility to check for the existence of mail
resolve - utility to query information concering mail users
.fi
.au
Joe Sventek
.bu
%%E 1