Версия 1.03
- поправлен cdx.txt - добалена возможность послать ATAPI пакет. - если нет диска в приводе, то не пишет ошибку, что нет привода
This commit is contained in:
savelij13
commit
194e7a1fca
BIN
bin/CDX.EXE
Normal file
BIN
bin/CDX.EXE
Normal file
Binary file not shown.
75
bin/CDX.TXT
Normal file
75
bin/CDX.TXT
Normal file
@ -0,0 +1,75 @@
|
|||||||
|
|
||||||
|
CDROM Extension utility v1.03
|
||||||
|
|
||||||
|
(c) Sprinter Team, 2025
|
||||||
|
|
||||||
|
<EFBFBD>â ª®á®«ì ï ¯à®£à ¬¬ ¯à¥¤ § ç¥ ¤«ï ¯®¤¤¥à¦ª¨ CD-ROM ª®¬¯ìîâ¥à¥
|
||||||
|
‘¯à¨â¥à. ƒ« ¢ë¬ ®¡à §®¬, ã⨫¨â á«ã¦¨â ¤«ï ª®¯¨à®¢ ¨ï ä ©«®¢ á CD-ROM
|
||||||
|
¤à㣨¥ ¤¨áª¨ ª®¬¯ìîâ¥à . ’ ª ¦¥ ¥áâì ¢®§¬®¦®áâì ®â¯à ¢ª¨ ATAPI ¯ ª¥â ¤«ï
|
||||||
|
ã¯à ¢«¥¨ï CD-ROM.
|
||||||
|
|
||||||
|
ˆá¯®«ì§®¢ ¨¥:
|
||||||
|
|
||||||
|
CDX [-ª«îç] [ª®¬ ¤ ] [¯ à ¬¥âà 1] [¯ à ¬¥âà 2]
|
||||||
|
|
||||||
|
Š®¬ ¤ë:
|
||||||
|
|
||||||
|
OPEN -- ®âªàëâì «®â®ª
|
||||||
|
CLOSE -- § ªàëâì «®â®ª
|
||||||
|
LIST [\cd\path\] [pattern] -- ¯®ª § âì ᮤ¥à¦¨¬®¥ ª â «®£
|
||||||
|
COPY \source \destination -- ª®¯¨à®¢ âì ä ©«ë
|
||||||
|
DUMP sector [offset] -- ¯®ª § âì ¤ ¬¯ ᥪâ®à ¤¨áª
|
||||||
|
SEND hexline ["." separator] -- ®â¯à ¢ª ATAPI ¯ ª¥â
|
||||||
|
|
||||||
|
Š«îç¨:
|
||||||
|
|
||||||
|
-h,? -- ¢ë¢¥á⨠⥪áâ ¯®¤áª §ª¨
|
||||||
|
-1 -- CDROM ãáâ ®¢«¥ ª ª Primary IDE Master
|
||||||
|
-2 -- CDROM ãáâ ®¢«¥ ª ª Primary IDE Slave device
|
||||||
|
-3 -- CDROM ãáâ ®¢«¥ ª ª Secondary IDE Master device
|
||||||
|
-4 -- CDROM ãáâ ®¢«¥ ª ª Secondary IDE Slave device
|
||||||
|
|
||||||
|
<EFBFBD>ਬ¥àë ¨á¯®«ì§®¢ ¨ï:
|
||||||
|
|
||||||
|
cdx list
|
||||||
|
cdx list \waves\
|
||||||
|
cdx copy \docs\*.* c:\docs\
|
||||||
|
cdx copy \cd\waves\*.wav c:\waves\
|
||||||
|
cdx copy \soft\filename.exe c:\files\newname.exe
|
||||||
|
cdx send 4B.000000.0000000000000000.00000000
|
||||||
|
cdx send 4B000000000000000000000000000000
|
||||||
|
|
||||||
|
---
|
||||||
|
|
||||||
|
It is a command-line program for supporting of CD-ROM. Mainly, it serves
|
||||||
|
copying files from CD-ROM to hard disk or floppy disk.
|
||||||
|
|
||||||
|
Usage:
|
||||||
|
|
||||||
|
CDX [-switches] [command] [param1] [param2]
|
||||||
|
|
||||||
|
Commands:
|
||||||
|
OPEN -- open tray
|
||||||
|
CLOSE -- close tray
|
||||||
|
LIST [\cd\path\] [pattern] -- show file(s)
|
||||||
|
COPY \source \destination -- copy file(s) from CD-ROM to another disk
|
||||||
|
DUMP sector [offset] -- show sector dump from CD-ROM
|
||||||
|
SEND hexline ["." separator] -- send ATAPI packet
|
||||||
|
|
||||||
|
Switches:
|
||||||
|
-h,? -- help page
|
||||||
|
-1 -- CDROM installed as Primary IDE Master device
|
||||||
|
-2 -- CDROM installed as Primary IDE Slave device
|
||||||
|
-3 -- CDROM installed as Secondary IDE Master device
|
||||||
|
-4 -- CDROM installed as Secondary IDE Slave device
|
||||||
|
|
||||||
|
Examples:
|
||||||
|
cdx list
|
||||||
|
cdx list \waves\
|
||||||
|
cdx copy \docs\*.* c:\docs\
|
||||||
|
cdx copy \cd\waves\*.wav c:\waves\
|
||||||
|
cdx copy \soft\filename.exe c:\files\newname.exe
|
||||||
|
cdx send 4B.000000.0000000000000000.00000000
|
||||||
|
cdx send 4B000000000000000000000000000000
|
||||||
|
|
||||||
|
---
|
||||||
5
bin/history.txt
Normal file
5
bin/history.txt
Normal file
@ -0,0 +1,5 @@
|
|||||||
|
|
||||||
|
‚¥àá¨ï 1.03
|
||||||
|
- ¯®¯à ¢«¥ cdx.txt
|
||||||
|
- ¤®¡ «¥ ¢®§¬®¦®áâì ¯®á« âì ATAPI ¯ ª¥â.
|
||||||
|
- ¥á«¨ ¥â ¤¨áª ¢ ¯à¨¢®¤¥, â® ¥ ¯¨è¥â ®è¨¡ªã, çâ® ¥â ¯à¨¢®¤
|
||||||
23
build.bat
Normal file
23
build.bat
Normal file
@ -0,0 +1,23 @@
|
|||||||
|
|
||||||
|
@echo off
|
||||||
|
|
||||||
|
if not exist tmp md tmp
|
||||||
|
set path=d:\yad\svn\pentevo\tools\asl\bin\;d:\yad\svn\pentevo\tools\mhmt\;d:\yad\svn\pentevo\tools\noice2equ\
|
||||||
|
set includes=d:\yad\svn\pentevo\rom;d:\yad\zxgit\common_includes\
|
||||||
|
|
||||||
|
cls
|
||||||
|
|
||||||
|
asl -U -L -C -x -olist tmp\cdx.lst -i %includes% cdx.a80 || goto error
|
||||||
|
p2bin cdx.p bin\cdx.exe -r $-$ -k
|
||||||
|
|
||||||
|
echo ########################
|
||||||
|
echo # -= End Compile Ok =- #
|
||||||
|
echo ########################
|
||||||
|
goto exit
|
||||||
|
|
||||||
|
:error
|
||||||
|
echo #######################
|
||||||
|
echo # -= Error Compile =- #
|
||||||
|
echo #######################
|
||||||
|
|
||||||
|
:exit
|
||||||
6
build_pause.bat
Normal file
6
build_pause.bat
Normal file
@ -0,0 +1,6 @@
|
|||||||
|
|
||||||
|
@ECHO OFF
|
||||||
|
|
||||||
|
call build.bat
|
||||||
|
|
||||||
|
pause
|
||||||
1225
cd_dos.a80
Normal file
1225
cd_dos.a80
Normal file
File diff suppressed because it is too large
Load Diff
488
cdx.a80
Normal file
488
cdx.a80
Normal file
@ -0,0 +1,488 @@
|
|||||||
|
|
||||||
|
; LAST UPDATE: 07.07.2025 savelij
|
||||||
|
|
||||||
|
include macros.a80
|
||||||
|
include bios_sp.a80
|
||||||
|
include dss_sp.a80
|
||||||
|
include errors_sp.a80
|
||||||
|
include fat_dir_sp.a80
|
||||||
|
include macros_sp.a80
|
||||||
|
include vers.a80
|
||||||
|
|
||||||
|
;[BEGIN]
|
||||||
|
;
|
||||||
|
; CDX.EXE [command] [-switches] [directory]
|
||||||
|
;
|
||||||
|
;commands:
|
||||||
|
; OPEN
|
||||||
|
; EJECT
|
||||||
|
; CLOSE
|
||||||
|
; COPY
|
||||||
|
; LIST
|
||||||
|
; DUMP
|
||||||
|
; COMMAND
|
||||||
|
; SEND
|
||||||
|
; -h,? Help page
|
||||||
|
|
||||||
|
HDR_EXE 0x8100,1,0,START,START,0xBFFF,0
|
||||||
|
|
||||||
|
START: PUSH IX
|
||||||
|
XOR A
|
||||||
|
; LD HL,BUF1
|
||||||
|
; LD (HL),A
|
||||||
|
; LD DE,BUF1+1
|
||||||
|
; LD BC,BUFFERS_END-1
|
||||||
|
; LDIR
|
||||||
|
LD HL,'\\'
|
||||||
|
LD (DIRSPEC),HL
|
||||||
|
LD HL,BUF1
|
||||||
|
LD B,BUFERS_NUMBER
|
||||||
|
.initBuffersLoop:
|
||||||
|
LD (HL),A
|
||||||
|
INC H
|
||||||
|
DJNZ .initBuffersLoop
|
||||||
|
LD A,MSG0.MSG_HELLO
|
||||||
|
CALL MESSAGE
|
||||||
|
CALL INIT
|
||||||
|
JR NC,.next
|
||||||
|
LD HL,PRM1
|
||||||
|
LD (HL),0
|
||||||
|
LD A,MSG0.MSG_NO_CDROM
|
||||||
|
CALL MESSAGE
|
||||||
|
LD A,1
|
||||||
|
LD (STOPMODE),A
|
||||||
|
.next:
|
||||||
|
SPDSS DSSF.VERSION
|
||||||
|
EX DE,HL
|
||||||
|
AND A
|
||||||
|
LD DE,0x0146 ;1.70
|
||||||
|
SBC HL,DE ;CHECK DSS VERSION
|
||||||
|
POP HL
|
||||||
|
JP C,OLD_DSS
|
||||||
|
LD IX,BUF_PTRS
|
||||||
|
CALL EX_COMMAND_LINE
|
||||||
|
CALL MALLOC
|
||||||
|
JR C,QUIT
|
||||||
|
; CALL FIND_CDROM
|
||||||
|
LD A,(STOPMODE)
|
||||||
|
OR A
|
||||||
|
CALL Z,COMMAND
|
||||||
|
; CALL MDEALLOC
|
||||||
|
QUIT: CALL CRLF
|
||||||
|
CALL RESTORE_STATE
|
||||||
|
.loop:
|
||||||
|
SPDSS DSSF.EXIT,0
|
||||||
|
JP .loop
|
||||||
|
|
||||||
|
OLD_DSS: LD A,MSG0.MSG_OLD_DSS
|
||||||
|
CALL MESSAGE
|
||||||
|
JR QUIT
|
||||||
|
|
||||||
|
RESTORE_STATE: LD B,1
|
||||||
|
.set_par: EQU $-1
|
||||||
|
LD A,(CDDRIVE)
|
||||||
|
SPBIOS BIOSF.DRV_SET_PAR
|
||||||
|
RET
|
||||||
|
|
||||||
|
;HNDMEM DB 0xFF
|
||||||
|
|
||||||
|
MALLOC:
|
||||||
|
SPDSS DSSF.GETMEM,2
|
||||||
|
JR NC,.cont
|
||||||
|
LD A,MSG0.MSG_MEMERROR
|
||||||
|
CALL MESSAGE
|
||||||
|
SCF
|
||||||
|
RET
|
||||||
|
|
||||||
|
.cont: PUSH AF
|
||||||
|
SPDSS DSSF.SETWIN3,1
|
||||||
|
LD HL,BANKTBL
|
||||||
|
POP AF
|
||||||
|
SPBIOS BIOSF.GETMEMBLKPAGES
|
||||||
|
RET
|
||||||
|
|
||||||
|
; MDEALLOC
|
||||||
|
; LD A,(HNDMEM)
|
||||||
|
; LD C,Dss.FreeMem
|
||||||
|
; JP ToDSS
|
||||||
|
|
||||||
|
; FIND_CDROM
|
||||||
|
; LD IX,DEV_CFG
|
||||||
|
; LD C,BIOS.DRV_LIST
|
||||||
|
; RST ToBIOS
|
||||||
|
; LD A,(IX+3) ;CDROM
|
||||||
|
; OR A
|
||||||
|
; JR Z,W_O_CD
|
||||||
|
; LD A,(CDDRIVE)
|
||||||
|
; INC A
|
||||||
|
; RET NZ
|
||||||
|
; LD A,SLAVE ;DEFAULT
|
||||||
|
; LD (CDDRIVE),A
|
||||||
|
; RET
|
||||||
|
; W_O_CD LD A,MSG_NO_CDROM
|
||||||
|
; CALL MESSAGE
|
||||||
|
; LD A,1
|
||||||
|
; LD (STOPMODE),A
|
||||||
|
; SCF
|
||||||
|
; RET
|
||||||
|
|
||||||
|
;BUF_PRINT
|
||||||
|
; LD HL,BUF_PTRS
|
||||||
|
;BUF_PL LD E,(HL)
|
||||||
|
; INC HL
|
||||||
|
; LD D,(HL)
|
||||||
|
; INC HL
|
||||||
|
; LD A,D
|
||||||
|
; OR E
|
||||||
|
; RET Z
|
||||||
|
; PUSH HL
|
||||||
|
; EX DE,HL
|
||||||
|
; LD C,Dss.PCHARS
|
||||||
|
; RST ToDSS
|
||||||
|
; CALL CRLF
|
||||||
|
; POP HL
|
||||||
|
; JR BUF_PL
|
||||||
|
|
||||||
|
;OPEN_FILE
|
||||||
|
; LD HL,FILENAME
|
||||||
|
; XOR A
|
||||||
|
; LD C,Dss.OPEN
|
||||||
|
; RST ToDSS
|
||||||
|
; LD (FILEHND),A
|
||||||
|
; RET NC
|
||||||
|
; LD HL,FILENAME
|
||||||
|
; CALL PUTVAR
|
||||||
|
; LD A,MSG_CANT_OPEN
|
||||||
|
; CALL MESSAGE
|
||||||
|
; SCF
|
||||||
|
; RET
|
||||||
|
|
||||||
|
;CLOSE_FILE
|
||||||
|
; LD A,(FILEHND)
|
||||||
|
; LD C,Dss.CLOSE
|
||||||
|
; RST ToDSS
|
||||||
|
; RET
|
||||||
|
|
||||||
|
INIT: XOR A
|
||||||
|
LD (STOPMODE),A
|
||||||
|
DEC A
|
||||||
|
LD (CDDRIVE),A
|
||||||
|
LD B,0xC0 - 1
|
||||||
|
.loop: INC B
|
||||||
|
LD A,B
|
||||||
|
CP 0xC4
|
||||||
|
SCF
|
||||||
|
RET Z
|
||||||
|
PUSH BC
|
||||||
|
SPBIOS BIOSF.DRV_DETECT
|
||||||
|
POP BC
|
||||||
|
JR NC,.found
|
||||||
|
CP ERR_DRV.ATAPI_MediumError
|
||||||
|
JR Z,.media_changed
|
||||||
|
CP ERR_DRV.ATAPI_UnitAttention
|
||||||
|
JR NZ,.loop
|
||||||
|
.media_changed: PUSH BC
|
||||||
|
LD A,B
|
||||||
|
CALL SAVE_MEDIA_CHANGED
|
||||||
|
POP BC
|
||||||
|
.found: LD A,B
|
||||||
|
LD (CDDRIVE),A
|
||||||
|
RET
|
||||||
|
|
||||||
|
SAVE_MEDIA_CHANGED:
|
||||||
|
SPBIOS BIOSF.DRV_GET_PAR
|
||||||
|
OR %00000010
|
||||||
|
LD B,A
|
||||||
|
LD A,(RESTORE_STATE.set_par)
|
||||||
|
OR B
|
||||||
|
LD (RESTORE_STATE.set_par),A
|
||||||
|
RET
|
||||||
|
|
||||||
|
;VARIABLES
|
||||||
|
|
||||||
|
; FILENAME DS 256
|
||||||
|
; FILEHND DB 0xFF
|
||||||
|
|
||||||
|
STOPMODE DB 0x00
|
||||||
|
|
||||||
|
CMD_PARSE_ASM.Start:
|
||||||
|
include cmdparse.a80
|
||||||
|
CMD_PARSE_ASM.End EQU $
|
||||||
|
COMMAND_ASM.Start
|
||||||
|
include command.a80
|
||||||
|
COMMAND_ASM.End EQU $
|
||||||
|
CD_DOS_ASM.Start:
|
||||||
|
include cd_dos.a80
|
||||||
|
CD_DOS_ASM.End EQU $
|
||||||
|
|
||||||
|
CRLF: PUSH HL
|
||||||
|
LD HL,MSG0.crlf
|
||||||
|
SPDSS DSSF.PCHARS
|
||||||
|
POP HL
|
||||||
|
RET
|
||||||
|
|
||||||
|
ERROR: ;CP MAX_DSS_ERR
|
||||||
|
LD E,A
|
||||||
|
LD D,0
|
||||||
|
;JR C,.ERR_MSG
|
||||||
|
;LD E,D
|
||||||
|
;JP .ERR_MSG
|
||||||
|
|
||||||
|
.ERR_MSG: PUSH DE
|
||||||
|
LD HL,ERRCDX
|
||||||
|
CALL PRINTZ
|
||||||
|
POP DE
|
||||||
|
CALL FMESAGE
|
||||||
|
CALL PRINTZ
|
||||||
|
CALL CRLF
|
||||||
|
JP CRLF
|
||||||
|
|
||||||
|
FMESAGE: LD A,E
|
||||||
|
LD HL,SYS_ERRORS ; ¬ áᨢ áâப
|
||||||
|
LD BC,SYS_ERRORS.Size ; à §¬¥à ¬ áᨢ
|
||||||
|
RLA
|
||||||
|
jr nc,.set_de
|
||||||
|
ld hl,DRV_ERRORS ; ¬ áᨢ áâப
|
||||||
|
ld bc,DRV_ERRORS.Size ; à §¬¥à ¬ áᨢ
|
||||||
|
.set_de: SRL A
|
||||||
|
LD E,A
|
||||||
|
INC DE
|
||||||
|
LCPIR: XOR A
|
||||||
|
CPIR
|
||||||
|
RET PO
|
||||||
|
RET NZ
|
||||||
|
XOR A
|
||||||
|
CP (HL)
|
||||||
|
JR Z,.no_mess
|
||||||
|
DEC DE
|
||||||
|
LD A,D
|
||||||
|
OR E
|
||||||
|
JP NZ,LCPIR
|
||||||
|
RET
|
||||||
|
.no_mess: INC HL
|
||||||
|
RET
|
||||||
|
|
||||||
|
IF 0;/*
|
||||||
|
LCPIR: xor a
|
||||||
|
cpir
|
||||||
|
ret po
|
||||||
|
ret nz
|
||||||
|
;R11
|
||||||
|
XOR A
|
||||||
|
CP (HL)
|
||||||
|
JR Z,.no_mess
|
||||||
|
;
|
||||||
|
dec de
|
||||||
|
ld a,d
|
||||||
|
or e
|
||||||
|
jr nz,LCPIR
|
||||||
|
ret
|
||||||
|
.no_mess: INC HL
|
||||||
|
RET
|
||||||
|
|
||||||
|
print_err_message:
|
||||||
|
ld hl,SYS_ERRORS ; ¬ áᨢ áâப
|
||||||
|
ld bc,SYS_ERRORS.Size ; à §¬¥à ¬ áᨢ
|
||||||
|
;cp %1000'0000
|
||||||
|
RLA
|
||||||
|
jr nc,.set_de
|
||||||
|
;
|
||||||
|
;and %0111'1111
|
||||||
|
ld hl,DRV_ERRORS ; ¬ áᨢ áâப
|
||||||
|
ld bc,DRV_ERRORS.Size ; à §¬¥à ¬ áᨢ
|
||||||
|
;
|
||||||
|
.set_de: SRL A
|
||||||
|
ld e,a
|
||||||
|
ld d,0
|
||||||
|
inc de
|
||||||
|
call LCPIR ; ©â¨ áâபã
|
||||||
|
call PRINTZ ; ä®à¬ â. ¢ë¢®¤ áâப¨
|
||||||
|
jp newline
|
||||||
|
ENDIF;*/
|
||||||
|
|
||||||
|
ERRCDX DB "CDX: ",0
|
||||||
|
|
||||||
|
include dss_errors.a80
|
||||||
|
|
||||||
|
;FIND_MESSAGE LD E,A
|
||||||
|
; LD D,0
|
||||||
|
; CALL MESAGE
|
||||||
|
; RET
|
||||||
|
|
||||||
|
MESSAGE LD E,A
|
||||||
|
LD D,0
|
||||||
|
CALL MESAGE
|
||||||
|
JP PRINTZ
|
||||||
|
|
||||||
|
MESAGE INC DE
|
||||||
|
LD HL,MSG0
|
||||||
|
LD BC,MSG1-MSG0
|
||||||
|
LCPIR2 XOR A
|
||||||
|
CPIR
|
||||||
|
RET PO
|
||||||
|
RET NZ
|
||||||
|
DEC DE
|
||||||
|
LD A,D
|
||||||
|
OR E
|
||||||
|
JP NZ,LCPIR2
|
||||||
|
RET
|
||||||
|
|
||||||
|
PRINTZ LD A,(HL)
|
||||||
|
INC HL
|
||||||
|
OR A
|
||||||
|
RET Z
|
||||||
|
CP "%"
|
||||||
|
JR NZ,PRINTZ2
|
||||||
|
LD A,(HL)
|
||||||
|
INC HL
|
||||||
|
SUB "1"
|
||||||
|
PUSH HL
|
||||||
|
LD L,A
|
||||||
|
LD H,0
|
||||||
|
ADD HL,HL
|
||||||
|
ADD HL,HL
|
||||||
|
ADD HL,HL
|
||||||
|
ADD HL,HL
|
||||||
|
LD BC,PRM1
|
||||||
|
ADD HL,BC
|
||||||
|
SPDSS DSSF.PCHARS
|
||||||
|
POP HL
|
||||||
|
JR PRINTZ
|
||||||
|
|
||||||
|
PRINTZ2
|
||||||
|
SPDSS DSSF.PUTCHAR
|
||||||
|
JP PRINTZ
|
||||||
|
|
||||||
|
PRINT_
|
||||||
|
SPBIOS BIOSF.LP_PRINT_SYM,1
|
||||||
|
RET
|
||||||
|
|
||||||
|
PUTVAR LD DE,PRM1
|
||||||
|
PUTPRM LD BC,15
|
||||||
|
PUTPRMA LD A,(HL)
|
||||||
|
LDI
|
||||||
|
RET PO
|
||||||
|
OR A
|
||||||
|
JR NZ,PUTPRMA
|
||||||
|
RET
|
||||||
|
|
||||||
|
CDDRIVE DB 0xFF
|
||||||
|
|
||||||
|
PRM1 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
|
||||||
|
PRM2 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
|
||||||
|
PRM3 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
|
||||||
|
PRM4 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
|
||||||
|
PRM5 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
|
||||||
|
PRM6 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
|
||||||
|
PRM7 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
|
||||||
|
PRM8 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
|
||||||
|
PRM9 DB 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
|
||||||
|
|
||||||
|
MSG0 DB 0
|
||||||
|
_INIT_VAR
|
||||||
|
_SETVAR .MSG_HELLO
|
||||||
|
DB "CDROM eXtension utility v\{VERS}, build \{BUILDDATE} (c) Sprinter Team\r\n"
|
||||||
|
DZ "Type CDX.EXE -? for help.\r\n"
|
||||||
|
_SETVAR .MSG_TRAY_OPEN
|
||||||
|
DZ "Opening tray..."
|
||||||
|
_SETVAR .MSG_TRAY_CLOSE
|
||||||
|
DZ "Closing tray..."
|
||||||
|
; 01234567890123456789012345678901234567890123456789012345678901234567890123456789
|
||||||
|
_SETVAR .MSG_USAGE
|
||||||
|
DB " Usage: CDX.EXE [-switches] [command] [param1] [param2]\r\n\r\n"
|
||||||
|
DB "Commands:\r\n"
|
||||||
|
DB " CDX OPEN - Open tray\r\n"
|
||||||
|
DB " CDX CLOSE - Close tray\r\n"
|
||||||
|
DB " CDX LIST [\\cd_path\\][pattern] - Show CDROM filelist\r\n"
|
||||||
|
DB " CDX COPY \\source d:\\destination\\ - Copy file(s) from CDROM to another disk\r\n"
|
||||||
|
DB " CDX DUMP sector [offset] - Show sector dump from CDROM\r\n"
|
||||||
|
DB " CDX SEND hexline [\".\" separator] - Send ATAPI command\r\n"
|
||||||
|
DB " example:\r\n"
|
||||||
|
DB " CDX SEND 4B.000000.0000000000000000.00000000\r\n"
|
||||||
|
DB "\r\n"
|
||||||
|
DB "Switches:\r\n"
|
||||||
|
DB " -1 CDROM installed as Primary IDE Master device\r\n"
|
||||||
|
DB " -2 CDROM installed as Primary IDE Slave device\r\n"
|
||||||
|
DB " -3 CDROM installed as Secondary IDE Master device\r\n"
|
||||||
|
DB " -4 CDROM installed as Secondary IDE Slave device\r\n"
|
||||||
|
DZ " -h,? Help page\r\n"
|
||||||
|
_SETVAR .MSG_UNK_DEVICE_NUMBER
|
||||||
|
DZ " Error: Unknown device number %1\r\n"
|
||||||
|
_SETVAR .MSG_UNK_COMMAND
|
||||||
|
DZ " Error: Unknown command: %1\r\n"
|
||||||
|
_SETVAR .MSG_DONE
|
||||||
|
DZ "Done!\r\n"
|
||||||
|
_SETVAR .MSG_NO_CDROM
|
||||||
|
DZ " Error: Can't find CDROM device %1\r\n"
|
||||||
|
_SETVAR .MSG_IO_ERROR
|
||||||
|
DZ " Error: I/O Error\r\n"
|
||||||
|
_SETVAR .MSG_OLD_DSS
|
||||||
|
DZ " Error: Need DSS version 1.70 or higher\r\n"
|
||||||
|
_SETVAR .MSG_COPYFILE
|
||||||
|
DZ "Copying "
|
||||||
|
_SETVAR .MSG_DIRHEAD
|
||||||
|
DZ "Directory of CDROM:"
|
||||||
|
_SETVAR .MSG_DIRENTRY
|
||||||
|
; FILENAME EXT SIZE DATE TIME
|
||||||
|
DZ "%1 %2 %3 %4 %5\r\n"
|
||||||
|
_SETVAR .MSG_MEMERROR
|
||||||
|
DZ " Error: Memory allocation error\r\n"
|
||||||
|
_SETVAR .MSG_COPYTO
|
||||||
|
DZ " to "
|
||||||
|
_SETVAR .MSG_CD_READ_ERR
|
||||||
|
DZ " Error: Reading failure\r\n"
|
||||||
|
_SETVAR .MSG_F_WRITE_ERR
|
||||||
|
DZ " Error: Writing failure\r\n"
|
||||||
|
_SETVAR .MSG_FAILURE
|
||||||
|
DZ "Failure!\r\n"
|
||||||
|
_SETVAR .MSG_ERR_DEST
|
||||||
|
DZ " Error: Can't open destination file\r\n"
|
||||||
|
_SETVAR .MSG_COPYABORTED
|
||||||
|
DZ "Copying aborted\r\n"
|
||||||
|
_SETVAR .MSG_ERR_PACKET
|
||||||
|
DZ "Error: packet size incorrect\r\n"
|
||||||
|
_SETVAR .MSG_SEND_ATAPI
|
||||||
|
DZ "Send ATAPI packet..."
|
||||||
|
|
||||||
|
.crlf: DZ "\r\n"
|
||||||
|
|
||||||
|
DB 0
|
||||||
|
MSG1
|
||||||
|
|
||||||
|
BUF_PTRS DW BUF1,BUF2,BUF3,BUF4,0
|
||||||
|
|
||||||
|
APCMD_BUF DB 12 DUP 0
|
||||||
|
|
||||||
|
;-------------------------------//BUFFERS\\-------------------------------;
|
||||||
|
FF_STRUCT: DB "12345678"
|
||||||
|
DB "123"
|
||||||
|
DB 0x00
|
||||||
|
DW 0,0,0,0
|
||||||
|
CDFPOSH DW 0 ;CLUSTER HIGH
|
||||||
|
CDFTIME DW 0 ;TIME
|
||||||
|
CDFDATE DW 0 ;DATE
|
||||||
|
CDFPOSL DW 0 ;CLUSTER
|
||||||
|
CDFSIZE DW 0,0 ;SIZE
|
||||||
|
CDFATTR DB 0x00 ;ATTR
|
||||||
|
CDFNAME DB "12345678123",0
|
||||||
|
|
||||||
|
BUFFERS_START EQU $
|
||||||
|
|
||||||
|
INIT_VAR FF_STRUCT+256
|
||||||
|
SETVAR DIRSPEC, 256
|
||||||
|
SETVAR BUF1, 256
|
||||||
|
SETVAR BUF2, 256
|
||||||
|
SETVAR BUF3, 256
|
||||||
|
SETVAR BUF4, 256
|
||||||
|
SETVAR ARGCBUF, 256
|
||||||
|
SETVAR DUMPBUF, 256
|
||||||
|
|
||||||
|
BUFFERS_END EQU DUMPBUF+2048-BUFFERS_START
|
||||||
|
;
|
||||||
|
BUFERS_NUMBER EQU 6
|
||||||
|
;
|
||||||
|
; ASSERT (DUMPBUF+2048 < 0xC000), "NO FREE SPACE FOR BUFFERS"
|
||||||
|
;-----------------------------------------------------------------------;
|
||||||
|
DEV_CFG:
|
||||||
|
; DISPLAY "\n\tCDX size: ",/D,DEV_CFG - START
|
||||||
|
;[END]
|
||||||
90
cmdparse.a80
Normal file
90
cmdparse.a80
Normal file
@ -0,0 +1,90 @@
|
|||||||
|
|
||||||
|
; LAST UPDATE: 07.07.2025 savelij
|
||||||
|
|
||||||
|
; HL - exe-prefix
|
||||||
|
; IX - pointers at work buffers
|
||||||
|
EX_COMMAND_LINE:
|
||||||
|
INC HL
|
||||||
|
.NEXTPR: LD DE,ARGCBUF
|
||||||
|
SPDSS DSSF.EX_PATH,EX_PATH.GSWITCH
|
||||||
|
PUSH AF
|
||||||
|
PUSH HL
|
||||||
|
LD A,(ARGCBUF)
|
||||||
|
OR A
|
||||||
|
JR Z,.EOCL ;end of command line
|
||||||
|
CP "-"
|
||||||
|
JR Z,.ITCKEY
|
||||||
|
CP "/"
|
||||||
|
JR Z,.ITCKEY
|
||||||
|
LD HL,ARGCBUF
|
||||||
|
LD E,(IX+0)
|
||||||
|
LD D,(IX+1)
|
||||||
|
INC IX
|
||||||
|
INC IX
|
||||||
|
LD A,D
|
||||||
|
OR E
|
||||||
|
JR Z,.CL_FAILURE
|
||||||
|
;LD A,1
|
||||||
|
;LD (NAME_FLG),A
|
||||||
|
.MOVNAME: LD A,(HL)
|
||||||
|
LDI
|
||||||
|
OR A
|
||||||
|
JR NZ,.MOVNAME
|
||||||
|
.EOCL: POP HL
|
||||||
|
POP AF
|
||||||
|
JR NC,.NEXTPR
|
||||||
|
RET
|
||||||
|
|
||||||
|
.CL_FAILURE: POP HL
|
||||||
|
POP AF
|
||||||
|
RET
|
||||||
|
|
||||||
|
.ITCKEY: LD A,(ARGCBUF+1)
|
||||||
|
CP "5"
|
||||||
|
JR NC,.HELP
|
||||||
|
CP "1"
|
||||||
|
JR NC,.number
|
||||||
|
; ERROR
|
||||||
|
LD HL,ARGCBUF+1
|
||||||
|
CALL PUTVAR
|
||||||
|
LD A,MSG0.MSG_UNK_DEVICE_NUMBER
|
||||||
|
CALL MESSAGE
|
||||||
|
LD A,1
|
||||||
|
LD (STOPMODE),A
|
||||||
|
JR .EOCL
|
||||||
|
|
||||||
|
.number: SUB '1'
|
||||||
|
OR 0xC0
|
||||||
|
PUSH IX
|
||||||
|
PUSH AF
|
||||||
|
CALL RESTORE_STATE
|
||||||
|
XOR A
|
||||||
|
LD (RESTORE_STATE.set_par),A
|
||||||
|
POP AF
|
||||||
|
LD (CDDRIVE),A
|
||||||
|
SPBIOS BIOSF.DRV_DETECT
|
||||||
|
POP IX
|
||||||
|
JR NC,.EOCL
|
||||||
|
CP ERR_DRV.ATAPI_MediumError
|
||||||
|
JR Z,.EOCL
|
||||||
|
CP ERR_DRV.ATAPI_UnitAttention
|
||||||
|
JR NZ,.error
|
||||||
|
LD A,(CDDRIVE)
|
||||||
|
PUSH IX
|
||||||
|
CALL SAVE_MEDIA_CHANGED
|
||||||
|
POP IX
|
||||||
|
JR NC,.EOCL
|
||||||
|
.error: LD HL,ARGCBUF+1
|
||||||
|
CALL PUTVAR
|
||||||
|
LD A,MSG0.MSG_NO_CDROM
|
||||||
|
CALL MESSAGE
|
||||||
|
LD A,1
|
||||||
|
LD (STOPMODE),A
|
||||||
|
SCF
|
||||||
|
JR .CL_FAILURE
|
||||||
|
|
||||||
|
.HELP: LD A,MSG0.MSG_USAGE
|
||||||
|
CALL MESSAGE
|
||||||
|
LD A,1
|
||||||
|
LD (STOPMODE),A
|
||||||
|
JR .EOCL
|
||||||
1036
command.a80
Normal file
1036
command.a80
Normal file
File diff suppressed because it is too large
Load Diff
6
readme.md
Normal file
6
readme.md
Normal file
@ -0,0 +1,6 @@
|
|||||||
|
CDROM Extension utility для компьютера Sprinter
|
||||||
|
|
||||||
|
Консольная программа предназначена для поддержки CD-ROM на компьютере
|
||||||
|
Спринтер. Главным образом, утилита служит для копирования файлов с CD-ROM на
|
||||||
|
другие диски компьютера. Так же есть возможность отправки ATAPI пакета для
|
||||||
|
управления CD-ROM.
|
||||||
Loading…
Reference in New Issue
Block a user