Skip to content

Instantly share code, notes, and snippets.

@zedsec390
Last active July 4, 2023 10:07
Show Gist options
  • Star 1 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save zedsec390/efba39740586524503c44cf572342456 to your computer and use it in GitHub Desktop.
Save zedsec390/efba39740586524503c44cf572342456 to your computer and use it in GitHub Desktop.
isrddn data area name file
# remove these comments before using this file
# create flat sequential file FB80 called <HLQ>.ISRDDN (can be anything, just need for next step)
# in ispf 6 do:
# ALLOCATE DSNAME(<HLQ>.ISRDDN) DDNAME(ISRDDN)
# DDLIST (start isrddn)
# B CVT (shows cvt)
# B ACEEFLG1 (shows current ACEE flags for special, etc)
# This file uses standard TSO TEST addressing (TSO/E PROGRAMMING GUIDE FOR INFO)
# Addresses are in hex.
# + means browse from current position
# ? means browse to memory at the address in current position
# . means absolute address (ie from 0x0)
# can all be strung together
# e.g. 10.? means browse to memory 0x10. absolute, read the addr and browse to it
ASCB 224.?
ASXB ASCB+6C?
ACEE ASXB+C8?
ACEEFLG1 ACEE+26
ACEEFLG2 ACEE+27
CVT 10.? Communications Vector Table
JSCBAUTH JSCB+EC
PSCB JSCB+108? TSO Protected Step Control Block
JSCB TCB+B4? Job/Step Control Block
TCB CVT?? Task Control Block
UPT PSCB+34? User Profile Table
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment