2 * (C) Copyright 2000-2002
3 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
5 * Daniel Engström, Omicron Ceti AB
7 * See file CREDITS for list of people who contributed to this
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.
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.
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,
25 ********************************************************************
27 * Lots of code copied from:
29 * m8xx_pcmcia.c - Linux PCMCIA socket driver for the mpc8xx series.
30 * (C) 1999-2000 Magnus Damm <damm@bitsmart.com>
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
37 * This controller does _not_ meet the ExCA standard.
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.
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...
66 #include <cmd_pcmcia.h>
68 #if (CONFIG_COMMANDS & CFG_CMD_PCMCIA) && defined(CONFIG_IDE_TI_CARDBUS)
70 int pcmcia_on(int ide_base_bus);
72 static int pcmcia_off(void);
73 static int hardware_disable(int slot);
74 static int hardware_enable(int slot);
75 static int voltage_set(int slot, int vcc, int vpp);
76 static void print_funcid(int func);
77 static void print_fixed(volatile uchar *p);
78 static int identify(volatile uchar *p);
79 static int check_ide_device(int slot, int ide_base_bus);
82 /* ------------------------------------------------------------------------- */
85 const char *indent = "\t ";
87 /* ------------------------------------------------------------------------- */
90 int do_pinit(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
92 #ifndef CFG_FISRT_PCMCIA_BUS
93 # define CFG_FISRT_PCMCIA_BUS 0
99 printf ("Usage: pinit {on | off}\n");
102 if (strcmp(argv[1],"on") == 0) {
103 rcode = pcmcia_on(CFG_FISRT_PCMCIA_BUS);
104 } else if (strcmp(argv[1],"off") == 0) {
105 rcode = pcmcia_off();
107 printf ("Usage: pinit {on | off}\n");
114 /* ------------------------------------------------------------------------- */
117 static struct pci_device_id supported[] = {
118 { PCI_VENDOR_ID_TI, 0xac50 }, /* Ti PCI1410A */
119 { PCI_VENDOR_ID_TI, 0xac56 }, /* Ti PCI1510 */
123 static pci_dev_t devbusfn;
124 static u32 socket_base;
125 static u32 pcmcia_cis_ptr;
127 int pcmcia_on(int ide_base_bus)
137 * Find the CardBus PCI device(s).
139 if ((devbusfn = pci_find_devices(supported, 0)) < 0) {
140 printf("Ti CardBus: not found\n");
144 pci_read_config_word(devbusfn, PCI_DEVICE_ID, &dev_id);
146 if (dev_id == 0xac56) {
147 debug("Enable PCMCIA Ti PCI1510\n");
149 debug("Enable PCMCIA Ti PCI1410A\n");
152 pcmcia_cis_ptr = CFG_PCMCIA_CIS_WIN;
153 cis_len = CFG_PCMCIA_CIS_WIN_SIZE;
155 io_base = CFG_PCMCIA_IO_WIN;
156 io_len = CFG_PCMCIA_IO_WIN_SIZE;
159 * Setup the PCI device.
161 pci_read_config_dword(devbusfn, PCI_BASE_ADDRESS_0, &socket_base);
164 socket_status = readl(socket_base+8);
165 if ((socket_status & 6) == 0) {
166 printf("Card Present: ");
168 switch (socket_status & 0x3c00) {
180 printf("unsupported Vcc ");
183 switch (socket_status & 0x30) {
185 printf("16bit PC-Card\n");
188 printf("32bit CardBus Card\n");
191 printf("8bit PC-Card\n");
197 writeb(0x41, socket_base + 0x806); /* Enable I/O window 0 and memory window 0 */
198 writeb(0x0e, socket_base + 0x807); /* Reset I/O window options */
200 /* Careful: the linux yenta driver do not seem to reset the offset
201 * in the i/o windows, so leaving them non-zero is a problem */
203 writeb(io_base & 0xff, socket_base + 0x808); /* I/O window 0 base address */
204 writeb(io_base>>8, socket_base + 0x809);
205 writeb((io_base + io_len - 1) & 0xff, socket_base + 0x80a); /* I/O window 0 end address */
206 writeb((io_base + io_len - 1)>>8, socket_base + 0x80b);
207 writeb(0x00, socket_base + 0x836); /* I/O window 0 offset address 0x000 */
208 writeb(0x00, socket_base + 0x837);
211 writeb((pcmcia_cis_ptr&0x000ff000) >> 12,
212 socket_base + 0x810); /* Memory window 0 start address bits 19-12 */
213 writeb((pcmcia_cis_ptr&0x00f00000) >> 20,
214 socket_base + 0x811); /* Memory window 0 start address bits 23-20 */
215 writeb(((pcmcia_cis_ptr+cis_len-1) & 0x000ff000) >> 12,
216 socket_base + 0x812); /* Memory window 0 end address bits 19-12*/
217 writeb(((pcmcia_cis_ptr+cis_len-1) & 0x00f00000) >> 20,
218 socket_base + 0x813); /* Memory window 0 end address bits 23-20*/
219 writeb(0x00, socket_base + 0x814); /* Memory window 0 offset bits 19-12 */
220 writeb(0x40, socket_base + 0x815); /* Memory window 0 offset bits 23-20 and
221 * options (read/write, attribute access) */
222 writeb(0x00, socket_base + 0x816); /* ExCA card-detect and general control */
223 writeb(0x00, socket_base + 0x81e); /* ExCA global control (interrupt modes) */
225 writeb((pcmcia_cis_ptr & 0xff000000) >> 24,
226 socket_base + 0x840); /* Memory window address bits 31-24 */
229 /* turn off voltage */
230 if (voltage_set(slot, 0, 0)) {
234 /* Enable external hardware */
235 if (hardware_enable(slot)) {
239 if (check_ide_device(slot, ide_base_bus)) {
246 /* ------------------------------------------------------------------------- */
249 static int pcmcia_off (void)
253 writeb(0x00, socket_base + 0x806); /* disable all I/O and memory windows */
255 writeb(0x00, socket_base + 0x808); /* I/O window 0 base address */
256 writeb(0x00, socket_base + 0x809);
257 writeb(0x00, socket_base + 0x80a); /* I/O window 0 end address */
258 writeb(0x00, socket_base + 0x80b);
259 writeb(0x00, socket_base + 0x836); /* I/O window 0 offset address */
260 writeb(0x00, socket_base + 0x837);
262 writeb(0x00, socket_base + 0x80c); /* I/O window 1 base address */
263 writeb(0x00, socket_base + 0x80d);
264 writeb(0x00, socket_base + 0x80e); /* I/O window 1 end address */
265 writeb(0x00, socket_base + 0x80f);
266 writeb(0x00, socket_base + 0x838); /* I/O window 1 offset address */
267 writeb(0x00, socket_base + 0x839);
269 writeb(0x00, socket_base + 0x810); /* Memory window 0 start address */
270 writeb(0x00, socket_base + 0x811);
271 writeb(0x00, socket_base + 0x812); /* Memory window 0 end address */
272 writeb(0x00, socket_base + 0x813);
273 writeb(0x00, socket_base + 0x814); /* Memory window 0 offset */
274 writeb(0x00, socket_base + 0x815);
276 writeb(0xc0, socket_base + 0x840); /* Memory window 0 page address */
279 /* turn off voltage */
280 voltage_set(slot, 0, 0);
282 /* disable external hardware */
283 printf ("Shutdown and Poweroff Ti PCI1410A\n");
284 hardware_disable(slot);
290 /* ------------------------------------------------------------------------- */
293 #define MAX_TUPEL_SZ 512
294 #define MAX_FEATURES 4
295 int ide_devices_found;
296 static int check_ide_device(int slot, int ide_base_bus)
298 volatile uchar *ident = NULL;
299 volatile uchar *feature_p[MAX_FEATURES];
300 volatile uchar *p, *start;
304 ushort config_base = 0;
309 debug ("PCMCIA MEM: %08X\n", pcmcia_cis_ptr);
311 socket_status = readl(socket_base+8);
313 if ((socket_status & 6) != 0 || (socket_status & 0x20) != 0) {
314 printf("no card or CardBus card\n");
318 start = p = (volatile uchar *) pcmcia_cis_ptr;
320 while ((p - start) < MAX_TUPEL_SZ) {
324 if (code == 0xFF) { /* End of chain */
329 #if defined(DEBUG) && (DEBUG > 1)
331 volatile uchar *q = p;
332 printf ("\nTuple code %02x length %d\n\tData:",
335 for (i = 0; i < len; ++i) {
336 printf (" %02x", *q);
346 /* Fix for broken SanDisk which may have 0x80 bit set */
350 if (n_features < MAX_FEATURES)
351 feature_p[n_features++] = p;
354 config_base = (*(p+6) << 8) + (*(p+4));
355 debug ("\n## Config_base = %04x ###\n", config_base);
362 found = identify(ident);
364 if (func_id != ((uchar)~0)) {
365 print_funcid (func_id);
367 if (func_id == CISTPL_FUNCID_FIXED)
370 return 1; /* no disk drive */
373 for (i=0; i<n_features; ++i) {
374 print_fixed(feature_p[i]);
378 printf("unknown card type\n");
382 /* select config index 1 */
383 writeb(1, pcmcia_cis_ptr + config_base);
386 printf("Confiuration Option Register: %02x\n", readb(pcmcia_cis_ptr + config_base));
387 printf("Card Confiuration and Status Register: %02x\n", readb(pcmcia_cis_ptr + config_base + 2));
388 printf("Pin Replacement Register Register: %02x\n", readb(pcmcia_cis_ptr + config_base + 4));
389 printf("Socket and Copy Register: %02x\n", readb(pcmcia_cis_ptr + config_base + 6));
391 ide_devices_found |= (1 << (slot+ide_base_bus));
398 static int voltage_set(int slot, int vcc, int vpp)
405 reg = socket_base + 0x10;
416 socket_control |= 0x20;
419 socket_control |= 0x30;
427 socket_control |= 0x1;
430 socket_control |= 0x2;
433 socket_control |= 0x3;
439 writel(socket_control, reg);
441 debug ("voltage_set: Ti PCI1410A Slot %d, Vcc=%d.%d, Vpp=%d.%d\n",
442 slot, vcc/10, vcc%10, vpp/10, vpp%10);
449 static int hardware_enable(int slot)
455 socket_status = readl(socket_base+8);
457 if ((socket_status & 6) == 0) {
459 switch (socket_status & 0x3c00) {
463 voltage_set(slot, 50, 0);
466 voltage_set(slot, 33, 0);
469 voltage_set(slot, 33, 0);
472 voltage_set(slot, 0, 0);
476 voltage_set(slot, 0, 0);
479 pci_read_config_word(devbusfn, PCI_BRIDGE_CONTROL, &brg_ctrl);
480 brg_ctrl &= ~PCI_BRIDGE_CTL_BUS_RESET;
481 pci_write_config_word(devbusfn, PCI_BRIDGE_CONTROL, brg_ctrl);
482 is_82365sl = ((readb(socket_base+0x800) & 0x0f) == 2);
483 writeb(is_82365sl?0x90:0x98, socket_base+0x802);
484 writeb(0x67, socket_base+0x803);
487 printf("ExCA Id %02x, Card Status %02x, Power config %02x, Interrupt Config %02x, bridge control %04x %d\n",
488 readb(socket_base+0x800), readb(socket_base+0x801),
489 readb(socket_base+0x802), readb(socket_base+0x803), brg_ctrl, is_82365sl);
492 return ((readb(socket_base+0x801)&0x6c)==0x6c)?0:1;
497 static int hardware_disable(int slot)
499 voltage_set(slot, 0, 0);
503 static void print_funcid(int func)
507 case CISTPL_FUNCID_MULTI:
508 puts(" Multi-Function");
510 case CISTPL_FUNCID_MEMORY:
513 case CISTPL_FUNCID_SERIAL:
514 puts(" Serial Port");
516 case CISTPL_FUNCID_PARALLEL:
517 puts(" Parallel Port");
519 case CISTPL_FUNCID_FIXED:
522 case CISTPL_FUNCID_VIDEO:
523 puts(" Video Adapter");
525 case CISTPL_FUNCID_NETWORK:
526 puts(" Network Adapter");
528 case CISTPL_FUNCID_AIMS:
531 case CISTPL_FUNCID_SCSI:
532 puts(" SCSI Adapter");
541 /* ------------------------------------------------------------------------- */
543 static void print_fixed(volatile uchar *p)
551 case CISTPL_FUNCE_IDE_IFACE:
552 { uchar iface = *(p+2);
554 puts ((iface == CISTPL_IDE_INTERFACE) ? " IDE" : " unknown");
555 puts (" interface ");
558 case CISTPL_FUNCE_IDE_MASTER:
559 case CISTPL_FUNCE_IDE_SLAVE:
564 puts((f1 & CISTPL_IDE_SILICON) ? " [silicon]" : " [rotating]");
566 if (f1 & CISTPL_IDE_UNIQUE) {
570 puts((f1 & CISTPL_IDE_DUAL) ? " [dual]" : " [single]");
572 if (f2 & CISTPL_IDE_HAS_SLEEP) {
576 if (f2 & CISTPL_IDE_HAS_STANDBY) {
580 if (f2 & CISTPL_IDE_HAS_IDLE) {
584 if (f2 & CISTPL_IDE_LOW_POWER) {
585 puts(" [low power]");
588 if (f2 & CISTPL_IDE_REG_INHIBIT) {
589 puts(" [reg inhibit]");
592 if (f2 & CISTPL_IDE_HAS_INDEX) {
596 if (f2 & CISTPL_IDE_IOIS16) {
606 /* ------------------------------------------------------------------------- */
608 #define MAX_IDENT_CHARS 64
609 #define MAX_IDENT_FIELDS 4
611 static uchar *known_cards[] = {
616 static int identify(volatile uchar *p)
618 uchar id_str[MAX_IDENT_CHARS];
625 return (0); /* Don't know */
630 for (i=0; i<=4 && !done; ++i, p+=2) {
631 while ((data = *p) != '\0') {
637 if (t == &id_str[MAX_IDENT_CHARS-1]) {
647 while (--t > id_str) {
657 for (card=known_cards; *card; ++card) {
658 debug ("## Compare against \"%s\"\n", *card);
659 if (strcmp(*card, id_str) == 0) { /* found! */
660 debug ("## CARD FOUND ##\n");
665 return 0; /* don't know */
668 #endif /* CONFIG_IDE_TI_CARDBUS */