SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (1)      48  DECLARATIONS

   (1)      84  CONDITION TABLES

   (1)     111  TM_SETUP, TM_CLEANUP

   (1)     187  CONDITION SUBROUTINES - SETUP AND CLEANUP 

   (1)     257  FORM_CONDS

   (1)     350  VERIFY

   (1)     476  VFY_CLEANUP

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page   1

1.0                                                                                                                              (1)



                                     0000     1 	.TITLE	SATSSS81 SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)

                                     0000     2 	.IDENT	/1.0/

                                     0000     3 

                                     0000     4 ;

                                     0000     5 ;			  COPYRIGHT (c) 1977,1978 BY

                                     0000     6 ;	      DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.

                                     0000     7 ;

                                     0000     8 ; THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND  COPIED

                                     0000     9 ; ONLY  IN  ACCORDANCE  WITH  THE  TERMS  OF  SUCH  LICENSE AND WITH THE

                                     0000    10 ; INCLUSION OF THE ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE OR  ANY  OTHER

                                     0000    11 ; COPIES  THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY

                                     0000    12 ; OTHER PERSON.  NO TITLE TO AND OWNERSHIP OF  THE  SOFTWARE  IS  HEREBY

                                     0000    13 ; TRANSFERRED.

                                     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 ; DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR  RELIABILITY  OF  ITS

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

                                     0000    21 ;

                                     0000    22 

                                     0000    23 ;++

                                     0000    24 ; FACILITY:	SYSTST (SATS SYSTEM SERVICE TESTS)

                                     0000    25 ;

                                     0000    26 ; ABSTRACT:

                                     0000    27 ;

                                     0000    28 ;		THIS MODULE CONTAINS SUBROUTINES WHICH, WHEN LINKED

                                     0000    29 ; WITH SUCCOMMON.OBJ, FORM TEST MODULE SATSSS81 TO TEST SUCCESSFUL

                                     0000    30 ; OPERATION OF THE $ADJWSL SYSTEM SERVICE. THE SERVICE IS INVOKED

                                     0000    31 ; UNDER VARIOUS INPUT CONDITIONS WITH VARYING INPUT PARAMETERS. ONLY

                                     0000    32 ; SUCCESSFUL STATUS CODES ARE EXPECTED IN THIS TEST MODULE.  CORRECT 

                                     0000    33 ; OPERATION OF THE SERVICE FOR EACH OF ITS ISSUANCES IS VERIFIED BY

                                     0000    34 ; CHECKING FOR AN SS$_NORMAL STATUS CODE, EXPECTED RETURN ARGUMENTS

                                     0000    35 ; AND EXPECTED FUNCTIONALITY PERFORMED.

                                     0000    36 ;

                                     0000    37 ; ENVIRONMENT:	USER MODE IMAGE; NEEDS CMKRNL PRIVILEGE,

                                     0000    38 ;		DYNAMICALLY ACQUIRES OTHER PRIVILEGES, AS NEEDED.

                                     0000    39 ;

                                     0000    40 ; AUTHOR: THOMAS L. CAFARELLA,		CREATION DATE: AUG, 1977

                                     0000    41 ;

                                     0000    42 ; MODIFIED BY:

                                     0000    43 ;

                                     0000    44 ;	, : VERSION

                                     0000    45 ; 01	- 

                                     0000    46 ;--

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page   2

1.0             DECLARATIONS                                                                                                     (1)



                                     0000    48 	.SBTTL	DECLARATIONS

                                     0000    49 ;

                                     0000    50 ; INCLUDE FILES:

                                     0000    51 ;

                                     0000    52 	$PRVDEF				; PRIVILEGE BIT DEFINITIONS

                                     0000    53 	$PHDDEF				; PROCESS HEADER OFFSETS

                                     0000    54 ;

                                     0000    55 ; MACROS:

                                     0000    56 ;

                                     0000    57 ;

                                     0000    58 ; EQUATED SYMBOLS:

                                     0000    59 ;

                                     0000    60 ;

                                     0000    61 ; OWN STORAGE:

                                     0000    62 ;

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page   3

1.0             DECLARATIONS                                                                                                     (1)



                                 00000000    64 	.PSECT	RODATA,RD,NOWRT,NOEXE,LONG

                                     0000    65 TEST_MOD_NAME::	STRING	C,<SATSSS81>	; TEST MODULE NAME

                                     0009    66 TEST_MOD_NAME_D: STRING	I,<SATSSS81>	; TEST MODULE NAME DESCRIPTOR

                                     0019    67 MSG1_INP_CTL:	STRING	I,<  SSAWS!4ZW: CONDITIONS:>

                                     0039    68 					; FAO CTL STRING FOR MSG1 IN SUCCOMMON.MAR

                                     0039    69 MSG3_ERR_CTL::	STRING	I,< *SSAWS!4ZW: !AS> 

                                     0051    70 					; FAO CTL STRING FOR MSG3 IN SUCCOMMON.MAR

                           01E84800  0051    71 MAXPAGCNT:	.LONG	32000000 	; A PAGCNT VALUE GREATER THAN MAX POSSIBLE

                           FE17B800  0055    72 MINPAGCNT:	.LONG	-32000000 	; A PAGCNT VALUE LESS THAN MINIMUM POSSIBLE

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page   4

1.0             DECLARATIONS                                                                                                     (1)



                                 00000000    74 	.PSECT	RWDATA,RD,WRT,NOEXE,LONG

                           00000008  0000    75 PRIVMASK:	.BLKQ	1		; ADDR OF PRIVILEGE MASK (IN PHD)

                           0000000C  0008    76 PAGCNT:		.BLKL	1		; PAGCNT ARGUMENT FOR ADJWSL

                           00000010  000C    77 WSETLM:		.BLKL	1		; WSETLM ARGUMENT FOR ADJWSL

                           00000014  0010    78 WSETENTR:	.BLKL	1		; WORKING SET VALUE AT ENTRY TO TEST MODULE

                           00000018  0014    79 WSETENTR_P1:	.BLKL	1		; W.S. ENTRY VALUE PLUS 1

                           0000001C  0018    80 WSETULIM:	.BLKL	1		; W.S. UPPER LIMIT DEFINED BY SYSTEM MGR

                           00000020  001C    81 WSETLLIM:	.BLKL	1		; W.S. LOWER LIMIT DEFINED BY SYSTEM MGR

                           00000024  0020    82 WSETLM_VFY:	.BLKL	1		; W.S. VALUE USED FOR VERIFICATION

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page   5

1.0             CONDITION TABLES                                                                                                 (1)



                                     0024    84 	.SBTTL	CONDITION TABLES

                                     0024    85 ;

                                     0024    86 ;	***** CONDITION TABLES FOR ADJWSL SYSTEM SERVICE *****

                                     0024    87 ;

                                     0024    88 	COND	1,NOTARG,<NEW WORKING SET VALUE>,-

                                     0024    89 		  <1 GREATER THAN VALUE AT ENTRY>,-

                                     0024    90 		  <UPPER LIMIT>,-

                                     0024    91 		  <1 GREATER THAN UPPER LIMIT>,-

                                     0024    92 		  <LOWER LIMIT>,-

                                     0024    93 		  <1 LESS THAN LOWER LIMIT>,-

                                     0024    94  

                           00000014' 00B8    95 		    .ADDRESS	WSETENTR_P1

                           00000018' 00BC    96 		    .ADDRESS	WSETULIM

                           00000018' 00C0    97 		    .ADDRESS	WSETULIM

                           0000001C' 00C4    98 		    .ADDRESS	WSETLLIM

                           0000001C' 00C8    99 		    .ADDRESS	WSETLLIM

                                     00CC   100 ;

                                     00CC   101 	COND	2,NULL

                                     00CD   102 

                                     00CD   103 	COND	3,NULL

                                     00CE   104 

                                     00CE   105 	COND	4,NULL

                                     00CF   106 

                                     00CF   107 	COND	5,NULL

                                     00D0   108 

                                 00000000   109 	.PSECT	SATSSS81,RD,WRT,EXE

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page   6

1.0             TM_SETUP, TM_CLEANUP                                                                                             (1)



                                     0000   111 	.SBTTL	TM_SETUP, TM_CLEANUP

                                     0000   112 ;++

                                     0000   113 ; FUNCTIONAL DESCRIPTION:

                                     0000   114 ;

                                     0000   115 ;		TM_SETUP AND TM_CLEANUP ARE CALLED TO PERFORM

                                     0000   116 ; REQUIRED HOUSEKEEPING AT THE BEGINNING AND END, RESPECTIVELY, OF

                                     0000   117 ; TEST MODULE EXECUTION.

                                     0000   118 ;

                                     0000   119 ; CALLING SEQUENCE:

                                     0000   120 ;

                                     0000   121 ;	BSBW TM_SETUP   BSBW TM_CLEANUP

                                     0000   122 ;

                                     0000   123 ; INPUT PARAMETERS:

                                     0000   124 ;

                                     0000   125 ;	NONE

                                     0000   126 ;

                                     0000   127 ; IMPLICIT INPUTS:

                                     0000   128 ;

                                     0000   129 ;	NONE

                                     0000   130 ;

                                     0000   131 ; OUTPUT PARAMETERS:

                                     0000   132 ;

                                     0000   133 ;	NONE

                                     0000   134 ;

                                     0000   135 ; IMPLICIT OUTPUTS:

                                     0000   136 ;

                                     0000   137 ;	TM_SETUP:  COND TABLE INDEX REGISTERS (R2,3,4,5,6) CLEARED;

                                     0000   138 ;		   ALL PRIVILEGES ACQUIRED.

                                     0000   139 ;

                                     0000   140 ; COMPLETION CODES:

                                     0000   141 ;

                                     0000   142 ;	EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED.

                                     0000   143 ;

                                     0000   144 ; SIDE EFFECTS:

                                     0000   145 ;

                                     0000   146 ;	SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 

                                     0000   147 ;	(VIA RSB) IF ERROR ENCOUNTERED.

                                     0000   148 ;

                                     0000   149 ;--

                                     0000   150 

                                     0000   151 

                                     0000   152 

                                     0000   153 TM_SETUP::

                          52     D4  0000   154 	CLRL	R2			; INITIALIZE

                          53     D4  0002   155 	CLRL	R3			; .. CONDITION

                          54     D4  0004   156 	CLRL	R4			; .... TABLE

                          55     D4  0006   157 	CLRL	R5			; ...... INDEX

                          56     D4  0008   158 	CLRL	R6			; ........ REGISTERS

                          FFF3'  30  000A   159 	BSBW	MOD_MSG_PRINT		; PRINT TEST MODULE BEGIN MSG

   00000000'EF   00000000'EF     DE  000D   160 	MOVAL	TEST_MOD_SUCC,TMD_ADDR	; ASSUME END MSG WILL SHOW SUCCESS

            00   00000000'8F     F0  0018   161 	INSV	#SUCCESS,#0,#3,MOD_MSG_CODE ; ADJUST STATUS CODE FOR SUCCESS

   00000000'EF            03         001F       

                                     0025   162 	MODE	TO,5$,KRNL		; KERNEL MODE TO ACCESS PHD

            59   00000000'9F     D0  0048   163 	MOVL	@#CTL$GL_PHD,R9		; GET PROCESS HEADER ADDRESS

   00000000'EF            69     DE  004F   164 	MOVAL	PHD$Q_PRIVMSK(R9),PRIVMASK ; GET PRIV MASK ADDRESS

                                     0056   165 	MODE	FROM,5$	; BACK TO USER MODE

                                     0057   166 	PRIV	ADD,ALL			; GET ALL PRIVILEGES

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page   7

1.0             TM_SETUP, TM_CLEANUP                                                                                             (1)



                                     0080   167 	$SETPRN_S TEST_MOD_NAME_D 	; SET PROCESS NAME

                                     008D   168 	SS_CHECK  NORMAL		; CHECK STATUS CODE RETURNED FROM SETPRN

                                     00BB   169 	$ADJWSL_S #0,WSETENTR		; GET WORKING SET VALUE AT ENTRY

                                     00CA   170 	SS_CHECK NORMAL			; CHECK NORMAL RETURN

   00000010'EF            01     C1  00F8   171 	ADDL3	#1,WSETENTR,WSETENTR_P1	; REMEMBER WSETENTR PLUS 1

                 00000014'EF         00FF       

                                     0104   172 	$ADJWSL_S MAXPAGCNT,WSETULIM 	; GET UPPER LIMIT FOR WORKING SET

                                     0117   173 	SS_CHECK NORMAL			; CHECK NORMAL RETURN

                                     0145   174 	$ADJWSL_S MINPAGCNT,WSETLLIM 	; GET LOWER LIMIT FOR WORKING SET

                                     0158   175 	SS_CHECK NORMAL			; CHECK NORMAL RETURN

   00000010'EF   0000001C'EF     C3  0186   176 	SUBL3	WSETLLIM,WSETENTR,PAGCNT ; GET INCR FROM ENTRY TO LLIM

                 00000008'EF         0191       

                                     0196   177 	$ADJWSL_S PAGCNT		; ... AND GET BACK TO ENTRY VALUE

                                     01A5   178 	SS_CHECK NORMAL			; CHECK NORMAL RETURN

                                 05  01D3   179 	RSB				; RETURN TO MAIN ROUTINE

                                     01D4   180 TM_CLEANUP::

                                     01D4   181 	$ADJWSL_S #0,WSETLM		; GET CURRENT W.S. VALUE

   00000010'EF   0000000C'EF     C3  01E3   182 	SUBL3	WSETLM,WSETENTR,PAGCNT 	; COMPUTE DISTANCE TO ENTRY VALUE

                 00000008'EF         01EE       

                                     01F3   183 	$ADJWSL_S PAGCNT		; ... AND GO BACK THERE

                          FDFB'  30  0202   184 	BSBW	MOD_MSG_PRINT		; PRINT TEST MODULE END MSG

                                 05  0205   185 	RSB				; RETURN TO MAIN ROUTINE

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page   8

1.0             CONDITION SUBROUTINES - SETUP AND CLEANUP                                                                        (1)



                                     0206   187 	.SBTTL	CONDITION SUBROUTINES - SETUP AND CLEANUP 

                                     0206   188 ;++

                                     0206   189 ; FUNCTIONAL DESCRIPTION:

                                     0206   190 ;

                                     0206   191 ;		CONDX AND CONDX_CLEANUP ARE SUBROUTINES WHICH ARE EXECUTED

                                     0206   192 ; BEFORE AND AFTER THE VERIFY SUBROUTINE, RESPECTIVELY, WHENEVER A NEW

                                     0206   193 ; CONDITION X VALUE IS SELECTED (SEE FUNCTIONAL DESCRIPTION OF SUCCOMMON

                                     0206   194 ; ROUTINE IN SUCCOMMON.MAR). ANY SETUP FUNCTION PARTICULAR TO THE 

                                     0206   195 ; CONDITION X TABLE IS INCLUDED IN THE CONDX SUBROUTINE AND CLEANED

                                     0206   196 ; UP, IF NECESSARY, IN THE CONDX_CLEANUP SUBROUTINE. THIS INCLUDES,

                                     0206   197 ; ESPECIALLY, CODE TO DETECT CONFLICTS AMONG CURRENT ENTRIES IN TWO

                                     0206   198 ; OR MORE CONDITION TABLES. IF A CONFLICT IS DETECTED, A NON-ZERO

                                     0206   199 ; VALUE IS STORED INTO CONFLICT, WHICH CAUSES THE CALLING ROUTINE

                                     0206   200 ; (SUCCOMMON) TO SKIP THE CURRENT ENTRY IN THE CONDITION X TABLE.

                                     0206   201 ;

                                     0206   202 ; CALLING SEQUENCE:

                                     0206   203 ;

                                     0206   204 ;	BSBW CONDX   BSBW CONDX_CLEANUP

                                     0206   205 ;	  WHERE X = 1,2,3,4,5

                                     0206   206 ;

                                     0206   207 ; INPUT PARAMETERS:

                                     0206   208 ;

                                     0206   209 ;	CONFLICT = 0

                                     0206   210 ;

                                     0206   211 ; IMPLICIT INPUTS:

                                     0206   212 ;

                                     0206   213 ;	R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES

                                     0206   214 ;	  FOR COND TABLES 1,2,3,4,5, RESPECTIVELY.

                                     0206   215 ;

                                     0206   216 ; OUTPUT PARAMETERS:

                                     0206   217 ;

                                     0206   218 ;	CONFLICT SET TO NON-ZERO IF COND TABLE CONFLICT DETECTED.

                                     0206   219 ;

                                     0206   220 ; IMPLICIT OUTPUTS:

                                     0206   221 ;

                                     0206   222 ;	R2,3,4,5,6 PRESERVED

                                     0206   223 ;

                                     0206   224 ; COMPLETION CODES:

                                     0206   225 ;

                                     0206   226 ;	NONE

                                     0206   227 ;

                                     0206   228 ; SIDE EFFECTS:

                                     0206   229 ;

                                     0206   230 ;	NONE

                                     0206   231 ;

                                     0206   232 ;--

                                     0206   233 

                                     0206   234 

                                     0206   235 

                                     0206   236 COND1::

                                 05  0206   237 	RSB				; RETURN TO MAIN ROUTINE

                                     0207   238 COND1_CLEANUP::

                                 05  0207   239 	RSB				; RETURN TO MAIN ROUTINE

                                     0208   240 COND2::

                                 05  0208   241 	RSB				; RETURN TO MAIN ROUTINE

                                     0209   242 COND2_CLEANUP::

                                 05  0209   243 	RSB				; RETURN TO MAIN ROUTINE

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page   9

1.0             CONDITION SUBROUTINES - SETUP AND CLEANUP                                                                        (1)



                                     020A   244 COND3::

                                 05  020A   245 	RSB				; RETURN TO MAIN ROUTINE

                                     020B   246 COND3_CLEANUP::

                                 05  020B   247 	RSB				; RETURN TO MAIN ROUTINE

                                     020C   248 COND4::

                                 05  020C   249 	RSB				; RETURN TO MAIN ROUTINE

                                     020D   250 COND4_CLEANUP::

                                 05  020D   251 	RSB				; RETURN TO MAIN ROUTINE

                                     020E   252 COND5::

                                 05  020E   253 	RSB				; RETURN TO MAIN ROUTINE

                                     020F   254 COND5_CLEANUP::

                                 05  020F   255 	RSB				; RETURN TO MAIN ROUTINE

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page  10

1.0             FORM_CONDS                                                                                                       (1)



                                     0210   257 	.SBTTL	FORM_CONDS

                                     0210   258 ;++

                                     0210   259 ; FUNCTIONAL DESCRIPTION:

                                     0210   260 ;

                                     0210   261 ; 		FORM_CONDS FORMATS AND PRINTS INFORMATION ABOUT

                                     0210   262 ;  THE CURRENT ELEMENT IN EACH OF THE CONDITION TABLES.

                                     0210   263 ;

                                     0210   264 ; CALLING SEQUENCE:

                                     0210   265 ;

                                     0210   266 ;	BSBW FORM_CONDS

                                     0210   267 ;

                                     0210   268 ; INPUT PARAMETERS:

                                     0210   269 ;

                                     0210   270 ;	NONE

                                     0210   271 ;

                                     0210   272 ; IMPLICIT INPUTS:

                                     0210   273 ;

                                     0210   274 ;	R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES

                                     0210   275 ;	  FOR COND TABLES 1,2,3,4,5, RESPECTIVELY.

                                     0210   276 ;	FOR X = 1,2,3,4,5 :

                                     0210   277 ;		CONDX_T - TITLE TEXT FOR CONDX TABLE

                                     0210   278 ;		CONDX_TAB - ELEMENT TEXT FOR CONDX TABLE

                                     0210   279 ;		CONDX_C - CONTEXT OF THE CONDX TABLE

                                     0210   280 ;		CONDX_E - DATA ELEMENTS OF THE CONDX TABLE

                                     0210   281 ;

                                     0210   282 ; OUTPUT PARAMETERS:

                                     0210   283 ;

                                     0210   284 ;	NONE

                                     0210   285 ;

                                     0210   286 ; IMPLICIT OUTPUTS:

                                     0210   287 ;

                                     0210   288 ;	NONE

                                     0210   289 ;

                                     0210   290 ; COMPLETION CODES:

                                     0210   291 ;

                                     0210   292 ;	NONE

                                     0210   293 ;

                                     0210   294 ; SIDE EFFECTS:

                                     0210   295 ;

                                     0210   296 ;	NONE

                                     0210   297 ;

                                     0210   298 ;--

                                     0210   299 

                                     0210   300 

                                     0210   301 

                                     0210   302 FORM_CONDS::

                                     0210   303 	$FAO_S	MSG1_INP_CTL,FAO_LEN,FAO_DESC,TESTNUM

                                     022F   304 					; FORMAT CONDITIONS HEADER MSG

                          FDCE'  30  022F   305 	BSBW	OUTPUT_MSG		; ... AND PRINT IT

            14            00     91  0232   306 	CMPB	#COND1_C,#NULL		; IS CONDITION 1 NULL ?

                          03     12  0235   307 	BNEQU	10$			; NO -- CONTINUE

                          00BF   31  0237   308 	BRW	FORM_CONDSX		; YES -- SUBROUTINE IS FINISHED

                                     023A   309 10$:

   00000000'EF   00000024'EF     DE  023A   310 	MOVAL	COND1_T,MSG_A		; SAVE ADDRESS OF CONDITION 1 TITLE FOR FAO

   00000000'EF   0000003B'EF42   D0  0245   311 	MOVL	COND1_TAB[R2],MSG_B 	; SAVE ADDR OF COND 1 CURR TEXT ELT FOR FAO

   00000000'EF            00     90  0251   312 	MOVB	#COND1_C,MSG_CTXT 	; SAVE CONDITION 1 CONTEXT FOR FAO

                                     0258   313 	MOV_VAL	COND1_C,COND1_E[R2],MSG_DATA1 ; GIVE COND 1 DATA VALUE TO FAO

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page  11

1.0             FORM_CONDS                                                                                                       (1)



                          FDA5'  30  0258   314 	BSBW	WRITE_MSG2		; FORMAT AND WRITE CONDITION 1 MSG

            14            14     91  025B   315 	CMPB	#COND2_C,#NULL		; IS CONDITION 2 NULL ?

                          03     12  025E   316 	BNEQU	20$			; NO -- CONTINUE

                          0096   31  0260   317 	BRW	FORM_CONDSX		; YES -- SUBROUTINE IS FINISHED

                                     0263   318 20$:

   00000000'EF   000000CC'EF     DE  0263   319 	MOVAL	COND2_T,MSG_A		; SAVE ADDRESS OF CONDITION 2 TITLE FOR FAO

   00000000'EF   000000CC'EF43   D0  026E   320 	MOVL	COND2_TAB[R3],MSG_B 	; SAVE ADDR OF COND 2 CURR TEXT ELT FOR FAO

   00000000'EF            14     90  027A   321 	MOVB	#COND2_C,MSG_CTXT 	; SAVE CONDITION 2 CONTEXT FOR FAO

                                     0281   322 	MOV_VAL	COND2_C,COND2_E[R3],MSG_DATA1 ; GIVE COND 2 DATA VALUE TO FAO

                          FD7C'  30  0281   323 	BSBW	WRITE_MSG2		; FORMAT AND WRITE CONDITION 2 MSG

            14            14     91  0284   324 	CMPB	#COND3_C,#NULL		; IS CONDITION 3 NULL ?

                          03     12  0287   325 	BNEQU	30$			; NO -- CONTINUE

                          006D   31  0289   326 	BRW	FORM_CONDSX		; YES -- SUBROUTINE IS FINISHED

                                     028C   327 30$:

   00000000'EF   000000CD'EF     DE  028C   328 	MOVAL	COND3_T,MSG_A		; SAVE ADDRESS OF CONDITION 3 TITLE FOR FAO

   00000000'EF   000000CD'EF44   D0  0297   329 	MOVL	COND3_TAB[R4],MSG_B 	; SAVE ADDR OF COND 3 CURR TEXT ELT FOR FAO

   00000000'EF            14     90  02A3   330 	MOVB	#COND3_C,MSG_CTXT 	; SAVE CONDITION 3 CONTEXT FOR FAO

                                     02AA   331 	MOV_VAL	COND3_C,COND3_E[R4],MSG_DATA1 ; GIVE COND 3 DATA VALUE TO FAO

                          FD53'  30  02AA   332 	BSBW	WRITE_MSG2		; FORMAT AND WRITE CONDITION 3 MSG

            14            14     91  02AD   333 	CMPB	#COND4_C,#NULL		; IS CONDITION 4 NULL ?

                          47     13  02B0   334 	BEQLU	FORM_CONDSX		; YES -- SUBROUTINE IS FINISHED

   00000000'EF   000000CE'EF     DE  02B2   335 	MOVAL	COND4_T,MSG_A		; SAVE ADDRESS OF CONDITION 4 TITLE FOR FAO

   00000000'EF   000000CE'EF45   D0  02BD   336 	MOVL	COND4_TAB[R5],MSG_B 	; SAVE ADDR OF COND 4 CURR TEXT ELT FOR FAO

   00000000'EF            14     90  02C9   337 	MOVB	#COND4_C,MSG_CTXT 	; SAVE CONDITION 4 CONTEXT FOR FAO

                                     02D0   338 	MOV_VAL	COND4_C,COND4_E[R5],MSG_DATA1 ; GIVE COND 4 DATA VALUE TO FAO

                          FD2D'  30  02D0   339 	BSBW	WRITE_MSG2		; FORMAT AND WRITE CONDITION 4 MSG

            14            14     91  02D3   340 	CMPB	#COND5_C,#NULL		; IS CONDITION 5 NULL ?

                          21     13  02D6   341 	BEQLU	FORM_CONDSX		; YES -- SUBROUTINE IS FINISHED

   00000000'EF   000000CF'EF     DE  02D8   342 	MOVAL	COND5_T,MSG_A		; SAVE ADDRESS OF CONDITION 5 TITLE FOR FAO

   00000000'EF   000000CF'EF46   D0  02E3   343 	MOVL	COND5_TAB[R6],MSG_B 	; SAVE ADDR OF COND 5 CURR TEXT ELT FOR FAO

   00000000'EF            14     90  02EF   344 	MOVB	#COND5_C,MSG_CTXT 	; SAVE CONDITION 5 CONTEXT FOR FAO

                                     02F6   345 	MOV_VAL	COND5_C,COND5_E[R6],MSG_DATA1 ; GIVE COND 5 DATA VALUE TO FAO

                          FD07'  30  02F6   346 	BSBW	WRITE_MSG2		; FORMAT AND WRITE CONDITION 5 MSG

                                     02F9   347 FORM_CONDSX:

                                 05  02F9   348 	RSB				; RETURN TO CALLER

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page  12

1.0             VERIFY                                                                                                           (1)



                                     02FA   350 	.SBTTL	VERIFY

                                     02FA   351 ;++

                                     02FA   352 ; FUNCTIONAL DESCRIPTION:

                                     02FA   353 ;

                                     02FA   354 ;		VERIFY IS CALLED ONCE FOR EACH COMBINATION OF CONDITION

                                     02FA   355 ; TABLE VALUES (AS DETERMINED BY THE INDEX REGISTERS R2,3,4,5,6 FOR

                                     02FA   356 ; COND TABLES 1,2,3,4,5, RESPECTIVELY). VERIFY ESTABLISHES THE CONDITIONS

                                     02FA   357 ; SPECIFIED BY THE COND TABLES AND ISSUES THE SUBJECT SYSTEM SERVICE

                                     02FA   358 ; ($ADJWSL). THEN, THE SUCCESSFUL OPERATION OF THE SERVICE IS VERIFIED

                                     02FA   359 ; BY EXAMINING THE STATUS CODE RETURNED, THE VALUES FOR RETURN ARGUMENTS

                                     02FA   360 ; AND THE FUNCTIONALITY PERFORMED. THE EXAMINATIONS TAKE THE FORM OF 

                                     02FA   361 ; COMPARISONS AGAINST EXPECTED VALUES. ANY FAILING COMPARISON CAUSES AN

                                     02FA   362 ; ERR_EXIT MACRO TO BE EXECUTED (EITHER DIRECTLY, OR INDIRECTLY,

                                     02FA   363 ; THROUGH THE SS_CHECK MACRO); ERR_EXIT SETS EFLAG TO NON-ZERO,

                                     02FA   364 ; PRINTS ERROR MESSAGES AND CAUSES AN IMMEDIATE RSB TO CALLER.

                                     02FA   365 ; WHEN ERR_EXIT IS EXECUTED, FURTHER CALLS TO VERIFY ARE SUPPRESSED,

                                     02FA   366 ; AND, AFTER EXECUTING CLEANUP SUBROUTINES, THE IMAGE EXITS.

                                     02FA   367 ;

                                     02FA   368 ; CALLING SEQUENCE:

                                     02FA   369 ;

                                     02FA   370 ;	BSBW VERIFY

                                     02FA   371 ;

                                     02FA   372 ; INPUT PARAMETERS:

                                     02FA   373 ;

                                     02FA   374 ;	NONE

                                     02FA   375 ;

                                     02FA   376 ; IMPLICIT INPUTS:

                                     02FA   377 ;

                                     02FA   378 ;	R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES

                                     02FA   379 ;	  FOR COND TABLES 1,2,3,4,5, RESPECTIVELY.

                                     02FA   380 ;	FOR X = 1,2,3,4,5 :

                                     02FA   381 ;		CONDX_E - ADDRESS OF TABLE OF DATA VALUES FOR CONDX

                                     02FA   382 ;		  TABLE. IF THE CONTEXT OF TABLE X IS A SYSTEM SERVICE

                                     02FA   383 ;		  ARGUMENT, THE ARGUMENT NAME MAY BE USED AS A SYNONYM

                                     02FA   384 ;		  FOR CONDX_E.

                                     02FA   385 ;

                                     02FA   386 ; OUTPUT PARAMETERS:

                                     02FA   387 ;

                                     02FA   388 ;	NONE

                                     02FA   389 ;

                                     02FA   390 ; IMPLICIT OUTPUTS:

                                     02FA   391 ;

                                     02FA   392 ;	VERIFY HAS NO OUTPUT. SINCE ITS PURPOSE IS TO TEST FOR ERRORS,

                                     02FA   393 ;	IT MERELY RETURNS TO CALLER NORMALLY AFTER THE TESTS, PROVIDING

                                     02FA   394 ;	ALL WERE SUCCESSFUL; IF AN ERROR IS DISCOVERED, RETURN IS VIA

                                     02FA   395 ;	AN ERR_EXIT OR SS_CHECK MACRO, BOTH OF WHICH DOCUMENT DETECTED

                                     02FA   396 ;	ERRORS.

                                     02FA   397 ;

                                     02FA   398 ; COMPLETION CODES:

                                     02FA   399 ;

                                     02FA   400 ;	EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED.

                                     02FA   401 ;

                                     02FA   402 ; SIDE EFFECTS:

                                     02FA   403 ;

                                     02FA   404 ;	SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 

                                     02FA   405 ;	(VIA RSB) IF ERROR ENCOUNTERED.

                                     02FA   406 ;

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page  13

1.0             VERIFY                                                                                                           (1)



                                     02FA   407 ;--

                                     02FA   408 

                                     02FA   409 

                                     02FA   410 

                                     02FA   411 VERIFY::

                 00000000'EF     95  02FA   412 	TSTB	CFLAG			; SHOULD CONDITIONS BE PRINTED ?

                          03     13  0300   413 	BEQL	5$			; NO -- CONTINUE

                          FF0B   30  0302   414 	BSBW	FORM_CONDS		; YES -- FMT & PRINT ALL CONDS FOR THIS T.C.

                                     0305   415 5$:

                          52     95  0305   416 	TSTB	R2			; FIRST CONDITION 1 ELEMENT ?

                          12     12  0307   417 	BNEQ	10$			; NO -- LOOK AT NEXT ELEMENT

                                     0309   418 	$ADJWSL_S #1,WSETLM		; YES -- ADJUST TO ENTRY VALUE + 1

                          00AF   31  0318   419 	BRW	50$			; ... AND GO DO SOME VERIFICATION

                                     031B   420 10$:

            01            52     91  031B   421 	CMPB	R2,#1			; 2ND CONDITION 1 ELEMENT ?

                          26     12  031E   422 	BNEQ	20$			; NO -- LOOK AT NEXT ELEMENT

   00000018'EF   00000010'EF     C3  0320   423 	SUBL3	WSETENTR,WSETULIM,PAGCNT ; GET OFFSET TO UPPER LIMIT

                 00000008'EF         032B       

                                     0330   424 	$ADJWSL_S PAGCNT,WSETLM		; ... AND ADJUST TO IT

                          0084   31  0343   425 	BRW	50$			; VERIFY THE SUBJECT SERVICE

                                     0346   426 20$:

            02            52     91  0346   427 	CMPB	R2,#2			; 3RD CONDITION 1 ELEMENT ?

                          2C     12  0349   428 	BNEQ	30$			; NO -- GO CHECK NEXT ELEMENT

   00000018'EF   00000010'EF     C3  034B   429 	SUBL3	WSETENTR,WSETULIM,PAGCNT ; FIND OUT HOW FAR AWAY ULIM IS

                 00000008'EF         0356       

                 00000008'EF     D6  035B   430 	INCL	PAGCNT			; GO ONE FURTHER

                                     0361   431 	$ADJWSL_S PAGCNT,WSETLM		; ADJUST TO ONE BEYOND UPPER LIMIT

                          0053   31  0374   432 	BRW	50$			; ... AND VERIFY IT

                                     0377   433 30$:

            03            52     91  0377   434 	CMPB	R2,#3			; 4TH CONDITION 1 ELEMENT ?

                          25     12  037A   435 	BNEQ	40$			; NO -- MUST BE THE 5TH

   0000001C'EF   00000010'EF     C3  037C   436 	SUBL3	WSETENTR,WSETLLIM,PAGCNT ; COMPUTE DISTANCE TO LOWER LIMIT

                 00000008'EF         0387       

                                     038C   437 	$ADJWSL_S PAGCNT,WSETLM		; ... AND ADJUST TO THERE

                          29     11  039F   438 	BRB	50$			; GO VERIFY SERVICE

                                     03A1   439 40$:

   0000001C'EF   00000010'EF     C3  03A1   440 	SUBL3	WSETENTR,WSETLLIM,PAGCNT ; FIND DISTANCE TO LOWER LIMIT

                 00000008'EF         03AC       

                 00000008'EF     D7  03B1   441 	DECL	PAGCNT			; ... AND GO ONE BELOW IT

                                     03B7   442 	$ADJWSL_S PAGCNT,WSETLM		; ISSUE SUBJECT SERVICE

                                     03CA   443 50$:					; VERIFY SUBJECT SERVICE

   00000000'8F            50     D1  03CA   444 	CMPL	R0,#SS$_NORMAL		; CODE RETURNED = CODE EXPECTED  ?

                          61     13  03D1   445 	BEQL	60$			; YES -- MORE TO VERIFY

   00000000'EF   00000000'8F     D0  03D3   446 	MOVL	#SS$_NORMAL,EXPV 	; NO -- LOAD UP EXPECTED AND

   00000000'EF            50     D0  03DE   447 	MOVL	R0,RECV			; ... RECEIVED VALUES, THEN EXIT

                                     03E5   448 	ERR_EXIT LONG,<INCORRECT STATUS CODE RETURNED FROM ADJWSL>

                                     0434   449 60$:

            51   000000B8'EF42   D0  0434   450 	MOVL	COND1_E[R2],R1		; GET EXPECTED VALUE SAFELY INTO REGISTER

            61   0000000C'EF     D1  043C   451 	CMPL	WSETLM,(R1)		; IS COMPUTED W.S. VALUE = THAT EXPECTED ?

                          03     12  0443   452 	BNEQ	65$			; NO -- COULD BE AN ERROR

                          007E   31  0445   453 	BRW	80$			; YES -- ON TO MORE VERIFICATION

                                     0448   454 65$:

                          52     95  0448   455 	TSTB	R2			; FIRST CONDITION 1 ELEMENT ?

                          1A     12  044A   456 	BNEQ	70$			; NO -- THEN IT REALLY IS AN ERROR

   00000010'EF   0000000C'EF     D1  044C   457 	CMPL	WSETLM,WSETENTR		; IS W.S. AT ENTRY VALUE ?

                          0D     12  0457   458 	BNEQ	70$			; NO -- THAT'S AN ERROR

   00000018'EF   00000010'EF     D1  0459   459 	CMPL	WSETENTR,WSETULIM 	; IS W.S. AT UPPER LIMIT ?

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page  14

1.0             VERIFY                                                                                                           (1)



                          60     13  0464   460 	BEQL	80$			; YES -- THEN IT'S OK

                                     0466   461 70$:

   00000000'EF            61     D0  0466   462 	MOVL	(R1),EXPV		; LOAD EXPECTED AND

   00000000'EF   0000000C'EF     D0  046D   463 	MOVL	WSETLM,RECV		; ... RECEIVED VALUES, THEN EXIT

                                     0478   464 	ERR_EXIT LONG,<INCORRECT WSETLM VALUE RETURNED BY ADJWSL>

                                     04C6   465 80$:

                                     04C6   466 	$ADJWSL_S #0,WSETLM_VFY		; GET CURRENT WSETLM TO VERIFY IT

                                     04D5   467 	SS_CHECK NORMAL			; CHECK NORMAL RETURN

   00000020'EF   0000000C'EF     D1  0503   468 	CMPL	WSETLM,WSETLM_VFY 	; DID ADJWSL REMEMBER W.S. VALUE ?

                          59     13  050E   469 	BEQL	VERIFYX			; YES -- ALL TESTS PASSED

   00000000'EF   0000000C'EF     D0  0510   470 	MOVL	WSETLM,EXPV		; NO -- LOAD EXPECTED AND

   00000000'EF   00000020'EF     D0  051B   471 	MOVL	WSETLM_VFY,RECV		; ... RECEIVED VALUES, THEN EXIT

                                     0526   472 	ERR_EXIT LONG,<WSETLM NOT PRESERVED BY ADJWSL>

                                     0569   473 VERIFYX:

                                 05  0569   474 	RSB				; RETURN TO CALLER

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page  15

1.0             VFY_CLEANUP                                                                                                      (1)



                                     056A   476 	.SBTTL	VFY_CLEANUP

                                     056A   477 ;++

                                     056A   478 ; FUNCTIONAL DESCRIPTION:

                                     056A   479 ;

                                     056A   480 ;		VFY_CLEANUP EXECUTES SYSTEM SERVICES TO UNDO THE

                                     056A   481 ; EFFECT OF THOSE ISSUED IN THE VERIFY SUBROUTINE. VFY_CLEANUP MUST

                                     056A   482 ; ASSUME THAT VERIFY MAY NOT HAVE EXECUTED IN ITS ENTIRETY (IF AN

                                     056A   483 ; ERROR IS FOUND). ALSO, VFY_CLEANUP MAY ISSUE SS_CHECK OR ERR_EXIT

                                     056A   484 ; ONLY AFTER PERFORMING ALL OF ITS CLEANUP OPERATIONS; THIS IS REQUIRED

                                     056A   485 ; IN THE EVENT THAT VFY_CLEANUP IS CALLED DURING ERROR PROCESSING,

                                     056A   486 ; WHEN PERFORMING THE REQUIRED CLEANUP IS MORE IMPORTANT THAN

                                     056A   487 ; POSSIBLY DISCOVERING A SECOND ERROR.

                                     056A   488 ;

                                     056A   489 ; CALLING SEQUENCE:

                                     056A   490 ;

                                     056A   491 ;	BSBW VFY_CLEANUP

                                     056A   492 ;

                                     056A   493 ; INPUT PARAMETERS:

                                     056A   494 ;

                                     056A   495 ;	NONE

                                     056A   496 ;

                                     056A   497 ; IMPLICIT INPUTS:

                                     056A   498 ;

                                     056A   499 ;	R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES

                                     056A   500 ;	  FOR COND TABLES 1,2,3,4,5, RESPECTIVELY.

                                     056A   501 ;	FOR X = 1,2,3,4,5 :

                                     056A   502 ;		CONDX_E - ADDRESS OF TABLE OF DATA VALUES FOR CONDX

                                     056A   503 ;		  TABLE. IF THE CONTEXT OF TABLE X IS A SYSTEM SERVICE

                                     056A   504 ;		  ARGUMENT, THE ARGUMENT NAME MAY BE USED AS A SYNONYM

                                     056A   505 ;		  FOR CONDX_E.

                                     056A   506 ;

                                     056A   507 ; OUTPUT PARAMETERS:

                                     056A   508 ;

                                     056A   509 ;	NONE

                                     056A   510 ;

                                     056A   511 ; IMPLICIT OUTPUTS:

                                     056A   512 ;

                                     056A   513 ;	NONE

                                     056A   514 ;

                                     056A   515 ; COMPLETION CODES:

                                     056A   516 ;

                                     056A   517 ;	EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED.

                                     056A   518 ;

                                     056A   519 ; SIDE EFFECTS:

                                     056A   520 ;

                                     056A   521 ;	SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 

                                     056A   522 ;	(VIA RSB) IF ERROR ENCOUNTERED.

                                     056A   523 ;

                                     056A   524 ;--

                                     056A   525 

                                     056A   526 

                                     056A   527 

                                     056A   528 VFY_CLEANUP::

                                     056A   529 	$ADJWSL_S #0,WSETLM		; GET CURRENT W.S. VALUE

                                     0579   530 	SS_CHECK NORMAL			; CHECK NORMAL RETURN

   00000010'EF   0000000C'EF     C3  05A7   531 	SUBL3	WSETLM,WSETENTR,PAGCNT 	; COMPUTE DISTANCE TO ENTRY VALUE

                 00000008'EF         05B2       

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page  16

1.0             VFY_CLEANUP                                                                                                      (1)



                                     05B7   532 	$ADJWSL_S PAGCNT		; ... AND GO BACK THERE

                                     05C6   533 	SS_CHECK NORMAL			; CHECK NORMAL RETURN

                                 05  05F4   534 	RSB				; RETURN TO CALLER

                                     05F5   535 	.END

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page  17

SYMBOL TABLE                                                                                                                     (1)



$$$$           = 00000530 R     05   LONG           = 00000004  G         PHD$L_R7         000000A4            

$$$CHARS       = 0000001E            MAXPAGCNT        00000051 R     03   PHD$L_R8         000000A8            

$$$CHARS1      = 0000001D            MINPAGCNT        00000055 R     03   PHD$L_R9         000000AC            

$$$CHARS2      = 0000000B            MOD_MSG_CODE     ********   X   05   PHD$L_REFERFLT   00000014            

$$$CHARS3      = 0000001A            MOD_MSG_PRINT    ********   X   05   PHD$L_SSP        00000080            

$$$CHARS4      = 0000000B            MSG1_INP_CTL     00000019 R     03   PHD$L_USP        00000084            

$$$CHARS5      = 00000017            MSG3_ERR_CTL     00000039 RG    03   PHD$L_WSL        00000118            

$$$COND_A      = 00000004            MSG_A            ********   X   05   PHD$M_DALCSTX  = 00000002            

$$$STRINGS     = 00000001            MSG_B            ********   X   05   PHD$M_PFMFLG   = 00000001            

$$$STRINGS2    = 00000005            MSG_CTXT         ********   X   05   PHD$M_WSPEAKCHK= 00000004            

$$T2           = 00000004            NOTARG         = 00000000  G         PHD$Q_PRIVMSK    00000000            

BIT...         = 00000020            NULL           = 00000014  G         PHD$S_ASTLVL   = 00000008            

BYTE           = 00000001  G         ONES             ********   X   05   PHD$S_P0LR     = 00000018            

CFLAG            ********   X   05   OUTPUT_MSG       ********   X   05   PHD$V_ASTLVL   = 00000018            

CHMRTN           ********   X   05   PAGCNT           00000008 R     04   PHD$V_DALCSTX  = 00000001            

CHM_CONT         ********   X   05   PCV              ********   X   05   PHD$V_P0LR     = 00000000            

COMP_SC          ********   X   05   PHD$B_ASTLVL     000000CF            PHD$V_PFMFLG   = 00000000            

COND1            00000206 RG    05   PHD$B_DFPFC      00000038            PHD$V_WSPEAKCHK= 00000002            

COND1_C        = 00000000            PHD$B_PAGFIL     0000001F            PHD$W_ASTLM      00000044            

COND1_CLEANUP    00000207 RG    05   PHD$B_PGTBPFC    00000039            PHD$W_BAK        00000048            

COND1_E          000000B8 R     04   PHD$C_LENGTH     00000118            PHD$W_DFWSCNT    0000001A            

COND1_H          0000003A RG    04   PHD$C_PHDPAGCTX= 00000008            PHD$W_EMPTPG     000000D8            

COND1_T          00000024 R     04   PHD$K_LENGTH     00000118            PHD$W_EXTDYNWS   00000076            

COND1_TAB        0000003B R     04   PHD$L_BIOCNT     00000054            PHD$W_FILLM      00000060            

COND2            00000208 RG    05   PHD$L_CPULIM     00000058            PHD$W_FLAGS      0000003A            

COND2_C        = 00000014            PHD$L_CPUTIM     0000003C            PHD$W_PHVINDEX   00000046            

COND2_CLEANUP    00000209 RG    05   PHD$L_DIOCNT     00000050            PHD$W_PRCLM      00000042            

COND2_H          000000CC RG    04   PHD$L_ESP        0000007C            PHD$W_PST        00000020            

COND2_T          000000CC R     04   PHD$L_FREP0VA    00000028            PHD$W_PSTBASMAX  0000004A            

COND2_TAB        000000CC R     04   PHD$L_FREP1VA    00000030            PHD$W_PSTFREE    00000026            

COND3            0000020A RG    05   PHD$L_FREPTECNT  0000002C            PHD$W_PSTLAST    00000024            

COND3_C        = 00000014            PHD$L_KSP        00000078            PHD$W_PTCNTACT   00000070            

COND3_CLEANUP    0000020B RG    05   PHD$L_P0BR       000000C8            PHD$W_PTCNTLCK   0000006C            

COND3_H          000000CD RG    04   PHD$L_P0LRASTL   000000CC            PHD$W_PTCNTMAX   00000072            

COND3_T          000000CD R     04   PHD$L_P1BR       000000D0            PHD$W_PTCNTVAL   0000006E            

COND3_TAB        000000CD R     04   PHD$L_P1LR       000000D4            PHD$W_QUANT      00000040            

COND4            0000020C RG    05   PHD$L_PAGEFLTS   0000004C            PHD$W_TQLM       00000062            

COND4_C        = 00000014            PHD$L_PAGFIL     0000001C            PHD$W_WSAUTH     0000000A            

COND4_CLEANUP    0000020D RG    05   PHD$L_PC         000000C0            PHD$W_WSDYN      0000000E            

COND4_H          000000CE RG    04   PHD$L_PCB        00000078            PHD$W_WSFLUID    00000074            

COND4_T          000000CE R     04   PHD$L_PGFLCNT    00000034            PHD$W_WSLAST     00000012            

COND4_TAB        000000CE R     04   PHD$L_PGFLQUOTA  0000005C            PHD$W_WSLIST     00000008            

COND5            0000020E RG    05   PHD$L_PSL        000000C4            PHD$W_WSLOCK     0000000C            

COND5_C        = 00000014            PHD$L_PSTBASOFF  00000020            PHD$W_WSLX       0000004A            

COND5_CLEANUP    0000020F RG    05   PHD$L_PTWSLELCK  00000064            PHD$W_WSNEXT     00000010            

COND5_H          000000CF RG    04   PHD$L_PTWSLEVAL  00000068            PHD$W_WSQUOTA    00000018            

COND5_T          000000CF R     04   PHD$L_R0         00000088            PRIVMASK         00000000 R     04   

COND5_TAB        000000CF R     04   PHD$L_R1         0000008C            PROCESS_ERR      ********   X   05   

CTL$GL_PHD       ********   X   05   PHD$L_R10        000000B0            PRV$V_ALLSPOOL = 00000004            

DESC           = 00000010  G         PHD$L_R11        000000B4            PRV$V_BUGCHK   = 00000017            

EFLAG            ********   X   05   PHD$L_R12        000000B8            PRV$V_CMEXEC   = 00000001            

EXPV             ********   X   05   PHD$L_R13        000000BC            PRV$V_CMKRNL   = 00000000            

FAO_DESC         ********   X   05   PHD$L_R2         00000090            PRV$V_DETACH   = 00000005            

FAO_LEN          ********   X   05   PHD$L_R3         00000094            PRV$V_DIAGNOSE = 00000006            

FORM_CONDS       00000210 RG    05   PHD$L_R4         00000098            PRV$V_EXQUOTA  = 00000013            

FORM_CONDSX      000002F9 R     05   PHD$L_R5         0000009C            PRV$V_GROUP    = 00000008            

GBL...         = 00000000            PHD$L_R6         000000A0            PRV$V_GRPNAM   = 00000003            

SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page  18

SYMBOL TABLE                                                                                                                     (1)



PRV$V_LOG_IO   = 00000007            

PRV$V_MOUNT    = 00000011            

PRV$V_NETMBX   = 00000014            

PRV$V_NOACNT   = 00000009            

PRV$V_OPER     = 00000012            

PRV$V_PHY_IO   = 00000016            

PRV$V_PRMCEB   = 0000000A            

PRV$V_PRMGBL   = 00000018            

PRV$V_PRMMBX   = 0000000B            

PRV$V_PSWAPM   = 0000000C            

PRV$V_SETPRI   = 0000000D            

PRV$V_SETPRV   = 0000000E            

PRV$V_SYSGBL   = 00000019            

PRV$V_SYSNAM   = 00000002            

PRV$V_TMPMBX   = 0000000F            

PRV$V_VOLPRO   = 00000015            

PRV$V_WORLD    = 00000010            

QUAD           = 00000008  G         

RECV             ********   X   05   

REST_REGS        ********   X   05   

SAVE_REGS        ********   X   05   

SS$_NORMAL       ********   X   05   

SUCCESS          ********   X   05   

SYS$ADJWSL       ********   X   05   

SYS$CMKRNL       ********   X   05   

SYS$FAO          ********   X   05   

SYS$SETPRN       ********   X   05   

TESTNUM          ********   X   05   

TEST_MOD_NAME    00000000 RG    03   

TEST_MOD_NAME_D  00000009 R     03   

TEST_MOD_SUCC    ********   X   05   

TMD_ADDR         ********   X   05   

TM_CLEANUP       000001D4 RG    05   

TM_SETUP         00000000 RG    05   

VERIFY           000002FA RG    05   

VERIFYX          00000569 R     05   

VFY_CLEANUP      0000056A RG    05   

WORD           = 00000002  G         

WRITE_MSG2       ********   X   05   

WSETENTR         00000010 R     04   

WSETENTR_P1      00000014 R     04   

WSETLLIM         0000001C R     04   

WSETLM           0000000C R     04   

WSETLM_VFY       00000020 R     04   

WSETULIM         00000018 R     04   





PROGRAM SECTION SYNOPSIS



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

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

$ABS$            0000011C      02     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

RODATA           00000059      03     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD  NOWRT LONG  

RWDATA           000000D0      04     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD    WRT LONG  

SATSSS81         000005F5      05     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT BYTE  





SATSSS81        SATS SYSTEM SERVICE TESTS  $ADJWSL (SUCC S.C.)   22-AUG-1978 04:18:54   VAX-11 MACRO X0.3-11               Page  19

PROGRAM SECTION SYNOPSIS                                                                                                         (1)



THERE WERE NO ERRORS OR WARNINGS.

15924. BYTES LEFT IN FREE MEMORY POOL.

450. BYTES OF RECLAIMED MEMORY.

OBJ$:SATSSS81,LIS$:SATSSS81/-SP=EXECML$/ML,LIB$:SYSTST.MLB/ML,SRC$:SATSSS81

31 MLB DIR RDS - 602 GETS TO DEFINE 22 MACROS. 29 INTER. FILE WRITES. 

