A2osX/SYS/KERNEL.S.DRV.txt

75 lines
1.3 KiB
Plaintext
Raw Normal View History

2015-06-03 18:30:57 +00:00
PR#3
PREFIX /A2OSX.BUILD
LOMEM $A00
2015-06-03 18:30:57 +00:00
INC 1
AUTO 6
*--------------------------------------
2016-09-21 15:20:37 +00:00
* K.LoadDrvYA
2015-06-03 18:30:57 +00:00
* in :
2016-08-17 06:25:58 +00:00
* Y,A = PTR To Full Cmd Line PStrArray
2015-06-03 18:30:57 +00:00
* out :
* none
*--------------------------------------
2016-09-21 15:20:37 +00:00
K.LoadDrvYA >STYA K.LoadDrv.CmdArray
>LDYAI ENV.DRV push ENVNAME=DRV
>SYSCALL GetEnvYA get value for ENV=DRV
bcs .9
2016-08-17 06:25:58 +00:00
>PUSHYA Push $DRV value
2016-09-21 15:20:37 +00:00
>PUSHW K.LoadDrv.CmdArray (ARG[0] = DRVNAME)
2016-06-07 06:10:18 +00:00
jsr K.FileSearch find Driver in $DRV
bcs .9
stx .99+1
jsr K.LoadExeYA Y,A =filename full path
2016-08-17 06:25:58 +00:00
bcs .98
2015-06-03 18:30:57 +00:00
>STYA pDrv
stx .97+1
2016-09-21 15:20:37 +00:00
>LDYA K.LoadDrv.CmdArray Advance to ARG[1]
2017-01-12 17:43:45 +00:00
>STYA ZPPtr1
2016-08-17 06:25:58 +00:00
2017-01-12 17:43:45 +00:00
lda ZPPtr1
2016-08-17 06:25:58 +00:00
sec
2017-01-12 17:43:45 +00:00
adc (ZPPtr1)
sta ZPPtr1
2016-08-17 06:25:58 +00:00
bcc .1
2017-01-12 17:43:45 +00:00
inc ZPPtr1+1
2016-08-17 06:25:58 +00:00
2017-01-12 17:43:45 +00:00
.1 >LDYA ZPPtr1
2016-08-17 06:25:58 +00:00
jsr pDrvJmp call Dev.Detect
bcs .96
jsr BIN.InstallDRV
bcs .96
2015-06-03 18:30:57 +00:00
jsr .96 Cleanup...
2015-06-03 18:30:57 +00:00
2016-08-17 06:25:58 +00:00
lda #0 Make sure RC = 0 if success
clc
.9 rts
.96 pha
.97 lda #$ff
2016-09-21 15:20:37 +00:00
jsr K.FreeMemA
2015-06-03 18:30:57 +00:00
pla
2016-08-17 06:25:58 +00:00
.98 pha
.99 lda #$ff
2016-09-21 15:20:37 +00:00
jsr K.FreeMemA
2015-06-03 18:30:57 +00:00
pla
2016-08-17 06:25:58 +00:00
sec
2015-06-03 18:30:57 +00:00
rts
*--------------------------------------
2016-09-21 15:20:37 +00:00
K.LoadDrv.CmdArray .BS 2
2015-06-03 18:30:57 +00:00
*--------------------------------------
MAN
SAVE /A2OSX.SRC/SYS/KERNEL.S.DRV
LOAD /A2OSX.SRC/SYS/KERNEL.S
2015-06-03 18:30:57 +00:00
ASM