[linux-2.6-block.git] / arch / sparc / kernel / auxio_32.c

/* auxio.c: Probing for the Sparc AUXIO register at boot time.
 *
 * Copyright (C) 1996 David S. Miller (davem@caip.rutgers.edu)
 */

#include <linux/stddef.h>
#include <linux/init.h>
#include <linux/spinlock.h>
#include <linux/of.h>
#include <linux/of_device.h>
#include <linux/export.h>

#include <asm/oplib.h>
#include <asm/io.h>
#include <asm/auxio.h>
#include <asm/string.h>		/* memset(), Linux has no bzero() */
#include <asm/cpu_type.h>

#include "kernel.h"

/* Probe and map in the Auxiliary I/O register */

/* auxio_register is not static because it is referenced 
 * in entry.S::floppy_tdone
 */
void __iomem *auxio_register = NULL;
static DEFINE_SPINLOCK(auxio_lock);

void __init auxio_probe(void)
{
	phandle node, auxio_nd;
	struct linux_prom_registers auxregs[1];
	struct resource r;

	switch (sparc_cpu_model) {
	case sparc_leon:
	case sun4d:
		return;
	default:
		break;
	}
	node = prom_getchild(prom_root_node);
	auxio_nd = prom_searchsiblings(node, "auxiliary-io");
	if(!auxio_nd) {
		node = prom_searchsiblings(node, "obio");
		node = prom_getchild(node);
		auxio_nd = prom_searchsiblings(node, "auxio");
		if(!auxio_nd) {
#ifdef CONFIG_PCI
			/* There may be auxio on Ebus */
			return;
#else
			if(prom_searchsiblings(node, "leds")) {
				/* VME chassis sun4m machine, no auxio exists. */
				return;
			}
			prom_printf("Cannot find auxio node, cannot continue...\n");
			prom_halt();
#endif
		}
	}
	if(prom_getproperty(auxio_nd, "reg", (char *) auxregs, sizeof(auxregs)) <= 0)
		return;
	prom_apply_obio_ranges(auxregs, 0x1);
	/* Map the register both read and write */
	r.flags = auxregs[0].which_io & 0xF;
	r.start = auxregs[0].phys_addr;
	r.end = auxregs[0].phys_addr + auxregs[0].reg_size - 1;
	auxio_register = of_ioremap(&r, 0, auxregs[0].reg_size, "auxio");
	/* Fix the address on sun4m. */
	if ((((unsigned long) auxregs[0].phys_addr) & 3) == 3)
		auxio_register += (3 - ((unsigned long)auxio_register & 3));

	set_auxio(AUXIO_LED, 0);
}

unsigned char get_auxio(void)
{
	if(auxio_register) 
		return sbus_readb(auxio_register);
	return 0;
}
EXPORT_SYMBOL(get_auxio);

void set_auxio(unsigned char bits_on, unsigned char bits_off)
{
	unsigned char regval;
	unsigned long flags;
	spin_lock_irqsave(&auxio_lock, flags);
	switch (sparc_cpu_model) {
	case sun4m:
		if(!auxio_register)
			break;     /* VME chassis sun4m, no auxio. */
		regval = sbus_readb(auxio_register);
		sbus_writeb(((regval | bits_on) & ~bits_off) | AUXIO_ORMEIN4M,
			auxio_register);
		break;
	case sun4d:
		break;
	default:
		panic("Can't set AUXIO register on this machine.");
	}
	spin_unlock_irqrestore(&auxio_lock, flags);
}
EXPORT_SYMBOL(set_auxio);

/* sun4m power control register (AUXIO2) */

volatile u8 __iomem *auxio_power_register = NULL;

void __init auxio_power_probe(void)
{
	struct linux_prom_registers regs;
	phandle node;
	struct resource r;

	/* Attempt to find the sun4m power control node. */
	node = prom_getchild(prom_root_node);
	node = prom_searchsiblings(node, "obio");
	node = prom_getchild(node);
	node = prom_searchsiblings(node, "power");
	if (node == 0 || (s32)node == -1)
		return;

	/* Map the power control register. */
	if (prom_getproperty(node, "reg", (char *)&regs, sizeof(regs)) <= 0)
		return;
	prom_apply_obio_ranges(&regs, 1);
	memset(&r, 0, sizeof(r));
	r.flags = regs.which_io & 0xF;
	r.start = regs.phys_addr;
	r.end = regs.phys_addr + regs.reg_size - 1;
	auxio_power_register =
		(u8 __iomem *)of_ioremap(&r, 0, regs.reg_size, "auxpower");

	/* Display a quick message on the console. */
	if (auxio_power_register)
		printk(KERN_INFO "Power off control detected.\n");
}
Commit	Line	Data
1da177e4 LT	1	/* auxio.c: Probing for the Sparc AUXIO register at boot time.
	2	*
	3	* Copyright (C) 1996 David S. Miller (davem@caip.rutgers.edu)
	4	*/
	5
	6	#include <linux/stddef.h>
	7	#include <linux/init.h>
1da177e4	8	#include <linux/spinlock.h>
454eeb2d DM	9	#include <linux/of.h>
454eeb2d DM	10	#include <linux/of_device.h>
7b64db60	11	#include <linux/export.h>
a3ee8faa	12
1da177e4 LT	13	#include <asm/oplib.h>
	14	#include <asm/io.h>
	15	#include <asm/auxio.h>
	16	#include <asm/string.h> /* memset(), Linux has no bzero() */
d550bbd4	17	#include <asm/cpu_type.h>
1da177e4	18
a3ee8faa SR	19	#include "kernel.h"
a3ee8faa SR	20
1da177e4 LT	21	/* Probe and map in the Auxiliary I/O register */
	22
	23	/* auxio_register is not static because it is referenced
	24	* in entry.S::floppy_tdone
	25	*/
	26	void __iomem *auxio_register = NULL;
	27	static DEFINE_SPINLOCK(auxio_lock);
	28
	29	void __init auxio_probe(void)
	30	{
8d125562	31	phandle node, auxio_nd;
1da177e4 LT	32	struct linux_prom_registers auxregs[1];
	33	struct resource r;
	34
	35	switch (sparc_cpu_model) {
c000c712	36	case sparc_leon:
1da177e4	37	case sun4d:
1da177e4 LT	38	return;
	39	default:
	40	break;
	41	}
	42	node = prom_getchild(prom_root_node);
	43	auxio_nd = prom_searchsiblings(node, "auxiliary-io");
	44	if(!auxio_nd) {
	45	node = prom_searchsiblings(node, "obio");
	46	node = prom_getchild(node);
	47	auxio_nd = prom_searchsiblings(node, "auxio");
	48	if(!auxio_nd) {
	49	#ifdef CONFIG_PCI
	50	/* There may be auxio on Ebus */
	51	return;
	52	#else
	53	if(prom_searchsiblings(node, "leds")) {
	54	/* VME chassis sun4m machine, no auxio exists. */
	55	return;
	56	}
	57	prom_printf("Cannot find auxio node, cannot continue...\n");
	58	prom_halt();
	59	#endif
	60	}
	61	}
	62	if(prom_getproperty(auxio_nd, "reg", (char *) auxregs, sizeof(auxregs)) <= 0)
	63	return;
	64	prom_apply_obio_ranges(auxregs, 0x1);
	65	/* Map the register both read and write */
	66	r.flags = auxregs[0].which_io & 0xF;
	67	r.start = auxregs[0].phys_addr;
	68	r.end = auxregs[0].phys_addr + auxregs[0].reg_size - 1;
454eeb2d	69	auxio_register = of_ioremap(&r, 0, auxregs[0].reg_size, "auxio");
6e54e950 DM	70	/* Fix the address on sun4m. */
6e54e950 DM	71	if ((((unsigned long) auxregs[0].phys_addr) & 3) == 3)
1da177e4 LT	72	auxio_register += (3 - ((unsigned long)auxio_register & 3));
	73
	74	set_auxio(AUXIO_LED, 0);
	75	}
	76
	77	unsigned char get_auxio(void)
	78	{
	79	if(auxio_register)
	80	return sbus_readb(auxio_register);
	81	return 0;
	82	}
6943f3da	83	EXPORT_SYMBOL(get_auxio);
1da177e4 LT	84
	85	void set_auxio(unsigned char bits_on, unsigned char bits_off)
	86	{
	87	unsigned char regval;
	88	unsigned long flags;
	89	spin_lock_irqsave(&auxio_lock, flags);
6e54e950	90	switch (sparc_cpu_model) {
1da177e4 LT	91	case sun4m:
1da177e4 LT	92	if(!auxio_register)
d1a78c32	93	break; /* VME chassis sun4m, no auxio. */
1da177e4 LT	94	regval = sbus_readb(auxio_register);
	95	sbus_writeb(((regval \| bits_on) & ~bits_off) \| AUXIO_ORMEIN4M,
	96	auxio_register);
	97	break;
	98	case sun4d:
	99	break;
	100	default:
	101	panic("Can't set AUXIO register on this machine.");
6cb79b3f	102	}
1da177e4 LT	103	spin_unlock_irqrestore(&auxio_lock, flags);
1da177e4 LT	104	}
6943f3da	105	EXPORT_SYMBOL(set_auxio);
1da177e4 LT	106
	107	/* sun4m power control register (AUXIO2) */
	108
d2aca8f9	109	volatile u8 __iomem *auxio_power_register = NULL;
1da177e4 LT	110
	111	void __init auxio_power_probe(void)
	112	{
	113	struct linux_prom_registers regs;
8d125562	114	phandle node;
1da177e4 LT	115	struct resource r;
	116
	117	/* Attempt to find the sun4m power control node. */
	118	node = prom_getchild(prom_root_node);
	119	node = prom_searchsiblings(node, "obio");
	120	node = prom_getchild(node);
	121	node = prom_searchsiblings(node, "power");
4a3a2552	122	if (node == 0 \|\| (s32)node == -1)
1da177e4 LT	123	return;
	124
	125	/* Map the power control register. */
	126	if (prom_getproperty(node, "reg", (char *)&regs, sizeof(regs)) <= 0)
	127	return;
	128	prom_apply_obio_ranges(&regs, 1);
	129	memset(&r, 0, sizeof(r));
	130	r.flags = regs.which_io & 0xF;
	131	r.start = regs.phys_addr;
	132	r.end = regs.phys_addr + regs.reg_size - 1;
d2aca8f9 SR	133	auxio_power_register =
d2aca8f9 SR	134	(u8 __iomem *)of_ioremap(&r, 0, regs.reg_size, "auxpower");
1da177e4 LT	135
	136	/* Display a quick message on the console. */
	137	if (auxio_power_register)
	138	printk(KERN_INFO "Power off control detected.\n");
	139	}