SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (1)      48  DECLARATIONS

   (1)      79  CONDITION TABLES

   (1)     104  TM_SETUP, TM_CLEANUP

   (1)     188  CONDITION SUBROUTINES - SETUP AND CLEANUP 

   (1)     258  FORM_CONDS

   (1)     351  VERIFY

   (1)     452  VFY_CLEANUP

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page   1

1.0                                                                                                                              (1)



                                     0000     1 	.TITLE	SATSSS55 SATS SYSTEM SERVICE TESTS  $READEF (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 SATSSS55 TO TEST SUCCESSFUL

                                     0000    30 ; OPERATION OF THE $READEF 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: OCT, 1977

                                     0000    41 ;

                                     0000    42 ; MODIFIED BY:

                                     0000    43 ;

                                     0000    44 ;	, : VERSION

                                     0000    45 ; 01	- 

                                     0000    46 ;--

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   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 ;

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   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,<SATSSS55>	; TEST MODULE NAME

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

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

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

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

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

52 54 53 20 4D 4F 44 4E 41 52 20 41  0051    71 SET_CLR_MASK:	.ASCII	/A RANDOM STRING / ; BIT STRING TO DEFINE 4 CLUSTERS

                        20 47 4E 49  005D       

                                     0061    72 CLUS2_NAME:	STRING	I,<SATSSS55_CL2> ; CLUSTER 2 NAME

                                     0075    73 CLUS3_NAME:	STRING	I,<SATSSS55_CL3> ; CLUSTER 3 NAME

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page   4

1.0             DECLARATIONS                                                                                                     (1)



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

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

                           0000000C  0008    77 CURR_STATE:	.BLKL	1		; CURRENT STATE OF CURRENT CLUSTER

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page   5

1.0             CONDITION TABLES                                                                                                 (1)



                                     000C    79 	.SBTTL	CONDITION TABLES

                                     000C    80 ;

                                     000C    81 ;	***** CONDITION TABLES FOR READEF SYSTEM SERVICE *****

                                     000C    82 ;

                                     000C    83 	COND	1,NOTARG,<CLUSTER NUMBER>,-

                                     000C    84 		  <CLUSTER 0 (PROCESS-LOCAL)>,-

                                     000C    85 		  <CLUSTER 1 (PROCESS-LOCAL)>,-

                                     000C    86 		  <CLUSTER 2 (COMMON)>,-

                                     000C    87 		  <CLUSTER 3 (COMMON)>,-

                                     000C    88  

                                 00  0086    89 		    .BYTE 0	; CLUSTER NUMBER 0

                                 01  0087    90 		    .BYTE 1	; CLUSTER NUMBER 1

                                 02  0088    91 		    .BYTE 2	; CLUSTER NUMBER 2

                                 03  0089    92 		    .BYTE 3	; CLUSTER NUMBER 3

                                     008A    93 ;

                                     008A    94 	COND	2,NULL

                                     008B    95  

                                     008B    96 	COND	3,NULL

                                     008C    97  

                                     008C    98 	COND	4,NULL

                                     008D    99  

                                     008D   100 	COND	5,NULL

                                     008E   101  

                                 00000000   102 	.PSECT	SATSSS55,RD,WRT,EXE

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page   6

1.0             TM_SETUP, TM_CLEANUP                                                                                             (1)



                                     0000   104 	.SBTTL	TM_SETUP, TM_CLEANUP

                                     0000   105 ;++

                                     0000   106 ; FUNCTIONAL DESCRIPTION:

                                     0000   107 ;

                                     0000   108 ;		TM_SETUP AND TM_CLEANUP ARE CALLED TO PERFORM

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

                                     0000   110 ; TEST MODULE EXECUTION.

                                     0000   111 ;

                                     0000   112 ; CALLING SEQUENCE:

                                     0000   113 ;

                                     0000   114 ;	BSBW TM_SETUP   BSBW TM_CLEANUP

                                     0000   115 ;

                                     0000   116 ; INPUT PARAMETERS:

                                     0000   117 ;

                                     0000   118 ;	NONE

                                     0000   119 ;

                                     0000   120 ; IMPLICIT INPUTS:

                                     0000   121 ;

                                     0000   122 ;	NONE

                                     0000   123 ;

                                     0000   124 ; OUTPUT PARAMETERS:

                                     0000   125 ;

                                     0000   126 ;	NONE

                                     0000   127 ;

                                     0000   128 ; IMPLICIT OUTPUTS:

                                     0000   129 ;

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

                                     0000   131 ;		   ALL PRIVILEGES ACQUIRED.

                                     0000   132 ;

                                     0000   133 ; COMPLETION CODES:

                                     0000   134 ;

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

                                     0000   136 ;

                                     0000   137 ; SIDE EFFECTS:

                                     0000   138 ;

                                     0000   139 ;	SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 

                                     0000   140 ;	(VIA RSB) IF ERROR ENCOUNTERED.

                                     0000   141 ;

                                     0000   142 ;--

                                     0000   143 

                                     0000   144 

                                     0000   145 

                                     0000   146 TM_SETUP::

                          52     D4  0000   147 	CLRL	R2			; INITIALIZE

                          53     D4  0002   148 	CLRL	R3			; .. CONDITION

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

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

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

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

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

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

   00000000'EF            03         001F       

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

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

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

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

                                     0057   159 	PRIV	ADD,ALL			; GET ALL PRIVILEGES

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page   7

1.0             TM_SETUP, TM_CLEANUP                                                                                             (1)



                                     0080   160 	$SETPRN_S TEST_MOD_NAME_D 	; SET PROCESS NAME

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

            5A            01     90  00BB   162 	MOVB	#1,R10			; INDICATE 1ST SETUP PASS

                                     00BE   163 10$:

                                     00BE   164 	$ASCEFC_S EFN=#64, NAME=CLUS2_NAME ; ASSOCIATE CLUSTER 2

                                     00D5   165 	SS_CHECK NORMAL			; CHECK ITS COMPLETION

                                     0103   166 	$ASCEFC_S EFN=#96, NAME=CLUS3_NAME ; ASSOCIATE CLUSTER 3

                                     011A   167 	SS_CHECK NORMAL			; CHECK ITS COMPLETION

                          58     D4  0148   168 	CLRL	R8			; INDICATE EVENT FLAG 0

                                     014A   169 20$:

   00000051'EF            58     E0  014A   170 	BBS	R8,SET_CLR_MASK,30$ 	; $SETEF IF BIT FOR THIS FLAG IS SET

                          3A         0151       

                                     0152   171 	$CLREF_S EFN=R8			; ... OTHERWISE, ISSUE $CLREF

            68            50     E8  015B   172 	BLBS	R0,40$			; IF NORMAL COMPL'N, PROCESS NEXT EVENT FLAG

                                     015E   173 	SS_CHECK NORMAL			; USE SS_CHECK TO TERMINATE TEST MODULE

                                     018C   174 30$:

                                     018C   175 	$SETEF_S EFN=R8			; SET CURRENT EVENT FLAG

            2E            50     E8  0195   176 	BLBS	R0,40$			; IF NORMAL COMPL'N, PROCESS NEXT EVENT FLAG

                                     0198   177 	SS_CHECK NORMAL			; USE SS_CHECK TO TERMINATE TEST MODULE

                                     01C6   178 40$:

            01       007F 8F     3D  01C6   179 	ACBW	#127,#1,R8,20$		; GO DO NEXT EVENT FLAG

            FF7C          58         01CB       

            01            02     9D  01CE   180 	ACBB	#2,#1,R10,10$		; LOOP THROUGH SETUP CODE TWICE

            FEEA          5A         01D1       

                                 05  01D4   181 	RSB				; RETURN TO MAIN ROUTINE

                                     01D5   182 TM_CLEANUP::

                                     01D5   183 	$DACEFC_S  EFN=#64	; DISASSOCIATE CLUSTER 2

                                     01E2   184 	$DACEFC_S  EFN=#96	; DISASSOCIATE CLUSTER 3

                          FE0E'  30  01EF   185 	BSBW	MOD_MSG_PRINT		; PRINT TEST MODULE END MSG

                                 05  01F2   186 	RSB				; RETURN TO MAIN ROUTINE

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page   8

1.0             CONDITION SUBROUTINES - SETUP AND CLEANUP                                                                        (1)



                                     01F3   188 	.SBTTL	CONDITION SUBROUTINES - SETUP AND CLEANUP 

                                     01F3   189 ;++

                                     01F3   190 ; FUNCTIONAL DESCRIPTION:

                                     01F3   191 ;

                                     01F3   192 ;		CONDX AND CONDX_CLEANUP ARE SUBROUTINES WHICH ARE EXECUTED

                                     01F3   193 ; BEFORE AND AFTER THE VERIFY SUBROUTINE, RESPECTIVELY, WHENEVER A NEW

                                     01F3   194 ; CONDITION X VALUE IS SELECTED (SEE FUNCTIONAL DESCRIPTION OF SUCCOMMON

                                     01F3   195 ; ROUTINE IN SUCCOMMON.MAR). ANY SETUP FUNCTION PARTICULAR TO THE 

                                     01F3   196 ; CONDITION X TABLE IS INCLUDED IN THE CONDX SUBROUTINE AND CLEANED

                                     01F3   197 ; UP, IF NECESSARY, IN THE CONDX_CLEANUP SUBROUTINE. THIS INCLUDES,

                                     01F3   198 ; ESPECIALLY, CODE TO DETECT CONFLICTS AMONG CURRENT ENTRIES IN TWO

                                     01F3   199 ; OR MORE CONDITION TABLES. IF A CONFLICT IS DETECTED, A NON-ZERO

                                     01F3   200 ; VALUE IS STORED INTO CONFLICT, WHICH CAUSES THE CALLING ROUTINE

                                     01F3   201 ; (SUCCOMMON) TO SKIP THE CURRENT ENTRY IN THE CONDITION X TABLE.

                                     01F3   202 ;

                                     01F3   203 ; CALLING SEQUENCE:

                                     01F3   204 ;

                                     01F3   205 ;	BSBW CONDX   BSBW CONDX_CLEANUP

                                     01F3   206 ;	  WHERE X = 1,2,3,4,5

                                     01F3   207 ;

                                     01F3   208 ; INPUT PARAMETERS:

                                     01F3   209 ;

                                     01F3   210 ;	CONFLICT = 0

                                     01F3   211 ;

                                     01F3   212 ; IMPLICIT INPUTS:

                                     01F3   213 ;

                                     01F3   214 ;	R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES

                                     01F3   215 ;	  FOR COND TABLES 1,2,3,4,5, RESPECTIVELY.

                                     01F3   216 ;

                                     01F3   217 ; OUTPUT PARAMETERS:

                                     01F3   218 ;

                                     01F3   219 ;	CONFLICT SET TO NON-ZERO IF COND TABLE CONFLICT DETECTED.

                                     01F3   220 ;

                                     01F3   221 ; IMPLICIT OUTPUTS:

                                     01F3   222 ;

                                     01F3   223 ;	R2,3,4,5,6 PRESERVED

                                     01F3   224 ;

                                     01F3   225 ; COMPLETION CODES:

                                     01F3   226 ;

                                     01F3   227 ;	NONE

                                     01F3   228 ;

                                     01F3   229 ; SIDE EFFECTS:

                                     01F3   230 ;

                                     01F3   231 ;	NONE

                                     01F3   232 ;

                                     01F3   233 ;--

                                     01F3   234 

                                     01F3   235 

                                     01F3   236 

                                     01F3   237 COND1::

                                 05  01F3   238 	RSB				; RETURN TO MAIN ROUTINE

                                     01F4   239 COND1_CLEANUP::

                                 05  01F4   240 	RSB				; RETURN TO MAIN ROUTINE

                                     01F5   241 COND2::

                                 05  01F5   242 	RSB				; RETURN TO MAIN ROUTINE

                                     01F6   243 COND2_CLEANUP::

                                 05  01F6   244 	RSB				; RETURN TO MAIN ROUTINE

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page   9

1.0             CONDITION SUBROUTINES - SETUP AND CLEANUP                                                                        (1)



                                     01F7   245 COND3::

                                 05  01F7   246 	RSB				; RETURN TO MAIN ROUTINE

                                     01F8   247 COND3_CLEANUP::

                                 05  01F8   248 	RSB				; RETURN TO MAIN ROUTINE

                                     01F9   249 COND4::

                                 05  01F9   250 	RSB				; RETURN TO MAIN ROUTINE

                                     01FA   251 COND4_CLEANUP::

                                 05  01FA   252 	RSB				; RETURN TO MAIN ROUTINE

                                     01FB   253 COND5::

                                 05  01FB   254 	RSB				; RETURN TO MAIN ROUTINE

                                     01FC   255 COND5_CLEANUP::

                                 05  01FC   256 	RSB				; RETURN TO MAIN ROUTINE

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page  10

1.0             FORM_CONDS                                                                                                       (1)



                                     01FD   258 	.SBTTL	FORM_CONDS

                                     01FD   259 ;++

                                     01FD   260 ; FUNCTIONAL DESCRIPTION:

                                     01FD   261 ;

                                     01FD   262 ; 		FORM_CONDS FORMATS AND PRINTS INFORMATION ABOUT

                                     01FD   263 ;  THE CURRENT ELEMENT IN EACH OF THE CONDITION TABLES.

                                     01FD   264 ;

                                     01FD   265 ; CALLING SEQUENCE:

                                     01FD   266 ;

                                     01FD   267 ;	BSBW FORM_CONDS

                                     01FD   268 ;

                                     01FD   269 ; INPUT PARAMETERS:

                                     01FD   270 ;

                                     01FD   271 ;	NONE

                                     01FD   272 ;

                                     01FD   273 ; IMPLICIT INPUTS:

                                     01FD   274 ;

                                     01FD   275 ;	R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES

                                     01FD   276 ;	  FOR COND TABLES 1,2,3,4,5, RESPECTIVELY.

                                     01FD   277 ;	FOR X = 1,2,3,4,5 :

                                     01FD   278 ;		CONDX_T - TITLE TEXT FOR CONDX TABLE

                                     01FD   279 ;		CONDX_TAB - ELEMENT TEXT FOR CONDX TABLE

                                     01FD   280 ;		CONDX_C - CONTEXT OF THE CONDX TABLE

                                     01FD   281 ;		CONDX_E - DATA ELEMENTS OF THE CONDX TABLE

                                     01FD   282 ;

                                     01FD   283 ; OUTPUT PARAMETERS:

                                     01FD   284 ;

                                     01FD   285 ;	NONE

                                     01FD   286 ;

                                     01FD   287 ; IMPLICIT OUTPUTS:

                                     01FD   288 ;

                                     01FD   289 ;	NONE

                                     01FD   290 ;

                                     01FD   291 ; COMPLETION CODES:

                                     01FD   292 ;

                                     01FD   293 ;	NONE

                                     01FD   294 ;

                                     01FD   295 ; SIDE EFFECTS:

                                     01FD   296 ;

                                     01FD   297 ;	NONE

                                     01FD   298 ;

                                     01FD   299 ;--

                                     01FD   300 

                                     01FD   301 

                                     01FD   302 

                                     01FD   303 FORM_CONDS::

                                     01FD   304 	$FAO_S	MSG1_INP_CTL,FAO_LEN,FAO_DESC,TESTNUM

                                     021C   305 					; FORMAT CONDITIONS HEADER MSG

                          FDE1'  30  021C   306 	BSBW	OUTPUT_MSG		; ... AND PRINT IT

            14            00     91  021F   307 	CMPB	#COND1_C,#NULL		; IS CONDITION 1 NULL ?

                          03     12  0222   308 	BNEQU	10$			; NO -- CONTINUE

                          00BF   31  0224   309 	BRW	FORM_CONDSX		; YES -- SUBROUTINE IS FINISHED

                                     0227   310 10$:

   00000000'EF   0000000C'EF     DE  0227   311 	MOVAL	COND1_T,MSG_A		; SAVE ADDRESS OF CONDITION 1 TITLE FOR FAO

   00000000'EF   0000001C'EF42   D0  0232   312 	MOVL	COND1_TAB[R2],MSG_B 	; SAVE ADDR OF COND 1 CURR TEXT ELT FOR FAO

   00000000'EF            00     90  023E   313 	MOVB	#COND1_C,MSG_CTXT 	; SAVE CONDITION 1 CONTEXT FOR FAO

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

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page  11

1.0             FORM_CONDS                                                                                                       (1)



                          FDB8'  30  0245   315 	BSBW	WRITE_MSG2		; FORMAT AND WRITE CONDITION 1 MSG

            14            14     91  0248   316 	CMPB	#COND2_C,#NULL		; IS CONDITION 2 NULL ?

                          03     12  024B   317 	BNEQU	20$			; NO -- CONTINUE

                          0096   31  024D   318 	BRW	FORM_CONDSX		; YES -- SUBROUTINE IS FINISHED

                                     0250   319 20$:

   00000000'EF   0000008A'EF     DE  0250   320 	MOVAL	COND2_T,MSG_A		; SAVE ADDRESS OF CONDITION 2 TITLE FOR FAO

   00000000'EF   0000008A'EF43   D0  025B   321 	MOVL	COND2_TAB[R3],MSG_B 	; SAVE ADDR OF COND 2 CURR TEXT ELT FOR FAO

   00000000'EF            14     90  0267   322 	MOVB	#COND2_C,MSG_CTXT 	; SAVE CONDITION 2 CONTEXT FOR FAO

                                     026E   323 	MOV_VAL	COND2_C,COND2_E[R3],MSG_DATA1 ; GIVE COND 2 DATA VALUE TO FAO

                          FD8F'  30  026E   324 	BSBW	WRITE_MSG2		; FORMAT AND WRITE CONDITION 2 MSG

            14            14     91  0271   325 	CMPB	#COND3_C,#NULL		; IS CONDITION 3 NULL ?

                          03     12  0274   326 	BNEQU	30$			; NO -- CONTINUE

                          006D   31  0276   327 	BRW	FORM_CONDSX		; YES -- SUBROUTINE IS FINISHED

                                     0279   328 30$:

   00000000'EF   0000008B'EF     DE  0279   329 	MOVAL	COND3_T,MSG_A		; SAVE ADDRESS OF CONDITION 3 TITLE FOR FAO

   00000000'EF   0000008B'EF44   D0  0284   330 	MOVL	COND3_TAB[R4],MSG_B 	; SAVE ADDR OF COND 3 CURR TEXT ELT FOR FAO

   00000000'EF            14     90  0290   331 	MOVB	#COND3_C,MSG_CTXT 	; SAVE CONDITION 3 CONTEXT FOR FAO

                                     0297   332 	MOV_VAL	COND3_C,COND3_E[R4],MSG_DATA1 ; GIVE COND 3 DATA VALUE TO FAO

                          FD66'  30  0297   333 	BSBW	WRITE_MSG2		; FORMAT AND WRITE CONDITION 3 MSG

            14            14     91  029A   334 	CMPB	#COND4_C,#NULL		; IS CONDITION 4 NULL ?

                          47     13  029D   335 	BEQLU	FORM_CONDSX		; YES -- SUBROUTINE IS FINISHED

   00000000'EF   0000008C'EF     DE  029F   336 	MOVAL	COND4_T,MSG_A		; SAVE ADDRESS OF CONDITION 4 TITLE FOR FAO

   00000000'EF   0000008C'EF45   D0  02AA   337 	MOVL	COND4_TAB[R5],MSG_B 	; SAVE ADDR OF COND 4 CURR TEXT ELT FOR FAO

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

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

                          FD40'  30  02BD   340 	BSBW	WRITE_MSG2		; FORMAT AND WRITE CONDITION 4 MSG

            14            14     91  02C0   341 	CMPB	#COND5_C,#NULL		; IS CONDITION 5 NULL ?

                          21     13  02C3   342 	BEQLU	FORM_CONDSX		; YES -- SUBROUTINE IS FINISHED

   00000000'EF   0000008D'EF     DE  02C5   343 	MOVAL	COND5_T,MSG_A		; SAVE ADDRESS OF CONDITION 5 TITLE FOR FAO

   00000000'EF   0000008D'EF46   D0  02D0   344 	MOVL	COND5_TAB[R6],MSG_B 	; SAVE ADDR OF COND 5 CURR TEXT ELT FOR FAO

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

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

                          FD1A'  30  02E3   347 	BSBW	WRITE_MSG2		; FORMAT AND WRITE CONDITION 5 MSG

                                     02E6   348 FORM_CONDSX:

                                 05  02E6   349 	RSB				; RETURN TO CALLER

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page  12

1.0             VERIFY                                                                                                           (1)



                                     02E7   351 	.SBTTL	VERIFY

                                     02E7   352 ;++

                                     02E7   353 ; FUNCTIONAL DESCRIPTION:

                                     02E7   354 ;

                                     02E7   355 ;		VERIFY IS CALLED ONCE FOR EACH COMBINATION OF CONDITION

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

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

                                     02E7   358 ; SPECIFIED BY THE COND TABLES AND ISSUES THE SUBJECT SYSTEM SERVICE

                                     02E7   359 ; ($READEF). THEN, THE SUCCESSFUL OPERATION OF THE SERVICE IS VERIFIED

                                     02E7   360 ; BY EXAMINING THE STATUS CODE RETURNED, THE VALUES FOR RETURN ARGUMENTS

                                     02E7   361 ; AND THE FUNCTIONALITY PERFORMED. THE EXAMINATIONS TAKE THE FORM OF 

                                     02E7   362 ; COMPARISONS AGAINST EXPECTED VALUES. ANY FAILING COMPARISON CAUSES AN

                                     02E7   363 ; ERR_EXIT MACRO TO BE EXECUTED (EITHER DIRECTLY, OR INDIRECTLY,

                                     02E7   364 ; THROUGH THE SS_CHECK MACRO); ERR_EXIT SETS EFLAG TO NON-ZERO,

                                     02E7   365 ; PRINTS ERROR MESSAGES AND CAUSES AN IMMEDIATE RSB TO CALLER.

                                     02E7   366 ; WHEN ERR_EXIT IS EXECUTED, FURTHER CALLS TO VERIFY ARE SUPPRESSED,

                                     02E7   367 ; AND, AFTER EXECUTING CLEANUP SUBROUTINES, THE IMAGE EXITS.

                                     02E7   368 ;

                                     02E7   369 ; CALLING SEQUENCE:

                                     02E7   370 ;

                                     02E7   371 ;	BSBW VERIFY

                                     02E7   372 ;

                                     02E7   373 ; INPUT PARAMETERS:

                                     02E7   374 ;

                                     02E7   375 ;	NONE

                                     02E7   376 ;

                                     02E7   377 ; IMPLICIT INPUTS:

                                     02E7   378 ;

                                     02E7   379 ;	R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES

                                     02E7   380 ;	  FOR COND TABLES 1,2,3,4,5, RESPECTIVELY.

                                     02E7   381 ;	FOR X = 1,2,3,4,5 :

                                     02E7   382 ;		CONDX_E - ADDRESS OF TABLE OF DATA VALUES FOR CONDX

                                     02E7   383 ;		  TABLE. IF THE CONTEXT OF TABLE X IS A SYSTEM SERVICE

                                     02E7   384 ;		  ARGUMENT, THE ARGUMENT NAME MAY BE USED AS A SYNONYM

                                     02E7   385 ;		  FOR CONDX_E.

                                     02E7   386 ;

                                     02E7   387 ; OUTPUT PARAMETERS:

                                     02E7   388 ;

                                     02E7   389 ;	NONE

                                     02E7   390 ;

                                     02E7   391 ; IMPLICIT OUTPUTS:

                                     02E7   392 ;

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

                                     02E7   394 ;	IT MERELY RETURNS TO CALLER NORMALLY AFTER THE TESTS, PROVIDING

                                     02E7   395 ;	ALL WERE SUCCESSFUL; IF AN ERROR IS DISCOVERED, RETURN IS VIA

                                     02E7   396 ;	AN ERR_EXIT OR SS_CHECK MACRO, BOTH OF WHICH DOCUMENT DETECTED

                                     02E7   397 ;	ERRORS.

                                     02E7   398 ;

                                     02E7   399 ; COMPLETION CODES:

                                     02E7   400 ;

                                     02E7   401 ;	EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED.

                                     02E7   402 ;

                                     02E7   403 ; SIDE EFFECTS:

                                     02E7   404 ;

                                     02E7   405 ;	SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 

                                     02E7   406 ;	(VIA RSB) IF ERROR ENCOUNTERED.

                                     02E7   407 ;

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page  13

1.0             VERIFY                                                                                                           (1)



                                     02E7   408 ;--

                                     02E7   409 

                                     02E7   410 

                                     02E7   411 

                                     02E7   412 VERIFY::

                 00000000'EF     95  02E7   413 	TSTB	CFLAG			; SHOULD CONDITIONS BE PRINTED ?

                          03     13  02ED   414 	BEQL	5$			; NO -- CONTINUE

                          FF0B   30  02EF   415 	BSBW	FORM_CONDS		; YES -- FMT & PRINT ALL CONDS FOR THIS T.C.

                                     02F2   416 5$:

            58   00000086'EF42   9A  02F2   417 	MOVZBL	COND1_E[R2],R8		; GET CLUSTER NO. INTO REGISTER

            58            05     78  02FA   418 	ASHL	#5,R8,R9		; MULT BY 32 TO GET 1ST EVENT FLAG NO.

                          59         02FD       

            59            1F     C1  02FE   419 	ADDL3	#31,R9,R10		; ESTABLISH HIGH EFN FOR THIS CLUSTER

                          5A         0301       

            57            20     90  0302   420 	MOVB	#32,R7			; SET UP LENGTH AND ...

            5B   00000051'EF48   D0  0305   421 	MOVL	SET_CLR_MASK[R8],R11 	; ... MASK FOR LATER COMPARE

                          58     D5  030D   422 	TSTL	R8			; IS THIS CLUSTER 0 ?

                          0B     12  030F   423 	BNEQU	10$			; NO -- CONTINUE

            57            18     90  0311   424 	MOVB	#24,R7			; YES -- COMPARE ONLY 24 EVENT FLAGS

            18            00     EF  0314   425 	EXTZV	#0,#24,R11,R11		; ZERO HIGH-BYTE OF MASK REGISTER

            5B            5B         0317       

            5A            17     9A  0319   426 	MOVZBL	#23,R10			; DO NOT READEF FOR EV FLAGS 24 - 31

                                     031C   427 10$:

                                     031C   428 ;

                                     031C   429 ; ****** SYSTEM SERVICE CALL WHICH IS THE SUBJECT OF THIS TEST CASE ******

                                     031C   430 ;

                                     031C   431 	$READEF_S EFN=R9, STATE=CURR_STATE  ; GET STATE OF CURRENT EF

   00000051'EF            59     E0  032B   432 	BBS	R9,SET_CLR_MASK,20$ 	; BRANCH IF CURR EF SHOULD BE SET

                          0D         0332       

   00000000'EF   00000000'8F     D0  0333   433 	MOVL	#SS$_WASCLR,EXPV 	; INDICATE EXPECTED STATUS CODE

                          0B     11  033E   434 	BRB	30$			; ... AND GO TEST FOR IT

                                     0340   435 20$:

   00000000'EF   00000000'8F     D0  0340   436 	MOVL	#SS$_WASSET,EXPV 	; INDICATE EXPECTED STATUS CODE

                                     034B   437 30$:

   00000000'EF            50     D1  034B   438 	CMPL	R0,EXPV			; CODE RECEIVED = CODE EXPECTED ?

                          56     13  0352   439 	BEQLU	40$			; YES -- CONTINUE

   00000000'EF            50     D0  0354   440 	MOVL	R0,RECV			; NO -- LOAD RECV'D VALUE, THEN EXIT

                                     035B   441 	ERR_EXIT LONG,<INCORRECT STATUS CODE RETURNED FROM READEF>

                                     03AA   442 40$:

            57            00     ED  03AA   443 	CMPZV	#0,R7,CURR_STATE,R11 	; IS CURR CLUSTER = THAT EXPECTED ?

            5B   00000008'EF         03AD       

                          5C     13  03B3   444 	BEQLU	50$			; YES -- GO READ NEXT EF IN THIS CLUSTER

   00000000'EF            5B     D0  03B5   445 	MOVL	R11,EXPV		; LOAD UP EXPECTED AND ...

   00000000'EF   00000008'EF     D0  03BC   446 	MOVL	CURR_STATE,RECV		; ... RECEIVED VALUES, THEN EXIT

                                     03C7   447 	ERR_EXIT LONG,<UNEXPECTED CLUSTER STATE AFTER READEF>

                                     0411   448 50$:

            01            5A     9D  0411   449 	ACBB	R10,#1,R9,10$		; LOOP TO READEF UNTIL CLUSTER EXHAUSTED

            FF05          59         0414       

                                 05  0417   450 	RSB				; RETURN TO CALLER

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page  14

1.0             VFY_CLEANUP                                                                                                      (1)



                                     0418   452 	.SBTTL	VFY_CLEANUP

                                     0418   453 ;++

                                     0418   454 ; FUNCTIONAL DESCRIPTION:

                                     0418   455 ;

                                     0418   456 ;		VFY_CLEANUP EXECUTES SYSTEM SERVICES TO UNDO THE

                                     0418   457 ; EFFECT OF THOSE ISSUED IN THE VERIFY SUBROUTINE. VFY_CLEANUP MUST

                                     0418   458 ; ASSUME THAT VERIFY MAY NOT HAVE EXECUTED IN ITS ENTIRETY (IF AN

                                     0418   459 ; ERROR IS FOUND). ALSO, VFY_CLEANUP MAY ISSUE SS_CHECK OR ERR_EXIT

                                     0418   460 ; ONLY AFTER PERFORMING ALL OF ITS CLEANUP OPERATIONS; THIS IS REQUIRED

                                     0418   461 ; IN THE EVENT THAT VFY_CLEANUP IS CALLED DURING ERROR PROCESSING,

                                     0418   462 ; WHEN PERFORMING THE REQUIRED CLEANUP IS MORE IMPORTANT THAN

                                     0418   463 ; POSSIBLY DISCOVERING A SECOND ERROR.

                                     0418   464 ;

                                     0418   465 ; CALLING SEQUENCE:

                                     0418   466 ;

                                     0418   467 ;	BSBW VFY_CLEANUP

                                     0418   468 ;

                                     0418   469 ; INPUT PARAMETERS:

                                     0418   470 ;

                                     0418   471 ;	NONE

                                     0418   472 ;

                                     0418   473 ; IMPLICIT INPUTS:

                                     0418   474 ;

                                     0418   475 ;	R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES

                                     0418   476 ;	  FOR COND TABLES 1,2,3,4,5, RESPECTIVELY.

                                     0418   477 ;	FOR X = 1,2,3,4,5 :

                                     0418   478 ;		CONDX_E - ADDRESS OF TABLE OF DATA VALUES FOR CONDX

                                     0418   479 ;		  TABLE. IF THE CONTEXT OF TABLE X IS A SYSTEM SERVICE

                                     0418   480 ;		  ARGUMENT, THE ARGUMENT NAME MAY BE USED AS A SYNONYM

                                     0418   481 ;		  FOR CONDX_E.

                                     0418   482 ;

                                     0418   483 ; OUTPUT PARAMETERS:

                                     0418   484 ;

                                     0418   485 ;	NONE

                                     0418   486 ;

                                     0418   487 ; IMPLICIT OUTPUTS:

                                     0418   488 ;

                                     0418   489 ;	NONE

                                     0418   490 ;

                                     0418   491 ; COMPLETION CODES:

                                     0418   492 ;

                                     0418   493 ;	EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED.

                                     0418   494 ;

                                     0418   495 ; SIDE EFFECTS:

                                     0418   496 ;

                                     0418   497 ;	SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 

                                     0418   498 ;	(VIA RSB) IF ERROR ENCOUNTERED.

                                     0418   499 ;

                                     0418   500 ;--

                                     0418   501 

                                     0418   502 

                                     0418   503 

                                     0418   504 VFY_CLEANUP::

                                 05  0418   505 	RSB				; RETURN TO CALLER

                                     0419   506 	.END

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page  15

SYMBOL TABLE                                                                                                                     (1)



$$$$           = 000003D1 R     05   FORM_CONDS       000001FD RG    05   PHD$L_R7         000000A4            

$$$CHARS       = 00000025            FORM_CONDSX      000002E6 R     05   PHD$L_R8         000000A8            

$$$CHARS1      = 00000019            GBL...         = 00000000            PHD$L_R9         000000AC            

$$$CHARS2      = 00000019            LONG           = 00000004  G         PHD$L_REFERFLT   00000014            

$$$CHARS3      = 00000012            MOD_MSG_CODE     ********   X   05   PHD$L_SSP        00000080            

$$$CHARS4      = 00000012            MOD_MSG_PRINT    ********   X   05   PHD$L_USP        00000084            

$$$CHARS5      = 00000000            MSG1_INP_CTL     00000019 R     03   PHD$L_WSL        00000118            

$$$COND_A      = 00000003            MSG3_ERR_CTL     00000039 RG    03   PHD$M_DALCSTX  = 00000002            

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

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

$$T2           = 00000004            MSG_CTXT         ********   X   05   PHD$Q_PRIVMSK    00000000            

BIT...         = 00000020            NOTARG         = 00000000  G         PHD$S_ASTLVL   = 00000008            

BYTE           = 00000001  G         NULL           = 00000014  G         PHD$S_P0LR     = 00000018            

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

CHMRTN           ********   X   05   OUTPUT_MSG       ********   X   05   PHD$V_DALCSTX  = 00000001            

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

CLUS2_NAME       00000061 R     03   PHD$B_ASTLVL     000000CF            PHD$V_PFMFLG   = 00000000            

CLUS3_NAME       00000075 R     03   PHD$B_DFPFC      00000038            PHD$V_WSPEAKCHK= 00000002            

COMP_SC          ********   X   05   PHD$B_PAGFIL     0000001F            PHD$W_ASTLM      00000044            

COND1            000001F3 RG    05   PHD$B_PGTBPFC    00000039            PHD$W_BAK        00000048            

COND1_C        = 00000000            PHD$C_LENGTH     00000118            PHD$W_DFWSCNT    0000001A            

COND1_CLEANUP    000001F4 RG    05   PHD$C_PHDPAGCTX= 00000008            PHD$W_EMPTPG     000000D8            

COND1_E          00000086 R     04   PHD$K_LENGTH     00000118            PHD$W_EXTDYNWS   00000076            

COND1_H          0000001B RG    04   PHD$L_BIOCNT     00000054            PHD$W_FILLM      00000060            

COND1_T          0000000C R     04   PHD$L_CPULIM     00000058            PHD$W_FLAGS      0000003A            

COND1_TAB        0000001C R     04   PHD$L_CPUTIM     0000003C            PHD$W_PHVINDEX   00000046            

COND2            000001F5 RG    05   PHD$L_DIOCNT     00000050            PHD$W_PRCLM      00000042            

COND2_C        = 00000014            PHD$L_ESP        0000007C            PHD$W_PST        00000020            

COND2_CLEANUP    000001F6 RG    05   PHD$L_FREP0VA    00000028            PHD$W_PSTBASMAX  0000004A            

COND2_H          0000008A RG    04   PHD$L_FREP1VA    00000030            PHD$W_PSTFREE    00000026            

COND2_T          0000008A R     04   PHD$L_FREPTECNT  0000002C            PHD$W_PSTLAST    00000024            

COND2_TAB        0000008A R     04   PHD$L_KSP        00000078            PHD$W_PTCNTACT   00000070            

COND3            000001F7 RG    05   PHD$L_P0BR       000000C8            PHD$W_PTCNTLCK   0000006C            

COND3_C        = 00000014            PHD$L_P0LRASTL   000000CC            PHD$W_PTCNTMAX   00000072            

COND3_CLEANUP    000001F8 RG    05   PHD$L_P1BR       000000D0            PHD$W_PTCNTVAL   0000006E            

COND3_H          0000008B RG    04   PHD$L_P1LR       000000D4            PHD$W_QUANT      00000040            

COND3_T          0000008B R     04   PHD$L_PAGEFLTS   0000004C            PHD$W_TQLM       00000062            

COND3_TAB        0000008B R     04   PHD$L_PAGFIL     0000001C            PHD$W_WSAUTH     0000000A            

COND4            000001F9 RG    05   PHD$L_PC         000000C0            PHD$W_WSDYN      0000000E            

COND4_C        = 00000014            PHD$L_PCB        00000078            PHD$W_WSFLUID    00000074            

COND4_CLEANUP    000001FA RG    05   PHD$L_PGFLCNT    00000034            PHD$W_WSLAST     00000012            

COND4_H          0000008C RG    04   PHD$L_PGFLQUOTA  0000005C            PHD$W_WSLIST     00000008            

COND4_T          0000008C R     04   PHD$L_PSL        000000C4            PHD$W_WSLOCK     0000000C            

COND4_TAB        0000008C R     04   PHD$L_PSTBASOFF  00000020            PHD$W_WSLX       0000004A            

COND5            000001FB RG    05   PHD$L_PTWSLELCK  00000064            PHD$W_WSNEXT     00000010            

COND5_C        = 00000014            PHD$L_PTWSLEVAL  00000068            PHD$W_WSQUOTA    00000018            

COND5_CLEANUP    000001FC RG    05   PHD$L_R0         00000088            PRIVMASK         00000000 R     04   

COND5_H          0000008D RG    04   PHD$L_R1         0000008C            PROCESS_ERR      ********   X   05   

COND5_T          0000008D R     04   PHD$L_R10        000000B0            PRV$V_ALLSPOOL = 00000004            

COND5_TAB        0000008D R     04   PHD$L_R11        000000B4            PRV$V_BUGCHK   = 00000017            

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

CURR_STATE       00000008 R     04   PHD$L_R13        000000BC            PRV$V_CMKRNL   = 00000000            

DESC           = 00000010  G         PHD$L_R2         00000090            PRV$V_DETACH   = 00000005            

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

EXPV             ********   X   05   PHD$L_R4         00000098            PRV$V_EXQUOTA  = 00000013            

FAO_DESC         ********   X   05   PHD$L_R5         0000009C            PRV$V_GROUP    = 00000008            

FAO_LEN          ********   X   05   PHD$L_R6         000000A0            PRV$V_GRPNAM   = 00000003            

SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page  16

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   

SET_CLR_MASK     00000051 R     03   

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

SS$_WASCLR       ********   X   05   

SS$_WASSET       ********   X   05   

SUCCESS          ********   X   05   

SYS$ASCEFC       ********   X   05   

SYS$CLREF        ********   X   05   

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

SYS$DACEFC       ********   X   05   

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

SYS$READEF       ********   X   05   

SYS$SETEF        ********   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       000001D5 RG    05   

TM_SETUP         00000000 RG    05   

VERIFY           000002E7 RG    05   

VFY_CLEANUP      00000418 RG    05   

WORD           = 00000002  G         

WRITE_MSG2       ********   X   05   





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           00000089      03     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD  NOWRT LONG  

RWDATA           0000008E      04     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD    WRT LONG  

SATSSS55         00000419      05     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT BYTE  





SATSSS55        SATS SYSTEM SERVICE TESTS  $READEF (SUCC S.C.)   22-AUG-1978 04:12:08   VAX-11 MACRO X0.3-11               Page  17

PROGRAM SECTION SYNOPSIS                                                                                                         (1)



THERE WERE NO ERRORS OR WARNINGS.

15522. BYTES LEFT IN FREE MEMORY POOL.

546. BYTES OF RECLAIMED MEMORY.

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

39 MLB DIR RDS - 621 GETS TO DEFINE 26 MACROS. 27 INTER. FILE WRITES. 

