flash.c

三星mcu S3C4510B评估板的原码

/*************************************************************************/
/*                                                                       */
/* FILE NAME                                      VERSION                */
/*                                                                       */
/* source\flash.c                                  1.0                   */
/*                                                                       */
/* DESCRIPTION                                                           */
/*                                                                       */
/*     DIAGNOSTIC CODE for S3C4510B0                                     */
/*                                                                       */
/*                                                                       */
/* DATA STRUCTURES                                                       */
/*                                                                       */
/* FUNCTIONS : Flash AM29LV800BB program code                            */
/*                                                                       */
/* DEPENDENCIES                                                          */
/*                                                                       */
/*                                                                       */
/* NAME:    Nicolas Park           					 */
/* The last Modification date:  18-April-2002                            */
/* REMARKS:  Created initial version 1.0                                 */
/*                                                                       */
/*                                Copyright (C) 2002 AIJISYSTEM CO.,LTD  */
/*************************************************************************/

#include <stdio.h>
#include <string.h>
#include "s3c4510b0.h"
#include "uart.h"
#include "isr.h"
#include "timer.h"
#include "pollio.h"
#include "sysconf.h"
#include "flash.h"


void AM29LV800_StartCmd(U16 cmd);
static void SectorProg_InputTargetAddr(void);
static void ChipProg_InputTargetAddr(void);
int AM29LV800_CheckID(void);
int AM29LV800_LoadData(void);
int AM29LV800_ChipErase(void);
int AM29LV800_SectorErase(U32 targetAddr);
int AM29LV800_BlankCheck(U32 targetAddr, U32 targetSize);
void AM29LV800_Program(U32 targetAddr, U32 limit, U32 srcAddr);
int AM29LV800_Verification(U32 targetAddr, U32 limit, U32 srcAddr);
void AM29LV800_SectorProg(void);
void AM29LV800_ChipProg(void);
int _WAIT(void);

#define _WR(addr,data)	*((U16 *)(addr<<1))=(U16)data
#define _RD(addr)	( *((U16 *)(addr<<1)) )
#define _RESET()	_WR(0x200000,0xf0f0)   //AM29LV800BB base address is Bank1=0x200000<<1=0x400000
#define BADDR2WADDR(addr)   (addr>>1)

#define BaseAddress 0x400000

U32 srcAddress=0x1200000;    //downloaded source address is 0x1200000 (in SDRAM)
U32 srcOffset=0x0;
U32 targetAddress=0x400000; //AM29LV800BB base address is Bank1=0x400000
U32 targetSize=0x100000;   //Max size is 1Mbyte


void  ProgramFlash()
{
	char ItemSel ;


       do{
	Print("\n\n") ;
	Print("\n##################################\r") ;
	Print("\n#     FLASH PROGRAM MENU         #\r") ;
	Print("\n##################################\r") ;
	Print("\n#  1. Sector Program mode -[S]   #\r") ;
	Print("\n#  2. Chip Program mode   -[C]   #\r") ;
	Print("\n#  3. QUIT!!              -[Q]   #\r") ;
	Print("\n##################################\r") ;


	Print("\n\rSelect Test Item : ") ;
	ItemSel = get_byte();
		switch(ItemSel)
		{
		case 'S' :case '1' : case 'p' : AM29LV800_SectorProg() ; break ;
		case 'C' :case '2' : case 'f' : AM29LV800_ChipProg(); break ;
		default : Print("\nWrong Item Selected!!") ; 
		break ;
		}

	Print("\nPress Any Key to Continue!!"); 

     } while((ItemSel!='q')&&(ItemSel!='Q'));
	return ;
}



void AM29LV800_ChipProg(void)
{
    Print("\nFlash full Programming is started!!!!\n");


    ChipProg_InputTargetAddr();

    Print("[ID Check]\n");
    if(!AM29LV800_CheckID())
    {
	Print("ID Check Error!!!\n");
	return;
    }

    Print("[Flash full Erase]\n");
    if(!AM29LV800_ChipErase())
    {
	Print("Flash Erase Error!!!\n");
	return;
    }
    Print("Flash Erase OK!!!\n");

    Print("[Blank Check] : ");
    if(!AM29LV800_BlankCheck(targetAddress, targetSize))
	Print("Blank Check Error!!!\n");
    else Print("Blank Check OK!!!\n");

    Print("[Programming] : ");
    AM29LV800_Program(targetAddress, targetSize, (srcAddress+srcOffset));

    Print("[Verification] : ");
    if(!AM29LV800_Verification(targetAddress, targetSize, (srcAddress+srcOffset)))
    {
	Print("Flash Verification Error!!!\n");
	return;
    }

    Print("Flash Programming completed!!!\n");

}




void AM29LV800_SectorProg(void)
{
    Print("\nFlash full Programming is started!!!!\n");


    SectorProg_InputTargetAddr();



    Print("[ID Check]\n");
    if(!AM29LV800_CheckID())
    {
	Print("ID Check Error!!!\n");
	return;
    }

    Print("[Sector Erase]\n");
    if(!AM29LV800_SectorErase(targetAddress))
    {
	Print("Flash Erase Error!!!\n");
	return;
    }

    Print("[Programming]\n");
    AM29LV800_Program(targetAddress, targetSize, (srcAddress+srcOffset));

    Print("[Verification]\n");
    if(!AM29LV800_Verification(targetAddress, targetSize, (srcAddress+srcOffset)))
    {
	Print("Flash Verification Error!!!\n");
	return;
    }

    Print("Do you want  Chip programming without additional download  ? [y/n]\n");
    if(get_byte()=='y')AM29LV800_ChipProg();
}

void AM29LV800_StartCmd(U16 cmd)
{
    _WR(0x200555,0xaaaa);
    _WR(0x2002aa,0x5555);
    _WR(0x200555,cmd);
}

int AM29LV800_CheckID(void)
{
    U16 manId,devId;

    _RESET();

    AM29LV800_StartCmd(0x9090);
    manId=_RD(0x200000);

    _RESET();

    AM29LV800_StartCmd(0x9090);
    devId=_RD(0x200001);

    _RESET();

    Print("Manufacture ID=%4x(0x0001), Device ID(0x225B)=%4x\n",manId,devId);

    if(manId==0x0001 && devId==0x225b)return 1;
    else return 0;
}




static void SectorProg_InputTargetAddr(void)
{
    Print("[AM29LV800BB Sector Writing Program]\n");

    targetAddress=BaseAddress;
    
    targetSize=0x100000;

    Print("source offset=0x%x\n",srcOffset);
    Print("target address=0x%x\n",targetAddress);
    Print("target block size=0x%x\n",targetSize);
}


static void ChipProg_InputTargetAddr(void)
{
    Print("[AM29LV800BB Writing Program]\n");
    targetAddress=BaseAddress;

}



int AM29LV800_ChipErase(void)
{
    int isYes=0;

    Print("Chip Erase is started!!! : ");

    _RESET();

    AM29LV800_StartCmd(0x8080);

    _WR(0x200555,0xaaaa);
    _WR(0x2002aa,0x5555);
    _WR(0x200555,0x1010);

    isYes = _WAIT();

    _RESET();

    if(isYes==1) return 1;
    else return 0;
}


int AM29LV800_SectorErase(U32 targetAddr)
{
    int isYes=0;

    Print("Sector Erase is started!\n");

    _RESET();

    AM29LV800_StartCmd(0x8080);
    _WR(0x200555,0xaaaa);
    _WR(0x2002aa,0x5555);
    _WR(0x200000,0x3030);


    isYes = _WAIT();

    _RESET();

    if(isYes==1) return 1;
    else return 0; 
}

int AM29LV800_BlankCheck(U32 targetAddr, U32 targetSize)
{
    int i,j;
    for(i=0;i<targetSize;i+=2)
    {
	j=*((U16 *)(i+targetAddr));
	if( j!=0xffff) return 0;
    }
    return 1;
}

void AM29LV800_Program(U32 targetAddr, U32 limit, U32 srcAddr)
{
    volatile U16 *tempPt;
    int i;
    U16 data;

    for(i=0; i<limit; i+=2)
    {
	tempPt=(volatile U16 *)(targetAddr+i);
	data=*((U16 *)(srcAddr+i));

	AM29LV800_StartCmd(0xa0a0);
	*tempPt=data;

	_WAIT();

	if((i%0x10000)==0)Print("%x ",i);
    }
    Print("End of the data writing!!!\n");

    _RESET();
}

int AM29LV800_Verification(U32 targetAddr, U32 limit, U32 srcAddr)
{
    int i=0;
    volatile U16 *tempPt;
    volatile U16 data;

    Print("\nVerifying Start. : ");

    for(i=0; i<limit; i+=2)
    {
	tempPt=(volatile U16 *)(targetAddr+i);
	data=*((U16 *)(srcAddr+i));

	if(*(tempPt) != data)
	{
	    Print("Error Address=0x%x Rael Data=0x%x Error Data=0x%x\n",tempPt,*tempPt,data);
	    //return 0;
	}
	if((i%0x10000)==0)Print("%x ",i);
    }
    Print("\nverifying OK!!!\n");
    return 1;
}



int _WAIT(void) //Check if the bit6 toggle ends.
{
    volatile U16 flashStatus,old;



    old=*((volatile U16 *)0x400000);

    while(1)
    {
	flashStatus=*((volatile U16 *)0x400000);

	if( (old&0x40) == (flashStatus&0x40) )break;
	if( flashStatus&0x20 )
	{
	    old=*((volatile U16 *)0x0);
	    flashStatus=*((volatile U16 *)0x0);
	    if( (old&0x40) == (flashStatus&0x40) )
		return 1;
	    else return 0;
	}
	old=flashStatus;
    }
    return 1;
}