The following code sets new action for SIGALRM to default
processing and returns the previous action for SIGALARM.
For the callable service, see
sigaction (BPX1SIA, BPX4SIA) — Examine or change a signal action.
For the data structure, see
BPXYSIGH — Signal constants.
AMODE 31 callers use
BPX1SIA (sigaction) example.
XC NEWMASK,NEWMASK Don't block additional signals
LA R15,NCATCHER New catcher (NCATCHER=0,1 ->)
STG R15,NEWHANDL
LA R15,OCATCHER Old catcher (NCATCHER=0,1 ->)
STG R15,OLDHANDL
SPACE ,
CALL BPX4SIA, Examine or change signal action +
(=A(SIGALRM#), Input: Signal constant BPXYSIGH +
NEWHANDL, Input: 0, ->0, ->1 or ->catcher +
NEWMASK, Input: 64Bit mask of signals +
=A(0), Input: Action, BPXYSIGH +
OLDHANDL, 0, ->XL4 (return 0, 1 ->catcher) +
OLDMASK, 64 bit mask of signals +
OLDFLAGS, Action, BPXYSIGH +
=AD(0), Data passed to signal routine +
RETVAL, Return value: 0 or -1 +
RETCODE, Return code +
RSNCODE), Reason code +
MF=(E,PLIST) ----------------------------------