[mirror_ubuntu-bionic-kernel.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 <asm/oplib.h>
#include <asm/io.h>
#include <asm/auxio.h>
#include <asm/string.h>		/* memset(), Linux has no bzero() */

/* 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)
{
	int node, auxio_nd;
	struct linux_prom_registers auxregs[1];
	struct resource r;

	switch (sparc_cpu_model) {
	case sparc_leon:
	case sun4d:
	case sun4:
		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 and sun4c. */
	if((((unsigned long) auxregs[0].phys_addr) & 3) == 3 ||
	   sparc_cpu_model == sun4c)
		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 sun4c:
		regval = sbus_readb(auxio_register);
		sbus_writeb(((regval | bits_on) & ~bits_off) | AUXIO_ORMEIN,
			auxio_register);
		break;
	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 unsigned char * auxio_power_register = NULL;

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