220 lines
5.7 KiB
C
220 lines
5.7 KiB
C
// © 2016 and later: Unicode, Inc. and others.
|
|
// License & terms of use: http://www.unicode.org/copyright.html
|
|
/*
|
|
*******************************************************************************
|
|
*
|
|
* Copyright (C) 1999-2015, International Business Machines
|
|
* Corporation and others. All Rights Reserved.
|
|
*
|
|
*******************************************************************************
|
|
* file name: uinvchar.h
|
|
* encoding: UTF-8
|
|
* tab size: 8 (not used)
|
|
* indentation:2
|
|
*
|
|
* created on: 2004sep14
|
|
* created by: Markus W. Scherer
|
|
*
|
|
* Definitions for handling invariant characters, moved here from putil.c
|
|
* for better modularization.
|
|
*/
|
|
|
|
#ifndef __UINVCHAR_H__
|
|
#define __UINVCHAR_H__
|
|
|
|
#include "unicode/utypes.h"
|
|
#ifdef __cplusplus
|
|
#include "unicode/unistr.h"
|
|
#endif
|
|
|
|
/**
|
|
* Check if a char string only contains invariant characters.
|
|
* See utypes.h for details.
|
|
*
|
|
* @param s Input string pointer.
|
|
* @param length Length of the string, can be -1 if NUL-terminated.
|
|
* @return TRUE if s contains only invariant characters.
|
|
*
|
|
* @internal (ICU 2.8)
|
|
*/
|
|
U_INTERNAL UBool U_EXPORT2
|
|
uprv_isInvariantString(const char *s, int32_t length);
|
|
|
|
/**
|
|
* Check if a Unicode string only contains invariant characters.
|
|
* See utypes.h for details.
|
|
*
|
|
* @param s Input string pointer.
|
|
* @param length Length of the string, can be -1 if NUL-terminated.
|
|
* @return TRUE if s contains only invariant characters.
|
|
*
|
|
* @internal (ICU 2.8)
|
|
*/
|
|
U_INTERNAL UBool U_EXPORT2
|
|
uprv_isInvariantUString(const UChar *s, int32_t length);
|
|
|
|
/**
|
|
* \def U_UPPER_ORDINAL
|
|
* Get the ordinal number of an uppercase invariant character
|
|
* @internal
|
|
*/
|
|
#if U_CHARSET_FAMILY==U_ASCII_FAMILY
|
|
# define U_UPPER_ORDINAL(x) ((x)-'A')
|
|
#elif U_CHARSET_FAMILY==U_EBCDIC_FAMILY
|
|
# define U_UPPER_ORDINAL(x) (((x) < 'J') ? ((x)-'A') : \
|
|
(((x) < 'S') ? ((x)-'J'+9) : \
|
|
((x)-'S'+18)))
|
|
#else
|
|
# error Unknown charset family!
|
|
#endif
|
|
|
|
#ifdef __cplusplus
|
|
|
|
U_NAMESPACE_BEGIN
|
|
|
|
/**
|
|
* Like U_UPPER_ORDINAL(x) but with validation.
|
|
* Returns 0..25 for A..Z else a value outside 0..25.
|
|
*/
|
|
inline int32_t uprv_upperOrdinal(int32_t c) {
|
|
#if U_CHARSET_FAMILY==U_ASCII_FAMILY
|
|
return c - 'A';
|
|
#elif U_CHARSET_FAMILY==U_EBCDIC_FAMILY
|
|
// EBCDIC: A-Z (26 letters) is split into three ranges A-I (9 letters), J-R (9), S-Z (8).
|
|
// https://en.wikipedia.org/wiki/EBCDIC_037#Codepage_layout
|
|
if (c <= 'I') { return c - 'A'; } // A-I --> 0-8
|
|
if (c < 'J') { return -1; }
|
|
if (c <= 'R') { return c - 'J' + 9; } // J-R --> 9..17
|
|
if (c < 'S') { return -1; }
|
|
return c - 'S' + 18; // S-Z --> 18..25
|
|
#else
|
|
# error Unknown charset family!
|
|
#endif
|
|
}
|
|
|
|
// Like U_UPPER_ORDINAL(x) but for lowercase and with validation.
|
|
// Returns 0..25 for a..z else a value outside 0..25.
|
|
inline int32_t uprv_lowerOrdinal(int32_t c) {
|
|
#if U_CHARSET_FAMILY==U_ASCII_FAMILY
|
|
return c - 'a';
|
|
#elif U_CHARSET_FAMILY==U_EBCDIC_FAMILY
|
|
// EBCDIC: a-z (26 letters) is split into three ranges a-i (9 letters), j-r (9), s-z (8).
|
|
// https://en.wikipedia.org/wiki/EBCDIC_037#Codepage_layout
|
|
if (c <= 'i') { return c - 'a'; } // a-i --> 0-8
|
|
if (c < 'j') { return -1; }
|
|
if (c <= 'r') { return c - 'j' + 9; } // j-r --> 9..17
|
|
if (c < 's') { return -1; }
|
|
return c - 's' + 18; // s-z --> 18..25
|
|
#else
|
|
# error Unknown charset family!
|
|
#endif
|
|
}
|
|
|
|
U_NAMESPACE_END
|
|
|
|
#endif
|
|
|
|
/**
|
|
* Returns true if c == '@' is possible.
|
|
* The @ sign is variant, and the @ sign used on one
|
|
* EBCDIC machine won't be compiled the same way on other EBCDIC based machines.
|
|
* @internal
|
|
*/
|
|
U_CFUNC UBool
|
|
uprv_isEbcdicAtSign(char c);
|
|
|
|
/**
|
|
* \def uprv_isAtSign
|
|
* Returns true if c == '@' is possible.
|
|
* For ASCII, checks for exactly '@'. For EBCDIC, calls uprv_isEbcdicAtSign().
|
|
* @internal
|
|
*/
|
|
#if U_CHARSET_FAMILY==U_ASCII_FAMILY
|
|
# define uprv_isAtSign(c) ((c)=='@')
|
|
#elif U_CHARSET_FAMILY==U_EBCDIC_FAMILY
|
|
# define uprv_isAtSign(c) uprv_isEbcdicAtSign(c)
|
|
#else
|
|
# error Unknown charset family!
|
|
#endif
|
|
|
|
/**
|
|
* Compare two EBCDIC invariant-character strings in ASCII order.
|
|
* @internal
|
|
*/
|
|
U_INTERNAL int32_t U_EXPORT2
|
|
uprv_compareInvEbcdicAsAscii(const char *s1, const char *s2);
|
|
|
|
/**
|
|
* \def uprv_compareInvCharsAsAscii
|
|
* Compare two invariant-character strings in ASCII order.
|
|
* @internal
|
|
*/
|
|
#if U_CHARSET_FAMILY==U_ASCII_FAMILY
|
|
# define uprv_compareInvCharsAsAscii(s1, s2) uprv_strcmp(s1, s2)
|
|
#elif U_CHARSET_FAMILY==U_EBCDIC_FAMILY
|
|
# define uprv_compareInvCharsAsAscii(s1, s2) uprv_compareInvEbcdicAsAscii(s1, s2)
|
|
#else
|
|
# error Unknown charset family!
|
|
#endif
|
|
|
|
/**
|
|
* Converts an EBCDIC invariant character to ASCII.
|
|
* @internal
|
|
*/
|
|
U_INTERNAL char U_EXPORT2
|
|
uprv_ebcdicToAscii(char c);
|
|
|
|
/**
|
|
* \def uprv_invCharToAscii
|
|
* Converts an invariant character to ASCII.
|
|
* @internal
|
|
*/
|
|
#if U_CHARSET_FAMILY==U_ASCII_FAMILY
|
|
# define uprv_invCharToAscii(c) (c)
|
|
#elif U_CHARSET_FAMILY==U_EBCDIC_FAMILY
|
|
# define uprv_invCharToAscii(c) uprv_ebcdicToAscii(c)
|
|
#else
|
|
# error Unknown charset family!
|
|
#endif
|
|
|
|
/**
|
|
* Converts an EBCDIC invariant character to lowercase ASCII.
|
|
* @internal
|
|
*/
|
|
U_INTERNAL char U_EXPORT2
|
|
uprv_ebcdicToLowercaseAscii(char c);
|
|
|
|
/**
|
|
* \def uprv_invCharToLowercaseAscii
|
|
* Converts an invariant character to lowercase ASCII.
|
|
* @internal
|
|
*/
|
|
#if U_CHARSET_FAMILY==U_ASCII_FAMILY
|
|
# define uprv_invCharToLowercaseAscii uprv_asciitolower
|
|
#elif U_CHARSET_FAMILY==U_EBCDIC_FAMILY
|
|
# define uprv_invCharToLowercaseAscii uprv_ebcdicToLowercaseAscii
|
|
#else
|
|
# error Unknown charset family!
|
|
#endif
|
|
|
|
/**
|
|
* Copy EBCDIC to ASCII
|
|
* @internal
|
|
* @see uprv_strncpy
|
|
*/
|
|
U_INTERNAL uint8_t* U_EXPORT2
|
|
uprv_aestrncpy(uint8_t *dst, const uint8_t *src, int32_t n);
|
|
|
|
|
|
/**
|
|
* Copy ASCII to EBCDIC
|
|
* @internal
|
|
* @see uprv_strncpy
|
|
*/
|
|
U_INTERNAL uint8_t* U_EXPORT2
|
|
uprv_eastrncpy(uint8_t *dst, const uint8_t *src, int32_t n);
|
|
|
|
|
|
|
|
#endif
|