DataMuseum.dk

Presents historical artifacts from the history of:

CR80 Hard and Floppy Disks

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about CR80 Hard and Floppy Disks

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦890bc7bfc⟧ TextFile

    Length: 8028 (0x1f5c)
    Types: TextFile
    Names: »LTDPREFIX.S«

Derivation

└─⟦8c095a7f3⟧ Bits:30005798 CR80 Disc Pack ( Vol ILS systemdisk XAMOS TOS 10:01 hard boot #43c 19-7-87/JFJ )
    └─ ⟦this⟧ »PREFIXES.D!XAMOS.D!LTD.D!V0301.D!ASM.D!LTDPREFIX.S« 
    └─ ⟦this⟧ »PREFIXES.D!XAMOS.D!LTD.D!V03CT.D!ASM.D!LTDPREFIX.S« 
└─⟦c2e810e96⟧ Bits:30005799 CR80 Disc Pack ( XAMOS 841129 ILS TOS 10-01 System Disk Tilhører ILS/MSG hard boot boot entry #43c )
    └─ ⟦this⟧ »PREFIXES.D!XAMOS.D!LTD.D!V0301.D!ASM.D!LTDPREFIX.S« 
    └─ ⟦this⟧ »PREFIXES.D!XAMOS.D!LTD.D!V03CT.D!ASM.D!LTDPREFIX.S« 

TextFile

;-----------------------------------------------------------------------
;
;  PROJECT:          CD-DED
;
;  MODULE NAME:      LTU DRIVER (LTD)
;  MODULE ID NMB:    CD/2010
;  MODULE TYPE:      PREFIX
;  MODULE FILES:     XXXX
;  PREFIX FILES:     NONE
;  SPECIFICATIONS:   CD-DED/PSP/0002
;                    DCN 1 , 840410
;  AUTHOR/DATE:      SR/840822
;
;  DELIVERABLE:      YES
;  SOURCE LANGUAGE:  CR80 ASSEMBLER
;  COMPILE COMPUTER: CR80 M
;  TARGET COMPUTER:  CR80 M/CR80 MX
;  OPER. SYSTEM:     XAMOS/MXAMOS
;
;-----------------------------------------------------------------------
;
;  CHANGE RECORD
;
;  VERSION     AUTHOR/DATE            DESCRIPTION OF CHANGE
;  -------     -----------            ---------------------
;   0101       SR/840410              INITIAL SUBMITTAL TO CD_SCL
;   0201       SR/840520              Syntax error corrected
;                                     CCLTU_DEF error code added
;   0301       SR/840822         (1)  Comments field of RLTUBUF error code
;                                     changed
;                                (2)  USUBQCNT added
;                                (3)  CCSUBQCNT error code added
;
;-----------------------------------------------------------------------
USE BASE
MESSAGE <:LTD INTERFACE V0301 840822:>

OCSTRT:=       #80          ;   First opcode
SUBOPSTRT:=    #B0          ;   First sub opcode
ERRCDESTRT:=   #40          ;   First error code
USUBQCNT:=     #2           ;   Min no. of subqueues required by the
                            ;   LTD in the user input queues
                            ;
;---------------------------------------------------------------------
;OPCODES (USER -> LTD)
;---------------------------------------------------------------------
                            ;
LHOPEN:=       OCSTRT+1     ;   Open LTD channel
LHBOOT:=       OCSTRT+2     ;   Bootload LTU
LHCNLTU:=      OCSTRT+3     ;   Configure LTU
LHCNCH:=       OCSTRT+4     ;   Configure channel
LHCXFR:=       OCSTRT+5     ;   Control/Status output (to protocol)

;         C/S Specifiers in LHCXFR
;         ========================

SCOPEN:= 1                  ;   Open
SCCMD:=  2                  ;   Command
SCRSTA:= 3                  ;   Report status request
SCRSET:= 4                  ;   Reset
SCCLOSE:=5                  ;   Close
SCIREQ:= 6                  ;   Input request single
SCCNIR:= 7                  ;   Cancel input request
SCCNOP:= 8                  ;   Cancel output

LHDXFR:=       OCSTRT+6     ;   Data transfer (output)
LHDBG:=        OCSTRT+7     ;   Debug command

;         DEBUG sub-command codes
;         =======================

SCTST:=  SUBOPSTRT+9        ;   Set test mode
SCDUMP:= SUBOPSTRT+#0A      ;   Dump
SCMOD:=  SUBOPSTRT+#0B      ;   Modify
SCFILP:= SUBOPSTRT+#0C      ;   Fill pattern
SCHALT:= SUBOPSTRT+#0D      ;   Halt
SCGO:=   SUBOPSTRT+#0E      ;   Go
SCREG:=  SUBOPSTRT+#0F      ;   Display registers
SCRTRV:= SUBOPSTRT+#10      ;   Retreive from queue
SCSNTQ:= SUBOPSTRT+#11      ;   Send to queue
SCRTST:= SUBOPSTRT+#12      ;   Reset test mode

LHGTST:=       OCSTRT+8     ;   Get LTU status
LHCLS:=        OCSTRT+9     ;   Close channel

;---------------------------------------------------------------------
;OPCODES (LTD --> USER)
;---------------------------------------------------------------------

LHOPRS:=       OCSTRT+#0A   ;   Open channel response
LDBOOT:=       OCSTRT+#0B   ;   Boot response
LCLTURS:=      OCSTRT+#0C   ;   Configure LTU response
LHCFRS:=       OCSTRT+#0D   ;   Configure channel response
LDCINP:=       OCSTRT+#0E   ;   Control/status input (from protocol)

;         C/S Specifiers in LDCINP
;         ========================

SCOPSTA:=1                  ;   Open status
SCCMSTA:=2                  ;   Command status
SCCHSTA:=3                  ;   Channel status
SCCLSTA:=5                  ;   Close status
SCRXSTA:=7                  ;   RX status
SCTXSTA:=8                  ;   TX status
SCINTR:= 9                  ;   Interrupt

LDDINP:=       OCSTRT+#0F   ;   Data input
LHDBRS:=       OCSTRT+#10   ;   Debug response

;         DEBUG sub-command codes
;         =======================

SCBPTDP:=SUBOPSTRT+#1A      ;   Break point register dump
SCMOLTO:=SUBOPSTRT+#1B      ;   MOLTO dump

LHSTRS:=       OCSTRT+#11   ;   LTU status response
LHCLSRS:=      OCSTRT+#12   ;   Close channel response
LDLERR:=       OCSTRT+#13   ;   LTD error reports

;---------------------------------------------------------------------
;OPCODES (BSCS -> LTD)
;---------------------------------------------------------------------

BCOPENLTU:=    OCSTRT+#17   ;   OPEN LTU Command
BCCLEANLTU:=   OCSTRT+#18   ;   CLEAN LTU Command
BCCLOSELTU:=   OCSTRT+#19   ;   CLOSE LTU Command

;---------------------------------------------------------------------
;OPCODES (LTD -> BSCS)
;---------------------------------------------------------------------

BCLTUFAIL:=    OCSTRT+#1A   ;   LTU Failure notification
BROPENLTU:=    OCSTRT+#1B   ;   OPEN LTU Response
BRCLEANLTU:=   OCSTRT+#1C   ;   CLEAN LTU Response
BRCLOSELTU:=   OCSTRT+#1D   ;   CLOSE LTU Response
                            ;
;---------------------------------------------------------------------
;ERROR CODES
;---------------------------------------------------------------------

;Error codes returned in LTD error report BCLTUFAIL
;==================================================

RLTUCNT:= ERRCDESTRT+1      ;   LTU alive-counter stopped
RLTULIA:= ERRCDESTRT+2      ;   Line interface adapter disconnected
RLTUTIM:= ERRCDESTRT+3      ;   LTU I/O timeout ('removed')
RLTUQUE:= ERRCDESTRT+4      ;   LTU interface queue inaccessable
RLTUBUF:= ERRCDESTRT+5      ;   Invalid buffer address in LTU/
                            ;   LTU buffer size < 3 bytes
RLBDISC:= ERRCDESTRT+6      ;   LTU bank disconnected

;Error codes returned in LTD error report LDLERR
;===============================================

RUSERR:=  ERRCDESTRT+7      ;   Parameter error in USER command

;sub error codes returned along with RUSERR
;==========================================

UOPCDE:=  ERRCDESTRT+8      ;   Invalid OPCODE/sub OPCODE in the
UPARM:=   ERRCDESTRT+9      ;   Invalid parameters in the LTD com-
ULTUCON:= ERRCDESTRT+#0A    ;   LTU not configured ('Configure LTU'
UCHCON:=  ERRCDESTRT+#0B    ;   LTD channel not configured ('Configure
UTSTNA:=  ERRCDESTRT+#0C    ;   TEST mode not active (given when debug
UCONERR:= ERRCDESTRT+#0D    ;   Channel already configured (given
UIFCHLMT:=ERRCDESTRT+#0E    ;   I/F Channel limit exceeded
UCSERR:=  ERRCDESTRT+#0F    ;   Unable to deliver c/s pkts through ch.0
UILTUERR:=ERRCDESTRT+#10    ;   LTU already initialised

;Completion codes returned in LTD responses
;==========================================

CCSUCC:=  0                 ;    Sucessful
CCSUBQCNT:=ERRCDESTRT+#11   ;    Too few sub queues in the LTD USER
                            ;    input queue
CCPERR:=  ERRCDESTRT+#15    ;    Parameter error
CCOTHR:=  ERRCDESTRT+#16    ;    Other errors
CCIQACC:= ERRCDESTRT+#17    ;    Input queue access error
CCCHLMT:= ERRCDESTRT+#18    ;    LTD channel limit
CCLTULMT:=ERRCDESTRT+#19    ;    LTU limit exceeded
CCOQERR:= ERRCDESTRT+#1A    ;    Output queue creation error
CCLTU_DEF:= ERRCDESTRT+#1B  ;    Unknown LTU (RU_ID Unknown to LTD)

;Completion codes in 'Debug response'
;==================================

CCNTLD:= ERRCDESTRT+#1C     ;    DEBUG support F/W not loaded
CCACT:=  ERRCDESTRT+#1D     ;    Debug support F/W already active
CCNACT:= ERRCDESTRT+#1E     ;    Debug support F/W not activated
CCQEMT:= ERRCDESTRT+#1F     ;    Queue specified empty
CCBEMT:= ERRCDESTRT+#20     ;    Buffer retreived empty
CCQACC:= ERRCDESTRT+#21     ;    Queue access failed
CCBFLL:= ERRCDESTRT+#22     ;    Buffer retreived not empty
;
;Flags field in LHCNCH (Configure channel cmd)
;=============================================
;
BDTHRPBUF:= 0               ;    Throughput buffer option
BDBUSYSUPP:=1               ;    TX busy support option
;FF«ff» «a5»