contrib/libreadline/chardefs.h

   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
  10    as published by the Free Software Foundation; either version 2, or
  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,
  21    59 Temple Place, Suite 330, Boston, MA 02111 USA. */
  22
  23 #ifndef _CHARDEFS_H_
  24 #define _CHARDEFS_H_
  25
  26 #include <ctype.h>
  27
  28 #if defined (HAVE_CONFIG_H)
  29 #  if defined (HAVE_STRING_H)
  30 #    if ! defined (STDC_HEADERS) && defined (HAVE_MEMORY_H)
  31 #      include <memory.h>
  32 #    endif
  33 #    include <string.h>
  34 #  endif /* HAVE_STRING_H */
  35 #  if defined (HAVE_STRINGS_H)
  36 #    include <strings.h>
  37 #  endif /* HAVE_STRINGS_H */
  38 #else
  39 #  include <string.h>
  40 #endif /* !HAVE_CONFIG_H */
  41
  42 #ifndef whitespace
  43 #define whitespace(c) (((c) == ' ') || ((c) == '\t'))
  44 #endif
  45
  46 #ifdef CTRL
  47 #  undef CTRL
  48 #endif
  49 #ifdef UNCTRL
  50 #  undef UNCTRL
  51 #endif
  52
  53 /* Some character stuff. */
  54 #define control_character_threshold 0x020   /* Smaller than this is control. */
  55 #define control_character_mask 0x1f         /* 0x20 - 1 */
  56 #define meta_character_threshold 0x07f      /* Larger than this is Meta. */
  57 #define control_character_bit 0x40          /* 0x000000, must be off. */
  58 #define meta_character_bit 0x080            /* x0000000, must be on. */
  59 #define largest_char 255                    /* Largest character value. */
  60
  61 #define CTRL_CHAR(c) ((c) < control_character_threshold && (((c) & 0x80) == 0))
  62 #define META_CHAR(c) ((c) > meta_character_threshold && (c) <= largest_char)
  63
  64 #define CTRL(c) ((c) & control_character_mask)
  65 #define META(c) ((c) | meta_character_bit)
  66
  67 #define UNMETA(c) ((c) & (~meta_character_bit))
  68 #define UNCTRL(c) _rl_to_upper(((c)|control_character_bit))
  69
  70 #if defined STDC_HEADERS || (!defined (isascii) && !defined (HAVE_ISASCII))
  71 #  define IN_CTYPE_DOMAIN(c) 1
  72 #else
  73 #  define IN_CTYPE_DOMAIN(c) isascii(c)
  74 #endif
  75
  76 #if !defined (isxdigit) && !defined (HAVE_ISXDIGIT)
  77 #  define isxdigit(c)   (isdigit((c)) || ((c) >= 'a' && (c) <= 'f') || ((c) >= 'A' && (c) <= 'F'))
  78 #endif
  79
  80 #if defined (CTYPE_NON_ASCII)
  81 #  define NON_NEGATIVE(c) 1
  82 #else
  83 #  define NON_NEGATIVE(c) ((unsigned char)(c) == (c))
  84 #endif
  85
  86 /* Some systems define these; we want our definitions. */
  87 #undef ISPRINT
  88
  89 /* Beware:  these only work with single-byte ASCII characters. */
  90
  91 #define ISALNUM(c)      (IN_CTYPE_DOMAIN (c) && isalnum (c))
  92 #define ISALPHA(c)      (IN_CTYPE_DOMAIN (c) && isalpha (c))
  93 #define ISDIGIT(c)      (IN_CTYPE_DOMAIN (c) && isdigit (c))
  94 #define ISLOWER(c)      (IN_CTYPE_DOMAIN (c) && islower (c))
  95 #define ISPRINT(c)      (IN_CTYPE_DOMAIN (c) && isprint (c))
  96 #define ISUPPER(c)      (IN_CTYPE_DOMAIN (c) && isupper (c))
  97 #define ISXDIGIT(c)     (IN_CTYPE_DOMAIN (c) && isxdigit (c))
  98
  99 #define _rl_lowercase_p(c)      (NON_NEGATIVE(c) && ISLOWER(c))
 100 #define _rl_uppercase_p(c)      (NON_NEGATIVE(c) && ISUPPER(c))
 101 #define _rl_digit_p(c)          ((c) >= '0' && (c) <= '9')
 102
 103 #define _rl_pure_alphabetic(c)  (NON_NEGATIVE(c) && ISALPHA(c))
 104 #define ALPHABETIC(c)           (NON_NEGATIVE(c) && ISALNUM(c))
 105
 106 #ifndef _rl_to_upper
 107 #  define _rl_to_upper(c) (_rl_lowercase_p(c) ? toupper((unsigned char)c) : (c))
 108 #  define _rl_to_lower(c) (_rl_uppercase_p(c) ? tolower((unsigned char)c) : (c))
 109 #endif
 110
 111 #ifndef _rl_digit_value
 112 #  define _rl_digit_value(x) ((x) - '0')
 113 #endif
 114
 115 #ifndef _rl_isident
 116 #  define _rl_isident(c) (ISALNUM(c) || (c) == '_')
 117 #endif
 118
 119 #ifndef ISOCTAL
 120 #  define ISOCTAL(c)    ((c) >= '0' && (c) <= '7')
 121 #endif
 122 #define OCTVALUE(c)     ((c) - '0')
 123
 124 #define HEXVALUE(c) \
 125   (((c) >= 'a' && (c) <= 'f') \
 126         ? (c)-'a'+10 \
 127         : (c) >= 'A' && (c) <= 'F' ? (c)-'A'+10 : (c)-'0')
 128
 129 #ifndef NEWLINE
 130 #define NEWLINE '\n'
 131 #endif
 132
 133 #ifndef RETURN
 134 #define RETURN CTRL('M')
 135 #endif
 136
 137 #ifndef RUBOUT
 138 #define RUBOUT 0x7f
 139 #endif
 140
 141 #ifndef TAB
 142 #define TAB '\t'
 143 #endif
 144
 145 #ifdef ABORT_CHAR
 146 #undef ABORT_CHAR
 147 #endif
 148 #define ABORT_CHAR CTRL('G')
 149
 150 #ifdef PAGE
 151 #undef PAGE
 152 #endif
 153 #define PAGE CTRL('L')
 154
 155 #ifdef SPACE
 156 #undef SPACE
 157 #endif
 158 #define SPACE ' '       /* XXX - was 0x20 */
 159
 160 #ifdef ESC
 161 #undef ESC
 162 #endif
 163 #define ESC CTRL('[')
 164
 165 #endif  /* _CHARDEFS_H_ */