Two files for the iFP port that I forgot to commit

git-svn-id: svn://svn.rockbox.org/rockbox/trunk@8365 a1c6a512-1295-4272-9138-f99709370657
This commit is contained in:
Dave Chapman 2006-01-18 10:01:35 +00:00
parent a8c408c6a3
commit 205be712fe
2 changed files with 476 additions and 0 deletions

View file

@ -0,0 +1,454 @@
/***************************************************************************
* __________ __ ___.
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
* \/ \/ \/ \/ \/
* $Id$
*
* Copyright (C) 2005 Tomasz Malesinski
*
* All files in this archive are subject to the GNU General Public License.
* See the file COPYING in the source tree root for full license agreement.
*
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
* KIND, either express or implied.
*
****************************************************************************/
#include "ata.h"
#include <stdbool.h>
#include <string.h>
#if CONFIG_CPU == PNX0101
#include "pnx0101.h"
#endif
/*
#include "kernel.h"
#include "thread.h"
#include "led.h"
#include "cpu.h"
#include "system.h"
#include "debug.h"
#include "panic.h"
#include "usb.h"
#include "power.h"
#include "string.h"
#include "hwcompat.h"
*/
#define SECTOR_SIZE (512)
static unsigned short identify_info[SECTOR_SIZE];
int ata_spinup_time = 0;
long last_disk_activity = -1;
#if CONFIG_FLASH == FLASH_IFP7XX
static unsigned char flash_ce[4] = {0x20, 0x02, 0x10, 0x08};
#define FLASH_IO_BASE 0x28000000
#define FLASH_REG_DATA (*((volatile unsigned char*)(FLASH_IO_BASE)))
#define FLASH_REG_CMD (*((volatile unsigned char*)(FLASH_IO_BASE + 4)))
#define FLASH_REG_ADDR (*((volatile unsigned char*)(FLASH_IO_BASE + 8)))
#define SEGMENT_SIZE 1000
#define MAX_N_SEGMENTS 2
#endif
#define FLASH_MODEL_NONE 0
#define FLASH_MODEL_256 1
struct flash_disk
{
short model;
unsigned short block_map[MAX_N_SEGMENTS][SEGMENT_SIZE];
short cur_block;
int cur_phblock_start;
};
static struct flash_disk flash_disk;
void flash_select_chip(int no, int sel)
{
#if CONFIG_FLASH == FLASH_IFP7XX
if (sel)
GPIO5_CLR = flash_ce[no];
else
GPIO5_SET = flash_ce[no];
#endif
}
unsigned char flash_read_data(void)
{
return FLASH_REG_DATA;
}
void flash_write_data(unsigned char data)
{
FLASH_REG_DATA = data;
}
void flash_write_cmd(unsigned char cmd)
{
FLASH_REG_CMD = cmd;
}
void flash_write_addr(unsigned char addr)
{
FLASH_REG_ADDR = addr;
}
void flash_wait_ready(void)
{
int i;
for (i = 0; i < 5; i++)
while ((GPIO6_READ & 8) == 0);
}
int flash_map_sector(int sector, int* chip, int* chip_sector)
{
switch (flash_disk.model)
{
case FLASH_MODEL_NONE:
default:
return -1;
case FLASH_MODEL_256:
*chip = 0;
*chip_sector = sector;
return 0;
}
}
int flash_read_id(int no) {
int id;
flash_select_chip(no, 1);
flash_write_cmd(0x90);
flash_write_addr(0);
flash_read_data();
id = flash_read_data();
flash_select_chip(no, 0);
return id;
}
int flash_read_sector(int sector, unsigned char* buf,
unsigned char* oob)
{
int chip, chip_sector;
int i;
if (flash_map_sector(sector, &chip, &chip_sector) < 0)
return -1;
flash_select_chip(chip, 1);
flash_write_cmd(0x00);
flash_write_addr(0);
flash_write_addr((chip_sector << 1) & 7);
flash_write_addr((chip_sector >> 2) & 0xff);
flash_write_addr((chip_sector >> 10) & 0xff);
flash_write_addr((chip_sector >> 18) & 0xff);
flash_write_cmd(0x30);
flash_wait_ready();
for (i = 0; i < 512; i++)
buf[i] = flash_read_data();
flash_write_cmd(0x05);
flash_write_addr((chip_sector & 3) * 0x10);
flash_write_addr(8);
flash_write_cmd(0xe0);
for (i = 0; i < 16; i++)
oob[i] = flash_read_data();
flash_select_chip(chip, 0);
return 0;
}
int flash_read_sector_oob(int sector, unsigned char* oob)
{
int chip, chip_sector;
int i;
if (flash_map_sector(sector, &chip, &chip_sector) < 0)
return -1;
flash_select_chip(chip, 1);
flash_write_cmd(0x00);
flash_write_addr((chip_sector & 3) * 0x10);
flash_write_addr(8);
flash_write_addr((chip_sector >> 2) & 0xff);
flash_write_addr((chip_sector >> 10) & 0xff);
flash_write_addr((chip_sector >> 18) & 0xff);
flash_write_cmd(0x30);
flash_wait_ready();
for (i = 0; i < 16; i++)
oob[i] = flash_read_data();
flash_select_chip(chip, 0);
return 0;
}
static unsigned char model_n_segments[] = {0, 2};
static int flash_get_n_segments(void)
{
return model_n_segments[flash_disk.model];
}
static int flash_get_n_phblocks(void)
{
return 1024;
}
static int model_n_sectors_in_block[] = {0, 256};
static int flash_get_n_sectors_in_block(void)
{
return model_n_sectors_in_block[flash_disk.model];
}
static int flash_phblock_to_sector(int segment, int block)
{
return (segment * flash_get_n_phblocks() + block)
* flash_get_n_sectors_in_block();
}
static int flash_is_bad_block(unsigned char* oob)
{
/* TODO: should we check two pages? (see datasheet) */
return oob[0] != 0xff;
}
static int count_1(int n) {
int r = 0;
while (n != 0) {
r += (n & 1);
n >>= 1;
}
return r;
}
static int flash_get_logical_block_no(unsigned char* oob)
{
int no1, no2;
no1 = oob[6] + (oob[7] << 8);
no2 = oob[11] + (oob[12] << 8);
if (no1 == no2 && (no1 & 0xf000) == 0x1000)
return (no1 & 0xfff) >> 1;
if (count_1(no1 ^ no2) > 1)
return -1;
if ((no1 & 0xf000) == 0x1000
&& (count_1(no1) & 1) == 0)
return (no1 & 0xfff) >> 1;
if ((no2 & 0xf000) == 0x1000
&& (count_1(no2) & 1) == 0)
return (no2 & 0xfff) >> 1;
return -1;
}
int flash_disk_scan(void)
{
int n_segments, n_phblocks;
unsigned char oob[16];
int s, b;
/* TODO: checking for double blocks */
n_segments = flash_get_n_segments();
n_phblocks = flash_get_n_phblocks();
flash_disk.cur_block = -1;
flash_disk.cur_phblock_start = -1;
for (s = 0; s < n_segments; s++)
{
for (b = 0; b < n_phblocks; b++)
{
int r;
r = flash_read_sector_oob(flash_phblock_to_sector(s, b),
oob);
if (r >= 0 && !flash_is_bad_block(oob))
{
int lb;
lb = flash_get_logical_block_no(oob);
if (lb >= 0 && lb < SEGMENT_SIZE)
flash_disk.block_map[s][lb] = b;
}
}
}
return 0;
}
int flash_disk_find_block(int block)
{
int seg, bmod, phb;
unsigned char oob[16];
int r;
if (block >= SEGMENT_SIZE * flash_get_n_segments())
return -1;
if (block == flash_disk.cur_block)
return flash_disk.cur_phblock_start;
seg = block / SEGMENT_SIZE;
bmod = block % SEGMENT_SIZE;
phb = flash_disk.block_map[seg][bmod];
r = flash_read_sector_oob(flash_phblock_to_sector(seg, phb), oob);
if (r < 0)
return -1;
if (flash_is_bad_block(oob))
return -1;
if (flash_get_logical_block_no(oob) != bmod)
return -1;
flash_disk.cur_block = block;
flash_disk.cur_phblock_start = flash_phblock_to_sector(seg, phb);
return flash_disk.cur_phblock_start;
}
int flash_disk_read_sectors(unsigned long start,
int count,
void* buf)
{
int block, secmod, done;
int phb;
char oob[16];
block = start / flash_get_n_sectors_in_block();
secmod = start % flash_get_n_sectors_in_block();
phb = flash_disk_find_block(block);
done = 0;
while (count > 0 && secmod < flash_get_n_sectors_in_block())
{
if (phb >= 0)
flash_read_sector(phb + secmod, buf, oob);
else
memset(buf, 0, SECTOR_SIZE);
buf += SECTOR_SIZE;
count--;
secmod++;
done++;
}
return done;
}
int ata_read_sectors(IF_MV2(int drive,)
unsigned long start,
int incount,
void* inbuf)
{
while (incount > 0)
{
int done = flash_disk_read_sectors(start, incount, inbuf);
if (done < 0)
return -1;
incount -= done;
inbuf += SECTOR_SIZE * done;
}
return 0;
}
int ata_write_sectors(IF_MV2(int drive,)
unsigned long start,
int count,
const void* buf)
{
(void)start;
(void)count;
(void)buf;
return -1;
}
/* schedule a single sector write, executed with the the next spinup
(volume 0 only, used for config sector) */
extern void ata_delayed_write(unsigned long sector, const void* buf)
{
(void)sector;
(void)buf;
}
/* write the delayed sector to volume 0 */
extern void ata_flush(void)
{
}
void ata_spindown(int seconds)
{
(void)seconds;
}
bool ata_disk_is_active(void)
{
return 0;
}
void ata_sleep(void)
{
}
void ata_spin(void)
{
}
/* Hardware reset protocol as specified in chapter 9.1, ATA spec draft v5 */
int ata_hard_reset(void)
{
return 0;
}
int ata_soft_reset(void)
{
return 0;
}
void ata_enable(bool on)
{
(void)on;
}
unsigned short* ata_get_identify(void)
{
return identify_info;
}
int ata_init(void)
{
int id;
id = flash_read_id(0);
switch (id)
{
case 0xda:
flash_disk.model = FLASH_MODEL_256;
break;
default:
flash_disk.model = FLASH_MODEL_NONE;
return -1;
}
if (flash_disk_scan() < 0)
return -2;
return 0;
}

View file

@ -0,0 +1,22 @@
/***************************************************************************
* __________ __ ___.
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
* \/ \/ \/ \/ \/
* $Id$
*
* Copyright (C) 2005 by Tomasz Malesinski
*
* All files in this archive are subject to the GNU General Public License.
* See the file COPYING in the source tree root for full license agreement.
*
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
* KIND, either express or implied.
*
****************************************************************************/
void i2c_init(void)
{
}