drivers/mmc/host/cb710-mmc.c

   1 /*
   2  *  cb710/mmc.c
   3  *
   4  *  Copyright by Michał Mirosław, 2008-2009
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 as
   8  * published by the Free Software Foundation.
   9  */
  10 #include <linux/kernel.h>
  11 #include <linux/module.h>
  12 #include <linux/pci.h>
  13 #include <linux/delay.h>
  14 #include "cb710-mmc.h"
  15
  16 static const u8 cb710_clock_divider_log2[8] = {
  17 /*      1, 2, 4, 8, 16, 32, 128, 512 */
  18         0, 1, 2, 3,  4,  5,   7,   9
  19 };
  20 #define CB710_MAX_DIVIDER_IDX   \
  21         (ARRAY_SIZE(cb710_clock_divider_log2) - 1)
  22
  23 static const u8 cb710_src_freq_mhz[16] = {
  24         33, 10, 20, 25, 30, 35, 40, 45,
  25         50, 55, 60, 65, 70, 75, 80, 85
  26 };
  27
  28 static void cb710_mmc_select_clock_divider(struct mmc_host *mmc, int hz)
  29 {
  30         struct cb710_slot *slot = cb710_mmc_to_slot(mmc);
  31         struct pci_dev *pdev = cb710_slot_to_chip(slot)->pdev;
  32         u32 src_freq_idx;
  33         u32 divider_idx;
  34         int src_hz;
  35
  36         /* on CB710 in HP nx9500:
  37          *   src_freq_idx == 0
  38          *   indexes 1-7 work as written in the table
  39          *   indexes 0,8-15 give no clock output
  40          */
  41         pci_read_config_dword(pdev, 0x48, &src_freq_idx);
  42         src_freq_idx = (src_freq_idx >> 16) & 0xF;
  43         src_hz = cb710_src_freq_mhz[src_freq_idx] * 1000000;
  44
  45         for (divider_idx = 0; divider_idx < CB710_MAX_DIVIDER_IDX; ++divider_idx) {
  46                 if (hz >= src_hz >> cb710_clock_divider_log2[divider_idx])
  47                         break;
  48         }
  49
  50         if (src_freq_idx)
  51                 divider_idx |= 0x8;
  52         else if (divider_idx == 0)
  53                 divider_idx = 1;
  54
  55         cb710_pci_update_config_reg(pdev, 0x40, ~0xF0000000, divider_idx << 28);
  56
  57         dev_dbg(cb710_slot_dev(slot),
  58                 "clock set to %d Hz, wanted %d Hz; src_freq_idx = %d, divider_idx = %d|%d\n",
  59                 src_hz >> cb710_clock_divider_log2[divider_idx & 7],
  60                 hz, src_freq_idx, divider_idx & 7, divider_idx & 8);
  61 }
  62
  63 static void __cb710_mmc_enable_irq(struct cb710_slot *slot,
  64         unsigned short enable, unsigned short mask)
  65 {
  66         /* clear global IE
  67          * - it gets set later if any interrupt sources are enabled */
  68         mask |= CB710_MMC_IE_IRQ_ENABLE;
  69
  70         /* look like interrupt is fired whenever
  71          * WORD[0x0C] & WORD[0x10] != 0;
  72          * -> bit 15 port 0x0C seems to be global interrupt enable
  73          */
  74
  75         enable = (cb710_read_port_16(slot, CB710_MMC_IRQ_ENABLE_PORT)
  76                 & ~mask) | enable;
  77
  78         if (enable)
  79                 enable |= CB710_MMC_IE_IRQ_ENABLE;
  80
  81         cb710_write_port_16(slot, CB710_MMC_IRQ_ENABLE_PORT, enable);
  82 }
  83
  84 static void cb710_mmc_enable_irq(struct cb710_slot *slot,
  85         unsigned short enable, unsigned short mask)
  86 {
  87         struct cb710_mmc_reader *reader = mmc_priv(cb710_slot_to_mmc(slot));
  88         unsigned long flags;
  89
  90         spin_lock_irqsave(&reader->irq_lock, flags);
  91         /* this is the only thing irq_lock protects */
  92         __cb710_mmc_enable_irq(slot, enable, mask);
  93         spin_unlock_irqrestore(&reader->irq_lock, flags);
  94 }
  95
  96 static void cb710_mmc_reset_events(struct cb710_slot *slot)
  97 {
  98         cb710_write_port_8(slot, CB710_MMC_STATUS0_PORT, 0xFF);
  99         cb710_write_port_8(slot, CB710_MMC_STATUS1_PORT, 0xFF);
 100         cb710_write_port_8(slot, CB710_MMC_STATUS2_PORT, 0xFF);
 101 }
 102
 103 static int cb710_mmc_is_card_inserted(struct cb710_slot *slot)
 104 {
 105         return cb710_read_port_8(slot, CB710_MMC_STATUS3_PORT)
 106                 & CB710_MMC_S3_CARD_DETECTED;
 107 }
 108
 109 static void cb710_mmc_enable_4bit_data(struct cb710_slot *slot, int enable)
 110 {
 111         dev_dbg(cb710_slot_dev(slot), "configuring %d-data-line%s mode\n",
 112                 enable ? 4 : 1, enable ? "s" : "");
 113         if (enable)
 114                 cb710_modify_port_8(slot, CB710_MMC_CONFIG1_PORT,
 115                         CB710_MMC_C1_4BIT_DATA_BUS, 0);
 116         else
 117                 cb710_modify_port_8(slot, CB710_MMC_CONFIG1_PORT,
 118                         0, CB710_MMC_C1_4BIT_DATA_BUS);
 119 }
 120
 121 static int cb710_check_event(struct cb710_slot *slot, u8 what)
 122 {
 123         u16 status;
 124
 125         status = cb710_read_port_16(slot, CB710_MMC_STATUS_PORT);
 126
 127         if (status & CB710_MMC_S0_FIFO_UNDERFLOW) {
 128                 /* it is just a guess, so log it */
 129                 dev_dbg(cb710_slot_dev(slot),
 130                         "CHECK : ignoring bit 6 in status %04X\n", status);
 131                 cb710_write_port_8(slot, CB710_MMC_STATUS0_PORT,
 132                         CB710_MMC_S0_FIFO_UNDERFLOW);
 133                 status &= ~CB710_MMC_S0_FIFO_UNDERFLOW;
 134         }
 135
 136         if (status & CB710_MMC_STATUS_ERROR_EVENTS) {
 137                 dev_dbg(cb710_slot_dev(slot),
 138                         "CHECK : returning EIO on status %04X\n", status);
 139                 cb710_write_port_8(slot, CB710_MMC_STATUS0_PORT, status & 0xFF);
 140                 cb710_write_port_8(slot, CB710_MMC_STATUS1_PORT,
 141                         CB710_MMC_S1_RESET);
 142                 return -EIO;
 143         }
 144
 145         /* 'what' is a bit in MMC_STATUS1 */
 146         if ((status >> 8) & what) {
 147                 cb710_write_port_8(slot, CB710_MMC_STATUS1_PORT, what);
 148                 return 1;
 149         }
 150
 151         return 0;
 152 }
 153
 154 static int cb710_wait_for_event(struct cb710_slot *slot, u8 what)
 155 {
 156         int err = 0;
 157         unsigned limit = 2000000;       /* FIXME: real timeout */
 158
 159 #ifdef CONFIG_CB710_DEBUG
 160         u32 e, x;
 161         e = cb710_read_port_32(slot, CB710_MMC_STATUS_PORT);
 162 #endif
 163
 164         while (!(err = cb710_check_event(slot, what))) {
 165                 if (!--limit) {
 166                         cb710_dump_regs(cb710_slot_to_chip(slot),
 167                                 CB710_DUMP_REGS_MMC);
 168                         err = -ETIMEDOUT;
 169                         break;
 170                 }
 171                 udelay(1);
 172         }
 173
 174 #ifdef CONFIG_CB710_DEBUG
 175         x = cb710_read_port_32(slot, CB710_MMC_STATUS_PORT);
 176
 177         limit = 2000000 - limit;
 178         if (limit > 100)
 179                 dev_dbg(cb710_slot_dev(slot),
 180                         "WAIT10: waited %d loops, what %d, entry val %08X, exit val %08X\n",
 181                         limit, what, e, x);
 182 #endif
 183         return err < 0 ? err : 0;
 184 }
 185
 186
 187 static int cb710_wait_while_busy(struct cb710_slot *slot, uint8_t mask)
 188 {
 189         unsigned limit = 500000;        /* FIXME: real timeout */
 190         int err = 0;
 191
 192 #ifdef CONFIG_CB710_DEBUG
 193         u32 e, x;
 194         e = cb710_read_port_32(slot, CB710_MMC_STATUS_PORT);
 195 #endif
 196
 197         while (cb710_read_port_8(slot, CB710_MMC_STATUS2_PORT) & mask) {
 198                 if (!--limit) {
 199                         cb710_dump_regs(cb710_slot_to_chip(slot),
 200                                 CB710_DUMP_REGS_MMC);
 201                         err = -ETIMEDOUT;
 202                         break;
 203                 }
 204                 udelay(1);
 205         }
 206
 207 #ifdef CONFIG_CB710_DEBUG
 208         x = cb710_read_port_32(slot, CB710_MMC_STATUS_PORT);
 209
 210         limit = 500000 - limit;
 211         if (limit > 100)
 212                 dev_dbg(cb710_slot_dev(slot),
 213                         "WAIT12: waited %d loops, mask %02X, entry val %08X, exit val %08X\n",
 214                         limit, mask, e, x);
 215 #endif
 216         return 0;
 217 }
 218
 219 static void cb710_mmc_set_transfer_size(struct cb710_slot *slot,
 220         size_t count, size_t blocksize)
 221 {
 222         cb710_wait_while_busy(slot, CB710_MMC_S2_BUSY_20);
 223         cb710_write_port_32(slot, CB710_MMC_TRANSFER_SIZE_PORT,
 224                 ((count - 1) << 16)|(blocksize - 1));
 225
 226         dev_vdbg(cb710_slot_dev(slot), "set up for %zu block%s of %zu bytes\n",
 227                 count, count == 1 ? "" : "s", blocksize);
 228 }
 229
 230 static void cb710_mmc_fifo_hack(struct cb710_slot *slot)
 231 {
 232         /* without this, received data is prepended with 8-bytes of zeroes */
 233         u32 r1, r2;
 234         int ok = 0;
 235
 236         r1 = cb710_read_port_32(slot, CB710_MMC_DATA_PORT);
 237         r2 = cb710_read_port_32(slot, CB710_MMC_DATA_PORT);
 238         if (cb710_read_port_8(slot, CB710_MMC_STATUS0_PORT)
 239             & CB710_MMC_S0_FIFO_UNDERFLOW) {
 240                 cb710_write_port_8(slot, CB710_MMC_STATUS0_PORT,
 241                         CB710_MMC_S0_FIFO_UNDERFLOW);
 242                 ok = 1;
 243         }
 244
 245         dev_dbg(cb710_slot_dev(slot),
 246                 "FIFO-read-hack: expected STATUS0 bit was %s\n",
 247                 ok ? "set." : "NOT SET!");
 248         dev_dbg(cb710_slot_dev(slot),
 249                 "FIFO-read-hack: dwords ignored: %08X %08X - %s\n",
 250                 r1, r2, (r1|r2) ? "BAD (NOT ZERO)!" : "ok");
 251 }
 252
 253 static int cb710_mmc_receive_pio(struct cb710_slot *slot,
 254         struct sg_mapping_iter *miter, size_t dw_count)
 255 {
 256         if (!(cb710_read_port_8(slot, CB710_MMC_STATUS2_PORT) & CB710_MMC_S2_FIFO_READY)) {
 257                 int err = cb710_wait_for_event(slot,
 258                         CB710_MMC_S1_PIO_TRANSFER_DONE);
 259                 if (err)
 260                         return err;
 261         }
 262
 263         cb710_sg_dwiter_write_from_io(miter,
 264                 slot->iobase + CB710_MMC_DATA_PORT, dw_count);
 265
 266         return 0;
 267 }
 268
 269 static bool cb710_is_transfer_size_supported(struct mmc_data *data)
 270 {
 271         return !(data->blksz & 15 && (data->blocks != 1 || data->blksz != 8));
 272 }
 273
 274 static int cb710_mmc_receive(struct cb710_slot *slot, struct mmc_data *data)
 275 {
 276         struct sg_mapping_iter miter;
 277         size_t len, blocks = data->blocks;
 278         int err = 0;
 279
 280         /* TODO: I don't know how/if the hardware handles non-16B-boundary blocks
 281          * except single 8B block */
 282         if (unlikely(data->blksz & 15 && (data->blocks != 1 || data->blksz != 8)))
 283                 return -EINVAL;
 284
 285         sg_miter_start(&miter, data->sg, data->sg_len, SG_MITER_TO_SG);
 286
 287         cb710_modify_port_8(slot, CB710_MMC_CONFIG2_PORT,
 288                 15, CB710_MMC_C2_READ_PIO_SIZE_MASK);
 289
 290         cb710_mmc_fifo_hack(slot);
 291
 292         while (blocks-- > 0) {
 293                 len = data->blksz;
 294
 295                 while (len >= 16) {
 296                         err = cb710_mmc_receive_pio(slot, &miter, 4);
 297                         if (err)
 298                                 goto out;
 299                         len -= 16;
 300                 }
 301
 302                 if (!len)
 303                         continue;
 304
 305                 cb710_modify_port_8(slot, CB710_MMC_CONFIG2_PORT,
 306                         len - 1, CB710_MMC_C2_READ_PIO_SIZE_MASK);
 307
 308                 len = (len >= 8) ? 4 : 2;
 309                 err = cb710_mmc_receive_pio(slot, &miter, len);
 310                 if (err)
 311                         goto out;
 312         }
 313 out:
 314         sg_miter_stop(&miter);
 315         return err;
 316 }
 317
 318 static int cb710_mmc_send(struct cb710_slot *slot, struct mmc_data *data)
 319 {
 320         struct sg_mapping_iter miter;
 321         size_t len, blocks = data->blocks;
 322         int err = 0;
 323
 324         /* TODO: I don't know how/if the hardware handles multiple
 325          * non-16B-boundary blocks */
 326         if (unlikely(data->blocks > 1 && data->blksz & 15))
 327                 return -EINVAL;
 328
 329         sg_miter_start(&miter, data->sg, data->sg_len, SG_MITER_FROM_SG);
 330
 331         cb710_modify_port_8(slot, CB710_MMC_CONFIG2_PORT,
 332                 0, CB710_MMC_C2_READ_PIO_SIZE_MASK);
 333
 334         while (blocks-- > 0) {
 335                 len = (data->blksz + 15) >> 4;
 336                 do {
 337                         if (!(cb710_read_port_8(slot, CB710_MMC_STATUS2_PORT)
 338                             & CB710_MMC_S2_FIFO_EMPTY)) {
 339                                 err = cb710_wait_for_event(slot,
 340                                         CB710_MMC_S1_PIO_TRANSFER_DONE);
 341                                 if (err)
 342                                         goto out;
 343                         }
 344                         cb710_sg_dwiter_read_to_io(&miter,
 345                                 slot->iobase + CB710_MMC_DATA_PORT, 4);
 346                 } while (--len);
 347         }
 348 out:
 349         sg_miter_stop(&miter);
 350         return err;
 351 }
 352
 353 static u16 cb710_encode_cmd_flags(struct cb710_mmc_reader *reader,
 354         struct mmc_command *cmd)
 355 {
 356         unsigned int flags = cmd->flags;
 357         u16 cb_flags = 0;
 358
 359         /* Windows driver returned 0 for commands for which no response
 360          * is expected. It happened that there were only two such commands
 361          * used: MMC_GO_IDLE_STATE and MMC_GO_INACTIVE_STATE so it might
 362          * as well be a bug in that driver.
 363          *
 364          * Original driver set bit 14 for MMC/SD application
 365          * commands. There's no difference 'on the wire' and
 366          * it apparently works without it anyway.
 367          */
 368
 369         switch (flags & MMC_CMD_MASK) {
 370         case MMC_CMD_AC:        cb_flags = CB710_MMC_CMD_AC;    break;
 371         case MMC_CMD_ADTC:      cb_flags = CB710_MMC_CMD_ADTC;  break;
 372         case MMC_CMD_BC:        cb_flags = CB710_MMC_CMD_BC;    break;
 373         case MMC_CMD_BCR:       cb_flags = CB710_MMC_CMD_BCR;   break;
 374         }
 375
 376         if (flags & MMC_RSP_BUSY)
 377                 cb_flags |= CB710_MMC_RSP_BUSY;
 378
 379         cb_flags |= cmd->opcode << CB710_MMC_CMD_CODE_SHIFT;
 380
 381         if (cmd->data && (cmd->data->flags & MMC_DATA_READ))
 382                 cb_flags |= CB710_MMC_DATA_READ;
 383
 384         if (flags & MMC_RSP_PRESENT) {
 385                 /* Windows driver set 01 at bits 4,3 except for
 386                  * MMC_SET_BLOCKLEN where it set 10. Maybe the
 387                  * hardware can do something special about this
 388                  * command? The original driver looks buggy/incomplete
 389                  * anyway so we ignore this for now.
 390                  *
 391                  * I assume that 00 here means no response is expected.
 392                  */
 393                 cb_flags |= CB710_MMC_RSP_PRESENT;
 394
 395                 if (flags & MMC_RSP_136)
 396                         cb_flags |= CB710_MMC_RSP_136;
 397                 if (!(flags & MMC_RSP_CRC))
 398                         cb_flags |= CB710_MMC_RSP_NO_CRC;
 399         }
 400
 401         return cb_flags;
 402 }
 403
 404 static void cb710_receive_response(struct cb710_slot *slot,
 405         struct mmc_command *cmd)
 406 {
 407         unsigned rsp_opcode, wanted_opcode;
 408
 409         /* Looks like final byte with CRC is always stripped (same as SDHCI) */
 410         if (cmd->flags & MMC_RSP_136) {
 411                 u32 resp[4];
 412
 413                 resp[0] = cb710_read_port_32(slot, CB710_MMC_RESPONSE3_PORT);
 414                 resp[1] = cb710_read_port_32(slot, CB710_MMC_RESPONSE2_PORT);
 415                 resp[2] = cb710_read_port_32(slot, CB710_MMC_RESPONSE1_PORT);
 416                 resp[3] = cb710_read_port_32(slot, CB710_MMC_RESPONSE0_PORT);
 417                 rsp_opcode = resp[0] >> 24;
 418
 419                 cmd->resp[0] = (resp[0] << 8)|(resp[1] >> 24);
 420                 cmd->resp[1] = (resp[1] << 8)|(resp[2] >> 24);
 421                 cmd->resp[2] = (resp[2] << 8)|(resp[3] >> 24);
 422                 cmd->resp[3] = (resp[3] << 8);
 423         } else {
 424                 rsp_opcode = cb710_read_port_32(slot, CB710_MMC_RESPONSE1_PORT) & 0x3F;
 425                 cmd->resp[0] = cb710_read_port_32(slot, CB710_MMC_RESPONSE0_PORT);
 426         }
 427
 428         wanted_opcode = (cmd->flags & MMC_RSP_OPCODE) ? cmd->opcode : 0x3F;
 429         if (rsp_opcode != wanted_opcode)
 430                 cmd->error = -EILSEQ;
 431 }
 432
 433 static int cb710_mmc_transfer_data(struct cb710_slot *slot,
 434         struct mmc_data *data)
 435 {
 436         int error, to;
 437
 438         if (data->flags & MMC_DATA_READ)
 439                 error = cb710_mmc_receive(slot, data);
 440         else
 441                 error = cb710_mmc_send(slot, data);
 442
 443         to = cb710_wait_for_event(slot, CB710_MMC_S1_DATA_TRANSFER_DONE);
 444         if (!error)
 445                 error = to;
 446
 447         if (!error)
 448                 data->bytes_xfered = data->blksz * data->blocks;
 449         return error;
 450 }
 451
 452 static int cb710_mmc_command(struct mmc_host *mmc, struct mmc_command *cmd)
 453 {
 454         struct cb710_slot *slot = cb710_mmc_to_slot(mmc);
 455         struct cb710_mmc_reader *reader = mmc_priv(mmc);
 456         struct mmc_data *data = cmd->data;
 457
 458         u16 cb_cmd = cb710_encode_cmd_flags(reader, cmd);
 459         dev_dbg(cb710_slot_dev(slot), "cmd request: 0x%04X\n", cb_cmd);
 460
 461         if (data) {
 462                 if (!cb710_is_transfer_size_supported(data)) {
 463                         data->error = -EINVAL;
 464                         return -1;
 465                 }
 466                 cb710_mmc_set_transfer_size(slot, data->blocks, data->blksz);
 467         }
 468
 469         cb710_wait_while_busy(slot, CB710_MMC_S2_BUSY_20|CB710_MMC_S2_BUSY_10);
 470         cb710_write_port_16(slot, CB710_MMC_CMD_TYPE_PORT, cb_cmd);
 471         cb710_wait_while_busy(slot, CB710_MMC_S2_BUSY_20);
 472         cb710_write_port_32(slot, CB710_MMC_CMD_PARAM_PORT, cmd->arg);
 473         cb710_mmc_reset_events(slot);
 474         cb710_wait_while_busy(slot, CB710_MMC_S2_BUSY_20);
 475         cb710_modify_port_8(slot, CB710_MMC_CONFIG0_PORT, 0x01, 0);
 476
 477         cmd->error = cb710_wait_for_event(slot, CB710_MMC_S1_COMMAND_SENT);
 478         if (cmd->error)
 479                 return -1;
 480
 481         if (cmd->flags & MMC_RSP_PRESENT) {
 482                 cb710_receive_response(slot, cmd);
 483                 if (cmd->error)
 484                         return -1;
 485         }
 486
 487         if (data)
 488                 data->error = cb710_mmc_transfer_data(slot, data);
 489         return 0;
 490 }
 491
 492 static void cb710_mmc_request(struct mmc_host *mmc, struct mmc_request *mrq)
 493 {
 494         struct cb710_slot *slot = cb710_mmc_to_slot(mmc);
 495         struct cb710_mmc_reader *reader = mmc_priv(mmc);
 496
 497         WARN_ON(reader->mrq != NULL);
 498
 499         reader->mrq = mrq;
 500         cb710_mmc_enable_irq(slot, CB710_MMC_IE_TEST_MASK, 0);
 501
 502         if (cb710_mmc_is_card_inserted(slot)) {
 503                 if (!cb710_mmc_command(mmc, mrq->cmd) && mrq->stop)
 504                         cb710_mmc_command(mmc, mrq->stop);
 505                 mdelay(1);
 506         } else {
 507                 mrq->cmd->error = -ENOMEDIUM;
 508         }
 509
 510         tasklet_schedule(&reader->finish_req_tasklet);
 511 }
 512
 513 static int cb710_mmc_powerup(struct cb710_slot *slot)
 514 {
 515 #ifdef CONFIG_CB710_DEBUG
 516         struct cb710_chip *chip = cb710_slot_to_chip(slot);
 517 #endif
 518         int err;
 519
 520         /* a lot of magic for now */
 521         dev_dbg(cb710_slot_dev(slot), "bus powerup\n");
 522         cb710_dump_regs(chip, CB710_DUMP_REGS_MMC);
 523         err = cb710_wait_while_busy(slot, CB710_MMC_S2_BUSY_20);
 524         if (unlikely(err))
 525                 return err;
 526         cb710_modify_port_8(slot, CB710_MMC_CONFIG1_PORT, 0x80, 0);
 527         cb710_modify_port_8(slot, CB710_MMC_CONFIG3_PORT, 0x80, 0);
 528         cb710_dump_regs(chip, CB710_DUMP_REGS_MMC);
 529         mdelay(1);
 530         dev_dbg(cb710_slot_dev(slot), "after delay 1\n");
 531         cb710_dump_regs(chip, CB710_DUMP_REGS_MMC);
 532         err = cb710_wait_while_busy(slot, CB710_MMC_S2_BUSY_20);
 533         if (unlikely(err))
 534                 return err;
 535         cb710_modify_port_8(slot, CB710_MMC_CONFIG1_PORT, 0x09, 0);
 536         cb710_dump_regs(chip, CB710_DUMP_REGS_MMC);
 537         mdelay(1);
 538         dev_dbg(cb710_slot_dev(slot), "after delay 2\n");
 539         cb710_dump_regs(chip, CB710_DUMP_REGS_MMC);
 540         err = cb710_wait_while_busy(slot, CB710_MMC_S2_BUSY_20);
 541         if (unlikely(err))
 542                 return err;
 543         cb710_modify_port_8(slot, CB710_MMC_CONFIG1_PORT, 0, 0x08);
 544         cb710_dump_regs(chip, CB710_DUMP_REGS_MMC);
 545         mdelay(2);
 546         dev_dbg(cb710_slot_dev(slot), "after delay 3\n");
 547         cb710_dump_regs(chip, CB710_DUMP_REGS_MMC);
 548         cb710_modify_port_8(slot, CB710_MMC_CONFIG0_PORT, 0x06, 0);
 549         cb710_modify_port_8(slot, CB710_MMC_CONFIG1_PORT, 0x70, 0);
 550         cb710_modify_port_8(slot, CB710_MMC_CONFIG2_PORT, 0x80, 0);
 551         cb710_modify_port_8(slot, CB710_MMC_CONFIG3_PORT, 0x03, 0);
 552         cb710_dump_regs(chip, CB710_DUMP_REGS_MMC);
 553         err = cb710_wait_while_busy(slot, CB710_MMC_S2_BUSY_20);
 554         if (unlikely(err))
 555                 return err;
 556         /* This port behaves weird: quick byte reads of 0x08,0x09 return
 557          * 0xFF,0x00 after writing 0xFFFF to 0x08; it works correctly when
 558          * read/written from userspace...  What am I missing here?
 559          * (it doesn't depend on write-to-read delay) */
 560         cb710_write_port_16(slot, CB710_MMC_CONFIGB_PORT, 0xFFFF);
 561         cb710_modify_port_8(slot, CB710_MMC_CONFIG0_PORT, 0x06, 0);
 562         cb710_dump_regs(chip, CB710_DUMP_REGS_MMC);
 563         dev_dbg(cb710_slot_dev(slot), "bus powerup finished\n");
 564
 565         return cb710_check_event(slot, 0);
 566 }
 567
 568 static void cb710_mmc_powerdown(struct cb710_slot *slot)
 569 {
 570         cb710_modify_port_8(slot, CB710_MMC_CONFIG1_PORT, 0, 0x81);
 571         cb710_modify_port_8(slot, CB710_MMC_CONFIG3_PORT, 0, 0x80);
 572 }
 573
 574 static void cb710_mmc_set_ios(struct mmc_host *mmc, struct mmc_ios *ios)
 575 {
 576         struct cb710_slot *slot = cb710_mmc_to_slot(mmc);
 577         struct cb710_mmc_reader *reader = mmc_priv(mmc);
 578         int err;
 579
 580         cb710_mmc_select_clock_divider(mmc, ios->clock);
 581
 582         if (!cb710_mmc_is_card_inserted(slot)) {
 583                 dev_dbg(cb710_slot_dev(slot),
 584                         "no card inserted - ignoring bus powerup request\n");
 585                 ios->power_mode = MMC_POWER_OFF;
 586         }
 587
 588         if (ios->power_mode != reader->last_power_mode)
 589         switch (ios->power_mode) {
 590         case MMC_POWER_ON:
 591                 err = cb710_mmc_powerup(slot);
 592                 if (err) {
 593                         dev_warn(cb710_slot_dev(slot),
 594                                 "powerup failed (%d)- retrying\n", err);
 595                         cb710_mmc_powerdown(slot);
 596                         udelay(1);
 597                         err = cb710_mmc_powerup(slot);
 598                         if (err)
 599                                 dev_warn(cb710_slot_dev(slot),
 600                                         "powerup retry failed (%d) - expect errors\n",
 601                                         err);
 602                 }
 603                 reader->last_power_mode = MMC_POWER_ON;
 604                 break;
 605         case MMC_POWER_OFF:
 606                 cb710_mmc_powerdown(slot);
 607                 reader->last_power_mode = MMC_POWER_OFF;
 608                 break;
 609         case MMC_POWER_UP:
 610         default:
 611                 /* ignore */;
 612         }
 613
 614         cb710_mmc_enable_4bit_data(slot, ios->bus_width != MMC_BUS_WIDTH_1);
 615
 616         cb710_mmc_enable_irq(slot, CB710_MMC_IE_TEST_MASK, 0);
 617 }
 618
 619 static int cb710_mmc_get_ro(struct mmc_host *mmc)
 620 {
 621         struct cb710_slot *slot = cb710_mmc_to_slot(mmc);
 622
 623         return cb710_read_port_8(slot, CB710_MMC_STATUS3_PORT)
 624                 & CB710_MMC_S3_WRITE_PROTECTED;
 625 }
 626
 627 static int cb710_mmc_irq_handler(struct cb710_slot *slot)
 628 {
 629         struct mmc_host *mmc = cb710_slot_to_mmc(slot);
 630         struct cb710_mmc_reader *reader = mmc_priv(mmc);
 631         u32 status, config1, config2, irqen;
 632
 633         status = cb710_read_port_32(slot, CB710_MMC_STATUS_PORT);
 634         irqen = cb710_read_port_32(slot, CB710_MMC_IRQ_ENABLE_PORT);
 635         config2 = cb710_read_port_32(slot, CB710_MMC_CONFIGB_PORT);
 636         config1 = cb710_read_port_32(slot, CB710_MMC_CONFIG_PORT);
 637
 638         dev_dbg(cb710_slot_dev(slot), "interrupt; status: %08X, "
 639                 "ie: %08X, c2: %08X, c1: %08X\n",
 640                 status, irqen, config2, config1);
 641
 642         if (status & (CB710_MMC_S1_CARD_CHANGED << 8)) {
 643                 /* ack the event */
 644                 cb710_write_port_8(slot, CB710_MMC_STATUS1_PORT,
 645                         CB710_MMC_S1_CARD_CHANGED);
 646                 if ((irqen & CB710_MMC_IE_CISTATUS_MASK)
 647                     == CB710_MMC_IE_CISTATUS_MASK)
 648                         mmc_detect_change(mmc, HZ/5);
 649         } else {
 650                 dev_dbg(cb710_slot_dev(slot), "unknown interrupt (test)\n");
 651                 spin_lock(&reader->irq_lock);
 652                 __cb710_mmc_enable_irq(slot, 0, CB710_MMC_IE_TEST_MASK);
 653                 spin_unlock(&reader->irq_lock);
 654         }
 655
 656         return 1;
 657 }
 658
 659 static void cb710_mmc_finish_request_tasklet(unsigned long data)
 660 {
 661         struct mmc_host *mmc = (void *)data;
 662         struct cb710_mmc_reader *reader = mmc_priv(mmc);
 663         struct mmc_request *mrq = reader->mrq;
 664
 665         reader->mrq = NULL;
 666         mmc_request_done(mmc, mrq);
 667 }
 668
 669 static const struct mmc_host_ops cb710_mmc_host = {
 670         .request = cb710_mmc_request,
 671         .set_ios = cb710_mmc_set_ios,
 672         .get_ro = cb710_mmc_get_ro
 673 };
 674
 675 #ifdef CONFIG_PM
 676
 677 static int cb710_mmc_suspend(struct platform_device *pdev, pm_message_t state)
 678 {
 679         struct cb710_slot *slot = cb710_pdev_to_slot(pdev);
 680         struct mmc_host *mmc = cb710_slot_to_mmc(slot);
 681         int err;
 682
 683         err = mmc_suspend_host(mmc);
 684         if (err)
 685                 return err;
 686
 687         cb710_mmc_enable_irq(slot, 0, ~0);
 688         return 0;
 689 }
 690
 691 static int cb710_mmc_resume(struct platform_device *pdev)
 692 {
 693         struct cb710_slot *slot = cb710_pdev_to_slot(pdev);
 694         struct mmc_host *mmc = cb710_slot_to_mmc(slot);
 695
 696         cb710_mmc_enable_irq(slot, 0, ~0);
 697
 698         return mmc_resume_host(mmc);
 699 }
 700
 701 #endif /* CONFIG_PM */
 702
 703 static int __devinit cb710_mmc_init(struct platform_device *pdev)
 704 {
 705         struct cb710_slot *slot = cb710_pdev_to_slot(pdev);
 706         struct cb710_chip *chip = cb710_slot_to_chip(slot);
 707         struct mmc_host *mmc;
 708         struct cb710_mmc_reader *reader;
 709         int err;
 710         u32 val;
 711
 712         mmc = mmc_alloc_host(sizeof(*reader), cb710_slot_dev(slot));
 713         if (!mmc)
 714                 return -ENOMEM;
 715
 716         dev_set_drvdata(&pdev->dev, mmc);
 717
 718         /* harmless (maybe) magic */
 719         pci_read_config_dword(chip->pdev, 0x48, &val);
 720         val = cb710_src_freq_mhz[(val >> 16) & 0xF];
 721         dev_dbg(cb710_slot_dev(slot), "source frequency: %dMHz\n", val);
 722         val *= 1000000;
 723
 724         mmc->ops = &cb710_mmc_host;
 725         mmc->f_max = val;
 726         mmc->f_min = val >> cb710_clock_divider_log2[CB710_MAX_DIVIDER_IDX];
 727         mmc->ocr_avail = MMC_VDD_32_33|MMC_VDD_33_34;
 728         mmc->caps = MMC_CAP_4_BIT_DATA;
 729
 730         reader = mmc_priv(mmc);
 731
 732         tasklet_init(&reader->finish_req_tasklet,
 733                 cb710_mmc_finish_request_tasklet, (unsigned long)mmc);
 734         spin_lock_init(&reader->irq_lock);
 735         cb710_dump_regs(chip, CB710_DUMP_REGS_MMC);
 736
 737         cb710_mmc_enable_irq(slot, 0, ~0);
 738         cb710_set_irq_handler(slot, cb710_mmc_irq_handler);
 739
 740         err = mmc_add_host(mmc);
 741         if (unlikely(err))
 742                 goto err_free_mmc;
 743
 744         dev_dbg(cb710_slot_dev(slot), "mmc_hostname is %s\n",
 745                 mmc_hostname(mmc));
 746
 747         cb710_mmc_enable_irq(slot, CB710_MMC_IE_CARD_INSERTION_STATUS, 0);
 748
 749         return 0;
 750
 751 err_free_mmc:
 752         dev_dbg(cb710_slot_dev(slot), "mmc_add_host() failed: %d\n", err);
 753
 754         mmc_free_host(mmc);
 755         return err;
 756 }
 757
 758 static int __devexit cb710_mmc_exit(struct platform_device *pdev)
 759 {
 760         struct cb710_slot *slot = cb710_pdev_to_slot(pdev);
 761         struct mmc_host *mmc = cb710_slot_to_mmc(slot);
 762         struct cb710_mmc_reader *reader = mmc_priv(mmc);
 763
 764         cb710_mmc_enable_irq(slot, 0, CB710_MMC_IE_CARD_INSERTION_STATUS);
 765
 766         mmc_remove_host(mmc);
 767
 768         /* IRQs should be disabled now, but let's stay on the safe side */
 769         cb710_mmc_enable_irq(slot, 0, ~0);
 770         cb710_set_irq_handler(slot, NULL);
 771
 772         /* clear config ports - just in case */
 773         cb710_write_port_32(slot, CB710_MMC_CONFIG_PORT, 0);
 774         cb710_write_port_16(slot, CB710_MMC_CONFIGB_PORT, 0);
 775
 776         tasklet_kill(&reader->finish_req_tasklet);
 777
 778         mmc_free_host(mmc);
 779         return 0;
 780 }
 781
 782 static struct platform_driver cb710_mmc_driver = {
 783         .driver.name = "cb710-mmc",
 784         .probe = cb710_mmc_init,
 785         .remove = __devexit_p(cb710_mmc_exit),
 786 #ifdef CONFIG_PM
 787         .suspend = cb710_mmc_suspend,
 788         .resume = cb710_mmc_resume,
 789 #endif
 790 };
 791
 792 static int __init cb710_mmc_init_module(void)
 793 {
 794         return platform_driver_register(&cb710_mmc_driver);
 795 }
 796
 797 static void __exit cb710_mmc_cleanup_module(void)
 798 {
 799         platform_driver_unregister(&cb710_mmc_driver);
 800 }
 801
 802 module_init(cb710_mmc_init_module);
 803 module_exit(cb710_mmc_cleanup_module);
 804
 805 MODULE_AUTHOR("Michał Mirosław <mirq-linux@rere.qmqm.pl>");
 806 MODULE_DESCRIPTION("ENE CB710 memory card reader driver - MMC/SD part");
 807 MODULE_LICENSE("GPL");
 808 MODULE_ALIAS("platform:cb710-mmc");