Return-Path: X-Original-To: archive-asf-public-internal@cust-asf2.ponee.io Delivered-To: archive-asf-public-internal@cust-asf2.ponee.io Received: from cust-asf.ponee.io (cust-asf.ponee.io [163.172.22.183]) by cust-asf2.ponee.io (Postfix) with ESMTP id 74B6B200B29 for ; Thu, 16 Jun 2016 00:04:10 +0200 (CEST) Received: by cust-asf.ponee.io (Postfix) id 73225160A5D; Wed, 15 Jun 2016 22:04:10 +0000 (UTC) Delivered-To: archive-asf-public@cust-asf.ponee.io Received: from mail.apache.org (hermes.apache.org [140.211.11.3]) by cust-asf.ponee.io (Postfix) with SMTP id 99FC4160A4D for ; Thu, 16 Jun 2016 00:04:08 +0200 (CEST) Received: (qmail 87336 invoked by uid 500); 15 Jun 2016 22:04:07 -0000 Mailing-List: contact commits-help@mynewt.incubator.apache.org; run by ezmlm Precedence: bulk List-Help: List-Unsubscribe: List-Post: List-Id: Reply-To: dev@mynewt.incubator.apache.org Delivered-To: mailing list commits@mynewt.incubator.apache.org Received: (qmail 87327 invoked by uid 99); 15 Jun 2016 22:04:07 -0000 Received: from pnap-us-west-generic-nat.apache.org (HELO spamd1-us-west.apache.org) (209.188.14.142) by apache.org (qpsmtpd/0.29) with ESMTP; Wed, 15 Jun 2016 22:04:07 +0000 Received: from localhost (localhost [127.0.0.1]) by spamd1-us-west.apache.org (ASF Mail Server at spamd1-us-west.apache.org) with ESMTP id 34F0CC014A for ; Wed, 15 Jun 2016 22:04:07 +0000 (UTC) X-Virus-Scanned: Debian amavisd-new at spamd1-us-west.apache.org X-Spam-Flag: NO X-Spam-Score: -4.395 X-Spam-Level: X-Spam-Status: No, score=-4.395 tagged_above=-999 required=6.31 tests=[KAM_ASCII_DIVIDERS=0.8, KAM_LAZY_DOMAIN_SECURITY=1, KAM_LOTSOFHASH=0.25, LOTS_OF_MONEY=0.001, RCVD_IN_DNSWL_HI=-5, RCVD_IN_MSPIKE_H3=-0.01, RCVD_IN_MSPIKE_WL=-0.01, RP_MATCHES_RCVD=-1.426] autolearn=disabled Received: from mx1-lw-eu.apache.org ([10.40.0.8]) by localhost (spamd1-us-west.apache.org [10.40.0.7]) (amavisd-new, port 10024) with ESMTP id z9E5wgjUnQ5T for ; Wed, 15 Jun 2016 22:04:03 +0000 (UTC) Received: from mail.apache.org (hermes.apache.org [140.211.11.3]) by mx1-lw-eu.apache.org (ASF Mail Server at mx1-lw-eu.apache.org) with SMTP id 42A7E60E43 for ; Wed, 15 Jun 2016 22:03:45 +0000 (UTC) Received: (qmail 86046 invoked by uid 99); 15 Jun 2016 22:03:45 -0000 Received: from git1-us-west.apache.org (HELO git1-us-west.apache.org) (140.211.11.23) by apache.org (qpsmtpd/0.29) with ESMTP; Wed, 15 Jun 2016 22:03:45 +0000 Received: by git1-us-west.apache.org (ASF Mail Server at git1-us-west.apache.org, from userid 33) id DF805E0BAC; Wed, 15 Jun 2016 22:03:44 +0000 (UTC) Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit From: aditi@apache.org To: commits@mynewt.incubator.apache.org Date: Wed, 15 Jun 2016 22:04:15 -0000 Message-Id: <23c764570156480eaa5003f900c243a5@git.apache.org> In-Reply-To: References: X-Mailer: ASF-Git Admin Mailer Subject: [32/51] [partial] incubator-mynewt-site git commit: Fixed broken Quick Start link and added OpenOCD option for Arduino Primo debugging archived-at: Wed, 15 Jun 2016 22:04:10 -0000 http://git-wip-us.apache.org/repos/asf/incubator-mynewt-site/blob/e302582d/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/at91sam4l.c ---------------------------------------------------------------------- diff --git a/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/at91sam4l.c b/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/at91sam4l.c new file mode 100755 index 0000000..fa7cff3 --- /dev/null +++ b/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/at91sam4l.c @@ -0,0 +1,709 @@ +/*************************************************************************** + * Copyright (C) 2013 by Andrey Yurovsky * + * Andrey Yurovsky * + * * + * 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 + +/* At this time, the SAM4L Flash is available in these capacities: + * ATSAM4Lx4xx: 256KB (512 pages) + * ATSAM4Lx2xx: 128KB (256 pages) + * ATSAM4Lx8xx: 512KB (1024 pages) + */ + +/* There are 16 lockable regions regardless of overall capacity. The number + * of pages per sector is therefore dependant on capacity. */ +#define SAM4L_NUM_SECTORS 16 + +/* Locations in memory map */ +#define SAM4L_FLASH ((uint32_t)0x00000000) /* Flash region */ +#define SAM4L_FLASH_USER 0x00800000 /* Flash user page region */ +#define SAM4L_FLASHCALW 0x400A0000 /* Flash controller */ +#define SAM4L_CHIPID 0x400E0740 /* Chip Identification */ + +/* Offsets from SAM4L_FLASHCALW */ +#define SAM4L_FCR 0x00 /* Flash Control Register (RW) */ +#define SAM4L_FCMD 0x04 /* Flash Command Register (RW) */ +#define SAM4L_FSR 0x08 /* Flash Status Register (RO) */ +#define SAM4L_FPR 0x0C /* Flash Parameter Register (RO) */ +#define SAM4L_FVR 0x10 /* Flash Version Register (RO) */ +#define SAM4L_FGPFRHI 0x14 /* Flash General Purpose Register High (RO) */ +#define SAM4L_FGPFRLO 0x18 /* Flash General Purpose Register Low (RO) */ + +/* Offsets from SAM4L_CHIPID */ +#define SAM4L_CIDR 0x00 /* Chip ID Register (RO) */ +#define SAM4L_EXID 0x04 /* Chip ID Extension Register (RO) */ + +/* Flash commands (for SAM4L_FCMD), see Table 14-5 */ +#define SAM4L_FCMD_NOP 0 /* No Operation */ +#define SAM4L_FCMD_WP 1 /* Write Page */ +#define SAM4L_FCMD_EP 2 /* Erase Page */ +#define SAM4L_FCMD_CPB 3 /* Clear Page Buffer */ +#define SAM4L_FCMD_LP 4 /* Lock region containing given page */ +#define SAM4L_FCMD_UP 5 /* Unlock region containing given page */ +#define SAM4L_FCMD_EA 6 /* Erase All */ +#define SAM4L_FCMD_WGPB 7 /* Write general-purpose fuse bit */ +#define SAM4L_FCMD_EGPB 8 /* Erase general-purpose fuse bit */ +#define SAM4L_FCMD_SSB 9 /* Set security fuses */ +#define SAM4L_FCMD_PGPFB 10 /* Program general-purpose fuse byte */ +#define SAM4L_FCMD_EAGPF 11 /* Erase all general-purpose fuse bits */ +#define SAM4L_FCMD_QPR 12 /* Quick page read */ +#define SAM4L_FCMD_WUP 13 /* Write user page */ +#define SAM4L_FCMD_EUP 14 /* Erase user page */ +#define SAM4L_FCMD_QPRUP 15 /* Quick page read (user page) */ +#define SAM4L_FCMD_HSEN 16 /* High speed mode enable */ +#define SAM4L_FCMD_HSDIS 17 /* High speed mode disable */ + +#define SAM4L_FMCD_CMDKEY 0xA5UL /* 'key' to issue commands, see 14.10.2 */ + + +/* SMAP registers and bits */ +#define SMAP_BASE 0x400A3000 + +#define SMAP_SCR (SMAP_BASE + 8) +#define SMAP_SCR_HCR (1 << 1) + + +struct sam4l_chip_info { + uint32_t id; + uint32_t exid; + const char *name; +}; + +/* These are taken from Table 9-1 in 42023E-SAM-07/2013 */ +static const struct sam4l_chip_info sam4l_known_chips[] = { + { 0xAB0B0AE0, 0x1400000F, "ATSAM4LC8C" }, + { 0xAB0A09E0, 0x0400000F, "ATSAM4LC4C" }, + { 0xAB0A07E0, 0x0400000F, "ATSAM4LC2C" }, + { 0xAB0B0AE0, 0x1300000F, "ATSAM4LC8B" }, + { 0xAB0A09E0, 0x0300000F, "ATSAM4LC4B" }, + { 0xAB0A07E0, 0x0300000F, "ATSAM4LC2B" }, + { 0xAB0B0AE0, 0x1200000F, "ATSAM4LC8A" }, + { 0xAB0A09E0, 0x0200000F, "ATSAM4LC4A" }, + { 0xAB0A07E0, 0x0200000F, "ATSAM4LC2A" }, + { 0xAB0B0AE0, 0x14000002, "ATSAM4LS8C" }, + { 0xAB0A09E0, 0x04000002, "ATSAM4LS4C" }, + { 0xAB0A07E0, 0x04000002, "ATSAM4LS2C" }, + { 0xAB0B0AE0, 0x13000002, "ATSAM4LS8B" }, + { 0xAB0A09E0, 0x03000002, "ATSAM4LS4B" }, + { 0xAB0A07E0, 0x03000002, "ATSAM4LS2B" }, + { 0xAB0B0AE0, 0x12000002, "ATSAM4LS8A" }, + { 0xAB0A09E0, 0x02000002, "ATSAM4LS4A" }, + { 0xAB0A07E0, 0x02000002, "ATSAM4LS2A" }, +}; + +/* Meaning of SRAMSIZ field in CHIPID, see 9.3.1 in 42023E-SAM-07/2013 */ +static const uint16_t sam4l_ram_sizes[16] = { 48, 1, 2, 6, 24, 4, 80, 160, 8, 16, 32, 64, 128, 256, 96, 512 }; + +/* Meaning of PSZ field in FPR, see 14.10.4 in 42023E-SAM-07/2013 */ +static const uint16_t sam4l_page_sizes[8] = { 32, 64, 128, 256, 512, 1024, 2048, 4096 }; + +struct sam4l_info { + const struct sam4l_chip_info *details; + + uint32_t flash_kb; + uint32_t ram_kb; + uint32_t page_size; + int num_pages; + int sector_size; + int pages_per_sector; + + bool probed; + struct target *target; + struct sam4l_info *next; +}; + +static struct sam4l_info *sam4l_chips; + +static int sam4l_flash_wait_until_ready(struct target *target) +{ + volatile unsigned int t = 0; + uint32_t st; + int res; + + /* Poll the status register until the FRDY bit is set */ + do { + res = target_read_u32(target, SAM4L_FLASHCALW + SAM4L_FSR, &st); + } while (res == ERROR_OK && !(st & (1<<0)) && ++t < 10); + + return res; +} + +static int sam4l_flash_check_error(struct target *target, uint32_t *err) +{ + uint32_t st; + int res; + + res = target_read_u32(target, SAM4L_FLASHCALW + SAM4L_FSR, &st); + + if (res == ERROR_OK) + *err = st & ((1<<3) | (1<<2)); /* grab PROGE and LOCKE bits */ + + return res; +} + +static int sam4l_flash_command(struct target *target, uint8_t cmd, int page) +{ + int res; + uint32_t fcmd; + uint32_t err; + + res = sam4l_flash_wait_until_ready(target); + if (res != ERROR_OK) + return res; + + if (page >= 0) { + /* Set the page number. For some commands, the page number is just an + * argument (ex: fuse bit number). */ + fcmd = (SAM4L_FMCD_CMDKEY << 24) | ((page & 0xFFFF) << 8) | (cmd & 0x3F); + } else { + /* Reuse the page number that was read from the flash command register. */ + res = target_read_u32(target, SAM4L_FLASHCALW + SAM4L_FCMD, &fcmd); + if (res != ERROR_OK) + return res; + + fcmd &= ~0x3F; /* clear out the command code */ + fcmd |= (SAM4L_FMCD_CMDKEY << 24) | (cmd & 0x3F); + } + + /* Send the command */ + res = target_write_u32(target, SAM4L_FLASHCALW + SAM4L_FCMD, fcmd); + if (res != ERROR_OK) + return res; + + res = sam4l_flash_check_error(target, &err); + if (res != ERROR_OK) + return res; + + if (err != 0) + LOG_ERROR("%s got error status 0x%08" PRIx32, __func__, err); + + res = sam4l_flash_wait_until_ready(target); + + return res; +} + +FLASH_BANK_COMMAND_HANDLER(sam4l_flash_bank_command) +{ + struct sam4l_info *chip = sam4l_chips; + + while (chip) { + if (chip->target == bank->target) + break; + chip = chip->next; + } + + if (!chip) { + /* Create a new chip */ + chip = calloc(1, sizeof(*chip)); + if (!chip) + return ERROR_FAIL; + + chip->target = bank->target; + chip->probed = false; + + bank->driver_priv = chip; + + /* Insert it into the chips list (at head) */ + chip->next = sam4l_chips; + sam4l_chips = chip; + } + + if (bank->base != SAM4L_FLASH) { + LOG_ERROR("Address 0x%08" PRIx32 " invalid bank address (try 0x%08" PRIx32 + "[at91sam4l series] )", + bank->base, SAM4L_FLASH); + return ERROR_FAIL; + } + + return ERROR_OK; +} + +static const struct sam4l_chip_info *sam4l_find_chip_name(uint32_t id, uint32_t exid) +{ + unsigned int i; + + id &= ~0xF; + + for (i = 0; i < ARRAY_SIZE(sam4l_known_chips); i++) { + if (sam4l_known_chips[i].id == id && sam4l_known_chips[i].exid == exid) + return &sam4l_known_chips[i]; + } + + return NULL; +} + +static int sam4l_check_page_erased(struct flash_bank *bank, uint32_t pn, + bool *is_erased_p) +{ + int res; + uint32_t st; + + /* Issue a quick page read to verify that we've erased this page */ + res = sam4l_flash_command(bank->target, SAM4L_FCMD_QPR, pn); + if (res != ERROR_OK) { + LOG_ERROR("Quick page read %" PRIu32 " failed", pn); + return res; + } + + /* Retrieve the flash status */ + res = target_read_u32(bank->target, SAM4L_FLASHCALW + SAM4L_FSR, &st); + if (res != ERROR_OK) { + LOG_ERROR("Couldn't read erase status"); + return res; + } + + /* Is the page in question really erased? */ + *is_erased_p = !!(st & (1<<5)); + + return ERROR_OK; +} + +static int sam4l_probe(struct flash_bank *bank) +{ + uint32_t id, exid, param; + int res; + struct sam4l_info *chip = (struct sam4l_info *)bank->driver_priv; + + if (chip->probed) + return ERROR_OK; + + res = target_read_u32(bank->target, SAM4L_CHIPID + SAM4L_CIDR, &id); + if (res != ERROR_OK) { + LOG_ERROR("Couldn't read chip ID"); + return res; + } + + res = target_read_u32(bank->target, SAM4L_CHIPID + SAM4L_EXID, &exid); + if (res != ERROR_OK) { + LOG_ERROR("Couldn't read extended chip ID"); + return res; + } + + chip->details = sam4l_find_chip_name(id, exid); + + /* The RAM capacity is in a lookup table. */ + chip->ram_kb = sam4l_ram_sizes[0xF & (id >> 16)]; + + switch (0xF & (id >> 8)) { + case 0x07: + chip->flash_kb = 128; + break; + case 0x09: + chip->flash_kb = 256; + break; + case 0x0A: + chip->flash_kb = 512; + break; + default: + LOG_ERROR("Unknown flash size (chip ID is %08" PRIx32 "), assuming 128K", id); + chip->flash_kb = 128; + break; + } + + /* Retrieve the Flash parameters */ + res = target_read_u32(bank->target, SAM4L_FLASHCALW + SAM4L_FPR, ¶m); + if (res != ERROR_OK) { + LOG_ERROR("Couldn't read Flash parameters"); + return res; + } + + /* Fetch the page size from the parameter register. Technically the flash + * capacity is there too though the manual mentions that not all parts will + * have it set so we use the Chip ID capacity information instead. */ + chip->page_size = sam4l_page_sizes[0x7 & (param >> 8)]; + assert(chip->page_size); + chip->num_pages = chip->flash_kb * 1024 / chip->page_size; + + chip->sector_size = (chip->flash_kb * 1024) / SAM4L_NUM_SECTORS; + chip->pages_per_sector = chip->sector_size / chip->page_size; + + /* Make sure the bank size is correct */ + bank->size = chip->flash_kb * 1024; + + /* Allocate the sector table. */ + bank->num_sectors = SAM4L_NUM_SECTORS; + bank->sectors = calloc(bank->num_sectors, (sizeof((bank->sectors)[0]))); + if (!bank->sectors) + return ERROR_FAIL; + + /* Fill out the sector information: all SAM4L sectors are the same size and + * there is always a fixed number of them. */ + for (int i = 0; i < bank->num_sectors; i++) { + bank->sectors[i].size = chip->sector_size; + bank->sectors[i].offset = i * chip->sector_size; + /* mark as unknown */ + bank->sectors[i].is_erased = -1; + bank->sectors[i].is_protected = -1; + } + + /* Done */ + chip->probed = true; + + LOG_INFO("SAM4L MCU: %s (Rev %c) (%" PRIu32 "KB Flash with %d %" PRId32 "B pages, %" PRIu32 "KB RAM)", + chip->details ? chip->details->name : "unknown", (char)('A' + (id & 0xF)), + chip->flash_kb, chip->num_pages, chip->page_size, chip->ram_kb); + + return ERROR_OK; +} + +static int sam4l_protect_check(struct flash_bank *bank) +{ + int res; + uint32_t st; + struct sam4l_info *chip = (struct sam4l_info *)bank->driver_priv; + + if (bank->target->state != TARGET_HALTED) { + LOG_ERROR("Target not halted"); + + return ERROR_TARGET_NOT_HALTED; + } + + if (!chip->probed) { + if (sam4l_probe(bank) != ERROR_OK) + return ERROR_FLASH_BANK_NOT_PROBED; + } + + res = target_read_u32(bank->target, SAM4L_FLASHCALW + SAM4L_FSR, &st); + if (res != ERROR_OK) + return res; + + st >>= 16; /* There are 16 lock region bits in the upper half word */ + for (int i = 0; i < bank->num_sectors; i++) + bank->sectors[i].is_protected = !!(st & (1<target->state != TARGET_HALTED) { + LOG_ERROR("Target not halted"); + + return ERROR_TARGET_NOT_HALTED; + } + + if (!chip->probed) { + if (sam4l_probe(bank) != ERROR_OK) + return ERROR_FLASH_BANK_NOT_PROBED; + } + + /* Make sure the pages make sense. */ + if (first >= bank->num_sectors || last >= bank->num_sectors) { + LOG_ERROR("Protect range %d - %d not valid (%d sectors total)", first, last, + bank->num_sectors); + return ERROR_FAIL; + } + + /* Try to lock or unlock each sector in the range. This is done by locking + * a region containing one page in that sector, we arbitrarily choose the 0th + * page in the sector. */ + for (int i = first; i <= last; i++) { + int res; + + res = sam4l_flash_command(bank->target, + set ? SAM4L_FCMD_LP : SAM4L_FCMD_UP, i * chip->pages_per_sector); + if (res != ERROR_OK) { + LOG_ERROR("Can't %slock region containing page %d", set ? "" : "un", i); + return res; + } + } + + return ERROR_OK; +} + +static int sam4l_erase(struct flash_bank *bank, int first, int last) +{ + int ret; + struct sam4l_info *chip = (struct sam4l_info *)bank->driver_priv; + + if (bank->target->state != TARGET_HALTED) { + LOG_ERROR("Target not halted"); + + return ERROR_TARGET_NOT_HALTED; + } + + if (!chip->probed) { + if (sam4l_probe(bank) != ERROR_OK) + return ERROR_FLASH_BANK_NOT_PROBED; + } + + /* Make sure the pages make sense. */ + if (first >= bank->num_sectors || last >= bank->num_sectors) { + LOG_ERROR("Erase range %d - %d not valid (%d sectors total)", first, last, + bank->num_sectors); + return ERROR_FAIL; + } + + /* Erase */ + if ((first == 0) && ((last + 1) == bank->num_sectors)) { + LOG_DEBUG("Erasing the whole chip"); + + ret = sam4l_flash_command(bank->target, SAM4L_FCMD_EA, -1); + if (ret != ERROR_OK) { + LOG_ERROR("Erase All failed"); + return ret; + } + } else { + LOG_DEBUG("Erasing sectors %d through %d...\n", first, last); + + /* For each sector... */ + for (int i = first; i <= last; i++) { + /* For each page in that sector... */ + for (int j = 0; j < chip->pages_per_sector; j++) { + int pn = i * chip->pages_per_sector + j; + bool is_erased = false; + + /* Issue the page erase */ + ret = sam4l_flash_command(bank->target, SAM4L_FCMD_EP, pn); + if (ret != ERROR_OK) { + LOG_ERROR("Erasing page %d failed", pn); + return ret; + } + + ret = sam4l_check_page_erased(bank, pn, &is_erased); + if (ret != ERROR_OK) + return ret; + + if (!is_erased) { + LOG_DEBUG("Page %d was not erased.", pn); + return ERROR_FAIL; + } + } + + /* This sector is definitely erased. */ + bank->sectors[i].is_erased = 1; + } + } + + return ERROR_OK; +} + +/* Write an entire page from host buffer 'buf' to page-aligned 'address' in the + * Flash. */ +static int sam4l_write_page(struct sam4l_info *chip, struct target *target, + uint32_t address, const uint8_t *buf) +{ + int res; + + LOG_DEBUG("sam4l_write_page address=%08" PRIx32, address); + + /* Clear the page buffer before we write to it */ + res = sam4l_flash_command(target, SAM4L_FCMD_CPB, -1); + if (res != ERROR_OK) { + LOG_ERROR("%s: can't clear page buffer", __func__); + return res; + } + + /* Write the modified page back to the target's page buffer */ + res = target_write_memory(target, address, 4, chip->page_size / 4, buf); + + if (res != ERROR_OK) { + LOG_ERROR("%s: %d", __func__, __LINE__); + return res; + } + + /* Commit the page contents to Flash: erase the current page and then + * write it out. */ + res = sam4l_flash_command(target, SAM4L_FCMD_EP, -1); + if (res != ERROR_OK) + return res; + res = sam4l_flash_command(target, SAM4L_FCMD_WP, -1); + + return res; +} + +/* Write partial contents into page-aligned 'address' on the Flash from host + * buffer 'buf' by writing 'nb' of 'buf' at 'offset' into the Flash page. */ +static int sam4l_write_page_partial(struct sam4l_info *chip, + struct flash_bank *bank, uint32_t address, const uint8_t *buf, + uint32_t page_offset, uint32_t nb) +{ + int res; + uint8_t *pg = malloc(chip->page_size); + if (!pg) + return ERROR_FAIL; + + LOG_DEBUG("sam4l_write_page_partial address=%08" PRIx32 " nb=%08" PRIx32, address, nb); + + assert(page_offset + nb < chip->page_size); + assert((address % chip->page_size) == 0); + + /* Retrieve the full page contents from Flash */ + res = target_read_memory(bank->target, address, 4, + chip->page_size / 4, pg); + if (res != ERROR_OK) { + free(pg); + return res; + } + + /* Insert our partial page over the data from Flash */ + memcpy(pg + (page_offset % chip->page_size), buf, nb); + + /* Write the page back out */ + res = sam4l_write_page(chip, bank->target, address, pg); + free(pg); + + return res; +} + +static int sam4l_write(struct flash_bank *bank, const uint8_t *buffer, + uint32_t offset, uint32_t count) +{ + int res; + uint32_t nb = 0; + struct sam4l_info *chip = (struct sam4l_info *)bank->driver_priv; + + LOG_DEBUG("sam4l_write offset=%08" PRIx32 " count=%08" PRIx32, offset, count); + + if (bank->target->state != TARGET_HALTED) { + LOG_ERROR("Target not halted"); + + return ERROR_TARGET_NOT_HALTED; + } + + if (!chip->probed) { + if (sam4l_probe(bank) != ERROR_OK) + return ERROR_FLASH_BANK_NOT_PROBED; + } + + if (offset % chip->page_size) { + /* We're starting at an unaligned offset so we'll write a partial page + * comprising that offset and up to the end of that page. */ + nb = chip->page_size - (offset % chip->page_size); + if (nb > count) + nb = count; + } else if (count < chip->page_size) { + /* We're writing an aligned but partial page. */ + nb = count; + } + + if (nb > 0) { + res = sam4l_write_page_partial(chip, bank, + (offset / chip->page_size) * chip->page_size + bank->base, + buffer, + offset % chip->page_size, nb); + if (res != ERROR_OK) + return res; + + /* We're done with the page contents */ + count -= nb; + offset += nb; + } + + /* There's at least one aligned page to write out. */ + if (count >= chip->page_size) { + int np = count / chip->page_size + ((count % chip->page_size) ? 1 : 0); + + for (int i = 0; i < np; i++) { + if (count >= chip->page_size) { + res = sam4l_write_page(chip, bank->target, + bank->base + offset, + buffer + (i * chip->page_size)); + /* Advance one page */ + offset += chip->page_size; + count -= chip->page_size; + } else { + res = sam4l_write_page_partial(chip, bank, + bank->base + offset, + buffer + (i * chip->page_size), 0, count); + /* We're done after this. */ + offset += count; + count = 0; + } + + if (res != ERROR_OK) + return res; + } + } + + return ERROR_OK; +} + + +COMMAND_HANDLER(sam4l_handle_reset_deassert) +{ + struct target *target = get_current_target(CMD_CTX); + struct armv7m_common *armv7m = target_to_armv7m(target); + int retval = ERROR_OK; + enum reset_types jtag_reset_config = jtag_get_reset_config(); + + /* In case of sysresetreq, debug retains state set in cortex_m_assert_reset() + * so we just release reset held by SMAP + * + * n_RESET (srst) clears the DP, so reenable debug and set vector catch here + * + * After vectreset SMAP release is not needed however makes no harm + */ + if (target->reset_halt && (jtag_reset_config & RESET_HAS_SRST)) { + retval = mem_ap_write_u32(armv7m->debug_ap, DCB_DHCSR, DBGKEY | C_HALT | C_DEBUGEN); + if (retval == ERROR_OK) + retval = mem_ap_write_atomic_u32(armv7m->debug_ap, DCB_DEMCR, + TRCENA | VC_HARDERR | VC_BUSERR | VC_CORERESET); + /* do not return on error here, releasing SMAP reset is more important */ + } + + int retval2 = mem_ap_write_atomic_u32(armv7m->debug_ap, SMAP_SCR, SMAP_SCR_HCR); + if (retval2 != ERROR_OK) + return retval2; + + return retval; +} + +static const struct command_registration at91sam4l_exec_command_handlers[] = { + { + .name = "smap_reset_deassert", + .handler = sam4l_handle_reset_deassert, + .mode = COMMAND_EXEC, + .help = "deasert internal reset held by SMAP" + }, + COMMAND_REGISTRATION_DONE +}; + +static const struct command_registration at91sam4l_command_handlers[] = { + { + .name = "at91sam4l", + .mode = COMMAND_ANY, + .help = "at91sam4l flash command group", + .usage = "", + .chain = at91sam4l_exec_command_handlers, + }, + COMMAND_REGISTRATION_DONE +}; + +struct flash_driver at91sam4l_flash = { + .name = "at91sam4l", + .commands = at91sam4l_command_handlers, + .flash_bank_command = sam4l_flash_bank_command, + .erase = sam4l_erase, + .protect = sam4l_protect, + .write = sam4l_write, + .read = default_flash_read, + .probe = sam4l_probe, + .auto_probe = sam4l_probe, + .erase_check = default_flash_blank_check, + .protect_check = sam4l_protect_check, +}; http://git-wip-us.apache.org/repos/asf/incubator-mynewt-site/blob/e302582d/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/at91sam7.c ---------------------------------------------------------------------- diff --git a/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/at91sam7.c b/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/at91sam7.c new file mode 100755 index 0000000..c7334ca --- /dev/null +++ b/docs/os/tutorials/downloads/openocd-code-89bf96ffe6ac66c80407af8383b9d5adc0dc35f4/src/flash/nor/at91sam7.c @@ -0,0 +1,1211 @@ +/*************************************************************************** + * Copyright (C) 2006 by Magnus Lundin * + * lundin@mlu.mine.nu * + * * + * Copyright (C) 2008 by Gheorghe Guran (atlas) * + * * + * 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. * +****************************************************************************/ + +/*************************************************************************** +* +* New flash setup command: +* +* flash bank +* [ +* +* +* ] +* +* - MUST be used if clock is from external source, +* CAN be used if main oscillator frequency is known (recommended) +* Examples: +* ==== RECOMMENDED (covers clock speed) ============ +* flash bank at91sam7 0x00100000 0 0 4 $_TARGETNAME AT91SAM7XC256 1 16 64 256 3 25000 +* (if auto-detect fails; provides clock spec) +* flash bank at91sam7 0 0 0 0 $_TARGETNAME 0 0 0 0 0 0 25000 +* (auto-detect everything except the clock) +* ==== NOT RECOMMENDED !!! (clock speed is not configured) ==== +* flash bank at91sam7 0x00100000 0 0 4 $_TARGETNAME AT91SAM7XC256 1 16 64 256 3 0 +* (if auto-detect fails) +* flash bank at91sam7 0 0 0 0 $_TARGETNAME +* (old style, auto-detect everything) +****************************************************************************/ + +#ifdef HAVE_CONFIG_H +#include "config.h" +#endif + +#include "imp.h" +#include + +/* AT91SAM7 control registers */ +#define DBGU_CIDR 0xFFFFF240 +#define CKGR_MCFR 0xFFFFFC24 +#define CKGR_MOR 0xFFFFFC20 +#define CKGR_MCFR_MAINRDY 0x10000 +#define CKGR_PLLR 0xFFFFFC2c +#define CKGR_PLLR_DIV 0xff +#define CKGR_PLLR_MUL 0x07ff0000 +#define PMC_MCKR 0xFFFFFC30 +#define PMC_MCKR_CSS 0x03 +#define PMC_MCKR_PRES 0x1c + +/* Flash Controller Commands */ +#define WP 0x01 +#define SLB 0x02 +#define WPL 0x03 +#define CLB 0x04 +#define EA 0x08 +#define SGPB 0x0B +#define CGPB 0x0D +#define SSB 0x0F + +/* MC_FSR bit definitions */ +#define MC_FSR_FRDY 1 +#define MC_FSR_EOL 2 + +/* AT91SAM7 constants */ +#define RC_FREQ 32000 + +/* Flash timing modes */ +#define FMR_TIMING_NONE 0 +#define FMR_TIMING_NVBITS 1 +#define FMR_TIMING_FLASH 2 + +/* Flash size constants */ +#define FLASH_SIZE_8KB 1 +#define FLASH_SIZE_16KB 2 +#define FLASH_SIZE_32KB 3 +#define FLASH_SIZE_64KB 5 +#define FLASH_SIZE_128KB 7 +#define FLASH_SIZE_256KB 9 +#define FLASH_SIZE_512KB 10 +#define FLASH_SIZE_1024KB 12 +#define FLASH_SIZE_2048KB 14 + +static int at91sam7_protect_check(struct flash_bank *bank); +static int at91sam7_write(struct flash_bank *bank, const uint8_t *buffer, uint32_t offset, + uint32_t count); + +static uint32_t at91sam7_get_flash_status(struct target *target, int bank_number); +static void at91sam7_set_flash_mode(struct flash_bank *bank, int mode); +static uint32_t at91sam7_wait_status_busy(struct flash_bank *bank, uint32_t waitbits, int timeout); +static int at91sam7_flash_command(struct flash_bank *bank, uint8_t cmd, uint16_t pagen); + +static const uint32_t MC_FMR[4] = { 0xFFFFFF60, 0xFFFFFF70, 0xFFFFFF80, 0xFFFFFF90 }; +static const uint32_t MC_FCR[4] = { 0xFFFFFF64, 0xFFFFFF74, 0xFFFFFF84, 0xFFFFFF94 }; +static const uint32_t MC_FSR[4] = { 0xFFFFFF68, 0xFFFFFF78, 0xFFFFFF88, 0xFFFFFF98 }; + +static const char *EPROC[8] = { + "Unknown", "ARM946-E", "ARM7TDMI", "Unknown", "ARM920T", "ARM926EJ-S", "Unknown", "Unknown" +}; + +struct at91sam7_flash_bank { + /* chip id register */ + uint32_t cidr; + uint16_t cidr_ext; + uint16_t cidr_nvptyp; + uint16_t cidr_arch; + uint16_t cidr_sramsiz; + uint16_t cidr_nvpsiz; + uint16_t cidr_nvpsiz2; + uint16_t cidr_eproc; + uint16_t cidr_version; + const char *target_name; + + /* flash auto-detection */ + uint8_t flash_autodetection; + + /* flash geometry */ + uint16_t pages_per_sector; + uint16_t pagesize; + uint16_t pages_in_lockregion; + + /* nv memory bits */ + uint16_t num_lockbits_on; + uint16_t lockbits; + uint16_t num_nvmbits; + uint16_t num_nvmbits_on; + uint16_t nvmbits; + uint8_t securitybit; + + /* 0: not init + * 1: fmcn for nvbits (1uS) + * 2: fmcn for flash (1.5uS) */ + uint8_t flashmode; + + /* main clock status */ + uint8_t mck_valid; + uint32_t mck_freq; + + /* external clock frequency */ + uint32_t ext_freq; + +}; + +#if 0 +static long SRAMSIZ[16] = { + -1, + 0x0400, /* 1K */ + 0x0800, /* 2K */ + -1, + 0x1c000, /* 112K */ + 0x1000, /* 4K */ + 0x14000, /* 80K */ + 0x28000, /* 160K */ + 0x2000, /* 8K */ + 0x4000, /* 16K */ + 0x8000, /* 32K */ + 0x10000, /* 64K */ + 0x20000, /* 128K */ + 0x40000, /* 256K */ + 0x18000, /* 96K */ + 0x80000, /* 512K */ +}; +#endif + +static uint32_t at91sam7_get_flash_status(struct target *target, int bank_number) +{ + uint32_t fsr; + target_read_u32(target, MC_FSR[bank_number], &fsr); + + return fsr; +} + +/* Read clock configuration and set at91sam7_info->mck_freq */ +static void at91sam7_read_clock_info(struct flash_bank *bank) +{ + struct at91sam7_flash_bank *at91sam7_info = bank->driver_priv; + struct target *target = bank->target; + uint32_t mckr, mcfr, pllr, mor; + unsigned long tmp = 0, mainfreq; + + /* Read Clock Generator Main Oscillator Register */ + target_read_u32(target, CKGR_MOR, &mor); + /* Read Clock Generator Main Clock Frequency Register */ + target_read_u32(target, CKGR_MCFR, &mcfr); + /* Read Master Clock Register*/ + target_read_u32(target, PMC_MCKR, &mckr); + /* Read Clock Generator PLL Register */ + target_read_u32(target, CKGR_PLLR, &pllr); + + at91sam7_info->mck_valid = 0; + at91sam7_info->mck_freq = 0; + switch (mckr & PMC_MCKR_CSS) { + case 0: /* Slow Clock */ + at91sam7_info->mck_valid = 1; + tmp = RC_FREQ; + break; + + case 1: /* Main Clock */ + if ((mcfr & CKGR_MCFR_MAINRDY) && + (at91sam7_info->ext_freq == 0)) { + at91sam7_info->mck_valid = 1; + tmp = RC_FREQ / 16ul * (mcfr & 0xffff); + } else if (at91sam7_info->ext_freq != 0) { + at91sam7_info->mck_valid = 1; + tmp = at91sam7_info->ext_freq; + } + break; + + case 2: /* Reserved */ + break; + + case 3: /* PLL Clock */ + if ((mcfr & CKGR_MCFR_MAINRDY) && + (at91sam7_info->ext_freq == 0)) { + target_read_u32(target, CKGR_PLLR, &pllr); + if (!(pllr & CKGR_PLLR_DIV)) + break; /* 0 Hz */ + at91sam7_info->mck_valid = 1; + mainfreq = RC_FREQ / 16ul * (mcfr & 0xffff); + /* Integer arithmetic should have sufficient precision + * as long as PLL is properly configured. */ + tmp = mainfreq / (pllr & CKGR_PLLR_DIV)* + (((pllr & CKGR_PLLR_MUL) >> 16) + 1); + } else if ((at91sam7_info->ext_freq != 0) && + ((pllr&CKGR_PLLR_DIV) != 0)) { + at91sam7_info->mck_valid = 1; + tmp = at91sam7_info->ext_freq / (pllr&CKGR_PLLR_DIV)* + (((pllr & CKGR_PLLR_MUL) >> 16) + 1); + } + break; + } + + /* Prescaler adjust */ + if ((((mckr & PMC_MCKR_PRES) >> 2) == 7) || (tmp == 0)) { + at91sam7_info->mck_valid = 0; + at91sam7_info->mck_freq = 0; + } else if (((mckr & PMC_MCKR_PRES) >> 2) != 0) + at91sam7_info->mck_freq = tmp >> ((mckr & PMC_MCKR_PRES) >> 2); + else + at91sam7_info->mck_freq = tmp; +} + +/* Setup the timimg registers for nvbits or normal flash */ +static void at91sam7_set_flash_mode(struct flash_bank *bank, int mode) +{ + uint32_t fmr, fmcn = 0, fws = 0; + struct at91sam7_flash_bank *at91sam7_info = bank->driver_priv; + struct target *target = bank->target; + + if (mode && (mode != at91sam7_info->flashmode)) { + /* Always round up (ceil) */ + if (mode == FMR_TIMING_NVBITS) { + if (at91sam7_info->cidr_arch == 0x60) { + /* AT91SAM7A3 uses master clocks in 100 ns */ + fmcn = (at91sam7_info->mck_freq/10000000ul) + 1; + } else { + /* master clocks in 1uS for ARCH 0x7 types */ + fmcn = (at91sam7_info->mck_freq/1000000ul) + 1; + } + } else if (mode == FMR_TIMING_FLASH) { + /* main clocks in 1.5uS */ + fmcn = (at91sam7_info->mck_freq/1000000ul)+ + (at91sam7_info->mck_freq/2000000ul) + 1; + } + + /* hard overclocking */ + if (fmcn > 0xFF) + fmcn = 0xFF; + + /* Only allow fmcn = 0 if clock period is > 30 us = 33kHz. */ + if (at91sam7_info->mck_freq <= 33333ul) + fmcn = 0; + /* Only allow fws = 0 if clock frequency is < 30 MHz. */ + if (at91sam7_info->mck_freq > 30000000ul) + fws = 1; + + LOG_DEBUG("fmcn[%i]: %i", bank->bank_number, (int)(fmcn)); + fmr = fmcn << 16 | fws << 8; + target_write_u32(target, MC_FMR[bank->bank_number], fmr); + } + + at91sam7_info->flashmode = mode; +} + +static uint32_t at91sam7_wait_status_busy(struct flash_bank *bank, uint32_t waitbits, int timeout) +{ + uint32_t status; + + while ((!((status = at91sam7_get_flash_status(bank->target, + bank->bank_number)) & waitbits)) && (timeout-- > 0)) { + LOG_DEBUG("status[%i]: 0x%" PRIx32 "", (int)bank->bank_number, status); + alive_sleep(1); + } + + LOG_DEBUG("status[%i]: 0x%" PRIx32 "", bank->bank_number, status); + + if (status & 0x0C) { + LOG_ERROR("status register: 0x%" PRIx32 "", status); + if (status & 0x4) + LOG_ERROR("Lock Error Bit Detected, Operation Abort"); + if (status & 0x8) + LOG_ERROR("Invalid command and/or bad keyword, Operation Abort"); + if (status & 0x10) + LOG_ERROR("Security Bit Set, Operation Abort"); + } + + return status; +} + +/* Send one command to the AT91SAM flash controller */ +static int at91sam7_flash_command(struct flash_bank *bank, uint8_t cmd, uint16_t pagen) +{ + uint32_t fcr; + struct at91sam7_flash_bank *at91sam7_info = bank->driver_priv; + struct target *target = bank->target; + + fcr = (0x5A << 24) | ((pagen&0x3FF) << 8) | cmd; + target_write_u32(target, MC_FCR[bank->bank_number], fcr); + LOG_DEBUG("Flash command: 0x%" PRIx32 ", flash bank: %i, page number: %u", + fcr, + bank->bank_number + 1, + pagen); + + if ((at91sam7_info->cidr_arch == 0x60) && ((cmd == SLB) | (cmd == CLB))) { + /* Lock bit manipulation on AT91SAM7A3 waits for FC_FSR bit 1, EOL */ + if (at91sam7_wait_status_busy(bank, MC_FSR_EOL, 10)&0x0C) + return ERROR_FLASH_OPERATION_FAILED; + return ERROR_OK; + } + + if (at91sam7_wait_status_busy(bank, MC_FSR_FRDY, 10)&0x0C) + return ERROR_FLASH_OPERATION_FAILED; + + return ERROR_OK; +} + +/* Read device id register, main clock frequency register and fill in driver info structure */ +static int at91sam7_read_part_info(struct flash_bank *bank) +{ + struct at91sam7_flash_bank *at91sam7_info; + struct target *target = bank->target; + + uint16_t bnk, sec; + uint16_t arch; + uint32_t cidr; + uint8_t banks_num = 0; + uint16_t num_nvmbits = 0; + uint16_t sectors_num = 0; + uint16_t pages_per_sector = 0; + uint16_t page_size = 0; + uint32_t ext_freq; + uint32_t bank_size; + uint32_t base_address = 0; + char *target_name_t = "Unknown"; + + at91sam7_info = bank->driver_priv; + + if (at91sam7_info->cidr != 0) { + /* flash already configured, update clock and check for protected sectors */ + struct flash_bank *fb = bank; + struct flash_bank *t_bank = bank; + + while (t_bank) { + /* re-calculate master clock frequency */ + at91sam7_read_clock_info(t_bank); + + /* no timming */ + at91sam7_set_flash_mode(t_bank, FMR_TIMING_NONE); + + /* check protect state */ + at91sam7_protect_check(t_bank); + + t_bank = fb->next; + fb = t_bank; + } + + return ERROR_OK; + } + + /* Read and parse chip identification register */ + target_read_u32(target, DBGU_CIDR, &cidr); + if (cidr == 0) { + LOG_WARNING("Cannot identify target as an AT91SAM"); + return ERROR_FLASH_OPERATION_FAILED; + } + + if (at91sam7_info->flash_autodetection == 0) { + /* banks and sectors are already created, based on data from input file */ + struct flash_bank *fb = bank; + struct flash_bank *t_bank = bank; + while (t_bank) { + at91sam7_info = t_bank->driver_priv; + + at91sam7_info->cidr = cidr; + at91sam7_info->cidr_ext = (cidr >> 31)&0x0001; + at91sam7_info->cidr_nvptyp = (cidr >> 28)&0x0007; + at91sam7_info->cidr_arch = (cidr >> 20)&0x00FF; + at91sam7_info->cidr_sramsiz = (cidr >> 16)&0x000F; + at91sam7_info->cidr_nvpsiz2 = (cidr >> 12)&0x000F; + at91sam7_info->cidr_nvpsiz = (cidr >> 8)&0x000F; + at91sam7_info->cidr_eproc = (cidr >> 5)&0x0007; + at91sam7_info->cidr_version = cidr&0x001F; + + /* calculate master clock frequency */ + at91sam7_read_clock_info(t_bank); + + /* no timming */ + at91sam7_set_flash_mode(t_bank, FMR_TIMING_NONE); + + /* check protect state */ + at91sam7_protect_check(t_bank); + + t_bank = fb->next; + fb = t_bank; + } + + return ERROR_OK; + } + + arch = (cidr >> 20)&0x00FF; + + /* check flash size */ + switch ((cidr >> 8)&0x000F) { + case FLASH_SIZE_8KB: + break; + + case FLASH_SIZE_16KB: + banks_num = 1; + sectors_num = 8; + pages_per_sector = 32; + page_size = 64; + base_address = 0x00100000; + if (arch == 0x70) { + num_nvmbits = 2; + target_name_t = "AT91SAM7S161/16"; + } + break; + + case FLASH_SIZE_32KB: + banks_num = 1; + sectors_num = 8; + pages_per_sector = 32; + page_size = 128; + base_address = 0x00100000; + if (arch == 0x70) { + num_nvmbits = 2; + target_name_t = "AT91SAM7S321/32"; + } + if (arch == 0x72) { + num_nvmbits = 3; + target_name_t = "AT91SAM7SE32"; + } + break; + + case FLASH_SIZE_64KB: + banks_num = 1; + sectors_num = 16; + pages_per_sector = 32; + page_size = 128; + base_address = 0x00100000; + if (arch == 0x70) { + num_nvmbits = 2; + target_name_t = "AT91SAM7S64"; + } + break; + + case FLASH_SIZE_128KB: + banks_num = 1; + sectors_num = 8; + pages_per_sector = 64; + page_size = 256; + base_address = 0x00100000; + if (arch == 0x70) { + num_nvmbits = 2; + target_name_t = "AT91SAM7S128"; + } + if (arch == 0x71) { + num_nvmbits = 3; + target_name_t = "AT91SAM7XC128"; + } + if (arch == 0x72) { + num_nvmbits = 3; + target_name_t = "AT91SAM7SE128"; + } + if (arch == 0x75) { + num_nvmbits = 3; + target_name_t = "AT91SAM7X128"; + } + break; + + case FLASH_SIZE_256KB: + banks_num = 1; + sectors_num = 16; + pages_per_sector = 64; + page_size = 256; + base_address = 0x00100000; + if (arch == 0x60) { + num_nvmbits = 3; + target_name_t = "AT91SAM7A3"; + } + if (arch == 0x70) { + num_nvmbits = 2; + target_name_t = "AT91SAM7S256"; + } + if (arch == 0x71) { + num_nvmbits = 3; + target_name_t = "AT91SAM7XC256"; + } + if (arch == 0x72) { + num_nvmbits = 3; + target_name_t = "AT91SAM7SE256"; + } + if (arch == 0x75) { + num_nvmbits = 3; + target_name_t = "AT91SAM7X256"; + } + break; + + case FLASH_SIZE_512KB: + banks_num = 2; + sectors_num = 16; + pages_per_sector = 64; + page_size = 256; + base_address = 0x00100000; + if (arch == 0x70) { + num_nvmbits = 2; + target_name_t = "AT91SAM7S512"; + } + if (arch == 0x71) { + num_nvmbits = 3; + target_name_t = "AT91SAM7XC512"; + } + if (arch == 0x72) { + num_nvmbits = 3; + target_name_t = "AT91SAM7SE512"; + } + if (arch == 0x75) { + num_nvmbits = 3; + target_name_t = "AT91SAM7X512"; + } + break; + + case FLASH_SIZE_1024KB: + break; + + case FLASH_SIZE_2048KB: + break; + } + + if (strcmp(target_name_t, "Unknown") == 0) { + LOG_ERROR( + "Target autodetection failed! Please specify target parameters in configuration file"); + return ERROR_FLASH_OPERATION_FAILED; + } + + ext_freq = at91sam7_info->ext_freq; + + /* calculate bank size */ + bank_size = sectors_num * pages_per_sector * page_size; + + for (bnk = 0; bnk < banks_num; bnk++) { + struct flash_bank *t_bank = bank; + if (bnk > 0) { + if (!t_bank->next) { + /* create a new flash bank element */ + struct flash_bank *fb = malloc(sizeof(struct flash_bank)); + fb->target = target; + fb->driver = bank->driver; + fb->driver_priv = malloc(sizeof(struct at91sam7_flash_bank)); + fb->name = "sam7_probed"; + fb->next = NULL; + + /* link created bank in 'flash_banks' list */ + t_bank->next = fb; + } + t_bank = t_bank->next; + } + + t_bank->bank_number = bnk; + t_bank->base = base_address + bnk * bank_size; + t_bank->size = bank_size; + t_bank->chip_width = 0; + t_bank->bus_width = 4; + t_bank->num_sectors = sectors_num; + + /* allocate sectors */ + t_bank->sectors = malloc(sectors_num * sizeof(struct flash_sector)); + for (sec = 0; sec < sectors_num; sec++) { + t_bank->sectors[sec].offset = sec * pages_per_sector * page_size; + t_bank->sectors[sec].size = pages_per_sector * page_size; + t_bank->sectors[sec].is_erased = -1; + t_bank->sectors[sec].is_protected = -1; + } + + at91sam7_info = t_bank->driver_priv; + + at91sam7_info->cidr = cidr; + at91sam7_info->cidr_ext = (cidr >> 31)&0x0001; + at91sam7_info->cidr_nvptyp = (cidr >> 28)&0x0007; + at91sam7_info->cidr_arch = (cidr >> 20)&0x00FF; + at91sam7_info->cidr_sramsiz = (cidr >> 16)&0x000F; + at91sam7_info->cidr_nvpsiz2 = (cidr >> 12)&0x000F; + at91sam7_info->cidr_nvpsiz = (cidr >> 8)&0x000F; + at91sam7_info->cidr_eproc = (cidr >> 5)&0x0007; + at91sam7_info->cidr_version = cidr&0x001F; + + at91sam7_info->target_name = target_name_t; + at91sam7_info->flashmode = 0; + at91sam7_info->ext_freq = ext_freq; + at91sam7_info->num_nvmbits = num_nvmbits; + at91sam7_info->num_nvmbits_on = 0; + at91sam7_info->pagesize = page_size; + at91sam7_info->pages_per_sector = pages_per_sector; + + /* calculate master clock frequency */ + at91sam7_read_clock_info(t_bank); + + /* no timming */ + at91sam7_set_flash_mode(t_bank, FMR_TIMING_NONE); + + /* check protect state */ + at91sam7_protect_check(t_bank); + } + + LOG_DEBUG("nvptyp: 0x%3.3x, arch: 0x%4.4x", + at91sam7_info->cidr_nvptyp, + at91sam7_info->cidr_arch); + + return ERROR_OK; +} + +static int at91sam7_erase_check(struct flash_bank *bank) +{ + struct target *target = bank->target; + uint16_t retval; + uint32_t blank; + uint16_t fast_check; + uint8_t *buffer; + uint16_t nSector; + uint16_t nByte; + + if (bank->target->state != TARGET_HALTED) { + LOG_ERROR("Target not halted"); + return ERROR_TARGET_NOT_HALTED; + } + + /* Configure the flash controller timing */ + at91sam7_read_clock_info(bank); + at91sam7_set_flash_mode(bank, FMR_TIMING_FLASH); + + fast_check = 1; + for (nSector = 0; nSector < bank->num_sectors; nSector++) { + retval = target_blank_check_memory(target, + bank->base + bank->sectors[nSector].offset, + bank->sectors[nSector].size, + &blank); + if (retval != ERROR_OK) { + fast_check = 0; + break; + } + if (blank == 0xFF) + bank->sectors[nSector].is_erased = 1; + else + bank->sectors[nSector].is_erased = 0; + } + + if (fast_check) + return ERROR_OK; + + LOG_USER("Running slow fallback erase check - add working memory"); + + buffer = malloc(bank->sectors[0].size); + for (nSector = 0; nSector < bank->num_sectors; nSector++) { + bank->sectors[nSector].is_erased = 1; + retval = target_read_memory(target, bank->base + bank->sectors[nSector].offset, 4, + bank->sectors[nSector].size/4, buffer); + if (retval != ERROR_OK) + return retval; + + for (nByte = 0; nByte < bank->sectors[nSector].size; nByte++) { + if (buffer[nByte] != 0xFF) { + bank->sectors[nSector].is_erased = 0; + break; + } + } + } + free(buffer); + + return ERROR_OK; +} + +static int at91sam7_protect_check(struct flash_bank *bank) +{ + uint8_t lock_pos, gpnvm_pos; + uint32_t status; + + struct at91sam7_flash_bank *at91sam7_info = bank->driver_priv; + + if (at91sam7_info->cidr == 0) + return ERROR_FLASH_BANK_NOT_PROBED; + if (bank->target->state != TARGET_HALTED) { + LOG_ERROR("Target not halted"); + return ERROR_TARGET_NOT_HALTED; + } + + status = at91sam7_get_flash_status(bank->target, bank->bank_number); + at91sam7_info->lockbits = (status >> 16); + + at91sam7_info->num_lockbits_on = 0; + for (lock_pos = 0; lock_pos < bank->num_sectors; lock_pos++) { + if (((status >> (16 + lock_pos))&(0x0001)) == 1) { + at91sam7_info->num_lockbits_on++; + bank->sectors[lock_pos].is_protected = 1; + } else + bank->sectors[lock_pos].is_protected = 0; + } + + /* GPNVM and SECURITY bits apply only for MC_FSR of EFC0 */ + status = at91sam7_get_flash_status(bank->target, 0); + + at91sam7_info->securitybit = (status >> 4)&0x01; + at91sam7_info->nvmbits = (status >> 8)&0xFF; + + at91sam7_info->num_nvmbits_on = 0; + for (gpnvm_pos = 0; gpnvm_pos < at91sam7_info->num_nvmbits; gpnvm_pos++) { + if (((status >> (8 + gpnvm_pos))&(0x01)) == 1) + at91sam7_info->num_nvmbits_on++; + } + + return ERROR_OK; +} + +FLASH_BANK_COMMAND_HANDLER(at91sam7_flash_bank_command) +{ + struct flash_bank *t_bank = bank; + struct at91sam7_flash_bank *at91sam7_info; + struct target *target = t_bank->target; + + uint32_t base_address; + uint32_t bank_size; + uint32_t ext_freq = 0; + + int chip_width; + int bus_width; + int banks_num; + int num_sectors; + + uint16_t pages_per_sector; + uint16_t page_size; + uint16_t num_nvmbits; + + char *target_name_t; + + int bnk, sec; + + at91sam7_info = malloc(sizeof(struct at91sam7_flash_bank)); + t_bank->driver_priv = at91sam7_info; + + /* part wasn't probed for info yet */ + at91sam7_info->cidr = 0; + at91sam7_info->flashmode = 0; + at91sam7_info->ext_freq = 0; + at91sam7_info->flash_autodetection = 0; + + if (CMD_ARGC < 13) { + at91sam7_info->flash_autodetection = 1; + return ERROR_OK; + } + + COMMAND_PARSE_NUMBER(u32, CMD_ARGV[1], base_address); + + COMMAND_PARSE_NUMBER(int, CMD_ARGV[3], chip_width); + COMMAND_PARSE_NUMBER(int, CMD_ARGV[4], bus_width); + + COMMAND_PARSE_NUMBER(int, CMD_ARGV[8], banks_num); + COMMAND_PARSE_NUMBER(int, CMD_ARGV[9], num_sectors); + COMMAND_PARSE_NUMBER(u16, CMD_ARGV[10], pages_per_sector); + COMMAND_PARSE_NUMBER(u16, CMD_ARGV[11], page_size); + COMMAND_PARSE_NUMBER(u16, CMD_ARGV[12], num_nvmbits); + + if (CMD_ARGC == 14) { + unsigned long freq; + COMMAND_PARSE_NUMBER(ulong, CMD_ARGV[13], freq); + ext_freq = freq * 1000; + at91sam7_info->ext_freq = ext_freq; + } + + if ((bus_width == 0) || (banks_num == 0) || (num_sectors == 0) || + (pages_per_sector == 0) || (page_size == 0) || (num_nvmbits == 0)) { + at91sam7_info->flash_autodetection = 1; + return ERROR_OK; + } + + target_name_t = calloc(strlen(CMD_ARGV[7]) + 1, sizeof(char)); + strcpy(target_name_t, CMD_ARGV[7]); + + /* calculate bank size */ + bank_size = num_sectors * pages_per_sector * page_size; + + for (bnk = 0; bnk < banks_num; bnk++) { + if (bnk > 0) { + if (!t_bank->next) { + /* create a new bank element */ + struct flash_bank *fb = malloc(sizeof(struct flash_bank)); + fb->target = target; + fb->driver = bank->driver; + fb->driver_priv = malloc(sizeof(struct at91sam7_flash_bank)); + fb->name = "sam7_probed"; + fb->next = NULL; + + /* link created bank in 'flash_banks' list */ + t_bank->next = fb; + } + t_bank = t_bank->next; + } + + t_bank->bank_number = bnk; + t_bank->base = base_address + bnk * bank_size; + t_bank->size = bank_size; + t_bank->chip_width = chip_width; + t_bank->bus_width = bus_width; + t_bank->num_sectors = num_sectors; + + /* allocate sectors */ + t_bank->sectors = malloc(num_sectors * sizeof(struct flash_sector)); + for (sec = 0; sec < num_sectors; sec++) { + t_bank->sectors[sec].offset = sec * pages_per_sector * page_size; + t_bank->sectors[sec].size = pages_per_sector * page_size; + t_bank->sectors[sec].is_erased = -1; + t_bank->sectors[sec].is_protected = -1; + } + + at91sam7_info = t_bank->driver_priv; + + at91sam7_info->target_name = target_name_t; + at91sam7_info->flashmode = 0; + at91sam7_info->ext_freq = ext_freq; + at91sam7_info->num_nvmbits = num_nvmbits; + at91sam7_info->num_nvmbits_on = 0; + at91sam7_info->pagesize = page_size; + at91sam7_info->pages_per_sector = pages_per_sector; + } + + return ERROR_OK; +} + +static int at91sam7_erase(struct flash_bank *bank, int first, int last) +{ + struct at91sam7_flash_bank *at91sam7_info = bank->driver_priv; + int sec; + uint32_t nbytes, pos; + uint8_t *buffer; + uint8_t erase_all; + + if (at91sam7_info->cidr == 0) + return ERROR_FLASH_BANK_NOT_PROBED; + + if (bank->target->state != TARGET_HALTED) { + LOG_ERROR("Target not halted"); + return ERROR_TARGET_NOT_HALTED; + } + + if ((first < 0) || (last < first) || (last >= bank->num_sectors)) + return ERROR_FLASH_SECTOR_INVALID; + + erase_all = 0; + if ((first == 0) && (last == (bank->num_sectors-1))) + erase_all = 1; + + /* Configure the flash controller timing */ + at91sam7_read_clock_info(bank); + at91sam7_set_flash_mode(bank, FMR_TIMING_FLASH); + + if (erase_all) { + if (at91sam7_flash_command(bank, EA, 0) != ERROR_OK) + return ERROR_FLASH_OPERATION_FAILED; + } else { + /* allocate and clean buffer */ + nbytes = (last - first + 1) * bank->sectors[first].size; + buffer = malloc(nbytes * sizeof(uint8_t)); + for (pos = 0; pos < nbytes; pos++) + buffer[pos] = 0xFF; + + if (at91sam7_write(bank, buffer, bank->sectors[first].offset, nbytes) != ERROR_OK) { + free(buffer); + return ERROR_FLASH_OPERATION_FAILED; + } + + free(buffer); + } + + /* mark erased sectors */ + for (sec = first; sec <= last; sec++) + bank->sectors[sec].is_erased = 1; + + return ERROR_OK; +} + +static int at91sam7_protect(struct flash_bank *bank, int set, int first, int last) +{ + uint32_t cmd; + int sector; + uint32_t pagen; + + struct at91sam7_flash_bank *at91sam7_info = bank->driver_priv; + + if (at91sam7_info->cidr == 0) + return ERROR_FLASH_BANK_NOT_PROBED; + + if (bank->target->state != TARGET_HALTED) { + LOG_ERROR("Target not halted"); + return ERROR_TARGET_NOT_HALTED; + } + + if ((first < 0) || (last < first) || (last >= bank->num_sectors)) + return ERROR_FLASH_SECTOR_INVALID; + + /* Configure the flash controller timing */ + at91sam7_read_clock_info(bank); + at91sam7_set_flash_mode(bank, FMR_TIMING_NVBITS); + + for (sector = first; sector <= last; sector++) { + if (set) + cmd = SLB; + else + cmd = CLB; + + /* if we lock a page from one sector then entire sector will be locked, also, + * if we unlock a page from a locked sector, entire sector will be unlocked */ + pagen = sector * at91sam7_info->pages_per_sector; + + if (at91sam7_flash_command(bank, cmd, pagen) != ERROR_OK) + return ERROR_FLASH_OPERATION_FAILED; + } + + at91sam7_protect_check(bank); + + return ERROR_OK; +} + +static int at91sam7_write(struct flash_bank *bank, const uint8_t *buffer, uint32_t offset, uint32_t count) +{ + int retval; + struct at91sam7_flash_bank *at91sam7_info = bank->driver_priv; + struct target *target = bank->target; + uint32_t dst_min_alignment, wcount, bytes_remaining = count; + uint32_t first_page, last_page, pagen, buffer_pos; + + if (at91sam7_info->cidr == 0) + return ERROR_FLASH_BANK_NOT_PROBED; + + 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; + + dst_min_alignment = at91sam7_info->pagesize; + + 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; + } + + if (at91sam7_info->cidr_arch == 0) + return ERROR_FLASH_BANK_NOT_PROBED; + + first_page = offset/dst_min_alignment; + last_page = DIV_ROUND_UP(offset + count, dst_min_alignment); + + LOG_DEBUG("first_page: %i, last_page: %i, count %i", + (int)first_page, + (int)last_page, + (int)count); + + /* Configure the flash controller timing */ + at91sam7_read_clock_info(bank); + at91sam7_set_flash_mode(bank, FMR_TIMING_FLASH); + + for (pagen = first_page; pagen < last_page; pagen++) { + if (bytes_remaining < dst_min_alignment) + count = bytes_remaining; + else + count = dst_min_alignment; + bytes_remaining -= count; + + /* Write one block to the PageWriteBuffer */ + buffer_pos = (pagen-first_page)*dst_min_alignment; + wcount = DIV_ROUND_UP(count, 4); + retval = target_write_memory(target, bank->base + pagen*dst_min_alignment, 4, + wcount, buffer + buffer_pos); + if (retval != ERROR_OK) + return retval; + + /* Send Write Page command to Flash Controller */ + if (at91sam7_flash_command(bank, WP, pagen) != ERROR_OK) + return ERROR_FLASH_OPERATION_FAILED; + LOG_DEBUG("Write flash bank:%i page number:%" PRIi32 "", bank->bank_number, pagen); + } + + return ERROR_OK; +} + +static int at91sam7_probe(struct flash_bank *bank) +{ + /* we can't probe on an at91sam7 + * if this is an at91sam7, it has the configured flash */ + int retval; + + if (bank->target->state != TARGET_HALTED) { + LOG_ERROR("Target not halted"); + return ERROR_TARGET_NOT_HALTED; + } + + retval = at91sam7_read_part_info(bank); + if (retval != ERROR_OK) + return retval; + + return ERROR_OK; +} + +static int get_at91sam7_info(struct flash_bank *bank, char *buf, int buf_size) +{ + int printed; + struct at91sam7_flash_bank *at91sam7_info = bank->driver_priv; + + if (at91sam7_info->cidr == 0) + return ERROR_FLASH_BANK_NOT_PROBED; + + printed = snprintf(buf, buf_size, + "\n at91sam7 driver information: Chip is %s\n", + at91sam7_info->target_name); + + buf += printed; + buf_size -= printed; + + printed = snprintf(buf, + buf_size, + " Cidr: 0x%8.8" PRIx32 " | Arch: 0x%4.4x | Eproc: %s | Version: 0x%3.3x | " + "Flashsize: 0x%8.8" PRIx32 "\n", + at91sam7_info->cidr, + at91sam7_info->cidr_arch, + EPROC[at91sam7_info->cidr_eproc], + at91sam7_info->cidr_version, + bank->size); + + buf += printed; + buf_size -= printed; + + printed = snprintf(buf, buf_size, + " Master clock (estimated): %u KHz | External clock: %u KHz\n", + (unsigned)(at91sam7_info->mck_freq / 1000), + (unsigned)(at91sam7_info->ext_freq / 1000)); + + buf += printed; + buf_size -= printed; + + printed = snprintf(buf, + buf_size, + " Pagesize: %i bytes | Lockbits(%i): %i 0x%4.4x | Pages in lock region: %i\n", + at91sam7_info->pagesize, + bank->num_sectors, + at91sam7_info->num_lockbits_on, + at91sam7_info->lockbits, + at91sam7_info->pages_per_sector*at91sam7_info->num_lockbits_on); + + buf += printed; + buf_size -= printed; + + snprintf(buf, buf_size, + " Securitybit: %i | Nvmbits(%i): %i 0x%1.1x\n", + at91sam7_info->securitybit, at91sam7_info->num_nvmbits, + at91sam7_info->num_nvmbits_on, at91sam7_info->nvmbits); + + return ERROR_OK; +} + +/* +* On AT91SAM7S: When the gpnvm bits are set with +* > at91sam7 gpnvm bitnr set +* the changes are not visible in the flash controller status register MC_FSR +* until the processor has been reset. +* On the Olimex board this requires a power cycle. +* Note that the AT91SAM7S has the following errata (doc6175.pdf sec 14.1.3): +* The maximum number of write/erase cycles for Non volatile Memory bits is 100. this includes +* Lock Bits (LOCKx), General Purpose NVM bits (GPNVMx) and the Security Bit. +*/ +COMMAND_HANDLER(at91sam7_handle_gpnvm_command) +{ + struct flash_bank *bank; + int bit; + uint8_t flashcmd; + uint32_t status; + struct at91sam7_flash_bank *at91sam7_info; + int retval; + + if (CMD_ARGC != 2) + return ERROR_COMMAND_SYNTAX_ERROR; + + bank = get_flash_bank_by_num_noprobe(0); + if (bank == NULL) + return ERROR_FLASH_BANK_INVALID; + if (strcmp(bank->driver->name, "at91sam7")) { + command_print(CMD_CTX, "not an at91sam7 flash bank '%s'", CMD_ARGV[0]); + return ERROR_FLASH_BANK_INVALID; + } + if (bank->target->state != TARGET_HALTED) { + LOG_ERROR("target has to be halted to perform flash operation"); + return ERROR_TARGET_NOT_HALTED; + } + + if (strcmp(CMD_ARGV[1], "set") == 0) + flashcmd = SGPB; + else if (strcmp(CMD_ARGV[1], "clear") == 0) + flashcmd = CGPB; + else + return ERROR_COMMAND_SYNTAX_ERROR; + + at91sam7_info = bank->driver_priv; + if (at91sam7_info->cidr == 0) { + retval = at91sam7_read_part_info(bank); + if (retval != ERROR_OK) + return retval; + } + + COMMAND_PARSE_NUMBER(int, CMD_ARGV[0], bit); + if ((bit < 0) || (bit >= at91sam7_info->num_nvmbits)) { + command_print(CMD_CTX, + "gpnvm bit '#%s' is out of bounds for target %s", + CMD_ARGV[0], + at91sam7_info->target_name); + return ERROR_OK; + } + + /* Configure the flash controller timing */ + at91sam7_read_clock_info(bank); + at91sam7_set_flash_mode(bank, FMR_TIMING_NVBITS); + + if (at91sam7_flash_command(bank, flashcmd, bit) != ERROR_OK) + return ERROR_FLASH_OPERATION_FAILED; + + /* GPNVM and SECURITY bits apply only for MC_FSR of EFC0 */ + status = at91sam7_get_flash_status(bank->target, 0); + LOG_DEBUG("at91sam7_handle_gpnvm_command: cmd 0x%x, value %d, status 0x%" PRIx32, + flashcmd, + bit, + status); + + /* check protect state */ + at91sam7_protect_check(bank); + + return ERROR_OK; +} + +static const struct command_registration at91sam7_exec_command_handlers[] = { + { + .name = "gpnvm", + .handler = at91sam7_handle_gpnvm_command, + .mode = COMMAND_EXEC, + .help = "set or clear one General Purpose Non-Volatile Memory " + "(gpnvm) bit", + .usage = "bitnum ('set'|'clear')", + }, + COMMAND_REGISTRATION_DONE +}; +static const struct command_registration at91sam7_command_handlers[] = { + { + .name = "at91sam7", + .mode = COMMAND_ANY, + .help = "at91sam7 flash command group", + .usage = "", + .chain = at91sam7_exec_command_handlers, + }, + COMMAND_REGISTRATION_DONE +}; + +struct flash_driver at91sam7_flash = { + .name = "at91sam7", + .usage = "gpnvm ", + .commands = at91sam7_command_handlers, + .flash_bank_command = at91sam7_flash_bank_command, + .erase = at91sam7_erase, + .protect = at91sam7_protect, + .write = at91sam7_write, + .read = default_flash_read, + .probe = at91sam7_probe, + .auto_probe = at91sam7_probe, + .erase_check = at91sam7_erase_check, + .protect_check = at91sam7_protect_check, + .info = get_at91sam7_info, +};