mirror of
https://github.com/antoinevignau/source.git
synced 2025-01-16 06:29:46 +00:00
Our SCSI-2 Audio Driver
What we wrote to make audio hearable on a SCSI-2 CD-ROM drive ;-)
This commit is contained in:
Antoine Vignau
parent
ff6645ec16
commit
d29484938c
1951
scsi2/AppleSCSI2.s
Normal file
1951
scsi2/AppleSCSI2.s
Normal file
File diff suppressed because it is too large
Load Diff
191
scsi2/BCD.S
Normal file
191
scsi2/BCD.S
Normal file
@ -0,0 +1,191 @@
|
|||||||
|
*
|
||||||
|
* Playing with BCD
|
||||||
|
*
|
||||||
|
* (c) 2018, Brutal Deluxe Software
|
||||||
|
*
|
||||||
|
|
||||||
|
xc
|
||||||
|
xc
|
||||||
|
mx %00
|
||||||
|
org $1000
|
||||||
|
lst off
|
||||||
|
|
||||||
|
*---
|
||||||
|
|
||||||
|
clc
|
||||||
|
xce
|
||||||
|
rep #$30
|
||||||
|
|
||||||
|
lda #$1000
|
||||||
|
jsr BCD2HEX
|
||||||
|
|
||||||
|
lda #$9999
|
||||||
|
jsr BCD2HEX
|
||||||
|
|
||||||
|
lda #$270f
|
||||||
|
jsr HEX2BCD
|
||||||
|
|
||||||
|
sec
|
||||||
|
xce
|
||||||
|
sep #$30
|
||||||
|
rts
|
||||||
|
|
||||||
|
*---
|
||||||
|
|
||||||
|
mx %00
|
||||||
|
|
||||||
|
BCD2HEX pha
|
||||||
|
|
||||||
|
* milliers
|
||||||
|
|
||||||
|
and #$f000
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
xba
|
||||||
|
tax
|
||||||
|
lda tblBM,x
|
||||||
|
sta result
|
||||||
|
|
||||||
|
* centaines
|
||||||
|
|
||||||
|
lda 1,s
|
||||||
|
and #$0f00
|
||||||
|
asl
|
||||||
|
xba
|
||||||
|
tax
|
||||||
|
lda tblBC,x
|
||||||
|
clc
|
||||||
|
adc result
|
||||||
|
sta result
|
||||||
|
|
||||||
|
* dizaines
|
||||||
|
|
||||||
|
lda 1,s
|
||||||
|
and #$00f0
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
tax
|
||||||
|
lda tblBD,x
|
||||||
|
clc
|
||||||
|
adc result
|
||||||
|
sta result
|
||||||
|
|
||||||
|
* unites
|
||||||
|
|
||||||
|
lda 1,s
|
||||||
|
and #$000f
|
||||||
|
asl
|
||||||
|
tax
|
||||||
|
lda tblBU,x
|
||||||
|
clc
|
||||||
|
adc result
|
||||||
|
sta result
|
||||||
|
|
||||||
|
plx
|
||||||
|
jmp printME
|
||||||
|
|
||||||
|
*--- BCD 2 HEX table
|
||||||
|
|
||||||
|
tblBM dw 0000,1000,2000,3000,4000,5000,6000,7000,8000,9000
|
||||||
|
tblBC dw 0000,0100,0200,0300,0400,0500,0600,0700,0800,0900
|
||||||
|
tblBD dw 0000,0010,0020,0030,0040,0050,0060,0070,0080,0090
|
||||||
|
tblBU dw 0000,0001,0002,0003,0004,0005,0006,0007,0008,0009
|
||||||
|
|
||||||
|
*---
|
||||||
|
|
||||||
|
HEX2BCD pha
|
||||||
|
|
||||||
|
* Step 1
|
||||||
|
|
||||||
|
and #$f000
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
xba
|
||||||
|
tax
|
||||||
|
lda tblH1,x
|
||||||
|
sta result
|
||||||
|
|
||||||
|
* Step 2
|
||||||
|
|
||||||
|
lda 1,s
|
||||||
|
and #$0f00
|
||||||
|
asl
|
||||||
|
xba
|
||||||
|
tax
|
||||||
|
sed
|
||||||
|
lda tblH2,x
|
||||||
|
clc
|
||||||
|
adc result
|
||||||
|
sta result
|
||||||
|
cld
|
||||||
|
|
||||||
|
* Step 3
|
||||||
|
|
||||||
|
lda 1,s
|
||||||
|
and #$00f0
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
lsr
|
||||||
|
tax
|
||||||
|
sed
|
||||||
|
lda tblH3,x
|
||||||
|
clc
|
||||||
|
adc result
|
||||||
|
sta result
|
||||||
|
cld
|
||||||
|
|
||||||
|
* Step 4
|
||||||
|
|
||||||
|
lda 1,s
|
||||||
|
and #$000f
|
||||||
|
asl
|
||||||
|
tax
|
||||||
|
sed
|
||||||
|
lda tblH4,x
|
||||||
|
clc
|
||||||
|
adc result
|
||||||
|
sta result
|
||||||
|
cld
|
||||||
|
|
||||||
|
exit plx
|
||||||
|
jmp printME
|
||||||
|
|
||||||
|
*--- HEX 2 BCD table
|
||||||
|
|
||||||
|
tblH1 dw $0000,$4096,$8192
|
||||||
|
tblH2 dw $0000,$0256,$0512,$0768,$1024,$1280,$1536,$1792
|
||||||
|
dw $2048,$2304,$2560,$2816,$3072,$3328,$3584,$3840
|
||||||
|
tblH3 dw $0000,$0016,$0032,$0048,$0064,$0080,$0096,$0112
|
||||||
|
dw $0128,$0144,$0160,$0176,$0192,$0208,$0224,$0240
|
||||||
|
tblH4 dw $0000,$0001,$0002,$0003,$0004,$0005,$0006,$0007
|
||||||
|
dw $0008,$0009,$0010,$0011,$0012,$0013,$0014,$0015
|
||||||
|
|
||||||
|
|
||||||
|
*---
|
||||||
|
|
||||||
|
printME sta result
|
||||||
|
|
||||||
|
sec
|
||||||
|
xce
|
||||||
|
sep #$30
|
||||||
|
|
||||||
|
lda result+1
|
||||||
|
jsr $fdda
|
||||||
|
lda result
|
||||||
|
jsr $fdda
|
||||||
|
|
||||||
|
lda #$8d
|
||||||
|
jsr $fded
|
||||||
|
|
||||||
|
clc
|
||||||
|
xce
|
||||||
|
rep #$30
|
||||||
|
rts
|
||||||
|
|
||||||
|
*---
|
||||||
|
|
||||||
|
result ds 2
|
||||||
|
|
||||||
2184
scsi2/CDSCSI2.S
Normal file
2184
scsi2/CDSCSI2.S
Normal file
File diff suppressed because it is too large
Load Diff
636
scsi2/GSCSI2.S
Normal file
636
scsi2/GSCSI2.S
Normal file
@ -0,0 +1,636 @@
|
|||||||
|
*
|
||||||
|
* GSCSI2
|
||||||
|
* Test our new CD driver
|
||||||
|
*
|
||||||
|
* (c) 2018, Brutal Deluxe Software
|
||||||
|
*
|
||||||
|
|
||||||
|
mx %00
|
||||||
|
rel
|
||||||
|
dsk GSCSI2.l
|
||||||
|
lst off
|
||||||
|
|
||||||
|
*----------------------------
|
||||||
|
|
||||||
|
use 4/Locator.Macs
|
||||||
|
use 4/Mem.Macs
|
||||||
|
use 4/Misc.Macs
|
||||||
|
use 4/Util.Macs
|
||||||
|
|
||||||
|
GSOS = $e100a8
|
||||||
|
|
||||||
|
dcREMOVE = $0004
|
||||||
|
dcONLINE = $0010
|
||||||
|
devCDROM = $0007
|
||||||
|
|
||||||
|
*----------------------------
|
||||||
|
|
||||||
|
*---------- Start up
|
||||||
|
|
||||||
|
phk
|
||||||
|
plb
|
||||||
|
|
||||||
|
clc
|
||||||
|
xce
|
||||||
|
rep #$30
|
||||||
|
|
||||||
|
tdc
|
||||||
|
sta myDP
|
||||||
|
|
||||||
|
_TLStartUp
|
||||||
|
pha
|
||||||
|
_MMStartUp
|
||||||
|
pla
|
||||||
|
sta appID
|
||||||
|
ora #$0100
|
||||||
|
sta myID
|
||||||
|
|
||||||
|
_MTStartUp
|
||||||
|
|
||||||
|
jsr playNOW
|
||||||
|
jsr waitKEY
|
||||||
|
|
||||||
|
*---------- Shut down
|
||||||
|
|
||||||
|
_MTShutDown
|
||||||
|
|
||||||
|
PushWord myID
|
||||||
|
_DisposeAll
|
||||||
|
|
||||||
|
PushWord appID
|
||||||
|
_MMShutDown
|
||||||
|
|
||||||
|
_TLShutDown
|
||||||
|
|
||||||
|
jsl GSOS
|
||||||
|
dw $2029
|
||||||
|
adrl proQUIT
|
||||||
|
|
||||||
|
brk $bd ; because
|
||||||
|
|
||||||
|
*---
|
||||||
|
|
||||||
|
waitKEY ldal $e0bfff
|
||||||
|
bpl waitKEY
|
||||||
|
stal $e0c00f
|
||||||
|
rts
|
||||||
|
|
||||||
|
|
||||||
|
*----------------------------
|
||||||
|
* 202c DInfo
|
||||||
|
* 202d DStatus
|
||||||
|
* 202e DControl
|
||||||
|
* 202f DRead
|
||||||
|
* 2030 DWrite
|
||||||
|
* 2036 DRename
|
||||||
|
|
||||||
|
playNOW
|
||||||
|
lda #proQUIT
|
||||||
|
stal $300
|
||||||
|
lda #^proQUIT
|
||||||
|
stal $302
|
||||||
|
|
||||||
|
lda #1
|
||||||
|
sta proDINFO+2
|
||||||
|
|
||||||
|
]lp jsl GSOS
|
||||||
|
dw $202c
|
||||||
|
adrl proDINFO
|
||||||
|
bcc found
|
||||||
|
|
||||||
|
cmp #$0011 ; no more devices
|
||||||
|
bne loop
|
||||||
|
rts ; none, we exit
|
||||||
|
|
||||||
|
loop inc proDINFO+2
|
||||||
|
bra ]lp
|
||||||
|
|
||||||
|
*----------
|
||||||
|
|
||||||
|
found lda proDINFO+8
|
||||||
|
and #dcREMOVE
|
||||||
|
beq loop
|
||||||
|
|
||||||
|
lda proDINFO+20
|
||||||
|
cmp #devCDROM
|
||||||
|
bne loop
|
||||||
|
|
||||||
|
*--- We have our CDROM
|
||||||
|
|
||||||
|
lda proDINFO+2
|
||||||
|
sta proREADTOC+2
|
||||||
|
sta proSUB+2
|
||||||
|
sta proHEADER+2 ; for data cd only
|
||||||
|
sta proPLAY10+2
|
||||||
|
sta proPLAY12+2
|
||||||
|
sta proPLAYMSF+2
|
||||||
|
sta proPLAYTR10+2
|
||||||
|
sta proPLAYTR12+2
|
||||||
|
sta proCONTROL+2
|
||||||
|
sta proPAUSE+2
|
||||||
|
sta proRESUME+2
|
||||||
|
|
||||||
|
* READ TOC 43
|
||||||
|
|
||||||
|
jsl GSOS
|
||||||
|
dw $202d
|
||||||
|
adrl proREADTOC
|
||||||
|
sta errCODE
|
||||||
|
|
||||||
|
* READ SUB CHANNEL 42
|
||||||
|
|
||||||
|
jsl GSOS
|
||||||
|
dw $202d
|
||||||
|
adrl proSUB
|
||||||
|
sta errCODE1
|
||||||
|
|
||||||
|
* READ HEADER 44
|
||||||
|
|
||||||
|
* jsl GSOS
|
||||||
|
* dw $202d
|
||||||
|
* adrl proHEADER
|
||||||
|
* sta errCODE2
|
||||||
|
|
||||||
|
* PLAY AUDIO(10) 45
|
||||||
|
|
||||||
|
* jsl GSOS
|
||||||
|
* dw $202e
|
||||||
|
* adrl proPLAY10
|
||||||
|
* sta errCODE3
|
||||||
|
* jsr waitKEY
|
||||||
|
|
||||||
|
* PLAY AUDIO(12) A5
|
||||||
|
|
||||||
|
* jsl GSOS
|
||||||
|
* dw $202e
|
||||||
|
* adrl proPLAY12
|
||||||
|
* sta errCODE4
|
||||||
|
* jsr waitKEY
|
||||||
|
|
||||||
|
* PLAY AUDIO MSF 47
|
||||||
|
|
||||||
|
* jsl GSOS
|
||||||
|
* dw $202e
|
||||||
|
* adrl proPLAYMSF
|
||||||
|
* sta errCODE5
|
||||||
|
* jsr waitKEY
|
||||||
|
|
||||||
|
* PLAY TRACK RELATIVE(10) 49
|
||||||
|
|
||||||
|
jsl GSOS
|
||||||
|
dw $202e
|
||||||
|
adrl proPLAYTR10
|
||||||
|
sta errCODE6
|
||||||
|
jsr waitKEY
|
||||||
|
|
||||||
|
* PLAY TRACK RELATIVE(12) A9
|
||||||
|
|
||||||
|
jsl GSOS
|
||||||
|
dw $202e
|
||||||
|
adrl proPLAYTR12
|
||||||
|
sta errCODE7
|
||||||
|
jsr waitKEY
|
||||||
|
|
||||||
|
* PLAY AUDIO TRACK INDEX 48
|
||||||
|
|
||||||
|
jsl GSOS
|
||||||
|
dw $202e
|
||||||
|
adrl proCONTROL
|
||||||
|
sta errCODE9
|
||||||
|
|
||||||
|
* PAUSE RESUME 4B
|
||||||
|
|
||||||
|
* jsr waitKEY
|
||||||
|
|
||||||
|
* jsl GSOS
|
||||||
|
* dw $202e
|
||||||
|
* adrl proPAUSE
|
||||||
|
* sta errCODE10
|
||||||
|
|
||||||
|
* jsr waitKEY
|
||||||
|
|
||||||
|
* jsl GSOS
|
||||||
|
* dw $202e
|
||||||
|
* adrl proRESUME
|
||||||
|
* sta errCODE11
|
||||||
|
|
||||||
|
rts
|
||||||
|
|
||||||
|
*----------------------------
|
||||||
|
|
||||||
|
*---------- Program
|
||||||
|
|
||||||
|
myDP ds 2
|
||||||
|
appID ds 2
|
||||||
|
myID ds 2
|
||||||
|
|
||||||
|
*---------- GS/OS
|
||||||
|
|
||||||
|
asc "proQUIT"
|
||||||
|
|
||||||
|
proQUIT dw 2 ; pcount
|
||||||
|
ds 4 ; pathname
|
||||||
|
ds 2 ; flags
|
||||||
|
|
||||||
|
asc "errorCODE"
|
||||||
|
|
||||||
|
errCODE ds 2
|
||||||
|
errCODE1 ds 2
|
||||||
|
errCODE2 ds 2
|
||||||
|
errCODE3 ds 2
|
||||||
|
errCODE4 ds 2
|
||||||
|
errCODE5 ds 2
|
||||||
|
errCODE6 ds 2
|
||||||
|
errCODE7 ds 2
|
||||||
|
errCODE8 ds 2
|
||||||
|
errCODE9 ds 2
|
||||||
|
errCODE10 ds 2
|
||||||
|
errCODE11 ds 2
|
||||||
|
|
||||||
|
asc "proDINFO"
|
||||||
|
|
||||||
|
proDINFO dw 8 ; Parms for DInfo
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
adrl devINFO ; 04 device name
|
||||||
|
ds 2 ; 08 characteristics
|
||||||
|
ds 4 ; 0A total blocks
|
||||||
|
ds 2 ; 0E slot number
|
||||||
|
ds 2 ; 10 unit number
|
||||||
|
ds 2 ; 12 version
|
||||||
|
ds 2 ; 14 device id
|
||||||
|
|
||||||
|
asc "devINFO"
|
||||||
|
|
||||||
|
devINFO dw $0032 ; buffer size
|
||||||
|
devNAMEopen db $00 ; length
|
||||||
|
devNAMEopen1 db $00
|
||||||
|
devNAMEopen2 ds $30 ; data
|
||||||
|
|
||||||
|
asc "proDSTATUS"
|
||||||
|
|
||||||
|
proDSTATUS dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
ds 2 ; 04 status code
|
||||||
|
adrl devSTATUS ; 06 status list
|
||||||
|
ds 4 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "devSTATUS"
|
||||||
|
|
||||||
|
devSTATUS ds 8
|
||||||
|
|
||||||
|
*---
|
||||||
|
|
||||||
|
asc "proHEADER"
|
||||||
|
|
||||||
|
proHEADER dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $8044 ; 04 status code
|
||||||
|
adrl headerLIST ; 06 status list
|
||||||
|
adrl 1024 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "headerLIST"
|
||||||
|
|
||||||
|
headerLIST ds 2 ; 00
|
||||||
|
hex 44 ; 0
|
||||||
|
hex 00 ; 1
|
||||||
|
hex 00 ; 2
|
||||||
|
hex 00 ; 3
|
||||||
|
hex 00 ; 4
|
||||||
|
hex 00 ; 5
|
||||||
|
hex 00 ; 6
|
||||||
|
hex 04 ; 7
|
||||||
|
hex 00 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 00 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl headerBUFF ; 04
|
||||||
|
headerBUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
|
||||||
|
*---
|
||||||
|
|
||||||
|
asc "proSUB"
|
||||||
|
|
||||||
|
proSUB dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $8042 ; 04 status code
|
||||||
|
adrl subLIST ; 06 status list
|
||||||
|
adrl 1024 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "subLIST"
|
||||||
|
|
||||||
|
subLIST ds 2 ; 00
|
||||||
|
hex 42 ; 0
|
||||||
|
hex 00 ; 1
|
||||||
|
hex 40 ; 2
|
||||||
|
hex 01 ; 3
|
||||||
|
hex 00 ; 4
|
||||||
|
hex 00 ; 5
|
||||||
|
hex 00 ; 6
|
||||||
|
hex 04 ; 7
|
||||||
|
hex 00 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 00 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl subBUFF ; 04
|
||||||
|
subBUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
|
||||||
|
*--- PAUSE
|
||||||
|
|
||||||
|
asc "proPAUSE"
|
||||||
|
|
||||||
|
proPAUSE dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $804b ; 04 status code
|
||||||
|
adrl pauseLIST ; 06 status list
|
||||||
|
ds 4 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "pauseLIST"
|
||||||
|
|
||||||
|
pauseLIST ds 2 ; 00
|
||||||
|
hex 4b ; 0
|
||||||
|
hex 00 ; 1
|
||||||
|
hex 00 ; 2
|
||||||
|
hex 00 ; 3
|
||||||
|
hex 00 ; 4
|
||||||
|
hex 00 ; 5
|
||||||
|
hex 00 ; 6
|
||||||
|
hex 00 ; 7
|
||||||
|
hex 00 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 00 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl pauseBUFF ; 04
|
||||||
|
pauseBUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
*---
|
||||||
|
|
||||||
|
asc "proRESUME"
|
||||||
|
|
||||||
|
proRESUME dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $804b ; 04 status code
|
||||||
|
adrl resumeLIST ; 06 status list
|
||||||
|
ds 4 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "resumeLIST"
|
||||||
|
|
||||||
|
resumeLIST ds 2 ; 00
|
||||||
|
hex 4b ; 0
|
||||||
|
hex 00 ; 1
|
||||||
|
hex 00 ; 2
|
||||||
|
hex 00 ; 3
|
||||||
|
hex 00 ; 4
|
||||||
|
hex 00 ; 5
|
||||||
|
hex 00 ; 6
|
||||||
|
hex 00 ; 7
|
||||||
|
hex 01 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 00 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl resumeBUFF ; 04
|
||||||
|
resumeBUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
|
||||||
|
*--- READ TOC
|
||||||
|
|
||||||
|
proREADTOC dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $8043 ; 04 status code
|
||||||
|
adrl readtocLIST ; 06 status list
|
||||||
|
adrl 1024 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "readtocLIST"
|
||||||
|
|
||||||
|
readtocLIST ds 2 ; 00
|
||||||
|
hex 43 ; 0
|
||||||
|
hex 02 ; 1
|
||||||
|
hex 00 ; 2
|
||||||
|
hex 00 ; 3
|
||||||
|
hex 00 ; 4
|
||||||
|
hex 00 ; 5
|
||||||
|
hex 00 ; 6
|
||||||
|
hex 04 ; 7
|
||||||
|
hex 00 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 00 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl readtocBUFF ; 04
|
||||||
|
readtocBUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
|
||||||
|
*--- PLAY AUDIO TRACK INDEX
|
||||||
|
|
||||||
|
asc "proCONTROL"
|
||||||
|
|
||||||
|
proCONTROL dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $8048 ; 04 status code
|
||||||
|
adrl controlLIST ; 06 status list
|
||||||
|
ds 4 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "controlLIST"
|
||||||
|
|
||||||
|
controlLIST ds 2 ; 00
|
||||||
|
commandDATA hex 48 ; 0
|
||||||
|
hex 00 ; 1
|
||||||
|
hex 00 ; 2
|
||||||
|
hex 00 ; 3
|
||||||
|
hex 01 ; 4
|
||||||
|
hex 00 ; 5
|
||||||
|
hex 00 ; 6
|
||||||
|
hex 01 ; 7
|
||||||
|
hex 00 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 00 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl commandBUFF
|
||||||
|
commandBUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
|
||||||
|
*--- PLAY AUDIO(10)
|
||||||
|
|
||||||
|
asc "proPLAY10"
|
||||||
|
|
||||||
|
proPLAY10 dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $8045 ; 04 status code
|
||||||
|
adrl play10LIST ; 06 status list
|
||||||
|
ds 4 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "play10LIST"
|
||||||
|
|
||||||
|
play10LIST ds 2 ; 00
|
||||||
|
hex 45 ; 0
|
||||||
|
hex 00 ; 1
|
||||||
|
hex 00 ; 2
|
||||||
|
hex 00 ; 3
|
||||||
|
hex 30 ; 4
|
||||||
|
hex 00 ; 5
|
||||||
|
hex 00 ; 6
|
||||||
|
hex 20 ; 7
|
||||||
|
hex 00 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 00 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl play10BUFF
|
||||||
|
play10BUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
|
||||||
|
*--- PLAY AUDIO(12)
|
||||||
|
|
||||||
|
asc "proPLAY12"
|
||||||
|
|
||||||
|
proPLAY12 dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $80a5 ; 04 status code
|
||||||
|
adrl play12LIST ; 06 status list
|
||||||
|
ds 4 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "play12LIST"
|
||||||
|
|
||||||
|
play12LIST ds 2 ; 00
|
||||||
|
hex a5 ; 0
|
||||||
|
hex 00 ; 1
|
||||||
|
hex 00 ; 2
|
||||||
|
hex 00 ; 3
|
||||||
|
hex 20 ; 4
|
||||||
|
hex 00 ; 5
|
||||||
|
hex 00 ; 6
|
||||||
|
hex 10 ; 7
|
||||||
|
hex 08 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 00 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl play12BUFF
|
||||||
|
play12BUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
|
||||||
|
*--- PLAY AUDIO MSF
|
||||||
|
|
||||||
|
asc "proPLAYMSF"
|
||||||
|
|
||||||
|
proPLAYMSF dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $8047 ; 04 status code
|
||||||
|
adrl playmsfLIST ; 06 status list
|
||||||
|
ds 4 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "playmsfLIST"
|
||||||
|
|
||||||
|
playmsfLIST ds 2 ; 00
|
||||||
|
hex 47 ; 0
|
||||||
|
hex 00 ; 1
|
||||||
|
hex 00 ; 2
|
||||||
|
hex 14 ; 3
|
||||||
|
hex 15 ; 4
|
||||||
|
hex 00 ; 5
|
||||||
|
hex 17 ; 6
|
||||||
|
hex 16 ; 7
|
||||||
|
hex 00 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 00 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl playmsfBUFF
|
||||||
|
playmsfBUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
|
||||||
|
*--- PLAY AUDIO TRACK RELATIVE(10)
|
||||||
|
|
||||||
|
asc "proPLAYTR10"
|
||||||
|
|
||||||
|
proPLAYTR10 dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $8049 ; 04 status code
|
||||||
|
adrl playtr10LIST ; 06 status list
|
||||||
|
ds 4 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "playtr10LIST"
|
||||||
|
|
||||||
|
playtr10LIST ds 2 ; 00
|
||||||
|
hex 49 ; 0
|
||||||
|
hex 00 ; 1
|
||||||
|
hex 00 ; 2
|
||||||
|
hex 00 ; 3
|
||||||
|
hex 00 ; 4
|
||||||
|
hex 08 ; 5
|
||||||
|
hex 01 ; 6
|
||||||
|
hex 00 ; 7
|
||||||
|
hex 10 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 00 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl playtr10BUFF
|
||||||
|
playtr10BUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
|
||||||
|
*--- PLAY AUDIO TRACK RELATIVE(12)
|
||||||
|
|
||||||
|
asc "proPLAYTR12"
|
||||||
|
|
||||||
|
proPLAYTR12 dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
dw $80a9 ; 04 status code
|
||||||
|
adrl playtr12LIST ; 06 status list
|
||||||
|
ds 4 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "playtr12LIST"
|
||||||
|
|
||||||
|
playtr12LIST ds 2 ; 00
|
||||||
|
hex a9 ; 0
|
||||||
|
hex 00 ; 1
|
||||||
|
hex 00 ; 2
|
||||||
|
hex 00 ; 3
|
||||||
|
hex 06 ; 4
|
||||||
|
hex 00 ; 5
|
||||||
|
hex 00 ; 6
|
||||||
|
hex 00 ; 7
|
||||||
|
hex 80 ; 8
|
||||||
|
hex 00 ; 9
|
||||||
|
hex 01 ; A
|
||||||
|
hex 00 ; B
|
||||||
|
|
||||||
|
adrl playtr12BUFF
|
||||||
|
playtr12BUFF ds 1024
|
||||||
|
ds 8
|
||||||
|
|
||||||
|
*---
|
||||||
|
|
||||||
|
asc "proDCONTROL"
|
||||||
|
|
||||||
|
proDCONTROL dw 5 ; 00 pcount
|
||||||
|
ds 2 ; 02 device num
|
||||||
|
ds 2 ; 04 control code
|
||||||
|
adrl devCONTROL ; 06 control list
|
||||||
|
ds 4 ; 0A request count
|
||||||
|
ds 4 ; 0E transfer count
|
||||||
|
|
||||||
|
asc "devCONTROL"
|
||||||
|
|
||||||
|
devCONTROL ds 512
|
||||||
|
|
||||||
|
*----------
|
||||||
|
|
||||||
BIN
scsi2/SCSI Driver ERS 6.1 SCSI-2.pdf
Normal file
BIN
scsi2/SCSI Driver ERS 6.1 SCSI-2.pdf
Normal file
Binary file not shown.
1
scsi2/SCSI.Drivers/SCSI Command Table
Normal file
1
scsi2/SCSI.Drivers/SCSI Command Table
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Command Table copy
Normal file
1
scsi2/SCSI.Drivers/SCSI Command Table copy
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Driver Mgmt
Normal file
1
scsi2/SCSI.Drivers/SCSI Driver Mgmt
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Driver main
Normal file
1
scsi2/SCSI.Drivers/SCSI Driver main
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Filter close
Normal file
1
scsi2/SCSI.Drivers/SCSI Filter close
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Filter control
Normal file
1
scsi2/SCSI.Drivers/SCSI Filter control
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Filter flush
Normal file
1
scsi2/SCSI.Drivers/SCSI Filter flush
Normal file
@ -0,0 +1 @@
|
|||||||
|
;*******************************************************
;
; SCSI Driver 'Flush' Filter
;
; Written by Matt Gulick. Started June 13,1988
;
; Copyright Apple Computer, Inc. 1988,89
;
;*******************************************************
;*******************************************************
;
; This file contains the subroutines needed by the
; SCSI Driver to respond to the Flush call number
; $0007. In a Block Device Driver this will return a
; Driver Bad Request error and perform no function.
; In the case of a Character device however, this will
; need to request that the target device finalize what
; it was doing and flush it's buffers.
;
;*******************************************************
;*******************************************************
;
; Revision History:
;
;*******************************************************
; June 13, 1988 File started.
; June 20, 1988 Added Register Status in comments
STRING PASCAL
BLANKS OFF
PAGESIZE 70
PRINT NOGEN
PRINT NOMDIR
MACHINE M65816
PRINT OFF
INCLUDE 'scsihd.equates'
INCLUDE 'M16.MEMORY'
INCLUDE 'M16.UTIL'
PRINT ON
;*******************************************************
;
; This routine is used as the Flush code for a Block
; Device Driver.
;
; Inputs: None.
;
; Outputs: Acc = 0
; Carry = 0
; Y register = Unspecified
; X register = Unspecified
; P register = 0=M=X=e
; Direct Page = GS/OS Direct Page
; Data Bank = Ours
;
; Errors: DRVR_BAD_REQ.
;
;*******************************************************
EXPORT Flush
Flush PROC
lda #drvr_bad_req
sec
rts
ENDP
END
;*******************************************************
;
; This routine is used as the Flush code for a
; Character Device Driver. This code is commented out
; so that is available to any one who uses this SCSI
; Driver Skeleton.
;
; Inputs: None.
;
; Outputs: Acc = Error
; Carry = Set or Clear
; Y register = Unspecified
; X register = Unspecified
; P register = 0=M=X=e
; Direct Page = GS/OS Direct Page
; Data Bank = Ours
;
; Errors: Device not open Error $0023
; For other errors see Spec.
;
;*******************************************************
;
; EXPORT flush
;flush PROC
; ;
; ; Is the device online?
; ;
; ldy #dib.dvcflag
;
; lda [dib_ptr],y
; and #dvc_online
; bne @flush ;Yes.
; ;
; ; Device is currently offline.
; ;
; lda #drvr_off_line
; sec
; rts
; ;
; ; Check Open Flag
; ;
;@flush lda |open_flag
; beq @dvc_closed
;
; Insert Your Code Here.
;
; lda #$0000
; clc
; rts
;
;@dvc_closed lda #$drvr_not_open
; sec
; rts
;
; ENDP
;
END
EJECT
|
||||||
1
scsi2/SCSI.Drivers/SCSI Filter open
Normal file
1
scsi2/SCSI.Drivers/SCSI Filter open
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Filter read
Normal file
1
scsi2/SCSI.Drivers/SCSI Filter read
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Filter shutdown
Normal file
1
scsi2/SCSI.Drivers/SCSI Filter shutdown
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Filter startup
Normal file
1
scsi2/SCSI.Drivers/SCSI Filter startup
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Filter status
Normal file
1
scsi2/SCSI.Drivers/SCSI Filter status
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Filter write
Normal file
1
scsi2/SCSI.Drivers/SCSI Filter write
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Get Config
Normal file
1
scsi2/SCSI.Drivers/SCSI Get Config
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Get Vol:Disk
Normal file
1
scsi2/SCSI.Drivers/SCSI Get Vol:Disk
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Main Driver
Normal file
1
scsi2/SCSI.Drivers/SCSI Main Driver
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Set Config
Normal file
1
scsi2/SCSI.Drivers/SCSI Set Config
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSI Set Vol:Disk
Normal file
1
scsi2/SCSI.Drivers/SCSI Set Vol:Disk
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSICD.Driver.make
Normal file
1
scsi2/SCSI.Drivers/SCSICD.Driver.make
Normal file
@ -0,0 +1 @@
|
|||||||
|
# File: SCSI.Driver.make
# Target: SCSICD.Driver
# Sources: 'SCSI Driver main'
# 'SCSI Command Table'
# 'SCSI Filter startup'
# 'SCSI Filter open'
# 'SCSI Filter read'
# 'SCSI Filter write'
# 'SCSI Filter close'
# 'SCSI Filter status'
# 'SCSI Filter control'
# 'SCSI Filter flush'
# 'SCSI Filter shutdown'
# 'SCSI Main Driver'
# 'SCSI Driver Mgmt'
# Created: Thursday, June 9, 1988 9:30:49 AM
# Modified: Monday, November 21, 1988 7:05:00 AM
SCSICD.Driver ÄÄ SCSICD.Driver.make ¶
:CD.Obj:'SCSICD Driver main.obj' ¶
:CD.Obj:'SCSICD Command Table.obj' ¶
:CD.Obj:'SCSICD Filter startup.obj' ¶
:CD.Obj:'SCSICD Filter open.obj' ¶
:CD.Obj:'SCSICD Filter read.obj' ¶
:CD.Obj:'SCSICD Filter write.obj' ¶
:CD.Obj:'SCSICD Filter close.obj' ¶
:CD.Obj:'SCSICD Filter status.obj' ¶
:CD.Obj:'SCSICD Filter control.obj' ¶
:CD.Obj:'SCSICD Filter flush.obj' ¶
:CD.Obj:'SCSICD Filter shutdown.obj' ¶
:CD.Obj:'SCSICD Main Driver.obj' ¶
:CD.Obj:'SCSICD Driver Mgmt.obj'
LinkIIGS -t $bb -at $013f ¶
# LinkIIGS -t $bb -at $0105 ¶
:CD.Obj:'SCSICD Driver main.obj' ¶
:CD.Obj:'SCSICD Command Table.obj' ¶
:CD.Obj:'SCSICD Filter startup.obj' ¶
:CD.Obj:'SCSICD Filter open.obj' ¶
:CD.Obj:'SCSICD Filter read.obj' ¶
:CD.Obj:'SCSICD Filter write.obj' ¶
:CD.Obj:'SCSICD Filter close.obj' ¶
:CD.Obj:'SCSICD Filter status.obj' ¶
:CD.Obj:'SCSICD Filter control.obj' ¶
:CD.Obj:'SCSICD Filter flush.obj' ¶
:CD.Obj:'SCSICD Filter shutdown.obj' ¶
:CD.Obj:'SCSICD Main Driver.obj' ¶
:CD.Obj:'SCSICD Driver Mgmt.obj' ¶
-o 'SCSICD.Driver'
# -o :CD.Obj:'SCSICD.Driver.lnk'
# ExpressIIGS ¶
# ':CD.Obj:SCSICD.Driver.lnk' ¶
# -o 'SCSICD.Driver'
duplicateiigs -y -m SCSICD.Driver SCSICD.Driver
:CD.Obj:'SCSICD Driver main.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Driver main' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Driver main' ¶
-o :CD.Obj:'SCSICD Driver main.obj'
:CD.Obj:'SCSICD Command Table.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Command Table' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Command Table' ¶
-o :CD.Obj:'SCSICD Command Table.obj'
:CD.Obj:'SCSICD Filter startup.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Filter startup' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Filter startup' ¶
-o :CD.Obj:'SCSICD Filter startup.obj'
:CD.Obj:'SCSICD Filter open.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Filter open' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Filter open' ¶
-o :CD.Obj:'SCSICD Filter open.obj'
:CD.Obj:'SCSICD Filter read.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Filter read' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Filter read' ¶
-o :CD.Obj:'SCSICD Filter read.obj'
:CD.Obj:'SCSICD Filter write.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Filter write' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Filter write' ¶
-o :CD.Obj:'SCSICD Filter write.obj'
:CD.Obj:'SCSICD Filter close.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Filter close' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Filter close' ¶
-o :CD.Obj:'SCSICD Filter close.obj'
:CD.Obj:'SCSICD Filter status.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Filter status' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Filter status' ¶
-o :CD.Obj:'SCSICD Filter status.obj'
:CD.Obj:'SCSICD Filter control.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Filter control' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Filter control' ¶
-o :CD.Obj:'SCSICD Filter control.obj'
:CD.Obj:'SCSICD Filter flush.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Filter flush' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Filter flush' ¶
-o :CD.Obj:'SCSICD Filter flush.obj'
:CD.Obj:'SCSICD Filter shutdown.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Filter shutdown' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Filter shutdown' ¶
-o :CD.Obj:'SCSICD Filter shutdown.obj'
:CD.Obj:'SCSICD Main Driver.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Main Driver' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Main Driver' ¶
-o :CD.Obj:'SCSICD Main Driver.obj'
:CD.Obj:'SCSICD Driver Mgmt.obj' Ä ¶
'SCSICD.Driver.make' ¶
'SCSI Driver Mgmt' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=1 'SCSI Driver Mgmt' ¶
-o :CD.Obj:'SCSICD Driver Mgmt.obj'
|
||||||
1
scsi2/SCSI.Drivers/SCSICD.Equates
Normal file
1
scsi2/SCSI.Drivers/SCSICD.Equates
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSIChanger.Driver.make
Normal file
1
scsi2/SCSI.Drivers/SCSIChanger.Driver.make
Normal file
@ -0,0 +1 @@
|
|||||||
|
# File: SCSIChanger.Driver.make
# Target: SCSIChgr.Driver
# Sources: 'SCSI Driver main'
# 'SCSI Command Table'
# 'SCSI Filter startup'
# 'SCSI Filter open'
# 'SCSI Filter read'
# 'SCSI Filter write'
# 'SCSI Filter close'
# 'SCSI Filter status'
# 'SCSI Filter control'
# 'SCSI Filter flush'
# 'SCSI Filter shutdown'
# 'SCSI Main Driver'
# 'SCSI Driver Mgmt'
# Created: Thursday, June 9, 1988 9:30:49 AM
# Modified: Monday, November 21, 1988 7:05:00 AM
SCSIChanger.Driver ÄÄ SCSIChanger.Driver.make ¶
:Chgr.Obj:'SCSIChgr Driver main.obj' ¶
:Chgr.Obj:'SCSIChgr Command Table.obj' ¶
:Chgr.Obj:'SCSIChgr Filter startup.obj' ¶
:Chgr.Obj:'SCSIChgr Filter open.obj' ¶
:Chgr.Obj:'SCSIChgr Filter read.obj' ¶
:Chgr.Obj:'SCSIChgr Filter write.obj' ¶
:Chgr.Obj:'SCSIChgr Filter close.obj' ¶
:Chgr.Obj:'SCSIChgr Filter status.obj' ¶
:Chgr.Obj:'SCSIChgr Filter control.obj' ¶
:Chgr.Obj:'SCSIChgr Filter flush.obj' ¶
:Chgr.Obj:'SCSIChgr Filter shutdown.obj' ¶
:Chgr.Obj:'SCSIChgr Main Driver.obj' ¶
:Chgr.Obj:'SCSIChgr Driver Mgmt.obj'
LinkIIGS -t $bb -at $013f ¶
# LinkIIGS -t $bb -at $0105 ¶
:Chgr.Obj:'SCSIChgr Driver main.obj' ¶
:Chgr.Obj:'SCSIChgr Command Table.obj' ¶
:Chgr.Obj:'SCSIChgr Filter startup.obj' ¶
:Chgr.Obj:'SCSIChgr Filter open.obj' ¶
:Chgr.Obj:'SCSIChgr Filter read.obj' ¶
:Chgr.Obj:'SCSIChgr Filter write.obj' ¶
:Chgr.Obj:'SCSIChgr Filter close.obj' ¶
:Chgr.Obj:'SCSIChgr Filter status.obj' ¶
:Chgr.Obj:'SCSIChgr Filter control.obj' ¶
:Chgr.Obj:'SCSIChgr Filter flush.obj' ¶
:Chgr.Obj:'SCSIChgr Filter shutdown.obj' ¶
:Chgr.Obj:'SCSIChgr Main Driver.obj' ¶
:Chgr.Obj:'SCSIChgr Driver Mgmt.obj' ¶
-o 'SCSIChgr.Driver'
# -o :Chgr.Obj:'SCSIChgr.Driver.lnk'
# ExpressIIGS ¶
# ':Chgr.Obj:SCSIChgr.Driver.lnk' ¶
# -o 'SCSIChgr.Driver'
duplicateiigs -y -m SCSIChgr.Driver SCSIChgr.Driver
:Chgr.Obj:'SCSIChgr Driver main.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Driver main' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Driver main' ¶
-o :Chgr.Obj:'SCSIChgr Driver main.obj'
:Chgr.Obj:'SCSIChgr Command Table.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Command Table' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Command Table' ¶
-o :Chgr.Obj:'SCSIChgr Command Table.obj'
:Chgr.Obj:'SCSIChgr Filter startup.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Filter startup' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Filter startup' ¶
-o :Chgr.Obj:'SCSIChgr Filter startup.obj'
:Chgr.Obj:'SCSIChgr Filter open.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Filter open' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Filter open' ¶
-o :Chgr.Obj:'SCSIChgr Filter open.obj'
:Chgr.Obj:'SCSIChgr Filter read.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Filter read' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Filter read' ¶
-o :Chgr.Obj:'SCSIChgr Filter read.obj'
:Chgr.Obj:'SCSIChgr Filter write.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Filter write' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Filter write' ¶
-o :Chgr.Obj:'SCSIChgr Filter write.obj'
:Chgr.Obj:'SCSIChgr Filter close.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Filter close' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Filter close' ¶
-o :Chgr.Obj:'SCSIChgr Filter close.obj'
:Chgr.Obj:'SCSIChgr Filter status.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Filter status' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Filter status' ¶
-o :Chgr.Obj:'SCSIChgr Filter status.obj'
:Chgr.Obj:'SCSIChgr Filter control.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Filter control' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Filter control' ¶
-o :Chgr.Obj:'SCSIChgr Filter control.obj'
:Chgr.Obj:'SCSIChgr Filter flush.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Filter flush' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Filter flush' ¶
-o :Chgr.Obj:'SCSIChgr Filter flush.obj'
:Chgr.Obj:'SCSIChgr Filter shutdown.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Filter shutdown' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Filter shutdown' ¶
-o :Chgr.Obj:'SCSIChgr Filter shutdown.obj'
:Chgr.Obj:'SCSIChgr Main Driver.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Main Driver' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Main Driver' ¶
-o :Chgr.Obj:'SCSIChgr Main Driver.obj'
:Chgr.Obj:'SCSIChgr Driver Mgmt.obj' Ä ¶
'SCSIChgr.Driver.make' ¶
'SCSI Driver Mgmt' ¶
'SCSIHD.Equates'
AsmIIGS -d &type,type=5 'SCSI Driver Mgmt' ¶
-o :Chgr.Obj:'SCSIChgr Driver Mgmt.obj'
|
||||||
1
scsi2/SCSI.Drivers/SCSIHD.Driver.make
Normal file
1
scsi2/SCSI.Drivers/SCSIHD.Driver.make
Normal file
@ -0,0 +1 @@
|
|||||||
|
# File: SCSI.Driver.make
# Target: SCSIHD.Driver
# Sources: 'SCSI Driver main'
# 'SCSI Command Table'
# 'SCSI Filter startup'
# 'SCSI Filter open'
# 'SCSI Filter read'
# 'SCSI Filter write'
# 'SCSI Filter close'
# 'SCSI Filter status'
# 'SCSI Filter control'
# 'SCSI Filter flush'
# 'SCSI Filter shutdown'
# 'SCSI Main Driver'
# 'SCSI Driver Mgmt'
# Created: Thursday, June 9, 1988 9:30:49 AM
# Modified: Monday, November 21, 1988 7:05:00 AM
SCSIHD.Driver ÄÄ SCSIHD.Driver.make ¶
:HD.Obj:'SCSIHD Driver main.obj' ¶
:HD.Obj:'SCSIHD Command Table.obj' ¶
:HD.Obj:'SCSIHD Filter startup.obj' ¶
:HD.Obj:'SCSIHD Filter open.obj' ¶
:HD.Obj:'SCSIHD Filter read.obj' ¶
:HD.Obj:'SCSIHD Filter write.obj' ¶
:HD.Obj:'SCSIHD Filter close.obj' ¶
:HD.Obj:'SCSIHD Filter status.obj' ¶
:HD.Obj:'SCSIHD Filter control.obj' ¶
:HD.Obj:'SCSIHD Filter flush.obj' ¶
:HD.Obj:'SCSIHD Filter shutdown.obj' ¶
:HD.Obj:'SCSIHD Main Driver.obj' ¶
:HD.Obj:'SCSIHD Driver Mgmt.obj'
LinkIIGS -t $bb -at $013f ¶
:HD.Obj:'SCSIHD Driver main.obj' ¶
:HD.Obj:'SCSIHD Command Table.obj' ¶
:HD.Obj:'SCSIHD Filter startup.obj' ¶
:HD.Obj:'SCSIHD Filter open.obj' ¶
:HD.Obj:'SCSIHD Filter read.obj' ¶
:HD.Obj:'SCSIHD Filter write.obj' ¶
:HD.Obj:'SCSIHD Filter close.obj' ¶
:HD.Obj:'SCSIHD Filter status.obj' ¶
:HD.Obj:'SCSIHD Filter control.obj' ¶
:HD.Obj:'SCSIHD Filter flush.obj' ¶
:HD.Obj:'SCSIHD Filter shutdown.obj' ¶
:HD.Obj:'SCSIHD Main Driver.obj' ¶
:HD.Obj:'SCSIHD Driver Mgmt.obj' ¶
-o 'SCSIHD.Driver'
duplicateiigs -y -m SCSIHD.Driver SCSIHD.Driver
:HD.Obj:'SCSIHD Driver main.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Driver main' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Driver main' ¶
-o :HD.Obj:'SCSIHD Driver main.obj'
:HD.Obj:'SCSIHD Command Table.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Command Table' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Command Table' ¶
-o :HD.Obj:'SCSIHD Command Table.obj'
:HD.Obj:'SCSIHD Filter startup.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Filter startup' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Filter startup' ¶
-o :HD.Obj:'SCSIHD Filter startup.obj'
:HD.Obj:'SCSIHD Filter open.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Filter open' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Filter open' ¶
-o :HD.Obj:'SCSIHD Filter open.obj'
:HD.Obj:'SCSIHD Filter read.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Filter read' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Filter read' ¶
-o :HD.Obj:'SCSIHD Filter read.obj'
:HD.Obj:'SCSIHD Filter write.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Filter write' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Filter write' ¶
-o :HD.Obj:'SCSIHD Filter write.obj'
:HD.Obj:'SCSIHD Filter close.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Filter close' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Filter close' ¶
-o :HD.Obj:'SCSIHD Filter close.obj'
:HD.Obj:'SCSIHD Filter status.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Filter status' ¶
'SCSI Get Vol/Disk' ¶
# 'SCSI Get Config' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Filter status' ¶
-o :HD.Obj:'SCSIHD Filter status.obj'
:HD.Obj:'SCSIHD Filter control.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Filter control' ¶
'SCSI Set Vol/Disk' ¶
# 'SCSI Set Config' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Filter control' ¶
-o :HD.Obj:'SCSIHD Filter control.obj'
:HD.Obj:'SCSIHD Filter flush.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Filter flush' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Filter flush' ¶
-o :HD.Obj:'SCSIHD Filter flush.obj'
:HD.Obj:'SCSIHD Filter shutdown.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Filter shutdown' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Filter shutdown' ¶
-o :HD.Obj:'SCSIHD Filter shutdown.obj'
:HD.Obj:'SCSIHD Main Driver.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Main Driver' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Main Driver' ¶
-o :HD.Obj:'SCSIHD Main Driver.obj'
:HD.Obj:'SCSIHD Driver Mgmt.obj' Ä ¶
'SCSIHD.Driver.make' ¶
'SCSI Driver Mgmt' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=0 'SCSI Driver Mgmt' ¶
-o :HD.Obj:'SCSIHD Driver Mgmt.obj'
|
||||||
1
scsi2/SCSI.Drivers/SCSIHD.Equates
Normal file
1
scsi2/SCSI.Drivers/SCSIHD.Equates
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSIScanner.Driver.make
Normal file
1
scsi2/SCSI.Drivers/SCSIScanner.Driver.make
Normal file
File diff suppressed because one or more lines are too long
1
scsi2/SCSI.Drivers/SCSITape.Driver.make
Normal file
1
scsi2/SCSI.Drivers/SCSITape.Driver.make
Normal file
@ -0,0 +1 @@
|
|||||||
|
# File: SCSITape.Driver.make
# Target: SCSITape.Driver
# Sources: 'SCSI Driver main'
# 'SCSI Command Table'
# 'SCSI Filter startup'
# 'SCSI Filter open'
# 'SCSI Filter read'
# 'SCSI Filter write'
# 'SCSI Filter close'
# 'SCSI Filter status'
# 'SCSI Filter control'
# 'SCSI Filter flush'
# 'SCSI Filter shutdown'
# 'SCSI Main Driver'
# 'SCSI Driver Mgmt'
# Created: Friday, February 17, 1989 8:30:49 AM
# Modified: Tuesday, May 2, 1989 8:090:49 AM
SCSITape.Driver ÄÄ SCSITape.Driver.make ¶
:Tape.Obj:'SCSITape Driver main.obj' ¶
:Tape.Obj:'SCSITape Command Table.obj' ¶
:Tape.Obj:'SCSITape Filter startup.obj' ¶
:Tape.Obj:'SCSITape Filter open.obj' ¶
:Tape.Obj:'SCSITape Filter read.obj' ¶
:Tape.Obj:'SCSITape Filter write.obj' ¶
:Tape.Obj:'SCSITape Filter close.obj' ¶
:Tape.Obj:'SCSITape Filter status.obj' ¶
:Tape.Obj:'SCSITape Filter control.obj' ¶
:Tape.Obj:'SCSITape Filter flush.obj' ¶
:Tape.Obj:'SCSITape Filter shutdown.obj' ¶
:Tape.Obj:'SCSITape Main Driver.obj' ¶
:Tape.Obj:'SCSITape Driver Mgmt.obj'
LinkIIGS -t $bb -at $0103 ¶
# LinkIIGS -t $bb -at $0105 ¶
:Tape.Obj:'SCSITape Driver main.obj' ¶
:Tape.Obj:'SCSITape Command Table.obj' ¶
:Tape.Obj:'SCSITape Filter startup.obj' ¶
:Tape.Obj:'SCSITape Filter open.obj' ¶
:Tape.Obj:'SCSITape Filter read.obj' ¶
:Tape.Obj:'SCSITape Filter write.obj' ¶
:Tape.Obj:'SCSITape Filter close.obj' ¶
:Tape.Obj:'SCSITape Filter status.obj' ¶
:Tape.Obj:'SCSITape Filter control.obj' ¶
:Tape.Obj:'SCSITape Filter flush.obj' ¶
:Tape.Obj:'SCSITape Filter shutdown.obj' ¶
:Tape.Obj:'SCSITape Main Driver.obj' ¶
:Tape.Obj:'SCSITape Driver Mgmt.obj' ¶
-o 'SCSITape.Driver'
# -o ':Tape.Obj:SCSITape.Driver.lnk'
# ExpressIIGS ¶
# ':Tape.Obj:SCSITape.Driver.lnk' ¶
# -o 'SCSITape.Driver'
duplicateiigs -y -m SCSITape.Driver SCSITape.Driver
:Tape.Obj:'SCSITape Driver main.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Driver main' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Driver main' ¶
-o :Tape.Obj:'SCSITape Driver main.obj'
:Tape.Obj:'SCSITape Command Table.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Command Table' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Command Table' ¶
-o :Tape.Obj:'SCSITape Command Table.obj'
:Tape.Obj:'SCSITape Filter startup.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Filter startup' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Filter startup' ¶
-o :Tape.Obj:'SCSITape Filter startup.obj'
:Tape.Obj:'SCSITape Filter open.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Filter open' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Filter open' ¶
-o :Tape.Obj:'SCSITape Filter open.obj'
:Tape.Obj:'SCSITape Filter read.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Filter read' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Filter read' ¶
-o :Tape.Obj:'SCSITape Filter read.obj'
:Tape.Obj:'SCSITape Filter write.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Filter write' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Filter write' ¶
-o :Tape.Obj:'SCSITape Filter write.obj'
:Tape.Obj:'SCSITape Filter close.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Filter close' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Filter close' ¶
-o :Tape.Obj:'SCSITape Filter close.obj'
:Tape.Obj:'SCSITape Filter status.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Filter status' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Filter status' ¶
-o :Tape.Obj:'SCSITape Filter status.obj'
:Tape.Obj:'SCSITape Filter control.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Filter control' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Filter control' ¶
-o :Tape.Obj:'SCSITape Filter control.obj'
:Tape.Obj:'SCSITape Filter flush.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Filter flush' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Filter flush' ¶
-o :Tape.Obj:'SCSITape Filter flush.obj'
:Tape.Obj:'SCSITape Filter shutdown.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Filter shutdown' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Filter shutdown' ¶
-o :Tape.Obj:'SCSITape Filter shutdown.obj'
:Tape.Obj:'SCSITape Main Driver.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Main Driver' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Main Driver' ¶
-o :Tape.Obj:'SCSITape Main Driver.obj'
:Tape.Obj:'SCSITape Driver Mgmt.obj' Ä ¶
'SCSITape.Driver.make' ¶
'SCSI Driver Mgmt' ¶
'SCSIHD.equates'
AsmIIGS -d &type,type=2 'SCSI Driver Mgmt' ¶
-o :Tape.Obj:'SCSITape Driver Mgmt.obj'
|
||||||
Loading…
x
Reference in New Issue
Block a user