[people/ms/u-boot.git] / arch / arm / cpu / armv7 / omap-common / spl.c

/*
 * (C) Copyright 2010
 * Texas Instruments, <www.ti.com>
 *
 * Aneesh V <aneesh@ti.com>
 *
 * See file CREDITS for list of people who contributed to this
 * project.
 *
 * This program 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 of
 * the License, or (at your option) any later version.
 *
 * This program 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 this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
 * MA 02111-1307 USA
 */
#include <common.h>
#include <asm/u-boot.h>
#include <asm/utils.h>
#include <asm/arch/sys_proto.h>
#include <nand.h>
#include <mmc.h>
#include <fat.h>
#include <timestamp_autogenerated.h>
#include <version_autogenerated.h>
#include <asm/omap_common.h>
#include <asm/arch/mmc_host_def.h>
#include <i2c.h>
#include <image.h>

DECLARE_GLOBAL_DATA_PTR;

/* Define global data structure pointer to it*/
static gd_t gdata __attribute__ ((section(".data")));
static bd_t bdata __attribute__ ((section(".data")));
static const char *image_name;
static u8 image_os;
static u32 image_load_addr;
static u32 image_entry_point;
static u32 image_size;

inline void hang(void)
{
	puts("### ERROR ### Please RESET the board ###\n");
	for (;;)
		;
}

void board_init_f(ulong dummy)
{
	/*
	 * We call relocate_code() with relocation target same as the
	 * CONFIG_SYS_SPL_TEXT_BASE. This will result in relocation getting
	 * skipped. Instead, only .bss initialization will happen. That's
	 * all we need
	 */
	debug(">>board_init_f()\n");
	relocate_code(CONFIG_SPL_STACK, &gdata, CONFIG_SPL_TEXT_BASE);
}

#ifdef CONFIG_GENERIC_MMC
int board_mmc_init(bd_t *bis)
{
	switch (omap_boot_device()) {
	case BOOT_DEVICE_MMC1:
		omap_mmc_init(0);
		break;
	case BOOT_DEVICE_MMC2:
		omap_mmc_init(1);
		break;
	}
	return 0;
}
#endif

static void parse_image_header(const struct image_header *header)
{
	u32 header_size = sizeof(struct image_header);

	if (__be32_to_cpu(header->ih_magic) == IH_MAGIC) {
		image_size = __be32_to_cpu(header->ih_size) + header_size;
		image_entry_point = __be32_to_cpu(header->ih_load);
		/* Load including the header */
		image_load_addr = image_entry_point - header_size;
		image_os = header->ih_os;
		image_name = (const char *)&header->ih_name;
		debug("spl: payload image: %s load addr: 0x%x size: %d\n",
			image_name, image_load_addr, image_size);
	} else {
		/* Signature not found - assume u-boot.bin */
		printf("mkimage signature not found - ih_magic = %x\n",
			header->ih_magic);
		puts("Assuming u-boot.bin ..\n");
		/* Let's assume U-Boot will not be more than 200 KB */
		image_size = 200 * 1024;
		image_entry_point = CONFIG_SYS_TEXT_BASE;
		image_load_addr = CONFIG_SYS_TEXT_BASE;
		image_os = IH_OS_U_BOOT;
		image_name = "U-Boot";
	}
}

static void mmc_load_image_raw(struct mmc *mmc)
{
	u32 image_size_sectors, err;
	const struct image_header *header;

	header = (struct image_header *)(CONFIG_SYS_TEXT_BASE -
						sizeof(struct image_header));

	/* read image header to find the image size & load address */
	err = mmc->block_dev.block_read(0,
			CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_SECTOR, 1,
			(void *)header);

	if (err <= 0)
		goto end;

	parse_image_header(header);

	/* convert size to sectors - round up */
	image_size_sectors = (image_size + MMCSD_SECTOR_SIZE - 1) /
				MMCSD_SECTOR_SIZE;

	/* Read the header too to avoid extra memcpy */
	err = mmc->block_dev.block_read(0,
			CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_SECTOR,
			image_size_sectors, (void *)image_load_addr);

end:
	if (err <= 0) {
		printf("spl: mmc blk read err - %d\n", err);
		hang();
	}
}

static void mmc_load_image_fat(struct mmc *mmc)
{
	s32 err;
	struct image_header *header;

	header = (struct image_header *)(CONFIG_SYS_TEXT_BASE -
						sizeof(struct image_header));

	err = fat_register_device(&mmc->block_dev,
				CONFIG_SYS_MMC_SD_FAT_BOOT_PARTITION);
	if (err) {
		printf("spl: fat register err - %d\n", err);
		hang();
	}

	err = file_fat_read(CONFIG_SPL_FAT_LOAD_PAYLOAD_NAME,
				(u8 *)header, sizeof(struct image_header));
	if (err <= 0)
		goto end;

	parse_image_header(header);

	err = file_fat_read(CONFIG_SPL_FAT_LOAD_PAYLOAD_NAME,
				(u8 *)image_load_addr, 0);

end:
	if (err <= 0) {
		printf("spl: error reading image %s, err - %d\n",
			CONFIG_SPL_FAT_LOAD_PAYLOAD_NAME, err);
		hang();
	}
}
static void mmc_load_image(void) __attribute__((unused));
static void mmc_load_image(void)
{
	struct mmc *mmc;
	int err;
	u32 boot_mode;

	mmc_initialize(gd->bd);
	/* We register only one device. So, the dev id is always 0 */
	mmc = find_mmc_device(0);
	if (!mmc) {
		puts("spl: mmc device not found!!\n");
		hang();
	}

	err = mmc_init(mmc);
	if (err) {
		printf("spl: mmc init failed: err - %d\n", err);
		hang();
	}
/* For OMAP3 there is no automatic boot mode detection */
#ifdef CONFIG_OMAP34XX
	boot_mode = CONFIG_SYS_MMC_SD_BOOTMODE;
#else
	boot_mode = omap_boot_mode();
#endif
	if (boot_mode == MMCSD_MODE_RAW) {
		debug("boot mode - RAW\n");
		mmc_load_image_raw(mmc);
	} else if (boot_mode == MMCSD_MODE_FAT) {
		debug("boot mode - FAT\n");
		mmc_load_image_fat(mmc);
	} else {
		puts("spl: wrong MMC boot mode\n");
		hang();
	}
}

#ifdef CONFIG_SPL_NAND_SUPPORT
static void nand_load_image(void) __attribute__ ((unused));
static void nand_load_image(void)
{
	struct image_header *header;

	gpmc_init();
	nand_init();

	/*use CONFIG_SYS_TEXT_BASE as temporary storage area */
	header = (struct image_header *)(CONFIG_SYS_TEXT_BASE);

#ifdef CONFIG_NAND_ENV_DST
	nand_spl_load_image(CONFIG_ENV_OFFSET,
		CONFIG_SYS_NAND_PAGE_SIZE, (void *)header);
	parse_image_header(header);
	nand_spl_load_image(CONFIG_ENV_OFFSET, image_size,
		(void *)image_load_addr);
#ifdef CONFIG_ENV_OFFSET_REDUND
	nand_spl_load_image(CONFIG_ENV_OFFSET_REDUND,
		CONFIG_SYS_NAND_PAGE_SIZE, (void *)header);
	parse_image_header(header);
	nand_spl_load_image(CONFIG_ENV_OFFSET_REDUND, image_size,
		(void *)image_load_addr);
#endif
#endif
	/* Load u-boot */
	nand_spl_load_image(CONFIG_SYS_NAND_U_BOOT_OFFS,
		CONFIG_SYS_NAND_PAGE_SIZE, (void *)header);
	parse_image_header(header);
	nand_spl_load_image(CONFIG_SYS_NAND_U_BOOT_OFFS,
		image_size, (void *)image_load_addr);
	nand_deselect();
}
#endif /* CONFIG_SPL_NAND_SUPPORT */
void jump_to_image_no_args(void)
{
	typedef void (*image_entry_noargs_t)(void)__attribute__ ((noreturn));
	image_entry_noargs_t image_entry =
			(image_entry_noargs_t) image_entry_point;

	debug("image entry point: 0x%X\n", image_entry_point);
	image_entry();
}

void jump_to_image_no_args(void) __attribute__ ((noreturn));
void board_init_r(gd_t *id, ulong dummy)
{
	u32 boot_device;
	debug(">>spl:board_init_r()\n");

	timer_init();
	i2c_init(CONFIG_SYS_I2C_SPEED, CONFIG_SYS_I2C_SLAVE);

	boot_device = omap_boot_device();
	debug("boot device - %d\n", boot_device);
	switch (boot_device) {
#ifdef CONFIG_SPL_MMC_SUPPORT
	case BOOT_DEVICE_MMC1:
	case BOOT_DEVICE_MMC2:
		mmc_load_image();
		break;
#endif
#ifdef CONFIG_SPL_NAND_SUPPORT
	case BOOT_DEVICE_NAND:
		nand_load_image();
		break;
#endif
	default:
		printf("SPL: Un-supported Boot Device - %d!!!\n", boot_device);
		hang();
		break;
	}

	switch (image_os) {
	case IH_OS_U_BOOT:
		debug("Jumping to U-Boot\n");
		jump_to_image_no_args();
		break;
	default:
		puts("Unsupported OS image.. Jumping nevertheless..\n");
		jump_to_image_no_args();
	}
}

/* This requires UART clocks to be enabled */
void preloader_console_init(void)
{
	const char *u_boot_rev = U_BOOT_VERSION;
	char rev_string_buffer[50];

	gd = &gdata;
	gd->bd = &bdata;
	gd->flags |= GD_FLG_RELOC;
	gd->baudrate = CONFIG_BAUDRATE;

	serial_init();		/* serial communications setup */

	/* Avoid a second "U-Boot" coming from this string */
	u_boot_rev = &u_boot_rev[7];

	printf("\nU-Boot SPL %s (%s - %s)\n", u_boot_rev, U_BOOT_DATE,
		U_BOOT_TIME);
	omap_rev_string(rev_string_buffer);
	printf("Texas Instruments %s\n", rev_string_buffer);
}
Commit	Line	Data
bcae7211 A	1	/*
	2	* (C) Copyright 2010
	3	* Texas Instruments, <www.ti.com>
	4	*
	5	* Aneesh V <aneesh@ti.com>
	6	*
	7	* See file CREDITS for list of people who contributed to this
	8	* project.
	9	*
	10	* This program is free software; you can redistribute it and/or
	11	* modify it under the terms of the GNU General Public License as
	12	* published by the Free Software Foundation; either version 2 of
	13	* the License, or (at your option) any later version.
	14	*
	15	* This program is distributed in the hope that it will be useful,
	16	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	17	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	18	* GNU General Public License for more details.
	19	*
	20	* You should have received a copy of the GNU General Public License
	21	* along with this program; if not, write to the Free Software
	22	* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
	23	* MA 02111-1307 USA
	24	*/
	25	#include <common.h>
	26	#include <asm/u-boot.h>
8cf686e1	27	#include <asm/utils.h>
bcae7211	28	#include <asm/arch/sys_proto.h>
bb085b87	29	#include <nand.h>
8cf686e1 A	30	#include <mmc.h>
8cf686e1 A	31	#include <fat.h>
bcae7211 A	32	#include <timestamp_autogenerated.h>
bcae7211 A	33	#include <version_autogenerated.h>
8cf686e1 A	34	#include <asm/omap_common.h>
	35	#include <asm/arch/mmc_host_def.h>
	36	#include <i2c.h>
	37	#include <image.h>
bcae7211 A	38
	39	DECLARE_GLOBAL_DATA_PTR;
	40
	41	/* Define global data structure pointer to it*/
	42	static gd_t gdata __attribute__ ((section(".data")));
	43	static bd_t bdata __attribute__ ((section(".data")));
8cf686e1 A	44	static const char *image_name;
	45	static u8 image_os;
	46	static u32 image_load_addr;
	47	static u32 image_entry_point;
	48	static u32 image_size;
bcae7211 A	49
	50	inline void hang(void)
	51	{
	52	puts("### ERROR ### Please RESET the board ###\n");
	53	for (;;)
	54	;
	55	}
	56
	57	void board_init_f(ulong dummy)
	58	{
	59	/*
	60	* We call relocate_code() with relocation target same as the
	61	* CONFIG_SYS_SPL_TEXT_BASE. This will result in relocation getting
	62	* skipped. Instead, only .bss initialization will happen. That's
	63	* all we need
	64	*/
	65	debug(">>board_init_f()\n");
	66	relocate_code(CONFIG_SPL_STACK, &gdata, CONFIG_SPL_TEXT_BASE);
	67	}
	68
8cf686e1 A	69	#ifdef CONFIG_GENERIC_MMC
	70	int board_mmc_init(bd_t *bis)
	71	{
	72	switch (omap_boot_device()) {
	73	case BOOT_DEVICE_MMC1:
	74	omap_mmc_init(0);
	75	break;
	76	case BOOT_DEVICE_MMC2:
	77	omap_mmc_init(1);
	78	break;
	79	}
	80	return 0;
	81	}
	82	#endif
	83
	84	static void parse_image_header(const struct image_header *header)
	85	{
	86	u32 header_size = sizeof(struct image_header);
	87
	88	if (__be32_to_cpu(header->ih_magic) == IH_MAGIC) {
	89	image_size = __be32_to_cpu(header->ih_size) + header_size;
	90	image_entry_point = __be32_to_cpu(header->ih_load);
	91	/* Load including the header */
	92	image_load_addr = image_entry_point - header_size;
	93	image_os = header->ih_os;
	94	image_name = (const char *)&header->ih_name;
	95	debug("spl: payload image: %s load addr: 0x%x size: %d\n",
	96	image_name, image_load_addr, image_size);
	97	} else {
	98	/* Signature not found - assume u-boot.bin */
	99	printf("mkimage signature not found - ih_magic = %x\n",
	100	header->ih_magic);
	101	puts("Assuming u-boot.bin ..\n");
	102	/* Let's assume U-Boot will not be more than 200 KB */
	103	image_size = 200 * 1024;
	104	image_entry_point = CONFIG_SYS_TEXT_BASE;
	105	image_load_addr = CONFIG_SYS_TEXT_BASE;
	106	image_os = IH_OS_U_BOOT;
	107	image_name = "U-Boot";
	108	}
	109	}
	110
	111	static void mmc_load_image_raw(struct mmc *mmc)
	112	{
	113	u32 image_size_sectors, err;
	114	const struct image_header *header;
	115
	116	header = (struct image_header *)(CONFIG_SYS_TEXT_BASE -
	117	sizeof(struct image_header));
	118
	119	/* read image header to find the image size & load address */
	120	err = mmc->block_dev.block_read(0,
	121	CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_SECTOR, 1,
	122	(void *)header);
	123
	124	if (err <= 0)
	125	goto end;
	126
	127	parse_image_header(header);
	128
	129	/* convert size to sectors - round up */
	130	image_size_sectors = (image_size + MMCSD_SECTOR_SIZE - 1) /
	131	MMCSD_SECTOR_SIZE;
	132
133	/* Read the header too to avoid extra memcpy */
134	err = mmc->block_dev.block_read(0,
135	CONFIG_SYS_MMCSD_RAW_MODE_U_BOOT_SECTOR,
136	image_size_sectors, (void *)image_load_addr);
137
138	end:
139	if (err <= 0) {
140	printf("spl: mmc blk read err - %d\n", err);
141	hang();
142	}
143	}
144
145	static void mmc_load_image_fat(struct mmc *mmc)
146	{
147	s32 err;
148	struct image_header *header;
149
150	header = (struct image_header *)(CONFIG_SYS_TEXT_BASE -
151	sizeof(struct image_header));
152
153	err = fat_register_device(&mmc->block_dev,
154	CONFIG_SYS_MMC_SD_FAT_BOOT_PARTITION);
155	if (err) {
156	printf("spl: fat register err - %d\n", err);
157	hang();
158	}
159
160	err = file_fat_read(CONFIG_SPL_FAT_LOAD_PAYLOAD_NAME,
161	(u8 *)header, sizeof(struct image_header));
162	if (err <= 0)
163	goto end;
164
165	parse_image_header(header);
166
167	err = file_fat_read(CONFIG_SPL_FAT_LOAD_PAYLOAD_NAME,
168	(u8 *)image_load_addr, 0);
169
170	end:
171	if (err <= 0) {
172	printf("spl: error reading image %s, err - %d\n",
173	CONFIG_SPL_FAT_LOAD_PAYLOAD_NAME, err);
174	hang();
175	}
176	}
bb085b87	177	static void mmc_load_image(void) __attribute__((unused));
8cf686e1 A	178	static void mmc_load_image(void)
	179	{
	180	struct mmc *mmc;
	181	int err;
	182	u32 boot_mode;
	183
	184	mmc_initialize(gd->bd);
	185	/* We register only one device. So, the dev id is always 0 */
	186	mmc = find_mmc_device(0);
	187	if (!mmc) {
	188	puts("spl: mmc device not found!!\n");
	189	hang();
	190	}
	191
	192	err = mmc_init(mmc);
	193	if (err) {
	194	printf("spl: mmc init failed: err - %d\n", err);
	195	hang();
	196	}
409ef1bc SS	197	/* For OMAP3 there is no automatic boot mode detection */
	198	#ifdef CONFIG_OMAP34XX
	199	boot_mode = CONFIG_SYS_MMC_SD_BOOTMODE;
	200	#else
8cf686e1	201	boot_mode = omap_boot_mode();
409ef1bc	202	#endif
8cf686e1 A	203	if (boot_mode == MMCSD_MODE_RAW) {
	204	debug("boot mode - RAW\n");
	205	mmc_load_image_raw(mmc);
	206	} else if (boot_mode == MMCSD_MODE_FAT) {
	207	debug("boot mode - FAT\n");
	208	mmc_load_image_fat(mmc);
	209	} else {
	210	puts("spl: wrong MMC boot mode\n");
	211	hang();
	212	}
	213	}
	214
bb085b87 SS	215	#ifdef CONFIG_SPL_NAND_SUPPORT
	216	static void nand_load_image(void) __attribute__ ((unused));
	217	static void nand_load_image(void)
	218	{
	219	struct image_header *header;
	220
	221	gpmc_init();
	222	nand_init();
	223
	224	/use CONFIG_SYS_TEXT_BASE as temporary storage area /
	225	header = (struct image_header *)(CONFIG_SYS_TEXT_BASE);
	226
	227	#ifdef CONFIG_NAND_ENV_DST
	228	nand_spl_load_image(CONFIG_ENV_OFFSET,
	229	CONFIG_SYS_NAND_PAGE_SIZE, (void *)header);
	230	parse_image_header(header);
	231	nand_spl_load_image(CONFIG_ENV_OFFSET, image_size,
	232	(void *)image_load_addr);
	233	#ifdef CONFIG_ENV_OFFSET_REDUND
	234	nand_spl_load_image(CONFIG_ENV_OFFSET_REDUND,
	235	CONFIG_SYS_NAND_PAGE_SIZE, (void *)header);
	236	parse_image_header(header);
	237	nand_spl_load_image(CONFIG_ENV_OFFSET_REDUND, image_size,
	238	(void *)image_load_addr);
	239	#endif
	240	#endif
	241	/* Load u-boot */
	242	nand_spl_load_image(CONFIG_SYS_NAND_U_BOOT_OFFS,
	243	CONFIG_SYS_NAND_PAGE_SIZE, (void *)header);
	244	parse_image_header(header);
	245	nand_spl_load_image(CONFIG_SYS_NAND_U_BOOT_OFFS,
	246	image_size, (void *)image_load_addr);
	247	nand_deselect();
	248	}
	249	#endif /* CONFIG_SPL_NAND_SUPPORT */
8cf686e1 A	250	void jump_to_image_no_args(void)
	251	{
	252	typedef void (*image_entry_noargs_t)(void)__attribute__ ((noreturn));
	253	image_entry_noargs_t image_entry =
	254	(image_entry_noargs_t) image_entry_point;
	255
bb085b87	256	debug("image entry point: 0x%X\n", image_entry_point);
8cf686e1 A	257	image_entry();
	258	}
	259
	260	void jump_to_image_no_args(void) __attribute__ ((noreturn));
bcae7211 A	261	void board_init_r(gd_t *id, ulong dummy)
bcae7211 A	262	{
8cf686e1 A	263	u32 boot_device;
	264	debug(">>spl:board_init_r()\n");
	265
	266	timer_init();
	267	i2c_init(CONFIG_SYS_I2C_SPEED, CONFIG_SYS_I2C_SLAVE);
	268
	269	boot_device = omap_boot_device();
	270	debug("boot device - %d\n", boot_device);
	271	switch (boot_device) {
bb085b87	272	#ifdef CONFIG_SPL_MMC_SUPPORT
8cf686e1 A	273	case BOOT_DEVICE_MMC1:
	274	case BOOT_DEVICE_MMC2:
	275	mmc_load_image();
	276	break;
bb085b87 SS	277	#endif
	278	#ifdef CONFIG_SPL_NAND_SUPPORT
	279	case BOOT_DEVICE_NAND:
	280	nand_load_image();
	281	break;
	282	#endif
8cf686e1 A	283	default:
	284	printf("SPL: Un-supported Boot Device - %d!!!\n", boot_device);
	285	hang();
	286	break;
	287	}
	288
	289	switch (image_os) {
	290	case IH_OS_U_BOOT:
	291	debug("Jumping to U-Boot\n");
	292	jump_to_image_no_args();
	293	break;
	294	default:
	295	puts("Unsupported OS image.. Jumping nevertheless..\n");
	296	jump_to_image_no_args();
	297	}
bcae7211 A	298	}
bcae7211 A	299
63ffcfcb	300	/* This requires UART clocks to be enabled */
bcae7211 A	301	void preloader_console_init(void)
	302	{
	303	const char *u_boot_rev = U_BOOT_VERSION;
	304	char rev_string_buffer[50];
	305
	306	gd = &gdata;
	307	gd->bd = &bdata;
	308	gd->flags \|= GD_FLG_RELOC;
	309	gd->baudrate = CONFIG_BAUDRATE;
	310
bcae7211 A	311	serial_init(); /* serial communications setup */
	312
	313	/* Avoid a second "U-Boot" coming from this string */
	314	u_boot_rev = &u_boot_rev[7];
	315
	316	printf("\nU-Boot SPL %s (%s - %s)\n", u_boot_rev, U_BOOT_DATE,
	317	U_BOOT_TIME);
	318	omap_rev_string(rev_string_buffer);
	319	printf("Texas Instruments %s\n", rev_string_buffer);
	320	}