]> git.sur5r.net Git - u-boot/blob - drivers/pcmcia/ti_pci1410a.c
Merge branch 'master' of git://git.denx.de/u-boot-cfi-flash
[u-boot] / 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  hardware_disable(int slot);
72 static int  hardware_enable(int slot);
73 static int  voltage_set(int slot, int vcc, int vpp);
74 static void print_funcid(int func);
75 static void print_fixed(volatile char *p);
76 static int  identify(volatile char *p);
77 static int  check_ide_device(int slot, int ide_base_bus);
78
79
80 /* ------------------------------------------------------------------------- */
81
82
83 const char *indent = "\t   ";
84
85 /* ------------------------------------------------------------------------- */
86
87
88 static struct pci_device_id supported[] = {
89         { PCI_VENDOR_ID_TI, 0xac50 }, /* Ti PCI1410A */
90         { PCI_VENDOR_ID_TI, 0xac56 }, /* Ti PCI1510 */
91         { }
92 };
93
94 static pci_dev_t devbusfn;
95 static u32 socket_base;
96 static u32 pcmcia_cis_ptr;
97
98 int pcmcia_on(int ide_base_bus)
99 {
100         u16 dev_id;
101         u32 socket_status;
102         int slot = 0;
103         int cis_len;
104         u16 io_base;
105         u16 io_len;
106
107         /*
108          * Find the CardBus PCI device(s).
109          */
110         if ((devbusfn = pci_find_devices(supported, 0)) < 0) {
111                 printf("Ti CardBus: not found\n");
112                 return 1;
113         }
114
115         pci_read_config_word(devbusfn, PCI_DEVICE_ID, &dev_id);
116
117         if (dev_id == 0xac56) {
118                 debug("Enable PCMCIA Ti PCI1510\n");
119         } else {
120                 debug("Enable PCMCIA Ti PCI1410A\n");
121         }
122
123         pcmcia_cis_ptr = CONFIG_SYS_PCMCIA_CIS_WIN;
124         cis_len = CONFIG_SYS_PCMCIA_CIS_WIN_SIZE;
125
126         io_base = CONFIG_SYS_PCMCIA_IO_WIN;
127         io_len = CONFIG_SYS_PCMCIA_IO_WIN_SIZE;
128
129         /*
130          * Setup the PCI device.
131          */
132         pci_read_config_dword(devbusfn, PCI_BASE_ADDRESS_0, &socket_base);
133         socket_base &= ~0xf;
134
135         socket_status = readl(socket_base+8);
136         if ((socket_status & 6) == 0) {
137                 printf("Card Present: ");
138
139                 switch (socket_status & 0x3c00) {
140
141                 case 0x400:
142                         printf("5V ");
143                         break;
144                 case 0x800:
145                         printf("3.3V ");
146                         break;
147                 case 0xc00:
148                         printf("3.3/5V ");
149                         break;
150                 default:
151                         printf("unsupported Vcc ");
152                         break;
153                 }
154                 switch (socket_status & 0x30) {
155                 case 0x10:
156                         printf("16bit PC-Card\n");
157                         break;
158                 case 0x20:
159                         printf("32bit CardBus Card\n");
160                         break;
161                 default:
162                         printf("8bit PC-Card\n");
163                         break;
164                 }
165         }
166
167
168         writeb(0x41, socket_base + 0x806); /* Enable I/O window 0 and memory window 0 */
169         writeb(0x0e, socket_base + 0x807); /* Reset I/O window options */
170
171         /* Careful: the linux yenta driver do not seem to reset the offset
172          * in the i/o windows, so leaving them non-zero is a problem */
173
174         writeb(io_base & 0xff, socket_base + 0x808); /* I/O window 0 base address */
175         writeb(io_base>>8, socket_base + 0x809);
176         writeb((io_base + io_len - 1) & 0xff, socket_base + 0x80a); /* I/O window 0 end address */
177         writeb((io_base + io_len - 1)>>8, socket_base + 0x80b);
178         writeb(0x00, socket_base + 0x836);      /* I/O window 0 offset address 0x000 */
179         writeb(0x00, socket_base + 0x837);
180
181
182         writeb((pcmcia_cis_ptr&0x000ff000) >> 12,
183                socket_base + 0x810); /* Memory window 0 start address bits 19-12 */
184         writeb((pcmcia_cis_ptr&0x00f00000) >> 20,
185                socket_base + 0x811);  /* Memory window 0 start address bits 23-20 */
186         writeb(((pcmcia_cis_ptr+cis_len-1) & 0x000ff000) >> 12,
187                 socket_base + 0x812); /* Memory window 0 end address bits 19-12*/
188         writeb(((pcmcia_cis_ptr+cis_len-1) & 0x00f00000) >> 20,
189                 socket_base + 0x813); /* Memory window 0 end address bits 23-20*/
190         writeb(0x00, socket_base + 0x814); /* Memory window 0 offset bits 19-12 */
191         writeb(0x40, socket_base + 0x815); /* Memory window 0 offset bits 23-20 and
192                                             * options (read/write, attribute access) */
193         writeb(0x00, socket_base + 0x816); /* ExCA card-detect and general control  */
194         writeb(0x00, socket_base + 0x81e); /* ExCA global control (interrupt modes) */
195
196         writeb((pcmcia_cis_ptr & 0xff000000) >> 24,
197                socket_base + 0x840); /* Memory window address bits 31-24 */
198
199
200         /* turn off voltage */
201         if (voltage_set(slot, 0, 0)) {
202                 return 1;
203         }
204
205         /* Enable external hardware */
206         if (hardware_enable(slot)) {
207                 return 1;
208         }
209
210         if (check_ide_device(slot, ide_base_bus)) {
211                 return 1;
212         }
213
214         return 0;
215 }
216
217 /* ------------------------------------------------------------------------- */
218
219
220 #if defined(CONFIG_CMD_PCMCIA)
221 int pcmcia_off (void)
222 {
223         int slot = 0;
224
225         writeb(0x00, socket_base + 0x806); /* disable all I/O and memory windows */
226
227         writeb(0x00, socket_base + 0x808); /* I/O window 0 base address */
228         writeb(0x00, socket_base + 0x809);
229         writeb(0x00, socket_base + 0x80a); /* I/O window 0 end address */
230         writeb(0x00, socket_base + 0x80b);
231         writeb(0x00, socket_base + 0x836); /* I/O window 0 offset address  */
232         writeb(0x00, socket_base + 0x837);
233
234         writeb(0x00, socket_base + 0x80c); /* I/O window 1 base address  */
235         writeb(0x00, socket_base + 0x80d);
236         writeb(0x00, socket_base + 0x80e); /* I/O window 1 end address  */
237         writeb(0x00, socket_base + 0x80f);
238         writeb(0x00, socket_base + 0x838); /* I/O window 1 offset address  */
239         writeb(0x00, socket_base + 0x839);
240
241         writeb(0x00, socket_base + 0x810); /* Memory window 0 start address */
242         writeb(0x00, socket_base + 0x811);
243         writeb(0x00, socket_base + 0x812); /* Memory window 0 end address  */
244         writeb(0x00, socket_base + 0x813);
245         writeb(0x00, socket_base + 0x814); /* Memory window 0 offset */
246         writeb(0x00, socket_base + 0x815);
247
248         writeb(0xc0, socket_base + 0x840); /* Memory window 0 page address */
249
250
251         /* turn off voltage */
252         voltage_set(slot, 0, 0);
253
254         /* disable external hardware */
255         printf ("Shutdown and Poweroff Ti PCI1410A\n");
256         hardware_disable(slot);
257
258         return 0;
259 }
260
261 #endif
262
263 /* ------------------------------------------------------------------------- */
264
265
266 #define MAX_TUPEL_SZ    512
267 #define MAX_FEATURES    4
268 int ide_devices_found;
269 static int check_ide_device(int slot, int ide_base_bus)
270 {
271         volatile char *ident = NULL;
272         volatile char *feature_p[MAX_FEATURES];
273         volatile char *p, *start;
274         int n_features = 0;
275         uchar func_id = ~0;
276         uchar code, len;
277         ushort config_base = 0;
278         int found = 0;
279         int i;
280         u32 socket_status;
281
282         debug ("PCMCIA MEM: %08X\n", pcmcia_cis_ptr);
283
284         socket_status = readl(socket_base+8);
285
286         if ((socket_status & 6) != 0 || (socket_status & 0x20) != 0) {
287                 printf("no card or CardBus card\n");
288                 return 1;
289         }
290
291         start = p = (volatile char *) pcmcia_cis_ptr;
292
293         while ((p - start) < MAX_TUPEL_SZ) {
294
295                 code = *p; p += 2;
296
297                 if (code == 0xFF) { /* End of chain */
298                         break;
299                 }
300
301                 len = *p; p += 2;
302 #if defined(DEBUG) && (DEBUG > 1)
303                 {
304                         volatile uchar *q = p;
305                         printf ("\nTuple code %02x  length %d\n\tData:",
306                                 code, len);
307
308                         for (i = 0; i < len; ++i) {
309                                 printf (" %02x", *q);
310                                 q+= 2;
311                         }
312                 }
313 #endif  /* DEBUG */
314                 switch (code) {
315                 case CISTPL_VERS_1:
316                         ident = p + 4;
317                         break;
318                 case CISTPL_FUNCID:
319                         /* Fix for broken SanDisk which may have 0x80 bit set */
320                         func_id = *p & 0x7F;
321                         break;
322                 case CISTPL_FUNCE:
323                         if (n_features < MAX_FEATURES)
324                                 feature_p[n_features++] = p;
325                         break;
326                 case CISTPL_CONFIG:
327                         config_base = (*(p+6) << 8) + (*(p+4));
328                         debug ("\n## Config_base = %04x ###\n", config_base);
329                 default:
330                         break;
331                 }
332                 p += 2 * len;
333         }
334
335         found = identify(ident);
336
337         if (func_id != ((uchar)~0)) {
338                 print_funcid (func_id);
339
340                 if (func_id == CISTPL_FUNCID_FIXED)
341                         found = 1;
342                 else
343                         return 1;       /* no disk drive */
344         }
345
346         for (i=0; i<n_features; ++i) {
347                 print_fixed(feature_p[i]);
348         }
349
350         if (!found) {
351                 printf("unknown card type\n");
352                 return 1;
353         }
354
355         /* select config index 1 */
356         writeb(1, pcmcia_cis_ptr + config_base);
357
358 #if 0
359         printf("Confiuration Option Register: %02x\n", readb(pcmcia_cis_ptr + config_base));
360         printf("Card Confiuration and Status Register: %02x\n", readb(pcmcia_cis_ptr + config_base + 2));
361         printf("Pin Replacement Register Register: %02x\n", readb(pcmcia_cis_ptr + config_base + 4));
362         printf("Socket and Copy Register: %02x\n", readb(pcmcia_cis_ptr + config_base + 6));
363 #endif
364         ide_devices_found |= (1 << (slot+ide_base_bus));
365
366         return 0;
367 }
368
369
370 static int voltage_set(int slot, int vcc, int vpp)
371 {
372         u32 socket_control;
373         int reg=0;
374
375         switch (slot) {
376         case 0:
377                 reg = socket_base + 0x10;
378                 break;
379         default:
380                 return 1;
381         }
382
383         socket_control = 0;
384
385
386         switch (vcc) {
387         case 50:
388                 socket_control |= 0x20;
389                 break;
390         case 33:
391                 socket_control |= 0x30;
392                 break;
393         case 0:
394         default: ;
395         }
396
397         switch (vpp) {
398         case 120:
399                 socket_control |= 0x1;
400                 break;
401         case 50:
402                 socket_control |= 0x2;
403                 break;
404         case 33:
405                 socket_control |= 0x3;
406                 break;
407         case 0:
408         default: ;
409         }
410
411         writel(socket_control, reg);
412
413         debug ("voltage_set: Ti PCI1410A Slot %d, Vcc=%d.%d, Vpp=%d.%d\n",
414                 slot, vcc/10, vcc%10, vpp/10, vpp%10);
415
416         udelay(500);
417         return 0;
418 }
419
420
421 static int hardware_enable(int slot)
422 {
423         u32 socket_status;
424         u16 brg_ctrl;
425         int is_82365sl;
426
427         socket_status = readl(socket_base+8);
428
429         if ((socket_status & 6) == 0) {
430
431                 switch (socket_status & 0x3c00) {
432
433                 case 0x400:
434                         printf("5V ");
435                         voltage_set(slot, 50, 0);
436                         break;
437                 case 0x800:
438                         voltage_set(slot, 33, 0);
439                         break;
440                 case 0xc00:
441                         voltage_set(slot, 33, 0);
442                         break;
443                 default:
444                         voltage_set(slot, 0, 0);
445                         break;
446                 }
447         } else {
448                 voltage_set(slot, 0, 0);
449         }
450
451         pci_read_config_word(devbusfn, PCI_BRIDGE_CONTROL, &brg_ctrl);
452         brg_ctrl &= ~PCI_BRIDGE_CTL_BUS_RESET;
453         pci_write_config_word(devbusfn, PCI_BRIDGE_CONTROL, brg_ctrl);
454         is_82365sl = ((readb(socket_base+0x800) & 0x0f) == 2);
455         writeb(is_82365sl?0x90:0x98, socket_base+0x802);
456         writeb(0x67, socket_base+0x803);
457         udelay(100000);
458 #if 0
459         printf("ExCA Id %02x, Card Status %02x, Power config %02x, Interrupt Config %02x, bridge control %04x %d\n",
460                readb(socket_base+0x800), readb(socket_base+0x801),
461                readb(socket_base+0x802), readb(socket_base+0x803), brg_ctrl, is_82365sl);
462 #endif
463
464         return ((readb(socket_base+0x801)&0x6c)==0x6c)?0:1;
465 }
466
467
468 static int hardware_disable(int slot)
469 {
470         voltage_set(slot, 0, 0);
471         return 0;
472 }
473
474 static void print_funcid(int func)
475 {
476         puts(indent);
477         switch (func) {
478         case CISTPL_FUNCID_MULTI:
479                 puts(" Multi-Function");
480                 break;
481         case CISTPL_FUNCID_MEMORY:
482                 puts(" Memory");
483                 break;
484         case CISTPL_FUNCID_SERIAL:
485                 puts(" Serial Port");
486                 break;
487         case CISTPL_FUNCID_PARALLEL:
488                 puts(" Parallel Port");
489                 break;
490         case CISTPL_FUNCID_FIXED:
491                 puts(" Fixed Disk");
492                 break;
493         case CISTPL_FUNCID_VIDEO:
494                 puts(" Video Adapter");
495                 break;
496         case CISTPL_FUNCID_NETWORK:
497                 puts(" Network Adapter");
498                 break;
499         case CISTPL_FUNCID_AIMS:
500                 puts(" AIMS Card");
501                 break;
502         case CISTPL_FUNCID_SCSI:
503                 puts(" SCSI Adapter");
504                 break;
505         default:
506                 puts(" Unknown");
507                 break;
508         }
509         puts(" Card\n");
510 }
511
512 /* ------------------------------------------------------------------------- */
513
514 static void print_fixed(volatile char *p)
515 {
516         if (p == NULL)
517                 return;
518
519         puts(indent);
520
521         switch (*p) {
522         case CISTPL_FUNCE_IDE_IFACE:
523                 {   uchar iface = *(p+2);
524
525                         puts ((iface == CISTPL_IDE_INTERFACE) ? " IDE" : " unknown");
526                         puts (" interface ");
527                         break;
528                 }
529         case CISTPL_FUNCE_IDE_MASTER:
530         case CISTPL_FUNCE_IDE_SLAVE:
531                 {
532                         uchar f1 = *(p+2);
533                         uchar f2 = *(p+4);
534
535                         puts((f1 & CISTPL_IDE_SILICON) ? " [silicon]" : " [rotating]");
536
537                         if (f1 & CISTPL_IDE_UNIQUE) {
538                                 puts(" [unique]");
539                         }
540
541                         puts((f1 & CISTPL_IDE_DUAL) ? " [dual]" : " [single]");
542
543                         if (f2 & CISTPL_IDE_HAS_SLEEP) {
544                                 puts(" [sleep]");
545                         }
546
547                         if (f2 & CISTPL_IDE_HAS_STANDBY) {
548                                 puts(" [standby]");
549                         }
550
551                         if (f2 & CISTPL_IDE_HAS_IDLE) {
552                                 puts(" [idle]");
553                         }
554
555                         if (f2 & CISTPL_IDE_LOW_POWER) {
556                                 puts(" [low power]");
557                         }
558
559                         if (f2 & CISTPL_IDE_REG_INHIBIT) {
560                                 puts(" [reg inhibit]");
561                         }
562
563                         if (f2 & CISTPL_IDE_HAS_INDEX) {
564                                 puts(" [index]");
565                         }
566
567                         if (f2 & CISTPL_IDE_IOIS16) {
568                                 puts(" [IOis16]");
569                         }
570
571                         break;
572                 }
573         }
574         putc('\n');
575 }
576
577 /* ------------------------------------------------------------------------- */
578
579 #define MAX_IDENT_CHARS         64
580 #define MAX_IDENT_FIELDS        4
581
582 static char *known_cards[] = {
583         "ARGOSY PnPIDE D5",
584         NULL
585 };
586
587 static int identify(volatile char *p)
588 {
589         char id_str[MAX_IDENT_CHARS];
590         char data;
591         char *t;
592         char **card;
593         int i, done;
594
595         if (p == NULL)
596                 return (0);     /* Don't know */
597
598         t = id_str;
599         done =0;
600
601         for (i=0; i<=4 && !done; ++i, p+=2) {
602                 while ((data = *p) != '\0') {
603                         if (data == 0xFF) {
604                                 done = 1;
605                                 break;
606                         }
607                         *t++ = data;
608                         if (t == &id_str[MAX_IDENT_CHARS-1]) {
609                                 done = 1;
610                                 break;
611                         }
612                         p += 2;
613                 }
614                 if (!done)
615                         *t++ = ' ';
616         }
617         *t = '\0';
618         while (--t > id_str) {
619                 if (*t == ' ') {
620                         *t = '\0';
621                 } else {
622                         break;
623                 }
624         }
625         puts(id_str);
626         putc('\n');
627
628         for (card=known_cards; *card; ++card) {
629                 debug ("## Compare against \"%s\"\n", *card);
630                 if (strcmp(*card, id_str) == 0) {       /* found! */
631                         debug ("## CARD FOUND ##\n");
632                         return 1;
633                 }
634         }
635
636         return 0;       /* don't know */
637 }
638
639 #endif /* CONFIG_CMD_PCMCIA */