Digital PDFs

AH-T760A-MC-MONO

April 1984

427 pages

Original

16MB

view download

OCR Version

18MB

view download

Document:	CNRQAA0 RD51, RX50, RQDX1 Exersizer Diagnostics
Order Number:	AH-T760A-MC
Revision:	MONO
Pages:	427
Original Filename:	CNRQAA0__11-21,RD51,RX50__RQDX1_EXERCISER__AH-T760A-MC__APR_1984_bw.pdf

OCR Text

155

i RS0

CHNROARAD

AH-T760A-NC

FIGHE L OF 3

] ifalilt]a]

ROS1 Rx50

CHREAAD

Ct)

AH=-T7E60A-MC

FIGHE Z OF 3

el ol1]l

ROS1 s
g

RODXL EXERCISER

_CNREARAO

b |
15 Dec
15 Dec

NRQAM.

0Co1

module NRQAML

stitie

0002
0003

wD /RX EXERCISER
ident =

G
Ve
G
Br
Ws

OOOOOOOOONOO0O0OONOOONOONOOOOOOOONONNNN

Ot
Ge
B
G2
Ve
G2
WS
v
Be
OF
B0
Gt
B2
V5
Br
WO
C+
Be
Gs
9
B
Ge
Be
B
B
We
Bs
B
B
B
B0
G5
e
Br
Gr
Be
Be
B¢
Gt

‘Vv0l1.0

addressing mode (absolute’,
en. ronment (noe’'s)

90C7

0015
0016
0017
0018
0019
0020
0021
0022
0023
0024
0026
0027
0028
0029
0030
0031
0032
0033
0034
0035
003%6
0037
0038
0039
0040
0041
0c42
0043
0044
0045
0046
0047
0048
0049

SEQ 01

P
VAX-11 Bliss-16 Vv3-555
1
age
SPIDERSUSERS
: (DOUCETTE ,F ALCONICNRIAA , 8L 1 r )

(

0005
0008
0009
001¢
0011
0012
0013
0014

1983 10:24:41
1983 10:21:50

)

b.g:n

L1¢

IDENTIFICATION

PRODUCT

CODL :

AC-TT7S9A-MC

PRODUCT

NAME :

CNRQAAO RQDX1 EXERCISFR

PRODUCT

DATE:

DECEMBER

19,

1983

MAINTATINER:

IS5 DIAGNOSTIC SERVICES

AUTHOR :

JAMES S.

COPYRIGHY (C) 1983
DIGITAL EQUIPMENT CORPOTRATION,
THIS SOF TWARE

IS FURNISHED

ODOUCETTE

MAYNARD,

MASSACHUSETTS

01754

UNDER A LICENSE FOR USE ONLY ON A SINGLE

COMPUTER
SYSTEM AND
MAY BE
COPIED ONLY WITH
THE INCLUSION OF THE
ABOVE COPYRIGHT NOTICE.
THIS SOFTWARE, OR ANY LTHER CCPIES THEREOF,
MAY NOT BE PROVIDED OR

OTHERWISE MADE AVAILABLE

TO ANY OTHER PERSON

EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES YO THESE L ICENSE
;ER:SI? ILIIT)‘E-E TO AND
OWNERSHIP OF THE
SOF TWARE
SHALL AT ALL TIMES
MAIN

THE

INFORMATION IN

THIS DOCUMENT

g&m& NOT BE CONSTRUED

IS SUBJECT

TO CHANGE WITHOUT NOTICE

AS A COMMITMENT

8Y DIGITAL

EQUIPMENT

DEC ASSUMES
NO
RESPONSIBILITY
FOR
THE USE OR
RELIABILITY OF
SOF TWARE ON EQUIPMENT WHICH IS NOT SUPPLIED 8y DEC.
THE FOLLOWING ARE

DIGITAL
DEC

TRADEMARKS OF

PDP

DECUS

DIGITAL

UNIBUS

DECTAPE

EQUIPMENT

CORPORATION:

MASSBUS

ITS

{

NRQAM]

RD-RX EXERCISER

WO1.]

:
H
H

15 Dec 1983 10:¢4:41
15 Dec

198€%

VAX 11 Bliws 16 v3 555

10:21:50

€ 0051
€ 0CSe

3
:

C 005%
C 0054

The following changes were made to CZRQAB in producing CNRQAA for the
FALCON PLUS project (SBC 11/21:).
Release date December 19, 1983.

:
s
:
H
:
:

C
C
o
€
€
(CZ

Lowered the chorol operating priority of the program from level
to level
6 to allow the BREAK key to interrupt end invoke
00T,

Set

H
H
i

C 0064
€ 0065
C 0066

Due to space limitat ons,
messages
).

Changed

:
:
H
H
:
H
H
;
:
:
:
i
:
:
H
H
H
:

H
H
;

:
:
;
H
;
:
H

H
H
H
;
:
:

s %22

C
€
C
C
C
C
C
C
€
C
C
C

All changes are marked by

0057
0058
0059
0060
0061
%g

0069
0070
0071
0072
0073
0074
0075
0076
0077
o078
0079
0080

"!JSD REV A",

the 00T BREAKK vector (location 140) to the starting address
of FALCON's ODT ROM (170000-octal).

the default

removed all references to DBM's (debug

address

from

172150

ottt
c e eeitea i cee e

TABLE OF CONTENTS
1.0
1.1
1.2
1.2.1
1.2.2
1.3
1.4
1.5
1.6

GENERAL INFORMATION
PROGRAM ABSTRACT
SYSTEM REQUIREMENTS
HARDWARE RFQUIREMENTS
SOFTWARE REQUIREMENTS
RELATED DOCUMENTS AND STANDARDS
OIAGNOSTIC HIERARCHY PREREQUISITES
ASSUMPTIONS
MEMORY MAP

2.0
2.1
2.2

OPERATING INSTRUCTIONS
HARDWARE QUESTIONS
SOF TWARE QUESTIONS

C 0087
C 0088
C 0089

3.0
3.1
3.2

ERROR TYPES
ERROR INFORMATION
INITIALIZATION ERRORS

C
C
C
(C:

0093
0094
0095
%

3.6
5.7
5.8
4.0

SAMPLE MSCP ERROR STATEMENT
DUP ERRORS
SAMPLE DUP ERROR STATEMENT
PERFORMANCE AND PROGRESS REPORTS

0098
0099
0100
o101
0102
0103
0104
o 0105

S.0
S.1
5.2
5.3

TEST SUMMARY
INITIALIZATION SUBYEST
EXERCISER
DROP UNIT SUMMARY

6.0

ERROR LIST

7.0

DATA PATTERNS

C
C
C
C
Cc
C

0081
0082
0083
0084
0085
0086

C 0090
C 0091
C 0092

C
C
C
C
C
E

3.3
3.4
3.5

EXERCISER ERRORS
ERROR LOG MESSAGES
MSCP ERRORS

176150.

Pege

SPIDERSUSERS:
[DOUCETTE ,FALCONICNRQAA BLL

REVISION HISTORY

< 0050

SEQ ULy

(¢,

D1
NRQAMI

RD-RX EXERCISER

VO1.¢
:

C 0106

1.0

GENERAL INFORMATION

C 0110

1.1

PROGRAM ABSTRACT

C o108
€ 0109

H
:

¢ 0111
C o112

:
i
H
:
§
H
:
:
H
:

H
:
:

:
:
:

H
:
:
H
H

C o113
C 0114
C 0115
C o116
co11”
C o118
co119

C 0120
€ o121
C 0122

C 0123
C 0124

c g%:z
C

1983 10:21:50

VAX

SYSTEM REQUIREMENTS
eaaa----

device (eg.
RD-51 W

VI100), RQDX1 CONTROLLER bosrd, snd attached
STER drive(s) and/or RX-S0 FLOPPY drive(s).

1.2.2 SOFTWARE REQUIREMENTS
et
e

This
disgnostic
is
designed
to run with the D agnostic
Supervisor as described in parasgraph 2.0.
=

1.3

RELATED DOCUMENTS AND STANDARDS
eeecrmccececacccrem
e aa
XXOP+
UQSSP
MSCP
DUP

1.4

SUPERVISOR/USERS MANUAL
CHQUS
UNIBUS/Q-BUS STORAGE SYSTEMS PORT
MASS STORAGE SYSTEM PROTOCOL
DIAGNOSTIC/UTILITIES PROTOCOL

DIAGNOSTIC HIERARCY PREREQUISITES
e

C 0145

C 0146

NONE

1.5

11 Bliss 16 V3 555

SEQ 0UN
7

Pege

SPIDERSUSERS:
[DOUCETTE .FALCONICNRGAR .BLL (2

1.¢.1 HARDWARE REQUIREMENTS
eeeeeeeeiecieiaaas

0144

C 0147
C 0148
CO0149
C 0150
C 0151
C 0152
C 0153

10:24:41

SBC-11/21+ processor with 28KW memory ( jumpered for memory
map 02, CNDP+ (XXDP+) load device (e.g.. RX02), console

C 0129
CO130
€ 0131
C 0132
E ggz

:
;
:
H
:
:
H

1.2

C 0126
E Olg;

C 0135
CO136
C 0137
C 0138
C 0139
C 0140
g 8{:5

1983

This program will functionaily verify
and exercise RQDX1
Controller/Disk Dr've subsystems. It is designed to verify
that the subsystem
is functioring correctly and operating
within design specifications,

€ 0125

:
:
H
:
3
:
§

15 Dec

C 0107

:
:

15 Dec

ASSUMPTIONS
e
The hardware,
other then
the
subsystem
being
tested
assumed to work properly.
False errors
may be reported
cne processor, memory, etc., do not function properly.

is
if

NRQAM]

RD/Rx EXERCISER
0154
0155
0156
0157
0158

0159
0160

1.6

15 Dec

1983

1983 10:21:50

Memory

layout on 28k
- -

machine

CNDP+ environment
-

0161

ADDRESS

0163

160000

IS sma

&
cmIwIw

MONITOR

I/0 AREA

TTY

0172
0173
0174
0175
0176
0177
0178
0179
0180
0181
0182
0183
0184
0185
0186
0187

BB
T@ e e

0189
0190
0191
0192

P
S

e
- rmen
-

v
m

-4

m
P4
[g]

@
o cmem

>
(=]
x
[

-4

400

LT T p

<
m
(]

2000

rmem
‘o

121000

0188

CNOP

tmem
e

CNDP.

BB
IR B i

0171

BB IS

0167
0168
0169
0170

0162

0164
0165
0166

10:24:41

MEMORY MAP

alalalnlalglialslislislnlsislialslislialslnlialnliglsligislislialslialalalnlalalalialslaly)

B¢

W00

15 Dec

In & machine
with more memory,
free space will ocuur
between the exerciser and the DRS,

VAX

11 Bliss

16 v3-555

SEQ o4

Page

SPIDER$JSERS:
[DOUCETTE . FAI CONITNRQAL 811 "4,

T
NRQAM1

RD/RXx EXERCISER

vO01.¢
H

C 0193

:
i

C 0195
C 0196

:
:
:
H

C
C
C
C

C 0197

C 0202
¢ 0203
C 0204

H
H
:
:
:
:
:
:

C 0206
€ 0207
C 0208
C 0209
C 0210
coclr
C 0212
C 0213

:
:
H
H
H
:
H
H
:
H
H
:
:
:
:
;
H
;
H
:
:
;
:
:
H
:

:
H
:
:

C0205

E 021;
021
C 0216
€ 0217
C o218
C 0219
C 0220
C 0221
C 0222
C 0223
C 0224
€ 0225
C 0225
C 0227
C 0228
C 0229
C 0230
C 0231
C 0232
C 0233
C 0234
C 0235
C 0236
C 0237
C 0238
E 8523

C
C
C
E

0241
0242
0243
0244

0245

1983 10:24:41

VAX-11 Blies-16 v3-55S

15 Dec 1983 10:21:50

Supervisor

Diagnostic:

for operating

nstructions,
please see chapter S of XXDP+ operator's
menual.
They are no longer
included ir the disgnostic
because
it is desired
that a change in those instructions not require s re-assembly of all Supervisor Diag
nostics.
=

2.1

HARDHARE QUESTIONS

s eeceeeaesees

The
following series
of questions
comprise the para
meters necessary to ident’
fy each disk subsystem,
Hardware Conf.gurot-on Quest ‘ons
eeeees
e -

The

program

will

ask

the

following

response to a START command (non-script).

CHANGE HW (L) Y

aquesti ons

Answer NO to use the pre-built answers for all
hardware
questions.
This
progrem will be released pre-built to
test three unit with defsult answers
shown below.
The
pre-built
enswers
may
be changed at any
time with the
setup utility.
Answer YES i f you want all
the
hardware
questions to be asked.
2.

NUMBER OF UNITS (D)

No default.
Answer with the number of
disk drive units
to be exercised or tested.
This
answer will determine
how
many
times
the
following questions are asked.
A
r
of 1 to 4 units
mey be specified.
A unit number
will
be sssigned
seaquentially from O
by the Diagnostic
supervisor for esch unit,
3.

IP ADDRESS (0)

176150 ?

Enter the address of the IP register of one RQDX1 uss ad
dressed
by
the processor with memory management turned
off.
The 90880.. expects sn even 16-bit address in
the
range of 16
to 177774,
176150 is the default.

VECTOR ADDRESS (0)

154 ?

Answer
with the
sbove
question,

interiupt vector of seme
RQDX1 in
the
A vector
address in the range of 4 to

774 may be specified.

154

is the default.

SEQ 0ucs,
Page

SPIDERSUSERS: [DOUCETTE .FALCONICNRQAL BiL1 7S

OPERATING INSTRUCTIONS

This s a Rev C

0198
0199
0200
0201

:
:
H

;

2.0

C 0194

15 Dec

G
NRQAM1
vOl1.C

RDRX EXERCISER

:
H
:
H
H
:
:
:

C
C
C
C
C
C
C
C

0246
0247
0248
0249
0250
0253
0252
0222

:
:
:
.
H

C
C
C
C
C

0255
0256
025~
0258
0259

:
:

g 0261
0262

;

:
.
;
:

E gggg

.
:
:
:

C
C
C
E

g gggi

:
:

C 0295
C 0296

C
C
C
C
E

€
C
C
C

RDS1

YES

RX50

ALSO EXERCISE DIAGNOSTIC AREA (-NON-CUSTOMER AREA) ?
A "Yes"” answer to this question will turn on the DUP
(Disgnostic/Utilities Protocol) Exerciser.
The DUP Exerciser will reesd the DBNe (Di
tic Blocks) ina
sequential order from 0 to octel
(217). DBNs cen only
be eccessed throw DUP protocol meking the blocks unreschable through normal customer use.
The DUP Exerciser is
contained in the middle of the MSCP (Mases Stor
Control
Protocol) Exerciser which reads LBNs (Logical blocks).
So physically @ 183. amount of LBNs will
be READ and/or

‘

0280
0281
0282
0283
83:;

WRITTEN then the
Exerciser will turn on end READ
end/or WRITE @ few DBNs. The DUP Exerciser will then
reinitialize the controller so the MSCP Exerciser can
continue where it left off. The processes of reinitializing takes & few seconds.

0288
0289
0290
gggé

0297
0298
0299
0300

TYPE:

question.

0271
0272
0273
0274
0275
0276
0277
0278
0279

ENTER UNIT

Question will be asked to determine the type of disk
that this particular unit is; either RDS1, or RXS50.
The
software will
not check for the correctness of the configuration
as indicated by the snswers to the UNIT TYPE

C 0268

C
C
C
C
€
C
C
C
€

:
:
:
:

0265
0266
C 0267

:
H
H
:
H
H
:
:
H

RQ@DX1 DRIVE NUMBER (D) 0 ?
Enter the
logical unit
number for one drive associated
with the
IP address
above.
Drive
numbers are
in the
range
of O
through 3.
The
number
entered here must
match the unit plug on the front panel of the device.
0
is the default answer.

0263
0264

E 85?9

:
:
:
:
H

C 0260

C
C
C
C

BR LEVEL (D) 4 ?
Answer with tre bus request interrupt level used by
the
sbove RQDX1. Levels 4 through 7 are acceptable. 4 is the
default.

C 02

H
:

15 Dec 1983 10:24:41
15 Dec 1983 10:21:50

WRITE ON DIAGNOSTIC AREA?

A “yes” snswer to this statement will allow the DUP Exerciser to WRITE/REAC and compare the DBNs (Diasgnoatic
Blocks).
Where 8 “NO” snswer will allow the program to
READ only the DBNs.

NOTE
10.

¢+

IF yes ANSWER,

DATA ON DBNs WILL BE DESTROYED.

S5TARTING LBN (D) O ?

Enter the starting logical block number of the
customer
dats ares that you are going to test. LBNs
renge from O
to
21599
(RDS1),
or
O to 799
(RXS50),
with O as the
default.

SEQ 0006

VAX-11 Blies-16 v3-555
6
SPIDERSUSERS: {DOUCETTE, FALCON]CNRQAA BLl (6,

NRQAML
vO1.¢
H

RD/RX EXERCISER
c 0301

;

C OSO‘

Answer th's question for the last customer LBN you w'sh

;

€ o308

NOTE: The two previous

;

E 8;1;

C 0319

Answering YES will destroy any

C 0320
E gggé

appear,

C 0323

s¢ WARNING - CUSTOMER DAA AREA WILL BE OVERWRITTEN!

C o328

This question will default to NO
cided
to
bypsss
the
hardware
there is no default.

H
:
:
H
;
:
:
:

H
H
H
H
:

€
C
C
C
C
C
E

C
C
C
C

0324
0325
0326
0327

799, RDS1: 21599) (D) 21599 ?

to test.
LBNs range from O to 21599 (RD51), or O to 799
(RX50), with 21599 (or 799) as the default.

0309
0310
0311
0312
0313
0314
82%2
1

RX50:

VAX-11 Bl'ss 16 V3-555
Page
7
SPIDERSUSERS:
[OOUCETTE . FALCONICNRQAA .BLL (7,

E gggg
C 0305
E 838?

ENDING LBN (MAX

SEQ 00L7

1983 10:24:41
1983 10:21:50

H
H
:

11.

15 Dec
15 Dec

aquestions are generally Software

Parameter questions,
but since two different disk
dev 'ces exist on the RQDX1 subsystem, this becomes
a unit by unit question. It is possible to specify
an LBN wh'ch
is too large
since we
are dealing
with different devices. The program will check for
block number bounds and if they are exceeded, will
assign the maximum bound for that device.

12.

EXERCISE ON CUSTOMER DATA AREA ON THIS DISK UNIT (L) ?
customer data that

the disk; therefore, the folioning warning message will
followed by a confirmation prompt:

CONFIRM (L) ?

if the operator has de
questions.
Otherwise,

Il
NRQAM1

RD/RXx EXERCISER

vO0l.C

3
]

C 0329
C 0330

:
:
.

C 0332
C 0333
C 0334

:
.
:

0331

C 0337

C 0338

.
.
:
:

C
C
C
C

C 0345

:
.

H
:
:

C 03%9

C 0350

g g%

g 83328

s
:
;

C 0370
€ 0371
C 0372

0357
0358
0359
0360
0361
0362
0363
0364

0373
0374
0375
0376

C 0377

C o378
C 0379

and

de-

this answer to YES

urther

isolate

the

HARD ERROR LIMIT (D) 32 ?

$5535 will be accepted.

TRANSFER LIMIT IN MEGABYTES (0 FOR QUICK PASS) (D) 0 ?
When the specified number of bytes have been transferred
to/from
&
unit, the unit will
be dropped from testing.
When all units are dropped, an end-of -pass will be ind:
cated.
This
is
the method used to determine how long
the Exerciser is to run,
The
only other
way the
Exerciser will declare end-of
pass is if all units are dropped becasuse the error limit

C 036S

C
C
C
C

Then, depending on the errors

it may be desirable to chan

Enter the number of hard errors sllowed before a unit is
dropped
from
testing.
A number in the range of 1 tc

E oggz

C
C
C
C
C
C
C
C

;
H

C 0351
C 0352
0

response

Answer NO to bypass the following questions in this sec
tion,
This question should normally be answered NO when
the Exerciser is first run.
A NO answer will cause
the
Exerciser to select
the default parameters shown with
tected,

on each

exceeded.

abort the program st

4.,

However,

the operator cen always

<1y time by typing CONTROL-C.

PERCENTAGE OF RDS1 OPERATIONS OUT OF TOTAL OPERATONS (D) 99
In
order to maintein
typicel usege for the devices of
this
exercise,
o certain percentage of operstions must
be directed to the RDSis (the rest go to the RXS50s).
It

turns
out
thet this
percentage is very hi
cated by
the 998 figure given as the defsult).
desireble in
RX508.
This

centage

(as indiIt mey be
some ceses to
direct more activity
to the
is easily
done by directing a smaller per-

of the

operations to

the

RDS1s.

The numbers

sssociated
with
usege
are
adjusted internslly by the
program according to device type end percentage.

SEQ 0008

Peage

SPIDERSUSERS
: [DOUCETTE .FALCON]ICNRQAA .BLL (8,

to alter the test parameters
problem,

:
:
:
:
H
:
H
;

CHANGE Sw (L) Y

C 0346
C 0347

g 8;22

H
:
:
H

each question below.

C 0349

10:21:50

SOF TWARE QUESTIONS

C 0344

C 0348

1983

The progrem will ask the follow:ng questions ‘'n
to the
START, RESTART, and CONTINUE commands.

0340
0341
0342
0345

15 Dec

VAX-11 Bl 'es-16 V3-555

Software Parasmeter Questions

C 0335
C 0336

2.2

15 Dec-1983 10:24:41

B
RD/RXx EXERCISER
(alnXelznizinlininislslininialalisisinislisialinisinisinislinialininlislisialslinlalnlislislislislalslialislslislalaly)

®F

B¢

®s

&s
we @r

NRQAM1
vO1.¢
0380

0381

0382

0383
0384
0385
0386
0387
0388
0389
0390
0391
Oggg
0

0394

0395

same amount LBNs and DBNs.

g:g;

CLEAR STATISTICAL TABLES AFTER PRINTING (L) N ?

Answering YES causes the statistical fields to be clesr

ed to zero after the report is printed (either at end of
pass,
or at
operator
request).,
Otherwise, cumulative
totals are maintained.
7.

0403
0404
0405
0406

NUMBER OF DBNs READ AT ONE TIME (18) ?

The ratio of LBN tranfers to DBN trenfers DOESN’'T change

RANDOM SEEK MODE

(L) Y

Answer YES to cause block numbers to be chosen randomly.
Answer
NO to cause block numbers to be selected sequentially.
8.

0409

UNITS T0 BE SELCTED AT RANDOM (NO,

This

question is

question is N(o].

0412

question.

If the default

g:{;

the percentages specified

0411

sequential

0413
0414
0415
0416
g:;g

TMPLIES SEQUENTIAL) (L) N ?

optionally ssked if the answer to the

0410

The

selection of units for

operetions is affected by the answer to this

enswer is chosen (N[o]), then

units ohell be selected in &8 predetermined manner
in
accordance with the typical seek time margins for each
device. If the slternate answer is chosen (Y{es]),
¢then
the units will be chosen at rendom
in accordance with

in Software question 4.

READ-COMPARES PERFORMED AT THE CONTROLLER (L) N ?

0421
0422
0423

Answering YES causes 8ll read commands to
include
the
“compare” modifier,
This essentially forces the con
troller to perform two resd operations on the same disk

0426
&g;

The following message will sppesr after the operstor has
answered this question:

0429

THE REMAINING QUESTIONS ONLY

g:g;

address,

and to compare the results.

APPLY

SEQ 0G7s

VAX-11 B8l ss 16 v3-555
Page
9
SPIDERSUSERS:
{DOUCETTE .FALCONICNRQA! . BLL (9,

only the amount of DBNs read on one pass.
So the higher
this number the less reinitializing the progrem does and
the less time to run. The lower this number the more
rein'tislizations the longer smount of time to trenfer the

0397
0398
0399
0400

1983 10:24:41
1983 10:21:50

This variable adjusts the amount of DBNs read in one pass
of the DUP Exerciser.
The DUP Exerciser has to reinit
the controller every time it goes back into tive MSCP Exer
ciser.
This Herd reinitialization takes s few seconds.

0396

g:gé

15 Dec
15 Dec

TO UNPROTECTED DISK UNITS,

“ |
NRUAM

RD/Rx EXERCISER

VOl.¢

15-Dec

10.

0436
0437

0438

0439
0440

ceauses

all

chenged
to write-compare.
troller will read
the
deta
re obtained from the host.

11.

wr'te

requests

the

ly
after
the
extra CPU time,

0446

when device write-compare operations are suspect.

0445

quired

12.

0450
0451
0452
0453
0455

0456

0467
0468
0469

aues

for

write
operation.
This option consumes
and doubles the amount
of
storage
re

writes.

Therefore,

is only

recommended

USER-DEFINED DATA PATTERN (L) N ?

An answer of YES allows the operator to define
his/her
own
data pattern to be used in all write operations.
A
NO
onswer
will
eallow
the
operator
to
select
)
pre-defined data pattern in the next question.
13.

0458
0459
0460
0461
046>
0464
0465

tion
was
answered NO.
Answering
YES causes all writes
to be checked by the host by reading the data immediate

0443
0444

0448

the con
to
data

CHECK ALL WRITES AT HOST BY READING (L) N ?
This question will only be asked

044]
0442

I/0

After each write,
and
compare
't

SELECT PRE-DEFINED DATA PATTERN (0 FOR SEQUENTIAL SELECTION) (D) O ?

There are 21 predefined data patterns aveilaeble, selected
as
1
to
21 (see section 4.9),
A zero snswer will
cause patterns 1 to 21 to be seauentially
selected
for
each
write.
(Note that pattern 1 consists entirely of
random numbers).
14.

NUMBER OF WORDS IN DATA PATTERN (16 MAXIMUM)
PATTERN VALUES (0) ?

(D)

11 Bliss 16 Vv3-555

SEQ oL

Page

SPIDERS$USERS: (DOUCETTE.FALCONICNRQAR B

WRITE COMPARES PERFORMED AT THE CONTROLLER (L) N ?
Angwering YES

0434
0435

»
L 4

alnlsialsligininialalslinlalsinlinliaisislinlelinlslnisinlitialalalalnlslislislnlnlalals]

G
W
We
Sr
We
s
We
B
We
W
&
We
W
W
67
B¢
W?
Se
W
W
@
BT
B
S0
@
B
G2
Be
We
We
Be
Bs
BE
mI
@i
me
@
Be
®e
4

0431

0432
0433

VAX

15 Dec 1983 10:21:50

)

0430

1983 10:24:41

These questions will only be asked if the
operator
hes
decided
to define his/her own data pettern.
The actual
bit patterns will be entered as octel.

1 7 1¢

L1
NRQAM

RD/RX EXERCISER

(alzininlnlislislnininininisisielisinininlslisisinislialinisislislslislislialelslinlslisiainlslislnlialinls]

“v

®e

®s

VO1.¢
0470

0471

3.0

o472
0473

15 Dec

1983 10:24:41

15-Dec 1983 10:21:50

ERROR TYPES
--

0474
0475

This program has four types of error
classifications;
system fatal, dev'ce fatal, hard and soft.

0477
0478

SYSTEM FATAL ERRORS
B
.-

0480
0481
0482

System fatal errors are used to ‘ndicate that an error
was detected by the Diagnostic Supervisor 'n relation

0484
0485

The content
of each error is such that it should be
self eaxplanatory.
However,
the messages utilize some

0487
0488

require some getting use to.

0476

0479

to loading/controlling the diagnostic process.

0483

0486

0489
0490
0491

terms that are specific to the disk

0000

eceesies

emeeee-

Device fatal errors are a result of:

0494

an error that

0497

HARD ERRORS

0500
0501

Hard errors are s result of:

0495

1.
2.
3.

Oggg

0514

0515

considered fatal tc the device,

but

meae-

050?
0503
838;

0508
0509
0510
0511
8215

testing will continue.

0498
0499

and may

DEVICE FATAL ERRORS

0492

0493

subsystem,

retries of a soft error or s
a non-recoversble error
& soft error (f retrys are not set.
Note:

Retries are executed

in the controller

Soft errors
are media related errors.
will be retried by the controller.

All soft errors

SOFT ERRORS
eeeee eoa-

Note:

Soft errors are retrieved from the controller vis

the error

log

cepabilities of

MSCP,

VAX-11 Bliss-16 V3-555

SEQ 0011
Page

SPIDERSUSERS:([DOUCETTE.FALCONICNROAA.BL1 (1]

M
NRQAM1

KD /RX EXERCISER

vO1.C

15 Dec

1983

15-Dec-1983%

10:24:41

VAX-11 Blies-16 Vv3-555

10:21:50

:
H

C 0516

C 0517

C 0518
C 0519

ERROR INFORMATION

3.1

3
:
:
.
;
;

€
C
C
C
C
C

0520
0521
0522
0523
0524
0525

All general error messages will include the type of error
(system-fatal. device-fatal, hard, soft) and a unit number,
If the error applies to a controller, then only the first
unit number of the controller will be g'ven. (The user w'll
know the other unit numbers when subsequent
'drop un’'t’
messages are printed).

H
;
:

C 0527
C 0528
C 0529

Basic error messages provide more details about the
error. The Exerciser will print all basic
error messages,
slong with
the disk address,
if
applicable.
In some

E Oggé

the controller's IP address will be printed.

C 0533

:
:
:

H
:
:

C 0526

C 0530
0

error

messages will

be used to print

the

C 0538
E 8223

The error messages
in this section do not include
errors detected and printed by the Diagnostic Supervisor,

C 0537

C 0541

:
H

C 0547
C 0548

H
:

Extended

relevant fields of command and end message packets, status
codes, SA register contents, and error log messages.
All
values will be in octal.

C 0542
C 0543

where a device-fatal error applies to a controller,

C 0534
C 0535
C 0536

:
:

H
;
;

cases

C 0544
C 0545
C 0546
C 0549
C 0550
E 822%

3.2

INITIALIZATION ERRORS
R

Two kinds of errors
will be
reported to the operator
during the Initializetion Test. The System-fatal error is too many units specified.
A
system-fatal error will cause
the Exerciser to sbort.

Device-fatal errors only affect the

unit(s)

involved.

Testing
will
continue
on all other units.
This cless of
errors includes, but is not limited to. the following:

E 8222

C 0555

Vector

BR Level

Initialization sequence failure

Online failed

Access fa'led

:
:
:
H
H
:
:
:

C
C
C
C
C
C
C
C

0556
0557
0558
0559
0560
0561
0562
0563

Test

failure

Test

failure

Pege

SPIDERSUSERS:
(DOUCETTE .FALCONICNRIAA Bl 1 (12

)

SEQ 0012

N1
NRQAM1

RD ‘AX EXERCISER

vO1l.¢

1% Dec 1983 10:24:41

15-Dec 1983 10:21:50

)

C 0564

:
:

C 0566
C 0567

:
:

C 0565

€ 0568

C 0571
C 0572

C 0575

C 0576

C 0579

C 0581

reported during

MSCP end message packets.

this test will orig nate

The status code field ~

converted to text and printed as part of a basic

messsge.
Any subcode value
messages are enabled.

w'll follow if extende.

The following list represents some of the

C 0574

;
:

C 0570

C 0573

- -

Most errors

reported via MSCP:

Disk
unit went offline
detailing the reason)

€ 0580

Compare error

C 0582

Data error (a sub-code may follow)

C 0584

Drive error (a sub-code may follow)

C 0586

Host buffer access error

E 82:3

Media format error (a sub-code may follow)

:
H
;

H
:
:

C 0583
C 0585

C 0587

0590
0591
0592
0593
0594
0595

3.4

:
:
:

C
C
€
C
C
C

.
:
:
:
:

C 0597
0598
C 0599
C 0600
C 0601

3.5
00

:
:
:

C 0603
C 0604
C 0605

C 059%

C 0602

ror

error conditions

C 0577
C 0578

(a sub-code

may

ERROR LOG MESSAGES
R R
R
-

The contents of the error-log messages received from the
controller are printed as received,
oanJd should be deciphered
using the MSCP specs.
MSCP ERRORS
ceeeeceee--

An MSCP error occurs when the host receives an
Invalid
Commend End Message from the RQOX1.
In such cases, the host
will print out the erroneous command followed by the
reason
for the error.
If
extended printo ts are enabled, then the
entire contents of the end message will be displayed in octal
without

interpretation of the data.

SEQ 0C°?

Page

SPIDERSUSERS
: ([DOUCETTE.FALCONICNRQAA .BLL (.3

EXERCISER ERRORS

from

C 0569

3.3

VAX 11 Blies-16 v3 555

)

NRQAML

RD/RX EXERCISER

\‘ox.c

:
H
:
:
:

C
€
C
€
C

0606
0607
0608
0629
0610

:
:

C 0611
C 0612

C 0614

C 0616

H
H
:
:

:
:
;
:
:
:

C 0613

- SEQUENTIAL

COMMAND ; -MSCP -READ - COMPARE

LCONNECTION ID AND COMMAND AND MODIFIER GIVEN 10 JRIVE

END MLSSAGE FLAGS:

The

status

code

THERE ARE NO END FLAGS FOR THIS ERROR

an end

messages

broken

into two

C
C
C
C
C
C
C

0630
0631
0632
0633
0634
0635
0636

pieces. The first S bits represent the major stetus which is given
by the “invalid commend” message.
The 11 remeining bite represent
the sub-code,
which tells in greater detail the error in the controller.
The LBN is the logical
block on the disk the controller
wee trying to read.
The byte count refers
to the number of bytes
the controller wes going to read off the LBN., The sctual number of
bytes
transfered refers
to the
number of bytes
read before the

0638

set by

c 8228
-

C
C
C
C
C
C
C

C 0649

:
:

message.

STATUS CODE:
UNIT OFFLINE
{ STATUS CODE OF COMMAND
STATUS SUB-CODE:
NO VOLUME MOUNTED OR DRIVE OISABLED By SWITCH ! SUB CODE
B8YTE COUNT IN COMMAND XXXXX
INUMBER OF BYTES WANTED TO READ
ACTUAL @ OF BYTES TRANSFERED XxXXX !NUMBER OF BYTES ACTUALLY READ
1/0 BUFTER ADDRESS (32 BITS)
XXXXXX XXAXXX
LBN: XXX
¢ LBN WANTED TO READ

0621
0622
0623
0624
0625
0626

;
;
:
:
:
H
H

The errors listed by the exerc ser are ussually very des
criptive and
are self explanatory.
The
follow'ng is an example
error
statement.
This
error
statement
‘s
the extented error

C
C
C
C
C
C

C 0637

’

SAMPLE MSCP ERROR STATEMENT

'DISK UNIT NUMBER
*CONTROLLER PACKET NUMBER
'THIS IS THE PORT MESSAGE TYPE

C 0620

0641
0642
0643
0644
0645
0646
0647

error.

The end message flags give eny flegs that might have been

the controller.

is pretty

sppasrent

that

thig error was

caused by something physically switching the disk offline.
3.7
000

DUP ERRORS
e

C 0648

A DUP grror occurs when the host receives an
Invalid
Command End Message from the RADX1.
In such cases, the host
will print out the erronecus commaend followed by the
resson
for the error.
There are two major pleces where errors in
DUP will

C 0650

and the second

C 0651

C 0652
C 0653

occur.

The firet being in the status code much the same as MSCP,
in the DUP 1/0 Buffer.

Using the DUP sub-protocol

(using Receive/Send commaends to communicate with controller locsl

program. (p. 25 of DUP.V0S)) the controller may send en error
message to the host by writting in the DUP 1/0 Buffer.

StQ .04

Pege

PIDERSUSERS:
(ONDUCETTE FALCONICNRIAA . BLY

¢ DISK: XXX
CRN: XXXXX
MESSAGE TYPE:

10:21:50

C 061
C 0618
C 0619

C 0629

[

198%

(comments)

Dec

(example)

(C: ggg;

VAX 11 Bl 'ss 16 v3 %55

C 0615

H
:
H
:
H
:
:

3.6

(14

NRQAM]

RD ‘Rx FYERCISER

VOLLC

‘l

C 0654

.
:

C 0656
C 0657

Dec

194% 10:04:41
1983

10:./1:5C

VAx

11 Bl 'es 16 v3 555

SAMPLE DUP ERROR STATEMEN'

3.8

:
:
:

C 0658
C 0659
C 0660

The errors listed by the exerc ser are ussually very des
criptive and
are self explanatory.
The
follow'ng is san example
error
statement.
This
error
statement
‘s
the extented error
message.

C 0663

(example)

C
C
C
C
C
C
C
C
C
C
C
C

e DISK: XXX
IDISK UNIT NUMBER
CRN: XXXXX
ICONTROLLER PACKET NUMBER
MESSAGE TYPE: - SEQUENTIAL
tTHIS IS THE PORT MESSAGE TYPE
COMMAND
: -DUP -RECEIVE DATA
'CONNECTION ID AND COMMAND GIVEN TO ORIVE
STATUS CODE: -SUCCESS
! STATUS CODE OF COMMAND
ACTUAL @ OF BYTES TRANSFERED XXXXX !NUMBER OF BYTES ACTUALLY READ
170 BUFFER ADDRESS (32 BITS)
XXXXXX XXX XXX
MESSAGE TYPE:
! TYPE OF COMMUNICATION

:
.
.

:
:
.
:
:
:
:
:
:
:
:
:

:
:
H
H
:
H
:
:
H

;

:
.

C 0661
C 0662
C 0664

C
C
C
C
C
€
C
C
C

0665
0666
066~
0668
0669
0670
0671
0672
0673
0674
0675
0676

0677
o678
0679
0680
o681
0682
0683
0684
0685

C 0685

(comments)

ss FATAL ERROR
MESSAGE NUMBER:
SUCCESS/FAILURE CODE
MESSAGE ERROR CODE:
- ILLEGAL UNIT NUMBER
DBN:

MESSAGE

ERROR LISTING

TOBE GIVEN OR RESULY EXPECTED

XXX

The DUP Error messages ere olmost like the MSCP messages
but they contsin an extra three clessifications.
These asre the
MESSAGE TYPE, MESSAGE NUMBER, MESSAGE ERROR CODE.
These ere pert
of 8 D\UP eub-protocel for communiceti
with a controller locel
program.
The 1/0 buffer sddress conteine the address of
170 Buffer which contains the MESSAGE information.

The

stetus

code

this end

message

C 0687

means the controller was OK but

C 0689

whiie rumning the controller local progrem.

0688

< &g?
-

the DUP

8 succesful which

it did not understend the host

messege or something on the host side ceused the controllier to error

ILLEGAL UNIT NUMBER.

The distk

went off

This error wes produced
]line.

“age

PIDERS SSERS:[DOUCETTE .FALCONICNROAL 8

C 0655

)
NRQAM:
VO1.¢

RD/Rx EYERCISER

C 0692

:
:

C 0694
C 0695

:
H
:
H
:
:
:

:
:

:
:
:
H
:

H
:
:
H
:
H
H
H
:
:
:

C 0693

4.0

C
C
C
C

0696
0697
0698
0699
C 0700
C 0701
C 0702

1983
198%

DBNs.
The DBN listing will only contain RDS1s for the simple
reason that they contain DBNs end RXS50s do not.
The DBNs

c 0705

sre READ end HREYTEN by blocks instead of by bytes. All units

0706
0707
0708
0709
0;10

contain LBNe. The errors for each unit will be listed next to
the LBNs.
Errors are grouped into two
beasic catagories:
herd and
soft.
Each is sub divided into four more categories, depend
ing on the most probable classification for that error.

0711
C 0712

The sub cetegories are:

C 0713

:
:

C 0724
g g;gz

UNT
&

:
H
:

C 0727
C 0728
c 0729

X
.

3
H

€ 0731
C 0732

UNIT

DISK

TYPE

READS

® OF

¢ BLKS

READ

WRITES

WRITTEN

:
;

C 0735
C 0736

OBNRDST

XXXXX

XXXNX

AXXXX

XXX XX

0714
0715
0716
o717
0718
0719
o720
0721
g?'gg

C 0730

E g;g}

VAY-11 Blies-16 vZ-555
“mge
SPIDERSUSERS
: [DOUCETTE FALCON JTMNR Sl »

PERFORMANCE AND PROGRESS REPORTS

C
C
C
Cc
C
C
C
C
(C:

'JfJ'

10:24:41
10:21:50

A summery report is printed at the end of
each pass of
the
Exerciser or upon demand by the operestor. The fields may
be clesred to zero after the
report e printed depending on
the operetor’'s
response to this option in the software ques
tions. Any units sdded to the test cycle will slso begin with
clesred statistics.
There are two basic listings one for LBNs end one for

C 0703
C 0704

C
C
C
C
E

1% Dec
15 Dec

disk

related errors

seek

(or format) releted errors

controller or drive relsted errors

host

(the CPU)

related errors.

All numeric values are

@ OF BYTS
@ OF
BYTES
-- MRD ERS -TYPE READS READ WRITES WRITTEN DAY SEKX DRV HST DAY
RDSI
RXS50

xXXXX XXXX
..
.o

RXS0

in decimel radinx,

XXXXX
.o

XXXXXX
e

ceeas

X
.

x
.

X
.

o OF

X
.

SFT ERS SEX DRV HST
X
.

& BLKS

X
.

}

NRQAM1

RD/RX EXERCISER

vO1.¢

15 Dec 198% 10:24:41
15 Dec

)

0737
0738
0739
0740
0741
0742
0743
O;Cg

)

198%

10:21:50

VAX 11 Bliws 16 V3 5SS

Cc
C
C
C
C
€
C
E

C 0746

:
:
:

C 0748
C 0749
C 0750

H
:
:
:
:
.
:
;
:
H

C
C
C
C
C
C
C
C
C
E

0752
0753
0754
0755
0756
07157
0758
0759
0760
8?’63

First,
the presence of each device register will be ve
rified,
along with @ check on
the BR level
epecified by the
operator.,
Then,
an
initializetion
will be issued to
each
controller configured for testing.
When
the initializetion
sequence nas been completed, an sttempt will be made to bring
each unit online.
If this succeeds.
one
or two MSCP reads
will be issued to the inner-most LBN of eech selected disk to
to ensure that each disk drive can seek and be resd.

H
:
:
H
:
:

C
C
C
C
C
g

0763
0764
0765
0766
0767
8;23

Any device-fatal or herd errors encountsred
during this
test
will
ceuse the
appropriate unit(s) to be dropped.
If
basic error messsges are enabled, then the program will print
out the specific resson for droppi
the unitis). Henceforth,
the
failed
unit(s) will
not be
tested unless the operstor
intervenes (edds unit(s) or restarts Exerciser).

;
H

C 0770
g g;;é

Upon succesful completion of the Initializetion Subtest,
the program will
begin executing the Exerciser.

:
:
:
:
H
;
;
:

C 0773
cCo774
C 0775
€ 0776
C 0777
C 0778
C 0779
C 0780

C 0783

:
;

:
H
;

;

074

o477

C 0751

TEST SUMMARY
i

The

RQDX1

Ffunctional

tester snd exerciser consists of

two
pearts,
the
initialization subtest
end the performence
exerciser.
The operator is not able to select which of these
two parts he/she wishes to run; they both must be executed.

S.1

INITIALIZATION SUBTEST
eeeeeans

The

---

purpose of

this subtest

configuration ss specified by

unit online.

The Initialization

the execution of any other test.

S.2
00

is to verify the herdware

the operator,

snd to bring each

Subtest will slways precede

EXERCISER
eecaaecaThe purpose of this subtest ie to exercise the
disk
drives
in @ manner similar to the typicsl usege urder standard oper
ating esysteme.
Execution of this test shouid give an indics
Ltion of the opcrotine performance of the disk drive subunits.
This test will utilitize random disk addreseses,
random
word

C o781
C 0782

counts,
and dets
petterns,
all subject
to the
limits and
specifications made by
the operator.
All protected diske will

C 0784
C 0785
C 0786

may be read or written, dmnding on the enswers given to the
software parsseter questions.
nd-of -pass
will be declared
when the specified number
of bytes have been transferred for

C o787

be subject to n.d-only operations,
sll the disks taken as 8 whole.

Page

SPIDERSUSERS
: {OOUCETTE . FALCONICNRIAL BL 1

:
H
:
H
H
:
:
:

5.0

7/
56Q OC

while unprotected disks

(17

l
NRQAM1

RD/Rx EXFRCISER

VOL1.¢C

15 Dec 1983 10:¢4:41
15 Dec

)

H
H
;
;
:

C 0788
C 0789

€ 0790
c 0791

:
:
:

C
C
C
E

:
:
.
:
;
:
:
H
:
:
:
:
H

C
C
C
C
C
C
C
C
C
C
C
C
C

:
H
H

198% 10:21:50

If a read/write error occurs during this test,

VAX-11 Blies-16 v3-555

then the

RQDX1 CONTROLLER
will initiate an
appropriste number of re
tries.
If all retries fail, then a herd error will be repor-

ted to the host,
an
error message
will
be diplayed on the
console
terminal and the error will be tallied for the sum
mary report. The unit will be dropped if the hard error count
has exceeded the specified limit,

0797
0798
0799
0800
0801
0802
0803
0804
0805
0806
0807
0808
0809

The Exerciser is actuslly two exercisers combined together.
The main MSCP exerciser writes and reads LBNe while the less
used DUP exerciser writes and reads DBNs. The DUP enerciser is
used once per 25 LBN transfers or slot less than the MSCP
exerciser.
The two Exercisers use o some whet different
protocol to tranfer 1/0.
It is possible to go from MSCP
protocol
to DUP protocol without reinitielizing the controlier
but impossible to go from DUP to MSCP protocol.
Therfore sfter
the DUP Exercise nass the controller is reinitielize and control
given back to the MSCP Exerciser,
The reinitislizetion process
tokes 8 few seconds.
For this resson & verisble is pleced in
the DUP Exerciser to allow it to trensfer more then 1 DBN per psass.
The var.able,“X”, is multiplied by 25 to give the amount of MSCP

C 0810
E gglé
1

transfers before the DUP Exerciser coan tranfer X" amount of DBNs.
The higher the veriable the le3s reinits the controller must do.

H
H
H
;
H
H
H
H
:
;
:

C
C
C
C
C
C
C
C
C
C
C

:
:
:

C 0825
C 0826
C 0827

unit will be herd-dropped if the number of herd errors encountered exceeds the operator-specified limit, or if a fatsl error
is detected. Units hard-dropped may leter be added
to the test

C 0831
C 0832

be
cleared
question 12,

:
H
:

:
:

0813
o814
0815
0816
0817
o818
0819
0829
0821
0822
0823

C 0824

C o828
C 0829
C 0830

5.3
0000

DROP UNIT SUMMARY
eececceieaeenean

During the Initislization Subtest,
individuel units w 11
be
dropped from
the test
sequence if they sre unable
to be
brought online or the operator specified device does not match
the haroware.
During the Exercise, the program will drop a unit for one
of three reassons. The normal path is for each unit to compiete

the transfer of N megabytee,

where N

is specified by ‘he oper-

ator during SW questioning and be soft-dropped.

cycle.
However,
statistice for
cleared to zero;
if e transfer
cose
the unit wes soft-dropped,

depending

the

Pege

SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA .BL1 (18

0792
0793
0794
0732

SEQ 0¢!58

Otherwise.,

the
herd-edded
unit mnill be
limit was
epecified, in which
the statistics mey or may not
operators
enswer
to Software

(5
RD/Rx

NRGAM1
v0ol1.C

15 Dec

EXERCISER

15 Dec

1983

198%

SEO 00'9
VAX-11 Blies 16 v3-555
19
SPIDERSUSERS: [DOUCETTE, FALCON]CNRQAfi BLI (19

10:24:41

10:21:50

[21alnislsliniainlisisininisisinlislialslnslislinislsinlnisiainlinlislinislslsliaislininlslinlialalnlislinlalals]

CY R T

“e

®e

)

0833
0834

0835
0836
0837
0838
0839

0840
0841
0842
0843
0844
0845
0846
0847
0848
0849
0850
0851
0852

0853

0854
0855
0856
0857
0858

0859

ERROR CODES GLENERATED By

6.0

SYSTEM FATAL ERPORS
1

More than 4 units specified

DEVICE FATAL ERRORS
10

Controller couldn t be addressed
at the address given,

Wrong

Controller
didn't
interrupt
the interrupt vector given,

Wrong vector
ected.

Controller
didn't
inter~upt
the BR lelvel given.

Wrong BR

Init sequence failed.

address selected

address sel

level

selected.

Either
one of
the
four
initielizetion
steps did
not receive
the
correct
response
troller,

from
the
Con
or
one
of the

steps timed-out.

0860
0861
0862
0863
0864
0865

0867
0868
0869
0870

0871
0872
0873
0874
0875
0876
0877
0878
0879
0880

NRQA EXERCISER

Fatal Controller error.

The error bit (bit 15) in
the SA register was set.

Failed to bring unit on-line.

On-line
response had
an
error
code.
(see
also
&8s 22 end 23.)

Write protect conflict.

The
wunit
nos
write protected

hardware
oand write

operations
were requested
on the unit.
17

Access to

inner treck

failed.

Unit went off-line.

Failed
to send
'Set Controller
Characteristics” command.

track's
Innermost
may be corrupted.

header

Either
the
unit is
offline or the
Diagnostic is
corrupted
because
of any
problems with its RAM,

RD/RX

NRGAM1

Dec
15 Dec

EXERCISER

(alnlnlsizizsislsisislnlsisisisisininlnisisininisislinislsinlisislislislislislnisisinlislnlalslisinlialnlialals)

By
@y &

®e

G+

@¢

vOl1.¢

0681
0882
0883
0884
088>
0886
0887
0888
0889
0890

0892

0904
0905
0906
0907
0908
0909
0910
0911
0912
0913
0914
0915
0916
0917
0918
0919
0920
0921
0922
0923
0924
0925
0926
0927
0928
0929
0930

returned wrong

Failed to send

‘end

Set Controller
command.

'On

1 ne

command

Controller
returned
wrong 'end
code’ for the 'On line’' command.

24 Device went

to available state

SEQ 000
Pege
VAX-11 Blies-16 v3-555
<
SPIDER$USERS: {DOUCE TTE . FALCONICNRAAA .BL1 ( 2C

10:24:41
10:21:50

Problem with

the

Control

ler microcode or the port/
DMA intterface.
Either
the
unit
ie off
the diegnostic s
1 'ne or
corrupted because
of
any
problems with

0891

0893
0894
0895
0896
0897
0898
0899
0900
0901
0902
0903

Controller

code’
for
the
Characteristics

1983
1983

Problem with

ler's

its RAM,

the

Control

microccde

port/DMA

Fault

interfeace.

the

switch or door mechan.sm

HARD ERRORS

MSCP ERRORS

Controller received

command.

invelid

The

ted

lems

diagnostic

because

with

is corrup-

of any prob-

RAM,

its

there
is
a
problem with
the
Controller
microde

(RAM or ROM)

problem with
interface.

annond aborted by the

Control-

er.

Media formet error.

Device write protected.

Controller
pare

reed

there

the

the port/DMA

Command
timed-out
Controller.

write com-

error.

Deta error.

HMHost buffer sccess error

Controller error.

CRC

error

field of

a disk

the

block.

date

Difficult
to
catagorize
without
looking
ot
the
error

sub-code

sssocisted

sage.

any

error-log mes

L
NRQAM1

RD’RX EXERCISER

%01.0
:

C 0931

:
:

C 0933
C 0934

:
H
H
:

C 0932

C
C
C
C

0935
0936
0937
0938

15 Dec

Or've error.

See 040,

Host write compare error.

Error detected

C 093%9
E 0940

43 Message from

C 0942

Duplicete

C 0945

Unknown end code received.

:
:

0941

C 0942
C 0944

:
H

C 0946
C 0947

:
:
;

C 0949
C 0950
C 0951

.
H

C 0954
C 0955

:
:

C 0948

C 0952
C 0953

10:24:41

VAX-1)

15 Dec-1983 10:21:50

:
:
H

1983

‘nternal diagnostics

unit number

the Controller.

dJdetected

DUP ERRORS
Host found error
46 DBN compare error.
Message errors

when

Host

See 040.

ZLontrol

ler microcode or the port/
DMA interface.

see @ 42

47 No local media

Controller local program on
RAM may be corrupt

E ggg;

48 Illegel Unit ¢

Unit went offline

g ggzg

49 Illegel relative or physical BLK €

E 832%

50 Device Error

C 0963

51 Zero

H
:
:
:
:
;
:
;
H
:
:

C
C
C
C
C
€
C
C
C
C
C

0956

C 0964

0965
0966
0967
0968
0969
0970
0971
0972
0973
0974
0975

Status errors

lenght mess

see & 31
Possible write protected

see ¢ 31

S2 Invelid Commend

see @ 31

S3 No region available

see & 31

54 No region suitsble

see ¢ 31

S5 Program not known

see & 47

S6 Load failure

---

E gg;?

S7 Stend slone type program

see ¢ 31

C 0978

S8 DUP unkown status code

see & 31

SEQ 00-1

Pege

SPIDERSUSERS: {DOVCETTE .FALCONICNROAA .BL
1 (21

CPU compared
the
date
written and read back. May
be a problem with the Host
or Controller RAM,

Problem with the

Bliss 16 v3-555

Je’
NRQAM1

RD/RX EXERCISER

201.0
:

C 0979

:
:
:

C 0981
C 0982
C 0983

C 0980

Host memory access error.

See 050.

C 0989

Disk transfer error.

See #50.

C 0991

C 0994

C 0988

C 0920

SOFT ERRORS

C 0986

C 0992
C 0993

'Standard

Disk

'Small Disk'

error.

error,

Inteconnect’

See 050,
See 050.

SEQ P
Peage
=22

SPIDERSUSERS: [DOUCETTE ,FALCONICNRQAA .BLL (22

C 0987

B
:

1983 10:21:50

VAX-11 Blies-16 v3 555

See
error-log
packet for
detailes as the exact cause
may not be evident.

10:24:41

Controller error.

C 0984
C 0985

15 Dec

1983

H
:
H

15 Dec

10:24:41
10:21:50

3091

Pattern

0001
0003
0007

001Ff
O03F
O07F
QOFF
OLFF

O3FF
O7FF

OFFF
1FFF
3FFF

TFFF
FFFF

Psttern 8

FFFE
FFFC
FFFB
FFFO
FFEO
FFCO
FF80
FFOO

FEOO
FCO0
F800
FO00

E000
€000
8000

000007
000017
000037
000077
000177
000377
000777
001777
003777
007777
017777
037777
017717

177777
177776
177774
177770
177760
177740
177700
177600
177400
177000
176000
174000
170000

160000
140000
100000
000000

011

0o11

001
001
o11
111
111
11
111
111
11

111
111
111
111
111

8888888888
§83838888888888% EE

000001
000003

Pattern

111

030221

3333

111

)

031463

Pattern

105613

111

8338828888338 OO§
8838888888 8 2

Pattern

177777

FFFF

Pattern

000 000

000000

Pattern

NUMBERS

= OOO0O00O0O000Q0O000OO0

RANDDO M
N

Pattern

8Bes

BINARY

OCTAL

Ot psraprpipapapsptpaps

1007
1008
1009
1010
1011
1012
1013
1014
1015
1016
1017
1018
1019
1020
1021
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
1032
1033
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046

HEX

1003
1004
1005

1983
1983

DATA PATTERNS

7.0

0997
0998
0999
1000
1001
1002

[alelnlnisiasinlislisinigisinlisislisisialinlsinlnlisininlinlislisinislinislislisinlislinlinlislislalislislislislislnlislinlalnle]

We
w0
@¢
@
B
B
@
B0
WE
@0
B4
@1
S

&
@1
@
s
@
B
Be
@
8¢
8¢
B¢
B
@1
W
B
BE
€1
@1
4%
e
s
ws
mr
.

0995

0996

)

15 Dec
15 Dec

RD/Rx EXERCISER

NRQAM1
vOol1.C

(

VAX-11 Blies 16 V3 555
Page
SPIDERSUSERS: [DOUCETTE. FALCONICNRQAA, BLl

27
(2%

RD/RX

NRQAM]

15-Dec
- 1983
15 Dec 1983

EXERCISER

177717

177777
000000
000000
177777
177777
000000

177777

000000

177777

000000

177777

Pattern

133331

Pattern

052525
052525
052525
125252
125252
125252

1069
1070
1071
1072
1073
1074
1075
1076
1077
1078
1079
1080
1081
1082
1083
1084
1085

052525

0523525
125252
125232
052525
125252
052525
125252
052525
125252

Pattern

1087
1088
1089

1091
1092
1093
1094
1095
1096
1097
1098
1099
1100
1101
1102
1103

2020
D202
2020
D202
2020

026455
026455
026455
151322
151322
151322
026455
026455
151322
151322
026455
026455
151322
026455
151322
026455
151322
026455
151322

026455

HOFOFHOHFOOHHHOOO

000C00
000000
000000
177777

000
000
000
111
111
111
000
000
111
111

1053
1054
1055
1056
1057
1058
1059
1060
1061
1062
1063
1064
1065
1066
1067

Pattern

011 o011 011 001

FHOMOMOFRMOOHKHMHOOO

1048
1049
1050
1051
1052

010 101 010 101
010 101 010 101
010 101 010 101
101 010 101 010
101 010 101 010
101 010 101 010
010 101 010 101

OHOMOMONHOOHHOOHMMOOO

(31alnlslsinlslnlslisinisinlsinsininisinisininisislininslsialinisinlisinlialisislsialsialnliginlislslninlnlislinlislnlnlialalel

®e

B¢

®s

®e

LO1oo

10:24:41
10: 21:50

110 100 101 101
110 100 101 101
110 100 101 101
001 011 010 010
001 011 010 010
001 011 010 010
110 100 101 101
110 100 101 101
001 011 010
0
001 Ool1 010 010
110 100 101 101
110 100 101 101
001 o11 010 010
110 100 101 101
001 011 010 010
110 100 101 101
001 011 010 010
110 100 101 101
001 011 010 010
110 100 101 101

000 000 000
000 000 000
000 000 000
111 111 111
111 111 111
111 111 111
000 000 000
000 000 000
111 111 111
111 111 111
000 000 000
111 111 111 111
000 000 000
111 111 111 111
000 000 000
111 11 111 111

010 101 010 101
101 010 101 010
101 010 101 010
010 101 010 101
101 o010 101 010
010 101 o010 101
101 010 101 010
010 101 010 101
101 010 101 010

SEQ 0024
Page
24
SPIDERSUSERS:
([DOUCETTE .FALCONICNRGAN .BLL (24

VAX

11 Bl.es

Vv3-555

M.~
15-Dec-1983
15-Dec 1983

RD/RX EXERCISER

NRQAM1
v0l1.¢

10; c4:41
10:

21:50

6086

066666

Pattern

0001
0002
0004
0008
0010
0020
0040
0080
0100
0200
0400
0800
1000
2000
4000
8000

000001
000002
000004
000010
000020
000040
000100

FFFE
FFFD
FFFB
FFF7
FFEF
FFOF
FFBF
FFIF
FEFF
FOFF
FBFF
FIFF

177776
177775
177773
177767
177757
177737

1109
1110

1111
1112
1113
1114

1115

1116
1117
1118
1119
1120
1121
1122
1123
1124
1125
1126
1127
1128
1129

Pattern

1130

1131
1132
1133
1134
1135
1135
1137
1138
1139
1140
1141
1142

1143

1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154

1155
1156

EFFF
DFFF
BFFF
7FFF

Pattern

8609
8609
8609

086C
D86C
8609
B609

DB86C

8609

086C
8609
DB6C
8609
DB86C

000200
000400
001000
0062000
004000
010000
020000
040000
100000

177677

177577
177377
176777
17571717
173777
167777
157777
137777
077777

133331
133331
133331
155554
155554
155554

133331
133331
155554
155554
133331
155554
133331
155554
133331
155554

110

e O OO OOCOOO0O0O00O000

Pattern

000
000
000
000
000
000
000
000
000
000

e S Pt e o o P it b Mt Pt pb e b bt

1104
1105
1106
1107
1108

111
111
11
111
i11
111
111
111
111
111
111
111

111
111
111
110
101
Oo11

011
111
111
111

110
101
011
111

111
111
111
111
111
111
111
111
111

111
111
111
POl
111
111
111
111
111

i Pt b i Pt e e e ot b et s it S Pt

(a1nlalnislsinlalnininlisisinizinininisinialslialalslislislalsislialalislslislialslsialsislsisialinlislislinlslslalals]

®e

®s

€3

B¢

)

110

000

000
000
000
001
010
100
000

ol1
011
011
101
101
101
01}
011
101
101
011
101
011
101
011
101

011 001
011 001
011 001
101 100
101 100
101 100
011 001
011 001
101 100
101 100
011 001
101 100
011 001
101 100
011 001
101 100

000
000
000
000
000
000
000
000
001
000 010
000
001
010
100
000

110

001
010
100
000
000
000
000
000 000
000 000
000 000
000 000
000 000
000 000
000 000
000 000
000 000

110
101

111 111

VAX-11 Bliss

V3 S55

SPIDERS$USERS: [DOUCETTE .FALCONICNRQAAgff (ca

N¢

1160
1161
1162
1163
1164
1165
1166
1167
1168
1169

1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
1181
1182

1183
1184
1185
1186
1187

1188
1189
1190
1191
1192
1193

1194
1195
1196
1197
1198

1199

1200

LBN
8D36
8036

72C9
72C9
72C9

8036
8036
8D36
8036
72C9

72C9
72C9
72C9
72C9

8036
8036
8036
8036
8D36
8036
Pattern

8D36
L8N

72C9

8036
8036
8036

72C9
72C9
72C9
72C9

8036
8036
8036
8036
8036
72C9
72C9
72C9
72C9
72C9
72C9

LBN
10€466
106466
071311
071311
071311
106466

106466
106466
106466

071311
071311
071311
071311
071311

106466
106466
106466
106466
106466
106466

106466
LBN
071311
106466
106466
106466
071311

071311

0713:1
106466
106466
106466
106466
106466
071311
071311
071311
071311
071311
071311

OO0

HEEEFEFEOOOOOH

Pattern

1157
1158
1159

QOO0
OO0 HEMO

(z1alslslnlnisinlisinislsinialslginislinliaslialsliglinlislialslnlslinigislialslslsinislslinlalalsls]

@0
®s
®s
Br
@s
we
@
@1
@
@
®r
W
e
Gs
S0
We
s
Ve
Be
@s
8BS
G4
63
B¢
G4
Bs
We
G
W
G0
B
@r
@)
S
®I
B
B0
@s
®H
@t

15-Dec-1983
15 Dec 1983

RD/RX EXERCISER

NRGAM1
vOl.¢

10: 24:41
10:

21:50

LBN
110 100 110 110
110 100 110 110
001 011
001
001 011 001 001
001 011 001 001
110 100 110 110
110 100 110 110
110 100 110 110
110 100 110 110
001 011 001 001
001 011 001 001
001 Oo11 001 001
001 011 001 001
001 011 001 001
110 100 110 110
110 100 110 110
110 100 110 110
110 100 110 1io
110 100 110 110
110 100 110 110

110 100 110 110
LBN
001 011 001 001
110 100 110 110
110 100 110 110
110 100 110 110
001 011 001 001
001 011 001 001
001 Ol1 001 001
001 011 001 001
110 100 110 110
110 100 110 110
110 100 110 110
110 100 110 110
110 100 110 110
001 011 001 001
001 011 001 001
001 011 001 001
001 011 001 001
001 o011 001 001
001 011 001 001

VAX-11 Bliss

16 V3-555

SEQ 0G26
P
27

SPIDERSUSERS:[DOUCEYTE.FALCON]CNRQAA.;E: (26

NRQAM1

RD ‘R E XERCISER

xox.c

:
;

¢ 1201
€ 1202

¢ 1203

:
3
:
3
3
H
:
:
s
H
H
:
3

C
C
C
C
C
€
C
C
C
C
C
C
C

C 1219

1 011

4666
4666
4666
8999
8999
8999
8999
4666
4666
4666
4666
4666
8999

043146
043146
043146
134631
134631
134631
134631
043146
043146
043146
043146
043146
134631

0
0
0
1
1
1
1
0
0
0
0
0
1

8999

134631

1 011

8999

:
H
:

C
C
C

1224
1225
1226

1228

C
C
C
C
C
C
C
C
E
C
C
C
C
C
C
g

8999
8999
8999
Pattern 20

1227

C 1246
C 1247
1248

Pattern 21
s

1354631

134631

134631
134631
134631

198%

10:21:50

LBN

100 110 011 001

1 011 100 110 011 00}

100 011 001 100 110
100 011 001 100 110
100 011 001 100 110
011 100 110 011 001
011 100 110 011 001
011 100 110 011 001}
011 100 110 011 001
100 011 001 100 110
100 011 001 100 110
100 011 001 100 110
100 011 001 100 110
100 011 001 100 110
011 100 110 011 00!

1 011

100 110 011 001

1 011
1 011
1 011

100 110 011 001t
100 110 011 001
100 110 011 001

100 110 011 001

8999
L8N
4666

134631
LBN
043146

100 110 011 001
LBN
0 100 011 001 100 110

8999

134631

1 011

8999

1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
%g:;

LBN

134631

C 1218
1220
1221
isgg

:
H

LBN

8999

120%
1206
1207
1208
1209
1210
1211
1212
121%
1214
1215
1216
1217

C
C
E

H
:
:
;
:
H
:
:
H
;
:
:
:
3
:
:

1% Dec

C 1204

:
3
3

Patterr

1% Dec 1933% 10:¢4:41

134631

1 011

100

110 011 001

100 110 011 001

8999
4666
4666
4666
4666
8999
8999
8999
8999
8999
4666
4666
4666
4666
4666
4666

134631
043146
043146

1 011 100 110 011 001
0 100 011 001 100 110
0 100 011 001 100 110

LBN

043146
043146
134631
134631
134631
134631
134631
043146
043146
043146
043146
043146
043146

0
0
1
1
1
1
1
0
0
0
0
0
0

100
100
011
011
011
011
011
100
100
100
100
100
100

011
011
100
100
100
100
100
011
011
011
011
011
011

001
001
110
110
110
110
110
001
001
001
001
001
001

100
100
011
011
011
011
011
100
100
100
100
100
100

110
110
001
001
001
001
001
110
110
110
110
110
110

VAX 11 Blies 16 v8 %55

SEQ (.7

Pege

SPIOERSUSERS::
{DOVCETTE .S ALCONICNRYAL 8 L ¢

RD/Rx EXERCISER
1249

1250
1251
1252
1253
2742
2743

2744
2745

2750

@¢

G¢

2746
2747
2748

2749

®:

15 Dec 1983 10:.-4:41

PROGRAM HEADER

®r

B¢

NRQAM|
VOl L

2751
2752
2753
2754
2755

ssbttl

PROGRAM HEADER’

library

‘'CNRQAA.L16

require

BLSMAC.REQ ;

Dec

198%

10:21:50

RORX EXERCISER I OBAL

;

THE
THE

HEADER

(ALL);

PROGRAM HEADER IS THE INTERFACE BETWEEN
DIAGNOSTIC PROGRAM AND THE SUPERVISOR,

(wascii'

CNRQA',

sascii'A’',

dascii‘0',

32767,

PRIOO);

2756

27157
2758
2759
2760
2761
2762

*
*

L IBRARY

! NUMBER Of TESTS IN THIS DIAGNOSTIC

EQUALS;

TME DISPATCH TABLE CONTAINS THE STARTMING ADDRESS OF EACH TEST.
IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST,

DISPATCH (DSSNBR_OF _TESTS);

SEQ

’

Page

SPIDERSUSERS: {DOUCETTE . F ALCONICNROJAL
Bl 1

! DIAGNOSTIC SUPERVISOR LIBRARY

l;t.I;;}'BR_OF_TESYS -1
POINTER

VAX 11 Bliss 16 v3 555

7 oF

)
NRQAM1

RD/Rx EXERCISER

vol.¢

GLOBAI

DATA SECTION

2763

webtt]l

'GLOBA'

27
2767

!
'

®e

8¢

)

2764
2765

2773

global

;
:

2175
2176

:
;

2778
2779

2781

psect

:
:
:

g;;;

27174
27177

1% Dec

1983

10:21:50

global

$FFF$ (read. nowrite,

execute,

local,

concetenate);

CST : blockvector [MAX_CTLR, CST_LEN, word) f eld (CST_FIELDS),
' RUN-TIME CONTROLLER STATUS TABLES
ref block [CST_LEN, word) field (CST_FIELDS),

CST_ADDR :
OCT

* CONTROLLER STATUS TABLE ADORESS OF "“CURRENT" CONTROLLER

: blockvector {MAX_CTLR, OCT_LEN, word] field (OCT_FIELDS),
+ ORIVER CONTROLLER TABLES

DCT_ADOR : ref block [DCT_LEN, word) field (DCT_FIELOS),

2782

RORX_ADDR : ref rdrx field (RC_REG),

2784

IRORX_ADDR : ref rdrx field (RC_REG),

2786

DUPPKT : BLOCK (257, WORD) field (DP_FIELDS),

2788

TALLY : vector [MAX_UNITS & TALLY LEN, word) field (T_fIELDS),

2790

T_ADDR : ref block [TALLY_LEN, word) field (V_FIELDS).

:
:

2783
2785

2787

2789

¢t ADDRESS OF “CURRENT“ DRIVER CONTROLLER TABLE

¢ DEVICE ADORESS OF “CURRENT” CONTROLLER
' DEVICE ADORESS OF INTERRUPTING CONTROLLER
! BUFFER CONTAINING DUP INFORMATION FROM RECEIVE AND SEND COMMANDS

' STATISTICS TABLES

2791
2792

C_ERR_TBL

2794

»5P_PKT : blockvector [PKT _CNT, PKT _LEN, word) field (PXY_FIELDS),

2797

:
;
:

:
.
.

;
;
;
;
;
:
:

;
:
;

:
;
:
;

;

2793

2795
2796

t ADDRESS OF STATISTICS TABLE (TALLY) FOR CURRENT UNIT
: blockvector [MAX_CTLR, C_ERR_LEN, word) field (C_ERR_FIELDS),
¢t

STATISTICS TABLE FOR CONTROLLER ERRORS

' MSCP PACKEY POGL
IPKT_ADOR : ref block [PKT_LEN, word] field (PKT_FIELDS),

! ADDRESS OF AN MSCP PACKET (INTERUPT PROCESSING)

2798

PKT_USE : vector [PKT_CONT

2800
2801

RETPKT : blockvector [RP_CNT, RP_LEN, word] field (RP_FIELDS),
+ RETURN PACKET POOL

2803
2804
2805
2806
2807
2808
2809

! RET
P
T POOL ALLOCATION TABLE
RP_INDX : word,
! CURRENT RETURN PACKET INDEX
RP_ADDR : ref block [RP_LEN, word] field (RP_FIELDS),
¢ CURRENT RETURN PACKET ADORESS
ELOG_PKT : blockvector {EP_CNY, EP_LEN, word] field (EP_FIELDS),
! ERROR-LOG PACKET SAVE AREA
BUFF _ADDR : vector [MAX_BUF _CNT),
! TABLE OF 1/0 BUFFER DESCRIPTORS

2799
2802

2810
281i
2812

2813
2814
2815
2816
2817

2818

te, @i

t "MSCP PACKET

RP_USE : vector [RP_CNT,

BUFF _OWN : vector (MAX_BUF _CNT,
1000 : vector [IODG_LEN, byte],

100Q_IN : word,
100G _0UT : word,
ENTRY _REASON : byte,
EOP_FLAG : byte,

DUP _FLAGS

CCTCR

WORD,

word,

ALLOCATION TABLE

byte, @i

byte,

!
!
'
t
!
¢

eigned],

¢t

I/0 BUFFER OMNERSHIP (CONTROLLER NUMBER

170 DONE QUEUE - CIRCWLAR QUELE OF RETPKT
I/0 DONE QUEUE IN POINTER
1/0 DONE QUEUE OUT POINTER
CURRENT OPERATOR COMMAND
END-OF -PASS FL AG
DUP FLAGS

! NUMBER OF

SEQ OC-7y

Page

SPIDERSUSERS:
(DOUCETTE .FALCONICNRQAR BL L (07

DATA SECTION

2780

VAX 11 Blies 16 v3-555

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

2768
2769
2770

1% Dec 1983 10:¢4:41

"CURRENT" CONTROLLER

INDECES

t
RD/RX EXERCISER

@¢

B¢

2833
2834
2835
2836
2837
2838
2839
2840
2841

STEP : word.
OF RC : signed word,
SA_REG : word,
CMO_TIME : word,
&x : ”rdo

CRN_HIGH :

P_INDEX

word,

s‘i‘&cd word,

S_DUPPKT .
D.
S_PATTERN : WORD,
CREDIT_BAL : word,
NEXT_PXT_USE : byte:

ERRTBL;

R
L
R
T
R
T

BYTS_PER QIO : word,
ST_CODE : word,

XL R

FREE _MEM_ADDR,

CDISK : word,
CUOFF : word,
CTLR_CNT : word,
DUR : vector [MAX_UNITS, bytel,
QIO : vector [{MAX_CTLR, bytel,

2819
2820
2821
28c2
2823
2824
2825
2826
2827
2828
2829
2830
2831
2832

DATA SECTION

GLOBAI

15 Dec
15 Dec

B¢

NRQAML
vol.¢

1983
1983

10:24:41
10:21:50

SEQ 003,
VAX 11 Bliss 16 v3-55%5
Pege
31
SPIDERSJSERS: [DOUCETTE .FALCONICNRIAA . BLL (29

CURRENT DISK ADDRESS (RD/RX DISK NUMBER)
CURRENT UNIT CST OFFSET
TOTAL

NUMBER OF

CONFIGURED CONTROLLERS

DROP UNIT REASON
NUMBER OF OUT .TANDING QIOS PER CONTROLLER
STARY OF FREE MEMORY
SIZE (BYTES) OF AN I/0 BUFFER
CURRENT STATUS CODE
CURRENT SuUB-CODE
CURRENT STEP IN MARD_INIT
OFFSET (O OR 2) TO READ IP OR SA
STORAGE FOR SA REGISVER READS AND WRITES
COMMAND TIMEOUT VALUE (IN SECONDS)
NON-EXISTENT MEMORY TRAP INDICATOR

COMMAND REF NUMBER OF LAST COMMAND SENT
COMMAND REF NUMBER (HI ORDER)

' CURRENT mese

PACKET INDEX

' DBN BYTE COUNTER
* THE PATTERN WRITTEN 1O DBN'S
CREDIT BALANCE
! POINTER TO NEXT ENTRY

IN PKY_USE

TABLE

NRQAM1

RD/RXx EXERCISER

vOol1.¢

GLOBAt TEXT SECYION

)

:
;

:
H
:
:
:
:

2842

debtt]l

284S
2846
2847
2848
2849
2850
2851
2852
2853

'
!
!
!

2843
2844

2854

2856

:
:
:
:
:

:
:

2884
2885
2886

;
:
;
:
.

HWQ6 = uplit (vesciz'STARTING LBN' ),

!
¢
!

SOFTWARE DIALOG

SWA1

= uplit (vasciz'HARD ERROR LIMIT'),

SWQ13
SWA14

=
=

SWA2
SWO4
SWQ7
SWA9
SWQRL0
SWA11l
SWQ12

=
=
=
=
=
=
=

uplit
uplit
uwlit
wplit
uplit
uplit
uplit

(dasciz' TRANSFER LIMIT IN MEGABYTES (0 FOR “QUICK PASS”)'),
(sasciz’'RANDOM SEEK MODE'® ),
(vasciz READ-COMPARES PERFORMED AT THE CONTROLLER' ),
(deeciz'WRITE-COMPARES PERFORMED AT THE CONTROLLER'),
(desciz’'CHECK ALL WRITES AT HOST BY READING'),
(sesciz'USER-DEFINED DATA PATTERN' ),
(wesciz'SELECT PRE-DEFINED DATA PATTERN (O FOR SEQUENTIAL SELECTION)'),

wlit (sesciz'NUMBER OF WORDS IN DATA PATTERN (16 MAXIMUM)' ),
uplit (seeciz‘PATTERN VALUE'
),

SWA1S = wplit (seeciz'CLEAR STATISTICAL TABLES AFTER PRINTING'),

SWA17 = wlit (veeciz'PERCENTAGE OF RDOS1 OPERATIONS OUT OF TOTAL OPERATIONS' ),
SWA19 = uplit (sesciz'UNITS TO BE SELECTED AT RANDOM (NO, IMPLIES SEQUENTIAL)'),

!
!

2887
2888

SWR20 = wplit (seeciz'WANT TO REWRITE BLOCKS WHEN “FORCED ERROR" DETECTED ON READS ).
SWA21 = uplit (sesciz’'IF "HALT ON ERROR* FLAG SET, WANT TO HALT ON HARD/SOFT ERRORS ALSO

SHQ22 = wlit (seeciz’NUMBER OF DBNe READ AT ONE TIME (effects RDSis only)‘),
SWML
= uplit (dasciz'
THE REMAINING QUESTIONS ONLY APPLY TO UNPROTECTED
DISKS'),
NAL
= uplit (wesciz''),

¢
¢
!
|

2893
2894
2895
gggg

PIQll = uplit (sesciz'WRITE ON DIAGNOSTIC AREA'),

2882
2883

2889
2890
g:g;

IMPLIES AN RXSO FLOPPY)

Q7 = uplit (sesciz’ENDING LBN (MAXIMUM - RX50: 799, RDS1: 21599)'),
Q8 = uplit (waeciz'WRITE ON CUSTOMER DATA AREA ON THIS DISK‘),
HWQ9 = uplit (sesciz’'e+s WARNING - CUSTOMER DATA AREA MAY BE OVERWRITTEN! ... CONFIRM‘),
Q10 = uplit (sasciz’' ALSO EXERCISE ON DIAGNOSTIC AREA ( NON-CUSTOMER AREAR)'),

2879

:
;
;

HWQS = uplit (sesciz’'IS DISK AN RDS1 WINCHESTER (NO,

2877
2878

2880
2881

H
;
;

Q4 = uplit (sesciz'RD/RX DRIVE NUMBER' ),

ggg‘s

:
:

H
:

Q3 « uwplit (vWasciz'BR LEVEL'),

2860
2861
2862
2863

2870
2871
2872
2873
2874
2875
2876

'GLOBAL TEXT SECTION'

G2 = wlit (vesciz'VECTOR'),

2859

2869

!
!
H
[]

THE FOLLOWING DBMe ARE DEBUG MESSAGES, AND SHOULD BE REMOVED BEFORE
RELEASING THE PROGRAM.
THEY INCLUDE THE NAMES OF £ACH ROUTINE, PLUS
FORMAT STATEMENTS FOR PRINTING OUT OTHER INFORMATION.

'JSO REV A -REMOVED DEBUG MESSAGES MARKED BY "te”
THE REST WERE ALREADY COMMENTED OUT,

L9%

SPIDEROUSERS:[DOUCE!TE.FALCON)CMQM».gfi .19

Q1 « uplit (vaesciz’'IP ADDRESS'
),

2858

:
:
;
:
:
H
:

15 Dec 1983% 10:21:50

SEQ LT

VAX 11 Blies 16 V3 555

global bind
!
' HARDWARE DIALOG
!

2857

2866
2867
2868

1983 10:24:41

THE GLOBAL TEXT SECTICN CONTAINS FCRMAT STATEMENTS,
MESSAGES, AND ASCII INFORMATION THAT ARE USED IN
MORE THAN ONE TEST.

2855

:
:
:

1% Dec

() !
RD/RX EXERCISER

GL O0BAl

2898
2899
2900
2901
2902
2903
2904
2905
2906
2907
2908
2909
2910
2911
2912
2913
2914
2915
2916

2951
2952
2953

éfiésfié&sssfissssfi%%

it
1 t
1t

(dasciz'WNsAss

10:24:41
10:21:50

VAX

Blies

= #DSwA RECEIVED'
),

FATAL _ERROR: RETPKT NOT AVAILABLE® ),
FSET _UPAR: CAN''T FIND DISK #D3#A IN CST «D1'),
BAD CONN ID = #D5S#A RECEIVED FROM #06'),
MESSAGE TYPE wD2#A RECEIVED IN MSCP PACKET'),

SEQUEN:

RETPKT

NOT

AVAILABLE®),

it (vasciz'uNsAss UNIT_INIT: RETPKT HAS BAD ENDCOOE'
),
it (dasciz'#NsAes UNIT SIZE (LO) = #05'),
it (dasciz’' #NsAss UNIT SIZE (HI) = #05'),

lit (vesciz’'®WNsAse ACCESS:
I

DBM107
DBM108
DBM109
OBM110

=
=
=
=

RETPKT HAS BAD ENDCOOE'
)

t (wesciz'wNwAss QIO UNIT: CST #D1sA NO UNIT SELECTED’),
t (sesciz'wNsAse UNIT @ 1IS:

#06'),

(dpeciz'BNsAss RXS0 IS SELECTED'

uplit (desciz'¥NsAss RDS1 IS SELECTED'

uplit
uplit
uplit
uplit

(sasciz'sNsAess
(desciz'uNsAss
(desciz
' SNEAss
(sesciz'SNsAse

ILLEGAL FUNCYION: 106').
COMMAND REF & wDS#A. NOT SENT BY MOST'),
UNKNOWN ERROR LOG FORMAT #D3sA. RECEIVED'
),
ERROR-LOG SAVE AREA FULL'),

DBM1ll = uplit (sasciz’'#NsAss REINIT MSCP EXERCISER’)
= uplit (Wesciz' wNWAsa DUP_RSP: RETPKT NOT AVAILABLE
pBM1L12

! DROP UNIT MESSAGES
DU_MSG = uplit

(vesciz’'SNSAUNITSD24A DROPPED

DU_RSN = uwplit (

'),

wplit (sesciz’'sAUSER COMMANDSN' ),

uplit (sesciz'%ACONF IGURATION ERRORSN' ).
uplit
uplit
uplit
uplit
uwplit
uplit
uplit

(sesciz'wAINIT ERRORWN' ),
(veeciz'SATRANSFER LIMIT REACHEDSN'
),
(seeciz'SAERROR LIMIT REACHEDSN'
),
(seeciz’' SAUNRECOVERABLE DEVICE ERRORsN'
),
(sasciz’' SAUNRECOVERABLE CONTROLLER ERROR®N'
),
(sesciz’SAFAILED TO COME ONLINESN'
),
(sasciz'wAFAILED TO ACCESS LAST TRACK DURING INITsN'),

uplit (sesciz'SADISK WRITE PROTECTEDSN'
),
uwlit (desciz’'sACOMMAND TIME OQUTSN'
),
uplit (sesciz'SAUNIT WENT TO AVAILABLE STATE®N’'))

vector (11],

SYSTEM MESSAGES (PRINTF)
MSG_01 = wplit (sesciz' SNSAPOWER DELAY - WAITING'),
MSG_C2 = wplit (seeciz' SNSAFUNCTIONAL TEST STARTED'),
MSG_03

uplit

(sesciz' SNSNSAEXERCISER

STARTEDSN'
),

REPORT MESSAGES (PRINTS)

RPT1

RPT2
RPT3
RPT4
RPTS

uplit
uplit
uplit
uplit
wlit

(deec
iz’ SNSNSAUNT DSKES8EAS OF
& BYTES
& OF
(deeciz'sA
--HARD ERRORS-- --SOFT ERRORS--'),
(esciz'sSNA
¢
&
TYPE
READS
READ
WRITES
(Wasciz'#A
SEK DAT DRV HST SEK DAT DRV HST' )
(sasciz' SNsA- . -

S55

SEQ 00T,
Page

SPIDERSUSERS: [DOUCETTE LFALCONICNRQAA
. BLL

lit (sesciz'dNBAss ERROR IN SET_CTLR_CHAR'
),
lit (desciz'#NBAse CTLR TIMEOUT = #D3®A SECONDS'
).
lit (dasciz'SNSAse ERROR IN UNIT_INIT'),

08M104
DBM105

1983
198%

(dasciz'®NsAsse DROP UNIT ®D2'),
(wasciz'®NwAs+ PROC RETPKT: CONN ID
(dasciz'wNsAss MULTI DRIVE TEST'),

(desciz'sNwAs+s
(sesciz'®#NsAss
) t (vasciz'sNsAse
lit (sasciz'SNSAss

DBM32
08M101

“.-

W
B¢
Be
@1
®e

2945
2946
2947
2948
2949

li t
1 t

o8M25
DBM26
oaM27
DBM28A
0BM288
08M29

‘e

15 Dec
15 Dec

SECTION

DBM23

2917
2918
2919

2920
2921
2922
2923
2924
2925
2926
2927
2928
2929
2939
2931
2932
2933
2934
2935
2936
2937
2938
2939
2940
2941
2942
2943

TEXTY

08MS
oBM12
OBM1S
ogM18
DBM19
DBM20
D8M21
DBM22

®e

G¢

®r

NR@AM1
VO1.LC

® BYTES'),

WRITTEN')

(30

=
RD/Rx EXERCISER

NRQAM1
vol1.¢

GLOBA!

®e

;
.
:

H
:
H
i
:
H
:

2954
2955
2956
2957
2958

2959
2960
2961
2962
296%

2964

2965
2966
2967
2968
2969
2970
2971
2972
2973
2974
2975
2976
2977
2978
2979

2981
2982
2983
2984
2985
2985
2987
:
H
H
:

2989
2990
2991
2992
2993

Dec

(sesciz'®A
(sesciz' ¥NNO2#DAA
RXS50 ),
(desciz' sNuD28DASA
RDS1 ),
(veeciz'wDANZ3uDuA
,8238A , 623" ),

TEXT SECTION

RPT6
RPT?
RPTS
RPTS
RPT10

wplit
uwplit
uplit
uplit

15 Dec

1933

10:¢4:41

1983 10:21:50

wplit (sasciz'¥A

CNIR

.#DA4”A

UPLIT(#ASCIZ sNeNSAUNIT
DISK
UPLIT(wASCIZ 'uNSA
@
e
- -UPLIT(#ASCIZ '#NSA --UPLIT(WASCIZ' ¥NeS16D28S48D28A

TYPE

eeeaeean

.#DA%A

o OF
READS
R

DBNRDS1

)

& BLKS
READ

heseaaees

"y,

%D6#S38D6WSS#D6%S38D6
),

SYST EM FATAL (ERRSF)
EGS_O1
EGS 02

= uwplit
= uplit

(waeciz'T00 MANY UNITS'),
(sesciz'NOT ENOUGH FREE MEMORY

FOR ALLOCATING READ/WRITE BUFFERS'),

DEvI CE FATAL (ERROF)

wplit
uplit
uplit
wlit
uplit

EGD_10
EGD_ 11
EGD_12
EGD_13
EGD_14
EGD_15
EGD_16
EGD_17
EGD_18
EGD_19
EGD_20
EGD_21
EGD_22
EGD_23

(sesciz'REGISTER EXISTENCE TESY FAILED'
),
(seeciz'VECTOR TEST FAILED'),
(sesciz'BR LEVEL TEST FAILED'),
(sesciz’' INIT SEQUENCE FAILED’),
(seeciz’'FATAL CONTROLLER ERROR' ),

uplit (semciz'ONLINE FAILED'),
uplit {(sesciz'WRITE-PROTECT CONFLICT'),
uwplit (sesciz' ACCESS FAILED'),
uplit (sasciz'FATAL I/0 ERROR'
),
wlit (sesciz’CONTROLLER TIMEOUT'
),
wlit

(seeciz’ FAILED TO SEND SET-CONTROULLER-CHARACTERISTICS COMMAND'
),

uwplit (seeciz’'SET-CONTROLLER-CHARACTERISTICS RESPONSE HAS BAD ENDCODE OR FLAGS IN ERROR‘
),
uwlit (sesciz'FAILED TO SEND ON-LINE COMMAND'
),
uplit (sesciz'ON-LINE RESPONSE HAS BAD ENDCODE ),

HARD or SOFT

EGH_30

(ERRHRD or ERRSOFT)

uplit (sesciz’'1/0 REQUEST FAILED'
3,

- uwplit

(sesciz'wAMORE THAN #D2¢A UNITS SPECIFIED'),

DEVICE FATAL (ERRDF)

3009

GENERAL ER ROR MESSAGES

£85.01

V3 55

o OF
9 BLKS '),
WRITES
WRITTEN ‘),

SYST EM FATAL (ERRSF)

3003

EBD .10
EBD_12
EBO_13
EBD_14
EBD_18
£8D .19

uplit
uplit
wlit
uplit
uplit
uplit

(sasciz'sAs
(wasciz'#As
(seeciz’'sAs
(sasciz’'s#As
(sasciz’'dAs
(vasciz'sAs

SEQ O(T?
Page

SPIDERS JSERS: [DOUCETTE _FALCONICNROAA
B 1 (3¢

BASIC ERROR MESSAGES (PRINTBY

Bl ss

‘.

wlit (sesciz' sDAsDA%DasDA%D4A8D4%D4%04" ),

uplit (dasciz'SNESA

RPT11
RPT12
RPT13
RPT14
RPT15
RPT16

VAX

NO RESPONSE AT ADDRESS #06'),
INCORRECT BR LEVEL FOR DEVICE w06'),
STEP wDI1%A READ ERROR'),
BAD SA CODE FROM DEVICE =06'),
DISKeD2#A WENT OFFLINE'
),
DEVICE #06%A NOT PROCESSING COMMAND PACKETS'),

RD/RX EXERCISER
GLOBAL TEX T SECTION

HARD or

3010
3011
3012
3013
3014
3015
3016
3017

1% Dec
15 Dec

SOFT

VAX-11 Bliss
SPIDERSUSERS

unrecognized MESSAGE TYPE'),
unrecognized connection id'),
unrecognized RETURN moosoge‘).
- unrecognized RETURN PACKET')

UPLIT (®ASCIZ®
= UPLIT (®ASCIZ'
unres
ized CRN' ),
UPLIT (#ASCIZ®
EH_4
UNREC
IZeD OPCODE'
),
EM_S
UPLIT (#ASCIZ’
MSCP STATUS CODE ERROR'
),
EH_6
UPLIT (#ASCIZ'
DUP STATUS CODE ERROR'
UPLIT (wASCIZ'
En_?
),
EH_8
UPLIT (SASFIZ' - unrec
ized STATUS CODE' ),
EH_9
UPLIT (#ASLIZ' - LBN HOST COMPARE ERROR'),!
EH_10 = UPLIT (®ASCIZ' - DBN HOST COMPARE ERROR'),
EM_12 = UPLIT (®ASCIZ' - UNABLE TO LOAD DUP MECIA '),
EH_13 = UPLIT (WASCIZ' - ERROR IN DUP-PKT WHEN USING CTLR LC PRG’ ),
ERR_COD = wplit (
uplit (seeciz'SAINVALID COMMAND'
),
uplit (vesciz'sACOMMAND ABORTED'
),
wplit (sosciz'SAUNIT OFFLINE'
),
uplit (saeciz' SATRANSITION TO AVAILABLE STATE'),
wplit (sasciz'SAMEDIA FORMAT ERROR' ),
uplit (sesciz'sAWRITE -PROTECTED' ),
uplit (seeciz
' SADEVICE COMPARE ERROR' ),

3018
3019
3020
3021
3022
3023
3024
3025

3026
3027
3028
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3039
3040
3041

uplit
uplit
wplit

uplit
uplit

wplit
wplit

(sanciz’'wADATA ERROR' ),

(sanciz' SAMOST BUFFER ACCESS ERROR' ),
(seeciz' ACONTROLLER ERROR' ),
(sesciz’'wADRIVE ERROR’ ),
(sesciz’' SAMESSAGE FROM INTERNAL DIAGNOSTICS'),
(sesciz
' wAHOST COMPARE ERROR'
),
(sasciz'ACOMMAND TIMEOUT')) : vector [14],

ERROR LOG MESSAGE (ERRSOFT)

3043

ELG_00
ELG_FMT

3045
3046
3047
3048
3049

3051
3052
3053
3054
3055
3056
3057
3058
3059
3060
3061
3062
3063
3065

= uplit (sasciz'SNWAERROR LOG MESSAGE RECEIVED:sN'),

= wplit
uplit
wplit
wplit
uwplit
uplit

(

(sasciz'wAs CONTROLLER ERRORWN'
),
(sasciz'wAs HOST MEMORY ACCESS ERRORwN'
),
(dasciz’'sAs DISKuDSuA - DISK TRANSFER ERRORWN’
),
(daeciz'vAs DISKeD2eA - “STANDARD DISK INTERCONNECT* ERRORwWN' ),
¥As DISKuD2wA - "SMALL DISK” ERRORWN')) : vector (S],
(dasciz

EXTENDED ERROR TME SSAGES (PRINTX)
EX_BDR
EX_B80W
EX_LBR
EX_LBW
EX_RBN
EX_CBR
£Ex_CBW

Xx13
Xx14
xXX1$S
XX16

uwplit

uplit
uplit
uplit
wlit
wplit
wplit

(senciz’' ¥NSAI/0 BUFFFR ADORESS FOR READ (32 BI7S): #068A #O6%N’'
),
(sesciz'wNEAI/0 BUFF.. ADDRESS FOR WRITE (32 BITS): #06%wA #06‘),
(desciz'¥NSALBN: (READ) sDS#A, (OCT #06%A)'
),
(sesciz'NSALBN: (WRITE) sDS5#A. (OCT s06%A)’
),
(sesc iz’ SNSAREPLACEMENT BLOCK NO., sDSsSA. (OCT #06%WA)’
),
(sesciz' sNSABYTE COUNT IN READ COMMAND: ®DSSA.'),
),
(sesciz' SNSABYTE COUNT IN WRITE COMMAND: wDS®A.’

uPL IT (SASCIZ'#NsA « DISK

%02 ),

upl it (dasci Z'WNBASA: #06'),
upl it (desci z' WNMASTATUS CODE: '),
upl it (sasci z' #NSASTATUS SUB-CODE:

1)'

V3-555

SEQ 0C3%e
P

:(DOUCEYTE.FALCON)CMQAA.BL.”I (30

(ERRMRD or ERRSOFT)

UPLIT (wASCIZ'
UPLIT (#ASCIZ'

EH_O
En_1
EH_2
€EH_3

1983 10:24:41
1983 10:21:50

G¢

€

NRQAM1
vOo1.0

LJ’
4

RD/R X

EXERCISER
GLOB AL TEXT SECTION

NRQAM]
vol.¢

3066
3067
3068
3069
3070
3071
3072
3073
3074

3075
3076
3077
3078
3079
3080
3081
3082
3083
3084
308S
3087
3089
3091
3092
3093
3094

XX17
xXX18
XX19
xx20
xXx21
Xx22
xx23
Xx24
XX25
XX26
xXx27

se
B
er
e¢
@r
w1
@y
av

= uplit (sasciz'SNSACOMMAND:

= uplit (Basciz'wA-DUP-'),
= uplit (sasciz'SA-MSCP-'),

s
=
=
s
=
=
=

Wwlit
uplit
uplit
UPLIT
uplit
yplit
uplit

= uplit
XX29 = UPLIT

1983
1983

10:24:41
10:21:50

SEQ oo
VAX 11 Bl.es 16 v3 S55
Page
¢
SPIDERS$USERS: {DOUCETTE. FALCONICNRQAR
BL1 7 3(

(vasciz'sA-COMPARE'
),
(sesciz'wNSABAD BLOCK REPORTED: #0SsA.'),
(saesciz'wNwWALBN: #DS#A. (OCT #068A)'
),
(WASCIZ'wNsSADBN: #DS#A. (OCT #068A)' ),
(sesciz'SNSABYTE COUNT IN COMMAND: «DS: ),
(vesciz' SNWAACTUAL @ OF BYTES TRANSFERRED: #05'),
(sesciz'SNSAI/0 BUFFER ADDRESS (32 BITS): #06%A %06’ ),
(vasciz'WNSACONTENTS OF RETURN PACKET:sN‘
),

(8ASCIZ' ¥NSAMESSAGE TYPE: ‘),
UPLIT (wASCIZ' NSAMESSAGE NUMBERS: '),
UPLIT (#ASCIZ'SNSAMESSAGE ERROR CODES: ‘),
UPLIT (WASCIZ'#NSABYTE NUMBER: %03’ ),
UPLIT (wASCIZ' ¥NSARANDOM WRITTEN WORD :#816°'),
UPLIT (#ASCIZ' sNsSARANDOM READ WORD bin:#B16%A oct:#06' ),
UPLIT (#ASCIZ'uNsACRN
: #06°),
!1XX36 = UPLIY (“SCIZ‘“AT&E "EXPECTED CRN : %06'),
XX37
UPLIT (SASCIZ 's$A - UNKNOWN : #D2'),
XX38
UPLIT (SASCIZ'®A - UNKNOWN CONNECTION 1D: #D3sAR - ).
XX39
UPLIT (wASCIZ' wNsSACONTROLLER FLAGS:'),
XX40
UPLIT (SASCIZ wNsSAUNIT FLAGS:'),
XXa41
UPLIT (®ASCIZ'oNSAEND MESSAGE FLAGS:'),

XX30
Xx31
XX3¢2
XX33
XX34
XX35

=
=
=
=
=
=

’

UNKNOWN RETURN MESSAGES

),
€EB_DCT = UPLIT (#ASCIZ'#NsA DRIVER CONTROLLER TABLE = ADDR: sSD6EN’
EB_COMM = UPLIT (#ASCIZ'wNsA CMD INT, RSP INT, COMMAND RING = ADDR: wD6sN’
),
EB_PXT = UPLIT (wASCIZ 'wNsA ALL PACKETS IN MESSAGE AREA’),
EB_RAL = UPLIT (SASCIZ '#NsiA ALL RETURN PACKETS IN AREA')

3095

3097
3098
3099
3100
3101
3102
3103
3104
3105
3106
3107
3108
3109
3110
3111
3112
3113
3114
3115
3116
3117
3118
3119
3120
3121

15-Dec
15 Dec

EB_ADDR » UPLIY (WASCIZ'#NsA ADDR: sD6SA

PACKET = wN'),

EBNEX1 = UPLIT (#ASCIZ'#NsA ADDR OF RESPONSE RING YO 8E POLLED #D6°),
EB_NEX2 = UPLIT (WASCIZ'wNsA ADOR OF MESSAGE PACKET RESPONSE RING SLOT POINTS TO #D6'),
EBNEX3 = UPLIT (#ASCIZ'#NsA ADOR OF MESSAGE PACKEY COMMAND RING SLOT POINTS TO #D6°' ),
CONFIGURATION ERROR MESSAGES (PRINTF)
CER_O1 = uplit (weeciz' SNSADUPLICATE UNIT:#D2#A AT IP: %06' ),
CER_02 » uplit (sesciz' SNSAMORE THAN #D1sA DIFFERENT IP ADDRESSES' ),
!
!
!

ME SSAGE TYPES

EX_SEQ
EX_CRD
EX_MIN
EX_DGM

! commends
'mecp

=
=
=
=

UPLIT
UPLIT
UPLTT
UPLIT

v
(WASCIZ'#A- SEQUENTIAL'),
(#ASCIZ'sA- CREDIT NOTIFICATION'),
(#ASCIZ'®A- MAINTENANCE' ),
(#ASCIZ'®A- DATAGRAM' ),

EX_RD = uplit (sesciz'%AREAD’
),
EX_WRT = uplit (sesciz'AWRITE'
),
EX_ACC = wplit (wesciz'sAACCESS'
),
EX_ONL = uplit (sesciz'wAON LINE'),

1< 4
RD/RX EXERCISER
GLOBAL TEXT SECTION

NRQAM1
vol.¢

B¢

@¢

B¢

®¢

)

3122
3123
3124
3125
3126
3127
3128
3129
3130
3131
3132
3133
3134
3135
3136
3137

3138
3139
3140
3141
3142
3143
3144
3145
3146
3147
3148
3149
3150
3151
3152
3153
3154
3155
3156
3157
3158
3159
3160
3161
3162
3163
3164
3165
3166
3167
3168
3169
3170
317
3172
3173
3174
3175
3176
3177

EX_SCC

uplit

EX_GDS
EX_ESP
EX_ELP
EX_SOD
EX_RCD
EX_ABP

uplit
uplit
uplit
wlit
wlit
wpl:t

15 Dec
15-Dec

1983
1983

10:24:41
10:21:50

SEQ 003
'
VAX 11 Blies-16 v3-555
37
SPIDER$USERS: {DOUCETTE .FALCONICNRQAA
(30

(sesciz'wASET CONTROL CHAR.'),
(dasciz'SAGET DUST

STATUS'),

(sasciz' SAEXECUTE SUPPLIED PRG'),
(sasciz'SAEXECUTE LOCAL PRG'),
(desciz'SASEND DATA' ),
(sesciz'SARECEIVE

(sasciz'SAABORT'
),

DATA'),

! ERROR/EVENT SUB CODES (PRINTX)
SC_SDI
SC_CON
SC_DWP
SC_ONL
SC_SON
SC_UNK
SC_VOL
SC_IOoP
SC_DIS
SC_FER
SC_fE2
SC_ISH
SC_IS2
SC_DST
SC_0S2
SC_ECC

SC_ECD

SC_RCT
SC_FUL
SC_576
SC_FCT
SC_eC1
SC_EC2
SC_EC3
SC_ECA
SC_ECS
SC_€Cé
SC_EC7
SC_EC8
SC_EC9
SC_SwWP
SC _HwP
SC_ODA
SC_008
SC _NXM
SC_PAR
SC_CY0
SC_SDS
SC_EOC
SC_IDS
SC_SRY
SC_SRI
SC_POE
SC_RDY
SC_CLK

wlit
wplit
wplit
wlit
wlit
wlit
uplit
wplit
wlit
plit
wplit
uplit
wplit
wplit
wplit
wplit
wlit
wplit
uplit
wlit
wplit
uwplit
wlit
wplit
wlit
wlit
uplit
wplit
wplit
wlit
wplit
uwplit
wplit
wlit
uwplit
uplit
wplit
wplit
wlit
uplit
wlit
wplit
wlit
uplit
uplit

(seeciz'wASPIN-DOWN IGNORED'
),
(seeciz'ASTILL CONNECTED'),
(danciz'sADUPLICATE UNIT NUMBER'
),
(sasciz' SAALREADY ONLINE'
),
(sSaeciz
' wASTILL ONLINE'),
(danciz' SAUNIT UNKNOWN OR ONLINE TO ANOTHER CONTROLLER'),
(Sasciz'#ANO VOLUME MOUNTED OR DRIVE DISABLED BY SWITCH'),
(daeciz'SAUNIT INOPERATIVE (RDS1 WRITE FAWT'),

(desciz'wAUNIT DISABLED BY FIELD SERVICE OR INTERNAL DIAGNOSTICS'),
(deeciz'wAFORCED ERROR” DETECTED WHILE ACCESSING FCT OR RCT‘),
(seeciz’'wASECTOR WRITTEN WITH “FORCED ERROR” MODIFIER'),
(seeciz'sAFCT OR RCT UNREADABLE - INVALID SECTOR HEADER'
),
(danciz’' SAHEADER COMPARE ERROR (VALID HMEADER NOT FOUND)'
),
(sesciz'wAFCT OR RCT UNREADABLE - DATA SYNC TIMEOUT'),
(seeciz'sADATA SYNC NOT FOUND (DATA SYNC TIMEOUT)'),
(senciz'#AFCT OR RCT UNREADABLE - UNCORRECTABLE ECC ERROR‘),
(seeciz' SAUNCORRECTABLE ECC ERROR'
),
(enciz'wARCT CORRUPTED'
),
(seeciz'wAND REPLACEMENT 8LOCK AVAILABLE (RCY FULL)'),
(deeciz'SADISK NOT FORMATTED WITH S12 BYTE SECTORS'),
(sewciz’'SADISK NOT FORMATTED OR FCT CORRUPTED'),
(denciz'SAONE SYMBOL ECC ERROR'
),
(denciz'wATWO SYMBOL ECC ERROR'
),
(deeciz’' SATHREE SYMBOL ECC ERROR'),
(desciz’'SAFOUR SYMBOL ECC ERROR'
),
(desciz'SAFIVE SYMBOL ECC ERROR'
),
(desciz’'SASIX SYMBOL ECC ERROR'
),
(sesciz’' SASEVEN SYMBOL. ECC ERROR’ ),
(sesciz'MAEIGHT SYMBOL ECC ERROR’
),
(senc iz’ SACORRECTABLE ERROR IN ECC FIELD'),
(deeciz’' SAUNIT SOFTWARE WRITE PRCTECTED'),
(vasciz’' SAUNIT HARDWARE WRITE PROTECTED'
),
(sesciz'sAODD TRANSFER ADODRESS'),
(seeciz'sA0DD BYTE COUNT'),
(desciz’' SANON-EXISTENT HOST MEMORY'
),
(seeciz SAHOST MEMORY PARITY ERROR’
),
(sasciz' sACOMMAND TIMOUT OR RETRY LIMIT EXCEEDED'
),
(senciz' ASERIALIZER/DESERIALIZER OVERRUN OR UNDERRUN'
),
(deeciz'SAEDC ERROR'
),
(sesciz' AINCONSISTENT INTERNAL DATA STRUCTURE'),
(samciz'SADRIVE COMMAND TIMEOUT (NO RESPONSE OR SEEXK INCOMPLETE)
(sasciz' sACONTROLLER DETECTED TRANSMISSION OR PROTOCOL ERROR‘),
(sanciz'#APOSITION ERROR (MIS-SEEK)'),
(sesciz'wALOST READ/WRITE READY DURING/BETWEEN TRANSFERS'
),
(sasciz’'#ADRIVE CLOCK DROPOUT'
),

821

|
N2GAMI
\01.¢

RD/RX EXERCISER
GLOBAL TEXT SECTION

15 Dec-1983
15 Dec 1983

10:24:41
10:21:50

)

;
;
;

:
:
:
:
:
:
:
:
:

H
:
;

:
;
:

;

3178
3179
3180
3181

3183

3182
3184

H
¢
!

gggg

;
:
:

3221
3222
3223

uplit

(sasciz'¥NSA

) Bad Block

Unreported'),

F_2 = uplit (dasciz'#NWA ) Error L
Generated’
),
F_3 = uplit (sasciz'#NSA ) Serious
Etxception'),
! MSCP Controller Flags
F 4 = uplit (vasc:2'8NSA) Enable Attention Messeges' ),
F_S = uplit (sesciz'®¥NsSA) Ensble Miscellaneous Error Log Messages'
),
F_6 = wplit (sesciz'sNEA) Enable Other Hosts Error Log Messeges'),
F_7 = uplit (vasciz'SNSA) Ensble This Hosts Error L
Messages' ),
F_
8 = uplit (sesciz'#NSA) Controller Initiated Bad Block Rplemnt'),
F 9 = wplit (vesciz'#NSA) Shadowing' ),
F_10 = wlit (Yesciz'wNSA) 576 Byte Sectors'),
MSCP UNIT FLAGS

F_11
F_12
F_13
F_14

=
=
=
=

uplit
wlit
plit
wplit

(sesciz'sNuA)
(desciz'sNsA)
(veeciz'uNSA)
(sesciz'sNSA)

Compare Reesds'),
Compare krites'),
Controlier Initieted Bad Block Rplemnt'
),
Inective Shadow Set Lnit'),

F_15 = uwplit (vesciz'sNSA) Removable Medie'
),
F_16 =~ uplit (sasciz'#iNsEA) Suppress Caching (high speed)’),

F_17 = uplit (sesciz'sNsA) Suppreess Ceching (low speed)'),
F_18 = uplit (daeciz’'sNEA) WHrite-beck (non-voletile)'),
F_19 = uplit (sSasciz'NEA) Hrite Protect (hardwere)'),

F_20 = uplit (desciz’'NSA) kWrite Protect (softwere or volume)
),

F 21 = wlit (Mesciz'sNEA) 576 Byte Sectors'),
H

!
!

!
'

3224

DUP RETURN PACKET MESSAGES
STATUS CODE
EBH_30 = uplit (sesciz'sA
EBH_44 = UPLIT (#ASCIZ'sA
EBMH_AS5 = UPLIT (wASCIZ's#A
EBH_46 = UPLIT (wASCIZ'sSA
EBH_47 = UPLIT (#ASCIZ'#A
EBH_48 = UPLIT (#ASCIZ'SA
€EBH_49 = UPLIT (#ASCIZ‘'sA

.
SUCCESS'
),
INVALIO COMMAND(SERVER nonIDLE or no medis if EX-LC-PRG cmd)' ).
NO REGION AVAILABLE'
),
NO REGION SUITABLE'
),
PROGRAM NOT KNOWN (NO SUCH PROGRAM ON MEDIA)'),
LOAD FAILURE (INPUY ERROR WHILE LOADING PROGRAM)'
),
STANDALONE (STANDALONE MODIFIER NOT SPECIFIED FOR STAND ALONE PRG.)'),

DUP GET DUST STATUS FLAGS
df
_0 = wlit (vesciz'SNsSA) One Server st o Time'),

df
_1 = wplit (veeciz'sNsA) Contains Locel Media’'),

3225
ggg?

df
2 = uplit (sasciz'sSNEA) Execute Local Prg cmd is UNSUPPORTED'),
df_3 = uplit (vesciz'¥NsA) Currently in Active Steste'),
[]

;

3228

:
H
:

3230
3231
3232
3233

;

!'F_
O = uplit (weeciz'wNEA) Bad Block Reported’' ),

1
3197
3198
3199
3200
3201
3202
3203
3204
3205
3206
3207
3208

3186
3187
3188
3189
3190
3191
3192
3193
3194
glgz

:
:
;
;
H
;
:

H
;

! MSCP END MESSAGE FLAGS
F_1

3211
3212
3213
3214
3215
3216
3217
3218
gg%g

SC_RSP = uplit (sasciz'$ALCST RECEIVER READY BETWEEN SECTORS'),
SCISUR = upl t (wasciz'$ADRIVE DETECTED ERROR'),
SC_PSP = uplit (wasciz' WACONTROLLER DETECTED PULSE OR STATE PARITY ERROR'),

3185

3229

DUP EXECUTE LOCAL PRG END FLAGS

df
_ 4 = uwlit (sesciz’'sNsSA) Stendalone Prg’'),

df_.5 = uwlit (vesciz'dSNsSA) Needs overlay'),
df
_ 6 = uplit (sesciz'¥NsSA) Needs \riteable/Readeble Ovorlog').
df
_7 ~ uplit (sesciz' ¥NsA) Uses Std Dup Dialog; REC/SEND/REC’ ),

SEQ 0027

VAX 11 Bliss 16 V3 S55
Page
38
SPIDERSUSERS:(DOUCETTE.FALCONICNROAL.BL1 (30

17
NRQAM1

RD/RX EXERCISER

vo1.C

GLOBAL

3234
3235

:
.
:
H
:

3237
3238
3239
3240
3241

;
;
:
.
;
;
:
;

;

;
;

:
-

;
;

;
:
:
;
:
;
:
;
:

;
:
:
.
:

:
:
;

3236

10:21:50

DUP LOCAL PROGRAM PACKET MESSAGES

T.QUE = uplit (sesciz'#NSA

s QUESTION'),

3246
3247
3248
3249

E_ZER
M_ASC
M_BIN
M_TER

=
=
=
=

UPLIT
UPLIT
UPLIT
UPLIT

(WASCIZ'#N®MA
ZERO LENGHT MESSAGE'),
(®ASCIZ'#NSA -- ASCII INFORMATION '),
(®ASCIZ'®N®A -- NON-ACSII INFORMATION'),
(WASCIZ'®#Ns®A -- TERMINATION MESSAGE'),

3251
3252
3253

M_DAT = UPLIT (WASCIZ'®NsA SEND BINARY DATA'),
M_UR = UPLIT (#ASCIZ '#NsA -- SEND UNIT NUMBER, RELATIVE DBN'),
M_URP = UPLIT (®ASCIZ‘'®NsSA -- SEND UNIT NUMBER, RELATIVE DBN, WRITE PATTERN'),

3242
3243
3244
3245

3250

«»
+s&
+s
+s
«»

3254

DEFAULT QUESTION'),
INFORMATION'),
TERMINATION'),
FATAL ERROR'),
SPECIAL'),

€_SUC = UPLIT (®ASCIZ'#NsA - SUCCESS'),
E_UNT = UPLIT (WASCIZ'®N®A - ILLEGAL UNIT NUMBER'),
E_BLK = UPLIT (WASCIZ'#N®A - ILLEGAL PHYSICAL OR RELATIVE BLOCK NUMBER'),
€_DEV = UPLIT (%ASCIZ'#N®A - DEVICE ERROR'),

M_COD = UPLIT (®ASCIZ'#NSA -

SUCCESS/FAILURE CODE'),

M_UP = UPLIT (#ASCIZ'SNsSA -- SEND UNIT NUMBER, PHYSICAL BLOCK NUMBER'),

M_UL

= UPLIT (#ASCIZ'®NSA

SEND UNIT NUMBER,

LOGICAL

BLOCK NUMBER '),

]

ggssz

3259

CONTROLLER GENERIC ERROR CODES
CNTR_ERR

3260
3261
3262
3263
3264
3265
3266
3267
3268
3269
3270
3271

uplit (

uplit (seeciz'sSACONTROLLER TIMEOUT’),
uplit (sesciz'SAENVELOPE/PACKET READ ERROR (PARITY OR TIMEOUT)'),
uplit (sesciz' SAENVELOPE/PACKET WRITE ERROR (PARITY OR TIMEOUT)' ),
uwplit (sesc.z'SACONTROLLER ROM AND RAM PARITY ERROR'),
uplit (wasciz’'SACONTROLLER RAM PARITY ERROR' ),
uplit (sasciz'SACONTROLLER ROM PARITY ERROR'),
uplit (sesciz’'SARING READ ERROR (PARITY OR TIMEOUT)'),
uplit (Wesciz'SARING WRITE ERROR (PARITY OR TIMEOUT)),
uplit (sesciz’ INTERRUPT MASTER FAILURE'),

3273

uplit
uplit
wlit
uplit
uplit

3275
3276

wlit (sesciz'WAINTERRUPT VECTOR ILLEGAL'),
uplit (sesciz’ SAMAINTENANCE READ/WRITE INVALIO REGION IDENTIFIER'),

3372

3274

uplit (sesciz’'SAMAINTENANCE WRITE LOAD TO NON-LOADABLE CONTROLLER'),
uwplit (seeciz'SACONTROLLER RAM ERROR (NON-PARITY)'),
uplit (sasciz’'wAINIT SEQUENCE ERROR’),

uplit (sesciz'SAHIGHER LEVEL PROTOCOL INCOMPATIBILITY ERROR'),

3281

gggg
gggg

(sesciz'WAMOST ACCESS TIMEOUT (HIGHER LEVEL PROTOCOL DEPENDENT)' ),
(sesciz'SACREDIT LIMIT EXCEEDED'),
(sesciz’'#AQ-BUS MASTER ERROR' ),
(sesciz’'#ACONTROLLER FATAL ERROR'),
(sesciz’SAINSTRUCTION LOOP TIMEOUT'),

wlit (desciz'wAILLEGAL VIRTUAL CIRCUIT IO'),

3279

uplit (sasciz’ WAPURGE/POLL HARDWARE FAILURE'),
[}

uwplit (sesciz' SAMAPPING REGISTER READ FAILURE (PARITY OR TIMEOUT)'))
RO/RX CONTROLLER DEPENDENT ERRORS CODES

[]

;

3286

3287
3288

3289

RORX_ERR = uplit (

uplit (sasciz'®AT11 CPU FAILURE'),
uplit (sasciz'SANON-PARITY RAM ERROR'),

5€Q 00Ut

Page

SPIDERSUSERS
: [DQUCETTE .FALCONICNRQAA .BL 1

(wasciz'WN®A
(sasciz'#NSA
(dasciz'®#NSA
(dasciz'¥NSA
(desciz'sNSA

3280

;

1983

11 Bl.ss 16 V3 555

uplit
uplit
uplit
uplit
uplit

;

15 Dec

VAY

=
=
=
=
=

3277
3278

SECTION

1983 10:24:41

T_DEF
T_INF
T_TER
T_FAT
T SPL

:
:

!
!

TEXT

15 Dec

uplit (sasciz'#ASTATE MACHINE FAILURE - T11 ADDRESS REGISTER'),

vector (23],

N
NRQAM1
gOI.C

RD/RX EXERCISER
GLOBA. TEXT SECTION

H
:
.
H

3290
3291
3292
gggz

:
:
:

3295
3296
3297

:
:
:
:
:

3298
3299
3300
3301
3302

[]

wplit
uplit
uplit'
uwplit

15 Dec
15 Dec

(dasciz'SASTATE
(sasciz'wASTATE
(sesciz'wASTATE
{(desciz'#ASTATE

¢ MISCELLANEOUS
!
EX_WRD = upl:it (sasciz'®A %06 ),

MACHINE
MACHINE
MACHINE
MACHINE

EX_OP = uplit (sesciz'sAoct %04’ ),
SPACEA4
= yplit (dasciz'®54'),
CRLF
= uplit (dasciz'®¥N'),
DASH
= uplit (wagciz'®A - '),
ASTERISK = uplit (sasciz'sAs ');

FAILURE
FAILURE
FAILURE
FAILURE

1983
1983

10:24:41
10:21:50

SEQ 0019
VAX 11 Bl.es 16 v3-555
Pege
AC
SPIDERSUSERS:
[DOUCETTE .FALCONICNRQAA .BLL1 (30

- @ BUS ADDRESS REGISTER ),
CRC REGISTER'),
SERIALIZER/DESERIALIZER REGISTER'
),
WRONG HARDWARE VERSION'}) : vector (71,

NRQAM:

RD ‘Ax EXERCISER
OEFAL T HARDWARE P

®e

vol.¢

3303
3304
5305
330e
3507
3508
3309
5310
5511

5312

5513
3314
3515
3316
3317
3318
3319
3320
3321
3322

sebtt]l

1% Dec
15 Dec

TABLE

DEFAULT HARDWARE

19483
198%

10:24:41
10:21:50

SEQ 00AC

VAX 11 B8] ‘es 16 v3-95%
Poge
41
SPIDERSUSERS: [OOUCETTE .FALCONICNROAA . BL L (%)

TABLE

THE DEFAULT HARDWARE P TABLE
THME TEST-DEVICE PARAMETERS.

CONTAINS ODEFAULT
THE STRUCTURE OF

VALUES OF
THIS TABLE

IS IDENTICAL TO THE STRUCTURE OF THE HMARDWARE P TABLES,
AND IS USED AS A 'TEMPLATE" FOR BUILDING T+ P TABLES.

BGN (DFPTBL);
glodel

MPT
_IP ADDR : word initial (INIT_IP_ADDR), ! IP ADDRESS
MPT _VECTOR : word initiel (INIT_INTR VECT),! VECTOR ADDRESS
MPT BR_LEVEL : word initisl (INIT
BR LEVEL),!'BR LEVEL
! DISK NUMBER, TYPE,
HPT _DISK : word initial (so'100034 ),
MPT
S _TRK ;: word initiel (0),
! STARTING TRACK
MPT E_TRK : word initial (RD MAX LBN):;
! ENDING TRACK

ENDH;

PROTECTON BIT

s
—

RD ‘Rx

EXERCISER

SOF TWARE

3324
3325
3326

3327
3328
3329
3330
3334
3332
3333
3334
3335
3336
33%7
3338

ssbtt]l

SOFTWARE P

RUN

“t

BGNSW (SFPTBL);
globel
SWP_ERROR : word initial (32),
SWP_XFER : word initiel (20),

3342

SWP _UDPAT
ENDSMK;

vector

[MAX_UDP CNT,

wordl;

HARD ERROR LIMIT FOR DROPPING UNIT
TRANSFER LIMIT FOR DROPPING UNIT
FLAGS (SEE DOCUMENTATION)

DATA PATTERN NUMBER
USER DATA PATTERN COUNT

RDS1 OPERATION RATIO
NUMBER OF DBN'S WRITTEN AT

USER DATA PATTERN

VAX 11 B] ss 16 v3 999
L
SPIDERS JSERS: [DOUCE TTE F AL CUN JONIey o/

TIME.

3341

3343
3344

10:04:41
10:21:50

THE SCF TWARE TABLE CONTAINS VARIOUS DATA USED Br THE
THESE PARAME TERS ARE
PROGRAM AS OPERATIONAL PARAMETERS.
SET UP AT ASSEMBLY TIME AND MAY Bf VARIFD BY THE OPERATOR

SWP _FLAGS : word initisl (®o0'202'),
SWP _DPAT : word initial (0),
SWP_UCNT : word initisl (MAX UDP_CNT),
SWP_RAT : word initisl (99),
dupround : word initial (18),

3339
33540

1983
1987

TABLE

T
Y

3323

TABLE

)

XL XL

VO1.C

1% Dec
15 Dec

NRQAM1

ONE

TIME

D4
15 Dec

RD Rx EXERCISER
PROTECTION TABLE

NRQAM
vol1.C

15-Dec

1983 10:24:41
1983

10:21:50

)

3345
3346
3347

3348
3349
3350
3351
3352
3353
3354
3355
3356
3357
3358
3359
3360
3361

ssbttl

PROTECTION

TABLE"

!
!

THIS TABLE IS USED BY THE RUNTIME SERVICES
TO PROTECT THE LOYD MEDIA.

BGNPROT (O,

‘1'

6);

OFFSET INTO P TABLE FOR CSR ADDRESS
OFFSET INTO P-TABLE FOR MASSBUS ADDRESS
OFFSET INTO P TABLE FOR ODRIVE NUMBER

1157 ARG 12ND ARG 13RD ARG =

ENDPROT;
end

eludom

NRQAM1 RO/RX EXERCISER
/v01.0/
AMA

17717

L $HARD
LSSOFY
Lo

LSLAST
O00OMror (-2

;.
LISPTP:
LSLADP: : ,
LISTA:: .
LeCO::
.
LDTYP;
;.
LOAPT:: .
LSOTP:: .
LOPRIO::.
LOENVI;::.
LSEXPL::,
LOMREY:
:

.Y
70/
T4PTHY

SDISPATCH

oOrrooOu

LSREV::
LSUNIT:
LeTIM
:
LSHPCP;
LeSPCP:
LSHPTP;

0
0

T T

000024

/7 CN/
/RQA/

- =
-t =4

000014
000016

$CODES,

LSNAME
::.

000010

116
101

- 1]

103
121

$OVTYP
IRPT

VAX-11 Bliss 16 V3 555

SEQ 00Aac
P

a4z

SPIDEROUSERS:(DOUCE!TE.'ALCON]CNROAF.;ET (17

t 4

000253
000256

000261
000264
000267
000272
oN0275
000300

LSEXPS:
: ,WORD
L$AUT:: _WORD
LSDUT:: .WORD
LSLUN:: .WORD
LS$DESP:
: .WORD
LSLOAD:
: . WwORD
L$ETP:: .WORD
L$ICP:: .WORD
L$CCP:: .WORD
LSACP:: .WORD
LSPRT:: .WORD
LSTEST: :.WORD
LSOLY:: .WORD
LSHIME
: : . WORD

0
LAY
L$DV
o

.WORD
: .BLKW
ERRTYP:
: .BLKW
ERRNBR:
ERRMSG:
: .BLKW
: ;: .BLKW
ERRBLK

popopepr
=t

111
101
122

123
126
124
102
114
105
122
122
104
126
116
102
111
104

113
116
104
040
116
105
105
050
054
115
111
040
040
065
106

120
104
105

040
10
125

105
117

103
122

P.AAB:

122
105
114

040
126
000

P.AAC:

104
130
122
105
125

057
040
111
040
115

P.ARD:

123
111

040
123

P.AAE:;

116

061
111
110
124
040
117

105
101
122
060
114

123
116
130
040
117

000

105

000
040
040
065
127
103
123
122

040
120

000

P.AARA:

122

101
122

111
114

.ASCII

.ASCII
.ASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI11
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCIY
.ASCII
.ASCII
LASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

OO0

OSPCONT:
: .WORD
LS$DISPATCH:
:

L$DESC
-73743
LSERRTBL
LOINIT
L$CLEAN
L$AUTO
L$PROT

(5]

000070
000072
000074
000076
000100
000102
000104
000106
000110
000112
000114
000116
000120
000122
000124
000126
000130
32
000134
000136
000141
000144
000147
000152
000155
000160
000162
000165
000170
000173
000174
000177
000202
000205
000210
000213
000216
000220
000223
000226
000231
000234
000237
000242
000245
000250

15 Dec
15 Dec

RD/RX EXERCISER
PROTFECTION TABLE

NRQAM1
vOo1.¢

/e v
/ADD/
/RES/
757<00><00>

/VEC/
/TOR/
<00>
< 00>

/BR 7/
/LEV/
JEL7<¢00>
<00>

/RD/<S57>

/RX /

/DRI/
/VE /
/NM/

/BER/

<00><00>

/1S 7
/D1S/
/X A/
/N R/
/051/
/7 Wi/
/NCH/
/7EST/
/ER 7/
/7(NO/
/7, 17
/MPL/
/IES/
/ AN/
/ RX/
/50 /
/FLOQ/

198% 10:24:41
1983 10:21:50

VAX-11 Blies

16 Vv5-555

SEQ 0047
P

SPIDERSUSERS: [DOUCE T TE .F ALCONICNRGAA ;L’: 17

td
RD/Rx EXERCISER
PROTECTION TABLE

NRQAM}
vol ~

00030%
000306
000310
000313
000316
000321

120
051

000326
000331
000334
000337
000342
000345
000350
000353
000356
000361
000364
000367
000372

105

000324

000375
000400
000403
000406
000411
000414
000417
000422
000425
0004 30
000433
0004 36
000441
000444
000447
000452
000455
000460
000463
000466

000471
000474
000477
000302
000505
000510
000513
000516
000521
000524
000527
000532
000535
000540
000543
000546

123
122

116
114
111
040
116
115
111

115

040
130
072
071
040
065
040
065
051

127
124
117

103
124
105
104
101
122
0490
040
111
104
113
052
127
116
107
040
123

115

040
124
101
101
101
102

117

122
111

105

040
056

120
000

124

107

102
000
116
116
114
040
101
115
040
040
065
040
071
122
061
062
071
000
122
105
116

125
117

122
101
040
105
117

124
123
111

052
101
111
040

103
124
105
104
101

131
101
111
040
116

P . AAF
;

104
107
102
050

P.AAG:

130
125
055
122
060
067
054
104

072

061
071
000
111
040
040

P.AAM:

123
115

040

124
101
101
116
110
040
123

040

122
116
055
125

117

122
101
040

105
115

122
040
131
105
126
127

040
040

116
056
040

041
056
103

124

15 Dec
15 Dec

105
122
124

P.AAIL:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.RSCII
.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
.ASCII
.ASCII
.ASCII
.ASCII

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

/PPY/

/7)7<00»

/STA/
/RT1/
/NG /
/LBN/
«Q0>

00>

Z7END/
7ING/
/ LB/
/N (/
/MAX/
7IMu/
TMM/
R/
/
/X507
/2 1/
/99,7
/ RD/
/51:/
/7 21/
7599/
/)7 <00><00>

/WRY/
/TE 7/
/0N 7/
/7CUS/
/TOM/
/ER /

/0AY/

/R A/
/REA/
/7 ON/

TW/

/718 7/
7018/

/K/<¢00><00>
/88

/WAR/

/NIN/

/7 Cu/

/ST0/
/MER/
/7 DA/
/TR /
/ARE/
/A M/
/RY /
/BE /
/QVE/
/RUR/
/71177
7ENY/
/7

/7.

../

1983
1983

10:24:41
10:21:50

VAX

Bl .ee-16

V3-555

SEQ 0044
P

SPIDERSU
: (DOUCETTE .FALCONJCNRQA
SERS
A ,

1 (5

G4
RD/RX EXERCISER

NRQAM1
vol1.C

PROTECTION

15 Dec
15 Dec

TABLE

)

000551
000554
000557
000560
000563
000566
000571
000574
000577
000602
000605
000610
000613
000616

000621
000624
000627
000632
000635
000640
000643
000646
000651
000654
000657
000662
000665
000670
000673
000676

000700
000703
000706
000711
000714
000717
000722
000725
000730
000733
000736

000741
000744
000747
000752
000755
000760
000763
000766
000771
000774
000777
001002
001004
001007
001012

117

116
122

106
115

101
117
130
103
105
116
111
116
124
040
105
050

114
040
105
111
040

123
105
122
123
117
104
107
123
103
122

111

117
103
124
105
101
101
127
124

117
104
107
123
103
122

040

101
117
111
101
101
055
116
125

117

122
122
051
122
105
116
ill
116

124

040

040
040

105
000
101
040
122
040
115
000
122
123
122
111
124
116
105
102
105
050
106

123

125
113
101
042

110
104
122
122
111
124
124
116
105

114

i11
111
115
101

124

122
121
103
120

122
104

040

000
101

117
123

P.AAJ:

040
116
055

123
115
040
105
000
111
040
040

P.AAK
:

101
117
11
101
101

122
103
117
114
111
000
101
106

P.AAL
:

P.AAM:

040

115
040
040
107
131
123
060

117

042
111
040

123
051
116

115
105

P.AAN:

.ASCII
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCIIX
.ASCII
.ASCII
.ASCII1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII
.ASCII
ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII

.ASC1I
.ASCII
.ASCII
.ASCII

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

/ONF
/7
/IRM/
«00>

/7ALS/
/0 E/
/XER/

/7CIS/
/€ O/
/N D/
/7IAG/
/NOS/
/T1C/
/ AR/
/ER /
/(-N/

/ON-/
/CUS/
/7TOM/
/ER /
/ARE
/
/R)/<00»>
/WR1/
/TE 7/
/ON 7/
/0IA/
/GNO/
/8117
/C A/
/REA/
<00><00>

/HAR/
/D €/
/RRO/
/R L/

/InY/

/1/<¢00><00>
/TRA/
/NSF
/

/ER /

LIM/
/1T 7/
Z/IN 7
/MEG/
/ABY
s
/TES/
/7 (O/
/ FO/
/R "/
/QuUl/
/CK /
/PAS/

78")/

<00>»<00>

/RAN/
/700M/
/ SE/

1983
1983

10:24:41
10:21:50

VAX

Blies-16

v3-5%S

SEO 004‘

SPIDERSUSERS: [DOUCETTE, FALCON]CNRQA“ BLl (33

=44

00101%
001020
001023
001026
001031
001034

001037

001042
001045
001050
001053
001056
001061
001064
001067
001072
001075
001100
001103
001106
001111
001114
001117
001122
001125
001130
001133
001136
001141
001144
001147
001152
001154
001157

001162

001165
001170
001173
001176
001201
001204
001207
001212
001215
001220
001223
001226

001231
001234
001237

001242

001245

001230
001252
001255
001260

1% Dec 1983 10:¢4:41

RD/RXx EXERCISER
PRCTECTION TABLE

NRQAM1
gOI.O

105
115
105
122
104
117
101
123
105
117
105

101

124

040
116

117
105
127
124
103
120
105
120
106
115

040
040

105
117
122
114

103
103
101
040
111
123
124
117
040

101
116
125
122
105
116
040
124
120
124
116
123

105

040

15 Dec

040

104
000
101
103
120
105
120
106
115
040
040
105
117
122
114
111
055

P.AAD:

P.AAP;

115
122

040

122
122
104

124
110
103
124
114
122
105
040
114
122
105
101
110
124
131
105
111

P.AAQ:

105
104
111
104
101
040
124
122

P.AAR:

114
124
122

P.ARS:

.ASCII
LASCI1
.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
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII

7EK 7/
/M0D/

/E8/<Q0><00>

/RER/
/0-Cr
/0MP/
/
/ARE
/S P/
/
/ERF
/70RM/
/ED /
/AT /
/THE/
7 CO/
/NTR/
/0LL/
/ER/<00>
/WRY/
/TE-7/

/7COM/
/PAR/

/ES /
/PER/
/FOR/
/MED/
/ AT/
/7 TH/
/7€ C/
/ONT/
/7
/ROL
/LER/
<00><00>

/
/CHE
/CK /
/ALL/
/7 WR/
/1TE/
/S A/
/T W/
7081/
/ 8Y/
/7 RE/
/RDY/
/NG/<00>

/USE/
/R-0/
/EFY/
/NED/
/7 DA/

/TA /
/PAT/
/TER/
/N/ <00>
/SEL/
/€ECY/
/7 PR/

198%

10:21:50

VAX 11 Bliss 16 v3 55

SEQ (a6

Page

4’

SPIDERSUSERS:{DOUCETTE.FALCONICNRQAR BZ1 ¢11

L4
RD/RX EXERCISER
PROTECTION TABLE

NRQAM1
vo1.¢C

001262
001266
001271
001274
001277
001302
001305
001310
001313
001316
001321
001324
001327
001332
001335
001340
001343
001346
001350
001353
001356
001361
001364
001367
001372
001375
001400
001403

001406
001411
001414
001417
001422
001425
001426
001431
001434
001437
001442
001444
001447
001452
001455
001460
001463
001466
001471
001474
001477

001502
001505
001510
001513
001514
001517
001522

105

105
116
040
124
120
124
116
060

117
123
125
124
114
105
103
117

116
102
040
040
122
049
040
124
120
124
116
061
115
111
115
120
124
116
101
105
103
101
123
124

124

101
124
114
040
124
111
111

120
103
124

055
106

105

104
101
101
105

040
040

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

127
104
111
104
101

101
105

040
066
101

115
051
101
105
040
114
000
114
122
124
111
111
114
101
105
101
105
120
116
116

105
105
101

15 Dec
15 Dec
.ASCI1
.ASCII

104
111
104
101
040
124
122
050
106
040
121
116
101
123

.ASCII
.ASCII

105

111
051

115
122
106
117
123
116
101
040
124
122
050

P.AAT:

040
130
125
000

124
122
126
125

P.AAU:

105
040
101
123
103
040
102
123
106
122
122
124
107

P.AAV:

122
116
107

P.AAM:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASC1I
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/E D/
/EFI/

/NED/
/ DA/
/TR /
/PAT/
/TER/
/N (/
/0 F/
/0R /
/SEQ/
/UEN/

/TIA/

/L S/
/ELE/
7CTI/
/0N)/

<00><00>

7N/
/BER/
/7 OF/
/7 W0/
/RDS/
/7 IN/
/7 DA/
/TR 7/
/PAYT/
/TER/
/N (/

716 /7

/MAX/
7IMu/

/M)/7<00»
<00>

/PAT/
/TER/
/N V/
7ALY/
/7E/<00>
/CLE/
/AR /
/STA/
7118/
/1IC/
/AL /
/TAB/
/LES/
/ AF/
/TER/
/7 PR/
/7INT/
7ING/
<00>

/PER/
/CEN/
/TAG/

1983
1983

10:24:41
10:21:50

VAX

Bliss

v3-555

SEQ 0Ca?
Page

SPIDERSUSERS: [DOUCETTE ,FALCONICNRQAA BLl (33

Jai
15 Dec
15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRGQAM]1
voi.¢
)

00152%
001530
001533
001536
001541
001544
001547
001552
001355

001560
001563

001566

001571
001574
001577

001602
001605
001610
001613
001616
001621
001624
001627
001632
00163S
001640
001643
001646
001651
001654
001657
001662
001665
001670
001672
001675
001700
001723
001706
001711
001714
001717
001722
001725
001730
001733
001736
001741
001744
001747
001752
001755
001760
001763
001766
00177

105
106

104

040
105
124
116

117

040
040
065
117
122
111

117
122
061
120
101
117

111

124
106
117
114
120
101
117

123
125
117
124
101
117
122

123
116
123
117
105
105
103
104
124
101
117
050
054

115
111
040
121
116
101
000

125
105
117
104
163
105
040

040

105

111
040
146
143
040
065
040

154
000
110
122
101
111

040

000
111
040

P.AAX:

040
040
114
124
040
040
116
115
116
040
120

105
123
12%

124
114

115
122
106
102

P.AAY:

040
101
101

117
040
115
050
146

164
122
061
157
171
000
105
105
111
116

P.ARZ:

LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCIIX
.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
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCIT

/E
/F

O/
R/

/DS1/
/7 QP/

/ERA/
/710/
/NS /
/0UT/
/7 OF/
/7 10/
/TAL/
/7 OP/s
/ERA/
/7107
/NS/ <00>
/UNI/
/18 7/

/710 7
/8E /
/SEL/
/€CT/
/€D 7/
/AT /
/RAN/
700M/
/7 (N/
/0, 7/
/7IP/
/L1E/
/8 S/
7EQU/
/7ENT/
ZIAL/

/)7 <00>

N/
/8ER/

/7 OF/
/7 DB/
/Ng

/RER/
/0 A/
/T O/
/NE /
/TIM/
/€ (/7
/eff/
/ect/
/s R/

7051/
/s o/
/nly/
/73/<00>»<00>
/THE/
/ RE/
/MAY/
/NIN/

1933
1983

10:24:41
10:21:50

VAX

11 Blies

V3 SS55

SEQ GLas

SPIDERSUSERS: (DOUCE
T TE .FALCONICNRQAA;E: 13

{4y

001777
002002
002005
002010
002013
002016
002021

002024

002027
002032
002035
002040
002043
002046

002055
002060
002063
002066
002071
002074
002077
002102
002104
002107
002112
002115
002120
002123
002126
002131
002134
002137
002142
002145
002150
002153
002156
002161
002164
002167
002172
002175
002176
002201
002204
002207
002212
002215
002220
002223
002226
002231
002232

PROTECTION

107
125
124

116

117
131
120
131
117
116

11?7
103
104
111

123
045
101
111
104
101
122
120
040
045

123

040

115

116
116
045
117
111
122
111
040
122
045
045
116
040
122
045

045
122
123
122
111
124
105
110
045
045

040
105
111
123
116
040
120
040
040
120

124
124

040

123

000
000
116

125
124

062
040
117

105
055
000
101
105
103
115
104
000
101
116
107
101
117
105
117
116
101
111
105
117
116

TABLE

121
123
117
040
114
101
114
124
125
122
105
105
104
113
045
116
045
045
104
120
104
040

001774

15 Dec
15-Dec

RD/RX EXERCISER

NRQAM1
vel.C

.ABA:
.ABB:

125
122
117
101
045
103
106
125
124
116
122
122

.ABE
:

PLCII

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

111

124
122
122

ASCII

124

101
105

116
105
114
111
122
103
104

.ABG:

101

105

.ABH

1¢°

101
106
040

115

040

116

.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII1
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCI1I
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

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

/G Q/
/UES/
/1107
/NS /
ZONL/
/Y A/
/PPL/
/Y 17

70 U/

/NPR/
/0TE/
/CTE/
/0 D/
718K/
/757<00»>
<00>»<00>

/79N
/

/AUN/
/1Ta/
/702¢/
/A D/
/ROP/
/7PED/
/7 -/
<00><00>

/8AY/
/SER/
/7 CO/
/MMA/
/NDs/

I/N/7<00><00>

/78AC/
/ONF
/
/7IGU/
/RAT/

710N/
/ ER/

/ROR/

/8N/<00>
/8RY1/

/NIT/

/7 ER/
/ROR/
/8N/ <Q0>
<00>

/8AT/

/RAN/
/SFE/
/R L/
/7Inl/
/T R/
/EAC/
/HED/
/798N/ <Q0>
<00»>

/%AE/

1983
1983

10:24:41
10:21:50

SEQ OOAv
VAX 11 Bliss 16 v3-555
50
SPIDERSUSERS: ([DOUCETTE. fALCON]CNRQAA 8L1 (33

L 4

00223~
002240
002243
002246
002251
002254
002257
002262
002265
002270
002273
002276
002301
002304
002307
002312
002315
002320
002322
002325
002330
002333
002336
002341
002344
002347
002352
002355
002360
002363
002366
002371
002374
002377
002402
002405
002410
002413
002416
002420
002423
002426
002431
002434
002437
002442
002445
002450
002453
002456
002461
002464
002467
00247¢
002474
002477

1% Dec
15 Dec

RD/RX EXERCISER
PRCOTECTION TABLE

NRG@AM]
vol.¢

122
122
111
124
105

110

045
045

116
103
105
102
040
126
105
122
122

045
116
103
105
102
040
116
117
105
105
117
116
045
101
105
124
103
105
116
116
116
045
101
105
124
101
105
040
123
124
103
104
111
040
11

116
045
111

122

040
115
040
101
105
116
101

122
117

122
114
104
111
040
122
045
000
101
122

117
122
114
103
124
114
122
122

122
000
101
111
104

117
117

040

114
105

000
101
111
104

117
103
123
114
124
122
113
125
116
111
124
000
101
123

117

114
111
122

103
104

00V
125

105
126

P.ABI:

101
105

105
103

105

117
116

125
105
126
101
105

117
122
114
040
122
045
000
106
114
040
040
115
117
111
045
106
114
040
040
103
123

P.ABJ:

P.ABK:

P.ABL:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII1
.ASCII

101

040
101
040

122
107
116
045
104
113

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX

P.ABM:

.ASCI1I
LASCII
.ASCII
.ASCII

/RRQ/
/R

L/
/7IMI/
/T R/
/EAC/
/HED/
/9N/ <00>
/8AY/

/NRE/

/7COv/

/ERA/
/8LE/
/ DE/
/VIC/
/€ E/
/RRO/
/RuN/

<00)><00>

/9AY/
/NRE
/

/7CQv/
/ERA/

/BLE/
/7 CO/

/NTR/
/0LL7/
/ER 7/
7ERR/
/70Rw/
/N/<00><00>
/79AF
/
/AIL/
/€0 /

/10 7/

7COM/
/€ O/
/NLY/
/NES/

/N/<00>
/
/8AF
/RIL/
/€D ¢/
/10 7

7ACC/
/7ESS/
/7 LA/
/87 7/
/TRA/
/CK 7/
/DUR/
7ING/
/7 IN/
/1Ts/
/N/<00>

/98AD/
715K/

1983
1983

10:24:41
1C:21:50

SEQ 0070
VAX-11 Bl.ss 16 v3-S55
Page
51
SPIDERS$USERS:
[DOUCETTE ,FALCONICNRQAA BL1 (33

M/
RD/RX EXERCISER
PROTECTION TABLE

002557
002562

002565
002570
002573
002576
002601
002604
002607
002612
002615
002616
002620
002622
002624
002626
002630
002632
002634
002636
002640
002642
002644
002646
002651
002654
002657
002662
002665
002670
002673
002676
002700
002703
002706
002711
002714
002717
002722
002725

117
103
104

045
117
101
040
115
117

045
116
040
116
124
101
111

102
040
101
045

127
124
120
124
124
045
000
101

115
116
124
105
125
116
101
111

127

124
117
126
114
114
123
i24
116

127
124
107

045
101
116
111
101
124
124

124

<00»>»<00>

P.ABN:

124

000

125
124
105
040

/%AC/

/70MM/

/AND/
/7 117
/ME /
70UT/
/98N/ <00>

040

<00>

P.ABO:

/8AY/
/NIT/
/ WE/
I/NT 7
/70 7
/AVA/
7ILA/
/BLE/
/7 ST/
/ATE/
/8N/ <Q0>

P.ABC:

P.ABD

101
101
105
124
105

<«00>

002104
002126
002156
002176’
002232’
002262
002322°
002366°
002420
002474

002526
002554
045
101
127
040
114

/ITE/
/ PR/
/70TE/
/CTE/
/70%N/

122
105
105
1i6

103
115
104
111

WR/

122
105

)

002526
002531
002534
002537
002542
002545
002550
002553
002554

040
111
040

002502
002505
002510
002513
002516
002521
002524

116

120
105
104
101
055
101
111

116
106
103

117

114
105
040
101

045

117
122
105
131

P.ABP:

040
111
116

045
125
124
116
040
123

123
122

P.ABQ:

EEegrERER

vol.C
)

15 Dec
15 Dec

VOVTVOVVVOVYD

NRQAM1

P.ABO

1983
1983

10:¢24:41
10:21:50

SEQ 0071
VAX-11 Bl ys-16 v3-555
Pege
52
SPIDE
([DOUCETTE
R$USE
.FALCONICNRQAA
RS:
B 1 (33

002730
002733
002734

002737
002742

002745
002750
002753
002756
002761
002764
002766
002771
002774
002777
003002
003005
003010
003013
003016
003021
003024
003027
003032
003035
003040
003043
003046
003051
003052
003055
003060
003063
003066
003071
003074
003077
003102
003105
003110
003113
003116
003121
003124
003127
003132

003135
003140
003143
003146
003151
003154
003157
003162

003165
003170

15 Dec 1983

RD/RXx EXERCISER
PROTECTION TABLE

NRQAM]
gOl.C

15 Dec

124

105

104

045
11é

116
045

045
101
105
111
122
124
124
045

P.ABR;

045
101
124

P.ABS:

105
122
123

040
101
105
116
045
116
125
040

113

070

043
106
040
102
105

040
040
040

102
105

045
040
110
104
122
122
055
055
106

105
117

055

045
101

040
043

124
105
122
104

040
040
101
040

122
105

040

130
103
105
123
122
104
000
116
045
116
104
045
045
040
040
043
131
123
040

117

040
043

123
123
101
117

040
040

124
040
043
106
040

131
123

124

101
055
101
040
122
123
040

040
055
122

123
124
122
122
055
116

040
040
040

131
040
105
123
040
122
104
040
111

123

040

P.ABT:

105
117
055
055
117

040
122

123

045
043
040
040
120
040
101
040
040
105
040

127

124
040
127

P.ABU:

.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
,ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.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

.ASCI1I

.ASCIX
.ASCII
.ASCII

/TED/
<Q0»>

/
/98NS
/NsA/
/EXE/

/RC1/
/SER/
/7 ST/
/ART/
/ED%/
/N/<Q0>
/9Ns/
/NsA/
ZUNT/
/7 DS/
/7K%S/
/78%R/
7® O/
7/
/F
/7 @/
/8YT/
/€S /
@/
/
/7 OF/
/

/
7

/BYY/

/7€ES/<Q0>
<00>

/8R /
/ -~/
/HAR/

/0 €/
/RRQ/
/RS -/
/-

/-50/
/FT 7
/ERR/
/0RS/
/--7<00>

/8Ns/
/R @/
/
/
/79
/
/7TYP/

/€

/REA/

/708

/ RE/
/RD 7
W/
/
/RIT/
/ES /
/

1983

10:24:41

10:21:50

SEQ 005
VAX 11 Bl ss 16 V3 $55
Pege
53
SPIDE
: [DOUCE
RSUSE
TTE .FALCONICNROAA
RS
. BLYL (33

ty
RD '‘AX EXERCISER
PROTFCTION TABLE

003406
003411
003414
003417
003422
003425
0034 30
003433
003436

101
104
040
124
105
104
040
126
123
045
101
055
055
059%
055
035
035
040
05%
035S
055
05S
055
040

055
055
055
045
055
040
055

055
035
040
055

055
055
040
033
045
104
104
101
122
045
104
104
101
122

C40

124
122
110
040
113
101
104
040
124
116
0S5
040
055
055

040
055
0355
055

105

104
040
126

123
123

124
122
110
000
045
055
055

035
055
033

040

000
040
035

040

055
055

040

0335
055
055

130
000
116
062

064
040
104

-ASC
ASC

P.ABW:

040
055
040
055
040
055

055
055
055
055
040
055
055
055

040

-AS

040

095
055
040
055
055
035
055
055
000
101
055
0535

055
055
035
000
116
062
064

P.ABV:

> P
wnnw
(alalals)

113

040

.ASCII
.ASCII

.ASCII

P.ABX:

.ASCII

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

055
055

000
045

040
065

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII1
.ASCII

.ASCII
.ASCII

040

045
045
040
065
000
045
045
045

.ASC

P.ABZ:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
ASCT1
.ASCII
.ASCII
.ASCII
LASCII

/R11/
/7TEN/
«QQ»

‘BA

Sk/

/AT
/
/DRv
/

MHS/

/71 S/
7EK

/DAT/
/ DR/
/N

/781/<¢00»
/SN
/
/R

\\\\\\\\\8\\ NN NN NN NN NNNNNN

003304
003307
003312
003315
003320
003523
003326
003331
003334
003337
003342
003345
003350
003353
003356
003361
003364
003367
003372
003375
003400
003403

101
123

040

116

.ASCI
.ASCI
LASCI
.ASCI
.ASC
.ASC
.RSC

“

003301

045

105

124

NN N NN N NN N NN NNNNNNNNNNNSNNNN
.
. [}
’
.

003276

111

[ala) B e e lalalalalalalala
ol o T o X T o X o)
[l e lalalalelalelalelelalalalaialalalala
Lo L]

003265
003270
003278

122
124

> >
wn
[aln)

0081 °¢
0081 %
008201
00320¢
00320%
008210
0082183
003216
0038221
008224
008227
00%23%2
003233
003240
003243
003246
003251
003254
0032%7

1% Dec
1% Dec

»» >PPP>P>
nn wnunununy
[aln) [alalalals]

NRQAM:
!OI.C

/~/7<00>»<00>
/78N
/
/D02%/
/04%/
/
/AR
/RXS/
/70/7¢<00><00>
/79Ns/
/7
702v
/D4%/
7/
/AR
/RDS/

1943
1987

10:74:41
10:¢1:50

VAX

11 B8lies 16 v3 939

StO \ M

%4
PIDERSI
: [OOUCE
SERS
T TE .6 ALCONICNRIAAm re

104
101

040
000
116
045
116
040
111
040
040

/6N8/
/A ./
/

8~\\~\\~\\~\\-\\~\\

.«
s

P.ACE:

«00><00>

045
101
111
040
123
040
040

P.ACD:

/7404
/
/4D4/
/7904
/
/uD4/
/
/7904
/7uD4&/
/79D4&/
/79D4/

38 .

P.ACC:

«00»>

045
056
040
040
124
040
040
04C
056
056
056
040
040
040
056
056
056
000
040
056
040
104
101
040
040
040
056
064
040
056

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

/79237

NNNNSNNNNNN

040
056
G56
056
056
000
101
040
040
045
045
040
040
056
040

P.ACB:

/923%/
/%A, /

040

064
064
064
064
064
064
064
064

717<00><00>
/7404
/
/n23/
/uD3/
/%8R,
/

104
104
104
104
104
104
104
104
000
116
040
040
040
116
040
040
056
056
056
056

063
063
054
063
054
063

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

103
122

132

P.ACA:

045
101
040
056

101

064

045
045
045
045
045
045
045
045

132
104
101
152

000

045
045
045
045

000
104

’

045
045
045

061

1938

10:024:41

15 Dec 1983 10:21:50

33°
\\\\:\\\\\\\\\\\\\\\\
e

003441
003444
00344~
003452
003455
003460
003463
003466
003471
003472
003475
003500
003503
003506
003511
003514
003517
003522
003524
003527
003532
003535
003540
003543
003546
003551
003554
003557
003562
003565
003570
003573
003576
003601
003604
003607
003612
003615
003620
003623
003626
003631
003634
003637
003642
003645
003650
003653
003656
003660
003663
003666
003671
003674
003677
003702

1% Dec

RD'RX EXERCISER
PROTFZTION YABLE

NRQAM1
XOI.C

VAX

11 Blies

v3 555

GFN 0.4

SVIOEROUSERS:IOOUCE"E.’ALCON]CNQ&“#.:?T ‘

7y
y

'
RD/RX EXERCISER
PROTECTION TABLE

NRQAM]
vol.C

19 Dec
1% Dec

)

00370
003710
003713
003716
003721
003724
003727
003782
003735
003740
003743
003746
003751
003754
003757
003760
003763
003766
003771
003774
003777
004002
004010
004013
004016

004021
004024
004027
004032
004035
004040
004043
004046
004051
004054
004056
004061
004064
004067
004072
004075
004100
004103
004106
004111
004114
004117
004122
004125
004130
004133
004136
004141
004144
004147

040
040
040

117

040
040

113

040
040
043
106
040
040

113

045
101
043
040
040

124
105
040
101
040
040

105

040
127

124

040

122
124

040
045

101
055
040
055
055
055
040
055
055

040
055

055
040
055
055
040
055
055

040

043
106
040
102
123
040
040
040
040
049

102
123

116
040
040
040
040
040
131
040
122
104
040
040

101

040

040
122
105
040
111
105
000
116
055
055
035
055
055
055
055
055
035
040
055
055
040
040
035
055
040
055
055

LASCIE
LASCII
.ASCI1I
.ASCII
.ASCII
.ASCII
ASCII
JASCII
.ASCII
.ASCI1
.ASCII
.ASCII

G40
040
040
040
043

114

040
040
040

117

040
043

.ASCII

114

040

045
040
040
040
040
040
120
040

P.ACF:

105
123

040
122

104
040
040
11
123
127
124
116
P.ACG:

.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
.ASCLI
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/9
/0F

/
o0/

/ BL/
/KS 7/
/

0O/

/7 BL/
/KS /
<00>

/4N
/
/AR
/
/
/¢
/
/
/¢
/
/
/

71YP/
7/
/€
/7 RE/
/RDS/
/

/7
R/
/EAD/
/

/
/

/WR1/
/TES/
/R1T/
/TEN/
/ 7¢00>
/78NS
/
/A--/
/-- 7/
/ -~/
/-~ /7
/7 --/
/---/
/-~ /7
/ --/
TAREY
7/
// --/
FEREY4
/7/
/
/
/---/
FERRY4
/
/
/<+-/
/---/

1983
198%

10:c4:41
10:21:50

SFQ_00%%
VAX 11 Blies 16 V3 555
Poge
%
P IDER$SERS : [DOUCETTE .FALCONICNROA
.BI
S 1 (T2

b
RD/Rx EXERCISER
PROTECTION TABLE

1% Dec
15 Dec

040

P.ACH:

116
061
062
064
062
040

104
122
061
045
045
045
045

045
045
045
000
117
115
131
116
123

P.ACI:

117
105
125

122

115
131
117
101
117
124
107
105
057
111
040
106
122

122

111
105

105
123
116

040

123
106
114

P.ACJY:

040
105

115
117

040

122
114
103
111
040
101
127
124
102
106
123

105
123

122
130
124
103
124
124
101
105

107
124
040
111
105
105
105
111
104

P.ACK:

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

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII1
.ASCII
.ASCII
LASCII
.ASCII
.ASC1I
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
ASCII
.ASCII
.ASCII
.ASCII
.ASC1I
.ASCII
.ASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/<Q0>»

<«00>

/9Ne/

/7S1%/
/D2¢/
/754%/

/02%/
7/
/R
/7 DB/
/NRD/

/%1 7/

/7 wD/
7648/
/38D/
/764S/
754D/

/764%S/
/3%D/

767 <00»>

7700/

/ MA/

/NY

/UNY/
77S7<00>
<«00>

/NOT/
/ EN/

700G/

/M F/

/REE/
/7 M€/
/MOR/
/Y

F/r

/0R /

/ALL/
70CA/
/TIN/
/G R/

/7EAD/

«STr/WR/

/1TE/

/7 BY/
/FFE/
/RS/<00>
<00>

/REG/
718%/
/ER /
/7EX1/
/STE/
/NCE/
/7 TE/
/57 7/
/FAY/
/LED/

«00><00»

1983
1983

10:04:41
10:21:50

SEQ 07,
VAX 11 Bl.es 16 v3 5%
Page
97
SPTDERS JSERS: (DOUCETTE . F ALCONICNRAL
B{ 1 / rz
]

PO
15 Dec
15 Dec

RD/Rx EXERCISER
PROTECTION TABLE

NRQAM1
vOol.¢
)]

004412
004415
004420
004423
004426
004431
004434
004436

004441
004444
004447
004452
004455
004460
004463
004464
004467
004472
004475
004500
004503

004506
004511
004512
004515
004520
004523
004526
004531
004534
004537
004542
004545
004550
004553
004556
004563
004566
004571
004574

004577
00460c

004610
004613
004616

004624
004626
004631
004634
004637
004642
004645
004646

126
124

040

123
106
114
102
114
105
124
124
101
105
111

124
105
105
105
101
105
106
101

103
124
114
122
122
122
117

11
0240
111
104

127
124
120

124

124
117
114

124
101

105

103
122
105
040
111
104

LACL

LACM:

040
111
104

040
126
040
123
106
114
000

116

111

.ACN:

105
117
124
124
101
105

000
122

105
114
105

040

121
116
040
111
104
101
il14
117
122
114

040

122
000
116
116
106
114
000
122
105
122
105
040
116
111
000
103

123

123
125
103

106
114
000

124

040
116

.ACO:

117
105

105
117
000
114
105
101

.ACP:

105

111
055
117
103
103
106
103
000
103
123
101
105

LACQ:

124

ACS:

040
111
104
106
101
111
040
122

106
114
000
101
114
057
105

117

117
122
122

106

101

111

040

.ACR;

LACT:

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

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII

/VEC/

/TOR/
/7 TE/
/ST 7/
/FAl/
/LED/
<00><00>

/BR /
/LEV/
7EL /
/TES/
/17 Fvs
/AIL/

7€D/<00>
<«00»>

/7INI/
/7 S/
/7EQU/
/ENC/
/€ F/
/AIL/

/7ED/<00»
<00>

/FAT/
/AL /

/7CON/

/TRO/
/LLE/
/R E/
/RRO/
/R/<00><00>
70N/
/7INE/
/ FA/

/ILE/

70/ <00>

/WRY1/
/TE-/
/PRO/
/TEC/
/1 C/
/ONF
/
7/L1IC/s
/71/¢00><00>
/7ACC/
/7ESS/
/7 FA/
/ILE/
/D7 <00>
/FAT/
/AL /
71/7¢S7>/0/
/7 ER/

/ROR/
«00>

/FAYl/

1983
198%

10:¢4:41
10:21:50

SEO 00fl7
VAX-11 8l.:98-16 v3-555
58
SPIDERSUSERS: [DOUCETTE, FALCON]CNGOAfl BLl (33

(55

004651
004654
004657
004662
004665
004670
004673
004676
004701
004 704
004707
004712
004715
004 720
004723

004726
004731
004734
004737
004742

004 745
004 750
004753
004756
004761
004 764
004767
004772
004775
005003

005011
005014
005017
005022
003025
005030
005033
005036
005041
005046
005051

005057
005065
003070
005073
005076
005101
005104
005106
005111
005114

15 Dec
15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRQ@aM]
vOol.¢

114

040
040
116

123
055
116

117

105
103
122
124
111
111
040
115
116
123
055
116

117

105
103
122
124
111
111

040
123
116

040
123

10t
105
103
105
122
114

123
116
122
122
106
114
040
040
116
117
114
105

117

101

117
114
105

105
124
123
104
105
103
124
114
122
110
101
105

123
103
103
115
104

105
103
124
114
122

110
101
105
123
103
122
120
123
110

040
104
116

117

040
040
101
040
040
122
000
101

105
124
123
104
116
111

040

115
116
000
116
111
040

JASCII
LASCII
LASCII

104

117

105

.ASCII

040

124

117

122
114
055
101
103
122
124
123
117
101
000
124
117
122
114
055
101

P.ACV:

103
122

124
123
105
117
105
101

.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

102
040
104
104

117
106
107
111
105
117
111
104

.ASCII
.ASCII

P.ACV:

117
105

040
055
116

103
115
104

055

116

122

.ASCII
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

P.ACW:

.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII

/LED/
/7 10/
/ SE/
/ND 7/
/SET/

7-C0/s
/NTR/
/0LL/
/ER-/
/CHA/
/RAC/
/TER/
7181/
71CS/
/7 €O/
/MMA/
/ND/ <00>

/SET/
/7-C0/
/NTR/
70LL/
/ER-/
/CHA/
/RAC/
/TER/
718t/

/7ICS/
/ RE/
/75P0/

/NSE/

/7 WA/

/S 8/
/RD /
/7END/
/7C0D/

/€ O/
/R F/
/LAG/
78 1/
/N E/
/RRO/

/R/ <Q0>
/FRY1/
/LED/
/7 Y0/
/7 SE/
/ND /
/ON-/
/LIN/
/€ C/
/70M4/

/AND/

«00>»<00>

/ON-/
/LIN/
/€E R/

1983 10:¢4:41
1983 10:21:50

VAX

11 Blies

16 v3 555

SEO (7

SPIDERSUSERS: (DOUCETTE .FALCONICNRQAA;E: (33

!_If '
RD/RX EXERCISER
PROTECTION TABLEL

NRQAM1
201.0

00511~
00%122
003125
005130
005133
005136
005141
005144
005147
005150
0035153
005156
005161
005164
005167
003172
005174
005177
005202
005205
005210
005213
005216
003221
005224
003227
005232
005235
005236
005241
005244
005247
005252
005255
005260
005263
005266
005271
005274
005276
005301
005304
005307
005312
005315
005320
005323
005326
005331
005334
005337
005342
005344
005347
005352
005355

105
117
105
101
102

040
104

104

111
040

121
123
106
114

045
117
040
101
045
045
125
124

123
103

111

045
040
040

123
116

040
040
104

123
045

045
040

103
122

124
122
105
114

7
104
111
040
045
040
105
045

123
116
040
1°3
101
105
103
105

057
122
125
124

15 Dec
15 Dec

120
123
110

040
104
116

117

000

117
105
105

P.ACX:

101

105
000
101
122
124
116
104
101
116
123
i20
111
105

P.ACY:

P.ACZ:

101
116
122
120
123
101
101
122
123

117

000
101
111

117
105

040
040

126
040
122
105
103
045
000
101

123
120
104

052
116
122
103
102
114
105
106
040
126
105
117

P.ADA:

052
124
040
061

P.ADB:

LASCIL
.ASCII
.ASCII
.ASCI1
LASCII
.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
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/ESP/
/ONS/
/E H/
/RS 7/
/BAD/
/7 EN/

/70C0/
/7 <00>
/DE
<00»>

71/7¢57>/0/
/ RE/
/QUE/
/ST 7
/FRY/
/LED/
<00><00»>

/9AM/
/0RE/
/ Trs
/AN /
/79027
/%8R 7
/UN1/
/1S 7/

/SPE/
/CIF/
/1ED/
<00>

/8As/

/7 NO/
/ RE/

/75P0/
/NSE/
/7 AT/

/7 AD/

/DRE/

/78S 7/
/79067

<00><00>

/8As/
/7 IN/
/COR/
/REC/
/7 8/
/R L/
/7EVE/
/L Fr/
/0R /
/DEV/
/ICE/
/7 w0/
/76/7<00>

/8As/
/7 ST/
/EP /
/7901/

1983
1983

10:24:41
10:21:50

VAX-11

Bliss

V3 SS5

SEQ L7 9
Page
&0

SPIDERSUSERS
: (DOUCE TTE .FALCONICNRQAR 8 1

(77

005360
005363
005366
005371
005374
005376
005401
005404
005407
005412
005415

005420
005423

005426
005431
0054 34
005436
005441
005444
005447
005452
005455
005460
005463
005471
005472
005475
005500
005503

005506
005511
005514
005517
005522
005525
005530
005533
005536
005541
005544
005547
005552
005555
005560
005563
005566
005571
005574
005577
005602
005605
005610
005613
005616
005621

15 Dec
15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRQAM1
vol1.C

045
122
104
122
122
045
040
104
101
117
040
117
104
111
040

045
040
123
104
101
105
040
106
116

045
040
126
105
117
101
117
120
103
123
107
117
101
040
103
124
040
165
145
147
172
040
123
107
124
105

040

165
145
147

101
105
040
122

040

101
102

052
101
123
103
105
122
040
126
105
117

P.ADC:

052
111
045
045
127
124
106
111
000

P.ADD:

052

P.RADE
:

000

040
040

104
106
115
105
103
045
000
101
104
113
062
040
116

117

114
105

101
104
111
040
066
040
124
122
105
111
040
115
116
120
113
123
055
156
143
156
145
115
123
105
131
000
055
156
143
156

101
105
117

105

116
040

040

162
157
151
144
105
101

040
120
000
040

162
157
151

.ASCII

ASCII

103
045
045

117
123
116
103
115
104
101
105
000

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

P.ADF
:

P.ADG:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.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
.HSCI1

/BA /
/RERA/
/D E/
/RRO/
/R/<00>
/
/%8Rs

/ BA/
/0

/A C/

/0DE/

/7 FR/
/0M /
/DEV/
7ICE/
/ 40/
76/7<00>

/%8Rs
/
/7 01/
/5Ke/
/D2¢/
/A W/
Z7ENT/
/7 OF/
/FLY/
/NE/<00>
«00>

/8Ae/

/7 DE/

/vYIC/s
/€ o/
7068/
/A N/
/70T 7
/PRO/
/7CES/
/SIN/
/G C/
0/
7/
/7AND
/7 PA/
/7CKE/
/775/<00>
/ -/
Junr/
/eco/
/gni/
/zed/
/ ME/
/SSA/

/GE 7/
/TYP/
/7E/<00>»<00>
/

/unr/

/eco/

/gni/

1983
1983

10:¢4:41
10:21:50

SEO 0G40

VAX 11 Blies-16 V3-555
SPIDERSUSERS: [DOUCETTE, FhLCON]CNROflA

61
(33

005624
005627
005632
005635
005640
005643

005646
005651
005654
005657
005662
005665
005670
005673
005676
005701
005704
005706
005711
005714
005717
005722
005725
005730
005733
005736
005741
005744
005747
005752
005755
005760
005763
005766
005770
005773
005776

15 Dec-1983
15 Dec 1983

RD/RX EXERCISER

NRQAM1
v01.0

PROTECTION

172
040
156
143
157
151
040
165

145

147
172
040
124
116
145
141
040
165
145
147
172
040

124
116
101
105

165
145
147
172

040
116
040

125
105
107
132

040

103
105
040
115
120
124
125
103
105
122
122
040
104
101

123

145
143
156
164

156

144
055
156
143
156
145
122

125

040

163
147

000
0SS
156
143
156
145

122
125

040
103

124

0S5
156
143

156

145
103
000
055
116
103
116

105
117
117

000
0S5
123
040

101
123

117

040
122
000
055
125
123
124

040

TYABLE

144

157

145
151
040
000
040
162

.ADH:

157
151

144
105
122
155
163
145

040
162

.RDI:

157
151
144

105
122
120
113
000
040
162
157
151

LADJ:

144

122
040
122

117

111
104
120
104
000
040

103
123
124

040
104

105
117

040
120

124
125
103

.ADM:

JASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASC11
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASC1I
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASC1I1
.ASCII
.ASCI1
.ASCIX
.ASCII
.ASCII
.ASCI1
.ASCII1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI
.ASCII

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

/zed/
/

¢co/

/nne/

/cti/
/on

/7id/<Q0>
/

Junr/

/eco/
/gni/

/z2e0d/

/ RE/
/TUR/
/N

/ess/
/
<

/
»<00>

/7 -/
Junr/
/eco/
’rgni/
/ze@0/

/ RE/

/TUR/

/N P/
ZACK/
/E1/¢<00>
/ -7
/unve/

/eco/
/gni/
/zed/
/7 CR/
/N7 <00>
/7 -/

/7UNR/
/ECOQ/

/GNY/
/7ZED/
/7 OPrs
/7COD7s
/7E/<00> 00>
/

/MSC/
/P S/

/TAY/

/US 7/
/7C0D/
/€ E/
/RRO/
/R/<00>
/

70UP/
s ST/
/7ATY/

/8 Cs

10:¢4:41
10:21:50

VAX

Bl.es

Vv3-955

SEQ 0L
Peage

SPIDE
[DOUCETTE
RSUSE
,FALCONICNROAA
RS:
.BL 1 (33

15 Dec-1983 10:24:41
15 Dec 1983 10:21:50

RD/RX EXERCISER
PRCTECTION TABLE

NRQAM]
v0o1.¢
)

006071
006074
006077
006102
006104
006107
006112

006115
006120
006123
006126
006131
006134
006137
006140
006143
006146
006151
006154
006157
006162
006165
006170
006172
006175

006203

006211
006214
006217
006222
006224
006227
006232
006235
006240
006243
006246
006251
006254
006257
006262
006265
006270
006273
006276
006301
006304
006307
006312
006315
006320
006323
006326
006331

117

040

122

040

165
145
147
172
040
101
123
117
040
114
040

123
103
120
105
122
122

040
104
040
123

103

104

105
117

000
055

156

143
156
145

123
124

040
104

055
102
110
124
117
101
040
122
000
055
102
110
124

117

040
162
157
151
144
124
105

040
116

117

040

115
122
105
117

040

116

117

040

115

101
040
122
000
055
116
114

040
101
105

101
104
040
104
040
040

104
125

040
120

105
117

111
104
055
124
110
040
111
040

114
114
120

115

111
000
055
122
122
116

125
120
040
105
125
116
103
122
103
122

P.ADN:

125
103

120
105
122
122
040
125
102
040

124
114

ASCII

105
122
122

122
105
117

117
117

105
101

000
040
122

P.ADO:

.ASCII
.ASCII
.ASCII

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

.ASCII

.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASC1I
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII

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

/70DE/

/ ER/
/ROR/
<00><00>

/unr/

/eco/
/gni/

/zed/

Sty

/ATY/
/S C/
/00€E/
<00>

/LBN/
/7 WO/

/87 7
/7COM/
/PAR/
/E E/
/RR0O/
/R/ <00>
/

/DBN/
/7 WO/
/87 7

7COM/

/PAR/
/€ €/
/RRO/
/R/<00>
/7 -/
/7UNA/

/8LE/

/ 10/
/7 L0/
7D /7

700P/

/ M€/
/0IA/
/7 7¢00><00>
/

/ERR/
/0R /
/IN /
/0UP/
7/ -PK/
/T W/
/HEN/
/7 US/
/7ING/
/7 Cv/
/LR /
/LC /7
/PRG/

SEO 006
VAX 11 Bl es 16 v3-555
63
SPIDERS$USERS: ([DOUCETTE, FALCON]CNROA# BLl (33

L “

006334
006336
006341
006344
006347
006352
006355
006360
006363
0C6366
006371
006374
006377
006402
006405
006410
006413
006416
006421
006422
006425
006430
006433
006436
Co6441

006447
006452
006455
006460
006462
006465
006470
006473
006476

006501
006504
006507
006510
006517
006516
006521
006524
006527
006532
006535
006540
006543
006546
006551
006554
006557

006565
006570
006573

15 Dec
15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRQAM1
vo1.C

045
116
114
040

115

116
045

117

101
040
117

105

045
116
040
116
045
122
123
111
040
040
101
101

105
124
105

105
10!
117

101

105
117

045
122
105
122
105

105

045
105
103
103
120
105
122
122
045
101
040
122

000
101
126
111
103

115
104
101
115
116
101
122
104
101
111
117
114
105

111
101
104
117
101
000
103
115
104
102
124
000
125
124
106
111
000

LADT:

124
116
124
116
117
126
114
114
123
124

.ADW;

101
101
111
117
124
i01
111
102
040
101
000
101
104
040
122
124
122
122

115
111
106
115
040
122
000

101
111
055
117
103
104
101
126
105
117
101
040
122
000
101
124
105
117

127
124
120
124
124
000
104
111
040
115
122
105
117
000
104
101
122
122

.ADV:

.ADV.

.ASCII

<00><00>

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

/MMA/

.ASCII
.ASCII
.ASCII
.ASCII

.ASCI1
.ASCII

.ADY;

.RDZ:

.AEA:

.ASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII1
.ASCI1
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX

/8AY/
/NVA/
7L1ID/

/7 CO/

/ND/<00>»

/9%AC/
/7QMM/

/AND/
/ AB/
/0RT/

/ED/<00>

/8RAY/
/NIT/
/7 OF/
/FLY/

/7 <00>»
/NE
<00>

/8AT/
/RAN/
/SIt/

/ION/

/7 10/
/7 AV/
/AIL/
/ABL/

/7€ S/

/TAT/

/€7<00>

/7980
/
/E01/
/A F/
/70RMY/
/AT 7

7ERR/

/OR/<00>

<00>

790/
/RIY/
/7€-P/
/RQ0T/
7€ECT/
/€ED/<00>
/8RD/
7EV1/

/CE /

7coM/
/PAR/
/€ €/
/RRO/
/R/ <00><00>
/%AD/
/ATA/
/ ER/
/ROR/

1983
1983

10:¢4:41
10:21:50

VAX

Bliss

v3-555

2
SFQ 0+
Page

SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA B 1 (22

0006032
006606
006611

006614

006617

006622
006625
006630
006633
006637

045
117

106
122
103

123
105
117

122

045
122
105
122
122
045
105
101
040

101
111
040
122

104
126
105
117

.AED:

101
123
107
106

.AEE;

111

116
122
114
111
116
124
123
101
123
103
120
105
122
122

115
123
105
122
040
124
116
040
101
117
111
110
124

:
. AEF

107
123
103

045

117
040
115
122
117

117
101
040
115

125

006336
006360
006402
006422
006462
006510’
0065352

101
116

117
105
105

115

101

115
116
124
105
124

117
101

.AREG:

111

117
.ADS:

<«00><00>

/9AH/
70871/
/7 BY/
/FFE/
/R A/

/7CCE/
/58S 7/
/ERR/

/0R/<00>

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII

<00>

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

/7AGE7
/7 vR/
/0M /
7INT/
/ERN/
/AL /
/01A/
/GNO/
/8117

.ASCII
.ASCII
.ASCII
.ASCII

787K/

LASCII

.ASCII
.ASCII

.ASCII
.ASCII
.ASCII

040
122

103
115

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

.ASCII

117

101

007024
007026

.AEB:

.AEC:

105

007012
007014
007016
007020
007022

110
124
125
105
101
105

103
124
114
122
122
122

045
117
122
114
040
122

117

006767
06170
006773
006776
007001
007004
007007

000
101
123
102
106
040
103
123
122
122

1983

10:24:41

15 Dec 1983 10:21:50

LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
. WORD
. WORD
. WORD
. WORD
. WORD
.WORD
.WORD

/9AC/
/ONT/
/ROL/
/LER/
/ ER/
/ROR/
<00><00»

/8RD/
/RIV/
/E €/
/RRO/
/R/<00»
/78AM/

/€SS/

7CS/<00>

7081/

7 CO/

/MPA/
/RE /
7ERR/
/0R/ <00>
<00>

/9AC/
/70MM/

/AND/
/7 11/
/MEQ/

/UT/<00>
V1JV1!V13Q

vO0l1.C

0065 7¢

15 Dec

RD/Rx EXERCISER
PROTECTION TABLE

NRQAM1

.ADT
.ADU

AV
.ADM
. ADX
.ADY
.ADZ

vAX-11 Blies

16 +3-555

SEO 004

SPIDERSUSERS: (DOUCE TTE .FALCONICNRQAA.;E:
(33

M
RD/RX EXERCISER
PROTECTION TABLE

007030
0070%2
007034
007036
007040
007042
007044
007046
007051
007054
007057
007062
007065
007070
007073
007076
007101
007104
007107
007110
007113
007116
007121
007124
007127
007132
007135
007140
007143
007146
007151
007154
007157

007162
007165
007170
CO7173
007176
007200
007203
007206
007211
007214
007217
007222
007225
007230
007233
007236
007241
007244
007246
007251
007254
007257
007262

1%
1%

006562

006634
006660
006676
006742
006770
045
101
127
040
107
105
101
040
103
126
072

045
040
116

117
105
105
117

116
045
040
123
115

117

040
103
123
122
122
045
040
123
104
101
040

123
124

116

105
105
117

116
045
040
123

101

.WORD
. WORD
. WORD
. WORD

116

105
117
114

040
123
107
122

105
105
045

101
103
124
114
122
122
122
000
101
110
124
105
122
101
105

040

122
045

101
104
113
062
040
104
113
122
123
122
122
122
000
101
104
113
062

040

045
122
122

P.AEH:

117
115
123
105
105
111
104
116

052
117
122
114
040
122
045

P.AEJ-

052
117

P .AEK:

040

115
131
103
123
105
117
116

052
111
045
045
055
111
040
101
106
040
122
C45

P.AEL:

052
111
045
045
055

P.AEM:

. WORD
.WORD
. WORD
.ASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.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
.ASCI11
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

PVUVOVODOLUOVD

NRQAM1
VvO1.C

Dec
Dec

.AEA
.ALB

JAEC
.RED
.AEE
.AEF
.AEG

/9N
/
/RER/
/ROR/
/ LO/
/6 M/
/ESS/

/RAGE/
/ RE/
/CEX/

+VED/
/ 8N/
<00>

/%A
/

/7 CO/

/NTR/
/70LL/
/ER /
/ERR/
/0Rs/
/N/<Q0><00>
/8As/

/7 WO/

/81

/MEM/

/70RY/
/7 AC/
/7CES/
/5 €&/
/RRO/
/ReEN/
<00>»<00>

/%As/
/ Das
/SKe/
7029/
/R -/
/7 DY/
/5K /
/TRA/
/NSF
/
/ER /
/ERR/
/0Rs
/
/N/<00>
/
/%A
/7 01/
/SKe/
702%/
/AR
/

198%
198%

10:724:41
10:21:50

SEQ 0L’
Page
&+,
SPIDERSUSERS
: [DGUCETTE .FALCONICNRQAA B L (72

VAX

11 Bliss

V3 $55

tae
1% Dec
15 Dec

RD ‘Rx EXERCISER

PROTECTION TABLE

vo1.¢
)

00 72e"

00727¢C

007278
007276
007301
007304
007807
007812
007515
007320
007328
00732¢
00738}
0073%4
007837
007342
00734%
0073%%0
0073%8
007336
007361
007364
00737
007372
00737%
007400
007402
007404
007406
007410
007412
007414
007417

007422
007425
007430
0074143
007436
007441
007444
007447
0074S2

00745S
007460
007463
007466
007471
007474
007477
007502
007504
007%07
007512
00754%
007520
007523

124
104
104
111
040
124

108

116
124
10%
117
116
049
040
123
104
101
040
119
114

111
042

122
122

007110

042
101
101
040

123

VAR

7
71SK

111
10%
11/
105
042
122
122
000
101
104
113
062

113
116
122
116

123

040
042

101
040
123

040
122
045
000

116
122
104

.ASCI1
LASCII

108

040
122
045
000
052
111
045
045
053

123
117
122

104
063
102
123
040
040

045
101
117

125
105
101

/7 DI/

/SK%/

/
/7029
/
/A
/ S/
/MAL
/
7L D/
/7ISK/
VAR ¥4
/RRO/
/ReN/

123
114
104

113
105
117

116

«00><«00»

P.AEY
P.AEK
P.AEL

007200

101
122

IN/

/TER/
/CON/
/NEC/
VA
4
/ERR/
/0Rs/
/N/7<Q0>

007246

12%
105

/
/8Ae

P AEN:

007140

007334
045
10!
117

/7 TAN/
/DAR
/

P.AEM
P.AEN

116
111
040
106
122
104

105

040
122
105
040
062
111
051
045
04%
045
045
116
111
040

106
122
104

104
123
106

/
/SN
/AY/<S7»
/0 B/
/\FF/
/ER 7
/ADD/
/RES/
/9 F/

101
050
040
124

/0 (7
732 7/
/8177

045

057
102
106

040

/0R /
/RER/

040

78):/

072

117

/7 w0/
768/

101

117
116

045
057
102
106
040
104

/7 40/

764N/
<00»>»<00»

P.AEP:

LASCL
.ASCII
LASCII
.ASCII
LASCII

/¥Ns/
/AY/<S57>

/0 B/

/\FF/
/ER /

/7RDD/

1943
1948

10:¢4:41

10:21:50

SEQ OLAs

VAY 11 8].es 16 v3 3359
PIOERS ISERS: (DOUCE TTE . FALCONICWMROAS

1 738

’
’

RD/Rx EXERCISER
PRCTECTION TABLE

NRQAM]
vol.¢

00 752¢
007531
007534
00758
"
007542
007345
007550
007553

007556
007561

007564
007567
007572
00757%

007600
007603
007606
007611
007614
007617
007622
007625
007630
007633
007636
007641
007644
007647
007652
007655
007660
007663
007666
007671
007674
007677
007702
007705
007710
007713
007716
0077214
007724
007727
007732
00773S
007740

007743
007746

007751

007754
007757
007760
007763
007766
007771}

122
128
117
127
124
050
040
124
072

117
101
117

101
116
050
101
040
065
056

117

040

051
045
101
116

050

111
051
104
101
039

124
117

101

105

040
122
122

105
063
102
123

040
066
040
066

116
114
072
122
104
045
045
040
103
045
045
000
i16
114

117

104

065

101
050
124

117

040

117

040

101

051

045
101

116
102
105
117

124
103

/WR1/

/TE

/7 Bl/
71S)/
VR

P.AEQ:

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

101
050
124
117
101
P.AER:

122
105

105
101
115
124
114
113
117

P.RES:

045
045
040

103
045
045
045

131
040
125

.ASCII

.ASCII
.ASCII

105
051
104

103
045
045
000
045

/(327

040

045
045
040

040

117

045
045
045
000
045
102

040
065
056

051
116
122
114
105
116
102
103
116

045
101
120
103
105
040

040
111
040
062
111
051

072

040

/RES/
75 F/
/0R /

123
106

000
045
102
040

127
124

1% Dec
1% Dec

P.AET;

.ASCII
.ASCII
.ASCII
.ASCII
.ASCTI
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCIIX
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

¥4

706%/
/R &/
/706/<00>
/%N
/
/ALB/
/N: /

/7(RE/

/RD)/
/7 4D/
/S#A/

/N:

/0Cv/
/7 80/
/76%A/
/)7 ¢00><00>
/
/%N
/ALB/

/(WR/

7ITE/
/) &/
/70%u/
/A, 7/
7(0C/
/7 &/

7064/

/R)Y/<«00>»

7dNS/

/7ARE/
/PLA/
/CEN/
/ENT/
/ BL/
70Cx/
/7 NO/
/.

705/
/A, /
7¢(0C/
/1 &/

7068/

/AR)/<00>
«00»>

/74Ns
/

/ABY/
/7€ 7/

7CON/

19483
14983

10:/04:41
10:21:50

VAX 11 Blies 16 V3 558

SEQ 6,7

P IDERSUSERS : (DOUCE T TE .5 ALCON JCNRIAA

Page
.BLT

()
15 Dec
15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRQAM]
vOo1.¢C
)

007774
0071777

¢10002

010005
010010
010013
010016
010021
010024
010027
010030
010033
010036
01004]1
010044
010047
010052
010055
010060
010063
010066
010071
010074
010077
010100
010103
010106
o10111
010114
010117
010122
010125
010130
010133
010136
010141
010144
010147
010152
010155
010160
010163
010166
010171
010174
010177

010202

010205
010206
010211
010214
010217
010222
010224
010227
01023%2

116
111
122
104
11?7
101

072
104

101

045
101

124
103
116
111

127
124
103
115
104

045
045

045
101
040
123

072
104
045

101
072

117

045
101
101
123
117
072
045
101
101
123

124
116
105
040
115
116
040

065
056

116
102
105

117

040
040
101

/NT v/
ZIN 7/
/REA/
/D C/
/70MM/
/7AND/

045
045
000

103
115
104

045
131
040
125
040

124
116
122
105
117
101
072
104
101

040
115
116
040
065
056

116
040
104
113
040
062
116
123
040
066
116
123

045
052
111
040
045
000
045
101
045
000
045
124

124

040
104
040
116
123

124

040

102
117

103
105

072

045
101
115
116
040
045
104
055

116
103
115
104
000
101
125
000

«00»

P.AEU:

040
111

125
103
105
000
045
124
125
123
055
104
040
045

117

/98Ne/
/ABY/
/TE 7
/COU/
/NT /
/IN 7
/WRY/
/TE 7/

/7COM/
/MAN/
/0: 7
7405/
/8A./
<00»

P.AEV:

/79N
/

P .AEM:

7027 <00>
/4Nt
/
/ASA/

/A o/
/7 D1/
/SK 7/
/:

7067 <00>»

P.AEX:

/790
/
/ASY/
7ATY/

/8 C/
/70DE/

P.AEY:

7<00»>

/
/74N
7AST/
AT/
/S S/

7UB-/

/€C0D/
/€ /
<00>»

P.AEZ:

101

072

055
120

/05%/
/A, /<00>

/794N%/

/ACO/
/MMA/
/ND:/
/7

P.AFA;

/7¢<00>

/8A-/
/0UP/
/-7¢00>

198%
1983

10:¢4:41
10:21:50

GG~

VAX 11 Blies 16 v3 S35
Page
SPIDE
: (DOUCETTE
RSUSE
.FALCONICNROAL
3L&
RS 8|

[ L]
[4

77
/

{ o
NRGAM1
\:01.0
010234
01023’
010242
010245

RD RXx EXERCISER
PROTECTION TABLE
045
115
120
000

101
123
055

055
103
000

JAFB:

108

117

LAFC:

010246

045

101

055

010254

120

101

122

010251

115

010257
010262

105
045

000
116

000
04s

010270

104

040

102

010301

105

010265

010273
010276
010304

101

103
122

122

124

105

010322

045

010367

04s

000

116

045

01037
010400
010403

040
103
045

010411
010412
010415
010420

000
045
101
124

010426

116

010431

010434

010437

065
056
117

117
101

066
051

116
104

045
102

104

065

050
124
117

117
040
066

124

045
101

010423

104
101
050

103

010356
010361

010406

045

114
072

045
045

010372

116

101
116

010347
010352

010364

040
065
056

045

103
111

103

115

072
101

101

102
040

117

115

116

101

040
065

010463

114

040

043

010466
010471

124

040
040

125
117
102

045
103
101

106
131

.ASCII

/ABA/

/D B/

/LOC/
/X R/

/EPO/

/RTE/

/uNe/

.ASCIXI
ASCII
LASCIY

.ASCII

<«00><00>
/ALB/
/N: /

/#D5/
/#A./
/7 (0o/
/CT

/%067
/#A)/
<00»

ASCII
.ASCII

/7ehe/
/ADB/

.ASCII

/vw0S/

.ASCII
.ASCIT

.ASCII
.ASCIXI
.ASCII

ASCII

.ASCII
.ASCII
.ASCII
.ASCII
ASCII

LASCII

.ASCII

/N:

/sA./

7 (0O/
/CT /
/w06/
/@A),

<00»
/sNe/
/ABY/
/TE /

/CO0u/

/NT /

/IN/

.ASCIX

/COM/

.ASCII
.ASCI1
.ASCII
LASCI1
.ASCIT

/D: 7
/%DS/
<00><00»
/¢Ns/
/AAC/

LASCII

LAFH:

/E/<00><00>
/78Ns/

_ASCII

ASCII
ASCII

AFG:

/PAR/

/0: /
/w05/
/A, ./

.ASCII

LAFF:

/sA-/

.ASCII
.ASCII
.ASCII

.ASCII
.ASCII
.ASCI1

116

072
104
000
116
101

010460

LAFE .

040

104
045
000
045
101

LASCII
.kSCII

.ASCII

125

010442
010445
010450
010452
010455

/COM/

.ASCII

051

040

LASCII

.ASCI1

LASCII
.ASCII

056

124

/wA /
/MSC/
/P /<00>»
<00>

.ASCII

040

045
131
040

117

JAFD:

040

116
102
105

(ASCII
LASCII
LASCII
LASCI1

.ASCI1

117

072
117
101

000

04S
045
040

010355

120

000

010333
010336
010341

010344

101

117
040

104
045
045

010325
010330

102

114
113

010307
010312
010315

010320

15 Dec
15 Dec

.ASCII

LASCII

LASCII
.ASCI1I

/MAN/

/TUA/

/L e/
/7 OF/
7 BY/

198% 10:24:41
1983 10:21:50

SEO 00hY
VAX 11 Blies 16 V3 5SS
Pege
70
SPIDERSUSERS: {DOUCETTE.FALCONICNROAA .BL
L (33

f
NRQAM1
vOo1.¢

RD/RX EXERCISER
PROTECTION TABLE

15 Dec
15 Dec

)

010474

010477
010502
010505
010510
010513
010516
010521
010522
010525
010530
010533
010536
010541
010544
010347
010532
010555
010360
010563
010566
010571
010574

010576
010601
010604
010607
010612
010615
010620
010623
010626
010631
010634
010637
010640
010643
010646
010651
010654
010657
010662
010664
010667
010672
010675
010700
010703
010706
010711

010712
010715

010720
010723
010726
010731

124

040

101
106
122
072
104

045
101

117
125
105
101
122
123
063
102
123
040

040
045
101
116
116
040
040

124

116
101

105
045

045
101
123
107

124
105

045
101
123

107

116
102
123
045
101

123
107
105
117

105
124
116
105

105

040

123
122
123
122
104
045

065

000

116
111
040
106
122
104
105
040
062
111
051
045
045
045
000
116
103
124
124

045
057
102
106
040
104
123
050
040
124
072
117
101
117

P.AFI:

045

P.AFJ:

117
122
125

040

103
124

117
105
123

106
105
122
120
113
072

116

000

116
115

045
105
101
040
120
040

P.AFK:

045

P.AFL:

123
105
131

072
000
116

115
123
105
125
105

0712
116

115
123
105
122
122

105
101
040
115
122
040

045
105
101
040
122

040

P.AFM:

LASCIL
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII1
.ASCII
.ASCII
.ASCII
LASCII

/1ES/
/7 TR/

/ANS/
/FER/
/RED/
/: w/
/D57 <00>
<00»

79N/

/RI/<57>
/0 B/
/\FF/
/ER /
/7ADD/
/RES/
/S (/
732 /
/8171/

/S5):/

/ w0/
/68RA/

/7 w0/

76/7<00>

/798NS
/
/ACO/
/NTE/
/NTS/

/7 OF/
/ RE/

/TUR/
/N P/

/ACK/
7ET:/

J79N/ <00>

«00>»

/78Nt
/
/AE/
/7SSA/
/GE 7/
/TYP/
7€: /
<«00><00>

/
/9Nst
/AME/
/SSA/
/GE 7
/NUM/
/BER/
/5: /
<00>

/6N
/

/
/AME
/SSA/
/GE 7/
/ERR/
/0R /

1983
198%

10:24:41
10:21:50

SFEQ 0076

VAX 11 Bliss-16 v3 5%
Pege
71
SPIDER$SERS
: (DOUCETTE .F ALCONICNRQAR .BL1 (33

(e
RD/Rx EXERCISER
PROTECTION TABLE

NRQAM1
vOol.¢
)

010734
010737
010742
010744
010747
010752
010755
010760
010763
010766
010771
010772
010778
011000
011003
911006

011011
011014
o11017
011022
011025
011030
011033
011036
011041
011044
011047
011052
011035
011060
011063
011066
011071
011074
011077
011100
011103
011106
011111
011114
O11116
011121

011124
o11127
011132
011135
011140
011142
011145
011150
011153
011156
011161
011164
011167
011172

103
105
040
045
101
124
116
102
072
104

045
101
116
115
122
124
040
122
072

061
045
101
116
115
105
040

122

142
072

061
101
143
045

045
101
116

117
123

000
116
102

105
125
105

040
063

122
104

040

101
127
104
151
045
066

040
164

117

116

103

045
055
116

101
040
113

040
045

072

045
055
116

101
040
113
127
103
116
124
116

117

117
111

115
122
045
000

040
102
000
045
101

040

040
116
103

131

104
045
066
116

127

104

P.AFN:

040

045
101

040
045

117

045

P.AFO:

117
127
124
116
117

P.AFP:

117
122
104
117
040
156
102
045
157
072
066

045
122
o072
117

P.AFQ:

040

P.AFR:

125
116
116
040
062
040

125
116
116
117
105

111
040
072

Dec

15 Dec

104
072

116
122
104
040
111

105
127

P.AFS:

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

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

/C0D/

/ES;:/

/7 /7<00>
/79N
/
/ABY/
/TE 7/
/NUM/
/BER/
/:

/D3/<00>
<Q0»>

/SNS
/

/ARA/
/NDOQ/
/M

/R1IT/
/TEN/
/7 W0/
/RO 7
/:98/

/716/<00>
/98NS
/
/ARA/
/NO0/
/M R/

/ERD/
/7

WO/

/RD /

/bin/
/:948/
/716%/
/A o/
/et:/
7806/
<«00>

/79Ne/

/ACR/
/N :/
/ 0/

76/¢<00>

/8A /
/-

/NKN/
70MN/
/2 /
7902/

<00><00>

/78R /
/- U/
/NKN/

/0WN/

/7 CO/

/NNE
/
/€117
/ON /
71D:/

1983

10:24:41

10:21:50

SEQ_0C
71
Pege
72
SPIDERS$USERS:[DOUCETTE.F ALCONICNRGAA. BL1 (33

VAX-11

Bliss

v3-55%

=l
RD/Rx EXERCISER
PROTECTION TABLE

NRQAM1
!ox.o
o1117%

011200

011203

011206
011211
031214
011el?
011222
011225
011230
011233

011234
0112%7

011242
011245
011250
011253
011254
01125%7
011262
011265
011270
011273
011276
011301
011304
011307
011312
011315
011320
011323
011326
011331
011334
011337
011342
011345
011350
011353
011356
011360
011363
011366
011371
011374
011377
011402
011405
011410
011413
011416
011421
011424
011427
011432
011435

040
063
040
045
101
116
117

105
106
107

045
101
111
106
107
045
101
104

105

101
040

101

072
045
101

122
105
103
124

114
122

101
105

040
104
040

045
101
115
111
054
123
111
054
117
101
040
116
075
104
072
104

045
045
055
116
103
124
114
12¢
114

123

104
101
000
045
117
122
114

045
116
040
101
072

116
105
040
123
107
106
107

045
116
115
123
105
114
123
000
045
104

000
116
040

111
122
117
122
114

040
102
040
101
122
045
045
000
116
040
104
116
040

120
116

040

115
116
122

107
040
104

040
066

.ASCII
.ASCI1
P.AFT:

040
101
072

116
125

124
114
123

1% Dec
15 Dec

P.AFU:

P.AFM:

126

040
116
117

105
124

114
075
104
072
104
116

045
103
040
124
122
040
124

103
115
104

111
040

101
122

045
045

P.AFX:

.ASCI1
.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
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII
.ASC11
.ASCII
.ASCII
.ASCII

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

1983
1983

10:¢24:41
10:21:50

SEO ‘J(, '(
VAX 11 Bl .es 16 v3-555
Page
7
SPIDERSUSERS:
{OOUCETTE .F ALCONICNRQAR HL ] (27

/ @D/
/34A/
/7
/7<00»>
/9N
/
/7ACO/
/NTR/
70LL/
/ER /
/FLA/

/7GS:/
<00>

/9N
/
/7AUN/

/717 7
/FLA/
/GS:/
<00»>

/98NS
/
/REN/

/0 M/
/7€ESS/
/AGE
/
/7 FL/
/AGS/

/:/7<00><00>

/
/79Nt
/A D/
/R1lv/
/ER /

/CON/
/TRQ/
/LLE/
/R 1/
/RABL/
/& =/

/7 AD/
/0R:/
/7 b/

/68N/
<00><00>

/
/%N
/A C/
/M0 /
/INT/
/, R/
/5P 7/
/INY/
/., C/
/70M/
/7AND/
/7 RY/
ING /
/= A/
/0DR/
/: w/
706%/

| v
RD/RX EXERCISER
PROTECTION TABLE

NRQAM]
!01.0

011440
011442
011445
011450
011453
011456
011461
011464
011467
011472
011475
011500
011503

011504
011507

o11512
011515
011520
011523
011526
011531
011534
011537
011542
011544
011547
011552
011555
011560
011563
011566
011571
011574
011577
011602
011605
011606
011611
011614
011617
011622
011625
011630
011633
011636
011641
011644
011647
011652
011655
011660
011662
011665
011670
011673
011676

116
101
114
120
113
123
116

105
101

040

105

045
101
114
122
125

040

103
124

111
101
101
045
101
104
072
104
101
040
120
113
040
045
045
101

104

040
040
123
116
040
116
124
102
120
114
040
045
101
104
040
040

000
116
040
114
101
105
040
040
123
107
101
101
116
040
114
105
122
120
113
123
116
122
000
ilé
040
104
040
066

040
040
101

105

075

116
116
040
104
117
122
120
123
122
107

117
105
117
105
045
116

040

104
117
115

045
101

1983

10:24:41

15 Dec 1983 10:21:50

P.AFY:

103
124

111
115
123
105
122

045
101
040
124
116
101
105
040
040

P.AFZ:

045
101
122
045
045

P.AGA:

105

.ASCII
.ASCII
.ASCII
.ASCI1
LASCII
.ASCII
.ARSCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.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

040

103

124
040

045
101
122

105

117

ASCII

105
111
040
040
040

114
104
104

045
101
122
106
105

Dec

P.AGC:

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

/N7 <00>
/9N
/
/R A/
/LL 7/

/PAC/
/KET/
/S 1/
/N M/

/ESS/

/AGE/
/ AR/
/EA/<00>
<00»>

/98NS
/
/R A/
/LL 7/

/RET/
7URN/
/7 PR/
/CKE/
/718 7
/IN /
/ARE/
/A/ <00>
/9N
/
/R A/

/7DDR/
/. w/
7068/
/
/AR
/

/PAC/

/KET/
/

/8N/ <00>
<00>

/4N/
/A A/

/00R/

/ OF/
/ RE/
/7SP0/
/NSE/
/ R/
/NG /
710 7/
/8€ 7/
7
/POL
/LED/
/ 8D/

76/7<00>

/8N
/
/A A/
/DDR/

/7 OF/
/ ME/

VAX

11 Blies-16 V3 555

SEQ 00”

SPIDERSUSERS (DOUCE'TE FALCON]CNRQ“A BLI (7

ol
RD/RX EXERCISER
PROTECTION TABLE

NRQAM1
v0l1.C

15
15

)

011701
011704
011707
011712
011715
011720
011723
011726
011731
011734
011737
011742
011745
011750
011753
011756
011760
011763
011766
011771
0l1774
011777
012002
012005
012010
012013
012016
012021
012024
012027
012032
012035
012040
012043
012046
012051
012054
012057
012062
012065
012070
012073
012076
012101

012104

012107
012112
012115
012120
012123
012126
012131
012134
012137
012142
012145

123
107
120
113
040
123
116

116
123

123
105
101
105
122
120

123

122
107
114
040
111
123

117

104
000
116
040
104

11?7
115
123
105
101
i05
103
115

104
111
040

117

103
116
072
062
040
072

117

045
101
122
124
116
104
101
111

120
116
040
040
066
116
104
114
101
040
111
045
045
101
111
040
066
116

115
105

110
040
061

040
106

101
040
103
124
105

117
105
111
040
117
120
116
040
040
066
045
101
122
106
105
101
040
103
124

P.AGD:

117

101
040
116
123
i24
117
124
124
045
000
045
125
111
124
125
124
104
101
124
120
045
000
045

117

040
101
045
045
104
106

.ASCII
.ASCII
.RSCII
.ASCII
.ASCII
LASCIX
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.RSCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCI1I
.ASCII
.ASCII
.ASC1I
.ASCII

.ASCII

P.AGE:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1

.ASCII
.ASC1I
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII

/PAC/
/KET/
/ RE/

/5P0/
/NSE/
/ Rl/
/NG /
/SL0/
/7T P/

/QIN/

/18
/10

7
7

/7%D6/

<00><00>

/
/9N

/R A/
/0DR/
/7 OF/
/ ME/
/SSA/
/GE 7
/PAC/
/XET/
/7 CO/
/MMA/
/ND /
/RIN/
/G S/
/L0Y/
/7 PO/
7INV/
/5 Vs
70 8/

7067 <00>

/
/NS

7ADY/

/PLY/
/CATs
7€

/NIY/

/:9D/

.ASCII

728A/
/7 AY/
/7 1P/
/: w/

.ASCII
.ASCII
.ASCII

/9N
/
/AM0/
/RE /
/THA/
/N o/
7019/
/A O/
/IFF/

.ASCII
.ASCII
.ASCII

P .AGF
:

/SSA/
/GE 7/

.ASCII
.ASCII
.ASCII
.ASCII
.ASCITY
.ASCI1

/7067 <00 >

Dec
Dec

1983
1983%

10:24:41
10:21:50

SEQ 0074
[
VAX 11 Bliss 16 v3-555
Page
7 Pl
SPIDER$USERS:
(DOUCETTE .FALCONICNRGAA .BL 1 ( 3 z

<y
RD/RX EXERCISER
PROTECTION TABLE

NRQAM1
v01.6

1% Dec
15 Dec

)

012150
012153
012156
ol21lel
012164
012167
012172
012174
012177
012202
012205
012210
012213
012214
012217
012222
012225
012230
012233
012236
012241
012244
012247
012252
012255
012260
012263
012264
012267
012272
012275
012300
012302
012305
012310
012312
012315
012320
012322
012325
012330
012333
012334
012337
012342

012345
012346

012351
012354
012357
012362
012365
012370
012372
012375
012400

105

116
111

101
122
123
045
040
121
116
101

045

040

105
124
117
106
101
117

045
040
111

105
116

045
040
124
122
045
105

045
122
105
045
103
123

122

124
120
104
105
105

000
101

123
125
124
114

101
103
104
040
124
111
124
116
101

115
116
116
103

.AGG:

055
122
111
116
111

LAGH:

103

111
000
055
101
124
101

101

101
124

117

122
040
101
101
124

125

.AG]:

LAGY:

122
104

127
124
105

000

117

114
105

123

040
116

117
103
122

107
040
123

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

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

105

101
103
123

111
000

045
105

045
105
104

055
105
105
111
000

055
101
107
115

101
040
116

056

123
123

101
104
101
101
000
101
101
000
101

045
116
111

103
124
114
110

105
040
040
104

AGP;

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

/ERE/

/NTY 7/
/1P /
/ADD/
/RES/
/SES/

<00><00>

/%8R

/ SE/
/
/7QUE

/NTY/
/AL /<00>
<00>

/B8R -/
/7 CR/
/EDI/
/7T N/
/0T1/

/FIC/
/ATY/

/0N/<00>
/8A-/
/7 MA/
/7INT/
Z7ENA/
/NCE/
<00>

/8A-/
/7 DA/
/TAG/
/RAY/
<00><00>

/8AR/
7EAD/

<00>»<00>

/78AW/

/RIT/

/E/<00>
78RR/
/CCE&/

755/<00»
<«00>

/4A0/
/N L/
/INE/
<00>

/9AS/
7EY /
/CON/
/TR0O/

/WL C/

/HAR/

/./7¢00>

/798AG/
/ET

/70US/

1983
1983

10:2¢4:41
10:21:50

SEQ 0675
VAX 11 8l°'ss 16 v3
S55
Page
76
SPIDERSUSERS:
[DOUCETTE .F ALCONICNRQAR ,BLL ( ? 3

01240%
012406
012411
0l1c414
012417
012422
012425

012430
012433
012436
012441
012444
012447
012452
012455
012460
012463
012466
012470
012473
012476
012501
012504
012507
012512
012515
012520
012523
012524
012527
012532
012534
012537
012542
012545
012550
012553
012556
012560
012563
012566
012571
012574
012577
012602
012605
012610
012613
012616
012621
012624
012627
012632
012635
012640
012643

1 Dec
15 Dec

RD ‘Rx EXERCISER
PRCTECTION TABLE

NRQAM1
XOI.C

124
124
125
045
130
125
040
120
111
040
107
045
130

125

010
103

107
045
105
040
124
105
111

040

124

045
102

124
045
120
055

127

111

117
104

045
124
114
117
105
105
045
125
111

124
125
124
125
105
045
114
101

040

040
101
123
101
105
124
123
120
105
120
000
101
105
124
114
101
120
000
101
116
104
101
101
103
i26
104
101
101
117
000
101
111
104
116
107
122
000
101
111
040
116
103
104
101
120
103
105
116
040

115
122
101
122
104
117

123
124
000
105
103
105
125
114
104
122
000
105
103
105
117
114
122

123
104
101
000
122
105
105
101
000

.AGQ:

.AGR:

AGS:

AGT:

101
122

123
116
117
040
116
105
123
114

.AGM:

103
116
124
000

104
114
101
040
111
116
102
000
101
105
131
11€

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

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

.ASCII
.ASCII
.ASCI1

.ASCII
.ASCII
ASCII

LAGY

.ASCII
.ASCII
.ASCIJ
.ASCI1
.ASCII
.ASCII
.ASCII

/1 S/
/TAT/
/US7<00>
/8RAE/
/XEC/
/UTE/
/7 SU/
/PPL/
/71ED/
/7 PR/
/7G7<00><00>

/8RE/
/7XEC/

/UTE/
/7 LO/

/CAL/

/7 PR/
/7G7<00>
/8AS/
Z7END/
/7 DA/
/TA/<00>
/8AR/
/ECE/
/7INE/
7/ DA/
/TA/<00>
<«00>

/7BAR/
/8B0R/
/717¢00>
/8AS/
/PIN/

/7-D0/
/WN /

/IGN/

/0RE/

/07/<00>
/8AS/
/YIL/
L C/

70NN/

7ECY/
7E0/<Q0>
78D/
7UPL/
7ICA/s
/TE 7
/UNY/
/T N/
/87
/7ER/ <00>
/%AA/
/LRE/
/ADY/
/7 ON/

1983
1983

10:04:41
10:21:50

VAX

11 Bliss

V3 555

SEQ GC s,
P

SPIDER‘USERS:(DOUCEIYE.FALCON]CNRQAfi.g?: 1z

RD/RX EXERCISER
PROTECTION TABLE

NRQAM1
vOol.C

1% Dec
15 Dec

)

01264¢
012651
012654

012657
012662
012665
012670
012673
012674

012677
012702
012705

012710
012713
012716
012721
012724

012727
012732
012735
012740
012743
012746
012751
012754
012757
012762

012765
012770
012773
012776
013001

013004
013007
013012
013015
013020
013023
013026
013031
013034
013037
013042
013045
013050
013053

013056
013061
013064
013067
013072
013075
013100
013102
013105
012110

114
105
045
124
114
116
116

111
000
101
111
040
114

045
116
040
113
127
117
117
111
040
040
117
105
103
124
114
122
045
117
117
115
115
116

101
111

122
12?2
105
111
102
104

131
127
103

045
116
040

117
122
111

040
104
040
111
040

125

045
116

105

125
116
116
122
116
116

124
101
124
122
117
122
114

000
101
040

114
105
117

124
040
040
111
040
123
114
040
040
111
110
101
111
111

120
101
126
050
065
127
124
106
114
000
101
111
104

116
000

123
114
117
111
000

P.AGZ:

125
124
116
117

P.AHA:

040
040

114
105
117
116
110
040
116

117

105
000
116
126
125
040
125
105
117
104
126
104
101
105
102
123
124
000
125
124
116
105
124
105
122
061
122
105
101
124

125
124
111

P.ANC:

P.AHD:

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

.ASCII
.ASCII
.ASCI1I
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII

7L IN/
/8/¢00><Q0>
/%AS/

/TIL/
7L O/
/NLYI/
/NE/<00>
<Q0>

/%AV/
/NIT/
/ UN/

/KNQ/

/WN

/0R

/
7/

/ONL/

/INE/

/7 10/
/7 AN/
/70TH/

7ER

/CON/

/TRO/

/LLE/

/R/<00><00>

/9AN/
/70 v/
/0LY/

/ME /

MO/
/NTE/

/70 0/
/R O/
/RIV/
7€ D/
7ISA/
/BLE/
/70 8/
/Y S/
/WIT/

/CH/<00>
/78AU/

/NIT/
/7 IN/
70PE/

/RAY/
/IVE/
/7 (R/
7051/
/ WR/
/ITE/
/ FA/
/AT/
<00><00>

/%AY/
/NIT/
/7 01/

1983
1983

10:¢4:41
10:21:50

SEQ 0077
VAX 11 Bl #s 16 v3 555
Pege
8
SPIDERSUSERS:
[DOUCETTE .FALCONICNRQAA BL1 (23

Nf.

01311¢%
013116
013121
013124
013127

013132
013135
013140
013143
013146
013151
013154
013157
013162

013163
013170
013173
013174
013177
013202
013205
013210
013213
013216
013221
013224
013227
013232
013235
013240
013243
013246
013251

013254

013257
013262
013265
013270
013273
013276
013301
013304
013307
013312
013315
013320
013323
013326
013331
013334
013337
013340
013343
013346
013351
013354

15 Dec
15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRQAM1
gOl.O

123
114

040
040

105

040
122
108

117
111

105
101
104
107
123
103
045
106
103
040
122
042
105
103
104
110
105
103
123
116
106
040
040
124
045
105
117

127

124
116
111
040

117

105
105
117

040

104
111

045
103
117
122
040

101
105
102
106
114
123
126
105
122
116
122
114
111
116
124
123

102
104
131
111
104
105
111
040
040
124
116
040
101

101
117

042
122
104
122

105
105
117

040

124
124

040
111
040
103

123
107
103
117
122

000
101

103
122
122
124

040
124
042
122

104
122
122
115
111

105

101
124
122
103
125

117

111
000

122
104
105
105
127
114
101
105

111
040
124
122

103

000

123

124
040
111

105
127
110
106
103

040
122
042
117

106
122

106
040
040
124
116

P.AME:

LASCII
.ASCII
.ASCII
.ASCI1
.ASCII
LASCII
.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
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII

/SAB/

/LED/
/7 BY/
/ Fl/
/7ELD/
/ St/
/RVI/
/CE 7/
/0R /
7INT/
/ERN/
/AL 7/
/01R/

/GNO/

/STY/

/7CS5/<00>
<00>

/
/B8R
/FOR/
/CED/
/ ER/
/ROR/
/7" O/
/ETE/
/CTE/
/D W/
/HIL/

/€ A/
/7CCE/
/8817

/NG /
/FCT/
/ OR/
/ RC/
/T/¢00><00>
/8RS
/
/€ECT/
/0R 7
/WR1/
/TTE/
/N MW/

7ITH/
/7 YF/
/0RC/
/€0 7
/ERR/
/0R'
/
/ M0/
/DIF/
/IER/
<00»

/8AF
/
/CT /
/0R /
/RCT/
/ UN7/

1983
1983

10:24:41
10:21:50

SEQ OC A
P age
YPIDERSUSERS
; [DOUCE TTE .F ALCON JCNROAA 8B 1

VAX

Blies

v3 555

9
z2

t
U Rx

E! PEFUSHR
AR

1333333333 w

o g 2 0t

0 Bo

o B

00 5o P

00 Bt B0 b

00 QOV00O00O00O00O0O

PRCTECTION

013443

122
104
114
055
116
114
040

108
122
109
10%
04%
103
10%
103
120
108
122
122
126
111
110
104

040
124

117

045
103

11?7

122
040
12?
104
114
055
101
040
116
124
105
124
045
101
040
116
116

040

125

040
101
040
116
124

105
124

105

101

105

040

126
111
123
124
040
101
122
101
101
122

117

101
040

122

040

101
104
105
109
116

040

125

0s1
101
124
122

103
125
105

107

105

040
124

123
103
111
117
000
101
124
123
103

117

106
116
050

124
123
103

111

117

051

1% Dec
1S Dec

EXERCISER
TABLE

101
102

/REA/
70AB/

105
117
110
104

110
104
040
115
122

/9AM/

040
111
101
104

/LE

7/
/7
17
/NVA/

7t 10/

/R W/
/EAD/
/ER/<0Q0>

000

7EAD/
/7ER

/COM/
/PAR/
/€ E/
/RRO/
/R (7
/
/VAL
/71D 7/

105
117
050
114

040
101
122

117
106
116
000
106
040
040
124
116
101
102
040
104
101
131
040

115
125

104
101
131
040
124

117

104
104
101
131
040
115
125
000

SE/

/CT10/

/HER/
/DER/
/7 NQ/
/1 F/s
/7QUN/
P.AMI:

/0)/<00»

/8AF
/
/Ct 7
/0R 7/
/RCT/
/7 UN/
/REA/
/DAB/
\E /
/- D/
/7ATA/
/7 Sy/
I/NC 7/

/1IM/

/7EOV/
777<00>
/
/78RD

/ATA/

/7 SY/
INC /

/NOT/
/7 FO/
/7UND/
/7 (D/
/ATA/
/7 SY/
/NC 7
/7TIM/
7EQU/
/71)Y/7<00>»

1988
198%

10:¢4:4)
10:21:50

VAX 11 B8l.es 16 v3 39%

SFQ OC 71

D-.n, o)

PIDERSUS
[DOUCE T TE .FALCONICNRDA
ERS:
A B )

(88

3
-

01362+
015631
013634
01368~
013642
013643
013630
013653
013656
013661
013664
013667
013672
013675
013700
013703
013706
013710
013713
013716
013721
013724
013727
013782
01373%
013740
013742
013745
013750
013753
013756
013761
013762
013763
013770
013773
013776
014001

014004
014007
014012
014015
014020
014023
014026
014031
014034
014036
014041
014044
014047
014052
014055
014060
014063
014066

045
108
117
122

101
124
122
103
125

104
114
0ss

101
105
040
103
122
124
114
105
040
122
000
101
103
122
124
114
105
040
122
000
101
124

040
122

116

122
103
102
040
103
122
122
045
116
122
103
102
040
103
122
122
045

103
103
122
124

045
117
105
101

115
124
114
113
126
114

114

124

125

051
045
111
040

124
117
101

127
110

105

117

125
105
101
040

120
103
105
040

117

040
101

101
105
122

040

114
00C
101
123
116
040
122
124
104
111
040

106
040
040

19 Dec
1% Dec
P.AMK

124
116

101
102
040

125
117
105
101
105
108

105
117
125
117
105
101
105
103
105
117

P.AML
:

122
040

P.AMM:

122
120
104

116
122
114
105
116
102
103
101
111
102
040

P.AMN:

103
106
114
104

113
117

115

124
040
124
065

P,AMO:

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

.ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII

78AF
/

/CY 7/
/0R 7
/RCT/
/ UN/
/REA/

/0AB/

/LE
/7

/NCO/
/
/RRE
/CTA/

/BLE/

/7 €ECs
/C E/
/RRO/
/R/<00>
/8RAY/
/NCO/
/RRE/
/CTA/

/8LE/

/7 EC/
/C E/
/RRO/
/R/7<00>
/
/8AR
/CT /7
/COR/
/RUP/
/TED/
<«00»>

/8AN/

/70 R/
/7EPL/
/ACE/
/MEN/
/7T 8/
/L0C/
/% Ay
/NAYL/

/LAB/

/L
E

7C(RC/
/T F/
/ARL/

/7)7<00»
78AD/
715K/
/ NO/
/1 F/
/0RM/
/ATY/
/€D 7/
/MIT/
V. I-Y4

1934%
1963%

10:24:41
10:21:50

tl,»~

VAX {1 Bliws 16 v3 555
Cage
SPIDE
[DOUCE
RSISE
T TE .F ALCON
RS:
JCNR AR, L TEBY

RO Rx EXERCISER
PROTECTION TABLE

NRQAM]
XOI.C

L/
RD/RX EXERCISER

NRGAM]
VvO1.¢

PROTECTION

1% Dec
15 Dec

TABLE

014071
014074
014077
014102
014105
014110
014112
014115
014120
014123
014126
014131
014134
014137
014142

014145

014150
014153
014156
014160
014163
014166
01417}
014174
014177
014202
014205
014210
014213
014216
014221
014224
014227
014232
014235
014240
014243
014246
014251
014254
014257
014262
014265
014270
014272
014275

014300

014303
014306
014311
014314
014317
014322
014325
014330
014333

061
102

105
105
117

045
111
040
124

117

101

105
117

106
040
122
120

104
045
116
123
102
040
103
122
122
045
127
123
102
040
103
122
22
045
110
105
131

117
105

040
122
045

117

115
114
103
105
117

045
111
040

115

4 =4 pd 0=t =t bt =t
=t =4 Pt 0=t Pt Pt b=t

)

104
113
117
106
115
124
040
040
124
117

P.AMP

101
105
131
117
105
040
122
000
101
117
131
117
105
040
122

117
040
115
114
103
105
117
000
124
040
115
R
ivs
105
117

P.AMQ:

P.AHR:

JASC
.ASC
.ASC
.ASC
.ASC
.ASC
.RSC
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII

101
122
040
115
114
103
105
117
000
101
125

124
105
123
102
040
103
122
122

P.AMS:

.ASCIIL

106
122

P.ANMT:

062
131
040
103

122

000
101

123
116

040

122
124
104
122
103
103
122
124

000

123

102
040
103
122
122
101
126
123
102

040
124
123
124

123

125
105

000

131

117
105
040
122
000
106

105
131
117

P.AMU:

.ASCII
LASCII
.ASCII
.ASCI1
.ASCII
.ASCI1I
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCIX
LASCII
.ASCII

.ASCII
.ASCII

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

/712 7/
’8vY1/
/€ S/

/ECT/
/70RS/

«00>
< 00>

/78RD/
715K/
/ NO/
/1 F/
/0RM/
/ATY/
/€D 7/
/0R /
/FCY/s
/7 CO/
/RRY/
/PI1E/

/07 <00>

/9A0/

/NE /

/SYM/
/80L~/
/7 €C/
/C E/
/RRO/
/R/<00><00>
J8AT/
/W0 /
/5YM/
/80L/
7 EC/
/C E/
/7RRO/
/R/<00><00>
/8AY/
/HRE/
/€ S/

/Yyrg/
/0L /

/ECC/

/ ER/

/ROR/

<00><00>

/9AF
/
/70UR/
/7 SY/
/7"80/
/L E/

/CC /
/7ERR/

/0R/ <00»
/8AF
/

/7IVE/

/ Svy/
/M80/

1983 10:74:41
1983 10:21:50

SEG 0GR

Page
VAX 11 Bliss 16 v3 555
SPIDERSUSERS
: [DOUCETTE . FALCONICNRQAA
B L

(27

01433¢
014341
014344
014347
014352
014355
014360
014363
014366
014371
014374
014377
014402
014405
014410
014413
014416
014421
014424
014427
014432
014434
014437
014442
014445
014450
014453

014456
014461
014464
014466
014471
Cl4474
014477
014502
014505
014510
014513
014516
014521
014524
014527

014530
014533
014536
014541
014544
014547
014552
014355
014560
014563
014566

014570
014573

014576

1% Dec

PD/RXx EXERCISER
PROTECTION TABLE

NRQAM1
¥01.0

114
103
105

117

045
111
123
102
040

103

122
122
045
105
116
131

117
105

040
122

045
111
124
131

117
105

040
122
045

117
105
101
105
122
122
116
103
106
114

045
116

106
101

040
111

040
117
103
104
045
116
040

040

103

122
122
101

130
131
117
105

040
122
000
101
126
040

115
114
103
105
117

000

101
107

040

115
114
103
105

117

000
101
122
103
102
040
122
040
040

103

111
104

101
111
123
124
122
127
124
120
124
124
000
101
111
110

123

040
115

.AMV:

114
103
105
117

123
105
123
102
040
103
122
122

. AMXe

103
122
124
114
105

117

111

105

040

105
000
125
124
117

AHZ:

127
105

122
105
122

105
105
125
124
101

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

.ASCII

000

105
110
123
102
040
103
122
122

1983

10:24:4}

15 Dec 1983 10:21:50

105

040
122
000

.AIA;

.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCTI
.ASCII
.ASCII
.ASCII
.ASCII

.ASCIX
.ASCIX
.ASCII
.ASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/L E/
/CC 7
/ERR/

/0R/<00>
/8RS
/
/71X /

/SYM/
/80L/
/7 EC/

/C €/

/RRO/
/R/<00>»<00>
7/
/8AS
/EVE/
/N S/
/YM8/
/00 7/

/7€CC/
/7 ER/
/ROR/

<00><00»

/8AE/
/71GH/
/T S/
/YMB/
/0L 7/

/7€CC/

/7 ER/
/R0R/

<«00><00»

/98AC/
/0RR/
/ECT/
/
/7ABL
/€ E/
/RRO/
/R 1/
/N E/
/CC 7
/FIE/

/LD/7<00>
<00»

/8AY/
/NIT/
/7 S0/
/FTu/
/ARE/
/ W/
/1TE/
/7 PR/
/70TE/
/7CTE/
/707<00>

/8AY/
/NIT/
/ HA/

VAX

11 Blies

16 Vv3-555

SEQ OOP/

SPIDERSUSERS: {DOUCETTE, TALCONICNRGAA BLI 33

|/
1% Dec
15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRQAM]
vo1.C
)

014601
014604
014607
014612

014615
014620
014623
014626
014630
014633
014636
014641
014644
014647
0146352
014655
014660
014663
014666
014671
014674
014677
014702
014705
014710
014713
014716
014721
014724
014727
014732
01473S
014736
014741
014744
014747
014752
014755
014760
014763

014766
01477}
014772
0147738
015000
013003
013006
013011
015014
015017
015022
0135025
015030
013033
015036
015041

122
101
040
111

040

117
103

104
045
104

124
116
105
101
122
123
045
104
102
105

117

124
045
117
105
123
116
110
124
105
122
045

104
122

127

124
120
124
124
000
101
104
122

123

122
104
105
000
101
104
131
040

125

000
101
116

130
124
124
117

040

115
131

115
131
101
124
105
117

101
123
115
117
040
122
131
122
122

045

101

117

040

117
101

040

113
116
124

111
124

040
040
124
040
115
040

115
124
122
105
131
130
105
104

117

103
104

000

127
105
122
105
122
105
105

117

P.AIB:

040
101
106
040
104

123

000

117

040

P.AIC:

124
103

116
000
116
055
111
105
040

P.AID:

123
115
117

000

110

124
105
122
120

P.AIE:

111
040
122
000

103
115
104
111

125
117
122
122
114
111
105

103
105

000

P.AIF:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIT
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
LASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASC1I
.ASCII
ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/ROW/

/ARE/
/7 WR/
/71TE/
/ PR/
/0TE/

/CTE/
/D0/7<00>

/%RA0/

/00 7/

/TRA/
/NSF/
/ER /
/ADD/
/RES/
78/7<00><Q0>

/8R0/

/00 7
/8Y1/
/€ C/
70UN/
/17¢00><00>
/8AN/
/ON-/

7€EXY1/

/STE/
/NT 7/
/H0S/
/7T M/
/7EM0/
/RY/<00>
<00»

/78AM/

/70817
/ ME/

/MOR/
/Y P/
/ARY/
/7Y /

/ERR/

/OR/ <00>
<00>

/9AC/
70/

/7AND/
/7 11/
7M0U/
/7 G/
/R R/

/ETR/

/Y L/
7M1/
/7 €/

/XCE/
/EDE/
70/ <00><00>

1983
1983

10:c4:41
10:21:50

SEQ 0UA3
VAX 11 Bliss 16 V3 555
Pege
84
SPIDERSUSERS
: [DOUCE TTE .FALCONICNRQAS .BL1 (33

l)!

15> Dec

RO /RXx EXERCISER
PROTECTION TABLE

NRQAM1
vol.c¢

045
105
101

132
057
123
111
111

122
126
122
040
040

104
122

045
104
105
117
116
116

123
116
111
105
101
104
101

124

103
12?2

045
122
105
117
101
040
115
125
040
123
116
040
040
105
111

117
114
105

045
11?7

101
122
114
105
104
105
101
132
040
105

125
117
125
105

125
101
103
122
122
101

103
123
124
124

116
122
114
101
040
122
124
105
101
111
040
115
116
124
105
124
116
122
120
123

117
123

113
116
115
105

051

101
116

123
111

P.AIG:

111
122
105
122
114
105
117
122
116
122
116
122
116

105

040
122
000
111
117
11
105
040

P.AIN:

P.AII:

124

116
040

124
123
125
125
000
104
126
103

P.AYIJ:

115
104
111
117
040

117
105
117
105
122
105

040

103

120

124

000

103
124

1983

10:24:41

15 Dec 1983 10:21:50

)

015044
015047
013032
015055
015060
013063
015066
013071
015074
013077
015102
013105
015110
013113
015116
013121
015122
013123
01513%0
013.33
013136
015141
013144
015147
013152
013135
015160
015163
015166
013171
015174
013177
013202
015205
015206
013211
0135214
015217
015222
015223
013230
013233
015236
015241
013244
013247
013252
013255
015260
015263
013266
015271
013274
013277
015300
015303

’

P.AIK:

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

/9AS/
/7ERY/
/ALY
/7ZER/

.ASCII
.ASCII
.ASCII
.ASCII

/%AY/
/NCO/
/NS1/
/STE/
/NT /
/INT/
7ERN/
/AL /
/DAY/
/A S/
/TRU/
/CTY/

.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
.ASCI1I
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

<57>/D€/

/SER/
/IAL/
/71ZE/

/R O/
/VER/
/RUN/
/ OR/
/7

UN/

70ER/
/RUN/
<00>

/
/8RE
/0C 7/
/ERR/

/JOR/ <00>

/RE/<00>
<00>

/9%RD/
/R1V/
/€ C/
70MM/
/AND/
/7 11/
/MEQ/
/NI 7
/7(NO/
/ RE/

/7SP0/
/NSE/
/ OR/

/7 SE/

/€K 7/
7INC/
/70MP/
/LET/
/E)7<00>
<00»>

/9AC/
/ONT/

VAX

Blies

Vv3-555

SEO ouse

SPIDERSUSERS: [DOUCETTE .FALCONICNRQAA,;8: (33

RD/Rx EXERCISER
PROTECTION TABLE

NRQAM1
vol1.C

01530¢
013311
015314
015317
015322
015325
013330

015333

015336
015341
015344
013347
015332
013355
015360
015363
015366
015371
015374
015377
015402
0135405
013410
013413
015416
015421
013422
013425
015430
013433
013436
013441
015444
015447
015452
01345S
015460
015463
015466
013471
015474
015477
015302
015504
015307
013512
013515
015520
013323
015526
015531
013532
015335
015340
015543
015546

122
114

124
124
101

115
128
116
122
122
117
114
122
122
045

117

124
116
122
122
115
055
105
045

117

040
101
127

124

12?2
104
104
111
057
124
105
124
116
105
045
122
105
114
113
122

117

045
117
040
103
126

117
105
104
105
105
124
116
111

111
040
040

117
103

040

122

000
101

123
111
040
122
040
111
123
113
101
123

122

104
122
105
105

131
125

116
102
127
116
122
123
122
000
101
111
040

15 Dec
15 Dec

114
122

105
103
104
122
123

123
117
117
120
124
117
105
117

000
120
111

P.AIL:

117
105
117

050
123
105
051

114
124
105
057

P.AINM:

.ASCII
.ASCII
.ASCII

11l
040
101
040
122

.ASCII
.ASCII

107
105
105
040
101
106
123

125

104
126
103
103
104
120
124

P.AIN:

101
123
122
105
105

114
124
105
111
122

P.AIO:

117

040

117

.ASCIL
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII1
.ASCII
.ASCIIL
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1I
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCI1
.ASCII
.ASCII

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

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

/ROL/

/LER/
/ DE/
/1€C/
/TED/
/7 TR/
/ANS/
/MIS/

/S10/

/N Q/
/R P/
/R0T/
70C0Q/
/L E/
/RRO/
/R/<00><00>
/%AP/
7081/
/TI0/
/N E/
/RRO/

/R (/

/MIS/
/-SE/
7€EK)/
<Q0>

/
/98AL
7081/

/ RE/

/AD/<S7>
/WRY/
/1€ 7/
/REA/
/0y 7/
/OUR/
/7ING/

<57>/8t/

/TWE/

/€N /
/TRA/
/
/NSF
/ERS/
<00»<00>

/%AD/
/RIv/
/€ C/
/L0C/
7K D/
/R0OP/
/QUT/
<00»>

/9AL/

7081/
/ RE/
/CE1/
/VER/

1943
1983

10:¢24:41
10:21:50

VAX 11 Bliss 16 V3 555
Page
A4,
SPIDERSUSERS:
{DOUCE 1 TE . F ALCONJCNRQAR BL1 /22

I/
15 Dec
15 Dec

RD /Rx EXERCISER
PROTECTION TABLE

NRQAM1
vol.¢
)

015551
015354
015557
015562

015565
015570
015573
015576

015600
015603
015606
015611
015614
013617

015622
015625
015630
015633
015636
015641
015644

015647
013652
013655
013660
015663
015666
015671
013674
015677
015702
015705
015710
015712
015715
015720
015723
015726
015731
015734
015737
015742
015745
015746
015751
015754
015757
015762
015765
015770
015773
015776
016001
016002
016005
016010

040
101
040
124
105

123

124
123
045
122
105
105
103
104
122
122
045
117
122
114
040
124
124
040
114
040
040

101
040
122
131
122
12?2
045
101
040
144
154
153

156
160
164

045

101
040
162

147
145
162
145

045
101
040

122
104
102
127
116
105

117

000
101
111
040

124
124
040
122
000
101
116

117
105
104
105
105

120

123
117
123
124
120

111
040

122
000
116
040
102
040

105

131
105

105
040

103
122

104
126
104
105
105
105
117
000
103
124
114
122
105
103
104
125
105
122
124
105
101
124
105
045

157
040
162
157
145
116
040

045
174

040

156
141
144

116
040
123

P.ARIQ:

117

174
141
102
143
125
145
162
144

105
157
114

P.AIP:

P.AIR:

P.AIS:

162
162
157
107
145
164
000
045
174
145

.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
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
+ASCII
.ASCII
.ASCIX

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

.ASCII
.ASCII

P.AIT:

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

1983
1983

/7 RE/
/ADY/
/7 BE/

/TWE/

/EN /
/S€C/
/TOR/
/757 <00>

/8AD/
/RIV/
/€ D/
/ETE/

/CTE/

/0 E/
/RRO/
/R/<00><00»>
/9AC/
/0NT/
/ROL/
/LER/
/7 DE/
/TEC/
/TED/
/7 PU/
/LSE/
/7 OR/
/7 St/
/ATE/
/7 PA/
/RIT/
/Y £/
/RRO/

/R/<00>
/4Ns/
/A /<174>
/ Ba/
/¢ 8/
/lo0c¢c/

7k U/

/nre/
/por/
/ted/
<00>»
/9N
/
JA /<1T74>
/7 Er/
/ror/
/ Lo/
/9 G/
/ene/
/ret/

/ed/<00>
<«00>

/
/9N
/A /<174>

/ Se/

10:24:41
10:21:%0

VAX

Bliss

V3 555

SEQ LA,
Page

SPIDERS'USERS
: (DOUCETTE . FALCUNICTHNRIAAL
. BL1

(33

J/
RD/RX EXERCISER
PROTECTION TABLE

NRQ@AM}
v01.C

15 Dec
15 Dec

)

01601%

016016
016021
016024
016027
016032

016034
016037
016042
016045
016050
016053
016056
016061
016064
016067
016072

016074
016077
016102
016105
016110

016113
016116
016121
016124
016127
016132
016135
016140
016143

016146

016151

016152
016155
016160
016163
016166
o16171
016174
016177
016202
016205
016210
016213
016216
016221
016224
016226
016231
016234
016237
016242
016245
016250
016253

162

165
105
145

151

045
101
105
142
040
164
164

156

145
141
163
045
101
105
142
040
163
154
156
165
105
157
114
040
163
147
045
101
105
142

150
040
163
040
162
040
147
145
141
163
045
101
105
142
040
151
110
164

151
163
170
160
157
000
116
174
156

154

101
145
151
040
163
147

000
116
174

156
154
115
143
154
145
163

162
162

157
115
163
145
116
174

156
154
117
145
110
164
105
157

114
040

163
147
000

116
174

156
154
124
163
157
163

157
040
143
164
156
045
040
141

P.AIU:

.ASCII
.ASCII
.ASCII
.ASCII

145
164
156
157
115
163
145

045
040
141
145

P.AIvV:

141

157
040
162
040

i47
145

141

163
P.ATW:

157
163

162
162
157
115
163
145
045
040
141
145
150
040
163
040

.ASCII
.ASCII
.ASCII
.PSCII
.ASCII

.ASCII

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

151
145

045
040
141
145
164
162

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ARSCI1
.ASCII
.ASCII

P.AIX:

.ASCII
.ASC1I
.ASCII1
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCIY
.ASCII
.ASCII
.ASCI1
.ASCIY
.ASCII

/rio/
/us /

/Exc/
/ept/

Zion/
«<00><00>
/9Ns/
/R/7<178>7
/Ena/
/ble/
/ At/
/ten/
/tio/
/n M/
/e88/
/ege/
/7e/<00>

/8N
/

/AR/<1T84>7
/Ene/

/ble/

/ Mi/
/ece/
/1le/
/neo/
Jus /
/Eerr/
/or /
/Log/
/ Me/
/e88/
/ges/

<83>

79N/

IA/7<1T4>7
/Ena/

/ble/

/7 0t/
/her/
/

Mo/

/eote/
/7 Er/
/ror/
/7 Lo/
/g M/

‘gee/

.ASCII

/ege/

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

/8N/
/A/7<174>/
/Ene/
/ble/
/ Thv
/ie /
/Hos/

ASCII

/8/<00>

/te

1983
1983

10:24:41
10:21:50

SEQ Qa7
VAX 11 Blies-16 V3-555
Pege
88
SPIDERSUSERS: (DOUCETTE .FALCONICNRQAA .BL1 (33

RD/RX EXERCISER
PROTECTION TABLE

NRGAM1
vol.C
)

01625¢
016261
016264
016267
016272

016275
016300
016302
016305
016310
016313
016316
016321
016324
016327
016332
016335
016340
016343
016346
016351
016354

016357
016360
016363
016366
016371
016374

016377
016400
016403
016406
016411
016414
016417
016422
016425
016430

016433
016436
016441
016444
016447
016452
016454
016457
016462
016465
016470
016473
016476
016501
016502
016505
016510
016513

105
157
114
040
163
147

045
101
103
164
154

156
151
145
102

040

157
040
154
156

162
162
157

162
040

145
000
116

163

115
163

174

157
162
154

040

151

141
144
141

102

143
122
143
164

147

P.ARIY:

144

154
153
160
155

000
P.AIZ:

045
101
123

116
174
150

045
040

045
101
065
040
164
123
164

116
174
C67
102
145
145
157
000
116
174

045
040
066
171
040
143
162
000
045
040
155
162
122
144

P.AJUA:

045
040

P.AJC:

144
151

163

045
101

103
160
145
145
163
045
101

103
160

145

157
156

157

141
040
141
000
116

174
157
141

162
145

040
151
163

045
101
103

116
174
157

164

162

141

167
147

P.AJB:

155
162
127
164

045
040
156
157

{

15 Dec
15 Dec

145
141

045
040
156
157
145
111
164
164
040

]

P.AJD:

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

/Err/
/or /
/Log/
/ Me/

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

/lles

.ASCII
.ASCII
.ASCII

/ssa/

/Qes/
<
»>< 00>

/%NS
/
/R/<174>/
/Con/

/tro/

/r 1/
/nit/
/iet/
/ed

/Bed/
/7 Bl/

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

/o0¢ck/
/7 Rp/
/lem/
/nt/<00>

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

IR/<LT8>/
/Com/

.ASCIX

.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCIX

<00>

/uNS/
/R/<174>7
/She/
/dow/
/ing/

<003

/79N

/AR/<\ 74>/
/75767
/7 By/
/te

/Sec/

/tor/

/8/<Q0Q> <00>»
79088/

/pear/

/e R/
/eed/

/78/<00>

/%Nt
/

/AR/7<174>/

/Com/

/per/
/e M/

/rit/
/a8’ <00>
<00>

/9Ns/
/R/<\74>/
/Con/
/tro/

1983
1983

10:24:41
10:21:50

VAX

11 Blies-16 v3 555

SEQ 0088
P

SPIDERGUSERS:(DOUCE!TE.FALCON]CNROAA.;E: 33

01651¢
016521
016524
016527
016532
016535

016540

016543
016546
016551
016554
016557
016560
016563
016560

N16571

016574
016577
016602
016605
016610
016613
016616
016620
016623
016626
016631
016634
016637
016642
016645
016646
016651
016654
016657
016662
016665
016670
016673
016676
016701
016704
016707
016712
016715
016720
016723
016726
016731
016734
016737
016742
016745
016750
016753
016756

15 Dec
15 Dec

RDO/RXx EXERCISER
PROTECTION TABLE

NRQAM1
vol1.C
)

154

162
156

151

145
102
040

157

154

040

151

141
144
141

102

143

040
154

122
143
164

045
101
111

116
174

156

143
166
123

144
040
164

156

045
101
122
157
142

040

144

045
101
123
160
163
103

156

164
145
150

157
123

040

151
000
116
174
145
166
154

115
151

123
160
163
103
150
147
154

116
174
165
162
163
141
151
040
151
040
145
051
116
174
165
162
163
141
151
040
157

051
045

145
000
116

150

147

150
150
160
144
045
101

040
145

163

145
111
164
164
040
144
154
153
160

000
P.AJE:

167
145
125
164

045
040
155
141
145
145
141

P.AJF
:

045
040
160
145
040
143

P.AJG:

156
050
147
163

145
000
045
040
160
145
040
143
156
050
167
160
144
000
045

/1le/

.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1I
.ASC1I
.ASCII
LASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII
LASCII
.ASCIX
.ASCII
.ASCII
.ASC1I
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII

/Bead/

.ASCI1
.ASCII

155

045
040
141
151
040
141

LASCII
.ASCI1
.ASCII

P.AJH:

.ASCII
.ASCII

P.AJI:

.ASCII
.ASCII
.ASCII1
.ASCII

/r 1/
/nit/
/iet/
/

/ed

/ Bl/

/0¢ck/

/ Rp/
/lem/
/nt/<00>
<00»

/798N
/

/A/7¢)T4>/
/Ine/
/cti/

/ve

/She/
/dow/

Se/

/nit/
<«00><00>

/
/79N

/A/<L14>7
/Rewm/

/ove/

/ble/

/ Me/
/din/
<00»

/
/o
/R/<3\T4>7

/7S5up/

/pre/
‘e8 /

/Cac/
Mnin/
/g (/7
mig/
/h o/
/pee/

/7@)/<00>

/9N
/
/R/7<1T74>7

/Sup/

/pre/

/98 /
/Cec/
/hin/
/9
(/7
/low/
/ sp/
/eed/

/73/¢00><00>
/9Ns/

1983
1983

10:24:41
10:21:50

SEQ OURY
VAX 11 Blies-16 v3-555
Page
90
SPIDERSUSERS
: [DOUCETTE .FALCONICNROAA .BL1 (22

0l6761

016764
016767
016772
016775
017000
017003
017006
017011
017014
017016
017021
0170c4
017027
017032
017035
017040
017043
017046
017051
017054
017056

017061
017064
017067
017072
017075
017100
017103
017106
017111
017114
017117
017122
017125
017130
017133
017136
017141
017144
017147
017152
017155
017160
017163
017166
017171
017174
017176
017201
017204
017207
017212
01721S
017220
017223

15 Dec

RO /RX EXERCISER
PROTECTION TABLE

NRQAMY
vol.cC
)

101
127
164
142
153
156
055
154

151

051
045
101

127

164
120
164
164

150

144
162

045
101

127

164
120
164

164
163
164
162
157
166
165
051

045
101

065
040

123
164
163
045
055
125
105
045

055
116
114

040

115
116
123

174
162
145

141
040

157
166
141

154

000
116

174
162
145
162

145

040
141
167
145
000
116

174

162
145
162
145

040
157
167
145
162
157
155
000
116
174
067
102
145
145
157
000
101

040

151

055

143

050
156
157
164
145

040

157

143
050
162
141
051

P.AJ:

050

146
141
040
040

154
145
000
045
040
066
171

040
143
162
000
040

103
123

123
103
123

103
115
104
105

040
111
101
104
117
101
050
122

000
101
040
126
111

P.AJJ:

151

045
040
151
040
157
143

10:24:41

15 Dec 1983 10:21:50

040

045
040

1983

P.AN:

P.AM:;

P.AUN:

.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.RSCII
.ASCII
.ASCII
.ASCI1
.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
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/AR/¢ 74>/
uri/
/te-/

/bec/
/e (/
/non/
/-vo/

/let/
/ile/

/73/<00>

/BN/
/AR/<c174>/
/Wri/
/te /
/Pro/

/tec/

/¢

/har/

/Odwe/

/re)/

<00>»
< 00>

/8Nt
/
/AR7<174>/
/Wr i/
/te /
/Pro/

/tec/

(/7

/e0f/
/twa/

/re
/or

/
/

/vol/
/ume/
/7)/7<00><00>

/78NS
/

/A/¢ 74>/
Ve-3(-Y4

/7 By/

/te /
/Sec/
/tor/
/9/¢00><00>

/%A /
/- S/
/UCC/
/7ESS/

<00><00»

/%A /
/- 1/
/NVA/
/LI0/
/7 CO/
/MMA/
/ND(/
/SER/

VAX

11 Blies 16 v3 555

SEQ 00

SPIDER'USERS:[DOUCEYTE.FALCON)CNRQA#.;E: (33

N/
vol1.C
)

01722¢

017231
017234
017237
017242
017245
017250
017253
017256
017261
017264
017267
017272
017275
017300
017303
017306
017311
017314
017317
017122
017325
017330
017332
017335
017340
017343
017346
017351
017354
017357
017362
017365
017370
017373
017376
017401
017404
017407
017412
017415
017420
017423
017426
017431
017434
017437
017442
017444
017447
017432
01745S
017460
017463
017466
o174a71

15 Dec
15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRQAM1

126
040

156
114
157
156
155
151
151
105
114
120

040
144

045
055

117
105
117
101
1:1
102

045
055
117
105
117
123
124
114
045
05%
122
122
040
124
116
116
116

123

110
122
122
040
040
104
031
045
055

117
040
111
122
120

105
156
111

105
162
157
145
141
146
130
103
122
143
051
101
040
040
107
116
126
114
114
000
101
040
040
107
116
125
101
105
101
040
117
101
116
040
117
040
117
125
040

117

101

117
115
111

000

101
040
101
106
114
105
111

125

122
157
104
040
040
040
144
040
040

055
055
107
155
000

040
116

P.AJO:

122
111
040
101

101
105

040
116
122
111

P.AUP:

.ASCII
.ASCII

040

111
102
000
040
120

P.AJQ:

107
115
117
113
127

040
103
120
107
115
116
105
101
040

114
104
101
125

040
116
124

LASCII
.ASCII
.ASCII1
.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
.ASCII
.ASCI1I

.ASCII
.ASCI1I
.ASCII

P.AJR:

.ASC11
.ASC11

.ASCII
.ASCI1I
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/VER/
/ no/
/n1D/
/LE /
/or /
/no /
/med/

/ia

/i
F
/EX

/
7/
/

/LC 7/
/PRG/
/

cm/

/7d)7<00>

/%A /
/- N/
/70 R/
/EGI/

/0N /

/AVA/
/ILA/
/8LE/
<0D><00>

/8RA /
/- N/
/0 R/
/EGL/

/0N 7/
/SV1/
/TAB/
/LE/<00>
/oA /
/- P/
/R0OG/
/RAM/
/ NO/
/T K/
/NOM/
/N (/

/NO /
/SUC/
/H P/
/ROG/
/RAM/
/ ON/
/ ME/
/DIA/
/7)/<00>

/%A

/0AD/
/7 FA/
7ILy/

/RE 7/
/7CIN/
/PUT/

1983
1983

10:24:41)
10:21:50

S£0 oG,

VAX 11 Bl.es 16 v3 555
Page
SPIDERSUSERS: (DOUCETTE.F ALCONICNRQAA .BLL

(2%3

]

105
117
127
114
114
104
10?7
12¢
122
031

01’44

017%0¢2
017505
017910
017918
017916
0173523
017924
017%/
017982
01793%
017340
017543
017546
017524
0173%4
017%%7
017%¢2
017363

017714

017717
017722
01772%
0177%0
017733
017734

7
AR

/7 L0/
/AD1/
/NG /
/PRQ/
/GRA/

P.AJS:

118

111
103
116
040

155
101

103
164
156
114
141
115
151

045

116
101
116
120
0356
000
116
174
136
123
166
040
040
124

148

116
174

157
141

/7 NO/
A4

/PEC/

/7IFY/
/ED 7
/FOR/
/7 ST/
/
/AND
/7 AL/
/70NE
/
/7 PR/
7G. )/

122

124

114
105
122
051
045
040
145
145
145

<00><00>

P.AJT:

116

0o4s

’t

Yivs

/me/ <00»

P.AN:

136
151

040
143
040

/rve/
‘r o/

151
045
040

/
/74N
IR/« T4>7

/0ne/
/ Se/

141
141

163
157
154
145
141

/M)/<00>»
/8A /
/- S/

7TAN/
/DAL
/
/0ONE
7
/7 (S/
/TAN/
/0AL
/
/7
/0NE
/7 M0/
/01IF/
/IER/

116
050
101
101
116

123

/ILE/

101

105
106
104
117

ER/

/ROR/

101
040
101

017870

017373
017376
017601
017604
017607
017612
017615
017620
017623
017626
017631
017634
017637
017642
017644
017647
0176%2
017653
017660
017663
017666
017671
017674
017677
017700
017708
017706
0177111

[N RAx EXERCISER
PRCTIECTION TABLE

vol.¢<

<00»
/%N
/
/A/<1 14>/

/Con/
/tei/
/ne

/Loc/

/el /
/Med/
/7i8/<00>

144

<«00>

P.AUV:

/
/4N

4%
‘s

10:024:41
10:21:50

VAXY 11 B8] ee 16 ¢8 L4°
SPIDERS JGERS: (ODUCE ' "8 ¢ »

C#
RD /'RAx EXERCISER
PROTECTION TABLE

NRQAM]
vOl1.¢

1% Dec
15 Dec

)

01°7%°
017742

101
105

01774%

143

017750
017758
01775
017761
017764
017767

145
157
154
162

017772

017778
020000
020003
020006
020010
020013
020016
020021
020024
020027
020032
020035

020040
020043
020046
020050
020053

020056
020061
020064
020067
020072
020075
020076
020101
020104
020107
020112
020115
020120
020122
020125
020130
020133
020136
020141

020144
020147
020152
020155

020160
020163
020166
020171
020172
020175

143
040

040

123
120
124

045
101
103
162
164

040
040
164
145

164

145

101
123

156
154

174

170
165

040

145
164

040

114

040

120

143

141

147
155
151
125
125
117

040
144
163
116
120
122

116
174
165
145
154
151
101
151
040
141

045
040
162
156
171
156
143
166
123
164

P.AJW:

116
174
164
144
157

045
040
141
141
156

P. AJX:

105
000

000

104

145
162

040

147

000

045
101
116

116
174
145
163
166
154

045
040
145
040
145
141

P.AJY:

045

P. AJZ:

144

157

162
171
045
101
116
144
127
164
142
057
141
142
040
145
141
045
101

000
116

174
145

163
162
145
154
122
144
154

117
162

120

040
145

040
151
141
145
145
141
145

166
154

171

000

116

045

174

040

. AKA

LASCLI
.ASCIL
LASCIT
.ASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCLI
.ASCII
LASCII
.ASCII
.ASCII

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

/A7<)\ 74>/
/tw@/

/cut/
/¢

/0ce/

/71

/rg

/¢cmd/
/ is/

/ UN/
/SUP/
/POR/
/TED/

<00><00»

/9Ns/

/A/7<\T4&>7
/Cur/
/ren/

/ Ac/
/tiv/
/e S/
/tet/
/@¢/<00>

/
/9N
JR/7<\ 14>/
/nda/

/lon/
/e P/
/rg/<«00>

/4Ns/

.ASCII

/
/6N

.ASCII
.ASCII
.ASCII
.ASCII

/Ste/

.ASCII

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

/tly/
/ in/

/A/<L T8>/
/Nee/
/08 /

ASCII
.ASCII
.ASCII

/ove/
/rle/
/y/<00>

/A/<) 74>/

/Nee/
/de /
/uri/

/ten/

/bie/

<57>/Re/

/8de/

/ble/

/7 Ov/
/erl/

/7ay/<00>

<0d>

/9N
/
/R/7¢178>7

19838
198%

10:/04:41
10:21:50

S(O QU3

VAX |] Bliss 16 ¢3 %359
YPIDERS JSERS: [DOUCETTE, 'flLCON]CNlOAA

(3%

(3.
15 Dec
15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRQAM]
vol.C
)

02020¢
020203
020206
020211
020214
020217
020222
020225
020230
020233
020236
020241
020242
020245
020250
020253
020236
020261
020264
020267
020272
020275
020300
020303
020306
020311

020314
020316
020321

020324
020327
020332
020335
020340
020342
020345
020350
020353
020356
020361
020364
020366
020371
020374
020377
020402
020405
020410
020412
020415
020420
020423
020426

020431
020432
020435

125
163
164
104
040
141
147
122
0s7
116
122

163
040
144
165
104
154
073

145
123
040
160
151
157
040

104
105

057
103

045
101
032
125
124
116
045
101
052
105
125
040
105
111

116
011

045
052

105
111

123
117

045
101
052
116
122

124
116
045
101
052
105
111
124
116
045
101
101

114
122
122

105
123

040

000
116
011
040
106
114
121

123
117

000
116
o11
040
106
115
111
000
116

1291

040

122

116
111
000
116
011
040
124
040

122

000

103
105

LAKB:

121

000
045
052
104
101
124
125

AKC:

.ASCII
.ASCII
.ASCII

.AXD:

1991
117

101
117

045

052

.ASCII
.ASCII
.ASCII

.ASCII

124
116

045
052

JASCII
LASCI1
.ASCI1
.ASCII
.ASCII
JASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

.AKE-

124

115

101
117

043
052
106
101
105
117

LAKF

045
101
052
120
111

116
011
040
105
101

043
052

LAXG:

045
101

116
040

045
055

JAKH:

123
103
114

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
JASCII
LASCII
.ASCII
.ASCI1
.ASCII
.ASCIX
.ASCII
.ASCII

.ASCII
LASCII
.ASCII
.ASCII

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

/Use/

/e
/td

/
/Dup/

Di/

/alo/
/91

/REC/
<S57»/SE/
/ND/ <S>

/REC/
<«00>

/
/79N
/AR/7¢l1>76/
/¢ Q/
7\ES/
7110/
/N/<Q0><00>

/
/79N
/A/7¢)1>7e/
/¢ D/
/EFN/
/Y7
/7 U/
/7€ST/

7ION/

<00><00>

/78NS
/
IAN/¢e))>/8/
/¢ I/

/NFO/
/RMA/
/71107
/N/ <00>
/
/74Ns
Vi Y3 S R YZ Y4
7e Y/

/ERM/
/7INA/
7110/

/N/<00>
79N/
JA/<1>/8/
/6 F/

/ATA/
7L €/

/RRQ/
/R/<00>
/dN%/

/A/<l1>/8/

/¢ S/
/PEC/
/7IAL/
<00>

/7uNs/

1983
1983

10:¢24:41
10:21:50

SEQ 004
V
VAX 11 Bliss 16 v3 55%
Page
SPIDERSUSERS: [DOUCE TTE.FALCON JICNRQARA 8L1 (33

020440
020443
020446
020451
020454
020457
020462
020465
020466

02047}
020474

020477
020502
020505
020510
020513
020516

020524
020527
020532
020535
020540
020543
020546
020550
020553
020556
020561
020564
020567
020572
020574
020577
020602
020610
020613
020616
020621
02064
020627
020630
020633
020636
020641
020644
020647
020652
020655
020660
020663
020664
020667
020672
020675

15 Dec
15 Dec

RD/RX EXERCISER
PRCTECTION TABLE

NRGAM1
gOl.C

040
114
101

125
124
125
105

045
101
040
114
101
120
123
101

117
122
101
126
102
103
116
102

045
101
040
126
105
122
122
045
101
040
122
114
107
040
123
107

111
105
114
116

114
107
040
111

115
122

102
000

116
040

045
055

105
114
110
111
114

107
040
131
103
040

040

111

122
105
124
105
114
113
125
105
000
116
040
104
111
040
122
000
116
040
132
117
105
110
115
123
105

7 IL/
/LEG/
/AL /

/UNI1/
/7

116

P.AKI:

114

040
114
111
040
117
040
115
122

045
Q55
105
103
105
117

P.AKY:

045

P.AKK:

055
105

040
116
124
105
101
000

045
101
055
123
111
116
122

045
055
101
111
111
117
101
117
000

P.AKL
:

124
116

116
040
040
103
040
106
115
111
040

045
101
055
117

116
040
040
116

045
055
116
055

P.AKM:

.ASCII
.ASCII

/ER/<00>

LASCII

/HNe/
/A -/

.ASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.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

7UMB/
<«QO»

7 I/
/LEG/
/AL

/PHY/
/SI1C/
/AL /
7/0R /
/REL/
/ATL/
/VE /
/8L0/
/¢ /7
7N/

/BER/

<00><00>

/
/9N
/A -/
/7 DE/
/NIC/

/€ €/
/RRO/
/R/<00>»
/7¥NS/

/R -/
/7 ZE/
/R0 /
/LEN/
/GHY/
/7 "/
7SSA/

/GE/<Q0>

<Q0»

/
/8Nt

/A
/-

/SCl/
/1 1/

/NFQ/
/RMA/
7110/
/N /<00>
<00>

/9N
/

/AR -/
/- N/
/ON-/

1983
1983

10:24:41
10:21:50

0Ly,

Page
VAX 11 Blise-16 v3-555
¥,
SPIDER$USERS
: (DOUCETTE ,FALCONICNROAA BIL L (27

[ o2

020700
020703
020706
020711
020714
020717
020722
020725
020730
020733
020736
020741
020744
020747
020752
020755
V20756
020761
220764
020767
020772
020775
021000
021003
021006
021011
021014
021017
021022
021025
021030
021033
021036
021041
021044
021046
021051
021054
021057
021062
021065

021070
021073
021076
021101
021104
021107
021112
021115
021116
021121
021124

021127
021132
021135

021140

15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRQAM1
gOl.O

101
111
111

117
101

117

045
101

055
105
111
124
116
105
101
045
101
055

125
105
057
111
122

103
105

045

101

055

105

040
116

131
101

045
101
035
105
040
111
116
102

105
124
105
102

045
101
055

105

040
111
116

103

123

111
116
122
124
116
116
040
040
122
116
111
040

040

116
040
040
103

045
055

106
114
105
i17
000
116
040
040
116
102
101
040
124
000
116
040
040
116
125
124
125
105
040
114
111
040
116

101

123
107

123

116
040
040
116
125

124
125

15 Dec

106
115
111
000
045
055
124
115
101
117
115
123
105

P.AKN:

P.AKO:

123
103
123
125

040
104
000
045

055
123

P.AKP:

104
111
122
104
101

045
055

123
104
116

040
115

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

P.AKQ:

123
104
116
040
115
122
122
101
126
104
000
045
055

.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
.ASTII
.ASCII

P.AKR:

.ASCII
.ASCII
.ASCIX
.ASCIX
.ASCII
.ASCII
ASCII
ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII

/ACS/
711 /
7 INF
/
/0RM/
/AT1/
/ON/<00>
/9Ns/
/A -/
/- 1/
/ERM/
/INA/
/7110/
/N M/
/ESS/
/7AGE
/
<00>

/9N%/
/A -/
/- S/

7UCC/

/ESS/

<ST>/FA/

7ILY/
/RE /
/7C0D/

/E/<00><00>

/
/8N
/A -/

/- S/
7END/
/7 81/
/NAR/
7Y O/
7ATA/

<00>»<00>

/5Nt
/
/A -/

/- S/

7END/
/7 UN/
/17 7
/NUM/
/BER/
/. R/
7ELA/

7TIV/
/7€ D/
78N/ <00>
<00>

/9Nst/
/A -/
/- S/
/END/
/7 UN/
71V 7
/NUM/

1983
1983

10:24:41

10:21:50

VAX

11 Blise-16 V3-5%55

SEO 006

SPIDERSUSERS: (DOUCETTE, FALCONICNIOAA

1 (33

021141
021146

021151

021154
021157
oe1162

021165
021170
021173
021176
021201
021204
021207
021212
021215
021220
021223
021226
021231
021234
021237
021242
021245
021250
021253
021256
021261
021264
021267
021272
021275
021300
021303
021306
021311
021314
021317
021322
021325
021330
021333
021336
021341
021344
021346
021351
021354

021357
021362
021365
021370
021373
021374

021377

021402

021405

15 Dec 1983
15 Dec 1983

RD/RX EXERCISER
PROTECTION TABLE

NRQAM1
gOl.O

102
054

105
124
105
102
040
111
040
124
122
045
101
055

105

040
111

116
102
054
110
111
114

114
113
123
105

045

101
055
105

040
11!
116
102
054

117
103

040

114
113
125
105

045

117
122
114

040
115
125

045
116
114
105

105

040

114
111
040
116
127
124
120
124
116
116
040
040
116
125

124
125
105

040

131
103

040

117
040
115
122
116
040
040
116
125
124
125
105
040
107
101
040
117
040
115
122
000
101
116

117
105
124
105
124
101
126

117
057

122
122
101
126
104
054
122
105
101
105

000
045
055

123
104
116
040
115
122
120
123
101
102
103
116
102
000
045

055
123

P.AKS:

P.AKT:

104
116
040
115
122
114
111
114
102
103
116
102
040

103
124
114
122
111
117
000

P.AKY:

105
105
120
120

P.AKW:

.ASCI1
.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
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASC1I
.ASCII

.ASCII
.ASCII
.ASCII
.ASCI1
.ASC1I
.ASCII

/BER/
/., R/
7ELA/
/T1IV/
/E O/
/8N,
7/

/ WR/

/ITE/
/ PR/
/T1TE/
/RN/<00>
/9N
/
/A -/
/- S/
/7END/
/7 UN/
/1T 7
/NU/

/BER/
/, P/
/HYS/
7ICA/
/L B/
/L0C/
/K N/
708/
/ER/<00>»
/9N
/
/A -/
/- S/
/END/
/7 UN/
/7IV 7/
7N/

/BER/
/7, L/
7061/
/CAL/
/7
B8/

/L0C/
/K N/

/UMB/
/ER /

<00>
< 00>

/8AC/
/ONY/
/R0OL/
/LER/
/7 11/
/MEQ/
/UT/7<00>
<00>

/9%AE/
/NVE/
/L0P/
/E/<ST>/P/

10:¢24:41
10:21:50

VAX

Bliss

V3 S5%5

<FQ OOQI

SPIDERSUSERS: (DOUCE”TE, FALCON]CNRQA# BLI

=
15 Dec 1983

RD/RX EXERCISER
PROTECTION TABLE

NRQAML
vOol.¢C

15 Dec

)

021410

021413
021416
021421
021424
021427
021432
021435
021440
021443
021446
021451
021454
021456
021461
021464
021467
021472
021475
021500
021503
021306
021511
021514

021517
021522

021525
021530

021533

021336
021540
021543
021346
021551
021554
021557
021562

021565
021570
021573
021576
021601
021604
021606

021611

021614
021617
021622
021625

021630

021633
021636
021641
021644
021647
02165¢

101
105
122
104
122
122

120

111
040
040
115

125

045
116

114
105
101
105
127
124
105
117
050
122
131
122
111

117

051
045
117
122
114
040
115
116
122
040
122
131
122
122
045
117
122
114
040
115
101
124
105

117
045
117

122

103
124
105

040

122

040
101
124

117
124
105
124

000

101
126

117
057
103
124
122
105
122
122
120
111

040
040

115
125
000
101
116

117

105
122
040
104
101
120
111
040
122
000
101
116
117
105
122
040
122
131
122
122
101
116
117

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.RSCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

113

040

101
105
117
050
122
131
122
111
117
051

105
105
120
120
113
040
111
040
122
040
101

124

117
124

105

124

103
124
114
122
117

. AKY¢

101
040

1135
101
124
105
117
103
124
114
122
101
120

111
040
122
000

103
124
114

P AKZ

P. ALA:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASC1I
.ASC1I
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
LASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII1
.ASCII
.ASCII
.ASCI1
.ASCI1
.ASCII
.ASCI1
.ASCII
.ASCI1

/ACK/
el /
/REA/

/0 €/
/RRO/

/R (/
/PAR/
/ITv/
/ OR/
/7 11/
/MEQ/
") pY4
<00><00>

/9AE
/7
/NVE/
/LOP/
/E/<S5T>/P/

/ACK/
/ET 7/
/WRI/
/TE 7
/ERR/

/0R /

/7(PA/

/RIT/
/Y Qv
/R T/
/IME/

/0UT/

/73/7<¢00>

/8AC/
/0NT/
/ROL/
JLER/
/ RO/

M A/

/NOD /
/RAM/
/7 PA/

/RIT/
/Y E/
/RRO/
/R/<00>

/8AC/

70NY/
/ROL/
/LER/
/ RA/
/M P/

/ARY/
/1Y 7/

7ERR/
/0R/<00>
/9AC/
/0NT/

/ROL/

1983

10:c4:41

10:21:50

SEQ OU'
VAX 11 Blies-16 v3-555
Pege
99
SPIDERSUSERS: (DOUCETTE. F ALCONICNRQAA .Ll (33

| o
15 Dec
15 Dec

RD/Rx EXERCISER
PROTECTION TABLE

NRQAM}
vO0l.C
)

02165%

021660
021663

021666
021671
021674
021677

021702
021705
021710
021713

021716

021721
021724
021727
021732
021735
021740
021743
021746
021730
021753
021756
021761
021764
021767
021772
021775
022000
022003

022006
022011
022014
022017
022020
022023
022026
022031
022034
022037
022042
022045
022050
022052
022055
022060
022063
022066
022071
022074
022077
022102
022105
022110
022113
022116

114
040

115
101
124
105
117
045
111
040
101
105

117

122
131
122
111

117

051
045
111
040
111
040
122
040
101
124
117
124
105
124
111
105
125
040
123
122
101
125
045

117

040

103
123
111
117

040
111

105
114
120

105
122
040
122
131
122
122
101
116
122
104
122
122
120
111
040
040
115
125
000

101
116
127
124
105
117
050
122

131

122
111

117

051

116
122
120
115
124
040
111
122
000
101
123
101
105
040
115
125
050
107
122
105
114
122

122

117
120

111
040
122
000
122

107
105

P.ALB:

040
122
040
101

124
117
124
105
124

122
107
122
105
122
122
120
111
040
040
115
125
000

124
122
124
101

P.ALC:

P.ALD:

105
106
114
105
110
124

103
123

124
105
124
110
110
040
126
040
117

P.ALE:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1I
.ASCII
.ASCTI
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCI11
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII1
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/LER/
/ RO/
/M P/
/ARI/
/7Yy 7
/ERR/
/0R/ <00>»

/9AR/
7 ING/
/ RE/
/RD /
/ERR/
/0R /

/(PA/
/R1IT/
Y O/
/R T/
/7IME/
/0UT/

/7Y/¢00>

/8AR/
7 ING/
/7 WR/
/ITE/
/7 ER/
/ROR/
/7 (P/
/ARY/
/7Y /
/0R /7
/TIM/
7EQ0V/
/1)7¢00>
<00>

/INT/
/7ERR/
7UPY/
/7 A/
/STE/
/R F/
/AIL/

/URE/

<00> <00»>

/8AH/
708t/
/7 ARC/
/7CES/
/8 1/
/7IME/
70Ut/
/7 (M/
71GMH/
/ER /
/LEV/
/EL 7/
/PRO/

1983
1983

10:¢24:41
10:21:50

SEQ 0679
VAX 11 Bliss 16 V3 555
Page 100
SPIDERSUSERS
: (DOUCE TTE .FALCONICNRQAA .BL1 (33

Je?
15 Dec
15 Dec

RD/RX EXERCISER
PROTECTION TABLE

NRGAM1
vO0l.¢0
)

022121
022124
022127
022132

022135
022140

022142

022145
022150
022153
022156
022161
022164
022167
022172
022175
022200
022203
022206
022211
022214
022217
022220
022223
022226
022231
022234
022237
022242

022245
022250
022252
022255
022260
022263
022266
022271
022274
022277
022302
022305
022306
022311
022314
022317

022322
022325
022330
022333
022336
022341
022344
022347
022352
022355
022360

124

117

104
105

105

051
045

122
111
114
111

105
105
105
045
055

123

101

i0S
105
117

045

117

122
114

124
040
122

045
1156
122
124
116

117

040
115

125

045

114
107

040

122
101
103
103
124
104
045
116

122
120
126

117
114
105

116

116
000
101
105
124
111
124
130
105
104
101
102
040
123
122
122
122
101
116

117
105
106
101
105
117

000
101

103

040

120
104
124

103
104
040
115
040
103
104
000
121
125

040
122
000

103
124
114
122
101
114
122
122
111
124
103

117
124
105
124

120
111
117
000

101
114
101
126

111

124
114

111
125
040
000
101
124
122
124
105

ALG:

115
124

123
125

111
040

.ALF
:

ALY

.ASCII

117
114

105
114

.ASCII
.ASCII

ALY

111

125
040
122
111
111
000
111

105
125

040

103

.ASCII
.ASCII
LASCII
.ASCI1
.ASCII
.ASCII
.ASCII1
.ASCII
LASCII
LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

LALK:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII

/710C/
/0L 7/
/7DEP/

/END/

Z7ENT/
7)/<00>
/9AC/
/RED/

/17

/LIM/

/1T 7/
7EXC/
/EED/
/7ED/ <Q0O>
/8AQ/
/-8U/
/8 M/
/AST/
/ER /
/ERR/
/0R/<00>
<Q0>

/78AC/
/ONT/
/ROL/
/LER/
/7 FA/
/TAL/
/7 ER/

/ROR/

<00><00>

/8AY/
/NST/
/RUC/
/77107
/N L/

/700P/
/7 1Y/
/MEQ/
7UT7<Q00>
<00>

/%AY/
/LLE/
/GAL/
/7 V1/
/RTY/
/AL /
/CIR/
/Culs
/1 %/

/707 <00><00>

/9AYL/
/NIE/
/RRU/
/PT /
/VEC/

1983
1983

10:24:41
10:21:50

SEQ 0100
VAX 11 Blies-16 v3-555
Page 101
SPIDERS$USERS: (DOUCE
TTE . FALCONICNRQAA BLI (33

2
15-Dec
15 Dec

RD/RXx EXERCISER
PROTECTION TABLE

NRQAM1
vol1.C
)

02236%
022366
022371
022374
022377
022400
022403
022406
022411
022414
022417

022422

022425
0224 30
022433
022436
022441
022444
022447

022452
022455

022460
022463
022464
022467
022472
022475
022500

022503

022506
022511
022514
02251/
022522
022525
022530
022533
022536
022541
022544
022547
022550
022553
022556
022561
022564
022567
022572
022375
022600
022603
022606
022611
022614
022617
022622

124

040
114

101

045
101
124
101

105
105
057
111

040
126
111

122

111
040

105
111

105

117
111
105

122
114
107
000

101
111
105
116
040
101

115
116

114

127
124
111
101

104
105
117
11
116
106
122

114

040

107
116
104
124
111
000

040

103
124
114
122
101
105
117
050

120
111
051
101
111
123

124
000
111
124
105

117
105

122
114
040
115
122
122
116
055
122
131
045
116

116

P.ALN:

122
114

117

103
122
104
122
105

P.ALM:

101
i11
105
116
040
111
040
101
124
116
055
101
102

045

116

115
116
116
103
127
124
114
104
117
117
114
104
114
103
124
114
122

045
101
124
101
105
122
105
11?7
040
040
116
117
101
105

117

P.ALL:

040
116

101
116
117
105
122

040

122

117

LASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ARSCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1I
.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

116
101

P.ALO:

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

/TOR/
/7 IL/
/LEG/
/AL
/7 <00>
«00»>

/8AM/
/AIN/
/TEN/
/ANC/
/€ R/
/EAD/

<S7>/WR/

/1TE/
/7 IN/
/VAL/
710 7/
/REG/
/ION/

/7 10/
ZENT/
/IF1/
/ER/<Q00>
<00>

/8AM/
7RIN/
7TEN/
/
/ANC
/7E M/
/RIT/
/€ L/
/0AD/
/7 10/
/ NO/
/N-L/

/0RD/

/7ABL/

/7€ C/
/ONY/
/ROL/
/LER/
[{s,s}]

/8AC/
/ONY/

/ROL/
/LER/
/ RA/
/TM E/

/RRO/
/R (/
/NON/
/7 -PA/
/RIT/
/Y)/<00>
/8AYL/
/NIT/
/ SE/

1983
1983

10:24:41
10:21:50

SEQ 0101
VAX-11 Blies 16 V3-5S5S
Peage 102
SPIDERSUSERS: (DOUCE
TTE .FALCON JCNRQAA , BLl (33

15 Dec
15 Dec

RD/RXx EXERCISER
PROTECTION TABLE

NRQAM1
vol1.C
)

022625
022630
022633
022636
022641
022642
022645
022650
022653
022656
022661
022664
022667
022672
022675
022700
022703
022706
022711
022714
022717
022720
022723
022726
022731
022734
022737
022742
022745
022750
222753
022756
022761
022764
022767
022772
022775
023000
023003
023006
023011
023014
023017
023022
023025
023030
023033
023036
023041
023042
023044
023046
023050
023052
023054
023056

121

116
040
122
000

045
111
105
ila
105
120
124

117

111
117
101
102
111
040
122
000
045
125
105

117

040
122
101
040
111
22

045
10t

111
040
107

124

040

101
10€
114
105
120
111
040
040
115
125

000
021346
021374
021456
021540’
021606’
021644
021702°

125
103
105
117

105
105
122
122

101
107
122
105
114
122
117
114
116
115
124
111
124
105

110
110

P.ALP:

040

+26
040

117

117
103
040
103
120
111
114
131
122
122

101
122
057
il4
110
104
122
106
114
105
101
120
116
122
111
105
122
104
101
125
040
101
124
117
124
105
124

120
107
120
114
101
127
105
101
125
000
115
120
107
105
123
122
105
040
111
122
050
122
131
122
111
117
051

P.ALQ:

P.ALR:

P.AKU:

JASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCI1I
.ASCII
.ASCIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASC1I
.ASCII
.ASCI1I
.ASCII
.ASCII
. WORD
. WORD
. WORD
. WORD
. WORD
. WORD
.WORD

/7QUE/
/NCE/
/ ER/

/ROR/
<«00>

/9AM/
71GH/
/ER 7/
/LEV/
7EL /
/PRO/
/10C/
/0L /
/7INC/
70MP/
/ARTY/
/8IL/
/1Tv/
/7 ER/
/ROR/
<00>

/8AP/
/URG/

/E/<ST>/P/

70LL/
/ MA/
/ROM/
/7
/ARE
/ FR/
7ILY/
/RE/<Q0>
/78AM/
/APP/
/7ING/
/7 RE/

7GIS/

/TER/
/ RE/
/RD /
/FAYl/
/LUR/
/€ (7
/PAR/
/ITv/s
/ OR/
/7 11/
/MEQ/
7UT)/
<00>

P.AKY
P.AKW
P. AKX
P.AKY
P.AKZ
P.ALA
P.ALB

1983
1983

10:74:41)
10:21:50

SEQ 0102
VAX 11 Bl.es 16 v3 555
Page 103
SPIDER$USERS
: [DOUCE TTE .FALCONICNROAA .BL1 ( 33

[-1

1% Dec
15 Dec

RD/RXx EXERCISER
PRCTECTION TABLE

NRQAM:
vol.¢
)

023072
023074
023076
023100
023102
023104
023106
023110
023112
023114
023116
023120
023123
023126
023131
023134
023137
023142
023145
023150
023153

023156
023161
023164
023167
023172

023175
023200

023203
023206
023211
023214
023217
023222
023225
023230
023233
023236
023241
023244
023247
023252
023255
023260
023263
023266
023271
023274
023277
023302
021305

021750
022020
022052
022142
022172
022220°
022252
022306
022344
022400
022464

022550°
022614
022642
022720°
022756
045
061
103
040
111
122
045

117

120

111

040
115
122
122
045
124
105
101

111
040
111
122
055
061
101
122

123
105
123
122
045
124
105
101
111
040
111
122
055
055

124
040
125
101
125

P.ALT:

116
055
122

P.ALU:

101
101
040
103
116
106
114
105
040
061
104
105
040
107
124

123
124
115
110
105
101
125
040
124
040
104
123
122
111

P.ALV:

101
101
040
103
116
106

123
124
115
110
105
101
125

P.ALM:

101
061
120

114
105
101
116
i01
124

122
040
122

114
105
040
102

131
101
105
117

105

040
121

125

. WORD
. WORD
.WORD
.WORD
. WORD
. WORD
. WORD
.WORD
. WORD
.WORD
.WORD
. WORD
.WORD
. WORD
. WORD
.WORD
.ASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
.ASCTI
.ASCII
.ASCII
.ASCI1
.ASCII
.ASC1I
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCIX
.ASCII
.ASCII
LASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

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

.ALC
.ALD
.ALE
.ALF
.ALG
ALH
LALT
ALY
ALK
JALL
.ALM
.ALN
JALO
.ALP
LALG
JALR

'U‘DVU‘D’OV‘UVV'U‘O‘OV'D‘J

023060
023062
023064
023066
C2307C

IIAT/
/711

/7CPY/
/7 FA/
/ILu/
/RE/<Q0>
/8AN/
/ON-/
/PAR/
/1Tvy/
/ RA/
M &/
/RRO/
/R/ <00><00>
/BAS/
/TAT/
/E M/
/ACH/
/INE/
/ FA/
/ILY/
/RE /
/- 17
/711 7/
/ADD/
/RES/
/S R/
7EGY/
/STE/
/R/<00> 00>
/
/8RS
/TAT/
/€ M/
/ACH/
7INE/
/ FR/
/7ILV/
/RE /
/- Q/

/-8U/

1983
1983

10:24:41
10:21:50

SEQ 0105
Page 104
SPIDERS$USERS: [DOUCE
T TE . FALCONJCNRQAA. BLI (33

VAX

11 Bl ss

v3-555

N#&
RD/RX EXERCISER
PROTECTION TABLE

NRQAM1
XOI.C

023310
023313
023316
023321
023324
023327
023332
0c 3334
023337
023342
023345
023350
023353
023356
023361
023364
023367
023372
023375
023400
023403
023404
023407
023412
023415
023420
023423
023426
023431
0234 34
023437
023442
023445
023450
023453
023456
023461
023464
023467
023472
023475
023500
023503
023506
023511
023514
023517
0233522
023525
023530
023533
023536
023541
023544
023547
023552

123
104
105
040
107
124

045
124
105
101

111
040
111
122

055
122
122
111

105
045
124
105
101
111
040
111
122
055
105
101
132
057
123
111
111
122

105
123
122
045
124
105
101
111

040
111

122
055
122
107
101

127
105
105

040
104

123
122
111
105

000
101
101
040

103
116
106
114
105

040

103
105
123
122

101
101
040
103
116
106

114
105

040
122
114

105
104
105
101
132
040
107
124
000
101
101

040

103

116
106

114
105

040

117

040

122
101
040
122

15 Dec
15 Dec

101
122
123
105
1¢3
122

123
124
115
110
105
101
125
040
103
040
107
124
000

P.ALX:

123
124
115
110
105
101
125
040
123
111

P.ALY:

111
122

105
122
114
105
122
111

105

000
123
124
115
110
105
101

125

040

127

116
110
104
122
126
123

P.ALZ:

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.RSCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
LASCII
.ASCI1I
.ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII
.ASCI1
.ASCII
.ASCIX
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCI1
.ASCII
.ASCII
.ASCII
.ASCIIX
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

/5 A/
/00R/
/ESS/
/7 RE/
/GIS/
/TER/

<00><00»>

/9%AS/

/TAT/
/€

/ACH/
/INE/
/ FA/
7ILY/
/RE 7/

/RC /
/REG/
7187/
/ER/<00>
<00>

/wRS/

/TAT/
/€ M/
/ACH/
/INE/
/

FA/

7ILY/
/RE /
/-

/7ERY/
/A_Y1/
/7ZER/

<S7>/DE/

/SER/
/IAL/
/12E/
/R R/

7EGY/

/5TE/
/R/<00><00>
/8AS/
/TAT/
/€ M/
/ACH/
/INE/
/7 FA/
7L/
/RE 7
/-

/RON/
/G H/

/ARD/
/WAR/
/E v/
/ERS/

1983
1983

10:24:41
10:21:50

SEQ 0I04
VAX-11 Blies 16 Vv3 S55
Page 10%
SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAR .BL1 (23

R0 Rx EXERCISER

NRQAM

PRCIFZTION

vol.¢

TABLE

Dec

1948

1% Dec

1'%

10:04:41

[0:21:%

023608

023606

023610
0236158
023616
023621
023622
0236235
023626
023631
023632
023635

025120
025142
0233172
023252
025354
023404
023%00
045
0495
000
043
143

045
000
043
000
045
000

043
035

117

000

lle

040

LALW
ALK

ALY

JALLZ

/IA ’
/78067/
/8Ao/

040

/et

/7804
/
«( V>

/
/7454
<O0»>

/8N/ <00>
«00>

/8A

040

045
040
000uU00C

023630

176150

mPT
IP . ADDR: :

023652

000154

MPT

023654

000004

HPT BR, LEVEL : :

023656

100034

MPT DISK::

023660

000000

MPT.S. TRK

023662

052137

MPT. E . TRK

/
/7<00>

/8Ae/
/7

LOMMALEN:;
. WORD
VECTOR: ;

'5 :

052

023664
023666

000000C

LSSMLEN::

023670

000040

SWP. ERROR:

023672

000024

:
SWP. XFER:

023674

000202

SWP. FLAGS
::

SWP.RAT:

023704

000022

. WOR
OUPROUND
::
. WOR
SWP
. UDPAT : ;

154
4

17744

<<
40

23]

000143

1630

24
202

20
O

023702

<< $NDHMW L SHMLEN>/2>

143

SWP
. UCNT: ;

Q0>»<00>»

52137
1

SWP ., DPAY'
000020

L SNDHM::

023700

023706

AT
ALY
ALY

«Q0>»<00>

157

023640
023643
023646

023676

710N/
«Q0»«<00»

VQQVQQQ

111

»s

025942
023%60
023%2
023364
v23%60
0238570
0238%°2
023574
028576
023600

A ata

)

$NDSW-L $SWLEN>/2>

i 2/ VR

14
vAz 11 Bl.es 16 ¢3 3%%
PIDERSISERS: [DOUCE TTE . F AL LN IR 4 oL

{

. WORD

$FFFY,
27

.PSECT
.BLKW
CST::
CST.ADDR:
:
.BLKW
.BLKW
OCT::
DCT.ADOR: :
.BLKW

TALLY:: .BLKW
T.ADDR:
: .BLKW

[ I

.BLxW

IRDRX
. ADDR: :
LBLKW
CUPPKT
: : .BLKW

RORX.ADDR:
:

401

160

C.ERR.TBL::
.BLKW

MSCP
. PKT:
.BLKW
IPKT ADDR: :
.BLKW
PKT USE::
.BLKW
.BLKW
RETP:KT:
RP.USE:: .BLKW
RP . INDX::
BLXW

BLKW
ELOG.PXT:
.BLKW
BUFF .ADDR; :
LBLKM

BUFF .OMN:
.BLKMW
.BLKuW
I100Q::
100Q. IN: :
LKW

614
o

RP.ADOR::

630

000000
177777
000006

Bl KW
LSNDSW:
: .BLKW
LSPROT:
:, WORD
. WORD

o283 ’46
023750
0237%¢
023754

TABLE

PRCTECTION

)

100Q.0UT;
.BLKW

ENTRY
. REASON: :

.BLKB
EOP.FLAG::
.BLK8
DUP
. FLAGS: :
.BLKW
CCTILR:: .BLKW
COISK:: .BLKW
CUOFF:: .BLKW

vOl.C

1% Dec
15 Dec

EXERCISER

RO 'Ax

Popapips

NRQAM1

1948
1988

10:c24:41
10:21:50

SEQ 014
VAZ 11 8l.ee 16 ¢3 555
4
107
PIDERS JSERS: (DOUCETTE .FALCONICNRIAA,
1 ¢33

[) 4
15 Dec 1983 10:04:41

RD‘RX EXERCISER
PROTECTION TABLE

CTLR.CNT:;

005170
005174

DUR: :
QI0::

005170

FREE .MEM. ADDR: :

005216
005220

NEX: :

BLKW

:
CRN.LOW:

CRN.HIGH:;

005224

P.INDEX:
:

005230

005232
0CS5234

N
R
Y ey
Y

BLxu

005222

005226

005206
005210
005212
705214

.BLKW

.BLKW
S.OUPPKT:
:
.BLKW
S.PATTERN::
.BLKW
CREDIT.BAL::
.BLKW
NEXT
. PKT USE::
.BLKB

.GLOBL
.GLOBL
.GLOBL
BIT1Se.
8IT14=BIT13we
BIT12eB8IT11e=B8I71Q=BIT09e81708+~
8IT07sBI7106¢+BIT0Ss=»
BIT04=81703e«BITO2=BIT01=-

8IT00=~

005204

.BLKW

BYTS.PER.QIO::
.BLKW
ST.CODE::
.BLKY
SB8.CODE::
.BLKW
.BLKW
STEP::
OF
. RC:: .BLKW
.BLKW
SA.R:EG:
CMD.TIME::
.BLKW

LSSOFT, THPTHV, LORPT, LSINIT
LSCLEAN, LSLAST, LSMARD, LSDVTIYP
LSDESC,

LDV, LAV, LEAUTO,

-100000

40000

20000
10000

4000

2000
1000

400

200
100

20
10
4

2
1

SEQ 0167

Pege 108

SPIDER$!SERS:
{DOUCE 1 TE,FALCONJCNROAA BL1

005202

10:21:50

[

005200

LBLKW
LBLKW
.BLKB
EVEN

1983

VAX 11 Bliss 16 V3 <SS

e O

00516¢

]

15 Dec

[

NRQAM]
vO01.¢

(33

b
NRQAM1
VO1 ¢

1)
15

RD/RX CXERCISER
PRCTECTION TABLE

)

BI19-BIT8.BIT?7=»
BIT6-BITS=-

BIT4en

BIT3=»
Bl12=BITl==
BITQ=-

Dec
Dec

1000

400
200

100

20
10

EF .STARTe»
==
EF .RESTART
EF .CONTINUE
= EF .NEW==
EF .PURs=«
=~
PRIO7
PRIOG
==
PRIOS=»
=
PRIO4
PRIOZ
==
PRIOZ2="
PRIO1==

EVL=»

PRIOQ=»

LQT»=

ADR==

IDUse>=
Im'UAM=
s

Bm.PNTae
mx..

200
140
100
0

10
20

100
200

400

1000
2000

IXEws=

4000

IBE ==

10000
20000

IERe-

LOE=»

HOE ==

LSERRTBL
==
L$SWes
Léiee

LSODEPQ=»
HiQ1e==
HWQ2
=»

HIQS ==

HWQA
= «
HIQS ==

Q6=QT ==

HJQ8
= =
G-»
HQ10e=

QL1
="
SW@l-~SWQ2e=SWQ4 ==
SWQT7 ==

40000

-100000
ERRTYP
LISWLEN.2
LSRR EN.2
LSREV.1
P.AAA
P.AAB
P.AAC

P .AARD
P . AAE
P, RAF

P.AAG
P.AAH
P.AAL
P AAJ
P.AAK
P.AAL
P.AAM
P.AAN
P.AAO

198%
1983

10:¢4:41
10:21:50

v8 5SS

5FQ Li6A
P

RIX

SPIDER!USERS:(DOUCE!YE.FALCON]CNRQAfl.:?T rye

[

15 Dec
15 Dec

RD 'RX EXERCISER
PROTECTION 1A8BLE

NRQAM1
vol1.¢

001100

001154
001220
001252
001350
001426
001444
001514
001602
001672°
001760
002050
002052
002616
002646
002700
002734
002766
003052
003116
003202
003246°
003334
003400’
003422
003444
003472
003524
003612°
003660’
003760°
004056°
004155
004240
004260
004352
004412°
004436°
004464
004512
004542
004560’
004610
004626
004646
004734
005046
005106’
005150’
005174
005236
005276
005344
005376
005436’
005472

SWQ9==
SWQ@10«=
SkWQ@1l=SWQ@12-SWQ@13-»
SW@l4=SWQ15=SWQ@l7e=SW@19e=SwWQe2~SWMl==
NUALe=~-

DU.MSG==
DU.RSN=-

MSG.Ole==
MSG.02="MSG.03=~
RPT1eRPT2s»
RPT73=s«
RPT4eRPTSe=»
RPT6=»
RPTT7=s
RPT8=RPTQs=e
RPT10==

RPT14+»
RPT16+€GS.01-€GS.02»~
€EGD.10e=-

EGD.11e"
€GD.12="€GD.13-EGD. 14>
€GD.15=EGD.16==
EGD.17e€GD. 18-~
EGD.20=~
EGD.21-~
E£GD.22=»
EGD.23=»
EGH.30="€£8S5.01=»
€B80.10==
£B80.12=€BD.13=€BD.14+=>€8D.18=EBD. 19+~

P.AAP
P.AAQ
P.AAR
P.AAS
P.ART
P.AAU

P . AAV

P .AAW
P.AAX
P.AAY
P.AAZ
P.ABA
P.ABB
P.ABC
P.ABP

P.ABQ

P.ABR
P.ABS
P.ABT
P.ABU
P.ABV

T ABM

ABY
P.ABY
P.AB2Z
P.ACA
P.ACB

P.ACC
P.ACD
P.ACE
P .ACF

P.ACG

P.ACH

P.ACI
P.ACY
P.ACK
P.ACL
P.ACH

P.ACN
P.ACO
P.ACP
P.ACQ
P.ACR
P.ACS
P.ACT
P.ACY
P.ACV
P.ACMW
P.ACX
P.ACY
P.AC2
P.ADA
P.ADB
P.ADC
P.ADD
P.ADE

1983
1983

10:24:41
10:21:50

SEQ 0109
Fage 1 1 0
SPIDERSU
[DUUCETTE .FALCONICNRQA
SERS
A .BL
:
1 ( ?3

VAY

11 Bl.es

v3 555

(,4
15 Dec
15 Dec

RO RX EXERCISER
PROTECTION TABLE

L5
S
LU

e
v
4
&
s

A
(4]

£8. DCTwe
€EB.COMM==
€B. PKTas
€8. RAL ==
EB.ADDR==
ESNEX]
==

XX20s»

XX21==
XX22+=»
XX23e=
XX24 ==
XX25e=
X}.26==
XX27s=
XX29s=
=
XX30s
=
XX31se
XX32==
XX33»=
XX348=e
XX35=s
XX37s=s
XX38e=
XX39==
XX4Q0s=
XX§1e=

XX19=»

XX17e=

011206
011234
011254
011304
011360’
011442
011504
011544
011606

XX16=»

P AER

010744
010772’
011030°
011100’
0o11116’
0ll142’

X]
EM. [T
EN, Tes
EH. 8o
EN. Qes
EH, 10=EH, 12=+
EM. 13=s
€RR.COD=~
ELG.00="=
ELG.FMT
==
EX. B80ORs»
EX. B80W=~
EX. LBR==»
Ex. LBW==
134 RBN==
EX. CBR==
EX. CBu=XX15==
XX14==
XX1Ss=»

P . ADF
P.ADG
P.ADH
P.ADI
P.ADJ
P.ADK
P, ADL
P.ADM
P.ADN
P.ADO
P, ADP
P.ADQ
P.ADR
P.ADS
P.AEM
P.AEI]
P.AEQ
P.REP
P.AEG

vvvvvvvvvtvvvvvvvvvvvvvvvvvvvpjo:o.v.v v

010160
010206
010224
010234
010246
010262
010322
010356
010412
010452°
010522
010576
010640’
010664
010712

EM. o..
€M, 1ss
EH. o"e
EN. 3-.
EH. Qrs
EMN Sse

005552
005610
005646
005706
005744
005770
006020
006052
006104
006140
006172
006224
006262
007012
007046
007402°
007414
007504
007572
007636
007702
007760
010030
010100
010122°
010136°

NRQAM]
vol.¢C

1983
1983

10:24:41
10:21:50

SEQ 014
VAX 11 Blies 16 V3 %5%
Page 1 11
SPIDERSUSERS: [DOUCE
T TE ,F ALCON JCNRQAR , BLl ( 1%/

RO /Rx EXERCISER
PROTECTION TABLE

SC.ECC=~
SC.ECDe»
SC.RCTe==
SC.FUL=SC.576==
SC.FCT==»
SC.ECl=~SC.EC2~~
SC.EC3-SC.ECA-~
SC.ECS==
5C.ECE==
SC.EC7=»
SC.EC8=+
SC.EC9e~SC.SWPe==»
o=
SC.HWP
SC.0DA=SC.008==
SC.NXH==
SC.PAR=»
SC.CTQ=-=

33311113333433 331341433441

SC.FE2="
SC.ISH=SC.IS2=SC.0ST=SC.0S2=-

SC.FER-=-

P.AGL
P.AGM
P.AGN
P.AGO
P.AGP
P.AGQ
P.AGR
P.AGS
P.AGY
P.AGY
P.AGV
P.AGU
P.AGX
P.AGY
P.AGZ

nmooo

013174
013262°
013340’
013420’
013500
013554
013626
013710’
013742
013762°
014036’
014112’
014160’
014210’
014240°
014272
014322
014352
014402’
014434
014466
014530’
014570
014630’
014660’
014702’
014736
014772

P.AGK

=4 =4 Dt =4

013102

EX.CRD=~
EX.MTNe»
EX.DGM==
EX.RD==
EX.WRT==
EX.ACC=»
EX.ONL==
EX,.SCC=EX.GDS=~
EX.ESP==
EX.ELP=EX.SDD=~
EX.RCO==
EX.ABP==
SC.S0I==
SC.CON==
SC.0UP=~
==
SC.ONL
SC.SON=»
SC.UNK==
==
SC.VOL
SC.I0P=~
SC.DISe=-

P.AGC
P.AGD
P.AGE
P.AGF
P.AGG
P.AGH
P.AGI
P.AGJY

vvvvvvvvvvvvvvvvvvvvvvvpvvy

012504
012524
012534
012560’
012602’
012632’
012654
012674
012754
013034

EB.NEX2
=~
EBNEX3==
CER.Q1=~
CER.Q2=EX.SEQ==

PPPPP

011662
011760
012054
012120’
012174
012214’
012244
012264
012302
012312
012322’
012334
012346
012372°
012414
012444
012470

1% Dec
15 Dec

TOVOVOVO

NRQAM]1
vo1.C

1983
1983

10:24:41
10:21:50

SEQ 0111
VAX-11 Blies-16 Vv3-555
Page 112
SPIDERSUSERS: [DOUCETTE .FALCONICNRQAA. BL1 33

L
NRQ@AM1

RD/RXx EXERCISER

;ox.c

14 Dec 1983 10:24:41

PROTECTION TABLE
015044

15 Dec

015122

SC.EDCs=

SC.SDS» -

P.AIG

015136
015206

SC.IDS==
SC.SRT==

P.AII
P.ATY

015366

SC.POE==

P.AIL

015300’

015422’

015504°

015532
015600°

SC.SR=>»

SC.RDYse

SC.CLKs=e

SC.RSP=»
SC.SURe»

015630
015712

SC.PSPaeF,.le=

016152

F.6=o

015746°
016002°
016034’
016074

F.2=»
F . 3en
F.4==
F.Sea

P.AIH

P.AIK

P.AIM

P.AIN
P.AIO
P.AIP

P.AIQ
P.AIR

P.AIS
P.AIT
P.AIV
P.Alv

P.AIM

016226°
016302
016360’

F.7se
F.8==
F.9ss

016430
016454°
016502

F.lle=
F.12e=
F.13==
F.l4e»

P.AIX
P.AlY
P.AIZ
P.AJA
P.AUB
P.AJC
P.AJD
P.AJE

EBMH. 44+

P . AN

016400°

016560°
016620
016646
016712’
016756°
017016°
017056
017130
CiTiou’

017176’

017300°

017332
017362
017444’

F.10==

F.15=F.l6e=
F.17ss
F.182F.19ee
F.20==
F.21="
EBH. 30+
EBH .45

EBH. .46~
EBH. 47~
EBH.48==

P.AJF
P.AJG
P.AM
P.AJI
P.AJJ
P.AX
P.AL
P.AM
P.AJO

P.AUP
P.AJQ
P.AJUR

017532
017644
017700’

EBH.49ss
OF .0==
OF .1==

P.AJS
P.AJT
P.AN

020010’
020050
020076
020122’

OF .3=»
OF .4==
OF ,5s==
DF .6+»

P.AM
P.AJX
P.AJY
P.AJZ

020264
020316°
020342’
020366°

T.0EF=»
T.INFse
T.TER=»
T.FATss

P.AKC
P.,AKD
P.AKE
P . AKF

017734

020172
020242

020412
020432

020466
020550°

2=+

DF .74
T.QUE=»

T.SPLe=e
E.UNT=>»

E.BLK=»
E.DEVee

P.AJY

P.AKA
P.AKB

P.AKG
P.AKH

P.AK]
P.AKJ

1983

10:21:50

VAX 11 Blies 16 v3-555

SEQ U1
¢

Page 117

SPIDERSUSERS:
[DOUCETTE ,FALCONJCNRQAA Bl 1 (32

'
NRGAM1

RD/RX EXERCISER

\401.0

PROTEC ION TABLE
020574
020630

020664

020756

M.COD==

021014

021046°
021116’

021204°
021264
023042

023562’

02360~
023010

023622’

023626
023632
023640
023650
023670’

1983 10:24:41

15 Dec 1983 10:21:50

E.Z2ER==
M.ASC=~
M BIN==~

020722’

P.AKK
P.AKL
P.AKM

M.TER=s=

P.AKN

P.AKO

M.DAT==

P.AKP

M.UP=»
M. UL=CNTR.ERR=>»

P .AKS
P.AKT
P . AKY

M.UR=»
M. URP=s

P.AKQ
P.AKR

RDRX .ERR==

P.ALS

EX.WRD=~»

P.AMA

EX.OP==

P.AMB

SPACEA4 ==

P.AMC

CRLF «>»
DASH==
ASTERISK ==
OFPTBL ==
SFPTBL ==

P.AMD
P .AME
P.AMF
LSHULEN
2
LESWLEN.2

.EVEN
PSECT SUMMARY

Psect Name
$CODE $
$FFF§

Words
5111
1358

Attributes
RC .
I
,
RO,
I
,

LCL,

REL,

LCL,

REL,

CON

LIBRARY STATISTICS

81w

®s

.
:
H

15 Dec

L
File

sesesess Sysbole
Totel
Loaded

-------Percent

Blocks
Read

SPIDERSUSERS
: ([DOUCETTE .FALCONICNRQAA.L16,;7
457

227

COMMAND QUAL
IF IERS

BLISS /7PDP11 CNRQAA.BL1/LIST=CNRQAA.LI1/0BJECT=CNRQAA, 0B1/SOURCE =PAGE : 56

VAX-11 Blise-16 V3-555

SEQ 0113

Pege 114

SPIDERSUSERS: [DOUCETTE ,FALCONICNRQAA. au (33

19
NRQAM,

:
.

H
.

RD/RX EXERCISER
PROTECTION

3362

3363
3364

3365
3366

TABLE

NRQAMZ2

stitle

‘RD/RX EXERCISER

4867
4868

4869

.
:
:
:

.
.

4870
4871

4872
4873
4874

4875

4876
4877

.
:

) =

begin

ssbttl

DECLARATIONS’

] 'brary

‘'CNRQAR.L16';

RORX EXERCISER GLOBAL

requi=e

'BLSMAC.REQ‘;

DIAGNOSTIC SUPERVISOR LIBRARY

forward

routine

NEX_TRAP : LS$ISR novelue,
EMS_01 : novalue,

EMS_DUP : novalue,

EMS_BLK : novalue,
EMSCMD : NOVALUE,

SET_CPAR : novelue,
SET_UPAR : novelue.
EMS_DBN : novalue:;

external

CST

blockvector [MAX_CTLR,

word) field (CST_FIELDS),
TABLES

OCT_ADDR

4884
4885
4886
4887
4888
4889
4890

RORX_ADDR : ref rdrx field (RC_REG),
t DEVICE ADDRESS OF "CURRENT” CONTROLLER

OCT

ref block

CST_LEN,

RUN- Tlfi CWTRG.LER STATUS

4882

4880
4881

[CST_LEN, word] field (CST_FIELDS),
¢ CONTROLLER STATUS TABLE ADDRESS OF

“CURRENT” CONTROLLER

: blockvector (HAX_CTLR. OCT_LEN, word) field (DCT_FIELDS),
!t DRIVER CONTROLLER TABLES
:

ref block

[DCT_LEN,

word] field (DCT_FIELDS),

! ADDRESS OF “CURRENT“ DRIVER CONTROLLER TABLE

IRDRX_ADOR :

ref rdrx field (RC_REG).
t DEVICE ADDRESS OF INTERRUPTING CONTROLLER
OUPPKT : BLOCK (257, WORD) field (DP_FIELDS),
! BUFFER CONTAINING DUP INFORMATION FROM RECEIVE AND SEND COMMANDS
TALLY : vector [MAX_UNITS ¢ TALLY_LEN, word] field (T_FIELDS),
T_ADOR

ref block

! STATISTICS TABLES
[TALLY LEN, word) fPield (T _FIELDS),

4893
4894
4895
4896
4897

¢ ADDRESS OF STATISTICS TABLE (TALLY) FOR CURRENT UNIT
C_ERR_TBL : blockvector [MAX_CTLR, C_ERR_LEN, word] field (C_ERR_FIELDS),
! STATISTICS TAOLE FOR CONTROLLER ERRORS
MSCP_PXT : blockvector [PKT_CNT, PKT_LEN, word) field (PKT_FIELDS),
! MSCP PACKET PODL

4899
4900

! ADORESS OF AN MSCP PACKET (INTERRUPY PROCESSING)
PKT_USE : vector [PKT_CNT, byte, si
1.

4898

4901
4902
4903

4904

4905

IPKT_ADOR

RETFKY

ref block

[PKT_LEN,

word}

field (PKT_FIELDS),

H HSCP PACKET P
ALLOCAYION TABLE
: blockvector [RP_CNT, RP_LEN, word)] field (RP_FIELDS),
* RETURN PACKEY POOL

RP USE : vector [RP_CNT, byte., signed],

! RET'»‘N PACKET POOL ALLOCATION TABLE

SEQ 01'a

Page 11°%

SPIDERSUSERS: ([DOUCETTE .FALCON]ICNRQAA. BL1

dent =
V01.2 ,
address ing mode (absolute),
env ronment (noe’s)

CST_ADOR

4891
4892

:
:

10:21:50

4878
4879

4883

.
;
:

LIBRARY

1983

(

3368

4865
486€

VAX-11 Blies-16 v3-555

15 Dec

module

3367

3369
3370
3371
33_7,§
13
3374
3375
3376

15 Dec 1983 10:24:4)

(24

“9
RD/RX EXERCISER

NRQAM?
vOl.<

4916
4917
4918
4919
4920

4921
4922
4923
4924

4925
4926
4927
4928
4929

4930
4931
4932
4933

4934
4935

4936

4937
4938
4939
4940
4941
4942
4943
4944

4945
4946
4947
4948
4949
4950
4951
4952
4953
4954
4955
4956
4957
4958

4959
4960

4961

IODQ_IN : word,
IO0Q_OUT : word,
ENTRY _REASON : byte.
EOP _FLAG : byte,
OUP _FLAGS : WORD,
COISK
CUOFF

:
:

DUR
QI0

vector [MAX_UNITS, bytel,
vector [MAX_CTLR, bytel.

:
:

word,
word,
:

word,

FREE _MEM_ADOR,

BYTS_PER_QIO : word,
ST_CODE : word,
SO-CWE H mrda
STEP : word,
OF
_ RC . signed word,
SA_REG : word,
CMD_TIME : word,
CRN_LOM : word.
CRN_HIGH : word,
P_INDEX : ei
word,
S_D‘.PPKT H
.
S_PATTERN : WORD,
CREDIT_BAL : word,
NEXT_PKT_USE : byte,
DBMS,
o8M107,
DU _MSG,
DU_RSN : vector [12],
ERR_COD : vector [14],
ELG_FMT : vector (5],

HQl,
a2,
Ms'

Q4
,
HWQS,
HWQ6
,
HQ7,
HYGS
,
HWQ9,
HQ10,
HWQ11,

SWGa1,
SWaz,

VAX

B8]

v3 S5

signed),

'
!

Page

SPIDERSUSERS: (DOUCETTE.FALCONCNRQAR HL 1 (24

! CURRENT RETURN PACKET INOEX
(RP_LEN, word) field (RP_FIELDS),
! CURRENT RETURN PACKET ADDRESS
blockvector [EP_CNT, EP_LEN, word) field (EP_FIELDS),
! ERROR LOG PACKET SAVE AREA

BUFF _ADDR : vector [MAX_BUF _CNT]),
BUFF _OWN : vector [MAX_BUF _CNT, byte,
I00Q : vector [IODQ_LEN, byte],

CTLR_CNT

10:c04:41

word,
ref block

R NT WY R Y T

4914
4935

ELOG PKT

:
:

L XL XL X X

4913

RP INDX
RP_ADDR

TABLE OF I1/0 BUFFER DESCRIPTORS
170 BUFFER OWNERSHIP (CONTROLLER NJMBER

1/0 DONE QUEUVE - CIRCULAR QUEUE OF
I/0 DONE QUEUE IN POINTER
I/0 DONE QUEUE OUT POINTER
CURRENT OPERATOR COMMAND

RETPHT

END -OF -PASS FLAG

DUP FLAGS
NUMBER OF "CURRENT“ CONTROLLER
CURRENT DISK ADORESS (RD/RX DISK NUMBER)
CURRENT UNIT CST OFFSET
TOTAL NUMBER OF CONFIGURED CONTROLLERS

DROP UNIT REASON

NUMBER OF OUTSTANDING QINS PER CONTROLLER
START OF FREE MEMORY

SIZE (BYTES) OF AN I/0 BUFFER
CURRENT STATUS CODE
CURRENT SUB-CODE
CURRENT STEP IN HWARD_INIT
OFFSEY (0 OR 2) TO READ IP OR SA
STORAGE FOR SA REGISTER READS AND WRITES
COMMAND TIMEQUT VALUE (IN SECONDS)
NON-EXISTENT MEMORY TRAP INDICATOR
COMMAND REF NUMBER OF LAST COMMAND SENT
! COMMAND REF NUMBER (HI ORDER)
! CURRENT
PACKET INDEX
' DBN BYTE COUNTER
? THE PATTERN WRITTEN YO DBN'S
! CREDIT BALANCE
¢ POINTER TO NEXT ENTRY IN PXT USE TABLE
tJSD REV A - REMOVED
1JSD REV A - REMOVED
P

4907
4908
4909
4910
4911
4912

1983

15 Dec 1983 10:21:50

4906

“r

15 Dec

DECLARATIONS

INDECES

114
RO/Rx

“e

B
m

®s

B¢

Be
@

s
@

NRUAM,
vOl .

DECLARATIONS
4962

4963
4964
4965
4966
4967
4968
4969
4970
4971
4972
4973
4974
4975
4976
4977
4978
4979
4980
4981
4982
4983
4934
4985
4986

4987

4988
4989
4990
4991
4992
4993
4995
4996
4997
4998
4999

e
e
®

SWMl,
NULL
,
MSG_Ol,
MSG_02.
MSG_03,

RPT1,
RPTZ2,

RPTS,
RPTA,
RPTS,
RPT6,
RPT?,

RPTS,
RPT9,
RPT10,
RPT11,
RPT12,
RPT13,
RPT14,

RPT1S,

5007

5010
5011
5012
5013

EH_O,
CH,I .

5005

%o
s

SWQ7,
SWa9,
SwQlo,
SW@ll,
SWQ12,
SWQ13,
SWQl4a,
SWE15,
SWQ17,
SW@19,
SWQee2,

RPT16,
EGS_01,
EGS_02,
EGD_10,
EGD_11,
EGD_12.
EGD_13,
FGD_14,
EGD_15,
EGD_16,
EGD_17,
EGD_18,
EGD_20.

5001
5002
5003

EXERCISER

5014

5015
3016
5017

EGD_21,
EGD_22,
EGD_23.
EGH_30,
EH_2,

EH_3,
EH_4,
EM_S,

1L Dec
15 Dec

1983
1983

10:24:41
10:21:50

SEQ 016
VAX 11 Blies 16 v3-555
P
SPIDERSUSERS: [DOUCE TTE .FALCONJCNRQAA. oLl

N
RD ‘RX

Yol

DECLARATIONS

®c

NRQAM,

.
.
.
.
.
.
.
;
.
.

.
.
:
.
.
.
.

5018
5019
5020
5021
5022
5023
5024
5025
5026
3027
5028

5029
5030
5031
5032
5033
5034
5035
5036
5037
5038
5039
5040

5041
5042
5043
S044
5045
5046
S047
5048
S049
5050
5051
5052
5053

5054
5055
5056
5057
5058
5059
5060
5061
5062
5063
S064
5065
S06€

S067
S068
5069
SO70
5071
5072
S073

EXERCISER

Dec

1983

10:¢4:41

19 Dec 1983 10:21:50

EH_6,
EH_7,
€H_8,
EH S,
EH_10,
EM_12,
EM_13,

ERS 01,
€80.10,
€80 _12.
€80_13,
t80_14,
EBD_18,
€EBD_19,
ELG_00,
EX BOR,
€xX_BOW,
EX_LBR,
EX_LBW,
EX_RBN,
EX_CBR,
Ex_CBwW,
xXx.3,
XxXX14,
Xxx15,

XX16,
xx17,
XxXx18,
XxXx19,
xXx20,
xXx21,
xx22.
xXx23,
XxXx24,
XxXx2S,
XxX26,
xx27,
xXx29,
xx30,
xx31,
xx32,
xr33,
XxXx3a4,
xx35,
'xx36,
xx37,
xx38,
XxXx39,
XXx40,
xx41,
€8 OCT,
EB COtim,
EB PKT,
€8 RAL,
€8 ADDR,

VAX

Blies

v3-55%5

SEQ 01/
Page

118

SPIDERSUSERS:
([DOUCETTE .F ALCONICNRQAA .BL 1 (%4

N A,

HD Ax Ex¢RCISER

A
i
[}
]

DECL AR4T;0NS
S078
3075
5076
%77
5078

'
'
'

S0re
5080
G811

%088

‘

.
i
:
.
H
.
.
‘
.
H

5082

3084
508%
$08¢
5087
5088
5089
090
%091
5092
%093

tBMEX1,
€8 _NExZ,
EDMEXS,
CER 01,
CER 02,

€x_SEQ,
Ex_CRO,
EX _MIN,
€x_0OGM,

Ex_ROD,

EX_WRT,
Ex_ACC,
Ex_ONL,
€x_SCC.
€x_GDS,
Ex_ESP,
Ex_ELP,
Ex_SDO,
£x_RCD,
EX_ABP,

S094

S095

SC_CON,

H
:

f
:

5097
%098
5099
$100

SC_ONL,
SC_SON,
3C _UNK,
SC.vOL,

s
§
:
:

$108%
9104
$10%
S10%

SC _FER,
SC_FE2,
SC.ISH,
sC_ISe.

;

5108

sC_DSe.

:
s

S10%
$102

$107

SC_SO1,

sC.I0P,
SC.0IS.

SC_0ST,

H
i
3
:
s
:
'
:
:
‘

5110
S111
S11e
S113
S114
5115
Si16
S117
S118
S119

SC_€CO.
SC_RCT,
SC_FU.,
SC_S76,
SC_FCT,
SC_EC1.
SC_EC2,
SC_EC3,
SC_ECe,
SC _ECS.

:
:
3
H

5121
Siee
S1e8
S124

SC_EC?,
SC _ECS,
SC_EC9.
SC_SwP,

:
:

s
H
$

5120

SC_EC6,

S12%
S126

SC_mP,
SC_00A,

5129

SC PAR,

$127
5128

SC_008,
SC_NXM,

i Dec 1963 10:04:41

IS Dec 1983 10:21:50

VAX 11 Bliws 16 ¢3 355

“.

‘ege ..

SPIDERSISERS:[DOUCE
TTE .6 ALCON ICNR er Uiy

C.0
SEQ Uiy

NRQAM,"

RD -RX EXERCISER

1% Dec 1983 10:¢04:41

VAX 11 Bl se 16 v3 555

‘01.:

DECLARATIONS

15 Dec

SPIDERSYUSERS:
[DOUCETTE FALCONICMROAA Bl

H
H

51%0
5131

sC_C10,
SC_SDS.

:
H

5133
S1%4

SC_1I0S,
SC.SRT,

51358

SC_SRI,

:
:
:
:
:
H

51%7
5138
5139
5140
S141
5142

S143
5144

F_1,
F_2,
F_3,

SC_ROv,
SC_CLK,
SC_RSP,
SC_SUR,
SC_PSP,

:
:

5146
5147

F_S,
F_6,

5149

F _8,

:
:
:
H
:
:
:
;
:
;

5151
5152
5153
5154
5155
515
$157
5158
5159
5160

Ff_10,
F_11,
F_1°2,
F_13,
F_1ae,
F 15,
F_16.
F_17,
f_18,
f_19,

516>

F_21%,

:
:
:
;
H
:
:

5164
5165
5166
5167
5168
5169
5170

EBH_ASL,
EBH_AS,
€EBKH_4a6,
EBH_47,
€EBH_A48,
EBH_49,
of 0,

:
:
:
:
H
H
:
5
:
H

5172
5173
S174
5175
5176
5177
5178
5179
5180
5181

daf_2.
af_3,
df _a,
af_ S,
df_6,
af 7.,
T_QUE,
T_DEF,
T_INF,
T_TER,

5183

T_5PL,

H
:

5136

5182

5184

5185

SC_POE,

T _FAT,

E_UNT,

€ BLK,

198%

10:21:50

Page 10
(24

D10

NRQAM,.

RD/RXx EXERCISER

\;01..:
:
H
H
H

:
H
H

:
;

H
H
i
;

H
H

15 Dec 1983 10:04:41

DECLARATIONS
5186
5187
5188
5189

M_TER,

5194

M_URP,

5196
5197
5198
5199

H_UL,
CNTR ERR
RORX_ERR
EX_WRD,

5195

5200
5201

1983 10:21:50

VAX 11 Blies 16 V3 555

M_C00,
M_DAT,
M_UP,

vector (23],

vector (7],

ExX_0OP,

SPACEAM,

CRLF,

5202

;
H
H
H
H

5204
5205
5206
5207
5208

ASTERISK,
SWP_FLAGS : word,
LSHIMENM,
LSLUN,
LSUNIT;

S211

TBL_SUC

vector [17]

i
:

S214
5215

TBL _MFE

NAL, SC_DIS),
vector (11] initial (SC_FER,

5217

TBL _WPT

vector [3)

H
H

5219
5220

TBL_MST

SC_ECD, SC_EC1, SC_EC2, SC_ECS, SC_EC4, SC_ECS5, SC_ECH, SC_EC7, SC_£C8),
vector (S) initial (NMAL, SC_ODA, SC_008, SC_NxM, SC_PAR),

S222

TBL_DRV

vector [9)

:
:

5203

5209

5218
5221

5223

DNS".

TBL_DAT
TBL_CNT

:
:

vector

(16)

vector

[4)

SC_SUR,

initial (NAL,

initial (NULL,
initiesl

SC_SDI,

SC_SWP,

(SC_FE2,

initiel (SC_CTO,

initiel (MAL,

SC_PSP);

ML,
MAL,

NULL,

SC_ISH,

SC_DST,

SC_EC9,

SC_S576,

SC_DS2,

SC_EC9,

ML,

SC_IS2,

SC_SOS,

SC_SRY,

SC_CON,

SC_mP),

SC_EOC,

SC_SRI,

SC DUP,

SC_IDS),

SC_POE,

SC_ROY,

“0901(0121

SPIDERSUSERS: ([DOUCETTE ,FALCONICNRGAA. BLl

€_DEv,
€ _ZER,
M_ASC,
M_BIN,

5190
5191
5192

15 Dec

MAL, NALL,

SC_CLK,

NMAL,

SC_RSP,

NRGAM."
VOl ..

RD/RX EXERCISER
TYPE AND DESCRIPTION

SEQ 0121

VAX 11 Bliss-16 V3-555
Pege 122
SPIDERSUSERS:(DOUCETTE.FALCONJCNROAA.BL] (3¢

5224
5225
gggg

EQUALS;

gggg

DEVTYP (wasc:z RGOX1 );

! NAME OF DEVICE SUPPORTED BY PROGRAM

;

5230

DESCRIPT (sesciz' RD/RX EXERCISER'
};

' TEST DESCRIPTION

gggl

sgbttl

VI S

;
H
:

2
5233

wsbttl

15 Dec 1983 10:¢4:41
15 Dec 1983 10:21:50

TYPE AND DESCRIPTION

‘' HARDWARE PARAMETER CODING SECTION'

!
¢ THE HARDWARE PARAMETEFR CODING SECTION CONTAINS MACROS
! THAT ARE USED BY THE SUPERVISOR YO 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 TO ESTABLISH COMMUNICATIONS
! WITH THE OPERATOR.
-

S244

GPRMA (MQ1,

5248
5249
5250
5251
5252
5253

GPRML (HMQS, 6, %o’'4a’, YES, 1)
XFERF (HM1);
GPRML (MQ10, 6, %0'000010’, YES,
XFERF (NODU);
GPRML (MiQ11, 6. so’'000020', YES,
sL (NODU);

YRRTI

:
H

5234
S235
5236
5237
5238
5239
S240
S24l

;

.
H
.
:
:
:
:
.
.

:
:
.
.
.
.
:
.
:

3343 owwos
5245
S246
S247

5254
5255
S256
S257
5258
5259
5260
5261
5262
5263
22223
5266

#0’'160000',

#0'177777,

YES,

¢t

IP ADORESS

UNIT

run dup exerciser

1);

WRITE

GPRMA (MWQ2, 2, 0, wo’'4’', so' 774, YES, 1);
GPRMD (MWQ3, 4, O, #0'377', %0'0', o' 7', YES, 1)
GPRMD (MUWQ4, 6, D, %0'3', scecimal’'0’', sdecimal’3’,

YES,

1);

! VECTOR
' BR LEVEL
! RORX DRIVE NUMBER

GPRMD (MWQ6, 8, D, %0'177777', sdecimel
'O’ , RD_MAX_LBN, YES, 1);
!
GPRMD (HMQ7, 10, D, %0°'177777', GPSATLO (8), RD_MAX_LBN, YES, 1);
!
XFER (Md2);
st (HMdl);
GPRMD (HMQ6, 8, D, %0’ 177777, sdecimal’'0’, RX_MAX_LBN, YES, 1);
!
GPRMD (MWQ7, 10, D, %o'177777', GPSATLO (8), RX_MAX_LBN, YES, 1);
!
$L (MM2);
GPRML. (HUWQS, 6, o’ 100000’, NO, 1);
! EXER ON CUST DATA AREA
XFERF (MMDONE
);
! NO - ODONE
GPRML (HWQ9, 6, %0’'100000', NO, 1);
! s¢ WARNING 7/ CONFIRM
sL (HWDONE);
ENDHRD;

TYPE

7O DBN'S

STARTING LBN
ENDING LBN
STARTING LBN
ENDING LBN

F10

®r

®F

B¢

NRGAM.
vOol.c

RD/RXx

SOF TWARE PARAMETER CODING SECTION
5267
5268
5269
5270
5271
5272
5273
5274
3275

5276
5277
5278
5279
5280
5281
5282
5283
5284

5285
5286

®r

15 Dec
15 Dec

EXERCISER

5287
5288
5289
5290
5291
5292
5293
5294
5295
5296
5297
5298
5299
5300
5301
5302
5303
5304
5305
530¢
5307
5308
5309
5310
5311
5312
5313

webtt]l

' SOF TWARE

1983
1983

10:¢4:41
10:21:50

VAX

Bl es

V3 555

SPIDER‘USERS:fDOUCEYYE.FALCON)CNROAA.;E= (37

PARAMETER CODING SECTION’

THE SCFTWARE 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 SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR.
BGNSFT;

IGPRML (SWQ16, 4, SWF_TRC, YES, 1)
GPRMD (SWQ1, O, D, %o*'177777', O, 65535,

YES,

ENABLE DIAGNOSTIC
ERROR LIMIT

1);

GPRMD (SWQ2, 2, D, %o'177777', O, 99, YES, 1);
GPRMD (SWQ17, 10, D, #o*177777', O, 100, YES, 1);
GPRMD (SWQ22, 12, D, %o*177777', O, 144, YES, 1);

GPRML (SWQ15, 4, SWF_CST, YES, 1);
IGPRML (SWQ20, 4, SWF _FER, YES, 1);
IGPRML. (SWQ21, 4, SWF_HOE, YES, 1);
GPRML (SWQ4, 4, SWF_RDM, YES, 1);

!
!
'
'

XFERF (SMW1);
XFER (SW2),
sL (SM1);
GPRML (SWQ19, &4, SWF_SEQ, YES, 1);
L (SW2);
GPRML. (SWQ7, 4, SWF _CRC, YES, 1);
DISPLAY (SuMl);
GPRML (SWQ9, 4, SWF _CWC, YES, 1);
XFERF (SW3);
XFER (SW4);
$L (SW3);

TRACE

TRANSFER LIMIT
PERCENT OF RD OPERATIONS

NUMBER OF DBN'S WRITTEN AT

CLEAR STATISTICAL TABLES

FIXED OR RANDOM SEQUENTAIL

H
!
't

READ -COMPARES AT CONTROLLER ?
REMAINING QUESTIONS ONLY APPLY
WRITE -COMPARES AT CONTROLLER ?
IF NO, 00 NEXT QUESTION

STEPPING

YES,

1);

CHECK WRITES AT HOST BY READING ?

GPRML (SW@11,

SWF_UDP,

YES,

1);

USER -DEFINED DATA PATTERN ?
IF NO, DO NEXT QUESTION

L (SWS);
GPRMD (SwQ12,

#0'177777',

DP_CNT,

GPRMD (SWQ13, 8, D, %0°177777',

MAX_UDP_CNT,

GPRMD (SwWQ14,
L (SW7),;

ENDSFT;

14,

®0'177777°,

YES,

#0* 177777,

1);

YES,

NO,

...

SWF_HWC,

XFER (SW7);
6L (SW6);

TIME

XFERF (SWS);
XFER (SW6);

ONE

REWRITE BLOCKS WHEN “FORCED ERROR' BIT SET?
HALT ON HARD/SOFT ERRORS WITH 'HOE' FLAG SET?
RANDOM SEEK MODE ?
IF NO, DO NEXT QUESTION

GPRML (SWQ10,
L (SwWa);

! SELECTY PRE-DEFINED DATA PATTERN
¢ DONE

1);!
!

8);

SEQ 01¢2
P
124

NO. OF WORDS IN USER DATA PATTERN
PATTERN VALUES

(10
NRQAM,

RD/Rx EXERCISER

vol.co

@¢

:
:

REPORT COOING SECTION
5314
5315

wsbttl

S317
5;18

!
!

5316

5319
5320
5321
5322
5323
5324

gg;;

B¢

:
:
:

5325
5326
5327
5328
5329
5330
5331
ggg‘;

15 Dec

REPORT

BGNRPT;

PRINTS
PRINTS
PRINTS
PRINTS
PRINTS
PRINTS

incr CTLR from O to MAX_CTLR
in
SET CPAR (.CTLR);
incr DISK

from (O

+ OF UN)

to (3 & UNIT_SIZE

OF _UN) by UNIT_SIZE do

5340

then

:
:
H

5343
5344
5345

i® (.CST_ADOR (.DISK, D_TYPE] eql RD_S1) and
(.CST_ADDR (.DISK, D_PRES) eql PRESENT)
then

:
:
H

S348
S$349
5350

if .CST_ADDR [ .DISK, D_PRES]) eql PRESENT
then
in

5339

gsszé

233:?

P 5351

;

P S354

P 5355

P 5357

5360

;
;
.
;
:

(.CST ADDR [.DISK,

5363

5364
5365
5366
5367
5368
5369

.LSLUN,

.CST_ADOR

.CST_ADDR

.T_ADDR [TOT_READS HI],
.T_ADDR {MTOT_BYT_RED],

PRINTS TM (RPT9,

.T_ADDR [TOT_WRITES HI),

end;

(.DISK,

[.DISK,

D_DISK_NUM]);

D_DISK_NUM]});

.T_ADDR
([ TOT_READS_LO],
.T_ADOR (TOY_BYT_RED_HI),

.T_ADDR [TOT_WRITES_LO),

.T_ADOR (MTOT BYT_WRT),

.T-N')OR {TOT_BYT_WRT_HI),

.T_ADDR [ERR_HRD_SEK),
.T_ADDR [ERR_SFT_SEK]),

.VT_ADDR [ERR_HRD OAT),
.T_ADDR [ERR_SFT_DAT],

PRINTS (RPT10,

P 5358
5359

5362

D_PRES) eql PRESENT)

PRINTS (RPT9.

5356

5361

PRINTS (RPT7,

PRINTS (RPTS,

P 5352
5353

PRINTS MSCP DATA

if (.CST_ADDR [ .DISK, D_TYPE] eql RX_50) end

;
:

SEQ Ola,

1 do

5338

16 Vv3-555

SPIDERSUSERS: (DOUCETTE, ffiLCON)CMOAfl 8L1

(RPT1);
(RPT2);
(RPT3);
(RPT4);
(RPTS5);
(RPT6);

:
:

11 Bl.es

THE REPORT CODING SECTION CONTAINS Tre
“PRINTS' CALLS THAT GENERATE STATISTICAL REPORTS,

SET_UPAR (.DISK);

VAX

CODING SECTION

gggg

10:24:41

15 Dec-198% 10:21:50

;

1933

.T_ADDR [TOT_BYT_RED_LO));

.T_ADDR (TOT_BYT_WRT_LO1);

.T_ADDR (ERR_HRD_ORv),
.T_ADOR [ERR_SFT_DRV],

end;
if .CST [.CTLR, STATE]) eal PRESENT
then
begin
PRINTS (RPT11),;
PRINTS (RPT12, .C ERR T8L [.CTLR, C_ERR_MRD),
end;

.C ERR_TBL [.CTLR, C_ERR_SFT]);

.T_ADOR (ERR_HRD_HST]),
ADOR (ERR_SFT HST));

H 1O
NRQAM,>

RD/RX EXERCISFR

vOol..

REPORT CODING SECTION

H
.
:
:

5370
5371
5372
5373

.
:
H
.

5375
5376
5377
S378

5380

:
:

INCR CTLR FROM O TO MAX_CTLR 1 DO

:
:
:
:
.
.

5391
5392
5393
$394
5395
S396

000000
000000

SET _CPAR(.CTLR);

INCR DISK FROM (O+0F UN) TO (3eUNIT_SIZE.OF UN) BY UNIT SIZE DO
BEGIN
SET_UPAR( .D1ISK);

23332

%:’E'.‘CST_ADDR(.DISK.

PRINTS (RPT16,
LSLUN, .CST_ADDR [.DISK,

5389
5390
end;

END;

.T_ADDR [T_DBN_RD),
END;

D_PRES] eal PRESENTY

.T_ADDR (T_DBN_WT],

.T ADOR (T_BLK_WT});

ENDRPT;

104

000003
000006

130

061

000

000016
000021
000024
000027
000030

122
122

105
122
123
000

104
130

057
040

130
103
105

105
111
122

LSOVTYP:

.TITLE
.IDENT
.ENABL

NRQAMZ2 RD/RX EXERCISER
/VO01.2/
AMA

PSECT

$CODES,

.ASCII
LASCII
.BLKB

/RQD/
/X1/<00>
2

.ASCII
.ASCII
.ASCII
ASCII
.BLKB

/€EXE/
/RCl/
/SER/
<«00»
2

LSDESC:: .ASCII
.ASCI1

000032

000000C

LSHROUN:
:

000034
000036
000040
o0 M2

000031
0000006
160000
1777177

GP#1::

000044

001031

GP$2::

000052

000774

0000006
000004

D_DISK_NUM],

.T_ADDR (T_BLK_RD),

.CST_ADOR [.DISK,

PRINTS (CRLF);

121

000046
000050

O TYPE) EQLU RD 51 end

.WORD

. WORD
. WORD
. WORD
. WORD
.WORD

. WORD
. WORD

. WORD

/RD/<57>
/Rx v/

$NDHRD -L $HRDLN>/2>-1>

n
Q1
-20000
-1
1031

HWQ2
4
774

SEQ O1c4

126

SPIDER‘USERS:!DOUCE”E.FALCON]CMOAA.m (38

BEGIN

122

000010
000013

11 Blies 16 V3 555

! PRINTS DUP DATA

prints(crlf);
PRINTS(RPT13);!¢
PRINTS(RPT14);
PRINTS(RPT1S);

5381

P 5387
P 5388

:
:

end;

$379

.
:

VAX

PRINTS (CRLF);

begin

5382
5383
5384

1983 10:¢24:41

15 Dec 198% 10:21:50

5374

:
:
:
:

15 Dec

110
RD/RX EXERCISER
REPORT CODING SECTION

NRQAM?2
VOl.e

15 Dec

000062
000066

000070
00072
000074
000076
000100
000102
000104
201106

000110
000112
000114
000116

22
000124

002032
000000G
000377
000000
000007
003052
0000006
000003
000000
000003
003130
000000G
000004
000000C
003130
000000G
000010
000000C
003130
0000006
000020
001004
004052
0000006
177777
000000
052137
005452
000000G
177777
000004
052137
000001
000000C
001004
004052
0000006

177777
000000
001437
005452
0000006
177777
000004
001437
000001
001004
003120
0000006
100000
000000C
003120
000000G
1060000
001004

10:24:41

15 Dec 198% 10:21:50

000054
000056

1983

GP$3::

.WORD

GPs4: ;

.WORD

GP$5::

.WORD

VAX

. WORD
.WORD

2082

HWQ@3
377

3052

HWQ@4
3
0

3
3130
HWa5

tNOOUGP$7:

. WORD
. WORD
WORD

SLNOOV:

.WORD

GP$8::

GP$9::

$HA2 :
sLHW1l:

GP$10::

GP$1l::

sLHW2:
GP$12::

.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

$HWOON
: . WORD
E

GP$13::

.WORD
. WORD
. WORD
$ LHWOONE
:
. WORD

CCCCcL

]l -

M1 >¢400> 4> 40>

3130
Q10
10

<< << $LNODU - SNODU > 400> +4>+40>

3130

Q11

20
1004

4052

52137
5452
Q7
-1

?2137
CCc LMW

1004
4052
Q6
-1
[0}

$HW2>4400>
+ 4>

1437

S54%2
Q7

< ¢ << $LHWOONE - $HWOONE > «400> +4> + 40>
3120
HWQ9
-100000
1004

SEQ 012
Pege 127

SPIDERSUSERS: (DOUCETTE .FALCONICNRQAA, 8L1 (38

$HMl :
GP$6::

11 Blies-16 v3-555

15 Dec

RD/RX EXERCISER
REPORT CODING SECTVION

NRGQAM?
vol.c

15 Dec

)

0002382

000234

000000C

000236
000240
000242
000244
000246
000250
000252
000254
000256
000260
000262
000264
000266
000270
000272
000274
000276
000300
000302

000052
000000G
177777
000000

000304
000306
000310
000312
000314
000316
000320
000322
000324
000326
0003%0
000332
000334
000336
000340
000342
000344
000346

000350
000352
000354
000356
000360
000362
000364
000366
000370
000372
000374
000376
000400
000402

1777717

L$NOMRD::
.BLKW
L$SFTLN::
. WORD
GP$14:: .WORD

001052
0000006
177777
000000
000143
005052
000000G
177777
000000
000144
006052
0000006
1772777
000000

GP$15::

002130

GP$18::

000220

000000G
000200
002130

000000G

000002
000000C
000000C
001004
002130
0000006
001000
001004
002130
00000¢!

GP$16::

GP$17::

GP819::
$SuL:
$Su2:
sLSW1:
GP$20::

$LSH2:
GP$21::

1983 10:24:41
1983

10:21:50

<<cl $NDSFT-L$SFTLN>/2>-1>»

. WORD
.WORD
. WORD
.WORD
.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
.WORD

.WORD
. WORD
. WORD

GP$DISP:
:
. WORD
. WORD
GP$22:: .WORD

. WORD
. WORD

$SW3:
$SU4 .
SLSW3:
GP$23::

. WORD
. WORD
.WORD
.WORD

$LSU4:
GP$24::

_WORD
.WORD

. WORD
. WORD
WORD

- WORD

2130
gunn
€< $LSH] - $SW1>e400>+4>
40>
<< HLSU2 - $5U2>+400>
+ 4>

1004
2130
SuW@19
1000
1004
2130
SwQ?
4

3
SWM]

2130
SWQ9
20
0>
¢4, +40>
<L SWS-8SU3>240
4>
HA
400>
LS
- $S4>¢
<<<$
1004
2130
SWQ10

1004
2130
SWall
100

VAX

Bl es

16 V3-555

Page

128

SPIDERSUSERS:
{DOUCETTE .FALCONICNRQAA .BL1 (128

“10
15 Dec
15-Dec

RC/Rx EXERCISER
REPORT CODING SECTION

000000C
000000C
001004
003052
0000006

$SWS:
$SW6;
SLSWS:
GP$25S::

1777117

000000
000025
000000C
001004
004052
2000006
177777
000001
00020
00
000L G

1777

$SU7:
$LSWE:

GP$26:;

. WORD
.WORD
.WORD
. WORG
. WORD
.WORD
.WORD

. WORD
.WORD
. WORD
. WORD

LSNOSFT::
LBLKW

B
e
e

200036
000042
000044

000052

000056
000062

4052

Sw@is
-1
1
20

000C 32

2%
cccgLSUW?- $SWT>+400>¢4>
1004

0
-1

.FSECT
TBL . SUC:
. WORD

000024

-1
0

7222

SLSW?:

TBL.OFL:.

. WORD
. WORD
. WORD
. WORD

TBL .MFE: .WORD

. WORD

$SWS>¢400>+4>.40>

$SWE 70400> 4>

Suwale

SwW@la
-1

00000
177777
000004
001004

ccccLSWS

<<cfLSWE
1004
3052

1983 10:c4:41
1983 10:21:50

1004

VAX-11 Bl

es-16

v3-555

S(O 01(7

129

SPIDERSUSERS: {DOUCETTE. FALCOUC'W fl.l (38

10
NRQA’ 1P
vOl.¢c

RD/RX EXERCISER
REPOR” CODING SECTION

)

000070

000072
000074
000076
000100
000102
000104

000106
000110

000112

0000000

. WORD

SC.ISH

0000000
000000G

. WORD
.WORD

SC.FUL
SC.€C1

0000006
0000006
000000G
0000000
000000G
000000G

TBL
. WPT: . WUORD

000000G

T8L .DAT: . WORD

000000G

.WORD

000Q00G
0000006

000122
000124

0000006
000000G

000130

00C000G

000126

000132

. WORD
. WORD
WORD

. WORD

0000006
0000006
000000G
000000G
000000G
000000G
000000G

. WORD
. WORD
TBL.HST: . WORD
. WORD
WORD
WORD
. WORD

0000006
0O00000G
0Q00000G
0000006
0000006
0000006
0000006
000000G
0000006
000000G
000Q0NG
0000006

. WORD
. WORD
. WORD
T8L .DRV: . WORD
. WORD
WORD
WORD
WORD
WORD
. WORD
. WORD
. WORD

000000G
0000006
000000G
000000G
000000G
000000G
0000006
000000G

000172

GOO000G

000174
000176
000200
000202
000204
000206
000210
000212
000214
000216
000220
000222

. WORD
. WORD

000000G

000134
000136
000140
000142
000144
00C146
000150
000152
000154
000156
000160
000162
000164
000166
00C170

. WORD
.WORD
.WORD
.WORD
. WORD
. WORD

000000G

000114
000116

000120

15 Dec-1983 10:24:41
15 Dec 1983 10:21:50

SC.DST
SC.EC9
SC.576
SC.FCT
SC.ECC
SC.RCY
NULL

SC.SwWP
SC.HWP

SC.FE2

NULL
SC.ISe

SC.DS2

SC.EC9

NULL

. WORD
. WORD
. WORD
. MORD
. WORD
. WORD
. WORD
.WORD

NULL
SC.ECD
SC.EC!
SC.€C2
SC.EC3
SC.EC4
SC.ECS
SC.EC6

TBL .CNT: . WORD

SC.CT0

.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL

.GLOBL
.GLOBL
.GLOBL

SEQ Ol

VAX-11 Blies 16 v3-55
Page
SPIDERSUSERS
: [DOUCETTE .FALCON JCNRJAA .8 |

SC.EC7
SC.EC8
NULL
SC.00A
SC.0D8
SC
. NXM
SC.PAR
SC.SDS
SC.EDC
SC.I0S
NULL
SC.SRY
SC.SRI
SC.POE
SC.RDY
SC.CLK
SC.RSP
SC.SUR
SC.PSP

CST, CST.ADDR, OCT, OCT.ADDK, RDRX.ADDR
IRORX.ADOR, DUPPKT, TALLY, T,LADDR
C.ERR.TBL, MSCP.PKT, IPKT.ADOR
PKT USE, RETPKT, RP USE. RP,INDX
RP.ADDR, ELOG.PKT, BUFF
. ADDR, BUFF
, OWN

IODG, IODQ.IN, IODQ.QUT, ENTRY,REASON
EOP.FLAG, DUP .FLAGS, CCTLR, CDISK
CUOFF, CTLR.CNT, DUR, QIO, FREE.MEM.ADCR

MLO

NRGAM >
Vol

RD/RX EXERCISER

REPOR®

CODING

15 Dec 1983 10:24:41

SECTION

15 Dec

1983

VAX-11 Blies 16 V3 555

10:21:50

BYTS.PER.QIO,

.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL

S5.DUPPKT, S,PATTERN, CREDIT.BAL
NEXT.PKT ,USE, DU.M3G, DU.RSN, ERR.COD
ELG.FMT, HWG1, HWQ2, HWQA3, HWG4
HWQES, HWQ@6, HWQ7, HWQB, HWQ@9, HWQ1O0
HWQLll, SWGL, SWQ2, SWQ4, SWQA?
SWQ9, 5SWQAl0, SW@ll, SWwl2, SWQl3
SWQ14, SWQ15, SWQLl7, SWQl19, SuWG22
SwWMl, NULL, MSG.01, MSG.02, MSG.O3
RPT1, RPT2, RPT3, RPT4, RPTS, RPT6
RPT7, RPT3, RPT9, RPT1Q, RPT11
RPTi2, RPT13, RPT14, RPT15, RPT16

.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
.LLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL

.GLOBL
.GLOBL
.GLOBL

ST.CODE,

SB.COOE

STEP, OF .RC, SA.REG, CMD.TIME
NEX, CRN.L.OW, CRN.HIGH, P.INDEX

EGS.01,

EGS.02,

EGD.10, EGD.11

EGD.12, EGD.13, EGD.14, £GD.15
EGD.16, ECD.17, EGD.18, EGD.20
EGD.21, EGD.22, EGD.23, EGHM.30
EW.0, EH.1, EH.2, EH.3, EH.4, EH.5
EMH.&, EH.7, EH.8, EM.9, EH.10
EH.12, EH.13, EBS.01, EBD.10, EBD.12
€BD.13, EBD.14, £€BD.18, EBD.19
ELG.00, EX.BDR, EX.BOW, EX.LBR
EX.LB8W, EX.RBN, EX.CBR, EX.CBW
XxX13, XX14, xXiS, XX16, XX17, XX18
XX19, XX20, XX21, XX22, XX23, XX24
XX25, XX26, XX27, XX29, XX30, XX31
Xx32, XX33, XX34, XX35, XX37, XX38
XX39, XXA40, XX41, €B8.0CT, EB.COMM
EB.PKY, EB.RAL, EB.ADDR, EBNEX1
EB.NEX2, EBNEX3, CER.OL1, CER.O2

EX.SEQ, EX.CRD, EX.MTN, EX.DGM
EX.RD, EX.WRT, EX.ACC, EX.ONL
EX.SCC, EX.GDS, EX.ESP, EX.ELP
EX.SDD, EX.RCD, EX.ABP, SC.SDI
SC.CON, SC.OUP, SC.ONL, SC.SON
SC.UNK, SC.vOL, SC.I0P, SC.OIS
SC.FER, SC.FE2, SC.ISH, SC.IS?2
SC.DST, SC.DSe, SC.eCC, SC.ECD
SC.RCT, SC.FW, SC.576, SC.FCT
SC.EC1, SC.EC2, SC.EC3, SC.EC4
SC.ECS, SC.EC6, SC.EC7. SC.EC8
SC.EC9, SC.SwWP, SC.P, SC,00A
SC.00B, SC.NXM, SC.PAR, SC.CTO
SC.S0S, SC.EDC, SC.IDS, SC.SRT
SC.SRI, SC.POE, SC.ROY, SC.CLK
SC.RSP, SC.SUR, SC.pPspP, F 1, F.2
F.3, F4 FS.F6.F.7 F.8, F.9
F, 10. F. 11. F.12, F.13, F.14, F .15
F.16, F.17, F.IB. F.19, F.20, F.21
EBH.30, EBH.44, EBH.QS. EBH.
46
EBH.A47, EBH.48, EBH.49, DF .0, DF.l
DF.2, OF.3, DF.4, DF, 5. DF .6, OF.

T.QUE, T.DEF, T.INF, T.TER, T. FAT

T.SPL.,
M _ASC,

E.UNT,
M.BIN,

E.BLK,
H.TER.

E.DEV,
M.COD,

Page 131

SPIDERSUSERS:([DOUCETTE.F ALCONICNRGAA 8L 1

.GLOBL

.GLOBL
.GLOBL

SEU 01

E.ZER
M.DAT

(

N1O
RD/RX EXERCISER

NRQAM,
vOol..

REPORT

)

15 Dec 14983
15 Uec-1983

CODING SECTION
.6.0BL
.GLOBL
.GLOBL
.GLOBL

100000

040000

020000
010000
004000
002000
001000
000400
000200
000100
000040
000020
000010

000002
000001
001000
000400
000200
000100
000020
000010
000002
000001
000040
000037
200036
000035

000340

000240

BIT1S==

BIT14=>»
BIT13==
B8IT12==
BIT1ll=BIT10==
BIT09==
8IT08-=
BITO7==
B8I106=~
BITOSs==
BITOA4==

BITO3=>»
BITO2==
BIT01s=
BIT00==»
B8I19=+=
BIT8s=BIT7==
BIT6=BITSs-

BIT3=»
B8IT2==
B8IT1e=
8IT0Q==

EF .START
==

==
EF .RESTART
EF .CONTINUE
==
e
EF .NEWs

EF .PURe==
PRIO?7
==
PRIOG==
PRIQS=~
ORIOA
==

PRIO3=-

PRIO2=PRIO1
==
PRIOO=~EVL ==
LOYII
ADR ==

I0U=~ISRs=s

UAH-BM-.

PNTe
PRIe»
IXE ==

=IBE

10:24:41
10:21:50

M.UR, M URP, M.UP, M. UL,
RORX.ERR, EX.WRD, EX.OP,

CNTR.ERR
SPACE4

CRLF, DASH, ASTERISK, SWP.FLAGS
LSHIMEM, LSLUN, LSUNIT
100000

40000

20000
10000

4000

2000
1000

400

200
100

20
10
4

2
1
1000

400

200
100

20
10

SEQ_017%0
VAX 11 Blies 16 v3-555
Page 13¢
SPIDERSUSERS
: [DOUCETTE.FALCONICNRQAA .BL 1 (2K

1Y
+¢

pAbRCIVER

REEOR"

~O0ING

ACTIN

1¢R.

22000C

000010
000014
000016
000020
000024
000030
000032
000034
000040
000044

000030
000062

000070
000074
000076
000100
000104
000110
000112
000114
000116
000120
000124
000130
000132
000136
000140
000142
000144
000150
000154
000156
000162
000164
000166
000172
000176
000202
000206
000210

LRPT

00418°
01,746
012746
010600

104416
012716

012746

010600
104416
012716
012746
010600
104416
012716
012746

010600
104416
012716

013746

104416

MOV
MOV
MOV

ORPT2,(SP)
o1, (5P)

MOV
MOV
MOV

ORPT3, (SP)
o1, (5P)
SP,RO

MOV
MOV
MOV

MRPT4,(SP)
o1, -(5P)
SP,RO

MOV
MOV
MOV

104416
005003
010316
004737

012746
012746
010600

R1,8SAVES

TRAP

012745
010600

111016
042716

JSR
MOV
MOV
MOV
TRAP

TRAP
MOV
MOV
MOV

012746

132710
001020
032710
001413

LRPT REPORT
$CODES,
RO

TRAP

104416
012716

012702
010216
004737
010201
006301
010100
063700

LSBT
.PSECT

TRAP

010600

TRAP

1s:
2s:

CLR
MOV
JSR

MOV
MoV
JSR
15.0)']

MPT1,

'ALCON!CNlJ.‘.:??

e
.

(vP)

SP.RO
16

16
ORPT6,(SP)
1, (5P)
SP,RO

R3,(SP)
PC.SET.CPAR
®3,.Re
R2,(SP)
PC.SET ,UPAR
R2.A1

000004

8178

o4 ,(RO)

040000

817
8EQ
MOVe
81C
MOV
MOV
MOV
MOV

TRAP

Spo.

SP,e
5323

SP,e

3326

MRPTS,(SP)
o1, (SP)
SP,RO

MOV

0000006
0000006
000003

R4 TR

CODING SECTION

el, (SP;
SP.RO

R1
R1.RO

ASL

177774

vArY |1 B] e 16 ¢3 S5%
“PIOERS 'SERS: (DOUCE T TE

100000
L SHROULN.2
LSSFTLN.2

L $TMARD
- ~
L 8SOF T

0L04s.
2

10:c4:41)
10:21:%0

40000

ha.-

{1 V0000
w0034
wCoL S

1948
1988

20000

JOf

40000

Dec
Dec

5827

Spo.
3328

SP,e

CTLR

5330
5382

;
:

¢,0ISK
DISK,
e

5334
53%

DISK,»

5338

CST.ADDR ,RO
5389

(RO),(SP)

#177774,(SP )

LSLUN,

(SP)

MRP17,-(SP)
3, (SP)
SP.RO

5%41

S
RD/Rx EXERCISER

REPOR*
062706

010100
063700

132710
001420
032710
001415
111016
042716
013746
012746

012746
010600
104416
062706
010100

063700
032710
001506
013700

000006

1% Dec
1% Dec

CODING SECTION

3s:

ADD

0000006
000004

- 39(:)
BEQ
8rv
BEQ
MOV8
81C

040000
177774

0000006
0000006
000003
000006

000000G
040000

ALD
MOV

CST.ADDR,RO

000470

012746
012746
010600
104416
013700
005016
116016
005046
116016
005046
116016
005046
116016
003046
116016
005046
116016
005046
116016
005046
116016

VAX

Bl.es

SPIDE[DOUCE
RSUSE
TTE F AL C7ati
RS:
) (ks

- age

La
L

Lra

04 ,(RO)

#40000,(RO)
4

5344

(RO),(SP)
#177774,(5SP)
LSLUN, (SP)
e#RPT8, (SP)
83, (SP)

S344

R1,RO

5348

SP,RO
16
6 ,5P

CST,.ADDR,RO

gQOOOO,(RO)

5353

5356

016016

016046

10:¢4:41
10:21:50

06, 5P

R1,RO

T.ADDR,RO

016016
016046
016046
016046
016046
012746
012746
010600
104416
013700

016046
016045
016046

1983
1983

000024

5359

67(R0O),(SP)
-(SP)
66(RO),(SP)
-(SP)
63(RO),(SP)
-(SP)
64(R0O),(SP)
-(SP)
63(R0O),(SP)
-(SP)
62(R0O).(SP)
-(SP)
61(RO),(SP)
-(SP)

60(RO),(SP)

1J
RD/RXx EXERCISER
REPORT CODING SECTION

NRQAM?
vol.c

000502
000506
000512
000514
000516
000522
000526
000532
000534
000540

000542
000546

000552
000554
000560
000562
000566
000572
000574
000576
000602

000610
000612
000616
000622
000630
000632
0006 36
000642
000650
000652
000654
000656

000662

000672
000676

000700
000702
000706
000712
000714
000716

200722
000726
000730
000732
00073%6
000742
000744

012746
012746
010600
104416
062706

062702

020227
003002
000137
010316
012746
004737
005726
005760
100026
012716
012746
010600
104416
010300
006300
005016
116016
005046
116016
012746
012746
010600
104416
062706
012716
012746
010600

15 Dec
15 Dec

0000006
000011

000052
000005
000022
000612

000056
0000006

012746

010600
104416
012716
012746
010600

104416
012716
012746
010600
104416

ORPT10,

MOV
TRAP

5P ,RO
16
a52,5P
o5,R2
R2, 020
64
24
R3,(SP)
@56, (SP)
PC,BL ML

ADD

5%:

ADD

cHpP

8G1
64:

JHP
MOV
MOV

JSR

187
18T
8P
MOV
MOV

0000026

000000G
000001

MOV

TRAP

MOV
ASL

CLR
HOvE
CLR
Move
MOV
MOV
MOV

0000016

000003

TRAP

ADD

000010

MOV
MOV
MOV
TRAP
TS7

030001

104416
005726
005203
000243
003002
000137
012716
012746
010600
104416
012716

MUV
MOV

8s¢:

198%
1983%

10:¢24:41
10:21:50

SEQ 0172
) age
VAX 11 Blies 16 v3 <55
139
SPIDERSU
[DOUCETTE ,FALCON]ICNRQ
SERS
AA .BL
:
L 1)

(SP)

;
s

¢,018m
DIoV,e

CTLR,»

S367

o1, -(SP)
SP,RO

16
R3.RC
RO

s CTLR,

SP.RO
16

#10,5P

5366
5371

OCRLF ,(SP)

INC
LWORD CLv!CLC

CTLR

TRAP

MOV

MOV
MOV
TRAP
MOV
MOV
MOV
TRAP

5368

(SP)
C.ERR.TBL+1(R0O),(5P)
-(SP)
C.ERR. TBL(RO),(SP?

Spn‘

MOV
MOV
MOV

5364

#MRPT11,(SP)

JP
MOV
MOV
MOV

5350
5334

(SP).
CST+2(RO)

SP.RO

8GT

0000006

e11,

84
14
OCRLF ,(SP)

S331
5330

5375

v’
1

MPT13,(SP)

5376

16
MRPTY14,(SP)

5377

SP.RO
16

#RPT15,(SP)

SP,RO
16

SP.»
5378

bl
15 Dec 1983
15 Dec-1983

RO /RX EXERCISER
REPURT CODING SECTION

NRQAM.
%Ol.é

00274¢
000750
000752
000756
000762
0C0764
000770
000772
000774
001000
001004
001006
001012
001014
001020
001024
001030
001034
001040
001042
001046
001052
001056
001062
001064
001066
001072
001076
001102
001104
001106

104416
062706
062701
020127
003727
005202
000243

001110
001112
001116
001122
001124
001126
001132

003717
012716
012746
010600
104416
062706
000207

205202
010216
004737
012701
010116

004737
010100
006300
063700
132710
001432
032710
001427
013703
016316
016346
016346
016346
111046
042716

013746

012746
012746

016600

000000V
000003
000000V

CLR

JSR

PC,SET.CPAR

94
:

MOV

10¢:

MOV
MOV

:
;

004737
104425
000207

. UPAR
PC,.SET
R1,RO

RO
CST.ADDR,RQO

8IT8

040000
0000006
000050
000052

000054

000056

177774

940000, (RO)
11%
T.ADDR,R3
50(R3),(SP)
52(R3), -(5P)
S54(R3), -(SP)
S6/R3), -(SP)
(RO), -(SP)

116:

0000006
000001

MOV

SP.RO

000462

Routine Size:
4 words,
Maximum steck depth per

016,SP
ADO
ADD
#5,R1
cre
R1, 022
BLE
104
INC
R2
.WORD CLV!CLC

5379

¢,DI5F

5382

;s DISK,s

5385

5389

;s DISK,»

5381

S3iea

SP-.

s o,0ISK
; ODISK,
s

5282

s CTLR

5379

5394

OCRLF ,(SP)

MoV

SP.RO

#30,5P

5313

5394

ADD

RYS

LIRPT:

CTLR,»

BLE
MOV
TRAP

000030

#177774,(SP)
LSLUN, -(SP)
MRPT16, -(SP)

TRAP

000016
000005
000022

s CTLR

11¢

8IT
8EQ
MOV
MOV
MOV
MOV
MOV
L]

8IC
MOV
MOV

0000006
000G00G
000007

SEQ 01’4
VAX 11 Blies 16 v3-555
13 “
SPIDERS$USERS: (DOUCETTE. FALCON]FNROAA 811 7 ]

04,(RO)

B8EQ

302 worde,
RAoutine Bese:
$CODES
Maximum stack depth per invocetion:
34 words

000000
000004
000006

03,R1
R1,(SP)

JSR
MOV

; Routine Size:
:

R2,(SP)

ASL
ADD

000000G
000004

10:24:41
10:21:50

+ 0462

.SBTTL

LSRPT REPORT COOING SECTION

PC.LRPT
25

JSR
TRAP

RTS

$CODES
Routine Base:
invocation:
2 words

SP,e

+»

1616

1]
NRQAM.

RD/RX EXERCISER

\)01.2

H
:
H
:

INITIALIZE

5397

5398
5399
5400
5401

:
:
H
H

5402
5403
5404
5405

Ss:g

:
:

H
:
:
.
:

:
:
H

H
:
.
:
:
:
:
:

5;8?

S410

S5S411

5412

DELAY _MULT : word,
FLAG : byte.
TEMP : word,
MIPT _REF : ref block (HWPT LEN, word] field (HWP FIELDS),
CLEAR_TABLES

SETPRI (PRIO7);

PRIORITY

i f READEF (EF _NEW)

1S THIS A NEW PASS?

THIS

THIS A RESTART?

IS THIS A CONTINUE?

ARE WE HERE BECAUSE OF POWER FALi ?

then

end;

S422
5423
5424

i f READEF
then

(EF _START)

5430
S431
S432

if READEF
then

(EF _RESTART)

5425
S426
5427
5428
5429

5436

end;

if READEF
then

5443

:
.
:

5445
5446
S447

else

5449

end;

5448

$450
S451
5452

A START?

in
ENTRY _REASON = RESTART;
CLEAR_TABLES +« TRUE;

;

5444

NO INTERRUPTS ALLOWED DURING INIT

in
SET;
ENTRY _REASON = START;
CLEAR _TABLES = TRUE;
end;

5440
Sa41
S442

.
.

.
.
.

byte:

S421

S437
S438
5439

(EF _CONTINUE)

in
ENTRY _REASON = CONT;,;

if (.SWP_FLAGS end SWF _CST) neq SWF _(CST

then

CLEAR _TABLES = FALSE

ClLEAR_TABLES = TRUE;

f READEF
then

(EF _PWR)

SEQ 013%

SPIDERSUSERS
: ([DOUCETTE .FALCONICNROAA

locel

5419
5420

10:21:50

BGNINIT;

“F (.SWP_FLAGS and SWF _CST) neq SWF _CST
then
CLEAR_TABLES = FALSE
else
CLEAR TABLES = TRUE;

1983

VAX-11 Blies-16 V3 55%

INITIALIZE SECTION’

5415
5416
S417
S418

.
:
:

;

15 Dec

ENTRY _REASON = NEW_PASS;

5433
S4 34
5435

SECTION

55213

:
:
.
;

wsebttl

15 Dec 1983 10:24:41

137

.BLY (39

GIL
NRQAM?

RO/RX EXERCISER
INITIALIZE

SECTION

15 Dec

1983 10:24:41
1983

10:21:50

VAX

11 Blies 16 v3-555

S€0 013,

5‘53

S$454
5495
;’:g‘;

ENTRY _REASON = PWR _FAIL;
CLEAR_TABLES = TRUE;
PRINTF (MSG_01);

5458
54%9

incr COUNT from O to 60 do
begin

“POWER DELAY

WAITING"

WAIT APPROX.,

60 SECONDS

Bs
Bs
G2
G
T+
G
B
G
B

DELAY _MULT =« 333,
DELAY (.DELAY_MULT);

S462
5463

BREAK ;
end;

BREAK FOR ACT

S464

5465

5466
SS:g;

SET ODT

end;
SETVEC (O TVEC,

O_BRK,

PRIO7);

TRAP VECTOR

'JSD REV A

5469
5470
S471
5472
5473
S474
5475
S476

5477

;gg

S
B

5491

THAT

NOT

THAN MAX_UNITS

HAVE

ERRSF

XL
XL XL X

DOCLN;
end;

(1,

EGS_O1,

SPECIFIED.

EMS_01);

THE FOLLOWING COOE IS EXECUTED FOR ALL ENTRY REASONS EXCEPT NEW_PASS,
ALL RUN-TIME CONTROLLER STATUS TABLES (CSTe) ARE CLEARED TO O, THEN
LOADED WITH CONFIGURATION DATA FROM THE HARDWARE P-TABLES.

( .ENTRY_REASON neq NEW_PASS)

then

begin

5492

incr COUNT from O to ((MAX_CTLR ¢ CST_LEN ¢ 2)

incr UNIT

;gz

BEEN

f _LSUNIT gtru MAX_UNITS
then

5479
5480
5481
5482
S483
5404
5485
5486
5487
5488

SURE

IF THERE ARE TOO MANY, NOTIFY USER AND RETURN TO SUPERVISOR.
(DIAGNOSTIC IS ABORTED).

(CST

.COUNT)

= Oy

2) by 2 do

from O to (.LSUNIT

1) do

LOOP THROUGH ALL UNITS

IF P TABLE FOUND

5497
5498
5499

5500

5501
gssgg

i? GPHARD (.UNIT, MWPT_REF> neqs O
then
in

?:’G s NOT_FOUND;

incr CTLR from O to (MAX_CTLR

1) do

LOOP

THROUGH ALL

CSTs

®e

MAKE

€478

B¢

5460
5461

5504
5505

5507

5508

if .CST [.CTLR,
then

IP_ADDR) eqla

if .CST [(.CTLR,

then

.HWPT REF

Pege 138

SPIDERSUSERS: [DOUCETTE,FALCON ICNROAA .BL1

vOl.c

15 Dec

[HWP _IP ADDR]

.HWPT REF [HWP DISK_NUM] & UNIT SIZE « OF UN, D PRES]) eql NOT_PRESENT

(3%

[l
NRGAM2

RD/RX EXERCISER

\;ox.;

INITIALIZE

15 Dec 1983 10:24:41

SECTION

15 Dec

1983

VAX 11 Blies-16 V3-555

10:21:50

5509

begin

5511

€ST [.CTLR, .TEMP, D _ALL) = .HWPT_REF [HWP_DISK};

;
:
:
;

5522
5523
5524
gggz

if (.CST [.CTLR, .TEMP, D_TYPE} eaql RX_50) and
(.CST [.CTLR, .TEMP .+ 2, D END] gtru RX_MAX LBN)
then
CST (.CTLR, .TEMP « 2, D_END) = RX_MAX_LBN;

;
H
H

5527
5528
5529

FLAG = FOUND;
exitloop;
end

;
;
:

553}
5532
5533

:
;
;
;
;
;
;
;
;
}

;

$510

5512
5513
5514
5515
5516
SS17
$518
519
gggg

5539

5541
5542
S543
gss:g

5546

5547
5548

5551

;
:

;
;

;

“DUPLICATE UNIT:

DROP UNIT

.HWPT_REF
XX AT

! CONFIGURATION ERROR

DOOU ( .UNIT);

f .FLAG eql NOT_FOUND

then

incr CTLR from O to (MAX_CTLR

1) do

if .CST [.CTLR, IP_ADDR) eqle O

then

LOOP

Ti ROUGH EACH CST

' IF EMPTY ~ST FOUND

CST (.CTLR, .TEMP, D_FATAL) = FALSE;

5560
$561
gssgg

5564

XXXXXX”

begin

5556
5559

[HWP_IP_ADDR));

t IF NO IP ADDR TMaTCH TO EXISTING CST

CST (.CTLR, .TEMP, D_ALL) = .HWPT_REF [HWP_DISK);

5558

IP:

end;

5554

5555

! COPY DISK ADDR AND PROT BIT

exitloop;

CST [.CTLR, BR_LEV) = .HWPT_REF [HWP_BR_LEVEL);

:
;

5552

5557

;
;

! DUPLICATE UNIT
.HWPT_REF (HWP_DISK_NUM),

FLAG
= FOUND;
CST [.CTLR, IP ADDR] = .MWPT_REF [HP_IP_ADDR);

5553

! IF EMPTY SLOT FOUND

« OF _UN;

5549
5550

;

begin
PRINTF (CER_O1,

5537

& UNIT_SIZE

.TEMP. D_UNIT] = .UNIT;
.TEMP. D_FATAL] = FALSE;
.TEMP, D PRES] = PRESENT;
.TEMP . 1, D_BEG] = .HWPT_REF [HWP_BEG_TRK);
.TEMP + 2, D_END] = .HWPT_REF [HWP_END_TRK];
.TEMP + 3, D_DBN) = O;
.TEMP « 3, NODUPMEDIA) = NOT(.HWPT_REF [HWP_DUPEX]);
.TEMP + 3, DUPWRITE] = (.HWPT_REF [HWP_DUPWT));
.TEMP . 4. D COUNT) = 0;

FLAG = FOUND;

:
3

;
:

(.CTLR,
(.CTLR,
[.CTLR,
[.CTLR,
[.CTLR,
[.CTLR,
(.CTLR,
[.CTLR,
[.CTLR.,

(MWP _DISK_NUMJ

5536

5535

5540

;

_HWPT_REF

DUR [.UNIT) = DU_CONF;

;
;
;

else

5534

5538

H
:

CST
CST
CST
CST
CST
CST
CST
CST
CST

5530

TEMP

Pege 139

SPIDERSUSERS
: [DOUCETTE .FALCONJCNRQAR .BL1

:
:

SEQ o1 Y7

CST [.CTLR, VEC_ADOR] » .HWPT_REF [P _VECTOR];
TEMP = .HWPT_REF (HWP_DISK_NUM) & UNIT_SIZE . OF _UN;

CST [.CTLR,

.TEMP,

D_UNIT)}

.UNIT;

CST [.CTLR,

.TEMP,

D_PRES)

= PRESENT;

CST

.TEMP

« 2. TEND)

1COPY DISK ADDR AND PROT BIT

CST (.CTLR, .TEMP . 1, o _BEG) = .MWPT_REF (HWP_BEG_TRK];
(.CTLR,

CST [.CTLR, .TEMP
CST [.CTLR, .TEMP
!

.MWPT_REF

[HWP_END_TRK];

, D_DBN] = 0,
NODUPMEDIA) = NOT( .HWPT_REF (HWP_DUPEX]);

CHECK TO see IF PROGRAMMER WANTS TO NOT WRITE TO DBSNs.

CST {.CTLR,

.TEMP + 3, DUPWRITE]

= (.HWPT_REF (HWP_DUPWT]),;

( 29

p
RD/Rx EXERCISER
INITIALIZE

@e
#r
as
@1
®1
o
@s
er

15 Dec

5565

CST

5567
5568
5569

if (.CST (.CTLR,
(.CST (.CTLR,
then

gg;o

{.CTLR,

CST

1
$572
22;3

.TEMP

+ 4,

$575
$576
5577

i1f FLAG eql
then
begin

5579

DUR

5578

PRINTF

(.CTLR,

.TeMP

5580
5581

NOT FOUND

(CER_02,

(.UNIT])

gssgz

CTLR);

DU_CONF;

O0DU (. UNIT);
end;

5582

MAX

D_COUNT])

10:21:50

=« 0;

D END)

EMPTY

NO FMPTY CST FOUND

'MORE

end;

= RX MAX LBN;
CST

THAN

FOUND

DIFFERENT

CONF IGURATION ERROR

ADOURESSES.-

DROP UNIT

¢t

[F NO IP ADDR MATCH IN CST

s
ws
@
@
&
B

5586

5587
5588
5589

5590

gggé

end;

IF GPHARD RETURNS A HWP TABLE

CONF IGURATON CHECKX FOR LEGAL RDRX UNIT MIX BECAUSE WF- 4AVE OIFFERENT
DRIVES :
THE RDS1, AND RXS0.
(NEEDED?)
end;

END OF

”"NON NEW_PASS”

INITIALIZATION

es
B

5585

5593
gg‘)‘

5596
95

5597

gggg

beo

NEW_PASS

incr UNIT

from O

to (.LSUNIT

GPHARD (.UNIT,

MPT_REF);

incr CTLR from O to (MAX_CTLR
bovin
CST
[.CTLR, U_CNT] = O;

1) do

DUMMY GPHARDs FOR NEW PASS

1) do
! REINITIALIZE UNIT COUNT

5604
5605

incr OFFSET from (O + OF _UN) to (3 & UNIT _SIZE « OF _UN) by UNIT _SIZE do
CST (.CTLR, .OFFSET, D_STAT]) = OFFLINE;
¢ START EACH UNIT AS OFFLINE

5607

end;

5609
5610
5611
5612

S613

%};

end;
if .ENTRY_REASON eql
then

begin

CTLR_CNT

START

= 0;

NUMBER OF CONFIGURED CONTROLLERS

IF CONTROLLER IS PRESENT

INCREMENT CONTROLLER COUNT

®s

5600
5601
gggg

if _ENTRY_REASON eql
then

alg
1

5618
S619
5620

incr CTLR

from O to (MAX CTLR

1) do

if .CST [.CTLR, IP_ADOR) neqa O
then
CTLR_CNT = _CTLR_CNT « 1,

SEQ 013

Page 140

SPIDERS$USERS:(DOUCETTE.FALCONICNRIAA.BL 1

.TEMP, D_TYPE] eql RX S50) and
.TEMP . 2, D END] gtru RX MAX LBN)

eritloop;
end;

1983

VAX 11 Bl.ss 16 v3 555

SECTION

5566

$91.¢

15 Dec 1983 10:24:41

NRQAM.

L
(3%

J11
NRQAM,.

RD/RXx EXERCISER
INITIALIZE

5621

5622
S623

MEMORY

S624

5625
5626

5627
5628
5629
S€E O
S 51
¢ .3»%
»6
2634
5635

5636
S637

SECTION

(FREE

MEM_ADDR);

end;
!
!
!

CLEAR STATISTICS

1983

10:21:50

11 Blies 16 V3 555

SEQ 017

SPIDERSUSERS:
(DOUCETTE ,FALCONICNRQAAR

GET

END OF

CLEAR CURRENT

IF CLEAR TABLES ON EVERY PASS

Page
B 1

(

START OF FREE MEMORY

“START” INITIALIZATION

incr UNITS from O to MAX_UNITS - 1 do
incr COUNT from TALLY _CLEAR to TALLY_LEN
[.UNITS & TALLY_LEN +

STATISTICS

if _CLEAR_TABLES
then

TALLY

Dec

VAX

TABLES

incr UNITS from O to MAX_UNITS
1 do
incr COUNT from O to TALLY_CLEAR - 1 do
TALLY [.UNITS & TALLY_LEN « .COUNT]

Ssggg

1983 10:24:41

.COUNT)

1 do

= O;

INITIALIZE TOTALS

S640
S641

Sssg

if .CLEAR_TABLES
then

incr CTQR from 0 to MAX_CTLR

000004
000010
000014
000016

000022
000024

000026
000034

000040
000047

C_ERR_TBL [.CTLR, C_ERR_MHRD) = 0;
C_ERR_TBL [.CTLR, C_ERR_SFT) = 0;
end;
cmem

5649
5650
5651
5652
55222

1 do

!
'

INITALIZE CONTROLLER ERRORS

¢t

INITIALIZE NC.

MISCELLANEOUS

INITIALIZATON

S
B:
W
85
B¢
@1
83
We
1

000000

S644
5645
5646
5647
5648

B¢

vol.c

15 Dec

incr CTLR

from O to (MAX_CTLR

QI0 (.CTLR])

= O;

1) do

OF OJTSTANDING QIOS

%gz

CRN_LOW = CRN_HIGH = O;

INITIALIZE COMMAND REF NUMBER

%g;

SETPRI (PRIOO);

SET PROGRAM PRIORITY

5659

ENDINIT;

004137

162706
012700
10444)
012700

104447

103012

112737
105737

100402
105005

0000006

000020
000340
000035

000005 000000G
0000CG0G

LINIT:

.GLOBL

LsDLY

LSBTTL

LINIT INITIALIZE SECTION

SUB
MOV
TRAP
MOV

#20,5SP
#340,R0
41
¢35,R0

JSR

TRAP

BHIS

MOVE
1578

8MI
CLRB

R1, $SAVES

47
24

5 ,ENTRY . REASON
SWP ,FLAGS

14
RS

TO O

5396

5408

5410

:
i

5413
5415

CLEAR.TABLES

5417

i1
1%
15

EXERCISER

INITIALIZE SECTION

112737
112705

012700
104447
103005

112737
112705

012700
104447

103012
112737
105737
100402
105005

000402

112705

012700

104447
103036
112737
112705

012746
012746
010600
104417
012702
012703
010301
001411
013700
001404
005066
005300
001374
005301
000766
104422
005302
001360
022626
012746
012746
012746
012746
104437
023727
101405

104454
000001

0000006

BHIS

000001
000001
000037

000002
000001
000036

0000006
34-

BHIS

000000G
4%
:

MOVB
MOVB
MOV
TRAP

BHIS

MOVB
1S78

000003
000000G
0000006

000001
000034

TRAP
MOVB
MOVB
MOV
TRAP

5¢:
64:

8MI
CLRB
BR

MOve

TRAP

BHIS
MOVB
MOove

000001
000001
000075
000515

TRAP
T¢:

000022

9s:

10¢:

11s:

000340
170000
000140
000003
000000G 000004

12%:

CLR

v3-555

s ,CLEAR, TABLES

3
33
01 ,ENTRY REASON
¢1,RS
037 ,R0O

s ,CLEAR
. TABLES

4
@2 ,ENTRY _REASON

01.RS

236,R0
47
64
03 ,ENTRY ,REASON

. FLAGS
SWP
St

RS
6t
21,RS
€34 RO
47

SEQ 0140
142

SPIDEROUSERS:(DOUCETYE.FALCON]CNRQAA.887 (39

3)
#1,R5
©40,R0

;

¢,CLEAR.TABLES

5415
5419
S423

5425
5427
5428
5431
5434
5435
5438

S441
S443

;

CLEAR.TABLES

: «.CLEAR. TABLES

5445
S443
S447
5451

;

¢, CLEAR_TABLES

S454
5455
5456

;

SP,s

#515,.R3

;
;

¢, COUNT
¢, DELAY M7

11¢
LSDLY,.RO

o,83TMP]

3
:

$SsTHP
$sTMPL

;

SsTMP2

R2
74

; COUNT

128

04 .ENTRY .REASON

®MSG.01, -(SP)
SP.RO

7S, .R2

R3.R1

8s:

VAX

012700
104447
103006
104433

MJvB
MOV
TRAP

000001
000040

10:¢4:41
10:21:50

112705

1983
1983

000402

Dec
Dec

RD/Rx

10¢
22(SP)
RO
9

-3
22

;

DELAY MAT, ssTrMP2

S458
5460
5461

5458

(SP)e,(SP).

5453

3, -(SP)
37
04
LSUNIT,

S475

0340, -(SP)
4-10000, -(SP)

13
S4
1
€GS.01

546"

5478

L11
NRGAM.

RD-RX EXFRCISER

VIl.e

INITIALIZE

15 Dec

SECTION

15 Dec

1983 10:24:41
1983

10:21:50

VAX

11 Blies 16 v3 555

SEQ ©14!

Page

SPIDERSUSERS:
(DOUCETTE .FALCONICNRQAA . BL1

147}

(27

)

00032¢
000322

000000V
104444

000332
000334
000340
000342

001002
000137
005000
005060

000352

020027

000324

000346
000356

000360
000366

000372
000376

000402
000404

123727

062700
003771

0000006 000005
003530
000002

000054

000000G 000024

000137
016600

003504
000020

104442
010066

003500

000424
000426
000432

010416
012746
004737

000056
0000006

000436
000440
000446

000450
000454

105066
005004

005726
026076
001402

002744
000001

000470

012700

000006

000506
000512

042716
012746

000474
000500
000504

000516
000522
000524
000526
000530

000534
000540
000542
000544

000546
000550
000556
000560
000562
000566
000570
000572
000574
000600
000602

000606

112766

066600
010066
111016
004737
010003
005726
010416
012746

004737
010001
00576
060300

006300
032760
001132

010302
062702
010100
060200

006300

000001

18%:

000012

00001¢€

000022
000014

000027
000000G

040000

000003

000000G

016600

000020

000014

14
37¢
RO
CST(RO)

CMPB

ADD

0000066

02,R0

5483

;s
3

COUNT
¢(COUNT)

MOV

LSUNIT,24(SP)

JrP
MOV

354
20(sSP) RO

; UNIT,e

15%

20(sP)

TRAP
MOV

42
RO,22(SP)

CLRB
CLR

TST
cHp

BNE
JHP
MOV
MOV
JSR

JHP
MOV

MOVB
MOV

8IC
MOV
JSR
MOV
TST
MOV
MOV
JSR
4OV
TS7
ADD
ASL
8IT
BNE

MOV
ADD
MOV
ADD
ASL

MOV
ADD
MOV

MOV

16(SP)
R4

s
s

FLAG
CTLR

(SP).
CST(RO),822(S5P)

o ,HWPT REF

19¢

#6,R0O

22(SP) RO
RO, 14(SP)
(RO),(SP)

5497

5500
5502

3 CTLR,»

244
#1,12(SP)

®1,16(SP)

549%

UNIT

o,MIPT _REF

R4, (SP)
456, -(SP)
PC,BLSMUA

5492

s+ COUNT,»

17¢
348

5492
5493

o, COUNT

RO, 054

BEQ

19¢:

ENTRY _REASON, 05

cMP

ADD
MOV
MOV

177774
000005
000000G

012703
060003

017613

17s:

000000G 000022

000137
012766

000462

164 :

000016

BNE
JMP
CLR
CLR

CLR

0060022

001002
000137

EMS.01
44

BLE

000020

000410
000412
000416
000422

148 ;
15¢%:

000000G

013766

005066

13¢:

.WORD
TRAP

5504

‘

o.FLAG

HPT REF .o

CTLR,»

;
;
3
i

o, TEMP
o, TEMP

UNIT,e

5527
SS507

®177774,(5F)
5, -(SP)

PC.BL $MA
RO,R3
(SP)e
R4, (SP)
027,-(SP)
PC,BLSMA
RO,R1

(SP).
R3,.RO
RO
#40000,CST+6(RO)
234

R3,.R2
#3,R2
R1,R0O
R2,.RO
RO

TEMP,»

5510
5511

&CST,R3
RO,R3

814(SP), (R3)

20(SP),RO

3512

M, 1

000674
000700
000704
000712
000714
000716
000720
000724
000726
000730
000736
000740
000742
000744
000746
000752
000754
000756
000762
000766
000772
000776

001000
001004
001006
001010
001012
001016
001022
001024
001032
001034
001042
001044

001050
001054
001060
001064
001070
001072

INITIALIZE SECTION
000300
042700
042713
050013
042713

0352713

010100
060200
006300
016646
062716
013660
010100
060200
006300
012766
060066
016600
016076
010100

060200
006300
062700
105010
005046
132776
001401

005216
005116
011646
042710
006026
103002
052710
117616
042710
032726
001402
052710
010100
060200
006300
005060

1352713

001042
027627
101436
012776
000422
017616
117646
042716
012746
012746
010600

104417

SWAB
BIC
BIC
BIS
8IC
8IS

170377
007400
010000
040000

MOV
ADD
ASL

MOV
ADD
MOV
MOV
ADD
ASL
MOV
ADD
MOV

000022
000010
0000026

000004G 000010
000010
000022
000012
000010

MOV
MOV

ADD
ASL

000010

000016

20%:
100000

ROR

100000
000016
010000
000020

224

BCC
8IS
MOve
8IC
81T
BEQ
8IS
MOV

234

CLR
8IT8
BNE
cHp
8L0S
MOV
BR
MOV

21¢:

010000

ASL

000010G
000004

000010

001437

000010

000022
000014

177774

0000006
000003

CLRE
CLR
8178
BEQ
INC
com
MOV
8IC

MOVB

BIC

MOV
MOV

MOV

TRAP

1983
1983

10:c4:41
10:21:50

SEQ Olac

VAX-11 Bl .es 16 Vv3-555
Page
SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA . BL1

RO
#170377,.R0
07400,(R3)
LO0,(R3)
€10000,(R3)
#40000,(R3)
R1,RO
R2.RO
RO

22(SP),

#10,(SP)

(SP)

, ¢
TEMP

;

HWPT REF ,»

;

TEMP,»

144

(379

5513
5514
3515

8(SP)+,CST«2(RO)

R1,R0
R2.RO
RO

5516

#CST.4,10(SP)

RO,10(SP)

227SFP),RO
12(R0O),810(SP)

R1,RO
R2,.RO
RO

000662

15 Dec
15 Dec

000644
000650
000654

EXERCISER

HWPT REF , o
o(HWPT
REF ),

000612
000614
000620
000624
000626
000632
0006 36
000640

RD/Rx

NRQAM?
vol.¢e

TEMP,»

#CST+6,RO
(RO)
-(SP)

5517

5518

#10,816(SP)
20¢

(SP)
(sP)
(SP),-(SP)

#100000,(RO)

(SP)e.
21
#100000,(RO)

816(SP),(SP)
#10000,(RO)
920,(SP).
224

#10000,(RO)
k1.RO
R2.RO
RO

5519

: TEMP,s

CST+10(RO)

#4,(R3)
25¢
810(SP), 01437
254
#1437,0810(SP)

258
822(SP),(SP)
814(SP), -(SP)

5522

5523

’

: HWPT.REF

@177774,(SP)

#CER.O1, -(SP)

€3,-(SP)
SP.RC
17

5520

SP,s

5525
5509
5532

NIl
RO/RX EXERCISER

NRQATM,
vol.c

0C1074
001100
001104
001112
001114
001116
001120
001122
001124
001130
001134
001136
001142
001144
001146
001152
001156
001160
001164
001166
001172
001200
001206
001212
00121¢
001222
001230
001234
001236
001244
001250
001252
001256
001260
001264
001270
001274
001276
001300
001304
001306
001312
001316
001320
001322
001324
001330
001332
001336
001342
001344
001350
001354
001356
001362

15 Dec
15 Dec

INITIALIZE SECTION

062706

016600

112760
104451
000405
005204
000243

003002
000137
105766
001402
000137
003004
010416
012746
004737
005726
0035760
001402
000137
112766
017660
016603
016301
042701
042760
050160
010301
11616C
012700
060300
0100645
111016
042716
012746
004737
005726
010002

000006
000020
000001

248

002252’
000016

017613

016600
000300
042700
042713
050013
042713
052713

25%:

003500

264
:

27%:

000056
0000006
0000006
003422°
000001
000016
000022
0000006
000022
000002
177000
000777
0000026
000002G
000004
000006
000014

177774
000005

000004G

06 ,5SP
20(SP),R0O
#1,0UR(RO)

TRAP

8GT
JMP
7578
BEQ
JMP
CLR
MOV
MOV
JSR
TST
ST

BEQG

:
284

JMP

MOVe

170377

010000
040000

VAX

V3 555

SEGQ 0143
P

age

SPILERSU
[DOUCETTE . .FALCONICNRJA
SERS
A .:
BLL

145

(29

UNIT,
s, o(UNIT)

CTLR

5535
5531
5502

FLAG

5540

; CTLR

5544
5546

CTLR,»

#1,16(SP)

ADD
MOV

#3,R2
R4, (SP)

MOV
ADD
MOV
MOV
SWAB
8IC
8IC
81s
81C
BIS

28¢

822(SP),CST(RC)
22(SP),R3
2(R3),R1
€177000,R1
#777,CST+2(RO)
R1,CST+2(RO)
RI,R1
4(R1),CST+4(RO)
#6,R0O
R3,.RO
RO, 14(SP)
{R0O),(SP)
®177774,(SP)
o5, -(SP)
PC,BL S$MUL

ADD
ASL

007400

254
184
16(SP)
268
344
R4
R4,(SP)
956, -(SP)
PC.BLS$MUL
(SP).
CST(RO)

MOV
MOV
Mov
8IC
8IC
8IS
MOV
MOVB
MOV
ADD
MOV
MOVB
8IC
MOV
JSR

MOV
JSR
MOV

000016
000022

10:24:41
10:21:50

8R
254
R4
INC
.WORD CLV'CLC

18T
MOV

062702
010416
012746

004737
010001
060200
006300
012703
060003

000000G

ADD
MOV
MOVB

1983
1983

(SP)RO,.R2

227, -(SP)
PC.BLSMUL
RO,R1

R2,RC
RO

oCST ,R3
RO.R3
816(SP),(R3)
22(SP),RO
RO
#170377,R0
#7400,(R3)
RO, (R3)
010000, (R3)
040000,(R3)

s ,FLAG

5549
5550
5551

HWPT REF , o
s(HW
REF
PT
),

5552

HWPT .REF , &
HWPT REF ,»
), »
PT
REF
«(HW

HWPT REF ,»

;

», TEMP

CTLR,»

TEMP,»

UNIT,»

;

¢, TEMP

5553

5554

5555

5556
5557

I‘.L‘
..

4N Ax EXFRCISER

% Oec 1968 10:04:41

vAZ

vege

vOl ..

INITIA $2€

1S Dec

SPIOERS JSERS: "DOUCE TTE . F ALCONICNR
JAs &,

SECTION

001%¢
001870
001372
001374
001400
001404
001410
001412
001414
00iaie

010100
060200
006300
016616 000024
002716 000010
0136C 0000020
010100
060200
006300
012766 000004G 200012

0V1434
001442
001444
V01446
0014%0
0014%
0014%

016076
010100
060200
006300
062700
10%010
005046

001466
001470
001472
001474

001401
00%21¢
005116
011646

001502

006026

001428
001430

001460

001476

001504

060066
016600

132776

042710

103002

001506

0%2710

001516
001522
001526
001530

042710
0832726
001402
052710

001542

005060

001512

001534
001%%
001540

001546
001%%2
001554
001%62
001564
001572
001574

001576

117616

010100
06U200
006300

132713
00101%
027627
101411
012776
00040%
005204

003002

001606
001612
001614
001620
001624
001630

105766
001017
012716
012746
012746
010600

001632
001634

000012

000137

104417
016600

000012

0000066
000010

000016

ADD
MOV
MOV
MOV
ADD
ASL
ADD
CLRS
CLR

R1,RO
Re RO
RO
24(SP),(SP)
#10,(5P)
P ,CST2(RO;
f1,R0
R2,RO
RO
oCST.4,12(5P)
RO,12(SP)
22(SP),RO
12(R0),812(SP)
R1.RO
R2,RO
RO
oCST.6.RO
(RO)
(SP)

8€Q
INC
comM
MOV

29
(sP)
(SP)
(SP), (SP)

elve

29
100000

8IC

ROR

8cc

100000

000016

304 ;

010000
000020
010000

31%:

000V10G

8IS

000012

001437

000012
324 :

010,816(5P)

10:21:50

:
s TeMP
o
; vPT
REE e

:
i TEMP
o

339

; HPT
REF e
: o(+aPT
_REF ), e
:
: TEMP,
o

%60

%61

#100000, (RO)

(SP).
304

9100000, (RO)

MOVS

816(SP),(SP)

5504

MOV
ADD
ASL

R1,RO
R2,RO
RO

:
i TEMP,

9543

8178
BNE
cre
8LO0S
MOV
8R
INC

o4, (RY)
334
912(SP), #1437
339
01437,812(5P)
33
R4

;

9567

9568

8870

+ FLAG

8578

5% '

eIC
817
8EQ
8IS

CLR

000004

000243

001600

001602

000012
000022

“U.
ADO
ASL
OV
ADO
MOV
MOV
ADD
ASL
MOV

1988

1] 8] we 16 ¢3 959%

NRQAM,

010000, (RO)
020,(SP).
314
10000, (RO)

CST+10(RO)

'
+ CTLR

5548
$544

.WORD CLV!CLC
002772

000016
000001
0000V0G
000002
00004

8GT
333

1ST8
BNE
MOV
MOV
MOV
MOV
TRAP
MOV

53¢

16(SP)
348
01,(SP)
®CER .02, -(SP)
02,-(SP)
SP,RO
17
24(SP) RO

1 SP,e
i

UNIT,»

5579

—_

RD‘RX EXERCISER

001714
001716
001722

001724
001726
001730
001732
001734
001740
001744
001750
00175«
001756
001762
001766
001770
001772
001774
002002
002006
002012
002014
002016
002020

002002
000137
123727
001051
013701
0C5002
000405
010200
104442
010066
005202
020201
002771
005004
010416
012746
004737
105060

010416
012746
004737
012702
010001

060201
006301

042761
062702
020227
003765
022626
005204
000243

002022
002024
002032
002034
002040
002042
002046
002050
002054
002060

003743
123727
001017
005037
005000
005760
001402
005237
062700
000243

002062
002064
002066
002072
002074
002076
002100

003767
104431
010037
005002
005001
010100
060200

0000006

HUV8

TRAP

000024

;
544
35%:

002224
000000G 000005

:
364

0000006

37¢:

000020
000020

38%:
000022

39s:
40%:

000056
7000056

000027
000003

41%:

cve
INC

(o]
B8GE

RO,22(SP)
R2

0000006

R2,R1

CLR
MOV
MOV
JSR
CLR8
MOV
MOV
JSR
MOV
MOV
RDD

R4
R4,(SP)
56, -(SP)
PC,BLIMAL
CST+5(RO)
R4,(SP)
€27, -(SP)
PC.BLSMA
#3,R2
RO,R1
R2,R1

8IC

#20000.CST(R1)

ADOD

cp
BLE

000022

cec

UNIT
UNIT,
e

UNIT
UNIT
.

UNIT,

388

434

444
;

434

MOV
CLR
CLR
MOV

RO ,FREE .MEM. ADDR
Re
R1
R1.RO

454
;
4614
:
474

ADD

5604
5605

CTLR

5601
5600

CTLR
o(CTLR)

Sela
5616
5618

¢,CTLR

5620
S561%

5622

R2,RO

5604

5611

CTLR,CNT
INC
ADD
256 ,RO
.WORD CLV!CLC
TRAP

s OFFSET

o OFFSEY

CST(RO)

BLE

5605

,e
OFFSET

(SP)Ye ,(SP).

444

757

5597

s
CTLR,

e
OFFSET,

R2,022
41

8€EQ

5598

CILR

5 .R2

40
ENTRY _REASON, #1
454
CTLR.CNT
RO

$59°

CTLR,»

BLE
crPB
BNE
CLR
CLR

£49%

o ,HWPT REF

UNIT

R4
INC
.WORD CLV!CLC

42¢:

53593

B8LY

11
A

20(SP),24(SP)
364

MOV
INC

B.FALLON]ONK
i

o,o(UNIT)

(SP)e,(SP).
20(SP)

164
ENTRY _REASON, 85
424
LSUNIT,
R1
R2
394
R2,R0O

ASL

020000

@1 ,DUR(RO)
51

JMP
CHPB
BNE
MOV
CLR
BR
MOV

TRAP

vVAX 11 Bl ee 16 v3
PIDERSISERS
: [ DOUCE

001666
001672
001700
001702
001706
001710
001712

026666

000001

10:/4:41
10:21:50

001652
001656
001664

112760
104451
022626
003266

1943
1983

)

001640
001646
001650

1% Dec
1% Dec

INITIALIZE SEC’ION

NRQAM,"
v01.¢

UNITS

COUNT
COUNT
.«

UNITS,
»

5630
5631
5632

b’
RD

NRGAM,
vOl..

INITIALTIZE

)

002132
002136
002140
002142
002146
002150
002152
002154
002160
002162
002166
002.70
00°174
002200
002202
002204
002206
002210
002214
002220
002224

006 300
005060
005201
020127
003767
062702
020227
003761
032705
001421
005002
012701
010100
060200
006 300
005060
005201
020127
003767
062702
020227
003760
006005
103011
005000
105060
105060
062700
000243

002226
002230
002232
002236
002240

003770
005000
105060
005200
000243

002242
002244
002250
002254
002256
002260
002264

003773
005037
005037
005000
104441
062706
000207

002102
002104

002110
002112
002116
002120
002124

002130

;

1% Dec
19 Dec

SECTION

ALl

0000006
000006
000034
000124
000001
000007

484 ;

494 ;

CLR

000033

(o,

508 :

0000006
0000016
000002

000000G

Sis:

524 :
53¢:

000000G
0000006

004737
104411
000207

001626°

Rout'ne Size:
4 words,
Mex imum steck depth per

55%

SEQ Gl4as,
Page

148

1 %y

BLE

53¢

CLR

CRN
. HIGH
CRN.LOW

41
030,5pP
PC

LSBTTL

:
1

¢,UNITS
UNITS
o

5630

;

o,CLEAR,TABLES

S634

5636

637

s CONY

COUNT,»

5437

¢, UNITS

5636

CLEAR_ TABLES

5640

CTLR

S642

:
s

o(CTLR)
o, CTLR

5645
5642

CTLR

5652

CTLR

5652

o(CTLR)

S6A4

S652

5655

5657

5396

5657

1626

LOINIT INITIALIZE SECTION
PCL,LINIT
11
PC

S%6%1

COUNT,»

UNITS,»

S1¢

LOINIT::USR
TRAP
RIS

COUNT

CLR
RO
CLRS
QIO(RO)
INC
RO
LMORD CLV!ICLC

R1,.RO
R2.RO
RO

R1,033

BLE

$CODES

SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA BLL

o,COUNT

TALLY(RO)

TRAP
ADO
RTS

Routine Bese:
invocetion:
2 worde

Bl.ss

49
8LE
ADD
34 ,R2
o,
R2,0124
8LE
484
ROR
RS
8cC
526
CLR
RO
CLR8
C.ERR.TBL(RO)
CLR8
C.ERR.TBL1(RO)
ADD
#2,R0
.WORD CLV!CLC

603 words,
Routine Base:
SCODES
Mexisum steck depth per invocetion:
23 worde

i UNITS

CLR
CLR

000030

VAZ

e7.R}1

INC

000034
000124

10:¢4:41
10:21:50

TALLY(RO)
R1
R1, 86
a7
#34 ,R2
R2,0124
468
e1,RS
S0%

MOV
ADD
ASL

0000006

1933
1983

CLR
INC
oy o
BLE
ADD
cMP
BLE
8IT
8EQ
CLR
MOV

Routine Size:

000000
000004
000006

:
;

RXx EXERCISER

4114

b
NRQAM.
V010

RD/RX

AUTODROP SECTION
5660
S661
5662
5663
5664
5665
5666
5667
5668
5669
5670
5671
5672
5673

000000

SEE IF THEY WILL RESPOND.
DROPPED FROM TESTING.

vla/

.50
(40

THOSE

THAT DON'T ARE

5659

S674

IMMEDIATELY

1iF (.SWP _FLAGS and SWF _TRC) eql SWF _TRC
! then
PRINTF (DBM3),;
return;

ENDAUTO;

ADDED

TO PREVENT

LAUTO:

000207

Routine Size:
Maximum steck

“¢EQ

VAX 11 Bl es 16 v3
%55
Page
SPIDERSU
: {DOUCETTE .FALCONICNROA
SERS
L BI 1

BGNAUTO;

5674

104461
000207

10:¢4:41
10:21:50

THIS CODE 1S EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF
THE ' ADR" FLAG WAS SET.
THE UNIT(S) UNDER TESY ARE CHECKED T0

5675
5676

004737

1983
1983

AUTODROP SECTION'

1 word,
Maximum steck depth per

000004
000006

;:
;i

ssbttl

Routine Size:

000000

1% Dec
15 Dec

EXERCISER

Routine Bese:
invocstion:
O words

4 words,

é%g"L

(CODES

.SBTTL

004124’

depth per

COMPILATION WARNING

LSAUTO: : JSR
TRAP
RTYS
Routine Base:

invocetion:

2 words

S$CODES

%SUYO AUTODROP

!(JUSD REV

SECTION

. 4124

LSAUTO AUTODROP SECTION

PC.LAUTO
61
PC
- 4126

bl
RD/RXx

NRQAM.
vol.c

“r
&

@ar

me
w

®c

®¢

5677
5678
5679
5680
5681
5682
5683
5684
5685
5686
5687
5688
5689
5690
5691
5692
5693
5694
5695
5696
S697
5698
5699

010146
104424
005001
016137
001411
016100
042700
104435
012700
010077

000046
000050
000052

003757
012601
000207

062701

000243

004737

000004
000006

104412
000207

ssbttl

CLEANUP

CODING

Routine Size:

Maximum stack

Dec

1983

10:24:41

15 Dec

1983

10:21:50

VAX

Blies

v3 555

SEQ 0148

151

SPIDER$USERS: (DOUCE
T TE ,F ALCON JCNRQAA gf:
,
(41

SECTION

¢t
!
!

THE CLEANUP CODING SECTION CONTYAINS THE CODING THAT
AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED.

IS PERFORMED

BGNCLN;

DORPT;
RETURN 0ODT

!CLRVEC (O_TVEC);
incr

CTLR
if

from O

(RDRX_ADDR

then

to
=

(MAX_CTLR
.CST

LRVEC (.CST{.CTLR,

WRT_RORX
end;

(RCIP,

[.CTLR,

FOR

IP_ADDR])

neqs O

VEC_ADDR]);

RC_ALL,

ALL_ONES);

LCLEAN:

MOV
TRAP
CLR

TRAP

TO DIAGNOSTIC

SUPERVISER

EACH CONTROLLER
!

CONTROLLER EXISTS

RETURN CONTROLLER'S TRAP
WRITE IP TO STOP DEVICE

VECTOR

SUPERVISOR

ENDCLN;

000000G 0000006

1s:

.SBTTL

LCLEAN CLEANUP CODING SECTION

ggz

g?T(Rl).RDRx.ADDR

R1,
24
Rl

(SP)

000002G
177000

MOV
8IC

CST+2(R1),RO
#177000,R0

1777717

MOV

®-1,R0

0000006
000056

TRAP

Routine Size:
22 words,
Routine Bese:
Meximum steck depth per invocetion:
3 words

000000

;

CLEANUP CODING SECTION

000000
000002
000004
000006
000014
000016
000022
000026
000030
00( 034
000040
000044

:
;

EXERCISER

004136°

4 words,
depth per

MOV
ADD

RO, 8RORX
. ADDR
56 ,R1

BLE
MoV

14
(SP)+,.R1

.WORD CLV!CLC

RTS

¢CODES

« 4136

.SBTTL
LSCLEAN:
;
JSR
TRAP
Routine Bese:
invocation:
2 words

5676

CTLR

s(CTLR),»

5690
5692

s(CTLR),
¢

5695

s RC.REG

5696

»
RC.REG,

o, CTLR

5676

LSCLEAN CLEANUP CODING SECTION

PC.LCLEAN

RTS

12
PC

$CODES

. 4212

5697

Gle
RD/RX EXERCISER

NRQAM,®

DROP UNIT SECTION

vOl.c

B¢

®:

5700
5701
5702
5703
5704
5705
5706
5707
5708
5709
5710

5711
5712
5713
5714
5715
5716
5717
5718
5719

5720

5721
5722
5723
5724
5725
5726
5727
57268
S729
5730
5731
5732
5733
S734
5735
5736
S737
5738
5739
5740
S741
5742
5743
S744
S74S
5746
5747
5748
5749
5750
5751
5752
5753
5754

15 Dec 1983 10:24:41

5755

sgbttl

DROP

15 Dec

UNIT

1983

10:21:50

VAX 11 Blies-16 V3 5SS

SEQ 0149

Pege 153

SPIDERSIUSERS: [DOUCETTE., F ALCONICNRQAAR. BLI (a2

SECTION'

!
¢

THE DROP-UNIT SECTION CONTAINS
TO NO LONGER BE TESTED.

THE

CODING THAT CAUSES A DEVICE

| I8

BGNDU;
locel
UNIT

word,
byte

initisl

(byte (FALSE));

!
t

NUMBER OF UNIT BEING DROPPED
NO PRINTING OF DROP UNIT MESSAGE

UNIT NUMBER APPEARS

!
!

GET UNIT NUMBER
UMDECLARE REGISTER

label

SEARCH;

begin
register

INPUT

UNIT
end;

= 0;

_INPUT;

’

1if (.SWP_FLAGS and SWF _TRC) eql SWF_TRC
fthen
H
PRINTF (DBMS, .UNIT);

*JSD REV A
1JSO REV A
'JSD REV A

SEARCH
begin

BEGIN SEARCH BLOCK

FOR EACH CONTROLLER

incr CTLR from O to (MAX_CTLR

incr OFFSET from (O +
(.CST {.CTLR,

(.CST [.CTLR,

then

1) do

OF _UN) to (3 & UNIT_SIZE
.OFFSET,

D_UNIT] eql

OF _UN) by UNIT_SIZE do

.UNIT) end

.OFFSET, D_PRES) eql PRESENT)

IN RO UPON ENTRY

FOR EACH UNIT ENTRY IN CST

IF UNIT MATCHES CST ENTRY

begin

(.CST (.CTLR, .OFFSET, D_STAT] eal ONLINE) or
(.OUR [.UNIT) eql DU_ONLINE) or
th«(‘.oua { .UNIT] eql ODU_PROTECT)
in
PRINT

? (.CST

TRUE;

[.CTLR,

IF UNIT

0.K,

IS STILL ALIVE

TO PRINT MESSAGE

U_CNT) gtru 0) and

hcfi.CST [.CTLR, OFFSET D.STAT] eal ONLINE)
CST [.CTLR,
£

(.CST

then

U_CNT}

{.CTLR,

[.CTLR,

EOP _FLAG

U_CNT)

.CST [.CTLR,
eql 0)

.OFFSET,

TRUE;

U_CNT]

1;!

DECREMENT UNIT COUNT

end

D_STAT] eaql ONLINE)
!

DECLARE END OF PASS

IF ALL UNITS OFFLINE

'_|LL‘
NRQAM,

RD/Rx EXERCISER

ODROP UNIT SECTION
5756

5757
5758
5759
5760
5761
5762
5763
5764
5765
5766
5767
5768
5769
5770
S771
5772
5773
S774
5775

000022

000032

LOFFSET,

D STAT]

= OFFLINE;

leave SEARCH;

MARK UNIT OFFLINE
IF UNIT WAS STILL

ALIVE

EXIT SEARCH BLOCK
IF UNIT FOUND IN CST

end;
end;
if

.PRINT

(.OUR
(.O0UR
(.DUR
(.DUR
(.OUR

then

[ .UNIT]
[.UNIT)
[.UNIT])
[.UNIT]
[.UNIT])

in
PRINTF
PRINTF

eql
eql
eql
eql
eql

(DU_MSG,
(.DU_RSN

DU_CONF) or
DU_INIT) or
DU_ONLINE) or
DU_AV) or
DU_PROTECT)
.UNIT);
[.DUR [.UNIT]]);

IF OK

TO PRINT MESSAGE

"UNIT

XX DROPPED

REASON

S777

105005

010001

005066

016646
012746
004737
010066
012703
010300
066600
006300
012704
060004
010102
011400
000300
042700
020002
001055
032714

001452
005002
032714
001402
005202

000410
126127
001404

126127

000002

1¢:

28:

.SBTTL

JSR

cHP
CLR8
MOV
CLR
MOV
MOV
JSR
MOV
MOV
MOV
ADD
ASL

MOV
ADD
MOV
MOV
SWAB
8IC
cHP
BNE

177760

B8It
BEQ
CLR
817
BEQ

040000
020000

000000G 000007
000000G 000011

3¢:

INC
B8R
CHPB
8EQ
cmPB

LDU DROP UNIT

R1, $SAVES

SECTION

5699

-(SP), -(SP)

RS
RO,R1

2(SP)

2(SP), -(SP)

LOU:

0000006

000012
000016

[.CTLR,

end;

SFQ 0190
VAX 11 Bliss 16 v3-555
Page 154
SPIDERSUSERS:
[DOUCETTE _FALCONJICNRQAR . BL1 (42

$776

004137
024646

000010

CST

10:24 :41
10:21 :50

®e

vol..

1983
1983

15 Dec
15 Dec

927, -(SP)
PC.BL MU

RO, 4(SP)
#3,R3

R3,RO

4(SP),RO

PRINTY

INPUT ,UNIT

$721

CTLR,*

5735

CILR

»,0FFSET

;

OFFSET,»

UNIT,»

5731

5733
5735

#CST R4
RO,R4
R1,R2
(R4),R0
RO
#177760,R0
RO,R2
8
#40000,(R4)
84
R2
920000, (R4)
3
R2
44

5736

5740

DUR(R1),07

S741

DUR(R1),011

5742

[

NRQAM.
vOl.c

RD/RXx

EXERCISER

1% Dec
15 Dec

DROP UN1T SECTION
001032
112705
016616
012746
004737
005726
062700
105760
001404
006002
105660
001006
032714
001403

0001 3¢
000140
000144
000150
000154
000160
000162
000166
000172
000174
000176
000202
000204
000210
000212
000220
000224
000226
000230
000234
000240
000242
000244
000250

042714
022626
000412
062703
020327
003700
022626
005266
000243

000252
000254
000256
000260
000266
000270
000276
000300
000306
000310
000316
000320
000326

003661
V06005
103424
126127
001420
126127
001414
126127
001410
126127
001404
126127
001024

112737

000001
000006
000056
000000G

4s:

BNE
MOVB
MOV
MOV

JSR
ST
ADD
7578
BEG

00000406
000001

ROR

000001

020000

000001
020000

Ss:

0000006

000005
000022

64:
7¢:

8¢:

000002

9s:

000000G 200001
0000006 000002
000000G 000007
000000G 000013
0000006 000011

4«

secs
BNE
8IT
8EQ
MOV
8IC

cHpP
B8R

)

1983
1983

74
41,R5
6(SP),(SP)
056, (SP)

10:04:41
10:21:50

VAX 11 Blise 16 v3-555
SPIDE
: {DOUCE
RSUSE
T TE . F ALCON JCNRQAA
RS
Hi |

19¢

(8r

¢ ,PRINT

CTLR,»

PC,.BLSMUL
(SP).
#CST.4,RO
1(RO)
St
R2

5748
5750
5752
5753

1(RO)
64
420000, (R4)
64
#1,E0P .FLAG
920000, (R4)

5755
$757
5738

(SP)+,(SP).
94

s ,0OFFSET

5733

CTLR

5731

5765

CcCMP8

OUR(R1),#01

s(UNIT),

5766

CcHPB

DUR(R1),02

s(UNIT),
s

5767

cHP8

DUR(R1),e7

o(UNIT),»

5768

CHPB

DUR(R1),013

s(UNIT),»

5769

cMP8

DUR(R1),011

s(UNIT),»

5770

ADD
#5,R3
cHP
R3,#22
BLE
2
cHp
(SP)+,(SP).
INC
2(SP)
.WORD CLV!CLC
BLE

ROR

8LO

8EQ

BEQ
8EQ

BEQ

BNE

OFFSET,»

1¢
10

10¢

104

118

Jle
NRQAM2
gOl.E

RD/RX EXERCISER

DROP UNIT

15 Dec
15 Dec

SECTION
-

000330
000332
000336
000342
000344
000346
000352
000356
000360
000364
000370
000372
000374
000400
000402

010146
012746
012746
010600
104417
116101
0421701
006301
016116
012746
010600
104417
062706
022626
000207

Routine

Maximum steck

000000
000004
000006

;

Size:

004737
104453
000207

Routine Size:

Meximum stack

10¢:

0000006

MOV
MOV

MOV
MOV
TRAP
MOve

8IC

ASL
MOV

000010

11%:

MOV
MOV
TRAP
ADD
CHP
RTS

$CODES
130 words,
Routine Bese:
depth per invocetion:
14 words

004222

words,

depth per

L$OV:

Routine Bese:

invocetion:

2 words

.SB8TTL
JSR
TRAP
RTS

$CODES

R1,

(S5P)

#0U.MSG,

1983
1983

10:24:41)
10:21:50

VAX-11 Bliss-16 V3-555%

SEQ 01%¢
Pege 156

SPIDERSUSERS: (DOUCETTE .FALCONICNRQAA. BLl (42

’

(SP)

42, (SP)
SP,RO
17
OUR(R1),R1

#177400,R1
R1

UNIT,»

SP,e

;

o(UNIT),
s

SP,s

5773

S774

DU.RSN(R1),(SP)
41, -(5P)

SP,RO
17

#10,5p

(SP)s,(SP).
PC

5772
5699

4222

L¢DU DROP UNIT
PC.LOV
53

+ 4626

SECTION

5775

RD/RX EXERCISER
ADD UNIT SECTION

®c

sspttl

‘ADD UNTT

]

1983
1983

SEQ 0:%°%
VAX 11 Blies 16 V3-555
Page 157
SPIDERSUSERS: [DOUCETTE .FALCONICNRQAA .BL1 (43

10:24:41
10:21:50

SECTION’

!
!
!
[}

THE ACO-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES
TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK
TO THE TEST CYCLE.

BGNAU;
local
STINDX
ENDIDX

:
:

word,

word;

UNIT

= 0O;

if (.SWP_FLAGS
then
in

STINDX
ENDIDX
incr

end;

ENDAU;

=
=

_UNIT s
_STINDX

COUNT

TALLY

end SWF _CST)

from

eql

SWF

TALLY_LEN;
+ TALLY_LEN
.STINDX

[.COUNT]

= O;

‘e

reg:ster

UNIT NUMBER APPEARS

5778
5779
5780
5781
5782
5783
5784
5785
5786
5787
5788
5789
5790
5791
5792
5793
5794
5795
5796
5797
5798
5799
5800
5801
5802
5803
5804
5805
5806

1% Dec
15 Dec

IF CLEAR STAT.
ZERO OQUT
ADDED

IN RO UPON ENTRY

CST

.ENDIDX do

B¢

®e

®s

NRQAM,.’
vOl..

UNIT'S
STATISTICS

TABLES

TRUE....

lik)
RDO/RX EXERCISER
ADC UNIT SECTION

NRQAM,®
vol.c

000000
000004
000010
000012
000014
000020
000024

000026
000032
000034
000036
000040
000042
000044
000050
000052
000054
000056

000060

;
;i

;

105737
100023

010046
012746
004737
010002
062702
010001
005301
000404
010100
006300
005060
005201
020102
003771
022626
000207

0000006

LAU:

0000006

004737
104452
000207

Routine

Size:

stack

Max

000033

1%:
200000G

2%:

34:

004636’

words,

depth per

LAU ADD UNIT
R1,$5AVEZ

LSBTTL
JSR
1ST8
8PL
MOV

LS$AU:

Routine Base:

invocation:

2 words

CLR
INC
cHp
BLE
cre

Bl 'ss

16 v3 555

SEQ 01%4
P
158

SPIDER‘USERS:(DOUCE?YE.FALCONICNROAF.;EI (43
8177
5795

;

UNIT,»

5798

;
;
;
:

STINDX,ENDIDX
¢ ,ENDIDX
STINDX,COUNT
COUNT

5799

;

COUNT,»

5802

;

COUNT

5801

;

PC
-

VAX

SECTION

18
(SP)e+,(SP)+

RTS

.SBTTL
JSR

10:24:41
10:21:50

RG, (SP)
034, (SP)
PC,BLSMA
RO,R2
433,R2
RO,R1
R1
28
R1,RO
RO
TALLY(O)

MOV
DEC
B8R
MOV
ASL

$CODES

1983
1983

SWP .FLAGS
33

MOV
JSR
MOV
ADD

000034
0000006

Routine Size:
2S5 words,
Rout ‘ne Base:
Maximum stack depth per invocation:
& words

000000
000004
000006

;

004137

15 Dec
15 Dec

COUNT ENDIDX

5801

H
H

S797
5777

5804

4636

LSAU ADD UNIT
PC.LAY
32

TRAP
RTS

¢CODES

« 4720

SECTION

[ 1 S!

NRQAM2

RD/RX EXERCISER

vOl.c¢

5807

TRAP HANDLER

swsbtt]l

NON EXISTENT

MEMORY

!.
!
!
!
!

THIS TRAP HANDLER IS VECTORED FROM LOCATION 4 FOR ALL UNIBUS TIMEQUT
ERRORS, INDICATING THAT AN ATTEMPT WAS MADE TO REFERENCE A NON EXISTENT
MEMORY LOCATION. ITS MAIN PURPOSE IS TO SET A FLAG FOR THE RDRX
REGISTER EXISTENCE TEST, INDICATING THF ABSENCE OF A DEVICE REGISTER,

ENDSRV;

000000

012737

000001

000006

000002

;
:

Routine Size:

Maximum stack

TRAP

15 Dec

1983

10:21:50

VAX 11 Bl ss 16 V3 555

NON EXISTENT MEMORY

5808
5809
5810
5811
5812
5813
5814
5815
5816
5817
5818
5819
5820

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

15 Dec 1983 10:¢4:41

SEQ

C1%Y

Page 159

SPIDERSUSERS:
{OOUCETTE .FALCONICNRQAR . BL 1 (44

HANDI ER

BGNSRYV (NEX_TRAP);
NEX

TRUE;

.SBTTL
NEX, TRAP: :

000000G

4 words,

MOV

Rout .ne Base:

invocation:

O words

$CODES

TRAP OCCURRED

NEX.TRAP NON EXISTENT MEMORY

€1 ,NEX

RYI

depth per

NEX

4730

TRAP HANDLER

5818

S816

N12
.

NRQAM2
\401.2
H
H

3
:
H
H
l
‘

GLOBAL ROUTINES

global routine SET_CPAR (CTLR) : novalue =

gggg

!
!

5835

5834

gggg

:
3

$838
5839

'
5

5842
5843

5840
5841
5844

000000

010146

000002
000006
000012
000014
000020
000024
000030
000034
000036
000042
000046

016601
010137
010146
012746
004737
062700
010037
010116
012746
004737
062700

000056

017737

000052
000064

000070

000072

010037

062706

012601

INPUTS:

Page 160 !
01%6

SPIDERSUSERS: [DOUCETTE .,FALCONICNRIAA, BL1 (4as

CTLR - CONTROLLER NUMBER

IMPLICIT QUTPUTS:
CCTLR - CURRENT CONTROLLER NUMBER
CST_ADDR - ADDRESS OF CONTROLLER'S STATUS TABLE
DCT_ADDR - ADDRESS OF CONTROLLER'S DRIVER TABLE

RDRX_ADDR

- ADDRESS OF CONTROLLER’'S IP REGISTER
.

begin

’

CCILR = ,CTLR;
iy
CST_ADDR = CST ¢ (.CTLR & CST_LEN ¢ 2);

DCT_ARDDR = DCT ¢+ (.CTLR & DCT_LEN » 2);
RORX_ADDR = ,CST_ADDR [IP_ADDR];
.+

end;

Jeon

! SET CURRENT CONTROLLER NUMBER
! CALCULATE ADDRESS OF CONTROLLER’S CST

! CALCULATE ADDRESS OF CONTROLLER'S DCT
Y GET CONTROLLER'S DEVICE ADDRESS

)

.SBTTL SET CPAR GLOBAL ROUTINES

| SET. CPAR::

000004
000000G

000056
0000006
0000006
000000G
000022
000000G
000000G

0000006

.
.

.
:

000000G 000000G

000006

30 words,

-MOV -

m.-csp)

RCE

« - .MOV . - 4(SP),R1
.
.MOV - .R1, CCTLR
- . TooL T e
MOV R1,-(SPY "
.*%
.
.0
HOV‘ .. 056,-(SP) + - JSR- -="PC, BLmu. o
.
~
LADD
-2 0CST,RO -.
e
-+,
MOV< _ RO,CST, ADDRvu,
)
=« MOV,. ¢+~ R1,(SP)"
.
., MOV: i0.’:’?..-(5&’)2x
LT
.
JSR
- PC,BLSMUL
.
:
ADD %1 @DCT,RO » = =7

000207

3 Routine Size:

SEQ

FOR THE GIVEN CONTROLLER NUMBER.

VAX-11 Bliss-16 V3-555

THIS ROUTINE SETS UP THE COMMONLY-USED CONTROLLER-RELATED DATA ITEMS

5832
5833

3
H

15-Dec-1983 10:21:50

5823
5824
5825
5826

!
!
H
!¢
!

ssbttl ‘GLOBAL ROUTINES'

5829
gggg

15-Dec-1933 10:24:41

fszggé

3
3
3
H
H

mes

RD/RX EXERCISER

.-,

5 words

R
T

RO, DCT.ADDR=

- MOV |

(SP)o .Rl

RTS -

OCODEt

- -

PC
* 4740

;

‘

5823

CTLR,s

5840

QCST ADDR RDRX.ADDR

MOV
.

. - ADD

Routine Base:

: Haximum stack depth per invocation:

MOV'

5841

5842

;

’
.

5843

5839

$823

;

R, Ax
ot 785

5845

6846
5847

5848
%849
38%0
5851
°8%2
%053
8%
989%
8%

5857

5858
2859
5860
5861
o862
5863
5864
38635
5866
5867
5868
5869
5870

glovel

EAERCISER
ROUTINE

routine ST UPAR . FISE'.

000072
000074
000076

i
1

Routine Size:

Mex imum steck

5871

novelue

1943
1988

10:04:4]
10:21:90

S(O Gt?

vAr |1 Bl es 16 ¢3.-55%
Page
SPIOERSUSERS: (DOUCETTE .o ALCONICNRQAL 8L}

61
‘@4

H
'

IS ROUTINE SETS P TeE COro0MLv USED UNIY RELATED C
THE CURRENT CONTROLLER AMD GIVEN CST OFFSET.

H
H
!

INPUTS:

'
5

IMPLICIT

4
H
'

IMPLICIT OUTPUTS:
CUOFF - CURRENT UNIT S CST OFFSEY
COISK - CURRENT DISK ADORESS (RD/RXx DISK NUMBER)

[]

OFFSEY

WMORD OFFSET INTO CURRENT CONTROLLER
DESCRIBES A UNIT

", FOR

AICw

[]

INPUTS:
CST_ADOR

LOLUN

T_ADOR

ADORESS OF CURRENT CONTROLLER S5 CS1T

CURRENT URIT MUMBER (DRS UNIT NUMBER)
ADDRESS OF CURRENT UNIT S

STATISTICS B8LOCK (TALLY)

Coler
CUOFF » _QFFSET,;

COISK =
LSLUN =
T_ADDR

_CST_ADOR [ .OFFSET, D_DISK NUM]);
_CST_ADDR [ .OFFSET, D_UNIT);
TALLY

(.LSLUN o

TALLY LEN ¢ 2);

ond;

010146

016637
016600
006300
063700
111037
042737
011001
000301
042701
010137
010146
012746
004737
062700
010087
022626
012601
000207

> Dec
i% Dec

LSBTTL

SET.UPAR GLOBAL

MOV

Ry, -(5P)

MOV

4(SP),RO

SET.UPAR:
:

000004

000004
0000006
0000006
177774

000000G

2 01

4(SP),CUOFF

ASL

000000G

177760
0000006

000070
0000006
0000006
0000006

ADD
MOVe
B8IC

®177774 ,COISK

MOV
SWAB

(RO),RY
R1

8IC
MOV
MOV
MOV
JSR
ADD

®177760,R1
R1,LSLUN
Ry,-(SP)
070, -(SP)
PC.BL ML
OTALLY,RO

MOV
cp
MOV

$CODES

OFFSET,
e
CUOFF
,e

CSY . ADDR,RO
(RO),CDISK

RO, T.ADDR
(SP)e,(SP).
(SP) R1

RYS

32 worde,
Routine Bese:
depth per nvocation:
& worde

ROUTINES

5034

5868

LSLUN,

3869

5864
584%

AN,

RD Rx EXERCISER

GLOBA, ROUT INES

G
Gt
S
4s
B
G
40
@
€2

(CTIR)

ares
W
W

THIS ROUTINE SEARCHES THE MSCP PACKET POOL ALLOCATION TABLF (PKT USE)
FOR A FREE MSCP PACKET TO ALLOCATE 10 THE GIVEN CONTROLLER. IF ONE IS
FOUND, THE PACKET IS ZEROED OUT, AND THE PACKET INDEX IS RETURNED
T0

THE

INPUTS:

CALLER.

OTHERWISE,

CTLR

5886
5887
5888
5889

locel
index : signed word initial (
RING_ADDR : word.
PACKET _OWNED : byte,

2092
893
2::45

NEXT _PACKET

RETURNED

INDICATING NONE

AVAILABLEL,

CONTROLLER NUMBER REQUESTING ALLOCATION

begin

g:z?

1),

byte:

from O

to (PKT_CNT

1) do

Be
@

NEXT PACKET

TRY

FOR EACH ENTRY

IF ENTRY INCICATES FREE PACKETY

IN ALLOCATION

TABLE

_NEXT_PKTI_USE;

gggg

PACKET _OMNED

5898
5899
5900
g%é

if PKT_USE [ .NEXT_PACKET] les O
then
begin
RING _ADOR = .DCT_ADDR [RR_BEG);

FALSE;

! FIRST RESPONSE PACKET'S ADDRESS

5903
5904

5905

incr I from 1 to (RRING_LEN +» CRING_LEN) do ! FOR EACH PACKET ADDRESS
begin

5906

i? (..RING_ADDR eqle .MSCP_PKXT [ NEXTY_PACKET, PKTY _L0O]) and

5908
5909

then

5910
5911
5912
5913
gg{;

(CC.RING_ADDR ¢+ 2) and ED_OWN) eql ED_OWN)

else

P
ET_OWNED =
exitloop;
end
RING ADDR

CHECK ADDRESS AND OWNERSHIP

TRUE;

PACKET OMNED 8Y CONTROLLER

.RING _ADOR

- 4;

ADDRESS OF NEXT PACKET

IF NOT

ALLOCATE PACKET

5907

IN RING

5916
5917
5918
5919

1? not
then

5921

PKT

5920

gggg

end;

.PACKET_OWNED

_USE

index

[.NEXT _PACKET)

.CTLR;

ALREADY USED
TO CONTROLLER

_NEXT_PACKET;

5924
ggfi

incr J from 2 to (PKY _LEN MSCP PKT [ .NEXT _PACKEY,

5927

exitloop;

1) do
.J, O,

16,

®1

incr COUNT

DONE

!
0]

"‘f

oL,

ZERO OUT PACKET
= 0;

age b

“PIDER$ISERS:
[DOUCE TTE .F ALCONICNR i ot 0e

5884
5885

VAX 11 Bl'ss 16 v3 55

5681
5882
5883

1% Dec 1483 10:21:50

' ~_ LT PKT
globel rout

L RT WY WY W

5872

5878
5874
5875
5876
5877
5878
5879

®e Be

G»

\O1..

1, Dec 1983 10:04:41

vy
RD‘Rx EXERCISER
LLOBAL ROUTINES

NRQAM,®

vOl.c

)

000010
000020

5928

end;

004137

0000006

162706

000006

113705
012766
105066
005002
150502
105762
002076

0000006
000014
000004
000002

013700
016016
010246
012746
004737

012703

027660
001016

012746

066616
012601
042701
020127
001004

Dec
Dec

1983
198%

10:¢04:41
10:21:50

VAX

START

THE

555

SEQ 01%Y
P
162

SPIDERSUSERS : [DOUCE TTE . F ALCON JICNRQAR ;?T (a7

ens;

5929
5930
5931
5932
5933
5934
5935
5936
5937
5938
5939
5940
S941
5942
5943
5944
5945
5946
5947
5948
5949
5950
5951
5952
5953
5954
5955

012704

1%
19

’

end;

NEXT PACKET
if

_NEXT PACKET

TRY

qQ 0) ang
[.index) geq C)

IF PACKET

[.index,
[.index,

PACKEY

!
!

CREDIT SIZE
NEXT PACKET

CYCLE BACK TO BEGINNING IF AT END

_NEXT_PACKET

then

gequ PKT

NEXT PACKET

PACKET

[N RING

CNT

= O,

BEYOND ALL PACKETS,

TOP

end;

(. index
(.PKT_USE

then

FOUND

.
"n

MSCP _PKY
MSCP_PKT

NEXT _PKXT_USE

MSGLEN] = SZ _GEN;
CREDITS) = 1;

_NEXT PACKET

i F.NEXT_PKT
_USE geau PKT_CNT
then

NEXT _PKT_USE

= 0;

SIZE

ONLY ONLINE

AND SCC

CHANGE

7O ALLOCATE

end;

return

. index;

17717717

1¢:

077177
100090

JSR
SUB

Ry, $SAVES

MOVE
MOV
CLR8

NEXT.PKT
USE RS
014 ,4(SP)
2(5P)

CLR
a1s8
1518

8GE

0000006
000004

000002
000006

GET.PKT GLOBAL ROUTINES

MOV

0000006

000104
0000006
000010
000004
0000006

.SBTTL

GET.PXT::

"oV
MOV

MOV

2%:

MOV
JSR
MOV
g::

MOV
ADOD
MOV
BIC
cP

“.9

0-1,R4

R2
RS,R2
:fT.USE(RZ)

,
RO
OCT.ADOR

4(RO),(5P)
R2, -(SP)

PC,BLIMA
#10,R3

g:(SP)."SCP.PKT(RO)
02,-(SP)
6(SP),(SP)
(SP)+,R1
®77777,R)

2%.0-100000

S872

s, INDEX
s NEXT ,PACKET
s, COUNT

PACKET . OMNED

., »
XT
. PACKET
NE

» . RING.ADDR

s,
I

RING.ADDR,
»

RING.ADDR,

5892
5894
589%
5838

5901

5903
5906

5907

ty
9
RD/RX EXERCISER

NRQAM?
gOl.i

00012¢
000134
000136
000144
000146
000150
000156
000160
000166
000170
000172
000176
000202
000204
000210
000212
000214
000216
000222
000224
000230
000232
000234
000236
000240
000242
000246
000250

000252
000256
000260
000262
000264
000270
000272
000274
000300
000304
000312
000320
000326
000330
000332

000334
000340
000344
000346
000352
000354
000356
000362
;

1127¢6

000405
062766

005303
001351
032766
001027
116662
010204
010216
012746
004737
005726
012701
010003
060103
006303
005063
005201
020127
003767
022626

GLOBA.

ROUTINES

000001

000006

005366
001263
005704
002434

105764
002431
010446
012746
004737
012780
142760
152760
005000
150500
005200
110037
120027
103402
105037
022626
010400
062706
000207

Routine

Size:

Moximum stack
5956

MOvV8

000004

000001

000006

000030

0000006

000042
0000006
000002

S¢:

000041

64:
7¢:

8s
9s:

DEC
BNE
BI7
BNE
]
MOV
MOV
MOV
JSR
TSY
MOV
MOV
ADD
ASL

INC
cP
BLE
P
B8R
cHP
INCB

01,6(5P)
[X)

04 ,4(SP)
R3
24
e1,6(SP)

30(SP),PKT
R2 R4
R2,(SP)
042, -(SP)
PC.BLSMUL

USE(RZ2)

000104
0000006
000040
0000066
000017
0000106
000001
0000106

0000006
000014

0000006

10¢:

118;

122 words,
Routine Bese:
$CODES
depth per invocetion:
13 worde

‘
Bl.ees

v3-%55S5

SEQ 0140
Pege 164

SPIDERSUSERS:
(DOUCETTE .FALCONICNROAA BLL

(47

o,PACKE
T, OWNED

$91¢C

s
s

¢,RING.ADOR
1

5914
9903

¢ PACKET
, OMNED

5918

CTLR,»

5921

o,INDEX

¢,J

%909

5922
5925

J.e

J,e

(SP).,(SP).

(SP)e,(SP).

H
;s

R4, -(SP)
9104, -(SP)

5924

5920

NEXT_PACKET

5900
5932

;s NEXT PACKET
: COUNT

5936
5894

INDEX

5940

«(INDEX)

5941

INDEX,

5944

114

5924
5925

187

RTS

VAX

(SP).

®2,R1
RO,R3
R1,R3
R3
MSCP.PKT(R3)

BLY

aLY
MOV
MOV
JSR
MOV
8IC8
8158
CLR
8158
INC
MOVB
cHPe
8LO
CLR8
cre
MOV
ADD

10:¢4:41
10:21:50

BLO
CLRE
DEC
BNE
1578

000000G

000006

ADD

1983
198%

cHP8

000014

000004

CLR

0000006

000411
022626

105205
120527
103401
105005

1% Dec
15 Dec

NEXT _PACKET,»

5934

PC.BL MU

€40, ,MSCP . PKT+6(RO)
€17 ,MSCP.PXT+10(RO)
#1,MSC
. PXT+10(RO)
P
RO

RS.RO

RO
RO NEXT .PKT . USE
RO, 014
104
NEXT,PKT,
USE
(SP)s,(SP)e
R4 RO

06, 5P

+» 5134

5945

;

5946

NEX
_ PACKET,

NEXT_PKT USE,s

595¢C

5948

5943

INDEX,»

5884

ca?r2

17J
NRQAM.
vOol.¢&

®e

5957
5958
5959
5960
5961
5962

®s

B¢

5963
5964
5965
5966
5967
5968
5969
5970
5971
5972
5973
5974
S975
5976
5977
5978
5979
5980
5981
5982
5983
5984
5985
5986

000010
000014

000022

000074
000076

;
;:

Dec

1983

10:¢4:41

VAX

GLOBAL

15 Dec

1983

10:21:50

SPIDERSUSERS:
(DOUCETTE .FALCONICNRQAA BL1

ROUTINES

global routine PUT PKT (index)

novalue

V3 <S5

(48

THE MSCP PACKET DESIGNATED B8y

ROUTINE.

'INDEX' IS RETURNED TO THE POOL

THIS

begin

locel

RING_ADDR

word,

OWNER

word;

RING _ADDR

_DCT_ADDR

{RR_BEG];

incr COUNT from 1 to (RRING_LEN
begin
if

MSCP_PKT

then

[.index,

+ CRING_LEN) do

PKT_LO)

begin
OWNER = _RING_ADDR « 2;
.OWNER = . .OWNER and (not

end;

RING_ADDR
end;
PKT _USE
end;

(. index)

.RING_ADDR

(ED_OWN)) and (not

FOR EARCH ADDRESS IN THE RINGS

IN FIRSY

RESPONSE

RING

ADDRESS MATCHES

ADDRESS OF OWNERSHIP WORD
(ED _FLAG)) ; ! GIVE OWNERSHIP TD HCST
LOOK

.SBTTL

PUT.PKT GLOBAL ROUTINES

JSR

R1,$SAVEA

MOV

R1,-(SP)

013700
016003
016601
010146
012746
004737
012702

0000006
000004
000014

MOV
MOV
11"}

000104
0000006
000010
000000G

MOV
JSR
MOV
g::

1s:

000002

OCT_.ADDR ,RO
4(R0O),R3
14(SP) R1

MoV

24:

000000G

ADDRESS

PUT.PKT::

140000
000004

..RING_ADDR

AT NEXT PACKET ADORESS IN RING

-1;

0000006

000377

eqla

004137

026013
001005
012704
060304
042714
062703
005302
001364
112761
022626
000207

SEQ U141
Page 165

RD/RX EXERCISER

#2,R4

¢ ,0uMNER

5978

4 RX

¢ ,RING.ADDR

5979
5982

cHp

(SPYe ,(SP).

5975

5972
S975

R2
1¢

Routine Size:
32 words,
Routine Bese:
$CODES
Maximum stack depth per invocation:
8 words

5970

+,COUNT
»,RING.ADDR

OEC
BNE
RTS

5957

1
i

R3 R4
9140000, (R4

MOVB

3
; ¢ ,RING.ADDR
; INDEX,
s

104, -(5P)
PC.BLIMAL
®10,Re
g%CP.PKT(RO).(RS)

ADD
8IC

ADD

i
:

RING.ADOR, OMNER
o ,0MNER

5972

#377,PKT ,USE(R])

5985

5957

5520

S964

(]9

®e

®c

000000

010146

000002
000004
000010
000014
000016
000024
000026
000032
000034
000036

005000
116001
020166

;:
i

001003

112760
005200

020027
003764
012601
000207

Routine Size:

Maximum steck

GLOBAL

ROUTINES

routine
P

5987
5988
5989
5990
5991
5992
5993
5994
5995
5996
5997
5998
5999
6000
6001

EXERCISER

1% Dec 1983
15 Dec 1983

PUTA PKT

(CTLR)

10:¢c¢4:41
10:21:50

SEQ Olf,(

VAX 11 Blies-16 v3 555
SPIDERSUSERS: (DOUCE TTE .,FALCONICNRQAA BLI

165

(49

novalue

THIS ROUTINE DEALLOCATES ALL
TO A PARTICULAR CONTROLLER.

MSCP PACKETS WHICH HAVE

BEEN ALLOCATED

vol.C

RD/RXx

INPUTS:

DYA

NRQAM.

incr COUNT

from O

PKT_USE

then

- CONTROLLER NUMBER

CTLR

PKT_USE

(PKT

CNT

[.COUNT)

eql

[.COUNT])

.CTLR
1;

000377

000013

1s:
0000006

DEALLOCATE

PACKET

CLR

RO
PKT,USE(RO),R1
R1,4(SP)

MOvVB
cHP

28
4377,PK
. USE(RO)
T

MOV3
INC

cHP

BLE
MOV

$CODES

GLOBAL

R1,-(SP)

(SP).,R1

RTS

16 words,
Routine Base:
depth per invocetion:
2 words

PUTA . PKT

BNE

2s:

FOR EACH ENTRY

.SBTTL

PUTA . PKT:
MOV

0000006
000004

5620

IN ALLOCATION

IS ALLOCATED

TABLE

TO GIVEN CONTROLLER

ROUTINES

COUNT
¢(COUNT
), s
s ,CTLR

s,s(COUNT)
COUNT
COUNT , ¢

5987
5997
5999

6001
5997

5987

NRQAM,

RD/Rx EXERCISER

:Ol.;

1% Dec 1983 10:24:41

GLOBAI

ROUTINES

15 Dec

rout ine GET RETPKT

1983

VAX 11 Bl.ws 16 v3 %55

10:21:50

SPIDERSVUSERS:
(DOUCETTE .FALCONICNRQAA .BLL1

:
:
$
:

0702
6003
6004
6005

globel

FOR

:
:
H
:
H
:
i
;
H
H

6007
6008
6009
6010
6011
6012
6013
6014
6015
6016

¢
!
!
!
!
!-

FOUND, THE FACKET IS ZEROED OUT, AND THE PACKET INDEX IS RETURNED T0
THE CALLER. OTHERWISE, A
1 IS RETURNED INDICATING NONE AVAILABLE.

22%3

3
H
:
:

6021
6022
6023
6024

:
H
:
s
:
;
3
H

6006

gg{g

6025
6026
6027
6028
6029
6030
6031
6032

60313

6034

!,
!

(CTLR;

THIS ROUTINE SEARCHES
A

FREE

INPUTS:

THE RETURN PACKET POOL ALLOCATION TABLE (RP USE)

RETURN PACKET

CTLR

ALLOCATE

THE

GIVEN CONTROLLER.

ONE

CONTROLLER NUMBE~ REQUESTING ALLOCATION

begin
locel

ndex

incr COUNT

signed word

in‘tial

1);

ASSUME

1) do

FOR EACH ENTRY

IN TABLE

1ss O

IF FREE RETPKT

IS FOUND

ALLOCATE RETURN PACKET

from O to (RP CNT

if .RP_USE [.COUNT)
then
begin
RP_USE (.COUNT)
index = .COUNT;

(

. CTLR;

incr J from O to (RP_LEN
RETPKT [ .COUNT, .J, O,
exitloop;

1) do
16, 0]

NONE

! ZERO OUT
0;

AVAILABLE

TO CONTROLLER

RETPKT

DONE

RETURN PACKET

end;

return

end;

. index;

0143
se Q P.L
167

INOEX (OR

TO CALLER

(%0

19
NRQAM,

RD/RX

vOl ..

000000

004137

000004
000010
000012
000016
000020
000026
000030
000032
000036
000042

012704
005003
105763
002025
116663
010304
010346
012746
004737
022626
005002
010001
060201
006301
005061
005202
020227
003767
000404
005203
020327
003744
010400
000207

000044
000046

000050
000052
000054
000060
000062
000066
000070
000072
000074
000100
000102
000104

i
1

15 Dec
15 Dec

EXERCISER
ROUTINES

LSBTTL
GET.RETPKT::
JSR
MOV
CLR

0000006

GET
. RETPKT

0000006

BGE
MOVB
MOV
MOV
MOV
JSR
cHe
CLR
MOV
ADD

10:24:41)
10:21:50

SEQ G4
VAX 11 Bliss 16 V3 55%
Pege 168
SPIDE
: [DOUCE
RSUSE
TTE .FALCONICNRQAR
RS
. BL1 (50

ROUTINES
H

6002

¢, INDEX

§P.USE(R3)

;i COUNT
; o(COUNT)

14(SP)
,RP USE(R3)

CTLR,s(COUNT)

6024

s
:
i

5027
6028

i
i

J
Joo

R3,R4
R3, -(SP)
430, -(5P)

;
;:

COUNT, INDE X
COUNT,»

6014

6019
6021
6025
6028

PC,BL $MUL

(SP)+,(SP).
R2
RO,R1
R2,R1
R1
RETPKT(R1)
R2
R2,#27
2
44
R3
R3,#3
14
R4 RO
PC

ASL

CLR
INC
cHP
BLE
BR
INC
oy
BLE

MOV
RYS

Routine Size:
Routine Base:
$CODES
35 words,
Meximum stack depth per invocetion:
8 words

GLOBAL

R1,$SAVES
#-1,R4
R3

TST18

0000006

1983
1983

+»

5660

;

Joe

COUNT

COUNT,»

:
H

INDEX,»

6027

6023

6019
6014
6002

J15

e
@
@
@
®e

000012

1983

10:24:41

VAX

GLOBAI

15 Dec

1983

10:21:50

SPIDERSUSERS
: [DOUCETTE . FALCONICNRQIAA Bl 1 (S1

globel routine PUT_RETPKT (index)

6040
6041
6042

[BN

RP_USE

112760

000377

Meximum stack

novalue

THE RETURN PACKET DESIGNATED By
ROUTINE
.

000002

000207

Bliss

v3 S55

!
!

016600

;: Routine Size:
;

Dec

6035
6036
6037

6038
6039

000000

ROUTINES

S€Q GLLS
Page 169

RD/RX EXERCISER

([.index])

000000G

6 words,
depth per

“INDEX' IS RETURNED TO THE POOL "8Y

THIS

-1;

.SBTTL
PUT .RETPKT: :
MOV
MOVB

Routine Base:
invocation:
O words

PUT.RETPKT GLOBAL ROUTINES
2(SP),RO

;

RTS

$CODES

+ S766

0377,.RP USE(RO)

INDEX,s

6042
6035

NRQAM,?

RD/Rx

EXERCISER

vol.c2

GLOBA(

ROUTINES

INPUTS:

OUTPUTS:

VAX

15 Dec

1983

10:2::50

SPTOERSUSERS
: [DOUCETTE .FALCONICNRGAAR .BLL

Blies

v3-555

HANOLES

THE

ALLOCATION OF

ADDRESS

STORE

THE

I/0Q BUFFER FROM

THE

BUFFER

WORD BUFFER DESCRIPTOR

INPUTS:
CCTLR - CURRENT CONTROLLER NUMBER
THE ALLOCATED BUFFER'S DESCRIPTOR 1S LOADED INTO THE TWO
WORDS AT “ADDR” AND "“ADOR « 2, OTHERWISE, A ZERO IS RETURNED
AT “ADDR” IF NO BUFFERS ARE AVAILABLE.

ASDR = 0;
incr COUNT

! ASSUME FAILURE
from O

to (QIO_PER_CTLR

.BUFF _OWN [.COUNT]

« MAX_CTLR

lses O

IF BUFFER

FOR EACH ENTRY

exitloop;

TABLE

IS FREE

DONE

end;

' ROUTINE GET_IO_BUFF
GET.IO.8UFF GLOBAL RGUTINES

0000006 0000006

MOve

CCTLR,BUFF ,OWN(R1)

000000G 000004

ASL
ggv

RO
gng.ADDR(RO).D‘(SP)

INC

1s:

;CSGEB

g\;FF.OW(RX)
Ri,RO

s, s(COUNT)
COUNT
,»

6069
6070

ADDR

s ,ADOR

MOV

COUNT
#(COUNT)

6043
6062
6064
6066

a¢

CLR

0000006

S4(SP)

R1,-(SP)

CLR

®¢

MOV

.SBTTL
GET.IO.BUFF
::

000007

IN BUFFER

ALLOCATE BUFFER TO CONTROLLER
RETURN BUFFER DESCRIPTOR

end;

016076
000404
005201
020127
003760
012601
000207

BUFF_OWN ( .COUNT) = .CCTLR;
ADDR = .BUFF_ADDR [.COUNT];

000004

then

005076
005001
105761
002011
113761
010100

Routine Size:

10:24:41

begin

000002
000006
000010
000014
000016
000024
000026
000030
000036
000040
000042
000046
000050
Q00052

ADDR

IMPLICIT

010146

;

novalue

1983

THIS ROUTINE

000000

006300

SEG 0144
age 170

Dec

2¢:

3s:

22 words,
Routine Base:
Maximum stack depth per invocation:
2 words

crP

R1,07

BLE

MOV

(SP)+,R1

RTS

$CODES

+»

6002

®s

6069
6070
6071
6072
6073
6074

(ADDR)

POOL .

®E

6051
6052
6053
6054
6055
6056
6057
6058
6059
6060
6061
6062
6063
6064
6065
6066
6067

global routine GET_IO_BUFF

6043
6044
6045
6046
6047
6048
6049
6050

COUNT
COUNT , »

6068

6064

6043

6075

Dec

1983

10:24:41

GLOBAL

15 Dec

1983

10:21:50

@1
Be
@

010146

000002
000004
000006
000010
000016
000020
000026
000030
000032
000036
000040
000042

005001
010100
006300
026076
001004

:
:

112761

000404

005201
020127
003762
012601
000207

10 BUFF

(ADDR)

THIS ROUTINE HANDLES
TO THE BUFFER POOL
.

INPUTS;

incr COUNT
éf

novalue

SEQ 0147
VAX 11 Bliss 16 V3 555
age 171
SPIDERS$USERS: [DUUCETTE .FALCONICNRIAA .BL1 (53

ADDR

from O

.BUFF _ADDR

THE

DEALLOCATION OF

ADDRESS OF

THE

I/0 BUFFER,

2-WORD BUFFER DESCRIPTOR

DEALLOCATED

(GIO_PER_CTLR

[ .COUNT]}

eaqla

MAX_CTLR

..ADDR

RETURNING

TO BE

THIS

!
IS

THE

FOR EACH ENTR/

!
!

DEALLOCATE BUFFER
DONE

IN BUFFER

TABLE

BUFFER'S ENTRY

hen

begin
BUFF
_OWN (.COUNT]
exitloop;

6091
6092
6093

000000

ROUTINES

global rout ne PUT

B¢

6076
6077
6078
6079
6080
6081
6082
6083
6084
6085
6086
6087
6088
6089

RD/RX EXERCISER

NRQAM?
vOol.c

end;

LSBTTL

PUT,.IO0.BUFF GLOBAL ROUTINES

MOV
CLR
MOV

R1, -(SP)
Rl
R1,RO

PUT.IO.BUFF:;

1¢:
000000G 000004

ASL
g::

000377

ggVB

000007

000000G
2s:
3s:

Routine Size:
18 words,
Routine Bese:
Maximum steck depth per invocation:
2 words

INC

cHp
BLE

MOV

RO
ggFF.ADDR(RO).OA(SP)

;377,BUFF.0UN(R1)
$

R1,07
1

(SP)+,R1

RTS

$CODES$

+« 6056

H
;:
;:

COUNT
COUNT,
s

»,ADDR

#,8(COUNT)

6091

COUNT

6086

:
;s

COUNT,»

€075
6086
6088

6075

M1 4
NRQAM,/
!Ol.;

®:

6094
6095
6096
6097
6098
6099
6100
6101
6102
6103
6104
6105

000000

010146

000002
000004
000010
000014
000016
000024
000026
000032
000034
000036

005000
116001
020137
001003
112760
005200
020027
003764
012601
000207

:
;

RD/RX

EXERCISER

GLOBAI

ROUTINES

global

routine PUTA BWFF

novalue

Blies-16

V3-555

SEQ 0168

Dec

1983

10:24:41

VAX

15 Dec

1983

10:21:50

SPIDERSUSERS:
([DOUCETTE .FALCONICNRQAA .BLL (%4

rege

172

HO)

!
H
|

THIS ROUTINE DEALLOCATES ALL I/0 BUFFERS WHICH HAVE BEEN ALLOCATED
THE CURRENT CONTROLLER (CCTLR).

‘ner

COUNT
f

.BUFF

then

[ .COUNT]

eql

& MAX

18:

0000006

2%:

Routine Size:
16 words,
Routine Base:
Maximum steck depth per invocation:
2 words

CTLR

.CCTLR

-1;

.SBTTL
PUT ' [FF
10V
CLR

0000006

000007

OWN

(QIO PER CTLR

BUFF _OWN [ .COUNT]

000000G
000377

from O to

THIS B'FFER

DEALLOCATE
GLOBAL

R1,-(SP)
RO

BUFF .QWN(RO),R1

R1,CCTLR

BNE
MOVS
INC
cHe
BLE

RTS

IN BUFFER

IS ALLOCATED

THE CURRENT

TABLE
CONTROLLER

ROUTINES
3
;s

COUNT

s(COUNT ),

6094
6101

€103

; o.o(COUNT)
; COUNT
; COUNT,s

6105
£101

(SP).,R1

6094

FOR EACH ENTRY

2t
0377 ,8UFF . OUN(RO)
RO
RO, 07
14

MOV

PUTA.BUFF

MOVB

$CODES$

6122

NL13
vol.c

6106
6107
6108
6109
6110
6111

EXERCICIR

GLOBA:

ROUTINES

globsl

rout ne OUT

QUEUE

Ws
B+
.
e

SEQ G147
Qe 173
SPID
: ERSU
(DOUCETTE .FALCONICNRQA
SERS
A .BL1 (5%

VAX

Bliss

TO BEGINNING OF

QUEUE

Vv3-555

CALLER THE NEXT RETPKT INDEX TC BE
QUEUE (I0DQ@). THE "OUT” POINTER TO

THE

INDEX

THE

RETPKT

PROCESSED.

G
e
Be
Be
Be
Bs
@r
®s
G
@
B
B
B
@1
@r
Br
Be
®c

10:24:41
10:21:50

begin

loceal

index

I00DQ_OUT

word;

.100Q@

100@_OUT

return
end;

000004
000010
000014
000020
000026
000030
000034

116000
042700
005237
023727
103402
005037
000207

0000006

177400
0000006

gequ

IODG_LEN

. index;

0000006 000004
0000006

(.IODQ@_OUT);

.I0DG@_OUT

if .IODQ_OUT
then

0000006

Rout ne Size:
Max .mum steck

1983
16.3

NONE

OUTPUTS:

6116

013700

Dec
Dec

IS ALSO UPDATED.

INPUTS:

000000

;

100Q

THIS ROUTINE RETURNS TO THE
PROCESSED FROM THE I/0 OONE

6112
6113
6114
6115
6117
6118
6119
6120
6121
6122
6123
6124
6125
6126
6127
6128
6129
6130
6131
6132
6133

15
15

RD/Rx

NRQAM,

.SBTTL
OUT.I00Q::
MOV
MOVB
8IC
INC

5.0

1s:

15 words,
Routine Bese:
depth per invocation:
O words

L
CLR

!
!

GET NEXT RETPKT INDEX
ADVANCE “OUT" POINTER

IF BEYOND END OF QUEUE

SET POINTER

RETURN INDEX

TO CALLER

OUT.IODA GLOBAL ROUTINES
100Q.0UT ,RO
I0D0Q(RO),RO
#177400,R0
100Q.0UT
,
I0DG.0UT04
1

RTS

100Q.0UT
PC

$CODES

6162

., INDE X

+, INDEX

6125
6126
6128

6130
6106

NRQA,

KD Rx EXERCISER

vi34

s
s
'
[}
’
'
s

6135
1%
6187
o158
61%9
6140
ol4}

3
s
$

6148
6144
6145

6142

6146

'
'
'

6150

]

:lgg

6154

010146

000002

013701

000010

003200

00002

000012
000016
000020
000022
000026
000032
000034
000042
000046
0000354
0000%
000062
000064

010100

020037
001421
010100
162700
020037
001413
116661
005237
023727
103402
00%037
012601
000207

Routing Size:
Hexioum steack

((.100Q_IN -

(.1000_1IN

then

else

~ae~)

movelue

INDEX

[0:¢1:%0

Iv€

170 DONE

1. 8] we 16 4¢3 %%

PLOERS

CERS:[LAJCE

TR S A | A

voge
.

&
.

INTO

QUEWE,

AND

.I0DQ OU") or

(100Q LEN

1; eal

.J00G OUT}

ogsn

1
{.I00Q_IN) = . index;
I00G_IN = . JODQ_IN . 1;

*
*

LOAD INDEX INTO QUEWR
ADVANCE ' IN" POINTER

i? .I00Q_IN gean 100G LEN

IF BEYOND END OF QUEWE

CvyCLE BACK

IF 100G 1S5 NOT FULL

I00Q_IN « 0;

end;
.SBTTL
IN.IODQ: :
0000006

R1,

MOV

R1,RO

P
8EQ
MOV
SUB
cHP
8EQ
“0ve
INC
c
8L0
CLR
MOV
RTS

R0, 100Q.0UT
13
R1,RO
#3,R0
RO, 100Q.0UT
1
4(SP), I00Q(R1)
100Q. IN
100Q.IN, 04
18
100Q. IN
(SP).,R1
PC

INC

000003
000000G
O0000N4
000000G
000000G
000000G 000004
1s:

27 wordse,
Routine Bese:
depth per invocetion:
2 worde

SCODES

TQ BEGINNING OF QUEUE

IN.IODQ GLOBAL ROUTINES

MOV
MOV

000000G

0000006

1983

VA7

100G IN POINTER.
1) eql

1948 10:¢4:41

return

then

000000

15 Dec

IS ROUTINE INSERTS A RETUPN PACKFETYT

UPDATES "€

6151

ROUTINE
S

.
¢
¢
¢

1% Usc

glovel routine IN I0DQ '

6147
:1::

i+
i1

(SP)

100Q. IN,RY

6134

6142

6141

. 6220

;
;
;
:
i
:

INDEX,s

6144
6147
6148
61%0
6152
¢134

4}
NRQAM,
vOi..
3

6155
6156

B+

6157
6158
6159
6160

6161
6162

6163

6164
6165
6166
6167
6168
6169
6170
6171
6172
6173
6174
6175
6176

1% Dec

1983

10:c4:41

VAZ

GLOBAL

1% Dec

1983

10:21:50

SPIDERSUCERS:[DOUCE
TTE . FALCUNICNRIAL 81 1 797

ROUTINES

global routine DROP CTLR (CTLR, REAS0ON)
H
!
'
'

[]

inc N from (O
if

CST

then

OF UN)

[.CTLR,

.N,

to (3 o UNIT_SIZE
D_PRES]

eql

PRESENT

OF UN) by

UNIT SIZE do

!
!
t

GET DRS UNIT NUMBER
SET REASON FOR DROPPING UNIT
DROP UNIT

UNIT

FOR EACH UNIT

IN CST

CONFIGURED

.
"n

UNIT « _CST [.CTLR, .N,
DUR (.UNIT] = _REASON;
D00V (.UNIT);

D_UNIT];

end;

0000006

DROP.CTLR::

016646
012746
004737
010003
012702
010300
060200

000014
000027
0000006

032760
001412
016001
000301
042701
116661
010100
10445]1
062702
020227
003752
022626
000207

040000

MOV
MOV
JSR
MOV
MOV
MOV
ADD
ASL

000003

1¢:
0000006

177760

000016

Routine

;

Meximum stack depth per

35 words,

DOROP.CTLR GLOBAL ROUTINES

JSR

R1,$SAVE3

24:

: CTLR,»

6155

6171

s o.N
:
i N,o

6169
6171

?OOOO.CSY(RO)
|§

CST(RO).R1
R1

3 o, UNIT
1 UNIT

61’4

MOVB

16(SP),DUR(RL)

617%

#177760,R1

i o,UNIT

REASON, o(UNIT)

MOV

R1.RO

ADC
ce

5,R2
R2,#22

i &,N
i1 N,s

6169

(SP)+,(SP).

6164

TRAP

BLE

Routine Base:
invocetion:
8 words

14(SP), -(SP)
827, -75P)
PC,BLSIMUL
RO .R3
#3,.R2
R3,.RO
R2,RO
RO

MOV
SWA8

8IC

000000G

000005
000022

.SBTTL

gé;

0000006

Size:

loceal
UNIT;

004137

000070
000074
000100
000102
000104

v3 S5

begin

end;

006300

THIS ROUTINE DROPS ALL UNITS ASSOCIATED WITH TreE CONTROLLER DESIGNATED
BY “CTLR”, THE REASON FOR DROPPING THE DEVICE IS LOADED INTO THE DR
VECTOR FOR EACH ATTACHED UNIT, THIS DATA IS THEN USED BY THE DROP UNIT
SECTION.,

6178
6179

000032

novelue

Blies

6177

000010
000014
000020
000022

SEQ 0171
Page ./°

RD/kx EXtRCISER

51
1

RTS

S$CODES

+ 6306

i UNIT,
e

6176

6155

NRQAM,

RD/RXx EXERCISER

vOl1.¢

GLOBAI

1% Dec 1983 10:¢4:41

ROUTINES

1% Dec

198%

10:21:50

VAX-11 Bl s 16 v3 5%

SEQ 017¢

901' 17¢

SPIDERSUSERS: (DOUCETTE.FALCONICNRQAA . BLL

H
H
H
:
3
:
H
:
:
H
H
:
:
H

6180
6181
6182
6183
6184
6185
6186
6187

6188
6189
6190
6191
6192
6193

globel routine DRV CTLERR (CTLR)
!
!
!
!
!
!
!
!
!
!

INPUTS:

6194

begin

6196

local

6195

613;

H
H

6199
6200

:
H
;

6201
6202
€203

000000

010146

000002
000006

016601
010146

000010
000014
000020
000024
000026
000030
000034
000036
000042
000046
000052

000054

;:
;:

012746
004737
062700
005010
010116
004737
010116
012746
004737
062706
012601

O_ADOR

CTLR

DYING CONTROLLER NUMBER

ref block

[DCT_LEN,

word)

field (DCT_FIELDS);

D_ADDR = DCT ¢« (.CTLR o DCT_LEN o 2);
O.ADDR {WORDO] = OFFLINE;

000022
000000G
000000G

005620
000006
006306
000006

23 words,
Routine Bese:
depth per invocetion:
S words

CONTROLLER'S DCT

DRV.CTLERR GLOBAL ROUTINES

MOV

R1,

MOV
JSR
ADD
CLR
MOV
JSR
MoV
MOV
JSR
ADD
MOV

022, -(SP)
PC.BLEMAL
®0CT RO
(RO)

RTS

SCODES

« 6414

MOV
MOV

ADDRESS

' RELEASE ALL PACKETS ALLOCATED TO CONTROLLER
! DROP ALL UNITS ON THE CONTROLLER
! ROUTINE ORV_CTLERR

.SBTTL

DRV.CTLERR: :

000004

! GET CONTROLLER'S DCT ADDR
! MARK DCT OFFLINE AND CLEAR CRING_CNT

PUTA PKXT (.CTLR);
OROP _CTLR (.CTLR, DU_CFATAL),;
end;

000207

Routine Size:
Haximsm stack

novalue

THIS ROUTINE IS CALLED BY DRV _TIMCHK AND FATAL _ERROR WHENEVER AN
UNRPECOVERABLE CONTROLLER ERROR HAS BEEN DETECTED. ITS PURPOS. ~< TO
CLEAN UP ALL CONTROLLER-RELATED DATA IN THE “DRIVER' PORTIO*
THE
PROGRAM, THIS INCLUDES MARKING THE CONTROLLER OFFLINE, CLEARiNG THE
C-RING COUNT, AND DEALLOCATING MSCP PACKETS DESCRIBED IN THE RESPONSE
RING.

:
:

(SP)

4(SP),R1
R1,-(SP)

R1,(SP)
PC.PUTA PKTY
R1,(SP)

6, -(SP)
PC,OROP.CTLR
o6 ,5P

(SP)+,R1

s CILR,
s

D.ADDR

6180

6199

6200

6201

6202

:
:

6194
6180

b4
NRQAM,

RD/RX

EXERCISER

vo1.¢

GLOBAL

ROUTINES

routine SEND ( ‘nder)

:
H
:
:
:
:
:
:
;

6204
6205
6206
6207
6208
6209
6210
6211
62l§

globel

:
:
:
H
:
:
:

6214
6215
6216
6217
6218
6219
2550

!
!
!
!
!
!
'

:
H
H
:
:

6222
6223
6224
6225
6226

:
;
:
:
:
:
:
3
:

6229
6230
6231
6232
6233
6234
6235
623
6237

:
;
:
:
:

6239
6240
6241
6242
6243

:
;
H
H
H
H
:
H
H
:
:

6245
6246
6247
6248
6249
6250
gggé

;

.
;
:

621

!
!

!
!
!
!
H
!

10:04:41

VAX

Page

177

15 Dec

1983

10:21:50

SPIDER$JSERS:
{DOUCETTE .F ALCONICNROAA.BLL

(59

IF THE CURRENT RORX IS ONLINE AND ITS CRING IS NOT FULL, THEN THIS
ROUTINE "“SENDS"” A COMMAND TO THF RDRX BY LOADING THE PACKET
DESCRIPTOR OF AN MSCP PACKET INTO THE COMMAND RING AND READING THE
DEVICE‘'S IP REGISTER.
IF THE
CURRENT RDRX IN NOT ON_INE, THEN A FAILURE INDICATION IS RETURNED T0Q
THE CALLER, AND NO ACTION IS TAKEN.
INPUTS:

IMPLICIT

INDE X

INDEX O MSCP PACKEtTM CONTAINING THE COMMAND TO
BE SENT

INPUTS:
CCTLR - CURRENT CONTROLLER NUMBER
OCT _AODR
ADDRESS OF CURRENT CONTROLLER'S DCT

locel
SLOT_ADDR,
TEMP : word;

if (C.OCT_ADDR (STAT] eql ONLINE) end
(.DCT_ADDR [CRING_CNT) lesu CRING_LEN)) or
((.MSCP_PKT [.index, OPCODE] eql OP_SCC) end
(.DCT_ADDR (CRING_CNT] lesu CRING_LEN))
then
if (not ((.MSCP_OKT (.index,
(.MSCP_PKY [ .index,
( .MSCP_PKT (.index,

6238

t
¢
*
'

(.MSCP_PXT [.index, OPCODE] eql OP_WPT) OR
(.MSCP_PxT[.INDEX, OPCODE) EQL OP_SOD) OR
(.MSCP_PKXT(.INDEX, OPCODE) EQL OP_RCD) OR
(.1SCP_PKT(
. INDEX, OPCODE] EQL. OP_GDS) OR
(.MSCP_PKT[.INDEX, OPCODE] EQL OP _ELP) OR

(.MSCP_PKT(.INDEX, OPCODE] EQL OP_ABP) OR

then

!
else

(.MSCP_PXT[ .INDEX,
in
PRINTF (DBM10O7,
return FAILURE;
end

IF DEVICE IS ONLINE AND
ITS CRING IS NOT FULL
OR IT IS A SET-CTRL CHAR COMMAND

OPCODE) eql OP_ACC) or
OPCODE) eql OP_OML) or
OPCODE] eql OP_RD) or

(.MSCP_PKT {.index, OPCODE] eql OP_SCC) or

6244

6259

198%

begin

ggg;

6253
6254
6255
6256
6257
6258

OPCODE]

.MSCP_PKT

EQL OP_ESP)

{.index,

OPCODE]):

)

)
$JSO REV A

begin

SEQ 0173

Dec

BREAK
' LOOP TILL CREDIT BALANCE POSITIVE
until ((.MSCP_PKT [.index, CMD_TYPE] eql IMM_CMD) and
(.CREDIT _BAL geau 1)) or
(.CREDIT BAL gtru 1),

1!
RD-/RX EXERCISER

NRQAM.
vol.cC

GLOBAL

®1

8¢

)

ROUTINES

MSCP PKT

6260
6261
6262
6263
6264

126027

001156
121127

103153

016646

CRN LO]

CRN MI]

(CRN_LOW
«

1983
1983

,CRN_LOW

10:¢4: 41
10:21:

VAX

1);

ADDR OF

H
H
’
H
H
!

LOAD BUFF

SLOT_ADDR

.DCT_ADDR

555

SEQ 0174
Page

178

SPIDER$USERS: {DOUCE TTE .F ALCONJCNRQAA, 8L1 (s9
ASSIGN CMD REF

NUM

COMMAND SLOT

ADVANCE

.DCT_ADDR (CR_BEG]):

(LO)

INTO COMMAND SLOT

WORD

LOAD BUFF DESC (HI) INTO COMMAND SLOT
CLEAR INTERRUPT FLAG IN CASE SET
GIVE OWNERSHIP TO CONTROLLER
ADVANCE

TC NEXT

CYCLE BACK

return SUCCESS:
end
return FAILURE;

COMMAND

SLOTY

TO BEGINNING

RESTORE CR_NEXT POINTER

IN DCT

INCR @ OF COMMANDS IN CRING
DECREMENT CREDIT BALANCE
READ IP TO FORCE PORY
LOWER PRIORITY

end;

DESC

TO NEXT

IF BEYOND END OF CRING

{CR_END]

OCY_ADDR [CR_NEXT) = _SLOT_ADOR;
OCY_ADDR [CRING_CNT) = .ODCT_ADDR [CRING_CNT])
CREDIT_BAL - .CREDIY BAL - 1;
TEMP = _RORX_ADDR (RCIP, RC_ALL);
SETPRI (PRIOO);

DEVICE

IS NOT

TO POLL

ONLINE

! ROUTINE SEND

SEND::

000000G

LSBTTL

14:

R1, $SAVE?2
-(SP)
OCT.ADDR,R1
(R1)

6204

6229

cP8

(R1),04

6230

MoV
MOV
JSR

12(SP), -(SP)
2104, -(SP)
PC,BLIMU

;

g:zs

g?CP.PKToZZ(RO).OQ

cHP8
BHIS
MOV

(Rl) o4

;

12(SP) -(SP)

B8LO

000022G 000004
000004
2%:

SEND GLOBAL ROUTINES

JSR
TST
MOV
187

8PL

000004

000012

(PRIO7);

t# .SLOT_ADDR gtre
then

000012
000104
0000006

¢+ 2) end ED_OWN) eql 0);

[.index, PKT_LO};
e 23
.SLOT_ADDR = .MSCP_PKT (.index., PKT_HI);
.SLOT_ADOR
= ..SLOT_ADDR and (not (ED_FLAG));
.SLOT_ADDR = ..SLOT_ADDR or ED_OWN;,
SLOT ADDR = SLOV_ADDR -

0000006

Bl es

_CRN HIGH;

.SLOT_ADDR = _MSCP_PKT
SLOT_ADDR
- SLOY_ADDR

else

,DCT_ADDR [CR_NEXT];

D0 BREAK
UNTIL ((.C.SLOT_ADDR

SETPRI

.CRN_HIGH

[.index,

SLOT_ADOR =

6268
6269
6270
6271
62172
6273
6274
6275
76
6277
6278
6279
6280
6281
6282
6283
6284
6285
6286
6287
6288

004137
005746
013701
005711
100003
121127
103416
016646
012746
004737
022626

CRN_HIGH

MSCP _PKT

6265

[.index,

.CRN_LOW eql

then

6266
6267

6289
6290
6291
6292
6293
6294
6295
6296

15 Dec
15 Dec

INDEX,
s

6231

(SP)e+,(SP)»

6232

INDEX,

6235

()4
KD /Rx

EXERCISER
GLOBAL ROUT INES

MOV

JSR

MOV

cMP
CLR
8Ise
cMe

0000226
000020

8tEQ
cHP
8EQ

000011

cHP
BEQ
o
8EQ
cHP
BEQ
cHP
8EQ
cHP
B8EG
cnp
BEQ

001414

020027
001411
020027
001406
020027

000316
000320
000324
000330
000334
000340
000344
000350

016211

042711
052721
013700
020160
101402

6236

34
RO, %41

6237
6238

6239
6240

6241
6242
6243
6244

3s:

22
MSCP
. PKT.4(R2)

6245
6235
6254
6256

S?EDIT.BAL

6257

gREDIT.BAL.Ol

6258

CRAN.LOW,.RO

6260

000001

44
:

’

S¢:

RO,CRN.LOW

22.HSCP.PKT012(R2)

000002

7¢:

me
®e
8¢

6262
6263

»,SLOT.ADDR

0000146

. HIGH
CRN
CRN HIGH,MSCP
. PKT+14(R2)
DCT.ADOR,RO
20(R0O),R1
22
#-100000,2(R1)

®c

000242
000244
000250
000254
000256
000262
000270
000274
000300
000302
000310
000312

(SP)e,(SP)e

RO
MSCP.PKT+22(R2),R0O
RO, #20
3¢
RO,011

BEQ

001403
020027
001077

104422
005762
001003
005737
001004
023727
101765
013700
005200
010037
010062
001002
05237
013762
013700
016001
104422
032761
001373
012700
104441
016221

4104, (SP)
PC,BLSMUL
RO,Re2

»,+(5LO0T
. ADOR)

6265
6267

6269
6270
6212

MSCP . PKT(R2),(R1).
81C
81s
MOV
cHP
8L0S

MSCP . PKT+2(R2),(R1)
#40000, (R1)
#100000,(R1)»

OCT.ADDR,RO

:%.12(R0)

156200
020027
001436
020027
001433
020027
001430
020027
001425
020027
001422
020027
001417
020027

000104
0000006

000142
000144

012746
004737
010002
022626
005000

SEQ .,
VAX 11 Bl .es 16 V3 S5%
Page . 7’9
SPIDERSVUSERS
: (DOUCETTE .FALCONICNROAA HL | 75° ]

000064
000070
000074
000076
000100
000102
000106
000112
000114
000120
000122

10:24:41
10:21:50

®e

1983
1983

T
. ADDR
«,SLO
4,S5L0OT.ADDR
»,SLOT.ADOR
4,SLOT.ADDR

vO1

1% Dec
15 Dec

NRUGAM,

SLOT.ADDR,
¢

6274
6276
6277
6278
6281

4
-1

005337

017716
005000
10444)
012700
000401
005000
005726
000207

: Routine Size:

;

ROUTINES

000010
000020

10(R0O),R1

MOV

8¢:

000000G
0000006

MOV

R1,20(R0O)

MOV

CREDIT.BAL
SRORX
. ADDR, (SP)

(RO)

INCB
0EC
CLR

RO
4]
01,RO

TRAP

000001
94:
10¢:

134 words,
Routine Base:
7 words
Maximum steck depth per invocetion:

MOV
B8R
CLR
TS7

$CODES

VAX

11 Bl.es

1€

v3-355

StQ 07
Pege 180

SPIDERSUSERS:
[DOUCE TTE ,FALCONICNRQAA .BLL (5%

*,SLOT.ADDR
SLOT.ADDR,
»

s ,RC.REG

6287
6285
6285
6287
6288
6289

6235
6223

(SP)+

6204

10:¢4:41
10:21:50

108

RTYS

1983
1983

GLOBA.

1% Dec
15 Dec

016001
010160
105210

EXERCISER

000352
000356
000362
000364
000370
000374
000576
000400
000404
000406
000410
000412

RD/RX

NRQAM?
vol.c
)

6472

14
RD/Rx EXERCISER

NRQAM,
vol.c

GLOBAL

)

B¢

6297
6298
6299
6300

®e

®:

6301
6302
6303
6304
6305
6306
6307

000000
000000
000002
000010
000012

.
;i

ROUTINES

globel routine WAIT

001773

15 Dec

novalue

1983 10:21:50

VAX |1 Bliss 16 v3 5%

SEQ L1777

P;ge 181

SPIDERS$USERS
: [DOUCE TTE .FALCUN JCNRIAI K,| e+t

!
H

THE PURPOSE OF THIS ROUTINE IS TO KILL TIME UNTIL AN RDRX
RESWLTS IN A HETURN PACKET INDEX BEING DEPOSITED INTO THt
QUEUE (100Q).

INTERRUPT
1/0 DOUNE

[)

BREAK

until

.I00Q IN neq

104422

023737

15 Dec 1933 10:24:41

000000G 0000006

WAIT::
1¢:

000207

Routine Size:
6 words,
Maximum steck depth per

' BREAK FOR ACT

.IOCDQ_OUT;

Routine Base:
invocetion:
2 words

.SBTTL

WAIT GLOBAL

TRAP

;

6305

RTS

1s
rC

6297

528

$CODES

ROUTINES

I100Q. IN, I0DQ.0UT

7106

6307

b4
NRQAM?
vol.c

RD/RXx

6308
6309
6310
6311
6312
6313
6314
6315
6316
6317
6318
6319

Gs
B¢
Se
@
@2
Ps
B¢
@)
s
We
Gr
G
L
B
B0
B0
B0
B¢
8L
Se
@s
@1
B¢

6321
6322
6323
6324
6325
6326
6327
6328
6329
6330
6331
6332
6333
6334
6335
6336
6337
6338
6339
6340
6341
6342
6343

010146
013701
020127
001023
012746

012746
010500
10
15
012716
012746
010600
104415
013716
012746
010600

104415
000475

ERROR MESSAGE

SUBROUTINES

ssbtt]l

MESSAGE

ERROR

rout ine EMS_SA

Blies-16

v3-555

SEQ 0!7%

Dec

1983

10:24:41

VAX

Page

18/

15 Dec

1983

10.21:50

SPIDERSUSERS: [DOUCETTE .FALCONJCNROAR. 8L1

SUBROUTINES

novalue

H
!

THIS ROUTINE PRINTS (EXTENDED) THE .LOBAL DATUM
THE CONTENTS OF THE SA REGISTER,
if .SA_REG eql
then
n

)

EXERCISER

else

“SA_REG” WHICH CONTAINS

%0'177777

CONTROLLER

GENERIC

IF RORX

TIME

OUT

PRINTX (CRLF);
PRINTX (ASTERISK);
PRINTX ( .CNTR_ERR [01]);
end
if (.SA_REG and %0°'003777') leaqu 22
then
n
PRINTX (CRLF);
PRINTX (ASTERISK);
PRINTX (.CNTR_ERR [.SA_REG and %0'003777°1);
end
else

((.SA_REG end %0'003777‘')

400)

lequ 6

CONTROLLER ERROK

SPECIFIC

CONTROLLERP ERROR

then

in
PRINTX
PRINTX
PRINTX
end
else
PRINTX

0000006

1777717

0000006
000001

(CRLF);
(ASTERISK);
( .RORX_ERR [(.SA_REG and #0'003777°)

(XxXX18,

.SA_REG);

EMS.SA:

EMS.SA ERROR MESSAGE
RL,-(SP)

Ri,#-1

MOV
MOV

®CRLF, -(SP)
o1, -(SP)

TRAP
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
TRAP

1S
QASTERISK,(SP)
e1,-(SP)
SP,RO
15
CNTR,ERR, (SP)
e1,-(SP)
SP,RO
15

BNE
MOV

B8R

4001});
!

.SBTTL
MOV

. MoV

SA.REG,.R1
1¢

5P.RO

3¢

JUST PRINT

SUBROUTINES

CONTENTS OF

6310

6320

63.7

SP,s

6321

SP,»

6322

SP,s

6319

1<y 4
NRQAM,?
vol.c

000062

000070
000074
000076
000102
000106
000110
000112
000116
000122
000124
000126
000132
00C136
000140
000144
000150
000152
000154
000156
000160
000164
000170
000174
000176
000202
000206
000210
000212
000216
000222
000224
000226
000232
000236

000240
000244
000250

000252
000254
000256
000260
000262
000266
000272
000274
000276
000302
000304

;
;

15 Dec

RD/Rx EXERCISER

ERROR MESSAGE
010100
042700
020027
101030
012746
012746
010600

104415

012716
012746
010600

174000
000026

SUBROUTINES
1

0000006
000001

24:

#174000,R0
RO

1, -(SP)

SP,RO
15
3¢

B8R
MOV
8IC
SuUB
cHe

000002

SEQ 0179
Page 187

SPIDE
[DOUCETTE
RS$US
,FALCONICNROA
ERS:
L . BLY
;

(61

632¢

6329
SP,s

6330

SP,s

s
H

6331

SP,s
6328
6325

®CRLF, -(SP)

6338

SP.RO
15
®ASTERISK,(SP)

;

SP.RO
15
SA,REG,RO

o), -(SP)

#174000,R0
RO

RDRX .ERR-1440(R0),(SP)
1, -(SP)
SP.RO

TRAP
M

B8R
MOV
MOV
MOV
MOV
TRAP
ADOD
MOV

oxx14, -(SP)
®”2,-(SP)

SP.RO
13
#6,SP
(SP)+,R1

RTS

99 words,
$CODES
Routine Size:
Routine Base:
7 words
Maximum steck depth per invocation:

v3 55

MOV
MOV
MOV
34:

#620,R0
RO, #6

TRAP
MOV
81C
ASL

1763406
000001

Bli.es

H
F

R1,RO
#174000,R0

MOV
MOV
HOV

174000

CNTR.ERR(RO),(SP)

BHI
MOV
MOV
MOV
TRAF

104415
005726

000207

SP,RO
15
SA.REG,RO

ASL
MOV
MOV
MOV
TRAP

101031

104415
062706
012601

OCRLF, -(5P)
1, -(SP)
SP,RO
15
OASTERISK, (SP)
01,-(SP)

MOV

000437
010100
042700
162700
020027

10:21:50

VAX

'€

104415

000407
010146
012746
012746
010600

8IC
cMP
8MI
MOV
MOV

MOV
MOV
TRAP

013700
042700
006300
016016
012746
010600

1983

10:24:41

R1,RO
#174000,R0
RO, #26

MOV

MOV
TRAP
MOV

104415

012746
012746
010600
104415
012716
012746
010600
104415
013700
042700
006300
016016
012746
010600

15 Dec

1983

+»

7122

SP.s

6339

SP.‘

6340

SP,e

6337
633S
6343

H
3
H
;i

SP,e

631~

6310

L4
RD/RXx EXERCISER
ERROR MESSAGE SUBROUTINES

®r

we
o

@¢

B¢

G-

®s

®e

S+

NRQAM2
vol.o

6344

6345
6346
6347
6348
6349
6350
6351
6352
6353
6354
6355
6356
6357
6358
6359
6360
6361
6362
6363
6364
6365
6366
6367
6368
6369
6370
6371
6372
6373
6374
6375
6376
6377
6378
6379
6380
6381
6382
6383
6384
6385
6386
6387
6388
6389
6390
6391
6392
6393
6394
6395
6396
6397
6398
6399

routine

EMS_SBC

! +
!

THIS

novelue

ROUTINE

15 Dec
15 Dec

1983
1983

10:24:41
10:21:50

SEG 01AC
VAX 11 Bl.es-16 V3 S55
Page 184
SPIDERSU
(DOUCETTE .F ALCONICNRQAA
SERS.BL1
: (6.

PRINTS

THE

GLOBAL

DATUM

‘SB_CODE”

(5UB-CODE)

EITHER THE STATUS CODE (ST_CODE) OR THE SUB-CUDE IS NON ZERO., (A
NON-ZERC SUB-CODE ALWAYS HAS SIGNIFICANCE, WHEREAS A ZERO SUB CODE ONLY

[}

HAS MEANING WITH A NON-ZERO STATUS CODE).

1]
[}

begin

(.ST_CODE

then

begin
PRINTB

case

.SB_CODE)

neq O

5uB CODE

(XX16);

.ST_COODE

set

[ST_SUC]:

.SB_CODE

then

PRINTB

[(ST_ABO]:

lequ

(.TBL_SUC

(EX_OP,

.SB_CODE

then

[ST_wPT):

s 8);

lequ 8

PRINTB (.78L_OFL

SUCCESS SuB CODES

INVALID COMMAND

COMMAND ABORTED

UNIT OFFLINE

(.SB_CODE);

.SB_CODE

(.SB_CODE]):
UNIT

.SB_CODE

then

lequ 10

PRINTB (.TBL_MFE

(.SB_CODE 7/

then

128)

{ST_DAT]:

if .S8_CODE
then

lequ

lequ 4

[ST_CNT):

MEDIA FORMAT ERROR

WRITE PROTECTED

[.SB_CODE);

lequ 2

PRINTB (.TBL_DAY

.SB_CODE

then

AVAILABLE

PRINTS (.TBL_WPT [(.SB_CODE s 128)1);

(ST_CMP]:

(ST_HST):

[ST_AVL]):
{ST_MFE]:

PRINTB (.TBL_HST

if .S8_CODE
then

COMPARE ERROR

DATA ERROR

HOST

CONTROLLER ERROR

ORIVE ERROR

{.SB_CODE));
ACCESS ERROR

(.SB_CODE});

lequ 3

PRINTB (.TBL_CNT [.SB_CODE));

(ST_DRV]):

ONLY

from ST_SUC to ST_DRV of

[(ST_CMD):

(ST_OFL]:

SUB-CODE

.SB_CODE leau 8

ON ERROR

ML4
RD/RX EXE4CISER
ERROR MESSAGE SUBROUTINES

NRQAM,
vOl.c

6400

000010
000012
000014
000020
000024
000026
000030
000034
000040
000042
000044
000054

000070
000072
000074
000102
000104
000110
000112
000116
000122
000124
000126
000130
000134
000140
000144

000146
000152
000156
000160
000162
000166
000170
000176
000200
000204
000206

013700
053700
001001
000207
012746
012746
010600

104414

013700
020027
101003
006300
066007
013716
012746
012746
010600
104414
022626
000435
023727
101165
013700
006300
016016
012746
010600
104414
000565
013716
012746
004737
010016
012746
012746
010600
104414

(outrange]:

PRINTB

(EXx

(.7BL_DRV
OP,

tes;

SEQ O1A:

VAX-11 Bl,ss-16 V3-555

185

SPIDER‘USERS:(DOUCEYYE.FALCON]CNROAA.;E: (e

{.SB_CODE
1),

.SB_CODE);

JUST

SUB CODE

NO MATCH

end;

.SBTTL
EMS.SBC: MOV
BIS
BNE
RTS
MOV
1.
MOV
MOV
TRAP
MOV
oy

0000006
000000G

0000006
000001

000 VOG
000013

8HI

3s:

000042’

64:
7%:

(SP)s,(SP).

TRAP

SP.RO
14

MOV
JSR
MOV
MOV
MOV

€10, -(SP)
PC,BL$DIV
RO, (SP)
JEX.OP, -(SP)
2,-(5P)

TRAP
ADD

14
#6,5P

cHP

SB8.CODE, 010

ASL
MOV

RO
TBL.OFL(RO),(SP)

BHI
MOV

6358

SP,s

SP,.RO

ASL

MOV

€355

: Coese dispatch

B8R
MOV

P.AAAR(RO),PC

B8R

cHp
BHI
MOV

SUBROUTINES

6360

SB.CODE, (SP)
®EX.OP, -(SP)
2,-(SP)

ADD

MOV
MOV
MOV

000010

SB8.CODE
RO
1
PC
exx16, (SP)
01, -(SP)
SP,RO
14
ST.CODE ,RO
RO, 213

MOV
MOV
MOV

cHp

as;

ST1.CODE,RO

TRAP

000020

EMS,.SBC ERROR MESSAGE

ASL

MOV

062706

000546
023727
101142
013700
006300
016016

10:24:41

15-Dec-1983 10:21:50
PRINTB

6406

000000

1983

then

6401
6402
6403
6404
6405

6407
6408

15 Dec

SB.CODE , 20
143
SB.CODE RO

T8L . SUC(RO),(SP)
21, -(SP)

6403

H
:

6360
6363

6365

15¢
S$B.CODE,(SP)

SP,.RO

: SP.»

164

16¢
$8.CO0E ,RO

6360
6371

6373

6367

N14
RD/RX

NRQAM?2
vol.c

000212
000216
000220
000222
000224
000232
000234
000240
000242
000246

000252
000254
000256
000260
000264
000270

000274
000276
000302
000304
090306
000312
000316
000320

000322
000324
000332
000334
000340
000342
000346
N00352
000354

000356
000360

000366
000370
000374
000376
000402
000406
000410
000412
000414
000422
000424
0004 30
0004 32
0004 36
000442
000444
000446
000450
000456

000464

15 Dec
15 Dec

EXERCISER

ERROR MESSAGE SUBROUTINES
012746
010600
104414
000527
023727
101124
013700
006300
016016
012746
010600
104414
000511
013716
012746
004737
005726

020027
101100
006300

016016
012746
010600
104414
000467
023727
101064
013700
006300
016016
012746
010600

000001

000000G 000012

MOV
MOV
TRAP

8s¢:

MOV
ASL
MOV
MOV
MOV
TRAP

0000006
000200

9s:

MOV
MOV

000002

000112’
000001

00000N0G 000017

10%:

000120°
000001

000000G 000004

11¢;:

000160’
000001

Bnl
MOV
ASL

MOV
MOV
TRAP

000000G 000003

12%:

B8R
cP
BHI
MOV
ASL

000172
000001

MOV
MOV
MOV

TRAP

000000G 000010

12‘:
14

B8R
CcMP
8HI
ASL

18+

(&,

SB.CODE,
#12
16
S$8.CODE ,RO

6377

6379

SP,RO

15%
SB8.CODE, (SP)
4200, (SP)

6381

6383

6387

6389

6391

6393

RO
TBL .MFE(RO),(SP)
21, -(SP)

RO, ¢2

BHI
MOV
ASL
MOV
MOV
MOV
TRAP
B8R

SEQ O.in¢

14
158

cMpP

B8R

VAX-11 Bliss 16 V3 555
Page
SPIDERSU
{OOUCETTE .f SERS
ALCONICNRQAA .BL1
:

(SP)

PC,BLS$DIV

BHI
ASL
MOV
MOV
MOV
TRAP

10:24:41
10:21:50

SP,RO

JSR
TST

104414

000451
023727
101046
013700
006300
016016
012746
010600
104414
000433
023727
101030
013700
006300
016016
012746
010600
104414
000415
023727
101012
013700
006300

8R
cHP
BHI

41,

1983
1983

SP,s

SP.‘

(5P)+
164

RO
TBL .WPT(RO),(SP)
91, (SP)

SP,RO

14
15%
S8.CODE, 017
16%
S8.COOE
RO
RO

18L .DAT(RO),(SP)

®1,-(SP)

SP.RO
14
15¢

04
S8.CODE,

168
RO
S8 .CODE

RO
TBL .HST(RO),
(SP)
e1,-(SP)

SP,RO
14
154
S8.CODE,
o3
164
S8.CODE,RO

RO
TBL.CNT(R0O),(SP)
o1, -(SP)
SP,RO
14

15¢
SB8.CODE,
210
164
SB8.CODE ,RO

SP.‘

6395

6397

SP.,s

6399

6401

~) Ax ¢ xERCIER
tRROR “H SSAGE . BR)

18L .ORV(RO),
(SP)

o1, (SP,
5P, RO

104414
005726
022626
000207

(SP).
(SP).
, (SP).

Table for EMS.SBC.0044

sl Sand

N XS

el Sl

WO
e el

400

L X

254
310
344

CASE

154

210
434

24
60
434
120
434

000254
000310
000344
000400

000154
000210
0004 34

0004 34
000120

DRI

000004
000006
000010
000012
000014
000016
000020
000022
000024
000026

000024

00000¢
000002

[

s$PLITS,

gy P

0000OC

7430

gt o gt gt O OB 0 ~J

Py Gy P

$CODES

B¢

164 words,
Rout ine Bese:
dJepth pe= nvocetion:
7 woras

Rout ‘ne S ze:
Mas mum steck

10:21:%0

i
i

1983

SEQ (-1
VAX 11 Bl.es 16 v3 558
Poge .
SPIDER
: (DOUCE SIS
1 TE . FALCONCNR
ERS
QAL &,

000%02
Q00504
000%06

200202
V00001

Dec

10:¢4:41

0004 "¢

00050¢

016016
Olc 740
010600

1943

Q004
e

‘INE

Dec

NRJAM,

[

—

NRGAM,
\;01.‘
:
H
i
:
:
;
H

D /RX EXERCISER
ERROR MESSAGE SUBROUTINES
6409
6410
6411
6412
6413
cala
6415

GLOBAL

routine EMSCMD

¢
¢
¢
¢
!

THIS ROUTINE PRINTS THE ENTIRE RET JRN PACKET INCLUDING OPCODE,
STAUTUS, SUB STATUS.,
MTMMODFIERS OR FLAGS, AND &TC,
THESE FIELDS ARE "TRANSLATED” INTC ENGLISH TEXT IF POSSIBLE
RATHER THAN PRINTED AS RAW NUMBERS.

IMPLICIT

;

6416

’

6418

‘

6417

:
H
:
:

6419
6420
6421
6422

83;

6423

g:gg

;

6428

H
:
:
:

:
:
H
3
H
H
:
:
:

6429
6430
6431
6432

6433
6434
6435
6436
6437
6438
6439

bcg-n

OWN

EBH_TB1

INPUTS:

:
:
H
H
:
;
.
:
;
:

6446
6447
6448
6449
6450
6451
6452
6453
6454
6455

H
:
3
:

BASIC.,

HARD ERROR MESSAGE

!
!

(XX17);

ADDRESSES,

INDEXED By

“DISK XXX*

SET
(#0°'0’
]: PRINTX (EX_SEQ);
(o1’ ]): PRINTX (EX_DGM);
[#0'2' ): PRINTX (EX_CRD);
{#0’'15' ): PRINTX (EX_MTN);
(OTHERWISE
): PRINTX (XX37,
TES;

SELECTU (.RP_ADDR
SET

sg?

TABLE

.COISK);

6443
6444

ADORESS OF THE CURRENT RETURN PACKET

'PRINTB (xx36, .CRN_LOW);
PRINTX (XX3S5, .RP_ADDR [CRF _LO1);
printX (xx29);
SELECTU (.RP_ADDR {(MESTYP]) OF

:
H

€EBH_46,EBH 47 ,EBH_48,EBH_49);

PRINTB

6445

! EXPECTED CRN :
RECEIVED CRN : XXXXXX
“messege type:"”

“COMMAND:

rODE

XXXXX)

PACKET

TYPE

(conid]) OF

(so’'2']):

BEGIN
PRINTB (xX18);
SELECTU (.RP_ADDR [ENDCOD)) OF
SEY
(#0’'201’ }: PRINTB (EX_GDS);
{so’ 202’ ]: PRINTB (EX_ESP),;
(%o’ 203’ } PRINTB (EX_ELP);
(#0°'204°' ): PRINTB (EX_RCD);
(%0’ 205’ }: PRINTB (EX_SDD);
(#80°'206’' ]: PRINTB (EX_ABP),;
%ggWISE]

PRINTB (EX_OP,

! PRINTS

.RP_ADDR [ENDCOD]);

6463

ELSE

PRINTB (ex_op,

.RP_ADDR [STSCO0));

_RP_ADDR (ENDCOD] EQL %0'204°'
.RP_ADDR [ENDCOD] EQt w0’ 205’

DUP-

! PRINTS A COMMAND

printb (xx15);
IF (.RP_ADDR [STSCOD) GEQU O) AND (.RP_ADDR [STSCOD]) LEQU 7)
THEN
PRINTB (.EBH_ TBL (.RP_ ADDR {STSCOD)))

6464

STATUZ

! “SEQUENTIAL”
f “DATAGRAM”
¢ “CREDIT NOTIFICATION"
! “"MAINTENANCE“
.RP ADDR [MESTYP]);
¢ UNKOWN MESSAGE TYPE

6458
6459
6460
g:gé

L EARY:
VAX 11 Blies 16 v3 555
Page
ax
QPID[R:USERS:(DME"E.‘ALCON)CMQH-.:QT I

: VECTOR [7) INITIAL (EBH_30,EBH_44,EBH_A4S,

6440
wé

novalue

RP _ADDR

PRINTB (XXx13,

15 Dec 1933 10:¢4:41
1% Dec 1983 10:21:50

PRINT ENDCOCE VALUE

! "gtatue:’
* IF STATUS CODE IS WITHIN RANGE
! PRINTB APPROPRIATE MESSAGE

JUST PRINT STATUS CODE

IF A SEND DATA OR RECEIVE DATA COMMAND

THEN

PERE
RD/RX EXERCISER

NRQAM.
gOl.C

ERROR MESSAGE

6465

1% Dec 1983 10:724:41

SUBROUTINES

15 Dec

1983

VAX 11 Bliss 16 V3 S5

10:21:50

VPN

Jpngo 189

SPIDERSUSERS:
[DOUCETTE .FALCUM ICNRJAI ML)

(62

then

[ ,a)

PRINTX (Xxx25,
PRINTX (XX26,
E:g_ow ();

6467
6468

6469
6470

ar
[Ples o oc or as oo ar o we o

L0));
1), .RP ADDR

[BUFF

! FOR ANY
01]);
!
!

“ACTUAL & OF BYTES TRANSFERRED: Xxrxx
~
“I/0 BUFFER DESCRIPTOR: XXXXXX XXXAXX
'
prints contents of dup pecket

begin
if BIT_TSY

(RP_ADOR

(9,

O],

if BIT_TST

(RP_ADOR

(9,

0)].

if BIT_TST

(RP_ADDR

(9,

10,

O]},

if BIT_TST (RP_ADDR (9,
then PRINTB (df_3);
end;

11,

O],

then PRINTB (dF _0);

then PRINTB (df_1);

then PRINTB (df_2);

_RP_ADDR

(ENDCOD]

EQL =0'203'

A GET

DUST

STATUS

OR EXEC.

LOCAL

PRG COMMAND

P 4

(BCNT
(BUFF

.RP_ADDR [ENDCOD) EQL #0201’

then

%
.

.RP ADDR
.RP_ADDR

et @t ar @s me or m wr s @0 80 @1

then

begin

if BIT_TST

(RP_ADDR

(9,

0],

if BIT_TST

(RP_ADOR

(9,

0],

if BIT_TST (RP_ADDR

(9,

10,

O],

11,

0],

then PRINTE (oF _4);

then PRINTB (df_S5);

then PRINTB (df_6);
if BIT_TST (RP_ADDR (9,
then PRINTB (df_7);

ond;

zzgnfx {(xx23,

.CST_ADDR {.CUOFF

D _DBN),

.CST_ADDR

[.CUOFF

D_DBN]);

“DBN:

XXXXXX,
"

(#0'0’]):

BEGIN

PRINTB (XX19);

IPRINTS

-MSCP

1MSC

SELECTU (.RPgegOR (ENDCOD)) OF

6507

83
06
B2
G
B
8.
ST
me
B

6510
6511
6512
6513
6514
6515
6516
6517
6518
6519
6520

(EX_SCC);
(EX_ONL);
(EX_ACC);
(EX_RD);
(EX_WRT);

(OTHERWISE
]: PRINTB (EX_OP,

[#0'204'): PRINTB
(so'211’): PRINTB
(so’'220’'
): PRINTB
{wo'241°'): PRINTB
(so'242°
): PRINTB
if

h‘i.ST_CODE
)

.RP_ADDR FENDCOD));

TES;
.RP_ADOR (CMOMOD]! eql MD_CMP THEN PRINTB (XX20);

PRINTB (XX15);
i? (.ST_CODE
gtru 0) end
t

! PRINTS THE COMMAND

equ 11)

PRINTB (.ERR_COD

(.ST_CODE

else

.ST_CODE

then

!
!

eql

ST_DIA

1))

PRINTS

STATUS:
IF STATUS CODE

! PRINT ENDCODE VALUE
THE MODIFIER

IF NECESSARY

IS WITHIN RANGE

PRINTB APPROPRIATE MESSAGE

ELS
RD/RX EXERCISER

NRL MM,

ERROR “ESSAGE

VUL L.

command

6523
6524
6525
6526
6527
6528
6529
6530
6531
6532
6533
6534
6535
6536
6537

es me e a0 ee ms e (% %4 8s B0 e e B0 S0 00 Be a1 Be e ar e

e @r 80 00 W

command

15 Dec

PRINTB

(.ERR

PRINTB

(EX_OP,

COD

[111)

1983

10:24:41

VAX

10:21:50

MESSAGE

JUST

PRINTS

Blies-16

SEQ U144

v3-555

Page

170

SPIDERSUSERS
: [DOUCE TTE .FALCONICNRIAA .BL1 (2

FROM

INTERNAL

DIAGNOSTICS

else

EMS SBC

.ST

COOE );

();

.RP ARDOR

[ENDCOD] EQLU #o’'220*

THEN

STATUS

SUB

CODE

WHEN NO

MATCh

CODE

.RP_ADOR [ENDCOD] EQLU so'241'
.RP_ADOR [ENDCOD) EQLU so’242°

MSCP acces

!
!

mecp reed
mecp write

b.gin
printX (XX24, .rp_sddr (CBCNT_LO]);
¢! "BYTE COUNT IN COMMAND: XXXXXXX*
PRINTX (XX25, .RP_ADDR (BCNT (0)):
! FOR ANY "ACTUAL @ OF BYTES TRANSFERRED: XXXxX.°
PRINTX (XX26, .RP_ADDR (BUFF_1),
.RP_ADDR (BUFF 0));
! “1/0 BUFFER DESCRIPTOR: XXXXXX XXXXXX
if BIT_TST (RP_ADDR (FLAGS), EF_0)
! IF BAD BLOCK REPORTED
then
N
PRINT8 (XX21, .RP_ADDR (BBLK_LO))
' “BAD BLOCK REPORTED: XXXXXX.,
"

6538
6539
6540
6541
6542
6543
6544
6545
6546
6547
6548

SUBROUTINES

6521
6522

15 Dec

[ 3% _ J

printX (Xx22, .RP_ADDR [LBN_LO]}, .RP ADDR (LBN_LO));
PRINTB (XX41);
if BIT_TST (RP_ADDR (FLAGS), EF_1)
* IF BAD BLOCK UNREPORTED

then PRINTB (F_1);

if BIT_TST

(RP_ADOR

(FLAGS),

then PRINT8 (F_2);

if BIT_TST

(RP_ADOR

(FLAGS),

EF_2)

ERROR LOG GENERATED

EF_3)

SERIOUS EXCEPTION

“LBN:

XXXXXX

o then PRINTB (F_3);

.RP_ADOR [ENDCJ0) EQLU so’ 204’

6549
6550
6551
6552
6553
6554
6555
6556
6357
6558
6559
6360
6561
6362
6563
6564
6565
63566
6567
6568

THEN
begin

6569
6570
6371
6572
6573
6574
6575
6576

begin

PRINTB (XX39);
i BIT_TST (RP_ADDR [BCNT_HI),

EF_4)

then PRINTE (F _4);
if BIT_TST (RP_ADDR (BCNT_HI), €F_S)
then PRINTB (F_S);
i# BIT_TST (RP_ADOR (BCNT_MI],

EF _6)

then PRINTB (F_6);
if BIT_TST (RP_ADOR (BCNT_NWI), EF_7)
then PRINTB (F_7);

i BIT_TST (RP_ADDR [BCNT_HI), EF_8)
then PRINTB (F_8);

end;

' IF
IF

if BIT_TST

(RP_ADDR

EF_10)

.RP_ADDR [ENDCOD) EQLU so’211’

THEN

PRINTB (XX40),;
if BIT_TST (RP_ADOR

[BCNT_HI),

EF_11)

if BIT_TST

(RP_ADOR

[BCNT_MI),

€F_12)

if BIT_TST

(RP_ADDR

{BCNT_HI),

EF_13)

then PRINTB (F_12);

then PRINTB (F_13);

MSCP

S (3

then PRINT8 (F_11),

EF_9)

(BCNTY_HWI),

CTLR CHAR

(S (3

(RP_ADDR [BCNT_HWI),

then PRINT8 (F_10);

MSCP SET

if BIT_TST

then PRINTS (F_9);

ONL INE

comman

i
RD/RX EXERCISER

ERROR MESSAGE

ws
Be
@0
Bs
s
Be
€c
s
@
B

T Be Be 4 B B S1 B2 G5 B0 @ @ @s Bc G¢ W1 We B¢ W2 ®F G0 e U Oy 86 S S8 e i« .
1)
YO
YO
T
Y
LYY

;

6585
6586
6587
6588
6589
6590
6591
6592
6593
6594
6595
6596

6597
6598
6599

¢ BIT_TSYT

(RP_ADDR

(BCNT_HI),

(RP_ADDR

[BCNT _HI),

then PRINTB (F_15);

¢ BIT_TST

(RP_ADDR

(BCNT_MI),

then PRINTB (F_16);

if BIT_TST

(RP_ADDR

[BCNT_HI],

then PRINTB (F_17),
if BIT_TST (RP_ADDR (BCNT_HI),
then PRINTB (F_18);
if BIT_TSY (RP_ADDR [BCNT_HI),
then PRINTB (F_19);
if BIT_TST

(RP_ADDR

[BCNT_HI},

then PRINTB (F_20);

if BIT_TST

END;

(RP_ADDR

[BCNT_HI],

1983

EF_14)

EF_15)

EF_16)

EF_17)

EF_18)

EF _19)

€F_20)

EF_21)

10:24:41

10:21:50

VAX

Bliss

S€EQ oiPage , 7.

SPIDFR$\SERS:
[DOUCETTE .FALCONICNRQAR .8, 1

end;

(otherwisel:
BEGIN

PRINTB (xxX38,

.RP_ADDR

SELECTU (.RP§2$DR

([CONIO]);

(ENDCOD]) OF

{so'204'
}J: PRINTB
(wo'211'): PRINTB
(wo’'220°'
): PRINTB
{so'241'): PRINTB
(vo'242°'
): PRINTB

(EX_SCC);
(EX_ONL);
(EX_ACC);
(EX_RD);
(EX_WRT),;

UNKNOWN CO

PRINTS UNKNOWN CONNECTION ID

! PRINTS THE COMMAND IF RECOGNIZED

(do'211’): PRINTB (EX_ONL);
{#0°'220'): PRINTB (EX_ACC);

[(so241']): PRINTB (EX_RD);
(o' 242°'1: PRINTB (EX_WRT);

%ggflERUISE]: PRINTB (EX_OP,
R4

.RP,?DO?SgCHDHOD) eql MO_CMP

printd

¢ 7

then PRINTB (F_21);

6607
6608

6621
6622
6623
6624
6625
6626
6627
6628
6629
6630
6631
6632

BIT_TST

Dec

15 Dec

then PRINTB (F_14);

6601
6602
6603

6610
6611
6612
6613
6614
6615
6616
6617
6618
6619

SUBRCOUTINES
“f

6577
6578
6579
6580
6581
6582
6583

G+

B¢

NRQAM.
Vol.co

L[)

(xx

PRINTB (ex_op.
printb (xx16);
PRINTB (ex_op.

.RP_ADDR {ENDCOD]);

THEN PRINTB (XX20);

PRINT ENDCODE VALUE

PRINTS MODIFIER

IF NECESSARY

.RP_ADDR

[STSCOD));

PRINTS

STATUS CODE

IN OCTA'

.RP_ADDR

[SUBCOD]);

PRINTS STATUS SUB-CODE

FORM

IN OCTAL

FORM

!
H
!

[

THIS ROUTINE PRINTS (EXTENDED) BOTH BYTE COUNT FIELDS OF THE CURRENT
RETURN PACKET: THE BYTE COUNT FROM THE COMMAND ENVELOPE AND THE
ACTUAL NUMBER OF BYTES TRANSFERRED (FROM THE RESPONSE ENVELOPE).

_.RP_ADOR (ENDCOD] EQLU so’220' OR
.RP_ADDR (ENDCOD] EQLU so’'241’' OR
"EN.RP_ADDR {ENDCOD] EQLU #o’ 242
begin

printX

(XX24,

.rp_eddr

[CBCNT_LO]));

! MSCP access command
! mscp read
mecp write
!

"BYTE

COUNT

IN COMMAND:

XXXXXXX*

PRINTX (XX25, .RP_ADDR [BCNT_LO});
! FOR ANY “ACTUAL @ OF BYTES TRANSFERRED: XxxXxXX,
*
PRINTX (XxXX26, .RP_ADDR [(BUFF_1),
.RP_ADDR [BUFF_01});
! 1/0 BUFFER DESCRIPTOR: XXXXXX XXXXXX'
if BIT_TST (RP_ADDR (FLAGS]), EF_0)
t IF BAD BLOCK REPORTED
then

(15
RD/RX EXERCISER

VOl1.o

ERROR MESSAGE

)

:
H

66;2

6638

end;

6637

H
:
H
:
H
:
H
H

6639
6640
6641
6642
6643
6644
6645
6646

THEN

:
;

6648
6649

SUBROUTINES

66!3»2
66

in
PRINTX (xX25,
PRINTX (XX26,

END;

PRINTX (XX23,
ems _dup ();
end;

6650
6651
6652
6622

!PRINTX (XX27);
'EMS_BLK (.RP_ADDR,

6655

end;

010140
010140

010142
010144
010146
010150
010152
010154

0000006
0000006
000000G
0000006
000000G
0000006
000000G

000000

004137

000004

013746

000010
000014
000020
000022
000024
000030
000034
000040
000044
000046

012746
012746
010600
104414
013700
016016
012746
012746
010600
104415

000054
000060
000062
000064

012746
010600
104415
013700

000050

000070
000074

012716

116002
(06202

|
PRINTB
ele
or ‘'ntX

0000006

000000G
0000006
000002

0000006
000004
0000006
000002

000000G

000001

0000006

000002

(XxXxel,

.RP

(xx22,

.RP_ADDR

.RP_ADDR [ENDCOO] EQLY ®o' 205’

tes:

;

15 Dec

_RP_ADDR (ENDCOD) £QLU ®0’'204'

6647

15 Dec 1983 10:24:41
ADDR

1983

10:21:50

[BBLK LO))

(LBN_LO),

"BAD BLOCK

.RP_ADDR

(LBN_LO));

+« 3, D_DBN],

XXXXXX,*

“LBN:

XXXXXX*

! FOR ANY "“ACTUAL @ OF BYTES TRANSFERRED:
¢ ‘170 BUFFER DESCRIPTOR: XXXXXX XXXXXX*

.CST_ADDR {.CUOFF + 3, D_DBN)J;
! prints dup pecket meterisl

D8N,

XXXXX,
"

XXXXXX,
"

PRINTS RETURN OR MESSAGE PACKET IN A BLOCK OF OCTAL WORDS

PKT_LEN);
!

REPORTED:

! dup receive date

.CST ADDR [.CUOFF

'
!-

Pege 19¢

SPIDERSUSERS:
(DOUCETTE . FALCONICNRQAR .81 1 (612

.RP_ADDR [BCNT_LO1);
.RP_ADDR [BUFF _1], .RP_ADDR [BUFF _0));

SEQ 0144

VAX 11 Blies 16 V3-555

! dup send dstea

- 'm s

NRQAM.

"CONTENTS OF PACKET:"

PRINT BLOCK OF

INSTEAD OF

WORDS AS LONG AS A MESSAGE PACKET

A RETURN PACKET

INCASE A PACKET

IS USED

ROUTINE EMSCMD

PSECT
EBM.TBL1: .WORD
. WORD

¢CODES,
EBH.30
€EBMH. 44

. WORD
. WORD
. WORD
. WORD
. WORD

EBH. 45
EBH.46
EBH.47
€EBM. 48
£EBH.49

.SBTTL

EMSCMD: : JSR

EMSCMD ERROR MESSAGE SUBROUTINES

R1,$SAVE4

6409

MOV

COISK, -(SP)

6428

MOV
MOV
TRAP
MOV
MOV

02,-(S5P)
SP.RO
14
RP . ADOR ,RO
4(RO),(SP)

MOV
MOV
MOV
TRAP

oXX3S5, -(SP)
0”2, -(SP)
SP,RO
15

MOV
MOV
TRAP
MOV

€1, -(5P)
SP RO
15
RP,ADDR,RO

MOV

MOvVB
ASR

oXX13,-(SP)

#Xx29,(SP)

2(R0O) ,R2
R2

;

SP,s

6430

SP,s

i
i
H

6431
SP,s
6432

I‘|1l)
NRQAM,
vol.¢e

0000 7¢
000100
000102
000104
000110
000114
000116
000120
000122
000126
000132
000134
000136
000140
000144
000146
000150
000154
000160
000162
000164
000166
000172
000174
000176
000202
000206
000210
000212
000214
000220
000222
000224

RD ‘RX

EXERCISER

ERROR MESSAGE

006202
006202
006202
042702
012701
005702
001010
005001
012716
012746
010600
104415
005726
020227
001010
005001
012716
012746
010600
104415
905726
020227
001010
005001
012716
012746
010600

104415
005726
020227
001010
005001
012716
012746
010600
104435
005726
005701
001422
013700
116001
006201
006201
006201
006201
042701
010116
012746
012746
010600
104415
022626
012716
012746
010600
104414

SUBROUTINES

ASR
ASR
ASR

8IC

177760
1777177

MOV
TST
BNE

CLR
MOV

000001

18:

MOV
MOV
TRAP
ISy

cHP
BNE
CLR
MOV
MOV

000001

000002

15 Dec
15 Dec

2%:

000001

MOV
TRAP
TST
CHP
BNE
CLR
MOV
MOV
MOV

TRAP

000015

3%:

000002

177760

000002

1871

cHP
BNE
CLR
MoV

MOV
MOV
TRAP
TST7
TST
BEQ
MOV
MOVB
ASR
ASR
ASR
ASR
8IC

MOV
MOV
MOV
MOV

1983
1983

10:24:41
10:21:50

VAX-11 Bliss-16 v3-555%

SE0 0189

19%
SPIDERS\USERS: [DOUCETTE ,FALCONICNROAA,&..: (63

#177760,R2

1,R1

oEX.SEQ,(SP)

o1,-(5P)

SP,RO
15
(SP)+
R2,#1
24
R1
#EX.0GM, (SP)
01, -(SP)
SP,RO
15

6432

6435

(SP).

R2, #2

6432

®EX.CRD,(SP)

6436

SP.RO
15
(SP)e«
R2,#15

6432

®EX_MTN, (SP)

6437

48
R1

o1, -(SP)

SP,RO
15
(SP).

;

SP.s

6432

RP ., ADDR,RO

6438

2(R0O),R1

#177760,R1

R1,(SP)
#XX37, -(SP)

TRAP

cHp

000001

MOV

MOV
MOV
TRAP

6441

1O
NRUAM,
VOl

RD/RX EXERCISER

ERROR

MESSAGE

15 Dec 1983 10:24:41

SUBROUTINES

Dec 1983

10:21:50

VAX 11 Bliss 16 V3-555

SEQ G179,

Pege 114

SPIDER$USERS:{DOUCETTE .FALCONJCNRIAA F1 1

(4,7

)

00032
000332

000334
000340

013700
005004
156004
012703

000350

001402

000356
000360
000364

005003
012716
012746

000372

104414

000344

000352

000370
000374

020427

000137

010600
013700

000400
000402

005002
156002

000420

005001

000434
000436

104414
005726

000406
000412
000416

000000G

000003
177777

0000006
000001

RP . ADDR, RO
R4

cHP

R4, 82

JMP

264

BISB
MOV

000002

011644°

MOV
CLR

BEQ

6%:

CLR
MOV
MOV

MOV

TRAP

000000G

MOV

CLR
BISB

000014

644’

;

6447

3(RO),R4
®-1,R3

R3
aXx18,(SP)
01,-(SP)

SP,RO

1 SP,e

RP . ADDR, RO

;

6448

6450

R2
14(RO).R2

012701
020227
001010

177777
000201

MOV
CHP
BNE

012716
012746
010600

000UC0G
000001

MOV
MOV
MOV

#€EX.GDS, (SP)
o1, -(SP)
SP,RO

020227
001010

000202

cHP
BNE

R2, 8202
8

6448

000450
000454
000460

012716
012746
010600

000000G
000001

MOV
MOV
MOV

®EX ESP,(SP)
01, -(SP)
SP,RO

6451

000466
000472

020227
001010

000203

cHP
BNE

R2, 0203
9

;

6448

012716
012746
010600

000000G
000001

MOV
MOV
MOV

®EX . ELP,(SP)
o1, -(SP)
SP,RO

6452

020227
001010

000204

012716
012746
010600

000000
000001

020227

000205

ONN4A22
000426
000432

000440
000444

000446

000462
000464

005001

104414
005726

000474

005001

000510
000512

104414
005726

000522

005001

000536
000540

104414
005726

000546

001010

000552
000556
000562

012716
012746
010600

000476
200502
000506
000514
000520

000524
000530
000534
000542

000550

000564
oNN566

005001

104414
005726

CLR

7%:

TRAP
ST

CLR

8s:

TRAP
1

CLR

TRAP

14
(SP).

(SP)e

R2, 0204
10¢

CLR

TRAP

0000006
000001

cHP
BNE
MOV
HOV
MOV

106:

0-1,R1
R2,#201
74

CHP

8NE

CLR

MOV
MOV
MOV

TRAP
TST

#EX .RCD, (SP)
01, -(SP)
SP,RO
14

(SP).

R2, 0205

11¢

#EX.S0D, (SP)
e1,-(SP)
SP,RO
14
(SP).

3 SP.e

; SP,e

: SP.e
;

6448

6453

i SP.e
:

6448

;

6454

1 SP.e

\Jl)
NRQAMS
vol.c

000570
000574
000576

RD/RX

ERROR MESSAGE

020227
001010
005001
012716
012746
010600
104414
005726
005701
001414

013700
005016
116016
012746
012746
010600
104414

00071C
V00712

000716

000722
000724
000726
000730
000732
000736
000742
000744
000746
000750
000754
000762
000764
000772
000774
001000
001004
001010
001014
001016
001020
001024
001030
001034
001040
001044

EXERCISER

022626
012716
012746
010600
104414
013700
116000
042700
02C027
101010
006300
016016
012746
010600
104414
000410
010016
012746
012746
010600

104414
005726
013700
126027
001404
126027
001032
013700
016016
012 26
012746
010600
104415
013700
016016

016046
012746
012746
010600

000206

15 Dec
15 Dec

SUBROUTINES

118:

0000006
000001

SEQ 0101

195

SPIDERS$USERS: ([DOUCETTE. FALCON]CNROAA 8L1 (63

6455

SP,RO
14
(SP)+

SP.‘

6448

RP,ADDR,RO

6456

2, (SP)
SP,RO
14

oxx15,(SP)

SP,.RO
14
RP . ADDR,
RO
16{R0O)
RO

SP.‘

(SP)e ,(SP) *

13¢:

000000G
000016
177740
000007

6458

SP,s

6459

6460

177740 ,R0O
RO, @7

144
RO
EBH.TBL(RO),(SP)
e, (SP)
SP.RO
14

010140
000001

154

RO, (SP)

144

92,-(5P)

0000006
000014
000204

SP,s

6459

6461

#EX.
0P, -(SP)

000002

0000006

V3 555

9EX . ABP, (SP)

(SP)
14(R0O),(SP)
o€EX.0P, -(SP)

0000006
000001

6448

13¢

000002

VAX-11 Bliess

000014

10:24:41
10:21:50

R2, 0206
12¢
R1

1, -(SP)

124

000014

1983
1983

SP.RO
14
(SP).

154:

RP . ADOR,RO
14(R0O), 0204

164
14(R0O), €205
17¢

000205

164:

RP,ADDR,RO

20(R0O),(SP)

SP,s

6463

;

6464

6467

#xx25, -(SP)

TRAP

SP,RO
15

AP, ADDR ,RO

24(R0O),(SP)
26(R0O), -(SP)

MOV

43, -(SP)

SP,RO

SP,s

6468

SP,e

1%
NRQAM?
volr.2

001046
001050
001054
001060
001064
001072
001074
001102
001104
001110
001114
001116
001120
001122

001126
001134
001136
001142
001146
001150
001152

001154
001160
001166
001170
001174
001200
001202
001204
001206
001212
001220
001222
001226
001232
001234
001236
001240
001244
001252
001254
001262
001264
001270
001274
001276
001300

001302
001306
001314

001316
001322
001326
001330
001332
001334

RD/RX EXERCISER

ERROR MESSAGE

104415
004737
062706

013700
126027
001062
032760

001407
012716
012746
010600

104414
005726
013700
032760
001407
012716
012746
010600
104414
005726
013700
032760
001407
012716
012746
010600

104414
00726
013700
032760
001407
0127156

012746
010600
104414
005726
013700

126027
001062
032760
001407
012716
012746
010600
104414
005726
013700
032760
001407
012716
012746
010600
104414
005726
013700

000000V
000012
000000G
000014
000201
000400

SUBROUTINES

17¢:

000001

18¢:

0000006
002000
000022

19%:

000001

00002¢

208

000001

000014

000203

000400

000022

21¢:

000001

000000G
001000
000022

22¢:

000001

0000006

MOV
MOV
MOV
TRAP
TS7
MOV

B8IT
BEQ
MOV

000001

004000

TRAP
JSR
ADD
MOV
cHPB
BNE

BIT
BEQ

000022

0000006
001000
000022

15 Dec
15 Dec

23¢:

MOV
MOV
TRAP
LA

MOV

8I7
BEQ
MOV
MOV
MOV

TRAP
157

MOV
BIT
BEQ
MOV
MOV
MOV

TRAP
TS7
MOV

BNE
BIT
BEQ
MOV
MOV
MOV
TRAP
157
MOV
817
8EQ
MOV
MOV
MOV

TRAP
TST
MOV

1983
1983

10:24:41
10:21:50

SEQ O17¢
VAX-11 Blies-16 V3-555
Page 196
SPIDERSUSERS: {DOUCETTE .FALCONICNRQAA
, BLI. (63

PC,.EMS.DUP
@12,5P
RP.ADDR,RO

H
H
H

6469
6466
6471

21¢
€400,22(R0O)
184

6474

.0,(SP)

5475

SP,.RO
14
(SP)s
RP.ADDR,RO
€1000,22(R0O)
19¢
o0F .1,(SP)
o1, -(SP)
SP,RO
14

RP . ADDR,RO

6478

6479

14(R0O), 0201

01,

(SP)

Spv‘

6476

6477

SP.,s

(SP)»

€2000,22(RO)
204
o0F
. 2,(5P)
e1,-(SP)
SP,RO
14

SPI.

(SP).

RP . ADDR,RO
94000,22(R0O)
21

6480

o0F
. 3,(SP)

6481

SP,.RO
14
(SP).
RP_ ADDR,RO

#1,-(SP)

14(R0) 0203

25¢
#400,22(R0O)
224

.4,(SP)

o31,-(SP)
SP RO

(SP)o

RP,ADDR,RO
21000,22(R0)
23¢

6484

6487

6488

;

SP,RO

(SP)e«

RP,ADOR,RO

SP,»

90F .5,(SP)
14

SP,s

6489
6490

SP,s

6491

L15
NRQAM?
gOl.E
001340
001346
001350
001354
001360
C01362
001364
001366
001372
001400
001402
001406
001412
001414
001416
001420
001424
001426
001432
001434
001440
001442
001446
001452
001456
001460
001462
001466
001470

001472

001476
001500
001504
001510
001512
001514
001520
001522
001526
001532
001536
001540
001542
001546
001552
001554
001556
001560
001564
001566
001570
001574
001600
001602
001604
001606

RD/RX

EXERCISER

ERROR MESSAGE
032760
001407
012716
012746
010600
104414
005726
013700
032760
001407
012716
012746
010600
104414
005726
013700
006300

063700
005016
116016
005046
116016
012746
012746
010600
104415
062706
005704
001402
000137
005003

012716
012746
010600

104414
013700
005002
156002
012701
020227
001010
005001
012716
012746
010600
104414
005726
020227
001010
005001
012716
012746
010600
104414
005726
020227

002000

SUBROUTINES

BI1T
B8EQ

000022

MOV
MOV
MOV
TRAP

0000006
000001

0000006
004000
000022

244:

0000006
000001

0000006

15 Dec 1983
15 Dec-1983

25%:

0000006

TST

MOV

8IT
BEQ

MOV
MOV
MOV
TRAP
TST
MOV
ASL
ADD

CLR
MOVB
CLR

90F .6,(SP)

a1, -(SP)
SP,RO
14

(SP).
RP.ADDR,
RO
#4000,22(R0)
254
o0
. 7,(SP
F
)

91, -(SP)
SP,RO
14

(SP).
CUOFF ,RO

000014

MOV
MOV
TRAP
ADD
TSY

SP,RO
15

014 ,5P
R4
27¢

CLR
MOV
MOV
MOV
TRAP
MOV
CLR
81S8
MOV
cHP

R3
#XXx19,(SP)

000000G
000001

0000006
000014

177777
000204
0000006
000001

000211

28¢:

000001

000220

29¢:

CLR
MOV
MOV
MOV
TRAP
157

8NE
CLR
MOV
MOV
MOV
TRAK
TST
CHP

6492

SP,s

;

6493

6454

Spc‘

6496

(SP)

HOVB

013700

CST.ADDR,RO

000006
00000606
000003

8EQ

SEQ 0173
VAX 11 Bliss 16 V3 S55
Page 197
SPIDER
[DOUCETTE
SUS
.FALCONICN
ERS
RQAA .BLL
: (63

#2000,22(R0O)
244

6(R0O),(SP)
-(SP)
6(R0O),(SP)

000006

10:24:41
10:21:50

#xx23, -(SP)

SP,s

6446

6500

6443

664

SP RO
14
RP . ADDR ,RO

SP.s

6501

283
Rl
®EX.SCC,(SP)

6503

SP,RO

14(RO),R2

R2, #204

(SP)+

R2, 0211

294

S#EX.ONL, (SP)

SP.»

6501

6504

6501

SP,RO
14

(SP)s

R2,#4220

[4 1r)
NRQAM2
vol.<c
)
001612
001614

001616
001622

001626
001630
001632
001634
001640
001642
001644
001650
001654
001656
001660
001662
001666
001670

001672
001676
001702
001704
001706
001710
001712
001714
001720
001722
001726
001732
001736
001740
001742
001744
001750
001756
001760
001764
001770
001772
001774
001776
002002
002006
002010
002012
002016
002020
002024
002026
002030
002034
002040
002042
002044
002046

RD/RXx

EXERCISER

ERROR MESSAGE

001010
005001
012716
012746
010600
104414
005726
020227
001010
005001
012716
012746
010600
104414
005726
020227
001010
005001
012716
012746
010600
104414
005726
005701
001414
013700
005016
116016
012746
012746
010600
104414
022626
013700
026027
001007
012716
012746
010600
104414
005726
012716
012746
010600

SUBROUTINES

000001

000241

30%:

000001

000242

15 Dec
15 Dec
BNE
CLR
MOV
MOV
MOV
TRAP
TST
CHP
BNE
CLR
MOV
MOV
MOV
TRAP
TST

101010
006300

016016
012746
010600
104414
000422
020027

30¢
R1
QEX.RCC,(S5P)
21, -(5P)

10:24:41
10:21:50

VAX

Blies

v3-555

SEQ 0174
Page

198

SPIDERSU
[DOUCETTE .FALCONICNRQA
SERS
A .BL1
: (63

6505

SP,RO
14
(SP).
R2,40241
31¢

i
H

6501

Q€Y .ROD,(SP)

6506

SP,RO
14
(SP).

SP,e

R2, 0242

31¢:

SP,s

6501

SEX . WRT,(SP)

6507

SP,RO
14

R1
334
RP . ADDR
RO
(sP)

6501

6508

328

€1,-(SP)

000001

(SP)e

32¢:

SP,s

14(R0O),(SP)
€.
0P, -(SP)

000014

02, -(SP)

000002

040000

33%:

SP,.RO
14
(SP)+,(SP).
RP . ADDR
RO
12(RO), 440000
344

SP,RO
14
(SP).

#xX15,(SP)

SP.,RO
14
ST.CODE.RO
35¢

yn.

6510

#Xx20,(SP)

3454

104414
013700

001413
020027

1983
1983

000013

TRAP
000037

35¢:

6512
SP-.

6513

RO, #13

6514

RO
ERR.COD-2(R0O),(SP)

6516

SP,RO
14
37s

354

1777766
000001

SP.»

RO, 037

SP,»
6513

6519

N15
NRQAM?2
vol.c

002052
002054
002060
002064
002066
002070
002072
002074
002100
002104
002106
002110
002112
002116
002122
002126
002132
002136
002140
002144
002146
002152
002154
002160
002164
002170
002174
002176

002200
002204
002210
002214
002220
002222
002224
002230
002234
00224y
002244
002250
002252
002254
002260

002266
002272
002276
002302
002304
002306
002310
002314
002316
002322
002326
002330

RD '‘Rx

EXERCISER

ERROR MESSAGE
001007
013716
012746
010600

SUBROUTINES
BNE

MOV
MOV
MOV
TRAP

0000266
000001

104414

000410
010016
012746
012746
010600
104414
005726
004737
013700
116000
042700
020027
001406
020027
001403
020027
001147
013700
016016
012746
012746
010600
104415
013700
016016
01274¢
012746
010600
104415
013700
016016
016046
012746
012746
010600

364
:

000002

007430’

37¢:

000014
177400
000220
000241
000242
0000006
000044

38%:

000002

104415

TST
JSR

MOV

MOvB
8IC
cHe
8EQ
cHe
BEQ
cHe
BNE
MOV

MOV

MOV
MOV
MOV

TRAP

MOV
MOV
MOV
MOV
MOV
MOV
TRAP
MOV

000003

(SP)

SP,RO
14
37¢
RO, (SP)
QEX.0P, -(SP)
82,-(SP)
SP,RO
14
(SP)+
PC,EMS.SBC
RP . ADDR,RO

VAX 11 Bi'ws 16 v3 SS5

SEQ 015

Pege 199

SPID
: ER$U
(DOUCE | TE . F ALCONJCNRGAAR
SERS
. BL1

(63

6521

Spo‘

;
H

6519
6523

SP,»

6525

:
:

6527

14(R0O),RO

@177400,R0O
RO, #220
38
RO, 0241
384
RO, 8242
444
RP,ADDR,RO
44(RO),(SP )
oxXx24, -(SP )
02, (SP)

SP.RO
15
RP . ADDR ,RO
20(RO),(SP )
)
#2,-(SP)
SP,.RO
15
RP . ADDR,RO

24(R0O),(SP)
26(R0O), -(SP)
oxx26, -(SP)
#3,-(SP)
SP,RO

6528

6529

6532

;

SP,s

‘

6533

SP,e

;

6534

H SP-‘
6535

MOV

40(R0),(SP)
oxx2l, -(SP)

6537

TRAP

SP,RO
14

MOV
MOV
39¢:

e1,

10:¢4:41
10:21:50

MOV

000050

364
ERR.COD+26,(SP)

1983
1983

RP . ADDR,RO

157
BPL

012746
012746
010600

010600

B8R

MOV
MOV
MOV
MOV
TRAP

104415
013700
005760
100011
016016

104414
000412
016016
011646
012746
012746

15 Dec
15 Dec

B8R
MOV
MOV

MOV
MOV
MOY
TRAP

14(RO)
39¢

404

SO0(RO),(SP)
(£23, (SP)

o0, 22,

SP.‘

H
H

6535
6539

(SP)

3, -(SP)
SP,.RO
15

Spv‘

vOl..c

EXERCICER

¢ ARON % SSALE

002532
002534
002340
002544
002546
002350
002332
002556
002366
002372
002576
002600
002602
002610
002616

005726
012716
012746
010600
104414
013700
032760
001407
012716
012746
010600
104414
005726
013700
032760

001407
012716
012746
010600
104414
005726
013700
032760
001407
012716

012746
010600

104414
003726
062706
013700
126027
001144
012716
012746
010600
104414

013700
105760
100007
012716
012746
010600
104414
003726
013700

032760
001407
012716
012746
010600
104414

005726
013700
032760
001407

V000006
000001

LUBROUTINES

40%:

151
MOV
MOV
TRAP

0000006
000014
040000

MOV
eIV
8eq
MOV
MOV
MOV

000000G
000001

0000006
020000
000014

TRAP
TSY

0000006
000001

MOV
BlY
8EQ
MOV
MOV
MOV

TRAP

0000006
000014
010000

42
;

0000006
000001

TSTY
MIY

BIT
BEQ
MOV
MOV
MOV

TRAP

000024
000014

000204

43¢
444
;

000001

000022

45:

000001

000040

000022

468

1933 10:24:41
1983% 10:21:50

S4Q L.
[ oge
VAX |1 Bl .ees 16 v3 55%%
SPIDERSUSERS: [DOUCE 1 TE . FALCON JCNROAL 5, |

o
PN

(9P).
oxxay, (SP)
o1, -(SP)

‘A

SP,.RO
14
RP .ADDR,RO

6541

040000, 14(R0O)

of . 1.,(5P)

654,

o1, (SP)
SP.RO
14

(SP)e
RP_ADDR
RO
020000, 14(RO)
4.2t
o . 2,(5P)
01, (SP)

%
654
6544

SP.RO

i4
(SP-.
RP.ADDR,RO
210000, 14(RO)
434
oF _3,(SP)

o1, (5P)
SP.RO
14
(SP).
824 ,SP

654%
6546

SP,e

MOV
cMP8
BNE
MOV
MOV
MOV
TRAP

RP . ADDRO
R

65"’
6548

0XX39,(SP)

6351

1578
ePL

22(RO)

MOV
MOV
MOV

000001

000100

157

MOV

000022

1% Dec
15 Dec

)

0023382
002334
002340
002344
002346
002350
002354
002362
0023064
002370
002374
002376
002400
002402
002406
002414
002416
002422
002426
002430
002432
002434
002440
002446
002450
002454
002460
002462
002464
002466
002472
002476
0023504
002306
002312
002316
002320
002322

TRAP
YST
MOV

BIT
BEQ
MOV
MOV
MoV

TRAP
TSY
MOV

:28)
BEQ

14(RO), 0204
S22t

SP,.RO
14

RP.ADOR
, RO

6582

458
oF 4,(5P)
e1,-(SP)

0958

SP.RO
14
(SP)e

6554

RP . ADDR,RO
#100,22(R0O)
464

6555

o.5,(5P)
01,-(SP)

SP.RO
14
(SP).
RP . ADDR,RO

#40,22(R0O)
47

]

SP.‘
6550

‘

RD Rx

NHJAM,
VoL

ERROR TMF SSAGE

)

002020
002624
002630
002632

002634

0026 36
002642
002650
002652
002656
002662
002664
002666
002670
002674
002700
002704
002710
002712
002716
002722
002724
002726
0027%0
002734
002742
002744
0027%0

002754
002756
002760
002762
002766
002774
002776
003002

003010
003012
003014
003016
003022
003030
003032
003036
003042

003050
003052
003056
003064
003066
003072
003076
003100
003102

EXERCICSER

MOV
MOV

MOV

104414
005726
013700
032760

001407
012716
012746
010600
104414
005726
013700
016000
042700
020027
001007
012716
012746
010600
104414
005726
013700
032760
001407
012716
012746
010600
104414
005726
013700
032760
001407
012716
012746
010600
104414
003726
005726
013700
126027
001402
000137
012716
012746
010600
104414
013700
032760
001407
012716
012746
010600
104414
005726

1% Dec
15 Dec

SUBROUTINES

ol2716
012746
010600

TRAP

0000006
000022
0717777
100000

48¢:

TSTY
MOV

BI7

BEQ
MOV
MOV
MOV
TRAP
1S7

8IC

0000006
000001

0000006
000C02
000022

o.6,(5P)
e1, (5P,
5P RO
14

SP,.RO
14
(SP).

RP_ADDR
RO

22(R0O)
RO

e@77777,R0O
RO, #-100000
49
oF .8,(5P)
o1, (SP)

000001

000022

#0%

SPIDERSUSERS: (DOUCETTE .FALCONICNROAA . BL L (48
:

6%%
"

| ] SP“
:

6558

63%%9

[

SP..

€560

[]

6%6.

SP,e

€63

(SP).

SP,s

RP.ADDR,RO
€1,22(R0O)

6564

oF . 10,(SP)
o1, -(SP)

656%

(SP).
(SP).

SPI.

S1%:
S52%:

RP .ADDR,RO

H
:

6559
6%7

53¢

4XX40,(SP)

6570

S:,RO
1
RP . ADDR,RO
1,22(RO)
544
o . 11,(5P)
21,-(SP)
SP,RO
14

14(R0O), 0211
53¢
€5¢

TRAP
000001

O 019/

oF .9,(S5P)
o1, -(SP)
SP,RO
14

013674

VAX-11 Blies-16 V8 555

6562

SP,RO

000211

10:c4:41
10:21:5%0

S1s

000014

1943
1983

RP . ADDR,RO
92,22(R0O)

SOt

SCs:

(SP)e.

RP . ADDR
RO
€20,22(R0O)
488
oF . 7,.(5P)
el,-(SP)

SP.RO
14
(SP).

49¢

[

8IT
BEQ
MOV
MOV
Hov

TRAP

TS7

(SP)»

SP.‘

6571

6572

spo.

NRQAM.
vol ..

RD/RAx EXERCISER
ERROR MESSAGE SUBROUTINE

)

0035104
003110
003116
093120
003124
003130
003132
003134
003136
003142
003146
003152
003156
003160
003164
003170
003172
003174
003176

003210
003212
003216
003222
003224
003226
003230
003234
003240
003242
003246
003232
003254
003256
003260
003264
003272
003274
003300
003304
003306
003310
003312
003316
003324
003326
003332
003336
003340
003342
003344
003350
003336
003360
003364
003370

013700
032760
001407

012716
012746
010600
104414
003726
013700
016000
042700
020027
001007
012716
012746
010600
104414
005726
013700
032760
001407
012716
012746
010600
104414
005726
013700
105760
100007

012716
012746
010600
104414
003726
013700
032760
001407
012716
012746
010600
104414

003726
013700
032760
001407
012716
012746
010600
104414
003726
013700
032760
001407
012716
012746

010600

000022

817
etQ
MOV
MOV
MOV

TRAP

000022
0177177
100000

55¢:

000000G
000001

MOV
MOV

TRAP
157

000000G
040000
000022

HOV
81T
8tQ

000000G
000001

000000G
000022

MOV

MOV
MOV

57¢:

MOV

000001

MOV

58%¢:

0000006
000001

0000006
002000
000022

59¢,

0000006
000001

000000G
000100
000022
0000006
000001

TRAP
TST

1578
8PL

0000006

0000006
000022
004000

157
OV
MOV
8IC
ce
BNE

60%:

MOV
TRAP
157
MOV

:)84
BEQ
MOV
MOV
MOV

TRAP
TST

MOV
81T
8EQ
MOV
MOV
MOV
TRAP
1ST
MoV
8IT
BEQ
MOV
MOV
MOV

Dec

1943

Dec

1983

10:/04:41

10:21:50

0o 01

VAL 11 Bl we 16 ¢3 55%
oge 202
GPINERS - ERS:(DOUCETTE
. F ALCOMICNROAA
. B1L ¢ 768
»

RP _ADDR,RO
#2,22(R0O)

6572

55%

of [ 12,(SP)

01, (SP)
5P ,.RO
14
(SP).

63574

RP.ADDR,RO
22(R0O),R0O

657%

€77777,R0
RO, #-100000

564

oF _13,(SP)
o, (SP)

SP.RO
14
(SP)»

RP . ADDR,RO

#40000,22(RO)

573
oF .14 ,(SP)
91, -(SP)
SP.RO
14

657%

SP,s
6377

63578

(SP)Y.

RP .ADDR,RO

22(R0O)
584

oF . 15,(5P)

01,-(SP3

SP,RO

14
(SP).

RP,ADDR
RO
,
#4000, 22(RO)

594
#,16,(5P)
#1,-(5P)
SP,.RO
14

(SP).

RP.ADOR,RO
#2000,22(R0O)

60
oF . 17,(SP)

6581
6582

6583
6584

SP,.RO

14
(SPje.

RP.ADOR,RO
#100,22(R0O)
618
o . 18,(5P)
2L,-(SP)
SP,.RO

6585
6586

L
NRQAM,

RD/Rx

vOl ..

ERROR TME SSAGE

0C33
.
003574
003376
003402
003410
003412
003416
003422
003424
003426
003430
003434
003442
003444
003430
003454
003436
003460
003462
003466

003474
003476
003502
003306
003310
003532
003514
003316
003322
003524
003326
0033382
003336
003540
003544
003350
003554
003356
003560
003564
003566
003572
003576
003602
003604
003606
003612
003616
003620
003622
003624
003630
003632
003634
003640
N03644

EXERCICER

104414

TRAP
157

005726
013700
032760
001407
012716
012746
010600

104414
005726
013700
032760
001407
012716
012746
010600
104414
003726
013700
032760
001407
012716
012746
010600
104414
005726
003726
062706
005703
001002

000137
013700
003014
116016

012746

012746
010600
104414
013700
003002
136002
012701
020227
001010
005001
012716
012746
010600
104414
00572¢
020227
001010
005001
012716
012746
010600

19 Dec
15 Uec

SUBROUT
INF S

000022

61$:

62%:

000006

015074
0000006

644:

654
:

L5877

6588

MOV
TRAP
157

SP,.RO

MOV
BIT
8EQ

RP,ADDR,RO
010000,22(R0O)

6589

o . 20,(SP)
01, (SP)

6590

TRAP
TSY

MOV
8IT
BEQ
MOV
MOV
MOV

TRAP
1ST
TST
ADD

Spu.

(SP)+

638

SP,RO
14

Spu‘

(SP)e

RP .ADDR,RO
04,22(R0O)
648
o .21,(5P)
&1, (SP)

SP.RO
14
(SP)+
(SP)»
&6 ,5P

6591

6592

67¢:

MOV
CLR
MOVe
MOV
MOV
MOV

RP . ADDR,RO

o0Xx38, -(SP)
2, -(SP)
SP,RO
14
RP . ADDR,RO
R2

TRAP

MOV
CLR
8IS8
MOV
cHP
BNE
CLR
MOV
MOV
MoV

000014
1777717
000204

000001

68¢:

TRAP
TST

cHe
BNE
CLR
MOV
MOV
MOV

SP,e

H
H

T1S7
BNE

0000006

0000101

14
(5P).

664
:

000003
0000006
000002

000211

VAX-11 Bliwe-16 V3 555
Poge -0
SPIDERSUSERS
: (DOUCETTE .+ ALCONICNROAR 851 | /4,7

RP,ADDR
RO
020000,22(R0O)
624
o . 19,(SP)
o1, (SP)

MOV
MOV

000022

10:c¢4:4)
10:21:90

MOV
-39
B8EQ
MOV
MOV

MOV

63%:;

1943
1983

6569
6499
6443

67
85¢

(SP)
3(RO),(SP)

6597

SP,s

6598

6600

14(RO),R2

0-1,R1
R2, #9204
684
R
®EX.SCC,(SP)

SP.RO
14
(SP)+
R2,#211
694

SEX . ONL, (SP)

SP,RO

SP,s

6598

o1,

6601

(SP)

SP,s

.
RD/RX

EXERCISER

ERROR MESSAGE

104414
005720
020227
001010
005001
012716
012746
010600
104414
005726
020227
001010
005001
012716
012746
010600
104414
005726
020227
001010
0035001
012716
012746
010600
104414
005726
020227
001010
005001
012716
012746
010600
104414
005726
020227
001010
005001
012716
012746
010600
104414
005726
020227
001010
005001
012716
012746
010600
104414
005726
020227
001010
005001
012716
012746
010600

15 Dec
15 Dec

SUBROUTINES

TRAP

000220

:
69

000001

000241

1S1

cre
BNE
CLR
MOV
MOV
MOV

TRAP
157

70%¢:

cMP
BNE

000001

000242

71¢:

000211

72%:

000001

73¢:

000001

000241

744:

000001

000242

000091

75%:

e1,

(5P)

SP,RO
14
(SP).

R2, 0241

714

@1,-(SP)
5P ,RO

TST

o
(o,
BNE
CLR
MOV
MOV
TRAP
757
cHe
BNE
CLR
MOV
MOV
MOV

TRAP

000220

704
R1
9EX . ACC,(SP)

MOV
MOV

MOV

000001

R2, 0220

TRAP

TST
o
oy
BNE
CLR
MOV
MOV
MOV
TRAP
TST
cMP
BNE
CLR
MOV
MOV
TRAP
TST7
CcHP
BNE
CLR
MOV
MOV
MOV

10:¢4:41
10:21:50

VAX 11 Blies 16 v3.555
Page ZCA
SPIDER
: [DOUCE T SUS
TE .F ALCON ICNRQA%
ERS
. HLL (67

14
(SP).

CLR

MOV

1933
1983

9EX . RD, (SP)

6593

6602

SP..

6598

6603

SP,e

(SP)e

R2,0242
724
R1

$¥EX . WRT,(S5P)
e1,-(sSP)
SP,RO
14

(SP)«

6598

;

6604

SP,s

R2,0211
738
Rl

6598

QEX . ONL, (5P)

6605

SP,RO
14
(SP)»

R2, 0220
744
Rl

SP.s

6598

#EX . ACC,(SP)
1,-(SP)
SP,RO
14
(SP)»

6606

6598

®EX RD,(SP)

6607

SP.RO
14
(SP).

3
H

6598

EX,WRT,(SP)
1, -(SP)
SP,RO

]

6608

R2,0241
75%
R1

01, -(SP)

R2, #242
764
R1

;

SP,s

SPI.

SP,e

Ly b,
NRQAM.
vol.¢

004100
004102
004104
004106
004110
004114
004116
004122
004126
004132
004134
004136
004140
004144
004152
004154
004160
004164
004164
004170
004172
004176
004202
004204
004206
004212
004216
004222
004226
004232
004234
004236
004242
004246
004250
004252
004256
004262
004264
004266
004270
004272
004274
004300
004 302
004 306
004312
004314
004316
004322
004326
004332
004336
004340
004 344
004 346

RD/RX

EXERCISER

ERROR MESSAGE

104414
005726
005701
001414
013700
005016
11601€
012746
012746

010600
104414

022626
013700
026027
001007
012716
012746
010600
104414
005726
012716
012746
010600
104414
013700
116016
042716
012746
012746
010600

104414

012716
012746
010600
104414
013700
016001
006201
006201
006201
006201
006201
042701
010116
012746
012746
010600
104414
013700
116000
042700
020027
001406
020027
001403
020027

SUBROUTINES

764
:

0000006

000014
0000006
000002

0000006
000012
040000

0000006
000016

177740

0000006
000002
0000006
000001

0000006
000016

174000
000002

000014
177400
000220
000241

0Guza2

TRAP
TS7
TSTY

B8EQ
MOV
CLR
MOV8
MOV
MOV
TRAP

778

0000006
000001

15 Dec
15 Dec

78%:

cp
MOV
cHe
BNE
MOV
MOV
MOV
TRAP
TST
MOV
MOV

MOV
TRAP
MOV
MOVB
8IC
MOV
MOV
MOV
TRAP
MOV
MOV
MOV

TRAP

MOV
MOV
ASR
ASR
ASR
ASR
ASR
8IC
MOV
MOV
MOV
MOV
TRAP
MOV
MOVB
8IC
cMP
B8EQ

cHP
BEQ
cHP

1983
1983

10:24:41
10:21:50

VAX

11 Blies

16 V3 555

SEQ 001
P
205

SPIDERSUSERS:(DOUCEYVE.FALCON]CNRGAfl.;ET (€2

(5P).

R1
17

6593

RP,ADDR
, RO

6609

(SP)
14(R0),(SP)
#€X.
0P, -(SP)
92, -(SP)

SP,RO
14
(SP)+,(SP)e

;

SP,»

RP,ADOR,RO

6611

12(R0), 040000

784
axx20,(SP)
1, -(SP)
SP.RO

14
(5P)+

#xx15,(SP)
o1, -(SP)

6612

RP.ADDR,RO

6613

SP,RO
14

16(RO),(SP)

0177740,(SP )

82,

(SP)

)

SP,RO
14

#xXXx16,(SP)
o1,-(SP)
SP,RO
14
/P, ADDR,RO

16(R0O),R1

R1
R1
R1
R1
A1
#174000,R1
A1,(SP)
o€EX.0P, -(SP)
02,-(SP)
SP,.RO
14
RP,ADDR,RO

14(RO),RO

#177400,R0
RO, 9220
794
RO, 4241
794
RO, 0242

SP.,s

5614

SP,s
6615

6623

6624

6625

HL6
EXERCISER

ERROR MESSAGE
001072
013700
016016
012746
012746
010600
104415
013700
016016
012746
012746
010600

104415
013700

016016
016046
012746
012746
010600

104415
013700
005760
100011
016016

012746
012746
010600
104414
000412
016016
011646
012746
0127446
010600
104415
005726
062706
013700
126027
001404
126027
001053
013700
016016
012746
012746

010600
104415

004624

004636
004640

013700
016016
016046
012746
012746
010600
104415
013700

SUBROUTINES

79%:

000 .24
000026

000003

000040

000002

000050

80¢:

000003

000022

000014

000204

000014

000205

000002

000024
000026
000003

0000006

BNE
MCV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV

MOV

000014

000020

15 Dec-1983 10:24:41
15 Dec 1983 10:21:50

81s:
82s:

83s:

TRAP
MOV
TST
8PL
MOV
MOV
MOV
MOV
TRAP
BR
MOV

MOV
MOV

MOV
MOV
TRAP
ST

MOV
o ]
B8EQ
cHPB
BNE
MOV
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
MOV

MOV
TRAP
MOV

VAX 11 Blies-16 V3-555

$€0 ©

Page -Or,

SPIDERSUS
: [DOUCETTE
ERS .FALCONICHRUAI ot 1

¢4

82s

RP . ADOR, RO
44(R0O),( SP)
oxx24, ( SP)
02, (SP)

SP.RO
15

FLECH

RP.ADDR,RO

20(R0O),(SP)

Spo.

6629

0xx25, -(SP)
2, -(SP)

SP.RO
15

RP.ADDR,RO

24(RO),(SP)
26(R0O), -(SP)
#Xx26,

SP,e

6630

(SP)

23, (SP)
SP,.RO
15

SP,s

RP,ADDR,RO

6631

804
40LR0),(SP)
axx21,-(SP)

6633

14(R0O)

SP.RO
14
81

SO0(R0).,(SP)
(SP),-(SP)

0xxe2, -(SP)
3, -(SP)
SP,RO

15
(SP)»

#22,5P

SP.‘

H
3

6631
6635

SP,s

R/P, ADDR,RO

H
H

6627
6637

14(RO), €205

6638

6641

14(RO), #204
83¢

844
RP . ADDR ,RO
20(R0O),(SP)
*¢xXx25, -(SP)

SP,RO
15

RP,ADDR,RO

03, -(SP)
SP,RO

24(RO), (SP)
26(R0O), -(SP)

15
CUOFF ,RO

SP.‘
6642

SP.‘

RD/Rx

6643

[ 1y,

;
i

Routine Size:

0000006

ASL
ADD

000006

MOvVB

000006
0000006
000003

MOVB
MOV
MOV
MOV
TRAP
JSR
ADD
ADD
ADD
RTS

000000V
000020
000020
000016

Blius

v3 5%%

CST.ADDR,RO
(SP)
6(R0O),(SP)
(sP)

CLR

Routine Bese:
1258 words,
$CODES
Meximum steck depth per invocation:
32 words

SEQ 0¢03
|4
207
SPIDER
: (DOUCESUS
TTE . FALCON
ERS
JCNRQAA ,
1 (63

VAX

CLR

844:
85¢:

10:¢4:41
10:21:50

6(RO),(SP)
oxXx23, (SP)
e3,-(SP)
SP,.RO

SP,e

PC,EMS.DUP
020, SP
#20,SP
216,5P
PC

10156

006300
063700
005016
116016
005046
116016
012746
012746
010600
104415
004737
062706
062706
062706
000207

SUBROUTINES

1983
1983

ERROR MESSAGE

15 Dec
15 Dec

®s

004660
004662
004666
004672
004676
004700
004 702
004706
004712
004716
004722

EXERCISER

004644
004646
004652
004654

RD'Rx

®e

NRUAM,
vOl ..
)

6644
6640
6596
6420
6409

\Jl'l
RO /RXx

NRQAM,
WOl O

ERROR MESSAGE

6656
6657
6658
6659
6660
6661
6662
6663
6664
6665
6666
6667
6668
6669
6670
6671

000010
000014
000016
000020
000024
000032
000034
000040
000042
000046
000052
000060

EXERCISER

1% Dec
15 Dec

SUBROUTINES

1983
1983

10:24:41
10:21:50

26Q Oc 4
e ege <OR
SPIDE
: ([DOUCETTE
RSUSE
.FALCONICNRQAA
RS
Q1 1 64

VAX-11

Blies

v3-5%%

GLOBAL
‘e

ROUTINE EMS DBN

NOVALLE

THIS ROUTINE PRINTS

'
'

IMPLICIT

]

INPUTS:
CST_ADDR

THE PRESENT

ADDRESS OF CONTROLLER STATUS

BEGIN
PRINTB (xx13, .COISK);
PRINTB (Xxx23, .CST_ADDR [.CUOFF « 3,
PRINTB (XX32, .S_DUPPKT - 2);
PRINTB (XXx33, .S_PATTERN);
PHINTB (XX34, .(DUPPKT + .S_DUPPKT),
EMS_BLK (DUPPKT .2, 256);
END;

013746

0000006

012746
012746
010600
104414
013700
006300
063700
005016
116016
005046
116016
012744
012746
010600
104414

000000G
000002

MOV

MOV
MOV
MOV

0000006
000006

MGv8

000006
0000006
000003

D_DBN],

. (DUPPKT

.SBTTL
EMS.DBN:
:

TRAP
MOV
ASL
ADD

0000006

DBN

CLR

MOvB
MOV
MOV

MOV
TRAP

TABLE

! “DISK XXX*
.CST_ADDR [.CUOFF « 3, D_DBN]);
! PRINTS THE BYTE COUNT
! PRINTS THE PATTERN WRITTEN

'DBN:

XXXXXX,
"

.5_DUPPKT));
! PRINTS THE WORD READ
! PRINTS THE WHOLE BLOCK READ IN OCTAL
! ROUTINE EMS DBN

EMS.DBN ERROR MESSAGE

CDISK, -(SP)

oxXx13, -(SP)
02, -(SP;
SP,RO
14
CUOFF ,RO
R0

SUBROUTINES

:
s

6665
SP,»

6666

CST.ADDR,RO
(SP)
6(RO),(SP)
-(SP)
6(RO),(SP)
oxx23, (SP)
03, -(5P)
SP,RO
14

;

SP,»

NRQAM?
gOI.c

000062
000066
000072
000076
000102
000104
000106
000112
000116
000122
000124
000126
000132
000136
000140
000144
000130
000152
000154
000160
000164
000170
000174
i

RD/RXx

EXERCISER

ERROR MESSAGE
013716
162716
012746
012746
010600
104414
013716
012746
012746
010600

104414
013700
016016

011646
012746
012746
010600
104414
012716
012746
004737
062706
000207

Routine

0000006
000002
0000006
000002
0000006
0000006
000002

0000006
0000006
0000006
000003

0000026
000400
000000V
000034

1'1

15 Dec
15 Dec

SUBROUTINES

S.DUPPKT,(SP)

MOV
suB

02,(SP)
oxx32, -(SP)
42, -(SP)
SP,RO

MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
MOV
MOV

14
S.PATTERN,(SP)

oxx33,

42,

(SP)

SP,.RO
14
S.DUPPKT ,RO
OUPPKT(RO),(SP)
(SP), -(SP)
oXx34,-(SP)
@3, (SP)
SP,.RO
14
Q0UPPKT +2,(SP)

TRAP
MOV
MOV
JSR
ADD
RTS

Size:
$CODES
63 words,
Routine Base:
Meximum steck depth per .nvocation:
15 words

(SP)

PC,.EMS.BLK
934 ,5P
PC

15102

1983
1983

10:04:41
10:21:50

VAX 11 Blies-16 V3 5SS

S€EQ 4.

Page

SPIDER
: (DOUCETTE
SUS
.F ALCONICNR
ERS
QAR . M1 |

SP,e
6668

SP,e

6669

SP.s

6670

6664

6657

L
RD/RX EXERCISER
ERROR MESSAGE SUBROUTINES

e«

s
e

6672
6673
6674
6675
6676
6677
6678
6679
6680

015300

015302
015304
015306
015310
015312
015314
015316
015320
015322
015324
015326
015330
015332
015334
015336
015340

6681
6682
6683
6684
6685
6686
6687
6688
6689
6690
6691
6692
6693
6694
6695
6696
6697
6698
6699
6700
6701
6702
6703

6704
6705

ROUTINE EMS DUP

NOVALUE

1983
1983

10:¢4:41
10:21:50

VAX 11 Blies 16 v3 555
> mge
SPIDER$SERS:
. DOUCE 1 TE . F AL CONICNR i,

HE)

THIS ROUTINE PRINTS OUT THE LISTING OF
AND TE SEND DATA COMMAND.

vol

15 Dec
15 Dec

THE

DUP PACKETS ONLY

ASSOCIATED WITH DUP RECEIVED DATA COMMAND

NRGAH,

begin

OuN

MESSAGETYPE

VECTOR [6]

INITIAL (T_QUE,

T_DEF,

T_INF,

T_TER,

T_FAT,

T_SPL),

MSGNUMBERS
: VECTOR [9) INITIAL (M_TER, M_BIN, M_COD, M_DAT, M_UR, M_URP, M_UP,
RCO_ERRORS
: VECTOR (%) INITIAL (ebh_30, E_UNT, € _BLK, E_DEV, E_ZER);
! TABLE OF BASIC, HARD ERROR MESSAGE ADDRESSES, INODEXED BY STATUS COOf

'PRINTB (XX13,

.CDISK);

PRINTB (XX29);
if .duppkt [duptype)
then
\
PRINTB

lss 6

( .MESSAGETYPE

[ .DUPPKT

[DUPTYPE]

else

printb

(ex_op,

PRINTB (XxX30):
if .duppkt [dupmesg]
then

duppkt

(duptypel);

lss 9

PRINTE

THEN

end

(.MSGNUMBERS

.OUPPKT

[ .CUPPKT

[DUPMESG] EQL 3

BEGIN
PRINTB (XX31);
PRINTB (.RCD_ERRORS
END;

cl:o printb (ex_op,

.duppkt

[DUPMESG]

[ .DUPPKT

11);

(DUPBF1)1);

[dupmesgl);

end;

MESSAGETYPE:
.WORD
.WORD

.WORD
. WORD
. WORD
. WORD

MSGNUMBERS
:

T.QuE
T.DEF

T.INF
T.TER
T.FAT
T.SPL

. WORD
.WORD
.WORD
. WORD
.WORD
. WORD
.WORD
. WORD
.WORD

M.TER
M.BIN
M.COD
M.DAT
M.UR
M.URP
M. .UP
M.UL
M, ASC

. {0RD

EBH.30
E.UNT

RCD.ERRORS
:
.WMORD

"DISK XXX

M_W,

r_ASC),

M6
NRQAM.
vol.c

RD/RX

EXERCISER

ERROR MESSAGE

)

SUBROUTINES

015342
015344
015346

.WORD
.WORD
. WORD

012746
012746

010600
104414
013700
006200
006200
006200
006200
000300
042700
020027
002010
006300
016016
012746
010600
104414

000170
000172
000176
000202
000204
000206
000212
000214
000220

15 Dec
15 Dec

000410
010016
012746
012746
010600
104414
005726
012716
012746
010600
104414
013700
042700
020027
002037
006300
016016
012746
010600
104414
013700
042700
020027
001031
012716
012746
010600

104414

013700
006300
016016
012746

0000006
000001

000000G

177766

.SBTTL
EMS.DUP
: MOV
MOV
MOV
TRAP
MOV
ASR
ASR
ASR
ASR
SWAB

BIC

000006

cHP

BGE
ASL

015276
000001

0000006
000002

0000006
000001

NO0ONOG
170000
000011

015312
000001
0000006
170000
000003
0000006
000001

0000026

01533¢6°
000001

MOV
MOV

MOV
TRAP

1$¢:

2%:

1983 10:24:41
1983 10:21:50

SEQ G
VAX 11 Bliss 16 v3-55%
211
SPIDER
: [DOUCETT
$IJ
E ,FALCONI
SER
CNROAA .81
S
1 (et

K
E.Bl
E.DEV
E.ZER

EMS.DUP ERROR MESSAGE SUBROUTINES
9XX29, -(SP)
21, (SP)
SP,RO
SP,s
H
14
DUPPKT ,RO
RO
RO
RO
RO
RO
#177760,RO
RO, 06
14
RO
MESSAGETYPE-2(RO),(SP)
01, (SP)
SP,RO
SP,»

6685

B8R

MOV

MOV
MOV
MOV
TRAP
TST
MOV
MOV
MOV
TRAP
MOV
8I1C
cHP
BGE
ASL
MOV
MOV
MOV
TRAP
MOV
8IC
cHP

BNE

MOV
MOV
MOV
TRAP
MOV
ASL

MOV

SP,s
&XX30,(SP)
21, (SP)

&9¢

SP,RO
14
RO
DUPPKT

669*

9170000,R0
RO,:11

MSGWUMBERS -2(RO), (SP)

SP,RO
14
RO
DUPPKT
4170000,RO

RO, 03
44
#XX31,(SP)
#1,-(SP)
SP,RO
14

DUPPKT+2,RO

RO
RCD.ERRORS(RO),(SP)

SP,s

6697

€70¢

SP,s

6701

]

t,.
b

15 Dec
15 Dec

RD/Rx EXERCISER

NRGAM,
O L.

ERROR TMESSAGE SUBROUTINES

1983 10:.24:41
1983 10:21:50

VAX 11 Bl es-16 v3 S5°
age Jle
SPIDERSUSERS
: [DOUCE T "€ .FALCONICNROAA .8, |
‘(

000224
000226
000230
000282
000234
000236
000242
000246
000230
000252
000254
000260

;1
;

SP.RO

010600

104414
022626
000410
010016

(SP)e
, (SP).

RO, (SP)
EX.
0P, -(SP)

012746
012746
010600
104414
005726
062706
000207

Rout ne Size:

TMMaximum steck

2, (SP)
SP,RO
14
(SP)e.

€12,5pP
PC

Routine Base:
$CODES
89 words,
9 words
depth per invocet
' on:

15350

6649

66983
6704

6677

6672

t
-

e
Te
G+
B
B
Go
G
Bv
Ss
G2
G4
G2
G
Bt
B
Be
B4
Be
BT
B
B
B
@
B
Be
B4
Gs
G
@
B0
S

15 Dec
1% Dec

RD/Rx EXERCISER

NRUJAM,
VOl L.

ERROR MESSAGE

6706
6707

6708
6709

6110
6711
t712
6718
6714
6715
6716
6717
6718
6719
6720
6721
o722
6723
6724
6725

SUBROUTINES

globel routine EMS _BLK (ADDR, {ENGTH,
1 )

000012
000014
000016
000020
000022
000024
000026
000032
000034
000040
000044

begin
litersl

MASK = @0’
7
PRINTX (CRLF);
incr COUNT from

;

beg
'n
if

((.COUNT

then

PRINTX

.LENGTH do

and MASK)

eql

000052
000062

000070

FOR EACH WORD TO PRINT

PRINTX 4 SPACES

!
!

PRINTX A WORD
ADVANCE TO NEXT

¢!
!

IF AT THE END OF
WHEN DONE

PRINTX <CR><LF>

(SPACE4Q);

(((.COUNT

then

and MASK) eql

( .COUNT eql

PRINTX

.LENGTH))

(CRLF);

START OF

A NtW LINE

ADDRESS
A LINE

end;

6735
6736

012746
010600
104415

PRINTX (EX_MWRD, ..ADDR);
ADDOR = _ADDR + 2;

6734

104415
003726
017616
012746

: novelue -

10 A LINE.

6726
6727
6728
6729
6730
6731
6732
6733

012746
012746
010600
104415
005001
000445
010100
005300
032700
001007
012716
012746
010600

SEQ 6,00
VAX 11 Bl:ss 1€ v3 555
age 218
SPIDERSUSERS:
(DOUCE TTE ,FALCONICNROIAAR . BL1 (64

THIS ROUTINE WILL PRINTX A BLOCK OF MEMORY WHICH IS "LENGTH' WORDS
LONG STARTING AT ADDRESS
ADDR . PRINTING IS DONE IN OCTAi, 8 WORDS

EMS.BLK ERROR MESSAGE

010146

000002

1983 10:¢4:41
198% 10:21:50

000001

MOV

1s:
000007

MOV
BIT

Rl1,-(SP)

;

SP.RO
15

SP.,s

COUNT

67.9

,s
COUNT

6722

®CRLF, -(SP)

Rl
S
R1.Rv
RO
#7.R0

et
000001

000012
000002

MOV

MOV
MOV
TRAP

SUBROUTINES
6706
6718

;

6724

OSPACEA, (SP)

SP.RO
15
(SP).

SP,s

¢
ADDR,

SP,»

812(SP),(SP)
OEX.WRD, -(SP)
02,-(SP)
SP.RO

—

ERROR MESSAGE SUBROUTINES

vOl1l.¢
)

000072
000100
000104
000106
000112
000114
000120
000124
000126
000130
000132
000134

000136

000142
000144
000146
000150

i
1

15 Dec
15 Dec

RD/Rx EXERCISER

NRQAM,

0627606
032701
001403

020166

00100?
012716
012746
010600

000002
000007

0000006

104415
005726

022626
003201
020166
003727
022626
012601
000207

29
B8ta

000014
000001

02,16(SP)
8/ R1

ADD

000016

3s:

3
R1,14(SP)

cMe
BNE

qas

oCRLF ,(SP)
o1, (SP)

MOV
MOV
MOV
TRAP
157

Ss:

000010

cHP
INC
CMp
BLE
cHe

$CODES
S3 words,
Rout ine Base:
Routine Size:
8 words
Max mum gtack depth per ‘nvocation:

SFG G
VAX 11 Biiws 16 v3 555
“age . i4
SPIDERSUSERS
: [DOUCE TTE . FALCONICNROASL & 1 - &¢

;
;

¢,ADDR
*,COUNT

672"
£729

, LENGTH
COUNT

67%0

R1,10(SP)
1

;

(SP)+
. (SP)(SP)Y+
. R1

10:024:41
10:21:50

SP RO
15
(SP).
(SP)+,(SP).

MOV
RTS

1983
1983

15632

;

€732

Spo‘

COUNT

COUNT ,LENGTH

6720

6719
6714
6706

RD/Rx EXERCISER

6737
6738
6739
6740

TROUTINE EMS _MAL

IPRINTB (EB_DCT,0ct);
'EMS _BLX (DCT, DCT_LEN);

! PHINT

'PRINTB (EB_COMM, .DCT (0, RR_BEG)):
SEMS _BLK (.DCT [0, RR_BEG) - 4, COMM_LEN);

' PRINT “COMMAND RING” AND STARTING ADDR
' PRINT BLOCK OF COMMAND RING

6751
6752
6753

IPRINT8 (EB_NEX2,

..DCT [0, RR_POLL]

B
By
@
Be
@
B
Be
B
Be
B

6762
6763
6764

6765
6766
6767
6768
6769
6770
6771
6772
6773

OCT TABLE CONTENTS'
! PRINT BLOCK OF WORDS

'PRINT ADDR OF COMMAND OF NEXT RR POLL
8);

'PRINTB (EBNEX3, .OCT [0, CR_POLL] - 8);
'PRINTB (EB_PKT);
tincr COUNT from O to PKT_CNT - 1 do

tPRINY ADDR OfF PACKET 10 BE POLLED
IPRINT ADDR OF PACKET 10O BE POLLED
! PRINTS “PACKETS IN MEMORY"
! FOR EACH MSCP ENVELOPE

3 1BLK ((MSCP_PXT [.COUNT, 0,0,16,0]), PKT_LEN);

6754
6755
6756

.DCT [0, RR_POLL]);

'ROUTINE EMS_RAL

€2

: NOVALUE =

'PRINTB (EBNEXL1,

end;

in
PRINTB (EB_RAL);
incr ZOUNT from O to RP_CNT

€

[a]

TO FIND THE MISSING packet OR THE PROBLEM

1 do

:BLK (CRETPKT +» .COUNT & RP_LEN) , RP_LEN);

end;

IPRINTS CONTENTS OF PACKETS

: NOVALUE =

THIS ROUTINE PRINTYS ALL return packets IN AN EFFORT

SEQ 0211
Poge 215

SPIDERSUSERS:
(DOUCETTE ,FALCONICNROAR . BLY (67

6743

6744
6745
6746
6747
6748
6749
6750

6761

11 Bliss-16 V3-555

‘begin

6760

15 Dec 1983 10:21:50

VAX

6741

6742

!
tend;

1983 10:24:41

THIS ROUTINE PRINTS ALL TABLES [N AN EFFORT TO FIND THE MISSING MESSAGE OR THE PROBLEM

6757
6758
6759

15 Dec

ERROR TMMESSAGE SUBROLTINES

B¢

NRQAML
vVO1.C

! PRINT BLOCK OF WORDS

ERROR “ESSAGE SUBROUTINES

6774
6775
6776
67717
o778
6779
6780
6781
6782
6783
6784
6785

6786
6787
6788

6789

6790

6791
6792

000000
000004
000010
000012

000016
000020
000024
000030
000032
000034

000036
000042
000044

000030
000054
000056

000060
000064

013700
005760
100012

016046
011646
012746
012746
010600

104415
000411
016045

011646

012746
012746
010600
104415
062706
000207

; Routine Size:
:

15 Dec
15 Dec

RD/RXx EXERCISER

NRQAM.
vol.<

Marximum stack

1983 10:24:41
1983 10:21:50

SEQ Oc'¢
VAX 11 Blies 16 v3-555
217
SPIDERSUSERS
: {OOUCETTE . FALCONICNRQAA .BL 1 (69

routing EMS LBN : novelue *

THIS ROUTINE PRINTS (EXTENDED) ONE OF TWO BLOCK NUMBERS APPEARING IN

THE CURRENT RETURN PACKET. NORMALLY, THE LBN FIELD IS PRINTED; THIS
FIELD WAS COPIED INTO THE RETURN PACKEY FROM THE ASSOCIATED COMMAND
PACFET. MOWEVER, IF THE “FLAGS” FIELD OF THE CURRENT RETURN PACKEY

INDICATES "BAD BLOCK REPORTED",

THEN THE "FIRST BAD BLOCK" FIELD IS

PRINTED.

IMPLICIT INPUTS:
RP ADDR - ADDRESS OF THE CURRENT RETURN PACKET
if BIT_TST (RP_ADDR [FLAGS], EF_BBR)
then
PRINTX (XX21, .RP_ADDR [BBLK_LO],
else

PRINTX (XxXx22,

0000006
000014

.RP_ADDR

.SBTTL
EMS.LBN: MOV
TST

000000G
000003

18:

0000006
000003
000010

2%:

27 words,
Routine Base:
depth per invocation:
6 words

.RP_ADDR [BBLK_LO1)
.RP_ADDR

[LBN_LO1);

“BAD BLOCK REPORTED:
"LBN:

40(R0O), -(SP)
(SP), -(SP)
exx21, -(sP)
03, -(SP)

TRAP
8R

15
29

MOV
TRAP
ADD

SP.RO
15
#10,SP

MOV
MOV
MOV
MOV

S50(R0O), -(SP)
(SP), -(SP)
oxx22, -(SP)
43, -(SP)

RTS

16004

XXXXYX, TM

XXXXXX

6788

MOV
MOV
MOV
MOV

$CODES

IF BAD BLOCK REPORTED

EMS.LBN ERROR MESSAGE SUBROUTINES
RP,ADDR,RO
14(RO)

8PL

000040

000050

[LBN_LC],

6790

SP,s

6788
6792

SP,s
6788
6774

Gl
N

ERROR MESSAGE SUBROUTINES

6793

globel routine EMS_EL (index)

6795
6796
6797

6798
6799
66800
6801
6802
6803

@
W
We
G
@
B
@y
B
Be
Bt
e

@
W
@
Be
B
@
8
@
B4
s
oW
®
w
®c
&
%
%

6805
6806
6807
6808
6809
6810
6811
6812
6813
6814
6815
6816
6817
6818
6819
6820
6821
6822
6823
6824
6825
6826
6827
6828
6829
6830
6831
6832
6833
6834
6835
6836
6837
6838
6839
6840
6841
6842
6843
6844
6845
6846
6847
6848

VAX

1983 10:24:41
1983 10:21:50

Bl 'es

v3-555

AND

'DATAGM

AND PRINTS

THE

CONTENTS OF

THE

begin

local

ELOG_ADDR : ref block [EP_LEN, word] f'eld (EP_FIELDS),

REASON

word,

ODISK_NUM : byte,
ELOG_CODE : byte.
ELOG_SUB : word;
ERROR L OG PACKET'S ADDRESS

ELOG_ADDR = ELOG_PKT + (.index #» EP_LEN s 2);
REASON =

FORMAT

_ELOG_ADDR [EL _FORMAT]);

DISK NUMBER
CODE
SUBCODE
ERROR-LOG MESSAGE RECEIVED

DISK_NUM = _ELOG_ADDR [EL_DK_NUM];
ELOG_CODE = .ELOG_ADDR (EL _CODE];
ELOG_SUB = .ELOG_ADDR [EL _SUBCODE];

PRINTB (ELG_00);

if (.REASON eql FORMAT_CNTR) or
( .REASON eql FORMAT_HOST)
then

else

PRINT BASIC REASON

PRINTB (.ELG_FMT [ .REASON])
PRINTB (.ELG_FMT [.REASON],

if (.ELOG_CODE
(.ELOG_CODE

then

PRINT BASIC REASON WITH DISK NUMBER

.DISK_NUM);

gtru O) and
leaqu 11)

PRINTX (ASTERISK);
PRINTX (.ERR_COD [.ELOG_CODE
else

end

C00E

11):

MESSAGE FROM INTERNAL DIAGNOSTICS

.ELOG_CODE eql ST_DIA

then

PRINTX (ASTERISK);
PRINTX (.ERR_COD

end;

(.ELOG_CODE sql
in
PRINTX
PRINTX

ST_MFE) end

(CRLF);
(ASTERISK);

PRINTX (.TBL_MFE

end;

(121);

(.ELOG_SUB leau 10)

then

(.ELOG_CODE

eql

(.ELOG_SUB));

ST_DAT)

and

Stuw

SPIDERSUSERS
: [DOUCETTE . F ALCONICNRUAL

: novalue -

THIS ROUTINE IS CALLED FROM ' SEQUEN’
ERROR-LOG PACKEY

H
H

6794

15 Dec
15 Dec

RD/Rx EXERCISER

MEDIA FORMAT ERROR

7
O,
Fage 1k

(7C

H L
NRJATM,
Ol

RD/RAXx EXERCISER
ERROR MESSAGE SUBROUTINES
6849

6850
6851

6852
6853

PRINTX (CRLF);
PRINTX (ASTERISK);

.
.

6855
6856

end;

6857

:
;

6861
€862

;
:
:

;
.

.
;

6858
6859
6860

6866
6867

:
:
3

6868
6869
6870

3
H

6873
6874

;
:

:
H
H
:

:
:

6875

6876
6877
6878
6879

6880
6881

6882
6883

;
H

6885
6886

( .ELOG_SUB lequ 4)
then

in
PRINTX (CRLF);
PRINTX (ASTERISK);

PRINTX (.TBL HST [.ELOG_SUB)):;

6884

if (.ELOG_CODE eql ST_CNT) and
(.ELOG_SUB lequ 3)

then

in
PRINTX (CRLF);
PRINTX (ASTERISK);
PRINTX (.TBL_CNT [.ELOG_SUB]):

it (.ELOG_CODE eaql ST_DRV) end

(.ELOG_SUB leaqu 8)
then
in
PRINTX (CRLF);

PRINTX (ASTERISK);
PRINTX (.TBL_DRV [.ELOG_SUB));

DRIVE ERROR

.REASON eql FORMAT_XFER

IF DISK XFER INVOLVED

PRINT LBN OR RBN

end;

then

g::;

.ELOG_ADDR [EL_BLOCK_TYPE) eql TYPE_LBN

)

PRINTX (XXx22,

then

2333

elive

.ELOG_ADDR [EL _BLOCK],

gggg

6893

PRINTX (CRLF);

6897

end;

000000

004137

0000006

EMS.EL::JSR

000006

016646

000020

MOV

000004
00001z

6894
gggz

005746
9012746

' CONTROLLER ERROR

end;

:
:

! HOST ACCESS ERROR

end;

6871
6872

:
H

if (.ELOG_CODE eql ST_HST) and

6863

6864
6865

! DATA ERROR

PRINTX (.TBL_DAT [.ELOG_SUB]});

6854

SEQ G4

VAX 11 Blies-16 v3-555
Page 17
SPIDERSUSERS:
{DOUCETTE .FALCONICNRIAL B 1 7 °C

(.ELOG_SUB leau 15)

then

.
f

;

15 Dec 1983 10:24:41
15 Dec 1983 10:21:50

PRINTX (EX_RBN,

.ELOG_ADDR [EL_BLOCK])

.ELOG_ADDR [EL _BLOCK],

.ELOG_ADDR [EL _BLOCK));

EMS_BLK ((.ELOG_ADDR ¢ 2), ((.ELOG_ADDR [EL _MSGLEN]
ELOG_ADDR [EL _CONTENTS] = EMPTY;

000102

1) 7 2) » 2); ! PRINTX CONTENTS OF PACKET
' DECLARE SAVE AREA FREE

.SBTTL

EMS.EL ERROR MESSAGE SUBROUTINES

TST

-(SP)

MOV

R1, $SAVES

20(sP),

;

(sSP)

2102, -(SP)

6793
INDEX,
s

6809

11
[4

000016
000022
000026

000030
000032

ERROR MESSAGE SUBROUTINES

004737
062700
010003
005004
156304

116366
116300
042700
105002

050002
016301
006201
006201
006201
006201
006201
042701
012716
012746
010600
104414
010405
006305
005704
001403
020427
001007
016516
012746

010600

104414
000412
0050156
116616
016546
012746
010600
104414
005726
105702
001423
120227
101020
012716
012746
010600
104415
0035000

150200
006300

000242
000244

000246

000250

1% Dec
15 Dec

RD-Rx EXERCISER

NRQAM?
vOi.ce

016016
012746
010600
104415
000417

120227

JSR
ADD
MOV

0000006
0000006
000016
000012
000020

CLR
8IS8

MOVB
MOVB

000004

8IC
CLRB

177740

8IS
MOV
ASR
ASR
ASR
ASR
ASR

000020

8IC

174000

MOV
MOV
MOV
TRAP
MOV
ASL
TST

000001

BEQ
cMP
BNE
MOV
MOV
MOV

000001

TRAP

24:

000002

3s:

000013

CLR
MOVB
MOV
MOV
MOV
TRAP
T57
7578
BEQ
BHI
MOV
MOV
MOV
TRAP

000001

CLR
8Is8

ASL
MOV
MCV
MOV
TRAP

1777766
000001

000037

4%:

CMPB

1983
1983

10:24:41
10:21:50

VAX-11 Bliss 16 v3 555
SPIDER$USERS: (DOUCETTE.F ALCONICNRQAA . BLL1

eeh

(70

PC.BLSMUL

#ELOG.PKT,RO

+,ELOG.ADDR

RO,R3
R4

REASCON

16(R3),R4
12(R3),4(5P)
20(R3),R0O

+«(ELOG.ADDR
) ,REASON
«(ELOG.ADDR),DISK
. NUM
»(ELOG.ADOR),
+

2177740 ,R0
R2
RO,R2

ELOG.CODE

R1
R1
R1
R1
R1

ELOG.SUB

+,ELOG.CODE

+(ELOG.ADDR),ELOG.SUB
ELOG.SUB
ELOG.SUB

20(R3),R1

6810

6811
6812

6813

ELOG. SUB
ELOG.SUB

« ELOG.SUB

€174000,R1

#€LG.00,(SP)
01, -(SP)

6814

s
SP,

SP,RO

REASON,

6819

REASON

6816

REASON,
«

6817

ELG.FMT(R5),(SP)

6819

SP.»

SP.RO
14
34
(SP)
6(SP),(SP)
ELG.FMT(RS),-(SP)

;

DISK
. NUM, »

SP,RO

SP,e

ELOG.CODE

6823

;

ELOG.CODE,»

6824

(SP)

R2
43

R2,013
44

#ASTERISK, (SP)
e1,-(SP)
SP,RO
15

6816
6821

6827

;

SP,s
68286

RO
R2,RO
RO

ERR.COD-2(R0O),(SP)
o1, (SP)
SP.RO
15
5S¢
R2, 037

SP,s

+ ELOG.CODE,»

6826
6832

000254
000256
000262
000266

000270
000272
000276
000302
000304
000306
10
000314
000316
000322
000324
000330
0003134
000336
000340
000344
000350

000352
000354
000356
000360

000364
000370
000372

000374
000400
000404
000406
000412
000414
000420
000424
000426
000430
0004 34
000440
000442

00044¢
00045C
000454

000470
000474
000476
000502

000510
000514
000516

1% Dec
15 Dec

RD/RX EXERCISER

NRQAMZ
vOol.c

ERROR TMMESSAGE SUBROUTINES

001015

012716
012746
010600
104415
013716
012746
010600

BNE

000001

0000306

000001

104415

022626

120227
001031

020127
101026
012716
012746
010600

104415

012716
012746
010600
104415
010100
006300
016016
012746
010600
104415
062706
120227
001031
020127
101026
012716

012746
010600

MOV
MOV
MOV
TRAP
MOV
MOV
MOV
TRAP

0000006

S5%:

000005

000012

BHI
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
TRAP
MOV
ASL
MOV
MOV

0000006
000001
0000006
000001

000001

000010

74:

000017

MOV
TRAP
ADD
cHPB
BNE
BHI
MOV

MOV
4OV

000001

TRAP
MOV
MOV

104415
012716
012746

010600

104415

TRAP
MOV
ASL

010100
006300
016016
012746

010600
104415
062706
120227
001031
020127
101026
012716
012746
010600
104415

CMP
cMPB
BNE
cHP

000011

8s:

MOV
MOV
TRAP
ADD
cMP8
BNE

cHpP

BHI

MOV

MOV
TRAP

1983
1983

OASTERISK,(SP)
a1, -(SP)
SP,RO

15
ERR.COD+30,(SP)
@1,

(SP)

SP.RO
15
(SP)+,(SP)s

R2,45

OCRLF ,(SP)
21,-(SP)
SP,RO
15
@ASTERISK,(SP)
#1,-(SP)
SP,.RO

10:24:41
10:21:50

S€Q Oclé
Peage 221
SPIDERSUSERS: [DOUCETTE.F ALCONICNRQAA .BLL (70
VAX

SP,RO

v3 355

6835

i
SP,s

6836

;: SP,s
]

;

ELOG.CODE,»

6834

683°

; ELOG.SUB,
s

6840

6843
SP,s

;

6844

;
: SP,»
s

TBL.MFE(RO),(SP)
¢1, (SP)

11 Bliss-16

ELOG.S\UB,s

6845

;: SP,»

: ELOG.CODE, »

g:g

;: ELOG.SUB,»

6849

OCRLF ,(SP)

6852

SP,RO
15
SASTERISK, (SP)

: SP,s

¢1,-(SP)
SP.RO

6853

; SP,s

: ELOG.SUB,»

6854

TBL .DAT(RO),(SP)

€1,-(SP)
SP,RO

: SP.s

6851

; ELOG.SUB,»

6858

, (SP)
OCRLF

6861

SP,RO

R2,011
94
R1,04
94

3+ ELOG.CODE,»

SP,«

6857

1<,

RRgAM,:

15 Dec
15-Dec

RD/R;: EXERCISER

ERROR MESSAGE SUBROUTINES

vo1.o

00052¢
000524
000530
000532
0005 34
000536
000540

012716
012746
010600

000550

010600
104415
062706
120227
001031
020127
101026

0000006

000001

104415

010100
006300
016016
012746

000160
000001

9s:

000012
000003

012716
012746
010600

000001

012716
012746
010600

000001

MOV
TRAP
MOV
ASL
MOV
MoV
MOV
TRAP

104415

104415
062706
120227

001030
020127

101025
012716

012746
010600

104415
012716
012746
010600
104415
006301
016116
012746
010600
104415
062706
020427
001031
032763
001012
016316
011646
012746
012746

000172’

000013

10¢:

000010

000001

000002

000056
000003

cHP8

BNE
cHP
BHI
MOV
MOV
MOV
TRAP
MOV
MOV
MOV

TRAP
ASL

000202
000001

170000

BNE

B8HI
MOV
MOV
MOV
TRAP
MOV

104415

010100
006300
016016
012746
010600

MOV
MOV
MOV
TRAP
MOV
ASL
MOV
MOV
MOV
TRAP
ADD
CcMPB

11%:
000060

MOV
MOV
TRAP
ADD
cHP
BNE
8IT
B8NE
MOV
MOV
MOV
MOV

1983
1983

QASTERISK,(SP)
#1,-(SP)
SP,RO

SEG Ozt
7

10:24:41
10:21:50

6862

;

SP,e

;

ELOG.SUB,+

SP,RO
15

SP.,s

R2,#812
10%
R1,#3
104

ELOG.CODOE,
¢

6866

ELOG.SUB,
+

6867

TBL .HST(RO),(SP)
o1,-(SP)

@6, SP

@CRLF ,(SP)

e1,-(SP)
SP,.RO

QASTERISK, (SP)
01,-(SP)

SP,RO

;

6860

6870

:
SP,s

6871
SP,s

; ELOG.SUB,
TBL .CNT(RO),(SP)
01, -(SP)

SP.RO
15

6863

6872

SP.s

;
; ELOG.CODE,

6869
6875

; ELOG.SUB,

6876

#CRLF,(SP)

;

6879

SP,RO

06, SP

R2,#13
11
R1,¢10

€1, -(SP)

15
®ASTERISK, (SP)

1, -(SP)
SP,RO

15
R1
TBL .DRV(R1),(SP)
41,-(SP)
SP,RO
15
#6,SP

SP,»

6880

;
;:

SP,»

6881

;: SP,»

6878

R4, 02
14¢

; REASON,s

6884

; ¢,+(ELOG.ADOR)

6887

S6(R3),(S5P)
(SP),-(SP)

: o(ELOG.ADDR),»

6889

#170000,60(R3)
12¢
oxx22, -(SP)
@3, -(SP)

L1
gOl

001020

001022
001026
001032

001036
001040
001042
001046
001050
001054
001056
001062

001066
001072
001100
001102
001106
001112
001116
;s
i

ERROR MESSAGE SUBROUTINES

000772
000774
000776
001000
001004
001006
001012
001016

15 Dec
15-Dec

RD/RXx EXERCISER

NRQAM,

MOV
TRAP

010600

104415
000411
016316

011646
012746
012746
010600

104415
062706
012716

012746
010600
104415
012716
060316
016346
005216
012746
004737
010066
062766
005726
004737
105063
062706
000207

Routine S:ze:
Maximum steck

12¢:

000056

13s:
14

000006
000000G
000001

000002

015632°

000001

000016

MOV
MOV
TRAP
ADD
MOV
MOV

MOV
TRAP
MOV
ADD
MOV

000002

MOV

0000006
000003

000002
0000006
000002

MOV

000002

INC
MOV
JSR
MOV
ADD
Ts7

10:24:41
10:21:50

VAX

11 Bligs

v3-555

SEQ Oc'8
Page 227

SPIDERSUSERS
: [DOUCETTE . .FALCONICNRQAA .BLL1 (70

SP,.RO
15
13
S6(R3),(SP)
(sP), (SP)
OEX.RBN, (SP)
03, (SP)
SP,RO
15
#6 ,SP
#CRLF ,(SP)

SP,»

H
;:

«(ELOG.ADDR),¢

;

SP.s

SP,RO
15
€2,(SP)
R3,(SP)
2(R3),-(SP)
(sP,

SP,s

:
;

ELOG.ADDR,s

H
H

6887
6891

6887
6893

6894

(ELOG.ADDR),*

#2,-(SP)
PC,.BLSDIV
RO, 2(SP)
02,2(SP)

(SP).

JSR
CLRB

PC.EMS.BLK

1(R3)

¢16,.SP
PC

ADD
RTS

$CODES$
296 words,
Routine Base:
16 words
depth per invocation:

1983
1983

16072

;
H

«(ELOG.ADDR)

6895
6793

111
RD/RXx EXERCISER

15 Dec 1983 10:24:41

ERROR MESSAGE SUBROUTINES
6898

6899
6900

6901
6902
6903
6904
6905
6906
6907
6908
€909
6910
6911
6912
6913
6914
6915
6916
6917
6916
6919
6920
6921
6922

global routine EMS_CMP (ADDR)
te

¢ THIS ROUTINE IS CALLED FROM
! COMPARE ERROR

000012
000016
000022
000024
000026
000032
000036
000040
000042
000046
000052
000054
000056

000070
000073
000076
000100
000104

000110
000112
000116

000122

016601
013746
012746
012746
010600

104414
012716
012746
010600
104414
013716
012746
010600
104414

016116
011646
012746
012746
010600

104415
013700
016016

011646
012746
012746
010600

SEQ Oe'

Page 224

SPIDERS$USERS:
[DOUCETTE .FALCONICNRUAR . BL1 (71

novalue

HOST WRT CHK'

AND PRINTS RELEVENT DATA ON A HOST

begin

loceal

ORIG_ADDR :

ORIG_ADDR =

PRINTB
PRINTB
PRINTB
PRINTX
PRINTX
PRINTX
PRINTX

PRINTX
PRINTX
PRINTX
PRINTX
end;

ref block [RP_LEN, word] field (RP_FIELDS);

. ADDR;

(xx13, .CDISK);
(DASH);
(.ERR_COD ([12]);
(EX_LBW, .ORIG_ADDR (LBN_LO), .ORIG_ADDR [LBN_LO});
(EX_LBR, .RP_ADDR (LBN_LO]., .RP ADDR (LBN_LO]);
(EX_CBW, .ORIG_ADOR [CBCNT_LO]);
(XX25, .ORIG_ADOR [BCNT_LO]);

(EX_CBR, .RP_ADDR [CBCNT_LO));
(XX25, .RP_KDDR (BCNT_LO));
(EX_BOW, .ORIG_ADDR (BUFF _1], .ORIG_ADDR [BUFF _01);
(EX_BDR, .RP ADDR (BUFF_1], .RP_ADDR (BUFF _01]);

000004
0000006
000000G
000002

0000006

000001

0000306

000001

! ADDRESS OF THE WRITE RETPKT
! “DISK XXX*
!
! » - HOST COMPARE ERROR”
! LBN (WRITE)
! LBN (READ)
! BYTE COUNT (WRITE)
! BYTE COUNT XMITTED (WRITE)D

!
!
!
!

BYTE COUNT (READ);
BYTE COUNT XMITTED (READ)
BUFFER ADDRESS (WRITE)
BUFFER ADDRESS (READ)

.SBTTL

EMS.CMP ERROR MESSAGE SUBROUTINES

MOV

R1,-(SP)

MOV
MOV

#Xx13, (SP)
@2.-(SP)

EMS.CMP:;

010140
000002

15-Dec-1983 10:21:50

VAX 11 Bliss 16 v3-555

MOV
MOV
MOV

4(SP),R1
COISK, -(SP)

; ADDR,ORIG.ADDR
i

SP,RO

MOV

PDASH, (SP)

MOV

SP.RO

;

MOV

ERR.COD+«30,(SP)

;

TRAP

MOV

TRAP

MOV
MOV

o1, -(sP)
14

#1,-(SP)
SP,.RO

6912
SP.s

6913

i SP.»

MOV

SO(R1),(SP)

; «(ORIG.ADDR),»

000000G
000003

MOV
MOV
MOV

9EX.LBW, -(SP)
43, -(SP)
SP,RO

RP,ADDR,RO

0000006
000050

0000006
000003

TRAP

MOV

MOV
MOV

MOV

(SP),-(SP)

SO(R0),(SP)

SP.RO

6914

SP,»

6915

(SP),-(SP)

#EX.LBR, -(SP)
#3,-(SP)

6910
6911

5P,

000050

MOV

6898

SP,*

N1
15 Dec
15-Dec

RD/Rx EXERCISER

NRUWAM,

ERROR MESSAGE SUBROUTLINES

VOl ..

1983 10:24:41
1983 10:21:50

SEQ 022C
VAX-11 Blies 16 Vv3-555
Page 22°
SPIDERSUSERS: [DOUCETTE .FALCONCNRQAA .BLL (71

000124
000126
000132
000136
000142
000144
000146
000152
000156
0001v2
000164
000166
000172
000176
000202
000206
000210
000212
000216
000222
000226
000232
000234
000236
000242
000246
0002%2
000256
000260
000262
000266
000272
000276
000302
000306
000310
000312
000316
000320

;
;

104415
ol16116
012746
012746
010600

104415
016116
012746
012746
010600
104415

000044
000002
000020
000002

013700
016016
012746

012746
010600
104415
013700
016016
012746
012746
010600
104415
016116

016146

012746
012746
010600
104415
013700

016C16
016046
012745
012746

010600
104415
062706

012601
000207

TRAP
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV
MOV
MOV
TRAP

MOV

000062

;

SP,e

;

«(ORIG.ADDR),»

Spl‘

#2,

(SP)

SP,RO
15

RP ,ADDR,RO
44(RO),(SP)

6916

6917

6918

#€EX.CBR, -(SP)

@2, -(SP)

SP,RO
15
RP .ADDR,RO

20(R0O),(SP)

SP.‘
6919

oxx25, -(SP)

SP,RO
15
24(R1),(SP;

2u'R1),-(SP )
wEs

MOV
MOV

8%,

M, -(SP)

(€7

<".00
b
RP. UDR, RO

MOV
TRAP

24(RO).(5P)

MOV
MOV
MOV
MOV
MOV
TRAP
ADD
MOV
RTS

$CODES
105 words,
Rout ine Base:
Routine Size:
28 words
Maximum stack depth per invocation:

#c, (SP)
SP,RO
15

oxXx25, -(SP)

MOV
TRAF

000000G
000024
000026
000000G
000003

¢(ORIG.ADDR),»

(SP)

20(R1),(SP)

MOV

MOV
MC

;

oEX.CBW,

MOV
MOV
MOV

000024
000026
0000006
000003

44(R1),(SP)

26(RO;.

SP.‘

;
;:

«(ORIG.ADDR),s
#(ORIG.ADDR),=

;

SP,»s

6920

6921

H
H

6905
6898

~ TMY

SEX .BDR, -(5r
03,-(SP)
SP.RO

062 ,5P

(SP)+,R1
PC

17212

15 Dec 1983 10:24:41

RD/Rx EXERCISER

19 Dec

ERROR MESSAGE SUBROUTINE -

6923

000004
000006

0047587
104423
100207

i1 Routine Size:
;

6924
0925

4 words,

EMS.01 ERROR MESSAGE SUBROUTINES

TRAP
RTS

Rout ine Base:

invocation:

2 words

000004
000010
000014
000016
000020
000024

012746
012746
010600
104414

0000006
000002

MSEMS.01

ERROR MESSAGE

MOV

0, -(SP)
#€685.01,

(SP)

MOV
MOV

000010
000014
000020
000022
000024

6928
6929

ADD

LSBTYTL

EMS.10:
: JSR

TRAP
RTS

Routine Base:
S$CODES
invocation:
2 words

PRINTB (EBD_10,
ENDMSG;

0000006

063716
012746
012746

0000006

*62706

6924

06 ,SP

6923

EMS.10 ERROR MESSAGE SUBROUTINES
PC
. MSEMS . 10
H
23

6927

;

SPORO
14

RYS

000000V

013746

010600
104414

02,-(SP)

MOV
TRAP

SUBROUTINES

Spc.

17544

BGNMSG (EMS_10);

Routine Size:
4 words,
Meximum steck depth per

:
i

004737
104423
000207

6923

“MORE THAN XX UNITS SPECIFIED"

LSBTTL

MS$EMS.01:

000006

$CODES . 17534

$CODES
Rout ine Bese:
i Routine Size:
11 words.
¢ Maximum stack depth per invocation:
5 words

000000
000004
000006

(72

ENDMSG;

000004

6926
6927

PC,MSEMS .01

PRINTS (EB8S_01, MAX _UNITS);

012746

Poge 26

SPIOERSUSERS:[DOUCETTE .FALCONICNROAR . BLS

.S8TTL

EMS.01::U5R

000000V

000000

062706
000207

S€Q 0i:
1

BGNMSG (EMS 017;

Man imum etack depth pe~

3
i

19A3 10:21:50

VAX 11 Bliws 16 v3-555

0000006
000002

.RORX_ADDR

17572

.0OF _RC);

.SB8TTL
MSEMS.10:

"NO RESPONSE AT ADDRESS XXXXXX"

MSEMS.
10 ERROR MESSAGE SUBROUTINES

ADD

OF .RC, (SP)
#€80.
10, -(SP)

RORX , ADOR, - (SP)

;

MOV

<P RO

ADD

06, 5P

;

MOV

MOV
MOV

TRAP

000006

6928
SP,e

6927

o’

OOV

1 Dec
15 Dec

RD/Rx EXERCISER

NRQAM.
\;Ol .<

ERROR TMMESSAGE SLUBROUTINES
R1s

Q00207

Rout ine Base:
$CODES
13 words,
;s Routine Size:
S words
s Max'mum steck depth per ‘nvocation:

0930
0931

i
3

000000
000004
000006

004737
104423
000207

6932
6933

ENDMSG;

000000

013746

0000006

000004
000010

012746
012746

0000006
000002

000020
000024

;
i

062706
000207

6934
6935

000000
000004
000006

004737
104423
000207

;

Routine Size:

6936

€938

Maximum steck

6937

17602

.SBTTL

4 words,
depth per
PRINTB

Rout ine Base:

invocation:

EMS.12 ERROR MESSAGE SUBROUTINES
PC,MS$EMS. 12
:

(EBD_12,

$CODES

6931

23
PC

17634

2 words

.RDRX_ADDR):;

.SBTTL

MOV

RDRX .ADDR, -(SP)

02, -(SP)
SP,.RO

;: SP,e

#6,SP

6931

6935

MOV

#€EBD.12, -(SP)

TRAP

MOV
MOV

ADD

000006

*INCORRECT BR LEVEL GIVEN FOR DEVICE XXXXXX*

MSEMS.12 ERROR MESSAGE SUBROUTINES

MS$EMS.12:

RYS

Routine Bese:
$CODES
Routine Size:
11 words,
Meximum stack depth per invocation:
S words

SEQ Oce2
VAX 11 Blies 16 Vv3-355
227
SPIDERSUSERS: (DOUCETTE ,FALCONICNRQAA .BL1 7

EMS.12: : JSR
TRAP
RTS

000000V

Rout'ne Size:
Meax 'mum steck

010600
104414

10:24:41
10:21:50

BGNMSL (EMS_ 12);

:
;

000014
700016

1983
1983

6932

17644

BGNMSG (EMS_13);

EMS.13 ERROR MESSAGE SUBROUTINES

LSBTTL

EMS.13::JSR

000000V

PC,MIEMS. 13

TRAP

RTS
4 words,

depth per

Rout ine Bese:
invocation:
2 words

PRINTB (EBD_13,
EMS_SA ();
ENDMSG;

$CODES

PC
+

17672

t "STEP X READ ERROR"
! PRINTX SR CONTENTS

.STEP);

LSBYTL

MEEMS,13 ERROR MESSAGE SUBROUTINES

.
15 Dec
15 Dec

RD-/RX EXERCISER

NRQAM.
vol.<¢

ERROR MESSAGE SUBROUTINES

)

000000

013746

0000006

000004
000010
000014
000010
000020
000024
000030

012746
012746
010600
104414

0000006
000002

004737
062706
000207

MSEMS.13:

MOV

STEP,

MOV
TRAP

92, (SP)
SP,RO
14

MOV
MOV

6939
6940

000000

004737

000006

000207

000004

:
;

104423

0000006

000004
000010
000014
000016
000020
000024
000030

012746
012746
010600
104414
004737
062706
000207

0000006
000002

Routine Size:

Moaximum steck

6944
6945

004737

104423
0002907

SP,e

3
3

6937
6935

6940

17702

EMS.14 ERROR MESSAGE SUBROUTINES
PC,MSEMS.
14

TRAP
RTS

Rout ine Bese:

invocetion:

PRINTB (EBD_14,
EMS_SA ()
ENOMSG;

013746

6936

26 ,SP

L.SBTTL
EMS.14:
: JSR

000000V

000000

;

’

BGNMSG (EMS_14);

4 words,
Routine Size:
Maximum steck depth per
6941
6942
6943

(SP)

PC.EMS.SA

RTS

S$CODES
Rout ine Base:
13 words,
; Routine Size:
steck
depth per invocat
on: 5 words
; Maximum

SEQ O--2
VAX-11 8lies 16 v3-555
Page 2B
SPIDERSUSERS:
(DOUCETTE . FALCONICNRQAA BL1 (72

©€BD.13,-(SP)

JSR
ADD

007122
000006

1983 10:24:41
1983 10:21:50

007122’
000006

2 words

23
PC

17734

$CODES

* “8AD SA CODE FROM DEVICE XXXXXX*
! PRINTX SA REGISTER CONTENTS

.IRDRX_ADDR);

M$EMS .14

LSBTTL
MIEMS. 14
MOV
MOV
MOV
MOV
TRAP
JSR
ADD

$CODES

SUBROUTINES

IRDRX
. ADDR, -(SP)
#EBD.
14, -(5P)

€2,-(SP)
SP,RO

14
PC,EMS.SA
PC

RTS

13 words,
Routine Bese:
depth per invocetion:
S words

ERROR MESSAGE

;

6941

SP,s

694.2

6945

6940

17744

BGNMSG (EMS_18);

000000V

LSBTTL

EMS.18 ERROR MESSAGE SUBROUTINES

RTS

EMS.18:
: JSR
TRAP

PC,MIEMS .18

}{

ERROR MESSAGE SUBROUTINES

)

1
;

1% Dec
15 Dec

RD/RX EXERCISER

NRQAM
vOl1.0

Rout ‘ne

Ma. “mum

Size:

4 words,

stack

depth per

6946
6947
6948

EMSCMD ();
ENDMSG;

PRINTB

Rout ine Base:

invocat on:

(EBD_18,

2 words

$CODES

!
!

MOV

CDISK, -(SP)
#EBD.
18, -(SP)

SP.RO
14

000004
000010
000014
000016
000020
000024
000030

012746
012746
010600

0000006
000002

MOV
MOV

010150
000006

JSR
ADD

6949
6950

000000
000004
000006

:
;

004737
104423
000207

000000

004737

000004

000207

92, -(SP)

MOV
TRAP

Routine Base:
$CODES
invocation:
S words

SUBROUTINES

6946
9P,

6947

6945

EMS.21 ERROR MESSACE SUBROUTINES
PC . MSEMS .21
3
23

6950

PC,EMSCMD

&6 ,5P

RTS

- 20006

.SBTTL
EMS.21::USR

000000V

TRAP
RTS

Routine Base:

invocation:

2 words

$CODLS

. 20040

!
!
!

EMSCMD ();
EMS _RAL ();
TEMS _MAL ()
ENDMSG;

010156

3 words,
Routine Size:
Meximum stack depth per

6955
6956

MSEMS.18:

BCNMSG (EMS_21);

Routine Size:
4 words,
Maximum steck depth per
6951
6952
6953
6954

;
:

13 words,

Maximum steck depth per

'DIS XXX WENT OFFLINE”
PRINTX RELEVANT RETPKY FIELDS

M$EMS.
18 ERROR MESSAGE

000000G

SEO 0224
VAX 11 Bl .es 16 VI-555
asge 229
SPIDERSUSERS: [DOUCE
T TE , FALCON]CNRG&A 8L1 (72

LSBTTL

013746

; Routine Size:

10:24:41
10:21:50

17776

.CDISK);

000000

104414
004737
062706
000207

1983
198%

.SBTTL

MS$EMS .21 ERROR MESSAGE SUBROUTINES

RTS

PC . EMSCMD
PC

MSEMS.21;
JSR
Routine Bease:
invocetion:
1 word

BGNMSG (EMS_22)

CONTENTS OF RETURN PACKET
al]l return packets
all message packets

$CODES$

20050

:
:

6951
695¢

[L)

000000
000004
000006

ERROR MESSAGE SUBROUTINES

004737

104423

000207

6957
6958

000000

004737

000004

000207

6959
6960

000000
000004
000006

;:
:

004737

104423

6961
6962

004737

000004

000207

1Y
TR
CYRETEE

$CODES

- 20056

$CODES

Bl 'es

16 V3-55%%5

SEQ 0zcS

Page 230

SPIDERSUSERS:
([DOUCETTE .FALCONICNRJAA .BLL (72

;

6956

contents of dup buffer

PC.EMS.DBN
PC

JSR

Routine Base:
invocation:
1 word

VAX

SUBROUTINES

MSEMS .22 ERROR MESSAGE

RTS

SUBROUTINES

;
:

6957
6956

EMS.30 ERROR MESSAGE SUBROUTINES
PC.MSEMS. 30
:
23

696C

- 20066

BGNMSG (EMS_30);

LSBTTL

EMS.30::JSR

000000V

Routine Base:

invocation:

2 words

TRAP
RTYS

$CODES

. 20074

EMSCMD ()
ENDMSG
;

MSEMS, 30:
JSR
RTS

Routine Base:

invocation:

1 word

$CODEs

contents of

MS$EMS
. 30 ERROR MESSAGE

.SBTTL

010156°

Routine Size:
3 words,
Maximum stack depth per
6963
6964
6965
6966

.SBTTL
MSEMS.22:

000207

000000

;
;

2 words

10:24:41
10:21:50

TRAP
RTS

015102°

Routine Size:
4 words,
Maximum steck depth per

H
H

Routine Base:

nvocetion:

1983
1983

EMS .22 ERROR MESSAGE
PC.,MSEMS .22

EMS_DBN ();
ENDMSG;

3 words,
; Routine Size:
: Maximum stack depth per
H
:

LSBTTL

EMS.22::JSR

000000V

4 words,
; Routine Size:
: TMMeximum stack depth per
H

15 Dec
15 Dec

RD/RXx EXERCISER

NRQAM,)
\{01 .<

PC.EMSCMD
PC
.+

20104

eludom

0TS externel references

return packet

SUBROUTINES

:
H

6961
6960

G
A

15 Dec 1983
15 Dec-1983

RD ‘Rx EXERCISER
ERROR MESSAGE SUBROUTINES

N AN

hX]

.GLOBL
.GLOBL
PSECT

SOWNS

$CODE$

Attributes
Rw ,
DO
RO,
I
RO,
D

sPLITS

$SAVE4,
BL sMUL

$SAVE3,

$SAVEZ

SUMMARY

Words
74
4133

Psect Neme

$SAVES,
BLS$DIvV,

10:24:41
10:21:50

LCL,
LtCL,
LCL,

,
,
.,

REL,
REL,
REL,

CON
CON
CON

LIBRARY STATISTICS
-

Total

File

. L16;7
SERS
.FALCONICNRQAA
ERSU
: [DOUCETTE
SPID

Symbols

Loaded

351

---

Percent

Blocks

Read

COMMAND QUALIF IERS

BLISS /PDP11 CNRQAA.BL1/LIST=CNRQAA.LI1/08JECT=CNRQAA,0B1/SOURCE
=PAGE :56
S'ze:
Run Time:
Eleapsed Time:

Memory

Comp

Used:

3953 code + 6736 data words
03:45.9
11:11.3
824

peges

lat on Complete

S& O Qr et

Fage 231
VAX 11 Blies-16 v3-555
SPIDERSUSERS:
[DOUCETTE .FALCONICNRQAR HLL (7¢

l-l( !
NRQAMZ

15 Dec 1983 10:35:57

14 Dec 1983 11:35:15

0001
0002

H
:

0007
0008

i
:

0010
0011

0015

H
H
:
i

H
:
H

0003
0004
0005
0006

wtitle 'RDO/RX EXERCISER
ident = 'V01.0 ,
addressing _mode (absolute),
env ronment (noeis)

0009

0012
0013
0014

!
!
!

0016

)

H
:
H

0022
0023

!
!

0025

H
H

::
:
:

0021

0024

Changes made by James S. Doucette.
"1 JSD REV A",

1. Set the ODT BREAK vector (location 140) to the starting address
of FALCON's ODT ROM (170000-octal).

2. Lower the general operating pricrity of the program from level 7

to level 6 to allow the BREAK key to interrupt and invoke

00T.

3. Due to space limitations, removed 8ll references to DBM's (debug
messages
).

28
Q029

!
t-------

0031l
0032
gggz

All changes are marked by

!
!

0026

8327

The following changes were made to CZRQAB "n producing CNRGAAA for the
FALCON-PLUS project (SBC 11/21+).
Release date December 19, 1983.

0020

0019

0017
0018

REVISION HISTORY

¢
¢

Changed the default IP address from 172150 to 176150.
oo

eeaemsea-

R R

eeceea-s

begin

sebttl

'DECLARATIONS'

gggz

librery 'CNRQAA.L16°’;

! RDRX EXERCISER GLOBAL LIBRARY

2ggg

require 'BLSMAC.REQ';

' DIAGNOSTIC SUPERVISOR LIBRARY

:
:

1527
1528

EQUALS;

1543

:
:
i
;
:
:
:
:
:
H
:
:
:
H

1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540
1541
1542
1544

forward routine
INTT_TEST : novelue,
DRIVER_INIT : novelue.
CTLR_INIT : novelue,
INI_CTLR_DAT : novalue.
REG_EXIST,
VEC_BR_TEST,
INT_GEN,
HARD_INIT,
INI_RRING : novelue,
SET_CTLR_CHAR,
UNIT_INIT : novalue,.
DR_ERR : novalue,
ACCESS : novelue,

MALTI DRIVE : novalue,
MO _INIT

novelue,

'
'

SEQ 02?7

SPIDERSUSERS: (DOUCETTE, FALCON]CN“QQA QLZ (1)

module NRQAM3 (

:
:

VAX 11 Blies-16 v3-555

ROUTINES APPEAR IN THIS ORDER
INOCENTATION IMPLIES CALLED SUBROUTINE

J..)

NRQAM3
vO01.C

RD/RX EXERCISER
DECLARATIONS

15 Dec 1983 10:35:57
14 Dec 1983 11:35:15

INIT IO _BWFF : novalue,
FATAL_ERROR : novalue,
Q1o0_0x,
QI1o_ourt,
QIO _GEN : novalue,
GET_RANDOM : novalue,
QIO UNIT : novalue,
QIO_FUNC : novalue,
DUP : novealue,
DUPWRTOBN : novalue,
DUPREDDBN : novalue,
DUPCOMMAND : novalue,
QIO_LBN : novalue,
QI0_SIZE : novalue,
FILL_BUFF : novalue,
PROC_RETPKT : novalue,

3
H
3
:
H
H
:
:
H
:
:
H
H
:
:
:

1545
1546
1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558
1559
1560

:
:
:
:
:

1562
1563
1564
1565
1566

1568

HOST _WRT_CHK,

1570
1571

RPS_REM,
DR_RETPKT : novalue,

H
:

:
H

1561

DIO_RETPKT : novalue,

OUP_COMPARE : novalue,
IO_RETPKT : novelue,
FSET_UPAR : novalue,
HARD _ERROR : novalue,
UPD_IO_TALLY : novalue,

1567

OVF _CHKX : novalue,

1569

SWEEP : novalue,

H
3
:
:
:
:
H
:

1572
1573
1574
157
1576
1577
1578
1579

1582
1583
1584

1549

DCY : blockvector [MAX_CTLR, OCT_LEN, word] field (DCT_FIELDS),

1591
1592
1593
1594
1595
1596
1597

OCT_ADDR

:
:

:
:
;
.

;

:
:
:
H
:
;

:
:

1580
1581

1585
1586
1587
1588

1590

1598
1599
1600

AZINTO : L$ISR novelue,
AZINT : novelue,
FATAL_ERROR : novalue,
POLL_CRING : novalue.
POLL_RRING : novalue,
OUP_RSP : novalue,
MSCP_RSP : novslue,
SEQUEN : novalue.

SOFT_ERROR : novalue,
DATAGM : novalue:;

SOFT_ERROR

externsl

CST

novelue;

blockvector [MAX_CTLR, CST_LEN, word] field (CST_FIELDS),
! RUN-TIME CONTROLLER STATUS TABLES
CST_ADOR : ref block [CST_LEN, word] field (CST_FIELDS),
¢ CONTROLLER STATUS TABLE ADDRESS OF “CURRENT” CONTROLLER

ref block

* DRIVER CONTROLLER TABLES

[DCT_LEN, word] field (DCT_FIELDS),
ADDRESS OF “CURRENT" DRIVER CONTROLLER TABLE
RDRX_ADDR : ref rdrx field (RC_REG),
! DEVICE ADDRESS OF “CURRENT” CONTROLLER
IRODRX_ADODR : ref rdrx field (RC_REG),
t DEVICE ADDRESS OF INTERRUPTING CONTROLLER
OUPPKT : BLOCK [257, WORD] field (OP_FIELDS),

TALLY

¢ BUFFER CONTAINING DUP INFORMATION FROM RECEIVE AND StND COMMANDS
vector [MAX_UNITS & TALLY_LEN, word] field (T_FIELDS),
!

STATISTICS TABLES

SEQ 0Oc>k

VAX-11 Blies-16 Vv3-555
Page
Z
SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA 8L 71,

®e

B¢

V¢

S¢

B¢

OS¢

NRQAM3
v0l1.0

H
;

:
i
;

;
;

;
;
:
;
i
;

RD/RX EXERCISER
DECLARATIONS
1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1033
1634
1635
1636
1637
1638

T_ADDR :

C_ERR_TBL

15 Dec 1983 10:3%5:57
14 Dec 1983 11:35:15

ref block

[TALLY_LEN, word] f'eld (T_FIELDS),
! ADDRESS OF STATISTICS TABLE (TALLY) FOR CURRENT UNIT
: blockvector [MAX_CTLR, C_ERR_LEN, word) field (C_ERR FIELDS),
' STATISTICS TABLE FOR CONTROLLER ERRORS

MSCF_PKT : blockvector [PKT_CNT, PKT_LEN, word] f'eld (PKT_FIELDS),
' MSCP PACKET POOL

IPKT_ADDR : ref block [PKT_LEN, word] field (PKT_FIELDS),
' ADDRESS OF AN MSCP PACKET (INTERRUPT PROCESSING)
PKT _USE : vector [PKT_CNT, byte, signed].

' MSCP PACKET POOL ALLOCATION TABLE
RETPKT : blockvector [RP_CNT, RP_LEN, word] field (RP_FIELDS),
! RETURN PACKET POOL
RP_USE : vector [RP_CNT, byte, si
],
! RET
PACKET POOL ALLOCATION TABLE
! CURRENT RETURN PACKET INDEX
RP_INDX : word,
RP_ADDR : ref block [RP_LEN, word] field (RP_FIELDS),
! CURRENT RETURN PACKET ADDRESS
ELOG_PKT : blockvector [EP_CNT, EP_LEN, word] field (EP_FIELDS),
! ERROR-LOG PACKET SAVE AREA
BUFF _ADDR : vector [MAX _BUF _CNT],
! TABLE OF I/0 BUFFER DESCRIPTORS
BUFF_OMN : vector [MAX_BUF_CNT, byte, signed],
t I/70 BUFFER OWNERSHIP (CONTROLLER NUMBER)
I00Q : vector [IODQ_LEN, bytel,
¢ I/0 DONE QUEUE - CIRCULAR QUEUE OF RETPKT INDECES
IODQ_IN : word,
' I/70 DONE QUEUE IN POINTER
100Q_OUT : word,
' 170 DONE QUEUE OUT POINTER
ENTRY_REASON : byte,
! CURRENT OPERATOR COMMAND
EOP_FLAG : byte,
¢ END-OF -PASS FLAG
DUP_FLAGS : WORD,
! DUP FLAGS
CCTLR : word,
! NUMBER OF “CURRENT” CONTROLLER
COISK : word,
' CURRENT DISK ADDRESS (RD/RX DISK NUMBER)
CUOFF : word,
! CURRENT UNIT CST OFFSET
CTLR_CONT : word,
! TOTAL NUMBER OF CONFIGURED CONTROLLERS
DUR : vector [MAX_UNITS, bytel.
't DROP UNIT REASON
QIO : vector [MAX_CTLR, bytel,
! NUMBER OF OQUTSTANDING QIOS PER CONTROLLER
FREE _MEM_ADDR,
! START OF FREE MEMORY
BYTS_PER_QIO : woTMd,
¢ SIZE (BYTES) OF AN I/0 BUFFER
ST_CODE : word,
t CURRENT STATUS CODE
SB_COOE : word,
' CURRENT SUB-COQDE

1639

STEP

: word,

t* CURRENT STEP IN HMARD_INIT

1640

OF _RC : signed word,

1643
1644

NEX : word,
CRN_LOW : word,

1646

P_INDEX : oé&ad word,

¢ CURRENT

S_PATTERN : WORD,
CREDIT_BAL : word,
NEXT_PKT USE : byte,
oBM12,
pBMis,
o8M19,
08M20,

! THE PATTERN WRITTEN TO DOBN'S
' CREDIT BALANCE
! POINTER TO NEXT ENTRY IN PKT_USE TABLE
1JSD REV A - REMOVED
+JSD REV A - REMOVED
tJSD REV A - REMOVED
1JSD REV A - REMOVED

1641
1642

SA_REG : word,
CMO_TIME : word,

1645

CRN_HIGH : word,

1647

1648
1649
1650
1651
1652
1653
1654
1655

1655

S_DUPPKTY

!
!
¢
!
¢

DBM21,

'DBM22,

* OFFSET (C OR 2) TO READ IP OR SA
'
!

STORAGE FOR SA REGISTER READS AND WRITES
COMMAND TIMEOUT VALUE (IN SECONDS)

! NON-EXISTENT MEMORY TRAP INDICATOR
t COMMAND REF NUMBER OF LAST COMMAND SENT
¢t COMMAND REF NUMBER OF LAST COMMAND SENT

PACKET INDEX

t DBN BYTE COUNTER

1JSD REV A - REMOVED

SEQ Orc

VAX 11 Bliss 16 Vv3-555
Page
7
SPIDERSUSERS:
(DOUCETTE .FALCONICNRQAL Bl 2 1,

®r

wis

®L

1660
1661
1662
1665
1664
1665
1666

1983

10:35:57

11:35:15

VAX

Bliss

REMOVED
REMOVED
REMCVED
REMOVED
- REMOVED
REMOVED
- REMOVED
- REMOVED

EH_13,

1685

dupround

AL L XL XL XL ET
3

EGS_02,
€GD_10.
EGD_11,
€GD_12,
€EGD_13,
EGD_14,
EGD_1S.
€EGD_16,
€EGD_17,
EGD_18,
EGD_20.
£GD_21,
EGD_22.
EGD_23,
EGH_30,
CRLF,
SWP_ERROR : word.
SWP _XFER : word,
SWP _FLAGS : word,
word,

SWP_RAT : word,
SWP_DPAT : word,
SWP_UCNT : word,

SWP _UDPAT

L$LUN,
LSUNIT;
psect

own =

Own

vector [MAX_UDP_CNT,

$GGGS(read,

nowrite,

wordl,

execute,

local,

1€

V3 555

SEQ 0O-7%C
Page

SPIDERSUSERS:
(DOUCETTE .FALCONICNROAA .BLZ

MSG_02,
MSG_03,

1684

1711
1712

REV
REV
REV
REV
REV
REV
REV
REV

Dec

1983

EH_O,
EM_1,
EH_2,
EM_3,
EH_A,
EM_S,
EH_6,
EH_7,
EH_8,
EH_9,
EH_10,
EHM_12,

1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1686
1687
1688
1689
1690
1691
1692
1693
1694
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
1707
1708
1709
1710

'JSD
' JSD
*JSD
tJSD
' JSD
+JSD
'JsSD
*JSD

oBM23,
oBM2S,
,
D8M26
o8M29,
08M108,
o8M109,
08M110,
pemMil2e,

1657
1658
1659

Dec

&8s

8
B

G¢

vOol.¢

RD/RXx EXERCISER
DECLARATIONS

NRQAMZ

PPPPPPIPP

HARD ERROR LIMIT FOR DROPPING UNIT
TRANSFER LIMIT FOR DROPPING UNIT
FLAGS (SEE DOCUMENTATION)
retio constent for dup exerciser
RDS1 OPERATION RATIO
DATA PATTERN NUMBER

USER DATA PATTERN COUNT
USER DATA PATTERN

concatenate);

COMM_AREA : blockvector [MAX_CTLR, COMM_LEN, word] field (COM_FIELDNS),

' COMMUNICATIONS AREA BETWEEN HOST AND AZTEC CONTROLLERS

NRQAM?3

RD/RX EXERCISER

vOo1.C
H
H
H
H
:
:
H
H
;
:
H

DECLARATIONS
1713
1714
1715
1716
1717
1718
1719
1720
1721

H
:
:

1722
172%
1724
1725
1726

H
;

1728
1729

127

1730

:
H
i
:

1738
1739
1740
1741

H
:
i
;
:
H
:

3
H

H
:
H

H
H
:

15 Dec

1731
1732
1733
1734
1735
1736
1737

1742
1743

1744
1748

1745

1983 10:35:57

14-Dec-1983 11:35:15

IDCT_ADDR :

INT_ADDR : vector [MAX_CTLR] initial (AZINTO s(, AZINT1, AZINT2, AZINT3)s),
¢ INTERRUPT SERVICE ROUTINE ADDRESS TABLE
ROM_CNT : word |n|t|ol (ROM_LEN),
! NUMBER
OF RANDOM NUMBERS \ KEEP

RANDOM : vector [RDM_LEN, word]l,

! RANDOM NUMBER TABLE

MX2

! MSCP PKT INDEX FOR SECOND QIO

ICTLR : word,
MXl : signed word,
:

signed word,

o' 000000’
),
vector [2] initial (1,
so'177777),

PATO4 : vector [2]
PATOS

initial (1,

%o’ 105613’
),
: vector [2) initiel (1,

o' 031463’
),
PATO6 : vector [2) initisl (1,
so' 030221
).

H
:
H
H

1751
1752
1753
1754

#$0'017777', %0’ 037777, %0'077777', wo'177777'),
PATO8 : vector [17) initisl (16,
%o' 177776, %o’ 177774, %o’ 177770, %0'177760',

;
H
:
:
:
:
:

1757
1758
1759
1760
1761
1762
1763

PATO9 :

:
:

;
;
;
:
;

1755
1756

1764
1765
1766
1767
1768

/ TOGETHER

! INTERRUPTING CONTROLLING NUMBER
! MSCP PKT INDEX FOR FIRST QIO

MAD]1 : ref block {PKT_LEN, word] field (PKT FIELDS).
* TADDRESS OF MSCP PACKET FOR FIRST QIO
MADZ2 : ref block [PKT_LEN. word] field (PKT_FIELDS),
' ADDRESS OF MSCP PACKET FOR SECOND GIO
LAST_PKT : blockvector [MAX_CTLR, LAST_PKT_LEN, word] field (LAST_PKT_FIELDS),
! SAVE AREA FOR INFO ABOUT LAST RESPONSE PACKETY
PATO2 : vector [2] initial (1.
' PATTERN 2
PATO3 :

vector (17] initiel (16,
so’' 000001’ , so’'000003', so’' 000007 ', %o'000017’,
%o’ 000037’ , #0'000077', %0'000177', so’'000377',

' PATTERN 3

! PATTERN 4
' PATTERN S
! PATTERN 6

t PATTERN 7

%o' 000777’ , %0'001777', #0’'003777', %o’ 007777,

! PATTERN 8

%0°'177740', #0'177700’, %0'177600', %o’'177400’,

o' 177000, so’176000*', so’174000', so' 170000,
o’ 160000’ , o’ 140000’, so’' 100000°' , so’' 000000’
),

vector [17] initiel (16,
rep 3 of (%0’'000000'), rep 3 of (#o’'177777'),
rep 2 of (%o0’000000'), rep 2 of (w%o'177777'),
do’ 000000’ , #0'177777', so’' 000000’ , %o’ 177777,
10'000000‘. io'177777').
PAT10 : vector [2) initiel (1,
#o'133331'),

PATL1 :

vector [17) initisl (16,
rep 3 of (#0'052525'). rep 3 of (wo’'125252'),
rep 2 of (so’'052525'), rop 2 of (#o’'125252').
so’' 052525’, #o' 125252’ , %o’'052525°', so’'125252’,
%o' 052525

o' 125252
),

SEQ Ozl

SPIDERSUSERS: [DOUCETTE .FALCONICNRQAA. ;3: (1;

ref block [DCT_LEN, word] field (DCT_FIELDS),
' ADDRESS OF INTERRUPTING CONTROLLER'S OCT

PATO7 :

1750

11 Blies-16 Vv3-555

BST : vector [MAX_UNITS, word, signed],
t 8LOCK SEQU€NCE TABLE FOR SEQUENTIAL LBN (VS. RANDOM SEEK) MODE
! DATA PATTERN SEQUENCE TAB!'E
DPST : vector [MAX UNITS, bytel,
MAX_LBN : vector [HAX,UNITS. nord].
! LARGEST LBN ALLOWED
STORAGE : vector [MAX_UNITS, word]),
' DUMMY STORAGE
ICOM_ADDR : ref block [COMM_LEN, word] field (COM_FIELDS),
' ADDRESS OF INTERRUPTING CONTROLLER'S COMMUNICATION AREA
ICST_ADDR : ref block [CST_LEN, word] field (CST_FIELDS),
' ADDRESS OF INTERRUPTING CONTROLLER'S CST

1747
1748
1749

VAX

! PATTERN 9

! PATTERN 10

t PATTERN 11

M¢
DECLARATIONS

®e

S+

vol.C

15 Dec 1983 10:35: 57
14-Dec-1983 11:35: 15

RD/RX EXERCISER

NRQAM3

1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779

1780

1781
1782

1783

1784
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
1815
1816
1817
1818
1819

1820
1821
1822
1823
1824

PAT12

PAT13

PAT14

VAX

PATTERN

vector [2]) initial (1,
%o’ 066666’
),

PATTERN

vector [17]

initiel (16,

%o’ 000001’ ., so’'000002’', so 000004’, so’'000010',
o’ 000020, %o’ 000040 , o' 000100, %o’ 000200,
o’ 000400, so’'001000', so’' 002000', wo'004000',
so' 010000’ , so’ 020000’. so’' 040000’ , o’ 100000’
),
PAT1S : vector [{17) initial (16,
#o’ 177776’, %o'1TT77S',
#0’'177757', %0’ 177737',
#o' 177377, #0'176777',
o' 167777, ¥o'157777',

%o’ 177773, #0'177767',
#o'177677’', wo'177577',
#o'175777', w0’ 173777,
%0°'137777', #0'077777'),

PATTERN

vector [22]) initiel (21.
%0’ 106466° , %o’ 000000’ , so'071311’,
rep 3 of (%0°'106466'), rep & of (s#o'071311'),
rep S of (80106466’
), rep 6 of (%o'071311')),
PAT19 : vector {22] initial (21,
so’' 000000’ , rep 2 of (s%o’'134631'),
rep 3 of (80'043146°'), rep 4 of (so’134631'),
rep S5 of (40'043146'), rep 6 of (wo'134631')),
PAT20 : vector ([22] initisl (21.
%o’ 134631’, #0’'000000', #o'043146',
rep 3 of (%o'134631'), rep 4 of (¥0’'043146'),

PATTERN 18

vector [2) initiel (1,
%o’ 000000’
),
DPA_TBL : vector [OP_CNT] initiel
(ROM_CNT, PATO02, PATO3, PATO4, PATOS,
PAT06, PATO7, PATO8, PAT09, PAT10, PAT11,

PATTERN 21

PAT18

PAT21

rep 5 of (¥0'071311'), rep 6 of (¥o'106466° )),

rep S of (%0'134631'), rep 6 of (%o'043146')),

PAT12, PAT13, PAT14, PAT1S, PAT16,
PAT18, PAT19, PAT20, PAT21),

PATTERN 17

PATTERN

PATTERN 20

(LBN)

DATA PATTERN ADDRESS

CURRENT _VECTOR : word,

¢ CURRENT DEVICE'S VECTOR ADDRESS

BSY_DEV

word initial (0),

BRLEVEL

word,

COMPARE _DATA

: byte:

external routine
NEX_TRAP : L$ISR novalue,
SET_CPAR : novalue,

TABLE

PATL1I?,

initial (rep MAX_UNITS of (1)),
¢t CURRENT SEQUENTIAL BLOCK COUNT

SEQ Oc*r
Page

vector [MAX_UNITS, word, signed)
BST_CNT : word initial (0),
TRKX_SGN

v3-555

PATTERN 15

vector [17] initiel (16.
rep 5 of (%0'133331'), rep 3 of (#o’155554'),
rep 2 of (#0°'133331'), rep 2 of (%o'155554'),
so' 133331, so’' 155554, #o’ 133331’ , %o’ 155554,
so’'133331', #o’155554'),
PAT17 : vector [22] initisl (21,
%0' 000000’ , rep 2 of (%o’'106466'),
rep 3 of (%0°071311°'), rep 4 of (%0’ 106466’ ),

PAT16

Blies-16

SPIDERS$USERS:
[DOUCETTE .FALCONICNRQAA .BL2 (1)

vector [(21) initiel (20,
rep 3 of (%0'026455'
), rep 3 of (#o'151322'),
rep 2 of (%0'026455°'
), rep 2 of (%0'151322'),
rep 2 of (%o’'026455°
),

so’' 151322’ , #o’' 026455, %o’'151322', so’' 026455’ ,
%o 151322’, %o’ 026455’ , %o'151322', %o’ 026455'),

CURRENT SEQUENTIAL BLOCK DEVICE

t CURRENT DEVICE'S BR LEVEL

! FLAGGED CLEARED TO BYPASS HOST COMPARES

CURRENT TRACK DIRECTION

omr
we e
mr
m
@
®s
w4
@
i
#e
wr
e
e
®

15 Dec
14-Dec

RD/RX EXERCISER

NRQAM3
vol.C

DECLARATIONS

1825
1826
1827
1828
1829
1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
184¢
184
1848
1849

SET_UPAR :
ouT _I00Q,

IN_IODQ

novslue,

novalue,

GET _PKT,
PUT_PKT : novalue,
GET_RETPKT,
PUT_RETPKT : novalue,

GET_JIO_BUFF
PUT_IO_BUFF

:
:

novalue,
novalue,

PUTA_BUFF : novalue,
SEND,
WAIT : novalue,

OROP _CTLR : novalue,
DRV_CTLERR : novalue,
EMSCMD : novealue,
EMS_22 : novalue,
EMS_EL : novelue,
EMS_CMP : novalue,
EMS_10 : novalue,
EMS_12 : novalue,
EMS_13 : novalue,
EMS_14 : novalue,
EMS_18 : novalue,
EMS_21 : novalue,
EMS_30 : novalue;

1983 10:35:57
1983 11:35:15

VAX

)

Bliws-16

v3-555

SEQ 0c??
Page

SPIDERSUSERS
: [DOUCETTE.FALCONICNRQAA.BL2 (1)

ty*

NRLAY

RD ‘Ax EXERCISER
TEST SECTION

1650

19838 11:35:15

vAx 11 Blies 16 v3 55%

TEST SECTION

seebtt]l

®s
W
&
W
B
@
S
6
B
GL
Wy
B
Ws
Bs
Gs
B
B+
Be
G4
Be
B+
Br
B
Ve
Bu
B
Be
B
B
B4
Be
B
@%

1858
1654
1655

!¢
¢
¢

THIS SECTION CONTAINS THE TOP LEVEL TEST CODE FOR THE RODRY EXERCISER,
THE EXERCISER CONSISTS OF Otk TEST weICH IS SUBDIVIDED INTO A NUMBER OF
SUBTESTS., ALL SUBTESTS ARE DECLARED WITHIN THIS 8LOCK,

1856
18%7
1858
18%9

BONTST,

1862

INIT_TEST ()

1860
1861
1863

1864

1865

EOP FLAG -~ TRUE;
COMPARE DATA - TRUE;

ASSUME NO UNIT AVAILABLE
ALLOW MOST COMPARES IF ASKED FOR
INITIALIZE

incr CILR from O to (MAX_CTLR

1866

f (.CST {.CTLR, STATE] eql ONLINE) ang

1:(;8

ther

1867
1868
1

incr OFFSET from (O « OF UN) to (3 o UNIT SIZE

1872

1878

i€

CST {.CTLR,

then

1874
187%

1876
1877

1878
1879
1880
1881

1::%
1

1884

.OFFSET, D STAT) eql ONLINE

in
EOP
_FLAG = FALSE;
exitloop:

if not
then

IF AY LEAST ONE UNIT ALIVE

ENDTST;

000050
000060
000064

BST:
BiKW
OPST:
.BLKW
MAX.LBN: .BLKW

000104

ICOM. ADDR :

NRQAM3 RO/RX EXERCISER
/v01.0/
AMA

#GGG$,

LBLKW

STYORAGE: .BLKW

BLKW
ICST.ADOR:

.BLKW

000000V

! RUN MULTI-DRIVE TEST

.PSECT
COMM. AREA:

000112

- &) by UNIT _SIZE do

! NOT END OF PASS

MATI ORIVE ();

000000
000000

000110

CONTROLLER ONL INE

.EOP_FLAG

.ENABL

000106

end;

.TITLE
.JIDENY

000074

(.0CT {.CTLR, STAT] eal ONLINE) and
(.CST {.CTLR, U_CNT] geaqu O)

18;1

TEST ENVIRONMENT

' FOR EVERY CONTROLLER

1) oo

IDCT.ADOR:
.BLKW
INT.ADDR:

4
2
4

1
1

PIDERSUSERS:
[DOUCE TTE .8 AL T N jONR
4iee

vOL

i g:§ 1983 10:35:57

"‘

- nge
0

{

NRQAMZ

RD/Rx EXERCISER

vOol.¢C

000114
000116

1% Dec

TEST “ECTION

000020

00015¢
00016¢
000162

. WORD
RDM.CNT: .WORD
RANOOM: Bl KW

MX2:

.BLKkW
.BLKW
LBLKW

MAD?2 :

.BLKW

MAD1:

000166

000170

.BLKW

LASY PKT:

AZINTO
20
20

1
1
1

PATO3:

.BLKW
.WORD
.MORD
.WORD

3
i
O
1

000001

PATOA:

.WORD

000212

000001

PATOS5:

.WORD

000216
000220
000222

000001
030221
000020

PATO6:

00017¢
000200
000202

000001
000000
000001

PAT02:

000206

000204

000210
000214

000224
000226
000230
000232
000234
000236

000240

000242
000244
000246

000250

000252
000254
000256

200260
000262
000264

000266
CcO0270
000272
000274
000276
000300
000302
000304
000306
000310
000312

000314
0o0N316
000320
000322
000324
000326
000330

177777

105613

031463

000001
000003
000007
000017

PATO7:

000037
000077

000177

003777

0Q7777
01777
037777
(000020

177776
177774
1771770
177760
177740
177700
177600
177400
177000
176000
174000

. WORD
. WORD

PATO8:

PAT09:

-1
-72165

31463

.WORD
. WORD
.WORD

1
30221
20

. WORD
. WORD

37
17

.WORD
. WORD
. WORD

377
mmn
1777

.WORD
. WORD
. WORD
. WORD

1
3
7
17

177

.MORD

3777

. WORD
. WORD

7N
-1

. WORD
. WORD
. MORD

170000
160000
140000
100000

000000
000020
000000

. WORD

.WORD

000377
000777
001777

077777
177777

1983 10:8%:57

14 Dec 198% 11:35:15%

ICTLR:
Mx1:

000164

7177
17777
377177

.WORD

. WORD
. WORD
.WORD
. WORD

-10000
-20000
-40000
-100000

. WORD
. WORO
. WORD
. WORD
. WORD
. WORD
. WORD
.WORD
. WORD
.HORD
.WORD

LMORD
.WORD
.MORD

-2
-8
-10
-20
-40
-100
-200
-400
-1000
-2000
-84000

O
20
©

VAX-11 Blies 16 v3-955

SEQ 0. ",
Poge

SPIDERSUSERS
; {OOUCETTE .FALCONICNRQAL RL 2 (2

o
¢
e
e

026455
026455

000001

151322

000510

s
e

PAT1Z2:

151322
151322
151322
026455
026455
151322
151322

026455
151322
026455
151322
026455
151322
026455

(o)
o]
[y ore)

[eX
o)

HHERIH
P
R:

000024
026455
026455
026455

4447

®
8

052525
125252
052525
125252
052525

1252%°

000440

052525
032525
052525
125252
125252
1235252
0523525
0523525
125252
125252

PAT1L:

WORD

1=
O

000020

WORD
WORD

000402
000404
000406
000410
000412
000414
000416
000420
000422
000424

PAT10:

133331

. WORD
.WORD

000378

177777

1771717
177777
000000
000000
177777
1772777
000000
177717
000000
177717
000000
177777
000001

000356

000360
000362
000364
000366
000370
000372
000374

. WORD
. WORD
WORD
WORD
.WORD

000000
000000

v0l1.¢

000332
000334
000336
000340
000342
000344
000346
Q00350
000352
000354

1% Dec
14 Dec

RD‘RXx EXERCISER
TEST SECTION

NRQAMS

PAT1S;

WORD

32525

1983 10:3%:57
1983 11:35:15

SEG O, 7

VAX 11 Blies 16 v3 559
Page
SPIDERSUSERS:
(DOUCE TTE .F ALCONICNRIAR 1t ¢

i4
¢,

000540

000554

066666

000020
000001
000002
000004

PAT14:

000010

000020
000040
000100
000200
000400
001000
002000
004000
010000
020000
040000

100000
060020

PAT1S:

177776

177775
177773
177767
177757
177737
177677
1771577

177377
176777
175777
173777
167777
157777
137777

071771717
000020

133331
133331
133331
155554
155554

PAT16:

155554
133331
133331
155554
155554
133331
155554
133331
155554

133331

155554
000025

000000

106466
106466

PAT17:

B8485R0EE5R0000008500080008550

000512
000514
000516
000520
000522
000524
000526
000530
000532
000534
000536

15 Dec
14 Dec

RD 'RX EXERCISER
TEST SECTION

3
NRQAM
vo1.C

1983 10:35:57
198% 11:35:15

SEQ O("
VAX 11 Bliss 16 V3 S55
Pege
11
SPIDERS$USERS: (DOUCETTE. FALCONICNRQAL .BL2 (2

134631
134631
043146
043146
043146
043146
043146

71311

71311
71311
-71312
-71312
71312
-71312

PAT18:

71311
71311
71311
71311
71311
-71312
-71312
-71312
-71312
-71312

071311
071311
071311
106466
106466
106466
106466
071311
071311
071311
071311
071311
106466
106466
106466
106466
106466
106466
000025
106466
000000
071311
106466
106466
106466
071311
071311
071311
071311
106466
106466
106466
106466
106465
071311
071311
071311
071311
071311
071311
000025
000000
134631
134631
043146
043146
043146
134631
134631

PAT19:

FHPHE T

vOl.¢

0006 °°
0006 "4
000676
000700
000702
000704
000706
000710
000712
000714
000716
00C720
000722
000724
000726
000730
000732
000734
000736
000740
000742
000744
000746
000750
000752
000754
000756
000760
000762
000764
000766
000770
000772
000774
000776
001000
001002
001004
001006
001010
001012
001014
001016
001020
001022
001024
001026
001030
001032
001034
001036
001040
001042
001044
001046
001050

15 Dec
14 Dec

RD/RXx EXERCIStR
TEST SECTION

NRQAMZ

-71312

-71312
71311
-71312
-71312
-71312
71311
71311
71311
71311
-71312
-71312
-71312
-71312
-71312
71311
71311
71311
71311
71311
71311

-43147
-43147
43146
43146
43146
-43147
-43147
-43147
-43147
43146
43146
43146
43146
43146

1983 10:35:57
1983 11:35:15

VAX 11 Bliss-16 V3-555

S€0 0

Soe” 12

LR TDERSUSERS: [DOUCE
TTE . FALCONICNROAR 805 (12

—

0C1226

134631
134631
134631
134631
134631
134631

000025
134631
000000
043146

43147
431487
43147
-43147
43147
43147

PA120:

43146

043146

000001
000000
000114
000176
000202
000205
000212’
000216’
000222°
000264'
000326°
000370
000374
0004 36°
000510
000514
000556
000620°
000662
000736*
001012’
001066’
001142’

-43147

43146
43147
43147
43147

134631
134631
134631
04314¢
043146
043146
043146
134631
134631
134631
134631
134631
043146
043146
043146
043146
043146

PAT21:

DPA.TBL:.

43146
43146
43146
-43147
-43147
-43147
-43147
-43147
43146
43146
43146
43146
43146
43146

RDM.CNT
PATO2
PATO3
PATOA
PATOS
PATO6
PATO7
PATO8
PATO9
PAT10
PAT11
PAT12
PAT13
PAT14
PAT1S
PAT16
PAT17
PAT18

TRK
. SGN:

PAT19
PAT20
PAT21
s et P

001052
001054
001056
001060
001062
001064
001066
001070
001072
001074
001076
001100
001102
001104
001106
001110
001112
001114
001116
001120
001122
001124
001126
001130
001182
001134
001136
001140
001142
001144
001146
001150
0011352
001154
001156
001160
001162
001164
001166
001170
001172
001174
001176
001200
001202
001204
001206
001210
001212
001214
001216
001220
001220
001222
001224

SECTION

TEST

v0l.C

15 Dec
14 Dec

RD/Rx EXERCISER

NRQAM3

e
i

1983 10:35:57
1983 11:35:15

SEQ 02!9

VAX 11 Blies 16 Vv3-55%
Page
SPIDER$USERS: ([DOUCETTE .FALCONICNRQAA. BL2

13
(2,

H <
15 Dec
14 Dec

RD/Rx EXERCISER

BST.CNT: WORD
B8ST.DEV: .WORD
CURRENT .VECTOR:
.BLKW
. BLKW
BRLE:VLL
COMPARE .DATA:
.BLKB

001230
001282
001234

001236
001240

.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
100000
040000
020000
010000
004000

002000

001000

000200
000100
000040
000020
000010
000002

000001

BIT15=BIT14=BIT13=BIT12==
BIT11eBIT10=~
81109==
8I108==
BITO7==

BIT06=BITOS=BIT04+~~
BITO3==
81T02=~
8ITO1=~
B8ITOO==

CST, CST.ADDR, OCT, NCY.ACDR, RDRYX.ADDR
IRDRX .ADDR, DUPPKT, TALLY, T.ADDR
C.ERR.TBL, MSCP.PKT, IPKT, ACDR
PKT.USE,

RETPKT,

RP.USE,

RP,LINDX

RP.ADDR, ELOG.PKT, BUFF ADDR, BUFF.OWN
100Q, I0D@.IN, IODQ.OUT, ENTRY, REASON
. FLAGS, CCTLR, CDISK
EOP.FLAG, DUP
DUR, QIO, FREE.MEM_ADDR
CTLR.CNT,
CUOFF,
BYVS.PER.GIO, ST.CODE, SB.CODE
STEP, OF .RC, SA.REG, CMD.TIME
NEX, CRN.LOW, CRN.HIGH, P.INDEX

S.DUPPKT,

S.PATTERN, CREDIT.BAL

NEXT.PKT
. USE,

EH.0,

EH.1,

EH.2

EH.3, EX.4, EH.5, EH.6, EH.7, EH.8
EH.9, EH.10, EH.12, EH.13, MSG.02
MSG.03, EGS.02, EGD.10, EGD.1)
€GD.12, EGD.13, EGD.14, EGD.15
EGD.16, EGD.17, EGD.18, EGD.20
€GD.21, EGD.22, EGD.23, EGH.30
CRLF, SWP.ERROR, SWP.XFER, SWP.FLAGS
DUPROUND, SWP.RAT, SWP.DPAT, SWP, UCNT
SWP .UDPAT, LSLUN, LSUNIT, NEX.TRAP
SET.CPAR, SET.UPAR, QUT,IODQ. IN.IODQ
GET.PKT, PUT.PKT, GET.RETPKT, PUT RETPKT
GEY.I0.BUFF, PUT.IO.BUFF, PUTA.BUFF
SEND, WAIT, OROP.CTLR, DRV, CTLERR
EMSCMD, EMS.22, EMS.EL, EMS.CMP
EMS.10, EMS.12, EMS. 13, EMS.14
EMS.18, EMS.21, €EMS.30
- 100000

40000

20000
10000

4000

2000
1000
400

200
100

20
10
4

2
1

SEQ UcAal

VAX 11 Bl ss 16 v3 555
Page
SPIDERSUSERS:
[DOUCETTE .FALCOMNICNRIAA Bl ¢

[e)
o)

SECTION

10:35:57
11:35:15

TEST

1983
1983

NRQAM3
vo1.0

14
(¢

}

15 Dec

RD/RX EXERCISFR
TEST SECTION

NRQAM
3

vo1l.¢

14 -Dec

PRIO7==
PRIO6==
PRIOS:«
PRIOA=»
PRIO3=PRIO2==

35
343
340
300
240
200
140
100

PRIOO=»
EVL==

10
20

LOTa=
ADR =«
I0U==
ISR=»

100

200
400
1000

UAMs=
e

BOE ==

PNT«=
PRI==
IXE=»

2000

4000

10000
20000
40000

IBE ==
IER==
LOE==
HOE
==

100040

010346

012746

0000026

000022

SPIDERSUSERS: [DOUCETTE. FALCON]CNRQ&A BLZ (2)

40
0

PRIOL
=~

1¢:

SEQ 0(41

2
1
40
37
36

EF .PUWR=>s

000056
0000006

v3-555

EF .CONTINUE
==
EF .NEW==

010346
012746
004737
010001
022626
005761

20
10

EF .START
==
==
EF .RESTART

000024
000026
000030
000034
000040
000042
000044
000050
000052
000054

Blies

B8IT1=8I70=.

000012

200
100

BIT2=»

$TL:

11:35:15

VAX

400

BIT3==

0000006
000001
000000G
000001
001240’
000000V

1983

10:35:57

1000

BIT9==
BIT8==
BIT7==
8I176=BITSa=

004137
112737
112737
004737

1983

-100000

.SBTTL
PSECT

$T1 TEST SECTION
$CODES$,
RO

JSR
MOVB
MOVve
JSR
LR
MOV
'
JSR
MoV
crP
ST
BPL
MOV

R1,$SAVES

MOV

1849
1860
1861

#1,EOP.FLAG
o1 ,COMPARE .DATA

PC.INIT.TEST
R3
R3,-(5P)

56, -(SP)

CTLR,»

1862
18643
186¢

s
CTLR,

1867

: CTLR

PC.BLIMA

RO,R1
(SP)¢,(SP)s

CST.2(R1)
Ss

)

000060
000064
000066
000072
000074
000076
000102
000106
000112
000114
000116
000120
000126
000130
000134
000136
000142
000146
000150
000152
000154

004737
022626
005760
100027
010346
012746
004737
012702
010001
060201

000156
000160
000166
000170
000174

003723

006301

032761
001403
105037
000405
062702
020227
003761
022626
005203
000243

0000006

000027
0000006
000003

3s:

000005
000023

4s:
Ss:

000001

004737
000207

000000V

0000006

64:

104466
006000
103773
000207

6 words,
Routine Size:
Meximum steck depth per

1::

1s:

Routine Bese:
invocation:
2 words

Vv3-555

SEO 0=a¢
Pege

SPIDERSUSERS: (DOUCE [TE . FALCONICNRQAA .BL2

CTLR,

1873

MOV
ADD

RO,R1
R2,R1

43 ,R2

s ,OFFSET

1871
1873

DCT(RO)

€27, (SP)
PC,BLSMUL

BLE
8IT8
BNE
JSR

RTS

€20000,CST(RY)

14
€1 ,EOP.FLAG
68
PC.MATI.ORIVE

s, OFFSET
s
OFFSET,

1876
1875
1871

CTLR

1880
1882

1849

. 0000

.SB8TTL

T1 TEST SECTION

JSR

PC,871

8LO
RTS

1$
PC

$CODES

+ 0176

TRAP
ROR

s
OFFSETY,

BEQ
3
CLRB
EOP.FLAG
BR
4%
ADD
oS ,Re
cHp
R2,023
8LE
24
cMP
(SP)+,(SP).
R3
INC
.WORD CLV!CLC

Routine Bese:
$CODES
63 words,
7 words
Meximum stack depth per invocetion:

004737

Blies

St
R3, -(SP)

8IT

000000G

11:35:15

VAX-11

BPL
MOV
MOV
JSR

ASL

020000

1983

10:35:57

PC,BLSMUL
(SP)s+,(SP)+

MOV

2%:

1983

JSR
cMP
TST

0000006

132737

001002

14 Dec

Routine Size:

000000
000000
000004
000006
000010
000012

;
;

1% Dec

RD/RX EXERCISER
TEST SECTION

NRQAM3
vol1.C

66
RO

1882

1< <
RD/RX EXERCISER

15 Dec

INITIALIZATION TEST ROUTINES

sebtt]l
routine

novalue

OR THE DM EXERCISER.

BASICALLY, THE DEVICES ARE BROUGHT ONLINE VIA "DRIVER_INIT”, WHICH IS
INVOKED IMMEDIATELY. ANY DEVICES WHICH FAIL ODURING THIS PHASE WILL BE

MARKED OFFLINE IN THEIR OCT AND CST. FOR THOSE DEVICES WHICH SURVIVE
THE INITIALIZATION, THIS ROUTINE WILL ATTEMPT 1 OR 2 ACCESS COMMANDS TO

EACH DISK VIA ROUTINE “ACCESS”, THE INITIALIZATION TEST IS DEEMED A
SUCCE
-5 IF A BLOCK ON THE INNER TRACK OF EACH DISK CAN BE ACCESSED.
in

DRIVER INIT ();
incr CTLR from O to (MAX_CTLR

1) do

gg?_CPAR (.CTLR);
if

INIT DRIVER DATA AND DEVICES

FOR EACH CONTROLLER

¢t SET UP COMMONLY -USED CONTROLLER-RELATED DATA ITEMS

.CST_ADDR [STATE] eql ONLINE

IF CONTROLLER IS STILL ALIVE

then

incr OFFSET from (O «

OF _UN) to (3 & UNIT_SIZE

OF _UN) by UNIT_SIZE do

! FOR EACH DISK

£ (.CST_ADDR (.OFFSET, D_PRES] eql PRESENT) and

(.CST_ADDR [ .OFFSET, D_ STAT] eql ONLINE) end
(not .CST_ADDR [.OFFSE D_FATAL))

then

_UPAR (.OFFSET);
! SET UP UNIT-RELATED DATA ITEMS
IF SWP_DINT NEQ (.DUP_FLAGS AND SWP_DINT)
¢ IF DUP CAUSED INIT THEN SKIP THIS SECTION
THEN ACCESS ():
' TRY ACCESS TO INNER TRACK
end;
IF UNIT IS PRESENT AND ONLINE

1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925
1926
1927

INIT_TEST

BRING EACH DEVICE ONLINE IN PREPARATION FOR EITHER THE MULTI-DRIVE TEST

1898
1899
1900

1907
1908
1909
1910
1911

1’

SPIDERSUSERS: {DOUCETTE.FALCONICNRQAL. BLZ (2

DEVICES AS CONFIGURED BY THE OPERATOR DURING THE HW DIALOG, AND TO

1893
1894
1895
1896
1897

1906

SEO Oca?’
Page

THE INITIALIZATION TEST IS DESIGNED TO VERIFY THE EXISTENCE OF THE

1890
1891
1892

1901
1902
1903
1904
1905

VAX 11 8l.ss 16 v3-555

‘INITIALIZATION TEST ROUTINES’

‘-

1885
1886
1887
1888
1889

1983 10:35:57

14 Dec 1963 11:35:15

®s

MBI

®e

B¢

NRQAM3
v0l1.C

004137

0000006

004737
005002
010246
004737
013700
005760
100035
012701

000000V
0000006

LSBTTL

INIT.TEST:
JSR
JSR

1%:

CLR
MoV

JSR

0000006

MOV

000003

MOV

000002

TST
BPL

CONTROLLER LOOP

ROUTINE INIT_TESTY

INIT.TESY INITIALIZATION TEST ROUTINES
R1,$SAVE2
PC.DRIVER.INIT

R2
R2,-(SP)

:
:

i CTLR
i CTLR,»

1906
1908

CST.ADDR,RO

1910

#3,R1

i »,0FFSET

1913

PC,SET.CPAR
2(RO)
44

[

000036

00004¢
000042
000046
000052
000054

INITIALIZATION TEST ROUTINES

063700

032710
001417
032710
001414
032710
001011
010116

000060
000062
000066
000070
000072
000076
000104
000106
000112
000116
000122
000124
000126
000130

004737
032737
001002
004737
062701
020127
003745
005726
005202
000243

000132
000134

003727
000207

i
i

2%:

010100
006300

020000
010000

000002

000000V
000005
000022

MOV
ASL

R1,RO
RO

ADD

CST.ADDR,RO

8IT
BEQ
8IT
BEQ
81T
BNE

040000

MOV
JSR
BIT
BNE

0000006
34:
4s:

1% Dec
14 Dec

RD/RX EXERCISER

NRQAM3
vol.C

JSR

ROD

40000, (RO)
34
420000, (RO)
3¢
©10000,(R0O)
34

R1,(SP)
PC,SET
., UPAR
92 ,0UP
. FLAGS
34

PC,ACCESS
95,R1

CHe
R1,822
BLE
28
TST
(SP)+
R2
INC
.WORD CLV!CLC

BLE

RTS

Rout ine Bese:
$CODES
47 words,
Routine Size:
Maximum steck depth per invocation:
S words

1¢

« 0212

1933 10:35:57
1983 11:35:15

SEQ 0Oc44
VAX 11 Bliss 16 v3-555
sge
18
SPIDERS$USERS
: {DOUCE TTE .F ALCONICNRQAA .BLZ (T,

OFFSET,»

1915

191¢
1917

OFFSET,»

1920
1921

: &, OFFSET

1922
1913

: CTLR

1907
1906

;

OFFSET,»

1887

)

NRQAM3

RD/RX EXERCISER

v0l1.0

INITIALIZATION TEST ROUTINES

1928

1931

:
:
:
;
.

1934
1935
1936
1937
1938

H
:

:
H
H

:
:

15 Dec

1929

1932
1933

1939
13:0
1941

routine DRIVER_INIT

1983 10:35:57

14 -Dec 1983 11:35:15

VAX 11 Bliss 16 v3-555

: novalue =

THIS ROUTINE IS EQUIVALENT IN FUNCTION TO THE INITIALIZATION ENTRY

!
¢

POINT OF A STANDARD DEVICE DRIVER. ITS RESPONSIBILITY IS 7O INITIALIZE
DRIVER DATA, AND TO BRING EACH RDRX CONTROLLER AND UNIT (DISK)

!
-

ONL INE .
begin

locel
PKT _ADDR;

PKT_ADDR = MSCP_PKT + 10;
NEXT PKT_USE = O;

' ADDR (TEXT « 0) OF FIRST MSCP PACKET
t* NEXT PACKET TO ALLOCATE

1945

‘ncr COUNT from O to (PKT_CNT - 1) do

¢ FOR EACH MSCP PACKET

H
:
:
:
H

1947
1948
1949
1950
1951

iggg

:
H

1944

1946

1952
1953

1956

:
:
H

1959
1960
1961

H
:

{gg;

:
:

1969
1970

H
:
3

1973
1974
ig;g

:
;

PKT_USE [.COUNT] = -1;
MSCP_PKXT [.COUNT, PKT_LO] = .PKT_ADDR;
MSCP_PKT [ .COUNT, PKT_HI) = O;
MSCP_PKT [ .COUNT, CONNID] = CID_MSCP;
PKT_
= PKT_ADDR + (PKT_LEN =«
2);
end;

incr CTLR from 0 to (MAX_CTLR
if

- 1) do

IP_ADDR] neqes O

! MARK PACKET FREE
! LOAD PKT ADDR INTO BUFFER DESCRIPTOR
! SET CONNECTION ID TO MSCP ID
' ADVANCE ADDR TO NEXT PACKET
! FOR EACH CONTROLLER
!

IF CONTROLLER IS PRESENT

SET_CPAR (.CTLR);
! SET UP CURRENT CONTROLLER PARAMETERS
CURRENT _VECTOR = .CST_ADDR [VEC _ADDR];
! SET CURRENT CONTROLLER'S VECTOR ADORESS
BRLEVEL = _CST_ADDR (BR_LEV] t 5;
! SET CURRENT CONTROLLER'S BR LEVEL

iggz

CTLR_INIT ();

INIT DEVICE AND CTLR DATA

IF CONTROLLER IS STILL ALIVE

.DCT_ADDR [STAT]) eql ONLINE

then

incr OFFSET from (O ¢« OF _UN) to (3 & UNIT_SIZE + OF_UN) by UNIT_SIZE do ! FOR EACH UNIT (DISK)
if (.CST_ADDR [.OFFSET, D_PRES] eql PRESENT) and
(not .CST_ADDR [.OFFSET, D_FATAL])

1971
1972

then

SET_UPAR ( ,OFFSET);
UNIT_INIT ();
end;

ig;z

1979

end;

004137

0000006

000000

.CST [.CTLR,

then

%ggg
1964

1957
1958

Page

end;

IF UNIT EXISTS

t SET UP UNIT-RELATED DATA ITEMS
! BRING UNIT ONLINE
! IF UNIT EXISTS
t

IF CONTROLLER IS PRESENT

! ROUTINE DRIVER_INIT
.SBTTL

DRIVER.,INIT:

SPIDERSUSERS
: [DOUCETTE.FALCONICNRQAR .BL2 (4,

1942
1943

SEQ 0c49

DRIVER.INIT INITIALIZATION TEST ROUTINES

000004
000010
000014
000016
000024
000026
000032
000036
000042
000046
000052
000056
000060
000062
000066
000070
000072
000074
000100
000104
000106
000112
000114
000116
000122
000126
000134
000142
000144
000150
000154
000160
000164
0uL170
000174
000176
000202
000204
000206
000212
000216
000220
000224
000226
000230
000234
000240
000244

000250
000252
000254
000256
000260
000262
;

15 Dec
14 Dec
R1, $SAVE2

RD/Rx EXERCISER

NRQAM3
vo1.C

INITIALIZATION TEST ROUTINES

012702
105037
005001
112761
010146
012746
004737
010260
0035060
105060
062702
022626
005201
020127
003753
005002
010246
012746
004737
022626
005760
001460
010246
004737
013700
016037

0000126
0000006

000104
0000006
0000006
0000026
0000116
000104

24%:

000056
0000006

Maximum stack

000022
S5%:
6%:

Rout ine Base:
90 words,
6 words
depth per invocation:

;
;
;:

COUNT
+,s(COUNT)
COUNT,»

s
PKT_ADDR,

(SP)+,(SP)+
R1
R1,013
1
R2
R2,-(SP)

2104 ,R2

cMP
INC
cMP
8LE
CLR
MOV

MOV

#56, -(SP)

JSR
cHe

PC.BL $MUL
(SP)+,(SP)+

B8EQ

&,PKT_ADDR

1928

1942

1947

1945
1947
1948

1949
1950
1951
1946

COUNT

1945

:
;:

CTLR
CTLR,*

1954
1956

CTLR,
=

1959

;

COUNT,s

CST(RO)

MOV
JSR
MOV
MOV

R2, -(SP)
PC,SET.CPAR
CST.ADDR,RO
2(R0O),CURRENT ,VECTOR

CLR

(SP)

;

PC,CTLR.INIT
80CT.ADDR
St
43,R1

:
:

1962
1964

; «,0FFSET
: OFFSET,s

1967
1969

1970

: OFFSET,s

1973

;

1974

€177000,CURRENT
. VECTOR

MOvB
MOV
JSR
MOV

4(R0O),(SP)
45, -(SP)
PC,BL $SHF
RO,BRLEVEL

MOV
ASL
ADD

R1.RO
RO
CST.ADDR,RO

JSR
TSY
8PL
MOV

BNE
MOV
JSR
JSR
RDD
cHP
BLE

44
R1,(SP)
PC,SET.UPAR
PC,UNIT.INIT
#5,R1
R1,e22
3¢

#10000, (RO)

(SP)+,(SP)e
cHe
R
INC
.WORD CLV!CLC
24
BLE

RTS
$CODES

1960

1961

8440000, (RO)

BEQ

81T

0000006
000000V

;
H

BIT
010000

¢,PKT _ADDR

MSCP .PKT +2(RO)
MSCP .PKT+11(RO)

B8IC

3s:

CLR
CLRB

PC,BL$MUA
R2,MSCP
. PKT(RO)

SEQ Oczas
Page
<O

SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA .BLZ (4

#377.PKT USE(R1)
R1,-(SP)
€104, -(SP)

TST

001234’
001234

VAX-11 Bligs-16 Vv3-555

MOVB
MOV
MOV

ADD

010037

Size:

NEXT .PKT.USE
R1

JSR
MOV

000013

005016
116016
012746
004737

Routine

OMSCP
. PKT+12,R2

CLRB
CLR

000377

042737

004737
003777
100026
012701
010100
006300
063700
032710
001410
032710
001005
010116
004737
004737
062701
020127
003754
022626
005202
000243
003704
000207

JSR
MOV

1983 10:35:57
1983 11:35:15

PC
0350

; »,0FFSET

1967

1958

1928

;

OFFSET,s

; CTLR

1954

S Dec
.4 Dec

KD Rx EvERCISER
INTYIA 1ZATION TEST ROUTINE

am o
.

LAT

1988
198%

10:3%:%7
:1:35:1%

Gt G807
o Qe
VAZ 1] Blies 16 ¢3 355
SPIDERSISERS:[DOUCETTE
[ F A 0 NYINR
M &

: novelus -

IS “ORIVER~- ROUTINE 1S CALEC FROM DRIVER _INIT FOR EACH CONTROLLER
COMF IGURED FOR TESTING. 1TS GENERAL PURPOSE IS TO BRING THE RDRx ONL INE
10 TeE TMOST., SPECIFICALLY, IT IS MRITVEN VO:
[ X7
1Y

A T LB B TR Y B LB CE B D SO

23333

INITIALIZE ORIVER CONTROLLER DATA, INCLUDING Tr€ DCT,
SET P THE DEVICE'S INTERRUPT VECTOR ADDRESS,
PERFORM A REGISTER EXISTENCE TESY TO VERIFY THE DEVICE'S PRESENCE,
PERFORM A VECTOR AND BR LEVEL TEST YO VERIFY TeE DEVICE S VECTOR
ADDRESS AND INTERRUPT REQUEST (EVEL,
DO A MARD INITIALIZATION (FOUR STEPS) ON TeE DEVICE.

IF ANY OF THESE INITIAL
DEVICE ARE DROPPED.

TESTS FAIL,

THEN ALL UNITS ASSOCIATED wiTw "rt

beg:n

£8

. ne CTLR INIT
rout

locel

byte:

RESWLT

B
®

SETVEC (.CURRENT _VECTOR, .INT_ADOR [.CCTLR), PRIO7);

SETVEC (.CURRENT VECTOR,

.INT ADDR (.CCTLR],

LSLUN =

D _UNIT];

DCT_ADDR (IG_INT] « TRUE;

CST_ADDR [OF UN,

2010
2011
2012
201%
2014
2015
2016
2017
2018
2019
2020
2021
2022
2023

%F SWP _DINT NEQ (.OUP_FLAGS AND SWP DINT)
HEN

i? REG_EXISY () eal FAILURE

then

B
G
B4
Br
B0
B
B
Be
Bv
%o

2030
2031
2032
2038
2034
208%

DROP ALL

TEST

CONTROLLER S UNITS

return;

end;

g('S‘II’_DINT NEQ (.DUP_FLAGS AND SWP _DINT)
i? VEC_BR_TEST
then
in

() eal

DUP CAUSED

INIT

THEN SKIP

VECTOR ADDR AND BR LEVEL

FAILURE

m_CTLR (.CCTLR, DU_INIT);

2024

2026
2027
2028
2029

m_CTLR (.CCTLR, DU_INIT);

THIS SECTION

TEST

DROP ALL CONTROLLER'S UNITS

return;

end;

B+

INITIALIZE CONTROLLER DATA
' SEY DEVICE S ASSUMED VECTOR ADDRESS
¢ SET DEVICE S ASSUMED VECTOR ADDRESS
PRIO6);
SEY "IGNORE INTERRUPT" BIT
GET FIRST UNIT NUMBER OF CONTROLLER
(USED By DRS FOR DEVICE-FATAL CTLR ERRORS)
IF DUP CAUSED INIT THEN SKIP THIS SECTION

INI_CTLR_DAT (),

!
t

RESWT = HARD_INIT (),
OCT_ADDR [IG_INT) = FALSE;

IF HARD INIT WAS SUCCESSFUL

.RESULT eaql SUCCESS

then

INI _RRING ();

WRT _RDRX

(RCSA,

ATTEMPT MARD DEVICE INIY
CLAER "IGNORE INTERRUPT" BIT

ALL,

SA_GO);

INITIALIZE RESPONSE RING
SET GO’ BIT (START CTLR POLLING)

tJSD REvV

!'JSD REv

N gam L
Wi

KD Rx EXERCISER
INTTIA, IZATION TEST ROUTINE

;

2036

:
.

2038
2059

;

2043

;

2044

2045

2049

2048

000000

010146

000002
000006
000012
000016
000020

004737
012746
013700
006300
016046

000024
000030
000034
000036
000044
000050
000054

000056

000062
000066
000074
000076

000102

000104
000106
000114
000116
000122

002124
000126
000132
000136
000142

000146
000150
000154
000156
000164
000170
000172
000176
000202

end

else

2046

2047

013746
012746
104437
052777
013700
016001
000301
042701

010137
032737
001025
004737

005700

001410
032737
001015
004737
005700

001011
013716
012746
004737
062706

000450
004737
11000}
042777
120127
001026
004737
012701
013700

»UCCESS

- ONL INE ;

OROP

end;

CTLR (.CCTLR, DU_INIT),

000000V
000300
0000006
000112’
001234
000003
040000 000000G
O000000G
000006
177760

000000V

.7
¢

!t DROP ALL CONTROLLER S UNITS

0000006

000002
0000006
000012

000000V

28
000000G

INITIALIZATION TEST ROUTINES

MOV
8IT
BNE
JSR

R1,LSLUN
#2,0UP .FLAGS
2
PC,REG.EXIST

8EQ
BIY
BNE
JSR

14
#2.,0UP FLAGS
24
PC.VEC.BR.TEST

0000006

CTLR.INIT

R1,-(SP)
PC,INI.CTLR.DAT
#300, -(SP)
CCTLR,RO
RO
INT . ADDR(RO), (SP)
CURRENT
. VECTOR, - (SP)
3, (SP)
37
#40000,80CT . ADDR
CST.ADOR,RO
6(RO) ,R1
R1

TsT

000000V

0000N0G

bage
8 .

SET CONTROLLER CHARACTERISTICS

MOV
JSR
MOV
MOV
ASL
MOV
MOV
MOV
TRAP
8IS
MOV
MOV
SWAB
8IC

000000G
000002 000000G

000000V
000001

' ROUTINE CTLR_INIT
.SBTTL
CTLR.INIT:

040000
000001

' HARD INIT FAILED

end;

000002

VAX 11 Bl'ss 16 v3 5%
SPIDERSUSERS:
[DOUCE T TE b AL CUN)

! MARK CONTROLLER ONL INE IN ' PROGRAM

end;

bo&fn

1988 10:135:57
198% 11:35:15

* MARK CONYTROLLER ONL INE IN “DRIVER

CST_ADOR [STATE] - ONLINE;

2042

bovn
OCY
ADDR {STATY

2040

2041

;

if SET CTLR_CHAR () eal

then

~087

1% Dec
14 Dec

BNE
MOV
MOV
JSR
ADD

B8R
JSR
MOV
8IC
cMP8
BNE
JSR
MOV
MOV

:
;
:

1980
2003
2005

:
:

2006
2007

2009

;

2011

:
:

2014
2018

2020

2023

2020

®177760,R1

24
CCTLR, (SP)
02, -(SP)
PC,OROP,CTLR
0n2,spP

S
PC . HARD ., INIT
RO,R1
#40000,80CT . ADDR
R1,01
3
PC, INI.RRING
o1,R1
RDRX
. ADDR,RO

:
:
i ¢, RESWLT
'
i RESWLT,»

'
1 ¢,RC.REG

2022
202

2028
2030

2033
2034

D4
INITIALIZATION TEST ROUTINt:

vol1.¢

000206
000212
000216
000222
000224
000232
0002 36
000244

000246
000252
000256
000262
000264
000270
000272

010160
004737
020027
001020
0527717
013700
052760
000407
013716
012746
004737
005726

062706

012601
000207

+ Routine Size:
:

15 Dec
14 Dec

RD/RX EXERCISER

NRQAM 2

Meximum

steck

000002
000000V
000001

MOV

R1,2(R0O)

cHe
BNE
8IS
MOV
8IS
B8R
MOV
MOV
JSR
TSTY

RO, 01
qa4
#100000,80CT.ADDR

PC,SET, CTLR.CHAR

JSR

100000

000000G

100000

000002

0000006

3s:

000002
0000006
000010

41
:
Ss:

CST.ADDR,RO
:IOOOOO.Z(RO)
$

CCTLR,(SP)
82,-(SP)

PC,DROP.CTLR
(SP).

€10,5p
(SP)+ ,R1

ADD

MOV

RTS

94 words,

depth per

Rout ine Base:

invocetion:

7 words

1983
1983

$CODES

0634

10:35:57
11:35:15

5fG G 4

VAX 11 Blies 16 v3 55%
Page
GPIDERSUSERS:
[DOUCE T TE .FALCONICNRQAR Hi ¢

t
H

RC.REG,

4
%,

203,

2039

H
H

2030
20445

H
3

2045
1998
1980

2040

t /i
3
NRQAM
vol.C

INITIALIZATION TEST ROUTINES

B
Ge
B2
Be
W
@
B¢
B¢
@0
B
B
B
B¢
B
B0
B
B1
@

IMPLICIT

OCT_ADOR
DCT_ADOR
OCY_ADDR
DCY_ADDR
DCT_ADDR
DCT_ADDR
end;

013701
005011
012702
060102

0000006

0000006
000050

010061

000006
000014
000010

011261
011061
011061
022626

INPUTS:
CURRENT CONTROLLER NUMBER
CCTLR
ADDRESS OF CURENT CONTROLLER'S DCY
OCT_ADDR

[RR_BEG] =~ COMM_AREA « 8 + (.CCTLR « COMM_LEN o 2),;
(RR_END) =
.DCT_ADDR [(RR_BEG] ¢« ((RRING LEN - 1) » 4);
[CR _BEG] =
.OCY_ADDR [RR_END) . 4;
(CR_END) =
.DCT_ADDR [CR_BEG) « ((CRING LEN - 1) + 4);
[RR POLL) =
.OCT_ADDR (RR_BEG);
(CR_POLL) =« DCY_ADDR [CR_NEXT]} = .DCT_ADDR [CR_BEG];

000006
000004
000012
000014

000014
000020
000016

000207

Routine Size:
Max imum steck

42 words,
Routine Base:
cepth per invocetion:
6 words

RRING SLOT

(R1)

MOV

o4 ,R2

MOV
MOV

CCTLR, -(SP)
50, -(SP)

R1.R2

2063

2064

2065

2066

2067

PC.BLEMA

«COMM _AREA.10,RO

MOV
MOV
ADD
MOV
ADD
MOV
ADD
MOV
ADD
MOV
MOV
MOV

RO, (R2)
RO,6(R1)
€14 ,6(R1)

RTS

#10,R0
R1,.RO
6(R1),(RO)
#4,(RO)
(RO),12(R1)
#14,12(R1)

2068
2069

(R2),14(R1)
(RO),20(R1)
(RO)Y,16(R})

$CODES

TO POLL

CRING POLL AND NEXT COMMAND POINTERS

CLR

OCT.ADDR,R1

JSR

000012

FIRST

R1, $SAVER

ADD
000006

LAST SLOT IN RESPONSE RING
START OF COMMAND RING
LAST SLOT IN COMMAND RING

JSR

ADD

000010°

!
H
'
!
H
H

INI.CTLR.DAT INITIALIZATION TEST ROUTINES

MOV

0000006

FIRST DCT WORD
! CLEAR
START OF RESPONSE RING

LSBTTL

INI.CTLR.DAT;

000004

013746
012746
004737

011061
062761

SEQ O
VAX 11 Bl ws 16 V3-555
Page
2%
SPIDER$SERS
: [DOUCETTE .FALCONICNRAAL . BLZ (&

0000006

060100
016110
062710

novalue

BC.? ADOR {WORDO] = 0,

004137

062761
012700

10:35:57
11:35:15

THIS ROUTINE IS RESPONSIBLE FOR INITIALIZING ALL CONTROLLER RELATED
DATA IN THE “DRIVER' PORTION Of THE EXERCISER., THIS INCLUDES THE
CONTROLLER S DCY AND OUTSTANDING COMMAND LIST.

2053

2054
2055
2056
2057
2058
2059
2060
2061
2062
2063
2064
2065
2066
2067
2068
2069
2070

062700
010012

;
;

rout ine INI_CTLR DAT

1983
1983

2050
2051
2052

000072
000076
000104
000110
000114
000120
000122

1% Dec
14 Dec

RD/RX EXERCISER

(SP)e,(SP).

1130

2062
205¢C

[/
NRQAME

RD/RX EXERCISER

vOl.¢

1¢

INITIALIZATION TEST ROUTINES

2071

routine REG_EXIST =

:
H
:
:
H
3
:

2074
2075
207
2077
2078
2079
2080

!
¢
!
¢
!
!
!

2083

begin

H
i
:

2085
2086
Zfi;

local
TEMP : word,
OUMMY : word;

H
:

2089
2090

i .ENTRY_REASON eql NEW_PASS
then

2092

:
H
;

072
2078

2081
2082
2084

2091

¢,

OF _RC = 2;

:
H
:
:
;
3
:
:

2095
2096
2097
2098
2099
2100
2101
gigg

H
:
H
:
:
:

2104
2105
2106
2107
2108
2109

¥ .NEX
then

;

2111

end

gfiz

:
:

2118
2119

2116
2117

11 Bl.es 16 v3 SSS

560 071

Page

SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAAR .BL 2 17

in
C_ERR_TBL [.CCTLR, C_ERR_MRD)

ERROF (10, EGD_10, EMS_10);
SETPRI (PRIOO);
return FAILURE;

else

OF RC =

end

until

.OF _RC

SKIP TEST FOR NEXT PASS

! SET UP TO READ SA FIRST

CLRVEC (4);

2112

2115

:
:

begin
NEX = FALSE;
SETVEC (4, NEX_TRAP, PRIO7);
TEMP = _(.RORX_ADDR + .0OF RC);
DUMMY = O;

2110

VAX

' TEMP FOR READING SA AND IP
' AS THE NAME IMPLIFS

return SUCCESS;

2093
2094

10:3%:57

") TEST DECIGNED TO VERIFY
THIS IS THE REGISTER EXISTENCE (OR "PROBE
THE PRESENCE OF AN RDRX DEVICE. THIS OBJUECTIVE IS ACCOMPLISHED BY
SETTING UP THE NON-EXISTENT MEMORY (NEX) TRAP VECTOR (LOCATION 4) AND
ATTEMPTING TO READ WHAT IS ASSUMED TO BE THE DEVICE'S SA AND IP
REGISTERS. IF THE NEX TRAP MANDLER IS5 INVOKED DUE TO AN ABSENT DEVICE,
THEN THE GLOBAL DATUM “NEX” WILL BE SET TQO "TRUE”. THIS DATUM
DETERMINES THE SUCCESS / FAILURE VALUE OF THIS ROUTINE.

1987

14 Dec 1983 11:35:15

3
:
H

Dec

.OF RC

- 2;

'
¢
'
'
H
'

SET TO "TRAP NOT RECEIVED”
SET LOCATION 4 TRAP VECTOR ADDRESS
READ REGISTER (THEN TRAP OR CONTINUE)
DUMMY INSTRUCTION TO COVER TRAP RETURN BUG
(TRAP RETURNS TO NEXT INSTRUCTION)
CLEAR LOCATION 4 TRAP VECTOR ADDRESS

IF NEX TRAP OCCURRED

.C_ERR_TBL [.CCTLR, C_ERR_HRD]}

» 1;

! REGISTER EXISTENCE TEST FAILED
t LOWER PRIORITY

SET UP FOR IP REG OR QUIT

les O;

return SUCCESS;
end;

000000

004137

0000006

000004
000012

123727
001461

000000G 000005

.SBYTL

REG.EXIST INITIALIZATION TEST ROUTINES

JSR
cMP8
BEG

R1, $SAVER2
ENTRY ,REASON, 05
L1

REG.EXIST:

i
3
i

com
2089
2091

{244
INITIALIZATION TEST ROUTINES

000014
00002¢
000026
00003¢

012737
005037
012746

000042
000046
000050

012746
104437
013700
063700
011001
005002
012700

000036

000054

000060
000062
000064
000070
000072
000100
000102
000106
000110
000114
000116
000120
000122
000124
000126
000130
000134
000136
000144
000150
000154
000156
000162
000164
000166

;
;

15 Dec
14 Dec

RD/Rx EXERCISER

NRQAMS
v01.0

012746
012746

104436
032737

001416

0000006
000002
0000006
000340
0000006
000004
000003

817
8tQ
MOV

0000006

Rout
' ne Size:

Mex mum steck

000001

60 words,
Rouxine Base:
9 words
depth per invocation:

2104

2107

2108

2109

:
H

2104
2106

OF .RC

2114

EMS. 10
RO
41

TRAP
ADD
BR
SUB
RDOD
TST

#10,.SP
02 ,0F .RC
#10,5P

8GE
MOV

1
#1.RO
PC
RO
PC

RTS

CLR

RTS

$CODES

@1 ,NEX

C.ERR.TBL(RO)
5SS
12
€GD.10

. WORD
.WORD
. WORD
CLR

4%
-

2099

CCTLR,RO

TRAP

34:

INCB

2¢:

RDRX
, ADDR ,RO
OF .RC,RO
(RO),R1
Re
&4 ,RO

ASL

000006

2093
2097
2098

TRAP

SEQ Oc¢ .
VAX 11 Blies 16 V3 S55
Pege
27
SPIDERS$USERS:
[DOUCETTE .FALCONICNRQAAR . BL2 (7
H
H

CLR
MOV

000004

000002
000010

MOV

MOV
ADD
MOV

0000006
013700
006300
105260
104455
000012
0000006
0000006
005000
10444
000010
062706
000413
162737
062706
005737
002322
012700
000207
005000
000207

CLR

MOV
MOV
MOV
TRAP

0000006
0000006

000001

02 ,0F RC
X
NE
€340, (SP)
ONEX
. TRAP, -(SP)
o4, (SP)
o3, (SP)

MOV

1¢:

1983 10:35%:57
1983 11:35:15

1254

;

o, TEMP

;

DuMMY

;
H

2100

2102

2113
2096

2083

2071

NRQAM3
vOl1.C
3
H

RD/RX EXERCISER
INJTIALIZATION TEST ROUTINES
2120
2121

routine VEC_BR_TEST »

212%
2124
212%
2126
2127
2128
2129
21%
2131
2132

!
!
!
!
!
!
!
!
!
!

2122

g{gz

H
s
H
'
3
H
3
:
3
$
3

1
i
i
:

H
'
H
H

213%%
21%
2137

g{gg

H
'

2140
2141
2142
2143
2144
2145

2147

:
H

i
H

H
;

IF THIS TEST SUCCEEDS, THEN THE BR LEVEL TEST IS RUN BY SETTING THE
PROCESSOR PRIORITY TO THE ASSUMED INTERRUPT PRIORITY GIVEN BY THE
USER. A FORCED INTERRUPT SHOULD NOT OCCURR. THEN, BY LOWERING THE
PRIORITY BY ONE, THE DELAYED INTERRUPT SHOULD OCCUR.

begin

.ENTRY_REASON eql NEW_PASS

then

end;

gigg

2154
215S

!
!
!
H

THE EXERCISER MJST BE STARTED AGAIN.

2148
2149

:
H

THIS POINY,

]

SETPRI (PRIOO);

2152

;

2153

SKIP TEST IF NEXT PASS

PRINTF (MSG_02);

¢t

“FUNCTIONAL TEST STARTED”

if INT_GEN () eql FALSE

t FORCE AN INTERRUPT

then

RR TBL [.CCTLR, C_ERR_HRD]) =

2156

eiaor (11, EGD_11, 0);

2157

2158

2159

2160

! LOWER PRIORITY

return SUCCESS;

return FM’LWE;

else

gi:;

iuNT_GEN () eql FALSE

2166

2167
gigg

SETPRI (.BRLEVEL
DELAY (1);

g%;g

é:«.‘DCT_ADDR {SA_SAVE] neq O

2172

'
t

- #0’'80');

2173

SEVPRI (PRIOO);

2175

end;

2174

! VECTOR TEST FAILED
¢

PRINTF (MSG_03);
SETPRI (.BRLEVEL);

H
H

' IF INTERRUPT DID NOT OCCUR
.C_ERR_TBL [.CCTLR, C_ERR_HRD] + 1;

ond

2161
gigg

return SUCCESS;

INTERRUPT DID OCCUR

"EXERCISER STARTED"”
SET PRIORITY TO ASSUMED BR LEVEL

! FORCE AN INTERRUPT (SHOULD NOT OCCUR)

't IF INTERRUPT DID NOT OCCUR
!
¢

SEQ G

VAX 11 Bl 'ss 16 v3 £55
Page
*
SPIDERSUSERS: {DOUCETTE .FALCONICNRQAL
Hy o 8,

THIS ROUTINE ATTEMPTS TO VERIFY (A) THAT THE RDRX VECTOR ADDRESS GIVEN
8Y THE USER DURING THE MW DIALOG IS VALID, AND (B) THAT THE
USER-SPECIFIED BUS REQUEST LEVEL FOR THE DEVICE IS CORRECT. THE FIRST
OBJECTIVE IS ACCOMPLISHED BY SETTING THE CPU PRIORITY TO O AND FORCING
AN RDRX INTERRUPT. IF THE USER SPECIFIED AND INCORRECT VECTOR ADDRESS,
THEN THE RESULT MAY BE UNPREDICTABLE. FOR THIS REASON, THE MESSAGE
*FUNCTIONAL TEST STARTED” IS PRINTED BEFORE THE TEST, AND
“EXERCISER STARTED” IS PRINTED AT ITS SUCCESSFUL CONCLUSION. IF
EITHER “FUNCTIONAL TESTY ...” OR "EXERCISER ...” DOES NOT APPEAR, THEN
PROGRAM CONTROL IS ASSUMED LOST AND A FATAL TRAP 1S LIKELY TO OCCUR, AT

2146

!¢

19 Dec 1983 10:35:57
14 Dec 1983 11:35:15

LOWER PRIORITY BY 1
WAIT

¢ IF INTERRUPT DID OCCUR (SA_SAVE WOULD BE NON-ZERO)
! RESTORE PROCESSOR PRIORITY TO O

' ONLY SUCCESSFUL EXIT POINT

e
S
Gs
B
B
@e
B
B
e
@

15 Dec
14 Dec

RD/RX EXERCISER

NRQAMS
vo1.C

INITIALIZATION TEST ROUTINES

2176
2177
2178
2179
2180
2181
2182
2183
2164
2185

000012
000014
000016
000020
000022
000032

004737
005700
001012
013700

SETPRI (PRIOO);

C_ERR_TBL [.CCTLR,

C_ERR HMRD]}

ERROF (12, EGD_12, EMS_12):

.SBTTL
VEC.BR,TEST:
MOV
TS7

000000G 000005

000001

1s:

000152

001404
005066

cMPB
BNE
CLR
TRAP
BR
MOV
MOV
MOV

TRAP

000000V

COME HERE ONLY FOR BR

TEST

FAILURE

2%:

000001

JSR
ST
BNE
MOV
5UB

TRAP

44:

MOV
BEQ
MOV
8tQ
CLR

2120

(SP)

-(SP)
ENTRY .REASON, €5
13

2143

RO
41
74

2146

2145
2150

MSG.02, -(SP)

1, -(SP)

SP,RO
17

C.ERR_TBL(RO)

TRAP

R1,

INITIALIZATION TEST ROUTINES

INCB
TRAP
. WORD
. WORD
. WORD
B8R
MOV
MOV
MOV
MOV

001236’
000040

VEC.BR.TEST

PC, INT.GEN
RO

TRAP

000000V

L$DLY

JSR
157
BNE
MOV
ASL

000013
0000006
000000
Q00466
012716
012746
000001
010600
104417
013700
001236

000142
000144

.C ERR_TBL [.CCTLR, C ERR_HMRD]

return FAILURE;
end;

006300
105260
104455

104441
004737
005700
001035
013700
162700
104441
012701
001411
013700

+
s

ond;

010146

005746
123727
001003
005000
104441
000473
012746
012746
010600
104417

1. ‘4

VAX 11 Blies 16 v3-555
P age
SPIDERSUSERS
: [DOUCE TTE .¢ ALCONICNRGAA &

end;

.GLOBL

000002

Stw

1983 10:3%5:57
1983 11:35:15

2152

24
CCTLR,RO

2155

2156

13
EGD. 11
o
9¢

2152
2lo1l

#5G.03,(SP)
SP,RO

17
BRLEVEL ,RO

SP,s
2162

PC.INT.GEN

2164

BRLEVEL ,RO

2167

RO
84

#40,R0

;

o,88TMF2

&,88TMPL

S$STMP

2168

000156
000160
000162
000164
000166
00017¢
000176
000200
000202
000204
000210
000214
000216
000220
000222
000224
000230
000232
000236
000240
000242
000244
000246
000250
000252
000254
000256

15 Dec
14 Dec

RD/RXx EXERCISER

NRQAM3
v0l1.C

INITIALIZATION TEST ROUTINES

005300
001374

005301
000766
013700
005760

001407
005000
104441
062706
012700
000416
005726
005000
104441
013700
006300

105260
104455

S5%:

68:

0000006
000002

000006
000001

74
8%:

10¢:

B8R

88 words,

Rout 'ne Base:

invocation:

words

CLR

;

$SsTMP.

DCTY.ADDR,RO
2(R0O)
8s

2170

2173

06,5P

H
:

2170
2172

RO
41

CCTLR,RO

C.ERR.TBL(RO)
55
14

. WORD
. WORD
. WORD
cHP
CLR
TS7
MOV

$CODES

$STMP)

10%
(SP)«

TS7

EGD.12
EMS. 12
(SP)¢,(SP).
RO

(SP).

(SP)+,RL

RTS

depth per

4
R1

41,RO

MOV

TRAP

9s:

RO
41

TRAP
ADD

INCB

0000006

000207

Meax.mum stack

MOV
TS7

TRAP
MOV
ASL

0000006

SEQ 02%%

VAX 11 Bliss 16 v3 555
Pege
30
SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA .BLZ (8)

8EQ
CLR

000014
0000006
0000006
022626
005000
005726
012601

Routine Size:

OEC
BNE
DEC
BR

1983 10:35:S
1983 11:35:15

1444

;

2160

2181

2182

;

2183

2120

RD/RXx

NRQAM3

000032
000034

000042
000050
000052
000054
000056
000062

2194
2195
2196
2197

2198
2199
2200
2201
2202
2203
2204
2205
2206

2207
2208
2209

2210
2211
2212
2213
2214
22135
2216
2217
2218
2219
2220
2221

004137
024646
013700
005060
012700
010077
012701
001411
013700
001404
005066
005300
001374
005301
000766
013700
016016

routine INT _GEN

2186
2187
2188
2189
2190
2191
2192
2193

SEQ 09
o age
VAX-11 Blies 16 v3-555
L
SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAR Bl 2 (9,

1983 10:35:57
1983 11:35:15

THIS ROUTINE BEGINS AN RDRX

INITIALIZATION SEQUENCE,

BUT ONLY

COMPLETES THROUGH THE STEP 1 WRITE, ITS PURPQSE 1S TO CREATE AN RORX
INTERRUPT (AT THE COMPLETEION OF STEP 1) IN ORDER TO HELP VERIFY THE
THE USER-SPECIFIED VECTOR ADDRESS AND BUS REQUEST INTERRUPT LEVEL.
A VALUE OF “TRUE” IS RETURNED TO THE CALLER IF AN INTERRUPT OCCURS,
AND

"FALSE” OTHERWISE.

IN THE

THE

INTERRUPT

VERIFIED BY

SA SAVE” WORD IN THE DEVICE'S DCT,.

A NON ZERO VALUE

B
Be
S
Gr
@F
We
GF
W
Bs
61
Gs
G
W
G
B
VI
B
@
Bs
@y
G5
@s
Mo
B9
6s
Wi
@
@
e
@8
s
81
We
@s
1
@

000012
000016
000022

15 Dec
14 Dec

EXERCISER

INITIALIZATION TEST ROUTINES

vo1.C

begin

locel
SA

STORAGE FOR STEP

word;

DCT_ADDR (SA_SAVE)
WRT_RORX (RCIP,
OELAY (10);

= O;

RC_ALL,

ZERO OUT SA SAVE WORD IN DCTY

incr COUNT
begin

RC_ALL.

from 1

WRITE
WAIT

ALL _ONES);

SA = _RDRX_ADDR [RCSA, RC_ALL]:
SA = (HR RING t 8) or (.CURRENT_VECTOR *

WRT_RORX (RCSA,

.SA);

TO START

STEP
1 READ

STEP

WRITE

INIT

STEP

SEQUENCE

1 WRITE VALWE

1600 do
TOTAL DELAY COUNT OF

.DCT_ADDR
return

-2) or SA INT;

DELAY (5);
BREAK;
then

1 READ AND WRITE

8,000

IF SA WAS CHANGED

[SA_SAVE] neq ©

TRUE;

INTERRUPT OCCURED

end;

return FALSE;

INTERRUPT DID NOT OCCUR

end;

000002

.SBTTL
INT.GEN: JSR
cHP
MOV
CLR
MOV
MOV
MOV
1s:
BEQ
MOV
BEQ
2%:
CLR
DEC
BNE
3
DEC
BR
4%
MOV
MOV

INT,GEN INITIALIZATION TEST ROUTINES

R1,$SAVER

-(SP),-(SP)
DCT.ADDR,RO
2(RO)

RO, BRDRX
, ADDR

:%Z.Rl

L$OLY,RO
3¢
2(SP)

RO
28
R1
1s

RDRX
. ADDR,RO
2(RO),(SP)

2186

2203
» ,RC.REG
RC.REG,
2,88TMP2

2204

2205

s, $8THPY

ssTMP
$sTHP)

sETMP2

s ,RC.REG

2206

000066
000072
000074
000076
000100
000104

000106

000112
000116
000122
000124
000130
000132
000136
000140
000142
000144
000146
000150
000154
000160
000162
000166
000170
000172
000174
000176
000200

;

15 Dec
14 Dec

RD/RX EXERCISER

NRQAM3
vO0l.C

INITIALIZATION TEST ROUTINES

013701

001234

MOV

010102
052702

111200

8IS

006201
006201

010201
010169
012702

012701
001411
013700
001404
005066
005300
001374
005301
000766
104422
013700
005760
001403
012700
000403
005302
001351
005000
022626
000207

Routine Size:

Maximum steck

000002
003100
000005

S$:

64%:

0000006

000002

7s:
8%

9$:

000000C
000002
000001
10¢:

11¢:

6S words,
Rout ine Bese:
7 words
depth per invocation:

R1,R2

:
;s
;

R1
R1

MOV

R2,.R1
R1,2(RO)

#111200,R2

#3100,R2
#5,.R1
9
Ls$DLY,RO
8s

MOV

8EQ
MOV

B8EQ
CLR
DEC
BNE
DEC
BR

2(SP)

2207

®,SA
+,SA
SA,RC.REG

;

RC.REG,*

;

s,88THMP2

&,88TMPL

;

¢ ,COUNT

2208

2210

2212

$sTMP

;

$STHPL

Rl
64
-

;

$sTMP2

2215

01,R0

2217

: COUNT

2210

;
:

2198
2186

RO
74

TRAP

OCT7.ADDR,RO
2(RO)
10%

MOV
TST
6EQ
MOV
BR
DEC
BNE
CLR

114
R2
S$
RO

(SP)+,(SP).

cHe

RTS

$CODES

SEQ 0c57
VAX 11 Bliss 16 v3-555
Page
32
SPIDERSUSERS
: {DOUCETTE .F ALCONICNRQAA .BL2 (9)

CURRENT
. VECTOR,R1

ASR
ASR
MOV

MOV
MOV

1983 10:35:57
1983 11:35:15

1724

M|
RD/RX EXERCISER

G6
W
s
Be
Vs
B¢
Be
B3
Be
@t
@3
e
B9

15 Dec

INITIALIZATION TEST ROUTINES

2222
2223
2224
2225
2226
2227
2228
2229
2230
2231
2232
2233
2234
2235
2236
2237
2238
2239
2240
2241
2242
2243
2244
2245
2246
2247
2248
2249
2250
2251
2252
2253
2254
2255
2236
2257
2258
2259
2260
2261
2262
2263

rout ine

THE FOUR STEPS,

local

IE_VEC

THE FOUR READ / WRITE

11 Bl 'es

16 V3 555

STEPS REQUIRED

THEN A SUCCESS VALUE IS RETURNED 7O THE CALLER.
A FAILURE

INDICATION

word;

TO INITIALIZE THE DEVICE.

IS RETURNED.

IE-BIT-AND VECTOR ADDRESS/4 BYTE

GET VECTOR ADDR/4 (1E

WRITE

DELAY (5);

TOTAL DELAY COUNT OF S00 FOR STEP 1

SA_REG =

! READ SA

.CURRENTY_VECTOR t

-2;

(USED

IN STEP

WRITE AND STEP

3 READ)

= 0)

from 1 to INI_ATT do

label
STEP_1_READ,
STEP_2_READ,
STEP_3_READ,
STEP
_4 _READ;

WRY_RDRX (RCIP,

RC_ALL,

ALL_ONES);

TO START

INIT SEQUENCE

[}

4
[}

STEP 1 READ
STEP = 1;
STEP_1_READ:
'n
beg
incr COUNT
begin

BREAK;

from 1

to 100 do

.RDRX_AL_R [RCSA, RC_ALL];

if (.SA_REG and S1_MASK) eql
then

SA_S1

STEP

1 READ

IS 0.K.

'
'

STEP 1 WRITE VALUE
STEP 1 WRITE

leave STEP_1 _READ;

end;

exitloop:
end;
H

4
1]

STEP 1 WRITE

SA_REG = (WR_RING t 8) or .IE_VEC;
WRT _RDRX (RCSA, RC ALL, .SA_REG);

SEQ Oe
Pege

SPIDERSUSERS: {OOUCETTE .FALCONICNRQAA .BL2 (10

IF NO READ ERRORS ARE DETECTED IN ANY OF

ADDITIONAL ATTEMPTS MAY BE MADE

ATTEMPTS FAIL,

‘ner ATTEMPTS
begin

2268

2273
2274
2273
2276
22177

VAX

beg'n

2265

2272

ALL

10:3%:57

OTHERWISE.,
IF

1983

14 Dec 1983 11:35:15

INITIALIZE AN RDRX DEVICE.

2266
2267

2269
2270
2271

HARD _INIT

THIS ROUTINE PERFORMS

B¢

V¢

©»

NRGQAM3
v01.C

N4
NRQAM3

RD/RX EXERCISER

vO0l.C
)

H
:
H
i
:
:

:
3
H
:
'
H

2278
2279
2280
2281
2282
2283

2286

2288

2289

2290

H
H
:
H
H
H
H
3

2293
2294
2295
2296
2297
2298
2299
ggg?

Z;gg

3
:
H
:
:
:
:
:
:
H
H

2316

:
:
:
:
i
H
H
i
:
H
:

2318
2319
2320
2321
2322
2323
2324
232%
2326
2327
gggg

:
H
:

STEP = _STEP
STEP_2 _READ:
begin

¢t

TOTAL DELAY COUNT OF 10,000 FOR STEP ?

t READ SA
!

IF STEP 2 READ IS O.K,

leave STEP_2 READ;

end;

exitloop;
end;
¢
H
!

!
¢
!

STEP 2 WRITE

WRT_RDRX (RCSA, RC_ALL,

.DCT_ADDR [RR_BEG]);

RINGBASE-LO,

PI = O

TOTAL DELAY COUNT OF

READ SA

STEP 3 READ
STEP = _STEP
STEP_3_READ:
begin

incr COUNT from 1 to 2000 do
begin
DELAY (5);
BREAK;

SA_REG =

.RDRX_ADDR {RCSA,

RC_ALL];

if (_.SA_REG and S3_MASK) eql (SA_S3 or

2317

then

.IE_VEC)

end;
exitloop;
end;
!
!

STEP 3 WRITE
WRY_RORX (RCSA,

RC_ALL,

!
¢

STEP 4 READ
STEP =~ _STEP
STEP
4 _READ:

0);

PP,

10,000 FOR STEP 3 READ

IF STEP 3 READ IS 0.K.

leave STEP_3_READ;

23%%
2331
2332
2333

11 Bl es 16 v3-55%

Page

SPIDERSUSERS
: ([DOUCETTE .FALCONICNRQAR . BL2 (10

if (.SA_REG and S2 _MASK) eql (SA S2 or WR_RING)

ggig

VAX

STEP 2 READ

then

2292

4
2304
2305
2306
2307
2308
2309
2319
2311
2312
2313

1983 10:35:57

14 Dec 1983 11:35:15

ncr COUNT from 1 to c000 do
begin
DELAY (5);
BREAK;
SA_REG = .RDRX_ADDR [RCSA, RC ALL]J;

2287

2291

!
!

2264
2285

15 Dec

INITIA_IZATION TEST ROUTINES

RINGBASE-HI

= O

NRQas ¢

QD Ax £ XERCISER

LT58 3

]
s

2399

N
s

begin

2358
5;:0
1

2942

' READ SA

2346

ong;

}
f

2348
2549

e tloop;
oend;

c 345
2547

2350

23%1
23%

)

2354

5
P

]

2353

¢
!

ggg‘

2368

ono;

000000

004137

0000006

000004
000010
000014
000016
000020
000024
000030
J00034
000042

162706
013704
006204
006204
012705
012700
010077
012737
012702

000012
001234

0000%
000054

001411
013700

000060

000062

000066
000070
000072
000074

000076
000100
CON104

012701

001404

00%066

005300
001374
005301
000766

104422
01%700
(16066

CIRRS CERGTDPICE
T 0 A T NN
g

tege
Y,

TOYAL

Db A COUNY OF

1G,000 FOR STEP & REAL

IF STEP 4 READ !S 0.,

leove STEP & READ;

CREDI! BAL - 1,

! STARYT WITM A CREDIT BALANCE +« )

return SUCCESS;

SUCCESS EXIT POINY

TRY AGAIN OR GIVE WP

! BURST, LF, GO » O

CREDIT BAL = O,

000046

ond;

2%0
2%
2%2

eql A

WRT_ROAX (RCSA, RC ALL, 0);

’
i
'

Lan L1 Bl we 16 ¢3 5SS

STYEP 4 WMRITE

g;gz

2359

.RORX ADCR [R(SA, R. A, );

‘f (.SA REG eana 54 MASK

thenr

g7 1)

'
'

¥ e

SA REG +

;

o344

Lemt

DELAY (S);

SRE
A ;

‘

‘ncr COUNT from | to JOUU OO

2%%¢

2387

e TedT L -0

m;fl

c”,‘
28959

]

INITIa, 1JATION TEST AOUTIN

* NO CREDIT BALANCE

C Elfl_ffl. {.CCTLR, C_ERR MRD) - .C ERR 8L [.CCTLR, C ERR MRD] . 1;
€ARDF “(13, €GD_13, EMS_13);
¢ INIT SEQUENCE FAILED
return FAJLURE;

000002
11777177
0000006

00000%
000144
000008

! ROUTINE WARD_INIY
LSBYTTL

MHARD, INIT

JSR

R1,8SAVES

HARD
, INIT:

000000G

0000006
000010

18:

28:

3¢

0000006
000002 000006

SUB8
MOV
ASR
ASR
MoV
MOV
MOV
MOV
MOV

MOV

8taQ
MOV

012,5P
CURRENT . VECTOR R4
R4
R4
”2,.RS
o-1,R0
RO, BRORX , ADDR
o1,STEP
0144 ,R2

o5 . RY

Ss
LEDLY,.RO

8EQ

DEC
BNE
DEC
B8R

RO
3
R}
28

CLR

TRAP
MOV
MOV

INITIALIZATION TEST ROUTINES

10(SP)

22
RDRX . ADDR ,RO
2(R0O),6(SP)

PRI

; o, IE.VEC
1 IE.VEC
1 1E.VEC
1 o , ATTEMPTS
: ¢,RC.REG
1 RC.REG,s
3
;s ¢,COUNT

22%8

;

o, $8TMP2

¢,88TMPY

;

SSTMP

$sTMP2

3
s

o,RC.TEG

2240
2249

2253
22%7
22%9

$TMPL

2261

EXERCISER

INITIAL JZATION

S
TEST ROUTINE

)

000234
000240
000246
000260
000264
000270
000272
000274
000276
00030V
000304
000310
000314
000320
000324
000326
000332
000336
000342
000344
000350
000352
000356
000360
000362
000364
000366
000370
000374
000402

016437
016600
042700
020027
001403
005302

001342
000376
010437
032737

013701
013700
010160
005237
012702
012701
001411
013700
001404
005066
003300
001374
005301
000766
104422
013700
016066
016637
016600
042700
020027

001403
005302
001342
000534
015700
016001
013700
010160
003237
010403
052703
012702
012701
001411
013700
001404
003066
005300
001374
005301
000766
104422
013700
016066
C16637

000006
000006
001777
004000

111000

0000000

"UI
MOv

81C
cre
BEQ
DEC

0000006

8IS

6(SP),SA
. RLG
6(SP) RO
@1777,RO
RO, 24000

#3720,R2
o5 ,R1

7¢:

000010

COUNT

226°%
2257

1E.VEC,

2241
2275

+ ,RC.REG

2276

RC.REG,

. ADOR ,RO
RORX
2(R0O),4(SP)

15s:

16¢:
TRAP

2288

COUNT

2292
2284

4(RO),R1

s ,RC.REG

R1,2(RO)
STEP
R4 ,R3
€20000,R3
€3720,R2
®5,R1
178
L$DLY, RO
16¢

RC.REG,
»

,RO
RX
. ADDR
RD

13¢:
144

+ ,RC.REG

R2
7

264
OCt.ADOR,RO

12¢:

000002
0000006

ssTHMP2

2290

124

17¢:

ssTMPL

RC.REG,
»
SA.REG,

4(SP),SA.REG
4(SP),RO
#3400,R0
RO, #10222

000010

$$TMP

8s
22

000004
0000006

2280
2284
2286

s, 88TMP]

10(SP)

11¢:

003720
000005

o, 88TMP?

RO
9
R1

10¢:

0000006

¢ ,COUNT

118
L$DLY RO
104

9
:

[

STEP

8s:

SEQ Qre.)

1 RC.REG,
31 SA.REGL,

0111000,5A.REG
SA.REG,R1

005720
000005

11 Blies 16 v3 553

SPIDERSUSERS
: [ DOUCE T TE .5 ALCONICNRIAL B3 « 30

18
244
R4 ,SA REG

000002

000002
000002

VAX

68
Re

RD
. ADDR,R
RX
O
R1,2(RO)

000002
000004
000004
003400
010222

10:3%:5%7
11:35:15

20011

000120
000124
000130
000134
0001 30
000140
000142
000144
000150
000156
000162
000166
000172
000176
000202
000206
000210
000214
000216
000222
000224
000226
000230

1943
1983

vOl .«

1% Dec
i4 Dec

NRQJAML

IE.VEC,
e

¢ ,COUNT

s, 84THP2

2306
23.6

2319
2312

s, 88TMPY

10(SP)

$$TMP
$STMPY

15¢
Rl

ssTMPR

144
22

O
RX
, ADDR,R
RO
2(R0O),2(SP)
2(SP),SA.REG

2241
2302

¢ ,RC.REG

RC.REG,

2314

D
INITIAL TZATION TEST ROUTINES

000522
000526
000532
000534
000536
000540
000542
000550
000552
000556

000562
000566
000570
000574

000600
000602
000606

000610
000612
000614
000616
000620
000624

;
;

016016

011637

011600
042700

020027
001403
005303
001345

000413
012737
005001
013700
005060
012700
000414
005037

:
188

0000006

000002
0000006
003720

19%:

000005

208

0000006
000010

21s:

23%:

0000006
000002
0000006

013700
006300
105260
0000006
104455
000015
000000G
0000006
005000
062706
000012
000207

8EQ

CLR

0000006

244
25%;

SSTMP2

03777,R0O

RO, #40000
254
R3
19¢

MOV
CLR
MOV
CLR

#1,CREDIT.BAL
R1
RORX
., ADDR RO
2(R0O)

s ,RC.REG

RC.REG,
»
SA.REG,
*

;3 COUNT

26¢

RC.REG

2332
2336
2338

2340
2342

2344
2336
2241
2353
2354

#1,.R0

2241

CREDIT,BAL

2359
2360

B8R

278

MOV
ASL

CCTLR,RO
RO

TRAP

Routine Size:
203 words,
Routine Base:
$CODES
Meximum stack depth per invocetion:
13 worde

s, 88TMP2

;

ce
BEQ
DEC
BNE

RTS

;

s ,COUNT

SSTMP
$STMPL

2(RO),(SP)
(SP),3A.REG

2318
2310

2328

;
:

231¢

2241

10(SP)

(SP),RO

. WORD
.WORD
.MORD
CLR
ADD

;s COUNT

o,88TMP]

MOV

CLR

SA.REG,

;

228

22
RORX
, ADOR,RO

B8R

L$OLY,RO

TRAP
MOV

B8R

INCB

278

#3400,R0
RO,R3
18
R2
13¢
268
RDRX
, ADDR, RO
2(RO)
STEP
#3720,R3Y
05,R1
233

RO
21
Rl

MOV

264

2(5P),RO

DEC
BNE
OEC

81IC

0000006
000002
000001
0000006
0000006

MOV

MOV
MOV

003777
040000

000001

81C
cMP
BEQ
DEC
BNE
BR
MOV
CLR
INC
MOV
MOV
BEQ

001403
005302
001543
000457
013700
005060
005237
012703
012701
001411
013700
001404
005066
005300
001574
005301
000766
104422
013700

MOV

000002
V03400

016600
042700
020008

SFQ Ges

37
VAX 11 Blies 16 v3-555
Qe
SPIDERSUSERS:
([DOUCETTE .FALCONICNRIAR 8L
2 r1(

)

1988 10:3%:57
1983 11:35:15

vOl1.¢

000410
0004 14
000420
000422
000424
000426
000430
000432
0004 36
000442
000446
000452
000456
000460
000464
000466
000472
0004 74
000476
000500
000502
000504
000510
000514
000520

1% Dec
14 Dec

RD Rx EXERCISER

S
NRQJAM

C.ERR.TBL(RO)

15
EGD.13
EMS. 13
RO
012,5P
PC

.« 2126

2361

2282
2222

te
NRQAMS

RD/RX EXERCISER

VOLLC

INITIALIZATION TEST ROUTINES

2364

routine INI RRING : novelue -

3
:
:
.
:

2%7
2368
2369
2370
2371

¢
!
!
!
!

2378

:
3

;

2365
2366

2372

:
3
:

2374
2375
gg;g

H
:
H

2378
2379
2380

gfi

:
:

1% Dec 1983 10:3%:57

14 Dec 1983 11:35:15

CONTROLLER -OWNED .

IMPLICIT INPUTS:
CCTLR - CURRENT CONTROLLER NUMBER
OCY_ADDR - ADDRESS OF CURRENT CONTROLLER'S DCT

!
!
'

begin

locel
index : word,

sggz

RRING_ADDR =

:
H
:
:
;
:

2387
2388
2389
2390
2391
2392

incr COUNT from 1 to RRING_LEN do
begin
index = GET_PKT (,CCTLR);
.RRING_ADDR = _MSCP _PXT [.index, PKT _LO];
RRING_ADDR = .RRING_ADDR « 2;
.RRING_ADDR
= .MSCP_PXT [.index, PKT _HI};

2398

end;

2393
2394
2395

RRING_ADDR;

.DCY_ADDR [RR_BEG);:

! FIRST RESPONSE RING SLOT

¢
!
!
t

2
SEO O¢k

Pege

SPIDERSUSERS: ([DOUCETTE.FALCONICNROAA .BL2 1)

THIS ROUTINE IS RESPONSIBLE FOR ALLOCATING ENOUGH MSCP PACKETS TO
FILL AN RDRX RESPONSE RING. THE BUFFER DESCRIPTOR OF EACH PACKET
(LOCATED IN FRONT OF THE PACKET ITSELF) IS LOADED INTO SUCCESSIVE
RRING SLOTS. NOTE THAT THE BUFFER DESCRIPTORS HAVE BEEN INITIALIZED
WITH THE FLAG AND OWNERSHIP BITS SET (0 “1~, MAKING EACH SLOT

2381
2382

:
:
:

VAX 11 Bl.es-16 v3-555

GET AN MSCP PACKET
LOAD LO-ORDER BUFF DESC INTO SLOT
ADVANCE TO SECOND WORD
LOAD MI-ORDER BUFF DESC INTO SLOT

PXT_USE (. mdo:] = _CCTLR;
' PACKET IN USE
.RRING_ADDR
= . .RRING_ADDR or ED_OWN or ED FLMS; GIVE OWNERSHIP TO CONTRLLER
RRING_ADDR - RRIMS ADDR « 2;
ADVANCE TO NEXT StLO7

013700

0000006
000004
0000006
000004

016004

013703
012702
010346
004737
010001

010116
012746

004737

016024
016014

013703
110361
052724
022626
005302
001352
000207

0000006

18:

000104

0000006

0000006
0000026
0000006

0000006
140000

33 words,
Rout ine Base:
Maximum steck depth per invocestion:
8 words

; Routine Size:

R1,$SAVE4

OCT.ADDR,RO

MOV
MOV
MOV

4(RO) R4

CCTLR,R3

R3, -(SP)

o4 ,R2

MOV
JSR
MOV

PC,GET
. PKT
RO,R1
R1,(SP)
0104, -(SP)
PC,BL SMUL
MSCP.PKT(RO),(R4).
MSCP.PKT+2(R0O),(R4)

MOV

JSR

MOV

MOV
MOV

TEST ROUTINES

000004
000010
000014
000020
000024
000026
000032
000034
000036
000042
000046
000052
000056
000062
000066
000072
000074
000076
000100

INI.RRING INITIALIZATION

LSBTTL

INI
. RRING:
JSR
MOV

SEQ 0Ozfa

VAX 11 Bl.ea 16 v3 555
Pege
39
SPIDERSUSERS: (DOUCETTF FALCONICNRQ
.BL2
AA (1}

CCTLR,R3

¢ ,RRING.ADOR

000000G

10:35:57
11:35:15

004137

1983
198%

@s we

INITIALIZATION TEST ROUTINES

000000

15 Dec
14 Dec

RD/RX EXERCISER

NRQAM3
vol1.¢

{

X
s , INDE
INDEX,
s
* ,RRING
. ADDR

& ,RRING
. ADDOR

8IS
(o,
DEC

R3,PK
. USE(RL)
T
2140000,(R).
4

s,¢(INDEX)

COUNT

RTS

MOVB

(SP)+,(SP).

BNE

$CODES

2754

s ,RRING
. ADOR

2364
2385
2389
2387
2389

2390

2392
2393
2394
2388
2387

2364

RD/RX EXERCISER
INTTIAC IZATION TEST ROUTINES

2407
2408
2409
2410
2411
2412

2413

2414
2415

IS CALLED BY

IMPLICIT

THE RDRX HAS BEEN HARD

begin
'

!¢

MISCELLANEOUS INITIALIZATON

QIO {.CCTLR) = 0;

2418

incr COUNT from O to (RP_CNT

S:Sé

I00Q_IN = IODQ_OUT = O;

g:;g

AFTER

INPUTS:
CURRENT CONTROLLER NUMBER
CCTLR

g:lg
1

CTLR (INIT

INITIALIZED. ITS PURPOSE IS TO FORMAT AND SEND THE "SET CONTROLLER
CHARACTERISTICS COMMAND, ANC TO VALIDATE THE RESPONSE (END MESSAGE
),

RP_USE

[.COUNT)

1) do

-1;

INITIALIZE NO. OF OUTSTANDING QIOQS

INITIALIZE RETURN PACKET POOL

INITIALIZE 1/0 OONE QUEUE POINTERS

XL XL XL XYY

2406

S RY Y XL XL XYY

2405

THIS ROUTINE

GET AN MSCP PACKETY
PACKET SIZE
OPCODE = SET CTLR CHAR

ATTEMPT SEND

G
@0
V¢
B
Ge
Be

P_INDEX = GET _PKT (.CCTLR);
MSCP_PKTY [ .P_INDEX, MSGLEN]
MSCP_PKT [ .P_INDEX, OPCODE]

g:g;

MSCP_PKT

2426

= SZ_SCC;
= OP_SCC;

MSCP_PKT (. P _INDEX, C_FLAGS] = CF_MASK;
[ .P_INDEX,

CMD_TYPE]

IMM_CMD;

CONTROLLER FLAGS

IMMEDIATE COMMAND

2429

2430

2431
2432

if SEND (.P_INDEX) eql FAILURE

then

in
C_ERR_TBL (.CCTLR, C_ERR_HRD]

24133

ERRDF (20, EGD_20, 0);

2435

DROP_CTLR (-CCTLR, DU_CFATAL);

2434

2436
2437

return FAILURE;

¢ FATAL ERROR

! RETURN PACKETY TO POOL

! DROP CONTROLLER

end

elee
begin

2441
2442
2443
2444

g::g

IF SEND WAS UNSUCCESSFUL
.C_ERR YBL {.CCTLR, C_ERR HRD] « 1;

PUT _PKT (.P_INDEX);

2438
243%9

2440

' IF SEND WAS SUCCESSFWL

in
WAIT ();
RP_INDX = QUT_100Q (),

! WAIT FOR RETPKT RESPONSE
! GET INDEX OF RETPKT

t RETURN ALL RETPKTS NOT SENT BY CONTROLLER

RP_ADDR = RETPKY

(.RP_INDX « RP LEN « 2);

CALCULATE RETPKT ADDRESS

g::;

S+

B¢

2423
2424
2425

2449
2450
2451
2452

2453

2454

.RP_ADDR (MESTYP) meq MT _SEQ

then

PUT _RETPKT (.RP_INOX);

end
il C. RP ADDR {CONID]) eql CID_DRIVER) or

ADDR [(MESTYP] eal M7 _SEQ) and

(( RP ADDR [ENDCOO) end OP _END) eql OP_END));

SEQ v
"

VAX 11 Bliws 16 v3-555
Page
SPIDERSUSERS:[DOUCETTE .FALCONICNRIAK HI .

routine SET_CTLR CHAR =

2399

2400
2401
2402
2403
2404

15 Dec 1983 10:35:57
i4 Dec 1983 11:35:15

@
®

NRQAM &
VOl

4.,
(1,

INITIALIZATION TEST ROUTINES

2435

24%6

2457
2458
2439
2460
2461
2462
2463
2464
2465
2466
2467
2468
2469
2470
2471
2472
2473
2474
2475
2476
2477
2478
2479

.RP ADDR [CONID] eaql CID DRIVER

then

PRINTF (DBM23);
PUT_RETPKT (.RP

DR_ERR ();

else

2484

ERRDF (21, EGD_21,
DROP_CTLR (.CCTLR,

else

“ERROR IN SET CTLR _CHAR"
RELEASE RETURN PACKET

ELSE

C_ERR_HRD)

EMS_21);
DU_CFATAL);

PUT _RETPKT (.RP_INDX);
return FAILURE;
end

CMD_TIME -

RETPKT

tJSD REV

PRINTF (DBM2S,

!
!

IF WRONG ENDCODE
OR FLAGS IN ERROR

C ERR_MRD]

! FATAL ERROR
! DROP CONTROLLER
! RELEASE RETURN PACKET

RETPKT HAS CORRECT ENDCOOE

SWF _TRC

.RP_ADDR (C_TIME]);

*JSD REV A
'JSDO REV A
'JSD REV A

RETPKT HAS CORRECT ENDCODE

end;

IF RETPKT WAS SENT BY DISK MSCP

PUT _RETPKT (.RP_INDX),;
return SUCCESS;

2490

“DRIVER'

IS FROM DISK MSCP

.C_ERR TBL [.CCTLR,

.RP_ADDR [C_TIME) « 2;

if (.SWP_FLAGS and SWF _TRC) eql
then

]

2489

IF SEND WAS SUCCESSFUL

end;

! ROUTINE SET-CTLR_CHAR

end;

,SBTTL

010146

010146
004737
010037

C ERR_TBL [.CCTLR,

2487
2488

013701
105061
005000
112760
005200
020027
00377}
005037
005037

!
¢

if (.RP_ADDR [ENDCOD) neq (OP SCC or OP END)) or
((.RP_ADDR [C_FLGS] end CF MASK) neq CF_MASK)

2485
2486

2491
2492
2493

IF RETPKT

begin

then

IS FROM

VAX 11 Bliss 16 v3 S55
aQe
41
SPIDERSUSERS:
[DOUCETTE .FALCONICNROAA 8l 2 1,

! DROP CONTROLLER

return FAILURE;
ond

2480

2481
2482
2483

INDX);

SEQ Ocsl

1983 10:35%:57
1983 11:35:15

B
Se
G0
G
Ve
B
G
Gv
Gv
Vs
G0
Ge
Vs
G+
BT
Gs
s
Be
S
G2
Ve
G4
Ge
B
Gv
B
Be
Bs
BY
Bt
Ge
e
Bs
Wi
G5
B
B+
@5
Be

15 Dec
14 Dec

RD/RX EXERCISER

NRQAM R
vOol.¢

0000006
0000006
000377
000003

0000006
00V0006
0000006
0000006

0000006

SET.CTLR.CHAR:
MOV
MOV
CLR8
CLR
1¢:
?3:8

SET.CTLR.CHAR INITIALIZATION TESY
CCTLR,R1
QIO(R1)

RO
#377
,RP . USE(RO)

cHp
BLE
CLR

CLR
MOV
JSR
MOV

ROUTINES

2399
2416
COUNT

»,4(COUNT)

COUNT
COUNT
,»

2418
2419
2418
2421

PC.GET.PKT

RO,P., TNOEX

2423

Tt
'

RD ‘Rx

INTTIA_IZATION

010016
012746
004737
012760
112760
012760
005060
013716
004737
005700
001026
013700
006300

TEST

ROUTINES

100330

006000
103010
013716
004737
004737
022626
000456

JSR

PC,BLSMUL

MOvVE

0000226
0000306

MOV

CLR
MOV
JSR
TST
BNE
ASL

000002

3:
000003

000002

a8
:

1S7B

2t
CCTLR,RO

8PL
ROR

8CC

MOV

JSR
JSR
cHe
BR

V3-555

2424

2425
2426

2427

2429

PC,SEND
RO

;

2432

55
24
gGD.?O

2433

P.INDEX,(SP)
. PKT
PC,PUT

2434

2435

(SP).

;
:

2431
2410

PC,WAIT
PC,0UT.I00Q

2443

; RP_INDX,
s

2445

;360.2(90)

2447

R INDX,(SP)

24849

(SP).

;

PC,OROP.CTLR

cMPB
BNE
INC
8R
gIte
BNE

P.INDEX,

04 MSCP .PKT+22(R0O)

JSR
157
CLR
BR
JSR
JSR
MOV
MOV
MOV
JSR

CLR

Bliss

#120,MSCP.PKT+30(R0O)
MSCP .PKT+4(RO)
P . INDEX, (SP)

CCTLR,(SP)

MOV
8178
8EQ
MOV
JSR
TS7
MOV

7
SEQ Oce
Page
42
SPIDERSUSERS:
(DOUCE ' TE . FALCONICNRQAA .BL2 (1¢

VAX-11

040 ,MSCP .PKT+6(R0O)

MOV

ADD

1983 10:35:57
1983 11:35:15

(SP)

C.ERR.TBL(RO)

MOV

2s:

€104,

INCB
TRAP
. WORD
WORD
. WORD
MOV

JSR

004737
004737

001404
013716
004737
005726
013701
005000
126127
001002
005200
000407
132761
001333
1057¢1

RO,(SP)

MOV

005000
000536

132760

MU,

MOv

105260
104455
000024
0000006
000000
013716
004737
013716
012746
004737
00572¢

010037
010016
012746
004737
062700
010037

15 Dec
14 Dec

EXERCICSER

RO
94

RO,RP. INOX
RO, (SP)

PC,BLSMUL
RO
MRETPKT
RO,RP
. ADDR
$

PC,PUT

RETPKT

RP . ADOR ,R1
RO
3(R1),03

2444

2442

2452

2453

2454

2456

2460

2461

2458

5¢

0360,2(R1)
24

14(R1)

24
RO
64
RP . INDX,(SF)
. RETPKY
PC,PUT
PC,OR.ERR

(SP)+,(SP).
10

2456

JY
NRQAM?
vol.C

000374
000376
000402
000404
000410
000412
000414
000416
000420
000424
0004 30
0004 34
000440
000444
000450
000452
000460
000464
0004 70
0004 74
000500
000502
000504
000506
000510

;
;

EXERCISER

000014

000204

15 Dec
14 Dec

INTTIALIZATION TEST ROUTINES

)

000350
000356
000360
000364
000370

RD/RXx

126127
001007
016100
042700
020027
001426
013700
006300
105260
104455
000025
000000G
0000006
013716
012746
004737
013716
004737
062706
000415
016137
006337
01371¢€
004737
012700
022626

000401
005000
012601
000207

Rout ne Size:
Maximum steck

6%:

0000006

%4(R1).0204

CHFB
BNE

22(R1),R0

MOV

000022
177657
000120

7%:

0000006

0177657 ,R0O
RO, 0120
8s
CCTLR,RO
RO

8IC
cre
BEQG
MOV
ASL

INCB

C.ERR.TBL(RO)

. WORD
. WORD
. WORD
MOV
MOV
JSR
MOV
JSR

CCTLR,(SP)
06, (SP)

TRAP

55
25
€G0.21
EMS.21

PC,OROP.CTLR
RP . INDX, (SP)
PC.PUT RETPKT

#6.5P

ADD

9s:
10$:

11¢:

Rout ine Base:
165 words,
S words
depth per invocation:

BR
MOV
ASL
MOV
JSR
MOV
cHp
BR
CLR
MOV

Blies

V3 555

SEQ 0ct.8
Pege
4%

SPIDERSUSERS
: (DOUCE TTE .F ALCONJCNRGAA 8Lz ¢ 12
H

2467

2468

2471

2472

2473

;

2474

2467

2479

RP . INDX, (SP)

2489

(SP)+,(SP).
114

:
H
:
:

2410
2399
2410
2399

PC,PUT
. RETPKT
€1,RO

(SP).,R1

VAX

104
24(R1),CMD.
TIME

CMD.TIME

RTS

$COOES

1983 10:35:57
1983 11:35:15

3056

2470

1f
RD/RX EXERCISER

15 Dec

®r

®L

®s

INITIALIZATION TEST ROUTINES

2494
2495
2496
2497
2498
2499
2500

routine UNIT_INIT

10:35:57

VAX

14 Dec 1983 11:35:15

!1 Blies

16 v3-555

novelue =

THIS ROUTINE IS CALLED FROM DRIVER_INIT FOR EACH CONFIGURED UNIT

IMPLICIT INPUTS:
CURRENT CONTROLLER NUMBER
CCTLR

CDISK

LSLUN

CST ADDR

CURRENT DISK ADDRESS (RD/RX DISK NUMBER)
CURRENT

(DRS) UNIT NUMBER

ADDRESS OF CURRENT CONTROLLER'S CST

begin

P_INDEX = GET_PKT (.CCTLR);
MSCP_PKT [ .P_INDEX, MSGLEN) = SZ_ONL;
MSCP_PKT [.P_INDEX, OK_NUM) = _CDISK;
MSCP_PKT [.P_INDEX, OPCODE] = OP_ONL;
MSCP_PKT [ .P INDEX. OOPAR] = BITOO;
MSCP_PKT [.P_INDEX, CMD_TYPE] = SEQ_CMD;

[]

GET AN MSCP PACKET
PACKETY SIZE
SET DISK ADDRESS (RD/RX DISK NUMBER)
OPCODE FOR “"ONLINE*
SHOM ALL ECC ERRORS IN ERROR LOG MESSAGES
SEQUENTIAL COMMAND

if SEND (.P_INDEX) eql FAILURE

ATTEMPY

then

(ERR_HRD_MST])

_T_ADDR (ERR_MRD_HST])

TO SEND;

IF CTLR IS OFFLINE

CST_ADOR [.CUOFF, D_FATAL] = TRUE;

¢ FATAL ERROR

DUR [.LSLUN) = DU_ONLINE;
000U (.LSLUN);

! SETUP REASON TO DROP UNIT
¢t DROP UNIT

ERRDF (22,
PUT_PKT

else

'
!
!

EGD_22,

0),;

(.P_INDEX);

RETURN PACKET

T0 POOL

end

begin

! OTHERWISE (SEND WAS SUCCESSFWL)

“

I3in

AIT (),
' WAIT FOR RETPKY RESPONSE
RP_INDX = OUT_I00Q ();
' GET INDEX OF RETPKT
RP_ADDR = RETPKT + (.RP_INDX & RP_LEN » 2); ! CALCULATE RETPKT ADDRESS
if

.RP_ADDR [MESTYP) neq MT_SEQG

then

PUT_RETPKT

RETURN ALL RETPKTS NOT SENT BY CONTROLLER

(.RP_INDX);

end

until (. RP _ADDOR (CONID) eql CID_DRIVER) or

(C.RP ADDR (MESTYP] eql MT_SEQ) and

(C.RP ADDR (ENDCOD] end OP _END) oql OP_END));

.RP_ADDR {CONID)

then

begin

PRINTF (DBM26);

eql CID_DRIVER

IS FROM

SEQ 069
Page
44

SPIDERSUSERS:[DOUCETTE.FALCONICNRQAA.BL
2 (13

(DISK) WHICH IS ATTACHED TO A CONTROLLER THAT SURVIVED
INITIALIZATION. ITS PURPOSE IS TO FORMAT AND SEND AN "ONLINE“
MESSAGE, AND TO VERIFY THE RESPONSE.

2501
2502
2503
2504
2505
2506
2507
2508
2509
2510
2511
2512
2513
2514
2515
2516
2517
2518
2519
2520
2521
2322
2523
2524
2%25
2526
2527
23528
2529
2530
2531
2532
2533
2534
2535
2536
2337
2538
2539
2540
2541
2542
2543
2544
2545
2546
2547

2548
2549

1983

IF RETPKT

“DRIVER'

"ERROR IN UNIT_INIT”

'JUSD REV A

L%
INITIALIZATION TEST ROUTINES

v01.C

else

+f .RP_ADDR [ENDCOD] neq (OP ONL or OP_END)
then
]

B0
W
@
@
G4
G0
Gr
Be
G2

[ERR_HRD _DRV]

.T_ADDR

CSTY_ADDR (. CUOFF, D FATAL]

11 Bliss-16

V3 555

IF RETPKT

2562
2563
2564
2565

else

IS FROM DISK MSCP

FATAL ERROR
SETUP REASON TO DROP UNIT
DROP UNIT

begin

RETPKT HAS GOOD ENDCODE
GET STATUS CODE
GET SuB-COOE

IF STATUS CODE IS NOT SUCCESSFUL

EMS_21);

end

.RP_ADDR [STSCOD]}:
.RP_ADDR [SUBCOD];

.ST_CODE neq ST_SUC

then

]

{ERR_HRD_DRV)

.T_ADDR (ERR_HRD DRV)

CST_ADOR {.CUOFF, D_FATAL]

ERROF (15, EGD_15,

EMS_30);

Ount [.LSLUN] = DU_ONLINE;

DOOU (.LSLUN);
end
else

2575
2576
2577
2578
2579

!
!
'

ST_CODE =
SB_CODE =

2567
2568
2569
2570
2571
2572
2573
2574

[ERR_HRD_DRV)

- TRUE.

if ((.RP_ADOR

!
't
!

TRUE;

¢« 1;

ONLINE FAILED
SET UP REASON FOR DROPPING UNIT
DROP UNIT

(U_FLGS] and UF _WPH) eql UF_WPH) and

(.CST_ADOR [.CUOFF, D_PROT] eql MOTECTED)

2581
2582
2583
2584
2585

STATUS CODE IS 0.K.

z D_DRV)= ADDR [ERR_HRD_DRV] .« 1;
f%auRR_HR
t’
CST_ADOR [. Euorr D_um.i = TRUE;
-

then

ERRDF (16,EGD_16, EMS_30);
DUR [.LSLUN] = DU_PROTECT;
DODU (.LSLUN);

o587
2588
2589
2590
2591
2592
2593
2594
2595
2596
2597
2598
2599
2600
2601

end;

004137

0000006

else

end

begin

MAX_LBN [.LSLUN] »
CST_ADOR [ .CUOFF,

CST [.CCTLR, U cnn =«

end;

end;
PUT_RETPKTY

end;

! WRITE-PROTECT CONFLICT
* SET REASON TO DROP UNIT
! DROP UNIT

ap ADDR {USIZ_LO)
TA.]= ONLINE;

* WRITE PROTECT SWITCH IS O.K.
! LARGEST LBN

,CST [.CCTLR, U_CNT]) + 1;

' IF RETPKT MAS CORRECT ENDCODE

( .RP_INDX);

t IF SEND WAS SUCCESSFUL
! ROUTINE UNIT_INIT
.SBYTL

UNIT.INIT:

SEQ 0-7C
P

SPIDERSUSERS: [DOUCETTE . F ALCON JCNRQAA ;85 .3

DUR [. LOLW] = DU_ONLINE;
DODVU (.LSLUN);

ERRDF (23, €GD_ 23

2359
2560
2561

G
B
B
G
Ve
B
W
@
WF
We
s
G0
B
B

VAX

[Xs!

2557
2558

B
B
Y
WL
B8
Br

10:35:57
11:35:15

end

B¢
BF
Be
B2
Be
Bt
@0
@8
@1
Bs
@
4t
@5
we
®e

000000

1983
1983

DROP CONTROLLER

DR_ERR ();

2550
2551
2352
2553
2554
2555

)

15 Dec
14 Dec

RD/RXx EXERCISER

NRQAM
3

UNIT.INIT INITIALIZATION TEST ROUTINES

I./‘[ ,

RD/RX

NRQAM?

INITIALTIZATION TEST ROUTINES

vo1.C

000010

000014
000020
000022
000026
000032
000040
000046

000054
000062
000070
000074
000100
000102
000104
000110
000114
000120
000122
000126
000132
000134
000136
000140
000142
000146
000154
000156
000162
000166
000172
000176
000202
000206
000210
000214
000220
000224
000230
000236
000240
000244
000250

000256
000270
000272
000274
000302
000304
000310
000312

15 Dec
14 Dec

EXERCISER

013746
004737
010037
010016
012746
004737
01276C
013760

112760
012760
012760
0135716
004737
005700
001033
013700
105260
013700
006300
063700
052710

JHR

MOV

JSR

MOV
MOV
MOV

000407

132761
001333
105761
100330
006000

MOV
MOV
MOV

JSR
TST

BNE

MOV

INCB

MOV
ASL
ADD

104455
000026
0000006
000000
013700
112760
104451
013716
004737
000137
004737
000000G
004737
010037
010016
012746
004737
062700
010037

132760
001404
013716
004737
005726
013701
003000
126127
001002
005200

JSR

MOV
MOV
MOvVB

0000066
000000G 0000166
0000226
0000466

8IS

TRAP

. WORD
. WORD
. WORD

MOV

MOVB
TRAP
MOV

JSR

1s:

MOV
MOV

JSR

RDD
MOV

000002

28:

000003

000360

JSR
JSR
MOV

000003

000002

34:

000014
44
:

BITB
8EQ
MOV
JSR
TST
MOV
CLR
cmPB8
BNE
INC
BR
BIT8
BNE
7518
B8PL
ROR

1983
1983

10:3%5:57
11:35:15

R1,$SAVE3

CCTLR, -(SP)
PC.GET.PKT
RO ,P. INDEX

VAX-11 Bliss-16

i
i

P.INDEX, s

PC.BLSMUL
044 MSCP.PKT+6(RO)

CDISK,MSCP.PKT+16(RO)
01 ,MSCP.PKT +46(R0O)
&1.MSCP.PKT+4(RG)

CST.ADDR,RO
410000, (RO)
55
26
560.22

LSLUN,RO
€7,0UR(RO)
S1
P.INDEX,(SP)
PC.PUT PKT
10¢
PC,WALIT
PC,0UT.I00Q
RO, RP, INDX
RO,(SP)
PC.BLSMUL
MRETPKT
RO
RO ,RP
. ADDR
5360.2(R0)
RP . INDX,(SP)
PC,PUT RETPKT

(SP).

RP.ADDR,R1
RO

2512

2513
2514
2515
2516
2518

011 ,MSCP . PKT+22(RO)

Pege

2494
2511

2104, -(SP)

637RO)
CUOFF ,RO

SEQ 0771

SPIDERS$USERS: (DOUCETTE ,FALCONJCNRQAR. BL2 (13

RO, (SP)

P.INDEX,(SP)
PC ., SEND
RO
1
T.ADDR.RO

v3-555

2521

2522

2523

€24

2525

2533

2526

2518

2534

: RP._INDX,s

2535

2537

2539

:
H

2532
2542

2543

2546

3(R1),03
3

RO
4t
©360,2(R1)
1s

14(R1)

1
RO

N©
3
NRQAM
vol.¢

000314
000316
000322
000324
000330

000332
000336
000342
000350
000352
000356
000362
000366
000370
000372
000374
000376
000404
000406

000410
000412

000432

15 Dec
14 -Dec

RD/RX EXERCISER

INITIALIZATION TEST ROUTINES

103003
004737
000554
013703
006303
063703
013702

126127
001420

013700

1035260
052713
104455

000000V

5%:

0000006
0000006
0000006
000211
000014

MOV
INCB
8IS
TRAP
.WORD

0000006
000062
010000

000016

177740

000016

. WORD
. WORD

MOve
MOV
TRAP

0000006
0000006

6$:

006200

105260
052713
104455

000020
0000006

000062
010000

MOVB

8IC
MOV

ASR
ASR
8IC
MOV
TST
B8EQ
MOV
INCB
8IS

006200
042700
010037
005737
001420

013700

ASR
ASR
ASR

006200

013700
105260
0352713
104455
000017
0000006
0000006
112762
010200
104451
000455
032761
020000
001427
013700
006300
063700
005710
100020

MOV
ASL
ADD
MOV

cHPB
BEQ

000027
0000006
0000006
000007
112762
010200

104451
000521
116137
042737
016100
006200
006200

8cc
JSR
B8R

TRAP

000022

7%:

. WORD
. WORD
. WORD
MOVB
MOV
TRAP
B8R
8IT
BEQ
MOV
ASL

S
PC,DR.ERR
9s

CUOFF ,R3

CST.ADDR,R3
LSLUN,R2

14(R1), 4211

6%
T.ADOR,RO

62(RO)

€10000,(R3)
55

2950
2546
2558

2560

2554

2557

2558

H
H

2560
2561

16(R1),ST.CODE

H
:

2554
2565

16(R1),R0O

2566

;

2568

;

2571

:
;

2572
2573

H
:

2574
2575

2568

;

2580C

T.ADDR,RO

2583

#10000,(R3)

H
:

2584
2585

R2.RO

#177740,S7.CODE

€174000,R0
RO, S8.CODE

ST.COLE

78
T.ADDR,RO

62(RO)
#10000,(R3)
S5
17

EGD. 15
EMS. 30
27 ,0UR(R2)
R2.R0
S1
94

320000.22(R‘)
$

CUOFF ,RO

INCB
8IS

62(R0O)

. WORD
. JORD

H
:
:

2559

27
€EGD.23
EMS.21
¢7,DUR(R2)

CSYT.ADDR,RO
(RO)
8s

TRAP

SEQ 072
VAX 11 Bl 'ss 16 V3 555
Page
47
SPIDERS$USERS
: {DOUCETTE .FALCONICNRQAA .BL2 (13

ADD
157
BPL
MOV

19383 10:35:57
1983 11:35:15

55
20
EGD. 16

;

2579

*
L0
M

> A EXERCISER
INTTIA (287100 "¢~"

L
NPRgAr

PLS

JO00s ’
0004 '8

OO0,

000804

000600
000010
000012
000014
000622

0006 2¢.
0006
39
000¢ S¢
1e0 .~ P
000046
000652
0006 %4
0000660

000nH4

000666

RO ing

000000(

. WU,

tns
. %0

010200

Q2 R0

000422
010220
006 300
016160

on
0V

9
Rz, R0

112762

TRAP

104453

0045560

0%271%
015716
012746
004787
109260
00% 726
013716
0047587
022626
000207

Rout 'me S5 2e:

Mar

24 Oec
«6 Dac

mum gtect

L1y

)

"oV

000000C
0000000

220 worode,

depth per

MAX LON(RO )

"0V
"“0ov
JSR
InC8

CCILR,(SP)
56, (P
PC.BLSMA
CST.S(RO)

0V
JSR

RP , INDX,(SP?
PC.PUT RETOXY

1SY

94
:

108
:

cw
/1S

sCODES
Rout ine Bewe:
8 worde
Aavocetion.

vaz

11 Bl:ee 16

Y ¥

“$Q .

'lell'M.S:(M"! $ALCINICNRR
. ‘.h...

a»
ML

<58¢
%8

£ 344
220

A44(R1
) MAX _(BN(RO

OEC

81s

020000
0000006
0000%6
000000G
00000%G

1948 10:8%:%7
1'% 11:%5:1%

020000,(RS)

2392
2998

(SP).

239%0
3%

(SP)e ,(SP5PC

2309
249%4

3570

R0 Rx EXERCISER

L
NRYRATMM

1% Dec

INITIACIZATION TEST ROUTIM
-

1983 10:8%:57

VAX

i4 Dec 1983 11:35:1%

1l Bl es 16 v3 %95

i BV

1 age

SPIDERSUSERS: (DOUCETTE . # AL COUNICNR
jhoe b0,

4
.

THIS ROUTINE 1S DESIGNED TO PROCESS RETURN PACKETS THAT ORIGINATE AT
1€ “DRIVER~ RATHER THAN TME DEVICE. ORIVER ORIGINATED PACKETS INDICATE

EITHER A FATAL DEVICE ERROR OR A COMMAND TIMEOUT. SINCE THIS ROUTINE IS
OMLY CALLED DURING THE INITIALIZATION TEST, IT TREATS A COMMAND TIMEQUT
AS AN INITIALIZATION ERROR.

IMPLICIT INPUTS:
RP ADDR

ADDRESS OF A RETPKT THAT ORIGINATED AT
(I.F., CONNECTION ID = CID DRIVER)

THE

“DRIVER"

[T R R RT W

R RY XL RY R

XY
Y

routine DR_ERR : novelue *

begin

word

ASSUME

initial (DU_TIME);

COMMAND

TIMEOUT

then

.RP_ADDR [(MESTYP) eql MT_FATAL

IF FATAL DEVICE ERROR

REASON = DU_DFATAL;

CHANGE REASON TO FATAL ERROR

locel
REASON

OROP _CTLR (.CCTLR.

end;

000000
000002

000006
000012
000016
000022

000026
000030
000034
000040
000042
000046
000050
0000352

;
;

010146
012701

013700
116000
042700
020027
001002
012701
013746
010146
004737
022626
012601
000207

Rout
. ne Size:
Maximum gstack

000012

0000006
000002

.REASON);

177417

0000006

.SBTTL

DOR.ERR INITIALIZATION TEST ROUTINES

MOV
MOV8

RP . ADDR ,RO
2(R0O),RO

crp

RO, #60

MOV
MOV

DR.ERR: MOV
MOV

Ri,-(SP)
212,R1

8IC

000060

000005
0000006

! DROP ALL UNITS ON CONTROLLER

2602
2016
2621

CCTLR, -(5P)

; ¢ ,REASON
:

2623
2625

(SP)+ ,(SP).
(SP). ,R1

i
:

2616
2602

®177417,R0

BNE

14:

:
: ¢ REASON

*5,R1

MOV
JSR

R1,-(SP)
PC,OROP
. CTLR

RTS

cHp
MOV

22 words,
Routine Base:
$CODCS
depth per invocetion:
4 words

4460

s+ REASON,s

{)
NRQAMS

RO ‘RXx EXERCISER

vO01.¢

INITIALIZATION TEST ROUTINES

)

i
:
3

2627

2628
2629

H
H
s
H

2630
2631
2632
2638

2635

2634

2636

2638

2641

:
:
:

2644
2645
22:9'

:
:

2648
2649

:
H
F
:

2637

2639
2640
2642
2643

ggo

H
H
:
:

2652
2653
2654
2655

;

2657

;

;
:
:
:
;

:
:

2656

2669

2672
2673
g;g

g;g

;
:

2678
2679

2680
2681
2682

16 v3

SEQ .

555

Page

LPIDERS
JSERS: {DOUCE TTE . F AL COMICNRGAR 8 o

routine ACCESS : novelue !

!
!
!
!

THIS ROUTINE 1S CALLED BY INIT_TEST TO VERIFY THAT THE CURRENT DISK
CAN BE ACCESSED. THIS OBJECTIVE IS ACCOMPLISHED BY FORMATTING ANDO
SENDING ONE OR TWO MSCP ACCESS COMMANDS TO THE DISK, AND CHECKING
THE STATUS FIELD OF THE RESPONSE MESSAGE(S).

IMPLICIT INPUTS:

CCTLR

CDISK

CURRENT CONTROLLER NUMBER

CURRENT DISK ADDRESS (RD/RX DISK NUMBER)

LSLUN - CURRENT (DRS) UNIT NUMBER

begin
locel

RESWLTY : word initial (FAILURE),
LBN : word,
PASS : word initial (1);

ST_COOE = SB_CODE = 0,
LBN = (((.MAX_LBN [.LSLUN]
do

+ 1) *

in
P_INDEX = GEV_PKT (.CCTLR);
MSCP_PKT ([ .P_INDEX, OX_NUM]) =

t GUILTY UNTIL PROVEN INNOCENT

! LOOP PASS COUNT

! STATUS CODE AND SUB CODE
1) end S0'77777') - 1;

¢ START WITH LAST LBN ON TOP SURPFACE: [(Xx.1)72)

,COISK;

MSCP_PXT [.P_INDEX, OPCODE) = OP_ACC;
MSCP_PXT [.P_INDEX, BC_LO) = 512;

t LOOP STARTS MERE
! GET AN MSCP PACKE?T
¢ SET DISK ADDR (RD/RX DISK NUMBER)

! ACCESS OPCODE

' BYTE COUNT (1 BLOCK)

if SEND (.P_INDEX) eql FAILURE
then
in

26170
2671

:
:

11 Bl

2661
2662
2663

:
H

14 Dec 198% 11:35:15

VAX

MSCP _PKT (.P_INDEX, LON_L]) = .LBN;
' LOGICAL BLOCK NUMBER
MSCP_PKT (.P_INDEX, CMD_TYYPE) = NON_SEQ_CMD;
! NON-SEQUENTIAL COMMAND

:
:

;
5
:

1988% 10:3%:57

2658
2659

2664
2665
2666
2667
2668

1% Dec

PUT _PKT (.P_INDEX);
PASS = 2;
end
else
begin
do

! ATTEMPT TO SEND;

IF CTLR MOT ONLINE

* RETURN PACKETY TO POOL
!t NO MORE TRIES
t IF SEND WAS SUCCESSFWL

WAIT (),
! WAIT FOR RESPONSE
RP_INDX = OUT_I00Q (),
1 GET RETPKT (RESPONSE) INDEX
RP_ADDR = RETPKY ¢« (.RP_INDX ¢ RP_LEN s 2);
t CALCULATE RETPKT ADDRESS
i? .RP_ADOR [MESTYP) neq MT_SEQ ! RETURN ALL RETPKTS NOT SENY 8Y CONTROLLER

then

PUT _RETPKT

(.RP_INDX);

end
until (.RP_ADDR (CONID] eaql CID_DRIVER) or
(C.RP_ADUR [MESTYP) eaql MT_SEQ) end

RD/Rx EXERCISER
INITIAL IZATION TEST ROUTINES

®e

8¢

B¢

®e

NRQAMS
vO1.C

000012
000016
000022
000026

2683
2684
2685
2686
2687
2688
2689
2690
2691
2692

2693

2694
2695
2696
2697
2698
2699
2700
2701
2702
2703
2704
<705
2706
2707
2708
2709
2710
2711
2712
2713
2714
2715
2716
2717
2718
2719
2720
2721
2722
2723
2724
2725
2726
2727
2728

004137
005003
012702
005037
005037
013700
006300

15 Dec
14 Dec

(C.RP ADDR {ENDCOD)
if

.RP

ten

ADDR

PASS

(CONID]

eal

1983
1983

10:35:57
11:35:15

VAX 11 Blies 16 v3 S55
SPIDERS$USERS:
{DOUCETTE ,FALCONICNROAR Bl

]

¢ 1

and OP END) eql OP_END));

CID DRIVER

RETPKY

NO MORE

CAME

FROM

"DRIVER"

TRIES

else

.RP_ADDR

[ENDCOD)

neq

(0P

ACC or

OP END)

then

“n

PRINTF (D8BM29);
EMSCMD ()

else

'RETPKT

HAS BAD ENDCOOE-

150 REV

end

begin
ST CODE =
S8 _CODE =
if

! RETPKT HAS CORRECT ENDCODE
.RP_ADDR [STSCOD]);*! GET STATUS CODE FROM PACKET
.RP_ADDR [SUBCOD);:! GET SUB-CODE FROM PACKET

.ST_CODE eql

ST_SWC

STATUS CODE

INDICATES SUCCESS

NO NEED

IF RETPKT HAS CORRECT ENDCODE

IF SEND WAS SUCCESSFUL

then

RESWLT = SUCCESS;
PASS = 2;

TO TRY

AGAIN

end;

end;
PUT_RETPKY (.RP_INDX);

end;

LBN =
PASS

end

until
if

.LBN .« 1,
.PASS

! ADVANCE T0O FIRSY LBN OF BOTTOM SURFACE

SECOND PASS

! END OF PASS LOOP

.PASS geau 3;

.RESULT eal FAILURE

then

'r’f’noa (ERR_MRD DRV] = .T_ADOR [ERR_HRD_DRV] + 1;
"n

CST_ADOR [ .CUOFF, D_FATALY = TRUE;

¢t FATAL ERROR

end;

t IF ACCESS FAILED

ERRDF (17, EGD_17. EMS_30);
DUR [.LSLUN] = DU_ACCESS;
DODU (.LSLUN);

end;

* ACCESS FAILED
t SET REASON TO DROP UNIT
¢ DROP UNIT

t ROUTINE ACCESS
.SBTTL

ACCESS INITIALIZATION TEST ROUTINES

0000006

ACCESS: JSR

R1, $SAVES

000001
0000006
000000G
0000206

MOV
CLR
CLR
MOV

e1,R2
$8.CO0E
ST.CODE
L $LUN,RO

CLR

ASL

: RESWLT

; «,PASS
:
:

2627
2641
2648

2649

i
15 Dec
14 Dec

RD/Rx EXERCISER

INITIALIZATION TEST ROUTINES

000212
000216
000222
000230
000232
000236
000242
000244
000250
000252
000260
000262
000264

000266
000274
000276
000302
000304
000306
000310
000316
000320
000324
000326
000334

004737
062700
010037
132760
0C1404
013716
004737
005726
013701
005000
126127
001002
005200
000407
132761
001333

105761
100330

3¢

000003

000360

000002

126127
001403
004737
0004 30
116137
nNa2137

S¢:
000014

000016
177740

000220

00000006
0000006

MOV
B8R
JSR
JSR
MOV
MOV

SEQ 077
Pege
52

(15

s ,LBN

®s

s, LBN
LBN

P.INOEX,
s

2655

LBN,s

2656
2657
26358
2659
2661

s PASS

g:g?

®s

CDISK ,MSCP.PKT+16(RO)

020,MSCP .PKT+22(R0O)

2654

2672
2673

;

RP.INDX,»

2674

PC.BLSMA

Y
RO
SRETPKT
RO ,RP
., ADDR

3%60'2(R°)

;

RP ., INDX,(SP)
PC,PUT RETPKT

2678

3
:

2671
2681

8178

2682

1578

2683

ROR
8LO0
cMPB

H
H
H

2685
2687
2690

2694

2698

8ITB
8EQ
MOV
JSR
TST
MOV
CLK

2676

BNE
INC

000014

006000

103435

#1000,MSCP
. PKT+26(RO)
R4 ,MSCP .PKT .46(RO)
@2 ,MSCP .PKT+4(RO)
P.INDEX,(SP)
PC,SEND
RO
24
P.INDEX, (SP)
PC,PUT PKT
02,R2
94
PC.WAIT
PC,OUT.I00Q
RO,
RP . INDX
RO, (SP)

MOV
JSR
ADD
MOV

000002

0104, -(SP)

MOV
MOV
MOV
MOV

MOV
JSR

2%:

RO,P. INDEX
RO, (SP)
PC.BLSMUAL

JSR
TST
BNE

0000006

RO, R4
9100000,R4
R4
CCTLR, (SP)
PC,GET.PKT

JSR
MOV

MOVB

0000046

000202

010016
012746

000000G 0000166
0000226
G000266

16 v3 SS5

MAX .LBN(RO;,RO
R2,RO

000170
000174

MOV
MOV

SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAR .BL2

010037

010016
012746
004737
013760
112760
012760
010460
012760
013716
004737
005700
701007
013716
004737
012702
000515
0047387
004737
010037

i1 Bl

18:

0000006

ASR
MOV
8IC
O€eC
MOV
JSR
MOV

VAX

®s

MOV
ADD

000064

10:35:57
11:35:15

016000
060200
006200
010004
042704
005304
013746
004737

1983
198%

6%:

BNE
8PL

é:(Rl).O?ZO

BEQ
JSR
BR

PC,EMSCMO
-3

8IC

0177740,S7.CODE

MOVB

16(R1),S7,.CODE

INITIALIZATION TEST ROUTINES

vo1.C
)

000342
000346
000350
000352
000354

000356
000360
000364
000370
000374
000376
000402
000406
000412
000416
000420
000422
000424
0004 30
000432
0004 34
0004 36

000442

000446
000452
000454
000460
000464
000466
000470
000472
0004 74
000500
000506
000510

;
i

1% Dec
14 Dec

RD/RX EXERCISER

NRQAM3

016100
006200
006200
006200
006200
006200
042700
010037

005737
001004
012703
012702
013716
004737
005204
005202
022626
020227

103607

MOV

000016

ASR
ASR
ASR
ASR

8IC

174000

MOV

TST

BNE

000002

000000G

7s:

8s:
9¢:

000003

005703
001025
013700
105260

MOV
MOV
JSR
INC
INC
cMP
cHP
8LO
TST
BNE
MOV

2701

10¢
T.ADOR,RO
62(R0O)
CUOFF RO

CST.ADDR,RO
#10000, (RO)
55

TRAP

. WORD
. WORD
. WORD
MOV
MOVB

21
EGD.17
EMS. 30
LSLUN,RO
#10,DUR(RO)
51
PC

TRAP
RTS

$CODES

ST.COoDE
8¢
01,R3
22,R2
RP . INDX,(SP)
PC,PUT .RETPKT

(SP)+,(SP).

8IS

Routine Size:
165 words,
Rout ine Base:
9 words
Max mum steck depth per invocation:

2699

R2,03
1
R3

ASL
ADD

10¢:

R4
Re

INCB
MOV

013700
006300
063700
052710
010000
104455
000021
000000G
0000006
013700
0000006
112769
000010
0000006

104451
000207

MOV

SEQ 0778
VAX-11 Bl es 16 Vv3-55%5
Pege
53
SPIDERSUSERS:
([DOUCETTE . FALCONICNRQAAR 8L 2 (1%

16(R1),RO

RO
RO
RO
RC
RO
€174000,R0
RO, SB.CODE

ASRK

1983 10:35:57
1983 11:35:15

4534

s, RESWLT

;

2704

27110

: LBN
: PASS
H

2713
2714
2653

;

PASS,»

RESWLY

2716

2718

2721

2722

2723

2724

:
:

2712%
2627

He
NRQAMS
\(OI.C

H
:

RD/RX EXERCISER
MA TI DRIVE TEST ROUTINES

S;ng

sgbtt]l 'MATI DRIVE TEST ROUTINES

2781

routine MULTI_DRIVE : novelue *

27%4
27%%
27%

!
¢
!

:
s

2782
2783

s;g;

'
H
3

¢
!
!
!
!
!

2746

! -

2748

H
$

2;4;
274

g;gg

H
H

i
:

i
H
:

MD_INIT ()

g;gg

begin

! START OF EXECUTIVE LOOP

2754

2762
2763

g;:z
2767

3
H

2768
2769

3
:
:

2112
2778
2774

i
3

2770
2T

g;;z

21N

g;gg

3
i

:
H

incer CTLR from O to (MAX_CTLR

27185
g?'gg

2764

H
3

QI0S HAVE COMPLETED.
in

;
H

beo

2758
2759
2760
2761

THIS ROUTINE ACTS AS AN “EXECUTIVE” TO THE WHOLE PROCESS. AFTER
INVOKING MD_INIT TO INITIALIZE MULTI-DRIVE TEST DATA, THIS ROUTINE
ENTERS A LOOP WMICH ISSUES QIOS TO ALL ACTIVE CONTROLLERS AND PROCESSES
ANY RESPONSES. IN ADOITION, ALL OUTSTANDING COMMANDS ARE TIMED IN
DRV _TIMCHK WHICH IS INVOKED EVERY SECOND. NORMAL TERMINATION OF THIS
LOOP OCCURS WHEN QIOS ARE NO LONGER BEING ISSUED, AND ALL OUTSTANDING

2749

H
'
:
H

3
:

AN OPERATING SYSTEM ENVIRONMENT.

2739
2740
2741
2742
2743
2744

SEQ 079

VAX 11 Bl
. ws 16 v3-55%
Pege
54
SPIDERSUSERS:
{OOQUCETTE .FALCONICNRQAA .BL2 (16

THIS SUBTEST IS THE MOST SIGNIFICANT PART OF THE ENTIRE PROGRAM. THE
MATI-ORIVE TEST IS A HOST-CONTROLLED EXERCISER DESIGNED TO GIVE THE
USER AN INDICATION OF HOMW ONE OR SEVERAL RDRX DRIVES WOULD PERFORM IN

:
s
:
:
s
'

15 Dec 1983 10:35%:57
14 Dec 1983 11:35:15

2778
2779

2782
2783
2784

bo?in
SET_CPAR (.CTLR);

1) do

' FOR EACH CONTROLLER

SETPRI (PRIO7);
SETPRI (PRIOG);
ICTLR = . CCTLR;
ICST_ADOR = .CST_ADDR;

IOCY_ADDR = .DCT_ADDR;
IRDRX_ADDR = _ICST _ADDR (IP_ADDR];

I0CT_

FATAL _ERROR ();
SETPRI (PRIOO);
elee

SET UP CURRENT CONTROLLER PARAMETERS

1 NO INTERRUPTS WHEN EXAMINING SA 'JSD REV A
' (EXCEPT ODT BREAK) !'JSD REV A
' FAKE INTERRUPTING CONTROLLER'S NUMBER
! FAKE INTERRUPTING CONTROLLER'S CST ADDRESS
t
'

FAKE INTERRUPTING CONTROLLER'S DCT ADDRESS
FAKE INTERRUPTING CONTROLLER'S 2ADDRESS

CONTENTS OF THE SA REGISTER

(SA_SAVE] = .IRDRX_ADDR [RCSA, RC_ALL);

i? BIT_TST (IDCT_ADDR [SA_SAVE),

then

INIT MULTI DRIVE TEST DA'w

exitloop;
end

SA SHOWS AN ERROR

' DECLARE FATAL ERROR
! LOWER PRIORITY
Y

QUIT

IF NO ERROR,

if QI0_OK ()

IF 0.K,

begin

THEN

if (.MX1
q 0) end
(not .EOP FLAG)

IF SUCCESS ON FIRST QIO

then

SETPRI (PRIOO);

SA_ERR)

QIO_GEN ();

then

CONTINUE

TO ISSUE QIO(S) TO THIS CONTROLLER

' GENERATE 1 OR 2 QIOS

I ¢
MA TI

B¢

vo1.C

DRIVE

TEST ROUTINES

2785

if SEND (.MX1) eql SUCCESS

2786
2787
2788

then

else

2789
2790
2791
2792
2793

2794

0o
e
G
B
Ms
Be
e
Ve
@e
Be
Ba
Br
@+
Ge
Ge
Ba
®s
B

else

+«

(.MX1);

QIO (.CTLR)
PUT_PKT

SUCCESS

QIO [.CTLRY

¢«

(.MY2);

end;

2802

26803
2804
2805
2806
2807
2808
2809
2810
2811
2812
2813
2814
2815
2816

end;

004137

000000G

016661
016601
042701
020127
001006

.QIO [.CTLR]

SEND (.MX2) eql

then

2798
2799
2800
2801

016066

PUT _PKT

1983 10:35:57
1983 11:35:15

VAX

11 Bl.ss

v3-555

SEQ Oeao

SPIDERSUSERS: ([DOUCETTE, FALCON]CNROAA 8L2 (16

ATTEMPT

TO SEND IT.

SUCCESS

INCR QUTSTANDING QIO COUNT

RETURN PACKET

ATTEMPT

INCR OUTSTANDING QIO COUNT

RETURN PACKET

0.K.

CONTROLLER LOOP

TO POOL

SUCCESS ON SECOND QIO

then

2795

005746
004737
005002
010246
004737
012700
104441
013737
013737
013737
017737
013701
013700

QI0 {.CTLR]

(.Mx2
0) end
(not .EOP FLAG)

2796
2797

000110
000114
000120

15 Dec
14 Dec

RD/Rx EXERCISER

NRQAM 3

end:

BREAK;

TO SEND

IT.,

SUCCESS

TO POOL

TO ISSUE QIO(S)

! BREAK FOR SUPERVISOR TO CATCH USER REQUESTS

if not .EOP_FLAG

then

PROC_RETPKT

();

end

' EXECUTIVE PROCESSING LOOP

until ((not QIO_OUT ()) or

000110°

0000006

000002

or1
100000

MALTI.ORIVE MATI-DORIVE TEST ROUTINES

JSR

R1,$SAVE2

JSR
CLR

PC.MD. INIT
R2

:
:

JSR
MOV
TRAP
MOV
MOV
MOV

PC,SET.CPAR
#300,R0
41
CCTLR,ICTLR
CST.ADDR, ICSY.ADDR
DCT.ADDR, IOCT.ADDR

1s:

24:

000156
000106°
000110
0000006

000002

EXERCISER

LSBTTL

MULTI. DRIVE :

0000006
000300

0000006
000000G
000000G
000106’

.EOP_FLAG):
!

000000V

PROCESS ANY RETURN PACKETS

MOV

MOV
MOV

-(SP)

R2,-(SP)

8ICST, ADDR.IRORX.ADDR

IOCT.ADDR,R}Y

IRDRX.ADDR,RO

;: CTLR,»

2750
2754
2756

2759

:
3
:
H

2760
2761
2762
2763
2764

2(R0),2(SP)

;

MOV

2(SP) R}

8IC
cMP
BNE

2(SP),2(R}1)
077777 R1
R1,6- 100000
3

CTLR

MOV

2731

¢,RC.REG

; RC.REG,»

2767

%OI.C

000122
000126

000130
000132
000134
000136
000140
000142
000146

000150

000152
000156
000162
000164
000172
000174
000176
000202
000206
000210
000214
000216
000222
000226
000232
000234
000242
000244
000246

000252
000256
000260
000264
000266
000272
000276
000300
000302
000304
000306
000310
000316
000320
000324
000330
000332

000334
000342
000344
000346

;
;

15 Dec
14 Dec

RD/RAX EXERCISER
MA TT DRIVE TEST ROUTINES

NRQAMS

004 /37

005000
104441
005726
000464
005000
104441

004737
006000
103052
004737
013700
002421
132737
001015
010016
004737
020027
001003
105262
000404
013716
004737
013700

002421
132737
001015
010016
004737
020027
001003
105262
000404
013716
004737
005726
005202
000243
003643
104422
132737
001002
004737
004737
006000
103004
132737

001623
005726
000207

JSR
CLR

000000V

TRAP

000001

000160’

000162

S$:

000001

000000G

Mx1,R0

8LT
BITB
BNE
MOV
JSR

St
€1 ,EOP.FLAG
St
RO,(SP)
PC,SEND

BMNE

6%:
7¢:

QIO(R?)
5

INCB
BR
MOV

000001

0000006

000000V
000000V

000001

9s:

INCB
BR
MOV
JSR

T
. PKT
PC.PU
Mx2,RO
74
#1,EOP.FLAG
78
RO,(SP)
PC,SEND
RO, #1
64
QIO(R2)
74
Mx2,(SP)
PKT
PC,P.UT

INC

JSR
MOV
eLT
8118
BNE
MOV

(SP).

TS87

BLE

TRAP

8178
BNE
JSR
JSR

#1 ,E0P.FLAG
94
PC.PROC.RETPKT
PC.QI0.0LUT

ROR

10¢;

Routine Size:
116 words,
Routine Bese:
Meximum steck depth per invocation:
7 words

B8EQ

TSY
RTS

$CODES

2777

;
:

2780
2782

2783

2786

»(CTLR)

2788
2786
2790

2792

2793

;

2796

»(CTLR)

g;gg

;

2800

H
;: CTLR

2755
2754

2804

;

210

2808

8.4

2731

10¢
#1 ,E0P .FLAG

8CC
8118

000000G

Mx1,(SP)

.WORD CLV!CLC

8s:

27715

RO.#1

BNE

000162

;

7
PC,QI0.GEN

JSR
cHP

000001

2769

PC,.QI0.0K

o, o

000001

ROR

MOV

000000G

(SP).

8cC
JSR

000000V
000160

2770
21N

TRAP

JSR

000000V

SEQ 081
VAX-11 Blies 16 V3-555
Page
56
SPIDERSUSERS
: [DOUCETTE .FALCON JCNRQAA . BL2 (16

H
s

8
RO

BR
CLR

10:35:57
11:55:15

PC,FATAL .ERROR
RO
41

3¢

1983
198%

(SP).
PC

5246

1<¢,

&8s

®e

vOol.C

2817
2818
2819
2820
2821
2822
2823
2824
2825
20826
2827
2828
2829
2830
2831

2832
2633
2834
2835
2836
2837
2838
2839
2840

000070
000072
000074

THIS ROUTINE

IS CALLED By ROUTINE MULTT DRIVE

USED BY THE MULTI-ORIVE TEST.

Bli.ws

v3-555

SPIDERSUSERS
: [DOUCETTE .FALCOWITNRGASR . Do

717

TO INITIALIZE DATA ITEMS

begin
if

.ENTRY_REASON eql START

then

THIS IS A START

H PARTITION FREE MEMORY INTO I/0 BUFFERS

INIT_I0_BUFF (),

(.ENTRY_REASON neq CONT)

and

( .ENTRY_REASON neq NEW_PASS)

START,

RESTART,

OR PWR FAIL

then

incr CTLR from O to (MAX_CTLR

1) do

SEY_CPAR (.CTLR);
incr DISK from (O

OF _UN)

to (3 & UNIT_SIZE

+ OF _UN) by UNIT_SIZE do

SET_UPAR (.DISK);

BST {[.LSLUN) = .CST_ADDR [(.DISK «
DPST [.LSLUN] = DP_CNT;

incr COUNT from O to (QIO_PER_CTLR & MAX _CTLR
BUFF_OWN [ .COUNT) = -1;

2850

end;

004137
123727
001002
004737
123727
001444
123727
001440
005004
010446
004737
012703
010316
004737
013702
010201
006301

0000006

010300
006300

VAX

: novelue =

routine MD_INIT

2841
2842
2643
2844
2845
2846
2647
2848

2849

000014
000020

15 Dec 1983 10:35:57
14 De: 1983 11:35: 15

RD/Rx EXERCISER
MU TI DRIVE TEST ROUTINES

3
NRQAM

1), D_BEG];

end;

INITIALIZE BLOCK

!
!

INITIALIZE I/0 BUFFER ALLOCATION
TABLE

SEQUENCE

TABLE

INITIALIZE DATA PATTERN SEQUENCE TABLE

end;

0000006 000001

000000V

000000G 000003

000003

0000006

1) do

1 ROUTINE MD _INIT

LSBTTL

MO.INIT MATI DRIVE TEST ROUTINES

gzfl

EP:TRY.REASCN.OI

MD. INIT:JUSR

1s:

0000006 000005

0000006

JSR

gflzfl
E

R1, $SAVEA

2817

PC.INIYT . I0.BUFF

2828

ENTRY.REASON.OS
s

:
:

2826
2830

nga

5?TfiY.flEASUN.05

2831

2s:

CLR
MOV

R4
R4, -(SP)

; CTLR
;: CTLR,»

2834
283¢

MOV
MOV

*3,R3
R3,(SP)

; ¢,DISK
: DISK,s

2838
2840

LSLUN,R2

2841

JSR

MOV

PC,SET.CPAR

PC.SET.UPAR
R2.R1

ASL

MOV

R3,.RO

1 DISK,e

L v
3
NRQAM
vol.C

15 Dec
14 Dec

RDO/Rx EXERCISER

MATI

DRIVE

TEST ROUTINES

1983
1983

10:35:57
11:35:15

SEQ OcA?Y
VAX 11 Bl 9s 16 v3 555
Page
58
SPIDERS$USERS:
[ODOUCETTE .FALCONICNRQAR BLZ (17

)

0000 7¢
000102
000110
000116
000122
000126
000130
000132
000134

063700
016061
112762
062703
020327
003752
005726
005204
000243

000136
000140
000142
000150
000152
000156
000160

003741
005000
112760
005200
020027
003771
000207

;
;:

000000G
000002
000050
000025
000060
000005
000022

ADD
MOV
MOVB

CST.ADDR,RO
2(R0),BST(R1)
#25,0PST(R2)

ADD

@5,.R3

cMP
BLE

R3,022
3

TST
INC

(SP).
R4
LWORD CLV!CLC

000377

000007

57 words,
Routine Base:
Routine Size:
7 words
Maximum steck depth per ‘nvocation:

MOVB
INC
cMP
RTS

$CODE$

DISK,»

CTLR

RO, &7

:
;
:
:

COUNT
«,s(COUNT)
COUNT
COUNT ,»

BLE

¢,DISK

2
RO
0377,8UFF _OWN(RO)
RO

BLE
CLR

H
;
;

5616

2847
2838
2835

2834

2847
2848
2847
2817

NRWUAM?
VOl

RD/RX EXERCISER

.
.

MA TI DRIVE

TEST ROUTINES

2851

routine INIT_I0 BUFF

2853

2852

1% Dec-1983 10:35:57

14 -Dec

novalue

1983 11:35:15

VAX-11 Blies-16 v3-555

2858
2855
2856
2857
2525

!
¢
!
¢
]

BY A NUMBER OF FACTORS. INCLUDING THE NUMBER OF UNITS, THE NUMBER OF
CONTROLLERS, AND THE SIZE OF FREE MEMORY.

.
.
:

2860
2861
2862

!
!
!

ONCE THE BUFFER SIZE IS DETERMINED, THE NUMBER OF I/0 BUFFERS IS
CALCULATED. FINALLY, THE BUFFER ADDRESS (BUFF _ADDR) TABLE IS LOADED
WITH FIXED BUFFER DESCRIPTORS THAT ARE USED IN THE ALLOCATION AND

:
:
)

2865
2866
2867
gggg

!
!
!
‘

IMPLICIT INPUTS:
CTLR_CNT - THE NUMBER OF CONTROLLERS CONFIGURED
LSUNIT - THE NUMBER OF UNITS AVAILABLE FOR TESTING
FREE_MEM_ADDR - START OF FREE MEMORY

:
H
:
:
;

2870
2871
2872
2873
gg;g

2876

DRS_START = .FREE_MEM_ADOR + 2 « (..FREE_MEM_AD"R & 2);

! START OF SUPERVISOR

2879

while (.BUFF_ADDR [0] and so’'37’) neq O do

! FORCE FIRST I/0 BUFFER TO START

2882

BYTS_PER_QIO = ((.DRS_START - .BUFF_ADDR [0]) / (QIO_PER_CTLR & MAX_CTLR)) and %o’ 177740";

2885

ggg;

;

;
:
;

2859

2:22

gg;g
gggg
gggz

2886

2889

2890

2892

‘

;
;

2891

THIS ROUTINE IS CALLED BY MD_INIT WHEN THE MULTI-DRIVE TEST IS FIRST
STARTED. IT IS RESPONSIBLE FOR PARTITIONING FREE MEMORY INTO A
COLLECTION OF I/0 BUFFERS. THE SIZE OF EACH 1/0 BUFFER IS DETERMINED

DEALLOCATION PROCESS.

[]

begin
locel
DRS_START;

BUFF_ADOR [0] = (.FREE_MEM_ADDR + 2 + 1) and %o’'177776';
BUFF_ADDR (0]

.BUFF_ADDR [0]

+ 2;

! START OF READ/WRITE BUFFERS
!

ON EVEN BOUNDARY

MAX TRANSFER SIZE

ADJUST

ERROR IF NOT ENOUGH MEMORY

if .BYTS_PER_QIO gtru MAX_XFER_SIZE

then

BYTS_PER_QIO = MAX_XFER_SIZE;

TRANSFER SIZE LOWER

if .BYTS_PER_QIO lesu 32

then

bcag in

ERRSF (2,

EGS_02,

0);

2895
2896

i (QIO_PER_CTLR & MAX_CTLR) gtru 1

2899

incr index from 1 to (QIO_PER_CTLR & MAX_CTLR - 1) do

¢+ INIT REMAINING TABLE ENTRIES

2902

end;

' ROUTINE INIT_IO_BUFF

004137

0000006

;

000000

gggg

BUFF_ADDR [.index) =

.BUFF _ADDR [.index - 1] +

.SBTTL

INIT.IO.BUFF:

.BYTS_PER_QIO;

Po;e 59

SPIDERSUSERS
: ([DOUCETTE .FALCONICNRGAA .BL2 (18

.
:
.
:
:
:

SEQ OcARa

! FIXED BUFFER ADDRESS

INIT.IO0.BUFF MULTI-DRIVE TEST ROUTINES

NF¢,
RD/RX EXERCISER
MU TI DRIVE TEST

NRQAMZ

gOl.C

000004
000010
000012
000014
000016
000022
000026
000032
000040
000046
000050
000056
000060
000062
000066
000072
000076

000102

000110
000116
000120
000126
000134
000136
000140
000142
000144

000146
000150
000154

000156
000160
000162
000164
000170
000174
000200
000202
000206
000210
000212
;

000002
000003
0000006
000001
000037

062737

000002

163716

000000G
000010
0000006

001404

000770
010046

012746
004737
010037
042737
023727

101403

012737
023727
103005

ROUTINES

JSR

2%:

Routine

Size:

Maximum steck

MOV

SUB

BUFF
. ADDR, (SP)

JSR
MOV
8IC

PC.BLS$DIV
RO,BYTS.PER.QIO
937 ,BYTS.PER.QIO
gITS.PER.QI0.0ZOOO

cHP
BLOS

#2000,BYTS.PER.QIO

MOV

000002
000000G
000000

000001

2
€2 ,BUFF ADDR
13
RO, -(SP)

MOV

104454

104444
012702
010201
006301
010200
006300
016003
063703
010361
005202
020227
003762
022626
000207

RO
R1,RO
02,R0
#3,R1
R1,.BUFF ,ADDR
@1,BUF
, ADDR
F
037 ,BUFF
. ADDR

ADD

0000006
000C37
00N000G 002000
002000
000000G 000040

(R1),R0O

8IC
BIT
BEQ

000000G

4%
:
Ss:

1777766

000000G
000000G

000007

,
40
BYTS.PER.QIO

cHP
8MHIS
TRAP
.WORD
. WORD
. WORD
TRAP

54
2
€GS.02
0
44
®1,.R2
R2,R1

MOV

MOV
ASL
MOV
ASL

ADD

R3 ,BUFF
. ADDR(R1)

MOV
INC
cHP
BLE
ce

$CODES

10:35:57
11:35:15

SEQ 0¢AS
VAX 11 Blies 16 V3 555
Pege
60
SPIDERSUSERS
: [DOUCETTE .FALCON]ICNRQAA .BL2 (18
H

2851

2876

2871

;

2876

28177

2879

H
H

2880
2879

;

DRS.START,»

2882

2885

:
:

2887
2889

2892

;:
:

¢,INDEX
INDEX,

s
INDEX,

2896
2900

,R3
BUFF .ADOR -2(R0Q)
8YTS.PER.QIOC,R3

MOV

;

;
(SP)e¢,(SP).

RTS

70 words,
Rout ine Bese:
depth per invocation:
8 worde

1983
1983

R1,$SAVE3
FREE .MEM.ADDR,R1

MOV
MOV
ASL
ADD
ADD
ADD
MOV

0000006

013701
011100
006300
060100
062700
062701
010137
042737
032737

15 Dec
14 Dec

¢«

6000

:
H

INDEX

2896

INDEX,s

2871
2851

“D

Ax R ERERCISER
“at] OR1 vE 1£5° RO "I

N
-

vAZ

11 8l ee

¢v3 499

SPIDERSISERS
: [DOUCE TTE ¢ AL 0N 1 NG L

T1H4IS AOUTINE 1S CALLED B¢ Tet TMA T]I ORIVE -EXECUTIVE- IN QROER 10
DETEMMINE WETHER OR MOT A QIO REQUEST (OR QI0 PAIR) SHOWD Bt
GENERATED TO ToE CURRMENT CONTROLLER. A VALUE OF ~"TRUE- IS RETURNED If

rout .ne OI0 Ox

% Dec 1963 10:35:57
:4 Dec 1983 11:35:15

THE CONTROLLER MEETS 3 REQUIREMENTS:

2924
2925
2926
2927

1
i

013700
103760
001403
012700
000207
005000
000207

Routine Size:
Mas mus steck

"‘ufllllm ALLOWED FOR ANY

(.CST_ADDR

(not

ONE

IS AT LEAST ONE DISH ONLINE

THESE TEST FAIL,

THEN A

VALUE

CONTROLLER;

TO THE CONTROLLER,

.-‘ M“ "

(STATE]

eql

ONLINE)

IS RETURNED.

(.CST_ADDR {U_CNT] neq 0)

then

return TRUE

¢
!

.S8TTL

QIO.OK MATI DRIVE

157
8PL

2(RJ)
1

QIC.0x: MOV
0000000

CSY.ADOR,RO

gge

0000006
0000006

MOV
HOve

177400
000002
000010

8IC
ADD
ce

THERE

IS VALID UNITY

00000%

"TRUE” EXIT POINT

18:

POINT

TEST ROUTINES

2923

:%.EW.'LAG

2924

CCTLR RO
QIO(RO)
RO

2923

MOV

CST.ADOR ,RO

2926

MOV

#1.R0O

29093

18718
8EQ

000001

IS O.n,

#177400,R0
e2,R0
RO, 010

axI

0000006

IS ONLINE

IF OQUTSTANDING QIO COUNT

“FALSE” EXIT

return FALSE:;

000002
000001

1F CONTROLLER

enc

.E® FLAG) end

((.QI0 {.ECTLR) + 2) leau QIO _PER_CTLR) end

0000006

020027
101010

000070
000072

i®

013700

042700
062700

IS OMLINE,

TvE NMPDER OF OUTSTANDING QIOS IS AT LEAST 2 LESS THAN TrE

IMPLICIT INPUTS:
CCTLR - CURRENT CONTROLLER MUMBER
CSY_ADDR - ADDRESS OF CURRENT CONTROLLER'S CST

elee

003760
100027
132787
001023
013700
116000

Trk CONTROLLER

IF ANY OF

2920
2929

2930

000010

X
T

2918
2946
2917
2910
2919
2920
2921
292¢
2923

%
M
e

2914

S{RO)
1s

RTS

£C

RYS

CLR

30 worde,
Routine Bese:
$CODES
depth per invocetion:
O worde

6214

—

NRQAM L
WOl

RD Rx EXERCISER
MmATT DRIVE TEST ROUTINE-

s
:

2931
2982

i
'
s
.
f

2934
2985
29%
2987
g:gg

.
;
'

2:0
2941
2942

g::s

2938

}

3
i

2:3
2944

1% Dec 1943 10:83%:57
14 Dec 1938 11:35%:1%

IS ROUTINE IS CALLED By THE MATI _DRIVE EXECUTIVE FOR DETERMINING THE
END OF THE MALTI-ORIVE TEST. ITS PURPOSE IS TO EXAMINE THE QIO VECTIOR
FOR ANY QUTSTANDING QI0S ON ANY CONTROLLER. A VALUE OF "TRUE" IS
RETURNED IF THERE IS AT LEASY ONE QIO OUTSTANDING ON ANY CONTROLLER.
OTHERWISE, "FALSE“ IS RETURNED INDICATING NO OQUTSTANDING QIOS.

!¢
!
¢
'

begin

ince CTLR from 0 to (MAX_CTLR
n

1) do

SET _CPAR (.CTLR);

t SET UP CURRENT CONTROLLER PARAMETERS

i
.
:

2947
2948
2949

i? .CST_ADDR [STATE) eal ONLINE
then
return TRUE;

2951

end;

2950

2952

2958

2954

000000
000002

010146
0035001

000006
000012

004737
013700

000004

010146

000016

003760

000024

003726

000022

100004

000026

012700

000034
000036

005726
005201

000032
000040

000042
000044
000046

0000%0

000405

return FALSE;

LSBTTL
QI0.0UT : MOV
CLR

14:

0000006
000000G
000002

JSR
MOV

8PL

TST

000001
24:

3¢:
21 words,

depth per

Routine Bese:

invocetion:

3 words

NO CONTROLLERS ONL INE

QIO.OUT MULTI-ORIVE
R1,-(SP)
Ri

R1,-(SP)

PC,.SET.CPAP
CST.ADDR,RO
2(R0O)

(SP).

TEST ROUTINES
3
; CTLR

: CTLR,»

2949

187
INC

(SP).
R1

3
s

BLE
CLR
MOV

14
RO
(SP)+,R1

:
s

RTS

$CODES

¢+ 6310

2945
2947

#1,.RO

2931
2943

MOV

LMORD CLV!ICLC

000207

Maximum steck

MOV
TST

003760
005000
012601

If CONTROLLER IS ONLINE

¢ EXIT

end;

000243

Routine Size:

routine QI0_OUT -

4 @ ‘-

VAX 11 Bl .es 16 v3 S5%
Pege
SPIDERS 'SERS: ({DOUCE TTE . F ALCON JCNR Y&/ 8

CTLR

2744
2943

294:
2981

L
NRGAM 3

RD/AX EXERCISER

vOl.¢

MA TI DRIVE TEST ROUTINES

)

:
:

2955

2956
2957

15 Dec 1983 10:3%:57

14 Dec 198% 11:835:15

VAX 11 Bli.es 16 v3-55%

:
H
:
:
:
:

2958
29%9
2960
291
2962
gg:z

!
!
!
!
!
H

THIS ROUTINE IS CALLED By THE MULTI _ORIVE EXECUTIVE FOR AN ONL INE
CONTROLLER ELIGIBLE YO RECEIVE 1/0 TRANSFER REQUESTS. IT IS
RESPONSIBLE FOR SECURING ONE OR TWO MSCP PACKETS AND LOADING THEM

:
s
i

2965
2966
gggg

!
!
'

EACH FIELD OF THE PACKET(S) IS LOADED WITHIN INDIVIDUAL ROUTINES
(QIO_FUNC, QIO_LBN, QIO_SIZE, ETC.). MOSY OF THE VALUES SELECTED FOR
EACH FIELD ARE BASED ON A SET OF RANDOM NUMBER GENERATED AT THE START,

i
H

2969
2970

!
!

UNDER NORMAL CIRCUMSTANCES, ONLY ONE 1I/0 REQUEST IS GENERATED. MOMEVER,
IF THIS I/0 REQUEST IS A “WRITE”, AND IF THE OPERATOR SELECTED THE

:
:

2971
g’?;g

s
:
H
:

2974
2975
2976
2977

:
H

g:;g

H
H

2980
2981

gg:g

:
H
H
:

;
:

2982
2983
29684
2985
2988

2989
2233?

2992

WITH VARIOUS PARAMETERS COMPRISING THE 1/0 REQUEST. THE 1/0 REQUEST
GENERATED MERE IS DESTINED TO A PARTICULAR UNIT SELECTED AT RANDOM FROM
THOSE CONF IGURED UNDER THE CURRENT CONTROLLER.

[}

¢
H

OPTION FOR HOST WRITE-COMPARES, THEN A SECOND “READ” REQUEST WILL BE
GENERATED WITH THE SAME .BN AND BYTE COUNT,

!
!
!
!

AFTER THE PACKET(S) MAVE BEEN LOADED, THIS ROUTINE RECAINS CONTROL
AND ATTEMPTS TO GETY ONE OR TWO I/0 BUFFERS FOR THE ACTUAL DATA
TRANSFERS. THE SUCCESS 7/ FAIL STATUS OF THIS ENTIRE OPERATION IS
PASSED BACK TO THE CALLER THROUGH THE GLOBALS “MX1” AND "Mx2"; THEY

CONTAIN VALID MSCP PACKET INDECES, OR -1.

!
!

Note that the DUP Exerciser is located inside the QIO _FUNC routine.
Every
0 often the Dup exerciser will run and return the MSCP Exerciser

IMPLICIT INPUTS:
CCTLR - CURRENT CONTROLLER NUMBER

!
!
!
¢

bogin
Mx2

it's normsl stete.

-1;

if (MX]1 = GEY_PKT (.CCTLR)) les O

ASSUME FAILURE

IN SECURINGC 2ND PACKETY

TRY TO GET 1ST PACKETY. IF FAILURE

2993

then

:
;
:
H
H
:

2996
2997
2998
2999
3000
3001

P (MX2 = GET_PKY (.CCTLR)) les O
then
in

!t TRY TO GET 2ND PACKET.

;
H
:
H

3004
3005
3006
3007

MADL1 = MSCP _PKT « (.MX1 & PKT_LEN ¢ 2);
MAD2 = MSCP _PKT « (..MX2 & PKT_LEN ¢ 2);,
GET_RANDOM ();
QIO_UNIT ();

! CALCUALATE STARTING ADDRESSES
'
OF B0TH PACKETS
! GENERATE A SET OF RANDOM NUMBERS
* LOAD RANDOM UNIT NUMBER INTO PACKETS

¢ EOP_FLAG

! RETURN IF NO UNIT ONLINE

29942995

3009

3010

return;

PUT_PXT ( MX1);
MXL = -1,
return;

then

SPIDERSIUSERS
: (DOUCETTE .FALCONICNROAA

routine GIO_GEN : novelue °
¢

SEQ Oza8

! NO POINT IN CONTINUING

IF FAILURE

! RETURN 1ST PACKET TO POOL
¢ INDICATE FAILURE
! DONE

B2 (21

t /7
RD-Rx EXERCISER
MA TT DRIVE TEST ROLTINES

NRQAMZ
vOl.¢
)

3011

3012

3013

ND MSCP OPCODEOD

1% Dec
14 Dec

SEQ OUc~y
VAX 11 Blies 16 Vv3-555
Pege
14
SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA . BL 2 (.3

1933 10:3%:57
1983 11:35:15

return;

QIO FUNC ();

LOAD RANDOM

IMSCP FUNCTION CODE (OPCOOE)IO OR

tOUP EXERCISER

3014

THIS IS THE POINT WHERE

3015

START WRITTING AND READING DBN S ONCE FINISHED

then return;

¢
!
!

TO 1TS NORMAL MSCP MODE....
IF IT WAS IN OUP TEST AND FAILED
NO POINT IN CONTINUING

QIO_LBN ();
QIO_SIZE ()
GET_IO_BUFF (MADL

!
¢
!

LOAD LBN (RANDOM OR SEQUENTIAL)
LOAD RANDOM BYTE COUNT
TRY T0 GET AN I/0 BUFFER

TWO QIOS ARE

gE.?-IO_BLFF (MAD2 (BWF 01);

TRY

TO GET 2ND

IF 2ND BUFFER ALLOCATION FAILED

EXERCISER

e
S
B

000000
000006
000012
000016
000022

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
3050
3051
3052
3053
3054
305%
3056
3057

3058

012737
013746
004737
010037
005726

if (.MX1

les 0) OR

(.EOP _FLAG)

[BUF 0]);

.MX2 geq O

then

.MAD2

then

[BUF _0)] eqla O

TO GET

CUT

IN TO THE MSCP

WILL RETIRN THE

A ENVOLOPE RFETURN

ISSWED

/0 BUFFER

begin
if

.MAD1

then

[BUF _O] neas O

bovin
PUT_1I0 BUFF (MAD1
MAD1 [{BWUF _0) = O;
end;

(BUF 0]

1/0 BUFFER WAS ALLOCATFD
TO POOL

! RETURN 2ND PACKET TO POOL
' INDICATE FAILURE
¢ IF 2ND 1/0 BUFFER ALLOCATION FAILED

end;

.MAD1

1ST

RETURN 1ST I/0 BUFFER
MARK IT AS FAILED

[BUF _0]);

PUT_PKT ( .MX2);
MX2 = -1;
end;

TO BE

THE DUP EXERCISER WILL

TEST

eqle O

¢t

TWO QIOS ARE TO BE ISSUED

¢t

1ST 170 BUFFER ALLOCATION FAILED

then
[1,]

! RETURN 1ST PACKET
! INDICATE FAILURE

PUT _PKT ( .MX1);

MXy

else

end

-1;

.MAD1

then

! OTHERWISE, IF 1ST OPCODE IS A WRITE

(OPCODE) eql OP_wRT

FILL_BUFF

0000006
000160°

(ALL IS 0.x.)

t FILL 1SY I/0 BUFFER WITH APPROPRIATE DATA PATTERN

();

ROUTINE QIO_GEN

end;

177777 000162
0000006

YO POOL

.SBTTL

QIO.GEN MU TI-DRIVE

JSR
MOV

PC,GET
. PKT
RO,MX1

QIO.GEN:MOV
MOV
187

e-1,Mx2
CCTLR, -(SP)
(SP).

TEST ROUTINES

:
i

2990
2992

TEST ROUTINES

MOV

JSR
MOV

000162

000160’
000000G

177777

TS7
TST

8GE

HOvV

JSR

000160

18:

JSR

MOV
MOV
MOV

JSR
ADD

MOV
JSR
JSR
8IT8
BNE
JSR
TS7

BLT
8IT8
BNE
JSR
JSR

002505

132737

001101
004737
004737
013716
062716
004737
005737

MOV

JSR
157
BLY
MOV

002437

015716
062716
004737
015700
005760
001024
013700
062700
005710
001407
010016
004737
013700

003060
013716
004737
012737

MOV
1ST
RYS
MOV

JSR
MOV
TST
BNE
MOV
TST

000164
000032
000162
0000006
177777

2s:
000162

BEQ
MOV
JSR
MOV
CLR
MOV

JSR

MOV

RO
64
CCTLR, (SP)
. PKT
PC,GET
RO, MX2

RO
14
MX1, (SP)
PC,PUT PKT
o-1,Mx1

(5P).

2994

MX2

2998
3004

PC,BLIML
MSCP
. PKT RO
RO,MAD2
PC,.
GET
RANDOM
PC.QIO0.UNITY

3007

;I.EOP.FLflG

2955
3013
3017

PC,QI0.FUNC

MX1

34
MAD2,(SP)
432,(5P)

PC,GET.I0.BUFF
MAD2 RO

32(RO)

3¢
MAD1,RO
#32,R0
(RO)
24
RO, (SP)
PC,PUT.IO0.BUFF
HAD1,RO
32(R0O)
MX2,(SP)
PC,PUT.PKT
® 1,Mx2

SEQ Oc v,
P
6%

(SPJ.

Mx2

16 V3 555

Mrl

PC
Mx1, -(SP)
€104, -{SP)
PC,BLSMAL
MMMSCP
. PKT . RO
RO,MAD1
Mx2,(SP)

S5t
#1,EO0P FLAG
54
PC.QI0.LBN
PC,QI0.SIZE
MAD1,(SP)
#32,(5P)
PC,GET.I0.BFF

Bliss

8Lt

TS1

SPIDEROUSERS:(DOUCEYYE.FALCON]CNRQAA.;?3 (c1

005700
002572
013746
004737
010037
005726
005700
002011
013746
004737
012737
005726
000207
013746
012746
004737
062700
010037
013716
012746
004737
062700
010037
004737
004737
132737
001112
004737
005737

DRIVE

VAX

ML T

1983 10:35%5:57
198% 11:35:15

000024

1% Dec
14 Dec

RD/RX EXERCISER

NRQAMS
VvO1.¢

2955

3020
3021
3022

3024

3027

3029

3033

3036

3037

]

3040

;

3041

{_
.

[\ A

&
NRQAM
vol.¢

RD/Rx

MATT

)

0003¢
000342
000346
000350
000354
000360
000366
000370
000374
000402
000404
000410
000414

;
i

013700
005760
001010
013716
004787
012787
000410
013700

126027

001002
004737
062706
000207

me Size:
Rout
Meriwum steck

DRIVE

TEST ROUTINES

000164

000032

000160

000164
000022

000042

Mx1,(SP)
PC.PUT PKT
4 1,HX1

MOV

4%;

S$:

68:

135 words,
Routine Bese:
depth per invocation:
4 words

BR
MOV
cHP8
BNE
JSR

MAD1,RO

22(R0O), 042
St

PC.FILL.BUFF
06, 5P

ADD
RTS

$CODES

1983
1983

10:35:57
11:35:15

VAX 11 Blies 16 V3-55%
Page
SPIDERSUSERS: (DOUCETTE .FALCONICNRQAA 3L
2

(/1
304¢

JSR

177777

000000V

MAD1,RO
32(R0O)

MOV
TS7
BNE

MOV

000160’

0000006

000006

15 Dec
18 Dec

CXERCISER

6362

3049

3050
3046
3054
3056
2989
2955

NRQAM L

RO /Rx EXERCISER

C1oR BN

MA TI DRIVE

15 Dec 1943 10:35:57

TEST ROUTINES

14 Dec

198% 11:35:15

VAX 11 B8l.es 16 v3 555

30%9
3060

routine GET_RANDOM : novelue

.
:
:
:
R

3062
3063
3064
3065
30665067

!
!
!
!
H

3068

:
:
i

3069

3070
3071
3072

307%

3076
3077
3078
3079

3082

:
:

3080
3081

001241
001242
001244

beg:n
Oown

338;2

H
:
s
:

THIS ROUTINE IS CALLED BY QIO _GEN TO GENERATE A SET OF RANDOM NUMBERS,
AND TO STORE THEM INTO THE RANDOM NUMBER TABLE (RANDOM). THE RANDOM
NUMBERS ARE USED TO SELECT I/0 REQUEST PARAMETERS FOR THE CURRENT QIO
OR QIO PAIR. IN ADDITION. IF DATA PATTERN #1 IS BEING USED, THESE
RANDOM NUMBERS WILL BE USED IN THE WRITE OPERATION.

SEED :

word

initial (173),

NEXT_RANDNUM : word nitisl (245);

incr COUNT from O to (ROM_LEN

1) do

in
SEED = (.SEED ¢« .NEXT_RANDNUM + 1) « 4;
NEXT _RANDNUM = ( .NEXT_RANDNUM / 4) .+ _SEED;
RANDOM [ .COUNT] = _NEXT_RANDNUM;
end;

end;

.PSECT
000255
000365

.EVEN
. WORD

SEED:
NEXT
. RANDNUM ;
.WORD

$GGGS,
255
365

9.90( .’

SPIDERSUSERS:
(DOUCETTE .FALCONICNRIAA AL ¢ (¢,

SEQ O, ¢

[

S
NRQAM
vOol1.C

15 Dec
14 Dec

RD/RX EXERCISER

MA TI DRIVE

TEST ROUTINES
.SBTTL

000010
000014
000016
000020
000022

000032

000072
000074
000100
000104
000106

i
:

004137

0000006

013702
013708
005001
010300
060200
006300
006300
010037
062737
010346
012746
004737
013702
060200
010037
010003
010361
022626
062701
020127
003744
000207

001242’
001244°

$CODES,

GET.RANDGM:
JSR
MOV
MOV
CLR
MOV

000004
0000006
001242’

001244

000116’
000002

000036

001242

11 B8liss

V3 555

Rl
R3,RO
R2,RO

SPIDERSUSERS: (DOUCETTE .FALCON]ICNRQAA;f; (2¢

R3,-(SP)
#4,-(SP)
PC.BLSDIV
SEED.R2
R2,RO
RO ,NEXT
, RANDNUM
RO,R3
R3,RANDOM(R1)

MOV

JSR
MOV
ADD
MOV
MOV

MOV
cHp
ADD
cHP
BLE

(SP)+ ,(SP)»

2,R1
R1,036
1¢
PC

RTS

7000

ROUTINES

3039
3077

COUNT

3075
3077
3076
307°

04 ,SEED

MOV

SEQ Or 1Y

SEED.R2
NEXT .RANDNUM ,R3

MOV
ADD

$CODES
Routine Base:
Routine Size:
36 words,
7 words
Maximum steck depth per invocetion

TEST

VAX

R1,$SAVE3

ADD
ASL
ASL

001242’
000004

10:35:57
11:35:15

GET.RANDOM MULTI DRIVE

.PSECT

007000

1983
1983

3078

M, »
XT
. RANDNU
NE

3079

s, COUNT

3076
307S

+,s(COUNT)

COUNT
,«

3059

J/
NRQAM &
vC1

RD/Rx EXERCISER
MA TI DRIVE TEST ROUTINES

15 Dec
14 Dec

1983 10:35:57
1983 11:35:15

)

:
:

3083
3084

routine QIC_UNIT

3086

3085

H
:
H
;

3087
3088
3089
w

3092

:
i

:
.

:
;

3093

novelue =

THIS ROUTINE IS CALLED By QIO_GEN TO RANDOMLY SELECT ONE UNIT

!
!
!
'

CONF IGURED UNDER THE CURRENT CONTROLLER (CCTLR) TO BE USED FOR THE
CURRENT QIO OR QIO PAIR, THE UNIT SELECTED IS BASED ON THE NUMBER OF
UNITS ELIGIBLE TO RECEIVE AN 1/0 REQUEST (FROM 1 TO 4) AND THE FIRST
RANDOM NUMBER IN THE RANDOM NUMBER TABLE (RANOOM).

IMPLICIT INPUTS:

50“

[]

3095

3098
3099

3096
3097

CST_ADDR

THE RD/RX DISK NUMBER (DISK ADDRESS) IS LOADED INTO THE
APPROPRIATE FIELD OF BOTH MSCP PACKETS.

3100

begin

;
H

3102
3103

RAT_COUNT
locel

TBL _COUNT

3101

3104

3106

H
H
i

H
:

3
:
:

3109
gi%g
3112
3113
3114

:
:
:

3115
3116
3117

3122

:
:
H
H
3
:

:
:
:

3
:

3118
3119
3120
3121
3123
3124

3125

3126
3127

byte,

SELECT_RD : byte:
!

!
!

THE UNITS WILL BE SELECTED ON AN ADJUSTABLE RATIO, RDS1 TO RX50,
SELECTED VIA THE SOF TWARE PARAMETERS

! THIS MODE IS FOR SELECTING DEVICES ON THE FOLLOWING SCHEME:
¢ CHOOSE A DEVICE AND KEEP IT SELECTED FOR A CONSTANT TIME, THEN
¢ MOVE TO THE NEXT. THIS IS NON-RANDOM, FIXED SEQUENTIAL OPERATIONAL
¢
!

TMMODE

if ((.SWP_FLAGS eand SWF_RDM) neq SWF _RDM) end
((.SWP_FLAGS end SWF _SEQ) neq SWF _SEQ)
then
if

3134

3137

3133

g{gz
3138

NOT RANOOM MODE
NOT RANDOM SEQUEUNTIAL TMMODE

(.CST_ADOR {.BSY_DEvV, D_PRES) eal PRESENT) and
(.CST_ADDR [.BST_DEV, D_STAT] eql ONLINE) and

(not .CST_ADDR [.BST_DEV, D_FATAL))

then

MAD2 (OK_NUM]

!
!

(,BST_CNT neq O0) and

3131

3129
3130

initial (0);

: byte,

BST_CNT

3132

;

MOO _COUNT

word

3128

Oown

3105

3107
3108

ADDRESS OF CURRENT CONTROLLER'S CST

IMPLICIT OUTPUTS:

!
!

.BST_CNT

ALREADY WITHIN DEVICE

SET_UPAR (.BST_DEV);
MADL (DK _NUM] = CDISK;

return;

else

. CDISK;

end

begin

! GET NEW DEVICE

incr OFFSET from (O + OF _UN) to (3 & UNIT_SIZE + OF_UN) by UNIT_SIZE do
begin

SEQ G4

VAX 11 Blies-16 V3-555
Page
69
SPIDERSUSERS
: (DOUCETTE .FALCON JCNRQAA .Bl 2 -7

1</

RD/RAX EXERCISER

MU TI DRIVE TEST ROUTINES
35139

14 Dec 1983 11:35:15

£ (.BST_DEV eql 0) or
(.8ST DEV eql (3 & UNIT SIZE
then
B8ST DEV = OF _UN

3140
3141
3142
3143
3144

else

3145

146

. 3147
3148
3149

BST_DEV =

3150

then

3151
3152

3153

3156

else

3155

3157

3158

BST_CNT

« RX_SEQ_CNT

BST_CNT = RD_SEQ_CNT;

SET_UPAR (.BST_DEV);
MAD1 [DK_NUM] = . CDISK;
MAD2 [DK_NUM] = _CDISK;

3163

end;

3162

return;

3164
3165

end;

3166
3167
3168
3169
3170
3171

end;
RANDOM SELECTION OF

DRIVES

this pert selects the device by the ratio

3187
3188

then

if (0O eql

.swp_ret)

SELECT_RD

= FALSE;

IF RDS1e SELECTED
COUNT NUMBER OF RDS1e AVAILABLE

increment counter from 0 to 100
in cese counter gets to large reinit to O
if counter greater than swap retio then do a rx-50

and reiniate the counter
if counter less then retio do a rd-51
if

if (100 eql .swp_ret)
then
SELECT_RD = true;

XY XL RT3

3192
3193
3194

!
!
e

if (.reat_count
les .swp_rat)
¢then
SELECT_RD = true
else
SELECT_RD = falee;

= 0

rat_count = .rat_count ¢+ 1;
if (.rat_count T.q 100) then rat_count

3176
3177
3178
3179
3180
3181
3182
3183
3184
3185

3189
3190
3191

OF _UN))

.BST_DEV + UNIT_SIZE;

3159
3160
3161

3186

PageJ 70

SPIDER$USERS: {DOUCETTE.FALCONICNRQAA . BL2 (23

.CST_ADDR [.BST_DEV, D_TYPE] eql RX_50

then

3174
3175

SEQ OGS

begin

3154

3172
3173

VAX 11 Blies 16 V3 S55

if (.CST_ADDR {.BST_DEV, D_PRES]) eaql PRESENT) and
(.CST_ADDR [ .BST DEvV, D STAT]) eql ONLINE) andg
(not .CST_ADDR {.BST_DEvV, D_FATAL))

®s

G+

B¢

W»

vol.C

15 Dec 1983 10:35:57

‘-

NRQAM 3

reatio equal

100 do rd

if ratio equals O do rx

|/
RD/RX EXERCISER
MU TI ORIVE TEST ROUTINES

%
NRQAM

3195
3196
3197
3198
3199
3200
3201
3202
3203
3204
3205
3206

3207
3208
3209
3210
3211
3212
3213
3214
3215
3216
3217
3218
3219
3220
3221
3222
3223
3224
3225
3226
3227
3228
3229
3230
3231
3232
3233
3234
3235
3236
3237
3238
3239
3240
3241
3242
3243

3244
3245
3246
3247
3248
3249
3250

.SELECT

1983 10:35:57
1983 11:35:15

SEQ Oc#

VAX 11 Bliss-16 v3-555
Page
71
SPIDERSUSERS:{DOUCETTE.FALCONICNRAAA.BLZ (22

then
nn

_COUNT = 0;
incr OFFSET

from (O

OF _UN) to (3 # UNIT_SIZE

if (.CST_ADDR [.OFFSET,

COUNT

THE NUMBER OF RDs IN THE SYSTEM

OF UN) by UNIT

SIZE do

D_PRES] eql PRESENT) and

(.CST ADDR [ .OFFSET, D_STAT] eql ONLINE) and
(.CST_ADOR [.OFFSET, D_TYPE] eql RD_51) and
(not .CST_ADDR [.OFFSET, D FATAL])

then

g?SRAGE [ .MOD_COUNT] = _OFFSET;
:23_COUNT

_MOD COUNT

]

SELECT ON OF THE RDS1s
if

.MOD_COUNT neq O

then

IF AT LEAST ON RDS1 PRESENT

begin

TBL_COUNT

= O;

do
in

SET_UPAR (.STORAGE ([(.RANDOM [ .TBL _COUNT) end #0°'077777') mod .MOD COUNT]);

Ig:_COUNY =

_TBL_COUNT

«+ 1;

until ((.CST_ADOR [.CUOFF, D_PRES] eql PRESENT) and
(.CST_ADOR [.CUOFF, D_STAT] eal ONLINE) end

(not .CST_AODDR [.CUOFF, D_FATAL])) or

(.TBL_COUNT eql RDM_LEN);
MAD1 [DX_NUM]
MAD2 [DK_NUM]
return;

=
=

_COISK;
_CDISK;

end;
end;
XL XL XL ETY

B¢

WS¢

®r

vOol.¢

15 Dec
14 Dec

IF NO RDS1 SELECTED,

SELECT AN RX50

COUNT THE NUMBER OF RX50s
MOD_COUNT

= O3

incr OFFSET from (O +

OF _UN) to (3 s UNIT_SIZE + OF _UN) by UNIT_SIZE do

if (.CST_ADDR [.OFFSET,
(.CST_ADDR ([ .OFFSET,

D_PRES) eal PRESENT) and
D_STAT] eql ONLINE) end

M/
RD /RX EXERCISER
MU TT DRIVE TEST ROUTINES

NRQAM3

owe

®r

®1

®e

@1
8

®e

®Y

G¢

vOl1.0

3261
3262
3263
3264
3265
3266
3267
3268
3269
3270
3271
3272
3273

then

STORAGE [ .MOD_COUNT] =
MOD _COUNT = _MOD_COUNT

end;

_OFFSET;
+ 1;

! AND CHOOSE ONE!
if .MOD_COUNT
then
begin

TBL_COUNT

neq O

= 0;

do
in

SET_UPAR (.STORAGE [(.RANDOM [.TBL_COUNT] and #0'077777') mod .MOD_COUNT]);
TBL_COUNT

_TBL_COUNT

end

until ((.CST_ADDR (.CUOFF, D_PRES) eql PRESENT) and
(.CST_ADOR [.CUOFF, D_STAT] eql ONLINE) and
(not .CST_ADDR [.CUOFF, D_FATAL1])) or
(.TBL_COUNT eql ROM_LEN);

3276

3277
3278
3279
3280
32681
3282
3283

MAD1 {DK_NUM]
MAD2 [DK_NUM]

=
=«

_COISK;
_CDISK;

return;

end;

IF NO UNIT SELECTED SO FAR BY ABOVE METHOD,

SELECT ANY ONE AT RANDOM

COUNT ALL UNITS AVAILABLE
MOD _COUNT

= O;

incr OFFSET from (O +

OF _UN) to (3 & UNIT_SIZE

i (.CST_ADDR [ .OFFSET,

OF UN) by UNIT_SIZE do

D_PRES] eal PRESENT) and

(.CST_ADDR (.CFFSET, D_STAT] eql ONLINE) and
(not .CST_ADDR [ .OFFSET, D_FATAL]))

then

g?&AGE (.MOD_COUNT] = _OFFSET;
in

HQ;-CO\NT

MOD_COUNT

end;

! SELECT ANY ONE ONE UNIT AT RANOOM
[}

.MOD_CP

then

T neq O

SEQ Oc7

VAX 11 Bl ss 16 V3 555
Pege
12
SPIDFR$USERS:{DOUCETTE.FALCONICNRGAR.BL2 (25

[]

3274
3275

3284
3285
3286
3287
3288
32089
3290
3291
3292
3293
3294
3295
3296
3297
3298
3299
3300
3301
3302
3303
3304
3305
3306

1983 10:35:57
1983 11:35:15

(.CST_ADDR [.OFFSET, D TYPE] eql RX 50) and
(not .CST_ADDR ({.OFFSEY, D FATAL))

3251
3252
3253

3254
3255
3256
3257
3258
3259
3260

15 Dec
14 Dec

N/
RO /RX EXERCISER
MU TI DRIVE TEST ROUTINES

S
NRQAM

®s

vOol1.¢C

001246
001246

3307
3308

begin
8L COUNT

3309
3310
3311

3312
3313

3330

begin

MAD1 (DK_NUM)

!
!

else

EOP_FLAG

000024

_CDISK;

TRUE;

end;

! ROUTINE QIO_UNIT

000000

0000006

032737
001136
032737
001132
005737
001433
013700
006300
063700
032710
001423
013700
006300

000002

000000G

001000

000000G

001230
001232
000000G
040000
001232
000000G

LPSECT

$GGGS,

.MORD

L.SBTTL
.PSECT

QIO.UNIT MULTI-DRIVE
$CODES$,
RO

RAT
. COUNT :

004137

063700

DCT_ADOR {IG_INT])
end;

007110

000012
000014

.MOD COUNT]);

DECLARE END-OF -PASS IF NO UNIT ONLINE

3332
3313

3335

= O;

MAD2 [DK NUM])
return
end

3331

3334

SEQ 0218
VAX 11 Blies-16 v3-555
Page
SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA .BL2 (23

until ((.CST_ADDR (.CUOFF, D_PRES] eql PRESENT) and
(.CST_ADDR [.CUOrF, D_STAT] eql ONLINE) and
(rnot .CST_ADDR [.CUOFF, D_FATAL])) or
(.TBL_COUNT eql RDM_LEN);

3320

3328
3329

10:35:57
11:35:15

end

3315
3316
3317
gglg

1983
1983

SET
UPAR (.STORAGE [(.RANOOM [ .TBL COUNT) and #0'077777') mod
TBL_COUNT = . ToL COUNT . 1;

3314

3321
3322
1323
3324
3325
3336

15 Dec
14 Dec

QIO.UNIT:

JOR
8IT
BNE
817
BNE
TST
BEQ
MOV
ASL
ADD
8I1Y
BEQ
MOV
ASL
ADD

R1,$SAVE3
22 ,5WP . FLAGS
94
#1000, SWP .FLAGS
93
B8ST.CNT
1¢
BST.DEV,.RO
RO
CST.ADDR,RO
640000, (RO)
1s
BST.DEV,RO
RO
CST.ADDR,RO

TEST ROUTINES

;
H

3083
3118

;

3119
.
3122

3128

3124

]

1% Dec
i® Dec

013700
006 300
063700
032710
001440
032710
001433
032710
001032

132710
001004
0127%7
000403
0127%?
013746
004737
013700
013760
018700
013760
003726
000207

062701
020127
003706
003237
023727
002402
003037

013701
V2301
0020083

112700

000401

105000
020127
00100&
112700
005701

MOV
"0y

o3 ,R}

001232

010000

MOV

8ST.DEV,RO

. DEV
05,857

ASL

8IY
B8EQ
81v
B8EQ
384

#40000,(R0O)
as

R
,RO
CST.ADO
:20000.(“0)
'
€1C000,(RO)

4 ,(RO)

6t
:120.BSI.CNY
s

04160,85T7 ,CNT
B8SY . DEV, -(SP)
PC,.SET UPAR

64
Ts:

MADL RO

COISK,16(R0O)

MADZ2 RO

COISK,16(RO)
(SP).

000003
000022

8s-

001246
001246

001246
0000006
001246

000144

%5 ,R1

R1,022

24
, COUNT
RAT

0000N1

s, OFFSET

OFFSET,»

RAT . COUNT 0144

10¢

. COUNT
RAT

SWP .RAT R1

10¢:

RAT _COUNT ,R1
11¢
o1 .RO

000001

000144

o DFESETY

RO, 022

3.8ST.0Ev
Ss

0012%0

004160
0012530
001232
0000006
000164
0000006 000016
000166
0000006 000016

8SY.DEv.RO
3

MOV

8lTe
000120

857 .CNnY

»
w

€10000.(RO)
1

001282

857 .0¢v . RO
R0
RO
CSY.ADDR

012737
000403
062737

- ¢

920000,
(RG )
18

DeC

Cre

bege 4

134

0 G v

PIDE RS )SERS : (DOUCE TTE .5 AL CONICNRIAA W 2

®c

ASL

VAX i1 81 we 16 ¢3 35%

el
oo

082710
0014193
013700
006300
065700
0382710
001003
005837
000447
012703
213700
001408
020027
001004

198 10:35:5?
1998 11:%5:1%

12¢

RO
R1.0144

11¢:

12¢;
13¢:

TSt

138
®1,R0O

s,SELECT.RD

3178

SELECT.RD

3176
3180
3182

s,SELECT.ROD

g%::

D Rx EXFRCISER
MATLI DRIVE TEST

S
NRJAM
01

000 36¢
000370

000372
000374
0001376
000400

000404
000406
000410
000414
000422
000426

0004 34
0004 36

000442
000444
000446
000450
000452
000436
000460
000464
000470
000472
0004 74

0004 76

000502
000512
000516

000322
000530
000334
000340
000542
000550
000332
000356
000370
000572
000576

000610
000612
000616

001001
103000
006000
103103
105008
012701
010100
006 300
065700
032710
0031417
032710
001414
132710
001411
032710
001006
005000

S
ROLTIM

:
148

000003

158:

105203

020000

010000

000005

120227
001335
000504
105003
012701

000020

001510

010100

000022

ROR

8cc
CLRB

MoV
ASL

ASL

164
:

MOV
INCB
BLE
1ST8
BEQ

17¢:

ASL

MoV

010000

000003

18%:
19%;

208

168
#20000, (RO)
16¢
4 ,(RO)
16¢

SELECT.RD

3188

;
;
1

MOD.COUNT
o OFFSET
OFFSET,e

3199
3201
3203

3196

3204

3205

3206

RO
R3,RO
RO
R1,STORAGE(RO)
R3
5,R1
R1,022

:
s MOD.COUNT,»

3209

€10000,(R0O)
168

15¢

OFFSET,»

:
;s

MO0 .COUNT
»,0FFSETY

OFFSET,»

3210
3201

MOD.COUNT

3217

+ 18L.COUNT

;ggg

s
RANDOM(RO), -(SP)
#100000,(SP)
-(SP)
R3,(SP)

PC.BL $1M00

TBL.COUNT
,

; MOD.COUNT
s

STORAGE(RO),(SP)

PC,SET.UPAR
R2

(SP)+,(SP).
CUOFF ,RO

#40000, (RO)
164
920000, (R0O)
18¢
#10000,(R0O)
244
R2, 020
179
244

CLRB
MOV
MOV

[

SPIDEROUSEQS:(DOUCElii.FALCON]CNIOQl.;P; (e3

;

817

BNE

SEQ 0301,

#40000, (RO)

8IY
8EQ

11:35:1%5

VAX 11 Bl
. ee 16 V3 5355

CST.ADOR,RO

ASL

B8EQ
817
8EQ

020000

o3 ,R]
R1,R0
RO

8Is8

MoV
JSR
INCB

040000

193

CLR

MOV
BIC
CLR
MOve
JSR

000074

1988

CLR8

ASL

000116
100000

1988 10:35:57

148

RO
RO

BNE
CLR
81s8

000074

062701
020127
003745
105703
001445
103002
003000
150200
006300
016046
042716
003046
110316
004787
006300
016016
004737
103202
022626
013700
006300
063700
032710
001406
032710
001403
032710

BNt
CLR8

eIy
BEQ
BIT
BEQ
BIT8
8EQ
BIT

040000

Dec

14 4 Dec

MOV

150300

006300
010160

1 TBL.CQUNTY
3
:

322%
3223
3227

3228

3229

1 TBL.COUNT,

3230

3
3 MOD.COUNT

3232
324S
3247

CST.ADOR,RO

R3
03,R1
R1,R0

&, 0FFSEY

e
1 OFFSET,

3249

()¢
RD/RX

2
NRQAM
vO01.0

00062¢
000622
000626
000632

0006 34
000640
000642
000646
000650
000654
000656

000670
000672
000676
000702
000704
000706
000710
000712
000714
000716
000720
000724
000730

000732
000734
000740

000742
000746

000752
000754
000756
000762
000 764
000770
000774
000776
001002
001004
001010
001012
001016
001020
001022
001024
001030
001032
001034
001040
001044
001046
001052
001054

MATI DRIVE
006 300
063700
032710
001417
032710
001414
132710
001011
032710
001006
005000
150300
006300
010160

105203

062701
020127
003745

TEST ROUTINES
ASi
ADD

817
BEQ

040000

8IT

020000

B8EQ

BIt8
BNE
)4
BNE
CLR
8IsB

010000

ASL

000074
000005
000022

21s:

224:

004737
006 300
016016
004737
105202
022626
013700
006300
063700
032710
001406
032710
001403
032710
001505

120227

001335
000301
105003
012701

817

020000

817

8rQ

244
25¢:

010100

006300
063700
022710
001414
032710
001411
032710

8tEQ
CLR8
CLR
BIS8

040000

234:

264:;
040000

020000
010000

RO
R3,RO
RO

3250

3251
3252
MOD .COUNT , »

s
OFFSET,

ASL

000020

240000, (RO)
214
420000, (RO)
21
#4,(RO)
21t
910000, (RO)
21

1,022

ASL

010000

CST.ADDR,RO

crP
BLE

MOV
JSK
INCB
crp
MOV

000074

OFFSETY,»
. COUNT
10D

MOV
B8IC
CLR
MOVv8
JSR

110316

SEQ 001
74
VAX 11 Blies-16 v3 S55
age
SPIDERSUSERS
: (DOUCETTE . FALCONICNRQAA BL 2 (23

R1,STORAGE(RO)
R3

ASL

000116
100000

1983 10:3%:57
198% 11:35:15

MOV
INCB

1578

105703
001445
105002

005000
150200
006300
016046
042716
005046

1% Dec
14 Dec

EXERCISER

817
8tEqQ

CLRS

MOV
MOV
ASL

817
B8EQ
BIT
B8EQ
817

#5,R1

20t
RY

254

R2
RO

R2,RO

RO
RANDOM(RO), -(SP)

32395

o, OFFSETY

3247

. COUNT
MO0

3263

TBL .COUNT

3266
3270

TBL.COUN
,T
o

#100000,(SP)

-(SP)
R3,(SP)

PC.BL $M00
RO

STORAGE(RO),(SP)
PC,SET.UPAR

(SP)+ ,(SP)e
CUOFF ,RO

MOD.COUNT,
»

T8L
. COUNT

5271
3269
3273

CST.ADOR,RO
#40000, (RO)

238

#2000C, (RO)

5274

910000, (RO)
30¢
R2,820

3275

234

224
304

R3
#3,R1
R1,.RO
RO

TBL.COUN,T
¢

3276

D
. COUNT
M0
o, OFFSET

5278
5289
3291
3293

,»
OFFSET

CST.ADOR,RO
#40000,(RO)
274
#20000,(R0O)
27¢
210000, (RO)

3294
3295

RD/Rx EXERCISER

NRQAMS

MA TT

v0l1.C

ORIVE

TEST

15 Dec
14 Dec

ROUTINES

1983 10:35:57
1983 11:35:15

SEQ 21Ge
VAX 11 Bl es 16 v3-555
Pege
77
SPIDERSUSERS
: {OOUCETTE .FALCONJCNRIAA BL2 (27

)

001060
001062
001064
001006

001070
001074
001076

001102
001106
001110
001112
001114
001116
001120
001122
001124
001130
001134
001136
001140
001144
001146
001152
001156
001160
001162
001166

001170
001174
001200
001202
001206
001210
001214
001216
001222
001224
001230
001236
001242
001230
001252
001260
001266
:

150300

006300
010160

105203
062701

020127
003750
105703
001457
105002
005000
150200
006300
016040
042716

005046
110316
004737
006300

016016
004737
105202
022626
013700
006300

063700

052710
001406
032710
001403
032710
001403
120227
001335
013700
013760
013700
013760
000207

112737
032777
000207

Routine Size:

274
RO
R3,RO

BNE
CLR
8IsB
ASL

001006
005000

000074

000005

274;

000022

,»
MOD.COUNT

R1,STORAGE(RO)
RS

OFFSET,»

cHp
BLE

R1, 822
26¢

OFFSET,

B8EQ

31¢

MOV
INCB
ADD

S ,R1

0000006

3305

CLR8
CLR
81s8

R2
RO
R2,RO

TBL.COUNT

;gog

;
i

TBL.COUNT
e

MOV
8IC
CLR
MOV
JSR

RANDOM(RO), -(SP)
#100000,(SP)
-(SP)
R3,(SP)
PC,BL$MOD

ASL

0000006

MOV

0000006
040000

ADD
BIT

020000

817

000020

29%:

000164
0000006 000016
000166°
000000G 000016

30¢:

000001
040000

31¢:

000000G
000000G

STORAGE(RO),(SP)
PC,SET,UPAR
R2

CSP)e,(SP)e

CUOFF ,RO

ASL

BEQ

294

;s MOD.COUNT,
s

TBL .COUNT

3313
3311

3315

3316

3317

s
; TBL.COUNT,

3318

3320

3321

3307

CST.ADDR,RO
#40000, (RO)
420000, (RO)

BEQ
BIT
BEQ

294
#10000,(R0O)
304

BNE
MOV
MOV
MOV
MOV

289
MAD1,RO
CDISK,16(RO)
MAD2,RO
COISK,16(RO)

MOV
8IS

1 ,E0P
. FLAG
. ADDR
#40000,80CT

R2, 820

RTS

$CODES
348 wordes,
Routine Baese:
7 words
invocetion:

; Maximum steck depth per

cre

010000

3299
3291

MOD.COUNT

MOV
JSR
INCB

000074
0000006

MOD.COUNT
o, 0OFFSET

ASL

000116’
100000

;
;

3298

1578

284
:

PC
+

7110

:
H
:

3331
3332
30483

RD/RX EXERCISER

15 Dec

MA TI DRIVE TEST ROUTINES

NRQAM2
vOl1.¢

1983

10:35:57

14 Dec 1983 11:35:15

VAX-11 Bliss 16 v3-55%5

: novelue *

[HK
]

THIS ROUTINE IS CALLED BY QIO_GEN TO SELECT
Y0 BE USED FOR THE CURRENT QIO OR QIO PAIR.

BY THE FOLLWING ALGORITHM:

[

[]

THE CHOSEN UNIY

THEN

[}

Be
80

[]

THE I/0 FUNCTION (OPCOOE)
THE FUNCTION IS DETERMINED

IS PROTECTED
READ

FUNCTION (WRITE OR READ)
NUMBER

[]

FUNCTION

ELSE (UNPROTECTED)

[]

(S BASED ON A RANODOM

[]

IN ADDITION, IF THE OPERATOR SELECTED THE OPTION OF PERFORMING WRITE
COMPARES AT THE HOST, AND IF A "WRITE" FUNCTION WAS CHOSEN ABOVE FOR

[]

THE FIRST QIO, THEN A “READ* OPCODE IS LOADED INTQ THE SECOND MSCP
ENVELOPE. OTHERWISE, THE SECOND MSCP ENVELOPE IS RETURNED TO THE POOL.

[]

[}

[]

8¢

'
H

THIS ROUTINE ALSO DECIDES WHEATHER IV IS TIME TO RUN THE DUP EXERCISER.
THE EXERCISER WRITES 25 LBNS FOR EVERY 1 DBN FOR INITIALIZATION

'
'

REASONS THE MULTIPLE OF 25 LBNS CAN BE READ FOR 1 s MALTIPLE OF DBNS.
ODUP EXERCISER MRITES X BLOCKS PER PASS THRU THE DUP ROUTINE.
THERFORE

H
H
!

25 & X.
SO EVERY 25¢X LBN'S READ OFF A WINCHESTER UNIT X OBN'S WILL
8E READ IF ASKED BY THE USER.,
X is :;Ermntod bE the VARIABLE "DUPROUND".
DUPROUND MAY BE CHANGED IN THE SOF TW
QUESTION
GIVEN AT THE START OF

H
H
!
'
H

THE CONTROLLER AND CONTINUES AS IF THE REGULAR MSCP EXERCISER WAS
NEVER INTERRUPTED.
NOTE THAT THE REINITIALIZATION PROCESSES TAKES
A COUPLE OF SECONDS WHICH ONCE ADDED UP AFTER A COUPLE MILLION READS
CAN PROVE TO BE QUITE TIMELY.
THERFORE I SUGGEST THAT IF A LARGE AMOUNT OF
170 TRANFERS ARE YO BE DONE THE "DUPROUND" VARIABLE BE RAISED TO SPEED UP

THE RATIO OF 1 TO 25 MUST BE MATIPLIED SY

0¢

B¢

RUNNING THE EXERCISER PROGARM,

1 TO

THE DUP EXERCISER THEN REINITIALIZES

UP THE PROCESS.

S
G
G

[]

[]
[]

IMPLICIT INPUTS:

OF CURRENT CONTROLLER'S CST
CST_ADOR - ADORESS
CUOFF - CUIRENT UNIT CST OFFSET

IMPLICIT OUTPUTS:
THE OPCODE FIELD OF ONE OR BOTH MSCP ENVELOPES IS LCADED.

]

[]

X FOR A RATIO OF

3385

3387

S+

begin

3389
3390
3391

locel
FUNC : word;
SPRINTX (DER9);
!PRINTF (DER9);

OPCODE (READ OR WRITE)

IF ((.CST_ADOR [ .CUOFF « 4,D_COUNT) LEQ 0) AND
(.CST_ADDR [ .CUOFF,D_TYPE) EQL RD_51) AND
géar-noon (.CUOFF + 3, NODUPMEDIA] NEG 1))
BEGIN

SEO 0103

SPIDERSUSERS: [DOUCETTE.FALCON JCNRQAR ;5 (ca

routine QI0O_FUNC

)

¢ IF MSCP FUNC CNT EQUAL 10 O
tIF WINCHESTER DISK
tIF NODUPMEDIA FLAG BIT IS CLEAR

(¥
MATI DRIVE

e«

®w

3392
3398
1394
3395
3396
3397
3398
*399
3400
3401
3402
3403
3404
3405
3406
3407
3408

®e
e
@

3409
3410
3411
3412
3413
3414
3415
3416
3417

CIOUNTER

3418
3419
3420
3421
3422
3423
3424
3425
3426
3427
3428
3429
3430
3431
3432

3433
3434
3435
3436
54537
3438
3439

PUT _PKT

MX2

CST_ADDR [.CUOFF

« 3, DUPERROR]

= 0

CST_ADDR [.CUOFF

+ 3, DUPERROR)

(25 ¢

IPRINTX (DBM111);
CST_ADDR ([ .CUOFF + 4,

!
!

D_COUNT]

SEQ 04

16 v3-5%%

]

SPIDER'USERS:(DMEYVE.FALCON]CMOAA.‘!.[O; (28

RETURN 1ST ENVELOPE TO POOL
! INDICATE FAILURE
1CLEAR DUP ERROR FLAG
! DO DUP TEST
{CLEAR DUP ERROR FLAG
! PRINT MSCP EXERCISER REINIT
.cupround);
! REINITIALIZE MSCP FUNC COUNTER

0060000080080000000000000000ss THIS SECTION REINTIALIZES 2 ENVOLOPES SO THE MSCP EXERCISER CAN
560000000000000008008000080s800s¢s PROCEED AS BEFORE

DUP_FLAGS =

.DUP_FLAGS OR SWP_DINT;

OUP_FLAGS »

.OUP_FLAGS AND (NOT SWP _DINT);

INIT_TEST (),

MX2 =

11 Blies

(.MX2);

-1

ouUP (),

ASSUME FAILURE IN SECURING 2ND ENVELOPE
TRY TO GET 1ST ENVELOPE.
IF FAILURE
NO POINT IN CONTINUING
TRY TO GET 2ND ENVELOPE.
IF FAILURE

-1,

OR (.EOP_FLAG)

THEN

RETURN;

THEN

BEGIN

IF (MX2 = GET_PKT (.CCTLR)) LSS O
OR (.EOP FLAG)
!

RETURN 1ST ENVELOPE TO POOL
¢ INDICATE FAILURE
! DONE

PUT_PKT (.MX1);

MXL

-1;

RE TURN;
END;

MADL1
MAD2

= MSCP_PKT
= MSCP PKT

GET _RANDOM ();
QIO_UNRIT (),

o
o

THE OUP EXERCISER STARTED #sssccssessss00sen

FLAL
SET DUP INI
THIS REINITIALIZE. THE CONTROLLER FOR MSCP MODE
CLEAR DUP INIT FLAG

!
¢

(MX1 = GET_PKT (.CCTLR)) LSS O

CALCULATE STARTING ADDRESSES
OF BOTH ENVELOPES
GENERATE A SET OF RANDOM NUMBERS
LOAD RANDOM UNIT NUMBER INTO ENVELOPES

(.MX1 & PKY_LEN »
(.MX2 & PKT_LEN

END;
1000800000000 8604080880080800880888008888800500008808880884880688082880080008008

START OF ROUTINE MSCP

1008080004000 080000880088800880808088008008808080888880008800800000480400808048

CST_ADOR {.CUOFF

+ 4, D_COUNT)

MAD2 (OFCODE]

.CST_ADOR

then

FUNC

elee
¢

[.CUOFF,

D_PROT) eal PROTECTED

end 1)

OP_RD

FUNC

OP_WRT,;

begin

IF UNIT IS PROTECTED

SET FUNCTION TO READ

¢ USE 2ND RANDOM NUMBER TO SELECT
!

(OPCODE)

-1

ASSUME 2ND PACKET NOT NEEDED

FUNC

(MAD1

then

.CST_ADDR [.CUOFF + 4, D_COUNT])

= O,

i? (.RANDOM (1]
then

= OP_RD

elee

3440
344)

3442
3443
3444
3445
3446
3447

VAX

14 Dec 1983 11:35:15

TEST ROUTINES

.FUNC) eaql OP_WRT

READ
WRITE

v0l.¢

1983 10:35:57

15 Dec

RD/RXx EXERCISER

S
NRQAM

LOAD CHOSEN OPCOOE
.

IF WRITE

¢ DECREMENT MSCP FUN

.
RD/Rx EXERCISER
MATI DRIVE TEST

B+

NRGAMS
v01.C

MAD1

5448

3449
3450
3451
3452
3452
3454

3463
3464
3465
3466
3467
3468
3469
3470
3471
3472
3473
3474
3475
3476

if BIT
then

000010
000014

000016

000022

SWF

CWC)

= MO_CMP:

(SWP _FLAGS,

SWF

HWC)

= OP RD;

MAD2 [(CMD TYPE]

= NON SEQ_CMD;

1983
1983

10:35:57
11:3%:15

VAX 11 8l.¢s 16 V3 55%
Page
80
SPIDERSUSERS: [DOUCETTE .FALCONICNRQAN .BL
2 (24

NON SEQUENTIAL COMMAND

ADD COMPARE MODIF IER

IF HOST DOES WRITE COMPARES

CONTROLLER DOES WRITE

COMPAREC

SET READ OPCODE INTO 2ND MSCP PACKET

NON SEQUENTIAL COMMAND

NON-SEQUENTIAL COMMAND

IF CONTROLLER DOES READ COMPARES

ADD COMPARE MODIFIER

IF NO OPCODE IN 2ND PACKETY

!
!

RETURN 2ND PACKET TO POOL
MARK IT UNUSED

end;

else

end
in

1 {CHMD_TYPE]
' BIT_TST

then

MAD1

= NON_SEQ_CMD;

(SWP_FLAGS,

[(MODIFY])

SWF_CRC)

= MD_CMP;

FUNCTION

IS READ

end;

.MAD2 (OPCOOE] eql O

then

PUT _PKT (.MX2);
MX2 = -1;

end;

! ROUTINE QIO_FUNC

end;

.SBYTL
QIO.FUNC:
JSR
MOV

004137

013702
013701
010100
006300
060200
005760
003166
010100
006300
060200
132710
001560
010100
006300
060200
005760
100552
013746
004737

(SWP_FLAGS,

(MODIFY)

TST

= NON SEQ (MO;

2 (OPCODE)

3477

3478
3479

TST

MAD1

3455
3456
3457
3438
3459

3460
3461
3462

(CMD_TYPE)

if BIT

15 Dec
14 Dec

ROUTINES

000010

MOV
MOV
ASL
ADD
757

867

MOV
ASL

ADD
B8ITB
8EQ
MOV

QIO.FUNC MULTI-ORIVE TEST ROUTINES
R1,$SAVE3

CST.ADDR,R2
CUOFF ,R1

3336
3386

R1,RO
RO
R2,R0O

10(RO)

R1,RO
RO
R2,R0O
#4,(RO)

5387

3388

ASL

000162

ADD
TS7
BMI
MOV
JSR

3392
PC,PUT.PKT

I’J

15 Dec
14 Dec

RD/RX EXERCISER
MA TI DRIVE TEST ROUTINES

063700
005360
013700

8IC
JSR
MOV
ASL
ADD

8IC

MOV
ASL

MOV
MOV
JSR
MOV
BIS

000031
0000006
000010
000002
000212’
000002
000162
177777
000000G
000000G
000160

JSR
BIC

MOV
MOV
JSR
MOV

BLY
8Iv8e
8NE

000001

MOV
JSR

0000006
0000006
000162°
000001

000160
0000006
177777
000160’

000160
000104
0000006
0000006
000164
000162
000104
0000006
0000006
000166
007000’
007110
000010
0000006

0000006
000010
000166°

1¢:

24:
3:

MOV
8LY
1:281:)
BEQ
MOV
JSR
MOV
RTS

MOV
MOV
JSR

MOV
MOV
MOV
JSR
MOV
JSR
JSR
4%:

MOV
ASL

ADD
DEC
MOV

&-1,MX2

CUOFF ,RO

3
H

13912
1394

CST.ADOR,RO
240000,6(R0O)
PC,0UP
CUOF¥ ,RO

H
H

3395
31396

3398

CST.ADDR,RO

#40000,6(R0O)

CUOFF ,R1

CST.ADDR,R1
DUPROUND, (SP)
PC,.BLEMUL
RO,10(R1)
#2.0UP
. FLAGS
PC,INIT.TEST
#2,0U
. FLAGS
P

3403

3405
3407
3408

&-1,Mx2

CCTLR,(SP)

PC,GET.PKT
RO, MX1

0%.EOP.FLAG

CCTLR,(SP)

PC,.GET
. PKT
RO, MX2
1¢
1 ,EQOP.FLAG

3¢

PC.PUT, PKY

H
H

3336
3411

3412

3414
3415
3411
3413
3419

-1 ,Mx1

(SP)+,(SP).

PC
MXx1,(SP)

PC.BLMUL
MSCP
. PKT RO
RO,MAD1

MX2,(SP)
#104, -(SP)

3420

PC.BLSMUL

MSCP
. PKT RO

RO ,MAD2
PC,GET
. RANDOM
PC,QI0.UNIT
#10,5P

CUOFF ,RO

MOV
MOV
ASL
ADD

002404
132737
001411
013716
004737
012737
022626
000207
013716
012746
004737
062700
010037
013716
012746
004737
062700
010037
004737
004737
062706
013700
006300

0CO162°

®e

004737
013700
006300
063700
042760
013701
006301
063701
013716
012746
004737
010061
052737
004737
042737
012737
013716
004737
010037
002426
132737
001022
013716
004737
010037

177777

SEQ 0%0%
VAX 11 Bliss 16 V3 S55
Page
81
SPIDERSUSERS
: (DOUCETTE .FALCONICNRQAA . BL2 (24

012737
013700
006 300
063700
042760

1983 10:35:57
1983 11:35:15

3421
3422
3390
3430

CST.ADDR,RO
10(R0O)

MAD2,RC

3432

J&
RD/RX

NRQAM?R

MU TI

v01.C

000426

0004 32
0004 34
0004 36
000442
000444
000450
000454
000456
000464
000466
000472
0004 74
000300
000504
000310
000514
000520

000522
000530
000534
000536
000544

000550
000552
000556
000562
000570
000572

000600
000604
000606

000614
000616
000620
000624
0006 30

000636

000640
;

;

012703
060003
1050135
013700
006300
063700
032710
001404
032737
001403
012701
000402
012701
013700
013702

110160
020127
001024
012760
032702
001403
012760

032702
001421
112713
013701
012761
000411
012760
032702
001403
012760

105713
001010
013746
004737
012737
005726
000207

Routine

EXERCISER

DRIVE

TEST

ROUTINES

000120

000041

S¢:

000042
000164
0000006
000022

64:
7¢:

000042

000002
000020

000024

8s:

000041
000166
000002
000002
000004

040000
000162’
000000G

177777

000024

10¢:

000162°

11s:

og;

SPIDERSUSERS: {OOUCETTE ,FALCONICNRQAK .BL2 (24

3434

S$
€01 ,RANDOM.2
68
041 ,R1
7%
042 ,R1
MAD1.RO

H
:

3436
3439

R1,042
94
02,4(RO)
#20,R2

CST.ADDR,RO
#100000, (RO)

B1T
BEQ
BIT
BEQ
MOV

BR
MOV

MOV
MOV

SWP FLAGS,R2
R1,22(RO)

MOVB
cHP
BNE
MOV
81T
BEQ
MOV
BIT
BEQ
HOVB
MOV
MOV
B8R
MOV

8s
940000, 24(RO)
040 ,R2
10¢
#41,(R3)
MAD2,R1
02,4(R1)
10¢
42,4(RO)
o4 ,R2
104
840000, 24(R0O)

BIT
9€Q
MOV

(R3)

7578

BNE
MOV
JSR
MOV
TS7

118
MX2, -(SP)

PC.PUT PKY
#-1,MX2

(SP).

RTS

Size:
Routine Bese:
$CODES$
209 words,
Maximum stack depth per invocation:
9 words

SEQ 0207

ADD

000000C:
100000

040000
000040

(R3)
CUOFF ,RO

CLRB
MOV
ASL

0000006

VAX-11 Blies-16 Vv3-555

022 ,R3
RO,R3

MOV
ADD

000022

000001

15-Dec-1983 10:35:57
14 Dec 1983 11:35:15

10400

&, FUNC

;

&, FUNC

H
:
;

FUNC,
s
FUNC,»

3341

3439
3443

3445
3450
3445

3448

H
H

3452
3454

;
H

3457
3458

;
:

3445
3464

H
H

3468
3472

3475

;

3450

3466

3476

3474

3336

< p?
RD/RX EXERCISER

L IR

MA TI ORIVE

®C

@r
&

3492
3493
3494
3495
3496
3497
3498
3499
3500
3501
3502
3503
3504
3505
3506

3507

3508
3509
3510

®s

3511

3512
3513
3514
3315
3516
3517
3518
3519

3520
3521
3522
3523
3524
3525
3526
3527
3528
3529

3530

3531
3532
3533
3534
3535

10:35:57

VAX-11 Blies-16 Vv3-955

1983 11:35:15

SEQ 0/()p
Pege

NOVALUE

I T T DS

;

COMMON INITIALIZATION AND OTHER ROUTINES COULD BE USED.

THE DUP EXCERSIZER WILL RUN A READ ONLY OR A WRITE/READ COMPARE
TO THE DIAGONOSTIC BLOCKS OR DBN'S.
IT WILL RECORD
THE STATICS IN THE TALLY TABLES.

THE PROGRAM USES CONTROLLER LOCAL PROGRAMS TO WRITE AND READ THE DBN S

WHEN WRITTING TO THE DBN'S A ONE WORD PATTERN WILL BE SELECTED
AND COPY

TO A 256 WORD BLOCK.

THE ROUTINE WILL WRITE

“DUPROUND'

AMOUNT

OF DON SEQUENTIAL BLOCKS.
IF A THERE ARE CONTROLLER LOCAL
PROGRAMS AND
IF THE USER SO DESIRES A WRITE AND READ OF EACH BLOCK AND A COMPARISON
TO THE DATA PATTERN WILL BE GIVEN TO TEST FOR FAULTY DBN‘'S.

THE USEP

DOES NOT WANT TO WRITE TO THE DBN'S ONLY A READ WILL BE GIVEN AND NO
COMPARISON WILL BE OONE.
THE BAD BLOCKS FOUND IN THE COMPARISON TEST
WILL NOT BE LISTED IN THE RCT TABLES.
AFTER THE EXERCISER HAS EXAMINE

“OUPROUND” AMOUNT OF

BLOCKS IT WILL

REg:géIATE THE ENVOLOPES SO THAT THE MSCP EXERCISER MAY CONTINUE AS
8E

IMPLICIT INPUTS:

CCTLR - CURRENT CONTROLLER NUMBER
CST_ADDRS
- CONTAINS THE CURRENT CONTROLLER STATUS TABLE

CUOFF

- CURRENT OFFSET IN CST TABLE FOR PARTICULAR DRIVE

IMPLICIT OUTPUTS:

S_PAITERN - PATTERN BEING WRITTEN TO AND READ FROM DBN'S

BEGIN
OuWN

TEMP

WORD;

!PRINTX (DBM110);
!PRINTX (DER10);
S_PATTERN =

.RANDOM (1];

(.CST_ADDR {.CUOFF + 3, D_DBN)

.dupround) GEG 144 THEN (CST_ADDR ([ .CUOFF
t

+ 3, D_DBN]

TEST TO SEE IF NEXT DBN'S TO LARGE

= 0);

! CIRCLE ARROUND IF OBN TO LARGE

00
N

MSCP_PKT [.MX1, MSGLEN] = SZ_GODS;
MSCP_PKT [.MXx1, OPCODE) = OP_GDS;:
MSCP_PKT [.MXx1, MODIFY] = O;
IF

OMMAND (),

.csv,m (.CUOFF + 3,

RETURN;

DUPERROR] EGL 1

PACKET SIZE
OPCOOE = GET DUST STATUS

GET DUST STATYS

SENDS AND RECEIVES THE COMMAND

tIF DUP ERROR THEN CLR FLAG & RETURN

IF .CST_ADOR [.CUOFF «+ 3, NOOUPMEDIA] EQL 1 THEN RETURN; ! IF DUP LOCAL MEDIA NOT THERE THEN RETURN
IF (MX1 = GET_PKT (.CCTLR)) LSS O
! TRY TO GET AN ENVELOPE. If FAILURE
OR (.EOP_FLAG)
THEN RETURN;

SPIDERSUSERS: ([DOUCETTE.F ALCONICNRQAA .BL2 (2%

THIS ROUTINE IS CALLED BY QIO_FUNC AFTER 25 & “DUPROUND" RD/WTS .
THIS EXERCISER WAS PLACED IN THE MIDDLE OF THE MSCP EXERCISER SO A

B BB I D I B D B

3491

14 Dec

1983

ROUTINE DUP

D IB TG CE I B IB LI I

3480
3481
3482
3483
3484
3485
3486
3487
3488
5489

TEST ROUTINES

D A D D D

15 Dec

NO POINT

IN CONTINUINC

L ¢
RD/RX EXERCISER
MU TI DRIVE TEST ROUTINES

@' ®s B¢ Wme B

@t B4 We S

Wi Gs @t @ws we e @

®»

c--.

. we

NRQAM
3
vOol.C

3536
3537
3538
3539
3540

UNTIL

END

.CST_ADDR {.CUOFF

TEMP «

. CST ADDR [.CUOFF

INCR DBNCNT FROM (. TEMP .+

10:35:57
11:35:15

SEQ 0207

VAX 11 Bliss 16 V3 555
Pege
SPIDERSUSERS:{DOUCETTE.FALCONICNRQAR
.BLe

84
o5

3, D ACTIVE) EQL IDLE;
+

D DBNI];

1) TO (.TEMP .+

.dupround) DO

INCREMENT FROM RELATIVE DBN

TO DBN

dupro

BEGIN

3541
3542
3543
3544
3545
3546

.CST_ADDR [.CUOFF

THEN

+ 3,

BEGIN

T_ADDR [T_DBN_WT)
DUPWRTDBN( ) ;

3547
3548
3549
3550

3551
3552
3553
3554
3555
3556
3557
3558
3559
3560

15 Dec-1983
18 Dec 1983

_T_ADDR (T DBN_WT])

.CST_?zgs [ .CUOFF + 3, DUPERROR]) EQL 1

END;

RETURN;

T_ADOR [(T_DBN_RD)

DUPREDDBN( ) ;
IF

DUPWRITE)

CALL ROUTINE

IN CSY

TABLE

THEN WRITE DBN S

TO HANDLE WRITTING ROUTINES

'IF DUP ERROR THEN CLR FLAG & RETURN

.T_ADDR (T_DBN_RD]

.CST_?&%R (.CUOFF + 3,
N

IF WRITE FLAG SET

DUPERROR] EGL 1

RETURN;

! CALL ROUTINE TO HANDLE READING DBN’S
'IF DUP ERROR THEN CLR FLAG & RETURN

END;
END;

001250
001250

TEMP:

Ol1242
000000
000004
000012
000016
000020
000024
000026
000032
000036
000042

004137
013737
013700
006300
063700
005001
156001
063701
020127
002402

000000G
000120’ 0000006
0000006

000160°

000110
000114
000116

013746
012746
004737
012760
112760
005060
004737
013700
006300
063700

DUP;

000006
0000006
000220

000104
0000006

000014

1%:
0000066

000001 000022G
0000246
000000V
0000906
0000006

$GGG$,

.BLKuW

LSBTTL
.PSECT

OUP MULTI-DRIVE TEST ROUTINES
$CODES,
RO

JSR
MOV
MOV

R1,$SAVES
RANDOM+2 ,S.PATTERN
CUOFF ,RO

ADD
CLR
8IS8
ADD
cP
eLT
CLRS

CST.ADDR ,RO
R1
6(R0O),R}
OUPROUND
,R1
R1,0220
14
6(RO)

ASL

0000006

000006

.PSECT

MOV

MOV
JSR

MOV

MOve
CLR
JSR
MOV
ASL
ADD

Mx1, -(SP)

4104, -(SP)
PC,BLSMUL

€14 ,MSCP . PKT+6(RO)

1 ,MSCP .PKT+22(RO)
MSCP.PKT+24(RO)
PC, DUPCOMMAND
CUOFF ,RO
RO
CST.ADDR,RO

H
:

3481
3519
3520

;

352%

:
:
:
:

3526
3527
3528
3529

Mes

000266
000272
000274
000300
000304
000310
000314
000316
000322
000330
000332
000336
000342
000346

000352
000354
000360
000362
000366
000372
000374
000376

BlT
BNt

000001

000000G
2s:

063700
032760
001024
013700
005260
004737
013700
006300
063700
010003
062703
032713
001003
005201
020102
003732
000207

Maximum

stack

CCTLR,(SP)
PC,GET.PKT
2t
01,E0P
. FLAG
34
(SP)+,(SP)+

RTS

cMp

(SP)+,(SP)
CUOFF ,RO

(RO),TEMP

CST.ADDR,RO
RO,R3
06 ,R3
TEMP ,R1

63
€10000,(R3)
Ss
T.ADOR,RO
S2(RO)
PC,DUPWRTDBN

8Iv
8EQ
MOV
INC
JSR
HOV

;

¢,DBNCNT

3540

3543
3546
3547
3548

C'E)”F RO

ASL

ADD
8IT
8NE
MOV
INC

CST.ADOR,RO
;:0000.6(R0)

MOV
ASL

CUOFF ,RO

3550
3552

T.ADDR,RO

S6(RO)

JSR

3553
3554

PC ,DUPREDOBN
RO

CST.ADDR,RO

ADD

RO,R3

MOV
ADD

130 words,
Rout ine Base:
depth per invocation:
7 words

3543

ADD
MOV
B8R

817
BNE
INC
cHP
BLE

RTS
$CODES

3540

DUPROUND ,R2
CUOFF RO

ADD
MOV

7¢:

3539

TEMP .1
TEMP ,R2

ASL

64:

3481
3535
3524
3537

CST.ADDR,RO
#6,R0O
€20000,(R0O)

MOV

S$;

3534

MOV
ADD

000000G

V3-555

RO, Mx1

BIT
BNE
MOve
CLRB

as:

1€

3481
3532
3481
3533

MOV
JSR
MOV
BL1T
81718
BEQ
cHP
MOV
ASL
ADD
ADD

010000

11 Blivs

®e

000000G
0000006
000160’

SEQ 0%:¢
age
8s
SPIDERSUSERS:
[DOUCETTE . FALCONICNRQAA BRL2 (25
VAX

TST
B8M1

000006

10:35:57
11:35:15

®ws

000006

004737
013700
006300

000400
000402
; Routine Size:
,

040000

ROUTINES

1983
1983

032760
001016
005760
100413
013716
004737
010037
002404
132737
001402
022626
000207
022626
013700
006 300
063700
062700
032710
001314
111037
105037
013702
063702
013700
006300
063700
010003
062703
013701
000443
032713
001417
013700
005260

15 Dec
14 Dec

®s

RD/RX EXERCISER
MA TI DRIVE TEST

: DBNCNT

;

3556
3540

DBNCNT,»
3481

11242

NRQAM3
v0l1.C

RD/RX EXERCISER
MWA TI DRIVE TEST ROUTINES

s B ee Be ee S we Be =s w0 e @ Se W oo

ROUTINE DUPWRTOBN
T

¢
¢
¢
¢
!
!
[}

15 Dec-1983 10:35:57
14 Dec 1983 11.35:15

NOVALUE

SEQ 0211

VAX 11 Bliss-16 V3-555
Pege
87
SPIDERSUSERS
: [DOUCE TTE .FALCONICNRQAA . BL2 (26

THIS ROUTINE IS CALLED BY DUP ROUTINE TO USE THE CONTROLLER LOCAL PROGRAM
“WRTDBN“.
TO USE THE PROGRAM THE OPTIONAL DUP SUB-PROTOCAL IS USED TO
COMMUNICATE WITH THE CONTROLLER.
THE PROGRAM WRITES TO A DIAGONOSTIC BLOCK (DBN)
THE WORD IN “S_PATTERN” IS WRITTEN TO THE 256 WORDS IN THE DBN.
IF AN ERROR OCCURS
WHILE RUNNING THE CONTROLLER LOCAL PROGRAM THE ERROR IS USSUALLY REPORTED IN THE
DUP BUFFER. (EX. ILLEGAL UNIT NUMBER, ILLEGAL BLK @, DEVICE ERROR, ZERO LENGHT MSG)

'
'

IMPLICIT INPUTS:

CST_ADDRS
CUOFF

S_PATTERN

- CONTAINS PATTERN WORD!-

'
BEGIN

CONTAINS THE CURRENT CONTROLLER STATUS TABLE
- CURRENT OFFSET IN CST TABLE FOR PARTICULAR DRIVE

33585

3587
3589
3590
3591
3592
3593
3594
3595
3396
3597
3598
3599

THE

®e

meow

s e

e s

wc e ms me e

Per e e

'PRINTX (DER11);

3601
3602
3603

3605
3606
3607
3608
3609
3610
3611
3612
3613
3614
3615
3616

MSCP_PKT

[.MX1,

MSGLEN)

= SZ_ELP;

PACKET SIZE

MSCP_PKT
MSCP_PKT
MSCP_PKT
MSCP_PKT
MSCP_PKT

[.MX1,
[.MX1,
[ .MX1,
[.MX1,
[ .MX1,

OPCODE) = OP_ELP;
MODIFY] = 1;
L1) =
eecii'W';
L2] = sescii'R’;
L3) = seecii’'T';

!
!
!

OPCODE = EXECUTE LOCAL PROGRAM
STANDALONE MODIFIER
FILL IN PROGRAM NAME WITH ASCII LETTERS

MSCP_PKT [.MX1, LA) = sasci

MSCP_PKT {.MX1, LS)
MSCP _PKT

[.MX1,

L6]

D',

= seecii’'B';

= sescii'N';

OUPCOMMAND ();
IF .CST_ADDR [.CUOFF « 3, DUPERROR) EQL 1 THEN
IF (MX1 = GET_PKT (.CCTLR)) LSS O
OR (.EOP_FLAG)
THEN

(CST_ADDR [.CUOFF

RETURN; );

MSCP_PKT [.MX1,
MSCP_PKT [.MX1,
MSCP_PKY [.MX1,
MSCP_PKT [ .MX1,
MSCP_PKT ([ .MX1,

DUPCOMMAND (),
IF
IF

« 3, DUPERROR)

! SENDS AND RECEIVES THE COMMAND
RETURN; 'IF DUP ERROR THEN RETURN
' TRY TO GET AN ENVELOPE. IF FAILURE
=

MSGLEN) = SZ_REC;
OPCODE) = OP_RCD:
BC_LO) = 2;
BUF 0] = DUPPKT;
MODIFY) = O;

OR (.EOP_FLAG)

(HARD _ERROR ();
CST_ADDR [ .CUOFF

RETURN; ),

+«

DUPERROR]

MSCP_PKT ([ .MX1, MSGLEN) = SZ_SEN;
MSCP_PKT [ .Mx1, OPCODE] = OP_SDD;
MSCP_PKT [ .Mx1, BC_LO] = 6;
MSCP_PKT [ .MX1, BUF_O0) = DUPPKT;

OUPPKT ([DUPBFO]

.Cdiek:

' NO POINT IN CONTINUING
!
*
!
!
'

.CST_ADDR [.CUOFF + 3, DUPERROR] EQL 1 THEN
.DUPPKT (DUPTYPE]
NEQ 1
OR .DUPPKT [DUPMESG) NEQ 6
OR (MX1 = GET_PKT (.CCTLR)) LSS O
THEN

EXECUTE LOCAL PROGRAM WRT D8

PACKET SIZE
OPCODE = RECEIVE DATA
BYTE COUNT TO BE TRANSFERED EQUALS 2
LOAD DESCRIBTOR BUFFER

SENDS AND RECEIVES THE COMMAND

*
!

IF CORRECT RESPONSE
TRY TO GET AN ENVELOPE.

RETURN;

'IF DUP ERROR THEN

RECIEVE DATA

RETURN

IF FAILURE

! NO POINT IN CONTINUING
14

!
!
¢

PACKET SIZE
OPCODE = SEND DATA
BYTE COUNT TO BE TRANSFERED EQUALS 6
LOAD DESCRIBTOR BUFFER

'LOAD UNIT NUMBER (RDRX)

SEND DATA

R
wi*y

&=
a
®

%
=

(mng

eLELEEELLE
112760

012760

112760
112760
112760
112760
112760
112760
004737

013700

006 300
063700
032760

( CC'LR))

on (.f 0P FLAG)
€N
(CST_ADDR {.CUDFF
L3 TURN,
)

oy,

ELELEEEY
jo 2VSEJEGLIR
- X TV

012746
004737
012760

LSS

vas 11 81 we 16 v3 339
"PIDERS

SERS:[DOUCETTE S a1

eum

TrEN

S, CPERAOR]

10:8%:57
11:%5:1%

[

‘copge

* LOAD DBN NretR
* LOAD PATTERN

* SENDS AND RECEIVES TvE COMMAND

RETURMN; 'IF OUP ERROR "vEN RE TURN
* TRy TO GET AN ENVE( OPE . ¢ FATL Ut

NO POINT

IN CONTINUING

PACKET SIZE
OPCODE - RECEIVE DATA
8vTE COUNT 1O BE TRANSFERED EQUALS o
LOAD DESCRIBTOR BUFFER

MSCP PuT ([ .mMxy, MSGLEN]) - SZ REC;
{.Mx1, OPCODE} - OP RCD;
E."ll. 8C LO0) - 4,
- DUPPuT,;

RECFIVE

DATA

SENDS AND RECEIVES THE COMMAND
RETURN; 'IF DUP ERROR THEN RE TURN

OR (.OUPPXT [OUPMESG] MEQ 3)

c'l:‘:‘ OUPPKT (OUPBFL] NEQ O)
(HARD _ERROR ();
CSY_ADOR [ .CUDFF

RETURN; ),

THEN

(CSY_ADODR ( .CUOFF

RETURN; );

T ADDR
END,

3, DUPERROR]

(7 _BLX WMT)

. 3, DUPERROR]

T _ADOR (T _BLK uWT]

000160’
000104

0000006
000022 0000066

0000226
000024
0000266
OUV0027G
0000306
000031G
0000326

000116 000033G
000000V
0000006

0000006
040000

000006

* NO POINT IN CONTINUING
¢

CORRECT RESPONSE

TRY

10 GET AN ENVELOPE.

FAILURE

! NO POINT IN CONTINUING

.SBTTL

OUPWRYOBN MATI-DRIVE

MOV
MOV
MOV

R1,-(SP)
Mxy, -(SP)
€104, -(SP)

3
3

3%1
3279

MOVe
MOV
MOVe
nOove
MOve
MOVS
MOove

93 . MSCP .PXT+22(R0)
91 ,MSCP . PXT +24(RO)
0127 ,MSCP .PXT « 26(RO)
8122 ., MSCP . PKT «27(RO)
9124 ,MSCP .PXT +30(RO)
€104 ,MSCP . PXT+31(RO)
€102 ,MSCP . PKT «32(RO)

3
'
s
i
i
:
:

31980
3381
3582
3583
3504
3%58%
3580

DUPWRTOBN:

000¢03
000001
000127
000122
000124
000104
000102

((Mx} » GEY_PxT (.CCTLR)) LSS O)
OR (.EQP _FLAG)

010146

013746

CUDFF . 3, DUPLAROR; ¢Qu
f
.
1

18
1989

S, C OBN);

()

e
S
T
R

1)
el
CsY ADU
OUPPx1 (| PO 1 } PP
T ( DUPRF 2 ) o .5 PATTEEN;
%00IF1} - 0,
(.nx 1,

3¢ 351

Jec
+4 Lec

Ax ExeACISER
11 ORIvE TEST RO "IN

et
o

’

JSR
MOV

MOve
JSR
MOV
ASL

ADD
8IT

PC.OLIMA
922 ,MSCP . PKT +6(RO)

0116,MSCP .PXT.33(RO)
PC , OUPCOMMAND
CUOFF RO
RO

CST.ADDR,RO

#40000,6(RO)

TEST ROUTINES

'
F
s

3587
3588
3589

-—

.
-

NRQAM L

RD /R

vO1.¢

MATI

)

0001 3¢
000132
000136
000142
000146
000150
000156
000160
000164
000166
000172
000200
000202
000204
000210
000214
000220
000226
000234
000242
000250
000254
000260
000264
000266
000272
00030

000302
000306
000312
000316
000320
000324
000330
000334
000336
000342
000346
000352
000354
000362
000364
000370
000374
000376
000410
000414
000416
000422
000426
000432
000440
000446
000454
000462

001023
613716
004737
010037
002404
132787
001412
013700
006300
063700
052760
022626
000504
013716
012746
004737
012760
112760
012760
012760
005060
004737
013700
006300
063700
032760
001043
013700

DRIVE

TEST ROLTINE'
BNt
MOV
JSR

1s:

MOV
8Ly
-38(:)
B8EQ
MOV
ASL
ADD

es:

000160’

000022G
000026G
0000326

8IS
ce
B8R
MOV
MOV
JSR
MOV
MOVE
MOV
MOV
CLR
JSR
MOV

013700
042700
020027
001013
013716
004737
010037
002404

132757
001415

004737
013700
006300

44:

S¢:

0000226
0000266
0000326

RO, MXx1
1t
e1 EOP FLAG
3¢
CUOFF RO

#40000,6(RO)

(SP).,(5P).

6
Mx3,(SP)
€104, (SP)
PC,.BLIMUL

BIS

B8R
MOV
MOV
JSR
MOV
40OVe
MOV
MOV
MOV

11 Bl.ws

v3-555

SEQ 0°'%
Poge
89

“PIDER
: (DOUCE 1TE
SUS
.FALCONICNR
ERS
IAA . BL2

(26

:
‘

31961
1990

39591

3%93%

31590

:
:

3593
3596

034 ,MSCP . PKT+6(RO)
5 ,MSCP.PKT22(RO)

3397
31598
3599
3600
3601
3602

2 . MSCP.PKT+26(RO)
)
T
+32(RO
PK
MSCP .PKT
QOUP

MSCP .PKT+24(RO)
PC . DUPCOMMAND

CUOFF ,RO

#40000,6(RO)
S

MOV
JSR
MOV
BLY
8IT8
BEQ
JSR
MOV

VAX

CST.ADOR,RO

BIT

ASL

063700
052760
062706

CCTLR,(SP)
PC.GET
. PKT

cHP
BNE
MOV
8IC
cHe

1983 10:3%:57
1983 11:35:15

ASL

BNE
MOV
8IC

042700
020027
001022

000504
013716
012746
004737
012760
112760
012760
012760
013737

15 Dec
14 Dec

EXERCISER

CST.ADOR,RO

RO
DUPPKT

*7777,R0
RO, #10000
44

DUPPKT ,RO
#170000,R0

3561

3604

3605

3606

3603

RO, #6

CCTLR,(SP)

PC.GET.PKT
RO, Mx1

#1,E0P FLAG
74
PC ,HARU ,ERROR

3608
3609

gléflF .RO

CS7Y.ADOR,RO

#40000,6(R0)

“.9
108

Mx1,(SP)

PC,BLSMUL
#34 ,MSCP . PKT+6(RO)

o4 MSCP .PKT+22(RO)

06, MSCP .PKT+26(RO)
SOUPPKT
,MSCP . PKT +32(RO)

COISK,DUPPKTY

3603
3612

3613
3614
3615
3616

D
RD/RXx EXERCISER
MU TT DRIVE TEST

NRQA13
vol ©

0004 70

000474
000476
000502
000510
000514
000522
000526
000532
000536
000540
000544
000552
000554
000560
000564
000570
000572

000610
000614
007622

020630
000634
000640

000652
000674
000700
000704
000710
000712
000716
000724
000726
000732
000736
000742
000744
000730
000754
000760
000762
000766
000770
000774
000776
001002
001006
c01012
001014

013701
006301
063701

116137
105037
013737

005060
004737
013700
006300
063700
032760
001023
013716
004737

CLRB

CLR
JSR
MOV
ASL

ADD
BIT

132737
001413
013700
006300
063700
052760
062706
000515
013716

000001

004737
012760
112760
012760
012760
005060
004737
013700
006300
063700
032760
001054
013700
042700
020027
001012
013700
042700
020027
001003
005737
001403
004737
000413
013716
004737
010037
002404
132737

MOV
ASL
RDO
MOVB

MOV

000160

012746

ROUTINES

0000026

010037
002404

15 Dec
14 Dec

BNE
MOV
JSR
MOV
BLTY
BIT8

1933 10:35:57
1983 11:35:15

CUOFF ,R1

000160°

3618
3619
3620
3621

CST.ADDR,RO

#40000,6(R0O)
9

;

3561

CCTLR,(SP)

PC,GET.PKT
RO, MX1
8
#1,.EOP .FLAG
113

3623

3625

#40000,6(RO)
#10,5P

3622

Mx1,(SP)

5628

CST.ADDR,RO

9s:
10¢:
11¢:

174

PC.BLSMA

034 ,MSCP.PKT «+6(RO)

000034

5 ,MSCP . PKT +22(RO)

0000226
0000266
000000G 000032G
000024G
000000V

3629
3630
3631
3632
3633
3634

04 MSCP . PKT +26(RO)
SOUPPKT
,MSCP . PKT+32(R0O)
MSCP.PKT+24(RO)

PC ,DUPCOMMAND
CUOFF RO
RO

CST.ADOR,RO

#40000,6(RO)
164

040000

OUPPKT,RO
€7777,R0
RO, #30000
12¢
T ,RO
OUPPK

007777

#170000,R0

12¢:

0000006

11 Blies 16 v3 555

3617

CUOFF ,RO

000104

CST.ADOR,R1
6(R1),DUPPKT.2
3
DUPPKT
.4
S.PATTERN,DUPPKT
MSCP .PKT . 24(R0)
PC ,DUPCOMMAND
CUOFF ,RO

040000
000010

SEQ 02:4
Page
9
SPIDERSUSERS: ([DOUCE TTE ,FALCONICNRQAA. BL2 (26

VAX

135¢:

12¢
DUPPKT
.2
13¢

H
H

3561
3635

3630

3637
3639
3640

PC,HARD
. ERROR
144

CCTLR,(SP)

PC.GET.PKT
RO, MXx1
144
#1,E0P.FLAG

3644

Loy
MA TI DRIVE

)

001022
001024

001030
001032
001036
001044
001046
0010%2
001036
001062
001064

15 Dec
14 Dec

RD/RX EXERCISER

NRQAMZX
vol.¢

001411
013700
006300
063700
052760
000404
013700
005260

062706

012601
000207

TEST ROUTINES

14¢:;

0000006
0000006

040000

000006

0000006

15¢:

000012

16%:

000050

17¢:

15¢
CUOFF ,RO

B8tQ
MOV

ASL
ADD

SEG 0'!5
VAX-11 Bliee-16 v3-555
1
SPIDERSUSERS: (DOUCETTE, FALCO”C'QO‘! BL2 (26

CST.ADDOR,RO
040000,6(R0O)
1634

8IS
B8R

T.ADDR,RO
SO(RQ)
e12,SP

MOV

INC
ADD
MOV

(SP)+ R
pC

RTS

$CODES
;s Routine Size:
Rout ine Base:
283 words,
7 words
i Merimum stack depth per invocstion:

1983 10:3%:57
1983 11:35:15

11646

1646

3643
3649

:
3

3875
3561

[
RD/RX EXERCISER

NRQAM3
vol.C

MULTI DRIVE

TEST ROUTINES

ROUTINE DUPREDDBN

14 Dec

NOVALUE

1983

10:35:57

1983 11:35:15

VAX

11 Blies

v3-555

SEQ 06
Pege
92

SPIODERSUSERS:
(DOUCETTE .FALCONICNRQAA .BL2 (27

15 Dec

THIS ROUTINE IS CALLED BY DUP ROUTINE TO USE THE CONTROLLER LOCAL PROGRAM

“REDDOBN~.
10 USE THE PROGRAM THE OPTIONAL DUP SUQ-PROTOCAL IS USED T0
COMMUNICATE WITH THE CONTROLLER.
THE PROGRAM READS A DIAGONOSTIC BLOCK (DBN)

AND PLACES IT IN THE DUP BUFFER CALLED "DUPPKT",
IF AN ERROR OCCURS WHILE
RUNNING THE CONTROLLER LOCAL PROGRAM THE ERROR IS USSUALLY REPORTED IN THE
OUP BUFFER, (EX. ILLEGAL UNIT NUMBER, ILLEGAL BLK &, DEVICE ERROR, ZERO LENGHT MSG)

IMPLICIT INPUTS:

CST_ADDR

- CONTAINS THE CURRENT CONTROLLER STATUS TABLE

CUOFF

- CURRENT OFFSET IN CST TABLE FOR PARTICULAR DRIVE

B8EGIN

3670

MSCP_PKT

3672
3673

MSCP_PKT [.MXx1, MODIFY]

3674

3675
3676
3677
3678
5679

3681
3682
3683%
3684
3685
3686
3687

®e

B¢

IPRINTX (DER12);

3689
3690

3691
3692
3693
3694
3695
3696
3697
3698
3699
3700
3701
3702
5703
5704
3705
3706

[.MX1, MSGLEN]

= SZ_ELP;

! PACKET SIZE

= 1,

MSCP_PKT [.MX1, OPCODE) = OP_ELP;
MSCP_PKT [.MX1, L1) = sescii’R';
MSCP_PKT [.MX1, L2]

MSCP_PKT [.MX1, L3)

EXECUTE REDOBN PROGRAM

! OPCODE = EXECUTE LOCAL PROGRAM
STANDALONE MOOIFIER

' FILL IN PROGRAM NAME WITH ASCII LETTERS

=« sescii'E’;

= seecii'D';

MSCP_PKT [.MX1, LA) = saecii’'D’;

MSCP_PKT [.MX1, LS) = weecii'B';
MSCP PKT [.MX1, L6) = sescii'N';

ouPCOMMAND ();

IF .CST_ADDR [.CUOFF + 3, DUPERROR) EQL 1 THEN
IF (MX1 = GET_PKT (.CCTLR)) LSS O
OR (.EOP_FLAG)
THEN

MSCP_PKT
MSCP_PXT
MSCP_PXT
MSCP _PXT

(CST_ADOR [.CUOFF « 3, DUPERROR] = 1;
RETURN; ),
[.MX1,
[.MX1,
[.MX1,
[.MX1,

MSCP_PKT [.MX1,

OUPCOMMAND ()
IF
IF

' SENDS AND RECEIVES THE COMMAND

RETURN; !'IF DUP ERROR THEN RETURN
t TRY TO GET AN ENVELOPE. IF FAILURE

MSGLEN]) = SZ_REC;
OPCODE]) = OP_RCO;
BC_LO) = 2;
BUF_O] = DUPPKT,
MODIFY]

! NO POINT IN CONTINUING
!
!
!
t

« 0;

PACKET SIZE
OPCODE = RECEIVE DATA
BYTE COUNT TO BE TRANSFERED EQUALS 2
LOAD DESCRIBTOR BUFFER

! SENDS AND RECEIVES THE COMMAND

.CST_ADOR (.CUOFF + 3, DUPERROR] EQL 1 THEN

RETURN;

OR (MX1 = GEY_PKT (.CCTLR)) LSS O

!
t

.OUPPKT (DUPTYPE]
NEQ 1
OR .DUPPKT (DUPMESG) NEQ 5
;fiig.E@_FLhfi)

(HARD_ERROR (),

CST_ADDR [.CUOFF + 3, DUPERROR]
RETURN; )

MSCP _PKT ( .MX1, MSGLEN]
MSCP _PKT

[.mMx1,

OPCODE)

= SZ_SEN;

= OP_SOD;

MSCP_PKT (.Mxi, BC_LO) = 4,

MSCP _PKT [ .MX1, BUF _0) = DUPPKT;

RECIEVE DATA

!IF DUP ERROR THEN

IF CORRECT RESPONSE
TRY TO GET AN ENVELOPE.

= 1;

RETURN

IF FAILURE

¢ NO POINT IN CONTINUING
]

PACKET SIZE
OPCODE

= SEND DATA

! BYTE COUNT TO BE TRANSFERED EQUALS 4
! LOAD DESCRIBTOR BUFFER

SEND OATA

(,4
MU TI DRIVE TEST ROUTINES

vOl

OUPPKT (DUPBFO)
DUPPKT (DUPBF1]

3707
3708
3709

MSCP _PXT

IF
IF

000012
000016
000024
000032
000040

000070
000076
000104
000110
000114
000116
000122
000130
000132
0001 36

013746
012746
004737
012760
112760
012760
112760
112760
112760
11276C
112760
112760
004737
013700
006300
063700

032760

001023

013716
004737

.Mx1,

=
=

14 Dec

.CDISK;
.CST ADDR [.CUOFF

MOOIFY]

- O;

(Mx1

= GET_PKY

OR (.EOP_FLAG)

«+ 3,

RETURN);
;

MSCP_PKT

[

.MXx1,

MSGLEN)

DUPERROR]

MSCP _PKT E.Mx1,
MSCP_PKT ([ .MX1,
MSCP_PKT [.Mx1,

DUPCOMMAND ()

SZ _REC;

BC_LO) = Sia;
BUF 0] = DUPPKT;
MODIFY) = O;

LOAD UNIT NUMBER (RDRX)
LOAD DBN NUMBER

SENDS AND RECEIVES THE COMMAND

TRY

RETURN;

!'IF

TO GET

(HARD _ERROR ();

CST_ADOR (.CUOFF + 3, DUPERROR)

RETURN;
);

.T_ADDR (T_BLK_RD)

THEN

AN ENVELOPE.

NO POINT

RETURN

If FAILURE

IN CONTINUING

! SENDS AND RECEIVES THE COMMAND
RETURN; !IF DUP ERROR THEN
RETURN
!
!

IF CORRECT RESPONSE
TRY TO GET AN ENVELOPE.

= 1;

CST_ADOR {.CUOFF + 3, D_DBN) = .CST_ADDR [.CUOFF + 3, D_DBN) . 1;
=

DUP ERROR

OR (.EOP_FLAG)

T_ADOR (T_8LK_RD)

SEQ 0"’
VAX-11 Blies-16 Vv3-55%5
Page
7
SPIDERSUSERS: [DOUCE TTE .FALCONICNRQAA BL
2 ( °

!: PACKET SIZE
RECEIVE DATA
¢ OPCODE = GEY DUST STATUS
* BYTE COUNT TO BE TRANSFERED EQUALS 512
[}
! LOAD DESCRIBTOR BUFFER

.CST_ADDR [.CUOFF + 3, DUPERROR] EQL 1 THEN
.OUPPKT (DUPTYPE]
NEQ 6
OR .DUPPKT [DUPMESG] NEQ 2
OR (MX1 = GET_PKT (.CCTLR)) LSS O
THEN

(.Mx1, OPCODE]) = OP_RCD:

MSCP _PKT

1983 10:35:57
1983 11:35:15

3, D DBN]l

(.CCTLR)) LSS O

THEN

IF
IF

_CSY_ADDR [.CUOFF + 3, DUPERROR] EQL 1 THEN

(CST_ADDR [.CUOFF

3724
3725

3726
53727
3728
3729
3730
3751
3782
3733
3734
3735
3736
5737

[

DUPCOMMAND ()4

3710
3711
3712
3713
3714
3715
3716
3717
3718
3719
3720
3721
3722
5723

IF FAILURE

NO POINT IN CONTINUING

¢ INCREMENT RELATIVE DBN COUNTER

END;

.SBTTL

DUPREDDBN MULTI-DRIVE TEST ROUTINES

MOV

R1,-(SP)

DUPREDOBN:

010146

000002

15 Dec

RD/RX EXERCISER

NRQAM

000160’
000104
0000006
000022 0000066
000003 000022G
000001 0000246
000122 000026G
000105 0000276
000104 000030G
000104 0000316
000102 000032G
000116 000033G
000000V
0000006

0000006
040000

0000006
000000G

000006

MOV
MOV
JSR
MOV
MOVE
MOV
MOV
MOVE
MOVB
HOV8
MOVB
MOVB
JSR
OV
ASL

ADD
8IT

B8NE
MOV
JSR

MX1, -(SP)
2104, -(SP)
PC,BL ML
022 ,MSCP . PXT+6(RO)
83 ,MSCP . PKT+22(RO)
01 ,MSCP.PKT+24(RO)
0122 ,MSCP . PKT+26(R0)
€105, ,MSCP.PKY+27(RO)
#104 ,MSCP . PKT +30(RO)
#104 ,MSCP . PKT+31(R0O)
#102,.MSCP.PKT+32(RO)
€116 ,MSCP .PKT+33(RO)
PC ., DUPCOMMAND
CUOFF ,RO
RO

3651

;

3670

;
:
;
:
'
:
:
;
3
;

3671
3672
3673
3674
3675
3676
3677
3678
3679
3680

:
;

3651
3681

CST.ADDR,RO

#40000,6(R0)

24
CCTLR,(SP)
PC,GEY.PKT

s
NRQAMS

RD/RX
MX TI

vol.C

EXERCISER
DRIVE TEST

15 Dec
14 Dec

ROUTINES

1983 10:35:57
1983 11:35:15

VAX

Bl.es-16

v3 555

m
SEQ 10
Page

SPIDERSUSERS
: [DOUCE TTE .FALCONICNRQAA . BL2

“4

)

24:
3s:

000160’
000104

ADD
81S
cHP
BR
MOV
MOV

CSTY.ADDR,RO

#40000,6(R0O)
(SP)e+,(SP)e
64
Mx1,(SP)

JSR
MOV
MOv8
MOV
MOV
CLR
JSR
MOV

000022G
0000266
0000326

ASL
ADOD

BIT
BNE

MOV
8IC
cP
BNE
MOV
8IC

013700
042700
020027

001022
013700

042700
020027
001013
013716
004737
010037
002404

132737

001415
004737
013700
006300
063700
052760
062706
000501
013716
012746
004737
012760
112760
012760
012760
013737
013701
006301
063701

ASL

BNE
MOV
JSR
MOV
8LT
BIT3
BEQ
JSR
MOV
ASL
ADD

S5t

64:
74:

000160*
000104
0000226
000026G
0000326

8IS

8rR
MOV

MOV

JSR
MOV

MOVEe
MOV
MOV
MOV
MOV

ASL
ADD

CUOFF ,RO

PC,BLSMA

#34 ,MSCP . PKT+6(RO)
o5 ,MSCP .PKT+22(RO)
02 ,MSCP
.PKT «26(R0)
SOUPPKT
,MSCP .PKT+32(RO)
MSCP .PKT+24(RO)
PC , DUPCOMMAND
CUOFF ,RO

1¢:

006300
063700
052760
022626
000504
013716
012746
004737
012760
112760
012760
012760
003060
004757
013700
006300
063700
032760
001043

1s
91 ,EO0P .FLAG
3¢

3691
3692
3693

CST.ADDR,RO

g:°0°0.6(R0)

;

3651

3695

;I.EOP.FLAG

3697

CUOFF ,RO

3699

3694

3703

DUPPKT ,RO

®7777,R0O
RO, #10000
44

RO
OUPPKT

#170000,R0O
RO, #5
44

CCTLR, (SP)

PC.GET.PKT
RO, MX1
4

[
PC, HARD . ERROR

3700

CST.ADOR,RO

#40000,6(R0O)
#6,5P
104

Mxi,(SP)

PC.BLSMUL

#34 ,MSCP . PKT+6(RO)
#4 MSCP . PKT+22(RO)
&4 MSCP . PKT+26(RO)
SOUPPKT
,MSCP . PKT +32(R0O)
COISK,DUPPKT
CUOFF ,R1

CST.ADDR,R1

001412
013700

RO, Mx1

1327%7

MUV
BLT
8IT8
8EQ
MOV

000160

000242

010037

002404

000142
000146
000150
000136
000160
000164
000166
000172
000200
000202
000204
000210
000214
000220
000226

3704
3705
3706
3707
3708

[

000614
000622
000626
000632
0006 36
000652

000672
000A 76
000702
000704
000710

000716
000720
000724
000730
000734
000736
000742
000746
000752
000754
000760
000764
000770
000772
001000
001002
001006
001012
001014
001020
001026
001030

006300
063700
032760
001023
013716
004737
010037
002404
132737
001413
013700
006300
063700
032760
062706
000520
013716
012746
004737

0121760
112760
012760
012760
005060
004737

CLRB
CLR
JSR
MOV
ASL
ADD

817

BNE

MOV

8¢

000010

10¢:
11¢:

000160
000104

000034
000005

001002

0000246

0000226
0000266
0000326

013700

006300
063700
032760
001057
013700
042700
020027
001022
013700
042700
020027
001013
013716
004737
010037
002404
132737
001413
004737
013700
006300
063700
052760
00041
..
013700

CUOFF ,RO

#40000,6(R0O)
9

CCTLR,(SP)

ASL

BI1S

#40000,6(RO)
#10,5P

ADD

B8R
MOV
MOV
JSR
MOV
HOV8
MOV
MOV
CLR
JSR
MOV
ASt

118
CUOFF ,RO

15¢

Mx1,(SP)

:
:

3651
3712

3713

3715

H
:
H

3712
3715
3718

PC.BLSMUL

434 ,MSCP.PKT+6(RO)
&5 ,MSCP . PKT+22(RO)
#1002 ,MSCP . PKT+26(R0O)

T
PK(RO)
,MSCP .PKT«32
SOUP
MSCP .PKT +24(RO)

PC , ODUPCOMMAND
CUOFF ,RO

RO
RO
CSY.ADDR,

#40000,6(R0O)
144

OUPPKT ,RO
*7777,R0

BNE
MOV
8IC
cHp

12¢
OUPPKT RO

ADD
8Is
BR
MOV

3709
3710
3711

CST.ADDR,RO

MOV
8IC

MOV
JSR
MOV
BLY
B178
8EQ
JSR
MOV

H
H
H

CST.ADDR,RO

PC.GET PKT
RO,MX1
as
€1 ,EOP _FLAG

ASL

13%:

PC,DUPCOMMAND

JSR
MOV
BLTY
8IT8
BEQ
MOV

817

12¢:

6(R1),DUPPKT.2
3
DUPPKT
MSCP.PKT+24(RO)

000602

005060
004737
013700

MOVvB

0000026
000006
0000036
0000246
000000V
0000006

000572
000574

116137
105037

B¢

000502
000510
000514
000520
000524
000530
000532
000336
000544
000546
000552
000356
000362

TEST ROUTINES

SEQG 0219
VAX 11 Blies 16 Vv3-55%5
Pege
95
SPIDERS$USERS:
(DOUCETTE .FALCONICNRQAR .BL2 (27

®e

M TI DRIVE

¢C

1983 10:35:57
1983 11:35:15

vol

15 Dec
14 Dec

RD/RX EXERCISER

3
NRQAM

3719
3720
3721
3722
3723
3724

:
H

3651
3725

;

3726

3727

3728

3730

H
:

3725
3734

RO, #60000

#170000,R0
RO, #2

124
CCTLR,(SP)

PC.GET.PKT
RO, MX1
12
#1,EOP.FLAG

13¢

PC.HARD
. ERROR

CUOFF RO

3731

CST.ADDR,RO

€40000,6(RO)
144

CUOFF ,RO

J9
RD/Rx EXERCISER
MU TI DRIVE TEST

NRQAM3
vol.C
)

001034
001036
001042
001046
001052
001056
001062
001064
i

006 300
063700
105260
013700
005260
062706
012601
000207

Routine

Size:

ROUTINES

ASL
ADD

0000006
000006
0000006
000054
000012

INCB

14%;

15¢:
Rout ine Base:

invocation:

7 words

6(RO)

INC

VAX-11 Blies-16

v3-555

SEQ 0

SPIDERSUSERS: (DOUCETTE. FALCON]CNGOAA 8L2 (27

T.ADDR,RO

373%

€12,SP
(SP)+,R1
PC

H
3

3666
3651

S4(RO)

ADD
MOV
RTS

$CODES

1983 10:35:57
1983 11:35:15

RO
CST.ADDR,RO

MOV

283 words,

: Meximum stack depth per

15 Dec
14 Dec

12734

1<)
RD/RXx
MU TI

W4
B

NRQAML
vOl ¢

3738
3739
3740
3741
3742
3743
3744
3745
3746
3747
3748
3749
3750
3751
3752

EXERCISER
DRIVE TEST

ROUTINE

DUPCOMMAND

000056
000062

000072

INDEX,

THEN RETURN

ELSE

BEGIN

MSCP _PKTY

MSCP _PKT
MSCP _PKT
MSCP _PKT

( .MX1,

E.HXI.
MX1,

( MX1,

CREDITS])

MSGTYP]
CONNID)

= O;
-« 2;

DK_NUM] = O;

THEN

3760
3761
X762
3763
3764

-1;

CST_ADOR [.CUOFF

END

3765

ELSE

3766

END;

000001

000000G

000160’
000104

000010G
000001
000002
000001
0000166
000160

BEGIN
QIO [.CCTLR])
BREAK;

3, DUPERROR]

.@I0 [.CCTLR])

WAIT ()
PROC_RETPKT();
END;

.SBTTL
DUPCOMMAND:
MOV
8178
BNE
MOV
MOV
JSR
MOV

MOV8
MOV
CLR
MOV
JSR
157

000160

BNE
MOV
JSR

! MAKE PACKAGE EQUAL A DUP COMMAND

BEGIN
PUT _PKT (.MX1);
MX1

CREDITS EQUALS

DISK NUMBER

IF SEND (.MX1) EQLU FAILURE

3757
3758
3759

001060
013746
012746
004737
012701
060001
112711
112761
005060
013716
004737
005700
001020
013716
004737

SEQ 0%/
VAX 11 Bliss 16 V3 555
97
age
SPIDERSUSERS
: {DOUCETTE .FALCONICNRQAA BL2 (28

BEGIN
!PRINTX (DER13);
IF .EQP_ FLAG

3754
3755
3756

132737

NOVALUE

THIS ROUTINE IS CALLED 8Y DUP TO PROCESS COMMANDS.
THE COMMAND ENVOLOPES ARE FILLED IN DUP ROUTINES IN THE “MXx1'
WITH THE INDEX THIS ROUTINE SENDS THE COMMAND, WAITS FOR A
RESPONSES AND THEN PROCESSES THE RETURN PACKET.

010146
000002
000010
000012
000016
000022
000026
000032
000034

ROUTINES

1983 10:35:57
19863 11:35:15

3753

3767
3768
3769
3770
37171
3772

15 Dec
14 Dec

ATTEMPT SEND;

RETURN ENVELOPE TO POOL

IF SEND WAS SUCCESSFUL

!
!
!

IF CTLR

IS OFFLINE

! INCR QUTSTANDING QIO COUNT
BREAK FOR SUPERVISOR TO CATCH USER REQUESTS
WAIT FOR RETPKT RESPONSE
PROCESS RETURN PACKETY TO SEE IF Ok FOR DUP

DUPCOMMAND MULTI-DRIVE TEST ROUTINES

;%.EOP.FLAG

H
i
i
H

PC,BLIML
MSCP
. PKT+10,R1
RO,R1

#1,(R1)

42,1(R1)

MSCP,PKT+16(R0O)

Mx1,(SP)
PC,SEND
RO
14
MX1,(SP)
PC,PUT.PKT

3738
3748
3749
3752

3753
3754
3755
3757

3760

L9
RD/Rx EXERCISER
MU TI DRIVE TEST

NRQAM3
v0o1.C
)

000076
000104
000110
000112

000116
000124
000126
000132
000136
000140
000144
000150
000152
000154
;

012737

013700

006300
063700
052760
000411
013700

105260
104422
004737
004737

022626
012601
000207

ROUTINES

000160
177777
0000006

MOV
MOV
ASL

000000G
040000
000006

ADD

000000G
0000006
0000006
000000V

18:

4-1,Mx1

gUOFF.RO
0

2%:
3s:

#40000,6(R0O)
2t

8IS
BR
MOV
INCB

CCTLR,RO
QIO(RO)

22
PC,MAIT
PC.PROC.RETPKT

JSR
JSR
cHP
MOV

(SP)+,(SP)»
(SP)+,R1

RTS

$COOES$

SEQ O3%c¢
VAX 11 Blies-16 Vv3-555
Pege
98
SPIDERSUSERS
: (DOUCETTE .F ALCON ICNRQAR .BL2 (28

H
H

3761
3762

H
H

3757
3766

CST.ADDR,RO

TRAP

S5 words,
Rout ine Base:
Size:
S words
Meximum steck depth per invocetion:

Routing

15 Dec-1983 10:35:57
14 Dec 1983 11:35:15

14022

3768
3769
3751
3738

M
NRQAM3

RD/RX EXERCISER

!01.0
:
H
:

H
:

MUL TI DRIVE TEST ROUTINES
3773
3774
3775

3776
g???
778

!
!
!

IF THE OPERATOR CHOSE THE RANDOM SEEK MODE QPTION, THEN THE LBN IS
RANDOMLY CHOSEN WITHIN THE SPECIFIED LIMITS FOR THE LBN.
OTHERWISE, THE NEXT SEQUENTIAL LBN IS DERIVED FROM THE BLOCK SEQUENCE
TABLE (BST).

IMPLICIT INPUTS:

3783

g;gz

3787

3784

g;&g

:
H
F
H

3790
3791
3792
3793

3796

g;g;

;
H
H
H

3797
3798
3799
gggg

3
;

3802
3803

;

3805

.
i

i
;
;

3806
w

3809
3810
3811
3812

LSLUN

[]

CURRENT (DIAGNOSTIC SUPERVIOR) UNIT NUMBER

IMPLICIT OUTPUTS:

THE LBN IS LOADED INTO ONE OR BOTH MSCP PACKETS.

begin
own

LLBN_SAVE

: word initial (0);

S_TEMP : word,
E_TEMP : word,
LBN : word,
RDS1_DISK : byte

S_TEMP =
E_TEMP =
if

initisl (byte (TRUE));

_CST_ADDR (.CUOFF +« 1,
_CST_ADDR [.CUOFF « 2,

RDS1 _DISK

;

3815

then

3817

else

3820
3821

3823

;
.
;

3822

gggg
3826

3827
3828

SWF_RDM)

IF RANOOM SEEK MODE

(C(C.RANDOM {0) and #0'077777') mod (99)) leaqu 33)

3816

.
:

STARTING LBN
ENDING LBN

begin

if (.RDS1_DISK) and

g:ig

!
!

= FALSE;

if BIT_TST (SWP_FLAGS,

then

3814

D_BEG]);
D END];

! TEMPORARY STORAGE FOR START LBN
¢ TEMPORARY STORAGE FOR END LBN
! LOGICAL BLOCK NUMBER
! FLAG TO INDICATE WINCHESTER DISK SELECTED

.CST_ADDR (.CUOFF, D_TYPE] eaql RX_S0

then

3813

;

' LBN SELECTED IN LAST PASS

locel

Page

else

LBN =

_LBN_SAVE

LBN =

S_TEMP + ((.RANDOM [3] and ®0'077777') mod ( .E_TEMP -

REDUCE SEEKS ON RDs by 33#

_S_TEMP «

1)):

end

bcgin
LBN

.TRK_SGN [.LS$LUN]

BST (.LSLUN) =
then

! ELSE - SEQUENTIAL LBN MODE

.BST [.LSLUN],;

begin

.BST (.LSLUN)
les O

GET LBN FROM BST

SPIDERSUSERS: ([DOUCETTE.F ALCONICNRQAA .BLZ (29

THIS ROUTINE IS CALLED BY QIO GEN TO SELECY THE LOGICAL BLOCK NUMBER TO
BE USED FOR THE CURRENT QIO OR QIO PAIR.

14 -Dec 1983 11:35:15

SEGQ 0~

VAX 11 Bliss-16 V3 S55

!
H

3779
3780
3781
3782

1983 10:35:57

routine QIO_LBN : novelue =

H
3
:

15-Dec

. TRK_SGN [.LSLUN];' MODIFY LBN (INC OR DEC FOR NEXT PASS)

‘

N
RD/RX EXERCISER
MA TI DRIVE TEST

NRQAM3

3829
3830
3831
3832

@
s
et
e
o

3864
3865

3867
3868

begin

lssu

elue

TEMP

[.LSLUN]

gtru

CHANGE

VAX 11 Blies 16 v3 SS5
age
SPIDERS$USERS: [DOUCETTE.F ALCONICNRQAA .BL2

100

(29

THAN LOWER LIMIT

TRACK

DIRECTION

begin

.BST

begin

[.LSLUN] =

BST

TEMP

_E_TEMP;

TRK_SGN [.LSLUN]

end;

SECTOR

-1;

IS BEYOND HIGH LIMIT

CHANGE TRACK DIRECTION

end;
end;

LBN lssu

then

MAD1

(LBN_L)

.LBN;

MAD2 (LBN_L)
=

..BN;

.LB8N;

end;

0000006
000001
0000006
0000006

LOAD LBN INTO 1ST PACKET

IF 2 QIOS

LOAD LBN INTO 2ND PACKET

SAVE FOR USE NEXT CYCLE

ROUTINE QIO_LBN

E_TEMP;

LBN =

LBN_SAVE

MAKE SURE LBN WITHIN LIMITS

.E_TEMP

.MX2 geq O

then

.S_TEMP;

.LBN gtru

then

LBN =

.S_TEMP

.SBTTL
.PSECT

013702
013701
010100

SEQ 0304

10:35:57
11:35:15

end

then

014200

112705

1983
1983

IF SECTOR IS LESS

.PSECT
:
LBN.SAVE
. WORD

004137

_S_TEMP;

[.LSLUN]

TRK_SGN [.LSLUN]
end;

001252
001252

000010
000014
000020

[.LSLUN]

8ST

3835
3836

3837
3838
3839
3840
3841
3842
3843
3844
3845
3846
3847
3848
3849
3850
3851
3852
3853
3854
3855
3856
3857
3858
3859
3860
3861
3862

ROUTINES

.BST

then

3833
3834

L
T

®e

vo1.¢

15 Dec
14 Dec

QIO.LBN:JSR
MOve
MOV
MOV
MOV

$GGGs,

QIO0.LBN MULTI-DORIVE TEST ROUTINES
$COOES$,

R1, $5AVES

21.RS
CST.ADDR,R2
CUOFF ,R1

R1,RO

1
H

#,RDS1.DISK

3773
3791
3802

. )
tr
(VY

[

fRERCISHER

NIt

i% Dec

18 Dec

AR TING

1943 10:3%:%7
1983 31:%5 1%

SEQ %Y
vaAr 11 Bl-ve 16 v8 3%%
Page 101
PIOERS SERS: (OQUCE TTE
. F ALCONICMRAA
L P (2

(80,0
¢ VI

V00024
00004¢

0200 3

3
3

0.5 .1

¢, bE. TP

1808

3009

s ROS1.01%

3807

: RDS1.0ISK

3818

814

3 o,.LBN

3816

8It1e

CLR8
8

02 ,5uP

FLAGS

3¢

8cC

000116
00014°

000041

0012%2°
000124

100000

2s:

81C

P4}
RANDOM, ( SP)
€100000,
( SP)
0143, -(SP )
#C ,BL $100
(SP).
, (SP).

RO, 041
2ot
ggN.SAvE.fll

RANDO
6, - (SP)
M
€100000,(SP)
R4 ,.RO
R3.RO
RO, (SP)

E.'Emo.

}

S.'Em..

3809

3813
3818

S.TEMP,»

(SP)

PC.BL $M00
RY.RO

RO,R}
(SP)e,(SP)e

OTRK
, SGN, RO

001220

(RO),(R2)
(RO)

(R2),R3

010312
012710
000405
021204

000001

101403

000240
000244

000246

010412
0312710
020103

103001

3
R3.(R2)
€1,(RO)

o,LBN

3809
5823

.0LBN

$824

3826

3 ¢,S.TEMP

38%0

o
t S.TEMP,

3833

5834

]
1

o, E.TEMP

38. .
3841

1 E.TEMP,
F
1 LBN,S.TEMP

5844
3845
3852

B8KHIS

)
HO Rx EXERCISER
MA T ORIVE TEST ROUTINES

NRGQAMS

vOl1.¢

% Dec
14 Dec

1983 10:8%:57
198% 11:35:15

VAX 11 Bliws 16 ¢3 555

oege .0-

SPIDERSUSERS:
{OOUCE TTE .FALCONICNRIAR Bl 2

)

00025
000232
0002%4
000236
000260
000264
000270

000274
000276
000302
000306
0003812

010301
020104
101401
010401}
013700
010160
003737
002404

013700

010160
010137
000207

R3.R1
R1,.Ra

MOy
68:

000164
000046
000162°
000166
000046
001252°

;s Routine Size:
1 Ma> ‘'mum gstack depth per

ce
8L 0S
MOV
MOV
MOV

R4
. R1

MAD1,RO

R1,46(R0O)
Mx2

1531

eLY
MOV
MOy
MOV

8¢

$CODES
0
.
Rout
ine Bease:
invocetion:
9 words

S.TEMP, LBN
LBN,E. Temp

584
8%

;

E.TEMP LBN

38%8

:
;
:

MADZ2,RO
R1,46(RO)

R1,LBN. SAVE

RTS

1
3

14200

;
i

LBN,e

LBN,o
LBN,e

3860

3862

3864
3866

37173

D10
RD/RX EXERCISER

S
NRQAM

15 Dec 1983 10:35:57

MA TT ORIVE TEST ROUTINES

vol1.C

14 Dec

1983 11:35:15

VAX 11 Blies 16 V3 555

SEQ 0%,/

Page 10°

SPIDERSUSERS: (DOUCETTE.FALCONICNRIAA.BL2

( 2C

5869
3870
3871
5872
3873
3874
3875
3876
3877
3878
3879
3880
3881
3882
3883

routine QIO SIZt
1]

&
@
.
e
e
e
a1
e
s+
s
mi
e
&
®
o
«
@
e
ss
v
.

000010
000014
000020
000022
000030
000034

000042

000050

3885
3886
3887
3888
3889
3890
3891

3892
3893
3894
3895
3896
3897
3898
3899
3900

: novelue -

THIS ROUTINE IS CALLED BY QIO _GEN TO SELECT

'
:

THE 1/0 TRANSFER BYTE CCUNT

T0 BE USED FOR THE CURRENT QIO OR Q10 PAIR. THE BYTE COUNT IS
DETERMINED BY A RANDOM NUMBER, AND WILL ALWAYS FALL BETWEEN 1 AND THE

1/0 BUFFER SIZE (BYTS_PER_QIO).

[}

IMPLICIT OUTPUTS:
THE BYTE COUNT

'
'

IS LOADED INTO ONE OR BOTH MSCP PACKETS,

begin

locel

SIZE : word,
BLOCKS _LEFT : word;

)

¢ BYTE COUNT
! REMAINING BLOCKS LEFT

SIZE = ((.RANDOM (4) end %0' 077777 ) mod (.BYTS_PER_QIO ¢+
if

.SIZE eql

then

SIZE

16;

BLOCKS _LEFT =
if ((.SIZE
then

SIZE =

_CST_ADDR [.CUOFF « 2, D_END]

« BYTES_PER_SECT

then

3905

end;

004137

0000006

013746
042716
013746
005216
004737
010002
042702
001002
012702
013701
006301
063701
013700
0146101

000126'

1) / BYTES_PER_SECT) gtru

! REMAINING BLOCK COUNT

.BLOCKS_LEFT

MAD2 (BC_LO]

IF BLOCK COUNY NOT ENOUGH

! ADJUST BYTE COUNT DOWN

.SIZE;

! LOAD SIZE INTO 1ST MSCP PACKET

.SIZE,

IF 2 QIOS

LOAD SIZE INTO 2ND MSCP PACKET

' ROUTINE QIO SIZE
.SB8TTL
QI0.SIZE:

100000
0000006

000017

14:

QIO.SIZE MATI-DRIVE TEST ROUTINES

JSR
MOV

R1, $SAVE2
RANDOM+10, - (SP)

s
H

3869
3887

INC
JSR
MOV
8IC
BNE
MOV
MOV

(SP)
PC,BL$M0OD
RO,R2
€7,R2
1
#20,R2
CUOFF ,R1

1 »,SIZE
;s ,SIZE
:
: ¢,SIZE
i

3889
3891
3893

8IC
MOV

000000G

ASL

0000006

ADD

000004

MOV

000164

.MADL [LBN_L]

MX2 geq O

3901
3902
3903

000020
0000006

.BLOCKS_LEFT o BYTES_PER_SECT;

MAD1 (BC_LO)
if

1)) and %0°'177760°;!GET BYTE COUNT FROM RANDOM NUMBER

MOV

#100000,(SP)
BYTS.PER.QIO, -(SP)

CST.ADDR,R1

MAD1,RO

4(R1),R1

E1O
RD/RX

NRQAMS
vO0l1.C

MU TI

EXERCISER

DRIVE

TEST

15 Dec-1983 10:3%:57
14 -Dec-1983 11:35:15

ROUTINES

SEQ OZen
VAX-11 Blies 16 v3-555
104
SPIDERSUSERS
: {DOUCE TTE .F ALCON ICNRQAA . BL 2 (30

)

000140
000144
000146
0001352
000156
000160

000166
000026

21000, -(5P)
(SP).

MOV
MOV
MOV
TST

Routine Bese:
S7 words.
Meximum stack depth per invocation:
7 words

eLTY
MOV
MOV
ce

BLOCKS.LEFT,

+,SIZE
SIZE,»

MAD2.RO
R2,26(RO)

(SP)e,(SP).

RTS

$CODES

¢ ,BLOCKS.LEFT

RO,R1
2
R1,RO
RO
RO
RO
RO,R2
MAD1,RO
R2,26(R0)
Mx2

®e

2%:

31895

PC.BLSDIV

ASL

000164
000026
000162

SIZE,

@777,(SP)

JSR
TSY
cHP
BLOS
MOV
SWAB
CLRB

000300

Routine Size:

R2,(SP)

MOV
ADD
MOV

000777
001000
0000006

101405
010100

105000
006300
010002
013700
010260
005737
002404
013700
010260
022626
000207

46(RO),R1
R1

SuUB
INC

000046

000130
000134

166001
005201
010216
062716
012746
004737
005726
020001

000064
000070
000072
000074
000100
000104
000110
000112
000114
000116
000120
000122
000124
000126

14514

SIZE,s

389°

3899
3901
3903

3881
3869

NRQAM 3

RD/RAX EXERCISER

MR TI DRIVE TEST ROUTINES

THIS ROUTINE

941

3942
3943

TO LOAD

THE

1/0 BUFFER DESCRIBED

IF THE OPERATOR DEFINED A DATA PATTERN

THEN

SELECT

ELSE

GET DATA PATTERN NUMBER FROM SW P
IF DATA PATTERN NUMBER = O
THEN

TABLE

GET DATA PATTERN NUMBER FROM THE UNIT'S ENTRY
IN THE DATA PATTERN SEQUENCE TABLE (DPST)

NOTE THAT PATTERN @ 1 CONSISTS OF RANDOM NUMBERS,
21 USE THE ACTUAL LBN OF THE WRITE REQUEST,

AND PATTERNS ¢ 17

IMPLICIT INPUTS:
LSLUN - CURRENT (DRS) UNIT NUMBER
begin
local

DP _NUM :
OP _ADDR,

3936
939

QJO_GEN

THE DATA PATTERN TO BE SELECTED IS BASED ON THE FOLLOWING ALGORITHM:

word,

108 _ ADOR

3937
3938

3940

IS CALLED By

THE FIRST MSCP PACKET WITH THE APPROPRIATE DATA PATTERN.

3932
3933
3934
3935

3931

novelue

SRC _ADDR,
COUNT : word;
i? BIT_TSTY
then

(SWP_FLAGS,

IF USER DEFINED A DATA PATTERN

SWP_UCNT

SELECT

.SWP_DPAT neq O

IF USER SELECTED A PRE DEFINED DATA PATTERN
SELECT IV

OP _ADDR

SWF _UDP)

OATA PATTERN NUMBER SELECTED
ADOR OF DATA PATTERN (LENGTH)
I/0 BUFFER ADDRESS (DESTINATION)
WORKING SOURCE ADDRESS
NO. OF WORDS IN DATA PATTERN

3926
3927
3928
3929

elee

2
&
e

.
e
@
&

3948
3949
3950

3951

gggi

then

elee

DP_NUM

begin

_SWP_DPAT

OP_NUM =

_OPST [.LSLUN];

it .DPST
then
DPST

[.LSLUN] gtru DP_CNT

OPST ([.LSLUN] =

.DPST [.LSLUN]

+ 1,

! GET PATTERN NUMBER FROM SEQUENCE TABLE

ADVANCE TO NEXT PATTERN NUMBER

B¢

23:6

3954
3955
39%6
3957
3958
3959
3960
3961

[.LSLUN]

CHECK FOR HIGH LIMIT

end;

OP_ADDR =

.DPA_TBL [.DP NUM

SEQ 02029

Pege 105

SPIDERSUSERS: [DOUCE
TTE .FALCONICNRQAA. BL2 (31

3908
3909
3910
3911
3912
3913
3914
3915
3916
3917
3918
3919
3920
3921
3922
3923
3924
392S

routine FILL_BUFF

1983 11:35:15

3906
3907

14 Dec

VAX .1 Bl.es 16 v3 555

BE
&

B¢

e
@

vO1

15 Dec 1983 10:35:57

ADDRESS OF DATA PATTERN (COUNT)

(. ")
RD/RX EXERCISER
MU TI DRIVE TEST

B
&
*
P
@
B4
W
Bt
B
BGs
G2
B
Mo
e
e
B
Be
Ve
B
Be
Be
B4
@
B
B
Be
Be
Bu
B2
@

000014
000016
000022
000024

3962
3963

.DP_NUM geau

35968
3969
3970
3971
3972
3973
5974
397%
3976
3977
3978
3979
3980
3981
3982
3983
3984
3985
3986
3987
3988
3989
3990
3991
3992
3993

end;

004137

0000006

101402
112710
010100
006300

10:35:57
11:35:15

SEQ 0770
VAX 11 Bliss 16 V3 555
Pege 104
SPIDERSUSERS
: [DOUCE TTE .FALCONICNRQAR BL2
*1

0P NUM

then

3967

105210
121027

1983
1983

then

3964
3965
3966

0035746
032737
001403
012703
000443
013700
001402
010001
000414
013700
062700
005001
131001

ROUTINES

else

CHECK MACRO

IF PATTERN

17,

(.OP_ADOR

+ 2)

.MAD1

(LBN L]

LOAD LBN

(.0P ADOR

+ 4)

=«

_MAD1

(LBN L)

LOAD LBN INTO SECOND WORD OF PATTERN

INTO FIRST

WORD OF

19,

OR 21

PATTERN

end;

I08_ADDR =

¢
!
!

.MAD1 (BUF_0);

COUNT = . .DOP_ADOR;
SRC_ADOR = .OP_ADDR

incr N from 1 to ((.MAD1 (BC_LO]

'.'?Ba_nooa = _.SRC_ADOR;

+»

1/0 BUFFER ADDRESS
NO. OF WORDS IN DATA PATTERN
START OF THE ACTUAL DATA PATTERN

1) 7/ 2} do

! FOR EACH WURD IN THIS WRITE REQUEST

vOol

15 Dec
14 Dec

I0OB _ADDR - .IOB_ADOR « 2;
SRC_ADDR = _SRC_ADDR + 2;
COUNT = COUNT - 1;
if .COUNT eql
then
begin

S
NRQAM

COUNT = , . OP_ADDR;
SRC_ADDR = .DP_ADDR

end;

000100

LSBTTL
FILL.BUFF:
JSR

0000006

1¢:

REPEAT DATA PATTERN

WORD TRANSFER LOOP

ROUTINE FILL _BWFF

3906

Bé;

2100, 5wP , FLAGS

3940

MOV
B8R
MOV

#5uWP UCNT ,R3
S
SWP .DPAT RO

;
;
H

«,0P
. ADDR

3942
3940
3946

RO,R1
3
LSLUN,RO

i o+, DP _NUM
3
:

3948
3946
3951

ADD

#0PST RO

000025

81s8
INCB
cHP8

(RO),R1
(RO)
(RO), #25

000001

~OVvB

MOV
B8R
MOV
CLR

8LOS

-(SP)

24:

END OF DATA PATTERN

FILL.BUFF MULTI ORIVE TEST ROUTINES

B8EQ

0000006
000060

0000006

R1, $SAVES

18T

0000006

MOVE 1 WORD
ADVANCE DESTINATION ADDRESS
ADVANCE SOURCE ADDRESS
DECREMENT COUNT

MOV
ASL

#1,(RO)

R1,.RO

;
H
H
H

DP.NUM

o ,0P
. NUM

i DP.NUM

3952
3954

3956

3960

H10
RD/Rx

NRQAMS
v01.0

MA TI

15 Dec
14 Dec

EXERCISER

DRIVE

TEST ROUTINES

1983
1983

10:35:57
11:35:15

SEQ 021
VAX 11 Bl 'es 16 v3 555
Qe 107
SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAAR . BL2 (31

;:
;

000026

000004
000002

000207

Routine Size:

Maximum stack

6%:

000004

7¢:

000006

79 words,

depth per

+,2(DP.ADDR)

42,R4
R3,R4
R4,(SP)

26(R0O), -(SP)
(SP)

e
W
@
G
S

32(R0O),RS
(R3),R2

2, -(SP)
PC,BL$DIV
R1
74

CLR
B8R

84(SP),(RS).

MOV
ADD

DEC

02.4(SP)
R2
74

cHP

R4 ,4(SP)
R1
R1,RO
64
06,5P

BNE
MOV
MOV
INC

(R3),R2

BLE
ADD

RTS

14676

+,s(0OP.ADDR)

+,108.ADOR
OP .ADDR ,COUNT

46(R0),4(R3)
MAD1,R0O

®e

MOV
MOV
MOV
MOV
MOV
ADD
MOV
MOV

$CODES
Routine Base:
invocation:
10 words

3967
3965

INC
MOV
JSR

000002
0000006

DP.NUM

OP.ADOR,
s

3967

3965
3969
3973
3974
3975

#,SRC.ADDR

3977

000002

010466

005201
020100
003763
062706

Ss:

8cC

3962

N
@

000004

g6(RO).2(R3)

¢,0P.ADDR
DP.NUM,
o

000046

MOV

;s
:

000002

R1,021

SRC.ADDR, I0B.ADDR
+,SRC.AVDR
COUNT

000046

cHe
8Lo
MOV
ROR

000164

000164°
000032

OPA.TBL 2(R0O),.R3

MUV

103413
013700
006001
103004
016063
000403
016063
013700
016005
011302
012704
060304
010416
016046
003216
012746
004737
005001
000412
017625
062766
005302
001003
011302

001144
000021

016003
020127

000072
000076
000102
000104
000110
000112
000114
000122
000124
000132
000136
000142
000144
000150
000152
000154
000160
000162
000166
000172
000174
000176
000202
000210
000212
000214
000216
000222
000224
000226
000230
000234

)

OP . ADDR, COUNT
4 ,SRC.ADDR

N
N,s

3979
3981
3982
3984
3987
3988
3977
3906

110
RDRX EXERCISER

NRQAM3

MULTI DRIVE TEST ROUTINES

vol.C

15 Dec

3994
3995
3996
3997
3998
3999
4000

4001
4002
4003
4004
4005
4006

4007

4008
4009

4010

routine PROC_RETPKT

11 Bl ss

SEQ O27%¢

16 V3 555

Pege

108

SPIDERSUSERS:
{DOUCETTE .FALCONICNRQAR .BL 2 (32

REQUIRE PROCESSING.

[}

!
H

UNDER THE MUWLTI-DRIVE TEST, RETURN PACKETS ORIGINATE FROM TWO SOURCES:
1. MSCP
- THE MORE COMMON, DESCRIBING A COMPLETED /0

H
!
'

OPERATION.

2. DuUP
3.

- THE LESS COMMON, DESCRIBING A PORTION OF 1/0
COMMUNICATIONS WITH THE CONTROLLER PROGRAM.
THE PROGRAM "DRIVER” - DESCRIBING A CONTROLLER ERROR OR
COMMAND TIMEOUT.

[ .

while

.§OOO_IN neq

.100Q_OUT do

¢ GET INDEX OF NEXT RETPKT AND ADVANCE OUT POINTER

SET_CPAR (.RP_ADDR [CTLR]);

! SET UP CURRENT CONTROLLER PARAMETERS

RP_ADOR = RETPKT

¢+

(.RP_INDX » RP_LEN ¢ 2);

selectoneu .RP_ADDR [CONID] of

(CID_MSCP) :

IO_RETPKT ();

(CID_DWP]
(CID_DRIVER]

{othernise]

tes;

:
:

PRINTF (DBM12.

! DUP (1/0 TRANSFER DONE)
! MESSAGE FROM “ORIVER"

.RP_ADDR {[CONID]));!”CONN ID = XXX2X RECEIVED*

000000G

000060
0000006
0000006
0000006

000002

177760
0000006

0000006
000003

'JSD REV A

! UNITL I/0 DONE QUEUE IS EMPTY
L.SBTTL

PROC.RETPKY MULTI-ORIVE TEST ROUTINES

MoV

R1,-(SP)

40.2

JSR

PC,0UT . I0DG

4014

MOV

RO, -(SP)

: RP_INDX,s

4015

2(R0O),(SP)

4016

RP.ADDR,RO

4018

PROC.RETPKT:

0000006 000000G

CALCULATE RETPKT ADORESS

! DISK MSCP (1/0 TRANSFER DONE)

DIO_RETPKT ();
DR_RETPKT (),

end;

010146

¢! CONNECTION ID INDICATES PACKET SOURCE

set

0000006

DO UNTIL 170 DONE QUEUE IS EMPTY

::?INDX = OUT_I00Q ();
in

4016
4017
4018
4019
4020
4021
4022
4023

023737
001452
004737
010037
010046
012746
004737
062700
010037
116016
042716
004737
013700
005001
156001
005701

1983 11:35:15

VAX

THIS ROUTINE IS CALLED FROM THE MULTI _DRIVE "EXECUTIVE” AND DUP_COMMAND TO CHECK FOR
AND PROCESS ANY RETURN PACKETS THAT MAVE BEEN "SENT” BY THE "DRIVER”
PORTION OF THE PROGRAM. THE 1/0 DONE QUEUVE (I0DQ@) ACTS AS THE LINK
BETWEEN THE TWO PROGRAM PARTS; IT HOLDS INDECES OF RETURN PACKETS WHICH

4015

4024

novalue

10:35:57

H
!
H
'

4011
4012
4013
4014

4025
40256
4027
4028

14 Dec

1983

1s:

gg:
MOV

MOV
JSR
ADD
MOV

MOve
8IC
JSR

MOV

CLR
81s8
TST

ggDQ.IN.IODQ.OUT
RO,RP
. INDX

460, -(SP)
PC,.BLSMUL
MRETPKT
RO
RO,RP
. ADDR

#177760,(SP)
PC,SET.CPAR
R1
3(RO) R}
R1

3994

J10
RD/RX EXERCISER
MULTI DRIVE TEST

NRQAM3
vol C

15 Dec
14 Dec

ROUTINES

)

000074

000076
000102
000104
000110
000112
000116
000120
000124
000126
000132
000134
000136
000140

001003
004737
000413
020127
001003
004737
000405
020127
001002
004737
022626
000722
012601
000207

000000V
2s:

000000V

34
000000V

S5¢:

BNE
JSR
B8R
cHP
BNE
JSR
BR
cMP
BNE
JSR

28
PC,IO0.RETPKT

RTS

a4
R1, 02

3¢
PC,DIO.RETPKT

PC,OR.RETPKT
(SP)+,(SP).
1¢
(SP)+,R1

cHpP
B8R
MOV

Routine Base:
$CODES$
49 words,
: Routine Size:
4 words
; Maximum stack depth per invocetion:

15134

1983 10:35:57
1983 11:35:15

VAX

11 Blies-16 Vv3-555

SEQ 03133
Page 109

SPIDERSUSERS: ([DOUCETTE.FALCONICNRQAA BL2 (32
'
'

4021
4018
4022
4018

4023
4013
4012

3994

110
RD/RXx EXERCISER
MATT DRIVE TEST

NRQAM 3
vO1 ¢

195 Dec
14 Dec

ROUTINES

1983
1983

10:35:57
11:35:15

SEQ 0344
VAX 11 Bliess 16 v3-555
Pege 110
SPIDERSUSERS: [DOUCETTE .FALCONICNRQAA 8L2 (33

)

®¢

@¢

®e

4029
4030
4031
4032
4033
4034
4035
4036
4037
4038
4039
4040
4041
4042
4043
4044
4045
4046

4047

4048
4049
4050
4051
4052
4053
4054
4055
4056
4057
4058
4059
4060
4061
4062
4063
4064
4065

ROUTINE

NOVALUE

!
H
H

THIS ROUTINE IS CALLED BY PROC_RETPKT TO HANDLE ALL DUP I/0 TRANSFER
RETURN PACKETS. PROCESSING OF THESE PACKETS INCLUDES DECLARING ANY
HARD ERRORS THAT MAY HAVE OCCURRED, UPDATING THE STATISTICS.

IMPLICIT INPUTS:

!
!
!
'
'

RP_ADDR - ADDRESS OF THE CURRENT RETURN PACKET
T_ADDR - ADDRESS OF THE CURRENT UNIT'S STATISTICS BLOCK (TALLY)
CST_ADDR - ADDRESS OF THE CURRENT CONTROLLER'S CST
CUOFF - CST OFFSET FOR THE CURRENT UNIT
LSLUN - CURRENT UNIT NUMBER

CCTLR

[

H
H

- CURRENT CONTROLLER NUMBER

IMPLICIT QUTPUTS
CST_ADDR [.CUOFF

« 3, NODUPMEDIA]

IF THIS BIT SET NO DUP EXERCISER

]

‘BEGIN

LOCAL

FLAG
SUM2

SUM :

: BYTE INITIAL(BYTE(TRUE)),
: WORD,

WORD;

1PRINTX (DER1S);
FSET_UPAR ();

t
!

TOTAL NUMBER OF BYTES TRANSFERRED TO/FROM A UNIT

FIND UNIT'S ENTRY IS CST AND SET UP UNIT-RELATED DATA

¥;E&RP_AgggI£STATUS] NEQU ST_SUC

IF STATUS CODE INDICATES ERROR

CST_ADOR [.CUOFF + 3, DUPERROR] = 1;

! SET DUP ERROR FLAG

!
.

HARD _ERROR (),

.RP_ADDR [ENDCOD) EQLU (OP_ELP « OP_END)
OR
.RP_ADOR [ENDCOD] EQLU (OP_GDS « OP_END)

THEN

4066

4067
4068
4069
4070
4071
4072
4073
4074
4075
4076
4077
4078
4079
4080
4081
4082
4083
4084

DIO RETPKT

BEGIN

IF ENDCODE IS EXECUTE LOCAL PROGRAM
OR GET DUST STATUS

E'S‘;_ADDR ([ .CUOFF + 3, NOODUPMEDIA] = 1;

TURN OFF DUP EXERCISR

END

ELSE

I/0 WAS SUCCESSFWL

IF ENDCODE IS GET DUST STATUS

BEGIN

.RP_ADDR [ENDCOC] EQLU (OP_GDS + OP_END)

THEN

BEGIN

.RP_ADDR (9,11,1,0) EQL
1
THEN CST_ AODR {. CUOFF
ELSE CST_ADDR [.CUOFF

+ 3, D_ACTIVE)
- 3, D_ACTIVE)

.RP Aggglg9.9.1,0) NEQ 1 THEN
HARD _ ERflOfl ()

= ACTIVE
= IDLE;

TEST T0 SEE IF CONTROLLER LOCAL PROGRAMS(PG 18 OF DUP DOC)

gag { .CUOFF + 3, NODUPMEDIA]) = 1,

END;

(.RP_ADDR [ENDCOD) EQL (OP _RCO

« OP_END)) AND

! CONTROLLER IN AN ACTIVE STAE
! CONTROLLER IN AN IDLE STATE

! TURN OFF DUP EXERCISR

L
RD/RX EXERCISER
MA TI DRIVE TEST

NRAMZY
vl
¢

4085
4086
4087
4088
4089

40%0

4091
4092
4093
4094
4095

000012
000016
000022
000024

112700
004737
013701
005761
001435
013700
006300
063700
052760
004737
013700
126027
001404
126027
001112
013700
006300
063700
0352760
000501
126127
001036
013700
006300
063700
032761
001404
052760
000403
042760
032761
001012
004737
013700
006 300
063700
032760
013700
126027
001031

();

END;
PUT _RETPKT

( _RP_INDX);

QX0 {.CCTLR)

.QIO [.CCTLR]}

- 1

L.SBTTL
OIO.RETPKT:
MOV
MOVB
JSR
MOV
TST
BEQ
MOV
ASL
ADD

000203

000014

000201

BIS
JSR
MOV
CHPB8
8EQ
CcP8
BNE
MOV
ASL

100000

000006

000014

000201

2s:

001000

000022

100000

020006

000014

000205

0000006

as:

S$:

V3-555

SEQ 0275
Page 111

SPIDERSUSERS
: (DOUCETTE .FALCONICNRQAA .BL2 (37

COMPARE

DECREMENT NO.

ROUTINE DIO_RETPKT

THEN

THE FOLLOWING 512 BYTES

OF OUTSTANDING QIOS

DIO.RETPKT MATI-DRIVE TEST ROUTINES
R1,-(SP)

PC.FSET . UPAR
RP.ADDR,R1

:
H

#1,.RO

16(R1)
24
CUOFF ,RO

o, NTLAG

4030

4049

4055
4057

4059

:
:

4060
4061

14(RO), 0201

4062

CUOFF ,RO

4064

4057

;

4075

;4000.22(R1)

4074

#20000,6(RO)
48
420000,6(RO)

H
;
H

4075
4074
407§

;

4079

4084

CST.ADDR,RO

#40000,6(R0O)
PC .HARD .ERROR
RP.ADDR,RO

14(RO), #203
18

ADO
8IT
BEQ
8IS
BR
BIC
BIT
BNE
JSR
mOV

CST.RDOR,RO

BIS
MOV
cHPB
BNE

11 Blies-16

CST.ADOR,RO
#100000,6(R0O)

ASL
ADD

VAX

tIF IT IS A RECEIVE OBN COMMAND WITH TYPE 6 AND MESSAGE
IF WRITE FLAG SET IN CST TABLE THEN COMPARE BLOCKS

ADD
8IS
B8R
cMPB
BNE
MOV
ASL

004000

10:35:57

END;

000014

1983

14 Dec-1983 11:35:15

(.DUPPKT (DUPTYPE] EGQL 6) AND
(.OUPPKT [DUPMESG) EQL 2) AND
(.CST_ADDR [ .CUOFF .3, DUPWRITE) EQLU 1)

010146
000002

19 Dec

ROUTINES

THEN DUP_COMPARE

é&(nl).OEOI
$

CUOFF ,RO

g%OOO.ZZ(Rl)

PC ,HARD ,.ERROR

CUOFF RO
RO

R
RO
CST.ADD
#100000,6(R0O)

RP ,ADDR, RO

14(R0O), 4205

;

4072

4077

4080

M1O

000236
000242
000246
000252

000254
000260
000264
000270
000272
000276
000300
000304
000312
000314
000320
000324
000330
000334
000340
000342
000344

;
;

15 Dec
14 Dec

RD/RX tXERCISER

NRQAM3
v01.C
)

MU TI DRIVE

013700
042700
020027
001022
013700
042700
020027
001013
013700
006300
063700
032760
001402
004737
013746
004737
013700
105360
005726
012601
000207

TEST ROUTINES
MOV

0000006
007777
060000

000000G
170000
000002
0000006

0000006

6%:

Rout ine Base:
Routine S’ ze:
115 words,
3 words
Meximum steck depth per invocation:

Page

112

SPIDERSUSERS
: [DOUCETTE .FALCONICNROAA .BL2 (33
4085

OUPPKT ,RO

4086

CUOFF ,RO

;

4087

CST.ADDR,RO
€10000,6(R0O)

8IT
8EQ
JSR
MOV
JSR
MOV
DECB
TST
MOV
RTS
$CODES

SEQ 0336

€170000,R0
RO, @2
68

ASL
ADD

0000006
010000

VAX-11 Blies-16 v3-555

DUPPKT RO

07777,R0O
RO, 260000
64

8IC
cHP
BNE
MOV
8IC
cMP
BNE
MOV

1983 10:35:5/
1983 11:35:15

6t
PC,0UP
. COMPARE

4088

RP . INOX, -(SP)
PC,PUT RETPKT
CCTLR,RO

4092

4093

(SP)«
(SP)+,R1

4049

4030

QIO(RO)

;

15276

N10O
NRQAMS
vOol.¢

.
:

RD/RX EXERCISER
MU TI DRIVE TEST ROUTINES
4096
4097
4098

ROUTINE DUP_COMPARE

15 Dec 1983 10:35:57
14 Dec 1983 11:35:15

NOVALUE

;
:
.
:
:
:

4099
4100
4101
4102
4103
418;

!
!
!
!
!
H

THIS ROUTINE IS CALLED BY DIO_RETPKT WHEN THE RECEIVE DATA COMMAND
IS BEING PROCESSED. THIS COMMAND COMPARES THE WRITTEN BUFFER WITH
THE PATERN WORD GIVEN IN SEND DATA COMMAND.
FOR EVERY WORD COMPARED
THE ROUTINE INCREMENTS THE TALLY TABLE.
1IF THE COMPARE SHOWS AN
ERROR. THE DBN HARD ERROR COUNTER WILL BE INCREMENTED AND THE
THE DBN NUMBER AND BYTE COUNT WILL BE PRINTED.

4100

IMPLICIT INPUTS:

;

:
.
:
.
:
:
:

4107

4108
4109
4110

! -BEGIN
.
OwN

4111
4112
4113
4114
4115
4116

4118

S_DUPPKT

:
H

;

4117

:153

S_PATTERN

!
¢ .
!«

S_DUPPKT
T _ADOR
CST_ADDR

COUNT

THE SAVED PATTERN WRITTEN TO THE DBN'S

! THE POINTER FOR DUP BLFFER
' THE ADDRESS OF THE TALLY TABLE FOR THIS UNIT
' THE ADDRESS OF PRESENT CONTROLLER STATUS TABLE

WORD;

‘PRINTX (DER19);
= 0;

INCR CO&)BCEGEZO'* 1 70 256 0O

4121

S_DUPPKT «

:%gg

_S_DUPPKT + 2;

ERRHRD (46,

4123

EXITLOOF;

4126

ENO;

*INDEX PIONTER FOR DATA STORED IN MSCP ENV PACKET

(Dwg’ééno‘ .S_DUPPKT) NEQ

4124

4127
4128

END;

EH_10,

INITIALLY THIS SKIPS THE FIRST WORD OF DUPPKT

.S PATTERN THEN

EMS_22);

SEQ 0217/

VAX 11 Bl.es8 16 V3-555
Page 113
SPIDERS$USERS:
(DOUCETTE .FALCONICNRQAA BL2 (%4

tIF THE CONTENTS OF DBN DOESN T EQUAL PATTERN

'LIST ERROR
GO0 THROUGH ALL D8N WORDS
'ENO ROUTINE DUP COMPARE

tr.
4
15 Dec 1943 10:33:%?7
14 Oec 1983 11:355:1%

vol.¢

¢Ar 11 8] ws 16 % ¢
WPIDERE
L0 IDOUCETE

.
*

‘o,

)

00%087
012704
062737
018700
026037
001409
104456
000056

1
t

OUP.COMPARE "MATT DRIVE

1, -(SP)

"0V
ADD
MOV

0400 ,R1
02,5.0UPPKT
S.DUPPX
T RO

8€Q

000400
000002

0O00000G

0000000

000000

14:

o, 4

2%:

003301
001 %0
012001
000207

3¢:

2% worde,

depth per

TES! ROU' N

40%

¢ . COUNTY

.MORD
.WMORO
.MORD

56
EmM.10
EMS. 22

OEC

oV
RYS

(sP). A1
PC

3¢

BNE

$CODES
Rout ine Sese:
S woras

inveocetion:

DUPPKT(RO),5.PATTERN

TANP

0000006
0000006
000402

Rout ne S:ize:
Max mum eteck

¢CODES,

000004

000024
000042
000034
0000 %
000040
000042
000044
000046
000040
0000%2
000054

LSBTT.

ol0166

00V0C0

000012
000020

LS.
1

.PSECT

Q144

000006

ALY
By

CRMt:

001,
001,74

15644

4118
4119
4121
4122

4124

COuUNT

412"

4119

409

RO /RX EXERCISER
MA TT DRIVE TEST ROUTINES

81
B

4139
4140
a141
4142
4148

4144
4145
4146

B
O

THIS ROUTINE IS CALLED By PROC _RETPKT

TO MANDLE ALL

B
LD

HARD ERRORS THAT MAY HAVE OCCURRED,

I/0 TRANSFER

OECLARING ANY

UPDATING THE STATISTICS,

IMPLICIT INPUTS:
CST_ADOR

- ADDRESS OF CURRENT CONTROLLER'S CST

RP_ADOR - ADDRESS OF THE CURRENT RETURN PACKET
YT _ADDR - ADDRESS OF CURRENT UNIT'S STATISTICS BLOCK

CETLR - CURRENT CONTROLLER NUMBER

LOSLUN
begin

4150

FSET_UPAR ()

SB_CODE =

* GET SUB CODE,

4153
4154
415s
4156
4157
4158
4159
4160
4161
4162
4163
4164
4165

byte

initisl

(byte (TRUE));

ST_CODE = .RP_ADOR [STSCOD);

FIND UNIT'S ENTRY

IS CST

AND SET

t GET STATUS CODE FROM RETPKT

.RP_ADOR [SUBCOD);

i# (.ST_CODE neq ST_SUC)

STATUS CODE

UP UNIT-RELATED DA'A

IF ANY

INDICATES ERROR

then

::!o_ennon or

! UPDATE ERROR COUNT

(1,

COMPARE _DATA = FALSE;

! NO POINT IN DOING HOST COMPARES ON ERROR

(.ST_CODE neq ST_OFL) and

(.st_code neq ST _AVL) end

DROP UNIT

IF ERROR COUNTS EXCEEDS LIMIT

(.T_ADDR [ERR_HARD] gequ .SWP_ERROR)

then

353 [.LSLUN] = DU_MERR;
DODU (.LSLUN);

4166

4167
4168
4169
4170
“un
4172
4173
474
4175
4176
4177
4178
4179
4180
418)
4182
4183
4184

(TALLY)

- CURRENT UNIT NUMBER

locel
FLAG

4151
4152

AND

PERFORMING HOST WRITE -COMPARES IF REQUIRED.

end;

t LOAD REASON FOR DROPPING UNIT
! DROP UNIT

end;

.ST_CODE eql SY_SUC

then

338,10_1ALLV ()
.RP_ADOR

[ENDCOD) eql

then COMPARE DATA = TRUE;
i? (BIT_TST (SWP_FLAGS,
t'\.'(‘.COPARE_IMTA)

(OP_WRT or OP_END)

SWF_HWC)) and

FLAG = HOST_WRT_CHK (),
ond;

I/0 WAS SUCCESSFUL

! UPDATE I/0 TALLY (STATISTICS)

t HOST COMPARES MAY BE ALLOWED IF NO FURTHER ERRORS
¢

IF HOST

SAVE

IRVRA)

VAX 11 Bl.ee 16 v3 555
Pege .1'
SPIDER$SERS:[DOUCE
TTE .+ ALCONICNROI: M1 e

: novelue °

4147

4148
4149

15 Dec 1983 1u:35:57
14 Dec 1983 11:35:15

RETURN PACKETS. PROCESSING OF THESE PACKETS INCLUDE

4136

4137
4138

routing I0_RETPKT

4130
4131
4132
4183
4134
4138

4129

O«

&
NRGAM

IS DOING WRITE-COMPARES

/0 PACKET OR DO WRITE CHECK

DIl
RD/Rx EXERCISER
MA TI DRIVE TEST

NRQAM S

®e

vOol.¢

000010
000014

4185
4186
4187
4188
4189

4190

QIO [.CCTLR]

004157

0000006

112701
004737

000001
000000V
0000006
000016
000000G

006202
006202
006202
006202
042702
010237
005787
001433
004737

105037

023727
001420
023727
001414
013700
026037
103406
013700
112760
104451

177740

000016

If FLAG IS STILL

.QI0 [.CCTLR]

MOvVE

JSR
MOV
MOVB
BIC
MOV
ASR
ASR
ASR
ASR

ASR
8IC
MOV

174000

157

000000V
001240
000000G 000003
000000G 000004

000014

000004

000000G

0000006

DECREMENT NO.

.SBTTL
I0.RETPKT;
JSR

0000006

SEQ 0244
age 116
SPIDERSUSERS:
[DOUCE T1TE . F ALCONICNRIAA BL2 (3%

VAX

TRUE

DEALLOCATE BUFFER(S) AND RETP¥T(S)

SWEEP ();

end;

116037
042737
016002
006202

ROUTINES

FLAG

then

4191

013700

15 Dec 1983 10:35:57
14 Dec 1983 11:35:15

BEQ
JSR
CLR8
cHP
BEQ
CcHP
B8EQ
MOV
cHe
8L0
MOV
MOVB

TRAP

ROUTINE

IO.RETPKT MULTI DRIVE
R1, $SAVE?

e1,R1

T
. UPAR
PC,FSE
RP . ADDR,RO

16(R0O),ST.CODE

€177740,S7.CODE
167R0),R2

OF OUTSTANDING QIOS

IO _RETPKY

TEST ROUTINES
s FLAG

4129
4145
4150
4151

4152

R2
R2

R2
R2
R2

9174000,R2
R2,58.CODE

SY.CODE

2ot
PC,HARD
. ERROR

COMPARE .DATA
SY.CO0E,
03
18
, 04
ST.COODE
14
T.ADDR,RO

4154
4157

4158
4160
4161

4162

14(R0O),
SWP ERROR
18

LSLUN,RO
g‘.DUR(RO)
1

4165

4166

t.
|
RD/RXx EXERCISER
MA TI DRIVE TEST

3
NRQAM
vol.C

1* Dec
14 Dec

ROUTINES

1983
1983

10:35:57
11:35:15

VAX

11 Bliee

16 v3-355

SEQ 0241
Pege 117

SPIDERSUSERS: (DOUCE
T
TE.FALCONJCNRQAA 8L2 (335

)

00015¢
000154
000156
000162
000166
000174
000176
0002G4
000212
000214
000222
000224
000230
000232
000234
000236
000242
000246
000252

.,
i

005737
001026
004737
013700
126027
001003
112737
032737
001407
032737
001403
004737
110001
006001
103002
004737
013700
105360
000207

0000006

1%:

000000V
0000006
000014
000242

000001
000040

001240
0000006

000001

001240’

Ss:

4173

PC,UPD.IO.TALLY

s
]

4174
4176

:
H

4177
4179

#1,COMPARE .DATA
#40,SWP FLAGS

MOve

817
BEQ

8IT
BEQ
JSR
“Ov8

ROR

8CcC
JSR

MOV
0ECs
RTS

$COOES
Routine
Bese:
86 words,
Rout 'ne S ze:
0
S words
Max
. mum steck depth per invocetion:;

RP,ADDR,RO
gd(RO).0242

cree
BNE

ST.CODE

MOV

000000V

000000V
0000006
0000006

157
BNE
JSR

#1 ,COMPARE .DATA
44
PC.HOST
. WRT . CHK
RO,R1
R1
S
PC,SWEEP
CCTLR,RO

;

4190

4129

QIO(RO)

15722

;
;
:
;

4180

o, FLAG
FLAG

4182

4186
4188

Pl
RD/RX EXERCISER
MU TI DRIVE TEST ROUTINES

B¢

OS¢

NRQAMS
vo1.C

routine FSET_UPAR

4200
4201
4202
4203
4204
4205
4206
4207
4208
4209
4210
4211
4212
4213
4214
4215
4216
4217
4218
4219

[]

B¢

wL
@
B

4199

000010
000012
000014
000020
000024
000032

;
;

4192
4193
4194
4195
4196
4197
4198

DATA PARAMETERS.

CST IS USED AS INPUT TO SET UPAR,

IMPLICIT INPUTS:

CST_ADDR

RP _ADDR

| 2N

WHICH SETS UP CURRENT UNIT RELATED

ADDRESS OF CURRENT RETURN PACKET

- ADDRESS OF CURRENT CONTROLLER'S CST

begin

‘ner OFFSET from (O « OF _UN) to (3 & UNIT_SIZE
if

.CST_ADDR [ .OFFSET,

then

D_OISK_NUM] eql

gE.?_LPAR (.OFFSET);

« OF _UN) by UNIT_SIZE do

FOR EACH UNIT IN CST

.RP_ADDR [0ISK]
t IF RETPKY UNIT NUMBER MATCHES CST ENTRY

! SET UP UNIT-RELATED DATA

return;

DONE

end;

PRINTF (DBM19,
end;

012702
010201
006301

000003

016004

000010

042703
020304
001005
010246
004737
005726
000207
062702
020227
003751
000207

SEQ 0%a.
VAX 11 Blies-16 v3-555
Pege 118
SPIDERSUSERS:
[DOUCETTE .FALCONICNRQAA .BL2 (36

THIS ROUTINE IS CALLED BY IO_RETPKT AND OTHERS TO SEARCH THE CURRENT
CONTROLLER STATUS TABLE (CST) FOR THE DISK ADDRESS WHICH IS
CONTAINED IN THE CURRENT RETURN PACKET, WHEN FOUND, THE OFFSET INTO THE

0000006

111103

novelue

1983 10:35:57
1983 11:35:15

!
!
!

004137

063701
013700

15 Pec
14 Dec

.RP_ADDR (DISK],

.SBYTL

1$:

R1,$SAVES

MOV
MOV

3 .R2
R2.R1

ASL

ADD
MOV

TSY
RTS
ADD
ce

CST.ADDR,.R1
RP .ADDR,RO
10(RO) R4
(R1).R3
#177774
,R3
R3,.R4
2
R2, -(SP)
PC,SET.UPAR
(SP)e
PC
#5,R2
R2,#22

RTS

MOV

MOVB
8I1C
cHp
BNE
MOV
JSR

177774

0000006
2%:

! “CAN'T FIND DISK XxX IN CST Xx-~
! ROUTINE rSET_UPAR

BLE

Routine Size:
28 words,
Routine Bese:
$CODES
Maximum stack depth per invocetion:
7 words

'JSD REV A

FSET.UPAR MULTI-DRIVE TEST ROUTINES

FSET.UPAR:
JSR

0000006
0000006

000005
000022

.CCTLR);

+»

16176

4192

i OFFSET,
s

4214

H
H
;
:

4210
4213
4208

; o, 0FFSET
: OFFSET,»

o, 0FFSET
OFFSET,»

4208
4210

4192

GL1
RO/RX EXERCISER

NRQAM3

15 Dec

MATI DRIVE TEST ROUTINES

vol1.C

14 Dec

1983

10:35:57

VAX-11 Bliees

11:35:15

v3-555

SEQ 0147
Page 119

SPIDERSUSERS
. [DOUCETTE .FALCONICNRQAA .BL 2 (27

4220
4221
4222

rout ine HARD_ERROR

4224
4225
4226
4227
4228
4229

H
H
!

ERROR STATISTIC FIELD FOR THE CURRENT UNIT. If THE HARD ERROR COUNT
HAS EXCEEDED THE OPERATOR-SPECIFIED LIMIT, THEN THE UNIT IS ODROPPED
FROM TESTING.

IMPLICIT

4234
4235
4236
4237

4238
4239

4240
4241
4242
4243
4244
4245
4246
4247

A
B
B9
B4
Wi
B2
Se
B
B
B
Be
BE
B
B
S5
B3
Be

[]

!
!
!

novelue

THIS ROUTINE IS CALLED BY IO_RETPKT, DIO_RETPKT, AND OTHERS TO INCREMENT THE HARD

]

INPUTS:

LSLUN - CURRENT UNIT NUMBER
CST ADDR - ADDRESS OF CURRENT CONTROLLER'S CST
CUOFF - CST OFFSET FOR CURRENT UNIT
Y_ADOR

ADDRESS OF CURRENT UNIT'S STATISTICS BLOCK (TAILY)

[]

?.xDDR (ERR_HARD) » .T_ADDR [ERR_HARD] + 1;

+;ENRP ADOR

selectoneu
set

.ST_CODE of

(ST_SUC]):

if .SB_CODE neq O

then

T_XDDR (ERR_HRD _DRV] = .T_ADDR (ERR_HRD DRV] . 1

4250
4251
4232
4253
4254

elee

4264
4265
4266
4267
4268
4269
4270
4271
4272
4273
4274
4275

end

T_ADOR [ERR_HRD _MHST)

T ADDR {ERR_MRD_HST)

ERRHRD (44, EGH_30, EMS_30);

end;

(ST _CMD]:

bcgésa

(ST_ABO]):

b.zDOR

T
[(ERR_HRD _HST) =
.T_ADDR (ERR_HRD_HST]
ERRHRD (31, EGH_30, €EMS_30);

4259

4263

begin

4249

4260
4261
4262

! SUCCESS WITH NON ZERG SuUB CODE

begin

if .SB_CODE eql
then

4248

4255
4236
4257

! INCREMENT UNIT'S HARD ERROR COUNT

[CONID) EQL CID_MSCP

(ERR_MHRD DRV] =

ERRHRD (32,
end;

(ST_OFL])

EGH_30,

4230

4231
4232
4233

_T_ADDR LERR_HRD_DRV] + 1;

INVALID COMMANO

!t COMMMAND ABORTED

b.XDOR {ERR_HRD_DRV) = .T_ADOR [ERR_HRD_DRV] ¢ 1;

' OFFLINE

OUR (. LOLUN] » DU_DFATAL;
(10 V) (.LOLUN);

' DEVICE FATAL ERROR
! DROP UNIT

ERRDF (18,

EGD_18,

EMS 16);

end;

[ST_AVL) :

EMS_30);

m (ERR_HRD_DORV]) = . T_ADDR [ERR_HRD_DRV])

4223

B¢

)

Hod
HKD/RX EXERCISER

a279
4230
4281

4282

4286

4287

4297

4296
4298

4299
4300
4301
4302
4303
4304
4305

(ST _wPT):

else

B
@
e
e
®1
me
@
e
as
@r
®1
®:
er

@0
®s
G
Be
W
@8
B2
8

T_ADDR

18);

DEVICE WENT AVAILABLE STATE
! DROP UNIT

T_ADDR

EMS_30);

{ERR_HRD SEK]

eql

. T

ADDR

(ERR_HRD _HST]

T_ADDR [ERR_HRD _DRV]

.T_ADDR

[ERR_HRD_DRvV]

bOXDOR

EGH_30,

EGM_30,

T ADDR [ERR_HRD_DAT]

EMS_30);

DEVICE WRITE PROTECTED

! COMPARE ERROR

begin
it

MEDIA FORMAT ERROR

EMS_30);

[(ERR_HRD _DAT)} =

ERRMRD (37,

128

end;

(ST_DAT]:

16 v3-555

t DATA ERROR

.SB_CODE eql 2

then

end;

T_ADOR [(ERR_HRD_SEK]

. T_ADDR (ERR_HRD_SEK]

T_ADOR [ERR_HRD _DAT)

. T_ADDR (ERR_HRD_DAT]

.«

ERRHRD (38, EGH_30, EMS_30);

(ST_HST):

ERRHRD (39, EGH_30,

(ST_CNT):

“gooa

EMS_30);

{ERR_MHRD DRV] =

ERRHRD (40,

end;

(ST_DRV):

! HOST ACCESS ERROR

°R00R (ERR_HRD_HST] = .T_ADDR [ERR_MRD_MST] « 1;
end;

EGH_30,

* CONTROLLER ERROR

_T_ADDR [ERR_HRD_DRV]) + 1;

EMS_30);

begin

! DRIVE ERROR

i.:.'.\SB_CG)E eql
t

T_ADDR [ERR_HRD_SEK)

,T_ADDR [ERR_MHRD_SEK])

T_ADDR [ERR_HRD _DRV])

.T_ADOR

4328

else

4330
4331

ERRHRD (41,

EGHM_30,

EMS_30),

SEO 0344

SPIDERSUSERS: [DOUCETTE .FALCONICNROAA:Es
(37

[ERR_MRD _HST]

ERRHRD (36,
end;

(ST_CMP):

1] Bl .ss

begin

4311
4312

4326
4327

EMS

(ERR HRD_SEK]

if .SB_CODE
then

4308
4309
4310

4315
4316
4317
4318
4319
4320
4321
4322
4323
4324
4323

18,

ERRHRD (35, EGH_30,

elee

®:

4307

4313
4314

EGD

end;

8¢

[ST_MFE):

4288
4289
4290
4291
4292
4293
4294

VAX

end;

4284

4285

(24,

ODUR [.LSLUN]) = DU AvV;
DODU (.LS$LUN);

4278

1983 10:35:57

14 Dec 1983 11:35:15

ERROF

4276

4277

.
:
.
:
i
.
.

1% Dec

MAT] DRIVE TEST ROUTINES

NRQuTM
L
vOl

[ERR_MRD DRV]

Il
RD/Rx EXERCISER
MA TI DRIVE TEST ROUTINES

NRQAM S

vOol

15 Dec
14 Dec

1983
1983

s€Q o4
VAX 11 Blies-16 v3-555
ie!
SPIDERSUSERS: (DOUCETTE. FALCON]CNRQA“ Btz I

10:35:57
11:35:15

f et e s e s e ar e m e e v e e ..................V....g....... o e e e e e e e

)

4332
4333
4334
4335
4336
4337
4338
4339
4340
4341
4342
4343
4344
4345
4346
4347
4348
4349
4350
4351
4352
4353

end;

{ST_DIA}:

begin

ERRHRD (43,

EGH 30,

EMS 30);

end;

{otherwi se]:

bogin

C_ERR_TBL

ERRHRD
end;
tes;

if .RP_ADDR
THEN

[.CCTLR,

(45,

EGH_30,

C ERR HRD]
EMS

(#0'0')
begin
IF _.RP ADDR [ENDCOO
EQLYU (OP_GDS +» OP_END)
THEN

C ERR MRD)

STATUS CODE

NO MATCH

TflSDOR
END;

if status code succesful
IF ENDCODE IS GET DUST STATUS

THEN

TEST

EH_12,

EMS_30);

UNABLE TO LOAD LOCAL CONTROLLER DUP MEDIA(PROGRAMS

(ERR_HRD _DRV)

_T_ADDR

TO SEE IF CONTROLLER LOCAL PROGRAMS(PG 18 OF

[ERR_HRD _DRV])

.ouppkt [dupmesg] eql 3

then

4361
4362
4363
4364
4365
4366
4367
4368
4369
4370
4371
4372
4373
4374
4375
4376
4377
4378
4379
4380
4381

!
!

.RP_ADDR [9,9.1.0) NEQ 1

4356
4357
4358
4359

if (.DUPPKT
then

[DUPTYPE) eql S)

beai
"on

008 { .LSLUN] = DU_DFATAL;
DOOU (.LSLUN);

uloctonouser.otPPKT {DUPMESG) of

!
!

FATAL DEVICE ERROR DROP UNIT);
SET REASON FOR DROPPING UNIT

(so’'l']) : begin

Crrhrd (48, on_13, ems_30); ! ill
1 unit number
T_ADDR [ERR_HRD_HSY] = _T_ADOR [ERR_HRD_MHST) « 1;

(#0'2’')

{#0'3']

end;

: begin
.
1 reletive or physicel blcck ¢
errhrd (49, o _13, ems_30); ! -11
T_ADOR [ERR_MD_HST] = _T_ADDR
[ERR_HRD_HST) « 1;

end;

: begin

errhrd (50, eh_13, ems_30); ! device error
T_ADOR [ERR_MRD_DRV)

(%0'4’']

4382

4383
4384
4385

4387

30);

.C ERR_TBL [.CCTLR,

oclcctonggr.nP_ADDR (STSCOD] of

BEGIN
ERRMRD (47,

4386

(CONID) EQL CID_DuLP

4354
4355

4360

! MESSAGE FRUGM INTERNAL DIAGNOSTIC

Y_gDDR (ERR HRD DRV]) = _T_ADDR [ERR HRD DRV]) + 1;

end;

(wo0'1']

end;

: begin

tes;

end;

.7 ADOR (ERR_HRD _DRV]

: begin
crrhrd (5%
13. ems_30); ! zero lenght messeage
T_ADDR (E
D_HST]) = 7 ADDR {ERR HRD
HST]) .« 1;

end;

\J 1 L
NRQAM3
vol.¢<

RD/RXx EXERCISER
MULTI DRIVE TEST ROUTINES

)

;
:

4388
4389

4391

4596

.
.

.
:
.
.

H
.

:
.
H

(#o'2']

4392

4393
4394

4395

(0 3')

4337

end;

: bc?'n

ERRHRD

(53,

EH 7, EMS_30);

! NO REGION AVAILABLE

ERRHRD (54, EH_7, EMS_30);

! NO REGION SUITABLE

T_ADDR [ERR_HRD DRV]
end;

T_ADDR (ERR_HRD _HST)

4398

4399
4400

[wo'd’]

4401

: begin
ERRHRD (55,

(so0'T' )

4407

(%0'6')

4410
4411

end;
(OTHERKISE] :

4414
4415
4416

end;

4404
4405
4406

4408
4409
4412
4413

end;
:

TES;

HARD .ERROR :

000004

013701

0000006

MO\

000014

013760

0000006

MOV

000042

000046
000050
000054
0000%5
000060
000062
000066
000070
000072

000074
000076

013700
001022
013702
001574

012793

! PROGRAM NOT KNOWN

! DUP UNKNOWN STATUS CODE
.C_ERR_TBL [.CCTLR, C_ERR_HRD]

! ROUTINE HARD ERROR

000014

000003

.SBTTL

HARD.ERROR MULTI-ORIVE TEST ROUTINES

JSR

R1,$SAVES

INC

14(R}Y)

1518
BNE

000000G
0000006

000062

060103
020227
000004
001002
105213
000402
105263
000001
104456
000054
0000006

0000006
000567

EH_7, EMS_30);

El
(58, EH_8, EMS_30);
C_ERR_TBL [.CCTLR, C_ERR_HRD] =

000000G

000026

ERRHRD (57, EH_7, EMS_30);
! STANDAL ONE
T_ADOR [ERR_HRD_HST]) = _T_ADDR (ERR_HRD_HST] +

004137

000032
000034
000040

. T_ADDR [ERR_HRD_HST]

ERRHRD
(56, EH_7, EMS_30);
! LOAD FAILURE
T_ADOR [ERR_MHRD_DRV] = .T_ADDR [ERR_HRD_DRV]) + 1;
end;

000000

105760
001157

T_ADDR (ERR_HRO_HST])} = .T_ADDR [ERR_HRD_HST] + 1,

end;

000020
000024

_T_ADDR [(ERR_HRD _DRV])

end;

4402
4403

005261

: begin

4417

000010

vax 11 Blies-16 v3-55%
Peage 12¢
SPIDERSUSERS: [DOUCETTE .FALCONICNRQAA .BL.2 (27

EPRHRD (52, EXH 7, EMS_30);
! INVALID COMMAND
T_ADDR [ERR HRD DRV] = .T ADDR {ERR_HRD_DRV]) + 1;

43390

:
.

SEQ 044

15 Dec 1983 10:35:57
14 Dec 1983 11:35:15

4220

RP .ADOR,RO

4237

ST.CODE.RO

4239

4242

4249

4246

:
:
H
H

4249
4246
4252
4254

4239

3(RO)
124

BNE
MOV
BEN

3
S8 .CODE ,R2
164

ADD
c
BNE:
INCB
B8R
INCB
TRAP
. WOROD
. WORD

R1,.R3
R2,94
1s
(R3)
24
1(R3)
56
54
EGH. 30

MOV

1¢:
24

T.ADOR,R1

. WORD
B8R

#62,R3

EMS. 30
18

4236

111
DRIVE

000100
000104

000001

3%:

000002

TRAP

44
:

000062

000003

CMP
BNE
INCB

. WORD
. WORD
. WORD
8R
cHP
BNE
INCB
TRAP

S$:

000062

. WORD
. WORD
. WORD
B8R
cHP
BNE
INCB
TRAP
. WORD

. WORD

MOV
MOVE
TRAP

000004

64:

BNE
INCB

000005

7¢:

105261
104456

000043
0000006
0000006
000550
020027

001020

012702
060102
023727
001003

105262

000401

105212
104456

000062

T LT

TRAP

000300
000302
000306
000310
000316
000320
000324
000326
000330

ROUTINES

000063

000106
000112
000114
000116
000120
000122
000124
000130
000132
000136

000140
000142
000144
000146
000150
000154
000156
000162
000164
000166
000170
000172
000176
000204
000206
000210
000214
000216
000222
000224
000226
000230
000232
000236
000244
000246
000250
000254
000256
000262
000264
000266
000270
000272
000274

TEST

000000G 000200
000001
9s¢:

10¢:

INCB

TRAP

1983 10:35:57
1983 11:35:15

SEQ Ol4 /
VAX 11 Blies-16 V3 S55
P age
SPIDERSUSERS
: { DOUCE 1 TE . FALCON)CNRQAA .BLZ |

RO, 01
43

63(R1)
56
37
EGH. 30
. 30
EMS
204
RO, &2
S4

4239

62(R1)
56

4263
4264

EGH. 30
EMS
. 30
c4t
RO, #3
64

4239

62(R1)
55
22
EGD.18
EmMS.18
LS$LUN,RO
#5,0UR(RO)

4268
4269

4270

51
26%
RO, #4

4271
4239

62(R1)
35
30
€GD.18
EMS.18
LSLUN,RO
#13,0UR(RO)
S1
28¢
RO, 05
8¢

4275

7¢

4276

4277
4278
4239

4282
4283

60(R1)
56
43

EGH. 30
EMS. 30
284
RO, #6
11
62 ,R2

4239

4290

R1,R2

gg.COOE.02OO

4288

1(R2)
104
(R2)

4290
4288

MATI

)

15 Dec
14 -Dec

EXERCISER

RD/RX

NRQAM3
vOol1.C

4292

4294

L1l
RD/RXx EXERCISER
MU TI DRIVE TES'

ROUTINES

000044
0000006
0000006
000007

000061
105261
104456
000045
0000006
0000006
000513

000010

000536
000542
000544
000546
000552

105261
104456

13%:

MOV
ADD
cHP

14%:
15¢:

BNE
INCB
BR
INCB

TRAP

RO, #7

13%

61(R1)
56

EGH. 30
EMS.30
28s
RO,010

Blies-16

v3-555

SEQ 0248
Page 124

4239

4298

;

4239

17¢
960,R2
R1,Re
$B.COOE
, @2
14
(R2)
15%

4306

4304

4308
4210

1(R2)

EGH. 30
EMS. 30
28¢
RO, 011
19¢
63(R1)
56

16%:

17¢:

000063

4239

4314

4315

000012

000013

EGH. 30
EMS. 30
284
RO,®12
214

18¢:
19¢:

:
204
21¢:

000000G 000003
000060
000062

000051
000000G
000000G
000423
020027
000037
001007

:
224
234;

244
254
:

INCB

TRAP

. WORD
. WORD
B8R
cHP
BNE

62(R1)
56
50
EGH. 30
EMS.30
264
RO, #13
25¢
S9.C0DE,
3
224
60(R1)
234
62(R1)
56
51
EGH. 30
EMS. 30
28¢
RO, 037
274

4239

4319

;

4320

;

4239

4325

000047
000000G
000000G
000456
020027
001007
105261
104456
000050
0000006
0000006
000444
020027
001016
023727
001003
105261
000402

EGH. 30
EMS. 30
28s

SPIDER$USERS:
[DOUCETTE .FALCONICNRQAA .BL2 (37

001007
105261
104456

12%:

000000G 000002

000000G
000470
000011
020027

. WORD
.WORD
.WORD
BR
cHP
BNE

TrnP

000060

000001
105262
104456
000046
0000006

VAX

020027
001020
012702
060102
023727
001002
105212
000402

11¢:

.WORD
.WCRD
. WORD
BR
cMP
BNE
INCB

1983 10:35:57
1983 11:35:15

000525
020027
001007

15 Dec
14 Dec

4327
4325
4329
4331

4239

020554
000560
000562
000564

000370
000572
000576
000600
000606
000610
000612
000614
000620
000626
000630
000634
000640
000642
000652

000662
000670
000672
000676
000702
000706
000712
000716

000720
000724
0N0730
000734
000736
000742
000750
000752
000756
000762
000766
000770
000772
000774
000776
001000
001002
001006
001010
001012
001014
001016
001020

15 Dec 1983
14 Dec 1983

RD/Rx EXERCISER

NRQAM3
v0l1.0

MULTI
105261
104456
000053

DRIVE

TEST

ROUTINES
INCB

000062

TRAP

.WORD
. WORD
WORD

000411
013700
006300
105260
104456
000055

013700

126027
001107
116001
042701
001110
126027
001014
032760
001010

;
264

27s:

0000006

TRAP

0000006
000002
000003

284:

000503

. WORD
. WORD
. WORD
MOV
CMPB
MOVB

000016
177740
000014

000201

001000

000022

BIC
BNE
CcHPB
BNE
B8IT
BNE
TRAP

0000006

29%:

. WORD
. WORD
. WORD
MOV
INCB
MOV
81C
cHP
BNE
MOV

8IC
cHP
8NE
MOV
MCvB

TRAP
MOV
81C
cHP
BNE
TRAP

104456

000513
020027
001005
104456
000V61

MOV
ASL

INCB

104456
000057

013700
105260
013700
042700
020027
001162
013700
042700
020027
001153
013700
112760
104451
013700
042700
020027
001005

000002

304
:

. WORD
, WORD
. WORD
BR
cMpP
BNE
TRAP

.WORD
. WORD
. WORD
8R

62(R1)
56
53
EGH. 30
EMS. 30
283
CCTLR,RO
RO

C.ERR.TBL(RO)

56
55
EGH. 30
EMS. 30
RP.ADDR
RO
,
3(RO),#2
33¢

10:35:57
11:35:15

VAX-11

Bl.ess

V3 555

SEQ 049
Page 125

SPIDERSUSENS:
[DOUCETTE . FALCONICNRQAA .BL2 (37
:
.

4335
4336

:
H

4239
4340

;

4341

4345

4351

4353

;

4355

T.ADOR,RO

;

4356

DUPPKT ,RO
#170000,R0
RO, #3
43¢

16(R0O).R1

€177740,R1
344

14(R0O), 4201

294
#1000,22(RO)
294
56
57
EH.12
EMS. 30

62(R0O)

‘

4358

DUPPKT,RO

#7777,RO
RO, #50000
43¢

L$LUN,RO
¢5,DUR(RO)

51
OUPPKT ,RO
#170000,R0

4364

4366

H
H

4370
4366

4373

;

4374

RO, @1

30¢

56
60

€EH.13
EMS .30
41
RO, @2
314
56
61
EH.13
EMS. 30
41

MULTI

)

001022
001026
001030

001032
001034
001036
001040
001042
001046
001050
001052
001054
001056
001060
001062

001066
00107¢
001072
001074
001076
001100
001102
001106
001110
001112
001114
001116
001120
001122
001126
001130
001182
001134
001136
001140
001142
001146
001130
001152
001134
001136
001160
001162
001166
001170
001172
001174
001176
001200
001204
001210
001212
001216
001220
001222
001224

15-Dec-1983 10:35:57
14 Dec-1983 11:35:15

RD/RX EXERCISER

NRQAMS
vCl.¢

020027
001005

DRIVE

000003

TEST ROUTINES
21s¢:

TRAP

104456
000062
0000006
0000006

000457
000004
020027
001106
104456
000063
0000006
0000000

000463
020127

000001

001005
104456
000064
0000006
0000006
000437
020127
000002
001005
104456
000065
000000G
0000006
000427
020127
v00003
001005
104456
000066
0000006
000000G
000433
020127
001005

cHP

000004

32¢:
33¢:

344

35%:

364:

. WORD
.WORD
. WORD
B8R
cHe
. WORD
. WORD
. WORD
B8R
cMP
B8NE
TRAP
. WORD
. WORD

. WORD
8R

BNE
TRAP
. WORD
. WORD
B8R
cHP
BNE
. WORD

cHP
BNE

TRAP

000005

38%:

000000G
000062

39%;

000006

40%:

EMS. 30
394

RO, 04
43¢

TRAP

37¢:

RO, 03
324
56
62
EH.13

. WORD
B8R
CMP
BNE
TRAP

63
EH.13
EMS. 30
R1,01
35¢

EH.7
EMS. 30
39¢

R1,e2
364

6S
EH.7
EMS. 30
39¢

R1,#3

37¢

EH.7
EMS. 30

41
R1i, 04

384

67
EH.7
EMS.30

414

R1,05

EH.7
EMS. 30
T.ADDR,RO
62(R0O)

crHpP
BNE

424

. WORD
.WIRD

71
EH.7

TRAP

v3-555

SEQ 0350
Pege 1cb6

SPIDERSUSERS:
(ODQUCETTE .FALCONICNRQAA .BL2 (37
H

4366

4377

;

4378

4366

4381

4382

4348

4388

;

4389

;

4348

4392

;

4393

4348

4396

4397

4400

4401

4348

4404

440<

4348

4408

. WORD
. WORD
HOV
INCB
RTS

VAX-1i. Blies

R1,#6

*
.

A
Y

Lol

80 Ax EERCIEN

N Tl

001s¢*
0014%
0012%
001724C
0012482
001244

OCOUOOOL
015700 V000006
105260 000003
000207
1064%
000072

0012%

013700

0000006

10%260
000207

0000006

001246
0012%

001/%

00160
oL 204

0000006
0000006

006500

LS’ WO IS

41
[P X

i4 Dec

. WGAD
"Ov
1%08
ars
1anp
. QR0
.MORD
.MORD

ASL
4%

Uec

e
|Ts

£ns. %
1 .200R 8O

1948 16:5%.:5)
198t

:1:%%:1%

[ Bl s 16 3% 39S

we o7y
Poge 2’

PIOERS SERY: (DOUCETTE
s AL CONICVMAIAA B¢

4409

oC
b 3
A4

3
:

4348
44}

CCr e, n0

4413

C.ERR_ TOL(RO)
oC

4220

634 R0

€En.8
ENS_%0

I oLt ne . z0:
347 meres,
fReouting Bese:
$CODES . 16260
I Mar mum etact @GotTM per Nvecot en:
& worde

RO/AX EXERCISER

L
NRQAM

ATl ORIVE

4439

4436
443%7
4438
4439
4440
444)

4442
4443
4444
4445
4446
4447
4448
4449
4459
4451

4452
4453
4454

O3
B
w.
B
8

4469
4470
4471
4472
4473

vAx

Blies

¢3 =59

SFO LA
Peage

SPIDERSUSERS: (OOUCE
T TE . ¢ ALCONICNRQAA BL
¢

.c*

: novelue

Y
*B
D
YA
TG
TV

THEN THE UNIT IS DROPPED.

IMPLICIT INPUTS:

CE VE

n _ADOR
- ADDRESS OF THE CURRENT RETURN PACKET

ADDR - ADORESS OF THE CURRENT UNIT-S STATISTICS BLOCK (TALLY)
CSTY
OF THE CURRENT CONTROLLER'S
cst ADORESS FOR
THE CURRENT UNIT
- CST OFFSET NUMBER
cuofr

LSLUN - CURRENT UNIT
begin

locel
THOUSANDS

word,

MILLIONS : word;

“f .RP_ADOR [ENDCOD) eql (OP_RD or OP_END)

then

T '

(TOT_READS LO) = .T_ADDR [TOT_READS_LO) + 1,

¢t

TOTAL NUMBER OF BYTES TRANSFERRED TO/FROM A UNIT

IF ENDCODE IS READ

¢t INCREMENT NO. OF READS AND ADD BYTE COUNT

T-ADOR (BYTES_READ LO) - .T _ADDR [BYTES_READ
LO) . .av_ {BCNT_LO);

T_ADOR (TOT _ BYT_RED LO) « .T_ADOR (TOT_8YT_RED_LO) « .RP_ADOR (BCNT_LO0);

slee

ovF _Crx (T_ADOR [ TOT _READS LO1);s
OVF _CHK (T_ADOR (BYTES_READ_LO));
OVF _CrX (T_ADDR [TOT_B8YT_RED_L0));

! CHECK FOR FIELD OVERFLOMW
'
'

end

.RP_ADOR (ENDCOD) eql (OP_WRT or OP_END)

then

T. '

IF ENOCOOE

(TOT _WRITES_LO) = .T_ADDR [TOT_WRITES_LO) « 1,

IS WRITE

! INCREMENT NO. OF WRITES AND ADD BYTE COUNT

1_ADOR Eonés
_MRIT LO] » .T_ADDR [BYTES _WRIT_LO) » .RP_ADDR [BCNT_LO);

T_ADOR (TOT_BYT_wnf LO] . T_
ADOR [TOT_8YT_WRT_LO) « .RP_ADOR [BCNT_LO);
OVF _Cri (t_lnoa (rof _WRITES L0));
¢ CHECK FOR FIE(D OVERFLOW
OVF _CHK (T_ADOR [BYTES_WRIT_LO));
OVF _CHX (T_ADOR [TOT_BYT_WRT_L0));

4460
4461

4468

164 Dec 1983 11:85:1%

OPERATOR -SPECIF IED LIMIT MAS BEEN REACHED,

4458
44%9

4464
4465
4466

10:3%5:57

THIS AOUTINE IS CALLED FROM 10 _REIPKT FOR ALL I/0 TRANSFER RETURN

4455

4463

1943

PACKETS WITH ~SUCCESS~ STATUS CODES. ITS PURPOSE IS YO UPDATE ALL THE
APPROPRIATE STATISTICAL FIELDS FOR THE CURRENT UNIT. A CHECK IS ALSC
MADE ON TiE TOTAL MUPMBER OF BYTES TRANSFERRED THUS FAR; IF THE

445%6
4457

4467

TEST ROUTINES

routing WPO_J10_TALLY

4418
4419
4420
4423
4422
4423
4424
442%
4426
4427
4428
4429
4430
4431
4432
4433
4434

e
@
&

we
@

oasow

B
8

VOl

.Y Dec

'
'

ond;

? (.RP_ADOR {ENDCOD) eaql (OP_RD or OP_END)) or

(.RP_ADOR (ENDCOD) eql (OP_WRT or OP_END))

then

]

fiffixms « .T_ADDR [MBYTES_READ) + .T_ADOR (MBYTES_WRIT);
n

THOUSANDS =

.T_ADDR (BYTES _READ_MI) ¢«

if . THOUSANDS geaqu
then
begin

1000

.T_ADOR {BYTES_WRIT
HI);

! TOTAL BYTES TRANSFERRED

J oL
RD ‘RXx EXERCISER

N iJAM&
VO

MA TT DRIVE

1% Dec

TEST ROUTINES

i4 Dec

198%

10:3%:57

VAX

11 B8l .es

THE

LOWER OVERFLOW

11:35:15

v3 555

SEQ ¢U".°
Peage

.29

SPIDERIUSERS:
(DOUCETTE .F ALCONICNRQAA BLZ (38

)

4474
4475
4476
4477
4478
4479
4480

4481

4482
4483
4484
4485

MILLIONS = . MILLIONS «
THOUSANDS = , THOUSANDS

@
e
s
@
@
Ss
B:
Bs
B1
Ss
®s
Bs
@c
Bs
B4
Be
B1
@

000010

00024

COUNT

T0O0!

1000;

end;
[]

! THIS ADOED BECAUSE IT WILL TAKE FOREVER TO TRANSFER ON THE ORDER OF A MEGABTYTE TO A FLOPPY
¢ BUT IT IS A MUCH MORE REASONABLE MEASURE FOR THE RDS1 WINCHESTER,
THE QUESTION NOW REFERS 10
t THE TOTAL DATA TRANSFER TO TE CONTROLLER AND THIS IS PRETTY CLOSE SINCE THE FLOPPIES GET
! ABOUT 171000 THE DATA THE MARD DISK(S) GET.
[}

4486

.SWP_XFER eql O

then

4487
4488
4489
4490
4491

THERE

IS A

TRANSFER LIMIT

!
!

SET END -OF PASS FLAG
IGNORE FURTHER INTERRUPTS

SET ENC-OF -PASS FLAG

IF UNIT IS STILL ALIVE

begin
i £

. THOUSANDS gtru

then

100

.
[X 4]

EOP_FLAG = TRUE;
OCT_ADDR (IG_INT)

4492
4493
4494

end;

4495

4496
4497
4498
4499
4500
4501
4502
4503

else

TRUE;

end

MILLIONS geaqu

then

EOP_FLAG =

.SWP_XFER

TRUE;

OCT_ADDR (IG_INT) = TRUE;

4504

end;

4505

4504
4507

end;

TRANSFER LIMIT

IS REACHED

IGNORE FURTHER INTERRUPTS

4508

end;

004137

0000006

013701
126127
001027
013700
005260
066110
066160
012746
060016
004737
013716
004737
013716
062716
0004335
126127

000000G
000014
000241}

MOV
8'¢CW"B

JSR

R1,$SAVE?

4418

0000006
000016
00C020

MOV
INC

T.ADDR,RO
16(RO)

4444

H
H
H

4445
644§
4447

4448

4449

4453

000020

000016

¢ ROUTINE UPD_IO_TALLY
.SBTTL
UPD.TIO.TALLY:

ADO
ADO

000032

MoV
ADD
JSR

000000V
0000006
000000V
0000006
000032
000014

20(R1),(RO)
20(R1),32(R0O)
816, -(SP)
RO, (SP)

agD

cHPl

14(R1), 242

JSR

MOV
1¢:

RP . ADOR ,R1
ll.:(Rl)Jle

PC.,OVF
. CHK
T.ADOR,(5P)
PC.,OVF ,Crx
T.ADDR,(SP)
;22.(59)

MOV

000242

UPD.IO.TALLY MATI-DRIVE TESTYT ROUTINES
:

4441

b
15 Dec
14 Dec

RD/RX EXERCISER

S
NRQAM
vol1.C

MA TI ORIVE

TEST ROUTINES

1983 10:35%:57
1983 11:35:15

5EQ (A

VAX 11 Blies-16 v3-555
Pege 130
SPIDERS JSERS: (DOUCETTE . F ALCONICNRQAL
BL: (28

’

000104
000106
000112
000116
000124

000132
000136
000140
000144
000150
000154
000160
000164
000170
000174
000176
000202
000210

000212
000220
000222
000226
000232
000236
000242
000246
000252
000254
000256
000262
000266
000270
000274
000276
000300
000302
000304
000312
000320

;

001034
013700
005260
066160
066160
012746
060016
004737
013716
062716
004737
013716
062716
004737
005726
013700
126027
001404
126027
001037
013700
016002
066002

016001
066001
020127
103403
005202

162701
013700

001004
020127
101411
000402
020200
103406

112737

052777
000207

Routine Size:

3
T.ADDR,RO
24(RO)
20(R1),6(RO)

BNE

0000006
000024
000020
200040
000020
000024

MOV

000000V
000000G
000006
000000V
0000006
000040
000000V

J5R
MOV

2s:

JSR

000000G

3s:

MOV
cHP8
8EQ
crPB
BNE
MOV
MOV
ADD
MOV
ADO
cHP
8LO
INC
SuUB
MOV
BNE
ce
aLos
B8R
cHpP
8LOo
HOove
BIS
RTS

INC

ADO
ADD

024, (SP)
RO, (SP)

MOV

ADD

000241

000014

000242
LR

000012
000002
000010
001750

001750

Ss:

000144

64:

0000006
0000006

78:

8s¢:

Routine Bese:
105 words,
Maximum steck depth per invocation:
S words

4456

]
i

4457
4458

4459

ADD

PC,OVF .CrK
T.ADOR,(SP)
#6,(SP)

4460

ADD

#40,(SP)

T,ADDR, (SP)

4461

JSR
MOV

000014

000001
040000

20(R1),40(R0O)

PC,OVF ,CH«

PC,OVF .CHK
(SP)»

1Si

$CODE$

RP,ADDR,RO

14(R0O), 0241

14(RO), 0242

8s
T.ADDR,RO
4(RO),R2

12(R0O) ,R2
2(RO),RL
10(RO),R1
R1,01750

S
R2
#1750,R1

4455

4464

4465

H
s
;
:
;i
;

o, ,MILLIONS
o, ,MILLIONS
¢, THOUSANDS

¢, THOUSANDS
THOUSANDS,
s

; MILLIONS
i

¢, THOUSANDS

R1,0144

4471

4474

4475

;

THOUSANDS,¢

4489

74
R2,.RO

3
; MILLIONS,»

4492
4499

¢1 ,EOP FLAG
;EOOOO.EOCT.AODR

:
H
i

4502
453
4418

4469

4485

SWP . XFER,RO

4468

17554

lA(l
NRQAMS

RD/RX EXERCISER

v0l.¢C
)

4509

routine OVF_CHK (ADDR)

4511

4210

:
:
:
:
:

4512
4513
4514
4515
4516

;

4521
4522
4523

4526

4525

4527

4530

!
!

:
H

4535
4536

4538

4537

000000

010146

000020

103404

000u02
000006
000012
000014

begin

ABDfl s _ . ADDR

(.ADDR +« 2) =
end;
if

001750

000040
000044
000050

162711
005260
012601

001750
000004

;
;

+ 4) »

ADDR

« 4)

001750

IF LO-ORDER OVERFLOW

!t SUBTRACT 1000

end;

162710
005211
000771
021127

000207

.(.ADDR « 2) gequ 1000

(.ADDR
end;

000022
000026
000030
000032

000052

+ 2}

000004
000002

103404

1000;

(.ADDR

mfl ¢« 2) = (.ADDR » 2) - 1000;

0165600
012701
060001
021027

000036

131

ADDR - ADDRESS OF THE BYTES_READ_LO OR BYTES_WRIT
_LO FIELD FOR
THE CURRENT UNIT (SEE STATISTIC TABLE (TALLY) LAYQOUT)

while ..ADDR gequ 1000 do

A534

Page

begin

4528
4529
453}

16 V3 555

: novelue -

INPUTS:

11 Bl es

SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAKA .BLZ (19

4524

:
:

VAX

4518

10:35:57

THIS ROUTINE IS CALLED FROM UPD_IO_TALLY 7O CHECK FOR OVERFLOW IN
CERTAIN STATISTICAL FIELDS OF THE CURRENT UNIT. SPECIFICALLY, THE
LOW-ORDER FIELD OF THE NUMBER OF BYTES READ OR WRITTEN IS CHECKED FOR
EXCEEDING 1000. IF TRUE, THEN THE HIGM-ORDER COUNT IS INCREMENTED. IF
THAT EXCEEDS 1000, THEN THE MEGABYTE COUNT IN INCREMENTED.

4519
4520

:
H
:

1983

14 Dec 198% 11:35:15

!
!
!
!
!

4517

:
:

15 Dec

MA TI DRIVE TEST ROUTINES

INCR HI-ORDER

IF HI-ORDER OVERFLOW

! SUBTRACT 1000
!

INCREMENT MBYTES

! ROUTINE OVF _CHK
LSBTTL

OVF.CrH MULTI-DRIVE TEST ROUTINES

14:

MOV
MOV
ADD
ce

4(SP) RO
22,R1
RO,R1
(RO), #1750

26:

SUB
INC
B8R
ce

SuB
INC
MOV

OVF . CHK
: MOV

8Lo

RTS

Routine Size:
22 words,
Routine Bese:
$CODES
Maximum stack depth per invocstion:
2 words

R1, -(SP)

;
:

ADDR,»

4509

4525
4528

4525

#1750,(RO)
(R1)
1
(R1),#1750

3
3
3
s

4527
4528
4525
4531

#1750,(R1)
4(RO)
(SP)+,R1

:
3
3

4534
4535
4509

+ 20076

() x()
NRQAM3

RD/RXx EXERCISER

vol1.C

H
i

MA TI DRIVE TEST ROUTINES
4539

4540
4541

H
:
i

4542
4543
455:;

‘
:
:
.

4550

COMPARISON IS PERFORMED ON THE TWO I/0 BLFFERS ANY OIFFERENCES

4549

:
;
1

4557
4558
4559

4560
4561
4562
4563
4564
4565
:5529,

:Ssgg
4570

i
H

457%

:
:

4572
:g;z

WRITE PACKET IS REMOVEC FROM THE SAVE AREA, AND A BYTE-BY BYTE

4%71

;

4552

i
:

IF THE CURRENT RETPKT BEING PROCESSEC IS A WRITE FUNCTION, THEN THE
PACKET INDEX (RP_INDX) IS SAVED IN THE CONTROLLER'S RETURN PACKET SAVE
AREA (RP_SAVE). OTHERWISE, THE PACKET IS A READ, SO ITS ASSOCIATED

ENCOUNTERED RESULTS IN THE OECLARATION OF A HARD ERROR.

!
!
¢

IMPLICIT INPUTS:
RP_ADDR - ADDRESS
OF THE CURRENT RETURN PACKET
RP_INDX - INDEX OF THE CURRENT RETURN PACKET
begin

locel
BUFF1 : ref block [MAX_XFER & 2, byte),
BUFF2 : ref block [MAX_XFER ¢ 2, byto].
BUFFM,
COUNT : word,
FLAG : byte initial (byte (TRUE)),

!
t
¢t
!

I/0 BUFFER ADDRESS
170 BUFFER ADDRESS
I/0 BUFFER ADDRESS
BYTE COUNT

.RP_ADDR (ENDCOD] eql (OP_WRT or OP_END)

IF WRITE OPERATION

FLAG = FALSE

' OON'T CALL SWEEP FROM JO_RETPKT

index

then

elee

signed word;

if (.RP_ADDR [ENDCOD] eql(OP_RD or OP_END)) end
((index = RPS_REM ()) geq
0)
' IF ASSOCIATED WRITE PACKET IS FOUND ELSE ENDCODE IS READ

then

4576

BUFFW = RETPKT [.index, BUFF_0]};

4578
:gzg

BUFF2 =
COUNT =

! ADOR OF READ 1/0 BUFFER
! BYTE COUNT

4577

BUFFLl = . . BUFFW;

_RP_ADDR [BUFF _0];
_RP_ADOR [BCNT LO);

:g;

:
.

4583
4584

4586

BUFFL »

4588

ond

i
.

4585

incr I from 1 to

4590
4591

4592
4593
4594

.COUNT do

BUFF1 « 1,

BUFF2 « BUFF2 « 1,

N’DDR

{ERR_HARD] =

ADDR OF ADDR OF WRITE 1/0 BUFFER

¢ ADDR OF WRITE 1/0 BUFFER

! FOR EACH BYTE IN BUFFERS

it .(.BUFF1)<0, 8, 0> eql
then

4587

4589

SEQ 01'%

.(.BUFF2)<0, 8, O>

IF BYTES COMPARE 0.K.

! ADVANCE WRITE BUFFER ADDR

! ADVANCE READ BUFFER ADDR
! ELSE - COMPARE ERROR

. T ADDfl [ERR HARD]

+ 1,

ADDR [ERR_HRD_HST) = .T_ADOR [ERR_HRD _HST] + 1;
ERRHQO (42, EGH_30, 0);
' I/0 REQUEST FAILED
EMS_CHP (RETPKT . (.index
RP_LEN & 2)),

Page 132

SPIDERSUSERS:
{OOUCETTE .FALCONICNRQAA .BL2 (40

!
!
!

45538
4554
4:::22

11 Blies 16 v3 555

4546
4547
4548

:
i
H

H
i
:
5
'
:

CHK

14 Dec 1983 11:35:15

VAX

THIS ROUTINE IS CALLED FROM IO _RETPKT FOR ALL I/0 TRANSFER RETURN
PACKETS WITH “SUCCESS” STATUS CODES, BUT ONLY IF THE HOST WRITE -COMPARE
OPTION WAS SELECTED B8Y THE OPERATOR.

4321

routine MOST_WRY

1983 10:35:57

!
!¢
'

15 Dec

’
MATI ORIVE

vOl

000012
000016
000024
000026
000030
000032

000040

000042
000046
000050
000052
000034

000070
000074
000076
000102
000106
000112
000114
000116
000120
000122
000124
000126
000130
000134
000140
000144
000146
0001350
000152
000154

19 Dec
i4 Dec

RO/RX EXERCISER

NRQAM &

TEST ROUTINES

4593
4596
4597
4598
4599
4600

.T_ADDR

[.LSLUN]

exitloop:

SEQG 05%7
VAX 11 Blies 16 v3-555
133
SPIDERSUSERS
: (DOUCETTE .FALCONICNROAA .
BL2 (40

.SWP ERROR

end;

004137

0000006

return (.FLAG);

1¢:

IF COMPARE ERROR

IF ASSOCIATED WRITE RETPKT WAS FOUND

JSR

R1, $SAVES

4539

MOve
MOV
cMPB

#1,RS
RP,ADDR,RO
14(R0O), 0242

;: »,FLAG

4338
4568

; FLAG
:

4570
4568
4572

4573

BNE
CLR8
B8R
cHPB
BNE
JSR
ST

000060
0000006
000004
0000246

3s:

1
RS
6t
14(R0O), #241
64
PC.RPS . .REM
RO

MOV
JSR
MOV
ADD

#60,
- (SPY
PC,BLSMA.
RO,.4(SP)

CLR

24:

-(SP)

8Ly

MOV
MOV
[ 01"
MOV

0000006
000024
000020

000004

¢t

HOST.WRT.CHK MULTI-DRIVE

TST

000000V

000442
121213
001003
003202
005203
000435
013700 0000006
003260 000014
105260 000063
104456
000052
000000G
000000

IF ERROR COUNT EXCEEDED

DROP UNIT

.SBTTL

HOST.WRT
CHK ;

000241

! ROUTINE HOST_WRT_CHK

000001
0000006
000014 000242

000014

! NO NEED TO CONTINUE

end;

016616

= DU HERR;

end;

4606
4607
4608
4609

016004
003001

geau

DODV (.LSLUN);

4603
4604
4603

013700
016003

HARD)

10:35:57
11:35:15

[(a)

4601

004737
003700
002470
010045
012746
004737
010066
062700
011002

[ERR

1933
1983

then

4602

005746
112705
013700
126027
001002
105005
000500
126027
001074

a & !

cHP8

SRETPKT +24 ,RO
(RO),R2
RP .ADOR ,RO
24(RO) ,R3
20(RC) R4
R
44

(R2).(R3)

INDEX

4576

; »,BUFFW

1 BUFFW,BUFF}
H
: ¢, BUFF2
; ,COUNT
s

4577

4578
4579
4581

4583

; BUFF1
;s BUFF2

4586

63(R0O)

:
:

4592
4593

4(SP),(SP)

4594

3
Re
R3

TRAP
. WORD
. WORD
. WORD

56
52
EGH. 30
0

MOV

;

i BUFF1,BUFF2

8NE
INC
INC
B8R
MOV
INC

INCB

TEST ROUTINES

4
T.ADOR,RO
14(RO)

:
:

4587
4583
4591

RD/RX
MA TI

S
NRQAM
vol.C
)
000160
000164
000170
000174
000202
000204
000210

000216
000220
000222
000224
000226
000230
000232
000234
000236
000240

1
i

062716
004737
013700
026037
103412
013700
112760

104451
000403
005201
020104
003733
022626
005000
130500
003726
000207

EXERCISER
DRIVE TEST

15 Dec
14 Dec

ROUTINES

ADD
JSR
MOV

0000006
0000006
0000006
000014
0000006

cHP

8LO
MOV
MOVB

0000006
000004
0000006

TRAP

48
:

St:
64:

B8R
INC
cHP
OLE
cHP
CLR
B8IS8
TS7
RTS

Routine
$CODES
Base:
81 words,
Routine Size:
:
11
words
Max 'mum staeck depth per invocetion:

1983 10:35:57
1983 11:35:15

SEQ O,
VAX 11 Bl.es 16 v3 555
Pege
SPIDERPSUSERS
: (DOUCETTE .F ALCONICHRIAA
.BL2

134
(40

RETPKT,(SP)
PC,EMS.CMP

T.ADOR .RO
é:(RO).ShP.ERROR

4596

LSLUN,RO
#4 ,0UR(RO)
51
Ss

4599

H
:
s

4600
4%90
4581

R1
R1,.R4

(SP)e+ (SP)e

RO
RS,RO

(SP).

+ 20152

;
H
H

I.COUNT

FLAG,*

4575
4558

4539

Jl¢
15 Dec
14 -Dec

RD/RX EXERCISER

MULTI ORIVE TEST ROUTINES

routine SWEEP

4616
4617
4618

4619
4620
4621
4622

RP_ADDR
RP_INDX

@
G
&
&
@c
B
B2
WS
Ge
G0
Bs
W
B
S5
B
B
B
B
B
B

000012
000016

010016

V3 S55

S€Q 099

135

SPIDER‘USERS:(DOUCEIYE.FALCON]CNQOAfl.gfg (4]

ADDRESS OF CURRENT RETURN PACKET
INDEX OF CURRENT RETURN PACKET

locel

index

signed word;

if (.RP_ADDR [ENDCOO) end OP_MSK) eql OP_RD

IF READ OPCODE OR ENDCODE

IF HOST IS DOING WRITE-COMPARES

IF ASSOCIATED WRITE RETPKT

then

if BIT_TST (SWP_FLAGS,

SWF_HWC)

then

if (index = RPS_REM ()) geq O
then

4640
4641
4642

010146
013700
116000
042700
020027
001026
032737
001422
004737
010001
002416
010146
012746
004737
062700

begin

4638
4639

4645
4646

.1 Bl:es

novalue *

IMPLICIT INPUTS:

4623

4643

VAX

THIS ROUTINE IS CALLED FROM JO_RETPKT AND OTHERS TU DEALLOCATE T+E
RESOURCES ASSOCIATED WITH THE CURRENT RETURN PACKET. THIS INCLUCES THE
PACKET ITSELF AND THE 1/0 BUFFER. IN ADDITION, If THE HOST IS
PERFORMING WRITE -COMPARES, AND IF THE CURRENT RETURN PACKET IS A READ
FUNCTION, THEN THE CURRENT CONTROLLER'S RP_SAVE AREA IS SEARCHED FOR
THE ASSOCISTED WRITE RETPKY SO THAT ITS RESOURCES CAN ALSO BE
DEALLOCATED.

4613
4614
4615

4624
4625
4626
4627
4628
4629
4630
4631
4632
4633
4634
4635
4636
4637

10:35:57
11:35:15

4610
4611
4612

1983
1983

gfi?_xo-aurr (RETPKT (.index, BUFF _0)); ! RETURN WRITE I/0 BUFFER TO POOL
¢

PUT_RETPKT (. index);
end;

PUT_10_BUFF (RP_ADDR (BUFF _0));
PUT _RETPKT (.RP_INDX);

SWEEP:

177600
000041

000000V

000024G

.SBTTL

MOV
MOV
MOVB
8IC
cHP
BNE
8I1Y
8EQ
JSR
MOV
BLY
MOV
MOV
JSR
ADD
MOV

RETURN WRITE PACKEY TO POOL

¢ RETURN CURRENTY 1/0 BUFFER 70 POOL
! RETURN CURRENT RETPKT TO POOL
! ROUTINE SWEEP

end;

000014

IS FOUND

SWEEP MA. TI-DRIVE TEST ROUTINES

4610
4631

RP . ADDR,RO

14(RO),RO

#177600,R0
RO, 441
1

4634

::O.SNP.FLAGS

PC .RPS.REM
RO,R1

1¢

#60, -(SP)

PC,BLSMUL

SRETPKY+24,R0O
RO, (SP)

4637

¢, INDEX

INDEX,»

4640

17
RD/Rx

NRQAM3S
go1.c

000064
000070
000072
000076
000100
000104
000110
000114
000120
000124
000126
000130

MATI DRIVE

004737
010116
004737
022626
013746
062716
004737
013716
004737
005726
012601
000207

;: Routineg Size:

TEST ROUTINES

MOV

000000G
0000006

PC,PUT.I0.8BUFF
R1,(SP)

JSR

0000006

1%:

45 words,
Routine Bese:
4 words
Maximum steck depth per invocetion:

1983 10:35:57
1983 11:35:15

15 Dec
14 Dec

EXERCISER

JSR
cHP

(SP)+,(SP).

RP,ADDR, -(SP)
#24,(SP)
T
. I0.BUFF
PC,PU

JSR
MOV
JSR
TST
MOV

RP, INDX,(SP)

PC,PUT RETPKT

(SP).
(SP)+,R1

RYS

$CODES

20414

11 Blies

v3-555

SPIDERSUSERS : (DOUCETTE .FALCONICNRGAA . BL2

PC,PUT
. RETPKT

MOV
ADD

VAX

INDEX,
e

L12
RD/RX EXERCISER

NRQAM3
vol.C

MULTI-DRIVE TEST ROUTINES
4647
4648
4649
4650
4651
4652
4653
4654
4655
4656
4657
4658
4659
4660
4661
4662

4663

4664
4665
4666

4667

4668
46€9
4670
4671
4672

14 Dec

1983

10:35:57

1983 11:15:15

VAX

SEQ 01

11 Blies-15 v3-555

Page

137

SPIDERSUSERS
: (DOUCETTE .FALCONICNRQAA .BL 2 (4.

rout ine RPS_REM Ve

!
!
!
'
!
!

THIS ROUTINE SEARCHES THE CURRENT CONTROLLER'S RP_SAVE AREA FOR A
RETURN PACKET WHMOSE COMMAND REFERENCE NUMBER (CRN) IS ONE LESS THAN THE
CRN OF THE CURRENT RETURN PACKET (I.E., SEARCHING FOR THE SAVED WRITE
OPERATION ASSOCIATED WITH THE CURRENT READ OPERATION). IF FOUND, THE
RP _SAVE ENTRY IS CLEARED (TO -1) AND THE RETPKT INDEX OF THE WRITE

H
4

IMPLICIT IMNPUTS:
RP_ADDR - ADDRESS OF THE CURRENT RETURN PACKET

!
H
!

QUTPUTS:

OPERATION IS RETURNED TO THE CALLER.

]

[}

INDEX (VALUE OF THIS ROUTINE) - INDEX OF THE RETPKT CONTAINING
A CRN WH1LH IS ONE LESS THAN THE CURRENT

begin

local
index

signed word

initial

incr COUNT from O to RP_CNT

if (.RP_USE

[.COUNT) eql

(-1);

1 do

ASSUME NOT FOUND

FOR EACH ENTRY

.CCTLR) and

IN RP_SAVE

IF THIS IS A VALID RETP¥T

Bs B

15 Dec

000010
000012
000016
000022
000024
000026
000032
000036
000040

(.RETPKT (.COUNT, ENOCOD) eql (OP_WRT or OP_END))

4673
4674
4675
4676

then

if CC.RETPKT [.COUNT, CRF_LO] eaql (.RP_ADOR [CRF_LO] - 1)) end
C.RETPKT (.COUNT, CRF_HI) eql .RP_ADDR {CRF_HI])) or

4677

4675
4679
4680
4681
4682
4683
4684
4685
4686
4687
4688

004137
012704
005003
116300
020037
001033
010346
012746
004737
022626
126027

(C.RETPKY [.COUNT, CRF_HI] eql (.RP_ADDR {[CRF_HI]
C .RETPKT [.COUNT, CRF_LO) eql #0'177777') and
(.RP_ADOR [CRF_LO) eql 0))

then

begin
end;

return

. index;

.SBTTL

RPS.REM MULTI-DRIVE TEST ROUTINES

MOV

4-1,R4

0000006

RPS.REM: JSR

0000006

CLR
MOvV8

1777717

0000006

000060
0000006
000014G 000242

1$:

'
!

INDEX TO BE RETURNED
DONE

ROUTINE RPS_REM

R1,$SAVE4S

4647

R3
RP.USE(R3),RO

s COUNT
: s(COUNT),»

4670
4672

t COUNT,»

4673

cHP
BNE

RO,CCTLR
44

MOV
JSR
cHP
cHPB

#60, -(SP)
PC,BLSMUL
(SP)+,(SP).
RETPKT+«14(R0O),
#242

MOV

IF CORRECT CRN

- 1)) and

index = _COUNT;
exitloop;

end;

R3,-(SP)

s +,INDEX

4665

Mle

00004¢
000050
000052
000056
000062
000064
000070
000074
000076
000102
000104
000112
000114
000120
000122
000126
000130
000136
000140
000144
000146
000150
000152
000154
000160
000162
000164

i
:

15 Dec-1983 10:35:57
14 Dec 1983 11:35:15

RD/RX EXERCISER

NRQAMS
301.0

MULTI ORIVE

001041
010346
012746
004737
022626
013701
016102
005302
026002
001004
026061
001415
016102
005302
026002
001011
026027
001005
005761
001002
010304
000404
005203
020327
003714
010400
000207

Routine Size:

Maximum stack

TEST ROUTINES
BNE

MOV

960, -(SP)

R3,

MOV

000006

2%:

000004G 177777
000004
34
4%

000003
Ss:

59 words.

depth per

Routine Base:

invocation:

B8 words

JSR
cHpP
MOV
MOV
OEC
CcMP
BNE
cHP
8EQ

Vv3-555

S€EQ O%¢

SPIDERSUSERS
: [DOUCETTE . FALCON JCNRQAA

,¢
COUNT

(SP)

138

(a2

4676

PC,BL $MUL

(SP)+,(SP)+
RP.ADDR,R1
4(R1),R2

R2
RETPKT+4(RO),R2

2
gEYPKT06(R0).6(R1)
$
6(R1),R2
R2
RETPKT+6(RO),R2

MOY

DEC
cMP
BNE
cMHP
BNE
ST
BNE
MOV
B8R
INC
cHP
BLE
MOV

RETPKT«4(R0),¢

46177

4678

4679

4(R1)

4680

R3,R4
S$
R3
R3, 43
14
R4 ,RO
PC

RTS

$CODES

VAX-11 Bli.es

20546

COUNT, INDEX
COUNT
COUNT
,«
;

INDEX,

4683
4682
4670

4665
4647

N12
NRQAM 2
\;01.0

RD/RX EXERCISER
MU TI DRIVE TESY ROUTINES

15 Dec 1983 10:35:57
14 Dec 1983 11:35:15

H
:

4689
4690

routine DR_RETPKT

H
H
:

4692
4693
463;

!
!
!

THIS ROUTINE IS CALLED BY PROC_RETPKT FOR ALL PACKETS ORIGINATING AT
THE “DRIVER” PORTION OF THE PROGRAM. THIS INCLUDES PACKETS DESCRIBING
FATAL DEVICE ERRORS.

.
:
:

4696
4697
4698

!
!
!

FOR FATAL DEVICE ERRORS, THIS ROUTINE RELEASES ALL RESOURCES HELD BY
THE CONTROLLER. THE CONTROLLER IS MARKED OFFLINE IN ITS CST, AND ALL
UNITS ATTACHED TO THE CONTROLLER ARE DROPPED.

:
:
:

4700
4701
4702

!
!
!

IMPLICIT INPUTS:
RP_INDX - INDEX OF THE CURRENT RETURN PACKET
RP_ADDR - ADDRESS OF THE CURRENT RETURN PACKET

4?’8;

4699

4703
4

:
:
:

4706
4707
4708

4710

;

H
H
:
H

:
3

begin

PUTA_BUFF ();

4;11
4712
4713

incr

:;%2

ADDRESS OF THE CURRENT CONTROLLER'S CST

CCTLR - CURRENT CONTROLLER NUMBER

4;09

4714

: novalue =

CST_ADDR

' RELEASE ALL I/0 BUFFERS HELD BY CONTROLLER

index from O to RP_CNT
if

.RP_USE ([.index) eql

then

1 do

FOR EACH ENTRY IN CONTROLLER'S RP_SAVE

.CCTLR

IF VALID RETPKT INDEX

RETURN RETPKT TO POOL

PUT_RETPKT (. index);

4717

QX0 [.CCTLR) = 0,

i
:

4719
4720
4721

OROP _CTLR (.CCTLR, DU_CFATAL);
PUT_RETPKT (.RP_INDX);
end;

4718

CST_ADOR (STATE)

= OFFLINE;

CLEAR NO.

OF OUTSTANDING QIO0S

MARK CST OFFLINE

SEQ 0.3

VAX 11 Blies 16 V3 555
Pane 139
SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA .BL2 (43

! DROP CONTROLLER’'S UNITS
! PUT BACK RETPKT
! ROUTINE OR_RETPKT

2t
.4

T
1

[ AP

YRR

[V ¥

[« X0
¢ TP
0 89 0.72
ouNG 40
o 0 T Y )

000070
0V00¢
2
0000246

000080
000082
0000 84
000040
000042

000044
000052
00003
000064

0000 ;2
000076
000102
00108
000110
000114

voe 87
005001
116100
020087
001004
010146

004787
005726
003201
020327
008768

03137€})

313988

042760
010146
012746
004787
018716
004737
02262¢
012601
000207

t Reout ne Size:
,

Mg«

DR S 6w

Cih18e

gtech

000000,

000000¢
0000006

18:

100000

000006
0000000
0000006
0000006

|1, (P)

:fi:.'ufl.”f

“Ove
(n,

"P ySE(R] ), 0G

JSR

C . PUT
RE TPw
Y

(Y]

80
. CCHm
20
Ry, (5P)

l'eAl
bB

1] DRV

* 2

L&y

tw,

RB AA
DACETTE

4o
S A

UN (M

[

L0
4

oge
n.,

T8 .' RO "I
3
3
s
3

1Ot
o' INDEs, 0
INDE
2, o

28:

000003
000UL00G
0000006
0000006

L 3
"0y

0000006

OR.
AL TIPWY

mc
Lec

10C

8LE

000002

"Ov
cLae
"oV
8iIC

1oV

MOV
JSR
V]
JSR

u,
oV

ars

18 weres,
Reut ne Beee:
SCODES
eopth por invecstion:
& werde

Ry,08

CCILR
R
QIO(R])
CSY.ADDR
,RC

#3100000,2(RO)
Ry, -(P)

%, -(S5P)
P
. CTLR
PC.ORO

RP . INDX,(SP)

PC,PUT RETPXT
(9P). R}

- 207534

INDE
»
INDR ¢,o
an?

are
ans
4720
4707

4409

NRQAN 4

RO Ax ExENCISER

vOl.¢

RORx

)

NIEAMPT SERVICE RO "Ing

'
s
’

4722
4728
4726

oabtt]

4727

'
'

472%
4726

‘;2‘

s
,
s
.
'

4729
47%
4731
4782
4738
4734

000000

0310046

000006
000012

004737
012600

000N02
000014

00%037

¢,

Moxrimum etack

.4 Dec 198% 11:35:1%

¢
¢

THERE EXISTS AN ROAX INTERAUPT SERVICE ROUTINE FOR EACW OEVICE
CONTROLLER. EACH SERVICE ROUTINE BEGINS BY SIMPLY SETTING "€

BRANCH TO A COMMION INTERRUPT PROCESSING ROUTINE.

APPROPRIATE CONTROLLER NMUBER INTG

vAX 11 8l we 16 ¢3 355

S£Q L%,

Poge .41

SPIDERS ISERS: [DOUCE T TE . ¢ ALCON ICNRIAA .t ¢ 7 44

RNOAX INTEAMPT SERVICE RO.TIM

-ICTLR-. ALL SERVICE ROUTIMNES TrEN

OGNSARY (AZINTO);
ICTLR » O,
AZINT (),
ENDSRY;
LSBTTL
AZINTO: : MOV

000156

CLR

000000V

JOR
MOV

000002

it Routine S ze:

. Dec 1943 10:5%:57

RTI

7 words,

Jepth per

Routine Bese:

invocetion:

words

$CODES

AZINTC RORX
RO, -(SP)

ICTLR

PC,AZINT
(SP). RO
. 21050

INTERRUPT SERVICE ROUTINES
3
:

H
:

4731

4132

4733
4781

RORX

®s

00w

4735
4736

4737
4738
4739
4740
ar4)
4782
4743
av4s
4745
4746
are7
4748
4749

4750

®s

Be
&

4751
47152

4753
4754
4755
4756
4157
4758
4759
4760
4761
4762

4763

4764

4765
4766

010146
005746
013701
010146
012746

004737
062700
010037
010116
012746

004737
062700
010037
011037
010116
012746

000072
000076
000102
000106

1% Dec
i4 Dec

RD/Rx EXERCISER

NRQAMS
v01.0

004737
062700
010037
013700
013701

INTERRUPT SERVICE ROUTINES

routine AZINT

1983
198%

10:35:97
11:835:15

vAx

Blies

v3-55%

SEQ 04,

147

SPIDFROUSERS:(DOUCEIYE.FALCONICNQOA“.;fz i 3

: novelue °

TWIS IS THE COMMON INTERRUPT SERVICE ROUTINE FOR ALL RORX CONTROLLERS.
AFTER CALCULATING THE DCT ADDRESS FOR THE INTERRUPTING DEVICE, THIS

ROUTINE WILL SAVE THE CURRENT CONTENTS OF
THEN,

THE

OTHERWISE,

~“IGNORE

INTERRUPT~ BIT

THE SA REGISTER IN THE OCT,

SET,

NO FURTHER ACTION

THE SA VALUE IS CHECKED FOR A FATAL ERROR,

AND RESPONSE RINGS ARE POLLED.

TAKEN,

AND THE COMMAND

Xs)

IOCT
_ADOR = OCT o (.ICTLR & DCTV_LEN & 2);
! GET DCT ADDRESS
ICST ADOR = CST « (.ICTLR & CST_LEN ¢ 2);
¢ GET CST ADDRESS
* GET RDRX ADDRESS
IDRX_ADOR = .ICST_ADDR (IP_ADOR];
¢ GET COMM_AREA ADDR
ICOM_ADOR = COMM_AREA « (,ICTLR o COMM_LEN & 2);
! SAVE SA REGISTER
IDCY_ADOR [SA_SAVE] = .IRDRX_ADDR (RCSA, RC_ALL];

‘f

_IDCT_ADDR [IG_INT])

then

return;

if BIT_TSY
then

else

(IDCY_ADDR

FATAL _ERROR

[SA_SAVE],

SA_ERR)

IGNORE

INTERRUPT?

RETURN

INTERRUPTS

IGNORED

IF FATAL ERROR

()

‘"

gafL_CRING ();

POLL _RRING ();
end;

AZINT:

.SBTTL

MOV
157
MOV
MOV
MOV
JSR

ADD
MOV
MOV
MOV
JSR
ADD
MOV
MOV
MOV
MOV
JSR
ADD
MOV
MOV
MOV

POLL COMMAND RING
POLL

RESPONSE

RING

AZINT RORX INTERRUPT SERVICE ROUTINES
R1,-(SP)
-(SP)
ICTLR,R1

4735

4747

022, -(SP)
PC.BLSML

#0CT,RO
RO, IDCT.ADDR

4748

R1,(SP)

36,-(SP)

PC,BLIML

#CST,.RO
RO, ICST.ADDR
(RO), IRDRX . ADDR
R1,(SP)

ICST.ADDR,

4749
4750

PC.BLIMUL

S#COMM, AREA, RO
RO, ICOM, ADOR

IOCT.ADDR,RO

IRDRY. .ADDR ,R1

4751

bt 13
RD/RX EXERCISER
RORX INTERRUPT SERVICE

NRQAMS
vOol1.¢

1% Dec
14 Dec

ROUTINES

1983 10:3%:57
198% 11:35:1%

SEQ O%.7
VAX 11 Blies-1& v3-55%5
Pege 14
SPIDERSUSERS
: (DOUCETTE .F ALCONICNRQAA .BL 2 (4%

)

000112
000120
000126
000132
000134
000140
000144
000150
000152
000156
000160
000164
000170
000174
000176

016166
016660
032710
001016
016600
042700
020027
001003
004737
000404
004737
004737
062706
012601
000207

000002
000010
040000

0000190
or7777
100000
000000V

000000V
000000V
000012

18:
2s:

64 words,
Rout ine Bese:
7 words
Mex mum stack depth per invocetion:

Routine Size:

B8I7
BNE
MOV
8IC
cHP
BNE
JSR
B8R
JSR
JSR
ADD
MOV

47%%

10(SP),RO

!
:

PC,FATAL .ERROR

47%9

4757

:
:

4762
4763
47%S

5:0000.(“0)

®77777,R0
R?.O 100000
1

Pl]
PC,.POLL.CRING
PC,.POLL .RRING
2¢2,5P

(SP). ,R1

RTS

$CODES

; ¢,RC.REG
3 “C.Rfi(o.‘
1 ¢,I0CT.ADOR

2(R1),10(SP)
10(SP),2(RO)

MUV
MOV

000010
000002

21066

473%
47%7

NRQAM 3

KD /RX EXERCISER

v01.C

RDRX INTERRUPT SERVICE ROUTINES

:
H
:

:
:
:
.

4767
4768
4769

routine FATAL _ERROR :

4774

RETURN PACKET.

4776
4777

!
!

IMPLICIT

4779
4780

¢
!

4770
4771
4772
4773
4775

4778

4781
4782
4783
4784
4785

.
H

:
:

1%, Dec

¢t

!
¢
¢
¢

novalue

14 Dec 1983 11:35:1¢%

IDCY _ADDR

ICST ADDR IRDRX ADOR

ADDRESS OF INTERRUPTING CONTROLLER'S CST
ADDRESS OF INTERRUPTING CONTROLLER'S IP REGISTER

beg
n

local

index

U_SAVE

signed word,
word;

:
:

4794
4795

LSLUN = U_SAVE;
DRV_CTLERR (. ICTLR);

4792
4793

4800
4801
4802
4803
4804
4805
4806

;

4799

4807

!
'

SET CURRENT UNIT T0O FIRST IN CONTROLLER
FATAL CONTROLLER ERROR

i?f (index

TRY

¢t

“FATAL _ERROR: RETPKT NOT AVAILABLE"

then

else

004137

000000G

000004

013700

000110

000016
000022

013701
013700

000000G
000156

000030
000034
000040
000044

006300

105260
013700
016002
000302

les O

PRINTF (DBM18)

end;

000000

000026

= GET_RETPKT (.ICTLR))

! RESTORE PRE-INTERRUPT CURRENT UNIT
! CLEAN UP DRIVER DATA FOR CONTROLLER

RETPXY [.index, CONID) = CID_DRIVER;
RETPKT [.index, MESTYP) = MT_FATAL;
RETPKT (.index, CTLR) = .ICTLR;
IN_I0DQ (. index);

end;

016037

! SAVE PRE-INTERRUPT CURRENT UNIT NUMBER
_C_ERR _TBL (.ICTLR, C_ERR_MRD]) + 1;

LSLUN = _ICST_ADOR [OF UN, D_UNIT];
ERRDF (14, EGD_14, EMS_14);

4808

000010

144

ADDRESS OF INTERRUPTING CONTROLLER'S OCT

[

SPI[)&ROUSERS:(DOUCETYE.FM.CON]CPROAA.BL..; (46

INPUTS:
ICTLR
INTERRUPTING CONTROLLER NUMBER

SA_REG = .IDCT_ADDR [SA_SAVE];
U_SAVE = _LS$LUN;
C_ERR_TBL [.ICTLR, C_ERR_MHRD] =

3
:
:
:
:
H

SEQ 0%4.8

4787
4788

4796
4;97
4798

11 Blies 16 v3 555

THIS ROUTINE IS CALLED BY THE INTERRUPT SERVICE ROUTINE (AZINT) UPON
DETECTING AN UNRECOVERABLE ERROR THROUGH THE DEVICE'S SA REGISTER.
ITS PURPOSE IS TO CLEAN UP DEVICE DATA IN THE "“DRIVER” PORTION OF
THE EXERCISER, AND TO INFORM THE “PROGRAM" PORTION OF THE EVENT VIA

4786

H
:
H

VAX

4789
4790
4791

:
:

1933 10:3%5:57

000002

O000000G
000106
000026

"
'
!
¢

¢t

TO GET A RETPKT;:

IF FAILURE

'JSD REV A

IF RETPKT WAS ALLOCATED

SET CONNECTION ID TO “DRIVER"
FATAL ERROR
CONTROLLER NUMBER
LOAD RETPKT INDEX INTO IODQ
IF RETPKT WAS ALLOCATED

! ROUTINE FATAL _ERR
LSBTTL

FATAL.ERROR RDRX INTERRUPT SERVICE ROUTINES

JSR
MoV

R1,4SAVE2
I0CT.nDOR,RO

H
H

MOV
MOV

LOLUN,RL
ICTLR,RO

;1
$

C.ERR.TBL(RO)
1CST.ADDR,RO
6(R0O),R2

FATAL .ERROR:

0000006

MOV
ASL

INCB
MOV
MOV

SWAB

2(R0O),SA.REG

4767
4789
¢,U.SAVE

4790
4791
4792

() ! C
RD/RXx EXERCISER
RORX INTERRUPT SERVICE

NRQAMS
vOol1.C

15 Dec 1983
14 Dec-1983

ROUTINES

10:3%:57
11:35:15

SEQ 0349
VAX 11 Bl .ee-16 V3-555
Pege 145
SPIDERSUSERS
: (DOUCETTE .FALCONICNRQAA BL2 (4¢

)

00004¢

0000%2
000056

000060
000062
000064
000066
000072
000076
000102
000106
000112
000114
000116
000120
000124
000130
000134

000142
000146
000152
000156
000160
000162
000166
000170
000172

042702

010237
104455
000016
0000006
0000006
010137
013746
004737
013716
004737

BlC
MOV

177760

TRAP

. WORD
. WORD
. WORD

MOV
MOV

002425
010116
012746
004737
062700
112760
013702
042702
112710
150210
010116
004737
005726
005726
000207

MOV
JSR

ADD

000001

177760

000060

1s:

PC,GET.RETPKT
RO,R1
1¢

MOV

000156

ICTLR,(SP)

JSR

MOV

HOVEe
MOV
81IC
MOV
BIS8
MOV
JSR
TST
ST
RTS

Routine Bese:
s Routine Size:
$COOES
62 words,
6 words
; Marimum steck depth per invocation:

PC,ORV.CTLERR

BLY

ICTLR, -(SP)

JSR

MOV

010001

@177770,R2
R2,LS$LUN
55
16
€GD. 14
EMS. 14
R1,LSLUN

R1,(SP)
060, -(SP)

4793

U.SAVE,s

4794
4795

4797

;

&,INDEX

INDEX,
e

4802

INDEX,s

4805

PC,BLSMIL
MRETPKT.2,RO
#3,1(RO)
ICTLR,R2
#177760,R2

#60,(RO)

R2,(RO)
R1,(SP)
PC,IN.IODQ
(SP).
(SP).
PC

+ 21266

;
:
H

4801
4783
4767

RD/Rx EXERCISER

®s

G+

NRQAMS
V;Ol .C

RORX
4809
4810
4811
4812
4813
4814
4815
4816
4817
4818
4819
4820
4821
4822
4823
4824
4825
4826
4827
4828
4829
4830
4831
4832
4833
4834
4835
4836
4837

4838
4839
4840
4841
4842

INTERRUPT

SERVICE ROUTINES

routine POLL _CRING

novalue

Deec

Dec

1943

1983

10:35:57

11:33:1

VAX

B8]

SEQ O,
Page 1 4 £

v3 %55

SPIDERS JSERS: [OOUCETTE .FALCONICNRQAR Bi 2

!
H
H
H

THIS ROUTINE IS CALLED BY THE RORX INTFRRUPT SERVICE ROUTINE (AZINT)
FOR EACH DEVICE INTERRUPT EXCEPT DURING INITIALIZATION OR FATAL ERROR,
ITS PURPOSE IS TO SCAN THE DEVICE'S COMMAND RING AND CHECK FOR ANY
COMMAND SLOTS THAT HAVE BEEN "TAKEN' BY THE CONTROLLER. SUCH SLOTS

H
H
!
!

HAVE BEEN RETURNED TO THE HOST, INDICATED 8Y A ZERO OWNERSHIP BIT. FOR
EACH SLOT THAT HAS BEEN RETURNED TO THE HOST, THE CRING COUNT IS
OECREMENTED, AND THE CR_POLL ADDRESS IS ADVANCED TO THE NEXT SLOT IN
THE COMMAND RING.

]

IMPLICIT INPUTS:
ICTLR - INTERRUPTING CONTROLLER NUMBER
IDCT_ADDR - ADDRESS OF INTERRUPTING CONTROLLER'S OCT
ICOM_ADDK - ADDRESS OF INTERRUPTING CONTROLLER'S COMM AREA

!
!

begin

while ((.IOCT_ADDR [CRING_CNT]
gtru O) and
not_(BIT_TST (C.IOCT_ADDR [CR_POLL]) « 2),
"

IOCT_ADOR [CRING_CNT)

ED_OWN))) do

_IOCT_ADDR [CRING_CNT)

IDCT_ADOR [CR_POLL) = .IOCT_ADOR [(CR_POLLY « 4;
if

.IDCT_ADDR (CR_POLL) gtra

then

IOCT_ADDR [(CR _POLL)

.IDCT ADDR [CR_END)

.IDCT_ADDR [CR_BEG];

¢!
!

WHILE @ OF COMMANDS IN CRING > O AND
CURRENT SLOT IS HOST-OWNED

t DECREMSNT & CMDS IN CRING

¢t ADVANCE TO NEXT SLOT TO POLL
¢

IF BEYOND END OF RING

SET POINTER TO TOP OF CRING

CLEAR COMMAND INTERRUPT WORD IN RING HEADER

end;

ICOM_ADDR (CMD_INT]

end;

= 0O;

( 4 4

e
s

Q00000

00413/

0000006

000004

013701
012702
060102

000110

000010
000014
000016
000020
000022
000026
000032
000036
000042
000044
000046
000052
000056
000060
000064
000066
000072
000076

105711
001422
016100
016000
042700
020027
001411
105311
062712
021261
101757
016112
000754
013700
005060
000207

; Routine Size:

;

15 Dec
14 Dec

RD/RXx EXERCISER
RDRx INTERRUPT SERVICE ROUTINES

NRQAM
L
vOol.c

Maximum

stack

L,SBTTL
POLL .CRING:

1%:

000016
000002

000010
000104
000004

MOV

ADD

216,R2

R1,R2

TS78
BEQ

(R1)
24

4829

4830

2t
(R1)

4832

107R1),(R2)

4837

ICOM,ADDR,RO
4(R0O)

4841

16(R1),RO
2(R0O),RO

ADD
cHe
B8LO0S

04,(R2)
(R2),12(R1)
1¢

B8R

MOV
CLR

RTS

32 words,
Routine Base:
$CODES
depth per invocetion:
4 words

4809

4829
)

4833

777717 ,R0O

RO, #-100000

MOV

2s:

IDCT.ADDR,R1

crP

BEQ
DECB

CGO0004
000012

INTERRUPT SERVICE ROUTINES
:

BIC

100000

SEQ G271
VAX 11 Blies-16 v3-555
Page 147
SPIDERSUSERS:(DOUCETTE.FALCONICNROAL.BLZ (47

R1, $SAVE?

MOV
MOV

or7717

1983 10:35:57
1983 11:35:15

JSR

MOV

000016

POLL.CRING RDRX

1¢

+ 21462

:
:

4833
4835

4829
4809

P4
’

RD/RX EAERCISER

NRQAM
3

RORX

v0l.0

4843
4844
4845
4846
4847
4848
4849

4850

4851
4852

4853
4854

485%
4856
4857
4858
4859
4860
4861
4862

4864
4865
4866
4867
4868
4869
4870
4871
4872
4873
4874
4875
4876
4877
4878
4879
4880
4881
4882
4883
4884
4885
4886
4887
4888
4889

000010
000014

15 Dec

INTERRUPT SERVICE ROUTINES

routine POLL_RRING

novalue

14 Dec

1983

10:35:57

1983 11:35:15

VAX

11 Bliss

16 V3 555

SEQ 0%17¢
Pege 148

SPIDER$USERS:
[DOUCETTE .FALCONICNRQAA.BL2 (48

THIS ROUTINE IS CALLED 6Y THE RDRX INTERRUPT SERVICE ROUTINE (AZINT)

]

FOR EACH DEVICE

'
:

INTERRUPT EXCEPT DURING INITIALIZATION OR FATAL ERROR.

ITS PURPOSE IS TO SCAN THE DEVICE'S RESPONSE RING AND CHECK FOR ANY
SLOTS WHICH HAVE BEEN RETURNED TO THE HOST (OWNERSHIP B8IT = 0). FOR
EACH SUCH SLOT, THE ASSOCIATED HESSAGE IS PROCESSED BASED ON ITS
CONNECTION I0 (MSCP OR DUP). AFTER PROCESSING, THE MESSAGE PACKET
%S R%-INITIALIZED AND RETURNED TO THE CONTROLLER (OWNERSHIP BIT SEY

]
H

]
!

9
!

]
!

01).

]
!

[}
!

IMPLICIT INPUTS:
ICTLR - NUMBER OF INTERRUPTING CONTROLLER
IOCT _ADDR
ADDRESS OF INTERRUPTING CONTROLLER‘S DCT

9
!

]

’
:

begin

while not (BIT_TST ((.IDCT_ADDR {RR_POLL]

+ 2),

ED_OWN)) do

WHILE O = 0

?gg*_ADOR = ,.IDCT _ADOR [RR_POLL]) - 10; ! ADDRESS OF RESPONSE PACKET
n

CREDIT_BAL =

.CREDIT_BAL +

.IPKT_ADDR [CREDITS);

selectoneu .IPKT_ADODR [(CONNID) of
set

{CID_MSCP])
(CID DUP)

:
:

{otherwise]

MSCP_RSP ();
DUP RSP ();

PRINTF (DBM20,

.IPKT_ADDR [CONNID),
t

.IRDRX_ADDR);

'JSD REV A

"BAD CONN ID = XXXXX RECEIVED FROM XXXXXX*

tes;

IPKT_ADDR [MSGLEN] = MSG_LEN ¢ 2;
! RE-INIT PKT FIELOS; MESSAGE LENGTH
IOCT_ADOR [RR _POLL) = .IDCT_ADDR [RR_POLL] +« 2; ! ADVANCE YO HI ORDER WORD OF RING SLOT
.JOCT _ADOR [RR_POLL] = .IPKT _ADDR [PKT _HIl,
! RETURN SLOT TO CONTROLLER
.IDCT_ADOR (RR_POLL] = ,.IDCT_ADOR [RR_POLL) or ED_OWN or ED_FLAG; ! OWNERSHIP TOO
IDCT_ADDR (RR_POLL] » .IDCT_ADDR [RR_POLL] ¢+ 2; ! ADVANCE TO NEXT RRING SLOT
if

.IDCT_ADOR

then

[RR_POLL] gtre

IOCT_ADDR [RR_POLL)

.IDCT_ADDR {RR_END]!

.IDCT_ADDR {RR_BEG];

end;

ICOM_ADDR [RSP_INT)

4890

end;

004137

0000006

013702
062702
011200

000110*
000014

= O;

CYCLE TO TOP OF RING

WHILE LOOP

t CLEAR RESPONSE INTERRUPT WORD IN RING HEADER

LSBTTL

POLL.RRING RORX INTERRUPT SERVICE ROUTINES

JSR
MOV

R1, $SAVE2
IOCY .ADDR,R2

MOV

(R2).,R0O

POLL .RRING:

1¢:

IF BEYOND END OF RING

ADD

014 ,R2

:
:

4843
4862

/1/
RD/RX EXERCISER
RDRX INTERRUPT SERVICE

NRQAMS
vol.C
)
000016
000022
000026
000032
0000 34
000042
000050
000054
000060

000064
000070
000074
000100
000104
000106
000112
000114
000120
000122
000126
0001 52
000140
000144
000146
000152
000156
000164
000172
000176
000202
000204
000210
000212
000216
000222

.,
.

016000
042700
020027
001467
017237

162737
013700
116001
042701
063701
010137
116000

042700
001003
004737
000405
020027
001002
004737
013700
012760
013701
010102
062702
062712
016072
052772
062712
021261
101704

016112
000701
013700
005060
000207

Routine Size:
Max mum stack

15 Dec
14 Dec

ROUTINES

000002
or7777

MOV

000000
0000006
000012
0000006
0000006
000010
177760
0000006
0000006
000011
177400

MOV

8IC
cMe
BEQ

100000

SUB

MOV

MOVB
8IC
ADD

000000V

000002

2%:

000000V
0000006
000074
0C0006
000110°
000014
000002

000002
140000
000002
000006

3%:

000000
000000

000004

000104
000006
74 words,

depth per

4%:

Rout ine Base:
invocation:
4 words

9177760,R1

CREDIT.BAL,R1

11(R0O),RO

H
H

4870
4867

IPKT.,ADDR,RO

H
H

4871
A87/

IDCT.ADDR,R1

4878

H
H
;

4879
4880
4481

:
H
H

4885
4862
4889

4843

3¢

PC,DUP
. RSP

MOV
MOV

#74,6(RO)

ADD

R1,R2
414, ,R2

$CODES

v3-55%

9177400,RO
24
PC ,MSCP .RSP
3
RO, @2

RTS

11 Bliees-16

ADOR
80(R2),IPKT
212, 1IPKT ADDR
IPKT,ADDR,RO
10(RO),R1

BIC
BNE
JSR
B8R
cMP
BNE
JSR

ADD
MOV
BIS
ADD
cHP
8LOS
MOV
BR
MOV
CLR

SEQ 07?2
Pege 149
SPIDERSUSERS: [DOUCETTE .FALCONICNRQAA, 812 (48
VAX

077777,R0
R?.O-lOOOOO

R1,CREOIT.BAL

MOV
MOV

10:3%:57
11:35:15

2(R0O),RO

MOV

HOVB

1983
1983

42,(R2)
2(R0O),80(R2)
#-40000,80(R2)
#2,(R2)
(R2),6(R1)
14
4(R1),(R2)
14
ICOM.ADDR,RO
6(RO)
PC

+» 21562

4883

L
NRQAM3
‘;OI.C
H
:
:
:

H
i
.
.
.

RD/Rx EXERCISER
RORX INTERRUPT SERVICE ROUT_NES
4891
4892
4893
4894

¢
ROUTINE DUP_RSP

4900

4895
4896
4897
4898
4899
4901
4902

4903

4904

.
.
;

4905

NOVALUE

15 Dec
14 Dec

1983 10:35:57
1983 11:35:15

!
!
!
!
!

THIS ROUTINE IS CALLED BY POLL_RRING FOR EACH DUP RESPONSE
ITS GENERAL PURPOSE IS TO ACT ON A DATAGRAM OR SEQUENTIAL MESSAGE.
IF THE MESSAGE TYPE IS SEQUENTIAL, THE ROUTINE COPIES THE
CONTENTS OF THE MESSAGE ENVELOPE INTO A RETURN PACKET SO THAT THE

!
!

IMPLICIT

ENVELOPE CAN BE RETURNED TO THE CONTROLLER.

! -

4906

4907

INPUTS:
ICTLR
INTERRUPTING CONTROLLER NUMBER

IPKT_ADDR

ADDRESS OF MSCP ENVELOPE CONTAINING RESFPONSE

begin

local

4908
4909

R_INDEX : signed word,
SRC _ADDR,

4910

OST_ADOR,

:
.

4911
dglg

R_ADDR : ref block [RP_LEN, word) field (RP_FIELDS);
'PRINTX (DER34);

431;

incr COUNT from O to PKT_CNT

i
;
i

4916
4917
4918

.
H

i
:

;
:
;
H

.
H
:

:
.

;
.

.
.
:

.
R

491

P_INDEX =

4927
4928

end;

4926

exitloop;

4929

then
!

begin

PRINTF (D8M108,

4944

4945
4946

SET PKT NUMBER

t IF COMMAND NOT FOUND
.IPKT_ADDR {CRN_LOJ));

UNKNOWN COMMAND REF.

i (R_INDEX = GET_RETPKY (.ICTLR)) les O

IF RETPKT IS NOT AVAILABLE

"OUP-RSP: RETPKT NOT AVAILABLE"”

return;

4934

NUMBER

tJSD REV A

end;

4935
:ggg

4940

.COUNT;

if _P_INDEX lss O

4930

4941
:g:g

then

4925

4938

IF THIS IS THE ASSOC CMO

(.HSCP_PKT [.COl.NT. CONNID] eql CID_DUP) and
((.IPKT_ADDR [OPCODE) end OP_END) eql OP_END)

492%
4924

4339

¢t

(.MSCP_PKT [. CO\NT MSGTYP) eql MT_SEQ) and

4921
4922

4933

1 do

(( MSCP_PKT [. COl.NT OPCODE) end oP _END) neq OP_END) and

4920

4932

if (.HSCP_PKT {.COUNT, CRN_LO) eaql .IPKT_ADDR {CRN_LO]) an
.MSCP_PKT [.COUNT, CRN_HI] eql .IPKT_ADDR [CRN_HI)) en
(.MSCP_PKT [.COUNT, PKT_LO] neqs .IPKT_ADDR (PKT _LO]) d

4919

4931

SEQ 0274

VAX 11 Blies 16 v3-555
Page 150
SPIDERSUSERS
: (DOUCETTE .FALCONICNRQAA .BL2 (&9

then

else

PRINTF (DBM112)
begin

tJSD REV A

SRC_ADDR
» _IPKT_ADDR ¢« 6;
1 SET UP COPY (SKIP OVER PKT DESC)
R_ADDR = DST ADDR = RETPKT ¢« ( .R_INDEX « RP_LEN *+ 2),
! START OF ALLOCATED RETPKY
incr COUNT from 1 to RP_LEN do

begin

.DST_ADDR =

..SRC_ADDR;

t COPY 1 WORD

M
RD/RX EXERCISER

RORX

INTERRUPT

4954

4955
4956
4957
4958
4959

000010
000012
000014
000024

004137
013701
005002
010246
012746
004737
022626
026061
001030
026061
001024
026011
001421

0000006

013746

(.P_INDEX);

RETURN COMMAND PACKET

ROUTINE DUP_RSP

1¢:

000012G 000012
000014G 000014

7ST8

000010G

géga
cMPB
BNE
1ST18
BPL
MOV

000022
0000006

0000006
000156°
0000006

0000006
000006

000060
0000006
0000006

MOV
JSR
cMP
g:z

8MI

0000116 000002

000013

CLR

MOV

cHP
BNE
cHp
BEQ

0000006

000360

004737
010004
005726
005704
002436
013702
0621702
010446
012746
004737
062700

IF ASSOC CMD PKT WAS FOUND

HOV

000104
0000006

132760
001012
126027
001006

010237
000406
005202
020227
003732
003737
002455

.SBTTL
USR
DUP.RZP:

0000006

0000226

105761
100003

geq O

.ICTLR;

end;

105760

100416

LOAD CONTROLLER NUMBER INTO PACKET
PUT RETPKT INDEX INTO IODG
IF RETPKT WAS ALLOCATED

24:

3s:

B8R
INC
cHe
BLE
T1sT
8LT
MOV
JSR
MOV
ST
187
BLT
MOV
ADD
MOV
MOV
JSR
ADD

IPKT.ADDR,R1
R2
R2,-(SP)

SEQ 017

151

TO POOL

DUP.RSP RDRX INTERRUPT SERVICE ROUTINES

R1, $SAVES

16 v3-555

SPIDER‘USERS:(DOUCEYTE.FALCON]CNRQAA,gg; (49

!
!
!

[CTLR)

end;

PUT PKT

VAX-11 Bliss

ADVANCE DESTINATION ADDR
ADVANCE SOURCE ADDR
COPY LOOP

» 2;
+ 2;

IN_I00Q (.R_INDEX);

if .P_INDEX
then

10:35:57

!
!
!

.GST ADDR
.SRC_ADDR

end;

R_ADDR

1983

14 Dec 1983 11:35:15

SERVICE ROUTINES

OST ADDR =
SRC_ADDR =

4947
4948
4949
4950
4951
4952
4953

15 Dec

H
i
;

COUNT

COUNT,»

4892
4916
4914
4916

PC,BL ML

(SP)+,(SP)e
g%CP.PKT012(RO).12(R1)

MSCP . PKT+14(R0O),14(R1)

28
HfCP.PKT(RO).(Rl)
4
MSCP . PKT+22(RO)
il
0260.HSCP.PK7010(R0)
2

MSCP.PKT+11(R0O), 02

4917

4918

4919

;

4920

4921

4922

R2
64

ICTLR, -(SP)

PC,.GET.RETPKT
RO,R4

(SP)+s
R4
5¢%

IPKT ,ADDR,R2

&6 ,R2
R4, -(SP)
€60, -(SP)
PC.BL $MUL

ORETPKT ,RO

COUNT,

4925

: COUNT

4924
4914

4929
4931
49%6

;

COUNT,»

;

¢,R.INDEX

;

R.INDEX

;

¢,SRC.ADDR

:
;

*,SRC.ADDR
R.INDEX,»

4941

4942

N13
RD/RX EXERCISER
RDRX INTERRUPT SERVICE

010003
012701

012223
005301
001375
013701
042701
142760
130160
010416
004737
022626
013700
002404
010046
004737
005726
000207

s
i

000002

ROUTINES

MOV
MOV

000030

000156
177760
000017

MOV
DEC
BNE
MOV

8IC
8ICB
8IS8

000002

G00000G

0000006

15 Dec 1983 10:35:57
14-Dec-1983 11:35:15

Ss:

0000006
64:

MOV
JSR
cMP
MOV
BLT
MOV
JSR
TS7
RTS

Rout ine Bese:
$CODES
92 worde,
Routine Size:
8 words
Maximum steck depth per invocetion:

RO,R3
230,R1

(R2)¢,(R3).

R1
44

ICTLR,R1

#177760,R1
#17,2(R0)
R1,2(RO)
R4,(SP)
PC,.IN.INDG

(SP)+,(SP).

P.INDEX,RO
63

PC,PUT.PKT

(SP).

« 22006

VAX-11

Bl.es-16

V3 555

SEQ O+
Page 15~

SPIDERSUSERS: (DOUCFTTE .FALCONICNRQAR .BL2 (49

;i
1
s+
:

«,057.ADDR
o, COUNT
SRC.ADOR,DST.ADDR
COUNT

;
:
;

4944
4946
4944
4951

¢,s(R.ADDR)

¢,so(R.ADDR)
R.INDEX,»

4952

:
H

4940
4955

4957

4892

-y e

NG Az CaERTISER

TP
]

)

HORS

rout ng MSCP RSP : nevelus °

!¢

4908

'
,
.
i

490,
!
'Y AV
497
¢
4971

.
.
.

NTERMOT SEBVICE AD i-

49C
494

4912
49’8

1L ICIT INPUTS:
Pt AQDR

set

497¢

)
'
'

49/
4978
4979

498)

4980

498

{7 _DG)

013700

000000G

0000L4A

116000

000010

:
:

{otrerw.se)

tes,

DATAGM ();

PRINTF (DBM2!,

.IPKT ADOR [(MSGTIP));

LSBYTL MSCP RSP RDRX

MSCP
. RSP

MOV

IPxY _ADDR,RO

ASR

MOove

10(R0O),RO

000014

006200

000020

042700

1717760

BIC

004737

000000V

JSR

PC.SEREN

020027

200001

o, 4

RO, 01

000024

000026

0000%¢

0000%4

000040

000042

000046

s
i

006200

001003
000207

001002

004737

000207

- e

SEQEN (4,

006200

ADDRESS OF "MSCP PACKETY CONTAINING Q€ SPONSE
"ME SSAGE

000010
000016

IPHT ADDR [MSGTIP) of

{17 _SEQ)

00000C

000012

.1 Bl we 16 ¢3 859

(1.€6.. ALL EXCEPT DUP RESPONSES
). 17S PURPOSE IS YO PASS
CONTAOL 10 7€ APSAOPRIATE AOUTINE BASED Ok Te€ MESSAGE TvPE
FIELD (SEQUENTIAL, DATAGRAM, 0P CREDIT NOTIFICATION).

selectoneu

497%

i4 Dec 1988 11:%%:1%

vAs

WICH »o8S A CONMECTION ID INOICATING A DISK MSCP GRIGINATOR

4974

1948 10:%%:57

14IS AOUTINE 1S CALLED B+ POLL _ARING FOR EAOH RESPONSE "E SOAGE

496°
¢
900
¢
a0

,
.

1% Dec

ASR

000000V

ASR

BNE

16¢:

RYS
8N

24:

Rout ne Size:
20 worde,
Rout ine Bese:
Hor mum etack gepth per invocetion:
1 word

JSR

RTS

SCODES

INTERRUPT

¢t

"MESSAGE

TYPE Xxx RECEIVED"“

1JSD REV A

SERVICE ROUTINES

4974

4977

4979

RO
RO

€1777160,R0

Pd)

PC,OATAGH
PC

« 2227¢

4974

49%C

Pebd i
v

Wi Wy ERERCISER
o

RUPY
49883

:
.
;
.
;
.

47984

498%

;

;
:
:
;

]

novelue

1Wnt

PIDERSUSERS
: (OOUCE TTE ¢ ALCON ICNK 4mie 18,

Lec

(1:%5:1%

¢
¢

IMPLICIT INPUTS:
ICTLR
INTERRUPTING CONTROLLER NUMBER

49%

!¢

IPKT_ADOR - ADDRESS OF MSCP PACKET CONTAINING RESPONSE

4999

beo

5002
%003
$004
500%

signed word,

SAC _ADOR,
DST _ADOR,
R_ADDR : ref block [RP_LEN, word] field (RP_FIELDS)
TEMP _UNIT,

5588‘1'

SFT_ERR_PRINTED

byte

initisl (byte (FALSE));

5008

:
;

5010
$011

if (.MSCP_PKT [.COUNT, CRN_LO] eaql .IPKT_ADOR (CRN_LO]) end
(.MSCP_PXT [.COUNT, CAN_HI] eql xmv_nooa (CRN_HI)) end

;
:

5013
5014

(C.MSCP PXT {.COUNT., OPCODE) end op _END) neq OP _END) and
(.MSCP PX1[.COUNT, MSGTYP] eql MT_SEQ) and

]

;

[
14

%012

$020
%021

;

%028

5026

‘
5

5027

s
;

5029
ggg?

;

then

i* .P_INDEX lee O

then
!

PRINTF (DBMIOS,

return;

! don’'t went old peckets from other controll

! SET PKT NUMBER

exitloop:
end;

%028
5082

P_INDEX = .COUNT;

5022

;

(.PKT_USE {.count) eal .ICTLR)

5019

S024
5025

t IF COMMAND NOT FOUND
.IPKT_ADDR (CRN_LOJ);

UNKNOWN COMMAND REF,

IF RETPKT

“SEQUEN:

i? (R_INDEX

= GET_RETPKT

(.ICTLR))

then

PRINTF (DBM22)

IS NOT

!'JSD REV A

5085
&gc;

R_ADOR = DST_ADDR
= asmu ¢« (.R_INDEX & RP_LEN ¢ 2);

5038

incr COUNT from 1 to RP_LEN do

SRC_ADOR« ,IPKT_ADDR+

AVAILABLE

RETPKT NOT AVAILABLE"

;
;

else

les O

5033
%034

NUMBER

ond;

;
:

¢t IF THIS IS THE ASSOC CMD

((.IPKT_ADOR {OPCODE) and OP_END) eql OP_END) and

%016

)
'

1 do

(.MSCP PXYT [.COUNT, PXT _LO) neas .IPXT _ADDR (PXT_LO]) end

%01%

S017
%018

;

incr COUNT from O to PXT_CNT

i
i

Page ‘=2

4998
4994

499%

1HIS ROUTINE IS CALLED BY MSCP_RSP FOR EACH DISK MSCP RESPONSE MESSAGE
WITH Tr€ ~SEQUENTIAL- MESSAGE TYPE. ITS GENERAL PURPOSE IS 10 COPY TwE
CONTENTS OF THE MESSAGE PACKET INTO A RETURN PACKET SO THAT TwHE
PACKET CAN BE RETURMED TO THE CONTROLLER.
IN ADDITION,
If THE COMMAND MAS AN 1/0 TRANSFER (READ, WRITE, OR ACCESS), THEN SOME
FIELDS OF THE COMMAND PACKET ARE COPIED INTO THE RETURN PACKET.

SEQEN

VAs

!
¢
!
¢
¢
¢

4992

routing

R r "IN

1978 10:3%:957

4966
4987
4968
4989
4990
4991

:
.

NIERRIUPT SER. (L

1] Bliwe 16 v3 %55

“Ha LR

' SET UP COPY (SKIP OVER PKT DESC)
!

START OF ALLOCATED RETPKT

{

RO 'Rx EXERCISER

NPQANr
¢

vOl

RORX

INTERRUPT

%039
5040
5041
5042
5043

SERVICE
n

“f

5044

S
B
B

eal

SRC_ADOR

(CTLR])

.SRC ADDR

.ICTLR;

if (.IPKT_ADDR

SKIP

OVER Rt

THIS IS

THE ONLINE END MESSAGE

cD WORDS

IN ONLINE ENO

MESSAGE

COPY LOOP

LOAD CONTROLLER NUMBER

ASSOC.

CMD PKT

[OPCODE) eql

(OP_RD or OP_END)) or

(.IPKT_ADDR [{OPCODE) eql (OP_WRT or OP_END)) or

(.IPKT_ADDR [OPCODE) eql (OP_ACC or OP_END))

5061
5062

then

INTO PACKET

WAS FOUND

IF END MESSAGE

READ,

ACCESS

WRITE,

gtxDOR {CMDMOD) = .MSCP_PKT [ .P_INDEX, MODIFY); ! COPY

5063

o
B¢

ADVANCE DESTINATION ADDR
ADVANCE SOURCE ADOR

(OP ONL or OP END)

P_INDEX geq O

3065

R_ADDR (CBCNT_LO)
R_ADDR [CBCNT _HI)

=
=

R_ADDR (BUFF_1])
end;

.MSCP_PXT [.P_INDEX,

R_ADDR
R_ADDR
R_ADOR

W
B
Gt
We
O
@5
B9
G
Br
@1
@
s
B

!
¢

then

VeS¢

R_ADOR

(LBN_LO)
[LBN_HI]
[BUFF _0]

=
=
=

.MSCP_PXT [.P_INDEX, BC_LO);!
.MSCP_PKT [.P_INDEX, BC_MI);!

.MSCP_PKTY
.MSCP_PKT
.MSCP_PKT

[.P_INDEX,
(.P_INDEX,
[.P_INDEX,

LBN L]);
LBN_H);
BUF O0);

BUF _11;

(.IPKT_ADOR

¢
!
!

¢
!

RELEVANT
FIELDS
FROM
COMMAND
PACKET

TO RETPKT
IF ENDCODE WAS READ,

PUT

IN_IODQ@ (.R_INDEX);

end;

(STATUS_CODE) neq

RETPKT

INDEX

INTO

WRITE, OR ACCESS
100Q

RETPKT WAS ALLOCATED

ST_SUC) or

th.'(‘.IPKY_m (STATUS _SUBCODE) neq 0)
N

LAST _PXT [.ICTLR, LAST_HRO_ERR) = HRD_OCCURED

elee

SEQ U3
VAX 1. Bliess 16 v3-55%5
Page 18
SPIDE
: (DOUCETTE
RSUSE
.FALCONICNROAA
RS
. BL2 (5]

10:35%:57
11:35:15

! COPY
1 WORD

. ¢2;
. 2;

end;

5057
5058
5059

LAST_PxT { . ICTLR, LAST_HRD_ERR)

3083

LAST_PKY (.ICTLR, LAST_CRN_LO) =
LAST_PKT (.ICTLR, LAST_CRN_MI] =

3085

incr

.COUNT

then

5051
5052
5053
5054
5055

SAVE ERROR CONDITION

= HRO_NOT_OCCURED;

.IPKT_ADDR {CRN_LO):
.IPKT_ADDR [CRN_HI);

SAVE COMMAND REFERENCE NUMBER

index

from O to EP_CNT

1 do

IF CORRESPONDING REF NUM HAD AN ERROR LOG

5087

5089

, SKC ADDR;

.DST ADDR
_SRC ADDR

.IPKT ADOR (OPCODE) eql

5047

3081

ADOR -

1983
1983

then

5048
3049

3067
5068
5069
5070
3071
30172
5073
5074
5075
5076
5077
5078
5079

ROUTINES

DST ADDR »
SRC_ADOR =

3045

15 Dec
i4 Dec

5092

5093
5094

it (.ELOG_PXT [.index,
(.ELOG_PXT {.index,

EL_CNTR) eql .ICTLR) and
EL_CRN LO] eql .IPKT_ADOR [CRN_L

(.ELOG_PXT [.index, EL_CRN_HI) eql .IPKT_ADDR (CRN_H
(.ELOG_PXT [.index, EL_CONTENTS] egl FWLL)

then

begin

LAST PKT

[.ICTLR,

LAST HRD_ERR) eaql HRD_NOT
_ OCCURED

SOFT ERROR OCCURED

RD/Rx EXERCISER
RDRxXx INTERRUPT SERVICE

S
NRQAM
vol.¢o

15 Dec
14 Dec

ROUTINES

1983
1983

SEQ 03%4¢

10:35%5:57
11:35:15

VAX 11 Blies 16 v3 55%
Page
SPIDERSUSERS
: (DOUCETTE . FALCONICNRQAA .BL 2

194
S)

5095
5096
5097

then

Go
Lo
G2
Gs
6.
G2
e
GI
He
Gc
G2
s
G0
G2
¢
Gs
G4
Ve
V0
V!
B
G0
Ve
B
By
B
B
6+
G
@
Ve
1
Vs
B0
Bs
By
Be
Be
Gs
B3
1
@4
@F
B
B¢
B9
@

000000
000004

S142
5143
5144
5145

004137
105046

FORMAT]

lequ 4

begin

TEMP _UNIT

_LSLUN;

incr OFFSE:1

from (O

t UPATE SOFT ERROR COUNT
!
«

OF _UN)

if (.ICST_ADDR [.OFFSET,

to (3

SAVE UNIT NUMBER

¢ UNIT_SIZE

D_DISK _NUM) eaql

UN) by

.ELOG PKT

(.ICST_ADDR { .OFFSET, D_PRES] eql PRESENT)

then

begin

LSLUN =

_ICST_ADDR [ .OFFSET,

exitloop;

S111
S112
5113
5114
5115
5116
S117
5118
5119
5120
S121
5122
5123
5124
5125
5126

5132
5133
5134
5135
5136
5137
5138
3139
5140
S141

[.,index,

SO’T-ERROR (. ndex);

5100
5101
5102
S103
5104
3105
5106
3107
5108
5109
S110

5127
5128
35129
5130
5131

.ELOG PKT

then

)

D_UNIT),;

UNIT

{,index,

AS KNOWN
SIZE

TO DRS

EL _DK NUM]) and

CORECT UNIV NUMBER FOR ERRDR MFSSAGE

end;

cese

.ELOG_PKT (.index, EL_FORMAT])

set

(0):

ERRSOFT (60, 0, 0);

! CONTROLLER ERROR

{1):

ERRSOFT (61, O, 0);

! HOST MEMORY ACCESS ERROR

(2):

ERRSOFTY (62,

0, 0);

DISK TRANSFER ERROR

(3):

ERRSOFT (63, 0, 0);

SDI ERROR

{a):

ERRSOFT (64, O, 0);

' SMALL DISK ERROR

tes;

LSLUN =

_TEMP_UNIT;

SFT_ERR_PRINTED =

end

else

if mot
then

PRINTF (DBM109,

PRINTB (CRLF);

RESTORE UNIT NUMBER

SOFT ERROR PRINTOUT OCCURED

! UNKNOWN ERROR-LOG FORMAT

1JSD REV A

EXTRA CARRIAGE -RETURN/LINF FEED

! PRINT ERROR-LOG CONTENTS

.P_INDEX geq O

PUT _PKXT (.P_INDEX);

IF ASSOC CMD PXT WAS FOUND

! RETURN COMMAND PACKET TO POOL

end;

0000206

(.SFT_ERR_PRINTED)

EMS_EL (. index);

TRUE;

.ELOG_PKT [.index, EL_FORMAT]);

end;

then

from O to 4 of

! ROUTINE DISK_RSP

SEQUEN:

.SBTTL
JSR
CLRE

SEQUEN RORX INTERRUPT SERVICE ROUTINES
R1, $SAVES
3
+ SFT._ERR.PRINTED
(SP)

4983
4992

F L4
RD-Rx EXERCISER
RDRX INTERRUPT SERVICE

NRQAM3
vOol ¢

000012
000014

600016
000022
000026
000030
000036

000040
000046
000050

000056
000062
000072
000074
000100
000102
000106
000112
000114
000120
000122
000124

000130
000132
000136
000140
000144

000150

000154
000156
000160
000162
000164
000170
000174
000176
000202
000206
000212
000214
000216
000222
000226
000230

000236
000240

000244
000246
000252
000260
000262

013701
005002

0000006

012746
004737
022626
026061
001031
026061
001025
026011
001422

000104

010246

105760
100417
132760
001013
105741
100010
116200
020037

001003
010237
000406
005202
020227
003731
005737
002002
000137
013746
004737
010005
005726
005705
002526
013704
062704
010546

ROUTINES

MUV

1$:

0000146 000014

0000006

0000226

MOV

BMI

0000106

8178
8PL
MOvVe

0000006

000156

0000006
24:

000013
000000G
023516
000156
0000006

cHP
BNE
MOV
B8R
INC
cHP
8LE

3s:

15T
B8GE

MOV

JSR
18T

Ss:

00nC 22

20211

000012

000030
G00156°
177760

64:

10:35:57
11:35:15

IPKT ,ADDR,R1

VAX-11 Blise 16 Vv3-555

SEQ 0281
4
157

SPIDEROUSERS:(DOUCE!TE.FALCON)CNRQA&.;8; (Ll
:

s COUNT
31 COUNT,
e

5010

5008
5010

(SP)+,(SP)»
g%CP.PKTol2(RO).12(R1)

MSCP .PKT+14(R0O),14(R1)
as
MSCP.PKT(RO),(R1)
2
MSCP.PKT+22(RO)
28
0360, ,MSCP . PKT+10(RO)

PKT USE(R2),RO
RO, ICTLR

5011

5012

5013

S014

5015

s(COUNT),»

284

ICTLR, -(5P)

PC.GET.RETPKT
RO,R5

(SP).

RS
94
IPKT.ADDR,R4

MOV
MOV
JSR

R5,-(SP)

6 R4

#60, -(SP)

PC.BL $MUL
MRETPKT
RO
RO,R3
RO,R2
IPKT ADDR,R1
#1,R0
(R4)+,(R3).
c2(P1),e201

S016

;i COUNT,»
H
; COUNT

S019
5018
5008

;
H

S023
5025

5030

TSY
aLy
MOV

MOV
MOV
MOV
MOV
MOV
cMP8
BNE

1983
1983

Re
R2, (SP)
2104, -(SP)
PC,BL $MUL

7578

000022

012746
004737
062700
010003
010002

013701
012700
012423
126127
001005
020027
001002
062704
005200
020027
203762
013700
042700

CLR
MOV

JSR
cMP
cMpP
BNE
CHe
BNE
cHP
8EQ
iST8

0000126 000012

000360

1S Dec
14 Dec

COUNT
, s

¢,R.INDEX

: R.INDEX

&,SRC.ADDR
¢,SRC.ADDR
; R.INDEX,s
;
;

:
;

«,DST.ADDR
»,R.ADDR

S035
5036

3
: o,COUNT
: SRC.ADDR,DST.ADDR

5044
5038
S040

crP
BNE

., »
;s COUNT

S047

;3 COUNT
i COUNT,e

S049

INC

: ¢,SRC.ADDR

5053

BLE
MOV
8IC

ICTLR,RO

€177760,R0O

S044

S038

(L4
RDRX

vol.C

000272

000300
000304
000310
000312
000314
000320
000324
000326
000332
000334
000340
000342
000344
000350
000354
000362
000370
000376
000404
000412
000420
000426
000430
000432
0004 36
000440
000444
000450
000460
000464
000472
000474
000500

000502
000510
000512
000516
000524
000532
000534
00536
000542
000550
000352
000554
000564
000566
000572
000602
000610

142762

150062
013704

002447
005000
156100
020027
001406
020027
001403
020027
001033
C10416
012746
004737
016062
016062
016062
016062
016062
016062
016062
005726
010516
004737
022626
013746
012746
004737
013702

012703
060203
132713
001003
032713
001404
012760
000402
0035060
016260
016260
005003
010316
012746
004737
010005
005726
005000
156500
020037
001156
013700
026560
001150
026560
001144

INTERRUPT

SERVICE ROUTINES

000002
000017
000002
0000006
000022
000241

000242

000220
7%:

000104
0000006
0000246
0000266
0000306
00004606
0000506
0000326
000034G

000012
000044
000046
000050
000052
000024
000026
8s:
:

0000006

9¢:

000156

000006
0000006
0000006
000024

177740

000170’
000012
000014

000170’
000172’
000174

000102

MOV
MOV
TST
MOV
JSR
cHP
MOV
MOV
JSR
MOV
MOV

MSCP.PKT«32(R0O),24(R2)

MOV

11¢;
12¢:

CLR
MOV
MOV
CLR
MOV
MOV
JSR
MOV
TST
CLR
B1S8

cHe

000012

000014

10:3%:57
11:35:15

017,2(R2)
RO,2(R2)
P.INDEX,R4

10¢:

13¢:

1983
1983

81C8
8Is8
MOV
BLT
CLR
8158
cHP
8EQ
cHP
B8EQ
cMP
BNE
MOV
MOV
JSR
MOV
MOV
MOV
MOV

8178
BNE
B8I7

000037

000001

15 Dec
14 Dec

BNE
MOV
cHpP
BNE
cHP
BNE

VAX 11 Bl.ees 16 V3-555
SPIDERSUSERS
: [DOUCETTE.FALCONICNRQARA .

(

(A,

HDRXx EXERCISER

NRQAM3

£
1

5055

8t
RO
22(R1),R0
RO, 0241

5058

5059
RO, €220

8s
R4, (SP)
2104, -(SP)
PC,BLSMUL
MSCP.PKT+24(R0O),12(R2)
MSCP.PKT+26(R0O),44(R2)
MSCP.PKT+30(R0),46(R2)
MSCP .PKT+46(R0O),50(R2)
MSCP.PKT+S0(R0O),52(R2)

5065

5067

MSCP.PKT+34(R0O),26(R2)
(SP)e.

5069
5062
5072

(Sr)e ,(SP)e
ICTLR, -(SP)

5034
S078

RS,(SP)
PC IN.IODQ

6, -(SP)

PC,BL $MA

5075

IPKT
. ADOR,R2
924 ,R3
R2.R3
437,(R3)
10¢
€177740,(R3)
11¢
1. LAST
. PKT(RO)
12¢

LAST
. PKT(RO)
12(R2),LAST.PKT:2(RO)
«4(R0O)
LAST
.PKT
14(R2),

R3
R3,(SP)

S076
5078

5075

INDEX
INDEX,
»

5082
S083
5085
5087

PC.BLSMA
RO,RS
(SP)e

RO
ELOG.PKT(R5),R0O
RO, ICTLR
264

IPKT .ADDR,RO

S%OG.PKT06(RS).12(RO)
$

ELOG.PKT+10(RS5),14(R0)
263

5088

5089

000612
000620
000622

000626
000632
000636
000640
000646
000654

000656

000670
000674
000676
000702
000706
000710
000714
000716
000720
000724
000726
000730
000732
000736
000742
000744
000750
000754
000756
000760
000764
000766
000772
000774
000776
001000
001002
001004
001006
001010
001012
001014
001016
001020
001022
001024
001026
001030
001032
001034
001036
001040
001042

126527

001140
013716
012746

004737
005726
005760
001123
126527
101104
010316
004737
013702
012700
010004
063704
016546
111401
042701
020126
001012
032714
001407
011401
000301
042701
010137
000405

062700
020027
003747

005000
156500
006 300
066007
104457
000074
000000
000000
000423
104457

RD/RXx

EXERCISER

RORX

INTERRUPT

SERVICE

ROUTINES

cMPB

000001G 000001

BNE
MOV
MOV
JSR
TST
ST
BNE
CMPB
BHI
MOV
JSR
MOV

000156
000006
0000006

000170°
000016G 000004

000000V
0000006
000006
000106°
0000126

MOV

14%:

177760
0000006

0000166

000000

1983
1983

10:35:57
11:35:15

VAX

Bliss

01
EL OL.PKT.1(RS),
268
ICTLR,(SP)

164

159
(s1

5090
5094

PC,BL$MUL

(SP.
LAST.PKT(RO)
54
ELOG.PKT+16(RS),
04

5097

244
R3,(SP)
PC,SOF T.ERROR

;

INDEX,s

5100

RO,R4

:
i

*,TEMP UNIT
¢,0FFSET

5101
5103
5105

LSLUN,R2
06,R0O

ICST.ADOR,R4
ELOG.PKT4+12(RS),
-(SP)
(R4),R1

OFFSET,s

0177774
,R1
R1,(SP).

106

5109

R1,LSLUN

15¢:

v3 555

SPIDERSUSERS
: (DOUCETTE .FALCONICNRQAR .

15
€40000,(R4)
15
(R4),R1
R1
#177760,R1

040000

000044

MOV
ADD

MOVB
81C

177774

000012

1% Dec
14 Dec

3
NRQAM
vO01.C
)

163

912,R0
RO, 044
144
RO

¢, OFFSET

OFFSET,»

5113

gsOG.PKTol6(RS).RO
P.AAA(RO
,PC
)

5108
5103

;

Case dispatch

S116

19¢:

5?7
74
0
0
234
57

104457

204

234
57

5113
5120

104457
000077
000000
000000
000404
104457

21s:

234
57

5113
5122

234

5113
5124

000075
000000
000000
000416

000076
000000
000000
000411

184

22%:

75
0
0

76
0
0

77
0
0

5113
51.8

[ 14

005203
020327
003601
013700
002403
010016
004737
022626
005726
000207

0000006

000001

000004

000001

000004

23s:
244%:

0000006
000001

0000006

000013

MOV

01,4(SP)
25%
4CRLF,(SP)

B8R
BIY
BNE

MOv
MOV
TRAP

25%:

:
264

0000006

MOV
MOve

100
0
0
R2,LSLUN
21,4(SP)

. WORD
. WORD
. WORD

27s;

284¢:

ST
MOV

JSH
INC
cHP
BLE
MOV
BLT
MOV
JSR
cHP
TST
RTS

$COOES
310 words,
Routine Bese:
Maximum steck depth per invocetion:
12 words

Routine Size:

000000
000000
000002
000004
000006
000010

.PSECT
P.AAA:

000012
000024
000036
000050

17¢:

01,

11:35:15

VAX

Bl es

v3 555

SEQ L.’~4
age

1 ‘J {J

SPIDERSUSERS:
(DOUCETTE . FALCONICNRQAAR Bl 2 (%1

001050
001052
001056
001064
001066
001074
201076
001102
001106
001110
001112
001114
001116
001122
001124
001130
001132
001136
001140
001142
001146
001130
001152

000100
000000
000000
010237
112766
000413
032766
0010G7
012716
012746
010600
104414
005726
010316
004737

1983

10:355:57

®e

001044

001046

14 Dec

ROUTINES

1983

TEMP.UNIT,»

+,SFT _ERR.PRINTED

%01.0

15 Dec

RC Rx EXERCISER
RORX INTERRUPT SERVICE

NRQAM
S

s ,SFT.ERR.PRINTED

3127
3128
5097
5134
5136

(SP)

SP,s

SP.RO
14
(SP).

R3,(SP)
PC,EMS.
EL
R3
R3,013

INDEX,»

5138

X
INDE
»
INOEX,

5085

P.INDEX,RO

S141

274
RO, (SP)
PC,PUT PKT
(SP)+,(SP).

5143
4998
4983

(SP)e.

22346

$PLITS,
0
12
24
36

RO,

O
CASE Teble for SEQUEN.0766

5113

J1da
RD/RX EXERCISER
RORX INTERRUPT SERVICE ROUTINES

5153
5154
515S
5156
5157

WY T WP

routine DATAGM

IPKT _ADDR

ICST_ADDR

5160

locel

ADDRESSSOF MSCE PACKET CONTAINING ERROR LOG
-

MESSAGE

ADDRESS OF

signed word

initial

9162

SAVE _ADDR :

5164

OST_ADDR,

21691

SFT_ERR_PRINTED : byte

5163

SRC_ADOR,

5165

ref block

(-1},

[EP_LEN,

TEMP _UNIT,

16
5168
5169
S170
S171
g%;g

THE INTERRUPTING CONTROLLER'S CST

index

word]

field (EP FIELDS),

initisl (byte (FALSE));

FIND AN EMPTY SLOT IN THE ERROR-LOG PACKET SAVE AREA
incr COUNT

from O to EP_CNT

1 do

5178
5179

5180
5181
g%:g

5186

5187
5188

5189

IF EMPTY SLOT FOUND

begin
index

SAVE

!
!
!
t

ADDRESS OF THE SAVE AREA
MARK IT FULL
OWNERSHIP
SETUP COPY ADDRESSES

,COUNT;

INDEX INTO THE SAVE AREA

exitloop;
end;

!
!

[}

IF AN EMPTY SLOT FOUND,
if

. index geq

then

SAVE THE PACKET CONTENTS

begin
SAVE _ ADOR

= ELOG_

SAVE_ADOR [EL _CONTENTS

(.index

)

= FULL;

EP_LEN

2);

SAVE _ADDR (EIi
“CNTR} =

3192

DST_ADDR =

+ 2;

5194

incr COUNT from 1 to ((.IPKT_ADDR (MSGLEN] ¢+ 1) / 2) + 2 do

5191
1

5195
5196
5197
5198
5199
5200

5201

SRC_ADOR

.SAVE_ADDR

=
b

5190

a8
s
e
8
B2
9
BL
W
L
B0
B¢
ms
@t

3185

.ELOG_PKT [ .COUNT, EL_CONTENTS] eql EMPTY

then

B4
BT
B
@
Br
@
@
e
s

S175
5176
S177

S174

in
.DOST_ADDR = , . SRC_ADDR;
SRC_ADDR = .SRC_ADDR + 2,
DST_ADDR = ,DST_ADDR + 2;
end;

end

SEQ 0285

VAX 11 Bl.es 16 v3-555
Page 161
SPIDERSUSERS:
[DOUCETTE .FALCONICNRQAA .BL2 (52

IMPLICIT INPUTS:

begin

5161

novalue

10:35:57
11:35:15

THIS ROUTINE HANDLES ALL DATAGRAM (ERROR LOG) MESSAGES RECEIVED FROM

5158

5159

1983
1983

THE RODRX

LT T Y T T

5146
S147
5148
5149
5150
5151
5192

15 Dec
14 Dec

B¢

G+

NRQAM3
vol.C

COPY A WORD
UPDATE ADDRESS POINTERS

K14
RD “Rx EXERCISER
RDRX INTERRUPT SERVICE

NRGQAMA

vOl

else

5203
5204
5205
5206
5207
5208
5209
5210
5211
5212
5213
5214
5215
5216
3217
5218
3219
5220
5221
5222
5223
5224
5225
5226
5227
5228
3229
5230
3231
5232
5233
5234
5235
5236
5237

ROUTINES

begin

PRINTF (DBM110);

1983
1983

return;

B4
Vs
1
G
B
B3
Ve
B
e
G2
B
B¢
BE
B
B¢
BL
BE
BE
BT

5239
5240
5241
5242
5243
5244
5245
5246
S247
5248
5249
5250
5251
5252
5253
5254
5255
5256
5257

SEQ 0ims
VAX 11 Blies 16 v3 555
Page 162
SPIDERSUSERS
: [DOUCETTE .FALCONICNRQAA .BL2 (S2

10:35:57
11:35:15

IF EMPTY SLOT NOT FOUND,

PRINT MESSAGE

'JSD REV A

end;

CHECK IF

THE CORRESPONDING RESPONSE HAS ALREADY S8EFN RECEIVED

if (.SAVE_ADDR [EL _CRN LO) eql
(.SAVE _ADDR [ElL._CRN_HI] eql

then

.LAST_PKT
.LAST_PKT

{.ICTLR,
{,ICTLR,

LAST_CRN_LO])) end
LAST CRN HI])

begin
if

.LASY PKT

{.ICTLR,

LAST_HRD_ERR]

eql HRD_NOT _OCCURED

SOFT ERROR HAD OCCURED

then

.SAVE_ADDR

then

[EL_FORNAT]

lequ 4

SOFT_ERROR (. index);
TEMP_UNIT = _LS$LUN;
incr OFFSET from (O

!
!
«

UPDATE SOFT ERROR COUNT
SAVE UNIT NUMBER AS KNOWN TO DRS

OF _UN) to (3 & UNIT_SIZE

if (.ICST_ADDR [ .OFFSET,

D_DISK_NUM] eql

OF _UN) by UNIT_SIZE do

.SAVE_ADDR

(.ICST_ADDR [.OFFSET, D_PRES) eql PRESENT)

then

begin
LSLUN =

_ICST_ADOR (.OFFSET, D_UNIT);

cx;tlooos

[EL_DK_NUM]) and

CORRECT UNIT NUMBER FOR ERROR MESSACE

eng;

case .SAVE_ADDR (EL_FORMAT) from O to 4 of
set

Bé

O+

5202

15 Dec
14 Dec

(0} :

ERRSOFT (60, 0, 0);

! CONTROLLER ERROR

ERRSOFT (61, 0, 0);

! HOST MEMORY ACCESS ERROR

(21

ERRSOFT (62, 0, 0);

! DISK TRANSFER ERROR

(3)

ERRSOFT (63, 0, 0);

! SDI ERROR

(4] :

ERRSOFY (64, O, 0);

! SMALL DISK ERROR

tes;

LSLUN =

_TEMP_UNIT;

SFT_ERR_PRINTED = TRUE;

end

else
if not

PRINTF (DBM109,

.SAVE_ADDR [EL _FORMAT]);

(.SFT_ERR_PRINTED)

¢ RESTORE UNIT NUMBER
¢t

SOFT ERROR PRINTOUT OCCURED

! ERROR LOG FORMAT UNKNOWN

1JSD REV A

l
RD/RX EXERCISER
RDRX INTERRUPT SERVICE

15 Dec
14 Dec

ROUTINES

1983 10:35:57
1983 11:35:15

)

5258

PRINTB

5259
5260

EMS EL

5261

(. index);

022626

013716
012746

V3 555

EXTRA CARRIEGE RETURN/LINE -FEED

!
!

PRINT PACKET CONTENTS
CORRESPONDING RESPONSE RECEIVED

024236

000102
0000006
0000006

MOV8
MOVE
MOV
MOV
ADD

000001
000156°
0000006
000006

MOV
ADD
MOV

000002
000006

INC
MOV

000002
0000006
000002

S$:
6%:

000156’

JSR
ADD
CLR
B8R
MOV
INC
cHP
BLE
cHP
MOV
MOV

R1,013

NT
, INOEX
COU

@8
®s

R1.R5
34
R1

®s

(SP)+,(SP).
ELOG.PKT+1(RO)
24

2s:

JSR
cHP
7578
BNE
MOV
B8R
INC
cHe
BLE
TST
BGE
JMP
MOV
MOV
JSR
ADD
MOV

SFT.ERR.PRINTED
COUNT
, ¢
COUNT

14
RS
4%

19¢
RS, -(SP)

COUNT
COUNT
,»

5146
5158

S1/2
S174

5177
5176
5172

X
INDE

5185

INDEX,

5188

PC,BLSHUL

T
RO
#ELOG.PK

RO,R4

(PC),1(R4)
ICTLR,(R4)
IPKT ADOR,RO
6 ,R2

RO,R2
#2,R3
R4,R3

6(R0O),(SP)
(5P)

PC,BLS$DIV
#2,R0
Rl
64
(R2)+,(R3)

000013

MOV
MOV

(SP)

R1
R1,-(SP)
¢102, -(S5P)
PC,BLSMUL

0000016

CLRB
CLR

s, INDEX

000102
0000006

R1, $SAVES
#-1,R5

s ,SAVE .ADOR

s ,s(SAVE.ADDR)
+,SA
. VE
ADDR

1$:

JSR

MOV

$CODES,

DATAGM:

DATAGM RDRX INTERRUPT SERVICE ROUTINES

000000G
177777

.SBTTL
PSECT

004137
012705
105046
005001
010146
012746
004737
022626
105760
001002
010105
000405
005201
020127
003761
005705
002002
000137
010546
012746
004737
062700
010004
111764
113714
013700
012702
060002
012703
060403
016016
005216
012746
004737
062700
005001
000401
012223
005291
020100
003774

end;

023522
000000
000004
000010
000012
000014
000016
000022
000026
000030
000034
000036
000040
000042

SEQ 0OIA7

age 163
SPIDE
: [DOUCE
RS$US
TTE . FALCONICNRGAA
ERS
.BL2 (52

5262
5263
5264

(CRLF
);

VAX

»,SRC.ADOR
+,SRC.ADDR
+,DST.ADOR
. ADDR
SAVE . ADDR,DST

NRGAM3
vol.C

5189
5190
5191
5192
5194

COUNT
SRC.ADOR,DST.ADOR
COUNT
,»
COUNT

5196
5194
5187
5212

000202
000206
000210
000216

000220
000226
000230
000234
000236
000244
000,46
000c 30
000254
000260
000264
000266
000272

000276

000300

000304
000306
000310
000314
000316
000320
000322
000326.
000332

000334
000340
000344
000346
000350
000354
000356
000362
000364
000366
000370
000372
000374
000576
000400
000402

000406
000410
000412
000414
000416
000420
000422
000424
000426

000432

15 Dec
14 Dec

RD/RX EXERCISER

NRQAM
3
vOol1.C

RORX

004737
022626
026460
001136
026460
001132
005760

001123
126427
101105
010546
004737

013702
012700
010003
063703
016446

111301
042701
020126
001012
032713

001407
011301
000301
042701
010137
000405
062700
020027
003747
005000
156400
006300
066007
104457
000074
000000
000000
000423

INTERRUPT

SERVICE ROUTINES

JSR

0000006

000006

000172

000010

000174

cHP
cHe
BNE
cHP
B8NE

1S7
BNE
cHPB
BHI

000170’

000016

000004

MOV

000000V
0000006
000006

7%:

000106
000012

MOV
1ove

1771774

8IC
cHP
BNE
BIT
8EQ

040000

MOV
SWAB

177760

0000006

000012
000044

8s:
9¢:

000016
000012°

11¢:

104457
000075
000000
000000

12%:

104457

13%:

000416

000076
000000
000000
000411
104457
000077
000000
000000
000404
104457

JSR
MOV
MOV
MOV
ADD

14¢:

15¢:

8IC
MOV
B8R

ADD

cHP
8LE
CLR
8IS8
ASL
TRAP
.WORD
. WORD
. WORD
BR
TRAP

. WORD

. WORD
BR
TRAP

. WORD

. WORD
B8R
TRAP
. WORD
. WORD
. WORD
B8R
TRAP

1983
1983

10:3%:57
11:35:15

VAX

11 Bliss

Vv3-555

SEQ 0338

164

SPIDEROUSERS:[DOUCE!TE.FALCON]CNRQAA.S?E (Se

PC,BL MU

(SP)+,(SP)+
6(R4),LAST
. PKT+2(R0O)
19¢

10(R4),LAST .PKT+4(RO)

193
LAST
. PKT(RO)
18¢

,
16(R4)04
174

#(SAVE.ADOR),

&(SAVE.ADDR),s

5213
S217

;

¢(SAVE.ADDR),»

5220

RS, (SP)
PC,SOFT.ERROR
LSLUN,R2

;

INDEX,+

5223

RO,R3

;
;

;

o, TEMP UNIT
o, 0FFSET

OFFSET,e

5224
5226
5228

#(SAVE.ADDR),
s

46 ,RO

ICST.ADDR,R3
12(R4),-(SP)
(R3),RL

9177774
,R1
R1,(SP)+

5229

(R3),.R1

R1
9177760,R1
R1,LS$LUN
9
912,R0
RO, 044
74
RO

16(R4),RO

RO
P.AAB(PN)
,PC
57
74
0
0

5232

;
:

¢, 0OFFSET
OFFSET,s

¢(SAVE.ADDR),+

;

Case dispatch

5231
5226
5236

5239

164
57
75
0
0
164
57

5236
5241

164
S?

5230
5245

164
57

5236
5247

76
0
o
77
0
0

5236
5243

NL14

0004 34
0004 36
000440
000442
000446
000454
000456
000460
000464
000466
000472
000476
000500
000502
000504
000506
000512
000514
000516

;
©

000100
000000
000000
010237
112766
005726
000412
032716
001007
012746
012746
010600
104414
022626
010546

004737
005726
005726
000207

Rout ne S ze:

Maximum stack

0000006
000001
000002

16$:

000001

17$:

000014
000016

000020
000022

000012
000024

000036
000050

MOVB

100
0
0
R2,LSLUN
21,2(SP)

BR
8IT
BNE

e1,(SP)
18%

MOV
MOV
TRAP

¢1,-(SP)
SP,RO
14

MOV

0000006
000001

000000G

. WORD
. WORD
. WORD

TST

cHP

184

MOV

19¢:

TST
TST
RTS

JSR

$CODES
168 words,
Rout ine Base:
depth per invocation:
11 words

000012

15 Dec 1983 10:35:57
14-Dec-1983 11:35:15

RD/RX EXERCISER
RDRX INTERRUPT SERVICE ROUTINES

NRQAM3
gOl.O

P.AAB:
10¢:

ERR.PRINTED

s ,SFT.ERR.PRINTED

#CRLF, -(SP)

5230

3251
3222
3257
5259

SP,s

(SP)e,(SP).

s
INDEX,

PC,.EMS
. EL

(SP).
(SP)+
PC

5261
5215
5146

23522

$PLITS,

. WORD

. WORD
. WORD

TEMP ,UNIT, «

4,SFT

(SP).
18

.PSECT

. WORD
. WORD

SEQ 038y
VAX 11 8liss 16 V3 S55
Page
SPIDERSUSERS
: {DOUCE T TE .F ALCON JCNRQAA . BL 2

12
24
36
50

RO,

CASE Teble for DATAGM+0356

(114]
[12¢)
{138)]
(144])
(1S$)

5236

Iv. " »
L’ ST LA

D Ax EXERCISER

Dec 1983 10:35:%7
Dec 1983 11:%5:19

[ XX 1]

RONY

ei'd

L
»

NTERMPT SERVICE RO " INES

VAS 11 Bl we 16 4% N7
SPIOERS
SERS: [DOUCE T TE ¢ -

THIS AOUTINE UPDATES TrE SOFT ERROR COUNT

I Tv€

EAROR LOG MESSAF RECEIVED

TALlY

TARE FOR EACw

T2 X2 XY

routing SOF 1 ERAROR (INDEX) : novel.s *

INPUTS:
[CST ADOR

- ADDREL, OF

Te€

INTERRUPTING CONTROLLER S5 (ST

Lo X

IPLICIT

bogin

locel
FOUND: byte nitis]l (cyte (FALSE)),
SOF T _OCCURED : byte initiel ‘byte (FALSE)).
UN1T: word,
ERROR _CODE : byte,
ERROR _SUB : word,

TALLY ADDR

ref bDlock

[TALLY LEN,

word)

fielo (T _FIELDS),

€LOG_ADDR : ref block (EP _LEN. word] field (EP FIELDS);

ELOG_ADOR

¢« ELOG PXT

ERROR _CODE -

(.inden o EP_LEN o 2),;

.ELOG_ADOR (EL_COOE );

ERROR SUB » .ELOG_ADDR (EL _SUBCODE
);
incer OFFSET from (O o OF _UM) to (3 o UNIT SIZE

ADDRESS OF ERROR L

!
t

ERROR CODE
ERROR SUBCODE

OF UN) by UNIT SIZ2E do

- - e e 4.....-........‘....-6-....-__._....x...........

i? (.ICST_ADOR [.OFFSET, D_PRES) eal PRESENT) and
then

.ICST_ADOR (.OFFSET,

O_DISK _NUM) eal

MAP DISK NUMBER

.ELOG_ADDR (EL DK NM])

F"&'D:O * TRUE,
n

UNIT «

UNIT NUMDER OF DIS

_ICST ADDR (.OFF3ET, D _UNIY);

exitloop;

ond;

(.ELOG_ADDR

(EL_SUCCESS)) or

( .ELOG_ADOR

heon

3303

330!
5308
3309
3310
3311
3812
313
5314
ns
3316
5817
5318

S319

3320

(EL _CONTINUE))

SOFT_OCCURED -

SOFT ERROR FLAG

TRUE;

IF UNIT NUMBER FOU

.FOUND

then
begin

TALLY _ADOR

TALLY

(.UNIT

ADDRESS OF

TALLY_LEN ¢ 2);

TALLY

¢ FOR SOFT ERRORRS

i? .SOFT_OCCURED
then

selectoneu .ERROR_CODE of
oot

(ST_MFE):
(ST _DAT):

TALLY_ADDR (ERR_SFT_SEX] » . TALLY _ADDR (ERR _SFT SEX) . 1,
i? ERROR_SUB eal 2

then

TALLY _ADDR {ERR _SFT SEX)

!
=

_TALLY _ADOR [ERR _SFT DAT]

SOFT

MEDIA fORMA

SOFT

DATA

)

HD Rx ExERCISER
RDRx NTERRUPT SERVICE

L
NRQAM

else

9828
5524
3825
5826
3827
5520
3829
5330
5331
3882

B
B

TALLY

¢ SOF?Y

[.ICTLR, C ERR_SFT) + 1,
!

i¢ ERROR SUB eql 3

then

_TALLY _ADDR

[ERR_SFT SEx)

TALLY

_TALLY

[ERR

ADDR

[ERR SFT

SOFT

' SOFT

TALLY _ADOR [FRR SFT SEx]

(EL _CRN_LO)

eql 0)

( .ELOG_ADOR [EL _CRN _HI) eal 0)

selectoneu
set

DRV]

ADDR

SFT

DRV)

MOST aCCESS
- CONTROLLER

- DRIVE

end

.ERROR_CODE of

[ST_MFE):

TALLY_ADDR [ERR _MRD _SEK) = _TALLY_ADDR (ERR_HRO_SEX) « 1},

! HARD

MEDIA FORMA

(SY_DAT]):

é'fm.‘saaoa,sw eql 2

! HARD

DATA

!
elee

TALLY _ADDR (ERR _HRD SEK]

_TALLY_ADOR [ERR_MRD_SEK])

}

TALLY_ADDR [ERR_HRD DAT]

_TALLY_ADDR

¢+

[ERR_HRD_DAT)

[ST_HST):

TALLY_ADOR [ERR_MHRD_HST] = _TALLY_ADDR (ERR_MRD _HMST) . 1;

(ST.CNT):

C_ERR_TBL (.ICTLR, C_ERR_HRD) =

{ST_ORV]:

é'fm.‘emon_sw eql 3

tes

3361
5362
3363

¢
T DATY)

CERR TBL (.ICTIR, C ERR SFT) « _C ERR 'BL

(.ELOG_ADOR

then

5344
5345
3346
5347
3348
5349
53%0
3351
533?
3358
3354
5335
333%6
5337
5338
3339

[EQR

tes

else

53542

_TALL
Y ADDR

{ST _CnT):

5545

TALLY ADOR [ERR SFT 1ST) =« _TALLY ADDR [ERR SFT nST) « 1,

else

3539
3340
5341

[ERR SFT DAT)

SEQ O0%r]
vArY 11 81 ews 16 v3 4%
Page 14°
SPIOERS
ISERS (DOUCE ! TE .+ AU CONICNRIAR
B 2 %"

{ST_mS5T):

(ST DRY]:

3588
28%4
9339
5336
53587
3538

ADDR

1988 10:35:5?
1983 11:3%5:1%

TALLY ADDR

}

(ERR _HRD _SEK])

! HARD - MOST ACCLSS

,C_ERR_TBL [.ICTLR, C_ERR_MRD) . 1,
! HARD - CONTROLLER

! HARD - DRIVE
=

.TALLY_ADDR

(ERR_MRD_SEK)

.I“YALLV_ADDfi {ERR _MHRD DRV] = _TALLY_ADDR [ERR_HRD DRV) « 1,

end

Be Pm

ROTINES

521
5822

Bt B

vol

1% Dec
14 Oec

9363
3366
5%67
3368
5369
3370
337
3372
5373

elee

! UNIT NOT FOUND
i?

.SOFT_OCCURED

th-ERfl,TBL {.ICTLR, C_ERR_SFT) =« C ERR_TBL (.ICTLR, C_ERR_SFT) . 1
.1“C_ERR_TBL [.ICTLR, C_ERR_HRD) » .C_ERR_TBL [.ICTLR, C_ERR _HRO) . 1;
end;

! ROUTINE SOFT_ERROR

L.SBTTL

SOFT.ERROR RORX INTERRUPT SERVICE ROUTINES

NRJAME

vOol
)

ROKX

INTERRUPT

SERVICE ROUTINES
Pselt

02404
000000

004187

000004
000000
000010
000014
000020
000024

024646

105001
105066
016646
012746
004737
062700
010004
116400
042700

105002

016403
006203
006203
006203

006203

000074
000100
000102
000106
000112
000114
000120
000122
000126
000130
000132
000136
000140
000142
000146
000152
000154
000160
000164
000166
000174
000176
000200
000204
000210
000214
000220
000226
000230
000234
000236
000242
000244

1% Dec
14 Dec

EXERCISER

042703
012700
010005

063703
032715
001420
016446
111346
042716
022626
001011
112701

011546
000316
042716
012666

062700

020027

003745
1.2766

10314
0166.6
012746
004737
062700
032766
001453

0000006

CLR8
MOV
MOV
JSR
ADD

000020

~Ov8

177740

174000

1¢:

000106
040000

8EQ

MOV

MOVE
BIC
cwp
BNE

177774

000001

Move
MoV
SWAB
8IC

177760

000004

MOV

000012
000044
000001

000004
000070
0000006
0000006
000001

120227

000010
000064

MOV

MOV
ADO

817

000012

2%:
000006

ADD
e

BLE
HOVB

ROR

8cCc

000010

S 6%

: FOUND
31 SOF T _OCCURED
s+ INDEX,e

$27S

(sSP)

2(SP)
22(SP), -(SP)
9102, (SP)

MOV
MOV
JSR
ADD

#ELOG.PK
RO
T

;i
;

¢,ELOG.ADDR
¢(ELOG.ADDR),

;:
1
:
1
s+
;
s
+

ERROR.CODE
¢,ERROR.CODE
o(ELOG.ADDR),ERROR
. SUB
ERROR.SUB
ERROR.SUB
ERROR.SUB
ERROR.SUB
ERROR.SUB

#6,R0
RO,R5

&,OFFSET

OFFSET,e

12(R4), -(SP)
(RS),-(SP)
#177774,(SP)
(SP)+,(SP)s
24
*1,R1
(R3), -(5P)
(SP)
€177760,(SP)
(SP)s ,4(SP)
3¢

¢(ELOG.ADDR),»

5293

:
3

¢ ,FOUND

5296
%297

;
3
:

¢ ,UNIT

20(R4),RO

20(R4),R3

R3
R3
R3
R3
R3
#174000,R3

ICST.ADOR,RS
5:0000.(95)

#12,R0
RO, 844

#1,6(SP)
R1

174
4(SP),(SP)

817
8EQ

PC,BLIMA
OTALLY,RO
#1.10(SP)
9

8€EQ

¢, 0FFSET

OFFSET,e

5290

5292

5295
%290

i UNIT,»

$309

s+ ¢,S0FT.0CCURED

$311

cMP8

R2,010

MOV

#64 ,RY

5288

$304
5306

s+ ERROR.CODE
,»

BNE

5287

;s »,SOFT.O0CCURED
:+ FOUND

R2, &5

cHP8

5286

PC.BLSMA

0177740,R0
R2
RO,R2

8IC

000006

(SP),

8IC

ASR
ASR
ASR
ASR
ASR

.
SEQ 07
VAX 11 Blise 16 v3 555
Page (0TM
PIDERSUSERS: (DOUCETTE .F ALCONICNROAK ML ¢ «° 7

R1,$SAVES

RO,RA

MOV

10:35%:57
11:35:15

MOV

CLRB
8IS

000020

000005

001014
012701

JSR

ce
CLR8

000002
000022
000102
0000006
0000006

120227

001444

SOF 7 ERROR :

sCODEs,

1943
1983

ERROR.CODE,

53518

5316

S313

5320

Eth

000011

001006

013701
006301
103261
0004 75
120227
001072
020327
001003
105260
000464
105260
000461
005764
001056
005764
001053
120227
001443
120227
001013
012701
060001
020327
001002

000012

Ss:

000156

ASL

0000016

000013

64:

000003
7%:

8s:
9¢:

000010

105261

000432
120227
001003

105260

000424
120227
001006
013701
006301
105261
000413

000005

B8EQ
cHP8
BNE
MOV

000010

000060

cHP
BNE
INCB

000002

000001

10¢:

000011

11¢:

12¢:

000156

000013

020327
001003

000003

13¢:

TALL
. ADDRY
,

10¢
R4
1(R1), R4
R4
R4, (R1)
164
R2, 011
5%
67(RO)
168
R2,012
64

ERR
. CODE
OR
,»
i

¢(TALLY
. ADDR)

ICTLR,RL

SEQ 03%¢

169

%3518

3318
5313
5324
s313

3326

C.ERR. TBL+1(R1)

164
R2,#13
164
R3,e3
8

%555

5320

ERROR.COD
, E»

5313

ERROR.SUB,
¢

3329

64(RO)
16¢
66(RO)
16¢
6(RA)

«(TALLY.ADDR)

: s(TALLY.ADDR)
: +(ELOG.ADDR)

5331
5329
S333
3313
5337

10(R4)
164

«(ELOG.ADDR)

5338

ERROR.CODE
.,

ERROR.COOE,
»

5340
5343
5340

16¢

R2,45
144
R2,010
11
#60,R1
RO.R1
R3, 82
10¢
(R1)
16¢

1(R1)
164

R2,¢11

12¢
63(RO)
164

MOV

13¢
ICTLR,R1

crPe
BNE
cHP
BNE

R2,013

5347
ERROR.SUB,

ERROR.COD,E
»

#(TALLY.ADLR)
ERROR .CODE , »

R2,012

ASL

INCB

120227

001010

INCB

000063

000012

TST
BNE
15T

BNE

105211

000435

INCB
B8R
crHPg
BNE
cre
BNE
INCB
B8R
INCB

120227
001003
105260
000506
120227

005204
110411
000514

000001

PO,R1
R3, 82

SPIDGROUS(RS:[DOUCE‘TE.'flLCONlCNlQ‘A.;Es (33

156104

cHP
BNE
CLR
8Is8
INC
HOve
B8R
CHPE
BNE
INCB
8R
CcrMPB
BNE
MOV

Bl.ss

000002

000362
000366
000370
000374
000376

ADD

000300
000302
000306
000310
000314
000316
000322
000324
000330
000332
000336
000240
000344
000346
000352
000354
000360

060001
020327
001065
005004

ROU!INES

1983 10:3%:57
1983 11:35:15

00028
0002<2
000256
000260
000262
000266
000270
000272
000274

15 Dec
14 Dec

RD/'Rx EXERCISER
RORX INTERRUPT SERVICE

NRQAM
3
v0l.¢

5351
5340

5340

164

15¢

5347
9345
5349
5340

5353

C.ERR, TBL(R1)
164

5345

ERROR.SuUB,
s

5356

F15

000552
000556
000560
000562
000566

105260
000401
105210
062706
000207

000156

15¢:

16%:

17%:

0000006
000001
000006

000001

000010

18%;
19¢:

(SP).

INCS

62(RO}

B8R
MOV

194
ICTLR,RO

ASL
ADD
817
BEQ

RO
#C.ERR.TBL,RO
21,6(SP)
18¢

RTS

INCB
B8R
INCB
ADD

5374
S375
5376
5377

. 24242

end
eludom

0TS external references
.GLOBL
$SAVES, $SAVEA, $SAVE3,
.GLOBL
BLS$SHF, BLSDIV, BL$MOD,
;

.
.

$SAVE?
BLSMUL

PSECT SUMMARY

Psect Name
$GGGs
$COOE ¢
PLITS

Wordse
343
5389

Attributes
RO,
I
RO,
I

RO,

,
,

LCL,
LCL,

REL,
REL,

LCL,

REL,

CON
CON

CON

LIBRARY STATISTICS

P Symbols -------:

File

SPIDERSUSERS:[DOUCETTE.FALCONICNRGAA.L16;:7

Totel

Loaded

Percent

457

360

Blocks

Read

119

COMMAND QUALIFIERS
H

s(TALLY ADOR)
o( TALL Y. ADDR)

BLISS /PDP11 CNRQAA.BL2/LIST=CNRQAA,.LI2/0BJECT=CNRGAA.0B2/SOURCE =PAGE : 56

$358
5356

5360

5308
5306
5369

+,S0F T . OCCURED

1(RO)
19¢
(RO)
010,5f

; Routing Size:
188 words,
Routine Base:
$CODES
; Maximum steck depth per invocstion:
12 words
1
:
:
:

006300
062700
032766
001403

000415
013700

000062

60(R0O)
168

B¢

000534
000536
000542
000550

000526
000530

105260

INCB
BR

®0

005726

14%:

000524

000520

000060

14 Dec 1983 11:35:15

®s

10520
00C .02

SERVICE ROUTINES

SEQ 04

VAX 11 Bl .ss 16 v3 <55
Pege 1170
SPIDERSU
[DOUCETTE ,FALCONICNR
SERS
QAA .BL2
: (53

000512
000516

INTERRUPT

10:35:57

RORX

)

1983

vO01.C

15 Dec

RD/Rx EXERCISER

NRQAM3

%367
5369
5367
5371
5265

GLIS
UNPEL
B!

RD/RX EXERCISER
RDAX TNTERRUPT SERVICE

2%;8

module NRQAMA (

5380

stitle

5381

ident

beg:.n

gigg

sebttl

sggo

librery

Z::Z

require 'BLSMAC.REQ’;

5391

1
6882
6883

6884

6885
P 6886
P 6887
P 6888

voOD

'CNRQAA.L16';

BONSETUP (3)
BGNPTAB

ENDPTAB

6890
6891

BGNPTAB

6894

ENDPTAB

6896
6897

BGNPTAB

6899

ENDPTAB

6895
6898

INIT_IP_ADDR,
! IP,

INIT_INTR_VECT, INIT_BR_LEVEL, #0°'100034', O, RD_MAX_LBN
VECTOR, BR, DISK ADDR, START BLOCK, END BLOCK

INIT_IP_ADOR, INIT_INTR_VECT, INIT BR_LEVEL, %0°100001‘', O, RX_MAX_LBN
' IP, VECTOR, BR, DISK ADDR, START BLOCK, END BLOCK

INIT_IP_ADDR, INIT_INTR_VECT, INIT BR_LEVEL, %o’'100002', O, RX_MAX_LBN
¢

IP,

VECTOR,

.ENABL

.PSECT

000000

000064

BLSLAS::.WORD

000004

000030

P.ARAR:

000010

176150

000006

000012
000014

000016

000020
000022
000024

000026

000006

000154

ARB:

000004

100034

000000
052137
000054

000006

BR,

DISK ADDR,

START BLOCK,

END BLOCK

ENOSETUP

.TITLE
.IDENT

000000

DIAGNOSTIC SUPERVISOR LIBRARY

LASTAD

6892
6893

vVvVo

'V01.2',

'LASTAD AND SETUP’

6889

6900
6901

SEQ 4,
VAX-11 Blies-16 V3-55%
Peoge 172
SPIDERSUSERS:
(DOUCETTE .FALCONICNROAA . BL2 (%4

) =

5385
5386

5387

10:35:57
11:35:15

environment (noeis)

5384

1933
1983

addressing mode (absoliute.,

5383

ROUTINES

'RD/RX EXERCISER’

5382

15 Dec
14 Dec

.MORD

AMA

eXVZ$,

T4FREE

<<TH$FREE-<BLSLARS+4>>/2>

.WORD

LSLAST.24

.WORD

-1630

.WORD

. WORD

6
4

.WMORD
.WORD
.WORD

O
52137
LSLAST+50

.WORD

;

Plit count word

154

.WORD

. WORD

P.AARC:

NRQAMA RD/RX EXERCISER
/VOl1.2/

-77744

Plit count word

= 1:_)

000030

000032
000034
000036
000040

000044
000046
000050
000052
000054
000060
000062
000064

176150
000154

P.AAD:

000004

P.ARE:
P.AAF:

000154

000004
100002
000000

000030°

SREM3=

000207

S$END.LINK: :

Routine Size:

1 word,
Max imum stack depth per

®a

$REM2~

1437
0

P.AAC

P .RAF

.SBTTL

S$END.LINK LASTAD AND SETUP

RTS

;

+ 0066

Words
28

Attributes
RO,
I
,

LCL,

REL,

CON

LIBRARY STATISTICS

--------

Loaded

Percent

457

Blocks

Reac

®e

Symbols -------

Total

SPIDERSUSERS: [DOUCETTE .FALCONICNRQAA
.L
16;7

BLISS
.
;i
.

Memory

Used:

COMMAND QUAL
IF IERS
/PDP11 CNRQAA.BL2/LIST=CNRQAA.LI2/08.JECT=CNRQAR.0B82/SOURCE=PAGE
: 56

Size:
Run Time:
Elapsed Time:

5390 code ¢+
03:11.7
10:10.4

411

peges

Com'{n tion Complete

380 data words

word

BLS$LAS+4
3
P.ARA
P.ARB

PSECT SUMMARY

File

count

77776

ar
®e

®r

Psect Name
$XYZ$

Plit

P.AARE

Routine Bese:
$XYZ$
invocation:
O words

eludom

SEQ O,
P
173

SPIDEROUSERS:(DOUCE”E.FN.COC)CMQAA.Q; (%4

;

end

6904

v3-555

P.AAD

$SLASL-

000050°

154

SLAS3=

000044

6902
6903

17717
O
1437
O
6
1630

.WORD

. WORD
T$FREE: : .WORD
LSLAST =
T$PTHY ==
$LASASREMA =

11 Bliess

. WORD
.WORD
. WORD
.WORD
.WORD
_WORD

001437
000000
000004
000003
00NO04
002010’

VAX

1630
154

.WORD
. WORD
.WORD

00V024

000000

.WORD
. WORD

.WORD

100001
000000
001437
000000
000006
176150

1983 10:35:57
1983 11:35:15

15 Dec
14 Dec

RD/RX EXERCISER
LASTAD AND SETUP

NRQAM4
vOol..

6880

[

T T

The following cnanges were made

FALCON-PLUS project

Ch A

G
W
B¢
Ve
W
Ve
We
We
GF
G5
&
G¢
Bs
W
@e
@4
Be
We
B2
Bs
Ws
BF
@i
@c
B
@
B¢
ms
B4
e
B
&
e

0010
0011
0012
0013
0014
0015
0016

0017

0018
0019
0020
0021
0022
0023
0024
0025
0026
0027
0028
0ne9
0030
0031
0032
0033
0034
0035
0036
0037
0038
0039
0040

0041
0042

0043

SEQ U2/
VAX-11 Blies 16 v3-555
P
1
LPIDERSUSERS
: ([DOUCEYTF .FALCONICNROAA
HEQ 71,

10:24:28
11:11:10

vV A,

to CZRQAB

11/21+).

Doucette.

Release

in producing CNRQAA for
date December

19,

All changes are marked by

1984,

the

Lowered the YOMP.I operating priority of the progrem from level
ct)grlevc
6 to allow the BREAK key to interrupt and invoke

Set the ODT BREAK vector (location 140) to the starting address
of FALCON's ODT ROM (170000-0ctal).

Due to space limitations,
messeges
).

Changed the defasult

removed all references to DBM'es (debug

IP eddress

from

172150 to

176150.

8880800408808 880848088008888808088888800888884088080080800800080000880045808080804
-

LITERALS

s
.

1008280808888 08880800088800880880008004880880888080880800800888000805008048080088500042
e

LITERAL
1]

tesssss ODT

TRAP VECTOR LOCATION

0_TVEC
0_TVEC
0_8RK

- #o'14’,
* do’' 140,
= #o'170000’ ,

'JSO REV A
1JSD REV A
1JSD REV A - ODT START ADDRESS

tesssss HARDWARE ADDRESSES ETC.
!

INIT_INTR_VECT

= so'l134’,

INIT BR_LEVEL

= so’'4’,

! BUS REQUEST LEVEL

INIT_IP_ADDR
INIT _IP_ADDR

= wo'172150',
s %0'176150',

VECTOR ADORESS

! IP REGISTER ADDRESS
! IP REGISTER ADDRESS

'JSD REV A
tJSD REV A

tesssss HARDWARE LIMITS
H

dupround

= 10,

! number of dbn's read per dup exerciser pass.

HMAX_CTLR

=1,

¢ MAXIMUM NUMBER OF LCP CONTROLLERS ALLOWED

0045
0046

(SBC

;Enode by Jemes S.

“1J

[N XY WY WE WY WY WL R WY WY Ny R

0007

0005

1983
1983

REVISION HISTORY

A A

0001
0002
0003

15 Dec
14 Dec

0048
0049
0050
0051
0052
0053
0054
0055
0056

MAX_DRIVES
MAX_UNITS

- 4,
* MAX_CTLR ¢ max_drives,

! MAXIMUM NUMBER OF UNITS TO TEST

RD _MAX_ TRACK

= 1200,

RD_MAX_SECT
RD_MAX_LEBN

» RD_SEC_PER_TRX - 1,
! LARGEST SECTOR NUMBER IN ROS1
= RD_MAX_TRACK & RD_SEC_PER_TRK - 1, !MAX LBN FOR RD

RD_SEC_PER_TRx

18,

t MAXIMUM NUMBER OF TRACKS FOR RDS1
¢

NUMBER OF MOST SECTORS PER TRACK FOR RDS1

J1I5
15

Dec-1983

14 -Dec-1983

0061
0062

RX _MAX_TRACK
RX_SEC_PER_TRK
RX_MAX_SECT
RX_MAX_LBN

80,

MAX _TRACK

RD_MAX_TRACK,

MAX_SECT

RD_SEC_PER_TRK,

RX_SEQ_CNT
RO _SEQ_CNT

(RX_MAX_LBN «
(RD_MAX_LBN +

BYTES_PER_SECT

10,
RX_SEC_PER_TRK
RX _MAX_TRACK

0067
0068
0069
0070
0071
0072
0073
0074

0075
0076
0077
0078

MAX_XFER_SIZE

1)
1)

7/ 10,
/ 10,

+ 'BYTES_PER_SECT,

SEO LR
agc

11 Blies-16 v3-555

TRACKS FOR RX50

!MAX LBN FOR RX

MAX_TRACK IS THE MAX OF RD_- AND RX_MAX_TRACK
IT TURNS OUT TO BE RD_... BECAUSE RD IS A WINCHESTER
AS OPPOSED TO A FLOPPY, AND HAS MORE TRACKS
MAXIMUM NUMBER OF SECTORS

!
!

NUMBER IS INCREMENTAL DIFFERENTIAL FOR ADDITIONAL RX UNIS
NUMBER OF OPERATIONS TO DO TO RX50 IN A ROW FOR SEQUENTIAL MOOE

NUMBER OF OPERATIONS TO DO TO RDS1 IN A ROM FOR SEQUENTIAL MODE

BYTES PER SECTOR (AT PRESENT SAME FOR RDs AND RXs)
ARTBITRARY

MAX

SIZE OF

EACH DISK

I/0

]

1esssse

RING SIZES

[}

CR_LOG
RR_LOG

0079

CRING_LEN

RRING_LEN

! LOG2 LENGTH OF COMMAND RING
! LOG2 LENGTH OF RESPONSE RING
! COMMAND RING LENGTH
! RESPONSE RING LENGTH

+ CR_LOG,

[}

IY Y YY)

TABLE AND OTHER STRUCTURE SIZES
HPT_LEN
COMM_LEN

6,
(RRI'G LEN « 2)

LAST _PKT_LEN
OFFSETS!?
OF _UN

UNIT_SIZE
CST_LEN

S,
!
OF _UN « 4 » UNIT_SIZE,

TALLY_CLEAR
TALLY_TOTALS
TALLY_LEN

21,

RP_LEN

24,

! S1ZE (WORDS) OF A RETURN PACKET

30,

' SIZE (WORDS) OF AN MSCP MESSAGE ( TEXT PORTION)

16,

¢ SIZE (WORDS) OF THE RANDOM NUMBER TABLE

]

! SIZE (WORDS) OF HW P-TABLE
» (CRIMS LEN « 2) + 4,
SIZE (MORDS) OF COMMUNICATION AREA FOR ONE CONTROLLER

LENGTH OF BUFFER TO SAVE INFO.

ABOUT LAST RESPONSE PACKET

WORD OFFSET FROM START OF CST TO FIRST UNIT

SIZE OF CST UNIT ENTRY
t SIZE (WORDS) OF A CONTROLLER STATUS TABLE

fessesss

0100
0101
0102
0103
0104

0105
0106
0107
0108
0109
0110
o111
0112

C_ERR_LEN

I00Q_LEN
MSG_LEN

pkt_LEN
OCT_LEN
ROM_LEN
RP_CNT
MAX _UDP _CNT
MAX_BUF _CNT

pkt _CNT
OUTC_CNTY

TALLY_CLEAR

!
«

SIZE (WORDS) OF STATISTICS TABLE CLEARED ON EVERY PASS!?

SIZE (WORDS) OF STATISTICS TARLE FOR STORING TOTALS!t

TALLY_ TOTALS.

HAX _CTLR s RRING_LEN,

SIZE (WORDS) UF A STATISTICS TABLE

SIZE (WORDS) OF CONTROLLER ERROR TABLE

MAX_CTLR & (RRING_LEN 7 2)

MSG_LEN « 4,
9,

!
¢

+ 2,

SPIDERSUSERS: (DOUCETTE .FALCONICNRQAR .REQ (1)

NOTE BOTH OF THESE NUMBERS ARE NOW ARBITRARILY CHOSEN AS THE NUMBER OF LBNS CONTAINED PER UNIT/10

B¢

G¢

O+

0065

VAX

NUMBER OF HOST SECTORS PER TRACK FOR RXS0
LARGEST SECTOR NUMBER IN RXS0

RX_SEC_PER_TRK

0063

11:11:10

MAXIMUM NUMBER OF

!
!

"> s s s

0057
0058
0059

10:24:28

NUMBER OF ENTRIES IN I/O DONE QUEUE (100G)

SIZE (WORDS) OF AN MSCP ENVELOPE
SIZE (WORDS) OF A ORIVER CONTROLLER TABLE

! NUMBER OF RETURN PACKETS IN POOL
MAX SIZE OF USER DATA PATTERN
(CRIMS LEN & 2) & MAX CTLR
! MAXIMUM NUMBER OF I/0 BUFFERS (SIZE OF BUFF _ADDR AND BUFF _OWN)

(CCRING_LEN s 2) + RRING_LEN) s MAX_CTLR,
! NUMBER OF MSCP ENVELOPES IN POOL
CRING_LEN » 2,
! NUMBER 07 ENTRIES IN A CONTROLLER'S OUTSTANDING CMD LIST

IKLS

0113

0114
0115
0116
0117
o118
0119
0120
0121

8%:;

G
B
B
B4
@

142
0143

= PKT_LEN

2+«

NUMBER OF PRE-DEFINED DATA PATTERNS

DIAGNOSTIC TRACE

3,
' NUMBER OF ERROR LOG PACKET SAVE BUFFERS
t LENGTH OF EACH ERROR-LOG SAVE BUFFER

SWF TRC

= o',

=
=
=
=
s
=
=
=

SWF _SEQ
SWF _DUP
SWF _FER

#wo'2',
#o'4’,
%0'10',
%0’'20',
%0'40',
4o’'100’,
%0'200,
#0'400',

= %o’'1000',
= %9'2000',
= %0'4000’',

SWF _HOE

= #o’' 10000,

!
'
'
!
!
!
!
!

RANDOM SEEK MODE
READ-COMPARE AT CONTROLLER
DRIVE COMPLEMENT COMPLETE
WRITE-COMPARE AT CONTROLLER
WRITE-COMPARE AT HOST
USER-DEFINED CATA PATTERN
CLEAR STATISTICAL TABLES
DIAGNOSTIC PACKAGE, WHEN THIS IS SELECTED

ALL INTERRUPTS ARE WAITED FOR, E.G. ONLY

ONE MSCP PACKETY IS OUTSTANDING AT A TIME

TREAT ALL ERRORS ALIKE FOR ‘HOE*

! RANDOM OR FIXED SEQUENTIAL STEPPING
! RUN DUP DIAGNOSTIC
! REWRITE BLOCKS WHEN "FORCED ERROR” BIT DETECTED

¢
! DUP FLAGS FOR DUP EXERCISER (DUP_FLAGS)

[]

SWF _DUP

= o'l

SWP _DINT

= #o0'2',

¢
!ssssse ENTRY_REASON VALUES

! RUN DUP DIAGNOSTIC

t DUP CRUSED REININITIALIZATION

(HOW PROGRAM WAS INVOKED)

[]

0145
0147
0148

START
RESTART
CONY

s 1,
- 2,
= 3,

1
!
!

START
RESTART
CONTINUE

0150
015y
0152

NEW_PASS

=5,

NEW PASS

0149

8%3‘3

SEQ 639y
VAX 11 Blies-16 v3-555
Page
z
SPIDERSUSERS: [DOUCETTE .FALCONJCNRQAA. DtQ vl.

PUWR_FAIL

= 4,

¢
!'sssese DROP UNIT REASONS

¢t POWER FAIL

(LOADED INTO DUR VECTOR)

0140

8141

EP_LEN

SWF _ROM
SWF _CRC
SWF _DCC
SWF _CuWC
SWF _HWC
SWF _UDP
SWF _CST
SWF _DIA

Olgz

0137
8{;8

21,

= MAX CTLR s RRING LEN «

10:24:28
11:11:10

‘teseese 5W P-TABLE FLAGS (SWP_FLAGS)

0131

1983
1983

0130

0132
0133
0134

OP _CNY

EP_CNT

0122
0123
0124
012%
0126
0127
0128
0129

B¢

B+

G¢

B¢

15 Dec
14 Dec

015S

DU_USER

0159

DU_HERR

0161
0162
0163
0164
0165

OU_CFATAL
OU_ONL INE
OU_ACCESS
DU_PROTECT
OU_TIME

0156
0157
0158

0160

016?

016

0168

= 0,

¢t USER COMMAND

DU _CONF
OU_INIT
DU_XFER

=1,
= 2,
= 3,

¢ CONFIGURATION ERROR
¢ INITIALIZATION EQROR
t TRANSFER LIMIT REACHED

OU_DFATAL

=5,

! UNRECOVERABLE DEVICE ERROR

DU_AV

= 4,

=
s
=
=
=
=

6,
7,
8,
9,
10,
11,

!ssssss MISCELLANEOUS LITERALS

¢t WARD ERROR LIMIT REACHED

!
!
!
!
¢t
!

UNRECOVERABLE CONTROLLER ERROR
ONLINE FAILED
ACCESS TO LAST TRACK FAILED
WRITE PROTECT CONFLICT
COMMAND TIME OUT
DEVICE WENT TO AVAILABLE STATE

DRS FLAG

L15

®e

B¢

®we

®mowr

B¢

15 Dec
14-Dec
0169
0170
o171
0172
0173
0174
0175
0176
0177
0178
0179
0180
0181
0182
0183
0184
0185
0186

0187
0188
0189
0190
0191
0192
0193
019
0195
0196
0197
0198
0199
0200
0201
0202
0203
0204
0205
0206
0207
0208
0209
0210
0211
0212
0213
0214
0215
0216
0217
0218
0219
0220
0221
0222
0223
0224

INI_ATT
WR_RING

= 2,
((%0'200') or (CR LOG

QIO_PER_CTLR

= CRING_LEN + 2,

RXS50_BIT

= %0'0',

MAX_XFER

RDS1_BIT
RX_S0
RO_51

= 256,

= #0'4’',
= 0,
=1,

1983
1983

10:24:28
11:11:10

SEQ 040G
VAX 11 Biiss-16 V3 555
P
4
SPIDERSUSERS:
[DOUCETTE .FALCONICNRQAR
.REQ (1)

NUMBER OF HW INIT ATTEMPTS BEFORE FAILURE
3) or (RR_LOG)),
WR-BIT-AND-RING-LENGTH BYTE (USED IN STEP

H
1]

= #o’' 100000’ ,
= o' 040000’
,

MSCP COMMAND PACKET

0P _MSK

MAXIMUM SIZE (WORDS) OF AN I/0 TRANSFER

BIT IN HARDWARE TABLES MARKING AN RXS0

!
!
¢

BIT IN HARDWARE TABLES MARKING AN RDS1
NUMBER FOR RX_SO WHEN SHIFTED RIGHT
NUMBER FOR RX_S0 WHEN SHIFTED RIGHT

= %o'177',

=
=
=
=
*»

OP_GDS
oP_ESP
oP_ELP

= %0'1',
= %0'2',
= #0'3’,

0P _RCO
OP _ABP

= 0’5,
= 80°'6°,

oP _WRT

oP_sSDO

#o'200',
#0'20',
so'1l’,
so’'4l’,
%o'4’,

= #0'42',

= u0'4’,

SZ_ACC = sdecimal
SZ_ONL = sidecimal
SZ_RD
sdecimel
SZ_SCC = sdecimel
SZ_WRT = ddecimal

sidecimal

!
!

OWNERSHIP BIT
FLAG BIT

OPCODES

OP_END
0P _ACC
OP _ONL
0P _RD
oP_sCC

! OPCODE MASK

¢
!
¢
¢
!

ENDCODE DESIGNATOR
ACCESS COMMAND
ONLINE COMMAND
READ COMMAND
SET CONTROLLER CHARACTERISTICS COMMAND

! WRITE COMMAND

! GET DUST STATUS!¢t
! EXECUTE SUPPLIED PROGRAM
¢ EXECUTE LOCAL PROGRAM

! SEND DATA
!
!

RECEIVE DATA
ABORT PROGRAM

'32',
'36',
'32’,
‘32',

'ACCESS
'ON LINE COMMAND
tREAD
!1SET CONTROLLER CHARACTERISTICS

‘32,

!GENERAL PACKET SIZE

‘'32',

SDECIMAL '28°,
sOECIMAL ‘28°,
SDECIMAL ‘18',

WRITE

sDECIMAL '12’',
SZ_GDS = #DECIMAL '12',
MSCP COMMAND MODIFIERS

MO _CHP

= #o'40000’,

COMPARE

CONNECTION ID VALUES (MSCP_pkt, RETPKT)
(SERVE AS SOURCES AND DESTINATIONS OF MSCP MESSAGES)

CID_MSCP

CIDO_TAPE

=0,

=1,

ASSUMED

1 WRITE

MAXTMUM NUMBER OF OUTSTANDING QIOS PER CONTROLLER

MSCP ENVELOPE DESCRIPTOR

€D _OWN
ED_FLAG

¢ DISK MSCP

TAPE MSCP

AND STEP 2 READ)

M5
15 Dec
14 Dec

®e

®c

®s

G¢

02e2¢
0226
0227
0228
G229
0230
0231

0232
0233
0234
0235
0236
0237
0238
0239
0240
0241
0242
0243
0244
0245
0246
0247
0248
0249
0250
0251
0252
0253
0254
0255
0256
0257
0258
0259
0260
0261
0262
0263
0264
0265
0266
0267
0268
0269
0270
0271
0272
0273
0274
02715
0276
0277
0278
0279
0280

CID_DUF
CID_ORIVER
I EYYY YV

MESSAGE

= 2,
= 3,

!
!

1983
1983

10:24:28
11:11:10

DIAGNOSTIC AND UTILITIES PROTOCOL
EXERCISER “DRIVER"

TYPE VALUES

]

MT_SEQ

=0,

SEQUENTIAL

(FROM PORT)

M7 _DG
MY _CRD

=1,
= 2,

!
!

DATAGRAM (FROM PORT)
CREDIT NOTIFICATION (FROM PORT)

MT_BLKDATX

=5,

BLOCK DATA TRANSFER (DUP FROM PORT)!¢t

MT_FATAL
MT_TIMEOUT

= 3,
= 4,

!
¢

FATAL DEVICE ERROR (FROM “DRIVER")
COMMAND TIMEOUT (FROM "DRIVER")

180080

!
!

lassses

!
H

1es68se
[]

CONTROLLER FLAGS
C(IN SET CONTROLLER CHARACTERISTICS COMMAND AND RESPONSE)

CF_ATN
CF _MSC
CF_OTH
CF_THS
CF _MASK
CF _MASK

C(IN ONLINE COMMAND AND RESPONSE)

UF _WPH
UF _WPS

= #o'020000'
,
= #io’' 010000’ ,

! WRITE PROTECT (HARDWARE)
! WRITE PROTECT (softWARE)

STATUS / EVENT CODE DEFINITIONS
ST_SUC
ST_CMD

s %0'0’,
= %o'l’,

!
¢

SUCCESS
INVALID COMMAND

SY_OFL
ST_AVL
ST_MFE

= #%0’'3’,
= go'4’,
= %0’'5’,

!
!
!

UNIT OFFLINE
DRIVE AVAILABLE
MEDIA FORMAT ERROR

ST_WPT
ST_CHP
ST_DAT
ST_HST
ST_CNT
ST_DRV
ST_DIA
[}

#o' 000200,
* ENABLE ATTENTION MESSAGES
#0'000100',
! ENABLE MISCELLANEQUS ERROR LOG MESSAGES
#0' 000040’ ,
! ENABLE OTHER HOST'S ERROR LOG MESSAGES
so’ 000020,
! ENABLE THIS HOST’'S ERROR LOG MESSAGES
CF_ATN « CF_MSC ¢ CF_THS,
CF_MSC or CF_THS,
! RELEVENT BITS IN CTLR FLAGS WORD

UNIT FLAGS

ST_ABO

I E XTI YT Y

=
=
=
=
=
=

= #o'2’,

=
=
=
=
=
=
=

%0'6’,
wo'7’,
%0'10',
so'1ll’,
s#o'l12’,
#o'13',
#o'37',

! COMMAND ABORTED

!
!
*
!
!
!
'

WRITE PROYECTED
COMPARE ERROR
DATA ERROR
HOST BUFFER ACCESS ERROR
CONTROLLER ERROR
DRIVE ERROR
MESSAGE FROM INTERNAL DIAGNOSTICS

END MESSAGE FLAGS

EF _BBR
EF_O
EF 1

= #0'200°',
= #o’'200',
= #0'100',

EF 2
EF_3
EF_4
EF_S
EF .6

=
=
=
=
=

#%o'40',
go'20',
#o'200',
o’ 100',
#o‘'40',

EF_8

o' 100000’
,

EF_.?

= #0'20',

! BAD BLOCK REPORTED
! BAD BLOCK REPORTED
!
!
'
!
!
!

SEQ 04cC1

VAX 11 Bl.ss 16 v3 S55
Page
S
SPIDERS$USERS:
(DOUCETTE .FALCONICNRQAR .REQ (1)

NLS

0281
0282
0283

s #o’' 200’ ,

= #o'2',
= %o’ 100000’ ,
s #o'40000’',

0288

EF_16

s #o0'4000',

0287

EF _15

0289

EF_17

0290
0291
0292
0293

0294

EF_18
EF_19
EF_20
EF _21

= #o'10000’,
s go'4’,

!ssssee RORX LITERALS
!
RCIP
RCSA

8“390

0299
1

0302

0312
0313
0314
031S

0316

gg{;

0319
0320

ggé

H
H
'
H

'
'
!

¢
!

IP REGISTER
SA REGISTER

STEP 1 STATUS BIT

= %0' 004000,

SA_S3
SA_S4
SA_ERR
SA_INT

=
=
=
=

!
:
3
'
vV 4
! ERROR INDICATOR
! INTERRUPT ENABLE DURING INITIALIZATION

= #o'010000',

SA_GO

]

JEQ OAue

VAX 11 Bl.ess 16 V3 555
P
(3
SPIDERSUSERS
: ([DOUCETTE .FALCONICNRQAA
REQ (1)

SA_S1

SA_S2

0304
0305
0306
0307
83}2

s 0,
=1,

10:24:28
11:11:10

COMMON SA REGISTER BIT DEFINITIONS

0303

gggg

#0'2000°',

s #0'100',
= #o' 20000,

0295
0296
0297
0298

Be
e
e
S
Be
Ge
S5

!
'
!

EF_12
€EF_13
EF_14

Be
W2
B

= wo'2',
= go'l’,
= #o'l’,

1983
1983

#o' 020000’ ,
#o' 040000’ ,
¢o’' 100000’ ,
go’' 000200’ ,

= #o'000001°',

! GO BIT TO START FIRMWARE

INITIALIZATION STEP READ MASKS

S1_MASK
S2 _MASK
S3_MASK
S4 _MASK

tessses COMMAND
!

=
=
=
=

#0’'176000',
4o’ 174377,
#o'174377',
#0'174000°,

!
H
!
'

STEP
:
:
vV

1 READ BITS
2
3
4

'
!

IMMEDIATE COMMAND
SEQUENTIAL COMMAND

TYPES

I_CMOD
SEQ_CMD

NON_SEQ_CMD

1esesss

ERROR-LOG FORMAT

= 0,
=1,

- 2,

! NON-SEQUENTIAL COMMAND

833%2

B
Be
Be
Be
B
Be

B+

0325
0326
0327
0328
gggg
gggg

B
=
%
e
®

TYPES

’

S+

EF_9
EF_10
EF_11

0284
0285
0286

®e

15 Dec
14 Dec

[}

s
=
=
=
=

%0'0’,
wo'l’,
%o'2',
g3,
w'4’,

tessess ERROR-LOG BLOCK NUMBER
,

0333
gggg
0336

FORMAT _CNTR
FORMAY _HOST
FORMAT _XFER
FORMAY _SDI
FORMATY _SDE

TYPE _LBN
TYPE _RBN
!

! CONTROLLER ERROR
! HOST MEMORY ACCESS ERROK
¢ DISK TRANSFER ERROR
* *STANDARD DISK INTECONNECT
! SMALL DISK ERROR

INFORMATION

= #o' 0000,
= #0'0110',

!
!

LOGICAL BLOCK NUMBER
REPLACEMENT BLOCK NUMBER

ERR

t‘..

1% Dec
:4 Oec
. 887

0348

0889
0840
0341
0?2
03483
0344

CJTERA

1AUE

FALSE
SUCCE $5
FAILURE

0347

ac1ive

0154

0833
033%6
03%7
0358
0%%9

PR REAOABL.
D"

€5

F OUND

0349
03%
391
03%2
0333

VAX 1] Bl.ee 16 v3 355
SPIOERS JSERS: (DOUCE T TE ¢ ~

0345

0348

19483 10:44:20
1903 11:11:10

NOT FOUND
I0LE

0ISX
10ISK
10ISK
10ISK

NOT PRE SENT

UNPROTECTED
PROTECTED

ONL INE
OFFLINE
FULL
(1, 2K}
HRD _OCCURED

HRO “NOT _OCCURED
ALL _ONES

IS PRESENT IN CONTROLLER
IS NOT PRESENT IN CONTROLLER
MAS UNPROTECTED CUSTOMER LBN' S
MAS PROTECTED CUSTOMER LBN S

ERROR-LOG SAVE PACKETY FILLED
ERRON -LOG SAVE PACKEY PRINTED
HARD ERROR DETECTED IN RESPONSE PACKEY

so' 177777

MARD ERROR NOT DETECTED

A Vi

1% Dec
14 Dec

1943
1968

10:c4:08
11:11:10

vAx

CPIDERS

e 1l&

o3 S

CERS:(DOUCH
' T8

,.0........‘........‘..........O...0...0.0.0..00................‘........Q..Q..

[}

FIeELDC

!
! 0000000000000 000000000000000008000000000000000002000000800000000008000080%00008000
'

tecscoe MARDUARE

t’mo
'

e
e

oot

P _IP ADOR

e
o=
e
s
e
e

{2,

16,

O],

P disk _num

- (3, 0. 2, 0},

radP “DUPE X

« (3, 3,1, 0],

(3,

0],

(3,

0],

« {3,

P BEG_TRx
P _END_TRX

0},

- {5, 0, 16, O],

P _DISK CP

16,

P DI

P OUPWT

15,

IP ADORESS
VECTOR ADDRESS
BUS REQUESY LEVEL
OISK (ALL FIELDS)
2ISK UNIT NUMBER
olISK TYPE

RUN DUP EXERCISER
WRITE FLAG FOR DuP

1, 0],

PROTECT CUSTOMFR DATA BIY
BEGINNING TRACK
ENDING TRACK

- [4, 0. 16, 0],
» (S, 0, i6, O)

tes,

(0, 0.

= {1. 0. 16, O},

P DISK_TYPE

P _veCTOR

P BR LEVEL

teseses COPPIUNICATION AREA HEADER FIELDS

Com FIELDS

set

ADAP CH

- {1, 8, 8, 0]},

cmo_int

s [2. 0, 16, O},

RSP _INT

« {3, 0,

tes,

16, 0}

!
¢
!

ADAPTER CHANNEL NUMBER FOR PURGES
COMMAND RING INTERRUPT
RESPONSE RING INTERRUPT

IP ADDRESS
VECTOR ADORESS

[]

CONTROLLER STATUS
BUS REQUEST LEVEL

fesasss DUP BUFFER FIELD

]

0P FIELDS e
SEY

OUPBF O
OUPSF 1
OUPSF 2
OUPTYPE

l‘)g_'tsc

0403
$

TACLE FIELDS

P
¢ 1ELDS

tessese CONTROLLEF

G
W
B
e
Ge
G
Gm
G
G
e

0407
0408
0409

«
«
«

(0, 0, 16, 0].
(1, 0, 16, 0},
{2, 0, 16, 0},
[0, 12, &4, O},

« (0, 0,

12, O}

STATUS TABLE (CST) FIELDS

Cet FIELDS et

0410

ve€ _ADOR

< {1, 0, 9, 0},

(0, 0,

16, O},

04183
0414
0413

B8R LEV

12,

041l
0A12

IP_ADOR

u_ENTY

0},

- {2, 8, 8, 0],

NUMBER OF UNITS (DISKS) FOR THIS CONTROLLER

A
b w

| Be)

Sebe,

1963 10:04:28

V¥ YRV VT IV v v IV

®
o

—
it s

.
o
@

B IB
T
ot
L
@
S
P
T
P
P
M
B
B

o
&
@

PSP
WY
WYY
gy W
Y )

®*
-

TYPE

UNIT NMBER (DRS UNIT)
FATAL ERROR B17
STATUS 8I!
PRESEN! BIT
PROTECT CUSTOMER DATA BI?
BEGIN TRACK
END TRACK
RELATIVE OON:*
ACTIVE STATE
! OUP ERROR FLAG!?
! NO LOCAL MEDIA OR DUP PROGRAMS FLAG!?
! DISK O RELATIVE MSCP FUNC COUNTER

gt Pt et et Pt Pt

tm
S
IE
B

@
&
S
Wmadt®
-t bd bt e P
el
S
*
S VT
S

0 (ML FIELDS)
UNIT NUSER

0
O
0
O
O
O
0
O
O

! NO LOCAL MEDIA OR DUP PROGRAMS FLAG!?*
1 RELATIVE MSCP FUNC COUNTER

DISK
DISK
DISK
DISK
DISK
DISK
DISK
DISK
0ISK
DIsx
DISK
DISK

2 (ALL FIELDS)
UNIT NUMBER

D1ISK
DISK
OISk
01sx
DISK

3 (ALL FIELDS)
UNIT NUMBER

TYPE

2
2
2
2
2
2
2
2
2

UNIT NUMBER (DRS UNIT)
FATAL ERROR BIT
STATUS BIT
PRESENT BIT
PROTECT CUSTOMER OATA BI7
BEGIN TRACK
END TRACK
RELATIVE O8N
ACTIVE STATE
! DUP ERROR FLAG!?
! NO LOCAL. MEDIA OR DUP PROGRAMS FLAG!!
01ISK 2 RELATIVE MSCP FUNC COUNTER

TYPE

3
3
DISK 3
DISK 3
DISKX 3

'0“

‘

)

SPIDERSUSERS:
(OMUCE 1 TE .6 AL CONICNRQAR .
QTG

DISK 1 (ALL FIELDS)
015X UNIT MUMBER
DISK TYPE
DISK
UNIT NUMBER (DRS UNIT)
FATAL ERROR BIT
0ISK
015K
STATUS 817
PRESENT BIT
DISK
PROTECT CUSTOMER DATA BIT
DISK
DISK
BEGIN TRACX
END TRACK
DISK
DISK
RELATIVE DBN
0ISx
ACTIVE STATE
! DUP ERROR FLAG!'?*

015K

O00COwOO

ol bt et Snd®
R
S
T
e &
o it

[- Yo
papopre
OAOrpopspspae

000
QOO
O
iO

o
o
@
&
&
»
&
®

o
.

JRVY. ¥. X. 3. YV P YV R7 Y7 TP Q7 y7 g7 17 ]
X- X 1
XY
[ Y X

11:11:10

VAKX 11 Bi.ws 16 ¢8 555

Vs
P e
Dreo
O ropsptptbe o o
Qe = » o o

et &

o OOOOOSS-O 0000000

Y- Y. Y- Y

[ledeoieted
a4 4.2 1 1 X X- 1 J

Py iy Gy P, Py Gy P PR PRy P P, S PRy Sy

s P

e (b P (S (i

Lo Lo Lam Lann Lam Lam 1am Lam Lom Lo )

Pt P

e Lo L o

(et (i P

P
G
e [

0
=
%

¢ G SRy Sm, SR Sy

&
8

DISK
OISx
DISK
OIS«
DIS«
DISx
DISK
oIsSx
D1Sx
DISK
DISK
DISK

Gy, P

&8
0
A
&
&
@
8

Gy, PRy P, P, Gy SR PR

6
e

]
B
I
I
B
I
L
B
B
B
I
8
9
8

{

3rr

%
¢

0461
0462
0463
0464
0463
0466
0467
0468
0449
0470
oA

0437
0458
0439

e
G
e
e
B
B
W
G
ee
B
e
s

SUEFE

0450
0431
0432
0453
04354
0433

b ot S G

0447
0448
0449

Py gy P Py gy, Py, Py ey

044¢

0443
0444
0443

0439
0440
0441
0442

valy
0432
0433
04 34
043%
0436
0437
0438

0429
0430

0427
0428

042%

o426

;
:

0419
0420
04821
0422
N423
0424

0418

417

3888333338888
mi
RIILpI0E
3> =
2% 865

15 Dec
14 Dec 1963

UNIT NUMBER (DRS UNIT)
FATAL ERROR BIT
STATUS BIT
PRESENT BI7
PROTECT CUSTOMER DATA BIT

03 BEG
03 END
03 DBN

0473
0474
0473

T
L

H
!

MSCP PACKET

b
v
e

[19.
{20,
{21.

0,
O,
O,

16, O],
16, O},
8, 01,

(23, 13, 1,
121, 14, 1,
{21, 15. 1,
{22, 0, 16,

O],
O},
0},
C]

1983 10:24:28
1983 11:11:10

!* ODISXK
H! DISK
H! DISK
H' DISK

3
3
3
3

SEQ 040¢,

vAXx 11 8l.es 16 ¥3 555
SPIDERSUSERS: [DOUCE TTE .F ALCONJCNROAR|

BEGIN TRACK
END TRACK
RELATIVE DBN
ACTIVE STATE
! DUP ERROR FLAG!*
! N0 LOCAL MEDIA OR DUP PROGRAMS FLAG!®
! DISK 3 RELATIVE MSCP FUNC COUNTER

FIELDS

(NOTE: BASE ADODRESS OF PACKET REFERENCES THE PACKET'S OWN
BUFFER DESCRIPTOR, RATHER THAN THE MESSAGE B0DY (TEXY . 0).

=
=
«
=

tes,

oar7
0478
Ocooooo

!
PKXT _FIELDS set

SEE DOCUMENTATION FOR LAYOUT OF MSCP PACKETS.)

[}

=
»
«

OS_ACVIVE
03 _DUPERROR
O 3NQOUPMED
03 _COUNT

0472

1Y Dec
i4 Dec

HEADER FIELDS

PKY LO
PKT NI

= (0, O,
= (1, 0,

PKT U
PKY_Q

= (1,
«- {1,

W
S
B

PKY_O
CMD_TYPE

=
=

CONNID

= [4, 8, 8, 0],

MSGLEN
CREDITS

0, 2, 0],
2, 4, 0),

« {1, 14, 1, O],

PKTY _F

(1, 15, 1, 0},
{2, 0, 16, O],

= (5, 0, 16, 01,
= [4, O, 4, 0],

! PACKET OESCRIPTOR (LO ORDER)
: PACKET OESCRIPTOR (HI ORDER
! PACKETY DESCRIPTOR
! PACKET DESCRIPTOR
! PACKET DESCRIPTOR
H PACKETY DESCRIPTOR
' COMMAND TYPE
! MESSAGE LENGTH
! CREDITS
MESSAGE TYPE
! CONNECTION 1D

ALL FIELDS)
(HI ORDER UNIBUS BITS)
(HI ORDER Q-BUS BITS)
FLAG BIT
OWNERSHIP BIY

16, 0],
16, 0],

GENERIC COMMAND PACKET AND END PACKET HEADER FILEDS
CRN_LO

« (S, 0,

16, O},

! COMMAND REF NUMBER (LO ORDER)

DI NUM

- [7, 0,

16, 0},

CAN_MHI

orC0DE

- [6, 0, 16, 0],
- (9, 0, 8, 0),

e {10, O, 16, 0},
« (10, O, S, 0},
= (10, S, 11, 0],

'
!
'

COMMAND REF NUMBER (M1 ORDER)
DISK ADDRESS (RD/RX DISK NUMBER)
OPCODE AND ENOCODE
CUMMAND MOODIF IERS
STATUS (PART OF RESPONSE PACKET)
SUBCODE (PART OF RESPONSE PACKET)

;

READ,

WRITE,

AND ACCESS COMMAND FIELOS (FOR COMMAND AND END PACKETS)

« {11, O, 8, O},

(11, 8,

8, O],

Le
LS
L6

-« (12, 8, 8, O),
-« (13, 0, 8, O],
- (13, 8, 8, O].

8C_LO
8C_HI

= {11, 0,
- {12, 0,

16, O},
16, O},

1
eur

- (14, 0,
- {15, 0,

16, O},
16, O},

¢ LETTER NUMBER 1 | FOR EXECUTE LOCAL PROGRAM COMMAND O
¢ LETTER NUMBER
NUMBER
¢t LETTER NUMBER
! LETTER NUMBER
! LETTER NUMBER

4
S

MODIF Y
STATUS _CODE
STATUS _SUBCODE

euf 0

- (13, 0, 16, 0),

'¢ BYTE COUNT (LO ORDER)
! BYTE COUNT (HI ORDER)
!! 1/0 BUFFER DESCRIPTOR

'
'

&
e
.

gy P

800*0
s

€ T g, g

IrVvaw

e
e
e

- (12, O,

0],

CONTROLLER FLAGS

16, 0],
16, 0]

UNIT

16,

OMLINE COMMAND FIELDS
«

(12, O,

= (19, O,

FLAGS

DEVICE DEPENDENT PARAMETERS

tes.
!
! ssesss RETURN PACKET (RETPKT) FIELDS
(SIMILAR, BUT NOT IDENTICAL, TO MSCP ENVELOPE FIELDS)
!
H
RP_FIELDS sot
!
!
COMMON TO ALL RETURN PACKETS FROM DISK MSCP

16, O},
16, 0],

=[5, 0, 16, 0],

STATUS

» {7, 0,

16, 0],

READ,

WRITE,

0580

88LK _HI

= {17, 0,

16, 0),

CBCONT _NHI
LON_LO

= [19, 0,
= [20, O,

16, 0],
16, O],

LBN_HI
!

STATUS AND SUB-CODE
STATUS COOE
SuUB-CODE

AND ACCESS COMMAND RETURN PACKETS

CBCNT_LO

FLAGS

« {7, 0, 5, 0],
« (7, 5, 11, 0),

BCNT _LO

BCNTY _HI
BUFF _0
BUFF _\
BUFF 2
BUFF 3
BUFF _4
BUFF_S

CONNECTION ID
COMMAND REFERENCE NUMBER (LO ORDER)
COMMAND REFERENCE NUMBER (HI OROER)
DISK ADDRESS (RD/RX UNIT NUMBER)
COMMAND MODIF IERS
END CODE

=
=
=
«
=
=
«

(8, 0,

16, 0],

(9, 0, 16, 0],
(10, O, 16, 0},
{11, O, 16, 0],
{12, 0, 16, O],
(13, 0, 16, O],
(14, O, 16, 0),
{15, 0, 16, 0],

{18,

(21,

16,

0]},

16,

O],

SET CONTROLLER CHARACTERISTICS RETURN PACKET

BYTE COUNT
BYTE COUNT
I/0 BUFFER
I/0 BUFFER
I/0 BUFFER
I/Q0 BUFFER
I1/0 BUFFER
I/0 BUFFER

(LO ORDER)
(HI ORDER)
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR

NS WN+»O

CHMDMOD

« (3, 0,
- (4, 0,

STSCOD
SUBCOD

MESSAGE LENGTH
CONTROLLER NUMBER (CREDITS OVERWRITTEN)
MESSAGE TYPE

[1, 0, 4, 0],

CRF _H1
0ISK

FIRST BAD BLOCK (LO ORDER
FIRST BAD BLOCK (MHI ORDER)

CTLR

0374
037
0576
0577
0578
0579
0381
0382
0583

BLEE

+AX (1 Bl .ss 16 v3 55%
v age
PIOERSVCSERS:
(DOUCETTE (F AL CONICNR UK WE

Sum

S
B
B
B
Gm
Be
B
Bt
BE
e
B0
Be
Be
Be
B
B
Gw
B
e
W
Be
G
B
B
B
B
@
e
B
G
W
me
s
G
B
o

0%65
0566
0567
0568
0569
0370
0571
0372
0573

C_FLAGS
U_FLAGS

0539

0560
0361
0362
0563

10:24:28
11:11:10

SET CONTROLLER CHARACTERISTICS COMMAND FTIELDS

obPAR

0338

0348
0546
0547
03548
0549
03%0
0331
0532
0533
0934
09555
03%6
0557

[}

1933
1983

LOGICAL BLOCY NUMBER (LO ORDER)
LOGICAL BLOCK NUMBER (NI ORDER)

T G YD T SR S Sap S S

0543

0].
0].
o].
0].
0l.

0342

1€,
16,
16,
16,
16,

VI S S

0337
0338
0539
0340
0541

1333

0528

0529
0530
0551
0332
0333
0534
0535
0336

15 Dec
14 Dec

BYTE COUNT FROM CMD PACKET (LO ORDER)
BYTE COUNT FROM CMD PACKET (HI ORDER)
LOGICAL BLOCK NUMBER (LO ORDER)
LOGICAL BLOCK NUMBER (MI ORDER)

15 Dec
14 Dec

1933
1983

10:24:28
11:11:10

VAX-11 Bl:es

v3 S55

YT Ry

U_FLGS
USIZ_ L0
USIZ mMI

!
T _FIELDS

16, 0],
16, 0]

!
!
!

UNIT
UNIT
UNIT

NUMBER OF BYTES READ (LO ORDER)
NUMBER OF BYTES READ (HI ORDER)

BYTES READ_LO
BYTES_READ
HI

= [0, O,
=+ [1, O,

16, 0]
16, 0]

!
*

BYTES_WRIT_LO
BYTES_WMRIT HI
MBYTES _WRIT

=« {3, O,
= (4, O,
- {S, 0,

16, O]
16, O)
16, 0)

!
!
!
!

ERR _HARD

= [2, 0, 16, 0]

= (6, 0, 16, 0)

FLAGS
SIiZE (LO ORDER)
SIZE (HI ORDER)

MEGABYTES READ

NUMBER OF
NUMBER OF
HEGABYTES
NUMBER
OF

BYTES WRITTEN (LO ORDER)
BYTES WRITTEN (HWI ORDER)
WRITTEN
HARD ERRORS

--------------------------------------------------------------------

[7,

TOT_WRITES_LO
TOT_WRITES
HI

=+
=

(10,
[11,

O,
O,

16, O
16, O

TOT_BYT_RED_LO
TOT BYT_RED_MI

= (13,
=« {14,

O,
O,

16, O
1€, O

TOT BYT_WRT_HI

16,

ERR_HRD_SEK
ERR_HRO _DAT
ERR_HRD _DRV
ERR_MRD_MST
ERR_SFT_SEK
ERR_SFT_DAT

0627
0628

n-o .- e

ERR_SFT_DRV
ERR_SFT_MST
tes,

tssesess CONTROLLER ERROR

_ERR_FIELDS =
set

C_ERR_HRD
C_ERR_SFT

!
*

TOTAL NUMBER OF WRITES (LO ORDER)
TOTAL NUMBER OF WRITES (HI ORDER)

!
!
!
!
!
!

TOTAL
TOTAL
TOTAL
TOTAL
TOTAL
TOTAL

{17,

= (18, 0, 16, O

= (20, 0, 16, O
= (21, O, 16, O
.
=
=
-«
=
«
=

ta
(24,
(25,
(25,
(26,
(26,
{27,
(27,

TALLY

0.
8.
0,
8.
0,
8,
O,
8,

8, 0)
8. 0)
8, 0)
8. 0)
8, O)
8, 0)

8, 0)
8, O)

Svd S
sl Sl St S

= {15, 0, 16, O
= [16, O, 16, O

BYTES READ (LO ORDER)
BYTES READ (HI ORDER)
MEGABYTES READ
BYTES WRITTEN (LO ORDER)
BYTES WRITTEN (HI ORDER)
MEGABYTES WRITTEN

pdbed el

T_BLK_WT
T_DBN_WT

TOTAL NUMBER OF READS (LO ORDER)
TOTAL NUMBER OF READS (HI ORDER)

mTof_ByT_wrf

1
!

mrof_BYT_RED
TOT_BYT_WRT_LO

0616
0617
0618
0619
0620
0621
0622
0623
0624
0625

- (8, 0, 16, 0)

0615

16,

TOT_READS _HI

Nt Al

TOT_READS _LO

W
B
G2
e
B
Be
B8
e
Bv
Be
Gv
Be
Gu
B0
St
Ba
e
Ga
e
Be
GWn
Do
Bh
e

(18, 0,
{19, 0,

RNt

Be
B
B

CONTROLLER FLAGS
CONTROLLER TIMEOUY

set

MBYTES_READ

B
Be
Be
Bv
Be
Be
e
B
B
B
B

!
!

feessss STATISTICS TABLE (TALLY) FIELOS

0613
0614

0630
0631
0632
0633
0634
0635
0636
0637
0638
0639

=
=

tes,

0601
0602
0603
0605
0606
0607
0608
0609
0610
0611
0612

(9, 0, 16, O],
{10, 0, 15, 0],

e
s
e
e
G
@
B
B
B
we
m
Be
Bs
e
B

0393
0394
0595
0596
0397
0398
0599

UNTT ONL INE RETUPN PACKET

0590
0591
0392

®r

0589

C_FLGS
C_TIm

! TOTAL HARD ERRORS
! TOTAL HARD ERRORS
! TOTAL HARD ERRORS
¢ TOTAL HARD ERRORS
t TOTAL SOFT ERRORS
! TOTAL SOFT ERRORS
¢ TOTAL SOFT ERRORS
! TOTAL SOFT ERRORS

FIELDS

« {0, O, 8, 0],
= (0, 8,

8, 0)

HARD ERRORRS

SOF T ERRORS

SPIDERSUSERS : [DOUCE T TE .F&CN]C’GO‘A.:@ (2,
\

0584
0385
0586
0587

SEQ 048

SEEK
DATA
DRIVE
HOST
SEEK
DATA
DRIVE
- HOST

Hie,

15 Dec
14 Dec
0640
0641
o6a2

‘'essesee DRIVER CONTROLI ER
!
DCT FIELDS o

TABLE (DCTY) FIELDS

0647
0648
0649
0650
0651
0652
0653
0654
0655
0656
0657
0658

WORDO
CRING _CNT
IG_INT
STAT
SA_SAVE
RR_BEG
RR_END
CR_BEG
CR_END
RR_POLL
CR_POLL
CR_NEXTY

O, 16, 01,
O, 8, 0],
14, 1, O},
15, 1, O],
0, 16, 0},
0, 16, 0],
0, 16, 0},
O, 16, 0],
0, 16, 0]},
0, 16, O],
0, 16, 0],
0, 16, 0]

0659
0660

0663

0664

e
»
»

set

tes,

= (0,
= (0,
= {0,
=10,
= {1,
= (2,
= (3,
= (4,
= {5,
= [6,
= (7,
= (8,

IGNORE INTERRUPT BIT

ONLINE / OFFLINE STATUS
SA REGISTER SAVE WORD
FIXED ADDRESSES OF START AND
END OF EACH RING
:
v

ADDR OF NEXT RRING SLOT TO BE POLLED
ADDR OF NEXT CRING SLOT TO BE POLLED
ADDR OF NEXT AVAIL CRING SLOT

EP_FIELDS =

set

=
=
«
=
=

0672
067%

EL _CONTINUE
EL _SUCCESS

s (7, 14, 1, 0],
= (7, 15, 1, 0],

0675
0676
0677
0678

EL _SUBCODE
EL _BLOCK
EL_BLOCK_TYPE
tes,

0671

cL_FORMAT

0674

8::?

ALL FIELDS IN WORD O

NUMBER OF SLOTS IN CRING NOT YET RETURNED TQO HOST

tsssses ERROR LOG PACKET SAVE AREA FIELDS

€L _CNTR
EL_CONTENTS
EL _MSGLEN
EL_CRN_LO
EL _CRN_HI
EL_OK_NUM

079

'
'
!
'
!
¢
'
'
'
!
!
'

[]

0665
0666
0667
0668
0669
0670

€L _CO0E

tessnss

(0,
(0,
(1,
(3,
(4,
(S,

O,
8,
0,
0,
O,
0,

8, 0],
8, 0],
16, 0],
16, 0),
16, 0],
16, O],

= [7, 0, 8, 0],
= (8, 0, S5, 0],

» (8, S5, 11, 0],
~ (23, 0, 16, O]},
= (24, 12, 4, O]

INFORMATION ABOUT

LAST

t
!
!
t
!
!

CONTROLLER NUMBER
FLAG INDICATES IF PACKET CONTENTS ALREADY PRINTED
PACKET LENGTH
COMMAND REFERENCE NUMBER
DISK ADDRESS (RO/RX DISK NUMBER)

! FORMAT

¢ CONTINUE FLAG
' SUCCESS FLAG
* ERROR CODE

' SUB COOE
! BLOCK NUMBER
t TYPE OF BLOCK NUMBER INFO RETURNED

RESPONSE PACKET

[}

%g;

0682

0683

0684
0685
0686
0687

0688
0689
0690
0691

0692

0693

0694

LAST_PKT_FIELDS

set

LAST_HRD_ERR
LAST _CRN_LO
LAST_CRN_MI
tes,

= [0, O, 16, 0],
= (1, 0, 16, 0O},
= {2, 0, 16, 0]

t FLAG INDICATES IF HARD ERROR OCCURED
1 COMMAND REFERENCE MUMBER
'

!
!esssse RORX REGISTER FIELDS
!
RC_REG -

set

RC_ALL
tee;

= (0, 16, 0]

! DEFINE ALL BITS

VAX-11 Blies-16 v3 %55
tage
SPIDERSUSERS
: [DOUCE 1 TE . ALCON JCNRUKi- WE

tes,

0643
0644
0645

0646

1983 10:24:28
1983 11:11:10

15 Oec 1983 10:24:28
14 Dec

IXX2X2X
IXXXXZX

0729
0730
0731

0732
0733
0734
0735
0736
0737
0738

0739
0740
0741

[

1000008008000 080680088000008008808060000000060404840804800600080800008080080000000000
Mecro

ssesss BIT

TEST

IT_TST (ADDR, EXPECTED) (if (.ADDR end EXPECTED) eql EXPECTED
then

elee
sssses

TRUE

FALSE

)%,

RDRX

WRITE

WRT_RORX (0,
begin
local

FIELONAM,

IMAGE)

RC_REG;
RC_REG <#fieldexpend (FIELONAM)> = IMAGE;
( .RDRX_ADDR ¢+ (supval * 0)) = _RC_REG;
ends;

S @ ‘Wt s

DISK STATUS BIT
DISK PRESENT BIT
DISK PROTECTION BIT
BEGINNNING TRACK
ENDING TRACK
RELATIVE DBN!¢t
MSCP FUNC COUNTER
OUP WPITE FLAG
ACTIVE STATE
OUP ERROR FLAG!t
CONTROLLER LOCAL DUP MEDIA

Pab CED

ropapops
Ne

THE FIRST ARGUMENT

ALL FIELDS
DISK ADDRESS
DISK TYPE
DISK UNIT NUMBER (DRS UNIT)

SEP SED TUD SUD S teh T T I

29288 ¥9222eg %%

[« B,

NPt papepse

T meetuse

(CAUTION:

D_ALL
D_OISK _NUM
D_TYPE
D_UNIT
D_FATAL
O_STAT
D_PRES
D_PROT
D_BEG
D_END
D _DBN
0_COUNT
ODUPWRITE
O_ACTIVE
DUPERROR
NODUPMEDIA

tesssss CST FIELDS (WORDS

[}

B
B
GF
Br
B
Ge B6
s
Bs
Ve
B
Gr
G4
Be
Tu
B
Be
B
GP
WO
G
T
s
G2
@a
B¢
Wa
B0
B
@
Be
8
WL
St
e

0711
0712
0713
0714
0715
0716
0717
0718
0719
0720
0721
0722
0723
0724
0723
0726
0727
0728

[

0701

0702
0703
0704
0705
0706
0707
0708
0709
0710

MACROS

0699
0700

FATAL

THE

ERROR BIT

ADDRESS AND NOT

SEQ 0410

SPIDE
: [OOUCETTE
RSUSE
.FALCONICNROAA,
RS

’

]

OO0
HBNOO
NBWN® = « a NBWNe o » =

0697
0698

11:11:10

1000000000000 0600600800008000008040080008080808000808000060800040808008000080006000000080

==
=t o P

0695
0696

198%

VAX-11 Blies-16 v3-33%

THE

CONTENTS)

: ;‘

(%)

J16
15 Dec-1963 10:24:28
14 Dec-1963 11:11:10

B¢

0742
0743
0744
0745
0746
0747
0748
0749
0730

10600000000000080000006000468000000008000008080088000060008000000800800080008000000
.
¢
STRUCTURES
!
.
[J
H
8008088008068
000600000000000004808000400888000080808800880008080880805080000000000
!
H
H sssese NIBBLE (4-BIT) VECTOR STRUCTURE
!
‘structure

¢
H
H

0751
0752
0753
0754
0735
0756
0757
0738
0739

NIBVECTOR (I; N] =
(C(N ¢« 1) 7 2)
(NIBVECTOR « I 7 2) <«(I ¢t 2) and 4, 4>;

?
! sessss RORX ACCESS ALGORITHM
H
® tructure

RORX (O, P,
begin

0760

B1
W
Be

RC_REG
end

0764
0765

locel
RC_REG;
RC_REG = .(RDRX

0761
0762
0763

S, E)

<P,

+ supval

& 0)

<O,

sbpval,

O>;

S, E>;

COMMAND QUAL IFIERS
BLISS
Run

/PDP11 CNRQAA.REQ/LIST=CNRQAA.LIS/LIBRARY=CNRQAA.L16/SOURCE=PAGF
:56

Time:

Elapsed Time:

00:06.7
00.11.4
62 pages

Memory Used:
L brery Precompilation

Complete

Q0 L4

VAX-11 Blies-16 v3-555
Page
SPIDERSUSERS: [DOUCETTE.FALCONICNRQAR RF
4y

1°
4

CNRQAA .EXE

Memory allocat.on map

K16

Page 1

10:47

15 DEC-83
Partition name

IKB M40.02

DUMMY

Identification : v01.0
Tesk
UIC
: (300,201
Task attributes: -HD
Total eddress windows: 1.

Tagk
Task

‘mege
size
:
address limite:

Wdsek

sss

Root

blk

limits:

segment:

16608. words
002000 102653
000002

000102 000101

00065.

CNRQAA

R/W mem

limits:

002000

D'sk

limits:

000002 000102 000101 00065.

blk

Memory

102653

100654

33196.

sllocetion synopsis:

Sect on

Title

. BLK,:(RMW,I,LCL,REL,CON)
$CODES:(RG,ILLCL,REL,.CON)

002000 000000 00000.
002000 071546 29542.

$FFFE$

-(RO,I,LCL ,REL,CON)

073546 005236 02718.

$GLES

(RO, 1,1 CL,REL,CON)

$CWN$

(RW,D,LCL,REL,CON)

SPLITS-(RO.D,

$xvZ¢

002000
025756
046070
073122
073440

023756
020112
025032
000316
000106

Ident

10222. NRQAM1 v01.0
08266. NRQAM2 V01.2
10778. NRQAM3 V01.0
00206.
Bl6MA 2.8
00070. B16SAV 2.4

File

CNRGAA. 081;:8
CNRQAA. 081;8
CNRQGAA. 082;6
CNRQAA. oLB;1
CNRQAA .0L8;1

Q73546 005236 02713.

NRGAM1 Vv01.0

CNRQAA .0B1:8

101004 001256 00686.

NRQAM3I V01.0

CNRQAA. 082:6

102262 000224 00148. NRQAM2 V01.2

CNRQAA. 081:8

102506 000030 00024. NRQAM2 V01.2
102536 000024 00020. NRGAM3 v01.0

CNRQAA, 081:8
CNRQGAA. 082;:6

102562 000070 00056.

CNRQAA. 0B2:6

CL,REL,CON)

:(RO,I,LCL,REL,CON)

101004

001256 00686.

102262 000224 00148.

102506 000054 00044.

102562 000070 000%56.

NRGQAM4A V01.2

Global

symbols:

ADR

000020

81708

000400

8ITS

000040

BUFF.0 100702-R

(ST

81710
81700

000001
000001

8IT10
8IT11

002000
004000

81718
8IT9

000400
001000

COISK
100730-R
CER.O1 014054-R

CUOFF
C.ERR.

8IT03

000010

ASTERI 023640-R
AZINTO 067140-R

8IT01
81702

BIT04
8IT0S
81706
8IT07

000002
000004

000020
000040
000100
000200

B8IT09
BITL

8IT12
81713

BITi4

81715
8172
B8IT3
BIT4

001000
000002

010000
020000

040000

100000
000004
000010
000020

8176
8117

000100
000200

BLSDIV 073346-R
BLILAS 102362-R

BLSMOD 073360-R

BLSMUL 073122-R
BLISHF 073372-R
80€E
000400
BUFF .A 100662-R

8YTS.P
CCTLR

100746-R
100726-R

CER.02 014120-R
CMD.TI 100762-R

CNTR.E 025042-R

CREDIT
CRLF
CRN.HI
CRN.LO

101000-R
025626-R
100770-R
100766-R

073546-R

(CST. AD 073624-R
CTLR.C 100734-R

100732-R
075222-R
DASH
0235632-R
OCT
073626-R
DOCT. AD 073650-R
OFPTBL 025650-R
0OF.0
021644-R
DF.1
021700-R
DF.2
021734-R

022010-R
022050-R
022076-R
022122-R
022172-R
-R
034264
034372-R
073636-R

‘025704 -R

-R
100724
100736-R
004052-R

DU.RSN
DSPCNT
€8D.
EBD.
€BD.
EBD.
EBD.
£80.
EBH.
EBH.
EBH.
EBH.

-R
004616
-R
002122
007236-R
-R
007276

-R
007344
-R
007376
007436-R
007472-R
021160-R
021176-R
021300 R
021332 R

- 16
L XE

Memory

sllocet

map

15 DEC 83

021362-R
021444-R
021532-R

013606-R
013760-R
007174 R
013544 R
013360-R
013304-R

013662 R
013442
-R
013504
-R
000036
000035
000034
000037
000040
006352-R
006412-R
006436-R
006464
-R
006512-R
006542-R
006560-R

OB WM

wh O

s e O

EGS.

006610-R
006626-R
006646-R
006734-R
007046-N
007106-R
007150-R
006240-R
006260-R
007552
-R
007610-R
010172 R
010224-R
010262-R
007646-R
007706-R
007744
-R
007770-R

010020-R
010052-R
010104-R
010140-R
ELG.FM 011402-R
ELG.00 011046-R
ELOG.P 077232-R
EMSCHD 036134-R
EMS.BL 043610-R
EMNS.CH 045170-R

EMS.08 043060-R
EMS
. EL O044050-R
€EMS .01 045512-R

EMS.10 O45550-R
EMS.12 045612 R
EMS.13 045650-R

EMS.14
EMS.18
EMS.21
EMS.22
EMS.30
ENTRY.

EOP.FL
ERRBLK
ERRMSG
ERRNBR
ERRTYP
ERR.CO
EvL
EX.ABP
EX.ACC
EX.BDR
EX.BDW
EX.CBR
EX.CBW
EX.CRD
EX.DGM

EX.ELP
EX.ESP
EX.GDS
EX.LBR
EX.LBW
EX.MTN
EX.ONL
EX.OP
EX.RBN
EX.RCD
EX.RD
EX.SCC
EX.SOD
EX.SEQ
EX.WRD
EX.WRT
E.BLK
E.DEV

E.UNT
E.ZER
FREE.M
F .1}
F.10
F .11

F.12
F.13
F.1a
F.1S
F .16
F .17
F .18

045712 R
045754-R
046016-R
0O46034-R
046052-R
100722-R

100723-R
002134-R
002132-R
002130-R
002126-R
011012-R
000004
014524-R
014322-R
011414-R
011504-R
011760-R
012030-R
014214-R
014264-R

014444-P
014414-R
014372-R
011572-R
011636-R
014244-R
014334-R
025610-R
011702-R
014504-R
014302-R
O014346-R
014470-R
014174-R
025600-R
014312-R
022466-R
022550-R

022432-R
022574-R
100744-R
017712-R
020400-R
020430-R

020454
-R
020502
-R
020560-R
020620-R
020646
-R
020712-R
020756-R

TKB MA0.02

Page

2
4

10:47

F.19
F .2
F .20
F .21
F.3
F .4
F.5
F.6
F.7

F.8
F.9
GET.IO
GET.PK
GET.RE
GPS$DIS
GPs1
GP$10
GP#11
GP$12
GP$13
GP#14
GP$1S
GP$16
GP$17
GP$18
GP$19
GP$2
GP$20
GP$21
GP$22
GP$23
GP$24
GP$25
GP$26
GP$27
GP43
GPs4
GP$S
GP$6
GP4$7
GPs8
GP$9

HOE
HWPT.B
HWPTY.D
WWPT
.E
HWPT.I
HWPT.S

HWPT.V
HWQAL
HWQL0
MWQ1l
HWQ2
HWQ3
HWQ4

021016-R
017746 R
021056 R

021130
-R
020002
-R
V20034
-R
020074
-R
020152
-R
020226
-R

020302
-R
020360 R
033760-R
033112-R
033636-R
026324-R
026012-R
026140-R
026152-R
026170-R
026200-R
026214-R
026226-R
026240-R
026252-R

026264
-R
026272-R
026022
-R
026306-R
026316-R
026330-R
026344-R
026354-R
026370-R
026406-R
026420-R
026032-R
026044
-R
026056
-R
026066
-R
026076-R
026106
-R
026120-R
100000
025654
-R
025656-R
025662-R
025650-R
025660-R

025652-R
002136-R
002560-R
002646-R
002152-R
002162-R
002174-R

002220 R
002310-R
6
00232-R
-R
002406
002460-R
e 3
010000
000040
IoV
020000
IER
IN. I0D 034176-R

Qs
HWQ6
HwQ7
HWQ8
HWQ9

I00Q
I00Q.1
100Q.0
IPKT.A
IRDRX.
ISR
IXE
LOE
Lot
LS$ACP
LSAPT
LAy
LSAUT
LS$AUTO
Lsccp
LSCLEA
LsCo
LSDEPO
L $DESC

L $DESP
LSOEVP
L¢DISP
LeOLY
LeOTP
L$DTYP
LDV
L$0UT
LeDVTY
LOEF
LSENVI
L SERRY
LSETP
LSEXPL

LIEXP4
LIEXPS
L $HARD
L$HIME

L eHPCP
LHPTP

L $HROL
Lo
LoMdLE
LesICP
LSINIT
L$LADP
LSLAST

100712-R
100716-R
100720-R
-R
076704
-R
073654
000100
004000
040000
000010
002110-R
002036-R
-R
032676
002070-R
-R
032104
002106-R
032170-R
002032-R
-R
002011

025766-R

-R
002076
002060-R
-R
002124
002116-R

002040-R

-R
002034
-R
032604
002072-R

-R
025756
-R
002052
-R
002044
002126-R
-R
002102
-R
002046
-R
002064
-R
002066
026012-R
002120-R
002016-R
-R
002022
026010-R
025650-R
-R
025646
-R
002104
032072-R
-R
002026
6
10256-R

L$LOAD
LSLUN
LSMREV
L $NAME

002100-R
-R
002074
002050 R
002000 R
026210-R
-R
025664
026436 R
-R
025746

L SNOHR
L SNOHU
L $NDSF
L $NDSW
2
LSPRIO 00204-R
L$PROT 025750-R
L$PRY
002112 R
-R
LSREPP 002062
L$REV
002010-R
-R
LIRPT
027574
-R
LSSFTL 026212
-R
LSSOFT 026214
-R
L$SPC
002056
L$SPCP 002020-R
-R
L$SPTP 002024
LS$STA
002030-R
LeSW
025670-R
-R
LISWLE 025666
-R
LS$TESY 002114
-R
LeTIML 002014
LSUNIT 002012-R
MSCP.P 073224
-R
MSG.01 004646
-R
MSG. 02 004700
-1
MSG.03 004734
-R
M.ASC
022630-R
M.BIN
-R
022664
M.C00
-R
022756
M.DAT
-R
023014
M.TER
022722-R
ML
-R
023264
M.UP
-R
023204
M. UR
-R
023046
M.URP
023116-R
4
NEX
10076-R
NEXT.P 101002-R
NEX.TR 032706-R
NULL
004050-R
-R
OF .RC
100756
OUT.I0 034140-R
-R
PKT
, US 076706
PNT
001000
PRI
002000
PRIOO
000000
PRIO1
000040
PRIO2
000100
PRIO3
000140
PRIO4A
000200
PRIOS
000240
PRIO6
000300
PRIO?
000340

PUTA.B 034100-R
PUT. IO 03~034 R

PUT.PK
PUT.RE
P . INDE
QIO
.A
RORX
RORX .E
RETPKT
RPT1
RPT10
RPT11
RPT12
RPT13
RPT14
RPT15
RPT16
RPT2
RPT3
RPT4
RPTS
RPT6
RPT7
RPTS
RPT9

-R
033476
033744
-R
100772-R
100742-R
073652-R
-R
025562
076722-R
004766-R

003472-R
-R
005524
005612-R
005660-R
005760-R
-R
006056
006156-R
-R
005052
005116-R
005202-R
-R
005246
-R
005334
-R
005400
-R
005422
-R
005444
077230-R
.IND 077226-R
.USE 077222-R
.REG 100760-R
.C0D 100752-R
-R
.CLK 017504
014560-R
.CT0 016772-R
.0IS 015102-R
.DST 015500-R
-R
.0S2 015554
.OuP 014602-R
-R
.ECC 015626
.ECO 015710-R
.EC1 016160-R
.EC2 016210-R
.EC3 016240-R
.ECA 016272-R
.ECS 016322-R
.EC6 016352-R
.EC7 016402-R
-R
.EC8 016434
-R
.EC9 016466
.E0C 017122-R
.FCT 016112-R
.FER 015174-R
.FE2 015262-R
JFUL 015762-R
016570-R
.IDS 017136-R

015034 R
015340 R
015420-R
016702 R
-R
.QDA 016630
-R
.008 016660
.ONL 014632 R
-R
PAR 016736
.POE 017366-R
.PSP 017630 R
.RCT 015742-R
-R
.RDY 017422
.RSP 017532 R
.S01 014534 R
-R
.SDS 017044
.SON 014654 R
.SRI 017300-R
-R
.SRT 017206
.SUR 017600-R
.SWP 016530 R
-R
« UNK 014674
.VOL 014754-R
-R
.576 016036

.10P
.ISH
.1Se2
. NXM

SEND
SET.CP
SET.UP
SFPTBL
SPACE4
STEP
S1.C0D
SuM}

034450-R
032716-R

033012 R
025670-R
025622 R

100754 R
100750-R
003760-R

SWP
. 0P 025676 R
SWP .ER 025670-R
SWP
. FL 025674 R
SWP .RA 025702 R
SWP
. UC 025700-R
-R
SWP .UD 025706
SWP XF 025672 R
SWa1
002700-R
-R
003154
5Wa10
SWa1i
003220-R
SWa12
003252 R
003350-R
SWQa13s
-R
SWQ14
003426
SWa15
003444 R
-R
SwQ17
003514
-R
Swa19
003602
-R
SWQ2
002722
-/
SWQ22
003672
-R
SWQ4
003004
-R
SwQ7
003026
SWa9
003100-R
-R
S.DUPP 100774
S.PATT 100776 R
TALLY
074660-R

CNRQAA . EXE

Hemory

allocet on map

CNRQAA

15 DEC-83
102646 R
000003
075220-R

T.SPL
T.TER
T1

T.DEF

022264 R

UAM

WAIT

035064-R

XX19

T.INF
T.QUE

0228316 R
022242 R

xX13
XX14

012100 R
012122-R

sss

022366 R

Task

builder

Totel

work

000200

file

references:

O.
O.
5616.
4608.

Elapsed time:00:00:53

M16

563 O414a

XX15
xXX16
XX17

012136-R
012160-R
012206-R

XX18

012224-R
R

x426

XX20
xx21

012246 R
017262 R

012234

stetistics:

Work
f'le
reads:
Work
file writes:
Size of core pool:
Size of work file:

Page

10:47

TSFREE
T$P v
T.AQDR
T.FAT

022412 R
022342-R
046266-R

TKB M40.02

124902.

words (21.
words (18.

pages)
pages)

xX22
xXX23
XX24

012322-R
012356-R
012412-R

XX30
XxXX31
XX32

012664-R
012712-R
012744-R

Xx38
XxX39
XxXX40

013142-R
013206-R
013234-R

xXX25

012452-R

XX33

012772-R

xxa1

013254 R

xXX27
XX29

012576-R
012640 R

XX35
XX37

013100 R
(013116 R

$SAVE2 073440 R
$SAVE3 073454 R

012522-R

XX34

013030-R

$END.L

102650-R

$SAVES 073472 R
$SAVES 073812 R

CNRU AR

CREATED

Tih

GLORAL CROSS REFERENCE

BLSLAS
BLSMOD
BLSMA
BLSSH

073360-R
073122-R
073372-R

B80€

000400

Br1S.P

100746-R

BUFF A
BUFF .0
CCTLR

COISx

CER.O1

CER.02
CMD.TI
CNTR.E
CREDIT

CRLF

CRN. WD

CRAN.LO
CsT
CST.AD
CTLR.C

CUOFF

100662-R
100702-R

A &4
A AR L
A
A
N

000100
000200
000400
001000
000002
V02000
O04000
010000

100726
-R

100730 R

014054-R

014120-R
100762-R
025042-R
101000-R

025626
-R
100770-R

100766-R
073546
-R
073624-R
100734.R

100732 R

YY I

8IT06
8IT07
8IT08
81109
81Tl
B8IT10
8IT1l
8l1i2
81113
81714
BIT1S
BITe
8173
BIT4
BITS
8ITe
BIV?
8Ivs
8179
BLSDIV

067140-R

000001
000001
900002
000004
00001C
000020
000040

PSS

AZINTO

8Iv0
8IT00
817101
81102
B8IT03
BITO4
BITOS

025640 R

AR R R AR A

009020

ASTERI

ADR

CRb

REFERENCES. .

RN RN R

VALUE

XYY

SYMBOL

NRQAM1
MIQAM]

+E JAM3

M- JAML
NRQAML
NRQAM1
NRQAM1
NRQAM1
NRQAML
NRQAM]1

NRQAM1
NRGAM1
NRQAM1
NRQAM1
NRQAML
NRQAML
NRQAM1
NRQAM1
NRQAM1
NRQAML1
NRQAM]1
MRQAM]1
NRQAM1
NRQAM1
NRQAM1
NRQAML1
NRQAML
NRQAM1
NRQAM1
816MUL
NRQAMA

B16MA
B816MA
816ML
NROAML

NRGAM1
NRQAML
NRQ-ML
NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAML
NRQAM]
NRQAM1
NRQAM1

NRGQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM]

PAGE

& NRQAM?

& NRQAMSX

@ NRGAMZ
@ NRQAM2
& NRQAM2
& NRQAMZ
& NRGAMZ2
¢ NRQAMZ
& NRQAMZ

& NRQAM3
& NRQAMS
¢ NRQAM3
0 NRQAM3
@ NRQAM3
& NRQAM3
& NRQGAM3

NRQAM2

¢ NRQAM2
& NRQAMZ
@ NRGAM2
& NROQAM2
¢ NHRQAMZ
& NRQAMZ
& NRQAM2
& NRQAM2
& NRQAM2
& NRQAM2
& NRGAM2
@ NRQAMZ2
& NRQAM2
@ NRQAM2
& NRGAM2
& NRQAM2
& NRQAM2
& NRQAM2
¢ NRQAM2
NRQAM?

NRQAM3S
NRQAM2
NRQAMS

& NRQAM2

NRQAM2
NRQAM2
NRQAM2
NRQAM2
NROQAM2
NROAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2

NRQAM2

NRQAM2
NRQAM2
NRQAM2
NRQAM2

@ NRQAM3
@ MNRQAM3
& NRQAM3
¢ NRQAM3
@ NRQAMS
& NRQAM3
& NRQAM3
& NRQAM3

& NRQAMZ
& NRQAM3
& NRQAM3
& NRQAM3
& NRQAM3
& NRQAM3
& NRQAM3
& NRQAM3
& NRQAMS
& NRQAM3
& NRQAM3
NRQAM3

NRQAM3
& NRQAMS

NRQAM3
NRQAM3
NRQAM3
NRQAM3
NRQAMS
NROAMS

NRQAM3
NRQAM3
NRQAMS
NRQAMS
NRQAMS
NRQAM3
NRQAM3
NRQAM3

]

CNREARTED 8y

15 DEC 8%

CROSS REFERENCE
REFERENCES. ..

021644

021700
021734
022010

K
LR B

NRQAM2
NRQAMS
NRQARM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAMZ
NRQAMZ2
NRQAMZ
NRQAM2
NRQAM3
NRQAM3
NRQAM2
NRQAM3
NRQAM2
NRQAM?2
NRQAMZ
NRQAM2

A
021160-R
021176 R

021300-R
021332-R
021362
-R

-R
021444
021532-R

-R
013606
0137690-R
-R
007174
-R
013544
013360-R
-R
013304

013662-R
013442-R
-R
013504
000036
000035
000034
000037
000040

-R
006352

006412-R
-R
006436

AL
R
ISR R

NRQAM3
NRGAM3

NRQAM3

NRQAM?Z
NRGAMX

NRQAM2
NRQAM2
NRQAM?2
NRQAMZ

NRQAM1

NRQAM?

L X2
1 X J

007472-R

ZIYA

002122-R
007236-R
007276 R
OU7344 -R
007376 R
0074%
-R

NRQAM]

NRQAM1
NRQAM]
NRQAML
NRQAM1
NRQAM1

NRGAM3

Y YI XYY

100736-R
-R
004052
R
16
0046

025704 R
-R
100724

§<
)
r

NRQAMZ2

NRQAM]
NRQAM1
NRQAM1
NRQAM1
NRQAM]
NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM]
NRQAM1
NRQAM1
NRQAM2
NRQAM2
NRQAM1
NRQAM1
NRQAM]
NRQAM1

AR AR AL R A

V2%5632
073626
073650
025650

[a1]
< N

Y ow:DZA;\N-O

FRRARPIRRRR

NRL Y-

DDDDOVDDDD

vALUE

@ NRQAM3
& NRQAM3
# NRQAM3
& NRQAMS
@ NRQAM3

NRQAM3
NRQAM3

CNRQ Ax

CREQTED ¢ B8Y
CRE

T<B

{ON 15 DEL 8% AT

t0:4°

CRt

006464 R

007150 R

EGS.02
EH.0
En.1

006260-R
007552 -R
007610-R

€GS.C1

EM.10
En.12
EH.13

€42
EH.3
EH.4
EH.S
EH.6
EH.7
EH.8
EH.9
ELG.FM

ELG.00
ELOG.P
EMSCMD
EMS.BL

EMS.CM

EMS.0B8

007046 R
007106 R
006240 R

010172-R
010224-R
010262-R

007646 -R
007706-R
007744 -R
007770-R
010020-R
010052-R
010104 -R
010140-R
011402-R

011046-R
077232-R
036134-R

043610-R

045170-R

O044050-R

EMS.10
EMS.12
EMS.13
EMS.14
EMS.18
EMS.21
EMS.22
ENS.30
ENTRY.
EOP.FL

045550-R
045612-R
045650-R
045712-R
045754-R
046016-R
O046034-R
046052-R
100722-R
100723-R

ERRBLK

ERRMSG
ERRNBR
ERRTYP

ERR.CO
EVi
E7.ABP

NRQAML
NRQAM1

045512-R

002134 -R

002132-R
002130-R
002126-R

011012-R
000004
0i14524-R

NRQAM2

NRQAM3

NRQAMZ2
NRQAMS
NRQAM2
NRQAMZ
NRQAM2

NRQAM3
NRQAM3
NRQAM3
NRQAM3S
NRGAM3

NRQAMZ2
NRQAM2

NRQAM3
NRQAM3

NRQAM2
NRGAM2

NRQAM3
NRQAM3

NRQAM1

NRQAMZ2

NRQAM3

NRQAM]
NRQAM]
NRQAM1

NRQAMZ2
NRQAM2
NRQAM2

NRQAM3
NRQAM3
NRQAM3S

NRQAM1
NRQAML
NRQAM1
NRQAM1
NRQAM1

NRQAM2
NRQAM?
NRQAM2
NRQAM2
NRJAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2

NRQAMZ
NRQAM3
NRQAM3
NRQAM3
NRQAMS
NRQAMS
NRQAM3Z
NRQAM3Z

NRQAM1

NRQAM]
NRQAM1
NRQAM1

NRQAM1
NRQAM1
NRQAM1
NRQAM1

043060-R

EMS.EL

EMS.01

A A

EGH. 30

EGD.22
€5D.23

NRQAM1
NRQAM1

A A

006646 R
006734 R

A A A

EGD.20
€GD.21

NRQAM1

NRQAM]
NRQAM1
NRQAM1
NRQAM]
NRGQAM1

LR LR

006512 R
006542-R
006560 R
006610-R
006626 -R

XIS RN R

EGD.14
EGD.15
EGN.1e
€CD.17
EGD.18

REFERENCES. ..

NRQAM1
NRQAM1
NRQAM2
NRQAM2

NROQAM2
NRQAM2

YT Y Y IXIII A

EGD.1%

VAL UE

A L A2 4 24

GLORAL (ROSS RtFERENCE
SYMBO

NRQAMZ

NRQAM2
NRQAM2
NRQAM2

NRQAM2
NRQAM2
NRQAM3

NRQAM3

NRQAM2
NRQAM?2
NRQAM2
NRQAM2
NRQAMD
NRQAM2
NRQAM2
NRQAM2
NRQAM1
NRQAML

NRQAM3
NRQAMS
NRQAMS
NRQAM3
NRQAM3
NRQAM3
NRQAM3
NRQAM3
NRQAM2
NRQAM2

NRQANL

NRQrM1
NRQAM]
NRQAM1

NRQAM1
NRQAML
NRQAM1

NRQAM3
NRQAM3
NRQAM3S

NRQAM3S

NRQAM3

NRQAM2
NRQAM2

PAGH

NRQAM?2
& NRGAMZ
NRQAHZ

NRQAM3Z
NRQAM3

¢ NRQAM3Z

60 0417

vOo/

CNRYAR

1«8

CREATED BY

ON 15 DEC 83 AT 10:4?

GLOBAL CROSS REFERENCE
REFERENCES. . .

Ex.ACC
EX.BDR
Ex.B0W
EX.CBR
Ex.CBW
Ex.CRD
EX.OGM
EX.ELP
EX.ESP
EX.GDS
EX.LBR
Ex.LBW
EX.MTN
EA.ONL
Ex.OP
EX.RBN
EX.RCO
EX.RD
EX.SCC
EX.SDD
EX.SEQ

014322-R
011414 R
O11504-R
011760 R
012030-R
014214-R
014264
-R
014444 R
014414 R
014372-R
011572-R
O011636-R
014244-R
014334-R
025610 R
011702-R
014504-R
014302-R
014346-R
014470-R
014174-R

NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM]
NRGQAM1
NRQAM1
NRQAM]
NRQAM1
NRQAM1
NRGAM]1
NRQAM1
NRQAM1
NRQAML
NRQAM1
NRGQAM1
NRQAM1
NRQAM1
NRQAMY
NRQAM1
NRQAM1

020400 -R

F.12
F.le

020430-R
020454 -R

F.14
F.15
F.16

020560 -R
020620 -R
020646 -R

F.13

F.17

F.18

F.19

F.2
F.20

F.21

F.3

F.4

020502 -R

020712-R

020756 -R

021016-R

017746-R
021056 -R

021130-R

020002 -R

020034 -R

F.S
F.6

020074 -R
020152 -

F.9
GET.10

020360-R
033760-R

F.7
F.8

GET.PK
GET.RE

020226 -R
020302 -R

O033112-R
033636 R

A AL A AR R
A
L AR
L
ISR E X
YT

NRQAM1
NRQAM1
NRQAM1
NRQAM]
NRQAML
NRQAM1
NRQAM1
NRQAM1

NRQAM1

PSS Y Y Y YIS

F.10

025600-R
C14312-R
022466 -R
022550-R
022432 R
022574-R
100744-R
017712-R

AR & A/

VALUE

EX.WRD
EX.WRT
£.BLK
E.DEV
E.UNT
€E.ZER
FREE.M
F.1

NRQAM1
NRQAML

NRQAM2
NRQAM2
NRQAMZ
NRQAMZ2
NRGAM2
NRQAM2
NRQAM2
NRQAM?2
NRQAMZ
NRQAM?2
NRQAM2
NRQAMZ2
NRGAM2
NRQAM2
NRQAMZ2
NRQAM?2
NRQAM2
NRGAM2
NRGAM2
NRQAM2
NRGAM2

NRQAMZ
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAMZ2
NRQAM2
NROAM2

NRQAM2
NRQAM2

NRQAM1

NRQAM2

NRQAML

NRQAM?2

NRQAM1
NRQAM1
NRQAM1

NRQAM1

NRGAML
NRQAM1

NRQAM1

NRQAM2
NROQAM2
NRQAM2
NRQAM2

NRQAM2

NRQAM2
NRQAM2

NROAM?

NRQAML

NRQAM2

NRQAM1
NRQAM1

NRQAM2
NRQAM2

NRQAM1L

NRQAM1
NRQAM]

NRQAM1
NRQAM2

NRQAMZ2
NRQAM?2

PAGE. A
CRE?

SYMBOL.

NRQAM2

NRQAM2
NRQAM2

NRQAM2
NRQAM3

NRQAM3S
NRQAM3

NRQAM3S

'
Q 0414

voe

15 DEC 83 Al

[}

026324 R
026012 R
026140-R
026152 R
026170-R
026200-F
-R
026214
-R
026226
-R
026249
026252 R
-R
026264
026272-R
-R
026022
-R
026306
-R
026316
026330 R
-R
026344
026354 R
026370-R
-R
026406
-R
026420
-R
026032
-R
026044
-R
026056
-R
026066

-R
026076
-R
026106
026120-R
100000
025654 R
-R
025655
-R
025662
025650
-R
-R
025660

025652-R
002136-R
002560-R
-R
002646
002152-R
002162-R
002174 R
002220-R
002310-R
-R
002326
-R
002406
002460 R
010000
000040
020000
034176-k
-R
100712
100716 R

NRQAM2
NRGQAMZ
NRQAM?2
NRQAMZ
NRQAM2
NRQAM?
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAMZ
NRQAMZ
NRQAM2
NRQAMZ
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAMZ
NRQAM2
NRQAM2
NRQAMZ
NRQAM2
NRQAMZ
NRQAMZ
NRQAM?
o

GPSDIS
GRSl
GPS$10
GPs1i1
GP$12

REFERENCES.
..

0EV0CEVEIGVOOVIVOLOBBIVVONOROOOLO000B88H6008S

VALUE

CRE+

CROSS REFERENCE

SYMBOL

GPs13
GPs14
GP$15
GPs16
GP$17
GP$18
GPs$19
GPs2
GP$20
GPs21
GP$22
GPs23
GPs24
GP$2S
GPs26

T<¢8B

GLOBAL

CREATED B8y

00000

CNRQAA

NRQAMZ

NRQAM2
NRQAM2
NRQAMZ
NRQAMZ2
NRQAM2
NRQAM2
NRAAM2
NRQAMC
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM3
NRQAMZ
NRGAM?2

0 NRQAM3S

& NRGQAM3

& NRQAM}

NRQAM3
NRQAM?Y

k0
O

¢
04,

CNRQAA

1<B

CREATEDC B>

ON 15 DtC 8% AT 10:47

CRE}

GLOBAL CROSS REFERENCE
SYMBO.

VALUE

REFERENCES. . .

I00@.0
IPKTA
IRDRx.

ISR
I«E
LOE
LO7

100720-R
076704 R
073654 R
000100
004000
040000
000010

& NRQAM1
& NRQAM1
& NRQAM1
& NRGAM1
4 NRQAM1
2 NRQAM1
@ NRQAML

¢ NRGAM2
& NRQAMZ
& NRGAM2
& NRQAM2

LSy

032676 R

NRQAM1

& NRQAM?

NRQAM]1
& NRQAM1
NRQAML

0 NRQAMZ

LSACP
LSAPT

L$AUT

L$SAUTO
LSCCP
LSCLEA

LsCC
LSDEPQ
LSDESC
LSDESP
LSDEVP
LSDISP

L$OLY

L$DTP
LSOTYP

LsDV
LsOUT

LS$DVTY

L S$EF

002110-R
002036-R

& NRQAM1
& NRQAML

002070-R

& NRQAM1

002032-R
002011-R
025766-R
002076-R
002060-R
002124-R

& NRQAM]
& NRGAML
NRQAM]1
& NRQAM1
& NRQAM1
& NRQAML

032104-R
002106-R
03217G-R

002116-R

002040-R
002034-R

032604 -R
002072-R

025756-R

002052-R

& NRQAM2

NRQAML

002044-R
002126-R
002102-R
002045-R
002064-R
002066-R
26012-R
O002120-R
002016-R
002022-R
026010-R

¢ NRQAM]
¢ NRQAM1
& NRQAM]
& NRQAM1
€ NRQAM1
& NRQAM1
NRQAML
& NRQAM]
& NRQAM1
& NRQAM]
& NRQAM2

LSHWLE
LSICP
LSINIT
LSLADP
LSLAST
LSLOAD

O025646-R
002104-R
032072-R
002026-R
102566-R
002100-R

& NRQAM1
& NRQAM1
NRQAM1
& NRQAM1
NRQAM1
& NRQAM1

LSLUN

LSMREV

LINAME
LSNDHMR
LSNDHd
LINDSF
LSNDSW

025650-R

002074-R

002050-R

002000-R
026210 R
025664
-R
026436-R
025746 R

& NRQAMZ2

NRQAM1
& NRQAM1

# NRQAM]1

NRQAM3
NRQAM3
NRQMM3
& NRQAMS
& NRQAM3
@ NRQAM3
& NRGAMS3

& NRQAMZ2

NRQAM2

LSENVI
LSERRT
LSETP
LSEXP1
LSEXP4
LSEXPS
LSHMARD
LSHIME
LSHPCP
L$HPTP
LSHRDL

—$HM

NRQGAMC
NRQAM2
NRQAM

& NRQAM1

& NRQAM1
& NRQAM1

NRQAM3

& NRQAM2

& NRQAM?
NRQAM2

& NRQAM1

¢ NRQAM]
@
&
&
&
0

NRQAM1
NRGAM2
NRQAM1
NRGQAM2
NRQAM]

PAGE 6

& NRQAM2
& NRQAM4

NRQAMZ

NRQAM3

Gl
Vo2

CNRQ AA

CREAT
8Y
CREATEL

1«8

ON 1S DEC 8% AT 10:47

GLOBAL CROSS REFERENCE
VALUE

LSPRIO
LS$PROYT

002042-R
(Q25750-R

& NRQ@AM1
& NRQAM1

LSREPP
LSREV
LSRPT
LSSFTL

002062-R
002010-R
027574-R
026212-R

& NRQAM1
@ NRQAM1
NRQAM1
& NRQAMZ2

LSPRT

LSSOFT
LSSPC
LSSPCP

LSSPTP
LSSTA
L$SW
LSSHMLE
LSTEST
LSTIML

LSUNIT
MSCP.P
MSG.01

MSG.02

002112-R

002024 R
002030-R
025670-R
025666-R
002114 R
002014-R

O004646-R

& NROAML

002012-R
075224-R

O004700-R

MSG.03

004734-R

M.TER
M_UL
".UP

M.URP

022722-R
023264-R
023204-R
023046-R
023116-R

NEXT.P

101002-R

M.ASC
M.BIN
M.COD
M.DAT

M.UR

NEX

022630-R
022664-R
0227S56-R
023014-R

100764
-R

NEX.TR

032706-R

OF .RC

100756-R

NULL

OUT.I0

PKT
. US
PNT
PRI
PRIOO
PRIC1

PRIOZ2

PRIO3
PRIO4

@ NRQAM]

NRQAM]
& NRQAM1
& NRQAML
& NRQAM1
& NRQAM1
& NR@AM1
& NRQAML
& NRQAM)
& NRQAM]

026214 R
002056 R
002020-R

004050-R
O034140-R

O076706-R
001000
002000
D00000
000040

000100
000140
000200

NRQAM3
NRQAM3S

& NRQAML

NRQAM2

NRGAM3

@
&
@
&

NRQAM2
NRQAM2
NRQAM?2
NRQAM2

NRQAM1
NRQAM1
NRQAM1
NRQAM1

& NRQAM]1
¢ NRQAML
& NRQAM1

& NRQOAM1

& NRQAML

NRQAM2

NROQAM2

NROAM3

& NRQAML

& NRQAM1

NRQAM3

NRQAM2
NROQAM2
NRQAM2

@ NRQAM2

NROAM2
NRQM2

NRQAM3

NRQAMS

NROAM?

NROAMS

NRQAML
NROAMI
NRQAML
NRQAM1

NROAM2
& NRQAM2
@ NROAMZ

NROAM3
& NROAMZ
& NROAM3

€ NRQAM1

& NROQAM2

¢ NRQAM3

& NRQAM2

&
O
&
®

NRQAM3

€ NRQAMLI

€ NRQAMZ
¢ NRQAMZ

¢ NROQAM2
¢ NRQAM2

034034-R
033476-R

¢ NRQAM2
& NRQAM2

PUT.RE

O033744-R

& NRQAM2

100772-R

NRQAM2

NRGAM2

@ NRQAM1

FPJT.IO
PUT.PY.

P.INDE

NRQAMZ2

& NROAM1

000240
000300
000340

03410C-R

¢ NRQAM?2

NRQAM2
NRQAM2

PRIOS
PRIOE
PRIO7

PUTA.B

¢ NRQAMZ2

& NRQAML
@ NRQAM]
@ NRQAM]1

0 NRQAM1
@ NRQAM1
0 NRQAML

¢ NRQAMZ
@ NRQAMZ
€@ NRQAM2

& NROAM?2

NRQAM3

€ NROAM1

PAGE 7

CREV

REFERENCES. ..

SYMBOL

¢ NROAMS
& NRQAMS

& NRQAM3
& NRQAMS

& NRQAMS
@ NRQAMS
€ NRQAM3

NRQAM3
NRQAM3

NRQAM3

NRQAM2

NRQAMX

H1
voe

E0 0421

SYMBOL

VALUE

QIO

100742
073652
025562
076722
004766
005472

.A
RORX

RDRX .E
RETPXT

RPTM1
RPT10
RPT11
RPT12
RPT13
RPT14
RPT1S
aPT16
RPT?2
RPT3
RPTA
RPTS
RPTE
RPTY
RPTS8
RFT9
RP
. ADD

RP
. IND

RP .USE

SA.REG
S8.C00
SC.CLx
SC.CON
SC.CT0
SC.DIS
SC.DST
SC.DS2
SC.ouP
SC.ECC
SC.ECD
SC.EC1
SC.eC2
SC.EC3

SC.ECA
SC.ECS
SC.EC6
SC.EC7
SC.EC8
SC.EC9
SC.EDC
SC.FCT
SC.FER

SC.FE2

SC.FUL
SC.rlP
SC.I0S
SC.10P
SC.ISH

15 OFC 898 A7

lu:a!?

..
REFERENCES.

077226-R
-R
077222
100760 R
-R
100752
017504 R
014560-R
016772 R
015102-R
015500 R

015554 R

-R
014602
-R
015626
015710 R
016160 R
016210-R

-R
016240
016272-R
-R
016322
016352-R
-R
016402
-R
016434
-R
016466
017122-R
016112-R
-R
015174
015262-R
-R
015762
016570-R
017136-R
-R
015034
-R
015340

NRQAM1
NRQAM1
NRGAML
NRQAM1
NRQAM]
NRQAM1
NRQAM1
NRQAM]
NRQAM1
NRQAM1
NRQAM1
NRQAML
NROAM]
NRQAM1
NRQAM1
NRQAM1
NRQAM1L
MRQAM]
NRQAM]
NRGAM1
NRUAML
NRQAML
NRQAM1
NRQAM1
NRQAM1

NRQAM2
NRQAM2
NRQAMS
NRQAM2
NRQAM2
NRQAM2

NRQAM1

NRQAM1
NRQAM1
NRQAML
NRQAM]
NRQAM1

NRQAM3

NRQAM2
NRGAMZ
NRQAM2
NRQAM2
NRQAMZ2
NRQAMZ2
NRQAM2
NRQAM2

NRQAM2

NRQAMS
NRQAM3
NRQAM3
NRQAM3
NRQAM3

NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAML

NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAML
NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRGAM1
NRQAM]
NRQAM1
NRQAM1

NRQGAMZ
NRQAM3

NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2

PAGE 8
CRE!

CROSS REFERENCE

000NNV RBGEPOGONOIVVOOVVCLOINVOOOLHBNGGIOOGOBOBNOO

GLOBAL

CRE-ED B

DDVDODDBD

CNRQAA

S€EG Obce

voe2

GLOBAL

CREATED BY

SYMBOL

VALUE

SC.ISe
SC.NXM
SC.00A
SC.00B
SC.ONL
SC.PAR
SC.POE
SC.PSP
SC.RCY
SC.RDY
SC.RSP
SC.SDI
SC.SDS
SC.SON
SC.SRI
SC.SRT
SC.SUR
SC.SwP
SC.UNK
SC.vOL
SC.576
SEND
SET.CP
SET.UP
SFPTBL
SPACE4
STEP
ST.C00

015420 R
016702 R
016630-R

SuMl
SwP .DP

SWP _ER
SWP _FL
SWP _RA
SWP
. UC
SWP
. UD
_ XF
SWP
SWQ1
SWQ10
SWa11

SWa13
SuQl4e
SHE15
SWQ17
SWa19

SWa?7
SWQ9

S.0uPP
S.PATT

TKB

ON 15 DEC 83 AT

10:47

016660 R
014632-R
016736-R
017366-R
017630-R
015742-R
017422-R
017532-R
-R
014534
-R
017044
014654 R
017300 R
-R
017206
-R
017600
016530-R

014674 R
014754 R
016036 R

-R
034450
032716 R
033012-R
025670-R
025622-R

4
10075-R
100750-R

003760-R
-R
025676
025670-R
-R
025674
-R
025702
-R
025700
-R
025706
-R
025672
002700-R
-R
003154

-R
003220
003252-R
-R
003356
-R
003426
-R
003444
-R
003514
-R
003602
002722-R
003672-R
-R
003004
-R
003026
003100-R
100774-R
100776-R

REFERENCES.
..

NRQAM1
NRGQAML
NRQAML
NRQAM1
NRQAM1
NRQAM1
NRGQAM1
NRQAM1
NRQAML

NRQAM1
NRGQAM1
NRQAM1
NRQAM]
NRQAM1
NRQAM1
NRQAM1
NRQAM]
NRGQAM1
NRQAM1
NRQAM1
NROAM1
NRQAM2
NRQAMZ2
NRQAM?
NRQAM1

NRQAM1
NRQAML
NROAM1

NRQAM1
NRQAM1
NRGAM1
NRQAM1
NRQAM1
NROAM1
NRQAM1
NRGAM1
NROAML
NROAM]1
NRQAM1
NROQAM1
NRQAML
NRQAML
NRQAML
NRQAML

NRQAM1
NRQAM]1
NRQAM1
NRQAM1
NRQAM1
NRQAM1

NRQAM1
NRQAM1

PAGE 9
CRE!

CROSS REFERENCE

CO0VVUOLOVVVLTVGELLVOVVVORONEBBVVUOOVGBTHOB0VHLBVOOODGOO

CNRUAA

NRQAM?2
NRQAM2
NRQ@AMZ
NRQAM2
NRGQAM2
NRQAM2
NRQAM2

NRQAM2
NRQAM2
NRQAM2
NRQAMZ
NRQAM2

NRQAM3
NRQAMS

NRQAM3S

NRQAM3
NRQAM3

J1
SEQ 0422
voe

CNRUAR

CREATEC BY

ON 15 DEC 83 Al 10:47

TKB

GLOBAL CROSS REFERENCE

T.FAT
T.INF

-R
022264

022366
-R
022316-R

T.QUE

022242-R

T.TER
T2

022342-R
-R
046266

WALY
xx13

-R
035064
012100-R

XX15
XX16

012136-R
012160-R

T.SPL

UAM

Xx1i4

xXx1~

XX18

XX19

xX20

022412-R

000200

012122-R

012206-R

012224
-R

012234 R

xx21
xx22
xX23

012246 R
012262-R
012322 R
012356-R

XX24
XX25
XX26

012412-R
012452 R
012522-R

xXX29
xXXx30

012640-R
C12664
-R

xxe?7
xXxX31

AX32

xXx33
Xx34

xXx3S
xx37

012576-R

01271?-R
012744

012772 R
013030-R

013100-R
013116 R

xx38
xXx39

C13142-R
013206 R

XX40

013234
-R

SENC.L
$SAVEZ2

102650-R
073440-R

xXx41

$SAVE3S
$SAVE4
$SAVES

013254
-R
073454 R
073472-R
073512 R

NRQAML

NRQAM2

NRQAM1

¢ NRQAM4

NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM]
NRQAM1

NRQAMZ
NRQAM2
NRQAM?2
NRQAM2
NRQAM2
NRQAM2
NRQAM3

NRQAMA

NRQAM]

NRQAM1

*
0

T.DEF

073660 R
102646 R
000003
075220-R

HHHSOHHOHO

TALLY
TSFREE
T$PTHY
T.ADDR

CRE¢+

REFERENCES.
..

000NV VVEOVVODLCOORNVLLGONOHOOO0HS

VALUE

SYMBOL

PAGE 10

NRQAM2

NRQAM3

NRQAM2

& NRQAM3

NRQAM2
NRQAM]
NRQAM]
NRQAM1
NRQAM]
NRQAM1
NRQAM]
NRQAML
NRQAM1
NRQAM1
NRQAM1
NRQAM1
NRQAM]
NRQAM]
NRQAM;
NRQAr1
NRQAML
NRQAM1
NRQAM1
NRQAM1
NRQAM1

NRQAM3
NRQAM2
NRQAMZ
NRQAM2
NRQAM2
NRQAM2
NRQAMZ
NRQAM2
NRQAM?2
NRQAMD
NRQAMZ2
NRGAM2
NRQAMZ
NRQAM?
NRQAM2
NRGAMZ
NRQAM2
NRQAM2
NRG 2
NRQAM2
NRQAM2

B16MUL

¢ B1l6SAV

NRQAM1
NRQAM1
NRQAM]
NRQAM1
NRQAM1
NRQAM1
NRQAM1
B16SAYV
816S5Av
B16MA.

NRQAM3

NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM2
NRQAM?
NROAM?

NRQAM2
NRQAM2
& B165SAV

NRQAM2
NRGAM3S
NRGAM3
NRGAM2

NRQAMZ
NRQAM3

<1
SEQ O4c4

vo?