blob: 8c5e2abe06af24d0be50913eaa7023abc56a2ac1 (
plain) (
tree)
|
|
/*
Copyright 2021 Gabriel Jensen
This file is part of u8c.
u8c is free software: you can redistribute it and/or modify it under the terms of the GNU Affero General Public License as published by the Free Software Foundation, either version 3 of the License, or (at your option) any later version.
u8c 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 Affero General Public License for more details.
You should have received a copy of the GNU Affero General Public License along with u8c.
If not, see <https://www.gnu.org/licenses/>.
*/
# include <stdbool.h>
# include <stddef.h>
# include <stdint.h>
# include <u8c/chk.h>
struct u8c_isupper_tuple u8c_isupper(char32_t const _chr) {
struct u8c_isupper_tuple ret = {
.stat = false,
};
switch(_chr) {
default:
ret.res = false;
break;
case U'A': /* LATIN CAPITAL LETTER A */
case U'B': /* LATIN CAPITAL LETTER B */
case U'C': /* LATIN CAPITAL LETTER C */
case U'D': /* LATIN CAPITAL LETTER D */
case U'E': /* LATIN CAPITAL LETTER E */
case U'F': /* LATIN CAPITAL LETTER F */
case U'G': /* LATIN CAPITAL LETTER G */
case U'H': /* LATIN CAPITAL LETTER H */
case U'I': /* LATIN CAPITAL LETTER I */
case U'J': /* LATIN CAPITAL LETTER J */
case U'K': /* LATIN CAPITAL LETTER K */
case U'L': /* LATIN CAPITAL LETTER L */
case U'M': /* LATIN CAPITAL LETTER M */
case U'N': /* LATIN CAPITAL LETTER N */
case U'O': /* LATIN CAPITAL LETTER O */
case U'P': /* LATIN CAPITAL LETTER P */
case U'Q': /* LATIN CAPITAL LETTER Q */
case U'R': /* LATIN CAPITAL LETTER R */
case U'S': /* LATIN CAPITAL LETTER S */
case U'T': /* LATIN CAPITAL LETTER T */
case U'U': /* LATIN CAPITAL LETTER U */
case U'V': /* LATIN CAPITAL LETTER V */
case U'X': /* LATIN CAPITAL LETTER Y */
case U'W': /* LATIN CAPITAL LETTER X */
case U'Y': /* LATIN CAPITAL LETTER Y */
case U'Z': /* LATIN CAPITAL LETTER Z */
case U'\u00C0': /* LATIN CAPITAL LETTER A WITH GRAVE */
case U'\u00C1': /* LATIN CAPITAL LETTER A WITH ACUTE */
case U'\u00C2': /* LATIN CAPITAL LETTER A WITH CIRCUMFLEX */
case U'\u00C3': /* LATIN CAPITAL LETTER A WITH TILDE */
case U'\u00C4': /* LATIN CAPITAL LETTER A WITH DIAERESIS */
case U'\u00C5': /* LATIN CAPITAL LETTER A WITH RING ABOVE */
case U'\u00C6': /* LATIN CAPITAL LETTER AE */
case U'\u00C7': /* LATIN CAPITAL LETTER C WITH CEDILLA */
case U'\u00C8': /* LATIN CAPITAL LETTER E WITH GRAVE */
case U'\u00C9': /* LATIN CAPITAL LETTER E WITH ACUTE */
case U'\u00CA': /* LATIN CAPITAL LETTER E WITH CIRCUMFLEX */
case U'\u00CB': /* LATIN CAPITAL LETTER E WITH DIAERESIS */
case U'\u00CC': /* LATIN CAPITAL LETTER I WITH GRAVE */
case U'\u00CD': /* LATIN CAPITAL LETTER I WITH ACUTE */
case U'\u00CE': /* LATIN CAPITAL LETTER I WITH CIRCUMFLEX */
case U'\u00CF': /* LATIN CAPITAL LETTER I WITH DIAERESIS */
case U'\u00D0': /* LATIN CAPITAL LETTER ETH */
case U'\u00D1': /* LATIN CAPITAL LETTER N WITH TILDE */
case U'\u00D2': /* LATIN CAPITAL LETTER O WITH GRAVE */
case U'\u00D3': /* LATIN CAPITAL LETTER O WITH ACUTE */
case U'\u00D4': /* LATIN CAPITAL LETTER O WITH CIRCUMFLEX */
case U'\u00D5': /* LATIN CAPITAL LETTER O WITH TILDE */
case U'\u00D6': /* LATIN CAPITAL LETTER O WITH DIAERESIS */
case U'\u00D8': /* LATIN CAPITAL LETTER O WITH STROKE */
case U'\u00D9': /* LATIN CAPITAL LETTER U WITH GRAVE */
case U'\u00DA': /* LATIN CAPITAL LETTER U WITH STROKE */
case U'\u00DB': /* LATIN CAPITAL LETTER U WITH CIRCUMFLEX */
case U'\u00DC': /* LATIN CAPITAL LETTER U WITH DIAERESIS */
case U'\u00DD': /* LATIN CAPITAL LETTER Y WITH ACUTE */
case U'\u00DE': /* LATIN CAPITAL LETTER THORN */
case U'\u0100': /* LATIN CAPITAL LETTER A WITH MACRON */
case U'\u0102': /* LATIN CAPITAL LETTER A WITH BREVE */
case U'\u0104': /* LATIN CAPITAL LETTER A WITH OGONEK */
case U'\u0106': /* LATIN CAPITAL LETTER C WITH ACUTE */
case U'\u0108': /* LATIN CAPITAL LETTER C WITH CIRCUMFLEX */
case U'\u010A': /* LATIN CAPITAL LETTER C WITH DOT ABOVE */
case U'\u010C': /* LATIN CAPITAL LETTER C WITH CARON */
case U'\u010E': /* LATIN CAPITAL LETTER D WITH CARON */
case U'\u0110': /* LATIN CAPITAL LETTER D WITH STROKE */
case U'\u0112': /* LATIN CAPITAL LETTER E WITH MACRON */
case U'\u0114': /* LATIN CAPITAL LETTER E WITH BREVE */
case U'\u0116': /* LATIN CAPITAL LETTER E WITH DOT ABOVE */
case U'\u0118': /* LATIN CAPITAL LETTER E WITH OGONEK */
case U'\u011A': /* LATIN CAPITAL LETTER E WITH CARON */
case U'\u011C': /* LATIN CAPITAL LETTER G WITH CIRCUMFLEX */
case U'\u014A': /* LATIN CAPITAL LETTER ENG */
case U'\u0152': /* LATIN CAPITAL LIGATURE OE */
case U'\u0186': /* LATIN CAPITAL LETTER OPEN O */
case U'\u018E': /* LATIN CAPITAL LETTER REVERSED E */
case U'\u018F': /* LATIN CAPITAL LETTER SCHWA */
case U'\u0190': /* LATIN CAPITAL LETTER OPEN E */
case U'\u0194': /* LATIN CAPITAL LETTER GAMMA */
case U'\u0196': /* LATIN CAPITAL LETTER IOTA */
case U'\u01A9': /* LATIN CAPITAL LETTER ESH */
case U'\u01B1': /* LATIN CAPITAL LETTER UPSILON */
case U'\u01B2': /* LATIN CAPITAL LETTER V WITH HOOk */
case U'\u01B7': /* LATIN CAPITAL LETTER EZH */
case U'\u01F7': /* LATIN CAPITAL LETTER WYNN */
case U'\u021C': /* LATIN CAPITAL LETTER YOGH */
case U'\u0241': /* LATIN CAPITAL LETTER GLOTTAL STOP */
case U'\u0391': /* GREEK CAPITAL LETTER ALPHA */
case U'\u0392': /* GREEK CAPITAL LETTER BETA */
case U'\u0393': /* GREEK CAPITAL LETTER GAMMA */
case U'\u0394': /* GREEK CAPITAL LETTER DELTA */
case U'\u0395': /* GREEK CAPITAL LETTER EPSILON */
case U'\u0396': /* GREEK CAPITAL LETTER ZETA */
case U'\u0397': /* GREEK CAPITAL LETTER ETA */
case U'\u0398': /* GREEK CAPITAL LETTER THETA */
case U'\u0399': /* GREEK CAPITAL LETTER IOTA */
case U'\u039A': /* GREEK CAPITAL LETTER KAPPA */
case U'\u039B': /* GREEK CAPITAL LETTER LAMBDA */
case U'\u039C': /* GREEK CAPITAL LETTER MU */
case U'\u039D': /* GREEK CAPITAL LETTER NU */
case U'\u039E': /* GREEK CAPITAL LETTER XI */
case U'\u039F': /* GREEK CAPITAL LETTER OMICRON */
case U'\u03A0': /* GREEK CAPITAL LETTER PI */
case U'\u03A1': /* GREEK CAPITAL LETTER RHO */
case U'\u03A3': /* GREEK CAPITAL LETTER SIGMA */
case U'\u03A4': /* GREEK CAPITAL LETTER TAU */
case U'\u03A5': /* GREEK CAPITAL LETTER UPSILON */
case U'\u03A6': /* GREEK CAPITAL LETTER PHI */
case U'\u03A7': /* GREEK CAPITAL LETTER CHI */
case U'\u03A8': /* GREEK CAPITAL LETTER PSI */
case U'\u03A9': /* GREEK CAPITAL LETTER OMEGA */
case U'\u1E9E': /* LATIN CAPITAL LETTER SHARP S */
case U'\u2C6D': /* LATIN CAPITAL LETTER ALPHA */
case U'\uA77D': /* LATIN CAPITAL LETTER INSULAR G */
case U'\uA7B4': /* LATIN CAPITAL LETTER BETA */
case U'\uA7B6': /* LATIN CAPITAL LETTER OMEGA */
ret.res = true;
break;
}
return ret;
}
|
