1 /* $NetBSD: machdep.c,v 1.4 2002/07/11 16:03:19 christos Exp $ */ 2 /* 3 * Copyright (c) 1998 Darrin Jewell 4 * Copyright (c) 1994 Rolf Grossmann 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by Rolf Grossmann. 18 * 4. The name of the author may not be used to endorse or promote products 19 * derived from this software without specific prior written permission 20 * 21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 31 */ 32 33 #include <sys/types.h> 34 35 #include <stand.h> 36 #include <next68k/next68k/nextrom.h> 37 38 char *mg; 39 40 #define MON(type, off) (*(type *)((u_int) (mg) + off)) 41 42 extern int entry_point; 43 44 #ifdef DEBUG 45 int debug = 1; 46 #else 47 int debug = 0; 48 #endif 49 50 #ifdef DEBUG 51 #define DPRINTF(x) printf x 52 #else 53 #define DPRINTF(x) 54 #endif 55 56 void 57 machdep_start(char *entry, int howto, char *loadaddr, char *ssym, char *esym) 58 { 59 DPRINTF(("machdep_start(entry=%p,howto=0x%x,loadaddr=%p,ssym=%p,esym=%p\n", 60 entry, howto, loadaddr, ssym, esym)); 61 MON(int,MG_boot_how) = howto; 62 entry_point = (int)entry + (int)loadaddr; 63 DPRINTF(("start=0x%lx\n", (u_long)entry_point)); 64 65 /* @@@ hack to pass esym to kernel */ 66 *((u_int *)loadaddr) = (u_int)esym; 67 68 /* return to exec, so that main can return entry point */ 69 } 70 71 typedef int (*getcptr)(void); 72 typedef int (*putcptr)(int); 73 74 int 75 getchar(void) 76 { 77 return(MON(getcptr,MG_getc)()); 78 } 79 80 void 81 putchar(int c) 82 { 83 MON(putcptr,MG_putc)(c); 84 } 85 86 __dead void 87 _rtt(void) 88 { 89 extern __dead void _halt __P((void)) __attribute__((noreturn)); 90 91 printf("Press any key to halt.\n"); 92 getchar(); 93 _halt(); 94 /* NOTREACHED */ 95 } 96 97 struct trapframe { 98 int dregs[8]; 99 int aregs[8]; 100 short sr; 101 int pc; 102 u_short fmt:4, 103 vec:12; 104 char info[0]; 105 } __attribute__ ((packed)); 106 107 int trap __P((struct trapframe *fp)); 108 109 int 110 trap(struct trapframe *fp) 111 { 112 static int intrap = 0; 113 114 if (intrap) 115 return 0; 116 intrap = 1; 117 printf("Got unexpected trap: format=%x vector=%x sr=%x pc=%x\n", 118 fp->fmt, fp->vec, fp->sr, fp->pc); 119 printf("dregs: %x %x %x %x %x %x %x %x\n", 120 fp->dregs[0], fp->dregs[1], fp->dregs[2], fp->dregs[3], 121 fp->dregs[4], fp->dregs[5], fp->dregs[6], fp->dregs[7]); 122 printf("aregs: %x %x %x %x %x %x %x %x\n", 123 fp->aregs[0], fp->aregs[1], fp->aregs[2], fp->aregs[3], 124 fp->aregs[4], fp->aregs[5], fp->aregs[6], fp->aregs[7]); 125 intrap = 0; 126 #ifdef DEBUG 127 if (debug) 128 { 129 int i; 130 int *p; 131 p = (int *)(fp->pc); 132 for (i = 0; i < 64; i++) { 133 if ((i % 8) == 0) 134 printf ("\npc %x: ", (int)&p[i-16]); 135 printf ("%x ", p[i]); 136 } 137 p = (int *)(fp->info); 138 for (i = 0; i < 64; i++) { 139 if ((i % 8) == 0) 140 printf ("\nstk %x: ", (int)&p[i-16]); 141 printf ("%x ", p[i]); 142 } 143 printf ("\n"); 144 } 145 #endif 146 printf("Halting.\n"); 147 return 0; 148 } 149