xref: /linux/drivers/pcmcia/db1xxx_ss.c (revision f2ee442115c9b6219083c019939a9cc0c9abb2f8)
1 /*
2  * PCMCIA socket code for the Alchemy Db1xxx/Pb1xxx boards.
3  *
4  * Copyright (c) 2009 Manuel Lauss <manuel.lauss@gmail.com>
5  *
6  */
7 
8 /* This is a fairly generic PCMCIA socket driver suitable for the
9  * following Alchemy Development boards:
10  *  Db1000, Db/Pb1500, Db/Pb1100, Db/Pb1550, Db/Pb1200.
11  *
12  * The Db1000 is used as a reference:  Per-socket card-, carddetect- and
13  *  statuschange IRQs connected to SoC GPIOs, control and status register
14  *  bits arranged in per-socket groups in an external PLD.  All boards
15  *  listed here use this layout, including bit positions and meanings.
16  *  Of course there are exceptions in later boards:
17  *
18  *	- Pb1100/Pb1500:  single socket only; voltage key bits VS are
19  *			  at STATUS[5:4] (instead of STATUS[1:0]).
20  *	- Au1200-based:	  additional card-eject irqs, irqs not gpios!
21  */
22 
23 #include <linux/delay.h>
24 #include <linux/gpio.h>
25 #include <linux/interrupt.h>
26 #include <linux/pm.h>
27 #include <linux/module.h>
28 #include <linux/platform_device.h>
29 #include <linux/resource.h>
30 #include <linux/slab.h>
31 #include <linux/spinlock.h>
32 
33 #include <pcmcia/ss.h>
34 
35 #include <asm/mach-au1x00/au1000.h>
36 #include <asm/mach-db1x00/bcsr.h>
37 
38 #define MEM_MAP_SIZE	0x400000
39 #define IO_MAP_SIZE	0x1000
40 
41 struct db1x_pcmcia_sock {
42 	struct pcmcia_socket	socket;
43 	int		nr;		/* socket number */
44 	void		*virt_io;
45 
46 	phys_addr_t	phys_io;
47 	phys_addr_t	phys_attr;
48 	phys_addr_t	phys_mem;
49 
50 	/* previous flags for set_socket() */
51 	unsigned int old_flags;
52 
53 	/* interrupt sources: linux irq numbers! */
54 	int	insert_irq;	/* default carddetect irq */
55 	int	stschg_irq;	/* card-status-change irq */
56 	int	card_irq;	/* card irq */
57 	int	eject_irq;	/* db1200/pb1200 have these */
58 
59 #define BOARD_TYPE_DEFAULT	0	/* most boards */
60 #define BOARD_TYPE_DB1200	1	/* IRQs aren't gpios */
61 #define BOARD_TYPE_PB1100	2	/* VS bits slightly different */
62 	int	board_type;
63 };
64 
65 #define to_db1x_socket(x) container_of(x, struct db1x_pcmcia_sock, socket)
66 
67 /* DB/PB1200: check CPLD SIGSTATUS register bit 10/12 */
68 static int db1200_card_inserted(struct db1x_pcmcia_sock *sock)
69 {
70 	unsigned short sigstat;
71 
72 	sigstat = bcsr_read(BCSR_SIGSTAT);
73 	return sigstat & 1 << (8 + 2 * sock->nr);
74 }
75 
76 /* carddetect gpio: low-active */
77 static int db1000_card_inserted(struct db1x_pcmcia_sock *sock)
78 {
79 	return !gpio_get_value(irq_to_gpio(sock->insert_irq));
80 }
81 
82 static int db1x_card_inserted(struct db1x_pcmcia_sock *sock)
83 {
84 	switch (sock->board_type) {
85 	case BOARD_TYPE_DB1200:
86 		return db1200_card_inserted(sock);
87 	default:
88 		return db1000_card_inserted(sock);
89 	}
90 }
91 
92 /* STSCHG tends to bounce heavily when cards are inserted/ejected.
93  * To avoid this, the interrupt is normally disabled and only enabled
94  * after reset to a card has been de-asserted.
95  */
96 static inline void set_stschg(struct db1x_pcmcia_sock *sock, int en)
97 {
98 	if (sock->stschg_irq != -1) {
99 		if (en)
100 			enable_irq(sock->stschg_irq);
101 		else
102 			disable_irq(sock->stschg_irq);
103 	}
104 }
105 
106 static irqreturn_t db1000_pcmcia_cdirq(int irq, void *data)
107 {
108 	struct db1x_pcmcia_sock *sock = data;
109 
110 	pcmcia_parse_events(&sock->socket, SS_DETECT);
111 
112 	return IRQ_HANDLED;
113 }
114 
115 static irqreturn_t db1000_pcmcia_stschgirq(int irq, void *data)
116 {
117 	struct db1x_pcmcia_sock *sock = data;
118 
119 	pcmcia_parse_events(&sock->socket, SS_STSCHG);
120 
121 	return IRQ_HANDLED;
122 }
123 
124 static irqreturn_t db1200_pcmcia_cdirq(int irq, void *data)
125 {
126 	struct db1x_pcmcia_sock *sock = data;
127 
128 	/* Db/Pb1200 have separate per-socket insertion and ejection
129 	 * interrupts which stay asserted as long as the card is
130 	 * inserted/missing.  The one which caused us to be called
131 	 * needs to be disabled and the other one enabled.
132 	 */
133 	if (irq == sock->insert_irq) {
134 		disable_irq_nosync(sock->insert_irq);
135 		enable_irq(sock->eject_irq);
136 	} else {
137 		disable_irq_nosync(sock->eject_irq);
138 		enable_irq(sock->insert_irq);
139 	}
140 
141 	pcmcia_parse_events(&sock->socket, SS_DETECT);
142 
143 	return IRQ_HANDLED;
144 }
145 
146 static int db1x_pcmcia_setup_irqs(struct db1x_pcmcia_sock *sock)
147 {
148 	int ret;
149 
150 	if (sock->stschg_irq != -1) {
151 		ret = request_irq(sock->stschg_irq, db1000_pcmcia_stschgirq,
152 				  0, "pcmcia_stschg", sock);
153 		if (ret)
154 			return ret;
155 	}
156 
157 	/* Db/Pb1200 have separate per-socket insertion and ejection
158 	 * interrupts, which should show edge behaviour but don't.
159 	 * So interrupts are disabled until both insertion and
160 	 * ejection handler have been registered and the currently
161 	 * active one disabled.
162 	 */
163 	if (sock->board_type == BOARD_TYPE_DB1200) {
164 		ret = request_irq(sock->insert_irq, db1200_pcmcia_cdirq,
165 				  IRQF_DISABLED, "pcmcia_insert", sock);
166 		if (ret)
167 			goto out1;
168 
169 		ret = request_irq(sock->eject_irq, db1200_pcmcia_cdirq,
170 				  IRQF_DISABLED, "pcmcia_eject", sock);
171 		if (ret) {
172 			free_irq(sock->insert_irq, sock);
173 			goto out1;
174 		}
175 
176 		/* enable the currently silent one */
177 		if (db1200_card_inserted(sock))
178 			enable_irq(sock->eject_irq);
179 		else
180 			enable_irq(sock->insert_irq);
181 	} else {
182 		/* all other (older) Db1x00 boards use a GPIO to show
183 		 * card detection status:  use both-edge triggers.
184 		 */
185 		irq_set_irq_type(sock->insert_irq, IRQ_TYPE_EDGE_BOTH);
186 		ret = request_irq(sock->insert_irq, db1000_pcmcia_cdirq,
187 				  0, "pcmcia_carddetect", sock);
188 
189 		if (ret)
190 			goto out1;
191 	}
192 
193 	return 0;	/* all done */
194 
195 out1:
196 	if (sock->stschg_irq != -1)
197 		free_irq(sock->stschg_irq, sock);
198 
199 	return ret;
200 }
201 
202 static void db1x_pcmcia_free_irqs(struct db1x_pcmcia_sock *sock)
203 {
204 	if (sock->stschg_irq != -1)
205 		free_irq(sock->stschg_irq, sock);
206 
207 	free_irq(sock->insert_irq, sock);
208 	if (sock->eject_irq != -1)
209 		free_irq(sock->eject_irq, sock);
210 }
211 
212 /*
213  * configure a PCMCIA socket on the Db1x00 series of boards (and
214  * compatibles).
215  *
216  * 2 external registers are involved:
217  *   pcmcia_status (offset 0x04): bits [0:1/2:3]: read card voltage id
218  *   pcmcia_control(offset 0x10):
219  *	bits[0:1] set vcc for card
220  *	bits[2:3] set vpp for card
221  *	bit 4:	enable data buffers
222  *	bit 7:	reset# for card
223  *	add 8 for second socket.
224  */
225 static int db1x_pcmcia_configure(struct pcmcia_socket *skt,
226 				 struct socket_state_t *state)
227 {
228 	struct db1x_pcmcia_sock *sock = to_db1x_socket(skt);
229 	unsigned short cr_clr, cr_set;
230 	unsigned int changed;
231 	int v, p, ret;
232 
233 	/* card voltage setup */
234 	cr_clr = (0xf << (sock->nr * 8)); /* clear voltage settings */
235 	cr_set = 0;
236 	v = p = ret = 0;
237 
238 	switch (state->Vcc) {
239 	case 50:
240 		++v;
241 	case 33:
242 		++v;
243 	case 0:
244 		break;
245 	default:
246 		printk(KERN_INFO "pcmcia%d unsupported Vcc %d\n",
247 			sock->nr, state->Vcc);
248 	}
249 
250 	switch (state->Vpp) {
251 	case 12:
252 		++p;
253 	case 33:
254 	case 50:
255 		++p;
256 	case 0:
257 		break;
258 	default:
259 		printk(KERN_INFO "pcmcia%d unsupported Vpp %d\n",
260 			sock->nr, state->Vpp);
261 	}
262 
263 	/* sanity check: Vpp must be 0, 12, or Vcc */
264 	if (((state->Vcc == 33) && (state->Vpp == 50)) ||
265 	    ((state->Vcc == 50) && (state->Vpp == 33))) {
266 		printk(KERN_INFO "pcmcia%d bad Vcc/Vpp combo (%d %d)\n",
267 			sock->nr, state->Vcc, state->Vpp);
268 		v = p = 0;
269 		ret = -EINVAL;
270 	}
271 
272 	/* create new voltage code */
273 	cr_set |= ((v << 2) | p) << (sock->nr * 8);
274 
275 	changed = state->flags ^ sock->old_flags;
276 
277 	if (changed & SS_RESET) {
278 		if (state->flags & SS_RESET) {
279 			set_stschg(sock, 0);
280 			/* assert reset, disable io buffers */
281 			cr_clr |= (1 << (7 + (sock->nr * 8)));
282 			cr_clr |= (1 << (4 + (sock->nr * 8)));
283 		} else {
284 			/* de-assert reset, enable io buffers */
285 			cr_set |= 1 << (7 + (sock->nr * 8));
286 			cr_set |= 1 << (4 + (sock->nr * 8));
287 		}
288 	}
289 
290 	/* update PCMCIA configuration */
291 	bcsr_mod(BCSR_PCMCIA, cr_clr, cr_set);
292 
293 	sock->old_flags = state->flags;
294 
295 	/* reset was taken away: give card time to initialize properly */
296 	if ((changed & SS_RESET) && !(state->flags & SS_RESET)) {
297 		msleep(500);
298 		set_stschg(sock, 1);
299 	}
300 
301 	return ret;
302 }
303 
304 /* VCC bits at [3:2]/[11:10] */
305 #define GET_VCC(cr, socknr)		\
306 	((((cr) >> 2) >> ((socknr) * 8)) & 3)
307 
308 /* VS bits at [0:1]/[3:2] */
309 #define GET_VS(sr, socknr)		\
310 	(((sr) >> (2 * (socknr))) & 3)
311 
312 /* reset bits at [7]/[15] */
313 #define GET_RESET(cr, socknr)		\
314 	((cr) & (1 << (7 + (8 * (socknr)))))
315 
316 static int db1x_pcmcia_get_status(struct pcmcia_socket *skt,
317 				  unsigned int *value)
318 {
319 	struct db1x_pcmcia_sock *sock = to_db1x_socket(skt);
320 	unsigned short cr, sr;
321 	unsigned int status;
322 
323 	status = db1x_card_inserted(sock) ? SS_DETECT : 0;
324 
325 	cr = bcsr_read(BCSR_PCMCIA);
326 	sr = bcsr_read(BCSR_STATUS);
327 
328 	/* PB1100/PB1500: voltage key bits are at [5:4] */
329 	if (sock->board_type == BOARD_TYPE_PB1100)
330 		sr >>= 4;
331 
332 	/* determine card type */
333 	switch (GET_VS(sr, sock->nr)) {
334 	case 0:
335 	case 2:
336 		status |= SS_3VCARD;	/* 3V card */
337 	case 3:
338 		break;			/* 5V card: set nothing */
339 	default:
340 		status |= SS_XVCARD;	/* treated as unsupported in core */
341 	}
342 
343 	/* if Vcc is not zero, we have applied power to a card */
344 	status |= GET_VCC(cr, sock->nr) ? SS_POWERON : 0;
345 
346 	/* reset de-asserted? then we're ready */
347 	status |= (GET_RESET(cr, sock->nr)) ? SS_READY : SS_RESET;
348 
349 	*value = status;
350 
351 	return 0;
352 }
353 
354 static int db1x_pcmcia_sock_init(struct pcmcia_socket *skt)
355 {
356 	return 0;
357 }
358 
359 static int db1x_pcmcia_sock_suspend(struct pcmcia_socket *skt)
360 {
361 	return 0;
362 }
363 
364 static int au1x00_pcmcia_set_io_map(struct pcmcia_socket *skt,
365 				    struct pccard_io_map *map)
366 {
367 	struct db1x_pcmcia_sock *sock = to_db1x_socket(skt);
368 
369 	map->start = (u32)sock->virt_io;
370 	map->stop = map->start + IO_MAP_SIZE;
371 
372 	return 0;
373 }
374 
375 static int au1x00_pcmcia_set_mem_map(struct pcmcia_socket *skt,
376 				     struct pccard_mem_map *map)
377 {
378 	struct db1x_pcmcia_sock *sock = to_db1x_socket(skt);
379 
380 	if (map->flags & MAP_ATTRIB)
381 		map->static_start = sock->phys_attr + map->card_start;
382 	else
383 		map->static_start = sock->phys_mem + map->card_start;
384 
385 	return 0;
386 }
387 
388 static struct pccard_operations db1x_pcmcia_operations = {
389 	.init			= db1x_pcmcia_sock_init,
390 	.suspend		= db1x_pcmcia_sock_suspend,
391 	.get_status		= db1x_pcmcia_get_status,
392 	.set_socket		= db1x_pcmcia_configure,
393 	.set_io_map		= au1x00_pcmcia_set_io_map,
394 	.set_mem_map		= au1x00_pcmcia_set_mem_map,
395 };
396 
397 static int __devinit db1x_pcmcia_socket_probe(struct platform_device *pdev)
398 {
399 	struct db1x_pcmcia_sock *sock;
400 	struct resource *r;
401 	int ret, bid;
402 
403 	sock = kzalloc(sizeof(struct db1x_pcmcia_sock), GFP_KERNEL);
404 	if (!sock)
405 		return -ENOMEM;
406 
407 	sock->nr = pdev->id;
408 
409 	bid = BCSR_WHOAMI_BOARD(bcsr_read(BCSR_WHOAMI));
410 	switch (bid) {
411 	case BCSR_WHOAMI_PB1500:
412 	case BCSR_WHOAMI_PB1500R2:
413 	case BCSR_WHOAMI_PB1100:
414 		sock->board_type = BOARD_TYPE_PB1100;
415 		break;
416 	case BCSR_WHOAMI_DB1000 ... BCSR_WHOAMI_PB1550_SDR:
417 		sock->board_type = BOARD_TYPE_DEFAULT;
418 		break;
419 	case BCSR_WHOAMI_PB1200 ... BCSR_WHOAMI_DB1200:
420 		sock->board_type = BOARD_TYPE_DB1200;
421 		break;
422 	default:
423 		printk(KERN_INFO "db1xxx-ss: unknown board %d!\n", bid);
424 		ret = -ENODEV;
425 		goto out0;
426 	};
427 
428 	/*
429 	 * gather resources necessary and optional nice-to-haves to
430 	 * operate a socket:
431 	 * This includes IRQs for Carddetection/ejection, the card
432 	 *  itself and optional status change detection.
433 	 * Also, the memory areas covered by a socket.  For these
434 	 *  we require the real 36bit addresses (see the au1000.h
435 	 *  header for more information).
436 	 */
437 
438 	/* card: irq assigned to the card itself. */
439 	r = platform_get_resource_byname(pdev, IORESOURCE_IRQ, "card");
440 	sock->card_irq = r ? r->start : 0;
441 
442 	/* insert: irq which triggers on card insertion/ejection */
443 	r = platform_get_resource_byname(pdev, IORESOURCE_IRQ, "insert");
444 	sock->insert_irq = r ? r->start : -1;
445 
446 	/* stschg: irq which trigger on card status change (optional) */
447 	r = platform_get_resource_byname(pdev, IORESOURCE_IRQ, "stschg");
448 	sock->stschg_irq = r ? r->start : -1;
449 
450 	/* eject: irq which triggers on ejection (DB1200/PB1200 only) */
451 	r = platform_get_resource_byname(pdev, IORESOURCE_IRQ, "eject");
452 	sock->eject_irq = r ? r->start : -1;
453 
454 	ret = -ENODEV;
455 
456 	/* 36bit PCMCIA Attribute area address */
457 	r = platform_get_resource_byname(pdev, IORESOURCE_MEM, "pcmcia-attr");
458 	if (!r) {
459 		printk(KERN_ERR "pcmcia%d has no 'pseudo-attr' resource!\n",
460 			sock->nr);
461 		goto out0;
462 	}
463 	sock->phys_attr = r->start;
464 
465 	/* 36bit PCMCIA Memory area address */
466 	r = platform_get_resource_byname(pdev, IORESOURCE_MEM, "pcmcia-mem");
467 	if (!r) {
468 		printk(KERN_ERR "pcmcia%d has no 'pseudo-mem' resource!\n",
469 			sock->nr);
470 		goto out0;
471 	}
472 	sock->phys_mem = r->start;
473 
474 	/* 36bit PCMCIA IO area address */
475 	r = platform_get_resource_byname(pdev, IORESOURCE_MEM, "pcmcia-io");
476 	if (!r) {
477 		printk(KERN_ERR "pcmcia%d has no 'pseudo-io' resource!\n",
478 			sock->nr);
479 		goto out0;
480 	}
481 	sock->phys_io = r->start;
482 
483 	/*
484 	 * PCMCIA client drivers use the inb/outb macros to access
485 	 * the IO registers.  Since mips_io_port_base is added
486 	 * to the access address of the mips implementation of
487 	 * inb/outb, we need to subtract it here because we want
488 	 * to access the I/O or MEM address directly, without
489 	 * going through this "mips_io_port_base" mechanism.
490 	 */
491 	sock->virt_io = (void *)(ioremap(sock->phys_io, IO_MAP_SIZE) -
492 				 mips_io_port_base);
493 
494 	if (!sock->virt_io) {
495 		printk(KERN_ERR "pcmcia%d: cannot remap IO area\n",
496 			sock->nr);
497 		ret = -ENOMEM;
498 		goto out0;
499 	}
500 
501 	sock->socket.ops	= &db1x_pcmcia_operations;
502 	sock->socket.owner	= THIS_MODULE;
503 	sock->socket.pci_irq	= sock->card_irq;
504 	sock->socket.features	= SS_CAP_STATIC_MAP | SS_CAP_PCCARD;
505 	sock->socket.map_size	= MEM_MAP_SIZE;
506 	sock->socket.io_offset	= (unsigned long)sock->virt_io;
507 	sock->socket.dev.parent	= &pdev->dev;
508 	sock->socket.resource_ops = &pccard_static_ops;
509 
510 	platform_set_drvdata(pdev, sock);
511 
512 	ret = db1x_pcmcia_setup_irqs(sock);
513 	if (ret) {
514 		printk(KERN_ERR "pcmcia%d cannot setup interrupts\n",
515 			sock->nr);
516 		goto out1;
517 	}
518 
519 	set_stschg(sock, 0);
520 
521 	ret = pcmcia_register_socket(&sock->socket);
522 	if (ret) {
523 		printk(KERN_ERR "pcmcia%d failed to register\n", sock->nr);
524 		goto out2;
525 	}
526 
527 	printk(KERN_INFO "Alchemy Db/Pb1xxx pcmcia%d @ io/attr/mem %09llx"
528 		"(%p) %09llx %09llx  card/insert/stschg/eject irqs @ %d "
529 		"%d %d %d\n", sock->nr, sock->phys_io, sock->virt_io,
530 		sock->phys_attr, sock->phys_mem, sock->card_irq,
531 		sock->insert_irq, sock->stschg_irq, sock->eject_irq);
532 
533 	return 0;
534 
535 out2:
536 	db1x_pcmcia_free_irqs(sock);
537 out1:
538 	iounmap((void *)(sock->virt_io + (u32)mips_io_port_base));
539 out0:
540 	kfree(sock);
541 	return ret;
542 }
543 
544 static int __devexit db1x_pcmcia_socket_remove(struct platform_device *pdev)
545 {
546 	struct db1x_pcmcia_sock *sock = platform_get_drvdata(pdev);
547 
548 	db1x_pcmcia_free_irqs(sock);
549 	pcmcia_unregister_socket(&sock->socket);
550 	iounmap((void *)(sock->virt_io + (u32)mips_io_port_base));
551 	kfree(sock);
552 
553 	return 0;
554 }
555 
556 static struct platform_driver db1x_pcmcia_socket_driver = {
557 	.driver	= {
558 		.name	= "db1xxx_pcmcia",
559 		.owner	= THIS_MODULE,
560 	},
561 	.probe		= db1x_pcmcia_socket_probe,
562 	.remove		= __devexit_p(db1x_pcmcia_socket_remove),
563 };
564 
565 int __init db1x_pcmcia_socket_load(void)
566 {
567 	return platform_driver_register(&db1x_pcmcia_socket_driver);
568 }
569 
570 void  __exit db1x_pcmcia_socket_unload(void)
571 {
572 	platform_driver_unregister(&db1x_pcmcia_socket_driver);
573 }
574 
575 module_init(db1x_pcmcia_socket_load);
576 module_exit(db1x_pcmcia_socket_unload);
577 
578 MODULE_LICENSE("GPL");
579 MODULE_DESCRIPTION("PCMCIA Socket Services for Alchemy Db/Pb1x00 boards");
580 MODULE_AUTHOR("Manuel Lauss");
581