C source code to extract CP/M ARK archives?

From: Tom Jennings <tomj_at_wps.com>
Date: Thu Feb 3 15:31:29 2005

>> A google search turned up a document that is claimed to give
>> the technical details of the CP/M .ARC and .ARK formats, but
>> the file itself is in a .ARK archive.

On Thu, 3 Feb 2005, Vintage Computer Festival wrote:

> Oh, that's clever. I suppose the guy who did that also keeps his
> passwords in a password protected file?

That is indeed brilliant.

BTW, freebsd comes with cpmemu, that runs (emulates) CP/M-80 (and
z80) code in an xterm. Does everything but hardware I/O. You can
give it a BIOS/BDOS and it'll talk to attached floppy drives.

It gets upset at some Z80 instructions and some BDOS calls.


tomj_at_fiche:~/CPM cpmemu

A0>dir
A: MBASIC .COM : DEFF .CRL : CLIB .COM : STAT .COM : CLINK .COM
A: CPMFILES.C : DIAG .REL : CPMLIB .C : CTYPE .H : DASH .C
A: FOO .BAS : DEFF2 .CRL : DIAG .ASM : DIAG .COM : DISKED .C
A: DISK .COM : M .COM : DISKED .DOC : GO .COM : MP .COM
A: TEST .CRL : MP .HLP : SC .COM : MP .OVR : PIP .COM
A: SID .COM : STDIO .H : CC2 .COM : TELINK .H : TELINK .COM
A: C .CCC : TEST .C : CC1 .COM
A0>cc1 test.c
BD Software C Compiler v1.46 (part I)
   42K elbowroom
BD Software C Compiler v1.46 (part II)
   37K to spare

A0>mbasic foo.bas
BASIC-80 Rev. 5.22
1ATTACHE00tm VER. 1.5
[CP/M Version]
Copyright 1977-1982 (C) by Microsoft
35396 Bytes free
hello stupid mbasic world
foo foo foo foo foo foo foo foo foo foo
Ok
list
10 PRINT "hello stupid mbasic world"
20 FOR I= 1 TO 10
30 PRINT "foo ";
40 NEXT I
Ok
quit
Syntax error
Ok
system

A0>sid
SID VERS 1.4
#l0
   0000 JMP FE03
   0003 ADD B
   0004 NOP
   0005 JMP D800
   0008 MOV B,C
   0009 MOV B,D
   000A NOP
   000B HLT
   000C HLT
   000D HLT
   000E HLT
#ld800
   D800 JMP DEA4
   D803 NOP
   D804 NOP
   D805 NOP
   D806 JMP DB4F
   D809 JMP DD24
   D80C INR C
   D80D RC
   D80E RST 07
   D80F RST 07
   D810 LXI B,2B70
#^C

A0>stat a:


Unrecognized BDOS-Function:
AF=4200 BC=001f DE=0000 HL=0000 SP=1546
Stack = 1455 586 5b6 5da db9 1432 47d 1a1a

[[[[[normal exit is...]]]]]

A0>unix
Cp/M BIOS COLDBOOT takes you back to FreeBSD
tomj_at_fiche:~/CPM
Received on Thu Feb 03 2005 - 15:31:29 GMT