/* $NetBSD: promcall.c,v 1.21 2011/07/09 17:32:31 matt Exp $ */ /* * Copyright (c) 1988 University of Utah. * Copyright (c) 1992, 1993 * The Regents of the University of California. All rights reserved. * * This code is derived from software contributed to Berkeley by * the Systems Programming Group of the University of Utah Computer * Science Department and Ralph Campbell. * * 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. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``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 REGENTS OR CONTRIBUTORS 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. * * from: Utah Hdr: cons.c 1.1 90/07/09 * * @(#)cons.c 8.2 (Berkeley) 1/11/94 */ #include <sys/cdefs.h> __KERNEL_RCSID(0, "$NetBSD: promcall.c,v 1.21 2011/07/09 17:32:31 matt Exp $"); #include <sys/param.h> #include <sys/device.h> #include <sys/reboot.h> #include <sys/systm.h> #include <dev/cons.h> #include <pmax/dec_prom.h> #include <pmax/pmax/pmaxtype.h> #include <pmax/pmax/machdep.h> static int romgetc(dev_t); static void romputc(dev_t, int); #define DEFAULT_SCSIID 7 /* XXX - this should really live somewhere else */ /* * Default consdev, for errors or warnings before * consinit runs: use the PROM. */ struct consdev promcd = { NULL, /* probe */ NULL, /* init */ romgetc, /* getc */ romputc, /* putc */ nullcnpollc, /* pollc */ NULL, /* bell */ makedev(0, 0), CN_DEAD, }; /* * Get character from PROM console. */ static int romgetc(dev_t dev) { int chr, s; s = splhigh(); chr = promcall(callv->_getchar); splx(s); return chr; } /* * Print a character on PROM console. */ static void romputc(dev_t dev, int c) { int s; s = splhigh(); promcall(callv->_printf, "%c", c); splx(s); } /* * Call back to the PROM to find out what devices it is using * as console. * Encoding is idiosyncratic; see DECstation Owners Guide. */ void prom_findcons(int *kbdslot, int *crtslot, int *prom_using_screen) { char *oscon = 0; /* PROM osconsole string */ /* * Get and parse the "osconsole" environment variable. */ *crtslot = *kbdslot = -1; oscon = prom_getenv("osconsole"); if (oscon && *oscon >= '0' && *oscon <= '9') { *kbdslot = *oscon - '0'; *prom_using_screen = 0; while (*++oscon) { if (*oscon == ',') *prom_using_screen = 1; else if (*prom_using_screen && *oscon >= '0' && *oscon <= '9') { *crtslot = *kbdslot; *kbdslot = *oscon - '0'; break; } } } /* * compensate for discrepancies in PROM syntax. * XXX use cons_init vector instead? */ if (systype == DS_PMAX && *kbdslot == 1) *prom_using_screen = 1; /* * On a 5000/200, The boot program uses the old, pre-rex PROM * entrypoints, so the ROM sets osconsole to '1' like the PMAX. * our parser loses. fix it by hand. */ if (systype == DS_3MAX && *crtslot == -1 && *kbdslot == 1) { /* Try to use pmax onboard framebuffer */ *prom_using_screen = 1; *crtslot = 0; *kbdslot = 7; } } /* * Get a prom environment variable. */ char * prom_getenv(const char *name) { return (void *)promcall(callv->_getenv, name); } /* * Get 32bit system type of Digital hardware. * cputype, uint8_t [3] * systype, uint8_t [2] * firmware revision, uint8_t [1] * hardware revision. uint8_t [0] */ int prom_systype(void) { #ifndef _LP64 char *cp; if (callv != &callvec) #endif return promcall(callv->_getsysid); #ifndef _LP64 cp = prom_getenv("systype"); return (cp != NULL) ? strtoul(cp, NULL, 0) : 0; #endif } /* * Reset machine by haltbutton. */ void prom_haltbutton(void) { promcall(callv->_halt, (int *)0, 0); } /* * Halt/reboot machine. */ void __dead prom_halt(int howto, char *bootstr) { if (callv != &callvec) promcall(callv->_rex, (howto & RB_HALT) ? 'h' : 'b'); else { void __dead (*f)(void); f = (howto & RB_HALT) ? (void *)DEC_PROM_REINIT : (void *)DEC_PROM_AUTOBOOT; (*f)(); } while(1) ; /* fool gcc */ /*NOTREACHED*/ } /* * Get the host SCSI ID from the PROM. */ int prom_scsiid(int cnum) { char scsiid_var[8]; /* strlen("scsiidX") + NULL */ char *cp; snprintf(scsiid_var, 8, "scsiid%d", cnum); cp = prom_getenv(scsiid_var); return (cp != NULL) ? strtoul(cp, NULL, 0) : DEFAULT_SCSIID; } /* * Get the memory bitmap from the PROM if we can */ int prom_getbitmap(struct memmap *map) { char *cp; int len; if (callv->_getbitmap != NULL) return promcall(callv->_getbitmap, map); /* * See if we can get the bitmap from the environment variables */ cp = prom_getenv("bitmaplen"); if (cp == NULL) return 0; len = (int)strtoul(cp, NULL, 0) * 4; cp = prom_getenv("bitmap"); if (cp == NULL) return 0; memcpy(&map->bitmap, (char *)strtoul(cp, NULL, 0), len); map->pagesize = 4096; return len; }
