/*
 * Copyright (C) 2004-2007 Red Hat, Inc. All rights reserved.
 *
 * This file is part of LVM2.
 *
 * This copyrighted material is made available to anyone wishing to use,
 * modify, copy, or redistribute it subject to the terms and conditions
 * of the GNU Lesser General Public License v.2.1.
 *
 * You should have received a copy of the GNU Lesser General Public License
 * along with this program; if not, write to the Free Software Foundation,
 * Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

#include "lib/misc/lib.h"
#include "lib/filters/filter.h"

#ifdef __linux__

static int _accept_p(struct cmd_context *cmd, struct dev_filter *f, struct device *dev, const char *use_filter_name)
{
	char path[PATH_MAX];
	const char *sysfs_dir = f->private;
	struct stat info;

	dev->filtered_flags &= ~DEV_FILTERED_SYSFS;

	/*
	 * Any kind of device id other than devname has been set
	 * using sysfs so we know that sysfs info exists for dev.
	 */
	if (dev->id && dev->id->idtype && (dev->id->idtype != DEV_ID_TYPE_DEVNAME))
		return 1;

	if (dm_snprintf(path, sizeof(path), "%sdev/block/%u:%u",
			sysfs_dir, MAJOR(dev->dev), MINOR(dev->dev)) < 0) {
		log_debug("failed to create sysfs path");
		return 1;
	}

	if (lstat(path, &info)) {
		log_debug_devs("%s: Skipping (sysfs)", dev_name(dev));
		dev->filtered_flags |= DEV_FILTERED_SYSFS;
		return 0;
	}

	return 1;
}

static void _destroy(struct dev_filter *f)
{
	if (f->use_count)
		log_error(INTERNAL_ERROR "Destroying sysfs filter while in use %u times.", f->use_count);
	free(f);
}

static int _check_sys_dev_block(const char *sysfs_dir)
{
	char path[PATH_MAX];
	struct stat info;

	if (dm_snprintf(path, sizeof(path), "%sdev/block", sysfs_dir) < 0)
		return_0;

	if (lstat(path, &info)) {
		log_debug("filter-sysfs disabled: /sys/dev/block not found");
		return 0;
	}

	return 1;
}

struct dev_filter *sysfs_filter_create(const char *sysfs_dir)
{
	struct dev_filter *f;
	size_t len;

	if (!sysfs_dir || !*sysfs_dir) {
		log_verbose("No proc filesystem found: skipping sysfs filter");
		return NULL;
	}

	/* support old kernels that don't have this */
	if (!_check_sys_dev_block(sysfs_dir))
		return NULL;

	len = strlen(sysfs_dir) + 1;
	if (!(f = zalloc(sizeof(*f) + len)))
		return NULL;

	f->passes_filter = _accept_p;
	f->destroy = _destroy;
	f->use_count = 0;
	f->name = "sysfs";

	memcpy(f + 1, sysfs_dir, len);
	f->private = (f + 1);

	log_debug_devs("Sysfs filter initialised.");

	return f;
}

#else

struct dev_filter *sysfs_filter_create(const char *sysfs_dir __attribute__((unused)))
{
	return NULL;
}

#endif