Updated sdmmc.c

.. thanks @Gelex, @TuxSH, @AuroraWright, @Normmatt!
This commit is contained in:
d0k3 2017-04-24 01:23:34 +02:00
parent dd36d00a66
commit 51a254a9b9
4 changed files with 436 additions and 575 deletions

5
source/nand/delay.h Normal file
View File

@ -0,0 +1,5 @@
#pragma once
#include "common.h"
void waitcycles(u32 us);

View File

@ -1,15 +1,16 @@
.text
.arm .arm
.global waitcycles .align 4
.type waitcycles STT_FUNC
@waitcycles ( u32 us ) .global waitcycles
.type waitcycles, %function
waitcycles: waitcycles:
PUSH {R0-R2,LR} push {r0-r2, lr}
STR R0, [SP,#4] str r0, [sp, #4]
waitcycles_loop: waitcycles_loop:
LDR R3, [SP,#4] ldr r3, [sp, #4]
SUBS R2, R3, #1 subs r2, r3, #1
STR R2, [SP,#4] str r2, [sp, #4]
CMP R3, #0 cmp r3, #0
BNE waitcycles_loop bne waitcycles_loop
POP {R0-R2,PC} pop {r0-r2, pc}

View File

@ -1,6 +1,6 @@
/* /*
* This Source Code Form is subject to the terms of the Mozilla Public * This Source Code Form is subject to the terms of the Mozilla Public
* License, v. 2.0. If a copy of the MPL was not distributed with this file, * License, v. 2.0. If a copy of the MPL was not distributed with this file,
* You can obtain one at http://mozilla.org/MPL/2.0/. * You can obtain one at http://mozilla.org/MPL/2.0/.
* *
* Copyright (c) 2014-2015, Normmatt * Copyright (c) 2014-2015, Normmatt
@ -22,543 +22,459 @@
* along with this program. If not, see http://www.gnu.org/licenses/. * along with this program. If not, see http://www.gnu.org/licenses/.
*/ */
#include <stdint.h>
#include <string.h>
#include <stdlib.h>
#include <inttypes.h>
#include <malloc.h>
#include <stdio.h>
#include <unistd.h>
#include <dirent.h>
#include <errno.h>
#include "sdmmc.h" #include "sdmmc.h"
//#include "DrawCharacter.h" #include "delay.h"
#define DATA32_SUPPORT static struct mmcdevice handleNAND;
static struct mmcdevice handleSD;
#define TRUE 1 static inline u16 sdmmc_read16(u16 reg)
#define FALSE 0 {
return *(vu16 *)(SDMMC_BASE + reg);
}
#define NO_INLINE __attribute__ ((noinline)) static inline void sdmmc_write16(u16 reg, u16 val)
{
*(vu16 *)(SDMMC_BASE + reg) = val;
}
#ifdef __cplusplus static inline u32 sdmmc_read32(u16 reg)
extern "C" { {
#endif return *(vu32 *)(SDMMC_BASE + reg);
void waitcycles(uint32_t val); }
#ifdef __cplusplus
};
#endif
struct mmcdevice handelNAND; static inline void sdmmc_write32(u16 reg, u32 val)
struct mmcdevice handelSD; {
*(vu32 *)(SDMMC_BASE + reg) = val;
}
static inline void sdmmc_mask16(u16 reg, const u16 clear, const u16 set)
{
u16 val = sdmmc_read16(reg);
val &= ~clear;
val |= set;
sdmmc_write16(reg, val);
}
static inline void setckl(u32 data)
{
sdmmc_mask16(REG_SDCLKCTL, 0x100, 0);
sdmmc_mask16(REG_SDCLKCTL, 0x2FF, data & 0x2FF);
sdmmc_mask16(REG_SDCLKCTL, 0x0, 0x100);
}
mmcdevice *getMMCDevice(int drive) mmcdevice *getMMCDevice(int drive)
{ {
if(drive==0) return &handelNAND; if(drive == 0) return &handleNAND;
return &handelSD; return &handleSD;
} }
static int geterror(struct mmcdevice *ctx) static int geterror(struct mmcdevice *ctx)
{ {
return (int)((ctx->error << 29) >> 31); return (int)((ctx->error << 29) >> 31);
} }
static void inittarget(struct mmcdevice *ctx) static void inittarget(struct mmcdevice *ctx)
{ {
sdmmc_mask16(REG_SDPORTSEL,0x3,(uint16_t)ctx->devicenumber); sdmmc_mask16(REG_SDPORTSEL, 0x3, (u16)ctx->devicenumber);
setckl(ctx->clk); setckl(ctx->clk);
if(ctx->SDOPT == 0) if(ctx->SDOPT == 0) sdmmc_mask16(REG_SDOPT, 0, 0x8000);
{ else sdmmc_mask16(REG_SDOPT, 0x8000, 0);
sdmmc_mask16(REG_SDOPT,0,0x8000);
}
else
{
sdmmc_mask16(REG_SDOPT,0x8000,0);
}
} }
static void NO_INLINE sdmmc_send_command(struct mmcdevice *ctx, uint32_t cmd, uint32_t args) static void __attribute__((noinline)) sdmmc_send_command(struct mmcdevice *ctx, u32 cmd, u32 args)
{ {
uint32_t getSDRESP = (cmd << 15) >> 31; u32 getSDRESP = (cmd << 15) >> 31;
uint16_t flags = (cmd << 15) >> 31; u16 flags = (cmd << 15) >> 31;
const int readdata = cmd & 0x20000; const int readdata = cmd & 0x20000;
const int writedata = cmd & 0x40000; const int writedata = cmd & 0x40000;
if(readdata || writedata) if(readdata || writedata)
{ flags |= TMIO_STAT0_DATAEND;
flags |= TMIO_STAT0_DATAEND;
}
ctx->error = 0; ctx->error = 0;
while((sdmmc_read16(REG_SDSTATUS1) & TMIO_STAT1_CMD_BUSY)); //mmc working? while((sdmmc_read16(REG_SDSTATUS1) & TMIO_STAT1_CMD_BUSY)); //mmc working?
sdmmc_write16(REG_SDIRMASK0,0); sdmmc_write16(REG_SDIRMASK0, 0);
sdmmc_write16(REG_SDIRMASK1,0); sdmmc_write16(REG_SDIRMASK1, 0);
sdmmc_write16(REG_SDSTATUS0,0); sdmmc_write16(REG_SDSTATUS0, 0);
sdmmc_write16(REG_SDSTATUS1,0); sdmmc_write16(REG_SDSTATUS1, 0);
sdmmc_mask16(REG_DATACTL32,0x1800,0); sdmmc_mask16(REG_DATACTL32, 0x1800, 0);
sdmmc_write16(REG_SDCMDARG0,args &0xFFFF); sdmmc_write16(REG_SDCMDARG0, args & 0xFFFF);
sdmmc_write16(REG_SDCMDARG1,args >> 16); sdmmc_write16(REG_SDCMDARG1, args >> 16);
sdmmc_write16(REG_SDCMD,cmd &0xFFFF); sdmmc_write16(REG_SDCMD, cmd & 0xFFFF);
uint32_t size = ctx->size; u32 size = ctx->size;
uint8_t *rDataPtr = ctx->rData; u8 *rDataPtr = ctx->rData;
const uint8_t *tDataPtr = ctx->tData; const u8 *tDataPtr = ctx->tData;
int rUseBuf = ( NULL != rDataPtr ); bool rUseBuf = rDataPtr != NULL;
int tUseBuf = ( NULL != tDataPtr ); bool tUseBuf = tDataPtr != NULL;
uint16_t status0 = 0; u16 status0 = 0;
while(1) while(true)
{ {
volatile uint16_t status1 = sdmmc_read16(REG_SDSTATUS1); vu16 status1 = sdmmc_read16(REG_SDSTATUS1);
#ifdef DATA32_SUPPORT vu16 ctl32 = sdmmc_read16(REG_DATACTL32);
volatile uint16_t ctl32 = sdmmc_read16(REG_DATACTL32); if((ctl32 & 0x100))
if((ctl32 & 0x100)) {
#else if(readdata)
if((status1 & TMIO_STAT1_RXRDY)) {
#endif if(rUseBuf)
{ {
if(readdata) sdmmc_mask16(REG_SDSTATUS1, TMIO_STAT1_RXRDY, 0);
{ if(size > 0x1FF)
if(rUseBuf) {
{ //Gabriel Marcano: This implementation doesn't assume alignment.
sdmmc_mask16(REG_SDSTATUS1, TMIO_STAT1_RXRDY, 0); //I've removed the alignment check doen with former rUseBuf32 as a result
if(size > 0x1FF) for(int i = 0; i < 0x200; i += 4)
{ {
#ifdef DATA32_SUPPORT u32 data = sdmmc_read32(REG_SDFIFO32);
//Gabriel Marcano: This implementation doesn't assume alignment. *rDataPtr++ = data;
//I've removed the alignment check doen with former rUseBuf32 as a result *rDataPtr++ = data >> 8;
for(int i = 0; i<0x200; i+=4) *rDataPtr++ = data >> 16;
{ *rDataPtr++ = data >> 24;
uint32_t data = sdmmc_read32(REG_SDFIFO32); }
*rDataPtr++ = data; size -= 0x200;
*rDataPtr++ = data >> 8; }
*rDataPtr++ = data >> 16; }
*rDataPtr++ = data >> 24;
}
#else
for(int i = 0; i<0x200; i+=2)
{
uint16_t data = sdmmc_read16(REG_SDFIFO);
*rDataPtr++ = data;
*rDataPtr++ = data >> 8;
}
#endif
size -= 0x200;
}
}
sdmmc_mask16(REG_DATACTL32, 0x800, 0); sdmmc_mask16(REG_DATACTL32, 0x800, 0);
} }
} }
#ifdef DATA32_SUPPORT if(!(ctl32 & 0x200))
if(!(ctl32 & 0x200)) {
#else if(writedata)
if((status1 & TMIO_STAT1_TXRQ)) {
#endif if(tUseBuf)
{ {
if(writedata) sdmmc_mask16(REG_SDSTATUS1, TMIO_STAT1_TXRQ, 0);
{ if(size > 0x1FF)
if(tUseBuf) {
{ for(int i = 0; i < 0x200; i += 4)
sdmmc_mask16(REG_SDSTATUS1, TMIO_STAT1_TXRQ, 0); {
if(size > 0x1FF) u32 data = *tDataPtr++;
{ data |= (u32)*tDataPtr++ << 8;
#ifdef DATA32_SUPPORT data |= (u32)*tDataPtr++ << 16;
for(int i = 0; i<0x200; i+=4) data |= (u32)*tDataPtr++ << 24;
{ sdmmc_write32(REG_SDFIFO32, data);
uint32_t data = *tDataPtr++; }
data |= (uint32_t)*tDataPtr++ << 8; size -= 0x200;
data |= (uint32_t)*tDataPtr++ << 16; }
data |= (uint32_t)*tDataPtr++ << 24; }
sdmmc_write32(REG_SDFIFO32, data);
}
#else
for(int i = 0; i<0x200; i+=2)
{
uint16_t data = *tDataPtr++;
data |= (uint8_t)(*tDataPtr++ << 8);
sdmmc_write16(REG_SDFIFO, data);
}
#endif
size -= 0x200;
}
}
sdmmc_mask16(REG_DATACTL32, 0x1000, 0); sdmmc_mask16(REG_DATACTL32, 0x1000, 0);
} }
} }
if(status1 & TMIO_MASK_GW) if(status1 & TMIO_MASK_GW)
{ {
ctx->error |= 4; ctx->error |= 4;
break; break;
} }
if(!(status1 & TMIO_STAT1_CMD_BUSY)) if(!(status1 & TMIO_STAT1_CMD_BUSY))
{ {
status0 = sdmmc_read16(REG_SDSTATUS0); status0 = sdmmc_read16(REG_SDSTATUS0);
if(sdmmc_read16(REG_SDSTATUS0) & TMIO_STAT0_CMDRESPEND) if(sdmmc_read16(REG_SDSTATUS0) & TMIO_STAT0_CMDRESPEND)
{ {
ctx->error |= 0x1; ctx->error |= 0x1;
} }
if(status0 & TMIO_STAT0_DATAEND) if(status0 & TMIO_STAT0_DATAEND)
{ {
ctx->error |= 0x2; ctx->error |= 0x2;
} }
if((status0 & flags) == flags) if((status0 & flags) == flags)
break; break;
} }
} }
ctx->stat0 = sdmmc_read16(REG_SDSTATUS0); ctx->stat0 = sdmmc_read16(REG_SDSTATUS0);
ctx->stat1 = sdmmc_read16(REG_SDSTATUS1); ctx->stat1 = sdmmc_read16(REG_SDSTATUS1);
sdmmc_write16(REG_SDSTATUS0,0); sdmmc_write16(REG_SDSTATUS0, 0);
sdmmc_write16(REG_SDSTATUS1,0); sdmmc_write16(REG_SDSTATUS1, 0);
if(getSDRESP != 0) if(getSDRESP != 0)
{ {
ctx->ret[0] = (uint32_t)(sdmmc_read16(REG_SDRESP0) | (sdmmc_read16(REG_SDRESP1) << 16)); ctx->ret[0] = (u32)(sdmmc_read16(REG_SDRESP0) | (sdmmc_read16(REG_SDRESP1) << 16));
ctx->ret[1] = (uint32_t)(sdmmc_read16(REG_SDRESP2) | (sdmmc_read16(REG_SDRESP3) << 16)); ctx->ret[1] = (u32)(sdmmc_read16(REG_SDRESP2) | (sdmmc_read16(REG_SDRESP3) << 16));
ctx->ret[2] = (uint32_t)(sdmmc_read16(REG_SDRESP4) | (sdmmc_read16(REG_SDRESP5) << 16)); ctx->ret[2] = (u32)(sdmmc_read16(REG_SDRESP4) | (sdmmc_read16(REG_SDRESP5) << 16));
ctx->ret[3] = (uint32_t)(sdmmc_read16(REG_SDRESP6) | (sdmmc_read16(REG_SDRESP7) << 16)); ctx->ret[3] = (u32)(sdmmc_read16(REG_SDRESP6) | (sdmmc_read16(REG_SDRESP7) << 16));
} }
} }
int NO_INLINE sdmmc_sdcard_writesectors(uint32_t sector_no, uint32_t numsectors, const uint8_t *in) int __attribute__((noinline)) sdmmc_sdcard_writesectors(u32 sector_no, u32 numsectors, const u8 *in)
{ {
if(handelSD.isSDHC == 0) sector_no <<= 9; if(handleSD.isSDHC == 0) sector_no <<= 9;
inittarget(&handelSD); inittarget(&handleSD);
sdmmc_write16(REG_SDSTOP,0x100); sdmmc_write16(REG_SDSTOP, 0x100);
#ifdef DATA32_SUPPORT sdmmc_write16(REG_SDBLKCOUNT32, numsectors);
sdmmc_write16(REG_SDBLKCOUNT32,numsectors); sdmmc_write16(REG_SDBLKLEN32, 0x200);
sdmmc_write16(REG_SDBLKLEN32,0x200); sdmmc_write16(REG_SDBLKCOUNT, numsectors);
#endif handleSD.tData = in;
sdmmc_write16(REG_SDBLKCOUNT,numsectors); handleSD.size = numsectors << 9;
handelSD.tData = in; sdmmc_send_command(&handleSD, 0x52C19, sector_no);
handelSD.size = numsectors << 9; return geterror(&handleSD);
sdmmc_send_command(&handelSD,0x52C19,sector_no);
return geterror(&handelSD);
} }
int NO_INLINE sdmmc_sdcard_readsectors(uint32_t sector_no, uint32_t numsectors, uint8_t *out) int __attribute__((noinline)) sdmmc_sdcard_readsectors(u32 sector_no, u32 numsectors, u8 *out)
{ {
if(handelSD.isSDHC == 0) sector_no <<= 9; if(handleSD.isSDHC == 0) sector_no <<= 9;
inittarget(&handelSD); inittarget(&handleSD);
sdmmc_write16(REG_SDSTOP,0x100); sdmmc_write16(REG_SDSTOP, 0x100);
#ifdef DATA32_SUPPORT sdmmc_write16(REG_SDBLKCOUNT32, numsectors);
sdmmc_write16(REG_SDBLKCOUNT32,numsectors); sdmmc_write16(REG_SDBLKLEN32, 0x200);
sdmmc_write16(REG_SDBLKLEN32,0x200); sdmmc_write16(REG_SDBLKCOUNT, numsectors);
#endif handleSD.rData = out;
sdmmc_write16(REG_SDBLKCOUNT,numsectors); handleSD.size = numsectors << 9;
handelSD.rData = out; sdmmc_send_command(&handleSD, 0x33C12, sector_no);
handelSD.size = numsectors << 9; return geterror(&handleSD);
sdmmc_send_command(&handelSD,0x33C12,sector_no);
return geterror(&handelSD);
} }
int __attribute__((noinline)) sdmmc_nand_readsectors(u32 sector_no, u32 numsectors, u8 *out)
int NO_INLINE sdmmc_nand_readsectors(uint32_t sector_no, uint32_t numsectors, uint8_t *out)
{ {
if(handelNAND.isSDHC == 0) sector_no <<= 9; if(handleNAND.isSDHC == 0) sector_no <<= 9;
inittarget(&handelNAND); inittarget(&handleNAND);
sdmmc_write16(REG_SDSTOP,0x100); sdmmc_write16(REG_SDSTOP, 0x100);
#ifdef DATA32_SUPPORT sdmmc_write16(REG_SDBLKCOUNT32, numsectors);
sdmmc_write16(REG_SDBLKCOUNT32,numsectors); sdmmc_write16(REG_SDBLKLEN32, 0x200);
sdmmc_write16(REG_SDBLKLEN32,0x200); sdmmc_write16(REG_SDBLKCOUNT, numsectors);
#endif handleNAND.rData = out;
sdmmc_write16(REG_SDBLKCOUNT,numsectors); handleNAND.size = numsectors << 9;
handelNAND.rData = out; sdmmc_send_command(&handleNAND, 0x33C12, sector_no);
handelNAND.size = numsectors << 9; inittarget(&handleSD);
sdmmc_send_command(&handelNAND,0x33C12,sector_no); return geterror(&handleNAND);
return geterror(&handelNAND);
} }
int NO_INLINE sdmmc_nand_writesectors(uint32_t sector_no, uint32_t numsectors, const uint8_t *in) //experimental int __attribute__((noinline)) sdmmc_nand_writesectors(u32 sector_no, u32 numsectors, const u8 *in) //experimental
{ {
if(handelNAND.isSDHC == 0) sector_no <<= 9; if(handleNAND.isSDHC == 0) sector_no <<= 9;
inittarget(&handelNAND); inittarget(&handleNAND);
sdmmc_write16(REG_SDSTOP,0x100); sdmmc_write16(REG_SDSTOP, 0x100);
#ifdef DATA32_SUPPORT sdmmc_write16(REG_SDBLKCOUNT32, numsectors);
sdmmc_write16(REG_SDBLKCOUNT32,numsectors); sdmmc_write16(REG_SDBLKLEN32, 0x200);
sdmmc_write16(REG_SDBLKLEN32,0x200); sdmmc_write16(REG_SDBLKCOUNT, numsectors);
#endif handleNAND.tData = in;
sdmmc_write16(REG_SDBLKCOUNT,numsectors); handleNAND.size = numsectors << 9;
handelNAND.tData = in; sdmmc_send_command(&handleNAND, 0x52C19, sector_no);
handelNAND.size = numsectors << 9; inittarget(&handleSD);
sdmmc_send_command(&handelNAND,0x52C19,sector_no); return geterror(&handleNAND);
return geterror(&handelNAND);
} }
static uint32_t calcSDSize(uint8_t* csd, int type) static u32 calcSDSize(u8 *csd, int type)
{ {
uint32_t result = 0; u32 result = 0;
if(type == -1) type = csd[14] >> 6; if(type == -1) type = csd[14] >> 6;
switch(type) switch(type)
{ {
case 0: case 0:
{ {
uint32_t block_len=csd[9]&0xf; u32 block_len = csd[9] & 0xF;
block_len=1u<<block_len; block_len = 1u << block_len;
uint32_t mult=( uint32_t)((csd[4]>>7)|((csd[5]&3)<<1)); u32 mult = (u32)((csd[4] >> 7) | ((csd[5] & 3) << 1));
mult=1u<<(mult+2); mult = 1u << (mult + 2);
result=csd[8]&3; result = csd[8] & 3;
result=(result<<8)|csd[7]; result = (result << 8) | csd[7];
result=(result<<2)|(csd[6]>>6); result = (result << 2) | (csd[6] >> 6);
result=(result+1)*mult*block_len/512; result = (result + 1) * mult * block_len / 512;
} break;
break; }
case 1: case 1:
result=csd[7]&0x3f; result = csd[7] & 0x3F;
result=(result<<8)|csd[6]; result = (result << 8) | csd[6];
result=(result<<8)|csd[5]; result = (result << 8) | csd[5];
result=(result+1)*1024; result = (result + 1) * 1024;
break; break;
default: default:
break; //Do nothing otherwise FIXME perhaps return some error? break; //Do nothing otherwise FIXME perhaps return some error?
} }
return result; return result;
} }
void InitSD() static void InitSD()
{ {
//sdmmc_mask16(0x100,0x800,0); *(vu16 *)0x10006100 &= 0xF7FFu; //SDDATACTL32
//sdmmc_mask16(0x100,0x1000,0); *(vu16 *)0x10006100 &= 0xEFFFu; //SDDATACTL32
//sdmmc_mask16(0x100,0x0,0x402); *(vu16 *)0x10006100 |= 0x402u; //SDDATACTL32
//sdmmc_mask16(0xD8,0x22,0x2); *(vu16 *)0x100060D8 = (*(vu16 *)0x100060D8 & 0xFFDD) | 2;
//sdmmc_mask16(0x100,0x2,0); *(vu16 *)0x10006100 &= 0xFFFFu; //SDDATACTL32
//sdmmc_mask16(0xD8,0x22,0); *(vu16 *)0x100060D8 &= 0xFFDFu; //SDDATACTL
//sdmmc_write16(0x104,0); *(vu16 *)0x10006104 = 512; //SDBLKLEN32
//sdmmc_write16(0x108,1); *(vu16 *)0x10006108 = 1; //SDBLKCOUNT32
//sdmmc_mask16(REG_SDRESET,1,0); //not in new Version -- nintendo's code does this *(vu16 *)0x100060E0 &= 0xFFFEu; //SDRESET
//sdmmc_mask16(REG_SDRESET,0,1); //not in new Version -- nintendo's code does this *(vu16 *)0x100060E0 |= 1u; //SDRESET
//sdmmc_mask16(0x20,0,0x31D); *(vu16 *)0x10006020 |= TMIO_MASK_ALL; //SDIR_MASK0
//sdmmc_mask16(0x22,0,0x837F); *(vu16 *)0x10006022 |= TMIO_MASK_ALL>>16; //SDIR_MASK1
//sdmmc_mask16(0xFC,0,0xDB); *(vu16 *)0x100060FC |= 0xDBu; //SDCTL_RESERVED7
//sdmmc_mask16(0xFE,0,0xDB); *(vu16 *)0x100060FE |= 0xDBu; //SDCTL_RESERVED8
////sdmmc_write16(REG_SDCLKCTL,0x20); *(vu16 *)0x10006002 &= 0xFFFCu; //SDPORTSEL
////sdmmc_write16(REG_SDOPT,0x40EE); *(vu16 *)0x10006024 = 0x20;
////sdmmc_mask16(0x02,0x3,0); *(vu16 *)0x10006028 = 0x40EE;
//sdmmc_write16(REG_SDCLKCTL,0x40); *(vu16 *)0x10006002 &= 0xFFFCu; ////SDPORTSEL
//sdmmc_write16(REG_SDOPT,0x40EB); *(vu16 *)0x10006026 = 512; //SDBLKLEN
//sdmmc_mask16(0x02,0x3,0); *(vu16 *)0x10006008 = 0; //SDSTOP
//sdmmc_write16(REG_SDBLKLEN,0x200);
//sdmmc_write16(REG_SDSTOP,0);
*(volatile uint16_t*)0x10006100 &= 0xF7FFu; //SDDATACTL32
*(volatile uint16_t*)0x10006100 &= 0xEFFFu; //SDDATACTL32
#ifdef DATA32_SUPPORT
*(volatile uint16_t*)0x10006100 |= 0x402u; //SDDATACTL32
#else
*(volatile uint16_t*)0x10006100 |= 0x402u; //SDDATACTL32
#endif
*(volatile uint16_t*)0x100060D8 = (*(volatile uint16_t*)0x100060D8 & 0xFFDD) | 2;
#ifdef DATA32_SUPPORT
*(volatile uint16_t*)0x10006100 &= 0xFFFFu; //SDDATACTL32
*(volatile uint16_t*)0x100060D8 &= 0xFFDFu; //SDDATACTL
*(volatile uint16_t*)0x10006104 = 512; //SDBLKLEN32
#else
*(volatile uint16_t*)0x10006100 &= 0xFFFDu; //SDDATACTL32
*(volatile uint16_t*)0x100060D8 &= 0xFFDDu; //SDDATACTL
*(volatile uint16_t*)0x10006104 = 0; //SDBLKLEN32
#endif
*(volatile uint16_t*)0x10006108 = 1; //SDBLKCOUNT32
*(volatile uint16_t*)0x100060E0 &= 0xFFFEu; //SDRESET
*(volatile uint16_t*)0x100060E0 |= 1u; //SDRESET
*(volatile uint16_t*)0x10006020 |= TMIO_MASK_ALL; //SDIR_MASK0
*(volatile uint16_t*)0x10006022 |= TMIO_MASK_ALL>>16; //SDIR_MASK1
*(volatile uint16_t*)0x100060FC |= 0xDBu; //SDCTL_RESERVED7
*(volatile uint16_t*)0x100060FE |= 0xDBu; //SDCTL_RESERVED8
*(volatile uint16_t*)0x10006002 &= 0xFFFCu; //SDPORTSEL
#ifdef DATA32_SUPPORT
*(volatile uint16_t*)0x10006024 = 0x20;
*(volatile uint16_t*)0x10006028 = 0x40EE;
#else
*(volatile uint16_t*)0x10006024 = 0x40; //Nintendo sets this to 0x20
*(volatile uint16_t*)0x10006028 = 0x40EB; //Nintendo sets this to 0x40EE
#endif
*(volatile uint16_t*)0x10006002 &= 0xFFFCu; ////SDPORTSEL
*(volatile uint16_t*)0x10006026 = 512; //SDBLKLEN
*(volatile uint16_t*)0x10006008 = 0; //SDSTOP
} }
int Nand_Init() static int Nand_Init()
{ {
//NAND //NAND
handelNAND.isSDHC = 0; handleNAND.isSDHC = 0;
handelNAND.SDOPT = 0; handleNAND.SDOPT = 0;
handelNAND.res = 0; handleNAND.res = 0;
handelNAND.initarg = 1; handleNAND.initarg = 1;
handelNAND.clk = 0x80; handleNAND.clk = 0x80;
handelNAND.devicenumber = 1; handleNAND.devicenumber = 1;
inittarget(&handelNAND); inittarget(&handleNAND);
waitcycles(0xF000); waitcycles(0xF000);
sdmmc_send_command(&handelNAND,0,0); sdmmc_send_command(&handleNAND, 0, 0);
do do
{ {
do do
{ {
sdmmc_send_command(&handelNAND,0x10701,0x100000); sdmmc_send_command(&handleNAND, 0x10701, 0x100000);
} while ( !(handelNAND.error & 1) ); }
} while(!(handleNAND.error & 1));
while((handelNAND.ret[0] & 0x80000000) == 0); }
while((handleNAND.ret[0] & 0x80000000) == 0);
sdmmc_send_command(&handelNAND,0x10602,0x0); sdmmc_send_command(&handleNAND, 0x10602, 0x0);
if((handelNAND.error & 0x4))return -1; if((handleNAND.error & 0x4)) return -1;
sdmmc_send_command(&handelNAND,0x10403,handelNAND.initarg << 0x10); sdmmc_send_command(&handleNAND, 0x10403, handleNAND.initarg << 0x10);
if((handelNAND.error & 0x4))return -1; if((handleNAND.error & 0x4)) return -1;
sdmmc_send_command(&handelNAND,0x10609,handelNAND.initarg << 0x10); sdmmc_send_command(&handleNAND, 0x10609, handleNAND.initarg << 0x10);
if((handelNAND.error & 0x4))return -1; if((handleNAND.error & 0x4)) return -1;
handelNAND.total_size = calcSDSize((uint8_t*)&handelNAND.ret[0],0); handleNAND.total_size = calcSDSize((u8*)&handleNAND.ret[0], 0);
handelNAND.clk = 1; handleNAND.clk = 1;
setckl(1); setckl(1);
sdmmc_send_command(&handelNAND,0x10407,handelNAND.initarg << 0x10); sdmmc_send_command(&handleNAND, 0x10407, handleNAND.initarg << 0x10);
if((handelNAND.error & 0x4))return -1; if((handleNAND.error & 0x4)) return -1;
handelNAND.SDOPT = 1; handleNAND.SDOPT = 1;
sdmmc_send_command(&handelNAND,0x10506,0x3B70100); sdmmc_send_command(&handleNAND, 0x10506, 0x3B70100);
if((handelNAND.error & 0x4))return -1; if((handleNAND.error & 0x4)) return -1;
sdmmc_send_command(&handelNAND,0x10506,0x3B90100); sdmmc_send_command(&handleNAND, 0x10506, 0x3B90100);
if((handelNAND.error & 0x4))return -1; if((handleNAND.error & 0x4)) return -1;
sdmmc_send_command(&handelNAND,0x1040D,handelNAND.initarg << 0x10); sdmmc_send_command(&handleNAND, 0x1040D, handleNAND.initarg << 0x10);
if((handelNAND.error & 0x4))return -1; if((handleNAND.error & 0x4)) return -1;
sdmmc_send_command(&handelNAND,0x10410,0x200); sdmmc_send_command(&handleNAND, 0x10410, 0x200);
if((handelNAND.error & 0x4))return -1; if((handleNAND.error & 0x4)) return -1;
handelNAND.clk |= 0x200; handleNAND.clk |= 0x200;
inittarget(&handelSD); inittarget(&handleSD);
return 0; return 0;
} }
int SD_Init() static int SD_Init()
{ {
//SD //SD
handelSD.isSDHC = 0; handleSD.isSDHC = 0;
handelSD.SDOPT = 0; handleSD.SDOPT = 0;
handelSD.res = 0; handleSD.res = 0;
handelSD.initarg = 0; handleSD.initarg = 0;
handelSD.clk = 0x80; handleSD.clk = 0x80;
handelSD.devicenumber = 0; handleSD.devicenumber = 0;
inittarget(&handelSD); inittarget(&handleSD);
waitcycles(1u << 22); //Card needs a little bit of time to be detected, it seems FIXME test again to see what a good number is for the delay waitcycles(1u << 22); //Card needs a little bit of time to be detected, it seems FIXME test again to see what a good number is for the delay
//If not inserted //If not inserted
if (!(*((volatile uint16_t*)(SDMMC_BASE + REG_SDSTATUS0)) & TMIO_STAT0_SIGSTATE)) return 5; if(!(*((vu16 *)(SDMMC_BASE + REG_SDSTATUS0)) & TMIO_STAT0_SIGSTATE)) return 5;
sdmmc_send_command(&handelSD,0,0); sdmmc_send_command(&handleSD, 0, 0);
sdmmc_send_command(&handelSD,0x10408,0x1AA); sdmmc_send_command(&handleSD, 0x10408, 0x1AA);
uint32_t temp = (handelSD.error & 0x1) << 0x1E; u32 temp = (handleSD.error & 0x1) << 0x1E;
uint32_t temp2 = 0; u32 temp2 = 0;
do do
{ {
do do
{ {
sdmmc_send_command(&handelSD,0x10437,handelSD.initarg << 0x10); sdmmc_send_command(&handleSD, 0x10437, handleSD.initarg << 0x10);
sdmmc_send_command(&handelSD,0x10769,0x00FF8000 | temp); sdmmc_send_command(&handleSD, 0x10769, 0x00FF8000 | temp);
temp2 = 1; temp2 = 1;
} while ( !(handelSD.error & 1) ); }
} while(!(handleSD.error & 1));
while((handelSD.ret[0] & 0x80000000) == 0); }
while((handleSD.ret[0] & 0x80000000) == 0);
if(!((handelSD.ret[0] >> 30) & 1) || !temp) if(!((handleSD.ret[0] >> 30) & 1) || !temp)
temp2 = 0; temp2 = 0;
handelSD.isSDHC = temp2; handleSD.isSDHC = temp2;
sdmmc_send_command(&handelSD,0x10602,0); sdmmc_send_command(&handleSD, 0x10602, 0);
if((handelSD.error & 0x4)) return -1; if((handleSD.error & 0x4)) return -1;
sdmmc_send_command(&handelSD,0x10403,0); sdmmc_send_command(&handleSD, 0x10403, 0);
if((handelSD.error & 0x4)) return -2; if((handleSD.error & 0x4)) return -2;
handelSD.initarg = handelSD.ret[0] >> 0x10; handleSD.initarg = handleSD.ret[0] >> 0x10;
sdmmc_send_command(&handelSD,0x10609,handelSD.initarg << 0x10); sdmmc_send_command(&handleSD, 0x10609, handleSD.initarg << 0x10);
if((handelSD.error & 0x4)) return -3; if((handleSD.error & 0x4)) return -3;
handelSD.total_size = calcSDSize((uint8_t*)&handelSD.ret[0],-1); handleSD.total_size = calcSDSize((u8*)&handleSD.ret[0], -1);
handelSD.clk = 1; handleSD.clk = 1;
setckl(1); setckl(1);
sdmmc_send_command(&handelSD,0x10507,handelSD.initarg << 0x10); sdmmc_send_command(&handleSD, 0x10507, handleSD.initarg << 0x10);
if((handelSD.error & 0x4)) return -4; if((handleSD.error & 0x4)) return -4;
sdmmc_send_command(&handelSD,0x10437,handelSD.initarg << 0x10); sdmmc_send_command(&handleSD, 0x10437, handleSD.initarg << 0x10);
if((handelSD.error & 0x4)) return -5; if((handleSD.error & 0x4)) return -5;
handelSD.SDOPT = 1; handleSD.SDOPT = 1;
sdmmc_send_command(&handelSD,0x10446,0x2); sdmmc_send_command(&handleSD, 0x10446, 0x2);
if((handelSD.error & 0x4)) return -6; if((handleSD.error & 0x4)) return -6;
sdmmc_send_command(&handelSD,0x1040D,handelSD.initarg << 0x10); sdmmc_send_command(&handleSD, 0x1040D, handleSD.initarg << 0x10);
if((handelSD.error & 0x4)) return -7; if((handleSD.error & 0x4)) return -7;
sdmmc_send_command(&handelSD,0x10410,0x200); sdmmc_send_command(&handleSD, 0x10410, 0x200);
if((handelSD.error & 0x4)) return -8; if((handleSD.error & 0x4)) return -8;
handelSD.clk |= 0x200; handleSD.clk |= 0x200;
return 0; return 0;
} }
int sdmmc_get_cid(bool isNand, uint32_t *info) void sdmmc_get_cid(bool isNand, u32 *info)
{ {
struct mmcdevice *device; struct mmcdevice *device = isNand ? &handleNAND : &handleSD;
if(isNand)
device = &handelNAND;
else
device = &handelSD;
inittarget(device); inittarget(device);
// use cmd7 to put sd card in standby mode
// CMD7
{
sdmmc_send_command(device,0x10507,0);
//if((device->error & 0x4)) return -1;
}
// get sd card info // use cmd7 to put sd card in standby mode
// use cmd10 to read CID // CMD7
{ sdmmc_send_command(device, 0x10507, 0);
sdmmc_send_command(device,0x1060A,device->initarg << 0x10);
//if((device->error & 0x4)) return -2;
for( int i = 0; i < 4; ++i ) { // get sd card info
info[i] = device->ret[i]; // use cmd10 to read CID
} sdmmc_send_command(device, 0x1060A, device->initarg << 0x10);
}
// put sd card back to transfer mode for(int i = 0; i < 4; ++i)
// CMD7 info[i] = device->ret[i];
{
sdmmc_send_command(device,0x10507,device->initarg << 0x10);
//if((device->error & 0x4)) return -3;
}
return 0; // put sd card back to transfer mode
// CMD7
sdmmc_send_command(device, 0x10507, device->initarg << 0x10);
} }
int sdmmc_sdcard_init() u32 sdmmc_sdcard_init()
{ {
InitSD(); u32 ret = 0;
int nand_res = Nand_Init(); InitSD();
int sd_res = SD_Init(); if(Nand_Init() != 0) ret &= 1;
return nand_res | sd_res; if(SD_Init() != 0) ret &= 2;
} return ret;
}

View File

@ -1,50 +1,48 @@
#ifndef __SDMMC_H__ #pragma once
#define __SDMMC_H__
#include <stdint.h> #include "common.h"
#include <stdbool.h>
#define SDMMC_BASE 0x10006000 #define SDMMC_BASE 0x10006000
#define REG_SDCMD 0x00 #define REG_SDCMD 0x00
#define REG_SDPORTSEL 0x02 #define REG_SDPORTSEL 0x02
#define REG_SDCMDARG 0x04 #define REG_SDCMDARG 0x04
#define REG_SDCMDARG0 0x04 #define REG_SDCMDARG0 0x04
#define REG_SDCMDARG1 0x06 #define REG_SDCMDARG1 0x06
#define REG_SDSTOP 0x08 #define REG_SDSTOP 0x08
#define REG_SDBLKCOUNT 0x0a #define REG_SDBLKCOUNT 0x0A
#define REG_SDRESP0 0x0c #define REG_SDRESP0 0x0C
#define REG_SDRESP1 0x0e #define REG_SDRESP1 0x0E
#define REG_SDRESP2 0x10 #define REG_SDRESP2 0x10
#define REG_SDRESP3 0x12 #define REG_SDRESP3 0x12
#define REG_SDRESP4 0x14 #define REG_SDRESP4 0x14
#define REG_SDRESP5 0x16 #define REG_SDRESP5 0x16
#define REG_SDRESP6 0x18 #define REG_SDRESP6 0x18
#define REG_SDRESP7 0x1a #define REG_SDRESP7 0x1A
#define REG_SDSTATUS0 0x1c #define REG_SDSTATUS0 0x1C
#define REG_SDSTATUS1 0x1e #define REG_SDSTATUS1 0x1E
#define REG_SDIRMASK0 0x20 #define REG_SDIRMASK0 0x20
#define REG_SDIRMASK1 0x22 #define REG_SDIRMASK1 0x22
#define REG_SDCLKCTL 0x24 #define REG_SDCLKCTL 0x24
#define REG_SDBLKLEN 0x26 #define REG_SDBLKLEN 0x26
#define REG_SDOPT 0x28 #define REG_SDOPT 0x28
#define REG_SDFIFO 0x30 #define REG_SDFIFO 0x30
#define REG_DATACTL 0xd8 #define REG_DATACTL 0xD8
#define REG_SDRESET 0xe0 #define REG_SDRESET 0xE0
#define REG_SDPROTECTED 0xf6 //bit 0 determines if sd is protected or not? #define REG_SDPROTECTED 0xF6 //bit 0 determines if sd is protected or not?
#define REG_DATACTL32 0x100 #define REG_DATACTL32 0x100
#define REG_SDBLKLEN32 0x104 #define REG_SDBLKLEN32 0x104
#define REG_SDBLKCOUNT32 0x108 #define REG_SDBLKCOUNT32 0x108
#define REG_SDFIFO32 0x10C #define REG_SDFIFO32 0x10C
#define REG_CLK_AND_WAIT_CTL 0x138 #define REG_CLK_AND_WAIT_CTL 0x138
#define REG_RESET_SDIO 0x1e0 #define REG_RESET_SDIO 0x1E0
#define TMIO_STAT0_CMDRESPEND 0x0001 #define TMIO_STAT0_CMDRESPEND 0x0001
#define TMIO_STAT0_DATAEND 0x0004 #define TMIO_STAT0_DATAEND 0x0004
@ -68,94 +66,35 @@
#define TMIO_STAT1_CMD_BUSY 0x4000 #define TMIO_STAT1_CMD_BUSY 0x4000
#define TMIO_STAT1_ILL_ACCESS 0x8000 #define TMIO_STAT1_ILL_ACCESS 0x8000
#define TMIO_MASK_ALL 0x837f031d #define TMIO_MASK_ALL 0x837F031D
#define TMIO_MASK_GW (TMIO_STAT1_ILL_ACCESS | TMIO_STAT1_CMDTIMEOUT | TMIO_STAT1_TXUNDERRUN | TMIO_STAT1_RXOVERFLOW | \ #define TMIO_MASK_GW (TMIO_STAT1_ILL_ACCESS | TMIO_STAT1_CMDTIMEOUT | TMIO_STAT1_TXUNDERRUN | TMIO_STAT1_RXOVERFLOW | \
TMIO_STAT1_DATATIMEOUT | TMIO_STAT1_STOPBIT_ERR | TMIO_STAT1_CRCFAIL | TMIO_STAT1_CMD_IDX_ERR) TMIO_STAT1_DATATIMEOUT | TMIO_STAT1_STOPBIT_ERR | TMIO_STAT1_CRCFAIL | TMIO_STAT1_CMD_IDX_ERR)
#define TMIO_MASK_READOP (TMIO_STAT1_RXRDY | TMIO_STAT1_DATAEND) #define TMIO_MASK_READOP (TMIO_STAT1_RXRDY | TMIO_STAT1_DATAEND)
#define TMIO_MASK_WRITEOP (TMIO_STAT1_TXRQ | TMIO_STAT1_DATAEND) #define TMIO_MASK_WRITEOP (TMIO_STAT1_TXRQ | TMIO_STAT1_DATAEND)
#ifdef __cplusplus typedef struct mmcdevice {
extern "C" { u8 *rData;
#endif const u8 *tData;
u32 size;
u32 error;
u16 stat0;
u16 stat1;
u32 ret[4];
u32 initarg;
u32 isSDHC;
u32 clk;
u32 SDOPT;
u32 devicenumber;
u32 total_size; //size in sectors of the device
u32 res;
} mmcdevice;
typedef struct mmcdevice { u32 sdmmc_sdcard_init();
uint8_t* rData; int sdmmc_sdcard_readsectors(u32 sector_no, u32 numsectors, u8 *out);
const uint8_t* tData; int sdmmc_sdcard_writesectors(u32 sector_no, u32 numsectors, const u8 *in);
uint32_t size; int sdmmc_nand_readsectors(u32 sector_no, u32 numsectors, u8 *out);
uint32_t error; int sdmmc_nand_writesectors(u32 sector_no, u32 numsectors, const u8 *in);
uint16_t stat0; void sdmmc_get_cid(bool isNand, u32 *info);
uint16_t stat1; mmcdevice *getMMCDevice(int drive);
uint32_t ret[4];
uint32_t initarg;
uint32_t isSDHC;
uint32_t clk;
uint32_t SDOPT;
uint32_t devicenumber;
uint32_t total_size; //size in sectors of the device
uint32_t res;
} mmcdevice;
int sdmmc_sdcard_init();
int sdmmc_sdcard_readsector(uint32_t sector_no, uint8_t *out);
int sdmmc_sdcard_readsectors(uint32_t sector_no, uint32_t numsectors, uint8_t *out);
int sdmmc_sdcard_writesector(uint32_t sector_no, const uint8_t *in);
int sdmmc_sdcard_writesectors(uint32_t sector_no, uint32_t numsectors, const uint8_t *in);
int sdmmc_nand_readsectors(uint32_t sector_no, uint32_t numsectors, uint8_t *out);
int sdmmc_nand_writesectors(uint32_t sector_no, uint32_t numsectors, const uint8_t *in);
int sdmmc_get_cid(bool isNand, uint32_t *info);
mmcdevice *getMMCDevice(int drive);
void InitSD();
int Nand_Init();
int SD_Init();
#ifdef __cplusplus
};
#endif
//---------------------------------------------------------------------------------
static inline uint16_t sdmmc_read16(uint16_t reg) {
//---------------------------------------------------------------------------------
return *(volatile uint16_t*)(SDMMC_BASE + reg);
}
//---------------------------------------------------------------------------------
static inline void sdmmc_write16(uint16_t reg, uint16_t val) {
//---------------------------------------------------------------------------------
*(volatile uint16_t*)(SDMMC_BASE + reg) = val;
}
//---------------------------------------------------------------------------------
static inline uint32_t sdmmc_read32(uint16_t reg) {
//---------------------------------------------------------------------------------
return *(volatile uint32_t*)(SDMMC_BASE + reg);
}
//---------------------------------------------------------------------------------
static inline void sdmmc_write32(uint16_t reg, uint32_t val) {
//---------------------------------------------------------------------------------
*(volatile uint32_t*)(SDMMC_BASE + reg) = val;
}
//---------------------------------------------------------------------------------
static inline void sdmmc_mask16(uint16_t reg, const uint16_t clear, const uint16_t set) {
//---------------------------------------------------------------------------------
uint16_t val = sdmmc_read16(reg);
val &= ~clear;
val |= set;
sdmmc_write16(reg, val);
}
static inline void setckl(uint32_t data)
{
sdmmc_mask16(REG_SDCLKCTL,0x100,0);
sdmmc_mask16(REG_SDCLKCTL,0x2FF,data&0x2FF);
sdmmc_mask16(REG_SDCLKCTL,0x0,0x100);
}
#endif