bertos/cpu/cortex-m3/drv/hsmci_sam3.c

   1 /**
   2  * \file
   3  * <!--
   4  * This file is part of BeRTOS.
   5  *
   6  * Bertos is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  19  *
  20  * As a special exception, you may use this file as part of a free software
  21  * library without restriction.  Specifically, if other files instantiate
  22  * templates or use macros or inline functions from this file, or you compile
  23  * this file and link it with other files to produce an executable, this
  24  * file does not by itself cause the resulting executable to be covered by
  25  * the GNU General Public License.  This exception does not however
  26  * invalidate any other reasons why the executable file might be covered by
  27  * the GNU General Public License.
  28  *
  29  * Copyright 2011 Develer S.r.l. (http://www.develer.com/)
  30  * -->
  31  *
  32  * \brief HSMCI driver implementation.
  33  *
  34  * \author Daniele Basile <asterix@develer.com>
  35  */
  36
  37
  38 #include "hsmci_sam3.h"
  39
  40 #include <drv/timer.h>
  41 #include <cpu/irq.h>
  42 #include <drv/irq_cm3.h>
  43
  44 #include <io/cm3.h>
  45
  46 /** DMA Transfer Descriptor as well as Linked List Item */
  47 typedef struct DmacDesc
  48 {
  49     uint32_t src_addr;     /**< Source buffer address */
  50     uint32_t dst_addr;     /**< Destination buffer address */
  51     uint32_t ctrl_a;       /**< Control A register settings */
  52     uint32_t ctrl_b;       /**< Control B register settings */
  53     uint32_t dsc_addr;     /**< Next descriptor address */
  54 } DmacDesc;
  55
  56
  57
  58
  59 #define HSMCI_CLK_DIV(RATE)     ((CPU_FREQ / (RATE << 1)) - 1)
  60
  61 #define HSMCI_ERROR_MASK   (BV(HSMCI_SR_RINDE)    | \
  62                                                         BV(HSMCI_SR_RDIRE)    | \
  63                                                         BV(HSMCI_SR_RCRCE)    | \
  64                                                         BV(HSMCI_SR_RENDE)    | \
  65                                                         BV(HSMCI_SR_RTOE)     | \
  66                                                         BV(HSMCI_SR_DCRCE)    | \
  67                                                         BV(HSMCI_SR_DTOE)     | \
  68                                                         BV(HSMCI_SR_CSTOE)    | \
  69                                                         BV(HSMCI_SR_BLKOVRE)  | \
  70                                                         BV(HSMCI_SR_ACKRCVE))
  71
  72
  73 #define HSMCI_RESP_ERROR_MASK   (BV(HSMCI_SR_RINDE) | BV(HSMCI_SR_RDIRE) \
  74           | BV(HSMCI_SR_RENDE)| BV(HSMCI_SR_RTOE))
  75
  76 #define HSMCI_DATA_ERROR_MASK   (BV(HSMCI_SR_DCRCE) | BV(HSMCI_SR_DTOE))
  77
  78 #define HSMCI_READY_MASK     (BV(HSMCI_SR_CMDRDY) | BV(HSMCI_SR_NOTBUSY))
  79 #define HSMCI_WAIT()\
  80         do { \
  81                 cpu_relax(); \
  82         } while (!(HSMCI_SR & BV(HSMCI_SR_CMDRDY)))
  83
  84
  85 #define HSMCI_WAIT_DATA_RDY()\
  86         do { \
  87                 cpu_relax(); \
  88         } while (!(HSMCI_SR & BV(HSMCI_SR_RXRDY)))
  89
  90 #define HSMCI_ERROR()   (HSMCI_SR & HSMCI_ERROR_MASK)
  91
  92 #define HSMCI_HW_INIT()  \
  93 do { \
  94         PIOA_PDR = BV(19) | BV(20) | BV(21) | BV(22) | BV(23) | BV(24); \
  95         PIO_PERIPH_SEL(PIOA_BASE, BV(19) | BV(20) | BV(21) | BV(22) | BV(23) | BV(24), PIO_PERIPH_A); \
  96 } while (0)
  97
  98
  99 #define STROBE_ON()   PIOB_SODR = BV(13)
 100 #define STROBE_OFF()  PIOB_CODR = BV(13)
 101 #define STROBE_INIT() \
 102         do { \
 103                 PIOB_OER = BV(13); \
 104                 PIOB_PER = BV(13); \
 105         } while(0)
 106
 107 static DECLARE_ISR(hsmci_irq)
 108 {
 109         uint32_t status = HSMCI_SR;
 110         if (status & BV(HSMCI_IER_DMADONE))
 111         {
 112         }
 113 }
 114
 115
 116 static DECLARE_ISR(dmac_irq)
 117 {
 118         uint32_t stat = DMAC_EBCISR;
 119
 120         if (stat & BV(DMAC_EBCISR_ERR3))
 121         {
 122                 kprintf("err %08lx\n", stat);
 123         }
 124 }
 125
 126 void hsmci_readResp(uint32_t *resp, size_t len)
 127 {
 128         ASSERT(resp);
 129
 130         for (size_t i = 0; i < len ; i++)
 131                 resp[i] = HSMCI_RSPR;
 132 }
 133
 134 bool hsmci_sendCmd(uint8_t index, uint32_t argument, uint32_t reply_type)
 135 {
 136         STROBE_ON();
 137         HSMCI_WAIT();
 138
 139         HSMCI_ARGR = argument;
 140         HSMCI_CMDR = index | reply_type | BV(HSMCI_CMDR_MAXLAT);
 141
 142         uint32_t status = HSMCI_SR;
 143         while (!(status & BV(HSMCI_SR_CMDRDY)))
 144         {
 145                 if (status & HSMCI_RESP_ERROR_MASK)
 146                         return status;
 147
 148                 cpu_relax();
 149
 150                 status = HSMCI_SR;
 151         }
 152
 153         STROBE_OFF();
 154         return 0;
 155 }
 156
 157 INLINE void hsmci_setBlockSize(size_t blk_size)
 158 {
 159         HSMCI_DMA |= BV(HSMCI_DMA_DMAEN);
 160         HSMCI_BLKR = blk_size << HSMCI_BLKR_BLKLEN_SHIFT;
 161 }
 162
 163 void hsmci_prgTxDMA(uint32_t *buf, size_t word_num, size_t blk_size)
 164 {
 165
 166         hsmci_setBlockSize(blk_size);
 167
 168         DMAC_CHDR = BV(DMAC_CHDR_DIS0);
 169
 170         DMAC_SADDR0 = (uint32_t)buf;
 171         DMAC_DADDR0 = (uint32_t)&HSMCI_TDR;
 172         DMAC_DSCR0 = 0;
 173
 174         DMAC_CFG0 = BV(DMAC_CFG_DST_H2SEL) | DMAC_CFG_FIFOCFG_ALAP_CFG | (0x1 << DMAC_CFG_AHB_PROT_SHIFT);
 175         DMAC_CTRLA0 = (word_num & DMAC_CTRLA_BTSIZE_MASK) |
 176                 DMAC_CTRLA_SRC_WIDTH_WORD | DMAC_CTRLA_DST_WIDTH_WORD;
 177         DMAC_CTRLB0 = (BV(DMAC_CTRLB_SRC_DSCR) | BV(DMAC_CTRLB_DST_DSCR) | DMAC_CTRLB_FC_MEM2PER_DMA_FC |
 178                                         DMAC_CTRLB_DST_INCR_FIXED | DMAC_CTRLB_SRC_INCR_INCREMENTING | BV(DMAC_CTRLB_IEN));
 179
 180         ASSERT(!(DMAC_CHSR & BV(DMAC_CHSR_ENA0)));
 181         DMAC_CHER = BV(DMAC_CHER_ENA0);
 182
 183 }
 184
 185 void hsmci_prgRxDMA(uint32_t *buf, size_t word_num, size_t blk_size)
 186 {
 187         hsmci_setBlockSize(blk_size);
 188
 189         DMAC_CHDR = BV(DMAC_CHDR_DIS0);
 190
 191         DMAC_SADDR0 = (uint32_t)&HSMCI_RDR;
 192         DMAC_DADDR0 = (uint32_t)buf;
 193         DMAC_DSCR0 = 0;
 194
 195         DMAC_CFG0 = BV(DMAC_CFG_SRC_H2SEL) | DMAC_CFG_FIFOCFG_ALAP_CFG | (0x1 << DMAC_CFG_AHB_PROT_SHIFT);
 196         DMAC_CTRLA0 = (word_num & DMAC_CTRLA_BTSIZE_MASK) |
 197                 DMAC_CTRLA_SRC_WIDTH_WORD | DMAC_CTRLA_DST_WIDTH_WORD;
 198         DMAC_CTRLB0 = (BV(DMAC_CTRLB_SRC_DSCR) | BV(DMAC_CTRLB_DST_DSCR) | DMAC_CTRLB_FC_PER2MEM_DMA_FC |
 199                                         DMAC_CTRLB_DST_INCR_INCREMENTING | DMAC_CTRLB_SRC_INCR_FIXED | BV(DMAC_CTRLB_IEN));
 200
 201         ASSERT(!(DMAC_CHSR & BV(DMAC_CHSR_ENA0)));
 202         DMAC_CHER = BV(DMAC_CHER_ENA0);
 203 }
 204
 205
 206 void hsmci_waitTransfer(void)
 207 {
 208         while (!(HSMCI_SR & BV(HSMCI_SR_XFRDONE)))
 209                 cpu_relax();
 210 }
 211
 212 void hsmci_setSpeed(uint32_t data_rate, int flag)
 213 {
 214         if (flag)
 215                 HSMCI_CFG |= BV(HSMCI_CFG_HSMODE);
 216         else
 217                 HSMCI_CFG &= ~BV(HSMCI_CFG_HSMODE);
 218
 219         HSMCI_MR = HSMCI_CLK_DIV(data_rate) | ((0x7u << HSMCI_MR_PWSDIV_SHIFT) & HSMCI_MR_PWSDIV_MASK);
 220
 221         timer_delay(10);
 222 }
 223
 224 void hsmci_init(Hsmci *hsmci)
 225 {
 226         (void)hsmci;
 227
 228         HSMCI_HW_INIT();
 229         STROBE_INIT();
 230
 231         pmc_periphEnable(HSMCI_ID);
 232         HSMCI_CR = BV(HSMCI_CR_SWRST);
 233         HSMCI_CR = BV(HSMCI_CR_PWSDIS) | BV(HSMCI_CR_MCIDIS);
 234         HSMCI_IDR = 0xFFFFFFFF;
 235
 236         HSMCI_DTOR = 0xFF | HSMCI_DTOR_DTOMUL_1048576;
 237         HSMCI_CSTOR = 0xFF | HSMCI_CSTOR_CSTOMUL_1048576;
 238         HSMCI_MR = HSMCI_CLK_DIV(HSMCI_INIT_SPEED) | ((0x7u << HSMCI_MR_PWSDIV_SHIFT) & HSMCI_MR_PWSDIV_MASK) | BV(HSMCI_MR_RDPROOF);
 239         HSMCI_CFG = BV(HSMCI_CFG_FIFOMODE) | BV(HSMCI_CFG_FERRCTRL);
 240
 241         sysirq_setHandler(INT_HSMCI, hsmci_irq);
 242         HSMCI_CR = BV(HSMCI_CR_MCIEN);
 243         HSMCI_DMA = 0;
 244
 245         //init DMAC
 246         DMAC_EBCIDR = 0x3FFFFF;
 247         DMAC_CHDR = 0x1F;
 248
 249
 250         pmc_periphEnable(DMAC_ID);
 251         DMAC_EN = BV(DMAC_EN_ENABLE);
 252         sysirq_setHandler(INT_DMAC, dmac_irq);
 253
 254         DMAC_EBCIER = BV(DMAC_EBCIER_BTC0) | BV(DMAC_EBCIER_ERR0);
 255 }