![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to newcpu.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [UNIX Amiga Emulator] / uae / src / include|
Return to newcpu.h CVS log | Up to [UNIX Amiga Emulator] / uae / src / include |
1.1.1.3 root 1: /*
1.1 root 2: * UAE - The Un*x Amiga Emulator
1.1.1.3 root 3: *
1.1 root 4: * MC68000 emulation
5: *
6: * Copyright 1995 Bernd Schmidt
7: */
8:
1.1.1.10! root 9: #include "readcpu.h"
! 10: #include "machdep/m68k.h"
1.1.1.6 root 11:
12: #ifndef SET_CFLG
13:
14: #define SET_CFLG(x) (CFLG = (x))
15: #define SET_NFLG(x) (NFLG = (x))
16: #define SET_VFLG(x) (VFLG = (x))
17: #define SET_ZFLG(x) (ZFLG = (x))
18: #define SET_XFLG(x) (XFLG = (x))
19:
20: #define GET_CFLG CFLG
21: #define GET_NFLG NFLG
22: #define GET_VFLG VFLG
23: #define GET_ZFLG ZFLG
24: #define GET_XFLG XFLG
25:
26: #define CLEAR_CZNV do { \
27: SET_CFLG (0); \
28: SET_ZFLG (0); \
29: SET_NFLG (0); \
30: SET_VFLG (0); \
1.1.1.7 root 31: } while (0)
1.1.1.6 root 32:
33: #define COPY_CARRY (SET_XFLG (GET_CFLG))
34: #endif
35:
1.1 root 36: extern int areg_byteinc[];
37: extern int imm8_table[];
38:
39: extern int movem_index1[256];
40: extern int movem_index2[256];
41: extern int movem_next[256];
42:
43: extern int fpp_movem_index1[256];
44: extern int fpp_movem_index2[256];
45: extern int fpp_movem_next[256];
46:
47: extern int broken_in;
48:
1.1.1.4 root 49: typedef unsigned long cpuop_func (uae_u32) REGPARAM;
1.1 root 50:
51: struct cputbl {
52: cpuop_func *handler;
53: int specific;
1.1.1.3 root 54: uae_u16 opcode;
1.1 root 55: };
56:
1.1.1.4 root 57: extern unsigned long op_illg (uae_u32) REGPARAM;
1.1 root 58:
1.1.1.2 root 59: typedef char flagtype;
1.1 root 60:
1.1.1.3 root 61: extern struct regstruct
1.1 root 62: {
1.1.1.3 root 63: uae_u32 regs[16];
64: uaecptr usp,isp,msp;
65: uae_u16 sr;
1.1 root 66: flagtype t1;
67: flagtype t0;
68: flagtype s;
69: flagtype m;
70: flagtype x;
71: flagtype stopped;
72: int intmask;
1.1.1.3 root 73:
74: uae_u32 pc;
75: uae_u8 *pc_p;
76: uae_u8 *pc_oldp;
77:
78: uae_u32 vbr,sfc,dfc;
1.1 root 79:
80: double fp[8];
1.1.1.3 root 81: uae_u32 fpcr,fpsr,fpiar;
82:
83: uae_u32 spcflags;
84: uae_u32 kick_mask;
85:
86: /* Fellow sources say this is 4 longwords. That's impossible. It needs
87: * to be at least a longword. The HRM has some cryptic comment about two
88: * instructions being on the same longword boundary.
89: * The way this is implemented now seems like a good compromise.
90: */
91: uae_u32 prefetch;
1.1 root 92: } regs, lastint_regs;
93:
1.1.1.10! root 94: STATIC_INLINE void set_special (uae_u32 x)
! 95: {
! 96: regs.spcflags |= x;
! 97: }
! 98:
! 99: STATIC_INLINE void unset_special (uae_u32 x)
! 100: {
! 101: regs.spcflags &= ~x;
! 102: }
! 103:
1.1.1.2 root 104: #define m68k_dreg(r,num) ((r).regs[(num)])
1.1.1.4 root 105: #define m68k_areg(r,num) (((r).regs + 8)[(num)])
1.1 root 106:
1.1.1.3 root 107: #define get_ibyte(o) do_get_mem_byte((uae_u8 *)(regs.pc_p + (o) + 1))
108: #define get_iword(o) do_get_mem_word((uae_u16 *)(regs.pc_p + (o)))
109: #define get_ilong(o) do_get_mem_long((uae_u32 *)(regs.pc_p + (o)))
110:
1.1.1.7 root 111: STATIC_INLINE uae_u32 get_ibyte_prefetch (uae_s32 o)
1.1 root 112: {
1.1.1.3 root 113: if (o > 3 || o < 0)
114: return do_get_mem_byte((uae_u8 *)(regs.pc_p + o + 1));
115:
116: return do_get_mem_byte((uae_u8 *)(((uae_u8 *)®s.prefetch) + o + 1));
1.1.1.2 root 117: }
1.1.1.7 root 118: STATIC_INLINE uae_u32 get_iword_prefetch (uae_s32 o)
1.1.1.3 root 119: {
120: if (o > 3 || o < 0)
121: return do_get_mem_word((uae_u16 *)(regs.pc_p + o));
1.1.1.2 root 122:
1.1.1.3 root 123: return do_get_mem_word((uae_u16 *)(((uae_u8 *)®s.prefetch) + o));
124: }
1.1.1.7 root 125: STATIC_INLINE uae_u32 get_ilong_prefetch (uae_s32 o)
1.1.1.2 root 126: {
1.1.1.3 root 127: if (o > 3 || o < 0)
128: return do_get_mem_long((uae_u32 *)(regs.pc_p + o));
129: if (o == 0)
130: return do_get_mem_long(®s.prefetch);
131: return (do_get_mem_word (((uae_u16 *)®s.prefetch) + 1) << 16) | do_get_mem_word ((uae_u16 *)(regs.pc_p + 4));
1.1 root 132: }
133:
1.1.1.3 root 134: #define m68k_incpc(o) (regs.pc_p += (o))
135:
1.1.1.7 root 136: STATIC_INLINE void fill_prefetch_0 (void)
1.1 root 137: {
1.1.1.3 root 138: uae_u32 r;
139: #ifdef UNALIGNED_PROFITABLE
140: r = *(uae_u32 *)regs.pc_p;
141: regs.prefetch = r;
142: #else
143: r = do_get_mem_long ((uae_u32 *)regs.pc_p);
144: do_put_mem_long (®s.prefetch, r);
145: #endif
146: }
147:
148: #if 0
1.1.1.7 root 149: STATIC_INLINE void fill_prefetch_2 (void)
1.1.1.3 root 150: {
151: uae_u32 r = do_get_mem_long (®s.prefetch) << 16;
152: uae_u32 r2 = do_get_mem_word (((uae_u16 *)regs.pc_p) + 1);
153: r |= r2;
154: do_put_mem_long (®s.prefetch, r);
1.1 root 155: }
156: #else
1.1.1.3 root 157: #define fill_prefetch_2 fill_prefetch_0
158: #endif
1.1 root 159:
1.1.1.3 root 160: /* These are only used by the 68020/68881 code, and therefore don't
161: * need to handle prefetch. */
1.1.1.7 root 162: STATIC_INLINE uae_u32 next_ibyte (void)
1.1 root 163: {
1.1.1.4 root 164: uae_u32 r = get_ibyte (0);
165: m68k_incpc (2);
1.1.1.2 root 166: return r;
167: }
168:
1.1.1.7 root 169: STATIC_INLINE uae_u32 next_iword (void)
1.1.1.2 root 170: {
1.1.1.4 root 171: uae_u32 r = get_iword (0);
172: m68k_incpc (2);
1.1 root 173: return r;
174: }
175:
1.1.1.7 root 176: STATIC_INLINE uae_u32 next_ilong (void)
1.1 root 177: {
1.1.1.4 root 178: uae_u32 r = get_ilong (0);
179: m68k_incpc (4);
1.1 root 180: return r;
181: }
182:
1.1.1.4 root 183: #if !defined USE_COMPILER
1.1.1.7 root 184: STATIC_INLINE void m68k_setpc (uaecptr newpc)
1.1 root 185: {
186: regs.pc_p = regs.pc_oldp = get_real_address(newpc);
1.1.1.2 root 187: regs.pc = newpc;
1.1 root 188: }
189: #else
1.1.1.4 root 190: extern void m68k_setpc (uaecptr newpc);
1.1 root 191: #endif
192:
1.1.1.7 root 193: STATIC_INLINE uaecptr m68k_getpc (void)
1.1 root 194: {
195: return regs.pc + ((char *)regs.pc_p - (char *)regs.pc_oldp);
196: }
197:
1.1.1.7 root 198: STATIC_INLINE uaecptr m68k_getpc_p (uae_u8 *p)
1.1.1.4 root 199: {
200: return regs.pc + ((char *)p - (char *)regs.pc_oldp);
201: }
202:
1.1 root 203: #ifdef USE_COMPILER
1.1.1.4 root 204: extern void m68k_setpc_fast (uaecptr newpc);
205: extern void m68k_setpc_bcc (uaecptr newpc);
206: extern void m68k_setpc_rte (uaecptr newpc);
1.1 root 207: #else
208: #define m68k_setpc_fast m68k_setpc
209: #define m68k_setpc_bcc m68k_setpc
210: #define m68k_setpc_rte m68k_setpc
211: #endif
212:
1.1.1.7 root 213: STATIC_INLINE void m68k_setstopped (int stop)
1.1 root 214: {
215: regs.stopped = stop;
216: if (stop)
217: regs.spcflags |= SPCFLAG_STOP;
218: }
219:
1.1.1.5 root 220: extern uae_u32 get_disp_ea_020 (uae_u32 base, uae_u32 dp);
221: extern uae_u32 get_disp_ea_000 (uae_u32 base, uae_u32 dp);
1.1 root 222:
1.1.1.9 root 223: extern uae_s32 ShowEA (FILE *, int reg, amodes mode, wordsizes size, char *buf);
1.1.1.2 root 224:
1.1.1.4 root 225: extern void MakeSR (void);
226: extern void MakeFromSR (void);
227: extern void Exception (int, uaecptr);
228: extern void dump_counts (void);
1.1.1.8 root 229: extern int m68k_move2c (int, uae_u32 *);
230: extern int m68k_movec2 (int, uae_u32 *);
1.1.1.3 root 231: extern void m68k_divl (uae_u32, uae_u32, uae_u16, uaecptr);
232: extern void m68k_mull (uae_u32, uae_u32, uae_u16);
1.1 root 233: extern void init_m68k (void);
1.1.1.4 root 234: extern void m68k_go (int);
1.1.1.9 root 235: extern void m68k_dumpstate (FILE *, uaecptr *);
236: extern void m68k_disasm (FILE *, uaecptr, uaecptr *, int);
1.1.1.4 root 237: extern void m68k_reset (void);
1.1.1.2 root 238:
1.1.1.3 root 239: extern void mmu_op (uae_u32, uae_u16);
1.1.1.2 root 240:
1.1.1.3 root 241: extern void fpp_opp (uae_u32, uae_u16);
242: extern void fdbcc_opp (uae_u32, uae_u16);
243: extern void fscc_opp (uae_u32, uae_u16);
244: extern void ftrapcc_opp (uae_u32,uaecptr);
245: extern void fbcc_opp (uae_u32, uaecptr, uae_u32);
246: extern void fsave_opp (uae_u32);
247: extern void frestore_opp (uae_u32);
248:
249: /* Opcode of faulting instruction */
250: extern uae_u16 last_op_for_exception_3;
251: /* PC at fault time */
252: extern uaecptr last_addr_for_exception_3;
253: /* Address that generated the exception */
254: extern uaecptr last_fault_for_exception_3;
1.1 root 255:
1.1.1.2 root 256: #define CPU_OP_NAME(a) op ## a
257:
1.1.1.10! root 258: /* 68040 */
! 259: extern struct cputbl op_smalltbl_0_ff[];
1.1.1.3 root 260: /* 68020 + 68881 */
1.1.1.10! root 261: extern struct cputbl op_smalltbl_1_ff[];
1.1.1.3 root 262: /* 68020 */
1.1.1.10! root 263: extern struct cputbl op_smalltbl_2_ff[];
1.1.1.3 root 264: /* 68010 */
1.1.1.10! root 265: extern struct cputbl op_smalltbl_3_ff[];
1.1.1.3 root 266: /* 68000 */
1.1.1.10! root 267: extern struct cputbl op_smalltbl_4_ff[];
1.1.1.3 root 268: /* 68000 slow but compatible. */
1.1.1.10! root 269: extern struct cputbl op_smalltbl_5_ff[];
1.1.1.3 root 270:
271: extern cpuop_func *cpufunctbl[65536] ASM_SYM_FOR_FUNC ("cpufunctbl");
1.1.1.2 root 272:
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.