diff options
Diffstat (limited to 'include/ruby/impl/ctype.h')
| -rw-r--r-- | include/ruby/impl/ctype.h | 203 |
1 files changed, 203 insertions, 0 deletions
diff --git a/include/ruby/impl/ctype.h b/include/ruby/impl/ctype.h new file mode 100644 index 0000000000..76927bf9a1 --- /dev/null +++ b/include/ruby/impl/ctype.h @@ -0,0 +1,203 @@ +#ifndef RUBY3_CTYPE_H /*-*-C++-*-vi:se ft=cpp:*/ +#define RUBY3_CTYPE_H +/** + * @file + * @author Ruby developers <ruby-core@ruby-lang.org> + * @copyright This file is a part of the programming language Ruby. + * Permission is hereby granted, to either redistribute and/or + * modify this file, provided that the conditions mentioned in the + * file COPYING are met. Consult the file for details. + * @warning Symbols prefixed with either `RUBY3` or `ruby3` are + * implementation details. Don't take them as canon. They could + * rapidly appear then vanish. The name (path) of this header file + * is also an implementation detail. Do not expect it to persist + * at the place it is now. Developers are free to move it anywhere + * anytime at will. + * @note To ruby-core: remember that this header can be possibly + * recursively included from extension libraries written in C++. + * Do not expect for instance `__VA_ARGS__` is always available. + * We assume C99 for ruby itself but we don't assume languages of + * extension libraries. They could be written in C++98. + * @brief Our own, locale independent, character handling routines. + */ +#include "ruby/3/config.h" + +#ifdef STDC_HEADERS +# include <ctype.h> +#endif + +#include "ruby/3/attr/artificial.h" +#include "ruby/3/attr/const.h" +#include "ruby/3/attr/constexpr.h" +#include "ruby/3/dllexport.h" + +#ifndef ISPRINT +# define ISASCII rb_isascii +# define ISPRINT rb_isprint +# define ISGRAPH rb_isgraph +# define ISSPACE rb_isspace +# define ISUPPER rb_isupper +# define ISLOWER rb_islower +# define ISALNUM rb_isalnum +# define ISALPHA rb_isalpha +# define ISDIGIT rb_isdigit +# define ISXDIGIT rb_isxdigit +# define ISBLANK rb_isblank +# define ISCNTRL rb_iscntrl +# define ISPUNCT rb_ispunct +#endif + +#define TOUPPER rb_toupper +#define TOLOWER rb_tolower +#define STRCASECMP st_locale_insensitive_strcasecmp +#define STRNCASECMP st_locale_insensitive_strncasecmp +#define STRTOUL ruby_strtoul + +RUBY3_SYMBOL_EXPORT_BEGIN() +/* locale insensitive functions */ +int st_locale_insensitive_strcasecmp(const char *s1, const char *s2); +int st_locale_insensitive_strncasecmp(const char *s1, const char *s2, size_t n); +unsigned long ruby_strtoul(const char *str, char **endptr, int base); +RUBY3_SYMBOL_EXPORT_END() + +/* + * We are making the functions below to return `int` instead of `bool`. They + * have been as such since their birth at 5f237d79033b2109afb768bc889611fa9630. + */ + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_isascii(int c) +{ + return '\0' <= c && c <= '\x7f'; +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_isupper(int c) +{ + return 'A' <= c && c <= 'Z'; +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_islower(int c) +{ + return 'a' <= c && c <= 'z'; +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_isalpha(int c) +{ + return rb_isupper(c) || rb_islower(c); +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_isdigit(int c) +{ + return '0' <= c && c <= '9'; +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_isalnum(int c) +{ + return rb_isalpha(c) || rb_isdigit(c); +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_isxdigit(int c) +{ + return rb_isdigit(c) || ('A' <= c && c <= 'F') || ('a' <= c && c <= 'f'); +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_isblank(int c) +{ + return c == ' ' || c == '\t'; +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_isspace(int c) +{ + return c == ' ' || ('\t' <= c && c <= '\r'); +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_iscntrl(int c) +{ + return ('\0' <= c && c < ' ') || c == '\x7f'; +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_isprint(int c) +{ + return ' ' <= c && c <= '\x7e'; +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_ispunct(int c) +{ + return !rb_isalnum(c); +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_isgraph(int c) +{ + return '!' <= c && c <= '\x7e'; +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_tolower(int c) +{ + return rb_isupper(c) ? (c|0x20) : c; +} + +RUBY3_ATTR_CONST() +RUBY3_ATTR_CONSTEXPR(CXX11) +RUBY3_ATTR_ARTIFICIAL() +static inline int +rb_toupper(int c) +{ + return rb_islower(c) ? (c&0x5f) : c; +} + +#endif /* RUBY3_CTYPE_H */ |