common/env_nand.c

   1 /*
   2  * (C) Copyright 2004
   3  * Jian Zhang, Texas Instruments, jzhang@ti.com.
   4
   5  * (C) Copyright 2000-2006
   6  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   7  *
   8  * (C) Copyright 2001 Sysgo Real-Time Solutions, GmbH <www.elinos.com>
   9  * Andreas Heppel <aheppel@sysgo.de>
  10
  11  * See file CREDITS for list of people who contributed to this
  12  * project.
  13  *
  14  * This program is free software; you can redistribute it and/or
  15  * modify it under the terms of the GNU General Public License as
  16  * published by the Free Software Foundation; either version 2 of
  17  * the License, or (at your option) any later version.
  18  *
  19  * This program is distributed in the hope that it will be useful,
  20  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  21  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  22  * GNU General Public License for more details.
  23  *
  24  * You should have received a copy of the GNU General Public License
  25  * along with this program; if not, write to the Free Software
  26  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  27  * MA 02111-1307 USA
  28  */
  29
  30 /* #define DEBUG */
  31
  32 #include <common.h>
  33
  34 #if defined(CFG_ENV_IS_IN_NAND) /* Environment is in Nand Flash */
  35
  36 #include <command.h>
  37 #include <environment.h>
  38 #include <linux/stddef.h>
  39 #include <malloc.h>
  40 #include <nand.h>
  41
  42 #if defined(CONFIG_CMD_ENV) && defined(CONFIG_CMD_NAND)
  43 #define CMD_SAVEENV
  44 #elif defined(CFG_ENV_OFFSET_REDUND)
  45 #error Cannot use CFG_ENV_OFFSET_REDUND without CONFIG_CMD_ENV & CONFIG_CMD_NAND
  46 #endif
  47
  48 #if defined(CFG_ENV_SIZE_REDUND) && (CFG_ENV_SIZE_REDUND != CFG_ENV_SIZE)
  49 #error CFG_ENV_SIZE_REDUND should be the same as CFG_ENV_SIZE
  50 #endif
  51
  52 #ifdef CONFIG_INFERNO
  53 #error CONFIG_INFERNO not supported yet
  54 #endif
  55
  56 int nand_legacy_rw (struct nand_chip* nand, int cmd,
  57             size_t start, size_t len,
  58             size_t * retlen, u_char * buf);
  59
  60 /* info for NAND chips, defined in drivers/mtd/nand/nand.c */
  61 extern nand_info_t nand_info[];
  62
  63 /* references to names in env_common.c */
  64 extern uchar default_environment[];
  65 extern int default_environment_size;
  66
  67 char * env_name_spec = "NAND";
  68
  69
  70 #ifdef ENV_IS_EMBEDDED
  71 extern uchar environment[];
  72 env_t *env_ptr = (env_t *)(&environment[0]);
  73 #else /* ! ENV_IS_EMBEDDED */
  74 env_t *env_ptr = 0;
  75 #endif /* ENV_IS_EMBEDDED */
  76
  77
  78 /* local functions */
  79 #if !defined(ENV_IS_EMBEDDED)
  80 static void use_default(void);
  81 #endif
  82
  83 DECLARE_GLOBAL_DATA_PTR;
  84
  85 uchar env_get_char_spec (int index)
  86 {
  87         return ( *((uchar *)(gd->env_addr + index)) );
  88 }
  89
  90
  91 /* this is called before nand_init()
  92  * so we can't read Nand to validate env data.
  93  * Mark it OK for now. env_relocate() in env_common.c
  94  * will call our relocate function which will does
  95  * the real validation.
  96  *
  97  * When using a NAND boot image (like sequoia_nand), the environment
  98  * can be embedded or attached to the U-Boot image in NAND flash. This way
  99  * the SPL loads not only the U-Boot image from NAND but also the
 100  * environment.
 101  */
 102 int env_init(void)
 103 {
 104 #if defined(ENV_IS_EMBEDDED)
 105         ulong total;
 106         int crc1_ok = 0, crc2_ok = 0;
 107         env_t *tmp_env1, *tmp_env2;
 108
 109         total = CFG_ENV_SIZE;
 110
 111         tmp_env1 = env_ptr;
 112         tmp_env2 = (env_t *)((ulong)env_ptr + CFG_ENV_SIZE);
 113
 114         crc1_ok = (crc32(0, tmp_env1->data, ENV_SIZE) == tmp_env1->crc);
 115         crc2_ok = (crc32(0, tmp_env2->data, ENV_SIZE) == tmp_env2->crc);
 116
 117         if (!crc1_ok && !crc2_ok)
 118                 gd->env_valid = 0;
 119         else if(crc1_ok && !crc2_ok)
 120                 gd->env_valid = 1;
 121         else if(!crc1_ok && crc2_ok)
 122                 gd->env_valid = 2;
 123         else {
 124                 /* both ok - check serial */
 125                 if(tmp_env1->flags == 255 && tmp_env2->flags == 0)
 126                         gd->env_valid = 2;
 127                 else if(tmp_env2->flags == 255 && tmp_env1->flags == 0)
 128                         gd->env_valid = 1;
 129                 else if(tmp_env1->flags > tmp_env2->flags)
 130                         gd->env_valid = 1;
 131                 else if(tmp_env2->flags > tmp_env1->flags)
 132                         gd->env_valid = 2;
 133                 else /* flags are equal - almost impossible */
 134                         gd->env_valid = 1;
 135         }
 136
 137         if (gd->env_valid == 1)
 138                 env_ptr = tmp_env1;
 139         else if (gd->env_valid == 2)
 140                 env_ptr = tmp_env2;
 141 #else /* ENV_IS_EMBEDDED */
 142         gd->env_addr  = (ulong)&default_environment[0];
 143         gd->env_valid = 1;
 144 #endif /* ENV_IS_EMBEDDED */
 145
 146         return (0);
 147 }
 148
 149 #ifdef CMD_SAVEENV
 150 /*
 151  * The legacy NAND code saved the environment in the first NAND device i.e.,
 152  * nand_dev_desc + 0. This is also the behaviour using the new NAND code.
 153  */
 154 #ifdef CFG_ENV_OFFSET_REDUND
 155 int saveenv(void)
 156 {
 157         ulong total;
 158         int ret = 0;
 159
 160         env_ptr->flags++;
 161         total = CFG_ENV_SIZE;
 162
 163         if(gd->env_valid == 1) {
 164                 puts ("Erasing redundant Nand...");
 165                 if (nand_erase(&nand_info[0],
 166                                CFG_ENV_OFFSET_REDUND, CFG_ENV_SIZE))
 167                         return 1;
 168                 puts ("Writing to redundant Nand... ");
 169                 ret = nand_write(&nand_info[0], CFG_ENV_OFFSET_REDUND, &total,
 170                                  (u_char*) env_ptr);
 171         } else {
 172                 puts ("Erasing Nand...");
 173                 if (nand_erase(&nand_info[0],
 174                                CFG_ENV_OFFSET, CFG_ENV_SIZE))
 175                         return 1;
 176
 177                 puts ("Writing to Nand... ");
 178                 ret = nand_write(&nand_info[0], CFG_ENV_OFFSET, &total,
 179                                  (u_char*) env_ptr);
 180         }
 181         if (ret || total != CFG_ENV_SIZE)
 182                 return 1;
 183
 184         puts ("done\n");
 185         gd->env_valid = (gd->env_valid == 2 ? 1 : 2);
 186         return ret;
 187 }
 188 #else /* ! CFG_ENV_OFFSET_REDUND */
 189 int saveenv(void)
 190 {
 191         ulong total;
 192         int ret = 0;
 193
 194         puts ("Erasing Nand...");
 195         if (nand_erase(&nand_info[0], CFG_ENV_OFFSET, CFG_ENV_SIZE))
 196                 return 1;
 197
 198         puts ("Writing to Nand... ");
 199         total = CFG_ENV_SIZE;
 200         ret = nand_write(&nand_info[0], CFG_ENV_OFFSET, &total, (u_char*)env_ptr);
 201         if (ret || total != CFG_ENV_SIZE)
 202                 return 1;
 203
 204         puts ("done\n");
 205         return ret;
 206 }
 207 #endif /* CFG_ENV_OFFSET_REDUND */
 208 #endif /* CMD_SAVEENV */
 209
 210 #ifdef CFG_ENV_OFFSET_REDUND
 211 void env_relocate_spec (void)
 212 {
 213 #if !defined(ENV_IS_EMBEDDED)
 214         ulong total;
 215         int crc1_ok = 0, crc2_ok = 0;
 216         env_t *tmp_env1, *tmp_env2;
 217
 218         total = CFG_ENV_SIZE;
 219
 220         tmp_env1 = (env_t *) malloc(CFG_ENV_SIZE);
 221         tmp_env2 = (env_t *) malloc(CFG_ENV_SIZE);
 222
 223         nand_read(&nand_info[0], CFG_ENV_OFFSET, &total,
 224                   (u_char*) tmp_env1);
 225         nand_read(&nand_info[0], CFG_ENV_OFFSET_REDUND, &total,
 226                   (u_char*) tmp_env2);
 227
 228         crc1_ok = (crc32(0, tmp_env1->data, ENV_SIZE) == tmp_env1->crc);
 229         crc2_ok = (crc32(0, tmp_env2->data, ENV_SIZE) == tmp_env2->crc);
 230
 231         if(!crc1_ok && !crc2_ok)
 232                 return use_default();
 233         else if(crc1_ok && !crc2_ok)
 234                 gd->env_valid = 1;
 235         else if(!crc1_ok && crc2_ok)
 236                 gd->env_valid = 2;
 237         else {
 238                 /* both ok - check serial */
 239                 if(tmp_env1->flags == 255 && tmp_env2->flags == 0)
 240                         gd->env_valid = 2;
 241                 else if(tmp_env2->flags == 255 && tmp_env1->flags == 0)
 242                         gd->env_valid = 1;
 243                 else if(tmp_env1->flags > tmp_env2->flags)
 244                         gd->env_valid = 1;
 245                 else if(tmp_env2->flags > tmp_env1->flags)
 246                         gd->env_valid = 2;
 247                 else /* flags are equal - almost impossible */
 248                         gd->env_valid = 1;
 249
 250         }
 251
 252         free(env_ptr);
 253         if(gd->env_valid == 1) {
 254                 env_ptr = tmp_env1;
 255                 free(tmp_env2);
 256         } else {
 257                 env_ptr = tmp_env2;
 258                 free(tmp_env1);
 259         }
 260
 261 #endif /* ! ENV_IS_EMBEDDED */
 262 }
 263 #else /* ! CFG_ENV_OFFSET_REDUND */
 264 /*
 265  * The legacy NAND code saved the environment in the first NAND device i.e.,
 266  * nand_dev_desc + 0. This is also the behaviour using the new NAND code.
 267  */
 268 void env_relocate_spec (void)
 269 {
 270 #if !defined(ENV_IS_EMBEDDED)
 271         ulong total;
 272         int ret;
 273
 274 #if defined(CFG_ENV_OFFSET_OOB)
 275         struct mtd_info *mtd = &nand_info[0];
 276         struct nand_chip *this = mtd->priv;
 277         int buf_len;
 278         uint8_t *buf;
 279
 280         buf_len = (1 << this->bbt_erase_shift);
 281         buf_len += (buf_len >> this->page_shift) * mtd->oobsize;
 282         buf = malloc(buf_len);
 283         if (!buf)
 284                 return;
 285
 286         nand_read_raw(mtd, buf, 0, mtd->oobblock, mtd->oobsize);
 287         if (buf[mtd->oobblock + 8 + 0] == 'E' &&
 288             buf[mtd->oobblock + 8 + 1] == 'N' &&
 289             buf[mtd->oobblock + 8 + 2] == 'V' &&
 290             buf[mtd->oobblock + 8 + 3] == '0') {
 291                 CFG_ENV_OFFSET = *((unsigned long *) &buf[mtd->oobblock + 8 + 4]);
 292                 /* fall through to the normal environment reading code below */
 293                 free(buf);
 294                 puts("Found Environment offset in OOB..\n");
 295         } else {
 296                 free(buf);
 297                 return use_default();
 298         }
 299 #endif
 300
 301         total = CFG_ENV_SIZE;
 302         ret = nand_read(&nand_info[0], CFG_ENV_OFFSET, &total, (u_char*)env_ptr);
 303         if (ret || total != CFG_ENV_SIZE)
 304                 return use_default();
 305
 306         if (crc32(0, env_ptr->data, ENV_SIZE) != env_ptr->crc)
 307                 return use_default();
 308 #endif /* ! ENV_IS_EMBEDDED */
 309 }
 310 #endif /* CFG_ENV_OFFSET_REDUND */
 311
 312 #if !defined(ENV_IS_EMBEDDED)
 313 static void use_default()
 314 {
 315         puts ("*** Warning - bad CRC or NAND, using default environment\n\n");
 316         default_env();
 317 }
 318 #endif
 319
 320 #endif /* CFG_ENV_IS_IN_NAND */