drivers/i82365.c

   1 /*
   2  * (C) Copyright 2003
   3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   4  *
   5  * See file CREDITS for list of people who contributed to this
   6  * project.
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License as
  10  * published by the Free Software Foundation; either version 2 of
  11  * the License, or (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  21  * MA 02111-1307 USA
  22  *
  23  ********************************************************************
  24  *
  25  * Lots of code copied from:
  26  *
  27  * i82365.c 1.352 - Linux driver for Intel 82365 and compatible
  28  * PC Card controllers, and Yenta-compatible PCI-to-CardBus controllers.
  29  * (C) 1999 David A. Hinds <dahinds@users.sourceforge.net>
  30  */
  31
  32 #include <common.h>
  33
  34 #ifdef CONFIG_I82365
  35
  36 #include <command.h>
  37 #include <pci.h>
  38 #include <pcmcia.h>
  39 #include <cmd_pcmcia.h>
  40 #include <asm/io.h>
  41
  42 #include <pcmcia/ss.h>
  43 #include <pcmcia/i82365.h>
  44 #include <pcmcia/ti113x.h>
  45 #include <pcmcia/yenta.h>
  46
  47 /* #define DEBUG */
  48
  49 static struct pci_device_id supported[] = {
  50         {PCI_VENDOR_ID_TI, PCI_DEVICE_ID_TI_1510},
  51         {0, 0}
  52 };
  53
  54 #define CYCLE_TIME      120
  55
  56 #ifdef DEBUG
  57 static void i82365_dump_regions (pci_dev_t dev);
  58 #endif
  59
  60 typedef struct socket_info_t {
  61     pci_dev_t           dev;
  62     u_short             bcr;
  63     u_char              pci_lat, cb_lat, sub_bus, cache;
  64     u_int               cb_phys;
  65
  66     socket_cap_t        cap;
  67     ti113x_state_t      state;
  68 } socket_info_t;
  69
  70 static socket_info_t socket;
  71 static socket_state_t state;
  72 static struct pccard_mem_map mem;
  73 static struct pccard_io_map io;
  74
  75 /*====================================================================*/
  76
  77 /* Some PCI shortcuts */
  78
  79 static int pci_readb (socket_info_t * s, int r, u_char * v)
  80 {
  81         return pci_read_config_byte (s->dev, r, v);
  82 }
  83 static int pci_writeb (socket_info_t * s, int r, u_char v)
  84 {
  85         return pci_write_config_byte (s->dev, r, v);
  86 }
  87 static int pci_readw (socket_info_t * s, int r, u_short * v)
  88 {
  89         return pci_read_config_word (s->dev, r, v);
  90 }
  91 static int pci_writew (socket_info_t * s, int r, u_short v)
  92 {
  93         return pci_write_config_word (s->dev, r, v);
  94 }
  95 static int pci_readl (socket_info_t * s, int r, u_int * v)
  96 {
  97         return pci_read_config_dword (s->dev, r, v);
  98 }
  99 static int pci_writel (socket_info_t * s, int r, u_int v)
 100 {
 101         return pci_write_config_dword (s->dev, r, v);
 102 }
 103
 104 #define cb_readb(s, r)          readb((s)->cb_phys + (r))
 105 #define cb_readl(s, r)          readl((s)->cb_phys + (r))
 106 #define cb_writeb(s, r, v)      writeb(v, (s)->cb_phys + (r))
 107 #define cb_writel(s, r, v)      writel(v, (s)->cb_phys + (r))
 108
 109 /*====================================================================*/
 110
 111 static u_char i365_get (socket_info_t * s, u_short reg)
 112 {
 113         return cb_readb (s, 0x0800 + reg);
 114 }
 115
 116 static void i365_set (socket_info_t * s, u_short reg, u_char data)
 117 {
 118         cb_writeb (s, 0x0800 + reg, data);
 119 }
 120
 121 static void i365_bset (socket_info_t * s, u_short reg, u_char mask)
 122 {
 123         i365_set (s, reg, i365_get (s, reg) | mask);
 124 }
 125
 126 static void i365_bclr (socket_info_t * s, u_short reg, u_char mask)
 127 {
 128         i365_set (s, reg, i365_get (s, reg) & ~mask);
 129 }
 130
 131 #if 0   /* not used */
 132 static void i365_bflip (socket_info_t * s, u_short reg, u_char mask, int b)
 133 {
 134         u_char d = i365_get (s, reg);
 135
 136         i365_set (s, reg, (b) ? (d | mask) : (d & ~mask));
 137 }
 138
 139 static u_short i365_get_pair (socket_info_t * s, u_short reg)
 140 {
 141         return (i365_get (s, reg) + (i365_get (s, reg + 1) << 8));
 142 }
 143 #endif  /* not used */
 144
 145 static void i365_set_pair (socket_info_t * s, u_short reg, u_short data)
 146 {
 147         i365_set (s, reg, data & 0xff);
 148         i365_set (s, reg + 1, data >> 8);
 149 }
 150
 151 /*======================================================================
 152
 153     Code to save and restore global state information for TI 1130 and
 154     TI 1131 controllers, and to set and report global configuration
 155     options.
 156
 157 ======================================================================*/
 158
 159 static void ti113x_get_state (socket_info_t * s)
 160 {
 161         ti113x_state_t *p = &s->state;
 162
 163         pci_readl (s, TI113X_SYSTEM_CONTROL, &p->sysctl);
 164         pci_readb (s, TI113X_CARD_CONTROL, &p->cardctl);
 165         pci_readb (s, TI113X_DEVICE_CONTROL, &p->devctl);
 166         pci_readb (s, TI1250_DIAGNOSTIC, &p->diag);
 167         pci_readl (s, TI12XX_IRQMUX, &p->irqmux);
 168 }
 169
 170 static void ti113x_set_state (socket_info_t * s)
 171 {
 172         ti113x_state_t *p = &s->state;
 173
 174         pci_writel (s, TI113X_SYSTEM_CONTROL, p->sysctl);
 175         pci_writeb (s, TI113X_CARD_CONTROL, p->cardctl);
 176         pci_writeb (s, TI113X_DEVICE_CONTROL, p->devctl);
 177         pci_writeb (s, TI1250_MULTIMEDIA_CTL, 0);
 178         pci_writeb (s, TI1250_DIAGNOSTIC, p->diag);
 179         pci_writel (s, TI12XX_IRQMUX, p->irqmux);
 180         i365_set_pair (s, TI113X_IO_OFFSET (0), 0);
 181         i365_set_pair (s, TI113X_IO_OFFSET (1), 0);
 182 }
 183
 184 static u_int ti113x_set_opts (socket_info_t * s)
 185 {
 186         ti113x_state_t *p = &s->state;
 187         u_int mask = 0xffff;
 188
 189         p->cardctl &= ~TI113X_CCR_ZVENABLE;
 190         p->cardctl |= TI113X_CCR_SPKROUTEN;
 191
 192         return mask;
 193 }
 194
 195 /*======================================================================
 196
 197     Routines to handle common CardBus options
 198
 199 ======================================================================*/
 200
 201 /* Default settings for PCI command configuration register */
 202 #define CMD_DFLT (PCI_COMMAND_IO|PCI_COMMAND_MEMORY| \
 203                   PCI_COMMAND_MASTER|PCI_COMMAND_WAIT)
 204
 205 static void cb_get_state (socket_info_t * s)
 206 {
 207         pci_readb (s, PCI_CACHE_LINE_SIZE, &s->cache);
 208         pci_readb (s, PCI_LATENCY_TIMER, &s->pci_lat);
 209         pci_readb (s, CB_LATENCY_TIMER, &s->cb_lat);
 210         pci_readb (s, CB_CARDBUS_BUS, &s->cap.cardbus);
 211         pci_readb (s, CB_SUBORD_BUS, &s->sub_bus);
 212         pci_readw (s, CB_BRIDGE_CONTROL, &s->bcr);
 213 }
 214
 215 static void cb_set_state (socket_info_t * s)
 216 {
 217         pci_writel (s, CB_LEGACY_MODE_BASE, 0);
 218         pci_writel (s, PCI_BASE_ADDRESS_0, s->cb_phys);
 219         pci_writew (s, PCI_COMMAND, CMD_DFLT);
 220         pci_writeb (s, PCI_CACHE_LINE_SIZE, s->cache);
 221         pci_writeb (s, PCI_LATENCY_TIMER, s->pci_lat);
 222         pci_writeb (s, CB_LATENCY_TIMER, s->cb_lat);
 223         pci_writeb (s, CB_CARDBUS_BUS, s->cap.cardbus);
 224         pci_writeb (s, CB_SUBORD_BUS, s->sub_bus);
 225         pci_writew (s, CB_BRIDGE_CONTROL, s->bcr);
 226 }
 227
 228 static void cb_set_opts (socket_info_t * s)
 229 {
 230         if (s->cache == 0)
 231                 s->cache = 8;
 232         if (s->pci_lat == 0)
 233                 s->pci_lat = 0xa8;
 234         if (s->cb_lat == 0)
 235                 s->cb_lat = 0xb0;
 236 }
 237
 238 /*======================================================================
 239
 240     Power control for Cardbus controllers: used both for 16-bit and
 241     Cardbus cards.
 242
 243 ======================================================================*/
 244
 245 static int cb_set_power (socket_info_t * s, socket_state_t * state)
 246 {
 247         u_int reg = 0;
 248
 249         /* restart card voltage detection if it seems appropriate */
 250         if ((state->Vcc == 0) && (state->Vpp == 0) &&
 251                 !(cb_readl (s, CB_SOCKET_STATE) & CB_SS_VSENSE))
 252                 cb_writel (s, CB_SOCKET_FORCE, CB_SF_CVSTEST);
 253         switch (state->Vcc) {
 254         case 0:
 255                 reg = 0;
 256                 break;
 257         case 33:
 258                 reg = CB_SC_VCC_3V;
 259                 break;
 260         case 50:
 261                 reg = CB_SC_VCC_5V;
 262                 break;
 263         default:
 264                 return -1;
 265         }
 266         switch (state->Vpp) {
 267         case 0:
 268                 break;
 269         case 33:
 270                 reg |= CB_SC_VPP_3V;
 271                 break;
 272         case 50:
 273                 reg |= CB_SC_VPP_5V;
 274                 break;
 275         case 120:
 276                 reg |= CB_SC_VPP_12V;
 277                 break;
 278         default:
 279                 return -1;
 280         }
 281         if (reg != cb_readl (s, CB_SOCKET_CONTROL))
 282                 cb_writel (s, CB_SOCKET_CONTROL, reg);
 283         return 0;
 284 }
 285
 286 /*======================================================================
 287
 288     Generic routines to get and set controller options
 289
 290 ======================================================================*/
 291
 292 static void get_bridge_state (socket_info_t * s)
 293 {
 294         ti113x_get_state (s);
 295         cb_get_state (s);
 296 }
 297
 298 static void set_bridge_state (socket_info_t * s)
 299 {
 300         cb_set_state (s);
 301         i365_set (s, I365_GBLCTL, 0x00);
 302         i365_set (s, I365_GENCTL, 0x00);
 303         ti113x_set_state (s);
 304 }
 305
 306 static void set_bridge_opts (socket_info_t * s)
 307 {
 308         ti113x_set_opts (s);
 309         cb_set_opts (s);
 310 }
 311
 312 /*====================================================================*/
 313
 314 static int i365_get_status (socket_info_t * s, u_int * value)
 315 {
 316         u_int status;
 317
 318         status = i365_get (s, I365_STATUS);
 319         *value = ((status & I365_CS_DETECT) == I365_CS_DETECT) ? SS_DETECT : 0;
 320         if (i365_get (s, I365_INTCTL) & I365_PC_IOCARD) {
 321                 *value |= (status & I365_CS_STSCHG) ? 0 : SS_STSCHG;
 322         } else {
 323                 *value |= (status & I365_CS_BVD1) ? 0 : SS_BATDEAD;
 324                 *value |= (status & I365_CS_BVD2) ? 0 : SS_BATWARN;
 325         }
 326         *value |= (status & I365_CS_WRPROT) ? SS_WRPROT : 0;
 327         *value |= (status & I365_CS_READY) ? SS_READY : 0;
 328         *value |= (status & I365_CS_POWERON) ? SS_POWERON : 0;
 329
 330         status = cb_readl (s, CB_SOCKET_STATE);
 331         *value |= (status & CB_SS_32BIT) ? SS_CARDBUS : 0;
 332         *value |= (status & CB_SS_3VCARD) ? SS_3VCARD : 0;
 333         *value |= (status & CB_SS_XVCARD) ? SS_XVCARD : 0;
 334         *value |= (status & CB_SS_VSENSE) ? 0 : SS_PENDING;
 335         /* For now, ignore cards with unsupported voltage keys */
 336         if (*value & SS_XVCARD)
 337                 *value &= ~(SS_DETECT | SS_3VCARD | SS_XVCARD);
 338
 339         return 0;
 340 }       /* i365_get_status */
 341
 342 static int i365_set_socket (socket_info_t * s, socket_state_t * state)
 343 {
 344         u_char reg;
 345
 346         set_bridge_state (s);
 347
 348         /* IO card, RESET flag */
 349         reg = 0;
 350         reg |= (state->flags & SS_RESET) ? 0 : I365_PC_RESET;
 351         reg |= (state->flags & SS_IOCARD) ? I365_PC_IOCARD : 0;
 352         i365_set (s, I365_INTCTL, reg);
 353
 354         reg = I365_PWR_NORESET;
 355         if (state->flags & SS_PWR_AUTO)
 356                 reg |= I365_PWR_AUTO;
 357         if (state->flags & SS_OUTPUT_ENA)
 358                 reg |= I365_PWR_OUT;
 359
 360         cb_set_power (s, state);
 361         reg |= i365_get (s, I365_POWER) & (I365_VCC_MASK | I365_VPP1_MASK);
 362
 363         if (reg != i365_get (s, I365_POWER))
 364                 i365_set (s, I365_POWER, reg);
 365
 366         return 0;
 367 }       /* i365_set_socket */
 368
 369 /*====================================================================*/
 370
 371 static int i365_set_mem_map (socket_info_t * s, struct pccard_mem_map *mem)
 372 {
 373         u_short base, i;
 374         u_char map;
 375
 376         map = mem->map;
 377         if ((map > 4) ||
 378             (mem->card_start > 0x3ffffff) ||
 379             (mem->sys_start > mem->sys_stop) ||
 380             (mem->speed > 1000)) {
 381                 return -1;
 382         }
 383
 384         /* Turn off the window before changing anything */
 385         if (i365_get (s, I365_ADDRWIN) & I365_ENA_MEM (map))
 386                 i365_bclr (s, I365_ADDRWIN, I365_ENA_MEM (map));
 387
 388         /* Take care of high byte, for PCI controllers */
 389         i365_set (s, CB_MEM_PAGE (map), mem->sys_start >> 24);
 390
 391         base = I365_MEM (map);
 392         i = (mem->sys_start >> 12) & 0x0fff;
 393         if (mem->flags & MAP_16BIT)
 394                 i |= I365_MEM_16BIT;
 395         if (mem->flags & MAP_0WS)
 396                 i |= I365_MEM_0WS;
 397         i365_set_pair (s, base + I365_W_START, i);
 398
 399         i = (mem->sys_stop >> 12) & 0x0fff;
 400         switch (mem->speed / CYCLE_TIME) {
 401         case 0:
 402                 break;
 403         case 1:
 404                 i |= I365_MEM_WS0;
 405                 break;
 406         case 2:
 407                 i |= I365_MEM_WS1;
 408                 break;
 409         default:
 410                 i |= I365_MEM_WS1 | I365_MEM_WS0;
 411                 break;
 412         }
 413         i365_set_pair (s, base + I365_W_STOP, i);
 414
 415         i = ((mem->card_start - mem->sys_start) >> 12) & 0x3fff;
 416         if (mem->flags & MAP_WRPROT)
 417                 i |= I365_MEM_WRPROT;
 418         if (mem->flags & MAP_ATTRIB)
 419                 i |= I365_MEM_REG;
 420         i365_set_pair (s, base + I365_W_OFF, i);
 421
 422         /* Turn on the window if necessary */
 423         if (mem->flags & MAP_ACTIVE)
 424                 i365_bset (s, I365_ADDRWIN, I365_ENA_MEM (map));
 425         return 0;
 426 }       /* i365_set_mem_map */
 427
 428 static int i365_set_io_map (socket_info_t * s, struct pccard_io_map *io)
 429 {
 430         u_char map, ioctl;
 431
 432         map = io->map;
 433         if ((map > 1) || (io->start > 0xffff) || (io->stop > 0xffff) ||
 434                 (io->stop < io->start))
 435                 return -1;
 436         /* Turn off the window before changing anything */
 437         if (i365_get (s, I365_ADDRWIN) & I365_ENA_IO (map))
 438                 i365_bclr (s, I365_ADDRWIN, I365_ENA_IO (map));
 439         i365_set_pair (s, I365_IO (map) + I365_W_START, io->start);
 440         i365_set_pair (s, I365_IO (map) + I365_W_STOP, io->stop);
 441         ioctl = i365_get (s, I365_IOCTL) & ~I365_IOCTL_MASK (map);
 442         if (io->speed)
 443                 ioctl |= I365_IOCTL_WAIT (map);
 444         if (io->flags & MAP_0WS)
 445                 ioctl |= I365_IOCTL_0WS (map);
 446         if (io->flags & MAP_16BIT)
 447                 ioctl |= I365_IOCTL_16BIT (map);
 448         if (io->flags & MAP_AUTOSZ)
 449                 ioctl |= I365_IOCTL_IOCS16 (map);
 450         i365_set (s, I365_IOCTL, ioctl);
 451         /* Turn on the window if necessary */
 452         if (io->flags & MAP_ACTIVE)
 453                 i365_bset (s, I365_ADDRWIN, I365_ENA_IO (map));
 454         return 0;
 455 }       /* i365_set_io_map */
 456
 457 /*====================================================================*/
 458
 459 int i82365_init (void)
 460 {
 461         u_int val;
 462         int i;
 463
 464         if ((socket.dev = pci_find_devices (supported, 0)) < 0) {
 465                 /* Controller not found */
 466                 return 1;
 467         }
 468
 469         pci_read_config_dword (socket.dev, PCI_BASE_ADDRESS_0, &socket.cb_phys);
 470         socket.cb_phys &= ~0xf;
 471
 472         get_bridge_state (&socket);
 473         set_bridge_opts (&socket);
 474
 475         i365_get_status (&socket, &val);
 476
 477         if (val & SS_DETECT) {
 478                 if (val & SS_3VCARD) {
 479                         state.Vcc = state.Vpp = 33;
 480                         puts (" 3.3V card found: ");
 481                 } else if (!(val & SS_XVCARD)) {
 482                         state.Vcc = state.Vpp = 50;
 483                         puts (" 5.0V card found: ");
 484                 } else {
 485                         printf ("i82365: unsupported voltage key\n");
 486                         state.Vcc = state.Vpp = 0;
 487                 }
 488         } else {
 489                 /* No card inserted */
 490                 return 1;
 491         }
 492
 493         state.flags = SS_IOCARD | SS_OUTPUT_ENA;
 494         state.csc_mask = 0;
 495         state.io_irq = 0;
 496
 497         i365_set_socket (&socket, &state);
 498
 499         for (i = 500; i; i--) {
 500                 if ((i365_get (&socket, I365_STATUS) & I365_CS_READY))
 501                         break;
 502                 udelay (1000);
 503         }
 504
 505         if (i == 0) {
 506                 /* PC Card not ready for data transfer */
 507                 return 1;
 508         }
 509
 510         mem.map = 0;
 511         mem.flags = MAP_ATTRIB | MAP_ACTIVE;
 512         mem.speed = 300;
 513         mem.sys_start = CFG_PCMCIA_MEM_ADDR;
 514         mem.sys_stop = CFG_PCMCIA_MEM_ADDR + CFG_PCMCIA_MEM_SIZE - 1;
 515         mem.card_start = 0;
 516
 517         i365_set_mem_map (&socket, &mem);
 518
 519         io.map = 0;
 520         io.flags = MAP_AUTOSZ | MAP_ACTIVE;
 521         io.speed = 0;
 522         io.start = 0x0100;
 523         io.stop = 0x010F;
 524
 525         i365_set_io_map (&socket, &io);
 526
 527 #ifdef DEBUG
 528         i82365_dump_regions (socket.dev);
 529 #endif
 530
 531         return 0;
 532 }
 533
 534 void i82365_exit (void)
 535 {
 536         io.map = 0;
 537         io.flags = 0;
 538         io.speed = 0;
 539         io.start = 0;
 540         io.stop = 0x1;
 541
 542         i365_set_io_map (&socket, &io);
 543
 544         mem.map = 0;
 545         mem.flags = 0;
 546         mem.speed = 0;
 547         mem.sys_start = 0;
 548         mem.sys_stop = 0x1000;
 549         mem.card_start = 0;
 550
 551         i365_set_mem_map (&socket, &mem);
 552
 553         socket.state.sysctl &= 0xFFFF00FF;
 554
 555         state.Vcc = state.Vpp = 0;
 556
 557         i365_set_socket (&socket, &state);
 558 }
 559
 560 /*======================================================================
 561
 562     Debug stuff
 563
 564 ======================================================================*/
 565
 566 #ifdef DEBUG
 567 static void i82365_dump_regions (pci_dev_t dev)
 568 {
 569         u_int tmp[2];
 570         u_int *mem = (void *) sock.cb_phys;
 571         u_char *cis = (void *) CFG_PCMCIA_MEM_ADDR;
 572         u_char *ide = (void *) (CFG_ATA_BASE_ADDR + CFG_ATA_REG_OFFSET);
 573
 574         pci_read_config_dword (dev, 0x00, tmp + 0);
 575         pci_read_config_dword (dev, 0x80, tmp + 1);
 576
 577         printf ("PCI CONF: %08X ... %08X\n", tmp[0], tmp[1]);
 578         printf ("PCI MEM:  ... %08X ... %08X\n", mem[0x8 / 4], mem[0x800 / 4]);
 579         printf ("CIS:      ...%c%c%c%c%c%c%c%c...\n",
 580                 cis[0x38], cis[0x3a], cis[0x3c], cis[0x3e],
 581                 cis[0x40], cis[0x42], cis[0x44], cis[0x48]);
 582         printf ("CIS CONF: %02X %02X %02X ...\n",
 583                 cis[0x200], cis[0x202], cis[0x204]);
 584         printf ("IDE:      %02X %02X %02X %02X %02X %02X %02X %02X\n",
 585                 ide[0], ide[1], ide[2], ide[3],
 586                 ide[4], ide[5], ide[6], ide[7]);
 587 }
 588 #endif  /* DEBUG */
 589
 590 #endif /* CONFIG_I82365 */