UETMEMY01       VAX/VMS UETP MEMORY MANAGEMENT TEST              22-AUG-1978 03:23:30   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (2)      53  DECLARATIONS AND DATA

   (2)      67  MAIN ROUTINE

UETMEMY01       VAX/VMS UETP MEMORY MANAGEMENT TEST              22-AUG-1978 03:23:30   VAX-11 MACRO X0.3-11               Page   1

1.0                                                                                                                              (1)



                                     0000     1 ;	UETP prefix file (contains macro library file specs).

                                     0000     2 ;

                                     0000     3 	.LIBRARY	/EXECML$/	;SYSTEM MACROS

                                     0000     4 	.LIBRARY	/LIBD$:[SYSTST.OBJ]SYSTST.MLB/ ; PRIVATE UETP,SYSTST LIB

                                     0000     5 	.LIST	MEB

                                     0000     6 ;

                                     0000     1 	.TITLE UETMEMY01  VAX/VMS UETP MEMORY MANAGEMENT TEST

                                     0000     2 	.IDENT /1.0/

                                     0000     3 

                                     0000     4 ;

                                     0000     5 ; COPYRIGHT (C) 1978

                                     0000     6 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754

                                     0000     7 ;

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

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

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

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

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

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

                                     0000    14 ; REMAIN IN DEC.

                                     0000    15 ;

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

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

                                     0000    18 ; CORPORATION.

                                     0000    19 ;

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

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

                                     0000    22 ;

                                     0000    23 

                                     0000    24 ;++

                                     0000    25 ; FACILITY:

                                     0000    26 ; 	THIS MODULE WILL BE DISTRIBUTED WITH VAX/VMS UNDER THE UETP UIC.

                                     0000    27 ;

                                     0000    28 ; ABSTRACT:

                                     0000    29 ;	THIS MODULE IS A TEST OF MEMORY MANAGEMENT SERVICES. IT CAUSES

                                     0000    30 ;	PAGING AT A HIGH RATE BY ACCESSING ALL PAGES OF A LARGE VIRTUAL

                                     0000    31 ;	ADDRESS SPACE IN THE PROGRAM P0 REGION. THE SPACE IS AS LARGE

                                     0000    32 ;	AS CAN BE OBTAINED VIA AN $EXPREG SYSTEM SERVICE.

                                     0000    33 ;

                                     0000    34 ;

                                     0000    35 ; ENVIRONMENT:

                                     0000    36 ; 	THE MODULE WILL RUN IN USER ACCESS MODE. 

                                     0000    37 ;

                                     0000    38 ; AUTHOR: DICK BATOR,	 CREATION DATE: MAY 1978

                                     0000    39 ;

                                     0000    40 ; MODIFIED BY:

                                     0000    41 ;

                                     0000    42 ;

                                     0000    43 ;	, : VERSION

                                     0000    44 ;  1.0	-	FIRST RELEASED JUNE-78

                                     0000    45 ;--

UETMEMY01       VAX/VMS UETP MEMORY MANAGEMENT TEST              22-AUG-1978 03:23:30   VAX-11 MACRO X0.3-11               Page   2

1.0             DECLARATIONS AND DATA                                                                                            (2)



                                     0000    47 	.SBTTL	DECLARATIONS AND DATA

                                     0000    48 ;

                                     0000    49 ; INCLUDE FILES:

                                     0000    50 ;

                                     0000    51 	$SHR_MESSAGES UETP,116,<<BEGIND,INFO>,<ENDEDD,INFO>>

                                     0000       	.SAVE

                                 00000000       	.PSECT	$ABS$,ABS

                                     0000       	.RESTORE

                                     0000    52 ;

                                     0000    53 PROC_NAME: STRING I,<UETMEMY01>		;THIS PROCESS NAME

                           00000009  0000       	.LONG	$$$CHARS

                           00000008' 0004       	.ADDRESS .+4

         31 30 59 4D 45 4D 54 45 55  0008       	.ASCII	\UETMEMY01\

                                     0011    54 ;

                           00000006  0011    55 ITER: .LONG	6			; NUMBER OF TIMES THRU VAS

                           00000000  0015    56 DIEARG: .LONG	0			; PC OF SYSTEM SERVICE ERROR

                           00000021  0019    57 EXPADDR: .BLKL	2			; ADDR OF VAS

                           00001F40  0021    58 PAGES: .LONG	8000			; # XTRA VIRTUAL PGS TO ASK FOR

                                     0025    59 ;

UETMEMY01       VAX/VMS UETP MEMORY MANAGEMENT TEST              22-AUG-1978 03:23:30   VAX-11 MACRO X0.3-11               Page   3

1.0             MAIN ROUTINE                                                                                                     (2)



                                     0025    61 	.SBTTL MAIN ROUTINE

                                 00000000    62 	.PSECT UETMEMY01,EXE,RD,NOWRT

                               0000' 0000    63 	.ENTRY	UETMEMY01,0		; ENTRY MASK

                                     0002    64 ;********************************************************************************

                                     0002    65 ;	THIS MODULE USES MEMORY MANAGEMENT SERVICES INEFFICIENTLY

                                     0002    66 ;	IN ORDER TO CAUSE A LOAD ON SYSTEM PAGING RESOURCES

                                     0002    67 ;********************************************************************************

                                     0002    68 	PUTMSG	<#UETP$_BEGIND,#2,#PROC_NAME,#0> ; GREETINGS

                          00     DD  0002       	  	PUSHL	#0

                 00000000'8F     DD  0004       	  	PUSHL	#PROC_NAME

                          02     DD  000A       	  	PUSHL	#2

                 0074103B 8F     DD  000C       	  	PUSHL	#UETP$_BEGIND

   00000000'9F            04     FB  0012       		CALLS	#$$T1,@#LIB$SIGNAL

                                     0019    69 	$SETPRN_S PROC_NAME		; SET OUR PROCESS NAME

                 00000000'EF     7F  0019       		PUSHAQ	PROC_NAME

   00000000'GF            01     FB  001F       		CALLS	#1,G^SYS$SETPRN

                                     0026    70 	$EXPREG_S PAGES,EXPADDR,,#0	;EXPAND PROG P0 REGION

                          00     DD  0026       		PUSHL	#0

                          00     DD  0028       		PUSHL	#0

                 00000019'EF     7F  002A       		PUSHAQ	EXPADDR

                 00000021'EF     DD  0030       		PUSHL	PAGES

   00000000'GF            04     FB  0036       		CALLS	#4,G^SYS$EXPREG

                                     003D    71 ;

                                     003D    72 ;	LOOP TO MAKE A 9 BYTE ACCESS TO EACH PAGE IN THE VIRTUAL

                                     003D    73 ;	ADDRESS SPACE. DO THIS TO ALL PAGES IN THE RANGE 'ITER' TIMES

                                     003D    74 ;

            57   00000011'EF     D0  003D    75 	MOVL	ITER,R7			; NUMBER OF ITERATIONS THRU VAS

                                     0044    76 INIT_LOOP:

            56   00000019'EF     D0  0044    77 	MOVL	EXPADDR,R6		; INITIAL PAGE TO ACCESS

   00000001'EF46          09     28  004B    78 LOOP:	MOVC3	#9,1[R6],0[R6]		; MOVE 9 BYTES ON CURRENT PAGE

                 00000000'EF46       0053       

            56   00000200 8F     C0  0059    79 	ADDL2	#512,R6			; SELECT NEXT PAGE

   0000001D'EF            56     D1  0060    80 	CMPL	R6,EXPADDR+4		; ARE WE AT HI END OF VAS?

                          E2     15  0067    81 	BLEQ	LOOP			; NO,  DO MORE

            D8            57     F4  0069    82 	SOBGEQ	R7,INIT_LOOP		; YES,  ANY MORE ITERATIONS?

                                     006C    83 ;

                                     006C    84 	PUTMSG	<#UETP$_ENDEDD,#2,#PROC_NAME,#0> ; SAY GOOD BYE

                          00     DD  006C       	  	PUSHL	#0

                 00000000'8F     DD  006E       	  	PUSHL	#PROC_NAME

                          02     DD  0074       	  	PUSHL	#2

                 00741083 8F     DD  0076       	  	PUSHL	#UETP$_ENDEDD

   00000000'9F            04     FB  007C       		CALLS	#$$T1,@#LIB$SIGNAL

                                     0083    85 	$EXIT_S				; E X I T

                          01     DD  0083       		PUSHL	#1

   00000000'GF            01     FB  0085       		CALLS	#1,G^SYS$EXIT

                                     008C    86 	.END	UETMEMY01

UETMEMY01       VAX/VMS UETP MEMORY MANAGEMENT TEST              22-AUG-1978 03:23:30   VAX-11 MACRO X0.3-11               Page   4

SYMBOL TABLE                                                                                                                     (2)



$$$CHARS       = 00000009            SHR$_HASHCONCAT= 000011D8            

$$$STRINGS     = 00000000            SHR$_HIGHVER   = 00001148            

$$T1           = 00000004            SHR$_IDXCONCAT = 00001138            

BIT...         = 00001258            SHR$_INCOMPAT  = 000011E0            

DIEARG           00000015 R     01   SHR$_NEWFILES  = 00001090            

EXPADDR          00000019 R     01   SHR$_NOFILPURG = 00001228            

GBL...         = 00000000            SHR$_NOJOBID   = 000011A0            

INIT_LOOP        00000044 R     03   SHR$_NOJOBNAME = 000011A8            

ITER             00000011 R     01   SHR$_NOQUEUE   = 00001198            

LIB$SIGNAL       ********   X   03   SHR$_NOTCMPLT  = 000011C0            

LOOP             0000004B R     03   SHR$_NOTCOPIED = 000011B8            

PAGES            00000021 R     01   SHR$_NOVALUE   = 00001100            

PROC_NAME        00000000 R     01   SHR$_NOWILD    = 00001128            

SHR$K_SHRDEF   = 00000001            SHR$_OPENIN    = 00001098            

SHR$_ABEND     = 000010D8            SHR$_OPENOUT   = 000010A0            

SHR$_ABENDD    = 000010E0            SHR$_OVERLAY   = 000010A8            

SHR$_ABENDT    = 000010E8            SHR$_PARSEFAIL = 00001248            

SHR$_APPENDEDB = 00001000            SHR$_PURGEVER  = 00001210            

SHR$_APPENDEDR = 00001008            SHR$_READERR   = 000010B0            

SHR$_ATPC      = 00001158            SHR$_RELCONCAT = 00001140            

SHR$_BADBYTE   = 00001010            SHR$_REPLACED  = 000010B8            

SHR$_BADCOPIES = 00001160            SHR$_RMSERROR  = 000011C8            

SHR$_BADDELIM  = 00001118            SHR$_SEARCHFAIL= 00001238            

SHR$_BADFIELD  = 00001018            SHR$_SYNTAX    = 000010F8            

SHR$_BADFORM   = 00001168            SHR$_SYSERROR  = 000011B0            

SHR$_BADJOBID  = 00001170            SHR$_SYSERRORPC= 000010F0            

SHR$_BADJOBNAME= 00001178            SHR$_TEXT      = 00001130            

SHR$_BADKEY    = 00001108            SHR$_UNXPCTSTS = 000011D0            

SHR$_BADLOGIC  = 00001120            SHR$_VALERR    = 000011E8            

SHR$_BADLOGICPC= 00001150            SHR$_WILDCONCAT= 000010C0            

SHR$_BADLONG   = 00001020            SHR$_WILDOUTVER= 000010C8            

SHR$_BADPRTY   = 00001180            SHR$_WRITEERR  = 000010D0            

SHR$_BADQNAME  = 00001188            SYS$EXIT         ********   X   03   

SHR$_BADTIME   = 00001190            SYS$EXPREG       ********   X   03   

SHR$_BADVALUE  = 00001110            SYS$SETPRN       ********   X   03   

SHR$_BADWORD   = 00001028            UETMEMY01        00000000 RG    03   

SHR$_BEGIN     = 00001030            UETP$_BEGIND   = 0074103B            

SHR$_BEGIND    = 00001038            UETP$_ENDEDD   = 00741083            

SHR$_BEGINT    = 00001040            

SHR$_CLICB     = 00001048            

SHR$_CLOSEDEL  = 00001218            

SHR$_CLOSEIN   = 00001050            

SHR$_CLOSEOUT  = 00001058            

SHR$_CONFDEL   = 000011F8            

SHR$_COPIEDB   = 00001060            

SHR$_COPIEDR   = 00001068            

SHR$_CREATED   = 00001070            

SHR$_DELETED   = 00001200            

SHR$_DELINTERR = 00001240            

SHR$_DELVER    = 00001208            

SHR$_DIRTOOBUS = 00001220            

SHR$_ENDED     = 00001078            

SHR$_ENDEDD    = 00001080            

SHR$_ENDEDT    = 00001088            

SHR$_FILNOTDEL = 000011F0            

SHR$_FILNOTPUR = 00001230            

SHR$_FILPURGED = 00001250            

UETMEMY01       VAX/VMS UETP MEMORY MANAGEMENT TEST              22-AUG-1978 03:23:30   VAX-11 MACRO X0.3-11               Page   5

PROGRAM SECTION SYNOPSIS                                                                                                         (2)







PROGRAM SECTION SYNOPSIS



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

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

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

UETMEMY01        0000008C      03     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD  NOWRT BYTE  





THERE WERE NO ERRORS OR WARNINGS.

21744. BYTES LEFT IN FREE MEMORY POOL.

1154. BYTES OF RECLAIMED MEMORY.

OBJ$:UETMEMY01,LIS$:UETMEMY01/-SP=SRC$:UETPLIBS,UETMEMY01

24 MLB DIR RDS - 255 GETS TO DEFINE 16 MACROS. 27 INTER. FILE WRITES. 

