193 lines
4.8 KiB
Plaintext
193 lines
4.8 KiB
Plaintext
; @Title: Arria 10 SD/MMC FLASH Program script
|
|
;
|
|
; @Description:
|
|
; SD(HC)CARD is connected to
|
|
; SRAM: 0xFFE00000
|
|
; SD/MMC(controller) Regisetr Base: 0xff808000
|
|
;
|
|
; @Author: jjeong
|
|
; @Copyright: (C) 1989-2022 Lauterbach GmbH, licensed for use with TRACE32(R) only
|
|
; @Chip: arria*
|
|
; @Keywords: altera Flash MMC SD
|
|
; $Id: arria10-sdmmc.cmm 10516 2022-02-02 11:39:30Z bschroefel $
|
|
;
|
|
;Please check BSEL[2:0]
|
|
;The boot select field specifies the boot source. It is read by the Boot ROM code on a cold or warm reset to determine the boot source.
|
|
;The HPS BSEL pins value are sampled upon deassertion of cold reset.
|
|
;Value Description
|
|
;0x0 Reserved
|
|
;0x1 FPGA (HPS2FPGA Bridge)
|
|
;0x2 NAND Flash (1.8v)
|
|
;0x3 NAND Flash (3.0v)
|
|
;0x4 SD/MMC External Transceiver (1.8v)
|
|
;0x5 SD/MMC Internal Transceiver (3.0v)
|
|
;0x6 QSPI Flash (1.8v)
|
|
;0x7 QSPI Flash (3.0v)
|
|
|
|
WinCLEAR
|
|
AREA.view
|
|
|
|
&MMC_BASE=0xff808000
|
|
|
|
LOCAL &arg1
|
|
ENTRY &arg1
|
|
&arg1=STRing.UPpeR("&arg1") // for example "PREPAREONLY"
|
|
|
|
RESet
|
|
SYStem.RESet
|
|
SYStem.CPU ARRIA10SOC
|
|
SYStem.CONFIG.DAPIRPOST 10.
|
|
SYStem.CONFIG.DAPDRPOST 1.
|
|
SYStem.Option ResBreak OFF
|
|
CORE.ASSIGN 1.
|
|
SYStem.Up
|
|
; reset again - TrOnchip.Set RESET ON will cause stop at "real" Reset Vector
|
|
SYStem.Up
|
|
|
|
; preboot - bootrom
|
|
Go.direct 0xffe00054 /Onchip
|
|
WAIT !STATE.RUN() 1.s
|
|
IF STATE.RUN()
|
|
Break.direct
|
|
|
|
Data.Set C15:0x1 %Long (Data.Long(C15:0x1)&~(0x1005)) ; disable interrupt and mmu
|
|
|
|
;Data.Set A:0xFFD04000 %Long 0x301 ; I_CLK_MGR, clk change to the external oscclk from the boot clk
|
|
|
|
; disable Watchdog0/1
|
|
Data.Set A:0xFFD05028 %Long Data.Long(A:0xFFD05028)|0x3
|
|
|
|
Data.Set ZSD:0xFF808014 %LE %Long 0xFFFFFFFF
|
|
Data.Set ZSD:0xFF808024 %LE %Long 0xFFFF
|
|
Data.Set ZSD:0xFF80801C %LE %Long 0x200
|
|
Data.Set ZSD:0xFF808020 %LE %Long 0x200
|
|
Data.Set ZSD:0xFF808008 %LE %Long 0x10
|
|
Data.Set ZSD:0xFF808010 %LE %Long 0x1
|
|
|
|
Data.Set ZSD:0xFF808000 %LE %Long 0x17 ;reset all then enable
|
|
|
|
//clk enableing
|
|
Data.Set 0xFF808008 %Long 0x10 ;clk divider , make <400KHz
|
|
Data.Set 0xFF80802C %Long 0x80202000 ;update clk
|
|
Data.Set 0xFF808044 %LE %Long 0xFFFFFFFF ;clear status
|
|
|
|
GOSUB READ_ID_TEST
|
|
|
|
FLASHFILE.RESet
|
|
//FLASHFILE.CONFIG <sdmmc base>
|
|
FLASHFILE.CONFIG 0xff808000
|
|
FLASHFILE.TARGET AZSD:0xffe00000++0x1FFF AZSD:0xffe02000++0x1FFF ~~/demo/arm/flash/byte/emmcsd_dw.bin /KEEP
|
|
|
|
FLASHFILE.GETID
|
|
|
|
PER.Set.simple AD:0xFF808008 %Long 0x0 ;clk divider, make a full clock speed of the sdmmc
|
|
PER.Set.simple AD:0xFF80802C %Long 0x80200000 ;update clk
|
|
|
|
//End of the test prepareonly
|
|
IF "&arg1"=="PREPAREONLY"
|
|
ENDDO
|
|
|
|
FLASHFILE.DUMP 0x0 ; Read eMMC
|
|
|
|
;FLASHFILE.ERASE 0x0--0xFFFFF ; Erase eMMC
|
|
|
|
;FLASHFILE.LOAD * 0x0 ; Write eMMC
|
|
|
|
ENDDO
|
|
|
|
|
|
|
|
READ_ID_TEST:
|
|
//SD(HC) interface, not MMC
|
|
//CMD0, reset
|
|
|
|
RePeaT 4.
|
|
(
|
|
Data.Set &MMC_BASE+0x44 %LE %Long 0xFFFFFFFF ;clear status
|
|
Data.Set &MMC_BASE+0x28 %Long 0x0 ;arg
|
|
Data.Set &MMC_BASE+0x2c %Long 0xA000A000 ;cmd
|
|
WAIT 10.ms
|
|
)
|
|
|
|
//CMD8, is madatory to intialize High Capacity SD Memory Card
|
|
RePeaT 2.
|
|
(
|
|
Data.Set &MMC_BASE+0x44 %LE %Long 0xFFFFFFFF ;clear status
|
|
Data.Set &MMC_BASE+0x28 %Long 0x1AA ;arg
|
|
Data.Set &MMC_BASE+0x2c %Long 0xA0002148 ;cmd
|
|
WAIT 10.ms
|
|
|
|
&status=Data.Long(A:(&MMC_BASE+0x44))
|
|
IF (&status&0x4)==0x4
|
|
(
|
|
PRINT "passed CMD8(voltage check)"
|
|
GOTO jump_cmd55
|
|
)
|
|
ELSE
|
|
(
|
|
//CMD0
|
|
Data.Set &MMC_BASE+0x44 %LE %Long 0xFFFFFFFF ;clear status
|
|
Data.Set &MMC_BASE+0x28 %Long 0x0 ;arg
|
|
Data.Set &MMC_BASE+0x2c %Long 0x0 ;cmd
|
|
WAIT 10.ms
|
|
)
|
|
)
|
|
|
|
jump_cmd55:
|
|
//CMD55
|
|
RePeaT 10.
|
|
(
|
|
Data.Set &MMC_BASE+0x44 %LE %Long 0xFFFFFFFF ;clear status
|
|
Data.Set &MMC_BASE+0x28 %Long 0x0 ;arg
|
|
Data.Set &MMC_BASE+0x2c %Long 0xA0002177 ;cmd55, resp1
|
|
WAIT 100.ms
|
|
|
|
//ACMD41
|
|
Data.Set &MMC_BASE+0x44 %LE %Long 0xFFFFFFFF ;clear status
|
|
Data.Set &MMC_BASE+0x28 %Long 0x40FF8000 ;arg
|
|
Data.Set &MMC_BASE+0x2c %Long 0xA0002069; cmd41, resp1
|
|
WAIT 100.ms
|
|
|
|
&resp=Data.Long(A:(&MMC_BASE+0x30))
|
|
//print "CMD1 resp: 0x" &resp
|
|
IF (&resp&0x80000000)==0x80000000
|
|
(
|
|
GOTO jump_cmd2
|
|
)
|
|
)
|
|
|
|
PRINT "CMD1 fail"
|
|
END
|
|
|
|
jump_cmd2:
|
|
//CMD2
|
|
Data.Set &MMC_BASE+0x44 %LE %Long 0xFFFFFFFF ;clear status
|
|
Data.Set &MMC_BASE+0x28 %Long 0x0 ;arg
|
|
Data.Set &MMC_BASE+0x2c %Long 0xA00021C2 ;cmd2
|
|
WAIT 10.ms
|
|
|
|
//CMD3
|
|
Data.Set &MMC_BASE+0x44 %LE %Long 0xFFFFFFFF ;clear status
|
|
Data.Set &MMC_BASE+0x28 %Long 0x00070000 ; arg, MMC RCA is (0x0001<<16.)
|
|
Data.Set &MMC_BASE+0x2c %Long 0x20002143 ;cmd3
|
|
WAIT 10.ms
|
|
|
|
&cardaddress=Data.Long(A:(&MMC_BASE+0x30))
|
|
&cardaddress=&cardaddress&0xFFFF0000
|
|
|
|
|
|
//CMD10
|
|
Data.Set &MMC_BASE+0x44 %LE %Long 0xFFFFFFFF ;clear status
|
|
Data.Set &MMC_BASE+0x28 %Long &cardaddress ; arg, card address
|
|
Data.Set &MMC_BASE+0x2c %Long 0xA00021CA ;cmd10
|
|
WAIT 10.ms
|
|
|
|
//Response2
|
|
PRINT "CID register"
|
|
PRINT "[127:104] 0x" Data.Long(A:(&MMC_BASE+0x3c))
|
|
PRINT "[103:72] 0x" Data.Long(A:(&MMC_BASE+0x38))
|
|
PRINT "[71:40] 0x" Data.Long(A:(&MMC_BASE+0x34))
|
|
PRINT "[39:8] 0x" Data.Long(A:(&MMC_BASE+0x30))
|
|
|
|
RETURN
|