Digital PDFs

AH-T271C-MC

July 1985

419 pages

Original

17MB

view download

OCR Version

14MB

view download

Document:	CZRCFC0 RC25 RC25 FR END TEST JUL 1985 bw
Order Number:	AH-T271C-MC
Revision:	000
Pages:	419
Original Filename:	CZRCFC0__RC25__RC25_FR_END_TEST__AH-T271C-MC__JUL_1985_bw.pdf

OCR Text

RC25 FR END TEST

CZRCFCO

AH-T271C-MC

10F3

JUL 1985

H :

RC25 FR END TEST

CZRCFCO

AH-T271C-MC

20F3

JUL 1985

: COPYR'GHT? 1983-;5

MADE IN USA

SEQ 000

HOOULE AZTECO (

BEGIN
LIBRARY

REQUIRE
:?BTTL

;BET%E ClRCFCO RC2S FR END TEST'
ADDRESSING HOOE

(RELATIVE))=

lubrory'
'BLSMAC.R Q
‘USER OOCUHENTATION'

JOENTIFICATION
PRODUCT

CODE:

AC-T270C-MC

PRODUCT

NAME:

CZRCFCO RC2S FR

PRODUCT

DATE:

MARCH 29,

MAINTAINER:

AUTHOR:

THE

SMALL

END

TEST

1985

STORAGE

ENGINEERING

SING LAKSHMANAN

INFORMATION

THIS

DOCUMENT

SUBJUECT

CHANGE

WITHOUTY

NOTICE
AND
SHOUWD
NOT BE CONSTRUED AS A COMMITMENT B8Y DIGITAL
EQUIPMENT CORPORATION.
DIGITAL EQUIPMENT CORPORATION ASSUMES NO
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT,
NO RESPONSIBILITY

SOFTWARE ON EQUIPMENT
AFFILIATED COMPANIES.

(C)

THE FOLLOWING

DIGITAL
DEC

ASSUMED

THAT

FOR

IS NOT

THE

USE

SUPPLIED

RELIABILITY

B8Y

DIGITAL

1983,1985 BY DIGITAL EQUIPMENT CORPORATION
ARE

TRADEMARKS

PDP
DECUS

DIGITAL

UNIBUS
DECTAPE

EQUIPMENT

CORPORATION:

MASSBUS

OR ITS

Cl
SEQ 0002

UVNaWN=O

CONTENTS

INFORMATION

PROGRAM ABSTRACT

SYSTEM REQUIREMENTS
RELATED DOCUMENTS AND STANDARDS
OIAGNOSTIC HIERARCHY PREREQUISITES
ASSUMPTIONS

OPERATIW INSTRUCTIONS
COMMAND
SHITCHES

FLAGS
HARDWARE

QUESTIONS

ERROR

PERFORMANCE

SOF TWARE QUESTIONS
EXTENDED P-TABLE DIALOGUE
QUICK STARTUP PROCEDURE

DEVICE

NOVAaLNFDO

GENERAL

TEST

NVNNNMNNNRN

et
s pope

TABLE OF

INFORMATION

MAINTENANCE

AND PROGRESS

INFORMATION TABLES

SUMMARIES
HISTORY

REPORTS

1.0 GENERAL INFORMATION
PROGRAM ABSTRACT

1.1
The

SEQ 0003

eztec

front-end host

t:ct.ztcc dis

thet:

e.
b.
c.
d.
The sztec

dJd~ive

diegnostic

subsystem.

Tests

e diagnostic

sre

progrem

performed to verify

test

The processor cen properly communicate with the aztec

through

the

asdepter

The sztec cen seek

card.

and head select properly.

The sztec conforms to the specified seek

rotational

times.

The esztec coen perform certain basic

response

to mecp commends.

and

functions

front-end/host diegnostic consists of one progrem thet

in_the host processor

and progrems

buffer memory through en

that

run

interpreter celled the

the

eztec

runs

controller's

“diegnostic machine”

which resides in the sztec.
The host processor progrem will be
respoisible for testing the aztec adepter, testing some of the drive

functions, downline loeding the “disgnostic machine” programs into
the sztec end sterting their execution.
When the “diegnostic
mechine” progrems ere running, they will control the testing by
requesting the
host processor to supply informetion end print error

messeges.

processor

The

when

"diegnostic mechine” progrems will

test

is complete.

inform the

Up to four (4) aztec controllers with one or two spindles each may
be selected for test by this disgnostic.
One sztec "unit” is defined os @ single platter.
There are two
latters on one spindle in en aztec
drive.
An eztec controller may

eve either one or two drives (two or four platters).

The unit

numbers for the aztec pletters come in pairs.
has an even number ond the fixed media has the
odd number.

The removeble medio
sequentislly following

Software perameter

retries

en error,
seek

ares

set

trace

questions

include number

whether to continue execution after
in the disk,

select menus]l

in case

failures.,

select

intervention test and

mode.

This diagnostic

is divided

into 6

modules:

module O

documentation

module 1

litersls, formet statements, escii text,
global dete, hardwere configurastion questions
end default tebles, softwsre parameter questions
end defeult teble, initislization code, cleanup

code,

summary

report

code

El
SEQ 0004

module 2

globel

routines

module 3

tests 1

module 4

tests 9,10,11,12,13,19,21,.26,27

module S

Last address end setup section

(dm code)

AZTECO.R16 is @ file conteining literuls ond field
delarations used throughout the program.
This diegnostic
runtime services

the

This

interfece to
progrem

hes been
esoftware

written for use
with the diagnostic
(supervisor).
These services provide

the operetor end to the softwere environment.

cen be used with

XXDP.,

ACT,

APT,

slide

end peper

tepe.
For @ complete description of the runtime services, refer
to the XXDP+ user’'s
menuesl. There is @ brief description of
the

1.2

runtime

services

in section 2 of

this document.

SYSTEM REQUIREMENTS

PDP-11

Processor

28K Words of memory (minimum)
XXDP+ Load medis
.
One or more eztec disk drive subsystems
Line clock - either type L or P
Console terminal

1.3

RELATED DOCUMENTS AND STANDARDS

AZTEC - RC25 Functionel specificetion Rev 5, 3/9/82
Mass storege control protocol (MSCP) (version 1.0)

Unibus/Q-bus storage systems port (version 1.3)
Diegnostics end utilities
protocol (R. Lary, Mey 1981)
Aztec disgnostic project plen

Diegnostic engineering functional specification for esztec

Res dent disgnostics
XXDP+ User's menual

1.4

DIAGNOSTIC HIERARCY PREREQUISITES

The bus,

host processor,

memory,

ere all essumed to be functioning

run.
If they ere not,
unpredicteble.

end console

terminal

properly when this diagnostic
of running this program

ASSUMPTIONS

1.5
An

the result

system clocks

aztec

thet meets the

specifications

for

diagnostic machine

will mest the specifications for MSCP timing.

2.0
Tris

timing

OPERATING INSTRUCTIONS
section

for deteiled

conteins

s brief description of the

information,

refer to the XXDP+

runtime

user’'s manual

services.

(CHQUS).

F1
2.1

S€Q 0005

COMMANDS

ere eleven legel commands for the disgnostic runtime services
y
).
.This
section_liste
the commands
end gives
8
very
(supervisor).
brief description of them.
The XXDP+ user’'s menuel hes more deteails.

COMMAND

EFFECT

éffléi--

5;;;£-£;;-;E;;;;;iE;-;;;;-;; initial state

RESTART

Start

CONTINUE

Continue at test thet wes

PROCEED

Continue

eEXIT

Return to XXDP+ monitor (XXDP+ operetion only!)

RDD

Activete @ unit for testing (all
considered to be active at start

OROP

Deectivete o unit

There

stetistical

the diagnostic

Type

ZFLAGS

Cleor all

the

recognized by

type

stete

units
time

(if

ere

implemented

section 4.0)

FLAGS

for example,

interrupted (after

information

Type & list of all device

R command cen be

initializing

all

information

flags

(see

section

2.3)

flegs (see section 2.3)

the

first

“STA"

three

instead

characters.

"START",

SHWITCHES
sre

several

switches which

operation. These

switches are

is designated by

"DDDDD".

All
of
the
legel
description of each.

SWITCH

are used to modify

eappended

to the legal

supervisor

commends.

switches
are
tebuleted below with a brief
In the descriptions below, a decimal number

EFFECT

......................................

/TESTS:LIST

tC)

from en error helt

DISPLAY

So you may,
2.2

the diegnostic without

Execute only those tests specified in
the list.
List is @ string
of test

numbers,

for example

/TESTS:1:5:7-10.

be run.

All other tests will not be run.

This list will cause tests

1,5,7,8,9,10 to

/PASS :DDDOD

Execute DDDOD passes (DDDDD =

/FLAGS:FLGS

Set specified flags.

/EOP :DDDDOD

Report end of pass message after every
DDDDD passes only.
(DODDD = 1 to 64000)

in section 2.3,

to 64000)

flags ere described

G1l
ZUNITS:LISY

TEST/ADD/DROP only
those units specified
in the list.
List
example - /UNITS5:0:5:10-12
use unites 0,5,10,11,12 (unit numbers = 0 63)

Example of switch usege:

START/TESTS:1-5/PASS:1000/L5P:100
The effect of this commend will be:

Tests 1 through 5 will be executed,

Rll

units will

The

end of

3.
A

for

Below

pass messeges will be

printed after each

Switch can be

may,

tested 1000 times.

vecognized by

exemple,

type

100 pesses only.

the

first

"/TES:1-5"

three characters.

instead

You

"/TESTS:1-S",

is & table that specifies which switches can be used by

each command.

TESTS

PASS

FLAGS

START

RESTART

2.3

EOP

UNITS

FLAGS

Flegs are used to set up certein operstional parameters such as

looping
on error.
All flags sre clesred at startup and remain
cleared
until explicitly
set
using the
flags switch. Flags
are
08lso cleared
after
o start
command unless set using the
flag

switch.

The ZFLAGS

command

mag also

be used

to clear

all flegs.
with the exception of the
START and ZFLAGS commands,
No commands affect the state of the flags;
they remain set or
clesred as specified bty the last flag switch,
FLAG

EFFECT

HOE

Halt on error

LOE

Loop on error

IERs

Inhibit all error reports

- control

is returned to

runtime services command mode

SEQ 0006

H1
ISR«

Inhibit
all error reports except first
level
(first level contains error type,

IXRe

number,

PC,

Inhibit

extended error

test and unit)

reports

cailed by PRINTX macro's)

(those

PRI

Direct messages to

line printer

PNT

Print test number as test executes

B80E

"BELL" on error

UAM

Unattended mode (no manual

ISR

Inhibit stetisticel reports (does not apply
to diagnostics which do not support statis-

intervention)

ticel reporting)

IOR

Inhibit progrem dropping of units

ADR

Execute autodrop code

Lo7

Loop on test

EVL

Execute evaluation (on diagnostics which

have eveluation support)

serror messages are described

in section 3.1

See the XXDP. user’'s menual for more details on flegs.
You may
specify
more
then one flag
with the flag switch.
For example,
to
ceuse
the
program to
loop on error, inhibit error reports
end
type & "BELL“
on error,
you mey use the following string:
/FLAGS:LOE:IER:BOE

2.4

HARDWARE QUESTIONS

When 8

the
ou

diegnostic

sterted,

the runtime services will prompt

user for hardware
information by
typing "CHANGE HW (L) 2"
must answer "Y"
after & start command unless the hardware

information

has been

“preloaded” using

the setup utility (see

chapter
6 of
the XXDP+«
wuser’'s menuel). Whenr zou answer this
question with 8 “Y", the runtime services will ask
for the number
of units (IN
DECIMAL).
You will then be asked the following
questions for each unit.
¢ UNITS (D)
Answer wiith

?
the number of units to be

tested (no default).

This

enswer will determine how many times the following questions are
esked.
A unit is a logical disk (single platter) on an aztec.
One to sixteen units may be specified (maximum configuration of
four controllers with four platters per controller).

SEQ 0007

IP ADDRESS (0) 172150 ?
Answer with the

SEQ 0008

address of

the

sztec controller

as addressed by the processor with memory management turned off
(i.e., oan even 16-bit address in the range of
160000 to 177774.)
VECTOR (0) 154

Answer with the interrupt vector address of the sztec controller.
A vector address in the range of 4 to 774 may be specified.

BR LEVEL (D) S?
Answer with the
are accepted.

interrupt priority used by

the

aztec.

levels 4

to 7

UNIT NUMBER(S) (D) 0 ?
answer with the physicel platter number(s) for the platter(s) you wish
to test (NO DEFAULT).
The removable platter is en even number and the
fixed platter

2.5

SOFTWARE QUESTIONS

After

is the sequentially followng odd number.

you have

snswered the hardware questions or

continue command,

the runtime

after

services will ask

a restart

for softwere

parameters.
These paremeters will 2overn some diagnostic specific
operation modes.
You will be prompted by “CHANGE
SW (L) 7" if you
wish to chenge eny paremeters, answer by typing "Y".
The software
questions and the default values sre described in the next paragr-

eph(s).

Use top surface for 8ll single surface tests (L) Y ?
Answer yes to use top surface for all single surface testing.
answer no to use bottom surfece for all single surface testing.

The

tests

affected are

15 thru 18,

thru

and 25.

Do you wish to limit the ares tested in tests 15-18 (L) N ?
Answer yes

if you wish to specify a sterting and ending track

for the

test srea.
this limitation applies only to seek verification testing.
(tests 815 through ¢18). The following two questions will be asked only
if this one is enswered yes. The limits will be 0 and 820 for top
surface and 821 and 1641 for bottom surfeace.
Starting track (D) 0 ?
Answer with the beginning track number of the asres you wish to select
for testing.
This spplies to tests 015 through @18 only. Test 22

will also use this starting track,
instead of track

O or 821.

if you answer this question

Ending track (D) 820 ?
Answer

with

testing.

the

last

track

number

in the

area

This applies to tests #15 through #138

Do you wish to do the manual

you wish

only.

intervention test (L) Y

to select

for

J1
Answer yes to do the test of the write protect switches.
to omit this test.

Do you wish trace mode (L) Y

Answer no

the

Default

2.6

if you do not

is yes.

test

names

Answer no

to be printed out.

EXTENDED P-TABLE DIALOGUE

When you
eanswer the herdware questions, you sre building entries
in
8 table thet dosiqucs the
devices under
test. The
gimplest
way
to build
this
teb I
s
to
enswer
all
questions
for each
unit
to
be
tested.
f you
heve a multiplexed device such as

a
mass storage controller with severel drives or
e communication
device with several lines, this becomes tedious aince most of the
answers are

repetitious.

To
_illustrate a more efficient method, suppose
you sre testin
o
fictional
device,
the XY1ll. Suppose this device consists o
contro]
module with
eight
units isub-devacss) attach’d t? it.

hese units are described
Dy the octal
numbers O through
/.
here
is
one
hardware
Farameter that can vary among units called the
Q-FACTOR.
This Q-FACTOR
may
be O or 1. Below is 8 simple way

to build 8 table for one xyll with eight units.
@ UNITS (D)

8<CR>

UNIT 1
CSR ADDRESS (0)
?
SUB-DEVICE @ (0) 2
Q-FACTOR (0) 0
?
UNIT 2
CSR ADDRESS (0)

?
SUB-DEVICE & (0) ?
2?2
Q-FACTOR (0) 1
UNIT 3

160000<CR>
O<CR>
1<CR>

160000<CR>
1<CR>
0<CR>

2?2
CSR ADDRESS (0)
SUB-DEVICE & (0) 2?2
?
Q-FACTOR (0) 0

160000<CR>
2<CR>
<CR>

UNIT 4
CSR ADDRESS (0)
SUB-DEVICE & (0)
Q-FACTOR (0) 0

?
?
?

160000<CR>
3<CR>
<CR>

UNIT S
?
CSR ADORESS (0)
SUB-DEVICE & (0) ?

160000<CR>
4<CR>

UNIT 6
CSR ADDRESS (0)
SUB-DEVICE @ (0)
Q-FACTOR (0) 0

160000<CR>
S<CR>
<«CR»

Q-FACTOR

(0) 0

?
?
2?2

<«CR>

SEQ 0009

K1
UNIT 7
CSR ADDRESS (0)
?
SUB-DEVICE & (0) ?
Q-FACTOR (0) 0
2?2

160000<CR>
6CR>
1<«CR>

UNIT T 8
CSR RDDRESS (0)
7
SUB-DEVICE @ (0) ?
Q-FACTOR (0) 1
?

160000<CR>
7<CR>
<CR»

SEQ 0010

Notice that the default value for the Q-FACTOR changes when o
non-default response is given.
Be cereful when specifying
multiple units!

As you
can see
from the
sbove example, the hardware parameters
do not very s-gnificontly from unit to unit.
The procedure shown
is not very efficient.

The runtime services cen take multiple unit specifications
however.
Let's build the seme table using the multiple specification feature.

8<CR>

¢ UNITS (D) ?

UNIT 1
CSR ADDRESS (0)
?
SUB-DEVICE & (0) 2
Q-FACTOR (0) O
2?2

160000<CR>
0,1<CR>
1,0¢<CR>

UNIT 3
CSR ADDRESS (0)
SUB-DEVICE @ (0)

160000<CR>
2-5<«CR>

Q-FACTOR (0) 0

?
2
2?2

UNIT 7
?
CSR ADDRESS (0)
SUB-DEVICE & (0) ?
Q-FACTOR (0) 0
2?2
ARs

you can

build as
one
pess
ere built
services
was

see

160000<CR>
6,7<CR>
1<CR>

the sbove dial

the runtime services will

meany entries 8s it can with the informetion given in any
through
the questions.
In
the first pass, two entries
since two sub-devices and Q-FACTORS were specified.
The
assume that
the CSR address is 160000 for both since it

specified only

built.

O<CR>

This

once.

cause

four

the second pess,

sub-devices were

four entries were
specified.

The

"-"
construct tells the
runtime services to increment the dete
from the first number to the second.
In this case, sub-devices
2. 3, 4
and S5 were specified.
(If the sub-device were specified

by
eddresses, the
increment would be by
2 since addresses must
be
on en even boundary.)
The
(SR
eddresses and Q-FACTORS for
the
four entries
ore
sassumed
to be
160000 and 0
respectively
s'nce they were
only
specified
once.
The
last two
units ere
specif'ed in the third pass.

L1
Thf whole process could have been accomplished

below.

@ UNITS (D)

in one pass as shown

8<«CR>

UNIT }
CSR ADDRESS (0)
?
SUB-DEVICE & (0) ?
Q-FACTOR (0) O
7?2

160000<CR>
0-7<CR>
0,1,0,...1,1<CR>

Rs you can see from this example, null replies (commas enclosing

e null field) tell the runtime services to repeat the last reply.
2.7

QUICK START-UP PROCEDURE

(XXDP.)

To stert-up this program:
1. Boot XXDP.

2. Give the date
3.

Type

file

for

“R Neme", where neme

Type

"START*

Answer the

Answer all the hardwere questions

Answer the

this progream

is the neme of the bin or bic

“CHANGE HW” question with

"Y*

“CHANGE SW" question with “N”

When
you follow
this procedure you will be using only the
defaults for flags end softwere peremeters.
These defaults
ere described in sections 2.3 end 2.5.
3.0

ERROR INFORMATION

3.1

TYPES OF ERROR MESSAGES

There
eore three
levels of error messages thet may be issued by
e di
stic: general, basic end extended.
Genersl error -esso?es
are always printed unless the "IER“ flag is set (section 2.3).
The
general error messege is of the form:
Neme

type

error

message

number

on unit number

where; NAME = Disgnostic name
TYPE

= Error type

(SYS FATAL,

NUMBER = Error number

tst number PC:XXXXXX

DEV FATAL,

HARD or

SOFT)

UNIT NUMBER = O - N (N is lest unit in ptable)
TST NUMBER = Test and subtest where error occurred
PC:XXXXXX = Address of error message coll

Besic
error messages are messages that contein some additionesl
‘nformetion
sbout the
error.
These are always printed unless
the

'JER

"IBR"

flags ere set (section 2.3).

sre pr nted after the 8ssoc sted general message.

These messeages

5¢Q 0011

M1
Extended error messages contein supplementery error

informetion

such
as register
contents or good/bed dets.
These ere elweys
printed unless the "IER", "IBR" or "IXR" flags ere set (section

2.3).

These

wessages sre printed sfter the associeted genersl

error message end any 8ssociated basic error messeges.

3.2

SPECIFIC ERROR MESSAGES

The following ere device fotsl error messages:

1) R CSA FAILED TO RESPOND
¢) RCIP FAILED TO RESPOND
3) INIT STEP READ ERROR
STEP MASK =
XX = 1
-

XX = 2
XX = &
XX = 10

.
-

XX
FAILING REGISTER
STEP 1 READ FAILURE

DATA

STEP 2 READ FAILURE
STEP 3 READ FAILURE
STEP 4 READ FAILURE

4) STEP READ DATA DOES NOT MATCH

ADDRESS :

EXPECTED:

READ:

) VECTOR AND BR LEVEL TEST FAILURE
) INTERRUPT AT VECe
BR LEVEL*
) NO INTERRUPT FROM PORT / CONTROLLER
) BR LEVEL RECEIVED/TYPED IS INCORRECT !
) HOST DETECTED TIME OUT ERROR
0) RING BUFFERS NOT CLEARED BY THE PORY
1) DATA ECHOED FROM RCSA DOES NOT MATCH

) MEMORY BUFFER DOES NOT CONTAIN EXPECTED DATA

) DM CODE RETURNED FAILURE CODE

The following sre DUP/MSCP commend failure messages:

14) RC2S UNIT DOES NOT COME ONLINE
15) EX_SUP_PROG DUP COMMAND FAILURE

16) SEND DATA DUP COMMAND FAILURE
17) REC_DATA DUP COMMAND FAILURE

18) GET UNIT _STATUS COMMAND FAILURE

19) AVAILABLE COMMAND FAILURE

The following seek error messages sre used.

20)
21)
22)
23)
24)

FORWARD SEEK ERROR
REVERSE SEEX ERROR
TOGGLE SEEX ERROR
RANDOM SEEK ERROR
RC25 SEEX FAILURE

Rlso. one of the following will be printed es extended
‘nformetion:

STARTING TRACK:
NMBER OF

SEEVS

ENDING TRACK:
‘D

+BN:

DESIRED LBN:

N1
2S) MEAD SH%YCN FAILURE
UNIT:
HEAD:
TRACK:

SEQ 0013

26) SECTOR ?Elo FA ILURE
UNITY:
MEAD:
TRACK;
2”) OFFSET READ ERROR
MAX,

OFFSET VALUE:

¢8) WRITE DATA TEST IN ERROR
WRITE DATA:

READ DATA:

TRACK :
SECTOR:
HEAD;
ERROR STATUS:
(NONZERO WILL INDICATE MICROCODE ERROR INFO.)
29 WRITE PROTECT TEST FAILURE
EXPECTED SW = OFF
ACTUAL SW = ON PLATTER @ « (D)
EXPECTED SW = ON ACTUAL SW = OFF
PLATTER @ « (D)
Note: A1l numbers displeyed ere octel unless (D)
for decimal number.

indiceted

LBN mesns logicel block number from 0 to 143325 (octel)
TRACK refer to LBN trecks from 0 to 3151 (octel)
except

in DM code tests where this meons DBN trecks.

UNIT refers to pletter number.

SECTOR refers to DBN sector for DM code tests.
HEAD =

O meens top surfece top pletter
40 meens bottom surfece top platter
100 means top surfece bottom (fixed) pletter
140 meens bottom surfece bottom (fixed) platter

3.2.1 ERROR CODES :
Whenver RCSA date conteins fatel error codes or there was
on error in end packet stetus code received for ony of the
MSCP commends used or if there was en error log mess
then the error code received from port will be

given

one of the following messages with 6 octel digits:

RCSA ERROR STATUS:

END PACKET ERROR STATUS:
UNEXPECTED LOG PACKET ERROR STATUS:

Also. en explenstion of the error code

in the form $FTLERR-

will be printed out 8s en extended error message.

B2
The following ere self-detected fatel port/controller errors.
These will be reported ss extended error messeges when RCSA

dete contains fatel error codes:
$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR-

UNRECOGNIZABLE ERROR COOE
ENVELOPE/PACKET READ (PARITY OR TIMEQUT)

ENVELOPE/PACKET WRITE (PARITY OR TIMEOUT)

CONTROLLER ROM AND RAM PARITY
CONTROLLER RAM PARITY
CONTROLLER ROM PARITY

RING REAC (PARITY OR TIMEQUT)
RING WRITE (PARITY OR TIMEOUT)

INTERRUPT MASTER
HOST ACCESS TIMEOQUT
CREDIT LIMIT EXCEEDED
BUS MASTER ERROR
DIAGNOSTIC CONTROLLER FATAL ERROR
INSTRUCTION LOOP TIMEQUT
INVALID CONNECTION IDENTIFIER
INTERRUPT WRITE

MAINTENANCE READ/WRITE INVALID REGION IDENTIFIER
MAINTENANCE WRITE LOAD TO NON-LOADABLE CONTROLLER

CONTROLLER RAM ERROR (NON-PARITY)
INIT SEQUENCE ERROR

$FTLERR- HIGH LEVEL PROTOCGL INCOMPATIBILITY ERROR
$FTLERR- PURGE /POLL HARDWARE FAILURE
$FTLERR- MAPPING REGISTER READ ERROR (PARITY OR TIMEOUT)

SEQ 0014

Ce
! Self-detected fatel port/controller errors

$SFTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$SFTLERR$FTLERR$FTLERR$FTLERR$FTLERR-

$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FILERR$FTLERR$FTLERR$FTLERR-

VAX READ/WRITE ERROR ON INTERRUPY
INCONSISTENCY AT U.BFIL
INCONSISTENCY AT U BMTY
INCONSISTENCY AT U.ALOC
INCONSISTENCY AT SERVO ENTRY (PIP SET)
INCONSISTENCY AT SERVO ENTRY (ERR SET)
INCONSISTENCY AT U.SEND
INCONSISTENCY AT U.RECV
INCONSISTENCY AT U.ATTN
INCONSISTENCY AT U.ONLN
JLLEGAL O REO(EST (U.QORQ)

FENCE-POST ERROR AT PROTAB
BAD PACKET DEQUEUED AT U.DONE
UNEXPLAINED D-PROC SUSPENSION (U..TDS)
DUP PACKET D-Q FAILED (XFC 34/35)
INCONSISTENCY AT U HTST
INCONSISTENCY AT U.SEKO
INCONSISTENCY AT U.CKSV
D.OPCO FOUND ILLEGAL OPCODE
D.CSF FOUND ILLEGAL OPCODE
UNKNOWN BAD DRIVE STATUS AT D.DSTS
ILLEGAL XFC EXECUTED BY DM
D PICKED UP A ZERQ SCB.08
INCONSISTENCY AT D IDLE LOOP
DM WORD COUNT ERROR ON HOST DMA/SEND/RECV
UNKNOWN DISPLAY FAUWT CODE AT D.DFLT
DRIVE NOT FAULTING IN P.OFLN STATE
U POWER UP DIAGNOSTICS FAILED

$FTLERR- D POWER UP DIAGNOSTICS FAILED

$FTLERR- ADAPTER CARD FAILURE
$FTLERR- EC.TMR TIMED OUT
$FTLERR- U.SEND/U.RECV RING READ INCONSISTENCY

$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR$FTLERR-

UNKNOWN WAITRV REASON AT D.RVCT
D.ARCS DID NOT FIND CLOSEST UNDONE ZONE
U.SEEK FOUND SEEK TO ILLEGAL TRACK
U.HTST INIT DIAG DMA WRITE FAILED
U.HTST INIT DIAG DMA COMPARE FAILED
U.SYDR FOUND SS.DER SET AND SS.SPN NOT SET
MASTER DRIVES ACLO ASSERTED

SEQ 0015

De
The following are return stetus messages.

If response status

error, then one cf DUP return status codes or MSCP codes
will be printed out.

$FTLERR- RESPONSE STATUS ERROR:
$FTLERR- SUPERVISOR SERVICE CALL FAILED
$FTLERR- PORT/CONTROLLER TIMEOUT ERROR
$FTLERR- UNKNOWN RETURN STATUS CODE

Dup return status codes

SUCCESSFWL
INVALID COMMAND
NO REGION AVAILABLE
NO REGION SUITABLE

PROGRAM NOT KNOWN
ALOAD FAILURE

STANDAL ONE

MSCP return status codes

SUCCESS
TNVALID COMMAND
COMMAND ABORTED
UNIT-OFFLINE
UNIT-AVAILABLE
MEDIA FORMAT ERROR
WRITE PROTECTED

COMPARE ERROR
DATA ERROR

HOST BUFFER ACCESS ERROR

CONTROLLER ERROR
DRIVE ERROR
MESSAGE FROM AN INTERNAL DIAGNOSTIC

SEQ 0016

E2
SEQ 0017
FAILING FRU

One or more of the four different module will be called out

some times based on the major error code received from port,

1) ADAPTER BOARD
2) CONTROLLER BOARD
3) DRIVE BOARD

4) MECHANIC SET
For detailed

information about the error code displayed and

possible failing
manual

logic/function cell-out,

the RC25

controller

that desls with error/status condition codes should be

consulted.
]

! The following are system error messages:
]

POWER DELAY - WAITING
TOO MANY UNITS

NO CLOCY WAS FOUND IN THE SYSTEM
INCORREC: TRACK NUMBERS SELECTED

Note:

If there was no clock

will not run,

in the system,

then the diagnostic

Fe
4.0

SEQ 0018

PERFORMANCE AND PROGRESS REPORTS

the end of eech pass,

The

"EOP" switch coen be used to control how often the end of pass

5.0

DEVICE INFORMATION TABLES

totsl

the pass

count

is given along with the

number of errors reported since the diagnostic was started.

message

is printed.

Section 2.2 describes switches.

The Supervisor builds one Hardware P_Table for every logiceal

unit tested while enswering Herdware P_table questions.
This disgnostic gets one table st a time

runs diagnostic

tests as selected.

in sequence and

The P_table

looks

like this:

HWP_TABLE:

0
2
a
6
6.0

:MWP_IP_ADDRESS
IHWP_VECTOR
IHWP_BR_LEVEL
:HMP_UNIT_NUMBER :

TEST SUMMARIES

R brief description of the tests done are described below:

TEST &1 REGISTER EXISTENCE TEST
This test will first check for the existence of the address of the IP

end SA registers for the device under test. If these memory asddresses
are non-existent, the error will be reported.

If the operator has specified loop on error,
beginning of each sub test.

looping will be from the

TEST @2 INITIALLZATION TEST (POWER UP DIAGNOSTICS)
This test

init's the aztec_and runs the gouer up disgnostics by

writing with step 1 data.
report

TEST

Then

it will check for errors and

if aztec does not come upto step 2 read.

&3 DIAGNOSTIC WRAP TEST

The aztec will be

initialized

in diagnostic wrap mode and & one bit

end also zero bit flosted through the SA register to see that
echoes properly.
A failure to echo what was written will result
edapter card fru.
If the operstor hes specified loop on error,

the feiling write and read.

in 8 callout to the

the program will

loop on

G2
TEST 04

SEQ 0019

VECTOR AND BR LEVEL TEST

The init sequence will be started with the
verify the esztec's vector and BR level.

interrupt enable bit set to

This test assumes the vector given by the operator

The priority level of the

interrupt request will

is correct.

be verified.

Failure of the sztec to vector properly will necessitate that this

program be restarted.

will

A completed

be reported.

interrupt at the wrong BR level

Loop on error will restart this test
TEST

&S STEP 1

if the error

is recoverable.

-3 INITIALZATION TEST

This test will check for

information echoed from the port at

each step read conina upto that step from scratch,
was an error reported

or echoed

the error will be reported.

information was

If there

incorrect

Loop on error will be from the beginning of sub test.
Port

gives some

information asbout the Port at every step read

in RCSA Register. This
operator as follows:

information will be printed out to the

1) At step 1 read the following will be given:
PORT SPECIFIC INFO:
NV =

/NV/QB/DI1/00/MP/ =

xx (0)

means that the port does not support a host settable
interrupt vector address

@ = 1

means thet the Port supports s 22-bit host bus.

DI = 1

means that the Port

00 = 1

wmeans thet the Port ellows odd host address to be
specified in the buffer descriptor.
.
means thet the Port supports address mapping. The

MP = 1

This bit will be 8

0 for unibus.

i.e. wraparound, purge and poll tests.

host supplies a virtual date sddress

in the buffer

descriptor which is mapped to @ resultant address
using mepsing registers maintained in host memory,

Two digit octal value of the sbove right justified.

2) At step 2 read the following will be given:
PORT

)

implements enhanced diagnostics,

TYPE MUMBER

(0)

0 means UNIBUS/QBUS storage systems port.

He
SEQ 0020

3) At step 4 read the following will be given:
MICRO CODE:

xx ®

S
6
7

*®

MODEL

xx (0) VERSION =

yy (0)

UDASO

RC2S Integrated Controller

TU8l Integrated Controller
UDASOA
QDRX01

Mod 16 velue of the actual controller microcode
version.

15T

@6 PURGE

AND POLL

TEST

This test will perform the first three steps of the init sequence.
When the host responds to the step 3 transition it will write a one

bit to bit 15 of the SA register,
purge ond poll

testing.

therby requesting the execution of

The host then waits for the SA register to

trensition
to a zero value.

The host then writes zeroes to the SA

register simuleting
@& "purge completed” host action.
The host then
reads the IP register
to simulate o "start polling” command from the
host to the port.
The test is complete when the controller announces

the transition to step 4

in the SR register.

Failure to properly complete this test will be reported.

Loop on error will restart the test.
TEST

SMALL RING BUFFER INIT TEST

The aztec will be

initialized without

interrupts and using the

smallest ring buffer.
This will be the first time that_the
initielization sequence is carried out to completion.
Initielizing
with the smallest ring buffer minimizes the host memory area with
which the aztec controller must be asble to communicate.
Failure to properly

initialize the aztec and com_ares will be reported.

If the operator has specified loop on error,
start of this test.
TEST €8

looping will be from the

- LARGE RING BUFFER INIT TEST

The

init sequence

is executed without

interrupts with 8 ring buffer

ler?e enough to cover the normal host communciations area packet and
bufter space ( & 16 in message length and a 16 in command length).
A failure to complete the

initialization sequence without error will be

reported.

I1f the operstor has specified loop on error,

beginning of this test.

looping will be from the

12
TEST 09 -

SEQ 0021

"DIAGNOSTIC MACHINE“ CODE DOWN LINE LOAD TEST

This

"Diagnostic Machine" progrem will attempt to transfer & block

of dete from host memory to an area
examine the transfered data.

in the controller and then

If the transfered deta does not compere correctly, then an error will
be reported. This test also reports errors if any of the routines
used returned failure code.
If the operator
has specified loop on error,
the start of this test.
TEST

€10

NONEXISTENT MEMORY TEST

This

"Diagnostic Machine” program will

address of

attempt to read the

the 1/0 page of the host CPU.

for diagnostics end a nxm should occur.

If the controller does not see the nxm,
of the adapter ceard.

This location

€11

BUS ADDRESSING/DATA TEST

first

is reserved

there will be a8 fru callout

If the operator
has specified loop on error,
the start of this test.
TEST

looping will be from

This

“Di

ostic Machine” progrem asks the POP-11 program to fill

used

by the progrem or the POP-11 supervisor) with an addressin

menorg (thet memory aveilable to the PDP-11 progrem that

is not being

pattern (write address with address) and report the location and

of the free memory.
the data checked.

€12

size

Every location of free memory will be read and

If the detes does not compare correctly,
snd datas received are reported.
TEST

free

the address,

data expected

- BUS ADDRESSING/DATA TEST B

This test first brings aztec drive Ready and Online and then

loads DM_12 program vector to port controller memory, then

does the following:
a.

Give free memory address and buffer size to DM code
ond ssk DM code write a pattern of one’'s complement
of eddress at the address and expects to receive
success or failure code from DM program. Then checks
memory buffer for the expected pattern and reports
error 1 f encountered.

If success, asks DM code to write to memory s pattern
of all ones and checks for the psttern in memory.

Je
c.

If success, asks DM code to write to memory e pattern
of all zeroes end checks for the pattern in memory.

If feilure, retries will be done es controlled by
e softwere question.
Loop on errar flag will
loop from beginning of test

TEST €13

to the point

SEQ 0022

failure.

BLOCK TRANSFER TEST

The sbility
memory will

of the Aztec controller to do block trensfers to and from
be tested with different dete patterns.
The "write host

memory“ XFC end the "read host memory” XFC will be used.
The host
memory buffer is 256 words in size.
4 different dets patterns es
given below sre used.

Pattern 0

111111

044444

022222

Pattern |

Pettern 2

Pattern 3

177400

15555S

000377

066666

177400

007760

133333

170017

1) This test brings RC2S controller online and loads DM code
progrem to controller’'s memory.
2) First the host aengrx buffer is initislized with patt~rn 0,
R send d:to commend with
host buffer addresses (transmii and receive)
is

issued.

3) DM code then reaus host memory buffer and puts

memory and writes back

in controller's

in host memory receive buffer using XFC's.

4) Host program compares both buffers for dats pattern 0.

S) If there was on error in comgorision the error will be reported.
If there was error in the MSCP
DUP calls or initializetion, this
will also be reported.

Steps 2 thru S will be repeated for date patterns 1.2 sand 3.
If an error wes encountered the test will be sborted. If operstor
chose for retries, retries will be done from the start of the test.
TEST

#14

SPIN UP/HEAD LOAD SEQUENCE

This test first

initislizes RC25 controller,

end does set control cheracteristics.
Then,

this test will first

spin down modifier set.

initislizes com_area,

issue the mscp "avaeilable” command with the

It will then wait for 30 seconds to insure

that the drive hes had time to spin down.
‘online” commend to spin the drive up.

It will then

issue the MSCP

This operation will be timed

ond the time will be reported to the operetor so that this time can be
verified to meke sure it is with in limits.
The run/start and head

losd internal disgnostics will run during this time.

If an error

encountered the returned status of the “online” command will be
something
other then “success” ond this status will be decoded
end reported with error message.
If the operator hes specified retries on error,
repested.

the test will be

I<2
SEQ 0023
TEST

015

SEQUENTIAL

SEEK AND VERIFY TEST

This test brings RC2S controller and unit online and ready to accept

MSCP DUP commends.

Sterting with the user specified beginning track and incrementin
thro
every track to the user specified ending track, this test
will
seek
from treck to treck in e forwerd direcion, then it will repeat
the operstion in the reverse direction, from the ending track to the
beginning.

This

is a single surface test and

con select bottom surfece also.
AR feilure report

track.

After

includes

reporting the

is done on top surface.

strating track, ending track and desired
feilure,

seek ond will jump to reverse seek.
TEST

€16

The operator

the program will

sbort current

SANTOOTH SEEK AND VERIFY TEST

This test brings RC25 controller
to take mscp commands,

end the unit online

and reedy

Sterting with the user specified beginning treck and incrementing
the
every track in the selected ronge, this test will perform o
seek
to the selected track end then 8 seek back to the beginning
track.
When all tracks have been covered, it will do the seme
operation in the reverse direction with the ending track as the

bese.

This

is a8 single surfece test and

is done on top surfece.

The operastor cen select bottom surfece also.

error reports will stete sterting, ending and desired tracks.
If there waes on error the test will be sborted unless the operator
hes selected for retries.

TEST €17 - CONVERGING/DIVERGING SEEK AND VERIFY TEST
This test first brings RC25 controller and unit online so that
MSCP commends cen be issued.
This test performs seeks to the beginning track,

then to the ending

treck, then to the beginning track « 1, ending track - 1, beginning
treck « 2, etc. until the tracks converge and then diverge again
back to the beginning and ending tracks.

L2
This

is 8 single surfece test end

is done on top surfece.

operator cen select bottom surfece also.
Error reports will

include sterting, ending

I fai.. @ in seek the test will be sborted
selects -etries.

The

end desired tracks.

unless the operator

TOGGLE SEEX AND VERIFY TEST

TEST €18 -

This test brings RC2S controller and the un t on line end ready to
eccept MSCP commends.
One thousend seek commends will be issued one st 8 time to toggle
between the beginning
track of O (lbn = 0) end the ending track
of 820 (lbn =
820 ¢
31).
This

is @ singie surfece test.

unless th-

seek

is done only

on top surfece

operstor chose to seek on bottem surfece by snswering

one
of th. softwere aquestions.

The operstor has control over the

Error reports

ending end desired trecks.

beginning end ending tracks,

if desired by enswering questions.

include sterting,

After

reporting the feilure the disgnostic will sbort the test, unless

retr'es
TEST €19 -

s enabled.

HEAD SWITCH TEST

This test will bring RC2S controller end the unit online

ond will loed am code progrem to controller’'s memory using
EX_SUP_PROG commend.

DM code will seek to both surfeces of the unit.

The XFC stetus

w']l]l be used to verify that the proper treck hes been resched.

Block hesders will be reed to verify that the proper heads sre
selected. DM code will retry if there wes eny error in seek.
DM code will give success or failure code to the host.

If fa lure, the treck, head end unit will be reported as rece ved
from DM cooe.

If retries sre turned on the test will be repested.
TEST 020 - RANDOM SEEK AND VERIFY TEST
This test brings RC25 controiler end the selected unit online

ond then issues 1000 seeks one ot o time to rendomly
selected
LBN trecks between the
ronge of 0 - 1641. This will ensure head
sw tch as well beceuse trecks over 820 will be in the bottom
surfece of selected unit.
Error

reports

incluge

i00p on error fleg

seer

‘s set,

count

end

f.i“"\?

treck

number.

feoiling treck will be retried for ever.

SEQ 0024

YEST 601

SECTOR ACCESS TEST

Th's test brings RC2S controller end selected unit online
ong then loeds DM 21 vector errey into controller's memory

by g ving EX_SUP_PROG commend.

The DM progres will seek to disgnostic treck 0 end reed 32
blocks after mek ing sure thet good heesder is found. DM code
will retry

if any

to host with fail

host code.

error wes found.

dm code will send stetus beck

ng unit, heed ond treck. Error will be reported

Tn's ‘s o single surfece test. top surfece will De eccessed
unless the cperetor chose bottom surfece Dy enswering one of
the software questions.

TEST

6c2

CONTROLLER PROCESSING TIME TESY

Th's test brings RC2S controller onc selected unit oniine.

The controller processing time

is messured by

t'mg
't tekes to 9o 100 zero length seeks,
ere zero trecks long.

evereging the

that

seeks thet

Th's ‘s @ single surfece test. seer will be done on top surfece
Jnless the operetor chose to seek on bottom surfece. Track O
-fi be used or the sterting treck number as given Dy the operetor
-

used.

I¢ there wes sny error in seex, this will be reported w th the
the number of seeks completed end desired track.
The test w'll
be sborted unless retri.es sre ensbled.

1€ success. %he ever

tise will be reported.

process
. ng t . me expected w'll be eround 2 ms,
TEST 023 -

Controller

ONE TRACK SEEX TIMING TES?

Th's test brings RC2S controller end selected un't onl ‘ne.
Jne treck gseek timg is the sver
of el]l one treck seeks thet
@0 not include 8 heod switch. oll
forwerd one track seeks will
be done end timed and then reverse one treck
seeks will be
done and timed. Aversge time will be reported. The expected
t'ee will be sround 6 to 7 ms.
Th's is @ single surfece test. Top surfece will be used unless
the operastor chose otherwise. Seeks will be from stert to the end of
trecrs.

Zf there wes on error, error w'
1] be reported end the test sborted
Miess Tetr es sre turned on,

5€Q 0025

N2
TEST

024

AVERAGE

SEEK

TIMING

SEQ 0026

TEST

This test brings RC2S controller and selected unit online.
The averege seek time
is the .vcrgr time it tekes to do
® seek Qgiven that it s cougllx likely to stert on eny treck
ond any heed, ond equally likely to end on eny track end eny
heod.

One thousend rendom seeks will be done over the renge
of LBN track O thru LBN treck 1641 to cover both surfeces of the
selected unit. First time express bit in commend modifier field

for READ_CMO will be set so that rendom seeks sre timed end

in the second time express bit will be reset so thet the
rendom LBN eveilable to the controller ere ordere
d bI the

controller for seeks. Aversge time for both ceses will be reported.
The expected time will be sround 32 me for rendom LBN seeks
ond 17 ms for ordered LBN seeks.
An error report for this test will report the number of seeks and

desired track number.
After reporting o feilure, the deignostic will
proceed to the next test unless retries is turned on.
TEST

025

FULL

STROKE SEEXK TIMING TEST

This test brings RC25 controller end unit online.

The full stroke seek time is the sverege time of 1000 full stroke

seeks that do not involve heed switches. The sverage :ime will
be reported and is expected sround SS ms.

This

is o single surface test.

operator chose otherwise.

top surfece will be used unless the

The error report will include number of seeks end desired track
number. After failure, the test will be sborted unless retries
sre turned on.

TEST 026 - WRITE DATA TEST

This test brings RC25 controller and selected unit online.
then loeds dm code vector array DM_26 to the controllers
memory by issuing EX_SUP_PROG command.
The dmcode

gets the unit number from the host and attempts

to find st
lesst one good diegnostic block on each surface
of the pletter specified and meke sure that dmcode can read
ond write to the block in order to verify that the heads ere
work ing properly.

oll ones date

First top surfece will be attempted with

end second ell zero deta.

repested for bottom surface os well.

reed and compered.

The error report on this test will

plus the treck,

This will be

The dete written will be

include detes written,

head end sector number.

Also error stetus

dets resd

from the micro code if eny will be reported. Error status of
zero will meen other errors trapped in dmcode.
After reporting

the error the rest of the

selects retries.

test will be sborted unless the operator

SEQ 0027

TEST €27 - OFFSET TOLEPANCE TEST
This test bri

RC2S controller ond the unit online end loads

DM progrem DM_27 vector lrrnz into controller's memory for
execution by issuing EX_SUP_PROG commend.
The DM code will do an offset tolerence test.

o good 0dd block will

be found in track 829 (DBN track). It will be read with incressing
+ and - offset, until & herd error is forced. The offset velue used
in the lest good reead will be sent to host program. The host will
give the maximum offeset as @ percentege of track to treck distence.

This test wil'
being tested.

be performed on top surface of the unit

A messege report on this test will

used
TEST

028

inclide the

largest offset

in order to read the block without vorcing errors,

AVERAGE ROTATIONAL

velue

TIMING TEST

This test will bring RC2S controller and the unit online.
This test will be performed from the host using the MSCP

“read”

command.
An LBN will be selected rendomly.
One thousend two
byte count reads of the same LBN will be performed.
This operation
will be timed and the average time will be reported. The expected
time will be 21 ms.
If the operator has selected retries,
TEST 629 -

the test will be repested.

WRITE PROTECT TEST

This test requires manual intervention.
It will be executed if
the software parameter questions do not cause it to be omitted.
This test brings RC25 controller and the unit online first.
The test is done_froe the host uoina the mscp command “GET UNIT

STATUS* (gus).
The test will ask the operator to make sure the
write protect switch for the unit is in the off position.
It will

do the gus for the unit to verify that the controller knows it is

not write protected.
Then the operator will be esked to put the
write protect switch in the on position end a gus will be done to
moke sure the controiler recognizes that the unit is write protected.
The error report for this test will contain the unit number, expected
ond actual positons of the write protect switch,

C3
7.0

MAINTENANCE HISTORY

Modified By:

Date:

Version:

2000608000800
R eSS SC 000 CEERCCOCOCSEROE
eSS ¢toeOS

SING LAXSHMANAN

JULY 83

CZRCFAO

SING LAKSHMANAN

oCT 83

CZRCFBO

SING LAKSHMANAN
00000

E N0

JAN
S

0S¢0

EER 0000800 ¢E

CZRCFCO
SR

RSSO0

OR0Ce0SS b

NOTE :

CZRCFBO is & release of complete tests for RC2S
following the base level release CZRCFAOQ.

FR END TESTS,

CZRCFBO contains 29 tests. The first 12 tests are functionally
the same as CZRCFAQ.

have been revised,

All source modules to meke up this diegnostics

sppended to produce CZRCFBO.

CZRCFCO is modified version of CZRCFBO with the following corrections.
source modules have indications with VER:C in comments
wherevever

needed.

Patch Bl:

Test 10 hengs with C1S microde

in the controller.

Patch B2:

Time-out error for an indefinite pass of any one test.
Test 14 is done only in first pass. corrected to run
in all passes.

Patch B3:

Test 4 error 7 time out occurs

in orion 11/73 processors.

Test 14 does not wait long enough to spindown completely.

resltime timer

30 sec.

included to avoid false spin up time reports.

This problem wes specific to Orion 11/73 processor only as of date.
Test 26 contains 8 revised dm code.

explain the test better now.
)s

ELUDOM

The test description will

SEQ 0028

D3
CZRCFCO RC2S FR END TEST

1517
1518

1523
1524

P8 0t et Bt 1§t ot s ot Pt $od b it Pt it Bt e s ot P

et et ot s o pt Pt pt e pt e e D D O O

ZRCFR1

MOOWLE ZRCFB1

(‘}%Ehg

27-Mer-1985 15: 21:49
11-Jan-1985 08: 19:19

VAX-11 Blis 8-16 V4.0-579

USER$1:(AZT C CZRCFCJZRCFC1.B16;1

C;RCFCO RC2S FR END TEST'

QDDRESSING HODE (RELATIVE)
BEGIN

§<BLF/LOHERCASE_KEY>
library 'AZTECO';

require

! DIAGNOSTIC SUPERVISOR LIEBRARY

#sbttl

'BLSMAC.REQ';

AZTEC LIBRARY

'PROGRAM HEADER AND TABLES'

g DEFINE THE NUMBER OF TESTS IN THIS DIAGNOSTIC

6sect

code = AASCODE;

literal
DS$NBR_OF _TESTS = 29;
POINTER (ALL);
Yoo

! THE PROGRAM HEADER IS THE INTERFACE BETWEEN
! THE DIAGNOSTIC PROGRAM AND THE SUPERVISOR.
HEADER (wascii'CZRCF

', wascii'A’', sascii'Q',

120, 0, PRI0O);

ARGUMENTS ARE: NAME,REV,PATCH, LONGEST TEST TIME,TYPE

WHERE "TYPE" = 0 FOR SEOUENTIAL DIAGNOSTIC AND '1
FOR EXERCISER.
THERE IS ALSO AN OPTIONAL SIXTH ARGUMENT
WHICH SPECIFIES THE PROCESSOR PRIORITY TO BE SET WHEN

STARTING THE DIAGNOSTIC (DEFAULT IS Q).

SEQ 0029
Page

(1)

E3
CZRCFCO RC2S FR END TEST
DISPATCH TABLE

ZRCFRB1

P
Pt Pt Pt P

1525
1526
1527
1528
1529
1530
1531
1532
1533

Pl ot P Pt

v03.0

ssbttl

27-Mar-1985 1 5:2
11-Jan-1985 0 8:1

'DISPATCH TABLE'

Yoo

'
!

THE OISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST,
IT IS USED BY THE SUPERVISOR TO DISPATCH T0 EACH TEST.

DISPATCH (DS$NBR_OF _TESTS);
ERRTBL
;

98-16 V4,0-579
EC CZRCFCIZRCFC1.B16;1

SEQ 0030
Page

(2)

F3
CZRCFCO RC2S FR END TEST
DEFAULT HARDWARE P-TABLE

o d ol o
ol d
Lol ond ol ol od ad d o d o

1534

ol Sl ol

ZRCFBL
v03.0

ssbttl

27-Mar-1985 15:21:49
11-Jan-1985 08:19:19

'OEFAULT HARDWARE P-TABLE'

!
!
t
!

THE DEFAULT HARDWARE P-TABLE CONTAINS DEFAULT VALUES OF
THE TEST-DEVICE PARAMETERS.
THE STRUCTURE OF THIS TABLE
IS IDENTICAL TO THE STRUCTURE OF THE HARDWARE P-TABLES,
AND IS USED AS A "TEMPLATE” FOR BUILDING THE P-TABLES.

BGNHW (DFPTBL);
obal

P _IP_ADDRESS
: word

initiesl

(%0'172150'),

VECTOR : uord initial (%o'154'),

P “BR_LEVEL

word

initial

(S),

P_UNIT_NUMBER : word initial (0);
ENDHU;

VAX-11 Blise-16 V4.0-579
USER$1: [(AZTEC.CZRCFCIZRCFC1.B16;1

SEQ 00131
Page

3
(3)

G3
CZRCFCO RC2S FR END TEST
SOF TWARE P-TABLE

ZRCFR1

1573

'SOF TWARE P-TABLE'

ssbttl

VAX-11 B liss-16 V4,0-579
USER#$1:( AZTEC.CZRCFC)ZRCFC1.816;1

Yoo

g S Sl o

1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572

Ll ol ol ol d od ol ol Sl Sl o d o

v03.0

27-Mer-1985 15:21:49
11-Jon-1985 08:19:19

! THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE
! PROGRAM AS OPERATIONAL PARAMETERS.
THESE PARAMETERS ARE
! SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR

]

AT RUN TIME.

BGNSW (SFPTBL);

global
SWP_TOP : word initisl (YES)

SWPLIMIT : word initial (NOJ.

SWP_START

word

initial

(0),

SWP_END : word initiel (820),
SWP_RETRIES : word initisl (0),
SWP_CONTINUE : word initial (NO),
SWP_MANUAL : word initial (NO),
SWP_TRACE : word initial (YES);
ENDSW;

!USE TOP SURFACE FOR SINGLE SURFACE TESTS
'LIMIT AREA TESTED
!STARTING TRACK
!ENDING TRACK
!NUMBER OF RETRIES BEFORE DROPPING UNIT
!D0 YOU NEED TO CONTINUE TESTING?
!00 MANUAL INTERVENTION TEST
!D0 YOU NEED TRACE MODE?

SEQ 0032
Page

(4)

H3
CZRCFCO RC25 FR END TEST

ZRCFB1

PROTECTION TABLE
s pe

Yoo

s ot

s o

ssbttl

[Py
Ne

1574
1575
1576
1577
1578
1579
1580
1581
1582
1583
1584
1585

v03.0

'PROTECTION TABLE'

THIS TABLE IS USED BY THE RUNTIME SERVICES

70 PROTECT THE LOAC MEDIA.

BGNPROY (-1,
'1ST ARG =
'2ND ARG =

ézfigRARG =
g}

27-Mar-1985 1 5:21:49
11-Jan-1985 0O 8:19:19

LV B

-1,

-1);
OFFSET INTO P-TABLE FOR CSR ADDRESS
OFFSET INTO P-TABLE FOR MASSBUS ADDRESS
OFFSET

INTO P-TABLE FOR DRIVE NUMBER

VAX-1 1 8 li 98-16 V4,0-579
USER¢ 1: (AZ TEC.CZRCFCIZRCFC1.B16;1

SEQ 0033
Page

S
(5)

ZRCF8}

13
27-Mar-1985 15:21:49

CZRCFCO RC2S FR END TEST

v03.0

GLOBAL DATA SECTION

11-Jen-1985 08:19:19

H
:

1586
1587

1
1

ssbttl 'GLOBAL DATA SECTION'

H
H

1589
1590

|
1

' THE GLOBAL DATA SECTION CONTAINS DATA THAT ARE USED
' IN MORE THAN ONE TEST.

¢
:
i
:

:
:
:
:
H
H
:
H
:
H
H
:

:
:

:
:
H

1588

1592

1593
1594
1595
1596

1
1
1
2
2
2
2
2
2
2
2

1609
1610

1
1

1612
1613
1614

1
1
1

1616

1608

1611

1615

;
H

1617
1618

:
;
;

1
1
1
1

1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607

;

1619
1620
1621

:
;

1622
1623

;

1627

1630

Yoo

psect
plit = $plits(
globel),
global = $GLOB$(nowrite, noexecute, global, concatenate),
own = $own$;

structure
RC2S (0, P, S, E) =
begin

! DEFINE ACCESS ALGORITHM
' 70 ALLOW FIELD REFERANCES
! TO THE AZTEC

oceal
RC_REG;

RC_REG = .(RC2S + supvels0)<0, sbpval, 0>;
RC_REG
end

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC. CZRCFC)ZRCFCI B16;1

<P,

E>;

globel

RT : vector [WORD1_IN RT_TAB, word],

'RUNTIME TABLE STORAGE

RCV_DATA_BUF : vector

! RECEIVING DATA BUFFER 2

1
1

CLK_TYPE : word,
CLK_CSR : word,

! TYPE OF CLOCK ON SYSTEM
! STORE CSR ADDRESS FOR CLOCK HERE

LOG_UNIT : word,
OUT_BOUND: word,

! COMMAND COUNT

1
1
1

1
1

RT_TABLE: ref block [WORD1_ IN RY TAB word) field (RT_FIELDS),
TRUNTIME TABLE POINTER
HWP TABLE ref block [WORD2_IN_HWP TAB nord] field (HWP FIELDS)
XMT_DATA_ BUF : vector 256, word),
' TRANSMITTING DATA BUFFER 1
CLK_ADR : word,

[256, word],

CLK_HERTZ : word,
CLK_START : word,
UNIT : word,

' STORE CLOCK HERTZ RATE
! STORE CLOCK START VALUE
! UNIT UNDER TEST THIS PASS

;1624
:
1625
:
1626

1
1
1

:
1628
;1629

1
1

:
:

1
1

SEND_RING : ref blockvector [SND ALLOCATE, 2. uord] field (DSC FIELD)
REC_ENVELOPE : blockvector [REC_ALLOCATE, RB_SIZE + 2, word] field (ENV FIELD),

1
1
1

BUF _DESCRPTR : word volatile,
CMD_REF : word voletile,
BYTE_COUNT : word volatile,

! BUFFER DESCRIPTOR AREA
! COMMAND REFERENCE BUFFER
! BYTE COUNT BUFFER

1
1
|

SECONDS : word initial (0) volatile,
MINUTES : word initial (0) voletile,
TIP : word,

! STORE SECONDS
! STORE MINUTES
1STORAGE FOR NUMBER OF TEST IN PROGRESS

1631
1632

1633

1637

;
;
;
:
H
:
:
;

1634
1635
1636
1638
1639
1640
1641
1642

IN_BOUND: word,
VEC AD
: b te volatile,
RC25_ ADDR: ref RC25 field (RC _REG),

! LOC. TO RETURN CLOCK ADDR.

! RECEIVE COUNT
! VECTOR ADDRESS OF AZTEC
! DEFINE REFERANCE TO AZTEC FIELDS

RC2S_DATA : block (2, word) field (RC _REG),

RECEIVE_RING: ref blockvector (REC_ALLOCATE, 2. uord] field (DSC_FIELD),

1
1

COM_ARER : blockvector (REC_ALLOCATE + SND_ALLOCATE « HDR_SIZ, 2, word],
HEAD AREA : ref block (4, word) field (HDR FIELD),

SND_ENVELOPE : blockvector [SND_ALLOCATE, SB_SIZE + 2, word] field (ENV_FIELD),

TICKS : word initial (0) volatile,

DATA]l
DATA?

:
:

word volsatile,
word volestile,

! SOTRE THE NUMBERS OF CLOCK INTERRUPTED

!
!

AZTEC STEP 1 WRITE DATA
AZTEC STEP 2 WRITE DATA

SE092224 6
(6)

J3
CZRCFCO RC2S FR END TEST
GLOBAL DATA SECTION

1685

=t s e et P

e o Pt Pt B

i P

e o Pt P

b Pt it P P Pt P P

s P P (e P Pt P P o P

1647
1648

HSGADR : word volatile,
I AM NEX

word

END_LBN
: word

initial

VAX-11 B lise-16 V4,0-579
USER$1: [ AZTEC.CZRCFCIZRCFC1.B16;1

AZTEC STEP 3 WRITE DATA
AZTEC STEP 4 WRITE DATA

INTERUPT FLAG

(0) volatile,

initial (S50901) volatile,

ENDING LBN

P_MASK : byte volatile,

B_MASK : byte volatile,

MANU SW : word voleatile,

SWITCH2 : word volatile

RET_UNIT_FLAG: word volatile,
P1 : word volatale.
P2 : word volatile,
P3 : word volatile,

word volstile,

PS : word volatile,

d V°l.tlleu
RET STATUS word volatile,

SAVES VARIOQUS RETURN STATUS
SAVES ERROR STATUS CODE
INIT SEQUENCE INTERRUPT
COMMAND DESCRIPTOR SLOT

ER_STATUS: word initial (0),
CANCEL _TIMER

: word volatile,

CMO_SLOT : word volatile,

RES_SLOT

FREE_MEM_ADDR,

MEM_SIZE

word volatile,

H_EADD

word voletile,

H_SADD : word voletile,
:

BUF LENGTH : word volatile,

CMOD : word initial (0),

NUM _RETRIES

: word voleatile,

RETRIES : word initisl (FALSE),
FAL_CODE : word initiasl (1),

DMC_TEST

BYT_CNT

RECEIVE DESCRIPTOR SLOT

word volatile,

LBN : word voleatile,
LBN_ST : word volatile,
LBN_ED : word volatile,
LBN_SZ : word volatile,

NP WF
S

1646

DATA3 : word volatile,
DATA4 : word voleatile,

27-Mar-1985 15:21:49
11-Jen-198S 08:19:19

L XY XY T RY XY N

1643
1644
1645

ot P o Pt o

ZRCFR]
v03.0

STARTING LOGICAL BLOCK @
ENDING LOGICAL BLOCK
INCREMENTING LBN SIZE
STARTING FREE MEMORY ADDR.

FREE MEMORY SIZE

LOW-BYTE FREE MEMORY ADDR.
HIGH-BYTE FREE MEMORY ADDR.
BUFFER LENGTH
COMMAND MODIFIER.
FAIL

STATUS

word,

: word,

DM_REC : word,
OM_XMT

: word,

SIZ LBN : word initial (31),
OFFSET : word initial (0),
TEMP

word volatile;

SIZE OF LBN TO GET TO NEXT TRACK
USED TO GET TO BOTTOM SURFACE

FLAG FOR FIRST PASS

SEQ 0035
Pa

(6)

I<3

ZRCFR]

CZRCFCO RC2S FR END TEST

v03.0
H

:
H

1686

1687
1688

27-Mer-1985 15:21:49

GLOBAL TEXT SECTION
1

1
1

Teo

1
1
1
1}
)
1

:
:
:
H

1697
1698
1699
1700

1
1
1
1

! FAILING FRU'S
!
)
FRU = uplit (sesciz'SAFAILING FRU = #TuD3sN’'
),

:
;¢

1702
1703

1
1

CONTRO = uplit (sesciz'CONTROLER BOARD FOR UNIT o:'),
DRIVE_ = uplit (sasciz'ORIVE BOARD FOR UNIT a:'),

'ECHAN = uplit (sesciz'MECHANIC SET FOR UNIT @:'),

i;gg

E HARDWARE AND SOF TWARE QUESTIONS

QST1 = uplit (wesciz'IP ADDRESS'),

:
:

1696

1701

i;gg
1708

1709
1710
1711
1712
17113

1716 1

:
:
:
:
:
:
H
:

:
H

H
:

H
:
:
:
:
:

TIHE = plit (P4,

RDAPTO = uplit (wesciz'ADAPTOR BOARD FOR UNIT

1}
1
1
1
1

QST2
QST3
QST4
QST6
QST7

1717
1718
1719
1720
i;gé

1
1
1
1
i

1723

Seo

1726
1727

1
1

'--

1729

1724
1;35

1728
1730

1|
1

=
=
=
=

uplit
uplit
uplnt
uplit
= uplit

@:'),

(sasciz'VECTOR' ),
(wasciz'BR LEVEL'),
(sasciz'PLATTER ADDRESS[ES]
(wesciz'USE TOP SURFACE FOR SINGLE SURFACE TESTS'
),

(sesciz'00 YOU WISH TO LIMIT AREA TESTED IN TESTS 1S-18'),
QST8 = uplit (sesciz’'STARTING TRACK'),
QST9 = yuplit (saesciz'ENDING TRACK'),

)
1

QST10 = uol-t (sasciz'D0 YOU WISH TO DO THE MANUAL INTERVENTION TEST?'),

RS10_1 = uplit (sesciz’'D0 YOU WISH TRACE MODE?'),
QS10_2 = uplit (sasciz’'D0 YOU WISH TO CONTINUE TESTING AFTER RETRIES? ),
QST1i - uwplit (wesciz'NUMBER OF RETRIES FOR TEST IF ERROR OCCURED'),
QST14 = uplit (sasciz'TURN OFF WRITE PROTECT SWITCH AND DO <CR> ),
QST1S = uplit (sesciz'TURN ON WRITE PROTECT SWITCH AND DO <CR>'),

!
!

THE FOLLOWING MESSAGES INCLUDE THE NAMES OF EACH ROUTINE, PLUS
FORMAT STATEMENTS FOR PRINTING OUT OTHER INFORMATION.

DBM1 = uplit (sasciz' SNSENSNSATESTING UNITO:%D3%A

DBMB = uplit (wesciz'SNSATEST

2 STEP 1 READ/WRITE POWERUP DIAGNOSTICS'),

DBM1S = uplit (sesciz'SNSATEST

9 DM CODE OVERLAY TEST' ),

DBM7 = uplit (sesciz'SNSATEST

1P REGISTER:%06%A

1 REGISTER EXISTENCE TEST'),

PLATTERO:%D3%N'
),

1731
1732
1733
1734
1735
1736

1}
1
1
|
1
1

DBM9 = yplit (sesciz'SNSATEST S STEP 1 THROUGH STEP 3 READ/WRITE TEST'),
DBMIO = uplit (sasciz'SNSATEST 3 DIAGNQOSTIC WRAP TEST'),
DBM11 = uplit (sesciz’'SNSATEST 4 VECTOR AND BR LEVEL TEST'),
DBM12 = uplit (sesciz'SNSATEST 6 PURGE AND POLL TEST'),
DBM13 = uplit (wesciz'SNSATEST 7 SMALL RING TEST'),
DBM14 = uplit (wesciz'SNSATEST 8 LARGE RING TEST'),

1738
1739

1}
1

DBM16 = uplit (sesciz
' SNSATEST 10 NONEXISTENT MEMORY TEST ),
DBM17 = uplit (sesciz'SNSATEST 11 BUS ADDRESSING/DATA TEST A'),

DBM20 = uplit (masciz'SNSATEST

1737

:
!

1740
1741

globel bind
RINGBASE = COM AREA [REC BASE
),

1714
1715

H
:

! THE GLOBAL TEXT SECTION CONTAINS FORMAT STATEMENTS,
! MESSAGES, AND ASCII INFORMATION THAT ARE USED IN
! MORE THAN ONE TEST.
'--

:
:
:
;
:

VAX-11 Blies-16 v4,0-579

USER$1:(AZ EC CZRCFCJZRCFC1. B816;1

ssbttl 'GLOBAL TEXT SECTION'

1689
1690
1691
1692
1693
1694
1695

:
:
:
:
:
:

]

11-Jen-198S 08:19:19

1742

1
)
1

DBM18 = uplit (sesciz'SNSATEST 12 BUS ADDRESSING/DATA TEST 8'),
DBM19 = uplit (sesciz'SNSATEST 13 BLOCK TRANSFER TEST'),

14 SPIN UP HEAD LOAD SEQUENCE'),

55093226 8
(7)

L3
2RCFR]
v03.0

;1743

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mer-1985 15:21:49
11-Jen 1985 08:19:19

)

DBM21 = uplit (mesciz WNSATEST 15 SEQUENTIAL SEEX AND VERIFY'),

DBM24 = uplit (wesciz' SNSATEST 18 TOGGLE SEEK AND venlrv ).

;.
:

1744
1°aS

1747

i
1750
i
1751
i
17152
;1753
;i
1754

1
1
1
1
1

DBM28
DBM29
DBM30
DBM31
DBM32

i
i
:

1756
1757

i;gg

1
1

DBM37 = uplit (wesciz SNSATEST 28 AYERAGE ROTATIONAL TIHE ).
DBM38 + uplit (wmesciz
' SNSATEST 29 WRITE PROTECT TEST'),

i;g?

}

! SYSTEM ERROR MESSAGES

;1762
:
1763
;.
1764
i;gz

1
1
1

MSG_01 = uplit (sesciz’ SNWAPOWER DELAY - WAITING ),
ERR_01 = uplit (mesc:z'uNSATO0 MANY UNITS'),
ERR 02 = uplit (wesciz sNWANO CLOCK WAS FOUND IN THE SYSTEM'
),

;1767
i
1768
:
1769
;1770
:
1771

1
1
1
1
1

! FORMATTED ASCIC STRINGS
!
FMTSC = uplit (sesciz'sNsN'),
FMT] « uplit (sesciz’ SNSA
REGISTER FAILED TO RESPOND AT ADDRESS:
®06sN'
),
FMT2 « uplit (wesciz' SNSAADDRESS: #068A
EXPECTED: #068A READ: #06%N'
),

1746

)
1

VAX-11 Bliss-16 V4.0-579
uscas1:[AZTEC.CZRCFCIZRCFC1.B16;1

;. 1748 11
;1749

;1755

;

DBM22 * uplit (wesciz'SNWATEST 16 SAWTOOTH SEEK AND VERIFY'),
DBM2S + uplit (swesciz'SNSATEST 17 CONVERGING/OIVERGING SEEK AND VERIFY'),
DBM2S = uplit (wesciz' SNWATEST 19 HEAD SWITCH TEST'

DBM26 = uplit (sasciz' SNSATEST 20 RANDOM SEEK AND vcélrv ).
DBM27 = uplit (sesciz'SNWATES
=
*
=
=
=

T 21

uplit
uplit
uplit
uplit
uplit

(wesciz'SNWATEST
(wesciz'WNSATEST
(wesciz'WNWATEST
(swesciz'WNSATEST
(wesciz'SNWATEST

22
23
24
25
26

SE-TOR ACCESS TEST'),

CONTROLLER PROCESSING TIME'),
ONE TRACK SEEK TIME'),
AVERAGE SEEX TIME'),
FULL STROKE SEEK TIME'),
WRITE DATA TEST')

DBM36 = uplit (wesciz'WNWATEST 27 OFFSET TOLERANCE TEST)
DBM39 = uplit

ERR_03

(sesciz'sNWA

uplit

MANUAL

INTERVENTION TEST NOT PERFORMED'
),

(sesciz'SNSAINCORRECT

;1772

FMTS

uplit

(sesciz' SNSASTEP MASK

;.
17713
:
1774
;1775
;.
1776

1
1
1
1

FMT4
FMTS
FMT6
FMT7

=
=
=
»

uplit
uplit
uplit
uplit

(sesciz'SNSA
(sesciz'sNSA
(sesciz'sNsA
(sesciz'SNSA

TRACK NUMBERS SELECTED)

#028A

FAILING nsclsvea

:o17177
;1778

1
1

FMT7A . uplit (Sesciz'®A
FMT8 = uplit (wesciz'sNSA

;1780

FMTI0 = uplit (sesciz
' SNSA

;1782

FMT12 =

uplit

(wesciz'sNSA

MAX,

;1788
;1785

)
1

FMT14
FMTIS

uplit
uplit

(sesciz
' SNSA
(wesciz wNSA

END PACKET ERROR STATUS: #C6SN'),
UNEXPECTED LOG PACKET ERROR STATUS:

1779

;1781

;1783
:

1786

;1787

)
1

FMT9 « uplit (wesciz'SNSA

FMT1] = uplit (sesciz' SNSA

FMT13 « uplit (sesc;z'SNSA
«
=

STARTING TRACK: s04sA

UNIT: sO4sA

uplit

(sesciz

WNWA

ENDING TRACK: sO4sA

HEAD: S04sA

NUMBER OF SEEKS (D): wD6sA
OFFSET

VALUE:

TRACK: ®O4SN’
),

#D2#A.%D18A percent’ ),

TRACK:

#04sA

SECTOR:

HEAD:

FMY1B8 » uplit (sesciz'SNWA
chéqc' uplit (desciz'sNSA

EXPECTED SW = OFF
ACTUAL SW * ON
EXPECTED SW = ON ACTUAL SW = OFF

;1791

ERROR STATUS: ®06%N'
)

FMT20 = uplit (wesciz'WNSA

[

%;gg %

i;g;

! INIT ERROR MESSAGES

;179
:
1797
;1798
;1799

1
1
3
1

MSG PUR
MSG_1 =
M5G
2 *
M5G
7 »

FMTSA = uplit (sesc:z'®NWA
.

sO6sN‘),

READ DATA: %06 ),

#04SA

1
i

[]

DESIRED LBN: S06%N ),

LBN: S06%N’ ),

;1788
:
i;gg
-

%068N

RCSA ERROR STATUS: sO6SN’
),
WRITE DATA: w06sA

XMT DATA: S068A REC_DATA: S068N'
),
UNIT COMES ONLINE IN: #D2%A min. #D28A.%02%A sec.'),

FMT16 = uplit (sesciz'wNSA

FMT17

%06%A DATA

PORT TYPE NUMBER « #02')
PORT SPECIFIC INFO:/NV/Q8/D1/00/MP/ = %02’ ),
MICRO CODE: MOOEL - #02%A
VERSION = %02'),
XMT_BUF: w06%A REC_BUF: SO6SN' )

wO4sN' ),

PLATTER o0 = #D3PLATTER 0 = %D3 ).

NUMBER OF RETRIES (DS %04 ),

= uplit (sesciz'
WAIT _ POWER FAIL RECOVERY'),
uplit (sesciz'RCSA FAILED 7O RESPOND’ ),
uplit (sesc.z RCIP FAILED TO RESPOND' ),
uplit (mesciz' TEST PATTERN ECHOED IN RCSA IS INCORRECT
),

SEQ 0037

Page

9
(7)

1835

S0 0 20000 0t 0t $t 50 Pt et s Pt Pt B 58 Pt Pt -8 Pt et ot P P P

Db s Pt P Pt P

s Pt it P P Pt

CZRCFCO _RC2S FR END TEST
GLOBAL TEXT SECTION

27-Her-1985 15:2 1:49
11-Jen-1985 08:1 9:19

VAX-11 Blies-16 V4.0-579

USERS1:(AZTEC.CZRCFC 1ZRCFCY. B816;1

MSG_ a « uplit (wesciz'VECTOR AND BR LEVEL TEST FAILURE'),
MSG
9 = uplit (sesciz'HOST DETECTED TIME OUT ERROR'),
710 ¢ uplit (wesciz'RING BUFFERS NOT CLEARED BY THE poav ),
MSG 11 = uplit (wesciz'STEP READ DATA DOES NOT MATCH'
)

» uplit (seeciz'PORT FATAL ERROR' ),
. uplnt (-..c 2' INIT STEP READ ERROR')

BUFF ERR
« uY it (sesciz’'MEMORY BUFFER DOES NOT CONTAIN EXPECTED DATA'),
s wlit (Iooc-z DM CODE RETURNED FAILURE COOE’ ),

INIMSG= uplit (sesciz’ SNwA
INTERRUPT AT VEC- #03sA BR LEVEL= %01'),
END MSG
» upl-t (Sesciz'NO INTERRUPT FROM PORT / CONTROLLER' ),

BRERR » uE (Sesc iz’ SNSA

MSG_SEEK

BR LEVEL RECEIVED/TYPED IS INCORRECT ¢*),

ERR
= uplit (wesciz'RC2S SEEK FAILURE'),

MSG_HSWICH ERR = uplit (wesciz'HEAD SWITCH FAILURE ),
MSG_SAC_ERR = uplit (sesciz'SECTOR READ FAILURE' ),

MSG COM WPT = uplit (sesciz'WRITE PROTECT TEST FAILURE'),

SK_FOR_ERR » uplit (sesciz'FORWARD SEEK ERROR'),
SKREV_ERR * uplit (sesciz'REVERSE SEEK ERROR' ).
SK_TOG_ERR = uplit (wesciz' TOGGLE SEEK ERROR’ ).
SK RANERR
» wlit

(Sesciz' RANDOM SEEK ERROR'
)

MSG_MRITE ERR« uplit (sesciz’' READ/WRITE TEST iu ERROR" ),
MSG_READ ERR =

MSG GUS_ERR +

uplit (sesciz' OFFSET READ ERROR'
)

it (sesciz'GET UNIT STATUS COMMAND FAILURE' ),

AVAIL ERR « uplit (sesciz'AVAILABLE COMMAND FAILURE'
),

MSG_AVE_TIME
« uplit (Sesciz’ SNSAAVERAGE SEEK TIME WITH RANDOM LBN (ms) = sD3wA %02 ),
MES SKO TIME
= uplit (sesciz' SNSAAVERAGE SEEK TIME WITH ORDERED LBN (ms) = sD3sA.8D2' ),
MSG_PROTIME=
uplit (sesciz' SNSAPROCESSING TIME (ms) = sO3SA.802'),

MSG _SK_TIME -

it (wesciz SNSAONE TRACK SEEK TIME (ms) = wD3mA.s02')

MG SKF “TIME » uplit (wesc:z SNSAFULL TRACK SEEK TIME (me) = #D3SA.%D2'),

MSE ROT TIME= uplit (sesciz’ SNWAAVERAGE ROTATIONAL TIME (ms) » sO3sA.s02' ),
A27 _READY ERR = uplit (sesciz’'RC2S UNIT DOES NOT COME ONLINE' ),

EXE_SUP ERR » uplit (sesciz'EX _SUP PROG DUP COMMAND FAILURE' ),
SND DATA ERR = uplit (wesciz’' SEND DATA DUP COMMAND Fuwae ).
5 gcbgegn ERR = uplit (wesciz REC_DATA DUP COMMAND FAILURE'

1¢eBLF/

SEQ 0038
Pagg

10
(7)

NS
ZRCFA}

CZRCFCO RC2S FR END TEST

v03.0

)

1836

27-Mer-1985 15:21:49

GLOBAL TEXT SECTION

11-Jen-1985 08:19:19

VAX-11 Bliss-16 V4.0-579

USER$1:(AZTEC.CZRCFC)ZRCFC1.816;1

{33;

}

;1839
i
1840
i
1841
i
1842

1
1
)
1

PFE_STRUCT = uplit (
uplit (sesciz' SNSASFTLERR- UNRECOGNIZABLE ERROR COOE'),

1843

i
1644
i
1845
1846
i
1847
;1848

;1849
1850
¢
1851
¢
1852

i
i

1853
1854

)

Lplit (sesciz' wNSASFTLERR- CONTROLLER ROM AND RAM PARITY'),

uwplit
uwlit
uplit
uplit
uwlit

1}
1
1
1
1
)

1855
1856
1857

1
1
1

1859

1858

uplit (sesciz'WNSASFTLERR- ENVELOPE/PACKET RCAD (PARITY OR TIMEQUT)'),
uplit (sesciz'WNSAIFTLERR- ENVELOPE/PACKET WRITE (PARITY OR TIMEOUT)'
),

1
1
)
)
|

i
i
i

Self-cetected fetel port/controller errors

uplit
uplit
uplit
uplit
uplit
uplit

(se
' sNSASFTLE
sciRRz
(vesciz'uNWASFTLERR(sesciz'SNSASFTLERR(sesciz'SNSAIFTLERR(sesciz'SNSAIFTLERR-

(sesciz'NSASFTLERR(sesciz'wNSASFTLERR(sesciz'SNSAIFTLERR(Wesciz'WNSASFTLERR(Wesciz'WNSASFTLERR(sasciz'SNSASFTLERR-

CONTROLLER RAM PARITY'),
CONTROLLER ROM PARITY'),
RING READ (PARITY OR TIMEOUT)'),
RING WRITE (PARITY OR TIMEOUT)'),
INTERRUPT MASTER')

HOST ACCESS TIMEOUT' ),
CREDIT LIMIT EXCEEDED'
),
BUS MASTER ERROR'),
DIAGNOSTIC CONTROLLER FATAL ERROR'),

INSTRUCTION LOOP TIMEOUT'),
INVALID CONNECTION IDENTIFIER'),

uplit (sesciz'SNSASFTLERR- INTERRUPT WRITE'),
uplit (sesciz’'SNSASFTLERR- MAINTENANCE READ/WRITE INVALID REGION IDENTIFIER'),
uplit (sesciz'#NSASFTLERR- MAINTENANCE WRITE LOAD TO NON-LOADABLE CONTROLLER'
),

uplit (sesciz'WNSASFTLERR- CONTROLLER RAM ERROR (NON-PARITY)'),

:
1860
;1861
i
1862

1
1
%

uplit (sesciz'SNSASFTLERR- HISH LEVEL PROTOCOL INCOMPATIBILITY ERROR'),
uplit (vesciz'SNWASFTLERR- PURGE/POLL HARDWARE FAILURE '),
uplit (sesciz'SNSASFTLERR- MAPPING REGISTER READ ERROR (PARITY OR TIMEOUT)')
) : vector [23),

uplit (sesciz'SNSASFTLERR- INIT SEQUENCE ERROR'),

1. BLF/PAGE>

SEQ 0039

Page

(8)

s Error messege structure

d o

1866
1867
1868
1869
1870
1871
1872
1873

Laad ad d od o d o d

1865

EMSG_STRUCT = UP

uplit (sesciz'SN®A

TLERR RESPONSE STATUS ERROR:%S'),

uplit (wesciz'SNMASFTLERR- SUPERVISOR SERVICE CALL FAILED ),

uplit (wesciz'SNSASFTLERR- PORT/CONTROLLER TIMEQUT ERROR'),
?péigl(ioQC|z‘lNiAOFTLERR- UNKNOWN RETURN STATUS CODE')) : vector (4],
. <

page>

VAX
USER

)O-

v03.0

27-Mer-1985 15:21:49
11-Jen-1985 08:19:19

CZRCFCO _RC2S FR END TEST
GLOBAL TEXT SECTION

ZRCFB1

L 3
.-..-.

B4
1

4,0-579

RCFC]ZRCFCI 816;1

SEQ_0040
P

eae (9)

C4
CZRCFCO RC2S FR END TEST

ZRCFR1

11-Jen-1968S 08:19:19

[]

s Self-detected fatal port/controller errors
RC_STRUCTURE =

uplit (

wlit (loociz‘lNll‘F LERR- VAX READ/WRITE ERROR ON INTERRUPT'),

uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit
uplit

(sesciz'SNSASFTLERR(wesciz'SNSASFTLERR(wesciz' SNSASFTLERR(sesciz' SNSASFTLERR(sasciz'wNWASFTLERR(wasciz
' wNSASFTLERR(sesciz'SNSASFTLERR(sesciz'SNSASFTLERR(sesciz'¥NSASFTLERR(sesciz'#NSASFTLERR(vasciz' SNSASFTLERR(%esciz SNSASFTLERR(wesciz
' SNSASFTLERR-

INCONSISTENCY AT U.BFIL'),
INCONSISTENCY AT U.BMTY'),
INCONSISTENCY AT U.ALOC'),
INCONSISTENCY AT SERVO ENTRY (PIP SET)'),
INCONSISTENCY AT SERVO ENTRY (ERR SET)'),
INCONSISTENCY AT U.SEND'),
INCONSISTENCY AT U.RECV'),
INCONSISTENCY AT U.ATTN').
INCONSISTENCY AT U.ONLN'),
ILLEGAL D REQUEST (U. QDRQ)' ).
FENCE-POST ERROR AT PROTAB'),
BAD PACKET DEQUEUVED AT U.DONE'),
UNEXPLAINED D-PROC SUSPENSION (U..TDS)'),
-

et P P
s P P P P P P o P
s Pt i i o P P Pt i P P B Pt o e (i P
sP
i o et 1t ot ot P
2 00 0t 1t 2 Bt 1

1874
1875
1876
1877
1878
1879
1880
1881
1882
1883
1884
1885
1886
1887
1888
1889
1890
1891
1892
1893
1894
1895
1896
1897
1898
1899
1900
1901
1902
1903
1904
1905

27-Mar-1985 15:21:49

GLOBAL TEXT SECTION

v03.0

uplit (sesciz'SNSASFTLERR- DUP PACKET D-Q FAILED (XFC 34/35)'),
uplit (sesciz'SNSASFTLERR- INCONSISTENCY AT U.HTST'),
uplit (sesciz'SNSASFTLERR- INCONSISTENCY AT U.SEKO'),

uplit (sesciz' wNSASFTLERR- INCONSISTENCY AT U.C¥5V')

uplit (sesciz'SNSASFTLERR- D.OPCD FOUND ILLEGAL JPCODE’ ).

uplit
uplit
uwplit
uplit
uplit

(vesciz'WNSASFTLERR(sesciz'SNSASFTLERR(wesciz'wNSASFTLERR(vasciz'SNSASFTLERR(sesciz’'wNSASFTLERR-

D.CSF FOUND ILLEGAL OPCODE'),
UNKNOWN BAD DRIVE STATUS AT 0.DSTS'),
ILLEGAL XFC EXECUTED BY OM'),
D PICKED UP A ZERO SCB.0B'),
INCONSISTENCY AT D IDLE LOOP'
),

uplit (sesciz
' SNSASFTLERR- DM WORD COUNT ERROR ON HOST DHA/SEND/RECV ),
uwplit (sesciz' SNSASFTLERR- UNKNOWN DISPLAY FAULT CODE AT D.DFLT'),
uplit (wesciz'WNSASFTLERR- DRIVE NOT FAULTING IN P.OFLN STATE'),

uplit (sesciz'SNSASFTLERR- U POWER UP DIAGNOSTICS FAILED' ),

uplit
uplit
uplit
uplit
uplit
uplit
wplit
uplit
uplit
uplit
uplit

(sesciz'SNSASFTLERR(vesciz'SNSASFTLERR(sesciz
' #NSASFTLERR(sasciz'wNSASFTLERR(sesciz'SNSASFTLERR(sesciz'wNSASFTLERR(sasciz' SNSASFTLERR(sesciz' SNSASFTLERR(sesciz'SNSASFTLERR(sasciz'wNSASFTLERR(lasc:z'iN‘ASFTLER%-

t<blf/page>

D POWER UP DIAGNOSTICS FAILED'),
ADAPTER CARD FAILURE'),
EC.TMR TIMED OUT'),
)
U,SEND/U.RECV RING READ _NCONSISTENCY'),
UNKNOWN WAITRV REASON AT D.RVCT'),
D.ARCS DID NOT FIND CLOSEST UNDONE ZONE'),
U.SEEK FOUND SEEX TO ILLEGAL TRACK'),
U.HTST INIT DIAG DMA WRITE FAILED'),
U, HTST INIT DIAG DMA COMPARE FAILED'),
U.SYDR FOUND SS.DER SET AND SS.SPN NOT SET'),
MASTER o?§g§s ACLO ASSERTED')
vector

VAX-11 Bliee-16 V4.0-579

USER$1:(AZTEC.CZRCFCJZRCFC1.816;1

SEong:I 13
(10)

D4
CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

ZRCFB1
1919
1920

1925
1926
1927
1928
1929
1930
1931

5
g S BT S

1921
1922
1923
1924

[]

lad ol ol ol ol T

®s

v03.0

Dup return status codes

_SOUP_STRUCT =
uplit (
uplit (wasciz'sA SUCCESSFULSN'
),
uplit (sasciz'sAINVALID COMMANDSN'
),
uplit (Sotc!z'SANO REGION AVAILABLESN'),
uplit (wasciz'MANO REGION SUITABLESN'),
uplit (%esciz'wAPROGRAM NOT KNOWNSN'),
uplit (sasciz'wALOAD FAILURESN'
),
uplit (sasciz'wASTANDAL
ONESN' )
) : vector (7],
'<blf/page>

27-Mar-1985 15:21:49
11-Jen-1985 08:19:19

VAX-11 Bliss-16 V4.,0-579
USER$1:(AZTEC.CZRCFCJIZRCFC1.B16;1

SEQ 0042
Page

(1D

E4
ZRCFR1

CZRCFCO_RC25 FR END TEST

v03.0

GLOBAL TEXT SECTION

1932

1934
1935

;1933

;1936
1937

;1938

;1939
i
1940
;1941

;1942

i
i

27-Mar-1985 15:21:49

)
1

11-Jan-1985 08:19:19

! MSCP return status codes

!
_SMSCP_STRUCT = uglut

1
1

uplit (sesciz'wASUCCESSSN' ),
uplit (%esciz’'sAINVALID COMMANDSN'),

1
1
1

uplit (%esciz'SAUNIT-OFFLINESN' ),
uplit (sesciz'SAUNIT-AVAILABLESN' ),
uplit (sasciz’'#AMEDIA FORMAT ERROR®N'),

uplit (Wesciz'ACOMMAND ABORTEDSN'),

uplit (sesciz'SAWRITE PROTECTED®N'),

1943
1944

1
)

uplit (sesciz’'SACOMPARE ERRORWN'),
uplit (wesciz'#ADATA ERRORSN'
)

i
1946
;1947

1
)

uplit (sesciz'SACONTROLLER ERRORSN'),
uplit (%esciz’'ADRIVE ERRORSN'
),

;1949
1950
i
;1951
1952
i

1
1
1
1

1945 1

;1948

1953

uplit (sesciz'®AHOST BUFFER ACLESS ERRORWN' ).

uplit (%asciz’'SAMESSAGE FROM AN INTERNAL DIAGNOSTICHN')

) : vector [13];

end
eludom

.TITLE
.IDENT
000000
000000
000003
000006
000007
000010
00010
000011
000012
000014
000016
000020

101
060
0000006
000170
0000006
0000006

.PSECT
L$NAME:
: .ASCII
.ASCII
.BYTE
.BYTE
L$REV::
.ASCII
.ASCII
L $UNIT::
. WORD
L $TIML::
. WORD
L $HPCP:: .WORD
L $SPCP::
. WORD

000024
000026
000030
000032
000034
000036
000040

000244
000000G
000000
000000
000000
000000
000124’

$SPTP::
. WORD
tSLADP::.HORD
$STA:: .WORD
.WORD
L $CO::
L $OTYP::.WORD
L$APT:: .WORD
L$DTP:: .WORD

000022

103
103
000
000

000230’

000042
000044
000046
000050
000050
000051

000000
000000
000000

000054
000056

000000
000000

joooosz

003
003

000000

132
106

122
040

ttHPTP::.HORD

L$PRIO::.WORD
L$ENVI::
. WORD
L$EXPl::.WORD
LS$MREV:
:
.BYTE
.BYTE

L$EF::

L$SPC::

.WORD

.WORD
.WORD

ZRCFB1 CZRCFCO RC2S FR END TEST
/VO03.0/
AAS$CODE,
/CZR/
/CF /
O
O
/A/
/0/
T$PTHV
170
L $HARD
L$SOFT

L$HW

L$SW
L$LAST
O
O
O
O
LS$DISPATCH

O
O
O
3
3

O
O

VAX-11 Blies-16 V4.0-579

USER#$1: (AZT C CZRCFCIZRCFC1.B16;1

SEQ 0043

Page

(12)

F4
CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

ZRCFB1
v03.0

27-Mar-1985 15:21:49
11-Jan-1985 08:19:19

000060
000062
000064
000066
000070
000072
000074
000076
000100
000102
000104
000106
000110
000112
000114
000116
000120
000122
000124

L$DEVP:
: .WORD
L$REP?::
. WORD
L$EXP4:
: . WORD
L$EXPS:
: .WORD
L$AUT:: .WORD
L$DUT:: .WORD
LSLUN:: ,WORD
LSDESP-'.HORD
L$LOAD:: .WORD
L$ETP:: .WORD
L$ICP:: .WORD
L$CCP:: .WORD
L$ACP:: .WORD
L$PRT::
.WORD
L$TEST: : .WORD
L$DLY:: .UORO
LSHIHE::.UORD
DS$PCNT: : .WORD
L$DISPATCH

000126
000130
000132

-WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

L$ERRTBL
LS$INIT
L$CLEAN
L$AUTO
L$PROT

. WORD

000162
000164
000166
000170
000172
000174
000176
000200
000202
000204
000206
000210
000212
000214
00216
000220
000222
000224
000226

000000C

000230

172150

000232

000154

L$OVTYP

0000006
0000006
0000006
0000006

ERRTYP::
ERRNBR:: .BLKW
ERRMSG: .BLKMW
ERRBLK:: .BLKW
L $HWLEN:
:

.WORD
P.IP.ADDRESS: :
.WORD
P.VECTOR:
:

<<L $NDHUW-L $HWLEN>/2>

-5630

VAX-11 B lis 9-16 vV4,0-579
USER$1: (AZT C CZRCFCIZRCFC1.816;1

SEQ 0044

Page

(12)

ZRCFR}

CZRCFCO RC2S FR END TEST

v03.0

GLOBAL TEXT SECTION

000234

000005

000236

000000

000240

000242

000000C

000244

000001

000246

000000

000250

000000

000252

001464

000254

000000

000256

000000

000260

000000

000262

000001

000264
000266
000270
000272

177777
177777
1771717

000000
000000
000002
000004
000006
000011
000014
000017
000022
000025
000030
000033
000036
000041
000044
000047
000052
000055

000060
000063
|000066
000070
000073
00076
000101
000104

G4
27-Mar-1985 15:21:49

000002
005640
005642
045
101

111
040
125
040
04S
045
101
120
122

117
104
117
125
124
072
103
124
114
040
101

11-Jen-198S 08:19:19

.MORD
P.BR.LEVEL::
.WORD

P.UNIT.NUMBER::
.WORD
LSNDHW:
: .BLKW

L$SWLEN::
JHORD

SWP.TOP::
.WORD
SWP LIMIT::
LWORD
SWP
. START: :
.WORD
SWP.END::
.WORD
SWP.RETRIES:
:
.WORD
SWP . CONTINUE::
.WORD
SWP . MANUAL
:;
.WORD
SWP., TRACE: :
.WORD
LSNDSW::.BLKW
L$PROT: : .WORD
.WORD
.WORD

P.AAAR:
101
11
116
106
040
045
104
116
104
124
040
101
040
122

116
040
0G0
117
122
105
102
122

106
114
107
122
075
124
063
000
101
117
102
122
106
040

P.AAB:

P.AAC:

111
043
116
117
122
117
104

P.AAD:

.PSECT
LWORD
_WORD
LWORD
.ASCII
LASCII
.ASCII
.ASCII
LASCITI
LASCITI
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCII

.ASCII
LASCII
LASCII
,ASCII
.ASCII
LASCII
.ASCII
.ASCII

VAX-11 Bliss-16 V4,0-579

USER$1:[AZTEC.CZRCFCIZRCFC1.B16;1

154

S
O
1

<<L$NDSW-L$SWLEN>/2>

O
O
1464
O

O
O

1
1
-1
-1
-1

$PLITS,
2
P4
PS
/w#AF/
/AIL/

/ING/
7/ FR/
7U =/
7/ w1/
/%D3/
/%N/<00>
/ADA/
/PTO/
/R B/

/0AR/
/D F/
/OR /
/UNI1/
/T ¢/
/:/<00>

/CON/
/TRO/
/LER/
s BO/
/ARD/

RO,

GBL

; Plit count word

Seopgges 17
4

(12)

H4
ZRCFR1
v03.0
000107
000112

000115
000120
000123
000124
000127
000132
000135
000140
000143

000146

000151
000154
000157

000162

000165
000170
000173
000176
000201
000204
000206
000211
000214
000217
000222

000225
000230
000232
000235
000240
000243
000244

000247
000252
000255
000260
000263
000266
000270
000273

000276
000301
000304
000307
000312
000315
000320
000323

000326
00331
000334
000337
000342
000345
000350

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION
106
040
111
043

117
125
124
072

122
105

111
040

104

040

124
072
105
101
103
105
106
040
111
043
000
120
104
105
000
105
117
000
122
105
114

040
000

117
117
125

114
124

040

27-Mar-1985 1 3:2 1: 49
11-Jen-1985 0 8:1 9::19

P.RAE:

101

122
116

103
116
040
124
117
125
124
072

P.AAF:

040
104
123
000
103
122

P.AAG:

P.AANK:

040
126
000

P.AAI:;

101
105

P.AARJ:

101

104
123
105

122
123
123

123
124
040
122
103
106
040
116
105
125
101
040
123

105
117
123
106
105
117
123
107
040
122
103
124
124

P.AAK:

117
117
127

040
125
111

P.AAL:

000

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIT
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ARSCII
.ASCII

/ FO/
/R Y/
/NIT/

/ @:/
<00»

/DRI/
/VE /
/BOR/
/RD /
/FOR/
/ UN/
/1T 7/
/70:/7<00>
/MEC/
/HAN/
/I1C 7/
/SET/
/ FOQ/
/R U/
/NIT/

/ @:/

<00><00»

/1P v/
/RADD/
/RES/
75/<00><00>
/VEC/
/T0R/
<00><00>

/BR /
/LEV/
/EL/<00>
<00»

/PLA/
/1TE/
/R A/
/DDR/
/ESS/

/(ES/
/1/<00>

/USE/
/7 10/
/P S/
/URF/
/ACE/
/ FO/
/R S/
/ING/
/LE /
/SUR/
/FAC/
/E 1/
/EST/
/5/<00><00>
/00 /
/7Y0U/
/ Wl/

VAX- 11 B81i 8s-1 6 V4,0-579
USER¢ 1:(AZ TEC. c ZRCFC)ZRCFC1.B16;1

SEQ 0046

(12)

14
ZRCFB1

v03.0

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mar-1985 1 5:2
:21:4 9
:19:1 9
11-Jen-1985 0 8:1

040
040

115

040
105

124
124
040
040

123

040
055
000
101
111
040
101
000

P.AAM:

<F»

104
107
122
113

P.AAN:

040

P.AAQ:

125
111

040
040

105
101

101
111
105

105

111

040

123

125

111
040
101
0490
104
000
040

125
111

040
040
116
116
040

123

/END/
/ING/
/7 TR/
/ACK/

<00><00>

040

000
040

/SH /
/10 /
/LIM/
/1T /
/ARE/
/A 1/
/EST/
/ED 7/
/IN /
/TES/
/18 7/
/715-/
/718/<00>
/STA/
/RT11/
/NG /
/TRA/
/CK/<00>

P.AAP:

/00 /
/7YOU/
/ W1/
/SH /
/10 /7
/D0 /
/THE/
/ MA/
/NUR/
/L 17
/NTE/
/RVE/
/NT1/
/0N /
/TES/
/12/7<00>
/00 7
/7YOU/
/ W1/
/SH /

/TRA/
/CE /

P.ARQ:

/M0D/
/E?/<00>
/00 /
/7YOU/
/7 W1/
/SH /
/10 7/
/7CON/
/TIN/

/UE /
/TES/

VAX-11 Bliss-16
V4,0-579
1
USER$1: 1:( (AZTEC.CZRCFCJZRCFC1.816;1

SEQ 0047
Page
19
(12)

J4
ZRCFR1
v03.0

CZRCFCO _RC25 FR END TEST
GLOBAL TEXT SECTION
111
040
124
040
124

105

000

125
105
117
122
122
123
117
124
124
106
122
122
103
122

116
101
105
122
122
123
000

115

122
106
105
111
040
122
105
040
040
122

27-Mer-1985 15:21:49
11-Jan-1985 08:19:19
/TIN/
/G A/
/FTE/
/R R/
/ETR/
/1ES/
/71/<00>¢ 00>
/NUM/
/BER/
/ OF/
/7 RE/
/T1R1/
/€S /
/FOR/
/7 TE/
/81 7
/IF 7
/7ERR/
/0R /
/70CC/
/URE/
/D/<00>
/TUR/
/N 0/
/FF /
/WR1/
/1€ 7/
/PRO/
/T1EC/
/T S/
/WIT/
/CH /
/AND/
/7 DO/
/ <C/
/R>/<00»
/TUR/
/N 0/

P.AAR;

040

103
105
P.AAS:

P.AAT:

/N W/
/RI1/
/€ P/

/R0OT/
7eC1/
/ SW/
/I11C/
/H A/
/ND /7
/00 /
/7<CR/

/7>/7<00>¢ 00>

P.AAU:

001072

ASCII

/9Ns/
/NsN/
/%AT/
/EST/
/ING/
/ UN/
/110/

VAX-1 1 Bl is8-16 V4.0-579
USER$ 1: (A ZTEC.CZRCFC]ZRCFC1.B16;1

SEQ 0048
Page

(1 2)

ZRCFRY

CZRCFCO RC2S FR END TEST

v03.0

27-Mer-1985 15:21:49

GLOBAL TEXT SECTION

11-Jen-1985 08:19:19

001075
001100

072
063

045
045

104
101

LASCII
LASCII

/:%D/
/3wA/

001106

120

137

122

.ASCII

/P R/

105
045

.ASCII
LASCII

001103

001111

001114
001117

001122
001125
001130
001133
005136
001141
001144
001147
001150
001153
001156
001161
001164
001167
001172
001175
001200
001203
001206
001211
001214
001217
001222
001225
001230
001233
001236

001241
001244
001247
001252
001255
001260
001263
001266
001271
001274

040

105

123
122

117
101
120
124
122
045
045
000
045
101
123
040
122
111
105
105
123
116
040
123
045
101
123
040
123
120
040

040

107

124
072

045
040
104
105
072
063
000

116
124
124
061
105
123
122
130
124
103
124
124
116
124
124
062
124
040
122

045
105
040
040
107
124
040
111
105
105
105
000
045
105
040
040
105
061
105

104
122
105
117
122
040
101
117
111
000

001307

040

065

01337

040

1312
1315
001320
1323
1326
1331
01334

001342

04S
101
123

LASCII

111

066
040
114
124
043
104
116

101
127
124
120
105
120
111
116
124
123

001276
001301
001304

111

.ASCII

P.AAV:

P.AAW:

057
111
040
127
125
104
107
123
103

.ASCII
LASCII
.ASCI1
LASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
LASCII

/€G1/
/STE/
/R:%/

/06%/
/A
7/
/PLA/
/17E/
/Re:/
/#D3/
/#N/<00>
<00>
/suNm/
/ATE/
/ST /
71/
/REG/
/1S1/
V/ER /
/EX3/
/STE/
/NCE/
/ TE/
/ST1/<00>
/sNs/
/ATE/
/ST /
/7 27/
/STE/
/P 1/
/ RE/

/AD/<57>
/uWR1/
/TE /
/POM/
/ERU/
/P D/
/IAG/
/NOS/
/TIC/
/5/¢00>

045
105
040

123
120
040
122
107
123
120

124
040
124
117
110
124
040

105
061
110
125
040
105
063

LASCII
LASCII
LASCII
.ASCII
LASCII
.ASCI1
LASCI1

/STE/
/P 1/
/7 TH/
/ROU/
/GH /
/STE/
/P 3/

101

104

057

.ASCII

/AD/<57>

122

105

.ASCII
LASCII
LASCII

116
124
124

040

P.AAX:

ASCII
ASCII
ASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCII
_ASCII
.ASCII
LASCII
ASCII
.ASCI1
LASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCI1
LASCII
.ASCII
.ASCI1
.ASCII
ASCII
LASCII
LASCII
.ASCII

ASCII

LASCI1

/suNs/
/ATE/
/ST /

/5 7

/ RE/

VAX-11 Bliss-16 V4.0-579

USER$1:[AZTEC.CZRCFCJZRCFC1.816;1

5‘“»22e9 21
4

(12)

)

P.AAZ:

P.ABA:

124

066

125
105

116
120
114
105
000
116

124

P.ABB:

124

067

111
040

123

116
124

124
070
101
105
111

115
114

i) By Bl e B B B

123

000
116
124

) Dol D

101
040
040
126
040

lalalal
ol S T
TS laalaal
a1 o] ot-t

105
117

e D) Dt B

116
124
124
064

el B

101
124
124

ot Dl Bl D) el B Bl D

040

) B Dl o B D D Do

-4 lalal lalalal [adend o alalalal ol ol Sl o] Sl o

P .AAY:

"asC

) Do D) Dt Dt Bl B D Dl D Pl Dt

111
040

Gl S Bt 0 D) e B D Bl el o D B

001402
001405
001410
001413

122
105
105
000
116
124
124
063
111
116
124

001345
001350
001353
001356
001360
001363
001366
001371
001374
001377

27-Mer-1985 15:21:49
11-Jen-1985 08:19:19

1 . 3.2.3.3.3.2.2.3. >PPDPD>D » » »> > » > >
vurnununuvnnwn wurunonw w w wnwn wunwn v w
alalalnlalalalals] (alalalaln] (&) o [(aln] [alalsnl [aln)]

v03.0

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

»
w

ZRCFR]

P.ABC:

/WR1/

/1€ 7/
/TES/
/1/7<00>
/%Ns/

/ATE/
/7871 7/
/737
/D1A/
/GNO/
/57117
/C W/
/RAP/
/7 1€/
7517¢<00>
<00»

/
/BN
/ATE/

/81

/ & /
/VNEC/
/TOR/
/ AN/

/0 8/

/R L/
/EVE/
/L 1/
/EST/

<00><«0D>
/
/%N

/ATE/
/81 7
/7 6 /
/PUR/
/GE 7/
/AND/
/ P0Q/
/LL

/TES/
717<«Q00>
/
/8N
/ATE/
/781 v/
/7 7 7/

/SMA/
/LL

/RIN/
/6 17
/EST/
<00>

/78NS
/

/RTE/
/81 7
/7

/LAR/

/GE 7
/RIN/

SEQ 0050
Page
22
USER$ 1:( A ZTEC.CZRCFC]ZRCFC1.B16;1
(12)

VAX-1 18 1 iss-16 V4.0-579

M4
ZRCFR)

CZRCFCO RC2S FR END TEST

v03.0

001611
001614

27-Mer-1985 15:21:49

GLOBAL TEXY SECTION

000
045
101
123
040
104
103
105
126
114
040
123

040
123

124
124

116
124
124
071
115
117
040
105
101
124
124

045
105
040
040
040
104
117
122
131
105
000

P.ABD:

116
105
123
116
115
117
040
123
045

045
105
040
040
116
111
105
040
115
131
105
000
045

P.ABE:

001676
001701
001704
001707
001712
001715
001720
001723
001726

116
124
124
060
117
130
124
124
105
122
124
124
116

001742
001745

102
040
104
123

001617
001620
001623
001626
001631
001634
001637
001642
001645
001650
001653
001656
001661
001662
001665
001670
001673

001731
001734
001737

001750
001753

107
105

11-Jon-1965 08:19:19

000
045
101
123
061

101
123
061

001756
001761
001764
001767
001772
001775
001776
002001
002004
002007

116
104
101
105
040
000
045
104
123
061

2015
2020
2023
2026

040
104
123
116

002012

2031
2034
2037
2042

2045
2046
02051

102

104
10}
105
040
000
S
101

124
124
061

105
040
040

12¢
123

105
111

125
101

.ASCII
.ASCII

P.ABF:

123
104

107
10}
040
123
101

057
124
124
124
000

116
124

045
105
040
040

124
062
125
101
122
123
107
101
040
123

104
105
111
057

102

124
124
124
000

116
124

045
105

.ASCII
.ASCII
.ASCII
LASCTT
MSLLT
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII

123

«00»
/wNw/
/ATE/
/ST /
/10 /
/NON/
/EX1/
/STE/
/NT /
/MEM/
/ORY/
/7 Te/
/S1/<00>
/wuNs/

ASCII
ASCII

/BUS/
/ AD/

.ASCI1
ASCII
ASCII

/ATE/
/ST /
/11 /

ASCI1
ASCII
ASCII
ASCII
ASCII
.ASCII
.ASCI1
.ASC11
.ASCI1
LASCII

/DRE/
/SS1/
/NG/<S7>
/DAl/
/A 1/
/ES1/
7/ A/7<00>
<00>
/sNs/
/ATE/
/ST /
/12 /

ASCI1
ASCI1
ASCII
ASCII

/ AD/
/DRE/
/SS1/
/NG/<S57>

ASCII

ASCI1
ASCII
ASCII
ASCII

P.ABH:

<«00>
/wNw/
/ATE/
/ST /
797/
/DM /
/C00/
/€ 0/
/VER/
/LAY/
/ TE/
/S51/<00»

.ASCII
.ASCII
.ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
.ASCI1
_ASCI]

ASCII
ASCII

P.ABG:

/G 1/
/E&S1/

.ASCII
_ASCII]
LASCII

/BUS/

/DAl/
/A 1/
/€EST/
7/ 8/<00»
<«00>
/sNw/
/ATE/

VAX 11 Blies-16 V4.0-579

USER$1:[AZTEC.CZRCFC)ZRCFC1.816;1

5EQ 0091
Page

(12,

N4
ZRCFR1

v03.0

002054
002057
002062
002065
002070
002073
002076
002101
002104
002106
002111
002114
002117
002122
002125
002130
002133
002136
002141
002144
002147
002° 52
002155
002156
002161
002164
002167
002172

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION
063

040

27-Mer-1985 15:21:49
11-Jen-1985 08:19:19

/787 7
/13 /
/78L0/
/€K /
/TRA/

/NSF
/7
7€ER /
/7TES/
/1/7¢00>
/9%Ns/
/ATE/
/787 7

/714

/5P1/
/N U/
/P W/
/ERD/
/7 L0/
/R0 /
/75€Q/
7UEN/

/7CE/<00>
<00»

/%Ns/

/ATE/
/787 7/
/715 7
/5€Q/
/UEN/
/T11A/

/L S/
/EEK/
/ AN/
/D v/
/ERI/

/FY/<00>

<00>
/%N
/

/ATE/
/81 7

/716 /
/SAW/

7100/
/TH /
/5€c/
/K A/

/ND /
/VER/
/IFY/
<00><00>

/9Ns/

02316

/ATE/
/81 7/
/717 7
/7CON/
/VER/
/GIN/

VAX-1 18 1 ise-16 vV4.0-579
USER$ 1:( AZ21 €EC.CZRCFC)ZRCFC1.816;1

SEQ 0052
Page

(1 2)

ZRCFB1

CZRCFCO RC2S FR END TEST

v03.0

002321

002324
002327
002332
002335
002340
002343
002346
002351
002354
002356
002361
002364

GLOBAL TEXT SECTION

107

111
122
116
123
113
116
126
111
000
04S
101
123

05?7

126
107
107
105
040
104
105
106
000
116
124
124

002367
002372
00237S
002400
002403
002406
002411
002414
002417
002422

061
124
107
040
105
101
040
122
131
04S

070
117
114
123
113
116
126
111
000
116

002433

061

071

002425
002430
002436
002441
002444
002447
002452
002455
002460
002463
002466
002471
002474

002477
002502
002505
002510

002513
002516
002521

101
123

110
104
T
103
124
124
045
101
123
062
122

105
040
111
110
105
000
116
124
124
060
101

126
111
000

101
123
062
123
124
040
103
123
105

124
124
061
10S
117
101
105
040
123

045
101

116
124

045

002562

000

002564
02567

124
124

104
040
10S
101
040
122
131

002524

002527
002532
002535
002540
2543
2546
2551
2554
2SS7

B5
27-Mer-198S 15:21:49

117
123
113
116

116

000

11-Uen-1985 08:19:19

104

LASCII

108
111
040
10S
101
040
122
131
045
10S
040
040
107
10S
105
040
104
105

P.ABM:

106

000
045
105
040
040
101
123
124
040
123
000
04S
105
040
040
116

P.ABN:

P.ABO:

P.ABP:

045
10S

P.ABQ:

/G/<S7>/D/

/IVE/
/RGl/
/NG /
/SEE/
/K A/
/ND /
/VER/
/IFY/
<00><00»
/wuNs/
/ATE/
/ST /

/18 /
/70G/
/GLE/
7 SE/
/EK /
/AND/
/ VE/
/RIF/
/Y/<00><00>
/sNs/

.ASCII
LASCII

/ATE/
/ST /

LASCII
LASCII
LASCITI
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
.ASCII

/HEA/
/D0 S/
/uWlt/
/CH /
/TES/
/7/¢00><00>
/sNs/
/ATE/
/ST /
/20 /
/RAN/

LASCII
LASCII
.ASCII
.ASCII

045

105
040
040
103
122
103
123
124
124

LASCII
LASCII
LASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCI]
LASCII

11§
105
040
104

105
106
000

ASCII
ASCII
LASCII
.ASCII
LASCII
LASCII
.ASCII
LASCITI
LASCII
,ASCII
.ASCII
.ASCII

719/

/D0OM/
/ SE/
/EK /
/AND/

LASCII
.ASCII
LASCII

7 VE/
/RIF/
/Y/<00><00>

LASCII
LASCII
.ASCII
.ASCII1
.ASCII
LASCII
.ASCII
LASCII
LASCII

/ATE/
/ST v/
/21 /
/SEC/
/TOR/
AC/
/CES/
/S 1/
/EST/
<00><00>
/%Ns/

.ASCII

LASCII

.ASCII
LASCII

/sNw/

/ATE/

VAX-11 Blise-16 V4.,0-579

USER$1:(AZTEC. CZRCFC]ZRCFCI B16;1

SEQ 00

Pog33 25

(12?

C5
ZRCF81}

CZRCFCO RC2S FR END TEST

v03.0

002572
002575
002600
002603
002606
002611
002614
002617
002622
002625
002630
002633
002634
002637
002642
002645
002650
002653
002656
002661
002664
002667
002672
002674
002677
002702
002705
002710
002713
002716
002721
002724
002727

GLOBAL TEXT SECTION
123
062
103
124
114
122
122
105
111
040
115
000
045
10}
123
062
117
040
101
040
105
124
105
04S
101
123
062
101
122
105
105
040
115

040
040
116
117
105
120
103
123
107
111
000

116
124
124
063
116
124
103
123
113
111
000
116
124
124
064
126
101
040
105
124
105

045
105
040
040
105
122
113
105
040
115

P.ABR:

045
105
040
040
105
107

P.ABS:

045
101
123
062
106
114
124
113
123
113
111
000
045
101

116
124
124
065
125
040
122
105
105
040
115

003016
03021
3024
003027
03030
003033

104
101
105
000
045
103

101
040
123

123
062
127
124

11-Jen-198S 08:19:19

124
062
117
122
114
040
117
123
116
124
105

002732
002735
002740
002743
002746
002751
002754
002757
002762
002765
002770
002773
002774
2777
003002
03005
3010
003013

27-Mar-1985 15:21:49

116
124

124
066
122
105

116
124

123
113
111
000
045
105
040
040
114

P.ABT:

123
117
040
105
124
105
04S
105
040
040
111

P.ABU:

_ASCII
.ASCI1
LASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
LASCII
LASCITI
LASCII
ASCII
,ASCII
.ASCII
LASCII
LASCITI
LASCII
LASCII

040
124
124
124

045
105

LASCII
JASCIT
.ASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
JASCIT
.
11
oIl
.ASCII
.ASCTI
JASCII
LASCITI
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCITI
.ASCIYI
.ASCII
LASCII
LASCIT
LASCII
.ASCII
.ASCII
LASCII
JASCII
LASCII
LASCII

P.ABV:

.ASCII
LASCII
LASCII
LASCII
,ASCII
LASCII

/ST /
/22 /
/CON/
/TROQ/
/LLE/
/R P/
/ROC/
/ESS/
7ING/
7 T1/
/ME/<00>
<00
/wNw/
/ATE/
/ST v/
/23 /
/ONE/
/ TR/
/ACK/
/ SE/
/€K /
/T1IM/
/E/<0Q0>
/wNs/
/ATE/
/ST v/
/24 /
/AVE/
/RAG/
/€ S/
/EEK/
/7 11/
/ME/<00>

/sNs/
/ATE/
/ST 7/
/25 /
/FuL/
/L S/
/TRO/
/KE /
/SEE/
/K T/
/IME/
<00»
/%Ns/
/ATE/

/ST /
/26 /
/WRI/
/TE /

/DAT/
/A T/
/EST/
<00»
/%Ns/
/ATE/

VAX-11 Blise-16 V4,0-579

USER$1:[AZTEC.CZRCFC)ZRCFC1.816;1

SEQ 0054

Page

(12)

D5
ZRCFB)

CZRCFCO RC2S FR END TEST

v03.0

GLOBAL TEXT SECTION

003036
003041
003044
003047
003052
0030SS
003060
003063
003066
003071
003072
003075
003100
003103
003106
003111
003114
003117
003122
003125
003130
003133
003136
003141
003144
003147
003152
003155
003160
003163
003166
003171
003174
003176
003201
003204
003207

123
062
117
123
040
114
101
105
105
000
04S
101
123
062
101
122
105
117
124
116
040
115
045
101
123
062
127
124
120
124
124
105
000
045
101
101
101

003226

040

003237
003242
003245
003250
003252

040
122
122
104
04S

003212
003215
003220
203223
003231
003234

003255
003260
003263
3266
03271
3274

03277
03302

27-Mer-1985 15:21:49

111
105
105
111

123
116

101
127
040
114
040
127

124
107

124
067
106
105
124
105
116
040
123

040
040
106
124
117
122
103
124
124

116
124
124
070
126
101
040
124
111
101
124
105
116
124
124
071
122
105
122
105
040
123
000
116
011
116
114

045
105
040
040
105
107
122
101
117
114
111
000
045
105
040
040
111
040
117
103
124
124

116
122
116
117

045
115
125
040

11-Uen-1985 08:19:19

P.ABW:

P.ABX:

P.ABY:

.ASCII
LASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
.ASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
.ASCI1
.ASCII
LASCII
.ASCII
.ASCI1
.ASCI1
.ASCI1
JASCITI
LASCII
.ASCII
.ASCII
JASCII
.ASCII
LASCII

/ST v/
/27 7
/0OFF/
/SET/
/ 10/
/LER/
/ANC/
/€ 1/
/EST/
<00»
/wuNs/
/ATE/
/ST v/
/28 /
/AVE/
/RAG/
/E R/
/QTA/
/TI0/
/NAL/
7 11/
/ME/<00>
/sNs/
/ATE/
/ST v/
/729 /
/uRI1/
/7TE /
/PRO/
/TeC/
/T T/
/EST/
<00><00>
/sNs/
/A/<1l>/M/
/ANU/
/AL /

124
126
124
116

LASCII
.ASCII
LASCII
LASCII

/INT/
/ERV/
/ENT/
/ION/

124
117

040
124

LASCII
.ASCII

/ST /
/NOT/

120
105
104
101
05S
101

04S
117
122
105
131
040
111
116

124

120
106
115
000
116

111
000

105

LASCII

105
117
105

P.ABZ:

.ASCII
LASCII
.ASCII
JASCII
.ASCII

.ASCII
.ASCII
.ASCII
LASCII
LASCIY
LASCII

LASCII
LASCII

/ TE/

PE/
/RFO/
/RME/
/D/<00>
/sNs/

/APQ/
/WER/
/ DE/
/LAY/
/7 -/
/WAl/

/TIN/
/G/<00>

SEQ 0055
Pa ge
27
USER$1:(AZTEC.CZRCFC)ZRCFC1.B16;1
(12)

VAX-11 Bliss-16 V4,0-579

ES
ZRCFR1
vV03.0
003304
003307
003312
003315

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION
116

045

040
116
125
124
000
116
116

123

124

103
103
127

040
125
040
040
105
131

105

000
116
111

117
105

117
115
131

27-Mar-1985 15:21:49
11-Jen-1985 08:19:19
P.ACA:

116

045

117
114
113

P.ACB:

101
106
116
111

124

040
123

115

045
116
122
103

P ACC:

124
103

P.ACD:
P.ACE:

P.ACF:

.ASCII
-ASCIT
.ASCII
LASCIT
.ASCII
'ASCII
-ASCII
.ASCII
-ASCII
-ASCII
LASCII
-ASCII
'ASCII
-ASCIT
-ASCII
-ASCII
-ASCII
.ASCII
-ASCII
-ASCII
-ASCII
-ASCII
-ASCII
-ASCII
-ASCII
-ASCII
-ASCII
-ASCII
-ASCI?
-ASCII
.ASCI]
-ASCII
-ASCII
-ASCII
.ASCII
-ASCII
-ASCII
.ASCII
-ASCII
-ASCIT
-ASCII
.ASCII
-ASCII
-ASCII
.ASCIT
-ASCII
-ASCII
.ASCII
-ASCII
“ASCII
-ASCII
-ASCII
-ASCT)
“ASCIZ
.ASCII
-ASCIT
-ASCII

/%N
/
/ATQ/
70 MW/
/ANY/
/ UN/
7118/

<00><00»

/%N
/

/ANO/
/7 CL/
/0CK/
/ WA/
/S F/
/70UN/
/0 17
/N 1/
/HE /
/75YS/
/TEM/

<00><00>

/%N/
/RIN/
/COR/

/1 1/
/RAC/

/K N’
/7
/My

/€087
/ SF/
/LEC/
/TED/

<00><00>

/9%Nw/
/N/ <005 <00>
/9%N%/
/R/7<11>/ /
/REG/
/718717
/ER /
/FAY/
/LED/
/7 10/
/ RE/
/5P0/
/ND /
/AT /
/ADD/
/RES/
/5: /
/7 %0/
/76%N/
<00»

/
/%N
/ARD/
/ORE/
/8S:/

VAX-11 Bliss-16 V4,0-579

USER41:(AZTEC.CZRCFC)ZRCFC1.816;1

SEQ 0056

Page

28
(i2)

F5
ZRCFRY
v03.0

003552
003555
003560
003563
003566
003571
003574
003577
003602
003605
003610
003613
003616
003621
003624

CZRCFCO RC25 FR END TEST
GLOBAL TEXT SECTION
045
045
105
105
105
040
066

122
104
045
045
000
045

040
045
045
106
114

075
117
101
101
111

122
040
066
040

040
045
045
104

075
117
116
116
011

040
066
000
045
040

040

124

107
105
123

124

117

120
116
102
040

045
000
116
011

117

004017
004022

117
101
130
103
104
045
045

011
101
040
066
000
116

123
120
101

040
105
106
040
106
057
057
057
057
057
057
040

27-Mar-1985 15:21:49
11-Uan-1985 08:19:19

124
040
123

/7 %0/
/6%A/

<11>/EX/
/PEC/
/TED/

P.ACG:

/06%/
/N/<Q0><00>
/
/%N
/RST/
/EP /
/MAS/
/K =/
/ %0/
/28R/

/706%/

/A D/
/ATA/

/%06/

P.ACH:

122

/%N/<00>
/
/%N
/R/<11>/ /

/POR/
/T 1/
/YPE/

105
125
105
075

045

<l11>/FA/

101

045
040
122
123
103
111
111
117
116
121
104
117
115
040

/IL1/
/NG /
/REG/
/I1S1/
/ER /

040
107
124

117
000

/706%/
/R/<11>/R/
/ERD/

P.ACI:

/7 NU/
/MBE/
/R =/
/ %0/
/727<00><00>
/%Ns/
/R/<11>/ /
/POR/
/T S/
/PEC/
/IF1/
/C 1/
/NFO/
/:/7¢<57>/N/
/N/<ST>/Q/
/8/7¢<57>/D0/
/71/7<57>/0/
/70/<57>/M/
/P/<S1>/ /
/=

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC1.816;1

SEQ 0057
Page
29

(12)

ZRCFR1

v03.0

G5
27-Mer-1985 15:21:49

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION
045

11-Jan-1985 08:19:19

/7027 <00>
/9%Ns/
/R/<11>/ /
/MIC/
/RO /
7C0D/
/€ /
/M0D/
/€L 7/

P.ACJ:

/= %/

/7Q2%/
/R
/
/ VE/
/RS1/
/0N /
/=

7027<00>
/
/9N
/R/<11>/%/
/M1 _/

P.ACK:

/BUF/
/:

/706%/
/2é<11>/R/

/BUF/

/: %/
/706%/
/N/<00><00>
/8R/<11>
/XMT/
/7 _DA/

P.ACL:

/TA:/

/ %0/
/6%RA/

<11>/RE/

P.ACM:

004237
004242
004245
004250
004253
04256
004261
004264
04267
004272
004275

JASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/N/<00><00>
/9N
/
/R/<11>/W/
/NIT/
/ CO0/
/MES/
/ ON/
/LIN/
/€ 1/
/N :/
/7 8D/
/2%RA/
/ mi/
/n,

/79027
/%A.,/
/%D2/

VAX-11 Bliss-16 V4.0-579

USER4$1:{AZTEC.CZRCFC)IZRCFC1.B16;1

SEQP2328 30
(12)

ZRCFR]

CZRCFCO RC2S FR END TEST

v03.0

004300
004303
004306
004310
004313

27-Mar-1985 15:21:49

GLOBAL TEXT SECTION
045
163
056
045
101
124
124
107
122
113

10}
145
000
116
011
101
111
040
101
072

045
105
111
040
101
072
117
101
105
122
040
116
04S
045
04S
101
116
072

101
116
116
124
103
040
064
011
123
105
114
072
117
116
116
011
111
040

045

117
101
105
072
117
101
122
113
045
045
045
101
125
105
117
123
113
050
072
104
101
102

040
066
000

045
101

101

117

064
011
101

040
064

011
101
072
117
116
116
011
115
122
106
105
123

104
040
066
011
116
045

045
000
116
011

130

11-Jan-198S 08:19:19

040
143

045
123
122
116
124
103
040

P.ACN:

064
011
104
107
122
113
045
045
104
111
104
102
040
066
000
045
125
124
045

.ASCII
.ASCI]1
LASCII
.ASCII
JASCII
.ASCII
LASCII
LASCII
LASCII
LASCII

/%A /
/sec/
/./<00>
/sNs/
/A/<11>/S/
/TAR/
/TIN/
/G T/
/RAC/
/K: v/

LASCII
LASCII
LASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCI1
LASCII
LASCII
.ASCII
.ASCII
LASCII
LASCII
LASCII

/wA/<1l>
/END/
/ING/
7 TR/
/ACK/
/: %/
04/
/A/s<11>/D/
/ES1/
/RED/
/ LB/
/N: /
/w06/
/%N/<00>
/sNs/
/A/<11>/U/
/NIT/
/: %/

LASCII

P.ACO:

/%04/

045
110
104

.ASCII
LASCII
LASCII

/04x/
/A/<ll>/HW/
/EAD/

124
103
040
064
000
045
116
102
040
040
105
040

LASCIX
LASCII
LASCITI
LASCII
.ASCII
_,ASCII
LASCII
.ASCII
.ASCII
LASCII
LASCII
LASCII

/A/<11>/1/
/RAC/
/K: /
/%04/
/%N/<00>
/%Ns/
/A/<11>/N/
/uMB/
/ER /
/0OF /
/SEE/
/KS /

045
04S

LASCII
.ASCII

P.ACP:

051
045
045
114
072
117

.ASCII
LASCII
LASCII
JASCII
.ASCII
.ASCI1

116

045
115

056

P.ACQ:

.ASCII
.ASCII
.ASCII
ASCII

JASCIT

/: %/
/04%/

/(D)
/: %/
/Dé%/
/A/7<11>/L/
/BN:/
/ %0/

/6%N/
<00><00>
/wNs/
/A/<li>/M/

/AX./

VAX-11 Bliess-16 V4.0-579

USER$1:(AZTEC.CZRCFC)ZRCFC1.B16;1

O
> EQ °p.329
31

(12)

I5
ZRCFB1

v03.0

004551
004554
004557
004562
004565
004570
004573
004576
004601
004604
004607
004612
004614
004617
004622
004625
004630
004633
004636
004641
004644
004647
004652
004¢55
004060
004663
004666
004671
004674
004677
004702

CZRCFCO RC25 FR END TEST
GLOBAL TEXT SECTION
117
123

w0
114
072
104

101
104
101
145
145
000
116
011
123
105
117
123
124
072
117
116
116
011
104

106
105

056
061
040
162
156
045
122
101
122
122
124
125
040
066
000
045
105

/per/
/cen/

P.ACR:

116
011
111

045
127
124

000

104
101
045
045

/t/<00>
/%N/
/R/7<11>/R/
/CSA/
/ ER/
/ROR/
/7 S/

/RTU/

P.ACS:

040

103
124
122
122
124
125
040
066
000
045
125
130
103
104
117
120
113
040
122
040
101
123
045
045

040
124
040
066

/ OF/
/FSE/
ARR'Y4
/7ALY/
/€; /
/%02/
/%A./
/%01/
/%A /

126
125
040
062

101
105
105
117
123
124
072
117
116
116
011
105
105
105
114
040
103
124
122
122
124
125
040
066
000

27-Mar-198S 15:21:49
11-Jen-198S 08:19:19

P.ACT:

P.ACU:

/S: /
/%06/
/7%N/ <00>
/9%Ns/
/R/<11>/E/
/ND /
/PAC/
/KET/
/ ER/
/ROR/
/7 S1/
/RTY/
/S: /
/%06/
/7%N/<00>

/
/%N
IR/ 242/0U/
+NEX/
/PEC/
/T1ED/
/ L0/
/G P/
/ACK/
/ET /
/ERR/
/0R /
/STA/
/TUS/
/:

/706%/
/N/<00><00>
/9%Ns/
/R/<11>/W/
/RIT/
/E D/
/ATA/

/706%/

VAX-11 Bliss-16 V4.0-579

USER4$1:(AZTEC.CZRCFCJZRCFC1.816;1

SEQ 0060
Page

(12)

ZRCFB1

vV03.0

005023
005026
005031
005034

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION
011
101

27-Mer-1985 15:21:49
11-Jen-1985 08:19:19

122
104
101
072

/R/7<11>/R/

/EAD/
/ DA/
/TRA:/
/ %0/

117

/76/<00>
/%Ns/
/R/7<11>/1/

045

124
103

/RAC/
/K /
/%404/
/8A/<11>
/5€EC/
/TOR/

040
064
011

103
122

045
045
110
104
045
045

/: %/
/704%/
/R/<11>/H/
/ERD/
/:

/76

/704+4/
/N/<00»
/9N
/
/R/<11>/E/
/XPE/
/CTE/
/0 S/
/W =/
/7 OF/
/F
7
/ARCT/
/UAL/
/ SW/
/0N /
/7 PL/
/RTT/
/ER /

P.ACX:

.ASCIT

.ASCII
.ASCII

005270

.ASCII

/7 D/
/73/<00>
/
/%N
/R/<11>/€/
/XPE/
/CTE/
/0 S/
/W =/
/ ON/
A/
/
/CTU/
/AL /
/SW /
/s 0/
/FF /
/ PL/
/AT1/
/ER /

VAX- 11 8 lis 16 4,0-579
USER $1:(AZ7 C.CZRCFCIZRCFC1.B16;1

SEQ 0061

ge(12)

I<5
ZRCFR1

v03.0

005273
003276
005300
005303

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION
045
000
116
011

045

125
105
117

115
122
106

122
122
123
104
07S
064

040

P.ACY:

<00)> <NO>

P.ACZ:

se/

<00»

103
040
111
104
117
105
117
000
103
040
111
104
117

123
106
114
040
040
123
116
000
111
106
114
040
040

P.ADB:

117
000
105
040
124
122
105
117

116
000

<11>/UA/

/17 7
/_
P/

7OME/

/R F/
/AIL/

/ RE/
/COvV/
/ERY/
<00>

/RCS/
/A F/
/AIL/
/€D /
/10 /

/RES/

/7PON/

P.ADC:

123

111
122

/A/7<)1>/ /

/047 <00»

101
040
120
105
106
114
105
126
131

040
040

/%N
/

/NUM/
/BER/
/7 OF/
/ RE/
/IR1/
/ES /
/(D)

127
124
040
127
040
111
122
117
122

120
124
116
103
105

/%N
/
/A/7<}1>/€E/
/RRQ/
/R S/

/US:/
/7 %0/
/6%N/

105
111
040
051
045
000

123

/7 8D/
/73/<00»

/TAT/

P.ADA;

105

dd I

105

116

011

5932

045

123
045
045

000

05524

104

117
123
124
072
117
116

122
040
101

27-Mar-1985 1 5:2 1::4 9
11-Jen-1985 o 8:1 9: 1 9

P.ADD:

707<00><00>

/RC1/
/P F/
/7AIL/
/€D /
/10 7/
/RES/
/PON/
707<00><00>
/71ES/
/1 P/
/AT1/
/ERN/
/7 €C/
/HOE/

/0 1s
/N R/

VAX- 11 8 lis
88-16 V4.0-579
USER $1:(AZ TEC.CZRCFCIZRCFC1.B16;1

SEQ_0062
Page

MITES!

L5
ZRCFR}
v03.0
005540

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

123
111

101
123

117
105

122
103

111

000

117
101
040
040
126
040
123

122
116
102
114
105
124
124

106

114
105

117

103

123

040

124

000
111
040
106
122
116
040

105
105
102
124

040
122
000

124

040

105

101

00C

/CTE/

P.ADG:

105

117

000

/R/<00><00>

/RIN/
/G B8/
/UFF/

/ERS/

/7 NO/
/1 C/
/LER/
/RED/
/7 @Y/
/ TH/
/E P/

/0RT/

<00><00>

P.ADH:

122

106

/7H0S/
/1 D/
/ETE/
/0 1/
7IME/
/7 00U/
/1T E/
/RRO/

120
124

124
122

P . ADF:

101
104
131
110

104
101
040
105
116
040
124
000
122

040

<00>

105
125
103
117

000
116
102
106
123
117
103

/VEC/
/T0R/
/ AN/
/70 8/
/R L/
/EVE/
/L 1/
7EST/
/ FA/
/7ILV/

/RE/<00>

105

101
104
101
117
040
124
101
110
117

040

717<00><00»

P.ADE:

125
000
104
105

115
117
040
122

/COR/

/REC/

101

040
124

124

/7CSA/
/7 IS/
/7 IN/

116

000

105

27-Mer-198S 15:21:49
11 Jen-198S5 08:19:19

/STE/
/P R/

/ERD/

/ DR/
/TR 7/
/
/00€
/S N/
/701 7/
/MAT/

¥.ADI:

/CH/ <00>

/POR/
/1 F/
/ATRA/
/L E/

/RRO/
/R/<00><00>

VAX-1 18 1 iss-16 v4.0-579
USER$ 1:( A ZTEC.CZRCFC)ZRCFC1.B16;1

SEQ 0063
Page

(12)

M5
15: 21:49
11-Jen-1985 08: 19:19

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

P.ADL:

P.ADM:

006210

P.ADN:

) Dt Bt D Do Dol D) D) ) P Bt

algle]
(m]

) Dt Dt Bl Bt Dl

P ADK:

[a)]

122
102
106
040

) Dl Dmnf) Dl el Dl D) Dl B

105

St S Dt Sl Bl Dl Bl $=4 D) Dt D Dl D) O Bl ef 0 0t Dl Bt Dol D 5t Dl 0=t Dl Bl Dl S D Bt

105
122
104
122
122

.ASCI
»» PP
»
» IPIPEIIPIPIPIERIPD
»
»> >

P.ADJ:

*'n L w
AlAl
Alw
VAl T Tl Tl T ad Tlw
Tl Tl Talwunwn
TalVal TalVal
«
0 OOOOOOOOOOOOIOOOOO
(] Bt -t
Bt B Bt [Dot
Dt Pl
Bel) et
] Dl Dt D 0l ot| ] Sl Dl St
bt b

116
040

27-M
- 1985
er

VAX ) 18 lie8-16 V4.0-579
AZ TEC.CZRCFCIZRCFC1.B16;1
USERS 1:(AZ

SEQ 0064

Pooe(

36
12)

/IN1/

/1 S/
/7TEP/
/7 RE/
/R0 /
/7ERR/

/0R/<00>
<«00»

/MEM/
/0RY/
/ BU/
/FFE/

/R D/

/0ES/
/ NO/
71 Cs
/ONT/
/AIN/
/7 EX/

/PEC/
/71ED/
/7

DA/

/TA/<00>
<00»

oM v/
/7C00~/
/€ R/
7€ETU/
/
/RNE
/D F/
/AIL/
/
/URE
/7 CO/

/70E
7 <Q0»

/6N
/

/7INT/
7ERR/
/7UPY/
/7 A1/
/7 VE/
/Cs 7/
/80%/
/78R /
/B8R /

/LEV/

7€Le*/
/7 w0/

71700

/NO /
/INT/
/ERR/
/7UPY/
/7 FR/
/oM /

—_——

CZRCFCO RC2S FR END TEST
GLOBAL TEXT
SECTION
120
124
040
116
117
105
045
101
102
114
105
122
105

105

124
105
111
11}
117
105

040
000
122
065
105
040
111
122

117
040
103
124
114
122
116
011
122
10S
114
105
111

104

131
104
123
116
122
103

103
040
105
106
114
105

062
123
113
104
125
000

101
106
114
105
127
124
120
124
124
105

104
101
125
000
122
105
122
105
040
123

040
111

122

ASCI1
.ASCI1
LASCI1
ASCII
ASCII
LASCII

P.ADP:

LASCITI
.ASCI1
.ASCII
LASCII
JASCII
ASCI1
LASCIT
.ASCII

10}
123
124
040

P.ADQ:

103

P.AOR:

.ASCII
.ASCII

P.ADS:

.ASCII
LASCII
ASCII
LASCII
.ASCII
.ASCII
ASCI1
ASCII
LASCITI
LASCITI

111
122

122

117
103
124
124

122

1.
* 20t

106
127
104
105
040

117
101
040
105
105

122
122
123
113
122

LASCII

ASCII

040
111
122

111
040

.ASCII
.ASCII1
ASCII
ASCII
ASCII
ASCII

105

106
114
105

000

ASCII
ASCIT
.ASCII
LASCII
LASCII
LASCIT1
.ASCI]
ASCII
.ASCI1
LASCI1
LASCIT
.ASCI1
ASCII

LASCI1

120
040
040
103
122
124

000

105
040
111
110
10}
125
000
105
117

P.ADO:

05?7

041

110
104
127
103
106
114
105
123
124

040

122
057
117
122
114
000
045
011
040
126
040
103
126

27 Mer 1985 15:21:49
11 Jen-1985 08:19:19

P.ADT:

.ASCII
LASCITI
.ASCII
LASCII
,ASCI1
.ASCII
ASCII

ASCI1

ASCII

/POR/
/71 7¢57»
s CO/
/NTR/
/0LL/
/ER/< 00>
/sNw/
/A/71)ral)>
/BR s/
/LEV/
/€L 7/
/REC/
/€1v/

/ED/<S7>

/Tvyp/
/€0 /
/1S /
/INC/
/0RR/
/€eC1/

7 1/7¢00»
«00»

/RC2/
/S S/
/€Ex/
7/ FA/
/7ILuwy
/RE/<00»

/MEA/
/D S/
/W1l/
/CH /
/FAl/
/LuR/
/E/<00>
/SEC/
/T0R/

/ Re/

/AD /
/FAl/
/LUR/
/€/<00>
/uWR1/
/1€ /
/PRO/
/7eC/
/1 1/
/€EST/
/ FA/
/ILuv/
/RE/<00>
<«00»
/FOR/
/uAR/
/D S/

/EEK/

/7 ER/

VAX-1]1 Blies-16 v4.0-579
USERS]:(AZTEC. CZRCFC]ZRCFCX B16;1

5€Q 006S
Page
37
(12)

B6
IRCFB1
v03.0

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTIOM

27-Mer-198S 15:21:49
11-Uen-198S 08:19:19

006523
006526
006530
006533
006536
006541
006544
006547
006552
006554
006557
006562
006565
006570
006573
006576

122
000
122
105
105
105
040
122
000
124
107
040
105
10S
117
122

117
000
105
122
040
105
105
117
000
117
114
123
113
122
122
101

126
123
123
113
122
122

P.ADU:

107
108
103
040
122
000
116

P.ADV:

006604
006607
006612
006615
006620
006623
006626
006631
006634
006637
006642
006645

040
105
105
117
122
104
122
105
105
040
040
122

123
113
122
122
105
057
111
040
123
111
105
117

105
040
122
000
101
127
124
124
124
116
122
122

006652
006655
006660
006663

117
123
040
101

106
105
122
104

106
124
105
040

006601

006650

104

11?7

122

115

000

006677

105
117
107
137

122
122
105
125

122
000
124
116

006710
006713
006716
006721
006724

124
040
115
116
106

125
103
115
104
101

123
117
101
040
111

006732
006734

105
101

000
126

116

104

040

000
116

045

006666
006671
006674

006702
006705

727

111
123

114

737
742
745
750

111
102
040
115

756
761

106
114

006753
06764
006766

105
045

124
124

125

114
114
103
115
101
125

P.ADW:

P.ADX:

P.ADY:

P.ADZ:

137
101

101
105
117
101

/ROR/
<00>¢00>
/REV/
/ERS/
/E S/
/EEX/
7 ER/
/ROR/
<00><00>
/70G/
/GLE/
/ SE/
/EK /
/ERR/
/0R/.00>
/RAN/

LASCII
LASCII
.ASCII
.ASCII
LASCI1
LASCII
LASCII
.ASCII
LASCII
LASCI1I
LASCII
.ASCII

7 SE/
/W 7/
/ERR/
/0R/<00»
/REA/
70/7<S7>/7u/
/RIT/
/E 1/
/EST/
7 IN/
/ ER/
/ROR/

.ASCII
.ASCII
.ASCII
.ASCII

/OFF/
/SET/
/ RE/
/AD /

.ASCII

.ASCII
.ASCII
.ASCII

P.AEA:

ASCII
ASCII
ASCI1I
ASCI1
ASCII

/TUS/
s CO/
/MMA/
/ND /
/FAY/

/I1./
/STAs

ASCII

/LUR/

LASCII
ASCI1
asC11
ASCII

/ILA/
/BLE/
s Ccos
/MMA/

.ASCII
.ASCII

ASCII
ASCII

P.AEB:

<00><00>

JASCII

ASCII

111
122

/D0M/

/ERR/
/0R/<00>
/GET/
/7 UN/

ASCII
ASCII

122

101

ASCI1
LASCII
.ASCII
.ASCII
.ASCII
ASCI1
LASCII
.ASCII
LASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCJI
.ASCII

.ASCII
.ASCII

/E/<0Q0>
/AVA/

/ND /

/FAl/
/LUR/

/E/<0Q0>
/sNw/

VAX-11 Bliee-16 V4,0-579
USER$1:{AZTEC.CZRCFC)ZRCFC1.816;1

IRCFBY

CZRCFCO RC2S FR END TEST

v03.0

006771
006774
006777
007002
00700%
007010
007013
Q07016
007021
007024
007027
007032
007035
007040
007043
007046
007051
007054
007056

007061
007064
007067
007072
007075
007100
007103
007106

007111
007114
007117
007122
007125
007130

007133
007136
007141
007144
007146
007151
007154
007157
007162
007165

27-Mer-1985 15:21:49

GLOBAL TEXT SECTION
104
105
107
123
113
111
040
124
122
104
040
116
155
040
045
045
045
000
045

101
105
107
123
113
111
040
124

117
105
104
102
050
0S1

101
122
108
105
040
115
127
110
101
117
114
040
163
075
104
101
104
000
116

101
122
105
105
040
115
127
110

122
122
040
116
1SS
040

049
063
056
062
045
101
117
123
116
124
105

045
04S
045
000
116
120
103
123
107
111
040

040
045
045
045
000
045
101
105
122
113

075
104
101
104
000
116
117
040
101
040

155

105
040

163

105
124

11-Jan-198S 08:19:19

126
101
040
105
124
105
111
040
116
115
102
050
051
040
063
056
062
045
126
101
040
10S
124
10§
111
040
104
105

P.AEC:

P.AED:

040
063
056
062

113
111

.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCII
LASCII
.ASCII

.ASCII

051

045
116
124
103
123

.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
LASCII
LASCII
LASCII

.ASCII
.ASCII
LASCII
.ASCII
.ASCI1
LASCII

114
040
163
075
104
101
104

045
122
105
111
040
115
050

LASCII
.ASCII
.ASCI1
.ASCI1
LASCITI
LASCII
LASCII
LASCII
.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
LASCII
.ASCI1
.ASCII
.ASCII

P.AEE:

LASCII
LASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCII
.ASCII
LASCIT
.ASCII
LASCII

/AAV/
/ERA/
/GE /
/SEE/
/K 1/
/IME/
7 Wl/
/TH /
/RAN/
/DOM/
7 LB/
/N (/
/wme)/
7/ = v/
/#D3/
/#A./
/wD2/
<00><00>
/%Nw/

/AAV/
/ERA/
/GE /
/SEE/
/¢ 1/
/IME/
7 ul/
/TH /
/0RD/
/ERE/

/0 L/
/BN /
/(ms/
/) =/
/ %D/
/3sA/
/.wD/
/2/<00>

/sNs/
/APR/
/0CE/
/SS1/
/NG /
/TIM/
/€ (/

/ms)/

/ =/
/%D3/
/%A./
/wD2/
<00><00>
/s%Ns/
/AON/
/€ 1/
/RAC/
/K S/
/EEK/
7/ 11/

VAX-11 Blise-16 V4,0-579

USERS$1:[AZ Ec CZRCFCJZRCFC1. B16;1

SEQ 0067

Page

(i2)

ZRCFB1

v03.0

007241
007244
007247
007252
007255
007260
007263
007266
007271
007274
007277
007302
007305
007310
007313
007316
007321
007324
007327
007332
007335

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mar-1985 15: 2 1 4
11-Uan-1985 08: 1 9: 1

040

163
075
104
101
104

000
045
125
040
101
040
105

P.AEF:

P.AREG:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

.ASCII

P.AEH:

P.AEI:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.AZCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/ME /

/{me/

/) =/
/7 8D/
/73%A/
/.%8D/
727<00»>
¢ 00>

/%N
/

/7AFY/
/LL

/s8)

/TRA/
/CK /
/SEE/
/K T/
/7IME/
/7 (m/
/= %/

/D03%/
/A, %/
/D27 <00>
/%Ns/
/7AAV/
/ERA/
/GE /
/ROT/
/AT1/
/0NA/
/L 1/
/IME/
/ (m/
/8) /
/=

/D3%/
/R .%/
/D27<00»
<00>

/RC2/
/5 U/
/NIT/
/7 DO/
/ES /
/NOT/
/7 CO/
/ME /
/0ONL/
/7INE/

<00><00>»

/EX_/

/SUP/

/ _PR/

706 7

/0UP/
/ CO/
/MMA/
/ND /
/FAI/

D6
VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFCJZRCFC1.816;1

SEQ_0068
Page
40

(12)

E6
ZRCFB1

v03.0

007511

CZRCFCO_RC25 FR END TEST
GLOBAL TEXT SECTION
125

000
105

137
124
104
040
115
116
106
114
105
105
104
101

125
103
115
104
101

125

007623
007626
007631

007637
007642
007645
007650
007653
007656
007661
007662
007665
007670
007673
007676
007701
007704
007707
007712
007715
007720
007723

7726
007731
007734
07737
007742
07745
7750

007753
007756

122
116
104
101
125
103

104
101
125
000
103

101
040

045

114
122
125
105
107
132
114
105
117
103
105

105
055
116
103
116
101
105
122
122
117
000

116
044
114

045
106
105
055
116
114
105
101
105

111
117

051
116
044
114

122
104
120
111
040
040
115
125
000
045
106
105

/7 DU/
/P C/
/0MM/
/AND/
/ FA/
/ILV/
/RE/ <00>
/REC/
/7 _DA/

/TR /

/0UP/

111

106

040
101
050
122
131
122

P.AEK:

122

044

/LUR/
/E/<Q00>
/SEN/
/0_0/

/ATA/

120
117
101
040
000

122
105
105
120
120
113

P.AEJ:

115

000

116

27-Mar-19 85 1 5:2 1::4 9
11-Jan-19 85 o 8:1 9: 1 9

P.AEM:

/7 CO/
/MMA/
/ND /
/FR1/
/LUR/
/7E/7<00><00>
/%N/
/R$F/
/TLE/
/RR-/
/7 UN/
/REC/
/0GN/
/1ZA/
/BLE/
/7 ER/
/ROR/
/7 €O/
/DE/7<00>
<00»

P.AEN:

/79N/
/ASF/
/TLE/
/RR-/
/ EN/
/VEL/
/70PE/

<S7>/PA/

P.AEQD:

/7CKE/
/T R/
/EAD/
/7 (P/
/ARI/
/7Y /
/0R /
/TIM/
/7EQU/
/1)/<00>
/%N
/
/ASF/

/TLE/

VAX- 11 8 lis
8s-16 V4,0-579
USER $1:(AZ TEC.CZRCFCIZRCFC1.816;1

SEQPOO69 a1
age

(12)

Fo
ZRCFB]
v03.0
007761
007764
007767
007772
007775
010000
010003
010006
010011
010014
010017
010022
010025

CZRCFCO RC25 FR END TEST
GLOBAL TEXT SECTION
122
105
105
120

055
116
114
105

/RR-/
/ EN/
/VEL/
/0PE/

113

105

/CKE/
/T W/
/RIT/
/E (/

120

040
111
040
101
124
117
124
105
124
000
116
044
114
122
103
124
114
122

<S57>/PA/

127
124
050
122
131
122
111
117
051

045
106

/PAR/
sITY/
/ OR/
/7 117
/MEQ/
/Ut )/

116

045

P.REQ:

114
122
103
124
114
122
101
120
111
000
116

105
055
117
122
114
040
115
101
124
000
045

P.AER:

114
122

105
055
117
122
114
040
115
101
124
000
045

P.AES:

000
044

044

103
124
114
122
117
120
111
000
116

044

106

<00><00>

P.AEP:

115
101
124

040

101

105
055
117
122
114
040
115
116
122
040
122
131

117
101

010227

27-Mar-1985 15:21:49
11-Uen-198S 08:19:19

/%Nt
/
/ASF/

/TLE/
/RR-/
/7 CO/
/NTR/
/0LL/
/ER /
/ROM/
/ AN/
/D R/
/AM /
/PAR/
/71TY/

<00><00>

/
/9N
/ASF/
/TLE/
/RR-/
/ CO/
/NTR/
/0LL/
/ER /
/RAM/
/ PA/
/RIT/
/Y/<00><00>

/%Nss/

/RA$F/
/TLE/
/RR-/
/7 CO/
/NTR/
/0LL/
/ER /
/R0OM/
/ PA/
/R1IT/
/7Y/<00><00>

JASCII

/%N
/

/ASF/

VAX-11 Bliss-16 V4,0-579

USER$1:{AZTEC.CZRCFCJZRCFC1.8B16;1

SEQ 0070
Page

(12

G6
ZRCFB]1

v03.0

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mar-1985 15:21:49
11-Jen-198S 08:19:19

010232
010235

/TLE/
/RR-/

;NgI/

010240
010243
010246
010251
010254
010257

/o(//
/REA/

/PAR/

/1TY/

010262
010265
010270
010273

010276
010300
010303
010306
010311
010314
010317
010322
010325
010330
010333
010336
010341
010344
010347
010352
010354
010357
010362
010365
010370
0373
010376
010401
010404
010407
010412
010415

/ OR/
/7 11/
/MEQ/
/Ut)/

<00><00>

P.AET:

P.AEUV;

P.AEV:

010420

/
/%N

/ASF/
/TLE/
/RR-/
/ R1/
/NG /
/WR1/
/TE 7/
/7(PA/
/RIT/
/7Y Q/
/R 1/
/7IME/
/70UT/
/7)/<00>
/%N
/
/ASF/
/TLE/
/RR-/
/ IN/
/TER/
/RUP/
/T M/
/RST/
/ER/<00>

/
/%N

/ASF/
/TLE/

/RR-/

010423
010426

/ HO/
/8T /
/ACC/
/€SS/
/7 11/
/MEOQ/
/UT/<00>
<00»

P.AEW:

10470
010473
010476

/
/9N
/ASF/
/TLE/
/RR-/
/ CR/
/EDI/
/T L/

VAX-11 Bliss-16 V4,0-579

USER#1:[AZTEC.CZRCFCJZRCFC1.816;1

SEQ O 071
Pa ge

1 2)

H6
ZRCFR1
v03.0

010501
010504
010507
010512
010515
010520
010523
010526
010531
010534
010537
010542
010545
010550
010553
010556
010561
010564
010567
010572
010575

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mer-1985 15:21:49
11-Jen-1985 08:19:19

115

/IM1/

103
104

/XCE/
/EDE/
/D0/<¢00><00>

/T €/

040

000
116
044

P.AEX:

/9N
/

/ASF/
/TLE/
/RR-/

114

122
102
040

/S M/
/AST/
/ER 7/

123
122

122
122
116
044

P.AEY:

114

122
104

107
123
103
117
122
114

040

124
040

122

000
116
044

P.AEZ:

114
122
111
124

103
117

010674
010677
010702
010704
010707
010712
01071S
010720
010723
010726
010731
010734
010737
10742
010745
010750

114
120
111

117

000
116
044

P.AFA:

114
122
111
101
104
117
105

111
040

105
111

JASCII

/ERR/
/0R/<00»
/%N/
/R$F/
/TLE/
/RR-/
/7 D1/
/AGN/
/708717
/7I1C 7
/CON/
/TRO/
/LLE/
/R F/
/ATA/
/L E/
/RRO/
/R/<00><¢ 00>
/79N
/
/ASF/
/TLE/
/RR-/
/ IN/
/STR/
/UCT/
/I0N/
/7 LO/
/0P /
/T1IM/
/EQU/
/T7/¢00>
/9%Ns/
/ASF/
/TLE/
/RR-/
/7 IN/
/VAL/
/710 7
/CON/
/NEC/
/1107
/N 1/
/DEN/
/TIF/

VAX-11 Blies-16 V4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC1.B16;1

SEQ 0072
Page

(12)

16
ZRCFR)
v03.0
010753
010756
010760
010763
010766
010771
010774
010777
011002
011005
011010
011013
011016
011021
011024
011027
011032

011035
011040
011043
011046
011051
011054
011057
011062
011065
011070
011073
011076

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION
105

000
116
044
114
122
111

105
125
040
111
00C
116
044
114
122
115
116
116
103
122
104
122
105
116
114
040
107
116
104
124
111

27-Mar-1985 15:21:49
11-Jan-1985 08:19:19

122
045
106
105
055
116
122
120

/I1ER/

<00><00>

P.AFB:

127
124

P.AFC:

P.AFD:

/%N/
/ASF/
/TLE/
/RR-/
/ IN/
/TER/
/RUP/
/T W/
/RIT/

/7E/7<00><00>
/%N
/

/ASF/
/TLE/
/RR-/
/ MA/
/INT/
/ENA/
/NCE/
/ RE/
/AD/<S7>
/WR1/
/1€ /
/7INV/
/ALL/
/0 R/
/7EGL/
/0N /
/IDE/
/NT1/
/F1E/
/R/<00>
/%N
/

/A$F/
/TLE/
/RR-/
/ MA/
/INT/
/7ENA/
/NCE/
/ WR/
/ITE/
/7 L0/
/RD /
/70 /
/NON/
/7-L0/
/ADA/
/BLE/
/7 CO/
/NTR/
/0LL/
/ER/<Q0>
<00»

011217

P.AFE:

/%Ns/
/RSF/

]

VAX-11 B liss-16 V4.0-579
USER#$1:( AZTEC.CZRCFC)ZRCFC1.816;1

SEQ 0073

Page

(12)

ZRCFRL

CZRCFCO RC2S FR END TEST

v03.0

011222

011225
011230
011233
011236

011241
011244
011247
011252
011255
011260
011263
011266

011271
011274
011277
011302

011305
011310
011313
011316
011321
011324
011327
011332
011335
011336
011341
011344
011347

011352
011355
011360
011363
011366
011371
011374
011377
011402
011405
011410
011413
011416
011421
011424
011426

124

114

105
122
040
122
040
117
120
111

122
101
105
117
050
116
101
124

122
040
116
117

051
045
101
124

122
040
111
123
125
103
105
117
000
045
101
124
122

105

.ASCII

/TLE/

040
115
122
122
116
055
122
131

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCII

/ER /
/RAM/
/ ER/
/ROR/
7/ (N/
/ON-/
/PAR/
/ITv/

055
117
122
114

.ASCII
.ASCII
.ASCII
.ASCII

000
116
044
114

000
045
106
105
055
116
040
121
116
040
122
000

116
044
114

045
106
105
055

P.AFG:

045

P.AFH:

122
111
124
105
105
105
122
122

P.AFF:

.ASCII
_ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/RR-/
/_IN/
/IT /
/SEQ/
/UEN/
/CE /
/ERR/
/0R/<00>
<00>
/%Ns/
/ASF/
/TLE/
/RR-/

114
101
127

040
122
101

LASCII
.ASCII
.ASCII

/LL /
/HAR/
/DWA/

101

111

.ASCII

/FAl/

122

106

105

106
105
055
125
105
117

040

.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
JASCII
.ASCII
.ASCII
.ASCII
.ASCII
,ASCII

/)/<00><00>
/%Nw/
/ASF/
/TLE/

114
110
104

044
114
122
120
107
120

111
040
126
040
117
103
040
103
120
111
114
131
122
122

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

.ASCII1

VAX-11 Bliss-16 V4,0-579

SEQ

USER4$1:[AZTEC.CZRCFC)ZRCFC1.816;1

/RR-/
/ CO/
/NTR/
/0LL/

122
110
110
105
114
122
117
114
116
115
124
111
124
105
117
000
116

011464

122
103
124
114

11-Jen-198S 08:19:19

040
107
114
105
120
124
117
111
117
101
102
111
040
122
000
045

101
124
122
040
122
057

011467

27-Mer-1985 15:21:49

GLOBAL TEXT SECTION

011431
011434
11437
011442
11445
11450
011453
11456
11461

/ HI1/
/GH /
/LEV/
/EL /
/PRO/
/70C/
/0L /
/INC/
/QMP/
/ATl/
/BIL/
/ITY/
/ ER/
/ROR/
<00><00>
/%Ns/

/ASF/
/TLE/
/RR-/
/ PUV/
/RGE/
<57>/P0/

/RE /

0074

QPage 46
(12)

I<6
v03.0

CZRCFCO RC25 FR END TEST
GLOBAL TEXT SECTION

011472
011475
011500

000
045
106

011503
011506
011511
011514
011517
011522
011525
011530
011533
011536

27-Mar-198S 15: 21:49
11-Jan-198S 08: 19:19
/LUR/
P.AFI:

105
055
101
111
040
107
124
040
101
105
117
050
122
131
122
111
117
051

/€ /7<00>

/%Ns/
/ASF/
/TLE/
/RR-/
/ MA/
/PPY/
/NG /
/REG/
71S1/
/ER /
/REA/
/0 E/
/RRO/
/R (7
/PAR/
711v/
/7 QR/
/7 11/

<00><00>

.AEM
.AEN
.AEQ
.AEP
.AEQ
.AER
.AES
.AET
.AEV
.AEV
.AEW
AEX
AEY
.AEZ
LAFA
.AFB
.AFC
.AFD
.AFE
AFF
.AFG
AFH
.AF1

011646
|011650
011652

011654

011657
11662
011665

11670
11673
11676
011701
11704
011707
011712

AARA A AR A

P.AEL:

R -A-R-h-h-R-B-h-h-h.-R.E-R.R.N.]

ZRCFB1

116

044

114
122

120
123
123
124

040

122

04s
106
105
0S5
105

117
135

124
125
105
117

P.AFK:

/9N
/

/ASF/
/TLE/

/RR-/
/ RE/
/SP0/
/NSE/
/ S1/
/ATY/
/5 €/
/RR0O/

VAX-11 1 Bliss-16
V4.0-579
B1

USERS1:

ARZTEC.CZRCFC)ZRCFC1.B16;1

SEQ 0075

Page

1 2)

L6
CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

ZRCFB]

v03.0

27-Mer-1985 15:21:49
11-Jen-1985 08:19:19

045

011715
011720
011722
011725
011730
011733
011736
011741
011744

045
106

P.AFL:

105
055

125

122
123
040
122
103
103
114
101
105

011747

011752
011755
011760
011763
011766
011
011774

011776
012001
012004
012007
012012
012015
012020
012023
012026
012031
012034

012037

012042
012045
012050
012052

012055

/R:%/
/75/¢<00>
/9%Nst/
/ASF/
/TLE/
/RR-/
/ SU/
/PER/
/V1S/

/0R /

/SER/
/NIC/
/€ C/
7ALL/
/7 FA/
/ILE/

045
106
105
055
117
057
116
117
105
124
105
124
122
122

P.AFM;

045
106

P.AFN:

/07<00»

/79N/

/ASF/
/TLE/
/RR-/
/7 PO/
/R1/<S57>
/7CON/
/TRO/
/LLE/
/R 1/
/7IME/
70Ut/
/7 ER/

/ROR/

<00><00>

105
055

/8Nt/
/ASF/

/TLE/
/RR-/
/ UN/
/KNO/
/WN /
/RET/
/URN/
/7 ST/
/ATY/
/78 C/
/7QDE/
<00>

P.AFJ:

116

045

114
122
126

105
055
101
12¢
104

044

105

040

101

P.AFP:

P.AFK
P.AFL
P.AFM
P.AFN
/%N
/
/ASF/
/TLE/
/RR-/
/7 VA/
/%X R/
/ERD/

)

VAX-11 B liss-16 V4.0-579
USER$1:( AZTEC.CZRCFC)ZRCFC1.816;1

SEQ 0076

Page

(12)

131

124
056

012256

/V.8/

/FIL/
<0Q><00»

P.AFR:

/
/8BNS
/ASF/

P.AFS:

=5 o pt $-s p—0 po ps

uaaRnNu<>s‘->-mn—
~NO
B e it Yoo
U S 133

-ASCI1

-ASC

[ ]
WO+t
pa N e
e A Yool
D [X,]

2 O

"ASC

ASC
P AFT;

012250
01c253

/751S/

/TEN/
/CY /
/AT /

012242
012245

/9N/
/ASF/
/T1LE/
/RR-/
/ IN/
/CON/

Bt D) Ot Dt D

012234
0122%7

/717¢00><00>

P .AFQ:

) Dl Sl S Dl el D) D) D) Decl Dt Bl el Bl B et P S

012207

012212
01221%
012220
012223
012226
012231

<ST>/UR/

71187/
/7 ER/
/ROR/
/ ON/
/7 IN/
/TER/
/RUP/

Ol Bt Smel B

0i2201
012204

124
105
117
117
111
105
125
000
116
044
114
122
111
117
111
105

| itiaiaiaiaiaialealalelalal laaladalalalal
o1 o] o 1o T TS T T TS

012165
012170
012173
012176

127

0
32.2.3.2.2.2.3.1
Al AladTalVal'al
Tl %]
alalalalalalals]

012157
012162

27-Mer-1985 1 S:2 1 : 49
11-Jon-1985 0O 8:1 9 :19

»
w
o

v03.0

CZRCFCO _RC2S FR END TEST
GLOBAL TEXT SECTION

»
w
(@]

JRCFRY

/T1LE/
/RR -/
/7 IN/
/CON/

7518/

/T1EN/
/CY 7/
/AT 7/

V.87
/MTY/

<00><00>»

/78N/

/ASF/
/1LE/
/RR /
/7 IN/
/7CON/

7518/

7TEN/
/7CY 7/
/AT /
/U.A/

7L0C/

<«00><00»

/78N/
/ASF/
7TLE/
/RR -/
/7 IN/
/7CON/

75157/

/TEN/
/Cr

VAX-1 18 1 i99-16 V4,0-579
USER$ 1:( A ZTEC.CZRCFCJIZRCFC1.816;1

S€EQ 0077
P

(12)

l
<RCFR)
v03.0

012427
012432
012435
012440
012443
012446
012451
012454
012457

CZRCFCO RC2S FR END TES!T
GLOBAL TEXT SECTION

124
105
117

116

27-Mer-1985 15:21:49
11 Jen-198S 08:19::9

040
122
040
124
040
111
123
051
045
106
105

/AT /
/SER/
/NO 7/
/ENT/
/RY 7/
/7(Pl/
/P S/
/ET)/
<«00»

P.AFV:

/79N%/

/ASF
/
/TLE/
/RR-/
/7 IN/
/CON/
/781S/
/TEN/
/CY 7/
/AT /
/SER/
/V0 /
/ENT/
/RY 7/
/(ER/
/R S/
/€T)/

P.AFV:

P.AFU:

<00»

/%Ns/

/ASF/
/TLE/
/RR-/
/ IN/
/CON/
/51S/
/TEN/
/CY /
/AT /
/U.S/
/END/

<00><00>

/9N
/

/AS$F/
/TLE/
/RR-/
/7 IN/
/CON/

7318/

/TEN/
/CY /
/AT /
/VU.R/
/ECV/
P.AFX;

<00><00>

/9Ns/
/ASF
/

/TLE/
/RR-/

VAX-1 1

1 iee-16 V4,0-579
USER$ 1: A ZTEC.CZRCFC)ZRCFC1.B16:1

SEQ@ 0078
Page

(12)

B7
ZRCFB1

v03.0

CZRCFCO _RC25S FR ENO TEST

27-Mer-198S5 15:21:49
11-Uen-198S 08:19:19

GLOBAL TEXT SECTION

012674
012677

/7 IN/
/CON/
/5157
/TEN/
/7CY /
/AT /
/VU. A/
/TIN/

012702
012705
012710
012713
012716

012721
012724

P.AFY;

<00><00>

/9N
/
/ASF/

/TLE/
/RR-/
/7 IN/
/CON/
/75157
/TEN/
/CY /
/RT /
/V.0/
/NUN/

<00><00>

P.AFZ:

/%Ns/
/ASF/
/TLE/
/RR-/
/7 IL/
/LEG/
/AL /

/D0 R/

/7EQU/
/EST/
/7 (U/
/7.Q0/
/RQ)/
<00»

P.AGA:

/%NS
/
/ASF/

/TLE/
/RR-/
/ FE/
/NCE/
/-P0/
/87 /
/ERR/
/0R /
/RT /
/PRO/
/TAB/
<00»>

P.AGB:

13136

/%Ns/
/ASF/
/TLE/
/RR-/
/ BA/
/D P/

/ACK/

VAX-1 181 i98-16 V4,0-579
USER$ 1:(A ZTEC.CZRCFC)ZRCFC1.B16;1

SEQ 0079

Page

S1
(1 2)

C7
IRCFRY
v03.0

CZRCFCO RC25S FR END TEST
GLOBAL TEXT SECTION

013141
013144
013147
013152
01315S
013160
013163
013166
013170
013173
013176
013201
013204
013207

105
104
125
105
101
125
117
000
045
101
124
122
040
105

124
105
105
104
124
056
116
000
116
044
114
122
125
130

045
106
105
0SS
116
120

013215
013220
013223

116
040
120

105
104
122

104
055
117

013231
013234
013237
013242
013245
013250
013253
013254
013257
013262
013265
013270
013273
013276
013301
013304
013307
013312

125
10S
111
040
056
104
000
045
101
124
122
040
120
101
105
104
040
111

123
116
117
050
056
123

120
123
116
125
124
0S1

116
044
114
122
104
040
103

045
106
105
0SS
125
120
113

013212

013226

013315
013320
013323

013326
013331
013334
013337
013342
013345
013350
013353
13356

13361
013364
013367
013372
013375
13400
13402
013405

114

103

104
130
040

057
0S1
045

101
124
122
040
103
123
124
103
101
125
124
000
045
101

101

040

124
055
106
114

040
106
063

063
000
116
044
114
122
111
117
111

105
131
124
056
123
000
116
044

27-Mar-1985 15:21:49
11-Jen-1985 08:19:19

040
121
125
040
040
104
105
P.AGC:

111

106
105
0SS
116
116
123
116
040
040
110
124
04s
106

/€T /
/DEQ/
/UEVW/
/€D v/
/AT /
su.D/
/ONE/
<00><00>»
/%uNs/
/ASF/
/TLE/
/RR-/
/7 UN/
/EXP/

ASCII
ASCII
ASCII

/NEOD/
/ D-/
/PRO/

ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII
ASCII

/uUsSP/
/ENS/
/ION/
7 (s
/..T/
/DS)/
<00»
/%Nw/
/AS$F/
/TLE/
/RR-/
s DU/
/P P/
/ACK/
/€T v/
/D-Q/
s FA/
/ILE/

ASCII
RSCII
ASCII

<«S57>/35/
/)/7<00><Q0>
/%Ns/

ASCII

123%

040
121
101
105
050
103
064
065
000
045

.ASCII
.ASCII
LASCII
ASCII
ASCII
ASCII
ASCII
ASCII
QSCI1
ASCII
ASCII
ASCII
ASCII
RSCII

ASCII

P.AGD:

ASCII
RSCII
ASCII

P.AGE:

P.AGF:

ASCII
ASCII
ASCII
ASCII
ASCII
ASCII1
ASCII
ASCII
ASCII
ASCI1
ASCII
ASCII
,ASCII
.ASCII

/LAIl/

/C S/

/D (/
/XFC/
/ 34/

/AsF/
/TLE/
/RR-/
7 IN/
/CON/
/S1S/
/TEN/
/Cy /
/AT 7/
/U.HW/
/1S1/
<00><00>
/wuNs/
/AS$F/

VAX-11 Blisse-16 V4,0-579
USER$1:(AZTEC.CZRCFC)ZRCFC1.B816;1

SEQ 0080
Pa ge

S2
(12)

ZRCFB)L

CZRCFCO RC2S FR END TEST

v03.0

013410
013413
013416
013421
013424
013427
013432
013435
013440
013443
013446
013450
013453
013456

013461
013464
013467
013472
01347S
013500
013503
013506
013511
013514
013516
013521
013524
013527
013532
013535
013540
013543
013546
013551
013554
013557

GLOBAL TEXT SECTION

124
122
040
103
123
124
103
101
125
105
000
045
101
124

122
040
103
123
124
103
101
125
113
000
045
101
124
122
040
117
104
117
104
114
107
040

114
122
111
117
111
105
131
124
056
113
000
116
044
114
122
111
117
111
10S
131
124

056
123
000
116

044
114
122
104

120

040
125
040
114

045
106
10¢
0SS
116
116
123
116
040
040
103
126

P.AGG:

045
106
105
055
056
103
106
116
111
105
114
120

P.AGH:

013562
013565
013570
013573
013576

103
105
045
101
124

013604
013607
013612
013615
lo13620
013623
13626

040
103
040
125
040
114
101

104
123
106
116
111
105
114

056
106
117
104
114
107
040

116
044
114
122
125

045
106
105
055
116

13631
013634
13637
13640
13643
13646
13651
013654

122

117
117
000
045
101
124
122
040

122

120
104

11-Jen-1985 08:19:19

105
055
116
116
123
116
040
040
123
117

101
117
117
000
116
044
114

013601

D7
27-Mar-198S 15:21:49

104
000
045
106
105

P.AGI:

0c<S

JASCII
.ASCII
.ASCII
LASCII
JASCII
LASCII
LASCII
.ASCII
.ASCII
.ASCII
LASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCII
.ASCII
LASCII
.ASCII
LASCII
LASCI1
LASCII
LASCII
,ASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCII
.ASCII
LASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
LASCII

/C0D/
/€/<00><00>
/sNs/
/AsF/
/TLE/

LASCII
.ASCII
.ASCI1
.ASCII
LASCII
LASCTMI
LASCLI

7 D./
/CSF/
/ FO/
/UND/
7 IL/
/LEG/
/AL /

LASCII

103
105

P.AGJ:

/TLE/
/RR-/
/ IN/
/CON/
/SIS/
/TEN/
/CY 7/
/AT /
/v.S/
/EKO/
<00><00>
/wNs/
/AsF/
/TLE/
/RR-/
7 IN/
/CON/
/SIS/
/TEN/
/CY 7/
/AT /
sv.C/
/KSV/
<00><00>
/sNw/
/AsF/
/TLE/
/RR-/
7 D./
s0PC/
/D F/
/70UN/
/D 1/
/LLE/
/GAL/
/ 0P/

.ASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCII
LASCII
LASCII

/RR-/

/0PC/
/0DE/
<00»
/sNs/
/A$F/
/TLE/
/RR-/
/ UN/

VAX-11 Blies-16 V4,0-579

USER$1:(AZTEC.CZRCFCJZRCFC1.B16;1

SE°p2221 53
(12)

E7
ZRCFBR1

v03.0

013657
013662
013665
013670
013673
013676
013701
013704
013707
013712
013715
013720
013723
013726
013731
013734
013737
013742
013745
013750
013753
013756
013761
013764
013767
013770
013773
013776
014001
014004
014007
014012
014015
014020
014023

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mer-1985 15:21:49
11-Jan-1985 08:19:19

116
116
101
104
126

123
124

P.AGK:

/A$F/
/TLE/

/70D /

/PIC/
/KED/
/ UP/
/ A/
/2ER/
/70 S/
/C8.7

/08/<00>
<00>

P.AGM:

14073

/%Ns/

/RR-/

014062
014065
014070
014076
014101
014104
14107
14112
14115
014120
014123

/%N
/

/ASF/
/TLE/
/RR-/
/7 IL/
/LEG/
/AL /
/XFC/
/7 EX/
/ECU/
/TED/
/ BY/
/ DM/
<00>

P.AGL:

014026
014031
014034

014037
014040
014043
014046
014051
014054
014057

/KNQ/
/WN /
/BAD/
/ DR/
/IVE/
/ ST/
/ATY/
/S A/
/T O/
/7.08/
/15/¢<00>

P.AGN:

/%Ns/

/ASF/
/TLE/
/RR-/
/7 IN/
/CON/
7518/
/TEN/
/CY /
/AT /
/0 1/
/DLE/
/ LO/
/0P/<00>
/9N%/
/ASF/

/TLE/
/RR-/

VAX-11 Bliss-16 V4,0-579

USER41:(AZTEC.CZRCFCJIZRCFC1.816;1

SEQ 0C82
Page

(12)

F7
ZRCFB1
v03.0

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mer-1985 15:21:49
11-Jan-1985 08:19:19

014126
014131
014134
014137
014142
014145

040
040
122
103
116
105

104
127
104
117
124
122

115
117
040
125
040
122

.ASCII
.ASCII
.ASCII
.ASCII
ASCII
.ASCII

/ DM/
/ WO/
/RD /
/COu/
/NT /
/ERR/

014153
014156
014161
014164
014167
014172
014175
014200
014202
014205
014210
014213
014216
014221

117
110
124
115
123
104
105
000
045
101
124
122
040
113

116
117
040
101
105
057
103
000
116
044
114
122
125
116

040
123
104
057
116
122
126

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/ON /
/HOS/
/T O/
/MA/<S57>
/SEN/
/0/<S7>/R/
/ECV/
<00><00>
/%Nw/
/ASF/
/TLE/
/RR-/
/ UN/
/KNO/

014235
014240
014243
014246
014251
014254
014257
014262
014264
014267
014272
014275
014300
014303

131
101
124
117
040
040
104
124
045
101
124
122
040
111

014150

014224
014227
014232

014306
01431}
014314
014317
014322
014325

117

127
104
120

040
124
101
124
107
116

014330
014333
014336
014341
14344

056
114
123
124
045

14360

040

014347
014352
014355
014363
014366
14371
014374

122

116
111
114
040
125
040
104
101

104

106
000
116
044

114
122
104
126
116
040
125
111
040
040
117
116

040

045
106
105
055
116
117

045
106
105
055
122
105

040

120
105
125
104

117
122
120
111

.ASCII

P.AGP:

106
105
055

127
040
040
101

.ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII

117
106
114
116
111
120

125

044
114
122

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

106
114
103
105
124
056
114

116

101
124
122

P.AGO:

040
123
101

106
040
101
000
045

124
105

.ASCII

P.AGQ:

.ASCII
.ASCII

.ASCII

/OR /

/WN /
/DIS/
/PLA/

/Y F/
/AUL/
/T C/
/0DE/
/ AT/

/ D./

/DFL/
/7/<00>
/%Ns/
/ASF/
/TLE/
/RR-/
/ DR/
/IVeE/

/ NO/
/T F/
/AUL/
/TIN/
/G 1/
/N P/

/.OF/
/LN /
/STA/
/TE/<00>
/%Ns/

.ASCII
.ASCII
.ASCII

/AS$F/
/TLE/
/RR-/

.ASCII
.ASCII
.ASCII
.ASCII

/POW/
/ER /
/UP /
/DTA/

.ASCII

/ U/

VAX-11 Bliss-16 V4,0-579
USER$1:(AZTEC.CZRCFCJ)ZRCFC1.816;1

SEQ 0083

Page

5S¢
(12)

G/
ZRCFB]
v03.0

014377
014402
014405
014410
014413
014416
014420
014423
014426
014431
014434
014437
014442
014445
014450
014453
014456
014461
014464
014467
014472

014474

014477
014502
014505
014510
014513
014516
014521
014524
014527
014532
014535
014536
014541
014544
014547
014552
014555
014560
014563
014566
014571
014574
014577

014602
014605
014610
014613

014616
014621
14624
14627
014632
014635
014640
014643

CZRCFCO _RC2S FR END TEST
GLOBAL TEXT SECTION
116
124
123
101
105
000
116
044
114
122
104

117

122
120
111
116
124

123
101

105

27-Mar-198 S 15: < 1l: 49
11-Jon-198 5 08::1 9::19

117

111
040
111
104
045
106

P.AGR:

105
055

040

127

040
040
101

117

111
040
111
104
045
106
105
055
104

P.AGS:

124

040

122

106
114

105
045

P.AGT:

P.AGU:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/7GNO/
/511/
/7CS /
/FRI/
/LED/

<00><00>

/%N
/

/ASF/
/TLE/
/RR-/
/7 0/
/PQW/
/ER /
/UP /
/DIA/
/GNO/
/78717

/CS /
/FRI/
/LED/

<00><00>

/%N
/
/ASF/
/TLE/
/RR-/
/ AD/
/APT/
/ER /

/CAR/
/0 F/
/AIL/
/URE/
<00>

/%N
/

/ASF/
/TLE/
/RR-/
/7 EC/
/. TM/
/R 1/
/IME/
/0 0/
/UT/<00>

/%N
/
/ASF/
/TLE/
/RR-/
/7 U./

/SEN/
/D/<57>/U/
/ .RE/
/CV /
/RIN/
/G R/
/EAD/
/ IN/
/CON/

- 11 8 lis 9-16 v4,0-579
VAX
AZT
USER $1:(AZ
C CZRCFCIZRCFC1.B16;1

SEQ 0084

ge(12)

H7
ZRCFB1

v05.0

014646
014651
014654
014657
014660
014663

014666

014671
014674
014677
014702
014705
014710
014713
014716
014721
014724
014727
014732
014735
014736
014741
014744
014747
014752
014755
014760
014763
014766
014771
014774
014777
015002
015005
015010
015013
015016
015021
015024
015027
015032
015035
015040
015043
015046
015051
015054
015057

CZRCFCO_RC2S FR END TEST
GLOBAL TEXT SECTION
111

105
131

27-Mar-198S 15: 21:49
11-Jan-1985 08: 19:19

123
116
000
045
106

.ASCII

<00»

P.AGV:

/%N%/
/RASF/

105
055
116

/TLE/
/RR-/
/ UN/
/KNO/
/WN /
/WA1/

L )
Adt

040
111

126
105
117
101
104
126

/TRV/
/ RE/
/RS0/
/N A/
/T D/
/.RV/

/7CT/7<00>

000

P.AGW:

ASCII

P.AGX:

/TLE/
/RR-/
/7 D./7
/ARC/
/5 0/
/10 /
/NQ1/
/ F1/
/ND /
/CLO/
/SES/
/T U/
/NDO/
/NE /
720N/
/€7 <00><00>

/%N/

/ U./
/SEE/

15073
15076

15104
15107
015112

<00»

/9N
/
/ASF/

/ASF/
/TLE/
/RR-/

015062
015065
015070

015101

/781S/
/TEN/
/7CY7<Q0>

P.AGY:

ASCII

/K F/
/QUN/
/D S/
/EEK/
/ 10/
/7 IL/
/LEG/
/AL /
/TRA/
/CK/<00>
/%Ns/
/ASF/
/TLE/

VAX-11 Bliss-16
0-579
USER$1:(AZ EC CZRCFC]ZRCFCI B16;1

SEQ 0085

Page

S7
(12)

17
ZRCFB1
v03.0

015115
015120
015123
015126

015131
015134
015137
015142
015145
015150
015153
015156
015161

015164
015167
015172
015175
015200
015203
015206
015211
015214
015217
015222
015225

CZRCFCO _RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mar-1985 15:21:49
11-Jan-1985 08:19:19

122

/RR-/

125
124

/7 VU./
/HTS/

040
111

/7T 1/
/NI1/
/ 01/
/7RG /
/DMA/
/ WR/
71TE/
/ FA/

104
107
115

127
124

106
114
000
116
044

P.AGZ:

/TLE/

/RR-/
/ U,/

/HTS/
/1T 1/
/NIT/
/7 01/
/ARG /
/DMA/
/7 C0/
/MPA/
/RE /7
/FAYI/
/LED/

015230
015233
015236

015241

015244

015246
015251
015254
015257
015262
015265
015270
015273
015276
015301
015304
015307
015312
015315
015320
015323
015326
015331
015334
015336
015341
15344
015347
015352
015355
15360
015363

/ILE/
/D7 <00> <« 00>
/%N
/
/ASF/

P.AKHA;

<00><00»
/9%Ns/
/ASF/

/TLE/
/RR-/
/7 U,/

/5YD/
/R F/

P.AHB:

/0UN/
/0 S/
/5.0/
/ER /
/SET/
/ AN/
/0 S/
/5.5/
/PN /
/NOT/
/ SE/
/1/7<00>
/%Ns/
/ASF/
/TLE/
/RR-/
/ MA/
/STE/
/R D/
/RIV/

VAX-1 18 1 ise-16 v4.0-579
USER¢ 1:( A ZTEC.CZRCFCJZRCFC1.8B16;1

SEQ 0086
Page
58

(12>

015366
015371
015374
015377
015402
015405
015410
015412
015414
015416
015420

105

101

117
123

122
104
012132’
012212'
012260'
012326’
012374
012460’
012544
012612’
012660’
012726
012774’
013044
013114°
013170’
013254’
013334’
013402'
013450’
013516’
013570°
013640’
013720’
013770’
014040’
014112’
014202'
014264
014344
014420°
014474
014536’
014574
014660
014736
015024'
015104
015164
015246
015336

123
103

040

/ES /
/ACL/
/70 A/
/5SE/
/RTE/

040

123
124

000

P.AFO:

040

103

P.AHD:

125
116
111
101

01)565

104
117
101
045

P.AHE:

/D/<00><00>

—a
00

—r0
(Yo 1)

-Mar-19
-Jon-19

O
ou

ladA®]

v03.0

D-‘fl

CZRCFCO _RC2S FR END TEST
GLOBAL TEXT SECTION

ZRCFB1

oo
v

J7
VAX-11 B liss-16 v4,0-579
USER$1: [AZ

ARZT C CZRCFCIZRCFC1.B16;1

SEQ 0087

Page

(12)

K7
CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

ZRCFR1

v03.0

015570
015572
015575
015600
015603
015606
015611
015614
015617
015622
015625
015630
015633
015636
015641
015644
015647
015652
015655
015660
015663
015666
015671
015674
015677
015700
015703
015706
015711
015714
015717
015722
015725
015730
015733
015736
015741
015742
015744
015746
015750
015752
015754
015756
015760
015763
015766
015771
015774
015777
16002
016005
16010
16013
16016
016020
16023

000
101
040

107
116
126
114

114

116
101
040

107

116
125
101
105
000
101

117
101

116
040

116
122
111
040
101
101

27-Mar-1985 15:21:49
11-Jen-198S 08:19:19
/N/<Q0>

.AHF:

/98AN/
/70 R/
/7€G1/
/0N /
/AVA/
/ILA/
/BLE/
/78N/<Q0>
/8AN/
/70 R/
/7EGI/
/0N /
/5V1/
/TAB/
/LE®/
/N/<Q0><00>
/%AP/
/ROG/
/RAM/
/ NO/
/T K/
/NOW/

105

000
116
122
111
040
111
102
045
000
120

107
115
117

LAHG:

JAHH:

117

045
101
101
106

/NsN/
<00»

AHT:

/%AL/
/0RAD/
/ FA/
7ILVU/
/RE%/

114
105

000
101
101
101
116
116

015526’
015546°
015572°
015622’
015652°
015700’
015722'
045
125
105
045
045
116
114
040

115

116
116
045

117

/N/<00><00>
/8RS
/

AHY:

/TAN/

/DAL/
/0NE/
/79N/<00>
<00>

.AHC:

101
123
116
126
111
103
115
000

101
115

LAHL;

ASCII

AHM;

.AHN:

.ASCII

ASCII

P.AHD
P.AHE
P . AHF
P.AHG
P.AHH
P.AHI
P.AHJ
/%AS/
/7UCC/
/ESS/
/7%N/ <Q0»
/%RAl/
/NVA/
/LID/
/ CQ/
/MMA/
/NDw/
/N/<00>
/%AC/
/0MM/

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC1.816;1

|
56092328

(12)

ZRCFR]

CZRCFCO RC2S FR END TEST

v03.0

016026
016031

101
040

116
101

122
104
000
101

124
045

016055
016060
016063
016066
016071
016074
016077
016102
016105
016110
016112
016115
016120
016123
016126
016131
016134
016137
016142
016145

106
116
116

114
105
000
101
111
101
111
102
045
000
101
104
040
122
124
122
122
000
101
111

111
045
000
125
124
126
114
114
116

000
127
124

104
000
101
115
122
105
117
116

103
120
105
122
122
000

016210
016213
016216
016221

016224
016227
016230
16233
016236
016241
16244
16247
16252
16255
16260
16263
16266
6271

116
055

045
116
055
101
101

105

000
045

105

101
117
101
105

117
116
045
122

105
122
105
105
116
045
117
101
040
122
045

04S
101
040

122
045
000
045
117
040
106
122
103
123
105
117
116
045
117

111
117

040
117
103

101
124
105
117

11-Jen-1985 08:19:19

104
102

117
105
116
045

016150
016153
016156
016161
016164
016166
016171
016174
016177
016202
016205

27-Mer-1985 15:21:49

GLOBAL TEXT SECTION

016034
016037
016042
016044
016047
016052

125
124
106

115
111
106
115
040
122

.ASCII
.ASCII

P.AHO:

P.AWP:

P.AHR:

120
124
124
045

P.AKS:

P.AHWT:

116

104
101
122
122

000

101
123

110
124

P.AHY:

102
106
040

103
123
122

122
000
101
116

125
105
101

105
040
12¢
S
000
107
124

.ASCII
.ASCII
.ASCII
.ASCII

/0RT/
/EDwW/
/N/<00>
/sAU/

ASCII
.ASCI1
.ASCII

/FLI/
/NEs/
/N/<00><00>

LASCII
.ASCII

ASCII
.ASCII
LASCII
LASCII
.ASCII

.ASCI1

P.AHQ:

P.AMV:

/AND/
/ RB/

.ASCII
.ASCII
.ASCII
ASCII
LASCII
ASCII
.ASCII
.ASCII
LASCII
_ASCII
.ASCI1

.ASCI1
.ASCII
.ASCI1
.ASCI1
.ASCI1
,ASCII
.ASCII
.ASCI1
.ASCI1
.ASCI1
LASCII

_ASCII
.ASCII
.ASCII
ASCII

.ASCI1
.ASCII
ASCII1
.ASCII
.ASCII
.ASCII1
LASCII
.ASCI1
.ASCII
.ASCII1
.ASCII
.ASCII
,ASCI]
.ASCII

/NIT/
/-OF/

/sAU/
/NI1/
/-AvV/
/AIL/
/ABL/
/E%N/
<00>¢<00>
/wAM/
/€D1/
/A F/
/70RM/
/AT /
/ERR/
/ORs/
/N/<00><00>
/wAW/
/RI1/

/E P/
/ROT/
/€EC1/
/EDw/
/N/<00>
/wAC/
/0MP/
/ARE/
/ ER/
/ROR/
/%N/<00>

/#AD/
/ATA/
/7 ER/
/ROR/

/#N/<00>
<«00»
/wAHW/
/0S1/
7 BU/
/FFE/
/R A/
/CCE/
/S5 /
/ERR/
/0Rs/
/N/<00><00>
/sAC/
/ONT/

VAX-11 Blies-16 V4.0-579

USER$1:[AZTEC.CZRCFCJZRCFC1.B16;1

5€EQ

0
093329
61

(1)

M/
<RCFA}

v03.0

016274

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mer-1985 15:21:49
11-Jon-198S 08:19:19
.ASCI

114
122
122
122

P.AMM:

.ASCI

P.AMX:

.ASCI

RT:

'aLxu

016424

0l6432
016434

RT TABLE:

AMT _DATA, BUF :

BLKU

RCV.DA
BUF
TA
::

CL¥.ADR:

VAX-11 8 liss-16 vV4,0-579
USERS]:( AZTEC. CZRCFC]ZRCFC: B16;1

SEQ 0090

Page

(12)

N7
ZRCFR}

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

LOG.UNIT:

.BLKW
OUT.BOUND::
BLKW

002034

002036

IN.BOUND:
:
.BLKW
VEC.AO::.ELKB
LCVEN

002040

002042

—
—
Pt Pt

002030
002032

002026

(2]

BLKW
CLK.HERTZ:;
.BLK
CLK.START::
BLKW
UNIT::
.BLKW

002024

P put

v03.0

27-Mar-1985 15:21:49
11-Jen-198S 08:19:19

RC2S.ADDR::
.BLKW

002044

RC2S.DATA;

.BLK
COM.AREA::
.BLK
HEA
.
REA:
D
:
.BLKW

002050
002260

002262

RECEIVE.RING::

.BLKW
SEND.RING:
:
.BLKW

002264
002266

REC.ENVELOPE
::

.BLKW
SND.ENVELOPE
; :
BLKW

004266

005614

5616

005620

“005622
005623
1005624

005626

000000

143325

.WORD

.BLKW

DATALl:: .BLKW
DATA2:: .BLKW
DATAZ:: .BLKW
DATA4:: .BLKW
I.AM NEX::
.WORD

MSGAD
: .BLKW
R:
END.LBN::

.WORD

P.MASK:: .BLKB

B.MASK:
: .BLKB

MANU, SW: :

.BLKW
SWITCHZ::
.BLKW

O
O
ittt
e O

TIP::

MINUTES::

000000

TICKS:: .WORD

SECONDS::
.WORD

.BLKW
CMD.REF::
.BLKW
BYTE.COUNT::

BUF . DESCRPTR:;

34453

VAX-1 18 1 iss-16 v4.0-579
USERS] 1:(
: A ZTEC.CZRCFC)ZRCFC1.B16;1

SEQ 0091
Page

63
(1 2)

IRCFR)Y

CZRCFCO RC2S FR END TEST

v03.0

GLOBAL TEXT SECTION

005630
005632

005634

005636
005640
005642
005644
005646

005650

000000

005652
005654
005656

005660

005672
005674
005676
005700

005702
005704

000000

005706

000000

005710

000001

005712
005714

005728
1005726
005730

11-Jen-198S 08:19:19

RET.UNIT FLAG::
BLKW
Pl::
BLKW

1
1}

P3::
BLKW
P4::
BLKW
PS::
BLKW
P6:
BLKW
RET.STATUg;

)
1}
3
)
y

P2::

000037
000000

BLKM

ER.STATUS::
LMORD
CANCEL
. TIMER: :
BLKW
CMD.SLOT::
.BLKW
RES.SLOT:;
BLKW

LBN: :

005662
005664
005666
005670

005716
005720
005722

B8
27-Mer-1985 15:21:49

BLKW

LBN.ST::.BLKW
LBN.ED::.BLKW
LBN.SZ::.BLKW
FREE.HEH.ADDR::
.BLKW
MEM_ SIZE::
.BLKW
H,SADD::.BLKW
H.EADD::.BLKW
BUF .LENGTH::
.BLKW
CMOD::
.WORD
NUM_RETRIES::
BLKW
RETRIES::
LHORD
FAL .CODE: :
LWORD
OMC.TEST::
BLKW
BYT.CNT::
BLKW
OM.REC::.BLKW
DM.XMT::
. BLKW
SIZ.LBN::
LWORD
OFFSET::
. WORD
PASSO:: .BLKW
TEMP::
.BLKW

.GLOBL
.GLOBL
.GLOBL
.GLosL
.GLOBL
.GLOBL
.GLOBL

VAX-11 Blise-16 V4,0-579

USER$1:(AZTEC. CZRCFC]ZRCFCI B816;1

1
1
)

)

1
1
1

1
1
1
1
1
O
1

1
1
1
1
1
37
O
1
1

L$SOFT, T4PTHV, L$RPT, LS$INIT
LS$CLEAN, LS$LAST, t.$HARD, LS$DVTYP
L$DESC, L$OU, L$AU, L$AUTO, T1
12, T3, T4, TS5, T6, 17, T8, 19
T10, T11, T12, T13, T14, T15, T16
T17, T18, T19, 120, 121, T22, T23
Te24, T25, 126, T27, 128, 129

'3
SEQ
0092 64

(12)

C8
CZRCFC)_RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mer-198S 1 5:21:49
11-Jen-1985 0 8:19:19

L$ERRTBL
==
L§SW==
L$HWs==

L$DEPQ==
OFPTBL
==

SFPTBLe==
RINGBASE
«»
TIME=
=
FRU==
ADAPT(Qs==»

CONTRQ=
=
DRIVE
==

MECHAN=
=

QST]==
Q572==
QST3=s
QST4s==
QSTo==

QST8==
QS579+=
QST10s=@510.1==
Q510.2==
QST1]==
QS5T714=QST15==
OBM1s=
OBM8==
DBM9==
0BM10Q==
OBM1]1==
DBM12==

DBM13==

002226°
002274
002356
002422’
002460’
002524
002564
002634
002674
002732’
002774’
003030°

DBM1S==
DBM16==
DBM17==
OBM]18==
DBM19==
DBM20==
DBM2]
==
DBM22==
DBM23==
0BM24 ==
DBMRS==
0BM26=+
DBM27==
DBM28==
DBM29=»
DBM30==
DBM3]
==
DBM32==
DBM36==

ERRTYP
LISWLEN.?
L$HWLEN.2
LIREV.]

COM, AREA 10
.ARA

v‘o'ovv1:1:1:'o'o'o'ovv'o'ovv'o'ov'ovv‘o'o‘ovvvvvvvvvvvvvvvvvvvvv

ZRCFB1
vo3.0

-ARB
.ARC
.ARD
. AAE
. AAF
. AAG
.AARH
.AAR]
.AAY
. AAK
.AAL
. AAM
.AAN
.ARQ
. AAP
.AAQ
.AAR
. ARS
.ART
.AAY
.AAV
. AAW
. ARX
.AAY
.ARZ
. ABA
.ABB
.ABC
.ABD
. ABE
. RBF
. RBG
.ABH
.ABI
.ABJ
. ABK
.ABL
.ABM
.ABN
.ABO
. ABP
.ABQ
.ABR
.ABS
.ABT
.ABU
.ABV

VAX-11 Blise 1

4.0-579

USER$1: (AZT CZRCFC]ZRCFCI B16:1

SEQ 0093

Page

(12)

D8
CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

ZRCFR1

v03.0

003072°
003136
003176’
003252’
003304°
003330°
003376’
003444
003452’
003536
003616
003712’
003750’
004030’
004110’
004154
004220’
004310°
004412’
004464
004540
004614’
004652
004716'
004776°
005044
005120’
005210’
005300
005332’
005374°
005430’
005460’
005510’
005562
005624
005662
005730
005766
006010’
006036'

27-Mar-1985 15:21:49
11-Uen-198S 08:19:19
DBM37==
DBM38==
DBM39s==
MSG.01e=
ERR .01 ==
ERR.022=
ERR,03e»

FMT4Ces
FMT1ee
FMT2==
FMT3es
FMT4s«
FMTS=»
FMT6==

FMT7=»
FMT7Ae
FMT8==
FMT9==
FMT10==
FMT1]=»
FMT12==

FMT13=FMT14=FMT1S==
FMT16==
FMT17=»
FMT18e=
FMT19==
FMT20==
FMT$A=s
MSG.PWR==

MSG. 1=
MSG.2==
MSG.7==
MSG.8==
MSG.9==
MSG.10==
MSG.11==

MSG.13==

MSG.14==

BUFF .ERR==
DMC
. ERR==
INI.MSG=»
END.MSG==

BRERR=»

MSG.SEEK ,ERRs =

MSG.HSWICH.ERR==
MSG.SAC.ERR==
MSG,COM. WPT=»

SK.FOR.ERR==
SK.REV.ERR==
SK.T0G.ERR==
SK.RAN,ERR==

MSG.WRITE.ERR=s
MSG.READ.ERR==

006734

S
. ERR==
MSG,GU
AVAIL .ERR==

.ABW
. ABX
.ABY
.ARBZ
.ACA
.ACB
.ACC
.ACD
.ACF
.ACG
.ACH
.ACI
.ACJ
.ACK
.ACL
.ACM
.ACN
.ACO
.ACP
.ACQ
.ACR
.ACS
.ACT
.ACU
.ACV
.ACW
.ACX
.ACY
.ACZ

VAX-11 Bliss-16 V4.0-579

USER$1:(AZTEC.CZRCFCJIZRCFC1.B16;1

SEQ 0094
Page

(1 2)

E8
ZRCFR1
v03.0

CZRCFCO RC2S FR END TEST
GLOBAL TEXT SECTION

27-Mer-1985 15:21:49
11-Jan-1985 08:19:19

006766’
007056’
007146°
007214’

MSG.AVE,TIME=MES.SKO.TIME==
MSG.PRO, TIME==
MSG.SK.TIME=»

P.AES
P.AEC
P.AED
P.AEE

007416’
007456

AZT .READY,.ERRs==
EXE.SUP . .ERR=~=

P.AENH
P.AEI

EMSG.STRUCT ==

P.AFY

007266
007340’

MG, SKF , TIME==
MSG.ROT, TIME==

007516
007554
011576’

SND.DATA.ERR==
RE.DATA.ERR==
PFE.STRUCT ==

015410’
015742’
016404'

RC.STRUCTURE ==
SOUP,STRUCT ==
SMSCP.STRUCT ==

0l12122°

)

VAX-11 Bliss-16 V4.0-579
USER4$1:(AZTEC.CZRCFCJZRCFC1.B16;1

P.AEF
P.REG

P.AEJ
P.AEK
P.AEL

P.AFQ
P.AHC
P . AHK

PSECT SUMMARY

Psect Neme
AA$CODE

Words
94

$GLOBS
$PLITS

Attributes
RO,
I

1517
3727

RO,
RO,

D
0O

,
,

LCL,

REL,

GBL,
GBL,

REL,
REL,

CON

CON
CON

Library Statistics

-------- Symbols --------

Totel

Loaded

Percent

485

154

Pages

Processing

00:00.2

Mapped

Time

File

USER$1:[AZTEC.CZRCFC)AZTECO.L16;2

COMMAND QUALIFIERS

BLISS/PDP11/LIST ZRCFC1.816/EN:NOEIS
Size:

Run Time:

Elepsed Time:
Lines/CPU Min:

0 code + 5338 deata words
01:33.8

01:39.6
1248

Lexemes/CPU-Min: 10517
Memory
Used:
299 peges

Compilation Complete

SEQ 0095
Pa Qe
67

(12)

-8
ZRCFB2

0001

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

MODULE ZRCFBe (

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC2.B16;1

SEQ 0096
P

(1)

CZRCFCO RC2S FR END TEST

0007

0008
0009

s D D D D NI PO NI ) bt bt s ot et s s pa et pt bt s s e O O O O O

0006

et (ot e et et Bt et et et ot B et Bt B

0002
0003
0004
0005

o Bt e et 0 e Bt e 1t B et Bt Pt

B VL S BT AL DT 2 B B TS B0 01 B0 TS CE B0 00 BT B0 B G0 W0 B0 WS G0 V0 VI G0 VL @ TP Be VI ST B0 V0 V0 G0 B 0 W0 B G V¢ T Be WE 00 G B¢ G0 G0 Be S0 Vo @e So

ZRCFR2

®TITLE

27-Mer-1985 15:23:34
11-Jen-1985 08:19:19

VAX-1 18 1i 8e-16 V4,0-579
USER$ 1:( AZTEC. CZRCFC]ZRCFCZ 816;1

'CZRCFCO RC2S FR END TEST'

IDENT = 'V03.0',
OPTLEVEL = O,
QDDRESSING MODE (RELATIVE)

BEGIN

SE
_KEY>
1 <BLF/LOWERCA
1]

1 brary

'AZTECO';

require

'OLSMAC.REQ';

structure

RC2S (0, P, S, E] =
begin

ocal

RC_REG;

RC_REG =
RC_REG
end

psect

code = AASCODE;

CLOCK_INIT

novelue,

: novelue,

RC2S$ERR_RPT : novalue,
AZT_INIT,

AZP_INIT,
PRTIFRU_CALLOUT : novalue,
INIT_COM_AREA,

NXMITM: L3ISR novelue,

CLK_INT_SERV : L$ISR novalue,

REC_STATUS,

SET_CNTLR_CHAR,

AVAILABLE,

ON_LINE,

READ_CMD,

READ_FILL_CMD
: novalue,

GET_OUNIT_STATUS,

RANDOM_NUM : novalue,

GET_CMD_SLOT,
GET_RES_SLOT

: novalue,

EXAM_DATA,
AZTEE READY,
DO_RETRIES : novalue,
decode

! TO THE AZTEC

.(RC25 + #upvals0)<0, wbpval, 0>;

<P. Sn E)i

forward routine
FIND_CLOCK :

! DEFINE ACCESS ALGORITHM
! TO ALLOW FIELD REFERENCE

: novalue;

SEQ 0097
Pa ge

(2)

H8
CZRCFCO RC2S FR END TEST

ZRCFR2

*
1]

.
[]
*
[]
*
L)
L]

1]
.

.
L)

[]
»
L
*
.
L4

[]
3
[]
L)
L4

[
-

.
.
.
[
.

[

4
L)

4
[
[
L

L]
[

[]
[

[]
[
[
[

b b i (et Pt e o s e i e o e ot P

[]

1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560
1561
1562
1563
1564
1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577
1578

ot Dt e (ot ot ot et et et 0 Pt Pt P Bt Bt et o et P e it (i P P

®
.

s it Pt P P s o s

v03.0

[

[
L)

[]
[
.
[
LJ

Bt 50 et s et 8t et

[

27-Mar-1985 15:23:3 4

11-Uan-198S 08:19:19

VAX-11 B liss- 16_v4.0-579

USER$ 1:(AZTEC. CZRCFCIZRCFC2.B16;1

external
ADAPTO,

CONTRO,
: blockvector (REC_ALLOCATE « SND_ALLOCATE + HDR_SIZ, 2, word],
COM_AREA

HEAD ARE A : ref block (4, word) field (HDR.FIELD),
RECEIVE _RING
: ref blockvector (REC_ ALLOCATE 2, word) field (DSCEFIELD).
SEND RING: ref blockvector (SND_ALLOCATE, 2, word) field (DSC_F

REC_ENVELOPE : blockvector
SND_ENVELOPE : blockvector

[REC _ALLOCATE, RB_SIZE + 2, uord
[SND ALLOCATE. SB_SIZE + 2,

word)

field (ENV_FIELD),
field (ENV_FIELD),

BUF DESCRPTR : word volatile,

T BUFFER DESCRIPTOR AREA

CLK_TYPE
: word,

'TYPE OF CLOCK ON SYSTEM
1(0=NO CLOCK,
-1= L-CLOCK, 1=P-CLOCK)

BYTE_COUNT : word voletile,
CLK_ADR : word,

CLK_CSR : word,

! BYTE COUNT BUFFER
'LOCATION TO RETURN CLOCK ADDRESS

ISTORE CSR ADDRESS FOR CLOCK HERE

CLK_HERTZ
: word,
CLK_START : word,

! CLOCK RATE
! STORE CLOCK START VALUE

SECONDS

! STORE SECONDS

TICKS : word volatile,

: word volatile,

MINUTES : word volatile,
MSGADR : word volatile,

DATAl : word,
DATA2 : word volestile,
DATA3 : word volatile,
DATA4 : word volatile,
B_MASK : byte volatile,

LBN : word voletile,

LBN_ST : word volatile,
LBN_ED : word volatile,
CMD_REF : word volatile,

RES_SLOT

word volatile,

! STORE NUMBERS OF CLOCK INT. OCCURED
!
!

'
!
!
!
!
*

STORE MINUTES
STORE MESSAGE ADDRESS

STEP 1 WRITE DATA T0 AZTEC_INIT
STEP 2 WRITE DATA T0 AZTEC_INIT
STEP 3 WRITE DATA 10 AZTEC_INIT
STEP 4 WRITE DATA TO AZTEC_INIT
MASK FOR WITCH STEP TO DO
IN AZTEC_INIT.

! LOGICAL BLOCK NUMBER BUFFER
t START LOGICAL BLOCK NUMBER
* ENDING LOGICAL BLOCK NUMBER
' COMMAND REFERENCE

RECEIVING RING SLOT

INIT INTERRUPT VECTOR

CMD_SLOT : uord volatile,

! SENDING RING SLOT

RET svnrus uord volatile,

! RETURN STATUS

VEC_AD
:

ER_STATUS

: word,

TEMP : word volatile,
PASSO : word,

CMOD : word,
IN BOUND
: word,

FREE_MEM ADDR

MeEM_SIZ€,
RINGBASE,
DRIVE _,
DBM1,
ERR_O1,
ERR-02,
ERR_03,

FMTSC,
FRU,
FMT2,
FMTS3,
FMT13,
FMT14.
FMT15,

DMC_TEST
BYT_CNT

' SAVES ERROR CODE
!

FLAG FOR FIRST PASS

' COMMAND MODIFIER

! STARING FREE MEMORY ADDRESS

! FREE MEMORY SIZE

SEQ 0098
Page

3
(2)

18
ZRCFR2

CZRCFCO RC2S FR END TEST

v03.0

1604

OM_XMT,

;.
1606
;1607
1608
:

1
1
1

H_SADD,
H_EADD,
8UF _LENGTH,

;1610

1605

MANU_SW,

;1611
;1612

1
1

TIP,
SwP_CONTINUE,

;.
1614
161L
:
;1616
;.
1617

}
1
1
1

1609

;1613

;.
1618
;i
1619
;.
1620
;1621
;1622

1
1
1
1
1

;1625

;.
1623
;1628

;1626
;1627
:
1628
1629
:
;1630
;1631
;1632
;1633

1634

1
1

1
1
1
1
1
1
1
1

1638

1639
1640
1641
1642
1643
1644
1645
1646
lea7
ledas

:
1649
;1650
;1651
;1652
;1653

T_TABLE : ref block [WORD1 IN_RT TAB, word) field (RT_FIELDS).
RT : vector [WORD1_IN_RT_TAB, word],
I_AM NEX : word volatile,
CANCEL _TIMER : word volatile,
RETRIES,
SWP_RETRIES,
NUM_RETRIES,

SWP_TRACE,

SWP_START,
SWP_END,
SWP_TOP,
SwP_LIMIT,
LSUNIT,
MECHAN.,
MSG_PWR,
MSG_14,

P MASK :
e volatile,
RET UNIT F IG word,

H
:
:
H
:
:
:
;.
;.
;.

QST1S.,
QsTia,
! RUN TIME TABLE STORAGE
HWP TABLE : ref block [WORD2 IN HWP TAB, word) field (HWP_FIELDS),

1
1

1636
1637

FMTIA,

FAL_COOE,

1635

:
;.

SWITEH2,

1
1}
1
1
1
1
1
1
1
1

1
1
1
1
1

;1654
;1655
;1656

1
1
i

:
;
;

1
1
1

11-Jan-1985 08:19:19

OM_REC,

27-Mar-1985 15:23:34

END LBN : uord volatile,

Fl : word volat:le.

P2 : word voletile,
P3 : word volatile,
P4 : word volatile,
PS : word volatile,
P6 : word volatile,
QsTl,
QsT2,
QST3,
QsT4,
QsTe,
QST7,
QsT8,
QsT9,

QST10,
@510_1,
Qs10_2,
QSTi1,
RC2S_ADDR : ref RC2S field (RC_REG),
RC2S_DATA : block (2, word]) field (RC_REG),
EMSG_STRUCT : vector [4],

PFE_STRUCT : vector (23],

RC_STRUCTURE

vector [39],

VAX-11 Bliss-16 V4,0-579

USER$1:[AZTEC. CZRC"]ZRCFC2.816:1

SEQ 0099
Pa

(2)

J8
CZRCFCO RC2S FR END TEST

ZRCFB2

et Pt P
Pt 3t e

1661
1662
1663
1664
1665
1666
1667
1668

Pt p

v03.0

SDUP_STRUCT

27-Mar-1985 1
11-Jen-1985 0

: vector (7]

SMSCP_STRUCT : vector (1
XMT_DATA_BUF : vector

RCV_DATA_BUF : vector

WIT : No"do

OFFSET : word,
LOG_UNIT : word;

256, word),

V4.0-579
RCFCIZRCFC2.816;1

SEQ 0100
Page

(2)

K8
M.SCELLANEQUS SECTIONS

IRCFR2

OOOOOOO0O0O0

1669
1670
1671
1672
1673
1674

1675
1676
1677

1678

1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689

MHMHMH””PP””MPHMMH”H”

W@ B4

B0 B9

G5 @0

V¢ @0

B VP

€F

v03.0

stitle
ssbtt]l

27-Mer-1985 15:23:34

11-Jen-198S 08:19:19

VAX-11 B 1 i98-16 V4,0-579
USERS$1:( RZ1 EC.CZRCFCJZRCFC2.816;1

'MISCELLANEQUS SECTIONS'
'TYPE AND DESCRIPTION'

': NAMES OF DEVICES SUPPORTED B8Y PROGRAM
DEVIYP (sesciz2'AZTEC RC2S PLATTER'
),
'; TEST DESCRIPTION
DESCRIPT (wesciz'RC2S FRONT END/HOST DIAGNOSTIC'
);w(
:
:
:

THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS
THAT ARE USED BY THE SUPERVISOR 10 BUILD P-TABLES.
THE
MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE

: INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE
: MACROS ALLOW THE SUPERVISOR TOQ ESTABLISH COMMUNICATIONS
: WITH THE OPERATOR.

)
BGNHRD;
GPRMA (QST1, #0'0', 0, %0'00000', #0'177777', YES, 1);
!'1P ADDRESS?
GPRMA (QST2, so0'2', 0, %0'4', w0'774', YES, 1); 'VECTOR?

GPRMD (QST3, ®o0'4', 0, %0'177777', %0'4', %0'7', YES, 1);
GPRMD (QST4, s0'6', D, %0'377', s0 O', sdecimal’'253', NO,

ENDHRD;

1);

'BR LEVEL

SUNIT NUMBER(S)

SEQ 0101
Pa

(3)

L8
ZRCFR2
v03.0

MISCELLANEOUS SECTIONS
SOF TWARE PARAMETER CODING SECTION

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

;i
1690
: C 1691

1
1

%sbttl ‘' SOFTWARE PARAMETER CODING SECTION'
%(

;:
;:
:
;:
:
:
:

1
1
1
1
1
1
1

; THE SOFTWARE PARAMETER CODING SECTION CONTAINS MACROS
: THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.
THE
; MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE
: INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.
THE
: MACROS ALLOW THE SLPERVISOR TO ESTABLISH COMMUNICATIONS
: WITH THE OPERATOR.
‘- -

: C 1692

C
C
C
C
C
C
C

1693
1694
1695
1696
1697
1698
1699

1700
:
;1701

1
1

1702 1
:

1703

1705

1704

1706

VAX-11 Bliss-16 V4.,0-579
USER$1: (AZTEC.CZRCFCIZRCFC2.816;1

“
BGNSFT

GPRML 30516. %0'0', %0'177777", YES, 1);
XFERF (BOTTOM);

GPRML (QST7, #o'2', #0°177777°,

YES,

1);

'00 YOU WISH TO LIMIT THE AREA TESTED

'IN TESTS 015 - 0187

XFERF

;1707
;1708
;1709

A
1
1

GPRMD (QST8, #o0'4‘', D, %0'177777', sdecimal'0’', sdecimal'820', NO,
GPRMD (QST9, #0'6', D, %0'177777', sdecimal
' 0', sdecimal’'820', NO,
XFER(LAST)

;17111
i
1712
:
17113
;1714
;1715
i
1716
;177

1
1
1
%
o
1
1

GPRML (QST?7, #o'2', %0'177777', YES,

'D0 YOU WISH TO LIMIT THF ¢REA TESTED
'IN TESTS 015 - 0187
XFERF (VLAST);
*IF NO GO TO LABEL VLAST
GPRMD (QST8, so'4’', D, %0'177777', sdecims]'821’', sdecimal’'1641‘, NO, 1);
'STARTING TRACK?
GPRMD (QST9, %0'6', D, %0'177777', wdecimal
' 821', sdecimal’'1641', NO, 1);
'ENDING TRACK?
$SL (MANINT);
'LABEL THIS QUESTION
sL (LAST);

;1719

GPRMD (QST11, 1o~. D, %0'177777', %0'0', %0'177777', YES,

GPRML (QST1d, wo'14', 1, YES, 1);

1710 1

1718

1720

1721

;1722

s
1723
;1724

1
1
1

1
1

(MANINT);

'USE TOP SURFACE FOR SINGLE SURFACE TESTS?

*IF NO GO TO LABEL BOTTOM
'IF NO,

$L (80110fl5:

$L (VLAST);

SKIP NEXT

TWO QUESTIONS

1);
1)

'STARTING TRACK?
'ENDING TRACK?

1);

'NUMBER OF RETRIES FOR TEST

GPRML (@510 2, %o0'12°, 1, YES, 1);

'D0 YOU WISH TO CONTINUE TESTING?

GPRML (QS10_1, so'16‘', 1,
ENDSFT;

'D0 YOU NEED TRACE MOOE?

YES, 1);

‘D0 YOU WANT TO DO THE MANUAL
*INTERVENSION TEST?

SEQ 0102

Page

(4)

]

M8
27-Mer-1985 15:23:34
11-Jon-1985 08:19:19

MISCELLANEQUS SECTIONS

ZRCFR2

REPORT CODING SECTION

1725
1726
1727
1728
1731
1732

02 A) N )4t 4=t Pt pt o

v03.0

cobttl

"REPORT CODING SECTION'

; THE REPORT CODING SECTION CONTAINS THE

“PRINTS" CALLS THAT GENERATE STATISTICAL REPORTS.

BGNRPT;
return;

ENORPT;

LTITLE
.IDENT

124

103
103
040
101
105
000
103
040
117
040
104

040
062
120
124
122
062
106
116
105
057

LASCI1
ASCIT
ASCII
.ASCII
L$DESC::.ASCII
.ASCI1
LASCII
LASCII
ASCII

040
101

104
107

LASCIYI
LASCII

117
117
111

000
000031
0000006
000000
177777

001031
0000006
000004
000774

002032
0000006

.PSECT
LSOVIYP;
LASCII
LASCI1

132

123

123
103

.ASCI1

LASCII

LASCIT
ASCI11

LASCII
L $HROLN:
:
.WORD
GP$i::
.WORD
.WORD
.WORD
.WORD
GPs2::
.WORD
LMORD
.WORD
.HORD
GP$3::
.WORD

.WORD

17777

000004
000007
00304¢
0000006
000377
000000
000375
000000C

GPs4::

. WORD
.WORD
LWMORD
_WORD
.WMORD
.WORD
L.HORD

LWORD

L $NDHRD::
BLrd
LISFTLN:

ZRCFB2 MISCELLANEQUS SECTIONS
/v03.0/
AASCODE,

/AZ1/
/€C /
/RC2/
/S ¢/
/LATY
/TER/
<00><«00>
/RC2/
/S F/
/RON/
/7 €/
/ND/<«S7>

/HOS/

/1 O/
/IAG/

/NQS/
/11C/

<«00»><00»

<<<LSNDHRD L $HROLN>/2>
3]
Q@S7]
O
1
1031
QST?
4
774
2032
QS713
-1
4
7
3042
QS74
377
O
375
)

VAX- 11 8 lis e-16 V4.0
AZ1 EC. CZRCFC]ZRCFC? 816:1
USER $1:(AZ

SEQ 0103

Page

8
(S )

N8
ZIRCFRS

MISCELLANEQUS SECTIONS

v03.0

REPORT CODING SECTION

000136
000140
000142
000144
000146
000150
000152
000154
000156
000160
000162
00v164
000166
000170
000172

177777
000000C
002042
0000006
177777
000000
001464
003042
0000006

000176
000200
000202
000204

000000
001464
000000C
001004

000206
000210
000212
000214
000216
000220
000222
000224
000226
000230
000232
000234
000236
000240
000242

001130
0000006
177777
000000C
002042
0000006
177777
001465
003151
003042
0000006
177777
001465
003151
001004

000244
000246
000250
000252
000254
000256
000260

001004
001004
004052
0000006
177777
000000
177777

000174

262

000264
266

270
272
274
276

00300
302
00304

27-Mer-1985 15:23:34

000130
0000006
177777
000000C
001130

177777

005130

0000006
000001

006130
0000006
000001
007130

000000G
000001

11-Jon-198S 08:19:19

LMORD
.WORD
.WORD
LWORD
$80TTO
. WORD
M:
GP$6::
.WORD
WORD
HORD
SMANINT:
. WORD
GP#7::
.WORD
.WORD
.WORD
MORD
.WORD
GP$8::
.WORD
.WORD

GP$S::

.WORD

.WORD
.HORD
SLAST:
_WORD
$LBOTTOM:
.WORD
GP$9::
.WORD
.WORD
$VLAST:
GP$10::

GP$11::

.WORD
. WORD
.WORD
.WORD
LWORD

.HORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

$LMANINT:

.WORD

$LLAST: .WORD
$LVLAST: .WORD
GP$12:: .WORD
.WORD
.WORD
.WORD
.WORD

GP$13::

GPs14::
GP#1S5::

.WORD

.WORD
.HWORD

.WORD
.WORD
.WORD
.WORD

.WORD
.WORD
LINDSFT::

.BLKW

VAX-1] Bliss-16 V4.0-579

USER$1:(AZTEC.CZRCFC)ZRCFC2.816;1

<<<LINDSFT-LISFTLN>/2>-1>
130
Q@STé
-1}
<ccc§LBOTTOM- $BOTTOM>¢400> 4> .40>
1130
QST7
-1
<<<<SL
- $MANINT
MAN
>¢400>.4>
INT
+40>
2042
QST8
-1
O
1464
3042
QST9
-1

O
1464
<cc$LLAST-$LAST>¢400>.4>

1004
1130
QST17
-1
<ccc§LVLAST-$VLAST>¢400>.4>.40>
2042
QST8
-1
1465
31S1
3042
QST9
-1
1465
3151
1004

1004
1004
4052
QST11
-1
O
-1

5130

@S10.2
1}

6130
QST10
1
7130

QS10.1
1

SEQ 0104

Page

(5)

B9
ZRCFB2
v03.0

MISCELLANEOQUS SECTIONS
REPORT CODING SECTION

27-Mer-1985 15:23:34
11-Jen-198S 08:19:19
.GLOBL

.GLOBL

B.MASK,

.GLOBL
.GLOBL

BUF .LENGTH, MANU.SW, SWITCH2, TIP
SWP.CONTINUE, FMisA. QST1S, @ST1a

.GLOBL
.GLOBL

.GLOBL
'GLOBL
:

6LOBL
.GLOBL

.GLOBL

.GLOBL
.GLOBL
.GLOBL

LRPT:

1 word,

; Meximum stack depth per

; Routine Size:

Routine Base:

invocation:

177772

4 words,

; Maximum steck depth per

0 words

L$RPT::

Routine Base:

invocation:

2 words

Pnge

(5)

LBN, LBN.ST, LBN.ED. CMO.REF

RES.SLOT, CMD.SLOT, VEC.AD, RET.STATUS
ER,STATUS, TEMP, PASSO, CMOD, IN,BOUND
FREE.MEM.ADOR, MEM.SIZE, RINGBASE
DRIVE., DBM1, ERR.01, ERR.02, ERR.03
FMTSC, FRU, FMT2, FHts, FMTIS
FMT14, FMTiS, OME.TEST. BYT.CNT
OM.xXmt, OM.REC, H.SADD. H.EADD
HWP.TABLE, RT.TABLE. RT, I.AM.NEX
CANCEL
. TIMER, RETRIES,

SWP.RETRIES

NUM.RETRIES, SWP.TRACE, SWP.START
SWP.END, SWP.TOP. SWP.LIMIT. LSUNIT

MECHAN, MSG.PWR, MSG.i4, FAL.CODE
END.LBN, P.MASK. RET.UNIT.FLAG
P1,
P2, P3. P4,
PS, P6, QST1, Q3T2

Q5T3, @sTa, aste, QsT7. Q5T8. QST
@ST10, Q@510.1, @510.2,

Q@ST11. RC25.ADOR

RC2S.DATA, EMSG.STRUCT, PFE.STRUCT

RC.STRUCTURE, SOUP.STRUCT, SMSCP.STRUCT
XMT.DATA.BUF, RCV.DATA.BUF, UNIT
OFFSET, LOG.UNIT

L$HARD==
L$SOF T==

000207

004767
104425
000207

CLK.TYPE. CLK.CSR. CLK.HSRTZ

CLK.START, TIiCKS, SECONDS, MINUTES
MSGADR, DATA1, DATA2, DATA3, DATA4

.GLOBL

|000000
000004
[000006

CLK.ADR,

SEQ V105

COM.AREA, HEAD.AREA

.GLOBL
.GLOBL

.GLOBL

; Routine Size:

CONTRO,

RECEIVE.RING, SEND.RING, REC.ENVELOPE
SNO.ENVELOPE. BUF .DESCRPTR, BYTE COUNT

.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL

000000

ADAPTO,

.GLOBL
.GLOBL
.GLOBL

000066
000136’

VAX-11 8 liss-16 V4.0-579
USER#$1:
( AZTEC.CZRCFC)ZRCFC2.816;1

L $HRDLN-2
L$SFTLN.2
.SBTTL

RTS

LRPT REPORT CODING SECTIUN

;

1724

;

1731

AASCODE . 0306

.SBTTL
JUSR
TRAP
RTS

LSRPT REPORT CODING SECTION
PC,LRPT
25
PC

AASCODE - 0310

C9
MISCELLANEQOUS SECTIONS

ZRCFRB2

INITIALIZE SECTION

fisbttl

USER41: (AZTEC.CZRCFCJZRCFC2.816;1

"INITIALIZE SECTION'

AT THE BEGINNING OF EACH PASS.

BGNINIT;
local
DELAY_MWLT;

!CONTAINS DELAY FACTOR

SETPRI (PRIOO);

'PRIORITY O

if READEF (EF_PWR)
then
be?in

'ARE WE HERE BECAUSE OF POWER FAIL?

PRINTF

(MSG_PWR);

incry COUNT

from O to 60 do

begin
DELAY_MULT = 10000;
DELAY (.DELAY_MULT);
BREAK;

W
LS LS LV VLS NN LS YR TV TR LN CL Y VY S NS RY SYPTTINY W
T

1786
1787
1788
1789

1783

Lok ok o L

1778

LV TE T

1777

1770
1771

VAX-11 Bliss-16 V4.0-579

' THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED

1733
1734
1735
1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747

Y71 37 V191,71, 71, VY, VY, VY, VY S e

v03.0

27-Mar-1985 15:23:34
11-Jen-198S 08:19:19

&nd;

! "POWER DELAY - WAITING"
! WAIT APPROX. 60 SECONDS

! BREAK FOR ACT

DOCLN;

end;

MAKE SURE NOT MORE THAN 16 UNITS

(PLATTERS) HAVE BEEN SPECIFIED.

IF THERE ARE TOO MANY, NOTIFY USER AND RETURN TO SUPERVISOR.
if .L$UNIT gequ 16

then

be?in

PRINTF

DOCLN;

(ERR_01);

end;

!MORE THAN 16 UNITS?
!ERROR - TOO MANY UNITS
!RETURN TO SUPERVISOR AND CLEAN UP

if READEF (EF_CONTINUE) then return;

!IF CONTINUE GETS YOU HERE SKIP INIT.

PASSO = READEF (EF_START);

SAVE START FLAG

if .PASSO or READEF (EF_RESTART) or READEF (EF _NEW)

then

bgaln

NUM RETRIES = ZERO

RETRIES = FALSE;

FIND_CLOCK ();

if CLK_TYPE eqlu NO_CLOCK
then

begin

PRINTF

DOCLN;
end

(ERR_02);

!
!
!

IF THERE IS NO CLOCK
IN THE SYSTEM TELL THE
OPERATOR

SEQ 0106
Page

(6 )

D9
MISCELLANEOUS SECTIONS

ZRCFB2
v03.0

[
1

1]
1)

]
.
1)
.

.
.
*

]
[
[
1)
[
.
*
L)

*
.

1790
1791
1792

1793

1794

1795
1796
1797
1798
1799

1800
1801
1802
1803
1804
1805
1806
1807
1808
1809
1810
1811
1812
1813

[
L]

H
.
1)
[
L4
.
L

L)
L)

[]
L]

.
[
[
L]

lse

D D D 8 G G G G O U O O

[

INITIALIZE SECTION

LI RV U L VL L RV L U U RV UL D U I D RV RO D G G GG

N RV LD L

14
[
[

L]
L[]

1839

’
[
[
[

1843

= PO U RO NG

.CLK_CSR = ZERO;

VAX-%{ ?
li 99-16 V4,0-579
AZTeC. CZRCFC]ZRCFC2 816;:1
USER

! STOP THE CLOCK

DETERMINE THE FREE MEMORY STARTING ADDRESS AND IT SIZE
MEMORY (FREE_MEM_ADOR);

'FIND THE STARTING ADOR

MEM_SIZE = ..FREE_MEM_ADDR;

'DETERMINE THE SIZE

end;

'OTHERWISE,

begin

LOG_UNIT =

LOG_UNIT

INCREMENT LOGICAL UNIT

'AND CHECK FOR HMIGH LIMIT.

.LOG_UNIT gequ .L$UNIT then DOCLN;

end

'IF SO QUIT INIT AND DO CLEANUP.

until (GPHARD (.LOG_UNIT, HWP_TABLE)) neqa 0;

'GET HARDWARE P_TABLE POINTER

RT-TABLE = RT

YAND LOAD RT _TABLE WITH THE

-TABLE

T_TABLE

{0);

RT_IP_ADDRESS) =

.HWP_TABLE [HWP_IP_ADORESS);

[RT_VECTOR) = .HWP_TABLE (HWP_VECTOR];

n1 “TABLE [RT_BR_LEVEL) = .HWP_TABLE [HWP_BR LEVEL]
RT_TABLE (RT_UNIT_ 1) = HWP_TABLE (HWP_UNIT Nunesais
RC2S_ADDR = _RT_TABLE [nr Ib _ADDRESS };

UNIT = .RT_TABLE [RT_UNIT

SETVEC (.RT_TABLE (RT vecfonf NXMI, PRIO7);
PRINTB (08MI. .LOG_UNIT, .RC25_ADDR. .UNIT):

'HARDWARE P_TABLE INFO.

'PLATTER ¢

'IP_ADDRESS FOR THE CONTROLLER

IAND PLATTER @ UNDER TEST

1SET UP INTERRUPT ROUTINE

tGIVE THIS INFO TO OPERATOR.

if .SWP_TOP

then

OFFSET = O

! SELECT OFFSET BASED IN SURFACE

OFFSET = 821;

! SELECTED.

if not
then

,SWP_LIMIT

![}

.
begin
SWP_START = 0 «
SWP_END = 820 «

.OFFSET;
,QFFSET;

.SWP_START gequ

.SWP_END

.
[

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

end;

then

]
IF LIMITS NOT PROVIDED THEN
! SELECT TRACK NUMBERS
! ACCORDINGLY.

begin

PR?NTB (ERR_03);
DOCLN;

end;

ENDINIT;
.GLOBL

L$OLY

IF STARTING TRACK IS GREATER

THAN ENDING TRACK THEN ERROR

SEQ 0107
Page

(6)

ES
MISCELLANEOUS SECTIONS

ZRCFA2
v03.0

27-Mar-1985 15:23:34

INITIALIZE SECTION

0000006

11-Uen-1985 08:19:19

103410

012746
012746
010600

104417
104444
022626
012700
104447

103002
000167
012700

104447

040101
005501
010167
032701
001010

012700
104447
103404
012700
104447
103034
012767

1743

01,-(SP)

SP.RO
17

R2
023420,R3
R3,R1

1%:

2s:

000004

022626
026727

RO
41

1745

64
OMSG.PWR, -(SP)

0000006

1748

; SP,»

: COUNT
; ¢, DELAY. MULT
; DELAY.MULT,$$TMP2
:

; $$TMP
; $4TMPY

44
.

;

$8TMP2

; COUNT
; COUNT,
s

000074
44

74
0ERR.01,-(SP)

000000G
000001

SP,RO
17

1750
1755
1747
1765

(SP)+,(SP).
L$UNIT, 220

6$:

1750
1752
1753

¢, 88TMPL

S$:

000000G 000020

(6)

1732

034 ,RO
47

023420

Page

R1, $SAVE3

-(SP)

0000006
000001

101756
104444

USER$1:(AZTEC.CZRCFCJZRCFC2.B16;1

SEQ 0108

LINIT INITIALIZE SECTION

LINIT:

000034

005301
000766
104422
005202
020227

VAX-11 Bliss-16 V4.,0-579

1768

H SP.‘

000036

(SP)+,(SP)e

000426
000040

8
18
#40,R0

8¢:

TRAP

47
R1,R1
R1
R1,PASSO
¢1,R1
9
#37,R0
47

TRAP

MOV

# 1,L0G.UNIT

0000006
000001
000037

000035

177777

000000G

94:

1767
1772

#36,R0
47

74:

BHIS

1774

t.PASSO

1776

94
#35,R0

124%

1779

JSR

TRAP

0000006
0000006
000000G
0000006
0000006 0000006
0000006

TRAP

12¢:

13$:

0000006

000532
000540
000546
000554

SP,RO
17

SEQ 0109
Page
14

(6)

1780
1781
1782
1784

104
oERR.02,-(SP)

0000006
000001

012767
011067
012701
016061
016061
016061
011067
010100
016067
012746
012746
016046
012746
104437
016716
016746
016746
012746
012746
010600
104414
032767
001403
005067
000403
012767
032767
001011
016767
016767
062767
026767
103410

NUM, RETRIES
RETRIES
PC,FIND.CLOCK
OCLK.TYPE

CLR

0000006
0000006
000000V
000000G

000226
000232
000236
000242
000246
000250
000254
000260
000262
000264
000266
000270
000272
000276
000300
000304
000310

INITIALIZE SECTION

v03.0

VAX-11 8 1 is9-16 V4.0-579
USER#$1:( A ZTEC.CZRCFC)ZRCFC2.816;1

27-Mar-1985 1 5:23:34
9:19
11-Jan-1985 0 8:19:1

MISCELLANEOUS SECTIONS

ZRCFB2

1787

H Spl.

(Sg)o.(SP)o

1786
1784
1791
179

11
ggLK.CSR

RO,FREE .MEM.ADDR

(RO),MEM.SIZE
LOG.UNIT
LOG.UNIT,L$UNIT
134

FREE.MEM.ADDR,

1797
1804
1806

LOG.UNIT,RO

1809

RO,HWP. TABLE

000000G 0000006

s
; HWP.TABLE,

000002
000004
000006

1811
1812
1813
1814
1815
1816
1817

0000006

1818

UNIT,(SP)
RC25.ADDR, -(SP)
LOG.UNIT, -(SP)

000001

SP,RO
14
:I.SUP.TOP

0000006

001465
000001

0000006
0000006

000000G
000000G
001464
000000G

0000006
0000006
0000006
0000006

144:
15%¢:

16¢:

OFFSET
154

#1465,0FFSET
#1,5WP LIMIT

164
OFFSET,SWP,START
OFFSET, SWP.END
©1464,SWP
. END

SWP,START, SWP.END
17¢

1819

;

SP,*
1821
1823
1821
1825
1827

1831
1832
1835

G9
MISCCLLANEOUS SECTIONS

ZRCFR2

INITIALIZE SECTION

v03.0

000556
000562
000566
000570
000572
000574
000576
000602
000604

012716
012746
010600
104414
104444
005726

: Routine Size:

Maximum stack

000000
000004
000006
;

27-Mar-198 2

004767
104411
000207

Routine Size:

11-Jan-198 5

0000006
000001

MOV
MOV

MOV

000020

17§

18%:

195 words,

depth per

Routine Base:

invocation:

SP,RO
14

i SP,»

(SP).
(SP).

RTS

RA$COOE

+ 0320

AA$CODE
Routine Base:
2 words

)

620, 5P

L$INIT INITIALIZE SECTION

gE.LINIT

TRAP
RTS

; Meximum stack depth per invocation:

MERR, 03 (SP)

1838

.SBTTL
L$INIT::JSR

177166

4 words,

16 words

TRAP
TRAP
15T
ADD
157

SEQ 0110
Page
15
USER$1:(AZTEC.CZRCFC)ZRCFC2.B16;1
(6)
VAX-11 Bliss-16 V4,0-579

PC
+

1126

H
H

1837
1732

1840

H9
MISCELLANEOUS SECTIONS
AUTODROP SECTION

o
b
O ®

- pe

[

[+ )
w
w

000000
;:
:

?sbttl

Routine Size:

VAX-1 18 1 i98-16 V4.0-579
USER$ 1:( AZ TEC.CZRCFC)ZRCFC2.B16;1

SEQ 011 1
Page

(7)

! THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF
! THE "ADR"TM FLAG WAS SET.
THE UNIT(S) UNDER TEST ARE CHECKED TO
! SEE IF THEY WILL RESPOND.
THOSE THAT DON'T ARE IMMEDIATELY
s DROPPED FROM TESTING.

BGNAUTO;
return;

ENDAUTO;

000207

004767
104461
000207

27-Mar-1985 15:23:34
11-Jan-1985 08:19:19

*AUTODROP SECTION'

LAUTO:

Routine Size:
1 word,
Maximum stack depth per

000000
000004
000006
;

50 N) N bt =0 ps

1844

1845
1846
1847

o =t pt b

ZRCFR2
v03.0

Routine Base:

invocation:

4 words,

LAUTO AUTODROP SECTION
C

AASCODE +

SBTTL

177772

; Maximum stack depth per

0 words

.SBTTL
RTS

PC,LAUTO

TRAP
RTS

Routine Base:

invocation:

2 words

AASCODE

1136

L$AUTO AUTODROP SECTION

L$AUTO: : JSR

61
PC

1843

1140

1852

19
MISCELLANEOUS SECTIONS

ZRCFRB2

CLEANUP COCING SECTION

1854
1855
1856
1857
1858
1859
1860

1861
1862

1863
1864
1865

1866

1867
1868
1869
1870
1871
1872

= PO RO LRV L L PV NI NNV PO NI Y o == e ps pa

v03.0

000050
000054

005077
005067
005067
005067
005067
005067
005067
005067
005067
005067
005067
000207

; Routine Size:
;

?sbttl

004767

000004
000006

104412
000207

; Routine Size:

Meximum stack

11-Jan-1985 08:19:19

VAX-11 Bliss-16 V4.0-579

USER$1:[AZTEC.CZRCFC)ZRCFC2.816;1

SEQ 0112
Page

(8)

‘CLEANUP CODING SECTION'

' THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED
' AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED.
BGNCLN;
.CLK_CSR = Z2ERO;

Pl = ZERO;
P2 = ZERO;
P3 = Z2ERQ;
P4 = ZERO;
PS = Z2ERQ;
P6 = ZERO;
RET_STATUS =

ZERQ;

TURN OFF THE CLOCK

!
!

CLEAR ERROR ROUTINE
PARAMETERS P1 - Pé6

NUM RETRIES = ZERO;

' FLAGS

CLEAR STATUS AND

IN_BOUND = FALSE;

VER:C

RETRIES = FALSE;
return;

ENDCLN;

0000006
0000006
0000006
0000006
0000006
0000006
0000006
0000006
000000G
0000006
0000006

LCLEAN:

.SBTTL
CLR
CLR
CLR
CLR
CLR
CLR
CLR
CLR
CLR
CLR
CLR

RTS

23 words, .

Meximum stack depth per

000000

;

27-Mar-1985 15:23:34

Routine
Base:
0

invocation:

177716

O words

4 words,

L$CLEAN::

SBTTL

JSR

Routine
Base:
0

invocation:

2 words

1860
1861
1862
1863
1864
1865
1866
1867
1868
1869
1870
1853

AASCODE + 1150

TRAP
RTS
depth per

LCLEAN CLEANUP CODING SECTION
aCLK,.CSR
Pl
P2
P3
P4
PS
P6
RET,.STATUS
NUM, RETRIES
RETRIES
IN.BOUND

AASCODE +

L$CLEAN CLEANUP CODING SECTION
PC,LCLEAN

12
PC

1226

1871

J9
2RCFRR
v03.0

MISCELLANEQUS SECTIONS
DROP UNIT SECTION

ig;z

;

1875 1

:
H
:
:
H

1876
1877
1878
1879
1880

000000
:
:

i
1
1
2
2
1

; Routine Size:

USER$1:(AZTEC.CZRCFCJZRCFC2.B16;1

SEQ 0113
Page

(9)

' THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A JEVICE

' TO NO LONGER BE TESTED.
!BGNDU;
return;
ENDDV;

000207

004767
104453
000207

VAX-11 Bliss-16 V4,0-579

?sbttl 'DROP UNIT SECTION'

LOV:

Routine Size:
1 word,
Maximum stack depth per

000000
000004
000006

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

Routine Base:
AASCODE
invocetion:
O words

177772

4 words,

; Maximum stack depth per

LSBTTL

L$DV::

Routine Baese:

invocation:

2 words

LOU DROP UNIT SECTION

RTS

.SBTTL
JSR
TRAP
RTS

PC
+

1872

1236

L4DU DROP UNIT SECTION
PC,LOV
53
PC

AASCODE « 1240

1879

I<9
MISCELLANEQUS SECTIONS
ADD UNIT SECTION

1888
1889

000000

e s bt ps

1886
1887

=2 PO N

[

®
e ]
wn

o bs

ZRCFR2
v03.0

Maximum stack

000000
000004
000006

004767
104452
000207

; Routine Size:

SEQ 0114
Page
19
(10)

' THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES
!
!

T0 BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK
TO THE TEST CYCLE.

BGNAU;

return;

ENDAV;

LAUV:
1 word,
depth per

.SBTTL

RTS

Routine Base:
AASCODE .
invocation:
O words

177772

4 words,
: Maximum stack depth per

1890

VAX-1 18 1 is9-16 V4,0-579
USER$ 1:( A ZTEC.CZRCFC)ZRCFC2.B16;1

*ADD UNIT SECTION'

000207

: Routine Size:
:

tsbttl

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

L$AU::

.SBTTL
JSR

TRAP
RTS

Routine Base:
AARSCODE «
invocation:
2 words

1<BLF /PAGE >

LAU ADD UNIT SECTION

1880

1250

L $AU ADD UNIT SECTION
PC,LAU
Se
PC

1252

1888

MISCELLANEOUS SECTIONS
ADD UNIT SECTION

30
9

-®
-

ot pe
A
=2 PO P

L] L]
-

[

- L1

SEQ 0115
Page

(11)

Yoo

! GLOBAL LOCATION "I_AM _NEX'

IS SET T0 TRUE UHICH INDICATES

' THE INITIALIZATION SEGUENCE INTERRUPT OCCURED
ecnsev (NXMI);
AM NEX

= #0'177777°;

clncEL _TIMER = %0'177777";

ENDSRV;

177777
177777

0000006
0000006

NXMI:.

LSBTTL
.PS5ECT

NXMI ADD UNIT SECTION
ABS$CODE,
RO

MOV
:?¥

0-1,1.AM_NEX
-1,CANCEL . TIMER

Rout
ine Bease:
0
AB$COOL
0 words
invocetion:

:
:

1900
1901
1899

+ 0000

.
MERY

THE CLOCK INTERRUPT

SERVICE ROUTINE IS ENTERED AT

BGNSRYV (CLK_INT_SERV);

TICKS = .TICkS - 1;

if .TICKS eqlu .CLK_HERTZ

then

begin
TICKS = O;
SECONDS = .SECONDS «

THE CLOCK RATE

INCREMENT THE NUMBER OF TICK
IF TOTAL NUMBER OF TICK = 60

THEN

RESET

TICK TO ZERO

i INCREMENT THEN SECOND

IS B B WL

.SECONDS eqlu 60

then

'
!

SE ONDS

MINUTES
end;

HINUTES

IF SECOND = 60
THEN
RESET SECOND TO ZEROQ

! INCREMENT THE MINUTES

- L]

VAX-11 811 ss-16 v4,0-579
USER$1:([AZ TEC. CZRCFC]ZRCFCZ 816;1

code = ABS$CODE;

1903

27-Mar-198S 15:23:34
11-Jen-1985 08:19:19

psect

Routine Size:
7 words,
Maximum steck depth per
W WWNINN)
PN e e ps 4o o

012767
012767
000002

000000

000006
000014
;
;

=0 st pt o )t P

1891
1892
1893

ZRCFR2
v03.0

end;

ENDSRYV;

1000000

005267

0000006

lZOOOOC

026767

000000G 0000006

\00012
00014

001014
005067

00000006

LSBTTL
CLK.INY.?SEV::
cMP
BNE

CLR

CLK,INT,SERV ADD UNIT SECTION
TICKS
TICKS,CLK ,HERT2
14

TICKS

1909
1911

1914

M9
MISCELLANEQUS SECTIONS

cRCFRe
v03.0
000020
000024

:3 4
27-Mer-1985 1 15:2 3:3
8:1 9:19
11 Jen-198S 08:
1

ADD UNIT SECYION

005267
026727
001004
005067
005267
000002

: Rout'me Size:

0000006
000000G 000074
0000006
0000006

INC

cMe

BNE

CLR
INC

RT]

VAX 11
USER$]

0-579
EC CZRCFCIZRCFC2.816;1

SEQ 0116
P

2l
(11)

SECONDS
SECONDS 074

1915
1917

SECONDS
MINUTES

1920
1921
1908

19 woras.
Rout ine Bese:
AB$COOE . 0016
: Mex‘mum stack gepth per invocetion:
0 words

ZRCFR2

MISCELLANEOUS SECTIONS

v03.0

27-Mer-1985 15:23:34

FIND CLOCK ROUTINE

11-Jen-1985 08:19:19

igg;

sebtt]l

}3%8

{

?lobol routine FIND_CLOCK

i
¢

1931
1932

1
1

ICHECK TO MAKE SURE THERE IS A CLOCK ON THE SYSTEM,
'SUPERVISOR.

{3;}

;1938
;
iggg

2
5

;1938

1939

;.
1942
;1943
;1944

3
3
3

;i
1940
;1941

i
1945
i
1946
;.
1947
;1948
;1949
:
1950
1951
:
:
1952

3
3

3
2
3
3
&
3
4
4

-orucau195

mnovelue

if C.OCK (P, CLK_ADR)

'IS THERE A P_CLOCK?

thcn

CL 1vpe = P _CLOCK;

:
1958
i
1959
;.
1960
;1961
:
1962
;.
1963
;.
1964
:
1965
s
1966

2
2
2
2
3
3
3
2
2

1956
1957

else

end”

begin
*IS THERE AN L _CLOCK?

CL 1vpe = L _CLOCK;

end;

'SAVE THE CSR ADDRES

'GET THE CLOCK RATE

'SAVE THE STARTING CLOCK VALUE

end;
if .CLK_TYPE nequ NO_CLOCK
then
8
VEC_AD = .(.CLK_ADR + 4);
SETVEC (. vsc AD, CLK_INT_SERV, PRIOS);
end;

0000006

012700
104462
103016
010067
012767
011067

000120

012700
104462

'SET THE FLAG FOR
L _CLOCK

CLK_HERTZ = .(.LLK_ADR « 6);

005067

016067

'SAVE THE CSR ADDRESS
'GET THE CLOCK RATE
'SAVE THE STARTTING CLOCK VALUE

if CLOCK (L, CLK_ADR)
thcn

3
3

012767
000421

!SET THE FLAGE FOR P_CLOCK

CLK_CSR =« . 0 K _ADR;
CLK_HERTZ « .(.CLK ADR . 6);
CLK_START = ¢o 1057;

CLK_START = so 1007 ;

:
:

(12)

GET ITS PARAMETERS.

'SET FLAG FOR NO CLOCK

IF NO_CLOCK, ABORT T10

CL TYPE « NO_CLOCK;

1954

609211

DETERMINE WHETHER CLOCK IS AN L OR P CLOCK,

CLK_CSR = ,.CLK_ADR;

1955

USER#1:(AZTEC.CZRCFC JZRCFC2.B16;1

'FIND CLOCK ROUTINE'

;1953 &
;.

VAX-11 Bliee-16 V4.0-579

0000006
000001
0000006
0000006

000006

000105

000114

SBTTL
FIND.CLOCK:
CLR
MOV
TRAP
BHIS
MOV
MOV
MOV

000000G

MOV

0000006

14;

MOV
BR

MOV
TRAP

'IF

CLOCK WAS FOUND THEN

'GET CLOCK VECTOR ADDRESS
!SET VECTOR & SERVICE ADDR.

FIND.CLOCK FIND CLOCK ROUTINE

CLK.TYPE

0120,R0
62
1
RO,CLK.ADR
01,CLK.TYPE
(RO),CLK.CSR

6(RO),CLK.HERTZ

0105, CLK. START
24

0114, RO
62

;

1936

;
;
;
;

;

;
;

;

1933
RO,

CLK.ADR,+

194}
1942

1943

1944
1938

1949

510
MISCELLANEOUS SECTIONS
FIND CLOCK ROUTINE

103015
010067
012767
011067
016067
012767
005767
001421
016700
116067
012746
012746
005046
116716
012746
104437
062706
000207

: Routine Size:
;:

0000006

177777

VAX-11 81 i99-16 V4.0-579

USER+ 1:(AZTEC.CZRCFCJZRCFC2.816:1

RO, CLK.ADR
#-1 CLK.TYPE

0000006

(ROY,CLK.CSR
6(R0O},CLK.HERTZ

0000006
000006
000000G
000100 0000006
0000006

0100, ELK. START

C%K.fYPE

24:

3
CLK.ADR, RO

000004
000240
000016'

4(RO),VEC.AD

0000006
000003

VEC.AD, (SP)

0240, -(SP)

#CLK . INT.SERV,
- (SP)
-(SP)

S8 words,

}
H

’9.(12)

RO,

; CLK.ADR,»
]

SEOPOIIB 23

1952
1953
1954
1955
1960
1963
1964

03,.(SP)

000010

Meximum stack depth per

1968

27-Mer-198S 15:23:34
11-Jen-198S 08:19:19

RTS

Routine Base:
AB$CODE
6 words

invocation:

+ 0064

1962
1929

Cl0
MTSCELLANEOUS SECTIONS

1973
1974
1975
1976
1977
1978
1979

1980
1981
1982

e s bt ps ps o po

1969
1970
1971
1972

ssbttl

910bn1 routine CLOCK_INIT

.CEK CSR = ZERO;

MINUTES = O;

LCLK_CSR =

end;

0000006
0000006
0000006
000000G 0000006

1983

* CLEAR THE COUNTER

SECONDS = 0;

005067
005067
005067
016777
000207

(13)

! STOP THE CLOCK

TICKS = 0;

000004
000010
000014
000020
000026

Maximum stack

Page

: novelue *

begin

0000006

Routine Size:

SEQ 0119

SINIT CLOCK

005077

11-Jen-1985 0 8:19:19

VAX-1 18 1 i98-16 V4.0-579
USER$ 1:( A ZTEC.CZRCFC)ZRCFC2.B16;1

'CLOCK INIT ROUTINE'

000000

27-Mar-1985 1 5:23:34

CLUGIK INIT ROUTINE

== PRIV NI N P

B+

@¢

®¢

ZRCFBR2
v03.0

.CLK_START;

START THE CLOCK

LSBTTL

CLOCK.INIT CLOCK INIT ROUTINE

CLR

aCLK.CSR

CLOCK.INIT::
CLR
CLR
CLR
MOV

RTS

TICKS
SECONDS
MINUTES
CLK.START,aCLK.CSR

12 words,
Routine Base:
ABSCODE + 0250
depth per invocation:
O words

1977
1978
1979
1980
1981
1971

D10
MISCELLANEQUS SECTIONS
RC2S CONTROLLER ERROR REPORTING

ZRCFB2

v03.0

)
1

ssbttl

000000

004767

000000V

000004
000006

104423
000207

PN VMR
AL

1986
1987
1988
1989
1990
1991
1992
1993
1994
1995
1996
1997
1998
1999
2000
2001
2002
2003
2004
2005
2006
2007

VAX-11 B liss-16 v4.0-579
USER#$1:( AZTEC.CZRCFC)ZRCFC2.B16;1

SEQ €120
Page

(14)

'RC25 CONTROLLER ERROR REPORTING'

BGNMSG (RC2S$ERR_RPT);

.SBTTL
RC2SS$ERR.RPT::
JSR
TRAP
RTS

4 words,
Routine Size:
Maximum stack depth per

NI NN NN

1984
1985

‘Routine Base:

invocation:

2 words

ABSCODE

RC2S$ERR.RPT RC2S CONTROLLER ERROR REPORTING

PC,M$RC2S4ERR.RPT

23
PC

« 0300

!
19

FUNCTIONAL DESCRIPTION:

THIS ROUTINE IS CALLED 8Y THE DIAGNOSTIC SUPERVISOR VIA

‘
THE “"PRLINK" ARGUMENT SPECIFIED IN THE $DS_ERRXXX MACRO
;
TO REPORT DETAILED RC 25 CONTROLLER ERRORS.
'
i FORMAL PARAMETERS:
9

]
'
'
'
'
'

P1
P2
P3
P4
PS
P6

]

GGGV UL AL RV L L L AL L AL LR RV N L PV AL NN LN

H
H

27-Mar-1985 15:23:34
11-Jan-1985 08:19:19

POINTER 70 FORMATED ERROR MESSAGE.
FIELD REPLACEABLE UNIT CALL-OUT MASK.
RC_25 CONTROLLER REGISTER PRINT-QUT MASK.
DATA.
DATA.
DATA.

} IMPLICIT INPUTS:

RET_STATUS

]

i IMPLICIT OUTPUTS:
]

- NONE -

]

} COMPLETION CODES:

- NONE -

]

! SIDE EFFECTS:

- NONE -

i
; PRINT SUPPLEMENTAL ERROR INFC
i
if .Pl neqa 0
then
begin

!
!

IF ERROR MESSAGE POINTER
ISN'T O, THEN PRINT-0OUT

.P_MASK eqlu 3 then PRINTB (.P1,

.P4,

.PS,

.P6);

.P_MASK eqlu 2 then PRINTB (.P1,

.P6,

.P4,

.PS);

SUPPLEMENTAL ERROR INFO.

1985

ZRCFB?

MISCELLANEQUS SECTIONS

vV03.0

RC25 CONTROLLER ERROR REPORTING

2029

:
:
H
H

2031
2032
2033
2034

3
2
2
2

H
:

2030

if .P_MASK eqlu 1 then PRINTB (.P1,

Sggg

2038
2039

gg:g

2
2

2042

2043
2044
2045
2046
2047
2048
2049
2050
2051
2052

2
2
2
2
2
2
2
2
2
1

005767
001462

126727

001016
016746
016746
016746
016746
012746

G10600
104414
062706
126727
001016
016746

016746
016746
016746
012746

0120600
104414
062706
126727

001012
016746
016746
012746
010600
104414

PRINTB

(FMT3,

! IF ELIGIBLE
.P¢,

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFCJZRCFC2.816;1

SEQ

O
QPaéil
26

(14)

.P4);

end;
i
if .P3 nequ O

then

:
:
H
H
:
H
:
:
H
:

2035

11-Jan-1985 08:19:19

H
:

E10
27-Mar-1985 15:23:34

! PRESENT, THEN PRINT-QUT

.P3);

SELECTED

CONTROLLER

! REGISTER(S).
PERFORM FIELD REPLACEABLE UNIT CALL-OUT

'if P2 neau O

¢ IF ELIGIBLE FRU CALL-0UT(S)

1then
PRT$FRU_CALLOUT (.P2);
! CLEAR ALL PARAMETERS
Pl = ZERO;
P2 = ZERO;
P3 = ZERO;
P4 = ZERD;
PS = ZERO;
P6 = ZEROQ;
ENDMSG;

0000006

000000G 000003

! PRESENi, THEN PRINT-0QUT
! FEILD REPLACEABLE UNITS,.

' END OF ROUTINE:
SBTTL
MSRC2S$ERR,.RPT RC2S CONTROLLER ERROR REPORTING
MSRC2SS$ERR.RPT:
TS7
P1
;
BEQ
34

cMPB

BNE
MOV
MOV
MOV
MOV
MOV

0000006
0000006
0000006
0000006
000004

000012
000000G 000002

1$:

0000006
000000G

MOV
TRAP
ADD
CMPB
BNE
MOV

P.MASK, #3

SP,RO
14
f12,5P
P.MASK, 02
24
PS,-(SP)

; SP,»

14
P6,-(SP)
PS,-(SP)
P4,-(SP)
Pl,-(SP)
04,-(SP)

0000006
0000006
000004

MOV
MOV
MOV
MOV

P4,-(SP)
P6,-(SP)
P1,-(SP)
#4,-(5P)

000012
000000G 000001

TRAP
ADD
CMPB

14
#12,5P
P.MASK, 81

0000006
0000006
000002

MOV
2%:

BNE
MOV
MOV
MOV
MOV
TRAP

SP,RO

34
P4,-(SP)
P1,-(SP)
#2,-(SP)
SP,RO
14

2022

2026

2028

;: SP,»
;

;

2030

SP,«

F10
MISCELLANEQUS SECTIONS

ZRCFB2
v03.0
000146
000152
000156
000160
000164
000170

000174
000200

000202
000204
000210
000214
000220
000224

000230
000234
000240
000244
000250
000252
:

;

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

RC25 CONTROLLER ERROR REPORTING

062706
005767

001414
016746
016746
012746
012746
010600
104414
062706
016746
004767
005067
005067
005067
005067
005067
005067
005726
000207

Routine Size:

000006
0000006

34:

0000006
0000006
0000006
000003

000010
0000006
000000V

44
;

0000006
0000006
0000006
0000006

ADD
157
BEQ
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
MOV

JSR
CLR
CLR
CLR
CLR
CLR
CLR

86 words,

Routine Bese:

7 words

Page

(14)

2036

SP,s

#10,SP

P2,-(SP)

gE.PRTSFRU.CALLOUT

TST

invocation:

SEQ 0122

2034

RTS

Maximum stack depth per

vax-1 186 i98-16 V4.,0-579
USER4 1:(AZTEC.CZRCFCJIZRCFC2.B16;1

AB$CODE + 0310

2044
2046
2047
2048

2050
2051
1985

FIELO REPLACEABLE UNIT REPORTING

IG IS IS IS
IS I I @i
' o

THIS ROUTINE REPORTS FIELD REPLACEABLE UNITS WHICH ARE

FORMAL PARAMETERS:

FRU$MASK

FIELD REPLACEABLE UNIT CALL-0OUT MASK.

IMPLICIT INPUTS:
-

NONE
-

IMPLICIT OUTPUTS:

B I

G IO ID

: novelue =

DEEMED ELIGIBLE FOR PRINT-QUT BY THE FAILING TEST.

- NONE -

B
I B I

USER

FUNCTIONAL DESCRIPTION:

COMPLETION CODES:
- NONE

s
s ot o
sP
N Q8 L O O W Ol O O O G0 G GO G D RO D O PO PO RO U D RO D D D) P

2109

VAYX-

'FIELD REPLACEABLE UNIT REPORTING'

?lobol routine PRT$FRU_CALLOUT (FRU$MASK)

B I I B B I

s st st Pt i

%sbttl

et Pt it ot Bt et Pt P P o i it s Pt P

2053
2054
2055
2056
2057
2058

27-Mar-1985 1 5:23:34
8:19:19
11-Jan-1985 08:

SIDE EFFECTS:
- NONE

begin
local

ALLOCATE STORAGE FOR

FRUSMSG;

POINTER TO FRU MESSAGE.

! PERFORM FIELD REPLACEABLE UNIT CALL-OUT
]

incru FRU_SELECT from 0 to 3 do
if BIT_TST (.FRUSMASK,

then

1t .FRU_SELECT)

begin

selectu 1t .FRU_SELECT of

CHECK EACH FRU FOR

POSSIBLE CALL-0UT.

IF CURRENT FRU ELIGIBLE

FOR PRINT-OUT THEN GET
POINTER TO FRU MESSAGE.

set

SELECT FRU FROM ONE OF
THE FOLLOWING:

(ADAPT] :
FRUSMSG = ADAPTO;

GET ASYNC FRU MESSAGE.

[CONTR])

FRUSMSG »= CONTRO;

[(DRIVE]

FRUSMSG = DRIVE_;

GET SYNC FRU MESSAGE
GET ARR_DAT FRU MESSAGE

'—!m
Db—‘

MISCELLANEQUS SECTIONS

ZRCFR2
v03.0

G10
16 4,0-579
C.CZRCFCIZRCFC2.B16:1

SEQ 0123

qe(ls)

ZRCFR2

MISCELLANEQUS SECTIONS

v03.0

27-Mar-1985 15:23:34

FIELD REPLACEABLE UNIT REPORTING

H
:
:
:

2110
2111
2lle
giii

2115

:
H
:

2116
2117
2118

3
3
3
g

[(MECH]) :
FRUSMSG = MECMHAN;
tes;

2
2
1

004167
005002
012746
010246
004767
010001
005726
016600

005100

040001
012716
010246
004767
022626

PRINTX (FRU,
end;

.FRUSMSG,

000000G
000001
0000006
000014

001002
012703

020027

001002
012703
020027
001002
012703

016716

010346
012746
012746
010600
104415
062706
005202
020227

101705

0000006

000001
0000006
000001

000000G

24:
.

000004

34:

000000G
000010

0000006

000000G

S54:

000000G
000003
000012
000003

63 words,

PRT$FRU_CALLOUT',

RO,R1
01,(SP)
R2,-(SP)
PC,BL$SHF
(SP)o.(SP)o

BNE
MOV
MOV
JSR
cMP
BNE
MOV
cMP

63
01,-(SP)
R2,-(SP)
PC,BL$SHF
RO, 01
2%
OADAPTO,R3
RO, @2

cHMP

RO, 04

6$:

BNE
MOV

BNE
MOV
cMP
BNE
MOV

MOV

; FRU,.SELECT,»

R1,R0O

34
OCONTRO,R3

44
ODRIVE. ,R3
RO,#10
5S4
OMECHAN,R3

UNIT,(SP)

H
; FRU.SELECT,»
H

2099
2102

:
H

¢, FRUSMSG

2103
2105

¢ ,FRUSMSG

2106

; *,FRUSMSG
:

2109
2111

: «,FRUSMSG

2112

2115

R3,-(SP)
#FRU, -(SP)
#3,-(sSP)
SP,RO
15
#12,5P
R2
R2,03

;
; FRU.SELECT
: FRU,SELECT,«

2097
2092

RTS

205S

ABS$CODE « 0564

;: FRUSMSG,
»

2108

MOV
MOV
MOV
MOV
TRAP
ADD
INC
CMP

B8LOS
Routine Base:

2055
2092
2095

8IC
MOV
MOV
JSR
cMP

cMpP

(15)

! END OF ROUTINE:

.SBTTL
PRTSFRU.CALLOUT FIELD REPLACEABLE UNIT REPORTING
PRTS$FRU.CALLOUT::
JSR
R1, $SAVE3
H
CLR
R2
; FRU.SELECT
1¢:
MOV
#1,-(SP)
H
MOV
R2,-(SP)
; FRU.SELECT,*
JSR
PC,BL$SHF
MOV
RO,R1
TST
(SP).
MOV
14(SP),RO
;s FRUSMASK,»

000207

; Routine Size:

.UNIT);

CcoM

Page

' PRINT FRU CALL-OUT,

000001

0000006
000002

USER$1:[AZT C CZRCFC]ZRCFC2 B16;1

SEQ 0124

' GET MEM_ARR FRU MESSAGE

end;

020100

001044
012746
010246
004767
020027
001002
012703
020027

11-Uen-198S 08:19:19

VAX-11 Bliess-16 V4,0-579

: SP,»

110
MISCELLANEOUS SECTIONS
FIELD REPLACEABLE UNIT REPORTING

ZRCFR2

v03.0
:

Maximum stack depth per

2119

invocation:

11 words

27-Mar-1985 15:23:34

11-Uan-198S 08:19:19

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFL)ZRCFC2.B16;1

SEQ 0125
Page

(1 5)

J10
ZRCFRR

MISCELLANEQUS SECTIONS

v03.0

27-Mar-1985 15:23:34

AZTEC INITIALIZATION

11-Jen-1985 06:19:19

Sisg

ssbttl 'RZTEC INITIALIZATION'

H
;.

2lee
2123

1
1

?lobol routine AZT_INIT =
T e
!
!
!
!
'
H

gisg

i
;.
H
H
;.
:

2126
2127
2128
2129
2130
<131

1
1
|
1
1
1

;.
;.
;

;.
;.
;.
;.
;.
;.
:
:
:
:
:
;.

:
-

;.
;
;.
:
:
;
:

;.
;.

2132
2133
2134
2135
2136
2137
2138
2139
2140
2141
2142
2143
2144
2145
2146

Si:g

2149

2150
2151
2152
2153
2154
2155
2156

2157
2158

1
1
1
1
1
1
1
1
1
]
1
1
%

1
1
1
1
1
1
1

1
1

THIS ROUTINE FIRST STARTS AZTEC INIT B8Y WRITING TO RCIP.
THEN EXPECTS TO READ STEP 1 BIT IN RCSA INDICATING THAT
THE PORT IS READY TO ACCEPT STEP 1 WRITE DATA. IF THE
STEP READ DATA WAS QK THEN WRITES STEP 1 WRITE DATA TO RCSA
THEN WAITS TO READ STEP 2 BIT IN RCSA. THIS PROCEZURE OF READ
FOLLOWED BY WRITE IS DONE AS GIVEN BY B_MASK,

!
'
'

IF THERE WAS ANY PORT FATAL ERROR IN ANY OF THE STEPS,
THEN THE FAILURE DATA OF RCSA IS PRESERVED ANF FURTHER
STEPS ABORTED.

'
THIS ROUTINE WILL BE USED ONLY IF INTERRUPT WAS ENABLED
!
IN STEP 1 WRITE.
!
' FORMAL PARAMETERS:
!
'
- NONE !
¢t IMPLICIT INPUTS:
'
!
DATALl = STEP 1 WRITE DATA
!
DATA2 = STEP 2 WRITE DATA
DATAS = STEP 3 WRITE DATA
!
!

DATA4 = STEP 4 WRITE DATA

B_MASK = WITCH STEPS WILL BE DONE

'
!

IF ERROR OR NO STEP IT WILL RETURN
'
P1-P6, P_MASK

RET_STATUS RETURNS COMPLETION CODE.

]

!
%0 1
'
%0 3
'
%0 7
!
%017
!
' IMPLICIT QUTPUTS:
!

Sigg i

E COMPLETION CODES:

gigé

:
2163
2164
:
2165
;.
2166
:
;2167
2168
;.
H
2169
;.
2170
:
2171
H
2172
:
2173
:
2174
;2175
;.
2176

=
=
=
=

STEP 1
STEP 1,2
STEP 1,2,3
STEP 1,2,3,4

]

1
1
1
1
2
2
2
2
2
2
2
2
2
2

USER$1:[AZ EC CZRCFCIZRCFC2. Bl6;1

FUNCTIONAL OESCRIPTION:

:
-

VAX-11 Bliss-16 V4,0-579

' SIDE EFFECTS:
!
- NONE H
.
' -begin
loceal

.
MASK,
COUNT,
DATA-

!
'

INIT THE AZTEC

'STEP NUMBER
'STEP MASK

'TIME OUT COUNT
'WRITE DATA FOR THE STEP

SEQ 0126

Page

(16)

K10
MISCELLANEQUS SECTIONS
AZTEC INITIALIZATION

2177
2178
2179
2180
2181
2182
2183
2184
2185
2186
2187
2188
2189
2190
2191
2192
2193
2194
2195
2196
2197
2198
2199
2200

2201
2202
2203
2204
2205
2206
2207
2208
2209
2210
2211
2212
2213

VA EABNVIVIVIVING L L LA LDLLLLLLLDDLALDELALLELENWEWWNINNIRNNNRANNNNNAN

ZRCFR2
vV03.0

VAX-11 Bliss-16 V4.0-579

27-Mer-1985 15:23:34
11-Jen-198S 08:19:19

USER$1:(AZTEC.CZRCFCJZRCFC2.816;1

]

E_AH_NEX

ALL_ONES;

INIT

INTERRUPT FLAG

THE FOLLOWING LOOP WILL DO STEP 1 THRU 4 AS GIVEN BY B_MASK

! INPUT SELECTING APPROPRIATE DATA INPUT FOR STEP WRJTES. IF

! ERROR IN SA REGISTER Pl - P4 AND P_MASK WILL BE SUPPLIED FOR
! ERROR REPORT. CNLY SA DATA FOR THE FINAL WRITE STEP IS PRESERVED.
HASK » %b'0001"';

WRT_RC2S (RCIP,

DELAY (2);

ALL_ONES);

STEP MASK

START INIT

! WAIT FOR COMPLETION

incru N from 0 to 4 do

begin

é: (.N eqlu 0 or BIT_TST (.B_MASK,
en

.MASK))

' TEST FOR STEP NUMBER

?egin

select:neu .N of
se

SELECT CORRECT WRITE

(0] :

DATA = ALL _ONES;

(1) :

DATA =

,DATA];

!
!

DATA FOR STEP WRITES

BATA = DATAZ;
(3] :

DATA =

(4) :

DATA

,DATA3Z;
_DATA4;

tes;
]

if .N gequ 1 then WRT_RC25 (RCSA,
:ncru COUNT from 0 to 20 do

DELAY (333);
if

.DATA);
!

STEP N WRITE D ATA TO SA

TIME QUT WAIT LOOP

! DELAY 1 SEC. APPROX.

.I_AM_NEX eqlu ALL_ONES then exitloop;

BREAK ;
end;

WATCH FOR CONTROL C.

.I_AM_NEX eqlu ALL _ONES

IF INTERRUPT OCCURED

then

begin
DELAY (2);

SEQ

0127

09912 32
(16)

MISCELLA NEQUS SECTIONS
AZTEC IN ITIALIZATION

2247

2248
2249
2250
2251
2252
2253
2254
2255
2256
2257
2258
2259
2260
2261
2262

2263

2264

2265

2266
2267
2268
2269
2270
2271
2272
2273
2274

2275
2276
2277

2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2288
2289
2290

27-Mar-1985 15:23:34
11-Jen-198S 08:19:19

RC2S5_DATA [RCSA,

YV 1. Y- Y- X V.0 XV VIV V10T,

2246

TR IV IRV IV IE IV I TV LS LV LS LYV IV R W YU TV IV ¥ YV IV IV 1. Y. RU RN PP
PN PR
Ry NPT,SUY, ¥

2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245

W LU

BT 80 60 €5 20 €s B2 0 B4 L Ve W BV B0 TE VS T0 GY VS W WS VI W8 G0 B B V0 W8 G0 G2 G0 T Ve Vs V0 G0 G0 s G0 ¢ V6 0 C6 T G Vs V6 G0 Ve GO S0 S0 V¢ s S+ Gs Go

ZRCFR2
v03.0

RC_ALL)

.N nequ O then MASK

.RC2S_ADDR {RCSA,

_MASK?];

VAX-11 Blise-16 V4,0-579
USER$1:(AZTEC.CZRCFCJZRCFC2.8B16;1

RC_ALL];

INCREMENT

STEP N

READ

STEP

I_AM_NEX = ZERO;
if (.RC2S_DATA [RCSA, RCSA_ER] nequ ZERO)

then

bc?in

RET_STATUS = PFE_CODE;
exitloop;

else

IJF SA REGISTER CONTAINS

FATAL €RROR

end

begin

if (.RC2S_DATA [RCSA, RCSA_STEP) nequ .MASK)

then

bcain

_PASK = 2
Pl = FM13;
P2 = ADAPT;
P4 = (.RC2S _ADDR)

PS =«

! ERROR OR INCORRECT STEP

SUPPLY P]1 THRU P6 AND

.RC2S_DOATA (RCSA, RC_ALL);

P6 = _MASK;
MSGADR = MSG_14;
RET_STATUS = TRUE;

return

end;

,RET_STATUS;

¢t

TRUE STATUS.

end;

else

end

RE?STATUS =« C10_CODE;
exitloop;
end;

¢ IF YOU GET HERE PORT

! FAILED 10 INTERRUPT

* WITHIN TIME ALLOWED

end;
end;

LRET_STATYS

begin

! THEN SUPPLY P1-P6

then

P_aASK = 2;
Pl =
P2 =

FMT3;
ADAPT

IF STATUS WAS A FAILURE

' FOR TEST MODWE T0
'

REPORT ERROR

P4 - RCZS ADDR) « 2;

PS = RCZS DATA [RCSA, RC_ALL);

P6 = _MASK;
"SGADR = HSG 14;

return .RET STATUS,

else

end

return RET_STATUS = PAS_CODE;

! OTHERWISE GOOD STATUS

SEQ 0128
Page
33

(16)

[

M10
MISCELLANEQUS SECTIONS
AZTEC INITIALIZATION

ZRCFR2

v03.0

229

004167

024646
012767
012704
012700
010077
012701
001411
016700
001404
005066
005300
001374
005301
000766
005005
005705
001412
005000
156700
010401
005101
040100
020004
001402
000167
010500
001003
012702
000427
020027
001003
016702
000421
020027
001003
016702
000413
020027
001003
016702
000405
020027
001002
016702
005705
001405
010201
016700
010160
005003
012701

27-Mar-198
-3:34
11-Jen-1985 vo.17:19

VAX-11 Bliss-16 V4.0-579

USER$1:{AZTEC.CZRCFCJZRCFC2.B16:;1

SEQ 0129

Page

(16)

end;

0000006

.SBTTL

AZ
. INIT
T
::

0-1,1

000002

AM.NEX

o1,R4

17777

0000006

R1, $SAVES

-(SP),-(SP)

17177717
000001
0000006
000002

AZT,INIT AZTEC INITIALIZATION

0-1,R0
RO, 9RC25.ADDR

1¢:

2s:

L$OLY,RO
34
2(SP)
r)
2

000515

;

¢, 88THPL

;
:

$$TMP
$4TMPY
$4THP2

e
MASK,

;

¢, MASK

6$:

7¢:

8%:

64
264

RS,RO
7

0-1,Re
114

RO, 01
8$
DATA} ,R2

RO, 02
94
DATAZ2 ,R2

; N,o
:

:
:

;

11¢:

118

¢,DATA

H
H

;

R1,2(RO)
0515,R1

2198
2205

2208

2211

2198
2213

R2,R]1

2202

2198
2210

; N

RC25.ADDR,RO

2198
2201

2198
2207

DATA4,R?2
RS

124

2190
2193

2204

H
H

10%:

¢,DATA

H
H

0000006

0000006
000002

2188

R4 ,R}
R}
R1,RO

0000006

o,88THP?

i N
i N

0000006

000004

;

; RCM_REG,o

RS
RS
64
RO

17777

000003

2186
2187

44.

RO,R4

000002

*,MASK
¢, ,RCM REG

;

2178

;
;

8.MASK,RO

000001

2122

34
S

000420

; ¢,DATA

2214
2219

DATA,RCM REG

; COUNT
; ¢, 88TMP?

2221
2223

N10
ZRCFR2

v03.0

MISCELLANEQUS SECTIONS
AZTEC INITIALIZATION

27-Mer-198S 15:23:34

11-Jen-198S 08:19:19

144

0000006
000002

15¢;
16¢;

0000006 177777

17%;

000002

Rl
144

IBA".NEX,0-1
1
22

2225

2230

224
L4$OLY,RO
214
2(SP)

02,R3

;

¢, 88TMP?

;

s,88TMP]

;
;

$8TMP
$8THP]

;

$STMP2

134
S

208
1

acas ADOR , RO

23%:

0000006

0000006 0000006
000001
0000006
0000006

244
:

2233

;

2(RO), (SP)

;

¢,RC.REG

MASK

234

0000006
0000026 0000006

$8TMP2

;

(§”JRC25.DATA.2

000002
0000006
000000G 0000006
000001
0000006
0000006

;

0000026

177760

$8TMP
$8TMP)L

g AM.NEX,0-1

224:

0000026

;
;

18¢;

2l14:

000021

¢, 88THPY

2221

204:

0000006
100000
0000026

: COUNT

000002
0000006

174
L$OLY,RO
164
2(SP)
RO
154

SEQ 0130
Page
35
(16)

R3
R3, 024

000024
0000006 177777

VAX-11 Blise-16 V4,0-579
USER$1:[AZTEC. CZRCFC)ZRCFCZ 816;1

I.AM NEX

2234

2236

;

g}?OOOO.RCZS.DAIAoZ

2240

021 ,RET.STATUS

2243

2238

274

R4,R1
RC?S DATA.2,R0O

;

MASK,
s

2242

2249

RO
RO
RO
©177760,R0

RO,R1
264

02,P.MASK
OFMT3,P1

e1,P2
RCZS RDDR,RO

;
2252
;
2253

;

2254

;

02,R0

2255

RO,P4

RCZS DATA.2,PS

R4,P6
oMSG. 14, MSGADR
01 ,RET.STATUS

RET.STATUS, RO
29s

;

:
;

H
:

MASK,
s

2256

2257
2258

2259
2251

Bll
MISCELLANEQUS SECTION,
AZTEC INITIALIZATION

000403
005067
005000
022626
000207

0000006

27%:

0000006
0000006

#1,P2
RC2
. ADOR,
S
RO
02,R0
RO.P4

0000006

RC2S.DATA.2,PS

R4, P6
oMS$G.
14,MSGADR

0000006

RET.S$TAtUS,
RO
294

RTS

(SP)e,(SP)e
PC

Routine Base:
RB$CODE « 0762
214 words,
; Routine Size:
10 words
; Meximum steck depth per invocetion:

2292

-9

SEOPOISI 16

.9.(16)

2276

2279
2280
2281
2282

, ¢
MASK

2283
2284
2285
2289

RET.STATUS
RO

28%:

294

p_1 o)
N--

RS, 04
274
S¢
#1,RET.STATUS
2 84
02,P.MASK
OFMT3,P1

9-16 v4.0-5 79
EC.CZRCFC)Z RCFC2.816;1

2268
2267
2190

@we

000002
0000006
000001
0000006
000002
0000006
000002G
0000006
0000006
0000006

011,RET.STATUS

274

264:

000004

177314
000001

254

0000006

®s

000011

®s

012767
000406
005205
020527
101002
000167
032767
001432
112767
012767
012767
016700
062700
010067
016767
010467
012767
016700

27-Mer-1985 15:23:34
11-Jen-1985 08:19:19

2122

Cll
MISCELLANEOUS SECTIONS
AZTEC INITIALIZATION BY POLING

ZRCFR2

wsbttl

‘AZTEC INITIALIZATION BY POLING'

global routine AZP_INIT N A N W U U O

! FUNCTIONAL DESCRIPTION:
)

]
1
]

]
9

Y U U

[}
]

)
]

]
9

THIS ROUTINE FIRST STARTS AZTEC INIT BY WRITING TO RCIP.
THEN EXPECTS TO READ STEP 1 BIT IN RCSA INDICATING THAT
THE PORT IS READY TQ ACCEPT STEP 1 WRITE DATA. IF THE

STEP READ DATA WAS OK THEN WRITES STEP 1 WRITE DATA TO RCSA

THEN WAITS TO READ STEP 2 BIT IN RCSA. THIS PROCEDURE OF READ
FOLLOWED BY WRITE IS DONE AS GIVEN BY B_MASK,

IF _THERE WAS ANY PORT FATAL ERROR IN ANY OF THE STEPS,

THEN THE FAILURE DATA OF RCSA IS PRESERVED ANF FURTHER

STEPS ABORTED.

THIS ROUTINE DOES NOT USE INTERRUPTS AND STEP 1 WRITE DATA
SHOULD NOT ENABLE INTERRUPT

i FORMAL PARAMETERS:
]

]

- NONE -

P IMPLICIT INPUTS:
DATAL = STEP
DATA2 = STEP
DATA3 = STEP
DATA4 = STEP

]

B_MASK = WITCH STEPS WILL BL DONE

el el ey ey ey e e ey e ey e oy O O

]
'
;
'

ol e

O O O Y Uy O Uy N Y

]

[}

]

1
2
3
4

%0 1 =
%0 3 =

]

%0 7

]

WRITE
WRITE
WRITE
WRITE

DATA
DATA
DATA
DATA

STEP 1
STEP 1

STEP

%017 = STEP 1

¢
]

¢ IMPLICIT OUTPUTS:
1

]

]
4

IF ERROR OR NO STEP IT WILL RETURN

P1-P6,

P_MASK

RET_STATUS

! COMPLETION CODES:
9

]

RET_STATUS GIVES COMPLETION CODE

s g LS

e o

2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307

v03.0

27-Mer-1985 15:23:34
11-Jen-1985 08:19:19

' SIDE EFFECTS:
]

¢
]
|4

- NONE

begin

locel

MASK,

COUNT,
DATA;

1STEP NUMBER
ISTEP MASK

'TIME OUT COUNT

'WRITE DATA FOR THE STEP

VAX-11 Bliss-16 V4,0-579

USER41: (AZTEC.CZRCFC)ZRCFC2.816;1

SEOp0132
age

(17)

D11l
HISCELLANEOU S_SECTIONS

ZRCFR2
v03.0

ZTEC INITIA LIZATION BY POLING

VUNaUNsEanUVVIVIVIVINA
B AL L LLLLLLDLLLRDLLRABABLLWGEWHNNNMNMNNRARNNRN DN

2350
2351
2352
2353
2354
2355
2356
2357
2358
2359
2360

27-Mar-1985 15:23:34
11-Jan-1985 08:19:19

VAX-11 Blise 1 vV4.,0-579
USER$1:[AZT C.CZRCFC)ZRCFC2.B16;1

INIT T HE AZTEC
THE FOLLOWING LOOP WILL DO STEP 1 THRU 4 AS GIVEN BY B_MASK

INPUT SELECTING APPROPRIATE DATA INPUT FOR STEP WRITES. IF

ERROR IN SA REGISTER Pl - P4 AND P_MASK WILL BE SUPPLIED FOR
ERROR REPORT. CNLY SA DATA FOR THE FINAL WRITE STEP IS PRESERVED.,
MASK = #b'0001';
WRT_RC25 )(RCIP ALL -ONES);

DELAY (2

! STEP MASK
! START INIT
! WAIT FOR COMPLETION

incru N from 0 to 4 do

begi n

if ( .N eqlu 0 or BIT_TST
then
begin

(.B_MASK,

.MASK))

! TEST FOR STEP NUMBER

selectoneu .N of
set

5 SELECT CORRECT WRITE

(0] :

DATA = ALL_ONES;

(1) :

DATA =

(2) :

DATA =

]

DATA =

tes;

_DATAL;

! DATA FOR STEP WRITES

_DATAZ2;
_DATA3Z;

DATA = .DATA4;

]

uncru COUNT

from 0 to 20 do

DE AY (333);
RC25_DATA [RCSA, RC_ALL) =

TIME OUT WAIT LOOP

! DELAY

1 SEC.

.RC25_ADDR [RCSA

APPROX.

RC_ALL];

if .RC2S_DATA [RCSA, RCSA_STEP) eqlu .MASK then exitloop;
RET_STATUS = CTO_CODE;

BREAK;
end;

! WATCH FOR CONTROL C.

£ ( LRC2S_DATA (RCSA, RCSA_ER) nequ ZERO)

then

begin

RET_STATUS = PFE_CODE;

IF RCSA ERROR BIT SET

! THEN FATAL ERROR

SEQ 0133

(17)

E1ll
MISCELLANEQUS SECTIONS
AZTEC INITIALIZATION BY POLING

2417
2418
2419
2420
2421
2422
2423
2424
2425
2426

2427
2428
2429
2430
2431
2432
2433

2434

2435
2436
2437
2438
2439

2440
2441
2442
2443
2444
2445
2446
2447
2448
2449

2450
2451
2452
2453

2454

2455
2456
2457
2458

[000000

004167

SEQ 0134
Page
39

(17)

end

begin

! OTHERWISE, CHECK THE
! STEP BITS.

if (.RC25_DATA [RCSA,
then
b

RCSA_STEP) n; u

.MASK)
ERROR THEN SUPPLY

' P1- P6

eflASK = 2

b5 + hoapt
(.RC25 ADDR) Rczs DATA (RCSAf RC_ALLI;
VO
we

2416

else

P6 = _MASK;
HSGADR = HSG 14;

!
!

return .RET_STATUS;

else

end

begin

RE?_STATUS = PAS_CODE;
end;

AND RETURN
TRUE STATUS.

! IF NOT, RETURN GOOD STATUS

end;

.N nequ ZERO

then

begin

MASK

_MASKt];

WRT_RC2S (RCSA,

end;

.DATA);

! MOVE MASK BIT

! STEP N WRITE DATA T0 SA

end;
end;

! IF TRUE STATUS, THEN
! SUPPLY P1-P6 FOR TEST
! MODULE FOR ERROR PRINTOUT.

.RET_STATUS

then

beain
P_MASK = 2;
Pl = FMT3;
P2 = ADAPT;
"

2415

VAX-11 Bli 88-16 V4,0-579
USER$ 1:(AZTEC.CZRCFCJZRCFC2.816;1

exitloop;

2414

RNV UWWHWHWWWWUEHWDNNND
WA RANNVNE

2407
2408
2409
2410
2411
2412
2413

A ANTVNOOVNATOTRTTROTUIOUVILIVIANW

v03.0

27-Mar-1985 15:23:34
11-Jen-198S 08:19:19

ZRCFB2

(. RCZS ADDR) «

PS = .RC2S_DATA [RCSA RC_ALL]J;
P6 =

,MASK;

MSGADR = HSG 14;

return .RET_STATUS;

else

end

return

.RET_STATUS;

ORHERWISE GOOD STATUS.

end;

0000006

AZP.INIT

.SBTTL

AZP.INIT AZTEC INITIALIZATION BY POLING

JSR

R1, $SAVES

;

2295

F11
MISCELLANEQUS SECTIONS
AZTEC INITIALIZATION BY POL ING

ZRCFB2

v03.0

024646
012705
012700
010077
012701
001411
016700
001404

005066
005300
001374
005301
000766
005003
005703
001410
005000
156700
010501
005101
040100
020005
001170
010300
001003
012702
000427
020027
001003
016702

000421

020027
001003
016702
000413
020027
001003
016702
000405
020027
001002

177777

0000006
000002

14:

USER$1:(AZTEC.CZRCFCJZRCFC2.B16;1

#1,RS
#-1,R0
RO, 3RC2S.ADDR
#2,R1
43

; *,MASK

; #,88TMP2

ESDLY.RO

;

34:

;

$$TMP2

: N
;: N
8.MASK,RO

64:

177777
74:

0000006
000002

8s%:

0000006

000003

9s$:

0000006
000004

0000006
000002
0000026

114

RO, 81

8
DATA1,R2
11

RO, @2

9¢
DATA2,R2
11%
RO, 03
104
DATA3,R2

DATA4 ,R2

14%:

;

*
MASK,

*,MASK

2359

2361

164
L$OLY,RO
15¢
2(SP)

15¢:

RO
144
R1

:
164

RC25.ADDR,RO

134

2(R0O),(SP)
(SP),RC25.DATA.2

RS,R1

(SP),RO

2363
2366

: N,»

2371

;

2375

+,DATA

2377

¢,DATA

2380

¢,DATA

;
H
:

2378
2371

H
;

2374

2371

2381

2371
2383

O.DATA

:
:

R4
#515,R1

000000G
000002

RS,R1
Rl
R1,RO
RO,RS
204
R3,RO

10¢:

0000006

(17

; $4TMP

$3TMPL

0000006

SEQ 0135
Page
40

¢, 88TMPL

;

S$:

000001

*,RCM.REG

; RCM_REG,»

2s:

000515

011600

VAX-11 Blise-16 V4,0-579

-(SP),-(SP)

000001

0000006
000002

27-Mer-1985 15:23:34
11-Jan-1985 08:19:19

2384
2371
2386

;

»,DATA

2387

;

*,88TMP2

<394

;

®,$8TMPIL

;
;

$$TMP
$3TMPIL

$$TMP2

; COUNT

;

*,RC.REG

RC.REG,»

: MASK,*

RC25.DATA+2,»

2392

2395

2397

G11
ZRCFB2

MISCELLANEQUS SECTIONS

v03.0

000242
000244
000246
000250

000252
000256
000260
000262

000270
000272
000274
000300
000302
000310
000312
000320
000322
000324
000330
000332
000334
000336
000340
000344
000346
000350
000356
000364
000372
000376
000802
000406
000414

27-Mer-1985 15:23:34

AZTEC INITIALIZATION BY POLING

006200
006200
006200
000300

042700
020001
001410
012767
104422
005204
020427
101734
032767
001404
012767
000465
010501
016700
006200
006200
006200
000300
042700
020001
001432
112767
012767
012767
016700
062700
010067
016767
010567

177760
000011

0000006

000024
100000

0000026

000021

000000G

17¢:

188:

0000026

177760
000002
000000G
000001
0000006
000002
0000006
000002G
0000006

000000G
0000006
0000006

000000G

000420 012767 000000G 000000G
016700
000460
005067
005703
001406
006305
010204
016700
010460
005203
020327
101002
000167
032767
001432

112767
012767
012767
016700
062700
010067
016767
010567

19¢:

000000G
000002

20%:

000004
177360
000001

000000G

000002 000000G
000000G 0000006
000001
0000006
000000G
000002
0000006
000002G 000000G
0000006

ASR
ASR
ASR
SWAB
BIC
cHP
BEQ
MOV
TRAP
INC
CMP
8LOS
Il
BEQ
MOV
BR
MOV
MOV
ASR
ASR
ASR
SWAB
BIC
cHP
BEQ
MOVB
MOV
MOV
MOV
ADD
MOV
MOV
MOV

RO
RO
RO
0177760,R0
RO,R1
194
62,P.MASK
oFMT3,P1
01,P2
RC25. ADOR, RO
#2.RO
RO, P4
RCZS DATA+2,P5
RS,P

MOV
BR
CLR
ST
BEQ
ASL
MOV
MOV
MOV
INC
CMP
BHI
JMP

RET.STATUS,RO
234
RET.STATUS
R3
20$
RS
R2,R4
RC25.ADDR,
RO
R4,2(RO)
R3
R3, 04
214
5%

MOV

000000G

11-Jan-1985 08:19:19

21¢:

BIT
BEQ

MOVB
MOV
MOV
MOV
ADD
MOV
MOV
MOV

SEQ 0136

VAX-11 Bliss-16 V4.0-579

USER$1:{AZTEC.CZRCFCIZRCFC2.B16;1

Page

(17)

RO
RO
RO
RO

#177760,R0
RO,R1
174
#11,RET.STATUS
22
R4
R4, 024
124
#100000,RC25.DATA.2
184
021 ,RET.STATUS
218
R5,R1
RC25 DATA.2,RO

BRSG 14,MSGADR

#1,RET.STATUS
224
#2,P.MASK
oFMT3,P1
01,P2
RC25. ADDR, RO
02,R0
RO, P4
RC25.DATA+2,PS
R5,P6

;

2399

; COUNT
; COUNT,

2392

;

2403

;
;
: MASK,#

2406
2405
2413

;
;
:
;

2416
2417
2418
2419

;
: MASK,
s

2420
5451

;

2415

5452

;
: N

2427
2432

; MASK

2435

; RCM.REG,*
: N
i N,»

2363

;

2443

:
:

2446
2447

;
i MASK,s

2450
2451

: DATA,RCM.REG

;
;

2436

2448
2449

H11
MISCELLANEQUS SECTIONS
AZTEC INITIALIZATION BY POLING

ZRCFR2
v03.0
000554
000562
000566
000570
000574
000576

012767
016700
000402
016700
022626
000207

: Routine Size:

;

000000G 0000006

2859

MOV

0000006
0000006

22%:
23§:

192 words,

Haximum stack cgepth per

27-Mar-198S 15:23:34
11-Uan-1985 08:19:19

Routine Base:

invocation:

10 words

OMSG.
14,MSGADR

ggv

ggI.STAfus.no

MOV
CMP
RTS

RET,.STATUS,RO
(SP)s,(SP)«
PC

AB$CODE + 1636

VAX-11 Bliss-16 V4,0-579

USER4$1:(AZTEC.CZRCFC)ZRCFC2.B16;1

SEQ 0137
p

111
ZRCFBR2

MISCELLANEQUS SECTIONS

v03.0

:
H

2462

2464

2463

2465

COMMUNICATION RING INITIALIZATION

S:gg

;.
:
:
;.
:

2466
2867
2468
g:gg

2471

27-Mar-1985 15:23:34

1
1

11-Jen-1985 08:19:19

)

global routine INIT_COM_AREA =
teo

! FUNCTIONAL DESCRIPTIONS:
!
THIS ROUTINE FIRST MAKES SURE THAT THE COMMUNICATION AREA'S
!
RING BUFFERS ARE CLEARED, THEN THE COMMUNICATIONS AREA 1S
5
INITIALIZED AS FOLLOWS:

5:;2

:
:

2475
g:;g

1
i

'
z

2. CLEARS THE INTERRUPT INDICATORS (RING BASE -1,
DEFINED AS HEAD_ARER.

g:;g

3. LOADS THE RECEIVE AND SEND DESCRIPTORS WITH THE VALUES:

;.
:
;.
:

2480
2481
2482
s:gz

1
1
1
i

!
'
!
:

2488
2489

1
1

! FORMAL PARAMETERS:
-NONE '

2491

t IMPLICIT INPUTS:

;.
;.

:
;
;.

o472

2485

2486
2487

2490

1
1}
1

'
'

1. DEFINES FROM THE CONTIGIOUS DATA STORAGE STRUCTURE "COM_AREA"

THE HEADER AREA ADORESS, RECEIVE RING ADDRESS AND THE SENDING

RING ADDRESS.

A.
8.
C.
D.

-2, -3, -4)

ENVELOPE LOW, HIGN AND Q BUS ADDRESS
RESERVED FIELD
FLAG BIT
OWENERSHIP BIT

4. LOAD THE RECEIVE ENVELOPE MESSAGE LENGTH WITH THE BUFFER SIZE
IN BYTES.

5:3%

:
;.
;.

2494
2495
249

1
1
1

' IMPLICIT QUTPUTS:
'
AS A RESULT OF THIS ROUTINE THE COMMUNICATION AREA WILL
BE INITIALIZED.
H

2498
2499
2500
2501
2502
2503
2504
2505

1|
1}
1
1
1
1
1
1

:
;
:
;.
;
:
H
H

:
:

2497

2506
2507

2
2

3283

sg%g

:
;
;
:
;

2512
2513
2514
2515
2516

2
2
3
3%
3

USER$1: (AZTEC.CZRCFCIZRCFC2. B16;1

?sbttl 'COMMUNICATION RING INITIALIZATION'

1
1
1}
i

VAX-11 Bliss-16 V4,0-579

HEAD_AREA,

RECEIVE_RING,

SENDING_RING,

COM_AREA

! COMPLETTION CODES:
!
FAL_CODE : INDICATE AN ERROR HAS OCCURED
!
PAS_CODE : INDICATE NO ERROR
!
' SIDE EFFECTS:
- NONE '
1-)
begin

incru I

from 0 to RING_SIZE

incru J from 0 to 1 do

1 do

TEST RING AREA FOR ZEROS

if .COM_AREA [.I, .J, WORD_REF]) nequ O
! IF RING AREA IS NOT CLEAR
then
' THEN
beqgin
RET_STATUS = FAL_CODE;
return RET_STATUS;
' RETURN WITH ERROR CODE SET

-WJ;@

SEQ 0138

Page

(18)

MISCELLANEOUS SECTIONS

ZRCFB2

27-Mar-1985 15:23:34

COMMUNICATION RING INITIALIZATION

T XY, RY VY Y ¥ VY VY VY VY. 97 07 . ¥Y SY VY ST FY VY ST Y.L Y)

v03.0

USER4$1:(AZTEC.CZRCFC)ZRCFC2.B816;1

end;

DEFINE THE ADDRESS LOCATIONS OF THE HEAD_AREA, RECEIVE_RING

AND SEND_RING.

HEAD_AREA = COM_AREA

SEND_RING = COM_AREA [SND_BASE);

! DEFINE THE COMMAND RING AREA

RECEIVE_RING = CCM A&EA (REC_BASE
];
incru 1l from 0 to 3 do

HEAD_AREA [.I. WORD_REF] = ZERO;

DEFINE THE HEADER AREA

! DEFINE THE RESPONSE RING AREA
!

CLEAR THE HEADER AREA

LOAD UP THE COMMAND RING DESCRIPTORS WITH AN ENVELOPE ADDRESS,
DE. INE THE "FLAG BIT" TO = 1 (INTERRUPT REGUESTED), DEFINE THE
"OWNERSHIP BIT* TO ZERO (OWENED BY HOST) AND LOAD THE RESERVED

FIELD WITH ZERO.

incru I from O to SND_ALLOCATE
begin

1 do

TR T T

SEBO_RING I, LO_ENSAD] = SND_ENVELOPE { .1, CMD_LREF]; ! LO-ORDER SEND ENVELOPE ADDR
SEND_RING

SEND_RING

T
TV TR TR TV LN NN NT S NN VL XY RY P T T
Lt S LSl LS L LS TS DS DS S L IR RV

11-Jen-198S 08:19:19

VAX-11 Bliss-16 V4.0-579

SEND_RING

SE:D,RING

(.I, HI_ENSAD)

= ZERD;

HI-ORDER SEND ENVELOPE ADDR

[.I, @B_EXT] = ZERO;

' HI-ORDER PORTION OF UNIBUS

(.1, FLAG BIT) = ZERO;

! FLAG BIT,

(.I, D_RSVD) = ZERO;

eng;

I, OWN_BIT) = ZERO;

! OR Q-BUS ADDRESS

1=INT. REQUESTED

! OWNERSHIP BIT, O=0WNED BY HO

LOAD UP THE RESPONSE RING DESCRIPTORS WITH AN ENVELOPE ADDRESS,
DEFINE THE “OWNERSHIP BIT” = 1 (OWNED BY PORT) DEFINE THE "FLAG
BIT* TO = 1 (INTERRUPT REQUESTED) AND THE RESERVED FIELD SET T0
ZEROS.

incr:el.from 0 to REC_ALLOCATE n

1 do

RE éIVE_RING

.1, LO_ENSAD) = REC_ENVELOPE (.1, CMD_LREF);

RECEIVE_RING

(.I,

RECEIVE_RING
RECEIVE_RING

(.I, HI_ENSAD]
Q@B _EXT)

(.I, D_RSVD)

= ZERD;

= ZERO;

RECEIVE_RING [.I, FLAG_BIT) = ZERO;

RECEIVE_RING (.I, OWN_BIT) = ONE;
end;

! LO-ORDER SEC ENVELOPE ADDR

' HI-ORDER COMMAND ENV. ADDR
!

HI-ORDER PORTION OF UQ ADDR

! RESERVED
'

! OWENER BIT, 1=0WNED BY PORT

SET THE RESPONSE ENVELOPE MESSAGE LENGTH
incru I from O to REC_ALLOCATE -

1 do

REC_ENVELOPE [.I, MSG_LENGTH) = RB_SIZEs?2;

RET_STATUS = PAS_CODE;
return . RET_STATUS;
end;

! CONVERT TO BYTES BEFORE
LOADING

SEQ 0139
Page
44

(18)

K11
COMMUNICATION R ING INITIALIZATION

INC

000037
0000006 0000006
0000106 000000G
000110G 0000006
44

MOV

Ss$:

0000006
0000046

0000006
000003
000002

0000006
000074
000002

0000006

2315
2514
2510
2508

2523
2524
2525
2527
2528

MOV

T
]

RO
RO, 03
44
R1
R1,R2
R2
R2

2527

(R1)

000003

000054

2463
2508
2510
2512

HEAD.AREA,R]

0000006

oCOM.AREA ,HEAD.AREA
o0COM.AREA+10,RECEIVE.RING
0COM.AREA«110,SEND.RING
RO
RO,R1
R1

(18)

[

COM.AREA(RO)
34
OFAL .CODE ,RET,STATUS
-

000000G 000000G
0000006

RET.STATUS,RO

18T
BEQ

SEQ 0140
Page
45

MOV
MOV

MOV

[

ASL
ADD
ASL

R2
R1
R2,RO
RO
R1,RO
RO

0000006

CLR
CLR

|
]

.SBTTL
INIT.COM.AREA COMMUNICATION RING INITIALIZATION
INIT.COM.AREA::
R1,$SAVE2
JSR
1%:
2%:

000001

TEC CZRCFCIZRCFC2.B16;1

0000006

0-5

v03.0

27-Mar-198S |
11-Jan-1985 08:

HISCELLRNEOg S S ECTIONS

[

ZRCFR2

2537
2539

SEND.RING,R2

R1,-(SP)
054,-(SP)
PC,BL tMUL

OSND . ENVELOPE
-4 ,RO

RO, (R2)
R1,RO
RO
RO

2540

SEND.RING,RO

03,2(RO)
R1,RO
RO
RO

2541

SEND.RING,RO

#74,2(RO)
R1,R0O
RO
RO

SEND.RING,RO

2542

L11
ZRCFB2
v03.0

MISCELLANEQUS SECTIONS

000236

037700

000244
00024¢
000250
000252
000256
000264
000266
000270
000272
000276
000304
000306
000310
000314
000316

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

COMMUNICATION RING INITIALIZATICN
000002

8IC

MOV

ASL
ASL
ADD

0000006
040000
000002

8IC

MOV
ASL

0000006
100000
000002

#37700,2(R0)
R1,RO
RO
RO

R1,R0O
RO
RO

gip)o.(SP)o
S

64:

R2
R2,R1
R1
Rl
RECEIVE.RING,R]
RO

0000006
000074
000002

0000006
037700
000002

000002

0000006
100000
000002
000017

2543

2544

2538
2537

2554
2556

OREC . ENVELOPE
-4 ,RO

RO, (R1)

0000006
000003
000002

040000

(18)

877 ,R0

R2,RO

0000006

Page

SEND
. RING,RO

R1,017

000077
0000046

i 1,0

SEQ 0141

SEND.RING,RO

040000, 2(R0)

000017

0000006

VAX-11 Bl iss-16 v4,0-579
USER# 1:(A ZTEC.CZRCFCJZRCFC2.816:1

RO
RO
RECEIVE .RING,RO
03,2(R0O)
R2.RO
RO
RO
RECEIVE .RING,RO
074,2(R0O)
R2,R0
RO
RO

2557

2558

2559

RECEIVE .RING,RO

037700, 2(R0O)
R2,R0O
RO
RO
RECEIVE .RING,RO
040000, 2(R0)
R2,R0
RO
RO
RECEIVE.RING,RO

#100000,2{R0)

2560

2561

2554

2568

M11

000077
000074

MOV

000017
0000006
0000006

RTS

R1,017
74
RET.STATUS
RET.STATUS,RO

Routine Size:
RB$CODE - 2436
183 words,
Rout ine Bese:
;: Meximum stech depth per ‘nvocetion:
6 words

2574

)

(18)

2569

2568

077,R0
;IQ.REC.ENVELOPE(RO)

0000006

SEQ 0142

H Io‘

7¢;

010100
000300
106000
006000
006000
142700
012760
005201
020127
101762
005067
016700
000207

COMMUNICATION RING INITIALIZATION

VAX-11 B 1 iss-16 V4,0 579
USER$1:
( AZ TEC.CZRCFC]ZRCFC2.816;1

000510

27-Mer-1985S 15:23:34
11-Uen-198S5 08:19:19

Sud bl

MISCELLANEQUS SECTIONS

ZRCF82
v03.0

2571

2463

N11

ZRCFR2

MISCELLANEQUS SECTIONS

v03.0

i
i
i
i
:
:

27-Mar-1985 15:23:34

AZTEC GLOBAL ROUTINE

2575
2576
2517
2578
2579
2580

1
1)
1
1
1}
)

11-Jen-1985 08:19:19

ssbtt]l 'AZTEC GLOBAL ROUTINE'
'
.
globel routine EX_SUP _PRG =
Yoo

gggé

i
;i
:
;i
:
:
:

2583
2584
2585
2586
2587
2588
gggg

1
)
1
1
1
1
i

'
'
'
'
'
'
!

i
:
:

2591
2592
523}

1
1
i

! FORMAL PARAMETERS :
'
: IMPLICIT INPUTS : BUF _DESCRPTR, BYTE_COUNT

i
;.
;.
:

2595
2596
2597
2598

! IMPLICIT OUTPUTS : RET_STATUS AS RECEIVED FROM REC_STATUS ROUTINE
'
15 RETURNED 10 CALLING ROUTINE
! SIDE EFFECTS :
'

1
1

FUNCTIONAL

DESCRIPTION

THIS COMMANO CAUSES THE SERVER TO TRANSFER THE PROGRAM FROM HOST
MEMORY TO AN AREA IN THE CONTROLLER AND START ITS EXECUTION.
THE HOST SUPPLIES THE ADDRESS AND LENGTH IN BYTES OF A BUFFER
CONTAINING THE PROGRAM WHICH WAS MADE INTO ONE CONTIGUOUS
VECTOR OF DATA AS FAR AS HOST IS CONCERNED. THIS COMMAND IS
ONLY LEGAL WHEN THE SERVER IS IN THE IDLE STATE AND RETURN
OF A SUCCESSFUL END PACKET PUTS THE SERVER INTO ACTIVE STATE.

29599

;.
:
:
H
;i
:

2601
2602
2603
2604
2605
2606

2
2
2
2
2
2

begin

'--

locel
TEW;

ggg;

! CLEAR THE FLAG HERE TO INSURE THE DETECTION OF THE INTERRUPT.

:
;.
H
:

2609
2610
2611
ggig

2
2
2
g

I_AM_NEX = ZERO;
!

2614

! UQ PORT COMMAND ENVELOPE HEADER FIELD DEFINITION
SND_ENVELOPE [ .CMD_SLOT, MSG_LENGTH) « SZ_ESP;

;.
;.
:

2615
2616
ggiz

2
2
S

SND_ENVELOPE
SND_ENVELOPE
§ND_ENVELOPE

5258

! DUP COMMAND ENVELOPE FIELD DEFINITION

;.
;.
;.
;.
;i
i
;.

2621
2622
2623
2624
2625
2626
2627

2
2
2
2
2
2
2

SND_ENVELOPE
SND_ENVELOPE
SNO_ENVELOPE
SNO_ENVELOPE
SNO_ENVELOPE
SNO_ENVELOPE
SND_ENVELOPE

i
;.
;.
i

2628
2629
2630
2631

2
2
2
2

VAX-11 Bliss-16 V4.0 S79

USERS1:(AZTEC.CZRCFC)ZRCFC2.816;1

SNO_ENVELOPE
SND_ENVELOPE
SND_ENVELOPE
SND_ENVE!
OPE

[.CMD_SLOT, CREDITS) = ONE;
[.CMD_SLOT, MSG_TYPE] = 0;

.CMO_SLOT, CONN_ID) = 2;

[.CMD_SLOT,
[.CMD_SLOT,
[.CMO_SLOT,
[.CMD_SLOT,
[.CMD_SLOT,
(.CMD_SLOT,
(.CMD_SLOT,

[ .CMD_SLOT,
[.CMD_SLOT,
[.CMD_SLOT,
[.CMD_SLOT,

CMD_LREF]
CMD_HREF]
UN_LUSED]
UN'HUSED)
OPCODE)
=
UQRSVD])
=
MODIFIER)

= .CMD_REF;
= ZERO;
= ZERO;
= ZERO;
OP ESP;
Z€R0;
= ZERO;

BLO_CNT)
= .BYTE_COUNT;
! BYTE COUNT LOW WORD
BHI_CNT)
= 2ERO;~
! BYTE COUNT HIGH WORD
B0D_8]
= .BUF DESCRPTR;
! BUFFER DESCRIPTOR WORD 0
BD
1) = ZERO;
! BUFFER DESCRIPTOR WORD 1

SE°p2$:3 48
(19)

ZRCFB2

Ble
27-Mer-1985 15:23:34

MISCELLANEOUS SECTIONS

v03.0

AZTEC GLOBAL ROUTINE

11-Jen-1985 08:19:19

;.
;
:
:

2682
2638
2634
2635

2
2
2
2

SND_ENVELOPE
SND_ENVELOPE
SND_ENVELOPE
SND_ENVELOPE

;.
;
:
:
;

2637
2638
2639
2640
gg:g

2
2
2
2
g

SND_ENVELOPE
[.CMD_SLOT.
SND_ENVELOPE
[.CMO_SLOT.
SND_ENVELOPE
[.CMD_SLOT.
SND_ENVELOPE [ .CMD_SLOT.
SNDENVELOPE
(.CMDISLOT,

gg:z

{ SET THE OWNERSHIP BIT 70 1 WHICH GIVE THIS SLOT TO THE PORT.

;2645

%2:; g

SEND_RING [.CMD_SLOT, OWN_BIT) = PORT_OMNED

;

gg;g

TEWP = .RC25_ADDR [RCIP, RC_ALL):

;

5225

} GET THE COMMAND SLOT NUMBER FOR NEXT COMMAND

:
3
:
:

2653
2654
2655
gggg

2
2
2
5

GET_CMD_SLOT ();
!
'
! CHECK THE END PACKET FOR GOOD STATUS

:
:

2658
2659

2
1

return REC_STATUS ();
end;

2636 2

000000

[.CMD_SLOT,
{.CMD_SLOT.
[.CMD_SLOT.
[.CMD_SLOT.

80_2) =
B0
3] =
BD
4] =
80°S) =
080°1)
080_2]
08D_3]
08D_4)
0B0_S]

!
!
!
!

BUFFER DESCRIPTOR
BUFFER DESCRIPTOR
BUFFER DESCRIPTOR
BUFFER DESCRIPTOR

ZERO;
ZERO;
ZERO;
ZERO;
ZERO;

!
'
!
!
'

BUFFER DESCRIPTOR WORD 1
BUFFER DESCRIPTOR WORD 2
BUFFER DESCRIPTOR WORD 3
BUFFER DESCRIPTOR WORD 4
BUFFER DESCRIPTOR WORD 5

=
=
=
=
=

.SBTTL
EX.SUP.PRG::
3

CLR

EX.SUP.PRG AZTEC GLOBAL ROUTINE
-(SP)

;

2578

CHD. SLOT, -(SP)

2614

050, SND . ENVELOPE(RO)
CMD.SLOT, (SP)

;

2615

017,SND.ENVELOPE.2(RO)
1,SND.ENVELOPE.2(RO)
CMO. SLOT, (SP)

;

2616

;

2617

2621

;

2622

I1.AM.NEX

MOV

000022
000030

012760
016716

000050 0000006
0000006

MOV
MOV

000044
52
000060

142760
.52760
016716

000017 0000026
000001 0000026
0000006

BICB
BISB
MOV

70
764

004767
142760

000000G
000360
0000026

JSR
BICB

PC,BL ML
0360, SND.ENVELOPE+2(RO)

106

012746

000054

MOV

054, -(SP)

000054
0000006

000034 012746 000054
000040 004767 0000006

054, -(SP)
PC,BL $MUL

MOV
JSR

054, -(SP)
PC,BL $MUL

MOV

054 ,-(SP)

000054

016716

000000G

112
116
124

004767
112760
016716

0000006
000002 0000036
0000006

JSR
MOVB
MOV

134
140
146
152

004767
016760
016716
012746

0000006
0000006 0000046
0000006
000054

JSR
MOV
MOV
MOV

00130

—

MOV
JSR

012746

102

012746

WORD 2
WORD 3
WORD 4
WORD S

'RETURN THE STATUS

000000G

000064

(19)

! READ THE IP REGISTER TO STIMULATE PORT POLLING.

005746

012746
004767

0144
> EQp.é.
49

1 BUFF{Y DESCRIPTOR WORD 0

016746

000012
000016

USER#1:[AZTEC.CZRCFCJIZRCFC2.816;1

ZERO;
ZERO;
ZERO;
ZERO

SND_ENVELOPE [ .CMOSLOT. 080.0) = ZERD,

000002 005067 0000006

000006

VAX-11 Blies-16 V4.0-579

000054

MOV

CMD. SLOT.(SP)

PC,BLSMNL
02.SND.ENVELOPE +3(RO)
CMO. SLOT, (SP)

054, -(SP)

PC.,BL $MUL
CMO.REF
, SND . ENVELOPE +4(RO)
CMD.SLOT,(SP)
054, -(SP)

2609

Cle
ZRCFR2

MISCELLANEOUS SECTIONS

v03.0

AZTEC GLOBAL ROUTINE

000156

004767

0000006

000166
000172

016716
012746

000202
000206

005060
016716

000162

000176

000212

27-Mar-1985 15:23:34

005060

004767

JSR

PC,BL $MUL

0000006
000054

MOV
MOV

CMD.SLOT,(SP)
054, -(SP)

0000106
0000006

CLR
MOV

0000006

JSR

PC,BL $MUL

MOV

CHD.SLOT, (SP)

0000066

0000006

012746

000054

005060

0000126

012746

000054

004767

016716

11-Jen-1985 08:19:19

0000006

CLR

Page

(19)

2623

;

2624

;

2625

;

2626

CMD.SLOT,(SP)

;

2627

SNO . ENVELOPE
+ 16(RO)
CMD.SLOT, (SP)
054, -(SP)

;

2628

MOV

#54,-(SP)

SND . ENVEL OPE + 10(RO)
CMD.SLOT, (SP)

SNO . ENVELOPE
+ 12(R0)

054.,-(SP)

004767
112760
016716
012746

0000006
000002 0000146
0000006
000054

016716

0000006

MOV

005060
016716
012746

0000166
0000006
000054

CLR
MOV
MOV

016760
016716

000000G 0000206
0000006

MOV
MOV

BYTE.COUNT,
SND . ENVELOPE + 20(R0)
CMD. SLOT, (SP)

;

2629

004767
005060
016716

0000006
0000226
000000G

JSR
CLR
MOV

PC,BL $MUL
SNO . ENVELOPE +22(R0)
CMD
. SLOT, (SP)

;

2630

016760

0000006 0000246

MOV

BUF . DESCRPTR,

;

2631

JSR

PC,BL $MUL

0000006
000054

MOV
MOV

CMD.SLOT, (SP)
954, -(SP)

;

2632

0000306
0000006
000054

CLR
MOV
MOV

;

2633

0000326
0000006

CLR
MOV

;

2634

;

2635

2636

004767
105060
012746
004767

004767

012746

012746
004767

016716
012746

004767

0000006
0000156

000054
0000006

0000006
000054

000054
0000006

0000006
000054

000000G

005060

0000266

004767

0000006

016716
012746
005060
016716
012746

004767

0000006

012746

005060

005060
016716
004767

016716
012746
004767
005060
016716
012746
004767

JSR
MOVB
MOV
MOV

SEQ 0145

;

PC,
8L $MUL

MOV

USER$1:[AZTEC.CZRCFCIZRCFC2.B16;1

SNO . ENVELOPE +6(RO)

JSR

CLR

VAX-11 Bliss-16 V4.0-S79

PC,
BL $MUL
02.SND.ENVELOPE+14(R0)
CHD.SLOT, (SP)
054, -(SP)

JSR
CLRB

PC,BLSML
SNO.ENVELOPE+15(R0)

MOV
JSR

054 -(SP)
PC,BL $MUL

JSR

MOV

MOV
JSR

MOV
MOV
CLR

JSR

PC,
BL $MUL
054.-(SP)

054, -(sP)
PC,
BL $MUL

CMD
. SLOT, (SP)
054, -(SP)

SNO . ENVELOPE
+ 26 (RO)

PC,BL $MUL

SND . ENVEL OPE + 30(R0)
CMD.SLOT, (SP)
054, -(SP)

JSR

PC,
BL $MUL

000054

MOV

054.-(SP)

0000346

CLR

0000006
0000006
000054
0000006
0000366
0000006
000054
0000006

SND . ENVELOPE
+ 24(R0)

SND . ENVELOPE +32(R0)
CMD.SLOT, (SP)

JSR

PC,BL $MUL

MOV
MOV
JSR
CLR
MOV
MOV
JSR

CMD . SLOT, (SP)
0954, -(SP)
PC,BL $MUL
SND . ENVELOPE +36(R0)
CMD . SLOT, (SP)
954, -(SP)
PC,BL$MUL

SNO . ENVELOPE +34(RO)

D12
ZRCFB2
v03.0

MISCELLANEQUS SECTIONS
ARZTEC GLOBAL ROUTINE

000530
000534
000540
000544
000550
000554

0000406
000000G
000054
000000G
000042G
0000006
000054
0000006
0000446
0000006
000054
0000006
0000466
0000006
000054

CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV

0000506

CLR

000001"G

0000006
000054
0000006
0000526
0000006
0000006
100000
000002
000000G 000064
000064
000000V
000000V
000066

000670
000676
000704
000710
000714
000720
000724

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

JSR

MOV
MOV
JSR
CLR
MOV
ASL
ASL

ADD
8IS
MOV
MOV
JSR
JSR
ADD

RTS

2660

2661
2662

1
1
1

USER41:[AZTEC.CZRCFC)ZRCFC2.B816;1

SEQ 0146
Page

(19)

SND . ENVELOPE +40(R0)
CMD
. SLOT, (SP)

2637

CMD.SLOT, (SP)

2638

054 -(SP)
PC, BLSMUL
SND . ENVELOPE +42(RO)
054, -(SP)

PC, BLSMUL

SNO . ENVELOPE +44(RO)

CMD
. SLOT, (SP)

2639

SND. ENVELOPE +46(RO)
CMD.SLOT, (SP)

2640

054, -(SP)
PC,BL §MUL

054,-(SP)

PC
BL $MUL
,

SN . ENVEL OPE +50(R0)
CMD.SLOT, (SP)

2641

SNO . ENVELOPE +52(RO0)
ggo.SLOT.RO

2645

054, -(SP)
PC,
BL $MUL
RO

SEND.RING,RO

RC25.ADDR,64(SP)
64(SP),R0

PC,GET.CMD.SLOT
PC,REC.STATUS
066,
SP
PC

ABS$CODE + 3214
235 words,'
Rout
ine Base:
tine Size:
0
;: Routin
28 words
: Maximum steck depth per invocation:

VAX-11 Bliss-16 V4.0-579

+,RC.REG

RC.REG, TEMP

2649
2653

2658
2578

El2
MISCELLANEQOUS SECTIONS
AZTEC GLOBAL ROUTINE

2710

2711
2712
2713
2714
2715
2716
2717
2718
2719

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFCJZRCFC2.816;1

global routine SEND_DATA =
Yoo

! FUNCTIONAL DESCRIPTION:
THIS IS ONE OF THE DUP COMMANDS TU COMMUNICATE BETWEEN THE
INITIATING HOST PROGRAM AND THE REMOTE PROGRAM, THIS COMMAND
SPECIFIES HOST BUFFER DESCRIPTOR (START ADDRESS OF BUFFER)

AND BYTE COUNT. THE INFORMATION IN THE BUFFER IS READ BY THE
REMOTE PROGRAM AND A SEND DATA RESPONSE SENT BACK TO THE

HOST TO ACKNOWLEDGE RECEIPT, THIS COMMAND IS ONLY LEGAL

WHEN THE SERVER IS IN THE ACTIVE STATE. IF THE REMOTE
PROGRAM TERMINATES ABMORMALLY PUTTING THE SERVER BACK IN
THE IDLE STATE, OUTSTANDING COMMAND MAY BE LOST.
FORMAL PARAMETERS

IMPLICIT INPUTS

: BUF _DESCRPTR

avve COUNT

H_SADD, E_SAOD, BUF _LENGTH WILL BE MADE AVAILABLE
TO REHOTE pnocnnn BY THE POINTER IN BUF_DESCRPTR.

IMPLICIT QOUTPUTS

: RET_STATUS AS RECEIVED FROM REC_STATUS

WILL BE RETURNED TO CALLING ROUTINE.

I B I B

IP I
D I B I B I D IR
I B I B IR DI OB I

I
¢

s P Pt et it P Pt P
NI NINY NI $es 1t s 1 ht 4t pos 10 bt bt = P
LRI PV
LNV NV PV

2666
2667
2668
2669
2670
2671
2672
2673
2674
2675
2676
2677
2678
2679
2680
2681
2682
2683
2684
2685
2686
2687
2688
2689
2690
2691
2692
2693
2694
2695
2696
2697
2698
2699
2700
2701
2702
2703
2704
2705
2706
2707
2708
2709

LRV RV LNV AL L YL NPV

2665

ORI

2663
2664

s s Pt b P i et P

vV03.0

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

SIDE EFFECTS

D I

ZRCFB2

begin

local

g CLEAR THE FLAG HERE TO INSURE THE DETECTION OF THE INTERRUPT.
%_AH_NEX s ZERO;
s UQ PORT COMMAND ENVELOPE HEADER FIELD DEFINITION

SND_ENVELOPE [.CMD_SLOT, MSG_LENGTH]) = SZ_SED;

SND_ENVEL OPE [.CMD_SLOT, CREDITS) = ONE;
SND_ENVELOPE

[.CMD_SLOT, MSG_TYPE] = 0;

?ND ENVELOPE [.CMD_SLOT, CONN_ID]) = 2;

g DUP COMMAND ENVELOPE FIELD DEFINITION
SND_ENVELOPE

SND_ENVELOPE
SND_ENVELOPE

[.CMD_SLOT, CMD_LREF]

[.CMD_SLOT, CMD_HREF)
[.CMD_SLOT, UN_LUSED)

.CMD_REF;

= ZERO;
= ZERO;

SND_ENVELOPE {.CMD_SLOT, UN_HUSED] = ZERO;

SND_ENVELOPE [.CMD_SLOT, OPECDE)
SND_ENVELOPE
[.CMD_SLOT, UQRSVD]

SND_ENVELOPE

SND_ENVEL
OPE
SND _ENVELOPE

= OP_SED;
= ZERO;

[.CMD_SLOT, MODIFIER) = ZERO;
.CMD_SLOT, BLO_CNT)
= .BYTE_COUNT;

.CMD_SLOT, BHI_CNT]

= ZERO;

! BYTE COUNT LOW WORD

! BYTE COUNT HIGH WORD

SEQ 0147
Page
5S2

(20)

F12
ZRCF®2

MISCELLANEQUS SECTIONS
ARZTEC GLOBAL ROUTINE
VS LS LS LN VLS L SNV 1,81, S1, V1, 91,8 1,87, V7,¥7,¥7,57 V7, ¥

2720
2721
2722
2723
2724
2725
2726
2727
2728
2729
2730
2731
2732
2733
2734
2735
2736
2737
2738
2739
2740
2741
2742

B0 G

B0 G0

Q2 B¢

VL B0

00 V0

©:

GF ©»

G¢ G0 G

v03.0

SNO _ENVELOPE
SND_ENVELOPE
SND_ENVEL
OPE
SND_ENVELOPE
SNO_ENVELOPE
?NO_ENVELOPE

012760
016716
012746
004767

142760
152760
016716
012746
004767
142760

016716
012746
004767
112760
016716
012746
004767
016760
016716
012746
004767
005060
016716
012746
004767

.CMD_SLOT,
.CMD_SLOT,
.CMD_SLOT,
.CMD_SLOT,
.CMD_SLOT,
.CMD_SLOT,

BD_0)
BD_1
BD_2
B80_3
BD_4
80_S

VAX-11 Bliss-16 V4.0-579

USER41:[AZTEC.CZRCFC)ZRCFC2.B16;1

SEQ 0148
Page

(20)

.BUF _DESCRPTR;
! BUFFER DESCRIPTOR WORD 0
ZER0
! BUFFER DESCRIPTOR WORD 1
ZERO;
! BUFFER DESCRIPTOR WORD 2
ZEROQ;
! BUFFER DESCRIPTOR WORD 3
ZEROQ;
! BUFFER DESCRIPTOR WORD 4
ZERO;
! BUFFER DESCRIPTOR WORD S

g SET THE OWNERSHIP BIT TO 1 WHICH GIVE THIS SLOT 70 THE PORT.
%END-RING {.CMD_SLOT, OWN_BIT) = PORT_OWNED;
g READ THE IP REGISTER TO STIMULATE PORT POLLING.

feap = _RC25_ADDR [RCIP, RC_ALL);

é GET THE COMMAND SLOT NUMBER FOR NEXT COMMAND
?ET_CHD_SLOT (QF
: CHECK THE END PACKET FOR GOOD STATUS
return REC_STATUS ();
end;

005746

005067
016746
012746
004767

27-Mar-1985 15:23:34
11-Jen-198S 08:19:19

0000006
0000006
000054
0000006
000034
0000006
0000006

000054
0000006
0000026
000017

000001
0000006
000054
0000006
000360
0000006
000054
0000006
000002
0000006
000054
0000006
000000G
0000006
000054
0000006
0000066
0000006
000054
0000006

0000026

! RETURN THE STATUS

.SBTTL
SEND.DATA::
157
CLR
MOV
MOV

JSR

MOV
MOV
MOV

JSR
BIC8
BI1SB

MOV
MOV

SEND.DATA AZTEC GLOBAL ROUTINE
-(SP)
I.AM.NEX
CMD.SLOT,
- (SP)
054,

-(SP)

PC
BL $MUL
,

034, SND . ENVELOPE(RO)

CMD
. SLOT, (SP)

054, -(SP)

017,SND
. ENVELOPE +2(R0)
01, SND . ENVELOPE «2(R0O)

CMD.SLOT, (SP)

954, -(SP)

PC
BL $MUL
,
0360, SND. ENVEL OPE «2(RO)

JSR

054 -(SP)
PC
BL $MUL
,

0000036

Move
MOV
MOV

0000046

MOV
MOV
MOV

JSR

cMD. SLOT. (SP)

02.
. ENVELOPE
SND
« 3(RO)

CMO.SLOT, (SP)

2706

2707

2711

PC
BL $MUL
,

CHO. REF , SND . ENVELOPE
+4(RO)
CMD.SLOT, (SP)

054, -(SP)

JSR
CLR

PC
BL $MUL
,

JSR

PC
BL $MUL
,

MOV
MOV

2705

PC,BL SMUL

JSR
BICB

MoV
MOV

2663
2699
2704

SNO. ENVELOPE +6(R0)
CMD.SLOT, (SP)

2712

2713

G1e2
ZRCFB2

MISCELLANEQUS SECTIONS

v03.0

27-Mar-1985 15:23:34

AZTEC GLOBAL ROUTINE

11-Jen-1985 08:19:19

005060
016716

0000106
0000006

CLR
MOV

016716

000000G

MOV

012746 000054
004767 0000006
005060 0000126
012746
004767

000054
000000G

016716

0000006

112760

012746

000004

0000146

000054

VAX-11 Blis 1

0-579

USER$1:[AZTEC.CZR crc12ncrce B16;1

SEQ 0149

Page

% 20)

SND. ENVELOPEolO(RO)
CMD.SLOT,
(SP)

;

2714

cno SLOT, (SP)

;

2715

MOV
JSR
CLR

854 (SPS
C. 8L ML
6 ENVELOPE +12(R0)

MOV
JSR

054, -(SP)
PC.BLIMUL

MOV

CHD.SLOT, (SP)

;

2716

MOVE

MOV

04.SND.ENVELOPE+14(RO)

054, -(SP)

004767
105060
016716

000000G
0000156
0000006

JSR
CLRB
MOV

PC, BL $MUL
SND. ENVELOPE 15(90)
CMD. SLOT

;

2717

004767
005060
016716

0000006
0000166
0000006

JSR
CLR
MOV

PC., BL $MUL
SND . ENVELOPE
+ 16(R0)
CMD
. SLOT, (SP)

;

2718

004767

000000G

JSR

PC, BLIMUL

016716

0000006

MOV

CMD. SLOT, ($P)

;

2719

;

2720

BUF . DESCRPTR SND . ENVELOPE +24(R0)
cno SLOT SP)
;

2721

JSR
CLR
MOV

PC BL $MUL
SND . ENVELOPE +26(R0)
CMD.SLOT,(SP)

;

2722

;

2723

;

2724

012746 000054
012746

MOV

000054

MOV

016760 0000006 000020G

MOV

012746

000054

MOV

0000226

CLR

004767

000000G

016716

0000006

004767

0000006

005060

054, (SPS

054, -(SP)

BY{E. couut SND.ENVELOPEoZO(RO)
054, -(SP)

JSR

PC., BL $MUL

MOV

CMD. SLOT,

JSR

PC.BLS

SND. ENVELOPEoZZ(RO)

MOV

016760
016716

000000G 000024G
0000006

MOV
MOV

004767
005060
016716

0000006
0000266
0000006

004767
005060
016716

0000006
0000306
0000006

JSR
CLR
MOV

PC.BL$MUL
SND . ENVELOPE
+ 30(RO)
CMD.SLOT, (SP)

004767
005060
016716
012746
004767
005060

0000006
000032G
0000006
000054
0000006
0000346

JSR
CLR
MOV
MOV
JSR
CLR

PC,
BL $MUL
SND. ENVELOPE
+ 32(RO)
CMD.SLOT, (SP)
054, -(SP)
PC, BL $MUL
SND. ENVELOPE
+ 34(R0)

012746

000054

MOV

054, -(SP)

012746 000054

012746

016716

004767
005060

000054

MOV

-(3PS

054,-(SP)

000000G

MOV

0000006
0000366

JSR
CLR

PC, BL $MUL
SND.ENVELOPE036(RO)

ASL
ASL
ADD
8IS
MOV
"oV
JSR

RO
RO
SEND
. RING, RO
2100000, 2(R0)
ARC25. ADDR, SO(SP)
50(SP ), RO
PC,GET.CMD.SLOT

016700 0000006

006300
006300
066700
052760
017766
016600
004767

. MOV

054, (SPS

(SP)

012746 000054

0000006
100000
000002
000000G 000050
000050
000000V

MOV

CMD. SLOT, (SP)

CMD.SLOT, RO

'
;

2725

;

2729

; +,RC.REG
: RC.REG, TEMP
;

2733
2737

H12
ZRCFB2
v03.0
000554
000560
0005€4
;

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE
004767
062706
000207

000000V
000052

Routine Size:

2743
2744
2745

1
]
1}

JSR
ADD
RTS

187 words,

; Maximum stack depth per

;
:
H

27-Mer-1985 15:23:34
11-Jen-198S 08:19:19

Routine Base:

invocation:

22 words

PC,REC.STATUS
#52,5P
PC

ABS$CODE . 4142

VAX-11 Bliss-16 V4.0-579
USER$1:[AZTEC.CZRCFCJ)ZRCFC2.816;1
;
;

SEQ 0150

Page

55
(20)

2741
2663

112
MISCELLANEQUS SECTIONS
AZTEC GLUBAL ROUTINE

1]
L]
1]

*
[]
L]
¢
*
1)
.
*

[
.

[
.
1
®
.
L)
L

.
1)
.
L)
*
[
L)
.

¢
[]
.
.
.
[
[
L4
[
[
14
[
[
[
1
.
.
L
[4
L[]

[
’
.
’
[4
[
[
[
[

2746
2747
2748
2749
2750
2751
2752
2753
2754
2755
2756
2757
2758
2759
2760
2761
2762
2763
2764
2765
2766
2767
2768
2769
2770
2771
2772
2773
2774

2775

2776
2777
2778
2779
2780
2781
2782
2783
2784
2785
2786
21787
2788
2789
2790
2791
2792
2793

2794

2795
2796
2797
2798
2799
2800
2801
2802

NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNMHHHHHHHMMMHHHHHHb-o-b-o-t-ot-‘b-h-b—

ZRCFB2
v03.0

27-Mar-1985 15:23:34
11-Jan-1985 08:19:19

VAX-11 B lis
88-16 V4,0-579
AZTEC.CZRCFCIZRCFC2.816;1
1:(A
USER4$1:[

global routine REC_DATA =
Yoo

!
l
'
l
|

l
0
|
|
l
|
|

FUNCTION DESCRIPTION

THIS IS ONE OF THE DUP COMMANDS TO COMMUNCATE BETWEEN THE

INITIATING HOST PROGRAM AND THE REMOTE PROGRAM. THIS COMMAND
SPECIFIES HOST BUFFER DSCRIPTOR (START ADDRESS OF BUFFER)
AND BYTE COUNT.

LEGAL WHEN THE SERVER IS IN THE ACTIVE STATE.

IF THE REMOTE

PROGRAM TERMINATES ABMORMALLY PUTTING THE SERVER BACK IN THE

IDLE STATE, OUTSTANDING COMMANDS MAY BE LOST.

FORMAL PARAMETERS
:

IMPLICIT INPUTS

: IMPLICIT OUTPUTS

BUF _DESCRPTR, BUF _LENGTH
: RET_STATUS IS RETURNED AS RECEIVED FROM
REC_STATUS ROUTINE.

THE REMOTE PROGRAM WRITES TO THE BUFFER

UPTO THE AMOUNT SPECIFIED BY THE BYTE_COUNT AND THEN SENDS
R RECEIVE DATA RESPONSE TO THE HOST. THIS COMMAND IS ONLY

SIDE EFFECTS :

begin

local

TEMP;

g CLEAR THE FLAG HERE TO INSURE THE DETECTION OF THE INTERRUPT.
?_AH_NEX = ZERQ;
2 UQ PORT COMMAND ENVELOPE HEADER FIELD DEFINITION

SND_ENVELOPE

[.CMD_SLOT, MSG LENGTH = SZ_RED;

SND _ENVELOPE [ .CMD_SLOT. CREDITS] = ONE;
SND_ENVELOPE [.CMD_SLOT, MSG_TYPE] = 0;
SNDENVELOPE [ . CHD_SLOT. CONR_ID] = 2;

g DUP COMMAND ENVELOPE FIELD DEFINITION
SND_ENVELOPE [.CMD_SLOT, CMD_LREF) = .CMD_REF;
SND_ENVELOPE
[.CMD_SLOT, CMD_HREF)
= ZERO;

SND_ENVELOPE
SND_ENVELOPE

{.CMD_SLOT, UN_LUSED]
(.CMD_SLOT, UN HUSED

SND_ENVELOPE
SND_ENVELOPE

[.CMD_SLOT, HODIFIER] = ZERO;
[.CMD_SLOT, BLO_CNT) = .BYTE. COUNT

SND_ENVELOPE
SND_ENVELOPE

[.CMD_SLOT, OPTODE)
[.CMD_SLOT, UQRSVD)

= ZERO;
s Z2ERD

= OP_RED;
= ZeRO;

! BYTE COUNT LOW WORD

SND_ENVELOPE [.CMD_SLOT. BHI_CNT] = ZERQ;
! BYTE COUNT HIGH WORD
SND_ENVELOPE {.CMD_SLOT, BD_0) = .BUF_DESCRPTR;
! BUFFER DESCRIPTOR WORD O
SND _ENVELOPE [.CMO_SLOT, BD 1] = ZERO;
! BUFFER DESCRIPTOR WORD 1

SEQ@ 0151
Page

(21)

J12
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFB2

n
oo

L] - Ll
»
-® -

[l AV LS VL VLV, 01,1,91,¥7,91,V7,¥1,97,57,
V1 %Y, V1, ¥,¥7 VY

2803
2804
2805
2806
2807
2808
2809
2810

- [2

- -»

v03.0

SND_ENVELOPE
SND_ENVELOPE
SND_ENVELOPE
%ND_ENVELOPE

BD_2)
BD_3)
BD_4]
BD_S5)

=
=
=
=

ZERO;
ZERO;
ZERO;
ZERO;

!
!
!
!

BUFFER
BUFFER
BUFFER
BUFFER

DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR

USER#$1:(AZTEC.CZRCFCJZRCFC2.816;1

WORD
WORD
WORD
WORD

SEQPOISZ 57
age

(2 1)

2
3
4
S

?END_RING (.CMD_SLOT, OWN_BIT] = PORT_OWNED;
:

READ THE IP REGISTER TO STIMULATE PORT POLLING.

IEHP =

_RC25_ADDR (RCIP, RC_ALL);

E GET THE COMMAND SLOT NUMBER FOR NEXT COMMAND
?ET_CHD_SLOT )

E CHECK THE END PACKET FOR GOOD STATUS

return REC_STATUS ();

! RETURN THE STATUS

end;

000034

0000006
000054
0000006
000017
000001

016716
012746
004767
005060
016716

[.CMD_SLOT,
(.CMD <LOT,
[.LMD_SLOT,
.CMD_SLOT,

VAX-11 Bliss-16 V4.0-579

E SET THE OWNERSHIP BIT TO 1 WHICH GIVE THIS SLOT TO THE PORT,

0000006
0000006
000054
0000006

166
00172
00176
00202
00206

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

0000006

0000026
0000026

0000006
000054
0000006
000360 0000026
0000006
000054
0000006
000002
0000036
0000006
000054
0000006
000000G 0000046
0000006
000054
0000006
0000066
0000006

000054

0000006
0000106
0000006

.SBTTL

REC.DATA AZTEC GLOBAL ROUTINE

CLR
MOV
MOV
JSR

1.AM.NEX
CMD.SLOT, -(SP)
054, -(SP)
PC,BL$MUL

MOV
MOV
JSR

CMD.SLOT, (SP)
054,-(SP)
PC.BL $HUL

MOV
MOV
JSR
BICB
MOV
MOV
JSR
MOVB
HOV
MOV
JSR
MOV
MOV
MOV
JSR
CLR

CMD.SLOT, (SP)
054, -(SP)
PC,
BL $MUL

CMD.SLOT, (SP)
054, -(SP)
PC,BL $MUL
SND . ENVELOPE +6(RO)

MOV

054.-(SP)

REC.DATA:
;
151

MOV

BICE
BISB

MOV

JSR
CLR
MOV

-(SP)

2746
2780
2785

034, SND . ENVELOPE(RO)
2786

017,SND.ENVELOPE+2(RO)
@1,SND.ENVELOPE«2(RO)
2787

9360,SND.ENVELOPE+2(RO)

CMD.SLOT, (SP)
054, -(SP)
PC.
BL $MUL

02.SND.ENVELOPE+3(R0)

CHD.SLOT,(SP)
054.-(SP)
PC, BL $MUL

CMD . REF , SND . ENVEL OPE +4(R0)

2788

2792

2793

CMD.SLOT, (SP)

2794

PC.BL $MUL
SND . ENVELOPE
» 10(RO)
CMD.SLOT, (SP)

2795

K12
IRCFBR2

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

v03.0

000212
000216
000222
000226
000232
000236
000242
000250
000254
000260
000264
000270
000274

000300
000304
000310

012746
004767
005060
016716
012746
004767
112760
016716
012746
004767

000054

0000006
0000126
0000006
000054
0000006

VAX-1 1 Bl Bliss-16 V4.0-5
.0- 79
USER$1: (AZTEC.CZRCFC)Z RCFC2.816;1

SEQ 0153
Page
58
(21)

054, -(SP)

PC,
BL $MUL

0000146

SND. ENVELOPE +12(R0)
CMO.SLOT, (SP)

2796

05 . SND . ENVEL OPE + 14(R0)
CMO. SLOT, (SP)

2797

054.-(SP)
PC.
BL $MUL
,
054, -(SP)

PC,

105060

016716
012746
004767
005060
016716
012746

27-Mar-1985 15:23:34
11-Jen-198S 08:19:19

BL $MUL

SND . ENVELOPE
+ 15(RO)
CMD.SLOT, (SP)

2798

054.-(SP)

PC, BLSMUL

SND. ENVELOPE
+ 16(R0)
CMD
. SLOT, (SP)

0000006
000000G 0000206
0000006

2799

054, -(SP)

PC, BL $MUL

BYTE.COUNT,
SND . ENVEL OPE + 20(RO)
CMD. SLOT, (SP)

2800

054, -(SP)

PC, BL $MUL

016716
012746
004767
016760
016716
012746
004767
005060
016716
012746
004767
005060
016716
012746
004767
005060
016716
012746
004767
005060
016716
012746
004767
005060
016700
006300
006300
066700
052760
017766
016600

004767

004767
062706

SND
. ENVELOPE +22(RO)
CMD.SLOT, (SP)

2801

054, -(SP)

000000G 0000246

PC
BL $MUL
.

BUF .DESCRPTR,
SND . ENVELOPE «24(R0)
CMD . SLOT, (SP)

2802

SNO . ENVELOPE
+ 26 (RO)
CMD.SLOT, (SP)

2803

SND . ENVEL OPE + 30(RO)
CMD
. SLOT, (SP)

054, -(SP)

2804

CMD.SLOT, (SP)

2805

054, -(SP)
PC,BL $HUL
054, -(SP)
PC,dL $MUL

0000006
0000326
0000006
000054
0000006
0000346
0000006
000054
0000006
0000366
0000006
0000006
100000
000002
000000G 000050
000050
000000V
000000V
000052

PC
BL $MUL
,
SND . ENVEL OPE + 32(RO)

054, -(SP)

PC.BL $MUL

SND . ENVEL OPE + 34(RO)
CMD.SLOT, (SP)

2806

PC,BL $MUL

SND . ENVEL OPE +36(RO)
ggD.SLOT.RO

2810

SEND.RING,RO
2100000,2(R0)
dRC25.ADDR,50(SP)
S50(SP),RO

PC,GET.CMD.SLOT
PC,REC.STATUS
052,5P

; *,RC.REG
; RC.REG,TEMP

2814

2818
2822
2746

L12
ZRCFAR2

v03.0

000564

27-Mar-1985
5:23:3 4
11-Jen-198S O 8:19:1 9

ARZTEC GLOBAL ROUTINE

000207

RTS

Routine Size:

187 words,

Maximum stack depth per

2824
2825
2826

MISCELLANEQUS SECTIONS

1
1
1

Rout ‘ne Base:
RB$CODE
invocation:
22 words

4730

VAX-11 B 1 iss-16 V4.,0-579
USER#$1:( AZTEC.CZRCFC)ZRCFC2.8B16;1

SEQ 0154
Pa

ge(21)

M12
MISCELLANEQUS SECTIONS

VAX-11 Blise-16 v4.,0-579

USER#$1:(AZTEC.C ZRCFCIZRCFC2.816; 1

global routine SET_CNTLR_CHAR -

IB IDIPID B o>

.0.

B I I B IS I P I P IP IP D ID P IB ID IO IO I

RRLNINLRINL NI PPV R PV R NI NI PO NI N NI AN P =t 50 Pt 1t 5t 5o 5 s it $0 50 Pt o0 P Pt Pt Pt ot Bt $® Bt $ it Pt P oot Pt

2827
2828
2829
2830

3
4
27-Mar-1985 15:23:3
11 Jon-1985 08:19:1 9

AZTEC GLOBAL ROUTINE

ORI

G 95 60 B0 G G0 00 90 00 U0 B¢ U G S G G¢ G0 G0 B¢ 4 G2 GF T GF O G 00 G0 G0 G G0 G0 Se G

ZRCFR2
v03.0

FUNCTION DESCRIPTION

THE SET CONTROLLER CHARACTER COMMAND IS USED 70 SET HOST

SETTABLE

UNIT CHARACTERISTICS AND OBTAIN THOSE UNIT CHARACTERISTICS THAT
ARE ESSENTIAL FOR PROPER CLASS DRIVER OPERATION.
THIS COMMAND
NEVER ALTERS
THE UNIT'S STATE ("UNIT-ONLINE", "UNIT AVAILABLE",
FORMAL

PARAMETERS

. NONE

IMPLICIT INPUTS
INPLICIT QUTPUTS
-

NONE

COMPLETEDTION CODES
RET_STATUS
RE7URN STATUS PASSES BACK TO THE CALLING ROUTINE

SIDE EFFECTS :

ANY PREVIOUSLY DEFINED CONTROLLER CHARACTERISTICS WILL POSSIBLY

BE ALTERED AFTERE EXECUTION OF THEIS COMMAND.
beg:n

locel

TEMP;

¢ UQ PORT COMMAND ENVELOPE HEADER FIELD DEFINITION

[]

SND_ENVELOPE [ .CMD_SLOT, MSG LENGTH) = SZ_SCC;

SND _ENVELOPE

SND_ENVELOPE

! LOAD MESSAGE LENGTH

[.CMO_SLOT, CREDITS) = ONE;

' LOAD CREDIT SIZE

(.CMD_SLOT, CONN_ID) = O;

* DEFINE CONNECTION ID 'DUP’

[.CMO_SLOT, MSG_TYPE] « 0;

' MESSAGE TYPE 'SEQUENTIAL'

g MSCP GENERIC COMMAND ENVELOPE FIELD DEFINITION

SND_ENVELOPE

SND _ENVELOPE
SND_ENVELOPE
SND_ENVELOPE

[.CMD_SLOT, CMD_LREF)

[.CMD_SLOT, CMO_MREF)
[ .CMD_SLOT, UN_LUSED]
{.CMO_SLOT,

SND_ENVELOPE [.CMD_SLOT, OPCOOE)
SNO_ENVELOPE [.CMD_SLOT, UQRSVD]

= .CMO_REF;
« ZERO;

= ZERO;

= OP_SCC;
= ZERO,

SND_ENVELOPE [ .CMDISLOT, MODIFIER) = ZERO;

'LOAD COMMAND REFERENCE ¢

! ZERO HI ORDER CMD REF @

! NOT USED IN DUP IMPLIMENT,
t NOT USED IN DUP TMPLIMENT.

! DEFINE COMMAND OPCODE
' NOT USED

! DEFINE CMD MODIFIERS

} COMMAND SPECIFIC COMMAND ENVELOPE FIELD DEFINITION

SND_ENVELOPE [.CMO_SLOT, MSCP_VER) = ZERQ;

! MSCP VERSION

SND_ENVELOPE

! TIME AND DATE WORD 0

SND_ENVELOPE [.CMO_SLOT, CTL FLAGS) = ZERQ; ! CONTROLLER GLAGS
SND _ENVELOPE [.CMDO_SLOT, HOSY TOU) = ZERO;
! HOST TIMEQOUT VALUE
SND_ENVELOPE [ .CMD_SLOT, RS$VD) = ZERO;
! RESERVED
[.CMD SLOT, T¢D O) = ZEROQ;

SEQ 0155

Page

60
(22)

N12
ZRCFR?2

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

UL LV L VLS L VT VTV T VY, VT VY VY 91,5 Y VY VY. VY, W W

2884
2885
2886
2887
2888
2889
2890
2891
2892
2893
2894
2895
2896
2897
2898
2899
2900
2901
2902
2903
2904
2905

v03.0

000000

005746

000002

016746

000006
000012

000016
000024
000030
000034
000040
000046
000054
000060
000064
000070
000076
000102
000106
000112
116
122
126

i32
140

144

150
154
160
164
170

00174
200

SND_ENVELOPE
(.CMDO_SLOT, T$D_1]
SNO_ENVELOPE [ .CMD_SLOT, T4D_2]
SNO_ENVELOPE [ .C“D_SLOT, T4D_3)

SND_ENVELOPE

VAX-1 1 Blisse-16 v4,0-579
USER4 1:(AZTEC.CZRCFC)ZRCFC2.816;1

SEQ

0156

Page

61
(22)

! TIME AND DATE WORD 1
! TIME AND CATE WORD 2
! TIME AND DATE WORD 3

! CNTL DEP PARAMETER LO WORD

COP_HI] = ZERO;

' CNTL DEP PARAMETER HI WORD

g SET THE OWNERSHIP BIT TO 1 WHICH GIVE THIS SLOT TO THE PORT.
?END_RING (.CMD_SLOT,
s

OWN_BIT)

= PORT_OWNED;

READ THE IP REGISTER TO STIMULATE PORT POLLING.

IEHP =

.RC25_ADOR [RCIP, RC_ALL];

s GET THE COMMAND SLOT NUMBER FOR NEXT COMMAND

§sr_cno_5Lo1 ()
g CHECK THE END PACKET FOR GOOD STATUS
return REC_STATUS ();

! RETURN THE STATUS

end;

.SBTTL
SET.CNTLR.CHAR AZTEC GLOBAL ROUTINE
SET.CNTLR.CHAR::
187
MOV

-(SP)
CMD. SLOT, - (SP)

JSR

PC, BL $MUL

MOV

CMD.SLOT,(SP)

;
;

2827
2862

054, -(SP)

;

2863

MOV

CMO.SLOT, (SP)

;

JSR

2864

PC,
BL $MUL

MOV

cMD. $LOT . (SP)

2865

;

2869

MOV

012760
016716
012746
004767
142760
152760
016716
012746
004767
142760
016716
012746
004767
105060
016716
012746
004767

0000006

MOV

0000026
0000026

JSR
BICB
BISB

MOV

0000026

BICB

MOV

012746

PC,BLSMUL
@17,SND.ENVELOPE<2(RO)
©01,SND.ENVELOPE«2(RO)

054

-(SP)

0360, SND.ENVELOPE+2(RO)

054, -(SP)

MOV

CMD.SLOT,

JSR

PC,
BL $MUL

MOV
MOV
JSR

cMD.sLot, (sP)
054, -(SP)
PC.BL $MUL

;

2870

MOV

CMD.SLOT,

;

2871

JSR

PC,BL $HUL

MOV

CMD.SLOT, (SP)

;

2872

MOV

CLR

0000106
0000006

040, SND . ENVELOPE(RO)

PC,BL $MUL

MOV
0000046

054, -(SP)

JSR

CLRB

016760
016716

005060
016716

= ZERO;
= ZERO,
« ZERO

{.CMD_SLOT, COP_LQ) » ZERba

?ND-ENVELOPE (.CMO_SLOT,

012746
004767

004767
005060
016716
012746
004767

27-Mer-1985 15:23:34
11-Jen-1985 068:19:19

MOV

CLR

SNO.ENVELOPE+3(RO)

054.-(SP)

(SP)

CMD
. REF , SND . ENVELOPE +4(RO)

SND. ENVELOPE +6(R0)

054, -(5pP)

(SP)

SNO. ENVEL+ OPE
10(RO)

B13
ZRCFB2

MISCELLANEOUS SECTIONS

v03.0

000204

AZTEC GLOBAL ROUTINE

012746

000054

000210

004767

000000C

000220

016716

0000006

000228
000230

052746
004767

000054
0000006

000252
000256

004767
105060

0000006
0000156

112760

000004

000242 016716 0000006
000246 012746 000054
000262

000266

016716

0000006

000054
0000006
0000166
0000006
000054
0000006
0000206
0000006
000054
0000006
0000226
0000006
000054
0000006
0000246
0000006
000054
0000006
0000266
0000006
000054
0000006
0000306
0000006
000054
0000006
0000326
0000006
000054
0000006
0000346
0000006
000054
0000006
0000366
0000006
000054
000000G
0000406
0000006
000054
0000006
000042G
0000006

11-Jen-1985 08:19:19

MOV

000214 005060 0000126

000234

27-Mer-1985 15:23:34

000014(

PC,BLS

MOV

CMD.SLOT,(SP)

SNO. ENVELOPE 12(RO)

cnb SLOT
054 -(SPS

;

2874

cno SLOT, (SP)

;

2875

;

2879

;

2880

;

2881

;

2882

;

2883

;

2884

;

2885

;

2886

;

2887

;

2888

;

2892

JSR
CLRB

PC,BL4
SNO. ENVELOPE 15(R0)

MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR
MOV
MOV
JSR
CLR

054 - spS
PC,BL
SND . ENVELOPEol6(R0)
CMD.SLOT, (SP)
054 -(SPS
PC,BL$
SND. ENVELOPEQO(RO)
CMD.SLOT, (SP)
054, -(SP)
PC,BL $MUL
SNO . ENVELOPE +22(RO)
CMD.SLOT, (SP)
054, -(SP)
PC,BL $MUL
SND. ENVELOPE 24(R0)
CMO.SLOT, (SP)
054, -(SPS
PC,BLIMUL
SND . ENVEL OPE +26(R0)
CMD.SLOT,(SP)
054, -(SP)
PC,BLSMUL
SNO.ENVELOPE
+ 30(RO)
CMD.SLOT, (SP)
954.-(SP)
PC., BLSMUL
SNO . ENVEL OPE + 32(R0)
CMD.SLOT, (SP)
054, -(SP)
PC, BLIMUL
SND. ENVELOPE
+ 34(RO)
CMD.SLO",(SP)
054, -(SP)
PC,BL $MUL
SND . ENVELOPE
+ 36(RO)
CMD.SLOT,(SP)
054, -(SP)
PC, BL $MUL
SND. ENVELOPEoAO(RO)
cno SLOT, (SP)
054.-(SP)
PC. BL $MUL
SND. ENVELOPE +42(R0)

MOV

:g\L/

9 225

2873

054, -(SP)
PC 8L ML

MOV
MOV

Page

;

MOV
JSR

MOVB

USER$1:(AZTEC.CZRCFCIZRCFC2.816;1

SEQ 0157

054 -(sp)

JSR

CLR

VAX-11 Bliss-16 V4.0-579

suo ENVELOPE 14(R0)

ggo .SLOT,RO

Cl3
MISCELLANEOUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFB2
v03.0

27-Mar-198S 15:23:34
11-Jen-1985 08:19:19

VAX-11 Bliss-16 V4.0-579

USER4#1: [AZTEC.CZRCFCJIZRCFC2.816;1

SEQ 0158
Page

(22)

SEND
. RING, RO

$100000, 2(R0)

SRC2S
. ADDR, S4(SP)
54(SP),R0O

PC,GET.CMD,SLOT
PC.REC.STATUS
056, SP
PC

: Routine Size:

i
:

198 words,

Maximum stack depth per

2906

2907
2908

1
1
1

Rout ine Base:

invocation:

24 words

RB$CODE « SS516

;

,RC.REG

; RC.REG, TEMP

2896

2900
2904
2827

D13
MISCELLANEQUS SECTIONS
ARZTEC GLOBAL ROUTINE

*
.

1]
.

[]
.

1
.

’

*
-

*
.

1]
-

.
.

1]
.

L)
.

.
.

1)
[

L)
.

[]

[]
.

L4
-

1)
-

1
-

L)
.

1)
-

L)
-

.
.

L
.

.
-

*
.

L)
-

[]
.

.
-

]

L)
)

L)
-

[
.

’
.

L)
.

[
.

.
.

[
.

14
-

[
.

14
.

[
-

[
.

[J
.

*
»

[
.

4
]

[
.

]
.

[
.

[
]

L
.

2909
2910
2911
2912
2913
2914
2915
2916
a7
2918
2919
2920
2921
2922
2923
2924
2925
2926
2927
2928
2929
2930
2931
2932
2933
2934
2935
2936
2937

2938
2939

2940
2941
2942
2943
2944
2945
2946
2947
2948
2949
2950
2951
2952
2953
2954
2955
2956
2957
2958
2959
2960
2961
2962
2963
2964
2965

global routine AVAILABLE =
Yoo

WAL

27-Mer-1985 15:23:34
11-Jan-1985 08:19:19

LD DRSS S US DS LS LV L VL NL VLT VTN T VL VT VY VYUY, Y0007, U1, ¥Y U1, U1, ¥Y, VY, VY, ¥Y VY, U] VT O O O O O O O Oy W Py Oy i O W Sy S

ZRCFR2
v03.0

VAX-11 Bliss-16 V4.0-579
USER41:(AZTEC.CZRCFC)ZRCFC2.816;1

! FUNCTIONAL DESCRIPTION :

THE AVAILABLE COMMAND IS USED TO SET THE UNIT-ABAILABLE WHEN
ALL OUTSTANDING COMMANDS FOR THE SPECIFIED UNIT ARE COMPLETED.

IF THE

"SPIN-DOWN” MODIFIER IS SPECIFIED,

THE DISK SPINS DOWN

AND ITS HEADS ARE UNLOADED.
FORMAL PARAMETERS

IMPLICIT INPUTS .

IMPLICIT QUTPUTS

SIDE EFFECTS

PLATTER NUMBER (UNIT)
RET_STATUS

begin

loceal

TEMP;

g UQ PORT COMMAND ENVELOPE HEADER FIELD DEFINITION
SND_ENVELOPE {.CHD_SLOT. MSG_LENGTH) = SZ_AVL;

! LOAD MESSAGE LENGTH

SNO_ENVELOPE

[.CMD_SLOT, CREDITS) = ONE;

! LOAD CREDIT SIZE

SND_ENVELOPE

[.CMD_SLOT, CONN_ID) = O;

! DEFINE CONNECTION ID 'DuP’

SND_ENVELOPE

[.CMD_SLOT, MSG_TYPE) = O;

! MESSAGE TYPE

'SEQUENTIAL'

g MSCP GENERIC COMMAND ENVELOPE FIELD DEFINITION
SND_ENVELOPE [.CMD_SLOT, CMD_LREF) = .CMD_REF;
!LOAD COMMAND REFERENCE #
SND_ENVELOPE [.CHO_SLOT. CMD_HREF
ZERQ;
! ZERQ HI ORDER CMD REF #

SND_ENVELOPE

SNO_ENVELOPE

SND_ENVELOPE
SND_ENVELOPE

(.CMD_SLOT, UN_LUSED

.UNIT; 1 SELECTED UNIT

{.CMD_SLOT, UN HUSED] = ZERO;

(.CMD_SLOT, OPCODE]
[.CMD_SLOT, UQRSVD]

= OP_AVL;
= ZERO;

SND_ENVELOPE [.CMD_SLOT, MODIFIER) = MD_SPD;

! NOT USED IN DUP IMPLIMENT.

! DEFINE COMMAND OPCODE
! NOT USED

' DEFINE CMD MOUDIFIERS

! SET THE OWNERSHIP BIT TO 1 WHICH GIVE THIS SLOT TO THE PORT.

SEND_RING [.CHMD_SLOT, OWN_BIT] = PORT_OWNED:

READ THE IP REGISTER TO STIMULATE PORT POLLING.

TEMP = _RC25_ADOR [RCIP, RC_ALL);
GET THE COMMAND SLOT NUMBER FOR NEXT COMMAND

GET_CMD_SLOT (J;

CHECK THE END PACKET FOR GOOD STATUS
return REC_STATUS ();

RETURN THE STATUS

SEQ_0159
Page
64
(23)

ZRCFR2

MISCELLANEQUS SECTIONS

V03.0
:

27-Mer-1985 15:23:34

AZTEC GLOBAL ROUTINE

2966

11-Jan-1985 08:19:19

VAX-11 Bliss-16 V4.0-579

USER$1:[AZTEC.CZRCFCJIZRCFC2.816;1

.SBTTL

AVAILABLE AZTEC GLOBAL ROUTINE

AVAILABLE::

016746

0000006

TsT
MOV

-(SP)
CMD.SLOT,-(SP)

;
;

004767
012760
016716

0000006
000014 0000006
000000G

JSR
MOV
MOV

PC,
BL $MUL
014, SND . ENVELOPE(RO)
CMD.SLOT ,(SP)

;

004767
142760

0000006
000017 0000026

JSR
BICB

PC,
BL $MUL
@17,SND.ENVELOPE.2(R0)

MOV

CHD. SLOT, (SP)

012746

000054

152760

000001

012746
004767

000054
0000006

016716

0000006

016716

142760

012746

0000006

000360

0000026

MOV

BISB

#54,-(SP)

054, -(SP)

01,4ND.ENVELOPE-2(RO)

MOV
JSR

054 -(SP)
PC.BLIMUL

MOV

CMD.SLOT, (SP)

JSR

PC,BLSMUL

054, -(SP)

BICB

000054

MOV

0000036
0000006

CLRB
MOV

0360,SND.ENVELOPE+2(R0)
054 -(SP)

004767

0000006

012746

000054

MOV

016760
016716

000000G 0000046
0000006

MOV
MOV

0000006

JSR

PC,
BL $MUL

016716 0000006

MOV

CMD.SLOT, (SP)

012746

MOV

105060
016716
004767
012746

004767

005060

0000006
000054

0000066

012746
004767
016760
016716

000054
0000006
0000006 0000106
0000006

004767
005060
016716

0000006
0000126
0000006

000054

012746 000054
004767

112760
016716

012746
004767
105060

0000006

SND.ENVELOPE+3(R0)
CMD.SLOT, (SP)

JSR

PC, BL $MUL

MOV

054.-(SP)

CLR

CMO
. REF , SND . ENVELOPE +4(R0)
CMD.SLOT, (SP)
SND . ENVELOPE +6(RO)

(23)

0000006
100000
000002
000000G 000030

2938

;

2942

;

2943

JSR
CLR
MOV

PC.
BL $MUL
SND . ENVELOPE +12(R0)
CMD
. SLOT, (SP)

;

2946

JSR

PC,BL $MUL

MOV

0#54,-(SP)

;

2947

;

2948

;

2952

MOV

054 -(SP)

0000006

;

2945

MOV

000001
0000166
0000006

2937

;

054, -(SP)

PC,
BL $MUL
SNO.ENVELOPE«15(R0)

012760
016700
006300
006300
066700
052760
017766

;

2944

JSR
CLRB

000054

2936

;

0000006
0000156

012746

954, -(SP)
PC,
BL $MUL
UNIT,SND.ENVELOPE+10(RO)
CMD. SLOT, (SP)

MOVB
MOV

000054

2909
2935

MOV
JSR
MOV
MOV

000010 000014G
0000006

016716 0000006
004767

Page

end;

005746

012746

SEQ 0160

MOV
JSR

MOV
MOV
ASL
ASL
ADD
BIS
MOV

010, SND.ENVELOPE.14(R0)
CHD.SLOT, (SP)

CMD.SLOT, (SP)
PC,BL $MUL

01 .SND. ENVELOPE +16(R0)
CMO.SLOT,RO
RO
RO
SEND.RING,
RO
2100000, 2(R0O)
dRC2S.ADDR,30(SP)

*,RC.REG

2956

F13
MISCELLANEOUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFB2

v03.0

000336
000342
000346

000352
000356

016600
004767
004767
062706
000207

000030
000000V

000000V
000032

27-Mar-1985 15:23:34
11-Jan-198S 08:19:19
MOV
JSR

JSR
ADD

RTS

30(SP),RO
PC,GET.CMD.SLOT
PC,REC.STATUS
032,5P
PC

Routine Size:
120 words,
Rout ine Base:
ABSCODE . 6332
: Maximum stack depth per invocation:
14 words

:
H
H

2967
2968
2969

1
1
1

VAX-11 Blies-16 V4,0-579

USER#$1: (AZTEC.CZRCFC)ZRCF(C2.816;1
3

SEQ 0161
Page

(23)

RC.REG,TEMP

2960
2965
2909

G13
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

*
.

.
.

[
.

L]
.

1]
-

.
.

[

.
-

1]
.

]
-

L
.

[]

L
*

L)
.

[]
.

L)
.

L
.

.
-

1]
.

.
[

[
-

L]
.

.
.

L
.

.
-

.
.

[

»
.

[
.

’

*
.

L]
.

[
.

[]
.

[
.

[4
.

[
.

.
.

.
-

[
.

[
-

[
.

.
-

[

[
-

[
.

L
.

’
.

.
-

[
.

[

2970
2971

2972
2973
2974
2975
2976
2977

2978

2979
2980
2981
2982
2983
2984
2985
2986
2987
2988
2989
2990
2991
2992
2993
2994
2995
2996
2997
2998
2999
3000
3001
3002
3003
3004
3005

3006
3007
3008
3009
3010
3011
3012
3013
3014
3015
3016
3017
3018
3019
3020
3021
3022
3023
3024
3025
3026

OV RV LRV ALV RV AV RV LV VAL DTV N P NI NV NI ND NI NI NI N 10 10 1t et Pt hs 18 et Pt ot o P

s 3 P Pt s i P it s st pt e e o ot s Pt s

ZRCFR2
v03.0

27-Mar-1985 15: 23:34
11-Jan-1985 08: 19:19

VAX-11 B liss-16 v4.0-579
USER$1:
( ARZT EC.CZRCFC)ZRCFC2.B16;1

global routine ON_LINE =
Yao

FUNCTIONAL DESCRIPTION

THE ONLINE COMMAND IS USED TO BRING A UNIT

“UNIT-ONLINE,

HOST SETTABLE UNIT CHARACTERISTICS AND OBTAIN THOSE UNI?

SET

CHARACTERISTICS THAT ARE ESSENTIAL FOR PROPER CLASS DRIVER
OPERATION.
THE UNIT IS SPUN-UP,
IF NECESSARY, AND IS HEADS

ARE LOADED PRIOR TO RETURNING THE ONLINE COMMAND'S END MESSAGE.
HOST SETTABLE CHARACTERISTICS COMMAND WERE ISSUED.
HOST

SETTABLE
CHARACTERISTICS
ARE_SET AFTER
THE UNIT HAS BEEN
SUCCESSFULLY SPUN-UP AND ANY OTHER VALIDITY CHECKS HAVE SUCCEDED.
FORMAL PARAMETERS
- NONE -

IMPLICIT INPUTS

INPLICIT OUTPUTS

RET_STATUS

COMPLETEDTION CODES :
RET_STATUS

RETURN STATUS PASSES BACK TO THE CALLING ROUTINE

SIDE EFFECTS :

ANY PREVIQUSLY DEFINED CONTROLLER CHARACTERISTICS WILL POSSIBLY

BE ALTERED AFTERE EXECUTION OF THEIS COMMAND.

begin
local

TEMP;

5 UQ PORT COMMAND ENVELOPE HEADER FIELD DEFINITION

SND_ENVELOPE [.CMD_SLOT, MSG_LENGTH] = SZ ONL;
! LOAD MESSAGE LENGTH
SND_ENVELOPE
[.CMD_SLOT, CREDITS]) = ONE;
! LOAD CREDIT SIZE
SNO_ENVELOPE
[.CMD_SLOT, MSG_TYPE] = 0;
! MESSAGE TYPE 'SEQUENTIAL'’

SND_ENVELOPE

[.CMD_SLOT, CONN_ID) = 0;

! DEFINE CONNECTION ID 'DUP’

E MSCP GENERIC COMMAND ENVELOPE FIELD DEFINITION

SND_ENVELOPE [.CMD_SLOT,
SND_ENVELOPE (.CMD_SLOT,
SND_ENVELOPE [.CMD_SLOT,
SND_ENVELOPE [.CMD_SLOT,

CMD_LREF)
CMD_HREF)
UN_LUSED)
UN HUSED]

= .CMO_REF;
!LOAD COMMAND REFERENCE ¢
= ZERQ;
! ZERQ HI ORDER CMD REF @

= .UNIT;
= ZERO;

SND_ENVELOPE [.CMD_SLOT, OPCODE] = OP_ONL;
SND_ENVELOPE
SND_ENVELOPE

[ .CMD_SLOT, UQRSVD) = ZERO;
(.CMD_SLOT, MODIFIER]) = ZERO;

! SELECTED UNIT
! NOT USED IN DUP IMPLIMENT.

! DEFINE COMMAND OPCODE
! NOT USED
! DEFINE CMD MODIFIERS

z COMMAND SPECIFIC COMMAND ENVELOPE FIELD DEFINITION

SND_ENVELOPE
SND_ENVELOPE

(.CMD_SLOT, RSV$D) = ZERO;
(.CMD_SLOT, UNT_FLAGS) = ZERO;

! RESERVED
! UNIT FLAG FIELD

SEQp0162
age

(24)

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

3034

3035
3036
3037
3038
3039
3040
3041
3042

3043
3044
3045

04
®s B0

SND_ENVELOPE
SND_ENVELOPE
SND_ENVELOPE

SND _ENVELOPE

SND_ENVEL
OPE
SND_ENVELOPE
SNO_ENVELOPE
SND_ENVELOPE
?ND_ENVELOPE

.CMD_SLOT, RSVD$0

.CMD_SLOT,
.CMD_SLOT,
.CMD_SLOT,
.CMD_SLOT,

.CMD_SLOT,

.CMD_SLOT,
-CMD_SLOT,
.CMD_SLOT,
.CMD_SLOT,

RSVD$1
RSVD$2
RSVD$3
RSVD44

Z CFC]ZRCFC2 Blé;1

(24)

! RESERVED FIELD
!
!
!
!
!
!

RESERVED FIELD

g SET THE OWNERSHIP BIT TO 1 WHICH GIVE THIS SLOT T0 THE PORT.
%END_RING (.CMD_SLOT, OWN_BIT) = PORT_OWNED;
g READ THE IP REGISTER TO STIMULATE PORT POLLING.

fsnp = ,RC25_ADDR [RCIP, RC_ALL);

g GET THE COMMAND SLOT NUMBER FOR NEXT COMMAND
GET_CMD_SLOT ();

} CHECK THE END PACKET FOR GOOD STATUS
return REC_STAWUS ();
end;

! RETURN THE STATUS

.SBTTL

0000006
000044
0000006

0000006
000017
0000026
000001
000002G
0000006
0000006
000360
0000026

MOV

JSR

MOV
MOV
MOV

JSR
8IC8
8158

MOV
MOV

JSR

8ICB

MOV
MOV

JSR
CLRB

06
000000G 000004G

005060

ZEROQ;

SEQ 0163

RESERVED FIELD
RESERVED FIELD
RESERVED FIELD
RSVD$S
RESERVED FIELD
DDP_LO
DEVICE DEPENDENT PARAMETER
DDP HI
Z ER0;
DEVICE DEPENDENT PARAMETER
SHABOW_UNIT] = ZERO;
! SHADOW UNIT
COPY_SPEED) = ZERO;
! COPY SPEED

ON.LINE::
TST
MOV

000154

ZERQ;
m
Pl

SND_ENVELOPE

eV LV S LV L VL VLNV LV, E Y V1,07 V1, V1, V7, V1,87, ¥, §1 S 1.¥Y,¥Y, VY, ¥Y, VY. ¥

3027
3028
3029
3030
3031
3032
3033

VI B G0

0 G0 VI T2 V0

B¢ TVC

B0 Ve Ve Ve CF

Wo V6 ¢ G0 Vs B G Gs S

v03.0

27-Mer-1985 15:23:
11-Jen-198S 08:19:

ZRCFR2

0000066

MOV
MOV

ON.LINE AZTEC GLOBAL ROUTINE
-(SP)
CMD. SLOT, -(SP)

054, -(SP)
PC, BL $MUL

044, SND. ENVELOPE(RO)

CMD.SLOT,(SP)

654.-(5P)

3009

CHD.SLOT, (SP)

3010

PC,BL $MUL
017, SND . ENVELOPE +2(RO)
01,5ND. ENVELOPE -2(R0)

054, -(SP)

PC,BL $MUL
0360.SND.ENVEL0P502(R0)

CMD. SLOT.(SP)

3014

PC, BL $MUL

SND. ENVELOPE
+ 3(RO)
CMD.SLOT,(SP)

054,-(SP)

JSR

PC, BL $MUL

JSR
CLR

054, -(SP)
PC
BL $MUL
,
SND . ENVELOPE +6(R0)

MOV
MOV
MOV

2970
3008

CMD. REF , SND . ENVEL OPE +4(R0)
CMD . SLOT, (SP)

3015

3016

113
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFB2
v03.0
000160
000164
000170
000174
000202
000206

000212
000216
000222
000226
000232
000236
000244
000250
000254
0002690
000264
000270
000274
000300
000304
000310
000314
000320
000324
000330
000334

016716
012746
004767
016760
016716
012746
004767
005060
016716
012746
004767
112760
016716
012746
004767
105060
016716
012746
004767
005060
016716
012746
004767
005060
016716
012746
004767
005060
016716

0000006
000054
0000006
0000006 000010G
0000006
000054
0000006
0000126
0000006
000054
0000006
000011
000014G

11-Jen-198S 08:19:19

MOV
MOV

JSR

MOV
MOV
MOV

JSR
CLR

MOV
MOV

JSR

MOVB
MOV
MOV

JSR
CLRB

MOV
MOV

#54 . -(SP)

PC, éLon

JSR
CLR

MOV
MOV

JSR
CLR

MOV
MOV

JSR
CLR

Hov
MOV

JSR
CLR

MOV
MOV

JSR
CLR

MOV
MOV

JSR
CLR

MOV
MOV

JSR
CLR

MOV

(24)

3017

3018

cao SLOT,(SP)

3019

054 : SPS
Né ENVELOPEol?(RO)
054.-(SP)

PC, éLs

011, SND. ENVELOPEold(RO)

CMD
. SLOT, (SP)

054.-(SP)

3020

PC., BL $MUL

SND. ENVELOPE
+ 15(R0)
cao SLOT,(SP)

-(SP)

MUL
SND.ENVELOPE +20(R0)

MOV
MOV

SEQ 0164

UNIT,SND. ENVELOPE 10(RO)

JSR
CLR

VAX-11 B liss- 16 v4.0-579
AZTE C.CZRCFC)ZRCFC2.B16;1
USER$1: [AZ

cMD. $LOT

pc eLs

MOV
MOV

0000006

CMD.SLOT, (SP)

JSR
CLR

MOV
MOV

012746

004767
005060
016716
012746
004767
005060
016716
012746
004767
005060
016716
012746
004767
005060
016716
012746
004767
005060
016716
012746
004767
005060
016716
012746
004767
005060
016716

27-Mar-1985 15:23:34

SND. ENVELOPE+ 16(RO)
CMD
. SLOT, (SP)

cHO . s o .(SP)
054 . -

PC, éLs

SND. ENVELOPE 22(R0O)
CHD. SLOT, (SP)

054 (SPS

3021

3025

3026

3027

PC.BLSMUL

SND. ENVELOPE +24(RO)
CMD. SLOT, (SP)

3028

PC
BL $MUL
,

SND . ENVELOPE +26(R0)
CMD
. SLOT, (SP)

054, -(SP)

3029

PC.BL$HUL

SNO.ENVEL
OPE + 30(RO)
CMD. SLOT, (SP)

054.-(SP)

3030

PC, BL$MUL

SND. ENVELOPE 32(R0O)

CMD. SLOT, (SP)

054.-(SP)

3031

PC, BL $MUL

SND. ENVELOPE
+ 24 (RO)
CMD.SLOT, (SP)

054, -(SP)

3032

PC,BL $MUL

SND. ENVELOPE 36(R0O)
CMD.SLOT, (SP)

054.-(SP)

3033

PC, BL $MUL

SND.ENVELOPEodO(RO)
CMD.SLOT, (SP)

3034

J13
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFR2

vV03.0

000530
000534
000540
000544
000550
000554
000560
000564
000570
000574

012746
004767
005060
016716
012746
004767
005060
016716
012746
004767

000054

MOV

0000006
0000426

CMD.SLOT, (SP)

0000006

MOV

CMD. SLOT, (SP)

0000006

JSR

PC,BL $MUL

MOV

CMD . SLOT,
RO

CLR

000054

MOV

0000466

CLR

100000

ASL
ASL

000002

000000G 000060
000060
000000V
000000V
000062

ADD

BIS

MOV
MOV
JSR
JSR
ADD
RTS

SND . ENVELOPE +44(RO)
054, -(SP)

SND . ENVELOPE +46(RO)

RO
RO

3054

;3056

1
1
1

Page

(24)

;

303S

;

3036

;

3040

SEND .RING,RO

2100000, 2(R0)

SRC2S
. ADDR, 60(SP)
60(SP),R0
PC,GET.CMD.SLOT
PC.REC.STATUS
062, 5P
PC

215 words,
Routine Base:
ABSCODE . 6712
: Routine Size:
26 words
: Maximum steck depth per invocation:

3055

USER$1:(AZTEC.CZRCFC)ZRCFC2.B16;1

SEQ@ 0165

SNO . ENVELOPE +42(RO)

‘

0000006

062706
000207

MOV

054 -(SP)
PC, BL $MUL

0000006

000650
000654

PC,BL$MUL

MOV
JSR

oooo4ag

)

VAX-11 Bliss-16 V4,0-579

054, -(SP)

JSR

CLR

0000006
000054

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

; ¢,RC.REG
;

;

RC.REG,TEMP

3044
3048
3052

2970

{13

.
.

*
[y

.
-

.
.

.
-

1]
.

.
-

*
.

.
.

3057
3058
3059
3060
3061
3062
3063
3064
3065
3066
3067
3068
3069
3070
3071

L)
-

14
.

.
-

14
-

.
.

1)
.

.
.

L)
-

[
.

[]
.

L)
-

[4
.

.
-

[

[
.

.
.

[
-

[
.

[

3099

L
-

[]

[
.

3103

[]

[
.

[
-

L
.

[]
.

[
-

[
.

3107
3108
3109
3110
3111
3112
3113

AL L NN L ALY NV RV TV N AL PV AL NI NI NI D N =0 =0 10 §=0 10 1t Jotd b 10 $t oot bt i P it et P Bt P

ORIV ALV

s P P $m P P et it P P Pt

v03.0
1

27-Mar-1985 15:23:34
11-Jan-1985 08:19:19

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFB2

VAX-1 18l i89-16 V4,0-579

USER4$1: (AZTEC.CZRCFC)ZRCFC2.816;1

?lobal routine READ_CMD =
! FUNCTIONAL DESCRIPTION :
!
THE READ COMMAND IS USED TO READ FROM THE UNIT AND TRANSFER
TO THE HOST BUFFER.

READ _CMD MAY BE CONSIDERED AS SEEK COMMAND

IF THE BYTE_COUNT WAS ZERO.

IF THE FLAG TIP CONTAINS ALL ONES,

THEN THIS ROUTINE WILL NOT

CALL REC_STATUS AND WAIT FOR ENO PACKET STATUS INFO. THIS IS

DONE T0 QUEVE SEEK COMMANDS FOR THE CONTROLLER IN SOME TESTS.
IF CMOD CONTAINS MD EXP BIT AS THME COMMAND MODIFIER,

THEN

SEEKS WILL BE DONE BY THE CONTROLLER IN THE ORDER RECEIVED
AND WILL NOT BE OPTIMIZED.

FORMAL PARAMETERS

- NONE

IMPLICIT INPUTS
INPLICIT OQUTPUTS

ggSODESCRPTR.BYTE_COUNT, UNIT, LBN_ST,
:

TIP,

RET_STATUS

COMPLETEDTION CODES :
RET_STATUS

SIDE EFFECTS
-

NONE

RETURN STATUS PASSES BACK TO THE CALLING ROUTINE

begin

loceal

TEMP;

z UQ PORT COMMAND ENVELOPE HEADER FIELO DEFINITION

SND_ENVELOPE [.CMD_SLOT, MSG _LENGTH) = SZ RD;

SND _ENVELOPE (.CMD_SLOT, CREDITS) = ONE;

SND_ENVELOPE
SND_ENVELOPE
E

[.CMD_SLOT, MSG_TYPE] = O;
[.CMD_SLOT, CONN_ID) = 0;

! LOAD MESSAGE LENGTH
! LOAD CREDIT SIZE
! MESSAGE TYPE
! DEFINE CONNECTION ID

MSCP GENERIC COMMAND ENVELOPE FIELO DEFINITION

SND_ENVELOPE
SND_ENVELOPE
SND_ENVELOPE
SND_ENVELOPE

SND_ENVELOPE
SND_ENVELOPE

(.CMD_SLOT,
([.CMD_SLOT,
[.CMD_SLOT,
[.CMD_SLOT,

CMD_LREF)
CMD_HREF)
UN_LUSED)}
UN_HUSED)

[.CMD_SLOT, OPCODE)
[.CMD_SLOT, UQRSVD]

= ,CMD_REF;
'LOAD COMMAND REFERENCE @
= ZERO;
! ZERO HI ORDER CMD REF @
= .UNIT; ¢ SELECTED UNIT
= ZERO;
! NOT USED IN DUP IMPLIMENT.

= OP RD;
= ZERO;

SND_ENVELOPE (.CMD_SLOT, MODIFIER) =

.CMOD;

! DEFINE COMMAND OPCGDE
' NOT USED
!

DEFINE CMD MODIFIERS

z COMMAND SPECIFIC COMMAND ENVELOPE FIELD DEFINITION
SND_ENVELOPE [.CMD_SLOT, BLO_CNT) = .BYTE_COUNT;
! BYTE COUNT LOW WORD
SND_ENVELOPE [.CMD_SLOT, BHI_CNT) = ZERO;
! BYTE COUNT HIGH WORD

SEQ 0166

Page

71
(25)

——

L13
MISCELLANEQUS SECTIONS

27-Mer-1985 15:23:34
11-Jen-1985 08:19:19

AZTEC GLOBAL ROUTINE

3114
311S
3116
3117
3118
3119
3120
3121
3122
3123
3124
3125
3126
3127
3128
3129
3130
3131
3132
3133
3134
3135
3136
3137
3138
3139
3140
3141
3142

LAV US LV VL VLV LV LV LV SL VLV VLV VT V1, VY V1L V1,0 VY 91, V1,57, V1. V1. ¥

B B8 B9 B2

W0 B4 G0 V6 V0 Ce Ve VP G0 V6 Ve G0 GV G G0 0 TP 00 G0

Vs Vs B0

Ve Ss @0

ZRCFR2
v03.0

SND_ENVEL
OPE
SND_ENVEL
OPE
SND_ENVELOPE
SND_ENVEL
OPE
SND_ENVELOPE
SND_ENVELOFE
SND_ENVEL
OPE
§ND_ENVELOPE

012746

BD_0)
=
BD
1] =
BDZ2]
=
BD_3]
=
BD
4] BD-S)
=
LBN_LO)
LBNZHI)

.BUF_DESCRPTR;
! BUFFER DESCRIBTOR FIELD
ZERO;
' BUFFER DESCRIBTOR FIELD
ZEROQ,
i BUFFER DESCRIBTOR FISLD
ZERO:
i BUFFER DESCRIBTOR FIELD
ZERD;
i BUFFER DESCRIBTOR FIELD
ZERO,
! BUFFER DESCRIBTOR FIELD
= .LBN_ST; ! LOGICAL BLOCK NUMBER
= ZERO;
! LOGICAL BLOCK NUMBER

g SET THE CWNERSHIP BIT T0 1 WMICH GIVE THIS SLOT TO THE PORT.
§e~o-a1~c {.CMO_SLOT, OWN_BIT) = PORT_OWNED;
if .TIP eqlu %0'177777'
s

then return RET_STATUS = PAS_CODE;
!

IF TIP CONTAINS

ALL_ONES EXIT HERE

READ THE IP REGISTER T0 STIMULATE PORT POLLING.

jsnp « .RC2S_ADDR [RCIP, RC_ALL]):

g GET THE COMMAND SLOT NUMBER FOR NEXT COMMAND
GET_CMD_SLOT

();

! CHECK THE END PACKET FOR GOOD STATUS
return REC_STATUS ();

! RETURN THE STATUS

end;

.SBTTL
REARD.CMD:
:
187

005746
016746
012746
004767
012760
016716
012746
004767
142760
152760
016716
012746
004767
142760
016716
012746
004767
105060
016716
012746
004767
016760
016716

[.CMD_SLOT,
[ .CMDTMSLOT,
.CMO_SLOT,
.CMOZSLOT,
.CMDZSLOT,
.CMO_SLOT,
[.CMD_SLOT,
.CMDZSLOT,

SEQ 0167
Page
72
USER$1:[AZTEC.CZRCFC)ZRCFC2.B16;1
(25)

VAX-11 Blies 16 V4,0-579

MOV
MOV

0000006

0000026
0000026

0000026

0000006
000054

-(SP)
CHD. SLOT

054,-(SP)

-(SP)

JSR

PC,BL $MUL
040, SND . ENVELOPE(RO)

MOV
JSR
BIC8
8158

054,

-(SP)

017,

SND . ENVE
OPE «L
2( RO)

MOV
MOV

JSR
8IC8B

MOV
MOV

CMD . SLOT, (SP)

01, SND . ENVELOPE
- 2(R0)

cMO.SLOT, (SP)
054.

(SP)

0360, SND. ENVEL OPE +2(RO)

CMD. SLOT . (SP)

MOV
JSR

054, -(SP)

MOV

3096

3097

PC.BL $MUL
PC,BL $MUL

MOV
MOV

3057
3095

PC,BL ML

JSR
CLR8

MOV

0000046

READ.CMD AZTEC GLOBAL ROUTINE

SND . ENVELOPE
« 3(RO)

CMD.SLOT,(SP)

3098

3102

PC,BL $MUL

CMD. REF , SND . ENVEL OPE +4(R0)

cMD.sLot’ (sP)
054,-(SP)

3103

M13

000150
000154

000160
000164

000170
000174
000202
000206
000212
000216
000222
000226
000232
000236
000244
000250
000254

000260
000264

000270
000274
000300
000306
000312
000316
000322
000330
000334

27-Mer-198S | 5:23:34
11-Jen-198S O 8:19:19

ELLANEQUS SECTIONS
C GL GLOBAL ROUTINE

ZRCFA2
v03.0

004767
005060
016716
012746
004767
016760
016716
012746
004767
005060
016716
012746
004767
112760
016716
012746
004767
105060
016716
012746
004767
016760

JSR
CLR

MOV
MOV

JSR

MOV
MOV
MOV

JSR

MOV
MOV

0000146

JSR

Move
MOV

MOV

JSR
CLRR

MOV
MOV

JSR

MOV
MOV
MOV

016716
012746

016760
016716

0000206

JSR

MOV
MOV
MOV

JSR
CLR

MOV
MOV

0000246

JSR

MOV
MOV
MOV

JSR
CLR

MOV
MOV

ge(25)

CMD. SLOT.(SP)

;

3105

SNO
. ENVEL
OPE + 12(RO)
CMD.SLOT, (SP)

;

3106

;

3107

CMD.SLOT,(SP)

;

3108

CMOD, SND . ENVELOPE
» 16(R0)
CHD. $LOT.(SP)

;

3112

CMD. SLOT, ($P)

;

3113

;

3114

;

3115

;

3116

;

3117

;

3118

;

3119

;

3120

054 . -(SP)
PC,BL $HUL
054, -(SP)
PC,BL $MUL

041, SND . ENVELOPE
« 14(R0)

CMD. SLOT, (SP)

054, -(SP)

PC,BL $MUL

SNO . ENVELOPE
+ 15(R0)

054 -(SP)
PC,BL ML

054 -(SP)
PC,BL $MUL
8Y1E.COUNT,
SND . ENVEL OPE « 20(R0)
054, -(SP)

PC,BLSMUL

SNO . ENVEL OPE + 22(R0)

CHD.SLOT, (SP)

054 -(SP)
PC.BL $MUL

BUF . DESCRPTR , SND . ENVEL OPE + 24(R0)

CMD.SLOT, (SP)
054, -(SP)

PC,BL $MUL

SND . ENVELOPE
+ 26 (RO)

CMD.SLOT, (SP)

054, -(SP)

PC, BL $MUL

JSR

3104

JSR
CLR

MOV
MOV

054 -(5P)
PC, BL $MUL
UNIT, SND. ENVELOPE
« 10(R0)

PC,BL $HUL

JSR
CLR

]

CMO.SLOT,(SP)

JSR
CLR

MOV
MOV

0000006

SNO
. ENV LOPE +6(RO)

PC,BL $MUL

MOV
MOV

SEOp0168

PC,BL IMUL

JSR
CLR

MOV
MOV

VAX-1 18 1 iss-16 V4,0-57 9
USER$ 1:( AZ TEC.CZRCFC]ZR CFC2.B16;1

SNO . ENVEL OPE « 30(R0)
CMD . SLOT,(SP)

SNO . ENVEL OPE + 32(RO)

CMD
. SLOT, (SP)

SND . ENVELOPE
+ 34(RO)

CMD
. SLOT, (SP)

054, -(SP)

PC
BL $MUL
,

SND . ENVELOPE
+ 36(R0)
CMD.SLOT, (SP)

054,-(SP)

PC,BL $MUL

v03.0

016760
016716
012746

27-Mer-198S 15:23:34
11-Jen-1985 08:19:19

000000G 0000406
0000006
000054
0000006
0000426
0000006

VAXUSER

'—"m
DD—

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFR2

.-.5..

N13
1 v4,0-579

LBN.ST s~o ENVELOPE‘40(RO)

CMD. SLOT

054, -(SP3

CZRCFCIZRCFC2. 816;:1

SEQ 0169

(25)
3121

PC,BL IMUL

SND. ENVELOPE +42(R0)

ggo.SLOT,RO

3125

SEND.RING,R

:1000002(90)

000002

17717717

3128

RET.STATUS
054.5P

005726
000207

; Routine Size:

:
:
:

Maximum steck

3143
3144
3145

e futt Pt

24:

214 words,

depth per

PC,GET. CHD SLOT
PC,REC.STATUS
054, SP
RTS

Rout
ine Base:
.
RB$CODE
invoceation
24 words

(5p)%

. 7570

:
®e

54(SP),R

8RC25, ADDR 54(SP)

14:

0000006 000054

¢,RC.REG

RC.REG, TEMP

3133

3137
3141

3057

ZRCFB2

MISCELLANEQUS SECTIONS

v03.0

3146
3147

H
H

3149
g{gg

!
s

3152
3153
3154
31SS
3156
3157
3158
3159
3160

1
1§
1
1
1
1
1
1
1

'
'
H
¢
!
'
'
'
!

:
H
:
3
H
i
:
:
H
:

3148 1

gigé

3163

3164

:
:
:

3167
3168
3169

2
2

3170

27-Mer-1985 15:23:34

AZTEC GLOBAL ROUTINE

Bl4

11-Jen-1985 08:19:19

' FUNCTIONAL DESCRIPTION:
.

THE GET UNIT STATUS COMMAND IS USED TO READ THE CURRENT
STATE OF THE UNIT, PLUS CERTAIN UNIT CHARACTERISTIACS.

FORMAL PARAMETERS :
- NONE IMPLICIT INPUTS

UNIT

INPLICIT OUTPUTS :

RET_STATUS

COMPLETEDTION CODES :
RET_STATUS

RETURN STATUS PASSES BACK TO THE CALLING ROUTINE

' SIDE EFFECTS :

begin

local

TEMP;

3171
3172
3173
g};g

2
2
2
g

!
z UQ PORT COMMAND ENVELOPE HEADER FIELD DEFINITION

3176

SND_ENVELOPE E.CHD_SLOT. MSG_LENGTH] = SZ_GUS;

gigg

glgé

:
:
:
:

3183
3184
3185
3186

2
2
2
2

:
:

3177
3178
1

2
2

SND_ENVELOPE {.CMD_SLOT, CREDITS) = ONE;
SND_ENVELOPE [.CMD_SLOT, MSG_TYPE) = 0:

SNO_ENVELOPE [.CMD_SLOT, CONN_ID] = 0;

! LOAD MESSAGE LENGTH

! LOAD CREDIT SIZE
! MESSAGE TYPF

' DEFINE CONNL_TION ID

! MSCP GENERIC COMMAND ENVELOPE FIELD DEFINITION

SND_ENVELOPE
SND_ENVELOPE
SND_ENVELOPE
SND_ENVELOPE

[.CMD_SLOT,
(.CMD_SLOT,
[.CMD_SLOT,
[.CMD_SLOT,

CMD_LREF)
CMD_HREF )
UN_LUSED)
UN_HUSED)

=
=
=
=

,CMD_REF;
'LOAD COMMAND REFERENCE ¢
ZERQ;
! ZERO HI ORDER CMD REF @
.UNIT; ! SELECTED UNIT
ZERO;
! NOT USED IN DUP IMPLIMENT.

2187
3188

gigg

°2
2

SND_ENVELOPE [.CMD_SLOT, OPCODE)
SND_ENVELOPE {.CMD_SLOT, UQRSVD)

gigg

3 SET THE OWNERSHIP BIT TO 1 WHICH GIVE THIS SLOT TO THE PORT.

;

gigz

?END_RING [.CMD_SLOT, OWN_BIT) = PORT_OWNED;

gigg

s READ THE IP REGISTER TO STIMULATE PORT POLLING.

gigg

IEHP =

;
H
;

3199
3200

2
2
2

' GET 1HE COMMAND SLOT NUMBER FOR NEXT COMMAND
!

USER$1: (AZTEC.CZRCFC)ZRCFC2. 816;1

vlobol routine GET_UNIT_STATUS =

:
:
:
:

:
:

VAX-11 Blise-16 V4,0-579

= OP_GUS;
= ZERO;

?ND_ENVELOPE (.CMD_SLOT, MODIFIER) = ZERO;

! DEFINE COMMAND OPCODE
! NOT USED

' DEFINE CMD MODIFIERS

_RC2S_ADDR [RCIP, RC_ALL):

?ET_CHD_SLOT O);

SEQ

017

OP éeo 75
(26)

Cl4
MISCELLANEOUS SECTIONS

ZRCFB2
v03.0

3217

Lad S LS TV LN VLSV Y7 17 1,81, 5Y,91,¥1,¥)

3203
3204
3205
3206
3207
3208
3209
3210
3211
3212
3213
3214
3215
3216

000000

005746

000002
000006
000012
000016
000024
000030
000034
000040
000046
000054
000060
000064
000070
000076
000102
000106
000112
000116
000122
000126
000132
000140
000144
000150
000154
160
164
000170
174
202
206
212
216
222

016746
012746
004767
012760
016716
012746
004767
142760
152760
016716
012746
004767
142760
016716
012746
004767
105060
016716
012746
004767
016760
016716
012746
004767
005060
016716
012746
004767
016760
016716
012746
004767
005060
016716

00226
00232
0N236

27-Mar-1985 15:23:34

AZTEC GLOBAL ROUTINE

012746
004767
112760

11-Jan-1985 08:19:19

VAX-11 Blise-16 V4.0-579

USER$1:(AZTEC.CZRCFCIZRCFC2.816;1

560901 1 e
,

% 26)

! CHECK THE END PACKET FOR GOOD STMATUS
i £ REC_STATUS ()

then

lse

' READ THE STATUS

regurn .RET_STATUS;

' RETURN WITH A STATUS ERR

RES_SLOT

RET_UNIT FLAG =

.RES_SLOT

GET_RES_SLOT ();
retirn

.REC_ENVELOPE

'
[.RES_SLOT,

GET THE CURRENT RES.

UNIT FLAG);

TRET_STATUS;

SLOT

READ UNIT FLAG

t GET NEXT RES. SLOT
"

RETURN WITH A PASS CODE

eng;

.SBTTL
GET.UNIT.STATUS AZTEC GLOBAL ROUTINE
GET.UNIT.STATUS::

SP)

0000006

MOV

cno 5LOT,

0000006
000014
0000006

JSR
MOV

P, BL $HUL
014.SND.ENVELOPE(R0)

000054
0000006
000017
0000026
000001
0000026
0000006

MOV
JSR
BICB
BISB
MOV

054, -(SP)
PC,BL $MUL
017,SND.ENVELOPE+2(RO)
o1,SND.ENVELOPE«2(RO)
CMO. SLOT, (SP)

000360 0000026
0000006

BICB
MOV

9360, SND.ENVELOPE+2(RO)
CHD. SLOT . (SP)

000054

0000006

000054
0000006
000054

0000006
0000036

0000006

000054
0000006
0000006 0000046
0000006
000054
0000006
0000066
0000006

000054

0000006

0000006 0000106

0000006

000054

MOV

054.-(SP)

-(SP)

CMD.SLOT,(SP)

MOV
JSR

054 -(SP)
PC.BL ML

MOV

054, -(SP)

3146

;

3177

;

3178

;

3179

;

3183

;

3184

;

3185

;

3176

JSR
CLRB

PC.BL $MUL
SND.ENVELOPE.3(RO)

MOV
JSR
MOV
MOV
MOV
JSR
CLR
MOV

954.-(SP)
PC,BL $MUL
CHD. REF , SND . ENVELOPE
«4(RO)
€MD . SLOT, (SP)
054, -(SP)
PC,BL $MUL
SND. ENVELOPE +6(R0)
cno SLOT,(SP)

JSR

PC, BL$MUL

MOV

cHD. $LOT,(

;

3186

;

3187

MOV

CMD.SLOT, (SP)

054.-(SP)

UNIT, suo ENVELOPEolO(RO)

054, -(SPS

0000006
0000126
0000006

JSR
CLR
MOV

PC, BL $MUL
SND.ENVELOPE 12(R0O)
CMD.SLOT, (SP)

0000006
000003
0000146

JSR
MOVB

PC.,
BL $MUL
03.SND.ENVELOPE+14(R0)

000054

;

MOV

954, -(SP)

D14
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFR2

v03.0

000244
000250
000254

000260
000264
000270
000274
000300
000304

016716
012746
004767
175060
016716
012746
004767
005060
016700
006300
006300
066700
052760

017766
016600
004767
004767

27-Mar-1985 15:23:34
11-Uan-198S 08:19:19

0000006
000054

000000G 000030

SND. ENVELOPE +16(R0)
ggD.SLOT.RO

3193

*,RC.REG
RC.REG,TEMP

3197

000030
000000V
000000V

SS.REC.STATUS

3201
3206

000030
0000006

14
030,5P
gET.STATUS.RO

3209
3208

PC,GET.CMD.SLOT

RES.SLOT

1$:

RES.SLOT,RO
RO
RO
RO
RO
#77,RO
REC,ENVELOPE+22(R0O),RET.UNIT, FLAG
PC,GET.RES.SLOT

030, 5P

RET,STATUS,RO

(SP).

2%:

Routine Base:
144 words,
RB$CODE
Routine Size:
Maximum stack depth per invocation:
14 words

1
1
1

3189

SEND.RING,RO
0100000,2(RO)
8RC25.ADDR,30(SP)
30(SP),RO

000002

0000006

3218
3219
3220

cno SLOT, (SP)

000077
0000226 0000006
000000V
000030

H
;
H

(26)

3188

054, -(SP)
PC,BL $MUL

0000006

;

SEQ 0172
Page
7

CMD. SLOT (SP)
5
5P)

éLsn
6 ENVELOPEolS(RO)

0000006

;

VAX-11 Bliss-16 V4,0-579
USER$11:(AZTEC. CZRCFC]ZRCFC2.816;1

10444

3212
3214

3215
3216
3168
3146

E14
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFAB2

3228

ey
ey

3224
3225
3226
3227

)

Lad SUSLS LS LV LSS VLNV

7]
w

N
n

ET STV

OF
B¢
©0
B8
W
B
€6
G¢
90
V0
s
G5
©F
B0
@8
®0

026727

001003
005067
000402
005267

IT WILL WRAP AROUND,

000076

.CMD_SLOT eqlu SND_ALLOCATE

]

CMD_SLOT = ZERO

then
se

CMO_SLOT =

AS THE SLOT NUMBER REACHED T0 THE BOTTOM.

lse

3246
1247
1248

1
1
1

IS SLOT © REACHED TO THE END
YES

! ELSE
! INCREMENT THE CMD SLOT NUMBER

.CMD_SLOT .« 1;

OWN_BIT) eqlu PORT_OWNED

return TRUE

SEND_RING (.CMD_SLOT, FLAG_BIT} = ZERO;

! CLEAR CMD_RING FLAG BIT

THIS SLOT IS NOT OWNED BY

HOST YET.

SO WAIT.

return FALSE;
end;

000000G 000017

.SBTTL
GET.CHD.EhgT::

0000006
0000006
0000006

1%:
2$:

0000006
040000 000002

3230

CLR
BR
INC

CMD.SLOT
24
CMD.SLOT

3232
3230

ASL
ASL

RO
RO

CMD.SLOT,RO

;
:
;
;

3237

RTS

SEND.RING,RO
2(RO)
34
@1,RO

3239

ASL
ASL

RO
RO

CMD.SLOT,RO

;

3242

CLR
RTS

RO
PC

;
:

3228
3221

MOV
RDD
TST
BPL
MOV

3%:

GET.CMD.SLOT AZTEC GLOBAL ROUTINE

CMD.SLOT, 017

BNE

MOV

ADD
BIC

Routine
Base:
ABSCODE ‘
32 words, .
0 words
; Maximum stack depth per invocation:

;
;
:

't
]

z WRAP ARQUND THE COMMAND RING

if .SEND_RING [.CMD_SLOT,

then

0000006

; Routine Size:

gc(27)

begin

000001

066700
042760
005000
000207

THIS ROUTINE ASSIGNS A COMMAND SLOT NUMBER FOR THE COMMUNICATION

RING,

0000006
000002

000056
000060
000062
000066
000074

SEQ 0173

§ FUNCTIONAL DESCRIPTION:

3223

VAX-11 ?1.
s-16 V4.,0-579
USER$1:[AZTEC.CZRCFCIZRCFC2.B16;1

9lobol routine GET_CMD_SLOT =

TN, BT

3221
3222

G¢

G G

vo3.0

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

SEND.RING,RO
#40000,2(RO)

11104

F14
ZRCFR2
v03.0

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

27-Mar-1985 15:23:34
11-Jan-198S 08:19:19

gggg

910bal routine GET_RES_SLOT

§§§$

g FUNCTIONAL DESCRIPTION:

;
H

3253 1

gggg

:
:
:
:

3261
3262
3263
gggg

2
2
2
S

;3266

o00000

016700

000004
000006
000010
000014

006300
006300
066700
042760

000030
000032
000036
000040
000044

001003
005067
000207
005267
000207

000022

026727

3267
3268
3269

1
1
1

79
(28)

RING, IT WILL WRAP AROUND, AS THE SLOT NUMBER REACHED TO THE BOTTOM.

beain
then

else

RES_SLOT = ZERO
RES_SLOT =

_RES_SLOT « 1;

! CLEAR RECEIVE RING FLAG BIT
t IS SLOT & REACHED TO THE END?
'
!
!
!

YES. THEN
WRAP ARQUND THE RESPONSE RING
ELSE
INCREMENT THE RES SLOT NUMBER

end;
0000006

.SBTTL
GET.RES.SLOT::
MOV

0000006
040000
000002

000000G 000017

0000006

RES.SLOT,RO

;

3258

RES.SLOT,#17

3260

3262

RO
RO
RECEIVE ,RING,.RO
#40000,2(RO)

BNE
CLR
RTS
INC
RTS

14
RES.SLOT
PC
RES.SLOT
PC

cMpP

000000G

GET.RES.SLOT AZTEC GLOBAL ROUTINE

ASL
ASL
ADD
BIC

;: Routine Size:
19 words,
Routine Base:
ABSCODE +
; Maximum stack depth per invocation:
0 words

:
:
;.

Page

novalue =

RECEIVE_RING [.RES_SLOT, FLAG_BIT) = ZERO;
if .RES_SLOT eqlu REC_ALLOCATE - 1

3260 2

SEQ 0174

THIS ROUTINE ASSIGNS A RESPONSE SLOT NUMBER FOR THE COMMUNICATION

;

P36
2
gggg s

;
;

VAX-11 Blise-16 V4,0-579
USER$1:(AZTEC.CZRCFC)ZRCFC2.816;1

11204

:
H
:

3260
3264
3249

G1l4
ZRCFR2

MISCELLANEQUS SECTIONS

v03.0

{

AZTEC GLOBAL ROUTINE

27-Mar-1985 15:23:34

11-Jan-1985 08:19:19

%S;?

?1obal routine READ_FILL_CMD : novalue =

gg;g

3274

1
1

'
'

AND ALSO GIVE THE CMD_SLOT TO PORT IMMEDIATELY AFTER RECEIVING IT
FROM PORT. THIS ROUTINE WILL BE CALLED WHEN READ_CMD WAS ORIGINALLY

3278

THE ONES THAT ARE TOUCHED HERE. THIS ROUTINE IS CALLED IN THE

ISSUED AND THE SND_ENVELOPE IS SUPPOSED TO BE IN TACT EXCEPT FOR

3279
3280
3281
3282
3283
gggg

1
1
1
1
1
i

!
TIMING TESTS ONLY.
!
' ..
! FORMAL PARAMETERS :
'
E IMPLICIT INPUTS :
LBN_ST, CMD_SLOT

:
:
:
:
:
:
:
:
:
:
:
:

3286
3287
3288
3289
3290
3291
3292

' IMPLICIT OQUTPUTS :
!
! COMPLETION CODES :
'
' SIDE EFFECTS :
'
b§8in
SNO_ENVELOPE [.CMD_SLOT, CMD_LREF]) =

3297

1
1
1
|
1
1
2
2
2
2
2
2

3299

3293

3294
3295
3296

;3298
H

3300

SND ENVELOPE [.CMD_SLOT, LBN_LO] = .LBN_S

SEND_RING [.CMD_SLOT, OWN_BIT] = PORT ouNeo.

end;

000004

012746

000054

MOV

012746
004767

000054
000000G

MOV
JSR

000036
000044
000050
000052
000054
000060
000066
000072

016760
016700
006300
006300
066700
052760
062706
000207

0000006
000000G 000004G
000000G

000000G 0000406
000000G
0000006
100000
000002
000006

* GIVE THE SLOT TO PORT

MOV

CMD.SLOT,-(SP)

JSR
MOV
MOV

PC, 8L$HUL
LBN.ST.SND.ENVELOPE04(R0)
CMD.SLOT,(SP)

MOV
MOV
ASL
ASL
ADD
8IS
ADD
RTS

054, -(5P)

054, -(SP)
PC.,BL$MUL

LBN.ST,SND.ENVELOPE
«40(RO)
CMD.SLOT,RO
RO
RO
SEND.RING,RO
9100000,2(R0O)

%6 ,5P
PC

; Routine Size:
30 words,
Routine Base:
ABS$CODE . 11252
;: Maximum stack depth per invocation:
4 words
3301

! LBN TO SEEK

.SBTTL
READ.FILL.CMD AZTEC GLOBAL ROUTINE
READ.FILL.CMD::

000000G

004767
016760
016716

! GIVE LBN IN COMMAND REF SO THAT

! LBN RECEIVED IN THE RECEIVE ENVELOPE
! CAN BE TAKEN AS FAILING LBN, IF THERE
! WAS ANY ERROR.

return;

016746

000026
000032

,LBN_ST;

000000
000010
000014
000022

(29)

THIS ROUTINE IS USED TO FILL SND_ENVELOPE WITH CMD_LREF AND LBN_ST

3275
3276
3277

Page 80

FUNCTIONAL DESCRIPTION:

:
:
:
:
:
:

USER$1:[AZT C CZRCFCJZRCFC2. B16;1

:
:
:

SEQ 0175

VAX-11 Blise-16 V4,0-579

3293

2297

;

3298

:
:

3299
3270

H14

s oo i s o Pt e 0 s P P ot bt s Pt
U D RO IO RO AU RO O RO R R 10 4 12 s bt 0 ht b
VNN
A NTVNTNTUVTNTTUILES LT B 8 G 3G G

B DL BT DL B0 T TS BT B VL Ve WL BT B BL BT TS Ve B WV BE Q0 VT TP V6 TS B0 GF G0 W V9 VI V0 VO VO G Ve Ve G T G2 VeGP G0 TP G0 ©2 Ve B9 W Gs S8 Ge Ge Go or o

v03.0

3302
3303
3304
3305
3306
3307
3308
3309
3310
3311
3312
3313
3314
3315
3316
3317
3318
3319
3320
3321
3322
3323
3324
3325

27-Mar-1985 15:23:34

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFR2

11-Jen-1985 08:19:19

VAX-11 Bliss-16 V4.0-579

USER4$1:[AZTEC.CZRCFC)ZRCFC2.B816;1

global routine REC_STATUS LR

FUNCTIONAL DES CRIPTION

THIS ROUTINE READS THE STATUS OF END HESSAGE PACKET AND RETURN
THE SLOT TO 7THE CONTROLLER. IF ERROR, A STATUS FLAG AND ERROR CODE
ARE SENT T0 THE CALLER.

IF STATUS BIT INDICATES UNSUCCESo,
BE REPOR TED BY THE TEST MODULE.
FORMAL PARAMET ERS

IMPLICIT INPUT

IMPLICIT QUTPUTS

)

IN_BOUND

RET_STATUS,

COMPLETION CODES :
SIDE EFFECTS

THEN AN ERROR MESSAGE WILL

ER_STATUS

RET_STATUS

begin
WAITING FOR THE CONTROLLER TO FILL THE DESCRIPTOR AND RELEASING

IT 70 THE HOST,

IF WAITING TIME EXPIRED THEN AN ERROR WILL BE REPORTED.

local
I =

_IN_BOUND;

! SAVE RECEIVE COUNT

incru COUNT from 0 to 60000 do
begin

if .RECEIVE_RING [.RES_SLOT,
then

begin

!
!

OWN_BIT]) eqlu 0
THEN

if (LREC_ENVELOPE [.RES_SLOT,
then

nequ ZERO)

begin

LBN_ST =

SET TIME OUT RANGE
VER:C

IF HOST OWNS THE SLOT

STA_CODE)
!
!

! READ THE STATUS BITS

IF ERROR
THEN FLAG THE ERROR

_REC_ENVELOPE ([.RES_SLOT, CMD_LREF);

ER_STATUS = .REC ENVELOPE (.RES_ SLOT STATUS];

INBOUND = .IN_BOUND + 1;
RET_STATUS = RSE_CODE;
return

else

end

RET_STATUS;

begin
IN_BOUND =

,IN_BOUND « 1;

'GET CMD_REF FAILING

! SAVE ERROR CODE

' RECEIVE COUNT TOTAL
! REPORT THE ERROR & SET STATUS
!

SET ERROR FLAG

! RECEIVE COUNT TOTAL

RECEIVE_RING [.RES_SLOT, OWN BIT] =
! PORT OWN THE RING
GET_RES_SLOT ();
GET NEXT RESPONSE SLOT
o
RET_STATUS = PAS_CODE;

CLEAR STATUS

QPSI 7 6

114
MISCELLANEOUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFB2

3390

R WWWRWWWWRNDRRRLVNNNVVWWENWNE
L LLEAWM LD
H

w
w
~J

Ve B¢ V5 @ B0 TS W) B0 VP B0 G0 G5 O B¢ V¢ ) G0 B9 GF VO V0 G0 T2 G2 B9 V0 B9 VO Ve S ©» O

v03.0

27-Mer-1985 15:23:34
11-Jan-1985 08:19:19

SEQ 0177
Page
82
(30)

end;

else

end

begin

if (.IN_BOUND nequ

.I) then return

'?EJESTQTUS'

*IF YOU RECIVE AT

! LEAST A SLOT THIS TIME THEN RETURN.

DELAY (30);

t IF NOT, WAIT AND TRY BACK.

end;

BREAK ;

' WATCH FOR CONTROL C.

end;

* IF THE MAX TIME IN THE LOOP WAS ELAPSED,
* FOR POSSIBLE ERROR INFO.
RC2S_DATA [RCSA,

RC_ALL)

THEN READ RCSA

.RC2S_ADOR [RCSA,

i: .RC2S5_DATA [RCSA, RCSA_ER)

RC_ALL);

GET RCSA DATA

! CHECK SA REG.ERROR BIT

be?in

else

RET_STATUS = PFE_CODE;
return .RET_STATUS;:

SAVE THE PORT/CTLER FAILURE

begin

' SET TIME EXPIRED IN STATUS BUF

end

Re?,svnrus = CTO_CODE;

return
end;

.RET_STATUS;

RETURN WITH A TIME EXPIRED FLAG

end;

.SBTTL
REC.STATUS::
JSR

0000006
0000006
0000006

0000006

100000

1$:

000002

0000006

000077
000037
0000006

106000

VAX-11 Bliss-16 V4.0-579
USER$1:[AZTEC.CZRCFCIZRCFC2.B16;1

HOV
CLR
HOV

R1, $SAVE3

;

3332

IN.BOUND,R3
R2
RES.SLOT,RO

;o1
; COUNT
;

3334
3336
3339

;

3343

;

3347

ASL
ASL

RO
RO

gfig

g*ooooo.e(nofi

ADD

MOV
SWAB
RORB

0000166

REC.STATUS AZTEC GLOBAL ROUTINE

RECEIVE.RING,RO
RES.SLOT,RO
RO

ROR
ROR

RO
RO
RO

MOV
SWAB
RORB

RES.SLOT,RO
RO
RO

gICB
ggae

#77.R0O
g??.REC.ENVEL09E016(RO)

RO
RO
077,R0
REC.ENVELOPE«4(RO),LBN.ST
RES.SLOT,RO

000077
000004G 0000006
0000006

000077
000016G 0000006
0000006
000031
0000006
0000006

10¢
IN.BOUND
RES.SLOT,RO

2$:

0100000, 2(R0)

PC.GET.RES.SLOT

RET.STATUS
84
iN.BOUND.RS
$

000000G

001411
016700
001404
005066
005300

020227
101645
016700
016016

011667
100006
012767
016700

000405
012767
016700
022626
000207

s,
1

3357
3358
3339
3365

s, $$THP2

3368

RET.STATUS,RO

0000006

000036

g::

0000006

104

0?6.R1
8
L$OLY,RO
74

2(SP)

s, $8TMP]

$$THP
$$TMPY

$$TMP2

165140

R2 ©165140

COUNT
«
COUNT,

0000006
000002
0000026

RC2S ADDR,RO

000021
0000006
0000006

021 ,RET.STATUS
RET.STATUS,RO

000002

6$:

001374
005301
000766
104422

005202

78:

54
22
R2

8¢:

000011

0000006

(30)

RECEIVE .RING, RO

177420

0000006

Page

3355
3356

RO
RO

0000006
100000
000002

026703
001403
016700
000443
012701

SEQ 0178

3349
3350
3346

0000006
0000006

IN.BOUND

031 ,RET.STATUS
RET.STATUS,RO

000144

000150
000156
000162
000164
000170

#77,R0
REC.ENVELOPE+16(R0O),ER.STATUS

®e

000136

1
4.0-579
Z CFCIZRCFC2.816;1

3348

000100
000102
000104
000110
000116
000122
000124
000126
000130
000132

VAX-11
USER$1

'—‘Q
)t—-

27-Mar-1985 15:23:34
11-Jan-198S 08:19:19

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFR2
v03.0

0000006

2(R0), (SP)
SSP).RC2S.DATA02
$

104

#11 ,RET.STATUS
RET.STATUS,RO

94
10¢:

RTS

(SP)e+,(SP).

AB$CODE + 11346
; Routine Size:
117 words,
Rout ine Base:
8 words
;: Meximum steck depth per invocation:

* ,RC.REG

RC.REG,

3369
3336
3376

3378
3381
3385
3386
3385
3302

K14
MISCELLANEOUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFB2
v03.0

3391

27-Mer-1985 15:23:34
11-Jen-1985S 08:19:19

- 118 liss- 16 v4.0-579
VAX
USER $1:(AZTE C.CZRCFC)IZRCFC2.B16;1

SEQ 0179
Page
84

(30)

—-

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

00
60
-

Vs
s
We
B0
Ve
09
Be
B¢

=2 PPN PLNI PO PO NININU P, s bt s oo Pt o, =

3392
3393
3394
3395
3396
3397
3398
3399

B¢

ZRCFR2
vO3. 0

91?901 routine RANDOM_NUM :
E

THIS ROUTINE

000104
000110
000112

if P2 gtru
then

P2 ang .END LBN

.P2;

P2 = not

.P2;

return;

! RANDOM SEED

.END_LBN

P3 =

else

! P3 IS LBN

! UPDATED SEED

end;

.SBTTL

RANDOM.NUM AZTEC GLOBAL ROUTINE

MOV
MOV
MOV
JSR

R1,-(SP)
P2,-(SP)
0571,-(SP)
PC.BL$MUL

RANDOM.NUM:
:

040100
010067

0000006

ge(31)

P3 1S LBN NUMBER SUPPLIED.

0000006
000571
0000006

015415
o171 17

RO,(SP)

JSR
MOV
CMP
BLOS
MOV
MOV
COM
8IC
MOV
BR
MOV
coM
ADD

PC,BL$MOD
RO,P2
P2 ,END.LBN
14
P2,RO
END.LBN,R1
Rl
R1,RO
RO,P3
2
p2,P3
P2
06,5P

R1S

ADD
MOV

0000006
0000006
000000G 0000006

000000G 0000006
0000006
000006

MOV

18:
2$:

3392
3400

015415,(SP)
077777,-(SP)

38 words,
Routine Base:
ABSCODE - 11720
;: Routine Size:
S words
: Meximum stack depth per invocation:
3411

novalue =

begin
P2 = (.P2¢377 « 6925) mod 32767;

0000006
0000006

062706
012601
000207

ZRCF CJZRCFC2.816;1

SEQPOIBO

SUPPLIES AN LBN NUMBER AT RANDOM.

P2 IS THE SEED.

016746
012746
004767
010016
062716
012746
004767
010067
026767
101411
016700
016701

000403
016767
005167

V4,0-579
-57

FUNCTIONAL DESCRIPTION:

010146

005101

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

L14

3402
3404

3402
3408
3409
3392

M14
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFR?
ey
TP TTT VY 91 VY, ¥T ¥ VY, ¥Y . VY. VY. V1 V], VT O O O O O Oy O Oy Gy O Gy W

3415

FUNCTIONAL DESCRIPTION:

VAX-11 8 liss-16 V4.0 579
USERS$1:( AZTEC.CZRCFC)ZRCFC2.B16;1

-«

THE FUNCTION OF THIS ROUTINE IS TO EXAMINE THE
FREE MEMORY FOR EXPECTED DATA.
IMPLICIT INPUTS:

H_SADD

BUF _LENGTH
T1P

IMPLICIT OQUTPUTS:

RETURN STATUS

SIDE EFFECTS:

- NONE

begin

ocel

PATTERN,
FLAG;

FLAG =

!
!
!
!

ZERO;

TEMP = _H_SADD;
M EADD = W _SADD

PATTERN =

_1Ip;

- 2

(.BUF _LENGTHs?2);

INIT ERROR FLAG
SAVE ADDR. IN TEMP. BUFFER
END OF FREE HOST MEMORY
PUT PATTERN FOR COMPARE

! EXAMINE CONTENTS OF MEMORY

incry COUNT from .H_SADD to .H_EADD by 2 do
begin

R _F P TETE TV T

3414

?lobol rout ing EXAM _DATA ;

.TIP eqlu | then PATTERN =

( not

.TEMP);

.TIP ealu 2 then PATTERN =

_TEMP;

IN TIP,

..TEMP nequ

COMPARISION,

IF ERROR WAS FOUND THEN

then

.PATTERN

! BASED ON THE VALUE RECEIVED
SET UP PATTERN FOR

beqg:in

FLARG = TRUE;
TIP

_PATTERN;

exitloop;

3412
3413

(LI AV RV TV JC TV TV IV LS LVL VNIV IV TV R

B2 S5 B8 02 GL B0 B VL B0 BL B8 B0 €0 G0 D0 VP S5 VT VE BT VS G0 B B G0 B0 VL B¢ G V6 G G0 V¢ G0 G G0 G0 ©0 G0 B9 @¢ B¢ B G2 Gt Go G S Vs o S G V> G0 Ge Ss Go

VO3, 0

27-Mer-1985 15:23:34
11-Jen-1908S 08:19:19

end;

TEMP =

end;

i€

TEMP

. 2;

FLAG

then

! GET ERRQR DATA
! FOR TEST MODULE

bea.n
P _MASK = 2.
Pl = FMI2;

P2 = ZERQ;
P3 = ZERQ;

PS =

TIP;

. TEMP;

P6 = _TEMP;
return RET STATUS

TRUE;

SEQ 0181
age

3 2)

N14
ZRCFR2

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE
Laada
VLS 1 VY7

[

v03.0

else

27 Mer-198S 15:23:34
11-Jen-1985 08:19:19

return RET_STATUS

FALSE;

! GOOD STATUS

.SBTTL
EXAM_ DATA: ;
JSR

EXAM.DATA AZTEC GLOBAL ROUTINE

CLR

R1,$SAVE3
R3

MOV

ggF.LENGYH,RO

MOV
SuB

H.SADD,RO
RO,H.EADD
02 .H.EADD

ASL
ADD
MOV
MOV

0000006 000002

000130
000136
000142
000144
000146
000150
000152
000160

000166
000172
000176
000204
000212
220
224

230
232
236
240

027700
001405
012703
010067

062767
062701
020102
101744
006003
103030
112767
012767

005067
005067
016767
017767
016767

012700
010067
000207
005067
005000
000207

0000006

(32)

24:

TEMP, RO

2lsnfi.ao
01,R3
RO,TIP
64
02, TEMP
02,R1

R1,R2

6$:

R3
74
02,P
. MASK
oFMT2,P1
P2
P3
11P,P4

0000006
000000G 0000006
0000006
000001
0000006

JTEMP,PS
TEMP ,P6

01,R0

gO.RET.STATUS

T4:
RTS

; Routine Size:
81 words,
Rout ine Bese:
AB$CODE ;: Meximum steck depth per invocetion:
S words

RET.STATUS
RO
PC

12034

3412
X435
3436

3437

¢,PATTERN

¢,COUNT

11P,01

000002
000000G
000000G 0000006

0000006

1I8,R0

H.EADD,R2
uisuoo.n1

a4
TEMP ,RO
RO
11P,02
34

000002

FLAG

H.SADD, TEMP

000000G 000001

000407

Page

end;

MOV

000126

SEQ 0182

end

0000006

000110
000114
000116
000122

VAX-11 B lise-16 v4.,0-579
USER#1
:L( AZTEC.CZRCFCJZRCFC2.816;1

3438
3440
3443

;

¢,PATTERN

PATTERN

3445
;:
:

*,PATTERN
¢, PATTERN

3447

s FLAG

3450

+, COUNT
COUNT,
»

3440

PATTERN,
»

FLAG

B15
ZRCFR?

MISCELLANEQUS SECTIONS

v03.0

:
i

3474
3475

AZTEC GLOBAL ROUTINE

)
1

' <BLF/PAGE>

27-Mer-198S 15:23:34

11-Uen-1985 08:19:19

VAX-11 Blise-16 V4,0-579

USER$1: [AZTEC.CZRCFC)ZRCFC2. 816;1

SEQ 0183

Page

(32)

C15
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFBR2
v03.0

3476

27-Mar-1985 15:23:34

11-Jen-198S 08:19:19

VAX-1 18 1 i9s-16 V4,0-579
USER¢ 1:( A ZTEC.CZRCFC)ZRCFC2.B16;1

SEQP0184
oge

(33)

D15
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

3477
3478
3479
3480
3481
3482
3483
3484
3485
3486
3487

27-Mar-198 S 1S: 23:34
11-Jan-198 S 08; 19:19

-579
VAX-11 B lise -16_v4.0-5
USER$ 1:(
:(AZTE C. CZRCF CJZRCFC2.B16;1

global routine AZTEC_READY =
ORIV RN LNV NV PN RO ND NI PO O N 1= 10 0 1t 15 1t 40 1t bt ft bt Pt J e o P o P et Pt P [t (i i P et s et i o Pt e e 0 ot it i P

B 95 B3 VT VL VL T DT VL VL T4 L T VT AL B0 G0 U B B0 VP Q0 W B BE B0 VS G0 6 TS VO V0 00 S0 TP Ve B¢ B WS G0 O5 V6 GO G0 @ OGP e V0 O o 06 Vs @ @0 e vo Ge

ZRCFR2
v03.0

Yoo

! FUNCTIONAL DESCRIPTIONS:
'

THIS ROUTINE CALLS OTHER ROUTINES TO GET THE AZTEC READY

PERFORMS THE FOLLOWING:

DEFINE INITIALIZATION CONSTANTS AND INITIALIZE VARIABLES.

2. DO STEP 1 THROUGH STEP 4 CHECK FOR ANY ERRORS
IN EACH STEP.

3.
4.

SET UP COMMUNICATION AREA'S,
SET HOST SETTABLE UNIT CHARACTERISTICS AND OBTAIN 7THOSE

UNIT CHARACTERISTILS THAT ARE ESSENTTIAL FOR PROPER CLASS
ORIVER OPERATION.

S. BRING A UNIT "UNIT-ONLINE.
THE UNIT IS SPUN-UP, IF NECESSARY,
2:8 gggszggos ARE LOADED PRIOR TO RETURNING THE ONLINE COMMANDS'S
6.

IF TIP CONTAINS TEST NUMBER OF 14 THEN THIS ROUTINE SKIPS
ON_LINE CALL, SO THAT THIS COULD BE OONE IN THE TEST MODULE.

FORMAL PARAMETERS:
-NONE -

IMPLICIT INPUTS:
IMP ICIT QUTPUTS:

AS A RESULT OF THIS ROUTINE THE COMMUNICATION AREA WILL

BE INITIALIZED AND UNIT IS SPUN-ULP.
COMPLETTION CODES:
SIDE EFFECTS:

- NONE -

beflin
B_PASK = %0'17';

DATAL1<1S, 1> = TRUE;

DATA1<13,

DATA1<11,

= 0;

= SND_SIZ;

DATA1<8, 3> = REC_SIZ;
DATA1<7,

DATA1<0,

1> = O;

= 0;

DATA2 = RINGBASE;
DATA3 = ZERO;

DATA4 = %o'177403';

CMD_SLOT = 0;

RES_SLOT

= 0;

cMod = MD_EXP;
IN_BOUND = 0;
if AZP_INIT ()

SET MASK BIT FOR COMPLETE INIT.
SET BIT 1S FOR STEP-1 WRITE
NO DIAGNOSTIC WRAP MODE
SET UP COMMAND RINGS LENGTH
SET RESPONSE RING LENGTH
DISABLE INTERRUPT
LOAD NO
VECTOR ADDRESS
LOAD COMMUNICATIONS AREA ADDRESS

HI-ORDER ADDR = ZERO

“LAST FAIL" PACKET RESPONSE BIT SET
CLEAR COMMAND RING SLOT POINTER
CLEAR RESPONSE RING SLOT POINTER
SET EXPRESS BIT FOR READ

ngfléND MODIFIER.

DO STEP INIT AND CHECK FOR ERROR

SEOp0185 %
L]

ge(34)

ZRCFR2

E15

MISCELLANEOUS SECTIONS

v03.0

27-Mer-1985 15:23:34

AZTEC GLOBAL ROUTINE

VAX-11 8lies-16 V4,0-579

11-Jan-1985 08:19:19

USER4$1:(AZTEC.CZRCFC)ZRCFC2.8B16:1

then

gg}g

2
¢

if INIT_COM_AREA ()
then

! INIT THE COMMUNICATION AREA
! ERROR ?

gg:é

CMD_REF = _CMD_SLOT;

! SET COMMAND REFERENCE T0 1

:
:
:

3543
3544
gg:g

2
2
g

if SET_CNTLR_CHAR ()
then
return . RET_STATUS;

' ISSUE SET CONTROLLER CHAR CMD
' IF COMMAND FAILED

gg:;

CMD_REF = _CMD_SLOT;

' SET COMMAND REFERENCE T0 2

gggg

gggé

H
:

3553
3554

2
2

3556

3534

:
H

gggs
6

:
:

:
:
:

3537
3538

355

3557
3558

2
1

return

if ON_LINE ()
then
return

122000

0000006

RET_STATUS;

170040

016767
026727

000000G 0000006
000000G 000016

AZTEC.READY AZTEC GLOBAL ROUTINE

MOVB

;

3517

MOV
CLR
MOV
CLR
CLR
MOV
CLR
JSR

ORINGBASE ,DATA2
DATA3
9-375,DRTA4
CMD.SLOT
RES,SLOT
#-100000,CMOD
IN.BOUND
PC,AZP . INIT

;
:
:
;
;
;
:
H

3524
3525
3526
3527
3528
3529
3531
3533

;

3535

3537

3539

:
:

3541
3543

RET.STATUS,RO

3545

CMD.SLOT,CMD.REF
TIP, 016

:
:

3547
3549

MOV

1%:

000000G
000000G 0000006
173074

.SBTTL

AZTEC.READY::

0000006

001004

TEST 14 WILL DO ONLINE COMMAND

! ISSUE ON LINE COMMAND

000000G 0000006
0000006
177403 0000006
000000G
000000G
100000 000000G
000000G
167256

016700
000207

return RET_STATUS = FALSE;
end;

012767

103003

(34)

* IN THE MAIN LINE OF CODE

000000G

006000

RET_STATUS;

.TIP eqlu 14 then return RET_STATUS = FALSE;

000017

006000
103003
016700
000207
004767
006000
103003
016700
000207
016767
004767

Qpaésb 91

return .RET_STATUS;

112767
012767
005067
012767
005067
005067
012767
005067
0047€7

SEQ

24:

ROR
8CC
MOV
RTS
JSR
ROR
8CC
MOV
RTS
MOV
JER
ROR

B8CC

MOV

#122000,D0ATAl

RO
14
RET.STATUS,RO
PC
PC,INIT.COM,AREA
RO
24
RET.STATUS,RO
PC
CMD.SLOT,CMD . REF
PC,SET.CNTLR.CHAR
RO

RTS

BNE

MOV
CMP

;

3523

F15
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFB2
vV03.0
000154
000160
000162
000164
000170
000172
000174
000200
000202
000206
000210

005067
005000
000207
004767
006000
103003
016700
000207
005067
005000
000207

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

CLR
CLR

000000G

174224

5%:

: Routine Size:
69 words,
Routine Base:
;: Maximum steck depth per invocation:
1 word

;3559

RTS

JSR

ROR

8CcC

0000006
0000006

RET.STATUS
RO
PC
PC,ON.LINE
RO

MOV
RTS

CLR
CLR

RTS

RBS$CODE

iss-16 V4.0-579
TEC.CZRCFCJZRCFC2.B16;1

SEQ 0187 0z
age

(34)

3553

5S4
gET.STATUS.RO

3555

RET.STATUS
RO
PC

3557
3516
3477

12276

G15
MISCELLANEOUS SECTIONS
AZTEC GLOBAL ROUTINE

IR PO N
NI

27-Mar-1985 15:23:34
11-Jen-198S 08:19:19

VAX-11 Blies-16 V4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC2.B16;1

SEQ 0188
Page

(35)

910bal routine DO_RETRIES : novalue =

! COME HERE ON AN ERROR AND KEEP TRACK OF RETRIES.
! IF NECESSARY DROP UNIT UNDER TEST.
]

begin

NUa_RETRIES = NUM_RETRIES « 1;
if (.NUM_RETRIES lequ
then

begin

PRINTIB (FMTSA,

N
N LN I
F2 PO RN N B 55

3560
3561
3562
3563
3564
3565
3566
3567
3568
3569
3570
3571
3572
3573
3574
3575
3576
3577
3578
3579
3580
3581
3582
3583
3584
3585
3586

s ps ps o pe

ZRCFR2
v03.0

else

end

.SWP_RETRIES)

.NUM_RETRIES);

begin

RETRIES = FALSE;

if not
then

.SWP_CONTINUE

begin

DOBU (.LOG_UNIT);

DOCLN;

end;
end;
end;

.SBTTL
DO.RETRI%SE:

DO.RETRIES AZTEC GLOBAL ROUTINE

000000

005267

000000G

000004
000012
000014
000020
000024
000030
000032
000034
000040
000042
000046
000054
000056
000062
000064

026767

000000G 0000006

gn?

Tgfl.QETRIES.SUP.RETRIES

NUM.RETRIES

3566
3568

016746
012746
012746
010600
104414
062706
000207
005067
032767

0000006
000000G
000002

MOV
MOV
MOV

NUM.RETRIES, - (SP)

3571

SP.RO
14
06, 5P
P
C
RETRIES
#1,S
. CONTINUE
WP
2%
LOG.UNIT,RO
51

3570
3568
3575
3577

000066

101013

001004
016700

104451
104444

000207

; Routin e Size:

MOV
TRAP

000006
0000006
000001
000000G

ADD

14:

0000006

RTS

CLR
gfig

MOV
TRAP

24%:

TRAP

RTS

OFMT$A,
- (SP)

44
PC

AB$CODE + 12510
28 words,
Routine Bese:
S words
; Maximum stack depth per invocation:

3587

3580
3560

H15

[]
.

*
.

.
.

[
.

[]
[

[3
.

4
[

®
[3

[]
.

.
.

13
.

[]
.

13
-

L)
-

.
-

L]
.

[]
-

[
-

.
-

14
-

L
-

[
-

14
.

1]
-

1]
.

[]
-

.
.

[
°

[]
.

[J
.

4
-

]
.

[
.

[]
-

3588
3589
3590
3591
3592
3593
3594
3595
3596
3597
3598
3599
3600
3601
3602
3603
3604
3605
3606
3607
3608
3609
3610
3611
3612
3613
3614
3615
3616
3617
3618
3619

NI PO NI RI NI N =0 5ot bt bt hmt ot ot §t 10 ot P Bt s} = s s (et (e o ot Bt e P P i P it ot P e it s it e P i Bt P (s s ot

ZRCFB2
v03.0

)

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

27-Mer-1985 15:23:34
11-Jen-1985 08:19:19

VAX-11 B liss-16 V4,0-579
USER#$1:( AZTEC.CZRCFC)ZRCFC2.8B16;1

global routine DECOUE : novalue =

!Decodes failing SA reg date

Yeo

! Functional Description :
'
Due
to the implimentation of the DUP

!
!
!
!
!
!
H
!
!
!
!
!
!
!
!
!
H
!
!
!
!
!
!
!
'
!
!
!
!
!
'
'
!
!

ere
two levels
at which an
can fail and they are:

1.
2.
3.

and UQ Port protocol there
issued command to
& port/controller

The issued command can time out.
An

error

report

can be posted in SA register bit 15 by the port

an error,

The
issued command
to
the port/controller can be executed
correctly without
any
errors but the response
packet status
field could have an error or

status other than s .,ccess posted.

This
routine
will
then be called when the return from a queued
command_comes
beck with an error code or non successfull status

code.
This is
is equal to 1.
Formal Parameters

definition

when bit 0 in the returned status

none

Implicit Inputs :

RET_STATUS:

Stored

code o;

in this global

storage

non-successful

is the returned error

status

code from a queued

commang.

Implic:t Outputs

none

Completion Codes :
none

Side Effects :
.
after execution of
this
routine
the
R(C25
controller
is initialized
aborting any DM code running in the controller.
begin
e

! Use the contents of "RET_STATUS" to select what
! type error or non-successful status code is to
!

be processed.

4
.

[
.

[
-

4
)

RV TVRI TV

if _RET_STATUS eqlu ONE then returr. “ET_STATUS = ZEROQ;
selectoneu .RET_STATUS of
?et

1)
.

[

PRV

g "Port/Controller time out” error code

! NO ACTION IF RET_STATUS IS ONE

SEQ 0189

Page

94
(36)

115
ZRCFRR2

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

VAX-11 Bliss-16 V4,0-579
USER4$1:(AZTEC.CZRCFC)ZRCFC2.816;1

Port/Controller timed out after the specified
time out intervel.

(CTO_CODE)

begin

!Code equals %o0’'11l’

PR?NTF ( .EMSG_STRUCT [MSGR));

L WP TP WY¥PP P=y

3645
3646
3647
3648
3649
3650
3651
Se

EEEUWUHUWUILILWRLTIVVLIVIVIVND
LD B B WD BB B B LI LI LI NN NN N PL N LGN RO PO

v03.0

27-Mer-1985 15:23:34
11-Jan-1985 08:19:19

end;

“Port fatal error” code
The error bit in the SA Register was set when
examined.
This error indicates a Port fatal error code.

(PFE_CODE) :

!Code equeals %o0'21’

begin

Teflp = _RC25 DATA [RCSA, RCSA_ERC];

PRINTB (FMT13,

.TEMP);

! PRINT RCSA ERROR COOE

if .TEMP gequ 200
then

begin

PR?&TF (.RC_STRUCTURE [.TEMP - 200));
else

end

!'print RCSA error code

begin

PR?NTF (.PFE_STRUCT (.TEMP]);
end;

if AZTEC_READY ()
then

!
!

begin

Init ond brin
Aztec ready i

! possible

DOBU (.LOG_UNIT);

! otherwise, drop unit

DOCLN;

end;

return RET_S1ATUS = FALSE;
end;

and clean up.

Return to caller

"Return status error” code
This

indicates that a non-successful return status

code was returned

from an

issued commend.

[RSE_CODE] :'°
begin

TEAP = .ER_STATUS<0, 5>;

!Code equals %o0'31’

! SAVE MAJOE ERROR CODE

! Look at ugport message type to determine
if this is a response to
! one of the commands given or other unsolicited log packet.
i:

.REC_ENVELOPE [.RES_SLOT, MSG_TYPE) eqlu ZERO

then

begin

PR?NTF ( .EMSG_STRUCT ([MSGO));
9

SEQ 0190
Page

(36)

J15
MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

3702
3703

3704

3705
3706
3707
3708
3709
3710

qu‘NNNNNNNW&bW&&bbU!UlU'lUlUlUlU'lMUIWUIMMU'U!UIU'MWU‘UIU!U'U'U'U'U'U'U'&U!UIUIfib&b&b

ZRCFR2
v03.0

27-Mar-1985 15:23:34
11-Jen-1985 08:19:19

VAX-11 Bliss-16 V4.0-579

USER$1:(AZTEC.CZRCFC)ZRCFC2.816;1

Look at UQPORT connection ID field to determine the type

: of response

i: LREC_ENVELOPE
then

[.RES_SLOT,

be?in

PRINTB (.SDUP_STRUCT

else

end

CONN_ID] eqlu 2

CONN_ID = DUP

(.ER_STATUS]);

be
PR NTB (.SMSCP _STRUCT

[.TEMP]);

* TRY MODULE CALL QUT BASED ON ERROR CODE FROM THE END PACKET.
selectoneu .TEMP of
set

(8} :

= wb'1100';

MAJOR ERROR CODE

= %b'0011';

MAJOR ERROR CODE 11

= #b'0010';

MAJOR ERROR CODE

P2 = %b’'1100';

MAJOR ERROR CODE 13

NO SELECTION

(9) :

(10] :

(11) :

(otherwise] :
P2

ZERO;

tes;

' MEANS DRIVE CARD AND MECHANICS

! MEANS ADAPTER CARD AND CONTROLLER
12

' MEANS CONTROLLER CARD

! MEANS DRIVE CARD AND MECHANICS

.P2 nequ ZERD then PRTS$FRU_CALLOUT (.P2);

end;

else

PRINTB (FMT14,
end

.ER_STATUS);

begin

PR?NTB (FMT1S5, .ER_STATUS);

end;
]

]

ALSO PRINT

ERROR CODE

! GIVE LOG PACKET ERROR

end;

"SUPERVISOR CALL"” error code

(SEX_CODE)
:

PR?NTF (.EMSG_STRUCT [MSG1));
end;

'Code equals %o'601’

CALL QUT MODULES

SEQ 0191 %

(36)

IK15
ZRCFR2

MISCELLANEQUS SECTIONS

v03.0
:

:
H

AZTEC GLOBAL ROUTINE

3759

3760

3761

! sent to this routine.

is here to trap any unknown

g;g;

[otherwusc]

3767
3768

2
2

tes;

3766 3
2

3771

:
:
H
:

This

3770

51f you have to continue.

3774
3775

2
2

RECEIVE _RING [.RES_SLCT, OWN_BIT) = ONE;
GET_RES_SLOT ();

3777
3778

2
1

return;
end;

010146

026727
001004
005067
000167
016701
020127
001011
016746
012746
010600

104417
022626
000167
020127

001063
016767
042767
016746
012746
012746
010600
104414
026727

1034172

016700
006300
016016
012746
010600

(36)

Code equals non of the above

! Return receive slot to the port and next slot

RET_STATUS = ZERO.

.SBTTL

0000006 000001
0000006
000662
000000G
0000%1

DECODE : HOV

1%:

000004G
000001

000574
000021

24:

000002G 000000G
174000
0000006
0000006
000003G
000002
000000G 000310

CMP
BNE
CLR
JMP
MOV
cMP
BNE
MOV
MOV
MOV

TRAP
CMP
JMP
CMP

0000006
1771606
000001

3$:

DECODE AZTEC GLOBAL ROUTINE

R1,-(SP)

RET STATUS, 01
14
RET.STATUS
194
RET.STATUS,R1
R1,011
24
EMSG.STRUCT.4, -(5P)
01,-(SP)
SP,RO

17
(SP)+,(SP).
184
R1,021

64
RC25.DATA.2, TEMP
9174000, TEMP
TEMP,-(SP)
OFMT13,-(SP)
02,-(SP)
SP,RO
14
TEMP, 0310

MOV
ASL
MOV
MOV
MOV

TEMP,RO
RO
RC.STRUCTURE -620(R0),(SP)
nl,-(5P)
SP,RO

BR
MOV
ASL

44
TEMP,RO
RO

TRAP

0000006

! RETURN RECEIVE SLOT TO PORT
! GET NEXT RECEIVE SLOT

BNE
MOV
BIC
MOV
MOV
MOV
MOV
TRAP
CHP

BLO

104417

000411
016700
006300

Page

end;

3776

USER$1:[AZTEC. CZRCFC]ZRCFC2.816;1

SEQ 0192

return status codes

PR?NTF (.EMSG_STRUCT [MSG3));

g;;g

VAX-11 Bliss-16 V4,0-579

3769

3762 2

3763

11-Jen-198S 08:19:19

;

27-Mar-1985 15:23:34

;

3588

:
:

3640
3649

3651

3638

: SP,»

:
:
H

3650
3640
3660

3662

3663

;

SP,s

3665

3668

;
:
:

SP,»
3665
3672

L15

000162
000166
000172
000174

27-Mar-1985 15:23:34
11-Jen-198S 08:19:19

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

ZRCFB2
vV03.0
016016

012746
010600
104417
004767
006000

103004

016700

104451

104444
005067
062706
000167
020127
001163
016767
042767
016700
000300

VAX-11 B1 iss-16 V4,0-579
USER#$ 1:(AZTEC.CZRCFCJZRCFC2.316;1

SEQ 0193
Page

(36)

PFE.STRUCT(RO),(SP)

0000006
000001

177274

Sg.RO
1

: SP,s

PC,AZTEC.READY
RO

3675

54
LOG.UNIT,RO
51

0000006
0000006
000010
000452
000031

S¢:

6$:

44
RET.STATUS
010,5P

3682

194

3661
3691

164
ER.STATUS, TEMP

000000G 0000006
177740 000000G
0000006

0177740, TEMP
RES.SLOT,RO

000077
000360

77,R0
:2?0.REC.ENV€LOPE°2(R0)

0000026

3678

3693

3697

EMSG. STRUCT, -(SP)

3700

Q000006

SP,RO
17
gES.SLOT.RO

3706

000077
000003G 000002

gEC.ENVELOPEoS(RO).OZ

0000006
00C001

el,-(SP)

077,R0

ER.STATUS,RO

0000006

SOUP,STRUCT(RO),(SP)

0000006
000001

01,-(SP)

0000006

7%:

3706
3713

TEMP RO
R0

e1,-(SP)

Sz.RO
1

0000006
000010

000011

SP,RO
14
134

SMSCP,STRUCT(RO),(SP)

0000006
000001

000018

3709

TEMP,RO
RO, 010

3716
3719

014,P2

3720
3716
3723

0000006

8s¢:

: SP,s

124

RO, 011
9

M15
ZRCFR2

MISCELLANEOUS SECTIONS
AZTEC GLOBAL ROUTINE

v03.0

012767

000005

USERS1:[AZT CZRCFC]ZRCFCZ.Blbzl
;

SEQ 0194
Page
99

(36)

3724

31716

0600006

$
:
H

3728
3716
3731

0000006

H
H
:
H

3732
3716
3736
3739

3743

000013
000014

VAX-11 Blis 16 v4.0-579

0000006

000012
000002

27-Mar-1985 15:23:3 4
11-Jen-1965 08:19:1 9

0000006
0000006
0000006

P2,(SP)
PC.PRTIFRU.CALLOUT
ER.STATUS, (SP)

165230

FNT14,

02.-(SP)

000002

-(5P)

SP,.RO
14
(SP)+,(SP).
154
ER.STATUS,
- (SP)

144

OFMT1S, -(SP)

000002

3727

; SP,e
:

;

3699
3697

3747

H Sp ®
15%:

020127
001010
016746
012746
010600

104417
022626
000407
216746

012746
010600

74
700
000704

00706

104417
022626
016700
006300
006300
066700
052760

004767
005067

012601

000207

000601

1
EMSG.STRUCT
.2, -(SP)

0000026
000001

3755

3757

SP,RO
17

0v00066
000001

17¢:

0000006

184:

(SP)+,(SP).
184
EMSG.STRUCT
<6, -(SP)
el,-(SP)
Sg.“o
1
(SP)e,(SP).
RES.SLOT,RO

3774

PC,GET.RES.SLOT

3775

0000006
000002
100000

RO
RO
RECEIVE.RING,RO
0100000, 2(R0)

0000006

RET.STATUS

175504

19%:

(SP).,Rl

RTS

Rougine Size:
Routin
AB$CODE e Base:
228 words,
0
; Maximum steck depth per invocetion:
8 words
;779

3692
3640

PC
12600

;

3756
3640

3766

; SP,e
H

:
:

3765

3776
3588

N15
ZRCFR2

MISCELLANEQUS SECTIONS
AZTEC GLOBAL ROUTINE

v03.0

3780
3781
3782

1
1
0

27-Mer-198S 15:23:34

11-Jen-198S 08:19:19

SEQ 0195
Page 100
USER$1-[AZTEC.CZRCFC)ZRCFC2.816;1
(36)
VAX-11 Blise-16 V4,0-579

end

eludom

0TS external references
.GLOBL
$SAVES, $SAVES,
.GLOBL
BL$MOD, BL$MUL

$SAVE2,

BLS$SHF

PSECT SUMMARY
Psect Name

Words
345
2980

AAS$CODE
AB$CODE

Attributes
RO,
I
,
RO,
I
,

LCL,
LCL,

REL,
REL,

CON
CON

Library Stetistics
--------

File

USER$1:(ARZTEC.CZRCFC)AZTECO.L16;2

Symbols

Toteal

Loaded

485

209

COMMAND QUALIFIERS

BLISS/PDP11/LIST ZRCFC2.B16/EN:NOEIS
Size:

Run Time:

3226 code ¢+ 99 deta words
03:38.2

Elapsed Time:
03:48.4
Lines/CPU Min1040
Lexemes/CP!! "1in:
9145
Memory
Used:
299 pages

Co-pilotion Complete

Percent
43

Mapped

Pages

Processing
Time

00:00.2

Bl6
ZRCFR3

0001

27-Mer-198S 15:27:28
27-Mer-1985 13:28:18

MODWE ZRCFB3 (

VAX-11 Bliss-16 V4.0-579
USER4$1:(AZTEC.CZRCFCJIZRCFC3.B16;4

SEQ 0196
Page

|
l

Clé
CZRCFCO RC2S FR END TEST
TVPINY e bt ps pst et pt ot pt pt pt po O OO O O
o 2 2 POV

VS V4

G¢

V¢

00 G0

Vs G4

Se G

ZRCFR3

STITLE

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

VAX-11 B
16 V4.0-579
1:(AZ
C.CZRCFCIZRCFC3.B16;4

'CZRCFCO RC2S FR END TEST

IDENT « 'vo3 0,
OPTLEVEL

ADDRESSING néoe (RELATIVE)

) =
BEGIN
:<BLF/LOUERCASE_KEY>

ssbttl 'TEST SECTION'
library ‘AZTECO';

! AZTEC LIBRARY

require 'BLSMAC.REQ';

! DIAGNOSTIC SUPERVISOR LIBRARY

structure

RCeS (0,

begin

! DEFINE ACCESS ALGORITHM T0
! ALLOW FIELD REFERANCES TO
! THE RC2S

ocal

RC_REG;

RC_REG =
RC_REG
end

«P,

1<BLF/PAGE
>

.(RC2S

£>;

+ supvals0)<0,

sbpval,

0>;

SEQ 0197
Page

e
(2)

CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

[
[]
*
.

*
1]
[]
14
®
*
L)

[J
[]
14

[]
.

[]
[J
»
[
.
.

H
1]
L)
.
[4
L)
[
.
[
.
[

[J
L4

L]
.
[
[

so o e P

[]
14

psect

OwnN

s et (o Pt 8

1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541
1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560

b Pt Pt Dt s o (o (ot et ot it Bt Bt ot s P P Pt i e P e ok ot e it ot e et i i (e P

e P

v03.0
[

[
[
[

4
[
[
[
[J
4

0 0= 5t et et ot B

ot (i ot i

.
L

D16
27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC3.B16;4

plit = $plits(
globsl),
global = $GLOBS nowrnte. noexecute, global, concatenate),
code = AC$CODE;
CMDBF1
ENDBF1

: block
: block

(16, word)
[16, word]

field (PACKET_FIELDS),
field (PACKETZFIELDS)

RING_B : vector (32, word],
DATA_PAT]
0)=
1 =

COMMAND BUFFER=16 WORDS

! WITH 16 WORDS BELOW FOR
! END MESSAGES.

: vector (3, word] rreset (
wo'ili11l’,
%o'044444"

' DATA PATTERN 1
1 DATA PATTERN 1

=
%o0'022222')
DATA PAT2 vector [3 uordj preset (

[(0])=

' DATA PATTERN 1

177400,

(1]«

! DATA PATTERN 2

so 007760'

(2]

! COMMAND BUFFER 1
! END MESSAGE BUFFER 1

! DATA PATTERN 2

%0'000377')

i DATA PATTERN 2

DATA_PAT3: vector (3, uordj preset (
{o =

%o'155555",

' DATA PATTERN 3

(2]

wo'066666')

! DATA PATTERN 3

1)=

wo'133333:

i DATA PATTERN 3

DATA_PAT4 ; vector (3, word) preset (
[0)s

so'000377',

{1}-

! DATA PATTERN 4

%0'170017"

2)=

! DATA PATTERN 4

%o0'177400'),

! DATA PATTERN 4

SEND_PKT : block [4, word) field (MSC_FIELDS),

! & WORD PACKET FOR SEND COMMAND

PATTERN_ADDR : ref vector (3, word);

[]

! SELECTED PATTERN ADDRESS

'HOST_BUF : vector [260, word);

! HOST BUFFER AREA

external

! HARDWARE P TABLE DATA IS STORED HERE
RT TABLE: ref block [WORD1 IN RT _TAB, word]) field (RT_FIELDS).
RC3S_ADDR : ref RC2S field (RC_REG),
' READ REGISTER ALGORITHM

RC25_DATA : block
UNIT : word,
LOG _UNIT : word,

(2., word] field (RC_REG),

RETRIES
: word,

PASSO
: word,

NUH_RETRIES
SWP_1RACE

: word volatile,

clncEL TIMER : word volstile,
:

FLAG FOR FIRST PASS

word voletile,

SWP_RETRIES: word volatile,
I_AM_NEX

! RCSA DATA
! UNIT UNDER TEST

ord volatile,

! INTERRUPT FLAG

INTERRUPT FLAG

COM_AREA : blockvector [REC_ALLOCATE + SND_ALLOCATE + HDR_SIZ, 2. word].
HEAD_AREA : ref block [4, word) field (HDR'FIELD),

RECEIVE_RING: ref blockvector (REC_ALLOCATE, 2, uord] field (DSC_FIELD),
SEND RING: ref blockvector [SND_ALLOCATE, 2. uord] field (DSC, FIELD),

REC ENVELOPE : blockvector
SND_ENVELOPE: blockvector

XMT_DATA_BUF : vector

RCV_DATA_BUF
RINGBASE,

vector

[REC_ALLOCATE, RB_SIZE + 2, word)] fleld (ENV _FIELD),
[SND_ALLOCATE,

(256, word],
(256,

word],

SB_SIZE . 2.
!

word) field (ENV_FIELD),

RING BASE ADDRESS

seopgéza

CZRCFCO RC2S FR END TEST

1627
1628
1629
1631

0 Bt B Bt o et s ot et P

ot e et b (e e b ot o Bt s (et it Bt

VAX-11 8 lis 1 4,0-579
AZTEC.CZR CFC]ZRCFC3 B16;4
USER$1:(AZ

BUF _DESCRPTR : word volatile,
CMD_REF : word volatile,
CMD_SLOT : word volatile,

BUFFER DESCRIPTOR AREA
COMMAND REFERENCE BUFFER
COMMAND RING SLOT

OM_09: vector [93, word

o
X

et (et et (e i o et Pt i (o et Pt e (e e P e Pt e Pt et e Bt s Bt s P

1576
15717

TEST SECTION

s et

1575

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

RES_SLOT

word volotile

DM_10 : vector

DM_11
DM_12
OM_13
DM_19
DM_21
DM_26

:
:
:
:
:
:

[ 58, word

vector
vector
vector
vector
vector
vector

100.
202.
105
156.
213
(413,

DM 27: vector

word
word
word
word
word
word

{307, word

RECEIVE RING SLOT
PROGRAM 09

OM
OM
DM
DM
DM
DM
DM

o
= 4

ZRCFR3
v03.0

PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM
PROGRAM

10
11
12
13
19
21
26

PROGRAM 27

BYTE_COUNT : word volatile.

BYTE COUNT BUFFER

MEM_SIZ
: word,

FREE MEMORY SIZE
PRINT MASK FOR NUMBER OF AURGMENTS

MSGADR : word volatile,

P_MASK : byte volatile,

B_MASK : byte volatile,

DATA2 : word volatile,
DATA3 : word volatile,
DATA4 : word volatile,
END_LBN : word volatile,
SWP_CONTINUE : word voletile,
SWP_MANUAL : word volatile,

MANU SW

word volatile,

SWITCH2 : word volatile,

RET UNIT _FLAG

word volatile,

Pl : word volatile
P2 : word volatule.

word volatile,

P4 : word volatile,

PS5 : word volatile,

P6: word volstile,
LBN
: word volatile,

LBN_ $1 : word volatile,

LBN_ED : word volatile,
LBN_SZ : word volatile,
SIZ_LBN : word,
CLK_ADR : word,
CLK_START

word,

CLK_HERTZ : word,

TICKS

word,

SECONDS : word,

MINUTES

word,

ERROR MESSAGE ADDRES

INIT MASK FOR WHAT STEP T0 DO
DATA FOR STEP 1 WRITE
DATA FOR STEP 2 WRITE
DATA FOR STEP 3 WRITE
DATA FOR STEP 4 WRITE
ENDING LOGICAL BLOCK @
SOF TWARE P-TAB MANUAL SWITCH

MENUAL INTERVENTION SWITCH1
MENUAL INTERVENTION SWITCHZ
RETURN UNIT STATUS BUFFER
FORMAT ADDRESS FOR ERROR REPOQT
FAILING FRU
FAILING REGISTER

DATA FOR ERROR REPORT
DATA FOR ERROR REPORT
DATA FOR ERROR REPORT
DATA FOR LBN
DATA FOR STARTING LBN
DATA FOR ENDING LBN
LBN INCREMENTING SIZE
OFFSET TO LBN TO GET TO
BOTTOM SURFACE
LBN SIZE TO GET TO NEXT TRACK
LOC. TO RETURN CLOCK ADDR.
STORE CLOCK STARTING ADDR.
THE CLOCK STARTING VALUE

THE # OF CLOCK INT. BUFFER
THE NUMBERS OF SECONDS BUFFER
THE NUMBERS OF MINUTES BUFFER

CMOD : wordg,
IN_BOUND : word,

COMMAND MODIFIER

SWP_START,
SWP_END,
SWP_TOP,
BUF _LENGTH,

STARTING TRACK BUF
ENDING TRACK BUF
TOP SURFACE
BUFFER LENGTH
TEMF, BUFFER
STAR.ING FREE MEMORY ADDR.

OUT_BOUND : word,

TEMP,

FREE_MEM_ADDR,

SEQ C199

Page

(1)

F16

TIME,

Cun TS Ran
AP O

s
e et Pt Bt s it o P

P IP_ADDRESS,

RET_STATUS,
RDAPTO,

27-Mar-1985 15:27:28

27-Mer-1985 13:28:18

D PR PR VD P SR SR
S SR PP IR SR SR CUD LD SR A D SED UL CUD SR
IR
CED IED PRSI P IR

1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688

INI_MSG

P_VECTOR,

e ot (s et ot ot e e s (e rt e o [ e (s s P P Pt Pt B

1660
1661
1662

MEM_SIZE,

H_SADD,
H_EADD,

s e ok o Bt Bt Pt o

1646

1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659

00 Bt P =t 4 e et Bt (8 i o it Dt e o i 1

1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642
1643
1644
1645

TEST SECTION

AR SN CUD SuD CAR OUD

CZRCFCO RC25 FR END TEST

ZRCFR3
v03.0

FREE MEMORY SIZE
FREE HOST MEMORY START AD.
FREE HOST MEMORY END AD.
INIT ERROR MESSAGE
VECTOR BUFFER
RC25 ADDRESS

COMMAND STATUS BUFFER

ADAPTOR FRU MESSAGE
PLIT LOCATION TO STORE DATA

ERROR MESSAGE 1 IN MOD 1
ERROR MESSAGE IN TEST

ERROR
ERROR
ERROR
ERROR
ERROR
ERROR
ERROR

MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE

MESSAGE
MESSAGE

IN
IN
IN
IN
IN

TEST
TEST
TEST
TEST
TEST

IN TEST
IN TEST

ERROR MESSAGE IN TEST

FORMATTED
FROMATTED
FORMATTED
FORMATTED
FORMATTED
FORMATTED
FORMATTED
FORMATTED

FROMATTED
FORMATTED
FORMATTED
FORMATTED
FORMATTED

MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE

MESSAGE
MESSAGE
MESSAGE
MESSAGE
MESSAGE
FORMATTED MESSAGE
FORMATTED MESSAGE

FORMATTED MESSAGE
FORMATTED MESSAGE

VER:C

FRU = MESSAGE

TEST HEADER MESSAGES

DBM18,
DBM19,
DgM22,

VAX-11 Bliss-16 V4.0-579

USER4$1:[AZTEC.CZRCFC)ZRCFC3.816;4

SEG 0200
p

age

|
(3)

Glo6
CZRCFCO RC25 FR END TEST

ZRCFR3

TEST SECTION

1
L4
*
*
.
.
®
.
1)
L)

°
.

v
[

[]
L4
L]
L)
.
.
L)
»

H
.
.
L]

.
L)

1
.
.

[
[
[
[

[}
L4
[
[
.
’
[
[
’
[
.
’

[]
[
[
[

1706

1707
1708
1709
1710
1711
1712
1713
1714
1715
1716
1717
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733

1734

1735
1736
1737
1738
1739
1740

1741
1742
1743
1744
1745

e P Pt s P

*
.

e e b P et i et P Bt s P o s i (oo P P

[
L]

1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705

b 0 Bt 0 Pt Pt o Pt Pt e o P P e Pt ot o e P Pt o s Pt s et b i P

0 00 1t B

i i e

v03.0

27-Mar-198 S 15:27:28
27-Mar-1985 13:28:18

DBM23,

0BM24,
DBM2S,
DBM26,
0BM27,
DBM28,

MSG_MSWICH ERR,

MSG_READ ERR,
MSG_SAC_ERR,

MSG_AVE_TIME,
MSG_PRO_TIME,

SK_FOR_ERR,
SK_REV_ERR,
SK_RAN_ERR,

SK_TOG_ERR,
nsE_WRITE ERR,
MSG_GUS_ERR,
AVAIL ERR,

MSG_SEEK _ERR,

AZT_READY_ERR,

EXE_SUP_ERR,
SND _DATA_ERR,
RE_DATA ERR,
BUFF _ERR,

OMC _ERR,
BRERR,
TIP;

external routine

NXMI : novalue,
AZT_INIT,
AZP INIT,

FIND _ CLOCK : novalue,
CLOCK _INIT : novalue,

RC2S$ERR_RPT : novalue,

INIT_COM_AREA,

REC_STATUS,

EX_SUP_PRG,

RANDOM_NUM,
REC_DATA,

SEND_DATA,

SET_CNTLR_CHAR,

!TEST IN PROGRESS

VAX-1 18 liss- 16 v4.0-579
USER$ 1:( AZTEC. CZRCFCIZRCFC3.B16;4

SEQ 0201
Page

(3)

H16
CZRCFCO RC2S FR END TEST

ZRCFA3
V03.0

1757

Y
S
ol ol Sl ot o

1750
1751
1752
1753
1754
1755
1756

ld ol o o

1746
1747
1748
1749

TeST SECTION

27-Mer-1985 15:27:28

27-Mar-1985 13:28:18

VAX-11 Blies-16 V4.0-579

USER$1:(AZTEC.CZRCFCJIZRCFC3.816:4

AVAILABLE,
READ_CMD,
READ_FILL_CMD,

ON_LINE

GEY_UNIT STATUS,

GET_CMD_3L0T,
DECODE

EXAM DATA,

AZTEC READY,
DO_RETRIES : novalue;
'<BLF/PAGE>»

! EXAMINE THE FREE MEMORY DATA
! GET AZTEC READY

SEQ 0202

Page

(3)

116
CZRCFCO RC2S FR END TEST

ZRCFR3
vV03.0

.
L)

[]
[]
1)

.
°
L)
.

1]
L)

1]
*
L)
®
L)
.

[]
]
]
[

H
L)
L]

[]
[]
L]
[
L)
’
L)
1]
L)
L4
.

4
[
[
[
[
e
[

4
’
.
[
’
[
[
’
.

1769

1770
1M
1772
1773
1774
1775
1776
17
1778
1779
1780
1781
1782
1783

2784

1785
1786
1787
1788
1789
1790
1791
1792
1793

1794

1795
1796
1797

1798
1799
1800
1801
1802

1803
1804

1805
1806

1807

1808
1809
1810
1811
1812
1813
1814

G G G G 8 Gl (0 O (o

[]

27-Mar-1985 13:28:18

VAX-11 Bliss-16 V4.0-579

USER$1
1:[AZTEC.CZRCFCIZRCFC3.816;4

]

L4 W8 N G G4 G G

1758
1759
1760
1761
1762
17€¢3
1764
1765
1766
1767
1768

TEST SECTION

NNNGWUVINNO
RO R NN NNSNSNSNNNONROROO ~I~JO -0 0r 0N O U U U

27-Mar-1985 15:27:28

BGNTST;
Yae

! TEST 1: REGISTER EXISTENCE TEST
! DESCRIPTION:
'

THIS TEST WILL FIRST CHECK FOR THE EXISTENCE OF
AND SA REGISTERS FOR THE DEVICE UNDER TEST,

THE ADDRESS OF THE IP

IF THESE MEMORY ADDRESSES ARE NON-EXISTENT, THE ERROR WILL BE

REPORTED.
IF THE OPERATOR HAS SPECIFIED LOOP ON ERROR, LOOPING WILL BE FROM THE
BEGINNING OF SUB TEST.

local
puMMY;
if

.SWP_TRACE then PRINTF (DBM7);

TEST 1

BGNSUB;
NUM_RETRIES = ZERO;

CLEAR RETRY COUNTER

while (.NUM_RETRIES lequ .SWP_RETRIES) do
M _NEX = FALSE;
20
sETvEc (4, NXMI, PRIO7);

f .(.RT_TABLE [RT_IP_ADDRESS])

then

CLEAR OUT NEX FLAG
SET UP FOR AN NEX TRAP

+ 2)

3§fl§? = 1;

READ THE SA REGISTER
THIS IS SO THAT IF THERE

IS AN NEX THERE WILL BE

A SINGLE OPPERAND INST,

SO THAT IT WILL TRAP

end;

CLRVEC (4);

CORRECTLY.

if ,I_AM_NEX eqlu ALL_ONES
then

SEE IF WE GOT AN NEX

B*fas
ASK = 1;

ADDRESS NOT THERE

PI = FMTY;

gg = ADAPT

P4 = ( RCZS ADDR: « 2;

ERRDF (1 M5G_1, RC2SS$ERR_RPT);
CKLOOP;
DO_RETRIES ()

PRINT ERROR MESSAGE

end;

if (.NUM_RETRIES eqlu ZERQ) then exitloop;
end;

NUM_RETRIES = ZERO;

CLEAR RETRY COUNTER

ENDSUB;

BGNSUB;
while (.NUM_RETRIES lequ

.SWP_RETRIES) do

SEQ 0203
Pa ge

(4)

J16
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION
Y. ENENENENENENEVENT. Y. Y. Y. Y. Y. RUPNT. BNT. Y. Y. Y. !
X6 XV, LV, [V, [V, [. Y. .
LV TN T0 Lo X

[

[« ]
W
n

We B¢ B G W) G0 B9 90 V9 G0 B¢ Ve B0 V¢ Ve Ve Ws S WP @0 G B0 B9 G G0 9 B¢ G0 O V¢ G GO B¢ WP Ve S @»

vV03.0

000000
000000
000040
000100
000200

111111

000202
000204

044444
022222

000210
000212
000214

007760
000377
155555

000206

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

begin
I_AM NEX = FALSE;

SETVEC (4, NXMI, PRIO?);

!
!

if .(.RT_TABLE (RT_IP_ADDRESS))

! READ IP REGISTER

then

USER$1:(AZTEC.CZRCFCJ)ZRCFC3.816;4

CLEAR TRAP FLAG
SET UP TRAP VECTOR IF NEX

begin
pumMy = 1;

end;

CLRVEC (4);

! CLEAR THE VRCTOR

if I_AM_NEX eqlu ALL ONES
.
then

CHECK FOR TRAPS

P_MASK = }|;
Pl = FMT);
P2 = ADAPT;
P4 = _RC2S_ADDR;

ERRDF (2, MSG_2,
CKLOO";
DO_P-TRIES ();

RC2S$ERR_RPT);

! PRINT OUT ERRO MESSAGE

end;

if (.NUM_RETRIES eqlu ZERQO) then exitloop;
end;

if .I_AM_NEX eqlu ALL_ONES
then

begin
DODU (.LOG_UNIT);
DOCLN;

IF REGISTERS ARE NON-EXISTENT

THEN DROP THE UNIT FROM TESTING

end;

ENDSUB
;
ENDTST;

CMDBF1:
ENDBF1:

177400

VAX-11 Bliss-16 V4.0-579

RING.B:

.TITLE
. IDENT

/V03.0/

.PSECT
.BLKW
.BLKW

20
20

.BLKW

DATA.PAT]:
.WORD
.WORD
.WORD
DATA,PATZ:
.WORD
.WORD
.WORD
DATA,PAT3:
.WORD

ZRCFB3 CZRCFCO RC2S FR END TEST

$OWN$,

-66667

44444

22222
-400
7760

377

-22223

SEQ 0204
Pa 2

K16
CZRCFCO RC2S FR END TEST

ZRCFB3

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

v03.0

133333
066666
000377

170017
177400

.WORD
. WORD

DATA.PATA:
.WORD

.WORD
SEND.PKT:
.BLKW

PATTERN.ADOR:

.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL

VAX-11 Bliss-16 V4,0-579
USER$1:(AZTEC.CZRCFC)ZRCFC3.816;4

-44445
66666

377

-7761
-400

1
RY.TABLE,

RC25.ADDR,

RC2S.DATA

I.AM.NEX,

CANCEL.TIMER, COM.AREA

UNIT, LOG.UNIT, RETRIES, PASSO
NUM . RETRIES, SWP.TRACE, SWP.RETRIES
HEAD.AREA, RECEIVE.RING, SEND.RING
REC.ENVELOPE, SND.ENVELOPE, XMT.DATA.BUF
RCV.DATA.BUF,

RINGBASE,

BUF.DESCRPTR

CMD.REF, CMD.SLOT, RES.SLOT. DM.09
DM.10, OM.11, DM.12, DM.13,
DM.19

DM.21. DM.26. DM.27. BYTE.COUNT

MSGADR,

MEM.SIZ,

P3,

PS,

P.MASK,

B.MASK

DATA1, DATA2, DATA3, DATA4. END.LBN
SWP.CONTINUE. SWP.MANUAL, MANU.SW
SWITCH2, RET.UNIT.FLAG, P1, P2
P4,

P6,

LBN,

LBN.ST,

LBN.ED

LBN.SZ, OFFSET, SIZ.LBN, CLK.ADR
CLK.CSR, CLK.START, CLK.HERTZ
TICKS,

SECONDS,

MINUTES,

CMOD

IN.BOUND, OUT.BOUND, SWP.START
SWP .END, SWP.TOP, BUF .LENGTH, TEMP

FREE .MEM.ADDR, MEM.SIZE, H.SADD
H.EADD, INI.MSG, P.VECTOR, P.IP.ADDRESS

RET.STATUS, ADAPTO. TIME, MSG.1
MSG.2, MSG.7, MSG.8, MSG.9, MSG.10
MSG.11, MSG.13, MSG.14, QST14

Q5T1iS, END.MSG. FMT1, FMT2, FMT3

FMT4, 'FMTS. FMT6, FMT7, FMT7A
FMT8. FMT9. FMT10, FMT11, FMT12
FMT16, FMT17, FMT18, FMT19, FMT20
FRU, FMT$A, 0BM7, DBM8, DBM9, DBM10

DBM11,
0BM16.
DBM21.
DBM26.
DBM31,
DBM39.

DBM12, DBM13, DBM14, DBM1S
DBM17, DBM18. DBM19. DBM20
DBM22, DBM23. DBM24. DSM2S
DBM27, DBM28. DBM29. DBM30
DBM32. DBM36. DBM37. DBM38
MSG.HSWICH.ERR, MSG.READ.ERR

MSG.SAC.ERR,

MSG.AVE.TIME,

MSG.SK.TIME. MES.SKO.TIME.
MSG.ROT.TIME, MSG.COM.WPT,

SK.REV.ERR,

SK.RAN.ERR,

MSG.PRO.TIME

MG.SKF.TIME
SK.FOR.ERR

SK.T0G.ERR

MSG.WRITE.ERR, MSG.GUS.ERR, AVAIL.ERR
MSG.SEEK .ERR, AZT.READY.ERR, EXE.SUP.ERR

SND.DATA.ERR. RE.DATA.ERR, BUFF.ERR
OMC.ERR, BRERR, TIP, NXMI. AZT.INIT
AZP.INIT,

FIND.CLOCK,

CLOCK.INIT

StQ@ 0205
Page

(4)

L16
CZRCFCO RC2S FR END TEST

ZRCFB3

27-Mar-1985 15:27:28
27-Mer-1985 13:28:18

TEST SECTION

vV03.0

.GLOBL
.GLOBL
.5LOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL

010146
032767
001407
012746
012746
010600

000001

0000006

$T1:

0000006
000001

022626
104402
005067
026767
101100
005067
012746
012746
012746
012746

104437

017700
032760
001402
012701
012700

104436

026727
001035

112767

012767
012767
005067
016700
062700
010067
104455
000001

0000006
0000006 0000006

14:
24:

0000006
000340
0000006
000004
0000006
000001
000002
000001
000004

CLR

BHI
CLR

BIT
BEQ

MOV
MOV
TRAP

CcMP
BNE

0000006 177777

MOVB
MOV
MOV

000001
0000006
000000G G00000G
000001
0000006
0000006
0000006
000002
0000006

CLR

MOV
ADD
MOV
TRAP

.WORD
WORD

.WORD
TRAP
ROR

BCC

ADD

000010

001003

0000006
0000006

5%¢:

JSR

1571
BNE

SET.CNTLR,CHAR

GET.UNIT.STATUS,

REC STATUS

AVAILABLE

GET.CMO.SLOT

DECODE, EXAM.DATA, AZTEC.READY
D0.RETRIES

R1,-(SP)

MOV
MOV
MOV
MOV
TRAP
MOV

000003

SEND.DATA,

MOV

TRAP

11
(4)

READ.CMD. READ.FILL.CMD, ON,LINE

AC4CODE,

8IT
BEQ

INIT.COM.AREA,

SEQ 0206
Page

EX,SUP,PRG, RANDOM.NUM. REC.DAT

.SBTTL
.PSECT

MOV
MOV
MOV
TRAP

104417

RC254ERR.RPT,

VAX-11 Bliss- 16 v4.0-579
USER4$1: [AZTE C.CZRCFC)ZRCFC3.B16;4

$71 TEST SECTION
RO

;

1755
1775

0%.SHP.TRACE
1
#0BM7,-(SP)

;

SP,.RO

; SP,s

(SP)+,(SP).

2
NUM_RETRIES

?gfl.RETRIES.SHP.RETRIES
1.AM_NEX

9340, -(SP)

;

1778
1780

;

1782
1783

1785

;

04,-(SP)

37
IRT.TABLE,RO
#1,2(RO)

e1,R1
€4 ,R0

36
I.AM _NEX,0-1
S$

#1,P . MASK
OFMT1,P1

e1,P2

P3
RC25.ADDR,RO
#2.R0
R0,P4

5SS
1

H
:

&, DUMMY

1788
1791

1793

:
;

;

1796
1797
1798
1799
1800

180:

;
;

1803
1806

MSG.1

RC2S$ERR.RPT

RO
44

010,5P
84
PC,D0.RETRIES
ng.RETRIES

M16
ZRCFR3

CZRCFCO RC2S FR END TEST

000232
000236
000240

000010

TEST SECTION

v03.0

000244
000246

000252
000254
000256
000260
000262
000270

27-Mar-1985 15:27:28
27-Mer-1985 13:28:18

000010

64:

0000006

74%:
8.

006000
0000006 0000006

VAX-11 B 1 iss-16 V4,0-579
USER$1:
[ RZTEC.CZRCFC)ZRCFC3.B16:4

@10,SP
74
#10,5P

SEQ 0207
Page

12
(4)

1781
1780
1810

24
NUM.RETRIES
67

14
2
Tg?.RETRIES.SHP.RETRIES

94:

10%:

000000G
000340

I.AM NEX

000003

9;. (SP)
3
ORT.TABLE,RO

1811
1814
1816
1817

9340, -(SP)

04,-(SP)

1819

01,(RO)

114

#1,R1
04 ,RO

11s:

36
IJ.AM NEX,0-1

134

01,P MASK
OFMT) ,P1
01,P2
RC2S.ADDR,
P4

5S
2

¢, DUMMY

1822
1825

1827
1830
1831
1832
1833
1834

MSG.2
RC2S$ERR.RP”

124

000010

01?.59

0000006
0000006

PC,DU.RETRIES

NUM_RETRIES

1836
1839

000010
000010

14%;

000000G 177777

15¢;

1815
1814
1843

0000006
16%;

ROR

BLO

164 words,

Rout ine fase:

1846

1848

(SP).,R1

1755

MOV
RTS

; Routine Size:

LOG.UNIT,RO
51

RO
9
PC

AC$CODE . 0000

Bl
ZRCFB3
v03.0
:

CZRCFCO RC2S FR END TEST
TEST SECTION

Maximum stack depth per

000000

004767

000004
000006
000010
000012

104466
006000
103773
000207

000000

invocation:

177264

1¢:

6 words,

;1852

' <BLF/PAGE>

Maximum steck depth per

Routine Bese:

invocation:

VAX-11 B lise-16 V4.0-579
USER#1:( AZTEC.CZRCFC)ZRCFC3.B16:4

SEQ 0208

Page

(8)

7 words

T1::

;: Routine Size:

27-Mer-1985 15:27:28
27-Mer-1985 13:28:18

2 words

.SBTTL

T1 TEST SECTION

JSR

PC,4T71

TRAP
ROR
BLO
RTS

66
RO
14
PC

ACSCODE « 0510

1850

CZRCFCO RC2S FR END TEST

ZRCFRS

TEST SECTION

1853
1854
1855
1856
1857
1858
1859
1860
1861

1862

1863
1864
1865
1866
1867
1868
1869
1870
1871
1872
1873

1874
1875
1876
1877
1878
1879
1880

1881
1882
1883

1884
1885
1886
1887
1888
1889
1890
1891
1892
1893
1894

189S
1896

000026

000030
000032
000040

HUWWWELALLEAVNVNIVIVIVIVIVNIA
L DD LL LD D D BN
W 0N

B B B0 B BT Vs B WE B VS G BT G Ve V9 2 O G0 G5 B¢ B0 B VI GF B0 GF G B0 Vs G0 G W6 Be G0 W G0 G G0 ©F O G G0 @6 S0

v03.0

000000

27-Mar-1985 15:27:28

005067
032767
001407
012746
012746
010600
104417
022626
026767
101060

27-Mar-1985 13:28:18

VAX-11 Bliss-16 V4.,0-579

USER41:[AZTEC.CZRCFC)ZRCFC3.B16;4

SEQ 0209

paée 14

(5)

BGNTST;
'00

: gggg % %gIThLZATION TEST (POWER UP DIAGNOSTICS)

'
'

THIS TEST INIT' THE AZTEC AND RUNS THE POWER UP DIAGNOSTICS BY
WRITING WITH STEP) DATA, THEN IT WILL CHECK FOR ERRORS AND

REPORT

AZTEC DOES NOT

COME UPTO STEP2 READ

H
NUM_RETRIES = ZERO;
if

.SWP_TRACE then PRINTF

uhnl:e(
.NUM_RETRIES lequ

(DBM8);

DATA1l = #0'137600'

i AZT_INIT
then

CKLOOP;

TEST 2

SELECT B_MASK FOR STEP 1 WRITE

t SELECT STEPL WRITE DATA WITH

! MAX RING SIZES ,IE AND VECTOR
' ADDRESS
!

PORT SHOULD NOW GET TO STEP2

DECODE STATUS

RETRY IF ERROR

! AFTER FINISHING INTEGRITY CHECK
' DIAG. IF NOT REPORT ERROR
MSG_14, RC2SS$ERR_RPT);

.RET_STATUS then DECODE ();

RETRIES =
end;

« .RT_TABLE [RT_VECTOR)/4;

()

beain
ERRDF (3,

CLEAR RETRY COUNTER

.SWP_RETRIES) do

gTEP 1 WRITE WITH STEP 2 READ

B_MASK =

TRUE;

if (.RETRIES) then DO_RETRIES ();
if (.NUM_RETRIES eqlu ZERQO) then exitloop;
end;
return;

ENDTST;

0000006
000001
0000C0G

$72:

0000006
000001

.SBTTL
CLR
g%g

$T2 TEST SECTION
NUM.RETRIES
?%.SUP.TRACE

;
;

MOV
MOV
MOV

oDBM8,
- (SP)
01,-(SP)
SP,RO

;

TRAP

0000006 0000006

1$:

cMP

g:;

(SP)+,(SP).

ggfl.RETRIES.SUP.RETRIES

;

1864
1866

5P,
s
1868

D1
CZRCFCO RC2S FR END TEST

ZRCFR3
V03.0

27-Mar-1985 15:27:28

TEST SECTION

112767
016700
016046
012746
004767

010067
162767

004767
006000
103022

27-Mer-1985 13:28:18

000001
000000G
0000006
000002
000004
0000006
0000006
040200
0000006

MOVB
MOV
MOV
MOV
JSR
MOV
SUB

0000006

000003
0000006
0000006
000001
0000006
032767
001402
004767
0000006

104465

000202
000204
000206

000001
000001

0000006
0000006

0000006

0030006

1871
1872

TRAP

)

1881

g%.RET.STATUS

1883

3
MSG.14
RC2S$ERR.RPT

gé;

JSR

1876

PC,DECODE

TRAP

8CC
cMp

34
(SP)+,(SP).

ROR

34
44

RTS
MOV
géa

5%¢:

;ag

NUH RETRIES

64:

CMP
RTS

(SP)o (SP).

74:

(5)

LWORD
.WORD
.WORD

2%:

USER$ 1:(AZ TEC. CZRCFC]ZRCFC3 816;4

SEQ 0210

JSR
ROR

8CC

104455

006000
103002
022626
000207
012767
032767
001402
004767
005767
001002
022626
000207
022626
000711

®1,8.MASK
RT.TABLE,RO
2(R0O),-(SP)
04,-(SP)
PC,BL$DIV
RO,DATAL
#40200,DATAL
PC,AZT
. INIT

v AX-1 18 li 89-16 vV4,0-579

PC
01 ,RETRIES
g%.RETRIES

JSR

1886
1889

PC.DO.RERIES

cMP

(SP)O (SP).

1891

1869
1868

; Routine Size:

68 words,
Routine Bese:
ACS$CODE - 0524
depth
per
k
invocetion:
4
stac
words
mum
;: Maxi

000000
000000
000004
000006
000010
000012
;:
;

004767

T2::
1%:

104466
006000

103773

LSBTTL

T2 TEST SECTION

JSR

PC,$T12

TRAP
ROR

66
RO

RTS

BLO

000207

Routine Size:
Maximum stack

;1897

177564

6 words,
depth per

Routine
Base:
ACSCODE
.
invocation:
2 words

' \BLF/PAGE>

0734

1895

CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

GG 08 08 08 G O G OGN N G4 G G4 Q8 G G G0 G G0 (4
GGG
VNNUVNIVNAENIUIVIVINIE D D B D B 5 5 555 5 ()
VNN

WS W W3 B2 WE VY TS W5 WL W B0 VL VL WL W0 B0 Ve B0 V8 B¢ B2 V5 Ve B VI Gr Ve T G S0 W G1 7 96 S0 WP G0 G Vs V0 Vs We VO BF Ve Vs V0 06 G4 Os G0 09 O @6 @5 S0 Gs

v03.0

1898
1899

27-Mer-1985 15:27:28
27-Mer-1985 13:28:18

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFCJIZRCFC3.816;4

BGNTST;
Yoo

TEST 3 - DIAGNOSTIC WRAP TEST

DESCRIPTION:

]

'
'
'
'

THE AZTEC WILL BE INITIALIZED IN DIAGNOSTIC WRAP MODE AND A ONE BIT
AND ALSO ZERQ BIT FLOATED THROUGH THE SA REGISTER TO SEE THAT IT

ECHOES PROPERLY

]

A FAILURE TO ECHO WHAT WAS WRITTEN WILL RESULT IN A CALLOUT 10 THE

ADAPTER CARD FRU.

‘

IF THE OPERATOR HAS SPECIF1ED LOOP ON ERROR,

THE FAILING WRITE AND READ.

!
!

THE PROGRAM WILL LOOP ON

ocal
TST_PAT;

.SWP_TRACE then PRINTF

(DBM10);

TEST

NUM_RETRIES = ZERO;
while ( .NUM_RETRIES lequ
begin
1

.SWP_RETRIES) do

T18 = §4;

! STEP1 WRITE

[]

8 MASK

MASK FOR STEP1 READ

= Q;

DATA] = so'140000';

STEP1 WRITE WITH WRAP MODE BIT SET
TIME QUT COUNTER
TEMP STORAGE FOR RCSA DATA

DATA2 = %0'10';
DATA3 = ZERO;
if AZT_INIT
then

()

begin

ERaDF (4, M3G_14, RC2SSERR_RPT);
CXLOOP;

RETRIES =

eise

end

UR?iRC?S (RCSA, .DATAL);

while ((.DATA3 nequ
begin

.DATA1l)

! DO STEP]1 WRITE WITH DWM,
and (.DATA2 nequ ZER0)) do

DELAY (333);
DATA2 = ,DATR2 - 1;
DATAZ = _RC25_ADDR [RCSA,

end;

' PRINT NUT ERROR REPORT

TRUE;

begqin

TST_PAT

CALL STEP 1 ROUTINE

%0'000001';

RC_ALL]);

!
!

START

TEST PATTERN TO

SEQ 0211

Page

(6)

F1
CZRCFCO RC2S FR END TEST

ZRCFB3

TEST SECTION

incru FLOAT

WOWOOOOINIIOOONDN

1955

19%5
1957
1958
1959
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969

incru COUNT
begin

from O to § do

WRT _RC2S (RCSA,

DELAY (10);

1974
1975
1976

000000
000004
000010
000016
000020
000024
000030

(6)

.TST_PAT;

WRITE TEST PATTERN T0 SA

! WAIT FOR IT T0 ECHO.

.RC2S5_ADDR [RCSA, RC_ALL]);

!
!

Pa =

! GOOD DAT

P6 = (, RCZS ADDR) + 2;

! GET RCSA DATA

PAT;

MESSAGE ADDRESS
FAILING
F

! FAILING ADDRESS

PS = RCBS DATA [RCSA, RC_ALL);

ERRDF (S, MSG_7, RCZSSERR "RPT);

004167
162706
032767
001407
Cl12746
012746
010600

FLOAT ZEROES AND THEN ONES

ASK = 2;
= FMT2;
pz = ADAPT;

CKLOOP;

1995
1996
1997
1998

SEQ 0212

if .RC2S_DATA [RCSA, RC_ALL] nequ .IST_PAT
! TEST SA FOR TEST PATTERN
then
IF NOT EQU THEN
bea
! PRINT OUT ERROR REPORT

1973

1990
1991
1992

.TST_PAT);

RC2S_DATA [RCSA, RC_ALL)

1971
1972

1980
1981

.COUNT eqlu 1 then TST_PAT = not

BGNSUB;

VAX-11 Bliss-16 V4,0-579
USER$1:[AZTEC.CZRCFC)IZRCFC3.B16;4

z NOW FLOAT TEST PAT

from O to 15 do

beg-n

1970

HOWNELLALELBNNOOON
YOO

VO VO G0 90 W) G0 W 0 GO

Ve ©s

v03.0

®s G2 B2 W6 B9 BT VS VL VO B B0 W WS VS V6 WS G G U B2 V0 G0 G0 G0 VO V0 V0 V0 V0 G G0 Vs G

27-Mer-1985 15:27:28
27-Mer-1985 13:28:18

RETRIES
end;

' er DATA
'

TRUE;

ENDSUB;

end;

TST_PAT
TST_PAT
end;

= not .TST_PAT;
= ,TST_PATt};

! SHIFT THE BIT DOWN 1

end;

! DO RETRIES IF IN ERROR

if (.RETRIES) then DO_RETRIES ();
if (.NUM_RETRIES eqlu ZERQO) then exitloop:;
end;

WRT_RC25 (RCIP,
ENDTST;

0000006

000006
000001

0000006
000001

$T73:
000000G

'REINITIALIZE THE PORT

ALL_ONES);

.GLOBL

L$OLY

LSBTTL

$T3 TEST SECTION
R1,$SAVE4

;

1896

Oi.SUP.TRACE

1920

JSR

SuB
géa
MOV
MOV
MOV

26, 5P

1
00BM10, -(SP)

#1,-(SP)

SP,RO

SP,*

Gl
CZRCFCO RC2S FR END TEST

ZRCFR3
V03.0

27-Mer-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

000032
000034
000036
000042
000030
000052
000056
000064

VAX-11 8 liss-16 V4,0-579
AZTEC.CZRCFC)ZRCFC3.B16;4
USER$1:(AZ

SEQ 0213
Page

(6)

(SP)s+,(SP).

0000006
0000006 0000006

NUM.RETRIES
ggfl.RETRIES.SUP.RETRIES

000470
000004
0000006
0000006
140000 0000006
000010
0000006
0000006
0000006

224
04,T1P
8.MASK

1922
1924
1926
1930
1931
1932
1933
1935

#-40000,DATA]
010,DATA2

DATA3

PC,AZT.INIT
RO

1938

MSG. 14
RC2S$ERR.RPT

000414
000001

RO
43

234

#1,RETRIES

0000006

0000006
0000006
000002
0000006 0000006

S$:
64:

204

DATA1,R]

RC25.ADDR,RO
R1,2(RO)
DATA3,DATAL

+,RCM.REG

RCM.REG,
*

1940
1935
1944
1946

0000006

000515
0000006
000004

000256
000262
000264
[000266
000274
00027¢€
00300
000302
000304
|000310
000314
000320

016700
016016
011667
000744
012702
005004
005003
022727
001001
005102
104402
010201
016700
010160
012701
001411

$$TMP
$$TMP]

$$THMP2

10$:

000001

11%:
12%:

13
144

0000006
000002
000012

DATA2

RC25.ADDR,RO

2(R0O),(SP)

*,RC.REG
RC.REG,
*

#1,R2
R4
R3
00,01
144
H2

*, TST.PAT
FLOAT

g?P).DATAS

000001

15¢:

1948

*,$8$TMP]

0000006
0000006
000002
0000006

000000

., $8TMP2

7%:

2
R2,R1

RC2S.ADDR,RO
R1,2(RO)
#12,R1

18¢

COUNT

1949
1950
1946
1953
1955
1958
1961

TST.PAT

TST.PAT,RCM.REG

RCM.REG,
*
*,$$TMP2

1964

1965

H1
CZRCFCO RC2S FR END TEST

ZRCFB3

TEST SECTION

vV03.0

000322
000326
000330
000334
000336
000340
000342
000344
000350

27-Mar-1985 15:27:28

016700
001404
005066
0053C0
001374
005301
000766
016700
016066
016667
026602
001436

112767
012767
012767

016700

062700

010067
010267
016767

104455

27-Mar-1985 13:28:18

000000G
000004

164:

17%:
0000006
000002
000002
000002
000002G
000002
.
000002
0G
000000G
000G
000001
0000006
0000006
000002
0000006
0000006

18¢:

0000026 0000006

104465

000562

006000
103702
005203
020327
101674
005102
006302
005204
020427
101662
032767
001402
004767
005767
001402
000167
012700
010077
062706
000207

B8R

DEC
BNE
NEC

000001

0000006

194

000001

RCZS ADDR,RO
2(R0) 2(5P)
2(SP),RC2S.DATA.?
2(SP),R2
194
#2,P . MASK
OFHTa.Pl
01,P2
RC2S.ADDR,RO
#2,.R0
RO,P6
R2,.P4

TRAP

.WORD
.WORD
TRAP
ROR
8LO
MOV

MSG.7
RC2S$ERR.RPT
65
RO
19¢
#1,RETRIES

TRAP

ROR
BLO
INC
cMP
BLOS
COM
ASL

000017
000001
0000006
0000006
177274
177777
0000006
000006

20$:
21¢:
224:
23$:

RO
144
R3

R3,81
13¢
R2

124

384

JSR
187
BEQ
JMP
MOV
MOV
ADD

RTS

186 words,
Routine Base:
AC$CODE
Max mum stack depth per invocation:
12 words

.SBTTL

R4,017

« 0750

T3 TEST SECTION

(6)

; $4TMP2
+,RC. REG
RC,REG
RC2S. DATAo? TST.PAT

1966
1964

1971
1972
1973
1974
:

TST.PAT,s

1975
1976
1977

1979
1980

; COUNT

1958

;

TST.PAT

FLOAT,s

1985
1986
1955

; COUNT,s

; T1ST.PAT
; FLOAT

#1,RETRIES

RO, 9RC2S ADDR
#6,5P

Page

3 $4TMP
; $4TMPL

1991

214

PC,DO.RETRIES
NUM,RETRIES
224
28
#-1,R0

SEQ 0214

¢, 84TMPL

BLOS
BEQ

USER#1:(AZTEC.CZRCFC)ZRCFC3.816;4

; Routine Size:
;

RC2S. DATA.2,PS

INC

CcMP

0000006

RO
164
Rl

MOV
MOV
MOV
cMP
BEG
MOVB
MOV
MOV
MOV
ADD
MOV
MOV
L.WORD

006000

104467

L4$OLY,RO
174
4(SP)

MOV

000005
0000006
000000G

103403
012767

MOV
BEQ
CLR

VAX-11 Blies-16 V4.,0- 579

1993
+,RCM.REG

RCM.REG,¢

1997

1896

000000

000000
000004
000006

000010
000012
;
;

004767

13::
1%:

104466
006000

103773
000207

:
Routine
Size:

Maximum stack

1999

177210

27-Mer-1985 15:27:28
27-Mar-1985 13:28:18

JSR
TRAP
ROR

PC,$13
66
RO

RTS

8LO

6 words,

depth per

)

Routine

invocation:

1<BLF/PAGE
>

Base:

2 wWords

AC$CODE

1534

VAXUSER

!—vm
)b-‘

CZRCFCO RC2S FR END TEST
TEST SECTION

ZRCFB3
v03.0

.-'D-.

11
1
4,0-579
Z CFCIZRCFC3.B16;4

SEQ 0215
Page

(6)

1997

J1
CZRCFCO RC25 FR END TEST

ZRCFR3

27-Mar-1985 15:27:28

TEST SECTION

UV
G LD LLLLOLL B B2 L U G Wl U L G W L Ll Gl O O G (G G 0 G G G (N U (o (o (L (o (o (O (e e

v03.0

27-Mar-1985 13:28:18

]

BGNTST;
Yoo

}

TEST 04

VECTOR AND BR LEVEL TEST

g DESCRIPTION:

THE INIT SEQUENCE WILL BE STARTED WITH THE INTERRUPT ENABLE BIT SET TO

VERIFY THE AZTEC'S VECTOR AND BR LEVEL.

THIS TEST ASSUMES THE VECTOR GIVEN BY THE OPERATOR 1S CORRECT.

THE PRIORITY LEVEL OF THE INTERRUPT REQUEST WILIL

BE VERIFIED.

FAILURE OF THE AZTEC TO VECTOR PROPERLY WILL NECESSITATE THAT THIS

PROGRAM BE RESTARTED.

LOOP ON ERROR WILL RESTART THIS TEST IF THE ERROR IS RECOVERABLE.

]

WILL BE REPORTED.

A COMPLETED INTERRUPT AT THE WRONG BR LEVEL

i
'

NUM_RETRIES = 2ERO;
if

.SWP_TRACE then PRINTF

while (.NUM_RETRIES lequ

begin

(DBMI11);

TEMP

= PRIO7;

SETP RI (.TEMP);
if A ZT_INIT

then

START WITH HIGHEST PRIORITY

)

STEP 1 READ MASK
!INTERRUPT ENABLE BIT SET
SET HOST PRIORITY

.RT_TABLE [RT_VECTOR)/4;

()

BRING UP TO STEP 1 READ
AND GET STATUS

IF ERROR

begin

ERaoF (6, MSG_14, RC2SS$ERR_RPT);

THEN
REPORT IT

DECODE STATUS

.RET_STATUS then DECODE ();

CKLOOP;

RETRIES

else

TEST 4

1 CLEAR INTERUPT FLAG

I _AM_NEX = FALSE;

B MAS K = Q;
DATA 1 = %0'104600'

.SWP_RETRIES) do

718 = S;

end

TRUE;

begin

WRY RC25 (RCSA, .DATA1);

WRITE STEP 1 DATA
WAIT FOR INTERRUPT VER:C

DELAY (3000);
while

(.TEMP gequ %0'140')

begin

)

VAX-11 Bl iss-16 V4,0-579
USER$1:[A ZTEC.CZRCFC)ZRCFC3.816;4

SEQ

0216

Page

(7)

K1
CZRCFCO RC2S FR END TEST

ZJRCFR3

TEST SECTION

HUWWELLLALNVIUVIIAVTVIVIVIVIUVIVIVIIVINSAG
B D BTN
OO OO

n
o

v03.0

010146
005746
005067
032767

000072
000076

27-Mer-1985 15:27:26

001407
012746
012746
010600
104417
022626
026767
101402
000167
012767
012767
005067
105067
016700

27-Mar-1985 13:28:18

.I_AM_NEX eqlu ALL

TEMP

ONES then exitloop;

- %0'40';

SETPRI (.TEMP);

RETRIES
end;

S5EQ 0217
Page
22
USER$1: (AZTEC.CZRCFC]ZRCFC3.B16;4
(7)

VAX-11 81 iss-16 V4.0-579

'IF INTERRUPT DI D NOT

NOT OCCUR

! LOWER CPU PRIORITY

TRUE;

end;

é: LI_AM_NEX eqlu ALL _ONES

¢ IF INTERRUPT OCCURED

begin
TIP

_TEMPT-S

}1;

SETPRI (PRIOQO);
SETVEC (.RT_TABLE [RT _VECTOR]), NXMI,

PRINTF (INI_MSG,
if

else

GET PRIORITY

' SET HOST PRIORITY 10 O
.TIP);
! SET UP SERVICE ROUTINE.

.RT_TABLE (RT_VECTOR),

.TIP);

.TIP nequ .RT_TABLE [RT_BR_LEVEL) then PRINTF (BRERR);

RETRIES = FALSE;
end

begin

RETRIES =

TRUE;

ERRDF (7, END_MSG, 0);
CXLOOP;

! IF RECEIVED BR IS NOT THE

SAME AS TYPED REPORT E RROR

¢ ERROR

end;

.RETRIES then DO_RETRIES ();

“f (NUM_RETRIES eqlu ZERD) then exitloop:;
end;

ENDTST;

$74:

0000006
000001
0000006

.SBTTL

MOV
187

CLR
BIT

0000006
000001

MOV
MOV

MOV

cMP

$74 TEST SECTION

R1, (SP)
-(SP)

NUM.RETRIES
01,5WP
. TRACE

Sg.RO
1
(SP)e,(SP).

14:

gflgs

ggfl.RETRIES.SUP.RETRIES

000520
000005

2%:

JMP
MOV

16$
05,11P

0000006

000340
0000006
00%v006
7000006
0000006

MOV
CLR
CLRB
MoV

2025
2027

00BM11,-(SP)
01,-(SP)

000000G 0000006

1998

0340, TEMP
1.AM_NEX
B.MASK
RT.TABLE,RO

; SP,s
2029

2031
2032
2033

2035

L1
CZRCFCO RC2S FR END TEST

JRCFAS

TEST SECTION

v03.0

000102
000106
000112
000116
000122
000130
000134
000136
000142
000144
000146
000150
000152
000154
000156
000164
000166
000172
000174
000176
000200
000202
000204

27-Mar-1985 15:27:28
27-Mer 1985 13:28:18

016046
012746
004767

010067
162767
016700
10444)
004767
006000

MOV

000002
000004
0000006
0000006
073200 0000006
0000006

PC,AZT.INIT
RO

0000006

01 ,RET.STATUS
3$
PC.DECODE
65

2044

RO
44

(SP).,(SP).

000001

0000006
0000006
000002
011610

Ss:

6$:

0000006

1 64
01,RETRIES

104
DATA], R}

RC2S.ADDR,RO
R1,2(RO)
011610,R1

;

¢,RCM REG

;

RCM_REG,

L$OLY,RO

.,“T"pl

:
:

$sTMP
$sTMP]

;

$STMP2

000004
8s:

000000G 000140

9s:

0000006 177777

162767

000040
0000006
0000006

012767
000756
026727
001065

000001

016716
012746
004767
010067
005267
005000
10444
016716
012746
016700

2042

MSG. 14
R
RPT
RC2SS$ER

103002

016700
10444

2038

004767
104465
006000

010160

2036

S
SS

001402

(7)

-(SP

0000006

0000006
00000006
032767
000001

Page

04,-(4P)

073200,0ATA]
TEMP,RO

000006

012701
001411
016700
001404
005066
005300
001374
005301
000766
026727
103416
026727
001412

USER$1:[AZTEC.CZRCFC)ZRCFC3.B16;4

5€Q 0218

PC.BLIDIV
RO.DATA1

103023
104455

022626
000573
012767
000444
016701
016700

2(RO),

VAX-11 Bliss-16 V4,0-579

000000G
177773

0000006
0000006
0000006
0000006
0000006
0000006

10
I.AM_NEX,0 |
10$

040, TEMP

TEMP,RO

0000006

0000006 177777

64
TEMP, 0140

10%:

01,RETRIES
9
I.AM NEX,0 )}
124

;

¢, 88THP?

2047
2038
2051
2052

2054
2057
2059
2060
2061
2054
2066

TEMP, (SP)
0-5,-(SP)
PC.BL $SHF
RO,TIP
T11P
RO

2069

TIP,(SP)
ONXM], (5P)
RY.TABLE,RO

2071

2070

000400
000404
000410
000412
000416
000422
000426
000432
000436
000440
000442
000446
000454
000456
000462
000466
000470
900472
000474
000500
000504
000506
000514
000516
000520
000522
000524

000530
000532

000534
0005%;
002544
100546
000552
000556
000560
000562
000564
000566
000572
000574
576

016046
012746
104437
016716
016700
016046
012746
012746
010600
104417
016700
026760
001407
012716
012746
010600
104417
005726
005067
062706
000414
012767
104455
000007
000000G
000000
104465
006000
103002
022626
Andlé
032767
001402
004767
005767
001002
022626
000403
022626
000167
005726
012601
000207

000002
000003

MOV
MOV

0000006
0000006
000002
0000006
000003

MoV
MOV
MOV
MOV
MOV

006000

10%77%

000207

00C000G

12%:

MOV

’fi-'

OI
. MS3,
NI
-(SP)

SP RO

SP,e

il
OBRERfl (sP)
01,-(SP)

000001

24
(7)

2(a0) -($P)

MoV
zgv

CLR
ADD

ZRCFCIZRCFCS 816:4

SEQ 0219

2072

1.1aBLE RO

0000006
000001

2074

119 4(RO)

SP.RO
17

SP,e

(SP).
RETRIES

2077

13¢
01 ,RETRIES
S5

2081
2082

€16,5P

2068

END
. MSG
0

000001
000000G

177244

0000006

13¢:

8I7

144

157

158:

16%:

157

JHP

192 woras,
Rout
0
ine Bese:
ACSCODE
‘Avocet:on:
14 words
: "Mer eum steck gepth per

104466

37
YIP (SP)

RT.TABLE,RO

11%:

v4,0-5

(SP)

MOV
cHe

0000006
000016

3,-(5P)

000000C
000000G 000004

;: Routine Size:

004767

2(RO),

VAX-1
USER'$

177174

T14::

1s:

65
RO
134
(SP).,(SP).
164
#1 RETRIES
144

PC,00.RETRIES
NUM . RETRIES

2088

2030
2029
1998

15¢
(SP).,(SP).
)+, (SP).

)e
)e Rl

. 1550

LSBTTL

JSR

PC,874
66

TRAP

ROR
B8LO

2086

Rf\r—\po—\.‘
%%“%2

v03.0

27-Mor-198S 15:27:28
27-Mar-1985 13:28:18

CZRCFCO RC2S FR END TEST
TEST SECTION

ZRCFR3

.‘u

RO
%)

TEST

SECTION

2090

N1
WY O

Qout
ne S :e:

,o Max mum stec-

CZRCFCO RCRS FR END TEST
TESY SECTYION
6 words,
gepth per

Rout ine Bese:
ACICODE
nvocet on:
2 words

' «B.F /PAGE>

27-Mer-1985 l%: 7:28
27 Mer-198S |
8:18
N

JQCFA3

2350

VAX-1 18 1 i99-16 V’.,0-57
579
USERS]:
1:( Az TEC.CZR CFC)ZRCFC3.816;4

SEQ 0220
Page
05
(7)

Be
ZRCFB3

CZRCFCO RC2S FR END TESY

v03.0

TEST SECTION

H
3

2094
2095

3
3

BGNTS1;

H
H
:

2097
2098
2099

3
3
3

2096

27-Mer-198S5 15:27:28

27-Mer-1985 13:28:18

gig?

:
:
:
H
H

2102
2103
2104
2105
gigg

3
3
3
3
g

¢
'
!
!
s

:
:

2108
gi?g

3
3

NUM_RETRIES = ZERO;

! CLEAR RETRY COUNTER

giié

;

2113

while (.NUM_RETRIES lequ .SWP_RETRIES) do

:
:
:
:
:
H

2115
2116
2117
2118
2119
2120

:
:
:
:
:

2lee
2123
2124
2125
Sigg

6
€
6
6
g

:
H
H
:

2128
2129
2130
2131
gi;g

6
6
6
7

S%gg

:
:
:

2114

;2121

4
4
&
6
6
6

USER$1:[AZTEC.CZRCFCJZRCFC3.816;4

Yoo

!
! TEST S: STEP 1 -3 INITIALZATION TEST
!
3 DESCRIPTION:

VAX-11 Bliee-16 V4.0-579

THIS TEST WILL CHECK FOR INFORMATIONS ECHOED FROM PORT AT
EACH STEP READ COMING UPTO THAT STEP FROM SCRATCH. IF THERE WAS
AN ERROR REPORTED OR ECHOED INFORMATIONS WERE INCORRECT
THE SAME WILL BE REPORTED.
LOOP ON ERROR WILL BE FROM THE BEGINNING OF SUB TEST.

.SWP_TRACE then PRINTF (DBM9);

TEST S

begin

STEP1 REAC
BGNSUB;
'
'
‘check if usinx Q_bus end flag
!
TEMP = READBUS ();
H
' STEP 1 READ
!
B_MASK = 0;

ERRDF (8, MSG_14, RC2SS$ERR_RPT);

BRING UP TO STEP 1 READ
AND GET STATUS
IF ERROR
THEN
' REPQRT 17

;

if .RET_STATUS then DECODE ();

' DECODE STATUS

213
2137
gigg

7
7
g

CKLOOP;
RETRIES = TRUE;
end;

;

Si:g

:
:
:
H
:

2142
2143
2144
2145
2146

8
8
7
7
7

H
H
:

2148
2149
2150

;2147

if AZT_INIT ()

! START PORT INIT WITH MASK = 0

then

;

6
7
7
7

beain

!
'
'
'

! CHECK FOR CONTROLLER DEPENDENT INFORMATION FROM RCSA AT STEP 1 READ
if ((.RC2S_DATA [RCSA, RCSA_NV])
!
!

then

! CHECK THAT THE NV B8IT DID
! NOT SET,.
or not (.RC2S_DATA [RCSA, RCSA_DI)))
! CHECK IF DI BIT SET
or (.TEMP) and not (.RC2S_DATA {RCSA. RCSA_QB%) ! CHECK THE QB 81T
or not (.TEMP) end (.RC2S_DATA [RCSA, RCSA_QB]))

beain
P_MASK = 2,
Pl = FMTZ;

! IF NOT SET
!

THEN

SEQ 0221
(4

ooe (gg

Ce
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

.
.
.
.

1]
[]
.

[]
.
.

.
[]
1]
.
°
L)
.
L)
L)
L)
.
.
.
*
LJ
L]

;
*
[
[
L]
[

.
.
.
.
[
?
.

2161
2162

2163
2164

2165

2166
2167
2168
2169
2170
2171
2172
2173
2174

2175
2176
2177
2178
2179
2180

[

26 1. 2o 1. X

2181
2182
2183

2151
2152
2153
2154
2155
2156
2157
2158
2159
2160

1. 1. RNT. ENENENENT. RNENENRNPNPNRNRNT.
Y. ¥. ¥, Y. ¥. Y. Y. W W W WY, ¥, ¥. Y. Y. Y 0N P Py oy Py

vV03.0
.

.
[

P2 =

bS + CaCss DATA (RCSR'

P6 = %0 017
RETRIES =
end;

[

.RC2S_DATA [RCSA,
.JEMP<H, S>;

[

[]

LR R

[

RZ_ALLI;

! PORT SPECIFIC INFO
! GIVE IT T0 OPERATOR

PRINTF (FNTS, .TEM®);

ENDSUB;

BGNSUB;
B8 _MASK

};

DATA] =« %0°'137600'

+ .RT_TABLE (RT_VECTOR)/4;

! STEP1 WRITE DATA FOR MAX
! RING LENGTHS,IE AND
! VECTOR ADDRESS

! DO INIT AND IF ERROR

i€ AZT_INIT ()

then

beain
ERRDF (10,

CKLOOP;

else

! REPORT ERROR

MSG_14, RC2S5$ERR_RPT);

.RET_STATUS then DECODE ();

RETRIES
end

! DECODE STATUS

TRUE;

begin

! CHECK FOa ECHOED INFORMATIONS AT STEP2 READ
TEMP =

_DATA1<8,

beqin

P_aASK s 2;

Py = FMT2;
P2 = ADAPT;
P4 = TEMP;
PS = RCZS DATA

P6 =

[RCSA,

.TEMP)
! IF ECHOED INFO DOES NOT
! MATCH REPORT ERROR

RCSA 7.0);

TABLE [RT_IP_ADDRESS] + 2;

ERRDF (11 MSG_11,
CKLOOP;

RETRIES
end;

! SAVE EXPECTED DATA

8>;

if (.RC2S_DATA [RCSA, RCSA_7_0] nequ

then

Te g
LAl

TRUE;

RCIS$ERR_RPT);

TRUE;

end;

[

! MASK = STEP |
! REPORT ERROR

! STEP1 WRITE WITH STEP 2 READ

AR R

RC_ALLY,

ERRDF (9, HSG 14, RC2S$ERR_RPT);
CKLOOP;

TEMP =
TEMP =

1
v4.0-579
VAX-11 Blisse-16
USER$1:[AZTEC.CZ RCFCJZRCFC3.B16:4

ADAPT

P& = (.RC2S ADDR) -

[
[

27-Mar-198 S 15:27::28
27-Mer-1985 13:28: 18

PRINTF (FMT4,
ENDSUB ;

,RC2S_DATA [RCSA,

! STEP 2 WRITE WITH A STEP 3 READ

RCSA_PTN]);

! GIVE PORT TYPE NUMBER

SEQ 0222

(8)

D2
CZRCFCO RC2S FR END TEST

ZRCFB3

TEST SECTION
|]

27-Mar-1985 13:28:18

BGNSUB;

B_MASK = 3,

! MASK UPTO STEP3 READ

i1f RZT_INIT ()

DO INIT AND IF ERROR

PRINT ERRJR MESSAGE

DECODE STATUS

DATAZ2 = COH AREA;
then

beain
ERRDF (12,
if

CKLOOP;

RETRIES =

else

VAX-11 Blis 8-16
0-579
USER$1:[AZT C CZRCFC]ZRCFC3 B16:4

! COM AREA START ADDRESS

MSG_14,

RC2S$ERR_RPT);

.RET_STATUS then DECODE ();

TRUE;

end

begin
CHECK F
ECHOED VECTOR AND IE BIT
TEMP =

_DATA1<0,

if (.RC2S_DATA
then

8>;

[RCSAR,

RCSA_7_0) nequ

begin

.TEMP)
! IF ECHOED INFO NOT CORRECT

P ARSK = 2,

FMT2;

TEMP;
.RC25_DATA [RCSA,

[}

P2 = ADAPT;
wv

OO INNNNNNOOTNO
LB EORIVODPPE®O®PB®®
IO JJ~J O dNdd-ddJddJOTOOO
S

WS B3 B3 B3 Ve T BT WL 3 B0 B B VT A0 VL VS B0 VL G2 W T TS Ve B V0 G2 V0 B9 B0 G0 Ts T V0 G0 G B G Vs V0 G0 V! B0 G0 B0 S0 S0 Vs Ws V¢ G0 Go G G0 G0 Vs Ve @o

vV03.0

2208
2209
2210
2211
2212
2213
2214
2215
2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230
2231
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244

27-Mar-1985 15:27:28

RCSA_7 0];

P6 = .RT TABLE [RT_IP ADORESS) - 2;
Ezagz(13, MSG_11, RC3S$ERR_RPT);
L

RETRIES =
end;

! REPORT ERROR

TRUE;

end;

ENDSUB;

! STEP 3 WRITE WITH STEP 4 READ

[]

BGNSUB;

B_MASK

BRING UPTO STEP4 READ

Enaor (14, MSG_14, RC2SS$ERR_RPT);

*
'
!

INIT AZTEC
IF ERROR
THEN

¢t PRINT OUT ERROR MESSAGE

DECODE ERROR

DATA3 = 0;

' RING BASE HIGH ADDRESS

if AZT_INIT ()
then
begin

.RET_STATUS then DECODE ();

CKLOOP;

RETRIES =
end;

TRUE;

PRINT MICRO CODE VERSION INFO.
PRINTF

(FM76,

.RC2S DATA

[RCSA,

RCSA_MODEL},

.RC25_DATA

[RCSA,

RCSA_U_CODE));

SEQ 0223

Page

(8)

EC
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

2263
2266

2267
2268
2269
2270
2271
2272
2273

HWWLLLLLD

v03.0

005067
032767
001407
012746
012746
010600
104417
022626
026767
101401
000207
104402
105067
004767
006000
103023
104455

000100
000102
000106
000110

000112
000114

000120
000122
000130
000136
000140
000146
000150
000156
000164
000172
000176
000202
000206
000214
000222
000224
000226
000230

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

001004
032767
001042
112767
012767
012767
016700
062700

010067

016767

012767
104455

000011
0000006
0000006

USER$1:(AZTEC.CZRCFC)ZRCFC3.B16;4

SEQ 0ceo4
Page

29
(8)

ENDSUB;

if (.RETRIES) then DO_RETRIES ();
if (.NUM_RETRIES eqlu ZERQ) then exitloop:
end;

ENDTST;

0000006

000001

0000006

$71S;

0000006
000001

LSBTTL

0000006 0000006

1$:

24:

0000006
0000006

NUM
. RETRIES

MOV
MOV

e0BM9, -(SP)
el,-(SP)

géa

CMP
CMP

B8LOS

RTS

TRAP

000001
002000

000000G
000002G

000400

000002G

000002
0000006
000001
0000006
000002
¢00000G
0000026
000001

000000G
000000G
000000G

000000G
000000G

44
5¢:

64:

2109
2111

SP,RO
17

(SP)+,(SP)NUM RETRIES,SWP
. RETRIES

B8.MASK
PC.AZT.INIT
RO

TRAP
.WORD
.WORD

55
10
MSG.14

.WORD
géa

000006

g%.SHP.TRACE

CLRB
JSR
ROR

8CC

34:

¢TSS TEST SECTION

CLR

MOV
TRAP

000010
0000006
0000006
000001
0000006
032767
001402
0000006
004767

104465
006000
103003
162706
000507
012767
032767

VAX-11 Blies-16 V4,0-579

5S4

RC2SS$ERR,RPT
g}.RET.STATUS

2113
2114
2126
2128

2132

2134

JSR
TRAP

PC,DECODE
65

8CC
suB
BR
MOV
gag

44
#6,5SP
9¢
#1,RETRIES
ngOO.RC?S.DATA02

2137
2142

gfig

g:OO.RCQS.DATAoZ

2144

MOVB
MOV
MOV
MOV
ADD
MOV
MOV
MOV
TRAP

02 ,P.MASK
OFMT3,P1
1,P2
RC2S.ADDR,RO
#2,RO
RO ,P4
RC25.DATA+2,PS
#1,P6
SS

2149
2150
2151
2152

ROR

.WORD
LWORD
.WORD

11
MSG.14
RC2S$ERR,RPT

2153
2154
2155

Fe
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

v03.0

000232
000234
000236
000240

000244
000246

000254
000262

000266
000272

000276
000302
000306
000312
000320
000324
000330
000334
000336
000340
000344
000346
000350

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18
TRAP
ROR

104465

006000

103003
162706

BCC
U8

000435
012767
016767
006267
006267
006267
006267
006267
006267
042767
016746
012746
012746
010600
104417
062706
104467
006000
103635
104402
112767
016700
016046
012746
004767
010067

0000006
0000006

7%:

8¢:

0000006

9$
01,RETRIES

2157
2160
2161

RC2S.DATA.2,TEMP
TEMP
TEMP
TEMP
TEMP
TEMP
TEMP
9177740, TEMP
TEMP, -(SP)

SP,RO
17
06,5P

67
24
2

01,8.MASK
RT.TABLE,RO

946200 DATAL

2162

H SPO‘
2114
2162

2163
2168
2169

DATAL

0000006

2173

13
55
12

2176

114

11%:

0000006

12¢%:

0000006
0000016 0000006

13¢;

000001

sgJAZT.INIT

MSG. 14
RC25$ERR.RPT
#1,RET.STATUS

103002

012767
012767

06, SP

04,-(SP)

006000

156700
020067
001443
112767

(8)

pc BL$DIV

004767
006000
103023
104455
000012
0000006
0000006
0000006
000001
032767
001402
0000006
004767
104465

000462
000470
000472
000476
000504
000506
000512
000516
000520
000526
000534

Page

2(R0), -(SP)

162767

024646
000476
012767
000456
005067
116767
005000

SEQ 0225

RO
7

10¢:

VAX-11 8 li 88-16 V4,0-579
AZ TEC.CZRCFCJZRCFC3.816;4
USER$1:[AZ

2178

PC,0ECODE

124
-(SP),-(SP)
16

01,RETRIES

ISS
TEMP
DATAI 1,TEMP

0000026
0000006

RC?S.DATAoZ.RO

000002
0000006
0000006 0000006
000001
0000006

#2,P.MASK
OFMT2,P1
01,P2

2181
2173
2186

2188

RO, TEMP

154

2191
2192
2193

G2
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

v03.0

016767
0000006 0000006
005000
156700 0000026
010067 0000006
017700
062700
010067
104455
000013
0000006
0000006
104465
006000
103002
024646
000417
012767
000001
0000006
016700 0000026
000300
042700
177770
010016
012746
0000006
012746
000002
010600
104417
062706
000010
104467
006000

103631

104402
112767

000722
000724
000726
000734
000736
000742
000744
000746
000750
000756
000760
000764

000772
000774
001000
001004
001006
001014
001022
001030

27-Mar-1985 15:27:28
27-Mer-1985 13:28:18

000003
000000G
000000G 0000006
0000006

012767
004767
006000
103021
104455
000014
0000006
0000006
032767
000001

001402
004767

104465

.WORD
. WORD
. WORD

TRAP
ROR

8CcC
CMP
MOV
MOV

SWAB

164

MOV
MOV
MOV
MOV
TRAP
ADD
TRAP

art.TABLE,RO

02,R0
RO,P6

174

2194
2195

2196

RC2S$ERR.RPT

RO
144

-(SP),-(SP)
164

01,RETRIES

2825.0ATA02.R0

2199
2204

@177770,R0

2163
2204
2

JSR

:C.AZT.INIT

ROR

131

(8)

MSG.11

TRAP

MOve
MOV

Page

2197

ROR

.WORD
. WORD
. WORD

000000G
18¢:

0000026
0000006

0000006
0000006
000000G
0000006

BEQ
JSR

TRAP
ROR

BLO

MOV

000000G

0000006
000000G 0000006

000002
000000G
000001
000000G

MOV
MOV
ADD
MOV
TRAP

TEMP,
P4
RO
RC25.DATA+2,RO
RO, PS

@3,8.MASK
oCOM, AREA,DATA2

TRAP

0000006

000001

CLR
8IS8

USER$1:(AZTEC.CZRCFC)ZRCFC3.B16;4

SEQ 0226

2205
2210
2211
2213

8CC

006000

103460
012767
000454
005067
116767
005000
156700
020067
001441
112767
012767
012767
016767

MOV

VAX-11 Bliess-16 V4,0-579

19%:

CLR

MOve

8158
cMP
BEQ

MOVB
MOV
MOV
MOV

2216
MSG. 14
RC2S5$ERR.RPT
#1,RET.STATUS

18%

2218

PC,DECODE

204

¢1,RETRIES

204

TEMP
DATAL,TEMP
RO
RC25.DATA+2,RO
RO, TEMP

204

#2,P
. MASK

2221
2213
2226

2228

2231
2232
2233
2234

He
ZRCFR3

CZRCFCO RC2S FR END TEST

001036
001040
001044
001050
001054
001060
001064

0000026
000000G
0000006
000002
0000006

27-Mer-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

v03.0

CLR

RO
RC25.DATA.2,R0
RO,PS

SEQ 0227
Page
32
(8)
2235

aRt.TABLE,RO

2236

02,R0
RO.P6

001066
001070

2237

MSG.11

001072
r

VAX-11 B 1 iss-16 v4.0-579
USER#$1:( A ZTEC.CZRCFCIZRCFC3.816;4

RC2S4ERR.RPT

000001

0000006

0000006
000007
0000006
0000006

204

20¢:

2l4:

01,RETRIES

2239
2242

174
2

2244
2249
2250
2252

97,8.MASK

DATA3
:C.AZT.INIT

2255

000001

MSG. 14
RC2S4ERR.RPT
@1 ,RET.STATUS

0000006

000000G

22%:

001266
001270
001276
01300
001304

010600

104417
062706
1044567

177760
0000026

234
24%:

103713

254

¢1,RETRIES

2260
2264

RC25.DATA.2,-(SP)

4177760,(SP)
RC25.DATA+2,R0

177760
0000006
000003

; SP,»
25%:

000010

006000
032767
001402
004767
005767

010,5P

000001
0000006
0000026

001232
001234
001240
001242
001246
001252
001254
001256
001262

PC.DECODE

234

000010

016700
006200
006200
006200
006200
042700
010046
012746
012746

2257

224

000001
0000006
0000006

2244
2264

¢1,RETRIES

0000006

264

26%:

PC,D0.RETRIES

NUM, RETRIES

2267

2269

12
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

vV03.0

001310
001312
001316
:
:

001402
000167
000207

176514

27-Mar-1985 13:28:18

27s:

BEQ
JMP

004767

176454

104466
006000
103773
000207

: Routine Size:
6 words,
; Maximum stack depth per

2274

1S::
1¢:

a7
14

RTS

Routine Size:
360 words,
Routine Base:
ACS$CODE
Maximum stack depth per invocation:
6 words

000000
000000
000004
000006
000010
000012

27-Mar-1985 15:27:28

SEQ 0228
age

(8)

2092

+ 2364

.SBTTL

TS TEST SECTION

JSR

PC,$75

TRAP
ROR

66
RO

RTS

B8LO

Routine Base:
AC$CODE +
invocation:
2 words

1<BLF/PAGE
>

VAX-1 18 1 ise-16 V4,0-579
USER4 1:( A ZTEC.CZRCFCJZRCFC3.B16;4

3704

2271

Je
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

2283
2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331

VUANANVINTVTVIN
A VTTNNUVIVIVIUVI D B 5 5 5 B 5 5 £ G4 G4 Gl Wl Gl G Gl G U3 O3 G G G O3 GG OV

2281
2282

G4 G ON Gl G G G G (ol e

v03.0

2275
2276
2277
2278
2279
2280

27-Mar-1985 15:27:28
. 7-Mer-1985 13:28:18

VAX-11 Bl; 99-16 V4.0-579
USER$1:(AZ TEC. CZRCFC]ZRCFC3 B16;4

]

BGNTST;
Voo

TEST

DESCRIPTION:

]
'

- PURGE AND POLL TEST

THIS TEST WILL PERFORM THE FIRST THREE STEPS OF THE INIT SEQUENCE.
WHEN THE HOST RESPONDS TO THE STEP 3 TRANSITION IT WILL WRITE A ONE

]

B8IT 7O BIT 15 OF THE SA REGISTER,

THERBY REQUESTING THE EXECUTION OF

'
'
'
'
'

PURGE AND POLL TESTING. THE HOST THEN WAITS FOR THE SA REGISTER 10
TRANSITION TO A ZERO VALUE. THE HOST THEN WRITES ZEROS TO THE SA
REGISTER SIMULATING A "PURGE COMPLETED"” HOST ACTION. THE HOST THEN
READS THE IP REGISTER 7O SMULATE A "START POLLING" COMMAND FROM THE
HOST 70 THE PORT. THE TEST IS COMPLETE WHEN THE CONTROLLER ANNOUNCES

FAILURE TO PROPERLY COMPLETE THIS TEST

THE TRANSITION TO STEP 4 IN THE SA REGISTER.

WILL BE REPORTED.

LOOP ON ERROR WILL RESTART THE TEST.

l
l

.SWP_TRACE then PRINTF

(DBM12);

TEST 6

NUM_RETRIES = ZERO;
while (. NUM_RETRIES lequ
beam

.SWP_RETRIES) do

8 HASK . 3;

DATAL = %0'100200'

DATA2 = RINGBASE;
DATAZ = ‘0'100000':

+ .RT_TABLE [RT_VECTOR)/4;

if AZT_INIT ()
then
begin

ER80F (1S, MSG_14, RC2S$ERR_RPT);

!
!

DO UPTQO STEP 3 READ AND
CHECK FOR ERRORS
IF ERRORS THEN

! REPORT THEM

DECODE STATUS

WRITE PURGE AND POLL

[]

_RET_STATUS then DECODE

CKLOOP;

else

! IE AND VECTOR ADDRESS

! RING BASE LOW ADDRESS
' PURGE AND POLL

RETRIES
end

();

TRUE;

be?in
WRT_RC2S (RCSA,

.DATA3);

while (.RC25_ADDR [RCSA, RC_ALL] nequ ZERO) do
DELAY (10);

WRT _RC2S (RCSA,

FALSE);

DATA1 = .RC35_ADDR [RCIP, RC_ALL);
DATAL = #0'107;

while (.DATA] nequ ZERO) do

WAIT UNTIL SA=0

WRITE ALL ZERQO'S TO SA

INIT THE LOOP COUNT

! READ THE IP REGISTER

SEQ 0229
Page
34
(9)

I<2
CZRCFCO RC2S FR END TEST

ZRCFR3
v03.0

TEST SECTION

27 Mer-1985 13:28:18

VAX-11 B 1i s9-16 v4.0-579

USER#$1:( AZTEC.CZRCFCIZRCFC3.816;:4

begin

OO
NNNNGC
SOBBBNNOCOCOTVOOR INNNYNANNNR AdOR U NNNN AU NI VI JORR O

2332
2333
2334
2335
2336
2337
2338

27-Mer-1985 15:27:28

de?oy (333);
if

. J_AM_NEX eqlu ALL_ONES then exitloop;

DATA]l =

_DATA]L

end;

if J_AM_NEX eqlu ALL_ONES
then

ncgs DATA [RCSA, RC_ALL) = .RC25 ADDR [RCSA, RC_ALL];
if .RC25_DATA
then

[RCSA,

RCSA_ER)

begin

RET_STATUS = PFE_CODE;
Pl = FMT3;
P2 = ADAPT;

IF PORT FATAL

ERROR

THEN REPORT IT,

P4 = (. RCZS ADDR) .+ 2;

PS = .RC2S. DATA (RCSA, RC_ALL]J:
P6 = %0047

P MASK

ERRDF (16, MSG_14, RC2SS$ERR RPT);
DECODE ();
CKLOOP;

RETRIES
end;

TRUE;

if (.RC2S_DATA [RCSA, RCSA_STEP] nequ sb 1000')

then

begin

Pl
P2
P4

=
=
=

FMT3;
ADAPT;
(.RC25 ADDR)

PS = .RC2S_DATA {RCSA, RC_ALLJ;

P6 = %0°'10";
P MASK

ERRDF (17, MSG_14, RC2SS$ERR RPT);
CxLOOP;

RETRIES
end;

else

TRUE;

end

ae?STATUS = CTO_CODE;

RETRIES = TRUE;

ERRDF (18, MSG_9,
DECODE ();

0);

end;

eng;

f (.RETRIES) then DO _RETRIES ();
if (.NUM RETRIES eqlu ZERD) then exitloop:

MASK

STEP 4

! CHECK FOR STEP 4 COMPLETE

SEQ 0230
Page

|
35
(9)

L2
CZRCFCO RC2S FR END TEST

ZRCFA3

TEST

2389

2390
2391
2392

v03.0

27 Mar-198S 15: 27:28
27 Mer-1985 13: 28:18

SECTION

VAX-11 8 liss-16 V4.0-579
USER$ 1:( AZTEC.CZRCFC)ZRCFC3.B16;4

5EQ 0231

(9)

end;

ENDTST;

$76:

000010
000001

000001

.SBTTL
MOV
SuB
8I7
8€Q
MOV
MOV
MOV
TRAP

cHe

CLR

Cve

8LOS
JHP
MoV

$76 TEST SECTION

R1,-(SP)

2273

:i.§u9.1aucc

2298

010,5P

o0BM12,

(SP)

SP.RO
17

(SP).,(SP).
NUM RETRIES
g?H.REYRIES.SUP.REYRIES

2300
2302

254
6,11P
03,8, MASK
RT.TABLE,RO
2(RO), -(SP)

2304
2305
2306

PC.BLSDIV

RO,DATA}L
#77600,0ATA}

ORINGBASE ,DATA2

2307

¢ 100000,DATA3

2308
2310

:g.AZT.INIY
68

2313

MSG. 14

RC25$ERR
. RPT

:i.RET.STflTUS

2315

PL,DECODE
65

(SP).,(5P).

5%:
64:

000004
000012
0000006

8s:

25 $

01,RETRIES

22$
DATA3 R}

RC25.ADOR,RO
R1,2(RO)
RC25.ADDR,RO
2(RO),4(SP)
114
012,R1

L$OL
Y, RO
108

;

¢,RCM_REG

RCM_REG,

;

¢,RC.REG

;

e, 88TMP2

;

e, 88THP]

2318
2310
2322
2324

2325

Me
CZRCFCO RC2S FR END TEST

2RCFAS

TEST

v03.0

005066

SECTION

000012

94.

001374
005301
000766
005001
016700
011066

012767
001423
012701

001411

10¢:
11%:

000010

0000006

000515

12%:

001404

000012
005300
001374
005301
000766
177777
026727
001403
005367
000754
177777
026727
001130
016700
000010
016066
016667
0000026
100046
012767
012767 000020G 0000006
0000006
012767
016700
062700
010067
016767
012767
0000006
112767
104455
000020
0000006
0000006
004767

104465

VAX-11 Bl ee-16 V4.,0-579

SEQ 0232
Page

USER$1:(AZTEC.CZRCFC)ZRCF(C3.B16:4

137

(9)

12(SP)

$$THP
$8TMP]

$8TMP?2

RCM.REG

2327

2(RO)
(RO),6(SP)

RC25.ADOR,RC.REG

2328
2329
2331
2333

RO
94

RC2S.ADDR,RO

010,0ATA]

o, 38THP?

13s:

016700

e, $3THP)

144

$3THP
$$THP]

15¢:

$8TMP2

164:
DATA}

174

12¢
1.AM NEX,0 ]
214
RC2S.ADDR,RO
2(R0),10(SP)
iggSP).RCZS.OATl-Z

o ,RC.REG

RC.REG,o

021 RET_STATUS
P
M3

0],P2

RC25.ADDR,RO
2,R0

RO, P4
RC25.DATA.2,PS
04.,P6
02 ,P MASK

S5
20
MSG. 14

RC2S$ERR RPT

:g.DECOOE
RO

006000

184
(5P).,(SP).

103002

022626
000506
012767
016700
042700
020027
001456
012767
012767
016700

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

000001
0000006
0000026
103777

040000

0000006

0000006
0000006

254

01,RETRIES

2358
2361

RC25.DATA.2,RO

0103777,
,R0
RO, 040000

224

oFM13,P]

e},P2
RC25.ADOR,RO

2364
2365

2366

N2
CZRCFCO RC2S FR END TEST

012767
112767
104455

000002
0000006
000002G 0000006
000010
0000006

000002

0000006

103002

000702

000710
000714
000722
000724
000730
000734
000736
00C740
000742
000744
000750
000754
000756

;

104455

5SS

204
(SP).,(SP).

B8R

254

0000006

208 :

ggv

353R£TRIES

000011
000001

0000006
0000006

2ls:

MOV
MOV

#11,RET, STATUS
01 .RETRIES

TRAP

LMORD
.MORD
.WORD

22
MSG.9
O

JSR
géa

PC.DECODE
3§5RETRIES

2381
2386

JSR
1S7

PC.DO.RETRIES
NUM RETRIES

2388

244

254

BNE
Cme
BR
Cwe

244
(SP)e,(SP).
254
(SP)«,(SP).

Q1S

ADD
)

010,5P
(SP).
. R}

16::

14.

.SBTTL

!‘BL‘ /9&(,{ »

Qout ne Bese:

~Avoce'

woros

JSR

3720

PC.876

TRAP
ROR

66
R0

RTS

ACICODE

2303
2302
2273

16 TEST SECTION

8Lo0
6 words,.

2372
2340
2378
2379
2380

22%:

Pout ne Size:
248 words,
Rout ne Bese:
ACICODE
Mer . mum steck depth per .Avocet on9 words

deptTM per

(9)

65
RO

000001

177014

2370

21
MSG.14
RC2SIERR.RPT

8CC
o, 4

000022
0000006
000000
0u4767
0000006
032767
000001
0000006
001402
0000006
004767
005767
000000C
001002
022626
000403
022626
000167
177070
062706
000010
012601
000207

SEOPO233 33

2367
2368
2369

02,P.MASK

TRAr
ROR

022626

012767

TRAP

LWORD
.MORD
.WORE

104465

012767

®2.R0
RO ,P4
RC2S.DATA.2,PS
#10,P6

MOVB

00002
0000006
0000006

012767
000414

ADD
MOV
MOV
MOV

010067
016767

®e

062700

000604

TEST SECTION

VAX-11 8 lis 9-16 V4.0-579
AZ7
USER$]1:(AZ
C CZRCFCIZRCFC3.B16;4

®e

v03.0

27 Mer-1985 15:27:28
27-Mar-198 5 13:28:18

ZRCFASY

4700

2390

B3
ZRCFAS3

CZRCFCO RC2S FR END TEST

v03.0

:
H
i
:

2394
2395
239
2397

27-Mar-198S 15:27:28

TEST SECTION

|}
3
3
3

!
BGNTST;
Yoo
E

TEST @07

27-Mar-1985 13:28:18

VAX-11 Blies-16 V4,0-579

USER$1:(AZTEC. CZRCFC]ZRCFCS B16:4

gggg

SMALL RING BUFFER INIT TEST

g:gg

3 DESCRIPTION:

:
:
H
:
:

2402
2403
o404
2405
g:gg

3
3
3
3
g

!
!
'
!
5

THE AZTEC WILL BE INITIALIZED WITHOUT INTERRUPTS AND USING THE
SMALLEST RING BUFFER.
THIS WILL BE THE FIRST TIME THAT THE
INITIALIZATION SEQUENCE IS CARRIED OUT TO COMPLETION.
INITIALIZING
WITH THE SMALLEST RING BUFFER MINIMIZES THE HOST MEMORY AREA WITH
WHICH THE AZTEC CONTROLLER MUST BE ABLE TO COMMUNICATE.

g:gg

FAILURE TO PROPERLY INITIATETHE AZTEC WILL BE REPORTED.

:
:
:
:

2410
2411
2412
2413

3
3
3
3

!
!
!

IF THE OPERATOR HAS SPECIFIED LOOP ON ERROR, LOOPING WILL BE FROM THE
START OF THIS TEST.

g:i;

g:ig

NUM_RETRIES = ZERO;

2418

uh:le (.NUM_RETRIES lequ .SWP_RETRIES) do

2420

;

2419

2421

2423 4

2422

2424

2426

2425

gzgg

2429

:
:

2431
5‘%%

S
g

g:g;

:
:
;
:
:
;
H

:
:
:
:
:
;
;

2430

.SWP_TRACE then PRINTF

(DBM13);

TEST

8
TIP

= 7;

B_MASK = %0'17';

! SELECT ALL STEPS

DATA2 = RING_B [0].

' SET UP RING BASE ADDRESS

DATAY = o' 100200‘
DATA3 = 0O;
DATA4<0

RING_B

0} = ALL_ONES;

RING_B

= ALLZONES;

if AZP_INIT ()

then

! STEP 1 WRITE WITH MIN. RING SIZES
! INIT RING B [0] AND (1)

' WITH ALL ONES (-1)

' DO INIT STEPS
!

beain
ERRDF (19, MSG_14, RC2S$ERR_RPT);

' IF ERROR THEN
! THEN REPORT THE ERROR

2436
2437
2438
2439
S::?

S
S
S
4
g

CKLOOP;
RETRIES = TRUE;
end

2442
2443

S
S

2444
2445
2846
2447
2448
2449
2450

6
6
6
6
S
5
4

else

.RET_STATUS then DECODE ();

begin

DECODE RETURN STATUS

' VER.BO

if .RING_B (0] nequ 0 end .RING
B (1) nequ 0
! TEST THAT THE RC2S CLEARED
then
! RING BUFFERS
8
ER DF (20 MS5G_10, 0);
CKLOOP
RETRIES = TRUE;
end;

end;

! JF NOT THEN ERROR
! AND REPORT 17

5509232 39
4

(10)

C3
CZRCFCO RC2S FR END TEST

ZRCFB3

TEST SECTION

v03.0

:
:
:
;i

:
:

2451
2452
2453
2454

2458

2456
2457

000140
000146
000150
000154
000156
000160
000162

000170
000172
000176
000200
204

206

000210

212
214

000216
220
000222
000224

3
3

USER$1:(AZTEC.CZRCFC)ZRCFC3.816:4

SEQ 0235
Page

(10)

1 (.NUM_RETRIES eqlu ZERO) then exitloop;
end;
return;

032767
001407
012746
012746
010600
104417
022626
005067
026767
101105
012767
112767
012767
012767
005067
152767
012767
012767
004767
006000
103021
104455
000023
0000006
0000006
032767
001402
004767
104465
006000
103435
012767
000420
005767
001415
005767
001412
104455

000001

0000006

$17;

0000006
000001

.SBTTL
gés

$T7 TEST SECTION
:%.SHP.TRACE

MOV
MOV

00BM13, -(SP)
01,-(SP)

2414

MOV
TRAP

SP,RO
17

CLR

NUM.RETRIES

2416
2418

0000006

MOV

07,TIP

100200 0000006

MOV

0-77600,DATA]

177777

MOV

2420
2421
2422
2423
2424
2425
2426
2427
2429

0000006

000000G 0000006
000007

000017

1$:

2%:

0000006

cHe

gng

MOVB

000100’ 000000G
0000006
000001
0000006
177777
000100’

000102°

0000006

000001

PC,AZP.INIT

BCC

LMORD
'MORD
.WORD

23
MSG.14
RC2S$ERR.RPT

JSR
TRAP

PC.DECODE
65

000100°

4s.

000102°

ROR

8LO
ggv

0000006

157
BEQ
157
BEQ

TRAP

.WORD

WORD

0000006
000000

'WORD

TRAP
ROR

000001

0000006

o17,B.MASK

JSR

gég
34

ggn.astaxcs.sup.ne1nles

ORING.B,DATA2
DATA3
©01,DATA4

TRAP

000001

(SP)e,(SP)s

MOV
CLR
BISB
MOV

ROR

000024
104465
006000
103414
012767

VAX-11 Blies-16 V4,0-579

if (.RETRIES) then DO_RETRIES ();

ENDTST;

2459

000126
000130
000132

4
4
4
4

2455

000000
000006
000010
000014
000020
000022
000024
000026
000032
000040
000042
000050
000056
000064
000072
000076
000104
000112
000120

27-Mar-198S 15:27:28
27-Mar-1985 13:28:18

8LO
MOV

0-1,RING.B

0-1,RING.B+2

: SP,e

2432

gi.nsr.s1n1us

2434

74
g%.RETRIES

RING.B
5%
RING.B+2
S$

2437
2429
2442

2445

MSG.10

65
RO

7%
01 ,RETRIES

2447

CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

v03.0

000232

000240
000242
000246
000252
000254

032767
001402
004767
005767
001267
000207

: Routine Size:
:

Meximum steck

000000
000000
000004
000006
000010
000012
;:
;

004767

000001

0000006

0000006
0000006

VAX-1 1 Blis -16_v4.0-579
USER$ 1:(AZ7 EC. CZRCFC]ZRCFC3 B16:4

s€q 023

%% 10)

Ss:

géa

g%.RETRIES

2452

64:

JSR
757
BNE

PC,.DO.RETRIES
NUM,RETRIES
24

2454

RTS

2392

87 words,
Routine Base:
ACSCODE - 4714
Jepth per invocation:
4 words

177516

17::
14:

104466
006000
103773
000207

27-Mar-1985 13:28:18

74:

LSBTTL

T7 TEST SECTION

JSR

PC,417

TRAP
ROR

BLO

RTS

Routine Size:
6 words,
Maximum steck depth per

2460

27-Mar-1985 15:27:28

Routine Bese:
ACSCODE «
invocation:
2 words

' <BLF/PAGE
>

66
RO

S172

2458

E3
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

2484

2485
2486
2487
2488
2489
2490
2491
2492
2493
2494
2495

249

2497
2498
2499
2500
2501
2502
2503
2504
2505
2506
2507
2508
2509
2510
2511
2512
2513
2514
2515
2516
2517

VN ENNUNNINNVINLG LD LbDLDEDRLLLELDDND
B GGG GGG UGO8 G G G 8 8 08 U8 U8 U (=

®E S5 B3 @0 BT L B @0 VL AE G0 W G BT VL VT T 00 B0 B9 VY S¢ 0 W B B O G4 V6 G0 V¢ G0 V0 G G GO Ve Gs VO V0 G0 G5 BF G0 U5 G0 Go o Vs Vs S W s Gs Vs s W

v03.0

2461
2462
2463
2464
2465
2466
2467
2468
2469
2470
2471
2472
2473
2474
2475
2476
2877
2478
2479
2480
2481
2482
2483

27-Mer-1985 15:27:28

27-Mar-1985 13:28:18

VAX-11 Bl 88-16

v4.0-579
USER$1:[AZ EC CZRCFC]ZRCFC3 B16:4

)

BGNTST;
.
Teo

TEST

LARGE RING BUFFER INIT

TEST

! DESCRIPTION:
THE INIT SEQUENCE IS EXECUTED WITHOUT INTERRUPTS WITH A RING BUFFER
LARGE ENOUGH TO COVER THE NORMAL HOST COMMUNCIATIONS AREA PACKET AND
BUFFER SPACE ( A S IN MESSAGE LENGTH AND A S IN COMMAND LENGTH).
A FAILURE TO COMLETE
REPORTED.

THE INITIALIZATION SEQUENCE WITHOUT ERROR WILL BE

IF THE OPERATOR HAS SPECIFIED LOOP ON ERROR, LOOPING WILL BE TO THE
BEGINNING OF THIS TEST.
if

.SWP_TRACE then PRINTF

(DBM14);

TEST 8

NUM_RETRIES = ZERO;
while (. NUM_RETRIES lequ
begm
TIP
= 8;
B MASK = #0'17';

.SWP_RETRIES) do

SET MASK BIT FOR COMPLETE INIT.
SET BIT 15 FOR STEP-1 WRITE
NO _DIAGNOSTIC WRAP MODE
SET UP 16 COMMAND RINGS LENGTH
SET UP 16 RESPONSE RINGS LENGTH
DISABLE INTERRUPT
LOAD INTERRUPT VECTOR ADDRESS
LOAD COMMUNICATIONS AREA ADDRESS

DATA1<15, 1> = TRUE;

DATA1<14, 1> = O;
DATAl1<11, 3> = SND_SI1Z;
DATAL1<8, 3> = REC_SIZ;
DATAL1<7, 1> = 0;
DATAR1<0, 7> = 0;
DATA2 = COM_AREA;

DATA3 = ZERD;

HI-ORDER ADDR =

DATA4 = #o' 177403
SINITIALIZE COM_AREA HITH ALL _ONES PRIOR TO INIT
incru I from O to RING_SIZE

ZERO

"LAST FAIL" PATKET RESPONSE BIT SET

1 do

incru J from 0 to 1 do

COM_AREA (.1,

.J, WORD_REF) = ALL_ONES;

if AZP_INIT ()

enbe in
ER80F (21, MSG_14, RC2S4ERR_RPT);
if

.RET_STATUS then DECODE ();

CKLOOP;

else

RETRIES =
end

D0 STEP INIT AND CHECK FOR ERROR

! IF ERRORS THEN
! REPORT ERROR
!

DECODE STATUS

VER.BO

TEST RING AREA FOR ZEROES

TRUE;

begin
incru I

from 0 to RING_SIZE

1 do

SEQ 0237
Page

(11)

F3
CZRCFCO RC2S FR END TEST

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

if .COM_AREA
then

.J,

WORD_REF]) ?c?u 0

IF RING AREA IS NOT CLEAR

THEN
!
! REPORT ERROR
'

end;

if (.RETRIES) then DO_RETRIES ();

if (.NUM_RETRIES ealu ZERQ) then exitloop;
end;
return;

ENDTST;

000037
0000006

INC
CMP
BLOS
INC
cMP
BLOS
JSR

ROR

8CC

Y
LTI
Bo
we
we

*
-

¢-375,DATA4
R1
R2
R1,RO
RO
R2,R0O
RO
¢-1,COM,.AREA(RO)
R2
R2,01
44
R1
R1,037

DATA3

#122000,0ATA}
#COM.AREA,DATA2

2486
2487
2493
2494
2495
2499
2501
2502

2501
-

005201
020127

MOV

¢10,TIP

017,8, MASK

2482
2484

000001

0000006

MOV
ASL
ADD
ASL

NUM.RETRIES
?g?.RETRIES.SUP.RETRIES

SP,«

2499
*

000000G

el,-(SP)
SP,RO
17
(SP)+,(SP).

MOV
MOVB
MOV
MOV
CLR
MOV
CLR
CLR

CMP
CLR
g:g

2459
2480

177777

#DBM14, -(SP)

1$:
2%:

44 ;

012760
005202
020227

MOV
MOV

géa

MOV
TRAP

0000006
0000006
0000006
0000006

$T8 TEST SECTION

R1, $SAVE?2
#1,5WP.TRACE

000010
000017
122000
000000G
0000006
177403

LSBTTL

JSR

$T78:

0000006

0000006
000000G 0000006

(11)

RETRIES = TRUE;

0000006
000001

101760
004767
006000
103021

Page

end;

000001

101765

(.I,

beain
ERRDF (22, MSG_10, 0);
CKLOOP;

0000006

000120
1000122
000124
000132
000134
000140
000142
000144
00150
000152
000156
000160

USER$1:{AZTEC.CZRCFC)ZRCFC3.B16;4

SEQ 0238

incru J from O to 1 do

HNWNWELELELELBNVOOO
O NTILIVILY

N
V]
N

s J

vV03.0

VAX-11 Blies-16 V4.0-579

ZRCFB3

PC,AZP,INIT
RO

2504

G3
CZRCFCO RC25 FR END TEST
TEST SECTION

006300
005760
001412

.WORD
LWORD

gga

; Routine Size:
;

Maximum stack

000000
000000
000004
000006
000010
000012

004767

01,RETRIES

MOV

0000006

124

104
R1

CLR

ASL
ADD
ASL

RO
R2,RO
RO

R1,RO

187

.HORD
.WORD
.WORD

000001

000037
000001

65
RO

8LO
MOV
INC
CMP
BLOS
INC

124
01 ,RETRIES
R2
R2,01
84
Rl

CMP

000000G

0000006
0000006

2524

26
MSG.10
O

TRAP
ROR

0000006

2512
2504
2517
2519
2521

COM.AREA(RO)

8€EQ

TRAP

000001

8$:

74:

2509

*»

6$:

104465

005201
020127
101746
032767
001402
004767
005767
001241
000207

MOV

BR
CLR

006000

101753

(11

PC,DECODE
65

8LO

000026
0000006
000000

103424

JSR
TRAP
ROR

Page

2507

—C

5$:

104455

012767
005202
020227

SS
2§
MSG.14
RC2S54ERR.RPT
g%.RET.STATUS

SEQ 023 9

010100
006300
060200

TRAP
.WORD

R1,637

B8LOS

*»

104455
000025
0000006
0000006
0000006
032767 000001
001402
0000006
004767
104465
006000
103450
012767
000001
000000G
000433
005001
005002

VAX-11 B 1 iss-16 V4,0-579
USER#$1:( A ZTEC.CZRCFCIZRCFC3.B16:4

|endan NN SN N

v03.0

000162
000164
000166
000170
000172
000200
000202
000206
000210
000212
000214

27-Mar-1985 15:27:28
27-Mer-1985 13:28:18

IRCFB3

2526
2519
2517

10¢:

g%a

:i;RETRIES

2531

11%:

JSR
187

PC.DO.RETRIES
NUM.RETRIES

2533

12%:

BNE
RIS

24
PC

2459

111 words,
Routine Base:
AC$CODE + 5206
depth per invocation:
7 words

177436

104466
006000

18::
1%:

T8 TEST SECTION

JSR

PC,$78

TRAP
ROR

66
RO

RTS

BLO

103773
000207

; Routine Size:
6 words,
; Maximum stack depth per

.SBTTL

Routine
Base:
0
invocation:
2 words

ACSCODE

S544

2537

H3
ZRCFR3
V03.0

@539

CZRCFCO RC2S FR END TEST
TEST SECTION

' <BLF/PAGE>

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

VAX-11 Bliss-16 V4.0-579
USER41:[AZTEC.CZRCFC)ZRCFC3.816;4

SEQ 0240

Page

45
(11)

I3
CZRCFCO RC25 FR END TEST

ZRCFA3
v03.0

*
.

[

*
[y

[]

2540
2541

TEST SECTION

G (U O G (o e

]

*
.

[]
.

1
-

.
.

L)
.

1]
.

[]
-

[]
.

[]
-

L
-

[]
-

.
-

L
-

1)
-

L)
-

L]
-

.
-

[
-

1]
-

.
.

L)
-

L]
.

L)
-

.
-

[
-

[
.

.
.

[
.

[
-

1
.

.
-

[
-

[
.

L
.

L)
.

[]
-

[
-

14
»

[
.

’
.

[
.

’

VUAVTANNO
RO TNV & B UNUTVIVTVIVIUVIUL S B 5 5 (8 U8 G G W8 O3 Gl G Gl O Gl G G G G G G G G G U

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

VAX-11 Bliss-16 V4.0-579
USER$1:(AZTEC.CZRCFCJZRCFC3.816:4

]

BGNTST;
Yteo

TEST 49 -

"DIAGNOST1C MACHINE" CODE DOWN LINE LOAD TEST

! DESCRIPTION:
THIS "DIAGNOSTIC MACHINE” PROGRAM WILL ATTEMPT TO TRANSFER A BLOCK
OF DATA FROM HOST MEMORY TO AN AREA IN THE CONTROLLER AND THEN
EXAMINE THE TRANSFERED DATA.

IF THE TRANSFERED DATA NOT COMPARE CORRECTLY, THEN THE ERROR WILL
BE REPORTED. THIS TEST ALSO REPORTS ERRORS IF ANY OF THE ROUTINES
USED RETURNED FAILURE CODE.
IF _THE OPERATOR HAS SPECIFIED LOOP ON ERROR, LOOPING WILL BE FROM

THE START OF THIS TEST.

abel
BLOCK] ;
if

.SWP_TRACE then PRINTF (DBM15);

TEST 9

NUM_RETRIES = ZERO;
while (.NUM_RETRIES lequ
begin

.SWP_RETRIES) do

GET AZTEC READY

if AZTEC_READY ()
then

beain
ERRDF (23,

0);

IF ERROR REPORT ERROR

.RET_STATUS then DECODE ();

CKLOOP;

RETRIES =

else
BLOCK] :

AZT_READY_ERR,

end

TRUE;

begin

TEgP = _FREE_MEM_ADDR;
incru COUNT

from O to 1023 do

begin

.T?HP = %0'125252';

TEMP =

end;

CMD_REF

TEMP + 2;

BUF _DESCRPTR = DM_09;
BYTE_COUNT = 93e2;
if EX_SUP_PRG ()

SAVE FREE MEMORY STARTING ADDR.
FILL NEXT 1024 LOC. WITH DATAS
VER.B0 LIMIT CHANGED TO 1023

WRITE DATA 0'125252' INTO MEMORY
INCREMENT THE POINTER BY 2

SET COMMAND REFERENCE 43
DM-PROGRAM STARTING ADDRESS
TOTAL

DM PROGRAM LENGTH BYTE COUNTS

ISSUE AN "EXECUTE SUPPLIED PRG" CMD

SEQ@ 0241
Page

(1 2)

J2
CZRCFCO RC2S FR END TEST

ZRCFB3

TEST SECTION

2600
2601
2602
2603
2604
2605
2606
2607
2608
2609
2610
2611
2612
2613
2614
2615
2616
2617
2618
2619
2620
2621
2622
2623
2624
2625
2626
2627
2628
2629
2630
2631
2632
2633

&ALV
VTVTVIVIVIINIVNIO O OO
T NUVTUVTVNIUVITVINVIVINIO OO
OO WU

v03.0

2597
2598
2599

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

then

beain
ERRDF (24,

EXE_SUP_ERR,

0);

! STATUS BIT INDICATES ERROR
! THEN

.RET_STATUS then DECODE ();

CKLOOP;

RETRIES =

TRUE;

leave BLOCK];

end;

H_SADD =

,FREE_MEM_ADDR;

VER.BO
LO BYTE FREE HOST MEMORY ADDRESS

H_EADD = 0;

HIGH BYTE FREE MEMORY ADDRESS
TOTAL FREE HOST MEMORY SIZE

CMOREF = 4;

BUF "DESCRPTR = H_SADD:;

COMMAND REFERENCE 04
DESCRIPTOR ADDRESS

if SEND_DATA ()
then

ISSUE SEND DATA COMMAND
%LELUS BIT INDICATES ERROR

BYTE_COUNT = 06;

beain
ERRDF (25,
if

TOTAL BYTES TO BE TRANSFER

SND_DATA_ERR,

0);

.RET_STATUS then DECODE ();

CKLOOP;
RETRIES = TRUE;
leave BLOCK];

! VER.BO

end;

CMD_REF = S;
BUF _DESCRPTR = TIP;

! CLEAN THE BUFFER
! SET BYTE COUNTS = 2

BYTE_COUNT = 02;
if REC_DATA ()

then

)

VAX-11 B liss-16 V4,0-579
USER$1:( AZTEC.CZRCFC)ZRCFC3.816;4

SENT A RECEIVE DATA COMMAND
?LSLUS BIT INDICATES ERROR

begin

ER80F (26, RE_DATA_ERR, 0);
if

.RET_STATUS then DECODE ();

CKLOOP;

RETRIES =

TRUE;

leave BLOCK];

end;

.TIP nequ %o0’'104'

then

beain
ERRDF (27,
CKLOOP;
RETRIES
end;

DMC_ERR,

VER.BO

IS REMOTE PROGRAM SENT DONE FLAG -

0);

TRUE;

end;

if (.RETRIES) then DO_RETRIES ();

T0 THE HOST
NO.
THEN
REPORT

ERROR

SEQ 0242

Page

(12)

K3
ZRCFR3

CZRCFCO RC2S FR END TEST

v03.0
i
:
:
H
:
;
H

TEST SECTION

2654
2655
2656

2657
2658
2659
2660

4
4
4

3
3
3
1

005067
0000006
026767
000000G 0000006
101401}
000207
004767
0000006
006000
103022
104455
000027
0000006
000000

000074
000100
000102
000104

004767
104465
006000
103001

0000006

000110
000116
000120
000126
000130
000136
000144
000146
000152
000154
000162
000170
176

012767
000576
016767
005000
012777
062767
005200
020027
101766
012767
012767
012767
004767

000001

204

103021

000106

000202

206

210

212
214
00216
000228
000226

000001

0000006

006000

000001

1¢:
2$:
34:

0000006

S$:

000000G 000000G

64:

125252
000002

7%:

0000006
000000G

001777
000003
0000006
0000006 0000006
000272 0000006
0000006

LSBTTL
817
BEQ
MOV
MOV
MOV
TRAP

479 TEST SECTION
@1,5WP, TRACE
14
o0BM1S, -(SP)
01,-(SP)
SP,RO
17

CLR
cMe
BLOS
RTS
JSR
ROR
8CC
TRAP
.HORD
.WORD
.WORD

NUM, RETRIES
NUM_RETRIES,SWP.RETRIES
34
PC
PC,AZTEC.RERDY
RO
64
SS
27
AZT.READY.ERR
O

JSR
TRAP
ROR
BHIS

PC,DECODE
65
RO
S$

MOV
BR
MOV
CLR
MOV
ADD
INC
cMe
BLOS
MOV
MOV
MOV
JSR

01 RETRIES
144
FREE.MEM.ADOR, TEMP
RO
0-52526 ,3TEMP
02.TEMP
RO
RO, 01777
74
03,CMD . REF
ODM.09,8UF .DESCRPTR
0272,8YTE.COUNT
PC,EX.SUP.PRG

cMHe

817
B8€EQ
4%

RTS

ROR

8CC

104455

000030

0000006
000000
032767
000001
001402
004767

$79:

000000G
000001

022626

000207

Page

(12)

return;
ENDTST;

000026
000032
000040
000042
000044
000050
000052
000054
000056
000060
000062

032767
001402

USER$1:[AZ TEC CZRCFC)ZRCFC3. B16;4

SEQ 0243

end;

032767
001407
012746
012746
010600
104417

000064
000072

27-Mer-198S 13:28:18

VAX-11 Bliss-16 V4,0-579

.
if (.NUM_RETRIES eqlu ZERD) then exitloop;

000000
000006
000010
000014
000020
000022

000028

27-Mar-198S 15:27:28

0000006

01 ,RET . STA
4%

;

2563

SP.s

;
:

2565
2567

2570

2573

;

2515

:
:
:
; COUNT
;
:
; COUNT
; COUNT,
e

2578
2570
2583
2585
2588
2589
2585

:
:
H
;

2592
2593
2594
2596

TRAP

5SS

2599

.WORD
.WORD
817

EXE.SUP.ERR
O
01,RET . STATUS

2601

LHORD

000000G

(SP)+,(SP).

BEQ
JSR

8%
PC.DECODE

L3
ZRCFR3

v03.0

CZRCFCO RC2S FR END TEST

27-Mar-1985 15:27:28

TEST SECTION

27-Mar-1985 13:28:18
8s:

000234
000001

VAX-11 Bliss-16 V4.0-579

USER$] : [AZTEC.CZRCFC JZRCFC3.B16;4

2604

144
FREE .MEM. ADOR , H. SADD
H.EADD

02000,

2598
2608
2609
2610
2611
2612
2613
2615

BUF . LENGTH

REF
04,C.M0

oH. SADD . BUF . DESCRPTR

. COUNT
06.B8YTE
:g.seno.ouvn

0000006
10%:

114
SS
31
gND.DhTA.ERR

;

2618

01 ,RE
. STATUS
T

2620

104
PC.DECODE
65

164

61 ,RETRIES

11%:

2623
2617
2627
2628
2629
2631

148

REF
05,C.MD
011P ,BUF .DESCARPTR
62,.8YTE.COUNT

:g.ncc.on1n
134
S5
32
8E.DA1A.ERR
000000G
12¢:

2634

2636

2639

11P,0104

2643

S5
33
OMC.ERR
0
65

;

2646

01 RET . STATULS
123
PC,DECOOE
65

164

0000006
000104

(12)

01,RETRIES

002000

000001

Page

164

0000006
9.

000001

SEQ 0244

13s:

01,RETRIES
144

14%

000001
000001
0000006

0000006
0000006

164

144

01,RETRIES
01,RETRIES

15¢
PC.DO.RETRIES

2648
2653

M3
CZRCFCO RC2S FR END TEST
TEST SECTION

ZRCFR3
v03.0
000530
000534
000536
000542

005767
001402
000167
000207

0000006

27-Mar-1985 15:27:28
27-Mer-198S 13:28:18

15%:

177270

16%:

00476~

103773

2674

2675
2676
26717

2678
2679
2680
2681

2682

2683
2684
2685
2686
2687
2688
2689
2690
2691
2692
2693
2694

VLA
S 5 5 50 5 80l G L G0 G Gl W8 U G4 U8 U U U U G U Gl U U U U G 8 G Gl e

2663
2664
2665
2666
2667
2668
2669
2670
2671
2672
2673

6 words,
depth per

2655

JMP
RTS

24
PC

2538

2659

LSBTTL

JSR

164

+ 5560

19 TEST SECTION

PC,879

TRAP
ROR

66
RO

R1S

Routine Bese:
ACICODE
invocstion:
2 words

. 6324

BGNTST;
Yoo

TEST 010

NONEXISTENT MEMORY TEST

f DESCRIPTION:
'

THIS “DIAGNQOSTIC MACHINE" PROGRAM WILL ATTEMPT T0 READ THE FIRST

ADDRESS OF

THE

1/0 PAGE OF

THE HOST

CPU,

THIS LOCATION 1S RESERVED

FOR DIAGNOSTICS AND A NXM SHOUWLD OCCULR,

[]

OF THE ADAPTER CARD.

IF THE OPERATOR HAS SPECIFIED LOOP ON ERROR, LOOPING WILL BE FROM

[]

THE

CONTROLLER DOES NOT

THE STARY OF

SEE

THE NYM,

THERE

WILL

A FRU CALLOUT

THIS TEST.

sbe]

8LOCK] ;

! VER.BO

.SWP_TRACE then PRINTF

(DBM16);

TEST

NUM_RETRIES = ZERO;
while

( NUM_RETRIES

begin

lequ

.SWP _RETRIES) do

11 " 0;

¢ INIT TIP

if AZTEC_READY ()
then

ERRDF (28,

begin

090(12)

NUM RETRIES

BLO

000207

Meximum steck

2661
2662

19;:
18:

104466
006000

: Routine Size:

177230

SEOPO2‘S %o

151

BEQ

178 words,
Routine Bese:
ACSCODE
; Routt ‘ne Size:
4 words
: Max mum steck depth per invocetion:

000000
000000
000004
000006
000010
000012

VAX-11 B 1 ine-16 V4,0-579
USERS):( A ZTEC.CZRCFC)ZRCFC3.B16;4

AZT_READY_ERR, 0);

GET

AZTEC READY FOR OPERATION

N3
CZRCFCO RC2S FR END TEST

27-Mer-1985 15:2 7,fg
27-Mer-198S 13:2

.MM..O.MMWU....OOOOMMUMU!U!U'U!MU’MOOOOOOOOMMMU‘U‘U’U’U‘MMU‘ LR VIV
IV IV IV IV ]

TEST SECTION

USERSS. CAZTEC CZRCFCIZREFCS. B16:4

_RET_STATUS then DECODE ();

CKLOOP,

else

VAX-11 Blies-16
V4.0
'

RETRIES
end

TRUE;

BLOoCK])

'VER.BO vc?AD IVER.B0 SETVEC (.VEL AD, NXMI. PRIOA);

SET INT.

'VER.BO SET_INT VECTOR ();

VECTOR ADOR.

SET THE VECTOR ADDR.,

'VER.B80 WRY aczs (RCSA, ONE)z

T0 4

SERVICE

ROUTINE ADOR. AND INt. PRIORITY

CMO _RE REF = 3,
BUF “DESCRPTR = OM_10,

BYTE_COUNT = S8e2;

COMMAND REFERENCE
#
OMCODE STARTING AODRESS
BYTE COUNTS

if EX_SUP_PRG ()
then

ISSUERAN EXECUTE SUPPLIED CMD
IF ERROR

begin

THEN

ERBDF (29, EXE_SUP_ERR, 0);
if

_RET_STATUS then DECODE

();

CKLOOP;
QfTRI(‘ s TRUE:
leave BLOCK];

end;

VER.BO

[]

* WAIT FOR ~DONE~ SIGNAL FROM OM

[]

)

CMO_REF = &,
BUF DESCRPTA » T1p;

BYTE_COUNT = 02;

COMMAND REFERENCE o
CLEAN THE BUFFER
SET BYTE COUNTS = 2

¢ REC_DATA ()

SENT A RECEIVE NATA COMMAND

then

2336: (30, RE_DATA _ERR, 0);

%L:;US 81T INDICATES ERROR

i? RET_STATUS then DECODE ();

C"L”:
RETRIES » TRUE;
leove 8LOCK];

VER .80

. 11P ealu ZERD

2%0 10U GET SUCCESS FROM D= COOE?

E:‘or (31, DC _EAR, 0);

REPORTY

oend;

then

1,]

XL 00P

ReETRIES - e,
ong;

ond;

THEN

ERAOR

SEQ 0246
Page
51
(12)

¥
R
¥

&
S0
90

N
~
W
o

kL IV IV R R

©F

2752
2753
2754

ge(12)

end;
return;

ENDTST;

LSBTTL
géa

#7100 TEST SECTION
:}.SHP.TRACE

0000006

MOV

00BM16, -(SP)

0000006
0000006 0000006

MOV
TRAP
cMP
CLR
g:g

SP,RO
17
(SP)+,(SP)«
NUM.RETRIES
Tg?.RETRIES.SUP.RETRIES

CLR
JSR

TIP
PC,AZTEC.READY

0000006

$710:

MOV

14:
2$:

0000006
0000006

000001

0000006

000001

TRAP

0000006

000003 0000006
000000G 0000006
000164 0000006
0000006

44 :

34
AZT.READY.ERR
0
g%.RET.STATUS

JSR
TRAP

PC.DECODE
65

ROR

ggv

8%.RETRIES

MOV
MOV
MOV
JSR

#3,CMD.REF
o0M.10,8UF .DESCRPTR
0164,8YTE.COUNT
PC,EX.SUP.PRG

ROR

B8CC

TRAP

000001

0000006

S$:

000001

0000006

000004

0000006

6$:

.WORD
.WORD
.WORD
g{g

BLO

1S
EXE.SUP .ERR
0
g%.RET.STATUS

JSR
TRAP

PC,DECODE
65

MOV

2685
2687
2689
2691

2694

2696

114

.WORD
.WORD
.WORD
gga

ROR
BLO
ggv

2683

01,-(SP)

ROR

8CC

006000
103470
012767
000453
012767

SEQ 0247
Pa
52

1f (.NUM_RETRIES eqlu ZERO) then exitloop;

000001

104465

VAX-1 1Blie 16 4.0-579
USER4 1:(AZ7 C.CZRCFCIZRCFC3.B16;4

if (.RETRIES) then DO_RETRIES ();

000001

032767
001402
004767

27-Mar-198

UIUI

TEST SECTION

v03.0

27-Mer-198

CZRCFCO RC2S FR END TEST

ZRCFBY

[V, [¥ ]

RO
114
3%.RETRIES
#4,CMD .REF

2699
2691
2708
2709
2710
2712
2715

2717

2720
2714
2727

C4
CIRCFCO RC25 FR END TEST

ZRCFR3

:
27-Mer-198 5 15:27:28
27-Mer-1985 13:28:18
28:

TEST SECTION

v03.0

012767
012767
004767
006000
103021

000000G 0000006
000002
0000006
0000006

000036
0000006
000000
032767
000001
0000006
001402
004767 0000006

104465
006000

103432
012767
000001
0000006
000415
005767 0000006
001012
104455
000037
0000006
000000

TRAP

2734

000001
000001

0000006
000000G

0000006
0000006

JSR

TRAP
ROR

104:

11%:

36
RE.DATA.ERR
O
g%.RET.STATUS

2736

PC,.DECODE
6S
RO

11%
8%.RETRIES

157

TRAP

2746

BNF

TRAP
ROR

2739
2733
2743

.WORD
.WORD
LHORD

104465

006000
103414
012767
032767
001402
004767
005767
001223
000207

(12)

2728
2729
2731

BLO
ggv

Page

0TIP,BUF .DESCRPTR
02,8YTE
. COUNT
PC,REC.DATA
RO

LWORD
.WORD
.WORD
ggg
74:

CFCJZRCFC3.B16;:4

SEQ 0248

MOV
MOV
JSR
ROR

8CC

104455

4.0-579

8Lo
MOV
géa
JSR
187
BNE
RTS

37
DMC.ERR
O

65
RO

114
01 ,RETRIES
:é;RETRIES

2748
2753

PC,.D0.RETRIES
NUM.RETRIES
23
PC

2755
2660

123 words,
Routine Base:
ACICODE « 6340
; Routine Size:
4 words
: Meximum steck depth per invocation:

000000
000000
000004
000006
000010
000012

004767

177406

104466
006000

103773

.SBTTL
JSR

6 words,
: Meximum stack depth per

RTS

N
N O

Routine Baese:
ACSCODE « 6726
invocation:
2 words

BGNTST;
]
oo

TEST @11

PC,$T10

66
RO

T10 TEST

TRAP
ROR

BLO

000207

; Routine Size:

2761
2762
2763
2764
2765

T10::
1¢:

- BUS ADDRESSING/DATA TEST A

ECTION
2759

D4
CZRCFCO RC2S FR END TEST
T EST SECTION

ZRCFR3

2771
2772
2773
2774
2775
2776
2117

2778
2779
2780
2781
2782
2783

2784

2785
2786
2787
2788
2789

2790

2791

(S LV L o e N X o T X N

2766
2767
2768
2769
2770

U TE, JU [V IV, IV, IV, [V, ¥ N SNVINTVIVIVIVIUIL B 5 8 5 5 (0 08 04 0l Q3 U8 G O3 Gl G Gl G4 G G G4 O G G (G G O R G

v03.0

27-Mar-1985 15: 27:28
27-Mar-1985 13: 28:18

VAX-11 B 1 ige-16 V4.0-579
USER#$ 1:( AZTEC.CZRCFC)ZRCFC3.816;4

DESCRIPTION:
THIS "DIAGNOSTIC MACHINE" PROGRAM ASKS THE PDP-11 PROGRAM TO FILL FREE
MEMORY (THAT MEMORY AVAILABLE TO THE PDP-11 PROGRAM THAT IS NOT BEING
USED BY THE PROGRAM OR THE PDP-11 SUPERVISOR) WITH AN ADDRESSING

PATTERN (WRITE ADORESS WITH ADDRESS) AND REPORT THE LOCATION AND SIZE

OF THE FREE MEMORY.

THE DATA CHECKED.

EVERY LOCATION OF FREE MEMORY WILL BE READ AND

IF THE DATA DOES NOT COMPARE CORRECTLY,
EXPECTED ARE REPORTED.

THE ADDRESS AND DATA

abel
BLOCK] ;

VER.BO

TEST

GET AZTEC READY FOR OPERATION

.SWP_TRACE then PRINTF (DBM17);

NUM RETRIES = ZERO;
while (_NUM_RETRIES lequ

beain
TIP
= 11;

.SWP_RETRIES) do

if AZTEC_READY ()
then
begin

ERRDF (32, AZT_READY_ERR, 0);
if

.RET_STATUS then DECODE ();

CKLOOP;

RETRIES =

else
BLOCK1 :

end

TRUE;

begin

CMD_REF = 3;
BUF _DESCRPTR = DM_11;

! COMMAND REFERENCE ¢
! DMCODE STARTING ADDRESS
! BYTE COUNTS

if EX_SUP_PRG ()
then

!
!
!

BYTE_COUNT = 100¢2;

begin

ERNDF (33, EXE_SUP_ERR, 0);
if

]

ISSUE AN EXECUTE SUPPLIED IF STATUS BIT INDICATES ERROR
THEN

.RET_STATUS then DECODE ();

CKLOOP;

RETRIES =

TRUE;

leave BLOCK];

end;

! VER.BO

SEQ 0249
Page

(12)

®
.
.

[
*
*
L)
*
*
.
1]

2823
2824
2825
2826
2827
2828
2829
2830

H_SADD =

CHD_REF =

BYTE_COUNT = 06;
! INITIALIZE MEMORY BUFFER MITH A PATTERN BEFORE
'

*
[]

10
TEMP

begin

L)
.
L

[
L)
L)
[
[
[
[

’
14
[
.
.
J

[

VOO VIVIVTIVVTIVINC

VER.BO

!
!

CLEAN THE BUFFER
SET BYTE COUNTS = 2

if REC_DATA ()

then

SENT A RECEIVE DATA COMMAND
?LQLUS BIT INDICATES ERROR

begin

ERBDF (35S, RE_DATA_ERR, 0);
if

[

.RET_STATUS then DECODE ();

BYTE_COUNT = 02;

[

ISSUE SEND DATA COMMAND
SLQLUS BIT INDICATES ERROR

CMD_REF = S;
BUF _DESCRPTR = TIP;

[

[]

! HIGH BYTE FREE MEMORY ADDRESS

leave BLOCK1;

[]

%o’ 177777,
TEHP < 23

end;

VTNV

.H_EADD by 2 do

RETRIES = TRUE;

[]

TOTAL BYTES TO BE TRANSFER

CKLOOP;

[]

TOTAL FREE HOST MEMORY SIZE
END OF FREE MEM ADDRESS
COMMAND REFERENCE 04
DESCRIPTOR ADDRESS

ER&DF (34, SND_DATA_ERR, 0);

;

.H_SADD to

if SEND_DATA ()

then

from

H_EADD = 0;

end;

USER#1:[AZTEC.CZRCFC)ZRCFC3.B16;4

ASKING DM CODE TO WRITE TO THE BUFFER

incru COUNT

]

VAX-11 Bliss-16 V4.0-579

LO-BYTE FREE HOST MEMORY ADDRESS
LOAD START ADDRESS FOR INIT

BUF osscnprn = H_SADD;

VTUTTN VNN

*
L)

.FREE_MEM_ADDR;

TEMP = _H_SADD;
BUF _LENGTH = nen_sxz.
H_EARDD = H SADD - 2 « (.BUF_LENGTH#2);

[]
[

27-Mar-1985 13:28:18

TEST SECTION

O O MVTVTUITUT AT

[]

27-Mar-1985 15:27:28

CZRCFCO RC2S FR END TEST

ZRCFB3
v03.0

.RET_STATUS then DECODE ();

CKLOOP;

RETRIES =

TRUE;

leave BLOCK]1;

end;

VER.BO

ADDRESS CONTAIN OWN ADDRESS

' EXAMINE THE FREE HOST MEMORY

[]

)

TIP = 2;
if EXAM_DATA ()
then

beain
ERRDF (36,

CKLOOP;

RETRIES =
end;

BUFF _ERR,
TRUE;

RC2S$ERR_RPT);

SEQ O

Pa250 S5
(12)

F4
CZRCFCO RC2S FR END TEST
TEST SECTICON

USER$1:(AZTEC.CZRCFCJZRCFC3.816;4

SEQ 0251
Page

(12)

if (.RETRIES) then DO_RETRIES ();
if (_NUM_RETRIES eqlu ZERQO) then exitloop;
end;

return;

ENDTST;

000001

0000006

$T11:

0000006
000001

SBTTL

MOV

BIT
BEQ
MOV

MOV
MoV
TRAP

0000006
000000G 0000006

000556
000013
0000006
0000006

CHP
CLR
cMP
8LOS
JMP

MOV

JSR

ROR

BCC

TRAP

.WORD
. WORD

000001

0000006

$T11 TEST SECTION

Ri,-(SP)

2760
2785

:%.SUP.TRACE

@0BM17,-(SP)

SP,RO
17
(SP)e,(SP)e
NUM1
. RETRIES
g?fl.RETRIES.SUP.RETRIES

2787
2789

184

013,71IP
sg.AZTEC.READY

2791
2793

64
S5

2796

40
RZT.READY.EPR

01 RET.STATUS

2798

Pg.DECODE

#1,RETRIES

000003
0000006
000000G 0000006
000310
0000006
0000006

64:

#3,CMD
. REF
DM, 11,BUF .DESCRPTR
9310,8YTE.COUNT

264

:S.EX.SUP.PRG

0000006

0000006
7%:

2801
2793
2807
2808
2809
2811

94
55

2814

01 RET.STATUS

2816

41
SXE.SUP.ERR

000001

S¢:

0000006

000001

5%
184

®s

000502

010146
032767
001407
012746
012746
010600
104417

VAX-11 Blise-16 V4,0-579

end;

281
g

LLDLL

2880
2881
2882
2883
2884
2885
2886
2887
2888
2889
2890

9¢

@¢

v03.0

®e

27-Mar-1985 15:27:28
27-Mar-198S 13:28:18

®s

ZRCFR3

Pg,DECODE

G4
ZRCFR3
v03.0

CZRCFCO RC2S FR END TEST

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC3.B16;4

SEQ 0252
P

age

(12)

FREE .MEM,ADDR ,H.SADD
K.SADD, TEMP

MEM.SIZ,BUF .LENGTH

gUF.LENGTH.RO
0

0000006
0000006 0000006
0000006

8¢:

0000006

84
184
#1,RETRIES
164

*¢

000400
000001

2819
2813
2823
2824
2825
2826

H.SADD,RO

RO, H.EADD

0000006

02.H.EADD
04.CMD
. REF
oM. SADD, BUF . DESCRPTR
06 .BYTE
. COUNT
H.EADD,R1
H.SADD .RO

0000006
0000006

177777

000002
000002

0000006
0000006

10%:

0-1,8TEMP

114

#2,R0
RO,R1

0000006
0000006

02, TEMP
10$

H.EADD

PC.SEND.DATA
RO

13
55

: «,COUNT
; +,COUNT

; COUNT,»

2827
2828
2829
2833

2835
2836
2833
2839
2841
2844

gND.DATA.ERR

000001

0000006

000001

#1,RET.STATLS

124

12¢:

PC,DECODE

¢1 ,RETRIES

0000006

0000006
000005
0000006 0000006

13¢:

000002
0000006
0000006

164

#5,CMD
. REF
0711P,BUF .DESCRPTR
02,BYTE.COUNT

:g.REC.DATA
154

000500
000502
000504
000512
000514
000520
000522
000524
000526

000001

0000006

000001

144
0000006

2846

55
43
RE.DATA.ERR
0
#1,RET.STATUS
144
PC,DECODE
65

2849
2843
2853
2854
2855
2857

2860

2862

184

#1,RETRIES

2865

CZRCFCO RC25 FR END TEST

ZRCFA3
v03.0

27-Mar-198
27-Mar-198

TEST SECTION

000421
012767
004767
006000
103012
104455
000044

000002
000000G
0000006

15¢;

0000006
0000006

104465

000630

001402
004767
005767
001402
000167
012601
000207

164
92,11P
PC,EXAM.DATA
RO
164

MOV

JSR
ROR
8CC
TRAP
.WORD
.WORD

TRAP
{0

000001
000001

0000006
000000G

0000006
0000006

17¢:

177206

18%:

VAX-11 B 1 iss-16 V4,0-579
USER$1:( AZ TEC.CZRCFC)ZRCFC3.B16:4

SEQ 0253
Pa
58

ge(12)

2859

2871

2873

2876

8LO

16%:

15:27:
13:28:

F
. ERR
BUF
RC2S4ERR.RPT
65

. WORD

006300

103416
012767
032767

B8R

wviun

184

#1,RETRIES
01,RETRIES
174
PC,D0.RETRIES

MOV

817
BEQ
JSR
TST

?g?.RETRIES

JMP
MOV
RTS

BEQ

(SP).,R1

2878
2883

2885
2760

Routine
ARC$CODE + 6742
Routine Size:
Base:
205 words,
Q
S words
;: Maximum stack depth per invocation:

000000
000000
000004
000006
000010
000012

004767

104466
006000

103773

Maximum stack

2891

.SBTTL

T11

JSR
TRAP

ROR

PC,$T11
66
RO

RTS

6 words,
depth per

ARC$CODE
Routine
Base:
Q
2 words
invocation:

1<BLF/PAGE>

TEST

8LO

000207

; Routine Size:
:

177142

7574

SECTION

2889

T4
ZRCFB3

CZRCFCO RC2S FR END TEST

2892
2893
2894
2895
2896
2897
2898
2899
2900

2901
2902
2903
2904

2905
2906

2907
2908
2909
2910
2911
2912
2913
2914
2915
2916
2917

2918

2919

2920
2921

2922

2923
2924
2925

2926

2927
2928
2929
2930
2931
2932
2933

TEST SECTION

mwwwmaamwwwmmmmbbhAAuu.nuuuuwuuauuuuuuuuuuuuuuuuuuwuuuwuuuu»

v03.0

27-Mar-1985 15:27:2 8
27-Mer-1985 13:28:1 8

.
VAX-11 81 iss-16 v4.0-579

USER$ 1:(AZTEC.CZRCFC]ZRCFC3.816;:4

BGNTST;
Yoo

TEST @12

- BUS ADDRESSING/DATA TEST 8

; DESCRIPTION:

THIS TEST FIRST BRINGS AZTEC ORIVE READY AND ONLINE AND THEN
LOADS DM_12 PROGRAM VCCTOR TO PORT CONTROLLER MEMORY. THEN
DOES THE FOLLOWING:

!
!
|

;
!
:
;
;
5

!
!
!
!
!
!
!

GIVE FREE MEMORY ADDRESS AND BUFFER SIZE TO DM CODE
AND ASK DM CODE WRITE A PATTERN OF ONE'S COMPLEMENT
OF ADDRESS AT THE ADDRESS AND EXPECTS 70 RECEIVE
SUCCESS_OR FAILURE CODE FROM DM PROGRAM. THEN CHECKS
MEMORY BUFFER FOR THE EXPECTED PATTERN AND REPORTS
ERROR IF ENCOUNTERED.

IF SUCCESS, ASKS DM CODE TO WRITt TO MEMORY A PATTERN
OF ALL ONES AND CHECKS FOR THE PATTERN IN MEMORY,

IF SUCCESS, ASKS DM CODE TO WRITE TO MEMORY A PATTERN
OF ALL ZEROES AND CHECKS FOR THE PATTERN IN MEMORY,

IF OPERATOR ASKS FOR RETRIES THE WHOLE TEST WILL BE RETRIED
ONLY IF FAILURE ENCOUNTERED.

°beéLOCKl;
if

! VER.BO

.SWP_TRACE then PRINTF

(DBM18);

TEST

GET AZTEC READY FOR OPERATION

NUM_RETRIES = ZERO;

while (.NUM_RETRIES lequ .SWP_RETRIES) do

?58'2 12;

i: AZTEC_READY ()

then

beain
ERRDF (37,
if

0);

.RET_STATUS then DECODE ();

CKLOOP;

RETRIES

else
BLOCKY :

AZT_READY_ERR,

end

TRUE;

begin

' SEND DOWN LINE LOAD THE DM CODE AND EXECUTE THE DM PROGRAM WHICH IT WILL
!

WRITE THE FREE HOST MEMORY WITH COMPLEMENT THE TESTING ADDRESS

SEQ 0254
Page
S9

(1 3)

J4
CZRCFCO RC25 FR END TEST

ZRCFR3

TEST SECTION

2959
2960
2961

CMD_REF = 3

BYTE_COUNT = 202¢3;

! BYTE COUNTS

BUF “DESCRPTR = DM 12;

COMMAND REFERENCE #

ISSUE AN EXECUTE SUPPLIED %zEaTATUS BIT

beain
ERRDF (38, EXE_SUP_ERR, 0);
if

VAX-11 B liss-16 V4.0
USER$1:(AZ EC CZRCFC]ZRCFC3 B816;4

z OMCODE STARTING ADDRESS

i1f EX_SUP_PRG ()
then

INDICATES ERROR

.KET_STATUS then DECODE ();

CKLOOP;

RETRIES = TRUE;
leave BLOCK];

VER.B0

LO-BYTE FREE HOST MEMORY ADDRESS

TOTAL FREE HOST MEMORY SIZE

end;

incru COUNT from 0 to 2 do

ADD = .FREE_MEM_ADDR;
"‘8
TEMP

= .H_SADD;

BUF_LENGTR =

HEH S1Z;

H_EADD = .FREE_MEM_ ADOR - 2 - .BUF _LENGTHs?2;

! END ADDRESS OF BUFFER

! SENT FREE HOST MEMORY ADDRESS AND IT LENGTH TO DM PROGRAM
.

' COMMAND REFERENCE 04
! DESCRIPTOR ADDRESS

CMD_REF = 4;
BUF "DESCRPTR = H_SADD;

BYTE_COUNT = 06;
INITIALIZE MEMORY BUFFER WITH A PATTERN BEFORE

TOTAL BYTES TO BE TRANSFER

ASKING DM CODE TO WRITE TO THE BUFFER

incru LOOP from

beqin

_H_SADD to

.H_EADD by 2 do

LTEMP = mo125252";

TEMP =
end;
H_EADD

TEMP

« 2;

OQ;

if SEND_DATA ()
then

NVNNNNNNNOCO

2958

HIGH BYTE FREE MEM ADDRESS

ISSUE SEND DATA COMMAND
%;2LUS BIT INDICATES ERROR

begin

ER80F (39, SND_DATA_ERR, 0);
if

.RET_STATUS then DECODE ();

CKLOOP;

RETRIES = TRUE;

leave BLOCK];

end;

2949
2950
2951
2952
2953
2954
2955
2956
2957

ORI INOORNRROOTOCRTTORVNNNOOTOOCOUNTUUITULIUIL

v03.0

27-Mer-1985 15:27:28
27-Me~-1985 13:28:18

! VER.BO

¢ WAIT FOR “DONE" SIGNAL FROM DM
]

CMO_REF = S;
BUF "DESCRPTR = TIP;

BYTE_COUNT = 02;

!
i

COMMAND REFERENCE ¢
CLEAN THE BUFFER
SET BYTE COUNTS = 2

SEQ 0255

Page

I<4
ZRCFR3

TEST SECTION

CKLOOP;

0. XY
L

THEN
REPORT

ERROR

TRUE;

leave BLOCK];

! VER.BO

.TIP nequ %0'104’

IF DM RETURNS FAILURE CODE

ADDRESS

OF ADDRESS

end;

VAX-11 B
TEC CZRCFC]ZRCFC3 Bl6:4
USER $1:( RZ

.RET_STATUS then DECODE ();

RETRIES =

then

begin

ERRDF (41,

RETRIES =

CKLOOP;
exitloop;:

DMC_ERR,

TRUE;

THEN ABORT

DM PROGRAM

0);

end;

' EXAMINE THE FREE HOST MEMORY
]

.COUNT eqlu O then TIP

.COUNT eqlu |

.COUNT eqlu 2 then TIP =

then TIP

};

ALL _ONES;

ZERQ;

CONTAINS

COMPLEMENT

MEMORY PATTERN SECOND TIME

! MCMORY PATTERN THIRD TIME

if EXAM_DATA ()

then

begin

ERSDF (42, BUFF _ERR, RCOSSERR_RPT);
CKLOOP;

RETRIES =

TRULE;

leeve BLOCK];

end;

i SIGNAL DM TO CONTINUE TO EXECUTE THE PRCGRAM

end;

R R
R R

TE LV

begin
if

Lis

SENT A RECEIVE DATA COMMAND
STATUS BIT INDICATES ERROR

ER80F (40, RE_DATA_ERR, 0):

RN RN ENENENT. Y. Y. Y. XL Y

Y. Y. Yo Y. Y. Y. Y. Y. Y. Y. SRS PERIIRY, Y. Y. Y. PUPY I PRI PNPTINT, ¥. Y. |

if REC_DATA ()

then

if (.RE"RIES) then DO_RETRIES ();
if

(.NUM_RETRIES eqlu ZERD) then exitloop;

R
L

3007
3008
3009
3010
3011
3012
3013
3014
3015
3016
3017
3018
3019
3020
3021
3022
3023
3024
3025
3026
3027
3028
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3039
3040
3041
3042
3043
3044
3045
3046
3047
3048
3049
2050

®6 05 05 T BT Ve BT 0 BT BT VG Ve GE I @9 BL G G B0 B B0 04 G0 GF VL G T B¢ VI CF V6 G0 BF V! GF VO G2 G0 VI VI G0 S8 G0 Vo G0 G0 Vs Ve Gs O Go Ge

vV03.0

3006

27- Mar-1985 1 5:27:28
51- Mer-19 85 1 3 28:18

CZRCFCO RC2S FR END TEST

end;
return;

! VER.B80

! ASK DM CODE TO CONT,

SEQ

0256

L4
ZRCFRS

CZRCFCO RC2S FR END TEST

v03.0
:

3063

004167
032767

0000006
000001
000000G

000014
000020
000028
000026
000030
000032
r30036

0127646
012746
010600
104417
022626
005067
026767

0000006
000001

000044
000046
000050

001407

000014

000064
000066
000070
000072
000074
000076
000104
000106
000112
000114
0001i6
000120
000122
000130

103023
104455
000045
0000006
000000
032767
001402
004767
104465
006000
103001
000207
012767
000167

000001
000552

030142

012767

0000006 0000006

000150
000156
000162

006000

012767

012767
004767
006000

000001

0000006

as;

0000006

S$:

0000006

64:

000624 0000006
0000006

000164
000166
000170
000172
000174
000176

103023
104455
000046
0000006
000000
032767
000001

000206
212

004767
104465

216
220
222
230

10300
000207
012767
000167

000001
000452

236

016767

000000G 0000006

000204

000214

234

244
000252
00026G

001402

016767
016767
01670C

MOV
MOV
MOV
TRAP
cHp
CLR
e

oDBM18,
- (SP)
81,-(SP)
SP,RO
17
(SP)e,(SP).
NUM_RETRIES
NUM_ RETRIES,SWP . RETRIES

8L0S
RTS
MOV

VAX-11 Bliss-16

V4.0-579

usea :[(AZ7 c czncrc12acrc3 B16;4

Page

(13)

0000006

0000006 0000006
000000G 0000006
0000006

8s:

9s:

10%:

;

2890
2924

5P,

;
;

2926
2928

;
;

2930
2932

;

2935

JSR

8CC
TRAP
LHORD
.MORD
.MORD
817
BEQ
JSR
TRAP
ROR
BHIS
RTS
MOV
JHP

6
ss
&5
AZT_READY.ERR
O
01,RET, STATUS
4t
PC,DECODE
65
RO
S$
PC
01 ,RETRIES
228

;

2937

;
;

2940
2932

MOV

o0M. 12,BUF .DESCRPTR

;

2950

MOV

03,CMD.REF

0624 ,B8YTE . COUNT
PC.EX.SUP . PRG
RO

8CC
TRAP
.HORD
.HORD
.MORD
817

9s
ss
46
EXE.SUP.ERR
O
01 ,RET.STATUS

JSR
1049

PC.DECODE
65

BHIS
RTS
MOV
JMP

8s
PC
01,RETRIES
224

BEQ

;
p

3
PC
014,11P
PC,AZTEC.READY

MOV
JSR
ROR

0000006

006000

005002

8712 TEST SECTION
R1,$SAVER
01,5WP . TRACE

ROR

0000006

000003

LSBTTL
JUSR
817

8€EQ

14:
2s:

000056

000134

$T12:

0000006
000000G 0000006

101401
000207
012767
004767

000062

27-Mar-1985 13:28:18

ENDTST;

000000
000004

000012

27 Mer-1985 15:27:28

TEST SECTION

5€Q 0257

ROR

;

2949

;
;

2951
2953

;

2956

;

2958

;
;

2961
2955

CLR

R?2

; COUNT

2965

MOV
MOV
MOV

H.SADD, TEMP
MEM. SIZ,BUF .LENGTH
B'F .LENGTH,RO

;
;
;

2968
2969
2970

MOV

FREE.MEM.ADDR, H. SADD

;

296~

]

M4
CZRCFCO RC25 FR END TES?T

IRCFR3

27 Mer-1985S 15:27:28
27-Mer-1985 13:28:18

TEST SECTION

v0s.0

RO
FREE .MEM.ADDR,RO
RO,H.EADD
2 ,H.EADD
64 "MD.REF

000266

4 ,ADD,BUF .DESCRPTR
#6,8YTE. COUNT
H.EADD,R]
H.SADD,RO

124

11¢:

0-52526,3TEMP
02.1EW

124

RO,R1

#2,R0

VAX-11 8l i98-16 V4,0-579
USERS] :(AZTEC.CZRCFC)Z97F(C3.816;4

SeQ 0258 63
P

.'.(13)

2974
2975
2976
2980
2982
2983
2980

11
H.EADD
PC,SEND.DATA

2986

2991

RO
144

2988

SND.DATA ERR

13%;

01 ,RET.STATUS
134
PC.DECODE

2993

244

01,RETRIES

14%:

224
05,CMD
. REF
011P,BUF .DESCRPTR
02,8YTE
. COUNT
:g.REC.DAYA
164
5S
S0

RE.DATA ERR

000001

0000006

15¢:

0] RET . STATUS
154
PC,DECODE
65

244

000001

0000006

0000006 000104

00C%64

012767
104465

000001

0000006

164
:

01,RETRIES

3015

T1P,01048

3019

SS
S1
OMC.ERR

3022

01,RETRIES

3023

22%
174

N4
ZRCFRS
v03.0

CZRCFCO RC2S FR END TEST

27-Mer-1905 15:27:28
27-Mer-1985 13:28:18

TEST SECTION

000566
000570

000001
000001

0000006

1777
000002

0000006

18¢;

19¢:
20¢;

RTS

157

BNE

184

MOV

01,11Ip

: COUNT, e

3036

cHe
BNE
CLR
JSR

R2, 02

; COUNT,
e

3038

MoV

0-1,71p

204

11P

PC.EXAM DATA

ROR

200674

177330
000001

234

177102

: Routine Size:

00476"

244:

239 woras,

depth

per

177036

112:-

18:

Mox aus steck

01 ,RETRIES
224
R2

8I7

8EQ
JSR
157
8EQ

t«BLF /PAGE
»

Rout ne Bese

AvoCcet

on:

¢ worags

; COUNT e

01 ,RETRIES

234
PC,D0.RETRIES
NUM RETRIES

2965
3056

:
3058

244

MNP
RS

PC
-

T12 TEST SECTION

JSR

PC.oT12

ROR
8L0

R¢
18

TRAP

;

2890

7610

.S87ML

AC$CO0E

: COUNT

R2,02

224
104

Q's

6 woros.
gepth per

3043

244

BMI
JHP

Rout ne Bese:
AC$COOE
7 words

BR
INC
ce

‘nsoCcot On:

104466
006000
103773
000207

i Qeut
ne S ze:

22s:

0000006
0000206

: Mox mum stock

0000006

3043

8LO

000002

000700
000702
000706
000714
000716
000722
000726
000730
000734

RC2S4ERR
RPT

MOV

21s:

3040

214
55
S2
BUFF _ERR

TRAP
ROR

000672

. WORD
. WORD
. WORD

0000006

3032

R2,01
194

TRAP

000001

; COUNT

CMe
BNE

8cc

(13)

8CC

0000006
0000006

’6092229 64

ROR

17%;

VAX-11 Bliss-16 V4.0-579

USER$1: [AZTEC. czncrc12ncrc3 8164

10546

3062

B5
CZRCFCO RC25 FR END TEST

ZRCFB3

TEST SECTION

BGNTST;
Yoo

TEST #13

- BLOCK TRANSFER TEST

DESCRIPTION:
THE ABILITY OF THE AZTEC CONTROLLER TO DO BLOCK TRANSFERS TO AND FROM
MEMORY WILL BE TESTED WITH DIFFERENT DATA PATTERNS.
THE "“WRITE HOST
MEMORY* XFC AND THE *“READ HMOST MEMORY* XFC WILL BE USED,
THE HOST
MEMORY BUFFER IS 256 WORDS IN SIZE.
4 DIFFERENT DATA PATTERNS AS
GIVEN BELOW ARE USED.
PATTERN O

111111

044444
022222

PATTERN 1

PATTERN 2

PATTERN 3

177400

155555

000377

007760
000377

133333
066666

170017
177400

1) THIS TEST BRINGS RC2S CONTROLLER ONLINE AND LOADS DM CODE

PROGRAM TO CONTROLLER'S MEMORY.

2) FIRST THE HOST MEMCRY BUFFER IS INITIALIZED WITH PATTERN O.
gssgggUESTA COMMAND WITH HOST BUFFER ADDRESSES (TRANSMIT AND RECEIVE)
3) DM CODE THEN READS HOST MEMORY BUFFER AND PUTS IN CONTROLLER’S
MEMORY AND WRITES BACK IN HOST MEMORY RECEIVE BUFFER USING XFC'S.
4) HOST PROGRAM COMPARES BOTH BUFFERS FOR DATA PATTERN O.

S) IF THERE WAS AN ERROR IN COMPARISION THE ERROR WILL BE REPORTED.
IF THERE WAS ERROR IN THE MSCP DUP CALLS OR INITIALIZATION, THIS

WILL ALSO BE REPORTED.

STEPS 2 THRU S5 WILL BE REPEATED FOR DATA PATTERNS 1,2 AND 3.

IF AN ERROR WAS ENCOUNTERED THE TEST WILL BE ABORTED. IF OPERATOR
CHOSE FOR RETRIES, RETRIES WILL BE DONE FROM THE START OF THE TEST.

asbel
BLOCK];
if

80D

VAX-11 8 1i ee-16 V4,0-579
USER¢ 1:( AZTEC.CZRCFC)ZRCFC3.816;4

5Ol OE G

08 O8O G U G G0 O W G G O U G G G G G G G G G G G L (o (0 ol G (o (o (o (0 o (8 (o L8 (o (i L

v03.0
B B8 S0 W BT B0 WD B0 B B B0 VL B0 00 ST B V2 G0 B WV VS B0 W0 B Ve G0 G0 B W G0 VS T G0 SO G0 VO V0 V0 G0 G0 Vo VP Vs G¢ V0 G V¢ B0 G Vo ¢ Gs GO SO Vs GO @0

27-Mer-1985 15:27:2 8
27-Mer-1985 13:28:1
:18

.SWP_TRACE then PRINTF (DBM19):

TEST 13

IF FAILURE REPORT ERROR

NUM_RETRIES = ZERO;

while (_NUM_RETRIES lequ .SWP_RETRIES) do
begnn
! GET AZTEC READY FOR OPERATION
if AZTEC_READY ()
then

SEQ 0260

(14)

C5
ZRCFR3

CZRCFCO RC2S FR END TEST

3122
g%g}

gisg

3127
3128
3129
3130
3131
3132
3133

3134

ggg

w
[=]

3137

27-Mar-1985 15:27:28

TEST SECTION

QOOOslslflO‘O‘0‘0‘0‘0‘0‘0‘0‘0‘0‘O‘O‘0‘0‘00‘00\0‘0‘0‘O\MMMO‘O‘OOOOOMM%MU‘MM.‘&MU!UIU'U'UIU'

v03.0

bcain
ERRDF

(43,

AZT_READY_ERR,

0);

RETRIES = TRUE;
end

else
! LOAD DM CODE INTO CONTROLLER'S MEMORY
BLOCK] :
begin
CMU_REF = ,CMD_SLOT

DECODE THE STATUS,

SET RETRIES FLAG

ANY

! COMMAND REFERENCE o

DH‘lis

! DMCOD" STARTING ADDRESS

BYTE_COUNT = 10Se3;

! BYTE

if EX_SUP_PRG ()

then

USER$1:(AZTEC.CZRCFC)ZRCFC3.816;:4

.RET_STATUS then DECODE ();

BUF _DESCRPTR

VAX-11 Blies-16 V4.0-579

27-Mar-1985 13:28:18

UNTS

begin

ISSUE AN EXECUTE SUPPLIED PROGRAM
IF STATUS BIT INDICATES ERROR
THEN REPORT ERROR

DECODE STATUS,

ERADF (44, EXE_SUP_ERR, 0);
.RET_STATUS then DECODE ();

RETRIES =

IF ANY

TRUE;

leave BLOCK];

end;

incru COUNT from O to 3 do

begin

SELECT ONE OF THE PATTERNS AND INITIALIZE HOST TRANSMIT BUFFER

WITH THE SELECTED PATTERN.
selectoneu
set

.COUNT of

] :

PATTERN_ADDR

)

PATTERN_ADDR

]

PATTERN_ADDR

) :

PATTERN_RDDR

DATA_PAT];
DATA_PAT?;

DATA_PATY;

DATA_PAT4;

tes;

incru J from 0 to 254 do

begin

incru X from 0 to 2 do

begin

INITIALIZE TRANSMIT

BUFFER OF 256 WORDS

WITH THE PATTERN

XH?_DATA_BUF (.J) = ,PATTERN_ADDR [.K];
J=

end;

oJ el

INCREMENT

J WITHIN INNER _OO0P

56092321 66
(14)

D5
CZRCFCO RC2S FR EMND TEST
TEST SECTION
JroJ

end;

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18
1

VAX-11 Bliss-16 V4.,0-579
USER$1:[{AZTEC.CZRCFC)ZRCFC3.816;4

DECREMENT J T0 ADJUST POINTER

OT RN INNIINJOO OO

5 GIVE START ADDRESS OF TRANSMIT AND RECEIVE BUFFER AND SIZE TO DM CODE

NNNNOOOOR INNANOORO VNN NUNNANORO RO

3179
3180
3181
3182
3183
3184
3185
3186
3187
3188
3189
3190
3191
3192
3193
3194
3195
3196
3197
3198
3199
3200
3201
3202
3203
3204
5205
3206
3207
3208
3209
3210
3211
3212
3213
3214
3215
3216
3217
3218
3219
3220

ZRCFB3
v03.0

)

SEND_PKT [WORDO] = XHT _DATA_BUF [0];
SEND_PKT

[WORD1)

SEND PKT

[WORD3)

= 0;

SEND_PKT (WORDZ2) = Rév _DATA_BUF [0]:

! LOW WORD OF TRANSMIT ADDRESS

' HIGH WORD OF TRANSMIT ADDRESS

! LOW WORD OF RECEIVE ADDRESS

HIGH WORD OF RECEIVE ADDRESS
COMMAND REFERENCE 04
DESCRIPTOR ADDRESS

CMD_REF = _CMD_SLOT;

BUF "DESCRPTR = "SEND_PKT;

BYTE_COUNT = 08;

TOTAL BYTES TO BE TRANSFERRED

1 £ SEND_DATA ()

then

beain
ERRDF (45,
if

)

SND_DATA_ERR,

THEN REPORT ERROR

0);

.RET_STATUS then DECODE ();

RETRIES =
exitloop;
end;

ISSUE SEND DATA COMMAND
IF STATUS BIT INDICATES ERROR

DECODE RETURN STATUS

TRUE;

§3SU$13'REC DATA COMMAND AND GET THE RESULT OF DM CODE STATUS

CMO_REF = .CMD_SLOT;

' COMMAND REFERENCE 0

BYTE_COUNT = 02;

! SET BYTE COUNTS = 2

BUF “DESCRPTR = TIP;

if REC_DATA ()

then

SENT A RECEIVE DATA COMMAND
%:EaTATUS BIT

begin

ER80F {46, RE_DATA_ERR, 0);
if

CLEAN THE BUFFER

INDICATES ERROR

REPORT ERROR

_RET_STATUS then DECODE ();

RETRIES =

exitloop;

TRUE;

end;

if .TIP nequ so'l104'
then
)

'
!

bea»n

IF DM RETURNS FAILURE CODE
THEN ABORT DM PROGRAM

ERRDF (47, DMC_ERR, 0);

RETRIES = TRUE;
exitloop;

endg;

! COMPARE TRANSMIT AND RECEIVE BUFFERS FOR THE PATTERN
incru J from 0 to 255 do
begin

.XMT_DATA_BUF

then

[.J) nequ

.RCV_DATA_BUF

[.J])

SEQ 0262
P age
67

(14)

ES
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

HWWWRLLALLLANNCO
~-J~J0D DO 0D G GO
®

WP B0

00 B0

CL 4GS

v03.0

3236
3237
3238
3239
3240
3241
3242
3243
3244
3245
3246
3247
3248
3249
3250
3251
3252
3253
3254

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

93 . an _DATA_BUF

= RCV_DATA_BUF

PS = .XMT_DATA BUF st
P6 = .RCV_DATA BUF
PRINTB (FMT7A,

RETRIES = TRUE;

.P6);

exitloop;

16 v4.0-579

USER$1:[AZTEC.CZRCFCIZRCFC3.B16;4

SEQ 0263

Page

(14)

! TRANSMIT BUF FAILURE ADDRESS
!

RECEIVE BUF FAILURE ADDRESS

! TRANSMIT DATA

! RECEIVE DATA

! PRINT ERROR INFO.

! TURN ON RETRIES

end;

end;
end;

if (.RETRIES) then DO_RETRIES

();

1f (.NUM_RETRIES eqlu ZERO) then exitloop;
end;
return;

ENDTST;

$T13:

0000006

000001

000015

0000006

.SBTTL
JUSR
ggg

$T13 TEST SECTION
R1, $SAVES
:%.SUP.TRACE

MOV

0DBM19, - (SP)

MOV
TRAP

SP,RO
17

;

CLR
CMP
BLOS

NUM.RETRIES
NUM, RETRIES,SWP . RETRIES
34

;
;

3113
3115

;

3117

;

3123

;

3125

;
;
;
:
;

3127
3120
3133
3134
3135

MOV

0000006
000000G 000000C

0000006

1$:
2%:

cMP

JSR

PC,AZTEC.READY

ROR

0000006

000001
000674
000000,
000000G
000322

0000006

000000G

0000006
0000006
0000006

5%:

(SP)e,(SP).

MOV

TRAP

000001

01,-(SP)

RTS

BCC

ERRDF (48, BUFF ERR, 0);
PRINTB (FMT?, .Ps. .Pa);

0000006
000001
0000006

000140

};

VAX-11 Bl

015,71IP

.WORD
.WORD
.WORD
g%g

53
AZT.READY.ERR
O
2%.RET.STATUS

JSR

PC,DECODE

MOV
JMP
MOV
MOV
MOV

o1,RETRIES
234
CMD.SLOT,CMD.REF
#DM.13,BUF . DESCRPTR
0322,8YTE.COUNT

;
;

;

3063
3111

SP,

3120

F5
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

v03.0

PC,EX.SUP.PRG
RO
74

0000006

000146
000152
000154
000156
000160
000162
000164
000166
000174
000176
000202
000210
000214
000216
000220

VAX-11 Bliss-16 V4,0-579

USER41:(AZTEC.CZRCFC)ZRCF(C3.B16;4

SEQ O 264
P

age

(1 4)

3137

55
54

3140

01 ,RET.STATUS

3142

01,,RETRIES

3144
3139
3148
3155
3158
3159
3155
3161

gXE.SUP.ERR

000001
000604

0000006

000200°

000240’

124

104

RO, 02

O0DATA PAT3,PATTERN.ADDR

3165
3155
3167

ODATA.PAT4 ,PATTERN.ADDR

3168
3171
3174
3176

CXC

g??).XHT.DATA.BUF(RO)

R3
R3, 02

1434
R§;o376
[

000230
000234

0000006
0000006
0000006

OXMT .DATA.BUF
, SEND . PKT

SEND.PKT+2

ORCV.DATA.BUF ,SEND.PKT+4

SEND .PKT+6
CHD. SLOT,CMD. REF

0SEND . PKT,BUF
. DESCRPTR
010,BYTE. COUNT

SS.SEND.DATA
164
55
55
8ND.DATA.ERR

0000006

@1,RET.STATUS

RO
R3,R2
R2
PATTERN.ADDR,R2

AXRC

000240’

000376

000001

3162
3155
3164

124

11¢:

000002

000000
032767

COUNT
COUNT,
»

¢DATA PAT2 ,PATTERN.ADDR

000240'

000240
0000006

000000G
000232’
000000G
000236’
000000G
000230’
00001C_
0000006

RO, 01

10%:

000003
000222

000214’

R4
R4 ,RO
94
#DATA.PAT],PATTERN,ADDR

000240’

000002

234

7%:
84:

Hwin

000206

64:

64
PC,DECODE

0000006

(YUY

000001

000426
000430
00043,
000434

27-Mer-1985 15:27:28
27-Mer-1985 13:28:18

3177
3174

317
3185
3186
3187
3188
3189
3190
3191
3193
3196

3198

G5
CZRCFCO RC2S FR END TEST

IRCFB3

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

vV03.0

000442
000444
000450
000456
000460
000466
000474
000502
000506
000510
000512
000514
000516
000520
000522
000530
000532
000536
000544
000546

0000006
000001
000000G

0000006 0000006
0000006 0000006
000002
0000006
0000006

SEQ 0265
Page
70
USER$1:(AZTEC.CZRCFCJZRCFC3.B816;4
(14)

VAX-11 Blies-16 V4.0-579

154

PC.DECODE
#1,RETRIES

15¢;

3200
3195
3206
3207
3208
3210

234
CMD.SLOT,CMD.REF

16¢:

#TIP,BUF .DESCRPTR
92,8YTE
. COUNT
sg.REC.DATA

184
55
56

3213

8E.DATA.ERR
000001

0000006

0000006
000001
000000G

174

000000G 000104

184:

01,RET.STATUL
174
PC,DECODE

3215

SI.RETRIES

3217
3212
3221
3224

000001

0000006
L3N

19¢.
204:

3225
3223
3231
3234

HEV

RO
XMT .DATA.BUF (R3),RCV.DATA.BUF(RO)

000000G 0000006

214

0000006
0000006

000666
000674
000676
000700
000702
000704
000710
|000714
000720
000724

010100
006300
016067
010100
006300
016067
104455
000060
0000006
000000
016746
016746
012746
012746
010600

0000006
0000006
000000G 0000006
000000G 0000006

000000G
0000006
0000006
000003

TRAP

.WORD
.WORD
. WORD

MOV
MOV
MOV
MOV
MOV

R1,RO
R0
#XMT .DATA.BUF
,RO
RO,P3
R1,RO
RO
@RCV.DATA
.BUF ,RO
RO, P4
R1,RO
RO
XMT.DATA.BUF(RO),PS
R1,RO
RO
RCV.DATA.BUF(RO),P6

;

HEVI

3238

3239
3240

3241

55
60
gUFF.ERR

3242

P3,-(SP)
OFMT7,-(SP)

SP,RO

3237

; SP,+

H5
CZRCFCO RC2S FR END TEST

ZRCFRY
v03.0

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

000726
000730
000734
000740
000744
000750
(20754

VAX-11 B 1 ies-16 V4,0-579
USERS$1:( A ZTEC.CZRCFC)ZRCFC3.B16;4

000006
0000006
0000006
0000006
000003

000756
000760
000764
000772
000774
000776

000010
000001

3243

SP,s

000000G

000377

001002
001004
001006
001012
001014
001020
001026
001030
001034
001040
001042
001046

000003

177176
000001

SEQ 0266
P age
71
(1)

0000006

0000006
0000006

2l4:

J
J.‘

22%:

COUNT
»
COUNT,
8

23$:

01,RETRIES

176770

254:

PC,D0.RETRIES

NUM.RETRIES

254

RTS

3148

3254

244

3244
3236
3231

3256

3063

AC$CODE + 10562
276 words,
Routine Base:
;: Routine Size:
11 words
; Maximum steack depth per invocation:

000000

004767

000004
000006
000010
000012

104466
006000

000000

Routine Size:

Maximum stack

3262
3263
3264
3265
3266
3267
3268
3269
3270
3271
3272
3273
3274

1$:

103773

.SBTTL

JSR

TRAP
ROR

BLO

RTS

6 words,
depth per

]

;

T13;:

000207

[E QL RV XV RV RV RV QO LV RO IV 1

;

176724

BGNTST;

T13 TEST SECTION
PC,$T13

3260

66
RO
14

RC$CODE - 11632
Rout ine Base:
invocation:
2 words

feo

TEST

€14

SPIN UP/HEAD LOAD SEQUENCE

g TEST 814 - SPIN UP/HEAD LOAD SEQUENCE

! DESCRIPTION:
THIS TEST FIRST INITIALIZES RC25 CONTROLLER,
AND DOES SET CONTROL CHARACTERISTICS.

INITIALIZES COM_AREA,

CZRCFCO RC2S FR END TEST

ZRCFR3
v03.0
.

*
.

]
-

1]
.

[]
-

.
.

3275
3276
32N
3278
3279
3280
3281

3282

3283

L]
.

®
.

*
-

L]
.

[]
.

L4
-

*
»

*
.

1)
.

L
.

[
-

*
-

.
-

L)
-

L)
.

.
.

L]
-

[
-

.
.

L)
.

14
.

L)
.

L
.

[
.

[]
-

LJ
-

L]
.

[]
.

L)
-

[
.

4
.

[
.

L)
.

L]
.

.
.

14
.

[]
-

o
.

[
.

3331

[

THEN,

VAX-11 Bliss-16 V4,0-579

27-Mer-1985 13:28:18

THIS TEST WILL FIRST

USER$1:(AZTEC.CZRCFC)ZRCFC3.B16;4

ISSUE THE MSCP

"AVAILABLE"” COMMAND WITH THE

THAT THE DRIVE HAS WAD TIME TO SPIN DOWN.

IT WILL THEN ISSUE THE MSCP

SPIN DOWN MODIFIER SET.

IT WILL THEN WAIT FOR 30 SECONDS TO INSURE

"ONLINE" COMMAND TO SPIN THE ORIVE UP,

THIS OPERATION WILL BE TIMED

AND THE TIME WILL BE PTPORTED TO THE OPERATOR SO THAT THIS TIME CAN BE
VERIFIED TO MAKE SUE IT IS WITH IN LIMITS,
THE RUN/START AND HEAD

LOAD INTERNAL DIAGNOSTICS WILL RUN DURING THIS TIME.
1IF AN ERROR IS
ENCOUNTERED THE RETURNED STATUS OF THE "ONLINE" COMMAND WILL BE
SOMETHING
OTHER THAN "SUCCESS" AND THIS STATUS WILL BE DECODED
AND REPORTED WITH ERROR MESSAGE.

IF THE OPERATOR HAS SPECIFIED RETRIES ON ERROR,

REPEATED.
e

TEST SECTION

VIVIVIVIVIVIVIAE BUVTVINIVIVIVIVIE D B b 5 5 B 5 5 5 0l I Gl G4 08 8 QI U8 Gd 03 Wl O3 O8O3 08 G4 G O8O G G G 08 8

[

27-Mar-1985 15:27:28

THE TEST WILL BE

VER:C
abel
BLOCK]L;

.SWP_TRACE then PRINTF

(DBM20);

TEST

NUM_RETRIES = ZERO;
while (.NUM_RETRIES lequ

.SWP_RETRIES) do

begin

11fl + 14;

! THIS IS A FLAG TO INDICATE
!

T0 AZTEC _READY ROUTINE

! 70 SKIP ONLINE MSCP COMMAND.

! GET AZTEC AVAILABLE BY INITIALIZING RC25 CONTROLLER,
! AND COM_AREA
1

if AZTEC_READY ()

then

IF FAILURE REPORT ERROR

begin

ERSDF (49, AZT_READY_ERR, 0);

)

DECODE THE STATUS,

¢t

SET RETRIES FLAG

.RET_STATUS then DECODE ();

RETRIES =

else
BLOCK] :
]

TRUE;

IF ANY

end

begin

' ISSUE AVAILABLE COMMAND WITH SPIN DOWN MODIFIER SET
|

if AVAILABLE ()

then

beain
ERRDF (50,
if

AVAIL_ERR,

0);

.RET_STATUS then DECODE ();

RETRIES =

TRUE;

leave BLOCK};

ISSUE AVAILABLE COMMAND

DISPLAY ERROR MESSAGE

DECODE RETURN STATUS

SEQ 0267

Page

(1 4)

J5
CZRCFCO RC2S FR END TEST
TEST SECTION

ZRCFR3
3332
3333
3334
3335
3336
3337
3338
3339
3340
3341
3342
3343
3344
3345
3346
3347
3348
3349
3350

3380

0 00000
00004
000006
000014
000016

HOWWWELEEELLALNUIIVITVITVIVNIVIVIOO
O
VTLTVTNVTVINIVIVIIUVION O O O LTUTUY TV UYL

v03.0

004167
005746
032767
001407

012746

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

VAX-11 B lises-16 V4,0-579
USER#$1:( AZTEC. CZRCFC]ZRCFC3.816:4

SEQP0268
age

(14)

end;

! WAIT AT LEAST 30 SEC.

TO MAKE SURE THE SPINDLE IS SPUN DOWN,

CLOCK_INIT ();

VER:C

incru TIME from 1 to 1C00 do
begin

DELAY 30 SECOND;

DELAY (100);
IF _SECONDS GEQU 30 THEN EXI TLoopP;
BREAK;

end;

.CLK_CSR = ZERO;

! DELAY
!

VER:C
LOOK FOR CONTROL C

STOP THE CLOCK

§ ISSUE A ON LINE COMMAND AND START THE CLOCK.
CMD_REF = .CMO_SLOT;

CLOCK_INIT (),

INITIALIZE VARIABLES FOR CLOCK
SET COMMAND REFERENCE T10
3

1f ON_LINE ()
then

SEND ON LINE COMMAND
IF COMMAND FAJLED

begin

ERaDF (51, AZT_READY_ERR, 0);
if

REPORT ERROR

.RET_STATUS then DECODE ( );

! DECODE STATUS

RETRIES = TRUE;

leave BLOCK];

end;

.CLK_CSR = ZERO;

TURN OFF

P4 =
PS =

TICKS CONVERTED TO 100TH OF A SEC
REMAINDER
ADD 1 TO TICKS IF > .5
PRINT TIME TAKEN TO COME ONLINE

! CALCULATE TIME ELAPSED
P4

_TICKS¢100/.CLK_HERTZ;
.TICKS#100 mod .CLK_HERTZ;

.P4

.PSe2/.CLK HERTZ;

PRINTB (FMT8, .MINUTES, .SECONDS,

end;

.P4);

THE CLOCK

if (.RETRIES) then DO_RETRIES ();

if (.NUM_RETRIES ealu ZERD) then exi tloop;
PASSO = FALSE;
end;

RESET FLAG

return;

ENDTST;

0000006
000001

0000006

$T14;
0000006

.SBTTL
#g?

$T14 TEST SECTION
R1,$SAVE?

8I7
BEQ
MOV

g%.SHP.TRACE

-(SP)

#DBM2
- (SP)
0,

3261

3294

CZRCFCO RC25 FR END TEST

ZRCFB3
v03.0

27-Mar-198
27-Mar-198

TEST SECTION

SP,RO
17
(SP)+,(SP)e

0000006
0000006 0000006

000001

Y >

012746

(9, ]¥ ]

I<5

000474
000016
0000006
0000006

VAX-11

B li 98-16 V4,0-579
ZTEC.CZRCFCIZRCFC3. B16;4
USERS :( A2

SEQ 0269

(14)

;s SP,e

NUM. RETRIES

3296
3298

g?fl.RETRIES.SUP,RETRIES

194

016,71IP
gg,AZTEC.READY

3300
3307

S
55

3310

SZT.READY.ERR
032767

000001

004767
012767
000001
000574
204767
006000
103020
104455
000062
0000006
000000

032767

004767
012767
162706
000546
004767
012702
012701

000242
000244
000246
000250

254

000256
00262
266
274

000300
000302

103005
104422

005202
020227

101754
005077
004767
016767
004767
006000

103020

0000006

:%.RET.STATUS
44
.

3312

PC,DECODE
01,RETRIES

174

3314
3307
3323

3326

g%.RET.STATUS

3328

64%:

PC,DECODE
01,RETRIES
024 SP

3330
3325

7¢:

PCCEOCK.INIT

S¢:

PC,AVAILABLE
RO
7%

62
SVAIL.ERR

0000006

001402

001410
016700
001403
005016
005300
001375
005301
000767
026727

0000006

8¢:
9¢:

0144 Rl

¢, TIME

o, $8TMP?

3336
3338
3340

s, $8THP]

000000G 000036

10¢:

$$THP
$STHP)

11%:

$$TMP2

124:

SECONDS, 036
134

001750
0000006
0000006
0000006 0000006
0000006

R2,01750

134:

ICLK.CSR

PC,CLOCK,INIT

CMD.SLOT,CMD.REF

:S.ON.L]NE
15%

334
TIME

TIME,»

3338
3345
3349
3350
3352

L5
CZRCFCO RC2S FR END TEST

ZRCFA3

TEST SECTION

v03.0

000304

27-Mar-198S5 15:27:28
27 Mar-1985 13:28:18

104455
000063
0000006
000000
032767
001402
004767

TRAP

012767

14%;

005077
016746
012746
004767
010016
016746
004767
010067
016716
012746
004767
010016
016746
004767
010067
016716
006316
016746

15¢:

162706
000463

[000552

CLR

. CSR
9CLK

JSR

PC.BL ML

MOV
JSR

CLK.HERTZ,-(5P)
PC.BLSDIV

B8R

MOV

RO ,P4

MOV

0144, -(5P)

184
0000006

177270

000207

19%:

RO,(SP)

MOV
JSR

CLK.HERTZ, -(SP)
PC,BL $M0D

004767

RO,PS
PS,(SP)

ASL
MOV
JSR
A0D

(SP)
CLK . HERTZ,-(SP)
PC,.BLSDIV
P4 RO

MOV

P4,(SP)

177220

114::

3369

SECONDS,
- (SP)

MINUTES,

(5P)

oFMT8, (SP)
04,-(SP)
SP.RO
14

ADD

024,5P

8€Q
JSR
157
BEQ
CLR
JMP
157

18%
PC.DO.RETRIES
NUM RETRIES
19¢
PASSO
24
(SP).

0] RETRIES

RIS

.SBTTL

3368

RO,P4

8171

AC$CODE
182 words,
0
Rout
ine Bese:
; Meximum steck oepth per invocetion
16 words

3367

PC.BLOHUL

MOV

: Routine Size:

0L000C

T1EKS, (SP)

MOV

164
17%:

3363
3366

RO,(SP)

MOV
MOV
MOV
TRAP

0000006

(14)

3359
3354

TICKS,-(SP)
0144,-(SP)

MOV

000024

Page

3357

16$

MOV
MOV

SEQ 0270

3355

#1,RETRIES

MOV

005767

005726

024,5P

MOV
MOV

004767

001404
005067
000167

SUB

MOV

JSR

066700

000472
000476
000502
000506
000510
000512
000516
000524
000526
000532
000536
000540
000544
000550

63
AZT.READY.ERR
O
01 ,RET,.STATUS
144
PC.0ECODE

MOV

010067

016716
016746
016746
012746
012746
010600
104414
062706
032767
001402

b))

.WORD
.WORD
.WORD
817
8EQ
JSR

MOV

004767

VAX-11 8 li 99-16 V 4, 0- 579
USER#] :( AZT€C.CZR CFCIZ RCFC3.816:4

11646

T14 TEST

SECTION

SP,e
3307
3372
3374
3376
3298
3261

<RCFR3

CZRCFCO RC2S FR END TEST

v03.0

000000
000004

000006
000010
000012

27-Mar-1985 15:27:28

TEST SECTION

27 Mer-1985 13:28:158

14:

104466

006000

103°7%
000207

JSR

PC, 8714

ROR

TRAP

8LO
R1S

VAX-11 Blise-16 v4.0-579

USERS1:{AZTEC.CZRCFCIZRCFC3.B16;4

SEQ 027

P 21 76
(18)

3379

1
PC

: Routing Size:
6 words,
Rout ine Bese:
ACSCODE . 12422
: Menimum steck depth per invocetion:
2 words
:

3381

'«BLF /PAGE>

N5
JRCFAS3

CZRCFCO RC2S FR END TEST
TEST SECTION

Ll L QY T TV IV IV § YV IV IV IV IV IV.IV. Y WY W

LELEE
SIESE

3382
3383
3384
3385
3386
3387
3388
3389
3390

'S bu-u‘uucuououuuuuounuuuuuuuuuuuuuuuuuuuuu»-

v03.0

SEQ 0272

27 Mar-1985 15:27:28
27-Mer 1985 13:28:18

VAX-11 Blies-16 V4.0-579
>
USER$1:(AZTEC.CZRCFC JZRCFC3.B16;4

]

BGNTST;
Yoo

" TEST 815 - SEQUENTIAL SEEXK AND VERIFY TEST

! DESCRIPTION:
THIS TEST BRINGS RC2S CONTROLLER AND UNIT ONLINE AND READY 10 ACCEPT

MSCP OUP COMMANDS.

STARTING WITH THE USER SPECIFIED BEGINNING TRACK AND INCREMENTING
THROUGH EVERY TRACK TO THE USER SPECIFIED ENOING TRACK,
THIS TEST WILL

SEEX FROM TRACK TO TRACK IN A FORWARD DIRECION, THEN It WILL REPEAT

;ggxgzgzeTION IN THE REVERSE DIRECTION, FROM THE ENDING TRACK T0Q THE
THIS 1S A SINGLE SURFACE TEST AND IS DONE ON TOP SURFACE.
CAN SELECT BOTTOM SURFACE ALSO.
A FAILURE REPORT

TRACN,

INCLUDES

STRATING TRACK,

THE OPERATOR

ENDING TRACK AND DESIRED

AFTER REPORTING THE FAILURE, THE PROGRAM WILL ABORT CURRENT

SEEK AND WILL JUMP T0 REVERSE SEEX.,

labe]
8LOCK],
BLOCK?;
f

.SWP_TRACE then PRINTF

(DBM21);

TEST

IF FAJLURE REFORT ERROR

NUM_RETRIES « ZERQ;
while (.NUM_RETRIES leaqu
begin

.SWP_RETRIES) o

1IP
« 15;
¢ GET AZTEC READY FOR OPERATION

¢ AZTEC_READY ()

thon..

ERNOF (S2. AZT_READY_ER, 0),

;

it .RET_STATUS then DECODE (),

* DECODE THE STATUS,

RETRIES « TAUE;

SET RETRIES FLAG

SET BYTE COUNT 10 Z2€ERQ

else

ond

beg:n

! PREPARE

FOR REP

8YTE_COUN

LERD

8uF DESCRPTR « 2ERD;

' CLEAN THE BUFFER

' FORWARD DIRECTION SEEX

[

!
!

USE STARTING YRACK OF O OR AS SPECIFIE D B
USE ENDING TRACK (F 820 OR AS
CIFle 0 By

THE OPERATOR
THE OPERATOR

ANY

Page

77
(15)

B6
CZRCFCO RC2S FR END TEST

3439
3440
3441
3442
3445
31
3445
3446
3447
3448
3449
3450
3451
3452
3453
3454
345S
3456
3457
3458
3459

@EW®P®
N INNNOAAT VNN TN
O ~J OO 008 ~J O30 GG GD OB OB OB A0 ~J ~J ~J ~ ~ O O A LTI T UIAN WL

BF TS B0 00 B

DS BE VL VL W0 T

W BT BT

0 B0 B VS G

T VL T T8 I G B0 Co G Ve G0 ©0 VL G0 VP Vs GE TS O G0 G

G0 GF Ve V6 Bs Ve U

W G0 G0 Ve ¢

s o S G Ge

ZRCFRBS
v03.0

27-Mar-198S 15:27:28

TESY SECTION

27-Mer-198S 13:28:18

' SIZ_LBN = 31 INCREMENTS THE TRACK NUMBER BY |
LBN_ST = (.SWP_STARTe.SIZ LBN);

! FIND STARTING LBN

LBN_ED = (.SWP_ENDe.SIZ_LBN);

VAX-11 Bliee-16 V4.0-579
USER#1:[AZTEC. CZRCFC]ZRCFCB 816;:4

! FIND ENDING LBN NUMBER

LBN_SZ = .812 LBN;

! TRACK INCREMENTING SIZE

' LBN ST IS THE DE‘IRED LBN 10 SEEK. THIS WILL BE USED BY

" READ_CMD.
6LOCK]Y ;

begin
while TRUE do
begin

! DO SEEK FROM STARTING TRACK
' 70 ENDING TRACK

CHB-REF s LBN_ST;

! PUT LBN IN CMD_LREF

é: READ_CMD ()

ISSUE A SEEK COMMAND

IF ERROR,

be
ER DF (53,

SK_FOR _ERR,

PRINTB (FMT9,
if

0);

. SWP_START,

.SWP_END,

.RET_STATUS then DECOOE ();

REPORT

.LBN_ST);

DECODE STATUS OF REND_CMD

RETRIES = TRUE;

lesve BLOCK];

else

end

begin
if

.LBN_ST eqlu

LBN_ST =

end;

.LBN_ED then exitloop;

,LBN_ST ¢«

.LBN_SZ:

! INCREMENT THE TRACK NUMBER BY 1

end;
end;

REVERSE DIRECTION SEEK

SWAP LBN NUMBERS SUCH THAT LBN_ST CONTAINS THE HIGHEST NUMBER LBN

T0 SEEK
TEMP =

LBN_ED = SuP STARTs.SIZ_LBN);

BLOCK?2 :

' RESTORE ENDING TRACK NUMBER

.LBN

LBN_ST =

begin

while TRUE do
begin

CMD_REF =

! DO SEEK FROM HIGHEST LBN
' 7O LOWEST LBN
! PUT LBN IN CMD<LREF

.LBN_ST;

if READ_CMD ()
then

ERaDF (54, SK_REV_ERR, 0);

PRINTB (FMT9,
if

. SWP END

ISSUE A SEEK COMMAND

SHP_START.

.RET_STATUS then DECODE ();

.LBN_ST);

DECODE STATUS OF READ_CMD

SEQ 0273

Page

(15)

C6
CZRCFCO RC2S FR END TEST

ZRCFB3

TEST SECTION

3499
3500

G0
B8
G0
G
B¢

RETRIES =

VAX-11 B 1 ise-16 V4,0-579
USER41:( A ZTEC.CZRCFC)ZRCFC3.816;4

SEQ O 274
p

age

1 5)

TRUE;

leave BLOCK?Z;

else

end

begin

.LBN_ST eqlu

LBN_ST =

.LBN_ED then exitloop;

_LBN_ST

end;

,LBN_SZ;

! WHEN ALL SEEKS DONE EXIT

! DECREMENT TRACK NUMBER BY 1

end;
end;
end;

if (.RETRIES) then D0_RETRIES ();

end;
return;

ENDTST;

032767
001407
012746
012746
010600
104417
022626
005067
026767
101401
000207
012767
004767
006000
103016
104455

000001

0000006

$715S:

0000006
000001

e
”»

0000006
0000006 0000006

cMP
CLR
cMP
BLOS

RTS
MOV

000017
0000006
0000006

000064
0000006
000000
032767
000001
000000G
001402
004767
00C000"
012767
000001
0000006
000575
005067
0000006
€ 000006
005067
016746
J000006
016746
0000006
000006
004767

.SBTTL
BIT
BEQ

MOV
MOV
MOV
TRAP

N b

VIV IV R R

if (.NUM_RETRIES eqlu ZERO) then exitloop;

G G5

B¢

GO0

wn
(=4
o

G0
B
B0

YV, [. Y. ENENT. Y. Y. Y. Y. BT,
Y. Y, Y.

3496
3497
3498

S¢

v03.0

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

JSR

ROR

8cC

TRAP

S$:

.WORD
.WORD
.WORD
BIT
BEQ
JSR

$T1S TEST SECTION

:%.SHP.TRACE

008M21, -(SP)
SP,RO

17
(SP)e,(SP).

NUM RETRIES

3413
3415

PC
017,T1IP
PC,AZTEC.READY
RO

3417
3420

S
S5
64
SZT.READY.ERR

MOV

CLR

BYTE.COUNT
BUF .DESCRPTR

JSR

PC,BL$MUL

MOV
MOV

SP,»

ggfl.RETRIES.SUP.RETRIES

#1,RET.STATUS
44
PC,DECODE
#1,RETRIES

B8R
CLR

3411

144

SWP,START, -(SP)

SIZ.LBN, -(SP)

3423

D6
ZRCFB3

CZRCFCO RC2S FR END TEST

000142
000146
000152
000156
000162
000166
000174
000202
000206
000210

0000006
0000006
0000006
0000006
0000006
0000006 0000006
000000G 0000006
0000006

v03.0

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

VAX-11 Bliss-16 V4.0-579

USER$1:[(AZTEC.CZRCFC)ZRCFC3.816;4

SEQ 027

Pages 80
(15)

RO,LBN.ST

SWP.END’, (SP)
SIZ.LBN.-(SP)

PC,BL $MUL
RO.LBN.ED

SIZ.LBN,LBN.SZ
REF
ST, EMD..
LBN

64:

3441

3442

3450

;g.asno.cno

84
S5
65

3455

LBN.ST,(SP)
SWP.END, -(SP)
SWP,START, -(SP)

3456

SP,RO
14

g%-RET.STATUS

;

3452

gK.FOR.ERR

@0FMT9, -(SP)

000010
000001

€10,5°P

0000006

0000006
000001
0000006
0000006 0000006

PC,DECODE

g%.RETRIES

7%:

g?N.ST.LBN.ED

8%:

LBN.SZ,LBN.ST

000000G 0000006
000000G 0000006
0000006
0000006
0000006
0000006
0000006 0000006
0000006 0000006
0000006

SP,‘

LBN.ED, TEMP
SWP,START,(SP)
SIZ.LBN,-(SP)

PC,BL $MUL
RO,LBN.ED
TEMP,LBN.ST

LBN.ST,CMD.REF

10¢:

SS.READ.CHD

;

;
:

;

:
;
:

;

:
H

3458

3460

3454
3466

3468

3448
3479
3480

3481

3487
3489

124
55
66

3492

LBN.ST,(SP)

3493

3K.REV.ERR

000000G
0000006
0000006

SWP_START, -(SP)

SWP.END, -(SP)

OFMT9, -(SP)

00000C6
000004

000010
000001

04,-(SP)
TRAP
ADD

0000006

0000006
000001
0000006

SP.RO
14

010,5P
¢1,RET,STATUS

11%

11¢:

MOV

PC,DECODE
#1,RETRIES

i SP,s
;

3495

3497

E6
CZRCFCO RC25 FR END TEST
TEST SECTION

ZRCFB3
v03.0

000000G 0000006

27-Mar-198S 15:27:28
27-Mar-1985 13:28:18

134
L%?.ST.LBN.ED
1
LBN.SZ,LBN.ST
104

124:

000000G 0000006
000010
000001

0000006

0000006
0000006

177274

000536
:

Routine Size:

134
14

16%:

RTS

176 words,
Routine Base:
RC4CODE +
invocation:
10 words

: Maximum steck depth per

000000
000000
000004
000006
000010
000012

004767

177234

104466

006000
103773
000207

T15::
1¢:

3521

' <«BLF/PAGE
>

(15)
3491
3503

PC,D0.RETRIES
NUM.RETRIES

3515

3380

164
24

12436

T1S TEST SECTION

JSR

PC,$T15

TRAP
ROR

66
RO

RTS

AC$¢CODE - 13176
6 words,
Routine Base:
;: Routine Size:
2 words
;: Maximum stack depth per invocation:

Page

210,5P
#1,RETRIES

.SBTTL

8LO

SEQ 0276

3505
3485
3430
3513

154

15¢:

VAX-11 B 1 iss-16 V4,0-579
USERS$1:( AZTE C.CZRCFC)ZRCFC3.B16:4

3519

Fo
CZRCFCO RC25 FR END TEST
& B B 5 5 5 U U] 8 G O G4 08 O8O G O G O3 G Ol G G G G G U G G W G G0 G G G (N 8 M G ol (O N (e

352¢
3523
3524
3525

VAX-1
USER#$

27-Mar-1985 13:28: 18

]

BGNTST;
'
MEX)

TEST 916 - SAWTOOTH SEEK AND VERIFY TEST

' DESCRIPTION:
THIS TEST BRINGS RC25 CONTROLLER AND THE UNIT ONLINE AND READY

TO TAKE MSCP COMMANDS.

STARTING WITH THE USER SPECIFIED BEGINNING TRACK AND INCREMENTING
THROUGH EVERY TRACK IN THE SELECTED RANGE,

THIS TEST WILL PERFORM A

SEEK TO THE SELECTED TRACK AND THEN A SEEK BACK TO THE BEGINNING

TRACK.
WHEN ALL TRACKS HAVE BEEN COVERED, IT WILL DO THE SAME
g:ggATION IN THE REVERSE DIRECTION WITH THE ENDING TRACK AS THE
THIS IS A SINGLE SURFACE TEST AND IS DONE ON TOP SURFACE.
THE OPERATOR CAN SELECT BOTTOM SURFACE ALSO.

ERROR REPORTS WILL STATE STARTING, ENDING
AND DESIRED TRACKS.
IF THERE WAS AN ERROR THE TEST WILL BE ABORTED UNLESS THE OPERATOR
HAS SELECTED FOR RETRIES.

local
LBN_SA;
label
BLOCK1,
BLOCK?Z;

if .SWP_TRACE then PRINTF (DBM22);

TEST 16

IF FAILURE REPORT ERROR

NUM_RETRIES = ZERO;

while (_.NUM_RETRIES lequ .SWP_RETRIES) do
16:
beam

! GET AZTEC READY FOR OPERATION
if AZTEC_READY ()
then
b 'n

L «DF (5SS, AZT_READY_ERR,

3578

27-Mar-1985 15:27 :28

TEST SECTION

VNV BN

WS ST WS B3 Ve VS B VL TS W0 G2 VL VO WL B SL V0 Be AT VL UE e G0 G0 TP TS B0 WO G0 O W VL B0 VI G0 G0 B G0 VO T V0 V6 9 Ve Ve Ve 0 G0 G S8 Ve G0 Go Ws We So Go

ZRCFR3
v03.0

else
!

0);

if .RET_STATUS then DECODE (),

! DECODE THE STATUS,

RETRIES
end

TRUE;

IF ANY

SET RETRIES FLAG

begin

PREPARE

FOR READ_CMD

BYTE_COUNT = ZERO;
BUF _DESCRPTR = ZERO;

! SET BYTE COUNT TQ ZERO
! CLEAN THE BUFFER

.0-579
C CZRCFCIZRCFC3.816;4

SEQ 0277
Page
82

(16)

G6
ZRCFB3
v03.0

CZRCFCO RC2S FR END TEST
TEST SECTION

27-Mer-1985 15:27:28
27-Mar-1985 13:28:18

gggg

3579

H
H
:
3

3582
3583
3584
3585

5
S
S
S

! USE STARTING TRACK OF O OR AS SPECIFIED BY THE OPERATOR
' USE ENDING TRACK OF 820 OR AS SPECIFIED BY THE OPERATOR
' LBN_SZ = 31 INCREMENTS THE TRACK NUMBER BY 1
LBN_ST = (,SWP_STARTe
,SIZ LBN);
' FIND STARTING LBN

3589

' LBN_ST IS THE DESIRED LBN 70 SEEK. THIS WILL BE USED BY

:
;.
:
:
:
:

3591
3592
3593
3594
31595
gggg

S
6
6
6
7
;

BLOCK] ~:

H
H
:

3598
3599
ggg?

7
8
g

:
:
H
H

3602
3603
3604
3605

8
8
9
9

gggg

:
:

3610
3611

9
9

RETRIES = TRUE;
leave BLOCK];
end

3614

:
:
:

3586
3587
3588

3590

;
:

gggg

361
3613

S
S
S

3621
3622

6
6

:
H

3624
gggg

S
g

3627

3630

3620

3623

;
:

:
H
H

:
;
;
H

LBN_ED = (.SWP_END«.SIZ_LBN);
LBN_SZ = .S]Z LBN;
LBN_SA = _LBN ST;

.
begin
while TRUE do
beain
LBN_ST = _LBN_SA;

if READ_CMD (D
then
8
ERRDF (56, SK_FOR_ERR, 0);

PRINTB (FHT9

else

AND THE SECOND TO THE STARTING
TRACK EVERY TIME YOU INCREMENT
TRACK NUMBER. IF FAILURE
WILL BE REPORTED WITH

SHP _END,

.RET_STATUS then DECODE ();

.LBN_ST);

! ERROR INFO.

DECODE STATUS OF READ_CMD

! TURN ON RETRIES
! ABORT IF ERROR OCCURED

LBN_ST = (.SWP_START+.SIZ_LBN);

LBN_SA = _LBN_SA «

end;

.LBN_SZ;

¢ INCREMENT TRACK NUMBER BY 1

end;

!
5 REVERSE DIRECTION SEEK

! SWAP LBN NUMBERS SUCH THAT LBN_ST CONTAINS THE HIGHEST NUMBER LBN

! 10 SEEK
LBN_SA =

3631

BLOCK? :

6
6
6
7

!
!
!
!

if .LBN_SA eqlu .LBN_ED then exitloop;

S
S

3632
3633
3634
3635

SUfi START

! ISSUE TWO SEEK COMMANDS
! ONE TO THE CURRENT TRACK
' PUT LBN IN CMD_LREF

end;

3628
3629

' DO SEEK FROM STARTING TRACK
' TO ENDING TRACK BY INCREMENTING
! ONE TRACK AT A TIME.

incru COUNT from O to | do
begin
CMD_REF = _LBN_ST;

! FIND ENDING LBN NUMBER
! TRACK INCREMENTING SIZE
! LOAD CURRENT LBN

' READ_CMD.

9
8

8
7
7
;

FORWARD DIRECTION SEEK

3615
3616
3617
3618
3619

H
:
H
:
:

VAX-11 Blis 16 v4,0-579
USER$1:[AZTEC.CZRCFCJIZRCFC3.B16;4

L BN_ED;

LBN_ED = (. SWP _ STARTt SIZ_LBN);

! RESTORE ENDING TRACK NUMBER

begin

while TRUE do
begin

' DO SEEK FROM HIGHEST LGN
! TO LOWEST LBN

SEQ 0278

Page

83
(16)

CZRCFCO RC2S FR END TEST

ZRCFR3
v03.C

TEST SECTION

3636
3637

3638
3639
3640
364]
3642
3643
3644
2645
3646
3647
3648
3649
3650
3651
3652
3653
3654
3655
3656
3657
3658
3659
3660
3661
3662
3663
3664
3665
3666
3667

3668
3669
3670
3671
3672
3673

000000
000004
000012
000014
000020
000024
|000026
000030
000032
I800036
00044
000046
00050
00056
000062
000064

HUWAEWBELEDLELENOOI~I~I~~OB0000
OO O OO0
M® OB -~J~J-~J

00 T

VL G0

B G

VT B

G0 VS B9

G5 V0 B

Ve G0

S V6

V¢ G5 B

®0

H
H

27-Mer-1985 15:27:28
27-Mer-1985 13:28:18

004167
032767
001407
012746
012746
010600
104417
022626
005067

026767
101401
000207
0127e7
004767
006000
103017

LBN_ST =

VAX-11 Blies-16 vV4,0-579
USER$1:[AZTEC.C ZRCFC)ZRCFC3.816;4

SEQ 0279
84

(16)

_LBN_SA;

.ncru COUNT from O to 1 do

CHBREF = _LBN_ST;

! PUT LBN IN CMD_LREF

if READ_CMD ()
then

begin
ERROF (57,

!
©
SK_REV_ERN,

PRINTB (FHT9

.SWP_END,

SHP_START.

!
!

leave BLOCK?2;

end

.LBN_ST);
! DECODE STATUS OF READ_CMD

.RET_STATUS then DECODE ();

RETRIES = TRUE;

else

ISSUE A SEEK COMMAND

TURN ON RETRIES
ABORT REVERSE SEEK

LBN_ST = (.SWP_END+.SIZ_LBN);

! STARTING TRACK

end;

.LBN_SA eqlu

LBN_SA =

end;

.LBN_ED then exitloop;

.LBN_SA -

.LBN_SZ;

! NEXT TRACK IN SEQUENCE

end;
end;

if (.RETRIES) then DO_RETRIES ();
if (.NUM_RETRIES eqlu ZERQO) then exitloop;
end;
return;

ENDTST;

0000006
000001

000000G

$T716:

0000006
000001

.SBTTL

JSR

gé;
MOV
MOV

MOV
TRAP

0000006
000000G 000000G

14:
2%:

000020
000000G
0000006

CMP
CLR
CMP
BLOS

RTS

MOV
JSR
ROR

BCC

$716 TEST SECTION

R1, $SAVE?
O%.SUP.TRACE

1
e0BM22, -(SP)

#1,-(SP)

3520
3556

;

SP,RO
17
(SP)e,(SP)e
NUM.RETRIES
ggfl.RETRIES.SuP.RETRIES

:
:

3558
3560

PC
#20,TIP

3562
3565

SC.AZTEC.READY
0
5%

SP,*

16
CZRCFCO RC2S FR END TEST

000150
000154

000160
000164
000170
000174
000202
000206
000212
000214

TEST SECTION

0000006
000001
0000006
000456

BYTE.,COUNT
BUF .DESCRPTR
SWP . START, -(SP)
SIZ.LBN, -(SP)

S$:

016716
016746
004767

016702
010267
005001
016767
004767
006000

3572
3565
3577
3578
3585

PC,BL $MUL
RO,LBN.ST

010067

010067
016767

3570

PC,DECODE
@1,RETRIES
164

44
.

(16)

@1 ,RET.STATUS
44
we

0000006

Page

3568

®we

000001

SEQ 0280

55
67
QZT.READY.ERR

®s

104455

000067
0000006
000000
032767
001402
004767
012767
000167
005067
005067
016746
016746
004767

VAX-11 81 iss-16 V4,0-579
USER$ 1:(AZTEC.CZRCFC)ZRCFC3.816:4

000066
000070
000072
000074
000076
000104
000106
000112
000120
000124
000130
00C134
000140
000144

27-Mar-1985 15:27:28
27-Mer-1985 13:28:18

ZRCFB3
v03.0

SWP . END,(SP)
SIZ.LBN,-(SP)

PC,BL $MUL
RO,LBN.ED

0000006 0000006

SIZ.LBN,LBN.SZ
LBN.ST,R2
22.LBN.ST
1
LBN.ST,CMD.REF

64:
0000006

7%:

«,LBN.SA

LBN.SA,s

COUNT

:g.READ.CHD

103034
104455
000070

0000006
000000
016716 0000906
0000006
016746
0000006
016746
0000006
012746
000004
012746
010600
104414
000010
062706
0000006
032767 000001
001402
0000006
004767
000001
0000006
012767
000423
0000006
016716
016746
000000G
004767
0000006
010067
0000006
005726
005201
000001
020127
101720
020267
0000006
001403
066702
0000006
000707
016702
0000006

3586

360S

LBN.ST,(SP)
SWP.END, -(SP)
SWP . START, -(SP)

3606

70
gK.FOR.ERR

TRAP

SP,RO
14

#10,SP

g%,RET.STATUS

3608

PC,DECODE
01 ,RETRIES

8$:

3610
3604
3614

104
SWP . START,(SP)
SIZ.LBN, -(SP)

9 :

3587
3588
3596
3598
3600
3602

PC,BL $MUL
RO,LBN.ST

(SP).

R1
R1,01
74
R2,LBN.ED

10%:

MOV

104
LBN.SZ,R2
64
LBN.ED,R2

: COUNT

3598

;: LBN.SA,»

3618

¢,LBN.SA

3620
3594
3629

; COUNT,»

;

Jo
CZRCFCO RC2S FR END TEST

ZRCFR3

27-Mar-1985 15:5 :28
27-Mar-1985 13: 8: 18
7

TEST SECTION

v03.0

016716
016746
004767

0000006
0000006
0000006
0000006
0000006

11%:

000000G 0000006
0000006

124

MOV
MOV
JSR
MOV
gex

SWP,START,(SP)
SIZ.LBN,-(SP)
PC,.BLIMUL
RO,LBN.ED
gf.LBN.ST

MOV
JSR

LBN.ST,CMD.REF
PC,READ.CMD

ROR

TRAP
LMORD
.WORD
.WORD

SS
1
SK.REV.ERR
O

MOV

SWP. START -(SP)

8CC

0000006

MOV

0000006

MOV

0000006

MOV

000004

000010
000001

MOV

0000006
000001
0000006

13$:

0000006
0000006
0000006
7000006

144

0000006

0200006
000010
000001

0000006

0000006
000000G
000624
000630

177206

; Routine Size:

205 words,

; Maximum steck depth per

{00000V
000000

004767

177142

04, - (SP)

3640
3642

;

3645

3646

;

3648

BEQ
JSR
ggv

13$
PC,DECODE
:é;RETRIES

MOV
MOV
JSR
MOV

SWP.END,(SP)
SIZ.LBN,-(SP)
PC,BL $MUL
RO,LBN,ST

;

INC
CMP
BLOS
cMP
BEQ

R1
R1,01
124
R2,LBN.ED
15$

; COUNT
;: COUNT,s

H
;

3650
3644
3654

(SP).

PC,DO0.RETRIES
NUM.RETRIES

JMP
RTS

24
PC

14:

H
H

01,RET.STATUS

010,5P

JSR
157

116::

3636
3638

817

17¢:

13 words

; LBN.SA,»
s+ COUNT

-(SP)

15%:
16$:

Routine Base:

3630

H SP o &

BEQ

(16)

orMig, -(SP)

SuB
BR
ADD
gga

18¢:
invocetion:

SWP. END

Page

SP,RO
14

187

000001

LBN.ST,(SP)

USER$1:[AZTEC. CZRCFC]ZRCFC3 B816;4

MOV
TRAP

ADD

0000006

144

SEQ 0281

VAX-11 Blise-16 V4,0-579

LBN.SZ,R2
114
¢10,5P
glRETRIES

; LBN.SA,»
;

;

184

#,LBN.SA

3638
3658
3660
3634

3575

3666

3668

3520

ACSCODE - 13212

LSBTTL

T16 TEST SECTION

JSR

PC,$T16

3672

ZRCFBR3

CZRCFCO RC25 FR END TEST

v03.0

000004
000006
000010
000012

104466
006000
103773
000207

6 words,

'<BLF/PAGE>

Maximum stack depth per

3674

2/ Mar-1985 13:28:18
TRAP
ROR
BLO
RTS

;: Routine Size:

« 7-Mar-1985 15:27:28

TEST SECTION

Routine Base:

invocation:

2 words

66
RO
14
PC

ACS$CODE +« 14044

VAX-11 Bliss-16 v4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC3.B16;4

55092322 87
(16)

L6
CZRCFCO RC25 FR END TEST

ZRCFR3
v03.0

B (L U8 L L L G L W G L W (b Ll (G G L L L G U L (0 L (o (b 0 (o (8 (o L0 8 8 o Ll L (ol =

TEST SECTION

1727

3728
3738

(CICICICE

3725

¥ XV IV
IV ILY W W

3 W

3675

27-Mar-1985 15:27:28

VAX-11 Bliss-16 V4.0-579

27-Mar-1985 13:28:18

USER$1:[AZTEC.CZRCFCIZRCFC3.816:4

]

8GNTST;
Yoo

TEST

017

CONVERGING/DIVERGING SEEK AND VERIFY TEST

' DESCRIPTION:
THIS TEST FIRST BRINGS RC25 CONTROLLER AND UNIT
MSCP COMMANDS CAN BE ISSUED.

ONLINE SO THAT

THIS TEST PERFORMS SEEKS TO THE BEGINNING TRACK,

TRACK,
TRACK

THEN TO THE ENDING

THEN TO THE BEGINNING TRACK + 1, ENDING TRACK
1, BEGINNING
ETC. UNTIL THE TRACKS CONVERGE AND THEN DIVERGE AGAIN

BACK T0O THE BEGINNING AND ENDING TRACKS.

THIS IS A SINGLE SURFACE TEST AND IS DONE ON TOP SURFACE.
OPERATOR CAN SELECT BOTTOM SURFACE ALSO.

THE

ERROR REPORTS WILL INCLUDE STARTING, ENDING AND DESIRED TRACKS.
IF FAILURE IN SEEK THE TEST WILL BE ABORTED UNLESS THE OPERATOR
SELECTS RETRIES.

locel
LBN_SA,
LBN_MID:

! START QF LBN
' MID POINT FOR LBN

lebel
B8LOCK],
BLOCK?Z;

NUM_RETRIES = ZEROQ:

i€ .SWP_TRACE then PRINTF (DBM23);
while

' TEST 17

( .NUM_RETRIES leau .SWP_RETRIES) do

bealn

' GET AZYEC READY FOR OPERATION
if AZTEC_READY ()
then

beg:in

IF FAILURE REPORT ERROR

EflaoF (S8, AZT_READY_ERK, 0);

DECODE THE STATUS,

SET RETRIES FLAG

SET BYTE COUNT TQ ZERO

LRET_STATUS then DECODE

RETRIES = TRUE;

else
BLOCK?
:

end

' PREPARE?OR READ _CMD
BrTE_COUNT

s« ZERQ;

B8¥ DESCRPTIF = ZERQ;

();

' CLEAN THE BUFFER

ANY

SEQ 0283

Page

Mo
ZRCFRS

CZRCFCO RC2S FR END TES?

v0s.0

:
:
:

:
:
:
:

TEST SECTION

37%2
g;gz

S
g

3738
37%
3783
3738

S
S
S
S

:
:
H

37%9
3740
3741

S
S
S

3748

:
i
:
3
H
:

3745
3746
374"
3748
3749
3351

S
6
6
6
°
;

i
:
:

37%
375%
g:g;

7
@8
g

3742 S

3744

27-Mar-1985 13:28:18

5%
3757
3758
3759

' USE STARTING TRACK OF O OR AS SPECIFIED BY THE OPERATOR
! USE ENDING TRACK OF 820 OR AS SPECIFIED BY THE OPERATOR
' SIZ_LBN = 31 INCREMENTS THE TRACK NUMBER BY |
LBN_ST = (.SWP_STARTe
SIZ LBN);
! FIND STARTING LBN

LBN_ED = (.SWP_ENDe.SIZ_LBN);
LBN_SZ = .SIZ_LBN;
LBN_SA
LBN SY

LBN_MID «

éD

.LBN ST)/2,;

! FIND ENDING LBN NUMBER
! TRACK INCREMENTING SIZE
' LOAD CURRENT LBN

' MIDPOINT BETWEEN STARTING & ENDING

¢ LBN ST IS THE D€SIRED LBN 10 SEEX. THIS WILL BE USED BY

aAb_CmD.

8LOCK] " ;

begin
while .LBN_MID geaqu .LBN SA do
a
LBN_ST « _LBN_SA;
incru COUNT from 0 to 1 do
b:s-n
CMD
_REF = LBN_ST;

' DO SEEXK FROM STARTING TRACK
70 ENDING TRACK B8Y INCREMENTING
¢ ONE TRACK AT A TIME,
! ISSUE TWO SEEX COMMANDS
! ONE TO THE CURRENT TRACK
! PUT LBN IN CMD_LREF

3360

8
@&
9
9

¢ READ_CMO ()
then
8
ERRDF (S9, SK_FOR ERR, 0);

¢
!
!
'

AND THE SECOND TO THE MIRROR IMAGE
TRACK EVERY TIME YOU INCREMENT
TRACK NUMBER, IF FAILURE
WILL BE REPORTED WITHW

¢ DECODE STATUS OF READ_CMD

PRINTB (FH19 SWP_ SYlR? .SWP _END, .LBN_ST);

g;:g

“f .RET_STATUS then DECOOE ();

374

RETRIES » TRUE;

:
:

376S
3766
376¢”

9
9
8

else

end;
LBN_SA »

3768
3769

8
8

3771

3778

3772

F
:
:
s
:
:
:

3778
3776
3777
3778
3779
3780
g;gé

6
S
S
S
S
§
g

g;g}

:
:

:
s
s
:

USERS1:[AZTEC. CZRCFC]ZRCFC3.816;4

'
5 CONVERGING SEEX

:
:
:
:

VAX-1]1 Bliess-16 V4,0 S79

3
:
:
:

27-Mer-198S 15:27:28

3770

1785
3786
1787
788

6
6
¢
6

LBN€D ¢

lesve BLOCK];
end

LBN_ ST «

_LBN 5Z;

.LBN SZ;

end;
!
¢ DIVERGING SEEv
H
LBN_SA « _LBN MID;
LBN_ED = .LBN_MID;
wh'le .LBN_SA leaqu .LBN MID ao
bcg'n
LBN
57

' ABORY IF ERROR OCCURED

_LBN ED;

_(BN_SA .

.LBN ED

! ERROR INFO.

_LBN 3A4;

‘acry CONT from O to | g0

INCREMENT

TRACKF NUMBER Br |

! MIRROR IMAGE OF CURRENT TRACK

' START FROM MID TRACK LBN
' START FROM MID TRACK LBN
' DO SEEX FROM HIGHEST (BN
'

70 LOWEST LBN

5€Q 02R4

Page

(17,

$EST SECTION

ZRCFCO RC2S FR END TEST

3794

3795

3796
3797

FRVEN RN BN

3789
3790
3791
3792
3793

il A L R R N R R R ¥ W YV IV 1. Y. V. V. PRy Y Y N Y T X 1

$2 OL S5 B0 Bt B¢ B0 St @1 ©0 00 s G0 @0 B0 B0 G0 Bt B0 B 90 00 Gr B0 v o 0+ @0 ®s ®: 00 @ @¢ 00 w0

ZRCFRY
v03.0

27 Mer-1985 15:27:28

27-Mer-1985 13:28:18

begin

CHB_REF * LBN_ST,

! PUT LBN IN CMD_LREF

if READ_CMD ()

then

Enaor (60, SK_REV ERR, 0);
PRINTB (FMT9,
if

TRUE;

.SWP_END,

! DECODE STATUS OF READ_CMD

ABORT REVERSE SEEK

LBN_ST

STARTING TRACK

BN ED;

.9.(17)

.LBN_ST);

leave BLOCK?2;

end

S€0P0285 %

ISSUE A SEEK COMMANG

.RET_STATUS then DECODE ();

RETRIES =

else

.SWP START,

VAX-1118 liss- 16 v4.0-579
]
USER$
1:(AZTE C.CZRCFCIZRCFC3.816;4

end;

LBN_SA «
LBN_ED =

end;

_LBN_SA .LBN_ED «

.LBN_SZ;
.LBN_SZ;

* NEXT TRACK IN SEQUENCE

MIRROR IMAGE TRACK

end;

1€

_RETRIES then DO_RETRIES ();

(. NUM_RETRIES ealu ZERQ) then ex . tloop:

end;
re

END'ST;

0000006
0000006
000001
00000V

$717:

ooooooc'ooooox

.ggYTL

57115152; SECTION

CLR
gé;

N RETRIES
01 SWP. TRACE

12}

000"23

"oV

MCV

TRAP

8, 4

(sé) (SP)
.

’

gflzs
L

8888536 0000act

RYS

2s:

MOV

PC.AZTEC.READY

ROR

gUH.QfTQIES.SUP.9€7flIES
¢

. WORD

.WORD

Ine

110

01,

8CC

1RAP

SP,e

(SP).,(5P).

000000G 0000006

JSR

3673
3708
3710

AZT READY.ERR

3714

3717

3720

B7
CZRCFCO RC2S FR END TEST

27-Mar-198S5 15:27 :28
27-Mer-198S 13:28 :18

TEST SECTION

0
01,RET.STATUS
34

0000006

34
44
;

090(17)

3724
Inv

1
BYTE. COUNT

3730
3731
378

BUF . DESCRPTR

SWP
. START, -(SP)

SIZ.LBN, -{SP)

PC,BL $MUL
RO,LBN.ST

SWP . END, (SP)

3739

SIZ.LBN,-(SP)

PC,BL $MUL
RO,LBN.ED

010067

SIZ.LBN,LBN.SZ
LBN.ST.R2

016767
026702
016716

*,LBN.SA

LBN.ED.(SP)
LBN.ST.(SP)

166716

3740
3741
3742

82, -(SP)

SS.READ.CHD

s, LBN.MID
LBN.MID,LBN.SA
LBN.SA,»
COUNT

64:

R3,R2
94
g?.LBN.ST
1
LBN.ST,CMD.REF

5%:

PC.BL$DIV
RO.R3

84
55

3748

3750
3752
3754
3756
3759

73
gK.FOR.ERR

LBN.ST,(SP)
SWP .END, -(SP)
SWP.START, -(SP)

3760

OFMT9, -(SP)

SP,RO
14

SP,s

010, SP

gl.RET.STATUS

3762

7%:

3%.RETRIES

8%:

LBN.ED,LBN.ST
R1
R1,01
64

3764
3758
3768
3752

$
PC,DECODE

LBN.SZ,R2
E?N.SZ.LBN.ED

9¢:

R3,R2
R3,LBN.ED

COUNT
COUNT,
»
e

012746
004767
010003
020302
103463
010267
005001
016767
000000G 0000006
004767
006000
103034
104455
000073
0000006
000000
016716
016746
016746
012746
012746
010600
104414
062706
000010
032767
000001
0000006
001402
004767
0000006
012767 000001
0000006
000415
016767
0000006 0000006
005201
020127 000001
101726
066702
0000006
166767 0000006 0000006
000713
010302
010367 0000006

PC,DECODE
OéaRETRIES

*,LBN.SA

0000006
000001
0000006
000442

SEOP0286 o1

3722

®¢

000001

USER$1:(AZTEC.CZRCFC)ZRCF(C3.816:4

000000
032767
001402
004767
012767
000167
005067
005067
016746
016746
004767
010067
016716
016746
004767

VAX-11 Blies-16 V4.,0-579

®e

ZRCFB3
v03.0

LBN.MID,LBN.SA
LBN.MID,

3772
3773
3748
3780
3781

C7
CZRCFCO RC2S FR END TEST

27-Mer-1985 15:27:28

TEST SECTION

114:

103034
104455

000074
0000006
000000
016716
0000006
016746 0000006
016746
0000006
012746
0000006
012746
000004
010600
104414
062706 000010
032767
000001
000000G
001402
004767
0000006
012767
000001
0000006
000415
016767
000000G 0000006
005201
020127
000001

101726
166702

066767
000713
062706
032767
001402
004767
005767
001402
000167
000207
;
;

Routine Size:

Maximum steck

004767

00010
12

12%:
134

0000006

000010
000001

0000006

000000G
000000G

177222

.WORD
WORD
WORD
"oV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
817
BEQ
JSR
MOV
B8R
MOV
INC
CMP

BLOS
SUB

000000G 000000G

14%
15%:
164 :
17%:

ADD
BR
ADD
BI7
BEQ
JSR
187
BEG
JMP
RTS

AC$CODE +
199 words,
Routine Base:
depth per invocetion:
14 words

177156

104466
006000
103773
000207

; Routine Size:

TRAP

6 words,
; Maximum stack depth per

T17::
1$:

.SBTTL
JSR
TRAP
ROR
8LO
RTS

AC$CODE Routine Base:
invocetion:
2 words

1 LBN.SA,LBN.MID

3783

LBN.SA,»
COUNT

LBN.ST,CMD.REF

3788

SS.READ.CHD

3790
3792

134
S5

3795

74
3K.REV.ERR

LBN.ST,(SP)
SWP . END, -(SP)
SWP,START, -(SP)

3796

O0FMT9, -(SP)

04,-(SP)

SP,RO
14

010, 5P

01,RET.STATUS

3798

124

PC,DECODE
#1,RETRIES
144

LBN.ED,LBN.ST

R1,01
114

LBN.SZ,R2
LBN.SZ,LBN.ED
104
010,5P

:I;RETRIES
6

COUNT

3800
3794
3804
3788

+,LBN.SA

3808

; COUNT,»
we

000000G 0000006
0000006

CLR
MOV
JSR
ROR
BCC

R2,R3
14}
R2,LBN.ST
Rl

®ws

0000006

CMP
BHI
MOV

(17)

006000

104:

SEQP°§27 92

USER$1:(AZTEC. CZRCFC]ZRCFC3 B16;:4

w4+

020203
101063
010267
005001
016767
004767

27-Mar-198S 13:28:138

VAX-11 Bliess-16 Vv4,0-579

®e

ZRCFB3
v03.0

3809
3783
3Nz
3816

PC.DO.RETRIES

NUM.RETRIES
174
14

3818

3673

14060

T17 TEST SECTION

PC,$117

14676

3822

53?83
:

3824

$§§$ ggc?%fi
1

'<BLF/PRGE>

END

ENo

TEST

27-Mar-1985 15:27:28

27-Mer-1985 13:28:18

VAX-11 Bliss-16 V4.0-579

USER$1:(AZTEC.CZRCFC)ZRCFC3.B16;4

SEQ 0288
Page

CZRCFCO RC25 FR END TEST

ZRCFR3
vV03.0

3881

B 03 I GO O O GG G G N G G O O G U G o O G G U G (G (ol (0 (0 (N (6 G O (o (8 (o (ol e

TEST SECTION

(IR RV IV TV [V, [V, IV, IV F % 3 B 5

3825
3826
3827
3828

E7
27-Mar-1985 15:27:28

VAX-11 Bliss-16 V4.0-579

27-Mer-1985 13:28:18

USER41: [AZTEC. CZRCFC]ZRCFC3 B16:4

]

BGNTST;
Yoo

TEST €18 - TOGGLE SEEK AND VERIFY TEST

!1 DESCRIPTION:
\

THIS TEST BRINGS RC2S CONTROLLER AND THE UNIT ON LINE AND READY TO

]

ACCEPT MSCP COMMANDS.

ONE THOUSAND SEEK COMMANDS WILL BE ISSUED ONE AT A TIME TO TOGGLE
BETWEEN THE BEGINNING TRACK OF O (LBN = 0) AND THE ENDING TRACK
OF 820 (LBN = 820 ¢ 31).

]
1
]
)

:
;
;
:

THIS IS A SINGLE SURFACE TEST. SEEK IS DONE ONLY ON TOP SURFACE
UNLESS THE OPERATOR CHOSE TO SEEK ON BOTTOM SURFACE BY ANSWERING

ONE_OF THE SOF TWARE QUESTIONS. THE OPERATOR HAS CONTROL OVER THE
BEGINNING AND ENDING TRACKS, IF DESIRED BY ANSWERING QUESTIONS.

ERROR REPORTS INCLUDE STARTING, ENDING AND DESIRED TRACKS.
AFTER
REPORTING THE FAILURE THE DIAGNOSTIC WILL ABORT THE TEST, UNLESS

?
¢

RETRIES IS ENABLED.

]
]

[}
]

locel
LBN_SA;
label
BLOCK],
BLOCK?Z;
if

.SWP_TRACE then PRINTF (DBM24);

TEST

IF FAILURE REPORT ERROR

NUM_RETRIES = ZERO;
while (.NUM_RETRIES lequ
beam 18;

.SWP_RETRIES) do

! GET AZTEC REAOY FOR OPERATION
if AZTEC_READY ()

then

begin

ER&DF (61, AZT_READY_ERR, 0);

DECODE THE STATUS,

SET RETRIES FLAG

SET BYTE COUNT TQ ZERO

.RET_STATUS then DECODE ();

RETRIES

else
BLOCK] :

TRUE;

IF ANY

end

begin

! PREPARE ?OR READ_CMD
BYTE_COUNT

ZERO;

SEQP2289 94
(18)

F7
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

R B _JV, 1. Yo ENENENT. Y. J. JV.RV.JV.IV. XV.JV.JV. RV XV.7. Y. Y. Y. Y. RNPWPWRNTY, ¥, Y. YV.IV [V, V.1V, IV, [V, I¥,)

QUF_DES CRPTR = ZERO;

VAX-11 B liss-16 V4,0-579
USER$1:( AZTEC.CZRCFC)ZRCFC3.B16;4

SEQ 0290
Page

(18)

CLEAN THE BUFFER

E SEEK BETWEEN BEGINNING TRACK AND ENDING TRACK

BLOCK? :

LBN_SA = (.SWP_STARTe,SIZ LBN);
LBN_ED = (,SWP_ENDe.SIZ_LBN);
TIP = ZERO;

! FIND STARTING LBN
! FIND ENDING LBN NUMBER
! CLEAR COUNTER TO ZERO

begin
while

. TIP lequ 500 do

! DO SEEK
! TO LOWEST LBN
! BEGINNING TRACK LBN

beqin

LBn,ST = _LBN SA;
incru COUNT from 0 to 1 do
begin

CMD_REF =

! PUT LBN IN CMD_LREF

.LBN_ST;

if READ_CMD (D

then

! ISSUE A SEEK COMMAND

begin

ERADF (62, SK_TOG_ERR, 0);
PRINTB (FMT9,
if

.SWP_END,

.RET_STATUS then DECODE ();

RETRIES =

els e

.SWP_START,

TRUE;

.LBN_ST);
!

DECODE STATUS OF READ_CMD

leave BLOCK?Z;

! ABORT SEEK

LBN_ST =

! HIGHEST TRACK NUMBER

end

,LBN_ED;

end;

TIP =
end;

TIP

! INCREMENT COUNTER
! AND REPEAT S00 TIMES

};

end;
end;

if (.RETRIE S) then DO_RETRIES ();

3928
3929

00000
00004

—

00012
00014
00020
000024

Lok P IV IV R R

VWS

B! S

B¢

v03.0

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

004167
032767

001407
012746
012746
010600

if (.NUM_RETRIES eqlu ZERQO) then exitloop;
end;
return;

ENDTST;

0000006
000001
0000006
0000006
000001

$718:

.SBTTL
JSR
BIT
BEQ

MOV
MOV
MOV

$718 TEST SECTION

R1, $5AVE?2

g%.SUP.TRACE

#0BM24,
- (SP)
0l,-(SP)

SP,RO

3823
3859

SP,

G7
CZRCFCO RC2S FR END TEST

ZRCFA3
vV03.0

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

o
-

0000006
000000G 0000006

TRAP

000022
0000006
0000006

0000006

JSR

022,11IP
PC AZTEC.READY

3865
3868

BCC

ROR

TRAP
.WORD
.WORD
. WORD

BEQ
JSR

MOV

44
:

CLR
CLR

JSR

MOV
MOV
MOV

005067
026727
101060
010267

000224
000226
000230
000232
000234
000236
000242
000246
000252
000256
000262
000264
000266
00272
00300
00302
00306
00314
00316
00324
000326

005001
016767
004767
006000

JSR

MOV

0000006

0000006
0000006 000764

S$:

0000006

0000006 0000006
0000006

64:

016746
016746
012746
012746
010600
104414
062706
032767
001402
004767
012767
000412
016767
005201
020127

BHI
MOV

0000006

3871

0
01 ,RET.STATUS
34
PC,DECODE

3873

01,RETRIES

3875
3868
3881
3882
3886

104
BYTE.COUNT
BUF .DESCRPTR
SWP,START, -(SP)
SIZ.LBN,-(SP)

PC,BL$MUL
RO,R2

SWP . END,(SP)
SIZ.LBN,-(5P)

PC,BL $MUL
RO,LBN.ED
TIP
T1P, 0764
94

gZ.LBN.ST

;

*,LBN.SA

3887

3888
3892

; LBN.SA,s

JSR

:g.READ.CHD

8cC

8¢
SS

3903

MOV

BIT
BEQ
JSR

0000006
000001
000000G

7%:

MOV

000000G 0000006

8%:

MOV

000001

75
AZT .READY.ERR

3894
3896
389¢
3900

CLR

TRAP
. WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

0000006
0000006
0000006
000004

000010
000001

CLR

ROR

103034
104455
000076
0000006
000000
0000006
016716

(18)

3861
3863

MOV
MOV

010067

SEQ 0291

17
(SP)e,(SP).
NUM, RETRIES
Tg?.RETRIES.SHP.RETRIES

cMP
CLR
CMP
BHI

MOV

0000006

VAX-11 Bl 98-16 V4.0-579
USER4$1:
(ATEC CZRCFC]ZRCFC3 B16;:4

INC
cMP

1
LBN.ST,CMD.REF

; COUNT

76
gK.TOG.ERR

LBN.ST,(SP)
SWP . END, -(SP)
SWP.START, (SP)
#4,-(SP)

SP,RO
14

3904

i SP,»

#10,S5P
01 RET.STATUS

3906

PC DECODE

3%+RETRIES

LBN.ED,LEN.ST

R1
R1,01

; COUNT
i COUNT,»

3908
3902
3912
3896

062706

032767
001402
004767
005767
001223
000207
:
;

Routine Size:

004767

0000006

0000006
000000G

94.:
104:
114:

124:

ADD

BIT
BEQ
JSR
TST
BNE

RTS

PC,.DO.RETRIES

NUM,RETRIES
24

64
TIP
S$
06,5P
#1,RETRIES
114

ge(18)

3916
3892
3868
3922

3924
3823

RC$CODE - 14712
125 words,
Routine Base:
invocation:
12 words

Maximum stack

3930

177402

T18::
1¢:

104466
006000
103773
000207

: Routine Size:

000006
000001

BLOS
INC
BR

SEQ 0292
Pa
97

Meximum stack depth per

000000
000000
000004
000006
000010
000012
:

0000006

101726

005267
000714

VAX-11 ?ll
9-1
4.0-579
USER$1: AZTEC.C RCF JZRCFC3.B16;4

®s

TEST SECTION

v03.0

000332
000334

27-Mar-198S5 15:27:28
27-Mar-198S 13:28:18

«e

CZRCFCO RC25 FR END TEST

ZRCFB3

LSBTTL

T18 TEST SECTION

JSR

PC,$T18
66
RO
14
PC

TRAP
ROR

8LO

RTS

6 words,
depth per

ARC$CODE .+
Routine Base:
invocation:
2 words

V<BLF/PAGE>

15304

3928

17
CZRCFCO RC2S FR END TEST

ZRCFB3

TEST SECTION
VNANANUNNIVN
A B VITNNVIUVIUIUL B 5 B B 5 55 (08 U Ll 8O3 W8 G O O3 G G G G G G G G W G G G G Gl G G N O O G 8 (e

v03.0

3987

27-Mar-1985 15:27:28

VAX-11 Bliss-16 V4.0-579

27-Mar-1985 13:28:18

USER41:[AZTEC.CZRCFC]ZRCFC3.816;4

BGNTST;
Yoo

TEST

]

DESCRIPTION:

!
!
!
!
!
!

@19

HEAD SWITCH TEST

THIS TEST WILL BRING RC25 CONTROLLER AND THE UNIT ONLINE

AND WILL LOAD DM CODE PROGRAM TO CONTROLLER’S MEMORY USING

EX_SUP_PROG COMMAND.

DM CODE WILL SEEK TO BOTH SURFACES OF THE UNIT,
WILL BE USED TO VERIFY THAT

THE XFC STATUS

THE PROPER TRACK HAS BEEN REACHED.
BLOCK HEADERS WILL BE READ TO VERIFY THAT THE PROPER HEADS ARE
SELECTED. DM CODE WILL RETRY IF THERE WAS ANY ERROR IN SEEK.
OM CODE WILL GIVE SUCCESS OR FAILURE CODE TO THE HOST.

]

;
!

IF FAILURE,

THE TRACK,

FROM DM CODE.

!
!

HEAD AND UNIT WILL 8E REPORTED AS RECE.VED

IF RETRIES ARE TURNED ON THE TEST WILL BE REPEATED.

‘.

abeéLOCKI:
if

.SWP_TRACE then PRINTF (DBM2S);

TEST

IF FAILURE REPORT ERROR

NUM_RETRIES = ZERO;
while (. NUM_RETRIES lequ
beain
TIP
= 19;

.SWP_RETRIES) do

! GET AZTEC READY FOR OPERATION
if AZTEC_READY ()

then

begin

ERaDF (63, AZT_READY_ERR, 0);

DECODE THE STATUS,

SET RETRIES FLAG

.RET_STATUS then DECODE ();

RETRIES

else
BLOCK] :

TRUE;

end

IF ANY

begin

ISSUE AN EX_SUP_PROG COMMAND WITH START ADDRESS OF

DM_19 VECTOR ARRAY AND BYTE COUNT,
CMD_REF =

.CMD_SLOT;

COMMAND REFERENCE NUMBER

BUF "DESCRPTR = DM_19;
BYTE_COUNT = 156¢3;

! DMCODE STARTING ADDRESS
! BYTE COUNTS

if EX_SUP_PRG ()
then

' ISSUE AN EXECUTE SUPPLIED COMMAND
! REPORT IF FAILED

SEQ 0293
Page

(19)

J7
CZRCFCO RC25 FR END TEST

ZRCFB3

TEST SECTION

beain
ERRDF (64,

OO0 O

v03.0

VVIVIVIVINOR

VAX-11 Bli 88-16 V4,0-579
USER$1: (AZTEC.CZRCFCIZRCFC3.816;4

SEQ 0294
Page
99

0);

.RET_STATUS then DECODE

DECODE STATUS

();

leave BLOCK];

ABORT TEST

end;

BYTE. COUNT = Q2;

COMMAND REFERENCE 04
DESCRIPTOR ADORESS
! TOTAL BYTES TO BE TRANSFERRED

if S END_DATA ()
then

ISSUE SEND DATA COMMAND
IF STATUS BIT INDICATES ERROR

cMD _REF = _CMD_SLOT;
BUF "DESCRPTR = UNIT;

begin

ERRDF (65, SND_DATA_ERR, 0);

THEN REPORT ERROR

DECODE RETURN STATUS

.RET_STATUS then DECODE ();

RETRIES = TRUE;

leave BLOCK];

end;

ISSUE A REC_DATA COMMAND AND WAIT FOR END PACKET

" TO GET THE STATUS SENT BY DM CODE AFTER DOING

! HEAD SWITC H TEST.
CMD_ REF = ,CMD_SLO
BUF “DESCRPTR = RCV DATA _BUF
BYTE_ COUNT

COMMAND REFERENCE #
SET THE BUFFER AREA TO

[0];

RECEIVE S WORDS FROM DM CODE

SET BYTE COUNTS = 10

= 10;

if R EC_DATA ()
then

VIVIITUVIVIVTNUVIIVINNIO
4035
4036
4037
4038
4039
4040
4041
4042
4043
4044

SEND A RECEIVE DATA COMMAND

begin

ERaDF (66, RE_DATA_ERR, 0);

IF FAILURE REPORT ERROR

DECODE STATUS

.RET_STATUS then DECODE ();

RETRIES = TRUE;

leave BLOCK];

end;

* CHECK DM CODE FLAG FOR SUCCESS.
i f .RCV_DATA_BUF
then

IF FAILURE REPORT ERROR

[0] nequ %o'104’

ER DF (67, MSG_HSWICH ERR,

&LV

4023
4024
4025
4026
4027
4028
4029
4030
4031
4032
4033

EXE_SUP_ERR,

RETRIES = TRUE;

VO NTUTNVTVTIVTN O

3988
3989
3990

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

PRINTB (FMT10,
RETRIES =
end;

0);

.RCV_DATA _BUF

TRUE;

end;

if (.RET RIES) then DO_RETRIES ();

IF NOT SUCCESS,

{11,

REPORT ERROR

REPORT HEAD SWITCH FAILURE
.RCV_DATA_BUF [c], .RCV_DATA_BUF
| RACK NUMBER

[3]);

! PRINT UNIT, HEAD AND

(19)

|
ZRCFR3
v03.0

H
:

CZRCFCO RC2S FR END TEST
TEST SECTION

4045

27-Mar-1985 15:27:28
27-Mar-198S 13:28:18

4046

i1f (.NUM_RETRIES eqlu ZERQ) then exitloop;

4048

end;

4047

4049

4050

4051

ENDTST;

032767

000001

0000006

$719:;

0000006

000001

104417

022626
005067

026767

101401
000207
012767
004767
006000
103016
104455
000077

004767

0000006

1$:

000000G 0000006

2%:

000023
0000006
0000006

3$:

000001

000000G

0000006
000001
000000G
000000G 0000006
000000G 0000006
000470 0000006

44
5%

0000006

000001

000000G

6$:

016767
012767
012767
004767
006000
103016
104455

000000G 000000G
000000G 000000G
0000C2
000000G
0000006

7%:

000101

14
o0BM2S, -(5P)
#1,-(SP)
SP,RO

CMP
CLR

(SP)e,(SP)e
NUM . RETRIES

CHpP

BLOS
RTS
MOV
JSR
ROR
8CC
TRAP
.WORD
LWORD
BIT
BEQ
JSR
MOV
BR
MOV
MOV
MOV
JSR

012767

4719 TEST SECTION

01,5WP. TRACE

BEQ
MOV
MOV
MOV

.WORD

006000
103016
104455
000100
0000006
00000¢
032767
000001
000000L
001402
004767 0000006

000517

LSBTTL

8I1

TRAP

0000006

000000
032767
001402
004767
012767
000552
016767
012767
012767

SEQ 0295

Page 100
(19)

return;

001407
012746
012746
010600

VAX-11 Bliess-16 V4.0-579
USER$1:(AZTEC.CZRCFC)ZRCFC3.B16;4

NUM.RETRIES, SWP . RETRIES
34
PC
023,11P
PC.AZTEC.READY
RO
54
55
77

O
01,RET.STATUS
43
PC,DECODE
91 ,RETRIES
12%
CMD.SLOT,CMD .REF
ODM. 19,BUF .DESCRPTR
0470,8YTE.COUNT

PC,EX.SUP.PRG

RO
74
55
100
EXE.SUP.ERR
O
#1,RET.STATUS
64
PC,DECODE

B8R

12$

MOV
MOV
MOV
JSR
ROR
8CC
TRAP

.WORD

;

3958

SP,»

;

3960

H
:

3964
3967

3970

3972

:
H
;
:
:

3974
3967
3982
3983
3984

;

3989

3991

3993

:
:
:
:

3997
3998
3999
4001

4004

;

3962

AZT.READY.ERR

ROR
8CC
TRAP
.WORD
.WORD
WORD
817
BEQ
JSR
MOV

01,RETRIES

CMD.SLOT,CMD.REF
OUNIT,BUF ,DESCRPTR
02,BYTE.COUNT
PC,SEND.DATA
RO
94
55
101

3986

3988

L7/
CZRCFCO RC2S FR END TEST

ZRCFR3

27-Mer-1985 15:27:28
27-Mer-1985 13:28:18

TEST SECTION

v03.0

000242
000244
000246
000254

000001

0000006

0000006
000001
0000006
0000006 0000006
0000006 0000006
000012
0000006
0000006

8s:
9¢:

124

4018
4003
4015

MOV
MOV
MOV

TRAP

—

103773

4023

01,.RET.STATUS

4025

01 ,RETRIES

BEQ
JSR

104
PC.DECODE

B8R

124

4027
4022
4033

4036

11%:

cHP
8EQ

F,
0104
RCV.DATA.BU
124

.WORD
.WORD
WORD
MOV

103
MSG.HSWICH.ERR
O
RCV.DATA.B
+6, - (SP)
UF

MOV
MOV

MOV
MOV
TRAP
MOV

124:

13s:
14%;

ADD

811

BEQ

JSR

157

BEQ
JMP

R1S

; Rout'ne Size:
157 words,
Rout ine Bese:
AC$CODE ;: Mox ‘mum steck depth per invocet 'on:
7 words

006000

11:

0000006 000104

0000006

177302

119:
1¢:

4018
4020

811

0000006

4016

MOV

177342

OG0

012.8Y1€.Count
Pc REC.DATA

10¢:

0000006
0000006

104466

cno SLOT,CMD. REF
ORCV.DATA RUF BUF .DESCRPTR

JWORD
.MORD
MORD

TRAP

004767

o1 .RETRIES

0000006
000001
0000006

000001
000012
000001

(19)

4006

ROR

00000606
0000046
0000026
0000906
000004

Page 101

SND.DATA .ERR
0
01.RET.STATUS
8
PC,DECODE

MOV
JSR

000000G

SEQ 0296

.WORD
JWORD
811
BEQ
JSR

8cC

000001

VAX-11 8 li s9-16 V4,0-579
USERS]: 1: ( AZT€EC. CZRCFC]ZRCFC3.816;4

RCV.DATA.BUF
.4, -(SP)
RCV.DATA.BUF.2. (SP)

oFMT10, -(SP)

SP,RO
14
01 ,RETRIES

012,5p

o1 ,RETRIES

4039
4035
4044

PC,.DO.RETRIES

NUM.RETRIES

148
24
-]

3929

15320

LSBTTL

T19 TEST SECTION

JSR
TRAP

PC,4719
66

ROR
8Lo

4037

RO
14

4050

ZRCFAS

CZRCFCO RC2S FR END TEST

v03.0

000012

00020°

;: Routine Size:

Menimum stack

405¢

27 Mer-1985 15:27:28

TEST SECTION

27 Mer 1985 13:28:18
R1S

6 words,

depth per

Rout ine Bese:

invocation:

' <BLF /PAGE >

2 words

ACSCODE .

16012

VAX-1]1 Bliee-16 v4.0-579

USER$]: [AZTEC.CZRCFC )ZRCFC3. 816;4

SEO'.'. 102
(19)

N7
4053
4054
4055
4056

40%°

4058
4059
4060
4061

$£s$ SECTION

ZRCFCO RC2S FR END TEST

el ol K- ¥ ¥ X JVUIV VRN IV IVIVIVY LIV IV IV IV IV IV IV ¥ W W W'Y B U (U Ll 0 L ol (L (o (L L (L (U ot L (o Ll (L 8 (8 (0=

B¢

BT B¢

V¢

u-o..o..oooo.oo.-.n.o.oooo-.ooc.o.-.o...o.o...-o-.a.ooo.-o-oaoouoo.o“.c.oo-

ZRCFRS
v03.0

27-Mer-1985 15:27:28

27-Mer-1985 13:28:18

VAX-1 18 1 199-16 V4.0-579
1:( A ZTEC.CZRCFC)ZRCFC3.B16;4

USERS

[]

BGNTST;
Yoo

' TEST 020

RANDOM SEEK AND VERIFY TEST

]

g DESCRIPTION:

THIS TEST BRINGS RC25 CONTROLLER AND THE SELECTED UNIT ONLINE

'
'

AND THEN ISSUES 1000 SEEKS ONE AT A TIME TO RANOOMLY SELECTED
LBN TRACKS BETWEEN THE
RANGE OF O - 1641. THIS WILL ENSURE HEAD

‘
'

SWITCHM AS WELL BECAUSE TRACKS OVER 820 WILL BE IN THE B0OTTOM
SURFACE OF SELECTED UNIT.

]

ERROR REPORTS INCLUDE SEEXK COUNT AND FAILING TRACK NUMBER. IF

LOOP ON ERROR FLAG IS SET,

[]

FAILING TRACK WILL BE RETRIED FOR EVER.

]

label
BLOCKY;

.SWP_TRACE then PRINTF (DBM26);

TEST 20

NUM_RETRIES = ZERO;
while (.NUM_RETRIES lequ
begin

.SWP_RETRIES) do

' GEY RZTEC READY FOR OPERATION
¢ AZTEC_READY ()
then
begin

IF FAILURE REPORT ERROR

EQBDF (68, AZT_READY_ERR, 0);
i?

_RET_STATUS then DECODE ();

RETRIES =
else
8LOCK]

end

TRUE;

DECODE THE STATUS,

ANY

SET RETRIES FLAG

)

“gofl

BYTE_COUNT = ZERO;

P2 & .TICKS;
1IP - ONE;

SET BYTE COUNT 70 ZERO
C.EAN THE BUFFER
INIT P2 FOR RANOOM NUMBER
INIT COUNTER 10 ONE

00 SEEX 1000 TIMES

BuUF _DESCRPTR « Z2ERO;

. le

.TIP leau 1000 do

beg:n

“‘aDO"_NU" ()s
LBN_ST

CHO_REF

P3;

.LBN'ST;

if READ _CMO

then

beg ~

()

GET

A RANOOM LBN NUMBER

THIS 1S IT
PUT LBN IN CMD_LREF

ISSUE A SEEX COMMAND

SEQ 0298
Page

103

(20)

ZRCFBRS

B8
27-Mar-1985 15:27:28

CZRCFCO RC2S FR END TEST

v03.0

TEST SECTION

27-Mer-198S 13:28:18

VAX-11 Blies-16

USERO
1:(AZTEC. ZRCFC]ZRCFC3 816:4

4110

ERRDF (69, SK_RAN ERR, 0);

:i{z

;

if .RET_STATUS then DECODE ();

! DECODE STATUS OF READ_CMD

H
H
H
:
:
H
H
H
:

4115
4116
4117
4118
4119
4120
43121
4122
«123

7
7
7
6
6
6
S
S
4

RETRIES = TRUE;
leave BLOCK];
end

! ABORT SEEK

TIP = TIP + 1;

! INCREMENT COUNTER

:{sz

if (.RETRIES) then DO_RETRIES ();

:ig;

if (.NUF

H
H
;.
;.

4129
4130
4131
4132

3
3
3
1

end;

;

:fié

4124

;

032767
001407
012746

else

end;

RETRIES eqlu ZERQO) then exitloop;

return;
ENDTST;

000001

0000006

$120:

0000006

026767

000000G 0000006

004767

0000006

032767
001402
004767

000001

005067
005067
016767
012767

0000006
0000006
000000G 0000006
000001
000000G

004767
016767
016767

000000G

0000006
000001
0000006

026727
101051

4720 TEST SECTION
01,S5WP. TRACE
14
#0BM26,-(SP)

MOV

sP,

;

CLR

NUM.RETRIES

;

4077

BH1

104

4083

4086

4088

TRAP
cHP

cHpP

JSR

012767

00n467

LSBTTL
BIT
BEQ
MOV

MOV

104417
022626

006000
103016
104455
204

(20)

end;

010600

101122

SEOP 0299
g. 104

PRINTB (FMT11; .TIP, .LBN_ST),

012746 000001
005067

0-579

0000006 001750

0000006
000000G 0000006
0000006 0000006

34:

Ss¢:

o1, -(sfi)

17
(SP)+,(SP).

NUM._RETRIES,SWP .RETRIES
PC.AZTEC.REARDY

ROR
8CC
TRAP
.WORD
.WORD
.MORD
8I7
8EQ
JSR

RO
44
5S
104
AZT.READY.ERR
O
01,RET,STATUS
3
PC.DECODE

B8R

8¢

MOV

CLR
CLR
MOV
MOV

CHP
BHI
JSR

MOV
MOV

01 ,RETRIES

SP,s

4079

4090

4083

4101

BYTE.COUNT
BUF .DESC” ?TR
TICKS,P2
01,TIP

:
:
:
:

P3,LBN.ST
LBN.ST,CMD.REF

;
:
;

11P,01750
8%
PC,RANDOM, NUM

407S

4096
4097
4098
4099
4103
4104
4105

C8
CZRCFCO RC25 FR END TEST

ZRCFB3
v03.0
000162
000166
000170
000172
000174
000176
000200
000202
000206
000212
000216
000222
000224

27-Mar-1985 15: 27:28
27-Mer-198S 13: 28:18

TEST SECTION

004767
006000

0000006

JSR

103032
104455

8CC

000105
0000006
000000
016746
0000006
016746
0000006
012746
0000006
012746 000003
010600
104414
062706
000010
032767 000001
0000006
001402
004767 0000006
012767
000001
0000006
000403
005267 0000006
000723
032767 000001
0000006
001402
004767
0000006
005767
0000006
001252
000207

Routine Size:

TRAP
.WORD
.WORD
.WORD
MOV

004767

84:

g%s

104466
006000

120::
1¢:

LBN.ST,-SSP)
TIP
ofmnt1l -(SP)

4111

SP.RO
14

i SP,e

:%.RETRIES

11P
S
g}.RETRIES

JSR
751
BNE
RTS

NUM_RETRIES
24

PC
+

;4133

1 <BLF/PAGE>

4113

:
:
H
H
:

4115
4109
4119
4101
4125

4127

4051

4131

16026

T20 TEST SECTION

JSR

TRAP
ROR

PC,$720
66
RO

RTS

Routine Size:
AC$CODE - 16336
6 words,
Routine Base:
2 words
;: Maximum stack depth per invocation:

;

PC,D0.RETRIES

.SBTTL

BLO

103773
000207

4110

PC.DECODE

100 words,
Rout ine Base:
AC$CODE
invocation:
6 words

177464

JSR

égc

10¢:

S5
105

010, 5P
01 RET.STATUS

74:

4107

ADD
géa

ggv

(20)

]

03,-(5P)

MOV
TRAP

64:

USER$1: (AZT C.CZRPFC]ZRCFC3.816:4

SEQ 0300
ge 105

SK.RAN.ERR

MOV
MOV
MOV

: Meaximum stack depth per

000000
000000
000004
000006
000010
000012

PC,READ.CMD
RO
74

ROR

VAX-11 Bliss-16 V4,0-579

ZRCFR3

CZRCFCO RC2S FR END TEST

v03.0
;.
;.

4134
4135

)
3

!
BGNTST;

leeo

4136

;
:
;

4138
4139
:i:?

3
3
g

' TEST 021 - SECTOR ACCESS TEST
!
5 DESCRIPTION:

;.
;

4142
4143

3
3

'
'

4137

;

:%:g

4146

;

4148

4147

27-Mer-1985 15:27:28

TEST SECTION

:
:

27-Mar-1985 13:28:18

BY GIVING EX_SUP_PROG COMMAND.

THE DM PROGRAM WILL SEEX TO DIAGNOSTIC TRACK O AND READ 32

BLOCKS

AFTER MAKING SURE THAT

TO HOST WITH FAILING UNIT,

GOOD HEADER IS FOUND.

DM CODE

WILL RETRY IF ANY ERROR WAS FOUND. DM CODE WILL SEND STATUS BACK

8Y HOST CODE.

;.
4152
:
4153
;:
4154
;4155
4156
:

3
3
3
3
3

!
!
!
'
)--

THIS IS A SINGLE SURFACE TEST. TOP SURFACE WILL BE ACCESSED
UNLESS THE OPERATOR CHOSE BOTTOM SURFACE BY AMNSWERING ONE OF
THE SOF TWARE QUESTIONS.

H
:
;

4158
4159
4160

abel
BLOCK];

:igé

3
3
3

;

:}g}

NUM_RETRIES = ZERO;

;:
;
;.
;

4165
4166
4167
4168

3
4
4
:

while (_NUM_RETRIES lequ .SWP_RETRIES) do
besin
TIP = 21,
' GET AZTEC READY FOR OPERATION

;:
;

4170
4171

4
&

if AZTEC_READY ()
then

41;3

ERRDF (70,

41;5

4177

RETRIES =

:
:

:igg

4157

416

4172

4174

4176

:
:
;:
;
;
;

4178
4179
4180
4181
4182
4183

S
4
4
5
S
S

;:
:

4185
4186

S
S

;

4184

;

:igg

;:
;.

4189
8190

S
S

USER$1:(AZTEC.CZRCFCJZRCFC3.B16;:4

THIS TEST BRINGS RC2S CONTROLLER AND SELECTED UNIT ONLINE
AND THEN LOADS DM _21 VECTOR ARRAY INTO CONTROLLER'S MEMORY

4149

VAX-11 Blies-16 V4,0-579

HEAD AND TRACK.

.SWP_TRACE then PRINTF (DBM27);

beain

else
BLOCK1 :

end

AZT_READY_ERR,

ERROR WILL BE REPORTED

TEST 21

IF FAILURE REPORT ERROR

0);

.RET_STATUS then DECODE ();

DECODE THE STATUS,

SET RETRIES FLAG

TRUE;

IF ANY

begin
!
! ISSUE AN EX_SUP PROG COMMAND WITH START ADDRESS OF

' DM_21 VECTOR ARRAY AND BYTE COUNT.
CMO_REF = ,CHMD_SLOT;
BUF _DESCRPTR = DM_21;

! COMMAND REFERENCE NUMBER
! DMCODE STARTING ADORESS

if EX_SUP_PRG ()
then

¢ ISSUE AN EXECUTE SUPPLIED COMMAND
! REPORT IF FAILED

BYTE_COUNT = 213¢2;

' BYTE COUNTS

030
5 £Q Page1106

(21)

E8
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

.
L)
.
’
L)
°
L)
L)
’
L)

*
1]
.
*
*

L)
.
L
L)
.
L[]

*
L4

.
.
*
*

;
.
.
.

.
L

L
[
L]

L4
L)
L]

L
[
[
[
[
L

.
.
14

[]
[
L

[
.
[
.
.

4191
4192
4193
4194
4195
4196
4197
4198
4199
4200
4201
4202
4203
4204
4205
4206
4207
4208
4209
4210
4211
4212
4213
4214
4215

4216
4217
4218
4219

4220
4221
4222
4223
4224
4225
4226

4227
4228
4229
4230
4231
4232
4233
4234

4235
4236
4237

4238
4239
4240
4241
4242
4243
4244
4245
4246
4247

SNV
UTUNTUVTUVTVTVITVIVTVIVIVIO OO O TUTIT T TTTNMNTUN O O O O O°

v03.0
]

27-Mar-198S5 15:27:28
27-Mar-1985 13:28:18

beain
ERRDF (71, EXE_SUP_ERR,
if

ABORT TEST

JUNIT;

SEND PKT [WORD1) = .SWP_TOP;
CMD_REF = .CMD_SLOT;

BUF "DESCRPTR = SEND_PKT;

COMMAND REFERENCE 04
DESCRIPTOR ADDRESS

if SEND_DATA ()
then

ISSUE SEND DATA COMMAND
IF _STATUS BIT INDICATES ERROR

BYTE_COUNT = 04;

beain
ERRDF (72,

TOTAL BYTES TO BE TRANSFERRED

SND_DATA_ERR,

THEN REPORT ERROR

0);

.RET_STATUS then DECODE ();

RETRIES =

Page 107
(21)

DECODE STATUS

RETRIES = TRUE;
leave BLOCK];
end;

WORDO)

SEQ 0302

0);

.RET_STATUS then DECODE ();

SEND_PKT

VAY-11 B li 89-16 V4,0-579
USER#$1:( AZTEC.CZRCFCIZRCFC3.B16;4

DECODE RETURN STATUS

TRUE;

leave BLOCK];

end;

ISSUE A REC_DATA COMMAND AND WAIT FOR END PACKET

i T0 GET THE STATUS SENT BY DM CODE AFTER DOING
! SECTOR ACCESS TEST.
CMD_REF = ,CHMD_SLOT
BUF _DESCRPTR = RCV_ DATA _BUF [0];
BYTE_COUNT = 10;

COMMAND REFERENCE ¢
SET

THE BUFFER AREA TO

RECEIVE S WORDS FROM DM CODE

SET BYTE COUNTS = 10

if REC_DATA ()
then

SEND A RECEIVE DATA COMMAND

begin

ERBDF (73, RE_DATA_ERR, 0);

IF FAILURE REPORT ERROR

DECODE STATUS

.RET_STATUS then DECODE ();

RETRIES =

TRUE;

lesve BLOCKY;

end;

! CHECK DM CODE FLAG FOR SUCCESS.
if ,RCV_DATA_BUF

then

ER DF

(74,

(0] nequ so’'l104'

MSG_SAC_ERR,

PRINTB (FHTIO.
RETRIES
end;
end;

IF FAILURE REPORT ERROR

TRUE;

0);

.RCV_ DATA BUF [1],

IF NOT SUCCESS,

REPORT ERROR

REPORT SECTOR ACCESS FAILURE
.RCV_DATA_BUF (2], .RCV_DATA_BUF (3));

TRACK NUMBER

! PRINT UNIT, HEAD AND

8
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

032767
001407
012746
012746
010600
104417
022626
005067
026767
101401
000207
012767
004767
006000
103016
104455
000106
0000006
000000

032767

001402
004767

000140
000144
000146
000150
000152
000154
000156
000160
000166
000170
000174
00202
00204
030212
000220
00226
00234
000242

return;

000001

$721:

000025
0000005
0000006

000001

0000006
0000006
0000006

CMP
CLR
CcMP
BLOS

0000006
000001
0000006
0000006
0000006
0000006
000230’
000004
0000006

000230’
000232’
0000006
0000006
0000006

64%:
74:

4163
4165

4167
4170

TRAP
.WORD

5
S5
106
QZT.READY.ERR

4173

:%.RET.STATUS

4175

JSR

MOV

PC,DECODE
¢1,RETRIES

MOV
MOV
MOV

@0M.21,8UF .DESCRPTR
0652,BYTE
., COUNT

124
. REF
CMD.SLOT,CMD

4177
4170
4185
4186
4187
4189

JSR
ROR

sg.EX.SUP.PRG

TRAP

S5
107

4192

01,RET.STATUS

4194

8CC

0000006

SP,»

SS.AZTEC.READY

BEQ

S$:

el,-(SP)

SP,RO
17
(SP)+,(SP).
NUM.RETRIES
ggfl.RETRIES.SNP.RETRIES

4161

PC
025,TIP

.WORD
. WORD
BIT

$T21 TEST SECTION
01,5WP. TRACE
14
#0BM27,
- (SP)

RTS
MOV

JSR
ROR
8CcC

0000006

0000006
000001
0000006

000001

.SBTTL
BIT
BEQ

MOV
MOV
MOV
TRAP

0000006
0000006 0000006

032767

016767
012767
012767
004767

0000006

0000006
000001

000652
0000006

001402
004767
012767
000525
016767
016767

(21)

ENDTST;

012767
000560
016767
012767
012767
004767
006000
103016
104455
000107

0000006
000000

Page 108

end;

4255
4256

SEQ 0303

if (.NUM_RETRIES eqlu ZERQ) then exitloop;

«>e

4252
4253
4254

VAX-11 B 1 ise-16 V4,0-579
USER4$1:( AZ TEC.CZRCFCJIZRCFC3.B16;4

if (.RETRIES) then DO_RETRIES ();

)

4248
4249
4250
4251

= WWWLELLLYD

v03.0

000000
000006
000010
000014
000020
000022
000024
000026

27-Mar-1985 15:27:28
27-Mar-198S 13:28:18

.WORD
.WORD
. WORD
8I7
8eQ
JSR

SXE.SUP.ERR

MOV

PC,DECODE
01,RETRIES

MOV
MOV
MOV
MOV
MOV
JSR

04 ,8YTE.COUNT
PC,SEND.DATA

124
UNIT,SEND.PKT
SWP.TOP,SEND.PKT.2
CMD.SLOT,CMD.REF
0SEND,PKT,BUF .DESCRPTR

4196
4191
4200
4201
4202
4203

4204
4206

68
CZRCFCO RC2S FR END TEST

27-Mer-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

.WORD

. WORD

0000006

8¢:

000000G
0000006
0000006

PC,DECODE
01,RETRIES

124
CMD.SLOT,CMD.REF
@RCV.DATA.BUF
,BUF .DESCRPTR

#12,BYTE, COUNT
:g.REC.DATA

103016
104438

11
55
111
gE.DATA.ERR
#1,RET.STATUS
104
PC,DECODE
¢1,RETRIES

10¢:

124

11%:

000476

i VO0S00

1900504

; Routine Size:

;

Maximum steck

000000

004767

12¢:

13¢:
144

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
ADD

BIT
BEQ
JSR
TS7
BEQ
JMP

RTS

T21::

LSBTTL

(21)

;

4209

;

4211
4213
4208
4220
4221
4223
4225

4228

4230

4232
4227

4238

4241

MSG.SAC.ERR
0
RCV.DATA.BUF «6,-(SP)
RCV.
. BUF
DATA
+4,-(SP)
RCV.DATA.BUF «2,-(SP)

4242

04,-(SP)
SP,RO
14
#1,RETRIES
#12,SP
¢1,RETRIES

H
:
:

4244
4240
4249

PC,DO.RETRIES
NUM, RETRIES

4251

4132

144
2%

ARC$CODE - 16352
Routine Base:
163 words,
7 words
depth per invocation:

177266

Page 109

RCV.DATA.BUF
, 2104
124

S5
112

104455

000112
0000006
000000
0000066
016746
0000046
015746
0000026
016746
012746 0000006
012746 000004
010600
104414
000001
0000006
012767
062706 000012
000001
0000006
032767
001402
004767
0000006
005767 0000006
001402
000167
177326
000207

#1,RET.STATUS

0000006

000111
0000006
000000
032767
0000006
001402
004767
012767
000001
000000G
000431
026727
000000G 000104
001425

S5
110
SND.DATA.ERR
0

TRAP

000110
0000006
000000
000001
032767
001402
004767 0000006
012767 000001
000464
016767 0000006
012767 0000006
012767 000012
0000006
004767
006000

103016
104455

SEQ_0304

RO
94

ROR
8CcC

006000

USER$1:[AZTEC.CZRCFCJZRCFC3.B16;4

v03.0

VAX-11 Bliss-16 V4.0-579

ZRCFB3

T21 TEST SECTION

: SP,s

H8
CZRCFCO RC25S FR END TEST

ZRCFR3

TEST SECTION

vV03.0

000000
000004
000006
000010
000012

1s$:

104466
006000

103773

000207

; Routine Size:

;

PC.4$721

JSR
TRAP
ROR
8LO

RTS

6 words,

Maximum stack depth per

4257

27-Mar-1985
27-Mar-1985

RC$CODE
Rout
‘ne Base:
_
¢ words

invocation:

' <BLF/PAGE>

17060

VAX-1 1 8 1 iss-16 V4,0-579
USER$ 1 ( A ZTEC.CZRCFC)ZRCFC3.B16:4
.
.

SEQPO305110
)

ge(21)
4255

18
ZRCFR3
v03.0

:
:
:
:
;

4258
4259
4260
4261
:sgg

;4264

:
;

;.
;

CZRCFCO RC2S FR END TEST
TEST SECTION

1
3
3
3
g

oo
! TEST #22 - CONTROLLER PROCESSING TIME TEST

' DESCRIPTION:

3
g

!
;

4268

;42712

VAX-11 Bliss-16 V4.0-579
USER$1:[AZTEC.CZRCFCIZRCFC3.816:4

H
BGNTST:

4265
:ggg

4269
:S;g

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

3
g

THIS TEST BRINGS RC25 CONTROLLER AND SELECTED UNIT ONLINE.

THE CONTROLLER PROCESSING TIME IS MEASURED BY AVERAGING THE

]
!

TIME IT TAKES TO D0 100 ZERO LENGTH SEEKS, THAT IS, SEEKS THAT
ARE ZERO TRACKS LONG.

4273
4274
:g;g

3
3
g

:
'
'
;

UNLESS THE OPERATOR CHOSE TO SEEK ON BOTTOM SURFACE. TRACK O
WILL BE USED OR THE STARTING TRACK NUMBER AS GIVEN BY THE OPERATOR
WILL BE USED.

;42717

IF THERE WAS ANY ERROR IN SEEK, THIS WILL BE REPORTED WITH THE

:
:
;

THIS IS A SINGLE SURFACE TEST. SEEK WILL BE DONE ON TOP SURFACE

:
;

4278
:sgg

3
g

‘
:

THE NUMBER OF SEEKS COMPLETED AND DESIRED TRACK.
BE ABORTED UNLESS RETRIES ARE ENABLED.

:ggé
4283

g
:

IF SUCCESS. THE AVERAGE TIME WILL BE REPORTED.

g
3

:
H
:

;

4284
4285
4286

:ggg

4289

3
3
3

abel
BLOCK];

if .SWP_TRACE then PRINTF (DBM28);

NUM_RETRIES = ZERO;

3
4
&

while ( .NUM_RETRIES lequ .SWP_RETRIES) do
beain
TIP
= ALL_ONES:

THE TEST WILL

1 TEST 22

4290

4294

:
:
:
:
:

4295
4296
4297
4298
4299

:
4
4
S

4§8§

if .RET_STATUS then DECONE ();

! DECODE THE STATUS, IF ANY

:
:
:
;:
;
;:
;:
;
;

4304
4305
4306
4307
4308
4309
4310
4311
:%i%

S
S
4
4
5
S
S
S
g

RETRIES = TRUE;
end

' SET RETRIES FLAG

4313

:
H
:

;

4291
4292
4293

:ggg
4

* GET AZTEC READY FOR OPERATION
if AZTEC_READY ()

then

beain

ERRDF (75,

else
BLOCK] :

AZT_READY_ERR, 0);

' THIS FLAG INHIBITS READ_CMD
!

WAITING

FOR

END

PACKET.

' IF FAILURE REPORT ERROR
'

begin
BYTE_COUNT = ZERO;
LBN_ST = .SWP_START+.SIZ
LBN;
BUF DESCRPTR = ZERO;

! FILL THE COMMUNICATION COMMAND RING SLOTS

! BYTE COUNTS ZERO
! STARTING LBN
! CLEAR BUFFER DESCRIPTOR

SEQ 0306

Page 111
(22)

J38
CZRCFCO RC2S FR END TEST

ZRCFB3
v03.0

437}

TEST SECTION

U\UlO’*O‘\l\l\l\l@@@@@@@@@\ls)\l@sl\l\lslslsl\l\JO‘O‘O‘O‘O‘MMMMMMMMMU‘OO‘O‘O‘OOOOMU‘UDMM

4315
4316
4317
4318
4319
4320
4321
4322
4323
4324
4325
4326
4327
4328
4329
4330
4331
4332
4333
4334
4335
4336
4337
4338
4339
4340
434]
4342
4343
4344
4345
4346
4347
4348
4349
4350
4351
4352
4353
4354
4355
4356
4357
4358
4359
4360
4361
4362
4363
4364
4365
4366
4367
4368
4369
4370

27-Mar-198S 15:27:2 8
27-Mar-1985 13:28:1 8

! WITH READ COMMANDS
QUT_BOUND = ZERO;

' INITIALIZE COMMAND COUNT
' INIT RECEIVE COUNT

IN_BOUND « ZERO;

incru I from O to SND_ALLOCATE
beam

CMD_REF =

FILL

1 do

READ_CMD ();

.OUT_BOUND +

COMMAND BUFFER WITH

SEEK COMMANDS (16 SLOTS
WILL BE FILLED TO GET

,CMD_SLOT;

OUT _BOUND =

SEQ 0307
ge 11 2
USER$11:[AZTEC.CZRCFC)IZRCFC3.B16;4
(22 )

VAX-11 Blis
8s-16 V4.0 579

A QUTUE LENGTH OF 15)

UPDATE COMMAND COUNT
ISSUE READ COMMAND

if GET_CMD_SLOT () then exitloop:

GET NEXT COMMAND SLOT

end;

g INIT THE CLOCK AND START TIMING
CLOCK_INIT ();
TEMP = _RC2S_ADOR (RCIP, RC_ALL]);

! INIT CLOCK VARIABLES
! READ IP TO INITIATE
! CONTROLLER TO START POLLING

while

DO SEEK 100 TIMES

!
!
!

POLL RECEIVE RING FOR HOST
OWNERSHIP BIT,

.IN_BOUND lequ 100 do

begin

if REC_STATUS ()
then

Tele". IN_BOwN
ERRDF (76

HSG SEEK ERR,

PRINTB (FHTll

DECODE ();

RETRIES =

.TEMP,

REPORT ERROR

0);

BN 8T);

TRUE;

leave BLOCK];

else

IF ERROR,

end

DECODE END PACKET STATUS

AND ABORT TEST

begin

while

.QUT _BOUND lequ 100 do

SEaD RING [.CMD_SLOT, OWN_BIT] = PORT_OWNED;
OUT_BOUND =

.OUT_BOUND +

! READ_CMD BACK TO PORT

RETURN

1 INCREMENT COMMAND COUNT

if GET_CMD_SLOT () then exitloop;
if (.OUT_BOUND

.IN_BOUND) eqlu 16 then exitloop;

MAINTAIN A QUEUE LENGTH OF 1S

end;

TEMP =
end;

end;

_RC25_ADDR

(RCIP,

RC_ALL];

! READ IP TO INITIATE
CONTROLLER TO START POLLING

K8
CZRCFCO RC2S FR END TEST

ZRCFB3

TEST SECTION

YV I IV IV IV, IV IV IV.1V, |

4372

4373
4374
4375
4376
4377
4378
4379
4380
4381
4382
4383
4384
4385
4386
4387
4388
4389
4399

VIV
IV R R R R R R

v03.0

000000
000002
000004
000012
000014
000020
000024
000026
000030
000032

27-Mar-1985 1?: 27:28
27-Mar-198S 17:28:18

010146
024646
032767

001407
012746
012746
010600
104417
022626
005067
026767
101402
000167
012767
004767
006000

SEQ 0308
Pa

113

ge(22)

g STOP THE CLOCK
STOP THE CLOCK

_CLK_CSR = ZERO;

P6 =

100;

P2 = (.MINUTES#60 »

NUMBER OF SEEKS

.SECONDS)#10

DATA4 = .P2 « (.TICK$e10/.CLK HERTZ);

DATAR =

PRINTB
end;

_TICKS+1000 mod .CLK_HERTZ;

(MSG_PRU_TIME,

.DATA4

.DATA3);

SO _MANY MSEC. PER SEEK
TOTAL MSEC./SEEK

100TH OF MSEC. PER SEE K

PRINT MESSAGE

‘AVERAGE SEEK TIME'

if (.RETRIES) then DO_RETRIES ();
if (.NUM_RETRIES eqlu ZERO) then exitloop;
end;

return;

ENDTST;

$722:

000001

0000006

0000006
000001

0000006
000000G 0000006

000622

177777

0000006

LSBTTL

0000006

R1,-(SP)

4256

gég

:i.sué.TaAcs

4287

MOV
MOV

008M28,
- (SP)
01,-(SP)

TRAP

cHP

18:
2%

CHP
CLR
grgs

38,

MOV

JMP

JSR

ROR

BCC

TRAP

000001

0000006

0000006
000001
0000006
000520
0000006
0000006
0000006
0000006
0000006
0000006
0000006
0000006

as;
5%.

$T122 TEST SECTION

MOV

103017
104455

000113
0000006
000000
032767
001402
004767
012767
000167
005067
016746
016746
004767
010067
005067
005067
005067
005001

VAX-11 B 1 iss 16 V4,0-579
USER$1:
( A ZTEC.CZRCFC)ZRCFC3.B16;4

-(8P),-(SP)

SP,RO

(SP)s,(SP)e
NUM.RETRIES
ggn.nexnxcs.sup.ncvnxes
154

0-1,71IP

PC,AZTEC.READY
RO

4289

4291

4293
4297

JMORD
'WORD
‘WORD
g%g

113
AZT.READY.ERR
O
:i.aev.srntus

JSR
MOV
JMP
CLR
MOV
MOV
JSR
MOV
CLR

PC,DECODE
o1 .RETRIES
134
BYTE.COUNT
SWP. START,
- (SP)
SIZ.LBN, -(SP)
PC.,
BL $MUL
RO,LBN.ST
BUF .DESCRPTR

CLR
CLR
CLR

SP,s

OUT
. BOUND
IN.BOUND
R1

4300

4302
4304
4297
4310
4311

4312
4316
4317

4319

]

ZRCFBS
v03.0

CZRCFCO RC2S FR END TEST
TEST SECTION

000170

016767

0000006 0000006

000202
000206
000212
000214
000216
000220
000224
000226

004767
004767
006000
103404
005201
020127
101761
004767

0000006
0000006

000240
000246
000254
000256
000262
000264
000266
000274
000276
000300
000302
000304
000310
000314
000320
000324
000326
000330
000334
000340
000346

016667
000004
0000006
026727
0000006 000144
101100
004767
0000006
006000
103033
016767
0000006 0000006
104455
000114
0000006
000000
016716
0000006
016746
0000006
012746
0000006
012746
000003
010600
104414
062706
000006
004767 0000006
012767 000001
0000006
162706 000022

000176

000232

005267

017766

0000006

27-Mer-1985 15:27:28
27-Mer-1985 13:28:18
64

MOV

000017
0000006

0000006 000004

000000G 000144

9s;

0000006
0000006

100000

0000006

PC,READ.CMD
PC.GET.CMD.SLOT
RO
74
Rl
R1,017
64
PC,CLOCK,INIT

;
;

4323
4326

MOV
cMe
8H]
JSR
ROR
8CC
MOV
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
JSR
MOV
338

4(SP),TEMP
IN.SOUND, 0144
114
PC,REC.STATUS
RO
94
IN.BOUND, TEMP
SS
114
MSG.SEEK.ERR
O
LBN.ST,(SP)
TEMP, -(SP)
OFMT11,-(SP)
03,-(SP)
SP.RO
14
06, 5P
PC,DECODE
61 ,RETRIES
:gf.sp

;
;
:

4347
4348
4343

8:?

?gl.eouno.0144

4354

CMD.SLOT,RO

;

4356

4358

;

4362

g:g

104
IN.BOUND,RO
020,R0

8?T.BOUND.RO

MOV
MOV
BR
CLR

dRC2S.ADDR,6(SP)
6(SP), TEMP
8
aCLK.CSR

; ¢,RC.REG
; RC.REG,s
:
;

4366

MOV

MINUTES, (SP)

;

MOV

INC

JSR

ROR

£ 0
MOV
ADD

000000G 000006
000006 0000006

10$;

0000006
000144
0000006

114

000074
0000006
0000006

JSR
JSR
ROR
8LO
INC
cMP
BLOS
JSR

ADD

0000000,

0000006

4321

BIS

0000006
000020

Page 114
(22)

;

ASL
ASL

0000006

SEQ 0309

CMD.SLOT,CMD.REF

INC

MOV

000002

VAX-11 Bliss-16 V4.0-579
USER$1:[AZTEC.CZRCFC)ZRCFC3.B16;4

MOV

MOV
JSR
RDD

OUT . BOUND

9R(2S. ADDR,4(SP)

RO
RO

;

D
:

4323

|
1,0

;

; ¢,RC.REG
; RC.REG,
;

4319
4333

4334
4337

;

4340

;
;

4344
4345

;

4346

;

SP,e

SEND .RING,RO

0100000,2(R0)

OUT.BOUND

PC.GET.CHMD.SLOT

0144,P6

074, (SP)
PC,BL $MUL
SECONDS,RO

;

4360

4337
437S
4376

4377

M8
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

v03.0

000510
000512
000516
000522
000526
000532
000536
000542
000544
000550
000554
000560
000564
000570
000574

010016

012746
004767
010067
016716
012746
004767

010016
016746

000676
000700

062706
032767
001402
004767
005767
001402
000167
022626
012601
000207

e
12

004767

no P2

JSR

000026
000001

12¢4:

13s:

0000006

144

177142

154

MOV

RO.DATAS

225 words,
per

177072

Rout ine Bese:

‘nvocet on:

16 words

122::
1s:

817
BEQ
JSR

01, RETRIES
144
PC,D0.RETRIES

14
026, 5P

151

MM RETRIES

MOV

(S5P)+.R1

cHP

ACSCODE -

JSBTTL
JSR

15%

(SP)e,(SP)e

4297

4383
4385

4256

122 TEST SECTION
PC, 8122

RTS

ONE TRACK SEEX TIMING TES?

i SP,e

17074

66
RO

[}

4380

TRAP
ROR

AC$COOE Routine Bese:
‘Aavocetion:
2 words

4379

01750,
- (SP)
PC.BL ML
RO, (SP)
CLK.MERTZ,
- (SP)
PC.BL $M0D

DATAS, (SP)
DATAL. -(SP)
#M5G.PRO. TIME,
- (SP)
03, -(5P)
SP.RO

8LO

BGNTST;
! TEST #0273

CLK.MERTZ,
- (SP)
PC,.BLIDIV

MOV
MOV
MOV
MOV
MOV

8EQ

4378

PC,BL $MUL

P2.RO
RO.DATAS
TICKS,(SP)

RYS

depth

TIEKS, (SP)

012, (sp)

ADD
MOV
MOV

TRAP
ADD

SEQ 0310
Pege 115
(22)

C.BLSML

RO.(SP)

MOV
JSR
MOV
MOV
JSR

VAX- 11 8 lise- 16 v4,0-579
USER$1:(AZTEC. CZRCFC)ZRCFC3.B16;4

(SP)

MOV

MOV
JSR

104466
006000
103773
000207

(€ XV [ o)

MOV

6 words,
; Mex aum steck depth per

439}
4392
4397

oxé _(SP)

MOV

: Routine Size:

:
:
H

MOV
JSR

010016
016746
004767
010067
016716
016746
012746
012746
010600

Size:
' ne
: Rout
k
stec
'mum
; Mex

000000
1000000
000004

MOV

000012
0000006
0000006
0000006
000012
0000006

004767
066700
010067
016716
0127
004767

104414

000670

27-Mer-1985 15:27:28
27-Mar-1985 13:28:18

17776

4389

CIRCFLO RC25 FR END TEST

ZRCFAS

v03.0

L]
°

L]
[

¢
.

[]
-

L]
.

[]
.

1]
.

L]
.

*
.

L]
.

1]
.

[]
.

L]
.

*
.

[]
3

.
.

L]
-

L]
.

[]
.

[]
-

L]
.

[]
.

[]
.
-

[]
.

]
.

[]
-

]
.

[
I3

]
-

.
.

.
-

.
.

]
.

[
.
.

.
.
.
.

[]
.

.
.

[
.

]
.

[4
.

[
[]

4394

4395

4397
4398
4399

L (0l (o L (o ol L

439

4400
4401
4402

4403
4404
4405
440¢

4408
4409

4410
4411
4412
4413

4414

4415

4416

4417

4418
4419

4420

4421
4422
4423
4424

4425
4426
4427

4428
4429

4430
443]
4432
4433

VAX-11 Bliss-16_V4.0-579

27 Mer 1985 13:28:18

USER$1:(AZTEC.CZRCFC)ZRCFC3.B16;4

DESCRIPTION:
THIS TEST BRINGS RC2S CONTROLLER AND SELECTED UNIT

ONLINE.

ONE TRACK SEEK TIME 1S THE AVERAGE OF ALL ONE TRACK SEEKS THAT

DO NOT INCLUDE A HEAD SWITCH, ALL FORWARD ONE TRACK SEEKS WILL
BE DONE AND TIMED AND THEN REVERSE ONE TRACK
SEENS WILL BE
DONE AND TIMED. AVERAGE TIME WILL BE REPORTED.
THIS IS A SINGLE SURFACE

TEST.

;:‘(Acggeanoa CHOSE OTHERWISE.

4407

VIAAAAAAARAANANNE BNNAVNNVNA LR AL L B L Ut L0 L L U Lt G ol Ll L

27 Mer-1985 15:27:28

TEST SECTION

TOP SURFACE WILL BE USED UNLESS

SEEXS WILL BE FROM START T0 THE ENO OF

IF THERE WAS AN ERROR, ERROR WILL BE REPORTED AND THE TEST ABORTED

UNLESS RETRIES ARE TURNED ON.

label
BLOCK];

.SWP_TRACE then PRINTF (DBM29);

! TEST 23

NUM_RETRIES = ZERO;
mil;‘(,M,REYRIES leau
N

TIP

.SWP_RETRIES) dgo

« ALL_ONES;

! GET AZTEC READY FOR OPERATION
¢ AZTEC_READY ()

then

begin

’

IF FAJLURE REPORT ERROR

ERADF (77, AZT_READY_ERR, 0);

DECODE THE STATUS,

SET RETRIES FLAG

.RET_STATUS then DECODE ();

RETRIES =

else
8LOCK]

! THIS FLAG INMIBITS READ_CMO
! WAITING FOR END PACKET,

end

TRUE;

)

beg: n

BYTE_COUNT « ZERQ;

' BYTE COUNTS 26RO

gur_Ocscavrn . 2ERO;

' CLEAR BUFFER DESCRIPTOR

LBN_SZ = .SIZ LBN;

* LBN SIZE TO INCREMENT TRACK

LBN_ED « (.OFFSET . 820)e.LBN SZ.

' ENDING LBN

LBN_ST o (.OFFSEY « 0)e.LBN SZ;

' STARTING (BN

g INIT AND START THE CLOCK

ANY

CLOCK _INIT (),

' INIT CLOCK VARIABLES

incru COUNT from 0 to | do

' DO FORWARD ANDO REVERSE

*Ooaee
116
(22)

B9
CZRCFCO RC2S FR END TEST

27-Mer-1985 15:27:28

PPODOOVOOOVOOOVOPPEIDPEBEPPRPEPPRNNN~NIOCOOROOCORNNINNIISAOOTOTOOOOO

TEST SECTION

27-Mer-1985 13:26:18

begin

VAX-11 Blies-16 V4.0-579

USER#1:[AZTEC.C ZRCFC)ZRCFC3.B16;4

! ONE TRACK SEEKS

! FORWARD DIRECTION SEEK FIRST AND THEN REVERSE SEEK
z SECOND TIME AROUND THIS LOOP.
OUT BOUND = Z2ERO;

! INITIALIZE COMMAND COUNT

N_BOUND = ZERCG;

* INIT RECEIVE COUNT

FILL THE COF&NICATION cormno RING SLOTS
WITH READ COMMANDS

incru I from O to SND_ALLOCATE
begin

CMO

REF =

_LBN_ST;

1} do
¢ FILL COMMAND BUFFER WITH
! SEEK COMMANDS (16 SLOTS

! WILL BE FILLED TO GET

READ CMD ()s
OUT_BOUND = .OUT_BOUND « 1;
LBN ST =

_LBN_ST

! A QUEUE LENGTH OF 15)

,LBN_SZ;

NEXT TRACK

if GET_CMD_SLOT () then exitloop;

GET NEXT COMMAND SLOT

end;

TEMP

_RC2S_ADDR {RCIP,

RC_ALL]);

'
'

READ IP FOR CONTROLLER STMRT
POLLING

DO SEEK FROM STARTING TRACK

if REC_STATUS ()

POLL RECEIVE RING FOR HOST

then

IF ERROR,

§ FORWARD DIRECTION SEEK
uhil:‘.;N_BOUND lequ 820 do
g:n

! OWNERSHIP BIT,

TEaP
n

ERRDF (78 HSG SEEK ERR, 0);

PRINTB (FMT11,
DECODE ();

RETRIES =

.TEMP,

! SAVE RECEIVE COUNT
]

LBN_ST);

! DECODE END PACKET STATUS

TRUE;

leave BLOCK];

else

REPORT ERROR

end

AND ABORT TEST

begin

while

.OUT_BOUND lequ 820 do

RERD FILL_CMD ();

! GIVE NEXT SEEK COMMAND

¢ AND MAINTAIN A QUEUE OF 1S
OUT_BOUND
= .OUT_BOUND + I;
LBN_ST = LBN_ST o .LBN_SZ;
if GET_CMD_SLOT () then exitloop;

if (.OUT_BOUND
end;

.IN_BOUND) eqlu 16 then exitlooo:

SEQPOSIZ’11
age

(22 )

C9
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

AVICIVIVIVIT IV IV IV IV IV IV I Y. Y. ¥, Y. Y. Y. SR

!
!

LBN_ED = (.OFFSET « 0)e LBN_SZ;
LB:_SZ = ( not .SIZ_LBN) « {;

READ IP & CONTROLLER START

T0 POLL

' TO LOWEST ON THE SURFACE.
! COMPLEMENT SIZE OF LBN

STOP THE CLOCK

)

.CLK_CSR = ZERO;

' STOP THE CLOCK

DATA4 = (.MINUTESe60 + .SECONDS);
DATAS = (.DATA4¢3) mod S;

! TOTAL SEC.
! REMAINDER

' TOTAL SEEKS = 1642
DATA4 =

_DATA4¢3/5;

PRINTB
end;

(MSG_SK_TIME,

DATA3 =
DATAS =

MSEC.

PER SEEK

PRINT MESSAGE

_DATA3#100;
! 100TH OF MSEC.
_DATA3 + (.TICKS#300/(Se.CLK_HERTZ));
' 100TH OF MSEC./SEEK
.DATA4,

.DATA3Z);

'AVERAGE SEEK TIME'

if (.RETRIES) then DO_RE (RIES ():

if (.NUM_RETRIES ealu ZERQ) then exitloop:
end;

]

return;

000001

$723:
0000006

0000006

MOV

0000006
000000G 0000006
001002

177777

.SBTTL
JSR
CMP
ggz
MOV

000001

004767
0000006
006000
103017
104455
000115
0000006
000000

(22)

eng;

0000006

4723 TEST SECTION
R1, $SAVE2
-(SP), -(SP)
:%.SHP.TRACE

;

4390

;

4416

00BM29, - (SP)

01,-(5P)

MOV
TRAP

SP,RO
17

;

1%
24:

CLR
grgs

NUM.RETRIES
ggfl.astnxes.sup.nsvnxss

;
;

MOV

0-1,1IP

;

4422

JSR

PC,AZTEC.READY

;

4425

;

4429

104417

022626
005067
026767
101402
000167
012767

RC_ALL);

Pagi 118

REVERSE STARTING AND ENDING LBN NUMBERS AND REDO
ONE TRACK SEEKS AS DONE BEFORE
LBN_ST = .LBN ED
! START FROM HIGH TRACK NUMBER

0000006

010600

[RCIP,

USER$1:[AZTEC.CZRCFC)ZRCFC3.816;4

SEQ 0313

end;

004167

012746

_RC2S_ADDR

VAX-11 Bliss-16 V4.0-579

end;

ENDTST;

024646
032767
001407
012746

27-Mer-1985 13:28:18

TEMP =

R
R
R
R

4508
4509
4510
4511
4512
4513
4514
4515
4516
4517
4518
4519
4520
4521
4522
4523
4524
4525
4526
4527
4528
4529
4530
4531
4532
4533
4534
4535
4536
4537
4538
4539
4540

VIV VR B

VT G0 VT S5 G0 G0 B0 WO GF WO G0 G V- G0

S¢

v03.0

@8 B2 00 @ T OF Br TS B0 e V0 G0 G0 Be U B B0 VI

27-Mer-1985 15:27:28

cHP

JHP

ROR

BCC

TRAP

LWORD
.WORD
LMORD

(SP)e+,(SP).

164

115
AZT.READY.ERR
0

SP,s

4418
4420

D9
CZRCFCO RC25 FR END TEST

ZRCFB3

TEST SECTION

v03.0

000102
000110
000112
000116
000124

000130
000134
000140
000146
000152
000156

000162
000166
000172
000176
000202
000206
000212
000216
000220
000224
000230
000232
000240
000244
000250
000256
000262
000264
000266
000270
000274
000276
000304
000312
000320
000322
000326

27-Mar-1985 15:27:28
27-Mer-198S5 13:28:18

032767
001402

004767
012767
000167
005067
005067
016767
016746
016746
004767
010067
016716
062716
016746
004767
010067
004767
005002
005067
005067
005001
016767
004767
005267
066767
004767

000001

000116
0000006
000000
016716
016746
012746
012746
010600
104414
062706
004767
012767

162706
000167

026727
101022

USER$1:(AZTEC.CZRCFCJIZRCFC3.B16;4

PC,DECODE
01 .RETRIES
144

44
.

BYTE.COUNT
BUF . DESCRPTR
SIZ.LBN,LBN.SZ
OFFSET, -(SP)
LBN.SZ.-(5P)

S$:

000000G 0000006

PC
BL $MUL
,
RO.LBN.ST

OFFSET.(SP)
01464, (SP)

LBN.SZ,-(5P)

PC
BL $MUL
,
RO.LBN.ED

:S.CLOCK.INIT

0000006 0000006

LBN.ST,CMD.REF

7%:

PC,READ.CMD

OUT.BOUND
LBN.SZ,LBN.ST

000000G 0000006

sg.GET.CHD.SLOT
84

000017

000000G 000006
000006
0000006
000000G 001464

i 1
H Il.

4461

IRC2S.ADDR,6(SP)
6(SP),TEMP
IN.BOUND, 01464
124

;: ¢,RC.REG
; RC.REG,»

4472

4478

R1,017
74

8%:

10
IN.BOUND, TEMP
S5
116
gSG.SEEK.ERR

000000G 0000006

LBN,.ST,(SP)

0000006
0000006
0000006
000003

TEMP, -(SP)
OFMT11,-(SP)
03,-(SP)

TRAP

10¢;

JMP
CHP
BHI

4443

4450
4456
4457
4461
4463
4464
4465
4466
4468

PC,REC.STATUS
RO

000006
0000006
000001
0000006
000026
000402
000000G 001464

COUNT

OUT.BOUND
IN.BOUND

64:

006000

103404
005201
020127
101756
017766
016667
026727
101075
004767
006000
103034
016767
104455

SEQ 0314

#1,RET.STATUS

0000006

0000006
000001
0000006
000700

VAX-11 Blies-16 v4,0-579

4481

4485
4486

4487

SP,RO
14

06, SP
PC,DECODE
01,RETRIES
026, SP

134
OUT.BOUND, #1464
11%

44388

4439
4434

4495

ZRCFB3

CZRCFCO RC2S FR END TEST

v03.0

27-Mar-1985 15:27:28

TEST SECTION

27-Mar-1985 13:28:18

VAX-11 Blise-16 V4.0-579

USER$1:(AZTEC.CZRCFC)ZRCFC3.B16;4

SEQ 0315

ge 120

% 3%)

000432

004767

0000006

JSR

PC,READ.FILL.CMD

;

4497

000442
000450
000454
000456
000460
000464
000470
000474
000476

066767
004767
06000
103407
016700
062700
026700
001352
017766

000000G 0000006
000000G

LBN,SZ,LBN.ST
PC.GET.CMD.SLOT
RO
118
IN.BOUND, RO
020,R0
ou1 BOUND,RO

;
;

4500
4502

000000G 000010

118:

ADD
JSR
ROR
BLO
MOV
ADD
CHP
BNE
MOV

anczs ADDR, 10(SP)

;

000677
016767

0000006 000000G

124

BR
MOV

94
LBN.ED.LBN,ST

:
;

4478
4515

MOV
JSR
MOV
MOV
COM
MOV
INC
MOV
ST
INC
CHP
BLOS
CLR
MOV
MOV

LBN.,SZ,-(SP)
PC.BL $MUL
RO,LBN.ED
SIZ.LBN,PO
RO
RO,R1
R1
R1,LBN.SZ
(5P)
R2
R2, 01
6%
aCLK.CSR
MINUTES, (SP)
074, -(5P)

;

4517

;
; COUNT
; COUNT,s

4451
4450

;
;

4523
4525

ADD
MOV
MOV
MOV
JSR
MOV
MOV
JSR
MOV
MOV
MOV
JSR
MOV
MOV
JSR
MOV

SECONDS,
RO
RO,DATA4
DATA4,(SP)
#3,-(SP)
PC.BL $MUL
RO, (SP)
05,-(SP)
PC.BL $MOD
RO.DATA3
DATA4,(SP)
03, -(SP)
PC.BL $MUL
RO, (SP)
95, -(SP)
PC.BL$DIV
RO.DATA4

;

4526

;

4527

MOV
JSR
MOV
MOV
MOV
JSR
MOV
MOV
MOV

0144, -(SP)
PC,BL $MUL
RO.DATA3
TICKS,(SP)
0454, -(SP)
PC.BL $MUL
RO, (SP)
CLK.HERTZ,-(SP)
#5,-(SP)

;

4528

;

4529

000436

000504

005267

016667

016716

016746
004767
010067
016700
005100
010001
005201
010167
005726
005202
020227
101613
005077
016716
012746

004767

066700
010067
016716
012746
004767
010016
012746
004767
010067
016716
012786
004767
010016
012746
004767
010067

016716

012746
004767
010067
016716
012746
004767
010016
016746
012746

0000006

INC

000000G
000020
0000006

000010

0000006

0000006
000000G
000000G
000000G

000000G

000001
0000006
0000006
000074

0000006

000000G
0000006
0000006
000003
0000006

000005
0000006
0000006
000000G
000003
0000006
000005
0000006
0000006

0000006

000144
0000006
0000006
0000006
000454
0000006
0000006
000005

0000006

MOV

JSR

MOV

out.BoUND

;

10(SP), TEMP

OFFSET. (SP)

4499

4504

+,RC.REG

; RC.REG,s

;

4508

4516

PC, BL $MUL

DATAS, (SP)

F9
CZRCFCO RC2S FR END TEST

ZRCFB3
v03.0
000754
000760
000762
000764
000770
000774
001000
001004
001010
001014

001020
001022
001024
001030
001036
001040
001044

001050
001052
001056
001060
:

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

004767
005726
010016
004767
066700
010067
016716
016746
012746
012746
010600
104414
062706
032767

001402
004767

005767
001402
000167
022626
000207

0000006

PC,BL$MUL

MOV

RO, (SP)

JSR

134
144

0000006
0000006

15¢;

176762

16¢:

(22)

PC,BLIDIV

ADD
MOV
MOV

DATA3,RO
RO,DATA3
DATA3, (SP)

MOV

OMSG
SK. TIME, - .
(SP)

MOV

000000G

SEQ 0316
Page 121

(SP)e

187

000000G
0000006
0000006
0000006
0000006
000000G
000003

000034
000001

JSR

VAX-11 8 1 iss-16 V4,0-579
USER41: ( AZ TEC.CZRCFCJZRCFC3.B16:4

DATAG,

MOV
MOV
TRAP
ADD

- (SP)

03,-(5P)
SP,RO
14
034,5P

BIT
BEQ
JSR

#1,RETRIES
154
PC.D0.RETRIES

BEQ
JMP
CMP

164
24
(SP)s,(SP)e

157

NUM.RETRIES

RTS

4530

4426
4533

4535
4390

AC$CODE + 20012
281 words,
Routine Base:
21 words
; Maximum stack depth per invocation:
Routine Size:

000000
000000
000004
000006
000010
000012
:

004767

176712

103773

.SBTTL

123 TEST SECTION

JSR

PC.$123

TRAP
ROR

66
RO

RTS

BLO

000207

Routine Size:

4541

104466
006000

6 words,

;: Maximum stack depth per

T23::

Rout ine Base:

invocat on:

1 <BLF/PAGE
>

2 words

ARC$CODE

21074

4539

CZRCFCO RC2S FR END TEST

ZRCFA3
V03.0

L]
.

.
.

*
-

*
.

L)
.

3
.

1)
.

[]
.

L]
.

1]
.

*
-

*
.

[
.

[3
-

[]
-

1
-

.
-

L
.

*
.

.
.

L)
.

[
-

L
.

L
-

LJ
.

L
-

.
.

[
-

L[ d
-

.
-

*
.

.
-

L
-

.
-

”
.

[
-

.
-

Ld
.

.
.

14
.

.
.

[]
.

[
.

L]
.

.
.

[
.

4
.

]

4588

4589
4590
4591
4592
4593
4594
4595
4596
4597
4598

S: 27: 28
3: 28: 18

VAX-1 18l iss-16 v4,0-579
USER# 1:(AZTEC.CZRCFCIZRCFC3.B816;4

BGNTST;
Yoo

TEST @24

- AVERAGE SEEK TIMING TEST

DESCRIPTION:
THIS TEST BRINGS RC25 CONTROLLER AND SELECTED UNIT ONLINE.
TE AVERAGE SEEK TIME IS THE AVERAGE TIME IT TAKES T0 DO
R SEEK GIVEN THAT IT IS EQUALLY LIKELY TO START ON ANY TRACK
aggDANY HEAD, AND EQUALLY LIKELY TO END ON ANY TRACK AND ANY

ONE THOUSAND RANDOM SEEKS WILL BE DONE OVER THE RANGE
OF LBN TRACK O THRU LBN TRACK 1641 TO COVER BOTH SURFACES OF THE
SELECTED UNIT. FIRST TIME EXPRESS BIT IN COMMAND MODIFIER FIELD

FOR_READ CMD WILL BE SET SO THAT RANDOM SEEKS ARE TIMED AND

IN THE SECOND TIME EXPRESS BIT WILL BE RESET SO THAT THE

RANDOM LBN AVAILABLE TO THE CONTROLLER ARE ORDERED BY THE

CONTROLLER FOR SEEKS.

AVERAGE TIME FOR BOTH CASES WILL BE REPORTED.

AN ERROR REPORT FOR THIS TEST WILL REPORT

DESIRED TRACK NUMBER.

PROCEED TO THE NEXT

—

[

W U8 Gl Ol O3 G OO G G4 GG ON O4 O O G QO G Gl Gl G G G G G G (o (ol O (o (8 0 O

ega s 85 5

4542
4543
4544
4545
4546
4547
4548
4549
4550
4551
4552
4553
4554
4555
4556
4557
4558
455y
4560
4561
4562
4563
4564
4565
4566
4567
4568
4569
4570
4571
4572
4573
4574
4575
4576
4577
4578
4579
4580
4581
4582
4583
4584
4585
4586
4587

es sttt

TEST SECTION

27-Har-198§
27-Mar-198

THE NUMBER OF

AFTER REPORTING A FAILURE,

TEST

UNLESS RETRIES IS

SEEKS AND

THE DAIGNOSTIC WILL

TURNED ON.

abel
BLOCK]
;

.SWP_TRACE then PRINTF

(DBM30);

TEST 24

IF FAILURE REPORT ERROR

NUM_RETRIES = ZERO;
while (.NUM_RETRIES lequ

.SWP_RETRIES) do

! GE?eai?EC READY FOR OPERATION
if AZTEC_READY ()

then

begin

ERSDF (79, AZT_READY_ERR, 0);

DECODE THE STATUS,

SET RETRIES FLAG

.RET_STATUS then DECODE ();

RETRIES

else
BLOCK] :

TRUE;

end

IF ANY

begin

BYTE_COUNT = ZERO;

BUF _DESCRPTR = ZERO;
incru COUNT from O to 1 do

! BYTE COUNTS ZERO

! CLEAR BUFFER DESCRIPTOR

SEQ 0317
Pa‘e 122

(23)

H9
FR END TEST

ZRCFR3

L]
.

[]
v

[
1)

[]
L]
.
1]
.
1]
L)
.
*
L

L)
.

[]
.

[]
*
.
L)
®

[]
.
.

H
L)
L)
»
.
.
L)

4599
4600

4601
4602
4603
4604
4605
4606
4607
4608
4609
4610
4611
4612
4613
4614
4615
4616
4617
4618
4619
4620
4621
4622
4623

4624

4625
4626
4627

VNN NNOOROONNOONUNNNN~NNANNJOOOT
TR

v03.0

’

begin

" WITH READ COMMANDS
OUT_BOUND = ZERO;
TIF

P2 =

incru I

LBN_ST =

CMD_REF =

[

.P3;

WILL BE FILLED TO GET
R QUEUE LENGTH OF 15

ISSUE READ COMMAND

OUT_BOUND = .OUT_BOUND + 1;
if GET_CMD_SLOT

! FILL COMMAND BUFFER WITH
SEEK COMMANDS (16 SLOTS
GET RANDOM LBN

LBN_ST:

! GET NEXT COMMAND SLOT

() then exitloop;

end;

i INIT AND START THE CLOCK

[]

CLOCK_INIT ();
TEMP = .RC25_ADDR (RCIP, RC_ALLJ;
while

INIT CLOCK VARIABLES
! READ IP & CONTROLLER START TO POLL

.IN_BOUND lequ 1000 do

DO SEEK FROM STARTING TRACK

begin

if REC_STATUS ()
then

POLL RECEIVE RING FOR HOST

Pehe".

OWNERSHIP BIT,
IF ERROR, REPORT ERROR

AND ABORT TEST

leave BLOCK];

WO OOVODOOVOPER®NIDPEBOB®B®

[

RETRIES = TRUE;

[

TO WAIT FOR

SAVE RECEIVE COUNT
. IN_BOUND;
ERRDF (80, MSG_SEEK ERR, 0);
PRINTB (FHT11. .TEMP, LLBN_ST);
' "DECODE END PACKET STATUS
DECODE ();

READ _CMD ();

[

from O to SND_ALLOCATE

RA&DOH NUM ();

[

END PACKETS

.TICKS;

[

TeLL READ_CMD NOT

ALL_ONES;

’

NEXT TIME FIND ORDERED AVERAGE

INIT COMMAND COUNT
INIT RECEIVE COUNT

IN Bou~o = ZERO;

[]

FIRST FIND AVERAGE SEEK TIME

! FILL THE COMMUNICATION COMMAND RING SLOTS

[

VAX-11 8 lis 1
4.0-579
LYAf
USER$1:(AZ
Z CFCIZRCFC3.B16;4

' SEEK TIME.

[

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

else

end

begin
uhnle

.QUT_BOUND lequ 1000 do

floon NUM ();
LBN ST =

.P3;

READ_FILL_CMD ();
OUT_BOUND =

GET RANDOM LBN
GIVE NEXT SEEK COMMAND

AND MAINTAIN A QUEUE OF

.OUT_BOUND « 1;

if GET_CMD_SLOT

() then exitloop;

SEQP0318
age

1 23
(2 3)

19
CZRCFCO RC25 FR END TEST

ZRCFR3
V03.0

:
:
H
:
:

TEST SECTION

FUWWOHBLLAEBRLNTVNVIVNION
NN
J-JD®O OO0

:
H
:
;.
:
1
:

ENDTST;

004167

000000G

4656
4657
4658
4659
4660
4661
4662

4663

4664

4665
4666
4667
4668
4669

:
;.
:
:
:
:
;.
:

4670
4aeM
4672
4673
4674
467S
4676
4677

4679

:
:

4682
4683

;

4685

4678

;4680
4681
:

;

4684

;4686
4687
H

4688

;

4690

4693

:
:

4695
4696

H
H

4689

4691
4692

4694

000000
000004
000006
000014
000016
00022
000026
000030
000032
000034
000040
000046
000050

27-Mar-1985 15:27:28

024646
032767
001407
012746

012746

010600

27-Mar-1985 13:28:18
if (.OUT_BOUND -

USER$1:[AZTEC. CZRCFC]ZRCFC3 B16;4

SEQ 0319

Page 124
(23)

.IN_BOUND) eqlu 16 then exitloop:;

end;

TEMP
end;

_RC2S_ADDR

(RCIP,

RC_ALL]);

READ IP & CONTROLLER START TO POLL

end;

STOP THE CLOCK

.CLK_CSR = ZERO;

TOTAL SEEKS = 1000
DATA4 = ( ,MINUTES+60 + .SECONDS);
DATA3 = .TICKSthO/.CLK_HERTZ:
if .COUNT eqlu ZERO
then

DA?Az = DATASG;

’

! STOP THE CLOCK
! MSEC. PER SEEK
! 100TH OF M.SEC/SEEK

! SAVE AVE. SEEK TIME

OATAl = _DATA3;
CMQOD = ZERO:

! RESET EXPRESS BIT FOR
' READ COMMAND TO DO ORDERED SEEKS

end;

PRINTB (MSG_AVE_TIME,
PRINTB (MES_SKO_TIME,
end;

.DATAZ2,
.DATA4,

.DATAl);
.DATA3);:

!
!

PRINT MESSAGE ‘AVERAGE SEEK TIME'
AVERAGE SEEK ORDERED TIME.

if (.RETRIES) then DO_RETRIES ();
if (.NUM_RETRIES eqlu ZERDO) then exitloop;
end;
return;

000001

$724;
0000006

000000G
000001

104417

022626
005067
026767
101402
000167

VAX-11 Bliss-16 V4,0-579

0000006
000000G 0000006
000626

14:
2$:

.SBTTL
JSR
CMp
géa

$724 TEST SECTION
R1, $SAVE2
-(SP),-(5P)
:%.SNP.TRACE

MOV
MOV
MOV
TRAP

008M30,-(SP)
#1.,-(SP)
SP,RO
17

CLR
grgs

NUM,RETRIES
?gfl.RETRIES.SUP.RETRIES

JMP

cMP

(SP)+,(SP)«

4540

4574

;
:
:

SP,«
4576
4578

J9
CZRCFCO RC2S FR END TEST

27-Mer-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

103017
104455
000117
0000006

8cC

000000
032767
001402
004767
012767
000167
005067
005067
005002
005067

0000006
000000

016746
016746
012746
012746
0°0600
104414
062706
004767
012767
162706
000536
026727
101024

TRAP
. WORD
. WORD
. WORD

0000006
0000006

44
:

S$:
64:

005067
012767
016767

005001
004767
016767
016767
004767
005267
004767
006000
103404
005201
020127
101754
004767
017716
011667
026727
101076
004767
006000
103033
016767
104455
000120

JSR

ROR

0000006
0000006
0000006
0000006

BEQ
JSR
MOV

CLR
CLR
CLR
CLR
CLR

MoV
MoV
7%:

CLR
JSR

MOV
MOV

JSR
INC
JSR

ROR

8LO
INC

000017
0000006
0000006
0000006
000000G 001750

8$:

9%
:

0000006

000010
0000006
000001
0000006
000016

01 ,RET.STATUS
44
PC,DECODE
#1,RETRIES

4587

164
BYTE.COUNT
gUF.DESCRPTR
2

COUNT

QUT.BOUND
IN.BOUND

e-1,1IP

TICKS P2
PC RANDOM. NUM
P3,LBN.ST

REF
LBN.ST,CHD.

PC,READ.CMD

OUT.BOUND

:g.GET.CHO.SLOT
84

4589
4582
4595
4596
4598
4605
4606
4607
4609
4611
4613
4614
4615
4617
4618
4620

4611

JSR

PC REC.STATUS

4633

BCC

10
IN.BOUND, TEMP
55
120

4637
4638

0
LBN.ST,-(SP)
TEMP, -(SP)

4639

BHI

JSR

MOV

10¢:

4585

CHP

MoV
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
TRAP
ADD

0000006
0000006
0000006
000003

4582

54
55
117
SZT.READY.ERR

R1
R1,017
74

(23)

PC,CLOCK. INIT
dRC2S.ADDR,(SP)
(SP),TEMP
IN,BOUND, 01750

MOV
MOV

ROR

000000G 0000006

0600006 001750

8LOS
JSR

PC,AZTEC.READY
RO

SEQ 0320
ge 125

34:

0000006

004767
006000

v03.0

VAX-11 8 lios- 16 v4.0-579
USER$1:(AZTEC. CZRCFCIZRCFC3.B16;4

ZRCFB3

cHP

BHI

+,RC.REG

RC.REG,
»

124

4627
4628
4630

MSG.SEEK.ERR

oFMT11,-(SP)

SP,RO

010,5P

PC,DECODE
01 ,RETRIES
#16,5P

154
QUT.BOUND, #1750
114

: SP,e
4640
4641
4636
4647

-y

I<9
CZRCFCO RC2S FR END TEST

ZRCFR3
vV03.0

000412
000414
000416
000422
000426

000432
000434

TEST SECTION

004767
016767
004767
005267
004767
006000

0000006
0000006 0000006
0000006
0000006
0000006

016700
062700
026700
001350
017766
016667
000676
005077
016746
012746
004767

0000006
000020
0000006

103407

PC,RANDOM. NUM
P3 LBN.ST

11%:

12¢:

(23)

PC GET. CHD SLOT

11
IN.BOUND,RO

4657

020,R0

0000006 000002
000002
0000006

SEQ 0321
ge 126
4649
4650
4651
4653
4655

*READ
LFILL.CMD

?UT.BOUND, RO
04
RC25.ADOR,2(SP)
ggSP).TEHP

*+,RC.REG
RC.REG,*

aCLK.CSR

MINUTES, - (SP)
074,-(5P)
PC,BLSMUL

4661
4630
4669
4671

SECONDS, RO

066700

010067
016716
012746
004767
010016
016746
004767
010067
005702
001010
016767
016767
005067
062706
005202
020227
101002
000167
016746
016746
012746
012746
010600
104414
016716
016746
012746
012746
010600
104414
062706
032767
001402
004767
005767
001402
000167
022626

X-11 81 ise-16 V4,0-579
ER$1: (A ZTEC.CZRCFC)ZRCFC3.816;4

RO,DATA4

118KS., (SP)

4672

0144, .(5P)
PC,BL ML
RO.(SP)

- (SP)
CLK.HERTZ,

PC,BLSDIV
RO.DATA3
R2

0C00006
0000006 0000006
0000006 0000006
0000006
000010

134

DATA4,DATA2
DATA3.DATAL

134

COUNT
COUNT,
»

000201

177334

0000006
0000006
0000006
000003

0000006
0000006

177136

DATAL,-(SP)

4674
4677
4678
4679
4599
4598

4685

OATAZ, -(SP)

OMSG.AVE.TIME,
-(SP)
03,-(SP)

0000006
0000006
0000006
000003
000016
000001

COUNT

SP,RO
14
DATA3,(SP)
DATA4,-(SP)

SP,e

SP,RO
14

SP,e

4686

l'\

000364
000370
000376
000402
000406

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

OMES, $KO0. TIME
- (SP)
,
03,-(SP)

0000006

15¢:

16%:

@16, 5P
01,RETRIES

174

PC,D0.RETRIES

4582
4689

17¢:

Tg?.RETRIES

4691

18¢;

2%
(SP)+,(SP).

4540

L9
ZRCFRY
v0o3.0

000704

000207

CZRCFCO RC2S5 FR END TEST
TEST SECTION

27-Mer-1985 15:27:28
27-Mer-1985 13:28:18
RTS

VAX-1
118 li s8-16 V4.,0-579
USER$ 1:( AZTEC. CZRCFC]ZRCFC3 B816;4

SEQ 0322

Page 127

(23)

227 words,
Routine Base:
ACSCODE + 21110
Max 'mum stack depth per invocation:
14 words

Routine Size:

000000
000000

004767

000004
000006

104466
006000

000012

000207

000010

124::
1%:

177066

103773

; Routine Size:

6 words,

1<BLF/7PAGE >

124 TEST SECTION

JSR
TRAP
ROR

PC,4724
66
RO

RTS

B8LO

;: Meximum staeck depth per
4697

LSBTTL

Routine Base:

invocet.on:

2 words

AC$CODE + 22016

4695

M9
CZRCFCO RC2S FR END TEST

JRCFAS

TEST

1]
.

L]
.

1]
.

.
.

®
.

[]

®
.

.
.

®
.

[
[]

[
-

*
.

.
-

1]
-

L
.

.
-

L]
.

[
-

L
-

L]
-

*
-

.
-

.
.

L4
.

[
-

.
-

Ll
.

.
.

L]
-

L
-

L]
.

L]
-

L
-

.
.

*
.

LJ
-

L]
.

*
.

[
.

LJ
-

.
.

L
.

[
.

L
[

[
.

.
.

[

4698
4699

4700
470}
4702
470%

4704
4705
4706
4707
4708
4709
4710
4711
4712
4713
4714
4718

4716
71?7
4718
4719
4720

4721

4722
4723
4724
4728

4726

4727

4728
4729

4730
47%}
4732
4733
47%4

4735

473%6
47%7
4738

4739

4740
474}
4742

4743

4744
4745
4746
4747
4748

4749
4750
475}
4782
4753
4754

SECTION

VAX-11 Blise-16 V4.0-579

27-Mer-1985 13:28:18

USER$]:(AZTEC.CZRCFC)ZRCF(3.B16;4

BGNTST;

!
!
!
!
!

8 8 L L L (o 8 Ll L

LIAUMALAAN
AN AN S ANNNUNVNVNIA AL AME B 0 0 U L G G G W 8 U Ll 8 L

[

[]

8 L8 L (o

v0s.0

27-Mar-1985 15:27:28

TEST @25 - FULL STROKE SEEX TIMING TES?
DESCRIPTION:
THIS TEST BRINGS RC2S CONTROLLER AND UNIT ONLINE.

!
5

THE FULL STROKE SEEX TIME IS THE AVERAGE TIME OF
SEEXS THAT DO NOT INVOLVE HEAD SWITCHES.

1000 FULL

STROKE

THIS IS A SINGLE SURFACE TEST.
OPERATOR CHOSE OTHERWISE.

!
!
H
!
!

TOP SURFACE WILL BE USED UNLESS THE

THE ERROR REPORT WILL INCLUDE NUMBER OF SEEXS AND DESIRED TRACK
NUMBER. AFTER FAILURE, THE TEST WILL BE ABORTED UNLESS RETRIES
ARE TURNED ON.

label
BLOCK],
BLOCKS;
¢

.SWP_TRACE then PRINTF

(DBM31);

TEST 25

NUM_RETRIES = ZERO:
while (.NUM_RETRIES leau
b‘

TIP

.SWP _RETRIES) do

« ALL_ONES;

'TELL READ CMD NOT T0 WAIT FOR

* GET AZTEC READY FOR OPERATION

' RECEIVE STATLS

¢ AZTEC_READY ()

ERNDF (81, AZT_READY ERR, 0);

' N

;

f _RET_STATUS then DECODE ();

! DECODE THE STATUS,

RETRIES =

* SET RETRIES FLAG

then

b‘

end

TRUE;

IF FAILURE REPORT ERROR

IF ANY

else
8LOCK] :
.
begin

g SEEX BETWEEN BEGINNING TRACK AND ENDING TRACK

’

BYTE_COUNT = z:ao‘

gur_OEscavvn s Z2ERO;

* FILL THE COMMUNICATION COMMAND RING SLOTS
' WITH READ COMMANDS
LBN_SZ = .S1Z LBN;

OUT BOUND = ZERQ;

! BYTE COUNTS ZERO

' CLEAR BUFFER DESCRIPTOR

¢ LBN INCH:MENT

SIZE

INIT COFMAND COUNT

56Q 0323
Page 128

(24)

ZRCFRS

CZRCFCO RC2S FR END TEST

vos. 0
*
.

1)
.

1]
.

L]
[

.
.

L)
»

*
.

[]
.

*
.

[
.

.
.

.
[

.
.

L]
.

Ll
»

*
.

.
-

L]
-

[]
.

L)
-

L]
-

¢
-

L]
.

L)
-

.
3

L]
-

’
-

[
-

L]
.

[
-

L)
-

L)
.

L]
-

.
.

*
.

Ld
.

L
-

L]
.

L]
I3

[]
.

L
I3

.
.

[
.

L
.

[
.

*
.

[
-

[

475S

4756
4757

4758

4759

4760

4761
4762
4763

4764

4765

4766
4767

4768
4769

4770
4771
4772
4773
4774
4775
4776
4777
4778
4779
4780
4781
4782

4783

4784

4785

4786
4787
4788
4789
4790
479]
4792
4793
4794
4795
4796
4797
4798
4799

4800

4801
4802

4803
4804
4805

4806
4807
4808
4809
4810
4811

TEST SECTION

A~ 2. 2. 1 1. X 1. 1. 1. 7. Y. RUBWPEY. Y. W ~l~J~JslslwJQOOOOOU‘U'MU‘U'U'U'U'MU'OOOOO‘O‘OOQ‘OOOOMU‘M

[

27 Mer-1985 15:27:28

27-Mer-1985 13:28:18

IN_BOUND = ZERO;
incru 1

from O to SND_ALLOCATE

1 do

begin
if

.OUT_BOUND then LBN_ED *

LBN_ST = (.OFFSET «
CMO_REF = _LBN_ST;

VAX-11 B lise-16 v4,0-579
USERS] ::[AZTEC.CZRCF
C)ZRCFC3.B16;4
(

INIT RECEIVE COUNT

FILL COMMAND BUFFER WITH

SEENX COMMANDS (16 SLOTS)

820 else LBN_ED *

.LBN_ED)e.LBN_SZ;
! GET STARTING LBN
! LBN_ST WILL BE USED CMO_LREF

! SO THAT FAILING LBN CAN BE
! FOUND IN RECEIVE ENVELOPE

READ_CMO ();

if GET_CMO_SLOT () then exitloop:

! GET NEXT COMMAND SLOT

OUT_BOUND = .OUT_BOUNC - 1;

ISSUE READ COMMAND

end;

t INIT AND START THE CLOCK

[]

CLOCK_INIT ();

TEMP =

_RC2S_ADDR (RCIP,

RC_ALL);

uhil;..;N_eouuo leau 1000 do

INIT CLOCK VARIABLES

READ IP & CONTROLLCZR START 10 POLL

DO SEEK FROM STARTING TRACK

if REC_STATUS ()

then

bca;n
TE

_IN_BOUND;

ERRDF (82,

MSG_SEEK ERR,

PRINTB (FMT11,

DECODE ();
RETRIES = TRUE;
lesve BLOCK];

8LOCx?2

else

.TEMP,

0);

.LBN_ST);

RECEIVE RING FOR HOST

ERROR,

REPORT

ERROR

SAVE RECEIVE COUNT

' DECODE END PACKET STATUS

end

POLL

OWNERSHIP BIT.

AND ABORT

TgST

)
b(g»h

while

.OUT

beg

BOUND lequ 1000 do

Lea ST « (.OFFSET « _LBN_ED)e.LBN_SZ 3

READ FILL_CMO ();
OUT_BOUND = .OUT BOUND - I;
¢

! GET STARTING LBN

* ISSUE READ COMMAND

.0UT_BOUND tren LBN_ED = 820 else LBN_ED = O;

¥ GET_CMO SLOT () then lesve BLOCK?;
¢ (LOUT_BOUND
end;

! GET NEXT COMMAND S.07

.IN_BOUND) eqlu 16 then leave BLOCK?;

! MAINTAIN A QUEUVE LENGTH OF

SEQ 0324

Page 129
(24)

InCFR3

B10
27-Mer-198S 15:27:28

CZRCFCO RC2S FR END TEST

v03.0

TEST SECTION

27-Mar-198S 13:26:138

4812
4813
4814

7
6
6

:
:
:
:
:
:
:
H

4816
4817
4818
4819
4820
4821
4822
4823

6
S
S
S
S
S
S
S

4825

H
H
:

4828
4829
:gg?

4
4
:

if (.RETRIES) then DO_RETRIES ();

:ggg

if (.NUM_RETRIES eqlu ZERQ) then exitloop;

4834

end;

4836

H
H

481S

4824

:ggg

4835

4837

USER$1:(AZTEC.CZRCFCIZRCFC3.B16;4

SEQ 03

Pog£5130
(24)

end;

VAX-11 Bliee-16 V4,0-579

TEMP = _RC2S_ADDR (RCIP, RC_ALL,
end;

!
' STOP THE CLOCK
!
.CLK_CSR = ZERO;
!
TOTAL SEEXS = 1000
DATA4 =

MINUTES+60 «

! STOP THE CLOCK
.SECONDS;

DATAS = TICKS¢100/.CLK HERTZ;

'READ IP AND CONTROLLER WILL
' START TO POLL

PRINTB (MG_SKF_TIME, .DATA4, .DATA3);

MSEC./SEEK

! 100TH OF MSEC./SEEK

! PRINT MESSAGE 'AVERAGE SEEK TIME'

end;

return;

ENDTST;
LSBTTL
MOV
cMP
gga

$72S TEST SECTION
R1,-(SP)
-(SP),-(SP)
:%.SUP.TRACE

MOV
MOV
MOV

008M31,-(SP)
e1,-(SP)
SP,RO

14
2

CLR
SESS

NUM . RETRIES
ggfl.RETRIES.SHP.RETRIES

;
:

4725
4727

MOV

JMP

224

JSR

PC,AZTEC.READY

4729

8CC

4736

4738

$12S;

000001

000000G

0000006
000001

0000006
000000G 0000006
000652

177777

0000006

000000G

TRAP
CHp

ROR
TRAP

LWORD
.WORD

000001
0000006

000001

000550
0000006

0000006

.WORD

0000006

000000G

S$:

17
(SP)e,(SP).

0-1,T1IP

RO
55

121
AZT.READY.ERR

gég

:%.RET.STATUS

JSR

PC,DECODE

JMP
CLR

204$
BYTE.COUNT

MOV
CLR

01,RETRIES

BUF .DESCRPTR

;

4696

;

4723

;

:
;
;

SP,e

4733

4740

4733
4748

4749

C10
CZRCFCO RC2S FR END TEST

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

v03.0

016767
005067
005067
005001
032767
001404
012767
000402
005067
016746
066716
016746
004767
010067
016767
004767
005267

0000006 0000006
0000006
0000006

000001

0000006

001464

0000006

6$:

3%.0UT.80UND

74¢:

84
LBN.ED

ge 131

(24)
4753
4754
4755
4757
4760

01464 ,LBN.ED

4762

LBN.SZ.-(SP)

LBN.ST.CMD.REF

4763
4766
4767
4769

PC,READ.CMD

out.BOUND

:g,GET.CHMD.SLOT
94
94

10%:

001750

114

103033
016767
0000006 0000006
104455
000122
0000006
000000
0000006
016746
0000006
016746
012746 0000006
012746
000003
010600
104414
062706
000010
004767
0000006
0000006
000001
012767
162706 000016
000527
026727
0000006 001750
101051
016746
0000006
066716
0000006
016746
0000006
0000006
004767
0000006
010067

(S5P)e«,(SP).
104
(SP)+,(SP).

R1
R1,017
64

PC,CLOCK. INIT
&@7C25.ADDR, (SP)
(SP),TEMP
IN.BOUND, 1750
184
PC,REC.STATUS

1
I,
+,RC.REG

RC.REG,»

4758
4757
4776
4777

4780
4783

006000

1000444

SEO 0326

PC,BL $MUL
RO,LBN.ST

020127
101732
004767
017716
011667

$1:(AZ TEC.CZRCFCIZRCFC3. B816:4

SIZ.LBN,LBN.SZ
QUT.BOUND
gT.BOUND

8¢:

004767
006000
103002
022626
000405
022626
005201

026727
101123
004767

X1
-11
B1; 99-16 V4,0-579

ZRCFB3

124
IN.BOUND, TEMP
55
122
SSG.SEEK.ERR

4787
4788

LBN.ST,-(SP)

4789

TEMP, -(SP)

0FMT11, -(SP)

SP,RO
14
@10, 5P
PC,DECODE
01,RETRIES
016,5P

124

19¢
?UT.BOUND, 01750
OFFSET, -(SP)
LBN.ED,(SP)
LBN.SZ,-(SP)

PC.BL $MUL
RO,LBN.ST

SP,e
4790
4791
4786

4798
4800

CZRCFCO RC25 FR END TEST

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18
PC,READ.FILL.CMD

0000006
0000006
000001
0C .0006
001464

o% ‘out.BOUND
1
#1464 ,LBN.ED
144

0000006
0000006

LBN.ED

154%:

000020
0000006

SEQ 0327
ge 132

(24)

4801
4802
4804

out. BOUND

0000006

8-16 V4,0-579
EC CZRCFCIZRCFC3.B16;4

TEST SECTION

v03.0

p-T2
N--

ZRCFR3

PC,GET.CMD.SLOT
RO

4806

IN, BOUND RO
020,R

4808

154
(SP)+,(SP).
174

OUT BOUND RO

000706
000712

000716
000720
000724
000726
F000730

004767
005767

001402
000167
022626
012601
000207

0000006
0000006

177112

+ ,RC.REG

*
RC.REG,

4799
4798

4815

4780
4822
4824

SECONDS,RO

RO,DATA4
TICKS,(SP)
0144, -(SP)
PC,BL$MUL

4825

RO, (SP)

CLK.HERTZ,-(SP)

0000006
0000006
0000006
0000006
0000006
0000006
000003
000016
OQ?OOI

MINUTES, -(SP)
074, -(SP)
PC,BL$MUL

wme

18%:

®e

0000006
0000006
000074
0000006
0000006
0000006
0000006
000144
0000006

aRC25.ADOR,2(SP)
2(SP),TEMP
11%
9CLK.CSR

®e

17¢:

0000006 000002
000002
0000006

(SP)o (SP).
124

®e

164

(SP)o (SP).

PC,BL$DIV
RO,DATA3

DATA3,(SP)

DATA4, -(SP)
OMG . SKF . TIME, - (SP)
03,-(5P)

0000006

19%:
20$:
214:

22%:

SP,RO
14

4826

SP,=

016,5P
01,RETRIES

4733
4830

PC,DO.RETRIES
NUM, RETRIES

4832

214

224
24
(SP)+,(SP).

(SP)+,R1

Routine Base:
AC$CODE « 22032
237 words,
;: Routine Size:
steck
m
depth per invocation:
; Meximu
12 words

4696

E10
CZRCFCO RC2S FR END TEST

ZRCFR3
vV03.0

000000
000000
000004
000006
000010
000012

TEST SECTION

004767

177042

6 words,

4855

4856
4857
4858
4859
4860
4861
4862
4863
4864
4865

4866

4867

4868
4869

4870

4871
4872
4873
4874
487S
4876
4877
4878
4879

4880

S s

B I R I I I G I IO IAIA IS IS IB IS IS IS IDICO IG I T I® '@

4847
4848
4849
4850
4851
4852
4853
4854

ONN OF G O O O8Ol O G G4 G4 O G O G Gl N G N G G (N G (8 O G (ol Gl (ol (0 e

4846

JSR
TRAP
ROR

PC,$T25
66
RO

RIS

TEST @26 - WRITE DATA TEST

DESCRIPTION:
THIS TEST BRINGS RC2S CONTROLLER AND SELECTED UNIT ONLINE.
THEN LOADS DM CODE VECTOR ARRAY DM _26 TO THE CONTROLLERS

MEMORY BY ISSUING EX_SUP_PROG COMMAND.

THE DMCODE GETS THE UNIT NUMBER FROM THE HOST AND ATTEMPTS
TO FIND AT LEAST ONE GOOD DIAGNOSTIC BLOCK ON EACH SURFACE

OF THE PLATTER SPECIFIED AND MAKE SURE THAT DMCODE CAN READ

AND WRITE TO THE BLOCK IN ORDER TO VERIFY THAT THE HEADS ARE
WORKING PROPERLY. FIRST TOP SURFACE WILL BE ATTEMPTED WITH
ALL ONES DATA
AND SECOND ALL ZERO DATA. THIS WILL BE
REPEATED FOR BOTTOM SURFACE AS WELL. THE DATA WRITTEN WILL BE
READ AND COMPARED.

THE ERROR REPORT ON THIS TEST WILL INCLUDE DATA WRITTEN,
DATA READ
PLUS THE TRACK, HEAD AND SECTOR NUMBER.
ALSO ERROR STATUS
FROM THE MICRO CODE IF ANY WILL BE REPORTED. ERROR STATUS OF

ZERO WILL MEAN OTHER ERRORS TRAPPED IN DMCODE.
THE ERROR THE REST OF

SELECTS RETRIES.

THE TEST

AFTER REPORTING

WILL BE ABORTED UNLESS THE OPERATOR

abel
BLOCK]
;
if

.SWP_TRACE then PRINTF

NUM_RETRIES

(DBM32);

TEST 26

IF FAILURE REPORT ERROR

ZERO;

while (_.NUM_RETRIES lequ
2
beam

.SWP_RETRIES) do

GET AZTEC READY FOR OPERATION
if AZTEC_READY ()
then

begin

V4.0-579

ZRCFCJZRCFC3.816;4

SEQ 0328

ge 133

(24)

4836

BGNTST;

4843
4844
4845

125 TEST SECTION

Routine Base:
ACSCODE + 22764
invocation:
2 words

NP5 bbb

®S WS W VL WE AL Ve VL VL B4 B CL VS V0 B0 VE WL VE GL G0 GF Ve S Ve S B0 G0 G0 Ve G0 U3 S OF W Ve SF G¢ B¢ G0 G0 G G¢ @0

4840
4841
4842

LSBTTL

B8LO

Maximum stack depth per
4838
4839

27-Mar-1985 13:28:18

12S::
14:

104466
006000
103773
000207

: Routine Size:
;

27-Mar-1985 15:27:28

F10
CZRCFCO RC25 FR END TEST

ZRCFA3

TEST SECTION

L)
®
1]
.
°
*
1]
L]
»
L)

.
L)

[]
L)
.

[
L)
L)
1)
L4
.

.
*
L}
.
.
L]
L]

H
.
e
[
[
.
[
*
[
.
.

L)
[
[

[
[]
[
[
[
.

L
’

[4
]
L4
[
14
.

4881
4882
4883
4884
4885
4886
4887
4888

4889
4890
4891
4892
4897
4894
4895
4896
4897
4898
4899
4900
4901
4902
4903
4904
4905
4906
4907
4908
4909
4910
4911
4912
4913
4914
4915
4916
4917
4918
4919
4920
4921
4922
4923
4924
4925
4926
4927
4928
4929
4930
4931
4932
4933
4934
4935
4936
4937

O‘O‘O‘OOMW\”WM\AMMMMMU‘O‘O‘O‘O‘O‘O‘O‘U!UIMU!UIU'IUTUIO’O‘O‘OO‘O‘OU‘ILHU'MU'MUIU!U‘IU‘&&MU'UIU‘M»“

v03.0
1]

27-Mer-198S 1 5:27 :28
27-Mar-1985 1 3:28:18

ERRDF (83,
if

)

0);

.RET_STATUS then DECODE ();

RETRIES =

else
BLOCKY :

AZT_READY_ERR,

end

VAX-11 Blis 16 vV4,0-579
USER
4 1:(AZT C.CZRCFCIZRCFC3.B16;4

TRUE;

DECODE THE STATUS,

SET RETRIES FLAG

IF ANY

begin

ISSUE AN EX_SUP PROG COMMAND UITH START ADDRESS OF

! DM_26 VECTOR ARRAY AND BYTE COUN
CMD_REF «

,CMD_SLOT;

BUF “DESCRPTR = DM 26;
BYTE_COUNT = 41343;
if EX_SUP_PRG ()

then

beain
ERRDF (84, EXE_SUP_ERR, 0);
if

.RET_STATUS then DECODE ();

RETRIES =

TRUE;

leave BLOCK};

ISSUE AN EXECUTE SUPPLIED COMMAND

REPORT IF FAILED

DECODE STATUS

H ABORT TEST

end;

CMD_REF =

COMMAND REFERENCE NUMBER

! DMCODE STARTING ADDRESS
! BYTE COUNTS VER:C

_CMD_SLOT;

COMMAND REFERENCE

JSSUE SEND DATA COMMAND
IF STATUS BIT INDICATES ERROR
THEN REPORT ERROR

DECODE RETURN STATUS

BUF "DESCRPTR = TUNIT;
BYTE_COUNT = 02;

! DESCRIPTOR ADDRESS
! TOTAL BYTES TO BE TRANSFERRED

if SEND_DATA ()

]

then

begin

ER80F (85, SND_DATA_ERR, 0.;
if

.RET_STATUS then DECODE ();

RETRIES =

TRUE;

leave BLOCK];

end;

ISSUE A REC_DATA COMMAND AND WAIT FOR END PACKET

* T0 GET THE STATUS SENT BY CM CODE AFTER DOING

' HEAD SWITCH TEST.
CMD_REF = .CMD_SLOT;
BUF DESCRPTR = "RCV_ DATA _BUF

COMMAND REFERENCE ¢

SET THE BUFFER AREA TO

[0];

RECEIVE 6 WORDS FROM DM CODE

BYTE_COUNT = 12;
if REC_DATA ()
then

SET BYTE COUNTS = 12

begin

IF FAILURE REPORT ERROR

ERRDF (86, RE_DATA_ERR, 0);
if

.RET_STATUS then DECODE ();

SEND A RECEIVE DATA COMMAND

DECODE STATUS

SEQPO329134
ge

(24)

FR END TEST

ZRCFR3
4938
4939
4940
494)
4942
4943
4944
4945
4946
4947

4948
4349
4950
495)
4952
4953
4954

4955
4956
4957
4958
4959
4960
4961
4962
4963
4964

HEWWWLELLELLULNVNOOOOOOUTLITLIIINIONO

V¢

B¢

V¢

@0 G

®s

v03.0

032767
001407

012746

012746
010600

RETRIES =

VAX-11
USER$1:

000064
000066
000070
000072
000100
000102
000106
00114
000116
000124
000132

135

end;

CHECK DM CODE FLAG FOR SUCCESS.
if .RCV_DATA_BUF
then

IF FAILURE REPORT ERROR

[0) nequ %0'177777'

begin

ERADF (87. MSG_WRITE ERR, 0);

PRINTB (FMT1 6.
PRINTB (FMT17,

"RCV_DATA'BUF (1],

"RCV_DATABUF (3]

PRINTB (FMT20, .RCV_DATA_BUF
RETRIES = TRUE;
end;

IF NOT SUCCESS, REPORT ERROR

REPORT WRITE DATA FAILURE

.RCV_DATA_BUF [2]);
LRCV DATA_BUF (4], .RCV_DATA_BUF

([0]);

t TRACK NUMBER

(5));

! PRINT UNIT,

HEAD AND

'VER:C

end;

if (.RETRIES) then DO_RETRIES ();
if (.NUM_RETRIES eqlu ZERQ) then exitloop;
end;
return;

ENDTST;

000001

000000G

$726:

.SBTTL
BIT

8EQ

MOV
MOV
MOV
TRAP

0000006
000001

“wwn

0000006
0000006 000000G

CMP
CLR
CHP
BLOS

RTS
MOV

000032
0000006
0000006

JSR

$726 TEST SECTION

Oi.SUP.TRACE
1
4DBM32,
- (SP?
SP,RO

17
(SP)e,(SP).
NUM_ RETRIES
ggfl.RETRIES.SUP.RETRIES
PC
032,11P

:S.AZTEC.READY

S¢
55
123
QZT.READY.ERR

000123
0000006
000000

Prge
123

TRUE;

104455

032767
001402
004767
012767
000574
016767
012767
012767

SEQ 0330

leave BLOCK];

104417

022626
005067
026767
101401
000207
012767
004767
006000
103016

P27

99-16 V4.0
TEC. CZRCFC]ZRCFC3 B16;4

0000006

01,,RET.STATUS
44
PC,DECODE
:g(RETRIES

0000006 0000006
0000006 0000006
001472
0000006

S$:

CMD.SLOT,CMD.REF

000001

0000006

000001

0000006

o0M. 26 ,BUF . DESCRPTR
#1472,BYTE.COUNT

4869

SP,s
4871
4873

4875
4878

4881

4883

4885
4878
4893
4894
4895

H10
CZRCFCO RC25 FR END TEST

ZRCFB3
vV03.0
000140

27-Mar-1985 15:27:28
27-Mer-1985 13:28:18

TEST SECTION

004767
006000

JSR

0000006

ROR

8CC

103016
104455

TRAP

000124
0000006
000000
032767
001402
004767
012767
000541
016767
012767
012767
004767
006000
103016
104455
000125

. WORD
. WORD
. WORD

0000006

aTT

0000006

64:

0000006
0000006
0000006

7%:

0000126
0000106
0000066

MOV

94:

MOV
MOV
MOV

JSR

ROR

BCC

TRAP

.WORD
. WORD
. WORD
BIT
BEQ
JSR

10%:

MOV

11¢:

cHp
BEQ

TRAP

. WORD
.WORD
.WORD

MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV

(24)

55
124
EXE.SUP.ERR
0

4900

g%.“ET.STATUS

4502

PC,DECODE
oé.RETRIES
124

4904
4899
4908
4909
4910
4912

CMD.SLOT,CMD.REF

OUNIT,BUF .DESCRPTR
82 ,BYTE.COUNT

8%:

Page 136

4897

8CC

BEQ
JSR

SEQ 0331

PC,EX.SUP.PRG

:8.SEND.DATA

. WORD
.WORD
. WORD

USER#$1:( A ZTEC.CZRCFC)ZRCFC3.B16;4

RO
74

JSR

TRAP

000001
032767
0000006
001402
004767
0000006
000001
012767
0000006
000506
0000006
016767
012767
012767 000014 0000006
004767
0000006
006000
103016
104455
000126
0000006
000000
0000006
032767 000001
001402
0000006
004767
0000006
000001
012767
000453
0000006 177777
026727
001447
104455
000127
0000006
000000
016746
0000046
016746
0000026
012746
0000006
012746
000003

000424
000430
000434

MOV
MOV
MOV

ROR

0000006
000000

010600
104414
016716
016746
016746

BEQ
JSR
MOV

VAX-11 B 1 ig8-16 V4.0-579

S5
125
SND.DATA.ERR

4915

0
01,RET,.STATUS
84
PC,DECODE
#1,RETRIES

4917

4919
4914
4926
4927
4929
4931

124
CMD.SLOT,CMD.REF

ORCV.DATA
BUF ,BUF .DESCRPTR
014,8YTE. COUNT
SS,REC.DATA

114
55
126

4934

RE.DATA.ERR
0
@1,RET.STATUS

4936

104

PC,DECODE
#1,RETRIES

4978
4933
4944

124

RCV.DATA.BUF
,#-1

124
55

4947

127

MSG.WRITE.ERR

0
RCV.DATA.BUF +4,-(SP)
RCV.DATA.BUF «2,-(SP)
0FMT16,-(SP)

#3,-(SP)

SP,RO
14

RCV.DATA.BUF+12,(SP)
RCV.DATA.BUF+10,-(SP)
RCV.DATA.BUF +6,-(SP)

4948

H Sp"
4949

110
ZRCFB3
v03.0

CZRCFCO RC2S FR END TEST
TEST SECTION

000440

012746

000450
000452
000454
000460
000464
000470
000472
000474
000502
000506

010600
104414
016716
012746
012746
010600
104414
012767
062706
032767

000444

000514
000516

000522
000526
000530
000534

012746

001402
004767

005767
001402
000167
000207

: Routine Size:
;:

004767

000004
000006
000010
000012

104466
006000
103773
000207

000000

;: Routine Size:
:

0000006

000004

0000006
0000006
000002
000001
000024
000001

0000006
0000006

12%:

000000G
0000006

13¢;

177276

144

175 words,

Routine Base:

:invocation:

177236

6 words,

Maximum stack depth per

4965

MOV

OFMTL7,-(SP)

MOV
TRAP
MOV
MOV
MOV
MOV
TRAP
MOV
ADD
BIT

SP,RO
14
RCV.DATA ,BUF ,(SP)
OFMT20,-(SP)
02,-(SP)
SP,RO
14
#1,RETRIES
024,5P
#1,RETRIES

MOV

Maximum stack depth per

000000

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

12 words

126::

14:

Routine Bese:

invocation:

2 words

BEQ
JSR

TS7
BEQ
JMP
RTS

04,-(SP)

134
PC,DO0.RETRIES
NUM.RETRIES
14
2
PC

VAX-11 Bliss-16 V4,0-579
USER$1:[AZTEC.CZRCFCJIZRCFC3.B16;4

Page 137
(24)

; SP,»
;

4951

SP,»

:
:
;

4952
4946
4957

;

4959

4837

4963

AC$COOE « 23000

.SBTTL

T26 TEST SECTION

JSR

PC,8$T26

TRAP
ROR
BLO
RTS

66
RO
14
PC

ACS$CODE +« 23536

1<BLF/PAGE>

yFrn

SEQ 0332

bl
CZRCFCO RC2S FR END TEST

4967

4968
4969
4970
4971
4972
4973
4974
4975
4976
4977
4978
4979
4980
498)1
4982
4983
4984
4985
4986
4987
4988
4989
4990
4991
4992
4993
4994
4995
499
4997
4998
4999

5000
5001
5002
5003
5004
5005
5006

5007

5008
5009
5010
5011
5012
5013
5014
5015
5016
5017
5018
5019
5020
5021
€022

27-Mar-1985 15:27:28

TEST SECTION

VANV
E B NVITVIVINIUIUVI S B 5 5 5 5 U4 U O3 G808 G 03 Gl O3 G 0l O G G 08 G O G G O3 O O O Q8 O3 G4 8 G O O U8 U8

We B0 B3 Ve B S0 T VL T VI VT VL VL W B0 S DG B G2 VL Ve Vs CE Vs GE VE V6 VE VT VI G VI VI Ve G9 B G G G0 B0 G2 G0 VS V¢ B Gs VP Vo Se Bs G2 Vs e Ve Wo e o

ZRCFR3
v03.0
4966

VAX-'1 Bliss-16 V4.,0-579

27-Mer-1985 13:28:18

USER$1:(AZTEC.CZRCFC)ZRCFC3.816;4

BGNTST;
VYaeo

TEST

@27

OFFSET

TOLERANCE TEST

!
!
!

DESCRIPTION:
THIS TEST BRINGS RC2S CONTROLLER AND THE UNIT ONLINE AND LOADS

DM PROGRAM DM_27 VECTOR ARRAY INTO CONTROLLER'S MEMORY FOR

EXECUTION BY ISSUING EX_SUP_PROG COMMAND,

!
]

:
;
i
;

THE DM CODE WILL DO AN OFFSET TOLERANCE TEST. A GOOD ODD BLOCK WILL
BE FOUND IN TRACK 829 (DBN TRACK). IT WILL BE READ WITH INCREASING
< AND - OFFSET, UNTIL A HARD ERROR IS FORCED. THE OFFSET VALUE USED
IN THE LAST GOOD READ WILL BE SENT TO HOST PROGRAM.

THIS TEST WILL BE PERFORMED ON TOP SURFACE OF

)

BEING TESTED.

!
!

AR MESSAGE REPORT ON THIS

TEST WILL

THE UNIT

INCLUDE THE LARGEST

USED IN ORDER TO READ THE BLOCK WITHOUT FORCING ERRORS.

!
!

OFFSET

VALUE

‘-

label
BLOCK];
if

.SWP_TRACE then PRINTF

(DBM36);

TEST 27

IF FAILURE REPORT ERROR

NUM_RETRIES = ZERO;
while (.NUM_RETRIES lequ
beain
1IP
= 27;

.SWP_RETRIES) do

! GET AZTEC READY FOR OPERATION
if AZTEC_READY ()

then

begin

ER80F (88, AZT_READY_ERR, 0);

' DECODE THE STATUS,

.RET_STATUS then DECODE ();

RETRIES

else

8LOCK]
[]

TRUE;

IF ANY

SET RETRIES FLAG

end

begin

! ISSUE AN EX_SUP PROG COMMAND WITH START ADDRESS OF
* DM_27 VECTOR ARRAY AND BYTE COUNT.
CMD_REF = ,CMD_SLOT;
BUF "DESCRPTR = DM_27;

! COMMAND REFERENCE NUMBER
' DMCODE STARTING ADDRESS

if EX_SUP_PRG ()
then

¢
'

BYTE_COUNT = 307s2;

' BYTE COUNTS

ISSUE AN EXECUTE SUPPLIED COMMAND
REPORT IF FAILED

SEQ 0333

Page 138
(25)

<10
CZRCFCO RC2S FR END TEST

ZRCFB3
V03.0

TEST SECTION

OOO‘OOMOOO‘O‘MMMWMMOO‘OO‘00‘0‘U\U‘U‘lLflU‘lUlU!LflMMMUlOO'O'OOOOMU'UIU!U'U'U‘U'O‘O‘OO‘O‘OO’

5023
5024
5025
5026
5027

27-Mar-1985 15:5 128
27-Mar-1985 13: 8: 18

VAX-11 Bliss-16 V4.0 579
USER$1: [AZTEC.CZRCFC)ZRCFC3.B16;4

beain
ERRDF (89, EXE_SUP_ERR, 0);
if

.RET_STATUS then DECODE ();

! DECODE STATUS

RETRIES = TRUE;

leave BLOCK];

end;

ABORT TEST

CMD_REF « CMD_SLOT;
BUF DESCRPTR = UNIT;

! COMMAND REFERENCE
! DESCRIPTOR ADDRESS
! TOTAL BYTES TO BE TRANSFERRED

if SEND_DATA ()
then

begin

!'
!
!

! DECODE RETURN STATUS

BYTE_COUNT = 02;

ER&DF (90, SND_DATA_ERR, 0):
.RET_STATUS then DECODE ();

RETRIES

]

ISSUE SEND DATA COMMAND
IF STATUS BIT INDICATES ERROR
THEN REPORT ERROR

TRUE;

leave BLOCK];

end;

ISSUE A REC_DATA COMMAND AND WAIT FOR END PACKET

' 7O GET THE STATUS SENT BY DM CODE AFTER DOING
! HEAD SWITCH TEST.
CMD_REF = .CMD_SLOT;
BUF _DESCRPTR = RCV_DATA_BUF

[0);

BYTE_COUNT = 4;

begin

ERaDF (91, RE_DATA_ERR, 0);
.RET_STATUS then DECODE

RETRIES =

RECEIVE 2 WORDS FROM DM CODE

SET BYTE COUNTS = 4

if REC_DATA ()
then

COMMAND REFERENCE o
SET THE BUFFER AREA T0

();

SEND AR RECEIVE DATA COMMAND

IF FAILURE REPORT ERROR

! DECODE STATUS

TRUE;

leave BLOCK];

end;

CHECK DM CNDT FLAG FOR SUCCESS.
if

.RCV_DATA_BUF

then

bcain
ERRDF (92,
RETRIES =

else
!

end

IF FAILURE REPORT ERROR

(0] nequ %o'104’

MSG_READ_ERR,

TRUE;

0);

IF NOT SUCCESS, REPORT ERROR

! REPORT READ ACCESS FAILURE

begin

OFFSET RECEIVED MULTIPLIED BY 4/10 GIVES o OFFSET

DATA4 =

_RCV_DATA BUF [1)e2/5;

! OFFSET EXPRESSED AS
o

DATA3 = ((.REV_DATA BUF (1]¢2) mod 5)e2;

PRINTB (FMT12,

.DATA4,

.DATA3);

' PRINT OFFSET VALUE

SEQ 0334
[

CZRCFCO RC2S FR END TEST

27-Mar-1985 15:27:28

010146

032767
001407
012746
012746
010600
104417

022626
005067
026767
101402
000167

012767
000575
016767
012767

012767
004767
006000
103016

if (.RETRIES) then DO RETRIES

004767
012767
000542
016767
012767

(25)

();

end;
return;

ENDTST;

000001

0000006

$727:

0000006
000001

000000G
000000G 0000006

000001

000000G 0000006
000000G 0000006
001146
0000006
0000006

MOV
MOV

#0BM36,
- (SP)
e1,-(SP)

géa

CLR
gfgs

NUM. RETRIES
ggfl.RETRIES.SUP.RETRIES

4995
4997

3s:

JMP
MOV
JSR

154
033,11P
PC,AZTEC.READY

4999

cMP

44 .
S$:

TRAP

000000G 0000006
000000G 0000006

7¢:

5002

.WORD
.WORD
.WORD
géa

130
AZT .READY.ERR
0
:%.RET.STATUS

JSR
ggv

PC.DECODE
g%iRETRIES

MOV
MOV
MOV
JSR

CMD,SLOT,CMD
.REF
o0M .27 ,8BUF .DESCRPTR
91146,8YTE.COUNT
PC.EX.SUP.PRG

5005

5007
5009
5002
5017
5018
5019
5021

ROR

TRAP

5024

gga

g%.RET.STATus

5026

JSR
ggv

PC,DECODE
:§;RETRIES

MOV
MOV

CMD.SLOT,CMD.REF
OUNIT
,BUF .DESCRPTR

. WORD
.WORD
.WORD

64:

SP,s

(SP).,(SP).

ROR

8CC

000000(

0000006
000001
000000G

4964
4993

:%.SUP.TRACE

1¢:
24:

8CC

000001

8727 TEST SECTION

R1,-(SP)

SP,RO
17

0000006

0000006
000001
0000.0G

LSBTTL

MOV

MOV
TRAP

000131

032767
001402

Page 140

if (.NUM_RETRIES eaqlu ZERD) then exitloop;

104455

0000006
000000

SEQ 0335

end;

000472
012767 000033 0000006
004767 0000006
006000
103016
104455
000130
0000006

000000
032767
001402
004767

27-Mar-1985 13:28:18

VAX-11 B 1 iss-16 V4,0-579
USER$]:( AZ TEC.CZRCFC)ZRCFC3.816;4

end;

¥
¥
N
R

5080
5081
5082
5083
5084
5085
5086
5087
5088
5089
5090
5091

YV IV,

TEST SECTION

Lk VIV IV R R

®s

®0

ZRCFR3
v03.0

131
EXE.SUP.ERR
0

5028
5023
5032
5033

M10
CZRCFCO RC2S FR END TEST

JRCFAS

27-Mer-198S5 1 5:27: 28
27-Ner-1985 | 3:28:18

TEST SECTION

v03.0

012767

004767
006000

VAX-11 Bli ss-16 V4.0-579
USER$1: (AZ TEC. CZRCFC]ZRCFC3.816;4

02,8YTE.COUNT
gg.SENO.DA1A

000002
0000006
0000006

13016
104455
000132

SEQ 0336
Page

141

(25)
5034
5036

0000006
000000
032767
001402
004767
012767
000507
016767
012767
012767
004767
006000

S5
132
3ND.DATA.ERR

5039

01 ,RET.STATUS

5041

8%:
94

PC,0ECODE
0%RETRIES

CMO.SLOT,CMD., REF
ORCV,DATA BUF ,BUF.DESCRPTR

5043
5038
5050
5051
5053
5055

114
55
133

5058

T
E
. COUN
04 ,8YT
YA
.DA
:g.REC

RE.DATA ERR
0
01 ,RET STATUS

000001
000002

10¢:

000104

11¢:

5060

104
PC,DECODE

¢1,RETRIES

5062
5057
5068

134
A
BUF ,0104
RCV.DAT
124
SS
134

5071

MSG.RERD.ERP

000001

0000006

0000026

124:

01 ,RETRIES

S072

RCV.
.BUF
DATA
.2, -(SP)

5077

134

(5P)

05, -(SP)

000005

PC,.BLSDIV

RO,DATA4
RCV.D
BUFATA
.2,(SP)

0000026

5078

(SP)

PC.BL $MOD
RO,R]
R1
R1,DATA3

DATA3,(SP)

OFMT12,-(SP)

000003
000014
000001

5079

SP,RO
14

0000006

13%:

014,5P
01,RETRIES
14¢

H Spu.
5075
5084

[

000528
000530
000534
000536
000542
000544

CZRCFCO RC2S FR END TEST
TEST SECTION
004767
005767
001402
000167
01260}
000207

i Routine Size:

0000006
0000006

144

177272

15¢;

179 words,

Rout ine Bease:

: Maximum steck depth per .nvocot'on

000000
000000
000004
200006
000010
000012

004767

Maximum steck

5092

177226

9 words

127::
14:

104466
006000
103773
000207

t
; Routine
Size:

27-Mar-198S 15:27:28
27-Mer-1985 13:28:18

JSR

6 words,

)

Routine

invocetion:

1<BLF/7PAGE
>

Bese:

2 words

4.0-579

Z CFC)ZRCFC3.816;4

P‘:37142
o

9¢(25)

PC,D0.RETRIES

157

NUM. RETRIES

5086

MOV
RTS

(SP)«,R1
PC

4964

8EQ
JMP

AC$CODE

LSBTTL
JSR

154
et

23552

127 TEST SECTION
PC,8127

TRAP
ROR

66
RO

RTS

eLo

depth per

VA/-11
USE' §1

)u—

ZRCFAY
v03.0

"'*O

N10

ACSCODE

- 24320

5090

B1ll
ZRCFBS

CZRCFCO RC2S FR END TEST
TEST SECTION

5112
5113
S114

5115
5116
5117
5118
5119
5120
5121
5122
5123
5124
5125

5126
5127
5128

5129
5130
5131
5132

5133
5134
5135
5136
5137
5138

5139
5140
5141
5142
5143
5144
5145
5146
5147
5148
5149

VAX. 11 Blje 9-16 v4.0-579
USER $1: (AZTEC.CZRCFCIZRCFC3.B16:4

27-Mar-1985 13:28:18

BGNTST,
leo

g TEST @28 - AVERAGE ROTATIONAL TIMING TEST
DESCRIPTION:
THIS TEST WILL BRING RC25 CONTROLLER AND THE UNIT ONLINE.
THIS TEST WILL BE PERFORMED FROM THE HOST USING THE MSCP

"READ”

COMMAND.
AN LBN WILL BE SELECTED RANDOMLY.
ONE THOUSAND TWO
BYTE COUNT READS OF THE SAME LBN WILL BE "ERFORMED.
THIS OPERATION
WILL BE TIMED AND THE AVERAGE TIME WILL BE REPORTED.

IF THE OPERATOR HAS SELECTED RETRIES,
[

5106
5107
5108
5109
5110
5111

NNV
A BVTVTVIVIVIVIUVIS 5 5 5 5 5 5 0l (Gl Gl G G UG8 G U3 G 08 G4 G G G G G Gl G G G (8 8 (ol (o e

v03.0

5093
5094
5095
5096
5097
5098
5099
5100
5104
5102
5103
5104
5105

27-Har-1985 15:27:28

THE TEST WILL BE REPEATED.

abel
BLOCK]L;

.SWP_TRACE then PRINTF (DBM37);

TEST 28

NUM_RETRIES = ZERO;
while (.NUM_RETRIES lequ

118= ALL_ONES;

.SWP_RETRIES) do

GET AZTEC READY FOR OPERATION
'f AZTEC_READY ()
then

begin
ERRDF (93,

else
BLOCK] :
[}

AZT_READY_ERR,

0);

.RET_STATUS then DECODE ();

RETRIES
end

' TELL READ_CMD NOT T0O WAIT

! FOR REC_STATUS

TRUE;

FAILURE REPORT ERROR

'
!

DECODE THE STATUS,

SET RETRIES FLAG

IF ANY

begin

' SEEK RANDOM SECTOR AND REPEAT SEEKING THE SAME SECTOR 1000 TIMES.

[]

BYTE_COUNT = 2;

eur _DESCRPTR = DATA1;
FILL

' BYTE COUNTS

! BUFFER DESCRIPTOR

THE COMMUNICATION COMMAND RING SLOTS

WITH READ COMMANDS

P2 = .TICKS;
RANDOM_NUM ();

¢
t

INIT P2 FOR RANDOM NUMBER
GET RANDOM LBN

IN_BOUND = ZERO;

! CLEAR RECEIVE COUNT

CLEAR COMMAND COUNT

LBN_ST = .P3;
OUT BOUND "= ZERO;

SEQ 0338
Page ge 143

(26)

Cll
CZRCFCO RC2S FR END TEST

ZRCFB3

TEST SECTION

NANNNNO R NNNNEOO®OWOO®

IO NN ~NN~N~NNOOOONNUVVIVNUVNUNINUVNGCO
O PO TWU

vV03.0

5150
5151
5152
5153
S154
5155
5156
5157
5158
5159
5160
S161
5162
5163
5164

27-Mar-1985 15:27:28
27-Mer-1985 13:28:18

incru I from O to SND_ALLOCATE

CHBREF « _LBN_ST;

! FILL COMMAND BUFFER WITH
! SEEK COMMANDS (16 SLOTS

1 do

READ CMD ();

OUT_BOUND = .OUT_BOUND « 1;
if GET_CMD_SLOT

VAX-11 ?lu
9-16 _v4.,0-579
USER$1:[AZTEC.CZRCFCIZRCFC3.816:4

ISSUE READ COMMAND

() then exitloop;

end;

g INIT AND START THE CLOCK
CLOCK_INIT ();
TEMP =

_RC2S_ADDR

[RCIP,

! INIT CLOCK VARIABLES
! READ IP FOR CONTROLLER
! TO START POLLING

RC ALL];

while .IN_BOUND lequ 1000 do
begin

! DO SEEK FROM STARTING TRACK

1§ REC_STATUS ()
then

! POLL RECEIVE RING FOR HOST
! OWNERSHIP BIT,
! IF ERROR, REPORT ERROR

TEaP .IN_BOUND;
in

ERRDF (94, MSG_SEEK_ERR,

0);

PRINTB (FMT11, .TEMB, .LBN.ST);
OECODE ();

! DECODE END PACKET STATUS

leave BLOCK];

AND ABORT TEST

GIVE NEXT SEEX COMMAND

RETRIES = TRUE;

else

SAVE RECEIVE COUNT

end

begin

while

.OUT_BOUND lequ 1000 do

REgDJFILL_CMO ()
OUT_BOUND =

.OUT_BOUND +

if GET_CMD_SLOT

if (.OUT_BOUND

AND MAINTAIN A QUEUE OF

() then exitloop;

.IN_BOUND) eqlu 16 then exitloop;

end;

TEMP =

_RC2S_ADDR (RCIP,

end;

! READ IP AND CONTROLLER
! WILL START TO POLL

RC_ALL]);

end;
[]

}

’

STOP THE CLOCK

.CLK_CSR = ZERO;

STOP THE CLOCK

sea 0339

ge 144

% %6

D11
CZRCFCO RC2S FR END TEST

27-Mer-1985 15:27:28

TEST SECTION

TOTAL SEEKS = 1000
DATA4 = _MINUTES#60 « ,SECONDS;
DATA3 = .TICKS#100/.CLK HERTZ;
PRINTB (MSG_ROT_TIME, .DATR4, .DATA3);

(26)

! PRINT MESSAGE 'AVERAGE SEEK TIME'

1f (.RETRIES) then DO_RETRIES ();

if (.NUM_RETRIES eqlu ZERO) then exitloop;
end;
return;

ENDTST;

$728:

000001

0000006

0000006
000001

.SBTTL
MOV

$728 TEST SECTION
91.-(5 )

5091

3%3

ox SWP. TRACE

5114

MOV
MOV

ooensv -(SP)
01,-(SP)

CMP

-($P), -(SP)

MOV
TRAP

SP.RO
17

cMP

;

(SP)s ,(SP)e

SP,s

0000006
000000G 0000006

18:
24:

CLR
grgs

NUM
. RETRIES
ggn.ne1ales.sup.aevnxss

5116
5118

000526
177777
0000006
0000006

34,

JHP
MOV
JSR

15
0-1,TIP
PC,AZTEC.READY

5120
5124

ROR

TRAP
.WORD
"WORD
'WORD

55
135
AZ7.READY.ERR
O

BCC

ggg

0000006

LBN.ST,CMD
. REF
PC,READ
. CMD
ouT
. BOUND
PC,GET.CMD.SLOT

MOV
JSR
INC
JSR

S$ .

PC DECODE
o1 .RETRIES
134
02,BYTE.COUNT
oDATA1,
BUF . DESCRPTR
TICKS,P2
PC, RANDOM
. NUM
P3.LBN.ST
ouT
. BOUNL
gT.eouno

®s

0000006
0000006
0000006

JSR
MOV
JMP
MOV
MOV
MOV
JSR
MOV
CLR
Etg

©e

as;

5129

0000006

o1 RET.STATUS

0000006
000001
000424
000002
0000006
0000006
0000006
0000006
0000006
0000006

0000006

5127

Wwe

000001

103017
104455
000135

0000006
000000
032767
001402
004767
012767
000167
012767
012767
016767
004767
016767
005067
005067
005001
016767
004767
005267
004767
006000

Page 145

! MSEC./SEEK
! 100TH OF MSEC./SEEK

0000006 0000006
0000006
0000006
0000006

64:

ROR

000070
000072
000074
000076
000100
000106
000110
000114
000122
000126
000134
000142
000150
000154
000162
000166
000172
174
000202
000206
000212
000216

SEQ_0340

end;

104417

022626
005067
026767
101402
000167
012767
004767
006000

USER4$1:(AZTEC.CZRCFC])ZRCFC3.816;4

010146
024646
032767
00140~
012746
012746
010600

27-Mar-1985 13:28:18

®s

5207
5208
5209
5210
5211
5212
5213
5214
5215
5216
5217
5218
5219
5220
5221

WL
B LD EANIIVIL

vV03.0

VAX-11 Bliss-16 V4.0-579

®s

ZRCFB3

5131
5124
5139
5140

5144

5145
5146
5147
5148
5150
5152
5153
5154
5156

ZRCFR3

CZRCFCO RC2S FR END TEST

v03.0

27-Mar-1985 15:27:28

TEST SECTION

000220
000222
000224
000230
000232

103404
005201
020127
101761
004767

000017

000242

011667

0000006

000254
000256
000262
000264
000266
000274
000276
000300
000302
000304
000310
000314
000320
000324
000326
000330
000334
000340
000346
000352
000354
000362
000364
000370
000374
000400
000402
000404
000410
000414
000420
000422
000430
000436
000440

101071
004767 0000006
006000
103033
016767
0000006 000000G
104455
000136
0000006
000000
016746
0000006
016746
0000006
012746
0000006
012746
000003
010600
104414
062706
000010
004767
000000G
012767
000001
0000006
162706
000016
000475
026727
0000006 001750
101017
004767
0000006
005267
0000006
004767
000000G
006000
103407
016700
062700
000020
026700
001355
017766
000000G 000002
016667
000002
0000006
000703
005077
000000G

[000450
000454
000460

012746
004767
066700

000074
0000006
0000006

012746
004767
010016

000144
0000006

000236 017716 0000006

000246

8¢:

000444

026727

016746

000464
000470

010067
016716

506
000512
000516
000522
000526

016746
004767

74
000500
00504

010067
016716
016746

0000006

27-Mar-1985 13:28:18

000000G 001750

0000006

000000G
0000006

0000006
0000006

000000G
000000G
0000006

9%:

10$:
11%:

BLO
INC
cMP
BLOS
JSR

74
Rl
R1,017
6
CLOCK.INIT

MOV

(SP),TEMP

MOV
cMP

BHI
JSR
ROR
8CcC
MOV
TRAP
.WORD
.WORD
.WORD
MOV
MOV
MOV
MOV
MOV
TRAP
ADD
JSR
MOV
SuB
BR
cMP
BHI
JSR
INC
JSR
ROR
BLO
MOV
RDD
CHP
BNE
MOV
MOV
BR
CLR

MoV

MOV
JSR
ADD

MoV
MOV

MOV
JSR
MOV

MOV
JSR

MOV
MOV
MOV

VAX-11 Bliss-16 V4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC3.816;4
i
i
;

#74,-(SP)
PC,BL $MUL
SECONDS,
RO

RO,DATA4
TICKS,(SP)
0144, -(SP)
PC,BL $MUL
RO, (SP)
CLK.HERTZ,-(SP)
PC,BL$DIV
RO,DATA3
DATA3,(SP)
DATAR4, -(SP)

(26)

5150
5163

;

5168

;

5171

:
H

5175
5176

;

5177

: RC.REG,*

IN.BOUND, #1750

MINUTES, -(SP)

ge 146

; *,RC.REG

625 ADOR, (SP)
11%
PC,REC.STATUS
RO
94
IN.BOUND, TEMP
S5
136
MSG.SEEK.ERR
O
LBN.ST,-(SP)
TEMP, -(SP)
#FMI11,-(SP)
03,-(SP)
SP,RO
14
¢10,SP
PC,DECODE
01,RETRIES
016, 5P
124
OUT.BOUND, #1750
104
PC,READ.FILL.CMD
OUT.BOUND
PC,GET.CMD.SLOT
RO
104
IN.BOUND,RO
#20,R0
OUT.BOUND,RO
94
IRC25.ADDR,2(SP)
2(SP),TEMP
8¢
aCLK.CSR

1
I,e

SEQ 0341

5164

SP,e

;
;
;

5178
5179
5174

;

5185

;
;
;

5187
5189
5191

;

5193

; *,RC.REG
; RC.REG,*
;
;

5197
5168
5206

;

5209

;

5210

;

5208

F11
CZRCFCO RC2S FR END TEST

ZRCFR3
v03.0

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

012746
012746
010600
104414
062706
032767
001402
004767
005767
001402
000167

022626
012601

0000006
000003
000016
000001

MOV
MOV

MOV

000000G

0000006
0000006

12¢:
13¢;
144

177236

15¢:

000207

: Routine Size:
;:

Maximum stack

000000
000000
000004
000006
000010
000012

004767

;

Meximum steack

5222

JSR
187
BEQ
JMP
CMP
MOV

RTS

SP,RO
14

#16,5P

:1.#51R1€5

44
PC,D0.RETRIES
NUM.RETRIES

154

24
(SP)e,(SP).
(SP)+,R1

USER$1:(AZTEC.CZRCFCJZRCFC3.816:4

SEQ 0342
Page

147

(26)

H Spc‘
5124
5214
5216

5091

195 words,
Routine Base:
AC$CODE « 24334
depth per invocation:
12 words

177166

128::
14:

104466
006000
103773
000207

: Routine Size:

TRAP
ADD
géa

OMSG.
TIME,
ROT.
- (SP)
3, -(SP)

VAX-11 Bliss-16 v4,0-579

LSBTTL

T28 TEST SECTION

JSR

TRAP
ROR

PC,$728
66
RO

RTS

BLO

6 words,
depth per

RC4CODE + 25142
Rout ine Base:
invocation:
2 words

1 <BLF/PAGE>

5220

G1ll
CZRCFCO RC2S FR END TEST

ZRCFR3

TEST SECTION

BB GIGIGILI I

VAX-11 Blis
88-16 V4.0-579
USER$1:(AZ TEC.CZRCFC)ZRCFC3.816;4

27-Mar-1985 13:28:18

]

BGNTST;
teo

TEST €29 -

WRITE PROTECT TEST

DESCRIPTION:

l
'

THIS TEST REQUIRES MANUAL INTERVENTION.
IT WILL BE EXECUTED IF
THE SOF TWARE PARAMETER QUESTIONS DO NOT CAUSE IT TO BE OMITTED.

.
l
.

'
'

THIS TEST BRINGS RC2S CONTROLLER AND THE UNIT ONLINE FIRST.
THE TEST IS DONE FROM THE HOST USING THE MSCP COMMAND "“GET UNIT

'
'

WRITE PROTECT SWITCH FOR THE UNIT IS IN THE OFF POSITION. IT WILL
DO THE GUS FOR THE UNIT TO VERIFY THAT THE CONTROLLER XNOWS IT IS

STATUS" (GUS).

THE TEST WILL ASK THE OPERATOR TO MAKE SURE THE

]

NOT WRITE PROTECTED.

MAKE SURE THE CONTROLLER RECOGNIZES THAT

THE ERROR REPORT FOR THIS TEST WILL CONTAIN THE UNIT NUMBER,

]

THEN THE OPERATOR WILL BE ASKED TO PUT THE

WRITE PROTECT SWITCH IN THE ON POSITION AND A GUS WILL BE DONE TO
AND ACTUAL POSITONS OF

THE UNIT IS WRITE PROTECTED.

THE WRITE PROTECT

SWITCH.

EXPECTED

I
.

i SKIP THIS TEST, IF MANUAL INTERVENTION SWITCH IS CLEARED.
if not
then

.SWP_MANUAL

begin

PRINTF
return;

(DBM39);

end;

.SWP_TRACE then PRINTF (DBM38);

TEST 29

IF FAILURE REPORT ERROR

NUM_RETRIES = ZERO;
while (_.NUM_RETRIES lequ .SWP_RETRIES) do
b¢8|n
!

(IR RO IV TV TV VIV, [V R W

5227

5228
5229
5230
5231
5232
5233
5234
5235
5236
5237
5238
5239
5240
5241
5242
5243
5244
5245

LB 85 53 L LN U G U8 WN G G4 N G G G G G (8 G G G G K O o G O (o O 0 (N (e

v03.0

5223
5224
5225
5226

27-Mar-1985 15:27:28

GET AZTEC READY FOR OPERATION
i: A2TEC_READY ()
then

else
1

begin

en?or (95, AZT_READY_ERR, 0);

DECODE THE STATUS,

SET RETRIES FLAG

.RET_STATUS then DECODE ();

RETRIES
end

TRUE;

begin

DISPLAY MESSAGE

“TURN OFF WRITE PROTECT SWITCH"

THEN ISSUE

ANY

SEQ 0343

ge 148

(27)

H11
CZRCFCO RC25 FR END TEST

ZRCFB3

TEST SECTION

DAl AL AT AL W TN LG TV TR IV, TE IV, [V U T YL BN ENT. 1. 1. Y. PURNPNPUPNT, PUPPUPT. Y. Y. Y. Y. X¥.1 2 vV

orTUINIIWLY

v03.0
B BT B0 B4 B B VL WL VL T B AL W VL 0 QP VF BT G0 WV VO e G Ve B GF T W G0 VT B To S5 V6 Bs B B s Vs G0 Ve G0 V¢ S8 Ve G ©v Vs e wo ®r @0 @0 ®0 00 @0 @

27-Mar-1985 15:27:28

)

27-Mer-1985 13:28:18

VAX-11 Bliss-16 V4.0-579
USER$1:[AZTEC.CZRCFCIZRCFC3.B16:4

GET UNIT STATUS COMMAND AND EXAMINE THE UNIT FLAG.

MANU_SW = ONE;

! MANUAL SWITCH IS SET TO 'YES’

while TRUE do

begin
GMANIL (QST14, MANU_SW,

YES,

0);

DISPLAY MESSAGE TURN OFF WRT

WAITING FOR CR SIGNAL

! PROTECT SWITCH

1f (.MANU_SW) then exitloop;
end;
1]

PROGRAM WAITING FOR GO (CR) SIGNAL

if (.MANU_SW eql YES)
then

begin

CHB_REF = .CMD_SLOT;

! COMMAND REFERENCE NUMBER

if GET_UNIT_STATUS ()
then

!
!

begin

ERNDOF (96, MSG_GUS_ERR, 0);

RETRIES =

else

end

TRUE;

ISSUE A GET UNIT STATUS COMMAND
IF RESPONSE STATUS BIT ERROR, THEN

' GET UNIT STATUS ERROR

begin

RE?_UNIT_FLAG = _RET_UNIT_FLAG and %0'020000';
if .RET_UNIT_FLAG eql UF_WPH
then
begin

!
!

IF WRT PROT.
ERROR

! MASKED OUT OTHER BITS
FLAG SET

ERBDF (97, MSG_COM WPT, 0); ! REPORT ERROR

PRINTB (FMT18,

RETRIES =
end;

TRUE;

.UNIT);

end;

end;
[}

! DISPLAY MESSAGE “TURN ON THE WRITE PROTECT SWITCH" THEN

'
!
]

)

Issgfrnnggt UNIT SATUS COMMAND AND EXAMINE THE RESPONSE
UNIT
FLAGS.

SWITCH2 = ONE;

! SET MANUAL SWITCH

while TRUE do
begin

GHSQIL (QST1S, SWITCHZ2, 1, YES, 0); ! FTSPLAY MESSAGE TURN OFF WRT
'

if (.SWITCHZ2) then exitloop;

+ ROTECT SWITCH

SEQ 0344

Page 149
(27)

I11
CZRCFCO RC2S FR END TEST

ZRCFR3
v03.0

S350
S$351
5352
5353

535S

H
:

S354

5356

5357
5358

5370
5371
5372
5373
5374
5375
5376
5377
5378
5379
5380

000000

000006
006010

’200014

000020
00022
00024
000026
000030
000036

ENENT. 1. 1. Y. ENENEVEURNT. PUPNPERNT. ¥. ¥, ¥. ¥, YV, 1. YV, IV, V. 10,10, 10 [

S349

:
:
H
:

032767
001010
012746
012746
010600
104417
022626
000207
032767
001407

VAX-11 Bliss-16 V4.0 579
USER$1:(AZTEC.CZRCFC]ZRCFC3.B16;4

SEQ 034S
Page 150

27)

end;

' PROGRAM WAITING FOR GO (CR) SIGNAL
if (.SWITCHZ eql YES)
then

begin
CMD_REF =

! WAITING FOR CR SIGNAL

_CMD_SLOT;

! COMMAND REFERENCE NUMBER

if GET_UNIT_STATUS ()

then

! ISSUE A GET UNIT STATUS COMMAND
! IF RESPONSE STATUS BIT ERROR, THEN

begin

ER86F (98, MSG_GUS_ERR, 0);

RETRIES =

else

end

TRUE;

beg.n

RET_UNIT_FLAG =

! GET UNIT STATS ERROR

.RET_UNIT_FLAG and so'020000';

.RET_UNIT_FLAG neq UF_WPH

then

begin

! IF WRT PROT.
! ERROR

MASKED QUT OTHER BITS

FLAG CLEAR

ER 6F (99, MSG_COM_WPT, 0); ! REPORT ERROR

PRINTB (FMT19, LUNIT);
RETRIES = TRUE;
end;

end;

R _JV IV, [ Y

5348

S347

5337
5338
5339
5340
5341
5342
5343
S344
5345
5346

TEST SECTION

Ll L IO LV R R

:
:
H
H
:
H
H
H
H
:

27-Mer-1985 15:27:28
27-Mar-1985 13:28:18

end;
end;

if (.RETRIES) then DO_RETRIES ();

if (.NUM_RETRIES eqlu ZERO) then exitloop;
end;
return;

ENDTST;

000001

000000G

$129:

0000006
000001

.SBTTL
BIT
BNE

MOV
MOV
MOV
TRAP

cMP

000001

0000006

14:

RTS

BIT
BEQ

$729 TEST SECTION
:%.SUP.HANUAL

;

5251

o0BM39, -(5P)

5254

SP,RO

17
(SP)+,(SP).

#1,SWP. TRACE

;

SP,
s
5255
5253
5258

J11
CZRCFCO RC2S FR END TEST

ZRCFA3

TEST CECTION

v03.0

000044

27-Mar-1985 15:27:28
27-Mer-1985 13:28:18

012746
012746
010600

104417
022626
005067
026767
101401
000207
012767
004767

006000

0000005
000001

oDBM38,

000137
0000006

000000

I000266

000270
000272
000274
00300
000304
000310
00312
000314
000322

000001
032767
0000006
001402
0000006
004767
012767
000001
0000006
000560
012767
000001
0000006
104443
000404
0000006
000139
0000006
000001
032767 000001
0000006
001766
026727
0000006 000001
001047
016767
0000006 0000006
0000006
004767
006000
103010

012767
000430
042767
026727

001021

000001

104455

000141
0000006
000000
016746
012746
012746
010600
104414
012767
062706

000001
000006

0000006

pc Az1sc READY

5264
5267

6$
55
137
SZT.READY.ERR

5270

01 ,RET.STATUS

5272

5274
5267
5282
5286

124

01 ,MANU.
SW
43

404
MANU. SW

130
QST14
1

01 ,MANU,
SW
7%
gANU.SH.Ol
$

5289
5297

CMD.SLOT,CMD.REF

8s%:
TRAP
.WORD

0000006
0000006
000002

(27)

5260
5262

PC,DECODE
¢1,RETRIES

0000006

157777 0000006
0000006 020000

Page 151

SP,«

104455

000140
0000006
000000

;

PC
035,71

000035
000000G
0000006

103016
104455

000210
000216
000222
000224
000226
000230
000232
000234
000236
000244
000246
000254
000262
000264

USER$1:[AZTEC.CZRCFCJZRCFC3. B16;4

SEQ 0346

-(SP)

SP.RO
17
(SP)e,(SP)e
NUM.RETRIES
Qgfl.RETRIES.SuP.RETRIES

0000006
0000006 0000006

VAX-11 Bliss-16 V4,0-579

.WORD
MOV
MOV
MOV
HOV
TRAP
MOV
ADD

SS.GET.UNIT.STATUS

5300
5302

8¢
55
140
gSG.GUS.ERR

5305

01,RETRIES
94
¢-20001,RET
UNIT FLAG
ggT.UNIT.FLAG.02000O

5306
5302
5310
5312

55
141

531S

MSG.COM.
WPT

UNIT, -(SP)

5316

OFMT18,-(SP)

02,-(SP)

SP,RO
14

¢1,RETRIES

i SP,»
3317
5314

I<11
CZRCFCO RC2S FR END TEST

ZRCFB3
vV03.0

27-Mar-1985 15:27:28
27-Mar-1985 13:28:18

TEST SECTION

012767

104443

000001

0000006

9¢:
104

VAX-11 Bliss-16 V4.0-579

USER$1:(AZTEC.CZRCFC)ZRCFC3.B816;:4

SEQ 0347

Page 152

(27)

01,SWITCHZ
43
404

;

5329
5333

01,SWITCHZ

5336

SWITCH?
130
?STIS

000001

0000006

104
SgITCHZ.Ol
124
CMD.SLOT,CMD.REF

0000006 000001
000000G 0000006
0000006

5344

SS.GET.UNIT.STATUS

5347
5349

11
SS

5352

142

MSG.GUS.ERR

000001

0000006

157777

0000006

000000G 020200

01,RETRIES

114:

0000006
0000006
000002
000001
000006
000001
0000006
0000006

177326

000534

5353

124
0-20001,RET,UNIT
FLAG
RET.UNIT.FLAG, 820000
124
S5
143
gSG.COH.UPT

5357
5359

5362

UNIT, -(SP)

5363

0FMT19, -(SP)

MOV
TRAP

0000006
0000006

MOV
ADD

12%:

811
BEQ

187
BEQ
JMP
RS

JSR

e2,-(SP)
SP,RO
14

01, (ETRIES
06 )5P

8. ,RETRIES
13

i SP,s
5364
5361
5373

PC,D0.RETRIES

NUM_RETRIES
144
3

5375
5221

AC$CODE . 25156
175 words,
Routine Base:
: Routine Size:
S5 words
; Maximum stock depth per invocetion:

000C00
000000

000006
JOOOOXO
000012

004767

104466
006000

103773

000207

177236

T129::
14:

.SBTTL
JSR

129 TEST SECTION

PC,$729

TRAP
ROR

RTS

14
PC

8LO

5379

ZRCFR3

CZRCFCO RC2S FR END TEST

: Routine Size:

6 words,

v03.0

27-Mar-1985 15:27:28

TEST SECTION

: Maximum stack depth per

L11

5381

5382

5383

end

eludom

27-Mar-1985 13:28:18

Routine Base:

invocetion:

2 words

VAX-11 Bliess-16 V4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC3.B16:4

ACS$CODE « 25714

0TS external references
.GLOBL
.GLOBL

$SAVE4, $SAVE3, $SAVEZ2, BL$SHF
BL$DIV, BL$MOD, BLS$MUL

PSECT SUMMARY

;
H
H

Psect Neme

Words

$OWN¢
AC$CODE

Attributes

81
S612

RW,
RO,

DO
I

,
,

LC.,
LCL,

REL,
REL,

CON
CON

Library Stetistics

PP Symbols :

File

USERS1:(AZTEC.CZRCFCJAZTECO.L16;2

Totel

Loaded

Percent

-----

Pages

Processing

485

238

00:00.2

COMMAND QUALIFIERS

BLISS/PDP11/L1IST ZRCFC3.B16/7EN:NOEIS
Size:
5612 code + 8] datas words
Run Time:
05:18.2
Elepsed Time:
05:31.4
Lines/CPU Min:
1015
Lexemes/CPU-Min:
8270
Memory
Used:
333 pages
Comp' lat ‘'on Complete

Maepped

Time

SEQ

0348

Page 153
(27)

M11
ZRCFR4

27-Mer-1985 15:33:05
11-Jen-1985 08:19:20

VAX-1]1 Bliss-16 V4,0-579
USER$1:[AZTEC.CZRCFC)ZRCFC4.816;3

MODULE ZRCFBA (wTITLE 'CZRCFCO RC2S FR END TEST'
IDENT = 'V03.0',
gDDRESSING_HODE (RELATIVE)

BEGIN
_KEY>
' <BLF/LOWERCASE

‘AZTECO';

AZTEC LIBRARY

require

'BLSMAC.REQ';

DIAGNOSTIC

usbttl

DM PROGRAM'

XY XY BY ¥T ¥ Yy Yy ¥y

librery

THIS MODULE CONTAINS DM CODE FOR SOME OF

AS GLOBAL DATA.

SUPERVISR LIBRARY

THE TESTS

THE HOST PROGRAM WILL DOWN LINE LOAD

THESE TESTS IN AZTEC CONTROLLER'S MEMORY FOR EXECUTION.
THE DM CODE WAS FIRST ASSEMBLED AND LINKED UNDER RT
AND THEN MADE AS VECTOR ARRAYS BY USING DMCONV,EXE

}gé?SNODULE IS A COLLECTION OF ARRAYS FOR SPECIFIC

(L X

p“uppg—p“.‘“w.‘ppppppppu.‘“oooo

CZRCFCO RC2S FR END TEST

1 <«BLF/PAGE>

SEQ 0349

Page

(1)

r—

N1l
ZRCFR4

CZRCFCO RC2S FR END TEST

v03.0

:
:
:

1516
1517
1518

DM PROGRAM

1
1
1

psec t

———
R ——a
—
——

27-Mer-1985 15:33:05

11-Jen-198S 08:19:20

global = DM$CODE(nowrite, noexecute, globel, concetenste);

VAX- 11 8 1 i9s-16 V4.0 579
USER $1: ( A ZTEC.CZRCFC)ZRCFC4.816;3

SEQ 0350
Page

l
(2)

Bl2
CZRCFCO RC2S FR END TEST
OM COOE DOWN LINE LOAD TEST

B WO
IO
-0

Mmoo
oo
o
o
)

sebttl

[y VB

0-0b-'0-.MO-GO-HO-‘O-‘H””FHHHHHHHM.‘O—'PHF‘MHO‘”HHH.—‘D—‘MF”HHHD‘D‘H.‘.—‘HHF‘HMPFMPHD‘

Qam...‘.loloc.!.olo.O000!..'0...'...0...0.0.i...u.o...c.o.-.o...o.nlo.o.o.o“ooca.l.o.l..t-.o.n“fl.o.aococ.-oau

ZRCFB4
v03.0

27-Mer-1985 15:33:05
11-Jon-1985 08:19:20

'OM COOE DOWN LINE LOAD TEST'

: vector (93, word) preset
t (
THIS IS THE DM PROGRAM BYTE COUNT.
%o’ 000270",
%o’ 000000".
%o’ 000000"|
* 000000
,

so’' 042524 |
%o’ 052123,
%o’ 034460
,
%o’ 00000C" |
%o’ 126411|
%o’ 000000"

THIS IS THE DM OVERLAY BYTE COUNT.

NEXT 3 WORDS = PROGRAM NAME (ASCII)

PROGRAM NAME IS

'TESTO09'

THIS IS THE PROGRAM VERSION
UPPER BYTE=TIME OUT VAL. LOWER = FLAGS

12,
DM CODE STARTS HERE

so' 060023,
so'103207',

%o'177740°,

so’' 115007,
%o’ 012756,
so’' 003003’ ,
so' 114000,
so' 003052 ,

so’' 104307,

so’' 003032,
so’' 104301,
so' 003033,
so' 104302,
so’' 003034,

so‘ 104203,
so' 003052’ ,

so' 060020,
so'103207',
so’' 177740’ ,

so’' 115007,
so' 013007,
so’' 115400,
so’' 003C37’,

%o’ 1063C0’,

[52]

so' 003035,
so’' 003037,
so'032756°
,
so’' 104200°,
so' 000106,

VAX-11 8 lie ®-16 V4.0-579
AZ7
USER#$11:(AZ
C CZRCFC)ZRCFC4.816;3

SEQ 0351

Page

(3)

ZRCFR4

CZRCFCO RC2S FR END TEST

v03.0

;1576
;1577

;1578
:
1579

;1580
;1581
:
1582

DM CODE DOWN LINE LOAD TEST

1
1

53]
[54]

=
=

%0'003040',
wo’'003024,

1
1
1

[57]
58]
[59]

=
=
=

%o'104201',
wo'125252',
%o'104302',

1
1

[SS]
156]

=
=

%o’'104207',
wo0'003052',

;1583
:
1584
:
1585

1
1
1

[60]
161]
(62]

=
=
=

%0'003034,
%o'106271',
%o'053003,

;1587
;1588

1
1

[64]
[65]

=
=

%0'053015",
%o0'104200,

:
1590
;1591
;1592

1
1
1

;1586

1589

:
1593
:
1594
;1595
;159
;1597
;1598
;1599
:
1600

:
1601
;1602
:
1603
:
1604
;1605
;1606
;1607

:
1608
;1609

[66]

72]
(73]
78]

=
=
=
=
-

%0'104201°,
%o’
'
%o0'060022'
.
%0'060010'
.
%0' 000000’ ,

78]
[79]
(80]
181]
(82]
(83]
[84)

=
=
=
=
=
=
=

[70]

1
1
1

[75]
[76]
77]

1
1
1
1
1
1
1

1
1

1
1
1
1

;1616

1
1

%0'117402',
%o'000104

[71]

1
1
1

=
=

[67]
68]
[69]

1610
:
;1611
;1612
;1613

;1614
;1615

[63]

85]
(86]

87]
[88]
[89]
[90]

[91]
[92]

=
=
=

%0'003040',
%0'104207',
%0'003040'
.

=
=
=

%0’'000000".
%o’ 000000.
%0'000012'.

=
*

o'000000"
.
so'000000"
.

=
=
=
=

=
=

%o’ 000000',
%0'000000".
s%o’000000'
.
%o'000000".
%0'000000°,
%0'000000',
%0’'000000".

%o'000000".
%o’'000000".
s0’'000000".
%o’ 000000".

wo'144423',
%0'000000'
);

Cle
27-Mar-1985 15:33:05

11-Jan-1985 08:19:20

VAX-11 Bliss-16 V4.0-579

USER$1:(AZTEC.CZRCFCIZRCFCA.B16;3

3E0,05e2

(3)

D12
RCFCO
CZRC
FCO RC2S RC2S FR END TEST
NONEXISTENT MEMORY TEST

so' 000000,
so’' 042524,

so' 052123,

%o'030061°,

word) preset (
! THIS IS THE DM PROGRAM BYTE COUNT.

THIS IS THE PROGRAM VERSION
UPPER BYTE=TIME OUT VAL. LOWER = FLAGS

%o’ 077777,

Io:lO‘ZOf:.

so’' 104203,

%o’ 003500’
,
so’' 060021’ ,
so’' 103207,
so’' 177740’ ,

so' 104070’ ,

so’' 002765’ ,
so’' 104207,

o' 002765’ ,

so' 000000’ ,

so' 000000’ ,
so’' 000000’ ,
so' 000000’ ,
so' 000000,
so’' 000000,
so’' 000000,

THIS IS THE OM OVERLAY BYTE COUNT,

! NEXT 3 WORDS = PROGRAM NAME (ASCII)
! PROGRAM NAME IS 'TEST1O’

%o'126411'

8
g

Fonn

vector (S8,
Io 000162,

(- ENT. JU. P YV 1,V | ok « [ S W W

ul.llIlI‘lI'..III..I..I.II...II..III.I..'ll...ll.l.ll

)

global
OM_10 :

be e 12 O OB ~J PPN B IO = O

27-Mar-198S 1 5:33:05
11-Jen-1985 08:
8:19:20

‘'NONEXISTENT MEMORY TEST’

ssbttl

o et it e Pt o

sP P
e Pt b Pt s P (s P
s ot e e P (o P
P i P Pt o Pt o P (it i P

1617
1618
1619
1620

50 08 1 00 5t et et D (ot Bt (o i Bt i P P ot ot B Bt (e B Bt (s o o

B S5 00 00 A0 B DS VL BT VS WV VP GE V0 AL S O BL TE T B2 TP V0 G0 V6 Ve B0 Vs VI VI O V0 V6 GF Vs G B8 B0 VO @0 V0 B0 Vo V6 G0 G0 Vs G0 S¢ G¢ o G¢ We e s e -

v03.0

~NN)N PO
o
A WIN

ZRCFB4

DM CODE STARTS HERE

'VER:C

VAX-11 8
8-16 V4,0-579
lis C.CZRCFCIZRC
AZTE
FCA.B16 ;3
USER$1:(AZ

SEQ 0353
Page

S
(4)

ZRCFBA

CZRCFCO RC2S FR END TEST

v03.0
:
3
H

:
H
H

1674
1675
1676
1677

1678
1679

NONEXISTENT MEMORY TEST
1
1
1

1}
1
1

S3
5S4
5SS

56
(57

=
=
=
=
=

#%0'000000’,
%o'000000',
#o0'000000’',

%0'030037',
#o'000000');

27-Mar-1985 15:33:05

11-Jan-1985 08:19:20

VAX-11 Bliess-16 V4,0-579

USER$1:(AZTEC.CZRCFC)ZRCFC4.B16;3

SEQ 0354

ge (48)

F12
ZRCFB4

CZRCFCO RC2S FR END TEST
BUS ADDRESSING/DATA TEST A

v03.0

1706
1707
1708

1709
1710

1711
17112
1713
1714
17115
1716
17117
1718
1719
1720
1721
1722
1723
1724
1725
1726
1727

1728
1729
1730
1731
1732
1733
1734
1735
1736

it (i s s it i P P Pt
B o
s s s s (o
i P Pt o
s i P P P

1705

ot o e o o

1704

b P P

1701
1702
1703

8 B P o

1698
1699
1700

(e e P B (i b o

1693
1694
1695
1696
1697

ssbttl

ot B (e P et o o P (s o

1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692

'BUS ADDRESSING/DATA TEST

global
~DM_11
[0
=
[
=
[2
=
3
=
4

THIS IS THE DM OVERLAY BYTE COUNT.

#%0'042524',

NEXT 3 WORDS

%0'000000',

THIS IS THE PROGRAM VERSION

=
-

%o' 000000’ ,
%0,000000',

'81

%0'000306',
%0'000000',
%0'000000',
%o'000000',
%0'052123',
%0'030461',

%0'126411',

1251
[12]

15]

- %o’ 000000"

[17]
[18
19]

=
=
=

%0'003061',
%0'104207",
%0'003040°,

[21]

s0'000003',

[13]

16]
[20]

%0'104206',

=
=

[25]

[27]

(26]
28]
[29]
30]

%0'104201',

%0'060023,
#0'103207',
s#o0'177740°,

%0'115007',

%0'012754°,

%0'104200',

%0'003023',

+
=
=

%0'000001’,
%0'003043',
%o0’'104300',
%0'003040',
%0°'003044°,
%0'104304°,
s%0'003042',
so'114000',
%0'003046',
%0'104307',
%o’ 003040’
%0'104301',

43]
[44]
[45]
[46]

=
=
=
=

#0'003043',
s®o’'104203',
#0'003044",
%0'060021',

%0'177740°,

[31]
32]
[33]
34]
[35]
36]
[37]

[38]
[39)
[40)

[41]
[42)

[47]

[ S0
51
(S2]

=
=

=
=
=
=
=
=
=

=
=

=
=
=

= PROGRAM NAME (ASCII)

! PROGRAM NAME IS ‘TEST11'

! UPPER BYTE=TIME OUT VAL. LOWER = FLAGS

000000 ,

%0'000000"

IS THE OM PROGRAM BYTE COUNT.

#0'000000',

[22])
23]
[28)

preset (

THIS

=
*

19
,ig‘

: vector [100, ,word]

[S
[6
17

27-Mer-1985 15:33:05
11-Jen-1985 08:19:20

%0'003041'
s%o’'104302',

#0'103207',

%0'115007',

%0'013012',
%0'115400',
%0'003046',

! DM CODE STARTS HERE

VAX-11 Bliss-16 V4.0-579
USER$1:[AZTEC.CZRCFC)ZRCFC4.B16;3

SEQ 0355
Page

(5>

Gle2
CZRCFCO RC2S FR END TEST
BUS ADDRESSING/DATA TEST A

1774
1775
1776
1777
1778

1779

1780
1781
1782
1783
1784

s s e o Pt P P P i s (e (o (i Pt e s P it i P b (e o o i
et 0 5 Dt P Bt ot (8 et P ot o (i e Pt P it Pt ot P (e P

¥,]

1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747

[

®s @8 W0 G4 VT VS G0 B Bt BT VL G0 O G0 VWS B @5 99 S8 B8 W5 B4 G0 G0 W G0 G2 04 G0 @) 00 VP V¢ B¢ O G0 GF G0 G6 G0 @0 G0 ©¢ @0 S0 @ 90 S

ZRCFB4
v03.0

[S3]
[54]

=
=

55}
156]

=
=

58|
59]
60]
(61 ]
162]
163]
(64 ]
165]
[66)

=
=
=
=
+
=
=
=
=

[57]

167]

%0'106200°,
%0'000012 .

%0'003046'
.
%0'032766'
.

%o'003023",

%0'117404'
.
%0'013027°.
%o'105200',
o' 000002
%0'003040'
.
%0'104300,
%0'003040".
%0'003044
.
%o'002764,

%0'104200'.

(68]
169
[70]

=
=
=

%0’'000106"
.
%0'003045'.
%0'003032'
.

[ 72|
(73]
[ 74
(7S]
[76]
[77]
78]
[79]

=
=
=
=
=
s
=
=

%o’ 000104 .
%0'003045' .
%o'104207'
.
%o'003045',
%0'104201'.
%o’ 00000]" .
%0'060022'
.
%o'060010°
.

[ 71]

[80)
r81,

=
:

85 ]

,ag,
84]

=
s
=

[90]

91]
[92]
93]
[94]
[95 ]

[96)
[97]

(98]
[99]

%o'000000',
‘0.000000'.

= %o’ 000000’.
- %o'000000".

[ 86 ]
187
88 ]
29
89

%0'104200'.

%o'000000".

%o' 000000’ .
%o’ 000000 .
%0000000
.
'
.

%o’ 000000’
;

=
=
=
=
=

s0'000000"
%0'000000",
%o’ 000000' ,
so'000000'
,
%o’000000"
,

=
=

%o0'000000
,

%o'000000"
,
%0'000000" .

%0’'056247'
.
%o'000000);
’

27-Mar-1985S 15:33:05
11-Jen-1985 08:19:20

VAX-11 Bliss-16 V4.0-579

USER$1:(AZTEC.CZRCFCJZRCFC4.816;3

SEQ 0356
Page

8
(5)

H12
ZRCFCO RC25 FR END TEST

ZRCFR4

505 AGDRESSING/DATA TEST 8
bt i s Bt Pt it e P Pt Pt
e ot o Pt P o P P P Pt o P
s Bt s (o 00 s o P Pt o o e et (ot P et P oo o

1796
1797
1798
1799
1800

s et Pt i (o

1795

ssbttl

P $m Bt et e P o o e P

WS 90 8L B W0 BT VL G0 VO W VT VT VL VS VL BT VD Ve G5 TS G V0 V6 P G0 V0 C0 G CE V0 WL VI VO VI VI GO VI G0 B9 G5 G0 O G0 G0 W2 VF V4 G0 Go 00 Ve G» Vs Vs Gs G0 W

v03.0

1785
1786
1787
1788
1789
1790
1791
1792
1793
1794

27-Mar-1985 15:33:05

[1-Jan-1983 08:19:20

‘'BUS ADDRESSING/DATA TEST B’

global
(0
(1

DM_12 : vector (202, word)
S
=

no 000622". ' 1"ThTs
%o’ 000000

%o'000000',

(9]

! THIS IS THE DM OVERLAY BYTE COUNT,

%0'042524',

NEXT 3 WORDy = PROGRAM NAME (ASCII)

THIS IS THE PROGRAM VERSION

#0'052123',

%0'031061°,

#0'000000',

%o'000000',

%0'177411',

=
=
=
=
=
=
=

%0'000000',
%0'000000',
%0'000000',
%0'000000',
o’ 000000' ,
s%o'000000',
%0'104206',

19]
[20]
[21]

=
=
=

%0'000000',
w0’ 000000,
#0'000000',

so'000000',

22]
23]
[24]
[25]
[26]

[27]

=
=

=
=
=
=
=

28]
[29]
(30]
[31]
[32]
33])
[34])

=
=
=
=
=
=
=

36]
[37]
[38]
[39]

=
=
=
=

(35]

#0'002767',
%0'003004',

%0'000000",
%0’'000000',
%0'000000",
%0’000000",
o' 000000,

so’'000000',
o' 000000',
%o’ 000000’
,
%0’ 000000’
%0'000000',
#0’'000000",
s0'000000',
%0'000000',
%0’ 000000’
,
%0’'000000",
so'000000',
%0’'000000",

[40]
(41]
(42]

=
=
=

48]
[45]

=
=

%0'000106",
%0’'000000",

[47]

%0'000000",

[50]
[S1]
(52]

=
=
=

[43]
46]

(48]
[49]

=
=

(

%0'000000',

[10]
[11]
[12]
[13]
[18]
[15]
(16]

[17]
18]

preset

SSCTHE DM PROGRAM BYTE COUNT.

%0’ 000000,
%0’'000000’,
%0’ 000000,

%0’000104',
%0'000000',

%0’'000000",
%0'000000",
%o’ 000000’ ,
%0'000000",
%0'023016',

! PROGRAM NAME IS 'TEST12'

! UPPER BYTE=TIME OUT VAL.

! DM CODE STARTS HERE

LOWER = FLAGS

VAX-11 Bliss-16 V4.0-579

USER#1:(AZTEC.CZRCFCIZRCFCA.B16;3

SEQ 0357

Page

(6)

112

R
R
E
N

Io'103207'

o' 177740’ ,
io‘115007'.
%o'013030',
%o’ 003203,

* 000000’
,
%o’ 104300’,
so' 002770,

so’' 104207,

%o'177777',

%o’ 107307',
%o’ 002777,
so’' 104070’ ,

so’' 003002,
so’' 023063’ ,
so’ 105200°,

62
k631
:6‘1
t651
h“t

t6°1
161,

ts71
:581
,591

%o’ 023031°,
%o’ 023210,
%o’ 023120,
%o'023126°,
%o’ 023210',
%0'023120',
%o’ 023155,
so’' 023210,
so' 060010,
so' 104207,
%o’ 002770,

[ 56 )

%o’ 002777,

r551

[ 54

s e (s P o it P
e P P P P P
s o i P Pt P
i B i o P o ot P e o e P P P o e e e i P

1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
1855
1856
1857
1858

00 0 b 1t (o e P P (s Pt s i P P P Pt P P

®S 89 03 B BT TS W B ©E 0 WI VT VE VS B VL BT VL B0 VS Q¢ VO B0 G0 ©F VO Be VI VP Ve G0 G0 V¢ VE VS V0 OF VO Vs G0 Vs V¢ VP G0 Vo OF V6 GO G G VO Ve Gs Go S8 G0 O

v03.0

)

CZRCFCO RC25 FR END TEST
BUS ADDRESSING/DATA TEST B

ZRCFR4

so’'104301°,
o’ 003000°,
so’' 104202° ,
so’' 000001° ,
%0’ 104203,

27-Mar-1985 15:33:05
11-Jen-1985 08:19:20

VAX-1118 lis 1 V4.,0-579
AZT
CZRCFCIZRCFC4.816;3
USER$11:(AZ

SEQ 0358
Page

(6)

J12

8 50 58 0t i e 1 Pt 1 e o Bt o Pt D e P B Pt P (i P Pt (s e P (s o e o (o it P D

b P B e e ot i s P P B P P o P Pt - P Pt s s P

CZRCFCO RC2S FR END TEST
BUS ADDRESSING/DATA TEST B

[

WS @3 BT B3 S0 B B W B ST VE Ve B0 WO O B VT G V0 VS VS Ve V¢ W W0 B0 G0 G2 ©F G0 V0 T G0 G0 G0 G0 G B G¢ ©0 OO0 Ve B0 Ge G¢ O W9 G0 ©0 90 OO0 @F 0¢ ©F G0 Gr Ve

ZRCFR4
v03.0

[110]
[111]
[112]
113]
114]

%0'003002',

%0'060021',
%0'103207',
%0'177740°,
%0'115007,
so'013113,
%0'115400',
%0'003003",
#0'106200',

[120)
121]
122]
[123]
[124])
[125]
126)
,127{
[128]
[129]

=
=
=
=
=
=
=
.
=
=

%0'003003",
%0'033067',
%0'003203",
$0'104263",
#0'104262°,
#0'104261",
%o'104267',
,
,
%0'104207',
%0'002775',

[132]

%0'060023',

[134]
[135]
[136]
[137]
138]

=
=
=
=
=

%0’104300',
w%0’'002770°,
#%0'002777',
#o'104300',
%0'002771',

[140]

#0'104301°,

[115]
[116]
[117]

[118]

[119]

[133]

[139]

[141]
142]

[143)

[144]
145]
[146)

=
=
=
=

=
=
=

s0'003000°,

=
=
=

%0’ 003002,
®0'023063"
.
%0'105200',

152]

154]
[155]
156]

=
=
=

157]

so’'002772,
%o0’'104200°,

=
=
=
=

[153]

=
=

[147]
(148)
[149]
[150]

[151]

%0’ 000012",

#0'177777°,

%0’ 000002"
,
$0'002777',
o’'115000',
®0'002777,

s0'053152',

s®o’'115400°,

#0'003000',

%0'117401',
®o'053141',
#%0’'000000°,

%0’'104300,

158]
159]
[160]
(161)
[162)

=
=
=
=
=

s0'002770',
0002777,
so'104300',
%0'002771',
%0'003000',

164]

w0'002772',

[163]

165)
(166]

=
=

wo'104301',
s0'114000',
%0'003002",

27-Mar-1985 15:33:05
11-Jen-198%5 08:19:20

VAX-1 18 )\ iss-16 V4.0-579
USER$ 1:( A ZTEC.CZRCFC)ZRCFC4.B16;3

SEQ 0359
Page

(6 )

K12

ZRCFR4

CZRCFCO RC2S FR END TEST

v03.0

BUS ADDRESSING/DATA TEST B

;1957 11
;1958
1

167])

%0'023063',

;1961

1
1

:1683
[169]
170]
[171]

[172])

=
=

%0'002777°.
%o'115000°
.

;1956

;1959
;1960

1% 1

;1964

;1965

1
1

Pod%er 1

;1968

;1969
i
1970
;1971
;1972
;1973

1
1
1
1
1}

;1975
;1976
;1977

1
1
1

;1974

:
1978
;1979
:
1980

;1982
:
1983

1
1
1
1
1
1

;1988
:

;1981

;1989

1330

[176]

so'117401°,

[179]

%0'104300°,

%0'003000',

« %or000000:!

180)
[181)
[182]
183]
184]

=
=
=
=
=

%0'002774',
%0'002776'.
%0'023215',
%0'060010'.
%o0'104300°,

186]
[187)
[188]

=
=

%0'002776'
.
so’023215°,
%o’ 000000".

[185]

189)
[190)]
[191)

192]

=
=
=

%0'002773",

wo’'104207'
.
%0'002776'.
%o0'104201",

%0'000001
',

193]
194]

=+
=

199]

= %o’ 000000".

[201]

1o 1

;1993
;1908

%0'002777°,

- weriisace-:

(178]

1
1

200)

11-Jon-1985 08:19:20

= %o’
#%0'105200',
=
000002' .

[i7a]
[175]

27-Mar-1985 15:33:05

%0'060022°.
#0'103207°,

%o'165572',

%0°'000000');

i THE FOLLOWING & BLOCK VECTORS WITH DM_13,DM_19,0M_26,0M_27
{ WERE APPENDED IN VERSION BO.

VAX-11 Bliss-16 V4.0-579

USER#1:([AZTEC.CZRCFCIZRCFC4.B16;3

*Conse’ 12
(6)

L12
CZRCFCO RC2S FR END TEST
BLOCK TRANSFER TEST

ZRCFR4
1996
1997

MHN.‘MHMH.‘MM”MHNMMHMHHD‘M.—‘.—‘HHF‘.—‘.—‘HMMMPH.—‘HHPP&‘F‘"NP”F‘HMMHMH“D‘D—‘

.uut-...n.-...-.'.c.o.O.-.o.!”.n.l!-.o...c.-.olnlo.o.u.o.c.o-o.o.-.....-.'.o00.-...o'..o.-.t.o.n.o.o.n.o.u.o.-c-

v03.0

ssbttl

27-Mar-1985 15:33:05

11-Jen-1985 08:19-20

‘BLOCK TRANSFER TEST'

lobal

[0
[1

(S
6

DM_13 : vector [105, word) preset (
*
=

%0'000320',
%o'000000',

%0'000000',

#0'042524',

=
=

%0°'052123',
%0'031461°',

[8
[9

*
=

#%0'126411',
%o'000000°,

12]

- %0r000000|

(15|
(16

=
=

%0'000000,
%o'104206

18]
19]
[ 20
[ 21 ]
22
[ 23]

*
s
=
=
=
*

%0'002743',
%0'104200°,
%0'000104',
%0'003045°',
%o’'104207°,
%0'003047',

[13]
18]
}11

[ 24 ]

=
=

'000000',

%0'104201°,

[ 35 ]

%0'104307',

%0°'104301',

36
37]

(38
39

=
=

40
4]

*
s

42]
(43

s
s

IS THE OM PROGRAM BYTE COUNT.

THIS IS THE OM OVERLAY BYTE COUNT.

! NEXT 3 WORDS = PROGRAM NAME (ASCII)

! PROGRAM NAME IS ‘TEST13’
!

THIS IS THE PROGRAM VERSION

! UPPER BYTE=TIME OUT VAL.

%0’'000000",
%0’[ 000000"l.,

.
=
=
=
»
»
=
=
«

THIS

%0'000000",

[ 25 ]
[ 26
[27 ]
28]
(29
30
31 ]
32
33

000004
',
%0'060023',
%0'103200',
%o’'00000]"
%0°'003047",
%0'103200',
%o’ 00000]’
%0'003051',
%0'114000',

%0'003046',

%0'003047',

%0'003050",
#0°'104202',

%o’ 000400
%0'104203',

%0'003066',
#%0°'060020',

&S
46]

*
s

%0'115007',

(48]
49
50
51
(52 )

«
s
s
s
s

%0'106200°,
#o'000012',
#%0°'003046°',
%0'032763',
%0°'00304]",

%0'013005°,
%0'115400°,

! DM CODE STARTS HERE

LOWER = FLAGS

VAX-11 Bliss-16 v4,0-579
USER$1:[AZT EC.CZRCFC)ZRCFC4.B16:3

SEQ 0361
Page

M12

b-‘.-‘“H”MM“MH&‘HPMMQ‘““.‘MMMMh‘fi‘b‘b‘.—‘b‘.—’”.‘b‘.“-‘”.—.&.&..——-MHMMMMN.‘M”.-..‘

% 85 00 B0 B

T 00 00 TS B0 VL G0 TP B0 B0 B0 0 B0

8 G2 TS GF G0 G0 V6 G0 V¢ Be G0 V0 G0 B¢ G0 B0 G0 V¢ V¢ G0 G0 Gs O° G¢ Ve GO Se G0 S+ So Ve Wo 0

CZRCFCO RC2S FR END TEST
BLOCK TRANSFER TEST

57 ]

%0'114000',

157}

#0'104301'.

59
60

.
«

%0'104202'.
%o’ 000400’

‘

%0'060021,

| 54 ]
55 |
56|
58

63 ]

64 |

» %o' 003046 .
=
%0'104307',
« %o'003051°,
«

69]

70
71

74 )

#0'003052°
.

[}

%0'103207'.
%0'177740°
.
#%0'115007',
#0'003046",

#0'106200°
.,
%o’ 000012,

#0'003041°,

75 |
76
;;

=
«
.

#0°'104207',
%0'003045',
lo'lO‘?Oi .

79]

#o'060022.

81}
82
83
84
85
3‘7’*

.
«
e
-

%o'104200',
%0'000106",
%0'003045".,
%0'003033'
0000104,

88]

#0°000000',

331
35‘

193]

’

33}

zoooooo

. %o 000000"
. 2000000

+ w0’ 000000.

. ‘°'oooooo"
e

o' 000000.

“IWI.

98]

= %o’ 000000°,

[100]
101]
102

*
«
«

[ 99

103]
108]

s
«
=

#o' 000000’ .

%o’ 000000°
,
%0'000000",
#0°000000',

®0°113606',
#0' 000000’
);

27-Mer-1985 15:33:05
11-Jon-198S 08:19:20

)

VAX-I} ? ise-16 v4,0-579
USER$1:(AZTEC.CZRCFC)ZRCFCA.816;3

S€0p0362
)

14
(7)

N12
IRCFR4
vVO3. 0

27-Mer-1985 15:33:05

HEAD SWITCH TEST

Mh‘.-‘.-‘O-‘.‘O—.-.0-.“.-..‘.-.F‘O‘”M”””.‘.‘”“H”“”F“PH”HPHHHM"”MHHM”HM”O‘MPMD-‘F‘F‘M

B¢

2106
2107
2108
2109
2110

CZRCFCO RC2S FR END TEST

ssbttl

'HEAD SWITCH TEST'

lobel

DM_19 : vector [156. uordj rese

= w#o'000466',

%o’'000000",

%o’ 000000
,

=
=

#0'052123',
%o'034461',

%0/126411',

2
'3
4

'S
6
7

11-Jan-1985 08:19:20

’ig'
}

= %0°000000',

! THIS IS THE DM OVERLAY BYTE COUNT.

THIS IS THE_PROGRAM VERSION

35§

12]
[13]
[14]
[15]
[16
17
18]
119]
20]

%0'042524',

000000|

%0'000001'.

23]

%o'114000'.

%0'060023'
.

%0'003134’,

2S
[26)
[27]
gg

=
=
=
.

#0'104200',
%0’'000040',
#%0'003135'
.
10:10220?:.

[30]

so'003127,

31
32]
33]
134]
[35]
136]
37

38]

39]
40]

[41]

=
=
-+
+

+
-

48]

[43)

45
46)

e
-

#0'012766°',
#0'104200',
0000100,
%0'003134’,
wo'104200°,
%0'000140'.

#o'003135',

#0'104300',

#0'003134"
#0'003130"
.

#0'114000°.

#c'003131°,

#o 023006’
.

wo'104300"
.

#0°'003135°,
#0'003130'
.

#90'114000',

#90°'023%006',

50
S1
Se

PROGRAM NAME

»
=
*

#0'00313}',

#0'104200°',
o 000104,
#0'003126'.

(ASCII)

! UPPER BYTE-TIME OUT VAL. LOWER = FLAGS

%0'000000" ,
%0’000000"
,
%o’000000"
,
%0’ 000000’ .
%0'104206',
#0'003151°’,
#0'104207',
#0'003127'
.
%0'104201'.

[24]

3 WORDS

! PROGRAM NAME IS 'TEST19"

=
=
=
=
=
=
=
«
=

[21]

122]

! THIS ?S THE DH PROGRAM BYTE COUNT.

! DM CODE STARTS HERE

VAX-1 18 liss- 16 v4.0-579
AZTEC. CZRCFC)ZRCFC4.816;3
USER$ 1:(A

SEQ 0363
rage

15
(8)

ZRCF8
ZRCFBA

i
2165
;2166
i
2167

1
1
1

CZRCFCO AC2S
RC2S_F
CZRCFCO
FR_END TEST

;2164 1 [54] = %o'104200',
155]
[56]
[57]

=
=
=

%0'000012',
%0'003132',
#0'104307°,

60)

== %o
003130|
so'104302',

=
=

so'003127'.
#0'104301',

=
<
=

%0'003131',
#0'060015'.
%0'103207,

=
=

#0'053036',
#%0'103201'.

;218

%o: 023035

oS8 1
2190 1

(80]

= %o'll 000"|

2192
:
2193

[82]
83

=
=

(85]

1
1

58]
59

i
2172
i
2173
;2174

1
1
1

[61]
(62)
63]
64

;277
;2178

1
1

;2168
;2169

;2170
1
;21 1

;215 1
;2176 1

€5]
66]

- wer117940' |
= :3'11;339:'

;21719 1
: 2180 1
;2181 1
;2182 1
;2183 1
;2184 1
;2185 1

69]
70]
(71]
72
(73]
78]
(75
e

=+ o
3
- %o 106301|
- %o 003130"|
= $0'053036',
. %o 106308"
= %0'003131',
033036
%%8.!
o 59.933

2186 11

;2191

;2194
;219
;2197
;2198
;2198

1
1
1
1
1

;2195

1
1

2200 11

2201

;2203 1
:
2204 1

;2205
1
;2206 1

:
;

2207 1
2208 1

:;2210
2209 11

67)
68

[19]

[81)

[84]
[86]
87
88
(88]

130]4

[91]
192]

93]
94

93]
[96)
97]
‘98

(99]
100)

- we00nse
=

wo' 003132

%0'073044',
#0'003011°,

=
=
.«
=

so0'104200'.
%0'003126',
%0'104207',
%o'o 003126 ,.

=
=

%o'060022',
%o’ 060010’

%0'000106',

- %o'000005|!

= wo’114000',
= %o'003133',

-= %o
104307
o
003197|
= %0'060014°,
=

so'103207 .

so'053112',
%0'104110°,
#0'003136',
0'102200',
%o’ 000040,

= v 197740"|
= %o’'115007',

;221 1
I
;2213
1
;2214 1
i
2215 1

101]
102]
103]
104]
[10S]

=
=
=
=
=

[108)

= %o’ 106200',

i
:

2216

2218

106]
107]

[109]

=
=

%0'003130'.
o’ 053101"

%0'000040",

B13
27-Mar-1985 15:33:05
11-Jen-1985 08:19:20
19

VAX-11 Blise:
Yo
USER#1: (AZTEC.CZRCFCIZRCFCA.B16:3
tec zhcrCizRe
P 0 (8)

Cl3
ZRCFR4

CZRCFCO RC2S FR END TEST
HEAD SWITCH TEST

s P o (e P e i P P Pt P Pt s P et e P P Pt Pt P P P P P P
0= s 0= s (s Pt 1 Pt o Pt P P

(7.

[ ]

N
n

R
b4

G0 B¢

B¢

€0

G¢

sP s P P

B¢

s s P Pt

v03.0

(110)
[111]
[112]
[113)

=
=
=
=

%0'003136',
w=o'033121',
so'003112,
%0'106200°,

=
=

w%0'003136",
so'033121°,

[114]

[117]
[118]

=
=

[115]
[116]

(119]
[120]
1211
[122]
123]
124]
[155]
1,
12,
(128]
129]
[130]
131]
132]
133]
[134]
[135]
[136]

=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=
=

138]

[137]

[139]

o' 000437';

s%o’'003112',
#0'1062

#%0'000377"
%0'003136'
%o'073121",
#0'1154
#0'00313%',
$0'106200°,
%o’ 000024"
#0'003133',
w%0'033057,
so'003122',
so
'
%o’ 104200',
%0'000106',
%0'003126'.
%0'003047',
%0’ 000000’
,
o' 000000,
wo’'000000",

%0’ 000000',

%0’ 000000,

o' 000000,

[140]
[141]
142]
143)
[144)
145)
[146]
147]
[148]
[149]

=
=
=
=
=
=
=
=
=
=

1133

[154)
[155]

=
=

[150)

(153])

%o’ 000000°,
s0'000000',
%0’ 000000",
%0’000000",
o' 000000
,
#0°'000000',
%0’'000000',
%0'000000",
%0'000000",
%o’ 000000,

%o’ 000000’,

= %0’ 000000’,

#o' 044310,
%0’ 000000’
);

27-Mar-1985 15:33:05
11-Jan-1985 08:19:20

VAX-1 18 1 ise-16 V4,0-579
USER$ 1:( A ZTEC.CZRCFC)ZRCFC4.B16;3

SEQ O 365
Pa ge

(8 )

D13
ZRCFB4

CZRCFCO RC2S FR END TEST
BLOCK TRANSFER TEST

v03.0

2267
st s s e o
6 it e Bt P P
s o P
s et b P oo P e
s i P
i o Pt (o (et et it ot et (i i e o et st (s i P B
0 0t 4 Bt 4 Bt (e Bt s Bt P o B

2271
22172
2273
2274
2275
2276
2277
2278
2279
2280

ssbttl

'BLOCK TRANSFER TEST'

global
DM_21
[0
=
1
2

=
=

reset (
: vector (213, word)
THIS
IS THE DM PROGRAM BYTE COUNT,
%o'000650",
%0'000000",
THIS IS THE DM OVERLAY BYTE COUNT.
%o'000000',

%o'042524',

'S
6
7

=
=
=

%0'052123',
%0'030462°
.
%o'000000",

9]
[10]
[11]
[12]
[13]

=
=
=
=
=

%0'000000"
.
%0'000000"
,
%0'000000"
,
%0'000000",
%0'000000"
,

[16]

%o0'104206'.

(18]
19]

=
=

#o'104207',
#0'003176',

[22]

15]
[17]

%0'126411',

= %e000000|
=

%0'003223',

- %er000003.
#0'060023',

23]

[26]
[27]

=
=

[30]

%0'003176',

[32])

%o’ 104200,

[24]
25

23]

[31)

=
=

%o’'114000',

#0'003206',
%0'104200°,

%0'000040',
#o0'003207,

- %or008003!

#0'012771,

[33]
[34])
[35]
[36])

=
=
=
=

[38])
39]

=
=

%o'104200',
%o’ 144000,

[41]

#0'104300',

[43)

[37)

40)
42)

[44]

45]
[46]

[47])
(48)

%0’ 000100,
%0’'003206',
so0’'104200°,
wo'000140',
%0'003207',

%0'003202',

#0'003177',

%0'104300',

#0'115000',
#0'003205',

=
=

%0'003205',

%0’'003206’,
%0'003177,

49]

#0'053005',

[52)

#0'003177",

(50]
[51)

27-Mar-1985 15:33:05
11-Jen-1985 08:19:20

=
=

%o’104300',
%0'003207°,

NEXT 3 WORDS = PROGRAM NAME (ASCII)

PROGRAM NAME IS

'TESTZ2l'

THIS IS THE PROGRAM VERSION

UPPER BYTE~TIME OUT VAL.

DM CODE STARTS HERE

LOWER = FLAGS

VAX-11 Bliss-16 V4,0-579

USER#1:(AZTEC.CZRCFC]ZRCFC4.b16;3

SEQ O 366
Pa ge

(9)

E13
CZRCFCO RC25 FR_END TEST
BLOCK TRANSFER TEST
s o P (o st P Pt P P P o i P (i P o i o i e o P ot Pt it e st (s Pt s i e s P

2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338

0 1 1 B et (s e Bed b B ot i Bt o (s (i P 28 Pt [ o it P

B €0 0 B VS B0 W VS B W G0 VL WL B2 TS TE QT VS V0 Ve VT V6 G¢ VI G VE G VE G G GF GF GC B2 B¢ G0 Ve V0 G0 G0 G4 @0 G0 V0 o e Ve Gr Wo e @0 ®¢ 90 @0 @0 es w0

ZRCFR4
v03.0

33
54]
§5]

1
=

zeiiisoce
#o'003200".
%0'023015'.

[37]
5
159

1
«
<

sorl08200,
%o'000104'
.
%0'003175',

56]

#o'023045'|

60]

%0'003167,

62]
63]
64]
65)
(66]
67]

=
=
=
=
=
=

#o'003203,
so'104307',
#0'003176,
w%o'104301',
%0'003177',
so'104302',

69]

%0'060015",

171]

(61]

(68]

[70]

(72]

=
=

so'114000',

%o'003200',

s%0'103207',

sor177740'
.

%o'106020'.

=
=

%0'115007'.
%0'053036'.,

73]
78]

¢
=

77]

%o’ 000000’

[79]
[80]
[81]

=
=
=

%0'003203',
%0'106200°.
%0'000012'.

[86]
[87]
[88]

=
=
=

[75]
(76]

(78]

182]
(83]
184]
(85]

=
=
=
=

%0'003200
.
%0'053036'.

%o'115400°.

%0'003203'.
%0'033017',
%0'003164',
s%o'104200',

%o0'000040".
%0'003204',
#0'023121'.

[89]
(90]
91)
192]
193]
[(94)
195]
(96]
197]
(98]
199)

=
=
=
=
=
=
=
=
=
=
=

102]
[103]

=
=

%0'003247',
%o’ 104300°,

105]
106]
(107]
[108]

=
=
=
=

0’00325,
so’104300°,
o' 003202’ ,

100)
101]

104)

[109]

=
=

®o'114000,
%0'003210°,
s%o’104200',
%o’ 100000,
%0'003242',
%o’ 104200,
#0'003256'
.
%0'003245°,
#0'104300'.
%0'003201",
%0'003246',

so’104300°,
%o’ 003202,

$0'003201'.

%o'003255"

wo’'104307,

27-Mer-1985 15:33:05
11-Jan-1985 08:19:20

VAX-11 Bliss-16 V4.0-579
USER$1:[AZTEC.CZRCFC]ZRCFC4.B16;3

SEQ 0367

Page

19
(9)

F13
CZRCFCO RC2S FR END TEST
BLOCK TRANSFER TEST

2407
2408
2409

2410
2411

2412
2413
2414

2415
2416

2417

2418
2419
2420
2421
2422
2423
2424

2425

2426
2427
2428
2429
2430
2431
2432
2433
2434
2435
2436
2437

e et b o s (o i e et P
ot P
Pt i et e e s o P
i ot s P

2405

2406

= i o s o o

2404

o ot (ot (e i P

2401
2402
2403

Bt i b (o o i o o

<400

1000 (8 1t b (et Bt (2 D

2381
2382
2383
2384
2385
2386
2387
2388
2389
2390
2391
2392
2393
2394
2395
2396
2397
2398
2399

(it s s P

ZRCFR4
vV03.0

[Ho]
111]

%o00tte:,
%0'104201',

112]
113]

=
=

115]

%0'177740',

[117]
[118]
[119)
[120]
[121]
[122]
[123]

=
=
=
=
=
=
=

%0'013115',
%0'115400°,
%0'003210°,
%0'106200',
s0'000012',
%0'003210',
#0'033050°,

[114)

[116]

124]

%o'003242',
%0'060002°,

%0'103207',

%0'115007',

#0'003164',

[125]
[126]

=
=

%o0'117400°,
#0'003204',

[129]

w0'104307,

[127]
130]
[131]

=
=

%0 053030:,

%0'003176',
%0'060014',

[132]
[133]
[134]
[135]

=
=
=
=

%0'103207',
#o'177740°,
%0'115007
#0'053155,

[137]

%0'003201',

[141]
[142]
[143]

=
=
=

2'033137,
%0'003155',
%0'115401',

=
=

o' 003202,
w%o'104117',

[136)

w%o'104110,

A
140]
=
0'003201'

144]

[147]
[148]
149]

=
=
=

[145]
[146]

s%0'104110',

%0'103207',
so’'144000',
#%0'053155',

[150]
[151]
[152]

=
=
=

smo'104117',
s0'103207,
%o’104000',

[154]

o' 040000,

153]

;{ggj

157]

s0'106207°,

so’'053155',

#o'115400°,

158)
159]
[160]
161]
162]
[163]
[164)

=
=
=
=
=
=
=

%o0'003241',
#o’'106200',
0’00044,
%0'003241',
s%0'033121',
#0'003164',
o’ 104200°,

166]

0003175,

[165]

%0’ 000106’
,

27-Mar-1985 15:33:05
11-Jan-198S 08:19:20

VAX-11 Bliss-16 V4.0-579

USER4$1:(AZTEC.CZRCFCJZRCFC4.816;3

SEQ 03

P5928 20
(9)

Cl3
ZRCFBA
V03.0

;2438

CZRCFCO RC2S FR END TEST
BLOCK TRANSFER TEST

167]

%o'104207°,

;2441
;2642
;o443
:
oaed

1
1
1
1

[170]
[171]
(172]
[173]

=
»
=
=

%0’ 000005',
%0'060022',
%0'060010".
%0'000000,

;2446
;2447
.
2448

1
1
1

175]
1176)
[177]

=
=
»

.
.

o439
2440

;2445

2449

o451

1
1

[168]
(169]

(178]

=
=

%0'003175',
%o'104201,

%0’ 000000'.

%0’ 000000' .
%o’ 000000' |
o' 000000' .

[178]

%o’ 140000',

(180]

%o’ 000000".

2450

2452
2453
o454
2455

1
1
1
1

[181]
[182)
183])
[184]

=
=
=
=

o458

187]

: 3222 i
;2862 1

’133‘
’191‘

- '°'oooooo"
. :3'oooooo"

:
:
:
:

5:?9 i

o459

P
]

[188)

%0’ 000000,
%o’ 000000',
%o’ 000000",
%0'000000".

. :g:oooooo:'
=

%o’'000000",

[193]
(193]

%o’%o'000000’
x.

2467

(196]

%o’ 000000’.

;2872
;2873

1
1

:
2815
;2476
;2477

1
1

.
:
.

1
1
1

2878

2880
2481
2482

g:gz

1197]
3

%o’ 000000’,

5868 1

1192]

%o 000000",

o8
2464

;

igg

2863

2:99

[179]

so'000000".

= so’ 000000"|
'

;133,

[201)
[202]

=
=

%o’ 000000,
%o'000000°,

[204]
[205]

=
=

%0’ 000000 ;
%o’ 000000;

[209]
[210]
[211]

=
=
=

%o’ 000000,
o’ 000000",
%o’ 065461

[203]

[206]

[212]

%0’000000"
,

%o’ 000000",

%o’ 000000
,

%o’'000000’
);

27-Mar-1985 15:33:05
11-Jan-1985 08:19:20

VAX-11 Blis
4,0-579
USER$1:[AZ ec CZRCFC]ZRCFC4 B816;3

SEQ 0369

Page

21
(9)

H13
ZRCFRa

CZRCFCO RC2S FR END TEST

WRITE DATA TEST

2491
245¢
2493
2494

s P P o o Pt P P Pt (i P P Pt s P

2490

e B e =0 (ot P e Pt Pt et 0 et b P Bt < (D P P (s P o8 Pt it b o it i i o s i P P P i et i [ P P P

B S5 B BT S B BL T VS A0 T G WL W BT 00 V0 90 S S VO S0 WO G0 V0 WS B0 VP 9 TE VI B0 V8 0 Yt @ WS V0 Ve W Vo VI V9 Ve We G0 s We S¢ S W @ ®s @ we @s o0

V03.0

2485
2486
2487
2488
2489

27-Mar-1985 15:33:05
11-Jen-198S 08:19:20

isbttl

globol

'WRITE DATA TEST'

VER:C

THIS TEST WAS REVISED

DM_26:VECTOR([413,WORD)
PRESET
[0
[1
[2
(3
(4
(S

=
=
=
=
=
=

%0'001470',
%0° 000000,
%0'000000',
%0'000000',
%0'042524',
%0'052123',

THIS IS THE DM PROGRAM BYTE COUNT,

THIS IS THE DM OVERLAY BYTE COUNT.

%0'000000',

%0'000000'
,

[11]
[12]
[13)

=
=
=

%0'000000°,
#0'000000°,
%0°'000000°,

=a}
[10)

[14]
[15]
[16]
[17]
(18]
[19]
[20)
[21]
[22]

=
=
=
=
=
=
=
=
=

[24]

23]

[25]

[(26]
[27]
(28]

=
=
=

30]
[31]
132]
33

=
=
=
=

[29]

(34]

[35]
(36]

=
=

[38]
(39])

=
=

(41]

[43)

(45]

(37]

[40]

[42)
[44)

%0'033062',

%0'126411',

#0'000000',
%0'000000’,
%0'104206',
%0'003550°,
%0'022777',
%0'023005',
%0'104206',
%0'003550',
#0'106200',

w0'177777°,
%0'003507',

%0'012770°,

%0'023030',
%0'023043',
%0'104200',

%0'177777',

%0'003507',
%0'114000',
%0'003501',
%0’'114000',

%0'003477',

%0'114000',
%0'003500',
%0'104200',
%0'000010',
%0'002473’,

%0'023052',

%0'023065',

#0'104200',

%0'177777°,

%0'003476',

#0'023461',

%0'060010',

[49)

%0'104201',

[S0]

=
=

THIS IS THE PROGRAM VERSION

! UPPER BYTE=TIME OUT VAL. LOWER = FLAGS

%0’'000000',

46]

[47]
48]

! NEXT 3 WORDS = PROGRAM NAME (ASCII)
! PROGRAM NAME IS 'TESTR6'

#0'104207',
%0’'003506',

%0'000001',

! DM CODE STARTS HERE

VAX-11 Bliss-16 V4.0-579

USER#$1:(AZTEC.CZRCFC)ZRCFC4.816;3

SEQ 0370
Page

(10)

113
ZRCFRA

"
e

Iggi
g
O
s

P2545 1
:;236
1

4
35

i 2548 1
: 2550 1
: 2551 1
: 2553 1
: 2554 1
;2555 1
: 2556 1
p

: o 25%
i
2351
;258
;2539
;230

i
:

P
i

' 54 ]

[57] S
3
S %0388880‘
(60 ] .t
3
(62 ] S %0 o430
(63 ]
. %0 000500
6a] - '0'000100"
65
. 0 Teaz00:
5

%0’ 003505.

%0’ 003506.

1
1
1

3]
66
e

1
1

G
9]
-

%0’ 104200 ,
%0’ 000140 ,
%0' 003505 ,

2562 1
2563 1

71 ]
172]

1
1

73]
78]

;g%
;259

1
1

St
18]

:
.

2510
1
&l

;212

:L
2574 1

;2315

;2376
P

:
:

25719 1
2581 1

;2519

;28

238

;2581
;2588

;.
;.

1
1

2590 1
2592 1

79]
80,

&1
86]

:o'ozssez..
%0'023116' ,

93]

%0' 023236 ,

93]

%]
7]

%0' 023116 |

%0' 023362 ,
%0'023137',

199 ]
1101]

. a0 os3le0!
= %0 093377

18]

101]
102)
108]

so,oes1eo'

%0’ 023160' ,

ggg; 1

%0 023137.
%0'023177,

i
i
P

;

%0' 023116,
%0' 023362" ,

= %0 053160 °
- 50104300

(991

1
1

%0-003504,
%0' 003503 .

'88)
190]

28]

;2595

I
%0' 023177
.
[83
]
ot
82,
- %0'023137",

;239

259
259
239

%0'104200"
.
%0’ 144000
.

. 'O'oooooooowz'
- %
.

2564
235

i
.

X0- 003904"

%0' 003504 ,
%0’ 104200" ,

[106)

[107]

%0' 023160

%0'023177"
%0' 023137,
%0' 023362 .

%0' 023116 |

- :8'853123"
=

$0'000000".

27-Har-1985
-Mar-1985 15
15:33 :05

:19:20

VAX-11 Bliss-16 V4.

USER$1:[AZ TEC.CZRCFCPSEL
JZRCFCA4.816;3

S£0.9371

P °°°(13§

J13
ZRCFB4

CZRCFCO RC2S FR END TEST

WRITE DATA TEST

2599
2600

2627

= 0 s e s s 0 s 40 Pt P P Pt (e o B b

;

i o P e P At D et o o B e s s P P s Pt P Pt (i (2 e e P o P P P Pt et P s e s Pt s o

V03.0

(108)

%0'104307°,

[113]

%0'003501°,

[115]

%0'104070'.

109]
(110]
[111]
[112]
[114]

=
=
=
=

[116]

[118]
[119]
[120]
[121]
[122]

=
=
=
=
=

[125]

[117]

1541+

=
=

[129]

130]
[131]
132]
[133)

=
=
=
=

[135]
136]

=
=

[134]

(139]

%0'060015',
%0'003476',

%0'103207°,

%0'177740',
%0'115007',
%0'053115',
%0'106020',
%0'003501',

%0:000000."

[126]
[127]

(128]

%0'003506',
%0'104301",
%0' 003503,
%0'104302,

%0'003424",

%0'114007',
%0'104301',

%0'003475',

$0'100671',

®0'003566',
%0'115407°,
%0'106207',
%0'000377',

%0'033121',

%0’ 060004

%0' 104207,
%0°003566',

(140]
[141]
[142]

=
=
=

%0'104010°,
#0'004166',
%0 000600",

(144]

#0°'104301°,

%0'100671',

[148]
149]
(150]
[151]
152]
(153)
[154]
155]
[156]
[157]

=
=
=
=
=
=
=
=
=
=

%0'115407°,
%0'106207',
%0'000377,
%0'033142',
%0'104207°,
%0'003566',
%0'104201',
%0'000400",
#0'060004",
%0'104010',

159]
160]

=
=

%0'000000°,
%0'104301',

143)

[145])

[146)

(147)

(158]
161]

(162]

163]

[164]

=
=

%0'114007,

%0'003474',

%0'003566',

#0°004166',

w0'003477',

%0'114007',

w0'104672,

#0' 003566,

27-Mer-1985 15:33:05
11-Jen-1985 08:19:20

VAX-1 1 B 1 iss-16 V4,0-579
USER$ i: ( AZ TEC.CZRCFCIZRCFC4.B16;3

SEQ 0372
Page
24

(10)

I€13

ZRCFR4

CZRCFCO RC25 FR END TEST

v03.0

;2656

;2657
;2658
;2659
;2660
;2661
;2662

WRITE DATA TEST

1
1
1
1

1
1
1

;2663
;2664
;2665
;2666

1
1
1
1

;2668

[165)

[166]
[167]
[168]
[169]
[170]
[171]

=
=

%0'106012',
%0'053174',

=
=
=

su 000377°,
#0'033163 ,
%0' 000000,

=
=

%0'115407°,
%0'106207',

(172]
[173]
[174)
[175]
[176]

=
=
=
=
=

1
1
1
1
1
1

[178]
[179]
180]
[181)
182]
183]

=
=
=
=
=
=

%0'104200,
%0’ 003566,
%0'003555",
%0'104300',
%0'003467°,
%0'003556',

(188]

®0'003467',

;2684

193]

;2688

;2690
;2691
;2692
;2693
;2694
;2695
;
26%
;2697

2667

;2669
;2670
;2671
;2672
;2673
;2674

;2675
;2676
;2677
;2678

;2679

;2680
:
2681
;2682
;2683
;2685
;2686
;2687

;2689

;2698

2699

1
1
1
1

[177]

[184)
185]
186]
187)

189]
[190]
191]
192]

=
=
=
=

%0'104300',
%0'003470',
%0'003557°,
%0'104300',

%0'003564°,
%0'104300°,
%0'003470,
%0'003565°,

%0'104307°,

[197]

%0'060002',

1
1
1
1
1
1
1
1

199]
200]
[201]
[202]
203]
[204]
[205]
[206]

=
=
=
=
=
=
=
=

#0°'003476',
%0'103207°,
%0'115007°,
%0'013235°,
%0'003422',
%0'000000°,
%0'023074°,

208]

%0°'003502',

[212]
[213]

=
=

[194]
[195]
196]

198)

207)

1
1
1

[209)
[210]
[211]

2705

;2709
;2110
;2711
;22

1
1
1
1

;2706
i
2707
;2708

=
=
=
=

%0'100000',

%0' 003552,

1
1
1

;2700
:
2701
i
2702

;2703
;2704

%0'104020°,
%0'003500°,
%0'003424',
%0'104200,

1
1

1
1
1

=
=
=

%0'003506°,
%0'104201°,
%0'003552',

%0'104070',

%0'177740',

0'114000,

=
=
=

%0'104307°,
%0'003506°,
%0'060014°,

[214]

%0'103207',

[218]
219]
[220]
[221]

=
=
=
=

%0'114002',
%0'104113',
#0'106613',
%0'00000z,

[215)
216)
[217)

=
=
=

%0'104070°,
%0'003476',

%0'177740°,
0'115007',
%0'053361°,

27-Mar-1985 15:33:05

11-Jan-1985 08:19:20

VAX-11 Bliss-16 V4.0-579

USER¥1:[AZTEZ.CZRCFCIZRCFCA4.B16;3

SEQ 037

Page3 25
(10)

L13
ZRCFR4

CZRCFCO RC2S FR END TEST

WRITE DATA TEST

2715

2716
217
2718
2719

~
w
~

2720

HM.—‘MH.—‘H”D‘H”.—‘”H.‘O‘MHHHM”M.-‘.-‘MHHHM.‘HHN)—‘.‘.—‘MHH”“MHP”P“”HPH”"HU‘M

27113
2714

.....-.-.‘...o.fi.o.t.'lo.n.'.o.n.l.o.l-no.o.o.n.-...'.o.o...-.t.-.l.o.0.0.c.c.o.ofl.o.t.O.-.c.c.c.o.o.c.c...a.l.u

v03.0

%0’ 053262
,

%0’ 106613
,
%0’ 000004,
%0’ 013306
,
%0’ 106613
,
%0’ 000004

%0’ 053270"|
%0'106613"|
%0' 000006 '

#0°'013306°,
%0’ 106613",

#0° 000002 ,

%0’ 053276°
,
%0°106613',
%0' 000006 ,

%0'013306°,
%0° 104613,

%0' 000002 ,

80' 106613,
#0' 000004 ,
#0' 053361,
%0°' 106613,
' 000006,
#0' 053361,
%0°' 115002,
%0'053316°,

%0’ 104030',

#0' 003467,
#0°'115401°,
$0'104202°,
%0'177777,

%0'003253",

#0' 104030,
%0' 003470,

%0'104300°,

#0°' 003467,

%0°' 003502,

#0'103200°,
#0°'177740°,
80’ 003502,

80' 102200,

#0' 000001,
#0°' 003467,

80’ 053361,
$0°'102200',

%0'010000°',
%0 003470',

%0' 053361,
$0'106300°,
%0' 003472,
#0' 003470,
%0°'053361°,

$0'104302°
,

%0' 003467,
80105202,
%0' 000000° ,

$0'10320¢",

27-Mar-1985 15:33:05
11-Jan-1985 08:19:20

VAX-11 Bliss-16 V4.0-579
USER$1:(RZTEC.CZRCFC)ZRCFC4.B16;3

SEQ_0374

Page

(1 0)

M13
W
FRA
ZRC

"y
o

@
ot
.
o

:o27174 1
P 47s 1
Po2Te ]

2683]
58]
285

%0 110605"
i b iloecs:

287}

%0' 053361 " ,

P58 1 %] - %0-iloecs

o2ams

28]

%0'110602°
|

%0'106302° .

;. 2180 1
;2781 1
;2782 1
: 2788 1
i 5788 1
;2785 1
;. 2186 1

289]
13%]
301]
302]
[293]
304]
1295)

- %0
.
-- %0
10430
w0 003366|
- %0-00347%.
- %0-104300- 0140000
- %0 003559 "

: 2789 1
: 2191 1
;27192 11
P79
: 27193 1
: 2795 1
;2719 1
i 2197 1
: 27199 1
P20
: 280 11
: 2803 1
;2804 1
;. 2806 1
: 2808 1

1298)
300)
1301)
302]
1302]
'304)
[ 305 |
1306]
'308)
310)
1310]
1312)
313)
'315)
1317)

- 20" 003508,
%0 003aey. "
- %0- 003596 |
-%0’
%0 104300
104300 |¢
- %0 90355y
%0 104300+
= %0 003407 |
- %0 4300 !
-=
%0'
%0903569
003565 ||
- %0 003506 !
. %0 04305 "
- %0° 960005 |
- %0- 093476 °

2789

;204

;2008
;2809
;
2810

1
1
1

3171

298]

%0’ 003555.

%0’ 104201 ,

us
3201

%0' 003476
.
%0’ 103207 |
10' 177740,

:;281
28133 11
U

3221
1322]

=- %0’
%0- 003424
003454 .

P26

325)

: 2819 1
;2820 1
;2821 1
: 2822 1
;2823 1
;2824 1
; sggz 1

1328)
329]
1330)
{33 |
332
333
334)

- %0 003475 ¢
%0 013433
- %0 002744 "
%0 515400
- %0 50350 |
%0 15400
- :8'333:9g"

;215

)

EHE

‘

[335)

%0’ 000000.

%0'115400" .

%0’ 00347]
" .

)

#0'114000',

27-Mer-1985 15:33:08

:19:20

VAX-11 Bliss 16

usens1:?nzvsc .CZRCFC)ZRC
e izme FC4.B16;3

SEQ O35

Po%3

)

N13
ZRCFR4
vV03.0

:
H

:
¢
:
H
:
H
H

;
H
:
:
:
:
H
H

H
H
4
:
H
4
H
H
H

H
é

:
:
H
H
4
é
3

é
H
H

é
H
H
$
H
]

$
é

40000

:
H

Hean i opie

[

:
:

~
-~
~
~
~

[

H
:

%0°' 003471,
%0‘ 106200,
%0’ 000004,
%0 003501,
%0’ 053450,
50’ 104200,

2222233
355855531y
yyyY

WRITE DATA TEST

.-....n“uppp»”p”pp“hp.—.p“p””“p“..NH.-.“H”’.”.‘.—.”””.‘.‘””"“‘-‘”HM..-....-5..."..-.

CZRCFCO RC2S FR END TEST

27-Mer-1985 15:33:05
11-Jan-1985 08:19:20

VAX-11 Bl i99-16 V4.0-579
USER$ 1:{AZTEC.CZRCFC)ZRCFC4.8B16;3

SEQ 0376

Page(

28
1 0)

Bl4
CZRCFCO RC2S FR END TEST

ZRCFB4

WRITE DATA TEST
e
T

1395
(396

Y S

Y Sy Y

393

g o d S o Sl o

2884
2885
2886
2887
2888
2889
2890

lad ol od o d o d X

B¢

G0 G

©F

B¢

v03.0

394

#0' 000000’

[397]

1398|

399

1400
140)
402
403|
404
(405

[ 406
407
(408]
(409
1410
(411]
[412]

%0’ 044552
#0' 000000’
);

27-Mar-1985 15:33:05

11-Jen-1985 08:19:20

VAX-%% ?
li 99-16 v4.0-579

USER

AZTEC.CZRCFC)ZRCFC4.B16;3

SEQ 0377
Page
29

(10)

Cl4
ZRCFB4

CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST
s P P Pt s P i P P P B Pt e P o e Pt e P

ssbttl

s Pt i Pt P

00 0t 0 Bt ft P B o o o $t Pt 8 et Pt (e o (i ot et B P P B o (o P P P Bt P e P

..M.t...t...!.O.....I.....l.......'..'l.l.l.0...0.'...0.‘.0.0...’.O.l‘..‘...!.l‘....l...!...l..“.o...l.‘.0“.-‘.

v03.0

'OFFSET

27-Mar-1985 15:33:05
\1-Jen-1985 08:19:20

TOLERANCE TEST'

lobal

M_
: vector [307 » word)] ]
oon_27

t (

%0;001144",

%0:000000:,

! THIS IS THE DM OVERLAY BYTE COUNT.

%0'042524',

! NEXT 3 WORDS = PROGRAM NAME (ASCII)

;

[10

(11
[12]
[13¢

'ol

[}

:3:8§§i§3:'

#0'000000',

%o 125411,

go'

#o0'0000%0',

=
=
=

OO0

16]

%0:104206',

18]

%0'022750".

(20)

%0'022776',

[(24]
[25]
(26]

=
=
=

#0'104207',
%0'003320',
%0'104201',

%0'060023',

=
=
=
=
=

%0’'114000',
%o'003321°,
%o'104200°,
#0'000040’,
%o'003322',

19]

[21]
[22]

=
=

[27]

[29]

[28)

[30]
(31])
[32]
[33]
34)

[37]

38])
[39]

=
=

[40]
[41]

=
=

43]

42)

48]

(46]

147]

(48]

49]

[50]
51]
[S2]

, [

#0'022756',

#0'023040',
#0'023305',

%0'000001',

%0'000000',

%0°'003320',

%0'012775',
so’'104200°,

%0'000100',
so'003321',
#0'104200',

$0'000140',

wo003322,

%o'114000',

%0'003330°,

#0'003332,

=
=
=

! PROGRAM NAME IS 'TEST27

! THIS IS THE PROGRAM VERSION

i UPPER BYTE-TIME OUT VAL. LOWER « FLAGS

'°,gggggg,'

‘0

IS THE OM PROGRAM BYTE COUNT.

#%o’'000000',
%0'000000',
%o:000000",

rlst

{

THIS

preae

%0'114000',
w0'104300°,
#0'003321',
%0'003336’,

! DM CODE STARTS HERE

VAX-11 Bliese-16 V4,0-579
USER#$1:(AZTEC.CZRCFC)ZRCFC4.B16;3

SEQ 0378
Page
3
(11)

D14
ZRCFB4
v03.0

i P Pt (e (s (b P i Pt P Pt P Bt P (o i Pt o o et P e e P o P
e Bt P 5 = $ Dot s P e [ et Pt Pt o P P Pt
0= 0 B =0 e

b e s P Pt

CZRCFCO RC25 FR END TEST
OFFSET TOLERANCE TEST

%o' 023170,
%o’ 023125,
%o’ 102200°,
%o’ 000001
',
%o' 003313 |
%o' 053021 .
%o’ 115400 |
%o’ 003330,
%o’ 106200 ,
%o’ 001000",
%o’ 003330,
%o’ 033006,
%o’ 023225'
,
%o’ 115000
,
%o’ 003316,
%o’ 053030",
%o’ 115000,

%o’ 003317,

%o’ 013037',
so’ 115400' ,
%o’ 003332’,
%o’ 106200 ,
%o’ 001000’
,
%o’ 003332',
%o’ 033002'
,
%o’ 003300 ,
*000000",

%o’ 023170',
%o’ 114000'
,
so’' 003324’ ,
so’'114000',
%o’ 003325,
%0'115400',
so' 003324,
lo'107200‘
so’' 000001’

10'003325'

%o’ 104300,
lo'003324'.
o' 003326’ ,
o' 023100’ ,
%o' 023225,
so’' 115000’ ,
o’ 003316,
so’' 053077,
so’'023170',
%o

s’ 023225,
so’ 115000,
%o’ 003316,
%o’ 053077,
%o’ 104300,
o' 003324',
%o’ 003334",

27-Mar-1985 15:33:05
11-Jan-1985 08:19:20

VAX-11 B8 liss- 16 v4.0-579
USER41
1:(AZTEC. CZRCFCJZRCFC4.816;3

SEQ 0379
Pa

(11)

[

E14

ZRCFR4

CZRCFCO RC2S FR END TEST

v03.0

;3019
:
3020

;3021
;3022
;3023
:
3024
:
3025

OFFSET TOLERANCE TEST
1
1
1
1
)
1

3026

;3030
;3031

1
1

;3027
:
3028
:
3029

1
1
1

;3032
:
3033
:
3034
:
3035
:
3036

1
1
)
1
1

:
3038
:
3039
:
3040
:
3041
:
3082
:
3043
;3044

3047
3048

;3037

;3045
:
3046

:
:

:
:
:

3049
3050
3051

3052
3053

:
:

3054
3055

3064

121]

1122]
[123]
1124]
,125,

=
»
=
=
=

%o’ 114000,
%0'003327',
wo'104307,
#%0'003320',
%o0'104301,

=
=
=

%o’'104202',
%0'000174
.
%o’ 060013,

=
=

%o’ 003326.

%0'103207'.
0’17770,

1126]
1127]

1
1
1
1
1
1
1

1129]
[130]
[131]
1132]
[133]
[134]
[135]

=
=
=
=
=
=

wo'003327'.
%o'033102'.
%0'003300'
.
%0'000000".
s0'104307',
%o'003320'
.
%o’ 060014
.

1
1

138]
139]

=
-

%0'115007.
%0'053161'.

[143]

;145,
146]

1
1

1
1
1

;3065
;
30%
;3,7
;
3068

;3073
;3078
;
3079

117]

[118]
119])
120]

smo'003045',
so'000000',

%0'115007',
so’013124',
$o9'115400',
%o’ 003327,
%0’ 106200'
.

1
1
1
1
1
1
1
1

:
3070
:
3071
;3072

[112]
113])
[114]
,115{
1116]

=
=

=
=
=
=
=

:
3056
:
3057
:
3058
H
3059
:
3060
:
3061
;3062
;3063

;3069

[110]
illl‘

1128]

136]
[137]

=
=

140]
,141,
.142,

=
=
=

144]

s
=

#0'033143',
#0'003161'.

1
1
1
1

156]
[157]
158]
[159]

=
=
=
=

1
1
1

,161,
162]
[163]

s
=
=

1
1
1

[160]

(164)
[165]
(166 ]

%0'104110°.
#0'003313’,
f#o'106200',

%0’ 000440" |

=
=
=
s
s
=
=
=

,155,

%0'103207'.
%o'177740',

1147]
148)
[149]
,150‘
,151
[152]
1153)
[154]

%o’ 000012’

%o’ 003313,
so'115401",
%0'104110'.
%0’'003314"
.
%o0'104117',
#o'103207’,
%0'144000',
%o’ 053161,
wo’'104117'.

¢o'103207°,

%o’'104000'.
so'106207',
%o’ 040000.
wo'053161'.

%o’ 000000".

=
=
s

s0'000144",
%0'003331',
#0'033125',

#0'115400',
%o’ 003331,
$0'106200
.

27-Mar-198S 15:33:05

11-Jan-198S 08:19:20

VAX-11 Blies-16 V4.0-579

USER$1:(AZTEC.CZRCFC)ZRCFCA4.B16;:3

|
SEQ_0380

Page

(11)

ZRCFRA
v03.0

;3076
;3077

CZRCFCO_RC2S FR END TEST
OFFSET TOLERANCE TEST

1
1

(167]
[168)

=
=

%0'003300',
%o'100467',

172]

%0'001475',

:
3078
;3079
:
3080

1
1
1

;3082
:
3083

1
1

173]
[174]

=
=

%0'003335,
%0'104307',

[178]

%o'104302',

;3081

3084

3087

[169]
[170]
[171]

[175]

=
=
=

so’114000',
%o'003315',
%o’ 104200',

%0’'003320',

:
:
:

3088
3089
3090

1
1
1

[179]
180]
181]

=
=
=

P
HP

3003 1
3095 1

(184]
(18]

- we-d03%s
-- %o 115007
'
'y
=

%o'053216',

3099

190]

%o’'115400°,

3103

1
1

192])
193]

=
=

so'106200',
®0'000012',

3106 1

[197]

:
:

3108
3109

1
1

[199]
200]

202]
[203]
[204]
205)

;309
:

3100

;3101
;3102

;3107

;3111
;3112
;33
;3114

:
315
;3116

1
1
1
1
1

;3118
;3119
:
3120
;3121
;3122
;3123
;3124
;3125
;3126

1
1
1
1
1
1
1
1
1

;3117

;3129

;3130
;3131
;o
3132

1
1
|

1187]
[191]

[194]

198])

%o’ 003335',
%0'060015',
%0'103207',

%0'003315',

#0'003315',

= %o'100467',

=
=

%o’'114000',

%o’ 003316’
,
%o’'114000',

o’ 104200,

206]
[207]

=
«
=
=
s

%o’ 100000,
%o’ 003400’
,
so’104200',
%o'003414",
%0'003403',

209]
[210]
211]
212]
213)
214)
215]
216)
217])

=
=
=
=
=
=
=
=
=

%o0'003313,
%o0'003404',
%0'104300',
s0'003314',
%0'003405',
#0'104300',
0'00331%,
%o0'003412',
#0'104300',

208]

220]

221]
222]
223]

=
=
=

%o’'104300,

%0'104307',

#0'003320’,
%0'104201',
%0'003400',

11 Blies-16 V4,0-579

USER4$1:(AZTEC.CZRCFC)ZRCFC4.B16;3

SEQ 0381

Page

(11)

Gl4
CZRCFCO RC25 FR END TEST
OFFSET TOLERANCE TEST
b e o i o P (o i i o et P ot oo Pt Pt et P B Pt P
o o o i o
b o P (s it i (i (b it o s o
o o D et D (o
D Pt ot D
0= 0t 0= Pt P

on
N

o o o

3133
3134
3135
3136
3137
3138
3139
3140
3141
3142
3143
3144
3145

—

®s ®e B¢ @ B Gt B B @ o8 b W B WS Q0 0 VS B 00 T TS Ve B S5 G Ve 99 O @6 | G0 B0 We 90 G G0 V0 B8 G0 W0 B9 OF V¢ G0 B¢ V¢ OF TS 06 O¢ oe 90 90 OF 00 @5 S0

ZRCFB4
v03.0

[224]

%0'060002',

[226]

%0'177740’

230]
[231]

=
=

225)

1227)
[228]
1229)

[232]
[233]
[234]

[235]

[236]

[(237]
ggg;

[240]
(241]

242]

[243)
244)
[245]
[246])

[247]

[248)
[249]

=
=

%0'103207',

%0'115007',
%0'013267',
%0°'115400',

%0'003316',
%0'104307',

=
=
=
=
=
=
.

%0'003400',
%0'102207°,
s0'020000°,
%0'013276',
%o'115400'
%0'003317',
:2:104267:.

w®o’'104200',

#0'003333',

=
=
=
=

=
=

' 000106

#0'023305',
%0'060010'.
%o'104207',
so'003333',

#0'104201°,

so’ 000002’
,
%o’ 060022',

'ggg‘
|
p
'53%‘
3
[

. :g'oooooo-'
0000"
.. ‘°:3soooo-'.

[255]

%o’ 000000',

[258]
[259]
1260]
(261]
262]
[263]
[264]
[265]
[266]

=
=
=
=
=
=
=
=
=

' 000000"
,
000000",
' 000000 ,
' 000000'
,
%o’ 000000’
,
*000000",
%o’ 000000"
,
o' 000000’ ,
%o’ 000000’
,

[268]
[269]

=
=

254]

[256]
[257]

[267]

=
=

(270]
[271]

=
=

1273]
274)

=
=

[272]

#0'000000',

*000000°,
%0'000000',

%0'000104',

%o0'000000",
%o’ 000000',

%0'000000",
%o’ 000000'
,

%0'000000
,

%0'000000'
,
o’ 000000.

215]

#0'000000',

[277)
[278]

=
=

%0'000000’,
%0'000000",

o' 000000.

[276]

(279)

[280]

%o’ 000000,

27-Mer-198S 15:33:05
11-Uen-1985 08:19:20

VAX-11 Bliss-16 V4,0-579

USER4$1: (AZTEC.CZRCFC)ZRCFC4.B16;3

SEQ 0382
Page

(11)

H14

o P Pt

so' 000000’ ,

s Pt e P

s e e o

%
so

%o’ 120475’

%0’ 00000)0;

LTITLE
. IDENT

000012
000014
000016

000022
000024
000026
000030
000032
000034
00036
00040
000042
000044
000046

003037

.PSECT
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

ZRCF84 CZRCFCO RC2S FR END TEST

/V03.0

DM$COOE,

270
0
0
0

42524

52123

34460
0

-51367

OCOO0O0O0OO

s P

s i e Pt P P

§
V]

[«]

27-Mar-1985 15:33;
3:05
11-Jen-198S 08:1 9:20

so' 000000’ ,
so' 000000’ ,

3190
3191

%%%%%%éé

CZRCFCO_RC? S FR_END ES
ERANCE TES
OFFSET TOLE

ZRCFR4
V03.0

-73572

3051
-64000
3037

RO,

GBL

- 1 1 B lis 16 V4,0-579
VAX
USER $ 1: (AZT C.CZRCFCIZRCFCA4.B16;3

SEQ 0383
Page

(1)

114
CZRCFCO_RC2S FR_END TEST

V03.0

000050
000052
000054
000056
000060
000062
000064
000066
000070
000072
000074
000076
000100
000102
000104
000106
000110
000112
000114
000116
000120
000122
000124
000126
000130
000132
000134
000136
000140
000142
000144
000146
000150
000152
000154
000156
000160

OFFSET TOLERANCE TEST

104201
125252
104302
003034

000206
000210
00212

053015
104200
000104
003040
104207
003040

216

000001

000214

00220
0222
00224
226
000230

11-Jan-1985 08:19:20

104207
003032
104201
000003
060023
103207
177740
115007
012756
003003
114000
003052
104307
003032
104301
003033
104302
003034
104203
003052
060020
103207
177740
115007
013007
115400
003037
10630Q_
003035
003037
032756
104200
000106
003040
003024
104207
003052

000162
000164
000166
000170

000172
000174
000176
000200
000202
000204

27-Mar-1985 15:33:05
JWORD
.WORD
.WORD
.WORD
WORD
WORD
WORD
.WORD
.MORD
.WORD
.HORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
WORD
WORD
.WORD
.WORD
.WORD
.HORD
.WORD
WORD
.WORD
.WORD
.HORD
WORD
.WORD
.WORD
WORD
.WORD
.WORD
WORD
WORD
WORD

WORD
WORD
WORD
.WORD

106271
053003
117402

.WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD

104201

WORD

.WORD

060022
060010
000000
000000
000000

.WORD
.WORD
.WORD
.WORD
.WORD

i‘!

VAX-11 Blis 3:16 V4.0-579

USER$1:[AZTEC.CZRCFCIZRCFC4.B16;3

-73571
3032
-73577
60023
-74571
-40
-62771
12756
3003
-64000
3052
-73471
3032
-73477
3033
-73476
3034
-73575
3052
60020
-74571
-40
-62771
13007
-62400
3037
-71500
3035
3037
32756
-73600
106
3040
3024
-73571
3052

-73577
-52526
-73476
3034

-71507
53003
-60376

53015
-73600
104
3040
-73571
3040
-73577

60022
60010
0
0
0

—

(
“

ZRCFR4

SEQ 0384

ZRCFR4
v03.0
000232
000234
000236
000240
000242
000244
000246
000250
000252
000254
000256

000260
000262
000264
000266
000270
000272
000274
000276
000300
000302
000304
000306
000310

000312

000314
000316
000320
000322
000324
000326
000330
000332
000334
000336
000340
000342
000344
000346
000350
000352
000354
000356
000360
000362
000364
000366
|000370
000372
374
000376
000400

CZRCFCO _RC25 FR END TEST
OFFSET TOLERANCE TEST
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
WORD

12
O
O
O
O
O
O
O
O
O
O

144423
000000
000162
000000
000000
000000
042524
052123
030061

WORD
.WORD
.WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD

-33355
0O
162
O
O
O
42524
52123
30061

000000
000000
000000

126411

000000
000000
000000
000000
000000
000000
000000
104206
003007
104207
160000
104201
077777
104202
000001
104203
003500
060021
103207
177740
104070
002765
104207
002765
104201
000001
060022

060010

000410

000000

000412

000000
000000
000000

T
27-Mer-1985 15:33:05
11-Jan-1985 08:19:20

000012
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

1000402
1000404
000406

WORD
WORD
WORD

OM.10::

WORD

WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
.WORD
.WORD

O
O
O

-51367
O
O
O
O
O
O
-73572
3007
-73571
-20000
-73577
77777
-73576
-7357S
3500
60021
-74571
-40
-73710
2765

-73571
2765
-73577
1
60022

.WORD

60010

.WORD

.WORD
.WORD

.WORD

O
O

VAX-11 Blis 16 V4.0-579
USER4$1: (AZT CZRCFC]ZRCFC4 816;3

SEQ 0385

Page

37
(1)

<14
ZRCFB4

CZRCFCO RC25 FR END TEST
OFFSET TOLERANCE TEST

000414

.WORD
.WORD
.WORD
.WORD

.WORN
.WORD
.WORD
.WORD
.WORD

-WORD
" WORD
- WORD

-WORD
DM.11::

" WORD
-WORD

-WORD
.WORD

.WORD
.WORD
.WORD
.WORD
. WORD
. WORD

003044

104304

003042
114000
003046
104307
003040

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
. WORD
.WORD
. WORD
. WORD
.WORD
.WORD
.WORD
.WORD
. WORD
. WORD
. WORD
.WORD
.WORD
.WORD
. WORD
.WORD

OO0O0O0O0OO0OO0O

vV03.0

27-Mar-1985 15:33:05
11-Jan-1985 08:19:20

VAX-1 18 1 iss-16 V4,0-579
USER$ 1:(
:[A ZTEC.CZRCFCJZRCFC4.8B16;3

SEQ 0386
Page

(11)

L14
ZRCFR4
v03.0

CZRCFCO RC25 FR END TEST
OFFSEY TCLERANCE TEST

27-Mar-1985 15:33:05
11-Uen-1985 08:19:20

000702

COO0O0O0O0O0O0O0O0O0O0OO0O0O0

000710

VAX-1 18 1 i98-16 V4,0-579
USER¢ 1:(
:[A ZTEC.CZRCFCJZRCFC4.8B16;3

SEQ 0387
Page
39
(1 1)

M14
CZRCFCO _RC2S FR END TEST
OFFSET TOLERANCE TEST

ZRCFR4

v03.0

000000
056247
000000

OM.12:: .

OCOO0O0OO0O0O0

-367

-13572

023016
023031

R34

000760
000762
000764
000766

27-Mar-1985 15:33:05
11-Jen-1985 08:19:20

COO0O0O0OO=~0O0000 (elelofololelofoleTololoYoYoTo
Yo Yo Yo Yo Yol

VAX-11 8 lie
98-16 V4,0-579
USER$1 : (AZ TEC.CZRCFCIZRCFC4.816;3

SEQ 0388
Page

®an

N14
ZRCFR4

CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

v03.0

001142
001144
001146
001150
001152
001154
001156
001160
001162
001164
001166
001170
001172
001174
001176
001200
001202
001204
001206
001210

001212

001214
001216
001220
001222
001224
001226
001230
001232
001234
001236
001240
001242
001244
001246
001250
001252
001254
001256
001260
001262

[001264

001266

1270
1272
001274

023210

023120
023126
023210
023120
023.55

27-Mer-1985 15:33:05
11-Jen-1985 08:19:20

VAX-1 1 Bl ise-16 V4,0-579
USER¢ 1: (AZ7 €C.CZRCFC)ZRCFC4.816;3

SEOP0389
age

(1 1)

B15
CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

27-Mer-1985 15:33:05
11-Jen-1985 08:19:20

VAX-1
B8 1 ise-16 V4,0-579
USER$ :( AZ TEC.CZRCFC)ZRCFC4.B16;3
[
1)

ZRCFB4
v03.0

SEQ_0390
Page

(11

C15
ZRCFRA4

v03.0

CZRCFCO _RC25 FR END TEST
OFFSET TOLERANCE TEST

27-Mar-1985 15:33:05
11-Jan-198S 08:19:20

001506
001510
0013512
001514
001516
001520
001522
001524
001526
001530
001532
001534
001536
001540
001542
001544

OM.13:: .
42524

1650
1652
1654
1656

1660
1€62
01664
001666

VAX-1 18 1 ise-16 V4,0-579
USER# 1:( A ZTEC.CZRCFC)ZRCFC4.816;3

SEQ 039]
Page

(1 D

001670
001672
001674

001676
001700
001702
001704
001706
001710
001712
001714
001716
001720
001722
001724
001726
001730
001732
001734
001736
001740
001742
001744
001746
001750
001752
001754
001756

104207

003045
104201
000001
060022

nNo
own

vV03.0

27-Mer-1
11-Jen-1

8gFSE$ TOLERANCE TEST

RCFCO_RC25 FR END TEST

ZRCFRA4

OO
|
v

D15
VAX-11 ?la
8-16_v4.0
USER#$1:(AZTEC. CZRCFC]ZRCFC4 816:3

SEQ 0392
Page
44
(11)

E15
CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

ZRCFB4

V03.0

002052
002054
002056

27-Mar-198S 15:33:05
11-Jen-198S 08:19:20

002743
104200

. WORD
.WORD
.WORD
. WORD
. WORD
.WORD
. WORD
. WORD
. WORD
.WORD
. WORD

003045
003033

. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD

OM.19::

104206
003151

104207
003127
104201
000001
060023
114000
003134
104200
000040
003135
102200

000001

003127
012766

. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
.WORD
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
.WORD
.WORD
. WORD
.WORD
.WORD
. WORD
. WORD
.WORD
.WORD
. WORD
. WORD
.WORD
.WORD

VAX- 11 8 li 88-16 V4.0-579
RZ TEC.CZRCFCIZRCFC4.B16;3
USER $1:(AZ

SEQPO393 45
]

ge(11)

F15
ZRCFB4
v03.0
002234
002236
002240
002242
002244
002246
002250
002252
002254
002256
002260
002262
002264
002266
002270
002272
002274
002276
002300
002302
002304
002306
002310
002312
002314
002316
002320
002322
002324
002326
002330
002332
002334
002336
002340
002342

002344
002346
002350
002352
002354
002356
002360
002362

002364
002366

CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST
104200
000100
003134
104200
000140
003135
104300
003134
003130
114000
003131
023006
104300

003135
003130

114000
003131
023006
104200
000104
003126
003047
104200
000012
003132
104307
003127
104301
003130
104302
003131
060015
103207
177740
115007
053036

103201
177637
106301

003130

053036
106302
003131
753036
023055

27-Mar-1985 15:33:05
11-Jan-1985 08:19:20
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD

WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD

-73600
100
3134
-73600
140
3135
-73500
3134
3130
-64000
3131
27106
-,3500

3135
3130

-64000
3131
23006
-73600
104
3126
3047
-73600
3132
-73471
3127
-73477
3130

-73476
3131
60015
-74571
-40
-62771
53036

-74577
-141
-71477
3130
53036
-71476
3131
53036

23055

2370
2372

117400
003132

WORD
WORD

-60400
3132

2376
2400
2402

003132
073044
003011

WORD
WORD
WORD

3132
73044
3011

02374

02404
2406
2410
02412
2414

115000

104200
000106
003126
104207
003126

WORD

WORD
WORD
WORD
WORD
WORD

-63000

-73600
106
3126
-73571
3126

VAX-11 Blise-16 V4.0-579
USER$1:(AZTEC.CZRCFC)ZRCFC4.B16;3

SEQ 0394

Page

46
1y

G15
CZRCFCO RC25 FR END TEST
OFFSET TOLERANCE TEST

ZRCFB4
v03.0

27-Mar-1985 15:33:05
11-Jan-1985 08:19:20

002416
002420
002422
002424
002426
002430
002432
002434
002436
002440
002442
002444
002446
002450
002452
002454
002456
002460
002462
002464
002466
002470

002472
002474
002476
002500
002502
002504
002506

000000
000000
000000
000000
000000
000000

COO0O0OO0OO0O0O0O0O

002510
002512
002514
002516
002520
002522
002524
002526

ise-16 V4.0-579
~EC.CZRCFC]ZRCFC4.B16;3

SEQ 0395
Page

H15
v03.0

CZRCFCO RC25 FR END TEST
OFFSET "ULERANCE TEST

27-Mar-1985 15:33:05
11-Uan-1985 08:19:20

002600

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
DM.21::

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD

002716
002720
002722
002724
002726
002730
002732
002734
002736
002740
002742
002744
002746
2750
2752
02754
2756
002760

OCOO0TOPLOOOOOOOO

ZRCFR4

VAX-1 18 1 iss-16 V4,0-579
USER$ 1:( A ZTEC.CZRCFC)ZRCFC4.B16;3

SEQ 0396
Page

(11

115
ZRCFB4
v03.0

002762
002764

002766
002770
002772
002774
002776

CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

27-Mar-1985 15:33:05
11-Jen-1985 08:19:20
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
. WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
. WORD
.WORD
. WORD
.WORD
.WORD

VAX-1 18 1 i98-16 V4.0-579
USER$ 1:( AZ TEC.CZRCFC)ZRCFC4.B16;3

SEQ 0397
Page

(11)

J15
ZRCFR4
v03.0

CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

27-Mar-1985 15:33:05
11-Jen-1985 08:19:20

003144
003146
vO3150
003152
003154
003156
003160
003162
003164
003166
003170
003172
003174
003176
003200
003202
003204
003206
003210
003212
003214
003216
003220
003222
003224
003226
003230
003232
003234
003236
003240
003242
003244
003246

003201
003254
104300
003202
003255
104307
003176
104201
003242
060002
103207
177740
115007
013115
115400
003210
106200
000012
003210
033050
003164
117400
003204
053050
000000
104307
003176
060014
103207
177740
115007
053155
104110
003201

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.HORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

3201
3254
-73500
3202
3255
-73471
3176
-73577
3242
60002
-74571
-40
-62771
13115
-62400
3210
-71600
12
3210
33050
3164
-60400
3204
53050
O
-7347}
3176
60014
-74571
-40
-62771
53155
-73670
3201

J 13252

000440

.WORD

440

.M3250

, 93254
403256
003260
003262
003264
003266
003270
003272
|003274
003276
003300
3302
3304
03306
3310
3312
3314
3316
03320
003322
03324

106200

003201
033137
003155
11540!
10411
003202
104117
103207
144000
053155

104117
103207
104000
106207
040000
053155
000000
115400
003241
106200
000144

.WORD

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

.WORD
.WORD

-71600

3201
33137
3155
-62377
-73670
3202
-73661
-74571
-34000
53155

-73661
-74571
-74000
-71571
40000
53155
O
-62400
3241
-71600
144

VAX-11 Bliss-16 V4.0-579
USER$Y: (AZTEC.CZRCFCJZRCF(C4.B16;3

SEQ 0398

Page

50
(11)

K15
CZRCFCO _RC2S FR END TEST
OFFSET TOLERANCE TEST
003241
033121
003164

27-Mar-198S
11-Jan-1985
.WORD
.WORD
.WORD
.WORD
.WORD

40000

5461
o

DM, 26::

.WORD
. WORD
.WORD
. WORD
.WORD
.WORD
. WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
. WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
. WORD
.WORD
. WORD
.WORD
.WORD

hOOO:OO‘OO OCOOO0O0O0COO0OOOCOOOO0OOO0OOO0O0OOO0OOOOOOO0O I OO0

ZRCFB4
v03.0

2524

16 Vv4.0-579
.CZRCFC)ZRCFC4.816;3

SEQ 0399 sy

ge(11)

L15
CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

ZRCFB4
v03.0
003510

052123
033062

000000

126411

104200

000040
003505
102200
000001
003506
013027

27-Mer-1985 15:33:05
11-Jen-1985 08:19:20

VAX-1 18 1 ise-16 vV4.0-579
USER$ 1:( AZ TEC.CZRCFC]ZRCFC4.B16;3

SEQ 0400
Page

(1 1)

M15
ZRCFR4
v03.0

CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

27-Mar-1985 15:33:05
11-Jen-1985 08:19:20

003672
003674
003676
003700
003702
003704
003706
003710
003712
003714
003716
003720
003722
003724
003726
003730
003732
003734
003736
003740

104200
000100
003504
104200
000140
003505
104200
144000
003472
000000
104300
003504
003503
023236
023177
023116
023362
023137
023177
023160

HORD
'WORD
.WORD
WORD
WORD
.HORD
WORD
HORD
_WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD

-73600
100
3504
-73600
140
3505
-73600
-34000
3472
O
-73500
3504
3503
23736
23177
¢'3116
03362
23137
23177
23160

003744
003746
003750
003752
003754
003756

023177
023137
023362
023116
023177
023160

WORD
WORD
WORD
WORD
WORD
WORD

23177
23137
23362
23116
23177
23160

003762
003764
003766
003770
003772
003774
003776
004000
004002
004004
004006
004010
004012
004014
004016

104300
003505
003503
023236
023177
023116
023362
023137
023177
023160
000000
023177
023137
023362
023116

003742

003760

WORD

WORD
WORD
.WORD
HORD
HORD
JWIRD
WORD
HORD
HORD
.HORD
WORD
HORD
JHORD
.HORD
JWORD

004020
004022
1004024
004026
030
032
00¢734
236
4040

023177
023160
000000
104307
003506
104301
003503
104302
003501

WORD
.WORD
WORD
WORD
MORD
'WORD
WORD
MORD
"WORD

CJ4044
046
004050
04052

104070
003476
103207
177740

MCRO
.HORD
WORD
WORD

3042

060015

.WORD

-73500
3505
3503
23236
23177
23116
23362
23137
23177
23160
0
23177
23137
23362
23116
23177
23160
0
-73471
3506
-73477
3503
-73476
3501

60015

-73710
3476
-74571
-40

VAX-11 Bliss-16 V4,0-579
USER#1:[AZTEC.CZRCFCIZRCFCA.B16;3

SEQ_0401
Page
53

(11)

N15
ZRCFR4

CZRCFCO _RC2S FR END TEST

v03.0

004054
004056
004060
004062
004064
004066
004070
004072
004074
004076
004100
004102
004104

004106
004110
004112
004114
004116
004120
004122
004124
004126
004130
004132
004134
004136
004140
004142
004144
004146
004150
004152
004154
004156
004160
004162
004164
004166
004170
004172
004174
004176
004200
004202

004204

[—-

004206
210
212
214
216
220
222
224
226
230
232
234

27-Mer-1985 15:33:05

OFFSET TOLERANCE TEST
115007
053115
106020
003501
053115
000000
003424
114007
104301
003475
100671
003566
115407

106207
000377
033121
104207
003566
104201
000400

104010
004166

114007
104301
003474

100671
003566
115407
106207
000377
033142
104207
003566
104201
000400
060004
104010
004166
104301
003477
114007
104672
003566

106012
053174
115407
106207

000377
033163
000000
104020
003500
003424
104200

11-Jen-1985 08:19:20

.HORD
.WORD
.WORD
.WORD
.WORD
LHWORD
.WORD
.WORD
.WORD
.WORD
.WORD
.HWORD
.HORD

LWORD
.WORD
.HORD
.WORD
.WORD
.WORD
.WORD
.WORD
WORD
WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.HORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.MORD
.WORD

-62771
S3115
-71760
3501
S3115
0
3424
-63771
-73477
3475
-77107
3566
-62371

-71571
377
33121
-7357%
3566
-73577
400
60004
-73770
4166

-63771
-73477
3474

-77107
3566
-62371
-71571
377
33142
-73571
3566
-73577
400
60004
-73770
4166
-73477
3477
-63771
-73106
3566

.WORD
.WORD
.WORD
LWORC

-71766
S3174
-62371

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
NV

377
33163
O
-73760
3500
3424
7700

. WORD

71571

SEQ 0402
Page
5S4
USER$1:(AZTEC.CZRCFC)ZRCFC4.B16;3
(11)
VAX-11 Bliss-16 V4.0-579

ZRCFR4
v03.0
004236
004240

CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST
100000
003552

27-Mer-1985 15:33:05
11-Jen-1985 08:19:20
.WORD
.WORD
.WORD
WORD

WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORC
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD

.WORD
.WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD

.WORD
.WORD

WORD
.WORD
.WORD
WORD
WORD
WORD
WORD
WORD
WORD
WORD

-100000
3552
-73600

3566
3555
-73500
3467
3556
-73500
3470
3557
-73500
3467
3564
-73500
3470
3565
-73471
3306
-73577
3552
60002
-73710
3476
-74571
-40
-62771
13235

3424
O
23074
-64000

3502
-73471
3506
60014
-73710
3476
-74571
-40
-62771
S3361
-63776
-73665

-71165
2

53262
-71165
4
13306
-71165
4
53270
-7116S
6
13306

VAX-11 Blise-16 V4.0-579
USER$1:(AZTEC.CZRCFC)ZRCFC4.816;3

SEQ 0403

Page

55
(11)

Clé
ZRCFR4
v03.0
004420
004452
004424
004426
004430
004432
004434
004436
004440
004442
004444

004446

004450
004452
004454
004456
004460
004462
004464
004466
004470
004472

CZRCFCO RC25S FR END TEST
OFFSET TOLERAWNCE TEST
002
053276
106613

000006
013306

104613

000002

106613

000004

053361
106613
000006
053361
115002
053316
104030
003467
115401
104202
1771777
003253
104030
003470
104300
003467
003502
103200
177740
003502
102200
000001
003467
053361
102200
010000
003470
053361
106300
003472
003470
053361
104302
003467
105202
000000
103202
000037
110602
110602
110602
110602
110602
106302
003473
053361

000000
003424

27-Mar-1985 1 5:33:0 5

11-Jan-1985 08:
8:19:2
120

.WOR

[ oRD

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD

.WORD
. WORD
.WORD
.WORD
. WORD
.WORD
.WORD

. WORD
.WORD
. WORD
.WORD
.WORD
. WORD
.WORD

. WORD
.WORD
.WORD
. WORD
. WORD
. WORD
.WORD
. WORD
.WORD
. WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
. WORD
. WORD
.WORD
.WORD
.WORD

. WORD
.WORD

§3276

-71165
6

13306

-73165

-71165

53361

-71165

53361

-62776
53316

VAX- 11 8 lis 8-16 V4,0-579
USER $1:(AZT C CZRCFC)ZRCFC4.B16;3

SEQ 0404
56

(11)

D16
ZRCFB4
vV03.0

004744
004746
004750
004756
04760
004762

CZRCFCO RC25 FR END TEST
OFFSET TOLERANCE TEST

27-Mar-1985 15:33:05
11-Jan-1985 08:19:20

VAX-1 186 1 is8-16 V4,0-579
USER#¢ 1::[(A
( ZTEC.CZRCFC)ZRCFC4.B16;3

SEQ_0405
Page

(11

E16
ZRCFR4

CZRCFCO _RC25 FR END TEST
OFFSET TOLERANCE TEST

vV03.0

013455
002744
117400
003501
023461
060010
104207
003476
104201
000006
060022

005066
005070
005072
005074
005076
005100
005102
005104
005106
005110
005112
005114
005116
005120
005122
005124

[005126
005130
005132
5134
005136
5140
05142
005144

000000

(2lededeleofalotolofetoToloto
Yool oYoYoXo YooY oY o Yo Yo Yo Yo Yo YeloYoTo Yo Toto Yo T o)

004764
004766
004770
004772
004774
004776
005000
005002
005004
005006
005010
005012
005014

27-Mar-198S 15:33:05
11-Jen-1985 08:19:20

VAX-1 1 B 1i 89-16 V4.0-579
USER$ 1. ( AZ TeC. CZRCFC]ZRCFC4 B16:3

SEQPO406 58

ge(11)

F16
CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

27-Mar-1985 15:33:05
11-Jan-1985 08:19:20

005146

.WORD

DM.27::

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

.WORD
.WORD
.WORD
.WORD
.WORD

104206
003377
022750
022756
022776
023040
023305
060010
104207
003320
104201
00001
060023
000000
114000
003321
104200
000040

003322
102200
000001
003320
012775

104200

000100
003321
104200
000140
003322
000000

005326

114000

003330

.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD

OCOOHOLOOOOOOO

ZRCFB4
v03.0

VAX-1 18 1 ise-16 V4,0-579
USER$ 1:( AZ TEC.CZRCFC)ZNCFC4.816;3

SEQ 0407
Page
59
(1 1)

CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

ZRCFB4

v03.0

27-Mar-1985 15:33:05
11-Jan-1985 08:19:20

003300
000000
023170
114000
003324
114000
003325
115400
003324
107200

000001
003325

104300

003324
003326
023100
023225

115000

003316
053077

023170
104300

005506
005510

003325
003326
023100
023225

115000

-WORD

"WORD

-WORD

VAX-1 18 1 iss-16 V4,0-579
USER$ 1:( A ZTEC.CZRCFC)ZRCFC4.B16;3

SEQ 0408
Page

(1 1)

H16
CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

ZRCFR4

v03.0

005512
005514
005516
005520

003316
053077
104300
003324
003334
003045
000000
114000
003327
104307
003320
104301
003326
104202
000174
060013

103207
177740
115007

013124
115400
003327
106200
000012
003327
033102
003300
000000
104307
00332¢C
060014
103207
177740
115007
053161
104110
003313
106200
000440
003313
033143
003161
1.5401
104110
003314
104117
103207
144000
053161
104117
103207
104000
106207

040000
053161
000000

115400

27-Mar-1985 15:33:05

11-Jan-1985 08.19:20

VAX-1 18 1 iss-16 v4,0-579
USER$ 1:( A ZTEC.CZRCFCJ)ZRCFC4.B16;3

SEQ 0409
Page

Q1 1

116
ZRCFB4

v03.0

005674
005676
005700
005702
005704
005706
005710
005712
005714
005716
005720
005722
005724
005726
005730
005732
005734
005736
005740
005742
005744
005746
005750
005752
005754
005756

CZRCFCO RC2S FR END TEST
OFFSET TOLERANCE TEST

27-Mar-1985 15:33:05
11-Uan-1985 08:19:20
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
.WORD
.WORD
. WORD

. WORD

.WORD
.WORD
.WORD
.WORD
. WORD
.WORD
.WORD
. WORD
.WORD
.WORD
.WORD
. WORD
. WORD
. WORD
.WORD
.WORD
.WORD

006052
006054

.WORD
.WORD
.WORD
.WORD
. WORD
. WORD
.WORD
.WORD
.WORD

ise-16 V4.,0-579

ZTEC.CZRCFC)ZRCFC4.816;3

SEQ 0410

Page(162

J16
IRCFB4

CZRCFCO _RC25 FR END TEST

v03.0

006056
006060
006062
006064
006066
006070
006072
006074
006076
006100
006102
006104
006106
006110
006112
006114
006116
006120
006122
006124

27-Mer-1985 15:33:05

OFFSET TOLERANCE TEST
003413
104307
003320
104201
003400
060002
103207
177740
115007
013267
115400
003316
104307
003400
102207
020000
013276
115400
003317
104267

11-Jan-1985 08:19:20

.WORD
.WORD
.WORD
.WORD
.WORD
.HORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

3413
-73471
3320
-73577
3400
60002
-74571
-40
-62771
13267
-62400
3316
-73471
3400
-75571
20000
13276
-€2400
3317
-73511

006126

000000

.WORD

006132
006134
006136
006140
006142
006144

000106
003333
023305
060010
104207
003333

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

106
3333
23305
60010
-73571
3333

006130

006146
006150
006152
006154
006156
006160

006162
006164
006166
006170
006172
006174
006176
006200
006202
006204
006206

006210
206212
006214
216
006220
006222
006224
006226
230
232
006234
006236

104200

104201
000002

060022
000000
000000
140000

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000

000000
000000
000000
000104
000000
000000
000000
000000
000000
000000
000000
000000

.WORD

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
hutd

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

-73600

-73577
2

60022
O
O
-40000

O
¢
O
O
O
O
9O
O
O
O
0

O
O
O
104
O
O

O
O
O
O
O
O

VAX-11 Bliss-16 V4.0-579

USER$1:[AZTEC.CZRCFC)ZRCFC4.816;3

SEQ 0411

Page

(11)

{16
ZRCFR4

CZRCFCO RC2S FR END TEST

vV03.0

006240
006242
006244
006246
006250

006252
006254
006256
006260

006262
006264
006266
006270
006272
006274
006276
006300
006302
006304
006306
006310
006312
006314
006316
006320
006322
006324
006326
006330
006332
006334

27-Mar-1985 15:33:05

OFFSET TOLERANCE TEST
000000
000000
000000
000000
000000

000000
000000
000000
000000

11-Jan-1985 08:19:20

.WORD
.WORD
.WORD
LWORD
.WORD

O
O
O
O
O

.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WGRC
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
O
-57303
O

WORD
.WORD
.WORD
.WORD

000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
000000
120475
000000

USER$1:[AZTEC.CZRCFC]ZRCFC4.816;3

O
O
O
O

SUMMARY

®c

PSECT

VAX-11 Bliss-16 V4,0-579

Psect Name
DM$CODE

S
H

;

Words
1647

Attributes
RO,
D

GBL,

REL,

CON

Librery Stetistics
File

USERS$1:(AZTEC.CZRCFCIAZTECO.L16;2

e Symbols ------

Totsl

Loaded

Percent

485

COMMAND QUALIFIERS

Pages

Processing

00:00.2

Mapped

Time

SEQ 0412

Page

64
1

L16
2RCFRA

CZRCFCO RC2S FR END TEST

v03.0

®¢

@¢

OFFSET TOLERANCY

TEST

BLISS/PDP11/LIST ZRCFCA4.B16/EN:NOEIS
Size:

Run Time:

Elapsed Time:

0 code +

1647 detas words

03:08.2

03:20.4

Lines/CPU Min:
1026
Lexemes/CPU-Min: 20841
Memory
Used:
442 pages
Compilation Complete

27-Mar-198S 15:3 3:0 S
11-Jan-1985 08:1 9:2 0

VAX- 11 8 lis
8s-16 V4,0-579

AZ TEC.CZRCFC)ZRCFC4.B16;3
USER $1:(AZ

SEQ 0413

Page

65
(11)

M16
ZRCFBS

H
:

0001
0002

27-Mar-19 85 15 3 6: 31
11-Jan-19 85 08 i Q 121
.

0
1

MOOUWLE ZRCFBS =

BEGIN

VAX-11
USER$]:

8-16 V4.0 579
EC.CZRCF CJZRCFCS5.B16;1

SEQ 0414
Page

(1)

ZRCFBS

LASTAD AND SETUP

;0003
0004
:
000S
:
0006
:
:
0007
;1496
;
1:33

1
1
1
1
1
1
1

1499 1

;1501
2
1502 1
i
:

1500

000000
000000
000002
000004

000000

11-Jen-1985 08:19:21

%SBTTL 'LAST ADDRESS AND SFTUP SECTION'

BGNSETLP
(0);
ENDSETUP;
LASTAD;

JPSECT
BLSLAS::.WORD
WORD
TSFREE::.WORD

#XYZ$,
RO
TSFREE
<<T$FREE-<BLILAS+4>>/2>
O

000004 *
000000

LSLAST ==
T$PTHV==

000207

.SBTTL
$END.LINK::

BLSLAS+4
0

RTS

1 word,

Maximum stack depth per

Routine Base:

invocation:

0 words

$END.LINK LAST ADDRESS AND SETUP SECTION
PC

;

1497

§$XYZ$¢ « 0006

END

ELUOOM

®s

PSECT SUMMARY
Psect Neme

Words

$XYZ$

Attributes

RO,

LCL,

REL,

CON

Library Statistics

;

(2)

LIBRARY 'AZTECO';

000004
000000C
000000

1
1
O

USER#1:[AZTEC.CZRCFC)ZRCFCS.B16;1

04
> £Q nggis
P

REQUIRE 'BLSMAC.REQ';

ZRCFBS LASTAD AND SETUP

;1503
;1504
1505
;:

VAX-11 Bliss-16 V4.0-579

STITLE ‘LASTAD AND SETUP'
'
'

.TITLE

; Routine Size:

Bl
27-Mer-1985 15:36:31

File

USER$1:(AZTEC.CZRCFCJAZTECO.L16:2

seeeeees Symbols --------

Total

Loaded

Percent

485

Pages

Processing

00:00.3

Mapped

Time

Cl
ZRCFRS

LASTAD AND SETUP

LAST ADDRESS AND SETUP SECTION

COMMAND QUALIFIERS

BLISS/PDP11/LIST ZRCFCS.B16/EN:NOEIS

L'sz\eflfle

le¢

+ 3 data words

88?19.0

Elepsed Time:
00:20.3
Lines/CPU Min:
4752
Lexemes/CPU-Min: 24031
Memory
Used:
95 pages

Conpu!at;on Complete

27-Mer-1985 15:36:31
11-Jen-1985 08:19:21

VAX-11 Bliss-16 V4,0-579

USER$1:[AZTEC.CZRCFCIZRCFCS.B16;1

04 16
SEQ QPa

(2)