C source code to extract CP/M ARK archives?

[Tom Jennings]

>> 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