; --------------------------------------------------------------------------------
; @Title: BCM4708x NAND FLASH Programming Script
; @Description:
; NAND FLASH (SAMSUNG, K9F8G08) is connected to the CS0
;
; SDRAM    : 0x100000
; NAND FLASH Controller Addr: 0x18028000
;
; @Author: jjeong
; @Copyright: (C) 1989-2022 Lauterbach GmbH, licensed for use with TRACE32(R) only
; @Chip: BCM47081
; @Keywords: SAMSUNG K9F8G08 FLASH NAND
; --------------------------------------------------------------------------------
; $Id: bcm47081-nand8g08.cmm 10516 2022-02-02 11:39:30Z bschroefel $

LOCAL &arg1
ENTRY &arg1
&arg1=STRing.UPpeR("&arg1")  // for example "PREPAREONLY"


SYStem.CPU BCM47081

SYStem.Mode.Attach

IF STATE.RUN()
Break.direct

PER.Set.simple C15:0x1 %Long 00C5287A

Data.Set ZSD:0x1811a800 %LE %Long 0x1 ; NAND_IDM_IDM_RESET_CONTROL enter reset
Data.Set ZSD:0x1811a800 %LE %Long 0x0 ; NAND_IDM_IDM_RESET_CONTROL exit reset

Data.Set ZSD:0x18028050 %LE %Long 0xD7080010   ;NAND_nand_flash_ACC_CONTROL_CS0
Data.Set ZSD:0x18028054 %LE %Long 0x37252300   ;NAND_nand_flash_CONFIG_CS0
Data.Set ZSD:0x18028058 %LE %Long 0x7695a56d   ;NAND_nand_flash_TIMING_1_CS0
Data.Set ZSD:0x1802805C %LE %Long 0x00001eb7   ;NAND_nand_flash_TIMING_2_CS0

Data.Set ZSD:0x18028018 %LE %Long 0x00000101   ;NAND_nand_flash_CS_NAND_SELECT , make the WP is high
Data.Set ZSD:0x1802801C %LE %Long 0x00000001   ;NAND_nand_flash_CS_NAND_XOR

//FLASH READ ID TEST
AREA.CLEAR
AREA.view
GOSUB READ_ID_TEST
DIALOG.YESNO "the flash id is correct on AREA window?"
ENTRY &result
IF !&result
(
PRINT "pls, check your register configuration to enable your flash controller"
ENDDO
)

//S(D)RAM TEST for algorithm file
GOSUB SDRAM_INIT
Data.Test 0x100000++0x7FFF  /Prime ;s(d)ram test
IF FOUND()
(
PRINT "s(d)ram is NOT initialized around 0x" ADDRESS.OFFSET(TRACK.ADDRESS())
ENDDO
)

programFlash:

  Break.RESet

  FLASHFILE.RESet

//FLASHFILE.CONFIG <NAND Controller address >
  FLASHFILE.CONFIG   0x18028000       0x0        0x0

//FLASHFILE.TARGET <Code Range>         <Data Range>        <Algorithm File>
  FLASHFILE.TARGET    0x100000++0x3FFF  0x104000++0x41FF     ~~/demo/arm/flash/byte/nand8g08_bcm5334x.bin


  FLASHFILE.GETID

//End of the test prepareonly
IF "&arg1"=="PREPAREONLY"
ENDDO


  FLASHFILE.DUMP 0x0                             ; Read NAND

 ;FLASHFILE.ERASE 0x0--0xFFFFF  /EraseBadBlock   ; Erase NAND

 ;FLASHFILE.LOAD * 0x0                           ; Write NAND

 ;FLASHFILE.DUMP 0x0   /spare                    ; Read NAND spare area

ENDDO

READ_ID_TEST:

LOCAL &CMD
LOCAL &ADDR
LOCAL &DATA

&CMD=0x18028004
&ADDR=0x18028004
&DATA=0x18028400

Data.Set &ADDR %Long 0x00
Data.Set &CMD  %Long 0x07<<24.

PRINT "Manufacture ID : 0x" (Data.Long(D:0x18028194)>>24.)&0xFF
PRINT "Device ID : 0x" (Data.Long(D:0x18028194)>>16.)&0xFF
PRINT "3rd : 0x" (Data.Long(D:0x18028194)>>8.)&0xFF
PRINT "4th : 0x" (Data.Long(D:0x18028194))&0xFF

RETURN


//ddr3_init_tab_1333
SDRAM_INIT:

Data.Set 0x18108408 %LE %Long 0x3
Data.Set 0x18108800 %LE %Long 0x0
Data.Set 0x18108408 %LE %Long 0x1
Data.Set 0x18109408 %LE %Long 0x3
Data.Set 0x18109800 %LE %Long 0x0
Data.Set 0x18109408 %LE %Long 0x1
Data.Set 0x18108408 %LE %Long 0x1900001
//print "DDR PHY is up"
Data.Set 0x18010814 %LE %Long 0x10
//print "DDR PHY is locked"
Data.Set 0x18010b60 %LE %Long 0x2
Data.Set 0x18010bac %LE %Long 0x3
Data.Set 0x1801083c %LE %Long 0x100000
Data.Set 0x18010848 %LE %Long 0x101
Data.Set 0x18010848 %LE %Long 0x8000101
Data.Set 0x18010038 %LE %Long 0x5051001
Data.Set 0x1801003c %LE %Long 0xa0a05
Data.Set 0x18010090 %LE %Long 0x1000000
Data.Set 0x18010094 %LE %Long 0x10000000
Data.Set 0x18010098 %LE %Long 0x100400
Data.Set 0x1801009c %LE %Long 0x400
Data.Set 0x180100a0 %LE %Long 0x100
Data.Set 0x180100a8 %LE %Long 0x1
Data.Set 0x180100f4 %LE %Long 0x10100
Data.Set 0x18010138 %LE %Long 0x1000200
Data.Set 0x1801013c %LE %Long 0x2000040
Data.Set 0x18010140 %LE %Long 0x400100
Data.Set 0x18010144 %LE %Long 0x200
Data.Set 0x1801014c %LE %Long 0x1ffff0a
Data.Set 0x18010150 %LE %Long 0x1010101
Data.Set 0x18010154 %LE %Long 0x3010101
Data.Set 0x18010158 %LE %Long 0x1000003
Data.Set 0x1801015c %LE %Long 0x10c
Data.Set 0x18010160 %LE %Long 0x10000
Data.Set 0x180101c0 %LE %Long 0x200
Data.Set 0x180101d0 %LE %Long 0x19000000
Data.Set 0x180101d4 %LE %Long 0x28
Data.Set 0x180101dc %LE %Long 0x10001
Data.Set 0x180101e0 %LE %Long 0x10001
Data.Set 0x180101e4 %LE %Long 0x10001
Data.Set 0x180101e8 %LE %Long 0x10001
Data.Set 0x180101ec %LE %Long 0x10001
Data.Set 0x18010208 %LE %Long 0x1
Data.Set 0x1801022c %LE %Long 0x1
Data.Set 0x18010250 %LE %Long 0xffff0001
Data.Set 0x18010254 %LE %Long 0xffff00
Data.Set 0x18010258 %LE %Long 0xffff
Data.Set 0x18010260 %LE %Long 0x3030303
Data.Set 0x18010264 %LE %Long 0x3030303
Data.Set 0x18010270 %LE %Long 0x2006400
Data.Set 0x18010274 %LE %Long 0x2020202
Data.Set 0x18010278 %LE %Long 0x2020202
Data.Set 0x18010280 %LE %Long 0x1020202
Data.Set 0x18010284 %LE %Long 0x1010064
Data.Set 0x18010288 %LE %Long 0x1010101
Data.Set 0x1801028c %LE %Long 0x1010101
Data.Set 0x18010294 %LE %Long 0x20101
Data.Set 0x18010298 %LE %Long 0x64
Data.Set 0x180102a0 %LE %Long 0xa0a00
Data.Set 0x180102a8 %LE %Long 0x2000200
Data.Set 0x180102ac %LE %Long 0x2000200
Data.Set 0x180102bc %LE %Long 0x2000200
Data.Set 0x180102c0 %LE %Long 0x2000200
Data.Set 0x180102d0 %LE %Long 0x80000100
Data.Set 0x180102d4 %LE %Long 0x4070303
Data.Set 0x180102d8 %LE %Long 0xa
Data.Set 0x180102e4 %LE %Long 0x10ffff
Data.Set 0x180102ec %LE %Long 0xf
Data.Set 0x18010308 %LE %Long 0x204
Data.Set 0x18010334 %LE %Long 0x40
Data.Set 0x18010000 %LE %Long 0x600
Data.Set 0x1801000c %LE %Long 0x1046b
Data.Set 0x18010010 %LE %Long 0x28b0b
Data.Set 0x18010014 %LE %Long 0xc050c00
Data.Set 0x18010018 %LE %Long 0x4040405
Data.Set 0x1801001c %LE %Long 0x5040e14
Data.Set 0x18010020 %LE %Long 0x40e1404
Data.Set 0x18010024 %LE %Long 0xc040405
Data.Set 0x18010028 %LE %Long 0x3005b68
Data.Set 0x1801002c %LE %Long 0xc040404
Data.Set 0x18010030 %LE %Long 0x3005b68
Data.Set 0x18010034 %LE %Long 0x1000004
Data.Set 0x18010040 %LE %Long 0x3000200
Data.Set 0x18010044 %LE %Long 0xf0f
Data.Set 0x18010048 %LE %Long 0x5050000
Data.Set 0x18010050 %LE %Long 0x7801
Data.Set 0x18010054 %LE %Long 0x780a20
Data.Set 0x18010058 %LE %Long 0x50a20
Data.Set 0x1801005c %LE %Long 0x300
Data.Set 0x18010060 %LE %Long 0xa0003
Data.Set 0x18010064 %LE %Long 0xa
Data.Set 0x1801006c %LE %Long 0x2000000
Data.Set 0x18010070 %LE %Long 0x200005a
Data.Set 0x18010074 %LE %Long 0x5a
Data.Set 0x18010078 %LE %Long 0x5000001
Data.Set 0x1801007c %LE %Long 0x50505
Data.Set 0x180100b0 %LE %Long 0x22000
Data.Set 0x180100b4 %LE %Long 0x46
Data.Set 0x180100b8 %LE %Long 0x460210
Data.Set 0x180100c0 %LE %Long 0x2100000
Data.Set 0x180100c4 %LE %Long 0x46
Data.Set 0x180100c8 %LE %Long 0x460210
Data.Set 0x180100d0 %LE %Long 0x2100000
Data.Set 0x180100d4 %LE %Long 0x46
Data.Set 0x180100d8 %LE %Long 0x460210
Data.Set 0x180100e0 %LE %Long 0x2100000
Data.Set 0x180100e4 %LE %Long 0x46
Data.Set 0x180100e8 %LE %Long 0x460210
Data.Set 0x18010148 %LE %Long 0x1010001
Data.Set 0x180101b0 %LE %Long 0x2040108
Data.Set 0x180101b4 %LE %Long 0x8010402
Data.Set 0x180101b8 %LE %Long 0x2020202
Data.Set 0x180101bc %LE %Long 0x1000201
Data.Set 0x18010200 %LE %Long 0x212100
Data.Set 0x18010204 %LE %Long 0x21210001
Data.Set 0x18010214 %LE %Long 0x12121
Data.Set 0x18010218 %LE %Long 0x12121
Data.Set 0x18010224 %LE %Long 0x212100
Data.Set 0x18010228 %LE %Long 0x21210001
Data.Set 0x18010238 %LE %Long 0x12121
Data.Set 0x1801023c %LE %Long 0x12121
Data.Set 0x18010248 %LE %Long 0x212100
Data.Set 0x1801024c %LE %Long 0x21210001
Data.Set 0x180102a4 %LE %Long 0xa200000
Data.Set 0x180102b0 %LE %Long 0xa20
Data.Set 0x180102b4 %LE %Long 0x32a0
Data.Set 0x180102b8 %LE %Long 0xa200505
Data.Set 0x180102c4 %LE %Long 0xa20
Data.Set 0x180102c8 %LE %Long 0x32a0
Data.Set 0x180102cc %LE %Long 0x2020505
Data.Set 0x180102e8 %LE %Long 0x16070303
Data.Set 0x18010328 %LE %Long 0x4
Data.Set 0x1801032c %LE %Long 0x4
Data.Set 0x18010338 %LE %Long 0x1040401
Data.Set 0x1801033c %LE %Long 0x1
Data.Set 0x18010148 %LE %Long 0x1000001
Data.Set 0x18010014 %LE %Long 0xc050c00
Data.Set 0x18010018 %LE %Long 0x4040405
Data.Set 0x180102b8 %LE %Long 0xa200505
Data.Set 0x180100b0 %LE %Long 0x26000
Data.Set 0x180102e8 %LE %Long 0x16070303
Data.Set 0x180100b0 %LE %Long 0x22000
Data.Set 0x180100b4 %LE %Long 0x46
Data.Set 0x18010338 %LE %Long 0x1040401
Data.Set 0x18010000 %LE %Long 0x20410601
//print "DDR initialized, 128 MBytes"

RETURN