URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Subversion Repositories openrisc_me
[/] [openrisc/] [trunk/] [rtos/] [ecos-2.0/] [packages/] [hal/] [arm/] [integrator/] [v2_0/] [src/] [prog_flash.c] - Rev 454
Go to most recent revision | Compare with Previous | Blame | View Log
//========================================================================== // // prog_flash.c // // ARM INTEGRATOR eval board FLASH program tool // //========================================================================== //####ECOSGPLCOPYRIGHTBEGIN#### // ------------------------------------------- // This file is part of eCos, the Embedded Configurable Operating System. // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc. // // eCos 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 or (at your option) any later version. // // eCos 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 eCos; if not, write to the Free Software Foundation, Inc., // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA. // // As a special exception, if other files instantiate templates or use macros // or inline functions from this file, or you compile this file and link it // with other works to produce a work based on this file, this file does not // by itself cause the resulting work to be covered by the GNU General Public // License. However the source code for this file must still be made available // in accordance with section (3) of the GNU General Public License. // // This exception does not invalidate any other reasons why a work based on // this file might be covered by the GNU General Public License. // // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc. // at http://sources.redhat.com/ecos/ecos-license/ // ------------------------------------------- //####ECOSGPLCOPYRIGHTEND#### //========================================================================== //#####DESCRIPTIONBEGIN#### // // Author(s): gthomas // Contributors: Philippe Robin // Date: November 7, 2000 // Description: Tool used to program onboard FLASH image //####DESCRIPTIONEND#### // // This program will program the FLASH on the PID board // It is similar to 'flash' (which also downloads S records) but it always // programs from a fixed buffer. This is sufficient to load/update the GDB // stubs on the board. // #include <pkgconf/libc.h> // Configuration header #include <cyg/kernel/kapi.h> #include <stdlib.h> #include <ctype.h> #include <cyg/infra/testcase.h> #include <sys/cstartup.h> #include <cyg/hal/hal_integrator.h> #ifndef FALSE #define FALSE 0 #define TRUE 1 #endif #define INVALID_FTYPE 0x00000000 #define UNKNOWN_FTYPE 0xFFFFFFFF #define ATMEL_FTYPE 0x00000001 #define INTEL_FTYPE 0x00000002 #define FLASH_TYPE_MASK (ATMEL_FTYPE | INTEL_FTYPE) // On Some platforms Boot and program flash may be part of the same device #define INTEGRATED_FTYPE 0x80000000 #define BOOT_FTYPE 0x40000000 #define APP_FTYPE 0x20000000 #define FLASH_USAGE_MASK (BOOT_FTYPE | APP_FTYPE) #define DEFAULT_FLASH_MASK 0xFFFFFFF8 #define FLASH_BLOCK_SIZE 0x00020000 // 128Kb #define EPROM_BASE 0x20000000 #define EPROM_SIZE 0x00080000 // 512Kb #define FLASH_BASE 0x24000000 #define FLASH_SIZE 0x02000000 // 32Mb typedef struct flashType { char *base; // Base Address of flash char *physicalBase; // before mem initialisation unsigned int size; // Size of flash, in bytes unsigned int type; // Atmel / Intel (CFI) / Unknown unsigned int writeSize; // Size of physical block unsigned int eraseSize; // Size of block erase unsigned int logicalSize; // Size of logical block char *ident; // identification string } tFlash; tFlash Integrator_Flash[2] = { { (char *)EPROM_BASE, // Base Address of flash (char *)EPROM_BASE, // Physical Address of flash EPROM_SIZE, // Size of flash, in bytes (512K) BOOT_FTYPE | ATMEL_FTYPE, // Flash type FLASH_BLOCK_SIZE, // Size of physical block FLASH_BLOCK_SIZE, // Size of block erase FLASH_BLOCK_SIZE, // Size of logical block "Atmel", // Null terminated Info string }, { (char *)FLASH_BASE, // Base Address of flash (char *)FLASH_BASE, // Physical Address of flash FLASH_SIZE, // Size of flash, in bytes APP_FTYPE | INTEL_FTYPE, // Flash type FLASH_BLOCK_SIZE, // Size of physical block FLASH_BLOCK_SIZE, // Size of block erase FLASH_BLOCK_SIZE, // Size of logical block "Intel 28F320S3", // Null terminated Info string } }; extern void diag_printf(const char *, ...); int identify_FLASH(void); void write_sector(int, char *); char *flash_buffer = (char *)0x60000; char *flash_buffer_end = (char *)0x80000; #ifdef BE_IMAGE #define BUF(x) buf[x^3] #else #define BUF(x) buf[x] #endif // FUNCTIONS externC void cyg_package_start( void ) { #ifdef CYGPKG_LIBC cyg_iso_c_start(); #else (void)main(0, NULL); #endif } // cyg_package_start() int main( int argc, char *argv[] ) { int i; diag_printf("FLASH here!\n"); while (identify_FLASH() == 0) { diag_printf("... Please change FLASH jumper\n"); cyg_thread_delay(5*100); } diag_printf("About to program FLASH using data at %x..%x\n", flash_buffer, flash_buffer_end); diag_printf("*** Press RESET now to abort!\n"); cyg_thread_delay(5*100); diag_printf("\n"); diag_printf("...Programming FLASH\n"); i = 0; while (flash_buffer < flash_buffer_end) { write_sector(i++, flash_buffer); flash_buffer += 256; } diag_printf("All done!\n"); while (1) ; } // Adapted from ARM sample code #define SEQ_ADD1 0x5555 #define SEQ_ADD2 0x2aaa #define START_CMD1 0xaaaaaaaa #define START_CMD2 0x55555555 #define ID_CMD 0x90909090 #define PROG_CMD 0xA0 #define STOP_CMD 0xf0f0f0f0 #define MAN_ATMEL 0x1F #define ATMEL_AT29C040_ID 0X5B #define ATMEL_AT29C040A_ID 0XA4 #define ATMEL_AT29C1024_ID 0X25 #define ATMEL_SECTOR_SIZE 256 #define ATMEL_MAX_SECTORS 2048 #define MAN_INTEL 0xB0 #define INTEL_28F320S3_ID 0xD4 int manuf_code, device_code; int sector_size, max_no_of_sectors, word_mode; volatile unsigned int *FLASH = (volatile unsigned int *)0x24000000; int identify_FLASH(void ) { unsigned int *ptr = (unsigned int *)FLASH; HAL_FLASH_WRITE_ENABLE(); // Enter Software Product Identification Mode FLASH[SEQ_ADD1] = START_CMD1; FLASH[SEQ_ADD2] = START_CMD2; FLASH[SEQ_ADD1] = ID_CMD; // Wait at least 10ms cyg_thread_delay(4); // Read Manufacturer and device code from the device manuf_code = *ptr++ & 0xff; device_code = *ptr & 0xff; diag_printf("manuf: 0x%x, device: 0x%x\n", manuf_code, device_code); // Exit Software Product Identification Mode FLASH[SEQ_ADD1] = START_CMD1; FLASH[SEQ_ADD2] = START_CMD2; FLASH[SEQ_ADD1] = STOP_CMD; // Wait at least 10ms cyg_thread_delay(5); HAL_FLASH_WRITE_DISABLE(); if (manuf_code != MAN_ATMEL || manuf_code != MAN_INTEL) { diag_printf ( "Error: Wrong Manufaturer: %02x\n", manuf_code ); return (0); } switch (device_code) { case ATMEL_AT29C040A_ID: diag_printf ("AT29C040A recognised\n"); sector_size = ATMEL_SECTOR_SIZE; max_no_of_sectors = ATMEL_MAX_SECTORS; word_mode = FALSE; break; case ATMEL_AT29C1024_ID: diag_printf ("AT29C1024 recognised\n"); sector_size = ATMEL_SECTOR_SIZE; max_no_of_sectors = ATMEL_MAX_SECTORS; word_mode = TRUE; break; case INTEL_28F320S3_ID: diag_printf ("INTEL_28F320S3 recognised\n"); sector_size = FLASH_BLOCK_SIZE; // max_no_of_sectors = ATMEL_MAX_SECTORS; word_mode = TRUE; break; default : diag_printf ( "Error: Unsupported device: %02x\n", device_code); return (0); } return (1); } void write_sector(int num, char *buf) { int i, cnt; volatile char *wrt = (volatile char *)&FLASH[num*sector_size]; // diag_printf("Writing to %08x\n", wrt); // Enter Program Mode FLASH[SEQ_ADD1] = START_CMD1; FLASH[SEQ_ADD2] = START_CMD2; FLASH[SEQ_ADD1] = PROG_CMD; // Note: write bytes as longs regardless of bus width for (i = 0; i < sector_size; i++) { wrt[i] = BUF(i); } // Wait for sector to program cnt = 0; i = sector_size - 1; while (wrt[i] != BUF(i)) { if (cnt++ > 0x01000000) break; } // diag_printf("Out - i: %d, wrt[i] = %08X.%08X, BUF(i) = %08X, count = %x\n", i, &wrt[i], wrt[i], BUF(i), cnt); // Verify for (i = 0; i < sector_size; i++) { for (cnt = 0; cnt < 10; cnt++) { if (wrt[i] == BUF(i)) break; cyg_thread_delay(1); } if (cnt == 10) { diag_printf("Can't program at 0x%08X: %02X not %02X\n", wrt, *wrt, BUF(0)); } } }
Go to most recent revision | Compare with Previous | Blame | View Log