Digital PDFs

AH-T615C-MC

October 2005

298 pages

Original

127MB

view download

OCR Version

164MB

view download

Document:	CZQNAC0 DEQNA DEQNA FUNCTIONAL TEST OCT 1984 bw
Order Number:	AH-T615C-MC
Revision:	000
Pages:	298
Original Filename:	CZQNAC0__DEQNA__DEQNA_FUNCTIONAL_TEST__AH-T615C-MC__OCT_1984_gray.pdf

OCR Text

DE QHA

FUNCTIONAL T

i.'.ifi.fi

H-TE156-HG

ENENED

Made

USA

b et et e e e et e et b et Pt et et et et et e P
e
et e P
e et et B P
b Pt Pt et b Pk d e et et Pt b e P
P

OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOONOOOOO

D OO O OO

CZGNACO DEGNA FUNCTIONAL TEST

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

VAX-11 Bliss-16 v4.0-579
[(MAZURCZ
YK .DEGNA )ZGNA1.BLI;2

MODULE ZGNAL1 (#TITLE ‘CZQGNACO DEQGNA FUNCTIONAL TEST'
IDENT = 'V01.0',

#SBTTL

ADDRESSING _MODE(ABSOLUTE),
LANGUAGE(BLISS16)) =

‘GLOBAL DEFINITION MODULE’

BEGIN
o(

IDENTIFICATION
PRODUCT CODE:

AC-Té614C-MC

PRODUCT NAME:

CZGNACO DEQGNA FUNCTIONAL TEST

PRODUCT DATE:

JWLY 5,

MAINTAINER:

PSD DIAGNOSTIC ENGINEERING

AUTHOR :

S. MAZURCZYK

1984

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 OTHER COPIES THEREOF,

MAY NOT BE PROVIDED OR

OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON

EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE
;gRHS.

TI&E TO AND

EMAIN IN

OWNERSHIP OF THE

SOFTWARE

SHALL AT ALL TIMES

THE INFORMATION IN THIS SOFTWMRE IS SUBJECT TO CHANGE WITHOUT NOTICE

e’gl’m?fl NOT BE CONSTRUED

AS A COMMITMENT

BY DIGITAL

EQUIPMENT

DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
SOF TWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.
THE FOLLOWING ARE TRADEMARKS OF DIGITAL EQUIPMENT CORPORATION:

DIGITAL
DEC

POP

DECUS

UNIBUS

DECTAPE

MASSBUS

,SEQ 0001

Page

(1)

ZGNAL

CZQNACO DEQNA FUNCTIONAL TEST

vC1.0
: C 0050

GLOBAL DEFINITION MODULE
1

: C 0053

: C 0052

: C 0054
s C 0053

1
1

: C 0057

: C 0056

1
1

C 0064
C 0065
C 0066
C 0067
C 0068
C 0069
C 0070
C0071
C0072

1
1
1

;
:
;s
:
;
;
:
:
;s

C 0060
C0061
C 0062
C 0063

: C0073

: C 00784

GENERAL INFORMATION
PROGRAM ABSTRACT
SYSTEM REQUIREMENTS
RELATED DOCUMENTS AND STANDARDS
ASSUMPTIONS
OPERATING INSTRUCTIONS
COMMANDS

1
1
1

2.0
- 5 |
2.2
2.3
2.4
2.5
2.6

SWITCHES
FLAGS
HARDWARE QUESTIONS
SOF TWARE QUESTIONS
QUICK STARTUP PROCEDURE

3.0

ERROR INFORMATION

4.0

TESY SUMMARIES

5.0

MAINTENANCE HISTORY

1
1

s C 0077

: C 0076

: C 0078

: C 0079

s6804000000000¢0s

1.0
1.1
1.8
1.9

1
1
1
1

C007S

TABLE OF CONTENTS

: C 0058
: C 0059

:
:
:
;:

5-Jul-1984 14:00:51

C0051

S-Jul-1984 14:03:26

1.4

VAX-11 Bliss-16 V4.0-579

[MAZURCZYK.DEGNA)ZQNA1.BLI;2

98099.222

D1
CZQNACO DEQGNA FUNCTIONAL TEST
GLOBAL DEFINITION MODULE

ZGNA1

v01.0

i P
e ot o
e

0101
0102
0103
0104
0105
0106
0107
0108
0109
0110
0111
0112
0113
0114
0115
0116
0117
o118
0119
0120
0121
01z2
0123
0124
0125
0126
clz27
0128

et Pt b P

e P

e o

b Pt e

o e

b i

ot o

o Pt ot

b e

et o

0098

et Pt o

et b e

o o

0089

VAX-11 Bliss-16 V4.0-579
(MAZURCZYK.DEGNA JZGNA1.BLI;2

GENERAL INFORMATION

b et e Pt et e

1.0

Pd et

OOOOO0O0OOOOONaOOOOOOOOOOOO0OOOOOOONOOOOOOOOOOOOOON

C 0080

S5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

The DIGITAL ETHERNET Q-Bus Network Adapter (DEGNA) Field Functional
Diagnostic Program (ZGNA) performs extensive functional testing of
the DEGNA/M7504 module for Q18 or Q22-Bus based PDP-11 systems. ZGNA
program attempts to isolate faults to the following Field Replacable

Units (FRU's): DEGNA, bulkhead assembly, transceiver cable, circuit
breaker ( fuse in bulkhead assembly ) and transceiver. This software
also attempts to localize faults to the functional areas of tre DEGNA

module.

A test operator controls testing of the module from a console

( hard copy or CRT

)

This diagnostic
runtime services

the

has been
written for use
with the diagnostic
software (supervisor).
These services provide
interface to the operator and to the software environment.

For & complete description of the runtime services, refer to the
XXDP+ user's
manual.
There is a brief description of the runtime

services in section 2 of this document.

1.2

SYSTEM REQUIREMENTS

The ZGNA software operates on a typical 'newer PDP-11 processor’' system
that has one or two DEGNA modules on the Q18 or Q22 system bus.
The internal and internal/extended loopback mode tests do not
require the transceiver or the loopback connector to be unplugged.
The external loopback mode may be used with a terminated transceiver
that has no network cable attached.
Testing DEGNA module and its interface to the Ethernet requires
following hardware:
Typical system ( PDP-11/23 Plus,
DEQGNA module,
Minimum of 28K words of memory (

ORION ) with Q-Bus,
supporting block or non-block mode

Corsole terminal,
Loopback connector ( male loopback connector, Part & 12 221 96-01

Bulkhead assembly,

Transceiver cable,

and transceiver ( H4000 ).

SEQ 0003

(3)

El
CZQNACO DEGNA FUNCTIONAL TEST

ZGNAL

v01.0

s
s

5-Jul-1984 14:03:26

GLOBAL DEFINITION MODULE

C0129

EOIID

;: C0132

: C0133

: C 0131

: C 0133

s £ 01835

1
1

: C0141
: C 0142

1
1

B OIRR

: C 0146
s C 014;

1
1

: C 0143

: C 0145

;: C Qo148

: C 0149

1.4

ASSUMPTIONS
eeesecceee-

It is assumed that the system has been tested without DEGNA and found
work ing before this diagnostic is run, or that DEGNA DEC/X11
Exerciser has dropped DEGNA option module when running system test.

2.0

s C 0153
: C 0154
3 E 8122

1
1
1

s E 0157

: C 0159

.
1

CO0158

:
:
;:
;:
;
:
;:
;:
:
;
;:
;
3

C 0160
CO161
C 0162
C 0163
C 0164
C 0165
C 0166
C 0167
C 0168
C 0169
C0170
C0171
E 0172

1
1
1
1
1
1
1
1
1
1
1
1
i

s C 0174
s L 0175

1
1

OPERATING INSTRUCTIONS
e

This section contains a brief description of the runtime services.
for detailed information, refer to the XXDP+ User's Manual (CHQUS).

0173

RELATED DOCUMENTS AND STANDARDS

O eesReesREsASASRRSASES
SRR S e s

1
1
1

: C 0150
s EOIBY
: C 0152

1.3

(MAZURCZYK.DEGNA]ZGNA1.BLI;2

XXDP+ Supervisor/User’'s Manual - ( CHQUS ).

CO13
;
s C 0137

: C0138
: C0139
: C 0140

5-Jul-1984 14:00:51

VAX-11 Bliss-16 V4.0-579

2.1

COMMANDS
e eeas

There are eleven legal commands for the diagnostic runtime services
(supervisor).
This section lists the commands and gives a very
brief description of them.
The XXDP+ User's Manual has more details.
=

COMMAND
eeeeces

START
RESTART
CONTINUE
PROCEED
EXIT
ADD
DROP
PRINT
DISPLAY
FLAGS
ZFLAGS

EFFECT

ececcecccccccscccsscccccssens

Start the diagnostic from an initial state
Start the diagnostic without initializing
Continue at test that was interrupted (after tC)
Continue from an error halt
Return to XXDP+ monitor (XXDP+ operation only!)
Activate a unit for testing (all units are
considered to be active at start time
Ceactivate a unit
Print statistical information (if implemented
by the diagnostic - section 4.0)
Type a list of all device information
Type the state of all fl
(see section 2.3)
Clear all flags (see section 2.3)

A command can be recognized by the first three characters,
for example, type
“STA"” instead
of "“START",
So you may,

SEQ 0004

Page

F1
ZGNAL

CZQGNACO DEQGNA FUNCTIONAL TEST

GLOBAL DEFINITION MODULE

0180

0181

OR08
0187

F -

the

switches are

legal

switches which are used to modify supervisor
switches

appended

are

to the legal

commands.

tabulated below with a brief

description of each. In the descriptions below, a decimal number
is designated by "DDDDD".
o

SWITCH
e

EFFECT
S

/TESTS:LIST

e e e

e e

several

operation. These

e e e e e e

/PASS :00DDD
/FLAGS:FLGS
/EOP :DDDDD

JUNITS:LIST

S SR S

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

numbers, for example - /TESTS:1:5:7-10.
This list will cause tests 1,5,7,8,9,10 to
be run. All other tests will not be run.
Execute DDDDD passes (DDDDD = 1 to 64000)
Set specified flags.
flags are described
in section 2.3.
Report end of pass mess

after every

DDDDD passes only.
(DDDDD = 1 to 64000)
TEST/ADD/DRCP only those units specified
in the list.,

List example -

/UNITS:0:5:10-12

use units 0,5,10,11,12 (unit numbers = 0-63)
Example of switch usage:

e e

0197
0198

0190
0191
0192
0193
0194
0195

There are

All

(MAZURCZYK.DEGNAJZQGNA1.BLI;2

wesessws

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

e o e

0188
0189

1. Tests 1 thr
S will be executed.
2. All units will be tested 1000 {imes.
3. The end of pass messages will be
printed efter each 100 passes only.

A Switch can be recognized by the first three characters.

e e

0185

5-Jul-1984 14:00:51

VAX-11 Bliss-16 V4.0-579

SWITCHES

0184

0182
0183

0178

0179

& -

BORY?

2.2

C 0176
glgigigislialisisiglisisinisisisisinisigisigisisisisinisinisisisisinisislialialsl

TR T

TN DO

LN LN LN LI

LN TN

DN TN DO

LN TN LI

TN DI

TN LI

TN T

TN TN TN T

)

v01.0

S-Jul-1984 14:03:26

may, for

example, type

"/TES:1-5"

instead

You

of "“/TESTS:1-5".

SEQ 0005

Page

(5)

Gl
CZQNACO DEQNA FUNCTIONAL TEST

0225

0226
0227
0228
0229

0230
0231

ot et i ot et et
P
ot o

0223

0224

et ot ot ot o

0216
0217
0218
0219
0220
221
222

GLOBAL DEFINITION MODULE

zlalsislisizisigislisisinlislinlinls]

ZGNAL
v01.0

5-Jul-1984 14:03:26
S-Jul-1984 14:00:51

Below is a table that specifies which switches can be used by
each command.

START
RESTART

CONTINUE

PROCEED

DROP
ADD

DISPLAY

FLAGS

ZFLAGS
EXIT

TESTS

PASS

FLAGS

EOP

UNITS

X
X

X
X
X

X
X

VAX-11 Bliss-16 V4.0-579

[MAZURCZYK.DEGNA]ZQGNA1.BLI;2

SEQ 0006

(6)

H1
v01.0

GLOBAL DEFINITION MCDULE

; C 0232

C 0235
C 0236
C 0237
C 0238
C 0239
C 0280
C 0241

1
1
1
1
1
1
1

: C 0233

g B D238
;: C 0234

;
;
:
:
:
:
;

: C 0242

;: C 0244

8
1

; C 0254
g € 0255
; C 0256

: C 0262
: C 0263

; C 0264
;: C 0265

: C 0266
: C 0267
;: C 0268

3 E 8538

IDR

Execute autodrop code
Loop on test

EVL

0276

Inhibit extended error reports (those
called by PRINTX macro’'s)
Direct messages to line printer
Print test number as test executes
"BEL!..” on error
Unattended mode (no manual intervention)
Inhibit statistical reports (does not apply
to diagnostics which do not support statistical reporting)
Inhibit program dropping of units

ADR
LOT

all error reports except first

level (first level contains error type,
number, PC, test and unit)

UAM
ISR

1
1

: C 0274
H g 0275

Inhibit

PNT
BOE

1
1

s C 0273

s C 027
s C 0272

Inhibit all error reports

PRI

1
1

Halt on error - control is returned to
runtime services command mode
Loop on error

IXR+

1
1

T e
o

LOE
IERs
IBR+

1
%
1

: C G261

EFFECT

1
1

cleared as specified by the last flag switch.

s C 0257
;: C 0258

: C0259
;: C 0260

Flags are used to set up certain operational parameters such as
looping on error. All flags are cleared at startup and remain
cleared until explicitly set using the Fflags switch. Flags
are also cleared after a start command unless set using the
flag switch. The ZFLAGS command may also be used to clear
all flags. with the exception of the START and ZFLAGS commands,
No commands affect the state of the flags: they remain set or

HOE

[(MAZURCZ YK .DEQNAJZGNA1 .BLI;2

FLAGS

1
1
1

: C 0250
s C 0252
; C 0253

2.3

S-Jul-1984 14:00:51

i Sa e e

FLAG

1
1

: C 0251

: C02a5
: C 0246

: C 0247
; C 0248
: C 0248

VAX-11 Bliss-16 V4.0-579

5-Jul-1984 14:03:26

CZQNACO DEGNA FUNCTIONAL TEST

ZGNA1L

Execute evaluation (on diagnostics which
have evaluation support)
serror messages are described in section 3.0

1
1

See the XXDP+ User's Manual for more details on flags.
You may
specify more than one flag with the flag switch.
For example,

1
1

and

cause

the program to

type a “BELL"”

loop on error,

on error,

/FLAGS:LOE: IER:BOE

inhibit error reports

you may use the following string:

SEQ 0007

Page

(7)

I1
ZGNA1L

CZGNACO DEQNA FUNCTIONAL TEST

0307
0308
0309

et ot et et
et o Pd et et
e Pt o
b e ot e

[(MAZURCZYK.DEGNA]JZGNA1.BLI;2

HARDWARE QUESTIONS

When a diagnostic is started, the DRS prompts the user for hardware
information by displaying

“CHANGE HW (L) 2"

you must answer “Y" after a start command unless the hardware

information has been "preloaded” using the Setup Utility (see chapter
6 of the XXDP+ User's Manual). When you answer this question with a
"y, the DRS asks for the number of units.
following questions for each unit.

You will then be asked the

¢ OF DEVICES (D) ?

Answer with the number of units to be tested (no default). This answer
will determine how many times the following questions are asked.
One 1) device must be specified.

ol o

2.4

5-Jul-1984 14:00:51

VAX-11 Bliss-16 V4.0-579

DEGNA I/0 PAGE

ADR

(0) 174440 ?

o
o
o
e e e o P

0277
0278
0279
0280
0281
0282
0283
0284
0285
0286
0287
0288
0239
0290
0291
0292
0293
0294
0295
0296
0297
0298
0299
0300
0301
0302
0303
0304
0305
0306

GLOBAL DEFINITION MODULE

e et et o

(alglglisisisisisisisizsizsisisininisisisisisialininisisialisizsiasislinlsnl

v01.0

5-Jul-1984 14:03:26

Answer with the address of the 1/0 page register assigned for one

of the DEGNA devices. The 1/0 page addresses permited are:
and 174460.

174440

INTERRUPT VECTOR ADR (0) 700 ?
Answer with the interrupt vector address of the DEGNA module.

Interrupt vector address for device st 1/0 page address 174440 is 700
oct. and that for 1I/0 page address of 174460 is 704 oct.

SEQ 0008

(8)

J1
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL DEFINITION MODULE
et et e et et
b e e
b o
b e
b ot
b o
e ot

2.5

CONTINUE command, the DRS asks for software parameters. These
parameters govern some diagnostic specific operation modes.
You will

be prompted by

CHANGE SW (L) ?
if you wish to change any parameters, answer by tvping "Y".

b o
b ot

The

software questions and the default values are described in the next

paragraph(s).

DO YOU WANT TO TEST SANITY TIMER (L)?
If you wish to test the Sanity Timer logic, answer by typing "Y",
uhenegeilthis question is answered with a "Y” following question
follow:

SANITY TIMER TIMEOUT VALUE (D)?
Answer with the TIMEOUT VALUE bein? a decimal number between 0 and 7.
Use table below to select desired TIMEOUT VALUE.

b e o

SOFTWARE QUESTIONS

After you have answered the hardware questions or after a RESTART or

will

TIMEOUT PERIOD IN SEC.

Answer with “Y"

b e

e (b

b e e

60
240
960
3840

b o o

b o

NoOMbsWN=O

TIMEOUT VALUE

EXTERNAL LOOPBACK MODE (L)?

h e e o

VAX-11 Bliss-16 V4.,0-579
[(MAZURCZYK.DEGNAJZGNA1.BLI;?2

sequence.
“N”

if you want to execute

"TEST 7"

include "TEST 7"

in the test

is the only test that uses external loopback mode.

inhibits execution of "TEST 7.

SYSTEM HAS BLOCK-MODE MEMORY (L)?
Answer with "Y"

if the system has block-mode memory and “N"

it has non block-mode memory.

IS LOOPBACK CONNECTOR IN DEGNA (L)?

0310
0311
0312
0313
0314
0315
0316
0317
0318
0319
0320
0321
0322
0323
0324
0325
0326
0327
0328
0329
0330
0331
0332
0332
0334
0335
0336
0337
0338
0339
0340
0341
0342
0343
0344
0345
0346
0347
0348
0349
0350
0351
0352
0353
0354
0355
0356
0357
0358
0359
0360
0361

0 e

slglsisiasisisisislisisisisisigisigisisisisigisisigigisigigigisisligisisisislislisislinisialsisisislisislislinly]

—

ZGNA1
.o

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

Answer with "Y"
module.

if loopback connector
is in the back of the DEQNA

SEQ 0009

Page

(9)

iK1
CZQGNACO DEGNA FUNCTIONAL TEST

ZANAL
.0
ot e et ot

QUICK START-UP PROCEDURE

(XXDP+)

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

To start-up this program:
]

Boot XXDP+

Give the date

Type

"R Name”,
"START"

Type

Answer the

is the name of the BIN file for

Answer all the hardware questions

where Name

Answer the

"“CHANGE SW" question with "Y”

this program

Answer all

the software questions

"CHANGE HW" question with "Y"

b o

b fd e o

ot ot e o

b e o

2.6

5-Jul-1984 14:00:51

VAX-11 Bliss-16 V4.0-579
[(MAZURCZYiK.DEQNA]ZGNA1.BLI;2

b
b ot ot et o
Pl

GLOBAL DEFINITION MODULE

[

slglsislisisisiglisizisisisisisisisligisisisisislislisglisly]

0362
0363
0364
0365
0366
0367
0368
0369
0370
0371
0372
0373
0374
0375
0376
0377
0378
0379
0380
0381
0382
0383
0384
0385
0386
0387
0388

5-Jul-1984 14:03:26

When you follow this procedure you will be using only the defaults for

flags and software parameters.

previous sections.

These defaults are described in the

SEQ 0010

Page

(10)

L1
VAX-11 Bliss-16 V4.,0-579
[(MAZURCZYK.DEGNAJZQGNAL1.BLI;2

3.0 ERROR INFORMATION

There are three levels of error messages that may be issued by
a diagnostic: general, basic and extended.
General error messages
are always printed unless the IBE and/or IER flag is set. The general
error message is of the form:
NAME
where;

b o

b e

b ot ot et et

s e

et ot

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

ER_NO

UNIT_NO

TEST_NO

PC_ADDR

NAME = Diagnostic name

ER_TYPE = Error type ( all errors are HARD )

ER_NO =
UNIT_NO
TEST_NO
PC_ADDR

b o
b o
b
o
o
b o (o
b
b o
b ot

ER_TYPE

Error number
= O
= Test and subtest where error occurred
= Program Counter contents

Basic error messages are messages that contain some additional
information about the error.

These are always printed unless one or

more of the DRS error flag(s) ( IBE, IXE, IER ) is set. These
messages are printed before the associated general message.

Extended error messages contain supplementary error information such
as register contents or
/bad data. These are always printed unless
the IXE and/or IER flag is set. These messages are printed after the
associated general error message and any associated basic error
messages. A typical extended error message might have a following
format:

b
o
b o
b
o
b (o
b
0

aslslaslislisislislsisisislisislisgisislisislisigislisisisisisisisislislislislisigislisisislisgislslislaly]

©°

CZQGNACO DEQNA FUNCTIONAL TEST
GLOBAL DEFINITION MODULE

TRANSMIT DESCRIPTOR LIST

RECEIVE DESCRIPTOR LIST

Flag Word

High Order Addr Bits

Low

Order Addr Bits

Packet Length (byte)
Status Word 1
Status Word 2

Low

Order Addr Bits

Packet Length (byte)
Status Word 1
Status Word 2

SEQ 0011

0459
0460
0461
0462
0463
0464
0465

0467

0468
0469
0470
0471
0472
0473
0474
0475
0476
0477
0478
0479
0480
0481
0482

0483

0484
0485

=
S
R
S
e
o e e
e
e e e e e e e
e
e e

0457
0458

e e

0454
0455

T e o e e e e e

0447
0448
0449
0450
0451
0452
0453

o e

0446

T o o o

0445

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEGNAJZGNA1.BLI;2

The following are possible error messages.

0441
0442

0443
0444

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

SPECIFIC ERROR MESSAGES

0433
0434
0435
0436
0437
0438
0439
0440

CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL DEFINITION MODULE

(slslslizsizslisizsizisisisizsisigisisisisisisisisisinisizsisisisisisisisisisisisisinisisinisisisisinisininininlin]

ZGNA1
v01.0

DEQNA FATAL ERROR DETECTED
ACTUAL DATA = octal number EXPECTED DATA = octal number
BAD CSR: ACT = octal number EXP = octal number
BAD TRANSMIT FLAG WORD: ACT = octal number EXP = octal number
BAD TRANSMIT STATUS WORD i: ACT = octal number EXP = octal number
BAD RECEIVE FLAG WORD: ACT = octal number EXP = octal number
BAD RECEIVE STATUS WORD 1: ACT = octal number EXP = octal number
BAD RECEIVE BUFFER LENGTH: ACT = octal number EXP = octal number
BAD CSR = octal number
LOOPBACK PACKET UNABLE TO SET CA BIT, CSR = octal number
LOOPBACK PACKET UNABLE TO CLEAR CA BIT, CSR = octal number
CA BIT OK, BUT RI BIT IS NOT ON, CSR = octal number
CA BIT IN THE CSR WAS SET TOO EARLY, CSR = octal number
BAD CSR, EXPECTED, XL AND RL ( BITS 4,5 ) TO BE RESET T0 O
BAD CSR, EXPECTED, XL AND RL ( BITS 4,5 ) TO BE SET T0 1
BAD CSR, EXPECTED, RI ( BIT 15 ) TO BE SET T0 1
BAD CSR, EXPECTED, XI ( BIT 7 ) TOBE SET TO 1
BAD CSR, EXPECTED, NI ( BIT 2 ) TO BE SET T0 1
BAD CSR, EXPECTED, NI ( BIT 2 ) TO BE RESET T0 O
CSR ADR = octal number ACTUAL = octal number EXPECTED = octal number
UNABLE TO RESET DEQGNA: ADR: address CSR = octal number
WAIT ABOUT number SECOND(S)
SANITY TIMER TIMED OUT AS EXPECTED
NO SANITY TIMER INTERRUPT DETECTED

DISCONNECT TRANSCEIVER CABLE FROM BULKHEAD ASSEMBLY AND CONNECT
LOOPBACK CONNECTOR TO BULKHEAD ASSEMBLY, THEN RETEST
DISCONNECT BULKHEAD ASSEMBLY FROM DEQNA AND CONNECT
LOOPBACK CONNECTOR TO DEGNA, THEN RETEST
CHECK FOR LOOSE WIRES IN A LOOPBACK CONNECTOR OR USE DIFFERENT
LOOPBACK CONNECTOR, THEN RETEST
REPLACE DEQGNA, THEN RETEST
REPLACE BULKHEAD CONNECTOR, THEN RETEST

DISCONNECT TRANSCEIVER CABLE FROM TRANSCEIVER AND CONNECT IT TO
LOOPBACK CONNECTOR AND BULKHEAD ASSEMBLY
REPLACE TRANSCEIVER CABLE, THEN RETEST
REPLACE TRANSCEIVER, THEN RETEST
REPLACE THE FUSE IF BAD, THEN RETEST
BAD RECEIVE DESCRIPTOR:
BAD TRANSMIT DESCRIPTOR:
BAD RECEIVE BUFFER:
ACTUAL = octal number EXPECTED = octal number
DMA OPERATION TAKES TOO LONG
TO0 MANY DEVICES
THERE WAS A POWER FAIL - WAITING
WAIT ABOUT decimal number MINUTE(S)
WAIT ABOUT decimal number HOUR

INDEX = decimal number

IF NO RESET, TYPE ANY CHARACTER TO EXIT FROM TEST

SEQ 0012

Page

12
(12)

N1
CZQGNACO DEQNA FUNCTIONAL TEST

]
S
e
e
e
e

0486
0487
0488
0489
0490
0491
0492
0493
0494
0495
0496
0497
0498

GLOBAL DEFINITION MODULE

5-Jul-1984 14:00:51

TOR VALUE = OsN'),
BAD CSR, BITS STUCK AT O:
BAD CSR, BITS STUCK AT 1:

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

[MAZURCZYK.DEQGNA]ZQGNAL1.BLI;2

SOFTWARE: RESET UNABLE TO CLEAR CSR STATIC BITS:
BAD STATION ADDRESS CHECKSUM: ACT = octal number EXP = octal number
BAD STATION ADDRESS: station address
BAD DEGNA I/0 PAGE REGISTER: register address
BAD CSR, EXPECTED RL ( BIT S ) TO BE SET T0 O
BAD B/D PROM CHECKSUM: INDEX = octal number ACT = octal number EXP = octal number
B8/D PROM CHECKSUM OFFSET = octal number ACT = octal number EXP = octal number
BAD INTERRUPT: ADR = octal number ACT LEV = octal number EXP LEV = octal number
REGISTER FAILED TO RESPOND AT ADDRESS:

OOO00OO0O0O0OOO0OO0O0

ZQANA1
V01.0

S-Jul-1984 14:03:26

SEQ 0013

Page

(12)

B2
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL DEFINITION MODWLE

VAX-11 Bliss-16 v4.0-579
[(MAZURCZYK.DEGNA]JZGNA1.BLI;2

TEST SUMMARIES

4.0

s et

Each test has its own test summary; therefore, test summaries are not
included here.

s
o

0499
0500
0501
0502
0503
0504
0505
0506

OOOOO0

ZGNAL
v01.0

5-Jul-1984 14:03:26
5-Jul-1984 14:00:5 1

SEQ 0014

Page

(13)

0507

0508
0509

;1999
2000
i

2001

;2002
2003
:

1
1
1
1

1
1

LIBRARY ‘QGNALIB';
REQUIRE ‘BLSMAC.REQ;
oo
'--

PSECT

<2006
:
;2007

1
1

LITERAL

2009

2011

2008

1
1

20i3

1
1

POINTER (ALL);

;2015

;2012
;2014

;2016

! DIAGNOSTIC SUPERVISOR LIBRARY

DS$NBR_OF _TESTS = 21;

EQUALS;

2010

tee

THE PROGRAM HEADER IS THE INTERFACE BETWEEN THE DIAGNOSTIC PROGRAM

AND THE SUPERVISOR.

;2017

'--

;2019

HEADER (®ASCII'CZQGNA ‘,#ASCII'C’,#ASCII'O‘, 120, O, PRI00);

;

<2018

2020
:
2021
s
;2022

1
1
1

;.
2024
;2025

1
1

;2027

:
:
:
;s
:
:
;

2029
2030
2031
2032
2033
2038
gggz

1
1
1
1
1
1
i

;s
2037
:
2038
;2039
;2040
;
2041
;2082

1
1
1
1
1
1

044
2045

1
1

2023

;2026
:

2028

;2043

.
E

[MAZURCZYK.DEGNAJZGNA1.BLI;2

CODE = AASCODES;

5-Jul-1984 14:00:51

VAX-11 Bliss-16 V4.0-579

DEFINE THE NUMBER OF TESTS IN THIS DIAGNOSTIC

;2005

S-Jul-1984 14:03:26

CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL DEFINITION MODULE

ZGNAL
vo1.0
:
:

]
]

NO POINTERS ARE OPTIONAL USING BLISS. MAKE SURE THE FOLLOWING

SECTIONS OF CODE ARE IN PLACE (IN THE CORRECT SKELS),EVEN IF
THE SECTIONS ARE BLANK.

]

ARGUMENT

FUNCTION

!
'
:
:
!
!
:

RPT
Tw
SFT
AU
LY
TBL
SETUP

REPORT CODE
SOF TWARE TABLE
SOFTWARE TABLE GUESTIONS
ADD CODE
DROP CODE
ERROR TABLE
ASSEMBLED P-TABLES

]
!
:
:
!
!

CHANGE THE “HEADER” TO CONTAIN THE PROPER ARGUMENTS.
ARGUMENTS ARE: NAME,REV,PATCH,LONGEST TEST TIME,TYPE
WHERE “TYPE“ = 0 FOR SEQUENTIAL DIAGNOSTIC AND =1
FOR EXERCISER.
THERE IS ALSO AN OPTIONAL SIXTH ARGUMENT
WHICH SPECIFIES THE PROCESSOR PRIORITY TO BE SET WHEN
STARTING THE DIAGNOSTIC (DEFAULT IS 0).

:--

SE°922§5 15
(14)

D2
CZQGNACO DEGNA FUNCTIONAL TEST
DISPATCH TABLE

<GNAL
v01.0

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

VAX-11 Bliss-16 v4,0-579

(MAZURCZYK.DEGNAJZGNA1.BLI ;2

DISPATCH (DSS$SNBR_OF _TESTS);
THE DISPATCH TABLE CONTAINS THE STARTING ADDRESS OF EACH TEST.

IT IS USED BY THE SUPERVISOR TO DISPATCH TO EACH TEST.

CHANGE THE LITERAL DECLARATION OF DS$NBR_OF TESTS TO BE
THE NUMBER OF HARDWARE TESTS IN YOUR PROGRAM,

et P

ot et P

ERRTBL;
Ld

ot P

o P

e o

et b et b Pt P

ot o

#SBTTL *‘DISPATCH TABLE'

THE ERRTBL MACRO IS REQUIRED WHETHER OR NOT YOU REPORT ERRORS USING
THE "“ERROR” MACRO.
THE ERRTBL MACRO EXPANDS INTO FOUR WORDS THAT
ARE USED BY THE RUNTIME SERVICES DURING AN ERROR CALL: ERROR TYPE,

ERROR NUMBER, ADDRESS OF ERROR MESSAGE AND ADDRESS OF MESSAGE
BLOCK.
THERE MUST BE ONLY ONE ERRTBL IN ANY PROGRAM.,
THIS SECTION
IS NOT OPTIONAL.

SEQ 0016

Page

(15)

E2
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL DATA SECTION

ZGNAL

2093
2094
2095
2096
2097

2098
2099
2100

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

VAX-11 Bliss-16 V4.0-579
[(MAZURCZYK.DEGNA]ZQGNA1.BLI;2

%SBTTL 'GLOBAL DATA SECTION'
PSECT

b e

PLIT
OWN

=
=

$PLITS,
$OWNS,

:
.

}HEtGLOBAL DATA DEFINED IN THIS SECTION IS USED BY MORE THAN ONE
EST.

COMMUNICATION AREA DECLARATIONS

s e

e (o

GLOBAL = $GLOBS;

e
o
o
o

2089
2090
2091
2092

ok ot o

2079
2080
2081
2082
2083
2084
2085
2086
2087
2088

et o

2078

2076
2077

et ol (o

2075

2070
2071
2072
2073
2074

b ot P

v01.0

RCV_D_LIST
XMIT_D_LIST

: BLOCK
: BLOCK.

XMIT_BUFFER

: VECTOR [ B_SIZE, BYTE 1],

RCV_BUFFER
PHYS_ADR

SETUP_BUFFER
I0OP_TABLE
ETH_STATION_ADR
STATION_ADR

PTRN_TABLE

[ D_SIZE, WORD ] FIELD ( DL_FIELDS ),
[ D_SIZE, WORD ] FIELD ( DL_FIELDS ),

: VECTOR [ B_SIZE, BYTE ],
: VECTOR [ 22, BYTE ],

:
:
:
:

VECTOR
VECTOR
VECTOR
VECTOR

[
[
[
[

SETUB_SIZE, WORD ],
8, WORD ],
6, WORD ],
4, WORD ],

VECTOR [ 8, BYTE ] INITIAL ( BYTE (

#B8' 00000000’, #B‘11111111‘, #B'10101010', #B'01010101’,
%B8'11001100‘, %B'00110011', %B'11110000', %B'00001111')),

SEQ 0017

Page

(16)

5-Jul-1984 14:03:26

CZGNACO DEQNA FUNCTIONAL TEST

ZQGNAL
v01.0
;2101

GLOBAL DATA SECTION

5-Jul-1984 14:00:51
: VECTOR [ T_SIZF, BYTE ] INITIAL ( BYTE (

TARGET _ADR

%X'00', ®X'00', #X'00', ®X'00', ¥X'00', ®X'00,

;2102

:
2108
;2105
;2106
2107
f

1
1
1
1

%X'S5',
wX'AR’,
%X'S5',
SX'FF',

2110
:
;2111

1
1

®X'AA’, ®¥X'00', #X'02', #X'AA’, ®X'AA’, #X'AA’,
%X'AA‘, ®X'00', ®X'05', #X'S5', #X'55', #X'S5',

;2103

:
:

2108
2109

1
1

#X'S5',
#X'AR’,
#X'S5',
#X'FF',

#X'55',
#X'AR’,
#X'S5',
#X'FF',

#X'S5',
#X'AR’,
#X'S5',
#X'FF',

#X'S5',
®X'AA’,
#X'55',
#X'FF',

#X'S5’,
®X'AA’,
#X'S5',
#X'FF',

'
i
!
!

'
!

%X'00', #X'F4', #X'FA’, #X'44', ¥X'44', $X'S5',
%X'AA‘, #X'00', #X'00', #X'00', ®X'00', ®X'00',

VAX-11 Bliss-16 V4.0-579

[MAZURCZYK.DEGNAJZGNA1.BLI;2

1 - MEMORY PATTERN

o2
3 - MEMORY PATTERN
4 - MEMORY PATTERN
S - MEMORY PATTERN

o6
7 - MEMORY PATTERN

' 8
19

wX'AA’, ®X'00', ¥X'04', $X'FF',k #X'FF', #X'FF"',

' 10

;214

#X'AR’, #X'00', #X'04’', ®¥X'18', #X'81', #X'18',

! 12 - HIGH ETHERNET ADR

;2116
;2117
:
2118
2119
:
2120
:

1
1
1
1
1

%X'AB‘,
wx'FF',
%X'S5',
%x'CD’,
%X 33/,

wX'FF', #X'FF', ®X'FF', #X'FF', #X'FF', #X'FF’'

;2112

;2113
;2115

2121

;2122

! 11 - LOW ETHERNET ADR

®X'AA‘, ¥X'00', #X'O4’, ®X'00', ¥X'00', #X'00,

' 13 - ALL MULTICAST

®X'01', #X'00', #X'00', ®X'00‘, #X'00', ®X'00',
#X'ARA’,
#X'00*,
#X'05',
#X'36',
#X'Al',

#X'AA’,
#X'01',
#X'06',
®X'26',
#X'67',

®X'AA‘,
®#X'02',
$X'07',
#X'27',
#X'BB',

®X'AA’,
®X'03',
®X'08',
®#X'27',
#X'4C',

'
!
'
'
'

®#X'AA’,
#X'04’,
$X'09',
#X'49',
$X'OF',

wX'EB’, ®X'BE', #X'C7', ®#X'8F', #X'33', wX'FF',

)),

14 - ALL MULTICAST
15 - ALL MULTICAST
16 - ALL MULTICAST
17
18

' 19

! 20 - STATION ADDR

SEQ

9221° 18
(17)

G2
CZAGNACO DEQGNA FUNCTIONAL TEST
GLOBAL DATA SECTION

2174

2175

VALID ADDRESS IF 1
RCV BUFFER ADDRESS

et e P
b P

RCV_BUFFER,

1/4 THE BYTE COUNT
STATUS WORD 1
STATUS WORD 2

b P

BYTE_COUNT,

0.
0.

ww.

BUFFER NOT USED IF 1
VALID ADDRESS IF 1

e P

XMIT_BUFFER,

XMIT BUFFER ADDRESS

BYTE_COUNT,

1/4 THE BYTE COUNT
STATUS WORD 1
STATUS WORD 2

MW.
E

BUFFER NOT USED IF 1

ol e e o

ol P

0,
0,

VALID ADDRESS IF

2 EXTRA WORDS

VECTOR [ 44, WORD ] INITIAL ( WORD (

)),

0,
0,
0,
0,
0,
0,
0,

-1
-2
-1
-1
-1
-2
-3

e o
e

VE
E

XMIT_BUFFER
XMIT_BUFFER
XMIT_BUFFER
XMIT_BUFFER
XMIT_D_LIST
XMIT _D_LIST
TARGET _ADR +

60
56
114

O,
0,
0,
0,
0,
0,
0,

!
!
!
!
!
!
!
!

1 BYTE
2 BYTE
1 BYTE
2 BYTE
END OF
4 BYTE
6 BYTE
END OF

DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR
DESCRIPTOR

NEWB,
NEWB,
NEWB,
NEWB,
mw.
NEWB,
RD13:

34, WORD ] INITIAL ( WORD (

XMIT_BUFFER
XMIT_BUFFER
XMIT_BUFFER
XMIT_D_LIST
XMIT_BUFFER

2
256

VECTOR [

258

TD13:

Pt o

e (ol o P

VL .,
VHL
,
VH ,

NEWB,
NEWB,
NEWB,
NEWS,
NEWB,
NEWB,
NEWB,
NEWB,

TD16:

e o

s o

o',

VECTOR [ 64 . WORD ] INITIAL (
€< <<<<<<

2165
2166
2167
2168
2169
2170
2171
2172
2173

[MAZURCZYK.DEGNA]ZQGNAL1.BLI;2

BUFFER NOT USED IF 1

NEWB,

e P

2160
2161
2162
2163

VAX-11 Bliss-16 v4.0-579

: VECTOR [ BD_D_SIZE, WORD ] INITIAL ( WORD (

BD_PROM_DESCR

e e e

2143
2144
2145
2146
2147
2148
2149
2150
2151
2152
2153
2154
2155
2156
2157
2158
2159

h Pk e

2142

e Pt e

2139
2140
2141

Pt Bt e et e

2123
2124
2125
2126
2127
2128
2129
2130
2131
2132
2133
2134
2135
2136
2137
2138

S5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

ZGNA1
v01.0

RCV_BUFFER

RCV_BUFFER ¢ 2
RCV_BUFFER
RCV_BUFFER
RCV_BUFFER
RCV_BUFFER

RCV_D_LIST
RCV_BUFFER

126
128
¢ 132
+ 252

+
+

¢ 256

.
.
.
.

.
.
‘1 .
'1 .
°63 .
’1

0,
0,
0,
0,
0,

!
!
!
!
!

2 BYTE DESCRIPTOR
378 BYTE DESCRIPTOR
2 BYTE DESCRIPTOR
CHAIN DESCRIPTOR
2 BYTE DESCRIPTOR

! END OF DESCRIPTOR

WORD (
-1
-62

-1
-2
-60
-2
-1
-3

0,
0,
0,
0,
0,
0,
0,
0,

! 2 BYTE DESCRIPTOR
! 124 BYTE DESCRIPTOR
! 2 BYTE DESCRIPTOR
! 4 BYTE DESCRIPTOR
! 120 BYTE DESCRIPTOR
!
!
!

4 BYTE DESCRIPTUR
CHAIN DESCRIPTOR
6 BYTE DESCRIPTOR

SEQ 0019

Page

(18)

He
CZQGNACO DEGNA FUNCTIONAL TEST

ZGNAL
v01.0
s
o b

2178

2179

GLOBAL DATA SECTION

2176

2177

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

NEWB, V

, RCV_BUFFER + 382

-1,0,0,

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEQGNA]JZQGNA1.BLI;2

! 120 BYTE DESCRIPTOR
! 2 BYTE DESCRIPTOR
! END OF DESCRIPTOR

SEQ 0020

ZGNAL

CZGNACO DEQiWA FUNCTIONAL TEST

v01.0
:

:
3

2180

2181

2182

2183

2186

B
:

:
:

2184
2185

2187

2188
2189

:
:
:

2190
2191
2192

2194

:
3
:

2197
2198
2199

2193

1--

1
1

HWP_TABLE
SWP_TABLE

REG_ADR

IOP_DATA
GET_ADR

1
1

1
1
1

Yoo
!

: REF REG_STR FIELD ( IOP_FIELDS ),

MISCELLANEOUS DATA DECLARATIONS

1--

2200
2201

2202
2203
2204
2205

1
1
1
1
1
1

DEGNA_NO
COUNTER
UP_COUNTER
DOWN_COUNTER
CHECKSUM
BUF _LENGTH

:
:
:
:
:
:

WORD,
WORD,
WORD,
WORD,
WORD,
WORD,

3
:
:
3

2207
2208
2209
2210

1
1
1
i

XC_FLAG
ERR_NUMBER
ERR_FLAG
ERR_COUNT

:
:
:
:

WORD
WORD
WORD
WORD

2206

2211

[MAZURCZYK.DEQGNA]ZQGNAL1.BLI;2

: REF REG_STR FIELD ( IOP_FIELDS ),
: REF ADR_STR FIELD ( IOP_FIELDS ),

:
:
H
:
:
3
:

VAX-11 Bliss-16 V4,0-579

: REF BLOCK [ HWP_SIZE, WORD ) FIELD ( HWP_FIELDS ),
: REF BLOCK [ SWP_SIZE, WORD ] FIELD ( SWP_FIELDS ),

1
1

1
1
1

5-Jul-1984 14:00:51

HARDWARE AND SOFTWARE P-TABLE STORAGE DECLARATIONS

2195
219

:
:

5-Jul-1984 14:03:26

GLOBAL DATA SECTION

XBUF _LENGTH
RBUF _LENGTH
INTERRUPT_FLG

CSR_WORD

! XMIT BUFFER LENGTH IN WORDS
! RCV BUFFER LENGTH IN BYTES
! 1 = INTERRUPT OCCURED

: WORD,
: WORD,
: WORD,

: WORD,

!
!
!
!
!
!
INITIAL
INITIAL
INITIAL
INITIAL

(0),
(0),
(O0),
(0),

!
!
!
!
!

DEGNA UNDER TEST THIS PASS
ITERATION COUNTER, INDEX
ITERATION COUNTER, INDEX
ITERATION COUNTER, INDEX
EXPECTED PROM CHECKSUM
XMIT BUFFER SIZE IN WORDS

. SEQ 0021

Page

(19)

Je
CZUNACO DEQGNA FUNCTIONAL TEST

ZGNA1
v01.0
et
e et e
et e
e
ot e
o o
e e
o
o
o
o
o
ot ot o
ok o
o

2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2c26
2227
2228
2229
2230
2231
2232
2233
2234
2235
2236
2237
2238
2239
2240

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEGNA)ZQNA1.BLI;2

Teo

s et e e

2212
2213
2214
2215

GLOBAL DATA SECTION

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

TEMPORARY STORAGE DATA DECLARATIONS

WORD,
WORD,
WORD,
WORD,
WORD,

TMP_IOP_ADR
TMP_REG_DATA

TEMP1
TEMP2

TEMP3

TEMP4
TEMPS
TEMP6
TEMP7?
TEMP8

TEMP9

Pl
P2
P3
£
PS5

TBYTE1
TBYTEZ2
TBYTE3
TBYTE4
TADR1
TADR2

: WORD,

WORD,

: WORD,
: HORD .
BYTE,
BYTE,
BYTE,
WORD,
WORD;

I7/0 PAGE REGISTER ADDRESS
170 PAGE REG CONTENTS
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION

PARAMETER
PARAMETER
PARAMETER
PARAMETER

1
f2

@3
#4

PARAMETER 5

SEQ 0022
Page

(20)

K2
ZQGNA1L

CZQNACO DEQNA FUNCTIONAL TEST

v01.0

GLOBAL DATA SECTION

2241

;.
:

2243
2244

1
1

:
:

2247
2248

1
1

2250

f
:

2253
2254

1
1

:
:

2256
2257

:
:

:
:
:

2242

2245
2246

2249

2251
2252

2255
2258

2259

1
1
1

1
1

1
1
1

2270
2271

1
1

2276

3
:

3
H
:
3
3
H
:
5
:
:
3
:
:

:
3
H

2277

2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2288
2289
2290

2291
2292
2293

[(MAZURCZYK.DEGNA]ZGNA1.BLI;2

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

GLOBAL BIND
DESCR_LIST
DATA_BUFFER
Yes

1--

= RCV_D_LIST,
= RCV_BUFFER,

HARDWARE AND SOF TWARE QUESTIUNS

QSTO3
QSTO04
QSTOS
QSTO6
QSTO7

2266
2267
2268

2272
2273
2274
2275

!1--

QSTO2= UPLIT (#ASCIZ' INTERRUPT VECTOR ADR

3
:
:

3
:
H
3

!
!

QSTO1 = UPLIT (#ASCIZ'DEGNA I/0 PAGE ADR

1
1
1
1
i

3
3

2260
2261
2262
2263
gggg

2269

5-Jul-1984 14:00:51

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

#SBTTL 'GLOBAL TEXT SECTION'

1
1

:
:
:
:
:

5-Jul-1984 14:03:26

Yee

Yoo

'),

= UPLIT (#ASCIZ'DO YOU WANT TO TEST SANITY TIMER
= UPLIT (#ASCIZ'IS LOOPBACK CONNECTOR IN DEGNA
= UPLIT (#ASCIZ'SANITY TIMER TIME-OUT VALUE
= UPLIT (#ASCIZ'EXTERNAL LOOPBACK MODE
= UPLIT (#ASCIZ'SYSTEM HAS BLOCK-MODE MEMORY

'),
3
& ¥
‘),
o

DEVICE ERROR MESSAGES

1
1
1
1

MSGOO = UPLIT (#ASCIZ' DEQNA FATAL ERROR DETECTED '),
MSGO1 = UPLIT (#ASCIZ'sNs#N#A
DEQNA ADDRESS: #06%A, STATION ADDRESS: '),
MSGO2 = UPLIT (®#ASCIZ'#A
ACTUAL DATA = #06%A
EXPECTED DATA = #06%N’'),
MSGO3 = UPLIT (wASCIZ's#A
XMIT DESCRIPTOR
RCV DESCRIPTOR #N'),

MSGOS

1
1
1
1
1
1
1
1
1
1
1
1

1
1
1

MSGO4

MSGO6
MSGO7
MSGO8
MSGO9
MSG10
MSG11
MSG12
MSG13
MSG14
MSG1S
MSG16
MSG17
MSG18

MSG19
MSG20
MSG21

= UPLIT (®ASCIZ'®A
= UPLIT (wASCIZ'®A

FLAG WORD

HIGH ORDER ADDR BITS

%$06%A

#06%N’
),

%06%N’'
),
= UPLIT (#ASCIZ'®A
LOW ORDER ADDR BITS
%06%A
%06%N’
),
= UPLIT (#ASCIZ'sA
PACKET LENGTH ( WD )
%06%A
%06%N'
),
= UPLIT (#ASCIZ'#A
STATUS WORD 1
%06%A
%06%N’
),
= UPLIT (wASCIZ'#A
STATUS WORD 2
#NE%A
#06%N'
),
= UPLIT (#ASCIZ'sA
DEQNA CSR REGISTER
%06%N'
),
= UPLIT (#ASCIZ'sA
DEGNA I/0 PAGE ADR
S06%NSN'
),
= UPLIT (#ASCIZ's#A BAD CSR: ACT = #06%A EXP = w06%N'),
= UPLIT (#ASCIZ's$A BAD TRANSMIT FLAG WORD: ACT = ¢06¢A EXP = #%06%N’'),
= UPLIT (#ASCIZ'sA BAD TRANSMIT STATUS WORD 1: ACT = #06%A EXP = i06iN').
= UPLIT (#ASCIZ'#A BAD RECEIVE FLAG WORD: ACT = #06%A EXP = #06%N'),
= UPLIT (#ASCIZ'#A BAD RECEIVE STATUS WORD 1: ACT = #06%A EXP = #06%N'),
= UPLIT (#ASCIZ'sA BAD RECEIVE BUFFER LENGTH: ACT = #06%A EXP = #06%N’'),
= UPLIT (wASCIZ's#A BAD CSR = #06%N’'),

%06%A

= UPLIT (#ASCIZ'#A LOOPBACK PACKET UNABLE TO SET CA BIT, CSR = #06%N'),
= UPLIT (#ASCIZ'%A LOOPBACK PACKET UNABLE TO CLEAR CA BIT, CSR = #06%N'),
= UPLIT (#ASCIZ'sA CA BIT OK, BUT RI BIT IS NOT ON, CSR = #%06%N’'),

SEQ 0023

Page

(21)

&
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL TEXT SECTION

ZQANAL

e e e
e
e
e el ol o
e e
e
S
e S
e
T e
e
T
o
ol ol

2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338
2339
2340
2341
2342
2343
2344
2345
2346

2294
2295
2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313
2314
2315
2316
2317
2318
2319
2320
2321
2322
2323

v01.0

MSG22
MSG23
MSG24
MSG25

MSG26
MSG27
MSG28
MSG29
MSG30
MSG31
MSG32
MSG33
MSG34
MSG35
MSG36
MSG37
MSG38
MSG39
MSG40
MSG41

MSG42
MSG43
MSG44
MSGAS
MSG46
MSGA7
MSG48
MSG49
MSG50
MSG51
MSGS52
MSG53
MSG54
MSGS55
MSG56
MSG57
MSG58
MSG59
MSG60
MSG61
MSG62
MSG63
MSG64
MSG65
MSG66
MSG67
MSG68

MSG69
MSG70
MSG71

UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

VAX-11 Bliss-16 V4.0-579

[(MAZURCZYK.DEQGNA]ZQGNA1.BLI;2

(¥ASCIZ'®A CA BIT IN THE CSR WAS SET TOO EARLY, CSR = sO06%N'),
(SASCIZ'®A XL AND RL ( BITS 4,5 ) TO BE RESET TO OsN'),
(%ASCIZ'®A XL AND RL ( BITS 4,5 ) TO BE SET TO 1sN'),
(%ASCIZ'®A RI ( BIT 15 ) TO BE SET TO 1sN'),
(%ASCIZ'®A XI ¢ BIT 7 ) TO BE SET TO 1sN'),
(%ASCIZ'®A NI ( BIT 2 ) TO BE SET TO 1sN'),
(%ASCIZ'#A NI ( BIT 2 ) TO BE RESET TO OsN'),
(%ASCIZ'®A BAD C2R, EXPECTED'),

($ASCIZ'%A CSR ADR = %06%A

ACTUAL = %06%A

EXPECTED = %06%N'),

(SASCIZ' ¥N®A UNABLE TO RESET DEQNA: ADR: ®06%A
(SASCIZ'wN®A WAIT ABOUT %D2%A SECOND(S) -'),

CSR = %06%N'),

(SASCIZ'#N$A SANITY TIMER TIMED OUT AS EXPECTED ®N'),

(%ASCIZ'wN®A NO SANITY TIMER INTERRUPT DETECTED sN'),
(WASCIZ'%Ns$A DISCONNECT TRANSCEIVER CABLE FROM BULKHEAD ASSEMBLY AND'),
(%ASCIZ'%NWA CONNECT LOOPBACK CONNECTOR TO BULKHEAD ASSEMBLY, THEN RETESTSN'),
(SASCIZ'wN®A DISCONNECT BULKHEAD ASSEMBLY FROM DEQGNA AND CONNECT'),
(SASCIZ' ¥N®A LOOPBACK CONNECTOR TO DEGNA, THEN RETESTSN'),
(WASCIZ'#NwA CHECK FOR LOOSE WIRES IN A LOOPBACK CONNECTOR'),
(SASCIZ'#N$A OR USE DIFFERENT LOOPBACK CONNECTOR, THEN RETESTSN'),
(%ASCIZ'wN®A REPLACE DEQNA, THEN RETESTSN'),
(®ASCIZ'wN®A REPLACE BULKHEAD CONNECTOR, THEN RETEST#N'),
(WASCIZ'#NsA DISCONNECT TRANSCEIVER CABLE FROM TRANSCEIVER'),
(SASCIZ'%NSA AND CONNECT IT TO LOOPBACK CONNECTOR AND BULKHEAD ASSEMBLYSN'),
(WASCIZ'%N®A REPLACE TRANSCEIVER CABLE, THEN RETESTSN'),
(SASCIZ'wN®A REPLACE TRANSCEIVER, THEN RETESTSN'),
(®ASCIZ' #N®A REPLACE THE FUSE IF BAD, THEN RETESTsN'),
(%ASCIZ'%NsA BAD RECEIVE DESCRIPTOR:'),
(SASCIZ'®N%A BAD TRANSMIT DESCRIPTOR:'),

UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT
UPLIT ($ASCIZ'#A ACTUAL = %06%A EXPECTED = %06%A INDEX = ®%DAsN'),
UPLIT ($ASCIZ'wNA BAD RECEIVE BUFFER:'),
UPLIT (SASCIZ' wN®A DMA OPERATION TAKES TOO LONGSN'),
UPLIT (SASCIZ'®N$A TOO MANY DEVICESSN'),
UPLIT (SASCIZ'SN$A THERE WAS A POWER FAIL - WAITINGSN'),
UPLIT (%ASCIZ'wN®A WAIT ABOUT ®%D2sA MINUTE(S) -'),
UPLIT (WASCIZ'#NSA WAIT ABOUT %D2%A HOUR -*),
UPLIT CSASCIZ'%A IF NO RESET, TYPE ANY CHARACTER T EXIT FROM TESTSN')
UPLIT ($ASCIZ'#N#A TDR VALUE IS EQUAL TO ZERO ®N'),
RS e
R N ),
UPLIT CHASCIZ UNINIA -« = occocnesomnncmccossscssssnsassnssnan ARBbIE
UPLIT (%ASCIZ'®N$A BAD CSR, BITS STUCK AT 0:®N‘),
UPLIT ($ASCIZ'¥NsA BAD CSR, BITS STUCK AT 1:#N'),
UPLIT ($ASCIZ'N$A SOFTWARE RESET UNABLE TO CLEAR CSR STATIC BITS:#N'),
UPLIT (SASCIZ'%N®A BAD STATION ADDRESS CHECKSUM: ACT = %06%A EXP = s06%N'),
UPLIT (%ASCIZ'%NsA BAD STATION ADDRESS: '),
UPLIT (¥ASCIZ'%N®A BAD DEGNA I/0 PAGE REGISTER:s#N'),
UPLIT (SASCIZ'®NwA BAD CSR, EXPECTED RL ¢ BIT S ) TO BE SET TO OsN'),
UPLIT (SASCIZ'#N%A BAD B/D PROM CHECKSUM: INDEX = ®%06%A ACT = %06¥. EXP = %06%N'),
UPLIT (¥ASCIZ'#N®A B/D PROM CHECKSUM OFFSET = %06%A ACT = %06%A EXP = %06%N'),
UPLIT (SASCIZ'#N%A BAD INTERRUPT: ADR = %06%A ACT LEV = %06%A EXP LEV = %06%N'),
UPLIT (¥ASCIZ'¥N®A REGISTER FAILED TO RESPOND AT ADDRESS:
w%06%N'),
UPLIT (#ASCIZ' ¥N%A BAD TRANSMIT STATUS, TOO MANY COLLISIONSSN');

SEQ 0024
Page
24

(21)

M2
CZQNACO DEQGNA FUNCTIONAL TEST
DEFAULT HARDWARE P-TABLE

ZANA1

el el el el e
e e

Tee

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

[
¢

FOR BUILDING THE P-TABLES.

'
‘

el el

2365
2366
2367
2368
2369

VAX-11 Bliss-16 V4.0-579
[(MAZURCZYK.DEQNA]Z@GNAL.BLI;2

sSBTTL ‘DEFAULT HARDWARE P-TABLE'

BGNHW ( HP_TABLE );

2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357
2358
2359
2360
2361
2362
2363

v01.0

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

!
:
:
!

PLACE YOUR DEFAULT HARDWARE P-TABLE HERE.
THE VALUES AND
SIZE WILL BE USED AS A "TEMPLATE” FOR CREATING ACTUAL P-TABLE
ENTRIES AND THE DEFAULT VALUES IN THE OPERATOR DIALOGUE.
g:ECQCTUAL P-TABLE BUILT AT RUNTIME IS STORED IN SUPERVISOR

GLOBAL
HW;

DFSTBL

: BLOCK [ HWP_SIZE, WORD ] INITIAL ( #0'174440', %0'700'

);

SEQ 0025

Page

(22)

N2
CZQNACO DEGNA FUNCTIONAL TEST
SOF TWARE P-TABLE

2394

2395

(MAZURCZYK.DEGNA]ZQGNA1.BLI;2

THE SOFTWARE TABLE CONTAINS VARIOUS DATA USED BY THE

b e et e

et et et

5-Jul-1984 14:00:51

VAX-11 Bliss-16 V4.0-579

#SBTTL 'SOFTWARE P-TABLE'

PROGRAM AS OPERATIONAL PARAMETERS.

THESE PARAMETERS ARE

SET UP AT ASSEMBLY TIME AND MAY BE VARIED BY THE OPERATOR

b e

AT RUN TIME.

BGNSW ( SP_TABLE );
GLOBAL

SWP_TIMER
SWP_LBC
SWP_TOUT _VAL

b ot o

b o

b e

PLACE YOUR SOFTWARE P-TABLE HERE,USING GLOBAL OR OWN DECLARATIONS
THIS TABLE IS NOT OPTIONAL.
THIS TABLE, UNLIKE THE HARDWARE TABLE,
WILL CONTAIN THE ACTUAL VALUES ENTERED BY THE OPERATOR.

b o

2370
2371
2372
2373
2374
2375
2376
2377
2378
2379
2380
2381
2382
2383
2384
2385
2386
2387
2388
2389
2390
2391
2392
2393

0 et ot et et

ZQGNA1
v01.0

5-Jul-1984 14:03:26

SWP_ILOOP
SWP_BLOCK_MEM
ENDSUY;

: WORD INITIAL (
: WORD INITIAL (
: WORD INITIAL (
: WORD INITIAL (
: WORD INITIAL (

NO ),
W0 ),
3),
NO ),
YES );

NO SANITY TIMER TEST
NO LOOPBACK IN DEGNA
TIMEOUT VALUE = 16 SEC.
EXTERNAL LOOPBACK MODE
BLOCK-MODE MEMORY PRESENT

’

SEQ 0026

Page

(23)

B3
CZGNACO DEGNA FUNCTIONAL TEST

ZGNAL
v01.0

2407

2408
2409

2410

2411
2412

2413

2414
2415
2416
2417
2418
2419
2420
2421
2422
2423

i P
s o
i
o ot o o o

1ST ARG =
2ND ARG =
3RD ARG =

OFFSET INTO P-TABLE FOR CSR ADDRESS
OFFSET INTO P-TABLE FOR MASSPUS ADDRESS
OFFSET INTO P-TABLE FOR DRIVE NUMBER

INSERT BYTE OFFSET FOR DATA NOTED IN COMMENTS ABOVE.

(OFFSET

REFERS TO THE NUMBER OF BYTES FROM THE BEGINNING OF A PTABLE
ENTRY TO THE ITEM IN QUESTION.) IF THE PARTICULAR

2406

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

ITEM DOES NOT APPLY, LEAVE ENTRY AS -1,
WHEN THE RUNTIME
SERVICES EXECUTES A GPHARD, IT USES THESE OFFSETS (IF NOT
SET TO -1) TO GET THE ITEMS AND COMPARE WITH THOSE SAVED
IN THE XXDPe+ MONITOR.
IF THE UNIT BEING REQUESTED MATCHES THE

2405

VAX-11 Bliss-16 v4.0-579
[(MAZURCZYK.DEQGNAJZQGNA1.BLI;2

#SBTTL 'PROTECTION TABLE'

2404

et Pt Pt ot Pt (o o (e Pt ot P

2400
2401
2402
2403

2396
2397
2398
2399

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE

LOAD DEVICE, THE RUNTIME SERVICES RETURN AN INCOMPLETE FLAG ON
THE GPHARD.

BGNPROT (-1,

-1,

-1);

ENDPROT;

END
ELUDOM

.TITLE

LIDENT
.ENABL

132
101

121
040

.PSECT

L$NAME:: .ASCII
LASCII
LS$REV::

ZQGNA1 CZAGNACO DEQGNA FUNCTIONAL TEST
/Vv01.0/
AMA

$CODE$,

/CZQ/
/NA /

.BYTE
.BYTE

O
O

.ASCII

/C/

LASCII
L$UNIT:: WORD
L$TIML::.WORD
L$HPCP:: .WORD
. WORD
L$SPCP::
L$HPTP:: .WORD
L$SPTP:: .WORD
LSLADP:: .WORD
L$STA:: .WORD
L$CO::
.WORD
L$DTYP::.WORD

/0/
T$PTHV
170
L $HARD
LS$SOFT
L$HW
L$SW
LS$LAST
O
O
0

C3
CZQNACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE

L$EF::

.WORD

Q0O

L$SPC:: .WORD
L$DEVP:: ,.WORD
L$REPP:
: .WORD
LS$EXP4:: ,WORD
L$EXPS::.WORD
L$AUT:: .
L$DUT:: .
LSLUN:: .WORD
LSDESP::.
LS$LOAD::.
LSETP:: .
L$ICP::
L$CCP::
L$ACP::

000102

000110
000112
000114
000116
000120
0060122
000124
000126
000130
000132
000134
000136
000140
000142
000144
000146
000150
000152
000154
000156
000160
000162
000164
000166
000170
000172
000174
000176
000200

L$PRT::

LS$TEST::
L$DOLY:: .WORD
L$HIME
: : .WORD
DS$PCNT::.WORD
LS$DISPATCH::
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD
.WORD

.WORD
.WORD
.WORD

.WORD

.WORD
P:
: .BLKW
ERRTY
: .BLKW
ERRNBR:

OO0OO0uLw

OO0

0
L$DISPATCH

LSDVTYP
L$RPT
0
0
L$AV
L$DV
0
L$DESC
-73743

LSERRTBL
LSINIT
L$CLEAN
L$AUTO
L$PROT
0
0
0
25
T1
T2
T3
T4
15
16
17
T8
19
T10
T11
T12

T13
T14
T15
T16
T17
T18
T19
120
T21
1
1

VAX-11 Bliss-16 v4,0-579

[MAZURCZYK
.DEGNA JZQNA1.BLI;2

SEQ 0028
P

age

2
(24)

D3
CZQGNACO DEQGNA FUNCTIONAL TEST

ZANA1
v01.0

PROTECTION TABLE

L$HULEN::

000210
000212

174440
000700

DFSTBL:
: .WORD
.WORD

.WORD

W:
: .BLKW
L$NDH

000214
000216

000000C

000220

000000

SWP . TIMER::

000222

000000

SWP.LBC::

000224

000003

SWP,.TOUT.VAL::

000226

000000

SWP.ILOOP::

000230

000001

SWP .BLLOCK ,MEM: :

.WORD

.WORD
.WORD

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

77777

.WORD
L$NDSW:
: .BLKW
L$PROT::.WORD

1772777

.WORD

177777

104
116
111
040
107
101
040
040
111

105
125

040
103
122
104
040
104
131
040
116
124
124
124
101
124

124

.WORD

105
101
057
120
105
104
040
000
116

122
120

126
124
040
122
000
117
117
127
124
117
105
040
116
131

111

121
040
117
101
040
122
040
000
124

122
124

105
117
101
040
000
040
125
101
040
040
123
123
111
040

115

P.AAA:

P.AAB:

P.AAC:

.PSECT
.ASCII

.ASCII
LASCII

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

.ASCII
LASCII
LASCII
LASCII
LASCII
LASCII

.WORD

700

eysye

000232
000234
000236
000240

L$SWLEN::

<<L $NDHW -L $HWLEN>/2>
-3340

000000C

000206

1
1

G:
: .BLKW
ERRMS
ERRBLK:: .BLKW

000202

000204

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

$PLITS,

/DEQ/
/NA /

RO,

/1/7¢57>/0/

/ PA/

/GE 7/
/ADR/

/7 /7<00><00>
/INT/

/ERR/
/UPT/
/ VE/
/CT0/
/R A/

/DR 7/

/ /7<00><00>
/00 7/
/YOU/
/ WA/
/NT /
70 #
/TES/

/T S/

/AN1/
IV #
/TIM/

VAX-11 Bliss-16 v4,0-579

[MAZURCZYK.DEGNA JZGNAL1.BLI;2

SEQ 0029

Page

(24)

E3
CZQNACO DEGNA FUNCTIONAL TEST

ZAGNA1

PROTECTION TABLE

v01.0

000116
000121
000122
000125
000130
000133
000136

000147
000152
000155
000160
000163
000164

000167
000172
000175
000200
000203

000206
000211
000214
000217
000222
000225
000226
000231
000234
000237

000307
000312
000315
000320
000323
000326
000331
000332
000335
000340

122

040

123
117

040
117
101

102
113
117
105
117
111
104
116
040

000141
000144

000242
000245
000250
000253
000256
000261
000264
00067
00027C
000273
000276
000301
000304

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

105

040
116

103

122
116
105
101
040
116
131
111
122

101
124
124
105
124
105
125
126
125
040
040

040
040

130
122
114

116
040

117
102
113
117

P.AAD:

P.AAE:

111
055

124
101
105

124

P .AAF
:

117

101

040

040
040
040

040

123
123
114
113
117

040

115
131

131
105
110

P.AAG:

117

055
104

115
117

040
040

040
121
040

104
116
106

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

/ER /
<00>

/1S 7
/L00/
/PBA/
/CK 7/
/CON/
/NEC/
/TOR/
/7 IN/
/ DE/
/GNA/
<00>

/SAN/
/1TY/
/7 117
/MER/
/7 11/
/ME-/

/0UT
/ VA/
/LUE/
/
/
<00>

/EXT/
/ERN/
/AL /
/L00/
/PBA/
/CK 7/

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

040

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

P.AAH:

.ASCII
.ASCII
.ASCII
.ASCII

/ DE/
/QNA/
/ FA/

VAX-1°. Bliss-16 v4.0-579

[(MAZURCZYKK.DEQGNA ]JZGNA1.BLI;2

SEQ 0030

Page

(24)

105
117

104
105
105
000
116
045
040

105
101
104
105
072

117
101

040

101

117
101

114

122
122
105

103
104

000
045
101
040

P.AAI:

121

040
104

123

040
066
054

123

124
116
104
105
072

040
040
101
125
040
124
075

P.AARJ:

117

101
040

105
105
105
104
101

040

P.AAK:

000551

000557
000570
000273
000576

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

.ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII

[(MAZURCZYK.DEGNA]ZGNAL1.BLI;2

SEQ 0031
Page

(24)

/TAL/
/ ER/
/ROR/
/ DE/
/TEC/
/TED/
/7 /7¢<00><00>
/9Ns/
/NsA/
/

/DEQ/
/NA /
/ADD/
/RES/
/S: /
/%06/
/
/%A,
/TAT/

/ION/
/ AD/
/DRE/
/5S:/
/ /7<00>

/%A /

A/
/
/CTV/
/AL /
/DAT/
/ %0/
/6%A/

/
E/
/XPE/
/CTE/
/0 D/
/ATA/
/ =/
/98057
/8N/<00>
/%A /
/
/
/
/
/
/
/
/
/
/

NNNNNNNANANNSN

101

VAX-11 Bliss-16 V4,0-579

—

000351

PROTECTION TABLE

000343

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

ZAGNA1
v01.0

CZQNACO DEGNA FUNCTIONAL TEST

G3
CZQGNACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE

120
122
116

123

117

103

040
040
106

P.AAL:

107

000671
00674
000677
000702
000705

000710
000713
000716
000721
000724
000727
000732
000735
0007:5
000741
000744
000747
000752
000755
000760
000763
000766
000771
000774
000777
001002
001005
001010
001013
001016
001021
001024
001027
001030

P.AAM:;

P.AAN:

<00><00>

/%A /
/
/
/
F/

111

/ RC/
/N D/
/ESC/
/RIP/
/TOR/
/ %N/

35
52
NNNNNNNNNNN %

040
103
104

040
122
040

/T 0/
/ESC/
/RIP/
/TOR/

117

103
120
122

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

NN NNNNSNNNNNNNN NNN

123

111

104

N
1.y
<0

040

/%A /
7/
/7
/

/IGH/
/ OR/
/DER/
/ AD/
/DR /
/BIT/
7/
/S
/

/06%/
7/
/AR

/ %0/
/6%N/
<00>

/%A /

VAX-11 Bliss-16 V4,0-579

(MAZURCZYK.DEGNAJZQGNA1.BLI;2

SEQ 0032

H3
ZQANAL

v01.0

001033
001036

001041
001044

001047

001052

001055
001060
001063
001066
001071

001074
001077
001102
001105
<01110
001113
001116
001121
001122
001125
001130
001133
001136

CZQNACO DEGNA FUNCTIONAL TEST

PROTECTION TABLE

040
040

127
117
105

101
122
111
040

040
114
040

122
122

040
040

P.ARD:

001141
001144

001147
001152
001155
001160
001163
001166
001171
001174
001177
001202
001205
001210
001213
001214
001217
001222
001225
001230
001233

001236

001241
001244
001247
001252

001255

001260
001263

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

P.AAP;

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

£
y

/0M 7/
/ OR/
/DER/
/ AD/
/DR 7/
/BIT/

/706%/

/6%N/
<00>

/%A /

P/
/
/ACK/
/ET /
/LEN/
/GTH/

/706%/
/A
7/

VAX-11 Bliss-16 v4,0-579

[MAZURCZYK.DEGNA]ZGNA1.BLI;2

SEQ 0033
Page

(24)

I3
ZGNA1

vo1.0

001266
001271
001274

001277
001302
001305
001306
001311
001314
001317
001322
001325
001330
001333
001336
001341
001344
001347
001352
001355

001360
001363
001366
001371
001374
001377
001400
001403
001406
001411
001414
001417
001422
001425
001430
001433
001436

001441

001444
001447

001452
001455

001460
001462

001465
001470

001473
001476
001501
001504
001507

001512
001515

CZQGNACO DEQNA FUNCTIONAL TEST

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE
040
040
040
045
045

101

040
040
040
117
116

040

040
040
101

040
123
124

117
040
040
040
040
040
040
066
040
040
040
040
045
045

122
062
040
040
040
040
045
045
040
040
040
040
117
116

101

040

122
105
123
122
040
040
040

040
107
124
040

123

040
040
121
040

040
040
040
066
000

040

040
104
116
103

040

121

116

040
117

101
040
122
040

P.AAR:

040
040
040
040
040
045
045

101

040
040

P.AAQ:

040
104

111
040
107
101
040
040

P.AAS:

VAX-11 Bliss-16 V4,0-579

[(MAZURCZYK.DEGNA]ZGNA1.BLI;2

SEQ 0034

(24)

001620

001623

001626
001631
001634
001637
001642
001645
001650
001653
001656
001661
001664
001667
001672
001675
001676
001701
001704
001707
001712
001715
001720
001723
001726
001731
001734
001737
001742
001745
001750

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE
040
040
040
040
040
066
045

101
101
103

040
040
040
040
045
045
116
P.AAT:

072

103

075

117

101

130

075

117
116
101
101

P.AAU:

124

116
111
106
107

117

072

103

075

117
101
130

075

117

116

P.AAV:

001520
001523
001526
001531
001534
001537
001542
001545
001546
001551
001554
001557
001562
001565
001570
001573
001576
001601
001604
001607
001612
001615

CZQGNACO DEGNA FUNCTIONAL TEST
NNNNN

ZGNA1
v01.0

/706%/
/NsiN/
<00>

/%A /
/BAD/
/ CS/
/R: /
/ACT/
/ =/
/%06/
/%A /
/EXP/
/

/9%06/
/%N/<00>
/%A /
/BAD/
/7 TR/
/ANS/
/MIT/
/ FL/
/AG /
/WOR/
/D: 7/
/ACT/
/ =/
/%06/
/%A /
/EXP/
/

/%06/
/9%N/<00>
<00>

/%A /
/BAD/
/ TR/
/ANS/
/MIT/
/ ST/
/ATY/
/S W/
/0RD/
/

1:/

/ AC/
/T =/
/ %0/
/6%A/
/ EX/

VAX-11 Bliss-16 v4.0-579

[(MAZURCZYK.DEQGNAJZGNA1.BLI;2

SEQ 0035
Page

(24)

IK3
CZQNACO DEGNA FUNCTIONAL TEST

ZGNAL
v01.0

001753
001756
001761

001764
001766
001771
001774
001777
002002
002005
002010

002013
002016
002021
002024

002027
002032
002035
002040
002043

002046
002050
002053
002056
002061
002064
002067
002072
002075
002100
002103

002106
002111
002114
002117
002122
002125
002130
002133
002136
002141
002144
002147
002152
002155
002160
002163

002166
002171
002174
002177
002202
002205

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE
120

040
045
045
000

101
101
122
105
105
114

040
122
040

075

117

116
040
104

P.AAUW:

105

111
040
101
127

124

040
066
040
120
040
066
000
101
101
122

P.AAX:

105
105
124
125
127
104

072

103

075

117
101
130

075

117
116
101
101
122
105

105
125
105
114
107

072

103

075

117

101

P.AAY:

/P =/
/7 %0/
/6%N/

<00><00>

/%A /
/BAD/
/ RE/
/CE1/
/VE /
/FLA/
/G W/
/0RD/
/: A/
/CT 7
/= %/
/706%/

/A E/
/XP /
/= %/

/706%/
/N/7<00>
/%A /
/BAD/
/ RE/
/CE1/
/VE /
/STA/
/TUS/
/7 W0/
/RD /
Tis

/ACT/
/

/%06/
/%A /
/EXP/
/ =/
/%06/

/9%N/<00>
/%A /
/BAD/
/ RE/
/CEI1/
/VE 7/
/BUF
7
/FER/
/ LE/
/NGT/
/H:

/ACT/
/

/%06/
/%A /

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

(MAZURCZYK.DEGNAJZGNA1.BLI;2

SEQ 0036

Page

(24)

R
CZQGNACO DEQGNA FUNCTIONAL TEST

ZANA1
v01.0

002210
002213
002216
002221
002224
002227
002232
002235
002240
002243
002246
002250
002253
002256
002261
002264
002267
002272
002275
002300
002303
002306
002311
002314
002317

002322
002325
002330
002333
002336
002341
002344
002347
002352
002355
002360
002363
002366
002371
002374
002377
002402
002405
002410
002413
002416
002421
002424
002426
002431
002434
002437
002442

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE
105
040
045
045
045
102

122
040
045
114
120
103
120
113
040
101
105

117
105
103
102
123

075

117
116

114
120
103
120
113
101

105
117
114
122
101
111

122
040
000
045
103
102

054

130

075

117

116
101
101
103
040
045
045
000
101
117
102
113
101
105
125
102
040
040
124
101
111
040
122
. 040
066
000
101
117
102
113
101
105
125
102
040
040
105
040
040

120
040
066
000
040
104

P.AAZ:

123

075

117

116

040

117

P.ABA:

101
040

103

124
116
114
124
123
040

040
124

103

040
045
045
000
040

117

P.ABB:

101
040

103
124
116
114
124
103
101
103
102
054
123
075

117

116
040
040

124
113
102

P.ABC:

/EXP/

/ =/
/%06/
/%8N/<00>
/%A /
/BAD/
/ CS/
/R =/
/7 %0/
/76%N/

<00><00>

/%A /
/L00/
/PBA/
/CK 7/
/PAC/
/KET/
/7 UN/
/ABL~/
/E T/
/0 S/
/ET /
/CA 7/
/BIT/
7. &F
/SR 7/
/= %/

/706%/
/N/<00><00>
/%A /
/L00/
/PBA/
/CK 7
/PAC/
/KET/
/7 UN/
/RABL/
/E T/
/0 C/
/LEA/
/R C/
/A B/
/17,7
/ CS/
/R =/
/ %0/
/6%N/
<00><00>

/%A /
/CA 7/
/BIT/
/7 0K/
/., B/

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEGNA]ZGNAL.BLI
;2

SEQ 0037

M3
ZGNA1

v01.0

002445
002450
002453
002456
002461
002464

002467
002472
002475
002500
002503
002506
002511
002514
002517
002522
002525
002530
002533
002536

002541
002544
002547
002552
002555
002560
002563
002566
002571
002572
002575

CZQNACO DEGNA FUNCTIONAL TEST

PROTECTION TABLE
124
111
111
111
116
040
054
123
075
117
116
101
101
111
111
124
040
122
101
123
040
1.7
101

040
040
124

123
117
117

040
122
040
066
000
040
040
124
116
110
163
040
123
105
124
040
122
054

P.ABD:

075
117
116

040
040
104
114
040

P.ABE:

124

064
040

124
102
122
105
124
060
000
040
040
104

050
111

114

040

124

064
040

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
_ACeTT

123

002600
002603
002606
002611
002614
002617
002622
002625
002630
002633
Cu2636
002641
002644

002647
002650
002653
002656
002661
002664
002667
002672
002675

5-Jul-1984 14:03:26
S-Jul-1984 14:00:51

P.ABF:

/UT /
/RI /
/BIT/
7 1S/
/7 NO/
/T O/
N, 7
/CSR/
7y

/%06/
/%N/<00>
/%A /
/CA /
/8IT/
/7 IN/
/ TH/
/E C/
/SR /
/WAS/
/-SE/
/T 1/
/00 7/
/EAR/
ALY o

/7 CS/
/R =/
/ %0/
/6%N/
<00>

/%A /
/XL 7/
/AND/
/ RL/

/BIT/
/S 4/

P &
/) 1/
/70 B/
/E R/
/ESE/
T 32
/70 0O/

/8N/<00>
<00>

/%A /
/XL /7
/AND/
/ RL/
/7 C 7/
/BIT/
/S 4/
.S 4

VAX-11 Bliss-16 V4.0-579

[(MAZURCZYK.DEGNA]Z@GNAL1.BLI;2

SEQ 0038
Page

(24)

N3
ZGNA1
v01.0

002700
002703
002706
002711
002714

002717

oo2722
002724

002727
002732
002735

002740
002743
002746
002751
002754
002757
002762
002765
002766
002771
002774
002777

003002
003005
003010
003013
003016
003021
003024
003027
003030
003033
003036
003041
003044
003047
003052
003055
003060
003063
003066
003071
003072
003075
003100
003103
003106
003111
003114
003117
003122
003125

CZQNACO DEGNA FUNCTIONAL TEST

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE
040
040
040
124
117
045
000
101
111
040
124
065
040
040
040
124

124
102
123

040
040

116

040
040
102
040
040
124

P.ABG:

102

117

045
P.ABH:

101
111
040
124
040
124

P.ABI:

P.ABJ:

124

117

/) T/
/0 B/
/E S/
/ET 7/
/70 7/
/1%N/

<00><00>

/%A /
/RI /
/¢ B/
71V 7
/15 7/
/) 1/
/70 B/
e S/
/ET /7
/70 7/
/1%N/
<00>

/%A /
/XI /
/( B/
it I
/7 Y/
/7 T0/
/ BE/
S Sk
/T 1/
/0 1/
/%N/<00>
<00>

/%A /
/NI /7
/C B/
/IT 7/
/72 )
/7 T0/
/ BE/
/ SE/
/T 1/
/0 1/
/%N/<00>
<00>

/%A /
/NI /
/( B/
7% 7
/2 )/
/7 T0/
/ BE/
/ RE/
/SET/
/7 T0/

VAX-11 Bliss-16 V4.0-579
(MAZURCZYK.DEGNA]ZQGNA1.BLI;2

SEQ 0039
Page

(24)

B4
CZGNACO DEGNA FUNCTIONAL TEST

ZGNAL

PROTECTION TABLE

v¥01.0

003130
003133
003136

040
116
045
102

060

003147
003152
003155
003160
003163
003164
003167
003172
003175
003200
003203
003206

122
105
105
105

054

003141
003144

003211
003214
003217
003222
003225
003230
003233
003236
003241
003244
003247
003252
003255
003260
003263
003266
003271
003274
003277
003302
003305
003310
003313
003316
003321
003324
003327
003332
003335
003336
003341
003344
003347
003352
003355
003360

S5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

cas
103
122
040
040

103
101
075
117

000
101
101

103

130
103

104

045
000
040
104

123

040
120
124
P.ABL:

101
123

101
040

045
045
040
124
114
040
066
040
130
103
104
040
066
000

116

P.ABK:

P.ABM:

116
040
101
105
117
105
124
105
101
101
072

117

101

103

040

045
045

117

116
P.ABN:

116
040
111
101

125
045

045

101

/ O/
/N/<00><00>
/%A /
/BAD/
/7 CS/
/R, /
/EXP/
/ECT/
/ED/<00>

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

/%N
/
/A W/
/RIT/

.ASCII

<00»>

/%A /
/CSR/
/ AD/
/R =/
/ 0/
/6%A/
/
A/
/CTW/
/AL /

/= 8/
/706%/

/
/A
/EXF/
/ECT/
/ED 7/
/= o/

/706%/

/N/7<00><00>

/
/9N

/A U/
/NAB/
/LE 7/
/70 7
/RES/
/ET /
/DEQ/
/NA:/
/ AD/
/R: /
/%06/
/%A /
/ CS/
/R =/
/7 %0/
/76%N/
<00>

/ AB/
/0UT/
/ %D/
/28RA/

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

[(MAZURCZYK.DEGNA]ZGNAL1.BLI;2

SEQ 0040

(24)

C4
ZANAL
v01.0

003363

003366
003371
003374
003377
003400
003403
003406
003411
003414
003417
003422
003425
003430

003433
003436
003441
003444

003447

003452
003454
003457
003462
003465
003470
003473
003476
003501
003504
003507
003512
003515
003520
003523
003526
003530
003533
003536
003541
003544
003547
003552
003555
003560
003563
003566
003571
003574
003577
003602
003605
003610
003613

CZQGNACO DEGNA FUNCTIONAL TEST

S5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE
123
117
050
040

105
116
123
055

116
040
116
131
111
122
111
104

045
123

101

123
130
103
104

125

105
105
105
045
000
116
040
040
116

131

111
122
116
122
120
104
105
105
045
000
116

040

123
116
103
124
116
105
105
103
114
106
115
125
110
104
123
115

P.ABO:

111
040

115
040
115
040
124

116

045
116
123
111
040
115
040
124
122

P.ABP:

124
105
103
104
116

045
104
103
116
124
122
123
111
122
101
105
122
040
114
105
040

123
10¢

P.ABQ:

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

.ASCII

/ SE/
/CON/
/D(S/

<00»>

/
/%N
/A S/
/ANI1/
/7Y 7/
/TIM/
/ER 7/
/TIM/
/ED 7/
/0UT/
/ RS/
/ EX/

/PEC/
/TED/
/ #N/

<00><00»>

/98N%/

/A N/
/70 S/
/AN1/
/7Y /
/TIM/
/ER /
/INT/
/ERR/
/UPT/
/ DE/
/TEC/
/TED/
/ #N/
<00><00>

/9N
/

/A D/
/7ISC/
/0NN/
/ECT/
/ TR/
/ANS/
/CEI1/
/VER/
/7 CA/
/BLE/
/ FR/

/0M 7/
/8UL/
/KHE/
/RD 7/
/ASS/
/EMB/

VAX-11 Bliss-16 V4.0-579
[MAZURCZYK.DEGNA)ZGNA1.BLT;2

Page

41
(24)

D4
CZQNACO DEGNA FUNCTIONAL TEST

ZGNA1
v01.0

003616
003621
003624
023626
003631
003634
003637
003642
003645
003650
003653
003656
003661
003667
003672
003675
003700
003703
003706
003711
003714
003717
003722

003725
003730
003732
003735
003740
003743
003746
003751
003754
003757
003762
003765
003770
003773
003776
004001
004004
004007
004012
004015
004020
004023
004024
004027
004032
004035
004040
004043
004046

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE
114
101

045
101

117

105

040

117

101
040
116

103
122
117
125
110

123
115
131
124
116
105
123
116
045
101
111

117

105

040
114

105

123
102
117
104
116
101
116
103

045
101
117
102
113
117
105

131

116
000
116
040
116

103
114
120
103

103
116

124

040
040
114
105
040

123
102

054

110

040

124
124
000
116
040
123
116
103
102

113

101
101
105
114
106
115
105
101
116
103
116
124

116
040
117
101
116

103

040

104

045
103
116
124
117
102
113
117
105
117
124

P.ABR:

102

113
101
101

105
114

040

105
122
105
045

045
104
103
116
124
125

P.ABS:

110
104

123
115
131
122

.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

P.ABT:

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

/LY /

/AND/

<00><00>

/
/%N

/A C/
/0NN/
/ECT/
/7 LO/
/70PB/
/ACK/
/7 CO/
/NNE/
/CT0/
/R T/
/70 B/
/ULK/

/HEA/
/0 A/
/SSE/
/MBL/
/N,

/THE/
/N R/
/ETE/
/STs/
/N/<Q0>
/
/%N
/A D/
/7ISC/
/0NN/
/ECT/
/ BU/
/LKH/

/EAD/
/ RS/
/SEM/
/BLY/
/ FR/
/0M 7/
/DEQ/
/NA 7/
/AND/
/7 CO/
/NNE/
/CT/<N0>
<00>

/
/9N
/A L/
/00P/

/BAC/

/K C/
/0ONN/
/ECT/

VAX-11 Bliss-16 V4.0-579

[MAZURCZ
YK .DEGNA]ZGNA1.BLI;2

SEQ 0042
Page
42

(24)

E4
CZQNACO DEQGNA FUNCTIONAL TEST

ZGNA1

PROTECTION TABLE

v01.0

004051

004054

004057
004062
004065
004070
004073
004076
004101
004104

004107
004112
004115
004120

004123
004126
004131

004134
004137
004142
004145

004150
004153
004156
004161

004164
004167
004170
004173
004176
004201
004204
004207
004212
004215
004220
004223
004226
004231
004234
004237
004242
004245
004250
004253
004256
004260
004263
004266
004271
004274
004277

004302

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

117

124
104
116

105
122
105
045
101
110
113
117
114
123
127
105
111
101
117
102
113

117
105
117

045
101
122
123
104

122
117
105
101
124
116

105
123
116

116
040

105

040
122

117
105
111

123
116

040

117
101

040
116

103
122

040
040
121
054
110
040
124
124
000
045
103
103
106
040

P.ABU:

117

040
122
040
040
114
120
103
103
116

P.ABV:

105

C40

117
101

Cc40
116

103
122
124
116
105
123
116
045
101
105
101
040

121
054

P.ABM:

/0R 7

/70 7/
/DEQ/
/NA,/
/ TH/
/EN /
/RET/
/EST/
/9N/<00>
/
/9N
/A C/

/HEC/
/K F/
/0R 7/
/L00/

/SE 7/
/WIR/
/ES 7/
/IN 7/
/A L/
/00P/
/BAC/
/K C/
/0ONN/
/ECT/
/0R/<00>
<00>

/9Ns/
/A 0/
/R U/

/SE 7/
/0IF/
/7ER/
/ENT/
/7 L0/
/0PB/
/ACK/
/7 CO/
/
/NNE
/CT0/
/R, /
/THE/
/N R/
/ETE/
/STe/
/N/<00>
/
/%N
/A R/
/EPL/
/ACE/
/ DE/
/QNA/
/., 1/

VAX-11 Bliss-16 V4,0-579
[(MAZURCZYK.DEQGNA)ZQGNA1.BLI;2

SEQ 0043

(24)

Fa
CZQNACO DEGNA FUNCTIONAL TEST

ZGNAL

PROTECTION TABLE

v01.0

004305
004310
004313
004316
004321
004322
004325
004330
004333
004336
004341
004344
004347
004352
004355
004360
004363
004371
004374
004377
004402
004405
004410
004413
004416
004421

004424
004427
004432
004435
004440
004443
004446
004451
004454
004457
004462
004465
004466
004471
004474
004477
004502
004505
004510
004513
004516
004521
004524
04527
004532
004535

S-Jul-1984 14:03:26
S-Jul-1984 14:00:51

110

124

105

101

105
122
105
045

116
105

116
040
120
103
102
113
101
103
116
124
054
110
040
124
124
000
116
040
123
116

045
122
114
105
125
110
104
117
105
117

103
124
116
105
105
103
114
106
115

123
116

P.ABX:

040

105
122
105
045

000

045
104
103
116
124
122
123

P.ABY:

111
122
101

105
122

040

101
103
126

000

117

045
101
040
116
103
111
124
114
120
103
103
116
124
040

P.ABZ:

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

/HEN/
/ RE/
/TES/
/TeN/
<00>

/
/%N

/A R/
/EPL/
/ACE/
/ BU/
/LKH/
/EAD/

/7 CO/
/NNE/
/CT0/
/R, 7/
/THE/
/N R/
/ETE/
/STe/
/N/7<00><00>
/%Ns/

/A D/
/71ISC/
/0ONN/
/ECT/
/ TR/
/ANS/
/CEX/
/VER/
/ CA/
/BLE/
/ FR/
/0M /
/TRA/
/NSC/
/EIV/

/ER/<00>
<00>

/%N
/
/A A/

/ND /
/CON/
/NEC/
/T 1/
/T 17
/0 L/
/00P/
/BAC/
/K C/
/0ONN/
/ECT/
/0R 7/

VAX-11 Bliss-16 V4,0-579
[MAZURCZYK ,DEGNAJZGNA1.BLI;2

SEQ 0044

(24)

G4
ZGNAL

v01.0

004540
004543
004546
004551
004554
004557
004562
004565
004570
004573
004576
004601

004607
004612
004615
004620
004623
004626
004631
004634
004637

004642
N04645
004640
004651
004654
004657
004662
004665
004670
004673
004676
004701
004704
004707
004712
004715
004716
004721
004724
004727
004732
004735
004740
004743
004746
004751
004754
004757
004762
004765
004770

CZQGNACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE
116
102
113
101
101

104

116
116
040
120
103
124
116
105

000

105
114

105
103
114

040

105
122
105
045
116
040
120
103

124

216
105
105
040
105
122
105
045
116

040

120
103
124
040
123
111
102
054
110
040
124
124
000

125

110
104

123
115
131

045

P.ACA:

122
114
105
122

123

111
122
101
105
124
116
105

123
116

045
122
114
105
122

P.ACB:

123

111
12

124

116
105
123
116

045
122
114
105
110
106
105
106
101
040

105
122

105
045

P.ACC:

/AND/
/ BU/
/LKH/

/ERD/
/ AS/
/SEM/
/BLY/
/%N/<00>
/%Ns/
/A R/

/EPL/
/ACE/
/ TR/
/ANS/
/CE1/
/VER/
/ CA/
/BLE/
/7, 1/
/HEN/
/ RE/
/TES/
/TeN/
<00>

/%Ns/
/A R/
/EPL/
/ACE/
/ TR/
/ANS/
/CE1/
/VER/
/, 1/
/HEN/
/ RE/
/TES/

/TeN/
<00>

/%Ns/

/A R/
/EPL/
/ACE/
/7 TH/
/E F/
/USE/
/ IF/
/ BA/
/0D, 7/
/THE/
/N R/
/ETE/
/STe/

/N/<00>

VAX-11 Bliss-16 v4,0-579
[(MAZURCZYK .DEGNAJZQGNA1.BLI;2

H4
CZQGNACO DEGNA FUNCTIONAL TEST

ZGNAL

PROTECTION TABLE

v01.0

004772
004775
005000
005003
005006
005011
005014
005017
005022
005025
005030

005033
005036

005041
005044
005047
005052
005055
005060
005063
005066
005071
005074
005077

005102
005105
005110
005113
005116
005121
005124
005127
005132
005135
005140
005143
005146
005150
005153
005156
005161
005164
005167
005172
005175
005200
005202
005205
005210
005213
005216
005221
005224

S-Jul-1984 14:03: 26
5-Jul-1984 14:00: S 1

045
101

101
122
105
105
105
122
124

072
045
101
101

124
116
111

103
120
122
045
101

125

116
040
104
105
111
040

123
111

117

000
116
040
104
122

123
124
105
122
124

072
101

103

040

045
105
105
105

045
102
040
103
126
104
103
120
122

000
045
102
040
101
115
040

P.ACD:

P.ACE:

123
111

117

000
040
124
114
040
066
040
120

P.ACF:

075

117

101
116
130
040

P.ACG:

045
101
101
122

105
105
125
105
P.ACH:

045
101
115

117
122

111
040

124

/
/9N
/A B/
/RAD /
/REC/
/EIV/
/E D/

/ESC/

/RIP/
/TOR/
/:/7<00><00>
/%Ns/
/A B/
/ARD 7/
/TRA/
/NSM/
/1T 7
/DES/
/CRI/
/PT0/
/R:/7<00>
/%A /
/ACT/
/UAL/
/

/%067
/%A /
/EXP/
/ECT/
/ED 7/
/= %/

/706%/
/A 1/
/NDE/
/X

/ 8D/
/4%N/

<00><00>
/%Ns/

/A B/
/AD /
/REC/
/EIV/

/E B/

/UFF/
/ER:/

<00><00>

/
/%N
/A D/
/MA /
/0PE/
/RAT/
/ION/
/7 TA/

VAX-11 Bliss-16 Vv4.,0-579
[MAZURCZYK .DEQNA1ZGNAL1.BLI;2

SEQ 0046
Page

(24)

14
ZGNAL
v01.0

005227
005232
005235
005240
005243
005246
005251
005254
005257
005262
005265
005270
005273
005276
005301
005304
005307
005312
005315
005320
005323
005326
005331
005334

005337
005342
005345
005346
005351
005354
005357
005362
005365
005370
005373
005376
005401
005404
005407
005410
005413
005416
005421
005424
005427
005432
005435

005440

005443
005446
005451
005454
005457

CZGNACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE

105
124

123
117

.ASCII
.ASCII

116
116

107
000

040

124

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

040

116

045

117
101

040
116

105
116

123
000

040
126

045

105
040
123
040

122
127
040
120

040
111
055
101
111
045

106
114
040
111
116
116

116

045

127

124

127
124
102
124
104
101
111
124
123
055

116

045
127
124
102
124
104
101

110
122

117
040

101

040

000

106
117

105

.ASCII

P.ACJ:

105

040
111
101
125
045
045
115
125
050
040
040
111
101
125
045
045

P.ACI:

104
111

116

040

.ASCII

114

000

040
040

123

P.ACK:

P.ACL:

P.ACM:

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

/KES/
/7 10/
/0 L/
/0NG/
/%N/<00>
/9Ns/

/A T/
/700 /7
/MAN/
/Y D/
/EVI/
/CES/

/8N/<00>
/%N
/
/A T/
/HER/
/E W/

/RS /
/A P/
/0ME/
/R F/
/RIL/
/

/WAI/
/TIN/
/GSN/
<00>

/9Ns/
/A W/
/RIT/
/ AB/
/0UT/

/ %D/
/2%A/
/7 M1/
/NUT/
/E(S/
/) -/
<00>

/%Ns/
/A W/
/AIT/
/ AB/
/0UT/

/ %D/
/2%RA/
/ HO/
/UR /

/-/<00><00>

/%A /
/IF 7/
/NO /
/RES/

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEQNA]JZGNAL.BLI;2

SEQ 0047

(24)

J4
CZGNACO DEGNA FUNCTIONAL TEST

ZGNAL

PROTECTION TABLE

v01.0

005462
005465
005470
005473
005476
005501
005504
005507
005512
005515
005520
005523
005526
005531
005534

005536
005541
005544
005547
005552
005555
005560
005563

005566
005571
005574
005577
005602
005605
005610
005613
005616
005621
005624
005627
005632
005635
005640
005643
005646
005651
005654
005657
005662
005665
005670
005673
005676
005701
005704
005707
005712
005714

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

105

120
101
101
103
122

117
130

124
124
105
116
103
122
124
040
040
111

111
105
101

106
115
105
045
000
116
040
122
101
105
123
121
114

116
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
116
045

040
000
116
045
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
055
000
116

040
117
124
124

000
045
101

126
125

124
132
117
116

054
131
040

131
110
101
105

124
105
124
122
040
123
P.ACN:

117
105
P.ACO:

P.ACP:

/ET,/
7 1Y/
/PE /
/ANY/
/ CH/
/ARA/
/CTE/
/R T/
/0 E/
/XIT/
/ FR/
/0M /
/TES/
/TeN/

<00:<00>

/%Ns/

/A T/
/DR /
/VAL/
/UE /
/1S 7/
/EQU/
/AL /
/70 7
/ZER/
/0 %/
/N/<00><00>
/9SNs/

/NsA/
/===t
/-==/
/-==/
/-==/
/-<-=/
/===/
/-==/
/-=</
/-==/
/--</
/--</

l-=-</
/--=/
/-=-</
/==t
/---/
/=-=-=/
/-<</
/===t
/--</
/--</
/--%/

/N/<00>
/%N%/

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

(MAZURCZYK.DEGNA]ZQNA1.BLI;2

SEQ 0048

(24)

K4
CZQGNACO DEQNA FUNCTIONAL TEST

S-Jul-1984 14:03:26
S5-Jul-1984 14:00:51

PROTECTION TABLE
040
104
123
040
124
123
103
101
060
116
116
040
104

123

040

124
123
103

102
040
122
102

123
124
113
124

072

000
045
102
040
122
102

P.ACQ:

123
124
113
124

072
000

101
072

101
101
123
124
116
104
105

105
123

045
123
124
122
122
105
125
102
040
040
105
040
122
124

P.ACR:

111

102
123
116

045
102
040
101

117

101

122
123
110
113
115

P.ACS:

/A B/
/AD /
/CSR/
/, B/
/ITS/
/ ST/
7UCK/
/ AT/
/ 0:/
/%N/<00>
<00>

/
/%N
/A B/
/RD /
/CSR/
I B
/ITS/
/7 ST/
/UCK/
/ AT/
/

1:/

/%N/<00>
<00>

/
/%N
/A S/
/0FT/
/WAR/
/E R/
/ESE/
/T W/
/NAB/
/LE /
/70 7/
/CLE/
/AR /
/CSR/
/ ST/
/AT1/
/C B/
/1ITS/
/ %N/

<00><00>

/%Ns/

/A B/
/AD /
/STA/
/T10/
/N A/
/DDR/
/ESS/
/ CH/
/ECK/
/SUM/

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEGNA)ZQGNA1.BLI;2

SEQ 0049
Page

(24)

L4
ZGNAL

v01.0

006151
006154
006157
006162
006165
006170
006173
006176
006201
006204
006207
006212
006215
006220
006223
006226
006231
006234
006237
006240
006243
006246
006251
006254
006257

006262
006265
006270
006273
006276
006361

006307
006312
006315
006320
006323
006326
006331
006334
006337
006342
006345
006350
006353
006356
006361
0065364
006367
006372
006375
006403

CZQGNACO DEGNA FUNCTIONAL TEST

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE
040

124

.ASCII

101

. .ASCII

040

- .ASCII

040
066
040
120
040
066
000

045
045
105
040
045
045
000

040
104
124
111
040
104
123
040

102
040
101
117
101
122
123
000

116

045

P.ACU:

116

045

P.ACV:

116

040
104
105
101
057
120
105
105
123
122
116
040
104
123
040

120
124

040
040
102
040
051
117

045

102
040
121
040
117
101
040
107
124
072
000
102
040
122
105

105
105

105
105
124
060
000

122
050
111
065
040
040
040
124
117
045
000

040
104
057

102
040
104

116

P.ACT:

045

P.ACM:

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

/: A/
%y 7
/= %/

/706%/
/A E/
/XP /
/= %/

/706%/
/N/<00><00>
/%Ns/
/A B/
/RD /
/STA/
/TI10/
/N A/
/DDR/
/ESS/
/: /7<00>
<00>

/%Ns%/
/A B/
/AD /
/DEQ/
/NA /
/1/7<57>70/
/ PA/
/GE 7
/REG/
/IST/
/ER:/

/%N/<00>
/%N
/
/A B/

/AD /
/CSR/
/, E/
/XPE/
/CTE/
/0 R/
/L (/
/ Bl/
/T S/
/7 )/
70 7
/BE 7/
/SET/

/7 10/
/ 0%/
/N/<00><00>
/%Ns/
/A B/
/AD /
/B/7<S7>/D/

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEGNA]JZQGNA1.BLI;2

SEQ 0050

(24)

M4
ZQGNA1

v01.0

006406
006411
006414
006417
006422

006425

006430
006433
006436
006441
006444
006447
006452
006455
006460
006463
006466
006471
006474
006477
006502
006505
006510
006513
006516
006521
006524
006527
006532
006535
006540
006543
006546
006551
006554
006557
006562
006565
006570
006572
006575
006600
006603
006606
006611
006614
006617
006622

006625
006630
006633
006636
006641

CZQNACO DEGNA FUNCTIONAL TEST

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE
120
115
110
113
115
111

105

075

117

101
103
075
117
101
130
075

122
040
105
123
072
116
130
040
040

117

116
116
040
104
122
040
105
123
040
106

P.ACX:

124

040
040

P.ACY:

/ PR/
/0M /
/CHE/
/CKS/
/UM:/
/ IN/

/DEX/
/

/%067
/%A /
/ACT/
/9%06/
/%A /
/EXP/
/

/%06/
/9%N/<00>
/
/9N
/A B/

<S7>/D0 /
/PRO/
/M C/
/HEC/
/KSU/
/M 0/
/FFS/
/ET /
/= %/
/706%/
/A A/
/CT 7/
/= %/

/706%/
/A E/
/XP /
/= %/
/706%/
/N/<00>
/9%Ns/
/A B/
/AD /
/INT/
/ERR/
/UPT/
/: A/

/DR /
/= %/
/06%/
/A A/
/CT 7/
/LEV/
/ =/

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK.DEGNA]JZQGNA1.BLI;2

SEQ 0051

Page

(24)

N4
ZGNA1
v01.0

006644
006647
006652

006655

006660
006663
006666
006671
006672
006675
006700
006703
006706
006711
006714
006717
006722
006725
006730
006733
006736
006741
006744
006747

006752
006755
006756
006761
006764
006767
006772
006775
007000
007003
007006
007011
007014
007017
007022
007025
007030
007033

CZQGNACO DEQNA FUNCTIONAL TEST

S-Jul-1984 14:03:26
S5-Jul-1984 14:00:51

PROTECTION TABLE

117
101
130
114
040
045
045

066
040
120
105
075
117
116

116
040
107
124
040
111
104
117
105
117
040

045
122
111
105
106
114
040
040
123
116
101

040
104
123
040
117
116

101
122
123
040
066
000

116
040
104
122
123
124
124
125

045
102
040
101
115

117
101

040
116

114
123
116
116

114
111
123
000

Cc4a0
040

040

101
123

124

103

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
.ASCII
P.ACZ:

.ASCII

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

/7 A/
/DDR/
/ESS/
I
fi
/%06/
/%N/<00>

.ASCII
.ASCII
.ASCII
.ASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII

/
/%N
/A B/
/AD /
/TRA/
/NSM/
731 ¥
/STA/
/TUS/
T W
/700 /7
/MAN/
/Y C/
/0LL/
/1S1/
/0ONS/
/%N/<00>

.PSECT

$GLOBS,

.BLKW

100

.BLKW
RCV.BUFFER::
.BLKW

100

P.ADA:

.ASCII

.ASCII
.ASCII

.ASCII
.ASCII
.ASCII
.ASCII

RCV.D.LIST::

000200

XMIT.D.LIST::

004400

<00>

.ASCII /%N/
.ASCII /A R/
.ASCII /EGI/
.ASCII /STE/
.ASCII /R F/
.ASCII /AIL/
.ASCII /ED /
.ASCII /70 7/
.ASCII /RES/
.ASCII1- /PON/
.ASCII /D A/

000000
000000

000400

/%06/
/%A /
/EXP/
/ LE/
/N =/
/ %0/
/6%N/

XMIT.BUFFER::

<00>

2000

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEGNA]ZQGNA1.BLI;2

SEQ 0052
Page

5S2

(24)

B5
CZGNACO DEGNA FUNCTIONAL TEST

ZGNA1
v01.0

S-Jul-1984 14:03:26
S5-Jul-1984 14:00:51

PROTECTION TABLE

010400

PHYS.ADR:
:

010426

SETUP .BUFFER: :
.BLKW

011426
011446

.BLKW
STATION.ADR::
.BLKW

011462

011503
011504
011505
011506
011507
011510
011511
011512
011513
0115i4
011515
011516
011517

011520

011521
011522

011523

011524
011525
011526
011527

011530

011531
011532
011533

011534
011535

011536
011537
011540
011541

NOoOwbundg

GDgsvuwhuu
g
b

011477

011500
0115Cs
011502
011502

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

TARGET.ADR::

LSS SV UV RV AT

011475
011476

wra»hn—HNHVNHugun-hnaflt‘w
oo
VIILITLITIVIUVIVDDDD
VD

011473
011474

PTRN.TABLE::

(QICIUIV U T LSS

011472
011472

377
377
377
377
377
377

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

.BYTE
.BYTE
,BYTE
.BYTE
.BYTE

.BYTE
.BYTE

377
377
377
377
377
377

364

VAX-11 Bliss-16 v4.,0-579

(MAZURCZYK.DEQGNA JZGNAL.BLI ;2

C5
ZANAL

v01.0

011542
011543
011544
011545
011546

011547

011550
011551
011552
011553

011554
011555
011556
011557

011560
011561
011562
011563
011564
011565
011566
011567
011570
011571
011572
011573
011574
011575

011576
011577
011600
01160*
011602
011603
011604
011605
011606
011607
011610
11611
011612
011613
011614
011615
011616
011617
011620
011621
011622

011623

011624

011625
011626

CZQGNACO DEONA FUNCTIONAL TEST

5-Jul-1984 14:03:26
S-Jul-1984 14:00:51

PROTECTION TABLE

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

.BYTE

.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE

‘BYTE
.BYTE
.BYTE
.BYTE
‘BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
.BYTE
‘BYTE

.BYTE

.BYTE
.BYTE
.BYTE
.BYTE

VAX-11 Bliss-16 v4.0-579

[MAZURCZ
Y ,DEQGNA JZGNAL .BLI ;2

SEQ 0054

(24)

D5
CZQGNACO DEGNA FUNCTIONAL TEST

ZGNAL
jVO01.0

011641

011642
011643
011644
011645
011646
011647
011650
011651
011652
011653
011654
011655
011656
011657

011660
011661

011662
011663
011664

011665

011666
011667
011670
011671
Cl11672
011672
011674
011676
011700
011702
011704
011706
011710

11712
011714
011716
011720
011722
011724
011726
011730
011732

PROTECTION TABLE

001

.BYTE

003

.BYTE

125
005

.BYTE
.BYTE
.BYTE

007
010
011
315

.BYTE

qomsauwno

011627
011630
011631
011632
011633
011634
011635
011636
011637
011640

S5-Jul-1984 14:03:26
S-Jul-1984 14:00:51

.BYTE
.BYTE

046
047
047
111

.BYTE
.BYTE
.BYTE

241

.BYTE
.BYTE
.BYTE

147

273
114

237
353

.BYTE
.BYTE
.BYTE
.BYIE
.BYTE
.BYTE
.BYTE

276
307

217

377
377
377
377

BD.PROM.DESCR::
.WORD
.WORD

RCV.BUFFER

-2000
0
0

-100000

XMIT .BUFFER
-2000
0
0

-100000

1D16::

20000
0
0

VAX-11 Bliss-16 v4.0-579

[(MAZURCZYK.DEGNA]ZGNAL
.BLI;2

SEQ 0055

Page

(24)

ZAGNA1
v01.0

CZGNACO DEGNA FUNCTIONAL TEST

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE

-100000

011732
011734
011736
011740
011742
011744
011746
011750
011752
011754
011756
011760
011762
011764
011766
011770
011772
011774
011776
012000
012002

012004
012006
012010
012012
012014
012016
012020
012022
012024
012026
012030
012032
012034
012036
012040
012042
012044
012046
012050
012052
012054
012056
012060
012062
012062
012064
012066
012070
012072
012074
012076
012100

-77600

XMIT,.BUFFER
-1
0
0
-100000
-77500

XMIT.BUFFER

-2
0
;
0
-1000C0

-77700
XMIT.BUFFER+2

-1
0
0
-100000
-60000

XMIT.BUFFER+4

-1
0
0

-100000
20000

XMIT.D.LIST+74
-1

-WORD
-WORD
-WORD

"WORD
-WORD

-WORD
TD013::

" WORD
-WORD
.WORD
.WORD
.WORD

.WORD
.WORD
.WORD

0
0
-100000
-100000

XMIT.D.LIST«70

-2
0
0

-100000

-60000
TgRGET.ADRol62
0
0
-100000

20000

-100000
-100000

XMIT.BUFFER
-1
0

0
-100000
-100000

VAX-11 Bliss-16 v4.0-579
[(M
YKAZU
.DEQNA ]ZGNA1
RCZ
.BLI;2

SEQ 0056

(24)

F5
ZGNAL

v01.0

CZQNACO DEGNA FUNCTIONAL TEST

PROTECTION TABLE

XMIT.BUFFER+2

012102
012104
012106
012110
012112
012114
012116
012120
012122
012124
012126
012130
012132
012134

-177

0
0
-100000
-100000
XMIT.BUFFER+400
-1
0
0
-100000
40000

XMIT.D.LIST+60
-1
0
0
-100000
-60000
XMIT.BUFFER+402

012136

012140

012142
012144
012146
012150
012152
012154
012156
012160
012162
012166
012166
012170
012172

012174
012176
012200
012202
012204
012206
012210
012212
012214
012216
012220
012222
012224
012226
012230
012232
012234
012236
012240
012242
012244
012246
012250
012252

5-Jul-1984 14:03:26
5-Jul-1984 14:00:51

-77

0
0
-100000
50000
RD13::

-100000
-1000C0

REV.BUFFER

0
0
-100000
-100000

RCV.BUFFER+2
-76
0

0
-100000
-100000

RCV.BUFFER+176
-1

0
0
-100000
-100000

RSV.BUFFER0200

0
0
-100000

-100000
RCV.BUFFER+204

VAX-11 Bliss-16 v4,0-579

[MAZURCZYK.DEGNA]ZGNAL1.BLI;2

SEQ 0057

Page

(24)

G5
CZQNACO DEGNA FUNCTIONAL TEST

ZGNAL
v01.0

177775

0
0
-100000
-100000
RCV.BUFFER+406

RCV.BUFFER+576
-1
0
0

-100000
fOOOO

pa
e

012372

012374
.BLKW

012409

XBUF ,LENGTH: :

012402

RBUF .LENGTH: :

012406

RgV.BUFFERoCOO

-74

012370

012404

0
0
-100000
-100000

012354
012356
012360
012362
012366

012376

-40000
REV.D.LISTolZC

.BLKW

.BLKW
INTERRUPT FLG::
.BLKW
DEQNA.NO:
:

177777

000000
000000
100000
100000
001000’

-100000

177776

000000
000000
100000
140000
000124

-74

0
0
-100000
-100000
RCV.BUFFER+374
-2
0
0

012330
012232
012334
012336
012340
012342
012344
012346
012350
012352

PROTECTION TABLE

333332333333333333333338

012254
012256
012260
0122v2
012264
012266
012270
012272
012274
012276
012300
012302
012304
012306
012310
012312
012314
012316
012320
012322
012324
012326

S5-Jul-1984 14:03:26
S-Jul-1984 14:00:51

VAX-11 Bliss-16 v4.0-579

[(MAZURCZYK.DEQGNA JZGNA1.BLI ;2

SEQ 0058

(24)

HS
CZQNACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE

VAX-11 Bliss-16 v4,0-579

[(MAZURCZYK.DEGNA]JZGNA1.BLI:2

ZGNA1L
v01.0

012410

012412

012414

012416

012420

012432
012434

TMP.IOP.ADR:
:

012440
012442
012444
012446
012450
012452
012454
012456
012460
012462
012464
012466
012470
012472
012474
012475
012476
012477
012500
012502

TEMP1::
TEMP2::
TEMP3::
TEMP4::
TEMPS::
TEMP6::
TEMP7::
TEMP8::
TEMP9::
Pl::

.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKW
.BLKUW

.BLKW
.BLKW
.BLKW
.BLKW

: .BLKB
::.BLKB
: .BLKB
: .BLKB

TADR1::
TADR2::

O
O

.BLKW

TMP .REG.DATA:
:

P3::
P4:;
PS::

.BLKW

012436

P2::

012430

.WOR
ERR.NUMBER: :
.WORD
ERR.FLAG::
.WORD
ERR.COUNT:
:
. WORD

012426

ot et et e o ot ot ot et et el et b et b et b pt et et

012424

012422

.BLKW
.BLKW

.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL

L$SOFT, TSPTHV, LSRPT, LSINIT
L$CLEAN, LS$LAST, L$HARD, LSDVTYP
L$DESC, L$DU, LS$SAU, LSAUTO, T1
T2,

T10,

T17,

13,

14,

T11,

118,

15,

T12,
T19,

T6,

T13,

T20,

17, 78, 19
T14, T15, T16
T21

SEQ 0059
Page

(24)

15
CZGNACO DEGNA FUNCTIONAL TEST

ZGNA1

S-Jul-1984 14:03:26
S5-Jul-1984 14:00:51

PROTECTION TABLE

v01.0

BIT1S5==
BIT14==
BIT13==
BIT12==
BIT1ll==
BIT10==
BIT09==
BIT08==
BITO7==
BITO6==
BIT0S==

BIT04==

BIT03==
BITO2==
BIT01==

BIT00==
BIT9==
BIT8==

BIT7==
BIT6==
BITS==
BIT4==
BIT3==
BIT2==
BITl==
BITO==
EF.START==
EF .RESTART==
EF .CONTINUE==
EF .NEW==
EF .PWR==

PRIO7==
PRI06==

PRIOS==

PRIO4 ==
PRIO3==
PRIO2==

PRIO1==
PRIOO==

EVL==
LOT==
ADR==

000100

i0U==

ISR==

UAM==

BOE ==
002000

010000
0000

PNT==
PRI =+

IXE ==
TBE ==
TER==

-100000

40000

20000
10000

4000

2000
1000

400

200
100

20
10
4

2
1
..000

400

200
100

VAX-11 Bliss-16 V4.0-579

[(MAZURCZYK.DEGNA]ZQGNA1.BLI;2

SEQ 0060

(24)

J5
CZQNACO DEGNA FUNCTIONAL TEST

ZANAL
v01.0

S5-Jul-1984 14:03:26
S-Jul-1984 14:00:51

PROTECTION TABLE

040000
100000
000176'
000220’
000210’
000011°
000000’
000400°
000000
000030
000060’
000122°
000164
000226
000270*
000332’
000370’
000452
000540
000644
000736
001030’
001122’
001214°

001306
001400
001462
001546
001612’
001676
001765
002050’
002136*
002224
002250°
002336
002426
002506
002572’
002650
002724°
002766"
002030’

003072’
003136’
003164
003252’
003336’
003400
003454
003530’
003626’
003732°

LOE==

LSERRTBL==
L$SW==
LSHW==
L$DEPO==

DESCR.LIST==
DATA.BUFFER==
QSTO1s==
QST02==
QST03==
QST04==
QST0S==
QST06==
QSTO7==
MSGOO==
MSGOl1==
MSGO2==

MSGO3==
MSGO4==
MSGOS==
MSGO6==
MSGO7==
MSGO8==
MSG09==
MSG10==
MSG11==
MSGl2==
MSG13==
MSG14==
MSG15==
MSG16==
MSG17==
MSG18==
MSG19==
MSG20==
MSG21==
MSG22==

MSG23==
MSG24==
MSG25==
MSG26==
MSG27==
MSG28==
MSG29+=
MSG30==
MSG31==
MSG32==
MSG33==
MSG34==
MSG35==
MSG36==
MSG37==

40000

-100000
ERRTYP
L$SWLEN+2
L$HWLEN+2
LSREV.1
RCV.D.LIST

RCV.BUFFER
P.AAA
P.AAB
P.AAC
P.AAD
P.AAE
P.AAF
P.AAG
P.AAH
P.AAI
P.AAJ
P.AAK

P.AAL
P.AAM
P.AAN
P.AAD
P.AAP
P.AAQ
P.AAR
P.AAS
P.AAT
P.AAV
P.AAV
P.AAW
P.AAX
P.AAY
P.AAZ
P.ABA

P.ABB
P.ABC
P.ABD
P.ABE
P.ABF
P ABG
P.ABH
P.ABI

P."BJ

P.FBK
P.ABL
P.ABM
P.ABN
P.ABO
P.ABP
P.ABQ
P.ABR
P.ABS

VAX-11 Bliss-16 v4.,0-579

[MAZURCZYK.DEGNA]ZQGNA1.BLI;2

SEQ 0061

Page

(24)

IKS

ZANAL1
v01.0

CZQGNACO DEGNA FUNCTIONAL TEST

S-Jul-1984
14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE

P.ABT

MSG38==

004024°

004104

MSG39==

004466'

MSG44:==

P.ABU

MSG40==
MSG41==
MSG42==
MSG43==

P.ABV
P.ABW
P.ABX
P.ABY

004570’
004646
004716
004772’
005030°
005066
005150'
005202
005246°
005276

MSG4S==
MSG46==
MSG47==
MSG48==
MSG49==
MSGS0==
MSGS1==
MSGS2==
MSGS53==
MSGS54+==

P.ACA
P.ACB
P.ACC
P.ACD
P.ACE
P.ACF
P.ACG
P.AGH
P.ACI
P.ACJ

005536°

MSGS58==

P.ACN

004170
004260'
004322’
004402

P.ABZ

P.ACK
P.ACL
P.ACM

MSGSS==
MSGS6==
MSGS7==

005346°
005410
005446'

005602°
005714°
005756°
006020°
006110
006204
006240°
006304°
006372’
006474

MSGS9==
MSG60==
MSG61==
MSG62==
MSG63==
MSG64 ==
MSG6S==
MSG66==
MSG67==
MSG68==

006572
006672’
006756
000210°
000220°

VAX-11
Bliss-16 V4,0-579
[MAZURCZYK.DEQGNA]ZGNAL1.BLI;2

P.ACO
P.ACP
P.ACQ
P.ACR
P.ACS
P.ACT
P.ACU
P.ACV
P.ACW
P.ACX

MSG69==
MSG70==
MSG71==
HP.TABLE==
SP.TABLE==

P.ACY
P.ACZ
P.ADA
LS$HWLEN.2
L$SWLEN.2

PSECT SUMMARY

:
:
5
5

Psect Name
$CODE $
$GLOBS$
$PLITS

Words
81
2722
1807

Attributes
RO .
I
.
R ,
D
.
RO,
D
,

LCL,
LCL,
LCL,

REL,
REL,
REL,

CON
CON
CON

Library Statistics

e
File

L TIPS o T

- [

)y it e ey Symbols -------Totel
Loaded
Percent

Pages
Mapped

Processing
Time

- Qnggz(24)
62

ZGNAL
v01.0

CZQNACO DEGNA FUNCTIONAL TEST

5-Jul-1984
14:03:26
5-Jul-1984 14:00:51

PROTECTION TABLE

:. DISKSUSER2:[MAZURCZYK.DEGNA)GNALIB.L1;2

223

COMMAND QUALIFIERS

BLISS/PDP11 ZGNA1.BLI/LIST=ZQGNA1.LIS/0BJECT=ZQGNA1.0BJ/SCURCE=PAGE:53
Size:

Run Time:

0 code + 4610 data words
00:24.1

01:02.2
Elapsed Time:
6042
Lines/CPU Min:
Lexemes/CPU-Min: 38443
236 pages
Memory Used:
Compi_ation Complete

VAX-11
Bliss-16 v4.0-579
[(MAZURCZYK.DEGNA]ZQGNA1.BLI;2
00:00.1

55092223(24)
63

M5
CZQNACO DEQGNA FUNCTIONAL TEST

0005

W
e

@¢

0003

0007
0008
0009
0010
1500

e O00000

0001

ZANA2

5-Jul-1984 14:04:31

5-Jul-1984 14:01:26

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEGNAJZGNA2.BLI;2

MODULE ZQGNA2 (#TITLE 'CZONACO DEGNA FUNCTIONAL TEST’
IDENT

'V01.0',

QDDRESSING_HODE(ABSOLUTE)
#SBTTL

‘PROGRAM INIT MODULE'

BEGIN

LIBRARY 'QGNALIB';

REQUIRE 'BLSMAC.REQ’;

! GNALIB LIBRARY

! DIAGNOSTIC SUPERVISOR LIBRARY

SEQ 0064

(1)

N5
CZQGNACO DEGNA FUNCTIONAL TEST

ZANA2
v01.0
e
e
e
o e S
B

1501
1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513

EXTERNAL DECLARATIONS

#SBTTL 'EXTERNAL DECLARATIONS'
' <BLF/FORMAT>
PSECT

CODE = AASCODES;

FORWARD ROUTINE

NXM_INT

EXTERNAL ROUTINE
RESET_DEQGNA

: LSISR NOVALUE;
: NOVALUE;

S-Jul-1984 14:04:31
5-Jul-1984 14:01:26

VAX-11 Bliss-16 V4.0-579

[MAZURCZYK.DEGNAJZQGNA2.BLI;2

SEQ 0065

(2)

B6
CZQGNACO DEGNA FUNCTIONAL TEST
EXTERNAL DECLARATIONS

ZANA2

[(MAZURCZYK.DEQGNA
JZGNA2 .BLI ;2

P
i P

COMMUNICATION AREA DECLARATIONS

b e

: VECTOR [ 8, WORD ),

- e e

HARDWARE AND SOFTWARE P-TABLE STORAGE DECLARATIONS

o P

e e P

IOP_TABLE

HWP_TABLE

: REF BLOCK [ HWP_SIZE, WORD ) FIELD ( HWP_FIELDS ),

: REF BLOCK [ SWP_SIZE, WORD ] FIELD ( SWP_FIELDS ),
!

1 = INTERRUPT OCCURED

INTERRUPT _FLG

: WORD,

REG_ADR

: REF REG_STR FIELD ( IOP_FIELDS ),

GET_ADR

: REF ADR_STR FIELD ( IOP_FIELDS ),

IOP_DATA

: REF REG_STR FIELD ( IOP_FIELDS ),

TEMPORARY STORAGE DATA DECLARATIONS

TMP_IOP_ADR

: WORD,

! I/0 PAGE REGISTER ADDRESS

TEMP3
TEMP4

WORD,
: WORD,

!
!

: WORD,

TMP_REG_DATA
TEMP1
TEMP2

b e

b o e P

ot et e et e (o

e P

SWP_TABLE

:
:
:

WORD,
WORD,
WORD,

TEMPS
TEMP6
TEMP?

: WORD,
: WORD,
: WORD,

TEMP9

TEMPS

WORD,

!
!
!

!
!
!
!

I/0 PAGE REG CONTE NTS
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION
TEMPORARY STORAGE LOCATION

1547
1548
1549
1550
1551
1552
1553
1554
1555
1556
1557
1558

Yoo

b b ok o o

1541
1542
1543
1544
1545
1546

VAX-11 Bliss-16 v4.0-579

EXTERNAL

e (o P

1527
1528
1529
1530
1531
1532
1533
1534
1535
1536
1537
1538
1539
1540

et d P

1521
1522
1523
1524
1525

s P

1519
1520

1514
1515
1516
1517
1518

v01.0

S5-Jul-1984 14:04:31
5-Jul-1984 14:01:26

QUESTIONS AND ERROR MESSAGEES DECLARED EXTERNALLY
@STO1, QSTO2, QSTO3, QSTO4, QSTOS, QSTO6, QSTO7, MSGS4;

SEQ 0066

(3)

Cé
CZQGNACO DEGNA FUNCTIONAL TEST

ZANA2
v01.0

1570
1571

1572

1573

e Pt
P

e Pt Pt

s Bt

i e

NAMES OF DEVICES SUPPORTED BY PROGRAM

EQUALS;

NEVTYP (wASCIZ'DEQGNA/M7504');
TEST DESCRIPTION

et B

1567
1568
1569

#SBTTL *TYPE AND DESCRIPTION'

Pt B

1559
1560
1561
1562
1563
1564
1565

TYPE AND DESCRIPTION

DESCRIPT (#ASCIZ'DEQGNA FUNCTIONAL TEST');

S-Jul-1984 14:04:31
S5-Jul-1984 14:01:26

VAX-11 Bliss-16 v4.0-579

[(MAZURCZ
YK .DEQNA JZGNA2 .BLI ;2

SEQ_0067
P

(4)

ZANA2
v01.0

CZQNACO DEQNA FUNCTIONAL TEST

HARDWARE PARAMETER CODING SECTION

lg;l

#SBTTL 'HARDWARE PARAMETER CODING SECTION'

1576

1578

1580
1581

1
1

H
H

:
:

1575

1577

THE HARDWARE PARAMETER CODING SECTION CONTAINS MACROS

MACROS ARE NOT EXECUTED AS MACHINE INSTRUCTIONS BUT ARE

1579

lgfig

.
:
B
:

1584
1585
1586
1587

1
1
1
1

1589
1590

1
1

BGNHRD;

1593
1594

ENDHRD;

:
3

158

1588

:
:

1591
1592

3
5

1595

feo

1
1
1

S-Jul-1984
14:04:31
S5-Jul-1984 14:01:26

!
H
H
H

THAT ARE USED BY THE SUPERVISOR TO BUILD P-TABLES.

VAX-11
Bliss-16 v4,0-579
[MAZURCZYK ,DEGNA JZGNA2.BLI ;2

THE

INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES. THE
MACROS ALLOW THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR.

THIS CODE IS USED BY THE SUPERVISOR TO INTERROGATE THE OPERATOR
FOR DEVICE INFORMATION TO PUT IN THE P-TABLE. THIS CCDE IS USED
IN CONJUNCTION WITH THE DEFAULT P-TABLLE TEMPLATE., THE MACROS
USED IN THIS SECTION ARE “GPRMD", "“GPRMA",

GPRMA (QSTO1, #0'0‘, O, #0'174440', #0'174460', YES, 1);
GPRMA (QST02, s0'2', O, %0'700',
s0'704°',
YES, 1);

! 1/0 PAGE ADDRESS ?
! INTERRUPT VECTOR ADDR ?

SEQP.g.

E6
CZQNACO DEGNA FUNCTIONAL TEST
SOF TWARE PARAMETER CODING SECTION

1615
1616

1617
1618
1619
1620
1621

THE SOF TWARE 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

it et e

VAX-11 Bliss-16 v4,0-579
(MAZURCZYK.DEQGNA
JZGNA2 .BLI ;2

#SBTTL ‘SOFTWARE PARAMETER CODING SECTION'

ot e

INTERPRETED BY THE SUPERVISOR AS DATA STRUCTURES.

THE

BGNSFT;

GPRML ( QSTO3, =0'0', -1, YES, 1);
XFERF(NOTIMER);

! DO YOU WANT TO TEST SANITY TIMER ?

ot o

MACROS ALLCUW4 THE SUPERVISOR TO ESTABLISH COMMUNICATIONS
WITH THE OPERATOR.

! SANITY TIMER TIME-OUT VALUE ?

o
s o
o

1614

Pt Pt et et Pt e

1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613

it Pt

ZANA2
v01.0

5-Jul-1984 14:04:31
5-Jul-1984 14:01:26

SLONOTIMER);

GPRML ( QSTO6, %0'6',

-1, YES,

1);

GPRML ( QSTO4, %0'2',

-1, YES,

1);

ENDSFT;

EXTERNAL LOOPBACK MODE ?
SYSTEM HAS BLOCK-MODE MEMORY ?
LOOPBACK CONNECTOR IN DEGNA ?

SEQ 0069

(6)

F6
CZQGNACO DEGNA FUNCTIONAL TEST

1643

VAX-11 Bliss-16 v4.0-579

[(MAZURCZYK .DEQNA]ZQGNA2.BLI;2

0 I0 IO I8 18 IS IS 'S '8 e e ‘e '

e e

e e o

#SBTTL ‘REPORT CODING SECTION'

e e e e o

1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642

S-Jul-1984 14:04:31
5-Jul-1984 14:01:26

REPORT CODING SECTION

S LY LN S e e

ZANA2
v01.0

THE REPORT CODING SECTION CONTAINS THE
“PRINTS” CALLS THAT GENERATE STATISTICAL REPORTS.
THIS SECTION CONTAINS THE CODE FOR PRINTING
IT 1S
STATISTICAL INFORMATION GATHERED BY THE DIAGNOSTIC.
EXECUTED BY THE OPERATOR COMMAND “PRINT” OR BY THE MACRO CALL
“DORPT*.

USE THE PRINTS MACRO TC PRINT THE INFORMATION.

USE FORMAT STATEMENTS AS IN THE PRINTB/PRINTX MACROS.

BGNRPT;
TEMP1

ENDRPT;

LTITLE
. IDENT
.ENABL

105

121

116
115
060

101
067
064

057
065
000

104
116
106
103
117
11«
105
000

105
101
125
124
116
040
123

121
040
116
111
101
124
124

000003
000006
000011
000014
000016
000021
000024
000027
000032
000035
000040
000043
000044
000046

000000C

000050
000052
000054
000056
000060
000062

000031
00000°G
17444C
174460
001031
000000G

IT IS

THE PROGRAMMER'S RESPONSIBILTY TO DEVISE AND IMPLEMENT THE
FORM AND CONTENT OF THE STATISTICS.

.PSECT
L$DVTYP::
.ASCII

.ASCII
.ASCII
.ASCII

.BLKB
L$DESC::.ASCII

.ASCII
LASCII
.ASCII
.ASCII
LASCII
LASCII
.ASCII

.BLKB
LL$HRDLN:
:
.WORD
GP$1::
.WORD

Gr$2::

.WORD
. WORD
.WORD
.WORD

ZGNA2 CZGNACO DEQNA FUNCTIONAL TEST
;:21.0/

$CODES$,

/DEQ/

/NA/<57>
/M75/

/704/<00>

/DEQ/
/NA 7/
/FUN/
/CT1/
/0NA/
/L T/
/EST/
<00»>

2
§<<L‘NDHRD-L$HGDLN>/2>-1>
1
QSTI1
-3340
-2320
1031
QsT02

SEQ 0070

Page

(7)

G6
CZQGNACO DEGNA FUNCTIONAL TEST

ZANAR2
v01.0

REPORT CODING SECTION
000700
000704

000070

LSNDHRD::

000072

L$SFTLN::

000000C

GP$3::

000074
000076
000100
000102

000130
000000G

000104
000106
000110
000112
000114
000116

002052
000000G

000120
000122
000124
000126
000130
000132
000134
000136
000140

003130
000000G

GP$S::

004130

GP$6::

000142

5-Jul-1984 14:04:31
5-Jul-1984 14:01:26

177777
000000C

$NOTIMER:

GPs$4::

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK.DEQGNA JZGNA2.BLI ;2

700
704
1
<<<L$NDSFT-LSSFTLN>/2>-1>

130
0?703

<c<<$LNOTIMER- $SNOTIMER>+400>+4>+40>

177777

000007
001004

177777

001130
000000G
177777

$LNOTIME

GP$7::
LSNDSFT::

RESET.DEQGNA,

IOP.TABLE,

HWP.TABLE

SWP_.TABLE, INTERRUPT.FLG, REG.ADR
IOP.DATA, GET.ADR, TMP.IOP.ADR
TMP .REG.DATA,
TEMP4, TEMPS,
TEMP9, QSTO1,

TEMP1, TEMP2,
TEMP6, TEMP7,
QSTO2, QSTO3,

QSTOS, QSTO06, QSTO7, MSG54
100000
020000
010000
004000
002000
001000

000200
0001C0O
000040
000020
000010

BIT15==
BIT14==
BIT13-=
BIT12==
BIT11==
BIT10==
BIT09==
BIT08==
BITO7==

BIT06==
BITQS5==
BITO4==
BITO3==

-100000

40000

20000
10000

4000

2000
1000

400

200
100

20
10

TEMP3
TEMPS
QSTO4

SEQ 0071

ZQNA2
v01.0

CZQNACO DEGNA FUNCTIONAL TEST
REPORT CODING SECTION
000004

BITO2==

000001

BITOO==

001000
000400
000200
000100
000040
000020
000010
000004
000002
000001
000040

‘

000037
000036
000035

000034
000340

BIT9==
BIT8==
BIT7==
BIT6==
BITS==
BIT4==
BIT3==
BIT2==
BITl==
BITO==
EF .START
==

EF .PUR==
PRIO7==

34
340

PRIO6==

000200

PRIO4==

000240
000140

000100
000040

37
36
35

300

PRIOS==

240

PRIO3==

140

200

PRIO2==
PRIO1==

100
40

000000

PRIOO==

000020

ADR==

000200
000400

UAMs= =
BOE==

004000
010000
020000
040000

IXE==
IBE==
IER==
LOE==

4000
10000
20000
40000

L$HARD==
L$SOFT==

L$HRDLN+2
L$SFTLN.2

000004
000010

EVL==
LOT==

000040
000100

40
100

200
400

PNT==
PRI==

100000

1000
2000

HOE==

000050°
000074

000000

-100000

.SBTTL

LRPT REPORT CODING SECTION

MOV
RTS

¢1,TEMP1
PC

.PSECT

012737
000207

; Routine Size:

000001

000000G

4 words,

; Maximum stack depth per

LRPT:
Routine Base:

invocation:

O words

4
10

IDU==
ISR==

001000
002000

P.g.z (7))9

1000
400
200
100
40
20
10
4
2
1
40

000300

SEQ 007

EF .RESTART==
EF .CONTINUE==
EF .NEWs==

VAX-11
Bliss-16 v4.,0-579
[MAZURCZYK .DEQGNA JZGNA2.BLI ;2

BITO1==

000002

000000
000006

S-Jul-1984
14:04:31
5-Jul-1984 14:01:26

AASCODES$,

AASCODES + 0000

3
:

1641
1619

000006

004737
104425

.SBTTL

RTS

4 words,

Routine Base:

— o
e

: Maximum stack depth per invocation:

5-Jul-1984 14:01:26

L$RPT:: JSR
TRAP

000000°*

000207

; Routine Size:

1644
1645
1646
1647

S5-Jul-1984 14:04:31

CZGNACO DEGNA FUNCTIONAL TEST
REPORT CODING SECTION

ZANA2
v01.0
000000
000004

2 words

LSRPT REPORT CODING SECTION

PC,.LRPT
25
PC

AASCODES + 0010

VAX-11 Bliss-16 v4.0-579

[MAZURCZYK .DEQGNA JZGNA2.BLI;2

SEOP(.):ZS 10
(7))

1641

J6
ZQANA2

CZGNACO DEQNA FUNCTIONAL TEST

v01.0
:

B
:

:
:

1648

1649
1650

1651
1652

1653

INITIALIZE SECTION

1
1

1
1
1

!
H

THE INITIALIZE SECTION CONTAINS THE CODING THAT IS PERFORMED
AT THE BEGINNING OF EACH PASS.

THE INITIALIZE CODE IS EXECUTED UNDER FIVE CONDITIONS.

1654

B
:
5

1656
1657
1658

1
1
1

'
!
!

1660
1661

1
1

!
!

:
:
B

1655

1659

1664
1665
1666

1
1
1

!
!
!

:
:
:
3
:

1667
1668
1669
1670
1671

1
1
1
1
1

:
3
:
3
:

1672
1673
1674
1675
1676

1
1
2
2
2

ig;g

1677

[MAZURCZYK.DEGNAJZGNA2.BLI;2

THERE

DIAGNOSTIC KNOW UNDER WHICH CONDITION THE EXECUTION IS TAKING
PLACE. THE EVENT FLAGS ARE READ USING THE "READEF" MACRO.
THE CONDITIONS UNDER WHICH THE INIT CODE IS EXECUTED AND THE
CORRRESPONDING EVENT FLAGS ARE:

1663

ARE SUPERVISOR EVENT FLAGS THAT ARE USED TO LET THE

1662

.
:
P

S5-Jul-1984 14:01:26

VAX-11 Bliss-16 v4.,0-579

#SBTTL *INITIALIZE SECTION’

5-Jul-1984 14:04:31

START COMMAND
RESTART COMMAND

EF .START
EF .RESTART

POWERDOWN/POWERUP

EF .PUWR

CONTINUE COMMAND

EF .CONTINUE

EF .NEW
NEW PASS
EXAMPLE OF EVENT FLAG USE:
IF READEF(EF.START) THEN

START_FLAG = 1;
DURING THE INIT CODE, USE THE "GPHARD" MACRO TO OBTAIN P-TABLE
INFORMATION FOR DEVICE TESTING. GET GNE UNIT'S INFORMATION IF
THIS IS A SEQUENTIAL DIAGNOSTIC. NUMBER OF UNITS AVAILABLE IS IN
A HEADER LOCATION: “LSUNIT",

!
!
!
!
!

1--

BGNINIT;
LOCAL

START FLAG,

DELAY_MULT;

' SET IF THIS PASS IS A START

! CONTAINS DELAY FACTOR

:
H

1680
{gg;

2
g

SETPRI (PRIO7);
START_FLAG = CLEAR_FLG;

! PRIORITY 7 - NO INTERRUPTS ALLOWED
! CLEAR FLAG BEFORE TESTING IT

1683

IF READEF (EF_PWR)

! ARE WE HERE BECAUSE OF POWER FAIL?

iggg

1638

3
3

1684
1685

2
3

5
5
5

1689
1690
1691

4
4
4

5
s

1694
1695

2
2

:
3

3
:
:
H

1692
1693

1696

1697
1698
1699
1700

4
3

2
3
3
2

THEN
BEGIN

PRINTF ( MSGS4 );

INCR COUNT FROM O TO 60 DO

! WAIT APPROX. 60 SECONDS

BEGIN
DELAY_MULT = 10000;
DELAY (.DELAY_MULT);

END;

BREAK ;
END;

IF READEF (EF_START)

THEN
BEGINSTART_-LAG = TRUE;
END;

"THERE WAS POWER FAILURE - WAITING”

! BREAK FOR APT

! IS THIS A START ?

SEQ 0074

Page

(8)

K6
ZGNA2

CZQNACO DEQNA FUNCTIONAL TEST

v0i.0

INITIALIZE SECTION

2
2

:
:

1701
1702

:
:

1704
1705

:
:

3
:
3

1703

1706
1707

2
2

1708
1709

1710

2
2

3
g

:
-

1711
1712

3
3

1714

1713

1715

1717

1719

:
:
:
:
:
3

1721
1722
1723
1724
1725
1726

4
4
4
4
4
4

:
:

1728
1729

S
S

3
3
3

s
:
3

1716

1720

1730
1731

1732
1733
1734

fee
1--

INCR INDEX FROM O TO HWP_SIZE BY 2 DO
(HWP_TABLE + .INDEX) = 0;
oo

'--

THEN

IOP_DATA = _HWP_TABLE [ ADDR ];
HWP_TABLE = .TABLE_POINTER;
REG_ADR
= _HWP_TABLE [ ADDR );
GET_ADR
= ,HWP_TABLE [ ADDR ];
TMP_IOP_ADR = .HWP_TABLE [ ADDR ];
INCR INDEX FROM O YO 7 DO
BEGIN
IOP_TABLE [ .INDEX ] = .TMP_IOF_ADR;
TMP_IOP_ADR = .TMP_IOP_ADR + 2;

END;
RETURN;
ENDINIT;

END;

L$DLY

LSBTTL

LINIT INITIALIZE SECTION

TST

-(SP)

000340

MOV

000014
000016

005004
012700

000034

CLR
MOV

000026

012746

000000G

MOV

000036

010600

000032

000040

000042

104447
103027

012746
104417

LINIT:

.GLOBL

012700

000022
000024

000001

012702. 000075

! SAVE HW P-TABLE ADDRESS
! SAVE I/0 PAGE BASE ADDRESS
! SAVE 1/0 PAGE BASE ADDRESS

END;

000006

104441

! GET P-TABLE ADDRESS

BEGIN

000000G

000012

! ZERO OUT THE TABLES

IF GPHARD ( O, TABLE_POINTER ) NEQU O

004137

005746

(8)

GET BASE ADDRESS OF HARDWARE P-TABLE AND DEGNA I/0 PAGE

000000
000004

Page

BEGIN
LOCAL TABLE_POINTER;

2
2
1

[MAZURCZYK.DEQGNA]JZGNA2.BLI;2

SEQ 0075

IF .START_FLAG OR READEF (EF_NEW) OR READEF (EF_CONTINUE)
! IF THIS IS A START
THEN

4
3

S5-Jul-1984 14:01:26

VAX-11 Bliss-16 V4,0-579

CLEAR HARDWARE P-TABLE ON A START BEFORE DOING THE GPHARDS

1718

1727

S-Jul-1984 14:04:31

JSR

1643

#340,R0

;

1680

R4
#34,R0

: START.FLAG
.

1681
1683

#MSG54, -(SP)

1686

SP,RO

: SP,*

@75,R2

+ *,COUNT

TRAP

TRAP
BHIS

47
64

MOV

R1, $SAVES

MOV

TRAP

MOV

#1,-(SP)
17

1688

L6
CZGNACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:04:31
5-Jul-1984 14:01:26

INITIALIZE SECTION

;

4(SP)
RO,3$
R1

4%:

0000006
000002

9s:

000002

ROR

; *,START.FLAG
; START.FLAG

1699
1706

TRAP

MOV
TRAP

BHIS
MOV
BLO
MOV

BHIS
CLR
CLR
ADD
CMP
BLE
CLR
TRAP
TST

BEQ
MOV

MOV
MOV

MOV
MOV
MOV

000000G 000000G
000002
000000G
000002
000016

10¢:

11%:

88 words,

Maximum stack depth per

$$TMP2

#40,R0O
47
78
¢1,.R4
R4

CLR

MOV
ADD
ADD

CMP
BLE
TST

RTS

AASCODES
Rout ine Base:
invocation:
10 words

8¢
84

114

RO
HWP , TABLE(RO)
@2,R0
RO, @2
94
RO
42
RO
114

.DATA
LE,
ICP
aHWP . TAB

RO,HWP, TABLE

(RO),RO

RO,REG.ADR
RO,GET.ADR
RO, TMP.IOP.ADR
RO
TMP,IOP.ADR,
IOP . TABLE(RO)
©2,TMP ,IOP.ADR
#2,RO
RO, #16

10¢
(SP)e«

0020

8$:

S$STMP

$STMP1.,»

1688
1685
1696

BCS

000036

;

¢, 88THMP]

=+
;s COUNT,

(SP)+,(SP)+

68:

7%:

;

®s

000040

24
22
R2,1$

Ss:

000035

; Routine “ize:

3s:

000004

012700
104447

010037
005000
013760
062737
062700
020027
003765
005726
000207

: *«,DELAY.MULT
;s DELAY.MULT,$s$TMP2

®s

000144
000146
000152
000156
000162
000164
000166
000170
000172
000174
000202
000206
000210
000214
000220
000224
000226
000234
000242
000246
000252
000254
000256

000000G

000001

103404
012700
104447
103044
005000
005060
062700
020027
003771
005000
104442
005700
001430
017737
010037
011000
010037
010037

2$:

012704
006004

103410

1$:

023420

SEQ 0076

[MAZURCZYK
.DEGNA JZGNA2.BLI ;2

000100
000102
000104
000110
000112
000114
000120
000122
000124
200130
000132
000134
000140
000142

012703
010301
001410
013700
001403
005066
077003
005301
000767
104422
077216
022626
012700
104447
103002

VAX-11 Bliss-16 V4,0-579

INDEX

«( INDEX)
+,INDEX

*
INDEX,

1711
1712
1711
1718

TABLE.POINTER

: TABLE.POINTER,=*

HWP TABLE,*

: INDEX
:
H
:

*,+(INDEX)

* , INDEX

1721
1722
1723

1724
1725
1726
1728
1729
1726

INDEX,»
1643

M6
CZQNACO DEGNA FUNCTIONAL TEST

ZANA2

INITIALIZE SECTION

v01.0

000000
000004
000006

004737
104411
000207

; Routine Size:

.SBTTL
LS$INIT::JSR

000020'

4 words,

Routine Base:

: Maximum stack depth per invocation:

1735
1736
1737

S5-Jul-1984 14:04:31
S-Jul-1984 14:01:26

1
1
1

2 words

LSINIT INITIALIZE SECTION
PC,LINIT

TRAP
RTS

11
PC

AASCODES

+ 0300

VAX-11 Bliss-16 V4.0-579

[(MAZURCZYK.DEGNA]ZGNA2.BLI;2

SEQ 007 7

Page

(8)

1733

N6
ZQANA2

AUTODROP SECTION

1738
1739
1740
1741
1742
1743

1744
1745

1746

1747

1748

1749

1750
1751
1752
1753

5200 N N N = et s s ot ot ot ot ot it et

“e

v01.0

Routine Size:
Maximum stack

000000

000004
000006

004737

104461
000207

5-Jul-1984 14:01:26

1
1

(MAZURCZYK.DEQNA]ZGNA2.BLI;2

SEQ 0078

Page

(9)

fae
]

THIS CODE IS EXECUTED IMMEDIATELY AFTER THE INITIALIZE CODE IF
THE “ADR” FLAG WAS SET. THE UNIT UNDER TEST IS CHECKED TO
SEE IF IT WILL RESPOND. IF IT DOESN'T IT IS IMMEDIATELY

'
'
:

DROPPED FROM TESTING.

BGNAUTO;
RETURN;

ENDAUTO;

LAUTO:

1 word,

depth per

000310’

Routine Base:

invocation:

O words

.SBTTL

RTS

LAUTO AUTODROP SECTION

1734

AA$CODE$ + 0310

.SBTTL

LS$AUTO AUTODROP SECTION

TRAP
RTS

61
PC

L$AUTO: : JSR

4 words,
Routine Base:
AASCODES$
; Routine Size:
2 words
; Maximum stack depth per invocation:
1754
1755

VAX-11 Bliss-16 V4.0-579

#SBTTL ‘AUTODROP SECTION'

000207

000000
;:
;

5-Jul-1984 14:04:31

CZQGNACO DEGNA FUNCTIONAL TEST

PC,LAUTC

+ 0312

1751

87
CZGNACO DEQGNA FUNCTIONAL TEST
CLEANUP CODING SECTION

ZANA2

1756
1757
1758
1759

1760

1761
1762
1763

1764

1765

1766

1767
1768

1769

1770
1771
1772

1773

000000
;:

52 0D N N N 0 0 gt et ot et Bt ot put Pt Pt ot Pt

v01.0

004737

000004
000006

104412
000207

; Routine Size:

1774
1775

1
1

16
(10)

H
!

THE CLEANUP CODING SECTION CONTAINS THE CODING THAT IS PERFORMED
AFTER THE HARDWARE TESTS HAVE BEEN PERFORMED.

H
H
!
H

INSERT YOUR CLEANUP CODING. THIS CODING SHOWLD
RESTORE YOUR TEST-DEVICE TO A NEUTRAL STATE.
THIS CODE WILL BE EXECUTED AFTER EACH PASS AND AFTER THE
PROGRAM IS INTERRUPTED BY "tC~.

| I

BGNCLN;
RETURN;

ENDCLN;

.SBTTL
LCLEAN: RTS

1 word,

Routine Base:

invocation:

O words

JSR

TRAP
RTS

4 words,

Routine Base:

invocation:

2 words

LCLEAN CLEANUP CODING SECTION
PC

1753

1771

AASCODES + 0322

.SBTTL
LSCLEAN:
:

000322

;: Maximum stack depth per

:
s

Page

feo

; Maximum stack depth per

000000

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK .DEQGNA JZGNA2.BLI ;2

#SBTTL 'CLEANUP CODING SECTION'

000207

Routine Size:

S-Jul-1984 14:04:31
S5-Jul-1984 14:01:26

SEQ 0079

LS$CLEAN CLEANUP CODING SECTION

PC,.LCLEAN

12
PC

AASCODES + 0324

CZQGNACO DEONA FUNCTIONAL TEST
DROP UNIT SECTION

1786

1787
1788
1789

1790

1791
1792
1793

1794

000000

5-Jul-1984 14:04:31
5-Jul-1984 14:01:26

VAX-11 Bliss-16 v4.0-579

[MAZURCZ
YK .DEQGNA JZQNA2 .BLI ;2

SEQ 0080

Page

(11)

#SBTTL *‘DROP UNIT SECTION’

THE DROP-UNIT SECTION CONTAINS THE CODING THAT CAUSES A DEVICE

TO NO LONGER BE TESTED.

0 et e o o Pt et et P

1781
1782
1783
1784
1785

s P o Pt Pt

—

1776
1777
1778
1779
1780

P P I N N

S0 90

INSERT DROP CODE HERE.

THIS CODE WILL BE EXECUTED AFTER

A “DROP” COMMAND OR A “DODU” MACRO EXECUTION.

THE PURPOSE

OR THIS CODE IS TO DO ANY NECESSARY HOUSEKEEPING AFTER A
UNIT HAS BEEN DROPPED.

BGNDU;
RETURN;

ENDDU;

LDU:

000207

.SBTTL
RTS

LODU DROP UNIT SECTION
PC

1773

Routine Size:
1 word,
Routine Base:
AASCODES + 0334
O words
; Maximum stack depth per invocation:

000000
000004
000006

004737
104453
000207

Routine Size:

Maximum stack

1795
1796

1
1

000334°

4 words,

depth per

L$DU::

Routine Base:

invocation:

2 words

.SBTTL
JSR

TRAP
RTS

L$DU DROP UNIT SECTION
PC.LDV

S3
PC

AASCODES « 0336

1792

D7
CZQNACO DEGNA FUNCTIONAL TEST
ADD UNIT SECTION

1806
1807
1808
1809
1810
1811
1812
1813
1814
1815

000000

004737
104452
000207

Routine Size:

TO THE TEST CYCLE.

INSERT ADD CODE HERE.

AN "ADD” COMMAND.

1
1

THIS CODE WILL BE EXECUTED AFTER

THE PURPQOSE OF THIS CODE IS TO DO ANY

HOUSEKEEPING THAT MAY BE NECESSARY AFTER A UNIT HAS BEEN ADDED.

BGNAU;
RETURN;

ENDAU;

LAUY:
1 word,

Routine Base:

invocation:

000346"

4 words,

Maximum stack depth per

1816
1817

[MAZURCZYK
.DEQGNA ]ZGNA2 .BLI ;2

THE ADD-UNIT SECTION CONTAINS ANY CODE THE PROGRAMMER WISHES
TO BE EXECUTED IN CONJUNCTION WITH THE ADDING OF A UNIT BACK

: Maximum stack depth per

000000
000004
000006

VAX-11 Blise-16 v4.0-579

#SBTTL 'ADD UNIT SECTION'

000207

; Routine Size:

S5-Jul-1984 14:04:31
5-Jul-1984 14:01:26

1797
1798
1799
1800
1801
1802
1803
1804
1805

0 00 N N N 10 e 5t 1ot oo ot ot ot ot it Pt P Pt it

v01.0

ZANA2

0 words

L$AU::

Routine Base:

invocation:

2 words

.SBTTL

RTS

LAU ADD UNIT SECTION

1794

AASCODES + 0346

.SBTTL
JSR

TRAP
RTS

LS$AU ADD UNIT SECTION
PC.LAU
S2
PC

AASCODES + 0350

1813

E7
CZQNACO DEGNA FUNCTIONAL TEST

ZANA2

ADD UNIT SECTION

1824

1823
1826
1827
1828
1829
1830

1825

177777

000006

000002

012737

= 90'177777';

INTERRUPT FLG

.SBTTL

NXM.INT ADD UNIT SECTION

MOV

#-1,INTERRUPT
FLG

NXM_INT::

0000006

RTI

Routine Size:

4 words,

Maximum stack depth per

Routine Base:

invocation:

O words

1828
1819

AASCODES + 0360

END

ELUDOM

0TS external references
$SAVEA4
.GLOBL
PSECT SUMMARY

Psect Name

Words

$CODE $
AASCODE $

Attributes

S0
124

RO,
0,

I
I

,
,

LCL,
LG,

REL,
REL,

CON
CON

Library Statistics

File

(13)

THE INITIALIZATION SEQUENCE INTERRUPT OCCURED.

000000

Page

GLOBAL LOCATION “INTERRUPT FLG" IS SET TO TRUE WHICH INDICATES

ENDSRV;

1
1

[MAZURCZYK
.DEGNA JZGNA2.BLI ;2

SEQ 0082

1821
1822

5-Jul-1984 14:01:26

VAX-11 Bliss-16 v4,.0-579

BGNSRV (NXM_INT);
A

VLS LS T

1818
1819
1820

Lad VS VLV

v01.0

1831
1832
1833

5-Jul-1984 14:04:31

DISK$USER2:
[MAZURCZYK .DEGNA]JGNALIB.L16;2

e Symbols --------

Total

Loaded

Percent

223

Pages

Mapped

Processing
Time

00:00.1

F7
CZGNACO DEGNA FUNCTIONAL TEST
ADD UNIT SECTION

ZANA2
v01.0

S-Jul-1984 14:04:31
5-Jul-1984 14:01:26

COMMAND QUALIFIERS

BLISS/PDP11 ZGNA2.BLI/: IST=ZQGNA2.LIS/0BJECT=ZQGNA2.0B8J/SOURCE=PAGE:53
124 code + SO oata words
00:13.4
00:32.1
Elapsed Time:
8225
Lines/CPU Min:
Lexemes/CPU-Min: 56172
Size:

Run Time:

Memory Used:

175 pages

Compilation Complete

VAX-11 Bliss-16 v4,0-579

[MAZURCZYK.DEGNAJZGNA2.BLI;2

Pt pr pat et it OO OO0 O

CZQNACO DEGNA FUNCTIONAL TEST

5-Jul-1984
14:05:07
S5-Jul-1984 14:02:06

VAX-11
Bliss-16 v4.0-579
[MAZURCZYK.DEQGNA
JZGNA3 .BLI ;2

MODULE ZGNA3 (sTITLE CZWCO DEQGNA FUNCTIONAL TEST’
IDENT = 'V01.0

QDDRESSI'Gm( ABSOLUTE)

wSBTTL *‘DEQGNA TEST DEFINITION MODULE’
BEGIN

1<BLF/FORMAT>

LIBRARY ‘QGNALIB';

REQUIRE 'BLSMAC.REQ';

! GNALIB LIBRARY

! DIAGNOSTIC SUPERVISOR LIBRARY

SEGP.’

H7
CZQGNACO DEGNA FUNCTIONAL TEST
DEGNA TEST DEFINITION MODULE

5-Jul-1984 1::05 s 07

5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579

[MAZURCZYK.DEQNAJZQGNA3.BLI
;2

0t Dt P

b ot e e

ot e P

ot e

et e

e (i

ik e

e P

et et et

PSECT

CODE = AB$CODES$;

EXTERNAL DATA USED BY THIS MODULE

EXTERNAL ROUTINE

CHK_CSR_STATUS
CHK_RIXI_STATUS
CHK_RCV_STATUS
CHK_XMIT_STATUS
CLR_BUFFERS
CLR_DESCR
COMPARE _PACKETS
E1$REPORT
ERRORS$REPORT
FORM_HEX_ADR

:
:
:
:
:
:
:

NOVALUE,
NOVALUE,
NOVALUE,
NOVALUE,

NOVALUE,
NOVALUE,
NOVALUE,
: NOVALUE,
: NOVALUE,
: NOVALUE,

KBD _INT

: NOVALUE,

SEND_ELOOP_PACKET
SEND_TEST_PACKET
SET_XDESCR_LIST
SET_RDESCR_LIST

:
:
:
:

NXM_INT
PREP_FOR_SETUP
PWR_INT
RESET_DEGNA

TURN_OFF _LED

VER_DESCR_STATUS
WAIT_FOR_TIMEOUT
WALKING_BIT
WRT_STATION_ADR

XMIT_AND_RCV_PACKET

XMIT_ILOOP_PACKET
XMIT_SETUP_PACKET

:
:
:
:

L$ISR NOVALUE,
NOVALUE,
NOVALUE,
NOVALUE,

NOVALUE,
NOVALUE,
NOVALUE,
NOVALUE,

: NOVALUE,

:
:
:
:

NOVALUE,
NOVALUE,
NOVALUE,
NOVALUE,

: NOVALUE,

: NOVALUE,
: NOVALUE;

! PRINT EXTENDED ERROR MESSAGE
! PRINT EXTENDED ERROR MESSAGE
! NXM INTERRUPT SERVICE ROUTINE

SEQ 0085

(2)

17
CZGNACO DEGNA FUNCTIONAL TEST
DEGNA TEST DEFINITION MODULE

ZQGNA3

COMMUNICATION AREA DECLARATIONS

e o

i ot

EXTERNAL

BLOCK
BLOCK
BLOCK
VECTOR

RCV_D_LIST
XMIT _D_LIST

DESCR_LIST

RCV_BUFFER
XMIT_BUFFER

DATA _R'FFER

TARCET_ADR
PHYS_ADR

b o

IOP_TABLE
RD13

TD13
T016

b P

B8D_PROM_DESCR
STATION_ADR

[
[
[
[
[
[
[
[
[
[
[

D_SIZE, WORD ) FIELD ( DL_FIELDS ),
D_SIZE, WORD ) FIELD ( DL_FIELDS ),
DESCR_SIZE, WORD) FIELD ( DL_FIELDS ),
B_SIZE, BYTE ],
B_SIZE, BYTE ],
BUF _SIZE, BYTE ),
T_SIZE, BYTE ),
22, BYTE ),
8,
D ],
64, WORD ),
28, WORD ],
44, WORD ],
BD_D_SIZE, WORD ],
4, WORD ),
8, BYTE ],

@ o om

s o

PTRN_TABLE

VECTOR
VECTOR
VECTOR
VECTOR
VECTOR
VECTOR
VECTOR
VECTOR
VECTOR
VECTOR
VECTOR

[
[
[
[

HARDWARE AND SOF TWARE P-TABLE STORAGE DECLARATIONS

o
o
et ot Pt e
Pt Pd

1539

v01.0

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

HWP_TABLE
SWP_TABLE
REG_ADR

GET_ADR
I0P_DATA

: REF BLOCK [ HWP_SIZE, WORD ] FIELD ( HWP_FIELDS
: REF BLOCK [ SWP_SIZE, WORD ] FIELD ( SWP_FIELDS

: REF REG_STR FIELD ( IOP_FIELDS ),
: REF ADR_STR FIELD ( IOP_FIELDS ),
: REF REG_STR FIELD ( IOP_FIELDS ),

),
),

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK.DEQGNAJZGNA3.BLI;2

SEQ 0086

(3)

J7
CZQNACO DEGNA FUNCTIONAL TEST
DEGNA TEST DEFINITION MODULE

1578

1579

1580
1581
1582
1583
1584
1585

1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK.DEQNA]JZGNA3.BLI;2

! (O=NONE, -1=L-CLOCK,1=P_CLOCK)
L

L R
R SR ey

W
0
80
8
80
90
B0
S0
B0
B0
B0
90
S0
90
B0
B0
B0
B0
00
B0
S0
S0
G0
W

1574
1575
1576
1577

- e e

ZQANA3

v01.0

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

MISCELLANEOUS DATA DECLARATIONS
XBUF _LENGTH,
SWP_BLOCK_MEM,
UP_COUNTER,
XC_FLAG,

ERR_COUNT,

PRIO1,
PRIOS,

RBUF _LENGTH,
SWP_TOUT VAL,
DOWN_COUNTER,
SWP_LBC,
ERR_FLAG,

PRIO2,
PRIO6,

INTERRUPT_FLG,
SWP_ILOOP,
CHECKSUM,
CSP_WORD,

PRIO3,
PRIO7,

COUNTER,
SWP_TIMER,
ERR_NUMBER,
PRIOO,

PRIO4,
DEGNA_NO

: WORD,

TEMPORARY STORAGE NATA DECLARATIONS

TMP_IOP_ADR,
TEMP3,
TEMP7,

P2,
TMP_REG_DATA,
TEMP4,
TEMPS,

P3,

Pa,

TBYTEL,

TBYTE2,

TBYTES,

TBYTE4A

TEMPL,
TEMPS,
TEMPY,

TEMP2,
TEMPG,
TADR1,

: WORD,
:

BYTE,

SEQ 0087

(4)

IK7
CZQNACO DEGNA FUNCTIONAL TEST
DEGNA TEST DEFINITION MODULE

ZQANA3

o
S
S

1601
1602
1603
1604
1605
1606
1607
1608
1609
1610
1611
1612
1613

1598
1599

Sy ey

v01.0

S5-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

“ERRM MESSAGES DEFINED EXTERNALLY
MSGOO,

MSGO1,
MSG11,
MSG21,
MSG31,
MSGA1,
MSG51,

MSGé1,

MSGO7, MSGO8,

MSG17, MSG18,

MSG27, MSG28,

MSG37, MSG38,
MSGA7, MSGAS,
MSGS57, MSGSS8,

MSG67, MSG68,

VAX-11 Bliss-16 v4.0-579
[MAZURCZYK.DEGNA]ZQNA3.BLI;2

SEQ 0088

L7
CZGNACO DEGNA FUNCTIONAL TEST
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST

ZQANA3

1644
1645
1646

1647

i e
e o
e o
o
o
o
i o

DESCRIPTION:

This test verifies that all the device registers residing in the

170 Page can be accessed without forcing a non-existant memory (NXM)

interrupt. If the operator specifies loop on error, the program
re-executes the code that detected the error until tC is entered.

Hardware tested:

Q-Bus to DEGNA Sleve Registers Interface

Processing:

BEGIN
get ready for NXM interrupt

EPEAT for every 1/0 page register

read 1/0 page register

et o

NON-EXISTANT I/0 PAGE REGISTER TEST

TEST 1:

THEN

IF NXM occured

if not

inhibited

ot o

print error message
ENDIF
ENDREPEAT

write any data pattern

ot o

1620
1621
1622
1623
1624
1625
1626
1627
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642
1643

(MAZURCZYK.DEQGNA JZGNA3.BLI ;2

fe0

registers

into the first 2 1/0 page

IF NXM occured

1617
1618
1619

5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579

#SBTTL ‘TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST’

e ot o

1614
1615
1616

v01.0

5-Jul-1984 14:05:07

END

THEN
print error message
ENDIF

if not

inhibited

SEQ 0089

(6)

M7
CZQNACO DEGNA FUNCTIONAL TEST
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST

ZQGNA3
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663

1665
1666

1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680

1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692

1693
1694
1695
1696

HFWHWWEWNBSDBONNNNNNANOOOORNDPDUWWUWWAEDLONNNNNNNOOOOODWWWHWWWKWW

v01.0

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

VAX-11 Bliss-16 V4.0-579

[MAZURCZYK.DEGNA]JZGNA3.BLI;2

BGNTST;

SETVEC (4, NXM_INT, PRIO7);
DELAY (MS_DELAY);
INTERRUPT_FLG = CLEAR_FLG;

SET UP FOR AN NXM INTERRUPT
DELAY SO x 100 us = S ms
CLEAR OUT NEX FLAG

TMP_IOP_ADR = .HWP_TABLE [ ADDR ];
INCR INDEX FROM O TO 7 DO
BEGIN
BGNSUB;

TEMP1 = ., . TMP_IOP_ADR;
DELAY(7);

IF .INTERRUPT_FLG EQLU WORD_LIMIT

SEE IF WE GOT A NXM INTRT

THEN

ADDRESS NOT THERE

BEGIN
INTERRUPT_FLG = CLEAR_FLG;

PRINTB ( MSGS9 );
PRINTB ( MSG70, .TMP_IOP_ADR

CLEAR TRAP FLAG
);

ERRDF (0101, MSGOO, E1$REPORT);
DODU ( DEGNA_NO );
DOCLN;

*I/0 PAGE REG. NOT PRESENT’

END;

ENDSUB;
EM;FP_IOP_ADR =

_,TMP_IOP_ADR + 2;

TMP_IOP_ADR = .HWP_TABLE [ ADDR );
INCR INDEX FROM O TO 1 DO
BEGIN
BGNSUB;

.TMP_IOP_ADR = #X'7F';
DELAY(7);
IF .INTERRUPT_FLG EQLU WORD_LIMIT

WRITE FIRST 2 LOCATIONS

SEE IF WE GOT A NXM INTRT

THEN

BEGIN
INTERRUPT_FLG = CLEAR_FLG;
PRINTB ( MSGS9 );
PRINTB ( MSG70, .TMP_IOP_ADR );

ERRDF (0102, MSLOO, E1$REPORT);
DODU ( DEGNA_NO );

ADDRESS NOT THERE

CLEAR TRAP FLAG

*I7/0 PAGE REG. NOT PRESENT'

DOCLN;
END;
ENDSUB
;
TMP_IOP_ADR = ,TMP_IOP_ADR + 2;
END;

CLEAR INTERRUPT VECTOR

CLRVEC (4);
ENDTST;

.TITLE

.IDENT

ZQGNA3 CZQNACO DEQGNA FUNCTIONAL TEST
/V01.0/

SEQ 0090

N7
CZGNACO DEGNA FUNCTIONAL TEST
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST

ZQGNA3

v01.0

.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL

CHK.CSR.STATUS, CHK.RIXI.STATUS
CHK.RCV.STATUS, CHK.XMIT.STATUS
CLR.BUFFERS, CLR.DESCR, COMPARE.PACKETS
E1$REPORT, ERRORS$REPORT, FORM.HEX.ADR

.GLOBL
.GLOBL

000000G
000000G

$T1:

KBD.INT,
PWR.INT,

SEQ 0091

NXM.INT, PREP.FOR.SETUP
RESET.DEGNA, SEND.ELOOP.PACKET

SEND.TEST.PACKET, SET.XDESCR.LIST
SET.RDESCR.LIST, TURN.OFF.LED
VER.DESCR.STATUS, WAIT.FOR.TIMEOUT

WALKING.BIT, WRT,.STATION.ADR, XMIT.AND.RCV.PACKET
XMIT.ILOOP.PACKET, XMIT.SETUP.PACKET
RCV.D.LIST, <MIT.D.LIST, DESCR.LIST
RCV.CUFFER, XMIT.BUFFER, DATA.BUFFER
TARGET.ADR, PHYS.ADR, IOP.TABLE
RD13, TD13, TD16, BD.PROM.DESCR

STATION.ADR, PTRN.TABLE, HWP.TABLE
SWP.TABLE, REG.ADR, GET.ADR, IOP.DATA
XBUF .LENGTH,

RBUF .LENGTH,

INTERRUPT.FLG

.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL

COUNTER, SWP.BLOCK.MEM, SWP.TOUT.VAL

.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL
.GLOBL

TMP.REG.DATA, TEMP1, TEMP2, TEMP3
TEMP4, TEMPS, TEMP6, TEMP7, TEMP8
TEMP9, TADR1, TADR2, TBYTE1l, TBYTE2
TBYTE3, TBYTE4, MSGOO, MSG71, MSGO1

.SBTTL

004137
005746
012746

(MAZURCZYK.DEQNA]ZQGNA3.BLI;2

AMA

.GLOBL
.GLOBL
.GLOBL

000000
000004
000006

VAX-11 Bliss-16 V4.0-579

.ENABL

.GLOBL
.GLOBL

000000

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

SWP.ILOOP, SWP,TIMER, UP.COUNTER
DOWN.COUNTER, CHECKSUM, ERR.NUMBER
XC.FLAG,

SWP.LBC, ERR.COUNT, ERR.FLAG

CSR.WORD, PRIOO, PRIO1, PRIOZ2
PRIO3,

PRIO4, PRIOS, PRIO6,

DEGNA.NO, P1, P2, P3, P4,

MSGO2,
MSGO7,
MSG12,
MSG17,
MSG22,
MSG27,
MSG32,
MSG37,
MSG42,
MSG47,
MSG52,
MSG57,
MSG62,
MSG67,

MSGO3,
MSGO8,
MSG13,
MSG18,
MSG23,
MSG28,
MSG33,
MSG38,
MSG43,
MSG48,
MSG53,
MSG58,
MSG63,
MSG68,

MSGO4,
MSGO9,
MSG14,
MSG19,
MSG24,
MSG29,
MSG34,
MSG39,
MSGA4,
MSGA9,
MSG54,
MSG59,
MSG64,
MSG6E9,

PRIO7

TMP.IOP.ADR

MSGOS, MSGO6
MSG10, MSG11
MSG15, MSG16
MSG20, MSG21
MSG2S, MSG26
MSG30, MSG31
MSG35, MSG36
MSG40, MSG41
MSGAS, MSG46
MSG50, MSGS51
MSGS5, MSG56
MSG60, MSG61
MSG6S, MSG66

MSG70, L$OLY

$T1 TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST

.PSECT

AB$CODES$,

JSR
TST

R1, $SAVE2

1611

#PRIO7,-(SP)

;

1650

MOV

-(SP)

B8
ZQNACO DEGNA FUNCTIONAL TEST

$ESV 1 - NON-EXISTANT I/0 PAGE REGISTER TEST
012746
012746
012746

000000G
000004
000003

012701
001410
013700

000062

005066
077003
005301
000767

000010

104437

001403

37
062.R1

LSOLY,.RO
3
10(SP)
RO,2%

0000006

INTERRUPT
. FLG
SHWP
, TABLE, TMP, I0P
. ADR
glO.R?

005037
017737

000110
000112
000116
000120
000124

000126
000130
000132
000140
000142
000146
000152
000156
000160
000162
000166
000172
000176
000200
000202

000206
000210
000212
000216
000220
000222
000226
000230
000232
000234
000242
000244
000252
000256

000010

012702
104402
017737
012701
001410
013700
001403

000007

077003
005301
000767
023727
001032
005037
012716

0000006 177777

8TMP. IOP.ADR,TEMP1
07,R1

000010
$

;

o, 88TMP2

(7)

1651

;3 ¢,88TMPL

: $8TMP

;3
:

SSTMPL,»
$STMP2

s
H

1652
1654

H
H

1656
1658

: ¢,INDEX
:

o,88TMP2

;

¢,88TMP]

;3
:
:

SSTMP
$STMPL,»
$sTMP2

1655

1659

1660

INTERRUPT .FLG

:
:

1663
1664

SP,»

TMP_,IOP.ADR,(SP)
oMSG70, -(SP)

SP,RO
14
S5
145

; SP,s

1665

1666

1667

H
H

1662
1669

62,TMP_IOP
. ADR
R2,5%

H
s INDEX,+

1671
1655

: *,INDEX
H

1675
1676

MSGOO

E1$REPORT

ODEQGNA .NO,RO
S1

104451
104444

062706

104467

012702
104402

[(MAZURCZYK .DEQGNA JZGNAS .BLI ;2

SEQ 0092
Page

012700

077264
017737

VAX-11 Bliss-16 v4,0-579

{SIEWT.FLG.O-I
oMSGS9,(SP)

012746
010600
104414
013716
012746
012746
010600
104414
104455
000145

103720
062737

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

06,5P
67

10¢:
000002

000000G

000000G 020000G
000002

MOV

11%:

TRAP

WRéYABLE.TPP.IOP.ADR

1674

C8
CZQNACO DEGNA FUNCTIONAL TEST
TEST 1 - NON-EXISTANT I/0 PAGE REGISTER TEST
012777

012701
001410
013700
001403
005066
077003
005301
000767
023727
001032
005037
012716
012746
010600
104414
013716

012746
012746
010600
104414

000177
000007

€177,8TMP_1I0P,ADR
07,.R1

0000006

0000006
000010

154
L$DOLY,RO

12%:

144

124
INTERRUPT .FLG,0-1
16%
INTERRUPT
. FLG

000001

s, 88TMP2

¢,88TMP]

000002

104451

104444
062706
104467

16%:

006000

000002

012700

000004

062706
000207

000012

Pege

1678
1679

e
$8TMPL

1680

1683

1634

TMP_I0P.ADR,(SP)

1685

SP.RC
14
55

1686

146
MSGOO

MOV

SEQ 0093

: $8TMP2

SP,.RO
14

104455

104436

oMSG59,(SP)

000146
0090006
000000G
012700

103720
062737
077264

(MAZURCZ
YK .DEQNA JZONAS .BLI ;2

;

15¢:

VAX-11 Bliss-16 v4.0-579

; $sTMP

10(SP)
RO,13$

13%:
14%;

000000G 177777

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

E1$REPORT

1687

TRAP
TRAP
ADD
TRAP
ROR

1682
1689

BLO
ADD
S08

MOV
TRAP

INDEX,»

1691
1675
1694
1611

ADD

RTS

ABS$CODE
$
; Routine Size:
145 words,
Rout ine Base:
13 words
; Maximum steck depth per invocetion:

004737
104466
000012

103773
000207

JSR

TRAP
ROR

BLO

RTS

TEST

PC,s$T1
66
RO
18
PC

- NON-EXISTANT

I/0 PAGE REGISTER TEST

1694

ZONA3
v01.0

CZGNACO DEGNA FUNCTIONAL TEST
TEST 2 - CSR STATIC BIT TEST

1699

#SBTTL *TEST 2 - CSR STATIC BIT TEST'

1702

TEST 2:

1704

DESCRIPTION:

1707

:
:

1700
1701
1703

1705
1706

1708

1
1

B
:
:
H
:

1709
1710
1;15
1712
1;13

:
:
3
:
3
3
H
s
3
3

1715
1716
1717
1718
1719
1720
1721
1722
1723
1724

1
1
1
1
1
1
1
1
1
1

1726
1727
1728
1729

1
1
1
1

1714

1725

H
H

173¢
1731

H
H
H
:
H
:

1732

1733

1
1
1
1
1

:
s

3
H
H

1738

1739

Processing:

!
:
:
!
!
!
:
:
:

:
:
:
:

and 1
IF error
THEN
print error message if not inhibited
ENDIF

set static bits ( 0,3,8,9 ) and check for expected CSR status
IF error

THEN
print error message if not inhibited
ENDIF
clear static bits and check for expected CSR status
IF error
THEN

IF error

set static bits ( 0,3,8,9 ) and check for expected CSR status

THEN

print error message if not inhibited

ENDIF

IF error
THEN

!
:

1743
1744
1745

1
)
1

:
:
$--

print error message if not inhibited

1
1

Q-Bus to DEGNA Slave Regs. Interface

BEGIN
check Software Reset ( SR ) bit in the CSR for stuck at O

1740
1741

1742

Hardware tested:

no static

(stuck at 1 /7 stuck at 0) faults occur. If the operator specifies
loop on error, the program re-executes the code that detected the
error until ?C is entered.

ENDIF

1736

!
H
:
!
:

1737

.
.
x
.
This test verifies that the CSR register static bits can be set
and cleoared os specified.
The host writes data patterns to this

!
!

4
:

1734

1785

VAX-11 Bliss-16 v4.0-579
[MAZURCZ YK .DEGNA JZGNA3 . BLI ;2

CSR STATIC BIT TEST

1
1

:
H

fee
H

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

reset DEGNA and check for expected CSR status

print error messade if not inhibited

END

ENDIF

SEQ 0094

Page

12
(8)

TEST 2 - CSR STATIC BIT TEST

1749
1750

1751
1752
1753
1754

1755
1756

TTNT VYT TV VN e

v01.0

1746
1747
1748

BGNSUB;
fee

1769
1770
1771
1772
1773
1774
1775
1776
1777
1778
1779
1780
1781
1782
1783

1784
1785
1786
1787
1788
1789
1790
1791

TVTVTVIVTVNTW BN W BN

1768

1797
1798

WUV

1792
1793

1794
1795
1796

);

PUT_BIT ( CSR, ALL_BITS, PATRN1 );
DELAY ( TIME6_LIMIT );
TEMPL = GET_BIT [ CSR_ALL ) AND PATRN1;
IF .TEMP1 NEQU PATRN1
THEN

UVIVIVIVIVINIWWVNO OO

1767

CHECK IF CSR STATIC BITS (BIT 0,3,8 AND 9) ARE NOT STUCK AT O

RESET_DEGNA (

1758

1764
1765
1766

S-Jul-1984 14:02:06

BGNTST;

1757

1759
1760
1761
1762
1763

S-Jul-1984 14:05:07

CZQGNACO DEQGNA FUNCTIONAL TEST

ZQGNA3

BEGIN
PRINTB ( MSGS9 );
PRINTB ( MSG6O );
PRINTB ( MSG30, .GET_ADR [ CSR_ALL
ENSRRDF ( 0201, MSGOO, E1SREPORT );

.TEMP1, PATRN1

);

ENDSUB;
Ter

CHECK IF CSR STATIC BITS (BIT 0,3.8 AND 9) ARE WOT STUCK AT 1

BGNSUB;
PUT_BIT ( CSR, ALL_BITS, ZERO );

DELAY ( TIME6_LIMIT );
TEMP2 = GET_BIT [ CSR_ALL ] AND PATRN1;
IF .TEMP2 NEQU ZERO
THEN

BEGIN

PRINTB ( MSGS9 );
PRINTB ( MSG61 );

PRINTB ( MSG30,

.GET_ADR [ CSR_ALL ],

ERRDF ( 0202, MSGOO, E1$REPORT

END;
ENDSUB
;

BGNSUB;

PUT_BIT ( CSR, ALL_BITS, PATRN1
RESET_DEGNA ( );

TEMP3 = GET_BIT [ CSR_ALL
IF _TEMP3 NEQU ZERO
THEN
BEGIN
PRINTB ( MSGS9 );
PRINTB ( MSG62 );

);

.TEMP2, ZERO );

);

] AND PATRN

PRINTB ( MSG30, .GET_ADR [ CSR_ALL
ERRDF ( 0203, MSGOO, E1$REPORT );
END;
ENDSUB;

.TEMP4,

ZERO );

VAX-11 Bliss-16 v4.0-579
[(MAZURCZYK.DEQNA]ZGNAS
.BLI ;2

F8
CZQGNACO DEGNA FUNCTIONAL TEST

ZGNA3S

v01.0

:
:

1799
1800

3
1

004137
162706
104402
004737
013701
012761
012702

000110
000114
000116
000120
000124
000130
000132
000134
000140
000144
000152
000160
000164
000170
000174
00C176
000200
000202
000204
000206
000210
000214
000216
000220
000222
000224
000230
000234

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

TEST 2 - CSR STATIC BIT TEST

001410
013700
001403
005066
077003
005302
000767
016116
011637
042737
023727
001444
012746
012746
010600
104414
012716
012746
010600
104414
012716
013746
013766
062766
016646
012746
012746
010600
104414
104455
000311
000000G
000000G
062706
104467
006000
103673
104402
013701
005061
012702

VAX-11 Bliss-16 v4.0-579

[(MAZURCZYK
.DEQGNA JZGNA3 .BLI ;2

ENDTST;

$T2:

000000G
000016

000000G
000000G
001411
000016
000001

24%:

0000006

000014

3s:

000016

S$:

000000G

176366

000000G

000000G 001411
000000G
000001

.SBTTL
JSR
SuB
TRAP

JSR
MOV
MOV
MOV
BEQ
MOV
BEQ
CLR
S08
DEC
BR
MOV
MOV
8IC
CcHP
BEQ
MOV
MOV
MOV

TRAP

MOV
MOV
MOV

000000G
000001

TRAP

MOV
MOV
MOV

001411
000000G
000000G 000012
000016
000012
000012

ADD

MOV
MOV
MOV
MOV

$72 TEST 2 - CSR STATIC BIT TEST

R1, $SAVE2

1696

016,5P

1746
1754

REG.ADR,R1

01411,16(R1)

&1,R2

1
L$DLY,RO

1755

s, $8TMP2

+,88TMP]

RO,3$
R2

$STMP
.«
$STMP]
$$TMP2

16(R1),(SP)
(SP),TEMP1

TMP.LOCATION,
+

14(SP)

0176366, TEMP1

s, TMP_LOCATION

1761

SP.RO
14
oMSG60, (SP)

SP,s

SP,RO
14
©1411,(SP)
TEMP1, -(SP)

SP,s

GET.ADR,12(SP)
0216,12(SP)

1757
1758

TEMP],01411
64
oMSGS9, -(SP)

01,-(SP)

1756

1762

1763
¢« ,TMP _LOCATION
+«,TMP _LOCATION

12(SP),-(SP)

TMP .LOCATION,
»

04,-(SP)
SP,.RO

SP,»

14
55
311

1764

MSGOO

000016

E1$REPORT

6%:

7¢:

000016
000001

1760
1765

1766

RO
13

1773

REG.ADR,R1

16(R1)
e1,R2

s, $8TMP2

1774

CZGNACO DEGNA FUNCTIONAL TEST

VAX-11 Bliss-16 v4.0-579

TEST 2 - CSR STATIC BIT TEST

001410
013700

001403

077003
005302
000767
016166
016637
042737
001443

012746
012746
010600
104414
012716
012746
010600
104414
005016
013746
013766
062766
016646
012746
012746
010600
104414
104455
000312
062706

104467

8s:

000014

016637
042737
001443

012746
012746
010600
104414
012716
012746
010600
104414

(9)

; $sTMP

9s:

;

10%:

000016

Page

«, $8TMPL

000000G

16(R1),4(SP)

11%:

4(SP),TEMP2
0176366, TEMP2
12%

176366

$STMPL,»

$8TMP2

;: ¢, TMP LOCATION
s TMP_LOCATION,*

000001

SP,RO
14
oMsSG61,(SP)

;: SP,»

SP,RO
14
(SP)

;: SP,s

GET.ADR,16(SP)

; ¢, TMP _LOCATION
: ¢, TMP LOCATION
s TMP_LOCATION,#

TEMP2, -(SP)

000000G 000016
000016
000016

016,16(SP)

16(SP), -(SP)

000016

04,-(SP)

SP,.RO

14
S5
312

1775

1776
1779

oMSGS9, -(SP)

000001

1780

1781

: SP,»
1782

MSGOO

000016

103700

104402
013700
012760
004737
013700
016066

(MAZURCZYK.DEQNA
JZGNA3 .BLI ;2

SEQ 0097

000000G
00141!
000016
0000006

E1$REPORT

1778
1783

2
REG.ADR,RO

1784
1787

016,SP

12%:
13s:

TRAP

RO
74

01411,16(R0O)
PC,RESET.DEGNA
REG.ADR,RO

16(R0),10(SP)
10(SP),TEMP3

BEQ

TRAP
MOV

MOV
MOV

TRAP

0176366, TEMP3
14¢$
OMSGS9, -(SP)
01,-(SP)
SP,RO
14
oMSG62,(SP)

SP,RO
14

:
:

: *,TMP_LOCATION

1788
1789

TMP_LOCATION,*

1790

1793

: SP,»
1794

5 SP.‘

CZQGNACO DEGNA FUNCTIONAL TEST

VAX-11 Bliss-16 v4.0-579

TEST 2 - CSR STATIC BIT TEST

005016
013746
013766
062766

016646

012746
012746
010600
104414

CLR

000022
0000006
000004

Routine Size:

198 words,

14%:;

000000
000000
000004
000006
000010
000012

004737
104466
006000

103773
000207

000456°

1801

1802

1
1

1796

1792
1797

TRAP
ROR

1696

RTS

Routine Base:

19 words

T2::
18:

TMP.LOCATION,+

;: SP,s

.WORD
.WORD
.WORD
ADD

ABSCODES

.SBTTL

T2 TEST 2

JSR

PC,$T2

TRAP
ROR

BLO
RTS

ABSCODES
6 words,
Rout ine Base:
; Routine Size:
2 words
; Maximum stack depth per invocation:

BLO
ADD

; Maximum stack depth per invocation:

(9)

: ¢, TMP_LOCATION
s ¢, TMP LOCATION

TRAP

000000G
000000G
000016
062706
104467
006000
103706
000016
062706
000207

Page

1795

MOV
MOV
ADD
MOV
MOV
MOV
MOV
TRAP

000000G
000000G 000022
000016 000022

104455
000313

000612

(MAZURCZYK .DEQNA ]ZGNA3
P T ;2

SEQ 0098

66
RO
1%
PC
«

1272

- CSR STATIC BIT TEST

1798

18
S5-Jul-1984 14:05:07

5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.,0-579

(MAZURCZYK
.DEQNA ]ZGNA3 .BLI ;2

#SBTTL *TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST’
feo

ETHERNET STATION ADDRESS VERIFY TEST

TEST 3:
DESCRIPTION:

This test verifies that the Ethernet Station Address PROM can be
read and loaded to host memory corrcctlzé Ethernet Station Address is
verified and checksum is computed from
PROM data read and this checksum
is compared to the checksum stored in the Ethernet Station Address
PROM. Ethernet Station Address is always printed out on the console in
the Ethernet standard format. If the address is not proper, the error
is recorded and an appropriate error message is printed out on the

Hardware tested:
Processing:

Station Address PROM
@-Bus DMA Interface

BEGIN
read DEGNA Station Address PROM and checksum

save copy of Station Address PROM in host memory

print Station Address on the console in stendard format
compute Station Address ROM checksum
%:E§hccksun read not equal checksum computed
print error message
ENDIF
IF Station Address

ot e e

ot e P

console. If the operator specifies loop on error, the program
re-executes the code that detected the error until tC is entered.

e e o

e e e

e P

ot e e

e et et et

CZQGNACO DEGNA FUNCTIONAL TEST
TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST

inhibited

et et o

[all O's)

OR [all 1's]):
OR [multicast bit set]:

THEN
print error message
ENDIF

e
0 et et et P

if not

END

if not

inhibited

SEQ 0099

Page

17
(10)

J8
ZQGNA3

CZQGNACO DEGNA FUNCTIONAL TEST

1844

1845

1846
1847

TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST

BGNTST;

N LA

v01.0

BGNSUB;
RESET_DEGNA (

1853
1854
1855

1856
1857

1858

1859
1860

1861
1862
1863
1864
igz

;

1867

VIVMOIVVVVVVNO OO

1873

1874

COMPUTE EXPECTED CHECKSULM

INCR INDEX FROM O TO S BY 2 DO
BEGIN

IF ( .CHECKSUM AND #0’'100000‘
THEN
BEGIN

) NEQU ZERO

CHECKSUM = _CHECKSUM t 1;
CHECKSUM = _CHECKSUM + 1;

END
ELSE
CHECKSUM =

_CHECKSUM t 1;

CHECKSUM = _CHECKSUM « _STATION_ADR [

.COUNTER ];

IF"é:‘ECKSU‘l GTRU WORD_LIMIT
CHECKSUM =
COUNTER =

END;
foo

_CHECKSUM + 1;

_COUNTER « 1;

PRINT PHYSICAL STATION ADDRESS

PRINTB ( MSGO1,

PRINTB (

.HWP_TABLE [ ADDR

PHYS_ADR

]

);

foo

VUV

i:;g

Page

[MAZURCZYK .DEQNA JZGNA3.BLI;2

CHECKSUM = 0;

[+ ]

[

1--

1869

NN~NNOOOT VIV

1852

fae

1851

S5-Jul-1984 14:02:06

SEQ 0100

VAX-11 Bliss-16 v4.0-579

FORM_HEX_ADR ( PHA_INDEX );

1848

1849
1850

S-Jul-1984 14:05:07

READ ACTUAL CHECKSUM FROM DEGNA STATION ADDRESS PROM AND COMPARE IT TO
THE EXPECTED CHECKSUM COMPUTED ABOVE.

PUT_BIT ( CSR,

LB, EXT_LOOPBACK

DELAY ( S );
TEMP1
=+ .REG_ADR ([
TEMP1

TEMP2 =

_TEMP1

t 8;

1, ALL_BITS );

_REG_ADR [ O,

STATION_PDR [ CHSUM ] =

PUT_BIT (

CSR,

LB,

);

ZERO

ALL_BITS

);

_TEMP1 OR (

);

.TEMP2 AND #0'000377'

IF".fc;‘fCKSW NEQU .STATION_ADR [ CHSUM )

);

(11)

K8
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 3 - ETHERNET STATION ADCRESS VERIFY TEST

1907
1908
1909
1910
1911
1912
1913
1914
1915
1916
1917
1918
1919
1920
1921
1922
1923
1924
1925

004137
162706
104402
004737
012746
004737
005037
005001
013700
006300
032737
001405
010037
005237
000402
010037
013700
006300
066037
005237
062701

Page

(11)

END
ENDSUB;

TEMP3 = ZERO;
TEMP4 = ZERO;

IMCk INDEX FROM O TO 2 DO
BEGIN
TEMP3 =

_TEMPS3 .

.STATION_ADR [

.INDEX 1;

IF .STATION_ADR [ .INDEX ] EQLU ®X'FFFF’
THEN

TEMP4 =

END;

_TEMPY +

(
OR (

.TEMP3 EQLV ZERO )
.TEMP4 GTRU ZERO )
OR (C .STATION_ADR [ ZERO ] AND sXx'0100’
THEN

) EQLU #X'0100'

)

BEGIN

PRINTB ( MSGS9 );
PRINTB ( MSG64 );
PRINTB ( PHYS_ADR

END;

ERRDF

);

( 0302, MSGOO, E1$REPORT);

ENDTST;

0000006

$73:

000006

1%:

000000G
000023
000000G
000000G

000000G
100000

2$:

000000G 000000G
000000G
000002

JSR
MOV
JSR
CLR
CLR
MOV
ASL

MOV

000000G
000000G
000000G

TRAP

BIT
BEQ

000000G

.SBTTL
JSR
Sus

3s:

44:

INC
BR
MOV

MOV
ASL
ADD

INC
ADD

$T3 TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST

R1,$SAVEZ2

CHECKSUM

SHECKSU".RO

1800

1844
1847
1848

PC,RESET.DEQGNA
023, -(SP)
PC,.FORM.HEX.ADR
:

:+ INDEX

1854
1856
1861

;;IOOOOO.CHECKSUH

1858

RO, CHECKSUM

1861
1862
1858
1865
1867

E?ECKSUH

1905

SEQ 0101

.CHECKSUM );

1904

[MAZURCZYK .DEQGNA)JZGNA3.BLI ;2

®e

1903

PRINTB ( MSG63, .STATION_ADR [ CHSUM ],
ERRDF (0301, MSGOO, E1$REPORT);

VAX-11 Bliss-16 v4,0-579

RO, CHECKSUM
gguNTER.RO

STATION.ADR(RO),CHECKSUM
COUNTER
¢2,R1

1901
1902

BEGIN
PRINTB ( MSG59 ):

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

1897
1898
1899
1900

HWWDDLLLDLDWLDLLUWWLLLLBDULUKWKWUWUNONOOO

®6

ZINA3
v01.0

;

+,INDEX

1873
1856

L8
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST

ZQGNA3
vo1.C

000114
00012C
000122
000126
000132
000136
000140
000142
000146
000152
000154
000156
000162
000170
000174
000176
000202
000204
000210
000212
000214
000216
000224
000230
000234
00240
000244

020127
003745
017716
012746
012746
010600
104414
012716
012746
010600
104414
013701
052761

012702
001410
013700

001403
005066
077003
005302
000767
016166

000000G
0000006
000002

000000G
001400
000016
000005

000000G

000014

S$:

6$:
7%:

000010

010037
011166
011137
005037
111137
050037

023737
001426
012716
012746
010600
104414
013716
013746
012746
012746
010600
104414
104455
000455
000000G
000000G
062706
062706
104467
006000
103610
005037

TRAP
MOV
MOV
MOV
TRAP
MOV

0000006
000001

016600
072027

042761

CMP
BLE
MOV
MOV
MOV
MOV

000005

8%:

BIS
MOV
BEQ
MOV
BEQ
CLR
S08
DEC
BR
MOV
MOV

MOV

.WORD

000010
000010

000000G

9¢:

02,-(SP)

SP,RO

14
OPHYS.ADR, (SP)

SP,RO
14

.WORD
ADD

ADD
TRAP
ROR

BLO
CLR

SEQ 0102

Page

20
(11)

INDEX,»
1880

3 SP.‘
1881

5 SP..
1888

*,88TMP2

1889

; *,'8TMP]

; $STMP

$STMP1,»

$STMP2

S$
2(R1),10(SP)
10(SP),RO

MP
. LOCATION
; «,T

18%0
1891

(R1),12(SP)
(R1),TEMP2

; *,TMP_LOCATION
: TMP.LOCATION,#*

1892

STATION.ADR+6
(R1),STATION.ADR+6

MOV
MOV
MOV
MOV
TRAP
TRAP

;

#MSGO1, -(SP)

MOvBe

MOV
TRAP

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK.DEGNA)ZGNA3.BLI;2

8HWP
. TABLE, (SP)

210,R0
RC,TEMP1

BIS
B8IC
cMP
BEQ
MOV
MOV

000000G 000006G

ASH
MOV

MOV
MOV
CLR

000016

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

RO,STATION.ADR+6
©£1400,16(R1)

S?ECKSUH.STATION.ADR06

;:
;:

TEMP1,#

TEMP2,*
TEMP1,+

5
5

1894
1895

1898

#MSG59,(SP)

SP,RO

1893

: SF,.»
1899

CHECKSUM, (SP)
STATION.ADR+6,-(SP)
0MSG63, -(SP)

SP,RO
14
5SS

s SP,s
1900

455
MSGOO

E13REPORT

#10,SP
#10,5SP
67
RO
14
TEMP3

1897
1844
1901
1904

M8
CZQGNACO DEQGNA FUNCTIONAL TEST
TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST
005037
005000
066037

026027

001002
005237
062700
020027
003762
005737
001407
005737
001004
032737
001430

000474
000476
000502
000506
000510
000512
000516
000522
000524
000526
000530
000532
000534
000536
000542
000546
;
;

012746
012746
010600

104414
012716
012746
010600
104414
012716
012746
010600
104414
104455
000456
000000G
000000G
062706
062706
000207

000000G

0000006
000000G 177777
000000G

11$%:

000002
000004

CMP
BNE
INC

ADD

CMP
BLE
TST

000000G

BEQ
TST

000000G

000400

ADD

000000G

12%:

000000G

000001

BNE
BIT
BEQ
MOV
MOV
MOV

TRAP
MOV

000000G
000001

MOV
MOV
TRAP
MOV

000000G
000001

MOV
MOV
TRAP
TRAP

.WORD

000010

000006

. WORD

13$:

ADD
ADD
RTS

Routine Size:
$
AB$CODE
180 words,
Routine Base:
Maximum stack depth per invocation:
16 wocrds

000000

004737

001306°

104466
006000

; Routine Size:

Maximum stack

T3::
1$:

6 words,
depth per

STATION.ADR(RO),
TEMP3
STATION.ADR(RO),#-1

11%
TEMP4
#2,R0O
RO, ¢4
10$
TEMP3

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEQGNAJZGNA3.BLI;2

SEQ 0103

Page

(11)

INDEX
#(INDEX),*
«(INDEX),*

+, INDEX

INDEX,

1914

12$

TEMP4
12$

1915

:g?O.STATION.ADR

1916

#MSG59, -(SP)

1919

SP,RO
i4
#MSG64,(SP)

SP,s

SP,RO
14

SP,*

SP,RO
14
55

SP,*

1920

#PHYS,.ADR, (SP)

1921

456
MSGOO

E1$REPORT

€10,SP
6,SP
PC

1922

1918
1800

+ 1306

.SBTTL

T3 TEST 3 - ETHERNET STATION ADDRESS VERIFY TEST

JSR
TRAP

ROR

PC,$T3
66
RO

RTS

BLO

103773

000207
;

10%:

CLR
CLR

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

AB$CODE
$ + 2056
Routine Base:
invocation:
2 words

1923

N8
ZGNA3

CZQNACO DEGNA FUJICTIONAL TEST

v01.0
:

1928

:
:

1929
1930

1932

;

1934

:
:

1939
1940

1931

1933

1
1

1941

1944

1942
1943

igzz

1947

:
:
:

1950
1951
%ggg

:
:

1954
1955

3
:

:
;
:
3
:
H
H

3
;
3
3
:

3
:

3
3
:
:

1948
1949

NOTE:

The following BINARY data patterns are used:

{

[MAZURCZYK.DEQGNAJZGNA3.BLI;2

This test verifies that all bits of the vector address register
can be set and cleared as specified. The host writes data patterns
to this register and reads them back verifying no static
(stuck at 1 /7 stuck at 0) faults occur. If the operator specifies

!
!

loop on error, the program re-executes the code that detected the
error until tC is entered.

Only bits 9:2 of the Interrupt Vector Address Register are
valid, rest read as 0.

00000000

1
1
{

H
!

11110000
00001111
walking 1's, 1 propagating thru Vector Address Reg.
walking 0's, O propagating thru Vector Address Reg.

1
1

H
:

1
1

1970
1971
1972
1973

!
:
:
:

1
1

1966
1967

1968
1969

DESCRIPTION:

:
!

1960
1961
1962

1963.
1964
1965

1
1

1
1
1
1
1
1
1

1956
1957
1958
1959

TEST 4:

VAX-11 Bliss-16 V4.0-579

INTERRUPT VECTOR ADDRESS TEST

1
1
1
1

:
:

LR
!

5-Jul-1984 14:02:06

%SBTTL 'TEST 4 - INTERRUPT VECTOR ADDRESS TEST'

1935
1936
1937
1938

;.
:
:
:

S5-Jul-1984 14:05:07

TEST 4 - INTERRUPT VECTOR ADDRESS TEST

1
1
1
1
1

1
1
1
1

10101010
11001100

!
!
E

'
:
!
:
!
:
:

Hardware tested:

Device Vector Address Register
Slave Interface Registers

Processing:
BEGIN
reset device
REPEAT for each pattern

H
!
!

write pattern to Vector Address Register ( bits 9:2 )
read pattern from Vector Address Register ( bits 9:2 )
compare write pattern to read pattern (less noise bits)

!
!

IF not equal
THEN

!
!

:
:
'
!--

11111111

01010101
00110011

print error message if not
ENDIF
END

ENDREPEAT

inhibited

SEQ 0104

Page

(12)

B9
CZGNACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:05:07

WHWWHWEWWWDLBNRNRNNNNYNOONCODUWHWWHWWWWBARIYNNNNOOOCLBPUUUHWWWWWW

B0 S0

B0 B0

B0 B0 S0

B0 80

TEST 4 - INTERRUPT VECTOR ADDRESS TEST

VAX-11 Bliss-16 v4.0-579

S-Jul-1984 14:02:06

[MAZURCZ
YK .DEQGNA JZONAS . BLI ;2

BGNTST;

RESET_DEQGNA (

);

!"tflITE ALTERNATING 0'S AND 1'S TO INTERRUPT VECTOR ADDRESS REGISTER

'
.

IN THE 1I/0 PAGE, THEN READ AND COMPARE TO THE WRITE PATTERN

INCR INDEX FROM O TO 7 DO
BEGIN

TEMPL = _PTRN_TABLE [
BGNSUB;

.INDEX );

PUT_BIT [ INT_VEC, VEC_ADR, .TEMP1 ];
IF GET_BIT [ INT_VEC, VEC_ADR ] NEQU .TEMP1
THEN

BEGIN

PRINTB ( MSGS9 );
PRINTB ( MSG6S );

PRINTB ( MSG30, .GET_ADR [ VEC_ALL
ERRDF
( 0401, MSGOO, E1SREPORT );
END;
ENDSUB;
ND;

.TEMP1, GET_BIT [

INT_VEC, VEC_ADR ]

);

.lRIYE WALKING 1 PATTERN INTO THE INTERRUPT VECTOR ADDRESS IN THE I/0 PAGE
REGISTER THEN READ AND COMPARE TO THE WRITE PATTERN

TEMP1

= #B8°'00000001°;

INCR INDEX FROM O TO 7 DO
BEGIN
BGNSUB;

PUT_BIT [ INT_VEC, VEC_ADR, .TEMP1 );
IF GET_BIT [ INT_VEC, VEC_ADE ) NEQU .TEMP1
THEN

BEGIN

PRINTB ( MSGS9 );
PRINTB ( MSG6S );

END;

TEMPL

ENDSUB
;
END;

PRINTB ( MSG30, .GET_ADR [ VEC_ALL
ERRDF
( 0402, MSGOO, E1$REPORT );
_TEMP1

.TEMP1, GET_BIT [

INT_VEC, VEC_ADR ]

.'MRIYE WALKING O PATTERN INTO THE INTERRUPT VECTOR ADDRESS IN THE I/0 PAGE
REGISTER THEN READ AND COMPARE TO THE WRITE PATTERN

TEMP]1

= #B°11111110';

);

SEO'OXOS

(13)

ZGNACO DEGNA FUNCTIONAL TEST

HUHWDBOORINNNNT
OO
DLW

$TEST 4 - INTERRUPT VECTOR ADDRESS TEST

004137
162706
004737
005001
116137

105037

104402
013700
013702
006302
006302
042702
042760
050260
016016
013702

000102
000110
000112
000116
000122
000124
000126
000132
00013¢€
000140
000142

011600
006200
006200
042700
020002
001456
012746
012746
010600
104414
012716
012746
010600
104414
013700

VAX-11 Bliss-16 v4.0-579

[(MAZURCZ YK .DEQNA JZGNA3 .BLI ;2

S(O'OXOG

(13)

INCR INDEX FROM O TO 7 DO
BEGIN
BGNSUB;

PUT _BIT [ INT_VEC, VEC_ADR,

.TEMP1 );

IF GET_BIT [ INT_VEC, VEC_ADR ] NEQU .TEMP]
THEN

BEGIN

PRINTB ( MSGS9 );
PRINTB ( MSG6S );

END;

PRINTB ( MSG30, .GET_ADR [ VEC_ALL
FRRDF
( 0403, MSGOO, E1SREPORT );

TEMPL = ((
ENDSUB;
END;

. TEMP1 * 1

) « 1

) AND #0'000377*

.TEMP1, GET_BIT [

INT_VEC, VEC_ADR ]

);

;

ENDTST;

0000006
000022
0000006

$T14;

000000G 0000006
000001G

1$:

0000006
0000006
176003

001774

000014

000014
0000006

177400

0000006
000001

0000006
000001
0000006

2s:

.SBTTL

JSR
SuB
JSR

CLR

MOVB
CLRB
TRAP

R1,$SAVE2
022,5P
PC,RESET.DEGNA

PTRN,.TABLE(R1),TEMP]
TEMP1+1
2

MOV
MOV

REG.ADR,RO
TEMP1 ,R2

ASL

000014

874 TEST 4 - INTERRUPT VECTOR ADDPESS TEST

BIC

BIS

MOV
MOV
MOV

: *(INDEX),»

1976
1983
1985

1987

: ¢, TMP _LOCATION

1988

01774,14(R0O)

R2,14(RO)

14(R0O),(SP)
TEMP],R2
(SP),RO

cMP

RO,R2

MOV

s INDEX

0176003 ,R2

RO
RO

BEQ

1925

ASR
ASR

8IC

: TMP_LOCATION,

€177400,R0

oMSGS9, -(SP)

SP,RO

MOV
MOV

oMSG6S,(SP)
01,-(SP)

TRAP
MOV

14
REG.ADR,RO

MOV

01,-(SP)

TRAP

MOV

SP,RO

1991

SP,e
1992

: SP,»
:

1993

D9
CZQNACO DEGNA FUNCTIONAL TEST

ZGNAS

TEST 4 - INTERRUPT VECTOR ADDRESS TEST

v01.0

000146

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

000014

016066
016600

000010

006200
042700

177400

010016
013746
013766
062766
016646
012746
012746
010600
104414

MOV
MOV

000010

ASR
ASR

8IC
MOV
MOV
MOV
ADD
MOV
MOV
MOV
MOV

0000006
000000G 000014

000014
000014
000014
0000006
000004

TRAP
TRAP

104455

000621

062706
104467

103666
005201
020127
003655
012737
012701
104402
013700
017702
006302
006302

042702
042760
050260
016066
013702
016600
006200
042700
020002
001456

012746
012746

010600

104414
012716

012746
010600
104414
013700
016066

00001¢€

14(R0),10(SP)

¢, TMP LOCATION

GET.ADR,14(SP)
014,14(SP)
14(SP),-(SP)

s
s
s

¢, TMP _LOCATION
¢, TMP _LOCATION
TMP _LOCATION,»

SP,RO

s SP,e

0177400,R0

TEMP1, -(SP)

oMSG30, -(SP)
14

55
621
MSGOO

1994

016,SP

1990
1995

R1
R1,07
14
01,TEMP]

INDEX,»

», INDEX

REG.ADH,RO
TEMP1,R2
R2
R2
©176003,R2
01774,14(R0O)
R2,14(R0O)

000014
000014
0000006
000006

1983

2003
2005

2009

14(R0O),6(SP)

TEMP1,R2

6(SP),RO

RO
RO
©177400,R0
RO,R2

177400

.
4
oMSGC59, -(SP)

0000006
000001

000000G
000014
000016

s INDEX

glo.ax

176003
001774

(13)

RO, (SP)

4%:

3s:

SEQ 0107

s TMP_LOCATION,+

E1$REPORT

000007

000000G
000001

[MAZURCZ
YK .DEGUNA )ZQNA3 .BLI ;2
;s

10(5P),RO
RO

000001
000010

VAX-11 Bliss-16 v4,0-579

TRAP
MOV

MOV

TRAP
MOV
MOV

SP,RO

14
aMSG6S, (SP)

2012
s

2013

SP,.RO
14

14(R0),16(SP)

REG.ADR,RO

SP,»

SP,»
2014
¢, TMP_LOCATION

CZQNACO DEGNA FUNCTIONAL TEST

VAX-11 Bliss-16 v4.0-579

000016

s TMP_LOCATION,»

TEST 4 - INTERRUPT VECTOR ADDRESS TEST

[(MAZURCZYK.DEQNA
JZGNA3 .BLI ;2

SEQ 0108

(13)

177400
0000006
000000G 000022
000014
000022
000022
000000G

; ¢, TMP _LOCATION
s TMP_LOCATION,

000004

B SP.‘
2015
MSGOO

E1$REPORT
016,5P

000016

2011
2017

TEMP1

BLO

000376

000010

042700

001456
012746
012746
010600
104414
012716
012746
010600
104414
013700
016066
016600

6%:

TRAP

ASL

000014
000014
000014
000014
0000006
000014

8IC
8IC
BIS
MOV
MOV
MOV

177400

BIC

000000G
000001

MOV

176003
001774

ASR
ASR

BEQ
MOV
MOV

TRAP

000000G
000001

MOV
MOV
MOV

TRAP

0000006
000024
000014
000024

: INDEX

0376, TEMP1

000000G

000000G
000000G

RO
44
R1
4%

MOV
MOV

s, INDEX

;10.91

REG.ADR,RO
TEMP1,R2
R2
R2
2176003 ,R2
91774,14(R0O)
R2,14(RO)

14(R0O),14(SP)

: ¢, TMP_LOCATION

14(SP),RO

TEMP] ,R2

2005
2026
2028
2029
2031

2032

TMP_LOCATION,»

RO
RO
©177400,R0
RO,R2
74
oMSGS9, -(SP)

2035

SP,RO
14
oMSG65, (SP)

2036

01,-(SP)

SP,RO
14

i SP,»

14(R0),24(SP)

: «,TMP_LOCATION
: TMP_LOCATION,+

REG.ADR,RO

24(SP),R0O

2037

F9
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 4 - INTERRUPT VECTOR ADDRESS TEST

ZQGNA3
v01.0

000704
000706
000710
000714
000716
000722
000730
000736
000742

0000006
000000G 000030
000014 000030
000030
000000G
000004

000746

000752
000754
000756
000760
000762
000764
000766
000772
000776
001000
001002

ASR
ASR

RO
RO

MOV

RO,(SP)

BIC

177400

TEMPL, -(SP)
GET.ADR,30(SP)
014,30(SP)
30(SP),-(SP)
oMSG30, -(SP)
04,-(SP)

TRAP

7%:

000000G

001006
001012
001014
001016
001020
001022
001024
001030

ADD
MOV

016,5P
TEMP1,RO

‘

MOVB

RO, TEMP1

3L0

DEC
BNE

ADD

000022

RTS

SEQ 0109

(13)

: ¢, TMP_LOCATION

TMP_LOCATION,»

H SPO.
2038

E1$REPORT

ASL

TRAP
ROR

[MAZURCZYK
.DEQNA JZGNA3 .BLI ;2

.WORD
.WORD

INC
CLR

0000006

SP,RO

623
MSGOO

.WORD

VAX-11 Bliss-16 v4.0-579

MOV
MOV
ADD
MOV
MOV
MOV
MOV

000016
0000006

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

2034
2041

RO
TEMP1

67
RO

R1
64

2028

@22,5P

1925

269 words,
Routine Base:
ABSCODES + 2072
; Routine Size:
21 words
: Maximum stack depth per invocation:

000000
000000
000004
000006
000010
000012

004737
104466
006000
103773
000207

002072

T4:;:
1$:

LSBTTL

JSR
TRAP
ROR

PC,$T4
66

BLO
RTS

(EST 4

18
PC

6 words,
Routine Base:
ABS$CODES + 3124
; Routine Size:
2 words
; Maximum stack depth per invocation:
2046

INTERRUPT VECTOR ADDRESS TEST

2043

S-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579
[MAZURCZ
YK .DEQGNA JZGNAS .BLI ;2

#SBTTL 'TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST'
a0

BOOT/DIAGNOSTIC PROM CHECKSUM TEST

TEST S:
DESCRIPTION:

This test verifies that the contents of the on-board ROM

(Boot/Di
tic ROM) can be loaded to the host memory correctly.
Checksum is generated from the ROM data read end this checksum is
compared to the checksum stored in the last word location of the
on-board ROM, If the operator specifies loop on error, the program
re-executes the code that detected the error until tC is entered.
Hardware tested:

Q-Bus to DMA interface
18051 microprocessor
18051 ROM
CSR register

BEGIN

reset device

setup Receive Descriptor List(s)

set Boot/Disgnostic ROM and External loopback bits
This moves ROM boot code

IF error
THEN
print error message

b ot Pt Pd
b
b et

ENDIF

if not

inhibited

clear Boot/Diagnostic ROM bit in CSR

This moves contents of FIFO to host memory

wait 10 msec. or until RCV Descriptor status changed
IF change

in status

THEN
print error message
ENDIF

if not

inhibited

compute ROM checksum and compare to checksum read from ROM
IF not equsl

b ot et et

into receive FIFO

wait 10 msec. or until RL ( bit S inCSR ) = 0
check CSR status ( bit S ) and RCV Descriptor List status

s
s 1
s

Receive FIFO

Processing:

h et et et

b e e bt

b B

b et b (e Bt

b Bt bt bt et

s s et

CZQGNACO DEGNA FUNCTIONAL TEST
TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST

END

THEN
print error message
ENDIF

if not

inhibited

SEQ 0110

Peage

(14)

H9
CZQGNACO DEGNA FUNCTIONAL TEST

B0
90
S0
B0
B0 B0
S0
S0
S0
B0
S0
B0 S0
S0
S0
S0
B0
S0
S5 S0
B0
S
S0
S0
G
S8
B8
S8
B
S5
S8
S5
B
B
W

2113

2114
2115
2116
2117
2118
2119
2120
2121
2122
2123
2124
2125
2126
2127
2128
2129
2130
2131
2132
2133
2134
2135
2136
2137
2138
2139
2140
2141
2142
2143
2144
2145
2146

WWNWHENWAHWWNANWENNENENNENNAENNAENNNDDDDUWWDLDLDLDLDUWWWUWWWWWWWWWWWWN
NN W
W

2110

TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST

5-Jul-1984 14:05:07

5-Jul-1984 14:02:06

BGNTST;
RESET_DEQGNA (

):
CLR_BUFFERS ( 2 » K );

. COPY BOOT/DIAGNOSTIC PROM DESCRIPTOR LIST INTO WORK AREA
INCR INDEX FROM O TO B8D0_D_SIZE - 1 DO
DESCR_LIST [ .INDEX, W_LEN ] = .BD_PROM_DESCR [ .INDEX ];
.JOP_TABLE [ RLO_ADR ] = RCV_D_LIST;
.IOP_TABLE [ RHI_ADR ] = 0;
PUT_BIT ( CSR, LB, EXT_LOOPBACK );
PUT_BIT ( CSR, BD, SET_IT );
DELAY ( K );

INCR INDEX FROM O TO TIME3_LIMIT DO
IF GET_BIT [ CSR, RL ) EQLUV ZERO
THEN

BEGIN

TEMP1 =

_INDEX;

EXITLOOP;
END
ELSE

IF _INDEX EQLU TIME3_LIMIT
THEN

BEGIN
PRINTB ( MSGS9 );
PRINTB ( MSG66, GET_BIT [ CSR_ALL
"EJRRDF ( 0501, MSGOO, ERRORSREPORT
3

VER_DESCR_STATUS (
>

);

"FINISH BOOT/DIAGNOSTIC PROM UPLOAD

PUT_BIT (

DELAY ( K

CSR, BD,

);

CLR_IT

);

‘e

CHECK IF RECEIVE STATUS CHANGED
VER_DESCR_STATUS (
RESET_DEGNA (
TEMP3 = 0;

);

) );
);

VAX-11 Bliss-16 v4.0-579

[(MAZURCZYK .DEQGNAJZGNA3.BLI ;2

SEO’OIII %0
age
(15)

19
CZQGNACO DEGNA FUNCTIONAL TEST
TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST

ZQGNA3
2147

2148

2149

2150
2151
2152
2153
2154
2155
2156
2157
2158
2159
2160
2161
2162

2163

2164
2165
2166
2167
2168
2169
2170
2171
2172
2173
2174
2175
2176
2177

000000
000004
000010
000014
000020
000024
000026
000034
000040
000044
000046
000054
000060
00C064
000072

000076
000100
000104
000106

HUWWNDLDLLLDLWDLUWWELDLLUWWWWWWWWWWWWWWLW

v01.0

004137
162706
004737
012746
004737
005000
016060
062700
020027
003770
012777
005077
013700
052760
012701

001410
013700
001403
005066

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

VAX-11 Bliss-16 V4.0-579
[(MAZ\'RCZYK.DEQGNAJZGNA3.BLI;2

SEQ 0112

TEMP3 = _DATA_BUFFER [ CHSUM_OFFSET « 1 ];
TEMP3 = (

.TEMP3 t 8 ) AND sX'FFO0’;
TEMPS = _DATA_BUFFER [ CHSUM_OFFSET ] « .TEMP3;

TEMP2 = .DATA_BUFFER [

.TEMP3 + 1 ];

TEMP2 = ( .TEMP2 t 8 ) AND #X'FFQO’;
TEMP2 = _DATA_BUFFER [ .TEMP3 ] + .TEMP2;
COUNTER
= O;
CHECKSUM = Os

INCR INDEX FROM O TO PROM_SIZE - 2 DO
IF .COUNTER EQLV .TEMP3
THEN

COUNTER = .COUNTER + 2

ELSE
BEGIN

CHECKSUM = _CHECKSUM + (

ENSOUNTER =

_COUNTER + 1;

.DATA_BUFFER [

.COUNTER ] AND sX'FF'

);

IF ¢

_TEMP2 EQLV ZERO ) OR (

THEN
BEGIN

.TEMP2 NEQU .CHECKSUM )

CSR_WORD = GET_BIT ( CSR_ALL );

PRINTB ( MSG59 );
PRINTB ( MSG67, .TEMP3,

ERRDF

END;

.TEMP2, .CHECKSUM );
( 0502, MSGOO, E1$REPORT);

ENDTST;

0000006

$7S:

000010

000000G

004000
0000006
000002
000036

1%:

JSR

PC,RESET.DEQGNA

2096

SuB

MOV

ADD
cMP

CLR

0000006

000010

2045

MOV

0000066

0000006

BLE

000000G 000004G
000016
2%:

3s:

$7S TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST

R1,$SAVE3

MOV
gsg

000000G 000000G

001410
002000

LSBTTL

JSR

010,SP

€4000, -(SP)
PC CLR BUFFERS

2097

3
INDEX

BD PROM,.DESCR(RO),DESCR. LIST(RO): «(INDEX),*( INDEX)
®2,R0O
: s, INDEX
R0.036
14

ORCV.D.LIST,3I0P.TABLE+4

INDEX,
»

2106
2107
2109

MOV

8IO0P.TABLE +6

REG.ADR,RO

BIS
MOV
BEQ

#1410,16(RO)
#2000,R1
Ss

H
:

*,$$TMP2

*,8$8TMP1

$STMP

MOV

L$DLY,RO

BEQ

CLR

10(SP)

2103
2104
2103

2110
2112

J9
CZQGNACO DEGNA FUNCTIONAL TEST
TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST

ZQANA3

v01.0

000112
000114
000116
000120
000122
000126
000134
000142
000144
000150
000152
000156
000160
000164
000170
000172
000174

000206
000212
000216
000222

000224
000226
000230
000232

077003
005301
000767

005001
013700
016066
032766
001003
010137
000440
020127
001031
012716
012746
010600
104414
013700
016066
016616
012746
012746
010600
104414

000000G
000016
000040

6%:

000001

000016

. LOCATION
«,TMP
P
. LOCATION
*,TM

000765

INDEX,+

INDEX,*

32
(15)

2113
2114

2117
2116
2121
2124

16(R0),6(SP)
6(SP),(SP)

: #,TMP_LOCATION

SP,.RO
14
55
765

: SP,s

oMSG66, -(SP)

000002

SP,.RO
14

REG.ADR,RO

000006

SEQ 0113

$STMPL,»
$8TMP2
INDEX

16(R0),2(SP)

€40,2(SP)
7%
R1,TEMP1
94
R1,02000
84
OMSGS9, (SP)

7%:

002000

[(MAZURCZYK.DEQNA JZGNA3.BLI;2

Ri
REG.ADR,RO

S$:

000002
0C2002

VAX-11 Bliss-16 v4.0-579

:
;

4%:

104455

062706
005201
020127
003724
004737
013700
142760
012701
001410
013700
001403
005066
077003
005301
000767
004737
004737
005037
113737
013700
072027
010037
042737
005000
153700
060037

S-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

SP,»
2125

s
TMP_LOCATION,

2126

MSGOO

ERRORSREPORT
96,5P

002000

R1
2%.02000

000010
002000

PC,.VER.DESCR.STATUS
REG.ADR,RO
#10,16(RO)
©2000,R1

8$:

000016

000010

13$
L$OLY,RO
124
10(SP)

10¢:
114:

RO,11%
R1

12¢:

000000G

10¢
PC,VER.DESCR.STATUS
PC,RESET.DEGNA

13%:

TEMP3

DATA.BUFFER+7,TEMP3

000007G 000000G
0000006
000010
000000G
000377
000000G

0000066

BISB
ADD

TEMP3,RO
¢10,R0
RO, TEMP3
0377, TEMP3
RO

DATA.BUFFER+6,R0O

RO, TEMP3

INDEX

+
INDEX,

2123
2113
2129
2135

s, 88TMP2

;

¢,88TMP]

;
:

;

2136

$STMP

$STMPL,»

$S$TMP2

2142
2144
2147
2148

2149

K9
CZQGNACO DEGNA FUNCTIONAL TEST

TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST

013701

116137
105037

013700
072027
010037
042737
005000
156100
060037
005037
005037
012702
013700
020001

MOV
MOvVB
CLRB
MOV

000000G

000001G 000000G
000001G
000000G

ASH
MOV

8IC
CLR
8ISB

ADD

00 000G

14%:

001004

000570
000572
000576
000602
000606
000612
000616
000620
000622
000624
000626
000630
000632
000636
000642
;
;

062737
000407
005003
156003
060337
005237
077220
013700
001403
020037
001440
013700
000000G
016066
016637
012716
012746
010600
104414
013716
013746
013746
012746
012746
010600
104414
104455
000766
000000G
000000G
000012
062706
062706
000012
000207

Routine Size:
Maximum stack

CLR
CLR
MOV
MOV

CMP
BNE
ADD

15¢:

BR
CLR
BISB

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

[MAZURCZYK
.DEGNA JZGNA3.BLI;2

TEMP3,R1

TEMP2+1
TEMP2,RO
€10,R0
RO, TEMP2
0377, TEMP2
RO

2153

DATA.BUFFER(R1),RO

RO, TEMP2

COUNTER
CHECKSUM

+, INDEX

07777,R2

COUNTER,RO

RO,R1

15¢

R3,CHECKSUM

=
INDEX,

17%
RO, CHECKSUM

18%

REG.ADR,RO

16(R0),6(SP)
6(SP),CSR.WORD
#MSGS9,(SP)

SP,RO
14

MOV
MOV

MOV

MOV
MOV

TRAP
TRAP

.WORD
.WORD
. WORD

18%:

ADD
ADD
RTS

AB$CODES$
Routine Base:
210 words,
words
16
depth per invocation:

;

*,TMP_LOCATION

TMP.LOCATION,+

2171
2172

2173

TEMP2, -(SP)
TEMP3, -(SP)
oMSG67, -(SP)

04, -(SP)

2165
2158
2168

SP,s

CHECKSUM, (SP)

SP,RO

2155
2156
2158
2159
2161
2159
2164

DATA.BUFFER(RO),R3
COUNTER

17%:

SEQ 0114

DATA.BUFFER+1(R1),TEMP2

R2,14%
TEMP2,RO

16%:

VAY-11 Bliss-16 v4.0-579

SP,+
2174

766
MSGOO

E1$REPORT

@€12,SP
@12,SP
PC

314"

2170
2045

L9
ZQGNA3

CZQGNACO DEGNA FUNCTIONAL TEST
TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST

000000
000000
000004
000006
000010
000012

003140°

v01.0

004737

15::
1$:

104466

006000
103773
000207

: Routine Size:

6 words,

Routine Base:

2178

2 words

VAX-11 Bliss-16 V4,0-579

[(MAZURCZYK.DEQNA JZGNA3.BLI;2

.SBTTL

TS5 TEST S - BOOT/DIAGNOSTIC PROM CHECKSUM TEST

JSR

PC,$T5

TRAP
ROR

66
RO

RTS

BLO

: Maximum stack depth per invocation:

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

ABSCODES + 4004

SEQ 0115

Page

(15)

2175

M9
CZGNACO DEGNA FUNCTIONAL TEST
TEST 6 - INTERRUPT SANITY TEST

ZQANA3
s
s

This test verifies that DEGNA interrupts the processor only at
the expected level ( 4 ) and not any other level. If the operator
specifies loop on error, the program re-executes the code that
detected the error until tC is entered.
Hardware tested:

Processing:

Q-Bus to QTDC interface
CSR register
Q-Bus timeout logic
QTDC interrupt logic

b et

b bt

b s bt

DESCRIPTION:

BEGIN

reset device

2198
2199
2200
2201
2202
2203
2204
2205
2206
2207
2208
2209
2210

INTERRUPT SANITY TEST

set-up for NXM interrupt

2193
2194
2195
2196
2197

TEST 6:

REPEAT for each processor priority level

et bt

2191
2192

VAX-11 Bliss-16 V4.0-579
(MAZURCZYK.DEGNA]JZQGNA3.BLI;2

fee

enable device interrupt (set CSR bit 6)
force NXM

b e b

2187
2188
2189
2190

interrupt

check for expected CSR status
IF error

THEN
print error message
ENDIF

ot e et e

2186

#SBTTL *TEST 6 - INTERRUPT SANITY TEST'

0 b

2179
2180
2181
2182
2183
2184
2185

b bt s

v01.0

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

END

ENDREPEAT

if not

inhibited

SEQ 0116
Page

(16)

N9
ZQNA3

CZGNACO DEGNA FUNCTIONAL TEST

vol1.C
3

3
3

2211

2212
2213

2220 3

INCR PRIORITY FROM PRIOO TO PRIO7 BY #0'40' DO

221

2213

22%3

.JOP_TABLE [ XHI_ADR ] = NXM_HI_ADR;

6
6
6

DELAY ( 2 );
GETPRI ( TEMP1 );
TEMP1 = TEMP1 t ( - S );

6
6
6

IF .INTERRUPT_FLG EQLU WORD_LIMIT
THEN
IF .PRIORITY GTRU PRIO3

:
3
:

2231
2232
2233

:
:
3

2235
2236
2237

2234

6
6
6
6

6
7
7
7
7
6

3
3
3
s
3
:

2238
2239
2240
2241
2242
2243

2245

2248

2244

3
H

2246
2247

2249

:
5
3

3
:
3

5
3
:
3
3
;

BEGIN
SETPRI ( .PRIORITY );
BGNSUB;
PUT_BIT ( CSR, IE, SET_IT );

2221
2222
2223
2224

2225
222?
2227
2228

2250
2251

2252
2253
2254

6
6

6
6
4
4
3
3

2262

2263

.JOP_TABLE [ XLO_ADR ] = NXM_LO_ADR;

! SET UP FOR AN NXM INTERRUPT

! SET PROCESSOR PRI LEVEL
! ENABLE INTERRUPTS
!
! WRITE LOW ADDRESS

! WRITE HIGH ADDRESS

! INTERRUPT SHOULD NOT OCCUR

THEN
BEGIN
PRINTB ( MSGS9 );
PRINTB ( MSG69, .TMP_IOP_ADR, .TEMP1l,
ERRDF ( 0601, MSGOO, E1$REPORT );
END;

IF .INTERRUPT_FLG EQLU ZERO

THEN
IF .PRIORITY LEQU PRIO3
THEN

IF (

6
7

2255
2256
2257
2258
2259
2260

2261

DELAY ( S );
INTERRUPT_FLG = CLEAR_FLG;

6
7
7
7

[MAZURCZYK.DEQGNA]ZQGNA3.BLI;2

COUNTER = 0;

4
4
6
6

p
:
3
:

5-Jul-1984 14:02:06

VAX-11 Bliss-16 V4.0-579

BGNTST;

RESET_DEGNA ( );
SETVEC ( .HWP_TABLE [ VEC ), NXM_INT, PRIO7 );
.IOP_TABLE [ INT_VEC ) = .HWP_TABLE [ VEC );
TMP_IOP_ADR = .HWP_TABLE [ ADDR J;

2214
2215
2216
2217

:
:
:
5

3
3

3
3
3
3

3
:
:
:
:

TEST 6 - INTERRUPT SANITY TEST

S-Jul-1984 14:05:07

.COUNTER );

! INTERRUPT SHOULD OCCUR

.XMIT_D_LIST [ FLGWD ] AND XFLG_MASK ) NEQU XFLG_MASK

THEN
BEGIN

PRINTB ( MSGS9 );
PRINTB ( MSG69, .TMP_IOP_ADR, .TEMP1,
ERRDF ( 0602, MSGOO, E1$REPORT );

.COUNTER );

END;
RESET_DEGNA ( );
ENDSUB;
COUNTER = ,COUNTER + 1;
END;

SETPRI ( PRIO3 );

ENDTST;

! SET PROCESSOR PRI LEVEL
,

SEQ 0117

Page

(17)

000000
000004

004137
005746

0000006

000016
000022
000026
000032
000036

012746
013700
016046
012746
104437

000000G
000000G
000002
000003

$76:

000006 004737 0000006
000012 012746 000000G

000060

013700
016077
017737
005037

000104

000112

104441
104402
013700
152760

000000G
000002 000014G
000000G 000000G
000000G

012701

000116

001410

000124
000126

001403
005066

000120

013700

000000G

000100

000005

2s:
000016

0000006
000010

077003
005301

000140
000144
000152
000160

005037
012777
012777
012701

0000006
160000 000010G
000077 000012G
000002

000166

013700

000000G

005066

000010

000164

000172

000174

000200
000202
000204

000206
000210
000214

000220

000226

000230
000234

000236
000242

000246
000250

000767

001410

001403

077003
005301

010037

023727

001033

177773
000000G

000000G 177777
000000G

012716
012746

000000G
000001

010600
104414

4as:

6%:

8%:
94:

020227

101430

3s:

5%:

000767

104440
072027

.SBTTL

R1,$SAVE2
-(SP)

MOV
MOV
MOV
MOV
TRAP
MOV
MOV
MOV

ONXM, INT, -(SP)
HWP, TABLE ,RO
2(RO), -(SP)
03,-(SP)
37
HWP , TABLE ,RO
2(R0),81I0P, TABLE.14
SHWP, TABLE, TMP,10P . ADR

MOV
BR
MOV

OPRI00,R2
134
R2,RO

BISB

10%:

TRAP
TRAP
MOV

VAX-11 Bliss-16 v4.0-579

[(MAZURCZYK .DEQNA JZONAS . BLI ;2

$76 TEST 6 - INTERRUPT SANITY TEST

JSR
TST7

CLR

18:

000132
000134
000136

S5-Jul-1984 14:02:06

JSR
MOV

000064 012702 0000006
000070 000570
000072 010200
000074
000076
000100

S-Jul-1984 14:05:07

DEGNA FUNCTIONAL TEST
CZQNACO
TEST 6 - INTERRUPT SANITY TEST

ZQGNAS
v01.0

000040
000044
000052

B10

PC,RESET,DEGNA
oPR107, -(SP)

2177

2214
3215

2216

2217

COUNTER

2218

e
2
REG.ADR,RO

;

2224
2225

;3 ¢, PRIORITY
: PRIORITY,s

o5,R1

3 e, 88TMP2

MOV

LS$OLY,RO

i *,88TMP]

BEQ
CLR

5%
10(SP)

;

RO,4%
R1

CLR
MOV
MOV
MOV

INTERRUPT .FLG
©-20000,3I0P,TABLE+10
077,310P.TABLE-12
02,R1

:
:
:
i e,88TMP2

MOV

L$OLY,RO

: ¢,88THP)

10(SP)

BEQ

CLR

2220
2222

$STMP

S08
DEC
BR

(17)

MOv
BEQ

P — 37

SEQ 0

; $8TMP]L
,»
: $3TMP2

10%

$8TMP

S08
DEC

RO,8$
R1

TRAP
ASH

40
0-5,R0

:
:

2232
2233

INTERRUPT FLG,0-1

2235

cMP

R2,0PRIO3

: PRIORITY,»

2237

MOV
MOV

oMSGS59,(SP)
01,-(SP)

2240

MOV

RO, TEMP1

BNE

11%

CHP

BLOS

MOV
TRAP

:
;

2226
2228
2229
2231

114

SP,RO
14

TMM on I\

$STMPL
e
$8TMP2

SP,»

C10
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 6 - INTERRUPT SANITY TEST
013716
013746
013746
012746
012746
010600
104414

001430
012716

MOV

SP.RO

5 SP.‘

.MORD

.WORD

11%:

037777
140000

000001
012746
010600
104414
013716
013746
013746
012746
012746
010600
104414
104455
001132
000000G
000000G
062706
004737
104467
006000
103616
005237
062702
020227
003605
012709
104441
000012
062706
000207

1131

(17)

2241

2242

H
H

2239
2245

MSGOO

cHe
BHI
MOV
BIC
cHP
BEQ
MOV

R2,0PRIO3
124
XMIT.D.LIST,RO
037777,R0O
RO, #-40000
12%
MMSG59,(SP)

s PRIORITY,

2247

2249

2252

MCv

SP,.RO

; SP,e

MOV
MOV
MOV
MOV

COUNTER, (SP)
TEMPL, -(SP)
TMP_.IOP.ADR, -(SP)
oMSG69, -(SP)

MOV

SP,RO

; SP,s

TST
BNE

INTERRUPT .FLG
124

14
S5

.WORD
.WORD
.WORD

1132
MSGOO
E1$REPORT

JSR

PC,RESET.DEQGNA

B8LO

ADD

TRAP
ROR

INC
ADD
cMP
BLE
MOV

TRAP
ADD
RTS

AB$CODE$
1.2 words,
Rout ine Base:
15 words
Max imum stack depth per invocation:

Routine Size:

14
SS

Page

E1SREPORT
212,5P

TRAP
TRAP

13%:

TEMPL, -(SP)
TMP,IOP.ADR, -(SP)
oMSG69, -(SP)

SEQ 0119

.WORD
ADD

TRAP

12%:

[MAZURCZ YK .DEGNA JZGNA3 .BLI ;2

COUNTER, (SP)

TRAP
TRAP

001131
0000006
0000006
062706 000012
005737
001042
020227
101037

VAX-11 Bliss-16 v4,0-579

MOV

MOV
MOV
MOV

0000006
0000006
0000006
000004

104455

013700
042700
020027

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

012,SP

67
RO

COUNTER
040,R2
R2,6PRIC/
14
OPRIO3,RO

41
e012,5P
PC

+ 4020

2253

2254

3
3

2251
2256

¢,PRIORITY

PRIORITY,»

2258

2220

2261

2177

D10

ZGNA3
v01.0

CZQNACO
DEGNA FUNCTIONAL TEST
TEST 6 - INTERRUPT SANITY TEST

000000
000000

004737

000006
000010
000012

006000
103773
000207

000004

16::
18:

004020’

104466

; Routine Size:

6 words,

Routine Bese:

]
<2264

2 words

VAX-11
Bliss-16 v4.0-579
[MAZURCZ YK .DEQNA )7QNAS . BLI ;2

.SBTTL

716 TEST 6 - INTERRUPT SANITY TEST

JSR

PC.876

ROR
BLO

RO
14
PC

TRAP

RTS

: Maximum stack depth per imocation:

;

S-Jul-1984
14:05:07
S5-Jul-1984 14:02:06

ABSCODES . 4514

;

SEQ

’220(17)
39
2261

E10
S-Jul-1984 14 05:07
S5-Jul-1984 14 02 :06

CZQNACO DEGNA FUNCTIONAL TEST

P
e e Pt P

S0 B0

Pt P
e P
o

2305

ETHERNET CARRIER SENSE TEST

TEST 7:
DESCRIPTION:

This test verifies that the DEGNA cen transmit external loopback

packets and if not faulty FRU is can be found by executing this
by implementing the instructions printed on the operator's console.
In order to run this test successfully the operator has to make
sure that DEGNA is connected to the transceiver. If the operator

specifies loop on error, the program re-executes the code that detected
the error until tC is entered.
Hardware tested:
Processing:

BEGIN

reset device

select external loopback mode
check external hardware

IF bad hardware
THEN
print error message
ENDIF

if not

inhibited

read CSR

o P

gcfithcmt Carrier Sense bit ( bit 13 ) =1

m?;int error message

trensmit 1

et o

Coerrier Sense circuitry
Encode/Decode ( ED ) chip

if not

inhibited

st unchained loopback packet ( ETHERNET format )

read CSR while transmitting loopback packet

%F*Sthcmt Coerrier Sense bit (bit 13) = 0

o
(e

[MAZURCZYX.DEQGNAJZGNA3.BLT;2

fe0

. Sgrint error message

if not

inhibited

wait until Carrer Sense bit goes to 0
ENDIF
read CSR

%:eschemt Carrier Sense bit (bit 13) = 1

s P
e
P

2307
2308
2309
2310
2311
2312
2313

.
-

#SBTTL *TEST 7 - ETHERNET CARRIER SENSE TEST'

o P

2295
2296
2297
2298
2299
2300
2301
2302
2303
2304

o P

S0
S0
S0
S5

2293

B8
S5
S
S8
S5
S5
WL G5

et e et P

2289

e et P

e e P

B0 B8

e P

ek e et

TEST 7 - ETHERNET CARRIER SENSE TEST

VAX-11 Bliss-16 v4.0-579

END

print error message
IF
END

if not

inhibited

SEQ 0121
P age

(18)

F10
ZGNA3

2339
2340
2341
2342
2343
2344
2345
2346
2347
2348
2349
2350
2351
2352
2353
2354
2355
2356
2357
2358
2359
2360
2361
2362
2363

G5
W

2365
2366

VNN EBLANLALLLALLDLLLAVVIIVIONOOOVIVIONONO
VIV
DWWWW

0
80
S0
90
S0
S0
B0
S8
S
B0
90
90
S0
S0
B0
S0
B0
B0
B0
B0
S0
B0
B0
S0
S0
B0
B0
S0
S0
B0
B0
B8
S0
S
S8
B0
S8
S0
B0
S8
S8
G
S0
B8
S
B
S5
S5

2337
2338

2336

S5-Jul-1984 14 02:06

TES. 7 - ETHERNET CARRIER SENSE TEST

v01.0

2314
2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335

S5-Jul-1984 14 05:07

CZQNACO DEGNA FUNCTIONAL TEST

VAX-11 Bliss-16 v4,.0-579

[MAZURCZYK
.DEQGNA JZGNA3 .BLT ;¢

BGNTST;

IF .SWP_ILOOP
THEN

BEGIN

RESET_DEGNA (

);

IF ( NOT GET_BIT [ CSR, XC ) ) AND ( .SWP_LBC EQLYU ZERO )
THEN

BEGIN

CSR_WORD = GET_BIT [ CSR_ALL );
SELECTONE .XC_FLAG OF
SET

[0 ]):

BEGIN

XC_FLAG =

XC_FLAG

PRINTB ( MSGS9 );
PRINTB ( MSGA7 );
ENSRRDF
( 0704, MSGOO, ERRORSREPORT

BEGIN

XC_FLAG = ZERO;
PRINTB ( MSGS9 );
PRINTB ( MSG42 );

ERRDF

TES;

);

END;

( 0705, MSGOO, ERRORSREPORT

);

EXIT_TST;
END
ELSE

XC_FLAG = ZERO;

‘e

?ESET DEGNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING
STS IN EXTERNAL LOOPBACK MODE.
RESET_DEGNA ( );
PREP_FOR_SETUP (

);

INCR INDEX1 Firyt 1 TO 14 DO
WRT_STATION_ADR (

.INDEX1, PHA_INDEX

BGNSUB
;
XMIT_SETUP_PACKET ( N_MODE
ENDSUB
;

);

ERR_FLAG = ZERO;

INCR INDEX2 FROM O TO 19 DO
BEGIN
SEND_TEST_PACKET (
DELAY ( 100 );

);

CSR_WORD = GET_BIT ( CSR_ALL );
IF ( .CSR_WORD AND s=0'100220' ) EQLU =0'100220'

SEQ 0122
P

(19)

CZGNACO DEGNA FUNCTIONAL TEST
TEST 7 - ETHERNET CARRIER SENSE TEST

ZQGNA3

2373
2374
2375
2376

2377

2378
2379
2380

2381
2382
2383

00
G0
B0
W

GBS

2385
2386
2387

2389
2390
2391
2392
2393
2394
2395
2396
2397
2398
2399
2400

2401
2402
2403
2404
2405
2406
2407
2408
2409
2410

2411
2412
2413
2414
2415
2416
2417
2418
2419

VLTV LTIV

2371
2372

TNV

2370

namoocoovnVoccN

2368
2369

2367

B B B BNV

v01.0

VAX-11 Bliss-16 v4.0-579

[MAZURCZYK
.DEGNA )ZGNA3 .BLI;2

THEN

BEGIN
ERR_FLAG = ZERO;
EXITLOOP;

END
ELSE

END;

ERR_FLAG = ONE;

IF .ERR_FLAG
THEN

BEGIN

SEgE?YONE .ERR_COUNT OF

[ 0]):

BEGIN
ERR_COUNT
PRINTB
PRINTB
PRINTB
ENSRROF

(1)

(
(
(
(

= 1;

MSG59 );
MSG3S );
MSG36 );
0706, MSGOO,

ERRORSREPORT

BEGIN
ERR_COUNT
= 2;
PRINTB ( MSG59 );
PRINTB ( MSG37
PRINTB ( MSG38

);
);

me’aaor ( 0707, MSGOO, ERRORSREPORT

(3]

BEGIN
ERR_COUNT
= 3;
PRINTB ( MSGS9 );
PRINTB ( MSG39 ):
PRINTB ( MSGA40 );
NSRRDF ( 0708, MSGOO, ERRORSREPORT

);

BEGIN
ERR_COUNT

= O;

);

BEGIN
ERR_COUNT

= O;

PRINTB ( MSGS9 );
PRINTB ( MSGAS );

ERRDF ( 0710, MSGOO, ERRORSREPORT

TES;

;

PRINTB ( MSGS9 );
PRINTB ( MSGA1 );
ENSRRDF ( 0709, MSGOO, ERRORSREPORT

(4)

);

END;

);

SEQ 0123
Page

(19)

H10
ZGNA3
v01.0

CZGNACO DEGNA FUNCTIONAL TEST
TEST 7 - ETHERNET CARRIER SENSE TEST

B
;
B

2420
2821
2422

S
S
4

EXIT_TST;
END
ELSE

2424

THEN

2426

2430

:
:
;
:
:
:
:
:
B

2423

2425

2427
2428
2829
2431
2432
2433
2434
2435
2436

2437

3
3
:
:

2450
2451
2452
2454

s
3
:
H

2459
2460
2461
2462

6
7
7
7

2464

3
3
H
3

H
:
H

;

2463

2465
2466
g:g;
2469
2470
2471

2472

TES;
EXIT_TST;

XC_FLAG
= ZERO;
ERR_COUNT = ZERO;

4
4

2457
2458

[ 4):

END;

2455
2456

4
6

7
7
;
7
7
7

END;

BEGIN
ERR_COUNT = 0;
PRINTB ( MSGS9 );
PRINTB ( MSGA42 );

ERRDF ( 0712, MSGOO, ERRORSREPORT );

:
:

[ 2.3 ):

S
6
6
6
6
6
S
S
S

2453

ERR_COUNT = 4;
PRINTB ( MSGS9 );
PRINTB ( MSGA3 );
PRINTB ( MSGA44 );
ERRDF ( 0711, MSGOO, ERRORSREPORT );

2444
2445
2446
2447
2448
2449

BEGIN

2443

3
3
H
s
3
s

SELECTONE .ERR_COUNT OF
SET
[1]):

2442

CSR_WORD = GET_BIT ( CSR_ALL );

6
6
6
6
6
6
6
6
6

BEGIN

S
S
S5

2438
2439
2440
244]1

VAX-11 Bliss-16 V4,0-579
[MAZURCZYK.DEQGNA JZGNA3 .BLI;2

IF .ERR_COUNT GTRU ZERO

:
:
:
:

S-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

END;

BEGIN
ERR_COUNT = O;
PRINTB ( MSGS9 );
PRINTB ( MSG46 );
ERRDF ( 0713, MSGOO, ERRORSREPORT );
END;

BGNSUB;

INCR INDEX2 FROM O TO TIME1l_LIMIT DO
BEGIN
RESET_DEGNA ( );
TEMPS = _INDEX2;
fee

!
!
:

CHECK ETHERNET CARRIER SENSE BIT ( CA - BIT 13 ) IN THE CSR. CA SHOULD BE
SET TO 1’ WHILE THE DEQGNA IS TRANSMITTING. IF CA ISN'T SET TO '1' WITHIN
THE EXPECTED TIME LIMIT, ERROR MESSAGE IS PRINTED QUT,

f--

SEND _TEST_PACKET (

);

INCR INDEX FROM O TO TIME1l_LIMIT DO

SEQ 0124

Page

43
(19)

110
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 7 - ETHERNET CARRIER SENSE TEST

ZGNA3

2479

2480
2481
2482
2483

2484

2485
2486

2487
2488
2489
2490
2491
2492

2493

2494
2495
2496
2497
2498
2499
2500
2501
2502
2503
2504
2505

2507
2508
2509
2510
2511
2512
2513
2514
2515
2516
2517
2518
2519
2520
2521
2522
2523
2524
2525

ANOOONNSNNSNSNNANNNANOOOOONNNOOOO®NNNNANSNSNANANOOORONI

2474
2475
2476
2477
2478

247%

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK .DEQGNA]JZGNA3.BLI;2

IF GET_BIT [ CSR, CA ] EQLU ONE

VORI

v01.0

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

THEN

BEGIN
TEMP2 = GET_BIT [ CSR_ALL );

EXITLOOP;
END
ELSE

IF .INDEX EQLU TIME1l_LIMIT
THEN

BEGIN

PRINTB ( MSG59 );
PRINTB ( MSG19, GET_BIT [ CSR_ALL
E'SRRD"' ( 0701, MSGOO, ERRORSREPORT

] );
);

5
Toe

'
!
!

NOW CHECK IF THE CA BIT RESETS TO 'O’ WHEN THE DEQGNA COMPLETES TRANSMITTING
LOOPBACK PACKET. PRINT ERROR MESSAGE IF LOOPBACK PACKET TRANSMISSION
EXCEEDS SELECTED TIME LIMIT,

INCR INDEX FROM O TO TIME2_LIMIT DO
IFTSEL-BIT [ CSR, CA ; EQLV ZERO
BEGIN
TEMP3 = GET_BIT [ CSR_ALL
EXITLOOP;
END

ELSE

];

.INDEX EQLU TIME2_LIMIT

THEN

BEGIN

PRINTB ( MSGS9

);

PRINTB ( MSG20, GET_BIT [ CSR_ALL

ENSRRDF ( 0702,

MSGOO, ERRORSREPORT

]

);

CHECK RECEIVE INTERRUPT REQUEST BIT ( RI - BIT 1S5 ) TO VERIFY THAT DEGNA
ACTUALLY TRANSMITTED LOOPBACK PACKET.

DELAY ( SO );

IF GET_BIT [ CSR, RI
THEN

) EQLU ONE

BEGIN
TEMP4 = GET_BIT [ CSR_ALL
EXITLOOP;

END;

IF .TEMPS EQLU TIME1_LIMIT

);

SEQ 0125
P

(19

J10
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 7 - ETHERNET CARRIER SENSE TEST

2526
2527
2528
2529
2530
2531
2532
2533
2534
2535
2536
2537
2538
2539
2540
2541
2542
2543
2544
2545
2546
2547
2548
2549
2550
2551
2552
2553
2554

2555
2556
2557
2558
2559
2560
2561

000000

000010
000016
000020
000024
000030
000034
000040
000042
000046
000050
000054
000060

HFWBOONNNNORNOOOOOONONORNNNNNONOORNNNNO

—

ZGNA3

004137
162706
032737
001476
004737
013700
016016
032716
001067
005737
001064
011666

011637

013700

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK.DEQNA]ZQGNA3.BLI;2

SEQ 0126
(19)

THEN

BEGIN
PRINTB ( MSGS9 );

PRINTB ( MSG21, GET_BIT [ CSR_ALL ]

NSRRDF

END;

( 0703, MSGOO, ERRORSREPORT

);

IF ¢ .XMIT_D_LIST [ ERRSU ] EQLU 1 ) AND (
THEN
BEGIN
PRINTB ( MSG59 );
PRINTB ( MSG71 );
ENSRRDF
( 0714, MSGOO, ERRORSREPORT

.XMIT_D_LIST [ ABORT ] EQLV 1 )

);

..COHPARE STATUS REGISTERS TO EXPECTED VALUES
CHK_CSR_STATUS

( CSR_STATUS, CSR_MASK

XMIT
DO _LIST [ STWD1 ) =

! 0'100220', 0'100220'
);
.XMIT_D_LIST [ STWD1 ] AND %0'177377';

CHK_XMIT_STA1US ( XFLG_STATUS, XWD11_STATUS );
CHK_RCV_STATUS ( RFLG_STATUS, RWD1_STATUS
);

! 0'140000', 0'000000°
! 0'140000', 0'020000'

IF . XMIT_D_LIST [ TDR ] EQLU ZERO
THEN

BEGIN
PRINTB ( MSGS9 );
PRINTB ( MSG58 );

ERRDF

END;

( 0715, MSGOO, ERRORSREPORT );

ENDSUB;

END;
ENDTST;

000000G
000034

$T7:

LSBTTL
JSR
SuB

877 TEST 7 - ETHERNET CARRIER SENSE TEST
R1, $SAVE?
#34,SP

2263

gé;

:%.SHP.ILOOP

2316

000000G
000000G
000016
010000

JSR
MOV
MOV
BIT

PC,RESET.DEGNA
REG.ADR,RO
16(R0O),(SP)
#10000,(SP)

2319
2320

000000G

TST

000001

000002
000000G
000000G

000000G

BNE
BNE

MOV
MOV
MOV

+«,TMP LOCATION
«,TM
. LOCATION
P

SWP.LBC

(SP),2(SP)
(5P),CSR.WORD
XC.FLAG,RO

+,TMP LOCATION

»
TMP.LOCATION,

2323

2324

K10
CZQGNACO DEGNA FUNCTIONAL TEST

ZQGNA3

TEST 7 - ETHERNET CARRIER SENSE TEST

v01.0

000064
000066
000072
000076
000102
000104
000106
000112
000116
000120
00122
000124
000126
000130

000132
000134
000140

000142
000146
000152
000156
000160
00162
0C0166
000172
000174
000176

000200
000202
000204
000206
000212
000214
000220
000224
000230
000234
000240
000242
000246
000252
000254
000256
000262
000264
000266
000272
000276
000300
000302
000304
000306
000312

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

001023

005237
012746
012746
010600
104414
012716
012746
010600
104414

BNE
INC
MOV
MOV
MOV

000000G
000000G

000001

TRAP
MOV

0000006
000001

MOV
MOV

104455

001300
0000006
000000G
000425
020027
001024
005037
012746
012746
010600
104414
012716
012746
010600
104414
104455
001301
000000G
0000006
062706
104463
000137
005037
004737
004737
012701
010146
012746
004737
022626
005201
020127
003766

104402
012746
004737
005726
104467
006000
103767
005037
012702

000001

1¢:

MOV
MOV
MOV

TRAP
TRAP

007046

000001

000023
0000006

S$:

6$:

000016
7%:

000200
0000006

SP,RO

TRAP
MOV

JSR
TST

BLO
CLR

MOV

; SP,»
2331

2327
2333

2335
2336

SP,RO

: SP,»

2337

oMSG42,(SP)

2338

JSR
CMP
INC
CMP
BLE

(192

2330

;s SP,»*

ADD
TRAP

MOV
MOV
MOV

Page

;: SP,»

S:.RO
1

MSGOO

JMP
CLR
JSR
JSR

SEQ 0127

2326
2328
2329

1300

. WORD
.WORD

TRAP
ROR

0000006
000024

14
oMSG4A7,(SP)

MSGOO
SRROQSREPORT
$
RO, @1
34
XC.FLAG
#MSG59, -(SP)

TRAP

2s:
3s:

SP,.RO

.WORD

MOV

000001

14
55

MOV

000001

[(MAZURCZYK.DEGNA JZGNA3.BLI;2

XC.FLAG

TRAP
TRAP

BR
CcMP
BNE
CLR
MOV

VAX-11 Bliss-16 v4.0-579

ERRORSREPORT
©6,SP

49%
XC.FLAG
PC,RESET.DEGNA
PC,.PREP.FOR.SETUP
#1,R1

*, INDEX1

INDEX1,+

023, -(SP)
PC,WRT ,STATION.ADR

(SP)+,(SP)+

R1
R1,#16

6¢
2
€200, -(SP)
PC,XMIT,SETUP.PACKET

: INDEX1
:

2354
2357
2354
2357

RO
74

#24 ,R2

2353

INDEX1,#

(SP)«
67

ERR.FLAG

2334
2340
2322
2344
2351
2332
2353
2354

*,INDEX2

2360
2361

L10
CZGNACO DEGNA FUNCTIONAL TEST
TEST 7 - ETHERNET CARRIER SENSE TEST
004737
012701
001410
013700
001403
005066
077003
005301
000767
013700
016066
016637
016600
042700
020027
001003
005037
000404
012737
077243
013701
032737

001002
000137
005701
001032
012737
012746
012746

010600
104414

012716
012746
010600G
104414
012716
012746
010600
104414

8s:

000000G
000144

9¢:

000000G

104:

000232

11$:

000000G
000016

000004

000004
077557

000004

12%:

MOV

000000G

100220

000000G

13%:

000000G
000001 000000G

14%:

000001

005612

000001

15¢:
000000G

000001

MOV
8IC
CMP
BNE
CLR
BR
MOV
S08
MOV
BIT
BNE

PC,SEND.TEST.PACKET
0144 ,R1
124

000001

VAX-11 Bliss-16 v4,0-579
[MAZURCZYK.DEGNAJZQGNA3.BLI;2
5

;

*,88TMP2

L$DLY,RO

;

*,$8TMP1

RO,10¢
R1

;

11%
32(SP)

94
REG.ADR,RO

;

SEQ 0128

Page

(19)

2363
2364

$STMP

$STMP1,»

; $$TMP2

s, TMP.LOCATL.ON

16(R0O),4(SP)

TMP.LOCATICN,

4(SP),CSR.WORD
4(SP),RO
#77557,R0O
RO, #-77560

CSR.WORD,
*

#1,ERR.FLAG

INDEX2,
*

R2,8%
ERR.COUNT,R1
#1,ERR.FLAG

15%
23$

2365
2366

2369
2368
2373
2361
2379
2376

2381

R1
16%
©1,ERR.COUNT

2383
2384

SP,.RO
14
OMSG35,(SP)

SP,RO
14
#MSG36,(SP)

SP,.RO
14
55
1502

o1, -(SP)

104455

001302
000000G
000000G
000471
020127
001032
012737
012746
012746
010600
104414
012716
012746

JSR
MOV
BEQ
MOV
BEQ
CLR
S08
DEC
BR
MOV
MOV

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

SP,»
2385
SP,*

2386
SP,*

2387

MSGOO

000001
000002
000001

000000G
000001

16%:
000000G

ERRORS$REPORT
18%

2382
2389

R1,61

17¢
#2 ,ERR,.COUNT
#MSGS9, -(SP)

SP,RO
14

#MSG37,(SP)

2391
2392
:

SP,»

2393

M10
CZGNACO DEGNA FUNCTIONAL TEST
TEST 7 - ETHERNET CARRIER SENSE TEST

000675
000702
000704
000706
000710
000712
000714
000716
000722
000724
000730
000732
000736
000742
000746
000750
000752
000756
000762

000764
000766
000770
000772
000774
000776
001C20
001004
001006
001012
001016

010600
104414
012716
012746
010600
104414
104455
001303
0000006
000000G
000434
020127
001034
012737
012746
012746
010600
104414
012716
012746
010600
104414
012716
012746
010600
104414
104455
001304
0000006
0000006
062706

000455
020127
001023
005037
012746
012746
010600
104414
012716
012746
010600
104414
104455
001305
0000006
0000006
000425
020127
001024
005037
012746
012746

MOV .
TRAP
MOV
MOV
MOV
TRAP
TRAP

000000G
000001

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579

[MAZURCZYK.DEGNA]ZAGNA3.BLI;2

SP,.RO
14
oMSG38,(SP)

SP.RO

H SPO‘

SEQ 0129
Page
48

(19)

SP.I‘

2394

;

2395

2390

-WORD
000002
000003

000000G
000001

17%:

#3,ERR.COUNT
#MSGS9, -(SP)

0000C0G

000001

2397

2399

2400

SP,RO
14
#MSG39,(SP)

: SP,*

SP,RO
14
#MSG40,(SP)

SP,RO
14
55
1304

H SP.‘

2401
SP,*

2402

2403

2398

MSGOO

000010

18%:

000003

19¢:

00000035
000001
000000G
000001

ERROR$REPORT
#10,SP

224

R1,#3

20%
ERR.COUNT

H
3

2379
2405

2407

#MSG59, -(SP)

2408

SP,RO
14
#MSG41,(SP)

M SP.‘

#1,-(SP)
SP,RO

;

2409

: SP,*»
;

2410

2406

R1,%4
224

;

2412

;

2414

#MSG59, -(SP)
#1,-(SP)

;

2415

MSGOO

000004
000000G
000000G
000001

20%:

ERRORS$REPORT
21$

ERR.COUNT

N10O
CZGNACO DEGNA FUNCTIONAL TEST
TEST 7 - ETHERNET CARRIER SENSE TEST

ZQGNA3

v01.0

001022
001024
001026
001032
0010356
001040
001042
001044
001046
001050
001052
001056
001060
001062
001064
001066
001072
001100
001106
oo1112
001114
001122
001126
001132
001134

001136
001142
001146

001150

001152
001156
001162
001164
001166
001170
001172
C01174
001176
001202
001204
001210
001212
001216
001220
001224
001230
001234
001236
001240
001244
001250

001252
001254

010600
104414
012716
012746
010600
104414
04455
1306
000000G
000000G
062706
104463
000532
005701
001532
013700
016066
016637
020127
001034
012737
012746
012746
010600
104414
012716
012746
010600
104414
012716
012746
010600
104414

MOV
TRAP

000000G
000001

S5-Jul-1984 14:05:07
S-Jul-1984 14:02:06

SP,RO

14
#MSGAS, (SP)

SP,.RO

14
55
1306

VAX-11 Bliss-16 V4.0-579

[MAZURCZYK.DEGNA]ZQGNA3.BLI;2

010600
104414

012716
012746
010600
104414
104455

Page

(19)

; SP,»
2416

;: SP,*
2417

MSGOO

2l1s$:
22%:

23$:

ERRORS$REPORT
#6,SP
63
28$%

2413
2419
2378
2423

294

REG.ADR,RO

000016
000006
000001

*,TMP.LOCATION
TMP.LOCATION,
*

16(R0),6(SP)

000006
©000000G

6(SP),CSR.WORD

R1,01
24
©4 ,ERR.COUNT
#MSGS9, -(SP)

000004
000000G
000000G
000001
000000G
000001

000001

2426

2429

2431
2432

SP,.RO
14
#MSGA3,(SP)

H SP.‘

SP,RO
14
#MSG44, (SP)
€1,-(SP)
SP,RO

2433
SP,»

2434

: SP,.*
2435

104455

001307
000000G
000000G
062706
000460
020127
002426
020127
003023
005037
012746
012746

SEQ 0130

MSGOO
ERROR$REPORT

000010

000002

244:

25%

000003

R1,43

0000006
000000G
000001

#MSG59, -(SP)

000000G
000001

2430
2427
2437

#10,SP
274
R1, %2

25%
ERR.COUNT

#1,-(SP)
SP,RO
14

2439
2440

H SP.‘
2441

#MSG42,(SP)

SP,RO
14
55

i SP.‘
2442

Bl1l
ZQGNAS3

v01.0

CZGNACO DEGNA FUNCTIONAL TEST

TEST 7 - ETHERNET CARRIER SENSE TEST

001272
001274
001300
001304
001310
001312
001314
001320
001324
001326
001330
001332
001334
001336
001340
001344
001346
001352
001356
001362

001364
001366
001372
001376
001402
001404
001410
001416

001424
001426
001434
001442
001444

001450
001452
001456
001462
001464
001466

001472

001500
001504

001510
001514
001516
001520
001522

001524

VAX-11 Bliss-16 v4.0-579

(MAZURCZ
YK .DEQNA JZONAS
. BLI ;2

SEQ 0131
P

(19)

1310

001256
001260
001262

001264
001266

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06
MSGOO

000004

25%:

ERRCR$REPORT
26%

2438
ERREY

274
ERR.COUNT

oMSGS9, -(SP)
01,-(SP)

2447

oMSGA6,(SP)

2443

SP,RO
1a

SP,.RO
14
55
1311

24493

MSGOO

ERRORS$REPORT
06,5SP
63

2445
2451
2425
2455
2456

494
XC.FLAG

SRR.COUNT

INDEX2

R2,TEMPS

INDEX2,
s

PC,RESET.DEGNA

:E.SEND.TESY.PACKEV
000016

000010

000010
000012

000012
000000G

020000

REG.ADR,RO

000200

16(R0),10(SP)

¢, TMP LOCATION
¢, TMP LOCATION

10(SP),12(5P)
12(SP),TEMP2

¢, TMP_LOCATION

000010

INDEX

«
TMP LOCATION,

INDEX,

33%:

000000G
000016
000020
000020
000002

SP.RO
14

H SP.‘

16(R0),20(SP)
20(SP),(SP)

s ¢, TMP_LOCATION

SP,.RO
14
55
1275

: SP,»

REG.ADR,RO

2462

2470

2472
2473

247¢

2475
2480

2483

OMSGS9, -(SP)

000001

2459

2484

oMSG19, -(SP)

2485

MSGOO

TM11

Cll
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 7 - ETHERNET CARRIER SENSE TEST

ZANA3

ve1.0

001526
001530
001534
001536
001542
001544
001546
001552
001560
001566
001570
001576
001604
001606
001612
001614
001620
001624
001626
001630
001634
001642
001646
001652
001656
001660
001662
001664
001666
001670
001672
001676
001700
001704
001726
001712
001714

001720
001722

001726
001730

001732
001734
001740
001746
001750
001756
|001764
001766
001770
001774

001776
002002

0000006
062706 000010
005201
020127 000200
003720
005001
013700 0000006
000016
016066
020000
032766
001007
000016
016666
016637 000020
000440
020127 002000
001031
012746
012746
010600
104414
013700
016066
016616
012746
012746
010600
104414

104455
001276
000000G
000000G
062706

005201
020127
003720
012701
001410
013700
001403
005066
077003
005301
000767
013700
016066

. WORD

34%:

000016
000016

35%:
36%:

000020
000000G

INC
cHP
BLE
CLR
MOV
MOV
BIT
BNE

37s:

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK
.DEQNA JZGNA3S . BLI ;2

ERRORSREPORT
010,5P

INDEX
s
INDEX,
X
INDE

REG.ADR,RO

16(R0),16(SP)

¢,TMP LOCATION
. LOCATION
¢,THP

16(SP),20(SP)
20(SP),TEMP3
39

¢, TMP _LOCATION

020000, 16(SP)
37%

s
INDEX,

R1,02000

000001

000000G
000016
000026

H SP.‘

16(R0),26(SP)
26(SP),(SP)

: «,TMP_LOCATION
: TMP _LOCATION,*

000002

SEQ 0132

Page

(19)

2482
2472
2494

2495

2497
2502

2505

SP,.RO

14
REG.ADR,RO

2506

: SP,s
2507
ERRORSREPORT

010,5P
R1
R1,02000

384:
39%:

40%:

BEQ

INDEX,+

¢,88TMP2

LS$OLY,.RO

¢,88TMPL

434

32(SP)

414:;

RO,41%
R1
403
REG.ADR,RO

424:

43%:

;

$8TMP2

2517

24(SP),26(SP)
26(SP),TEMP4

s, TMP . LOCATION

INDEX2
INDEXZ2,*

454

444
;

MOV
BR
INC

45%:

BGT
JMP
cHP

R2,6200
454

TEMPS, 0200

2515

$sTMP

¢, TMP LOCATION

2504

2494

$STMP1,»

16(R0),24(SP)

BPL

MOV

: INDEX

36%
062,R1

424

100007

016666
016637
000406
005202
020227
003002
000137
023727

ADD

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

»
TMP .LOCATION,

2520
2519
2459

2525

D11
CZQNACO DEGNA FUNCTIONAL TEST

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 7 - ETHERNET CARRIER SENSE TEST

001021

012746
012746
010600
104414
013700

016066
016616
012746
012746
010600

BNE
MOV
MOV
MOV

0000006

000001

TRAP

000000G

000016

MOV
MOV
MOV
MOV
MOV
MOV

000034

000002

TRAP
TRAP

104414

104455

. WORD
.WORD
. WORD

001277

062706
032737
001426
032737
001422
012746
012746
010600
104414
012716
012746
010600
104414

000010

040000

000010G

001000

000010G

46%:

MOV

000001

012746
004737
032737

001021
012716

002262

012746
010600
104414
012716
012746
010600

000006

100220

0000006
000400
000010G
140000

000000G
140000
020000
000000G
037777
000012G
000000G
000001

a7%:

464
oMSGS59, -(SP)

Se
(19)

2528

SP,RO
14
REG.ADR,RO

; SP,e

34(SP),(SP)

SP,RO

: SP,e

16(R0O),34(SP)

oMSG21, -(SP)

¢, TMP_LOCATION

2529

TMP_LOCATION,»

2530
MSGOO

ERRORSREPORT
:;QOOO.XHIY.D.LISTOIO

2527
2534

2537

010,SP

H Spo.

1
oMSG71,(SP)

.WORD
. WORD

MSGOO

MOV
MOV
JSR
8IC
MOV
CLR
JSR
MOV
MOV
JSR
BIT
BNE
MOV
MOV
MOV

©-77560, -(SP)

2536
2546

PC,CHK CSR,.STATUS
9400,XMIT.D.LIST.10
©-40000,(SP)

2547
2548

ADD

TRAP

0000006
000001

[(MAZURCZ
YK .DEGNA JZGNAS.BLI ;2

SEQ 0133

TRAP
MOV
MOV
MOV
TRAP
TRAP

001312

011646
004737
042737
012716
005046
004737
012716

BIT
BEQ
BIT
BEQ

MOV
MOV

000001

104455

062706
012746

ADD

VAX-11 Bliss-16 v4.0-579

MOV
MOV
MOV

SP,.RO

14
S5

2538

: SP,»
2539

1312

ERRORSREPORT
06,5P
(SP),-(SP)

-(SP)

PC,C
, XMIT,STATUS
HK

2549

PC,CHK RCV.STATUS
037777 ,XMIT.D.LIST.12

2551

434
OMSGS9,(S°P)

2554

SP,RO

2555

oMSGS8,(SP)

SP,RO

SP,»

E11

ZGNA3
v01.0
002264

002266

CZGNACO
DEGNA FUNCTIONAL TEST
TEST 7 - ETHERNET CARRIER SENSE TEST
TRAP

104414

104455

TRAP

002276 022625
002300 062706

cMP
ADD

002270
002272
002274

001313
000000G
0000006

002304

104467

002306
002310
002312
002316
002322

484 :

000010

006000
103002
000137 006112°

062706
000207

000034

; Routine Size:

618 words,

000000

004530

; Maximum stack depth per

000000
C00004
000006
000010
000012

004737

2563

1$:

006000
103773

000207

6 words,

Routine Base:

invocation:

2 words

P.:. (19)
53

;

2556

(SP)+,(SP)+
210,SP

:
:

2553
2456

2263

1313
MSGOO
ERRORSREPORT

TRAP

ADD
RTS

034 ,5P
PC

ROR
BHIS
JMP

VAX-11
Bliss-16 v4.,0-579
[MAZURCZYK .DEQGNA JZGNAS .BLI ;2

.WORD
.WORD
.WORD

RO
49
30¢

2557

ABSCODES + 4530

LSBTTL

T7 TEST 7 - ETHERNET CARRIER SENSE TEST

JSR
TRAP
ROR
BLO

PC,$17
66
RO
14

RTS

; Maximum stack depth per
2562

25 words

T7::

104466

; Routine Size:

Routine Base:

invocation:

S-Jul-1984
14:05:07
S-Jul-1984 14:02:06

SEQ 0134

ABSCODES + 7054

2560

F11
S-Jul-1984 14: 05:07

CZQGNACO DEGNA FUNCTIONAL TEST

5-Jul-1984 14: 02:06

TEST 8 - STATION ADDRESS RAM TEST

VAX-11 Bliss-16 v4.0-579

[MAZURCZ
YK .DEQNA ]ZQNA3S .BLI ;2

fe0

STATION ADDRESS RAM TEST

TEST 8:
DESCRIPTION:

This test verifies that Station Address RAM has no static faults.
The host writes and then reads data patterns to all of the

addressable RAM ( 128 decimal bytes ). The data is checked to see
that the deata pattern received is the same as the data pattern

transmited.

This test continues until all the data patterns are

exhausted. If the operator specifies loop on error, the program
re-executes the code that detected the error until tC is entered.
The following BINARY patterns are used:

el e

e P

et e et e

#SBTTL *TEST 8 - STATION ADDRESS RAM TEST'

et e

11111111
10101010
11001100
11110000

00000000
01010101
00110011
00001111

Hardware tested:

marching 1's, propagating 1's through the RAM
marching 0's, propagating 0's through the RAM
interface

e P

CSR register - Receiver Enable (bit 0)

Portion of Receive and Transmit FIFO

Processing:

BEGIN

reset device

select Setup mode

REPEAT for each pattern

load transmit packet with data pattern
transmit loopback packet (fill all of the RAM)

et P

e P

b e P

Station Address RAM

Q-Bus to QTDC

receive packet

Pt et P

check for expected loopback status

Bt P

2607
2608
2609

e P

et e

IF error

END

THEN
print error message
IF
END
call compare_packets
ENDREPEAT

if not

inhibited

SEQ 0135

Page

5S4

(20)

ZQGNA3
v01.0

CZQNACO DEGNA FUNCTIONAL TEST
TEST 8 - STATION ADDRESS RAM TEST

B
:

2610
2611

3
3

2613

2615

261;

261

B
:

2620
2621

2612

2614

2616

RESET_DEGNA ( );

DECR INDEX1 FRUM 7 T0 O DO

2622

2624

INCR INDEX2 FROM O TO 127 DO
XMIT_BUFFER [

.INDEX2 ] = .PTRN_TABLE [

XMIT_SETUP_PACKET ( N_MODE );
ENDSUB;

END;

TEMP3 = ( N_MODE = 8 ) - 1;

2626

2628

P2 = _INDEX1;

:
:
3
:

2630
2631
2632
2633

3
3
3
3

!
!
!
!

P1 = N_MODE;
XMIT_SETUP_ PACKET « )

2625

2627

2629

2634

:
s
3

2635
2636
2637

2639

3
:
:

2641
2642
2643

2646

3
3
3

2638

2640

2644
2645

4
6

3
s

2647
2648

4
4

gggg

3
H

3
:
3
3
3
3

2649

2652
2653
2654
2655
2656
2657

000000

000004

INCR INDEX1 FROM O TO TEHPS 00

BEGIN

P1 = ZERO;

WALKING_BIT ( );

INCR INDEX FROM O TO .P3 DO
XMIT BUFFER [ .INDEX ) = ( - .XMIT_BUFFER [ .INDEX ] ) - 1;
P1 = N_MODE;
XMIT_SETUP_ PACKEY ( );

!
!
H

END;

INCR INDEX1 FROM O TO N_MODE - 1 DO
BEGIN

4
4
4

INCR INDEX FROM O TO N_MODE - 1 DO
XMIT_BUFFER [ .INDEX ] = ZERO;
XMIT BUFFER [
.INDEX1 ] = #X'FF’';

BGNSUB;

XMIT_SETUP_PACKET ( N_MODE );

ENDSUB;

INCR INDEX FROM O TO .P3 DO

6
6
4
4
3
1

BGNSUB;
XMIT_SETUP_PACKET ( N_MODE );
ENDSUB
;

ENDTST;

004137

000000G

004737

.INDEX1 );

BGNSUB;

6
4

2623

(21)

BEGIN

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK
.DEQNA JZGNAS.BLI ;2

BGNTST;

2619

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

SEQ 0136

XMIT BUFFER [ .INDEX ) = ( - .XMIT_BUFFER [ .INDEX ] ) - 1;

000000G

END;

$78:

LSBTTL
JSR

JSR

$78 TEST 8 - STATION ADDRESS RAM TEST
R1,$SAVE3
H

PC,RESET,.DEQNA

2561
2612

H11
ZGNA3
v01.0

CZGNACO DEGNA FUNCTIONAL TEST
TEST 8 - STATION ADDRESS RAM TEST

000010 012701 000007
000014 005000
000016

000024

000026
000032
000034
00036
000042

116160

000000G 000000G

020027
003771
104402
012746
004737

000177

005200

000046 005726

000050
000052
000054

104467
006000
103767

000060
000062
000064
000066
000072
000074
000100

002355
005001
005000
105060
005200
020027
003772

000110
000112
000116

104402
012746
004737

000124

104467

18:

2s:
3s:

000200
000000G

000122

112761

005726

000126
000130

006000
103767

000142
000144
000150
000152

005003
156003
160302
110260

000160
000164

020C37
003764

000132
000134
000136

000156

000166
000170
000174

000200
000202
000204
000206

000210
000212

000216

000220

005000
000411
012702

005200
104402
012746
004737

005726
104467

020127

003722

[

000000G
000177

000377

000000G

6$:

000200
000000G

7%:

000000G
000000G
000000G

8s:

9s:

000200

000000G

73 words,

2617

(SP)e

2620

INDEX1
INDEX
*(INDEX)
TNDEX
INDEX,s

2639
2641
2642
2641

TRAP
MOV
JSR

2
€200, -(SP)
PC,.XMIT.SETUP.PACKET

; #,+(INDEX1)

2643

[}

2646

TRAP

2643

CLR
B8R
MOV

RO
8$
e-1,R2

s INDEX

2649

2650

MOVB

CLR
8ISB
SuB
MOVB

INC

cMP
BLE

TRAP
MOV

0377,XMIT .BUFFER(R1)
(SP)e«

RO
6%

R3
XMIT.BUFFER(RO),R3
R3,R2
R2,XMIT .BUFFER(RO)

2646

: *(INDEX),*
;s

¢,+(INDEX)

s INDEX

2649

e
©200,-(SP)

:
3

2650
2653

(SP).
67

H
:

2650
2653

;s INDEX1

2639

2561

RO,P3
74

: INDEX,*

JSR

PC,.XMIT.SETUP
. PACKET

ROR
BLO

RO
9

BLE

6 words

2617
2620

s
s
s
s+
s

cvP

Routine Base:

H
B

;s INDEX2,#

2614

INC

invocation:

2614
2616
2617
2616

s INDEX1

RTS

Maximum stack depth per

; *,INDEX1
s INDEX2
; o(INDEX1),+(INDEX2)
s+ INDEX2

1
R1
RO
XMIT.BUFFER(RO)
RO
RO,0177
S

TST
TRAP

000177

56
(21)

BGt
CLR
CLR
CLRB
INC
cMP
BLE

ROR
BLO

177777

RO,0177
2$
2
0200, -(SP)
. PACKET
PC,XMIT.SETUP

Page

67
RO
3

TST

000207

; Routine Size:
;

4%
Ss:

07,.R1
R0
PTRN.TABLE(R1),XMIT.BUFFER(RO)
RO

VAX-11 Bliss-16 v4.0-579
[MAZURCZYK .DEGNA )ZGNA3 .BLI;2

TRAP
ROR
BLO

DEC

006000
103767

005201

cMP
BLE
TRAP
MOV
JSR

000056 005301

000102

MOV
CLR
rove
INC

S-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

SEQ 0137

R1,0177

: INDEX1,+

ABSCODES$ + 7070

T11

I11
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 8 - STATION ADDRESS RAM TEST

ZQGNA3
v01.0

000000
000000
00004
000006
000010
000012
:

004737

18::
1%:

007070’

104466

Routine Size:

Routine Base:

: Maximum stack depth per invocation:
;

<2658

JSR
TRAP

PC,$78
66
RC
14
PC

RTS

6 words,

2 words

(MAZURCZYK.DEQNA]JZGNA3.BLI;2

T8 TEST 8 - STATION ADDRESS RAM TEST

BLO

103773
000207

Vri-11 Bliss-16 v4.0-579

.SBTTL

ROR

006000

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

ABSCODES

+ 7312

SEQ 0138
Page
S7

(21)

2656

J11
CZQNACO DEGNA FUNCTIONAL TEST
TEST 9 - PROMISCUOUS STATION ADDRESS TEST

ZQGNA3Z

2691

2692
2693
2694
2695
2696
2697
2698
2699

2700

2701
2702
2703

(MAZURCZYK.DEQNA]ZGNA3.BLI;2

TEST 9:

PROMISCUOUS STATION ADDRESS TEST

DESCRIPTION:

This test verifies that DEGNA promiscuous addressing mode functions
as specified. Bit patterns and addresses in and out of the range of
setup addresses are used to assure that there is true promiscuity.
If the operator specifies loop on error, the program re-e-ecutes the
code that detected the error until tC is entered

b
e

b e e e o et e

Pt e o

e et

Herdware tested:

Promiscuous addressing mode logic

Set of Target Addresses in HEXADECIMAL:
00-00-00-00-00-00

AA-AA-AA-AA-AA-AA

55-55-55-55-55-55

FF-FF -FF-FF -FF -FF

Walking 1,
Walking O,

shifting 1 across the Target Station Address
shifting O across the Target Station Address

e
b e
d e e el

2669
2670
2671
2672
2673
2674
2675
2676
2677
2678
2679
2680
2681
2682
2683
2684
2685
2686
2687
2688
26895
2690

et et bh

2667
2668

5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579

#SBTTL 'TEST 9 - PROMISCUOUS STATION ADDRESS TEST’

b P

2659
2660
2661
2662
2663
2664
2665

Pt et e e et e e et ek e

v01.0

5-Jul-1984 14:05:07

Processing:

BEGIN

reset device

select internal loopback mode
set mode to Setup
set 'promiscuous’ addressing mode bit
REPEAT for each Target Address

load Target Address cof the packet
disable receiver
transmit loopback packet
enable receiver
check for expected loopback status
IF error

THEN

print error message
ENDIF
call compare_packets
ENDREPEAT
END

if not

inhibited

SEQ 0139

Page

58
(22)

K11
ZQNA3
vO01.0
.

CZGNACO DEQNA FUNCTIONAL TEST
TEST 9 - PROMISCUOUS STATION ADDRESS TEST

2704

2705

2707

2709
2710

3
3

'--

:
:

:
:
:
:

2706

2708

2711
2712
2713

2714

RESET_DEGNA ( );
PREP_FOR_SETUP ( ):
INCR INDEX1 FROM 1 TO 14 DO
WRT_STATION_ADR (

2717

BGNSUB;

2718

ENDSUB;

2;21

2724

3
3
g

RBUF _LENGTH = 6;

INCR INDEX1 FROM O TO 99 DO

:
:

2719
2720

2722
2723

g;gg

2727

:
3
:
3
:
3
:
3
:

:
:

3
3

4
4
4

2728
2729
2730
2731
2732
2733
2734
2735
2736
2739

2744

2748

2742
2743

3
3
3

2749

000000
000002
000006
000012

3
1

(10146
004737
004737
012701

.RBUF_LENGTH t -1 );

BEGIN
SELECTONE .INDEX1 OF
SET

1]:

[

0OTO3

[

4 T051 ):

[ S2 TO 99 ]:
TES;

WRT_STATION_ADR ( ZERO,

.INDEX1 );

WALKING_BIT ( ZERO,

.INDEX1 - 4, S );

WALKING_BIT ( ONE,

.INDEX1 - S2, S );

WRT_STATION_ADR ( ZERO, ZERO );
BGNSUB;

2745
2746
2747

);

NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY

XBUF _LENGTH = - (

4
6

1--

a4
4

2740
2741

:
:
:

fee

H
s

:
3

XMIT_SETUP_PACKET ( P_MODE

4
a4
4
4
4

2737
2738

59
(23)

.INDEX1, PHA_INDEX );

2715

2716

Page

TESTS IN EXTERNAL LOOPBACK MODE.

SEQ 0140

RESET DEGNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING

3
3
3

3
3

VAX-11 Bliss-16 V4.,0-579
[MAZURCZYK.DEQGNA )ZQNA3.BLI;2

BGNTST;

;

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

XMIT_ILOOP_PACKET ( ZERO );
ENDSUB;

END;
INCR INDEX FROM O TO S DO

ENDTST;

000000G
000000G
000001

TARGET_ADR [

.INDEX ] = ZERO;

$79:;

LSBTTL

MOV
JSR
JSR
MOV

$T9 TEST 9 - PROMISCUOUS STATION ADDRESS TEST

R1,-(SP)
PC,RESET.DEQGNA
PC,PREP.FOR,SETUP
#1,R1

:
:
:
: +,INDEX1

2657
2711
2712
2713

L11
CZQGNACO DEGNA FUNCTIONAL TEST

TEST 9 - PROMISCUOUS STATION ADDRESS TEST

010146
012746
004737
022626
005201
020127
003766
104402
012746
004737
005726
104467
006000
103767
012737
012700

14:

000023
000000G
000016
2%:

000202
000000G

000170
000172
000176
000200
000204
000206
000212
000216
000222
000226
000230
000232
000236
000240
000242

020127
003006
005046
010146
004737
022626
000434
020127
002410
020127
003005
005046
010146
162716
000413
020127
002416
020127
003013
012746
010146
162716
012746
004737
062706
005046
005046
004737
104402
005016
004737

TRAP
MOV

JSR

TST
TRAP

ROR

000006

BLO
MOV
MOV

000000G

006200

005490
010037
005001
005701
002411

MOV
MOV
JSR
CMP
INC
CMP
BLE

3s:

000004

4s:

INDEZ1,#

IPOEXI.‘

SEQ 0141

(23)

2714

2713

2714
2717

(SP)+

2714
2717

2%
6 ,RBUF .LENGTH
6 ,RO

2724
2725

R1
R1
4%
R1,03
4%

[MAZURCZYK
.DEQGNA JZGNA3 . BLI ;2

2
9202, -(SP)
PC,XMIT,.SETUP.PACKET

CLR

TST
BLY

VAX-11 Bliss-16 v4.0-579

;s INDEX1

R1
R1,016
14

RO
RO

CMP
BGT
CLR
MOV
JSR
CMP

000003

023, -(SP)
PC,WRT,STATION.ADR

ASR

NEG
MOV

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

RO, XBUF .LENGTH

: INDEX1
s INDEX1

-(SP)

R1,-(SP)
PC,WRT ,STATION.ADR

: INDEX1,s

(SP)+,(SP)+

INDEX1,+

2727
2731

2732

2729
2733

: INDEX1,*
2734

:
000064

INDEX1,#*

: INDEX1,#*

S$:

INDEX1,+

2735

2736

000005

6%:
7%:

8%:

000000G

PC,WALKING.BIT

#6,SP
-(SP)
-(SP)

2739

(SP)

2742

PC,WRT.STATION.ADR
2
PC,XMIT.ILOOP.PACKET

M11
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 9 - PROMISCUOUS STATION ADDRESS TEST
TRAP
ROR

104467

006000
103771
022626
005201
020127
003711
005000
105060
005200
020027
003772
012€.01
006207
: Routine Size:

000010
000012

004737

000005

MOV
RTS

[MAZURCZYK
.DEQGNA JZGNAS .BLI;2

SEQ 0142

Page

(23)

67
RO

8¢
(SP)+,(SP)+
R1
R1,#143
3
RO
TARGET.ADR(RO)
RO
RO, &5
94

; INDEX1

2728
2727

:+ INDEX
: *(INDEX)
: INDEX

2747
2748
2747

INDEX,*

(SP)+,R1
PC

2657

AB$CODES + 7326
100 words,
Routine Base:
invocation:
S words

007326

104466
006000
103773

000207

;: Routine Size:

000000G

94:

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

Maximum stack depth per

000000
000000
000004
000006

;

000143

BLO
cMP
INC
CMP
BLE
CLR
CLRB
INC
CMP
BLE

S-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

Maximum stack

2750

6 words,
depth per

T9::
1¢:

.SBTTL

T9 TEST 9 - PROMISCUOUS STATION ADDRESS TEST

JSR

PC,$79

TRAP
ROR
BLO
RTS

AB$CODES$
Routine Base:
2 words
invocation:

66
RO
1%
PC

+ 7636

278

N1l
CZAGNACO DEQGNA FUNCTIONAL TEST
TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST

ZQANA3

v01.0

s
b
b s b
b

This test verifies that link memory (receive FIFO and transmit
buffer) has no static faults. The host writes and then reads
a sequence of data patterns to the link memory. The data is then
checked to see that the data pattern received is the same as the
data pattern transmitted. This test continues until all the data
patterns are exhausted. If the operator specifies loop on error, the
prog::: re-executes the code that detected the error until tC

b et s

DESCRTPTION:

ente

Transmit buffer address logic
Transmit buffer memory
( first 1512 bytes )

Hardware tested:

11111111
10101010
11001100
11110000

b (b (b (b (b

00000000
01010101
00110011
00001111

Processing:

BEGIN
reset device

select
REPEAT

internal/extended loopback mode

for each pattern

write link memory with pattern - transmit loopback packet
read link memory with pattern - receive loopback packet
check for expected loopback status

b (e (s

b e (b (b e

ogic
first 1512 bytes )

The following BINARY patterns are used:

b (b

b (et

Receive FIFO address
Receive FIFO memory (

IF error

THEN

b et (b

2768
2769
2770
2771
2772
2773
2774
2775
2776
2777
2778
2779
2780
2781
2782
2783
2784
2785
2786
2787
2788
2789
2790
2791
2792
2793
2794
2795

(MAZURCZYK.DEGNAJZGNA3.BLI;2

TRANSMIT AND RECEIVE FIFO MEMORY TEST

TEST 10:

SVEE
2767

5-Jul-1984 14:02:06

Tee

2764
2765

VAX-11 Bliss-16 v4,0-579

#SBTTL ‘TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST'

ot e

2751
2752
2753
2754
2755
2756
2757
2758
2759
2760
2761
2762
2763

5-Jul-1984 14:05:07

END

print error message
ENDIF
call compare_packets
ENDREPEAT

if not

inhibited

SEQ 014 3

Page

62
(24)

2825
2827
2828
2829
2830
2831
2832
2833
2834
2835

2836
2837
2838
2839
2840
2841
2842
2843
2844

2845
2846
2847
2848

NHNANNNNNANNANNNNND
DO
LDDLLDEDBBBVNUVIUNIG BB B B 00080808

S-Jul-1
S-Jul-1

CZGNACO DEGMA FUNCTIONAL TEST
TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST

§s

Bl2

BGNTST;

LOOPBACK 1514 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY
RBUF _LENGTH = LONGEST_PACKET;
XBUF _LENGTH = - ( .RBUF_LENGTH * -1 );

INCR INDEX FROM O TO 7 DO
BEGIN

RESET_DEGNAR (
TEMP1 = O;

);

INCR INDEX1 FROM O TO 189 DO
I!{.:GE!G?OEX? FROM 0 TO 7 DO
N

XMIT BUFFER [

E";EPP[ =

TEMPL

.TEMPL1 ] = _PTRN_TABLE [
+

.INDEX2 );

ROTATE PATTERN TABLE

TEMP2 =

_PTRN_TABLE [ 0 J;

INCR INDEX3 FROM O TO 6 DO
PTRN_TABLE [ .INDEX3 ) = .PTRN_TABLE [

PTRN_TABLE [

7 ] =

.TEMP2;

.INDEX3 « 1

);

BGNSUB;
SET_RDESCR_LIST (

.XBUF _LENGTH, VE );
SET_XDESCR_LIST ( .XBUF _LENGTH, VE );
SEND_ELOOP_PACKET ( ZERO );
COMPARE _PACKETS ( );

ENDSUB;
END;

INE:G:{NM)EH FROM O TO LONGEST_PACKET - 1 DO
INCR INDEX FROM O TO LONGEST_PACKET - 1 DO

XMIT_BUFFER [ .INDEX ) = ZERO;
XMIT BUFFER [
.INDEXi 1 = #X'FF';

BGNSUB ;
SET_RDESCR_LIST ( .XBUF LENGTH,
SET_XDESCR_LIST ( .XBUF LENGTH,
SEND_ELOOP_PACKET ( ZERO );
COMPARE _PACKETS ( );
ENDSUB;

INCR INDEX FROM O TO .P3 DO
XMIT BUFFER [ .INDEX ] = (

VE
VE

);
);

XMIT _BUFFER [

.INDEX

C12

]

)

‘

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK
.DEQNA JZQNAS . BLI; 2

Cle
CZQGNACO DEGNA FUNCTIONAL TEST

ZQGNA3

TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST

010037
012703
004737
005037

012702
005000

END;

ENDTST;

000000G
002752 0000006
002752

$710:

$T10 TEST 10 R1,$SAVE3

TRANSMIT AND RECEIVE FIFO MEMORY TEST

02752,R0

000010

TEMP1

000276

9276,R2

RO
TEMP]1,R1
PTRN.TABLE(RO),XMIT .BUFFER(R1)
TEMP]

PTRN, TABLE, TEMP2
RO

113737

4%:

0000076

2749
2802
2803

02752
,RBUF .LENGTH

RO
RO
RO, XBUF .LENGTH
010,R3
PC,RESET.DEGNA

020027
003765
077215
005037

116060
005200
020027
003771
113737
104402
013746
012746
004737
013716
012746
004737
005016
004737
004737
062706
104467
006000

(MAZURCZ
YK .DEGNA JZONA3 .BLI ;2

COMPARE _PACKETS ( )

013701
116061
005237
005200

000112
000114
000122
000124
000130
000132
000140
000142
000146
000152
000156
000162
000166
000172
000174
000200
000204
000210
000212

VAX-11 Bliss-16 v4.0-579

ENDSUB ;

004137
012737
012700
006200

5-Jul-1984 14:02:06

BGNSUB ;
SET_RDESCR_LIST € . XBUF _LENGTH, VE );
SET_XDESCR_LIST ( . XBUF LENGTH, VE );
SEND_ELOOP_PACKET ( ZERO );

2849
2850
2851
2852
2853
2854
2855
2856
2857
2858
2859

HEUWWWNENWHENWNWN®W

v01.0

S-Jul-1984 14:05:07

:;flN.YABLEoz(RO).PTRN.TABLE(RO)

10,0
S$:

¢, INDEX

s, INDEX1
INDEX2
+«(INDEX2),»
INDE X2
INDEX2,
»

2805
2807
2808
2809
2810
2812

2813
2310

INDEX1,»

2809
2820

INDEX3
¢(INDEX3),«( INDEX3)
INDEX3
»
INDEX3,

2821
2822
2821

TEMP2 ,PTRN, TABLE+7
2
XBUF .LENGTH, -(SP)
©-60000, -(SP)
PC,SET.RDESCR.LIST
XBUF .LENGTH
(SP)
,
©-60000, -(SP)

2823

(SP)
PC,SEND.ELOOP.PACKET

2828

PC,SET
. XDESCR.LIST

PC,COMPARE .PACKETS

06,5P
67

2L B

2826

2827

2829
2823
2829

D12
CZQGNACO DEGNA FUNCTIONAL TEST

ZGNA3

TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST

v01.0

000214
000216

000220

BLO
S08

103751
077373

RTS

000207

S$
R3,1$
PC

S-Jul-1984 14:05:07
5-Jul 1984 14:02:06

VAX-11 Bliss-16 v4.0-579

[(MAZURCZ
YK .DEGNA ) ZQNAS .BLI ;2
s+

INDEX,»

SEQ 0146

(25)
2805
2749

;: Routine Size:
73 words,
Routine Base: ABSCODES + 7652
: Maximum stack depth per invocation: 8 words

000000
000000

000004
000006

000010
000012

004737

T10::
18:

007652

104466
006000

6 words,

Routine Base:

: Maximum stack depth per invocation:
2860

T10 TEST 10 - TRANSMIT AND RECEIVE FIFO MEMORY TEST

JSR

PC,$T10

TRAP
ROR
BLO
RTS

103773
000207

;: Routine Size:

.SBTTL

2 words

66
RO
18
PC

ABSCODES + 10074

2832

El2
CZQNACO DEGNA FUNCTIONAL TEST

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 11 - PACKET LENGTH TEST

VAX-11 Bliss-16 v4.0-579
[MAZURCZYK.DEQGNAJZGNA3
.BLI;2

PACKET LENGTH TEST

TEST 11:
DESCRIPTION:

This test verifies that DEGNA can transmit and receive variable

length packets ( equal to or greater than 60 bytes =and equal to or
less than 1514 b¥tes without the CRC ) without losing any data

in the process.
This test also verifies that the 9th bit of the
FIFO memory
is not static (stuck at 1/stuck at 0). If the onerator

specifies loop on error, the program re-executes the code that
detected the error until tC is entered.
Hardware tested:

Transmit and Receive RAM

Processing:

BEGIN

reset device

select internal/extended loopback mode
set down_count to max. packet length
set up_count to min, packet length

length

b e el e

IF error

THEN

ot o

print error message
ENDIF
call compare_packets

if not

inhibited

b o

transmit loopback packet (packet length = up_count)
check for expected loopback status and pecket length
IF error

THEN

print error message if not inhibited

ENDIF
call compare_packets
decrement down_count by 2

ot (o

2901
2902
2903
2904

packet

transmit loopback packet (packet length = down_count)
check for expected loopback status and packet length

increment up_count by 2

2889
2890
2891
2892
2893
2894
2895
2896
2897
2898
2899

2887

REPEAT until down_count = min,

END

ENDREPEAT

2885

e e e

e P

o P

e e e

e Pt h P

e P

e et

#SBTTL *TEST 11 - PACKET LENGTH TEST'

SEQ 0147

F12
CZQGNACO DEGNA FUNCTIONAL TEST

5-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

2922
2923
2924
2925
2926
2927
2928
2929
2930
2931
2932
2933
2934

2935

2936
2937
2938
2939
2940
2941
2942
2943
2944
2945
2946
2947
2948
2949
2950
2951

000000
000004
000010

HFWAELOGCOOO_A_AVUVILILIUVIUILILIVAVIVIVIVIVIVIVIVIVIVID
D DD UWWWHWWUWWWWGBW

TEST 11 - PACKET LENGTH TEST

004137
005037
012737

VAX-11 Bliss-16 v4,0-579

[MAZURCZYK .DEQGNAJZGNA3 .BLI ;2

SEQ 0148

Page

27)

BGNTST;

..LOOPBACK PACKETS OF INCREASING AND DECREASING LENGTH THEN CHECK IF PROPERLY
RECEIVED

= ZERO;
COUNTER
= SHORTEST_PACKET;
UP_COUNTER
DOWN_COUNTER = LONGEST_PACKET;

INCR INDEX1 FROM SHORTEST_PACKET TO MAX_LENGTH BY STEP1 DO
BEGIN

RESET_DEGNA ( );
IF .COUNTER EQLU ZERO
THEN

BEGIN

RBUF _LENGTH = _UP_COUNTER;
XBUF _LENGTH = - ( .RBUF_LENGTH t -1 );
INCR INDEX FROM O TO .UP_COUNTER - 1 DO
XMIT_BUFFER [

.INDEX ] =

XMIT_BUFFER [

.INDEX

_INDEX;

INCR INDEX FROM .UP_COUNTER TO MAX_LENGTH - 1 DO
] = ZERO;

UP_COUNTER = .UP_COUNTER + STEP1;
COUNTER = ONE;

END
ELSE
BEGIN
RBUF _LENGTH =

.DOWN_COUNTER;
XBUF _LENGTH = - ( .RBUF _LENGTH t -1 );
INCR INDEX FROM O TO .DOWN_ COUNTER
- 100
XMIT_BUFFER [

JINDEX

) =

.INDEX

XMIT_BUFFER [

.INDEX ) = ZERO;

INCR INDEX FROM .DOWN_COUNTER TO HAX _LENGTH - 1 DO
DOWN_COUNTER = .DOWN_COUNTER - STEP1;

ENSOUNTER = ZERO;
B

BGNSUB ;

SET_RDESCR_LIST ( .XBUF _LENGTH, VE );
SET_XDESCR_LIS. ( .XBUF _LENGTH, VE );
SEND_ELOOP_PACKET ( ZERO );

COMPARE _PACKETS (
ENDSUB
;

);

END;
ENDTST;

0000006
000000G
000074 000000G

$T11:

LSBTTL

JSR
CLR
MOV

$T11 TEST 11 - PACKET LENGTH TEST

R1,$SAVEZ2
COUNTER
#74 ,UP ,COUNTER

"l B

:
:
:

2859
2912
2913

G1l2
CZQNACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 11 - PACKET LENGTH TEST

012737
012702
004737
005737

001032
013700
010037
005001
000403
110161
005201
020100
002773
005300
000074
000100
000102

000110

002752

000074
000000G
000000G

.DEQNA JZGNA3.BLI
ZYK
( MAZURC
;2

«, INDEX1

UP . COUNTER,RO
RO,RBUF ,LENGTH

2924

2s:

3s:

R1.RO

INDEX,
«( INDEX)
INDEX
INDEX,

2925
2924

-1
:gIY.BUFFER(RO)

S$:

RO, 02775

2926

«( INDEX)
INDEX
»
INDEX,

02,UP ,COUNTER
21,COUNTER
114

RO,RBUF .LENGTH
R1

8¢

7%:

:i.XHIT.BUFFER(R1)

8s:

R1,RO
7%
RO

:gIT.BUFFER(RO)
RO, 82775
94

R
WN
. COUNTE
02 ,D0

000002

COUNTER

RBUF .LENGTH,RO

11%:

RO
RO
RO, XBUF .LENGTH

12%:

000000G
120000

ADD

INDEX,
«( INCEX)
INDEX
INDEX,

2936
2935

+«(INDEX)
INDEX
»
INDEX,

2938
2937

2939
2940
2923

2941

XBUF .LENGTH,
(SP)

2945

(SP)

2946

©-60000, -(SP)
PC,SET.XDESCR.LIST

000000G

2935

2
XBUF .LENGTH, -(SP)

©-60000, -(SP)
PC,SET.RDESCR.LIST

120000

INDEX

2937

10¢

10%:

2927
2926
2928
2929
2919
2933

DOWN.COUNTER,RO

9s:

002775

2914

2916
2918
2919

INDEX

6$:

002773

(27)

3
gi.XHIY.BUFFER(Rl)

000002
000001

005001
000403
110161
005201
020100

age

4%:

002775

SEOP0149 ot

2922

010037

005300
000402
105060
005200
020027
003772
162737
005037
013700
006200
005400
010037
104402
v13746
012746
004737
013716
012746
004737
005016
004737
004737
062706

PC,.RESET .DEGNA
COUNTER

14:

000000G
000000G

000402

105060
005200
020027
003772
062737
012737
000430
013700

02752 ,00WN.COUNTER
074 ,R2

v AX-11 Bliss-16 v4.0-579

PC,SEND.ELOOP,PACKET
PC,COMPARE .PACKETS
©6,5P

1 N

29443

2947
2941

H12
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 11 - PACKET LENGTH TEST
104467

006000

103751
062702
020227
003647
000207

;: Routine Size:

000000
000000
000004
000006
000010
000012
;

;

004737
104466

103773
000207

Maximum stack

2952

7 words

Ti1::

1$:

Page

(27)

2947

ADD
cMP

02,.R2
R2,02776

s ¢,INDEX1
H IM)EXI.‘

2916

RTS

2859

2950

124

ABSCODES$ + 10110

LSBTTL

T11 TEST 11 - PACKET LENGTH TEST

JSR
TRAP

PC,$T11
66
RO
18

RTS

6 words,
depth per

[MAZURCZ YK .DEQGNA )ZGNAS .BLI ;2

SEQ 0150

67
RO

ROR
8LO

006000

Routine Size:

Routine Base:

invocation:

VAX-11 Bliss-16 v4,0-579

TRAP
ROR

BLE

102 words,

010110

S5-Jul-1984 14:02:06

BLO

000002
002776

: Maximum stack depth per

5-Jul-1984 14:05:07

Routine Bese:
ABSCODES$ + 10424
invocation:
2 words

112
CZGNACO DEGNA FUNCTIONAL TEST
TEST 12 - NXM INTERRUPT TEST

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.,0-579
(MAZURCZYK.DEQGNA JZQNA3.BLI;2

#SBTTL *TEST 12 - NXM INTERRUPT TEST'
TEST 12:

NXM INTERRUPT TEST

DESCRIPTION:

This test verifies that Transmit and Receive List Invalid bits

(CSR bits 4 and S) can be set and reset as specified and that both,

Transmit and Receive Descriptor List addresses in the 1/0 page have

to be valid to succesfully loopback a packet.

After a software reset Transmit and Receive List Invalid bits are

checked for their initial condition state (both set). Then these bits
are cleared by writing Transmit and Receive Descriptor List addresses
into Transmit and Receive Buffer Descriptor Registers.

First, valid loopback packet is sent to verify that WT properly

transmits and receives loopback packets. Then, a Non-Existant

Memory
Access ( NI ) bit
loopback packet is sent.

is forced to " 1 " each time an invalid

If the operator specifies loop on error, the program re-executes the
code that detected the error until tC is entered.
Hardware tested:

Q-Bus to QTDC

interface
- Valid and invalid host memory
address processing
NXM access (bit 2)
CSR register
Interrupt Enable (bit 6)
XMIT List Invalid (b't 4)
RCV
List Invalid (bit S5)

Use following Descriptor List and buffer addresses:
TRANSMIT

RECEIVE

sassssss

sessaes

DESCR LIST ADR

BUFFER ADR

DESCR LIST ADR

BUFFER ADR

d et o

b e

ot ot e P

e o

o |

i o

e e e

i o

e o

Yoo

VALID
INVALID
VALID
VALID
VALID

VALID
DON'T CARE
INVALID
VALID
VALID

VALID
DON'T CARE
DON'T CARE
INVALID
VALID

VALID
DON'T CARE
DON'T CARE
DON'T CARE
INVALID

SEQ 0151
Page

(28)

J12
CZGNACO DEGNA FUNCTIONAL TEST

ZQGNA3

TEST 12 - NXM INTERRUPT TEST

b
e
e

IF XMIT and RCV List Invalid bits not = 1

o
o

e o

e e

print error message if not inhibited
ENDIF
enable Jevice interrupt (set CSR bit 6)
transmit valid loopback packet
check for expected locpback status
IF error
THEN

print error message

if not

inhibited

i o

ENDIF
call compare_pockets
REPEAT for each set of addresses in the set
transmit inva.id loopback packet

ot o

IF NXM
THEN

b fud o

30.0
3021
3022
3023
3024
3025
3026
3027
3028
3029
3030
3031
3032
3033
3034

)

THEN

3017
3018
30°9

internal loopback mode

interrupt

read CSR

b e o

3013

3014
3015
3016

select

3011
3012

BEGIN
reset device ( disables device

END

interrupt didn't occured

print error message if not inhibited
ENDIF
check for expected loopback status
IF error
THEN
print error message if not inhibited
ENDIF
ENDREPEAT

3007
3008
3009
3010

Processing:

b o

3005

v01.0

3002
3003

S5-Jul-1984 14:05:07
S-Jul-1984 14:02:06

W\Z1
TM

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK.DEGNA
JZGNA3 .BLI ;2

SEQ 0152

Page

(29

K12
CZGNACO DEGNA FUNCTIONAL TEST

ZQANA3

TEST 12 - NXM INTERRUPT TEST

NN N NN NN
NN NN N AV
W N
NN
OTVTNTVTNTHI NN
OO
N OV

CL T NT
)

S0
9
B8
S0
W6
B0
G
B8
G0
S
S0
SF
G0
SF
G0
S8
G
G0
S0
B
B0
S0
G0
G0
B0
G0
S8
B
G5
S8
G0
B8
S8
S8
B
B8
S8
G0
B8
G

RESET_DEGNA (

);

PREP_FOR_SETUP (

);

INCR INDEX FROM 1 TO 14 DO
WRT_STATION_ADR ( .INDEX, PHA_INDEX );

BGNSUB
;

XMIT_SETUP_PACKET ( N_MODE

ENDSUB;

RBUF _LENGTH = 6;

XBUF _LENGTH =

- (

);

.RBUF_LENGTH t

-1

);

CLR_BUFFERS ( B_SIZE );
ERR_NUMBER = ZERO;

..LOOPBACK A PACKET, VALID DESCRIPTORS AND BUFFER ADDRESSES, THEN CHECK IF
LOOPBACK PACKET WAS PROPERLY RECEIVED AND NI BIT IN CSR = 0

RESET_DECGNA (

);

WRT_STATION_ADR ( ZERO, PHA_INDEX );

BGNSUB;
XMIT_ILOOP_PACKET (

IF GET_BIT ( CSR, NI
THEN
BEGIN

ZERO );

)

CSR_WORD = GET_BIT ( CSR_ALL

PRINTB (
PRINTB (
PRINTB (

ERRDF

END
ENDSUB
;

(

MSG59
MSG29
MSG28

);
);
);

);

1201, MSGOO, ERRORSREPORT

);

TRY TO LOOPBACK A PACKET WITH INVALID TRANSMIT DESCRIPTOR ADDRESS,
VUV

G
B0
B8
B
B8
S5
G5
WS

[(MAZURCZYK.DEQGNA
JZGNA3 .BLI;2

..RESET DEGNA AND SELECT LOO’BACK MODE

5-Jul-1984 14:02:06

VAX-11 Bliss-16 vV4.0-579

BGNTST;

3035

v01.0

3050

5-Jul-1984 14:05:07

THEN CHECK FOR NON-EXISTANT MEMORY INTERRUPT ( NI
BGNSUB
;
RESET_DEGNA (

);

.JOP_TABLE [ XLO_ADR ] = NXM_LO_ADR;
.ICP_TABLE [ XHI_ADR ] = NXM_HI_ADR;
IF NOT GET_BIT ( CSR, NI )

) BIT IS SET TO 1

SEQ 0153
Page

(30)

Lig
CZGNACO DEGNA FUNCTIONAL TEST

ZANA3

3104
3105
3106
3107
3108
3109
3110
3111
3112
3113
3114
3115
3116
3117
3118
3119
3120
3121
3122
3123
3124
3125
3126
3127
3128
3129
3130

AR A}

vAVA

3132
3133
3134
3135
3136
3137
3138
3139
3140

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK
.DEQNA JZGNAS .BLI ;2

THEN

IFTaE.XHIY_D-LISY [ FLGWD ] AND XFLG_MASK ) NEQU XFLG_MASK
N

BEGIN
CSR_WORD = GET_BIT ( CSR_ALL
PRINTB ( MSGS9 );
PRINTB ( MSG29 );
PRINTB ( MSG27 );

ERRDF

ENDSUB
;

END;

(

);

1202, MSGOO, ERRORSREPORT

);

!
!

TRY TO LOOPBACK A PACKET WITH INVALID RECEIVE DESCRIPTOR ADDRESS,
THEN CHECK IF NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET T0 1

BGNSUB
;

RESET_DEGNA ( );
WRT_STATION_ADR (

ZERO, PHA_INDEX

);

.IOP_TABLE [ RLO_ADR ] = NXM_LO_ADR;
.IOP_TABLE [ RHI_ADR ] = NXM_HI_ADR;
SET_XDESCR_LIST (

.XBUF _LENGTH, VE

);

.IOP_TABLE [ XLO_ADR ] = XMIT_D_LIST;
.IOP_TABLE [ XHI_ADR ] = ZERO;

CHK_RIXI_STATUS ( ONE

);

CHK_CSR_STATUS
( #0'000220', %0'000220' );
CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS );

! 0'140000', 0'000400°

.IOP_TABLE [ CSR ] = EENABLE;
DELAY ( 20 );
IFrsz GET_BIT ( CSR, NI

)

IFT&EfiRcv-D-LISt [ FLGWD ) AND RFLG_MASK ) NEQU RFLG_MASK
BEGIN

.JOP_TABLE [ CSR ] = DISABLE;

CSR_WORD = GET_BIT (

PRINTG
PRINTB
PRINTB
EME)RRDF

( 1M5G59 J;
( MSG29 );
( MSG27 );
( 1203, MSGOO,

CSR_ALL

);

ERRORSREPORT

);

.IOP_TABLE [ CSR ] = DISABLE;

ENDSUB
;
feo

TRY TO LOOPBACK

p=]

S
G
G0
B¢
GF G0
B0 G
G0
G
G0
S8
G
GE
W
B8
W6
B
S8
S5
G0
S0 G0
B
G
B
G
B
G
B8
B8

3100
3101
3102
3103

WUWWWUVMVNOOOOOOOVUVIUVIVIVIVIVTVIVIVTVIVTVTVTUVIVTVIVTVTIVTNTUW
IO
v

3097
3098

S8 G

v01.0

3088
3089
3090
3091
3092
3093
3094
3095

S-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

TEST 12 - NXM INTERRUPT TEST

PACKET WITH INVALID TRANSMIT BUFFER ADDRESS,

M12
CZQNACO DEGNA FUNCTIONAL TEST
TEST 12 - NXM INTERRUPT TEST

ZQGNA3

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
3171
3172
3173
3174
3175
3176
3177
3178
3179
3180
3181
3182
3183
3184
3185
2186
3187
3188
3189
3190
3191
3192
3193

AUULULTUUVTUUVUVTULTVUVTVTUVVTVTVTVTVIVTVTVTVTVTVTHII
L LNV
OVTTTTTTT TN
T N N N

G¢

v01.0

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579
[(MAZURCZYK.DEGNAJZGNA3
.BLTI ;2

THEN CHECK IF NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET T0 1

RESET_DEGNA (

);

SET_XDESCR_LIST ( .XBUF _LENGTH, VENXM );
XMIT_D_LIST [ LOADR ] = NXM_LO_ADR;

.IOP_TABLE [ XLO_ADR ) = XMIT_D_LIST;
.JOP_TABLE [ XHI_ADR ] = ZERO;

DELAY ( 20 );
IFTNOT GET BIT ( CSR, NI
HEN

)

IFT& XMIT_D_LIST [ FLGWD ] AND XFLG_MASK ) NEQU XFLG_MASK
N

BEGIN

CSR_WORD = GET_BIT ( CSR_ALL );

PRINTB ( MSGS9 );
PRINTB ( MSG29 );
PRINTB ( MSG27 );

ENDSUB
;

ERRDF
END;

(

1204, MSGOO, ERRORSREPORT

);

faee

'
'

TRY TO LOOPBACK A PACKET WITH INVALID RECEIVE BUFFER ADDRESS,
THEN CHECK IF NON-EXISTANT MEMORY INTERRUPT ( NI ) BIT IS SET T0 1

BGNSUB;
RESET_DEQGNA (

);

SET_RDESCR_LIST (

RCV_D_LIST [

LOADR

.XBUF _LENGTH, VENXM );
]

= NXM_LO_ADR;

.IOP_TABLE [ RLO_ADR ) = RCV_D_LIST;
.IOP_TABLE [ RHI_ADR ] = ZERO;

SET_XDESCR_LIST ( .XBUF _LENGTH, VE );
.IOP_TABLE [ XLO_ADR ) = XMIT_D_LIST;
.JOF _TABLE [ XHI_ADR ] = ZERO;
CHK_RIXI_STATUS ( ONE );

CHK_CSR_STATUS ( #0'000220', %0'000220' );
CHK _XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS );

! 0'140000', 0'000400'

.IOP_TABLE [ CSR ] = EENABLE;
DELAY ( 20 );
IFT:g; GET_BIT ( CSR, NI

)

IFTaE.RCV_D_LIST [ FLGWD ) AND RFLG_MASK ) NEQU RFLG_MASK
N

BEGIN

SEq 0155

age

(30)

N12
CZQGNACO DEGNA FUNCTIONAL TEST

ZQANA3

3194
3195
3196
3197
3198
3199

3200
3201
3202

3203
3204

®e

v01.0

010146
162706
004737
004737
012701
010146
012746

004737
022626
005201
020127
003766
104402
012746
004737
005726
104467
103767

012737
012700
006200
005400
010037
012746
004737
005037
004737
005016
012746
004737

104402
005016
004737
013700
016066
031766
001436
016666

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK.DEQGNA JZGNA3.BLI;2

CSR_WORD = GET_BIT ( CSR_ALL );
.JOP_TABLE [ CSR ] = DISABLE;

PRINTB ( MSG59 );
PRINTB ( MSG29 ):
PRINTB ( MSG27 );

ENSRRDF

(

1205, MSGOO, ERROR$REPORT

);

.IOP_TABLE [ CSR ] = DISABLE;

ENDSUB;

ENDTST;

$T12:

000026
000000G
000000G
000001

14:

000023
000000G
000016

2$:

000200
000000G

000006
000006

.SBTTL

$T12 TEST 12 - NXM INTERRUPT TEST

SuB
JSR
JSR
MOV

#26,5P
PC,RESET.DEGNA
PC,PREP.FOR,SETUP
#1,R1

MOV
JSR

PC,WRT,.STATION.ADR

MOV

CMP
INC
CMP
BLE
TRAP
MOV
JSR

TST
TRAP
ROR
BLO

006000

000070
000076
000102
000104
000106
000112
000116
000122
000126
000132
000134
000140
000144
000146
000150
000154
000160
000166
000172
000174

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 12 - NXM INTERRUPT TEST

000000G

MOV
MOV

ASR

NEG

000000G
004000
000000G
000000G
000000G
000023
000000G

MOV
MOV
JSR
CLR
JSR
CLR
MOV
JSR

(SP)+,(SP)+

R1
R1,016

1$
2

2951

: *,INDEX

INDEX,*

; INDEX

INDEX,*

3041
3043

3045

3044

3045
3048

#9200, -(SP)
PC,XMIT.SETUP .PACKET

3045
3048

(SP)+«

24
96 ,RBUF .LENGTH

3051
3052

RO
RO
RO, XBUF .LENGTH

3054

PC,CLR.BUFFERS

3055
3062
3063

ERR.NUMBER

PC,RESET.DEGNA

(sP)

#23,-(SP)
PC,WRT,STATION.ADR

000000G
000016 ©20004
000004

TRAP
CLR
JSR
MOV
MOV
BIT

2
(SP)
PC,XMIT,ILOOP.PACKET
REG.ADR,RO

3067

16(R0),4(SP)
g?C).4(SP)

000004

MOV

4(SP),6(SP)

; *,TMP LOCATION

3070

3s:

000000G

000006

BEQ

3066

;: *, TMP . LOCATI0ON
: *,TMP,.LOCATION

©l3
CZQGNACO DEGNA FUNCTIONAL TEST

wwn

-Jul-1984 14:05:07
-Jul-1984 14:02:06

TEST 12 - NXM INTERRUPT TEST

016637
012716
012746
010600
104414
012716
012746
010600
104414
012716
012746

000006

0000006
000001

VAX-11 Bliss-16 v4.0-579

[MAZURCZYK
.DEQGNA JZGNAS . BLI ;2

s TMP_LOCATION,»

0000006

SEQ 015 7

Page

76
(30)

3071

H SP.‘
3072

0000006
000001

: SP,e
3073

010600

104414
104455

3074

002261
0000005
000000C
062706

104467

001045

013701
042701
020127
001436
016666
016637
012716
012746
010600
104414
012716
012746
010600
104414
012716
012746
010600
104414

Ss:

3076
3084
3085
3086

PC,.RESET.DEGNA

©-20000,3I0P,. TABLE+10

160000 ©00010G
000077 w00012G
000000G
000016 000010
000004
000010

077,3I0P.TABLE-12

REG.ADR,RO

¢, TMP _LOCATION

16(R0),10(SP)

04,10(SP)

64
XMIT.D.LIST,.R1
037777,R1
R1,0-40000
64

0000006
037777

140000

000010 000012
000012 000000G
000000G

«,TMP LOCATION
3089

10(SP),12(SP)
12(SP),CSR.WORD

s ., TMP LOCATION
i+ TMP_LOCATION,+

SP,RO
14

H SP.‘

SP.RO
14

: SP,»

SP,RO

oMSGS9,(SP)

000001

000000G
000001

oMSG29,(SP)

000000G
000001

oMSG27,(SP)

3087

016066
032766

0000006

006000

103723
104402
004737
012777
012777
013700

3069
3075

4s:

SP,»

104455

002262
000000G
000000G
062706
000006

104467

6%:

ERRORSREPORT
06,5P
67

Cl3

3091
3097

C13
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 12 - NXM INTERRUPT TEST
006000
103706
104402
004737
005016
012746
004737

78:

TRAP

VAX-11 Bliss-16 v4.0-579

(MAZURCZ
YK .DEQNA JZGNA3 . BLI ;2

PC,RESET .DEGNA
02

PC,URT

SP)

STATION.ADR

-20000,3I0P,
TABLE -4

012777

077,31
. TABLE
I0P
+6

012777
013716
012746
004737
012777
005077
012716

004737
012716
011646
004737
012716
012746
004737
012777
012701
001410
013700
001403

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

XBUF .LENGTH,(SP)

#-60000, -(SP)

PC,SET.XDESCR.LISTY

OXMIT.D.LIST,SI0P,.TABLE«10

8I0P.TABLE-12

01,(SP)
PC,CHK RIXI.STATUS
0220,(SP)

(SP),-(SP)

PC,.CHK,CSR,.STATUS
0-40000,(SP)

PC,CHK XMIT_ STATUS

0000166

8%:

000040

077003
005301
000767
013700
016066
000016 000024
032766
000024
001047
013701
0000006
042701
037777
020127
140000
001440
005077
000016G
016666
000026
000024
000026
016637
012716
012746 /000001
010600 ¢
10414
012716
0000006
000001
012746
010600
104414
012716
012746
000001
010600

024 ,R1

*,88TMP2

¢, 88THP]

;

9%:
10%:

11%:

REG.ADR,RO
16(R0),24(SP)
04,24(SP)

124

$STMP

;
:

$STMP],»
$sTMP2

:
:

¢, TMP LOCATION
¢, TMP_LOCATION

3124

3126

RCV.D.LIST,R1
037777,R1
R1,0-40000

12%
8I0P,.TABLE-16
24(SP),26(SP)

3129

; ¢, TMP _LOCATION

3130

oMSGS9,(SP)

3131

SP,RO
14

H Spo‘

SP.RO
14

SP,.RO

i Spo‘

26(SP),CSR.WORD

3132

oMSG29,(SP)

SP,»

3133

oMSG27,(SP)

D13

CZQGNACO DEGNA FUNCTIONAL TEST

ZQGNA3

TEST 12 - NXM INTERRUPT TEST

v01.0

000760
000762
000764
000766
000770
000772
000776
001002
001006
001010
001012
001014
001016
001022
001026
001032
001036
001044
001052
001056
001062
001064
001070
001072
001076

001100
001.02
001104
001110
001116
001124
001126
001132
001136
001142
001144

001152

001160
001164
001170

001172
001174

001260
001204
001206

001210
001214
001220
001222
001224
001226
001230
001232

VAX-11 Bliss-16 v4.0-579

[(MAZURCZ
YK .DEQNA JZONAS .BLI ;2

1044:4

104455

005077

062706
104467

0000166
000010

103623
104402

004737
013716
012746
004737
012737
12777
005077
012701
001410
013700
001403
077003
005301
000767
013700
016066
032766

001045
013701
042701
020127
001436
016666
016637
012716
012746
010600
104414
012716
012746
010600
104414
012716
012746
010600
104414
104455
002264
0000006

age

(30)
3134

002263
062706

SEq 0159 e

12%:

13%:
120077
000000G

000032

000000G
037777
140000

000024
000022
000024
000000G
000000G
000001

RO
7%

3137
3145
3146

PC,RESET.DEGNA
XBUF .LENGTH,(SP)

0-20000,XMIT.D.LIST.4

OXMIT,.D.LIST,3I0P.TABLE+10

8I0P.TABLE.12
14%:

15¢:
16%:

0000006
000016
000022
000004
000022

3128
3136
3098
3136

PC,SET
. XDESCR.LIST

160000 000004G
000000G 000010G

000012G
000024

MSGOO
ERRORSREPORT
06,5P
8I0P,.TABLE+16
010,5P
67

17%:

024 ,R1

17%
L$OLY,RO
16$
32(SP)

s,88TMP2

3147
3148
3149
3150

s, 88TMPL
$STMP
$STMPL,»
$STMP2

RO,15%
R1
14$

REG.ADR,RO
16(R0),22(SP)

04,22(SP)
18$%

¢,TMP LOCATION
¢, TMP LOCATION

3153

XMIT.D.LIST,R1
#37777,R1
R1,0-40000

18¢
22(SP),24(SP)
24(SP),CSR.WORD
oMSGS59,(SP)

e1,-(sP)

3151

»
TMP . LOCATION,

3156

3157

SP,s

SP,RO

00LVO0G
000001

#MSG29,(SP)

000000G
000001

oMSG27,(SP?2

01,-(SP)

3158

SP,»

SP.RO
14

e1,-(SP)
SP,.RO
14
55
2264

3159
SP,s

3160

MSGOO

ERRORSREPORT

£E1%2

E13
CZQGNACO DEGNA FUNCTIONAL TEST

ZGNA3
v01.0

001234
001240
001242
001244

001246

001250
001252
001256

001262
001266

001272
001300
001306
001312
001316
001322
001326
001334
001340
001344
001350
001354
001356
001362
001366
001372

001376
001404
001410
001412
001416
001420
001424
001426
001430
001432
001426
001444
001452
001454
001460
001464
001470
001472
001500
001506
001512

001516

001522
001524
001526
001532
001536

S-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

TEST 12 - NXM INTERRUPT TEST

062706
005726
104467

103662
104402
004737
013716
012746
004737
012737
012777
005077

013716
012746
004737
012777
005077
012716
004737
012716
011646
004737
012716
012746
004737
012777
012701
001410
013700
001403

077003
005301
000767
013700

016066
032766
001047
013701
042701
020127
001440
016666
016637
005077
012716
012746
010600
104414
012716
012746
010600

000006

185:

VAX-11 Bliss-16 v4.0-579

[(MAZURCZYK .DEQGNA]ZGNA3 .BLI;2

“.y
(SP)e
67

Page

(30)
3155
3137
3161

19%:

SEQ 0160

13$

2
PC,RESET.DEGNA
XBUF .LENGTH
(SP)
,
©-57701,-(SP)

3162
3170
3172

©-20000,RCV.D.LIST.4

3173
3174
3175
3177

PC,SET.RDESCR.LIST

0000046
000000G 0000046

ORCV.D.LIST,3I0P.TABLE
-4

9I0P.TABLE+6
XBUF .LENGTH,
(SP)
©-60000, -(SP)

PC,SET.XDESCR.LIST

000000G 000010G

OXMIT.D.LIST,3I0P.TABLE+10
8I0P.TABLE.12
01,(SP)
PC,
. RIXI.STAT
CHK
US
©220,(SP)

3178
3179
3181

©-40000,(SP)

3184

3183

(SP),-(SP)

PC,CH
XMIT . STATUS
K,
01,3I0P.TABLE+16

000015605

20%:
000040

21s:
22%:
006034
000034

000036

23s:

024 ,R1
238

L$OLY,.RO
224

;

#,88TMP2

+,85TMPL

;

$sTMP

40(SP)
RO,21%
R1

:
:

$STMPL,»
$STMP2

16(R0O), 34(SP)

¢, TMP_LOCATION

204
REG.ADR,RO

3186
3188

3189

04,34(SP)

24
RCV.D.LIST,R1
037777 ,R1
R1,#-40000
244

34(SP),36(SP)
36(SP),CSR.WOFD
9I0P.TABLE+16
oMSG59, (SP)
SP.RO

14
#MSG29, (SP)
e1,-(SP)

SP,RO

£132

: «,TMP_LOCATION
3191

;

»,TMP_LOCATION

TMP.LOCATION,+

3194

3195
3196

;: SP,s
3197
:

SP,»

F13
ZQGNA3

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 12 - NXM INTERRUPT TEST

v01.0

001540
001542
001546
001552
001554
001556
001560
001562
001564
001566
001572
001576
001602
001604
001606
001610
001614
001616

]

CZGNACO DEGNA FUNCTIONAL TEST
104414
012716
012746

010600

TRAP

0000006
000001

000000G
062706
005077
062706
104467
006000
103620
062706

012601
000207

000006
000016G
000010

000032

244

CLR
TRAP
ROR

BLO
ADD
MOV

RTS

Routine Base:
ABS$CODES$
Routine Size:
456 words,
: Maximum stack depth per invocation:
23 words

004737
104466
006000

103773
000207

010440’

SP.RO

5 Spo.

ERRORS$REPORT
06,SP
8IOP.TABLE+16
©10,5P

194

032,5P

(SP)+,R1
+

3205

3198

3199

s
H
:

3193
32C1
3162

2951

3202

3201

PC,$T12
56
RO
1%
PC

- NXM INTERRUPT TEST

ABSCODES + 12260
6 words,
Rout ine Base:
; Routine Size:
;: Maximum stack depth per invocation:
2 words

(30)

10440

JSR

BLO

0161

Page

T12 TEST 12

RTS

SEQ

.SBTTL
TRAP
ROR

[MAZURCZYK .DEQNA)JZGNA3S .BLI;2

oMSG27,(SP)

104414

104455
002265
0000006

000000
000000
000004
000006
000010
000012

VAX-11 Bliss-16 v4.0-579

(13

CZQNACO DEGNA FUNCTIONAL TEST

ZQANA3

3238

3239
3240
3241
3242

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK
.DEGNA JZQNA3 .BLI;2

i
e et et P
e
i o
e e
e
o Pk P

MULTIPLE AND CHAINED PACKET TEST

TEST 13:
DESCRIPTION:

This test verifies that the DEGNA can transmit and rociive multiple,
linked and chained loopback packets.

If the operator specifies loop on error, the program re-executes the
code that detected the error until tC is entered.
Hardware tested:
Processing:

BEGIN

reset device

select internal/extended loopback mode
transmit simple loopback packet
check for expected loopback status
IF error

b ot P

e o e o e o

feo

THEN
print error message
ENDIF

ot o (b h et P

90
80
B
S0
S0
B0
S0
S0
B0
S0
00
00
90
G0
S0
G0
00
90
S0
S0
B0
S0
S0
S0
S0
G0
S0
G0
8
B8
8.
88
G5
B

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

5-Jul-1984 14:02:Co

#SBTTL ‘TEST 13 - MULTIPLE AND CHAINED PACKET TEST’

Pt et et e ot e

3208

3206
3207

S5-Jul-1984 14:05:07

TEST 13 - MULTIPLE AND CHAINED PACKET TEST

v01.0

if not

inhibited

call compare_packets

transmit multiple, linked and chaind loopback packet
check for expected loopback status
IF error

THEN
print error message

END

ENDIF
call compare_packets

if not

inhibited

H13%3

SEQ 0162

Page

(31)

H13

3287
3288
3289
3290
3291
3292
3293
3294
3295

VUMV
AR WEVTNTVTVTVT
LN LN
N
e e

CZGNACO DEGNA FUNCTIONAL TEST
TEST 13 - MULTIPLE AND CHAINED PACKET TEST

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

BGNTST;

RBUF _LENGTH = 64;
XBUF _LENGTH = - (

.RBUF _LENGTH t -1 );

.‘LOOPBACK UNCHAINED PACKET, THEN CHECK IF IT WAS PROPERLY RECEIVED
RESET_DEGNA (

);

INCR INDEX FROM O TO 63 DO
XMIT_BUFFER [

.INDEX ] =

BGNSUB;

SET_RDESCR_LIST (
SET_XDESCR_LIST (
SEND_ELOOP_PACKET
COMPARE _PACKETS (

ENDSUB
;

RESET_DEGNA (

.INDEX;

.XBUF _LENGTH, VE );
.XBUF"LENGTH, VE );
( ZERD );
);

);

CLR_BUFFERS ( S1 2 )
INCR INDEX FROM 0 TO 383 DO
XMIT_BUFFER [ .INDEX ] = _INDEX;

BGNSUB;
INCR INDEX FROM O TO 63 DO
RCV_D_LIST [ .INDEX, W_LEN ]

= .RD13 [ .INDEX ];
INCR INDEX FROM O TO 31 DO
XMIT _D_LIST [ .INDEX, W_LEN ] = .TD13 [ .INDEX ];

XMIT
D LIST [
7, W.LEN ] = VE;
XMIT D_LIST [ 13, W_LEN ] = E;
PUT _BIT [ CSR, LB,

INX_LOOPBACK ];

XMIT_AND_RCV_PACKET (

);

CHK_RIXI_STATUS ( ZERO );

CHK_CSR_STATUS
XMIT
D LIST [
XMIT_D_LIST [
XMIT_D_LIST [

( CSR_ STATUS CSR_MASK );

7, W.LEN ]
12, W_LEN ]
13, W.LEN ]

! 0'100220', 0'100220°

= V;
= NEWB;
= V;

.IOP_TABLE [ XLO_ADR ] = XMIT _D_LIST « 24;
.IOP_TABLE [ XHI_ADR ] = ZERO;
CHK _wIXI_STATUS ( ZERO );
CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK );

! 0'100220', 0'100220'

; CHECK IF RECEIVE BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED

T13

VAX-11 Bliss-16 v4,0-579

[MAZURCZYK
.DEQGNA JZGNA3.BLI ;2

SEQ 016 3

Page

82
(32 )

113
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 13 - MULTIPLE AND CHAINED PACKET TEST

ZQGNA3

3296
3297
3298
3300
3301
3302

3303
3304
3305

3307
3308
3309
3310
3311
3712
3313
33.4
33.5

32.6
3317
3318
3319
3320
3321
3322
3323
3324
3325
3326
3327
3328
3329
3330
3331

3332
3333
3334
3335
3336
3337
3338
3339
3340
3341
3342
3343
3344
3345
3346
3347
3348

wwunooocoNoNONVTLILIUVTLILVTLTLIOVTONOVLVTLVONNONONONON
LTV
NNV
LTIV LY

v01.0

S5-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579
[(MAZURCZYK.DEQGNA]ZGNA3.BLI;2

INCR INDEX FROM O TO S3 DO

IF .RCV_D_LIST [ .INCEX, W_LEN ] NEQU .RD13 [ .INDEX )
AND ( .RCV_D_LIST [ .INDEX, W_LEN ] AND %0'140000'
AND .RCV_D_LIST [ .INDEX, W_LEN ] NEQU #0'020600’

) NEQU %0’ 140000’

THEN

BEGIN

CSR_WORD = GET_BIT ( CSR_ALL );

PRINTB ( MSGS59 ):
PRINTB ( MSG48 );

PRINTB ( MSGSO0,

NSRRDF

(

END;

.RCV_D_LIST [

.INDEX, W_LEN ],

1301, MSGOO, ERRORSREPORT

);

.RD13 [

.INDEX ],

.INDEX );

.’CHECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED
INCR INDEX FROM O TO 23 DO
IF .XMIT_D_LIST [ .INDEX, W_LEN ] NEQU .TD13 [ .INDEX )
AND ( .XMIT_D_LIST [ .INDEX, W_LEN ] AND s0'140000' ) NEQU %0’ 140000'
AND .XMIT_D_LIST [ .INDEX, W_LEN ] NEQU #0'020414°'
AN?HéXHIT-D_LIST [
N

.INDEX, W_LEN ] NEQU %0'004140’

BEGIN

CSR_WORD = GET_BIT ( CSR_ALL );

PRINTB ( MSG59 );
PRINTB ( MSGA49 );

PRINTB ( MSGSO,

EME)RRDF

(

.XMIT_D_LIST [

1302, MSGOO,

.INDEX, W_LEN ],

ERRORSREPORT

);

.7TD13 [

.INDEX ],

.INDEX

INEgG§zDEX FROM 0 TO S DO
XMIT_D_LIST [
RCV_D_LIST
[

END;

.INDEX, W_LEN ] = _XMIT_D_LIST [ .INDEX + 24, W_LEN ];
.INDEX, W_LEN ] = ._RCV_D_LIST [ .INDEX « S4, W_LEN ];

CHK_XMIT_STATUS ( XFLG_STATUS, XxwDi2_STATUS );
CHK_RCV_STATUS ( RFLG_STATUS, RWD1_STATUS
);
INCR INDEX FROM O TO 383 DO

IF‘fiénIT-BUFFER [

.INDEX ] NEQU .RCV_BUFFER [

! 0'140000', 0’'000400’
! 0'140000', 0'020000'

.INDEX ]

BEGIN

CSR_WORD = GET_BIT ( CSR_ALL );

PRINTB ( MSG59
PRINTB ( MSG51

PRINTB ( MSGSO,

ENSRRDF

ENDSUB
;

(

1303,

);
);

.RCV_BUFFER [

MSGOO,

.INDEX ],

ERRORSREPORT

);

.XMIT_BUFFER [

11
2

.INDEX

.INDEX );

);

SEQ 0164

Page

(32)

J13
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 13 - MULTIPLE AND CHAINED PACKET TEST

ZQGNA3

v01.0

ENDTST;

004137
162706
012737

000000G
000006

3349

012700

000100

$T13:

000000G

005400
010037
004737

000142
000146
000150
000154
000156
000162
000164
000166
000170
000176
000202
000206
000210
000212
000220
000224
000230
000232
000240
000246

103751
004737
012746
004737

110060
005200
020027
003772
104402
016060
062700
020027
003770
005000
016060
062700
020027
003770
012737
012737
013700

000077
2%:

000000G
120000

120000
000000G

VAX-11 Bliss-16 v4,0-579

(MAZURCZYK.DEQGNA ]JZGNA3.BLI;2

RO, XMIT.BUFFER(RO)
RO
RO, 077
1$
2
XBUF .LENGTH, -(SP)
#-60000, -(SP)
PC,SET.RDESCR.LIST
XBUF .LENGTH,
(SP)
2-60000, -(SP)
PC,SET. XDESCR.LIST

INDEX
INDEX,
» (INDEX)
INDEX
INDEX,=

3254
3257
3258

06,5P
67

3260
3254
3260

RO, #577
3
2
RO
RD13(R0O),RCV.D.LIST(RO)

000076
0000166
120000
020000
000032C
0000006

3263
3264
INDEX
«( INDEX)
INDEX,
INDEX
INDEX,
INDEX

*«(INDEX), «(INDEX)
*, INDEX

INDEX,

000176

6$:

3253
3254
3253

3259

:g.XHIT.BUFFER(RO)

000000G 000000G

3252

(SP)

:g-CLR.BUFFERS

44%:

(32)

3245
3246

RO
2%
PC,RESET.DEQGNA

000577

Page

3204

PC,SEND.ELOOP .PACKET
~C,COMPARE .PACKETS

001000
000000G

SEQ 0165

$T13 TEST 13 - MULTIPLE AND CHAINED PACKET TEST

R1,$SAVE3
6,SP
©100,RBUF .LENGTH
#100,R0
RO
RO
RO, XBUF .LENGTH

:g.RESET.DEQNA

110060

005200
020027
003772
104402
013746
012746
004737
013716
012746
004737
005016
004737
004737
062706
104467

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TD13(RO) ,XMIT.D.LIST(RO)

#2,R0O
RO, %76
64
©¢-60000,XMIT.D.LIST+16

£20000,XMIT.D.LIST.32

REG.ADR,RO

I Z1
2

INDEX

3265
3266

3265

3266
3270
3271
3270

+«(INDEX), «(INDEX)
*, INDEX

3272
3273
3272

INDEX,
»

3275
3276
3278

K13
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 13 - MULTIPLE AND CHAINED PACKET TEST
042760
052760
004737
005016
004737
012716
011646
004737
012737
012737
012737
012777
005077

000016
001400
001000 000016
000000G

000016G

0000326
00001906

005016
004737
012716
011646
004737

010301
006301
016100
020061
001456
010002
042702
020227
001450
020027
001445
013700
016066
016637
012716
012746
010600
104414

012716
012746
010600

104414
010316
016146
016146
012746
012746
010600
104414

7%:

000000G

037777
140000
020600
0000006
000016
000006
0000006
000000G
000001

000000G
000001

000000G
000000G
000000G
000004

104455
002425

0000006
062706
000014

8IC
BIS
JSR
CLR
JSR
MOV
MOV
JSR
MOV
MOV
MOV
MOV
CLR
CLR
JSR
MOV
MOV
JSR
CLR
MOV
ASL

MOV
cMP
BcQ@

MOV

8IC
CMP
BEQ
CMP
BEQ

MOV
MOV

MOV

MOV
MOV
MOV
TRAP
MOV

MOV
MOV
TRAP
MOV
MOV
MOV
MOV

MOV
MOV
TRAP
TRAP

.WORD
.WORD

ADD

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

VAX-11 Bliss-16 V4.0-579

[(MAZURCZYK.DEGNA JZGNA3.BLI ;2

#1400,16(RO)
#1000,16(RO)
PC,XMIT.AND.RCV.PACKET

(SP)

PC,CHK
. RIXI.STATUS
#-77560,(SP)

(SP),-(SP)

PC,CHK.CSR.STATUS
#-100000,XMIT.D.LIST+16
#-100000,XMIT.D.LIST+30
#-100000,XMIT.D.LIST+32
OXMIT.D.LIST+30,3I0P.TABLE+10
9I0P.TABLE+12

3283
3284
3285
3287
3288
3290

(SP)

PC,CHK
. RIXI.STATUS
#-77560,(SP)
PC,CHK.CSR.STATUS
R3
R3,R1
R1
RCV.D.LIST(R1),RO
RO,RD13(R1)

8¢
RO,R2
237777,R2
R2,#-40000
8$
RO, 820600
84
REG.ADR,RO

3291

INDEX
#
INDEX,

3299

3300

16(R0),6(SP)
6(SP),CSR.WORD

+«,TMP LOCATION

SP,RQ
)T
#MSGA48, (SP)

SP,s

SP,.RO
ta

SP,#*

R3,(SP)
RD13(R1),-(SP)
RCV.D.LIST(R1),-(SP)
#MSGS0, -(SP)

INDEX,

SP,RO
14
55
2425

SP,»

OMSGS9,(SP)
@1,-(SP)

3297
3298

TMP .LOCATION,
»

3303
3304

3305

3306

3307

MSGOO

ERRORS$REPORT
14 ,SP

3302

L13
CZGNACO DEGNA FUNCTIONAL TEST

TEST 13 - MULTIPLE AND CHAINED PACKET TEST

005203
020327
003707
005003
010301

006301
016100
020061
001461
010002
042702
020227
001453
020027
001450
020027
001445
013700
016066
016637
012716
012746
010600
104414
012716
012746
010600
104414
010316
016146
016146
012746
012746
010600
104414
104455
002426
062706
005203
020327
003704

005002
010200
006300
010201
006301
016160
000770
000776

010201
006301
016160
005202

000065

8s¢:

9¢:

5-Jul-1984 14:05:07

5-Jul-1984 14:02:06

INC
cMP
BLE
CLR

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEGNA JZGNA3.BLI;2

SEQ 0167

Page

(32)

s+ INDEX
H I?OEX.‘

3297

;s INDEX
; INDEX,*

3314
3315

000000G
0000006

R
XMIT.D.LIST(R1),RO
RO, TD13(R1)

037777
140000

RO,R2
#37777 ,R2
R2,#-40000

3316

RO, 020414
104
RO, #4140

3317

10$

10¢

020414

004140

10$
REG.ADR,RO
16(R0),10(SP)
10(SP),CSR.WORD

000000G

000016 000010
000010 000000G
000000G

oMSGS59, (SP)

000001

000000G
000001

3318
B

: *,TMP.LOCATION

TMP.LOCATION,»

SP,RO

i SP,»

3323

3324

R3,(SP)

TD13(R1),-(SP)
XMIT.D.LIST(R1),-(SP)
#MSG50, -(SP)
24,-(SP)

SP,RO
14
55
2426

3322

SP,*

SP,.RO
14
oMSG49,(SP)

3321

;: SP,»
3325

MSGOO

000014
000027

ERRORSREPORT
@14,5P

11%:

000060G 000000G
000154G 000000G

: INDEX

10¢:

: INDEX

CLR

MOV

MOV
ASL

INC

INDEX,*

R
R2,R1

#
INDEX,

INDEX,*

XMIT.D.LIST+60(R1),XMIT.D.LIST(RO)

R2,R1
R1

:gV.D.LISTolsd(RI).RCV.D.LIST(RO) i
:

M1 Z

;

NDEX

3320
3314
3328
3330

3331
3328

M13
CZGNACO DEGNA FUNCTIONAL TEST
TEST 13 - MULTIPLE AND CHAINED PACKET TEST

ZQGNA3

v01.0

001000
001004
001006
001012
001016
001022
001026
001032
001036
001049
001046
001050
001054
001062
001070
001074
001100
001102
001104
001110
001114
001116
001120
001122

001124
001130
001132
001136
001142
001146
001150
001152
001154
001156
001160
001162
001166
001170
001174
001176
001202
001204
001206
001210
001214
001220

020227
003760
012716
012746
004737
012716
012746
004737
005001
126161
001447
013700
016066
016637
012716

012746
010600
104414
C12716
012746
010600
104414
010116
005046
116116
005046
116116
012746
012746
010600
104414

140000

000400

000000G
140000
020000
000000G

000000G 000000G
0000006

000016
000016

000000G
000001

12¢%:

000016
000000G

0000006
0000006

062706
005201
020127
003721
062706
104467
006000
103002
000137
062706
000207

Maximum stack

cHP
BLE
MOV
MOV
JSR
MOV
MOV
JSR
CLR
CMPB
BEQ
MOV
MOV
MOV
MOV
MOV
MOV

TRAP

MOV
MOV
MOV

0000006
000001

TRAP

000577
000010

012460

144

000010

329 words,

depth per

Routine Base:

invocation:

20 words

PC,CHK
. XMIT,STATUS
©-40000,(SP)
©20000, -(SP)
PC CHK.RCV.STATUS
XHIT BUFFER(R1),RCV.BUFFER(R1)

134
REG.ADR,RO
16(R0).16(SP)
16(SP),CSR.WORD
oMSGS9,(SP)
@1,-(SP)
SP,.RO
14
#MSG51,(SP)

INDEX
«(INDEX),*(INDEX)
s, TMP.LOCATION

3342

3343
SP,*

-(SP)

-(SP)
RCV.BUFFER(R1),(SP)
#MSGS0, -(SP)

«(INDEX),*

3345
MSGOO

ERRORSREPORT

ADD
TRAP
ROR

ABSCODES

3344

SP,*

SP,RO

014,SP
R1
R1,08577

ADD
RTS

3341

SP.,»

SP,.RO
14

ADD
INC

BHIS
JMP

3337
3338

TMP .LOCATION,

«(INDEX),+

CMP
BLE

(32)

3335

XMIT .BUFFER(R1),(SP)

.WORD
.WORD

Page

3334

MOVB
CLR

TRAP
TRAP

SEQ 0168

INDEX,
»

INDEX,

MOV
MOV
MOV

13$:

(MAZURCZYK.DEGNA]ZQGNA3Z
BLI;2

R1,(SP)

MOVB

000014

R2,05
11%
©-40000,(SP)

VAX-11 Bliss-16 V4.0-579

MOV

CLR

104455
002427

; Routine Size:
;

000005

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

INDEX
INDEX,=

12$

3340
3337
3266
3346

RO
14%

3204

#10,SP
PC

+ 12274

ANl

N13
CZGNACO DEQNA FUNCTIONAL TEST
TEST 13 - MULTIPLE AND CHAINED PACKET TEST

ZGNA3
v01.0

000000
000000
000004
000006
000010
000012

004737

T13::
1¢:

012274'

104466
006000
103773
000207

;: Routine Size:

6 words,

Routine Base:

: Maximum stack depth per invocation:

3350

2 words

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEQNA]ZQNA3.BLI;2

.SBTTL

T13 TEST 13 - MULTIPLE AND CHAINED PACKET TEST

JSR

PC,$T13
66

TRAP
ROR
8LO
RTS

ABSCODES$

+ 13516

SEQ 0169

Page

(32)

Dl4

ZQGNA3
v01.0
:

3351

3353

3352

CZGNACO
DEGNA FUNCTIONAL TEST
TEST 14 - DMA TIMING TEST
1

fee

3354

ggg(;

{

3
‘

3355

B
:
:
3

3358
3359
3360
ggé

gssgz

:
H

H
M

This test verifies that the DMA transfer completes within 'X’' msec.
Chained and linked 1514 byte loopback packet is used to accomplish
this test. If the operator specifies loop on error, the program
re-svecutes the code that detected the error until tC is entered.

{

NOTE: An answer to the f2llowing scftware quastion

3367

:
5
o
B

3369
3370
3371
3372

1
1
1
1

3
3
:
s

3375
3376
3377
3378

1
1
1
1

H
H
!
H

s
s

3380
3381

1
1

!
H

3383

;.
s

:
:

3368

3373
3374

3379
3382

SYSTEM HAS BLOCK MODE MEMORY (L)?

determines the value for 'X',

1
1

:
H

:
H
H
H

H
3
s

3384
3385
3386

1
1
1

!
H
H

:
s
:
3

3389
3390
3391
3392

1
1
1
1

!
H
'
!--

3
H

3387
3388

DESCRIPTION:

!
!
:
:

33322

DMA TIMING TEST

TEST 14:

1
1
1
1

VAX-11
Bliss-16 v4.,0-579
[(MAZURCZ YK .DEGNA JZGNAS .BLI ;2

#SBTTL *TEST 14 - DMA TIMING TEST'

S-Jul-1984
14:05:07
5-Jul-1984 14:02:06

1
1

!
:

Hardware tested:

Processing:

Internal/Extended loopbeck
Transmit stetus - last descriptor in chain (bit 15)
Receive status - last descriptor in chain (bit 15)
- error suwary (bit 14)

BEGIN
reset device
select internal/extended loopback mode
set the timeout timer to ‘X' msec
transmit chained loopback packet

start the timer
IF timeout
THEN

print error message if not inhibited

ENDIF
check for expected loopback status
IF error

THEN
print error messuge if not inhibited

ENDIF
call compare_packets
END

Cl4

)
\

SEQ 017

P.;o(33)
89

Cl4

CZQGNACO DEGNA FUNCTIONAL TEST

5-Jul-1984 14:05:07

TEST 14 - DMA TIMING TEST

5-Jul-1984 14:02:06

BGNTST;
0

RBUF _LENGTH = LEGAL _LENGTH;
UVTVTVIVTVTVTVTUVTVIVIUIVIUVIVTVIVTVIVTVTVTTVTUVTVTVTTT T N Gl D

XMIT _BUFFER [

-1

);

.INDEX ] = .INDEX;

BGNSUB;

RESET_DEGNA ( );
INCR INDEX FROM O TO 63 DO

INCR INDEX FROM O TO 31 DO
XMIT_D_LIST [ .INDEX, W_LEN ] = .TD13 [

.INDEX ];

TEMPS = _XMIT _D_LIST [ 27, W_LEN );
TEMP6 =
TEMP7 =

RCV_D_LIST
_RCV_D_LIST

[ S1, W_LEN ]);
[ S6, W_LEN );

XMIT _D_LIST [ 27, W_LEN ) = -628;
RCV_D_LIST
[ S1, W_LEN ] = -625;

RCV_D_LISYT

[ S6, W_LEN ] = RCV_BUFFER + LEGAL _LENGTH - 2;

PUT_BIT [ CSR, LB, INX_LOOPBACK ];
XMIT_AND_RCV_PACKET (

);

CHK_RIXI_STATUS ( ONE );
IF

.SWP_BLOCK_MEM EQLU ONE

THEN
TEMP4 = #0’ 305’

ELSE
TEMP4 = 4 « w0’'305';

.TEMP1 GTRU .TEMP4

THEN

BEGIN

CSR_WORD = GET_BIT ( CSR_ALL );

PRINTB ( MSGS9 );
PRINTB ( MSGS2 );
£RW
( 1401, MSGOO, ERRORSREPORT

END;

CHK_CSR_STATUS
XMIT D_LIST
RCV_D_LIST
RCV_D_LIST
re e re

S0
S0
S0
S5
S0
S5
S
S5
S
S
B8
S5
B
G
B
WE

.RBUF _LENGTH t

INCR INDEX FROM O TO LEGAL_LENGTH - 1 DO

XBUF _LENGTH = - (

( CSR_STATUS, CSR_MASK

[ 27, W_LEN ]
[ 51, W.LEN ]
[ S6, W_LEN ]

=
=
=

);

! 0°'100220*, 0'100220°

.TEMPS;
,TEMP6;
.TEMP7;

"CPECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED

NCR INDEX FROM O TO 23 DO
IF .XMIT
D LIST [

.INDEX, W_LEN ] NEQU .TD13 [

.INDEX )

D14

VAX-11 Bliss-16 v4.0-579

[(MAZURCZYK .DEQGNAJZGNA3 .BLI ;2

SEQ 017

P.;.l 90
(34)

D14
CZQNACO DEQGNA FUNCTIONAL TEST

5-Jul-1984 14:05:07

WLV
LTV
NNV YWY

S0 S0

TEST 14 - DMA TIMING TEST
A'? (

XMIT_D_LIST [

5-Jul-1984 14:02:06

.INDEX, W_LEN ] AND #0'140000‘

HEN
BEGIN

VAX-11 Bliss-16 v4,0-579

[(MAZURCZ
YK .DEQGNA JZGNA3 .BLI ;2

) NEQU %0’ 140000’

CSR_WORD = GET_BIT ( CSR_ALL );

PRINTB ( MSGS9 );
PRINTB ( MSG49 );

PRINTB ( MSGS2, .XMIT_D_LIST [ .INDEX, W_LEN ],
ERRDF ( 1402, MSGOO, ERRORSREPORT );

.TD13 [

.INDEX ),

.INDEX );

END;
Ter
9
H

CHECK IF RECEIVE BUFFER DESCRIPTOR LISTS PROPEKRLY VOLIDATED

INCR INDEX FROM O TO 53 DO

IF .RCV_D_LIST [
AND (

THEN

.INDEX, W_LEN ] NEQU .RD13 [

.RCV_D_LIST [

.INDEX ]

.INDEX, W_LCN ] AND #0’'140000‘'

BEGIN

CSR_WORD = GET_BIT ( CSR_ALL

PRINTB ( MSG59
PRINTB ( MSGA48

) NEQU %0’ 140000’

);

);
);

PRINTB ( MSGSO0, .RCV_D_LIST [ .INDEX, W_LEN ],
EME)RRDF
( 1403, MSGOO, ERRORSREPORT );

.RD13 [

.INDEX

INCR INDEX FROM O TO S DO
BEGIN
TEMP1 =
TEMP2 =

_INDEX
_INDEX

XMIT _D_LIST [

"l;CV-D_LIST

END;

[

+ 24;
+ 54;

.INDEX, W_LEN ] =

_XMIT_D_LIST [

.INDEX, W_LEN ] = _RCV_D_LIST

RBUF _LENGTH = 1514;

[

.TEMP1, W_LEN ];

.TEMP2, W_LEN ];

CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS );
CHK_RCV_STATUS ( RFLG_STATUS, RWD1_STATUS
);

! 0'140000', 0'000400°
! 0'140000', 0'020000'

INCR INDEX FROM O TO LEGAL_LENGTH - 1 DO
IF .XMIT_BUFFER [ .INDEX ) NEQU .RCV_BUFFER [

.INDEX )

THEN

BEGIN

CSR_WORD = GET_BIT ( CSR_ALL

PRINTB ( MSGS9
PRINTB ( MSGS1

END;
ENDSUB;

);
);

);

PRINTB ( MSGSO, .RCV_BUFFER [ .INDEX ),
ERRDF
( 1404, MSGOO, ERRORSREPORT );

.XMIT_BUFFER [

.INDEX ],

ENDTST;

.SBTTL

$T14 TEST 14 - DMA TIMING TEST

F14

.INDEX

);

SEQ 0172

E1l4
CZAGNACO DEGNA FUNCTIONAL TEST
TEST 14 - DMA TIMING TEST
0000006
000010
000000G
002752
002752

$T14;

005400

1%:

005200

020027

003772
104402
004737
005000
016060
062700
020027
003770

101431

013700
016066
016637
012716
012746
01060C
104414
012716
012746
010600

RO, 92751
13

2
PC,RESET.DEGNA

INDEX
«(INDEX),+( INDEX)
+, INDEX
INDEX,

RD13(RO),RCV.D.LIST(RO)
02,R0
RO,2176
3
RO
TD13(RO),XMIT.D.LIST(RO)
#2.R0

INDEX
¢(INDEX),*(INDEX)

s, INDEX

INDEX,
»

4%
XMIT.D.LIST+66,TEMPS
RCV.D.LIST+146,TEMPE

RCV.D.LIST+160,TEMP?

©-1164 ,XMIT.D.LIST+66

#-1161,RCV.D.LIST.146
ORCV.BUFFER+2750,RCV.D.LIST-160

REG.ADR,RO
©1400,16(R0O)
©1000,16(R0O)
PC,XMIT, AND.RCV.PACKET
01,-(SP)
PC,CHK RIXI.STATUS

0000006

S$:

64:

16(R0),2(SP)
2(SP),CSR.WORD
oMSGS9,(SP)

01,-(SP)

3404
3405
3404

3422
3420
3424
3426

3429
+,TMP LOCATION
TMP.LOCATION,
»

SP,RO
14
oMSG52,(SP)

SP,s

SP,RO

SP,#

41 A

3398
3401
3402
3403
3402

3420

0000006

3397
3298
3397

3416
3418

21
SWP .BLOCK.MEM,
54

2305, TEMPA
63
01424 ,TEMP4
TEMP1,TEMP4
74
REG.ADR,RO

(34)

3407
3408
3409
3411
3412
3413
3415

000250
000256
000260
000264
000272
000300
000304
000310
000312
000314
000320
000324

as:

020027
003770
013737
013737
013737
012737
012737
012737
013700
042760
052760
004737
012746
004737
023727
0010C4
012737
000403
012737
023737

INDEX
INDEX,
«( INDEX)
INDEX
INDEX,
»

000122
000130
000136
000144
000152
000160
000166
000172
000200
000206
000212
000216
000222
000230
000232
000240
000242

RO
:g.XHIT.BUFFER(RO)

000000G

Page

3395
339¢

®s

000120

2%:

SEQ 0173

3349

®e

000114

016060
062700

R1, $SAVE2
@10,5P
02752
,RBUF .LENGTH
02752,R0
RO
RO

RO, XBUF .LENGTH

010037
005000
110060

000102
000110

VAX-11 Bliss-16 v4.0-579
[MAZUR
.DEGNA JZGNA3
CZY
. BLIK
;2

004137
162706
212737
012700
006200

S-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

3430

3431

F14
CZGNACO DEGNA FUNCTIONAL TEST
TEST 14 - DMA TIMING TEST

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

104455

002571

013737
005002
010201
006301
026161
001454
016100
042700
020027
001445
013700
016066
016637
012716
012746
010600
104414
012716
012746
010600
104414
010216
016146
01€146
012746
012746
010600
104414

104455
002572
000000G
000000G
062706
005202
020227
003712
005002
010201
006301
026161
001454
016100

SEQ 0174
Page

(34)

3432

MSGOO

0000006
0000006

004737
013737
013737

[MAZURCZYK.DEQGNA
JZGNA3 .BLI;2

14
55
2571

104414

022626
012716
011646

VAX-11 Bliss-16 v4,0-579

100220

ERRORSREPORT
(SP)+,(SP).

7%:

3428
3435

#-77560,(SP)

(SP),-(SP)

PC,CHK.CSR.STATUS
TEMPS,XMIT.D.LIST+66
TEMP6,RCV.D.LIST+146
;SHP7.RCV.D.LISTOI60

000066G
000000G 000146G
000000G 0001€0G

3437

INDEX
INDEX,
»

R2,R1
R1

8$:

3439
3444
3445

;?IT.D.LIST(RI).TDIS(RI)
XMIT.D.LIST(R1),RO

3446

037777,R0O
RO, #-40000

94
REG.ADR,RO

16(R0),6(SP)
6(SP),CSR.WORD
oMSG59,(SP)

»,TMP _LOCATION

TMP_LOCATION,»

SP,RO
14

5 SP..

SP,.RO
14

0 SP.‘

TD13(R1),-(SP)
XMIT.D.LIST(R1),-(SP)

3450

3451

oMSG49, (SP)

R2,(SP)

3449

s
INDEX,

3452

#MSGS0, -(SP)

000004

B SP.‘

SP,RO
L4
55
2572

3453

MSGOO

000014
000027

ERROR:REPORT
14,5P

9¢:

2448
3444

: INDEX
: INDEX, s

3459
3460

10%:

=
INDEX,

?g:.D.LIST(Rl).RDIS(Rl)

000000G 000000G
000000G

:+ INDEX

MOV

RCV.D.LIST(R1),RO

G114

3461

G1l4
CZQGNACO DEGNA FUNCTIONAL TEST

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 14 - DMA TIMING TEST

042700
020027
001445
013700
016066
016637
012716
012746
010600
104414
012716
012746
010600

000702
000710
000712
000714
000716
000722
000724
000730
000732
000734
000740
000746
000752
000760
000762
200764
000770
000772
001000
001004
001006
001014
001016
001022
021024
001032

001036
001042
001046
001052
001056
001062

037777
140000

0000006
000016 000010
000010 000000G
000000G

010200

013701
006301
016160
013701
006301
016160
005202
020227
003744
012737
012716
012746
004737
012716
012746
004737
005001

037777,R0

BEQ

11%
REG.ADR,RO

[(MAZURCZYK
.DEQNA ]ZGNA3 .BLI;2

TMP .LOCATION,+

oMSGS59,(SP)

e1,-(SP)

000001

SP,.RO
14

5 SP.‘

SP,.RO
14
R2,(SP)
RD13(R1),-(SP)
RCV.D.LIST(R1),-(SP)

; SP,»

oMSGA8, (SP)

000000G
000001

SE0P017S

(34)

¢, TMP LOCATION

16(R0O),10(SP)
10(SP),CSR.WORD

104414
010216
016146
016146
012746
012746
010600
104414

104455
002573
000000G
000000G
062706
005202
020227
003712
005002
010237
062737
010237
062737

BIC

VAX-11 Bliss-16 v4.0-579

3465

3466

INDEX,+

3457

oMSGS0, -(SP)

: SP,»

SP,RO
14
55
2573

3468

MSGOO

000u14

000065

000000G
000030 000000G

000000G
000066 000000G

ERROR$REPORT

11¢:

12%:

14,5P
R2

R2, 965
104

R2
R2,TEMP1
930, TEMP1
R2,TEMP2

066, TEMP2

R2,RO

3463

: INDEX
: INDEX,»

3459

; INDEX

INDEX,+

3471
3473

=
INDEX,

3474

INDEX,»

3475

000000G
000000G 000000G
000000G
000000G 000000G

000005

002752
000000G
140000
000400
0000006
140000
020000
000000G

XMIT,.D.LIST(R1),XMIT.D.LIST(RO)
;EHPZ.RI
1
:gV.D.LIST(RI).RCV.D.LISY(RO)

R2,65
12%
02752
,RBUF .LENGTH

PC,CHK
XMIT, STATUS

3476

: INDEX

3471

H INDEX

3479
3480
3481

:C.CHK.RCV.STATUS
1

’

3483

H14
CZQNACO DEGNA FUNCTIONAL TEST

ZQGNA3

TEST 14 - DMA TIMING TEST

v01.0

001064
001072
001074
001100
001106
001114
001120
001124
001126
001130
001134
001140
001142
001144
001146
001150
001154
001156
001162
001166
001172
001174
001176
001200

001202
001204
001206
001212
001214
001220
001222
001226
001230
001232
001234
001240
001244

126161
001447
013700

016066
016637
012716
012746

010600
104414

012716
012746
010600
104414
010116
005046
116116
005046
116116
012746
012746
010600
104414

000000G 0000006

13s$:

000000G
000016
000016
000016 000000G
0000006
000001
0000006
000001

; Routine Size:

004737

000014

14%;

002751
000010

013602°

15¢:

000010

339 words,

013532’

104466
006000

Routine Base:

invocation:

19 words

Ti4::
1%:

103773
000207

; Routine Size:

XMIT.BUFFER(R1),RCV.BUFFER(R]1)

MOV
MOV
MOV
MOV
MOV
MOV

REG.ADR,RO
16(R0O),16(SP)
16(SP),CSR.WORD
oMSGS9, (SP)
01, -(SP)
SP,.RO

6 words,

Rout ine Base:

VAX-11 Bliss-16 v4.0-579

[MAZURCZYK.DEQNAJZGNA3
.BLI;2
s *(INDEX),«(INDEX)
s, TMP LOCATION

R1,(SP)
-(SP)
XMIT ,BUFFER(R1),(SP)
-(SP)
RCV.BUFFER(R1),(SP)
oMSG50, -(SP)

MOV

SP,.RO

i SP..

WORD
.WORD
.WORD
ADD
INC
cMP
BLE
ADD

2574
MSGOO
ERRORSREPORT
@14,5P
R1
R1,02751
134
€10,SP

TRAP
ROR

67
RO

ADD
RTS

BHIS
JMP

154
24

(34)

3484

3487

H SP..

MOV
CLR
MOvB
CLR
MOVB
MOV

14
55

Page

3488

MOV
MOV
MOV

SEQ 0176

TMP.LOCATION,
»

i4
#MSG51,(SP)
e1,-(SP)
SP,RO

TRAP
TRAP

104455

002574
000000G
000000G
062706
005201
020127
003721
062706
104467
006000
103002
000137
062706
000207

cMPB8

BEQ

TRAP

; Maximum stack depth per

000000
200000
000004
000006
000010
000012

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

3489

: SP,e
INDEX,+

3490

; ¢(INDEX),»
; ¢(INDEX),»

3491

: INDEX
H IM)EX.‘

3486
3483

3398
3492

3349

ABSCODES$ + 13532

.SBTTL
JSR

TRAP
ROR
BLO
RTS
AB$CONES

T14 TEST 14 - DMA TIMING TEST
3493

PC,$T14

66
RO
1%
PC
+

15000

T14

114
CZQGNACO DEGNA FUNCTIONAL TEST

ZGNA3

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 15 - LONG PACKET TEST

v01.0

VAX-11 Bliss-16 v4,0-579

[MAZURCZYK
.DEGNA JZGNA3 .BLI;2

#SBTTL 'TEST 15 - LONG PACKET TEST’

3497

LONG PACKET TEST

TEST 15:
DESCRIPTION:

This test verifies that DEGNA can detect long packets ( 1600 bytes

or more with the CRC ) when transmitted in internal/extended
loopback mode. If the operator ipecifies loop on error, the

program re-executes the code that detected the error until tC

entered.
RCV Status - error summary (long packet-bit 14)

Hardware tested:
Processing:

BEGIN

reset device

et Pt e et et P

b P

e o

e e

fee

et ot

b o

select internal/extended loopback mode
transmit loopback packet (legal pecket length)
check for expected loopback status

d e e o

ot e e

IF error
THEN
print error message
ENDIF
call compare_packets

inh bited

transmit loopback packet ( packet length > legal max. )
IF Error Summary bit ( Receice Status Word 1, bit 14 ) = 1
THEAND (
N

e et
P Bt o

if not

END

receive packet length

print error message
ENDIF

if not

is truncated )

inhibited

1%
A

SEQ 0177
Page

(35)

J14
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 15 - LONG PACKET TEST

ZQANA3

B
S0
B0
S0
S0
S0
S0

B0
B0
S0
S0
S0
B0
S0
B0
S0
B0
S0
B0
90
B0
S0
S5
S0
S8
S8
WE

000000
000006
000012
000014
000016
000022
000024
000030
000034
000040
000044
000050
000054
000060

HFWWUUVVVTVTVTW
W AN WEWEEEWEEVTVTNVIVTVTA
NN
NN

3532
3533
3534
3535
3536
3537
3538
3539

v01.0

012737
012700
006200
005400
010037
104402
004737
013746
012746
004737
013716
012746
004737
005016

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579
[(MAZURCZYK.DEGNAJZGNA3
.BLI;2

seapona age

(36)

BGNTST;
*

.LOOPBACK 1534 BYTE PACKET AND THEN CHECK IF PROPERLY RECEIVED.

THIS IS THE LONGEST PACKET LENGTH WHICH DOESN'T SET '‘LONGP’' BIT IN
THE RECEIVE STATUS WORD 1 ( BIT 14 ).

RBUF _LENGTH = 1534;

XBUF _LENGTH = - (

BGNSUB;

RESET_DEGNA (

.RBUF _LENGTH t -1 );

);

SET_RDESCR_LIST ( .XBUF _LENGTH, VE );
SET_XDESCR_LIST ( .XBUF _LENGTH, VE );
SEND_ELOOP_PACKET ( ZERO );

COMPARE _PACKETS (

ENDSUB;

);

..LOOPBACK 1536 BYTE PACKET AND THEN CHECK IF BITS 13 AND 14 ARE SET IN
RBUF _LENGTH = 1536;

XBUF _LENGTH = - (

BGNSUB;
RESET_DEGNA (

.RBUF_LENGTH t -1 );

);

SET_RDESCR_LTST (

,XBUF _ILENGTH, VE );
SET_XDESCR_LIST ( .XBUF _LENGTH, VE );
SEND_ELOOP_PACKET ( ONE );
COMPARE _PACKETS ( );

ENDSUB
;

ENDTST;

002776
002776
000000G

000000G
000000G
120000
0000006
0000006
120000
000000G

000000G

$T1S:

.SBTTL
MOV
MOV
ASR

MOV

RO, XBUF .LENGTH

JSR
MOV
MOV
JSR
MOV
MOV
JSR

PC,RESET.DEGNA
XBUF .LENGTH, -(SP)
#-60000, -(SP)
PC,SET.RDESCR.LIST
XBUF .,LENGTH,
(SP)
#-60000,-(SP)
PC,SET.XDESCR.LIST

NEG

1$:

$T1S TEST 15 - LONG PACKET TEST
92776 ,RBUF .LENGTH
#2776 ,RO

TRAP

CLR

3540
3541

(SP)

K14

3544
3545
3546
3547

K14
CZQGNACO DEGNA FUNCTIOMNAL TEST

ZGNA3

TEST 1S - LONG PACKET TEST

v01.0

000062
000066
000072
000076
000100
000102
000104
000112
000116
000120
000122
000126
000130
000134
000140
000144
000150
000154
000160
000164
000170
000174
000200
000204

000206
000210
000212

004737
004737
062706

104467

JSR
JSR
ADD

000000G
0000006
000000

TRAP
ROR

006000

103747
012737

012700
006200
005400
010037
104402
004737
013746
012746
004737
013716

003000
003000

000000G

2%:

004737
062706
104467

JSR

BLO

103746
000207

RTS

70 words,

;: Maximum stack depth per

104466
006000
103773
0007.07

TRAP

ROR

006000

004737

BLO
MOV
MOV
AR
NEG
MOV

MOV
MOV
JSR
MOV
MOV
JSR
MOV
JSR
JSR
ADD
TRAP

012746
004737
012716
004737

; Routine Size:

000000
000000
000004
000006
000010
000012

S-Jul-1584 14:05:07
5-Jul -1984 14:02:06

015014

Rout ine Base:

invocation:

4 words

T1S::
1$:

PC,SEND.ELOUP
. PACKET
PC,COMPARE .PACKETS

3568

3569

(36)

3548
3541
3548

s
3

3556
3557

s
:

3560
3561

3562

;

3563

:
:
3

3564
3557
3564

24
PC

3495

3565

RO
1$
©#3000,RBUF .LENGTH
#3000,R0
RO
RO

gO.XBUF.LENGTH

PC,.RESET.DEGNA
XBUF .LENGTH, -(SP)

©-60000, -(SP)

PC,SET.RDESCR.LIST

XBUF .LENGTH,
(SP)
#-60000, -(SP)
PC,SET.XDESCR.LIST
@1,(SP)
PC,SEND.ELOOP.PACKET
PC,COMPARE .PACKETS
RO

+ 15014

.SBTTL

T1S TEST

JSR

TRAP
ROR

PC,$715
66
RO

RTS

15 - LONG PACKET TEST

AB$CODE
$ + 15230
Routine Base:
6 words,
; Routine Size:
per
invocation:
2
words
depth
: Maximum stack

[MAZURCZYK .DEGNA JZGNA3.BLI;2

SEQ 0179
Page
99

3
:
3

06,5P
67

AG$CODE
$

BLO

VAX-11 Bliss-16 v4,0-579

1
1

1 A

L14
CZQGNACO DEGNA FUNCTIONAL TEST

ZQGNA3

TEST 16 - ODD PACKET TEST

(o
e P
b ot o
b e o
0
0

3612
3613

[MAZURCZYK.DEGNAJZGNA3.BLI;2

fo0

GER SO0 TED SR TED P TED TED SED TR SED CED VU D TED TED VD TED T TR P T T T P T P I T T I Y Y Y I YT Y Y IS Y S '

et et et e
b P
b
b
e
P
o
e
b o
b
b
b
8 ot o
e
o
o
e o
b
o
b o
od

G0
B
S8
S0
B8
G0 G
B8
B8
S8
WS

3609
3610

5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579

#SBTTL 'TEST 16 - ODD PACKET TEST’

W0 GF

v01.0

3570
3571
3572
3573
3574
3575
3576
3577
3578
3579
3580
3581
3582
3583
3584
3585
3586
3587
3588
3589
3590
3591
3592
3593
3594
3595
3596
3597
3598
3599

5-Jul-1984 14:05:07

0DD PACKET TEST

TEST 16:
DESCRIPTION:

This test verifies that DEGNA can transmit and receive odd length
packets and packets starting and/or ending on odd addresses. Chained
and unchained descriptor lists are used to verify this. If the operator
specifies loop on error,

the program re-executes the code that detected

the error until tC is entered.

Hardware tested:

CSR register - XMIT List Invalid (bit 4)
- RCV
Transmit Descriptor
- XMIT
- XMIT

List Invalid (bit S)
bits
buffer ends on odd byte
buffer ends on even byte

Set of addresses and packet lengths:
PACKET ADDRESS

PACKET LENGTH

odd begin
odd begin and end
odd end

odd
even
odd

Processing:
BEGIN

reset device

REPEAT for

internal and internal/extended loopback mode

REPEAT for each packet address and length from set
check for expected loopback status

END

IF error
THEN
print error message
ENDIF
call compare_packets
ENDREPEAT
ENDREPEAT

if not

inhibited

M1/

SEQ 0180

M14
5-Jul-1984 14:05:07

CZGNACO DEGNA FUNCTIONAL TEST

S5
WE

3665
3666

OO VTUUVTUIUVIVTNTVIVTVTVTVTVTVTVTVIVTVTVTVTVTI
NNV NN
VTN N N N
e

3659
3660
3661
3662
3663

B8 S8

TEST 16 - ODD PACKET TEST

5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK.DEQNAJZGNA3.BLI;2

BGNTST;

..RESET DEGNA AND INITIALIZE ETHERNET STATION ADDRESS RAM
RESET_DEGNA ( );
PREP_FOR_SETUP (

);

INCR INDEX1 FROM 1 TO 14 DO
WRT_STATION_ADR ( .INDEX1, PHA_INDEX );

BGNSUB;

XMIT_SETUP_PACKET ( P_MODE );

ENDSUB;

RBUF _LENGTH = 6;

XBUF _LENGTH =

- (

.RBUF_LENGTH t

-1

);

LOOPBACK A PACKET, THEN CHECK IF LOOPBACK PACKET WAS PROPERLY

RECEIVED

CLR_BUFFERS ( 32 );
CLR_DESCR ( );
INCR INDEX FROM 0 TO S DO
XMIT_BUFFER [

.INDEX ]

.INDEX;

BGNSUB ;

INCR INDEX FROM O TO 43 DO
XMIT_D_LIST [ .INDEX, W_LEN ) = .TD16 [
SET_RDESCR_LIST ( .XBUF _LENGTH, VE );
PUT_BIT [ CSR, LB, INT_LOOPBACK ];
XMIT_AND_RCV_PACKET (

.INDEX ];

);

CHK_RIXI_STATUS ( ONE );
.JOP_TABLE [ CSR ] = ONE;
CHK_RIXI_STATUS ( ZERO );
.IOP_TABLE [ CSR ] = ZERO;

CHK_CSR_STATUS

( CSR_STATUS, CSR_MASK );

! 0'100220', 0'100220'

Tee

CHECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATEDC
INCR INDEX FROM O TO 17 DO

IF XMIT_D_LIST [
AND (

THEN

.iNDEX, W_LEN ] NEQU .TD16 [

.XMIT_D_LIST [

.INDEX )

.INDEX, W_LEN ] AND #0'140000'

BEGIN

CSR_WORD = GET_BIT ( CSR_ALL );

PRINTB (

MSG59

);

) NEQU %0'140000'

SEQ 0181

Page 101

(38)

N14
CZQGNACO DEGNA FUNCTIONAL TEST

ZQGNA3

5-Jul-1984 14:05:07

TEST 16 - ODD PACKET TEST

uunuuiiuuiuiuiiuiuiuiuiiTTVTVTllllllleeenooonooNOV
OV LTLTLTLTLTLTLTLTLTLT LTIV OV ON

v01.0

VAX-11 Bliss-16 V4.0-579

5-Jul-1984 14:02:06

PRINTB ( MSG49 );

PRINTB ( MSGS50, .XMIT D_LIST [ .INDEX, W_LEN ],
E"E)RRDF
( 1602, MSGOO, ERROR$REPORT );

.TD16 [

(MAZURCZYK.DEQNA]ZQNA3.BLI;2

.INDEX ],

.INDEX );

INCR INDEX FROM O TO S DO
XMIT_D_LIST [ .INDEX, W_LEN ] = . XMIT_D_LIST [

.INDEX + 18, W_LEN ];

CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS );
CHK_RCV_STATUS ( RFLG_STATUS, RWD13_STATUS );

! 0'140000', 0'000400’
! 0'140000', 0'000000’

INCR INDEX FROM O TO S DO

IFT'%(HIT_BLFFER [
N

.INDEX ] NEQU .RCV_BUFFER [

.INDEX )

BEGIN

CSR_WORD = GET_BIT ( CSR_ALL );

PRINTB ( MSG59 );
PRINTB ( MSG51 );

PRINTB ( MSGSG,

EMEJRRDF

ENDSUB;

(

.RCV_BUFFER [

.INDEX ],

1603, MSGOO, ERRORS$REPORT

);

.XMIT_BUFFER [

.INDEX ],

RESET_DEGNA ( );
CLR_BUFFERS ( 32 );

RBUF _LENGTH = 16;

XBUF _LENGTH = - ( .RBUF_LENGTH t -1 );
INCR INDEX FROM O TO 19 DO
XMIT_BUFFER [ .INDEX ] = .INDEX;

BGNSUB
;
INCR INDEX FROM O TO 43 DO

XMIT_D_LIST [

.INDEX, W_LEN ] =

.TD16 [

.INDEX ];

XMIT_D_LIST [ 19, W_LEN ] = V;
XMIT_D_LIST [ 25, W_LEN ] = C;

SET_RDESCR_LIST (

.XBUF_LENGTH, VE );

PUT_BIT [ CSR, LB, INX_LOOPBACK ];
XMIT_AND_RCV_PACKET ( );
CHK_RIXI_STATUS ( ZERO );

CHK_CSR_STATUS

( CSR_STATUS, CSR_MASK );

! 0'100220', 0'100220'

XMIT_D_LIST [ 19, W_LEN ] = VE;
XMIT D_LIST [ 25, W.LEN ] = E;
*e

CHECK IF TRANSMIT BUFFER DESCRIPTOR LISTS PROPERLY VOLIDATED
INCR INDEX FROM O TO 35 DO

.INDEX );

SEQ 0182

Page 102

(38)

o100
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 16 - ODD PACKET TEST

ZGNA3S

O
X
.
0
RE RV IV QW RV RV RV RV AV RV 1. 0

CHC_RCV_STATUS

XFLG_STATUS,

XWD12 _STATUS );

( RFLG_STATUS, RWDL_STATUS );

INCR INDEX FROM O TO S DO

Ithéle-BUFFER [

.INDEX ] NEQU .RCV_BUFFER [

BEGIN
CSR_WORD = GET_BIT ( CSR_ALL
INT0 1 MSGS9 );

CHC_XMIT_STATUS (

PRINTB ( MSGS51

.TD16 [

.INDEX ),

.INDEX

.INDEX « 36, W_LEN );
! 0'140000°', 0‘000400’

! 0'140000', 0’'020000°

.INDEX )

);

PRINTB ( MSGS0, .RCV_BUFFER [ .INDEX ],
E'IE)W
( 1605, MSGOC, ERRORSREPORT );

.XMIT BUFFER [

.INDEX

);

.XMIT BUFFER [

.INDEX

);

.INDEX

);

;

INCR INDEX FROM 6 TO 9 DO
IF .RCV_BUFFER [ .INDEX ] NEQU ZERO
THEN

BEGIN
CSR_WORD = GET_BIT ( CSR_ALL

O AV RV RV AT Lol

) NEQU =0’ 140000°'

( MSGS9 );
( MSG49 );
( MSGSO, .XHIT-D-LISY [ .INDEX, W_LEN ],
( 1604, MSGOO, ERRORSREPORT );

INCR INDEX FROM O TO S DO
XMIT _D_LIST [ .INDEX, W_LEN ] = _XMIT D_LIST [

PRINTB ( MSG59 );
PRINTB ( MSG51 );

);

PRINTS ( MSGS0, .RCV_BUFFER [ .INDEX ],
EMEJRRDF
( 1606, MSGOO, ERRORSREPORT );

U RE R L
N UL R

.INDEX )

.INDEX, W_LEN ] AND #0’'140000*

CSR_WORD = GET_BIT ( CSR_ALL );

PRINTB
PRINTB
PRINTB
"E,RRDF
END;

INCR INDEX FROM O TO S DO

IFtfigfiV_BUFFER [

.INDEX + 10 ) NEQU .TARGET_ADR [

BEGIN
CSR_WORD = GET_BIT ( CSR_ALL

3761
3762
3763
3764
3765
3766
3767
3768
3769
3770
3771
3772

XMIT_D_LIST [

VAX-11 Bliss-16 v4.0-579
[(MAZURCZ
YK ,DEQGNA JZGNA3 .BLI ;2

BEGIN

PRINT8 ( MSGS9 );
PRINTB ( MSG51 );
PRINTB ( MSGS50, .RCV_BUFFER [

3760

AN?HE

3753
3754
3755
3756
3757
3758
3759

IF . XMIT_D_LISTY [ .INDEX, W_LEN ] NEQU .TD16 [

3750
3751
3752

L G R LG

3720
3721
3722
3723
3724
3725
3726
3727
3728
3729
3730
3731
3732
3733
3734
3735
3736
3737
3732
3739
3740
3741
3742
3743
3744
3745
3746
3747
3748
3749

YW RV OV )

v01.0

5-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

ENDSUB;

END

ERRDF

(

.INDEX + 114 ]

);
.INDEX

1607, MSGOO, ERRORSREPORT

);

.XMIT BUFFER [

ENDTST;

C15

.INDEX

);

SEQ 0183

19
CZQGNACO NEGNA FUNCTIONAL TEST

000001

1%:

000023
000000G

000202
0000006

BLE
TRAP
MOV
JSR
TST
TRAP

ROR

BLO
MOV
MOV
ASR
NEG
MOV
MOV
JSR
JSR
CLR
MOVB
INC
cMP
BLE

012737
012700
006200
005400

010037

012746
004737
004737

110060
005200
020027
003772
104402

TRAP

(SP)+,(SP)+

(SP)e
67

3623
3626

24
06 ,RBUF .LENGTH
06 ,R0O

3629
3630

RO, XBUF ,LENGTH

3637

040, -(SP)

PC.CLR.BUFFERS

:g.CLR.DESCR

RC,XMIT.BUFFER(RO)
RO

RO, 05
3
2

INDEX
INDEX,+(INDEX)
INDEX
INDEX,

cMP
BLE
MOV

RO,0126

»
INDEX,

02,R0

54
XBUF ,LENGTH,
(SP)
#-60000, -(SP)
PC,SET.RDESCR.LIST

JSR

REG.ADR,RO
©1400,16(R0O)
PC,XMIT,AND.RCV.PACKET

JSR

PC,.CHK RIXI.STATUS

BIC

MOV
MOV

CLR
JSR

CLR

3622

3623
3626

0202, -(SP)
PC,XMIT,
SETUP PACKET

TD16(RO),XMIT.D.LIST(RO)

JSR

6000166

s INDEX1
s INDEX1,»

INDEX
«(INDEX),+(INDEX)

MOV

3620
3621
3622
3623

PC,W
. STATION.ADR
RT

MOV

0000166

INDEX1,
s

CLR
MOV
ADD

000016

¢, INDEX1

01,R1

2%:

3567

PC,PREP .FOR.SETUP

CcMP

000016

103767

016060
062700
020027
003770
013716
012746
004737
013700
042760
004737
012716
004737
012777
005016
004737
005077

suB
JSR
JSR
MOV
MOV
MOV
JSR
cMP
INC

$T16 TEST 16 - ODD PACKET TEST

R1,$SAVE2
014,5P
PC,RESET.DEGNA

000000G
000014

.SBTTL
JSR

[(MAZU
.DEQGNARCZ
JZGNA3.YK
BLI;2

$T16:

VAX-11 Bliss-16 v4.,0-579

®r

004137
162706
004737
004737
012701
010146
012746
004737
022626
005201
020127
003766
104402
012746
004737
005726
104467

000110
000114
000120
000124
000130
000132
000136
000140
000144
000146
000150
000152
000160
000164
000170
000172
000176
000202
000206
000212
000220
000224
000230
000234
000242
000244
000250

S-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

TEST 16 - ODD PACKET TEST

v01.0

ZANA3

+, INDEX

3638
3639

3639
3640
3643
3644
3643

3645

€1,(SP)

3648
3649

3650
3651

9I0P.TABLE+16

3652

PC,CHK RIXI.STATUS

D1S

D15
CZGNACO DEQGNA FUNCTIONAL TEST

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 16 - ODD PACKET TEST

012716
011646
004737
005002
010201
006301
026161
001454
016100
042700
020027
001445
013700

016066
016637
012716

012746

010600
104414
012716
012746
010600
104414
010216
016146
016146
012746
012746
010600
104414

(MAZURCZYKK.DEGNAJZGNA3
.BLI ;2

©-77560,(SP)

100220

6%:

CLR

:g.CHK.CSR.STAYUS
R2,R1
R1

g?IT.D.LIST(Rl).7016(Rl)

000000G

XMIT.D.LIST(R1),RO
037777,RO

037777
140000

BEQ

000000G
000016 000006
000006
000000G
000000G
000001

s INDEX

;

000000G 0000006

(38)

INDEX,»

3660
3661

4§

REG.ADR,RO

OMSGS59,(SP)

;

¢, TMP_LOCATION

TMP_LOCATION,»

TRAP

SP,RO
14
oMSG49,(SP)

B SP.‘

TRAP

SP,RO
14

H SPO‘

SP,RO

s SP,»

R2,(SP)
TD16(R1),-(SP)
XMIT.D.LIST(R1),-(SP)
#MSGS0, -(SP)
04,-(SP)

14
55
3102

104455
002102

Page 105

30.0-40000

16(R0O),6(SP)
6(SP),CSR.WORD

000000G
000001

SEQ 0185

3654

(SP),-(SP)

000000G

000000G
0000006
062706
000014
005202
020227
000021
003712
005002
010201
006301
010200
006300
016061
005202
020227
003765
012716
012746
004737
012716
005046
004737

VAX-11 Bliss-16 v4.0-579

: INDEX,+

3669

MSGOO

ERRORSREPORT

©14,5P
3
R2
s+ INDEX
R2,021
: INDEX,s
64
R2
: INDEX
R2,R1
: INDEX,
=
R1
R2,R0O
: INDEX,»
RO
XMIT.D.LIST+44(RO), XMIT.D.LIST(R1) ;
R2
; INDEX
: INDEX,»
8%

7%:

8%:

JSR

3660
3673

3674

3673

©-40000,(SP)

3676

PC,CH
XMIT ,STATUS
K,
©-40000,(SP)

3677

-(SP)

PC,CHK ,RCV.STATUS

£15

E15
CZQNACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 16 - ODD PACKET TEST

005001

126161

000000G 000000G

013700

0000006
000016 000014
000014
000000G
000000G

001447

016066

016637
012716
012746
010600
104414
012716
012746
010600
104414
010116
005046
116116
005046

CLR
BEQ
MOV
MOV
MOV

MOV
MOV

000001

TRAP

000000G
000001
TRAP

116116
012746
012746
010600
104414
104455
003103
000000G
000000G
000014
062706
005201
000005
020127
003721
000010
062706
104467
006000
103002
000137
004737
012716
004737
012737
012700
006200
005400
010037
005000
110060
005200
020027
003772
104402
005000
016060
062700

9¢:

015412’
0000006
000040
0000006
000020
000020

[MAZURCZYK.DEQGNA JZGNA3.BLI ;2

; «,TMP _LOCATION

3684

’

oMSG51,(SP)

SP.RO
14

;: SP,s

R1,(SP)

(38)

3280

SP,RO

Page 106

; #(INDEX),*(INDEX)

;

oMSG59,(SP)

SEQ 0186

: INDEX

16(R0O),14(SP)
14(SP),CSR.WORD

TMP_LOCATION,*

SP,s
3685

INDEX,»

3686

; *(INDEX),*
;

*(INDEX),*

SP,RO

: SP,»

55
3103

3687

H
;s INDEX

3682
3679

3640

MSGOO

ERRORSREPORT

014,5P
R1
R1,05

10¢:

11¢:

12%:

13s:
14%:

MOV3

BLE

TRAP

CLR

MOV
ADD

3688

PC,.RESET.DEGNA
©40,(SP)
PC,CLR.BUFFERS
©20,RBUF .LENGTH
©20,R0
RO
RO

3691

3692

3693
3694

0
:g.XHIT.BUFFER(RO)

: INDEX
+ INDEX,«(INDEX)
: INDEX

3695
3696
3€95

3696

: INDEX

3699

SO.XBUF.LENGTH

000023

000000G 000000G
000002

104
REG.ADR,RO

-(SP)
XMIT.BUFFER(R1),(SP)
-(SP)
RCV.BUFFER(R1),(SP)
oMSGS0, -(SP)

0000006
0000006

R1
XMIT.BUFFER(R1),RCV.BUFFER(R1)

VAX-11 Bliss-16 v4.0-579

RO, 23

12$
2

TD16(RO),XMIT.D.LIST(RO)

@2,R0

F15

INDEX.‘

; *(INDEX),+(INDEX) : *,INDEX

3700
3699

F15
CZQGNACO DEGNA FUNCTIONAL TEST

ZQANA3

TEST 16 - ODD PACKET TEST

v01.0

000772
000776
001000
001006
001014
001020
001024
001030
001034
001042
001050
001054
001056
001062
001066
001070
001074
001102
001110
001112

001114
001116
001124
001126
001132
001136
001142
001144
001150
001156
001164
001170
001174
001176
001200
001204
001210
001212
001214
001216
001222
00.226
001232
001236
001240
001242
001244
001246
001250
001252
001256
001260
001264

S5-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

020027
003770
012737
012737

013716
012746
004737
013700
042760
052760
004737
005016
004737
012716
011646
004737
012737
012737
005002
010201
006301

026161

001454
016100
042700
020027
001445
013700

016066
016637
012716
012746
010600
104414
012716
012746
010600
104414
010216
016146
016146
012746
012746
010600
104414

100000
040000

©-100000,XMIT.D.LIST+46
940000, XMIT.D.LIST+62
XBUF .LENGTH,(SP)
©-60000, -(SP)
PC,SET.RDESCR.LIST
REG.ADR,RO
©1400,16(RO)
©1000,16(R0O)
PC,XMIT.AND.RCV.PACKET

0000466
000362G

000000G
120000
000000G
000000G
001400
000016
001000 000016
000000G

120000
020000

(SP)

3707
3708

9-77560,(SP)

3710

PC,.CHK.CSR.STATUS
©-60000,XMIT.D.LIST+46

:SOOOO.XHIT.D.LIST062

000000G 000000G

R2,R1
R1
{2§T.D.LISY(R1).7016(RI)

000000G
037777
140000

XMIT.D.LIST(R1),RO
#37777,RO
RO, #-40000

15¢:

000016
000012

16$
REG.ADR,RO

16(R0),12(SP)
12(SP),CSR.WORD

000012
000000G

oMSGS9,(SP)

000001

000000G
0000006
000014
062706
005202
000043
020227
003712

INDEX
INDEX,*

3712
3713
3719
3720

3721

;

*,TMP_LOCATION

3724

3725

SP,RO
14
oMSG49, (SP)

: SP,»

SP,.RO
T

H SP..

3726

R2,(SP)

INDEX,s+

SP,RO
14
55
3104

SP,»

TD16(R1), -(SP)
XMIT.D.LIST(R1),-(SP)
#MSGS0, -(5P)

104455
003104

107

(38)

3706

(SP),-(SP)

0000466
000062G

Page

3702
3703
3705

PC,CHK.RIXI.STATUS

000000G
100220
000000G

[(MAZURCZYK.DEQNA
]ZGNA3 .BLI;2

Sea 0187

s INDEX,s

000126

VAX-11 Bliss-16 V4.0-579

3727

3728

MSGOO

ERRORSREPORT

@14,SP
R2
R2,043

16%:
BLE

: INDEX

15%

L1898

INDEX,»

3723
3719

G15
CZQGNACO DEQGNA FUNCTIONAL TEST

ZQGNA3

vo1.90

001266
001270
001272
001274
001276
001300
001306
001310
001314
001316
001322
001326
001332
001336
001342
001346
001350
001356
001360
001364
001372
001400

001404
001410
001412
001414
001420
001424
001426
001430
001432
001434
C01440
001442
001446
001452
001456
001460
001462
001464
001466
001470
001472
001476
001500
001504
001506
001512
001516

001520

001524
001532
001540

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 16 - ODD PACKET TEST

005002
010201
006301
010200
006300
016061
005202
020227
003765
012716
012746
004737
012716
012746
004737
005001
126161
001447
013700
016066
016637
012716
012746
010600
104414
012716
012746

010600
104414
010116
005046
116116
005046
116116
012746
012746
010600
104414

17¢:

000005

;

INDEX

:g.ao

INDEX,

©-40000,(SP)

140000
000400
000000G
140000
020000
000000G

18%:

000016 000020
000020 000000G
0000006

3734

©-40000,(SP)

3735

PC,C
. RCV.STATUS
HK
R1
XMIT.BUFFER(R1),RCV.BUFFER(R1)

:
;

194
REG.ADR,RO
16(R0),20(SP)
20(SP),CSR.WORD

e1,-(SP)

14
oMSGS1,(SP)
000001

TMP.LOCATION,

12
3742
3743

; SP,»
3744

: SP,s

SP,.RO

14
R1,(SP)

INDEX,s

XMIT.BUFFER(R1),(SP)

#(INDEX),s

RCV.BUFFER(R1),(SP)

: *(INDEX),»

SP,.RO

H Spo‘

-(SP)
-(SP)

14
55
3105

104455

INDEX
=(INDEX),+«(INDEX)
s, TMP LOCATION

oMSGS9, (SP)

000001

3731

PC,CHK XMIT.STATUS

000000G

003105
000000G
0C0000G
062706
000014
005201
020127
000005
003721
000006
012701
000000G
105761
001447
013700
0000006
016066
000016
000022
016637
000022 000000G
012716
000000G

(MAZURCZYK.DEQNA
JZGNA3 .BLI;2

XMIT.D.LIST+110(RO),XMIT.D.LIST(R1) ;
R2
s INDEX
R2,85
s INDEX,»
17%

000110G 000000G

000000G 000000G

VAX-11 Bliss-16 v4.0-579

3745

3746

MSGOO

ERRORSREPORT

19%:

014,5P
R1

3741
3738

: *(INDEX)

3749
3750

3753

H INDEX o

18%
20%:

: INDEX

RCV.BUFFER(R1)

2ls

REG.ADR,RO

16(R0),22(SP)
22(SP),CSR.WORD
oMSG59, (SP)

H1S

¢, TMP_LOCATION

TMP_LOCATION,»

3754

H15
CZGNACO DEGNA FUNCTIONAL TEST
TEST 16 - ODD PACKET TEST

ZGNA3
v01.0

001544
001550
001552
001554
001560
001564
001566
001570
001572
001574
001600
001602
001606
001612
001616
001620
001622
001624
001626
001630
001632
001636
001640
001644

001646

001659

001656
001660
001664
001672
001700
00i704
001710
001712
001714
001720
001724
001726
001730
001732
001734
001740
001742
001746
001752
001756
001760
001762
001764
001766
001770
001772

012746

010600
104414
012716
012746
010600
104414
010116
005046
116116
005046
116116
012746
012746
010600
104414

000001

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

oMSGS51,(SP)
e1,-(SP)

SP,s

14
R1,(SP)

INDEX,

XMIT .BUFFER(R1),(5P)

«(INDEX),»

RCV.BUFFER(R1),(SP)
oMSG50, -(SP)

¢(INDEX),»

-(SP)

ERRORSREPORT

2ls:

014,5P
R1
R1,011

INDEX
=
INDEX,

204

22%:

INDEX
:
RCV.BUFFER+12(R1),TARGET.ADR+162(R 1) ;

«(INDEX),«( INDEX)

23$

000001

3756

3757

104455

000016
000024

(38)

SP,s ;

003106
000000G
000000G
062706 000014
005201
000011
020127
003722
005001
0000126 000162G
126161

001447
013700
016066
016637
012716
012746
010600
104414
012716
012746
010600
104414
010116
005046
116116
005046
116116
012746
012746
010600
104414
104455
003107
000000G
0000006
062706

age 1

3755

SP,RO

-(SP)

000000G
000004

[MAZURCZYK.DEGNA ]ZGNA3.BLI;2

SEOP0189 o0

SP,s

SP,RO
14

000000G
000001

VAX-11 Bliss-16 v4,0-579

000024
000000G

375¢
3749
3760
3761
3764

REG.ADR,RO

16(R0),24(SP)
24(SP),CSR.WORD
oMSGS9,(SP)

s, TMP _LOCATION

TMP . LOCATION,

SP,.RO
14
oMSGS1,(SP)

SP.,s

SP,.RO
14
R1,(SP)
-(SP)
XMIT.BUFFER(R1),(SP)
-(SP)
RCV.BUFFER(R1),(SP)

SP,s

SP,RO
14
55
3107

SP,s

#MSGS50, -(SP)

3765

3766

INDEX,
»

3767

s(INDEX),*
«(INDEX),»

3768

MSGOC

000014

ERRORSREPORT
014,5SP

T1S

3763

115
CZQNACO DEGNA FUNCTIONAL TEST

ZQGNA3

TEST 16 - ODD PACKET TEST

v01.0

002004
002006

005201
020127
003721
062706

002014
002016
002020
002024
002030

006000
103002
000137
062706
000207

001776
002000
002012

104467

: Routine Size:
:

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

000005

23%:

BLE

000010

016220’
000016

INC
cMP
ADD

JMP
ADD

13$
#16,SP

RTS

010,SP

67
RO

INDEX

INDEX,»

SEY 0190

Page 110

(38)

3760

3
H

3696
3769

3567

3770

244

ABSCODES$ + 15244
Routine Base:
S25 words,
22 words
invocation:

Maximum stack depth per

000000
000000
000004
000006

000010
000012

004737

104466
006000
103773
000207

015244

T16::
1$:

.SBTTL

T16 TEST 16 - ODD PACKET TEST

JSR

PC,$T16

ROR

TRAP

8LO
RTS

6 words,
Routine Base:
ABSCODES$ + 17276
: Routine Size:
: Maximum stack depth per invocation:
2 words
:

[MAZURCZYK .DEQGNA JZONAS.BLI;2
;

22%

TRAP
ROR

BHIS

24s:

R1
R1,05

VAX-11 Bliss-16 v4.0-579

3773

118

J15
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 17 - STATION ADDRESS TEST

ZQANA3

et et et
s et
o
b (e
b

3787

fe0
8

STATION ADDRESS TEST

TEST 17:
DESCRIPTION:

This test verifies that DEGNA accepts only packets with legitimate

‘multicast’ and 'non-multicast’ addresses and discards those with
illegitimate ‘multicast’

and 'non-multicast’

addresses.

entered.

Hardware tested:

Address Filter Circuitry

Set of 'multicast’ addresses in HEXADECIMAL
:

b P

b e

o o

Station Address RAM is loaded with a set of Terget Addresses and
Mode bits. Target Addresses in and out of the set are used to
Joopback packets. If the operator specifies loop on error, the
program re-executes the code that detected the error until tC is

01-00-00-00-00-00
AB-AA-AA-AP-AA-AA
55-55-55-55-55-55

FF -FF -FF -FF -FF -FF
Walking 1
Processing:

b
ot
b o
b e
b e
(h et e
et e
b e

3788
3789
3790
3791
3792
3793
3794
3795
3796
3797
3798
3799
3800
3801
3802
3803
3804
3805
3806
3807
3808
3809
3810
3811
3812
3813
3814
3815
3816
3817
3818
3819
3820
2821
3822

3785
3786

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK.DEQGNA JZGNA3.BLI;2

#SBTTL *TEST 17 - STATION ADDRESS TEST'

et e e

3784

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

3774
3775
3776
3777
3778
3779
3780
3781
3782
3783

b Pt et e et e

8¢

v01.0

BEGIN

reset device

select

internal loopback mode

set mode to Setup

load Station Address RAM with 'multicast’

addresses

REPEAT for each complemented and uncomplemented 'multicast’
address in the set
load address
disable receiver
transmit loopback packet
enable receiver
check for expected loopback status
IF error
THEN
print error message if not inhibited
ENDIF
call compare_packets
ENDREPEAT
END

K15

SEQ 0191

Page 111
(39)

IK15
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 17 - STATION ADDRESS TEST

ZQANA3
3823
3824
3825
3826
3827
3828
3829
3830
3831
3832
3833
3834
3835
3836
3857
3838
3839
3840
3841
3842
3843
3844
%845
5846

3847

3843
3849
3850
3851
3852
3853
3854
3855
3856
3857
3858
3859
3860
3861
3862
3863
3864

3865
3866
3867
3868
3869
3870
3871
3872

3873
3874
3875

VNBDLBDBDDDUWUHWLOOLLAVVILBLDLODLLLUWWUWWWWWWWWUVINIWNWWWWWWWWHNG

v01.0

5-Jul-1984 14:05:07

5-Jul-1984 14:02:06

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEQGNA JZGNA3.BLI ;2

BGNTST;
k]

..RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM TO ALL MULTICAST

RESET_DEGNA ( );
PREP_FOR_SETUP (

);

INCR INDEX1 FROM 6 TO 19 DO
WRT_STATION_ADR ( .INDEX1 - S,

.INDEX1 );

BGNSUB;
XMIT_SETUP_PACKET ( N_MODE );

ENDSUB;

..NOH LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPER.Y
RBUF _LENGTH

= 6;

XBUF _LENGTH =

- (

.RBUF_LENGTH t -1

);

IN§26§:DEX1 FROM 6 TO 19 DO
WRT_STATION_ADR ( ZERO,

.INDEX1

);

BGNSUB;

XMIT_ILOOP_PACKET ( ZERO );
ENDSUB;

INCR INDEX2 FROM O TO S DO
BEGIN

XMIT BUFFER [ .INDEX2 ] = ( -.XMIT_BUFFER [ .INDEX2 ]
TARGET_ADR [ .INDEX2 ] = .XMIT_BUFFER [ .INDEX2 ];

END;

BGNSUB;
XMIT_ILOOP_PACKET ( ONE
ENDSUB;

);

END;
TEMP4

14;

INCR INDEX3 FROM O TO 3 DO
BEGIN
IF .INDEX3 EQLU 3
THEN
TEMP4 = 6;
RESET_DEQGNA ( );
PREP_FOR_SETUP (

);

INCR INDEX4 FROM 1 TO .TEMP4 DO
BEGIN

WALKING_BIT ( ZERO,

.INDEX4 + (

.INDEX3 # 14

) - 1, S5 );

) - 1;

SEQ 0192
Page 112

(40)

&s
CZGNACO DEGNA FUNCTIONAL TEST
TEST 17 - STATION ADDRESS TEST

ZQGNA3
3876
3877
3878
3879
3880
3881
3882
3883
3884
3885
3886
3887
3888
3889
3890
3891
3892
3893
3894
3895
3896
3897
3898
3899

3901
3902
3903
3904
3905
3907
3908
3909
3910

000000
000004
000010
000014
000020
000022
000026
000030
000034
000036
000040
000044
000046
000050
000054

FUWWENWOLAVNNNIVIVIVNS
BBV NUVIVILINIBBBLDBOODBLWL

v01.0

004137
004737
004737
012701
010146
162716
010146
004737
022626
005201
020127
003765
104402
012746
004737

WRT_STATION_ADR (

END;

5-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

VAX-11 Bliss-16 V4.0-579

SEQ 0193

(MAZURCZYK.DEQNAJZGNA3.BLI;2

.INDEX4, ZERO );

BGNSUB;

XMIT_SETUP_PACKET ( N_MODE );

ENDSUB
;

RBUF _LENGTH = 6;
XBUF _LENGTH = - (

.RBUF_LENGTH t -1 );

INCRGINDEX4 FROM 1 TO .TEMP4 DO
BEGIN

WALKING_BIT ( ZERO, .INDEX4 « (
WRT_STATION_ADR ( ZERO, ZERO );

.INDEX3 « 14

) -

1, 5 );

BGNSUB;

XMIT_ILOOP_PACKET ( ZERO );
ENDSUB;
END;

INCR .NDEX2 FROM O TO S DO
BEGIN

XMIT_BUFFER [ .INDEX2 ] = ( -.XMIT _BUFFER [ .INDEX2 ]
TARGET_ADR [ .INDEX2 ] = ..XMIT_BUFFER [ .INDEX2 ];

BGNSUB;
XMIT_ILOOP_PACKET ( ONE
ENDSUB;

END;

) - 1;

);

END;

INCR INDEX2 FROM O TO S DO
TARGET_ADR [ .INDEX2 ] = ZERO;
ENDTST;

000000G
000000G
000000G
000006
000005

$T17:

1$:

R1, $SAVE4
PC,RESET.DEQGNA
PC,PREP.FOR,.SETUP

JSR
CMP

PC,WRT,STATION.ADR

MOV

000000G
000023
000200
000000G

.SBTTL $T17 TEST 17 ‘ STATION ADDRESS TEST

JSR
JSR
JSR
MOV
MOV
suB

24é:

INC
CMP
BLE

#6,.R1

R1,-(SP)
#5,(SP)

(SP)+,(SP)+

INDEX1,*
INDEX1
INDEX1,*

3832

3833
3836

TRAP

MOV
JSR

+, INDEX1
INDEX1,*

3772
3830
3831
3832
3833

PC,XMIT,SETUP.PACKET

M19

M15
CZAGNACO DEGNA FUNCTIONAL TEST
" TEST 17 - STATION ADDRESS TEST

ZQGNA3

vV01.0

000060
000062
000064

000066
000070
000076
000102
000104
000106
000112
000116
000120
000122
000126
000130

000132
000136
00014C
000142

000144
000146
000152
000154
000160
000162
000164
000166
000170
000174
000176
000202
000204
000206
000212
000216
000220
000222
000224
000226
000230
000234
000236
000244
000246
000254
000256
000264
000270
000274

000300
000302
000306
000310

000006

BLO
MOV
MOV
ASR

000000G

3$:
44:

000000G

S$:

177777

022727
001003
012737
004737
004737
013702
010401
070127
005003
000417

CLR

-(SP)

MOV
JSR
TRAP

CLR
JSR

B8LO
CLR
MOV
ADD
MOV
CLR
BISB
MOVB
MOVB

000005
6$:

000001
000000G

96 ,RBUF .LENGTH
#6,RO

MOV

: *,INDEX1

#6,R2

PC,WRT,.STATION.ADR

: INDEX1,=*

2
(SP)

RO
44
RO
#XMIT.BUFFER,R1
RO,R1
#-1,R3
4

; INDEX2
:

INDEXZ2,#*

: INDEX2

INDEX2,#*

000003

002006

0000006

000000G

0000006
000000G

000016

: INDEX1,=*

#16,TEMP4
R4

8%:

3854
3856

: INDEX3

€0,43
8¢
6, TEMP4

PC,RESET.DEQGNA
PC,PREP,FOR.SETUP
TEMP4 ,R2
R4,R1
©#16,R1
R3

10¢

ANl

3857
3854
3858
3861

: INDEX1

R2
R%.023

€20000

3846
3848

(\R1).R4

R4,R3
R3,(R1)
R3,TARGET.ADR(RO)
RO
RO, #5
S$
2
#1,(SP)

(SP)+,(SP)+

000000G

(40)

3851

2$.XHIT.ILOOP.PACKET

RO
64

000016

Page 114

3843
3844

gg.XHIT.ILOOP.PACKET

000023

SEQ 0194

3833
3836

RO
RO
RO, XBUF .LENGTH

TRAP

151104
160403
110311

110360
005200
020027
003761
104402
012716
004737
104467
006000
103770
022626
005202
020227
003730
012737

[MAZURCZYK .DEQNA]ZQGNA3.BLI;2

ROR

005046
010246
004737
104402
005016
004737
104467

103771
005000
012701
060001
012703

VAX-11 Bliss-16 Vv4.,0-579

TST
TRAP

005726
104467

103767
012737
012700
006200
005400
010037
012702

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

*
INDEX3,

: INDEX4

3847
3846

3865
3866
38€8
3870
3871
3872
3873
3875
3873

N15
CZGNACO DEGNA FUNCTIONAL TEST
TEST 17 - STATION ADDRESS TEST
005046
010100
060300
010046
005316
012746
004737
010316
005046
004737
062706
005203
020302
003756
104402
012746
004737
005726
104467
006000
103767
012737
012700
006200
005400
010037
013703
005002

000426
005046
010100
00N436 060200
000440 010046
000442
005316
000444
012746
000450
004737
000454
005016
000456
005046
000460
004737
000464
104402
000466
005016
000470
004737
000474
104467
000476
006000
000500
103771
000502
062706
000506
005202
000510
020203
000512
003747
005001
000514
000516
012700
000522
060100
000524
012702

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

9¢:

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEGNAJZGNA3.BLI;2

SEQ 0195

Page 115
(40)
3875

;s INDEX4,*
0uv000S

PC,WALKING.BIT

R3,(SP)

-(SP)

000010

000200
000000G

PC,WRT.STATION.ADR
#10,SP
R3
R3,R2
9¢
2

10%:

11%:

: INDEX4

(SP)+

3883
3884

; INDEX4

000005
000000G

177777

15%:

2889

(SP)

3892

PC,WRT.STATION.ADR
2

TRAP
ROR

Pg.XHIT.ILOOP.PACKET
6
RO

BLO
144

(SP)
-(SP)

TRAP

ADD
INC

CMP

BLE

000000G

INDEX4,=»

PC,WALKING.BIT

13%:

CLR

MOV
ADD
MOV

3886
3888

-(SP)

12¢%:

3874
3873

3877
3880

#6,RO

RO
RO
RO, XBUF .LENGTH
TEMP4 ,R3
R2
14$%

3876

3877
3880

67
RO
11$
#6 ,RBUF .LENGTH

0000006
000000G

000010

INDEX4,=*

PC,XMIT,.SETUP.PACKET

000006

000000G

INDEX4,=

13$

#10,SP
R2
R2,R3

124

R1
#XMIT.BUFFER,RO
R1,RO
#-1,R2

: INDEX4
:

INDEX4,*

; INDEXZ2
H

;

INDEXZ2,
*

3887
3886
3896
3898

0l0
CZQGNACO DEGNA FUNCTIONAL TEST

S-Jul-1964 14:05:07

TEST 17 - STATION ADDRESS TEST

0000006

164$:

000001
0000006

S-Jul-1984 14:02:06

CLR
8I1SB
SuUB
MOVB
MOVB

TRAP
MOV
JSR
TST

TRAP

000005
000003

0002006

000€10
000614
000616
000622
000624

17¢:

000005

BLE

017312

1$:

104466
006000
103773

6 words,

Maximum stack depth per

Routine Base:

invocation:

2 words

(SP)e«

16$

3
B

3899
3902

;s INDEX2
;s INDEX2,+

3896

: INDEX3
s+ INDEX3,«

RO, 85

s
;s
s
:

17¢
«

PC,8T17
66

ABSCODES$

INDEX2
s(INDEX2)
INDEX2
INDEX2,+

3907
3907
3772

17312

JSR
TRAP

RTS

(40)

T17 TEST 17 - STATION ADORESS TEST

ROR

age

s ¢,+(INDEX2)

.SBTTL-

B8LO

000207

Routine Size:

3911
3912

T17::

2
01,-(SP)
PC,XMIT.ILOOP.PACKET

R1
R1,05
15¢
R4
R4,03
78
RO
TARGET .ADR(RO)
RO

RTS

004737

R2,TARGET.ADR(R1)

INC
cMP
BLE
INC
o o
BLE
CLR
CLRB
INC

203 words,
Routine Base:
ABSCODES$
;: Routine Size:
11 words
: Maximum stack depth per invocation:

000000
000000
000004
000006
000010
000012

R2,(RO)

cHP

(MAZURCZ
YK .DEQGNA ]ZGNAS.BLI ;2

SEO'Olflu‘

R3
(RO),R3
R3.R2

ROR

BLO

VAX-11 Bliss-16 v4.0-579

. 20140

1
1

Clé6

3908

Ll6
CZAGNACO DEGNA FUNCTIONAL TEST

ZGNA3

TEST 18 - ALL MULTICAST STATION ADDRESS TEST

3943
3944
3945
3946
3947
3948
3949
3950
3951
3952
3953
3954

3955
3956
3957
3958

3959

S5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK
.DEGNA JZGNAZ BLI ;2

foe

TEST 18:

ALL MULTICAST STATION ADDRESS TEST

DESCRIPTION:
This test vefifies that DEGNA recognizes 'all multicast’'

Hardware tested:

All Multicast Addressing

Set of

addresses:

b P
s et e i

'sll multicest’'

18051 Microprocessor
Address Filter Circuitry

DEQGNA Physical Addr
AA-00-00-00-00-00
AA-00-02-AA-AA-AA
AA-00-05-55-55-55
AA-00-04
-FF -FF -FF
AA-00-04-00-00-00
AA-00-04-18-81-18

b et (e Pt
e o
i o P

addresses of

the node and discards loopback packets with non-enabled addresses.
If the operator specifies loop on error, the program re-executes the
code that detected the error until tC is entered.

e P

et e P

e P

o Pt P

b et et Pt

#SBTTL *TEST 18 - ALL MULTICAST STATION ADDRESS TEST'

FF -FF -FF -FF -FF -FF

55-55-55-55-55-55
AA-AA-AA-AA-AA-AA
01-00-00-00-00-00
AB-AA-AA-AA-AA-AA
FF-00-01-02-03-04
00-F4-FA-44-44-55

Processing:

BEGIN

reset device

select internal loopback mode
set mode to Setup
load Station Address RAM with 'all multicast' addresses
REPEAT for 'all multicast’' addresses in and out of set
load 'all multicast’' address of the packet
disable receiver
transmit loopback packet
enable receiver
check for expected loopback status

d e Pt e P Pd Pt Pt P Pt ot Pt b P

3913
3914
3915
3916
3917
3918
3919
3920
3921
3922
3923
3924
3925
3926
3927
39248
3929
3930
3931
3932
3933
3934
3935
3936
3937
3938
3939
3940
3941
3942

Bl h P

G5 S8 G% S0 S

9% S8

S0 B

S0 B0 B0

G0 90 G0

S0 S0

B0 B0 S0 G0 S8 S8

95 8

v01.0

5-Jul-1984 14:05:07

IF error

THEN

print error message if not nhibited

END

ENDIF
call compare_packets
ENDREPEAT

D16

SEQ 0197

Page 117
(41)

D16

3999

4200
4001
4002
4003
4004
4005

G
B
W

4007
4008

4009
4010

S5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579
(MAZURCZ YK .DEQNA ]ZGNA3 .BLI;2

BGNTST;

*"RESET DEQNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING
TESTS IN EXTERNAL LOOPBACK MODE.

RESET_DEGNA ( ):
PREP_FOR_SETUP (

);

HEWWWNWWBLOONLLLLAVVVNBLLOODDLDLUWWUWWWWWWWWUINIWWWWWWWNWWWNWWW®N

3997

3998

B0 S0

90 B0

S0 90

90 W

CZQNACO DEQGNA FUNCTIONAL TEST
TEST 18 - ALL MULTICASY STATION ADDRESS TEST

INCR INDEX1 FROM 1 TO 13 D)

WRT_STATION_ADR
( .INDEX1, .INDEX1
WRT_STATION_ADR ( 14, PHA_INDEX );

BGNSUB;
XMIT_SETUP_PACKET ( A_MODE
ENDSUB
;

);

Teoo

|Jop.

NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY

RBUF _LENGTH

= 6;

XBUF _LENGTH =

(

.RBUF _LENGTH t

INCR INDEX FROM 6 TO 19 DO
BEGIN
WRT_STATION_ADR (

ZERO,

-1

.INDEX

BGNSUB;

XMIT_ILOOP_PACKET ( ZERO
ENDSUB;

);

INggcg?Exz FROM 0 TO S DO
XMIT _BUFFER [

MT)ARGETJ\DR [
END;

XMIT_BUFFER [
TARGET_ADR [

.INDEX2 ] = (

.INDEX2

ZERO ]

ZERO

]

BGNSUB;

XMIT_ILOOP_PACKET (

-.XMIT_BUFFER [

.XMIT_BUFFER [

.INDEX2 ]

.INDEX2

ZERO

]);

);

END;

INCR INDEX2 FROM O TO S DO
TARGET_ADR [

.INDEX2

]

];

)

.XMIT BUFFER [ ZERO ] AND %0'177774';

.XMIT_BUFFER [

ONE

ENDSUB
;

]

= ZERO;

ENDTST;

= 1A

SEQ 0198

Page 118
(42)

E16
CZONACO DEQGNA FUNCTIONAL TEST
TEST 18 - ALL MULTICAST STATION ADDRESS TEST
004137
004737
004737
012701
010146
010146
004737
022626

005201
020127
003767
012746
012746
004737
104402
012716
004737
104467

$T18:

0000006
N00000G
000000G

0000C1

14:

0000006

151104
160403
110311
110360
005200
020027
003761

142737
113737
104402

012716
004737

000201
000000G

R1,-(SP)
PC,WRT,STATION.ADR

(SP)+,(SP)«

4%:;

TRAP

CLR

TRAP
ROR

S$:

0000006

177777

8LO
CLR
MOV

ADD

CLR
8ISB
MOVB

MOVB

INC

000005

000000G

BLE
BICB

6$:

MOVB
TRAP
MOV

JSR

Page 119

(42)

+,INDEX1

INDEX]1,#
INDEX1,

INDEX1
INDEX1,+

3910
3967
3969
3969
3970

3969
3971

@6 ,R2
(SP)

3s:

000001
000000G

[MAZURCZYK.DEGNA JZGNA3.BLI;2

SEQ 0199

$7T18 TEST 18 - ALL MULTICAST STATION ADDRESS TEST

R1,$SAVE4
PC,.RESET.DEQGNA
PC,PREP.FOR.SETUP
¢1,R1

PC,WRT ,STATION.ADR
2
©201,(SP)
PC,XMIT SETUP.PACKET
67
RO
24
96 ,R3UF .LENGTH
26 ,RO
RO
RO
RO, XBUF .LENGTH

2%:

000003

VAX-11 Bliss-16 v4.0-579

016, -(SP)

000016
000023

004737
104302
005016
004737
104467

103771
005000
012701
060001
012703
005004

5-Jul-1984 14:02:06

000015

103770
012737
012700
006200
005400
010037
012702
005016
010246

000140
000144
000146
000150
000152
000154
000160
000162
000166
000170
000172
000174
000176
000202
000204
000210
000212
0¢0220
000226
000230
000234

.SBTTL
JSR
JSR
JSR
MOV
MOV
MOV
JSR

S-Jul-1984 14:05:07

PC,WRT.STATION.ADR

3974

3981
3982

+, INDEX
INDEX,

2
(SP)

3989

ggl JXMIT,ILOOP.PACKET
RO
4%
RO

@XMIT .BUFFER,R1
RO,R1
#-1,R3

3984
3986

INDEX2

3992
3994

INDEX2,
»

(R1),R4

R4 ,R3
R3,(R1)

R3,TARGET.ADR(RO)

#1,(SP)

PC,XMIT,ILOOP.PACKET

F1A

+,+(INDEX2)
INDEX2
INDEX2,
*

3995
3992

3998
3999
4002

F16
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 18 - ALL MULTICAST STATION ADDRESS TEST

ZGNA3

v01.0

000240
000242
000244
000246
000250
000252
000256
000260
000262
000266
000270
000274
000276
000300
:
:

Routine Size:

Maximum stack

000000

000000
000004
000006
000010
000012
;

:
5

104467
006000
103770
005726
005202
020227
003722
005000
105060
005200
020027
003772
022626
000207

004737
104466
006000
103773
000207

Routine Size:

Maximum stack

4011
4012

TRAP
ROR

000023

000000G

7%:

000005

BLO
TST
INC
cMP
BLE
CLR
CLRB
INC
CMP
BLE
cMP

RTS

5-Jul-1984 14:05:07

5-Jul-1984 14:02:06

VAX-11 Bliss-16 v4.0-579
[MAZURCZYK.D
]ZGNA3
EGNA
.BLI ;2

T16::
1¢:

(SP)+

R2
R2, 023

INDEX
INDEX,+

RO
TARGET.ADR(RO)
RO
RO, 05
74

INDEX2
«(INDEX2)
I.IDEX2
INDEX2,
»

(SP)+,(SP)+

JSR

PC,$T18
66
RO
1$
PC

BLO

3985
3984
4007
4008
4007

3910

T18 TEST

RTS

(42)

.SBTTL
TRAP
ROR

Page 120

RO
64

AB$CODE
$ + 20154
97 words,
Rout ine Base:
depth per invocation:
10 words

020154°

SEQ 0200

ALL MULTICAST STATION ADDRESS TEST

AB$CODE
$ + 20456
6 words,
Rout ine Base:
depth per invocation:
2 words

1
1

G116

G1l6
CZGNACO DEQGNA FUNCTIONAL TEST

ZGNA3

TEST 19 - RUNT PACKET TEST

RUNT PACKET TEST

TEST 19:

DESCRIPTION:

Hardware tested:

EPP

Address Filter Circuitry

Station Address table:
DEQGNA Physical Addr

22238

AA-00-00-00-00-00
AA- 00
-AA-AA-AA

el el

This test verifies that the DEGNA can detect runt packets in FIFO.

If the operator specifies loop on error, the program re-executes the
code that detected the error until tC is entered.

-55-55-55

-FF -FF -FF

Processing:
BEGIN
reset device
select internal loopback mode

load Station Address RAM with Station Addresses from table
load packet with valio Station Address

disable receiver
transmit lcopback packet
enable receiver
IF error

check for expected loopback status

ey e

-00-00-00
-18-81-18

THEN
print error message
ENDIF

4047
4048
4049
4050
4051
4052
4053
4054
4055
4056
4057
4058
4059
4060
4061
4062

feo

load packet with

if not

inhibited

invalid Station Address

disable receiver
transmit loopback packet
enable receiver
check for expected loopback status
IF error

4041
4042
4043
4044
4045
4046

VAX-11 Bliss-16 v4.,0-579
[MAZURCZYK.DEQGNAJZGNA3.BLI;2

#SBTTL *TEST 19 - RUNT PACKET TEST'

el e

S0
90
90
S8
S0
S8
G
B0
B0
S0
B0
B0
B0
S0
B
B0
S0
S0
S0
B0
S0
0
90
90
B0
S0
B0
S8
B
S8
S
S0
G0
S0
S0
B0
B
S0
S
S
S5
S5
B0
S8
S5
W

4017
4018
4019
4020
4021
4022
4023
4024
4025
4026
4027
4028
4029
4030
4031
4032
4033
4034
4035
4036
4037
4038
4039
4040

4016

0
80

4014
4015

el el el el el el

v01.0

4013

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

END

THEN
print error message
ENDIF

if not

inhi bited

SEQ 0201

Page 121
(43)

H16
CZGNACO DEGNA FUNCTIONAL TEST

ZGNA3

TEST 19 - RUNT PACKET TEST

4067
4068
4069
4070

4071
4072
4073

4074
4075
4076
4077
4078
4079
4081
4082
4083
4084
1085

4091

4092
4093
4094
4095

2096
4097

4098

B¢

S0
G0

4087
4088
4089
4090

4063

4100

4101
4102
4103

4104
4105

4106

4107
4108

4109

4110
4111

4112
4113

HWWOIVMUAAVANNTVTVTVTVTVTVTVTVTVNTIVTRNWE
VTN
N NN N
NS VTNV
N N N
NN
e

vC1.0

4064
4065

S-Jul-1984 14:05:07

S-Jul-1984 14:02:06

VAX-11 Bliss-16 v4,0-579

[MAZURCZ
YK .DEQNA ]ZGNA3.BLI;2

BGNTST;

”“ESET DEGNA AND INITIALIZE ETHERNET STATION ADDRESS RAM IF EXECUTING
TESTS IN EXTERNAL LOOPBACK MODE.

RESET_DEGNA (

);

PREP_FOR_SETUP (

);

INCR INDEX1 FROM 6 TO 19 DO
WRT_STATION_ADR ( .INDEX1 - S, PHA_INDEX );

BGNSUB;
XMIT_SETUP_PACKET ( M_MODE
ENDSUB
;

);

fee

NOW LOOPBACK 6 BYTE PACKETS AND CHECK IF THEY ARE RECEIVED PROPERLY

RBUF _LENGTH = 6;
XBUF _LENGTH = - (

_RBUF _LENGTH t

-1

WRT_STATION_ADR (

ZERO, PHA_INDEX

);

BGNSUB
;

XMIT_ILOOP_PACKET (

ENDSUB
;

BGNSUB;
WRT_STATION_ADR (

ZERO

);

ZERO, 2

);

.IOP_TABLE [ CSR ] = ONE;
SET_RDESCR_LIST ( .XBUF _LENGTH, VE );
.IOP_TABLE [ RLO_ADR ] = RCV_D_LIST;
.IOP_TABLE [ RHI_ADR ] = ZERO;
SET_XDESCR_LIST ( .XBUF _LENGTH, VE );
.JOP_TABLE [ XLO_ADR ] = XMIT _D_LIST;
.IOP_TABLE [ XHI_ADR ] = ZERO;
CHX _RIXI_STATUS ( ZERO );

CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK
);
CHK _XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS );
CH<_RCV_STATUS ( RFLG_STATUS, RWD16_STATUS );

! 0'100220', 0'100220°
! 0°'140000', 0'000400’
! 0'1492000', 0'044000'

.JOP_TABLE [ CSR ] = ZERC;

ENDSUB;

ENDTST;

T16

SEQ 0202

Page 122
(44)

116
CZQONACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 19 - RUNT PACKET TESTY

$T19:

1%:

.SBTTL
MOV
JSR
JSR
MOV
MOV
SuB
MOV

$T19 TEST 19 - RUNT PACKET

PC.PREP.FOR_.SETUP
05,(SP)

2s:

(44)

TEST
4010

¢, INCEX1
INDEX1,»

4070
4071
4072
4073

INDEX1
INDEX]1,»

4072

4073
4076

(SP).
67

4073
4076

2s
06 ,RBUF LENGTH

26 ,R0O
RO

4083
4084

RO, XBUF .LENGTH

-(SP)

4086

023, -(SP)

3s:

TRAP

CLR

TRAP
ROR
a%:

000016G

BLO

TRAP

CLR
MOV
JSR
MOV
MOV
MOV

JSR

000000G 0000106
0000126

012716
011646

0000006
100220

CLR
MOV
MOV
JSR
MOV

CLR
CLR
JSR
MOV

MOV

;C.HRT.STATION.ADR
4089

(SP)

PC,XMIT
. ILOOP.PACKET

38
2

4090
4093

(SP)

02,-(SP)
PC,WRT_STATION.ADR

01,3I0P.TABLC+16

XBUF LENGTH,
(SF)

4095
4097

©-60000, -(SP)

PC,SET.RDESCR.LIST
¢RCV.D.LIST,3I0P.TABLE-4

@I0P.TABLE+6
XBUF _LENGTH,
(SP)

©-60000, -(SP2}
PC,SET.XDESCR.LIST
OXMIT.D.LIST,3I0P.TABLE+10

JIOP.TABLE-12
(SP)
PC,CHK
. RIXI.STATUS
©-77560,(SP)

(SP),-(SP)

000112
000114
000120
000124
000126
000130
000134
000136
000140
000142
000144
000146
000152
000156
000164
000170
000174
000200
000206
000212
000216
000222
000226
000234
000240
000242
000246
000252

Page 123

2
9200, -(SP)

PC,XMIT
SETUP . PACKET

000102

SEC 0203

PC,WRT_STATION.ADR

(SP)+,(SP)«

000200

[(MAZURCZYK.DEQGNA JZONA3.BLI ;2

PC.RESET.DEGNA

R1
R1,023
1%

000023

VAX-11 Bliss-16 v4.0-579

MM A

4098
4099
4101

4102
4103

4105

4106

J16
CZQNACO DEGNA FUNCTIONAL TEST

S-Jul-1984 14:05:07
S5-Jul-1984 14:02:06

TEST 19 - RUNT PACKET TEST

004737
012716

012746
004737
012716
012746
004737

005077

062706
104467
006000
103706
022626
012601
000207
;:

Routine Size:

004737

Maximum stack

4114

4115

JSR
CLR
ADD

cMP

(SP)+,(SP).

RTS

020472

Routine Base:

invocation:

10 words

T19::
1%:

(SP).,R1

(44)

4107

4108

4110

SEQ 0204
Page 124

4030
:

4110

4010

4111

ABSCODES +« 20472

.SBTTL

JSR

T19 TEST

- RUNT PACKET TEST

PC,$719

TRAP
ROR

66
RO

RTS

BLO

6 words,
depth per

214,5P

67
RO

MOV

110 words,

PC,CHK .CSR.STATUS
€-40000,(SP)
0400, -(SP)
PC,CHK XMIT.STATUS
©-40000,(SP)
©44000, -(SP)
PC,CHK
. RCV,.STATUS
JIOP.TABLE+16

TRAP
ROR

BLO

104466
006000
103773
000207

; Routine Size:

JSR
MOV
MOV
JSR
MOV
MOV

000014

Maximum stack oepih per

000000
000004
000006
000010
000012
;:

0000006
140000
000400
000000G
140000
044000
0000006
0000166

VAX-11 Bliss-16 v4.0-579
[MAZURCZYK.DEGNA ]ZGNA3.BLI ;2

Routine Base:
ABSCODES +« 21026
invocation:
2 words

IK1A

K16
TEST 20 - FIFO OVERFLOW TEST

e
b et e

[(MAZURCZYK.DEGNAJZGNA3.BLI;2

fee
]

FIFO CVERFLOW TEST

TEST 20:
DESCRIPTION:

This test verifies that the Ethernet Protocol Processor can
detect receive FIFD overflow condition. If the operator specifies
loop on error, the program re-executes the code that cetected the

.error until

is entered.

Hardware tested:

RCV Status wd 1 - error summary (bit 14),
FIFO overflow (bit 0),

Byte FIFO in the EDLC,
and discard packet (bit 12)

Processing:

BEGIN

reset device

select loopback mode
enable receiver ( set CSR bit 0)
transmit loopback packet
transmit another loopback packet
check for expected loopback status
IF error

THEN
print error message
ENDIF

if not

inhibited

b o

e ot ot o

b et (e i

b e e

b o

e e (i

b e

5-Jul-1984 14:02:06

VAX-11 Bliss-16 V4.0-579

#SBTTL *‘TEST 20 - FIFO OVERFLOW TEST'

8 e e

d ot b e

reset device
transmit loopback packet
transmit a packet

setup Receive Descriptor List

enable receiver (set CSR BIT 0)

check for expected loopbeck status
IF error
THEN
print error message

d et

4134

4135
4136
4137
4138
4139
4140
4141
4142
4143
4144
4145
4146
4147
4148
4149
4150
4151
4152
4153
4154
4155
4156
4157
4158

a12%

4126
4127
4128
4129
4130
4131
4132
4133

b et e

4123

4124

v01.0

4116
4117
4118
4119
4120
a121
4122

5-Jul-1984 14:05:07

CZQGNACO DEGNA FUNCTIONAL TEST

ZQANA3

ENDIF
END

if not

turn of 3 LED's on the module

inhibited

SEQ 0205

Page 125
(45)

L16
CZGNACO DEQGNA FUNCTIONAL TEST
TEST 20 - FIFO OVERFLOW TEST

Z2GNA3
4159
4160
4161
4162
4163
4164
4165
4166
4167
4168
4169
4170
4171
4172
4173
4174
4175
4176
4177
4178
4179
4180

4181
4182
4183
4184

4185
4186

4187
4188
4189

4190
4191

4192
4193
4194
4195
4196
4197
4198
4199
4200
4201
4202
4203
4204
4205
4206
4207
4208

4209
4210
4211

VUVVNUNTVTNTVUVTNTVVTVTVTVNTHOIN
NN D VOV DD B WU
W W O WEUVINTHI N R NN NN NN NN W

v01.0

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

VAX-11 Bliss-16 V4.0-579
(MAZURCZYK.DEQNA]ZGNA3.BLI;2

BGNTST;
e

H .RESET DEGNA AND INITIALIZE ETHERNET STATION ADDRESS RAM
RESET_DEGNA ( ):
PREP_FOR_SETUP (

);

INCR INDEX1 FROM 1 TO 14 DO
WRT_STATION_ADR ( .INDEX1, PHA_INDEX );

BGNSUS ;
XMIT_SETUP_PACKET ( P_MODE
ENDSUB
;

);

LOOPBACK 2 6-BYTE PACKETS IN INTERNAL LOOPBACK MODE CHECK IF PACKETS
WERE RECEIVED PROPERLY, SHOULD TRANSMIT AND RECEIVE PROPERLY.
RBUF _LENGTH = 6;

XBUF _LENGTH =

- (

.RBUF_LENGTH t

-1 );

INCR INDEX FROM 2 TO 3 DO

BEGIN
WRT_STATION_ADR ( ZERO,

.INDEX );

BGNSUB;
XMIT_ILOOP_PACKET ( ZERO );
ENDSUB;

END;
Toe

'
!

FORCE RECEIVE FIFO OVERFLOW ( RCV STATUS WD 1 - BIT O ) BY TRANSMITTING
2 ND 6-BYTE PACKET IN INTERNAL LOOPBACK MODE BEFORE RECEIVING FIRST PACKET

BGNSUB;

.IOP_TPBLE [ CSR ] = ZERO;

WRT_STATION_ADR ( ZERO, 2

);

SET_XDESCR_LIST ( .XBUF _LENGTH, VE );
.IOP_TABLE [ XLO_ADR ] = XMIT_D_LIST;
.IOP_TABLE { XHI_ADR ) = ZERO;
CHK_RIXI_STATUS ( ONE );
WRT_STATION_ADR ( ZERO, 3 );
SET_XDESCR_LIST ( .XBUF _LENGTH, VE );
.JOP_TABLE [ XLO_ADR ] = XMIT_D_LIST;
.IOP_TABLE [ XHI_ADR ] = ZERO;

M1 A

SEQ 0206

Page 126
(46)

M16
CZGNACO DEQGNA FUNCTIONAL TEST

ZGNA3

TEST 20 - FIFO OVERFLOW TEST

4212
4213
4214
4215
4216

4217
4218
4219
4220
4221
4222
4223
4224
4225
4226
4227

4228
4229
4230
4231
4232
4233

FUHWNWWOWOHWORWOLUVTLLMUNULTLTLLLTLTULINY

v01.0

000000
000002
000006
000012
000016
000020
000024
000030
000032
000034
000040
000042
000044
000050
000054
C00056
000060
000062
000064
000072
000076
000100
000102
000196
000112
000114
000116
000122

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

010146
004737
004737
012701
010146
012746
004737
022626
005201
020127
003766
104402
012746
004737
005726
104467
006000
103767
012737
012700
006200
005400
010037
012701
005046
010146
004737
104402

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK.DEGNA]ZQGNA3.BLI;2

SEQ 0207

Page 127
(46)

SET_RDESCR_LIST ( .XBUF_LENGTH, VE );
.JIOP_TBLE [ RLO_ADR ) = RCV_D_LIST;
= ZERO;
.IOP_TABLE [ RHI_ADR
.TOP_TABLE [ CSR ] = ONE;

CHIK_RIXI_STATUS ( ZERO );

CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK );
CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS );
CHK_RCV_STATUS ( RFLG_STATUS, RWD15_STATUS );

! o 00220’, 0'100220'
! o 40000’, 0'000400’
40000’, 0'000001’
N

.ICP_TABLE [ CSR ] = ZERO;

ENDSUB;

RESET_DEGNA (
TURN_OFF _LED
TURN_OFF _LED
TURN_OFF _LED
TURN_OFF _LED

);
(
(
(
(

N_MODE );
LED1 );
LED2 );
LED3 );

ENDTST;

000000G
000001
000023
0000006

$T20 TEST 20 - FIFO OVERFLOW TEST

JSR
JSR
MOV

PC,RESET.DEGNA
PC,PREP.FOR.SETUP

MOV

1$:

MOV

000016

2%:

000202
0000006

.SBTTL

$720:

MOV
JSR

CMP
INC
CMP
BLE

TRAP
MOV

JSR
TST

TRAP
ROR

000006
000006
000000G
000002

000000G

BLO
MOV
MOV

000000G

44:

¢1,R1

R1,-(SP)
#23,-(SP)
PC,WRT,.STATION.ADR

(SP)+,(SP)+

4167
4168
4171

PC,XMIT,.SETUP .PACKET

4168
4171

24
#6 ,RBUF .LENGTH
#6,RO

4179
4180

(SP)+

RO
RO
RO, XBUF .LENGTH

MOV

R1,-(SP)
PC,WRT,STATION.ADR
2

JSR
TRAP

INDEX1
#
INDEX1,

#202, -(SP)

ASR
NEG
MOV
MOV

CLR

+,INDEX1

INDEX1,*

4113
4165
4166
4167
4168

#2,R1
-(SP)

*, INDEX

INDEX,
*

4182
4184

Bl
CZGNACO DEGNA FUNCTIONAL TEST
TEST 20 - FIFO OVERFLOW TEST

ZQGNA3

vol1.0

000124
000126
000132

000140
000142

005016
004737
104467
006000

(SP)

PC,XMIT,ILOOP.PACKET
67

0000006

(SP)+,(SP)e

R1
R1,03

000003
Ss:

0000166

38
2
8I0P.TABLE+16
-(SP)

4187

INDEX,s

4182

8IOP.TABLE.12

:
:
H

4202
4203
4205

(SP)

4206

XBUF .LENGTH,
(SP)

4208

4209

©-60000, -(SP)

PC,SET.XDESCR.LIST

01,(SP)
PC,CHK
. RIXI.STATUS

03,-(SP)
PC,WRT STATION.ADR

000016G

4183

4201

XBUF .LENGTH
(SP)
,

000000G 000010G

: INDEX

PC,.WRT,.STATION.ADR

000000G 000C10G

4189
4197
199

9-60000, -(SP)
PC,SET.XDESCR.LIST
OXMIT.D.LIST,3I0P.TABLE-10

@I0P.TABLE+12
XBUF .LENGTH,
(SP)

(SP),-(SP)

006000

103660

(46)

H
H
H

004737
012746

[MAZURCZYK ,DEGNA]ZQGNA3.BLI;2

SEQ 0208
Page 128

011646
004737
012716
012746
004737
012716
012746
004737
005077
062706

104467

VAX-11 Bliss-16 v4,0-579

103771

022626
005201
020127
003760
104402
005077
005046
012746
004737
013716
012746
004737
012777
005077
012716
004737
005016
012746
004737
013716
012746
004737
012777
005077
013716
012746
004737
012777
005077
012777
005016
004737
012716

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

PC,CHK RCV.STATUS

8I0P.TABLE+16
@22,5P

S$
PC,RESET.DEGNA

H
H

4210
4212

4213

H
:

4216
4218

4219

4220

4221

4223

:
H

4226
4228

4214

418

Cl
CZAGNACO DEGNA FUNCTIONAL TEST

ZQANA3

v01.0

000422
000426
000432
000436
000442
000446
000452
000456
000460
000462

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

TEST 20 - FIFO OVERFLOW TEST

004737

012716
004737
012716
004737
012716
004737
005726
012601
000207

JSR
MOV

0000006
000204
0000006
000210
000000G
000214
000000G

JSR

MOV

JSR
MOV
JSR
TST

MOV
RTS

VAX-11 Bliss-16 v4,0-579
(MAZURCZYK.DEGNA)ZQGNA3.BLI;2

(SP)+
(SP)+,R1

~B$CODE
$ + 21042
154 words,
Routine Base:
: Maximum stack depth per invocation:
11 words

Routine Size:

000000
000000
000004
000006
000010
000012
:

004737

021042

1$:

T20 TEST 20 - FIFO OVERFLOW TEST

JSR

PC,$T20

006000

TRAP
ROR

000207

RTS

104466

103773

6 words,
Maximum stack depth per

Routine Size:

4234

T20::

.SBTTL

8LO

$ + 21526
AB$CODE
Rout ine Base:
invocation:
2 words

4231

D1
CZQNACC DEQGNA FUNCTIONAL TEST

4264

4265
4266
4267
4268
4269
4270

4271

4272
4273

b ot Pt
b et et P
b P

DESCRIPTION:
This test verifies that the Sanity Timer times out after a pre-set

( supplied by the operator ) timeout period. The Sanity Timer uses
DCOK line on the Q-Bus to force the power_fail interrupt of the
processor which

in turn causes the processor to reboot

itseif.

Hardware tested:

Senity Timer Logic

Processing:

BEGIN

reset device

store Console Terminal and Power_fail
( location 24 and 60 octal )
enable Console Terminal interrupt
arm for Power_fail interrupt

e o

b ot o

e o

b e P

SANITY TIMER TEST

TEST 21:

interrupt vectors

inform the operator about the test procedure

b o P

set the Sanity Timer to timeout value supplied by the
operator

enable the Sanity Timer

wait

%:EPouer-foil

N
N sgrint
L

b ot o

90
S0
S0
B0
B0
S0
S0
S0
S8
80
G0
65
B

4261
4262
4263

.
foo

interrupt occured

*SANITY TIMER TIMED OUT AS EXPECTED'

force Console Terminal

print error message

4257

4258
4259

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEQNA]ZQGNA3.BLI;2

#SBTTL 'TEST 21 - SANITY TIMER TEST'

ENDIF

b et P

4256

5-Jul-1984 14:05:07
5-Jul-1984 14:02:06

TEST 21 - SANITY TIMER TEST

Pt et Pt

4235
4236
4237
4238
4239
4240
424}
4242
4243
a2aa
4245
4246
a2a7
4248
4249
4250
4251
4252
4253
4254
4255

ZGNA3
v01.0

END

input

if not

interrupt by typing “Q"

inhibited

Timer
disable Sanity
restore Console Terminal and Power_fail
( location 24 and 60 octal )

interrupt vectors

SEQ 0210

Page 130

(a7)

E1l
v01.0

TEST 21 - SANITY TIMER TEST

4274

BGNTST;

4276

IF .SWP_TIMER

4279

4281

RESET_DEGNA (

:
:
:

4275

42717
4278

4280

3
4

4
4

P
:

4282
4283

428

:
:

4287
4288

4
4

:
:

4293
4294

4
4

.
.
:
.

3
.

423451

4286

4289
4290
4291
4292
4295

4296
4297

4533

4
4
4
4

4301

4304

4300

3
3

4302
4303

:
s
;

4305
4306
4307

4309

s
:
3
:

:
5
3
s

:
:
3
5
:

6
7

4308

4310

4315
4316
4317
4318

4319

4325

[MAZURCZYK.DEQNAJZQNA3.BLI;2

RESET DEGNA AND INITIALIZE ETHERNET STATION ADDRESS RAM
);

SETUP FOR POWER FAIL AND CONSOLE TERMINAL INTERRUPTS

SETVEC ( PF_VEC_LOC, PWR_INT, PRIO7 );
SETVEC ( KB_VEC_LOC, KBD_INT, PRIOS );
SETPRI ( PRIOO );
PREP_FOR_SETUP ( );

! POWER FAIL
! CONSOLE TERMINAL
! SET PROCESSOR PRI LEVEL

INCR INDEX1 FROM 1 TO 14 DO
WRT_STATION_ADR ( .INDEX1, PHA_INDEX );

BGNSUB;

PUT_BIT [ CSR, SE, EENABLE );

XMIT_SETUP_PACKET ( #0'200' + ( .SWP_TOUT_VAL t 4 ) );
SELECTONE .SWP_TOUT_VAL OF
SET

[ 0.1 ):

BEGIN

TEMPL

= 1;

PRINTB ( MSG32,

(2 1]:

END;

BEGIN

TEMPL1

= 4;

PRINTB ( MSG32,

[ 31):

END;

BEGIN
TEMP1 = 16;

PRINTB ( MSG32,

[ 4]:

7
6
6
7

4326

1--

6
6
7

4320
4321
4322
4323
4324

€
6
7
7

5-Jul-1984 14:02:06

THEN
BEGIN

6
6
7

4311
4312
4313
4314

S-Jul-1984 14:05:07

CZQNACO DEQGNA FUNCTIONAL TEST

ZQNA3

VAX-11 Bliss-16 V4,0-579

END;

BEGIN

TEMPL1

[

)

PRINTB ( MSGSS,
ND;
BEGIN

TEMP1

= 4;

PRINTB ( MSGSS,

END;

.TEMP1 );

.TEMP1

);

SEQ 0211

Page 131

(48)

F1
CZQNACO DEGQNA FUNCTIONAL TEST

ZQGNA3

TEST 21 - SANITY TIMER TEST

4345
4346

4369
4370
4371
4372
4373
4374

000000
000002

HFPUWENDBRANNNANOANONOO
OO
TR
INNOR I IO

4327
4328
4329
4330
4331
4332
4333
4334
4335
4336
4337
4338
4339
4340
4341
4342
4343
4344

©F

G0 O

Ss
G0 G0

v01.0

010146
005746

{ 6 1:

[71):

S5-Jul-1984 14:02:06

VAX-11 Bliss-16 V4,0-579

[(MAZURCZYK.DEGNA]JZGNA3.BLI;2

SEQ 0212

Page 132

(48)

BEGIN

TEMP1 = 16;
PRINTB ( MSGSS,
END;

.TEMP1

);

.7EMP1

);

BEGIN

TEMPL1 = 1;
PRINTB ( MSGS6,
END;

TES;

S-Jul-1984 14:05:07

PRINTB ( MSG57 );

INTERRUPT
FLG = -1;
WAIT_FOR_TIMEOUT ( );

""PUT DEGNA IN NORMAL MODE AND CHECK STATUS
PUT_BIT [ CSR, SE, DISABLE J;

PREP_FOR_SETUP (

);

INCR INDEX1 FROM 1 .TO 14 DO
WRT_STATION_ADR ( .INDEX1, PHA_INDEX );

BGNSEG:

XMIT_SETUP_PACKET ( N_MODE
ENDSEG;

CLRVEC ( PF_VEC_LOC
CLRVEC ( kB_VEC_LOC
IF

);

);
);

_INTERRUPT_FLG

THEN
BEGIN
PRINTB ( MSG33 )
END
ELSE
BEGIN

CSR_WORD = GET_BIT ( CSR_ALL

PRINTB ( MSGS9 );
PRINTB { MSG34 );

ERRDF

END;
ENDSUB;

);

( 2101, MSGOO, ERRORSREPORT

);

ENDTST;

$T21:

.SBTTL

MOV
TST

$T21 TEST 21 - SANITY TIMER TEST

R1,-(SP)
-(SP)

4233

G1l
CZQGNACO DEGNA FUNCTIONAL TEST
TEST 21 - SANITY TIMER TEST

000102
000114
000120
000122
000124
000130
000132
000134
000140
000146
000152
000156
000160
000164
000170
000174
000176
000202
000204
000212
000216
000222
000226
000230
000232
000234
000240
000242
000250
000254
000260
000264
000266
000270

032737
001002
000137
004737
012746
012746
012746
012746
104437
012716
012746
012746
012746
104437
012700
104441
004737
012701

010116
012746
004737
005726
005201
020127
003766

104402
013700
052760
013700
072027

000001

000000G

022542'
0000006
0000006
0000006
000024
000003

1$:

OPRIOS,(SP)
oKBD
INT, -(SP)
.

000000G

@PRIOO,RO
41

PC,PREP.FOR.SETUP

000000G
000001

¢1,R1

R1,(SP)

2%:

000023
000000G

Page 133

(48)

4276

4284

;
4289

;

4290

4291

4292

s+ INDEX1

4293

H
H

4294
4297

4298

; +,INDEX1
s INDEX1,=

4293
4294

PC,WRT ,STATION.ADR

(SP)«

R1
R1,216

000016

3s:
000016

000000G

010600

104414
000531
020127
001014
012737
012716
012746
012746
010600
104414
000512

(MAZURCZYK .DEGNA]ZQGNA3.BLI;2

SEQ 0213

0000006
000000G
000060
000003

010016

062716
004737
013701
002417
020127
003014
012737
012716
012746
012746

VAX-11 Bliss-16 V4,0-579

44:;

MOV
MOV
MOV
MOV
MOV
TRAP
BR

INDEX1,s

4300

4302

4304

4305

TRAP

0000006

SP,»

4303

4307

]

4309

04,(SP)
oMSG32, -(SP)

4310

SP,RO
Lh
104

:
:

SP,»
4308

H1
CZQANACO DEGNA FUNCTIONAL TEST
TEST 21

020127
001014
012737
012716

012746
012746
010600
104414

- SANITY TIMER TEST
S$:

000003

000416
020127
001014

000552

012737
012716
012746
012746
10600
104414
022626
012716
012746
010600
104414
012737
004737
013700
042760

CMP
MOV
MOV

0000006
000020
000020
000000G
000002

000473

020127
001014
012737
012716
012746
012746
010600
104414
000454
020127
001014
012737
012716
012746
012746
010600
104414
000435
020127
001014
012737
012716
012746
012746
010600
104414

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

MOV

MOV
MOV
TRAP

6$:

BR
CMP
MOV
MOV
MOV

0000006

MCV
TRAP

78:

BR
CcMP
MOV

0000006

MOV
MOV
MOV
MOV

TRAP

8¢:

BR
CMP
BNE

MOV

0000006
000020
000020
0000006
000002

MOV
MOV
MOV
MOV

TRAP

9s:

000007

MOV

000001
000000G
000001
000000G
000002

177777

MOV
MOV
MOV

MOV
TRAP

10¢:
11$:

000000G
000001
0000006

000000G
000000G
000016
002000

BR
CcMP

CcMP
MOV

MOV
MOV
TRAP
MOV

JSR

MOV

BIC

VAX-11 Bliss-16 V4,0-579

[MAZURCZYK.DEQGNA)ZQGNA3.BLI;2

R1,03
64
020, TEMP1
#20,(SP)
oMSG32, -(SP)

02,-(SP)
SP,.RO
14
10¢

Page 134

(48)

4312
4314
4315

: SP,»
4313

R1,04
74
€1,TEMP]

4317

4319
4320

01,(SP)
OMSGS55, -(SP)

SP,RO
14
10¢

SEQ 0214

: SP,s

R1,05

4318
4322

04, TEMPL
04,(SP)

4324
4325

#MSGS5, -(SP)

02,-(SP)
SP,RO

14
10¢
R1,06

H Spo‘
4323
4327

9
020, TEMP1

4329
4330

02,-(SP)
SP,.RO
14
10¢

: SP,»
4328
4332

R1,07
11%
#1,TEMPL
01,(SP)

4334
4335

SP,RO
14
(SP)+,(SP)+

: SP,»

SP,RO

: SP,»

4333
4339

OMSGS7,(SP)

4340
4341

a3a?

I1
CZQNACO DEQNA FUNCTIONAL TEST

S-Jul-1984 14:05:07
S-Jul-1984 14:02:06

TEST 21 - SANITY TIMER TEST

004737
012701

010116
012746
004737
005726
005201
020127
003766
104404

000670
000672
000674
000676

000702
000710
000716
000722
000726
000730
000732
000736
000742
000744
000746
000750
000752
000754
000756

000760
000762
000764
000766
000770
000774
001000
001002
001004

000016
000200
000000G

012700

000024

012700
104436
032737
001407
012716
012746
010600
104414
000431
013700
016066
016637
012716
012746
010600
104414
012716
012746
010600
104414
104455
004065
000000G
000000G
005726
022626
104467
006060
103002
000137
062706
005726
012601
000207

000060

104436

; Routine Size:

12¢:

000023
000000G

012716
004737
104470
006000

103770

JSR

000000G
000001

13¢:

MOV

MOV
JSR
TST
INC
CMP
BLE

TRAP

MOV
JSR
TRAP

ROR

000001

BLO
MOV
TRAP
ML
TRAP

BIT
BEQ
MOV
MOV
MOV

000000G

0000706
000001

TRAP

000000G
000016
000020
000020 000000G
000000G

14%:

000001

MOV
MOV
MOV
MOV
MOV

MOV

TRAP

MOV
MOV

000000G
000001

MOV

TRAP
TRAP

.WORD
.WORD
. WORD

15¢:

021674’

000016

259 words, .

16%:
17¢:

Rout ine Base:

TST

cMP

PC,PREP.FOR,.SETUP
¢1,R1

R1,(SP)

+, INDEX1

023, -(SP)
PC,WRT,STATION.ADR

(SP)«

R1
R1,£16

124

: INDEX1
: INDEX1,#

SEQ 0215

Page 135

(48)

4348
4349
4350

4349

4350
4353

13$

€24 ,RO
36

4356

960,R0
36
:};INTERRUPT.FLG

4357

oMSG33,(SP)

4362

4359

SP,RO
14
154

SP,»

16(R0),20(SP)
20(SP),CSR.WORD

+,.TM
LOCATICN
P

REG.ADR,RO

#MSG59,(SP)

e1,-(SP)

4359
4366
*
TMP.LOCATION,

SP,.RO
14

H Spo‘ '

SP,RO
14
S5
4065

: SP,»

4367

4368

oMSG34,(SP)

4369

MSGOO

ERRORS$REPORT

(SP)«
(SP)+,(SP)+

TRAP
ROR

ADD

BHIS
JMP

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEQGNA JZGNA3.BLI;2

16$
3

(SP)+
(SP)+,R1

TST
MOV
RTS

ABSCODES

+ 21542

4365
4294
4370

4278
4233

J1
ZQNA3
v01.0

‘

CZQNACO DEGNA FUNCTIONAL TEST
TEST 21 - SANITY TIMER TEST

: Maximum stack depth per invocation:

14 words

021542’

Tel::

000000

004737

000004
000006
000010
000012

104466
006000
103773
000207

000000

Routine Size:

1$:

6 words,

Routine Base:

Maximum stack depth per invocation:
4375
4376
4377

1
1
0

LSBTTL

T21 TEST 21 - SANITY TIMER TEST

JSR

PC,$T21

TRAP
RCR
8L0
RTS

2 words

S-Jul-1984 14:05:07
5-Jul-1984 14:02:06

VAX-11 Bliss-16 V4,0-579
[(MAZURCZYK.DEQGNA]JZQGNA3.BLI;2

66
RO
14
PC

END
ELUDOM

$SAVEZ2

PSECT SUMMARY
Psect Name
AB$CODE$

Words
4794

Attributes
M,
I
«

LELs

NEL,

EON

Library Statistics

g oo b

File

Y s

DISK$USER2:[MAZURCZYK.DEGNAJGNALIB.L16;2

e Symbols --------

Total

Loaded

Percent

223

142

Pages

Mapped

COMMAND QUALIFIERS

BLISS/PDP11 ZQGNA3.BLI/LIST=ZGNA3.LIS/0BJECT=ZQNA3.0BJ/SOURCE=PAGE:53

Processing
Time

’

Page 136
(48)

4372

ABSCODE$ « 22550

0TS external references
.GLOBL
$SAVE4, $SAVE3,

SEQ 0216

00:00.1

iK1

ZQNA3
v01.0
Size:

Run Time:

CZQNACO DEQNA FUNCTIONAL TEST
TEST 21 - SANITY TIMER TEST
4794 code ¢+ 0 data words
02:12.1

08:39.0
Elapsed Time:
1988
Lines/CPU Min:
Lexemes/CPU-Min: 23670
Memory Used: 437 pages
Compilation Complete

S5-Jul-1984 14:05:07

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

SEQ 0217

Page 137

It pt et et = O OO0 OO0

CZQNACO DEQNA FUNCTIONAL TEST

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEGNAJZQGNA4
.BLI ;2

MODULE ZQNA4 (#TITLE ‘'CZQGNACO DEGNA FUNCTIONAL TEST'
IDENT = 'V01.0',
ADDRESSING_MODE(ABSOLUTE)
)

#SBTTL 'GLOBAL ROUTINE DECLARATION MODULE'
BEGIN

LIBRARY 'QGNALIB';
REQUIRE 'BLSMAC.REQ’:
1 <BLF/NOFORMAT>

QNALIB LIBRARY
DIAGNOSTIC SUPERVISOR LIBRARY

SEQ 0218

Page

(1)

M1
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE DECLARATION MODULE

ZQNA4
V01.0

1539
1540
1541

FORWARD ROUTINE

XMIT_AND_RCV_PACKET

: NOVALUE;

EXTERNAL DATA USED BY THIS MODULE

EXTERNAL
*e

COMMUNICATION AREA DECLARATIONS

b o

ot o

b e (b

CCDE = ACS$CODES;

RCV_D_LIST
XMIT_D_LIST

: BLOCK
: BLOCK

RCV_BUFFER
XMIT_BUFFER

: VECTOR [ B_SIZE, BYTE ],
: VECTOR [ B_SIZE, BYTE ],

TARGET_ADR

: VECTOR [ T_SIZE, BYTE 1],

b o

DESCR_LIST

: BLOCK

b i

b o

DATA_BUFFER
SETUP_BUFFER
IOP_TABLE
BD_PROM_DESCR
STATION_ADR

PHYS_ADR

:
:
:
:
:

VECTOR
VECTOR
VECTOR
VECTOR
VECTOR

[ D_SIZE, WORD ] FIELD C( DL_FIELDS ),
[ D_SIZE, WORD ) FIELD ( DL_FIELDS ),

[ DESCR_SIZE, WORD) FIELD ( DL_FIELDS ),
[
[
[
[
[

BUF_SIZE, BYTE ],
SETUB_SIZE, WORD ],
8, WORD ],
BD_D_SIZE, WORD ],
4, WORD 1],

: VECTOR [ 22, BYTE 1],

b
ot d o o
b ot o

1533
1534
1535
1536
1537
1538

PSECT

0 e ot b

1502
1503
1504
1505
1506
1507
1508
1509
1510
1511
1512
1513
1514
1515
1516
1517
1518
1519
1520
1521
1522
1523
1524
1525
1526
1527
1528
1529
1530
1531
1532

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

HARDWARE

AND SOFTWARE P-TABLE STORAGE DECLARATIONS

HWP_TABLE
SWP_TABLE

: REF BLOCK [ HWP_SIZE, WORD ] FIELD ( HWP_FIELDS ),
: REF BLOCK [ SWP_SIZE, WORD ) FIELD ( SWP_FIELDS ),

REG_ADR

: REF REG_STR FIELD ( IOP_FIELDS ),

GET_ADR
IOP_DATA

: REF ADR_STR FIELD ( IOP_FIELDS ),
: REF REG_STR FIELD ( IOP_FIELDS ),

VAX-11 Bliss-16 V4.0-579

[(MAZURCZYK.DEGNA]ZQGNA4
.BLI;2

SEQ 0219

Page

2
(2)

N1
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE DECLARATION MNDULE
b ot ot

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

VAX-11 Bliss-16 V4.0-579
[MAZURCZYK.DEGNA]ZQNA4 .8LI ;2

b ot

MISCELLANEOUS DATA DECLARATIONS

COUNTER,
SWP_TIMER,

ERR_NUMBER,

PRIOO,
PRIO4,

DEQGNA_NO

P1,
TMP_IOP_ADR,
TEMP3,
TEMP7,

P2,
TMP_REG_DATA,
TEMP4,
TEMPS,

P3,
TEMP1,
TEMPS,
TEMPY,

P4,
TEMP2,
TEMP6,
TADR1,

TBYTE1,

TBYTE2,

TBYTES,

TBYTE4

: WORD,

: WORD,
: BYTE,

TADR2

INTERRUPT_FLG,
SWP_ILOOP,
CHECKSUM,
CSR_WORD,
PRIO3,
PRIO7,

- e

o
o
b o
o o o
o o

RBUF _LENGTH,
SWP_TOUT_VAL,
DOWN_COUNTER,
ERR_FLAG,
PRIOZ2,
PRIOS,

TEMPORARY STORAGE DATA DECLARATIONS

b o

b o o

b o

b ot

XBUF _LENGTH,
SWP_BLOCK_MEM,
UP_COUNTER,
ERR_COUNT,
PRIO1,
PRIOS,

DIAGNOSTIC ERROR MESSAGES DECLARED EXTERNALLY

o
o
o
b o
e

GF
G0
@0
S
G5
G
W
S0
S0
@0
S0
®
®

1565
1566
1567
1568
1569
1570
1571
1572
1573
1574
1575
1576
1577

1555
1556
1557
1558
1559
1560
1561
1562
1563

e (e

1553
1554

Ter
-

1542
1543
1544
1545
1546
1547
1548
1549
1550
1551
1552

ZGNA4
v01.0

MSGOO,
MSGO1, MSGO2, MSGO3, MSGO4, MSGO5, MSGO6, MSGO7, MSGO8, MSGO9, MSG10,

MSG11, MSGl2, MSG13, MSGl4, MSG15, MSG16, MSG17, MSG18, MSG19, MSG20,

MSG21, MSG22, MSG23, MSG24, MSG25, MSG26, MSG27, MSG28, MSG29, MSG30,
MSG31, MSG32, MSG33, MSG34, MSG35, MSG36, MSG37, MSG38, MSG39, MSGA40,
MSG41, MSG42, MSGA3, MSG44, MSGAS, MSG46, MSG47, MSGAS, MSG49, MSGSO0,
MSG51, MSG52, MSGS3, MSG54, MSG55, MSG56, MSG57, MSGS8, MSGS9, MSG60,
MSG61, MSG62, MSG63, MSG64, MSGES, MSG66, MSG67, MSG6ES, MSG69, MSG70;

SEQ 0220
Page

(3)

B2
CZGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - ERRORSREPORT ( )

ZGNA4

v01.0

)

b ot Pt

GLOBAL ROUTINE :

ERRORSREPORT

DESCRIPTION:
This routine reports errors to the operator

s P

ot ot P

VAX-11 Bliss-16 v4,0-579
[(MAZURCZYK.DEGNA )ZGNA4 .BLI;2

o
Pt Pt o

1579
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592

#SBTTL ‘GLOBAL ROUTINE - ERRORSREPORT (

1578

S5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

#SBTTL

'GLOBAL ROUTINE

- ERRORSREPORT (

)’

BGNMSG (ERRORSREPORT);
ZAONA4 CZQNACO DEGNA FUNCTIONAL TEST
‘/‘:21.0/
RCV.D.LIST,
RCV.BUFFER,

XMIT.D.LIST,
XMIT.BUFFER,

DESCR.LIST
DATA.BUFFER

SETUP.BUFFER, IOP.TABLE, BD.PROM.DESCR
STATION.ADR, TARGET.ADR, PHYS.ADR

HWP
, TABLE, SWP.TABLE, REG.ADR
GET.ADR, IOP.DATA, XBUF ,LENGTH

RBUF .LENGTH, INTERRUPT.FLG, COUNTER
SWP .BLOCK .MEM, SWP,.TOUT.VAL, SWP.ILOOP
SWP,TIMER, UP_.COUNTER, DOWN.COUNTER
CHECKSUM, ERR.NUMBER, ERR.COUNT
ERR.FLAG, CSR.WORD, PRIOO, PRIO1

PRIO2, PRIO3, PRIO4, PRIOS, PRIO6
PRIO7, DEQGNA.NO, P1, P2, P3, P4
TMP_.IOP.ADR, TMP.REG.DATA, TEMP1
TEMP2, TEMP3, TEMP4, TEMPSK TEMP6
TEMP7, TEMP8, TEMP9, TADR1, TADR2
TBYTEL1, TBYTE2, TBYTE3, TBYTE4
MSGOO, MSGOl1, MSGO2, MSGO3, MSGO4
MSGOS, MSGO6, MSGO7, MSGO8, MSGO9

MSG10, MSG1l1l, MSG12, MSG13, MSGl4a

MSG1S5S, MSG16, MSG17, MSG18, MSG19
MSG20,
MSG25,

MSG30,
MSG35,
MSG40,
MSGAS,
MSG50,

MSG2l,
MSG26,

MSG22,
MSG27,

MSG31,
MSG36,
MSG41,
MSG46,
MSG51,

MSG32,
MSG37,
MSG42,
MSGA7,
MSG52,

MSG60, MSG61,
:gggg. MSG66,

MSG62,
MSG67,

MSG23,
MSG28,

MSG33,
MSG38,
MSGA3,
MSGAB,
MSG53,

MSG24
MSG29

MSG34
MSG39
MSGA4
MSGA9
MSGS4

MSGSS, MSGS€, MSGS57, MSG58, MSGS9
MSG63,
MSG6E8,

MSG64
MSGE9

SEQ 0221

Page

(4)

e
CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - ERRORSREPORT ( )

ZGNA4

v01.0

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

.SBTTL
.PSECT

000000
000000

004737

000004
000006

104423
000207

Routine Size:

000000V

4 words,

ENDMSG;

012746

000000G

012746
010600
104414
013716
013746
012746
012746
010600
104414
013716
013746
012746
012746
010600
104414
013716

000001

1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604

013746

012746
012746
010600
104414
013716

JSR

TRAP
RTS

Maximum stack depth per

1593

ERRORSREPORT::

Routine Base:

invocation:

PRINTB ( MSGO3 );

PRINTB ( MSGO4,
PRINTB ( MSGOS,

PRINTB ( MSGO6,
PRINTB ( MSGO7,
PRINTB ( MSGO8,

PRINTB ( MSGO9,
PRINTB ( MSG10,
PRINTE ( MSG11,

0000006
000000G
0000006
000003

000002G
0000026
0000006
000003
000004G
000004G
000000G
000003
0000066

2 words

.XMIT_D_LIST
.XMIT_D_LIST
.XMIT_D_LIST
.XMIT D_LIST
.XMIT_D_LIST
.XMIT_D_LIST

[
[
[
[
[
[

ERRORSREPORT GLOEAL ROUTINE

ACSCODES$,

VAX-11 Bliss-16 v4,0-579

(MAZURCZYK.DEGNA]ZGNA4
.BLI ;2

- ERRORSREPORT (

SEQ 0222

Page

(4)

)

PC,M$ERRORSREPORT

1592

23
PC

ACSCODES$ « 0000

FLGWD
DBITS
LOADR
TWwOL
STWD1
STWD2

),
),

.RCV_D_LIST [
.RCV_D_LIST [
], .RCV_D_LIST [
), .RCV_.D_LIST [
) AND XWD1_MASK,
) AND XuWD2_MASK,

.CSR_WORD AND #0°'133777'
.HWP_TABLE [ ADDR ] );

);

FLGWD ] );
OBITS ] );
LOACR ] );
TuWwOL
] );
.RCV_D_LIST [ STWD1 ] AND RWD2_MASK );
.RCV_D_LIS T [ STWD2 ] AND RLL_MASK );

.SBTTL MS$ERRORSREPORT GLOBAL ROUTINE - ERRORSREPORT (
MS$ERRORSREPORT;
MOV
MOV
MOV

oMSGO3, -(SP)
01,-(SP)
SP.RO

MOV
MOV
MOV

RCV.D.LIST,(SP)
XMIT.D.LIST,-(SP)
oMSGOo4, -(SP)

TRAP

MOV
MOV

MOV
MOV
MOV
MOV

RCV.D.LIST«2,(SP)
XMIT.D.LIST«2,-(SP)
oMSGOS, -(SP)
03,-(SP)

TRAP

MOV

SP,.RO

MOV
MOV
MOV
MOV

RCV.D.LIST.4,(SP)
XMIT.D.LIST.4,-(SP)
oMSGO6, -(SP)
03,-(SP)

TRAP

MOV

SP,RO

RCV.D.LIST«6,(SP)

1594

SP,s

03,-(SP)
SP,.RO

)

1595

SP,»

1596

SP,s

1597

SP,s

1598

De
CZQGNACO DEQNA FUNCTIONAL TEST
GLOBAL ROUTINE - ERRORSREPORT ( )

ZGNA4

v01.0

000114
000120
000124

000140
000144

000010G
000360
000010G
020017
000000G
000003

113716
013746
042716
012746
012746

000012G
0000126
140000
0000006
000003

012746

000000G
044000
000000G
000002

010600
104414
005016

010600
104414
013716
042716
01274¢

010600
104414
017716
012746
012746
010600
104414
062706
000207

OMSGO7, -(SP)
@3,-(SP)

SP,RO
14
RCV.D.LIST+10,(SP)

1
1

SEQ 022 3

Page

6
(4)

H SP.‘
1599

SP,.RO
14
(SP)

1600

e3,-(SP)

8IC
MOV
MOV
MOV

TRAP

MOV

000000G
000000G
000002

MOV

000060

TRAP
ADD
RTS

MOV
MOV

SP,RO
14
CSR.WORD, (SP)

: SP,»

SP,RO
14
SHWP . TABLE,(SP,
oMSG11, -(SP)

: SP,s

SP,RO
14
960,5SP

s SP,»

1601

AC$CODES$ + 0010
94 words,
Rout ine Base:
; Routine Size:
stack
words
26
depth per invocation:
; Maximum

1605
1606

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEQNA)ZQGN
.BLI;2
A4

XMIT.D.LIST+6,-(SP)

0000066
000000G
000003

013746
012746
012746
010600
104414
013716
042716
013746
042716
012746
012746

5-Jul-1984 14:13:51
S-Jul-1984 14:02:25

1/02

1592

E2
ZQNA4
v01.0
:

:
:

CZAGNACO DEQNA FUNCTIONAL TEST
GLOBAL ROUTINE - E1$REPORT ( )
1

#SBTTL ‘GLOBAL ROUTINE - E1$REPORT ( )

1
1

Yoo
!

1612

1614

1616
1617
1618

1
1
1

!
1--

162
1621

1
1

1607

1608

1609
1610

1611

1613

1615

1618

:
:
:
3

3
:

000000

004737

000004
000006

104423
000207

: Routine Size:

GLOBAL ROUTINE :

DESCRIPTION:

E1$REPORT

.SBTTL

000000V

E1$REPORT::
JSR
TRAP
RTS

4 words,

000000

012737

000001

000006

000207

Routine Base:

2 words

1627

E1$REPORT GLOBAL ROUTINE - E1$REPORT (

PC,MSE1S$REPORT
23
PC

)

;

1621

ACSCODES$ + 0304

TEMP1 = 1;

000000G

.SBTTL
MS$E1SREPORT:

MOV
RTS

Routine Size:
4 words,
Routine Base:
ACSCODES$
; Maximum stack depth per invocation:
O words
1626

7
(s)

BGNMSG ( E1S$REPORT );

ENDMSG;

Page

#SBTTL ‘GLOBAL ROUTINE - E1$REPORT ( )

2
2
2
1

1622
1623
1624
1625

VAX-11 Bliss-16 V4.,0-579
[MAZURCZYK.DEGNA]ZQNA4 .BLI;2

This routine reports errors to the operator

;: Maximum stack depth per invocation:
3
3
3
3

5-Jul-1984 14:13:51
S-Jul-1984 14:02:25

SEQ 0224

MSE1SREPORT GLOBAL ROUTINE

. 0314

- E1$REPORT (

:
:

)

1623
1621

Fe
CZQNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - RESET_DEGNA ( )

1660
1661
1662

b i
B et s
b
b
o P
o P

)’

RESET_DEGNA

DESCRIPTION:
This routine verifies that DEGNA can be reset by setting bit 1
CSR register. After the reset, CSR is checked for nominal
status.

Hardware tested:

Q-Bus DMA Interface

Processing:

BEGIN

set Software Reset (SR) bit in CSR and check for
expected CSR status

o o

b o (b o

GLOBAL ROUTINE :

IF error

THEN
print error message

e o

1640
1641
1642
1643
1644
1645
1646
1647
1648
1649
1650
1651
1652
1653
1654
1655
1656
1657
1658
1659

VAX-11 Bliss-16 V4,0-579
[(MAZURCZYK.DEGNA]ZGNA4.BI.I
;2

GLOBAL ROUTINE RESET_DEGNA : NOVALUE =

ENDIF

clear SR bit

e o o

1633
1634
1635
1636
1637
1638
1639

#SBTTL ‘GLOBAL ROUTINE - RESET_DEGNA (

et e ot ot o

1628
1629
1630
1631
1632

et P

ZANA4
v01.0

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

IF error

THEN

END

inhibited

in CSR and check for expected CSR status

print error message
ENDIF

INPUT PARAMETERS:

if not

inhibited

in the

SEQ 0225

Page

8
(6)

v01.0

GLOBAL ROUTINE - RESET_DEGNA ( )

:
:
p

1663
1664
1665

1
1
1

oo
!

1667

1669

1671

;
:
:
:

1673
1674
1675

2
2
2
g

PUT _BIT ( CSR, SR, SET_IT );

IF .TEMP1 NEQU CSR1_STATUS

1666

1668

1670

1672

16'7'_6,

5-Jul-1984 14:13:51

CZQGNACO DEQNA FUNCTIONAL TEST

ZANR4
B

S-Jul-1984 14:02:25

1--

BEGIN

PUT_BIT ( CSR, ALL_BITS, ZERO );
DELAY ( TIME6_LIMIT );
TEMP1 = GET_ BIT [ CSR_ALL ] AND CSR2_MASK;

1679

1688
1689
1690

2
2
2

LR
H

2
2
2
2

PUT_BIT ( CSR, SR, CLR_IT );
DELAY ( TIME6_LIMIT );
TEMP2 = GET_BIT [ CSR_ALL ) AND CSR2_MASK;
IF _TEMP2 NEQU CSR2_STATUS

3
:
:
H
3
:
:
3
:
:
H

1678

1680
1681
1682
1683
1684
1685
1686
1687

iggé
1693

1694

H
3
H

169%
1700
1701

2
3
3

1703
1708

3
3

1707
1708
1709

2
2
1

:
H
s
:

s+
3

H
:

H
H
:

1695
169
1687
1698

1702
1705
1706

THEN

BEGIN
ERR_FLAG= ONE;
CSR_WORD = GET_BIT [ CSR_ALL );
PRINTB ( MSGS9 );
PRINTB ( MSG31 );
PRINTB ( MSG30, .GET_ADR [ CSR_ALL ], .TEMP1, CSR2_STATUS );
ERRDF ( 0001, MSGOO, E1$REPORT );
END;

3
3
3
3
3
3
3
2

[MAZURCZYK.DEQGNA]ZQGNA4 .BLI;2

RESET THE DEVICE AND CHECK CONTENTS OF CSR FOR NOMINAL STATUS

VAX-11 Bliss-16 v4,0-579

CLEAR SOFTWARE RESET BIT IN THE CSR AND CHECK FOR EXPECTED STATUS

THEN
BEGIN
ERR_FLAG
= ONE;

CSR_WORD
= GET_BIT [ CSR_ALL );

PRINTB ( MSGS9 );
PRINTB ( MSG31 );

3
3

PRINTB ( MSG30, .GET_ADR [ CSR_ALL ),
ERRDF ( 0002, MSGOO, E1$REPORT );

.TEMP1, CSR2_STATUS );

END;
END;

.GLOBL

Ls$DLY

.SBTTL

RESET.DEQNA GLOBAL ROUTINE - RESET_DEGNA (

)

55092256 9
(7)

H2
CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - RESET_DEGNA ( )
004137

000000G

162706
013700
012702

000016
0000006
000016

005012
152712
012701
001410
013700
001403

000140
000144
000146
000150
000154
000160
000166
000174
000200
000204
000210
006212
000214
000216
000220
000222
000224
000230
000234
000242
000246

000254
000256

077003
005301
000767
011216
011637
042737
023727
001453
012737
011666
011637
012746
012746
010600
104414
012716
012746
010600
104414
012716
013746
013766
062766
016646
012746
012746
010600
104414
104455
000304
062706
C13700
142760
012702
001410
013701
001403
005066

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

RESET.DEQGNA::

JSR
SuB

MOV
MOV
ADD

CLR
BISB

000002
000001

1$:

0000006

000014

2%:
3s:
4s:

MOV
BEQ
MOV
*BEQ

CLR
S08
DEC
BR
MOV

MOV
8IC
CMP
BEQ
MOV
MOV
MOV
MOV
MOV
MOV

TRAP
MOV

MOV
MOV

TRAP

MOV
MOV

MOV

000000G 000014
000014
000016
000014

ADD

MOV

000002
000001

000014

000016
6%:

7%:

BICB
MOV
BEQ

MCV

BEQ
CLR

(7)

1672

(R2)

e2,(R2)

#1.R1

+,88TMP2

L$OLY,RO
3$

*,88TMP]

RO,2$

;

S$STMP

;

$sTMP2

(R2),(SP)
(SP),TEMP1
10000, TEMP1

*,TMP_LOCATION

14(SP)

R1
1$

TEMP1, 062

21,ERR.FLAG

¢, TMP_LOCATION

SP,RO

: SP,»
1€84
SP,*

GET.ADR,14(SP)

: «,TMP_LOCATION
: *,TMP_LOCATION
: TMP.LOCATION,»

016,14(SP)

14(SP), -(SP)

1681
1682

1683

oMSGS59, -(SP)

TEMPL, -(SP)

1676
1678

(SP),2(SP)
(SP),CSR.WORD

14
#MSG31,(SP)
e1. -(SP)

1673
1675

$STMPL,»

5S¢

SP,RO
1a
55

MOV

Page

RO,R2

TRAP
TRAP

ADD

SEQ 0227

1630

oMSG30, -(SP)

. WORD
.WORD
. WORD

000016

MOV

MOV
MOV

VAX-11 Bliss-16 vV4.,0-579
[MAZURCZYK.DEQG
JZGNA4 .BLI;2
NA

1685

: SP,.s
1686

1
MSGOO

E1$REPORT

L$DLY,R1
8¢
14(SP)

1680
1695
s

+,88TMP2

;

*,88TMP]

$STMP

1696

12
CZQGNACO DEQNA FUNCTIONAL TEST
GLOBAL ROUTINE - RESET_DEGNA ( )
077103
005302
000767
016066
016637
042737
023727
001455
012737
016666

016637
012746
012746
010600
104414
012716
012746
010600
104414

012716
013746
013766
062766
016646
012746
012746
010600
104414

8$:

9%:

000006
000000G
010000 000000G
000000G 000060

000016

000001
000006
000010

000000G
000010
000000G

MOV
MOV

000001

TRAP

MOV
MOV

000001

MOV
TRAP

MOV
MOV

MOV
ADD

000000G 000022
000016
000022

MOV
MOV
MOV
MOV

000022

TRAP
TRAP

.WORD
.WORD

10¢:

Maximum stack

1710

S0B
DEC
BR
MOV
MOV
BIC
CMP
BEQ
MOV
MOV
MOV
MOV

104455

Routine Size:

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

153 words,

depth per

Rout ine Base:

invocation:

19 words

ADD
ADD
RTS

ACSCODES

R1,7¢
R2
6$

16(R0),6(SP)
6(SP), TEMP2

£10000, TEMP2
TEMP2, 060

104
#1,ERR.FLAG

6(SP),10(SP)
10(SP),CSR.WORD

VAX-11 Bliss-16 V4.,0-579
[MAZURCZYK.DEQNA]ZQNA4 .BLI;2

$STMPL1,»

;

*,TMP LOCATION

;

#MSGS59, -(SP)

SP,RO

e1,-(SP)

14
@MSG31.(SP)

22(SP),-(SP)

11
(7)

1697

1698

#,TMP_LOCATION

1701

1702
1703

SP,»

;

1704

i Spo.
:
;
H
:

oMSG30, -(SP)

SP,.RO
14
55
2

Page

$$TMP2

s TMP.LOCATION,*

SEQ 0228

1705
*,TMP.LOCATION
‘,TW.LOCATIW
TMP.LOCATION,*

: SP,=

1706

1700

1630

MSGOO

E1$REPORT
216,5SP
216,5P

« 0324

Je
CZQNACO DEQNA FUNCTIONAL TEST
GLOBAL ROUTINE - VER_DESCR_STATUS ( )

000000

004137

000004
000006
000010
000012
000014
000022
000030
000036
000044
000046

005746
005002
010201
006301
016137
016137
042737
023727
001447
026161

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

#SBTTL ‘GLOBAL ROUTINE - VER_DESCR_STATUS (

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEGNA]ZQGNA4
.BLI;2

SEQ 0229

Page

)’

GLOBAL ROUTINE VER_DESCR_STATUS : NOVALUE =
>

1711
1712
1713
1714
1715
1716
1717
1718
i719
1720
1721
1722
1723
1724
1725
1726
1727
1728
1729
1730
1731
1732
1733
1734
1735
1736
1737
1738
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748

HFNNNWDDLDLDD
WD WWWWNINN S b b s ot ot b ot ot b po fd o pd o o oo o o ot

ZQGNA4
v01.0

GLOBAL ROUTINE :

VER_DESCR_STATUS

DESCRIPTION:

This routine compares expected receive descriptor to actusl receive

descriptor.

INPUT PARAMETERS:
TEST_NO - test number

in which error occurred.

BEGIN

INCR INDEX FROM O TO B0_D_SIZE - 1 DO
TEMPL =
TEMP2 =

.DESCR_LIST [
.DESCR_LIST [

.INDEX, W_LEN ;
.INDEX,

IF (.TEWP2 NEGU RFLG_HASK
N

W_LEN ] AND RFLG_MASK;

) ARD (

.TEMP1 NEQU .BD_PROM.DESCR [

.INDEX ]

)

BEGIN

CSR_WORD = GET_BIT [ CSR_ALL 1;
PRINTB ( MSGS9 );
PRINTB ( HSGA8 );

PRINTB ( MSGS0, .TEMP1, .BD_PROM_DESCR [
ERRDF ( 0003, MSGOO, ERRORS$REPORT );

END;

.INDEX ]

.INDEX );

END;

000000G

.SBTTL

VER.DESCR.STATUS GLOBAL ROUTINE - VER_DESCR_STATUS (

TST

-(SP)

VER.DESCR.STATUS:
:
JSR
R1, $SAVE2

1$:

CLR
MOV
ASL

000000G 000000G
000000G 000000G
037777 000000G
000000G 140000

MOV
MOV
BIC
ggz

000000G 000000G

CMP

R2
R2,R1

DESCR.LIST(R1),TEMP1
DESCR.LIST(R1),TEMP2
#37777, TEMP2
;EHPZ.O-QOOOO

DESCR.LIST(R1),BD.PROM.DESCR(R1)

)

;

1713

:+ INDEX
: INDEX,*

1733
1735

H
3

1736

1737

I<2

000076
000102
000104
000106
000112
000116
000120
000122
000124
000130
000134
000140
000144
000146
000150
000152
000154
000156

000160
000164
000166
000172
000174
000176

000016

MOV

0000006
000000G
000001 .

MOV
MOV
MOV
TRAP

MOV

0000006
000001

MOV
MOV
TRAP
MOV

MOV

016146
013746
012746
012746
010600
104414

MOV
MOV
MOV
MOV
TRAP
TRAP

104455
000003
000000G
000000’

062706
005202
020227
003706
005726
000207

.WORD
000016

000017

2$:

ADD
INC
CMP
BLE
TST

RTS

Routine Size:
AC$CODE$
64 words,
Rout ine Base:
13 words
: Maximum stack depth per invocation:

;

1749

e1,-(SP)
SP,RO

14
oMSGA8, (SP)

SP,RO
14
R2,(SP)
B80.PROM.DESCR(R1),
-(SP)
TEMP1, -(SP)
#MSGSO0, -(SP)
SP,RO
14
55
3

24
REG.ADR,RO
16(R0),(SP)
(SP),CSR.WORD
#MSG59, -(SP)

[MAZURCZYK.DEGNA]ZQNA4
.BLI;2

BEQ

MOV
MOV

0000006

VAX-11 Bliss-16 V4.0-579

®s

001443
013700
016016
011637
012746
012746
010600
104414
012716
012746
010600
104414
010216

S5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

*,TMP.LOCATION

SEQ 0230
Page

(8)

1740

#
TMP .LOCATION,

1741

CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - VER_DESCR_STATUS ( )

H Spo.
1742

H spc‘
:

INDEX,=*

1743

SP,»

1744

MSGOO

ERRORSREPORT

16,SP
R2
R2,017

1$
(SP)+

1006

; INDEX
: INDEX, *

1739
1733

1713

L2
CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CLR_DESCR ( )

1765

1766
1767
1768
1769
1770
1771
1772

000000

000002
000006
000012
000016
000022
000024

G IND ND N\ 10

1764

10 1D G G

1774

1
1

[(MAZURCZYK.DEGNAJZGNA4
.BLI;2

SEQ 0231

Page

(9)

GLOBAL ROUTINE CLR_DESCR : NOVALUE =

GLOBAL ROUTINE :

CLR_DESCR

DESCRIPTION:

This routine initializes transmit and receive descriptor lists to O.

BEGIN

INCR INDEX FROM O TO D_SIZE - 1 DO
BEGIN

XMIT_D_LIST [

RCV_D_LIST

END;

[

.INDEX, W_LEN ] = O;

END;

000000G
000000G
000002
000176

.SBTTL
CLR.DESCR::
CLR
1$:
CLR
CLR
ADD
CMP
BLE
RTS

Routine Size:
AC$CODE$
11 words,
Rout ine Base:
Maximum stack depth per invocation:
O words

1773

VAX-11 Bliss-16 V4,0-579

%SBTTL 'GLOBAL ROUTINE - CLR_DESCR C )’

005000
005060
005060
062700
020027
003767
000207

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

1754

1755
1756
1757
1758
1759
1760
1761
1762
1763

1750
1751
1752
1753

0 ot ot ot ot ot ot ot ot ot ot ot ot

v01.0

ZQGNA4

CLR.DESCR GLOBAL ROUTINE - CLR_DESCR (
RO

XMIT.D.LIST(RO)
RCV.D.LIST(RO)
#2,R0
RO,#176
1%
PC
+

1206

)

INDEX

*(INDEX)
#«(INDEX)
+, INDEX

#
INDEX,

1766
1768
1769
1766

1752

ZGNA4

CZQGNACO DEQGNA FUNCTIONAL TEST

GLOBAL ROUTINE - CLR_BUFFERS ( Pl )

000000

005000

000002

000405

000016
000022

020066
002770

000004
000010
000014

000024

105060
105060
005200

000207

Routine Size:

1803
1804

1
1

(MAZURCZYK.DEGNAJZQGNA4 .BLI;2

SEQ 0232

Page

(10)

GLOBAL ROUTINE CLR_BUFFERS ( P1 ) : NOVALUE =

GLOBAL ROUTINE :

CLR_BUFFERS

DESCRIPTION:

This routine initializes transmit and receive buffers to 0.

INPUT PARAMETERS:
Pl - number of bytes to clear.

BEGIN

INCR INDEX FROM O TO .P1 - 1 DO
BEGIN
RCV_BUFFER
[
ENSHIT_BUFFER [

.INDEX ] = O;
.INDEX ] = 0;

END;

.SBTTL

CLR.BUFFERS GLOBAL ROUTINE - CLR_BUFFERS ( P1 )

CLR

CLRB
CLRB
INC

RCV.BUFFER(RO)
XMIT.BUFFER(RO)
RO

CLR.BUFFERS::

000000G
000000G
000002

1s:
24:

11 words,

Maximum stack depth per

5
3

5-Jul-1984 14:02:25

VAX-11 Bliss-16 V4,0-579

#SBTTL 'GLOBAL ROUTINE - CLR_BUFFERS ( P1 )’

I IS I I VB VD I I ' Vs ' VD

b o o o (ot )b o
s et ot ot ot ot o
=2 0D N GG

1790
1791
1792
1793
1794
1795
1796
1797
1798
1799
1800
1801
1802

N N

1775
1776
1777
1778
1779
1780
1781
1782
1783
1784
1785
1786
1787
1788
1789

i b b b ot

v01.0

5-Jul-1984 14:13:51

CMP
BLT

RTS
Routine Base:

invocation:

O words

RO,2(SP)
14

AC$CODES$ + 1234

+ INDEX

*«(INDEX)
*«(INDEX)
INDEX

INDEX,P1

1796

1798
1799
1796

1777

|
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_RIXI_STATUS ( P1 )

1850

1851
1852
1853
1854
1855
1856
1857

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEQNA]ZQGNA4
.BLI;2

#SBTTL 'GLOBAL ROUTINE - CHK_RIXI_STATUS ( P1 )’

GLOBAL ROUTINE CHK_RIXI_STATUS ( P1 ) : NOVALUE
*

b o o
NN NN NN 1o et et b b b pod b b ot b ot b o o o o o
N NN W

1824
1825
1826
1827
1828
1829
1830
1831
1832
1833
1834
1835
1836
1837
1838
1839
1840
1841
1842
1843
1844
1845
1846
1847
1848
1849

W WO

1813
1814
1815
1816
1817
1818
1819
1820
1821
1822
1823

PRV WWWWWWWNINND

1811
1812

b b ot

ZQNA4
v01.0

1805
1806
1807
1808
1809
1810

GLOBAL ROUTINE :

CHK_RIXI_STATUS

DESCRIPTION:

This routine verifies that XI ( bit 7 ) and RI ( bit 15 )
of the CSR status word are set to 1 shortly after transmission of a
loopback packet is complete. If either bit isn't set, an error
message is printed.

INPUT PARAMETERS:
Pl

- 0: check XI and RI
- 1: ckeck XI
- 2: check RI

TEST_NO - test number

in which error occurred.

BEGIN
e

CHECK TRANSMIT INTERRUPT REQUEST BIT ( XI - BIT 7 ) TO VERIFY THAT DEGNA
ACTUALLY COMPLETED TRANSMISSION OF A LOOPBACK PACKET.

(

.P1EQLUO )OR (

THEN

.P1 EQLV 1)

INCR INDEX FROM O TO TIME2_LIMIT DO
IF GET_BIT [ CSR,'XI ] EQLU ONE
THEN
BEGIN
TEMP1 =

_INDEX;
EXITLOOP;

END

ELSE

IF .INDEX EQLU TIME3_LIMIT
THEN

BEGIN
ERR_FLAG = ONE;

’

CSR_WORD = GET_BIT [ CSR_ALL J;

PRINTB ( MSGS9 );
PRINTB E MSG29 );
PRINTB ( MSG26 );
ENSRRDF ( 0004, MSGOO,
[

ERRORSREPORT

);

SEQ 0233
Page

(11)

[

[+ ]

HNWWWWWHWDNDNNDWWWWNDDVDWDD
DD

CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_RIXI_STATUS ( P1 )

Page

(11)

IFTaE.Pl EQLV 0 ) OR ( .P1 EQLV 2 )
N

INCR INDEX FROM O TC TIME2_LIMIT DO
IF GET_BIT [ CSR, RI ] EQLV ONE
THEN

BEGIN
TEMP2 = _INDEX;
EXITLOOP;
END
ELSE

IF .INDEX EQLU TIME2_LIMIT
THEN
BEGIN
ERR_FLAG = ONE;

CSR_WORD = GET_BIT [ CSR_ALL );

PRINTB ( MSGS9 );
PRINTB ( MSG29 );
PRINTB ( MSG2S );

ERRDF ( 0005, MSGOO, ERRORSREPORT );

END;

162706

000010

010137
000450
020127
001041
012737
016066
016637
012746
012746

SEQ 0234

ACTUALLY RECEIVED TRANSMITTED LOOPBACK PACKET.

000000G

105716
100003

VAX-11 Bliss-16 v4.0-579
[(MAZURCZYK.DEGNA]ZQGNA4
.BLI ;2

CHECK RECEIVE INTERRUPT REQUEST BIT ( RI - BIT 15 ) TC VERIFY THAT DEGNA

004137
016602
005003
005702
001002
005203
000403
020227
001062
005001
013700
016016

5-Jul-1984 14:13:51
S-Jul-1984 14:02:25

END;

LSBTTL CHK.RIXI.STATUS GLOBAL ROUTINE - CHK_RIXI_STATUS ( P1 )
CHK.RIXI.STATUS::
:

1807

MOV

22(sP),.R2

: Pl,»

1836

1838
1839

CLR

000001

1$:

000000G

58:$:

000016

as:

000000G
000002
000000G

cHP

gbnv

:éG . ADR,RO
¢

:i I—

(SP)

: TMP_LOCATION

MOV

R1,TEMP1

: INDEX,»

cMP

R1,02000

: INDEX,*

BNE

MOV
BPL

002000

1
"3
24
R2,01

BNE
INC
BR

TST8B

0000006

000000G
000001

R1,$SAVE3

SuB

000022

000001
000016
000002

JSR

gge'}
MOV
MOV

MOV
MOV

16(R0O),(SP)

o
01, ERR.FLAG
FL

16(R0),2(SP)
2(SP),CSR.WORD
OMSGS9, -(SP)
01,-(SP)

«,TMP _LOCATION

:
;: ¢, TMP LOCATION
: TMP._LOCATION,*
H

1842
1841
1846
1849

1850

1851

C3
ZANAR4
v01.0

000120
000122
000124

CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_RIXI_STATUS ( P1 )
MOV
TRAP

MOV

000000G
000001

MOV

TRAP

000140
000144

000000G
000001

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

VAX-11 Bliss-16 v4.0-579

{MAZURCZYK .DEQNA1ZGNA4 .BLI;2

SP,.RO
14
oMSG29,(SP)

i SP,s

SP,.RO
14

;s SP,s

oMSG26,(SP)

" SP,RO

Page

(11)

1852

;

1853

SEQ 0235

SP,»

14
55

1854

MSGOO

ERRORSREPORT

000010

@10,SP

S$:

002000

s INDEX
s

INDEX,s

1848
1838

1862

6%:

000002

000000G
000016

002000

7%:

000004

REG.ADR,RO

8%:

s INDEX

%?(RO).A(SP)

R1,TEMP2

s INDEX,
s

¢, TMP_LOCATION

: INDEX, «

9s:
@1,ERR.FLAG

000001
000016

16(R0),6(SP)
6(SP),CSR.WORD
oMSGS9, -(SP)

000001

SP,RO
14

»,TMP
. LOCATION

s TMP_LOCATION,»
:

1864
1865

1868
1867
1872

1875
1876
1877

Spo.
1878

oMSG29,(SP)

e1,-(SP)
SP,RO

000001

oMSG25, (SP)

1879

SP,RO
14
S5
S

1880

MSGOO

000010

002000

ERRORSREPORT

10%:

BLE

R1,02000
84

: INDEX

1874
1864

000356
000362

062706
000207

: Routine Size:

11%:

000010
122 words,

Rout ‘ne Base:

: Maximum stack depth per invocation:

1883

5-Jul-1984 14:13:51
S-Jul-1984 14:02:25

CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_RIXI_STATUS ( P1 )

ZQNA4
v01.0

14 words

ADD
RTS

#10,SP
PC

ACSCODES « 1262

VAX-11 Bliss-16 v4.,0-579

[MAZURCZYK .DEQGNA)ZQNA4 .BLI;2

SEQ 0236

Page

19
(11)
1807

3
CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_CSR_STATUS ( P1, P2 )

D D D N N N N 10 5t et s ot ot s o et ot ot (o e
= N0 G0 W8O8

N D TV T R

D D D D N

§
000010
000012

024646
012701
001410
013700

VAX-11 Bliss-16 V4.0-579
[(MAZURCZYK.DEGNA]ZGNA4
.BLI ;2

SEQ 0237

Page

(12)

®SBTTL 'GLOBAL ROUTINE - CHK_CSR_STATUS ( P1, P2 )’

GLOBAL ROUTINE CHK_CSR_STATUS ( P1, P2 ) : NOVALUE
GLOBAL ROUTINE :

CHK_CSR_STATUS

DESCRIPTION:
This routine checks CSR status words for expected status.

INPUT PARAMETERS:
Pl - expected CSR status
P2 - CSR mask
TEST_NO - test number in which error occurred.

BEGIN

SAVE CSR, RESET TRANSMIT AND RECEIVE REQUEST BITS IN THE CSR
DELAY ( S );

C5R_WORD = GET_BIT [ CSR_ALL );
PUT_BIT [ CSR, RI, ONE
PUT_BIT [ CSR, XI, ONE
TEMP1 =

);
);

.CSR_WORD AND .P2;

IF .TEMP1 NEQU .P1

THEN

BEGIN
ERR_FLAG = ONE;
PRINTB ( MSGS9 );
PRINTB ( MSG12, .TEMP),

ERRDF

END;

/
.Pl1

);

( 0006, MSGOO, ERRORSREPORT

.SBTTL

010146

000002

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

1884
1885
1886
1887
1888
1889
1890
1891
1892
1893

s ot P Pt b o ot

v01.0

ZANA4

000005
0000006

);

CHK.CSR.STATUS GLOBAL ROUTINE - CHK_CSR_STATUS ( P1, P2 )

CHK.CSR,STATUS:
:
MOV
R1,-(SP)
CMP
-(SP),-(SP)
1$:

MOV

BEQ

MOV

05,R1

: *,88TMP2

L$OLY,RO

i +,88TMPL

1886

¥ g

1910

F3
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_CSR_STATUS ( P1, P2 )
001403
005066
077003
005301
000767
013700
062700
011016

011637
052710
011637

000072
000100
000102
000110
000114
000120
000122
000124
000130
000134

000140
000144
000146
000150
000152
000154
000156
000160
000164
000166
000170

016600
005100
040037
023766
001431
012737
012746
012746
010600
104414
016616
013746
012746
012746
010600
104414
104455
000006
000000G
000000
062706
022626
012601
000207

: Routine Size:
;

Maximum stack

1928
1929

as:

000002

3s:
44%:

000000G
000016

ADD

MOV
MOV
BIS
MOV

100200
000000G
000010

MOV

coM
8IC
CMP
BEQ
MOV
MOV

0000006
000000G 000012

000001

BEQ
CLR
S08
DEC
BR
MOV

000000G

000001
000016

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

2(SP)

$$TMP

$STMPL,»

$8TMP2

1912

s CSR.WORD,=

1915
1917

; +,P1

1919

; P2,

1922
1923

: SP,»

SP,RO
14
16(SP),(SP)

;: Pl,s

SP.RO

; SP,»

1924

1925

e12,SP

1921
1886

(SP)+,(SP)+
(SP)+,R1

PC
AC$CODE$
Rout ine Base:
61 words,
depth per invocation:
10 words

(12)

(SP),TEMP1
10(SP),RO

6
MSGOO
ERRORSREPORT
S$:

Page

: *,TMP.LOCATION

000012

(MAZURCZYK.DEGNA)ZGNA4
.BLI;2

SEQ 0238

(RO),(SP)
(SP),CSR.WORD

TEMP1, -(SP)
oMSG12, -(SP)

000003

VAX-11 Bliss-16 V4.0-579

1646

G3
CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 )

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

VA’ 11 Bliss-16 v4.,0-579
[(MAZURCZYK.DEGNA)ZGNA4
.BLI ;2

GLOBAL ROUTINE CHK_XMIT_STATUS ( P1, P2 ) : NOVALUE

GLOBAL ROUTINE :

CHK _XMIT_STATUS

DESCRIPTION:
This routine checks transmit status words for expected status.

INPUT PARAMETERS:
P1
- XMIT flag word
P2
- expected XMIT status word 1
TEST_NO - test number in which error occurred.

(=]

@
m
©

D D D D D RO D N N N N 5t et et ot ot o ot o o

b e o o o o ot s o o o

#SBTTL ‘GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 )’

MASK OUT DON'T CARE BITS IN THE XMIT FLAG WORD AND COMPARE TO EXPECTED

2’71{? ZLAG STATUS. IF STATUS NOT EQUAL THEN PRINT ‘BAD XMIT FLAG WORD
U

TEMP2 = _XMIT_D_LIST [ FLGWD ] AND XFLG_MASK;

! 0'140000'

IF .TEMP2 NEQU .P1

NN NN R N R

BEGIN
ERR_FLAG = ONE;

CSR_WORD = GET_BIT [ CSR_ALL ];

PRINTB ( MSG59 );

PRINTB ( MSG13, .TEMP2, XFLG_MASK
"EJRRDF ( 0007, MSGOO, ERRORSREPORT

);
);

;
*

D R N N N NN G W8 OGO

THEN

MASK OUT DON'T CARE BITS IN THE XMIT STATUS WD1 AND COMPARE TO EXPECTED
XMIT STATUS WD1. IF STATUS NOT EQUAL THEN PRINT ‘BAD XMIT STATUS WORD 1'

IF . XMIT_D_LIST [ STWD1
THEN

. ;EWS =
L

TEMP3 =

] GTRU ZERO

XMIT_D_LIST [

STWD1

_XMIT_D_LIST [ STWD1l

.TEMP3 NEQU .P2

] AND XWD1_MASK

! 0'157760'

) AND X1_MASK;

! 0100000

SEQ 0239

Page

22
(13)

H3
CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 )

ZGNA4

S0
W8

1991
1992

DN WWWWWWND

1983
1984
1985
1986
1987
1988
1989

v01.0

000210
000216
000222

VAX-11 Bliss-16 V4.0-579
[(MAZURCZYK.DEGNAJZGNA4
.BLI;2

SEQ 0240

THEN

BEGIN
ERR_FLAG = ONE;

CSR_WORD = GET_BIT [ CSR_ALL J);

PRINTB ( MSG59 );
PRINTB ( MSG14, .TEMP3,

.P2 );

ERRDF ( 0008, MSGOO, ERRORSREPORT );

END;
END;

024646

000170
000176

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

013737
000000G 000000G
037777 000000G
042737
000000G 000010
023766
001437
012737
000001 000000G
000000G
013700
000016
016016
011637 0000006
000000G
012746
012746
000001
010600
104414
140000
012716
000000G
013746
012746
000000G
012746
000003
010600
104414
104455
000007
0000006
000000’
062706
000012
013700
000010G
001406
010037
0000006
042737 020017
000000G
000405
010037
000000G
042737
077777 000000G
023766
000000G 000006
001441
012737 000001
0000006
013700
000000G
016066
000016 000002
016637
000002 000000G
012746
000000G
012746
000001

LSBTTL CHK . XMIT,.STATUS GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 )
CHIK, XMIT,.STATUS::
cMP
-(SP),-(SP)
3

MOV
BIC
ggz

XMIT.D.LIST,TEMP2
037777, TEMP2
IEHP?.IO(SP)

1932
1959

: +,P1

1961

MOV
MOV
MOV

#1.ERR.FLAG
REG.ADR,RO

:
:
: *,TMP_LOCATION

1964
1965

MOV
MOV

OMSGS9, -(SP)
01,-(SP)

1966

TRAP

MOV
MOV

16(R0),(SP)

(SP),CSR.WORD

: TMP._LOCATION,*
.

SP,RO

MOV

©€-40000,(SP)

1967

TRAP
TRAP

14
SS

1968

@12,SP
XMIT.D.LIST«10,RO

3
:

1963
1976

MOV
ggc

RO, TEMP3
350017.TEHP3

1978

24%:

MOV

RO, TEMP3

1976
1980

3s:

gga

I%HPS'G(SP)

: P2

1982

MOV

©¢1,ERR.FLAG

16(R0),2(SP)
2(SP),CSR.WORD
#MSGS9, -(SP)
@1,-(SP)

: *,TMP
. LOCATION
: TMP.LOCATION,*
:

1985
1986

MOV
MOV
MOV

.WORD
.WORD
.WORD

1%:

ADD
MOV

BEQ

BIC

MOV

MOV
MOV
MOV
MOV

TEMP2, -(SP)
oMSG13,-(SP)
03,-(SP)

7
MSGOO
ERRORSREPORT
24

077777, TEMP3

REG.ADR,RO

SP,»

1987

13
CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_XMIT_STATUS ( P1, P2 )

ZGNA4
v01.0

000226

000230
000232
000236
000242

000246
000252
000254
000256
000260
000262
000264
000266
000272
000274
:
:

MOV
TRAP
MOV
MOV

010600
104414
016616
013746
012746

000012
000000G
0000006
000003

012746
010600
104414
104455
000010
000000G
000000°
062706 000012
022626
000207

MOV
MOV
MOV

TRAP
TRAP

4%:

1994

1
1

SP,RO
14

;: SP,*

(SP)+,(SP)+

ERRORS$REPORT
e12,SP

+ 2040

SEQ 0241

(13)

: SP.‘

SP,RO
14
55
10

CMP

RTS

[MAZURCZYK.DEQNA]ZQNA4
.BLI;2

; P2,.*

MSGOO

ADD

VAX-11 Bliss-16 v4.0-579

12(SP),(SP)

TEMP3, -(SP)
#MSG14, -(SP)

.WORD
.WORD
.WORD

ACS$CODES
9t words,
Routine Base:
Routine Size:
Maximum stack depth per invocation:
9 words

1993

S5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

1988

1989

1984
1932

ZQNA4

CZQNACO DEGNA FUNCTIONAL TEST

v01.0

GLOBAL ROUTINE - CHK_RCV_STATUS ( P1, P2 )
1

1995

1997 1

1999

1996

1998

2000

2002

:
;

2004
<2005

2001

feo

GLOBAL ROUTINE :

DESCRIPTION:

1
1

H
:

2006

2008

2013

2007

;.
:
:
:

2009
2010
2011
2012

2014

2
:

2015

1
1
1
1
1

TEMP1 = _RCV_D_LIST [ FLGWD ] AND RFLG_MASK;

2025
2026
2027

2
2
3

IF .TEMP1 NEQU .P1
THEN
BEGIN

2029
2030
2031
2032

3
3
3
3

gggz

3
;:
3
:

3
;.
;

;
:
:

2028

2033
2034
2035

2
2
2

2039

2036
ggg;

2
g

2040

2042

;
;

2045

;
;

!--

1--

2017

2041

2043

2044

!
!
!

MASK OUT DON'T CARE BITS IN THE RCV FLAG WORD AND COMPARE TO EXPECTED
RCV FLAG STATUS. IF STATUS NOT EQUAL THEN PRINT ‘BAD RCV FLAG WORD
STATUS'
! 0'140000'

ERR_FLAG = ONE;

CSR_WORD = GET_BIT [ CSR_ALL );

PRINTB ( MSGS9 );
PRINTB ( MSG1S, .TEMP1, RFLG_MASK );
ERRDF ( 0009, MSGOO, ERRORSREPORT );

END;

Too

!
5

MASK OUT DON'T CARE BITS IN THE RCV STATUS WD1 AND COMPARE TO EXPECTED
RCV STATUS WD1. IF STATUS NOT EQUAL THEN PRINT ‘BAD RCV STATUS WORD 1’

1--

IF .RCV_D_LIST [ STWD1 ) GEQU ZERO
THEN

TEMP2 = _RCV_D_LIST [ STWD1 ] AND R2_MASK

ELSE

2
2
2

P1
- expected RCV flag word
P2
- expected RCV status word 1
TEST_NO - test number in which error occurred.

2
2

2
2
2

:
!
:
!

2021
2022

2018
2019
2020

:
:
:

INPUT PARAMETERS:

:
;.
;.

3
;s

This routine checks receive status words for expected status.

BEGIN

2016

CHK_RCV_STATUS

;

[MAZURCZYK.DEQGNA]JZQGNA4 .BLI;2

GLOBAL ROUTINE CHK_RCV_STATUS ( P1, P2 ) : NOVALUE =

5-Jul-1984 14:02:25

VAX-11 Bliss-16 V4.0-579

#SBTTL 'GLOBAL ROUTINE - CHK_RCV_STATUS ( P1, P2 )’

2003

5-Jul-1984 14:13:51

TEMP2 = _RCV_D_LIST [ STWD1 ) AND .P2;

.TEMP2 NEQU .P2

THEN

! 0'174017

SEQ 024

Pagea 25
(14)

IK3
CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_RCV_STATUS ( P1, P2 )

2048
2049
2050
2051
2052
2053
2054
2055
2056

PRV WWWWWW

ZANA4
v01.0

000110
000112
000114
000116
000120
000124
000130
000134
000142
000150
00C152
000160
000164
000172
000200
000204
000210
000212
070214
000220
0002¢e<

VAX-11 Bliss-16 V4.0-579
(MAZURCZYK.DEGNA]ZQGNA4
,BLI ;2

SEQ 0243

Page

(14)

BEGIN
ERR_FLAG = ONE;

CSR_WORD = GET_BIT [ CSR_ALL J;

PRINTB ( MSG59 ):
PRINTB ( MSG16, .TEMP2,

.P2 );

ERRDF ( 0010, MSGOO, ERRORSREPORT );

END;
END;

024646

013737
042737
023766
001437
012737
013700
016016
011637
012746
012746
010600
104414
012716
013746
012746
012746
010600
104414
104455
000011
000000G
000000
062706
013700
010037
042737
023766
001441
012737
013700
016066
016637
012746
012746
010600
104414
016616
013746
012746

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

000000G 000000G
037777 000000G
000000G 000010

000001

000000G
000016
0000006
0000006
000001

.SBTTL
CHK.RCV.STATUS GLOBAL ROUTINE - CHK_RCV_STATUS ( P1, P2 )
CHK.RCV.STATUS::
CMP
-(SP),-(SP)
3

MOV
BIC
ggz

000000G

MOV

000000G
000000G
000003

0000006
003760 000000G
000000G 000006

000001 000000G
000000G

000016
000002

000000G
000001

000012
000000G
000000G

000002
000000G

2025

#1,.ERR.FLAG

2028
2029

:
: *,TMP
. LOCATION
: TMP.LOCATION,*
:

SP,RO

MOV

©-40000,(SP)

MOV

SP,.RO

: SP,#s

.WORD
.WORD
.WORD

1$:

; +,P1

TRAP

TRAP
TRAP

000010G

1997
2023

REG.ADR,RO
16(RO),(SP)
(SP),CSR.WORD
#MSGS9, -(SP)
01,-(SP)

MOV
MOV
MOV

000012

MOV
MOV
MOV
MOV
MOV
MOV

140000

RCV.D.LIST,TEMP1
037777, TEMP1
IEHPI.IO(SP)

ADD

MOV

MOV
BIC
gga

TEMPL1,-(SP)
#MSG1S, -(SP)
03,-(SP)
14
SS

012,5P

RO, TEMP2
#3760, TEMP2
55H92.6(SP)

11
MSGOO
ERRORSREPORT

RCV.D.LIST+10,R0O

SP,+
2031

2032

2027
2040
2042

:
:

2030

)

+,P2

2046

MOV
MOV

1 .ERR.FLAG
REG.ADR,RO

:
:

2049
2050

MOV
MOV
MOV

#MSGS9, -(SP)
01,-(SP)
SP,RO

2051

MOV
MOV

TRAP

MOV
MOV
MOV

16(R0O),2(SP)
2(SP),CSR.WORD

12(SP),(SP)
TEMP2, -(SP)
OMSG16, -(SP)

; *,TMP
. LOCATION
: TMP.LOCATION,*

: SP,»

: P2,#
.

2052

L3
CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - CHK_RCV_STATUS ( P1, P2 )

ZQANA4

vV01.0

000230
000234
000236
000240
000242
000244
000246
000250
000254
000256

012746
010600
104414

000003

104455

000012
000000G
000000
062706 000012
022626
000207

MOV

#3,-(SP)

TRAP
TRAP

14
S5

MOV

.WORD
.WORD
.WORD

2%:

ADD

cMP

RTS

2057

5-Jul-1984 14:02:25

SP,RO

12
MSGOO
ERRORSREPORT

#12,SP
(SP)+,(SP)+

88 words,
Routine Base:
ACSCODES$ + 2336
Maximum stack depth per invocation:
9 words

: Routine Size:

5-Jul-1984 14:13:51

SEQ_0244

VAX-11 Bliss-16 V4.0-579

Page

[MAZURCZYK.DEQGNA]ZQNA4 .BLI;2

(14)

H SP,‘
H

2053

]
/

H
»

2048
1997

2078
2079
2080

G0
S0
S0
G0
G
G0
B0
S0
G0
B0
S0
G0
S0
G0
G0

2082
2083
2084
2085
2086
2087
2088
2089
2090
2091
2092
2093
2094
2095

2097
2098
2100
2101
2102
2103
2104
2105
2106
2107
2108
2109
2110

VAX-11 Bliss-16 V4.0-579
(MAZURCZYK.DEQNA1ZQGNA4
.BLI;2

)’

GLOBAL ROUTINE COMPARE_PACKETS : NOVALUE =

GLOBAL ROUTINE :

2064

S
W8
G5
S
B8
S0
G5
B8
B8
S%
B8
W

#SBTTL 'GLOBAL ROUTINE - COMPARE_PACKETS (

2063

COMPARE _PACKETS

DESCRIPTION:

This routine compares contents of transmit packet to the contents

of receive packet and prints an error message if the don’'t compare.

2065
2066
2067
2068
2069
2070
2071
2072
2073
2074
2075
2076
2077

5-Jul-1984 14:13:51
,9-Jul-1984 14:02:25

2061
2062

CZQNACO DEQGNA FUNCTIONAL TESTGLOBAL ROUTINE - COMPARE_PACKETS ( )

2058
2059
2060

ZQNA4
v01.0

GET RECEIVE BYTE LENGTH ( RBL ) FROM RCV DISCRIPTOR AND COMPUTE WORD
LENGTH. THEN COMPARE ACTUAL TO EXPECTED RCV WORD LENGTH.
TEMP3 = 0;

IFTEEL,BIT [( CSR, LB ] GTRU ZERO
TEMP3 =

_RCV_D_LIST [ STWD1 ] AND RHL_MASK;

IFTaE&CSR_HORD AND #0'01'
TEMP3 =

_TEMP3 + (

EL?EHPS = 6;

! 0'003400°

) EQLU ZERD

.RCV_D_LIST [ STWD2 ] AND RLL_MASK )

‘

IF7 l-EY 5093 NEQU .RBUF _LENGTH
BEGIN
ERR_FLAG = ONE;

CSR_WORD = GET_BIT [ CSR_ALL );

PRINTB ( MSG59 );
PRINTB ( MSG17, .TEMP3,

.RBUF_LENGTH );

ERRCF ( 0011, MSGOO, ERROR$REPORT );

END;

INCR INDEX FROM O TO .TEMP3 - 1 DO
BEGIN

IF .RCV_D_LIST [ STWD1 ] EQLU NEWB
THEN
RCV_BUFFER [

IFTHéHIY
_BUFFER [

.INDEX ] = ZERO;

.INDEX ] NEQU .RCV_BUFFER [

IFTHECVD_LIST [ LONGP ) EQLU ONE

.INDEX )

! 0'000377'

SEQ 0245
Page
28
(15)

N3
CZQNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - COMPARE_PACKETS ( )

2111
2112

2113

2114
2115
2116
2117
2118
2119
2120
2121
2122

2123
2124
2125

000000

004137

000004
000006
000012
000016
000022
000026
000230
000035
000044

024646
005037
013700
016046
032716
001406
013737
042737
032737

000052
000054
000056
000062
000066
000070
000076
000104
000106
000114
000122
000130
000134
000140
000142
000144
000150
000154

000160

000164
000166
000170

000172
000174

BEGIN
TEMPS = _INDEX;
EXITLOOP;
END
ELSE
BEGIN
ERR_FLAG = ONE;

VWL LLLLLOLLOLWLLLD

ZQANA4
v01.0

001006
005001
153701
060137
000403
012737
023737
001437
012737
016066
016637
012746
012746
010600
104414
013716
013746
012746

012746

010600
104414
104455

000013
000000G

S -Jul-1984 14:13:51
- -Jul-1984 14:02:25

VAX-11 Bliss-16 V4.0-579
(MAZURCZYK.DEGNA]ZQGNA4
.BLI ;2

SEQ 0246

CSR_WORD = GET_BIT [ CSR_ALL ];

PRINTB ( MSG59 );
PRINTB ( MSG51 );

PRINTB ( MSGS0, .RCV_BUFFER [ .INDEX ],
ERRDF ( 0012, MSGOO, ERROR$REPORT );

.XMIT_BUFFER [

.INDEX ],

.INDEX );

END;

.SBTTL

COMPARE.PACKETS GLOBAL ROUTINE - COMPARE_PACKETS (

JS
cMP
CLR
MOV
MOV
BIT
BEQ
MOV
8IC
BIT
BNE

R1, $SAVE?2

COHPARE.PASKETS:

000016
001400
000010G 000000G

174377
000001

000000G
000000G

1$:

000012G

000006 000000G
000000G 000000G
000001
000016
000002
000001

000003

000000G
000002
000000G

2$:
3s:

2060

-(SP),-(SP )

TEMP3
REG.ADR,RO

:%400.(59)

16(R0), -(SP)

: *,TMP
. LOCATION
H

2083

;

2085

2087
2085
2089
2091

96, TEMP3

*,TMP .LOCATION
TMP .LOCATION,
*

16(R0),2(SP)
2(SP),CSR.WORD
@MSG59, -(SP)

@3, -(SP)
SP,RO
14
55

MSGOO

2079
2081

«,TMP.LOCATION

IEHPS.RBUF .LENGTH

SP,.RO
‘14
RBUF .LENGTH, (SP)
TEMPS, -(SP )

)

2094
2095
2096

: SP,»
2097

SP,»

2098

B4
CZQGNACO DEQNA FUNCTIONAL TEST
GLOBAL ROUTINE - COMPARE_PACKETS ( )
000000°
062706
013702
005001
000474
023727
001002
105061
126161
001461
032737
001403
010137
000455
012737
013700

016066
016637
012746

012746
010600
104414
012716
012746
010600
104414
010116
005046
116116
005046
116116
012746
012746
010600
104414
104455
000014
000000G
000000’
062706
005201
020102
002702
062706
000207

2126
2127

1
1

VAX-11 Bliss-16 v4,0-579
[(MAZURC
.DEGNA JZGNA4
ZYK
.BLI;2

SEQ 0247
Page

(15)

ERROR$REPORT

e12,SP
TEMP3 ,R2
R1
94

000012
0000006

0000006
000000G 0000006

040000

0000106

01,ERR.FLAG
REG.ADR,RO

000000G

000000G
000016 000004

16(R0O),4(SP)

000001

4(SP),CSR.WORD
oMSGS9, -(SP)
e1,-(SP)

000u006

14
oMSGS1,(SP)

000004 0000006
0000006

SP,RO

000001

SP,.RO
14

«( INDEX)
«(INDEX),*(INDEX)

s, TMP LOCATION

TMP.LOCATION,

SP,s

XMIT.BUFFER(R1),(SP)

¢«(INDEX),*

RCV.BUFFER(R1),(SP)
oMSGS0, -(SP)
04, -(SP)
SP,RO

«(INDEX),*

2122

.
14
MSGOO

ERRORSREPORT

8%:

9%:

000006

10%:

2121

SP.,s

016,5P

2119

2120

000016

2112
2111
2117
2118

SP,«

INDEX,»

-(SP)

2105
2107
2109

R1,(SP)
-(SP)

2093
2101

2103

»
INDEX,

0000006

000001

INDEX

RCV.D.LIST+10,-100000

000010G 100000

INDEX
»
INDEX,

2116
2101

2060

ADD
RTS

Rout ine Base:
ACSCODES
135 words,
; Routine Size:
15 words
; Maximum steack depth per invocation:

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

+ 2616

Ca
CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - SET_RDESCR_LIST ( P1, P2)

2141

2142
2143
2144

2145

2146

2147
2148
2149
2150
2151
2152
2153
2154
2155
2156
2157
2158

0 0 et ot et s ot Pt Pt ot o P Pt et st ot et P Pt

2140

BEGIN

D D N

2137
2138
2139

#SBTTL ‘GLOBAL ROUTINE - SET_RDESCR_LIST ( P1, P2)’

= T

000000

012737

000006
000014
000022
000030
000034
000040
000046
000054

016637
012737
016637
005037
005037
012737
012737
000207

Routine Size:

(MAZURCZYK.DEQGNA
]ZGNA4 .BLI ;2

SEQ 0248
Page
31

(16)

SET_RDESCR_LIST

GLOBAL ROUTINE :
DESCRIPTION:

This routine initializes receive descriptor list.

INPUT PARAMETERS:
Pl - expected Ethernet packet length in words
P2 - expected RCV Descriptor List settings

RCV_D_LIST
RCV_D_LIST
RCV_D_LIST
RCV_D_LIST
RCV_D_LIST
RCV_D_LIST
RCV_D_LIST
RCV_D_LIST

[
[
[
[
[
[
[
[

FLGWD
DBITS
LOADR
TwODL
STWD1
STWD2
DLINK
BSTAT

]
]
]
)
]
]
]
]

=
=
=
=
=
=
=
=

NEWB;
.P2;
RCV_BUFFER;
.P1;
0;
0;
Vv;
E;

END;

100000

.SBTTL SET.RDESCR.LIST GLOBAL ROUTINE - SET_RDESCR_LIST ( P1, P2)
SET.RDESCR.LIST::

000000G

MOV

000002 000002G
000000G 000004G
000004 000006G
0000106
0000126
100000 000014G
020000 000016G
23 words,

Max imum stack depth per

2159

VAX-11 Bliss-16 v4.,0-579

GLOBAL ROUTINE SET_RDESCR_LIST ( P1, P2 ) : NOVALUE
k3

2128
2129
2130
2131
2132
2133
2134
2135
2136

S5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

D N N N PO N NN

ZGNA4
v01.0

MOV
MOV
MOV
CLR
CLR
MOV
MOV

RTS

Routine Base:

invocation:

O words

0-100000,RCV.D.LIST

2(SP),RCV.D.LIST.2
ORCV.BUFFER,RCV.D.LIST.4
4(SP),RCV.D.LIST«6
RCV.D.LIST.10
RCV.D.LIST.12
©-100000,RCV.D.LIST.14
©20000,RCV.D.LIST+16

ACSCODES « 3234

P2,
Pl,s

2149
2150
2151
2152
2153
2154
2155
2156
2130

D4
CZQNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - SET_XDESCR_LIST ( P1, P2 )

ZQNA4
v01.0

000000

012737

000006
000014
000022
000030
000034
000040
000046
000054

016637
012737
016637
005037
005037
012737
012737
000207

; Boutine Size:
:

Maximum stack

2191

(MAZURCZYK.DEGNA
]ZGNA4 .BLI ;2

SEQ 0249
Page

(17)

GLOBAL ROUTINE SET_XDESCR_LJIST ( P1, P2 ) : NOVALUE
>

SET_XDESCR_LIST

GLOBAL ROUTINE :
DESCRIPTION:

This routine initializes transmit descriptor list.

INPUT PARAMETERS:
Pl - expected Ethernet packet length in words
P2 - expected XMIT Descriptor List settings

P
P
P
P
P
P

XMIT_D_LIST
XMIT_D_LIST
XMIT _D_LIST
XMIT_D_LIST
XMIT _D_LIST
XMIT_D_LISY
XMIT _D_LIST
XMIT_D_LIST

—

BEGIN

e
e
e e e e e e e e e e e e e
N N N
LV N

2179
2180
2181
2182
2183
2184
2185
2186
2187
2188
2189
2190

2175
2176
2177
2178

L L L

2174

VAX-11 Bliss-16 v4,0-579

#SBTTL 'GLOBAL ROUTINE - SET_XDESCR_LIST ( P1, P2 )’

2160
216l
2162
2163
2164
2165
2166
2167
2168
2169
2170
2171
2172
2173

5-Jul-1984-14:13:51
5-Jul-1984 14:02:25

FLGWD )

= NEWB;

DBITS ] = .P2;
LOADR ] = XMIT_BUFFER;
TWOL

STWD1
STWD2
DLINK
BSTAT

) =

)
)
]
]

=
=
=
=

.P1;

0;
0;
V;
E;

END;

.SBTTL
SET.XDESCR.LIST GLOBAL ROUTINE - SET_XDESCR_LIST ( P1, P2 )
SET.XDES&SQLIST:

23 words,

depth per

MOV
MOV
MOV

2(SP) ,XMIT.D.LIST.2

P2,¢

4(SP),XMIT.D.LIST+6

Pl,»

MOV
MOV

CLR
CLR

0000126
100000
000014G
020000
0000166

RTS

Rout ine Base:

invocation:

O words

ACSCODES

OXMIT .BUFFER,XMIT.D.LIST.4
XMIT.D.LIST«10
XMIT.D.LIST.12

« :

2181
2182
2183
2184
2185
2186
2187
2188
2162

2211
2212

2213
2214

2215

2216
2217
2218
2219
2220
2221
2222
2223
2224
2225
2226
2227
2228
2229
2230
2231
2232
2233
2234
2235
2236

2237
2238
2239
2240
2241
2242
2243
2244

VAX-11 Bliss-16 V4,0-579

(MAZURCZYK.DEGNA
]JZGNA4 .BLI;2

#SBTTL ‘GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 )’

WALKING_BIT

DESCRIPTION:

EL R

This routine sets bit to O or 1 in a specified bit position of the
Ethernet Station Address. For example,
if

PlL =0

then

ond

.P2 =15

Ethernet Station Address

P3 =5
=

FF-FF-FF
-FF -7F -FF

INPUT PARAMETERS:
Pl -bit( OQor 1)
P2 - bit position from base address
P3 - & of bytes to be tested using this pattern

BEGIN

SELECTONE .P2 OF
SETY

7 ):

[

OTO

[

8T0C .P3 +1)e8):

TEMP1

= 0;

TES;

TEMP2 =

GLOBAL ROUTINE :

EL R REL R

RL RT
J

GLOBAL ROUTINE WALKING_BIT ( P1, P2, P3 ) : NOVALUE

EL RL R

2205
2206
2207
2208
2209
2210

0 O O G G D D D D D D D D D PO D D N N 1t 4t et et s et o o e o o o o o e (o e

2204

2203

O O QN O O O

2201
2202

s s ot o Pt P o ot Pt

vo1.0

L EL RL N1 RL RL EL RL R

ZQNA4

21%2
2193
2194
2195
2196
2197
2198
2199
2200

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

CZONACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 )

P2 MOD 8;

.P1 EQLU ZERO
THEN
BEGIN

TBYTE1 = #B'00000000‘
;

SELECTONE .TEMP2 OF
SET

[ O ):
[ 1 ):

TBYTES = #0'001';
TBYTE3Z = #0'002';

[ 3):

TBYTE3 = #0'010';

[ 2 ):
[ 4

[ S ):
[ 6 ):
{ 7 ):

TES;

TBYTE3S = %0'004';
TBYTE3S = #0°'020';

TBYTE3 = #0'040';
TBYTE3 = #0'100';
TBYTE3 = #0'200';

SEQ 0250

Page

(18)

Fa
CZONACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 )

ZGNA4

2246

2247
2248
2249
2250
2251

8
S0
G5

N
n
v

S0
G0
G

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEGNAJZGNA4
.BLI;2

SEQ 0251

Page

(18)

END
ELSE
BEGIN
TBYTE1 = #B'11111:i11';

SE;E%TONE .TEMP2 OF

[ O ):
{ 1 ):
[ 2 ):

TBYTE3 = #0'367';

[ S ):
[ 6 ):

TBYTE3Z = #0'337';
TBYTE3 = #0'277';

[

7 ):

TES;

TBYTE3 = #0'357';

TBYTE3 = #0'177';

000000
000004

RNV

®¢

®5

END;

TBYTE3 = #0'376':
TBYTE3 = #0'375';
TBYTE3 = #0'373';

[ 3 ):

[ 4 ]J:

EWWEWWWENWENEWWNWO W

2245

©s

v01.0

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

004137
016602

000010
000012
000016
000020
000024
000026
000032
000034
000040
000044
000050

002406
020227
003003
005037
000421
020227
002416
016600
072027
062700
020200

000054
000056
000060
000064
000070
000072
000074
000100
000104
000106
000112

010201
006700
071027
010037
010201
006700
071027
010137
010100
005766
0C1071

INCR INDEX FROM O TO .P3 DO
TARGET_ADR
[ .INDEX ] = .TBYTEL;
TEMP3 = _P3 TARGET_ADR
[

_TEMP1;
.TEMP3 ] =

,TBYTES;

END;

0000006

.SBTTL
HALKING.S%A::

000012

MOV
BLT
CcMP
BGT
CLR

000007
000000G
000010

1$:

000010
000003
000010

000010
000000G
000010
000000G

000014

R1,$SAVE2

12(SP),R2

; P2,

CcMP

BLT

24
10(SP),RO

#3,R0
#10,R0
R2,.RO

P3,.»

2225

MOV
SXT
DIV
MOV

2228

MOV
SXT
DIV
MOV
MOV

TST

BNE

2194
2220
2222

2223
2220
2224

MOV
ASH
ADD
CcMP
BGT

2s%:

WALKING.BIT GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3
)

: P1

2234
2230

G4
CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 )
005037
005700
001004
012737
000552
020027
001004
012737
000543
020027

001004
012737
000534
020027
001004
012737
000525
020027

001004
012737
000516
020027
001004
012737
000507
020027
001004

012737

000500
020027
001075
012737
000471
012737
005700
001004
012737
000460
020027
001004
012737
000451
020027
001004
012737
000442
020027
001004
012737
000433
020027
001004
012737

CLR

0000006

TST
BNE
MOV

000001

000002

000004

(18)
2233
2236
2234
2237

18$

2234
2238

RO, %2

18¢

2234
2239

184

2234
2240

S$:

6%:

000020

000005

78:

000040

000006

000007

184
RO, @5

2234
2241

18¢

2234
2242

184

2234
2243

8¢
©40,TBYTE3

8¢:

RO, @6
9¢
€100, TBYTES3

9¢:

RO, &7

000100

184

000377

10%:

184

0377,TBYTEL
RO

114

0376,TBYTE3

000376
11$:

000001

184

RO,01

000002

2230
2248
2251

2249
2252

124

0375,TBYTES

000375
12¢%:

2249
2253

13s:

2249
2254

0000006

000367

14%;

000357

Page

184

4s:

000010

000003

{MAZURCZYK.DEGNAJZGNA4
.BLI;2

SEQ 0252

000003

000373

VAX-11 Bliss-16 V4,0-579

000004

000200

TBYTEL
RO

3s:

000002

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

184

RO, 04

2249
2255

H4
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - WALKING_BIT ( P1, P2, P3 )
15¢:

000005
000337

000177

188+

0000006 000000G

19%:

000010

20$:

20%
;BYTEI.TARGET.ADR(RO)
0
RO, 10(SP)
194

10(SP),TEMP3

000010 000000G
000000G 000000G
RTS

AC$CODE$
Routine Size:
173 words,
Rout ine Base:
Maximum stack depth per invocation:
4 words

2269

SEQ 0253

Page

(18)

2249
2256

16$

174
9277,TBYTES
184
RO, &7
184
@177,TBYTES

17¢:

000000G
000000G 000000G

18$

RO, @5

2249
2257

RO, #6

000000G

[MAZURCZYK.DEQGNA
)ZGNA4 .BLI;2

184

16$:

000007

VAX-11 Bliss-16 V4,0-579

000000G

000006
000277

BR
CMP

S5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

TEMP1,TEMP3
TEMP3,RO
;EYTES.TARGET.ADR(RO)

+ 3370

2249
2258

s INDEX

2262

; *,+«(INDEX)
s+ INDEX
:+ INDEX,P3

2263
2262

P3,#

2265
2266

2194

ZQNA4

CZQGNACO DEGNA FUNCTIONAL TEST

2273
2274
2275
2276
2277
2278
2279
2280
2281
2282
2283
2284
2285
2286
2287
2288
2289
2290
2291
2292
2293
2294
2295
2296
2297
2298
2299
2300
2301
2302
2303
2304
2305
2306
2307
2308
2309
2310
2311
2312
2313

GLOBAL ROUTINE WRT_STATION_ADR ( P1, P2 ): NOVALUE

[MAZURCZYK.DEGNAJZGNA4 .BLI ;2

Page

(19)

WRT_STATION_ADR

GLOBAL ROUTINE :
DESCRIPTION:

This routine writes Station Address to XMIT_BUFFER.

INPUT PARAMETERS:

Pl - Ethernet Station Address index (1:14) in Station Address RAM
P2 - Ethernet Station Address index ( 0:19 )

in the TARGET_ADR table

BEGIN
TEMP1 =

P2 + 6;

SELECTONE .P1 OF
SET
0OTO 7 ]:
[

8 T0 14 ):

[

TES;

TEMP2 =

.P1;

TEMP2 =

+ 57;

.TEMP2 EQLV ZERO

THEN

INCR INDEX FROM O TO S DO
BEGIN

ENSHIT-BUFFER [

.TARGET_ADR [

.INDEX +

.TEMP1 ];

.INDEX ; =

BEGIN
TEMP3 = _INDEX * 8 + ,TEMP2;
EM);HIT_BWFER ( .TEMP3 ] = _TARGET_ADR [

.INDEX +

.TEMP1

ELSE

INCR INDEX FROM O TO S DO

END;

];

.SBTTL

WRT,STATION.ADR GLOBAL ROUTINE - WRT_STATION_ADR ( P1, P2 )

000012

JSR
MOV

R1,$SAVE3
12(SP),R1

:
i P2.»

2272
2291

000014

MOV

14(SP),RO

i Pl,»

2293

000000

004137

000000G

000004

016601

000020

016600

070127
010137

VAX-11 Bliss-16 V4.0-579

2272

5-Jul-1984 14:02:25

#SBTTL ‘GLOBAL ROUTINE - WRT_STATION_ADR ( P1, P2 )’

2271

D DTN D TN N N N PO N N N N 50 4t ot et ot e ot o o o o ot ot o o o o o et

2270

000010
000014

5-Jul-1984 14:13:51

GLOBAL ROUTINE - WRT_STATION_ADR ( P1, P2 )

= IO O8N D GG

v01.0

SEQ 0254

000006
000000G

WRT.STATION.ADR::

MUL
MOV

J4
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - WRT_STATION_ADR ( P1, P2 )
002406

020027
003003
010037
000413

020027
002410

020027
003005
010037
062737
013703
001014

000100
000102
000106
000114
000116

000122
000124

000126
000130
000132
000136
000140
000144
000146
000152
000160
000162
000166
000170

005000
010001
063701
116160
005200
020027
003766
000207
005002
010200
072027
060300
010037
010201
063701
116160
005202
020227
003760
000207

;: Routine Size:

;

Maximum stack

2314

BLT

000007

RO, #7

MOV

RO, TEMP2

000010

14:

CcMP

RO, #10

000016

BLT

000071 000000G
000000G

2%:
3s:

000000G
000000G 000000G

000005

RO, TEMP2

BNE
CLR
MOV

44
RO
RO,R1

4%:

S$:

000003

MOV
ASH

R2,RO
¢3,R0

MOV

000000G

ADD

RO, TEMP3
R2,R1

TEMP1,R1

;gRGET.ADR(Rl).XHIT.BUFFER(RO)

000005

CMP

R2,65

RTS

61 words,

Routine Base:

invocation:

5 words

INDEX,

*,+(INDEX)

INDEX
INDEX,

2303
2305

2303

INDEX
INDEX,#*

2301
2308
2310

INDEX,#

2311

R3,RO

?2%8

depth per

: INDEX

000000G 000000G

BLE

2301

TEMP1,R1
;SRGET.ADR(RI).XHIT.BUFFER(RO)

RTS
CLR

2298

871, TEMP2
TEMP2,R3

RO, &5

ADD

000000G

CcMP

BLE

(19)

2296
2293
2297

MOV

ADD
?3ga

Page

2295

RO,#16

ADD
MOV

SEQ 0255

CMP

BGT

5-Jul-1984 14:02:25

VAX-11 Bliss-16 Vv4,0-579
[MAZURCZYK,.DEGNA]ZQN
.BLI;2
A4

CMP

BGT

000000G

S5-Jul-1984 14:13:51

ACSCODES$ + 4122

s+ INDEX
:

INDEX,*

2308

2272

<4
CZQNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - PREP_FOR_SETUP ( )

2345
2346
2347
2348
2349
2350

0 et et o ot ot o o o o o o o o o o o o o ot

BEGIN

000000

010146

000002
000004
000006
000010
000012
000016
000020

005746
005001
010100
006300
063700
011016
005037

000024
000030
000034
000036
000042

SEQ 0256

) '
=

I I I I I I D I I VD I ' ' ' '

GLOBAL ROUTINE PREP_FOR_SETUP : NOVALUE

VAX-11 Bliss-16 V4.0-579
(MAZURCZYK.DEQGNA
JZGNA4 .BLI;2

GLOBAL ROUTINE :

PREP_FOR_SETUP

DESCRIPTION:

This routine retrives Ethernet Station Address from the Ethernet'’'s

Station Address PROM, saves copy of Ethernet Station Address PROM
in the TARGET_ADR vector,

initializes transmit and receive buffers

to zero and finally sets buffer length to select promiscuous mode.
INPUT PARAMETERS:
none

Tse

RETRIEVE ETHERNET PHYSICAL STATION ADDRESS AND SAVE A COPY OF IT IN THE

*TARGET _ADR'

VECTOR.

DD N

#SBTTL 'GLOBAL ROUTINE - PREP_FOR_SETUP (

= 0D N NN G

2315
2316
2317
2318
2319
2320
2321
2322
2323
2324
2325
2326
2327
2328
2329
2330
2331
2332
2333
2334
2335
2336
2337
2338
2339
2340
2341
2342
2343
2344

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

D N N

ZANA4
v01.0

111637
111661
005201
020127
003761

INCR INDEX FROM O TO S DO
BEGIN

TBYTEL = .REG_ADR [ .INDEX, ST_ADDR ];
TARGET_ADR [ ( PHA_INDEX # 6 ) + .INDEX ] =

END;

.TBYTEl;

)

CLR_BUFFERS ( 256 );
END;

.SBTTL

PREP.FOR.SETUP GLOBAL ROUTINE - PREP_FOR_SETUP (

MOV

R1,-(SP)

2317

CLR
MOV

R1
R1,RO

s+ INDEX
: INDEX,*

2342
2344

ADD

REG.ADR,RO

CLR
MOVB

TBYTEL
(SP),TBYTE1

PREP.FOR.SETUP:
;

TST

1$:
000000G
000000G
000000G

ASL

MOV

0001626

MOvB

000005

cMP

-(SP)

(RO),(SP)

: «,TMP_LOCATION

(SP),TARGET.ADR+162(R1)

; *,+(INDEX)

INC

BLE

R1,05

: INDEX

s+ INDEX,*

)

2345
2342

L4
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - PREP_FCR_SETUP ( )

ZANAS&
v01.0
000044
000050
000054
000056
000060

012746
004737
022626
012601
000207

: Routine Size:

MOV

000400
001234’

JSR
CMP
MOV

RTS

25 -ords,

Routine Base:

: Maximum stack degth per invocation:
2351
2352
2353

1
1
1

4 words

AC$CODE$

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25
PC,CLR.BUFFERS

(SP)+,(SP)+
(SP)+,R1

+ 4314

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK.DEGNA)ZQNA4
.BLI;2

SEQ 0257
Page

(20)

2348

2317

M4
CZQGNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - FORM_HEX_ADR ( P3 )

5-Jul-1984 14:13:51
S5-Jul-1984 14:02:25

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK.DEGNA]ZQGNA4
.BLI;2

2389
2391
2392
2393
2394
2395
2396
2397
2398
2399
2400
2401
2402
2403
2404
2405
2406

NN NN N N G GGG W8N D D MDD GG

D D D D D D D P N PO N N N

GLOBAL ROUTINE FCRM_MEX_ADR ( P3 ) : NOVALUE

0 50 e e ot o e o o o o o o ot o o

#SBTTL 'GLOBAL ROUTINE - FORM_HEX_ADR ( P3 ) '

GLOBAL ROUTINE :

FORM_HEX_ADR

DESCRIPTION:

This routine retrives Ethernet Station Address from the Ethernet’'s

Station Address PROM, saves its copy in the TARGET_ADR vector.
INPUT PARAMETERS:
P3 - Index to Station Address in the TARGET_ADR vector
BEGIN
*e

RETRIEVE ETHERNET PHYSICAL STATION ADDRESS AND SAVE A COPY OF IT IN THE
*TARGET_ADR' AND *'STATION_ADR' VECTORS.
IF

.P3 EQLU. ZERO

THEN

TEMPS =

.P3 = 6;

IN(B::GR?EXS FROM 0 TO 5 DO
TBYTEL = .REG_ADR [ .INDEXS, ST_ADDR ];
EMT)ARGET_ADR [ C PHA_INDEX « 6 ) + .INDEXS ] =

.TBYTE1l;

‘

COUNTER = ZERO;

IUIB:G?NDEXS FROM 0 TO S BY 2 DO
TEMP1

TEMP1

= _TARGET_ADR [
=

.TEMP1 t 8;

.TEMPS «

.INDEXS ]);

TEMP2 =
_TARGET_ADR [ .TEMPS + .INDEXS ¢+ 1 );
STATION_ADR [ .COUNTER ] = .TEMP1 OR ( .TEMP2 AND #0'000377'
E"FO\NTER = _COUNTER + 1;
8
L

PRINT ETHERNET STATION ADDRESS ON THE CONSOLE

COUNTER

= 18;

);

SEQ 0258
Page
41

(21)

N4
CZQGNACO DEQNA FUNCTIONAL TEST
GLOBAL ROUTINE - FORM_HEX_ADR ( P3 )

2407

END;

004137

000000G

2408
2409
2410
2411

2412

2413
2414
2415
2416
2417
2418
2419
2420
2421
2422
2423
2424
2425
2426
2427
2428
2429
2430
2431
2432
2433
2434
2435
2436
2437
2438
2439
2440

000000
000004
000006
000012
000014

005746
016600
001003
005037

000022

010001

000030

010137

000036
000040
000042
000046

010001
006301
063701
011116

000024

000050

PHYS_ADR
PHYS_ADR
PHYS_ADR
PHYS_ADR
PHYS_ADR

HFNVWSELLBBLLALANVIVIVIVIVILIVIVIVIBBWWWMND
DN

ZQGNA4
v01.0

070127

005037

[
[
[
[
[

O
1
19
20
21

]
)
]
]
)

=
=
=
=
=

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

VAX-11 Bliss-16 V4.0-579

[(MAZURCZYK.DEGNA]ZQGNA4
.BLI;2

SEQ 0259
Page

(21)

sC's’';
sC'A’;
%C' ';
sC's';
sC'N’;

DECR INDEX1 FROM 2 TO 0 DO
BEGIN

TEMP3 = _STATION_ADR [ .INDEX1 ];
INCR INDEX2 FROM O TO 1 DO
BEGIN

INCR INDEX3 FROM O TO 1 DO

BEGIN
TEMP1 = _TEMP3 AND sX'F’;
IFt.TEHPl LEQU #DECIMAL'9’
HEN
TBYTEL1 = #C'0’'
ELSE
TBYTE1 = #C'A’'

.TEMP1

+ ( .TEMP1 - %DECIMAL'10’
PHYS_ADR [ .COUNTER ] = .TBYTE1l;
COUNTER = .COUNTER - 1;
TEMP3 = TEMP3 ¢t ( -4 );

);

END;

IF .COUNTER GTRU 2
THEN

PHYS_ADR [

COUNTER =
END;

.COUNTER ] = wC’'-';

.COUNTER - 1;

END;

.SBTTL
FORM.HEX.ADR:
:
JSR
TST
MOV
BNE

000014

000000G
000006

0000006

R1,$SAVE3

- FORM_HEX_ADR ( P3 )
5

2356

;: P3,s

2379
2381
2379
2383

CLR

1$:

BR
MOV

2%:

MOV
CLR

3s$:

000000G

FORM.HEX.ADR GLOBAL ROUTINE

MUL

:+ INDEXS

MOV

ASL

ADD
MOV
CLR

REG.ADR,R1
(R1),.(SP)
TBYTEL

;

*,TMP.LOCATION

2385
2387

BS
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - FORM_HEX_ADR ( P3 )

ZGNA4
v01.0

111637

111660
005200
020027
003761
005037

005002
010201
063701

116137
105037

013700
072027
010037
116137
105037
013701
006301
005000
153700
053700

MOvVB
MOve
INC
cHP
BLE

0000006
0001626
000005
0000006
4%

077244

MOV

ADD

0000006
000000G 000000G
0000016
0000005
000010
000000G

MOVB
CLRB
MOV

ASH

MOV
MOvVE
CLRB
MOV

000001G 000000G
0000016
0000006

ASL

CLR
B8ISB
BIS
MOV
INC
ADD
cHP
BLE

010061
005237

062702
020227
003734
012737
112737
112737
112737
112737
112737
012701
016137
012703
012702
013737
042737
013700
020027
101006
010037
062737
000405
010037
062737
013700
113760
005337
013700
072027
010037

CLR
CLR

000000G 000000G

5%:

000002

6$:

7¢:

MOV
MOVB
MOvVB
MOVB
MOVB
MOVB
MOV
MOV
MOV
MOV
MOV

B8IC
MOV
cHP
BHI
MOV

8s:
9%:

S-Jul-1984 14:13:51
S-Jul-1984 14:02:25

(SP),TBYTEL

agP).TARGEY.ADR0162(RO)
R?.OS

COUNTER

R2
R2,R1
TEMPS,R1
TARGET.ADR(R1),TEMP]
TEMP1.1
TEMP],RO
€10,R0
RO, TEMP1
TARGET.ADR+1(R1),TEMP2
TEMP2.1

VAX-11 Bliss-16 v4.0-579

[(MAZURCZYK
.DEQNA JZGNA4 .BLI;2
;s ¢,s(INDEXS)
s+ INDEXS
s

INDEXS,
s

: INDEXS
s+

INDEXS,s

2397

COUNTER,R1

2398

TEMP1,RO
RO,STATION.ADR(R1)

COUNTER
#2,R2

R2,05

SEQ 0260

: ¢,INDEXS

2399
2393

«,INDEX1

2406
2407
2408
2409
2410
2411
2413

INDEXS,
+

4%
022, COUNTER

045 ,PHYS
. ADR
0101 ,PHYS . ADR+1
040 ,PHYS ,ADR+23
045,PHYS.ADR+24

0116, ,PHYS ADR+25
04,R1
STATION.ADR(R1),TEMP3

«(INDEX1),*

¢, INDEX2
+,INDEX3

02.R3
#2.R2
TEMP3, TEMPL
0177760, TEMP1
TEMP1,RO
RO,011

2415
2416
2418
2420

2421

84
RO,TBYTEL

2423

060,TBYTEL

2421
2425

94
RO,TBYTEL
067,1BYTEL

COUNTER,RO

2426

COUNTER

2427
2428

TBYTE1,PHYS ,ADR(RO)

TEMP3,RO
0-4,RO
RO, TEMP3
R2,7$

INDEX3,»

2418

C5
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - FORM_HEX_ADR ( P3 )
013702

020227
101403
112762
005337
077361
162701

100307

000446

MOV

0000006
000002

000055

000000G

10¢:

000002

005726
000207

: Routine Size:

244}

2442

1
1

MOVB

055,P
. ADR(R2)
HYS

RTS

148 words,

Rout ine Bease:

: Maximum stack depth per invocation:
B

R2,02

DEC
S08
SuB
8PL
TST

6 words

AC$CODES

VAX-11 Bliss-16 v4,0-579

(MAZURCZYK.DEGNAJZGNA4
.BLI;2

COUNTER,R2

CMP

BLOS

000000G

S5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

SEQ G261

(21)
2431

10$

COUNTER

R3,6$
@2,R1

(SP)e.

+ 4376

INDEX2,
»

+,INDEX1

2433
2435
c416
2413
2356

D5
CZQNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - XMIT_SETUP_PACKET ( P1 )

2449

2450
2451
2452
2453
2454
2455
2456

2457
2458
2459
2460
2461
2462

2463

2464

2465
2466
2467
2468
2469
2470

2471
2472
2473
2474
2475
2476
2477
2478
2479
2480
2481
2482
2483
2484

2485
2486

2487

2488
2489
2490
2491
2492
2493
2494
2495

VAX-11 Bliss-16 V4.0-579

[MAZURCZYK.DEGNA)ZGNA4
,BLI ;2

GLOBAL ROUTINE XMIT_SETUP_PACKET ( P1 ) : NOVALUE
>

2446
2447
2448

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

#SBTTL ‘GLOBAL ROUTINE - XMIT_SETUP_PACKET ( P1 )’

2444
2445

A0 D AL D N D G GG G TOTU D D T RO D D N

2443

) 5 5 4t et ot ot o o ot ot Pt ot o b b o o o o o e P o o o ot b ot ot b ot ot

ZGNA4
v01.0

XMIT_SETUP_PACKET

GLOBAL ROUTINE :
DESCRIPTION:

This routine initializes descriptor lists to transmit and receive

unchained Setup loopback packet. After loopback packet has been
received DEGNA CSR,

transmit and receive status registers are

checked for proper status. Finally, transmit and receive packets
are compared to verify that they are identical.
XMIT D_LIST [
XMIT D_LIST [
XMIT D_LIST [
XMIT D_LIST [
XMIT
O LIST[

O
i
2
3
4

]
]
]
)
)

= NEWB
= VSE
= XMIT_BUFFER
= .XBUF_LENGTH
=0

RCV_D_LIST
RCV.DOLIST
RCV_D_LIST
RCV.D_LIST
RCVOLIST

XMITOLIST[ S ] =0
XMITDLIST( 6 ) =V
XMITOLIST[ 7] = E

Pl - transmit buffer length in bytes

BEGIN

CLR_DESCR (

);

_P1;
- ( _RBUF _LENGTH t

SET_RDESCR_LIST (
SET_XDESCR_LIST (
IF

-1

);

.XBUF _LENGTH, VE );
.XBUF _LENGTH, VSE );

.P1 EQLU A_MODE

THEN

BEGIN
XBUF _LENGTH =

- (

SET_XDESCR_LIST (

ENSEY_ROESCR_LIST (

(

.RBUF LENGTH

.XBUF _LENGTH, VSEL

.XBUF _LENGTH,

-1

);

)

XMIT_AND_RCV_PACKET (

O ]
1 ]
2 ]
3 ]
4]

RCVDOLIST[( S ]
RCVOLIST[ 6 )
RCVO_LIST [ 7]

INPUT PARAMETERS:

RBUF _LENGTH =
XBUF _LENGTH =

[
[
[
[
[

);

COMPARE STATUS REGISTERS TO EXPECTED VALUES

);

= NEwB
= VE
= RCV_BUFFER
= .XBUF_LENGTH
=0
=0
=V
= E

SEQ 0262

Page

(22)

ES
CZQNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - XMIT_SETUP_PACKET ( P1 )

2496
2497
2498
2499

2500
2501
2502

2503
2504
2505
2506
2507
2509

=D
DD

®6

@0 ©0

ZGNA4
v01.0

TEMP1 = XWD12_STATUS;

0' 000400

THEN

TEMP1 = #0°'002400';

CHK_XMIT_STATUS ( XFLG_STATUS,
COMPARE _PACKETS (

000002

000000G

120000
003234°
000000G
130000
003312’
000010 000201

2222222

10(SP), 0201

1%
RBUF .LENGTH,RO
RO
RO
RO
RO, XBUF ,LENGTH
RO,(SP)
0-47600, -(SP)
PC,SET.XDESCR,LIST
XBUF .LENGTH
(SP)
,
©-60000, -(SP)
PC,SET.RDESCR.LIST

000000G

130200

003312'
0000006
120000
003234
000000V
000001
001262°

100220

XMIT.SETUP.PACKET GLOBAL ROUTINE - XMIT_SETUP_PACKET ( P1

XHIT.SETUSéPACKfi Tee
PC.CLR.DESCR
J
MOV
2(SP) ,RBUF ,LENGTH
MOV
2(SP),RO
RO
ASR
RO
NEG
RO, XBUF .LENGTH
MOV
MOV
9-60000, -(SP)
MOV
PC,SET.RDESCR.LIST
JSR
XBUF .LENGTH,(SP)
MOV
#-50000, -(SP)
MOV
PC,SET.XDESCR.LIST
JSR

000000G

004737

0'140000',

.SBTTL

000000G

000170

.TEMP1 );

END;

000002

004737

(MAZURCZ
K .DEQNA ]JZQNA4 .BLI;2

0100220’, 0'100220°
0’ 140000', 0'020000°

IF . XMIT_D_LIST [ STE16 )

SEQ 0263

VAX-11 Bliss-16 v4,0-579

CHK_RIXI_STATUS ( ONE );
CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK );
CHK_RCV_STATUS ( RFLG_STATUS, RWD1_STATUS );

001206’

000142

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

1%:

(SP)+,(SP)+

)

Pl,s

RBUF .LENGTH, »

2477
2478
2479

XBUF .LENGTH, *

2480
2481

Pl,s

2483
2486

XBUF .LENGTH, »

2487
2488

2485
2491
2497
2498

(SP),-(SP)

001646°
140000

PC,CHK,.CSR.STATUS

002336

PC,CHK,RCV.STATUS

020000, -(SP)

2499

F5
CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - XMIT_SETUP_PACKET ( P1 )

ZANA4
v01.0
000174
000202
000210
000212
000220
000224
000230
000234
000240
000244

012737
032737
001403
012737
012716
013746

004737
004737
062706
000207

: Routine Size:
:

000400
002000

000000G
0000106

002400

000000G

140000
000000G
002040’
002616

000014

83 words,

Maximum stack depth per

2510
2511

1
1

MOV

BIT
BEQ
MOV

2%:

MOV
MOV
JSR
JSR

ADD
RTS

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

VAX-11 Bliss-16 v4,0-579
(MAZURCZYK
)ZGNA4
.DEGN
.BLI;2
A

SEQ 0264
Page

(22)

400, TEMP1
0$OOO.XHIT.D.LIST010

2501
2502

2504
2505

AC$CODES$ + 5046
Rout ine Base:
7 words
invocation:

2507
2475
2445

G5
CZQNACO DEGNA FUNCTIONAL TEST
GLOBAL ROUTINE - SEND_ELOOP_PACKET ( P3 )

B0
B0
B0
S0
S0
S0
B0
80 S0
S0
B8
B0
S0
B0
S0
S0
S5
B8
85
85
85

VAX-11 Bliss-16 v4,0-579

(MAZURCZYK.DEQGNA
JZGNA4 .BLI ;2

GLOBAL ROUTINE SEND_ELOOP_PACKET ( P3 ) : NOVALUE
*

SEND_ELOOP _PACKET

GLOBAL ROUTINE :
DESCRIPTION:

This routine initializes transmit and receive descriptor lists and

then

initiates transmissin of a loopback packet.

After

loopback packet is received DEGNA CSR, transmit and receive status r

egisters are checked for proper status. Finally, transmit and receive
identical.

. XBUF _LENGTH

M<OO

RCV_BUFFER

NONB WO

] = NEWB
1 = VE

et et

P
P
P
P

= XMIT_BUFFER

] = .XBUF _LENGTH
l]=0
l]=0
] =v
] =E

]

RCV_D_LIST
RCV_D_LIST
RCV_D_LIST
RCV_D_LIST
RCV_D_LIST
RCV_D_LIST
RCV_D_LIST
RCV_D_LIST

— P

] = NEWB
] = VE

—

NOOVAWN-=O

XMIT_D_LIST
XMIT_D_LIST
XMIT _D_LIST
XMIT_D_LIST
XMIT_D_LIST
XMIT_D_LIST
XMIT_D_LIST
XMIT_D_LIST

Lan L on Loyl

packets are compared to verify that they are

e lan Lo

s ot
b b o
b o b o o o o o
O8O

2543

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

#SBTTL 'GLOBAL ROUTINE - SEND_ELOOP_PACKET ( P3 ) '

Lanlan

2531
2532
2533
2534
2535
2536
2537
2538
2539

G O G D D D PO D D D D D D PO D D N N 5 5t et et ot ot Pt o o ot o ot e o o o o o

2527
2528
2529
2530

2512
2513
2514
2515
2516
2517
2518
2519
2520
2521
2522
2523
2524
2525

00 B0

ZGNA4
v01.0

INPUT PARAMETERS:
P3
-

BEGIN

PUT_BIT ( CSR, LB, INX_LOOPBACK );
XMIT_AND_RCV_PACKET (

);

..COHPARE STATUS REGISTERS TO EXPECTED VALUES
CHK_RIXI_STATUS ( ZERO );
( CSR_STATUS, CSR_MASK j;
CHK_CSR_STATUS
CHK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS );
IF

0'100220', 0'100220°
0’ 140000’, 0'000400°

.Pa EQLY ZERO

THE

BE GIN
ENSHK_RCV_STAYUS

ELSE
BE GIN

TEMP1

( RFLG_STATUS, RWD1_STATUS

= RWD14_STATUS;

IF _RCV_D_LIST [ STWD1

);

0'140000',

! 0'060000'

] AND #0‘'070001' EQLY %0'070001°

0'020000°

SEQ 0265
Page

(23)

H5
CZQNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - SEND_ELOOP_PACKET ( P3 )

2565
2566
2567
2568
2569

DWW

ZGNA4
v01.0

THEN
TEMP1

END;

= #0°'070001';

CHK_RCV_STATUS

( RFLG_STATUS,

.SBTTL

013700

000000C

042760
052760
004737

001400
001000

5046
004737
012716
011646

004737
012716

000072
000076
000100
000106
000114
000116
000124
000130
000134
000140
000144

012746
004737
005766
001005
012716
012746
000416
012737
032737
001403
012737
012716
013746
004737
062706
000207

000000V

000016
000016

001262’
100220
001646'

140000
000400
002040’
000010

JSR
TST

000000G
000010G

000000G
070001
140000
000000G
002336
000010

1%:

24:
3s:

BNE
MOV
MOV
BR
MOV
BIT
BEQ
MOV
MOV
MOV
JSR
ADD
RTS

Rout ine Base:
AC$CODES
51 “"d’o
S words
: Maximum stack depth per invocation:

;: Routine Size:

2570

);

! 0'140000',

PC,CHK
XMIT . STATUS
10(SP)

1
©-40000,(SP)
920000, -(SP)
3¢
60000, TEMP1
@1,RCV.D.LIST.10
24
70001, TEMP1
©-40000,(SP)
TEMP1, -(SP)
PC,CHK.RCV.STATUS
#10,5P
PC

+ 5314

SEQ 0266

VAX-11 Bliss-16 V4.0-579

(MAZURCZYK.DEGNA)ZGNA4
.BLI ;2

(23)

222222

SEND.ELOOP.PACKET GLOBAL ROUTINE

SEND.ELOOP.PACKET::
REG.ADR,RO
MOV
8IC
©1400,16(R0O)
BIS
€1000,16(RO)
JSR
PC,XMIT.AND.RCV.PACKET
CLR
-(SP)
JSR
PC,CHK ,RIXI.STATUS
MOV
©-77560,(SP)
MOV
(SP),-(SP)
JSR
PC,CHK.CSR.STATUS
MOV
©-40000,(SP)

140000
020000

060000
000001

.TEMP1

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

SEND_ELOOP_PACKET (

)

2545

:
:

2546
2552

2553

2554

2556

2559

2563
2564

:
:

2566
2567

2543
2514

;

15
CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL RCUTINE - SEND_TEST_PACKET
#SBTTL 'GLOBAL ROUTINE - SEND_TEST_PACKET ’

GLOBAL ROUTINE SEND_TEST_PACKET : NOVALUE
>

b o o

VAX-11 Bliss-16 V4.0-579
[(MAZURCZYK.DEGNA
]ZGNA4 .BLI;2

SEND_TEST_PACKET

GLOBAL ROUTINE :

DESCRIPTION:

This routine initializes transmit and receive descriptor lists and

then initiates transmissin of an external loopback packet.

XMIT_D_LIST [ O ]
XMIT D_LIST [ 1 ]
XMIT D_LIST [ 2 ]
XMIT D_LIST [ 3 ]
XMITOLIST( 4]
XMITOLIST[S )
XMITODLIST[ 6]
XMITOLIST [ 7

= NEWB
= VE
= XMIT_BUFFER
= .XBUF_LENGTH
=0
=0
=V

] = E

RCV_D_LIST [
RCV.O_LIST [
RCV_D_LIST [
RCV.D_LIST [
RCVDOLIST[(
RCVOLIST[
RCVDOLIST[

RCVOLIST [

O ]
1 )
2 ]
3 ]
4]
S ]
6]

= NEWB
= VE
= RCV_BUFFER
= .XBUF_LENGTH
=0
=0
=V

7] =E

INPUT PARAMETERS:
None

BEGIN
*e

WRITE ETHERNET STATION ADDRESS AND DATA PATTERN INTO THE TRANSMIT BUFFER
RESET_DEQGNA (

);

IN§26§:DEX FROM 0 TO 5 DO

XMIT_BUFFER [ .INDEX )

ENSHIT_BUFFER {

.INDEX « 6

= _TARGET_ADR [ ( PHA_INDEX « 6 ) + .INDEX );

)

.TARGET_ADR [

( PHA_INDEX * 6 ) «

XMIT_BUFFER [ PKT_TYPE )
LPB_PKT;
XMIT _BUFFER [ PKT_TYPE « 1 ] = SKIP _CNT;
XMIT_BUFFER [ PKT_TYPE + 2 ] = RFC;
>

= et e o o o ot o P o o o o o P o o o o [
D N N N N
PO D N
NN AL NN N N N N NN A GGG

2571
2572
2573
2574
2575
2576
2577
2578
2579
2580
2581
2582

i o o Pt

ZGNA4
v01.0

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

CONVERT SETUP PACKET SIZE FROM BYTE COUNT TO WORD COUNT AND SET uP

DESCRIPTOR LISTS

RBUF _LENGTH = PKT_LENGTH + 14;
XBUF _LENGTH

(

.RBUF _LENGTH

-1

);

.INDEX ];

SEQ 0267

Page

(24)

J5
CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - SEND_TEST_PACKET

ZQNAS

2624

2625
2627
2628
2629

2635

Lad VSV
VS VL SR VY8

v01.0

XMIT_AND_RCV_PACKET (

(24)

);

END;

.SBTTL
SEND.TEST.PACKET GLOBAL ROUYYNE - SEND_TEST_PACKET
SEND.TEST.PACKET::
PC,RESET.DEGNA
JSR
RO
CLR
s+ INDEX
TARGET.ADR+162(R0O),XMIT .BUFFER(RO) ;
MOvVB
1%:

2609

s *(INDEX),*(INDEX)
s INDEX

2610
2607

MOvB

TARGET.ADR+162(R0O),XMIT .BUFFER+6(R0O)

000005

INC
cMP

RO
RO, ®5
1%

BLE
MOVB
CLRB
MOVB

120000
003234
0000006
120000
003312’
0000006
001400
000016
000000V
000006

=
INDEX,

9220,XMIT.BUFFER+14

2613
2614
2615
2622
2623

RTS

AC$CODES + 5462
Routine Base:
51 words,
; Routine Size
4 words
; Maximum stack depth per invocation:

2605
2607

;s #(INDEX),*(INDEX)

000162G 000006G

000000G

Page

PUT_BIT ( CSR, LB, EXT_LOOPBACK );

000220 000014G
0000156
000001
0000166
002752 000000G
002752

2636

(MAZURCZYK.DEGNA]ZQGNA4
.BLI;2

SEQ 0268

..SET DEGNA TQ EXTERNAL LOOPBACK MODE AND SEND LOOPBACK PACKET

000162G 0000006

VAX-11 Bliss-16 V4.0-579

SET_RDESCR_LIST ( .XBUF _LENGTH, VE );
SET_XDESCR_LIST ( .XBUF_LENGTH, VE );

000324

000070
000074
000076
000102
0001G6
000112
000116
000122
000126
000134
000140
000144

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

XBUF .LENGTH, +

2625
2626

2632
2633
2599
2573

IKS
CZQGNACO DEQGNA FUNCTIONAL TEST

5-Jul-1984 14:13:51
5-Jul-1984 14:02:25

GLOBAL ROUTINE - XMIT_AND_RCV_PACKET

VAX-11 Bliss-16 V4.0-579

SEQ 0269

[(MAZURCZYK.DEQGNA]ZQGNA4
.BLI;2

52 00 D N N N N PO N 5 et e e ot o ot o ot o o Pt o o

]
®

GLOBAL ROUTINE :

DESCRIPTION:

XMIT_AND_RCV_PAC KET

This routine initiates transmit and receive operations.

INPUT PARAMETERS:

[

.
!
!

1--

BEGIN

.JOP_TABLE [ RLO_ADR ] = RCV_D_LIST;
.JOP_TABLE [ RHI_ADR ] = 0;
.JOP_TABLE [ XLO_ADR ) = XMIT_D_LIST;
.IJOP_TABLE [ XHI_ADR ) = 0;
END;

000000

012777

000000G 000004G

000006
000012
000020
000024

005077
012777
005077
000207

000006G

0000006 000010G

000012G

.SBTTL

XMIT.AND.RCV.PACKET GLOBAL ROUTINE - XMIT_AND_RCV_PACKET

CLR
MOV
CLR

SI0P.TABLE+6

XMIT.AND.RCV.PAC KET::
ORCV.D.LIST,3I0P.TABLE+4
MOV

RTS

OXMIT.D.LIST,9I0P.TABLE+10

géOP.TABLEOIZ

Routine Base:
ACSCODES + 5630
11 words,
;s Routine Size:
O words
; Maximum stack depth per invoc ation:

i
i

2665
2666

1
1

GLOBAL ROUTINE XMIT_AND_RCV_PACKET : NOVALUE
Ld

s o o

#SBTTL 'GLOBAL ROUTINE - XMIT_AND_RCV_PACKET '

2658
2659
2661
2662
2639

&
ZQNA4

CZQNACO DEGNA FUNCTIONAL TEST

v01.0
:

:
:

2667

GLOBAL ROUTINE - XMIT_ILOOP_PACKET ( P3 )
1

2668

2670

2673

5669 1

2671
2672

1
1

too
!

GLOBAL ROUTINE :

DESCRIPTION:

2674

:
B

2676
2677

1
1

H
!

2679

2678

2680

2682

:
3
:
3
:
:
:
:

2681

2683
2684
2685
2686
2687
2688
2689
5230

:
:
3

1
2692
2693

:
:
:
:

2695
c69
c697
2698

:
H
3
3
H
:

H
3
s
:

H
:
3

3
H

2694

2699
2700
2701
2702
2703
2704

2705
2706
g;g;

2
2
g
2
2

2
2
2
3

3
3
3

2713
2714

2
1

000000

2
2
2

004737

XMIT_ILOOP_PACKET

P3 - selector

BEGIN

CLR_DESCR ( );
SET_RDESCR_LIST (
SET_XDESCR_LIST (

.XBUF _LENGTH, VE );
.XBUF _LENGTH, VE );

XMIT_AND_RCV_PACKET (

);

.JOP_TABLE [ CSR ] = EENABLE;
IF .P3 EQLU ONE
THEN
BEGIN

CHK_RIXI_STATUS ( ONE );
CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK );
CHK_RCV_STATUS ( RFLG_STATUS, RWD16_STATUS );

! 0'100220', 0'100220°'
! 0'140000‘, 0'044000'

CHK_RIXI_STATUS ( ZERO );
CHK_CSR_STATUS ( CSR_STATUS, CSR_MASK );
CHK_RCV_STATUS ( RFLG_STATUS, RWD13_STATUS );

! 0'100220', 0'100220'
! 0'140000', 0'000000*

END
ELSE
BEGIN

3
3
;
2

2710
2711
2712

3
2
3

2709

(26)

INPUT PARAMETERS:

1
1
2
2

Page

This routine

{MAZURCZYK
.DEQNA ]JZGNA4 .BLI;2

GLOBAL ROUTINE XMIT_ILOOP_PACKET ( P3 ) : NOVALUE =

2675

5-Jul-1984 14:02:25

SEQ 0270

VAX-11 Bliss-16 v4,0-579

#SBTTL 'GLOBAL ROUTINE - XMIT_ILOOP_PACKET ( P3 ) '

5-Jul-1984 14:13:51

CHIK_XMIT_STATUS ( XFLG_STATUS, XWD12_STATUS );
COMPARE _PACKETS ( )3
“,IOP_TABLE [ CSR ] = DISABLE;

! 0'140000', 0'000400'

END;

001206’

LSBTTL

XMIT.ILOOP.PACKET GLOBAL ROUTINE - XMIT_ILOOP_PACKET ( P3 )

JSR

PC.CLR.DESCR

XMIT,ILOOP.PACKET::

2687

M5
CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - XMIT_ILOOP_PACKET ( P3 )
013746
012746
004737
013716
012746
004737
004737
0127177
07.6627
(01016

MOV
MOV
JSR
MOV
MOV
JSR
JSR
MOV
CMP
BNE
MOV
JSR
MOV
MOV

0000166
000001

012716
)04737

012716

000126
000132
000136
000140
000144
000150
000154
000160
000164
000170
000174

(11646
C04737
012716
012746
000413
205016
004737
012716
011646
004737
012716
005046
004737
012716
012746
004737
004737
005077
062706
000207

;: Routine Size:
:

3
3

Maximum stack

2715
2716

1
1

140000

002336°
140000

000400

63 words,

01,(SP)
PC,CHK,RIXI.STATUS
0-77560,(SP)

(SP),-(SP)

RTS

Rout ine Base:

invocation:

7 words

AC$CODES$

Page

(26)

;: P3,»

2692
2694
2696
2699
2700

2701

(SP)

2705

@-77560,(SP)

2706

PC,CHK,CSR.STATUS
#-40000,(SP)

2707

2710

@IOP.TABLE+16

000014

depth per

01,8I0P.TABLE+16
10(SP),
01

PC,CHK, XMIT,STATUS
PC,COMPARE .PACKETS

002040°
002616
000016G

SEQ 0271

2690

PC,SET.XDESCR.LIST
PC,XMIT.AND.RCV.PACKEY

-(SP)

2$:

(MAZURCZYK.DEGNA]ZQGNA4
.BLI;2

PC,SET.RDESCR.LIST
XBUF .LENGTH
(SP)
,

(SP),-(SP)

001646'

VAX-11 Bliss-16 vV4.0-579

2689

1$:

001262
100220

S-Jul-1984 14:13:51
S-Jul-1984 14:02:25

214,SP
PC

+ 5656

2711
2712
2685
2669

N5
CZQGNACO DEQGNA FUNCTIONAL TEST
GLOBAL ROUTINE - TURN_OFF _LED ( P1 )

2734

2735
2736
2737
2738
2739
2740
2741
2742
2743
2744
2745

010146

000002
000006
000012
000014
000020
000024
000026
000030
000034
000036
000042
000046
000050
000052

004737
012701
010146
012746
004737
022626
005201
020127
003766
016€46
004737
005726
012601
000207

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK.DEQGNA]ZQGNA4
.BLI;2

SEQ 0272
Page

27)

GLOBAL ROUTINE TURN_OFF _LED ( P1 ) : NOVALUE
*

b ot ot P
s o ot ot o

000000

S-Jul-1984 14:13:51
5-Jul-1984 14:02:25

#SBTTL ‘GLOBAL ROUTINE - TURN_OFF _LED ( P1 )’

TURN_OFF _LED

GLOBAL ROUTINE :
DESCRIPTION:

et o
0 et o e ot P
D) 5

2717
2718
2719
2720
2721
2722
2723
2724
2725
2726
2727
2728
2729
2730
2731
2732
2733

=2 1D N NN PO D N N N

ZQNA4
v01.0

This routine

INPUT PARAMETERS:
Pl

BEGIN
PREP_FOR_SETUP (

);

INCR INDEX1 FROM 1 TO 14 DO
WRT_STATION_ADR ( .INDEX1, PHA_INDEX );
XMIT_SETUP_PACKET (

.P1

);

END;

.SBTTL

TURN.CFF .LED::

004314°
000001
000023

004122

000016
000004
005046°

1$:

TURN.OFF.LED GLOBAL ROUTINE - TURN_OFF_LED C P1 )

JSR
MOV
MOV
MOV

PC.PREP.FOR.SETUP
01,R1
R1,-(SP)
023,-(SP)

cMP
INC
CMP

(SP)+,(SP)e«
R1
:
R1,016

JSR

BLE

PC.WRT.STATION.ADR

MOV
JSR

4(SP),-(SP)
PC,.XMIT,SETUP
. PACKET

RTS

1ST

3
: ¢,INDEX1
: INDEX1,#*

2719
2737
2739
2740

(SP).

22 words,
Routine Base:
ACSCODES « 6054
; Routine Size:
steck
depth
per
invocation:
4
words
um
Maxim
;

:+ INDEX1
s+ INDEX1,#

2739

: Pl,»

2742

2735
2719

B6
ZQGNAS

CZQNACO DEQNA FUNCTIONAL TEST

v01.0

GLOBAL ROUTINE - TURN_OFF _LED ( P1 )

S-Jul-1984 14:02:25

2746

2747

2749

0TS external references
.GLOBL
$SAVE3, $SAVE2

PSECT SUMMARY

Psect Name

:
:

:
3

Words

ACSCODE S

Attributes

1580

RO,

LCL,

REL,

CON

Library Statistics

;

[MAZURCZ YK .DEQGNA JZGNA4 .BLI ;2

ELUDOM

VAX-11 Bliss-16 v4.0-579

S-Jul-1984 14:13:51

-------- Symbols --------

File

DISMSUSER2:[MAZURCZYK.DEQGNA]JQGNALIB.L16;2

Total

Loaded

Percent

223

133

CCMMAND QUALIFIERS

BLISS/PDP11 ZGNA4 .BLI/LIST=ZQGNA4,LIS/0BJECT=ZQGNA4.0BJ/SOURCE=FAGE:53
Size:
Run Time:

1580 code ¢+ O date words
00:48.5
Elapsed Time:
04:48.1
Lines/CPU Min:
3402
Lexemes/CPU-Min: 24486
Memory Used:
236 pages
Compilation Complete

Pages

Processing

00:00.0

Mapped

Time

SEQ 0273

Page

27)

Cé
CZQNACO DEQGNA FUNCTIONAL TEST
o popa pa pt pt O OO0OOOO

ZANAS

5-Jul-1984 14:18:44
5-Jul-1984 14:02:44

VAX-11 Bliss-16 V4,0-579
(MAZURCZYK,DEQGNA
JZGNAS ,.BLI;2

MODULE ZQGNAS (STITLE 'CZQGNACO DEGNA FUNCTIONAL TEST'
IDENT =

'V01.0',

ADDRESSING_MODE(ABSOLUTE)
)

#SBTTL 'LAST ADDRESS AND SETUP SECTION'
BEGIN

LIBRARY 'QGNALIB';

REQUIRE 'BLSMAC.REQ’;
! <BLF /NOFORMAT >

! GNALIB LIBRARY

! DIAGNOSTIC SUPERVISOR LIBRARY

SEQ 0274
P

age

(1)

D6
ZAGNAS
v01.0

CZAGNACO DEQGNA FUNCTIONAL TEST
LAST ADDRESS AND SETUP SECTION

1502

: P 1504

1506

1503

1505

S-Jul-1984 14:18:44
5-Jul-1984 14:02:44

LASTAD

BGNSETUP(1);

ENDPTAB

BGNPTAB

ENDSETUP

LJDENT
.ENABL

000000

$XYZ$,
T$FREE

000000

TS$FREE: : .WORD

000004
000001

LSLAST==
T$PTHY==

000207

$END.LINK::

000000C

.WORD

1 word,

Routine Base:

1507
1508
1509

1
1
0

0 words

H
:
s

s
s

<<TS$FREE-<BL$LAS+4>>/2>

BLSLAS.4
1
.SBTTL

S$END.LINK LAST ADDRESS AND SETUP SECTION

RTS

1499

$XYZ$ + 0006

PSECT SUMMARY

Psect Neme

Words

3
3

END
ELUDOM

/Vv01.0/
AMA

PSECT
BLS$LAS: : .WORD

;: Maximum stack depth per invocation:
:
s
3

ZGNAS CZGNACO DEGNA FUNCTIONAL TEST

0C0004°

;: Routine Size:

" sEQ 0275

! NUMBER OF P-TABLES

.TITLE

000000
000000
000002
000004

VAX-11 Bliss-16 v4,0-579
[(MAZURCZYK.DEGNA ]JZANAS.BLI;2

Attributes

Library Statistics

oo
Tl T
File

e WG R

e (Y

O S e Symbols -------Total
Loaded
Percent

DISKSUSER2:[MAZURCZYK
. DEGNAJGNALIB.L16;2

223

Pages
Mapped

Processing
Time

00:00.1

CZGNACO DEGNA FUNCTIONAL TEST
LAST ADDRESS AND SETUP SECTION

ZGNAS
v01.0

S-Jul-1984 14:18:44
14:02:44

5-Jul-1984

COMMAND QUALIFIERS

BLISS/PDP11 ZGNAS.BLI1/LIST=ZANAS.LIS/0BJECT=ZQGNAS.0BJ/SOURCE=PAGE:53
Size:

Run Time:

1 code + 3 data words
00:06.3

00:20.2
Elapsed Time:
14486
Lines/CPU Min:
76252
Lexemes/CPU-Min:

Memory Used:

101 pages

Compilation Complete

V4.0-579
VAX-11 Bliss-16NA)ZGNAS.BLI;2
[MAZURCZYK.DEG

5‘“,221" 2)

F6
5-Jul-1984 14:03:17

(MAZURCZYK.DEGNA ]JGNALIB.R16;1

Ottt e e e e OO OO HOOO00O0MMHIHOO000000

98 S0

2-Jul-1984 17:11:54

VAX-11 Bliss-16 V4.0-579

DEFINE DATA STRUCTURES IN THIS SECTION

! DEFINE ACCESS ALGORITHM

STRUCTURE
REG_STR [ O, P, S, E )=
BEGIN

LOCAL TMP_LOCATION;
TMP _LOCATION = .(REG_STR + SUPVAL « 0) <O0,%BPVAL,0>;

TMP_LOCATION
END < P, S, E >;

STRUCTURE
ADR_.STR [ O, P, S, E )=

! DEFINE ACCESS ALGORITHM

BEGIN

LOCAL TMP_LOCATION;

TMP_LOCATION = (ADR_STR
TMP_LOCATION

+ SUPVAL + 0) <0,%BPVAL,0>;

END < P, S, E >;

STRUCTURE
LBLoCk [ O, P, S, E, I )=
BEGIN

CASE I FROM O TO 2 OF
SET

[0 ]):

( LBLOCK « O = sSUPVAL );

e )'( .LBLOCK + 0 & SUPVAL );
TES;

"¢ .LBLOCK + 0 * SUPVAL );

END < P, S, E >;

! DEFINE ACCESS ALGORITHM

SEQ 0277

Page

(1)

S-Jul-1984 14:03:17

[MAZURCZYK.DEGNAJGNALIB.R16;1

MACRO DEFINITIONS

MACRO

TST_BIT ( ADDR, EXPECTED ) =

( IF (

.ADDR AND EXPECTED ) EQLU EXPECTED

THEN
TRUE

ELSE
FALSE

)%,

PUT_géén(‘ OFFSET, POSITION,

IMAGE

) =

éu.)zEG_ADR + SUPVAL & OFFSET )< #FIELDEXPAND ( POSITION ) > = IMAGE;
GET_SEEI'I‘WJ\DR ( OFFSET, POSITION, IMAGE ) =

é .STATION_ADR + OFFSET )< #FIELDEXPAND ( POSITION ) > = IMAGE;

CO0OO0O0O0O0O0O0O000000O0O00O00000O0O0O0O0O00O0O0O0D0O0O0O0O000

= = 4

IxX

IXIXXX

2-Jul-1984 17:11:54

VAX-11 Bliss-16 V4.0-579

THIS MACRO GETS BITS SPECIFIED BY THE FIELD NAME " POSITION “

AND MEMORY LOC SPECIFIED BY (.REG_ADR + #UPVAL ¢ OFFSET)
1

GET_BIT ( OFFSET, POSITION ) =

.REG_ADR [ OFFSET, POSITION ) s;

SEQ 0278
Page

(2)

0125
0126

0127

PROGRAM LITERALS

LITERAL
NO

YES
FALSE
TRUE

ZERO
ONE
DISABLE
EENABLE

P_CLOCK

L_CLOCK
NO_CLOCK
CLEAR_FLG
SET_FLG

PWR_DELAY
M1_DELAY

M2_DELAY

M3_DELAY
M4 _DELAY

MS_DELAY
K

DELAY
DELAY
DELAY
DELAY
DELAY
DELAY
DELAY
DELAY
DELAY

TIMEL_LIMIT
TIME2 _LIMIY

TIMES_LIMIT
TIMEA _LIMIT
TIMES _LIMIT
TIME6 _LIMIT
TIME7 _LIMIT
TIMES _LIMIY
TIME9 _LIMIT

STEP1

LOOP
LOOP
LOOP
LOOP

ITERATION
ITERATION
ITERATION
ITERATION

COUNT
COUNT
COUNT
COUNT
16K LOOP ITERATION COUNT
LOOP ITERATION COUNT
LOOP ITERATION COUNT
LOOP ITERATION COUNT
LOOP ITERATION COUNT

0101
0102
0103
0104
0105
0106
0107
0108
0109
0110
0111
o112
0113
0114
0115
0116
0117
0118
0119
0120
0121
0122
0123
0124

Q0000000000000 0O0O0O00O0000O0O00000000000O0O0O00O00O00O000OO00O00O00

S-Jul-1984 14:03:17
2-Jul-1984 17:11:54

RLO_ADR

RHI_ADR
XLO_ADR
XHI_ADR

I0P_LO_ADR
I0P_HI_ADR
10P_SIZE
I0P_ADR
10P_VEC

I1/0 PAGE REGISTER SIZE
OFFSET TO DEVICE ADDRESS
OFFSET TO DEVICE VECTOR ADDRESS

VAX-11 Bliss-16 V4.0-579

[(MAZURCZYK.DEGNA]JGNALIB.R16;1

SEQ 0279

Page

3
(3)

0128
0129
0130
0131
0132
0133

COO00O0O

5-Jul-1984 14:03:17
2-Jul-1984 17:11:54

I0OP_BRL
INT_VEC

CSR
WORD _LIMIT

®0' 177777,

! OFFSET TO DEVICE BR LEVEL

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK.DEGNA]JGNALIB.R16;1

SEQ 0280

Page

(3)

*
'

STATUS WORD O, FLAG WORD

PH
D1_OFFSET
D2_OFFSET

120,
I

DESCR_SIZE 7 2.
16,

4096,

N
m

BUF _SIZE 7 2,
56
256,
- ( BUF_SIZE 7 4 ),

4096,

SHORTEST_PACKET
LONGEST _PACKET
LSPL
PHA_INDEX

BN B
BN B

STATION ADR RCV BUF LENGTH - 3 WDS
PACKET LENGTH
PACKET LENGTH

LEGAL PACKET LENGTH
ILLEGAL PACKET LENGTH
LOOPBACK PACKET
PACKET TYPE

BN B

SKIP_CNT

RFC
PKT_DATA

PKT_TYPE

SHORTEST SETUP PACKET LENGTH
LONGEST SETUP PACKET LENGTH
LONGEST SETUP PACKET LENGTH

LEGAL _LENGTH
ILLEGAL _LENGTH
LPB_PKT

1500,
1534,
1514,
1536,
%0’ 0220°,
12,

PKT_LENGTH
MAX_LENGTH

%0'177775',

SA_RBL

0144
0145
0146
0147
0148
0149
0150
0151
0152
0153
0154
0155
0156
0157
0158
0159
0160
0161
0162
0163
0164
0165
0166
0167
0168
0169
0170
0171
0172
0173
0174
0175
0176
0177
0178
0179
0180
0181
0182
0183
0184

0143

0141
0142

VAX-11 Bliss-16 v4,0-579
(MAZURCZYK.DEGNA]JGNALIB.R16;1

DESCRIPTOR LIST DEFINITIONS
'

0134
0135
0136
0137
0i38
0139
0140

CO000000000O000DO00O00000000O00000V0000O0000O00O0O0O0O0O0O000O0000

90 98

5-Jul-1984 14:03:17
2-Jul-1984 17:11:54

PHYSICAL ADDRESS INDEX IN THE
TARGET _ADR VECTOR

#0' 000060*
#0' 000024*
#0’'177524°
#0' 177560
#0' 000100’ ,

INPUT CONSOLE TERMINAL VECTOR LOC

POWER FAIL VECTOR LOCATION
TURN OFF CPU LED LIT ON DCOK

CONSC_E TERMINAL INPUT ADDRESS
ENABLE CONSOLE TERMINAL INPUT

SEQ 0281

Page

5
(4)

0231
0233

VAX-11 Bliss-16 V4.0-579

[(MAZURCZYK.DEGNA]JGNALIB.R16;1

TRANSMIT, RECEIVE AND CSR STATUS AND MASK WORD DEFINITIONS

CSR_STATUS
CSR1_STATUS
CSR2_STATUS
CSR_MASK
CSR1_MASK
CSR2_MASK
CSR3_MASK
PATRN1
PATRN2

%0’ 100220 ,
#0' 000062' ,

#0' 000060° ,
#0' 100220’ ,

#0'010376',
®0' 167777,

%0' 010000’ ,
= #0'001411',
= %0°'001471',

TRANSCEIVER POWER (
TRANSCEIVER POWER (

XC - BIT 12
XC - BIT 12

CSR STATIC BITS

NXM_LO_ADR
NXM_HI_ADR

%0’ 160000’
,
#0' 000077,

NXM ADDRESS - LOW ORDER BITS
NXM ADDRESS - HIGH ORDER BITS

XFLG_MASK
X1_MASK
XWD1_MASK
XWD2 _MASK
XFLG_STATUS
XWD11_STATUS
XWD12_STATUS

0’ 140000°
,
#0'157760°',
#0°'037777',
%0’ 140000’
,
%0’ 000000’
,
%0’ 000400’ ,

TRANSMIT
TRANSMIT
TRANSMIT
TRANSMIT
EXPECTED

XWD14 _STATUS

#0' 047600’ ,

RFLG_MASK
R1_MASK
R2_MASK
RWD1 _MASK
RWD2 _MASK
RWD1_STATUS
RWD11_STATUS
RWD12_STATUS
RWD13_STATUS
RWD14 _STATUS

0’ 140000°'
,
#0' 100000’ ,
#0'174017',
%0’ 140000’
,

%0’ 100000’
,

FLAG WORD MASK BITS
STATUS WD 1 MASK BITS
STATUS WD 1 MASK BITS
STATUS WD 2 MASK BITS
TRANSMIT FLAG WORD

EXPECTED TRANSMIT STATUS WD 1
BIT 8 IS SET IN INTERNAL LOOOPBACK MODES
BIT 8 IS RESET IN EXTERNAL LOOOPBACK MODES
EXPECTED TRANSMIT STATUS WD 1

RWD15_STATUS
RWD16_STATUS

RECEIVE FLAG WORD MASK BITS
RECEIVE STATUS WD 1 MASK BITS
RECEIVE STATUS WD 1 MASK BITS
RECEIVE STATUS WD 1 MASK BITS
RECEIVE STATUS WD 1 MASK BITS
EXPECTED RECEIVE STATUS WD
EXPECTED RECEIVE STATUS WD
EXPECTED RECEIVE STATUS WD
EXPECTED RECEIVE STATUS WD
EXPECTED RECEIVE STATUS WD
EXPECTED RECEIVE STATUS WD
EXPECTED RECEIVE STATUS WD

RFLG_STATUS

EXPECTED RECEIVE FLAG WORD

RHL _MASK

RCV HIGH ORDER LENGTH BITS

RLL _MASK

#0'177417',
#0’' 020000’ ,
#0' 100000

)
)

CSR STATIC BITS

bt
et ot et e

OCO0000O00000O0O0000000000VO0O0O0O0O00O00O0O0O0O0O0O00O00000OC0O0O000O

5-Jul-1984 14:93:17
2-Jul-1984 17:11:54

RCV LOW ORDER LENGTH BITS

SEQ 0282
Page

(5)

S-Jul-1984 14:03:17

[MAZURCZYK.DEGNAJGNALIB.R16;1

OCO000O0VO000O0O000O00O00CO00000T700000O0O0O0000000

S0 90

S0 S0

2-Jul-1984 17:11:54

VAX-11 Bliss-16 V4.0-579

BUFFER DESCRIPTOR / CHAIN DESCRIPTOR BIT DEFINITIONS

v
c
E
S

= %0'100000',
= %0’ 040000' ,
= %0'020000'
,
= %0'010000* ,

'
!
'
!

NEWB

= %0'100000° ,

! BUFFER NOT USED IF 1

VE
VL

= %0'120000° ,
= %0’ 100200',

'
'

LASTD

= %0'100000' ,

= %0'100100°,

VHL

= %0’ 100300,

= %0’ 130200 ,
= %0'120077°,

'
'

= %0’ 140000 ,

VSE

= %0’ 130000° ,

XLRL _SET

= %811

VSEL
VENXM

ILEL SET
ILEL _CLR

- %811
- %8'00'

CHAIN ADDRESS IF 1

END OF MESSAGE IF 1

SETUP MODE PACKET IF 1

! LAST DESCRIPTOR IN CHAIN

VH
ve

VALID ADDRESS IF 1

'
'

! XMIT AND RCV LISTS INVALID

! INTERNAL AND EXTERNAL LOOPBACK BITS
! INTERNAL AND EXTERNAL LOOPBACK BITS

INT_LOOPBACK = %8'00°
INX_LOOPBACK = %B'10°
EXT_LOOPBACK = B’ 11’

¢ INTERNAL LOOPBACK MODE
¢ INTERNAL/EXTENDED LOOPBACK MODE
* EXTERNAL LOOPBACK MODE

N_MODE
P_MODE
A_MODE

! ENABLE NORMAL MODE OF OPERATION
! ENABLE PROMISCUOUS MODE OF OPERATION
! ENABLE ALL MULTICAST MODE OF OPERATION

LEDL
LED2
LED3

= %0’ 000200 ,
= %0’ 000202 ,
= %0' 000201,

= %0'000204"
,
= %0’ 000210,
= %0'000214",

! TURN OFF LED 1
! TURN OFF LED 2
! TURN OFF LED 3

SEQ O

9.323

(6)

0271
0272
0273
0274
0275
0276
0277
0278
0279
0280
0281
0282
0283
0284
0285
0286
0287
0288
0289
0290

OCO0000O00O00OO0O0O0O0DO000000

S5-Jul-1984 14:03:17
2-Jul-1984 17:11:54
..

STATION ADDRESS CONSTANTS
HIGH STATION ADDRESS BITS

MIDDLE BITS
LOW STATION ADDRESS BITS
ACTUAL CHECKSUM INDEX

SADR2 = 1,
SADR3 = 2,

CHSUM = 3,
*e

HARDWARE AND SOF TWARE P-TABLE EQUATES

SWP_SIZE

HWP_SIZE

SET_IT
CLR_IT

=3,

= 2,

=1,
= 0;

! SOFTWARE P-TABLE SIZE ( WORDS )

! HARDWARE P-TABLE SIZE ( WORDS )

VAX-11 Bliss-16 v4.0-579

(MAZURCZYK.DEGNAJQGNALIB.R16;1

SEQ 0284
P
age

8
(7

=
=

LB
=
XLRL
=
ALL _BITS=

LO_BYTE

HI_BYTE

ST_ADDR
ST_WORD

RCV_LO

RCV_HI

XMIT_LO
XMIT _HI
VEC_ADR
VEC_ALL

=
=
=
=

CSR_ALL =
TES;

Y
Y®
B
IS
B
IS
D I
YD
D
D
YD
D

e
®
®
®

ek e

e R

Lo Lo T o ]
Lo L

LO_NIBBLE

HI_NIBBLE

D LD

X2
RI

e L

IL
EL
SE

e
. aky

80D

b et

SET

000000

0326
0327
0328
0329
0330
0331
0332
0333
0334
0335

IOP_FIELDS

0324

FIELD

0322
0323

lanlanl e lanlanl o Lol

0310
0311
0312
0313
0314
0315
0316
0317
0318
0319
0320
0321

THE CONTROL AND STATUS REGISTER BIT DEFINIVIONS

—

0307
0308

]

0302
0303
0304
0305

B WN

0301

]

~NOon

0293
0294
0295
0296
0297
0298
0299
0300

VAX-11 Bliss-16 V4.0-579
(MAZURCZYK.DEGNA]JGNALIB.R16;1

5T4

e
]

0291
0292

0000000000000 O0000000O00000O0O0O00O00O00000O00O0O0O0O0O0O0

5-Jul-1984 14:03:17
2-Jul-1984 17:11:54

RECEIVER ENABLE
SOFTWARE RESET
NXM_ INTERRUPT
BOOT/DIAGNOSTIC ROM
XMIT LIST INVALID
RCV LIST INVALID

INTERRUPT ENABLE

XMIT INTERRUPT REQUEST
INTERNAL LOOPBACK MODE

EXTERNAL LOOPBACK MODE
SANITY TIMER ENABLE
RESERVED, UNUSABLE
TRANSCEIVER PWR
CARRIER
RESERVED, UNUSABLE
RCV INTERRUPT REQUEST

R/W
R/W
R
R/W
R
R
R/W
R/W
R/W
R/W
R/W

(
(
(
(
(
(

ACTIVE
ACTIVE
ACTIVE
ACTIVE
ACTIVE
ACTIVE

HIGH
HIGH
HIGH
HIGH
HIGH
HIGH

)
)
)
)
)
)

R
R

( ACTIVE HIGH )
( ACTIVE HIGH )

( ACTIVE HIGH )

( ACTIVE HIGH )
( ACTIVE LOW
)

( ACTIVE HIGH )
( ACTIVE HIGH )

R/W ( ACTIVE HIGH )

LOOPBACK BITS

XMIT AND RCV LISTS INVALID BITS
FETCH WHOLE WORD

GET WORD, ALL BITS

STATION ADDRESS LOW BYTE
GET WORD, ALL BITS
RCV BUFFER DESCRIPTOR LIST LOW ADDRESS
RCV BUFFER DESCRIPTOR LIST HIGH ADDRESS
XMIT BUFFER DESCRIPTOR LIST LOW ADDRESS
XMIT BUFFER DESCRIPTOR LIST HIGH ADDRESS

INTERRUPT VECTOR ADDRESS
INTERRUPT VECTOR ADDRESS
CONTROL AND STATUS REGISTER

SEQ 0285

Page

(8)

T
R R

VAX-11 Bliss-16 v4.0-579
(MAZURCZYK.DEQNA JGNALIB.R16;1

TRANSMIT AND RECEIVE DESCRIPTOR LIST FIELDS

W_LEN
TES;

0000000

SET-UP PACKET IF 1
LAST DESCRIPTOR IN CHAIN ( END )
DESCRIPTOR HAS CHAIN ADDRESS IF 1
VALID ADDRESS IF 1

LOW 16 BITS OF XMIT OR RCV BUFFER ADDRESS

XMIT OR RCV PACKET WORD LENGTH

00000000
CUO

DESCRIPTOR BITS

XMIT OR RCV STATUS WORD 1
FIFO BUFFER OVERFLOW

000

—

B_LEN

XMIT OF RCV FLAG WORD

XMIT OR RCV STATUS WORD 2
RECEIVE BYTE LENGTH (

[

6. o.

BSTAT

[

P —

DL INK

RBLL

STWD2

DESCRIPTOR LINK PRE-FILL STATUS WD

s
"
"
8
"
5
&

TOR

—

ABORT
STE16
NOCAR
RUNT
ESETUP
LONGP
ERRSV
LSTD

bbbl BLL

STWD1
OvF

NP P P

TWOL

—

LOADR

P — — — — — — — —

vV_BIT

Lan]

L_BIT
S_BIT
E_BIT
C_8IT

DBITS

H_BIT

FLGWD

— — —

OL_FIELDS
SET

FIELD

——

80
90
B0
B0
B0
90
00
00
00
80
8%
80 00
B0
00
B0
B0
B0
00
B0
80
00
00 00
00
B0 S0
00
S5
05
B0
S0
05
S0
00
B0
55
S5
S0
55
S5
B

0339

CO00O00000000000000000000000000O000000O0O0O0O00O000000

0336
0337

S-Jul-1984 14:03: 17
2-Jul-1984 17:11: 54

BUFFER STATE ! XMIT ODD/EVEN ! WIGH ORDER ADR

XMIT BUFFER BEGINS ON BYTE BOUNDARY
XMIT BUFFER ENDS ON BYTE BOUNDARY

SANITY TIMER ON AT POWER_ULP
NO CARRIER
RUNT PACKET IN FIFO
CONTROL SET_UP OR LOOPBACK PACKET
LONG PACKET

ERROR SUMMARY
LAST DESCRIPTOR LIST IN CHAIN

LOW 8 BITS

)

SEQ 0286

Page

(9)

[(MAZURCZYK.DEQNA JGNALIB.R16;1

FIELD

HWP _FIELDS =
SET
ADDR
«= [ 0, O,

16, O 1.

! 1/0 PAGE BASE ADDRESS
! INTERRUPT VECTOR ADDRESS
: BR LEVEL

TES;

1.
]

SOF TWARE P-TABLE FIELD DEFINITIONS

FIELD

SWP_FIELDS =
SET

ERR_CNT = [0,0,16,0)
TES;

COMMAND QUALIFIERS
BLISS/PDP11 QNALIB.R16/LIST=GNALIB.LIS/LIBRARY=QNALIB.L16/SOURCE=PAGE:53
Run Time:

VAX-11 Bliss-16 v4.0-579

HARDWARE P-TABLE FIELD DEFINITIONS

CO0O000O0O00000O0000O00O0O0O0O0O0O000000

O
w

S-Jul-1984 14:03:17
2-Jul-1984 17:11:54

00:03.6
Elapsed Time:
00:06.9
Lines/CPU Min:
6837
Lexemes/CPU-M; n: 32681
46 pages
Memory Used:
Libraery Precompilation Complete

SEQ 0287

Page

(10)

D7
ACO.EXE

p—

Memory

allocation map

TKB M40.02

14:19

’ S-JUL -84

SEQ 0288

Page
1

Partition name : DUMMY

Identification : V01.0
Task VIC
: [202,22])

Task attributes: -HD
Total address windows: 1.
: 11232. words
image size
Task

Task address limits: 002000 055677
R-W disk blk limits: 000002 000055 000054 00044,
sss Root segment:

R/W mem

ZGNAL

limits: 002000 055677 053700 22464.

Disk blk limits: 000002 000055 000054 00044.

Memory allocation synopsis:
File

$CODE$: (RO, I,LCL,REL,CON)
$GLOBS : (RW,D,LCL,REL,CON)
$PLIT$:(RO,D,LCL,REL,.CON)
AASCOD:(RO,I,LCL,REL,CON)

AB$COD:
(RO, I,LCL,REL,CON)
AC$COD:(RO,I,LCL,REL,CON)

. BLK,:(RW,I,LCL,REL,CON?

002000 000406 00262.

ZQGNA1.0BJ;2
ZANA2.0BJ;2

002000 000242 00162.
002242 000144 00100.
002406 012504 05444,
002406 012504 05444,
015112 007036 03614.
015112 007036 03614.
024150 000370 00248.
024150 000370 00248.

024540 022564 09588.
024540 022564 09588.
047324 006130 03160.
047324 006130 03160.
055454
055454
055454
055670

000000
000224
000214
000010

ZGNAL1.0BJ;2
ZGNA1.0BJ;2

ZGNA2.0BJ;
2
ZQGNA3,.08J;2

00000.
00148.
00140. CZQNAA
00008. ZQANAS

ZQGNA4
. 08J;2
B16SAV.0BJ;2
ZQGNAS,.08J;2

Global symbols:

ADR

000020

8D.PRO 014300-R
BITO
000001

81700
8IT01
BIT02
B8IT03
BIT04
BITOS
B8IT06

BIT07
BIT08
BIT09

000001

000002
000004
000010
000020
000040
000100

000200
000400
001000

BIT1

BIT10
BIT11

8IT12
BIT13
BIT14
BIT1S
B8IT2
BIT3
BIT4

BITS
BIT6é
BIT7

000002

002000
004000

010000
020000
040000
100000
000004
000010
000020

000040
000100
000200

BIT8

000400

BIT9
001000
BLSLAS 055670-R

B0E

000400

BUF .LE 015026-R
CHECKS 015024
-R
Cx,.CS 051172-R
CHK.RC 051662-R
CHK .RI 050606-R
CHK
. XM 051364-R

CLR.BU 050560-R
CLR.DE 050532-R
COMPAR 052142-R

015016-R
015030-R
-R
003006
015014 -R
-R
002406
002210-R
015022-R
002122-R
000036
000035
EF .PUR 000034
EF .RES 000037
EF.STA 000040

-R
ERRBLK 002204
ERRMSG 002202-R
ERRNBR 002200-R
ERRORS 047324-R
ERRTYP 002176-R
ERR.CO 015040-R
ERR.FL 015036-R
ERR.NU 015034-R
ETH,.ST 014054-R
EVL
000004
E1SREP 047630-R
FORM.H 053722-R

GET.AD 015004-R

002312-R
002322-R
002336-R
-R
002346
002362-R
002370-R
002376-R
100000
HP.TAB 002210-R
HWP, TA 014773-R
IBE
010000
000040
IER
020000
GPs1
GP$2
GP$3
GP$4
GP$S
GP$6
GP$7
HOE

INTERR
I0P.DA
I0P.TA
ISR

IXE
KBD.IN

015012-R

015002-R

014034 -R
000100

LOE
LoT
L$ACP
LS$APT
024520-R
L$SAU
LSAUT
LS$AUTO 024462-R

E7
ZANACO. EXE
ZGNAL

LsCCP 002106-R
-R
L$CLEA 024474
32-R
0020
L$CO
L $DEPO 002011-R
L$DESC 002260-R
-R
L $DESP 002076
LSDEVP 002060-R
L$DISP 002124-R
002116-R
LSDLY
L$DTP 002040-R
-R
L$DTYP 002034
-R
024506
LSOV
L$DUT 002072-R
LSDVTY 002242-R
002052-R
LSEF
-R
LSENVI 002044
LSERRT 002176-R
LSETP 002102-R
-R
LSEXP1 002046
-R
LSEXP4 002064
-R
66
LSEXPS 0020
L $HARD 002312-R
L$HIME 002120-R
L $HPCP 002016-R
LSHPTP 002022-R
L $HRDL 002310-R

L $HW
002210-R
-R
LS$HWLE 002206

“sICP
LSINIT
LSLADP
LSLAST
LSLOAD
LSLUN

sss

-R
002104
024450-R
-R
002026
-R
055674
002100-R
-R
002074

Task

SEQ 0289

Memory allocation map TKB M40.02
14:19
S-JUL -84

LS$MREV 002050-R
L $NAME 002000-R
L $NDHR 002332-R
L $NOHW 002214-R
-R
L $NDSF 002404
L $NDSHW 002232-R
L$PRIO 002042-R
-R
LS$PROT 002234

002112-R
002062-R
002010-R
024160-R
002334-R
002336-R
-R
002056
002020-R
-R
002024
30-R
0020
002220-R
L$SuW
LS$SWLE 002216-R
LSTEST 002114-R
L$TIML 002014-R
L$PRT
LS$REPP
LSREV
LS$RPT
L$SFTL
LS$SOFT
L$SPC
L$SPCP
LS$SPTP
L$STA

LSUNIT 002012-R
-R
015444
015502-R
-R
MSGO2 015564
MSGO3 015652-R
MSGO4
015756-R
MSGOS
016050-R
MSGO6
016142-R
-R
MSGO7 016234
MSGO8
016326-R
MSGO9
016420-R
MSG10 016512-R

MSGOO
MSGO1

MSG11

MSG12
MSG13
MSG14
MSG1S
MSG16
MSG17

MSG18

MSG19

MSG20
MSG21
MSG22

016574-R

016660-R
016724-R
017010-R

017100-R
017162-R

017250-R
017336-R
017362-R

017450-R

017540-R

017620-R
017704-R

017762-R
020036-R
020100-R
020142-R
-R
020204
0-R
02025
020276-R
-R
020364
020450-R
020512-R
-R
020566
020642-R
020740-R
-R
021044
021136-R
021216-R
021302-R
021372-R
021434-R
021514-R
021600-R

builder statistics:

Total work file references: 87137.
Work
file
reads: 0
Work
Ffile writes: o.
Size of core pool: 4016. words (15. pages)
Size of work file: 3328. words (13. pages)
Elapsed time:00:00:39

021702-R
021760-R
022030-R
022104-R
022142-R
022200-R
022262-R
022314-R
022360-R
022410-R
022460-R
022522-R
022560-R
022650-R
022714-R
-R
023026
023070-R
023132-R
023222-R
023316-R
023352-R
023416-R
-R
023504

-R
023606
-R
023704
-R
024004
024070-R
024530-R
013006-R
001000
053640-R
002000
000000
000040

PRIO2
PRIO3
PRIO4
PRIOS
PRI06
PRIO7

PTRN.T
FWR
., IN
Pl
P2
P3
P4
PS5

QsT01
QsT102
QsST03
QST04
QST0S
QST06
QsT07
RBUF .L

000100
000140
000200
000240
000300
000340

014100-R
055600-R
015070-R
015072-R
-R
015074
015076-R
015100-R

015112-R
015142-R
015172-R
015234-R
015276-R
015340-R

015402-R
015010-R
RCv.BV 003006-R
-R
RCv.D. 002406
RD13
014574-R
REG.AD 015000-R
RESET, 047650-R

SEND.E 054640-R
-R
SEND.T 055006
SETUP, 013034-R
SET.RD 052560-R
-R
SET.XD 052636
SP.TAB 002220-R
STATIO 014070-R
SWP.BL 002230-R

SWP, IL
SWP.LB
SWP.TA
SWP.TI
SWP.T0

TADR1
TADR2
TARGET
TBYTEL
TBYTE2
TBYTE3
TBYTE4
T013
TD16
TEMP1
TEMP2
TEMP3
TEMP4
TEMPS
TEMP6
TEMP7
TEMPS
TEMPY

-R
002226
002222-R
014776-R
002220-R
-R
002224
015106-R
015110-R
014110-R
015102-R
015103-R
015104-R

015105-R
014470-R
014340-R
015046-R

015050-R
015052-R
-R
015054
015056-R
015060-R
015062-R
-R
015064
015066-R
015042-R
TMP .RE 015044
-R
TURN.O 055400-R
-R
T$FREE 055674

T$PTHY
T1
T10
T11
T12
T13
T14

041770-R
044036-R
044700-R
045216-R
-R
045566

UP.Cov
VER.DE
WAIT.F
WALKIN
WRT.ST

000001

XC.FLA
XMIT.A
XMIT.B
XMIT.D
XMIT.I
XMIT.S

-R
040256

$SAVE2
$SAVE3
$SAVE4
$SAVES

025202-R
-R
034634
-R
035164
037020-R
041540-R

026032-R
046266-R
047310-R
026616-R
-R
027664
-R
030544
031254-R
033614-R
034052-R
034376-R
000200
015020-R
050332-R
055562-R
052714-R
053446-R
015006-R
015032-R
055154-R
007006-R
-R
002606
055202-R
054372-R
055676-R
-R
055454
055470-R
055506-R
-R
055526

F7
ON S-JUL-84 AT 14:19

TKB

GLOBAL CROSS REFERENCE
SYMBOL

VALUE

BITOO
BITO1
BITO02

BITO3
BIT04
BITOS

BITO6
BITO7
B8IT08
BIT09
BIT1
BIT10
BIT11
BIT12
BIT13
BIT14
BIT1S
BIT2
BITS
BIT4
BITS
BIT6
BIT7
8178
BIT9
BLSLAS
BOE
BUF .LE
CHECKS
CHK.CS
CHK.RC
. RI
CHIC
CHK, XM
CLR.BU
CLR.CE
COMPAR
COUNTE
CSR. W0
DATA.B
u”.
DESCR.
DFSTBL
DOWN.C
DS$PCNT
EF.CON
EF .NEW
EF .PWR
EF .RES
EF.STA

ZONA1
ZGNAL
ZGNA1
ZGNA1

ZONA1
ZGNA1
ZGNA1
ZGNA1
ZONA1
ZGNA1
ZGNA1
ZONA1
ZGNA1
ZGNA1
ZGNA1
ZGNA1
ZGNA1
ZGNA1
ZONA1
ZGNAL
ZONA1
ZGNA1
ZGNA1
ZGNA1
ZGNA1
ZGNA1
ZGNA1
ZONA1
ZGNAS
ZONA1

@ ZGNAL

@ ZONAL
ZGNAS
ZGNAS

015022-R

000036
000035
000034
000037
000040

@
@
@
@

002122-R

CREF

REFERENCES...
@
@
@
@

ADR

8D.PRO
BITO

PAGE

ZGNAS
ZGONAS
ZONAS
ZGNAS
ZAONAS
ZONAL
ZOGNAL
ZGNAL
ZGNAL
ZGNAL
ZOGNAL
ZGNAL

¢ ZGNAL
@ ZONA1L

ZONAL
ZGNA1
ZONA1
ZGNA1

@ ZONA2
ZQGNA3
@ ZGNA2
@ ZONA2

@
@
@
&
@
@
@
&
@
@
@
@
&
@
@
@
&
&
@
&
@
&
@
@

ZQGNA4

ZONA2
ZONA2
ZONA2
ZGNA2
ZONA2
ZONA2
ZQGNA2
ZONA2
ZONA2
ZOGNA2
ZONA2
ZONA2
ZONA2
ZGNA2
ZONA2
ZONA2
ZONA2
ZONA2
ZONA2
ZONA2
ZGNA2
ZGNA2
ZONA2
ZONA2

@ ZONA2

&
&
&
@
@
@
@

ZQGNA3
ZONA4
ZOGNA4
ZGNA4
2QGNA4
ZQGNA4
ZONA4
ZONA4
ZQGNA3
ZQANA3
ZQGNA3
ZGNA3
ZQANA3

ZONA3
&
@
@
@
@

ZONA2
ZONA2
ZONA2
ZONA2
ZONA2

ZQONA4

ZANACO

CREATED BY

SEQ 0290

Vo2

G7
ZGNACO

CREATED BY

ON S-JUL-84 AT 14:19

TKB

CRE¢

GLOBAL CROSS REFERENCE
SYMBOL

VALUE

ERRBLK
ERRMSG
ERRNBR
ERROR$
ERRTYP
ERR.CO
ERR.FL
ERR.NV

-R
002204
002202-R
002200-R
-R
047324
76-R
0021
015040-R
015036-R
015034-R

ETH.ST
EVL

E1$REP

FORM.H

GET.AD
GP$1

GPs2
GP$3

GPta

GP$5
GP$6
GP$7
HP.TAB
HWP TA

IBE

014054-R
000004
047630-R
053722-R
-R
015004
002312-R
002322-R
002336-R
-R
002346
002362-R
002370-R
002376-R
100000
002210-R
014774-R
010000

IER
INTERR
I0OP.DA
IOP.TA

LOT
LSACP
LSAPT
LSAU
LS$AUT
L$AUTO
LsCCP
LSCLEA
LsCO
L $DEPO
L$DESC
L$DESP
L$DEVP
LSDISP
LSDLY
LsDTP
L$DTYP
LsDV
LsOuT

€@ ZQGNAL
@ ZGNAL
@ ZGNAl

ZGNAS

& ZGNA4

€@ ZOGNAL
@ ZQGNAL
€ ZQGNAL

ZQGNA3
ZQANA3
ZQGNA3

@ ZGNA1

& ZONA2

@ ZGNAL

ZGONAS
ZONAS

@ ZGNAL

& ZGNA4
& ZGNA4

ZGNA2

@ ZGNA2
@ ZGNA2
@ ZGNA2

@
¢
@
@
@
@
@
@
@
@

ZONA2
ZGNA2
ZGNA2
ZGNA2
ZONA1
ZGNAL
ZOGNAL
ZGNA1
ZGNA1L
ZONA1

CZGNAA
ZONAL
ZGNAL
ZGNA1
ZONA1
CZQONAA
ZGNAL
ZONA1

@ ZONAL
@ ZGNAL

@& ZGNAL
@
@
@
@

ZONA2
ZANA2
ZONA2
ZONA2
ZGNA3
ZONA2
ZONA2

ZGNAL

@ ZONA2

ZGNAL

@ ZONA2

ZGNAL

@ ZONA2

ZGNA2
@ ZONA2
@ ZGNA2
& ZONA2

@ ZGNA2

@ ZOGNAL

ZOGNAL
ZQGNAL
ZGNAL
ZONAL
ZONA1
ZGNA1

ZONAL
@ ZONAL

ZQANA4
ZGNA4
ZQGNA4

ZQGNA3

ZGNA4

ZQGNA3

ZQGNA4

ZANA2
ZQGNA3
ZQGNA3

ZQGNA3

ZQGNA4

@ ZONA2

ZGNAL

@ ZGNAL

-R
024506
002072-R

voz2

.
..
REFERENCES

@
@
@
@
@
@
@

IXE
KBD.IN

SEQ 0291

PAGE 2

ZQANA2

@ ZONA2

ZQGNA4

H7
ZANACO

CREATED BY

TKB

ON S5-JUL-84 AT 14:19,

CREF

GLGBAL CROSS REFERENCE

LSHWLE

LS$ICP
LSINIT
LSLADP
LSLAST
L$LOAD

LSLUN
LSMREV
L $NAME
L $NDHR
L $NDHUW
L $NDSF
L $NDSW
L$PRIO
L$PROT
LSPRTY
LSREPP
LSREV
LSRPT
LS$SFTL
LSSOFT
L$SPC
L$SPCP
LS$SPTP
LS$STA
LS$SW
LSSULE
LSTEST
LSTIML
LSUNIT
MSGOO
MSGO1
MSGO2
MSGO3
MSGO4
MSGOS
MSGO6

MSGO7

002010-R
024160-R
-R
002334
002336-R
-R
002056
002020-R

-R
002024
002030-R
002220-R
002216-R
002114-R
002014-R
002012-R
-R
015444
015502-R
-R
015564
015652-R
-R
015756
016050-R
016142-R
-R
016234

VOGOV
OO
OOV
OD

L$HW

002120-R
002016-R
002022-R
002310-R
002210-R
-R
002206
-R
002104
024450-R
-R
002026
-R
674
055
002100-R
-R
002074
0-R
00205
002000-R
002332-R
002214-R
-R
002404
002232-R
002042-R
-R
002234
002112-R
002062-R

002242-R
002052-R
-7
002044
002176-R
002102-R
-R
002046
-R
002064
-R
002066
002312-R

0000009000V
OY

L$DOVTY
LSEF
LSENVI
L$ERRY
LSETP
LSEXP1
LS$EXP4
LSEXPS
L $HARD
L SHIME
LSHPCP
LSHPTP
L $HROL

REFERENCES.
..

VALUE

99000000

SYMBOL

ZQGNAL
ZGNAL
ZGNA1
ZGNAL
ZGNAL
ZGNAL
ZGNAL
ZONA1
ZGNAL
ZGNAL
ZGNAL
ZGNAL
ZGNA2
ZGNAL
ZGNAL
ZANAL
ZGNAL
ZGNA1
ZGNA1
ZGNAL
ZGNAL
ZGNA1
ZGNAL
ZANA2
ZGNAL
ZANA2
ZGNAL
ZGNAL
ZGNAL
ZGNAL
ZGNA1
ZGNAL
ZGNAL
ZANA2
ZGNA1
ZGNAL
ZGNAL
ZGNAL
ZGNAL
ZGNA1

@ ZQGNA2

¢ ZGNA2

@ ZGNA2
@ ZGNAS

@ ZQGNA2
@ ZONA2

ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3
ZQNA3J
ZGNA3
ZQGNA3

SEQ 0292

PAGE 3

voz2

17
ZGNACO

CREATED BY

TKB

ON S-JUL-84 AT 14:19

GLOBAL CROSS REFERENCE
SYMBOL

VALUE

MSGO8
MSGO9
MSG10
MSG11
MSG12

016326-R
016420-R
016512-R
016574-R
016660-R
016724-R
017010-R
017100-R
017162-R

MSG13

MSG14
MSG15
MSG16
MSG17
MSG18

MSG19
MSG2Y

MSG21
MSG22

MSG23

MSG24
MSG2S
MSG26
MSG27
MSG28

MSG29

MSG30

MSG31
MSG32
MSG33
MSG34
MSG35S
MSG36
MSG37
MSG38
MSG39

017250-R
J17336-R

017362-R
017450-R
017540-R
017620-R
-R
017704
017762-R
020036-R
020100-R
020142-R
-R
020204
020250-R
020276-R
-R
020364
C20450-R
020512-R
-R
020566
020642-R
020740-R
-R
021044
021136-R
021216-R
021302-R

021372-R

021434-R

021514-R

021600-R
021702-R
021760-R

022030-R
-R
022104
022142-R
022200-R
022262-R
022314-R
022360-R
022410-R
022460-R
022522-R
022560-R
022650-R
022714-R

CREF

ZGNAL
ZQGNAL
ZONAL
ZONAl
ZGNAL
ZGNA1
ZOGNAL
ZGNAL
ZOGNAL
ZGNAL
ZQGNAL
ZONAL
ZGNAL
ZGNAL
ZGNA1
ZGNAL
ZOGNAL

ZGNAL
ZGNAL
ZGNAL
ZONAL
ZONAL
ZONAL
ZGNAL
ZONAL
ZOGNAL
ZOGNAL
ZONAL
ZGNAL
ZONAL
ZONAL
ZONAL
ZONAL
ZONAL
ZONAL
ZONAL
ZGNAL
ZQGNAL
ZONAL
ZONAL
ZONAL
ZONAL
ZGNAL
ZONAL
ZONAL
ZGNAL
ZONAL
ZONAL
ZGNAL
ZONAL
ZOGNAL

PAGE 4

¢ ZGNAL

ZQGNA4

vO02

SEQ 0293

J7
ZQGNACO

CREATED BY

TkB

ON S-JuL-84 AT 14:19

CREF

GLOBAL CROSS REFERENCE
SYMBOL

VALUE

REFERENCES...

MSG60
MSG61
MSG62
MSG63
MSG64
MSG6S
MSG66
MSG67
MSG68
MSG69

023026-R
023070-R
023132-R
023222-R
023316-R
023352-R
023416-R
023504-R
023606-R
023704-R

& ZGNAL
@ ZGNAL
& ZGNAL
& ZGNAL
@ ZGNAL
@ ZGNAL
& ZGNAL
& ZGNAL
@ ZQGNAL
& ZGNAL
& ZGNAL

MSG70
MSG71

NXM.IN

PHYS.A

024004-R
024070-R

P3
P4

ZQGNA3
ZQGNA3S
ZQGNA3
ZQGNA3

@ ZONA2
@ ZONA2
@ ZONA2
@ ZONA2

014100-R

& ZQGNAL

ZQGNA3

015072-R

@ ZGNAL

000200
000240
000300
000340

ZQGNA4

® ZGNA1
® ZONA1
@ ZGNAL
@ ZGNA1

PRIOA
PRJIOS
PRIO6
PRIO7

PUR.IN
Pl

ZQGNA3

ZQONA3
ZGNA3

000000
000040
000100
000140

001000
053640-R
002000

PTRN.T

ZQGNA4
ZGNA4
ZGNA4
ZGNAS
ZQNA4
ZGNA4
ZQGNA4
ZGNA4
ZQGNA4
ZGNA4
ZQNA4

013006-R

PNT
PREP.F
PRI

PRIOCO
PRIO1
PRIO2
PRIO3

ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3

& ZGNAL
@& 2
@ ZGNAL

024530-R

055600-R
015070-R

015074-R
015076-R

015100-R

@ ZGNAL
ZGNAS
@ ZONAL

@ ZGNA1
@ ZONA1
@ ZGNA1
@ ZONA1

@ CZGNAA
@ ZGNAL

@ ZGNA1L
& ZGNA1
@ ZGNAL

@ ZONA2
@ ZGNA4
@ ZGNA2

& ZONA2
@ ZONA2
@ ZONA2
@ ZONA2

ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3

ZGNA3
ZGNA3

ZGNA4

ZQGNA3
ZQGNA3

ZGNA4
ZQNA4

ZQGNA3

01511i2-R
015142-R
015172-R
015234-R
015276-R
015340-R
015402-R
015010-R

@
@
@
@
@
@
@
@

ZONAL
ZGNAL
ZGNAL
ZGNAL
ZGNA1L
ZGNAL
ZQGNAL
ZGNAl

ZGNA2
ZANA2
ZANA2
ZANA2
ZANA2
ZANA2
ZANA2
ZGNA3

REG.AD
RESET.

047650-R

015000-R

@ ZGNAL
ZQGNA2

ZQANA2
ZGNAS

ZQONA3
ZQGNA4

014070-R

@ ZOGNAL

ZQGNA3

ZQANA4

SEND.E
SEND.T
SETUP,
SET.RD
SET.XD
SP.TAB

STATIO

003006-R
002406-R
014574-R
054640-R
055006-R
013034-R
052560-R
052636-R
002220-R

& ZGNAL
@ ZGNAL
@ ZGNAL

ZGNAS
ZGNAS
@ ZONAL
ZGNAS
ZGNAS
@ ZGNAl

ZANA3
ZQGNA3
ZQGNA3

@ ZONA4
@ ZOGNA4
ZANA4
& ZONA4
@ ZONA4

ZQGNA4
ZQGNA4
ZQGNA4
ZUNA4
ZGNA4
ZGNA4
ZQGNA4
ZQGNA4

ZQGNA4

QSTO1
QST02
QSTO3
QSTGA
QSTOS
QST06
QSTO7
RBUF.L

RCV.BU
RCV.D.
RD13

PAGE S

ZQGNA4
ZQANA4
ZQGNA4

ZQANA4

VvO02

SEQ 0294

IK7
ZAGNACO GLOBAL

CREATED BY

ON S-JUL-84 AT 14:19

TKB

CRE+

CROSS REFERENCE

SYMBOL

VALUE

..
REFERENCES.

. BL
SWP
SWP. IL
SWP.LB
SWP.TA
SWP.TI
SWP.TO

002230-R
002226-R

& ZGNA1
@ ZGNA1

ZQGNA3
ZQGNA3

014776-R

& ZGNA1

ZANA2

TADR1
TADR2

TARGET

TBYTE1
TBYTE2
TBYTES
TBYTE4

TD13

TD16

TEMP1
TEMP2
TEMP3

002222-R

ZGNA3

@& ZGNA1

002220-R

@ ZGNA1

015106-R

& ZGNAL

ZGNA3

& ZGNAL

ZQGNA3

& ZGNA1

ZQGNA3

015102-R
015103-R

& ZGNA1
& ZGNAL

ZQGNA3
ZQGNA3

015105-R

@ ZGNAL

ZQGNA3

015046-R
015050-R
015052-R
015054-R
015056-R
015060-R
015062-R
015064-R
015066-R
015042-R

CZGNAA
@& ZOGNA1
& ZOGNA1
& ZGNAL
@ ZGNA1
CZAGNAA
& ZGNA1
& ZGNAL
& ZGNA1
@ ZOGNA1

@ ZGNAL
ZANA2
ZQANA2
ZANA2
ZANA2
& ZGNAL
ZQANA2
ZQANA2
ZQANA2
ZANA2

055400-R
055674-R
000001
025202-R
034634 -R
035164 -R
037020-R
040256 -R

ZGNAS
@ ZQGNAS
ZGNA1
ZGNA1
ZGNA1
ZGNA1
ZGNAL
ZGNA1

@ ZOGNA4

& ZONA3
@ ZGNA3
@ ZONA3
@ ZONA3
@ ZONA3
@ ZGNA3
@ ZQGNA3
@ ZONA2

002224-R

015110-R

014110-R

015104-R

014470-R
014340-R

015044-R

041540-R
041770-R
044036 -R
044700-R
045216-R
045566 -R
026032-R
046266 -R
047310-R

026015-R
027664 -R
030544 -R
031254-R
033614 -R
034052-R
034376-R
000200

015020-R

ZGNA3

& ZGNA1

& ZGNAL

@ ZGNA1
& ZGNAL

& ZOGNAL

ZGNAL1
ZANA1
ZGNA1
ZGNA1
ZGNAL1
ZGNA1
ZGNAL
ZGNAL
ZGNAL

@ ZONA1

@
@
@
@
&
@

&
@
@
@
@
@
@
&
&

ZQGNA3

ZQGNA4

ZGNA4

ZANA3

ZGNA4

ZQGNA4
ZQGNA4

ZQNA4

ZQANA2
ZQGNA3
ZQGNA3
ZQGNA3
ZQGNA3
ZQANA2
ZONA3
ZQGNA3
ZQGNA3
ZQGNA3
ZGNA3

ZGNAS
ZONA3
ZGNA3
ZGNA3
ZGNA3
ZGNA3

ZONA3
ZGNA3
ZOGNA3
ZGNA3
ZONA3
ZGNA3
ZGNA3
ZONA3
ZGNA3

ZONA3Z

ZQGNA4

ZGNA4

ZQGNA4

ZQANA2

vO02

ZONA4
ZANA4

ZGNA3

ZQGNA3
ZGNA3

SEQ 0295

PAG. 6

ZQGNAS

ZQGNA3
ZQNA4
Z2QNA4
ZGNA4
ZQONA4
ZGNA3
ZQGNAS
ZQNA4
ZONA4
ZGNNS
ZGNA4

ZQGNA4

ZQNA4

L7
ZGNACO

CREATED BY

TkB

ON 5-JUL-84 AT 14:19

CREF

GLOBAL CROSS REFERENCE
SYMBOL

VALUE

VER.DE
WAIT.F
WALKIN
WRT ST

050332-R
055562-R
052714-R
053446-R
015006-R
015032-R

XC.FLA
XMIT.A
XMIT.B
XMIT.D
XMIT.I
XMIT.S
$END.L
$SAVE2

$SAVES

$SAVE4

$SAVES

-R
055154
-R
007006
-R
002606
055202-R
054372-R
055676-R
-R
055454
055470-R
-R
055506
055526-R

..
REFERENCES.

ZGNAS

& ZGNA4

ZGNAS
ZGNAS

& ZGNA4
@ ZGNA4

ZGNAS

& ZQNA4

@ CZQNAA
@ ZGNAL
@ ZGNAL

@ CZQGNAA

ZQGNA3
ZQGNA3
ZQGNA3

ZQGNA4

ZGNA3
ZQGNA3
& ZONA4
& ZQNA4

ZGNA4
ZQGNA4

ZQGNA3
ZQGNA3
ZQANA2

ZQGNA4

ZQGNA3

SEQ 0296

PAGE 7

Vo2