1 /*
2 * FILE NAME
3 * drivers/pcmcia/vrc4173_cardu.c
4 *
5 * BRIEF MODULE DESCRIPTION
6 * NEC VRC4173 CARDU driver for Socket Services
7 * (This device doesn't support CardBus. it is supporting only 16bit PC Card.)
8 *
9 * Copyright 2002,2003 Yoichi Yuasa <yuasa@hh.iij4u.or.jp>
10 *
11 * This program is free software; you can redistribute it and/or modify it
12 * under the terms of the GNU General Public License as published by the
13 * Free Software Foundation; either version 2 of the License, or (at your
14 * option) any later version.
15 *
16 * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
17 * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
18 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
21 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
22 * OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
23 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
24 * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE
25 * USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26 *
27 * You should have received a copy of the GNU General Public License along
28 * with this program; if not, write to the Free Software Foundation, Inc.,
29 * 675 Mass Ave, Cambridge, MA 02139, USA.
30 */
31 #include <linux/init.h>
32 #include <linux/module.h>
33 #include <linux/pci.h>
34 #include <linux/spinlock.h>
35 #include <linux/types.h>
36
37 #include <asm/io.h>
38
39 #include <pcmcia/ss.h>
40
41 #include "vrc4173_cardu.h"
42
43 MODULE_DESCRIPTION("NEC VRC4173 CARDU driver for Socket Services");
44 MODULE_AUTHOR("Yoichi Yuasa <yuasa@hh.iij4u.or.jp>");
45 MODULE_LICENSE("GPL");
46
47 static int vrc4173_cardu_slots;
48
49 static vrc4173_socket_t cardu_sockets[CARDU_MAX_SOCKETS];
50
51 extern struct socket_info_t *pcmcia_register_socket (int slot,
52 struct pccard_operations *vtable,
53 int use_bus_pm);
54 extern void pcmcia_unregister_socket(struct socket_info_t *s);
55
56 static inline uint8_t exca_readb(vrc4173_socket_t *socket, uint16_t offset)
57 {
58 return readb(socket->base + EXCA_REGS_BASE + offset);
59 }
60
61 static inline uint16_t exca_readw(vrc4173_socket_t *socket, uint16_t offset)
62 {
63 uint16_t val;
64
65 val = readb(socket->base + EXCA_REGS_BASE + offset);
66 val |= (u16)readb(socket->base + EXCA_REGS_BASE + offset + 1) << 8;
67
68 return val;
69 }
70
71 static inline void exca_writeb(vrc4173_socket_t *socket, uint16_t offset, uint8_t val)
72 {
73 writeb(val, socket->base + EXCA_REGS_BASE + offset);
74 }
75
76 static inline void exca_writew(vrc4173_socket_t *socket, uint8_t offset, uint16_t val)
77 {
78 writeb((u8)val, socket->base + EXCA_REGS_BASE + offset);
79 writeb((u8)(val >> 8), socket->base + EXCA_REGS_BASE + offset + 1);
80 }
81
82 static inline uint32_t cardbus_socket_readl(vrc4173_socket_t *socket, u16 offset)
83 {
84 return readl(socket->base + CARDBUS_SOCKET_REGS_BASE + offset);
85 }
86
87 static inline void cardbus_socket_writel(vrc4173_socket_t *socket, u16 offset, uint32_t val)
88 {
89 writel(val, socket->base + CARDBUS_SOCKET_REGS_BASE + offset);
90 }
91
92 static void cardu_pciregs_init(struct pci_dev *dev)
93 {
94 u32 syscnt;
95 u16 brgcnt;
96 u8 devcnt;
97
98 pci_write_config_dword(dev, 0x1c, 0x10000000);
99 pci_write_config_dword(dev, 0x20, 0x17fff000);
100 pci_write_config_dword(dev, 0x2c, 0);
101 pci_write_config_dword(dev, 0x30, 0xfffc);
102
103 pci_read_config_word(dev, BRGCNT, &brgcnt);
104 brgcnt &= ~IREQ_INT;
105 pci_write_config_word(dev, BRGCNT, brgcnt);
106
107 pci_read_config_dword(dev, SYSCNT, &syscnt);
108 syscnt &= ~(BAD_VCC_REQ_DISB|PCPCI_EN|CH_ASSIGN_MASK|SUB_ID_WR_EN|PCI_CLK_RIN);
109 syscnt |= (CH_ASSIGN_NODMA|ASYN_INT_MODE);
110 pci_write_config_dword(dev, SYSCNT, syscnt);
111
112 pci_read_config_byte(dev, DEVCNT, &devcnt);
113 devcnt &= ~(ZOOM_VIDEO_EN|SR_PCI_INT_SEL_MASK|PCI_INT_MODE|IRQ_MODE);
114 devcnt |= (SR_PCI_INT_SEL_NONE|IFG);
115 pci_write_config_byte(dev, DEVCNT, devcnt);
116
117 pci_write_config_byte(dev, CHIPCNT, S_PREF_DISB);
118
119 pci_write_config_byte(dev, SERRDIS, 0);
120 }
121
122 static int cardu_init(unsigned int slot)
123 {
124 vrc4173_socket_t *socket = &cardu_sockets[slot];
125
126 cardu_pciregs_init(socket->dev);
127
128 /* CARD_SC bits are cleared by reading CARD_SC. */
129 exca_writeb(socket, GLO_CNT, 0);
130
131 socket->cap.features |= SS_CAP_PCCARD | SS_CAP_PAGE_REGS;
132 socket->cap.irq_mask = 0;
133 socket->cap.map_size = 0x1000;
134 socket->cap.pci_irq = socket->dev->irq;
135 socket->events = 0;
136 spin_lock_init(socket->event_lock);
137
138 /* Enable PC Card status interrupts */
139 exca_writeb(socket, CARD_SCI, CARD_DT_EN|RDY_EN|BAT_WAR_EN|BAT_DEAD_EN);
140
141 return 0;
142 }
143
144 static int cardu_suspend(unsigned int slot)
145 {
146 return -EINVAL;
147 }
148
149 static int cardu_register_callback(unsigned int sock,
150 void (*handler)(void *, unsigned int),
151 void * info)
152 {
153 vrc4173_socket_t *socket = &cardu_sockets[sock];
154
155 socket->handler = handler;
156 socket->info = info;
157
158 return 0;
159 }
160
161 static int cardu_inquire_socket(unsigned int sock, socket_cap_t *cap)
162 {
163 vrc4173_socket_t *socket = &cardu_sockets[sock];
164
165 *cap = socket->cap;
166
167 return 0;
168 }
169
170 static int cardu_get_status(unsigned int sock, u_int *value)
171 {
172 vrc4173_socket_t *socket = &cardu_sockets[sock];
173 uint32_t state;
174 uint8_t status;
175 u_int val = 0;
176
177 status = exca_readb(socket, IF_STATUS);
178 if (status & CARD_PWR) val |= SS_POWERON;
179 if (status & READY) val |= SS_READY;
180 if (status & CARD_WP) val |= SS_WRPROT;
181 if ((status & (CARD_DETECT1|CARD_DETECT2)) == (CARD_DETECT1|CARD_DETECT2))
182 val |= SS_DETECT;
183 if (exca_readb(socket, INT_GEN_CNT) & CARD_TYPE_IO) {
184 if (status & STSCHG) val |= SS_STSCHG;
185 } else {
186 status &= BV_DETECT_MASK;
187 if (status != BV_DETECT_GOOD) {
188 if (status == BV_DETECT_WARN) val |= SS_BATWARN;
189 else val |= SS_BATDEAD;
190 }
191 }
192
193 state = cardbus_socket_readl(socket, SKT_PRE_STATE);
194 if (state & VOL_3V_CARD_DT) val |= SS_3VCARD;
195 if (state & VOL_XV_CARD_DT) val |= SS_XVCARD;
196 if (state & CB_CARD_DT) val |= SS_CARDBUS;
197 if (!(state &
198 (VOL_YV_CARD_DT|VOL_XV_CARD_DT|VOL_3V_CARD_DT|VOL_5V_CARD_DT|CCD20|CCD10)))
199 val |= SS_PENDING;
200
201 *value = val;
202
203 return 0;
204 }
205
206 static inline u_char get_Vcc_value(uint8_t val)
207 {
208 switch (val & VCC_MASK) {
209 case VCC_3V:
210 return 33;
211 case VCC_5V:
212 return 50;
213 }
214
215 return 0;
216 }
217
218 static inline u_char get_Vpp_value(uint8_t val)
219 {
220 switch (val & VPP_MASK) {
221 case VPP_12V:
222 return 120;
223 case VPP_VCC:
224 return get_Vcc_value(val);
225 }
226
227 return 0;
228 }
229
230 static int cardu_get_socket(unsigned int sock, socket_state_t *state)
231 {
232 vrc4173_socket_t *socket = &cardu_sockets[sock];
233 uint8_t val;
234
235 val = exca_readb(socket, PWR_CNT);
236 state->Vcc = get_Vcc_value(val);
237 state->Vpp = get_Vpp_value(val);
238 state->flags = 0;
239 if (val & CARD_OUT_EN) state->flags |= SS_OUTPUT_ENA;
240
241 val = exca_readb(socket, INT_GEN_CNT);
242 if (!(val & CARD_REST0)) state->flags |= SS_RESET;
243 if (val & CARD_TYPE_IO) state->flags |= SS_IOCARD;
244
245 return 0;
246 }
247
248 static inline uint8_t set_Vcc_value(u_char Vcc)
249 {
250 switch (Vcc) {
251 case 33:
252 return VCC_3V;
253 case 50:
254 return VCC_5V;
255 }
256
257 return VCC_0V;
258 }
259
260 static inline uint8_t set_Vpp_value(u_char Vpp)
261 {
262 switch (Vpp) {
263 case 33:
264 case 50:
265 return VPP_VCC;
266 case 120:
267 return VPP_12V;
268 }
269
270 return VPP_0V;
271 }
272
273 static int cardu_set_socket(unsigned int sock, socket_state_t *state)
274 {
275 vrc4173_socket_t *socket = &cardu_sockets[sock];
276 uint8_t val;
277
278 if (((state->Vpp == 33) || (state->Vpp == 50)) && (state->Vpp != state->Vcc))
279 return -EINVAL;
280
281 val = set_Vcc_value(state->Vcc);
282 val |= set_Vpp_value(state->Vpp);
283 if (state->flags & SS_OUTPUT_ENA) val |= CARD_OUT_EN;
284 exca_writeb(socket, PWR_CNT, val);
285
286 val = exca_readb(socket, INT_GEN_CNT) & CARD_REST0;
287 if (state->flags & SS_RESET) val &= ~CARD_REST0;
288 else val |= CARD_REST0;
289 if (state->flags & SS_IOCARD) val |= CARD_TYPE_IO;
290 exca_writeb(socket, INT_GEN_CNT, val);
291
292 return 0;
293 }
294
295 static int cardu_get_io_map(unsigned int sock, struct pccard_io_map *io)
296 {
297 vrc4173_socket_t *socket = &cardu_sockets[sock];
298 uint8_t ioctl, window;
299 u_char map;
300
301 map = io->map;
302 if (map > 1)
303 return -EINVAL;
304
305 io->start = exca_readw(socket, IO_WIN_SA(map));
306 io->stop = exca_readw(socket, IO_WIN_EA(map));
307
308 ioctl = exca_readb(socket, IO_WIN_CNT);
309 window = exca_readb(socket, ADR_WIN_EN);
310 io->flags = (window & IO_WIN_EN(map)) ? MAP_ACTIVE : 0;
311 if (ioctl & IO_WIN_DATA_AUTOSZ(map))
312 io->flags |= MAP_AUTOSZ;
313 else if (ioctl & IO_WIN_DATA_16BIT(map))
314 io->flags |= MAP_16BIT;
315
316 return 0;
317 }
318
319 static int cardu_set_io_map(unsigned int sock, struct pccard_io_map *io)
320 {
321 vrc4173_socket_t *socket = &cardu_sockets[sock];
322 uint16_t ioctl;
323 uint8_t window, enable;
324 u_char map;
325
326 map = io->map;
327 if (map > 1)
328 return -EINVAL;
329
330 window = exca_readb(socket, ADR_WIN_EN);
331 enable = IO_WIN_EN(map);
332
333 if (window & enable) {
334 window &= ~enable;
335 exca_writeb(socket, ADR_WIN_EN, window);
336 }
337
338 exca_writew(socket, IO_WIN_SA(map), io->start);
339 exca_writew(socket, IO_WIN_EA(map), io->stop);
340
341 ioctl = exca_readb(socket, IO_WIN_CNT) & ~IO_WIN_CNT_MASK(map);
342 if (io->flags & MAP_AUTOSZ) ioctl |= IO_WIN_DATA_AUTOSZ(map);
343 else if (io->flags & MAP_16BIT) ioctl |= IO_WIN_DATA_16BIT(map);
344 exca_writeb(socket, IO_WIN_CNT, ioctl);
345
346 if (io->flags & MAP_ACTIVE)
347 exca_writeb(socket, ADR_WIN_EN, window | enable);
348
349 return 0;
350 }
351
352 static int cardu_get_mem_map(unsigned int sock, struct pccard_mem_map *mem)
353 {
354 vrc4173_socket_t *socket = &cardu_sockets[sock];
355 uint32_t start, stop, offset, page;
356 uint8_t window;
357 u_char map;
358
359 map = mem->map;
360 if (map > 4)
361 return -EINVAL;
362
363 window = exca_readb(socket, ADR_WIN_EN);
364 mem->flags = (window & MEM_WIN_EN(map)) ? MAP_ACTIVE : 0;
365
366 start = exca_readw(socket, MEM_WIN_SA(map));
367 mem->flags |= (start & MEM_WIN_DSIZE) ? MAP_16BIT : 0;
368 start = (start & 0x0fff) << 12;
369
370 stop = exca_readw(socket, MEM_WIN_EA(map));
371 stop = ((stop & 0x0fff) << 12) + 0x0fff;
372
373 offset = exca_readw(socket, MEM_WIN_OA(map));
374 mem->flags |= (offset & MEM_WIN_WP) ? MAP_WRPROT : 0;
375 mem->flags |= (offset & MEM_WIN_REGSET) ? MAP_ATTRIB : 0;
376 offset = ((offset & 0x3fff) << 12) + start;
377 mem->card_start = offset & 0x03ffffff;
378
379 page = exca_readb(socket, MEM_WIN_SAU(map)) << 24;
380 mem->sys_start = start + page;
381 mem->sys_stop = start + page;
382
383 return 0;
384 }
385
386 static int cardu_set_mem_map(unsigned int sock, struct pccard_mem_map *mem)
387 {
388 vrc4173_socket_t *socket = &cardu_sockets[sock];
389 uint16_t value;
390 uint8_t window, enable;
391 u_long sys_start, sys_stop, card_start;
392 u_char map;
393
394 map = mem->map;
395 sys_start = mem->sys_start;
396 sys_stop = mem->sys_stop;
397 card_start = mem->card_start;
398
399 if (map > 4 || sys_start > sys_stop || ((sys_start ^ sys_stop) >> 24) ||
400 (card_start >> 26))
401 return -EINVAL;
402
403 window = exca_readb(socket, ADR_WIN_EN);
404 enable = MEM_WIN_EN(map);
405 if (window & enable) {
406 window &= ~enable;
407 exca_writeb(socket, ADR_WIN_EN, window);
408 }
409
410 exca_writeb(socket, MEM_WIN_SAU(map), sys_start >> 24);
411
412 value = (sys_start >> 12) & 0x0fff;
413 if (mem->flags & MAP_16BIT) value |= MEM_WIN_DSIZE;
414 exca_writew(socket, MEM_WIN_SA(map), value);
415
416 value = (sys_stop >> 12) & 0x0fff;
417 exca_writew(socket, MEM_WIN_EA(map), value);
418
419 value = ((card_start - sys_start) >> 12) & 0x3fff;
420 if (mem->flags & MAP_WRPROT) value |= MEM_WIN_WP;
421 if (mem->flags & MAP_ATTRIB) value |= MEM_WIN_REGSET;
422 exca_writew(socket, MEM_WIN_OA(map), value);
423
424 if (mem->flags & MAP_ACTIVE)
425 exca_writeb(socket, ADR_WIN_EN, window | enable);
426
427 return 0;
428 }
429
430 static void cardu_proc_setup(unsigned int sock, struct proc_dir_entry *base)
431 {
432 }
433
434 static struct pccard_operations cardu_operations = {
435 .init = cardu_init,
436 .suspend = cardu_suspend,
437 .register_callback = cardu_register_callback,
438 .inquire_socket = cardu_inquire_socket,
439 .get_status = cardu_get_status,
440 .get_socket = cardu_get_socket,
441 .set_socket = cardu_set_socket,
442 .get_io_map = cardu_get_io_map,
443 .set_io_map = cardu_set_io_map,
444 .get_mem_map = cardu_get_mem_map,
445 .set_mem_map = cardu_set_mem_map,
446 .proc_setup = cardu_proc_setup,
447 };
448
449 static void cardu_bh(void *data)
450 {
451 vrc4173_socket_t *socket = (vrc4173_socket_t *)data;
452 uint16_t events;
453
454 spin_lock_irq(&socket->event_lock);
455 events = socket->events;
456 socket->events = 0;
457 spin_unlock_irq(&socket->event_lock);
458
459 if (socket->handler)
460 socket->handler(socket->info, events);
461 }
462
463 static uint16_t get_events(vrc4173_socket_t *socket)
464 {
465 uint16_t events = 0;
466 uint8_t csc, status;
467
468 status = exca_readb(socket, IF_STATUS);
469 csc = exca_readb(socket, CARD_SC);
470 if ((csc & CARD_DT_CHG) &&
471 ((status & (CARD_DETECT1|CARD_DETECT2)) == (CARD_DETECT1|CARD_DETECT2)))
472 events |= SS_DETECT;
473
474 if ((csc & RDY_CHG) && (status & READY))
475 events |= SS_READY;
476
477 if (exca_readb(socket, INT_GEN_CNT) & CARD_TYPE_IO) {
478 if ((csc & BAT_DEAD_ST_CHG) && (status & STSCHG))
479 events |= SS_STSCHG;
480 } else {
481 if (csc & (BAT_WAR_CHG|BAT_DEAD_ST_CHG)) {
482 if ((status & BV_DETECT_MASK) != BV_DETECT_GOOD) {
483 if (status == BV_DETECT_WARN) events |= SS_BATWARN;
484 else events |= SS_BATDEAD;
485 }
486 }
487 }
488
489 return events;
490 }
491
492 static void cardu_interrupt(int irq, void *dev_id, struct pt_regs *regs)
493 {
494 vrc4173_socket_t *socket = (vrc4173_socket_t *)dev_id;
495 uint16_t events;
496
497 INIT_WORK(&socket->tq_work, cardu_bh, socket);
498
499 events = get_events(socket);
500 if (events) {
501 spin_lock(&socket->event_lock);
502 socket->events |= events;
503 spin_unlock(&socket->event_lock);
504 schedule_work(&socket->tq_work);
505 }
506 }
507
508 static int __devinit vrc4173_cardu_probe(struct pci_dev *dev,
509 const struct pci_device_id *ent)
510 {
511 vrc4173_socket_t *socket;
512 unsigned long start, len, flags;
513 int slot, err;
514
515 slot = vrc4173_cardu_slots++;
516 socket = &cardu_sockets[slot];
517 if (socket->noprobe != 0)
518 return -EBUSY;
519
520 sprintf(socket->name, "NEC VRC4173 CARDU%1d", slot+1);
521
522 if ((err = pci_enable_device(dev)) < 0)
523 return err;
524
525 start = pci_resource_start(dev, 0);
526 if (start == 0)
527 return -ENODEV;
528
529 len = pci_resource_len(dev, 0);
530 if (len == 0)
531 return -ENODEV;
532
533 if (((flags = pci_resource_flags(dev, 0)) & IORESOURCE_MEM) == 0)
534 return -EBUSY;
535
536 if ((err = pci_request_regions(dev, socket->name)) < 0)
537 return err;
538
539 socket->base = ioremap(start, len);
540 if (socket->base == NULL)
541 return -ENODEV;
542
543 socket->dev = dev;
544
545 socket->pcmcia_socket = pcmcia_register_socket(slot, &cardu_operations, 1);
546 if (socket->pcmcia_socket == NULL) {
547 iounmap(socket->base);
548 socket->base = NULL;
549 return -ENOMEM;
550 }
551
552 if (request_irq(dev->irq, cardu_interrupt, SA_SHIRQ, socket->name, socket) < 0) {
553 pcmcia_unregister_socket(socket->pcmcia_socket);
554 socket->pcmcia_socket = NULL;
555 iounmap(socket->base);
556 socket->base = NULL;
557 return -EBUSY;
558 }
559
560 printk(KERN_INFO "%s at %#08lx, IRQ %d\n", socket->name, start, dev->irq);
561
562 return 0;
563 }
564
565 static int __devinit vrc4173_cardu_setup(char *options)
566 {
567 if (options == NULL || *options == '\0')
568 return 0;
569
570 if (strncmp(options, "cardu1:", 7) == 0) {
571 options += 7;
572 if (*options != '\0') {
573 if (strncmp(options, "noprobe", 7) == 0) {
574 cardu_sockets[CARDU1].noprobe = 1;
575 options += 7;
576 }
577
578 if (*options != ',')
579 return 0;
580 } else
581 return 0;
582 }
583
584 if (strncmp(options, "cardu2:", 7) == 0) {
585 options += 7;
586 if ((*options != '\0') && (strncmp(options, "noprobe", 7) == 0))
587 cardu_sockets[CARDU2].noprobe = 1;
588 }
589
590 return 0;
591 }
592
593 __setup("vrc4173_cardu=", vrc4173_cardu_setup);
594
595 static struct pci_device_id vrc4173_cardu_id_table[] __devinitdata = {
596 { .vendor = PCI_VENDOR_ID_NEC,
597 .device = PCI_DEVICE_ID_NEC_NAPCCARD,
598 .subvendor = PCI_ANY_ID,
599 .subdevice = PCI_ANY_ID, },
600 {0, }
601 };
602
603 static struct pci_driver vrc4173_cardu_driver = {
604 .name = "NEC VRC4173 CARDU",
605 .probe = vrc4173_cardu_probe,
606 .id_table = vrc4173_cardu_id_table,
607 };
608
609 static int __devinit vrc4173_cardu_init(void)
610 {
611 vrc4173_cardu_slots = 0;
612
613 return pci_module_init(&vrc4173_cardu_driver);
614 }
615
616 static void __devexit vrc4173_cardu_exit(void)
617 {
618 pci_unregister_driver(&vrc4173_cardu_driver);
619 }
620
621 module_init(vrc4173_cardu_init);
622 module_exit(vrc4173_cardu_exit);
623
|
This page was automatically generated by the
LXR engine.
|