/* $Id$ */
/* Copyright (c) 2008-2016 Pierre Pronchery <khorben@defora.org> */
/* This file is part of DeforaOS System libc */
/* All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are
 * met:
 *
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 *
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
 * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
 * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
 * HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
 * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
 * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */



#include "sys/types.h"
#include "string.h"
#include "strings.h"
#include "errno.h"
#include "iconv.h"


/* types */
typedef enum _iconv_code
{
	IC_UNKNOWN = -1,
	IC_ISO_8859_1,
	IC_ISO_8859_15,
	IC_UTF_8
} iconv_code;


/* constants */
static struct
{
	iconv_code code;
	char const * name;
} _iconv_names[] =
{
	{ IC_ISO_8859_1, "iso-8859-1" },
	{ IC_ISO_8859_15, "iso-8859-15" },
	{ IC_UTF_8, "UTF-8" },
	{ IC_UTF_8, "UTF8" }
};


/* functions */
/* iconv_open */
static iconv_code _open_code(char const * code);

iconv_t iconv_open(const char * tocode, const char * fromcode)
{
	iconv_t cd;
	iconv_code code;

	if((code = _open_code(tocode)) == IC_UNKNOWN)
	{
		errno = EINVAL;
		return (iconv_t)-1;
	}
	cd = code;
	if((code = _open_code(fromcode)) == IC_UNKNOWN)
	{
		errno = EINVAL;
		return (iconv_t)-1;
	}
	cd |= code << 16;
	return cd;
}

static iconv_code _open_code(char const * code)
{
	size_t i;

	for(i = 0; i < sizeof(_iconv_names) / sizeof(*_iconv_names); i++)
		if(strcasecmp(_iconv_names[i].name, code) == 0)
			return _iconv_names[i].code;
	return IC_UNKNOWN;
}


/* iconv */
size_t iconv(iconv_t cd, const char ** inbuf, size_t * inbytesleft,
		char ** outbuf, size_t * outbytesleft)
{
	if((cd & 0xffff) == ((cd >> 16) & 0xffff))
	{
		/* no conversion is required */
		if(*inbytesleft > *outbytesleft)
		{
			/* the conversion will not fit */
			errno = E2BIG;
			return (size_t)-1;
		}
		memcpy(*outbuf, *inbuf, *inbytesleft);
		(*inbuf) += *inbytesleft;
		(*outbuf) += *inbytesleft;
		(*outbytesleft) -= *inbytesleft;
		*inbytesleft = 0;
		return 0;
	}
	errno = ENOSYS;
	return (size_t)-1;
}


/* iconv_close */
int iconv_close(iconv_t cd)
{
	(void) cd;

	return 0;
}