DataMuseum.dkPresents historical artifacts from the history of: CR80 Hard and Floppy Disks |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about CR80 Hard and Floppy Disks Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3938 (0xf62) Types: TextFile Names: »CRAM_IO_PARAMS.S«
└─⟦8c095a7f3⟧ Bits:30005798 CR80 Disc Pack ( Vol ILS systemdisk XAMOS TOS 10:01 hard boot #43c 19-7-87/JFJ ) └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FILE.D!FMS.D!ALTFMS.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FILE.D!FMS.D!FILSYS.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FILE.D!FMS.D!MY_SYSTEM.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FILE.D!FMS.D!QUATTRO_MUX.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FILE.D!FMS.D!SINGLE.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FMS.D!ALTFMS.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FMS.D!FILSYS.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FMS.D!MY_SYSTEM.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FMS.D!QUATTRO_MUX.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FMS.D!SINGLE.D!GENS.D!CRAM_IO_PARAMS.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⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FILE.D!FMS.D!ALTFMS.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FILE.D!FMS.D!FILSYS.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FILE.D!FMS.D!MY_SYSTEM.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FILE.D!FMS.D!QUATTRO_MUX.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FILE.D!FMS.D!SINGLE.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FMS.D!ALTFMS.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FMS.D!FILSYS.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FMS.D!MY_SYSTEM.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FMS.D!QUATTRO_MUX.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »SYSTEMS.D!XAMOS.D!GEN850501.D!FMS.D!SINGLE.D!GENS.D!CRAM_IO_PARAMS.S« └─⟦e0c43619c⟧ Bits:30005797 CR80 Disc pack ( Vol:FNJ1 861029/EC CR80 S/W Package II+III+IV+V+VII ) └─ ⟦this⟧ »CSP005_V0501.D!CSS920.D!LINK.D!ERP_SINGLE.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »CSP005_V0501.D!CSS920.D!LINK.D!MX.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »CSP005_V0501.D!CSS920.D!LINK.D!MX_CRAM.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »CSP005_V0501.D!CSS920.D!LINK.D!MX_DMA.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »CSP005_V0501.D!CSS920.D!LINK.D!MY_SYSTEM.D!GENS.D!CRAM_IO_PARAMS.S« └─ ⟦this⟧ »CSP005_V0501.D!CSS920.D!LINK.D!SINGLE.D!GENS.D!CRAM_IO_PARAMS.S«
"PAGE«ff» CONST "SEARCH MODES: " "--------------" LE = 0; LT = 1; LTGTBIT = 0; GE = 2; GEGTBIT = 1; GT = 3; EQ = 4; EQBIT = 2; TYPE SEARCH_MODE = LE..EQ; " CRAM RETURN VALUES: " ================== CONST USER_ER = #480; " = (user_err_type shiftll err_type_posn); " CRAM_OK = 0; " * * * S U C C E S S F U L L * * * CRAM_RECORD_SIZE = USER_ER+ 1; " RECORD SIZE WARNING " CRAM_PURGING = USER_ER+ 2; " INCOMPLETE PURGING WARNING " CRAM_KEY_TOO_BIG = USER_ER+ 3; " CRAM_RECORD_TOO_BIG = USER_ER+ 4; " CRAM_NO_RECORD = USER_ER+ 5; " CRAM_RECORD_EXIST = USER_ER+ 6; " CRAM_DIRECTION = USER_ER+ 7; " DIRECTION <> (LT,LE,EQ,GE,GT) CRAM_EOF = USER_ER+ 8; " END OF FILE/SUBFILE CRAM_FULL = USER_ER+ 9; " CRAM_SUBFILE_EXIST = USER_ER+10; " CRAM_NO_SUBFILE = USER_ER+11; " CRAM_ALREADY_OPEN = USER_ER+12; " CRAM_DBCB_UNKNOWN = USER_ER+13; " CRAM_DBCB_IN_USE = USER_ER+14; " CRAM_NOT_OPEN = USER_ER+15; " CRAM_FLAG_INVALID = USER_ER+16; " CRAM_DBCB_MISMATCH = USER_ER+17; " ATTEMPT TO USE SHARED HANDLER CRAM_ILLEGAL_BLOCKSIZE = USER_ER+18; " CRAM_ILLEGAL_DB_FILE = USER_ER+19; " CRAM_COMMAND_UNKNOWN = USER_ER+20; " CRAM_CAP_POOL_EMPTY = USER_ER+21; " CRAM_DMA_ERROR = USER_ER+22; " CRAM_DB_INVALID = USER_ER+23; " AFTER CRAMERROR CALL "PAGE«ff» " CRAM OPERATIONS: " =============== CRAMOP = 100; " FIRST CRAM OP CRAMINIT = CRAMOP+ 0; CRAMTQMOPEN = CRAMOP+ 1; CRAMNEWOPEN = CRAMOP+ 2; CRAMTQMLOCK = CRAMOP+ 3; CRAMNEWLOCK = CRAMOP+ 4; CRAMREAD = CRAMOP+ 5; CRAMUPDATE = CRAMOP+ 6; CRAMCREATE = CRAMOP+ 7; CRAMDELETE = CRAMOP+ 8; CRAMPURGE = CRAMOP+ 9; CRAMCREATESUBFILE = CRAMOP+10; CRAMDELETESUBFILE = CRAMOP+11; CRAMOPENSUBFILE = CRAMOP+12; CRAMCLOSESUBFILE = CRAMOP+13; " !!!!NB!!!! FMS DISMANTLE USED FOR PROPER CLOSING " CRAMLOOKUPSUBFILE = CRAMOP+14; CRAMFORGET = CRAMOP+15; CRAMBEGINLOCK = CRAMOP+16; CRAMTQMVERSION = CRAMOP+17; CRAMNEWVERSION = CRAMOP+18; CRAMCLOSE = CRAMOP+19; " DISCONNECT DBCB FROM FCB CRAMLASTOP = CRAMCLOSE; CRAMOPENOP = CRAMNEWOPEN+1; "TOP OF OPEN/INIT OPERATIONS CRAMFIRSTKEYOP = CRAMREAD; "FIRST OPERATION USING KEY CRAMSUBFILEOP = CRAMCREATESUBFILE; "FIRST SUBFILE OPERATION CRAMLASTKEYOP = CRAMLOOKUPSUBFILE; "LAST OPERATION USING KEY " COMMAND HEADER FOR CRAM FUNCTIONS TYPE CRAM_HEAD = RECORD COMMAND_TYPE: INTEGER; USER_ID: LONG; FILE_ID: INTEGER; DIRECTION: INTEGER; KEY_SIZE: INTEGER; MIN_KEY_SIZE: INTEGER; REC_SIZE: INTEGER; RESERVED: INTEGER; END; "PAGE«ff» " CRAM DATA SPECIFICATION TYPE DATA_SPEC = RECORD DIRECTION: SEARCH_MODE; KEY_SIZE: INTEGER; ACT_KEY_SIZE: INTEGER; KEY_ADDR: INTEGER; REC_SIZE: INTEGER; ACT_REC_SIZE: INTEGER; REC_ADDR: INTEGER; END; " CRAM SUBFILE SPECIFICATION TYPE SUBFILE_REC = RECORD KEY_SIZE: INTEGER; REC_SIZE: INTEGER; CREATE_DATE: INTEGER; DUMMY: INTEGER; END; TYPE SUBFILE_SPEC = RECORD SUBFILE_NAME: ARRAY [0..2] OF INTEGER; SUBFILE_REC: SUBFILE_REC; END;