Collecting Names
of
Files Downloaded to
VMjPC
Your remote system installation may want to automatically
monitor
VMPCSERV for particular downloaded file traffic.
For
instance, they may want to prevent users from copying
certain modules to the local
VM/PC
environment, or keep
track of who
is
using particular files in the
VM/PC
environment from the host.
Whenever a file system read of record 1
is
detected, the
HSTFSR module (which
is
part
of
VMPCSERV) gives
control to a routine named HSTACC (if there
is
one). A
user could write
an
HST
ACC
routine to generate an
accounting record with the date, time, and fileid
of
the file
being accessed.
Here's a simple example of an
HSTACC
accounting routine.
****************************************************************
*
*
*
*
*
This
routine
will
use
CP
Diagnose X'4C'
to
produce *
an
accounting
record
to
track
reading
a
file
from
the:
Remote
System.
~
*
****************************************************************
HSTACC
ENTER
LA
R2,ACTTIME
DIAG
R2,RI5,X'OC'
MVC
ACTFNAME,O(Rl)
MVC
ACTFTYPE,S(Rl)
MVC
ACTFMODE,16(Rl)
LA
R2,ACTDATA
LA
R3,X'10'
LA
R4,LACTDATA
DIAG
R2,R3,X'4c'
DROP
Rl
SR
R15,R15
RET
ACTDATA
OS
00
ACTTIME
OS
CLS
OS
CLS
ACTFNAME
OS
CLS
ACTFTYPE
OS
CLS
ACTFMODE
OS
CL2
LACTDATA
EQU
*-ACTDATA
REGEQU
END
HSTACC
Point
to
area
for
the
time
Get
the
date
and time
of
day
Get
the
filename
Get
the
filetype
Get
the
filemode
Get
address
of
account
data
Subcode
X'
10'
Length
of
user
information
Issue
diagnose
for
account
Date
MM/DD/YY
Time
HH:MM:SS
Name
of
file
being read
Type
of
file
being read
Mode
of
file
being read
Note:
ENTER
and
RET
are macros
that
can be found
on
the CMS 101 minidisk in VMPCSERV MACLIB.
In this very simple example, when record 1
of
a file
is
requested, HSTFSR calls the
HSTACC
routine
to
generate
accounting information, which can be collected
by
the
Remote System Installation for analysis.
The
actual format
of the accounting data would
not
have
to
match what
is
done
6-18
VM/PC
Users Guide
To Next Page
Loading...
Need help?
General
