Re: undump tool (was: Re: Base85 for DOS

On Sun, 25 Aug 2024 09:37:16 +0100, Kerr-Mudd, John wrote:

 
Snipped dreadful old code;
Try this instead:
 
->          d 100 l7B
1639:0100 B4 3F B5 FD-BA C3 01 CD-21 91 E3 F9-89 D7 89 D6  .?......!.......
1639:0110 57 81 3D 2D-64 74 06 B0-3E F2 AE E3-4F B0 0A F2  W.=-dt..>...O...
1639:0120 AE E3 22 B0-20 F2 AE 8A-05 47 3C 30-72 24 24 4F  ..". ....G<0r$$O
1639:0130 D4 37 88 C2-8A 05 47 24-4F D4 37 88-D4 D5 10 88  .7....G$O.7.....
1639:0140 04 46 49 E2-E2 5A 89 F1-29 D1 43 B4-40 CD 21 4B  .FI..Z..).C.@.!K
1639:0150 EB AE 3C 20-75 ED 38 05-74 C3 EB E7-4E 6F 74 20  ..< u.8.t...Not
1639:0160 61 20 64 62-67 20 66 69-6C 65 0D 0A-5A B9 10 00  a dbg file..Z...
1639:0170 51 89 D7-BE 5C 01 F3-A4 59 EB CF                 Q...\...Y..
->          q
 
Silly me- you'll need in hex format!
 
B43FB5FD BAC301CD 2191E3F9 89D789D6 57813D2D 647406B0 3EF2AEE3 4FB00AF2
AEE322B0 20F2AE8A 05473C30 7224244F D43788C2 8A054724 4FD43788 D4D51088
044649E2 E25A89F1 29D143B4 40CD214B EBAE3C20 75ED3805 74C3EBE7 4E6F7420
61206462 67206669 6C650D0A 5AB91000 5189D7BE 5C01F3A4 59EBCF
 
(Will give incorrect results if given a nondump input file containing '>')

Uh... I think you're rushing it.
The generated binary from the XXD-R DEBUG dump should be 234 bytes.
Below is the output. D2B is the binary from the above converted hex codes.

C:\>dir d2*

 Volume in drive C is C_DRIVE
 Volume Serial Number is 49D7-AF21
 Directory of C:\

D2B      COM                123 08/25/2024  3:47p
    1 File(s)               123 Bytes
    0 Dir(s)    748,778,061,824 Bytes free

C:\>type xxd.txt
1638:0100 BA 93 01 81-3E 82 00 2D-68 74 65 31-DB BE EA 41  ....>..-hte1...A
1638:0110 56 BA 00 02-53 31 DB 89-D7 B9 00 40-B4 3F CD 21  V...S1.....@.?.!
1638:0120 5B 91 E3 55-81 FE EA 41-75 0E B0 2D-AE 74 04 B0  [..U...Au..-.t..
1638:0130 3E F2 AE 80-3D 64 75 35-B0 3A F2 AE-75 D6 B0 20  >...=du5.:..u..
1638:0140 F2 AE 75 D0-87 F7 B3 32-AC 3C 30 72-0F 24 4F D4  ..u....2.<0r.$O.
1638:0150 37 80 F2 01-75 05 4F 8A-25 D5 10 AA-4B 74 04 E2  7...u.O.%...Kt..
1638:0160 E7 EB B1 87-F7 B0 0A F2-AE 75 A9 EB-CB BA 85 01  .........u......
1638:0170 B4 09 CD 21-B8 01 4C CD-21 B3 01 5A-89 F1 29 D1  ...!..L.!..Z..).
1638:0180 B4 40 CD 21-C3 4E 6F 74-20 64 62 67-20 64 75 6D  .@.!.Not dbg dum
1638:0190 70 0D 0A 55-73 61 67 65-20 69 73 3A-20 78 78 64  p..Usage is: xxd
1638:01A0 2D 72 3C 64-62 67 66 69-6C 65 3E 63-6F 6D 66 69  -r<dbgfile>comfi
1638:01B0 6C 65 0D 0A-64 62 67 66-69 6C 65 3A-20 67 72 64  le..dbgfile: grd
1638:01C0 62 2F 4D 53-20 64 65 62-75 67 20 22-64 22 75 6D  b/MS debug "d"um
1638:01D0 70 63 2E 4D-4A 20 32 30-31 38 20 4C-47 50 4C 20  pc.MJ 2018 LGPL
1638:01E0 6C 69-63 65 6E 73-65 0D 0A 24                    license..$

C:\>d2b < xxd.txt > out.com

C:\>dir out.com

 Volume in drive C is C_DRIVE
 Volume Serial Number is 49D7-AF21
 Directory of C:\

OUT      COM              1,212 08/25/2024  3:50p
    1 File(s)             1,212 Bytes
    0 Dir(s)    748,778,061,824 Bytes free