129 lines
3.6 KiB
C
129 lines
3.6 KiB
C
/* $NetBSD: machdep.c,v 1.2 1999/03/26 06:54:40 dbj Exp $ */
|
|
/*
|
|
* Copyright (c) 1998 Darrin Jewell
|
|
* Copyright (c) 1994 Rolf Grossmann
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* This product includes software developed by Rolf Grossmann.
|
|
* 4. The name of the author may not be used to endorse or promote products
|
|
* derived from this software without specific prior written permission
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
|
|
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
|
|
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
|
|
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
|
|
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
|
|
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
|
|
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
|
|
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <sys/types.h>
|
|
|
|
#include <stand.h>
|
|
#include <next68k/next68k/nextrom.h>
|
|
|
|
char *mg;
|
|
|
|
#define MON(type, off) (*(type *)((u_int) (mg) + off))
|
|
|
|
extern char *entry_point;
|
|
|
|
|
|
#ifdef DEBUG
|
|
int debug = 1;
|
|
#else
|
|
int debug = 0;
|
|
#endif
|
|
|
|
#ifdef DEBUG
|
|
#define DPRINTF(x) printf x
|
|
#else
|
|
#define DPRINTF(x)
|
|
#endif
|
|
|
|
void
|
|
machdep_start(char *entry, int howto, char *loadaddr, char *ssym, char *esym)
|
|
{
|
|
DPRINTF(("machdep_start(entry=0x%lx,howto=0x%x,loadaddr=0x%lx,ssym=0x%lx,esym=0x%lx\n",
|
|
(u_long)entry,howto,(u_long)loadaddr,(u_long)ssym,(u_long)esym));
|
|
MON(int,MG_boot_how) = howto;
|
|
entry_point = entry + (long)loadaddr;
|
|
DPRINTF(("start=0x%lx\n", (u_long)entry_point));
|
|
|
|
/* @@@ hack to pass esym to kernel */
|
|
*((u_int *)loadaddr) = (u_int)esym;
|
|
|
|
/* return to exec, so that main can return entry point */
|
|
}
|
|
|
|
typedef int (*getcptr)(void);
|
|
typedef int (*putcptr)(int);
|
|
|
|
int
|
|
getchar(void)
|
|
{
|
|
return(MON(getcptr,MG_getc)());
|
|
}
|
|
|
|
void
|
|
putchar(int c)
|
|
{
|
|
MON(putcptr,MG_putc)(c);
|
|
}
|
|
|
|
__dead void
|
|
_rtt(void)
|
|
{
|
|
extern __dead void _halt __P((void)) __attribute__((noreturn));
|
|
|
|
printf("Press any key to halt.\n");
|
|
getchar();
|
|
_halt();
|
|
/* NOTREACHED */
|
|
}
|
|
|
|
struct trapframe {
|
|
int dregs[8];
|
|
int aregs[8];
|
|
short sr;
|
|
int pc;
|
|
short frame;
|
|
char info[0];
|
|
};
|
|
|
|
int trap __P((struct trapframe *fp));
|
|
|
|
int
|
|
trap(struct trapframe *fp)
|
|
{
|
|
static int intrap = 0;
|
|
|
|
if (intrap)
|
|
return 0;
|
|
intrap = 1;
|
|
printf("Got unexpected trap: format=%x vector=%x sr=%x pc=%x\n",
|
|
(fp->frame>>12)&0xF, fp->frame&0xFFF, fp->sr, fp->pc);
|
|
printf("dregs: %x %x %x %x %x %x %x %x\n",
|
|
fp->dregs[0], fp->dregs[1], fp->dregs[2], fp->dregs[3],
|
|
fp->dregs[4], fp->dregs[5], fp->dregs[6], fp->dregs[7]);
|
|
printf("aregs: %x %x %x %x %x %x %x %x\n",
|
|
fp->aregs[0], fp->aregs[1], fp->aregs[2], fp->aregs[3],
|
|
fp->aregs[4], fp->aregs[5], fp->aregs[6], fp->aregs[7]);
|
|
intrap = 0;
|
|
printf("Halting.\n");
|
|
return 0;
|
|
}
|