/*****************************************************************************/
/*  pemagination: a (virtual) tour into portable bits and executable bytes   */
/*  Copyright (C) 2013,2014,2015  Z. Gilboa                                  */
/*  Released under GPLv2 and GPLv3; see COPYING.PEMAGINE.                    */
/*****************************************************************************/

#include <psxtypes/psxtypes.h>
#include <pemagine/pemagine.h>
#include "pe_impl.h"

size_t pe_impl_strlen_ansi(const char * str)
{
	char * ch;
	char * upper_bound;

	/* sanity check */
	upper_bound = (char *)str + PE_STR_MAX_SYMBOL_LEN_ALLOWED;

	for (ch = (char *)str; (ch < upper_bound) && (*ch); ch++);

	if (ch < upper_bound)
		return (size_t)((intptr_t)ch - (intptr_t)str);
	else
		return -1;
}


size_t pe_impl_strlen_utf16(const wchar16_t * str)
{
	wchar16_t *	wch;
	wchar16_t *	upper_bound;

	/* sanity check */
	upper_bound = (wchar16_t *)str + PE_STR_MAX_SYMBOL_LEN_ALLOWED;

	for (wch = (wchar16_t *)str; (wch < upper_bound) && (*wch); wch++);

	if (wch < upper_bound)
		return (size_t)((intptr_t)wch - (intptr_t)str);
	else
		return -1;
}


wchar16_t pe_impl_utf16_char_to_lower(const wchar16_t c)
{
	if ((c >= 'A') && (c <= 'Z'))
		return c + 'a' - 'A';
	else
		return c;
}