SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (1)      33  HISTORY			; DETAILED

   (1)      40  DECLARATIONS

   (1)     139  SHELL PROCESS HEADER

   (1)     237  SHELL PROCESS PAGE TABLES

   (1)     311  BODY OF SHELL PROCESS

   (1)     472  PROCESS I/O SEGMENT

   (1)     623  INITIALZE SHELL WITH SYSGEN PARAMETERS

   (1)     790  FILLPHD - SETUP A VALID PHD PTE

   (1)     825  COMMAND LANGUAGE INTERPRETER DATA AREA

   (1)     841  COMPATIBILITY MODE EMULATOR CONTEXT PAGE

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page   1

01                                                                                                                               (1)



                                     0000     1 	.TITLE	SHELL PROCESS DEFINITION

                                     0000     2 	.IDENT	/01/

                                     0000     3 ;

                                     0000     4 ; COPYRIGHT (C) 1977,1978

                                     0000     5 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754

                                     0000     6 ;

                                     0000     7 ; THIS SOFTWARE IS FURNISHED  UNDER A LICENSE FOR USE ONLY ON A SINGLE

                                     0000     8 ; COMPUTER  SYSTEM AND  MAY BE  COPIED ONLY WITH  THE INCLUSION OF THE

                                     0000     9 ; ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE, OR ANY OTHER COPIES THEREOF,

                                     0000    10 ; MAY NOT BE PROVIDED OR  OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON

                                     0000    11 ; EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE

                                     0000    12 ; TERMS.  TITLE TO AND  OWNERSHIP OF THE  SOFTWARE  SHALL AT ALL TIMES

                                     0000    13 ; REMAIN IN DEC.

                                     0000    14 ;

                                     0000    15 ; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE

                                     0000    16 ; AND SHOULD  NOT BE CONSTRUED  AS A COMMITMENT  BY DIGITAL  EQUIPMENT

                                     0000    17 ; CORPORATION.

                                     0000    18 ;

                                     0000    19 ; DEC ASSUMES  NO  RESPONSIBILITY  FOR  THE USE OR  RELIABILITY OF ITS

                                     0000    20 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.

                                     0000    21 

                                     0000    22 ;++

                                     0000    23 ; FACILITY:	EXECUTIVE, CREATE PROCESS/SWAPPER DATA BASE

                                     0000    24 ;

                                     0000    25 ; ABSTRACT:	SHELL DEFINES THE SWAP IMAGE FOR THE INITIAL PROCESS

                                     0000    26 ;		STARTED BY THE CREATE PROCESS SYSTEM SERVICE.

                                     0000    27 ;

                                     0000    28 ; ENVIRONMENT:

                                     0000    29 ;

                                     0000    30 ;--

                                     0000    31 ;

                                     0000    32 ;	.PAGE

                                     0000    33 	.SBTTL	HISTORY			; DETAILED

                                     0000    34 ;

                                     0000    35 ; AUTHOR: RICHARD I. HUSTVEDT, CREATION DATE: 30-NOV-76

                                     0000    36 ;

                                     0000    37 ; MODIFIED BY:

                                     0000    38 ;	, : VERSION

                                     0000    39 ; 01	 -

                                     0000    40 	.SBTTL	DECLARATIONS

                                     0000    41 

                                     0000    42 ;

                                     0000    43 ; INCLUDE FILES:

                                     0000    44 ;

                                     0000    45 	$CCBDEF			;CHANNEL CONTROL BLOCK DEFINITIONS

                                     0000    46 	$DYNDEF			;DYNAMIC DATA STRUCTURE TYPE DEFINITIONS

                                     0000    47 	$IMPDEF			;RMS INTERNAL STRUCTURE DEFINITION

                                     0000    48 	$IPLDEF			;DEFINE INTERRUPT LEVELS

                                     0000    49 	$PCBDEF			;PROCESS CONTROL BLOCK DEFINITIONS

                                     0000    50 	$PFNDEF			;PFN DATA BASE DEFINITIONS

                                     0000    51 	$PHDDEF			;PROCESS HEADER DEFINITIONS

                                     0000    52 	$PRTDEF			;DEFINE PROTECTION CODES

                                     0000    53 	$PSLDEF			;DEFINE PSL FIELDS

                                     0000    54 	$PTEDEF			;PAGE TABLE ENTRY DEFINTIONS

                                     0000    55 	$SECDEF			;SECTION DEFINITIONS (GSTE/PSTE)

                                     0000    56 	$SGNDEF			;SYSGEN VALUE DEFINITIONS

                                     0000    57 	$VADEF			;DEFINE VIRTUAL ADDRESS FIELDS

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page   2

01              DECLARATIONS                                                                                                     (1)



                                     0000    58 	$WSLDEF			;WORKING SET LIST DEFINITIONS

                                     0000    59 ;

                                     0000    60 ; EXTERNAL SYMBOLS:

                                     0000    61 ;

                                     0000    62 

                                     0000    63 ;

                                     0000    64 ; EQUATES:

                                     0000    65 ;

                                     0000    66 

                           00000000  0000    67 P1PTECNT=0				; INITIALIZE COUNT OF P1 PTES

                           00000003  0000    68 KSTACK=3				; THREE PAGES OF KERNEL STACK

                           00000002  0000    69 ESTACK=2				; TWO PAGES OF EXEC STACK

                           00000007  0000    70 SSTACK=7				; TWO PAGES OF SUPER STACK

                           00000004  0000    71 PARSIZE=4				; FOUR PAGES FOR PROCESS ALLOCATION REGION

                                     0000    72 

                           00003C00  0000    73 PIO$C_SEGSIZ==30*512			; SIZE OF PROCESS I/O SEGMENT

                           00000001  0000    74 SWP$C_DBGPTCNT==1			; NUMBER OF DEBUG AREA PAGE TABLES

                                     0000    75 

                                     0000    76 ;

                                     0000    77 ; MACROS:

                                     0000    78 ;

                                     0000    79 

                                     0000    80 	.MACRO	WSL	SYM,TYPE	; MAKE VALID WS LIST ENTRY

                                     0000    81 	.LONG	SYM!WSL$M_VALID!WSL$C_'TYPE	; SET VALID BIT

                                     0000    82 	.ENDM	WSL

                                     0000    83 

                                     0000    84 	.MACRO	CTL	SYM

                                     0000    85 CTL$'SYM==.-CTLVECPAG+VECTORS

                                     0000    86 	.ENDM	CTL

                                     0000    87 

                                     0000    88 	.MACRO	PHD	SYM

                                     0000    89 	.=PHD...+PHD$'SYM

                                     0000    90 	.ENDM	PHD

                                     0000    91 

                                     0000    92 

                                     0000    93 	.MACRO	PIO	SYM		; DEFINE PROCESS I/O SEGMENT SYMBOL

                                     0000    94 PIO$'SYM==PIOBASE+<.-PIO>		;

                                     0000    95 	.ENDM	PIO

                                     0000    96 

                                     0000    97 	.MACRO	PIOL	SYM		; DEFINE PROCESS I/O LOCAL SYMBOL

                                     0000    98 PIOL'SYM=PIOBASE+<.-PIO>		;

                                     0000    99 	.ENDM	PIOL			;

                                     0000   100 

                                     0000   101 ;

                                     0000   102 ; P1PTE - GENERATE PTES FOR CONTROL REGION PAGE TABLE

                                     0000   103 ;

                                     0000   104 

                                     0000   105 	.MACRO	P1PTE	NUM,ACCESS=NA,OWNER=K,STATE,SYM

                                     0000   106 	.IF	NB,SYM

                                     0000   107 	SYM=VA...

                                     0000   108 	.ENDC

                                     0000   109 

                                     0000   110 	.REPT	NUM

                                     0000   111 	.=.-4

                                     0000   112 	.IF	IDN,<STATE>,<VALID>

                                     0000   113 	TMP...=<1@31>

                                     0000   114 	.IFF

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page   3

01              DECLARATIONS                                                                                                     (1)



                                     0000   115 	TMP...=0

                                     0000   116 	.ENDC

                                     0000   117 

                                     0000   118 	.IF	IDN,<STATE>,<PFIL>

                                     0000   119 	TMP...=PTE$M_TYP1

                                     0000   120 	P1PTECNT=P1PTECNT+1

                                     0000   121 	.ENDC

                                     0000   122 	.LONG	PTE$C_'ACCESS!PTE$C_'OWNER'OWN!TMP...

                                     0000   123 

                                     0000   124 	.=.-4

                                     0000   125 	VA...=VA...-^X200

                                     0000   126 	.ENDR

                                     0000   127 	.ENDM	P1PTE

                                     0000   128 

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page   4

01              DECLARATIONS                                                                                                     (1)



                                     0000   130 

                                     0000   131 SWP$GL_SHELIO::				; I/O PAGE COUNT FOR SHELL

                           00000007' 0000   132 	.LONG	SWP$C_SHELLSIZ		;

                           00000003  0004   133 SWP$C_KSTACK==KSTACK			; COUNT OF KERNEL STACK PAGES

                           00000001  0004   134 SWP$C_SHLP1PT==1			; COUNT OF BASIC P1 PAGE TABLES FOR SHELL

                                 00000000   135 	.PSECT	ZZSHELL,PAGE		; LAST SIGNIFICANT PSECT

                                     0000   136 SHELL:					; BASE OF SHELL SWAP IMAGE

                                     0000   137 SWP$GL_SHELLBAS::			; 

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page   5

01              SHELL PROCESS HEADER                                                                                             (1)



                                     0000   139 	.SBTTL	SHELL PROCESS HEADER

                                     0000   140 ;

                                     0000   141 ;	PROCESS HEADER FOR SHELL PROCESS

                                     0000   142 ;

                                     0000   143 

                           00000000  0000   144 PHD...=.				; BASE OF PROCESS HEADER

                           00000118  0000   145 	.BLKB	PHD$C_LENGTH		; RESERVE SPACE FOR HEADER

                                     0118   146 

                                     0118   147 ;

                                     0118   148 ;	WORKING SET LIST

                                     0118   149 ;

                                     0118   150 ; PAGES DESCRIBED IN THE WORKING SET LIST MUST OCCUR IN THE SAME ORDER

                                     0118   151 ; WITHIN THE PROCESS BODY.

                                     0118   152 ;

                                     0118   153 	.ALIGN	LONG			; AT LONGWORD RESOLUTION

                           00000118  0118   154 WSL...=.				; BASE OF WORKING SET LIST

                                     0118   155 

                                     0118   156 	WSL	<<KSPINI-<1*512>>!WSL$M_WSLOCK>,PROCESS; KERNEL STACK PAGE 1

                                     011C   157 	WSL	<<KSPINI-<2*512>>!WSL$M_WSLOCK>,PROCESS; KERNEL STACK PAGE 2

                                     0120   158 	WSL	<<KSPINI-<3*512>>!WSL$M_WSLOCK>,PROCESS; KERNEL STACK PAGE 3

                                     0124   159 	WSL	<VECTORS!WSL$M_WSLOCK>,PROCESS	; VECTOR PAGE

                           00000128  0128   160 DYNWSL=.				; START OF DYNAMIC WORKING SET

                                     0128   161 	WSL	PIOBASE!WSL$M_MODIFY,PROCESS	; PROCESS I/O SEGMENT BASE

                                     012C   162 	WSL	PRCALLREG!WSL$M_MODIFY,PROCESS	; PROCESS ALLOCATION REGION

                                     0130   163 

                           00000130  0130   164 FWSL...=.				; FREE WORKING SET LIST

                           00000002  0130   165 NDYN=<FWSL...-DYNWSL>@-2		; NUMBER OF DYNAMIC ENTRIES IN SHELL

                           00000002  0130   166 SWP$C_NDYN==NDYN			; GLOBAL NAME FOR NUMBER OF DYNAMIC PAGES

                                     0130   167 	.ALIGN	PAGE			; GET TO END OF PAGE

                           00000200  0200   168 SAV...=.				;

                                     0200   169 

                           0000004A  0200   170 TMP...=<DYNWSL-PHD...>@-2		; BASE OF FLUID WORKING SET LIST

                                     0200   171 

                                     0200   172 	PHD	W_WSLOCK		; POINTER TO START OF LOCKED PAGES

                               004A  000C   173 	.WORD	TMP...			;

                                     000E   174 

                                     000E   175 	PHD	W_WSDYN			; POINTER TO START OF DYNAMIC PAGES

                               004A  000E   176 	.WORD	TMP...			;

                                     0010   177 

                                     0010   178 	PHD	W_WSLIST		;

                               0046  0008   179 	.WORD	<WSL...-PHD...>@-2	; START OF WORKING SET LIST

                                     000A   180 	PHD	W_WSNEXT		; NEXT WORKING SET ENTRY

                               004B  0010   181 	.WORD	<TMP...+NDYN-1>		;

                                     0012   182 

                                     0012   183 

                                     0012   184 

                                     0012   185 	PHD	L_FREP1VA		; VA OF FIRST FREE PAGE IN P1 SPACE

                           7FFE1400' 0030   186 	.LONG	VA...-512		;

                                     0034   187 

                                     0034   188 	PHD	Q_PRIVMSK		; ENABLE ALL PRIVILEGES

                  FFFFFFFF FFFFFFFF  0000   189 	.LONG	-1,-1			;

                                     0008   190 

                                     0008   191 	PHD	W_QUANT			; QUANTUM OF ONE SECOND

                               FF9C  0040   192 	.WORD	-100			;

                                     0042   193 

                                     0042   194 	PHD	L_KSP			; STACK POINTERS

                           7FFEEC00' 0078   195 	.LONG	KSPINI			; KERNEL STACK POINTER

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page   6

01              SHELL PROCESS HEADER                                                                                             (1)



                           7FFEF000' 007C   196 	.LONG	ESPINI			; EXECUTIVE STACK POINTER

                           7FFEFE00' 0080   197 	.LONG	SSPINI			; SUPER STACK POINTER

                                     0084   198 					; NO INITIAL USER STACK

                                     0084   199 

                                     0084   200 	PHD	L_PC			; INITIAL PROGRAM COUNTER

                           00000000' 00C0   201 	.LONG	EXE$PROCSTRT		; START PROCESS

                                     00C4   202 

                                     00C4   203 	PHD	L_PSL			; PROGRAM STATUS LONGWORD

                           00020000  00C4   204 	.LONG	IPL$_ASTDEL@PSL$V_IPL	; MUST RUN AT ASTDEL

                                     00C8   205 	PHD	L_P0BR			; P0 BASE REGISTER

                           00000000  00C8   206 	.LONG	0			; RELATIVE OFFSET

                                     00CC   207 

                                     00CC   208 	PHD	L_P0LRASTL		; NO AST PENDING, POLR = 0

                           04000000  00CC   209 	.LONG	<4@PHD$V_ASTLVL>	;

                                     00D0   210 

                                     00D0   211 	PHD	L_P1BR			; SVA OF P1 PAGE TABLE BASE

                           FF800000  00D0   212 	.LONG	-<1@23>			; 

                                     00D4   213 

                                     00D4   214 	PHD	L_P1LR			; P1 LENGTH REGISTER

                           001FFF0B' 00D4   215 	.LONG	<1@21>-P1PTLEN		; 

                                     00D8   216 

                                     00D8   217 	PHD	L_FREPTECNT		; FREE PTE'S BETWEEN P0 AND P1 PT

                           FFFFFF0B' 002C   218 	.LONG	-<<1@31-VA...>@-9>	; (NUMBER OF AVAILABLE LONGWORDS

                                     0030   219 

                                     0030   220 	PHD	W_PRCLM			; SUB PROCESS LIMIT

                               0004  0042   221 	.WORD	4			; ALLOW FOUR

                                     0044   222 

                                     0044   223 	PHD	W_WSFLUID		; GUARANTEED FLUID PAGE COUNT

                               000A  0074   224 	.WORD	10			; GUESS AT TEN FOR NOW (WAG)

                                     0076   225 

                                     0076   226 	PHD	L_PGFLQUOTA		; PAGING FILE QUOTA

                           00002710  005C   227 	.LONG	10000			;

                                     0060   228 

                                     0060   229 	PHD	L_PGFLCNT		; PAGING FILE QUOTA REMAINING

                           0000270E  0034   230 	.LONG	10000-NDYN		;

                                     0038   231 

                                     0038   232 	PHD	B_DFPFC			; DEFAULT PAGE FAULT CLUSTER

                                 10  0038   233 	.BYTE	16			;

                                     0039   234 

                           00000200  0039   235 	.=SAV...			; RESTORE LOCATION COUNTER

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page   7

01              SHELL PROCESS PAGE TABLES                                                                                        (1)



                                     0200   237 	.SBTTL	SHELL PROCESS PAGE TABLES

                                     0200   238 ;

                                     0200   239 ;

                                     0200   240 ;	SHELL PROCESS PAGE TABLES

                                     0200   241 ;

                                     0200   242 ;

                                     0200   243 

                           00000200  0200   244 P1PTBAS=.				;

                                     0200   245 

                           00000200  0200   246 	TMP=<1*512>

                           00000400  0200   247 	.BLKB	TMP			; ALLOCATE SPACE FOR PAGE TABLES

                           00000400  0400   248 SAV...=.				; REMEMBER BASE OF PAGE TABLES

                                     0400   249 

                                     0400   250 ;

                                     0400   251 ;	INITIALIZE VIRTUAL ADDRESS BASE

                                     0400   252 ;

                           80000000  0400   253 	VA...=1@31			;

                                     0400   254 

                                     0400   255 ;	P1PTE	128*SWP$C_DBGPTCNT	; DEBUGGER CONTEXT AREA

                           7FFF0000  0400   256 	VA...=VA...-<SWP$C_DBGPTCNT*128*512>	; ACCOUNT FOR IT IN VA...

                           7FFF0000  0400   257 DBGAREA=VA...				; ADDRESS OF DEBUG AREA

                                     0400   258 	P1PTE	1,URKW,K,PFIL		; VECTOR PAGE

                           7FFEFE00  03FC   259 VECTORS=VA...				;

                           7FFEFE00  03FC   260 CTL$GL_VECTORS==VECTORS			; BASE OF VECTOR PAGE

                                     03FC   261 	P1PTE	SSTACK,URSW,S,DZRO,SSPINI	; SUPERVISOR STACK

                                     03E0   262 	P1PTE	ESTACK,SREW,E,DZRO,ESPINI	; EXECUTIVE STACK

                                     03D8   263 	P1PTE	KSTACK,SRKW,K,PFIL,KSPINI	; KERNEL STACK

                           7FFEEC00  03CC   264 CTL$GL_KSPINI==KSPINI			; INITIAL KERNEL STACK

                           7FFEE600  03CC   265 CTL$GL_KSTKBAS==VA...			; MAXIMUM TOP OF KERNEL STACK

                                     03CC   266 	P1PTE	1			; NULL STOPPER PAGE

                                     03C8   267 	P1PTE	1,UW,S,DZRO		; IMAGE HEADER BUFFER

                           7FFEE200  03C4   268 MMG$IMGHDRBUF==VA...			; ADDRESS OF IMAGE HEADER BUFFER

                                     03C4   269 	P1PTE	4,UW,U,DZRO		; DEBUGGER CONTEXT

                                     03B4   270 ;

                                     03B4   271 ; THE FOLLOWING SYMBOLS NAME THE ABOVE DEBUG CONTEXT PAGES

                                     03B4   272 ;

                           7FFEDA00  03B4   273 MMG$IMGACTBUF==VA...			; IMAGE ACTIVATOR SCRATCH PAGES (3)

                           7FFEDA00  03B4   274 CLI$IMAGEEND==VA...			; CLI IMAGE END

                                     03B4   275 	P1PTE	4,URSW,S,DZRO		; CLI OWN DATA (FOR DCL)

                           7FFED200  03A4   276 CTL$AG_CLIOWN==VA...			; BASE ADDRESS OF CLI OWN DATA

                                     03A4   277 	P1PTE	48,NA,K			; CLI IMAGE MAPPING REGION

                           7FFE7200  02E4   278 CLI$IMAGE==VA...			; BASE OF CLI IMAGE AREA

                           7FFE7200  02E4   279 CLIDATAEND=VA...

                                     02E4   280 	P1PTE	3,URSW,S,DZRO		; COMMMAND INTERPRETER DATA PAGES

                           7FFE6C00  02D8   281 CLIDATAPAG=VA...			; BASE ADDRESS OF CLI DATA PAGE

                                     02D8   282 	P1PTE	<PARSIZE-1>,URSW,S,DZRO	; PROCESS ALLOCATION REGION

                                     02CC   283 	P1PTE	1,URSW,S,PFIL		; HEADER FOR PROCESS ALLOCATION REGION

                           7FFE6400  02C8   284 PRCALLREG=VA...				; BASE ADDRESS OF ALLOCATION AREA

                                     02C8   285 	P1PTE	4,UW,S,DZRO		; PROCESS I/O SEGMENT

                                     02B8   286 ;

                                     02B8   287 ;	THE FOLLOWING PAGE IS A WRITABLE CONTEXT PAGE FOR

                                     02B8   288 ;	THE USE OF THE COMPATIBILITY MODE EMULATOR AND EXCEPTION

                                     02B8   289 ;

                                     02B8   290 	P1PTE	1,UW,K,DZRO		; WRITABLE PAGE FOR COMPATIBILITY MODE

                           7FFE5A00  02B4   291 CTL$AG_CMEDATA==VA...			; 

                                     02B4   292 	P1PTE	<<PIO$C_SEGSIZ@-9>-1>,UREW,E,DZRO

                                     0240   293 	P1PTE	1,UREW,E,PFIL		;

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page   8

01              SHELL PROCESS PAGE TABLES                                                                                        (1)



                           7FFE1E00  023C   294 PIOBASE=VA...				;

                           7FFE1DF0  023C   295 CTL$GL_CCB==VA...-CCB$C_LENGTH		; BASE ADDRESS OF CHANNEL 0

                                     023C   296 	P1PTE	4,UREW,E,DZRO		; I/O CHANNELS (PERMANENT)

                           7FFE1600  022C   297 USPINI=VA...				; USER STACK AREA

                                     022C   298 

                           0000022C  022C   299 END...=.				; END OF CONTROL REGION

                                     022C   300 

                           000000F5  022C   301 P1PTLEN=<1@31-VA...>@-9			; ENTRIES IN P1PT

                                     022C   302 

                           0000000B  022C   303 SWP$C_SHLFPTE==<<.-P1PTBAS>@-2>	; FREE P1PT IN BASIC P1 PAGE TABLES

                                     022C   304 ;

                                     022C   305 ; RESTORE LOCATION POINTER

                                     022C   306 ;

                           00000400  022C   307 	.=SAV...			; FINISHED WITH PAGE TABLES

                           00000006  0400   308 	P1PTECNTF=P1PTECNT		; SATISFY FORWARD REFERENCE

                                     0400   309 

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page   9

01              BODY OF SHELL PROCESS                                                                                            (1)



                                     0400   311 	.SBTTL	BODY OF SHELL PROCESS

                                     0400   312 ;

                                     0400   313 ;	BODY OF SHELL PROCESS

                                     0400   314 ;

                           00000400  0400   315 	.=SAV...			; POSITION TO END OF HEADER

                                     0400   316 ;-------------------------------------------------------------------------

                                     0400   317 ;

                                     0400   318 ;	VECTOR PAGE

                                     0400   319 ;

                                     0400   320 ;-------------------------------------------------------------------------

                           00000400  0400   321 SWP$AL_PTRPAG==.-SHELL			; ADDRESS IN SWAPPER MAP

                           00000400  0400   322 CTLVECPAG=.				; BASE OF VECTOR PAGE

                                     0400   323 	CTL	GW_NMIOCH		; NUMBER OF CHANNELS

                               007F  0400   324 	.WORD	127			; FULL PAGE INITIALLY

                                     0402   325 	

                                     0402   326 	CTL	GW_CHINDX		; MAXIMUM CHANNEL INDEX

                               0800  0402   327 	.WORD	128@4			;

                                     0404   328 

                                     0404   329 	CTL	GL_RMSPP		; RMS PROCESS I/O SEGMENT POINTER

                           7FFE1E00  0404   330 	.LONG	PIOBASE			;

                                     0408   331 

                                     0408   332 	CTL	GL_RMSIP		; RMS IMAGE I/O SEGMENT POINTER

                           00000000  0408   333 	.LONG	0			;

                                     040C   334 

                                     040C   335 ;

                                     040C   336 ;	ARRAY OF STACK POINTERS

                                     040C   337 ;

                                     040C   338 ;	THE -1 ENTRY OF CTL$AL_STACK IS USED TO DETERMINE THE MAXIMUM

                                     040C   339 ;	EXTENT OF THE KERNEL STACK.

                                     040C   340 ;

                           7FFEE600  040C   341 	.LONG	CTL$GL_KSTKBAS		; MAXIMUM TOP OF KERNEL STACK

                                     0410   342 	CTL	AL_STACK		; STACK POINTER RESTART ARRAY

                           7FFEEC00  0410   343 	.LONG	KSPINI			; KERNEL STACK POINTER

                           7FFEF000  0414   344 	.LONG	ESPINI			; EXEC STACK POINTER

                           7FFEFE00  0418   345 	.LONG	SSPINI			; SUPERVISOR STACK POINTER

                           7FFE1600  041C   346 	.LONG	USPINI			; USER STACK POINTER

                                     0420   347 

                                     0420   348 	CTL	GL_PLTFL		; PROCESS LOGICAL NAME TABLE HEADER

                           7FFEFE20  0420   349 	.LONG	CTL$GL_PLTFL		; LIST HEADER

                                     0424   350 

                                     0424   351 	CTL	GL_PLTBL		; BACK LINK POINTER

                           7FFEFE20  0424   352 	.LONG	CTL$GL_PLTFL		; BACKWARD LINK

                                     0428   353 

                                     0428   354 ;

                                     0428   355 ; THE FOLLOWING THREE VECTORS MUST BE ADJACENT

                                     0428   356 ;

                                     0428   357 

                                     0428   358 	CTL	GL_CMSUPR		; SUPERVISOR CHANGE MODE DISPATCHER

                           00000000  0428   359 	.LONG	0			; NULL

                                     042C   360 

                                     042C   361 	CTL	GL_CMUSER		; USER CHANGE MODE DISPATCHER

                           00000000  042C   362 	.LONG	0			; NULL

                                     0430   363 

                                     0430   364 	CTL	GL_CMHANDLR		; COMPATIBILITY MODE HANDLER

                           00000000  0430   365 	.LONG	0

                                     0434   366 

                                     0434   367 	CTL	AQ_EXCVEC		; PRIMARY/SECONDARY EXCEPTION VECTORS

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  10

01              BODY OF SHELL PROCESS                                                                                            (1)



                           00000000' 0434   368 	.LONG	EXE$EXCPTN		; KERNEL MODE PRIMARY EXCEPTION HANDLER

                           00000000  0438   369 	.LONG	0			; KERNEL MODE SECONDARY

                           00000000' 043C   370 	.LONG	EXE$EXCPTN		; EXEC MODE PRIMARY

                           00000000  0440   371 	.LONG	0			; EXEC MODE SECONDARY

                           00000454  0444   372 	.BLKQ	2			; NULL INITIALLY

                                     0454   373 

                                     0454   374 	CTL	GL_THEXEC		; EXECUTIVE TERMINATION HANDLER

                           00000000  0454   375 	.LONG	0			; NULL

                                     0458   376 

                                     0458   377 	CTL	GL_THSUPR		; SUPERVISOR TERMINATION HANDLER

                           00000000  0458   378 	.LONG	0			; NULL

                                     045C   379 

                                     045C   380 ;	CTL	GL_THUSER		; USER TERMINATION HANDLER

                           00000000  045C   381 	.LONG	0			; NULL

                                     0460   382 

                                     0460   383 ;	FORMER LOCATION OF COMPATIBILITY MODE CONTEXT

                           00000484  0460   384 	.BLKL	9			; SPARE

                                     0484   385 

                                     0484   386 	CTL	GL_RUNDNFLG		; IMAGE RUN DOWN CONTROL FLAGS

                           00000000  0484   387 	.LONG	0

                                     0488   388 

                                     0488   389 	$GBLINI	GLOBAL			; DEFINE THE FOLLOWING

                                     0488   390 	$VIELD	RND,0,<-		; RUNDOWN CONTROL BITS GLOBALLY

                                     0488   391 		IACLOCK,-		; IMAGE ACTIVATOR LOCK MUST BE RESET

                                     0488   392 		>

                                     0488   393 	$GBLINI				; RESET GLOBAL INDICATOR

                                     0488   394 

                                     0488   395 	CTL	GL_PHD			; ADDRESS OF PHD WINDOW

                           00000000  0488   396 	.LONG	0			; INIT BY INSWAP

                                     048C   397 

                                     048C   398 	CTL	GQ_ALLOCREG		; HEAD OF PROCESS ALLOCATION REGION POOL

                           7FFE6400  048C   399 	.LONG	PRCALLREG		; ADDRESS 

                           00000000  0490   400 	.LONG	0			;

                                     0494   401 

                                     0494   402 	CTL	GQ_MOUNTLST		; MOUNTED DEVICE LIST

                           7FFEFE94  0494   403 	.LONG	CTL$GQ_MOUNTLST		; FORWARD LINK

                           7FFEFE94  0498   404 	.LONG	CTL$GQ_MOUNTLST		; BACKWARD LINK ( LIST EMPTY )

                                     049C   405 

                                     049C   406 	CTL	GL_FINALSTS		; FINAL EXIT STATUS FOR PROCESS

                           00000000  049C   407 	.LONG	0			; 

                                     04A0   408 

                                     04A0   409 

                                     04A0   410 	CTL	GL_VIRTPEAK		; PEAK VIRTUAL SIZE

                           00000000  04A0   411 	.LONG	0			;

                                     04A4   412 

                                     04A4   413 	CTL	GL_WSPEAK		; PEAK WORKING SET SIZE

                           00000000  04A4   414 	.LONG	0			;

                                     04A8   415 

                                     04A8   416 

                                     04A8   417 

                                     04A8   418 	CTL	GL_VOLUMES		; COUNT OF VOLUMES MOUNTED

                           00000000  04A8   419 	.LONG	0			;

                                     04AC   420 

                                     04AC   421 	CTL	T_USERNAME		; USER NAME

20 20 20 20 20 20 4D 45 54 53 59 53  04AC   422 	.ASCII	\SYSTEM      \		; ASSUMED USER NAME SUITABLE FOR 

                                     04B8   423 					; SYSINIT AND STARTUP COMMAND FILE

                                     04B8   424 

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  11

01              BODY OF SHELL PROCESS                                                                                            (1)



                                     04B8   425 	CTL	T_ACCOUNT		; ACCOUNT NAME

            20 50 55 54 52 41 54 53  04B8   426 	.ASCII	/STARTUP /		; ASSUMED NULL ACCOUNT NAME

                                     04C0   427 

                                     04C0   428 	CTL	GQ_PROCPRIV		; PROCESS PRIVILEGE MASK

                  FFFFFFFF FFFFFFFF  04C0   429 	.LONG	-1,-1			;  ALL PRIVILEGES PERMITTED

                                     04C8   430 

                                     04C8   431 	CTL	GL_USRCHMK		; PER-PROCESS VECTOR TO USER CHANGE MODE

                           00000000  04C8   432 	.LONG	0			; TO KERNEL HANDLER

                                     04CC   433 

                                     04CC   434 	CTL	GL_USRCHME		; PER-PROCESS VECTOR TO USER CHANGE MODE

                           00000000  04CC   435 	.LONG	0			; TO EXECUTIVE HANDLER

                                     04D0   436 

                                     04D0   437 	CTL	GL_POWERAST		; POWER FAIL AST ADDRESS

                           00000000  04D0   438 	.LONG	0			;

                                     04D4   439 	CTL	GB_PWRMODE		; ACCESS MODE FOR POWER FAIL AST

                                 00  04D4   440 	.BYTE	0			;

                           000004D8  04D5   441 	.BLKB	3			; SPARE

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  12

01              BODY OF SHELL PROCESS                                                                                            (1)



                                     04D8   443 	CTL	GQ_LOGIN		; SYSTEM TIME AT PROCESS CREATION

                  00000000 00000000  04D8   444 	.LONG	0,0			;

                                     04E0   445 

                                     04E0   446 ;

                                     04E0   447 ;	ARRAY OF FINAL EXCEPTION VECTORS - ONE PER MODE

                                     04E0   448 ;

                                     04E0   449 ;	THESE VECTORS ARE USED TO LOCATE AN EXCEPTION HANDLER WHEN ALL

                                     04E0   450 ;	OTHER METHODS FAIL.  PERMITS DEBUGGERS TO RECEIVE CONTROL EVEN

                                     04E0   451 ;	WHEN THE STACK IS CLOBBERED.

                                     04E0   452 ;

                                     04E0   453 	CTL	AL_FINALEXC		; FINAL EXCEPTION HANDLER ARRAY

                           00000000  04E0   454 	.LONG	0			; KERNEL MODE

                           00000000  04E4   455 	.LONG	0			; EXECUTIVE MODE

                           00000000  04E8   456 	.LONG	0			; SUPERVISOR MODE

                           00000000  04EC   457 	.LONG	0			; USER MODE

                                     04F0   458 ;

                                     04F0   459 ;	POINTER TO BASE OF CHANNELS

                                     04F0   460 ;

                                     04F0   461 	CTL	GL_CCBBASE		; BASE OF I/O CHANNELS

                           7FFE1DF0  04F0   462 	.LONG	CTL$GL_CCB		; 

                                     04F4   463 	CTL	GQ_DBGAREA		; DEBUG AREA

                           00010000  04F4   464 	.LONG	64*1024			; SIZE

                           7FFF0000  04F8   465 	.LONG	DBGAREA			; ADDRESS

                                     04FC   466 ;

                                     04FC   467 ;  POINTER TO RMS IMAGE

                                     04FC   468 ;

                                     04FC   469 	CTL	GL_RMSBASE

                           00000000  04FC   470 	.LONG	0			; POINT TO RMS IN SYSTEM SPACE

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  13

01              PROCESS I/O SEGMENT                                                                                              (1)



                                     0500   472 	.SBTTL	PROCESS I/O SEGMENT

                                     0500   473 ;----------------------------------------------------------------------------

                                     0500   474 ;

                                     0500   475 ;	PROCESS I/O SEGMENT INITIAL CONTENT

                                     0500   476 ;

                                     0500   477 ;----------------------------------------------------------------------------

                                     0500   478 

                                     0500   479 	.ALIGN	PAGE			; PAGE BOUNDARY

                                     0600   480 PIO:					; BASE OF PROCESS I/O SEGMENT

                                     0600   481 

                                     0600   482 	PIO	GL_FMLH			; FREE MEMORY LIST HEAD

                  7FFE1FCC'7FFE1FCC' 0600   483 	.LONG	PIOLFREE,PIOLFREE	;

                                     0608   484 

                                     0608   485 	PIO	GL_IIOFSPLH		; FREE LIST HEADER FOR IMAGE I/O SEG

                           7FFE1E08  0608   486 	.LONG	PIO$GL_IIOFSPLH		;

                           7FFE1E08  060C   487 	.LONG	PIO$GL_IIOFSPLH		;

                                     0610   488 

                                     0610   489 	PIO	GW_STATUS		; RMS OVERALL STATUS

                               0000  0610   490 	.WORD	0			;

                                     0612   491 

                                     0612   492 

                                     0612   493 	PIO	GT_ENDSTR		; END OF DATA STRING

                           00000622  0612   494 	.BLKB	16			; (COUNTED STRING)

                                     0622   495 

                                     0622   496 	PIO	GW_DFPROT		; DEFAULT FILE PROTECTION

                               A000  0622   497 	.WORD	^XA000			; READ EXECUTE ONLY FOR WORLD

                                     0624   498 

                                     0624   499 	PIO	GB_DFMBC		; DEFAULT MULTI-BLOCK COUNT

                           00000625  0624   500 	.BLKB	1

                                     0625   501 

                                     0625   502 	PIO	GB_DFMBFSDK		; DEFAULT MULTI-BUFFER COUNT SEQ. DISK

                           00000626  0625   503 	.BLKB	1

                                     0626   504 

                                     0626   505 	PIO	GB_DFMBFSMT		; DEFAULT MULTI-BUFFER COUNT MAGTAPE

                           00000627  0626   506 	.BLKB	1

                                     0627   507 

                                     0627   508 	PIO	GB_DFMBFSUR		; DEFAULT MULTI-BUFFER COUNT UNIT REC.

                           00000628  0627   509 	.BLKB	1

                                     0628   510 

                                     0628   511 	PIO	GB_DFMBFREL		; DEFAULT MULTI-BUFFER COUNT RELATIVE

                           00000629  0628   512 	.BLKB	1

                                     0629   513 

                                     0629   514 	PIO	GB_DFMBFIDX		; DEFAULT MULTI-BUFFER COUNT INDEXED

                           0000062A  0629   515 	.BLKB	1

                                     062A   516 

                                     062A   517 	PIO	GB_DFMBFHSH		; DEFAULT MULTI-BUFFER COUNT HASHED

                           0000062B  062A   518 	.BLKB	1

                                     062B   519 	.ALIGN	LONG

                                     062C   520 

                                     062C   521 ;

                                     062C   522 ;	DEFAULT DIRECTORY INFORMATION

                                     062C   523 ;

                                     062C   524 	PIO	GT_DDSTRING		; DEFAULT DIRECTORY STRING

                           0000062C  062C   525 TEMP$...=.

            5D 30 34 2C 30 31 5B 00' 062C   526 	.ASCIC	\[10,40]\		; DEFAULT DIRECTORY STRING

                                 07  062C       

                           00000680  0634   527 	.BLKB	84-<.-TEMP$...>		; FILL TO 84 BYTES

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  14

01              PROCESS I/O SEGMENT                                                                                              (1)



                           7FFE1E2C  0680   528 FIL$GT_DDSTRING==PIO$GT_DDSTRING	; FILE READ DEFAULT DIRECTORY STRING

                                     0680   529 

                                     0680   530 	PIO	GL_DIRCACHE		; DIRECTORY CACHE LIST HEAD

                           7FFE1E80  0680   531 	.LONG	PIO$GL_DIRCACHE		; EMPTY LIST

                           7FFE1E80  0684   532 	.LONG	PIO$GL_DIRCACHE

                                     0688   533 

                                     0688   534 	PIO	GL_DIRCFRLH		; FREE LIST FOR DIRECTORY CACHE NODES

                           00000000  0688   535 	.LONG	0			;   (NOTE: SINGLY LINKED)

                                     068C   536 

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  15

01              PROCESS I/O SEGMENT                                                                                              (1)



                                     068C   538 ;

                                     068C   539 ;	PROCESS I/O SEGMENT CONTEXT AREA

                                     068C   540 ;

                                     068C   541 	PIO	GW_PIOIMPA		;

                               0000  068C   542 	.WORD	0			; FLAGS

                               000D  068E   543 	.WORD	PRT$C_UREW		; I/O BUFFER PROTECTION

                           7FFE2400  0690   544 	.LONG	PIO$GL_FMLH+<3*512>	; ADDRESS OF FIRST FREE PIO SEGMENT PAGE

                           00003600  0694   545 	.LONG	PIO$C_SEGSIZ-<3*512>	; SIZE OF FREE PAGE POOL

                                     0698   546 

                                     0698   547 	PIOL	A1			; FREE PAGE LIST HEAD

                  7FFE1E98 7FFE1E98  0698   548 	.LONG	PIOLA1,PIOLA1		; FREE LIST HEADER

                           000006A4  06A0   549 	.BLKL	1			; SP SAVED LONGWORD

                           7FFE1EB0' 06A4   550 	.LONG	PIOLA10			; IFAB TABLE ADDRESS

                           7FFE1EE4' 06A8   551 	.LONG	PIOLA20			; IRAB TABLE ADDRESS

                           0000000C' 06AC   552 	.LONG	IMP$C_NPIOFILES		; # OF SLOTS PER TABLE

                                     06B0   553 

                                     06B0   554 	PIOL	A10			; LINK TO NEXT TABLE SEGMENT

                           00000000  06B0   555 	.LONG	0			;

                           000006E4  06B4   556 	.BLKL	IMP$C_NPIOFILES		; IFAB TABLE SLOTS

                                     06E4   557 

                                     06E4   558 	PIOL	A20			; 

                           00000000  06E4   559 	.LONG	0			; LINK TO NEXT TABLE SEGMENT

                           00000718  06E8   560 	.BLKL	IMP$C_NPIOFILES		; IRAB TABLE SLOTS

                                     0718   561 

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  16

01              PROCESS I/O SEGMENT                                                                                              (1)



                                     0718   563 ;

                                     0718   564 ;	IMAGE I/O SEGMENT CONTEXT AREA

                                     0718   565 ;

                                     0718   566 	PIO	GW_IIOIMPA		; IMAGE I/O IMPURE AREA

                               0001  0718   567 	.WORD	1			; FLAGS WITH IIO SEGMENT SET

                               000D  071A   568 	.WORD	PRT$C_UREW		; PROTECTION STO SET ON PAGES

                                     071C   569 

                           00000000  071C   570 	.LONG	0			; MUST BE INITIALIZED BY THE IMAGE

                                     0720   571 					; ACTIVATOR TO THE ADDRESS OF THE FIRST

                                     0720   572 					; PAGE IN THE IMAGE I/O SEGMENT.

                                     0720   573 					; (NOTE: THIS LONGWORD IS REFERENCED BY:

                                     0720   574 					; PIO$GW_IIOIMPA+IMP$L_IOSEGADDR)

                           00000000  0720   575 	.LONG	0			; LENGTH OF IMAGE I/O SEGMENT IN BYTES

                                     0724   576 					; MUST BE INITIALIZED BY THE IMAGE ACTIVATOR.

                                     0724   577 					; (NOTE: THIS LONGWORD IS REFERENCED BY:

                                     0724   578 					; PIO$GW_IIOMPA+IMP$L_IOSEGLEN)

                                     0724   579 

                                     0724   580 	PIOL	B1			;

                  7FFE1F24 7FFE1F24  0724   581 	.LONG	PIOLB1,PIOLB1		; FREEPAGE LIST HEAD

                                     072C   582 

                                     072C   583 

                                     072C   584 	PIOL	B2			; 

                           00000730  072C   585 	.BLKL	1			; SP SAVE LONGWORD

                                     0730   586 

                           7FFE1F3C' 0730   587 	.LONG	PIOLB10			; IFAB TABLE ADDRESS

                           7FFE1F7C' 0734   588 	.LONG	PIOLB20			; IRAB TABLE ADDRESS

                           0000000F' 0738   589 	.LONG	IMP$C_ENTPERSEG		; # OF SLOTS PER TABLE

                                     073C   590 

                                     073C   591 	PIOL	B10			;

                           00000000  073C   592 	.LONG	0			; LINK TO NEXT TABLE SEGMENT

                           0000077C  0740   593 	.BLKL	IMP$C_ENTPERSEG		; IFAB TABLE SLOTS

                                     077C   594 

                                     077C   595 	PIOL	B20			; 

                           00000000  077C   596 	.LONG	0			; LINK TO NEXT TABLE SEGMENT

                           000007BC  0780   597 	.BLKL	IMP$C_ENTPERSEG		; IRAB TABLE SLOTS

                                     07BC   598 

                                     07BC   599 	PIO	AL_RMSEXH		; EXIT HANDLER CONTROL BLOCK

                           000007CC  07BC   600 	.BLKL	4			;

                                     07CC   601 

                                     07CC   602 	PIOL	FREE			; FREE AREA IN END OF PAGE

                                     07CC   603 FREE...:				; SAME VALUE FOR DIFFERENT LOCATION COUNTER

                           7FFE1E00  07CC   604 	.LONG	PIO$GL_FMLH		; FORWARD LINK

                           7FFE1E00  07D0   605 	.LONG	PIO$GL_FMLH		; BACKWARD LINK

                                     07D4   606 

                           00000034' 07D4   607 	.LONG	PIOTMP...-FREE...	; SIZE OF FREE AREA

                                     07D8   608 	.ALIGN	PAGE			; FILL END OF PAGE

                           00000800  0800   609 PIOTMP...=.

                                     0800   610 

                                     0800   611 

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  17

01              PROCESS I/O SEGMENT                                                                                              (1)



                                     0800   613 ;----------------------------------------------------------------------------

                                     0800   614 ;

                                     0800   615 ;		PROCESS ALLOCATION REGION

                                     0800   616 ;

                                     0800   617 ;----------------------------------------------------------------------------

                                     0800   618 

                           00000000  0800   619 	.LONG	0			; FORWARD LINK 

                           00000800  0804   620 	.LONG	512*PARSIZE		; AND SIZE OF FREE BLOCK

                                     0808   621 	.ALIGN	PAGE			; FILL REMAINDER OF PAGE

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  18

01              INITIALZE SHELL WITH SYSGEN PARAMETERS                                                                           (1)



                                     0A00   623 	.SBTTL	INITIALZE SHELL WITH SYSGEN PARAMETERS

                                     0A00   624 ;++

                                     0A00   625 ; FUNCTIONAL DESCRIPTION:

                                     0A00   626 ;	SWP$SHELINIT IS CALLED BY THE SWAPPER FOLLOWING THE INSWAP OF A SHELL

                                     0A00   627 ;	PROCESS TO APPLY THE SYSGEN PARAMETERS AND CONFIGURE THE PROCESS

                                     0A00   628 ;	FOR THE PROPER WORKING SET SIZE AND VIRTUAL ADDRESS SPACE.

                                     0A00   629 ;	THIS CODE IS CONTAINED IN PAGES THAT ARE TO BECOME THE KERNEL

                                     0A00   630 ;	STACK FOR THE NEW PROCESS.

                                     0A00   631 ;

                                     0A00   632 ; CALLING SEQUENCE:

                                     0A00   633 ;	JSB	@#SWP$SHELINIT

                                     0A00   634 ;

                                     0A00   635 ; INPUT PARAMETERS:

                                     0A00   636 ;	R4 - PCB ADDRESS

                                     0A00   637 ;	R9 - SWAPPER MAP POINTER

                                     0A00   638 ;	R10 - PTC$M_VALID!PTE$C_SRKW!PTE$M_MODIFY

                                     0A00   639 ;	R11 - SWAPPER END MAP POINTER

                                     0A00   640 ;

                                     0A00   641 ; OUTPUT PARAMETERS:

                                     0A00   642 ;	PHD AND CONTROL REGION FOR THE NEW PROCESS

                                     0A00   643 ;

                                     0A00   644 ;--

                           00000A00  0A00   645 SWP$SHELINIT==.-SHELL			;

            55         64 A4     D0  0A00   646 	MOVL	PCB$L_PHD(R4),R5	; GET PROCESS HEADER BASE ADDRESS

            50   00000000'9F     D0  0A04   647 	MOVL	@#SWP$GL_SHELLSIZ,R0	; GET PAGES ALLOCATED FOR SHELL

            5B            6940   DE  0A0B   648 	MOVAL	(R9)[R0],R11		; COMPUTE END ADDRESS IN MAP

   00000000'9F            02     78  0A0F   649 	ASHL	#2,@#SWP$GL_SHELIO,R0	; GET I/O SIZE OF SHELL

                          50         0A16       

            5B            59     C3  0A17   650 	SUBL3	R9,R11,R1		; COMPUTE SIZE OF EXTENSION PAGES

                          51         0A1A       

            51            50     C2  0A1B   651 	SUBL	R0,R1			; LESS I/O SIZE

            51            03     9C  0A1E   652 	ROTL	#3,R1,R1		; CONVERT TO DOUBLE QUAD COUNT

                          51         0A21       

   00000000'9F            09     9C  0A22   653 	ROTL	#9,@#SWP$GL_SHELIO,R0	; COMPUTE ADDRESS AT END OF I/O TRANSFER

                          50         0A29       

                          80     7C  0A2A   654 10$:	CLRQ	(R0)+			; CLEAR PAGES

                          80     7C  0A2C   655 	CLRQ	(R0)+			; NOT READ FROM SHELL

            F9            51     F5  0A2E   656 	SOBGTR	R1,10$			; 

            52            55     D0  0A31   657 	MOVL	R5,R2			; VA OF PHD

                 00000000'9F     16  0A34   658 	JSB	@#MMG$SVAPTECHK		; GET SVA OF FIRST PHD PTE

            83            89     D0  0A3A   659 	MOVL	(R9)+,(R3)+		; MAP PROCESS HEADER FIXED PAGE

            51   00000000'9F     3C  0A3D   660 	MOVZWL	@#SWP$GW_WSLPTE,R1	; GET COUNT OF ADDED PAGES FOR WSL+PST

                          08     13  0A44   661 	BEQL	30$			; BR IF NONE

                          51     D7  0A46   662 	DECL	R1			; LESS FIXED HEADER PAGE

            83            7B     D0  0A48   663 20$:	MOVL	-(R11),(R3)+		; MAP A WSL PAGE

            FA            51     F5  0A4B   664 	SOBGTR	R1,20$			; DO THEM ALL

            50   00000000'9F     3C  0A4E   665 30$:	MOVZWL	@#SWP$GW_EMPTPTE,R0	; GET COUNT OF EMPTY PAGES

            53            6340   DE  0A55   666 	MOVAL	(R3)[R0],R3		; UPDATE MAP POINTER

            50   00000000'9F     3C  0A59   667 	MOVZWL	@#SWP$GW_BAKPTE,R0	; GET COUNT OF BAK/WSL/VAL/LCK PTE

            83            7B     D0  0A60   668 40$:	MOVL	-(R11),(R3)+		; MAP BAK/WSL/VAL/LCK PAGES

            FA            50     F5  0A63   669 	SOBGTR	R0,40$			;

                                     0A66   670 	INVALID				; INVALIDATE TRANSLATION BUFFER

                                     0A69   671 ;

                                     0A69   672 ;	ALL OF THE HEADER PAGES LESS PAGE TABLES HAVE NOW BEEN MAPPED

                                     0A69   673 ;

            58   00000000'9F     3C  0A69   674 	MOVZWL	@#SWP$GW_IBALSETX,R8	; GET BALANCE SLOT INDEX

         46 A5            58     B0  0A70   675 	MOVW	R8,PHD$W_PHVINDEX(R5)	; SET INTO PROCESS HEADER

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  19

01              INITIALZE SHELL WITH SYSGEN PARAMETERS                                                                           (1)



         38 A5   00000000'9F     33  0A74   676 	CVTWB	@#SGN$GW_DFPFC,PHD$B_DFPFC(R5)	; SET DEFAULT PAGE FAULT CLUSTER

         1F A5   00000000'9F     90  0A7C   677 	MOVB	@#SGN$GB_DEFPGFL,PHD$B_PAGFIL(R5); AND PAGING FILE INDEX

         39 A5   00000000'9F     90  0A84   678 	MOVB	@#SGN$GB_PGTBPFC,PHD$B_PGTBPFC(R5); SET SYSTEM DEFAULT PT CLUSTER

            56       0046 8F     3C  0A8C   679 	MOVZWL	#<PHD$C_LENGTH@-2>,R6	; LW OFFSET TO WS LIST

         08 A5            56     B0  0A91   680 	MOVW	R6,PHD$W_WSLIST(R5)	; INIT POINTER TO LIST BASE

            57   00000000'9F     D0  0A95   681 	MOVL	@#SGN$GL_PHDPAGCT,R7	; GET TOTAL COUNT OF HEADER PAGES

            56   00000000'9F     3C  0A9C   682 	MOVZWL	@#SWP$GW_WSLPTE,R6	; GET COUNT OF WSL HEADER PAGES

            56            09     78  0AA3   683 	ASHL	#9,R6,PHD$L_PSTBASOFF(R5)	; SET END AS BASE FOR PST

                       20 A5         0AA6       

            56   00000000'9F     A0  0AA8   684 	ADDW	@#SWP$GW_EMPTPTE,R6	; ASSUMES NO OVERFLOW POSSIBLE

            56            07     78  0AAF   685 	ASHL	#7,R6,R6		; CONVERT TO LONGWORD COUNT

                          56         0AB2       

         4A A5            56     B0  0AB3   686 	MOVW	R6,PHD$W_WSLX(R5)	; SET BASE OFFSET TO WSLX AREA

            57   00000000'9F     C0  0AB7   687 	ADDL	@#SGN$GL_PTPAGCNT,R7	; ADD PAGE TABLES TO COUNT

            57            01     C1  0ABE   688 	ADDL3	#1,R7,R0		; ROUND TO LONGWORD SIZE

                          50         0AC1       

            50            02     C6  0AC2   689 	DIVL	#2,R0			; 

            56            50     C0  0AC5   690 	ADDL	R0,R6			; ALLOCATE SPACE IN WHOLE LONGWORDS

         48 A5            56     B0  0AC8   691 	MOVW	R6,PHD$W_BAK(R5)	; SET BASE OF BACKING STORE VECTOR

            56            57     C0  0ACC   692 	ADDL	R7,R6			; ALLOCATE SPACE FOR BACKING STORE VECTOR

            56            04     C4  0ACF   693 	MULL	#4,R6			; CONVERT TO BYTE OFFSET

         64 A5            56     D0  0AD2   694 	MOVL	R6,PHD$L_PTWSLELCK(R5)	; SET BASE OF LOCKED COUNT VECTOR

            57   00000000'9F     D0  0AD6   695 	MOVL	@#SGN$GL_PTPAGCNT,R7	; GET COUNT OF PAGE TABLES

         68 A5            6647   9E  0ADD   696 	MOVAB	(R6)[R7],PHD$L_PTWSLEVAL(R5)	; ALLOCATE AND SET BASE OF VAL CNT

            50         68 B545   9E  0AE2   697 	MOVAB	@PHD$L_PTWSLEVAL(R5)[R5],R0	; SET BASE FOR VALID COUNT VEC

            52            01     CE  0AE7   698 	MNEGL	#1,R2				; MINUS ONE FOR BACKGROUND

            51         64 B545   9E  0AEA   699 	MOVAB	@PHD$L_PTWSLELCK(R5)[R5],R1	; AND BASE FOR LOCKED COUNT

            80            52     90  0AEF   700 50$:	MOVB	R2,(R0)+		; INIT BOTH COUNT VECTORS TO MINUS ONE

            81            52     90  0AF2   701 	MOVB	R2,(R1)+		; 

            F7            57     F5  0AF5   702 	SOBGTR	R7,50$			; FOR ALL PAGE TABLE SLOTS

         FE A1            04     80  0AF8   703 	ADDB	#4,-2(R1)		; COUNT OF LOCK PAGES FOR SHELL

         FE A0            06     80  0AFC   704 	ADDB	#6,-2(R0)		; COUNT OF VALID PAGES

            56   00000000'9F     D0  0B00   705 	MOVL	@#SGN$GL_PHDAPCNT,R6	; GET ACTUAL HEADER SIZE

            50   00000000'9F     9A  0B07   706 	MOVZBL	@#SWP$GB_SHLP1PT,R0	; NUMBER OF PERM PAGE TABLES

         6C A5            50     B0  0B0E   707 	MOVW	R0,PHD$W_PTCNTLCK(R5)	; COUNT OF PT CONTAINING LOCKED PAGES

         6E A5            50     B0  0B12   708 	MOVW	R0,PHD$W_PTCNTVAL(R5)	; COUNT OF PT CONTAINING VALID PAGES

         70 A5            50     B0  0B16   709 	MOVW	R0,PHD$W_PTCNTACT(R5)	; COUNT OF ACTIVE PAGE TABLES

         72 A5            50     B0  0B1A   710 	MOVW	R0,PHD$W_PTCNTMAX(R5)	; COUNT OF PT WITH NON-ZERO ENTRIES

            56            50     C0  0B1E   711 	ADDL	R0,R6			; MAKE ROOM IN WSLIST FOR HDR+PGTBLS

            57         0E A5     3C  0B21   712 	MOVZWL	PHD$W_WSDYN(R5),R7	; GET INDEX TO CURRENT DYNAMIC ENTRIES

                          57     DD  0B25   713 	PUSHL	R7			; SAVE POINTER FOR LATER USE

         0C A5            56     A0  0B27   714 	ADDW	R6,PHD$W_WSLOCK(R5)	; CORRECT LOCK WSL INDEX

         0E A5            56     A0  0B2B   715 	ADDW	R6,PHD$W_WSDYN(R5)	; AND DYNAMIC INDEX

         10 A5            56     A0  0B2F   716 	ADDW	R6,PHD$W_WSNEXT(R5)	; AND NEXT POINTER

            57            56     C1  0B33   717 	ADDL3	R6,R7,R1		; SET DESTINATION INDEX

                          51         0B36       

            50            02     9A  0B37   718 	MOVZBL	#SWP$C_NDYN,R0		; SET COUNT OF DYNAMIC PAGES

            6541          6547   D0  0B3A   719 60$:	MOVL	(R5)[R7],(R5)[R1]	; MOVE A DYNAMIC WORKING SET PAGE

                          51     D6  0B3F   720 	INCL	R1			; NEXT DESTINATION

                          57     D6  0B41   721 	INCL	R7			; NEXT WSL ENTRY

            F4            50     F5  0B43   722 	SOBGTR	R0,60$			; MOVE ALL DYNAMIC PAGES

            58   80000029 8F     D0  0B46   723 	MOVL	#<WSL$M_VALID-		; WSL ENTRIES FOR HEADER ARE VALID

                                     0B4D   724 		!WSL$M_WSLOCK-		; LOCKED,

                                     0B4D   725 		!WSL$C_PPGTBL-		; PROCESS PAGE TABLE,

                                     0B4D   726 		!VA$M_SYSTEM>,R8	; AND SYSTEM SPACE

            52            55     D0  0B4D   727 	MOVL	R5,R2			; SET PHD ADDRESS TO GET SVAPTE

                 00000000'9F     16  0B50   728 	JSB	@#MMG$SVAPTECHK		; SVAPTE TO R3

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  20

01              INITIALZE SHELL WITH SYSGEN PARAMETERS                                                                           (1)



            50            58     D0  0B56   729 	MOVL	R8,R0			; MAKE WORKING COPY

            51   00000000'9F     3C  0B59   730 	MOVZWL	@#SWP$GW_WSLPTE,R1	; COUNT OF WSLPTE 

            52            8E     D0  0B60   731 	MOVL	(SP)+,R2		; RESTORE WORKING SET INDEX TO LOCKED

                          00F2   30  0B63   732 	BSBW	FILLPHD			; SET UP FOR VALID PHD PAGES

            51   00000000'9F     3C  0B66   733 	MOVZWL	@#SWP$GW_EMPTPTE,R1	; GET COUNT OF EMPTY PTE AGAIN

            53            6341   DE  0B6D   734 	MOVAL	(R3)[R1],R3		; ADVANCE SPT ADDRESS

            51            09     78  0B71   735 	ASHL	#9,R1,R1		; CONVERT TO BYTE COUNT

                          51         0B74       

            50            51     C0  0B75   736 	ADDL	R1,R0			; AND UPDATE CURRENT VA

            51   00000000'9F     3C  0B78   737 	MOVZWL	@#SWP$GW_BAKPTE,R1	; GET COUNT OF REMAINING HEADER PAGES

                          00D6   30  0B7F   738 	BSBW	FILLPHD			; SET UP FOR VALID PHD PAGES

            51   00000000'9F     D0  0B82   739 	MOVL	@#SGN$GL_PTPAGCNT,R1	; GET COUNT OF PAGE TABLES

         FC A341 50000000 8F     D0  0B89   740 65$:	MOVL	#PTE$C_SRKW,-4(R3)[R1]	; SET A DEMAND ZERO PAGE FOR PAGE TABLES

            F4            51     F5  0B92   741 	SOBGTR	R1,65$			; INIT ENTIRE PAGE TABLE AREA

            51   00000000'9F     9A  0B95   742 	MOVZBL	@#SWP$GB_SHLP1PT,R1	; GET COUNT OF P1 PAGE TABLES

            56            51     CE  0B9C   743 	MNEGL	R1,R6			; NEGATE COUNT

                          56     D7  0B9F   744 	DECL	R6			; LESS ONE MORE FOR DEBUGGER PAGE

            56   00000000'9F     C0  0BA1   745 	ADDL	@#SGN$GL_PTPAGCNT,R6	; PAGE OFFSET TO PAGE TABLE

            53            6346   DE  0BA8   746 	MOVAL	(R3)[R6],R3		; COMPUTE SVAPTE

            56            09     78  0BAC   747 	ASHL	#9,R6,R6		; CONVERT TO BYTE OFFSET

                          56         0BAF       

            50            56     C0  0BB0   748 	ADDL	R6,R0			; ADD TO CURRENT BASE WSL

                          0A     BB  0BB3   749 	PUSHR	#^M<R1,R3>		; SAVE KEY REGS

            51            01     C2  0BB5   750 	SUBL	S^#SWP$C_SHLP1PT,R1	; LESS STANDARD P1 PAGE TABLES

                          06     15  0BB8   751 	BLEQ	80$			; BR IF NO EXTENSIONS

            83            7B     D0  0BBA   752 70$:	MOVL	-(R11),(R3)+		; STORE A PTE FOR EXTENSION

            FA            51     F5  0BBD   753 	SOBGTR	R1,70$			; DO ALL EXTENSION PAGE TABLES

            51            01     D0  0BC0   754 80$:	MOVL	S^#SWP$C_SHLP1PT,R1	; SET COUNT OF STANDARD

            83            89     D0  0BC3   755 90$:	MOVL	(R9)+,(R3)+		; STORE PTE FOR STANDARD

            FA            51     F5  0BC6   756 	SOBGTR	R1,90$			; DO ALL STANDARD P1PT

                          0A     BA  0BC9   757 	POPR	#^M<R1,R3>		; RESTORE KEY REGISTERS

                          008A   30  0BCB   758 	BSBW	FILLPHD			; SET UP FOR VALID PHD PAGES

   00000000'9F            09     9C  0BCE   759 	ROTL	#9,@#SGN$GL_PHDPAGCT,R0	; OFFSET FOR P0BR

                          50         0BD5       

       00C8 C5            50     C0  0BD6   760 	ADDL	R0,PHD$L_P0BR(R5)	; FORM P0BR BASE VALUE

   00000000'9F            09     9C  0BDB   761 	ROTL	#9,@#SGN$GL_PTPAGCNT,R1	; OFFSET TO P1BR

                          51         0BE2       

            51            50     C0  0BE3   762 	ADDL	R0,R1			; 

       00D0 C5            51     C0  0BE6   763 	ADDL	R1,PHD$L_P1BR(R5)	; FORM P1BR BASE VALUE

         30 A5            50     C2  0BEB   764 	SUBL	R0,PHD$L_FREP1VA(R5)	; COMPUTE CORRECT FREP1VA

            51            50     C2  0BEF   765 	SUBL	R0,R1			; EXTRACT PT SIZE TOTAL

            50         F7 8F     78  0BF2   766 	ASHL	#-9,R0,R0		; BACK TO PAGE COUNT

                          50         0BF6       

       00D4 C5            50     C2  0BF7   767 	SUBL	R0,PHD$L_P1LR(R5)	; NOW CORRECT P1 LENGTH REGISTER

            51         FE 8F     78  0BFC   768 	ASHL	#-2,R1,R1		; COUNT OF AVAILABLE PTES

                          51         0C00       

            51            50     C2  0C01   769 	SUBL	R0,R1			; DIMINISH BY PHD WINDOW SIZE

         2C A5            51     C0  0C04   770 	ADDL	R1,PHD$L_FREPTECNT(R5)	; AND FORM COUNT OF FREE PTES

            8B            89     D0  0C08   771 	MOVL	(R9)+,(R11)+		; RE-ARRANGE SWAP PAGE LIST TO 

            8B            89     D0  0C0B   772 	MOVL	(R9)+,(R11)+		; AGREE WITH WORKING SET LIST

            8B            89     D0  0C0E   773 	MOVL	(R9)+,(R11)+		; PTRPAG,PIO,PAR

                 00000200 8F     C1  0C11   774 	ADDL3	#512,PHD$L_FREP1VA(R5),-	; SET ADDRESS OF WINDOW

   00000488 9F         30 A5         0C17   775 		@#<SWP$AL_PTRPAG+-	; INTO POINTER PAGE

                                     0C1E   776 		<CTL$GL_PHD-CTL$GL_VECTORS>>	; THROUGH SWAPPER MAP

         28 A4            12     E2  0C1E   777 	BBSS	#PCB$V_PHDRES,PCB$L_STS(R4),100$; MARK PHD RESIDENT

                          00         0C22       

                                     0C23   778 100$:					; 

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  21

01              INITIALZE SHELL WITH SYSGEN PARAMETERS                                                                           (1)



            50         08 A5     3C  0C23   779 	MOVZWL	PHD$W_WSLIST(R5),R0	; GET INDEX TO WS BASE

                          50     D7  0C27   780 	DECL	R0			;

   00000000'9F            50     A1  0C29   781 	ADDW3	R0,@#SGN$GL_MAXWSCNT,PHD$W_WSAUTH(R5)	; SET MAX AUTHORIZED

                       0A A5         0C30       

         18 A5         0A A5     B0  0C32   782 	MOVW	PHD$W_WSAUTH(R5),PHD$W_WSQUOTA(R5)	; AND QUOTA

         74 A5   00000000'9F     B0  0C37   783 	MOVW	@#SGN$GW_MINWSCNT,PHD$W_WSFLUID(R5)	; SET FLUID REQUIREMENT

            50   00000000'9F     A1  0C3F   784 	ADDW3	@#SGN$GW_DFWSCNT,R0,PHD$W_WSLAST(R5)	; SET LAST

                       12 A5         0C46       

         1A A5         12 A5     B0  0C48   785 	MOVW	PHD$W_WSLAST(R5),PHD$W_DFWSCNT(R5)	; AND DEFAULT COUNT

       00C8 C5            55     C0  0C4D   786 	ADDL	R5,PHD$L_P0BR(R5)	; BIAS P0 BASE REGISTER

       00D0 C5            55     C0  0C52   787 	ADDL	R5,PHD$L_P1BR(R5)	; AND P1 BASE REGISTER ALSO

                                 05  0C57   788 	RSB				; RETURN

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  22

01              FILLPHD - SETUP A VALID PHD PTE                                                                                  (1)



                                     0C58   790 	.SBTTL	FILLPHD - SETUP A VALID PHD PTE

                                     0C58   791 ;

                                     0C58   792 ;	R0 - WORKING SET LIST ENTRY, ADDRESS AND FLAGS (UPDATED)

                                     0C58   793 ;	R1 - COUNT OF PAGES TO FILL (UPDATED)

                                     0C58   794 ;	R2 - WORKING SET LIST INDEX (UPDATED)

                                     0C58   795 ;	R3 - SVAPTE FOR PHD PAGE (UPDATED)

                                     0C58   796 ;	R4 - PCB ADDRESS

                                     0C58   797 ;	R5 - PHD ADDRESS

                                     0C58   798 ;	R7 - SCRATCH

                                     0C58   799 ;	R8 - SCRATCH

                                     0C58   800 ;	R10 - PFN$C_SRKW!PFN$M_MODIFY!PFN$M_VALID

                                     0C58   801 ;

                                     0C58   802 FILLPHD:				; SETUP VALID PHD PTES

            6542          50     D0  0C58   803 10$:	MOVL	R0,(R5)[R2]		; STORE WORKING SET LIST ENTRY

            83            5A     CB  0C5C   804 	BICL3	R10,(R3)+,R7		; GET PFN FROM SPT

                          57         0C5F       

                 00000000'9F     DD  0C60   805 	PUSHL	@#PFN$AB_STATE		; STACK ADDRESS BASE FOR PFN STATE

            9E47       87 8F     90  0C66   806 	MOVB	#<PFN$C_ACTIVE!PFN$M_MODIFY>,@(SP)+[R7]	; MARK PAGE ACTIVE

                 00000000'9F     DD  0C6B   807 	PUSHL	@#PFN$AB_TYPE		; STACK ADDRESS BASE FOR PFN TYPE

            9E47          04     90  0C71   808 	MOVB	#PFN$C_PPGTBL,@(SP)+[R7]; SET PAGE TYPE TO PAGE TABLE

                 00000000'9F     DD  0C75   809 	PUSHL	@#PFN$AL_BAK		; STACK ADDRESS BASE FOR PFN BAK

            58         1F A5     9A  0C7B   810 	MOVZBL	PHD$B_PAGFIL(R5),R8	; GET PAGE FILE NUMBER

            58            18     9C  0C7F   811 	ROTL	#PFN$V_PGFLX,R8,@(SP)+[R7]	; SET BACKING STORE ADDRESS

                          9E47       0C82       

                 00000000'9F     DD  0C84   812 	PUSHL	@#PFN$AL_PTE		; STACK ADDRESS OF PFN PTE BACK POINTER

            9E47       FC A3     DE  0C8A   813 	MOVAL	-4(R3),@(SP)+[R7]	; SET PTE BACK POINTER FOR PAGE

                 00000000'9F     DD  0C8F   814 	PUSHL	@#PFN$AW_WSLX		; STACK BASE ADDRESS OF WSLX VECTOR

            9E47          52     B0  0C95   815 	MOVW	R2,@(SP)+[R7]		; SET WSLX FOR PAGE

                          52     D6  0C99   816 	INCL	R2			; NEXT WORKING SET LIST ENTRY

            50       0200 C0     DE  0C9B   817 	MOVAL	512(R0),R0		; NEXT VA

            B5            51     F5  0CA0   818 	SOBGTR	R1,10$			; FILL ALL REQUESTED PAGES

                                 05  0CA3   819 	RSB				; AND RETURN

                                     0CA4   820 

                                     0CA4   821 	.ALIGN	PAGE			; PAGE ALIGN

                           00000007  0E00   822 SWP$C_SHELLSIZ=<.-SHELL>@-9		; SIZE OF SHELL PROCESS IN PAGES

                                     0E00   823 

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  23

01              COMMAND LANGUAGE INTERPRETER DATA AREA                                                                           (1)



                                     0E00   825 	.SBTTL	COMMAND LANGUAGE INTERPRETER DATA AREA

                                     0E00   826 ;----------------------------------------------------------------------------

                                     0E00   827 ;		GENERIC COMMAND LANGUAGE INTERPRETER DATA

                                     0E00   828 ;----------------------------------------------------------------------------

                                     0E00   829 

                                 0000011C   830 	.PSECT	$ABS$,ABS

                           7FFE6C00  011C   831 	.=CLIDATAPAG			; SET BASE VALUE FOR REGION

                                     6C00   832 CTL$AL_CLICALBK::			; CALL BACK VECTOR FOR CLI

                           7FFE6C04  6C00   833 	.BLKL	1			; 

                           7FFE6C10  6C04   834 	.BLKL	3			; ALLOW FOR EXPANSION

                                     6C10   835 

                                     6C10   836 

                                     6C10   837 CTL$AG_CLIDATA::			; START OF DATA AREA

                           000005F0  6C10   838 CTL$C_CLIDATASZ==CLIDATAEND-CTL$AG_CLIDATA	; SIZE OF DATA AREA

                                     6C10   839 

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  24

01              COMPATIBILITY MODE EMULATOR CONTEXT PAGE                                                                         (1)



                                     6C10   841 	.SBTTL	COMPATIBILITY MODE EMULATOR CONTEXT PAGE

                                     6C10   842 ;----------------------------------------------------------------------------

                                     6C10   843 ;	COMPATIBILITY MODE EMULATOR CONTEXT PAGE

                                     6C10   844 ;----------------------------------------------------------------------------

                           7FFE5A00  6C10   845 	.=CTL$AG_CMEDATA			; POINT TO START OF AREA

                                     5A00   846 CTL$AL_CMCNTX::				; COMPATIBILITY MODE REGISTER CONTEXT

                           7FFE5A28  5A00   847 	.BLKL	10			; SAVED BY EXCEPTION

                                     5A28   848 

                                     5A28   849 	.END

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  25

SYMBOL TABLE                                                                                                                     (1)



BIT...         = 00000001            DBGAREA        = 7FFF0000            IMP$C_SYNCEFN  = 0000001B            

CCB$B_AMOD       00000009            DYN$C_ACB      = 00000002            IMP$L_FREEPGLH   0000000C            

CCB$B_STS        00000008            DYN$C_ADP      = 00000001            IMP$L_IFABTBL    00000018            

CCB$C_LENGTH     00000010            DYN$C_AQB      = 00000003            IMP$L_IFBTBLINK  00000024            

CCB$K_LENGTH     00000010            DYN$C_BRDCST   = 0000001A            IMP$L_IOSEGADDR  00000004            

CCB$L_DIRP       0000000C            DYN$C_BUFIO    = 00000013            IMP$L_IOSEGLEN   00000008            

CCB$L_UCB        00000000            DYN$C_CEB      = 00000004            IMP$L_IRABTBL    0000001C            

CCB$L_WIND       00000004            DYN$C_CRB      = 00000005            IMP$L_IRBTBLINK  00000064            

CCB$W_IOC        0000000A            DYN$C_CXB      = 0000001B            IMP$L_SAVED_SP   00000014            

CLI$IMAGE      = 7FFE7200  G         DYN$C_DDB      = 00000006            IMP$V_AST      = 00000001            

CLI$IMAGEEND   = 7FFEDA00  G         DYN$C_DPT      = 0000001E            IMP$V_IIOS     = 00000000            

CLIDATAEND     = 7FFE7200            DYN$C_FCB      = 00000007            IMP$V_IORUNDOWN= 00000004            

CLIDATAPAG     = 7FFE6C00            DYN$C_FRK      = 00000008            IMP$V_NOP0BUFS = 00000005            

CTL$AG_CLIDATA   7FFE6C10  G         DYN$C_GSD      = 00000015            IMP$V_TEMP1    = 00000002            

CTL$AG_CLIOWN  = 7FFED200  G         DYN$C_IDB      = 00000009            IMP$V_TEMP2    = 00000003            

CTL$AG_CMEDATA = 7FFE5A00  G         DYN$C_IRP      = 0000000A            IMP$W_ENTPERSEG  00000020            

CTL$AL_CLICALBK  7FFE6C00  G         DYN$C_JPB      = 0000001F            IMP$W_NUM_IFABS  00000022            

CTL$AL_CMCNTX    7FFE5A00  G         DYN$C_KFH      = 00000026            IMP$W_RMSSTATUS  00000000            

CTL$AL_FINALEXC= 7FFEFEE0  G         DYN$C_KFI      = 00000018            IPL$_ASTDEL    = 00000002            

CTL$AL_STACK   = 7FFEFE10  G         DYN$C_LOG      = 0000000B            IPL$_HWCLK     = 00000018            

CTL$AQ_EXCVEC  = 7FFEFE34  G         DYN$C_MTL      = 00000019            IPL$_IOPOST    = 00000004            

CTL$C_CLIDATASZ= 000005F0  G         DYN$C_MVL      = 00000016            IPL$_MAILBOX   = 0000000B            

CTL$GB_PWRMODE = 7FFEFED4  G         DYN$C_NDB      = 0000001C            IPL$_POWER     = 0000001F            

CTL$GL_CCB     = 7FFE1DF0  G         DYN$C_NET      = 00000017            IPL$_QUEUEAST  = 00000006            

CTL$GL_CCBBASE = 7FFEFEF0  G         DYN$C_PBH      = 00000020            IPL$_SCHED     = 00000003            

CTL$GL_CMHANDLR= 7FFEFE30  G         DYN$C_PCB      = 0000000C            IPL$_SYNCH     = 00000007            

CTL$GL_CMSUPR  = 7FFEFE28  G         DYN$C_PDB      = 00000021            IPL$_TIMER     = 00000007            

CTL$GL_CMUSER  = 7FFEFE2C  G         DYN$C_PFL      = 00000023            KSPINI         = 7FFEEC00            

CTL$GL_FINALSTS= 7FFEFE9C  G         DYN$C_PIB      = 00000022            KSTACK         = 00000003            

CTL$GL_KSPINI  = 7FFEEC00  G         DYN$C_PQB      = 0000000D            MMG$IMGACTBUF  = 7FFEDA00  G         

CTL$GL_KSTKBAS = 7FFEE600  G         DYN$C_PTR      = 00000025            MMG$IMGHDRBUF  = 7FFEE200  G         

CTL$GL_PHD     = 7FFEFE88  G         DYN$C_RVT      = 0000000E            MMG$SVAPTECHK    ********   X   03   

CTL$GL_PLTBL   = 7FFEFE24  G         DYN$C_SFT      = 00000024            NDYN           = 00000002            

CTL$GL_PLTFL   = 7FFEFE20  G         DYN$C_SSB      = 0000001D            P1PTBAS        = 00000200 R     03   

CTL$GL_POWERAST= 7FFEFED0  G         DYN$C_TQE      = 0000000F            P1PTECNT       = 00000006            

CTL$GL_RMSBASE = 7FFEFEFC  G         DYN$C_TYPAHD   = 00000014            P1PTECNTF      = 00000006            

CTL$GL_RMSIP   = 7FFEFE08  G         DYN$C_UCB      = 00000010            P1PTLEN        = 000000F5            

CTL$GL_RMSPP   = 7FFEFE04  G         DYN$C_VCB      = 00000011            PARSIZE        = 00000004            

CTL$GL_RUNDNFLG= 7FFEFE84  G         DYN$C_WCB      = 00000012            PCB$B_ASTACT     0000000C            

CTL$GL_THEXEC  = 7FFEFE54  G         DYNWSL         = 00000128 R     03   PCB$B_ASTEN      0000000D            

CTL$GL_THSUPR  = 7FFEFE58  G         END...         = 0000022C R     03   PCB$B_PRI        0000000B            

CTL$GL_USRCHME = 7FFEFECC  G         ESPINI         = 7FFEF000            PCB$B_PRIB       00000033            

CTL$GL_USRCHMK = 7FFEFEC8  G         ESTACK         = 00000002            PCB$B_TYPE       0000000A            

CTL$GL_VECTORS = 7FFEFE00  G         EXE$EXCPTN       ********   X   03   PCB$B_WEFC       00000032            

CTL$GL_VIRTPEAK= 7FFEFEA0  G         EXE$PROCSTRT     ********   X   03   PCB$C_LENGTH     0000007C            

CTL$GL_VOLUMES = 7FFEFEA8  G         FIL$GT_DDSTRING= 7FFE1E2C  G         PCB$K_LENGTH     0000007C            

CTL$GL_WSPEAK  = 7FFEFEA4  G         FILLPHD          00000C58 R     03   PCB$L_ASTQBL     00000014            

CTL$GQ_ALLOCREG= 7FFEFE8C  G         FREE...          000007CC R     03   PCB$L_ASTQFL     00000010            

CTL$GQ_DBGAREA = 7FFEFEF4  G         FWSL...        = 00000130 R     03   PCB$L_EFC2P      00000058            

CTL$GQ_LOGIN   = 7FFEFED8  G         GBL...         = 00000000            PCB$L_EFC3P      0000005C            

CTL$GQ_MOUNTLST= 7FFEFE94  G         IMP$B_PROT       00000002            PCB$L_EFCS       00000050            

CTL$GQ_PROCPRIV= 7FFEFEC0  G         IMP$C_ASYEFN   = 0000001E            PCB$L_EFCU       00000054            

CTL$GW_CHINDX  = 7FFEFE02  G         IMP$C_ASYQIOEFN= 0000001F            PCB$L_EFWM       0000004C            

CTL$GW_NMIOCH  = 7FFEFE00  G         IMP$C_ENTPERSEG= 0000000F            PCB$L_OWNER      0000001C            

CTL$T_ACCOUNT  = 7FFEFEB8  G         IMP$C_IOREFN   = 0000001E            PCB$L_PHD        00000064            

CTL$T_USERNAME = 7FFEFEAC  G         IMP$C_MBXEFN   = 0000001A            PCB$L_PHYPCB     00000018            

CTLVECPAG      = 00000400 R     03   IMP$C_NPIOFILES= 0000000C            PCB$L_PID        00000060            

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  26

SYMBOL TABLE                                                                                                                     (1)



PCB$L_PQB        0000004C            PFN$C_BADPAGLST= 00000002            PHD$L_P1LR       000000D4            

PCB$L_SQBL       00000004            PFN$C_FREPAGLST= 00000000            PHD$L_PAGEFLTS   0000004C            

PCB$L_SQFL       00000000            PFN$C_GBLWRT   = 00000003            PHD$L_PAGFIL     0000001C            

PCB$L_STS        00000028            PFN$C_GLOBAL   = 00000002            PHD$L_PC         000000C0            

PCB$L_UIC        00000020            PFN$C_GPGTBL   = 00000005            PHD$L_PCB        00000078            

PCB$L_WSSWP      00000024            PFN$C_MFYPAGLST= 00000001            PHD$L_PGFLCNT    00000034            

PCB$L_WTIME      0000002C            PFN$C_PPGTBL   = 00000004            PHD$L_PGFLQUOTA  0000005C            

PCB$T_LNAME      0000006C            PFN$C_PROCESS  = 00000000            PHD$L_PSL        000000C4            

PCB$V_ASTPEN   = 00000011            PFN$C_RDERR    = 00000004            PHD$L_PSTBASOFF  00000020            

PCB$V_BATCH    = 0000000E            PFN$C_RDINPROG = 00000006            PHD$L_PTWSLELCK  00000064            

PCB$V_DELPEN   = 00000001            PFN$C_RELPEND  = 00000003            PHD$L_PTWSLEVAL  00000068            

PCB$V_FORCPEN  = 00000002            PFN$C_SYSTEM   = 00000001            PHD$L_R0         00000088            

PCB$V_HIBER    = 00000013            PFN$C_WRTINPROG= 00000005            PHD$L_R1         0000008C            

PCB$V_INQUAN   = 00000003            PFN$M_BADPAG   = 00000020            PHD$L_R10        000000B0            

PCB$V_LOGIN    = 00000014            PFN$M_BAK      = 007FFFFF            PHD$L_R11        000000B4            

PCB$V_NETWRK   = 00000015            PFN$M_COLLISION= 00000010            PHD$L_R12        000000B8            

PCB$V_NOACNT   = 0000000F            PFN$M_DELCON   = 00000010            PHD$L_R13        000000BC            

PCB$V_NODELET  = 00000017            PFN$M_GBLBAK   = 00800000            PHD$L_R2         00000090            

PCB$V_PHDRES   = 00000012            PFN$M_LOC      = 00000007            PHD$L_R3         00000094            

PCB$V_PSWAPM   = 00000004            PFN$M_MODIFY   = 00000080            PHD$L_R4         00000098            

PCB$V_PWRAST   = 00000016            PFN$M_PAGTYP   = 00000007            PHD$L_R5         0000009C            

PCB$V_RES      = 00000000            PFN$M_PGFLX    = FF000000            PHD$L_R6         000000A0            

PCB$V_RESPEN   = 00000005            PFN$M_RPTEVT   = 00000040            PHD$L_R7         000000A4            

PCB$V_SSFEXC   = 00000006            PFN$S_BAK      = 00000017            PHD$L_R8         000000A8            

PCB$V_SSFEXCE  = 00000007            PFN$S_GBLBAK   = 00000001            PHD$L_R9         000000AC            

PCB$V_SSFEXCS  = 00000008            PFN$S_LOC      = 00000003            PHD$L_REFERFLT   00000014            

PCB$V_SSFEXCU  = 00000009            PFN$S_PAGTYP   = 00000003            PHD$L_SSP        00000080            

PCB$V_SSRWAIT  = 0000000A            PFN$S_PGFLX    = 00000008            PHD$L_USP        00000084            

PCB$V_SUSPEN   = 0000000B            PFN$V_BADPAG   = 00000005            PHD$L_WSL        00000118            

PCB$V_SWPVBN   = 00000010            PFN$V_BAK      = 00000000            PHD$M_DALCSTX  = 00000002            

PCB$V_WAKEPEN  = 0000000C            PFN$V_COLLISION= 00000004            PHD$M_PFMFLG   = 00000001            

PCB$V_WALL     = 0000000D            PFN$V_DELCON   = 00000004            PHD$M_WSPEAKCHK= 00000004            

PCB$W_APTCNT     00000034            PFN$V_GBLBAK   = 00000017            PHD$Q_PRIVMSK    00000000            

PCB$W_ASTCNT     0000003C            PFN$V_LOC      = 00000000            PHD$S_ASTLVL   = 00000008            

PCB$W_BIOCNT     0000003E            PFN$V_MODIFY   = 00000007            PHD$S_P0LR     = 00000018            

PCB$W_BIOLM      00000040            PFN$V_PAGTYP   = 00000000            PHD$V_ASTLVL   = 00000018            

PCB$W_BYTCNT     00000042            PFN$V_PGFLX    = 00000018            PHD$V_DALCSTX  = 00000001            

PCB$W_BYTLM      00000068            PFN$V_RPTEVT   = 00000006            PHD$V_P0LR     = 00000000            

PCB$W_DIOCNT     00000044            PHD$B_ASTLVL     000000CF            PHD$V_PFMFLG   = 00000000            

PCB$W_DIOLM      00000046            PHD$B_DFPFC      00000038            PHD$V_WSPEAKCHK= 00000002            

PCB$W_FILCNT     00000048            PHD$B_PAGFIL     0000001F            PHD$W_ASTLM      00000044            

PCB$W_GPGCNT     00000038            PHD$B_PGTBPFC    00000039            PHD$W_BAK        00000048            

PCB$W_GRP        00000022            PHD$C_LENGTH     00000118            PHD$W_DFWSCNT    0000001A            

PCB$W_MEM        00000020            PHD$C_PHDPAGCTX= 00000008            PHD$W_EMPTPG     000000D8            

PCB$W_MTXCNT     0000000E            PHD$K_LENGTH     00000118            PHD$W_EXTDYNWS   00000076            

PCB$W_PPGCNT     0000003A            PHD$L_BIOCNT     00000054            PHD$W_FILLM      00000060            

PCB$W_PRCCNT     0000006A            PHD$L_CPULIM     00000058            PHD$W_FLAGS      0000003A            

PCB$W_SIZE       00000008            PHD$L_CPUTIM     0000003C            PHD$W_PHVINDEX   00000046            

PCB$W_STATE      00000030            PHD$L_DIOCNT     00000050            PHD$W_PRCLM      00000042            

PCB$W_TMBU       00000036            PHD$L_ESP        0000007C            PHD$W_PST        00000020            

PCB$W_TQCNT      0000004A            PHD$L_FREP0VA    00000028            PHD$W_PSTBASMAX  0000004A            

PFN$AB_STATE     ********   X   03   PHD$L_FREP1VA    00000030            PHD$W_PSTFREE    00000026            

PFN$AB_TYPE      ********   X   03   PHD$L_FREPTECNT  0000002C            PHD$W_PSTLAST    00000024            

PFN$AL_BAK       ********   X   03   PHD$L_KSP        00000078            PHD$W_PTCNTACT   00000070            

PFN$AL_PTE       ********   X   03   PHD$L_P0BR       000000C8            PHD$W_PTCNTLCK   0000006C            

PFN$AW_WSLX      ********   X   03   PHD$L_P0LRASTL   000000CC            PHD$W_PTCNTMAX   00000072            

PFN$C_ACTIVE   = 00000007            PHD$L_P1BR       000000D0            PHD$W_PTCNTVAL   0000006E            

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  27

SYMBOL TABLE                                                                                                                     (1)



PHD$W_QUANT      00000040            PRT$C_URKW     = 0000000E            PTE$M_PFN      = 001FFFFF            

PHD$W_TQLM       00000062            PRT$C_URSW     = 0000000C            PTE$M_PGFLVB   = 003FFFFF            

PHD$W_WSAUTH     0000000A            PRT$C_UW       = 00000004            PTE$M_PROT     = 78000000            

PHD$W_WSDYN      0000000E            PSL$C_EXEC     = 00000001            PTE$M_TYP0     = 00400000            

PHD$W_WSFLUID    00000074            PSL$C_KERNEL   = 00000000            PTE$M_TYP1     = 04000000            

PHD$W_WSLAST     00000012            PSL$C_SUPER    = 00000002            PTE$M_VALID    = 80000000            

PHD$W_WSLIST     00000008            PSL$C_USER     = 00000003            PTE$M_WRT      = 00040000            

PHD$W_WSLOCK     0000000C            PSL$M_CM       = 80000000            PTE$S_GPTX     = 00000016            

PHD$W_WSLX       0000004A            PSL$M_CURMOD   = 03000000            PTE$S_OWN      = 00000002            

PHD$W_WSNEXT     00000010            PSL$M_DV       = 00000080            PTE$S_PFN      = 00000015            

PHD$W_WSQUOTA    00000018            PSL$M_FPD      = 08000000            PTE$S_PGFLVB   = 00000016            

PHD...         = 00000000 R     03   PSL$M_FU       = 00000040            PTE$S_PROT     = 00000004            

PIO              00000600 R     03   PSL$M_IPL      = 001F0000            PTE$S_STX      = 00000010            

PIO$AL_RMSEXH  = 7FFE1FBC  G         PSL$M_IS       = 04000000            PTE$V_CRF      = 00000010            

PIO$C_SEGSIZ   = 00003C00  G         PSL$M_IV       = 00000020            PTE$V_DZRO     = 00000011            

PIO$GB_DFMBC   = 7FFE1E24  G         PSL$M_PRVMOD   = 00C00000            PTE$V_GPTX     = 00000000            

PIO$GB_DFMBFHSH= 7FFE1E2A  G         PSL$M_SAFBITS  = 000037FF            PTE$V_MODIFY   = 0000001A            

PIO$GB_DFMBFIDX= 7FFE1E29  G         PSL$M_TBIT     = 00000010            PTE$V_OWN      = 00000017            

PIO$GB_DFMBFREL= 7FFE1E28  G         PSL$M_TP       = 40000000            PTE$V_PFN      = 00000000            

PIO$GB_DFMBFSDK= 7FFE1E25  G         PSL$S_CURMOD   = 00000002            PTE$V_PGFLVB   = 00000000            

PIO$GB_DFMBFSMT= 7FFE1E26  G         PSL$S_IPL      = 00000005            PTE$V_PROT     = 0000001B            

PIO$GB_DFMBFSUR= 7FFE1E27  G         PSL$S_PRVMOD   = 00000002            PTE$V_STX      = 00000000            

PIO$GL_DIRCACHE= 7FFE1E80  G         PSL$V_CM       = 0000001F            PTE$V_TYP0     = 00000016            

PIO$GL_DIRCFRLH= 7FFE1E88  G         PSL$V_CURMOD   = 00000018            PTE$V_TYP1     = 0000001A            

PIO$GL_FMLH    = 7FFE1E00  G         PSL$V_DV       = 00000007            PTE$V_VALID    = 0000001F            

PIO$GL_IIOFSPLH= 7FFE1E08  G         PSL$V_FPD      = 0000001B            PTE$V_WRT      = 00000012            

PIO$GT_DDSTRING= 7FFE1E2C  G         PSL$V_FU       = 00000006            RND$V_IACLOCK  = 00000000  G         

PIO$GT_ENDSTR  = 7FFE1E12  G         PSL$V_IPL      = 00000010            SAV...         = 00000400 R     03   

PIO$GW_DFPROT  = 7FFE1E22  G         PSL$V_IS       = 0000001A            SEC$B_AMOD       00000015            

PIO$GW_IIOIMPA = 7FFE1F18  G         PSL$V_IV       = 00000005            SEC$B_PFC        0000000B            

PIO$GW_PIOIMPA = 7FFE1E8C  G         PSL$V_PRVMOD   = 00000016            SEC$C_LENGTH     00000020            

PIO$GW_STATUS  = 7FFE1E10  G         PSL$V_TBIT     = 00000004            SEC$K_LENGTH     00000020            

PIOBASE        = 7FFE1E00            PSL$V_TP       = 0000001E            SEC$K_MATALL   = 00000000            

PIOLA1         = 7FFE1E98            PTE$C_EOWN     = 00800000            SEC$K_MATEQU   = 00000001            

PIOLA10        = 7FFE1EB0            PTE$C_ER       = 38000000            SEC$K_MATLEQ   = 00000002            

PIOLA20        = 7FFE1EE4            PTE$C_ERKW     = 30000000            SEC$L_CCB        00000000            

PIOLB1         = 7FFE1F24            PTE$C_EW       = 28000000            SEC$L_GSD        00000000            

PIOLB10        = 7FFE1F3C            PTE$C_KOWN     = 00000000            SEC$L_PAGCNT     0000001C            

PIOLB2         = 7FFE1F2C            PTE$C_KR       = 18000000            SEC$L_REFCNT     00000018            

PIOLB20        = 7FFE1F7C            PTE$C_KW       = 10000000            SEC$L_VBN        00000010            

PIOLFREE       = 7FFE1FCC            PTE$C_NA       = 00000000            SEC$L_VPXPFC     00000008            

PIOTMP...      = 00000800 R     03   PTE$C_SOWN     = 01000000            SEC$L_WINDOW     0000000C            

PR$_TBIA         ********   X   03   PTE$C_SR       = 58000000            SEC$M_AMOD     = 00000300            

PRCALLREG      = 7FFE6400            PTE$C_SREW     = 48000000            SEC$M_CRF      = 00000002            

PRT$C_ER       = 00000007            PTE$C_SRKW     = 50000000            SEC$M_DZRO     = 00000004            

PRT$C_ERKW     = 00000006            PTE$C_SW       = 40000000            SEC$M_GBL      = 00000001            

PRT$C_EW       = 00000005            PTE$C_UOWN     = 01800000            SEC$M_PERM     = 00004000            

PRT$C_KR       = 00000003            PTE$C_UR       = 78000000            SEC$M_SYSGBL   = 00008000            

PRT$C_KW       = 00000002            PTE$C_UREW     = 68000000            SEC$M_WRT      = 00000008            

PRT$C_NA       = 00000000            PTE$C_URKW     = 70000000            SEC$S_AMOD     = 00000002            

PRT$C_RESERVED = 00000001            PTE$C_URSW     = 60000000            SEC$S_CRF      = 00000001            

PRT$C_SR       = 0000000B            PTE$C_UW       = 20000000            SEC$S_DZRO     = 00000001            

PRT$C_SREW     = 00000009            PTE$M_CRF      = 00010000            SEC$S_GBL      = 00000001            

PRT$C_SRKW     = 0000000A            PTE$M_DZRO     = 00020000            SEC$S_PERM     = 00000001            

PRT$C_SW       = 00000008            PTE$M_GPTX     = 003FFFFF            SEC$S_PFC      = 00000008            

PRT$C_UR       = 0000000F            PTE$M_MODIFY   = 04000000            SEC$S_SYSGBL   = 00000001            

PRT$C_UREW     = 0000000D            PTE$M_OWN      = 01800000            SEC$S_VPX      = 00000016            

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  28

SYMBOL TABLE                                                                                                                     (1)



SEC$S_WRT      = 00000001            SWP$GW_IBALSETX  ********   X   03   

SEC$V_AMOD     = 00000008            SWP$GW_WSLPTE    ********   X   03   

SEC$V_CRF      = 00000001            SWP$SHELINIT   = 00000A00  G         

SEC$V_DZRO     = 00000002            TEMP$...       = 0000062C R     03   

SEC$V_GBL      = 00000000            TMP            = 00000200            

SEC$V_PERM     = 0000000E            TMP...         = 00000000            

SEC$V_PFC      = 00000018            USPINI         = 7FFE1600            

SEC$V_SYSGBL   = 0000000F            VA$M_BYTE      = 000001FF            

SEC$V_VPX      = 00000000            VA$M_P1        = 40000000            

SEC$V_WRT      = 00000003            VA$M_SYSTEM    = 80000000            

SEC$W_FLAGS      00000014            VA$M_VPG       = FFFFFE00            

SEC$W_SECXBL     00000006            VA$M_VPN       = 3FFFFE00            

SEC$W_SECXFL     00000004            VA$S_BYTE      = 00000009            

SGN$C_BALSETCNT= 00000018            VA$S_VPG       = 00000017            

SGN$C_DFWSCNT  = 00000064            VA$S_VPN       = 00000015            

SGN$C_DFWSQUOTA= 00000078            VA$V_BYTE      = 00000000            

SGN$C_GBLSECCNT= 00000028            VA$V_P1        = 0000001E            

SGN$C_MAXGPGCNT= 00000800            VA$V_SYSTEM    = 0000001F            

SGN$C_MAXPAGCNT= 00004000            VA$V_VPG       = 00000009            

SGN$C_MAXPGFL  = 00001000            VA$V_VPN       = 00000009            

SGN$C_MAXPSTCNT= 00000005            VA...          = 7FFE1600            

SGN$C_MAXVPGCNT= 00002000            VECTORS        = 7FFEFE00            

SGN$C_MAXWSCNT = 00000400            WSL$C_GBLWRT   = 00000006            

SGN$C_MINWSCNT = 0000000A            WSL$C_GLOBAL   = 00000004            

SGN$C_NPAGEDYN = 00006800            WSL$C_GPGTBL   = 0000000A            

SGN$C_NPROCS   = 00000040            WSL$C_LENGTH   = 00000004            

SGN$C_PAGEDYN  = 00004000            WSL$C_PPGTBL   = 00000008            

SGN$C_PHYPAGCNT= 00001000            WSL$C_PROCESS  = 00000000            

SGN$C_SFTMAX   = 00000003            WSL$C_SYSTEM   = 00000002            

SGN$C_SYSDWSCNT= 00000028            WSL$M_GOODPAGE = 00000040            

SGN$C_SYSVECPGS= 00000003            WSL$M_MODIFY   = 00000100            

SGN$C_SYSWSCNT = 00000060            WSL$M_PAGTYP   = 0000000E            

SGN$GB_DEFPGFL   ********   X   03   WSL$M_PFNLOCK  = 00000010            

SGN$GB_PGTBPFC   ********   X   03   WSL$M_VALID    = 00000001            

SGN$GL_MAXWSCNT  ********   X   03   WSL$M_WSLOCK   = 00000020            

SGN$GL_PHDAPCNT  ********   X   03   WSL$S_PAGTYP   = 00000003            

SGN$GL_PHDPAGCT  ********   X   03   WSL$V_GOODPAGE = 00000006            

SGN$GL_PTPAGCNT  ********   X   03   WSL$V_MODIFY   = 00000008            

SGN$GW_DFPFC     ********   X   03   WSL$V_PAGTYP   = 00000001            

SGN$GW_DFWSCNT   ********   X   03   WSL$V_PFNLOCK  = 00000004            

SGN$GW_MINWSCNT  ********   X   03   WSL$V_VALID    = 00000000            

SHELL            00000000 R     03   WSL$V_WSLOCK   = 00000005            

SSPINI         = 7FFEFE00            WSL...         = 00000118 R     03   

SSTACK         = 00000007            

SWP$AL_PTRPAG  = 00000400  G         

SWP$C_DBGPTCNT = 00000001  G         

SWP$C_KSTACK   = 00000003  G         

SWP$C_NDYN     = 00000002  G         

SWP$C_SHELLSIZ = 00000007            

SWP$C_SHLFPTE  = 0000000B  G         

SWP$C_SHLP1PT  = 00000001  G         

SWP$GB_SHLP1PT   ********   X   03   

SWP$GL_SHELIO    00000000 RG    01   

SWP$GL_SHELLBAS  00000000 RG    03   

SWP$GL_SHELLSIZ  ********   X   03   

SWP$GW_BAKPTE    ********   X   03   

SWP$GW_EMPTPTE   ********   X   03   

SHELL           PROCESS DEFINITION                               21-AUG-1978 20:10:23   VAX-11 MACRO X0.3-11               Page  29

PROGRAM SECTION SYNOPSIS                                                                                                         (1)







PROGRAM SECTION SYNOPSIS



.  ABS  .        00000000      00     NOPIC   USR   CON   ABS   LCL NOSHR NOEXE NORD  NOWRT BYTE  

. BLANK .        00000004      01     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT BYTE  

$ABS$            7FFE6C10      02     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

ZZSHELL          00000E00      03     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT PAGE  





THERE WERE NO ERRORS OR WARNINGS.

12068. BYTES LEFT IN FREE MEMORY POOL.

72. BYTES OF RECLAIMED MEMORY.

OBJ$:SHELL,LIS$:SHELL/-SP=EXECML$/ML,SRC$:SHELL

10 MLB DIR RDS - 798 GETS TO DEFINE 24 MACROS. 82 INTER. FILE WRITES. 

