#ifdef HAVE_CONFIG_H
#include <config.h>
#endif

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

#ifdef _WIN32
#include <windows.h>
#else
#include <unistd.h>
#endif

#include <dc_internal.h>
#include <dc_common.h>

/********************************************************************
 * Constants
 */

/* Buffer size used when copying a file */
#define COPY_BUFSIZE		65536


/********************************************************************
 * Functions
 */

#ifdef _WIN32
int _DC_copyFile(const char *src, const char *dst)
{
	if (CopyFile(src, dst, FALSE))
		return 0;
	return DC_ERR_SYSTEM;
}
#else
int _DC_copyFile(const char *src, const char *dst)
{
	struct stat s;
	int sfd, dfd;
	ssize_t ret;
	char *buf;

	buf = (char *)malloc(COPY_BUFSIZE);
	if (!buf)
		return DC_ERR_SYSTEM;

	sfd = open(src, O_RDONLY);
	if (sfd == -1)
	{
		ret = errno;
		free(buf);
		errno = ret;
		return DC_ERR_SYSTEM;
	}

	fstat(sfd, &s);
	dfd = open(dst, O_WRONLY | O_CREAT | O_TRUNC, s.st_mode);
	if (dfd == -1)
	{
		ret = errno;
		free(buf);
		close(sfd);
		errno = ret;
		return DC_ERR_SYSTEM;
	}

	while ((ret = read(sfd, buf, COPY_BUFSIZE)) > 0)
	{
		char *ptr = buf;
		while (ret)
		{
			ssize_t ret2 = write(dfd, ptr, ret);
			if (ret2 < 0)
			{
				ret = errno;
				goto error;
			}
			ret -= ret2;
			ptr += ret2;
		}
	}

	if (ret < 0)
		goto error;

	free(buf);
	close(sfd);
	if (close(dfd))
	{
		ret = errno;
		unlink(dst);
		errno = ret;
		return DC_ERR_SYSTEM;
	}
	return 0;

error:
	ret = errno;
	free(buf);
	close(sfd);
	close(dfd);
	unlink(dst);
	errno = ret;
	return DC_ERR_SYSTEM;
}
#endif /* _WIN32 */

long long _DC_processSuffix(const char *suffix)
{
	while (*suffix == ' ' || *suffix == '\t')
		suffix++;
	if (!strcasecmp(suffix, "kb") || !strcasecmp(suffix, "kib"))
		return 1ll << 10;
	else if (!strcasecmp(suffix, "mb") || !strcasecmp(suffix, "mib"))
		return 1ll << 20;
	else if (!strcasecmp(suffix, "gb") || !strcasecmp(suffix, "gib"))
		return 1ll << 30;
	else if (!strcasecmp(suffix, "min"))
		return 60ll;
	else if (!strcasecmp(suffix, "h") || !strcasecmp(suffix, "hour"))
		return 60ll * 60;
	else if (!strcasecmp(suffix, "day"))
		return 24ll * 60 * 60;
	return -1;
}

int _DC_parseBoolean(const char *value)
{
	static const char *truevals[] = {"true", "yes", "on"};
	static const char *falsevals[] = {"false", "no", "off"};
	unsigned i;

	for (i = 0; i < sizeof(truevals) / sizeof(truevals[0]); i++)
		if (!strcasecmp(value, truevals[i]))
			return 1;
	for (i = 0; i < sizeof(falsevals) / sizeof(falsevals[0]); i++)
		if (!strcasecmp(value, falsevals[i]))
			return 1;
	return -1;
}

DC_PhysicalFile *_DC_createPhysicalFile(const char *label,
	const char *path)
{
	DC_PhysicalFile *file;

	file = malloc(sizeof(*file));
	if (!file)
		return NULL;

	file->label = strdup(label);
	file->path = strdup(path);
	if (!file->label || !file->path)
	{
		_DC_destroyPhysicalFile(file);
		return NULL;
	}
	file->mode = DC_FILE_REGULAR;

	return file;
}

void _DC_destroyPhysicalFile(DC_PhysicalFile *file)
{
	if (!file)
		return;

	free(file->label);
	free(file->path);
	free(file);
}