/* Locale insensitive ctype.h functions taken from the RPM library -
 * RPM is Copyright (c) 1998 by Red Hat Software, Inc.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or (at
 * your option) any later version.
 *
 * This program 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 General Public License for more details.
 *
 * You should have received a copy of the GNU 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
 */

#ifndef spingle__q_ctype_h
#define spingle__q_ctype_h

static inline int32_t q_isascii(int32_t c)
{
	return ((c & ~0x7f) == 0);
}

static inline int32_t q_islower(int32_t c)
{
	return (c >= 'a' && c <= 'z');
}

static inline int32_t q_isupper(int32_t c)
{
	return (c >= 'A' && c <= 'Z');
}

static inline int32_t q_isalpha(int32_t c)
{
	return (q_islower(c) || q_isupper(c));
}

static inline int32_t q_isdigit(int32_t c)
{
	return (c >= '0' && c <= '9');
}

static inline int32_t q_isxdigit(int32_t c)
{
	return (q_isdigit(c) || (c >= 'a' && c <= 'f') ||
	        (c >= 'A' && c <= 'F'));
}

static inline int32_t q_isalnum(int32_t c)
{
	return (q_isalpha(c) || q_isdigit(c));
}

static inline int32_t q_isblank(int32_t c)
{
	return (c == ' ' || c == '\t');
}

static inline int32_t q_isspace(int32_t c)
{
	switch(c)
	{
	case ' ':
	case '\t':
	case '\n':
	case '\r':
	case '\f':
	case '\v':
		return 1;
	}
	return 0;
}

static inline int32_t q_isgraph(int32_t c)
{
	return (c > 0x20 && c <= 0x7e);
}

static inline int32_t q_isprint(int32_t c)
{
	return (c >= 0x20 && c <= 0x7e);
}

static inline int32_t q_toascii(int32_t c)
{
	return (c & 0x7f);
}

static inline int32_t q_tolower(int32_t c)
{
	return ((q_isupper(c)) ? (c | ('a' - 'A')) : c);
}

static inline int32_t q_toupper(int32_t c)
{
	return ((q_islower(c)) ? (c & ~('a' - 'A')) : c);
}

#endif