/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/*
 * Copyright (C) 2000 Helix Code, Inc.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Library General Public License
 * as published by the Free Software Foundation; either version 2 of
 * the License, or (at your option) any later version.
 * 
 * This library 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
 * Library General Public License for more details.
 *
 * You should have received a copy of the GNU Library General Public
 * License along with the Gnome Library; see the file COPYING.LIB.  If not,
 * write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
 */

/* index.c: high-level indexing ops */

#include <errno.h>
#include <fcntl.h>
#include <string.h>
#include <sys/stat.h>
#include <unistd.h>

#include "ibex_internal.h"

/* Index a file, given its name. (Replace any previously indexed contents
 * of this file with the new contents.)
 */
int
ibex_index_file (ibex *ib, char *filename)
{
	int fd;
	int status;
	struct stat st;

	fd = open (filename, O_RDONLY);
	if (fd < 0)
		return -1;

	if (fstat (fd, &st) == -1) {
		close (fd);
		return -1;
	}
	if (!S_ISREG (st.st_mode)) {
		close (fd);
		errno = EINVAL;
		return -1;
	}

	ibex_unindex (ib, filename);
	status = ibex_index_fd (ib, filename, fd, st.st_size);
	close (fd);
	return status;
}

/* Given a file descriptor and a name to refer to it by, index LEN
 * bytes of data from it.
 */
int
ibex_index_fd (ibex *ib, char *name, int fd, size_t len)
{
	char *buf;
	int off = 0, nread, status;

	buf = g_malloc (len);
	do {
		nread = read (fd, buf + off, len - off);
		if (nread == -1) {
			g_free (buf);
			return -1;
		}
		off += nread;
	} while (off != len);

	status = ibex_index_buffer (ib, name, buf, len, NULL);
	g_free (buf);

	return status;
}

void
ibex_unindex (ibex *ib, char *name)
{
	ibex_file *ibf;

	ibf = g_tree_lookup (ib->files, name);
	if (ibf) {
		ibf->index = -1;
		g_tree_remove (ib->files, name);
		g_ptr_array_add (ib->oldfiles, ibf);
	}
}

void
ibex_rename (ibex *ib, char *oldname, char *newname)
{
	ibex_file *ibf;

	ibf = g_tree_lookup (ib->files, oldname);
	if (ibf) {
		g_tree_remove (ib->files, oldname);
		g_free (ibf->name);
		ibf->name = g_strdup (newname);
		g_tree_insert (ib->files, ibf->name, ibf);
	}
}