You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@mynewt.apache.org by ad...@apache.org on 2016/06/16 21:41:33 UTC
[25/51] [partial] incubator-mynewt-site git commit: remove untarred
files for openocd
http://git-wip-us.apache.org/repos/asf/incubator-mynewt-site/blob/69f466b5/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/kinetis_ke.c
----------------------------------------------------------------------
diff --git a/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/kinetis_ke.c b/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/kinetis_ke.c
deleted file mode 100755
index 593443c..0000000
--- a/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/kinetis_ke.c
+++ /dev/null
@@ -1,1311 +0,0 @@
-/***************************************************************************
- * Copyright (C) 2015 by Ivan Meleca *
- * ivan@artekit.eu *
- * *
- * Modified from kinetis.c *
- * *
- * Copyright (C) 2011 by Mathias Kuester *
- * kesmtp@freenet.de *
- * *
- * Copyright (C) 2011 sleep(5) ltd *
- * tomas@sleepfive.com *
- * *
- * Copyright (C) 2012 by Christopher D. Kilgour *
- * techie at whiterocker.com *
- * *
- * Copyright (C) 2013 Nemui Trinomius *
- * nemuisan_kawausogasuki@live.jp *
- * *
- * Copyright (C) 2015 Tomas Vanek *
- * vanekt@fbl.cz *
- * *
- * This program is free software; you can redistribute it and/or modify *
- * it under the terms of the GNU General Public License as published by *
- * the Free Software Foundation; either version 2 of the License, or *
- * (at your option) any later version. *
- * *
- * This program is distributed in the hope that it will be useful, *
- * but WITHOUT ANY WARRANTY; without even the implied warranty of *
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
- * GNU General Public License for more details. *
- ***************************************************************************/
-
-#ifdef HAVE_CONFIG_H
-#include "config.h"
-#endif
-
-#include "jtag/interface.h"
-#include "imp.h"
-#include <helper/binarybuffer.h>
-#include <target/algorithm.h>
-#include <target/armv7m.h>
-#include <target/cortex_m.h>
-
-/* Addresses */
-#define SIM_SRSID 0x40048000
-#define ICS_C1 0x40064000
-#define ICS_C2 0x40064001
-#define ICS_C3 0x40064002
-#define ICS_C4 0x40064003
-#define ICS_S 0x40064004
-#define SIM_BUSDIV 0x40048018
-#define SIM_CLKDIV_KE06 0x40048024
-#define SIM_CLKDIV_KE04_44_64_80 0x40048024
-#define SIM_CLKDIV_KE04_16_20_24 0x4004801C
-#define WDOG_CS1 0x40052000
-
-#define ICS_C2_BDIV_MASK 0xE0
-#define ICS_C2_BDIV_SHIFT 5
-#define ICS_C2_BDIV(x) (((uint8_t)(((uint8_t)(x))<<ICS_C2_BDIV_SHIFT))&ICS_C2_BDIV_MASK)
-#define ICS_S_LOCK_MASK 0x40
-#define ICS_C4_SCFTRIM_MASK 0x1
-#define SIM_CLKDIV_OUTDIV2_MASK 0x1000000
-#define FTMRX_FCLKDIV_FDIV_MASK 0x3F
-#define FTMRX_FCLKDIV_FDIV_SHIFT 0
-#define FTMRX_FCLKDIV_FDIV(x) (((uint8_t)(((uint8_t)(x))<<FTMRX_FCLKDIV_FDIV_SHIFT))&FTMRX_FCLKDIV_FDIV_MASK)
-#define FTMRX_FCLKDIV_FDIVLCK_MASK 0x40
-#define FTMRX_FCLKDIV_FDIVLCK_SHIFT 6
-#define FTMRX_FCLKDIV_FDIVLD_MASK 0x80
-#define FTMRX_FCLKDIV_FDIVLD_SHIFT 7
-#define FTMRX_FSTAT_CCIF_MASK 0x80
-#define FTMRX_FSTAT_MGSTAT0_MASK 0x01
-#define FTMRX_FSTAT_MGSTAT1_MASK 0x02
-
-/* Commands */
-#define FTMRX_CMD_ALLERASED 0x01
-#define FTMRX_CMD_BLOCKERASED 0x02
-#define FTMRX_CMD_SECTIONERASED 0x03
-#define FTMRX_CMD_READONCE 0x04
-#define FTMRX_CMD_PROGFLASH 0x06
-#define FTMRX_CMD_PROGONCE 0x07
-#define FTMRX_CMD_ERASEALL 0x08
-#define FTMRX_CMD_ERASEBLOCK 0x09
-#define FTMRX_CMD_ERASESECTOR 0x0A
-#define FTMRX_CMD_UNSECURE 0x0B
-#define FTMRX_CMD_VERIFYACCESS 0x0C
-#define FTMRX_CMD_SETMARGINLVL 0x0D
-#define FTMRX_CMD_SETFACTORYLVL 0x0E
-#define FTMRX_CMD_CONFIGNVM 0x0F
-
-/* Error codes */
-#define FTMRX_ERROR_ACCERR 0x20
-#define FTMRX_ERROR_FPVIOL 0x10
-
-#define KINETIS_KE_SRSID_FAMID(x) ((x >> 28) & 0x0F)
-#define KINETIS_KE_SRSID_SUBFAMID(x) ((x >> 24) & 0x0F)
-#define KINETIS_KE_SRSID_PINCOUNT(x) ((x >> 16) & 0x0F)
-
-#define KINETIS_KE_SRSID_KEX2 0x02
-#define KINETIS_KE_SRSID_KEX4 0x04
-#define KINETIS_KE_SRSID_KEX6 0x06
-
-struct kinetis_ke_flash_bank {
- uint32_t sector_size;
- uint32_t protection_size;
-
- uint32_t sim_srsid;
- uint32_t ftmrx_fclkdiv_addr;
- uint32_t ftmrx_fccobix_addr;
- uint32_t ftmrx_fstat_addr;
- uint32_t ftmrx_fprot_addr;
- uint32_t ftmrx_fccobhi_addr;
- uint32_t ftmrx_fccoblo_addr;
-};
-
-#define MDM_REG_STAT 0x00
-#define MDM_REG_CTRL 0x04
-#define MDM_REG_ID 0xfc
-
-#define MDM_STAT_FMEACK (1<<0)
-#define MDM_STAT_FREADY (1<<1)
-#define MDM_STAT_SYSSEC (1<<2)
-#define MDM_STAT_SYSRES (1<<3)
-#define MDM_STAT_FMEEN (1<<5)
-#define MDM_STAT_BACKDOOREN (1<<6)
-#define MDM_STAT_LPEN (1<<7)
-#define MDM_STAT_VLPEN (1<<8)
-#define MDM_STAT_LLSMODEXIT (1<<9)
-#define MDM_STAT_VLLSXMODEXIT (1<<10)
-#define MDM_STAT_CORE_HALTED (1<<16)
-#define MDM_STAT_CORE_SLEEPDEEP (1<<17)
-#define MDM_STAT_CORESLEEPING (1<<18)
-
-#define MEM_CTRL_FMEIP (1<<0)
-#define MEM_CTRL_DBG_DIS (1<<1)
-#define MEM_CTRL_DBG_REQ (1<<2)
-#define MEM_CTRL_SYS_RES_REQ (1<<3)
-#define MEM_CTRL_CORE_HOLD_RES (1<<4)
-#define MEM_CTRL_VLLSX_DBG_REQ (1<<5)
-#define MEM_CTRL_VLLSX_DBG_ACK (1<<6)
-#define MEM_CTRL_VLLSX_STAT_ACK (1<<7)
-
-#define MDM_ACCESS_TIMEOUT 3000 /* iterations */
-
-static int kinetis_ke_mdm_write_register(struct adiv5_dap *dap, unsigned reg, uint32_t value)
-{
- int retval;
- LOG_DEBUG("MDM_REG[0x%02x] <- %08" PRIX32, reg, value);
-
- retval = dap_queue_ap_write(dap_ap(dap, 1), reg, value);
- if (retval != ERROR_OK) {
- LOG_DEBUG("MDM: failed to queue a write request");
- return retval;
- }
-
- retval = dap_run(dap);
- if (retval != ERROR_OK) {
- LOG_DEBUG("MDM: dap_run failed");
- return retval;
- }
-
- return ERROR_OK;
-}
-
-static int kinetis_ke_mdm_read_register(struct adiv5_dap *dap, unsigned reg, uint32_t *result)
-{
- int retval;
- retval = dap_queue_ap_read(dap_ap(dap, 1), reg, result);
- if (retval != ERROR_OK) {
- LOG_DEBUG("MDM: failed to queue a read request");
- return retval;
- }
-
- retval = dap_run(dap);
- if (retval != ERROR_OK) {
- LOG_DEBUG("MDM: dap_run failed");
- return retval;
- }
-
- LOG_DEBUG("MDM_REG[0x%02x]: %08" PRIX32, reg, *result);
- return ERROR_OK;
-}
-
-static int kinetis_ke_mdm_poll_register(struct adiv5_dap *dap, unsigned reg, uint32_t mask, uint32_t value)
-{
- uint32_t val;
- int retval;
- int timeout = MDM_ACCESS_TIMEOUT;
-
- do {
- retval = kinetis_ke_mdm_read_register(dap, reg, &val);
- if (retval != ERROR_OK || (val & mask) == value)
- return retval;
-
- alive_sleep(1);
- } while (timeout--);
-
- LOG_DEBUG("MDM: polling timed out");
- return ERROR_FAIL;
-}
-
-static int kinetis_ke_prepare_flash(struct flash_bank *bank)
-{
- struct target *target = bank->target;
- struct kinetis_ke_flash_bank *kinfo = bank->driver_priv;
- uint8_t c2, c3, c4, s = 0;
- uint16_t trim_value = 0;
- uint16_t timeout = 0;
- uint32_t bus_clock = 0;
- uint32_t bus_reg_val = 0;
- uint32_t bus_reg_addr = 0;
- uint32_t flash_clk_div;
- uint8_t fclkdiv;
- int result;
-
- /*
- * The RM states that the flash clock has to be set to 1MHz for writing and
- * erasing operations (otherwise it can damage the flash).
- * This function configures the entire clock tree to make sure we
- * run at the specified clock. We'll set FEI mode running from the ~32KHz
- * internal clock. So we need to:
- * - Trim internal clock.
- * - Configure the divider for ICSOUTCLK (ICS module).
- * - Configure the divider to get a bus clock (SIM module).
- * - Configure the flash clock that depends on the bus clock.
- *
- * For MKE02_40 and MKE02_20 we set ICSOUTCLK = 20MHz and bus clock = 20MHz.
- * For MKE04 and MKE06 we run at ICSOUTCLK = 48MHz and bus clock = 24MHz.
- */
-
- /*
- * Trim internal clock
- */
- switch (KINETIS_KE_SRSID_SUBFAMID(kinfo->sim_srsid)) {
-
- case KINETIS_KE_SRSID_KEX2:
- /* Both KE02_20 and KE02_40 should get the same trim value */
- trim_value = 0x4C;
- break;
-
- case KINETIS_KE_SRSID_KEX4:
- trim_value = 0x54;
- break;
-
- case KINETIS_KE_SRSID_KEX6:
- trim_value = 0x58;
- break;
- }
-
- result = target_read_u8(target, ICS_C4, &c4);
- if (result != ERROR_OK)
- return result;
-
- c3 = trim_value;
- c4 = (c4 & ~(ICS_C4_SCFTRIM_MASK)) | ((trim_value >> 8) & 0x01);
-
- result = target_write_u8(target, ICS_C3, c3);
- if (result != ERROR_OK)
- return result;
-
- result = target_write_u8(target, ICS_C4, c4);
- if (result != ERROR_OK)
- return result;
-
- result = target_read_u8(target, ICS_S, &s);
- if (result != ERROR_OK)
- return result;
-
- /* Wait */
- while (!(s & ICS_S_LOCK_MASK)) {
-
- if (timeout <= 1000) {
- timeout++;
- alive_sleep(1);
- } else {
- return ERROR_FAIL;
- }
-
- result = target_read_u8(target, ICS_S, &s);
- if (result != ERROR_OK)
- return result;
- }
-
- /* ... trim done ... */
-
- /*
- * Configure SIM (bus clock)
- */
- switch (KINETIS_KE_SRSID_SUBFAMID(kinfo->sim_srsid)) {
-
- /* KE02 sub-family operates on SIM_BUSDIV */
- case KINETIS_KE_SRSID_KEX2:
- bus_reg_val = 0;
- bus_reg_addr = SIM_BUSDIV;
- bus_clock = 20000000;
- break;
-
- /* KE04 and KE06 sub-family operates on SIM_CLKDIV
- * Clocks are divided by:
- * DIV1 = core clock = 48MHz
- * DIV2 = bus clock = 24Mhz
- * DIV3 = timer clocks
- * So we need to configure SIM_CLKDIV, DIV1 and DIV2 value
- */
- case KINETIS_KE_SRSID_KEX4:
- /* KE04 devices have the SIM_CLKDIV register at a different offset
- * depending on the pin count. */
- switch (KINETIS_KE_SRSID_PINCOUNT(kinfo->sim_srsid)) {
-
- /* 16, 20 and 24 pins */
- case 1:
- case 2:
- case 3:
- bus_reg_addr = SIM_CLKDIV_KE04_16_20_24;
- break;
-
- /* 44, 64 and 80 pins */
- case 5:
- case 7:
- case 8:
- bus_reg_addr = SIM_CLKDIV_KE04_44_64_80;
- break;
-
- default:
- LOG_ERROR("KE04 - Unknown pin count");
- return ERROR_FAIL;
- }
-
- bus_reg_val = SIM_CLKDIV_OUTDIV2_MASK;
- bus_clock = 24000000;
- break;
-
- case KINETIS_KE_SRSID_KEX6:
- bus_reg_val = SIM_CLKDIV_OUTDIV2_MASK;
- bus_reg_addr = SIM_CLKDIV_KE06;
- bus_clock = 24000000;
- break;
- }
-
- result = target_write_u32(target, bus_reg_addr, bus_reg_val);
- if (result != ERROR_OK)
- return result;
-
- /*
- * Configure ICS to FEI (internal source)
- */
- result = target_read_u8(target, ICS_C2, &c2);
- if (result != ERROR_OK)
- return result;
-
- c2 &= ~ICS_C2_BDIV_MASK;
-
- switch (KINETIS_KE_SRSID_SUBFAMID(kinfo->sim_srsid)) {
-
- case KINETIS_KE_SRSID_KEX2:
- /* Note: since there are two KE02 types, the KE02_40 @ 40MHz and the
- * KE02_20 @ 20MHz, we divide here the ~40MHz ICSFLLCLK down to 20MHz,
- * for compatibility.
- */
- c2 |= ICS_C2_BDIV(1);
- break;
-
- case KINETIS_KE_SRSID_KEX4:
- case KINETIS_KE_SRSID_KEX6:
- /* For KE04 and KE06, the ICSFLLCLK can be 48MHz. */
- c2 |= ICS_C2_BDIV(0);
- break;
- }
-
- result = target_write_u8(target, ICS_C2, c2);
- if (result != ERROR_OK)
- return result;
-
- /* Internal clock as reference (IREFS = 1) */
- result = target_write_u8(target, ICS_C1, 4);
- if (result != ERROR_OK)
- return result;
-
- /* Wait for FLL to lock */
- result = target_read_u8(target, ICS_S, &s);
- if (result != ERROR_OK)
- return result;
-
- while (!(s & ICS_S_LOCK_MASK)) {
-
- if (timeout <= 1000) {
- timeout++;
- alive_sleep(1);
- } else {
- return ERROR_FLASH_OPERATION_FAILED;
- }
-
- result = target_read_u8(target, ICS_S, &s);
- if (result != ERROR_OK)
- return result;
- }
-
- /*
- * Configure flash clock to 1MHz.
- */
- flash_clk_div = bus_clock / 1000000L - 1;
-
- /* Check if the FCLKDIV register is locked */
- result = target_read_u8(target, kinfo->ftmrx_fclkdiv_addr, &fclkdiv);
- if (result != ERROR_OK)
- return result;
-
- if (!(fclkdiv & FTMRX_FCLKDIV_FDIVLCK_MASK)) {
- /* Unlocked. Check if the register was configured, and if so, if it has the right value */
- if ((fclkdiv & FTMRX_FCLKDIV_FDIVLD_MASK) &&
- ((fclkdiv & FTMRX_FCLKDIV_FDIV_MASK) != FTMRX_FCLKDIV_FDIV(flash_clk_div))) {
- LOG_WARNING("Flash clock was already set and contains an invalid value.");
- LOG_WARNING("Please reset the target.");
- return ERROR_FAIL;
- }
-
- /* Finally, configure the flash clock */
- fclkdiv = (fclkdiv & ~(FTMRX_FCLKDIV_FDIV_MASK)) | FTMRX_FCLKDIV_FDIV(flash_clk_div);
- result = target_write_u8(target, kinfo->ftmrx_fclkdiv_addr, fclkdiv);
- if (result != ERROR_OK)
- return result;
- } else {
- /* Locked. Check if the current value is correct. */
- if ((fclkdiv & FTMRX_FCLKDIV_FDIV_MASK) != FTMRX_FCLKDIV_FDIV(flash_clk_div)) {
- LOG_WARNING("Flash clock register is locked and contains an invalid value.");
- LOG_WARNING("Please reset the target.");
- return ERROR_FAIL;
- }
- }
-
- LOG_INFO("Flash clock ready");
- return ERROR_OK;
-}
-
-int kinetis_ke_stop_watchdog(struct target *target)
-{
- struct working_area *watchdog_algorithm;
- struct armv7m_algorithm armv7m_info;
- int retval;
- uint8_t cs1;
-
- static const uint8_t watchdog_code[] = {
-#include "../../../contrib/loaders/flash/kinetis_ke/kinetis_ke_watchdog.inc"
- };
-
- if (target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- /* Check if the watchdog is enabled */
- retval = target_read_u8(target, WDOG_CS1, &cs1);
- if (retval != ERROR_OK)
- return retval;
-
- if (!(cs1 & 0x80)) {
- /* Already stopped */
- return ERROR_OK;
- }
-
- /* allocate working area with watchdog code */
- if (target_alloc_working_area(target, sizeof(watchdog_code), &watchdog_algorithm) != ERROR_OK) {
- LOG_WARNING("No working area available for watchdog algorithm");
- return ERROR_TARGET_RESOURCE_NOT_AVAILABLE;
- }
-
- retval = target_write_buffer(target, watchdog_algorithm->address,
- sizeof(watchdog_code), watchdog_code);
- if (retval != ERROR_OK)
- return retval;
-
- armv7m_info.common_magic = ARMV7M_COMMON_MAGIC;
- armv7m_info.core_mode = ARM_MODE_THREAD;
-
- retval = target_run_algorithm(target, 0, NULL, 0, NULL,
- watchdog_algorithm->address, 0, 100000, &armv7m_info);
- if (retval != ERROR_OK) {
- LOG_ERROR("Error executing Kinetis KE watchdog algorithm");
- retval = ERROR_FAIL;
- } else {
- LOG_INFO("Watchdog stopped");
- }
-
- target_free_working_area(target, watchdog_algorithm);
-
- return ERROR_OK;
-}
-
-COMMAND_HANDLER(kinetis_ke_disable_wdog_handler)
-{
- struct target *target = get_current_target(CMD_CTX);
-
- if (CMD_ARGC > 0)
- return ERROR_COMMAND_SYNTAX_ERROR;
-
- return kinetis_ke_stop_watchdog(target);
-}
-
-COMMAND_HANDLER(kinetis_ke_mdm_mass_erase)
-{
- struct target *target = get_current_target(CMD_CTX);
- struct cortex_m_common *cortex_m = target_to_cm(target);
- struct adiv5_dap *dap = cortex_m->armv7m.arm.dap;
-
- if (!dap) {
- LOG_ERROR("Cannot perform mass erase with a high-level adapter");
- return ERROR_FAIL;
- }
-
- int retval;
-
- /* According to chapter 18.3.7.2 of the KE02 reference manual */
-
- /* assert SRST */
- if (jtag_get_reset_config() & RESET_HAS_SRST)
- adapter_assert_reset();
-
- /*
- * 1. Reset the device by asserting RESET pin or DAP_CTRL[3]
- */
- retval = kinetis_ke_mdm_write_register(dap, MDM_REG_CTRL, MEM_CTRL_SYS_RES_REQ);
- if (retval != ERROR_OK)
- return retval;
-
- /*
- * ... Read the MDM-AP status register until the Flash Ready bit sets...
- */
- retval = kinetis_ke_mdm_poll_register(dap, MDM_REG_STAT,
- MDM_STAT_FREADY | MDM_STAT_SYSRES,
- MDM_STAT_FREADY);
- if (retval != ERROR_OK) {
- LOG_ERROR("MDM : flash ready timeout");
- return retval;
- }
-
- /*
- * 2. Set DAP_CTRL[0] bit to invoke debug mass erase via SWD
- * 3. Release reset by deasserting RESET pin or DAP_CTRL[3] bit via SWD.
- */
- retval = kinetis_ke_mdm_write_register(dap, MDM_REG_CTRL, MEM_CTRL_FMEIP);
- if (retval != ERROR_OK)
- return retval;
-
- /* As a sanity check make sure that device started mass erase procedure */
- retval = kinetis_ke_mdm_poll_register(dap, MDM_REG_STAT,
- MDM_STAT_FMEACK, MDM_STAT_FMEACK);
- if (retval != ERROR_OK)
- return retval;
-
- /*
- * 4. Wait till DAP_CTRL[0] bit is cleared (after mass erase completes,
- * DAP_CTRL[0] bit is cleared automatically).
- */
- retval = kinetis_ke_mdm_poll_register(dap, MDM_REG_CTRL,
- MEM_CTRL_FMEIP,
- 0);
- if (retval != ERROR_OK)
- return retval;
-
- if (jtag_get_reset_config() & RESET_HAS_SRST)
- adapter_deassert_reset();
-
- return ERROR_OK;
-}
-
-static const uint32_t kinetis_ke_known_mdm_ids[] = {
- 0x001C0020, /* Kinetis-L/M/V/E/KE Series */
-};
-
-/*
- * This function implements the procedure to connect to
- * SWD/JTAG on Kinetis K and L series of devices as it is described in
- * AN4835 "Production Flash Programming Best Practices for Kinetis K-
- * and L-series MCUs" Section 4.1.1
- */
-COMMAND_HANDLER(kinetis_ke_check_flash_security_status)
-{
- struct target *target = get_current_target(CMD_CTX);
- struct cortex_m_common *cortex_m = target_to_cm(target);
- struct adiv5_dap *dap = cortex_m->armv7m.arm.dap;
-
- if (!dap) {
- LOG_WARNING("Cannot check flash security status with a high-level adapter");
- return ERROR_OK;
- }
-
- uint32_t val;
- int retval;
-
- /*
- * ... The MDM-AP ID register can be read to verify that the
- * connection is working correctly...
- */
- retval = kinetis_ke_mdm_read_register(dap, MDM_REG_ID, &val);
- if (retval != ERROR_OK) {
- LOG_ERROR("MDM: failed to read ID register");
- goto fail;
- }
-
- bool found = false;
- for (size_t i = 0; i < ARRAY_SIZE(kinetis_ke_known_mdm_ids); i++) {
- if (val == kinetis_ke_known_mdm_ids[i]) {
- found = true;
- break;
- }
- }
-
- if (!found)
- LOG_WARNING("MDM: unknown ID %08" PRIX32, val);
-
- /*
- * ... Read the MDM-AP status register until the Flash Ready bit sets...
- */
- retval = kinetis_ke_mdm_poll_register(dap, MDM_REG_STAT,
- MDM_STAT_FREADY,
- MDM_STAT_FREADY);
- if (retval != ERROR_OK) {
- LOG_ERROR("MDM: flash ready timeout");
- goto fail;
- }
-
- /*
- * ... Read the System Security bit to determine if security is enabled.
- * If System Security = 0, then proceed. If System Security = 1, then
- * communication with the internals of the processor, including the
- * flash, will not be possible without issuing a mass erase command or
- * unsecuring the part through other means (backdoor key unlock)...
- */
- retval = kinetis_ke_mdm_read_register(dap, MDM_REG_STAT, &val);
- if (retval != ERROR_OK) {
- LOG_ERROR("MDM: failed to read MDM_REG_STAT");
- goto fail;
- }
-
- if (val & MDM_STAT_SYSSEC) {
- jtag_poll_set_enabled(false);
-
- LOG_WARNING("*********** ATTENTION! ATTENTION! ATTENTION! ATTENTION! **********");
- LOG_WARNING("**** ****");
- LOG_WARNING("**** Your Kinetis MCU is in secured state, which means that, ****");
- LOG_WARNING("**** with exception for very basic communication, JTAG/SWD ****");
- LOG_WARNING("**** interface will NOT work. In order to restore its ****");
- LOG_WARNING("**** functionality please issue 'kinetis_ke mdm mass_erase' ****");
- LOG_WARNING("**** command, power cycle the MCU and restart OpenOCD. ****");
- LOG_WARNING("**** ****");
- LOG_WARNING("*********** ATTENTION! ATTENTION! ATTENTION! ATTENTION! **********");
- } else {
- LOG_INFO("MDM: Chip is unsecured. Continuing.");
- jtag_poll_set_enabled(true);
- }
-
- return ERROR_OK;
-
-fail:
- LOG_ERROR("MDM: Failed to check security status of the MCU. Cannot proceed further");
- jtag_poll_set_enabled(false);
- return retval;
-}
-
-FLASH_BANK_COMMAND_HANDLER(kinetis_ke_flash_bank_command)
-{
- struct kinetis_ke_flash_bank *bank_info;
-
- if (CMD_ARGC < 6)
- return ERROR_COMMAND_SYNTAX_ERROR;
-
- LOG_INFO("add flash_bank kinetis_ke %s", bank->name);
-
- bank_info = malloc(sizeof(struct kinetis_ke_flash_bank));
-
- memset(bank_info, 0, sizeof(struct kinetis_ke_flash_bank));
-
- bank->driver_priv = bank_info;
-
- return ERROR_OK;
-}
-
-/* Kinetis Program-LongWord Microcodes */
-static uint8_t kinetis_ke_flash_write_code[] = {
-#include "../../../contrib/loaders/flash/kinetis_ke/kinetis_ke_flash.inc"
-};
-
-static int kinetis_ke_write_words(struct flash_bank *bank, const uint8_t *buffer,
- uint32_t offset, uint32_t words)
-{
- struct kinetis_ke_flash_bank *kinfo = bank->driver_priv;
- struct target *target = bank->target;
- uint32_t ram_buffer_size = 512 + 16;
- struct working_area *write_algorithm;
- struct working_area *source;
- uint32_t address = bank->base + offset;
- struct reg_param reg_params[4];
- struct armv7m_algorithm armv7m_info;
- int retval = ERROR_OK;
- uint32_t flash_code_size;
-
- LOG_INFO("Kinetis KE: FLASH Write ...");
-
- /* allocate working area with flash programming code */
- if (target_alloc_working_area(target, sizeof(kinetis_ke_flash_write_code),
- &write_algorithm) != ERROR_OK) {
- LOG_WARNING("no working area available, can't do block memory writes");
- return ERROR_TARGET_RESOURCE_NOT_AVAILABLE;
- }
-
- /* Patch the FTMRx registers addresses */
- flash_code_size = sizeof(kinetis_ke_flash_write_code);
- buf_set_u32(&kinetis_ke_flash_write_code[flash_code_size-16], 0, 32, kinfo->ftmrx_fstat_addr);
- buf_set_u32(&kinetis_ke_flash_write_code[flash_code_size-12], 0, 32, kinfo->ftmrx_fccobix_addr);
- buf_set_u32(&kinetis_ke_flash_write_code[flash_code_size-8], 0, 32, kinfo->ftmrx_fccobhi_addr);
- buf_set_u32(&kinetis_ke_flash_write_code[flash_code_size-4], 0, 32, kinfo->ftmrx_fccoblo_addr);
-
- retval = target_write_buffer(target, write_algorithm->address,
- sizeof(kinetis_ke_flash_write_code), kinetis_ke_flash_write_code);
- if (retval != ERROR_OK)
- return retval;
-
- /* memory buffer */
- if (target_alloc_working_area(target, ram_buffer_size, &source) != ERROR_OK) {
- /* free working area, write algorithm already allocated */
- target_free_working_area(target, write_algorithm);
-
- LOG_WARNING("No large enough working area available, can't do block memory writes");
- return ERROR_TARGET_RESOURCE_NOT_AVAILABLE;
- }
-
- armv7m_info.common_magic = ARMV7M_COMMON_MAGIC;
- armv7m_info.core_mode = ARM_MODE_THREAD;
-
- init_reg_param(®_params[0], "r0", 32, PARAM_IN_OUT);
- init_reg_param(®_params[1], "r1", 32, PARAM_OUT);
- init_reg_param(®_params[2], "r2", 32, PARAM_OUT);
- init_reg_param(®_params[3], "r3", 32, PARAM_OUT);
-
- buf_set_u32(reg_params[0].value, 0, 32, address);
- buf_set_u32(reg_params[1].value, 0, 32, words);
- buf_set_u32(reg_params[2].value, 0, 32, source->address);
- buf_set_u32(reg_params[3].value, 0, 32, source->address + source->size);
-
- retval = target_run_flash_async_algorithm(target, buffer, words, 4,
- 0, NULL,
- 4, reg_params,
- source->address, source->size,
- write_algorithm->address, 0,
- &armv7m_info);
-
- if (retval == ERROR_FLASH_OPERATION_FAILED) {
- if (buf_get_u32(reg_params[0].value, 0, 32) & FTMRX_ERROR_ACCERR)
- LOG_ERROR("flash access error");
-
- if (buf_get_u32(reg_params[0].value, 0, 32) & FTMRX_ERROR_FPVIOL)
- LOG_ERROR("flash protection violation");
- }
-
- target_free_working_area(target, source);
- target_free_working_area(target, write_algorithm);
-
- destroy_reg_param(®_params[0]);
- destroy_reg_param(®_params[1]);
- destroy_reg_param(®_params[2]);
- destroy_reg_param(®_params[3]);
-
- return retval;
-}
-
-static int kinetis_ke_protect(struct flash_bank *bank, int set, int first, int last)
-{
- LOG_WARNING("kinetis_ke_protect not supported yet");
- /* FIXME: TODO */
-
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- return ERROR_FLASH_BANK_INVALID;
-}
-
-static int kinetis_ke_protect_check(struct flash_bank *bank)
-{
- struct kinetis_ke_flash_bank *kinfo = bank->driver_priv;
-
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- int result;
- uint8_t fprot;
- uint8_t fpopen, fpldis, fphdis;
- uint8_t fphs, fpls;
- uint32_t lprot_size = 0, hprot_size = 0;
- uint32_t lprot_to = 0, hprot_from = 0;
-
- /* read protection register */
- result = target_read_u8(bank->target, kinfo->ftmrx_fprot_addr, &fprot);
-
- if (result != ERROR_OK)
- return result;
-
- fpopen = fprot & 0x80;
- fpldis = fprot & 0x04;
- fphdis = fprot & 0x20;
- fphs = (fprot >> 3) & 0x03;
- fpls = fprot & 0x03;
-
- /* Fully unprotected? */
- if (fpopen && fpldis && fphdis) {
- LOG_WARNING("No flash protection found.");
-
- for (uint32_t i = 0; i < (uint32_t) bank->num_sectors; i++)
- bank->sectors[i].is_protected = 0;
-
- kinfo->protection_size = 0;
- } else {
- LOG_WARNING("Flash protected. FPOPEN=%i FPLDIS=%i FPHDIS=%i FPLS=%i FPHS=%i", \
- fpopen ? 1 : 0, fpldis ? 1 : 0, fphdis ? 1 : 0, fpls, fphs);
-
- /* Retrieve which region is protected and how much */
- if (fpopen) {
- if (fpldis == 0)
- lprot_size = (kinfo->sector_size * 4) << fpls;
-
- if (fphdis == 0)
- hprot_size = (kinfo->sector_size * 2) << fphs;
- } else {
- if (fpldis == 1)
- lprot_size = (kinfo->sector_size * 4) << fpls;
-
- if (fphdis == 1)
- hprot_size = (kinfo->sector_size * 2) << fphs;
- }
-
- kinfo->protection_size = lprot_size + hprot_size;
-
- /* lprot_to indicates up to where the lower region is protected */
- lprot_to = lprot_size / kinfo->sector_size;
-
- /* hprot_from indicates from where the upper region is protected */
- hprot_from = (0x8000 - hprot_size) / kinfo->sector_size;
-
- for (uint32_t i = 0; i < (uint32_t) bank->num_sectors; i++) {
-
- /* Check if the sector is in the lower region */
- if (bank->sectors[i].offset < 0x4000) {
- /* Compare the sector start address against lprot_to */
- if (lprot_to && (i < lprot_to))
- bank->sectors[i].is_protected = 1;
- else
- bank->sectors[i].is_protected = 0;
-
- /* Check if the sector is between the lower and upper region
- * OR after the upper region */
- } else if (bank->sectors[i].offset < 0x6000 || bank->sectors[i].offset >= 0x8000) {
- /* If fpopen is 1 then these regions are protected */
- if (fpopen)
- bank->sectors[i].is_protected = 0;
- else
- bank->sectors[i].is_protected = 1;
-
- /* Check if the sector is in the upper region */
- } else if (bank->sectors[i].offset < 0x8000) {
- if (hprot_from && (i > hprot_from))
- bank->sectors[i].is_protected = 1;
- else
- bank->sectors[i].is_protected = 0;
- }
- }
- }
-
- return ERROR_OK;
-}
-
-static int kinetis_ke_ftmrx_command(struct flash_bank *bank, uint8_t count,
- uint8_t *FCCOBIX, uint8_t *FCCOBHI, uint8_t *FCCOBLO, uint8_t *fstat)
-{
- uint8_t i;
- int result;
- struct target *target = bank->target;
- struct kinetis_ke_flash_bank *kinfo = bank->driver_priv;
- uint32_t timeout = 0;
-
- /* Clear error flags */
- result = target_write_u8(target, kinfo->ftmrx_fstat_addr, 0x30);
- if (result != ERROR_OK)
- return result;
-
- for (i = 0; i < count; i++) {
- /* Write index */
- result = target_write_u8(target, kinfo->ftmrx_fccobix_addr, FCCOBIX[i]);
- if (result != ERROR_OK)
- return result;
-
- /* Write high part */
- result = target_write_u8(target, kinfo->ftmrx_fccobhi_addr, FCCOBHI[i]);
- if (result != ERROR_OK)
- return result;
-
- /* Write low part (that is not always required) */
- if (FCCOBLO) {
- result = target_write_u8(target, kinfo->ftmrx_fccoblo_addr, FCCOBLO[i]);
- if (result != ERROR_OK)
- return result;
- }
- }
-
- /* Launch the command */
- result = target_write_u8(target, kinfo->ftmrx_fstat_addr, 0x80);
- if (result != ERROR_OK)
- return result;
-
- /* Wait for it to finish */
- result = target_read_u8(target, kinfo->ftmrx_fstat_addr, fstat);
- if (result != ERROR_OK)
- return result;
-
- while (!(*fstat & FTMRX_FSTAT_CCIF_MASK)) {
- if (timeout <= 1000) {
- timeout++;
- alive_sleep(1);
- } else {
- return ERROR_FLASH_OPERATION_FAILED;
- }
-
- result = target_read_u8(target, kinfo->ftmrx_fstat_addr, fstat);
- if (result != ERROR_OK)
- return result;
- }
-
- return ERROR_OK;
-}
-
-COMMAND_HANDLER(kinetis_ke_securing_test)
-{
- int result;
- struct target *target = get_current_target(CMD_CTX);
- struct flash_bank *bank = NULL;
- uint32_t address;
-
- uint8_t FCCOBIX[2], FCCOBHI[2], FCCOBLO[2], fstat;
-
- result = get_flash_bank_by_addr(target, 0x00000000, true, &bank);
- if (result != ERROR_OK)
- return result;
-
- assert(bank != NULL);
-
- if (target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- address = bank->base + 0x00000400;
-
- FCCOBIX[0] = 0;
- FCCOBHI[0] = FTMRX_CMD_ERASESECTOR;
- FCCOBLO[0] = address >> 16;
-
- FCCOBIX[1] = 1;
- FCCOBHI[1] = address >> 8;
- FCCOBLO[1] = address;
-
- return kinetis_ke_ftmrx_command(bank, 2, FCCOBIX, FCCOBHI, FCCOBLO, &fstat);
-}
-
-static int kinetis_ke_erase(struct flash_bank *bank, int first, int last)
-{
- int result, i;
- uint8_t FCCOBIX[2], FCCOBHI[2], FCCOBLO[2], fstat;
- bool fcf_erased = false;
-
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- if ((first > bank->num_sectors) || (last > bank->num_sectors))
- return ERROR_FLASH_OPERATION_FAILED;
-
- result = kinetis_ke_prepare_flash(bank);
- if (result != ERROR_OK)
- return result;
-
- for (i = first; i <= last; i++) {
- FCCOBIX[0] = 0;
- FCCOBHI[0] = FTMRX_CMD_ERASESECTOR;
- FCCOBLO[0] = (bank->base + bank->sectors[i].offset) >> 16;
-
- FCCOBIX[1] = 1;
- FCCOBHI[1] = (bank->base + bank->sectors[i].offset) >> 8;
- FCCOBLO[1] = (bank->base + bank->sectors[i].offset);
-
- result = kinetis_ke_ftmrx_command(bank, 2, FCCOBIX, FCCOBHI, FCCOBLO, &fstat);
-
- if (result != ERROR_OK) {
- LOG_WARNING("erase sector %d failed", i);
- return ERROR_FLASH_OPERATION_FAILED;
- }
-
- bank->sectors[i].is_erased = 1;
-
- if (i == 2)
- fcf_erased = true;
- }
-
- if (fcf_erased) {
- LOG_WARNING
- ("flash configuration field erased, please reset the device");
- }
-
- return ERROR_OK;
-}
-
-static int kinetis_ke_write(struct flash_bank *bank, const uint8_t *buffer,
- uint32_t offset, uint32_t count)
-{
- int result;
- uint8_t *new_buffer = NULL;
- uint32_t words = count / 4;
-
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- if (offset > bank->size)
- return ERROR_FLASH_BANK_INVALID;
-
- if (offset & 0x3) {
- LOG_WARNING("offset 0x%" PRIx32 " breaks the required alignment", offset);
- return ERROR_FLASH_DST_BREAKS_ALIGNMENT;
- }
-
- result = kinetis_ke_stop_watchdog(bank->target);
- if (result != ERROR_OK)
- return result;
-
- result = kinetis_ke_prepare_flash(bank);
- if (result != ERROR_OK)
- return result;
-
- if (count & 0x3) {
- uint32_t old_count = count;
- count = (old_count | 3) + 1;
- new_buffer = malloc(count);
- if (new_buffer == NULL) {
- LOG_ERROR("odd number of bytes to write and no memory "
- "for padding buffer");
- return ERROR_FAIL;
- }
-
- LOG_INFO("odd number of bytes to write (%" PRIu32 "), extending to %" PRIu32 " "
- "and padding with 0xff", old_count, count);
-
- memset(new_buffer, 0xff, count);
- buffer = memcpy(new_buffer, buffer, old_count);
- words++;
- }
-
- result = kinetis_ke_write_words(bank, buffer, offset, words);
- free(new_buffer);
-
- return result;
-}
-
-static int kinetis_ke_probe(struct flash_bank *bank)
-{
- int result, i;
- uint32_t offset = 0;
- struct target *target = bank->target;
- struct kinetis_ke_flash_bank *kinfo = bank->driver_priv;
-
- result = target_read_u32(target, SIM_SRSID, &kinfo->sim_srsid);
- if (result != ERROR_OK)
- return result;
-
- if (KINETIS_KE_SRSID_FAMID(kinfo->sim_srsid) != 0x00) {
- LOG_ERROR("Unsupported KE family");
- return ERROR_FLASH_OPER_UNSUPPORTED;
- }
-
- switch (KINETIS_KE_SRSID_SUBFAMID(kinfo->sim_srsid)) {
- case KINETIS_KE_SRSID_KEX2:
- LOG_INFO("KE02 sub-family");
- break;
-
- case KINETIS_KE_SRSID_KEX4:
- LOG_INFO("KE04 sub-family");
- break;
-
- case KINETIS_KE_SRSID_KEX6:
- LOG_INFO("KE06 sub-family");
- break;
-
- default:
- LOG_ERROR("Unsupported KE sub-family");
- return ERROR_FLASH_OPER_UNSUPPORTED;
- }
-
- /* We can only retrieve the ke0x part, but there is no way to know
- * the flash size, so assume the maximum flash size for the entire
- * sub family.
- */
- bank->base = 0x00000000;
- kinfo->sector_size = 512;
-
- switch (KINETIS_KE_SRSID_SUBFAMID(kinfo->sim_srsid)) {
-
- case KINETIS_KE_SRSID_KEX2:
- /* Max. 64KB */
- bank->size = 0x00010000;
- bank->num_sectors = 128;
-
- /* KE02 uses the FTMRH flash controller,
- * and registers have a different offset from the
- * FTMRE flash controller. Sort this out here.
- */
- kinfo->ftmrx_fclkdiv_addr = 0x40020000;
- kinfo->ftmrx_fccobix_addr = 0x40020002;
- kinfo->ftmrx_fstat_addr = 0x40020006;
- kinfo->ftmrx_fprot_addr = 0x40020008;
- kinfo->ftmrx_fccobhi_addr = 0x4002000A;
- kinfo->ftmrx_fccoblo_addr = 0x4002000B;
- break;
-
- case KINETIS_KE_SRSID_KEX6:
- case KINETIS_KE_SRSID_KEX4:
- /* Max. 128KB */
- bank->size = 0x00020000;
- bank->num_sectors = 256;
-
- /* KE04 and KE06 use the FTMRE flash controller,
- * and registers have a different offset from the
- * FTMRH flash controller. Sort this out here.
- */
- kinfo->ftmrx_fclkdiv_addr = 0x40020003;
- kinfo->ftmrx_fccobix_addr = 0x40020001;
- kinfo->ftmrx_fstat_addr = 0x40020005;
- kinfo->ftmrx_fprot_addr = 0x4002000B;
- kinfo->ftmrx_fccobhi_addr = 0x40020009;
- kinfo->ftmrx_fccoblo_addr = 0x40020008;
- break;
- }
-
- if (bank->sectors) {
- free(bank->sectors);
- bank->sectors = NULL;
- }
-
- assert(bank->num_sectors > 0);
- bank->sectors = malloc(sizeof(struct flash_sector) * bank->num_sectors);
-
- for (i = 0; i < bank->num_sectors; i++) {
- bank->sectors[i].offset = offset;
- bank->sectors[i].size = kinfo->sector_size;
- offset += kinfo->sector_size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
-
- return ERROR_OK;
-}
-
-static int kinetis_ke_auto_probe(struct flash_bank *bank)
-{
- struct kinetis_ke_flash_bank *kinfo = bank->driver_priv;
-
- if (kinfo->sim_srsid)
- return ERROR_OK;
-
- return kinetis_ke_probe(bank);
-}
-
-static int kinetis_ke_info(struct flash_bank *bank, char *buf, int buf_size)
-{
- (void) snprintf(buf, buf_size,
- "%s driver for flash bank %s at 0x%8.8" PRIx32 "",
- bank->driver->name, bank->name, bank->base);
-
- return ERROR_OK;
-}
-
-static int kinetis_ke_blank_check(struct flash_bank *bank)
-{
- uint8_t FCCOBIX[3], FCCOBHI[3], FCCOBLO[3], fstat;
- uint16_t longwords = 0;
- int result;
-
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- result = kinetis_ke_prepare_flash(bank);
- if (result != ERROR_OK)
- return result;
-
- /* check if whole bank is blank */
- FCCOBIX[0] = 0;
- FCCOBHI[0] = FTMRX_CMD_ALLERASED;
-
- result = kinetis_ke_ftmrx_command(bank, 1, FCCOBIX, FCCOBHI, NULL, &fstat);
-
- if (result != ERROR_OK)
- return result;
-
- if (fstat & (FTMRX_FSTAT_MGSTAT0_MASK | FTMRX_FSTAT_MGSTAT1_MASK)) {
- /* the whole bank is not erased, check sector-by-sector */
- int i;
-
- for (i = 0; i < bank->num_sectors; i++) {
- FCCOBIX[0] = 0;
- FCCOBHI[0] = FTMRX_CMD_SECTIONERASED;
- FCCOBLO[0] = (bank->base + bank->sectors[i].offset) >> 16;
-
- FCCOBIX[1] = 1;
- FCCOBHI[1] = (bank->base + bank->sectors[i].offset) >> 8;
- FCCOBLO[1] = (bank->base + bank->sectors[i].offset);
-
- longwords = 128;
-
- FCCOBIX[2] = 2;
- FCCOBHI[2] = longwords >> 8;
- FCCOBLO[2] = longwords;
-
- result = kinetis_ke_ftmrx_command(bank, 3, FCCOBIX, FCCOBHI, FCCOBLO, &fstat);
-
- if (result == ERROR_OK) {
- bank->sectors[i].is_erased = !(fstat & (FTMRX_FSTAT_MGSTAT0_MASK | FTMRX_FSTAT_MGSTAT1_MASK));
- } else {
- LOG_DEBUG("Ignoring errored PFlash sector blank-check");
- bank->sectors[i].is_erased = -1;
- }
- }
- } else {
- /* the whole bank is erased, update all sectors */
- int i;
- for (i = 0; i < bank->num_sectors; i++)
- bank->sectors[i].is_erased = 1;
- }
-
- return ERROR_OK;
-}
-
-static const struct command_registration kinetis_ke_security_command_handlers[] = {
- {
- .name = "check_security",
- .mode = COMMAND_EXEC,
- .help = "",
- .usage = "",
- .handler = kinetis_ke_check_flash_security_status,
- },
- {
- .name = "mass_erase",
- .mode = COMMAND_EXEC,
- .help = "",
- .usage = "",
- .handler = kinetis_ke_mdm_mass_erase,
- },
- {
- .name = "test_securing",
- .mode = COMMAND_EXEC,
- .help = "",
- .usage = "",
- .handler = kinetis_ke_securing_test,
- },
- COMMAND_REGISTRATION_DONE
-};
-
-static const struct command_registration kinetis_ke_exec_command_handlers[] = {
- {
- .name = "mdm",
- .mode = COMMAND_ANY,
- .help = "",
- .usage = "",
- .chain = kinetis_ke_security_command_handlers,
- },
- {
- .name = "disable_wdog",
- .mode = COMMAND_EXEC,
- .help = "Disable the watchdog timer",
- .usage = "",
- .handler = kinetis_ke_disable_wdog_handler,
- },
- COMMAND_REGISTRATION_DONE
-};
-
-static const struct command_registration kinetis_ke_command_handler[] = {
- {
- .name = "kinetis_ke",
- .mode = COMMAND_ANY,
- .help = "Kinetis KE NAND flash controller commands",
- .usage = "",
- .chain = kinetis_ke_exec_command_handlers,
- },
- COMMAND_REGISTRATION_DONE
-};
-
-struct flash_driver kinetis_ke_flash = {
- .name = "kinetis_ke",
- .commands = kinetis_ke_command_handler,
- .flash_bank_command = kinetis_ke_flash_bank_command,
- .erase = kinetis_ke_erase,
- .protect = kinetis_ke_protect,
- .write = kinetis_ke_write,
- .read = default_flash_read,
- .probe = kinetis_ke_probe,
- .auto_probe = kinetis_ke_auto_probe,
- .erase_check = kinetis_ke_blank_check,
- .protect_check = kinetis_ke_protect_check,
- .info = kinetis_ke_info,
-};
http://git-wip-us.apache.org/repos/asf/incubator-mynewt-site/blob/69f466b5/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/lpc2000.c
----------------------------------------------------------------------
diff --git a/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/lpc2000.c b/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/lpc2000.c
deleted file mode 100755
index cc10a3b..0000000
--- a/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/lpc2000.c
+++ /dev/null
@@ -1,1575 +0,0 @@
-/***************************************************************************
- * Copyright (C) 2005 by Dominic Rath *
- * Dominic.Rath@gmx.de *
- * *
- * LPC1700 support Copyright (C) 2009 by Audrius Urmanavicius *
- * didele.deze@gmail.com *
- * *
- * LPC1100 variant and auto-probing support Copyright (C) 2014 *
- * by Cosmin Gorgovan cosmin [at] linux-geek [dot] org *
- * *
- * LPC800/LPC1500/LPC54100 support Copyright (C) 2013/2014 *
- * by Nemui Trinomius *
- * nemuisan_kawausogasuki@live.jp *
- * *
- * This program is free software; you can redistribute it and/or modify *
- * it under the terms of the GNU General Public License as published by *
- * the Free Software Foundation; either version 2 of the License, or *
- * (at your option) any later version. *
- * *
- * This program is distributed in the hope that it will be useful, *
- * but WITHOUT ANY WARRANTY; without even the implied warranty of *
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
- * GNU General Public License for more details. *
- * *
- * You should have received a copy of the GNU General Public License *
- * along with this program; if not, write to the *
- * Free Software Foundation, Inc., *
- * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. *
- ***************************************************************************/
-
-#ifdef HAVE_CONFIG_H
-#include "config.h"
-#endif
-
-#include "imp.h"
-#include <helper/binarybuffer.h>
-#include <target/algorithm.h>
-#include <target/arm_opcodes.h>
-#include <target/armv7m.h>
-
-/**
- * @file
- * flash programming support for NXP LPC8xx,LPC1xxx,LPC4xxx,LP5410x and LPC2xxx devices.
- *
- * @todo Provide a way to update CCLK after declaring the flash bank. The value which is correct after chip reset will
- * rarely still work right after the clocks switch to use the PLL (e.g. 4MHz --> 100 MHz).
- */
-/*
- * currently supported devices:
- * variant 1 (lpc2000_v1):
- * - 2104 | 5 | 6
- * - 2114 | 9
- * - 2124 | 9
- * - 2194
- * - 2212 | 4
- * - 2292 | 4
- *
- * variant 2 (lpc2000_v2):
- * - 213x
- * - 214x
- * - 2101 | 2 | 3
- * - 2364 | 6 | 8
- * - 2378
- *
- * lpc1700:
- * - 175x
- * - 176x (tested with LPC1768)
- * - 177x
- * - 178x (tested with LPC1788)
- *
- * lpc4000: (lpc1700's alias)
- * - 407x
- * - 408x (tested with LPC4088)
- *
- * lpc4300: (also available as lpc1800 - alias)
- * - 43x2 | 3 | 5 | 7 (tested with LPC4337/LPC4357)
- * - 18x2 | 3 | 5 | 7
- *
- * lpc800:
- * - 810 | 1 | 2 (tested with LPC810/LPC811/LPC812)
- * - 822 | 4 (tested with LPC824)
- *
- * lpc1100:
- * - 11xx
- * - 11Axx
- * - 11Cxx
- * - 11Dxx
- * - 11Exx
- * - 11Uxx (tested with LPC11U34)
- * - 131x
- * - 134x
- *
- * lpc1500:
- * - 15x7 | 8 | 9 (tested with LPC1549)
- *
- * lpc54100:
- * - 54101 | 2 (tested with LPC54102)
- *
- * The auto variant auto-detects parts from the following series:
- * - 11xx
- * - 11Axx
- * - 11Cxx
- * - 11Dxx
- * - 11Exx
- * - 11Uxx
- * - 131x
- * - 134x
- * - 175x
- * - 176x
- * - 177x
- * - 178x
- * - 407x
- * - 408x
- * - 81x
- * - 82x
- */
-
-/* Part IDs for autodetection */
-/* A script which can automatically extract part ids from user manuals is available here:
- * https://github.com/lgeek/lpc_part_ids
- */
-#define LPC1110_1 0x0A07102B
-#define LPC1110_2 0x1A07102B
-#define LPC1111_002_1 0x0A16D02B
-#define LPC1111_002_2 0x1A16D02B
-#define LPC1111_101_1 0x041E502B
-#define LPC1111_101_2 0x2516D02B
-#define LPC1111_103_1 0x00010013
-#define LPC1111_201_1 0x0416502B
-#define LPC1111_201_2 0x2516902B
-#define LPC1111_203_1 0x00010012
-#define LPC1112_101_1 0x042D502B
-#define LPC1112_101_2 0x2524D02B
-#define LPC1112_102_1 0x0A24902B
-#define LPC1112_102_2 0x1A24902B
-#define LPC1112_103_1 0x00020023
-#define LPC1112_201_1 0x0425502B
-#define LPC1112_201_2 0x2524902B
-#define LPC1112_203_1 0x00020022
-#define LPC1113_201_1 0x0434502B
-#define LPC1113_201_2 0x2532902B
-#define LPC1113_203_1 0x00030032
-#define LPC1113_301_1 0x0434102B
-#define LPC1113_301_2 0x2532102B
-#define LPC1113_303_1 0x00030030
-#define LPC1114_102_1 0x0A40902B
-#define LPC1114_102_2 0x1A40902B
-#define LPC1114_201_1 0x0444502B
-#define LPC1114_201_2 0x2540902B
-#define LPC1114_203_1 0x00040042
-#define LPC1114_301_1 0x0444102B
-#define LPC1114_301_2 0x2540102B
-#define LPC1114_303_1 0x00040040
-#define LPC1114_323_1 0x00040060
-#define LPC1114_333_1 0x00040070
-#define LPC1115_303_1 0x00050080
-
-#define LPC11A02_1 0x4D4C802B
-#define LPC11A04_1 0x4D80002B
-#define LPC11A11_001_1 0x455EC02B
-#define LPC11A12_101_1 0x4574802B
-#define LPC11A13_201_1 0x458A402B
-#define LPC11A14_301_1 0x35A0002B
-#define LPC11A14_301_2 0x45A0002B
-
-#define LPC11C12_301_1 0x1421102B
-#define LPC11C14_301_1 0x1440102B
-#define LPC11C22_301_1 0x1431102B
-#define LPC11C24_301_1 0x1430102B
-
-#define LPC11E11_101 0x293E902B
-#define LPC11E12_201 0x2954502B
-#define LPC11E13_301 0x296A102B
-#define LPC11E14_401 0x2980102B
-#define LPC11E36_501 0x00009C41
-#define LPC11E37_401 0x00007C45
-#define LPC11E37_501 0x00007C41
-
-#define LPC11U12_201_1 0x095C802B
-#define LPC11U12_201_2 0x295C802B
-#define LPC11U13_201_1 0x097A802B
-#define LPC11U13_201_2 0x297A802B
-#define LPC11U14_201_1 0x0998802B
-#define LPC11U14_201_2 0x2998802B
-#define LPC11U23_301 0x2972402B
-#define LPC11U24_301 0x2988402B
-#define LPC11U24_401 0x2980002B
-#define LPC11U34_311 0x0003D440
-#define LPC11U34_421 0x0001CC40
-#define LPC11U35_401 0x0001BC40
-#define LPC11U35_501 0x0000BC40
-#define LPC11U36_401 0x00019C40
-#define LPC11U37_401 0x00017C40
-#define LPC11U37H_401 0x00007C44
-#define LPC11U37_501 0x00007C40
-
-#define LPC11E66 0x0000DCC1
-#define LPC11E67 0x0000BC81
-#define LPC11E68 0x00007C01
-
-#define LPC11U66 0x0000DCC8
-#define LPC11U67_1 0x0000BC88
-#define LPC11U67_2 0x0000BC80
-#define LPC11U68_1 0x00007C08
-#define LPC11U68_2 0x00007C00
-
-#define LPC1311 0x2C42502B
-#define LPC1311_1 0x1816902B
-#define LPC1313 0x2C40102B
-#define LPC1313_1 0x1830102B
-#define LPC1315 0x3A010523
-#define LPC1316 0x1A018524
-#define LPC1317 0x1A020525
-#define LPC1342 0x3D01402B
-#define LPC1343 0x3D00002B
-#define LPC1343_1 0x3000002B
-#define LPC1345 0x28010541
-#define LPC1346 0x08018542
-#define LPC1347 0x08020543
-
-#define LPC1751_1 0x25001110
-#define LPC1751_2 0x25001118
-#define LPC1752 0x25001121
-#define LPC1754 0x25011722
-#define LPC1756 0x25011723
-#define LPC1758 0x25013F37
-#define LPC1759 0x25113737
-#define LPC1763 0x26012033
-#define LPC1764 0x26011922
-#define LPC1765 0x26013733
-#define LPC1766 0x26013F33
-#define LPC1767 0x26012837
-#define LPC1768 0x26013F37
-#define LPC1769 0x26113F37
-#define LPC1774 0x27011132
-#define LPC1776 0x27191F43
-#define LPC1777 0x27193747
-#define LPC1778 0x27193F47
-#define LPC1785 0x281D1743
-#define LPC1786 0x281D1F43
-#define LPC1787 0x281D3747
-#define LPC1788 0x281D3F47
-
-#define LPC4072 0x47011121
-#define LPC4074 0x47011132
-#define LPC4076 0x47191F43
-#define LPC4078 0x47193F47
-#define LPC4088 0x481D3F47
-
-#define LPC810_021 0x00008100
-#define LPC811_001 0x00008110
-#define LPC812_101 0x00008120
-#define LPC812_101_1 0x00008121
-#define LPC812_101_2 0x00008122
-#define LPC812_101_3 0x00008123
-
-#define LPC822_101 0x00008221
-#define LPC822_101_1 0x00008222
-#define LPC824_201 0x00008241
-#define LPC824_201_1 0x00008242
-
-#define IAP_CODE_LEN 0x34
-
-typedef enum {
- lpc2000_v1,
- lpc2000_v2,
- lpc1700,
- lpc4300,
- lpc800,
- lpc1100,
- lpc1500,
- lpc54100,
- lpc_auto,
-} lpc2000_variant;
-
-struct lpc2000_flash_bank {
- lpc2000_variant variant;
- uint32_t cclk;
- int cmd51_dst_boundary;
- int calc_checksum;
- uint32_t cmd51_max_buffer;
- int checksum_vector;
- uint32_t iap_max_stack;
- uint32_t lpc4300_bank;
- bool probed;
-};
-
-enum lpc2000_status_codes {
- LPC2000_CMD_SUCCESS = 0,
- LPC2000_INVALID_COMMAND = 1,
- LPC2000_SRC_ADDR_ERROR = 2,
- LPC2000_DST_ADDR_ERROR = 3,
- LPC2000_SRC_ADDR_NOT_MAPPED = 4,
- LPC2000_DST_ADDR_NOT_MAPPED = 5,
- LPC2000_COUNT_ERROR = 6,
- LPC2000_INVALID_SECTOR = 7,
- LPC2000_SECTOR_NOT_BLANK = 8,
- LPC2000_SECTOR_NOT_PREPARED = 9,
- LPC2000_COMPARE_ERROR = 10,
- LPC2000_BUSY = 11,
- LPC2000_PARAM_ERROR = 12,
- LPC2000_ADDR_ERROR = 13,
- LPC2000_ADDR_NOT_MAPPED = 14,
- LPC2000_CMD_NOT_LOCKED = 15,
- LPC2000_INVALID_CODE = 16,
- LPC2000_INVALID_BAUD_RATE = 17,
- LPC2000_INVALID_STOP_BIT = 18,
- LPC2000_CRP_ENABLED = 19,
- LPC2000_INVALID_FLASH_UNIT = 20,
- LPC2000_USER_CODE_CHECKSUM = 21,
- LCP2000_ERROR_SETTING_ACTIVE_PARTITION = 22,
-};
-
-static int lpc2000_build_sector_list(struct flash_bank *bank)
-{
- struct lpc2000_flash_bank *lpc2000_info = bank->driver_priv;
- uint32_t offset = 0;
-
- /* default to a 4096 write buffer */
- lpc2000_info->cmd51_max_buffer = 4096;
-
- if (lpc2000_info->variant == lpc2000_v1) {
- lpc2000_info->cmd51_dst_boundary = 512;
- lpc2000_info->checksum_vector = 5;
- lpc2000_info->iap_max_stack = 128;
-
- /* variant 1 has different layout for 128kb and 256kb flashes */
- if (bank->size == 128 * 1024) {
- bank->num_sectors = 16;
- bank->sectors = malloc(sizeof(struct flash_sector) * 16);
- for (int i = 0; i < 16; i++) {
- bank->sectors[i].offset = offset;
- bank->sectors[i].size = 8 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
- } else if (bank->size == 256 * 1024) {
- bank->num_sectors = 18;
- bank->sectors = malloc(sizeof(struct flash_sector) * 18);
-
- for (int i = 0; i < 8; i++) {
- bank->sectors[i].offset = offset;
- bank->sectors[i].size = 8 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
- for (int i = 8; i < 10; i++) {
- bank->sectors[i].offset = offset;
- bank->sectors[i].size = 64 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
- for (int i = 10; i < 18; i++) {
- bank->sectors[i].offset = offset;
- bank->sectors[i].size = 8 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
- } else {
- LOG_ERROR("BUG: unknown bank->size encountered");
- exit(-1);
- }
- } else if (lpc2000_info->variant == lpc2000_v2) {
- lpc2000_info->cmd51_dst_boundary = 256;
- lpc2000_info->checksum_vector = 5;
- lpc2000_info->iap_max_stack = 128;
-
- /* variant 2 has a uniform layout, only number of sectors differs */
- switch (bank->size) {
- case 4 * 1024:
- lpc2000_info->cmd51_max_buffer = 1024;
- bank->num_sectors = 1;
- break;
- case 8 * 1024:
- lpc2000_info->cmd51_max_buffer = 1024;
- bank->num_sectors = 2;
- break;
- case 16 * 1024:
- bank->num_sectors = 4;
- break;
- case 32 * 1024:
- bank->num_sectors = 8;
- break;
- case 64 * 1024:
- bank->num_sectors = 9;
- break;
- case 128 * 1024:
- bank->num_sectors = 11;
- break;
- case 256 * 1024:
- bank->num_sectors = 15;
- break;
- case 500 * 1024:
- bank->num_sectors = 27;
- break;
- case 512 * 1024:
- case 504 * 1024:
- bank->num_sectors = 28;
- break;
- default:
- LOG_ERROR("BUG: unknown bank->size encountered");
- exit(-1);
- break;
- }
-
- bank->sectors = malloc(sizeof(struct flash_sector) * bank->num_sectors);
-
- for (int i = 0; i < bank->num_sectors; i++) {
- if (i < 8) {
- bank->sectors[i].offset = offset;
- bank->sectors[i].size = 4 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- } else if (i < 22) {
- bank->sectors[i].offset = offset;
- bank->sectors[i].size = 32 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- } else if (i < 28) {
- bank->sectors[i].offset = offset;
- bank->sectors[i].size = 4 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
- }
- } else if (lpc2000_info->variant == lpc1700) {
- lpc2000_info->cmd51_dst_boundary = 256;
- lpc2000_info->checksum_vector = 7;
- lpc2000_info->iap_max_stack = 128;
-
- switch (bank->size) {
- case 4 * 1024:
- lpc2000_info->cmd51_max_buffer = 256;
- bank->num_sectors = 1;
- break;
- case 8 * 1024:
- lpc2000_info->cmd51_max_buffer = 512;
- bank->num_sectors = 2;
- break;
- case 16 * 1024:
- lpc2000_info->cmd51_max_buffer = 512;
- bank->num_sectors = 4;
- break;
- case 32 * 1024:
- lpc2000_info->cmd51_max_buffer = 1024;
- bank->num_sectors = 8;
- break;
- case 64 * 1024:
- bank->num_sectors = 16;
- break;
- case 128 * 1024:
- bank->num_sectors = 18;
- break;
- case 256 * 1024:
- bank->num_sectors = 22;
- break;
- case 512 * 1024:
- bank->num_sectors = 30;
- break;
- default:
- LOG_ERROR("BUG: unknown bank->size encountered");
- exit(-1);
- }
-
- bank->sectors = malloc(sizeof(struct flash_sector) * bank->num_sectors);
-
- for (int i = 0; i < bank->num_sectors; i++) {
- bank->sectors[i].offset = offset;
- /* sectors 0-15 are 4kB-sized, 16 and above are 32kB-sized for LPC17xx/LPC40xx devices */
- bank->sectors[i].size = (i < 16) ? 4 * 1024 : 32 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
- } else if (lpc2000_info->variant == lpc4300) {
- lpc2000_info->cmd51_dst_boundary = 512;
- lpc2000_info->checksum_vector = 7;
- lpc2000_info->iap_max_stack = 208;
-
- switch (bank->size) {
- case 256 * 1024:
- bank->num_sectors = 11;
- break;
- case 384 * 1024:
- bank->num_sectors = 13;
- break;
- case 512 * 1024:
- bank->num_sectors = 15;
- break;
- default:
- LOG_ERROR("BUG: unknown bank->size encountered");
- exit(-1);
- }
-
- bank->sectors = malloc(sizeof(struct flash_sector) * bank->num_sectors);
-
- for (int i = 0; i < bank->num_sectors; i++) {
- bank->sectors[i].offset = offset;
- /* sectors 0-7 are 8kB-sized, 8 and above are 64kB-sized for LPC43xx devices */
- bank->sectors[i].size = (i < 8) ? 8 * 1024 : 64 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
-
- } else if (lpc2000_info->variant == lpc800) {
- lpc2000_info->cmd51_dst_boundary = 64;
- lpc2000_info->checksum_vector = 7;
- lpc2000_info->iap_max_stack = 208; /* 148byte for LPC81x,208byte for LPC82x. */
- lpc2000_info->cmd51_max_buffer = 256; /* smallest MCU in the series, LPC810, has 1 kB of SRAM */
-
- switch (bank->size) {
- case 4 * 1024:
- bank->num_sectors = 4;
- break;
- case 8 * 1024:
- bank->num_sectors = 8;
- break;
- case 16 * 1024:
- bank->num_sectors = 16;
- break;
- case 32 * 1024:
- lpc2000_info->cmd51_max_buffer = 1024; /* For LPC824, has 8kB of SRAM */
- bank->num_sectors = 32;
- break;
- default:
- LOG_ERROR("BUG: unknown bank->size encountered");
- exit(-1);
- }
-
- bank->sectors = malloc(sizeof(struct flash_sector) * bank->num_sectors);
-
- for (int i = 0; i < bank->num_sectors; i++) {
- bank->sectors[i].offset = offset;
- /* all sectors are 1kB-sized for LPC8xx devices */
- bank->sectors[i].size = 1 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
-
- } else if (lpc2000_info->variant == lpc1100) {
- lpc2000_info->cmd51_dst_boundary = 256;
- lpc2000_info->checksum_vector = 7;
- lpc2000_info->iap_max_stack = 128;
-
- if ((bank->size % (4 * 1024)) != 0) {
- LOG_ERROR("BUG: unknown bank->size encountered,\nLPC1100 flash size must be a multiple of 4096");
- exit(-1);
- }
- lpc2000_info->cmd51_max_buffer = 512; /* smallest MCU in the series, LPC1110, has 1 kB of SRAM */
- bank->num_sectors = bank->size / 4096;
-
- bank->sectors = malloc(sizeof(struct flash_sector) * bank->num_sectors);
-
- for (int i = 0; i < bank->num_sectors; i++) {
- bank->sectors[i].offset = offset;
- /* all sectors are 4kB-sized */
- bank->sectors[i].size = 4 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
-
- } else if (lpc2000_info->variant == lpc1500) {
- lpc2000_info->cmd51_dst_boundary = 256;
- lpc2000_info->checksum_vector = 7;
- lpc2000_info->iap_max_stack = 128;
-
- switch (bank->size) {
- case 64 * 1024:
- bank->num_sectors = 16;
- break;
- case 128 * 1024:
- bank->num_sectors = 32;
- break;
- case 256 * 1024:
- bank->num_sectors = 64;
- break;
- default:
- LOG_ERROR("BUG: unknown bank->size encountered");
- exit(-1);
- }
-
- bank->sectors = malloc(sizeof(struct flash_sector) * bank->num_sectors);
-
- for (int i = 0; i < bank->num_sectors; i++) {
- bank->sectors[i].offset = offset;
- /* all sectors are 4kB-sized */
- bank->sectors[i].size = 4 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
-
- } else if (lpc2000_info->variant == lpc54100) {
- lpc2000_info->cmd51_dst_boundary = 256;
- lpc2000_info->checksum_vector = 7;
- lpc2000_info->iap_max_stack = 128;
-
- switch (bank->size) {
- case 256 * 1024:
- bank->num_sectors = 8;
- break;
- case 512 * 1024:
- bank->num_sectors = 16;
- break;
- default:
- LOG_ERROR("BUG: unknown bank->size encountered");
- exit(-1);
- }
-
- bank->sectors = malloc(sizeof(struct flash_sector) * bank->num_sectors);
-
- for (int i = 0; i < bank->num_sectors; i++) {
- bank->sectors[i].offset = offset;
- /* all sectors are 32kB-sized */
- bank->sectors[i].size = 32 * 1024;
- offset += bank->sectors[i].size;
- bank->sectors[i].is_erased = -1;
- bank->sectors[i].is_protected = 1;
- }
-
- } else {
- LOG_ERROR("BUG: unknown lpc2000_info->variant encountered");
- exit(-1);
- }
-
- return ERROR_OK;
-}
-
-/* this function allocates and initializes working area used for IAP algorithm
- * uses 52 + max IAP stack bytes working area
- * 0x0 to 0x7: jump gate (BX to thumb state, b -2 to wait)
- * 0x8 to 0x1f: command parameter table (1+5 words)
- * 0x20 to 0x33: command result table (1+4 words)
- * 0x34 to 0xb3|0x104: stack
- * (128b needed for lpc1xxx/2000/5410x, 208b for lpc43xx/lpc82x and 148b for lpc81x)
- */
-
-static int lpc2000_iap_working_area_init(struct flash_bank *bank, struct working_area **iap_working_area)
-{
- struct target *target = bank->target;
- struct lpc2000_flash_bank *lpc2000_info = bank->driver_priv;
-
- if (target_alloc_working_area(target, IAP_CODE_LEN + lpc2000_info->iap_max_stack, iap_working_area) != ERROR_OK) {
- LOG_ERROR("no working area specified, can't write LPC2000 internal flash");
- return ERROR_FLASH_OPERATION_FAILED;
- }
-
- uint8_t jump_gate[8];
-
- /* write IAP code to working area */
- switch (lpc2000_info->variant) {
- case lpc800:
- case lpc1100:
- case lpc1500:
- case lpc1700:
- case lpc4300:
- case lpc54100:
- case lpc_auto:
- target_buffer_set_u32(target, jump_gate, ARMV4_5_T_BX(12));
- target_buffer_set_u32(target, jump_gate + 4, ARMV5_T_BKPT(0));
- break;
- case lpc2000_v1:
- case lpc2000_v2:
- target_buffer_set_u32(target, jump_gate, ARMV4_5_BX(12));
- target_buffer_set_u32(target, jump_gate + 4, ARMV4_5_B(0xfffffe, 0));
- break;
- default:
- LOG_ERROR("BUG: unknown lpc2000_info->variant encountered");
- exit(-1);
- }
-
- int retval = target_write_memory(target, (*iap_working_area)->address, 4, 2, jump_gate);
- if (retval != ERROR_OK) {
- LOG_ERROR("Write memory at address 0x%8.8" PRIx32 " failed (check work_area definition)",
- (*iap_working_area)->address);
- target_free_working_area(target, *iap_working_area);
- }
-
- return retval;
-}
-
-/* call LPC8xx/LPC1xxx/LPC4xxx/LPC5410x/LPC2000 IAP function */
-
-static int lpc2000_iap_call(struct flash_bank *bank, struct working_area *iap_working_area, int code,
- uint32_t param_table[5], uint32_t result_table[4])
-{
- struct lpc2000_flash_bank *lpc2000_info = bank->driver_priv;
- struct target *target = bank->target;
-
- struct arm_algorithm arm_algo; /* for LPC2000 */
- struct armv7m_algorithm armv7m_info; /* for LPC8xx/LPC1xxx/LPC4xxx/LPC5410x */
- uint32_t iap_entry_point = 0; /* to make compiler happier */
-
- switch (lpc2000_info->variant) {
- case lpc800:
- case lpc1100:
- case lpc1700:
- case lpc_auto:
- armv7m_info.common_magic = ARMV7M_COMMON_MAGIC;
- armv7m_info.core_mode = ARM_MODE_THREAD;
- iap_entry_point = 0x1fff1ff1;
- break;
- case lpc1500:
- case lpc54100:
- armv7m_info.common_magic = ARMV7M_COMMON_MAGIC;
- armv7m_info.core_mode = ARM_MODE_THREAD;
- iap_entry_point = 0x03000205;
- break;
- case lpc2000_v1:
- case lpc2000_v2:
- arm_algo.common_magic = ARM_COMMON_MAGIC;
- arm_algo.core_mode = ARM_MODE_SVC;
- arm_algo.core_state = ARM_STATE_ARM;
- iap_entry_point = 0x7ffffff1;
- break;
- case lpc4300:
- armv7m_info.common_magic = ARMV7M_COMMON_MAGIC;
- armv7m_info.core_mode = ARM_MODE_THREAD;
- /* read out IAP entry point from ROM driver table at 0x10400100 */
- target_read_u32(target, 0x10400100, &iap_entry_point);
- break;
- default:
- LOG_ERROR("BUG: unknown lpc2000->variant encountered");
- exit(-1);
- }
-
- struct mem_param mem_params[2];
-
- /* command parameter table */
- init_mem_param(&mem_params[0], iap_working_area->address + 8, 6 * 4, PARAM_OUT);
- target_buffer_set_u32(target, mem_params[0].value, code);
- target_buffer_set_u32(target, mem_params[0].value + 0x04, param_table[0]);
- target_buffer_set_u32(target, mem_params[0].value + 0x08, param_table[1]);
- target_buffer_set_u32(target, mem_params[0].value + 0x0c, param_table[2]);
- target_buffer_set_u32(target, mem_params[0].value + 0x10, param_table[3]);
- target_buffer_set_u32(target, mem_params[0].value + 0x14, param_table[4]);
-
- struct reg_param reg_params[5];
-
- init_reg_param(®_params[0], "r0", 32, PARAM_OUT);
- buf_set_u32(reg_params[0].value, 0, 32, iap_working_area->address + 0x08);
-
- /* command result table */
- init_mem_param(&mem_params[1], iap_working_area->address + 0x20, 5 * 4, PARAM_IN);
-
- init_reg_param(®_params[1], "r1", 32, PARAM_OUT);
- buf_set_u32(reg_params[1].value, 0, 32, iap_working_area->address + 0x20);
-
- /* IAP entry point */
- init_reg_param(®_params[2], "r12", 32, PARAM_OUT);
- buf_set_u32(reg_params[2].value, 0, 32, iap_entry_point);
-
- switch (lpc2000_info->variant) {
- case lpc800:
- case lpc1100:
- case lpc1500:
- case lpc1700:
- case lpc4300:
- case lpc54100:
- case lpc_auto:
- /* IAP stack */
- init_reg_param(®_params[3], "sp", 32, PARAM_OUT);
- buf_set_u32(reg_params[3].value, 0, 32,
- iap_working_area->address + IAP_CODE_LEN + lpc2000_info->iap_max_stack);
-
- /* return address */
- init_reg_param(®_params[4], "lr", 32, PARAM_OUT);
- buf_set_u32(reg_params[4].value, 0, 32, (iap_working_area->address + 0x04) | 1);
- /* bit0 of LR = 1 to return in Thumb mode */
-
- target_run_algorithm(target, 2, mem_params, 5, reg_params, iap_working_area->address, 0, 10000,
- &armv7m_info);
- break;
- case lpc2000_v1:
- case lpc2000_v2:
- /* IAP stack */
- init_reg_param(®_params[3], "sp_svc", 32, PARAM_OUT);
- buf_set_u32(reg_params[3].value, 0, 32,
- iap_working_area->address + IAP_CODE_LEN + lpc2000_info->iap_max_stack);
-
- /* return address */
- init_reg_param(®_params[4], "lr_svc", 32, PARAM_OUT);
- buf_set_u32(reg_params[4].value, 0, 32, iap_working_area->address + 0x04);
-
- target_run_algorithm(target, 2, mem_params, 5, reg_params, iap_working_area->address,
- iap_working_area->address + 0x4, 10000, &arm_algo);
- break;
- default:
- LOG_ERROR("BUG: unknown lpc2000->variant encountered");
- exit(-1);
- }
-
- int status_code = target_buffer_get_u32(target, mem_params[1].value);
- result_table[0] = target_buffer_get_u32(target, mem_params[1].value + 0x04);
- result_table[1] = target_buffer_get_u32(target, mem_params[1].value + 0x08);
- result_table[2] = target_buffer_get_u32(target, mem_params[1].value + 0x0c);
- result_table[3] = target_buffer_get_u32(target, mem_params[1].value + 0x10);
-
- LOG_DEBUG("IAP command = %i (0x%8.8" PRIx32 ", 0x%8.8" PRIx32 ", 0x%8.8" PRIx32 ", 0x%8.8" PRIx32 ", 0x%8.8" PRIx32
- ") completed with result = %8.8x",
- code, param_table[0], param_table[1], param_table[2], param_table[3], param_table[4], status_code);
-
- destroy_mem_param(&mem_params[0]);
- destroy_mem_param(&mem_params[1]);
-
- destroy_reg_param(®_params[0]);
- destroy_reg_param(®_params[1]);
- destroy_reg_param(®_params[2]);
- destroy_reg_param(®_params[3]);
- destroy_reg_param(®_params[4]);
-
- return status_code;
-}
-
-static int lpc2000_iap_blank_check(struct flash_bank *bank, int first, int last)
-{
- if ((first < 0) || (last >= bank->num_sectors))
- return ERROR_FLASH_SECTOR_INVALID;
-
- uint32_t param_table[5] = {0};
- uint32_t result_table[4];
- struct working_area *iap_working_area;
-
- int retval = lpc2000_iap_working_area_init(bank, &iap_working_area);
-
- if (retval != ERROR_OK)
- return retval;
-
- struct lpc2000_flash_bank *lpc2000_info = bank->driver_priv;
- if (lpc2000_info->variant == lpc4300)
- param_table[2] = lpc2000_info->lpc4300_bank;
-
- for (int i = first; i <= last && retval == ERROR_OK; i++) {
- /* check single sector */
- param_table[0] = param_table[1] = i;
- int status_code = lpc2000_iap_call(bank, iap_working_area, 53, param_table, result_table);
-
- switch (status_code) {
- case ERROR_FLASH_OPERATION_FAILED:
- retval = ERROR_FLASH_OPERATION_FAILED;
- break;
- case LPC2000_CMD_SUCCESS:
- bank->sectors[i].is_erased = 1;
- break;
- case LPC2000_SECTOR_NOT_BLANK:
- bank->sectors[i].is_erased = 0;
- break;
- case LPC2000_INVALID_SECTOR:
- bank->sectors[i].is_erased = 0;
- break;
- case LPC2000_BUSY:
- retval = ERROR_FLASH_BUSY;
- break;
- default:
- LOG_ERROR("BUG: unknown LPC2000 status code %i", status_code);
- exit(-1);
- }
- }
-
- struct target *target = bank->target;
- target_free_working_area(target, iap_working_area);
-
- return retval;
-}
-
-/*
- * flash bank lpc2000 <base> <size> 0 0 <target#> <lpc_variant> <cclk> [calc_checksum]
- */
-FLASH_BANK_COMMAND_HANDLER(lpc2000_flash_bank_command)
-{
- if (CMD_ARGC < 8)
- return ERROR_COMMAND_SYNTAX_ERROR;
-
- struct lpc2000_flash_bank *lpc2000_info = calloc(1, sizeof(*lpc2000_info));
- lpc2000_info->probed = false;
-
- bank->driver_priv = lpc2000_info;
-
- if (strcmp(CMD_ARGV[6], "lpc2000_v1") == 0) {
- lpc2000_info->variant = lpc2000_v1;
- } else if (strcmp(CMD_ARGV[6], "lpc2000_v2") == 0) {
- lpc2000_info->variant = lpc2000_v2;
- } else if (strcmp(CMD_ARGV[6], "lpc1700") == 0 || strcmp(CMD_ARGV[6], "lpc4000") == 0) {
- lpc2000_info->variant = lpc1700;
- } else if (strcmp(CMD_ARGV[6], "lpc1800") == 0 || strcmp(CMD_ARGV[6], "lpc4300") == 0) {
- lpc2000_info->variant = lpc4300;
- } else if (strcmp(CMD_ARGV[6], "lpc800") == 0) {
- lpc2000_info->variant = lpc800;
- } else if (strcmp(CMD_ARGV[6], "lpc1100") == 0) {
- lpc2000_info->variant = lpc1100;
- } else if (strcmp(CMD_ARGV[6], "lpc1500") == 0) {
- lpc2000_info->variant = lpc1500;
- } else if (strcmp(CMD_ARGV[6], "lpc54100") == 0) {
- lpc2000_info->variant = lpc54100;
- } else if (strcmp(CMD_ARGV[6], "auto") == 0) {
- lpc2000_info->variant = lpc_auto;
- } else {
- LOG_ERROR("unknown LPC2000 variant: %s", CMD_ARGV[6]);
- free(lpc2000_info);
- return ERROR_FLASH_BANK_INVALID;
- }
-
- /* Maximum size required for the IAP stack.
- This value only gets used when probing, only for auto, lpc1100 and lpc1700.
- We use the maximum size for any part supported by the driver(!) to be safe
- in case the auto variant is mistakenly used on a MCU from one of the series
- for which we don't support auto-probing. */
- lpc2000_info->iap_max_stack = 208;
-
- COMMAND_PARSE_NUMBER(u32, CMD_ARGV[7], lpc2000_info->cclk);
- lpc2000_info->calc_checksum = 0;
-
- uint32_t temp_base = 0;
- COMMAND_PARSE_NUMBER(u32, CMD_ARGV[1], temp_base);
- if (temp_base >= 0x1B000000)
- lpc2000_info->lpc4300_bank = 1; /* bank B */
- else
- lpc2000_info->lpc4300_bank = 0; /* bank A */
-
- if (CMD_ARGC >= 9) {
- if (strcmp(CMD_ARGV[8], "calc_checksum") == 0)
- lpc2000_info->calc_checksum = 1;
- }
-
- return ERROR_OK;
-}
-
-static int lpc2000_erase(struct flash_bank *bank, int first, int last)
-{
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- struct lpc2000_flash_bank *lpc2000_info = bank->driver_priv;
- uint32_t param_table[5] = {0};
-
- param_table[0] = first;
- param_table[1] = last;
-
- if (lpc2000_info->variant == lpc4300)
- param_table[2] = lpc2000_info->lpc4300_bank;
- else
- param_table[2] = lpc2000_info->cclk;
-
- uint32_t result_table[4];
- struct working_area *iap_working_area;
-
- int retval = lpc2000_iap_working_area_init(bank, &iap_working_area);
-
- if (retval != ERROR_OK)
- return retval;
-
- if (lpc2000_info->variant == lpc4300)
- /* Init IAP Anyway */
- lpc2000_iap_call(bank, iap_working_area, 49, param_table, result_table);
-
- /* Prepare sectors */
- int status_code = lpc2000_iap_call(bank, iap_working_area, 50, param_table, result_table);
- switch (status_code) {
- case ERROR_FLASH_OPERATION_FAILED:
- retval = ERROR_FLASH_OPERATION_FAILED;
- break;
- case LPC2000_CMD_SUCCESS:
- break;
- case LPC2000_INVALID_SECTOR:
- retval = ERROR_FLASH_SECTOR_INVALID;
- break;
- default:
- LOG_WARNING("lpc2000 prepare sectors returned %i", status_code);
- retval = ERROR_FLASH_OPERATION_FAILED;
- break;
- }
-
- if (retval == ERROR_OK) {
- /* Erase sectors */
- param_table[2] = lpc2000_info->cclk;
- if (lpc2000_info->variant == lpc4300)
- param_table[3] = lpc2000_info->lpc4300_bank;
-
- status_code = lpc2000_iap_call(bank, iap_working_area, 52, param_table, result_table);
- switch (status_code) {
- case ERROR_FLASH_OPERATION_FAILED:
- retval = ERROR_FLASH_OPERATION_FAILED;
- break;
- case LPC2000_CMD_SUCCESS:
- break;
- case LPC2000_INVALID_SECTOR:
- retval = ERROR_FLASH_SECTOR_INVALID;
- break;
- default:
- LOG_WARNING("lpc2000 erase sectors returned %i", status_code);
- retval = ERROR_FLASH_OPERATION_FAILED;
- break;
- }
- }
-
- struct target *target = bank->target;
- target_free_working_area(target, iap_working_area);
-
- return retval;
-}
-
-static int lpc2000_protect(struct flash_bank *bank, int set, int first, int last)
-{
- /* can't protect/unprotect on the lpc2000 */
- return ERROR_OK;
-}
-
-static int lpc2000_write(struct flash_bank *bank, const uint8_t *buffer, uint32_t offset, uint32_t count)
-{
- struct target *target = bank->target;
-
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- if (offset + count > bank->size)
- return ERROR_FLASH_DST_OUT_OF_BANK;
-
- struct lpc2000_flash_bank *lpc2000_info = bank->driver_priv;
-
- uint32_t dst_min_alignment = lpc2000_info->cmd51_dst_boundary;
-
- if (offset % dst_min_alignment) {
- LOG_WARNING("offset 0x%" PRIx32 " breaks required alignment 0x%" PRIx32, offset, dst_min_alignment);
- return ERROR_FLASH_DST_BREAKS_ALIGNMENT;
- }
-
- int first_sector = 0;
- int last_sector = 0;
-
- for (int i = 0; i < bank->num_sectors; i++) {
- if (offset >= bank->sectors[i].offset)
- first_sector = i;
- if (offset + DIV_ROUND_UP(count, dst_min_alignment) * dst_min_alignment > bank->sectors[i].offset)
- last_sector = i;
- }
-
- LOG_DEBUG("first_sector: %i, last_sector: %i", first_sector, last_sector);
-
- /* check if exception vectors should be flashed */
- if ((offset == 0) && (count >= 0x20) && lpc2000_info->calc_checksum) {
- assert(lpc2000_info->checksum_vector < 8);
- uint32_t checksum = 0;
- for (int i = 0; i < 8; i++) {
- LOG_DEBUG("Vector 0x%2.2x: 0x%8.8" PRIx32, i * 4, buf_get_u32(buffer + (i * 4), 0, 32));
- if (i != lpc2000_info->checksum_vector)
- checksum += buf_get_u32(buffer + (i * 4), 0, 32);
- }
- checksum = 0 - checksum;
- LOG_DEBUG("checksum: 0x%8.8" PRIx32, checksum);
-
- uint32_t original_value = buf_get_u32(buffer + (lpc2000_info->checksum_vector * 4), 0, 32);
- if (original_value != checksum) {
- LOG_WARNING("Verification will fail since checksum in image (0x%8.8" PRIx32 ") to be written to flash is "
- "different from calculated vector checksum (0x%8.8" PRIx32 ").", original_value, checksum);
- LOG_WARNING("To remove this warning modify build tools on developer PC to inject correct LPC vector "
- "checksum.");
- }
-
- /* FIXME: WARNING! This code is broken because it modifies the callers buffer in place. */
- buf_set_u32((uint8_t *)buffer + (lpc2000_info->checksum_vector * 4), 0, 32, checksum);
- }
-
- struct working_area *iap_working_area;
-
- int retval = lpc2000_iap_working_area_init(bank, &iap_working_area);
-
- if (retval != ERROR_OK)
- return retval;
-
- struct working_area *download_area;
-
- /* allocate a working area */
- if (target_alloc_working_area(target, lpc2000_info->cmd51_max_buffer, &download_area) != ERROR_OK) {
- LOG_ERROR("no working area specified, can't write LPC2000 internal flash");
- target_free_working_area(target, iap_working_area);
- return ERROR_FLASH_OPERATION_FAILED;
- }
-
- uint32_t bytes_remaining = count;
- uint32_t bytes_written = 0;
- uint32_t param_table[5] = {0};
- uint32_t result_table[4];
-
- if (lpc2000_info->variant == lpc4300)
- /* Init IAP Anyway */
- lpc2000_iap_call(bank, iap_working_area, 49, param_table, result_table);
-
- while (bytes_remaining > 0) {
- uint32_t thisrun_bytes;
- if (bytes_remaining >= lpc2000_info->cmd51_max_buffer)
- thisrun_bytes = lpc2000_info->cmd51_max_buffer;
- else
- thisrun_bytes = lpc2000_info->cmd51_dst_boundary;
-
- /* Prepare sectors */
- param_table[0] = first_sector;
- param_table[1] = last_sector;
-
- if (lpc2000_info->variant == lpc4300)
- param_table[2] = lpc2000_info->lpc4300_bank;
- else
- param_table[2] = lpc2000_info->cclk;
-
- int status_code = lpc2000_iap_call(bank, iap_working_area, 50, param_table, result_table);
- switch (status_code) {
- case ERROR_FLASH_OPERATION_FAILED:
- retval = ERROR_FLASH_OPERATION_FAILED;
- break;
- case LPC2000_CMD_SUCCESS:
- break;
- case LPC2000_INVALID_SECTOR:
- retval = ERROR_FLASH_SECTOR_INVALID;
- break;
- default:
- LOG_WARNING("lpc2000 prepare sectors returned %i", status_code);
- retval = ERROR_FLASH_OPERATION_FAILED;
- break;
- }
-
- /* Exit if error occured */
- if (retval != ERROR_OK)
- break;
-
- if (bytes_remaining >= thisrun_bytes) {
- retval = target_write_buffer(bank->target, download_area->address, thisrun_bytes, buffer + bytes_written);
- if (retval != ERROR_OK) {
- retval = ERROR_FLASH_OPERATION_FAILED;
- break;
- }
- } else {
- uint8_t *last_buffer = malloc(thisrun_bytes);
- memcpy(last_buffer, buffer + bytes_written, bytes_remaining);
- memset(last_buffer + bytes_remaining, 0xff, thisrun_bytes - bytes_remaining);
- target_write_buffer(bank->target, download_area->address, thisrun_bytes, last_buffer);
- free(last_buffer);
- }
-
- LOG_DEBUG("writing 0x%" PRIx32 " bytes to address 0x%" PRIx32, thisrun_bytes,
- bank->base + offset + bytes_written);
-
- /* Write data */
- param_table[0] = bank->base + offset + bytes_written;
- param_table[1] = download_area->address;
- param_table[2] = thisrun_bytes;
- param_table[3] = lpc2000_info->cclk;
- status_code = lpc2000_iap_call(bank, iap_working_area, 51, param_table, result_table);
- switch (status_code) {
- case ERROR_FLASH_OPERATION_FAILED:
- retval = ERROR_FLASH_OPERATION_FAILED;
- break;
- case LPC2000_CMD_SUCCESS:
- break;
- case LPC2000_INVALID_SECTOR:
- retval = ERROR_FLASH_SECTOR_INVALID;
- break;
- default:
- LOG_WARNING("lpc2000 returned %i", status_code);
- retval = ERROR_FLASH_OPERATION_FAILED;
- break;
- }
-
- /* Exit if error occured */
- if (retval != ERROR_OK)
- break;
-
- if (bytes_remaining > thisrun_bytes)
- bytes_remaining -= thisrun_bytes;
- else
- bytes_remaining = 0;
- bytes_written += thisrun_bytes;
- }
-
- target_free_working_area(target, iap_working_area);
- target_free_working_area(target, download_area);
-
- return retval;
-}
-
-static int get_lpc2000_part_id(struct flash_bank *bank, uint32_t *part_id)
-{
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- uint32_t param_table[5] = {0};
- uint32_t result_table[4];
- struct working_area *iap_working_area;
-
- int retval = lpc2000_iap_working_area_init(bank, &iap_working_area);
-
- if (retval != ERROR_OK)
- return retval;
-
- /* The status seems to be bogus with the part ID command on some IAP
- firmwares, so ignore it. */
- lpc2000_iap_call(bank, iap_working_area, 54, param_table, result_table);
-
- struct target *target = bank->target;
- target_free_working_area(target, iap_working_area);
-
- /* If the result is zero, the command probably didn't work out. */
- if (result_table[0] == 0)
- return LPC2000_INVALID_COMMAND;
-
- *part_id = result_table[0];
- return LPC2000_CMD_SUCCESS;
-}
-
-static int lpc2000_auto_probe_flash(struct flash_bank *bank)
-{
- uint32_t part_id;
- int retval;
- struct lpc2000_flash_bank *lpc2000_info = bank->driver_priv;
-
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- retval = get_lpc2000_part_id(bank, &part_id);
- if (retval != LPC2000_CMD_SUCCESS) {
- LOG_ERROR("Could not get part ID");
- return retval;
- }
-
- switch (part_id) {
- case LPC1110_1:
- case LPC1110_2:
- lpc2000_info->variant = lpc1100;
- bank->size = 4 * 1024;
- break;
-
- case LPC1111_002_1:
- case LPC1111_002_2:
- case LPC1111_101_1:
- case LPC1111_101_2:
- case LPC1111_103_1:
- case LPC1111_201_1:
- case LPC1111_201_2:
- case LPC1111_203_1:
- case LPC11A11_001_1:
- case LPC11E11_101:
- case LPC1311:
- case LPC1311_1:
- lpc2000_info->variant = lpc1100;
- bank->size = 8 * 1024;
- break;
-
- case LPC1112_101_1:
- case LPC1112_101_2:
- case LPC1112_102_1:
- case LPC1112_102_2:
- case LPC1112_103_1:
- case LPC1112_201_1:
- case LPC1112_201_2:
- case LPC1112_203_1:
- case LPC11A02_1:
- case LPC11C12_301_1:
- case LPC11C22_301_1:
- case LPC11A12_101_1:
- case LPC11E12_201:
- case LPC11U12_201_1:
- case LPC11U12_201_2:
- case LPC1342:
- lpc2000_info->variant = lpc1100;
- bank->size = 16 * 1024;
- break;
-
- case LPC1113_201_1:
- case LPC1113_201_2:
- case LPC1113_203_1:
- case LPC1113_301_1:
- case LPC1113_301_2:
- case LPC1113_303_1:
- case LPC11A13_201_1:
- case LPC11E13_301:
- case LPC11U13_201_1:
- case LPC11U13_201_2:
- case LPC11U23_301:
- lpc2000_info->variant = lpc1100;
- bank->size = 24 * 1024;
- break;
-
- case LPC1114_102_1:
- case LPC1114_102_2:
- case LPC1114_201_1:
- case LPC1114_201_2:
- case LPC1114_203_1:
- case LPC1114_301_1:
- case LPC1114_301_2:
- case LPC1114_303_1:
- case LPC11A04_1:
- case LPC11A14_301_1:
- case LPC11A14_301_2:
- case LPC11C14_301_1:
- case LPC11C24_301_1:
- case LPC11E14_401:
- case LPC11U14_201_1:
- case LPC11U14_201_2:
- case LPC11U24_301:
- case LPC11U24_401:
- case LPC1313:
- case LPC1313_1:
- case LPC1315:
- case LPC1343:
- case LPC1343_1:
- case LPC1345:
- lpc2000_info->variant = lpc1100;
- bank->size = 32 * 1024;
- break;
-
- case LPC1751_1:
- case LPC1751_2:
- lpc2000_info->variant = lpc1700;
- bank->size = 32 * 1024;
- break;
-
- case LPC11U34_311:
- lpc2000_info->variant = lpc1100;
- bank->size = 40 * 1024;
- break;
-
- case LPC1114_323_1:
- case LPC11U34_421:
- case LPC1316:
- case LPC1346:
- lpc2000_info->variant = lpc1100;
- bank->size = 48 * 1024;
- break;
-
- case LPC1114_333_1:
- lpc2000_info->variant = lpc1100;
- bank->size = 56 * 1024;
- break;
-
- case LPC1115_303_1:
- case LPC11U35_401:
- case LPC11U35_501:
- case LPC11E66:
- case LPC11U66:
- case LPC1317:
- case LPC1347:
- lpc2000_info->variant = lpc1100;
- bank->size = 64 * 1024;
- break;
-
- case LPC1752:
- case LPC4072:
- lpc2000_info->variant = lpc1700;
- bank->size = 64 * 1024;
- break;
-
- case LPC11E36_501:
- case LPC11U36_401:
- lpc2000_info->variant = lpc1100;
- bank->size = 96 * 1024;
- break;
-
- case LPC11E37_401:
- case LPC11E37_501:
- case LPC11U37_401:
- case LPC11U37H_401:
- case LPC11U37_501:
- case LPC11E67:
- case LPC11E68:
- case LPC11U67_1:
- case LPC11U67_2:
- lpc2000_info->variant = lpc1100;
- bank->size = 128 * 1024;
- break;
-
- case LPC1754:
- case LPC1764:
- case LPC1774:
- case LPC4074:
- lpc2000_info->variant = lpc1700;
- bank->size = 128 * 1024;
- break;
-
- case LPC11U68_1:
- case LPC11U68_2:
- lpc2000_info->variant = lpc1100;
- bank->size = 256 * 1024;
- break;
-
- case LPC1756:
- case LPC1763:
- case LPC1765:
- case LPC1766:
- case LPC1776:
- case LPC1785:
- case LPC1786:
- case LPC4076:
- lpc2000_info->variant = lpc1700;
- bank->size = 256 * 1024;
- break;
-
- case LPC1758:
- case LPC1759:
- case LPC1767:
- case LPC1768:
- case LPC1769:
- case LPC1777:
- case LPC1778:
- case LPC1787:
- case LPC1788:
- case LPC4078:
- case LPC4088:
- lpc2000_info->variant = lpc1700;
- bank->size = 512 * 1024;
- break;
-
- case LPC810_021:
- lpc2000_info->variant = lpc800;
- bank->size = 4 * 1024;
- break;
-
- case LPC811_001:
- lpc2000_info->variant = lpc800;
- bank->size = 8 * 1024;
- break;
-
- case LPC812_101:
- case LPC812_101_1:
- case LPC812_101_2:
- case LPC812_101_3:
- case LPC822_101:
- case LPC822_101_1:
- lpc2000_info->variant = lpc800;
- bank->size = 16 * 1024;
- break;
-
- case LPC824_201:
- case LPC824_201_1:
- lpc2000_info->variant = lpc800;
- bank->size = 32 * 1024;
- break;
-
- default:
- LOG_ERROR("BUG: unknown Part ID encountered: 0x%" PRIx32, part_id);
- exit(-1);
- }
-
- return ERROR_OK;
-}
-
-static int lpc2000_probe(struct flash_bank *bank)
-{
- int status;
- uint32_t part_id;
- struct lpc2000_flash_bank *lpc2000_info = bank->driver_priv;
-
- if (!lpc2000_info->probed) {
- if (lpc2000_info->variant == lpc_auto) {
- status = lpc2000_auto_probe_flash(bank);
- if (status != ERROR_OK)
- return status;
- } else if (lpc2000_info->variant == lpc1100 || lpc2000_info->variant == lpc1700) {
- status = get_lpc2000_part_id(bank, &part_id);
- if (status == LPC2000_CMD_SUCCESS)
- LOG_INFO("If auto-detection fails for this part, please email "
- "openocd-devel@lists.sourceforge.net, citing part id 0x%" PRIx32 ".\n", part_id);
- }
-
- lpc2000_build_sector_list(bank);
- lpc2000_info->probed = true;
- }
-
- return ERROR_OK;
-}
-
-static int lpc2000_erase_check(struct flash_bank *bank)
-{
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- return lpc2000_iap_blank_check(bank, 0, bank->num_sectors - 1);
-}
-
-static int lpc2000_protect_check(struct flash_bank *bank)
-{
- /* sectors are always protected */
- return ERROR_OK;
-}
-
-static int get_lpc2000_info(struct flash_bank *bank, char *buf, int buf_size)
-{
- struct lpc2000_flash_bank *lpc2000_info = bank->driver_priv;
-
- snprintf(buf, buf_size, "lpc2000 flash driver variant: %i, clk: %" PRIi32 "kHz", lpc2000_info->variant,
- lpc2000_info->cclk);
-
- return ERROR_OK;
-}
-
-COMMAND_HANDLER(lpc2000_handle_part_id_command)
-{
- if (CMD_ARGC < 1)
- return ERROR_COMMAND_SYNTAX_ERROR;
-
- struct flash_bank *bank;
- int retval = CALL_COMMAND_HANDLER(flash_command_get_bank, 0, &bank);
- if (ERROR_OK != retval)
- return retval;
-
- if (bank->target->state != TARGET_HALTED) {
- LOG_ERROR("Target not halted");
- return ERROR_TARGET_NOT_HALTED;
- }
-
- uint32_t part_id;
- int status_code = get_lpc2000_part_id(bank, &part_id);
- if (status_code != 0x0) {
- if (status_code == ERROR_FLASH_OPERATION_FAILED) {
- command_print(CMD_CTX, "no sufficient working area specified, can't access LPC2000 IAP interface");
- } else
- command_print(CMD_CTX, "lpc2000 IAP returned status code %i", status_code);
- } else
- command_print(CMD_CTX, "lpc2000 part id: 0x%8.8" PRIx32, part_id);
-
- return retval;
-}
-
-static const struct command_registration lpc2000_exec_command_handlers[] = {
- {
- .name = "part_id",
- .handler = lpc2000_handle_part_id_command,
- .mode = COMMAND_EXEC,
- .help = "print part id of lpc2000 flash bank <num>",
- .usage = "<bank>",
- },
- COMMAND_REGISTRATION_DONE
-};
-static const struct command_registration lpc2000_command_handlers[] = {
- {
- .name = "lpc2000",
- .mode = COMMAND_ANY,
- .help = "lpc2000 flash command group",
- .usage = "",
- .chain = lpc2000_exec_command_handlers,
- },
- COMMAND_REGISTRATION_DONE
-};
-
-struct flash_driver lpc2000_flash = {
- .name = "lpc2000",
- .commands = lpc2000_command_handlers,
- .flash_bank_command = lpc2000_flash_bank_command,
- .erase = lpc2000_erase,
- .protect = lpc2000_protect,
- .write = lpc2000_write,
- .read = default_flash_read,
- .probe = lpc2000_probe,
- .auto_probe = lpc2000_probe,
- .erase_check = lpc2000_erase_check,
- .protect_check = lpc2000_protect_check,
- .info = get_lpc2000_info,
-};