[thirdparty/e2fsprogs.git] / e2fsck / dirinfo.c

/*
 * dirinfo.c --- maintains the directory information table for e2fsck.
 *
 * Copyright (C) 1993 Theodore Ts'o.  This file may be redistributed
 * under the terms of the GNU Public License.
 */

#undef DIRINFO_DEBUG

#include "config.h"
#include "e2fsck.h"
#include <sys/stat.h>
#include <fcntl.h>
#include "uuid/uuid.h"

#include "ext2fs/ext2fs.h"
#include <ext2fs/tdb.h>

struct dir_info_db {
	int		count;
	int		size;
	struct dir_info *array;
	struct dir_info *last_lookup;
#ifdef CONFIG_TDB
	char		*tdb_fn;
	TDB_CONTEXT	*tdb;
#endif
};

struct dir_info_iter {
	int	i;
#ifdef CONFIG_TDB
	TDB_DATA	tdb_iter;
#endif
};

struct dir_info_ent {
	ext2_ino_t		dotdot;	/* Parent according to '..' */
	ext2_ino_t		parent; /* Parent according to treewalk */
};


static void e2fsck_put_dir_info(e2fsck_t ctx, struct dir_info *dir);

#ifdef CONFIG_TDB
static void setup_tdb(e2fsck_t ctx, ext2_ino_t num_dirs)
{
	struct dir_info_db	*db = ctx->dir_info;
	unsigned int		threshold;
	errcode_t		retval;
	mode_t			save_umask;
	char			*tdb_dir, uuid[40];
	int			fd, enable;

	profile_get_string(ctx->profile, "scratch_files", "directory", 0, 0,
			   &tdb_dir);
	profile_get_uint(ctx->profile, "scratch_files",
			 "numdirs_threshold", 0, 0, &threshold);
	profile_get_boolean(ctx->profile, "scratch_files",
			    "dirinfo", 0, 1, &enable);

	if (!enable || !tdb_dir || access(tdb_dir, W_OK) ||
	    (threshold && num_dirs <= threshold))
		return;

	retval = ext2fs_get_mem(strlen(tdb_dir) + 64, &db->tdb_fn);
	if (retval)
		return;

	uuid_unparse(ctx->fs->super->s_uuid, uuid);
	sprintf(db->tdb_fn, "%s/%s-dirinfo-XXXXXX", tdb_dir, uuid);
	save_umask = umask(077);
	fd = mkstemp(db->tdb_fn);
	umask(save_umask);
	if (fd < 0) {
		db->tdb = NULL;
		return;
	}

	if (num_dirs < 99991)
		num_dirs = 99991; /* largest 5 digit prime */

	db->tdb = tdb_open(db->tdb_fn, num_dirs, TDB_NOLOCK | TDB_NOSYNC,
			   O_RDWR | O_CREAT | O_TRUNC, 0600);
	close(fd);
}
#endif

static void setup_db(e2fsck_t ctx)
{
	struct dir_info_db	*db;
	ext2_ino_t		num_dirs;
	errcode_t		retval;

	db = (struct dir_info_db *)
		e2fsck_allocate_memory(ctx, sizeof(struct dir_info_db),
				       "directory map db");
	db->count = db->size = 0;
	db->array = 0;

	ctx->dir_info = db;

	retval = ext2fs_get_num_dirs(ctx->fs, &num_dirs);
	if (retval)
		num_dirs = 1024;	/* Guess */

#ifdef CONFIG_TDB
	setup_tdb(ctx, num_dirs);

	if (db->tdb) {
#ifdef DIRINFO_DEBUG
		printf("Note: using tdb!\n");
#endif
		return;
	}
#endif

	db->size = num_dirs + 10;
	db->array  = (struct dir_info *)
		e2fsck_allocate_memory(ctx, db->size
				       * sizeof (struct dir_info),
				       "directory map");
}

/*
 * This subroutine is called during pass1 to create a directory info
 * entry.  During pass1, the passed-in parent is 0; it will get filled
 * in during pass2.
 */
void e2fsck_add_dir_info(e2fsck_t ctx, ext2_ino_t ino, ext2_ino_t parent)
{
	struct dir_info		*dir, *old_array;
	int			i, j;
	errcode_t		retval;
	unsigned long		old_size;

#ifdef DIRINFO_DEBUG
	printf("add_dir_info for inode (%lu, %lu)...\n", ino, parent);
#endif
	if (!ctx->dir_info)
		setup_db(ctx);

	if (ctx->dir_info->count >= ctx->dir_info->size) {
		old_size = ctx->dir_info->size * sizeof(struct dir_info);
		ctx->dir_info->size += 10;
		old_array = ctx->dir_info->array;
		retval = ext2fs_resize_mem(old_size, ctx->dir_info->size *
					   sizeof(struct dir_info),
					   &ctx->dir_info->array);
		if (retval) {
			fprintf(stderr, "Couldn't reallocate dir_info "
				"structure to %d entries\n",
				ctx->dir_info->size);
			fatal_error(ctx, 0);
			ctx->dir_info->size -= 10;
			return;
		}
		if (old_array != ctx->dir_info->array)
			ctx->dir_info->last_lookup = NULL;
	}

#ifdef CONFIG_TDB
	if (ctx->dir_info->tdb) {
		struct dir_info ent;

		ent.ino = ino;
		ent.parent = parent;
		ent.dotdot = parent;
		e2fsck_put_dir_info(ctx, &ent);
		return;
	}
#endif

	/*
	 * Normally, add_dir_info is called with each inode in
	 * sequential order; but once in a while (like when pass 3
	 * needs to recreate the root directory or lost+found
	 * directory) it is called out of order.  In those cases, we
	 * need to move the dir_info entries down to make room, since
	 * the dir_info array needs to be sorted by inode number for
	 * get_dir_info()'s sake.
	 */
	if (ctx->dir_info->count &&
	    ctx->dir_info->array[ctx->dir_info->count-1].ino >= ino) {
		for (i = ctx->dir_info->count-1; i > 0; i--)
			if (ctx->dir_info->array[i-1].ino < ino)
				break;
		dir = &ctx->dir_info->array[i];
		if (dir->ino != ino)
			for (j = ctx->dir_info->count++; j > i; j--)
				ctx->dir_info->array[j] = ctx->dir_info->array[j-1];
	} else
		dir = &ctx->dir_info->array[ctx->dir_info->count++];

	dir->ino = ino;
	dir->dotdot = parent;
	dir->parent = parent;
}

/*
 * get_dir_info() --- given an inode number, try to find the directory
 * information entry for it.
 */
static struct dir_info *e2fsck_get_dir_info(e2fsck_t ctx, ext2_ino_t ino)
{
	struct dir_info_db	*db = ctx->dir_info;
	int			low, high, mid;

	if (!db)
		return 0;

#ifdef DIRINFO_DEBUG
	printf("e2fsck_get_dir_info %d...", ino);
#endif

#ifdef CONFIG_TDB
	if (db->tdb) {
		static struct dir_info	ret_dir_info;
		TDB_DATA key, data;
		struct dir_info_ent	*buf;

		key.dptr = (unsigned char *) &ino;
		key.dsize = sizeof(ext2_ino_t);

		data = tdb_fetch(db->tdb, key);
		if (!data.dptr) {
			if (tdb_error(db->tdb) != TDB_ERR_NOEXIST)
				printf("fetch failed: %s\n",
				       tdb_errorstr(db->tdb));
			return 0;
		}

		buf = (struct dir_info_ent *) data.dptr;
		ret_dir_info.ino = ino;
		ret_dir_info.dotdot = buf->dotdot;
		ret_dir_info.parent = buf->parent;
#ifdef DIRINFO_DEBUG
		printf("(%d,%d,%d)\n", ino, buf->dotdot, buf->parent);
#endif
		free(data.dptr);
		return &ret_dir_info;
	}
#endif

	if (db->last_lookup && db->last_lookup->ino == ino)
		return db->last_lookup;

	low = 0;
	high = ctx->dir_info->count-1;
	if (ino == ctx->dir_info->array[low].ino) {
#ifdef DIRINFO_DEBUG
		printf("(%d,%d,%d)\n", ino,
		       ctx->dir_info->array[low].dotdot,
		       ctx->dir_info->array[low].parent);
#endif
		return &ctx->dir_info->array[low];
	}
	if (ino == ctx->dir_info->array[high].ino) {
#ifdef DIRINFO_DEBUG
		printf("(%d,%d,%d)\n", ino,
		       ctx->dir_info->array[high].dotdot,
		       ctx->dir_info->array[high].parent);
#endif
		return &ctx->dir_info->array[high];
	}

	while (low < high) {
		mid = (low+high)/2;
		if (mid == low || mid == high)
			break;
		if (ino == ctx->dir_info->array[mid].ino) {
#ifdef DIRINFO_DEBUG
			printf("(%d,%d,%d)\n", ino,
			       ctx->dir_info->array[mid].dotdot,
			       ctx->dir_info->array[mid].parent);
#endif
			return &ctx->dir_info->array[mid];
		}
		if (ino < ctx->dir_info->array[mid].ino)
			high = mid;
		else
			low = mid;
	}
	return 0;
}

static void e2fsck_put_dir_info(e2fsck_t ctx EXT2FS_NO_TDB_UNUSED,
				struct dir_info *dir EXT2FS_NO_TDB_UNUSED)
{
#ifdef CONFIG_TDB
	struct dir_info_db	*db = ctx->dir_info;
	struct dir_info_ent	buf;
	TDB_DATA		key, data;
#endif

#ifdef DIRINFO_DEBUG
	printf("e2fsck_put_dir_info (%d, %d, %d)...", dir->ino, dir->dotdot,
	       dir->parent);
#endif

#ifdef CONFIG_TDB
	if (!db->tdb)
		return;

	buf.parent = dir->parent;
	buf.dotdot = dir->dotdot;

	key.dptr = (unsigned char *) &dir->ino;
	key.dsize = sizeof(ext2_ino_t);
	data.dptr = (unsigned char *) &buf;
	data.dsize = sizeof(buf);

	if (tdb_store(db->tdb, key, data, TDB_REPLACE) == -1) {
		printf("store failed: %s\n", tdb_errorstr(db->tdb));
	}
#endif
}

/*
 * Free the dir_info structure when it isn't needed any more.
 */
void e2fsck_free_dir_info(e2fsck_t ctx)
{
	if (ctx->dir_info) {
#ifdef CONFIG_TDB
		if (ctx->dir_info->tdb)
			tdb_close(ctx->dir_info->tdb);
		if (ctx->dir_info->tdb_fn) {
			if (unlink(ctx->dir_info->tdb_fn) < 0)
				com_err("e2fsck_free_dir_info", errno,
					_("while freeing dir_info tdb file"));
			free(ctx->dir_info->tdb_fn);
		}
#endif
		if (ctx->dir_info->array)
			ext2fs_free_mem(&ctx->dir_info->array);
		ctx->dir_info->array = 0;
		ctx->dir_info->size = 0;
		ctx->dir_info->count = 0;
		ext2fs_free_mem(&ctx->dir_info);
		ctx->dir_info = 0;
	}
}

/*
 * Return the count of number of directories in the dir_info structure
 */
int e2fsck_get_num_dirinfo(e2fsck_t ctx)
{
	return ctx->dir_info ? ctx->dir_info->count : 0;
}

struct dir_info_iter *e2fsck_dir_info_iter_begin(e2fsck_t ctx)
{
	struct dir_info_iter *iter;

	iter = e2fsck_allocate_memory(ctx, sizeof(struct dir_info_iter),
				      "dir_info iterator");

#ifdef CONFIG_TDB
	if (ctx->dir_info->tdb)
		iter->tdb_iter = tdb_firstkey(ctx->dir_info->tdb);
#endif

	return iter;
}

void e2fsck_dir_info_iter_end(e2fsck_t ctx EXT2FS_ATTR((unused)),
			      struct dir_info_iter *iter)
{
#ifdef CONFIG_TDB
	free(iter->tdb_iter.dptr);
#endif
	ext2fs_free_mem(&iter);
}

/*
 * A simple interator function
 */
struct dir_info *e2fsck_dir_info_iter(e2fsck_t ctx, struct dir_info_iter *iter)
{
	if (!ctx->dir_info || !iter)
		return 0;

#ifdef CONFIG_TDB
	if (ctx->dir_info->tdb) {
		static struct dir_info ret_dir_info;
		struct dir_info_ent *buf;
		TDB_DATA data, key;

		if (iter->tdb_iter.dptr == 0)
			return 0;
		key = iter->tdb_iter;
		data = tdb_fetch(ctx->dir_info->tdb, key);
		if (!data.dptr) {
			printf("iter fetch failed: %s\n",
			       tdb_errorstr(ctx->dir_info->tdb));
			return 0;
		}
		buf = (struct dir_info_ent *) data.dptr;
		ret_dir_info.ino = *((ext2_ino_t *) iter->tdb_iter.dptr);
		ret_dir_info.dotdot = buf->dotdot;
		ret_dir_info.parent = buf->parent;
		iter->tdb_iter = tdb_nextkey(ctx->dir_info->tdb, key);
		free(key.dptr);
		free(data.dptr);
		return &ret_dir_info;
	}
#endif

	if (iter->i >= ctx->dir_info->count)
		return 0;

#ifdef DIRINFO_DEBUG
	printf("iter(%d, %d, %d)...", ctx->dir_info->array[iter->i].ino,
	       ctx->dir_info->array[iter->i].dotdot,
	       ctx->dir_info->array[iter->i].parent);
#endif
	ctx->dir_info->last_lookup = ctx->dir_info->array + iter->i++;
	return(ctx->dir_info->last_lookup);
}

/*
 * This function only sets the parent pointer, and requires that
 * dirinfo structure has already been created.
 */
int e2fsck_dir_info_set_parent(e2fsck_t ctx, ext2_ino_t ino,
			       ext2_ino_t parent)
{
	struct dir_info *p;

	p = e2fsck_get_dir_info(ctx, ino);
	if (!p)
		return 1;
	p->parent = parent;
	e2fsck_put_dir_info(ctx, p);
	return 0;
}

/*
 * This function only sets the dot dot pointer, and requires that
 * dirinfo structure has already been created.
 */
int e2fsck_dir_info_set_dotdot(e2fsck_t ctx, ext2_ino_t ino,
			       ext2_ino_t dotdot)
{
	struct dir_info *p;

	p = e2fsck_get_dir_info(ctx, ino);
	if (!p)
		return 1;
	p->dotdot = dotdot;
	e2fsck_put_dir_info(ctx, p);
	return 0;
}

/*
 * This function only sets the parent pointer, and requires that
 * dirinfo structure has already been created.
 */
int e2fsck_dir_info_get_parent(e2fsck_t ctx, ext2_ino_t ino,
			       ext2_ino_t *parent)
{
	struct dir_info *p;

	p = e2fsck_get_dir_info(ctx, ino);
	if (!p)
		return 1;
	*parent = p->parent;
	return 0;
}

/*
 * This function only sets the dot dot pointer, and requires that
 * dirinfo structure has already been created.
 */
int e2fsck_dir_info_get_dotdot(e2fsck_t ctx, ext2_ino_t ino,
			       ext2_ino_t *dotdot)
{
	struct dir_info *p;

	p = e2fsck_get_dir_info(ctx, ino);
	if (!p)
		return 1;
	*dotdot = p->dotdot;
	return 0;
}
Commit	Line	Data
3839e657 TT	1	/*
	2	* dirinfo.c --- maintains the directory information table for e2fsck.
	3	*
	4	* Copyright (C) 1993 Theodore Ts'o. This file may be redistributed
	5	* under the terms of the GNU Public License.
	6	*/
	7
28db82a8 TT	8	#undef DIRINFO_DEBUG
28db82a8 TT	9
d1154eb4	10	#include "config.h"
3839e657	11	#include "e2fsck.h"
25a9fe28 TT	12	#include <sys/stat.h>
25a9fe28 TT	13	#include <fcntl.h>
f954ba01	14	#include "uuid/uuid.h"
25a9fe28	15
8beba812	16	#include "ext2fs/ext2fs.h"
25a9fe28 TT	17	#include <ext2fs/tdb.h>
25a9fe28 TT	18
28db82a8 TT	19	struct dir_info_db {
	20	int count;
	21	int size;
	22	struct dir_info *array;
	23	struct dir_info *last_lookup;
749f0712	24	#ifdef CONFIG_TDB
25a9fe28 TT	25	char *tdb_fn;
25a9fe28 TT	26	TDB_CONTEXT *tdb;
749f0712	27	#endif
28db82a8 TT	28	};
	29
	30	struct dir_info_iter {
	31	int i;
749f0712	32	#ifdef CONFIG_TDB
25a9fe28	33	TDB_DATA tdb_iter;
749f0712	34	#endif
25a9fe28 TT	35	};
	36
	37	struct dir_info_ent {
	38	ext2_ino_t dotdot; /* Parent according to '..' */
	39	ext2_ino_t parent; /* Parent according to treewalk */
28db82a8 TT	40	};
28db82a8 TT	41
25a9fe28	42
28db82a8 TT	43	static void e2fsck_put_dir_info(e2fsck_t ctx, struct dir_info *dir);
28db82a8 TT	44
749f0712	45	#ifdef CONFIG_TDB
25a9fe28 TT	46	static void setup_tdb(e2fsck_t ctx, ext2_ino_t num_dirs)
	47	{
	48	struct dir_info_db *db = ctx->dir_info;
f954ba01	49	unsigned int threshold;
25a9fe28	50	errcode_t retval;
253a9650	51	mode_t save_umask;
25a9fe28	52	char *tdb_dir, uuid[40];
f954ba01	53	int fd, enable;
25a9fe28 TT	54
	55	profile_get_string(ctx->profile, "scratch_files", "directory", 0, 0,
	56	&tdb_dir);
f954ba01 TT	57	profile_get_uint(ctx->profile, "scratch_files",
f954ba01 TT	58	"numdirs_threshold", 0, 0, &threshold);
25a9fe28 TT	59	profile_get_boolean(ctx->profile, "scratch_files",
	60	"dirinfo", 0, 1, &enable);
	61
	62	if (!enable \|\| !tdb_dir \|\| access(tdb_dir, W_OK) \|\|
	63	(threshold && num_dirs <= threshold))
	64	return;
	65
	66	retval = ext2fs_get_mem(strlen(tdb_dir) + 64, &db->tdb_fn);
	67	if (retval)
	68	return;
	69
	70	uuid_unparse(ctx->fs->super->s_uuid, uuid);
	71	sprintf(db->tdb_fn, "%s/%s-dirinfo-XXXXXX", tdb_dir, uuid);
253a9650	72	save_umask = umask(077);
25a9fe28	73	fd = mkstemp(db->tdb_fn);
253a9650	74	umask(save_umask);
fe65f1ec ES	75	if (fd < 0) {
	76	db->tdb = NULL;
	77	return;
	78	}
4e523bbe TT	79
	80	if (num_dirs < 99991)
	81	num_dirs = 99991; /* largest 5 digit prime */
	82
	83	db->tdb = tdb_open(db->tdb_fn, num_dirs, TDB_NOLOCK \| TDB_NOSYNC,
25a9fe28 TT	84	O_RDWR \| O_CREAT \| O_TRUNC, 0600);
	85	close(fd);
	86	}
749f0712	87	#endif
25a9fe28	88
f954ba01	89	static void setup_db(e2fsck_t ctx)
28db82a8 TT	90	{
	91	struct dir_info_db *db;
	92	ext2_ino_t num_dirs;
	93	errcode_t retval;
	94
	95	db = (struct dir_info_db *)
	96	e2fsck_allocate_memory(ctx, sizeof(struct dir_info_db),
	97	"directory map db");
	98	db->count = db->size = 0;
	99	db->array = 0;
	100
25a9fe28 TT	101	ctx->dir_info = db;
25a9fe28 TT	102
28db82a8 TT	103	retval = ext2fs_get_num_dirs(ctx->fs, &num_dirs);
	104	if (retval)
	105	num_dirs = 1024; /* Guess */
25a9fe28	106
749f0712	107	#ifdef CONFIG_TDB
25a9fe28 TT	108	setup_tdb(ctx, num_dirs);
	109
	110	if (db->tdb) {
	111	#ifdef DIRINFO_DEBUG
	112	printf("Note: using tdb!\n");
	113	#endif
	114	return;
	115	}
749f0712	116	#endif
25a9fe28	117
28db82a8 TT	118	db->size = num_dirs + 10;
28db82a8 TT	119	db->array = (struct dir_info *)
25a9fe28	120	e2fsck_allocate_memory(ctx, db->size
28db82a8 TT	121	* sizeof (struct dir_info),
28db82a8 TT	122	"directory map");
28db82a8	123	}
3839e657	124
3839e657	125	/*
21c84b71 TT	126	* This subroutine is called during pass1 to create a directory info
21c84b71 TT	127	* entry. During pass1, the passed-in parent is 0; it will get filled
25a9fe28	128	* in during pass2.
3839e657	129	*/
86c627ec	130	void e2fsck_add_dir_info(e2fsck_t ctx, ext2_ino_t ino, ext2_ino_t parent)
3839e657	131	{
749f0712	132	struct dir_info dir, old_array;
28db82a8 TT	133	int i, j;
	134	errcode_t retval;
	135	unsigned long old_size;
	136
	137	#ifdef DIRINFO_DEBUG
	138	printf("add_dir_info for inode (%lu, %lu)...\n", ino, parent);
3839e657	139	#endif
28db82a8 TT	140	if (!ctx->dir_info)
28db82a8 TT	141	setup_db(ctx);
25a9fe28	142
28db82a8 TT	143	if (ctx->dir_info->count >= ctx->dir_info->size) {
	144	old_size = ctx->dir_info->size * sizeof(struct dir_info);
	145	ctx->dir_info->size += 10;
beec19ff	146	old_array = ctx->dir_info->array;
28db82a8	147	retval = ext2fs_resize_mem(old_size, ctx->dir_info->size *
08b21301	148	sizeof(struct dir_info),
5e9ba85c	149	&ctx->dir_info->array);
08b21301	150	if (retval) {
e9a5c6e3 TT	151	fprintf(stderr, "Couldn't reallocate dir_info "
	152	"structure to %d entries\n",
	153	ctx->dir_info->size);
	154	fatal_error(ctx, 0);
28db82a8	155	ctx->dir_info->size -= 10;
08b21301 TT	156	return;
08b21301 TT	157	}
beec19ff DW	158	if (old_array != ctx->dir_info->array)
beec19ff DW	159	ctx->dir_info->last_lookup = NULL;
3839e657 TT	160	}
3839e657 TT	161
749f0712 TT	162	#ifdef CONFIG_TDB
	163	if (ctx->dir_info->tdb) {
	164	struct dir_info ent;
28db82a8	165
749f0712 TT	166	ent.ino = ino;
	167	ent.parent = parent;
	168	ent.dotdot = parent;
25a9fe28 TT	169	e2fsck_put_dir_info(ctx, &ent);
	170	return;
	171	}
749f0712	172	#endif
28db82a8	173
3839e657 TT	174	/*
	175	* Normally, add_dir_info is called with each inode in
	176	* sequential order; but once in a while (like when pass 3
	177	* needs to recreate the root directory or lost+found
	178	* directory) it is called out of order. In those cases, we
	179	* need to move the dir_info entries down to make room, since
	180	* the dir_info array needs to be sorted by inode number for
	181	* get_dir_info()'s sake.
	182	*/
28db82a8 TT	183	if (ctx->dir_info->count &&
	184	ctx->dir_info->array[ctx->dir_info->count-1].ino >= ino) {
	185	for (i = ctx->dir_info->count-1; i > 0; i--)
	186	if (ctx->dir_info->array[i-1].ino < ino)
3839e657	187	break;
28db82a8	188	dir = &ctx->dir_info->array[i];
25a9fe28	189	if (dir->ino != ino)
28db82a8 TT	190	for (j = ctx->dir_info->count++; j > i; j--)
28db82a8 TT	191	ctx->dir_info->array[j] = ctx->dir_info->array[j-1];
3839e657	192	} else
28db82a8	193	dir = &ctx->dir_info->array[ctx->dir_info->count++];
25a9fe28	194
3839e657 TT	195	dir->ino = ino;
	196	dir->dotdot = parent;
	197	dir->parent = parent;
	198	}
	199
	200	/*
	201	* get_dir_info() --- given an inode number, try to find the directory
	202	* information entry for it.
	203	*/
28db82a8	204	static struct dir_info *e2fsck_get_dir_info(e2fsck_t ctx, ext2_ino_t ino)
3839e657	205	{
28db82a8	206	struct dir_info_db *db = ctx->dir_info;
f954ba01	207	int low, high, mid;
3839e657	208
28db82a8	209	if (!db)
21c84b71	210	return 0;
28db82a8 TT	211
	212	#ifdef DIRINFO_DEBUG
	213	printf("e2fsck_get_dir_info %d...", ino);
	214	#endif
	215
749f0712	216	#ifdef CONFIG_TDB
25a9fe28	217	if (db->tdb) {
749f0712	218	static struct dir_info ret_dir_info;
25a9fe28	219	TDB_DATA key, data;
749f0712	220	struct dir_info_ent *buf;
25a9fe28 TT	221
	222	key.dptr = (unsigned char *) &ino;
	223	key.dsize = sizeof(ext2_ino_t);
	224
	225	data = tdb_fetch(db->tdb, key);
	226	if (!data.dptr) {
	227	if (tdb_error(db->tdb) != TDB_ERR_NOEXIST)
	228	printf("fetch failed: %s\n",
	229	tdb_errorstr(db->tdb));
	230	return 0;
	231	}
	232
	233	buf = (struct dir_info_ent *) data.dptr;
	234	ret_dir_info.ino = ino;
	235	ret_dir_info.dotdot = buf->dotdot;
	236	ret_dir_info.parent = buf->parent;
	237	#ifdef DIRINFO_DEBUG
	238	printf("(%d,%d,%d)\n", ino, buf->dotdot, buf->parent);
	239	#endif
a1f64272	240	free(data.dptr);
25a9fe28 TT	241	return &ret_dir_info;
25a9fe28 TT	242	}
749f0712	243	#endif
25a9fe28	244
28db82a8 TT	245	if (db->last_lookup && db->last_lookup->ino == ino)
	246	return db->last_lookup;
	247
	248	low = 0;
	249	high = ctx->dir_info->count-1;
	250	if (ino == ctx->dir_info->array[low].ino) {
	251	#ifdef DIRINFO_DEBUG
25a9fe28 TT	252	printf("(%d,%d,%d)\n", ino,
25a9fe28 TT	253	ctx->dir_info->array[low].dotdot,
28db82a8 TT	254	ctx->dir_info->array[low].parent);
	255	#endif
	256	return &ctx->dir_info->array[low];
	257	}
	258	if (ino == ctx->dir_info->array[high].ino) {
	259	#ifdef DIRINFO_DEBUG
25a9fe28 TT	260	printf("(%d,%d,%d)\n", ino,
25a9fe28 TT	261	ctx->dir_info->array[high].dotdot,
28db82a8 TT	262	ctx->dir_info->array[high].parent);
	263	#endif
	264	return &ctx->dir_info->array[high];
	265	}
3839e657 TT	266
	267	while (low < high) {
	268	mid = (low+high)/2;
	269	if (mid == low \|\| mid == high)
	270	break;
28db82a8 TT	271	if (ino == ctx->dir_info->array[mid].ino) {
28db82a8 TT	272	#ifdef DIRINFO_DEBUG
25a9fe28 TT	273	printf("(%d,%d,%d)\n", ino,
25a9fe28 TT	274	ctx->dir_info->array[mid].dotdot,
28db82a8 TT	275	ctx->dir_info->array[mid].parent);
	276	#endif
	277	return &ctx->dir_info->array[mid];
	278	}
	279	if (ino < ctx->dir_info->array[mid].ino)
3839e657 TT	280	high = mid;
	281	else
	282	low = mid;
	283	}
	284	return 0;
	285	}
	286
749f0712 TT	287	static void e2fsck_put_dir_info(e2fsck_t ctx EXT2FS_NO_TDB_UNUSED,
749f0712 TT	288	struct dir_info *dir EXT2FS_NO_TDB_UNUSED)
28db82a8	289	{
749f0712	290	#ifdef CONFIG_TDB
25a9fe28 TT	291	struct dir_info_db *db = ctx->dir_info;
	292	struct dir_info_ent buf;
	293	TDB_DATA key, data;
749f0712	294	#endif
25a9fe28	295
28db82a8 TT	296	#ifdef DIRINFO_DEBUG
	297	printf("e2fsck_put_dir_info (%d, %d, %d)...", dir->ino, dir->dotdot,
	298	dir->parent);
	299	#endif
25a9fe28	300
749f0712	301	#ifdef CONFIG_TDB
25a9fe28 TT	302	if (!db->tdb)
	303	return;
	304
	305	buf.parent = dir->parent;
	306	buf.dotdot = dir->dotdot;
	307
	308	key.dptr = (unsigned char *) &dir->ino;
	309	key.dsize = sizeof(ext2_ino_t);
	310	data.dptr = (unsigned char *) &buf;
	311	data.dsize = sizeof(buf);
	312
	313	if (tdb_store(db->tdb, key, data, TDB_REPLACE) == -1) {
	314	printf("store failed: %s\n", tdb_errorstr(db->tdb));
	315	}
749f0712	316	#endif
28db82a8 TT	317	}
28db82a8 TT	318
3839e657 TT	319	/*
	320	* Free the dir_info structure when it isn't needed any more.
	321	*/
08b21301	322	void e2fsck_free_dir_info(e2fsck_t ctx)
3839e657	323	{
08b21301	324	if (ctx->dir_info) {
749f0712	325	#ifdef CONFIG_TDB
25a9fe28 TT	326	if (ctx->dir_info->tdb)
	327	tdb_close(ctx->dir_info->tdb);
	328	if (ctx->dir_info->tdb_fn) {
0abe5745 TT	329	if (unlink(ctx->dir_info->tdb_fn) < 0)
	330	com_err("e2fsck_free_dir_info", errno,
	331	_("while freeing dir_info tdb file"));
25a9fe28 TT	332	free(ctx->dir_info->tdb_fn);
25a9fe28 TT	333	}
749f0712	334	#endif
23f75f6e TT	335	if (ctx->dir_info->array)
	336	ext2fs_free_mem(&ctx->dir_info->array);
	337	ctx->dir_info->array = 0;
28db82a8 TT	338	ctx->dir_info->size = 0;
28db82a8 TT	339	ctx->dir_info->count = 0;
c4e3d3f3	340	ext2fs_free_mem(&ctx->dir_info);
08b21301	341	ctx->dir_info = 0;
3839e657	342	}
3839e657	343	}
21c84b71	344
f8188fff TT	345	/*
	346	* Return the count of number of directories in the dir_info structure
	347	*/
	348	int e2fsck_get_num_dirinfo(e2fsck_t ctx)
	349	{
28db82a8 TT	350	return ctx->dir_info ? ctx->dir_info->count : 0;
	351	}
	352
f404167d	353	struct dir_info_iter *e2fsck_dir_info_iter_begin(e2fsck_t ctx)
28db82a8 TT	354	{
28db82a8 TT	355	struct dir_info_iter *iter;
28db82a8 TT	356
	357	iter = e2fsck_allocate_memory(ctx, sizeof(struct dir_info_iter),
	358	"dir_info iterator");
25a9fe28	359
749f0712 TT	360	#ifdef CONFIG_TDB
	361	if (ctx->dir_info->tdb)
	362	iter->tdb_iter = tdb_firstkey(ctx->dir_info->tdb);
	363	#endif
25a9fe28	364
28db82a8 TT	365	return iter;
	366	}
	367
f404167d TT	368	void e2fsck_dir_info_iter_end(e2fsck_t ctx EXT2FS_ATTR((unused)),
f404167d TT	369	struct dir_info_iter *iter)
28db82a8	370	{
749f0712	371	#ifdef CONFIG_TDB
45e338f5	372	free(iter->tdb_iter.dptr);
749f0712	373	#endif
28db82a8	374	ext2fs_free_mem(&iter);
f8188fff TT	375	}
f8188fff TT	376
21c84b71 TT	377	/*
	378	* A simple interator function
	379	*/
28db82a8	380	struct dir_info e2fsck_dir_info_iter(e2fsck_t ctx, struct dir_info_iter iter)
21c84b71	381	{
25a9fe28	382	if (!ctx->dir_info \|\| !iter)
21c84b71	383	return 0;
25a9fe28	384
749f0712 TT	385	#ifdef CONFIG_TDB
	386	if (ctx->dir_info->tdb) {
	387	static struct dir_info ret_dir_info;
	388	struct dir_info_ent *buf;
	389	TDB_DATA data, key;
	390
25a9fe28 TT	391	if (iter->tdb_iter.dptr == 0)
25a9fe28 TT	392	return 0;
a1f64272	393	key = iter->tdb_iter;
749f0712	394	data = tdb_fetch(ctx->dir_info->tdb, key);
25a9fe28 TT	395	if (!data.dptr) {
25a9fe28 TT	396	printf("iter fetch failed: %s\n",
749f0712	397	tdb_errorstr(ctx->dir_info->tdb));
25a9fe28 TT	398	return 0;
	399	}
	400	buf = (struct dir_info_ent *) data.dptr;
	401	ret_dir_info.ino = ((ext2_ino_t ) iter->tdb_iter.dptr);
	402	ret_dir_info.dotdot = buf->dotdot;
	403	ret_dir_info.parent = buf->parent;
749f0712	404	iter->tdb_iter = tdb_nextkey(ctx->dir_info->tdb, key);
a1f64272 TT	405	free(key.dptr);
a1f64272 TT	406	free(data.dptr);
25a9fe28 TT	407	return &ret_dir_info;
25a9fe28 TT	408	}
749f0712	409	#endif
25a9fe28 TT	410
	411	if (iter->i >= ctx->dir_info->count)
	412	return 0;
	413
28db82a8	414	#ifdef DIRINFO_DEBUG
25a9fe28 TT	415	printf("iter(%d, %d, %d)...", ctx->dir_info->array[iter->i].ino,
25a9fe28 TT	416	ctx->dir_info->array[iter->i].dotdot,
28db82a8 TT	417	ctx->dir_info->array[iter->i].parent);
28db82a8 TT	418	#endif
25a9fe28 TT	419	ctx->dir_info->last_lookup = ctx->dir_info->array + iter->i++;
25a9fe28 TT	420	return(ctx->dir_info->last_lookup);
28db82a8 TT	421	}
	422
	423	/*
	424	* This function only sets the parent pointer, and requires that
	425	* dirinfo structure has already been created.
	426	*/
25a9fe28	427	int e2fsck_dir_info_set_parent(e2fsck_t ctx, ext2_ino_t ino,
28db82a8 TT	428	ext2_ino_t parent)
	429	{
	430	struct dir_info *p;
	431
	432	p = e2fsck_get_dir_info(ctx, ino);
	433	if (!p)
	434	return 1;
	435	p->parent = parent;
	436	e2fsck_put_dir_info(ctx, p);
	437	return 0;
	438	}
	439
	440	/*
	441	* This function only sets the dot dot pointer, and requires that
	442	* dirinfo structure has already been created.
	443	*/
25a9fe28	444	int e2fsck_dir_info_set_dotdot(e2fsck_t ctx, ext2_ino_t ino,
28db82a8 TT	445	ext2_ino_t dotdot)
	446	{
	447	struct dir_info *p;
21c84b71	448
28db82a8 TT	449	p = e2fsck_get_dir_info(ctx, ino);
	450	if (!p)
	451	return 1;
	452	p->dotdot = dotdot;
	453	e2fsck_put_dir_info(ctx, p);
	454	return 0;
	455	}
	456
	457	/*
	458	* This function only sets the parent pointer, and requires that
	459	* dirinfo structure has already been created.
	460	*/
25a9fe28	461	int e2fsck_dir_info_get_parent(e2fsck_t ctx, ext2_ino_t ino,
28db82a8 TT	462	ext2_ino_t *parent)
	463	{
	464	struct dir_info *p;
	465
	466	p = e2fsck_get_dir_info(ctx, ino);
	467	if (!p)
	468	return 1;
	469	*parent = p->parent;
	470	return 0;
21c84b71	471	}
28db82a8 TT	472
	473	/*
	474	* This function only sets the dot dot pointer, and requires that
	475	* dirinfo structure has already been created.
	476	*/
25a9fe28	477	int e2fsck_dir_info_get_dotdot(e2fsck_t ctx, ext2_ino_t ino,
28db82a8 TT	478	ext2_ino_t *dotdot)
	479	{
	480	struct dir_info *p;
	481
	482	p = e2fsck_get_dir_info(ctx, ino);
	483	if (!p)
	484	return 1;
	485	*dotdot = p->dotdot;
	486	return 0;
	487	}
	488