]>
Commit | Line | Data |
---|---|---|
726f6388 JA |
1 | /* chardefs.h -- Character definitions for readline. */ |
2 | ||
3 | /* Copyright (C) 1994 Free Software Foundation, Inc. | |
4 | ||
5 | This file is part of the GNU Readline Library, a library for | |
6 | reading lines of text with interactive input and history editing. | |
7 | ||
8 | The GNU Readline Library is free software; you can redistribute it | |
9 | and/or modify it under the terms of the GNU General Public License | |
bb70624e | 10 | as published by the Free Software Foundation; either version 2, or |
726f6388 JA |
11 | (at your option) any later version. |
12 | ||
13 | The GNU Readline Library is distributed in the hope that it will be | |
14 | useful, but WITHOUT ANY WARRANTY; without even the implied warranty | |
15 | of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 | GNU General Public License for more details. | |
17 | ||
18 | The GNU General Public License is often shipped with GNU software, and | |
19 | is generally kept in a file called COPYING or LICENSE. If you do not | |
20 | have a copy of the license, write to the Free Software Foundation, | |
bb70624e | 21 | 59 Temple Place, Suite 330, Boston, MA 02111 USA. */ |
726f6388 | 22 | |
ccc6cda3 JA |
23 | #ifndef _CHARDEFS_H_ |
24 | #define _CHARDEFS_H_ | |
726f6388 JA |
25 | |
26 | #include <ctype.h> | |
27 | ||
ccc6cda3 JA |
28 | #if defined (HAVE_CONFIG_H) |
29 | # if defined (HAVE_STRING_H) | |
30 | # include <string.h> | |
31 | # else | |
32 | # include <strings.h> | |
33 | # endif /* HAVE_STRING_H */ | |
726f6388 | 34 | #else |
ccc6cda3 JA |
35 | # include <string.h> |
36 | #endif /* !HAVE_CONFIG_H */ | |
726f6388 JA |
37 | |
38 | #ifndef whitespace | |
39 | #define whitespace(c) (((c) == ' ') || ((c) == '\t')) | |
40 | #endif | |
41 | ||
42 | #ifdef CTRL | |
43 | #undef CTRL | |
44 | #endif | |
45 | ||
46 | /* Some character stuff. */ | |
47 | #define control_character_threshold 0x020 /* Smaller than this is control. */ | |
48 | #define control_character_mask 0x1f /* 0x20 - 1 */ | |
49 | #define meta_character_threshold 0x07f /* Larger than this is Meta. */ | |
50 | #define control_character_bit 0x40 /* 0x000000, must be off. */ | |
51 | #define meta_character_bit 0x080 /* x0000000, must be on. */ | |
52 | #define largest_char 255 /* Largest character value. */ | |
53 | ||
28ef6c31 | 54 | #define CTRL_CHAR(c) ((c) < control_character_threshold && (((c) & 0x80) == 0)) |
726f6388 JA |
55 | #define META_CHAR(c) ((c) > meta_character_threshold && (c) <= largest_char) |
56 | ||
57 | #define CTRL(c) ((c) & control_character_mask) | |
58 | #define META(c) ((c) | meta_character_bit) | |
59 | ||
60 | #define UNMETA(c) ((c) & (~meta_character_bit)) | |
ccc6cda3 | 61 | #define UNCTRL(c) _rl_to_upper(((c)|control_character_bit)) |
726f6388 JA |
62 | |
63 | /* Old versions | |
ccc6cda3 JA |
64 | #define _rl_lowercase_p(c) (((c) > ('a' - 1) && (c) < ('z' + 1))) |
65 | #define _rl_uppercase_p(c) (((c) > ('A' - 1) && (c) < ('Z' + 1))) | |
66 | #define _rl_digit_p(c) ((c) >= '0' && (c) <= '9') | |
726f6388 JA |
67 | */ |
68 | ||
ccc6cda3 JA |
69 | #define _rl_lowercase_p(c) (islower(c)) |
70 | #define _rl_uppercase_p(c) (isupper(c)) | |
71 | #define _rl_digit_p(x) (isdigit (x)) | |
726f6388 | 72 | |
ccc6cda3 JA |
73 | #define _rl_pure_alphabetic(c) (_rl_lowercase_p(c) || _rl_uppercase_p(c)) |
74 | #define ALPHABETIC(c) (_rl_lowercase_p(c) || _rl_uppercase_p(c) || _rl_digit_p(c)) | |
726f6388 JA |
75 | |
76 | /* Old versions | |
ccc6cda3 JA |
77 | # define _rl_to_upper(c) (_rl_lowercase_p(c) ? ((c) - 32) : (c)) |
78 | # define _rl_to_lower(c) (_rl_uppercase_p(c) ? ((c) + 32) : (c)) | |
726f6388 JA |
79 | */ |
80 | ||
ccc6cda3 JA |
81 | #ifndef _rl_to_upper |
82 | # define _rl_to_upper(c) (islower(c) ? toupper(c) : (c)) | |
83 | # define _rl_to_lower(c) (isupper(c) ? tolower(c) : (c)) | |
726f6388 JA |
84 | #endif |
85 | ||
ccc6cda3 JA |
86 | #ifndef _rl_digit_value |
87 | #define _rl_digit_value(x) ((x) - '0') | |
726f6388 JA |
88 | #endif |
89 | ||
90 | #ifndef NEWLINE | |
91 | #define NEWLINE '\n' | |
92 | #endif | |
93 | ||
94 | #ifndef RETURN | |
95 | #define RETURN CTRL('M') | |
96 | #endif | |
97 | ||
98 | #ifndef RUBOUT | |
99 | #define RUBOUT 0x7f | |
100 | #endif | |
101 | ||
102 | #ifndef TAB | |
103 | #define TAB '\t' | |
104 | #endif | |
105 | ||
106 | #ifdef ABORT_CHAR | |
107 | #undef ABORT_CHAR | |
108 | #endif | |
109 | #define ABORT_CHAR CTRL('G') | |
110 | ||
111 | #ifdef PAGE | |
112 | #undef PAGE | |
113 | #endif | |
114 | #define PAGE CTRL('L') | |
115 | ||
116 | #ifdef SPACE | |
117 | #undef SPACE | |
118 | #endif | |
119 | #define SPACE ' ' /* XXX - was 0x20 */ | |
120 | ||
121 | #ifdef ESC | |
122 | #undef ESC | |
123 | #endif | |
726f6388 JA |
124 | #define ESC CTRL('[') |
125 | ||
cce855bc JA |
126 | #ifndef ISOCTAL |
127 | #define ISOCTAL(c) ((c) >= '0' && (c) <= '7') | |
128 | #endif | |
129 | #define OCTVALUE(c) ((c) - '0') | |
130 | ||
131 | #ifndef isxdigit | |
132 | # define isxdigit(c) (isdigit((c)) || ((c) >= 'a' && (c) <= 'f') || ((c) >= 'A' && (c) <= 'F')) | |
133 | #endif | |
134 | ||
135 | #define HEXVALUE(c) \ | |
136 | (((c) >= 'a' && (c) <= 'f') \ | |
137 | ? (c)-'a'+10 \ | |
138 | : (c) >= 'A' && (c) <= 'F' ? (c)-'A'+10 : (c)-'0') | |
139 | ||
ccc6cda3 | 140 | #endif /* _CHARDEFS_H_ */ |