[J-u-boot.git] / common / env_mmc.c

/*
 * (C) Copyright 2008-2011 Freescale Semiconductor, Inc.
 *
 * 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
 */

/* #define DEBUG */

#include <common.h>

#include <command.h>
#include <environment.h>
#include <linux/stddef.h>
#include <malloc.h>
#include <mmc.h>
#include <search.h>
#include <errno.h>

/* references to names in env_common.c */
extern uchar default_environment[];

char *env_name_spec = "MMC";

#ifdef ENV_IS_EMBEDDED
extern uchar environment[];
env_t *env_ptr = (env_t *)(&environment[0]);
#else /* ! ENV_IS_EMBEDDED */
env_t *env_ptr = NULL;
#endif /* ENV_IS_EMBEDDED */

/* local functions */
#if !defined(ENV_IS_EMBEDDED)
static void use_default(void);
#endif

DECLARE_GLOBAL_DATA_PTR;

#if !defined(CONFIG_ENV_OFFSET)
#define CONFIG_ENV_OFFSET 0
#endif

static int __mmc_get_env_addr(struct mmc *mmc, u32 *env_addr)
{
	*env_addr = CONFIG_ENV_OFFSET;
	return 0;
}
__attribute__((weak, alias("__mmc_get_env_addr")))
int mmc_get_env_addr(struct mmc *mmc, u32 *env_addr);


uchar env_get_char_spec(int index)
{
	return *((uchar *)(gd->env_addr + index));
}

int env_init(void)
{
	/* use default */
	gd->env_addr = (ulong)&default_environment[0];
	gd->env_valid = 1;

	return 0;
}

int init_mmc_for_env(struct mmc *mmc)
{
	if (!mmc) {
		puts("No MMC card found\n");
		return -1;
	}

	if (mmc_init(mmc)) {
		puts("MMC init failed\n");
		return  -1;
	}

	return 0;
}

#ifdef CONFIG_CMD_SAVEENV

inline int write_env(struct mmc *mmc, unsigned long size,
			unsigned long offset, const void *buffer)
{
	uint blk_start, blk_cnt, n;

	blk_start = ALIGN(offset, mmc->write_bl_len) / mmc->write_bl_len;
	blk_cnt   = ALIGN(size, mmc->write_bl_len) / mmc->write_bl_len;

	n = mmc->block_dev.block_write(CONFIG_SYS_MMC_ENV_DEV, blk_start,
					blk_cnt, (u_char *)buffer);

	return (n == blk_cnt) ? 0 : -1;
}

int saveenv(void)
{
	env_t	env_new;
	ssize_t	len;
	char	*res;
	struct mmc *mmc = find_mmc_device(CONFIG_SYS_MMC_ENV_DEV);
	u32 offset;

	if (init_mmc_for_env(mmc))
		return 1;

	if(mmc_get_env_addr(mmc, &offset))
		return 1;

	res = (char *)&env_new.data;
	len = hexport_r(&env_htab, '\0', &res, ENV_SIZE);
	if (len < 0) {
		error("Cannot export environment: errno = %d\n", errno);
		return 1;
	}
	env_new.crc   = crc32(0, env_new.data, ENV_SIZE);
	printf("Writing to MMC(%d)... ", CONFIG_SYS_MMC_ENV_DEV);
	if (write_env(mmc, CONFIG_ENV_SIZE, offset, (u_char *)&env_new)) {
		puts("failed\n");
		return 1;
	}

	puts("done\n");
	return 0;
}
#endif /* CONFIG_CMD_SAVEENV */

inline int read_env(struct mmc *mmc, unsigned long size,
			unsigned long offset, const void *buffer)
{
	uint blk_start, blk_cnt, n;

	blk_start = ALIGN(offset, mmc->read_bl_len) / mmc->read_bl_len;
	blk_cnt   = ALIGN(size, mmc->read_bl_len) / mmc->read_bl_len;

	n = mmc->block_dev.block_read(CONFIG_SYS_MMC_ENV_DEV, blk_start,
					blk_cnt, (uchar *)buffer);

	return (n == blk_cnt) ? 0 : -1;
}

void env_relocate_spec(void)
{
#if !defined(ENV_IS_EMBEDDED)
	char buf[CONFIG_ENV_SIZE];

	struct mmc *mmc = find_mmc_device(CONFIG_SYS_MMC_ENV_DEV);
	u32 offset;

	if (init_mmc_for_env(mmc)) {
		use_default();
		return;
	}

	if(mmc_get_env_addr(mmc, &offset)) {
		use_default();
		return ;
	}

	if (read_env(mmc, CONFIG_ENV_SIZE, offset, buf)) {
		use_default();
		return;
	}

	env_import(buf, 1);
#endif
}

#if !defined(ENV_IS_EMBEDDED)
static void use_default()
{
	set_default_env(NULL);
}
#endif
Commit	Line	Data
a8060359	1	/*
97039ab9	2	* (C) Copyright 2008-2011 Freescale Semiconductor, Inc.
a8060359 TL	3	*
	4	* See file CREDITS for list of people who contributed to this
	5	* project.
	6	*
	7	* This program is free software; you can redistribute it and/or
	8	* modify it under the terms of the GNU General Public License as
	9	* published by the Free Software Foundation; either version 2 of
	10	* the License, or (at your option) any later version.
	11	*
	12	* This program is distributed in the hope that it will be useful,
	13	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	* GNU General Public License for more details.
	16	*
	17	* You should have received a copy of the GNU General Public License
	18	* along with this program; if not, write to the Free Software
	19	* Foundation, Inc., 59 Temple Place, Suite 330, Boston,
	20	* MA 02111-1307 USA
	21	*/
	22
	23	/* #define DEBUG */
	24
	25	#include <common.h>
	26
	27	#include <command.h>
	28	#include <environment.h>
	29	#include <linux/stddef.h>
	30	#include <malloc.h>
	31	#include <mmc.h>
6d1d51b3	32	#include <search.h>
e79f4839	33	#include <errno.h>
a8060359 TL	34
	35	/* references to names in env_common.c */
	36	extern uchar default_environment[];
	37
	38	char *env_name_spec = "MMC";
	39
	40	#ifdef ENV_IS_EMBEDDED
	41	extern uchar environment[];
	42	env_t env_ptr = (env_t )(&environment[0]);
	43	#else /* ! ENV_IS_EMBEDDED */
	44	env_t *env_ptr = NULL;
	45	#endif /* ENV_IS_EMBEDDED */
	46
	47	/* local functions */
	48	#if !defined(ENV_IS_EMBEDDED)
	49	static void use_default(void);
	50	#endif
	51
	52	DECLARE_GLOBAL_DATA_PTR;
	53
97039ab9 MH	54	#if !defined(CONFIG_ENV_OFFSET)
	55	#define CONFIG_ENV_OFFSET 0
	56	#endif
	57
	58	static int __mmc_get_env_addr(struct mmc mmc, u32 env_addr)
	59	{
	60	*env_addr = CONFIG_ENV_OFFSET;
	61	return 0;
	62	}
	63	__attribute__((weak, alias("__mmc_get_env_addr")))
	64	int mmc_get_env_addr(struct mmc mmc, u32 env_addr);
	65
	66
a8060359 TL	67	uchar env_get_char_spec(int index)
	68	{
	69	return ((uchar )(gd->env_addr + index));
	70	}
	71
	72	int env_init(void)
	73	{
	74	/* use default */
	75	gd->env_addr = (ulong)&default_environment[0];
	76	gd->env_valid = 1;
	77
	78	return 0;
	79	}
	80
	81	int init_mmc_for_env(struct mmc *mmc)
	82	{
	83	if (!mmc) {
	84	puts("No MMC card found\n");
	85	return -1;
	86	}
	87
	88	if (mmc_init(mmc)) {
	89	puts("MMC init failed\n");
	90	return -1;
	91	}
	92
	93	return 0;
	94	}
	95
	96	#ifdef CONFIG_CMD_SAVEENV
	97
	98	inline int write_env(struct mmc *mmc, unsigned long size,
	99	unsigned long offset, const void *buffer)
	100	{
	101	uint blk_start, blk_cnt, n;
	102
	103	blk_start = ALIGN(offset, mmc->write_bl_len) / mmc->write_bl_len;
	104	blk_cnt = ALIGN(size, mmc->write_bl_len) / mmc->write_bl_len;
	105
	106	n = mmc->block_dev.block_write(CONFIG_SYS_MMC_ENV_DEV, blk_start,
	107	blk_cnt, (u_char *)buffer);
	108
	109	return (n == blk_cnt) ? 0 : -1;
	110	}
	111
	112	int saveenv(void)
	113	{
e79f4839 LW	114	env_t env_new;
	115	ssize_t len;
	116	char *res;
a8060359	117	struct mmc *mmc = find_mmc_device(CONFIG_SYS_MMC_ENV_DEV);
97039ab9	118	u32 offset;
a8060359 TL	119
	120	if (init_mmc_for_env(mmc))
	121	return 1;
	122
97039ab9 MH	123	if(mmc_get_env_addr(mmc, &offset))
	124	return 1;
	125
e79f4839	126	res = (char *)&env_new.data;
2eb1573f	127	len = hexport_r(&env_htab, '\0', &res, ENV_SIZE);
e79f4839 LW	128	if (len < 0) {
	129	error("Cannot export environment: errno = %d\n", errno);
	130	return 1;
	131	}
	132	env_new.crc = crc32(0, env_new.data, ENV_SIZE);
a8060359	133	printf("Writing to MMC(%d)... ", CONFIG_SYS_MMC_ENV_DEV);
97039ab9	134	if (write_env(mmc, CONFIG_ENV_SIZE, offset, (u_char *)&env_new)) {
a8060359 TL	135	puts("failed\n");
	136	return 1;
	137	}
	138
	139	puts("done\n");
	140	return 0;
	141	}
	142	#endif /* CONFIG_CMD_SAVEENV */
	143
	144	inline int read_env(struct mmc *mmc, unsigned long size,
	145	unsigned long offset, const void *buffer)
	146	{
	147	uint blk_start, blk_cnt, n;
	148
	149	blk_start = ALIGN(offset, mmc->read_bl_len) / mmc->read_bl_len;
	150	blk_cnt = ALIGN(size, mmc->read_bl_len) / mmc->read_bl_len;
	151
	152	n = mmc->block_dev.block_read(CONFIG_SYS_MMC_ENV_DEV, blk_start,
	153	blk_cnt, (uchar *)buffer);
	154
	155	return (n == blk_cnt) ? 0 : -1;
	156	}
	157
	158	void env_relocate_spec(void)
	159	{
	160	#if !defined(ENV_IS_EMBEDDED)
97039ab9	161	char buf[CONFIG_ENV_SIZE];
d470a6f6	162
a8060359	163	struct mmc *mmc = find_mmc_device(CONFIG_SYS_MMC_ENV_DEV);
97039ab9	164	u32 offset;
a8060359	165
d470a6f6 SS	166	if (init_mmc_for_env(mmc)) {
d470a6f6 SS	167	use_default();
a8060359	168	return;
d470a6f6	169	}
a8060359	170
97039ab9 MH	171	if(mmc_get_env_addr(mmc, &offset)) {
	172	use_default();
	173	return ;
	174	}
	175
	176	if (read_env(mmc, CONFIG_ENV_SIZE, offset, buf)) {
d470a6f6 SS	177	use_default();
	178	return;
	179	}
a8060359	180
d470a6f6	181	env_import(buf, 1);
a8060359 TL	182	#endif
	183	}
	184
	185	#if !defined(ENV_IS_EMBEDDED)
	186	static void use_default()
	187	{
a2f69d35	188	set_default_env(NULL);
a8060359 TL	189	}
a8060359 TL	190	#endif