]> git.ipfire.org Git - people/ms/u-boot.git/blob - drivers/pcmcia/ti_pci1410a.c
rename CFG_ macros to CONFIG_SYS
[people/ms/u-boot.git] / drivers / pcmcia / ti_pci1410a.c
1 /*
2 * (C) Copyright 2000-2002
3 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
4 * (C) Copyright 2002
5 * Daniel Engström, Omicron Ceti AB
6 *
7 * See file CREDITS for list of people who contributed to this
8 * project.
9 *
10 * This program is free software; you can redistribute it and/or
11 * modify it under the terms of the GNU General Public License as
12 * published by the Free Software Foundation; either version 2 of
13 * the License, or (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
23 * MA 02111-1307 USA
24 *
25 ********************************************************************
26 *
27 * Lots of code copied from:
28 *
29 * m8xx_pcmcia.c - Linux PCMCIA socket driver for the mpc8xx series.
30 * (C) 1999-2000 Magnus Damm <damm@bitsmart.com>
31 *
32 * "The ExCA standard specifies that socket controllers should provide
33 * two IO and five memory windows per socket, which can be independently
34 * configured and positioned in the host address space and mapped to
35 * arbitrary segments of card address space. " - David A Hinds. 1999
36 *
37 * This controller does _not_ meet the ExCA standard.
38 *
39 * m8xx pcmcia controller brief info:
40 * + 8 windows (attrib, mem, i/o)
41 * + up to two slots (SLOT_A and SLOT_B)
42 * + inputpins, outputpins, event and mask registers.
43 * - no offset register. sigh.
44 *
45 * Because of the lacking offset register we must map the whole card.
46 * We assign each memory window PCMCIA_MEM_WIN_SIZE address space.
47 * Make sure there is (PCMCIA_MEM_WIN_SIZE * PCMCIA_MEM_WIN_NO
48 * * PCMCIA_SOCKETS_NO) bytes at PCMCIA_MEM_WIN_BASE.
49 * The i/o windows are dynamically allocated at PCMCIA_IO_WIN_BASE.
50 * They are maximum 64KByte each...
51 */
52
53
54 #undef DEBUG /**/
55
56 /*
57 * PCMCIA support
58 */
59 #include <common.h>
60 #include <command.h>
61 #include <config.h>
62 #include <pci.h>
63 #include <asm/io.h>
64
65 #include <pcmcia.h>
66
67 #if defined(CONFIG_CMD_PCMCIA)
68
69 int pcmcia_on(int ide_base_bus);
70
71 static int pcmcia_off(void);
72 static int hardware_disable(int slot);
73 static int hardware_enable(int slot);
74 static int voltage_set(int slot, int vcc, int vpp);
75 static void print_funcid(int func);
76 static void print_fixed(volatile uchar *p);
77 static int identify(volatile uchar *p);
78 static int check_ide_device(int slot, int ide_base_bus);
79
80
81 /* ------------------------------------------------------------------------- */
82
83
84 const char *indent = "\t ";
85
86 /* ------------------------------------------------------------------------- */
87
88
89 int do_pinit(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
90 {
91 #ifndef CONFIG_SYS_FIRST_PCMCIA_BUS
92 # define CONFIG_SYS_FIRST_PCMCIA_BUS 0
93 #endif
94
95 int rcode = 0;
96
97 if (argc != 2) {
98 printf ("Usage: pinit {on | off}\n");
99 return 1;
100 }
101 if (strcmp(argv[1],"on") == 0) {
102 rcode = pcmcia_on(CONFIG_SYS_FIRST_PCMCIA_BUS);
103 } else if (strcmp(argv[1],"off") == 0) {
104 rcode = pcmcia_off();
105 } else {
106 printf ("Usage: pinit {on | off}\n");
107 return 1;
108 }
109
110 return rcode;
111 }
112
113 /* ------------------------------------------------------------------------- */
114
115
116 static struct pci_device_id supported[] = {
117 { PCI_VENDOR_ID_TI, 0xac50 }, /* Ti PCI1410A */
118 { PCI_VENDOR_ID_TI, 0xac56 }, /* Ti PCI1510 */
119 { }
120 };
121
122 static pci_dev_t devbusfn;
123 static u32 socket_base;
124 static u32 pcmcia_cis_ptr;
125
126 int pcmcia_on(int ide_base_bus)
127 {
128 u16 dev_id;
129 u32 socket_status;
130 int slot = 0;
131 int cis_len;
132 u16 io_base;
133 u16 io_len;
134
135 /*
136 * Find the CardBus PCI device(s).
137 */
138 if ((devbusfn = pci_find_devices(supported, 0)) < 0) {
139 printf("Ti CardBus: not found\n");
140 return 1;
141 }
142
143 pci_read_config_word(devbusfn, PCI_DEVICE_ID, &dev_id);
144
145 if (dev_id == 0xac56) {
146 debug("Enable PCMCIA Ti PCI1510\n");
147 } else {
148 debug("Enable PCMCIA Ti PCI1410A\n");
149 }
150
151 pcmcia_cis_ptr = CONFIG_SYS_PCMCIA_CIS_WIN;
152 cis_len = CONFIG_SYS_PCMCIA_CIS_WIN_SIZE;
153
154 io_base = CONFIG_SYS_PCMCIA_IO_WIN;
155 io_len = CONFIG_SYS_PCMCIA_IO_WIN_SIZE;
156
157 /*
158 * Setup the PCI device.
159 */
160 pci_read_config_dword(devbusfn, PCI_BASE_ADDRESS_0, &socket_base);
161 socket_base &= ~0xf;
162
163 socket_status = readl(socket_base+8);
164 if ((socket_status & 6) == 0) {
165 printf("Card Present: ");
166
167 switch (socket_status & 0x3c00) {
168
169 case 0x400:
170 printf("5V ");
171 break;
172 case 0x800:
173 printf("3.3V ");
174 break;
175 case 0xc00:
176 printf("3.3/5V ");
177 break;
178 default:
179 printf("unsupported Vcc ");
180 break;
181 }
182 switch (socket_status & 0x30) {
183 case 0x10:
184 printf("16bit PC-Card\n");
185 break;
186 case 0x20:
187 printf("32bit CardBus Card\n");
188 break;
189 default:
190 printf("8bit PC-Card\n");
191 break;
192 }
193 }
194
195
196 writeb(0x41, socket_base + 0x806); /* Enable I/O window 0 and memory window 0 */
197 writeb(0x0e, socket_base + 0x807); /* Reset I/O window options */
198
199 /* Careful: the linux yenta driver do not seem to reset the offset
200 * in the i/o windows, so leaving them non-zero is a problem */
201
202 writeb(io_base & 0xff, socket_base + 0x808); /* I/O window 0 base address */
203 writeb(io_base>>8, socket_base + 0x809);
204 writeb((io_base + io_len - 1) & 0xff, socket_base + 0x80a); /* I/O window 0 end address */
205 writeb((io_base + io_len - 1)>>8, socket_base + 0x80b);
206 writeb(0x00, socket_base + 0x836); /* I/O window 0 offset address 0x000 */
207 writeb(0x00, socket_base + 0x837);
208
209
210 writeb((pcmcia_cis_ptr&0x000ff000) >> 12,
211 socket_base + 0x810); /* Memory window 0 start address bits 19-12 */
212 writeb((pcmcia_cis_ptr&0x00f00000) >> 20,
213 socket_base + 0x811); /* Memory window 0 start address bits 23-20 */
214 writeb(((pcmcia_cis_ptr+cis_len-1) & 0x000ff000) >> 12,
215 socket_base + 0x812); /* Memory window 0 end address bits 19-12*/
216 writeb(((pcmcia_cis_ptr+cis_len-1) & 0x00f00000) >> 20,
217 socket_base + 0x813); /* Memory window 0 end address bits 23-20*/
218 writeb(0x00, socket_base + 0x814); /* Memory window 0 offset bits 19-12 */
219 writeb(0x40, socket_base + 0x815); /* Memory window 0 offset bits 23-20 and
220 * options (read/write, attribute access) */
221 writeb(0x00, socket_base + 0x816); /* ExCA card-detect and general control */
222 writeb(0x00, socket_base + 0x81e); /* ExCA global control (interrupt modes) */
223
224 writeb((pcmcia_cis_ptr & 0xff000000) >> 24,
225 socket_base + 0x840); /* Memory window address bits 31-24 */
226
227
228 /* turn off voltage */
229 if (voltage_set(slot, 0, 0)) {
230 return 1;
231 }
232
233 /* Enable external hardware */
234 if (hardware_enable(slot)) {
235 return 1;
236 }
237
238 if (check_ide_device(slot, ide_base_bus)) {
239 return 1;
240 }
241
242 return 0;
243 }
244
245 /* ------------------------------------------------------------------------- */
246
247
248 static int pcmcia_off (void)
249 {
250 int slot = 0;
251
252 writeb(0x00, socket_base + 0x806); /* disable all I/O and memory windows */
253
254 writeb(0x00, socket_base + 0x808); /* I/O window 0 base address */
255 writeb(0x00, socket_base + 0x809);
256 writeb(0x00, socket_base + 0x80a); /* I/O window 0 end address */
257 writeb(0x00, socket_base + 0x80b);
258 writeb(0x00, socket_base + 0x836); /* I/O window 0 offset address */
259 writeb(0x00, socket_base + 0x837);
260
261 writeb(0x00, socket_base + 0x80c); /* I/O window 1 base address */
262 writeb(0x00, socket_base + 0x80d);
263 writeb(0x00, socket_base + 0x80e); /* I/O window 1 end address */
264 writeb(0x00, socket_base + 0x80f);
265 writeb(0x00, socket_base + 0x838); /* I/O window 1 offset address */
266 writeb(0x00, socket_base + 0x839);
267
268 writeb(0x00, socket_base + 0x810); /* Memory window 0 start address */
269 writeb(0x00, socket_base + 0x811);
270 writeb(0x00, socket_base + 0x812); /* Memory window 0 end address */
271 writeb(0x00, socket_base + 0x813);
272 writeb(0x00, socket_base + 0x814); /* Memory window 0 offset */
273 writeb(0x00, socket_base + 0x815);
274
275 writeb(0xc0, socket_base + 0x840); /* Memory window 0 page address */
276
277
278 /* turn off voltage */
279 voltage_set(slot, 0, 0);
280
281 /* disable external hardware */
282 printf ("Shutdown and Poweroff Ti PCI1410A\n");
283 hardware_disable(slot);
284
285 return 0;
286 }
287
288
289 /* ------------------------------------------------------------------------- */
290
291
292 #define MAX_TUPEL_SZ 512
293 #define MAX_FEATURES 4
294 int ide_devices_found;
295 static int check_ide_device(int slot, int ide_base_bus)
296 {
297 volatile uchar *ident = NULL;
298 volatile uchar *feature_p[MAX_FEATURES];
299 volatile uchar *p, *start;
300 int n_features = 0;
301 uchar func_id = ~0;
302 uchar code, len;
303 ushort config_base = 0;
304 int found = 0;
305 int i;
306 u32 socket_status;
307
308 debug ("PCMCIA MEM: %08X\n", pcmcia_cis_ptr);
309
310 socket_status = readl(socket_base+8);
311
312 if ((socket_status & 6) != 0 || (socket_status & 0x20) != 0) {
313 printf("no card or CardBus card\n");
314 return 1;
315 }
316
317 start = p = (volatile uchar *) pcmcia_cis_ptr;
318
319 while ((p - start) < MAX_TUPEL_SZ) {
320
321 code = *p; p += 2;
322
323 if (code == 0xFF) { /* End of chain */
324 break;
325 }
326
327 len = *p; p += 2;
328 #if defined(DEBUG) && (DEBUG > 1)
329 {
330 volatile uchar *q = p;
331 printf ("\nTuple code %02x length %d\n\tData:",
332 code, len);
333
334 for (i = 0; i < len; ++i) {
335 printf (" %02x", *q);
336 q+= 2;
337 }
338 }
339 #endif /* DEBUG */
340 switch (code) {
341 case CISTPL_VERS_1:
342 ident = p + 4;
343 break;
344 case CISTPL_FUNCID:
345 /* Fix for broken SanDisk which may have 0x80 bit set */
346 func_id = *p & 0x7F;
347 break;
348 case CISTPL_FUNCE:
349 if (n_features < MAX_FEATURES)
350 feature_p[n_features++] = p;
351 break;
352 case CISTPL_CONFIG:
353 config_base = (*(p+6) << 8) + (*(p+4));
354 debug ("\n## Config_base = %04x ###\n", config_base);
355 default:
356 break;
357 }
358 p += 2 * len;
359 }
360
361 found = identify(ident);
362
363 if (func_id != ((uchar)~0)) {
364 print_funcid (func_id);
365
366 if (func_id == CISTPL_FUNCID_FIXED)
367 found = 1;
368 else
369 return 1; /* no disk drive */
370 }
371
372 for (i=0; i<n_features; ++i) {
373 print_fixed(feature_p[i]);
374 }
375
376 if (!found) {
377 printf("unknown card type\n");
378 return 1;
379 }
380
381 /* select config index 1 */
382 writeb(1, pcmcia_cis_ptr + config_base);
383
384 #if 0
385 printf("Confiuration Option Register: %02x\n", readb(pcmcia_cis_ptr + config_base));
386 printf("Card Confiuration and Status Register: %02x\n", readb(pcmcia_cis_ptr + config_base + 2));
387 printf("Pin Replacement Register Register: %02x\n", readb(pcmcia_cis_ptr + config_base + 4));
388 printf("Socket and Copy Register: %02x\n", readb(pcmcia_cis_ptr + config_base + 6));
389 #endif
390 ide_devices_found |= (1 << (slot+ide_base_bus));
391
392 return 0;
393 }
394
395
396 static int voltage_set(int slot, int vcc, int vpp)
397 {
398 u32 socket_control;
399 int reg=0;
400
401 switch (slot) {
402 case 0:
403 reg = socket_base + 0x10;
404 break;
405 default:
406 return 1;
407 }
408
409 socket_control = 0;
410
411
412 switch (vcc) {
413 case 50:
414 socket_control |= 0x20;
415 break;
416 case 33:
417 socket_control |= 0x30;
418 break;
419 case 0:
420 default:
421 }
422
423 switch (vpp) {
424 case 120:
425 socket_control |= 0x1;
426 break;
427 case 50:
428 socket_control |= 0x2;
429 break;
430 case 33:
431 socket_control |= 0x3;
432 break;
433 case 0:
434 default:
435 }
436
437 writel(socket_control, reg);
438
439 debug ("voltage_set: Ti PCI1410A Slot %d, Vcc=%d.%d, Vpp=%d.%d\n",
440 slot, vcc/10, vcc%10, vpp/10, vpp%10);
441
442 udelay(500);
443 return 0;
444 }
445
446
447 static int hardware_enable(int slot)
448 {
449 u32 socket_status;
450 u16 brg_ctrl;
451 int is_82365sl;
452
453 socket_status = readl(socket_base+8);
454
455 if ((socket_status & 6) == 0) {
456
457 switch (socket_status & 0x3c00) {
458
459 case 0x400:
460 printf("5V ");
461 voltage_set(slot, 50, 0);
462 break;
463 case 0x800:
464 voltage_set(slot, 33, 0);
465 break;
466 case 0xc00:
467 voltage_set(slot, 33, 0);
468 break;
469 default:
470 voltage_set(slot, 0, 0);
471 break;
472 }
473 } else {
474 voltage_set(slot, 0, 0);
475 }
476
477 pci_read_config_word(devbusfn, PCI_BRIDGE_CONTROL, &brg_ctrl);
478 brg_ctrl &= ~PCI_BRIDGE_CTL_BUS_RESET;
479 pci_write_config_word(devbusfn, PCI_BRIDGE_CONTROL, brg_ctrl);
480 is_82365sl = ((readb(socket_base+0x800) & 0x0f) == 2);
481 writeb(is_82365sl?0x90:0x98, socket_base+0x802);
482 writeb(0x67, socket_base+0x803);
483 udelay(100000);
484 #if 0
485 printf("ExCA Id %02x, Card Status %02x, Power config %02x, Interrupt Config %02x, bridge control %04x %d\n",
486 readb(socket_base+0x800), readb(socket_base+0x801),
487 readb(socket_base+0x802), readb(socket_base+0x803), brg_ctrl, is_82365sl);
488 #endif
489
490 return ((readb(socket_base+0x801)&0x6c)==0x6c)?0:1;
491 }
492
493
494 static int hardware_disable(int slot)
495 {
496 voltage_set(slot, 0, 0);
497 return 0;
498 }
499
500 static void print_funcid(int func)
501 {
502 puts(indent);
503 switch (func) {
504 case CISTPL_FUNCID_MULTI:
505 puts(" Multi-Function");
506 break;
507 case CISTPL_FUNCID_MEMORY:
508 puts(" Memory");
509 break;
510 case CISTPL_FUNCID_SERIAL:
511 puts(" Serial Port");
512 break;
513 case CISTPL_FUNCID_PARALLEL:
514 puts(" Parallel Port");
515 break;
516 case CISTPL_FUNCID_FIXED:
517 puts(" Fixed Disk");
518 break;
519 case CISTPL_FUNCID_VIDEO:
520 puts(" Video Adapter");
521 break;
522 case CISTPL_FUNCID_NETWORK:
523 puts(" Network Adapter");
524 break;
525 case CISTPL_FUNCID_AIMS:
526 puts(" AIMS Card");
527 break;
528 case CISTPL_FUNCID_SCSI:
529 puts(" SCSI Adapter");
530 break;
531 default:
532 puts(" Unknown");
533 break;
534 }
535 puts(" Card\n");
536 }
537
538 /* ------------------------------------------------------------------------- */
539
540 static void print_fixed(volatile uchar *p)
541 {
542 if (p == NULL)
543 return;
544
545 puts(indent);
546
547 switch (*p) {
548 case CISTPL_FUNCE_IDE_IFACE:
549 { uchar iface = *(p+2);
550
551 puts ((iface == CISTPL_IDE_INTERFACE) ? " IDE" : " unknown");
552 puts (" interface ");
553 break;
554 }
555 case CISTPL_FUNCE_IDE_MASTER:
556 case CISTPL_FUNCE_IDE_SLAVE:
557 {
558 uchar f1 = *(p+2);
559 uchar f2 = *(p+4);
560
561 puts((f1 & CISTPL_IDE_SILICON) ? " [silicon]" : " [rotating]");
562
563 if (f1 & CISTPL_IDE_UNIQUE) {
564 puts(" [unique]");
565 }
566
567 puts((f1 & CISTPL_IDE_DUAL) ? " [dual]" : " [single]");
568
569 if (f2 & CISTPL_IDE_HAS_SLEEP) {
570 puts(" [sleep]");
571 }
572
573 if (f2 & CISTPL_IDE_HAS_STANDBY) {
574 puts(" [standby]");
575 }
576
577 if (f2 & CISTPL_IDE_HAS_IDLE) {
578 puts(" [idle]");
579 }
580
581 if (f2 & CISTPL_IDE_LOW_POWER) {
582 puts(" [low power]");
583 }
584
585 if (f2 & CISTPL_IDE_REG_INHIBIT) {
586 puts(" [reg inhibit]");
587 }
588
589 if (f2 & CISTPL_IDE_HAS_INDEX) {
590 puts(" [index]");
591 }
592
593 if (f2 & CISTPL_IDE_IOIS16) {
594 puts(" [IOis16]");
595 }
596
597 break;
598 }
599 }
600 putc('\n');
601 }
602
603 /* ------------------------------------------------------------------------- */
604
605 #define MAX_IDENT_CHARS 64
606 #define MAX_IDENT_FIELDS 4
607
608 static uchar *known_cards[] = {
609 "ARGOSY PnPIDE D5",
610 NULL
611 };
612
613 static int identify(volatile uchar *p)
614 {
615 uchar id_str[MAX_IDENT_CHARS];
616 uchar data;
617 uchar *t;
618 uchar **card;
619 int i, done;
620
621 if (p == NULL)
622 return (0); /* Don't know */
623
624 t = id_str;
625 done =0;
626
627 for (i=0; i<=4 && !done; ++i, p+=2) {
628 while ((data = *p) != '\0') {
629 if (data == 0xFF) {
630 done = 1;
631 break;
632 }
633 *t++ = data;
634 if (t == &id_str[MAX_IDENT_CHARS-1]) {
635 done = 1;
636 break;
637 }
638 p += 2;
639 }
640 if (!done)
641 *t++ = ' ';
642 }
643 *t = '\0';
644 while (--t > id_str) {
645 if (*t == ' ') {
646 *t = '\0';
647 } else {
648 break;
649 }
650 }
651 puts(id_str);
652 putc('\n');
653
654 for (card=known_cards; *card; ++card) {
655 debug ("## Compare against \"%s\"\n", *card);
656 if (strcmp(*card, id_str) == 0) { /* found! */
657 debug ("## CARD FOUND ##\n");
658 return 1;
659 }
660 }
661
662 return 0; /* don't know */
663 }
664
665 #endif /* CONFIG_CMD_PCMCIA */