s3c2410_flash.c

ARM的著名的启动代码 vivi s3c2440部分已测试通过

/*
 * vivi/drivers/mtd/maps/s3c2410-nand.c: 
 *   Flash memory access on S3C2410 based devices
 *
 * Copyright (C) 2002 MIZI Research, Inc.
 * 
 * Based on linux/drivers/mtd/maps/s3c2410-nand.c
 *
 * This code is GPL.
 * 
 * Author: Janghoon Lyu <[e-mail]>
 * Date  : $Date: 2002/08/29 06:10:23 $
 *
 * $Revision: 1.6 $
 * $Id: s3c2410_flash.c,v 1.6 2002/08/29 06:10:23 nandy Exp $
 *
 * 扁拌俊 蝶扼 促弗 甘 沥焊甫 捞侩秦辑 flash 皋葛府甫 檬扁拳茄促.
 *
 * History
 *
 * 2002-06-26: Janghoon Lyu <[e-mail]>
 *    - Created this code
 *
 */

#include "config.h"
#include "machine.h"
#include "mtd/mtd.h"
#include "mtd/map.h"
#include "io.h"
#include "printk.h"
#include "time.h"
#ifdef CONFIG_MTD_NAND_S3C2410
#include "mtd/nand.h"
#include "heap.h"
#endif
#include <types.h>
#include <errno.h>

#ifndef CONFIG_ARCH_S3C2410
#error This is for S3C2410 architecture only
#endif

extern struct mtd_info *mymtd;
extern struct nand_oobinfo bonfs_oob;

#ifdef CONFIG_MTD_CFI

#define WINDOW_ADDR	FLASH_UNCACHED_BASE

static __u8 s3c2410_read8(struct map_info *map, unsigned long ofs)
{
	return readb(map->map_priv_1 + ofs);
}

static __u16 s3c2410_read16(struct map_info *map, unsigned long ofs)
{
	return readw(map->map_priv_1 + ofs);
}

static __u32 s3c2410_read32(struct map_info *map, unsigned long ofs)
{
	return readl(map->map_priv_1 + ofs);
}

static void s3c2410_copy_from(struct map_info *map, void *to, unsigned long from, ssize_t len)
{
	memcpy(to, (void *)(map->map_priv_1 + from), len);
}

static void s3c2410_write8(struct map_info *map, __u8 d, unsigned long adr)
{
	writeb(d, map->map_priv_1 + adr);
}

static void s3c2410_write16(struct map_info *map, __u16 d, unsigned long adr)
{
	writew(d, map->map_priv_1 + adr);
}

static void s3c2410_write32(struct map_info *map, __u32 d, unsigned long adr)
{
	writel(d, map->map_priv_1 + adr);
}

static void s3c2410_copy_to(struct map_info *map, unsigned long to, const void *from, ssize_t len)
{
	memcpy((void *)(map->map_priv_1 + to), from, len);
}

static struct map_info s3c2410_map = {
	name:		"S3C2410 flash",
	read8:		s3c2410_read8,
	read16:		s3c2410_read16,
	read32:		s3c2410_read32,
	copy_from:	s3c2410_copy_from,
	write8:		s3c2410_write8,
	write16:	s3c2410_write16,
	write32:	s3c2410_write32,
	copy_to:	s3c2410_copy_to,

	map_priv_1:	WINDOW_ADDR,
	map_priv_2:	-1,
};


extern void set_vpp(struct map_info *map, int vpp);

static int 
cfi_init(void)
{
	/* Default flash buswidth */
	s3c2410_map.buswidth = FLASH_BUSWIDTH;
	/* Default flash size */
	s3c2410_map.size = FLASH_SIZE;

	s3c2410_map.set_vpp = set_vpp;

	/*
	 * Now let's probe for the actual flash.  Do it here since
	 * specific machine settings might have been set above.
	 */
	printk("S3C2410 flash: probing %d-bit flash bus\n", s3c2410_map.buswidth*8);
	mymtd = do_map_probe("cfi_probe", &s3c2410_map);
	if (!mymtd) return -ENXIO;

	return 0;
}
#endif /* CONFIG_MTD_CFI */

#ifdef CONFIG_S3C2410_AMD_BOOT

static __u8 s3c2410_read8(struct map_info *map, unsigned long ofs)
{
	return readb(map->map_priv_1 + ofs);
}

static __u16 s3c2410_read16(struct map_info *map, unsigned long ofs)
{
	return readw(map->map_priv_1 + ofs);
}

static __u32 s3c2410_read32(struct map_info *map, unsigned long ofs)
{
	return readl(map->map_priv_1 + ofs);
}

static void s3c2410_copy_from(struct map_info *map, void *to, unsigned long from, ssize_t len)
{
	memcpy(to, (void *)(map->map_priv_1 + from), len);
}

static void s3c2410_write8(struct map_info *map, __u8 d, unsigned long adr)
{
	writeb(d, map->map_priv_1 + adr);
}

static void s3c2410_write16(struct map_info *map, __u16 d, unsigned long adr)
{
	writew(d, map->map_priv_1 + adr);
}

static void s3c2410_write32(struct map_info *map, __u32 d, unsigned long adr)
{
	writel(d, map->map_priv_1 + adr);
}

static void s3c2410_copy_to(struct map_info *map, unsigned long to, const void *from, ssize_t len)
{
	memcpy((void *)(map->map_priv_1 + to), from, len);
}

static struct map_info s3c2410_map = {
	name:		"S3C2410 amd flash",
	read8:		s3c2410_read8,
	read16:		s3c2410_read16,
	read32:		s3c2410_read32,
	copy_from:	s3c2410_copy_from,
	write8:		s3c2410_write8,
	write16:	s3c2410_write16,
	write32:	s3c2410_write32,
	copy_to:	s3c2410_copy_to,

	map_priv_1:	FLASH_UNCACHED_BASE,
	//map_priv_1:	FLASH_BASE,
	map_priv_2:	-1,
};


extern void set_vpp(struct map_info *map, int vpp);

static int 
amd_init(void)
{
	/* Default flash buswidth */
	s3c2410_map.buswidth = FLASH_BUSWIDTH;
	/* Default flash size */
	s3c2410_map.size = FLASH_SIZE;

	s3c2410_map.set_vpp = set_vpp;

	/*
	 * Now let's probe for the actual flash.  Do it here since
	 * specific machine settings might have been set above.
	 */
	printk("S3C2410 flash: probing %d-bit flash bus\n", s3c2410_map.buswidth*8);
	mymtd = do_map_probe("amd_flash", &s3c2410_map);
	if (!mymtd) return -ENXIO;

	return 0;
}
#endif /* CONFIG_MTD_CFI */

#ifdef CONFIG_MTD_NAND

static void s3c2410_nand_hwcontrol(int cmd) 
{
	switch (cmd) {
	case NAND_CTL_SETNCE:		NFCONF &= ~NFCONF_nFCE_HIGH; break;
	case NAND_CTL_CLRNCE:		NFCONF |= NFCONF_nFCE_HIGH; break;
	case NAND_CTL_SETCLE:		break;
	case NAND_CTL_CLRCLE:		break;
	case NAND_CTL_SETALE:		break;
	case NAND_CTL_CLRALE:		break;
	case NAND_CTL_DAT_IN:		break;
	case NAND_CTL_DAT_OUT:		break;
	}
}

static void s3c2410_nand_select_chip(struct mtd_info *mtd, int chip)
{
	if (chip == 0)
		NFCONF &= ~NFCONF_nFCE_HIGH;
	else
		NFCONF |= NFCONF_nFCE_HIGH;
}

static int s3c2410_nand_device_ready(struct mtd_info *mtd)
{
	return (NFSTAT & NFSTAT_RnB) ? 1:0;
}

static u_char s3c2410_nand_read_byte(struct mtd_info *mtd)
{
	return (u_char)(NFDATA);
}

static void s3c2410_nand_write_byte(struct mtd_info *mtd, u_char byte)
{
	NFDATA=(u_char)byte;
}


static void s3c2410_nand_write_cmd(struct mtd_info *mtd,u_char val) 
{
	NFCMD = (u_char)val;
}

static void s3c2410_nand_write_addr(struct mtd_info *mtd,u_char val) 
{
	NFADDR = (u_char)val;
}

static void s3c2410_nand_cmdfunc(struct mtd_info *mtd, unsigned command, int column, int page_addr)
{
	register struct nand_chip *this = mtd->priv;

	/*
	 * Write out the command to the device.
	 */
	if (command == NAND_CMD_SEQIN) {
		int readcmd;
		if (column >= mtd->oobblock) {
			/* OOB area */
			column -= mtd->oobblock;
			readcmd = NAND_CMD_READOOB;
		} else if (column < 256) {
			/* First 256 bytes --> READ0 */
			readcmd = NAND_CMD_READ0;
		} else {
			column -= 256;
			readcmd = NAND_CMD_READ1;
		}
		NFCMD = readcmd;
	}
	NFCMD = (command & 0xFF);

	if (column != -1 || page_addr != -1) {
		/* Serially input address */
		if (column != -1)
			NFADDR = (column & 0xFF);
		if (page_addr != -1) {
			NFADDR = (unsigned char)(page_addr & 0xff);
			NFADDR = (unsigned char)((page_addr >> 8) & 0xff);
			/* One more address cycle for higher density devices */
			if (mtd->size & 0x0c000000) 
				NFADDR = (unsigned char)((page_addr >> 16) & 0x0f);
		}
		/* Latch in address */
	}
	
	/* 
	 * program and erase have their own busy handlers 
	 * status and sequential in needs no delay
	 */
	switch (command) {
			
	case NAND_CMD_PAGEPROG:
	case NAND_CMD_ERASE1:
	case NAND_CMD_ERASE2:
	case NAND_CMD_SEQIN:
	case NAND_CMD_STATUS:
		return;

	case NAND_CMD_RESET:
		if (this->dev_ready)	
			break;
		NFCMD = NAND_CMD_STATUS;
		while ( !(NFDATA & 0x40));
		return;

	/* This applies to read commands */	
	default:
		if (!this->dev_ready) {
			udelay (this->chip_delay);
			return;
		}	
	}
	
	/* wait until command is processed */
	while (!this->dev_ready(mtd));
}

int s3c2410_nand_init (void)
{
	struct nand_chip *this;
    	u_int16_t nfconf;
	int err = 0;

	/* Allocate memory for MTD device structure and private data */
	mymtd = mmalloc(sizeof(struct mtd_info) + sizeof(struct nand_chip));
	
	if (!mymtd) {
		printk ("Unable to allocate NAND MTD device structure.\n");
		return -ENOMEM;
	}

	/* Get pointer to private data */
	this = (struct nand_chip *) (&mymtd[1]);

	/* Initialize structures */
	memset((char *) mymtd, 0, sizeof(struct mtd_info));
	memset((char *) this, 0, sizeof(struct nand_chip));

	/* Link the private data with the MTD structure */
	mymtd->priv = this;

	/*
	 * boot-loader's stuff
	 */
	nfconf = NFCONF;
	nfconf |= NFCONF_FCTRL_EN;
	nfconf &= ~NFCONF_TWRPH1;   /* 0x0 */
	nfconf |= NFCONF_TWRPH0_3;  /* 0x3 */
	nfconf &= ~NFCONF_TACLS;    /* 0x0 */
	NFCONF = nfconf;

	/* Set address of NAND IO lines */
//	this->IO_ADDR_R = NFDATA ;
//	this->IO_ADDR_R = NFDATA | 0xa0000000;
//	this->IO_ADDR_W = NFDATA | 0xa0000000;
//	this->IO_ADDR_W = NFDATA ;

	this->hwcontrol = s3c2410_nand_hwcontrol;
	this->select_chip = s3c2410_nand_select_chip;
	this->dev_ready = s3c2410_nand_device_ready;
	this->cmdfunc = s3c2410_nand_cmdfunc;

	this->write_byte = s3c2410_nand_write_byte;
	this->read_byte = s3c2410_nand_read_byte;
	this->write_cmd = s3c2410_nand_write_cmd;
	this->write_addr = s3c2410_nand_write_addr;

	this->eccmode = NAND_ECC_SOFT;

	/* 20 us command delay time */
	this->chip_delay = 20;		

	/* Scan to find existance of the device */
	if (nand_scan (mymtd, 1)) {
		return -ENXIO;
	}

	/* Allocate memory for internal data buffer */
	this->data_buf = mmalloc(sizeof(u_char) * (mymtd->oobblock + mymtd->oobsize));
	if (!this->data_buf) {
		printk ("Unable to allocate NAND data buffer\n");
		return -ENOMEM;		
	}

	mymtd->oobinfo=bonfs_oob;	
	return 0;
}

#endif /* CONFIG_MTD_NAND_S3C2410*/

int mtd_init(void)
{
	int ret;

#ifdef CONFIG_MTD_CFI
	ret = cfi_init();
#endif
#ifdef CONFIG_MTD_NAND
	ret = s3c2410_nand_init();
#endif
#ifdef CONFIG_S3C2410_AMD_BOOT
	ret = amd_init();
#endif

	if (ret) {
		mymtd = NULL;
		return ret;
	}
	return 0;
}