/*****************************************************************************			       XCopilotThis code is part of XCopilot, a port of copilot     Portions of this code are Copyright (C) 1997 Ivan A. Curtis		       icurtis@radlogic.com.auThe original MS-Windows95 copilot emulator was written by Greg Hewgill.The following copyright notice appeared on the original copilot sources:		  Copyright (c) 1996 Greg Hewgill MC68000 Emulation code is from Bernd Schmidt's Unix Amiga Emulator.       The following copyright notice appeared in those files:	  Original UAE code Copyright (c) 1995 Bernd SchmidtThis code must not be distributed without these copyright notices intact.**************************************************************************************************************************************************************Filename:	fakecall.cDescription:	support for Copilot debug moduleUpdate History:   (most recent first)   Ian Goldberg 11-Sep-97 09:48 -- added bus error support   I. Curtis    28-Feb-97 22:52 -- created******************************************************************************/#include <stdio.h>#include <stdlib.h>#include "sysdeps.h"#include "shared.h"#include "memory.h"#include "custom.h"#include "newcpu.h"#include "pilotcpu.h"#include "fakecall.h"#define addrstart 0x2000FakeCall *fc_New(shared_img *shptr){  FakeCall *fc;  fc = (FakeCall *)malloc(sizeof(FakeCall));  CPU_getregs(shptr, &(fc->origregs));  fc->regs = fc->origregs;  fc->SaveMemory = (char *)malloc(4096);  memcpy(fc->SaveMemory, CPU_getmemptr(addrstart), 4096);  fc->nextaddr = addrstart;  return fc;}void fc_Dispose(FakeCall *fc, shared_img *shptr){  CPU_setregs(shptr, &(fc->origregs));  memcpy(CPU_getmemptr(addrstart), fc->SaveMemory, 4096);  free(fc->SaveMemory);  free(fc);}void fc_PushWord(FakeCall *fc, UWORD x){  (fc->regs).a[7] -= 2;  CPU_putword((fc->regs).a[7], x);}void fc_PushLong(FakeCall *fc, unsigned long x){  (fc->regs).a[7] -= 4;  CPU_putlong((fc->regs).a[7], x);}void *fc_PushPtr(FakeCall *fc, int size){  void *r;  (fc->regs).a[7] -= 4;  if (size == 0) {    CPU_putlong((fc->regs).a[7], 0);    return NULL;  }  CPU_putlong((fc->regs).a[7], fc->nextaddr);  r = CPU_getmemptr(fc->nextaddr);  fc->nextaddr += size + (size & 1);  return r;}UWORD swap(UWORD x){   return (x << 8) | ((x >> 8) & 0xff);}void fc_PutSwap(unsigned long addr, UWORD word){  UWORD *p;  p = (UWORD *)CPU_getmemptr(addr);  *p = swap(word);  if (CPU_getword(addr) != word) {    *p = swap(word);  }}void fc_SwapRange(unsigned long startaddr, unsigned long endaddr){  UWORD *p, *e;  p = (UWORD *)CPU_getmemptr(startaddr);  e = (UWORD *)CPU_getmemptr(endaddr);  while (p < e) {    *p = swap(*p);    p++;  }}void fc_Call(FakeCall *fc, shared_img *shptr, UWORD api, int debug){  UWORD oldapi;  UWORD oldnxt;  int savewrite = shptr->allowromwrites;  shptr->allowromwrites = 1;  /* fc_SwapRange(addrstart, fc->nextaddr); */  oldapi = CPU_getword((fc->regs).pc + 2);  oldnxt = CPU_getword((fc->regs).pc + 4);  /* fc_PutSwap((fc->regs).pc + 2, api); */  CPU_putword((fc->regs).pc + 2, api);  /* fc_PutSwap((fc->regs).pc + 4, 0x4AFC); */  CPU_putword((fc->regs).pc + 4, 0x4AFC);  CPU_setregs(shptr, &(fc->regs));/******************************  if (debug) {    StartDebugger();    Sleep(INFINITE);  }*********************************/  MC68000_run();  CPU_getregs(shptr, &(fc->regs));  CPU_setregs(shptr, &(fc->origregs));  /* fc_PutSwap((fc->origregs).pc + 2, oldapi); */  /* fc_PutSwap((fc->origregs).pc + 4, oldnxt); */  CPU_putword((fc->origregs).pc + 2, oldapi);  CPU_putword((fc->origregs).pc + 4, oldnxt);  /* fc_SwapRange(addrstart, fc->nextaddr); */  shptr->allowromwrites = savewrite;}unsigned long fc_GetResultD0(FakeCall *fc){  return (fc->regs).d[0];}unsigned long GetResultA0(FakeCall *fc){  return (fc->regs).a[0];}