src/flash/nor/dsp5680xx_flash.c

   1 /***************************************************************************
   2  *   Copyright (C) 2011 by Rodrigo L. Rosa                                 *
   3  *   rodrigorosa.LG@gmail.com                                              *
   4  *                                                                         *
   5  *   Based on a file written by:                                           *
   6  *   Kevin McGuire                                                         *
   7  *   Marcel Wijlaars                                                       *
   8  *   Michael Ashton                                                        *
   9  *                                                                         *
  10  *   This program is free software; you can redistribute it and/or modify  *
  11  *   it under the terms of the GNU General Public License as published by  *
  12  *   the Free Software Foundation; either version 2 of the License, or     *
  13  *   (at your option) any later version.                                   *
  14  *                                                                         *
  15  *   This program is distributed in the hope that it will be useful,       *
  16  *   but WITHOUT ANY WARRANTY; without even the implied warranty of        *
  17  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         *
  18  *   GNU General Public License for more details.                          *
  19  *                                                                         *
  20  *   You should have received a copy of the GNU General Public License     *
  21  *   along with this program; if not, write to the                         *
  22  *   Free Software Foundation, Inc.,                                       *
  23  *   59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.             *
  24  ***************************************************************************/
  25
  26 /**
  27  * @file   dsp5680xx_flash.c
  28  * @author Rodrigo L. Rosa <rodrigorosa.LG@gmail.com>
  29  * @date   Thu Jun  9 18:21:58 2011
  30  *
  31  * @brief  This file implements the basic functions to run flashing commands
  32  * from the TCL interface.
  33  * It allows the user to flash the Freescale 5680xx DSP.
  34  *
  35  *
  36  */
  37
  38
  39 #ifdef HAVE_CONFIG_H
  40 #include "config.h"
  41 #endif
  42
  43 #ifndef DSP5680XX_FLASH_H
  44 #define DSP5680XX_FLASH_H
  45
  46 #include "imp.h"
  47 #include <helper/binarybuffer.h>
  48 #include <helper/time_support.h>
  49 #include <target/algorithm.h>
  50 #include <target/dsp5680xx.h>
  51
  52 struct dsp5680xx_flash_bank {
  53         struct working_area *write_algorithm;
  54 };
  55
  56 static int dsp5680xx_build_sector_list(struct flash_bank *bank){
  57   uint32_t offset = HFM_FLASH_BASE_ADDR;
  58   bank->sectors = malloc(sizeof(struct flash_sector) * bank->num_sectors);
  59   int i;
  60   for (i = 0; i < bank->num_sectors; ++i){
  61     bank->sectors[i].offset = i*HFM_SECTOR_SIZE;
  62     bank->sectors[i].size = HFM_SECTOR_SIZE;
  63     offset += bank->sectors[i].size;
  64     bank->sectors[i].is_erased = -1;
  65     bank->sectors[i].is_protected = -1;
  66   }
  67   LOG_USER("%s not tested yet.",__FUNCTION__);
  68   return ERROR_OK;
  69
  70 }
  71
  72 // flash bank dsp5680xx 0 0 0 0 <target#>
  73 FLASH_BANK_COMMAND_HANDLER(dsp5680xx_flash_bank_command){
  74   struct dsp5680xx_flash_bank *nbank;
  75
  76   nbank = malloc(sizeof(struct dsp5680xx_flash_bank));
  77
  78   bank->base = HFM_FLASH_BASE_ADDR;
  79   bank->size = HFM_SIZE_BYTES; // top 4k not accessible
  80   bank->driver_priv = nbank;
  81   bank->num_sectors = HFM_SECTOR_COUNT;
  82   dsp5680xx_build_sector_list(bank);
  83
  84   return ERROR_OK;
  85 }
  86
  87 /**
  88  * A memory mapped register (PROT) holds information regarding sector protection.
  89  * Protection refers to undesired core access.
  90  * The value in this register is loaded from flash upon reset.
  91  *
  92  * @param bank
  93  *
  94  * @return
  95  */
  96 static int dsp5680xx_flash_protect_check(struct flash_bank *bank){
  97   int retval = ERROR_OK;
  98   uint16_t protected = 0;
  99     retval = dsp5680xx_f_protect_check(bank->target,&protected);
 100   if(retval != ERROR_OK){
 101     for(int i = 0;i<HFM_SECTOR_COUNT;i++)
 102       bank->sectors[i].is_protected = -1;
 103     return ERROR_OK;
 104   }
 105   for(int i = 0;i<HFM_SECTOR_COUNT/2;i++){
 106     if(protected & 1){
 107       bank->sectors[2*i].is_protected = 1;
 108       bank->sectors[2*i+1].is_protected = 1;
 109     }else{
 110       bank->sectors[2*i].is_protected = 0;
 111       bank->sectors[2*i+1].is_protected = 0;
 112     }
 113     protected = (protected >> 1);
 114   }
 115   return retval;
 116 }
 117
 118 /**
 119  * Protection funcionality is not implemented.
 120  * The current implementation applies/removes security on the chip.
 121  * The chip is effectively secured/unsecured after the first reset following the execution of this function.
 122  *
 123  * @param bank
 124  * @param set Apply or remove security on the chip.
 125  * @param first This parameter is ignored.
 126  * @param last This parameter is ignored.
 127  *
 128  * @return
 129  */
 130 static int dsp5680xx_flash_protect(struct flash_bank *bank, int set, int first, int last){
 131   // This applies security to flash module after next reset, it does not actually apply protection (protection refers to undesired access from the core)
 132   int retval;
 133   if(set)
 134     retval = dsp5680xx_f_lock(bank->target);
 135   else
 136     retval = dsp5680xx_f_unlock(bank->target);
 137   return retval;
 138 }
 139
 140 /**
 141  * The dsp5680xx use word addressing. The "/2" that appear in the following code are a workaround for the fact that OpenOCD uses byte addressing.
 142  *
 143  * @param bank
 144  * @param buffer Data to write to flash.
 145  * @param offset
 146  * @param count In bytes (2 bytes per address).
 147  *
 148  * @return
 149  */
 150 static int dsp5680xx_flash_write(struct flash_bank *bank, uint8_t *buffer, uint32_t offset, uint32_t count){
 151   int retval;
 152   if((offset + count/2)>bank->size){
 153     LOG_ERROR("%s: Flash bank cannot fit data.",__FUNCTION__);
 154     return ERROR_FAIL;
 155   }
 156   if(offset%2){
 157     LOG_ERROR("%s: Writing to odd addresses not supported. This chip uses word addressing, Openocd only supports byte addressing. The workaround results in disabling writing to odd byte addresses.",__FUNCTION__);
 158     return ERROR_FAIL;
 159   }
 160   retval = dsp5680xx_f_wr(bank->target,  buffer, bank->base + offset/2,  count);
 161   uint32_t addr_word;
 162   for(addr_word = bank->base + offset/2;addr_word<count/2;addr_word+=(HFM_SECTOR_SIZE/2)){
 163     if(retval == ERROR_OK)
 164       bank->sectors[addr_word/(HFM_SECTOR_SIZE/2)].is_erased = 0;
 165     else
 166       bank->sectors[addr_word/(HFM_SECTOR_SIZE/2)].is_erased = -1;
 167   }
 168   if(retval != ERROR_OK)//TODO testing! remove!
 169     exit(EXIT_FAILURE);//TODO testing! remove!
 170   return retval;
 171 }
 172
 173 static int dsp5680xx_probe(struct flash_bank *bank){
 174   LOG_DEBUG("%s not implemented",__FUNCTION__);
 175   return ERROR_OK;
 176 }
 177
 178 static int dsp5680xx_flash_info(struct flash_bank *bank, char *buf, int buf_size){
 179         snprintf(buf, buf_size, "\ndsp5680xx flash driver info:\n - Currently only full erase/lock/unlock are implemented. \n - Call with bank==0 and sector 0 to 0.\n - Protect requires arp_init-reset to complete. \n - Before removing protection the master tap must be selected, and arp_init-reset is required to complete unlocking.");
 180         return ERROR_OK;
 181 }
 182
 183 /**
 184  * The flash module (FM) on the dsp5680xx supports both individual sector and mass erase of the flash memory.
 185  * If this function is called with @first == @last == 0 or if @first is the first sector (#0) and @last is the last sector then the mass erase command is executed (much faster than erasing each sector individually).
 186  *
 187  * @param bank
 188  * @param first
 189  * @param last
 190  *
 191  * @return
 192  */
 193 static int dsp5680xx_flash_erase(struct flash_bank * bank, int first, int last){
 194   int retval;
 195   retval = dsp5680xx_f_erase(bank->target, (uint32_t) first, (uint32_t) last);
 196   if(retval == ERROR_OK)
 197     for(int i = first;i<=last;i++)
 198       bank->sectors[i].is_erased = 1;
 199   else
 200         // If an error occurred unknown status is set even though some sector could have been correctly erased.
 201     for(int i = first;i<=last;i++)
 202       bank->sectors[i].is_erased = -1;
 203   return retval;
 204 }
 205
 206 /**
 207  * The flash module (FM) on the dsp5680xx support a blank check function.
 208  * This function executes the FM's blank check functionality on each and every sector.
 209  *
 210  * @param bank
 211  *
 212  * @return
 213  */
 214 static int dsp5680xx_flash_erase_check(struct flash_bank * bank){
 215   int retval = ERROR_OK;
 216   uint8_t erased = 0;
 217   uint32_t i;
 218   for(i=0;i<HFM_SECTOR_COUNT;i++){
 219     if(bank->sectors[i].is_erased == -1){
 220       retval = dsp5680xx_f_erase_check(bank->target,&erased,i);
 221     if (retval != ERROR_OK){
 222         bank->sectors[i].is_erased = -1;
 223     }else{
 224       if(erased)
 225         bank->sectors[i].is_erased = 1;
 226       else
 227         bank->sectors[i].is_erased = 0;
 228       }
 229     }
 230   }
 231   return retval;
 232 }
 233
 234 struct flash_driver dsp5680xx_flash = {
 235   .name = "dsp5680xx_flash",
 236   .flash_bank_command = dsp5680xx_flash_bank_command,
 237   .erase = dsp5680xx_flash_erase,
 238   .protect = dsp5680xx_flash_protect,
 239   .write = dsp5680xx_flash_write,
 240   //.read = default_flash_read,
 241   .probe = dsp5680xx_probe,
 242   .auto_probe = dsp5680xx_probe,
 243   .erase_check = dsp5680xx_flash_erase_check,
 244   .protect_check = dsp5680xx_flash_protect_check,
 245   .info = dsp5680xx_flash_info
 246 };
 247 #endif // dsp5680xx_flash.h