17.05.2015 Views

~ National ~ Semiconductor - Al Kossow's Bitsavers

~ National ~ Semiconductor - Al Kossow's Bitsavers

~ National ~ Semiconductor - Al Kossow's Bitsavers

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

#<br />

#*************************** 16550A INITIALIZATION *****************************<br />

movb<br />

movb<br />

movb<br />

movb<br />

movb<br />

movb<br />

$Ox080,lcr<br />

$4,txd<br />

$O,ler<br />

$Ox003,lcr<br />

$O,ler<br />

$OxOc7,fcr<br />

#<br />

#Set dlab = 1 for dlvlsor latch access<br />

#Low divisor latch 56k w/8.0 xtal<br />

tUpper dlvisor latch<br />

tDlab = 0, 8 bits, no parity, 1 stop<br />

#Disable UART interrupts<br />

#Fifo=> trigger = 14, reset & enable<br />

#**************************** INITIALIZE • 32202 (ICU) ***************************<br />

movd<br />

movb<br />

$1cu addr,rO<br />

$OxCa,lCu_mctl(rO)<br />

#<br />

#<br />

#RO = icu address<br />

#Set mode 8 blt bus mode,<br />

•<br />

#<br />

freeze counters,<br />

disable lnterrupts,<br />

# flxed prlorlty.<br />

movqb O,lcu cctl(rO)<br />

movqb -l,lcu lps(rO)<br />

movqb O,lCU csrc(rO)<br />

movqb O,lcu-csrc+aO(rO)<br />

movb $OxlO,lcu svct(rO)<br />

movqb -l,lcu elgt(rO)<br />

movqb -l,lcu-elgt+aO(rO)<br />

movqb $2,lcu-tpl(rO)<br />

movqb O,lcu tpl+aO(rO)<br />

movqb O,icu-fprt(rO)<br />

movqb 0,1cu-fprt+aO<br />

movqb 0,1cu-lsrv(rO)<br />

movqb 0,1cu-lsrv+aO(rO)<br />

movqb -l,iCU 1msk(rO)<br />

movqb -l,1cu-lmsk+aO(rO)<br />

#Halt the counters<br />

tSet all plns to interrupt source<br />

iNo cascaded lnterrupts (low reg)<br />

# (hlgh reg)<br />

#Set interrupt base vector<br />

#Set level triggering (low reg)<br />

#(hlgh reg)<br />

#Set high polarlty mode (low reg)<br />

#(hlgh reg)<br />

.Set highest priority to 0 (low reg)<br />

#(high reg)<br />

#Clear 1ntr in-servlce regs (low reg)<br />

#(high reg)<br />

#Mask all lntr (low reg)<br />

#(hlgh reg)H<br />

setcfg [1J -<br />

tEnable vectored intrp (1=1)<br />

movd $lCU addr,rO<br />

movb $OX02,lCU mctl(rO)<br />

movb $Ox010,iCU cctl(rO)<br />

movb $Oxfd,1cu tmsk(rO)<br />

movb $Oxff,lcu-lmsk+aO(rO)<br />

blspsrw $ (Ox800)<br />

#<br />

#Flxed mode, 8 bit bus mode<br />

#Set to internal sampling<br />

#Enable lrl<br />

#Mask all other lnterrupts<br />

#Enable cpu lntr's<br />

#<br />

#*************************** ENABLE 16550A INTERRUPTS **************************<br />

movb $2,mcr •#Clear outl, out2 and enable rts<br />

endinit:<br />

movb $Ox07,ler<br />

#Enable all but modem status interrupts<br />

#<br />

#********************** ENDLESS LOOP WAITING FOR INTERRUPTS ********************<br />

holdloop: nop<br />

br holdloop<br />

#<br />

#<br />

#<br />

#<br />

#****************************** INTERRUPT HANDLER ******************************<br />

lsr:<br />

#<br />

save [rO,rl,r2,r3,r4,r5,r6,r7J<br />

movb iir,rO<br />

#RO- contains ilr<br />

cmpb rO,$OxOc6<br />

i<br />

beq Isint<br />

iLine status lnterrupt<br />

cmpb rO,$OxOc4 #<br />

beq rdal<br />

#Recelver lnterrupt<br />

cmpb rO,$OxOcc #<br />

TL/C/9313-22<br />

--!<br />

4-81

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!