pub use super::libc::*;
#[no_mangle]
pub unsafe extern fn isalnum(c: c_int) -> c_int {
(isalpha(c) == 1 || isdigit(c) == 1) as c_int
}
#[no_mangle]
pub unsafe extern fn isalpha(c: c_int) -> c_int {
(isupper(c) == 1 || islower(c) == 1) as c_int
}
#[no_mangle]
pub unsafe extern fn isascii(c: c_int) -> c_int {
(c >= 0 && c <= 127) as c_int
}
#[no_mangle]
pub unsafe extern fn isblank(c: c_int) -> c_int {
(c == 9 || c == 32) as c_int
}
#[no_mangle]
pub unsafe extern fn iscntrl(c: c_int) -> c_int {
((c >= 0 && c <= 31) || c == 127) as c_int
}
#[no_mangle]
pub unsafe extern fn isdigit(c: c_int) -> c_int {
(c >= 48 && c <= 57) as c_int
}
#[no_mangle]
pub unsafe extern fn isgraph(c: c_int) -> c_int {
(isalpha(c) == 1 || isdigit(c) == 1 || ispunct(c) == 1) as c_int
}
#[no_mangle]
pub unsafe extern fn islower(c: c_int) -> c_int {
(c >= 97 && c <= 122) as c_int
}
#[no_mangle]
pub unsafe extern fn isprint(c: c_int) -> c_int {
((isgraph(c) == 1 && iscntrl(c) != 1) || c == 32) as c_int
}
#[no_mangle]
pub unsafe extern fn ispunct(c: c_int) -> c_int {
((c >= 33 && c <= 47) || (c >= 58 && c <= 64) || (c >= 91 && c <= 96) || (c >= 123 && c <= 126)) as c_int
}
#[no_mangle]
pub unsafe extern fn isspace(c: c_int) -> c_int {
((c >= 9 && c <= 13) || c == 32) as c_int
}
#[no_mangle]
pub unsafe extern fn isupper(c: c_int) -> c_int {
(c >= 65 && c <= 90) as c_int
}
#[no_mangle]
pub unsafe extern fn isxdigit(c: c_int) -> c_int {
(isdigit(c) == 1 || (c >= 65 && c <= 70) || (c >= 97 && c <= 102)) as c_int
}
#[no_mangle]
pub unsafe extern fn toascii(c: c_char) -> c_char {
c & 0x7f
}
#[no_mangle]
pub unsafe extern fn tolower(c: c_char) -> c_char {
if isupper(c as c_int) == 1 {
c + 32
} else {
c
}
}
#[no_mangle]
pub unsafe extern fn toupper(c: c_char) -> c_char {
if islower(c as c_int) == 1 {
c - 32
} else {
c
}
}
#[cfg(test)]
mod test {
use super::*;
use test::black_box;
#[test]
fn test_isalnum() {
unsafe {
assert!(isalnum(black_box('A') as c_int) > 0 as c_int, "A");
assert!(isalnum('a' as c_int) > 0 as c_int, "a");
assert!(isalnum(' ' as c_int) == 0 as c_int, "<space>");
assert!(isalnum('0' as c_int) > 0 as c_int, "0");
assert!(isalnum('\t' as c_int) == 0 as c_int, "<tab>");
assert!(isalnum('-' as c_int) == 0 as c_int, "-");
}
}
#[test]
fn test_isalpha() {
unsafe {
assert!(isalpha('A' as c_int) > 0 as c_int, "A");
assert!(isalpha('a' as c_int) > 0 as c_int, "a");
assert!(isalpha(' ' as c_int) == 0 as c_int, "<space>");
assert!(isalpha('0' as c_int) == 0 as c_int, "0");
assert!(isalpha('\t' as c_int) == 0 as c_int, "<tab>");
assert!(isalpha('-' as c_int) == 0 as c_int, "-");
}
}
#[test]
fn test_isascii() {
unsafe {
assert!(isascii('A' as c_int) > 0 as c_int, "A");
assert!(isascii('a' as c_int) > 0 as c_int, "a");
assert!(isascii(' ' as c_int) > 0 as c_int, "<space>");
assert!(isascii('0' as c_int) > 0 as c_int, "0");
assert!(isascii('\t' as c_int) > 0 as c_int, "<tab>");
assert!(isascii('-' as c_int) > 0 as c_int, "-");
assert!(isascii(153 as c_int) == 0 as c_int, "™");
}
}
#[test]
fn test_isblank() {
unsafe {
assert!(isblank('A' as c_int) == 0 as c_int, "A");
assert!(isblank('a' as c_int) == 0 as c_int, "a");
assert!(isblank(' ' as c_int) > 0 as c_int, "<space>");
assert!(isblank('0' as c_int) == 0 as c_int, "0");
assert!(isblank('\t' as c_int) > 0 as c_int, "<tab>");
assert!(isblank('-' as c_int) == 0 as c_int, "-");
}
}
#[test]
fn test_iscntrl() {
unsafe {
assert!(iscntrl('A' as c_int) == 0 as c_int, "A");
assert!(iscntrl('a' as c_int) == 0 as c_int, "a");
assert!(iscntrl(' ' as c_int) == 0 as c_int, "<space>");
assert!(iscntrl('0' as c_int) == 0 as c_int, "0");
assert!(iscntrl('\t' as c_int) > 0 as c_int, "<tab>");
assert!(iscntrl('-' as c_int) == 0 as c_int, "-");
}
}
#[test]
fn test_isdigit() {
unsafe {
assert!(isdigit('A' as c_int) == 0 as c_int, "A");
assert!(isdigit('a' as c_int) == 0 as c_int, "a");
assert!(isdigit(' ' as c_int) == 0 as c_int, "<space>");
assert!(isdigit('0' as c_int) > 0 as c_int, "0");
assert!(isdigit('\t' as c_int) == 0 as c_int, "<tab>");
assert!(isdigit('-' as c_int) == 0 as c_int, "-");
}
}
#[test]
fn test_isgraph() {
unsafe {
assert!(isgraph('A' as c_int) > 0 as c_int, "A");
assert!(isgraph('a' as c_int) > 0 as c_int, "a");
assert!(isgraph(' ' as c_int) == 0 as c_int, "<space>");
assert!(isgraph('0' as c_int) > 0 as c_int, "0");
assert!(isgraph('\t' as c_int) == 0 as c_int, "<tab>");
assert!(isgraph('-' as c_int) > 0 as c_int, "-");
}
}
#[test]
fn test_islower() {
unsafe {
assert!(islower('A' as c_int) == 0 as c_int, "A");
assert!(islower('a' as c_int) > 0 as c_int, "a");
assert!(islower(' ' as c_int) == 0 as c_int, "<space>");
assert!(islower('0' as c_int) == 0 as c_int, "0");
assert!(islower('\t' as c_int) == 0 as c_int, "<tab>");
assert!(islower('-' as c_int) == 0 as c_int, "-");
}
}
#[test]
fn test_isprint() {
unsafe {
assert!(isprint('A' as c_int) > 0 as c_int, "A");
assert!(isprint('a' as c_int) > 0 as c_int, "a");
assert!(isprint(' ' as c_int) > 0 as c_int, "<space>");
assert!(isprint('0' as c_int) > 0 as c_int, "0");
assert!(isprint('\t' as c_int) == 0 as c_int, "<tab>");
assert!(isprint('-' as c_int) > 0 as c_int, "-");
}
}
#[test]
fn test_ispunct() {
unsafe {
assert!(ispunct('A' as c_int) == 0 as c_int, "A");
assert!(ispunct('a' as c_int) == 0 as c_int, "a");
assert!(ispunct(' ' as c_int) == 0 as c_int, "<space>");
assert!(ispunct('0' as c_int) == 0 as c_int, "0");
assert!(ispunct('\t' as c_int) == 0 as c_int, "<tab>");
assert!(ispunct('-' as c_int) > 0 as c_int, "-");
}
}
#[test]
fn test_isspace() {
unsafe {
assert!(isspace('A' as c_int) == 0 as c_int, "A");
assert!(isspace('a' as c_int) == 0 as c_int, "a");
assert!(isspace(' ' as c_int) > 0 as c_int, "<space>");
assert!(isspace('0' as c_int) == 0 as c_int, "0");
assert!(isspace('\t' as c_int) > 0 as c_int, "<tab>");
assert!(isspace('-' as c_int) == 0 as c_int, "-");
}
}
#[test]
fn test_isupper() {
unsafe {
assert!(isupper('A' as c_int) > 0 as c_int, "A");
assert!(isupper('a' as c_int) == 0 as c_int, "a");
assert!(isupper(' ' as c_int) == 0 as c_int, "<space>");
assert!(isupper('0' as c_int) == 0 as c_int, "0");
assert!(isupper('\t' as c_int) == 0 as c_int, "<tab>");
assert!(isupper('-' as c_int) == 0 as c_int, "-");
}
}
#[test]
fn test_isxdigit() {
unsafe {
assert!(isxdigit('A' as c_int) > 0 as c_int, "A");
assert!(isxdigit('a' as c_int) > 0 as c_int, "a");
assert!(isxdigit(' ' as c_int) == 0 as c_int, "<space>");
assert!(isxdigit('0' as c_int) > 0 as c_int, "0");
assert!(isxdigit('\t' as c_int) == 0 as c_int, "<tab>");
assert!(isxdigit('-' as c_int) == 0 as c_int, "-");
}
}
#[test]
#[allow(overflowing_literals)]
fn test_toascii() {
unsafe {
assert!(toascii('A' as c_char) == 'A' as c_char, "A to A");
assert!(toascii('a' as c_char) == 'a' as c_char, "a to a");
assert!(toascii(' ' as c_char) == ' ' as c_char, "<space> to <space>");
assert!(toascii('0' as c_char) == '0' as c_char, "0 to 0");
assert!(toascii('\t' as c_char) == '\t' as c_char, "<tab> to <tab>");
assert!(toascii('-' as c_char) == '-' as c_char, "- to -");
assert_eq!(toascii(153 as c_char), 25 as c_char);
}
}
#[test]
fn test_tolower() {
unsafe {
assert!(tolower('A' as c_char) == 'a' as c_char, "A to a");
assert!(tolower('a' as c_char) == 'a' as c_char, "a to a");
assert!(tolower(' ' as c_char) == ' ' as c_char, "<space> to <space>");
assert!(tolower('0' as c_char) == '0' as c_char, "0 to 0");
assert!(tolower('\t' as c_char) == '\t' as c_char, "<tab> to <tab>");
assert!(tolower('-' as c_char) == '-' as c_char, "- to -");
}
}
#[test]
fn test_toupper() {
unsafe {
assert!(toupper('A' as c_char) == 'A' as c_char, "A to A");
assert!(toupper('a' as c_char) == 'A' as c_char, "a to A");
assert!(toupper(' ' as c_char) == ' ' as c_char, "<space> to <space>");
assert!(toupper('0' as c_char) == '0' as c_char, "0 to 0");
assert!(toupper('\t' as c_char) == '\t' as c_char, "<tab> to <tab>");
assert!(toupper('-' as c_char) == '-' as c_char, "- to -");
}
}
}