ibm:vm370-lib:rscs:svectors.copy_src
Table of Contents
SVECTORS Source
References
- Fixes Applied : 0
- This Source Date : Saturday, December 9, 1978
- Last Fix ID : [Unmodified]
Source Listing
- SVECTORS.COPY.txt
- *COPY SVECTORS 00001000
- PUSH PRINT 00001200
- AIF ('&SYSPARM' NE 'SUP').SVE01 00001400
- PRINT OFF,NOGEN 00001600
- .SVE01 ANOP 00001800
- SVECTORS DSECT 00002000
- SPACE 1 00003000
- *** SVECTORS - LOW CORE DEFINITIONS 00004000
- * 00005000
- * 0 +-----------------------------------------------+ 00006000
- * | IPLPSW | 00007000
- * 8 +-----------------------------------------------+ 00008000
- * | IPLCCW1 | 00009000
- * 10 +-----------------------------------------------+ 00010000
- * | IPLCCW2 | 00011000
- * 18 +-----------------------------------------------+ 00012000
- * | OLDEXT | 00013000
- * 20 +-----------------------------------------------+ 00014000
- * | OLDSVC | 00015000
- * 28 +-----------------------------------------------+ 00016000
- * | OLDPROG | 00017000
- * 30 +-----------------------------------------------+ 00018000
- * | OLDMACH | 00019000
- * 38 +-----------------------------------------------+ 00020000
- * | OLDIO | 00021000
- * 40 +-----------------------------------------------+ 00022000
- * | CSW | 00023000
- * 48 +-----------------------+-----------------------+ 00024000
- * | CAW | | 00025000
- * 50 +-----------------------+-----------------------+ 00026000
- * | TIMER | | 00027000
- * 58 +-----------------------+-----------------------+ 00028000
- * | NEWEXT | 00029000
- * 60 +-----------------------------------------------+ 00030000
- * | NEWSVC | 00031000
- * 68 +-----------------------------------------------+ 00032000
- * | NEWPROG | 00033000
- * 70 +-----------------------------------------------+ 00034000
- * | NEWMACH | 00035000
- * 78 +-----------------------------------------------+ 00036000
- * | NEWIO | 00037000
- * 80 +-----------------------------------------------+ 00038000
- * 00039000
- *** SVECTORS - LOW CORE DEFINITIONS 00040000
- SPACE 1 00041000
- IPLPSW DS D X'00040000',V(DMTINI) 00042000
- IPLCCW1 DS D 00043000
- IPLCCW2 DS D 00044000
- SPACE 00045000
- OLDEXT DS D 00046000
- OLDSVC DS D 00047000
- OLDPROG DS D 00048000
- OLDMACH DS D 00049000
- OLDIO DS D 00050000
- SPACE 00051000
- CSW DS D 00052000
- CAW DS F 00053000
- EJECT 00054000
- DS F 00055000
- TIMER DS F 4X'FF' 00056000
- DS F 00057000
- SPACE 00058000
- NEWEXT DS D X'00040000',V(DMTEXT) 00059000
- NEWSVC DS D X'00040000',V(DMTSVC) 00060000
- NEWPROG DS D X'00040000',A(REXOUCH) 00061000
- NEWMACH DS D X'00020000',A(OLDMACH) 00062000
- NEWIO DS D X'00040000',V(DMTIOMIN) 00063000
- EJECT 00064000
- ORG SVECTORS+X'200' LEAVE ROOM FOR MACHINE EXTENSIONS 00065000
- SPACE 1 00066000
- *** SVECTORS - RSS VECTOR TABLE 00067000
- * 00068000
- * 200 +-----------------------------------------------+ 00069000
- * | NEWPSW | 00070000
- * 208 +-----------------------------------------------+ 00071000
- * | SSAVE | 00072000
- * 210 +-----+-----------------+-----------------------+ 00073000
- * | V*1 | | MAINMAP | 00074000
- * 218 +-----+-----------------+-----------------------+ 00075000
- * | MAINSIZE | QUEUE | 00076000
- * 220 +-----------------------+-----------------------+ 00077000
- * | QUEUEND | FREEQ | 00078000
- * 228 +-----------------------+-----------------------+ 00079000
- * | TASKQ | MPXIOQ | 00080000
- * 230 +-----------------------+-----------------------+ 00081000
- * | SELIOQ | IOEXITQ | 00082000
- * 238 +-----------------------+-----------------------+ 00083000
- * | EXTQ | ALERTQ | 00084000
- * 240 +-----------------------+-----------------------+ 00085000
- * | GIVEQ | QREQ | 00086000
- * 248 +-----------------------+-----------------------+ 00087000
- * | DISPATCH | WAITREQ | 00088000
- * 250 +-----------------------+-----------------------+ 00089000
- * | POSTREQ | IOREQ | 00090000
- * 258 +-----------------------+-----------------------+ 00091000
- * | TASKREQ | MAINREQ | 00092000
- * 260 +-----------------------+-----------------------+ 00093000
- * | ASYNREQ | ALERTREQ | 00094000
- * 268 +-----------------------+-----------------------+ 00095000
- * | GIVEREQ | TAKEREQ | 00096000
- * 270 +-----------------------+-----------------------+ 00097000
- * | TVECTOR0 | TVECTOR1 | 00098000
- * 278 +-----------------------+-----------------------+ 00099000
- * | TVECTOR2 | TVECTOR3 | 00100000
- * 280 +-----------------------+-----------------------+ 00101000
- * | TVECTOR4 | TVECTOR5 | 00102000
- * 288 +-----------------------+-----------------------+ 00103000
- * | TVECTOR6 | TVECTOR7 | 00104000
- * 290 +-----------------------+-----------------------+ 00105000
- * 00106000
- *** SVECTORS - RSS VECTOR TABLE 00107000
- SPACE 1 00108000
- NEWPSW DS D DISPATCHED PSW FOR LAST DISP 00109000
- SSAVE DS 2F GENERAL PURPOSE LOWCORE SAVEAREA 00110000
- ACTIVE DS X V*1 X'00' ID OF CURRENTLY ACTIVE TASK 00111000
- DS AL3 TASK ELEMENT FOR LAST DISPATCHEE 00112000
- SPACE 00113000
- MAINMAP DS A V(SMAP) MAIN CORE ALLOCATION MAP 00114000
- MAINSIZE DS F NUM OF PAGES IN ALL OF MAIN STOR 00115000
- QUEUE DS A V(SQUEUE) SUPERVISOR QUEUE 00116000
- QUEUEND DS A V(SQUEUEND) LAST SUP QUEUE ELEMENT 00117000
- FREEQ DS A FREE ELEMENT QUEUE 00118000
- TASKQ DS A TASK ELEMENT QUEUE 00119000
- MPXIOQ DS A MULTIPLEXOR I/O QUEUE 00120000
- SELIOQ DS A SELECTOR I/O QUEUE 00121000
- IOEXITQ DS A ASYNCH I/O REQ ELEMENT QUEUE 00122000
- EXTQ DS A EXTERNAL REQ ELEMENT QUEUE 00123000
- ALERTQ DS A TASK ASYNCH REQ ELEMENT QUEUE 00124000
- GIVEQ DS A GIVE REQUEST ELEMENT QUEUE 00125000
- SPACE 00126000
- QREQ DS A V(DMTQRQ) SUP QUEUE ALLOC REQ 00127000
- DISPATCH DS A V(DMTDSP) TASK DISPATCHER 00128000
- SPACE 00129000
- WAITREQ DS A V(DMTWAT) WAIT REQUEST 00130000
- POSTREQ DS A V(DMTPST) POST REQUEST 00131000
- IOREQ DS A V(DMTIOMRQ) I/O REQUEST 00132000
- TASKREQ DS A V(DMTASK) TASK MANAGEMENT REQUEST 00133000
- MAINREQ DS A V(DMTSTO) MAIN ALLOCATION REQUEST 00134000
- ASYNREQ DS A V(DMTASY) ASYNCH INTERRUPT REQUEST 00135000
- ALERTREQ DS A V(DMTSIG) TASK ASYNCH SIGNAL REQUEST 00136000
- GIVEREQ DS A V(DMTGIV) TASK REQUEST SEND REQUEST 00137000
- TAKEREQ DS A V(DMTAKE) TASK REQ DELIVER REQUEST 00138000
- SPACE 00139000
- TVECTOR0 DS A A(0) TASK DEFINED FIELD 00140000
- TVECTOR1 DS A A(0) TASK DEFINED FIELD 00141000
- TVECTOR2 DS A A(0) TASK DEFINED FIELD 00142000
- TVECTOR3 DS A A(0) TASK DEFINED FIELD 00143000
- TVECTOR4 DS A A(0) TASK DEFINED FIELD 00144000
- TVECTOR5 DS A A(0) TASK DEFINED FIELD 00145000
- TVECTOR6 DS A A(0) TASK DEFINED FIELD 00146000
- TVECTOR7 DS A A(0) TASK DEFINED FIELD 00147000
- SPACE 00148000
- TLINKS EQU TVECTOR0 LINK TABLE CHAIN 00149000
- TROUTE EQU TVECTOR1 ROUTING TABLE CHAIN 00150000
- TPORTS EQU TVECTOR2 SWITCHABLE PORT CHAIN 00151000
- TTAGQ EQU TVECTOR3 TAG SLOT QUEUE 00152000
- TCOM EQU TVECTOR4 COMMON ROUTINE CHAIN 00153000
- EJECT 00154000
- COMDSECT DSECT 00155000
- SPACE 1 00156000
- *** COMDSECT - COMMON ROUTINE TABLE 00157000
- * 00158000
- * 0 +-----------------------+-----------------------+ 00159000
- * | GLINKREQ | GPAGEREQ | 00160000
- * 8 +-----------------------+-----------------------+ 00161000
- * | FPAGEREQ | PMSGREQ | 00162000
- * 10 +-----------------------+-----------------------+ 00163000
- * | GMSGREQ | GTODEBCD | 00164000
- * 18 +-----------------------+-----------------------+ 00165000
- * 00166000
- *** COMDSECT - COMMON ROUTINE TABLE 00167000
- SPACE 1 00168000
- GLINKREQ DS 1A GET LINK TABLE ENTRY ROUTINE 00169000
- GPAGEREQ DS 1A GET PAGE OF MAIN STORAGE 00170000
- FPAGEREQ DS 1A FREE PAGE OF MAIN STORAGE 00171000
- PMSGREQ DS 1A PUT MESSAGE ELEMENT INTO MSG STACK 00172000
- GMSGREQ DS 1A REMOVE MSG ELEMENT FROM MSG STACK 00173000
- GTODEBCD DS 1A CONVERT S/370 TOD TO EBCDIC 00174000
- EJECT 00175000
- POP PRINT 00176000
- SPACE 00177000
ibm/vm370-lib/rscs/svectors.copy_src.txt · Last modified: 2023/08/06 13:39 by Site Administrator