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...
67 #if defined(CONFIG_CMD_PCMCIA)
69 int pcmcia_on(int ide_base_bus
);
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
);
81 /* ------------------------------------------------------------------------- */
84 const char *indent
= "\t ";
86 /* ------------------------------------------------------------------------- */
89 int do_pinit(cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *argv
[])
91 #ifndef CONFIG_SYS_FIRST_PCMCIA_BUS
92 # define CONFIG_SYS_FIRST_PCMCIA_BUS 0
98 printf ("Usage: pinit {on | off}\n");
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();
106 printf ("Usage: pinit {on | off}\n");
113 /* ------------------------------------------------------------------------- */
116 static struct pci_device_id supported
[] = {
117 { PCI_VENDOR_ID_TI
, 0xac50 }, /* Ti PCI1410A */
118 { PCI_VENDOR_ID_TI
, 0xac56 }, /* Ti PCI1510 */
122 static pci_dev_t devbusfn
;
123 static u32 socket_base
;
124 static u32 pcmcia_cis_ptr
;
126 int pcmcia_on(int ide_base_bus
)
136 * Find the CardBus PCI device(s).
138 if ((devbusfn
= pci_find_devices(supported
, 0)) < 0) {
139 printf("Ti CardBus: not found\n");
143 pci_read_config_word(devbusfn
, PCI_DEVICE_ID
, &dev_id
);
145 if (dev_id
== 0xac56) {
146 debug("Enable PCMCIA Ti PCI1510\n");
148 debug("Enable PCMCIA Ti PCI1410A\n");
151 pcmcia_cis_ptr
= CONFIG_SYS_PCMCIA_CIS_WIN
;
152 cis_len
= CONFIG_SYS_PCMCIA_CIS_WIN_SIZE
;
154 io_base
= CONFIG_SYS_PCMCIA_IO_WIN
;
155 io_len
= CONFIG_SYS_PCMCIA_IO_WIN_SIZE
;
158 * Setup the PCI device.
160 pci_read_config_dword(devbusfn
, PCI_BASE_ADDRESS_0
, &socket_base
);
163 socket_status
= readl(socket_base
+8);
164 if ((socket_status
& 6) == 0) {
165 printf("Card Present: ");
167 switch (socket_status
& 0x3c00) {
179 printf("unsupported Vcc ");
182 switch (socket_status
& 0x30) {
184 printf("16bit PC-Card\n");
187 printf("32bit CardBus Card\n");
190 printf("8bit PC-Card\n");
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 */
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 */
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);
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) */
224 writeb((pcmcia_cis_ptr
& 0xff000000) >> 24,
225 socket_base
+ 0x840); /* Memory window address bits 31-24 */
228 /* turn off voltage */
229 if (voltage_set(slot
, 0, 0)) {
233 /* Enable external hardware */
234 if (hardware_enable(slot
)) {
238 if (check_ide_device(slot
, ide_base_bus
)) {
245 /* ------------------------------------------------------------------------- */
248 static int pcmcia_off (void)
252 writeb(0x00, socket_base
+ 0x806); /* disable all I/O and memory windows */
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);
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);
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);
275 writeb(0xc0, socket_base
+ 0x840); /* Memory window 0 page address */
278 /* turn off voltage */
279 voltage_set(slot
, 0, 0);
281 /* disable external hardware */
282 printf ("Shutdown and Poweroff Ti PCI1410A\n");
283 hardware_disable(slot
);
289 /* ------------------------------------------------------------------------- */
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
)
297 volatile uchar
*ident
= NULL
;
298 volatile uchar
*feature_p
[MAX_FEATURES
];
299 volatile uchar
*p
, *start
;
303 ushort config_base
= 0;
308 debug ("PCMCIA MEM: %08X\n", pcmcia_cis_ptr
);
310 socket_status
= readl(socket_base
+8);
312 if ((socket_status
& 6) != 0 || (socket_status
& 0x20) != 0) {
313 printf("no card or CardBus card\n");
317 start
= p
= (volatile uchar
*) pcmcia_cis_ptr
;
319 while ((p
- start
) < MAX_TUPEL_SZ
) {
323 if (code
== 0xFF) { /* End of chain */
328 #if defined(DEBUG) && (DEBUG > 1)
330 volatile uchar
*q
= p
;
331 printf ("\nTuple code %02x length %d\n\tData:",
334 for (i
= 0; i
< len
; ++i
) {
335 printf (" %02x", *q
);
345 /* Fix for broken SanDisk which may have 0x80 bit set */
349 if (n_features
< MAX_FEATURES
)
350 feature_p
[n_features
++] = p
;
353 config_base
= (*(p
+6) << 8) + (*(p
+4));
354 debug ("\n## Config_base = %04x ###\n", config_base
);
361 found
= identify(ident
);
363 if (func_id
!= ((uchar
)~0)) {
364 print_funcid (func_id
);
366 if (func_id
== CISTPL_FUNCID_FIXED
)
369 return 1; /* no disk drive */
372 for (i
=0; i
<n_features
; ++i
) {
373 print_fixed(feature_p
[i
]);
377 printf("unknown card type\n");
381 /* select config index 1 */
382 writeb(1, pcmcia_cis_ptr
+ config_base
);
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));
390 ide_devices_found
|= (1 << (slot
+ide_base_bus
));
396 static int voltage_set(int slot
, int vcc
, int vpp
)
403 reg
= socket_base
+ 0x10;
414 socket_control
|= 0x20;
417 socket_control
|= 0x30;
425 socket_control
|= 0x1;
428 socket_control
|= 0x2;
431 socket_control
|= 0x3;
437 writel(socket_control
, reg
);
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);
447 static int hardware_enable(int slot
)
453 socket_status
= readl(socket_base
+8);
455 if ((socket_status
& 6) == 0) {
457 switch (socket_status
& 0x3c00) {
461 voltage_set(slot
, 50, 0);
464 voltage_set(slot
, 33, 0);
467 voltage_set(slot
, 33, 0);
470 voltage_set(slot
, 0, 0);
474 voltage_set(slot
, 0, 0);
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);
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
);
490 return ((readb(socket_base
+0x801)&0x6c)==0x6c)?0:1;
494 static int hardware_disable(int slot
)
496 voltage_set(slot
, 0, 0);
500 static void print_funcid(int func
)
504 case CISTPL_FUNCID_MULTI
:
505 puts(" Multi-Function");
507 case CISTPL_FUNCID_MEMORY
:
510 case CISTPL_FUNCID_SERIAL
:
511 puts(" Serial Port");
513 case CISTPL_FUNCID_PARALLEL
:
514 puts(" Parallel Port");
516 case CISTPL_FUNCID_FIXED
:
519 case CISTPL_FUNCID_VIDEO
:
520 puts(" Video Adapter");
522 case CISTPL_FUNCID_NETWORK
:
523 puts(" Network Adapter");
525 case CISTPL_FUNCID_AIMS
:
528 case CISTPL_FUNCID_SCSI
:
529 puts(" SCSI Adapter");
538 /* ------------------------------------------------------------------------- */
540 static void print_fixed(volatile uchar
*p
)
548 case CISTPL_FUNCE_IDE_IFACE
:
549 { uchar iface
= *(p
+2);
551 puts ((iface
== CISTPL_IDE_INTERFACE
) ? " IDE" : " unknown");
552 puts (" interface ");
555 case CISTPL_FUNCE_IDE_MASTER
:
556 case CISTPL_FUNCE_IDE_SLAVE
:
561 puts((f1
& CISTPL_IDE_SILICON
) ? " [silicon]" : " [rotating]");
563 if (f1
& CISTPL_IDE_UNIQUE
) {
567 puts((f1
& CISTPL_IDE_DUAL
) ? " [dual]" : " [single]");
569 if (f2
& CISTPL_IDE_HAS_SLEEP
) {
573 if (f2
& CISTPL_IDE_HAS_STANDBY
) {
577 if (f2
& CISTPL_IDE_HAS_IDLE
) {
581 if (f2
& CISTPL_IDE_LOW_POWER
) {
582 puts(" [low power]");
585 if (f2
& CISTPL_IDE_REG_INHIBIT
) {
586 puts(" [reg inhibit]");
589 if (f2
& CISTPL_IDE_HAS_INDEX
) {
593 if (f2
& CISTPL_IDE_IOIS16
) {
603 /* ------------------------------------------------------------------------- */
605 #define MAX_IDENT_CHARS 64
606 #define MAX_IDENT_FIELDS 4
608 static uchar
*known_cards
[] = {
613 static int identify(volatile uchar
*p
)
615 uchar id_str
[MAX_IDENT_CHARS
];
622 return (0); /* Don't know */
627 for (i
=0; i
<=4 && !done
; ++i
, p
+=2) {
628 while ((data
= *p
) != '\0') {
634 if (t
== &id_str
[MAX_IDENT_CHARS
-1]) {
644 while (--t
> id_str
) {
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");
662 return 0; /* don't know */
665 #endif /* CONFIG_CMD_PCMCIA */