Import 2.3.18pre1

[davej-history.git] / arch / sparc64 / prom / misc.c

/* $Id: misc.c,v 1.15 1999/08/31 19:25:41 davem Exp $
 * misc.c: Miscellaneous prom functions that don't belong
 * anywhere else.
 *
 * Copyright (C) 1995 David S. Miller (davem@caip.rutgers.edu)
 * Copyright (C) 1996,1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
 */

#include <linux/config.h>
#include <linux/types.h>
#include <linux/kernel.h>
#include <linux/sched.h>
#include <asm/openprom.h>
#include <asm/oplib.h>

/* Reset and reboot the machine with the command 'bcommand'. */
void
prom_reboot(char*bcommand)
{
p1275_cmd("boot",P1275_ARG(0,P1275_ARG_IN_STRING)|
P1275_INOUT(1,0), bcommand);
}

/* Forth evaluate the expression contained in 'fstring'. */
void
prom_feval(char*fstring)
{
if(!fstring || fstring[0] ==0)
return;
p1275_cmd("interpret",P1275_ARG(0,P1275_ARG_IN_STRING)|
P1275_INOUT(1,1), fstring);
}

/* We want to do this more nicely some day. */
#ifdef CONFIG_SUN_CONSOLE
externvoid(*prom_palette)(int);
externint serial_console;
#endif

/* Drop into the prom, with the chance to continue with the 'go'
 * prom command.
 */
void
prom_cmdline(void)
{
unsigned long flags;

#ifdef CONFIG_SUN_CONSOLE
if(!serial_console && prom_palette)
prom_palette(1);
#endif
__save_and_cli(flags);
p1275_cmd("enter",P1275_INOUT(0,0));
__restore_flags(flags);
#ifdef CONFIG_SUN_CONSOLE
if(!serial_console && prom_palette)
prom_palette(0);
#endif
}

/* Drop into the prom, but completely terminate the program.
 * No chance of continuing.
 */
void
prom_halt(void)
{
again:
p1275_cmd("exit",P1275_INOUT(0,0));
goto again;/* PROM is out to get me -DaveM */
}

/* Set prom sync handler to call function 'funcp'. */
void
prom_setcallback(callback_func_t funcp)
{
if(!funcp)return;
p1275_cmd("set-callback",P1275_ARG(0,P1275_ARG_IN_FUNCTION)|
P1275_INOUT(1,1), funcp);
}

/* Get the idprom and stuff it into buffer 'idbuf'. Returns the
 * format type. 'num_bytes' is the number of bytes that your idbuf
 * has space for. Returns 0xff on error.
 */
unsigned char
prom_get_idprom(char*idbuf,int num_bytes)
{
int len;

 len =prom_getproplen(prom_root_node,"idprom");
if((len>num_bytes) || (len==-1))return0xff;
if(!prom_getproperty(prom_root_node,"idprom", idbuf, num_bytes))
return idbuf[0];

return0xff;
}

/* Get the major prom version number. */
int
prom_version(void)
{
return PROM_P1275;
}

/* Get the prom plugin-revision. */
int
prom_getrev(void)
{
return prom_rev;
}

/* Get the prom firmware print revision. */
int
prom_getprev(void)
{
return prom_prev;
}

/* Install Linux trap table so PROM uses that instead of it's own. */
voidprom_set_trap_table(unsigned long tba)
{
p1275_cmd("SUNW,set-trap-table",P1275_INOUT(1,0), tba);
}

/* This is only used internally below. */
static intprom_get_mmu_ihandle(void)
{
static int mmu_ihandle_cache =0;
int node, ret;

if(mmu_ihandle_cache !=0)
return mmu_ihandle_cache;

 node =prom_finddevice("/chosen");
 ret =prom_getint(node,"mmu");
if(ret == -1|| ret ==0)
 mmu_ihandle_cache = -1;
else
 mmu_ihandle_cache = ret;

return ret;
}

static intprom_get_memory_ihandle(void)
{
static int memory_ihandle_cache =0;
int node, ret;

if(memory_ihandle_cache !=0)
return memory_ihandle_cache;

 node =prom_finddevice("/chosen");
 ret =prom_getint(node,"memory");
if(ret == -1|| ret ==0)
 memory_ihandle_cache = -1;
else
 memory_ihandle_cache = ret;

return ret;
}

/* Load explicit I/D TLB entries. */
longprom_itlb_load(unsigned long index,
unsigned long tte_data,
unsigned long vaddr)
{
returnp1275_cmd("call-method",
(P1275_ARG(0, P1275_ARG_IN_BUF) |P1275_INOUT(5,1)),
"SUNW,itlb-load",
prom_get_mmu_ihandle(),
/* And then our actual args are pushed backwards. */
 vaddr,
 tte_data,
 index);
}

longprom_dtlb_load(unsigned long index,
unsigned long tte_data,
unsigned long vaddr)
{
returnp1275_cmd("call-method",
(P1275_ARG(0, P1275_ARG_IN_BUF) |P1275_INOUT(5,1)),
"SUNW,dtlb-load",
prom_get_mmu_ihandle(),
/* And then our actual args are pushed backwards. */
 vaddr,
 tte_data,
 index);
}

/* Set aside physical memory which is not touched or modified
 * across soft resets.
 */
unsigned longprom_retain(char*name,
unsigned long pa_low,unsigned long pa_high,
long size,long align)
{
/* XXX I don't think we return multiple values correctly.
 * XXX OBP supposedly returns pa_low/pa_high here, how does
 * XXX it work?
 */

/* If align is zero, the pa_low/pa_high args are passed,
 * else they are not.
 */
if(align ==0)
returnp1275_cmd("SUNW,retain",
(P1275_ARG(0, P1275_ARG_IN_BUF) |P1275_INOUT(5,2)),
 name, pa_low, pa_high, size, align);
else
returnp1275_cmd("SUNW,retain",
(P1275_ARG(0, P1275_ARG_IN_BUF) |P1275_INOUT(3,2)),
 name, size, align);
}

/* Get "Unumber" string for the SIMM at the given
 * memory address. Usually this will be of the form
 * "Uxxxx" where xxxx is a decimal number which is
 * etched into the motherboard next to the SIMM slot
 * in question.
 */
intprom_getunumber(int syndrome_code,
unsigned long phys_addr,
char*buf,int buflen)
{
returnp1275_cmd("call-method",
(P1275_ARG(0, P1275_ARG_IN_STRING) |
P1275_ARG(3, P1275_ARG_OUT_BUF) |
P1275_ARG(5, P1275_ARG_IN_64B) |
P1275_INOUT(8,2)),
"SUNW,get-unumber",prom_get_memory_ihandle(),
 buflen, buf,P1275_SIZE(buflen),
0, phys_addr, syndrome_code);
}

/* Power management extensions. */
voidprom_sleepself(void)
{
p1275_cmd("SUNW,sleep-self",P1275_INOUT(0,0));
}

intprom_sleepsystem(void)
{
returnp1275_cmd("SUNW,sleep-system",P1275_INOUT(0,1));
}

intprom_wakeupsystem(void)
{
returnp1275_cmd("SUNW,wakeup-system",P1275_INOUT(0,1));
}

#ifdef __SMP__
voidprom_startcpu(int cpunode,unsigned long pc,unsigned long o0)
{
p1275_cmd("SUNW,start-cpu",P1275_INOUT(3,0), cpunode, pc, o0);
}

voidprom_stopself(void)
{
p1275_cmd("SUNW,stop-self",P1275_INOUT(0,0));
}

voidprom_idleself(void)
{
p1275_cmd("SUNW,idle-self",P1275_INOUT(0,0));
}

voidprom_resumecpu(int cpunode)
{
p1275_cmd("SUNW,resume-cpu",P1275_INOUT(1,0), cpunode);
}
#endif