-
Notifications
You must be signed in to change notification settings - Fork 2
/
Z80Dasm.c
117 lines (112 loc) · 2.94 KB
/
Z80Dasm.c
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
/*** Z80Em: Portable Z80 emulator *******************************************/
/*** ***/
/*** z80dasm.c ***/
/*** ***/
/*** This file contains a portable Z80 disassembler ***/
/*** ***/
/*** Copyright (C) Marcel de Kogel 1996,1997 ***/
/*** You are not allowed to distribute this software commercially ***/
/*** Please, notify me, if you make any changes to this file ***/
/****************************************************************************/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include "Z80Dasm.h"
static char *Options[]=
{
"begin","end","offset",NULL
};
static void usage (void)
{
printf ("Usage: z80dasm [options] <filename>\n"
"Available options are:\n"
" -begin - Specify begin offset in file to disassemble [0]\n"
" -end - Specify end offset in file to disassemble [none]\n"
" -offset - Specify address to load program [0]\n"
"All values should be entered in hexadecimal\n");
exit (1);
}
int main (int argc,char *argv[])
{
int i,j,n;
char *filename=NULL,buf[20];
unsigned char *filebuf;
FILE *f;
unsigned begin=0,end=(unsigned)-1,offset=0,filelen,len,pc;
printf ("z80dasm: Portable Z80 disassembler\n"
"Copyright (C) Marcel de Kogel 1996,1997\n");
for (i=1,n=0;i<argc;++i)
{
if (argv[i][0]!='-')
{
switch (++n)
{
case 1: filename=argv[i];
break;
default: usage();
}
}
else
{
for (j=0;Options[j];++j)
if (!strcmp(argv[i]+1,Options[j])) break;
switch (j)
{
case 0: ++i; if (i>argc) usage();
begin=strtoul(argv[i],NULL,16);
break;
case 1: ++i; if (i>argc) usage();
end=strtoul(argv[i],NULL,16);
break;
case 2: ++i; if (i>argc) usage();
offset=strtoul(argv[i],NULL,16);
break;
default: usage();
}
}
}
if (!filename)
{
usage();
return 1;
}
f=fopen (filename,"rb");
if (!f)
{
printf ("Unable to open %s\n",filename);
return 2;
}
fseek (f,0,SEEK_END);
filelen=ftell (f);
fseek (f,begin,SEEK_SET);
len=(filelen>end)? (end-begin+1):(filelen-begin);
filebuf=malloc(len+16);
if (!filebuf)
{
printf ("Memory allocation error\n");
fclose (f);
return 3;
}
memset (filebuf,0,len+16);
if (fread(filebuf,1,len,f)!=len)
{
printf ("Read error\n");
fclose (f);
free (filebuf);
return 4;
}
fclose (f);
pc=0;
while (pc<len)
{
i=Z80_Dasm (filebuf+pc,buf,pc+offset);
for (j=strlen(buf);j<19;++j) buf[j]=' ';
buf[19]='\0';
printf (" %s ; %06X ",buf,pc+offset);
for (j=0;j<i;++j) printf("%02X ",filebuf[pc+j]);
printf ("\n");
pc+=i;
}
free (filebuf);
return 0;
}