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
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
|
//
// This is temporary code, and should be removed when Insignia supplies rom
// support
//
/* x86 v1.0
*
* X86.H
* Constants, macros, and common types
* for the x86 emulator and related components
*
* History
* Created 19-Oct-90 by Jeff Parsons
* 17-Apr-91 by Dave Hastings trimmed for use in softpc (temprorary)
*
* COPYRIGHT NOTICE
* This source file may not be distributed, modified or incorporated into
* another product without prior approval from the author, Jeff Parsons.
* This file may be copied to designated servers and machines authorized to
* access those servers, but that does not imply any form of approval.
*/
#ifdef DOS
#define SIGNALS
#endif
#ifdef OS2_16
#define OS2
#define SIGNALS
#endif
#ifdef OS2_32
#define OS2
#define FLAT_32
#endif
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <malloc.h>
#include <process.h>
#ifdef WIN_16
#define WIN
#define API16
#endif
#ifdef WIN_32
#ifndef WIN
#define WIN
#endif
#define FLAT_32
#define TRUE_IF_WIN32 1
#define FIXHWND(h) ((HWND)((INT)(h) & 0x00ffffff))
#include <nt.h>
#include <ntrtl.h>
#include <nturtl.h>
#else
#define TRUE_IF_WIN32 0
#define FIXHWND(h) (h)
#endif
#ifdef FLAT_32
#ifndef i386
#define ALIGN_32
#else
#define NOALIGN_32
#endif
#endif
#ifdef WIN
#define _WINDOWS
#include <windows.h>
#endif
#ifdef SIGNALS
#include <conio.h>
#include <signal.h>
#endif
#ifdef OS2_32
#include <excpt.h>
#define XCPT_SIGNAL 0xC0010003
#endif
#define SIGHIT(flChk) ((iSigCheck++ & 0x7FF)?(flSignals & (flChk)):(kbhit(),(flSignals & (flChk))))
#ifndef CONST
#define CONST const
#endif
#ifndef CDECL
#define CDECL _cdecl
#endif
#ifndef PASCAL
#define PASCAL
#endif
#ifdef FLAT_32
#ifndef WIN
#define FAR
#endif
#define HUGE
#define HALLOC(n,s) malloc((n)*(s))
#define HLOCK(h) h
#define HUNLOCK(h) 0
#define HFREE(h) free(h)
#else
#ifndef WIN
#define FAR _far
#define HUGE _huge
#define HALLOC(n,s) halloc(n,s)
#define HLOCK(h) h
#define HUNLOCK(h) 0
#define HFREE(h) hfree(h)
#else
#define HUGE _huge
#define HALLOC(n,s) GlobalAlloc(GMEM_MOVEABLE|GMEM_ZEROINIT,(n)*(s))
#define HLOCK(h) (HPVOID)GlobalLock(h)
#define HUNLOCK(h) GlobalUnlock(h)
#define HFREE(h) GlobalFree(h)
#endif
#endif
#define BYTEOF(i,n) (((PBYTE)&(i))[n])
#define LOB(i) BYTEOF(i,0)
#define HIB(i) BYTEOF(i,1)
#define WORDOF(i,n) (((PWORD)&(i))[n])
#define LOW(l) WORDOF(l,0)
#define HIW(l) WORDOF(l,1)
#define INTOF(i,n) (((PINT)&(i))[n])
#define UINTOF(i,n) (((PUINT)&(i))[n])
#ifndef WIN
#define LOWORD(l) ((WORD)(l))
#define HIWORD(l) ((WORD)(((DWORD)(l) >> 16) & 0xFFFF))
#define LOBYTE(w) ((BYTE)(w))
#define HIBYTE(w) ((BYTE)(((WORD)(w) >> 8) & 0xFF))
#endif
#ifndef MAKEWORD
#define MAKEWORD(l,h) ((WORD)((BYTE)(l)|((BYTE)(h)<<8)))
#endif
#define MAKEDWORD(l0,h0,l1,h1) ((DWORD)MAKEWORD(l0,h0)|((DWORD)MAKEWORD(l1,h1)<<16))
#define GETBYTE(p) *((PBYTE)p)++
#define GETBYTEPTR(p) ((PBYTE)p)++
#define GETWORDPTR(pb) ((PWORD)pb)++
#define GETDWORDPTR(pb) ((PDWORD)pb)++
#ifndef ALIGN_32
#define GETWORD(pb) (*((PWORD)pb)++)
#define GETDWORD(pb) (*((PDWORD)pb)++)
#define FETCHWORD(s) ((WORD)(s))
#define FETCHDWORD(s) ((DWORD)(s))
#define STOREWORD(d,s) (WORD)d=(WORD)s
#define STOREDWORD(d,s) (DWORD)d=(DWORD)s
#else
#define GETWORD(pb) (pb+=2,MAKEWORD(*(pb-2),*(pb-1)))
#define GETDWORD(pb) (pb+=4,MAKEDWORD(*(pb-4),*(pb-3),*(pb-2),*(pb-1)))
#define FETCHWORD(s) MAKEWORD(LOB(s),HIB(s))
#define FETCHDWORD(s) MAKEDWORD(BYTEOF(s,0),BYTEOF(s,1),BYTEOF(s,2),BYTEOF(s,3))
#define STOREWORD(d,s) {BYTEOF(d,0)=LOBYTE(s);BYTEOF(d,1)=HIBYTE(s);}
#define STOREDWORD(d,s) {BYTEOF(d,0)=LOBYTE(LOWORD(s));BYTEOF(d,1)=HIBYTE(LOWORD(s));BYTEOF(d,2)=LOBYTE(HIWORD(s));BYTEOF(d,3)=HIBYTE(HIWORD(s));}
#endif
#define SWAP(x,y) {INT t; t=y; y=x; x=t;}
#define SWAPS(x,y) {SHORT t; t=y; y=x; x=t;}
#define SWAPL(x,y) {LONG t; t=y; y=x; x=t;}
#define SWAPBYTE(x,y) {BYTE t; t=y; y=x; x=t;}
#define SWAPWORD(x,y) {WORD t; t=FETCHWORD(y); STOREWORD(y,FETCHWORD(x)); STOREWORD(x,t);}
#define SWAPDWORD(x,y) {DWORD t; t=FETCHDWORD(y); STOREDWORD(y,FETCHDWORD(x)); STOREDWORD(x,t);}
#define NUMEL(a) ((sizeof a)/(sizeof a[0]))
#define SXBYTE(i) ((LONG)(SBYTE)(i))
#define SXWORD(i) ((LONG)(SHORT)(i))
#define SXSHORT(i) ((LONG)(SHORT)(i))
#define ZXBYTE(i) ((ULONG)(BYTE)(i))
#define ZXWORD(i) ((ULONG)(USHORT)(i))
#define ZXSHORT(i) ((ULONG)(USHORT)(i))
#define _Z2(m) ((m)&1?0:(m)&2?1:2)
#define _Z4(m) ((m)&3?_Z2(m):_Z2((m)>>2)+2)
#define _Z8(m) ((m)&15?_Z4(m):_Z4((m)>>4)+4)
#define _Z16(m) ((m)&255?_Z8(m):_Z8((m)>>8)+8)
#define _Z32(m) ((m)&65535?_Z16(m):_Z16((m)>>16)+16)
#define SHIFTLEFT(i,m) (((i)<<_Z32(m))&(m))
#define SHIFTRIGHT(i,m) (((i)&(m))>>_Z32(m))
#define OFFSETOF(t,f) ((INT)&(((t *)0)->f))
/* Universal constants
*/
#define K 1024L
#ifndef TRUE
#define TRUE 1
#define FALSE 0
#endif
#ifndef NULL
#define NULL 0
#endif
#define UNDEFINED -1
#define CTRL_A 1 // used by gets to repeat last line
#define CTRL_C 3 // break in debug window
#define CTRL_Q 17 // flow control
#define CTRL_S 19 // flow control
#define BELL 7 //
#define BS 8 // backspace
#define TAB 9 //
#define LF 10 // linefeed
#define CR 13 // return
#define ESCAPE 27 //
/* Program options
*/
#define OPT_FONT 0x0004 // use small OEM font if available (/s)
#define OPT_DOUBLE 0x0020 // use 50-line debug window w/small font (/50)
#define OPT_CAPS 0x0002 // map ctrl keys to caps-lock (/c)
#define OPT_TERMINAL 0x0010 // redirect all window output to terminal (/t)
#define OPT_FLUSH 0x0100 // flush prefetch after every jump (/f)
#define OPT_NOXLATE 0x0200 // disable built-in translations (/n)
#define OPT_DEBUG 0x0008 // shadow all log output on debug terminal (/d)
#define OPT_GO 0x0001 // do an initial "go" (/g)
/* Signal flags
*/
#define SIGNAL_BREAK 0x0001 // set whenever break has occurred
#define SIGNAL_UNWIND 0x0002 // set whenever unwind has occurred
#define SIGNAL_REBOOT 0x0004 // set whenever reboot has occurred
#define SIGNAL_RUN 0x0008 // set whenever emulator is "running"
#define SIGNAL_TRACE 0x0010 // set whenever debugger tracing
#define SIGNAL_BRKPT 0x0020 // set whenever debugger breakpoints enabled
#define SIGNAL_SSTEP 0x0040 // set whenever emulator single-step on
#undef SIG_IGN // fix broken definition in (old) signal.h
#define SIG_IGN (VOID (CDECL *)())1
/* Exec flags (for HostInput/GuestInput)
*/
#define EXEC_INPUT 0x0000 // wait for input
#define EXEC_GO 0x0001 // execute immediately
#define EXEC_FREEZE 0x0002 // execution frozen (guest only)
/* Standard types
*/
#ifndef WIN
typedef void VOID;
typedef unsigned char BYTE;
typedef unsigned short WORD; // confusing - use where 16-bit req. only
typedef unsigned long DWORD; // confusing - use where 32-bit req. only
typedef long LONG; // use where 32-bit req. only
typedef int BOOL;
#endif
typedef char CHAR;
typedef signed char SBYTE;
typedef short SHORT; // use where 16-bit req. only
typedef unsigned short USHORT; // use where 16-bit req. only
typedef int INT; // ints preferred
typedef unsigned int UINT; // ints preferred
typedef unsigned long ULONG; // use where 32-bit req. only
#ifndef WIN
typedef BYTE *PBYTE; // native pointers
typedef WORD *PWORD;
typedef DWORD *PDWORD;
typedef INT *PINT;
typedef LONG *PLONG;
typedef CHAR *PSTR;
#endif
typedef PBYTE *PPBYTE;
typedef PWORD *PPWORD;
typedef PDWORD *PPDWORD;
typedef CHAR SZ[];
typedef VOID *PVOID;
typedef CHAR *PCHAR;
typedef SHORT *PSHORT;
typedef USHORT *PUSHORT;
typedef PUSHORT *PPUSHORT;
typedef UINT *PUINT;
typedef ULONG *PULONG;
typedef PULONG *PPULONG;
typedef BOOL *PBOOL;
typedef CHAR *PSZ;
typedef PSZ *PPSZ;
typedef VOID FAR *FPVOID; // "far" (or "long" in Windows) pointers
typedef CHAR FAR *FPCHAR;
typedef BYTE FAR *FPBYTE;
typedef SHORT FAR *FPSHORT;
typedef USHORT FAR *FPUSHORT;
typedef LONG FAR *FPLONG;
typedef ULONG FAR *FPULONG;
typedef CHAR FAR *FPSTR;
typedef CHAR FAR *FPSZ;
typedef VOID HUGE *HPVOID; // "huge" pointers
typedef CHAR HUGE *HPCHAR;
typedef BYTE HUGE *HPBYTE;
typedef SHORT HUGE *HPSHORT;
typedef USHORT HUGE *HPUSHORT;
typedef LONG HUGE *HPLONG;
typedef ULONG HUGE *HPULONG;
typedef CHAR HUGE *HPSTR;
typedef CHAR HUGE *HPSZ;
#ifndef WIN
typedef HPVOID HANDLE;
#endif
#ifdef WIN
typedef INT (FAR PASCAL *INTPROC)(HWND, UINT, UINT, LONG);
#endif
#ifdef WIN_16
typedef LONG (FAR PASCAL *WNDPROC)(HWND, WORD, UINT, LONG);
#endif
/* Global data
*/
extern FILE *hfLog;
extern INT flOptions; // command-line options (see OPT_*)
extern INT flSignals; // signal flags (see SIGNAL_*)
extern INT iSigCheck; // counter indicating when to make next check
extern INT iSigLevel; // counter indicating whether to take default action
extern INT iLogLevel; // logging level; 0 implies none
extern BOOL fReinit; // set once first initialization has completed
/* String macros
*/
#define STRSKIP(psz,sz) psz += strspn(psz, sz)
#define STRSKIPTO(psz,sz) psz += strcspn(psz, sz)
#define STRSKIPNEXT(psz,sz) psz += strspn(psz+=strcspn(psz, sz), sz)
#define ATOI(psz) (INT)szTOul(psz, 10, -1)
/* Logging macros
*/
#define IFLOG(l) if (l==iLogLevel && (iLogLevel&1) || l<=iLogLevel && !(iLogLevel&1))
#define OPENLOG() (hfLog?hfLog:(hfLog=fopen("log", "w")))
#define APPENDLOG() (hfLog?hfLog:(hfLog=fopen("log", "a")))
#define CLOSELOG() if (hfLog) {fclose(hfLog); hfLog=NULL;}
#ifdef NOLOG
#define LOG(l,args)
#else
#define LOG(l,args) IFLOG(l) logprintf args; else
#endif
/* Debugging macros
*/
#define MODNAME(module) static char szModule[] = __FILE__
#define X86ERROR() terminate(ERR_ASSERT, szModule, __LINE__)
#ifdef DEBUG
#define STATIC
#define INT3() _asm int 3
#define IFDEBUG(f) if (f)
#define ELSEDEBUG else
#define LOGDEBUG(l,args) LOG(l,args)
#define X86ASSERT(exp) if (!(exp)) X86ERROR()
#else
#define STATIC static
#define INT3()
#define IFDEBUG(f)
#define ELSEDEBUG
#define LOGDEBUG(l,args)
#define X86ASSERT(exp)
#endif // DEBUG
/* Other common local include files
*/
#ifdef X86
#include "xerr.h"
#include "xlib.h"
#endif
/* Windows goop
*/
#define SZ_APP "x86"
#define SZ_TITLE "x86 emulator v0.17"
#define SZ_AUTHOR "by Jeff Parsons, (C) 1991"
#define SZ_PCTITLE "x86 pc"
#define IDM_DBBRK 100
#define IDM_ABOUT 101
/* Standard color definitions
*/
#define CLR_BLACK 0x00000000
#define CLR_RED 0x007F0000
#define CLR_GREEN 0x00007F00
#define CLR_BROWN 0x007F7F00
#define CLR_BLUE 0x0000007F
#define CLR_MAGENTA 0x007F007F
#define CLR_CYAN 0x00007F7F
#define CLR_LT_GRAY 0x00BFBFBF
#define CLR_DK_GRAY 0x007F7F7F
#define CLR_BR_RED 0x00FF0000
#define CLR_BR_GREEN 0x0000FF00
#define CLR_YELLOW 0x00FFFF00
#define CLR_BR_BLUE 0x000000FF
#define CLR_BR_MAGENTA 0x00FF00FF
#define CLR_BR_CYAN 0x0000FFFF
#define CLR_WHITE 0x00FFFFFF
extern HANDLE hHostInstance;
|
