; --------------------------------------------------------------------------------
; @Title: TMS470PSF261 internal flash setup
;
; @Description: 
; Script arguments:
;
;   DO tms470psf261 [PREPAREONLY]
;
;     PREPAREONLY only declares flash but does not execute flash programming
;
; Example:
;  
;   DO ~~/demo/arm/flash/tms470psf261 PREPAREONLY
;
; internal flash is mapped to: 0x00000000
; internal RAM is mapped to:   0x08000000
;
; @Author: WRD
; @Copyright: (C) 1989-2019 Lauterbach GmbH, licensed for use with TRACE32(R) only
; --------------------------------------------------------------------------------
; $Rev: 7602 $
; $Id: tms470psf261.cmm 7602 2019-11-05 15:02:25Z bschroefel $

  LOCAL &parameters
  ENTRY %LINE &parameters

  LOCAL &param_prepareonly
  &param_prepareonly=(STRing.SCAN(STRing.UPpeR("&parameters"),"PREPAREONLY",0)!=-1)

  ; --------------------------------------------------------------------------------
  ; Init script variables

  DO ~~~~/tms470-func Init

  ; --------------------------------------------------------------------------------
  ; Setup CPU

  ON ERROR NOTHING

  IF SYStem.MODE()<5
  (
    SYStem.RESet
    SYStem.CPU TMS470PSF261
    SYStem.Option.BigEndian ON
    SYStem.Up
  )

  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ; Config for TMS470PSF261 REV 0
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ; actual device ID is 0x00106B05
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ;Device ID: 0x0008         TMS470PSF261
  ;  ProgVersion: 0.08 ; Library Version
  ;  ProgRoutines: pf035a.lib ; Platform library archive
  LOCAL &ProgRoutines
  &ProgRoutines="pf035a"

  ;  Frequency: 40.0 Range: 10.0 - 40.0
  ;  Minor Revisions: 1
  ;    0 "TMS470PSF261 Rev 0"
  ;  Ram Config: 0x08000000 0x00004000 ; 16KB
  LOCAL &RamStart &RamSize
  &RamStart=0x08000000 
  &RamSize=0x00004000 

  ;  Initialization: 9
  ;    0xfff87008: 0x00000005 ; disable flash parity
  ;    0xfffff538: 0x00000005 ; reset ESM
  ;    0xffffffd0: 0x01010000 ; Disable peripherals
  ;    0xffffffd0: 0x01010100 ; Enable peripherals
  ;    0xffffffc0: 0x00000000 ; Set RAM wait states to 0
  ;    0xfff87000: 0x00000000 ; disable pipeline mode and RWAIT=0
  ;    0xfff87040: 0x00000003 ; force active mode for bank 0
  ;    0xffffffc4: 0x0000000a ; MEMSW='1010' => Flash at 0x00000000, RAM at 0x08000000)
  ;    0xfffff900: 0x00000005 ; Switch off RAM ECC
  Data.Set 0xfff87008 %Long 0x00000005 ; disable flash parity
  Data.Set 0xfffff538 %Long 0x00000005 ; reset ESM
  Data.Set 0xffffffd0 %Long 0x01010000 ; Disable peripherals
  Data.Set 0xffffffd0 %Long 0x01010100 ; Enable peripherals
  Data.Set 0xffffffc0 %Long 0x00000000 ; Set RAM wait states to 0
  Data.Set 0xfff87000 %Long 0x00000000 ; disable pipeline mode and RWAIT=0
  Data.Set 0xfff87040 %Long 0x00000003 ; force active mode for bank 0
  Data.Set 0xffffffc4 %Long 0x0000000a ; MEMSW='1010' => Flash at 0x00000000, RAM at 0x08000000)
  Data.Set 0xfffff900 %Long 0x00000005 ; Switch off RAM ECC
  
  ;  PLL Config: 0xffffff70 0x21046300 0xffbfffff 0xffffff74 0x3FC0063D 0xffffffff ; configure 40Mhz (assuming 16.0 Mhz OSCIN)
  Data.Set 0xffffff70 %Long 0x21046300|(Data.Long(SD:0xffffff70)&~0xffbfffff) 
  Data.Set 0xffffff74 %Long 0x3FC0063D|(Data.Long(SD:0xffffff74)&~0xffffffff) 
  LOCAL &FlashClock_Frequency
  &FlashClock_Frequency="40MHz"      ; Setup flash clock frequency to PLL frequency
  
  ;  Engr ID: 0xfff87000 0x00604000
  ;  Number of Blocks: 20
  FLASH.RESet
  &FlashType="FLASHPAR"

  DO ~~~~/tms470-func DeclareSector Type: FLASH     Start: 0x00000000  Length: 0x00004000  Control: 0xfff87000  Core: 0x00  Sector: 0x00
  DO ~~~~/tms470-func DeclareSector Type: FLASH     Start: 0x00004000  Length: 0x00004000  Control: 0xfff87000  Core: 0x00  Sector: 0x01
  DO ~~~~/tms470-func DeclareSector Type: FLASH     Start: 0x00008000  Length: 0x00008000  Control: 0xfff87000  Core: 0x00  Sector: 0x02
  DO ~~~~/tms470-func DeclareSector Type: FLASH     Start: 0x00010000  Length: 0x00008000  Control: 0xfff87000  Core: 0x00  Sector: 0x03
  DO ~~~~/tms470-func DeclareSector Type: FLASH     Start: 0x00018000  Length: 0x00002000  Control: 0xfff87000  Core: 0x00  Sector: 0x04
  DO ~~~~/tms470-func DeclareSector Type: FLASH     Start: 0x0001A000  Length: 0x00002000  Control: 0xfff87000  Core: 0x00  Sector: 0x05
  DO ~~~~/tms470-func DeclareSector Type: FLASH     Start: 0x0001C000  Length: 0x00004000  Control: 0xfff87000  Core: 0x00  Sector: 0x06
  DO ~~~~/tms470-func DeclareSector Type: FLASH     Start: 0x00020000  Length: 0x00010000  Control: 0xfff87000  Core: 0x00  Sector: 0x07
  DO ~~~~/tms470-func DeclareSector Type: FLASH     Start: 0x00030000  Length: 0x00010000  Control: 0xfff87000  Core: 0x00  Sector: 0x08
  DO ~~~~/tms470-func DeclareSector Type: OTP       Start: 0x00600000  Length: 0x00000800  Control: 0xfff87000  Core: 0x00  Sector: 0x00
  DO ~~~~/tms470-func DeclareSector Type: FLASHPAR  Start: 0x00400000  Length: 0x00002000  Control: 0xfff87000  Core: 0x00  Sector: 0x00
  DO ~~~~/tms470-func DeclareSector Type: FLASHPAR  Start: 0x00402000  Length: 0x00002000  Control: 0xfff87000  Core: 0x00  Sector: 0x01
  DO ~~~~/tms470-func DeclareSector Type: FLASHPAR  Start: 0x00404000  Length: 0x00004000  Control: 0xfff87000  Core: 0x00  Sector: 0x02
  DO ~~~~/tms470-func DeclareSector Type: FLASHPAR  Start: 0x00408000  Length: 0x00004000  Control: 0xfff87000  Core: 0x00  Sector: 0x03
  DO ~~~~/tms470-func DeclareSector Type: FLASHPAR  Start: 0x0040C000  Length: 0x00001000  Control: 0xfff87000  Core: 0x00  Sector: 0x04
  DO ~~~~/tms470-func DeclareSector Type: FLASHPAR  Start: 0x0040D000  Length: 0x00001000  Control: 0xfff87000  Core: 0x00  Sector: 0x05
  DO ~~~~/tms470-func DeclareSector Type: FLASHPAR  Start: 0x0040E000  Length: 0x00002000  Control: 0xfff87000  Core: 0x00  Sector: 0x06
  DO ~~~~/tms470-func DeclareSector Type: FLASHPAR  Start: 0x00410000  Length: 0x00008000  Control: 0xfff87000  Core: 0x00  Sector: 0x07
  DO ~~~~/tms470-func DeclareSector Type: FLASHPAR  Start: 0x00418000  Length: 0x00008000  Control: 0xfff87000  Core: 0x00  Sector: 0x08
  DO ~~~~/tms470-func DeclareSector Type: OTPPAR    Start: 0x00608000  Length: 0x00000400  Control: 0xfff87000  Core: 0x00  Sector: 0x00

  DO ~~~~/tms470-func DeclareFlashAlgortihm &ProgRoutines &RamStart &RamSize &FlashClock_Frequency

  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  ; End of flash.cfg
  ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
  
  ; Flash script ends here if called with parameter PREPAREONLY
  IF &param_prepareonly
    ENDDO PREPAREDONE

  ; --------------------------------------------------------------------------------
  ; Flash programming example

  FLASH.List

  DIALOG.YESNO "Program flash memory?"
  ENTRY &progflash
  IF &progflash 
  (
    FLASH.ReProgram ALL /Erase
    Data.LOAD.auto *
    FLASH.ReProgram.off 

    ; Optional: compare data
    ;Data.LOAD.auto * /ComPare
  )

  ENDDO