woody/Gen4_R-Car_Trace32
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
56d7259bc5914084f5f28e6f1b4fa19789c3f699
Gen4_R-Car_Trace32/2_Trunk/demo/arm/flash/stm32l5-optionbyte.cmm
woody d411edd9b4 add Trace32 File
2025-10-14 09:52:32 +09:00

1138 lines
37 KiB
Plaintext
Raw Blame History

; --------------------------------------------------------------------------------
; @Title: ST STM32L5 Flash Dialog to program Option Bytes.
;
; @Description:
; Script arguments:
;
; DO ~~/demo/arm/flash/stm32l5-optionbyte
;
; Opens the STM32L5 option byte programming dialog.
;
; DO ~~/demo/arm/flash/stm32l5-optionbyte
; [RDP_LEV=0|0.5|1] [BOR_LEV=0..4]
; [NRST_STDBY=0|1] [NRST_STOP=0|1] [NRST_SHDW=0|1]
; [IWDG_SW=0|1] [IWDG_STOP=0|1] [IWDG_STDBY=0|1] [WWDG_SW=0|1]
; [SWAP_BANK=0|1] [DB256K=0|1] [DBANK=0|1]
; [SRAM2_PE=0|1] [SRAM2_RST=0|1] [NSWBOOT0=0|1]
; [NBOOT0=0|1] [PA15PUPEN=0|1] [TZEN=0|1]
; [NSBOOTADD0R=<val>] [NSBOOTADD1R=<val>] [SECBOOTADD0R=<val>]
; [SECWM1R1=<val>] [SECWM1R2=<val>] [SECWM2R1=<val>] [SECWM2R2=<val>]
; [WRP1AR=<val>] [WRP1BR=<val>] [WRP2AR=<val>] [WRP2BR=<val>]
; [SECBB1R1=<val>] [SECBB1R2=<val>] [SECBB1R3=<val>] [SECBB1R4=<val>]
; [SECBB2R1=<val>] [SECBB2R2=<val>] [SECBB2R3=<val>] [SECBB2R4=<val>]
; [SECHDPCR=<val>] [PRIVCFGR=<val>]
; [RELOAD_OPTIONBYTES]
;
; Program the STM32L5 option bytes according to the following parameters:
;
; RDP_LEV=0|0.5|1 is programming read protection option byte
; 0 : Level 0 memories read protection active
; 0.5: Level 0.5 read protection not active,
; only non-secure debug access is possible
; 1 : Level 1, memories read protection active
; Note : the script doesn't support programming Level 2, because with it no
; further debugging would be possible !
;
; BOR_LEV=0..4: BOR reset level
; 0: BOR Level 0: Reset level threshold is around 1.7 V
; 1: BOR Level 1: Reset level threshold is around 2.0 V
; 2: BOR Level 2: Reset level threshold is around 2.2 V
; 3: BOR Level 3: Reset level threshold is around 2.5 V
; 4: BOR Level 4: Reset level threshold is around 2.8 V
;
; NRST_STOP=0|1 is programming nRST_STOP bit of user option byte
; 0: Reset generated when entering Stop mode
; 1: No reset generated.
;
; NRST_STDBY=0|1 is programming nRST_STDBY bit of user option byte
; 0: Reset generated when entering Standby mode
; 1: No reset generated
;
; NRST_SHDW=0|1 is programming nRST_SHDW bit of user option byte
; 0: Reset generated when entering the Shutdown mode
; 1: No reset generated when entering the Shutdown mode
;
; IWDG_SW=0|1 is programming IWDG_SW bit of user option byte
; 0: Hardware independent watchdog
; 1: Software independent watchdog
;
; IWDG_STOP=0|1 is programming IWDG_STOP bit of user option byte
; 0: Independent watchdog counter is frozen in Stop mode
; 1: Independent watchdog counter is running in Stop mode
;
; IWDG_STDBY=0|1 is programming IWDG_STDBY bit of user option byte
; 0: Independent watchdog counter is frozen in Standby mode
; 1: Independent watchdog counter is running in Standby mode
;
; WWDG_SW=0|1 is programming WWDG_SW bit of user option byte
; 0: Hardware window watchdog
; 1: Software window watchdog
;
; SWAP_BANK=0|1: Swap banks
; 0: Bank 1 and bank 2 address are not swapped
; 1: Bank 1 and bank 2 address are swapped
;
; DB256K: Dual bank on 256 Kbyte Flash memory devices
; 0: 256Kbyte single Flash contiguous address in bank1
; 1: 256Kbyte Dual-bank Flash with contiguous addresses
;
; DBANK: Dual bank mode
; 0: Single-bank mode with 128 bits data read width
; 1: Dual-bank mode with 64 bits data
;
; NSBOOTADD0R=<val> NSBOOTADD0R register
; NSBOOTADD1R=<val> NSBOOTADD1R register
; SECBOOTADD0R=<val> SECBOOTADD0R register
; SECWM1R1=<val> SECWM1R1 register
; SECWM1R2=<val> SECWM1R2 register
; SECWM2R1=<val> SECWM2R1 register
; SECWM2R2=<val> SECWM2R2 register
; WRP1AR=<val> WRP1AR register
; WRP1BR=<val> WRP1BR register
; WRP2AR=<val> WRP2AR register
; WRP2BR=<val> WRP2BR register
; SECBB1R1=<val> SECBB1R1 register
; SECBB1R2=<val> SECBB1R2 register
; SECBB1R3=<val> SECBB1R3 register
; SECBB1R4=<val> SECBB1R4 register
; SECBB2R1=<val> SECBB2R1 register
; SECBB2R2=<val> SECBB2R2 register
; SECBB2R3=<val> SECBB2R3 register
; SECBB2R4=<val> SECBB2R4 register
; SECHDPCR=<val> SECHDPCR register
; PRIVCFGR=<val> PRIVCFGR register
; Note: for clearing protection set xx_START=0xFF and xx_END=0x0
;
; RELOAD_OPTIONBYTES Activate Flash Settings by execution of an OBL_LAUNCH
;
; Calling the script without argument starts the Option Byte programming
; dialog window.
;
; @Author: PHI
; @Copyright: (C) 1989-2022 Lauterbach GmbH, licensed for use with TRACE32(R) only
; --------------------------------------------------------------------------------
; $Rev: 10516 $
; $Id: stm32l5-optionbyte.cmm 10516 2022-02-02 11:39:30Z bschroefel $
LOCAL &parameters
ENTRY %LINE &parameters
; LOCAL macros used as script global macros
LOCAL &Script
LOCAL &FlashRegBase &FlashAdressStart &FlashSize
LOCAL &OPTR
LOCAL &NSBOOTADD0R &NSBOOTADD1R &SECBOOTADD0R &SECHDPCR &PRIVCFGR
LOCAL &SECWM1R1 &SECWM1R2 &SECWM2R1 &SECWM2R2
LOCAL &WRP1AR &WRP1BR &WRP2AR &WRP2BR
LOCAL &SECBB1R1 &SECBB1R2 &SECBB1R3 &SECBB1R4
LOCAL &SECBB2R1 &SECBB2R2 &SECBB2R3 &SECBB2R4
&Script=OS.PPF()
&FlashRegBase="D:0x40022000"
&FlashAdressStart="0x08000000"
; Checking CPU selection
IF !CPUIS(STM32L5*)
(
SYStem.RESet
SYStem.CPU STM32L5*
)
IF !(CPUIS(STM32L5*))
(
PRINT %ERROR "CPU not supported by this script"
ENDDO
)
IF SYStem.MODE()<5
(
SYStem.Option.ResBreak OFF
SYStem.Up
)
IF CPUIS(STM32L552?C)
&FlashSize=0x40000
ELSE IF(CPUIS(STM32L5?2?E))
&FlashSize=0x80000
ELSE
(
PRINT %ERROR "CPU not supported by this script"
ENDDO
)
; Parse script arguments
IF "&parameters"==""
(
; Look for any opened STM32L5 dialog windows and close them
IF DIALOG.EXIST("COMB_BORLEV")
DIALOG.END
GOSUB OptionByteDialog
)
ELSE
(
PRIVATE &param_RDP_LEV &param_BOR_LEV
PRIVATE &param_nRST_STOP &param_nRST_STDBY &param_nRST_SHDW
PRIVATE &param_IWDG_SW &param_IWDG_STOP &param_IWDG_STDBY &param_WWDG_SW &param_SWAP_BANK
PRIVATE &param_DB256K &param_DBANK &param_TZEN
PRIVATE &param_PA15PUPEN &param_SRAM2_PE &param_SRAM2_RST &param_nSWBOOT0 &param_nBOOT0
PRIVATE &param_NSBOOTADD0R &param_NSBOOTADD1R &param_SECBOOTADD0R
PRIVATE &param_SECWM1R1 &param_SECWM1R2 &param_SECWM2R1 &param_SECWM2R2
PRIVATE &param_WRP1AR &param_WRP2AR &param_WRP1BR &param_WRP2BR &param_SECHDPCR &param_PRIVCFGR
PRIVATE &param_SECBB1R1 &param_SECBB1R2 &param_SECBB1R3 &param_SECBB1R4
PRIVATE &param_SECBB2R1 &param_SECBB2R2 &param_SECBB2R3 &param_SECBB2R4
PRIVATE &param_reloadOptionBytes &programFlash
&programFlash=FALSE()
&param_RDP_LEV=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"RDP_LEV=","")
&param_BOR_LEV=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"BOR_LEV=","")
&param_nRST_STOP=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"NRST_STOP=","")
&param_nRST_STDBY=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"NRST_STDBY=","")
&param_nRST_SHDW=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"NRST_SHDW=","")
&param_IWDG_SW=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"IWDG_SW=","")
&param_IWDG_STOP=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"IWDG_STOP=","")
&param_IWDG_STDBY=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"IWDG_STDBY=","")
&param_WWDG_SW=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"WWDG_SW=","")
&param_SWAP_BANK=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SWAP_BANK=","")
&param_DB256K=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"DB256K=","")
&param_DBANK=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"DBANK=","")
&param_PA15PUPEN=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"PA15PUPEN=","")
&param_SRAM2_PE=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SRAM2_PE=","")
&param_SRAM2_RST=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SRAM2_RST=","")
&param_nSWBOOT0=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"NSWBOOT0=","")
&param_nBOOT0=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"NBOOT0=","")
&param_TZEN=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"TZEN=","")
&param_NSBOOTADD0R=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"NSBOOTADD0R=","")
&param_NSBOOTADD1R=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"NSBOOTADD1R=","")
&param_SECBOOTADD0R=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECBOOTADD0R=","")
&param_SECWM1R1=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECWM1R1=","")
&param_SECWM1R2=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECWM1R2=","")
&param_SECWM2R1=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECWM2R1=","")
&param_SECWM2R2=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECWM2R2=","")
&param_WRP1AR=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"WRP1AR=","")
&param_WRP2AR=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"WRP2AR=","")
&param_WRP1BR=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"WRP1BR=","")
&param_WRP2BR=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"WRP2BR=","")
&param_SECHDPCR=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECHDPCR=","")
&param_PRIVCFGR=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"PRIVCFGR=","")
&param_SECBB1R1=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECBB1R1=","")
&param_SECBB1R2=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECBB1R2=","")
&param_SECBB1R3=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECBB1R3=","")
&param_SECBB1R4=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECBB1R4=","")
&param_SECBB2R1=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECBB2R1=","")
&param_SECBB2R2=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECBB2R2=","")
&param_SECBB2R3=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECBB2R3=","")
&param_SECBB2R4=STRing.SCANAndExtract(STRing.UPpeR("&parameters"),"SECBB2R4=","")
&param_reloadOptionBytes=(STRing.SCAN(STRing.UPpeR("&parameters"),"RELOAD_OPTIONBYTES",0)!=-1)
GOSUB ReadOptionBytes
IF "&param_RDP_LEV"!=""
(
IF "&param_RDP_LEV"=="1"
&OPTR=&OPTR&~0xFF
ELSE IF "&param_RDP_LEV"=="0"
&OPTR=(&OPTR&~0xFF)|0xAA
ELSE IF "&param_RDP_LEV"=="0.5"
&OPTR=(&OPTR&~0xFF)|0x55
&programFlash=TRUE()
)
IF "&param_BOR_LEV"!=""
(
&OPTR=&OPTR&~0x700
IF "&param_BOR_LEV"=="4"
&OPTR=&OPTR|0x400
ELSE IF "&param_BOR_LEV"=="3"
&OPTR=&OPTR|0x300
ELSE IF "&param_BOR_LEV"=="2"
&OPTR=&OPTR|0x200
ELSE IF "&param_BOR_LEV"=="1"
&OPTR=&OPTR|0x100
&programFlash=TRUE()
)
IF "&param_nRST_STOP"!=""
(
IF "&param_nRST_STOP"=="1"
&OPTR=&OPTR|0x1000
ELSE IF "&param_nRST_STOP"=="0"
&OPTR=&OPTR&~0x1000
&programFlash=TRUE()
)
IF "&param_nRST_STDBY"!=""
(
IF "&param_nRST_STDBY"=="1"
&OPTR=&OPTR|0x2000
ELSE IF "&param_nRST_STDBY"=="0"
&OPTR=&OPTR&~0x2000
&programFlash=TRUE()
)
IF "&param_nRST_SHDW"!=""
(
IF "&param_nRST_SHDW"=="1"
&OPTR=&OPTR|0x4000
ELSE IF "&param_nRST_SHDW"=="0"
&OPTR=&OPTR&~0x4000
&programFlash=TRUE()
)
IF "&param_IWDG_SW"!=""
(
IF "&param_IWDG_SW"=="1"
&OPTR=&OPTR|0x10000
ELSE IF "&param_IWDG_SW"=="0"
&OPTR=&OPTR&~0x10000
&programFlash=TRUE()
)
IF "&param_IWDG_STOP"!=""
(
IF "&param_IWDG_STOP"=="1"
&OPTR=&OPTR&~0x20000
ELSE IF "&param_IWDG_STOP"=="0"
&OPTR=&OPTR|0x20000
&programFlash=TRUE()
)
IF "&param_IWDG_STDBY"!=""
(
IF "&param_IWDG_STDBY"=="1"
&OPTR=&OPTR&~0x40000
ELSE IF "&param_IWDG_STDBY"=="0"
&OPTR=&OPTR|0x40000
&programFlash=TRUE()
)
IF "&param_WWDG_SW"!=""
(
IF "&param_WWDG_SW"=="1"
&OPTR=&OPTR|0x80000
ELSE IF "&param_WWDG_SW"=="0"
&OPTR=&OPTR&~0x80000
&programFlash=TRUE()
)
IF "&param_SWAP_BANK"!=""
(
IF "&param_SWAP_BANK"=="1"
&OPTR=&OPTR|0x100000
ELSE IF "&param_SWAP_BANK"=="0"
&OPTR=&OPTR&~0x100000
&programFlash=TRUE()
)
IF "&param_DDB256K"!=""
(
IF "&param_DB256K"=="1"
&OPTR=&OPTR|0x200000
ELSE IF "&param_DB256K"=="0"
&OPTR=&OPTR&~0x200000
&programFlash=TRUE()
)
IF "&param_DBANK"!=""
(
IF "&param_DBANK"=="1"
&OPTR=&OPTR|0x400000
ELSE IF "&param_DBANK"=="0"
&OPTR=&OPTR&~0x400000
&programFlash=TRUE()
)
IF "&param_PA15PUPEN"!=""
(
IF "&param_PA15PUPEN"=="1"
&OPTR=&OPTR|0x10000000
ELSE IF "&param_PA15PUPEN"=="0"
&OPTR=&OPTR&~0x10000000
&programFlash=TRUE()
)
IF "&param_SRAM2_PE"!=""
(
IF "&param_SRAM2_PE"=="1"
&OPTR=&OPTR|0x1000000
ELSE IF "&param_SRAM2_PE"=="0"
&OPTR=&OPTR&~0x1000000
&programFlash=TRUE()
)
IF "&param_SRAM2_RST"!=""
(
IF "&param_SRAM2_RST"=="1"
&OPTR=&OPTR|0x2000000
ELSE IF "&param_SRAM2_RST"=="0"
&OPTR=&OPTR&~0x2000000
&programFlash=TRUE()
)
IF "&param_nSWBOOT0"!=""
(
IF "&param_nSWBOOT0"=="1"
&OPTR=&OPTR|0x4000000
ELSE IF "&param_nSWBOOT0"=="0"
&OPTR=&OPTR&~0x4000000
&programFlash=TRUE()
)
IF "&param_nBOOT0"!=""
(
IF "&param_nBOOT0"=="1"
&OPTR=&OPTR|0x8000000
ELSE IF "&param_nBOOT0"=="0"
&OPTR=&OPTR&~0x8000000
&programFlash=TRUE()
)
IF "&param_PA15PUPEN"!=""
(
IF "&param_PA15PUPEN"=="1"
&OPTR=&OPTR|0x10000000
ELSE IF "&param_PA15PUPEN"=="0"
&OPTR=&OPTR&~0x10000000
&programFlash=TRUE()
)
IF "&param_TZEN"!=""
(
IF "&param_TZEN"=="1"
&OPTR=&OPTR|0x80000000
ELSE IF "&param_TZEN"=="0"
&OPTR=&OPTR&~0x80000000
&programFlash=TRUE()
)
IF ("&param_NSBOOTADD0R"!="")
(
&NSBOOTADD0R=&param_NSBOOTADD0R
&programFlash=TRUE()
)
IF ("&param_NSBOOTADD1R"!="")
(
&NSBOOTADD1R=&param_NSBOOTADD1R
&programFlash=TRUE()
)
IF ("&param_SECBOOTADD0R"!="")
(
&SECBOOTADD0R=&param_SECBOOTADD0R
&programFlash=TRUE()
)
IF ("&param_SECWM1R1"!="")
(
&SECWM1R1=&param_SECWM1R1
&programFlash=TRUE()
)
IF ("&param_SECWM1R2"!="")
(
&SECWM1R2=&param_SECWM1R2
&programFlash=TRUE()
)
IF ("&param_SECWM2R1"!="")
(
&SECWM2R1=&param_SECWM2R1
&programFlash=TRUE()
)
IF ("&param_SECWM2R2"!="")
(
&SECWM2R2=&param_SECWM2R2
&programFlash=TRUE()
)
IF ("&param_WRP1AR"!="")
(
&WRP1AR=&param_WRP1AR
&programFlash=TRUE()
)
IF ("&param_WRP1BR"!="")
(
&WRP1BR=&param_WRP1BR
&programFlash=TRUE()
)
IF ("&param_WRP2AR"!="")
(
&WRP2AR=&param_WRP2AR
&programFlash=TRUE()
)
IF ("&param_WRP2BRR"!="")
(
&WRP2BR=&param_WRP2BR
&programFlash=TRUE()
)
IF ("&param_SECBB1R1"!="")
(
&SECBB1R1=&param_SECBB1R1
&programFlash=TRUE()
)
IF ("&param_SECBB1R2"!="")
(
&SECBB1R2=&param_SECBB1R2
&programFlash=TRUE()
)
IF ("&param_SECBB1R3"!="")
(
&SECBB1R3=&param_SECBB1R3
&programFlash=TRUE()
)
IF ("&param_SECBB1R4"!="")
(
&SECBB1R4=&param_SECBB1R4
&programFlash=TRUE()
)
IF ("&param_SECBB2R1"!="")
(
&SECBB2R1=&param_SECBB2R1
&programFlash=TRUE()
)
IF ("&param_SECBB2R2"!="")
(
&SECBB2R2=&param_SECBB2R2
&programFlash=TRUE()
)
IF ("&param_SECBB2R3"!="")
(
&SECBB2R3=&param_SECBB2R3
&programFlash=TRUE()
)
IF ("&param_SECBB2R4"!="")
(
&SECBB2R4=&param_SECBB2R4
&programFlash=TRUE()
)
IF ("&param_SECHDPCR"!="")
(
&SECHDPCR=&param_SECHDPCR
&programFlash=TRUE()
)
IF ("&param_PRIVCFGR"!="")
(
&PRIVCFGR=&param_PRIVCFGR
&programFlash=TRUE()
)
; Special script calls from dialog to refresh the dialog or activate option bytes.
IF (STRing.SCAN(STRing.UPpeR("&parameters"),"REFRESH",0)!=-1)
(
GOSUB UpdateWindowFromFlashContents
)
ELSE IF (STRing.SCAN(STRing.UPpeR("&parameters"),"RELOAD_OPTIONBYTES",0)!=-1)
(
GOSUB ActivateFlashSettings
)
; Program option bytes into flash
ELSE IF &programFlash
(
GOSUB ProgramOptionBytes
)
ELSE
(
)
)
ENDDO
; --------------------------------------------------------------------------------
; NVM bit programming dialog window
OptionByteDialog:
; Creating the main dialog. (& after DIALOG command must be in first column!
WinPOS 50. 5. 68. 33.
DIALOG.view
(&
HEADER SYStem.CPU()+" option bytes"
POS 1. 0. 66. 18.
BOX "User option bytes"
POS 3. 2. 20. 1.
TEXT "Read protection Level:"
POS 20. 2. 25. 1.
COMB_RDP: COMBOBOX "Level 0:No read protection,Level 0.5:only non-secure debug access,Level 1:Read protection" ""
POS 3. 3. 20. 1.
TEXT "BOR reset level:"
POS 20. 3. 25. 1.
COMB_BORLEV: COMBOBOX "Level 0:threshold around 1.7 V,Level 1:threshold around 2.0 V,Level 2:threshold around 2.2 V,Level 3:threshold around 2.5 V,Level 4:threshold around 2.8 V" ""
POS 3. 5. 30. 1.
CHK_RST_STOP: CHECKBOX "Reset when entering Stop mode" ""
POS 3. 6. 30. 1.
CHK_RST_STDBY: CHECKBOX "Reset when entering Standby mode" ""
POS 3. 7. 30. 1.
CHK_RST_SHDW: CHECKBOX "Reset when entering Shutdown mode" ""
POS 3. 9. 30. 1.
CHSB_IWDG.HW: CHOOSEBOX "Hardware independent watchdog" ""
CHSB_IWDG.SW: CHOOSEBOX "Software independent watchdog" ""
POS 35. 9. 30. 1.
CHSB_WWDG.HW: CHOOSEBOX "Hardware window watchdog" ""
CHSB_WWDG.SW: CHOOSEBOX "Software window watchdog" ""
POS 3. 11. 30. 1.
CHK_IWDG_STOP: CHECKBOX "Independent watchdog counter freeze in Stop mode" ""
POS 35. 11. 30. 1.
CHK_IWDG_STDBY: CHECKBOX "Independent watchdog counter freeze in Standby mode" ""
POS 3. 13. 24. 1.
CHK_SWAP_BANK: CHECKBOX "Swap Banks" ""
POS 3. 14. 30. 1.
CHK_DB256K: CHECKBOX "Dual-bank on 256 Kbytes Flash memory devices" ""
POS 35. 13. 31. 1.
CHSB_DBANK.SINGLE: CHOOSEBOX "Single-bank mode with 128 bits data read" ""
CHSB_DBANK.DUAL: CHOOSEBOX "Dual-bank mode with 64 bits data" ""
POS 3. 15. 31. 1.
CHK_RAM_PARITY_CHECK_DIS: CHECKBOX "RAM Parity Check disabled" ""
POS 35. 15. 30. 1.
CHK_RAM_ERASE: CHECKBOX "SRAM2 Erase when system reset" ""
POS 3. 16. 15. 1.
CHK_NBOOT0: CHECKBOX "nBOOT0" ""
POS 19. 16. 15. 1.
CHK_PA15PUPEN: CHECKBOX "PA15PUPEN" ""
POS 35. 16. 15. 1.
CHK_NSWBOOT0: CHECKBOX "nSWBOOT0" ""
POS 51. 16. 15. 1.
CHK_TZEN: CHECKBOX "TZEN" ""
POS 1. 18. 66. 13.
BOX "Registers for protected zones"
POS 3. 19. 12. 1.
TEXT "NSBOOTADD0R:"
POS 18. 19. 12. 1.
NSBOOTADD0R: EDIT "" ""
POS 35. 19. 12. 1.
TEXT "NSBOOTADD1R:"
POS 48. 19. 12. 1.
NSBOOTADD1R: EDIT "" ""
POS 3. 20. 12. 1.
TEXT "SECBOOTADD0R:"
POS 18. 20. 12. 1.
SECBOOTADD0R: EDIT "" ""
POS 3. 21. 12. 1.
TEXT "SECWM1R1:"
POS 18. 21. 12. 1.
SECWM1R1: EDIT "" ""
POS 35. 21. 12. 1.
TEXT "SECWM1R2:"
POS 48. 21. 12. 1.
SECWM1R2: EDIT "" ""
POS 3. 22. 12. 1.
TEXT "SECWM2R1:"
POS 18. 22. 12. 1.
SECWM2R1: EDIT "" ""
POS 35. 22. 12. 1.
TEXT "SECWM2R2:"
POS 48. 22. 12. 1.
SECWM2R2: EDIT "" ""
POS 3. 23. 12. 1.
TEXT "WRP1AR:"
POS 18. 23. 12. 1.
WRP1AR: EDIT "" ""
POS 35. 23. 12. 1.
TEXT "WRP1BR:"
POS 48. 23. 12. 1.
WRP1BR: EDIT "" ""
POS 3. 24. 12. 1.
TEXT "WRP2AR:"
POS 18. 24. 12. 1.
WRP2AR: EDIT "" ""
POS 35. 24. 12. 1.
TEXT "WRP2BR:"
POS 48. 24. 12. 1.
WRP2BR: EDIT "" ""
POS 3. 25. 12. 1.
TEXT "SECBB1R1:"
POS 18. 25. 12. 1.
SECBB1R1: EDIT "" ""
POS 35. 25. 12. 1.
TEXT "SECBB1R2:"
POS 48. 25. 12. 1.
SECBB1R2: EDIT "" ""
POS 3. 26. 12. 1.
TEXT "SECBB1R3:"
POS 18. 26. 12. 1.
SECBB1R3: EDIT "" ""
POS 35. 26. 12. 1.
TEXT "SECBB1R4:"
POS 48. 26. 12. 1.
SECBB1R4: EDIT "" ""
POS 3. 27. 12. 1.
TEXT "SECBB2R1:"
POS 18. 27. 12. 1.
SECBB2R1: EDIT "" ""
POS 35. 27. 12. 1.
TEXT "SECBB2R2:"
POS 48. 27. 12. 1.
SECBB2R2: EDIT "" ""
POS 3. 28. 12. 1.
TEXT "SECBB2R3:"
POS 18. 28. 12. 1.
SECBB2R3: EDIT "" ""
POS 35. 28. 12. 1.
TEXT "SECBB2R4:"
POS 48. 28. 12. 1.
SECBB2R4: EDIT "" ""
POS 3. 29. 12. 1.
TEXT "SECHDPCR:"
POS 18. 29. 12. 1.
SECHDPCR: EDIT "" ""
POS 35. 29. 12. 1.
TEXT "PRIVCFGR:"
POS 48. 29. 12. 1.
PRIVCFGR: EDIT "" ""
POS 1. 31. 12. 1.5
BUTTON "Program option bytes"
(
PRIVATE &value
LOCAL &progRDP_LEV &progBOR_LEV &progRST_STOP &progRST_STDBY &progRST_SHDW
LOCAL &progIWDG_SW &progIWDG_STOP &progIWDG_STDBY &progWWDG_SW
LOCAL &param_SWAP_BANK &progDB256K &progDBANK &progTZEN
LOCAL &progPA15PUPEN &SRAM2_PE &progSRAM2_RST &progNSWBOOT0 &progNBOOT0
LOCAL &progNSBOOTADD0R &progNSBOOTADD1R &progSECBOOTADD0R
LOCAL &progSECWM1R1 &progSECWM1R2 &progSECWM2R1 &progSECWM2R2
LOCAL &progWRP1AR &progWRP1BR &progWRP2AR &progWRP2BR
LOCAL &progSECBB1R1 &progSECBB1R2 &progSECBB1R3 &progSECBB1R4
LOCAL &progSECBB2R1 &progSECBB2R2 &progSECBB2R3 &progSECBB2R4
LOCAL &progSECHDPCR &progPRIVCFGR
IF DIALOG.STRING("COMB_RDP")=="Level 0:No read protection"
&progRDP_LEV="RDP_LEV=0"
ELSE IF DIALOG.STRING("COMB_RDP")=="Level 0.5:only non-secure debug access"
&progRDP_LEV="RDP_LEV=0.5"
ELSE
&progRDP_LEV="RDP_LEV=1"
IF DIALOG.STRING("COMB_BORLEV")=="Level 4:threshold around 2.8 V"
&progBOR_LEV="BOR_LEV=4"
ELSE IF DIALOG.STRING("COMB_BORLEV")=="Level 3:threshold around 2.5 V"
&progBOR_LEV="BOR_LEV=3"
ELSE IF DIALOG.STRING("COMB_BORLEV")=="Level 2:threshold around 2.2 V"
&progBOR_LEV="BOR_LEV=2"
ELSE IF DIALOG.STRING("COMB_BORLEV")=="Level 1:threshold around 2.0 V"
&progBOR_LEV="BOR_LEV=1"
ELSE
&progBOR_LEV="BOR_LEV=0"
IF DIALOG.BOOLEAN("CHK_RST_STOP")
&progRST_STOP="NRST_STOP=0"
ELSE
&progRST_STOP="NRST_STOP=1"
IF DIALOG.BOOLEAN("CHK_RST_STDBY")
&progRST_STDBY="NRST_STDBY=0"
ELSE
&progRST_STDBY="NRST_STDBY=1"
IF DIALOG.BOOLEAN("CHK_RST_SHDW")
&progRST_SHDW="NRST_SHDW=0"
ELSE
&progRST_SHDW="NRST_SHDW=1"
IF DIALOG.BOOLEAN("CHSB_IWDG.SW")
&progIWDG_SW="IWDG_SW=1"
ELSE
&progIWDG_SW="IWDG_SW=0"
IF DIALOG.BOOLEAN("CHK_IWDG_STOP")
&progIWDG_STOP="IWDG_STOP=1"
ELSE
&progIWDG_STOP="IWDG_STOP=0"
IF DIALOG.BOOLEAN("CHK_IWDG_STDBY")
&progIWDG_STDBY="IWDG_STDBY=1"
ELSE
&progIWDG_STDBY="IWDG_STDBY=0"
IF DIALOG.BOOLEAN("CHSB_WWDG.SW")
&progWWDG_SW="WWDG_SW=1"
ELSE
&progWWDG_SW="WWDG_SW=0"
IF DIALOG.BOOLEAN("CHK_SWAP_BANK")
&progSWAP_BANK="SWAP_BANK=1"
ELSE
&progSWAP_BANK="SWAP_BANK=0"
IF DIALOG.BOOLEAN("CHK_DB256K")
&progDB256K="DB256K=1"
ELSE
&progDB256K="DB256K=0"
IF DIALOG.BOOLEAN("CHSB_DBANK.DUAL")
&progDBANK="DBANK=1"
ELSE
&progDBANK="DBANK=0"
IF DIALOG.BOOLEAN("CHK_PA15PUPEN")
&progPA15PUPEN="PA15PUPEN=1"
ELSE
&progPA15PUPEN="PA15PUPEN=0"
IF DIALOG.BOOLEAN("CHK_NBOOT0")
&progNBOOT0="NBOOT0=1"
ELSE
&progNBOOT0="NBOOT0=0"
IF DIALOG.BOOLEAN("CHK_TZEN")
&progTZEN="TZEN=1"
ELSE
&progTZEN="TZEN=0"
IF DIALOG.BOOLEAN("CHK_RAM_PARITY_CHECK_DIS")
&SRAM2_PE="SRAM2_PE=1"
ELSE
&SRAM2_PE="SRAM2_PE=0"
IF DIALOG.BOOLEAN("CHK_RAM_ERASE")
&progSRAM2_RST="SRAM2_RST=0"
ELSE
&progSRAM2_RST="SRAM2_RST=1"
IF DIALOG.BOOLEAN("CHK_NSWBOOT0")
&progNSWBOOT0="NSWBOOT0=1"
ELSE
&progNSWBOOT0="NSWBOOT0=0"
&value=DIALOG.STRing(NSBOOTADD0R)
&progNSBOOTADD0R="NSBOOTADD0R=&value"
&value=DIALOG.STRing(NSBOOTADD1R)
&progNSBOOTADD1R="NSBOOTADD1R=&value"
&value=DIALOG.STRing(SECBOOTADD0R)
&progSECBOOTADD0R="SECBOOTADD0R=&value"
&value=DIALOG.STRing(SECWM1R1)
&progSECWM1R1="SECWM1R1=&value"
&value=DIALOG.STRing(SECWM1R2)
&progSECWM1R2="SECWM1R2=&value"
&value=DIALOG.STRing(SECWM2R1)
&progSECWM2R1="SECWM2R1=&value"
&value=DIALOG.STRing(SECWM2R2)
&progSECWM2R2="SECWM2R2=&value"
&value=DIALOG.STRing(WRP1AR)
&progWRP1AR="WRP1AR=&value"
&value=DIALOG.STRing(WRP1BR)
&progWRP1BR="WRP1BR=&value"
&value=DIALOG.STRing(WRP2AR)
&progWRP2AR="WRP2AR=&value"
&value=DIALOG.STRing(WRP2BR)
&progWRP2BR="WRP2BR=&value"
&value=DIALOG.STRing(SECBB1R1)
&progSECBB1R1="SECBB1R1=&value"
&value=DIALOG.STRing(SECBB1R2)
&progSECBB1R2="SECBB1R2=&value"
&value=DIALOG.STRing(SECBB1R3)
&progSECBB1R3="SECBB1R3=&value"
&value=DIALOG.STRing(SECBB1R4)
&progSECBB1R4="SECBB1R4=&value"
&value=DIALOG.STRing(SECBB2R1)
&progSECBB2R1="SECBB2R1=&value"
&value=DIALOG.STRing(SECBB1R2)
&progSECBB1R2="SECBB1R2=&value"
&value=DIALOG.STRing(SECBB2R2)
&progSECBB2R2="SECBB2R2=&value"
&value=DIALOG.STRing(SECBB2R3)
&progSECBB2R3="SECBB2R3=&value"
&value=DIALOG.STRing(SECBB2R4)
&progSECBB2R4="SECBB2R4=&value"
&value=DIALOG.STRing(SECHDPCR)
&progSECHDPCR="SECHDPCR=&value"
&value=DIALOG.STRing(PRIVCFGR)
&progPRIVCFGR="PRIVCFGR=&value"
DO "&Script" &progRDP_LEV &progBOR_LEV &progRST_STOP &progRST_STDBY &progRST_SHDW &progIWDG_SW &progIWDG_STOP &progIWDG_STDBY &progWWDG_SW &progSWAP_BANK &progDB256K &progDBANK &progPA15PUPEN &progTZEN &SRAM2_PE &progSRAM2_RST &progNSWBOOT0 &progNBOOT0 &progNSBOOTADD0R &progNSBOOTADD1R &progSECBOOTADD0R &progSECWM1R1 &progSECWM1R2 &progSECWM2R1 &progSECWM2R2 &progWRP1AR &progWRP1BR &progWRP2AR &progWRP2BR &progSECBB1R1 &progSECBB1R2 &progSECBB1R3 &progSECBB1R4 &progSECBB2R1 &progSECBB2R2 &progSECBB2R3 &progSECBB2R4 &progSECHDPCR &progPRIVCFGR
)
POS 19. 31. 15. 1.5
BUTTON "Activate option bytes"
(
DO "&Script" RELOAD_OPTIONBYTES
)
POS 41. 31. 10. 1.5
BUTTON "Refresh"
(
DO "&Script" REFRESH
)
POS 57. 31. 10. 1.5
BUTTON "Exit" "DIALOG.END"
CLOSE "DIALOG.END"
)
GOSUB UpdateWindowFromFlashContents
ENDDO
; --------------------------------------------------------------------------------
; Read out option bytes and set dialog entries
UpdateWindowFromFlashContents:
(
GOSUB ReadOptionBytes
; Get read protection
IF ((&OPTR&0xFF)==0xAA)
DIALOG.Set COMB_RDP "Level 0:No read protection"
ELSE IF ((&OPTR&0xFF)==0x55)
DIALOG.Set COMB_RDP "Level 0.5:only non-secure debug access"
ELSE
DIALOG.Set COMB_RDP "Level 1:Read protection"
IF ((&OPTR>>8.)&0x07)==0x0
DIALOG.Set COMB_BORLEV "Level 0:threshold around 1.7 V"
ELSE IF((&OPTR>>8.)&0x07)==0x1
DIALOG.Set COMB_BORLEV "Level 1:threshold around 2.0 V"
ELSE IF ((&OPTR>>8.)&0x07)==0x2
DIALOG.Set COMB_BORLEV "Level 2:threshold around 2.2 V"
ELSE IF ((&OPTR>>8.)&0x07)==0x3
DIALOG.Set COMB_BORLEV "Level 3:threshold around 2.5 V"
ELSE IF ((&OPTR>>8.)&0x07)==0x4
DIALOG.Set COMB_BORLEV "Level 4:threshold around 2.8 V"
IF ((&OPTR>>12.)&0x1)==0x1
DIALOG.Set CHK_RST_STOP "OFF"
ELSE
DIALOG.Set CHK_RST_STOP "ON"
IF ((&OPTR>>13.)&0x1)==0x1
DIALOG.Set CHK_RST_STDBY "OFF"
ELSE
DIALOG.Set CHK_RST_STDBY "ON"
IF ((&OPTR>>14.)&0x1)==0x1
DIALOG.Set CHK_RST_SHDW "OFF"
ELSE
DIALOG.Set CHK_RST_SHDW "ON"
IF ((&OPTR>>16.)&0x1)==0x1
DIALOG.Set CHSB_IWDG.SW
ELSE
DIALOG.Set CHSB_IWDG.HW
IF ((&OPTR>>17.)&0x1)==0x1
DIALOG.Set CHK_IWDG_STOP "OFF"
ELSE
DIALOG.Set CHK_IWDG_STOP "ON"
IF ((&OPTR>>18.)&0x1)==0x1
DIALOG.Set CHK_IWDG_STDBY "OFF"
ELSE
DIALOG.Set CHK_IWDG_STDBY "ON"
IF ((&OPTR>>19.)&0x1)==0x1
DIALOG.Set CHSB_WWDG.SW
ELSE
DIALOG.Set CHSB_WWDG.HW
IF ((&OPTR>>20.)&0x1)==0x1
DIALOG.Set CHK_SWAP_BANK "ON"
ELSE
DIALOG.Set CHK_SWAP_BANK "OFF"
IF ((&OPTR>>21.)&0x1)==0x1
DIALOG.Set CHK_DB256K "ON"
ELSE
DIALOG.Set CHK_DB256K "OFF"
IF ((&OPTR>>22.)&0x1)==0x1
DIALOG.Set CHSB_DBANK.DUAL
ELSE
DIALOG.Set CHSB_DBANK.SINGLE
IF ((&OPTR>>24.)&0x1)==0x1
DIALOG.Set CHK_RAM_PARITY_CHECK_DIS "ON"
ELSE
DIALOG.Set CHK_RAM_PARITY_CHECK_DIS "OFF"
IF ((&OPTR>>25.)&0x1)==0x1
DIALOG.Set CHK_RAM_ERASE "OFF"
ELSE
DIALOG.Set CHK_RAM_ERASE "ON"
IF ((&OPTR>>26.)&0x1)==0x1
DIALOG.Set CHK_NSWBOOT0 "ON"
ELSE
DIALOG.Set CHK_NSWBOOT0 "OFF"
IF ((&OPTR>>27.)&0x1)==0x1
DIALOG.Set CHK_NBOOT0 "ON"
ELSE
DIALOG.Set CHK_NBOOT0 "OFF"
IF ((&OPTR>>28.)&0x1)==0x1
DIALOG.Set CHK_PA15PUPEN "ON"
ELSE
DIALOG.Set CHK_PA15PUPEN "OFF"
IF ((&OPTR>>31.)&0x1)==0x1
DIALOG.Set CHK_TZEN "ON"
ELSE
DIALOG.Set CHK_TZEN "OFF"
DIALOG.Set NSBOOTADD0R "&NSBOOTADD0R"
DIALOG.Set NSBOOTADD1R "&NSBOOTADD1R"
DIALOG.Set SECBOOTADD0R "&SECBOOTADD0R"
DIALOG.Set SECWM1R1 "&SECWM1R1"
DIALOG.Set SECWM1R2 "&SECWM1R2"
DIALOG.Set SECWM2R1 "&SECWM2R1"
DIALOG.Set SECWM2R2 "&SECWM2R2"
DIALOG.Set WRP1AR "&WRP1AR"
DIALOG.Set WRP1BR "&WRP1BR"
DIALOG.Set WRP2AR "&WRP2AR"
DIALOG.Set WRP2BR "&WRP2BR"
DIALOG.Set SECBB1R1 "&SECBB1R1"
DIALOG.Set SECBB1R2 "&SECBB1R2"
DIALOG.Set SECBB1R3 "&SECBB1R3"
DIALOG.Set SECBB1R4 "&SECBB1R4"
DIALOG.Set SECBB2R1 "&SECBB2R1"
DIALOG.Set SECBB2R2 "&SECBB2R2"
DIALOG.Set SECBB2R3 "&SECBB2R3"
DIALOG.Set SECBB2R4 "&SECBB2R4"
DIALOG.Set SECHDPCR "&SECHDPCR"
DIALOG.Set PRIVCFGR "&PRIVCFGR"
RETURN
)
; --------------------------------------------------------------------------------
; Activate programmed flash settings by resetting device
ActivateFlashSettings:
(
PRIVATE &cr &optlocked
; Athorize flash programming
&cr=Data.Long(&FlashRegBase+0x28)
; Unlock the Flash Program Erase controller
IF ((&cr&0x80000000)==0x80000000)
(
Data.Set &FlashRegBase+0x08 %Long 0x45670123 // FLASH->KEYR = FLASH_KEY1;
Data.Set &FlashRegBase+0x08 %Long 0xCDEF89AB // FLASH->KEYR = FLASH_KEY2;
)
; Authorize option byte programming
IF ((&cr&0x40000000)==0x40000000)
(
Data.Set &FlashRegBase+0x10 %Long 0x08192A3B // FLASH->OPTKEYR = FLASH_KEY1;
Data.Set &FlashRegBase+0x10 %Long 0x4C5D6E7F // FLASH->OPTKEYR = FLASH_KEY2;
)
&optlocked=Data.Long(&FlashRegBase+0x28)&0x40000000 // locked = FLASH->OTPCR & OPT_LOCK
IF &optlocked==0x40000000
(
PRINT %ERROR "Cannot unlock option byte programming!"
RETURN
)
; Set OBL_LAUNCH to power down core (necessary for loading option bytes into Flash registers)
ON.ERROR CONTINUE
Data.Set &FlashRegBase+0x28 %Long &cr|(1.<<27.)
ON.ERROR
WAIT 0.1s
IF (SYStem.UP())
BREAK
ELSE
SYStem.UP
RETURN
)
; --------------------------------------------------------------------------------
; Read option byte values out of flash
ReadOptionBytes:
(
&OPTR=Data.Long(&FlashRegBase+0x40)
&NSBOOTADD0R=Data.Long(&FlashRegBase+0x44)
&NSBOOTADD1R=Data.Long(&FlashRegBase+0x48)
&SECBOOTADD0R=Data.Long(&FlashRegBase+0x4C) ; bit 0: BOOT_LOCK
&SECWM1R1=Data.Long(&FlashRegBase+0x50)
&SECWM1R2=Data.Long(&FlashRegBase+0x54)
&SECWM2R1=Data.Long(&FlashRegBase+0x60)
&SECWM2R2=Data.Long(&FlashRegBase+0x64)
&WRP1AR=Data.Long(&FlashRegBase+0x58)
&WRP1BR=Data.Long(&FlashRegBase+0x5C)
&WRP2AR=Data.Long(&FlashRegBase+0x68)
&WRP2BR=Data.Long(&FlashRegBase+0x6C)
&SECBB1R1=Data.Long(&FlashRegBase+0x80)
&SECBB1R2=Data.Long(&FlashRegBase+0x84)
&SECBB1R3=Data.Long(&FlashRegBase+0x88)
&SECBB1R4=Data.Long(&FlashRegBase+0x8C)
&SECBB2R1=Data.Long(&FlashRegBase+0xA0)
&SECBB2R2=Data.Long(&FlashRegBase+0xA4)
&SECBB2R3=Data.Long(&FlashRegBase+0xA8)
&SECBB2R4=Data.Long(&FlashRegBase+0xAC)
&SECHDPCR=Data.Long(&FlashRegBase+0xC0)
&PRIVCFGR=Data.Long(&FlashRegBase+0xC4)
RETURN
)
; --------------------------------------------------------------------------------
; Program option bytes
ProgramOptionBytes:
(
PRIVATE &cr
; Clear All pending flags in FLASH->SR
Data.Set &FlashRegBase+0x20 %Long 0x000020FB
; Wait for last operation to be completed
IF (Data.Long(&FlashRegBase+0x20)&0x00010000)==0x00010000
(
PRINT %ERROR "Flash memory interface busy, operation aborted"
RETURN
)
; Athorize flash programming
&cr=Data.Long(&FlashRegBase+0x28)
; Unlock the Flash Program Erase controller
IF ((&cr&0x80000000)==0x80000000)
(
Data.Set &FlashRegBase+0x08 %Long 0x45670123 // FLASH->KEYR) = FLASH_KEY1;
Data.Set &FlashRegBase+0x08 %Long 0xCDEF89AB // FLASH->KEYR) = FLASH_KEY2;
)
; Authorize option byte programming
IF ((&cr&0x40000000)==0x40000000)
(
Data.Set &FlashRegBase+0x10 %Long 0x08192A3B // FLASH->OPTKEYR = FLASH_KEY1;
Data.Set &FlashRegBase+0x10 %Long 0x4C5D6E7F // FLASH->OPTKEYR = FLASH_KEY2;
)
&optlocked=Data.Long(&FlashRegBase+0x14)&0x40000000 // locked = FLASH->OTPCR & OPT_LOCK
IF &optlocked==0x40000000
(
PRINT %ERROR "Cannot unlock option byte programming!"
RETURN
)
IF ((&OPTR&0xFF)==0xCC)
(
PRINT "Option byte programming aborted, because RDP_LEV=0xCC will disable further debugging"
PRINT "Disabling JTAG won't be reversible"
Data.Set &FlashRegBase+0x28 %Long &cr // restore FLASH_CR register
ENDDO
)
Data.Set &FlashRegBase+0x40 %Long &OPTR
Data.Set &FlashRegBase+0x44 %Long &NSBOOTADD0R
Data.Set &FlashRegBase+0x48 %Long &NSBOOTADD1R
Data.Set &FlashRegBase+0x4C %Long &SECBOOTADD0R ; bit 0: BOOT_LOCK
Data.Set &FlashRegBase+0x50 %Long &SECWM1R1
Data.Set &FlashRegBase+0x54 %Long &SECWM1R2
Data.Set &FlashRegBase+0x58 %Long &WRP1AR
Data.Set &FlashRegBase+0x5C %Long &WRP1BR
Data.Set &FlashRegBase+0x60 %Long &SECWM2R1
Data.Set &FlashRegBase+0x64 %Long &SECWM2R2
Data.Set &FlashRegBase+0x68 %Long &WRP2AR
Data.Set &FlashRegBase+0x6C %Long &WRP2BR
Data.Set &FlashRegBase+0x80 %Long &SECBB1R1
Data.Set &FlashRegBase+0x84 %Long &SECBB1R2
Data.Set &FlashRegBase+0x88 %Long &SECBB1R3
Data.Set &FlashRegBase+0x8C %Long &SECBB1R4
Data.Set &FlashRegBase+0xA0 %Long &SECBB2R1
Data.Set &FlashRegBase+0xA4 %Long &SECBB2R2
Data.Set &FlashRegBase+0xA8 %Long &SECBB2R3
Data.Set &FlashRegBase+0xAC %Long &SECBB2R4
Data.Set &FlashRegBase+0xC0 %Long &SECHDPCR
Data.Set &FlashRegBase+0xC4 %Long &PRIVCFGR
; Start option byte programming
Data.Set &FlashRegBase+0x28 %Long (&cr&~0xC0000000)|0x20000 // FLASH->CR = OPT_STRT;
; Wait for last operation to be completed */
WHILE (Data.Long(&FlashRegBase+0x20)&0x00010000)==0x00010000 // while ((FLASH->NSSR & FLASH_FLAG_BSY) == FLASH_FLAG_BSY)
(
)
; restore FLASH_CR register
Data.Set &FlashRegBase+0x28 %Long &cr
RETURN
)
Reference in New Issue View Git Blame Copy Permalink