Digital PDFs

XX-0FA5E-70

June 1975

4 pages

Original

0.3MB

Document:	DEC-11-UABLB-A-LA Non-Switch-Reg-PDP11-Abs-Loader Jun75
Order Number:	XX-0FA5E-70
Revision:	0
Pages:	4
Original Filename:	http://bitsavers.org/pdf/dec/pdp11/xxdp/diag_listings/DEC-11-UABLB-A-LA_Non-Switch-Reg-PDP11-Abs-Loader_Jun75.pdf

OCR Text

IDENTIFICATION
PRODUCT CODE

DEC-11-UABLB-A-LA

PRODUCT NAME

LISTING OF NON-SWITCH REGISTER
PDP-II ABSOLUTE LOADER

DATE CREATED

JUNE 1975

MAINTAINER

8/11 SMALL SOFTWARE ENGINEERING

~ 1975

DIGITAL EQUIPMENT CORPORATION

.MAl"".

"'AeRO RSTS/E '/(>.QI
1

2
3

PDP-II ABSOLUTE BINARV LOADER •• V807.00

•

DEC-II-UABlB-A-lA

7
~

q
I~

~ASS

12
13

THIS SOFT"ARE IS FURNISHED UNDER A LICENSE FOR USE ONLY
ON A SINGLE COMPUTER SYSTEM AND MAY 8E COPIED ONLY WITH
THE INCLUSION OF THE AeOVE COPYRIGHT NOTICE. THIS
SOFTwARE, OR ANY OT~ER COPIES THEREOF. HAY NOT BE PROVIDED
OR OTHERWISE' HADE AVAILABLE TO ANY OTHER PERSON EXCEPT FOR
USf O~' SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE
TERMS, TITLE TO AND OWNERSHIP OF THE SOFTWARE SHALL AT ALL
TIMES REMAIN IN DIGITAL EQUIPMENT CORPORATION,

la
IS
I~

17
18
Iq
2~

21
22
23
2"
25

THE INFORMATION IN THIS ~OCUMENT IS SUBJECT TO CHANGE
WITHOUT NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT
BY DIGITAL EQUIPMENT CORPORATION,
rIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR THE USE

27
2"
2.
3('
31

OR RELIABILITY OF ITS SOFT. ARE ON EQUIPMENT WHICH IS NOT SUPPLIED
BY DIGITAL EQUIPMENT CORPORATION

INPUT FORMAT .FRAME
-I

001

-2

000

-3
-"
·5

BYTE COUNT •
BYTE COUNT •
LOAD ADDRESS
LOAD ADDRESS

33
3.
35
3h

37
38

-b

4·

al
42
43

IF THE BYTE COUNT IS EQUAL TO ~. THE LOAD AODRESS
SPECIFIED 'II.L 8E CONSIDERED TO BE THE DESIRED JUMP
ADDRESS. IF THIS ADDRESS IS ODD, THE LOADER "ILL HALT.

45
"~

47
oR
.0

IF THE BYTE COUNT IS > 6. DAT4 >ILL BE LOADED

5"
51
52
53

I~TO

MEMORY,

PROGRAMMING CONSIDERATIONS AND CAUTIONS = TWO WORDS IMMEDIATELY
PRECEDING L,OEv ARE USED FOR THE LOADER SP STACK.

5b
57

""AC~O

HERE

CKSM - LAST FRAME CONTAINS THE CHECKSUM

.MAl'~.

LOWER ORDER
HIGHER ORDER
• LOWER ORDER
- HIGHER ORDER
DATA
PLACED

LOAD I NG PROCEDURES

2Q-eAY·75 16.04 PAGE I-I
LOAD THE ABSOLUTE LOADER TAPE BY TAP ING
PRCCR. OR TTCCQ.

P~ACE

J:t'STS/E Vb. Oo

5.
ta~"

02
03

THE ABSOLUTE TAPE FOR"AT IN THE READER
,ADDRo5S OF SOFT"ARE

S~ITCH

YYVyyycCR)o

07
0"

••
"71

••

.DEPOSIT RELOCATION VALUE

X¥X500<CR'

,STARTING ADO"ESS OF A8SLDR

CCR>

,ST.RT LOADER

"HERE XXX IS DEPENDENT

ON ~E"ORY SIZE
VVvyVY 15 DEPENTE'T ON TYPE OF LOAD

7.
15
7'
77

." {l~ '".~~ ~1

L. CKSM

?';'~!i"~ 1

L. AOR

~~/J:l,":W2

'~'~"lY'3

L. Be
L.8YT

n~"H";l'~4

~L'~~t15

~.PTR

~;:1~~,~/'J

QI;1rt~!H

_3
~4

... .., .

,ASECT

.,.r.~~

dS
6'

~17",11~

LOAD

017.75

=17400

..,777&

.f 01707&

V~."~~

• =LOA0+75
• BYTE 75
L.DEV
DEVICE
L.LOAO. HALT

.,q5 "175."

OF LOADER

~1:?l7g:b

L.LO!'

·7 "175i12
qR ~11751/.a
~~ 11S"iH>

·1.7.5
•• 27'5

MOV
CMP
MOV
ADD
CLR
MOV

aR :"117u7~

~75

,,, START

.a
03

~2U6/Jo

10~ 017512
101 "1751.
1.2 .1751b

Vti,C;0i?1

\.13 v'1752~1
HH' e17522

"0b~1b

~M112

~12TI b

"'~.H4;11r.~

H'b

"1752.
~, 1752&

V.")(~UQl3

1~7

~I7SV

""&3lb

\?A

'17532
"1753"

"H'llb

ROR
BCS
CLR
8R
L.LDIC, ASL
BNE
"OV

112 ~IT53b
113 nT5.V
II. f'I7Sa2

~~5@ ••

L,~D2'

,'eoTIS
1.53'"3

I~~

I~.

1~3·~2
V.~\'i~1~

"~)f i('t~ 1

110
III

,BOOTSTRAP FORMATED TAPES HAY
,NOT BE LOADED BELOW THIS ADORESS
,DEVICE ADDRESS IN BOOT LOADER

PC.SP
-(SP) .-(SP)
pc. L.PTR

,SET UP STACK
, TO START AT L.LDI-Z
,GET RELOCATED
START ADDRESS OF READ ROUTINE
*LIIREAD"'II' lllPTR ,
,CLEAR THE ROAD ADDRESS
~,ADR
(PClt, (SP)
,PICK UP THE CONTENT OF
,THE SOfTWARE SwITCH REGISTER
_SP
,CHECK RELOCATION FACTOR
,JUMP IF SO~E RELOCATION NEEDED
L.LDIC
,USE ADDRESS SPECIFIED ON THE TAPE
'SF
,GO 00 LOAD
~.LD2
,CHECK FOR NON-ZERO
asP
,JUMP IF LOAD ADDRESS SPECIFIED
l.LD2
,OTHERWISE CONTINUE LOADING FROM LAST LOAD
L,ADR.'SP

, LOOK FOR THE REGINNING OF A BLOCK
CLR
L,CKSM
,INITIALIZE CHECKSUM
JSR
PC.'L,PTR
,READ A FRAME
CEca
L.BVT
,CHECK FOR +1 (START OF A BLOCK)

g "'.

M.C~O

tN,

~n$/E

115 017544
11& ~175ub
117

~&. ~

~q.HAY·75

001374

BNE
JaR

~0U 715

lie

I&,;a
L.LD2

P~G£

'"I,LOOP

UNTIL +1 1& FOUND
,RUD ANOTHU FRAME

PC,·L.PT~

INPUT AND UVE BYTE COUNT, IF BYTE COUNT
GO TO PROCEED JUMP

119
12~

121

~1755~

,122 017554

123 ~1755b
124 017562'
125 ~ 17566
1Z6 017570
127 017574
017s1$
IZq
130

000074

004H7
010402
IbZ7e2
022702
001441
004767
061U4

JSR
MOV
SUB

000004
m0P002

eM'

000~5.

,, READ
,,, IF
,

01~401

132

133
114
135
137 p 111>02

138 "176~4
13" ~17b06
1"0 .11b1~

lUI ~17b12
142 "17&1"
143 ~17&lo
IU.
145
1"0

IU7 n7bU

IUA ~11b2U
Iqq ?17&2b

01703;]

151 P17U2
152 °17bU
153 ·176.~
IS" i"17b"Q
155 ~ 176.&
ISb
151

L.l03,

BEQ

0~1153

L. BAD.

110321
00P770

L.LDU.

,
,
,

01&733
laS215
I ~5713
10037b
11&3"3

~0~152

h~3e0

171"V0

~~~302

,
,,

"~~Z07

e~00.b

0120&7
004715

17~

~11.72

004761

171

"IHH

~04715

177752

MACRO RST~/E Vb.0

172

"117~~

105700

173
174
175
176
171
178

~171~2

~~13"2

~117~u

P~&2~U

L.DEv.L,8YT
'L.Bn

AND ACCUMULATE CHECKSU"

'DEVICE ADDRESS TO L. BVT
,SELECT RUDER
,DONE ?
'NO
IGET CHA~.CTER
'~OD TO CHECKSUM
,MASK OFF JUNK
lOEC~E~ENT BYTE COUNT BY ONE

IIL,,8vT

L.RI
2IL.BVTloL.BYT
L.8YT,L.CKS.
_177400,L,BYT

L.AC
PC

'SA~E RETURN IN TEMPORY
,GET O~E CHARACTER
,SAVE A3 IN TEMPORARY
IGET ANOTHER FRAME
'PLACE ANOTHER FRAME
,ASSEMBLE BOTH FRAMES INTO • COMPLETE
,RETURN

(SPI+.L,TMP
PC"L,PTR
I.,BYT.R.
PC.
PTA

'1..

L.BYT

L.BYT.R.

l.TP'UOJ ,PC

2q.MAY·75 Ibl04
TSTB
L.CKS"
aNE
L.BAD
ASA
Au
Bce
•• J"PI

U3002
0io1iP.vHII~

~ALT

00e7~0

8R
ASL
ADO
JHP

0~b30.

P61&~"
~"'!'114

('\"'PlP~i-.\

L.THPI

~ORO

,~o~c

PAGE 1-3

L.LOIB
Ra

,IF INCORRECT
, GO TO CHECKSUM MALT ADDRESS
,GET LO. ORDER BIT
,SKIP IF ADDRESS IS EVEN
,OTHERW ISE HALT
,RETURN TO START OF LOADING LOOP
,RESTORE REGISTER

iIISP,R4

'AU

,JUMP TO USER
,TEHPORY TO SA~E STACK SPACE

, IN!TIALIZATID~ TO RESTORE THE BOOlSTRAP LOADER

1~4

195 ~1777"
196

CHECK COARECTNESS OF JUMP ADDRESS
HALT IF AOORESS IS 000, JUMP TO PROGRAM IF ADDRESS IS EVEN
I
L,J·PI
JS~
PC,luGwflO
/GET POSSIBLE TRA~SFER ADDRESS
JSR
Pc.'L.PTR
,GET CHEC~SU"

I&q

185 el7724
18b 017732
187 0117"~
188
189
Iq. 017744
UI 017750
U2 01775.
193 017753

.OV
JSR
S.A8
BIS
MOV

,
,,

0~ene

L.L02
L.en, CL,ADRj+
L.LD3

ASSEMBLE ONE FULL -ORO OF DATA
JS~

1/01
I&A

"121b7
012167
0001&7
rl/oHI
01270;/
373
353

017774

0"0352
00"765
177532
000026

0000.0
000034

L.INITI MOV
HOV
JHP

,
I

000001'

no5,SR~CH

L. LOAD

OF'SET IN eaOTSTRTAP LOADEN
"SR" AT BRNCH
AND WAIT FOR ·CONT"
BOOTSTRAP LOAO!R CODE

,11,+2

DEVICE.

I q8
199

*352. LOOP+2

,RESTORE
,RESTORE
,GO HALT
, OVERLAY
,THE FOLLOWING CODE OVERLAY THE BOOTSTRAP LOADER
START.
MOV
OEVICE.AI
LOOP,
MOV
IPCl+.R2
,BYTE ~RNCH-LOAOel
,BVH .c8RNCH-L,INIT+212.
,"LOAO+37a
BR~C~I
,SR
START

017776

197 017776
200

DEC
PTa

00u715
01&70'

,READ A FRAME
,SRANCH IF MOAE DATA REMAINS
,IF CHECKSUM 18
,CORRECT. THEN CDNTINUE
,CHECKSUM ERROR
,PAESS CONTINUE TO IGNORE CHECKSUM
ISTORE 8 BITS AT A nNE
THE RE-LOOP

PC"L.PTR
L.LD4
L.CKSM
L.LD2

INPUT A FRA~E, DECREMENT BYTE COUNT.

01~3P..

~ 17066

180 .1172~
181 "17722
182
183

Move
SR

l.GoRO' MOV

Ibb

~117lb

HALT
SA

L.AEAD' "OV
INca
L.AII
TSTB
BPL
Move
ADD
BIC

000~02

042103

~"~3r,3
~503~.

"117_&
V,11710
017712
PI77I·

JSR
aGE

TSTB

~0~00e
a~0751

lb. OIHbU

17q

,SUBTRACT 4 TO HAKE BYTE COUNT CORRECT
,oA8 BYTE COUNT EQUAL TO U
'JUMP IF NO DATA IE,G, • JUMP BLOCK)
,GET LOAD ADDRESS
'GENE~ATE ACTUAL ADDRESS
,AND PUT IT INTO THE PROPfR CELL

00U715
002004
105700

IS~

ISq "1765"
Ib~ 017&5"
16t A17&56
1&2 017b6~
1&3 017662

~~AIN.

•

BYTE COUNT

CHEC~SU~,

13& ~17000

1/05

,GET FULL

IN REMAINDER OF DAYA
THE LOAOE~ HALTS AT L.8AD. A C~ECKSUM ERROR
MAS oeCURED,
R3 -ILL CONTAIN THE UPECTEO CHECKSUM,
AND ~m ~ILL CONTAIN THE DEVIATION FqOM THE EXP!CTED

131

15~

BEQ
JaR
ADO
MOV

PC,L.GWRD
RU,L.BC
.a,L,BC
'2,L.SC
L.JHP,
PC,L,GWRD
'SP, ~a
Ra,L.AOR

IS EQUAL TO

~ENO

ADDRESS OF BOOT DEVICE' COMMAND
STATUS REGISTER IS STORED HERE BY
THE BOOTSTRAP ROM

,MAIN,

TA8~E
~1777.

BRNCH

LOOP

el7750

L. 8e

.X~~'@0~

L.O~V

•

~.~Old

"'1717.
"17.12
"1751"

~.LD3

VI '.a~

L,SR

"1751.

•

~1777.

~,J~p

L.PTA .1ti!~0J~S
A~S,

Z'-MAY'75 16184

MACRO RSTS/E

SY1<80~

~.J.PI

017650
01771a

L.LDIC

017530

LOAD • 817400
L.UD
817418
L.CKS.oUleee0
~.INIT
017724
~.~DI
017500
L·.102
01753.

~.~Dq

017414
V.17U0
01772Z

L.RI
START

O!V ICE
Bl777.
L.AOR .XU0001

L, PYT aU00001
L,G>RD

L.REAO
L.T"P

~~~.~"

ERROOS DETECTEO I
FREE COREl

9152. _OROS

ASSLS7. 08J, A8SLS7. Lsr.'SSL87. MAC

~.LOAD

01747.
017026
0117U

PAGE I-a