util/flashrom/sharplhf00l04.c

   1 /*
   2  * This file is part of the flashrom project.
   3  *
   4  * Copyright (C) 2000 Silicon Integrated System Corporation
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  19  */
  20
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include "flash.h"
  24
  25 // I need that Berkeley bit-map printer
  26 void print_lhf00l04_status(uint8_t status)
  27 {
  28         printf("%s", status & 0x80 ? "Ready:" : "Busy:");
  29         printf("%s", status & 0x40 ? "BE SUSPEND:" : "BE RUN/FINISH:");
  30         printf("%s", status & 0x20 ? "BE ERROR:" : "BE OK:");
  31         printf("%s", status & 0x10 ? "PROG ERR:" : "PROG OK:");
  32         printf("%s", status & 0x8 ? "VP ERR:" : "VPP OK:");
  33         printf("%s", status & 0x4 ? "PROG SUSPEND:" : "PROG RUN/FINISH:");
  34         printf("%s", status & 0x2 ? "WP|TBL#|WP#,ABORT:" : "UNLOCK:");
  35 }
  36
  37 int probe_lhf00l04(struct flashchip *flash)
  38 {
  39         volatile uint8_t *bios = flash->virtual_memory;
  40         uint8_t id1, id2;
  41
  42 #if 0
  43         /* Enter ID mode */
  44         *(volatile uint8_t *)(bios + 0x5555) = 0xAA;
  45         *(volatile uint8_t *)(bios + 0x2AAA) = 0x55;
  46         *(volatile uint8_t *)(bios + 0x5555) = 0x90;
  47 #endif
  48
  49         *bios = 0xff;
  50         myusec_delay(10);
  51         *bios = 0x90;
  52         myusec_delay(10);
  53
  54         id1 = *(volatile uint8_t *)bios;
  55         id2 = *(volatile uint8_t *)(bios + 0x01);
  56
  57         /* Leave ID mode */
  58         *(volatile uint8_t *)(bios + 0x5555) = 0xAA;
  59         *(volatile uint8_t *)(bios + 0x2AAA) = 0x55;
  60         *(volatile uint8_t *)(bios + 0x5555) = 0xF0;
  61
  62         myusec_delay(10);
  63
  64         printf_debug("%s: id1 0x%x, id2 0x%x\n", __FUNCTION__, id1, id2);
  65
  66         if (id1 != flash->manufacture_id || id2 != flash->model_id)
  67                 return 0;
  68
  69         map_flash_registers(flash);
  70
  71         return 1;
  72 }
  73
  74 uint8_t wait_lhf00l04(volatile uint8_t *bios)
  75 {
  76         uint8_t status;
  77         uint8_t id1, id2;
  78
  79         *bios = 0x70;
  80         if ((*bios & 0x80) == 0) {      // it's busy
  81                 while ((*bios & 0x80) == 0) ;
  82         }
  83
  84         status = *bios;
  85
  86         // put another command to get out of status register mode
  87
  88         *bios = 0x90;
  89         myusec_delay(10);
  90
  91         id1 = *(volatile uint8_t *)bios;
  92         id2 = *(volatile uint8_t *)(bios + 0x01);
  93
  94         // this is needed to jam it out of "read id" mode
  95         *(volatile uint8_t *)(bios + 0x5555) = 0xAA;
  96         *(volatile uint8_t *)(bios + 0x2AAA) = 0x55;
  97         *(volatile uint8_t *)(bios + 0x5555) = 0xF0;
  98
  99         return status;
 100 }
 101
 102 int erase_lhf00l04_block(struct flashchip *flash, int offset)
 103 {
 104         volatile uint8_t *bios = flash->virtual_memory + offset;
 105         volatile uint8_t *wrprotect = flash->virtual_registers + offset + 2;
 106         uint8_t status;
 107
 108         // clear status register
 109         *bios = 0x50;
 110         printf("Erase at %p\n", bios);
 111         status = wait_lhf00l04(flash->virtual_memory);
 112         print_lhf00l04_status(status);
 113         // clear write protect
 114         printf("write protect is at %p\n", (wrprotect));
 115         printf("write protect is 0x%x\n", *(wrprotect));
 116         *(wrprotect) = 0;
 117         printf("write protect is 0x%x\n", *(wrprotect));
 118
 119         // now start it
 120         *(volatile uint8_t *)(bios) = 0x20;
 121         *(volatile uint8_t *)(bios) = 0xd0;
 122         myusec_delay(10);
 123         // now let's see what the register is
 124         status = wait_lhf00l04(flash->virtual_memory);
 125         print_lhf00l04_status(status);
 126         printf("DONE BLOCK 0x%x\n", offset);
 127
 128         return 0;
 129 }
 130
 131 int erase_lhf00l04(struct flashchip *flash)
 132 {
 133         int i;
 134         unsigned int total_size = flash->total_size * 1024;
 135
 136         printf("total_size is %d; flash->page_size is %d\n",
 137                total_size, flash->page_size);
 138         for (i = 0; i < total_size; i += flash->page_size)
 139                 erase_lhf00l04_block(flash, i);
 140         printf("DONE ERASE\n");
 141
 142         return 0;
 143 }
 144
 145 void write_page_lhf00l04(volatile uint8_t *bios, uint8_t *src,
 146                          volatile uint8_t *dst, int page_size)
 147 {
 148         int i;
 149
 150         for (i = 0; i < page_size; i++) {
 151                 /* transfer data from source to destination */
 152                 *dst = 0x40;
 153                 *dst++ = *src++;
 154                 wait_lhf00l04(bios);
 155         }
 156 }
 157
 158 int write_lhf00l04(struct flashchip *flash, uint8_t *buf)
 159 {
 160         int i;
 161         int total_size = flash->total_size * 1024;
 162         int page_size = flash->page_size;
 163         volatile uint8_t *bios = flash->virtual_memory;
 164
 165         erase_lhf00l04(flash);
 166         if (*bios != 0xff) {
 167                 printf("ERASE FAILED!\n");
 168                 return -1;
 169         }
 170         printf("Programming page: ");
 171         for (i = 0; i < total_size / page_size; i++) {
 172                 printf("%04d at address: 0x%08x", i, i * page_size);
 173                 write_page_lhf00l04(bios, buf + i * page_size,
 174                                     bios + i * page_size, page_size);
 175                 printf("\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b\b");
 176         }
 177         printf("\n");
 178         protect_jedec(bios);
 179
 180         return 0;
 181 }