[net-next-2.6.git] / fs / udf / partition.c

/*
 * partition.c
 *
 * PURPOSE
 *      Partition handling routines for the OSTA-UDF(tm) filesystem.
 *
 * COPYRIGHT
 *      This file is distributed under the terms of the GNU General Public
 *      License (GPL). Copies of the GPL can be obtained from:
 *              ftp://prep.ai.mit.edu/pub/gnu/GPL
 *      Each contributing author retains all rights to their own work.
 *
 *  (C) 1998-2001 Ben Fennema
 *
 * HISTORY
 *
 * 12/06/98 blf  Created file.
 *
 */

#include "udfdecl.h"
#include "udf_sb.h"
#include "udf_i.h"

#include <linux/fs.h>
#include <linux/string.h>
#include <linux/slab.h>
#include <linux/buffer_head.h>

uint32_t udf_get_pblock(struct super_block *sb, uint32_t block,
			uint16_t partition, uint32_t offset)
{
	struct udf_sb_info *sbi = UDF_SB(sb);
	struct udf_part_map *map;
	if (partition >= sbi->s_partitions) {
		udf_debug("block=%d, partition=%d, offset=%d: "
			  "invalid partition\n", block, partition, offset);
		return 0xFFFFFFFF;
	}
	map = &sbi->s_partmaps[partition];
	if (map->s_partition_func)
		return map->s_partition_func(sb, block, partition, offset);
	else
		return map->s_partition_root + block + offset;
}

uint32_t udf_get_pblock_virt15(struct super_block *sb, uint32_t block,
			       uint16_t partition, uint32_t offset)
{
	struct buffer_head *bh = NULL;
	uint32_t newblock;
	uint32_t index;
	uint32_t loc;
	struct udf_sb_info *sbi = UDF_SB(sb);
	struct udf_part_map *map;
	struct udf_virtual_data *vdata;
	struct udf_inode_info *iinfo = UDF_I(sbi->s_vat_inode);

	map = &sbi->s_partmaps[partition];
	vdata = &map->s_type_specific.s_virtual;

	if (block > vdata->s_num_entries) {
		udf_debug("Trying to access block beyond end of VAT "
			  "(%d max %d)\n", block, vdata->s_num_entries);
		return 0xFFFFFFFF;
	}

	if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_IN_ICB) {
		loc = le32_to_cpu(((__le32 *)(iinfo->i_ext.i_data +
			vdata->s_start_offset))[block]);
		goto translate;
	}
	index = (sb->s_blocksize - vdata->s_start_offset) / sizeof(uint32_t);
	if (block >= index) {
		block -= index;
		newblock = 1 + (block / (sb->s_blocksize / sizeof(uint32_t)));
		index = block % (sb->s_blocksize / sizeof(uint32_t));
	} else {
		newblock = 0;
		index = vdata->s_start_offset / sizeof(uint32_t) + block;
	}

	loc = udf_block_map(sbi->s_vat_inode, newblock);

	bh = sb_bread(sb, loc);
	if (!bh) {
		udf_debug("get_pblock(UDF_VIRTUAL_MAP:%p,%d,%d) VAT: %d[%d]\n",
			  sb, block, partition, loc, index);
		return 0xFFFFFFFF;
	}

	loc = le32_to_cpu(((__le32 *)bh->b_data)[index]);

	brelse(bh);

translate:
	if (iinfo->i_location.partitionReferenceNum == partition) {
		udf_debug("recursive call to udf_get_pblock!\n");
		return 0xFFFFFFFF;
	}

	return udf_get_pblock(sb, loc,
			      iinfo->i_location.partitionReferenceNum,
			      offset);
}

inline uint32_t udf_get_pblock_virt20(struct super_block *sb, uint32_t block,
				      uint16_t partition, uint32_t offset)
{
	return udf_get_pblock_virt15(sb, block, partition, offset);
}

uint32_t udf_get_pblock_spar15(struct super_block *sb, uint32_t block,
			       uint16_t partition, uint32_t offset)
{
	int i;
	struct sparingTable *st = NULL;
	struct udf_sb_info *sbi = UDF_SB(sb);
	struct udf_part_map *map;
	uint32_t packet;
	struct udf_sparing_data *sdata;

	map = &sbi->s_partmaps[partition];
	sdata = &map->s_type_specific.s_sparing;
	packet = (block + offset) & ~(sdata->s_packet_len - 1);

	for (i = 0; i < 4; i++) {
		if (sdata->s_spar_map[i] != NULL) {
			st = (struct sparingTable *)
					sdata->s_spar_map[i]->b_data;
			break;
		}
	}

	if (st) {
		for (i = 0; i < le16_to_cpu(st->reallocationTableLen); i++) {
			struct sparingEntry *entry = &st->mapEntry[i];
			u32 origLoc = le32_to_cpu(entry->origLocation);
			if (origLoc >= 0xFFFFFFF0)
				break;
			else if (origLoc == packet)
				return le32_to_cpu(entry->mappedLocation) +
					((block + offset) &
						(sdata->s_packet_len - 1));
			else if (origLoc > packet)
				break;
		}
	}

	return map->s_partition_root + block + offset;
}

int udf_relocate_blocks(struct super_block *sb, long old_block, long *new_block)
{
	struct udf_sparing_data *sdata;
	struct sparingTable *st = NULL;
	struct sparingEntry mapEntry;
	uint32_t packet;
	int i, j, k, l;
	struct udf_sb_info *sbi = UDF_SB(sb);
	u16 reallocationTableLen;
	struct buffer_head *bh;

	for (i = 0; i < sbi->s_partitions; i++) {
		struct udf_part_map *map = &sbi->s_partmaps[i];
		if (old_block > map->s_partition_root &&
		    old_block < map->s_partition_root + map->s_partition_len) {
			sdata = &map->s_type_specific.s_sparing;
			packet = (old_block - map->s_partition_root) &
						~(sdata->s_packet_len - 1);

			for (j = 0; j < 4; j++)
				if (sdata->s_spar_map[j] != NULL) {
					st = (struct sparingTable *)
						sdata->s_spar_map[j]->b_data;
					break;
				}

			if (!st)
				return 1;

			reallocationTableLen =
					le16_to_cpu(st->reallocationTableLen);
			for (k = 0; k < reallocationTableLen; k++) {
				struct sparingEntry *entry = &st->mapEntry[k];
				u32 origLoc = le32_to_cpu(entry->origLocation);

				if (origLoc == 0xFFFFFFFF) {
					for (; j < 4; j++) {
						int len;
						bh = sdata->s_spar_map[j];
						if (!bh)
							continue;

						st = (struct sparingTable *)
								bh->b_data;
						entry->origLocation =
							cpu_to_le32(packet);
						len =
						  sizeof(struct sparingTable) +
						  reallocationTableLen *
						  sizeof(struct sparingEntry);
						udf_update_tag((char *)st, len);
						mark_buffer_dirty(bh);
					}
					*new_block = le32_to_cpu(
							entry->mappedLocation) +
						     ((old_block -
							map->s_partition_root) &
						     (sdata->s_packet_len - 1));
					return 0;
				} else if (origLoc == packet) {
					*new_block = le32_to_cpu(
							entry->mappedLocation) +
						     ((old_block -
							map->s_partition_root) &
						     (sdata->s_packet_len - 1));
					return 0;
				} else if (origLoc > packet)
					break;
			}

			for (l = k; l < reallocationTableLen; l++) {
				struct sparingEntry *entry = &st->mapEntry[l];
				u32 origLoc = le32_to_cpu(entry->origLocation);

				if (origLoc != 0xFFFFFFFF)
					continue;

				for (; j < 4; j++) {
					bh = sdata->s_spar_map[j];
					if (!bh)
						continue;

					st = (struct sparingTable *)bh->b_data;
					mapEntry = st->mapEntry[l];
					mapEntry.origLocation =
							cpu_to_le32(packet);
					memmove(&st->mapEntry[k + 1],
						&st->mapEntry[k],
						(l - k) *
						sizeof(struct sparingEntry));
					st->mapEntry[k] = mapEntry;
					udf_update_tag((char *)st,
						sizeof(struct sparingTable) +
						reallocationTableLen *
						sizeof(struct sparingEntry));
					mark_buffer_dirty(bh);
				}
				*new_block =
					le32_to_cpu(
					      st->mapEntry[k].mappedLocation) +
					((old_block - map->s_partition_root) &
					 (sdata->s_packet_len - 1));
				return 0;
			}

			return 1;
		} /* if old_block */
	}

	if (i == sbi->s_partitions) {
		/* outside of partitions */
		/* for now, fail =) */
		return 1;
	}

	return 0;
}

static uint32_t udf_try_read_meta(struct inode *inode, uint32_t block,
					uint16_t partition, uint32_t offset)
{
	struct super_block *sb = inode->i_sb;
	struct udf_part_map *map;
	struct kernel_lb_addr eloc;
	uint32_t elen;
	sector_t ext_offset;
	struct extent_position epos = {};
	uint32_t phyblock;

	if (inode_bmap(inode, block, &epos, &eloc, &elen, &ext_offset) !=
						(EXT_RECORDED_ALLOCATED >> 30))
		phyblock = 0xFFFFFFFF;
	else {
		map = &UDF_SB(sb)->s_partmaps[partition];
		/* map to sparable/physical partition desc */
		phyblock = udf_get_pblock(sb, eloc.logicalBlockNum,
			map->s_partition_num, ext_offset + offset);
	}

	brelse(epos.bh);
	return phyblock;
}

uint32_t udf_get_pblock_meta25(struct super_block *sb, uint32_t block,
				uint16_t partition, uint32_t offset)
{
	struct udf_sb_info *sbi = UDF_SB(sb);
	struct udf_part_map *map;
	struct udf_meta_data *mdata;
	uint32_t retblk;
	struct inode *inode;

	udf_debug("READING from METADATA\n");

	map = &sbi->s_partmaps[partition];
	mdata = &map->s_type_specific.s_metadata;
	inode = mdata->s_metadata_fe ? : mdata->s_mirror_fe;

	/* We shouldn't mount such media... */
	BUG_ON(!inode);
	retblk = udf_try_read_meta(inode, block, partition, offset);
	if (retblk == 0xFFFFFFFF) {
		udf_warning(sb, __func__, "error reading from METADATA, "
			"trying to read from MIRROR");
		inode = mdata->s_mirror_fe;
		if (!inode)
			return 0xFFFFFFFF;
		retblk = udf_try_read_meta(inode, block, partition, offset);
	}

	return retblk;
}
Commit	Line	Data
1da177e4 LT	1	/*
	2	* partition.c
	3	*
	4	* PURPOSE
	5	* Partition handling routines for the OSTA-UDF(tm) filesystem.
	6	*
1da177e4 LT	7	* COPYRIGHT
	8	* This file is distributed under the terms of the GNU General Public
	9	* License (GPL). Copies of the GPL can be obtained from:
	10	* ftp://prep.ai.mit.edu/pub/gnu/GPL
	11	* Each contributing author retains all rights to their own work.
	12	*
	13	* (C) 1998-2001 Ben Fennema
	14	*
	15	* HISTORY
	16	*
28de7948	17	* 12/06/98 blf Created file.
1da177e4 LT	18	*
	19	*/
	20
	21	#include "udfdecl.h"
	22	#include "udf_sb.h"
	23	#include "udf_i.h"
	24
	25	#include <linux/fs.h>
	26	#include <linux/string.h>
1da177e4 LT	27	#include <linux/slab.h>
	28	#include <linux/buffer_head.h>
	29
22ba0317 AB	30	uint32_t udf_get_pblock(struct super_block *sb, uint32_t block,
22ba0317 AB	31	uint16_t partition, uint32_t offset)
1da177e4	32	{
6c79e987 MS	33	struct udf_sb_info *sbi = UDF_SB(sb);
	34	struct udf_part_map *map;
	35	if (partition >= sbi->s_partitions) {
4b11111a MS	36	udf_debug("block=%d, partition=%d, offset=%d: "
4b11111a MS	37	"invalid partition\n", block, partition, offset);
1da177e4 LT	38	return 0xFFFFFFFF;
1da177e4 LT	39	}
6c79e987 MS	40	map = &sbi->s_partmaps[partition];
	41	if (map->s_partition_func)
	42	return map->s_partition_func(sb, block, partition, offset);
1da177e4	43	else
6c79e987	44	return map->s_partition_root + block + offset;
1da177e4 LT	45	}
1da177e4 LT	46
28de7948	47	uint32_t udf_get_pblock_virt15(struct super_block *sb, uint32_t block,
cb00ea35	48	uint16_t partition, uint32_t offset)
1da177e4 LT	49	{
	50	struct buffer_head *bh = NULL;
	51	uint32_t newblock;
	52	uint32_t index;
	53	uint32_t loc;
6c79e987 MS	54	struct udf_sb_info *sbi = UDF_SB(sb);
6c79e987 MS	55	struct udf_part_map *map;
4b11111a	56	struct udf_virtual_data *vdata;
fa5e0815	57	struct udf_inode_info *iinfo = UDF_I(sbi->s_vat_inode);
1da177e4	58
6c79e987	59	map = &sbi->s_partmaps[partition];
4b11111a	60	vdata = &map->s_type_specific.s_virtual;
1da177e4	61
4b11111a MS	62	if (block > vdata->s_num_entries) {
	63	udf_debug("Trying to access block beyond end of VAT "
	64	"(%d max %d)\n", block, vdata->s_num_entries);
1da177e4 LT	65	return 0xFFFFFFFF;
	66	}
	67
fa5e0815	68	if (iinfo->i_alloc_type == ICBTAG_FLAG_AD_IN_ICB) {
47c9358a SM	69	loc = le32_to_cpu(((__le32 *)(iinfo->i_ext.i_data +
47c9358a SM	70	vdata->s_start_offset))[block]);
fa5e0815 JK	71	goto translate;
	72	}
	73	index = (sb->s_blocksize - vdata->s_start_offset) / sizeof(uint32_t);
cb00ea35	74	if (block >= index) {
1da177e4 LT	75	block -= index;
	76	newblock = 1 + (block / (sb->s_blocksize / sizeof(uint32_t)));
	77	index = block % (sb->s_blocksize / sizeof(uint32_t));
cb00ea35	78	} else {
1da177e4	79	newblock = 0;
4b11111a	80	index = vdata->s_start_offset / sizeof(uint32_t) + block;
1da177e4 LT	81	}
1da177e4 LT	82
6c79e987	83	loc = udf_block_map(sbi->s_vat_inode, newblock);
1da177e4	84
4b11111a MS	85	bh = sb_bread(sb, loc);
4b11111a MS	86	if (!bh) {
1da177e4	87	udf_debug("get_pblock(UDF_VIRTUAL_MAP:%p,%d,%d) VAT: %d[%d]\n",
cb00ea35	88	sb, block, partition, loc, index);
1da177e4 LT	89	return 0xFFFFFFFF;
	90	}
	91
28de7948	92	loc = le32_to_cpu(((__le32 *)bh->b_data)[index]);
1da177e4	93
3bf25cb4	94	brelse(bh);
1da177e4	95
fa5e0815	96	translate:
48d6d8ff	97	if (iinfo->i_location.partitionReferenceNum == partition) {
1da177e4 LT	98	udf_debug("recursive call to udf_get_pblock!\n");
	99	return 0xFFFFFFFF;
	100	}
	101
cb00ea35	102	return udf_get_pblock(sb, loc,
48d6d8ff	103	iinfo->i_location.partitionReferenceNum,
28de7948	104	offset);
1da177e4 LT	105	}
1da177e4 LT	106
4b11111a	107	inline uint32_t udf_get_pblock_virt20(struct super_block *sb, uint32_t block,
cb00ea35	108	uint16_t partition, uint32_t offset)
1da177e4 LT	109	{
	110	return udf_get_pblock_virt15(sb, block, partition, offset);
	111	}
	112
6c79e987	113	uint32_t udf_get_pblock_spar15(struct super_block *sb, uint32_t block,
cb00ea35	114	uint16_t partition, uint32_t offset)
1da177e4 LT	115	{
	116	int i;
	117	struct sparingTable *st = NULL;
6c79e987 MS	118	struct udf_sb_info *sbi = UDF_SB(sb);
	119	struct udf_part_map *map;
	120	uint32_t packet;
4b11111a	121	struct udf_sparing_data *sdata;
6c79e987 MS	122
6c79e987 MS	123	map = &sbi->s_partmaps[partition];
4b11111a MS	124	sdata = &map->s_type_specific.s_sparing;
4b11111a MS	125	packet = (block + offset) & ~(sdata->s_packet_len - 1);
1da177e4	126
cb00ea35	127	for (i = 0; i < 4; i++) {
4b11111a MS	128	if (sdata->s_spar_map[i] != NULL) {
	129	st = (struct sparingTable *)
	130	sdata->s_spar_map[i]->b_data;
1da177e4 LT	131	break;
	132	}
	133	}
	134
cb00ea35 CG	135	if (st) {
cb00ea35 CG	136	for (i = 0; i < le16_to_cpu(st->reallocationTableLen); i++) {
4b11111a MS	137	struct sparingEntry *entry = &st->mapEntry[i];
	138	u32 origLoc = le32_to_cpu(entry->origLocation);
	139	if (origLoc >= 0xFFFFFFF0)
1da177e4	140	break;
4b11111a MS	141	else if (origLoc == packet)
	142	return le32_to_cpu(entry->mappedLocation) +
	143	((block + offset) &
	144	(sdata->s_packet_len - 1));
	145	else if (origLoc > packet)
1da177e4 LT	146	break;
	147	}
	148	}
28de7948	149
6c79e987	150	return map->s_partition_root + block + offset;
1da177e4 LT	151	}
	152
	153	int udf_relocate_blocks(struct super_block sb, long old_block, long new_block)
	154	{
	155	struct udf_sparing_data *sdata;
	156	struct sparingTable *st = NULL;
	157	struct sparingEntry mapEntry;
	158	uint32_t packet;
	159	int i, j, k, l;
6c79e987	160	struct udf_sb_info *sbi = UDF_SB(sb);
4b11111a MS	161	u16 reallocationTableLen;
4b11111a MS	162	struct buffer_head *bh;
1da177e4	163
6c79e987 MS	164	for (i = 0; i < sbi->s_partitions; i++) {
	165	struct udf_part_map *map = &sbi->s_partmaps[i];
	166	if (old_block > map->s_partition_root &&
	167	old_block < map->s_partition_root + map->s_partition_len) {
	168	sdata = &map->s_type_specific.s_sparing;
4b11111a MS	169	packet = (old_block - map->s_partition_root) &
4b11111a MS	170	~(sdata->s_packet_len - 1);
cb00ea35	171
4b11111a MS	172	for (j = 0; j < 4; j++)
	173	if (sdata->s_spar_map[j] != NULL) {
	174	st = (struct sparingTable *)
	175	sdata->s_spar_map[j]->b_data;
1da177e4 LT	176	break;
1da177e4 LT	177	}
1da177e4 LT	178
	179	if (!st)
	180	return 1;
	181
4b11111a MS	182	reallocationTableLen =
	183	le16_to_cpu(st->reallocationTableLen);
	184	for (k = 0; k < reallocationTableLen; k++) {
	185	struct sparingEntry *entry = &st->mapEntry[k];
	186	u32 origLoc = le32_to_cpu(entry->origLocation);
	187
	188	if (origLoc == 0xFFFFFFFF) {
cb00ea35	189	for (; j < 4; j++) {
4b11111a MS	190	int len;
	191	bh = sdata->s_spar_map[j];
	192	if (!bh)
	193	continue;
	194
	195	st = (struct sparingTable *)
	196	bh->b_data;
	197	entry->origLocation =
	198	cpu_to_le32(packet);
	199	len =
	200	sizeof(struct sparingTable) +
	201	reallocationTableLen *
	202	sizeof(struct sparingEntry);
	203	udf_update_tag((char *)st, len);
	204	mark_buffer_dirty(bh);
1da177e4	205	}
4b11111a MS	206	*new_block = le32_to_cpu(
	207	entry->mappedLocation) +
	208	((old_block -
	209	map->s_partition_root) &
	210	(sdata->s_packet_len - 1));
1da177e4	211	return 0;
4b11111a MS	212	} else if (origLoc == packet) {
	213	*new_block = le32_to_cpu(
	214	entry->mappedLocation) +
	215	((old_block -
	216	map->s_partition_root) &
	217	(sdata->s_packet_len - 1));
1da177e4	218	return 0;
4b11111a	219	} else if (origLoc > packet)
1da177e4 LT	220	break;
1da177e4 LT	221	}
28de7948	222
4b11111a MS	223	for (l = k; l < reallocationTableLen; l++) {
	224	struct sparingEntry *entry = &st->mapEntry[l];
	225	u32 origLoc = le32_to_cpu(entry->origLocation);
	226
	227	if (origLoc != 0xFFFFFFFF)
	228	continue;
	229
	230	for (; j < 4; j++) {
	231	bh = sdata->s_spar_map[j];
	232	if (!bh)
	233	continue;
	234
	235	st = (struct sparingTable *)bh->b_data;
	236	mapEntry = st->mapEntry[l];
	237	mapEntry.origLocation =
	238	cpu_to_le32(packet);
	239	memmove(&st->mapEntry[k + 1],
	240	&st->mapEntry[k],
	241	(l - k) *
	242	sizeof(struct sparingEntry));
	243	st->mapEntry[k] = mapEntry;
	244	udf_update_tag((char *)st,
	245	sizeof(struct sparingTable) +
	246	reallocationTableLen *
	247	sizeof(struct sparingEntry));
	248	mark_buffer_dirty(bh);
1da177e4	249	}
4b11111a MS	250	*new_block =
	251	le32_to_cpu(
	252	st->mapEntry[k].mappedLocation) +
	253	((old_block - map->s_partition_root) &
	254	(sdata->s_packet_len - 1));
	255	return 0;
1da177e4	256	}
28de7948	257
1da177e4	258	return 1;
28de7948	259	} /* if old_block */
1da177e4	260	}
28de7948	261
6c79e987	262	if (i == sbi->s_partitions) {
1da177e4 LT	263	/* outside of partitions */
	264	/* for now, fail =) */
	265	return 1;
	266	}
	267
	268	return 0;
	269	}
bfb257a5 JK	270
	271	static uint32_t udf_try_read_meta(struct inode *inode, uint32_t block,
	272	uint16_t partition, uint32_t offset)
	273	{
	274	struct super_block *sb = inode->i_sb;
	275	struct udf_part_map *map;
5ca4e4be	276	struct kernel_lb_addr eloc;
bfb257a5 JK	277	uint32_t elen;
	278	sector_t ext_offset;
	279	struct extent_position epos = {};
	280	uint32_t phyblock;
	281
	282	if (inode_bmap(inode, block, &epos, &eloc, &elen, &ext_offset) !=
	283	(EXT_RECORDED_ALLOCATED >> 30))
	284	phyblock = 0xFFFFFFFF;
	285	else {
	286	map = &UDF_SB(sb)->s_partmaps[partition];
	287	/* map to sparable/physical partition desc */
	288	phyblock = udf_get_pblock(sb, eloc.logicalBlockNum,
	289	map->s_partition_num, ext_offset + offset);
	290	}
	291
	292	brelse(epos.bh);
	293	return phyblock;
	294	}
	295
	296	uint32_t udf_get_pblock_meta25(struct super_block *sb, uint32_t block,
	297	uint16_t partition, uint32_t offset)
	298	{
	299	struct udf_sb_info *sbi = UDF_SB(sb);
	300	struct udf_part_map *map;
	301	struct udf_meta_data *mdata;
	302	uint32_t retblk;
	303	struct inode *inode;
	304
	305	udf_debug("READING from METADATA\n");
	306
	307	map = &sbi->s_partmaps[partition];
	308	mdata = &map->s_type_specific.s_metadata;
	309	inode = mdata->s_metadata_fe ? : mdata->s_mirror_fe;
	310
	311	/* We shouldn't mount such media... */
	312	BUG_ON(!inode);
	313	retblk = udf_try_read_meta(inode, block, partition, offset);
	314	if (retblk == 0xFFFFFFFF) {
	315	udf_warning(sb, __func__, "error reading from METADATA, "
	316	"trying to read from MIRROR");
	317	inode = mdata->s_mirror_fe;
	318	if (!inode)
	319	return 0xFFFFFFFF;
	320	retblk = udf_try_read_meta(inode, block, partition, offset);
	321	}
	322
	323	return retblk;
	324	}