GDSX Manual

Design and Development
Extended General Device Support (GDSX) Manual–134303
2-74
EMS Filters and GDSX
^CLOSE, ^FILEINFO, and ^FNAMEEXPAND). If other calls are attempted, TSCODE
returns file-system error 29 or 560.
If GDSX is run unconverted, only the GDSX pseudo Guardian procedures that
correspond to the C-series Guardian procedures are available to USCODE (except for
^FILE_OPEN_, ^FILE_CLOSE_, and ^FILE_GETINFO_). If other calls are attempted,
TSCODE returns file-system error 29 or 560.
EMS Filters and GDSX
GDSX processes send tokenized fault and event messages to the Event Management
Service (EMS) primary collector ($0) process. (See "Interpreting Console and EMS
Messages" on page 3-16 for a listing of these messages.) The collector stores these
messages in the current EMS log file. EMS distributor processes select messages from
the log file and deliver them to consumers.
A distributor process can use a filter to limit the types of events passed to a consumer.
For example, a distributor can be used with a filter to deliver only event messages from
GDSX processes running in the network where the distributor is running. The following
file (named FILTGDS) implements such a filter, using a subsystem ID check to
determine what event messages are to be routed to an EMS terminal.
FILTER GDSX;
BEGIN
[#SET ZGDS^VAL^SSID
[ZSPI^VAL^TANDEM].[ZSPI^SSN^ZGDS].[ZGDS^VAL^VERSION]]
IF ZEMS^TKN^SSID = SSID(ZGDS^VAL^SSID) THEN PASS;
END;
See the EMS Manual for more information on filters.
This filter must be compiled with EMF, the EMS filter compiler. The following OBEY
file, named LOADFILT, loads subsystem and EMS TACL definitions (ZSPITACL and
ZEMSTACL) and GDSX TACL definitions (ZGDXTACL) required for the compilation.
After loading these definitions, LOADFILT compiles FILTGDS and starts a printing
distributor (EMSDIST) employing the filter and directing output to the designated EMS
terminal.
PUSH X
#LOAD /KEEP 1, LOADED X/ $vol.subvol.ZSPITACL
#LOAD /KEEP 1, LOADED X/ $vol.subvol.ZEMSTACL
#LOAD /KEEP 1, LOADED X/ $vol.subvol.ZGDXTACL
POP X
EMF /IN FILTGDS/ FGDS
EMSDIST COLLECTOR $0, TYPE P, FILTER FGDS, TEXTOUT $term-name
Running the Filter
To run this filter, edit the LOADFILT file so that the ZSPITACL, ZEMSTACL, and
ZGDXTACL files are properly qualified. (These files are often kept in the ZSPIDEF
subvolume.) Change $vol and subvol to the appropriate volume and subvolume