~ubuntu-branches/ubuntu/karmic/e-uae/karmic

« back to all changes in this revision

Viewing changes to src/enforcer.c

Committer: Bazaar Package Importer
Author(s): Stephan Suerken
Date: 2008-07-05 14:02:02 UTC
Revision ID: james.westby@ubuntu.com-20080705140202-u5aagnhtg31pmjc3

Tags: upstream-0.8.29-WIP4

Import upstream version 0.8.29-WIP4

files added:

CHANGES

COPYING

ChangeLog

Makefile.am

Makefile.in

README

aclocal.m4

amiga

amiga/source

amiga/source/Makefile.gcc

amiga/source/mhint.asm

amiga/source/mousehack.c

amiga/source/timehack.c

amiga/source/transdisk.c

amiga/source/transrom.c

amiga/source/uae-configuration.c

amiga/source/uae-configuration.s

amiga/source/uae-control.c

amiga/source/uae-control.h

amiga/source/uae_pragmas.h

amiga/source/uae_rcli.c

amiga/source/uaectrl.c

bootstrap.sh

config.guess

config.sub

configure

configure.in

depcomp

docs

docs/bsdsocket.txt

docs/cmd-line.txt

docs/compiling.txt

docs/configuration.txt

docs/floppies.txt

docs/joystick.txt

docs/keyboard.txt

docs/scsi.txt

install-sh

m4/ac_var_timezone_externals.m4

m4/acx_pthread.m4

m4/as-objc.m4

m4/check_zlib.m4

m4/fsusage.m4

m4/gtk-2.0.m4

m4/gtk.m4

m4/sdl.m4

m4/type_socklen_t.m4

m4/uintmax_t.m4

missing

mkinstalldirs

src/ChangeLog

src/Makefile.am

src/Makefile.in

src/akiko.c

src/ar.c

src/audio.c

src/autoconf.c

src/blitops.c

src/blitter.c

src/blkdev-libscg.c

src/blkdev.c

src/bsdsocket-posix-new.c

src/bsdsocket.c

src/build68k.c

src/caps

src/caps/Makefile.am

src/caps/Makefile.in

src/caps/caps.c

src/catweasel.c

src/cdrom.c

src/cfgfile.c

src/cia.c

src/compemu_fpp.c

src/compemu_raw_x86.c

src/compemu_support.c

src/crc32.c

src/custom.c

src/debug.c

src/disk.c

src/dms

src/dms/Makefile.am

src/dms/Makefile.in

src/dms/cdata.h

src/dms/crc_csum.c

src/dms/crc_csum.h

src/dms/getbits.c

src/dms/getbits.h

src/dms/maketbl.c

src/dms/maketbl.h

src/dms/pfile.c

src/dms/pfile.h

src/dms/tables.c

src/dms/tables.h

src/dms/u_deep.c

src/dms/u_deep.h

src/dms/u_heavy.c

src/dms/u_heavy.h

src/dms/u_init.c

src/dms/u_init.h

src/dms/u_medium.c

src/dms/u_medium.h

src/dms/u_quick.c

src/dms/u_quick.h

src/dms/u_rle.c

src/dms/u_rle.h

src/drawing.c

src/driveclick.c

src/enforcer.c

src/ersatz.c

src/events.c

src/expansion.c

src/fdi2raw.c

src/filesys.asm

src/filesys.c

src/filesys.sh

src/filesys_bootrom.c

src/filesys_unix.c

src/fpp.c

src/fsdb.c

src/fsdb_unix.c

src/fsusage.c

src/genblitter.c

src/gencomp.c

src/gencpu.c

src/gengenblitter.c

src/genlinetoscr.c

src/gfx-amigaos

src/gfx-amigaos/Makefile.am

src/gfx-amigaos/Makefile.in

src/gfx-amigaos/ami-appw.c

src/gfx-amigaos/ami-win.c

src/gfx-amigaos/gfx.h

src/gfx-beos

src/gfx-beos/Makefile.am

src/gfx-beos/Makefile.in

src/gfx-beos/be-Input.cpp

src/gfx-beos/be-UAE.cpp

src/gfx-beos/be-UAE.h

src/gfx-beos/be-Window.cpp

src/gfx-beos/be-Window.h

src/gfx-beos/gfx.h

src/gfx-curses

src/gfx-curses/Makefile.am

src/gfx-curses/Makefile.in

src/gfx-curses/gfx.h

src/gfx-curses/ncurses.c

src/gfx-sdl

src/gfx-sdl/Makefile.am

src/gfx-sdl/Makefile.in

src/gfx-sdl/gfx.h

src/gfx-sdl/rawkeys.c

src/gfx-sdl/sdlgfx.c

src/gfx-sdl/sdlgfx.h

src/gfx-sdl/sdlkeys.c

src/gfx-svga

src/gfx-svga/Makefile.am

src/gfx-svga/Makefile.in

src/gfx-svga/gfx.h

src/gfx-svga/svga.c

src/gfx-x11

src/gfx-x11/Makefile.am

src/gfx-x11/Makefile.in

src/gfx-x11/gfx.h

src/gfx-x11/x11keys.c

src/gfx-x11/xwin.c

src/gfxutil.c

src/gui-beos

src/gui-beos/Makefile.am

src/gui-beos/Makefile.in

src/gui-beos/gui.cpp

src/gui-cocoa

src/gui-cocoa/Makefile.am

src/gui-cocoa/Makefile.in

src/gui-cocoa/cocoaui.m

src/gui-gtk

src/gui-gtk/Makefile.am

src/gui-gtk/Makefile.in

src/gui-gtk/chipsetspeedpanel.c

src/gui-gtk/chipsetspeedpanel.h

src/gui-gtk/chipsettypepanel.c

src/gui-gtk/chipsettypepanel.h

src/gui-gtk/chooserwidget.c

src/gui-gtk/chooserwidget.h

src/gui-gtk/cpuspeedpanel.c

src/gui-gtk/cpuspeedpanel.h

src/gui-gtk/cputypepanel.c

src/gui-gtk/cputypepanel.h

src/gui-gtk/floppyfileentry.c

src/gui-gtk/floppyfileentry.h

src/gui-gtk/gtkui.c

src/gui-gtk/led.c

src/gui-gtk/led.h

src/gui-gtk/util.c

src/gui-gtk/util.h

src/gui-muirexx

src/gui-muirexx/Makefile.am

src/gui-muirexx/Makefile.in

src/gui-muirexx/UAEGUI.rexx

src/gui-muirexx/UAEWB

src/gui-muirexx/UAEWB.aux

src/gui-muirexx/UAEWB.rexx

src/gui-muirexx/ami-gui.c

src/gui-muirexx/ami-rexx.c

src/gui-none

src/gui-none/Makefile.am

src/gui-none/Makefile.in

src/gui-none/nogui.c

src/hardfile.c

src/hardfile_unix.c

src/hotkeys.c

src/identify.c

src/include

src/include/akiko.h

src/include/ar.h

src/include/audio.h

src/include/autoconf.h

src/include/blitter.h

src/include/blkdev.h

src/include/bsdsocket.h

src/include/caps.h

src/include/catweasel.h

src/include/cdrom.h

src/include/cia.h

src/include/commpipe.h

src/include/compemu.h

src/include/cpu_prefetch.h

src/include/crc32.h

src/include/custom.h

src/include/custom_private.h

src/include/debug.h

src/include/disk.h

src/include/drawing.h

src/include/driveclick.h

src/include/enforcer.h

src/include/ersatz.h

src/include/events.h

src/include/execlib.h

src/include/fdi2raw.h

src/include/filesys.h

src/include/fpp-ieee.h

src/include/fpp-unknown.h

src/include/fsdb.h

src/include/fsusage.h

src/include/genblitter.h

src/include/gensound.h

src/include/gfxfilter.h

src/include/gui.h

src/include/hotkeys.h

src/include/hrtimer.h

src/include/identify.h

src/include/inputdevice.h

src/include/joystick.h

src/include/keyboard.h

src/include/keybuf.h

src/include/memory.h

src/include/native2amiga.h

src/include/newcpu.h

src/include/noflags.h

src/include/options.h

src/include/osemu.h

src/include/picasso96.h

src/include/readcpu.h

src/include/savestate.h

src/include/scsidev.h

src/include/serial.h

src/include/sinctable.h

src/include/sleep.h

src/include/sysdeps.h

src/include/traps.h

src/include/tui.h

src/include/uae.h

src/include/uae_endian.h

src/include/uae_malloc.h

src/include/uae_string.h

src/include/uae_types.h

src/include/uaeexe.h

src/include/unzip.h

src/include/version.h

src/include/writelog.h

src/include/xwin.h

src/include/zfile.h

src/inputdevice.c

src/inputevents.def

src/install_libscg

src/jd-amigainput

src/jd-amigainput/Makefile.am

src/jd-amigainput/Makefile.in

src/jd-amigainput/joystick.c

src/jd-amigaos

src/jd-amigaos/Makefile.am

src/jd-amigaos/Makefile.in

src/jd-amigaos/joystick.c

src/jd-beos

src/jd-beos/Makefile.am

src/jd-beos/Makefile.in

src/jd-beos/joystick.cpp

src/jd-linuxold

src/jd-linuxold/Makefile.am

src/jd-linuxold/Makefile.in

src/jd-linuxold/joystick.c

src/jd-none

src/jd-none/Makefile.am

src/jd-none/Makefile.in

src/jd-none/joystick.c

src/jd-sdl

src/jd-sdl/Makefile.am

src/jd-sdl/Makefile.in

src/jd-sdl/joystick.c

src/keybuf.c

src/keymap

src/keymap/Makefile.am

src/keymap/Makefile.in

src/keymap/amiga_rawkeys.c

src/keymap/amiga_rawkeys.h

src/keymap/beos_rawkeys.c

src/keymap/beos_rawkeys.h

src/keymap/hotkeys_common.h

src/keymap/keymap.c

src/keymap/keymap.h

src/keymap/keymap_all.h

src/keymap/keymap_common.h

src/keymap/quartz_rawkeys.c

src/keymap/quartz_rawkeys.h

src/keymap/x11pc_rawkeys.c

src/keymap/x11pc_rawkeys.h

src/main.c

src/md-68k

src/md-68k/Makefile.am

src/md-68k/Makefile.in

src/md-68k/cpuopti

src/md-68k/m68k.h

src/md-68k/m68kops.h

src/md-68k/maccess.h

src/md-68k/machdep.h

src/md-68k/rpt.h

src/md-68k/support.c

src/md-amd64-gcc

src/md-amd64-gcc/Makefile.am

src/md-amd64-gcc/Makefile.in

src/md-amd64-gcc/m68k.h

src/md-amd64-gcc/m68kops.h

src/md-amd64-gcc/maccess.h

src/md-amd64-gcc/machdep.h

src/md-amd64-gcc/rpt.h

src/md-amd64-gcc/support.c

src/md-generic

src/md-generic/Makefile.am

src/md-generic/Makefile.in

src/md-generic/m68k.h

src/md-generic/m68kops.h

src/md-generic/maccess.h

src/md-generic/machdep.h

src/md-generic/rpt.h

src/md-generic/support.c

src/md-i386-gcc

src/md-i386-gcc/Makefile.am

src/md-i386-gcc/Makefile.in

src/md-i386-gcc/m68k.h

src/md-i386-gcc/m68kops.h

src/md-i386-gcc/maccess.h

src/md-i386-gcc/machdep.h

src/md-i386-gcc/rpt.h

src/md-i386-gcc/support.c

src/md-ppc

src/md-ppc-gcc

src/md-ppc-gcc/Makefile.am

src/md-ppc-gcc/Makefile.in

src/md-ppc-gcc/m68k.h

src/md-ppc-gcc/m68kops.h

src/md-ppc-gcc/maccess.h

src/md-ppc-gcc/machdep.h

src/md-ppc-gcc/rpt.h

src/md-ppc-gcc/support.c

src/md-ppc/Makefile.am

src/md-ppc/Makefile.in

src/md-ppc/m68k.h

src/md-ppc/maccess.h

src/md-ppc/rpt.h

src/md-ppc/support.c

src/memory.c

src/misc.c

src/missing.c

src/native2amiga.c

src/newcpu.c

src/od-amiga

src/od-amiga/Makefile.am

src/od-amiga/Makefile.in

src/od-amiga/ami-disk.c

src/od-amiga/amiga-kludges.h

src/od-amiga/blkdev-amiga.c

src/od-amiga/hrtimer.h

src/od-amiga/main.c

src/od-amiga/memory.c

src/od-amiga/memory.h

src/od-amiga/scc

src/od-amiga/support.c

src/od-beos

src/od-beos/Makefile.am

src/od-beos/Makefile.in

src/od-beos/hrtimer.h

src/od-beos/main.cpp

src/od-beos/memory.c

src/od-beos/memory.h

src/od-beos/uae.rsrc

src/od-generic

src/od-generic/Makefile.am

src/od-generic/Makefile.in

src/od-generic/hrtimer.h

src/od-generic/main.c

src/od-generic/memory.c

src/od-generic/memory.h

src/od-linux

src/od-linux/Makefile.am

src/od-linux/Makefile.in

src/od-linux/blkdev-linux.c

src/od-linux/hrtimer.h

src/od-linux/main.c

src/od-linux/memory.c

src/od-linux/memory.h

src/od-macosx

src/od-macosx/Info.plist.in

src/od-macosx/Makefile.am

src/od-macosx/Makefile.in

src/od-macosx/euae.icns

src/od-macosx/hrtimer.h

src/od-macosx/main.h

src/od-macosx/main.m

src/od-macosx/memory.c

src/od-macosx/memory.h

src/od-win32

src/od-win32/Makefile.am

src/od-win32/Makefile.in

src/od-win32/bsdsock.c

src/od-win32/fsdb_win32.c

src/od-win32/hardfile_win32.c

src/od-win32/hrtimer.h

src/od-win32/main.c

src/od-win32/memory.c

src/od-win32/memory.h

src/od-win32/posixemu.c

src/od-win32/posixemu.h

src/od-win32/writelog.c

src/picasso96.c

src/readcpu.c

src/readdisk.c

src/savestate.c

src/scsi-none.c

src/scsiemul.c

src/sd-alsa

src/sd-alsa/Makefile.am

src/sd-alsa/Makefile.in

src/sd-alsa/sound.c

src/sd-alsa/sound.h

src/sd-amigaos

src/sd-amigaos/Makefile.am

src/sd-amigaos/Makefile.in

src/sd-amigaos/sound.c

src/sd-amigaos/sound.h

src/sd-beos

src/sd-beos/Makefile.am

src/sd-beos/Makefile.in

src/sd-beos/sound.cpp

src/sd-beos/sound.h

src/sd-none

src/sd-none/Makefile.am

src/sd-none/Makefile.in

src/sd-none/sound.c

src/sd-none/sound.h

src/sd-sdl

src/sd-sdl/Makefile.am

src/sd-sdl/Makefile.in

src/sd-sdl/sound.c

src/sd-sdl/sound.h

src/sd-solaris

src/sd-solaris/Makefile.am

src/sd-solaris/Makefile.in

src/sd-solaris/sound.c

src/sd-solaris/sound.h

src/sd-uss

src/sd-uss/Makefile.am

src/sd-uss/Makefile.in

src/sd-uss/sound.c

src/sd-uss/sound.h

src/serial.c

src/sinctable.c

src/svgancui.c

src/sysconfig.h.in

src/table68k

src/targets

src/targets/t-amiga.h

src/targets/t-beos.h

src/targets/t-unix.h

src/targets/t-win32.h

src/td-amigaos

src/td-amigaos/Makefile.am

src/td-amigaos/Makefile.in

src/td-amigaos/thread.c

src/td-amigaos/thread.h

src/td-beos

src/td-beos/Makefile.am

src/td-beos/Makefile.in

src/td-beos/thread.c

src/td-beos/thread.h

src/td-none

src/td-none/Makefile.am

src/td-none/Makefile.in

src/td-none/thread.c

src/td-none/thread.h

src/td-posix

src/td-posix/Makefile.am

src/td-posix/Makefile.in

src/td-posix/thread.c

src/td-posix/thread.h

src/td-sdl

src/td-sdl/Makefile.am

src/td-sdl/Makefile.in

src/td-sdl/thread.c

src/td-sdl/thread.h

src/td-win32

src/td-win32/Makefile.am

src/td-win32/Makefile.in

src/td-win32/thread.c

src/td-win32/thread.h

src/test

src/test/Makefile.am

src/test/Makefile.in

src/test/test_optflag.c

src/tools

src/tools/Makefile.in

src/tools/configure

src/tools/configure.in

src/tools/sysconfig.h.in

src/tools/target.h

src/traps.c

src/tui.c

src/uaeexe.c

src/uaelib.c

src/unzip.c

src/writelog.c

src/zfile.c

Show diffs side-by-side

added added

removed removed

src/enforcer.c

* UAE - The Un*x Amiga Emulator

* Enforcer Like Support

#ifdef ENFORCER

#include <stdlib.h>

#include "sysconfig.h"

#include "sysdeps.h"

#include "memory.h"

#include "custom.h"

#include "options.h"

#include "newcpu.h"

#include "enforcer.h"

#ifndef _WIN32

#define console_out printf

#else

#define console_out(...) do {;} while (0)

#endif

/* Configurable options */

#define ENFORCESIZE 1024

#define STACKLINES 5

#define INSTRUCTIONLINES 17

#define ISILLEGAL(addr) (addr < 4 || (addr > 4 && addr < ENFORCESIZE))

extern uae_u32 natmem_offset;

int flashscreen = 0;

static int enforcer_installed = 0;

static int enforcer_hit = 0; /* set to 1 if displaying the hit */

#define ENFORCER_BUF_SIZE 4096

static char enforcer_buf[ENFORCER_BUF_SIZE];

#define GET_PC m68k_getpc (&regs)

static addrbank saved_dummy_bank;

static addrbank saved_chipmem_bank;

/*************************************************************

Returns the first node entry of an exec list or 0 if

empty

*************************************************************/

static uae_u32 amiga_list_first (uae_u32 list)

{

uae_u32 node = get_long (list); /* lh_Head */

if (!node)

return 0;

if (!get_long (node))

return 0; /* ln_Succ */

return node;

}

/*************************************************************

Returns the next node of an exec node or 0 if it was the

last element

*************************************************************/

static uae_u32 amiga_node_next (uae_u32 node)

{

uae_u32 next = get_long (node); /* ln_Succ */

if (!next)

return 0;

if (!get_long (next))

return 0; /* ln_Succ */

return next;

}

/*************************************************************

Converts an amiga address to a native one or NULL if this

is not possible, Size specified the number of bytes you

want to access

*************************************************************/

static uae_u8 *amiga2native (uae_u32 aptr, int size)

{

addrbank bank = get_mem_bank (aptr);

/* Check if the address can be translated to native */

if (bank.check (aptr,size)) {

return bank.xlateaddr (aptr);

}

return NULL;

}

/*************************************************************

Writes the Hunk and Offset of the given Address into buf

*************************************************************/

static int enforcer_decode_hunk_and_offset (char *buf, uae_u32 pc)

{

100

uae_u32 sysbase = get_long(4);

101

uae_u32 semaphore_list = sysbase + 532;

102

103

/* First step is searching for the SegTracker semaphore */

104

uae_u32 node = amiga_list_first (semaphore_list);

105

while (node) {

106

uae_u32 string = get_long (node + 10); /* ln_Name */

107

uae_u8 *native_string = amiga2native (string, 100);

108

109

if (native_string) {

110

if (!strcmp ((char *) native_string, "SegTracker"))

111

break;

112

}

113

node = amiga_node_next (node);

114

}

115

116

if (node) {

117

/* We have found the segtracker semaphore. Soon after the

118

* public documented semaphore structure Segtracker holds

119

* an own list of all segements. We will use this list to

120

* find out the hunk and offset (simliar to segtracker).

121

122

* Source of segtracker can be found at:

123

* http://www.sinz.org/Michael.Sinz/Enforcer/SegTracker.c.html

124

125

uae_u32 seg_list = node + 46 + 4; /* sizeof(struct SignalSemaphore) + seg find */

126

127

node = amiga_list_first (seg_list);

128

while (node) {

129

uae_u32 seg_entry = node + 12;

130

uae_u32 address, size;

131

int hunk = 0;

132

133

/* Go through all entries until an address is 0

134

* or the segment has been found */

135

while ((address = get_long (seg_entry))) {

136

size = get_long (seg_entry + 4);

137

138

if (pc >= address && pc < address + size) {

139

uae_u32 name, offset;

140

const char *native_name;

141

142

offset = pc - address - 4;

143

name = get_long (node + 8); /* ln_Name */

144

if (name) {

145

native_name = (char *) amiga2native (name, 100);

146

if (!native_name)

147

native_name = "Unknown";

148

} else

149

native_name = "Unknown";

150

151

sprintf (buf, "----> %08lx - \"%s\" Hunk %04lx Offset %08lx\n", pc,

152

native_name, hunk, offset);

153

return 1;

154

}

155

seg_entry += 8;

156

hunk++;

157

}

158

node = amiga_node_next (node);

159

}

160

}

161

return 0;

162

}

163

164

/*************************************************************

165

Display the enforcer hit

166

*************************************************************/

167

static void enforcer_display_hit (const char *addressmode, uae_u32 pc, uaecptr addr)

168

{

169

uae_u32 a7;

170

uae_u32 sysbase;

171

uae_u32 this_task;

172

uae_u32 task_name;

173

const char *native_task_name;

174

int i, j;

175

static char buf[256], instrcode[256];

176

static char lines[INSTRUCTIONLINES/2][256];

177

static uaecptr bestpc_array[INSTRUCTIONLINES/2][5];

178

static int bestpc_idxs[INSTRUCTIONLINES/2];

179

char *enforcer_buf_ptr = enforcer_buf;

180

uaecptr bestpc, pospc, nextpc, temppc;

181

182

if (enforcer_hit) return; /* our function itself generated a hit ;), avoid endless loop */

183

enforcer_hit = 1;

184

185

if (!(sysbase = get_long (4)))

186

return;

187

if (!(this_task = get_long (sysbase + 276)))

188

return;

189

190

task_name = get_long (this_task + 10); /* ln_Name */

191

native_task_name = (char *) amiga2native (task_name, 100);

192

193

strcpy (enforcer_buf_ptr, "Enforcer Hit! Bad program\n");

194

enforcer_buf_ptr += strlen (enforcer_buf_ptr);

195

196

sprintf (buf, "Illegal %s: %08lx", addressmode, addr);

197

sprintf (enforcer_buf_ptr,"%-48sPC: %0lx\n", buf, pc);

198

enforcer_buf_ptr += strlen (enforcer_buf_ptr);

199

200

/* Data registers */

201

sprintf (enforcer_buf_ptr, "Data: %08lx %08lx %08lx %08lx %08lx %08lx %08lx %08lx\n",

202

m68k_dreg (&regs, 0), m68k_dreg (&regs, 1), m68k_dreg (&regs, 2), m68k_dreg (&regs, 3),

203

m68k_dreg (&regs, 4), m68k_dreg (&regs, 5), m68k_dreg (&regs, 6), m68k_dreg (&regs, 7));

204

enforcer_buf_ptr += strlen (enforcer_buf_ptr);

205

206

/* Address registers */

207

sprintf (enforcer_buf_ptr, "Addr: %08lx %08lx %08lx %08lx %08lx %08lx %08lx %08lx\n",

208

m68k_areg (&regs, 0), m68k_areg (&regs, 1), m68k_areg (&regs, 2), m68k_areg (&regs, 3),

209

m68k_areg (&regs, 4), m68k_areg (&regs, 5), m68k_areg (&regs, 6), m68k_areg (&regs, 7));

210

enforcer_buf_ptr += strlen(enforcer_buf_ptr);

211

212

/* Stack */

213

a7 = m68k_areg (&regs, 7);

214

for (i = 0; i < 8 * STACKLINES; i++) {

215

a7 -= 4;

216

if (!(i % 8)) {

217

strcpy (enforcer_buf_ptr,"Stck:");

218

enforcer_buf_ptr += strlen (enforcer_buf_ptr);

219

}

220

sprintf (enforcer_buf_ptr," %08lx", get_long (a7));

221

enforcer_buf_ptr += strlen (enforcer_buf_ptr);

222

223

if (i%8 == 7)

224

*enforcer_buf_ptr++ = '\n';

225

}

226

227

/* Segtracker output */

228

a7 = m68k_areg (&regs, 7);

229

if (get_long (a7-4) != pc) {

230

if (enforcer_decode_hunk_and_offset (buf, pc)) {

231

strcpy (enforcer_buf_ptr, buf);

232

enforcer_buf_ptr += strlen (enforcer_buf_ptr);

233

}

234

}

235

236

for (i = 0; i < 8 * STACKLINES; i++) {

237

a7 -= 4;

238

if (enforcer_decode_hunk_and_offset (buf, get_long (a7))) {

239

int l = strlen (buf);

240

241

if (ENFORCER_BUF_SIZE - (enforcer_buf_ptr - enforcer_buf) > l + 256) {

242

strcpy(enforcer_buf_ptr, buf);

243

enforcer_buf_ptr += l;

244

}

245

}

246

}

247

248

/* Decode the instructions around the pc where the enforcer hit was caused.

249

250

* At first, the area before the pc, this not always done correctly because

251

* it's done backwards */

252

temppc = pc;

253

254

memset (bestpc_array, 0, sizeof (bestpc_array));

255

for (i = 0; i < INSTRUCTIONLINES / 2; i++)

256

bestpc_idxs[i] = -1;

257

258

for (i = 0; i < INSTRUCTIONLINES / 2; i++) {

259

pospc = temppc;

260

bestpc = 0;

261

262

if (bestpc_idxs[i] == -1) {

263

for (j = 0; j < 5; j++) {

264

pospc -= 2;

265

sm68k_disasm (buf, NULL, pospc, &nextpc);

266

if (nextpc == temppc) {

267

bestpc_idxs[i] = j;

268

bestpc_array[i][j] = bestpc = pospc;

269

}

270

}

271

} else {

272

bestpc = bestpc_array[i][bestpc_idxs[i]];

273

}

274

275

if (!bestpc) {

276

/* there was no best pc found, so it is high probable that

277

* a former used best pc was wrong.

278

279

* We trace back and use the former best pc instead

280

281

282

int former_idx;

283

int leave = 0;

284

285

do {

286

if (!i) {

287

leave = 1;

288

break;

289

}

290

i--;

291

former_idx = bestpc_idxs[i];

292

bestpc_idxs[i] = -1;

293

bestpc_array[i][former_idx] = 0;

294

295

for (j = former_idx - 1; j >= 0; j--) {

296

if (bestpc_array[i][j]) {

297

bestpc_idxs[i] = j;

298

break;

299

}

300

}

301

} while (bestpc_idxs[i] == -1);

302

if (leave)

303

break;

304

if (i)

305

temppc = bestpc_array[i-1][bestpc_idxs[i-1]];

306

else temppc = pc;

307

i--; /* will be increased in after continue */

308

continue;

309

}

310

311

sm68k_disasm (buf, instrcode, bestpc, NULL);

312

sprintf (lines[i], "%08lx : %-20s %s\n", bestpc, instrcode, buf);

313

temppc = bestpc;

314

}

315

316

i--;

317

for (; i>=0; i--) {

318

strcpy (enforcer_buf_ptr,lines[i]);

319

enforcer_buf_ptr += strlen (enforcer_buf_ptr);

320

}

321

322

/* Now the instruction after the pc including the pc */

323

temppc = pc;

324

for (i=0; i < (INSTRUCTIONLINES+1) / 2; i++) {

325

sm68k_disasm (buf, instrcode, temppc, &nextpc);

326

sprintf (enforcer_buf_ptr, "%08lx : %s %-20s %s\n", temppc,

327

(i == 0 ? "*" : " "), instrcode, buf);

328

enforcer_buf_ptr += strlen (enforcer_buf_ptr);

329

temppc = nextpc;

330

}

331

332

if (!native_task_name)

333

native_task_name = "Unknown";

334

sprintf (enforcer_buf_ptr, "Name: \"%s\"\n\n", native_task_name);

335

enforcer_buf_ptr += strlen (enforcer_buf_ptr);

336

337

console_out (enforcer_buf);

338

write_log (enforcer_buf);

339

340

enforcer_hit = 0;

341

flashscreen = 30;

342

}

343

344

345

* Replacement chipmem accessors

346

347

348

static uae_u32 chipmem_lget2 (uaecptr addr) REGPARAM;

349

static uae_u32 chipmem_wget2 (uaecptr addr) REGPARAM;

350

static uae_u32 chipmem_bget2 (uaecptr addr) REGPARAM;

351

static void chipmem_lput2 (uaecptr addr, uae_u32 l) REGPARAM;

352

static void chipmem_wput2 (uaecptr addr, uae_u32 w) REGPARAM;

353

static void chipmem_bput2 (uaecptr addr, uae_u32 b) REGPARAM;

354

static int chipmem_check2 (uaecptr addr, uae_u32 size) REGPARAM;

355

static uae_u8 * chipmem_xlate2 (uaecptr addr) REGPARAM;

356

357

static uae_u32 REGPARAM2 chipmem_lget2 (uaecptr addr)

358

{

359

uae_u32 *m;

360

361

addr -= chipmem_start & chipmem_mask;

362

addr &= chipmem_mask;

363

m = (uae_u32 *)(chipmemory + addr);

364

365

if (ISILLEGAL (addr))

366

enforcer_display_hit ("LONG READ from", GET_PC, addr);

367

368

return do_get_mem_long (m);

369

}

370

371

static uae_u32 REGPARAM2 chipmem_wget2 (uaecptr addr)

372

{

373

uae_u16 *m;

374

375

addr -= chipmem_start & chipmem_mask;

376

addr &= chipmem_mask;

377

m = (uae_u16 *)(chipmemory + addr);

378

379

if (ISILLEGAL (addr))

380

enforcer_display_hit ("WORD READ from", GET_PC, addr);

381

382

return do_get_mem_word (m);

383

}

384

385

static uae_u32 REGPARAM2 chipmem_bget2 (uaecptr addr)

386

{

387

addr -= chipmem_start & chipmem_mask;

388

addr &= chipmem_mask;

389

390

if (ISILLEGAL (addr))

391

enforcer_display_hit ("BYTE READ from", GET_PC, addr);

392

393

return chipmemory[addr];

394

}

395

396

static void REGPARAM2 chipmem_lput2 (uaecptr addr, uae_u32 l)

397

{

398

uae_u32 *m;

399

400

addr -= chipmem_start & chipmem_mask;

401

addr &= chipmem_mask;

402

m = (uae_u32 *)(chipmemory + addr);

403

404

if (ISILLEGAL (addr))

405

enforcer_display_hit ("LONG WRITE to", GET_PC, addr);

406

407

do_put_mem_long (m, l);

408

}

409

410

static void REGPARAM2 chipmem_wput2 (uaecptr addr, uae_u32 w)

411

{

412

uae_u16 *m;

413

414

addr -= chipmem_start & chipmem_mask;

415

addr &= chipmem_mask;

416

m = (uae_u16 *)(chipmemory + addr);

417

418

if (ISILLEGAL (addr))

419

enforcer_display_hit ("WORD WRITE to", GET_PC, addr);

420

421

do_put_mem_word (m, w);

422

}

423

424

static void REGPARAM2 chipmem_bput2 (uaecptr addr, uae_u32 b)

425

{

426

addr -= chipmem_start & chipmem_mask;

427

addr &= chipmem_mask;

428

429

if (ISILLEGAL (addr))

430

enforcer_display_hit ("BYTE WRITE to", GET_PC, addr);

431

chipmemory[addr] = b;

432

}

433

434

static int REGPARAM2 chipmem_check2 (uaecptr addr, uae_u32 size)

435

{

436

addr -= chipmem_start & chipmem_mask;

437

addr &= chipmem_mask;

438

return (addr + size) <= allocated_chipmem;

439

}

440

441

static uae_u8 * REGPARAM2 chipmem_xlate2 (uaecptr addr)

442

{

443

addr -= chipmem_start & chipmem_mask;

444

addr &= chipmem_mask;

445

return chipmemory + addr;

446

}

447

448

static const addrbank enforcer_chipmem_bank = {

449

chipmem_lget2, chipmem_wget2, chipmem_bget2,

450

chipmem_lput2, chipmem_wput2, chipmem_bput2,

451

chipmem_xlate2, chipmem_check2, NULL

452

};

453

454

455

* Replacement dummy memory accessors

456

457

static uae_u32 dummy_lget2 (uaecptr addr) REGPARAM;

458

static uae_u32 dummy_wget2 (uaecptr addr) REGPARAM;

459

static uae_u32 dummy_bget2 (uaecptr addr) REGPARAM;

460

static void dummy_lput2 (uaecptr addr, uae_u32 l) REGPARAM;

461

static void dummy_wput2 (uaecptr addr, uae_u32 w) REGPARAM;

462

static void dummy_bput2 (uaecptr addr, uae_u32 b) REGPARAM;

463

static int dummy_check2 (uaecptr addr, uae_u32 size) REGPARAM;

464

465

static uae_u32 REGPARAM2 dummy_lget2 (uaecptr addr)

466

{

467

#ifdef JIT

468

special_mem |= SPECIAL_MEM_READ;

469

#endif

470

enforcer_display_hit ("LONG READ from", GET_PC, addr);

471

return 0xbadedeef;

472

}

473

474

#ifdef JIT

475

static int warned_JIT_0xF10000 = 0;

476

#endif

477

478

static uae_u32 REGPARAM2 dummy_wget2 (uaecptr addr)

479

{

480

#ifdef JIT

481

special_mem |= SPECIAL_MEM_READ;

482

483

if (addr >= 0x00F10000 && addr <= 0x00F7FFFF) {

484

if (!warned_JIT_0xF10000) {

485

warned_JIT_0xF10000 = 1;

486

enforcer_display_hit ("LONG READ from", GET_PC, addr);

487

}

488

return 0;

489

}

490

#endif

491

enforcer_display_hit ("WORD READ from", GET_PC, addr);

492

return 0xbadf;

493

}

494

495

static uae_u32 REGPARAM2 dummy_bget2 (uaecptr addr)

496

{

497

#ifdef JIT

498

special_mem |= SPECIAL_MEM_READ;

499

#endif

500

enforcer_display_hit ("BYTE READ from", GET_PC, addr);

501

return 0xbadedeef;

502

}

503

504

static void REGPARAM2 dummy_lput2 (uaecptr addr, uae_u32 l)

505

{

506

#ifdef JIT

507

special_mem |= SPECIAL_MEM_WRITE;

508

#endif

509

enforcer_display_hit ("LONG WRITE to", GET_PC, addr);

510

}

511

512

static void REGPARAM2 dummy_wput2 (uaecptr addr, uae_u32 w)

513

{

514

#ifdef JIT

515

special_mem |= SPECIAL_MEM_WRITE;

516

#endif

517

enforcer_display_hit ("WORD WRITE to", GET_PC, addr);

518

}

519

520

static void REGPARAM2 dummy_bput2 (uaecptr addr, uae_u32 b)

521

{

522

#ifdef JIT

523

special_mem |= SPECIAL_MEM_WRITE;

524

#endif

525

enforcer_display_hit ("BYTE WRITE to", GET_PC, addr);

526

}

527

528

static int REGPARAM2 dummy_check2 (uaecptr addr, uae_u32 size)

529

{

530

#ifdef JIT

531

special_mem |= SPECIAL_MEM_READ;

532

#endif

533

enforcer_display_hit ("CHECK from ", GET_PC, addr);

534

return 0;

535

}

536

537

const addrbank enforcer_dummy_bank = {

538

dummy_lget2, dummy_wget2, dummy_bget2,

539

dummy_lput2, dummy_wput2, dummy_bput2,

540

default_xlate, dummy_check2, NULL

541

};

542

543

/*************************************************************

544

enable the enforcer like support, maybe later this make MMU

545

exceptions so enforcer can use it. Returns 1 if enforcer

546

is enabled

547

*************************************************************/

548

int enforcer_enable (void)

549

{

550

extern addrbank chipmem_bank, dummy_bank;

551

552

if (!enforcer_installed) {

553

saved_dummy_bank = dummy_bank;

554

saved_chipmem_bank = chipmem_bank;

555

556

dummy_bank = enforcer_dummy_bank;

557

chipmem_bank = enforcer_chipmem_bank;

558

559

enforcer_installed = 1;

560

}

561

write_log ("Enforcer enabled\n");

562

return 1;

563

}

564

565

/*************************************************************

566

Disable Enforcer like support

567

*************************************************************/

568

int enforcer_disable (void)

569

{

570

if (enforcer_installed) {

571

dummy_bank = saved_dummy_bank;

572

chipmem_bank = saved_chipmem_bank;

573

574

enforcer_installed = 0;

575

}

576

return 1;

577

}

578

579

#endif

Older »