[deliverable/linux.git] / drivers / parport / parport_sunbpp.c

/* $Id: parport_sunbpp.c,v 1.12 2001/05/26 03:01:42 davem Exp $
 * Parallel-port routines for Sun architecture
 * 
 * Author: Derrick J. Brashear <shadow@dementia.org>
 *
 * based on work by:
 *          Phil Blundell <philb@gnu.org>
 *          Tim Waugh <tim@cyberelk.demon.co.uk>
 *	    Jose Renau <renau@acm.org>
 *          David Campbell <campbell@tirian.che.curtin.edu.au>
 *          Grant Guenther <grant@torque.net>
 *          Eddie C. Dost <ecd@skynet.be>
 *          Stephen Williams (steve@icarus.com)
 *          Gus Baldauf (gbaldauf@ix.netcom.com)
 *          Peter Zaitcev
 *          Tom Dyas
 */

#include <linux/string.h>
#include <linux/module.h>
#include <linux/delay.h>
#include <linux/errno.h>
#include <linux/ioport.h>
#include <linux/kernel.h>
#include <linux/slab.h>
#include <linux/init.h>

#include <linux/parport.h>

#include <asm/ptrace.h>
#include <linux/interrupt.h>

#include <asm/io.h>
#include <asm/oplib.h>           /* OpenProm Library */
#include <asm/sbus.h>
#include <asm/dma.h>             /* BPP uses LSI 64854 for DMA */
#include <asm/irq.h>
#include <asm/sunbpp.h>

#undef __SUNBPP_DEBUG
#ifdef __SUNBPP_DEBUG
#define dprintk(x) printk x
#else
#define dprintk(x)
#endif

static irqreturn_t parport_sunbpp_interrupt(int irq, void *dev_id, struct pt_regs *regs)
{
	parport_generic_irq(irq, (struct parport *) dev_id, regs);
	return IRQ_HANDLED;
}

static void parport_sunbpp_disable_irq(struct parport *p)
{
	struct bpp_regs __iomem *regs = (struct bpp_regs __iomem *)p->base;
	u32 tmp;

	tmp = sbus_readl(&regs->p_csr);
	tmp &= ~DMA_INT_ENAB;
	sbus_writel(tmp, &regs->p_csr);
}

static void parport_sunbpp_enable_irq(struct parport *p)
{
	struct bpp_regs __iomem *regs = (struct bpp_regs __iomem *)p->base;
	u32 tmp;

	tmp = sbus_readl(&regs->p_csr);
	tmp |= DMA_INT_ENAB;
	sbus_writel(tmp, &regs->p_csr);
}

static void parport_sunbpp_write_data(struct parport *p, unsigned char d)
{
	struct bpp_regs __iomem *regs = (struct bpp_regs __iomem *)p->base;

	sbus_writeb(d, &regs->p_dr);
	dprintk((KERN_DEBUG "wrote 0x%x\n", d));
}

static unsigned char parport_sunbpp_read_data(struct parport *p)
{
	struct bpp_regs __iomem *regs = (struct bpp_regs __iomem *)p->base;

	return sbus_readb(&regs->p_dr);
}

#if 0
static void control_pc_to_sunbpp(struct parport *p, unsigned char status)
{
	struct bpp_regs __iomem *regs = (struct bpp_regs __iomem *)p->base;
	unsigned char value_tcr = sbus_readb(&regs->p_tcr);
	unsigned char value_or = sbus_readb(&regs->p_or);

	if (status & PARPORT_CONTROL_STROBE) 
		value_tcr |= P_TCR_DS;
	if (status & PARPORT_CONTROL_AUTOFD) 
		value_or |= P_OR_AFXN;
	if (status & PARPORT_CONTROL_INIT) 
		value_or |= P_OR_INIT;
	if (status & PARPORT_CONTROL_SELECT) 
		value_or |= P_OR_SLCT_IN;

	sbus_writeb(value_or, &regs->p_or);
	sbus_writeb(value_tcr, &regs->p_tcr);
}
#endif

static unsigned char status_sunbpp_to_pc(struct parport *p)
{
	struct bpp_regs __iomem *regs = (struct bpp_regs __iomem *)p->base;
	unsigned char bits = 0;
	unsigned char value_tcr = sbus_readb(&regs->p_tcr);
	unsigned char value_ir = sbus_readb(&regs->p_ir);

	if (!(value_ir & P_IR_ERR))
		bits |= PARPORT_STATUS_ERROR;
	if (!(value_ir & P_IR_SLCT))
		bits |= PARPORT_STATUS_SELECT;
	if (!(value_ir & P_IR_PE))
		bits |= PARPORT_STATUS_PAPEROUT;
	if (value_tcr & P_TCR_ACK)
		bits |= PARPORT_STATUS_ACK;
	if (!(value_tcr & P_TCR_BUSY))
		bits |= PARPORT_STATUS_BUSY;

	dprintk((KERN_DEBUG "tcr 0x%x ir 0x%x\n", regs->p_tcr, regs->p_ir));
	dprintk((KERN_DEBUG "read status 0x%x\n", bits));
	return bits;
}

static unsigned char control_sunbpp_to_pc(struct parport *p)
{
	struct bpp_regs __iomem *regs = (struct bpp_regs __iomem *)p->base;
	unsigned char bits = 0;
	unsigned char value_tcr = sbus_readb(&regs->p_tcr);
	unsigned char value_or = sbus_readb(&regs->p_or);

	if (!(value_tcr & P_TCR_DS))
		bits |= PARPORT_CONTROL_STROBE;
	if (!(value_or & P_OR_AFXN))
		bits |= PARPORT_CONTROL_AUTOFD;
	if (!(value_or & P_OR_INIT))
		bits |= PARPORT_CONTROL_INIT;
	if (value_or & P_OR_SLCT_IN)
		bits |= PARPORT_CONTROL_SELECT;

	dprintk((KERN_DEBUG "tcr 0x%x or 0x%x\n", regs->p_tcr, regs->p_or));
	dprintk((KERN_DEBUG "read control 0x%x\n", bits));
	return bits;
}

static unsigned char parport_sunbpp_read_control(struct parport *p)
{
	return control_sunbpp_to_pc(p);
}

static unsigned char parport_sunbpp_frob_control(struct parport *p,
						 unsigned char mask,
						 unsigned char val)
{
	struct bpp_regs __iomem *regs = (struct bpp_regs __iomem *)p->base;
	unsigned char value_tcr = sbus_readb(&regs->p_tcr);
	unsigned char value_or = sbus_readb(&regs->p_or);

	dprintk((KERN_DEBUG "frob1: tcr 0x%x or 0x%x\n", regs->p_tcr, regs->p_or));
	if (mask & PARPORT_CONTROL_STROBE) {
		if (val & PARPORT_CONTROL_STROBE) {
			value_tcr &= ~P_TCR_DS;
		} else {
			value_tcr |= P_TCR_DS;
		}
	}
	if (mask & PARPORT_CONTROL_AUTOFD) {
		if (val & PARPORT_CONTROL_AUTOFD) {
			value_or &= ~P_OR_AFXN;
		} else {
			value_or |= P_OR_AFXN;
		}
	}
	if (mask & PARPORT_CONTROL_INIT) {
		if (val & PARPORT_CONTROL_INIT) {
			value_or &= ~P_OR_INIT;
		} else {
			value_or |= P_OR_INIT;
		}
	}
	if (mask & PARPORT_CONTROL_SELECT) {
		if (val & PARPORT_CONTROL_SELECT) {
			value_or |= P_OR_SLCT_IN;
		} else {
			value_or &= ~P_OR_SLCT_IN;
		}
	}

	sbus_writeb(value_or, &regs->p_or);
	sbus_writeb(value_tcr, &regs->p_tcr);
	dprintk((KERN_DEBUG "frob2: tcr 0x%x or 0x%x\n", regs->p_tcr, regs->p_or));
	return parport_sunbpp_read_control(p);
}

static void parport_sunbpp_write_control(struct parport *p, unsigned char d)
{
	const unsigned char wm = (PARPORT_CONTROL_STROBE |
				  PARPORT_CONTROL_AUTOFD |
				  PARPORT_CONTROL_INIT |
				  PARPORT_CONTROL_SELECT);

	parport_sunbpp_frob_control (p, wm, d & wm);
}

static unsigned char parport_sunbpp_read_status(struct parport *p)
{
	return status_sunbpp_to_pc(p);
}

static void parport_sunbpp_data_forward (struct parport *p)
{
	struct bpp_regs __iomem *regs = (struct bpp_regs __iomem *)p->base;
	unsigned char value_tcr = sbus_readb(&regs->p_tcr);

	dprintk((KERN_DEBUG "forward\n"));
	value_tcr &= ~P_TCR_DIR;
	sbus_writeb(value_tcr, &regs->p_tcr);
}

static void parport_sunbpp_data_reverse (struct parport *p)
{
	struct bpp_regs __iomem *regs = (struct bpp_regs __iomem *)p->base;
	u8 val = sbus_readb(&regs->p_tcr);

	dprintk((KERN_DEBUG "reverse\n"));
	val |= P_TCR_DIR;
	sbus_writeb(val, &regs->p_tcr);
}

static void parport_sunbpp_init_state(struct pardevice *dev, struct parport_state *s)
{
	s->u.pc.ctr = 0xc;
	s->u.pc.ecr = 0x0;
}

static void parport_sunbpp_save_state(struct parport *p, struct parport_state *s)
{
	s->u.pc.ctr = parport_sunbpp_read_control(p);
}

static void parport_sunbpp_restore_state(struct parport *p, struct parport_state *s)
{
	parport_sunbpp_write_control(p, s->u.pc.ctr);
}

static struct parport_operations parport_sunbpp_ops = 
{
	.write_data	= parport_sunbpp_write_data,
	.read_data	= parport_sunbpp_read_data,

	.write_control	= parport_sunbpp_write_control,
	.read_control	= parport_sunbpp_read_control,
	.frob_control	= parport_sunbpp_frob_control,

	.read_status	= parport_sunbpp_read_status,

	.enable_irq	= parport_sunbpp_enable_irq,
	.disable_irq	= parport_sunbpp_disable_irq,

	.data_forward	= parport_sunbpp_data_forward,
	.data_reverse	= parport_sunbpp_data_reverse,

	.init_state	= parport_sunbpp_init_state,
	.save_state	= parport_sunbpp_save_state,
	.restore_state	= parport_sunbpp_restore_state,

	.epp_write_data	= parport_ieee1284_epp_write_data,
	.epp_read_data	= parport_ieee1284_epp_read_data,
	.epp_write_addr	= parport_ieee1284_epp_write_addr,
	.epp_read_addr	= parport_ieee1284_epp_read_addr,

	.ecp_write_data	= parport_ieee1284_ecp_write_data,
	.ecp_read_data	= parport_ieee1284_ecp_read_data,
	.ecp_write_addr	= parport_ieee1284_ecp_write_addr,

	.compat_write_data	= parport_ieee1284_write_compat,
	.nibble_read_data	= parport_ieee1284_read_nibble,
	.byte_read_data		= parport_ieee1284_read_byte,

	.owner		= THIS_MODULE,
};

typedef struct {
	struct list_head list;
	struct parport *port;
} Node;
/* no locks, everything's serialized */
static LIST_HEAD(port_list);

static int __init init_one_port(struct sbus_dev *sdev)
{
	struct parport *p;
	/* at least in theory there may be a "we don't dma" case */
	struct parport_operations *ops;
	void __iomem *base;
	int irq, dma, err = 0, size;
	struct bpp_regs __iomem *regs;
	unsigned char value_tcr;
	Node *node;

	dprintk((KERN_DEBUG "init_one_port(%p): ranges, alloc_io, ", sdev));
	node = kmalloc(sizeof(Node), GFP_KERNEL);
	if (!node)
		goto out0;

	irq = sdev->irqs[0];
	base = sbus_ioremap(&sdev->resource[0], 0,
			    sdev->reg_addrs[0].reg_size, 
			    "sunbpp");
	if (!base)
		goto out1;

	size = sdev->reg_addrs[0].reg_size;
	dma = PARPORT_DMA_NONE;

	dprintk(("alloc(ppops), "));
	ops = kmalloc (sizeof (struct parport_operations), GFP_KERNEL);
        if (!ops)
		goto out2;

        memcpy (ops, &parport_sunbpp_ops, sizeof (struct parport_operations));

	dprintk(("register_port\n"));
	if (!(p = parport_register_port((unsigned long)base, irq, dma, ops)))
		goto out3;

	p->size = size;

	dprintk((KERN_DEBUG "init_one_port: request_irq(%08x:%p:%x:%s:%p) ",
		p->irq, parport_sunbpp_interrupt, SA_SHIRQ, p->name, p));
	if ((err = request_irq(p->irq, parport_sunbpp_interrupt,
			       SA_SHIRQ, p->name, p)) != 0) {
		dprintk(("ERROR %d\n", err));
		goto out4;
	}
	dprintk(("OK\n"));
	parport_sunbpp_enable_irq(p);

	regs = (struct bpp_regs __iomem *)p->base;
	dprintk((KERN_DEBUG "forward\n"));
	value_tcr = sbus_readb(&regs->p_tcr);
	value_tcr &= ~P_TCR_DIR;
	sbus_writeb(value_tcr, &regs->p_tcr);

	printk(KERN_INFO "%s: sunbpp at 0x%lx\n", p->name, p->base);
	node->port = p;
	list_add(&node->list, &port_list);
	parport_announce_port (p);

	return 1;

out4:
	parport_put_port(p);
out3:
	kfree(ops);
out2:
	sbus_iounmap(base, size);
out1:
	kfree(node);
out0:
	return err;
}

static int __init parport_sunbpp_init(void)
{
        struct sbus_bus *sbus;
        struct sbus_dev *sdev;
	int count = 0;

	for_each_sbus(sbus) {
		for_each_sbusdev(sdev, sbus) {
			if (!strcmp(sdev->prom_name, "SUNW,bpp"))
				count += init_one_port(sdev);
		}
	}
	return count ? 0 : -ENODEV;
}

static void __exit parport_sunbpp_exit(void)
{
	while (!list_empty(&port_list)) {
		Node *node = list_entry(port_list.next, Node, list);
		struct parport *p = node->port;
		struct parport_operations *ops = p->ops;
		parport_remove_port(p);

		if (p->irq != PARPORT_IRQ_NONE) {
			parport_sunbpp_disable_irq(p);
			free_irq(p->irq, p);
		}
		sbus_iounmap((void __iomem *)p->base, p->size);
		parport_put_port(p);
		kfree (ops);
		list_del(&node->list);
		kfree (node);
	}
}

MODULE_AUTHOR("Derrick J Brashear");
MODULE_DESCRIPTION("Parport Driver for Sparc bidirectional Port");
MODULE_SUPPORTED_DEVICE("Sparc Bidirectional Parallel Port");
MODULE_LICENSE("GPL");

module_init(parport_sunbpp_init)
module_exit(parport_sunbpp_exit)
Commit	Line	Data
1da177e4 LT	1	/* $Id: parport_sunbpp.c,v 1.12 2001/05/26 03:01:42 davem Exp $
	2	* Parallel-port routines for Sun architecture
	3	*
	4	* Author: Derrick J. Brashear <shadow@dementia.org>
	5	*
	6	* based on work by:
	7	* Phil Blundell <philb@gnu.org>
	8	* Tim Waugh <tim@cyberelk.demon.co.uk>
	9	* Jose Renau <renau@acm.org>
	10	* David Campbell <campbell@tirian.che.curtin.edu.au>
	11	* Grant Guenther <grant@torque.net>
	12	* Eddie C. Dost <ecd@skynet.be>
	13	* Stephen Williams (steve@icarus.com)
	14	* Gus Baldauf (gbaldauf@ix.netcom.com)
	15	* Peter Zaitcev
	16	* Tom Dyas
	17	*/
	18
	19	#include <linux/string.h>
	20	#include <linux/module.h>
	21	#include <linux/delay.h>
	22	#include <linux/errno.h>
	23	#include <linux/ioport.h>
	24	#include <linux/kernel.h>
	25	#include <linux/slab.h>
	26	#include <linux/init.h>
	27
	28	#include <linux/parport.h>
	29
	30	#include <asm/ptrace.h>
	31	#include <linux/interrupt.h>
	32
	33	#include <asm/io.h>
	34	#include <asm/oplib.h> /* OpenProm Library */
	35	#include <asm/sbus.h>
	36	#include <asm/dma.h> /* BPP uses LSI 64854 for DMA */
	37	#include <asm/irq.h>
	38	#include <asm/sunbpp.h>
	39
	40	#undef __SUNBPP_DEBUG
	41	#ifdef __SUNBPP_DEBUG
	42	#define dprintk(x) printk x
	43	#else
	44	#define dprintk(x)
	45	#endif
	46
	47	static irqreturn_t parport_sunbpp_interrupt(int irq, void dev_id, struct pt_regs regs)
	48	{
	49	parport_generic_irq(irq, (struct parport *) dev_id, regs);
	50	return IRQ_HANDLED;
	51	}
	52
	53	static void parport_sunbpp_disable_irq(struct parport *p)
	54	{
	55	struct bpp_regs __iomem regs = (struct bpp_regs __iomem )p->base;
	56	u32 tmp;
	57
	58	tmp = sbus_readl(&regs->p_csr);
	59	tmp &= ~DMA_INT_ENAB;
	60	sbus_writel(tmp, &regs->p_csr);
	61	}
	62
	63	static void parport_sunbpp_enable_irq(struct parport *p)
	64	{
65	struct bpp_regs __iomem regs = (struct bpp_regs __iomem )p->base;
66	u32 tmp;
67
68	tmp = sbus_readl(&regs->p_csr);
69	tmp \|= DMA_INT_ENAB;
70	sbus_writel(tmp, &regs->p_csr);
71	}
72
73	static void parport_sunbpp_write_data(struct parport *p, unsigned char d)
74	{
75	struct bpp_regs __iomem regs = (struct bpp_regs __iomem )p->base;
76
77	sbus_writeb(d, &regs->p_dr);
78	dprintk((KERN_DEBUG "wrote 0x%x\n", d));
79	}
80
81	static unsigned char parport_sunbpp_read_data(struct parport *p)
82	{
83	struct bpp_regs __iomem regs = (struct bpp_regs __iomem )p->base;
84
85	return sbus_readb(&regs->p_dr);
86	}
87
88	#if 0
89	static void control_pc_to_sunbpp(struct parport *p, unsigned char status)
90	{
91	struct bpp_regs __iomem regs = (struct bpp_regs __iomem )p->base;
92	unsigned char value_tcr = sbus_readb(&regs->p_tcr);
93	unsigned char value_or = sbus_readb(&regs->p_or);
94
95	if (status & PARPORT_CONTROL_STROBE)
96	value_tcr \|= P_TCR_DS;
97	if (status & PARPORT_CONTROL_AUTOFD)
98	value_or \|= P_OR_AFXN;
99	if (status & PARPORT_CONTROL_INIT)
100	value_or \|= P_OR_INIT;
101	if (status & PARPORT_CONTROL_SELECT)
102	value_or \|= P_OR_SLCT_IN;
103
104	sbus_writeb(value_or, &regs->p_or);
105	sbus_writeb(value_tcr, &regs->p_tcr);
106	}
107	#endif
108
109	static unsigned char status_sunbpp_to_pc(struct parport *p)
110	{
111	struct bpp_regs __iomem regs = (struct bpp_regs __iomem )p->base;
112	unsigned char bits = 0;
113	unsigned char value_tcr = sbus_readb(&regs->p_tcr);
114	unsigned char value_ir = sbus_readb(&regs->p_ir);
115
116	if (!(value_ir & P_IR_ERR))
117	bits \|= PARPORT_STATUS_ERROR;
118	if (!(value_ir & P_IR_SLCT))
119	bits \|= PARPORT_STATUS_SELECT;
120	if (!(value_ir & P_IR_PE))
121	bits \|= PARPORT_STATUS_PAPEROUT;
122	if (value_tcr & P_TCR_ACK)
123	bits \|= PARPORT_STATUS_ACK;
124	if (!(value_tcr & P_TCR_BUSY))
125	bits \|= PARPORT_STATUS_BUSY;
126
127	dprintk((KERN_DEBUG "tcr 0x%x ir 0x%x\n", regs->p_tcr, regs->p_ir));
128	dprintk((KERN_DEBUG "read status 0x%x\n", bits));
129	return bits;
130	}
131
132	static unsigned char control_sunbpp_to_pc(struct parport *p)
133	{
134	struct bpp_regs __iomem regs = (struct bpp_regs __iomem )p->base;
135	unsigned char bits = 0;
136	unsigned char value_tcr = sbus_readb(&regs->p_tcr);
137	unsigned char value_or = sbus_readb(&regs->p_or);
138
139	if (!(value_tcr & P_TCR_DS))
140	bits \|= PARPORT_CONTROL_STROBE;
141	if (!(value_or & P_OR_AFXN))
142	bits \|= PARPORT_CONTROL_AUTOFD;
143	if (!(value_or & P_OR_INIT))
144	bits \|= PARPORT_CONTROL_INIT;
145	if (value_or & P_OR_SLCT_IN)
146	bits \|= PARPORT_CONTROL_SELECT;
147
148	dprintk((KERN_DEBUG "tcr 0x%x or 0x%x\n", regs->p_tcr, regs->p_or));
149	dprintk((KERN_DEBUG "read control 0x%x\n", bits));
150	return bits;
151	}
152
153	static unsigned char parport_sunbpp_read_control(struct parport *p)
154	{
155	return control_sunbpp_to_pc(p);
156	}
157
158	static unsigned char parport_sunbpp_frob_control(struct parport *p,
159	unsigned char mask,
160	unsigned char val)
161	{
162	struct bpp_regs __iomem regs = (struct bpp_regs __iomem )p->base;
163	unsigned char value_tcr = sbus_readb(&regs->p_tcr);
164	unsigned char value_or = sbus_readb(&regs->p_or);
165
166	dprintk((KERN_DEBUG "frob1: tcr 0x%x or 0x%x\n", regs->p_tcr, regs->p_or));
167	if (mask & PARPORT_CONTROL_STROBE) {
168	if (val & PARPORT_CONTROL_STROBE) {
169	value_tcr &= ~P_TCR_DS;
170	} else {
171	value_tcr \|= P_TCR_DS;
172	}
173	}
174	if (mask & PARPORT_CONTROL_AUTOFD) {
175	if (val & PARPORT_CONTROL_AUTOFD) {
176	value_or &= ~P_OR_AFXN;
177	} else {
178	value_or \|= P_OR_AFXN;
179	}
180	}
181	if (mask & PARPORT_CONTROL_INIT) {
182	if (val & PARPORT_CONTROL_INIT) {
183	value_or &= ~P_OR_INIT;
184	} else {
185	value_or \|= P_OR_INIT;
186	}
187	}
188	if (mask & PARPORT_CONTROL_SELECT) {
189	if (val & PARPORT_CONTROL_SELECT) {
190	value_or \|= P_OR_SLCT_IN;
191	} else {
192	value_or &= ~P_OR_SLCT_IN;
193	}
194	}
195
196	sbus_writeb(value_or, &regs->p_or);
197	sbus_writeb(value_tcr, &regs->p_tcr);
198	dprintk((KERN_DEBUG "frob2: tcr 0x%x or 0x%x\n", regs->p_tcr, regs->p_or));
199	return parport_sunbpp_read_control(p);
200	}
201
202	static void parport_sunbpp_write_control(struct parport *p, unsigned char d)
203	{
204	const unsigned char wm = (PARPORT_CONTROL_STROBE \|
205	PARPORT_CONTROL_AUTOFD \|
206	PARPORT_CONTROL_INIT \|
207	PARPORT_CONTROL_SELECT);
208
209	parport_sunbpp_frob_control (p, wm, d & wm);
210	}
211
212	static unsigned char parport_sunbpp_read_status(struct parport *p)
213	{
214	return status_sunbpp_to_pc(p);
215	}
216
217	static void parport_sunbpp_data_forward (struct parport *p)
218	{
219	struct bpp_regs __iomem regs = (struct bpp_regs __iomem )p->base;
220	unsigned char value_tcr = sbus_readb(&regs->p_tcr);
221
222	dprintk((KERN_DEBUG "forward\n"));
223	value_tcr &= ~P_TCR_DIR;
224	sbus_writeb(value_tcr, &regs->p_tcr);
225	}
226
227	static void parport_sunbpp_data_reverse (struct parport *p)
228	{
229	struct bpp_regs __iomem regs = (struct bpp_regs __iomem )p->base;
230	u8 val = sbus_readb(&regs->p_tcr);
231
232	dprintk((KERN_DEBUG "reverse\n"));
233	val \|= P_TCR_DIR;
234	sbus_writeb(val, &regs->p_tcr);
235	}
236
237	static void parport_sunbpp_init_state(struct pardevice dev, struct parport_state s)
238	{
239	s->u.pc.ctr = 0xc;
240	s->u.pc.ecr = 0x0;
241	}
242
243	static void parport_sunbpp_save_state(struct parport p, struct parport_state s)
244	{
245	s->u.pc.ctr = parport_sunbpp_read_control(p);
246	}
247
248	static void parport_sunbpp_restore_state(struct parport p, struct parport_state s)
249	{
250	parport_sunbpp_write_control(p, s->u.pc.ctr);
251	}
252
253	static struct parport_operations parport_sunbpp_ops =
254	{
255	.write_data = parport_sunbpp_write_data,
256	.read_data = parport_sunbpp_read_data,
257
258	.write_control = parport_sunbpp_write_control,
259	.read_control = parport_sunbpp_read_control,
260	.frob_control = parport_sunbpp_frob_control,
261
262	.read_status = parport_sunbpp_read_status,
263
264	.enable_irq = parport_sunbpp_enable_irq,
265	.disable_irq = parport_sunbpp_disable_irq,
266
267	.data_forward = parport_sunbpp_data_forward,
268	.data_reverse = parport_sunbpp_data_reverse,
269
270	.init_state = parport_sunbpp_init_state,
271	.save_state = parport_sunbpp_save_state,
272	.restore_state = parport_sunbpp_restore_state,
273
274	.epp_write_data = parport_ieee1284_epp_write_data,
275	.epp_read_data = parport_ieee1284_epp_read_data,
276	.epp_write_addr = parport_ieee1284_epp_write_addr,
277	.epp_read_addr = parport_ieee1284_epp_read_addr,
278
279	.ecp_write_data = parport_ieee1284_ecp_write_data,
280	.ecp_read_data = parport_ieee1284_ecp_read_data,
281	.ecp_write_addr = parport_ieee1284_ecp_write_addr,
282
283	.compat_write_data = parport_ieee1284_write_compat,
284	.nibble_read_data = parport_ieee1284_read_nibble,
285	.byte_read_data = parport_ieee1284_read_byte,
286
287	.owner = THIS_MODULE,
288	};
289
290	typedef struct {
291	struct list_head list;
292	struct parport *port;
293	} Node;
294	/* no locks, everything's serialized */
295	static LIST_HEAD(port_list);
296
297	static int __init init_one_port(struct sbus_dev *sdev)
298	{
299	struct parport *p;
300	/* at least in theory there may be a "we don't dma" case */
301	struct parport_operations *ops;
302	void __iomem *base;
303	int irq, dma, err = 0, size;
304	struct bpp_regs __iomem *regs;
305	unsigned char value_tcr;
306	Node *node;
307
308	dprintk((KERN_DEBUG "init_one_port(%p): ranges, alloc_io, ", sdev));
309	node = kmalloc(sizeof(Node), GFP_KERNEL);
310	if (!node)
311	goto out0;
312
313	irq = sdev->irqs[0];
314	base = sbus_ioremap(&sdev->resource[0], 0,
315	sdev->reg_addrs[0].reg_size,
316	"sunbpp");
317	if (!base)
318	goto out1;
319
320	size = sdev->reg_addrs[0].reg_size;
321	dma = PARPORT_DMA_NONE;
322
323	dprintk(("alloc(ppops), "));
324	ops = kmalloc (sizeof (struct parport_operations), GFP_KERNEL);
325	if (!ops)
326	goto out2;
327
328	memcpy (ops, &parport_sunbpp_ops, sizeof (struct parport_operations));
329
330	dprintk(("register_port\n"));
331	if (!(p = parport_register_port((unsigned long)base, irq, dma, ops)))
332	goto out3;
333
334	p->size = size;
335
336	dprintk((KERN_DEBUG "init_one_port: request_irq(%08x:%p:%x:%s:%p) ",
337	p->irq, parport_sunbpp_interrupt, SA_SHIRQ, p->name, p));
338	if ((err = request_irq(p->irq, parport_sunbpp_interrupt,
339	SA_SHIRQ, p->name, p)) != 0) {
340	dprintk(("ERROR %d\n", err));
341	goto out4;
342	}
343	dprintk(("OK\n"));
344	parport_sunbpp_enable_irq(p);
345
346	regs = (struct bpp_regs __iomem *)p->base;
347	dprintk((KERN_DEBUG "forward\n"));
348	value_tcr = sbus_readb(&regs->p_tcr);
349	value_tcr &= ~P_TCR_DIR;
350	sbus_writeb(value_tcr, &regs->p_tcr);
351
352	printk(KERN_INFO "%s: sunbpp at 0x%lx\n", p->name, p->base);
353	node->port = p;
354	list_add(&node->list, &port_list);
355	parport_announce_port (p);
356
357	return 1;
358
359	out4:
360	parport_put_port(p);
361	out3:
362	kfree(ops);
363	out2:
364	sbus_iounmap(base, size);
365	out1:
366	kfree(node);
367	out0:
368	return err;
369	}
370
371	static int __init parport_sunbpp_init(void)
372	{
373	struct sbus_bus *sbus;
374	struct sbus_dev *sdev;
375	int count = 0;
376
377	for_each_sbus(sbus) {
378	for_each_sbusdev(sdev, sbus) {
379	if (!strcmp(sdev->prom_name, "SUNW,bpp"))
380	count += init_one_port(sdev);
381	}
382	}
383	return count ? 0 : -ENODEV;
384	}
385
386	static void __exit parport_sunbpp_exit(void)
387	{
388	while (!list_empty(&port_list)) {
389	Node *node = list_entry(port_list.next, Node, list);
390	struct parport *p = node->port;
391	struct parport_operations *ops = p->ops;
392	parport_remove_port(p);
393
394	if (p->irq != PARPORT_IRQ_NONE) {
395	parport_sunbpp_disable_irq(p);
396	free_irq(p->irq, p);
397	}
398	sbus_iounmap((void __iomem *)p->base, p->size);
399	parport_put_port(p);
400	kfree (ops);
401	list_del(&node->list);
402	kfree (node);
403	}
404	}
405
406	MODULE_AUTHOR("Derrick J Brashear");
407	MODULE_DESCRIPTION("Parport Driver for Sparc bidirectional Port");
408	MODULE_SUPPORTED_DEVICE("Sparc Bidirectional Parallel Port");
409	MODULE_LICENSE("GPL");
410
411	module_init(parport_sunbpp_init)
412	module_exit(parport_sunbpp_exit)