util/flashrom/am29f040b.c

   1 /*
   2  * am29f040.c: driver for programming AMD am29f040b models
   3  *
   4  *
   5  * Copyright 2000 Silicon Integrated System Corporation
   6  *
   7  *      This program is free software; you can redistribute it and/or modify
   8  *      it under the terms of the GNU General Public License as published by
   9  *      the Free Software Foundation; either version 2 of the License, or
  10  *      (at your option) any later version.
  11  *
  12  *      This program is distributed in the hope that it will be useful,
  13  *      but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *      GNU General Public License for more details.
  16  *
  17  *      You should have received a copy of the GNU General Public License
  18  *      along with this program; if not, write to the Free Software
  19  *      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20  *
  21  *
  22  * Reference:
  23  *      AMD Am29F040B data sheet
  24  * $Id$
  25  */
  26
  27 #include <stdio.h>
  28 #include "flash.h"
  29 #include "jedec.h"
  30
  31 static __inline__ int erase_sector_29f040b(volatile char *bios,
  32                                            unsigned long address)
  33 {
  34         *(bios + 0x555) = 0xAA;
  35         *(bios + 0x2AA) = 0x55;
  36         *(bios + 0x555) = 0x80;
  37         *(bios + 0x555) = 0xAA;
  38         *(bios + 0x2AA) = 0x55;
  39         *(bios + address) = 0x30;
  40
  41         sleep(2);
  42
  43         /* wait for Toggle bit ready         */
  44         toggle_ready_jedec(bios + address);
  45
  46         return (0);
  47 }
  48
  49 static __inline__ int write_sector_29f040b(volatile char *bios,
  50                                            unsigned char *src,
  51                                            volatile unsigned char *dst,
  52                                            unsigned int page_size)
  53 {
  54         int i;
  55
  56         for (i = 0; i < page_size; i++) {
  57                 printf("0x%08lx",
  58                        (unsigned long) dst - (unsigned long) bios);
  59
  60                 *(bios + 0x555) = 0xAA;
  61                 *(bios + 0x2AA) = 0x55;
  62                 *(bios + 0x555) = 0xA0;
  63                 *dst++ = *src++;
  64
  65                 /* wait for Toggle bit ready */
  66                 toggle_ready_jedec(bios);
  67
  68                 printf("\b\b\b\b\b\b\b\b\b\b");
  69         }
  70
  71         return (0);
  72 }
  73
  74 int probe_29f040b(struct flashchip *flash)
  75 {
  76         volatile unsigned char *bios = flash->virt_addr;
  77         unsigned char id1, id2;
  78
  79         *(bios + 0x555) = 0xAA;
  80         *(bios + 0x2AA) = 0x55;
  81         *(bios + 0x555) = 0x90;
  82
  83         id1 = *bios;
  84         id2 = *(bios + 0x01);
  85
  86         *bios = 0xF0;
  87
  88         myusec_delay(10);
  89
  90         printf("%s: id1 0x%x, id2 0x%x\n", __FUNCTION__, id1, id2);
  91         if (id1 == flash->manufacture_id && id2 == flash->model_id)
  92                 return 1;
  93
  94         return 0;
  95 }
  96
  97 int erase_29f040b(struct flashchip *flash)
  98 {
  99         volatile unsigned char *bios = flash->virt_addr;
 100
 101         *(bios + 0x555) = 0xAA;
 102         *(bios + 0x2AA) = 0x55;
 103         *(bios + 0x555) = 0x80;
 104         *(bios + 0x555) = 0xAA;
 105         *(bios + 0x2AA) = 0x55;
 106         *(bios + 0x555) = 0x10;
 107
 108         myusec_delay(10);
 109         toggle_ready_jedec(bios);
 110
 111         return (0);
 112 }
 113
 114 int write_29f040b(struct flashchip *flash, unsigned char *buf)
 115 {
 116         int i;
 117         int total_size = flash->total_size * 1024, page_size =
 118             flash->page_size;
 119         volatile char *bios = flash->virt_addr;
 120
 121         printf("Programming Page: ");
 122         for (i = 0; i < total_size / page_size; i++) {
 123                 /* erase the page before programming */
 124                 erase_sector_29f040b(bios, i * page_size);
 125
 126                 /* write to the sector */
 127                 printf("%04d at address: ", i);
 128                 write_sector_29f040b(bios, buf + i * page_size,
 129                                      bios + i * page_size, page_size);
 130                 printf("\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b");
 131         }
 132         printf("\n");
 133
 134         return (0);
 135 }