1 // SPDX-License-Identifier: GPL-2.0+
2 /*
3 * (C) Copyright 2000-2006
4 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
5 *
6 ********************************************************************
7 *
8 * Lots of code copied from:
9 *
10 * m8xx_pcmcia.c - Linux PCMCIA socket driver for the mpc8xx series.
11 * (C) 1999-2000 Magnus Damm <damm@bitsmart.com>
12 *
13 * "The ExCA standard specifies that socket controllers should provide
14 * two IO and five memory windows per socket, which can be independently
15 * configured and positioned in the host address space and mapped to
16 * arbitrary segments of card address space. " - David A Hinds. 1999
17 *
18 * This controller does _not_ meet the ExCA standard.
19 *
20 * m8xx pcmcia controller brief info:
21 * + 8 windows (attrib, mem, i/o)
22 * + up to two slots (SLOT_A and SLOT_B)
23 * + inputpins, outputpins, event and mask registers.
24 * - no offset register. sigh.
25 *
26 * Because of the lacking offset register we must map the whole card.
27 * We assign each memory window PCMCIA_MEM_WIN_SIZE address space.
28 * Make sure there is (PCMCIA_MEM_WIN_SIZE * PCMCIA_MEM_WIN_NO
29 * * PCMCIA_SOCKETS_NO) bytes at PCMCIA_MEM_WIN_BASE.
30 * The i/o windows are dynamically allocated at PCMCIA_IO_WIN_BASE.
31 * They are maximum 64KByte each...
32 */
33
34 /* #define DEBUG 1 */
35
36 /*
37 * PCMCIA support
38 */
39 #include <common.h>
40 #include <command.h>
41 #include <config.h>
42 #include <pcmcia.h>
43 #include <asm/io.h>
44
45 /* -------------------------------------------------------------------- */
46
47 #if defined(CONFIG_CMD_PCMCIA)
48
49 extern int pcmcia_on (void);
50 extern int pcmcia_off (void);
51
do_pinit(cmd_tbl_t * cmdtp,int flag,int argc,char * const argv[])52 int do_pinit (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
53 {
54 int rcode = 0;
55
56 if (argc != 2) {
57 printf ("Usage: pinit {on | off}\n");
58 return 1;
59 }
60 if (strcmp(argv[1],"on") == 0) {
61 rcode = pcmcia_on ();
62 } else if (strcmp(argv[1],"off") == 0) {
63 rcode = pcmcia_off ();
64 } else {
65 printf ("Usage: pinit {on | off}\n");
66 return 1;
67 }
68
69 return rcode;
70 }
71
72 U_BOOT_CMD(
73 pinit, 2, 0, do_pinit,
74 "PCMCIA sub-system",
75 "on - power on PCMCIA socket\n"
76 "pinit off - power off PCMCIA socket"
77 );
78
79 #endif
80
81 /* -------------------------------------------------------------------- */
82
83 #undef CHECK_IDE_DEVICE
84
85 #if defined(CONFIG_PXA_PCMCIA)
86 #define CHECK_IDE_DEVICE
87 #endif
88
89 #ifdef CHECK_IDE_DEVICE
90
91 int ide_devices_found;
92 static uchar *known_cards[] = {
93 (uchar *)"ARGOSY PnPIDE D5",
94 NULL
95 };
96
97 #define MAX_TUPEL_SZ 512
98 #define MAX_FEATURES 4
99
100 #define MAX_IDENT_CHARS 64
101 #define MAX_IDENT_FIELDS 4
102
103 #define indent "\t "
104
print_funcid(int func)105 static void print_funcid (int func)
106 {
107 puts (indent);
108 switch (func) {
109 case CISTPL_FUNCID_MULTI:
110 puts (" Multi-Function");
111 break;
112 case CISTPL_FUNCID_MEMORY:
113 puts (" Memory");
114 break;
115 case CISTPL_FUNCID_SERIAL:
116 puts (" Serial Port");
117 break;
118 case CISTPL_FUNCID_PARALLEL:
119 puts (" Parallel Port");
120 break;
121 case CISTPL_FUNCID_FIXED:
122 puts (" Fixed Disk");
123 break;
124 case CISTPL_FUNCID_VIDEO:
125 puts (" Video Adapter");
126 break;
127 case CISTPL_FUNCID_NETWORK:
128 puts (" Network Adapter");
129 break;
130 case CISTPL_FUNCID_AIMS:
131 puts (" AIMS Card");
132 break;
133 case CISTPL_FUNCID_SCSI:
134 puts (" SCSI Adapter");
135 break;
136 default:
137 puts (" Unknown");
138 break;
139 }
140 puts (" Card\n");
141 }
142
print_fixed(volatile uchar * p)143 static void print_fixed (volatile uchar *p)
144 {
145 if (p == NULL)
146 return;
147
148 puts(indent);
149
150 switch (*p) {
151 case CISTPL_FUNCE_IDE_IFACE:
152 { uchar iface = *(p+2);
153
154 puts ((iface == CISTPL_IDE_INTERFACE) ? " IDE" : " unknown");
155 puts (" interface ");
156 break;
157 }
158 case CISTPL_FUNCE_IDE_MASTER:
159 case CISTPL_FUNCE_IDE_SLAVE:
160 { uchar f1 = *(p+2);
161 uchar f2 = *(p+4);
162
163 puts ((f1 & CISTPL_IDE_SILICON) ? " [silicon]" : " [rotating]");
164
165 if (f1 & CISTPL_IDE_UNIQUE)
166 puts (" [unique]");
167
168 puts ((f1 & CISTPL_IDE_DUAL) ? " [dual]" : " [single]");
169
170 if (f2 & CISTPL_IDE_HAS_SLEEP)
171 puts (" [sleep]");
172
173 if (f2 & CISTPL_IDE_HAS_STANDBY)
174 puts (" [standby]");
175
176 if (f2 & CISTPL_IDE_HAS_IDLE)
177 puts (" [idle]");
178
179 if (f2 & CISTPL_IDE_LOW_POWER)
180 puts (" [low power]");
181
182 if (f2 & CISTPL_IDE_REG_INHIBIT)
183 puts (" [reg inhibit]");
184
185 if (f2 & CISTPL_IDE_HAS_INDEX)
186 puts (" [index]");
187
188 if (f2 & CISTPL_IDE_IOIS16)
189 puts (" [IOis16]");
190
191 break;
192 }
193 }
194 putc ('\n');
195 }
196
identify(volatile uchar * p)197 static int identify (volatile uchar *p)
198 {
199 uchar id_str[MAX_IDENT_CHARS];
200 uchar data;
201 uchar *t;
202 uchar **card;
203 int i, done;
204
205 if (p == NULL)
206 return (0); /* Don't know */
207
208 t = id_str;
209 done =0;
210
211 for (i=0; i<=4 && !done; ++i, p+=2) {
212 while ((data = *p) != '\0') {
213 if (data == 0xFF) {
214 done = 1;
215 break;
216 }
217 *t++ = data;
218 if (t == &id_str[MAX_IDENT_CHARS-1]) {
219 done = 1;
220 break;
221 }
222 p += 2;
223 }
224 if (!done)
225 *t++ = ' ';
226 }
227 *t = '\0';
228 while (--t > id_str) {
229 if (*t == ' ')
230 *t = '\0';
231 else
232 break;
233 }
234 puts ((char *)id_str);
235 putc ('\n');
236
237 for (card=known_cards; *card; ++card) {
238 debug ("## Compare against \"%s\"\n", *card);
239 if (strcmp((char *)*card, (char *)id_str) == 0) { /* found! */
240 debug ("## CARD FOUND ##\n");
241 return (1);
242 }
243 }
244
245 return (0); /* don't know */
246 }
247
check_ide_device(int slot)248 int check_ide_device (int slot)
249 {
250 volatile uchar *ident = NULL;
251 volatile uchar *feature_p[MAX_FEATURES];
252 volatile uchar *p, *start, *addr;
253 int n_features = 0;
254 uchar func_id = ~0;
255 uchar code, len;
256 ushort config_base = 0;
257 int found = 0;
258 int i;
259
260 addr = (volatile uchar *)(CONFIG_SYS_PCMCIA_MEM_ADDR +
261 CONFIG_SYS_PCMCIA_MEM_SIZE * (slot * 4));
262 debug ("PCMCIA MEM: %08lX\n", (ulong)addr);
263
264 start = p = (volatile uchar *) addr;
265
266 while ((p - start) < MAX_TUPEL_SZ) {
267
268 code = *p; p += 2;
269
270 if (code == 0xFF) { /* End of chain */
271 break;
272 }
273
274 len = *p; p += 2;
275 #if defined(DEBUG) && (DEBUG > 1)
276 { volatile uchar *q = p;
277 printf ("\nTuple code %02x length %d\n\tData:",
278 code, len);
279
280 for (i = 0; i < len; ++i) {
281 printf (" %02x", *q);
282 q+= 2;
283 }
284 }
285 #endif /* DEBUG */
286 switch (code) {
287 case CISTPL_VERS_1:
288 ident = p + 4;
289 break;
290 case CISTPL_FUNCID:
291 /* Fix for broken SanDisk which may have 0x80 bit set */
292 func_id = *p & 0x7F;
293 break;
294 case CISTPL_FUNCE:
295 if (n_features < MAX_FEATURES)
296 feature_p[n_features++] = p;
297 break;
298 case CISTPL_CONFIG:
299 config_base = (*(p+6) << 8) + (*(p+4));
300 debug ("\n## Config_base = %04x ###\n", config_base);
301 default:
302 break;
303 }
304 p += 2 * len;
305 }
306
307 found = identify (ident);
308
309 if (func_id != ((uchar)~0)) {
310 print_funcid (func_id);
311
312 if (func_id == CISTPL_FUNCID_FIXED)
313 found = 1;
314 else
315 return (1); /* no disk drive */
316 }
317
318 for (i=0; i<n_features; ++i) {
319 print_fixed (feature_p[i]);
320 }
321
322 if (!found) {
323 printf ("unknown card type\n");
324 return (1);
325 }
326
327 ide_devices_found |= (1 << slot);
328
329 /* set I/O area in config reg -> only valid for ARGOSY D5!!! */
330 *((uchar *)(addr + config_base)) = 1;
331 #if 0
332 printf("\n## Config_base = %04x ###\n", config_base);
333 printf("Configuration Option Register: %02x @ %x\n", readb(addr + config_base), addr + config_base);
334 printf("Card Configuration and Status Register: %02x\n", readb(addr + config_base + 2));
335 printf("Pin Replacement Register Register: %02x\n", readb(addr + config_base + 4));
336 printf("Socket and Copy Register: %02x\n", readb(addr + config_base + 6));
337 #endif
338 return (0);
339 }
340
341 #endif /* CHECK_IDE_DEVICE */
342