Added SER_ prefix. Whitespace cleanup

This commit is contained in:
Olli Savia 2018-11-26 22:28:40 +02:00 committed by Oliver Schmidt
parent b9054ec9a7
commit b269b3f5b2

View File

@ -25,15 +25,15 @@
.addr $0000 .addr $0000
; Jump table ; Jump table
.addr INSTALL .addr SER_INSTALL
.addr UNINSTALL .addr SER_UNINSTALL
.addr OPEN .addr SER_OPEN
.addr CLOSE .addr SER_CLOSE
.addr GET .addr SER_GET
.addr PUT .addr SER_PUT
.addr STATUS .addr SER_STATUS
.addr IOCTL .addr SER_IOCTL
.addr IRQ .addr SER_IRQ
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; Global variables ; Global variables
@ -54,25 +54,25 @@ TxDone: .res 1
.code .code
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; INSTALL: Is called after the driver is loaded into memory. ; SER_INSTALL: Is called after the driver is loaded into memory.
; ;
; Must return an SER_ERR_xx code in a/x. ; Must return an SER_ERR_xx code in a/x.
INSTALL: SER_INSTALL:
; Set up IRQ vector ? ; Set up IRQ vector ?
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; UNINSTALL: Is called before the driver is removed from memory. ; SER_UNINSTALL: Is called before the driver is removed from memory.
; No return code required (the driver is removed from memory on return). ; No return code required (the driver is removed from memory on return).
; ;
UNINSTALL: SER_UNINSTALL:
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; CLOSE: Close the port and disable interrupts. Called without parameters. ; SER_CLOSE: Close the port and disable interrupts. Called without parameters.
; Must return an SER_ERR_xx code in a/x. ; Must return an SER_ERR_xx code in a/x.
CLOSE: SER_CLOSE:
; Disable interrupts ; Disable interrupts
; Done, return an error code ; Done, return an error code
lda #<SER_ERR_OK lda #<SER_ERR_OK
@ -80,7 +80,7 @@ CLOSE:
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; OPEN: A pointer to a ser_params structure is passed in ptr1. ; SER_OPEN: A pointer to a ser_params structure is passed in ptr1.
; ;
; The Lynx has only two correct serial data formats: ; The Lynx has only two correct serial data formats:
; 8 bits, parity mark, 1 stop bit ; 8 bits, parity mark, 1 stop bit
@ -101,7 +101,7 @@ CLOSE:
; ;
; Must return an SER_ERR_xx code in a/x. ; Must return an SER_ERR_xx code in a/x.
OPEN: SER_OPEN:
stz RxPtrIn stz RxPtrIn
stz RxPtrOut stz RxPtrOut
stz TxPtrIn stz TxPtrIn
@ -247,11 +247,11 @@ invparameter:
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; GET: Will fetch a character from the receive buffer and store it into the ; SER_GET: Will fetch a character from the receive buffer and store it into the
; variable pointed to by ptr1. If no data is available, SER_ERR_NO_DATA is ; variable pointed to by ptr1. If no data is available, SER_ERR_NO_DATA is
; returned. ; returned.
GET: SER_GET:
lda RxPtrIn lda RxPtrIn
cmp RxPtrOut cmp RxPtrOut
bne GetByte bne GetByte
@ -260,7 +260,7 @@ GET:
rts rts
GetByte: GetByte:
ldy RxPtrOut ldy RxPtrOut
lda RxBuffer,y lda RxBuffer,y
inc RxPtrOut inc RxPtrOut
ldx #$00 ldx #$00
sta (ptr1,x) sta (ptr1,x)
@ -268,10 +268,10 @@ GetByte:
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; PUT: Output character in A. ; SER_PUT: Output character in A.
; Must return an SER_ERR_xx code in a/x. ; Must return an SER_ERR_xx code in a/x.
PUT: SER_PUT:
tax tax
lda TxPtrIn lda TxPtrIn
ina ina
@ -301,10 +301,10 @@ PutByte:
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; STATUS: Return the status in the variable pointed to by ptr1. ; SER_STATUS: Return the status in the variable pointed to by ptr1.
; Must return an SER_ERR_xx code in a/x. ; Must return an SER_ERR_xx code in a/x.
STATUS: SER_STATUS:
ldy SerialStat ldy SerialStat
ldx #$00 ldx #$00
sta (ptr1,x) sta (ptr1,x)
@ -312,17 +312,17 @@ STATUS:
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl ; SER_IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl
; specific data in ptr1, and the ioctl code in A. ; specific data in ptr1, and the ioctl code in A.
; Must return an SER_ERR_xx code in a/x. ; Must return an SER_ERR_xx code in a/x.
IOCTL: SER_IOCTL:
lda #<SER_ERR_INV_IOCTL lda #<SER_ERR_INV_IOCTL
ldx #>SER_ERR_INV_IOCTL ldx #>SER_ERR_INV_IOCTL
rts rts
;---------------------------------------------------------------------------- ;----------------------------------------------------------------------------
; IRQ: Called from the builtin runtime IRQ handler as a subroutine. All ; SER_IRQ: Called from the builtin runtime IRQ handler as a subroutine. All
; registers are already saved, no parameters are passed, but the carry flag ; registers are already saved, no parameters are passed, but the carry flag
; is clear on entry. The routine must return with carry set if the interrupt ; is clear on entry. The routine must return with carry set if the interrupt
; was handled, otherwise with carry clear. ; was handled, otherwise with carry clear.
@ -330,7 +330,7 @@ IOCTL:
; Both the Tx and Rx interrupts are level sensitive instead of edge sensitive. ; Both the Tx and Rx interrupts are level sensitive instead of edge sensitive.
; Due to this bug you have to disable the interrupt before clearing it. ; Due to this bug you have to disable the interrupt before clearing it.
IRQ: SER_IRQ:
lda INTSET ; Poll all pending interrupts lda INTSET ; Poll all pending interrupts
and #SERIAL_INTERRUPT and #SERIAL_INTERRUPT
bne @L0 bne @L0
@ -411,4 +411,3 @@ IRQ:
@IRQexit: @IRQexit:
clc clc
rts rts