cmd/pcmcia.c

   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
  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
 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
 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
 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
 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 */