dfu_mmc.c 6.41 KB
Newer Older
1 2 3 4 5 6
/*
 * dfu.c -- DFU back-end routines
 *
 * Copyright (C) 2012 Samsung Electronics
 * author: Lukasz Majewski <l.majewski@samsung.com>
 *
7
 * SPDX-License-Identifier:	GPL-2.0+
8 9 10 11
 */

#include <common.h>
#include <malloc.h>
12
#include <errno.h>
13
#include <div64.h>
14
#include <dfu.h>
15
#include <mmc.h>
16

17 18 19 20
static unsigned char __aligned(CONFIG_SYS_CACHELINE_SIZE)
				dfu_file_buf[CONFIG_SYS_DFU_MAX_FILE_SIZE];
static long dfu_file_buf_len;

21
static int mmc_block_op(enum dfu_op op, struct dfu_entity *dfu,
22
			u64 offset, void *buf, long *len)
23
{
24 25
	struct mmc *mmc = find_mmc_device(dfu->dev_num);
	u32 blk_start, blk_count, n = 0;
26 27 28 29 30 31 32 33 34 35 36 37 38 39 40

	/*
	 * We must ensure that we work in lba_blk_size chunks, so ALIGN
	 * this value.
	 */
	*len = ALIGN(*len, dfu->data.mmc.lba_blk_size);

	blk_start = dfu->data.mmc.lba_start +
			(u32)lldiv(offset, dfu->data.mmc.lba_blk_size);
	blk_count = *len / dfu->data.mmc.lba_blk_size;
	if (blk_start + blk_count >
			dfu->data.mmc.lba_start + dfu->data.mmc.lba_size) {
		puts("Request would exceed designated area!\n");
		return -EINVAL;
	}
41

42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61
	debug("%s: %s dev: %d start: %d cnt: %d buf: 0x%p\n", __func__,
	      op == DFU_OP_READ ? "MMC READ" : "MMC WRITE", dfu->dev_num,
	      blk_start, blk_count, buf);
	switch (op) {
	case DFU_OP_READ:
		n = mmc->block_dev.block_read(dfu->dev_num, blk_start,
					      blk_count, buf);
		break;
	case DFU_OP_WRITE:
		n = mmc->block_dev.block_write(dfu->dev_num, blk_start,
					       blk_count, buf);
		break;
	default:
		error("Operation not supported\n");
	}

	if (n != blk_count) {
		error("MMC operation failed");
		return -EIO;
	}
62

63
	return 0;
64 65
}

66
static int mmc_file_buffer(struct dfu_entity *dfu, void *buf, long *len)
67
{
68 69 70 71
	if (dfu_file_buf_len + *len > CONFIG_SYS_DFU_MAX_FILE_SIZE) {
		dfu_file_buf_len = 0;
		return -EINVAL;
	}
72

73 74 75 76 77
	/* Add to the current buffer. */
	memcpy(dfu_file_buf + dfu_file_buf_len, buf, *len);
	dfu_file_buf_len += *len;

	return 0;
78 79
}

80
static int mmc_file_op(enum dfu_op op, struct dfu_entity *dfu,
81 82 83 84 85 86
			void *buf, long *len)
{
	char cmd_buf[DFU_CMD_BUF_SIZE];
	char *str_env;
	int ret;

87 88
	switch (dfu->layout) {
	case DFU_FS_FAT:
89
		sprintf(cmd_buf, "fat%s mmc %d:%d 0x%x %s",
90 91
			op == DFU_OP_READ ? "load" : "write",
			dfu->data.mmc.dev, dfu->data.mmc.part,
92
			(unsigned int) buf, dfu->name);
93 94
		break;
	case DFU_FS_EXT4:
95
		sprintf(cmd_buf, "ext4%s mmc %d:%d 0x%x /%s",
96 97
			op == DFU_OP_READ ? "load" : "write",
			dfu->data.mmc.dev, dfu->data.mmc.part,
98
			(unsigned int) buf, dfu->name);
99 100 101 102
		break;
	default:
		printf("%s: Layout (%s) not (yet) supported!\n", __func__,
		       dfu_get_layout(dfu->layout));
103
		return -1;
104
	}
105

106 107 108
	if (op == DFU_OP_WRITE)
		sprintf(cmd_buf + strlen(cmd_buf), " %lx", *len);

109 110 111 112 113 114 115 116
	debug("%s: %s 0x%p\n", __func__, cmd_buf, cmd_buf);

	ret = run_command(cmd_buf, 0);
	if (ret) {
		puts("dfu: Read error!\n");
		return ret;
	}

117
	if (dfu->layout != DFU_RAW_ADDR && op == DFU_OP_READ) {
118 119 120 121 122 123 124 125 126 127 128
		str_env = getenv("filesize");
		if (str_env == NULL) {
			puts("dfu: Wrong file size!\n");
			return -1;
		}
		*len = simple_strtoul(str_env, NULL, 16);
	}

	return ret;
}

129 130
int dfu_write_medium_mmc(struct dfu_entity *dfu,
		u64 offset, void *buf, long *len)
131 132 133 134 135
{
	int ret = -1;

	switch (dfu->layout) {
	case DFU_RAW_ADDR:
136
		ret = mmc_block_op(DFU_OP_WRITE, dfu, offset, buf, len);
137 138
		break;
	case DFU_FS_FAT:
139
	case DFU_FS_EXT4:
140
		ret = mmc_file_buffer(dfu, buf, len);
141 142 143 144 145 146 147 148 149
		break;
	default:
		printf("%s: Layout (%s) not (yet) supported!\n", __func__,
		       dfu_get_layout(dfu->layout));
	}

	return ret;
}

150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167
int dfu_flush_medium_mmc(struct dfu_entity *dfu)
{
	int ret = 0;

	if (dfu->layout != DFU_RAW_ADDR) {
		/* Do stuff here. */
		ret = mmc_file_op(DFU_OP_WRITE, dfu, &dfu_file_buf,
				&dfu_file_buf_len);

		/* Now that we're done */
		dfu_file_buf_len = 0;
	}

	return ret;
}

int dfu_read_medium_mmc(struct dfu_entity *dfu, u64 offset, void *buf,
		long *len)
168 169 170 171 172
{
	int ret = -1;

	switch (dfu->layout) {
	case DFU_RAW_ADDR:
173
		ret = mmc_block_op(DFU_OP_READ, dfu, offset, buf, len);
174 175
		break;
	case DFU_FS_FAT:
176
	case DFU_FS_EXT4:
177
		ret = mmc_file_op(DFU_OP_READ, dfu, buf, len);
178 179 180 181 182 183 184 185 186
		break;
	default:
		printf("%s: Layout (%s) not (yet) supported!\n", __func__,
		       dfu_get_layout(dfu->layout));
	}

	return ret;
}

187 188 189 190 191 192 193 194 195 196 197
/*
 * @param s Parameter string containing space-separated arguments:
 *	1st:
 *		raw	(raw read/write)
 *		fat	(files)
 *		ext4	(^)
 *		part	(partition image)
 *	2nd and 3rd:
 *		lba_start and lba_size, for raw write
 *		mmc_dev and mmc_part, for filesystems and part
 */
198 199
int dfu_fill_entity_mmc(struct dfu_entity *dfu, char *s)
{
200 201 202
	const char *entity_type;
	size_t second_arg;
	size_t third_arg;
203

204
	struct mmc *mmc;
205

206 207
	const char *argv[3];
	const char **parg = argv;
208

209 210 211 212
	for (; parg < argv + sizeof(argv) / sizeof(*argv); ++parg) {
		*parg = strsep(&s, " ");
		if (*parg == NULL) {
			error("Invalid number of arguments.\n");
213 214
			return -ENODEV;
		}
215
	}
216

217
	entity_type = argv[0];
218 219 220 221 222 223
	/*
	 * Base 0 means we'll accept (prefixed with 0x or 0) base 16, 8,
	 * with default 10.
	 */
	second_arg = simple_strtoul(argv[1], NULL, 0);
	third_arg = simple_strtoul(argv[2], NULL, 0);
224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249

	mmc = find_mmc_device(dfu->dev_num);
	if (mmc == NULL) {
		error("Couldn't find MMC device no. %d.\n", dfu->dev_num);
		return -ENODEV;
	}

	if (mmc_init(mmc)) {
		error("Couldn't init MMC device.\n");
		return -ENODEV;
	}

	if (!strcmp(entity_type, "raw")) {
		dfu->layout			= DFU_RAW_ADDR;
		dfu->data.mmc.lba_start		= second_arg;
		dfu->data.mmc.lba_size		= third_arg;
		dfu->data.mmc.lba_blk_size	= mmc->read_bl_len;
	} else if (!strcmp(entity_type, "part")) {
		disk_partition_t partinfo;
		block_dev_desc_t *blk_dev = &mmc->block_dev;
		int mmcdev = second_arg;
		int mmcpart = third_arg;

		if (get_partition_info(blk_dev, mmcpart, &partinfo) != 0) {
			error("Couldn't find part #%d on mmc device #%d\n",
			      mmcpart, mmcdev);
250 251 252
			return -ENODEV;
		}

253 254 255 256 257 258 259 260
		dfu->layout			= DFU_RAW_ADDR;
		dfu->data.mmc.lba_start		= partinfo.start;
		dfu->data.mmc.lba_size		= partinfo.size;
		dfu->data.mmc.lba_blk_size	= partinfo.blksz;
	} else if (!strcmp(entity_type, "fat")) {
		dfu->layout = DFU_FS_FAT;
	} else if (!strcmp(entity_type, "ext4")) {
		dfu->layout = DFU_FS_EXT4;
261
	} else {
262
		error("Memory layout (%s) not supported!\n", entity_type);
263
		return -ENODEV;
264 265
	}

266 267 268 269
	/* if it's NOT a raw write */
	if (strcmp(entity_type, "raw")) {
		dfu->data.mmc.dev = second_arg;
		dfu->data.mmc.part = third_arg;
270 271
	}

272
	dfu->dev_type = DFU_DEV_MMC;
273 274
	dfu->read_medium = dfu_read_medium_mmc;
	dfu->write_medium = dfu_write_medium_mmc;
275 276
	dfu->flush_medium = dfu_flush_medium_mmc;
	dfu->inited = 0;
277 278 279

	return 0;
}