From patchwork Wed Apr 16 07:15:34 2014 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Oleksij Rempel X-Patchwork-Id: 3998611 Return-Path: X-Original-To: patchwork-linux-mmc@patchwork.kernel.org Delivered-To: patchwork-parsemail@patchwork1.web.kernel.org Received: from mail.kernel.org (mail.kernel.org [198.145.19.201]) by patchwork1.web.kernel.org (Postfix) with ESMTP id B352B9F2CC for ; Wed, 16 Apr 2014 07:15:51 +0000 (UTC) Received: from mail.kernel.org (localhost [127.0.0.1]) by mail.kernel.org (Postfix) with ESMTP id 8A1E02026C for ; Wed, 16 Apr 2014 07:15:49 +0000 (UTC) Received: from vger.kernel.org (vger.kernel.org [209.132.180.67]) by mail.kernel.org (Postfix) with ESMTP id F07CD20268 for ; Wed, 16 Apr 2014 07:15:46 +0000 (UTC) Received: (majordomo@vger.kernel.org) by vger.kernel.org via listexpand id S1753004AbaDPHPq (ORCPT ); Wed, 16 Apr 2014 03:15:46 -0400 Received: from mout.gmx.net ([212.227.15.18]:57189 "EHLO mout.gmx.net" rhost-flags-OK-OK-OK-OK) by vger.kernel.org with ESMTP id S1752573AbaDPHPo (ORCPT ); Wed, 16 Apr 2014 03:15:44 -0400 Received: from [192.168.1.221] ([79.218.113.98]) by mail.gmx.com (mrgmx002) with ESMTPSA (Nemesis) id 0MNHqL-1Wco6P3LK5-006uZZ for ; Wed, 16 Apr 2014 09:15:41 +0200 Message-ID: <534E2E16.3070201@rempel-privat.de> Date: Wed, 16 Apr 2014 09:15:34 +0200 From: Oleksij Rempel User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:24.0) Gecko/20100101 Thunderbird/24.4.0 MIME-Version: 1.0 To: linux-mmc@vger.kernel.org Subject: [PATCH RFC] Alcor Micro AU6601 X-Enigmail-Version: 1.6 X-Provags-ID: V03:K0:FYGrLo0JgkyEA9pY41Z0xAxEaLJWvnmGwV9f8V/d7PRwsjpqqEQ 8omVL6awW3K9/4/a1vnOZr1LavS4RAHiKOihZqBmMEEs1T5sULZR09u6SloHcJuvUQUwnrU i6tr6K8PUYjpPtEpxjBOELfIxLLNlxKZGEI4JZbNBp/BLixu8mZX9Ug5ALH/Tve+NrfcqZQ jVBgFV+gkF2sy68XV7wUA== Sender: linux-mmc-owner@vger.kernel.org Precedence: bulk List-ID: X-Mailing-List: linux-mmc@vger.kernel.org X-Spam-Status: No, score=-7.5 required=5.0 tests=BAYES_00, RCVD_IN_DNSWL_HI, RP_MATCHES_RCVD, T_TVD_MIME_EPI, UNPARSEABLE_RELAY autolearn=ham version=3.3.1 X-Spam-Checker-Version: SpamAssassin 3.3.1 (2010-03-16) on mail.kernel.org X-Virus-Scanned: ClamAV using ClamSMTP Hello all, in attachment is current version of driver for Alcor Micro AU6601 which is based on my RE work. In current state it works with most cards i have except of "MMC mobile 1GB Kingstone", this card fail to start if controller set to 4bit mode. All other cards work with 4bit mode without visible problems. Right now, max speed for all cards is 1.5MB/s. Speed of windows driver with, for example "Kingstone 2GB 50X elite pro" cards, is 20MB/s. It looks like most of the time driver is loosing on reading PIO. For example 512 byte block will take 350usec. Is it possible to optimise it? Other question. What is the difference between MMC_POWER_UP and MMC_POWER_ON? One of register has fallowing behaviour: +/* + * - 0x8 only Vcc is on + * - 0x1 Vcc and other pins are on + * - 0x1 | 0x8 like 0x1, but DAT2 is off + */ will it this case MMC_POWER_UP be 0x8 and MMC_POWER_ON 0x1? diff --git a/drivers/mmc/host/Kconfig b/drivers/mmc/host/Kconfig index 1384f67..ed83644 100644 --- a/drivers/mmc/host/Kconfig +++ b/drivers/mmc/host/Kconfig @@ -315,6 +315,14 @@ config MMC_WBSD If unsure, say N. +config MMC_AU6601 + tristate "Alcor Micro AU6601" + help + This selects the Alcor Micro Multimedia card interface. + + If unsure, say N. + + config MMC_AU1X tristate "Alchemy AU1XX0 MMC Card Interface support" depends on MIPS_ALCHEMY diff --git a/drivers/mmc/host/Makefile b/drivers/mmc/host/Makefile index 3483b6b..484bca8 100644 --- a/drivers/mmc/host/Makefile +++ b/drivers/mmc/host/Makefile @@ -18,6 +18,7 @@ obj-$(CONFIG_MMC_SDHCI_SIRF) += sdhci-sirf.o obj-$(CONFIG_MMC_SDHCI_SPEAR) += sdhci-spear.o obj-$(CONFIG_MMC_WBSD) += wbsd.o obj-$(CONFIG_MMC_AU1X) += au1xmmc.o +obj-$(CONFIG_MMC_AU6601) += au6601.o obj-$(CONFIG_MMC_OMAP) += omap.o obj-$(CONFIG_MMC_OMAP_HS) += omap_hsmmc.o obj-$(CONFIG_MMC_ATMELMCI) += atmel-mci.o diff --git a/drivers/mmc/host/au6601.c b/drivers/mmc/host/au6601.c new file mode 100644 index 0000000..558dd45 --- /dev/null +++ b/drivers/mmc/host/au6601.c @@ -0,0 +1,1246 @@ +/* + * Copyright (C) 2014 Oleksij Rempel. + * + * Authors: Oleksij Rempel + * + * This software is licensed under the terms of the GNU General Public + * License version 2, as published by the Free Software Foundation, and + * may be copied, distributed, and modified under those terms. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + */ + + +#include +#include +#include +#include +#include +#include + +#include +#include + +#define DRVNAME "au6601-pci" +#define PCI_ID_ALCOR_MICRO 0x1aea +#define PCI_ID_AU6601 0x6601 + +#define MHZ_TO_HZ(freq) ((freq) * 1000 * 1000) + +#define AU6601_MIN_CLOCK (150 * 1000) +//#define AU6601_MAX_CLOCK (400 * 1000) +#define AU6601_MAX_CLOCK MHZ_TO_HZ(208) +#define AU6601_MAX_BLOCK_LENGTH 512 +#define AU6601_MAX_BLOCK_COUNT 65536 + + + +//#define AU6601_DEBUG 1 + +#ifdef AU6601_DEBUG +#define DBG(f, x...) \ + printk(DRVNAME " [%s()]: " f, __func__,## x) +#else +#define DBG(f, x...) +#endif + +#define REG_00 0x00 +#define REG_05 0x05 +#define AU6601_BUFFER 0x08 +#define REG_0C 0x0c +#define REG_10 0x10 +#define REG_23 0x23 +#define REG_24 0x24 +#define REG_30 0x30 +#define REG_34 0x34 +#define REG_38 0x38 +#define REG_3C 0x3C +#define REG_51 0x51 +#define REG_52 0x52 +#define REG_61 0x61 +#define REG_63 0x63 +#define REG_69 0x69 +#define AU6601_BLOCK_SIZE 0x6c +#define REG_70 0x70 +#define REG_72 0x72 +#define REG_74 0x74 +#define REG_75 0x75 +#define REG_76 0x76 +#define REG_77 0x77 +#define REG_79 0x79 +#define REG_7A 0x7a +#define REG_7B 0x7b +#define REG_7C 0x7c +#define REG_7D 0x7d +#define REG_7F 0x7f +#define REG_81 0x81 +#define REG_82 0x82 +#define REG_83 0x83 +#define REG_84 0x84 +#define REG_85 0x85 +#define REG_86 0x86 +#define AU6601_INT_STATUS 0x90 /* IRQ intmask */ +#define AU6601_INT_ENABLE 0x94 +#define REG_A1 0xa1 +#define REG_A2 0xa2 +#define REG_A3 0xa3 +#define REG_B0 0xb0 +#define REG_B4 0xb4 + +/* identical or almost identical with sdhci.h */ +#define AU6601_INT_RESPONSE 0x00000001 /* ok */ +#define AU6601_INT_DATA_END 0x00000002 /* fifo, ok */ +#define AU6601_INT_BLK_GAP 0x00000004 +#define AU6601_INT_DMA_END 0x00000008 +#define AU6601_INT_SPACE_AVAIL 0x00000010 /* fifo, ok */ +#define AU6601_INT_DATA_AVAIL 0x00000020 /* fifo, ok */ +#define AU6601_INT_CARD_REMOVE 0x00000040 +#define AU6601_INT_CARD_INSERT 0x00000080 /* 0x40 and 0x80 flip */ +#define AU6601_INT_CARD_INT 0x00000100 +#define AU6601_INT_ERROR 0x00008000 /* ok */ +#define AU6601_INT_TIMEOUT 0x00010000 /* seems to be ok */ +#define AU6601_INT_CRC 0x00020000 /* seems to be ok */ +#define AU6601_INT_END_BIT 0x00040000 +#define AU6601_INT_INDEX 0x00080000 +#define AU6601_INT_DATA_TIMEOUT 0x00100000 +#define AU6601_INT_DATA_CRC 0x00200000 +#define AU6601_INT_DATA_END_BIT 0x00400000 +#define AU6601_INT_BUS_POWER 0x00800000 +#define AU6601_INT_ACMD12ERR 0x01000000 +#define AU6601_INT_ADMA_ERROR 0x02000000 + +#define AU6601_INT_NORMAL_MASK 0x00007FFF +#define AU6601_INT_ERROR_MASK 0xFFFF8000 + +/* magic 0xF0001 */ +#define AU6601_INT_CMD_MASK (AU6601_INT_RESPONSE | AU6601_INT_TIMEOUT | \ + AU6601_INT_CRC | AU6601_INT_END_BIT | AU6601_INT_INDEX) +/* magic 0x70003A */ +#define AU6601_INT_DATA_MASK (AU6601_INT_DATA_END | AU6601_INT_DMA_END | \ + AU6601_INT_DATA_AVAIL | AU6601_INT_SPACE_AVAIL | \ + AU6601_INT_DATA_TIMEOUT | AU6601_INT_DATA_CRC | \ + AU6601_INT_DATA_END_BIT) +#define AU6601_INT_ALL_MASK ((uint32_t)-1) + +u32 reg_list[][4] = { + { 0, 0, 0, 0}, + { REG_00, 0, 0, 4}, + { REG_05, 0, 0, 2}, +// { AU6601_BUFFER, 0, 0, 4}, + { REG_0C, 0, 0, 1}, + { REG_10, 0, 0, 4}, + { REG_23, 0, 0, 1}, + { REG_24, 0, 0, 4}, + { REG_30, 0, 0, 4}, + { REG_34, 0, 0, 4}, + { REG_38, 0, 0, 4}, + { REG_3C, 0, 0, 4}, + { REG_51, 0, 0, 1}, + { REG_52, 0, 0, 1}, + { REG_61, 0, 0, 1}, + { REG_63, 0, 0, 1}, + { REG_69, 0, 0, 1}, + { AU6601_BLOCK_SIZE, 0, 0, 4}, + { REG_70, 0, 0, 1}, + { REG_72, 0, 0, 2}, + { REG_74, 0, 0, 2}, + { REG_75, 0, 0, 1}, + { REG_76, 0, 0, 1}, + { REG_77, 0, 0, 1}, + { REG_79, 0, 0, 1}, + { REG_7A, 0, 0, 1}, + { REG_7B, 0, 0, 1}, + { REG_7C, 0, 0, 1}, + { REG_7D, 0, 0, 1}, + { REG_7F, 0, 0, 1}, + { REG_81, 0, 0, 1}, + { REG_82, 0, 0, 1}, + { REG_83, 0, 0, 1}, + { REG_84, 0, 0, 2}, + { REG_85, 0, 0, 1}, + { REG_86, 0, 0, 1}, + { AU6601_INT_STATUS, 0, 0, 4}, + { AU6601_INT_ENABLE, 0, 0, 4}, + { REG_A1, 0, 0, 1}, + { REG_A2, 0, 0, 1}, + { REG_A3, 0, 0, 1}, + { REG_B0, 0, 0, 4}, + { REG_B4, 0, 0, 4}, +}; + +struct au6601_host { + struct pci_dev *pdev; + void __iomem *iobase; + + struct mmc_host *mmc; + struct mmc_request *mrq; + struct mmc_command *cmd; + struct mmc_data *data; + unsigned int data_early:1; /* Data finished before cmd */ + + spinlock_t lock; + + struct tasklet_struct card_tasklet; + struct tasklet_struct finish_tasklet; + + struct timer_list timer; + + struct sg_mapping_iter sg_miter; /* SG state for PIO */ + unsigned int blocks; /* remaining PIO blocks */ + int sg_count; /* Mapped sg entries */ +}; + +static void au6601_send_cmd(struct au6601_host *host, + struct mmc_command *cmd); + +static void au6601_prepare_data(struct au6601_host *host, struct mmc_command *cmd); +static void au6601_finish_data(struct au6601_host *host); + +static const struct pci_device_id pci_ids[] = { + { + .vendor = PCI_ID_ALCOR_MICRO, + .device = PCI_ID_AU6601, + .subvendor = PCI_ANY_ID, + .subdevice = PCI_ANY_ID, + }, + { /* end: all zeroes */ }, +}; +MODULE_DEVICE_TABLE(pci, pci_ids); + +static unsigned char au6601_readb(struct au6601_host *host, + unsigned int reg) +{ + unsigned char val = readb(host->iobase + reg); + DBG("addr = %x, val = %x\n", reg, val); + return val; +} + +static unsigned int au6601_readl(struct au6601_host *host, + unsigned int reg) +{ + unsigned int val = readl(host->iobase + reg); + DBG("addr = %x, val = %x\n", reg, val); + return val; +} + +static void au6601_writeb(struct au6601_host *host, + u8 val, unsigned int reg) +{ + DBG("addr = %x, val = %x\n", reg, val); + writeb(val, host->iobase + reg); +} + +static void au6601_writew(struct au6601_host *host, + u16 val, unsigned int reg) +{ + DBG("addr = %x, val = %x\n", reg, val); + writew(val, host->iobase + reg); +} + +static void au6601_writel(struct au6601_host *host, + u32 val, unsigned int reg) +{ + DBG("addr = %x, val = %x\n", reg, val); + writel(val, host->iobase + reg); +} + +static void au6601_reg_snap(struct au6601_host *host) +{ + int a, b; +return; + b = reg_list[0][1] ? 2 : 1; + reg_list[0][b] = 1; + + /* grub all needed regs */ + for (a = 1; a < ARRAY_SIZE(reg_list); a++) { + if (reg_list[a][3] == 1) + reg_list[a][b] = readb(host->iobase + reg_list[a][0]); + else if (reg_list[a][3] == 2) + reg_list[a][b] = readw(host->iobase + reg_list[a][0]); + else if (reg_list[a][3] == 4) + reg_list[a][b] = readl(host->iobase + reg_list[a][0]); + else + DBG("-- wrong lenght\n"); + } + + /* if we have two version, compare them */ + if (reg_list[0][1] && reg_list[0][2]) { + for (a = 1; a < ARRAY_SIZE(reg_list); a++) { + if (reg_list[a][1] != reg_list[a][2]) + //DBG("-- reg %02x: %08x %s %08x\n", + printk("-- reg %02x: %08x %s %08x\n", + reg_list[a][0], + reg_list[a][1], + b == 1 ? "<" : ">", + reg_list[a][2]); + } + + if (b == 1) + reg_list[0][2] = 0; + else + reg_list[0][1] = 0; + } +} + +static void au6601_clear_set_irqs(struct au6601_host *host, u32 clear, u32 set) +{ + u32 ier; + + ier = au6601_readl(host, AU6601_INT_ENABLE); + ier &= ~clear; + ier |= set; + au6601_writel(host, ier, AU6601_INT_ENABLE); +} + +static void au6601_clear_set_reg86(struct au6601_host *host, u32 clear, u32 set) +{ + u32 val; + + val = au6601_readl(host, REG_86); + val &= ~clear; + val |= set; + au6601_writel(host, val, REG_86); +} + +/* val = 0x1 abort command; 0x8 abort data? */ +static void au6601_wait_reg_79(struct au6601_host *host, u8 val) +{ + int i; + au6601_writeb(host, val | 0x80, REG_79); + /* what is bets value here? 500? */ + for (i = 0; i < 500; i++) { + if (!(au6601_readb(host, REG_79) & val)) + return; + msleep(1); + } + printk("%s: timeout\n", __func__); +} + +/* + * - 0x8 only Vcc is on + * - 0x1 Vcc and other pins are on + * - 0x1 | 0x8 like 0x1, but DAT2 is off + */ +static void au6601_set_power(struct au6601_host *host, unsigned int value, unsigned int set) +{ + u8 tmp1, tmp2; + + tmp1 = au6601_readb(host, REG_70); + tmp2 = au6601_readb(host, REG_7A); + if (set) { + au6601_writeb(host, tmp1 | value, REG_70); + msleep(20); + au6601_writeb(host, tmp2 | value, REG_7A); + } else { + au6601_writeb(host, tmp2 & ~value, REG_7A); + au6601_writeb(host, tmp1 & ~value, REG_70); + } +} + +static void au6601_trigger_data_transfer(struct au6601_host *host) +{ + struct mmc_data *data = host->data; + u8 ctrl = 0; + + BUG_ON(data == NULL); + + au6601_writel(host, data->blksz, AU6601_BLOCK_SIZE); + if (host->data->flags & MMC_DATA_WRITE) + ctrl = 0x80; + au6601_writeb(host, ctrl | 0x1, REG_83); +} + +/*****************************************************************************\ + * * + * Core functions * + * * +\*****************************************************************************/ + +static void au6601_read_block_pio(struct au6601_host *host) +{ + unsigned long flags; + size_t blksize, len, chunk; + u32 uninitialized_var(scratch); + u8 *buf; + + DBG("PIO reading\n"); + + blksize = host->data->blksz; + chunk = 0; + + local_irq_save(flags); + + //printk("pio Y\n"); + while (blksize) { + if (!sg_miter_next(&host->sg_miter)) + BUG(); + + len = min(host->sg_miter.length, blksize); + + blksize -= len; + host->sg_miter.consumed = len; + + buf = host->sg_miter.addr; + + while (len) { + if (chunk == 0) { + scratch = au6601_readl(host, AU6601_BUFFER); + chunk = 4; + } + + *buf = scratch & 0xFF; + + buf++; + scratch >>= 8; + chunk--; + len--; + } + } + //printk("pio _\n"); + + sg_miter_stop(&host->sg_miter); + + local_irq_restore(flags); +} + +static void au6601_write_block_pio(struct au6601_host *host) +{ + unsigned long flags; + size_t blksize, len, chunk; + u32 scratch; + u8 *buf; + + DBG("PIO writing\n"); + + blksize = host->data->blksz; + chunk = 0; + scratch = 0; + + local_irq_save(flags); + + while (blksize) { + if (!sg_miter_next(&host->sg_miter)) + BUG(); + + len = min(host->sg_miter.length, blksize); + + blksize -= len; + host->sg_miter.consumed = len; + + buf = host->sg_miter.addr; + + while (len) { + scratch |= (u32)*buf << (chunk * 8); + + buf++; + chunk++; + len--; + + if ((chunk == 4) || ((len == 0) && (blksize == 0))) { + au6601_writel(host, scratch, AU6601_BUFFER); + chunk = 0; + scratch = 0; + } + } + } + + sg_miter_stop(&host->sg_miter); + + local_irq_restore(flags); +} + +static void au6601_transfer_pio(struct au6601_host *host) +{ + BUG_ON(!host->data); + + if (host->blocks == 0) + return; + + if (host->data->flags & MMC_DATA_READ) + au6601_read_block_pio(host); + else + au6601_write_block_pio(host); + + host->blocks--; + + DBG("PIO transfer complete.\n"); +} + +static void au6601_set_freg_pre(struct au6601_host *host) +{ + au6601_writeb(host, 0, REG_85); + au6601_writeb(host, 0x31, REG_7B); + au6601_writeb(host, 0x33, REG_7C); +// au6601_writeb(host, 0, REG_7D); + au6601_writeb(host, 1, REG_75); + au6601_writeb(host, 0, REG_85); + au6601_writeb(host, 0x30, REG_86); + au6601_writeb(host, 0, REG_82); + + /* other possible variant tmp | 0xc0 */ +// tmp = au6601_readb(host, REG_86); +// au6601_writeb(host, tmp & 0x3f, REG_86); +} + +static void au6601_finish_command(struct au6601_host *host) +{ + struct mmc_command *cmd = host->cmd; + + BUG_ON(host->cmd == NULL); + + if (host->cmd->flags & MMC_RSP_PRESENT) { + cmd->resp[0] = be32_to_cpu(au6601_readl(host, REG_30)); + if (host->cmd->flags & MMC_RSP_136) { + cmd->resp[1] = be32_to_cpu(au6601_readl(host, REG_34)); + cmd->resp[2] = be32_to_cpu(au6601_readl(host, REG_38)); + cmd->resp[3] = be32_to_cpu(au6601_readl(host, REG_3C)); + } + + } + + host->cmd->error = 0; + + /* Finished CMD23, now send actual command. */ + if (host->cmd == host->mrq->sbc) { + host->cmd = NULL; + au6601_send_cmd(host, host->mrq->cmd); + } else { + /* Processed actual command. */ + if (!host->data) + tasklet_schedule(&host->finish_tasklet); + else if (host->data_early) + au6601_finish_data(host); + + host->cmd = NULL; + } +} + +static void au6601_finish_data(struct au6601_host *host) +{ + struct mmc_data *data; + + BUG_ON(!host->data); + DBG("\n"); + + data = host->data; + host->data = NULL; + //printk("d-stop\n"); + + /* + * The specification states that the block count register must + * be updated, but it does not specify at what point in the + * data flow. That makes the register entirely useless to read + * back so we have to assume that nothing made it to the card + * in the event of an error. + */ + if (data->error) + data->bytes_xfered = 0; + else + data->bytes_xfered = data->blksz * data->blocks; + + /* + * Need to send CMD12 if - + * a) open-ended multiblock transfer (no CMD23) + * b) error in multiblock transfer + */ + if (data->stop && + (data->error || + !host->mrq->sbc)) { + + /* + * The controller needs a reset of internal state machines + * upon error conditions. + */ + if (data->error) { + au6601_wait_reg_79(host, 0x1); + au6601_wait_reg_79(host, 0x8); + } + au6601_send_cmd(host, data->stop); + } else + tasklet_schedule(&host->finish_tasklet); +} + +static void au6601_prepare_data(struct au6601_host *host, struct mmc_command *cmd) +{ + unsigned int flags; + struct mmc_data *data = cmd->data; + //int ret; + + DBG("\n"); + WARN_ON(host->data); + + if (!data) + return; + + /* Sanity checks */ + BUG_ON(data->blksz * data->blocks > 524288); + BUG_ON(data->blksz > host->mmc->max_blk_size); + BUG_ON(data->blocks > AU6601_MAX_BLOCK_COUNT); + + host->data = data; + host->data_early = 0; + host->data->bytes_xfered = 0; + + flags = SG_MITER_ATOMIC; + if (host->data->flags & MMC_DATA_READ) + flags |= SG_MITER_TO_SG; + else + flags |= SG_MITER_FROM_SG; + sg_miter_start(&host->sg_miter, data->sg, data->sg_len, flags); + host->blocks = data->blocks; + + au6601_trigger_data_transfer(host); +} + +static void au6601_send_cmd(struct au6601_host *host, + struct mmc_command *cmd) +{ + u8 ctrl; /*some mysterious flags and control */ + unsigned long timeout; + + DBG("\n"); + timeout = jiffies; + if (!cmd->data && cmd->cmd_timeout_ms > 9000) + timeout += DIV_ROUND_UP(cmd->cmd_timeout_ms, 1000) * HZ + HZ; + else + timeout += 10 * HZ; + mod_timer(&host->timer, timeout); + + host->cmd = cmd; + au6601_prepare_data(host, cmd); + + au6601_writeb(host, cmd->opcode | 0x40, REG_23); + au6601_writel(host, cpu_to_be32(cmd->arg), REG_24); + + switch (mmc_resp_type(cmd)) { + case MMC_RSP_NONE: + ctrl = 0; + break; + case MMC_RSP_R1: + ctrl = 0x40; + break; + case MMC_RSP_R1B: + ctrl = 0x40 | 0x10; + break; + case MMC_RSP_R2: + ctrl = 0xc0; + break; + case MMC_RSP_R3: + ctrl = 0x80; + break; + default: + pr_err("%s: cmd->flag is not valid\n", mmc_hostname(host->mmc)); + break; + } + + au6601_writeb(host, ctrl | 0x20, REG_81); + //printk("opc %d\n", cmd->opcode); +} + +static void some_seq(struct au6601_host *host) +{ + au6601_writeb(host, 0x0, REG_05); + au6601_writeb(host, 0x1, REG_75); + au6601_clear_set_irqs(host, AU6601_INT_ALL_MASK, + AU6601_INT_CMD_MASK | AU6601_INT_DATA_MASK | + AU6601_INT_CARD_INSERT | AU6601_INT_CARD_REMOVE | + AU6601_INT_CARD_INT | AU6601_INT_BUS_POWER); + au6601_writel(host, 0x0, REG_82); +} + +/*****************************************************************************\ + * * + * Interrupt handling * + * * +\*****************************************************************************/ + +static void au6601_cmd_irq(struct au6601_host *host, u32 intmask) +{ + BUG_ON(intmask == 0); + + DBG("\n"); + if (!host->cmd) { + pr_err("%s: Got command interrupt 0x%08x even " + "though no command operation was in progress.\n", + mmc_hostname(host->mmc), (unsigned)intmask); + //au6601_dumpregs(host); + return; + } + + if (intmask & AU6601_INT_TIMEOUT) + host->cmd->error = -ETIMEDOUT; + else if (intmask & (AU6601_INT_CRC | AU6601_INT_END_BIT | + AU6601_INT_INDEX)) + host->cmd->error = -EILSEQ; + + if (host->cmd->error) { + tasklet_schedule(&host->finish_tasklet); + return; + } + + /* + * The host can send and interrupt when the busy state has + * ended, allowing us to wait without wasting CPU cycles. + * Unfortunately this is overloaded on the "data complete" + * interrupt, so we need to take some care when handling + * it. + * + * Note: The 1.0 specification is a bit ambiguous about this + * feature so there might be some problems with older + * controllers. + */ + if (host->cmd->flags & MMC_RSP_BUSY) { + if (host->cmd->data) + printk("Cannot wait for busy signal when also " + "doing a data transfer"); + } + + if (intmask & AU6601_INT_RESPONSE) + au6601_finish_command(host); +} + +static void au6601_data_irq(struct au6601_host *host, u32 intmask) +{ + //u32 command; + BUG_ON(intmask == 0); + +#if 0 + /* CMD19 generates _only_ Buffer Read Ready interrupt */ + if (intmask & AU6601_INT_DATA_AVAIL) { + command = AU6601_GET_CMD(au6601_readw(host, AU6601_COMMAND)); + if (command == MMC_SEND_TUNING_BLOCK || + command == MMC_SEND_TUNING_BLOCK_HS200) { + host->tuning_done = 1; + wake_up(&host->buf_ready_int); + return; + } + } +#endif + + if (!host->data) { + /* FIXME: Ist is same for AU6601 + * The "data complete" interrupt is also used to + * indicate that a busy state has ended. See comment + * above in au6601_cmd_irq(). + */ + if (host->cmd && (host->cmd->flags & MMC_RSP_BUSY)) { + if (intmask & AU6601_INT_DATA_END) { + au6601_finish_command(host); + return; + } + } + + pr_err("%s: Got data interrupt 0x%08x even " + "though no data operation was in progress.\n", + mmc_hostname(host->mmc), (unsigned)intmask); + + if (intmask & AU6601_INT_ERROR_MASK) { + host->cmd->error = -ETIMEDOUT; + tasklet_schedule(&host->finish_tasklet); + } + return; + } + + if (intmask & AU6601_INT_DATA_TIMEOUT) + host->data->error = -ETIMEDOUT; + else if (intmask & AU6601_INT_DATA_END_BIT) + host->data->error = -EILSEQ; + else if (intmask & AU6601_INT_DATA_CRC) + host->data->error = -EILSEQ; + + if (host->data->error) + au6601_finish_data(host); + else { + if (intmask & (AU6601_INT_DATA_AVAIL | AU6601_INT_SPACE_AVAIL)) + au6601_transfer_pio(host); + + if (intmask & AU6601_INT_DATA_END) { + if (host->cmd) { + /* + * Data managed to finish before the + * command completed. Make sure we do + * things in the proper order. + */ + host->data_early = 1; + } else if (host->blocks) { + /* + * Probably we do multi block operation. + * Prepare PIO for next block. + */ + au6601_trigger_data_transfer(host); + } else + au6601_finish_data(host); + } + } +} + +static irqreturn_t au6601_irq(int irq, void *d) +{ + struct au6601_host *host = d; + irqreturn_t ret = IRQ_HANDLED; + u32 intmask; + + //disable_irq_nosync(irq); + spin_lock(&host->lock); + + au6601_reg_snap(host); + intmask = au6601_readl(host, AU6601_INT_STATUS); + + /* some thing bad */ + if (!intmask || intmask == 0xffffffff) { + printk("zero IRQ\n"); + ret = IRQ_NONE; + goto exit; + } + + if (intmask & (AU6601_INT_CARD_INSERT | AU6601_INT_CARD_REMOVE)) { + /* this check can be remove */ + if (intmask & AU6601_INT_CARD_REMOVE) { + DBG("card removed\n"); + } else { + DBG("card inserted\n"); + } + au6601_writeb(host, intmask & (AU6601_INT_CARD_INSERT | + AU6601_INT_CARD_REMOVE), AU6601_INT_STATUS); + intmask &= ~(AU6601_INT_CARD_INSERT | AU6601_INT_CARD_REMOVE); + tasklet_schedule(&host->card_tasklet); + } + if (intmask & 0x110000) + DBG("0x110000 (DATA/CMD timeout) got IRQ with %x\n", intmask); + + if (intmask & AU6601_INT_CMD_MASK) { + //printk("CMD IRQ %x\n", intmask); + + au6601_writel(host, intmask & AU6601_INT_CMD_MASK, + AU6601_INT_STATUS); + au6601_cmd_irq(host, intmask & AU6601_INT_CMD_MASK); + intmask &= ~AU6601_INT_CMD_MASK; + } + + if (intmask & AU6601_INT_DATA_MASK) { + //printk("DATA IRQ %x\n", intmask); + au6601_writel(host, intmask & AU6601_INT_DATA_MASK, + AU6601_INT_STATUS); + au6601_data_irq(host, intmask & AU6601_INT_DATA_MASK); + intmask &= ~AU6601_INT_DATA_MASK; + } + + if (intmask & 0x100) { + printk("0x100 (card INT) got IRQ with %x\n", intmask); + au6601_writel(host, 0x100, AU6601_INT_STATUS); + intmask &= ~0x100; + } + + if (intmask & 0xFFFF7FFF) { + printk("0xFFFF7FFF got IRQ with %x\n", intmask); + au6601_writel(host, intmask & 0xFFFF7FFF, AU6601_INT_STATUS); + } + +exit: + spin_unlock(&host->lock); + //enable_irq(irq); + return ret; +} + +static void au6601_init(struct au6601_host *host) +{ + + au6601_writeb(host, 0, REG_7F); + au6601_readb(host, REG_7F); + au6601_writeb(host, 1, REG_7F); + au6601_readb(host, REG_7F); + + au6601_readb(host, REG_77); + + au6601_writeb(host, 0, REG_74); + /* set ExtPadDrive size */ + au6601_writeb(host, 68, REG_7B); + au6601_writeb(host, 68, REG_7C); +// au6601_writeb(host, 0, REG_7D); + + /* why do we need this read? */ + au6601_readb(host, REG_76); + au6601_writeb(host, 0, REG_76); + /* disable DlinkMode? disabled by default. */ + au6601_writeb(host, 0x80, REG_76); + au6601_readb(host, REG_76); + + au6601_wait_reg_79(host, 0x1); + + /* first sequence after reg_79 check. Same sequence is used on + * olmost every command. */ + some_seq(host); + au6601_wait_reg_79(host, 0x8); + + au6601_writeb(host, 0x0, REG_05); + au6601_writeb(host, 0x0, REG_85); + au6601_writeb(host, 0x8, REG_75); + au6601_writel(host, 0x3d00fa, REG_B4); +// au6601_writeb(host, 0x0, REG_61); +// au6601_writeb(host, 0x0, REG_63); + + au6601_set_power(host, 0x1, 0); + au6601_set_power(host, 0x8, 0); + +} + +static void au6601_sdc_request(struct mmc_host *mmc, struct mmc_request *mrq) +{ + struct au6601_host *host; + unsigned long flags; + + host = mmc_priv(mmc); + spin_lock_irqsave(&host->lock, flags); + + host->mrq = mrq; + + /* check if card is present then send command and data */ + if (au6601_readb(host, REG_76) & 0x1) + au6601_send_cmd(host, mrq->cmd); + else { + mrq->cmd->error = -ENOMEDIUM; + tasklet_schedule(&host->finish_tasklet); + } + + spin_unlock_irqrestore(&host->lock, flags); +} + +static void au6601_set_clock(struct au6601_host *host, unsigned int clock) +{ + unsigned int div = 0, mult = 0, ctrl = 0x1; + + /* FIXME: mesuered and calculated values are different. + * the clock is unstable in some mult/div combinations. + */ + if (clock >= MHZ_TO_HZ(208)) { + mult = 0xb0; /* 30 * ? / 2 = ?MHz */ + div = 2; + } else if (clock >= MHZ_TO_HZ(194)) { + mult = 0x30; /* 30 * 14 / 2 = 210MHz */ + div = 2; + } else if (clock >= MHZ_TO_HZ(130)) { + mult = 0x30; /* 30 * 14 / 3 = 140MHz */ + div = 3; + } else if (clock >= MHZ_TO_HZ(100)) { + mult = 0x30; /* 30 * 14 / 4 = 105MHz */ + div = 4; + } else if (clock >= MHZ_TO_HZ(80)) { + mult = 0x30; /* 30 * 14 / 5 = 84MHz */ + div = 5; + } else if (clock >= MHZ_TO_HZ(60)) { + mult = 0x30; /* 30 * 14 / 7 = 60MHz */ + div = 7; + } else if (clock >= MHZ_TO_HZ(50)) { + mult = 0x10; /* 30 * 2 / 1 = 60MHz */ + div = 1; + } else if (clock >= MHZ_TO_HZ(40)) { + mult = 0x30; /* 30 * 14 / 10 = 42MHz */ + div = 10; + } else if (clock >= MHZ_TO_HZ(25)) { + mult = 0x10; /* 30 * 2 / 2 = 30MHz */ + div = 2; + } else if (clock >= MHZ_TO_HZ(20)) { + mult = 0x20; /* 30 * 4 / 7 = 17MHz */ + div = 7; + } else if (clock >= MHZ_TO_HZ(10)) { + mult = 0x10; /* 30 * 2 / 5 = 12MHz */ + div = 5; + } else if (clock >= MHZ_TO_HZ(5)) { + mult = 0x10; /* 30 * 2 / 10 = 6MHz */ + div = 10; + } else if (clock >= MHZ_TO_HZ(1)) { + mult = 0x0; /* 30 / 16 = 1,8 MHz */ + div = 16; + } else if (clock == 0) { + ctrl = 0; + } else { + mult = 0x0; /* reversed 150 * 200 = 30MHz */ + div = 200; /* 150 KHZ mesured */ + } + printk("set freq %d, %x, %x\n", clock, div, mult); + au6601_writew(host, (div - 1) << 8 | mult | ctrl, REG_72); +} + +static void au6601_sdc_set_ios(struct mmc_host *mmc, struct mmc_ios *ios) +{ + struct au6601_host *host; + unsigned long flags; + + host = mmc_priv(mmc); + spin_lock_irqsave(&host->lock, flags); + + au6601_set_freg_pre(host); + + if (ios->bus_width == MMC_BUS_WIDTH_1) { + printk("BUS width 1 \n"); + au6601_writeb(host, 0x0, REG_82); + au6601_clear_set_reg86(host, 0xc0, 0); + } else if (ios->bus_width == MMC_BUS_WIDTH_4) { + printk("BUS width 4 \n"); + au6601_writeb(host, 0x20, REG_82); + au6601_clear_set_reg86(host, 0, 0xc0); + } else + printk("unknown BUS mode \n"); + + printk("time %x. ", ios->timing); + au6601_set_clock(host, ios->clock); + + + switch (ios->power_mode) { + case MMC_POWER_OFF: + au6601_set_power(host, 0x1 | 0x8, 0); + break; + case MMC_POWER_UP: + // au6601_set_power(host, 0x8, 1); + // break; + case MMC_POWER_ON: + au6601_set_power(host, 0x1, 1); + // au6601_set_power(host, 0x8, 0); + break; + default: + printk("unknown power parametr\n"); + } + + au6601_writeb(host, 0x80, REG_83); + au6601_writeb(host, 0x7d, REG_69); + au6601_readb(host, REG_74); + spin_unlock_irqrestore(&host->lock, flags); +} + +static const struct mmc_host_ops au6601_sdc_ops = { + .request = au6601_sdc_request, + .set_ios = au6601_sdc_set_ios, +}; + +/*****************************************************************************\ + * * + * Tasklets * + * * +\*****************************************************************************/ + +static void au6601_tasklet_card(unsigned long param) +{ + struct au6601_host *host = (struct au6601_host*)param; + + //au6601_card_event(host->mmc); + + mmc_detect_change(host->mmc, msecs_to_jiffies(200)); +} + +static void au6601_tasklet_finish(unsigned long param) +{ + struct au6601_host *host; + unsigned long flags; + struct mmc_request *mrq; + + host = (struct au6601_host*)param; + + DBG("\n"); + spin_lock_irqsave(&host->lock, flags); + + /* + * If this tasklet gets rescheduled while running, it will + * be run again afterwards but without any active request. + */ + if (!host->mrq) { + spin_unlock_irqrestore(&host->lock, flags); + return; + } + + del_timer(&host->timer); + + mrq = host->mrq; + + /* + * The controller needs a reset of internal state machines + * upon error conditions. + */ + if ((mrq->cmd && mrq->cmd->error) || + (mrq->data && (mrq->data->error || + (mrq->data->stop && mrq->data->stop->error)))) { + + au6601_wait_reg_79(host, 0x1); + au6601_wait_reg_79(host, 0x8); + } + + host->mrq = NULL; + host->cmd = NULL; + host->data = NULL; + + mmiowb(); + spin_unlock_irqrestore(&host->lock, flags); + + mmc_request_done(host->mmc, mrq); +} + +static void au6601_timeout_timer(unsigned long data) +{ + struct au6601_host *host; + unsigned long flags; + + host = (struct au6601_host*)data; + + spin_lock_irqsave(&host->lock, flags); + + if (host->mrq) { + pr_err("%s: Timeout waiting for hardware " + "interrupt.\n", mmc_hostname(host->mmc)); + //au6601_dumpregs(host); + au6601_reg_snap(host); + + if (host->data) { + host->data->error = -ETIMEDOUT; + au6601_finish_data(host); + } else { + if (host->cmd) + host->cmd->error = -ETIMEDOUT; + else + host->mrq->cmd->error = -ETIMEDOUT; + + tasklet_schedule(&host->finish_tasklet); + } + } + + mmiowb(); + spin_unlock_irqrestore(&host->lock, flags); +} + + + +static void au6601_init_host(struct au6601_host *host) +{ + struct mmc_host *mmc = host->mmc; + + spin_lock_init(&host->lock); + + mmc->f_min = AU6601_MIN_CLOCK; + mmc->f_max = AU6601_MAX_CLOCK; + mmc->ocr_avail = MMC_VDD_32_33 | MMC_VDD_33_34; + //mmc->ocr_avail = MMC_VDD_33_34 | MMC_VDD_165_195; + mmc->caps = MMC_CAP_4_BIT_DATA | MMC_CAP_SD_HIGHSPEED | MMC_CAP_MMC_HIGHSPEED | MMC_CAP_UHS_SDR104 | MMC_CAP_UHS_SDR50 | MMC_CAP_UHS_DDR50 | MMC_CAP_UHS_SDR25 | MMC_CAP_UHS_SDR12; + mmc->ops = &au6601_sdc_ops; + + /*Hardware cannot do scatter lists*/ + mmc->max_segs = 1; + + mmc->max_blk_size = AU6601_MAX_BLOCK_LENGTH; + mmc->max_blk_count = AU6601_MAX_BLOCK_COUNT; + + mmc->max_seg_size = mmc->max_blk_size * mmc->max_blk_count; + mmc->max_req_size = mmc->max_seg_size; +} + + +static int au6601_pci_probe(struct pci_dev *pdev, + const struct pci_device_id *ent) +{ + struct mmc_host *mmc; + struct au6601_host *host; + int ret, bar; + + BUG_ON(pdev == NULL); + BUG_ON(ent == NULL); + + dev_info(&pdev->dev, "AU6601 controller found [%04x:%04x] (rev %x)\n", + (int)pdev->vendor, (int)pdev->device, (int)pdev->revision); + + if (!(pci_resource_flags(pdev, bar) & IORESOURCE_MEM)) { + dev_err(&pdev->dev, "BAR %d is not iomem. Aborting.\n", bar); + return -ENODEV; + } + + + ret = pcim_enable_device(pdev); + if (ret) + return ret; + + /* FIXME: are there no managed version of mmc_alloc_host? */ + mmc = mmc_alloc_host(sizeof(struct au6601_host), &pdev->dev); + if (!mmc) + return -ENOMEM; + + host = mmc_priv(mmc); + host->mmc = mmc; + host->pdev = pdev; + + ret = pci_request_region(pdev, bar, DRVNAME); + if (ret) { + dev_err(&pdev->dev, "cannot request region\n"); + return -ENOMEM; + } + +// host->iobase = pci_ioremap_bar(pdev, bar); + host->iobase = pcim_iomap(pdev, bar, 0); + if (!host->iobase) + return -ENOMEM; + + ret = devm_request_irq(&pdev->dev, pdev->irq, au6601_irq, + IRQF_TRIGGER_FALLING, "au6601 host", + host); + + if (ret) { + dev_err(&pdev->dev, "failed to get irq for data line\n"); + return -ENOMEM; + } + + pci_set_drvdata(pdev, host); + + /* + * Init tasklets. + */ + tasklet_init(&host->card_tasklet, + au6601_tasklet_card, (unsigned long)host); + tasklet_init(&host->finish_tasklet, + au6601_tasklet_finish, (unsigned long)host); + setup_timer(&host->timer, au6601_timeout_timer, (unsigned long)host); + + au6601_init_host(host); + au6601_reg_snap(host); + au6601_init(host); + + mmc_add_host(mmc); + return 0; +} + + +static void au6601_pci_remove(struct pci_dev *pdev) +{ + struct au6601_host *host; + + host = pci_get_drvdata(pdev); + + au6601_writeb(host, 0x0, REG_76); + au6601_clear_set_irqs(host, AU6601_INT_ALL_MASK, 0); + + au6601_set_power(host, 0x1, 0); + + au6601_writeb(host, 0x0, REG_85); + au6601_writeb(host, 0x0, REG_B4); + + au6601_set_power(host, 0x8, 0); + + del_timer_sync(&host->timer); + tasklet_kill(&host->card_tasklet); + tasklet_kill(&host->finish_tasklet); + + mmc_remove_host(host->mmc); + mmc_free_host(host->mmc); +} + + +static struct pci_driver au6601_driver = { + .name = DRVNAME, + .id_table = pci_ids, + .probe = au6601_pci_probe, + .remove = au6601_pci_remove, +}; + +module_pci_driver(au6601_driver); + +MODULE_AUTHOR("Oleksij Rempel "); +MODULE_DESCRIPTION("Alcor Micro AU6601 Secure Digital Host Controller Interface PCI driver"); +MODULE_LICENSE("GPL");