162 lines
3.7 KiB
C
162 lines
3.7 KiB
C
/* emulos.c -- Small OS emulation
|
|
Copyright 1999, 2000 Free Software Foundation, Inc.
|
|
Written by Stephane Carrez (stcarrez@worldnet.fr)
|
|
|
|
This file is part of GDB, GAS, and the GNU binutils.
|
|
|
|
GDB, GAS, and the GNU binutils are free software; you can redistribute
|
|
them and/or modify them under the terms of the GNU General Public
|
|
License as published by the Free Software Foundation; either version
|
|
1, or (at your option) any later version.
|
|
|
|
GDB, GAS, and the GNU binutils are distributed in the hope that they
|
|
will be useful, but WITHOUT ANY WARRANTY; without even the implied
|
|
warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
|
|
the GNU General Public License for more details.
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
along with this file; see the file COPYING. If not, write to the Free
|
|
Software Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
|
|
|
|
#include "sim-main.h"
|
|
#ifdef HAVE_UNISTD_H
|
|
#include <unistd.h>
|
|
#endif
|
|
|
|
#ifndef WIN32
|
|
#include <sys/types.h>
|
|
#include <sys/time.h>
|
|
|
|
/* This file emulates some OS system calls.
|
|
It's basically used to give access to the host OS facilities
|
|
like: stdin, stdout, files, time of day. */
|
|
static int bench_mode = -1;
|
|
static struct timeval bench_start;
|
|
static struct timeval bench_stop;
|
|
|
|
void
|
|
emul_bench (struct _sim_cpu* cpu)
|
|
{
|
|
int op;
|
|
|
|
op = cpu_get_d (cpu);
|
|
switch (op)
|
|
{
|
|
case 0:
|
|
bench_mode = 0;
|
|
gettimeofday (&bench_start, 0);
|
|
break;
|
|
|
|
case 1:
|
|
gettimeofday (&bench_stop, 0);
|
|
if (bench_mode != 0)
|
|
printf ("bench start not called...\n");
|
|
bench_mode = 1;
|
|
break;
|
|
|
|
case 2:
|
|
{
|
|
int sz = 0;
|
|
int addr = cpu_get_x (cpu);
|
|
double t_start, t_stop, t;
|
|
char buf[1024];
|
|
|
|
op = cpu_get_y (cpu);
|
|
t_start = (double) (bench_start.tv_sec) * 1.0e6;
|
|
t_start += (double) (bench_start.tv_usec);
|
|
t_stop = (double) (bench_stop.tv_sec) * 1.0e6;
|
|
t_stop += (double) (bench_stop.tv_usec);
|
|
|
|
while (sz < 1024)
|
|
{
|
|
buf[sz] = memory_read8 (cpu, addr);
|
|
if (buf[sz] == 0)
|
|
break;
|
|
|
|
sz ++;
|
|
addr++;
|
|
}
|
|
buf[1023] = 0;
|
|
|
|
if (bench_mode != 1)
|
|
printf ("bench_stop not called");
|
|
|
|
bench_mode = -1;
|
|
t = t_stop - t_start;
|
|
printf ("%-40.40s [%6d] %3.3f us\n", buf,
|
|
op, t / (double) (op));
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
#endif
|
|
|
|
void
|
|
emul_write(struct _sim_cpu* state)
|
|
{
|
|
int addr = cpu_get_x (state) & 0x0FFFF;
|
|
int size = cpu_get_d (state) & 0x0FFFF;
|
|
|
|
if (addr + size > 0x0FFFF) {
|
|
size = 0x0FFFF - addr;
|
|
}
|
|
state->cpu_running = 0;
|
|
while (size)
|
|
{
|
|
uint8 val = memory_read8 (state, addr);
|
|
|
|
write(0, &val, 1);
|
|
addr ++;
|
|
size--;
|
|
}
|
|
}
|
|
|
|
/* emul_exit () is used by the default startup code of GCC to implement
|
|
the exit (). For a real target, this will create an ILLEGAL fault.
|
|
But doing an exit () on a real target is really a non-sense.
|
|
exit () is important for the validation of GCC. The exit status
|
|
is passed in 'D' register. */
|
|
void
|
|
emul_exit (sim_cpu *cpu)
|
|
{
|
|
sim_engine_halt (CPU_STATE (cpu), cpu,
|
|
NULL, NULL_CIA, sim_exited,
|
|
cpu_get_d (cpu));
|
|
}
|
|
|
|
void
|
|
emul_os (int code, sim_cpu *proc)
|
|
{
|
|
proc->cpu_current_cycle = 8;
|
|
switch (code)
|
|
{
|
|
case 0x0:
|
|
break;
|
|
|
|
/* 0xCD 0x01 */
|
|
case 0x01:
|
|
emul_write (proc);
|
|
break;
|
|
|
|
/* 0xCD 0x02 */
|
|
case 0x02:
|
|
break;
|
|
|
|
/* 0xCD 0x03 */
|
|
case 0x03:
|
|
emul_exit (proc);
|
|
break;
|
|
|
|
/* 0xCD 0x04 */
|
|
case 0x04:
|
|
#ifndef WIN32
|
|
emul_bench (proc);
|
|
#endif
|
|
break;
|
|
|
|
default:
|
|
break;
|
|
}
|
|
}
|
|
|