common/key.h

   1 /*-
   2  * Copyright (c) 1991, 1993, 1994
   3  *      The Regents of the University of California.  All rights reserved.
   4  * Copyright (c) 1991, 1993, 1994, 1995, 1996
   5  *      Keith Bostic.  All rights reserved.
   6  *
   7  * See the LICENSE file for redistribution information.
   8  *
   9  *      $Id: key.h,v 10.50 2001/06/28 17:53:58 skimo Exp $ (Berkeley) $Date: 2001/06/28 17:53:58 $
  10  */
  11
  12 #include "multibyte.h"
  13
  14 /*
  15  * Fundamental character types.
  16  *
  17  * CHAR_T       An integral type that can hold any character.
  18  * ARG_CHAR_T   The type of a CHAR_T when passed as an argument using
  19  *              traditional promotion rules.  It should also be able
  20  *              to be compared against any CHAR_T for equality without
  21  *              problems.
  22  * MAX_CHAR_T   The maximum value of any character.
  23  *
  24  * If no integral type can hold a character, don't even try the port.
  25  */
  26 typedef u_int           ARG_CHAR_T;
  27
  28 #ifdef USE_WIDECHAR
  29 #define FILE2INT5(sp,buf,n,nlen,w,wlen)                                     \
  30     sp->conv.file2int(sp, n, nlen, &buf, &wlen, &w)
  31 #define INT2FILE(sp,w,wlen,n,nlen)                                          \
  32     sp->conv.int2file(sp, w, wlen, &sp->wp->cw, &nlen, &n)
  33 #define CHAR2INT5(sp,buf,n,nlen,w,wlen)                                     \
  34     sp->conv.sys2int(sp, n, nlen, &buf, &wlen, &w)
  35 #define INT2CHAR(sp,w,wlen,n,nlen)                                          \
  36     sp->conv.int2sys(sp, w, wlen, &sp->wp->cw, &nlen, &n)
  37 #define INT2SYS(sp,w,wlen,n,nlen)                                           \
  38     sp->conv.int2sys(sp, w, wlen, &sp->wp->cw, &nlen, &n)
  39 #define INPUT2INT5(sp,cw,n,nlen,w,wlen)                                     \
  40     sp->conv.input2int(sp, n, nlen, &(cw), &wlen, &w)
  41 #define CONST
  42 #define ISCNTRL(ch) \
  43     iswcntrl((ch))
  44 #define ISDIGIT(ch) \
  45     iswdigit((ch))
  46 #define ISPRINT(ch) \
  47     iswprint((ch))
  48 #define ISBLANK(ch) \
  49     iswblank((ch))
  50 #define ISALPHA(ch) \
  51     iswalpha((ch))
  52 #define ISALNUM(ch) \
  53     iswalnum((ch))
  54 #define CHAR_WIDTH(sp, ch)  wcwidth(ch)
  55 #define INTISWIDE(c)    (!!(c >> 8))        /* XXX wrong name */
  56 #define WS              "%ls"
  57 #define WVS             "%*ls"
  58 #define WC              "%lc"
  59 #else
  60 #define FILE2INT5(sp,buf,n,nlen,w,wlen) \
  61     (w = n, wlen = nlen, 0)
  62 #define INT2FILE(sp,w,wlen,n,nlen) \
  63     (n = w, nlen = wlen, 0)
  64 #define CHAR2INT5(sp,buf,n,nlen,w,wlen) \
  65     (w = n, wlen = nlen, 0)
  66 #define INT2CHAR(sp,w,wlen,n,nlen) \
  67     (n = w, nlen = wlen, 0)
  68 #define INT2SYS(sp,w,wlen,n,nlen) \
  69     (n = w, nlen = wlen, 0)
  70 #define INPUT2INT5(sp,buf,n,nlen,w,wlen) \
  71     (w = n, wlen = nlen, 0)
  72 #define CONST const
  73 #define ISCNTRL(ch) \
  74     iscntrl((ch))
  75 #define ISDIGIT(ch) \
  76     isdigit((ch))
  77 #define ISPRINT(ch) \
  78     isprint((ch))
  79 #define ISBLANK(ch) \
  80     isblank((ch))
  81 #define ISALPHA(ch) \
  82     isalpha((ch))
  83 #define ISALNUM(ch) \
  84     isalnum((ch))
  85 #define INTISWIDE(c)        0
  86 #define CHAR_WIDTH(sp, ch)  1
  87 #define WS              "%s"
  88 #define WVS             "%*s"
  89 #define WC              "%c"
  90 #endif
  91 #define FILE2INT(sp,n,nlen,w,wlen)                                          \
  92     FILE2INT5(sp,sp->wp->cw,n,nlen,w,wlen)
  93 #define CHAR2INT(sp,n,nlen,w,wlen)                                          \
  94     CHAR2INT5(sp,sp->wp->cw,n,nlen,w,wlen)
  95
  96 #define MEMCPYW(to, from, n) \
  97     memcpy(to, from, (n) * sizeof(CHAR_T))
  98 #define MEMMOVEW(to, from, n) \
  99     memmove(to, from, (n) * sizeof(CHAR_T))
 100
 101 /* The maximum number of columns any character can take up on a screen. */
 102 #define MAX_CHARACTER_COLUMNS   4
 103
 104 /*
 105  * Event types.
 106  *
 107  * The program structure depends on the event loop being able to return
 108  * E_EOF/E_ERR multiple times -- eventually enough things will end due
 109  * to the events that vi will reach the command level for the screen, at
 110  * which point the exit flags will be set and vi will exit.
 111  */
 112 typedef enum {
 113         E_NOTUSED = 0,                  /* Not set. */
 114         E_CHARACTER,                    /* Input character: e_c set. */
 115         E_EOF,                          /* End of input (NOT ^D). */
 116         E_ERR,                          /* Input error. */
 117         E_INTERRUPT,                    /* Interrupt. */
 118         E_IPCOMMAND,                    /* IP command: e_ipcom set. */
 119         E_REPAINT,                      /* Repaint: e_flno, e_tlno set. */
 120         E_SIGHUP,                       /* SIGHUP. */
 121         E_SIGTERM,                      /* SIGTERM. */
 122         E_STRING,                       /* Input string: e_csp, e_len set. */
 123         E_TIMEOUT,                      /* Timeout. */
 124         E_WRESIZE,                      /* Window resize. */
 125         E_FLAGS                         /* Flags */
 126 } e_event_t;
 127
 128 /*
 129  * Character values.
 130  */
 131 typedef enum {
 132         K_NOTUSED = 0,                  /* Not set. */
 133         K_BACKSLASH,                    /*  \ */
 134         K_CARAT,                        /*  ^ */
 135         K_CNTRLD,                       /* ^D */
 136         K_CNTRLR,                       /* ^R */
 137         K_CNTRLT,                       /* ^T */
 138         K_CNTRLZ,                       /* ^Z */
 139         K_COLON,                        /*  : */
 140         K_CR,                           /* \r */
 141         K_ESCAPE,                       /* ^[ */
 142         K_FORMFEED,                     /* \f */
 143         K_HEXCHAR,                      /* ^X */
 144         K_NL,                           /* \n */
 145         K_RIGHTBRACE,                   /*  } */
 146         K_RIGHTPAREN,                   /*  ) */
 147         K_TAB,                          /* \t */
 148         K_VERASE,                       /* set from tty: default ^H */
 149         K_VKILL,                        /* set from tty: default ^U */
 150         K_VLNEXT,                       /* set from tty: default ^V */
 151         K_VWERASE,                      /* set from tty: default ^W */
 152         K_ZERO                          /*  0 */
 153 } e_key_t;
 154
 155 struct _event {
 156         TAILQ_ENTRY(_event) q;          /* Linked list of events. */
 157         e_event_t e_event;              /* Event type. */
 158         int       e_ipcom;              /* IP command. */
 159
 160 #define CH_ABBREVIATED  0x01            /* Character is from an abbreviation. */
 161 #define CH_MAPPED       0x02            /* Character is from a map. */
 162 #define CH_NOMAP        0x04            /* Do not map the character. */
 163 #define CH_QUOTED       0x08            /* Character is already quoted. */
 164         CHAR_T    e_c;                  /* Character. */
 165         e_key_t   e_value;              /* Key type. */
 166
 167 #define e_flags e_val1                  /* Flags. */
 168 #define e_lno   e_val1                  /* Single location. */
 169 #define e_cno   e_val2
 170 #define e_flno  e_val1                  /* Text region. */
 171 #define e_fcno  e_val2
 172 #define e_tlno  e_val3
 173 #define e_tcno  e_val4
 174         size_t    e_val1;               /* Value #1. */
 175         size_t    e_val2;               /* Value #2. */
 176         size_t    e_val3;               /* Value #3. */
 177         size_t    e_val4;               /* Value #4. */
 178
 179 #define e_csp   e_str1
 180 #define e_len   e_len1
 181         CHAR_T   *e_str1;               /* String #1. */
 182         size_t    e_len1;               /* String #1 length. */
 183         CHAR_T   *e_str2;               /* String #2. */
 184         size_t    e_len2;               /* String #2 length. */
 185 };
 186
 187 typedef struct _keylist {
 188         e_key_t value;                  /* Special value. */
 189         CHAR_T  ch;                     /* Key. */
 190 } KEYLIST;
 191 extern KEYLIST keylist[];
 192
 193                                         /* Return if more keys in queue. */
 194 #define KEYS_WAITING(sp)        ((sp)->wp->i_cnt != 0)
 195 #define MAPPED_KEYS_WAITING(sp)                                         \
 196         (KEYS_WAITING(sp) &&                                            \
 197             FL_ISSET((sp)->wp->i_event[(sp)->wp->i_next].e_flags, CH_MAPPED))
 198
 199 /*
 200  * Ex/vi commands are generally separated by whitespace characters.  We
 201  * can't use the standard isspace(3) macro because it returns true for
 202  * characters like ^K in the ASCII character set.  The 4.4BSD isblank(3)
 203  * macro does exactly what we want, but it's not portable yet.
 204  *
 205  * XXX
 206  * Note side effect, ch is evaluated multiple times.
 207  */
 208 #ifndef isblank
 209 #define isblank(ch)     ((ch) == ' ' || (ch) == '\t')
 210 #endif
 211
 212 /* The "standard" tab width, for displaying things to users. */
 213 #define STANDARD_TAB    6
 214
 215 /* Various special characters, messages. */
 216 #define CH_BSEARCH      '?'             /* Backward search prompt. */
 217 #define CH_CURSOR       ' '             /* Cursor character. */
 218 #define CH_ENDMARK      '$'             /* End of a range. */
 219 #define CH_EXPROMPT     ':'             /* Ex prompt. */
 220 #define CH_FSEARCH      '/'             /* Forward search prompt. */
 221 #define CH_HEX          '\030'          /* Leading hex character. */
 222 #define CH_LITERAL      '\026'          /* ASCII ^V. */
 223 #define CH_NO           'n'             /* No. */
 224 #define CH_NOT_DIGIT    'a'             /* A non-isdigit() character. */
 225 #define CH_QUIT         'q'             /* Quit. */
 226 #define CH_YES          'y'             /* Yes. */
 227
 228 /*
 229  * Checking for interrupts means that we look at the bit that gets set if the
 230  * screen code supports asynchronous events, and call back into the event code
 231  * so that non-asynchronous screens get a chance to post the interrupt.
 232  *
 233  * INTERRUPT_CHECK is the number of lines "operated" on before checking for
 234  * interrupts.
 235  */
 236 #define INTERRUPT_CHECK 100
 237 #define INTERRUPTED(sp)                                                 \
 238         (F_ISSET((sp)->gp, G_INTERRUPTED) ||                            \
 239         (!v_event_get(sp, NULL, 0, EC_INTERRUPT) &&                     \
 240         F_ISSET((sp)->gp, G_INTERRUPTED)))
 241 #define CLR_INTERRUPT(sp)                                               \
 242         F_CLR((sp)->gp, G_INTERRUPTED)
 243
 244 /* Flags describing types of characters being requested. */
 245 #define EC_INTERRUPT    0x001           /* Checking for interrupts. */
 246 #define EC_MAPCOMMAND   0x002           /* Apply the command map. */
 247 #define EC_MAPINPUT     0x004           /* Apply the input map. */
 248 #define EC_MAPNODIGIT   0x008           /* Return to a digit. */
 249 #define EC_QUOTED       0x010           /* Try to quote next character */
 250 #define EC_RAW          0x020           /* Any next character. XXX: not used. */
 251 #define EC_TIMEOUT      0x040           /* Timeout to next character. */
 252
 253 /* Flags describing text input special cases. */
 254 #define TXT_ADDNEWLINE  0x00000001      /* Replay starts on a new line. */
 255 #define TXT_AICHARS     0x00000002      /* Leading autoindent chars. */
 256 #define TXT_ALTWERASE   0x00000004      /* Option: altwerase. */
 257 #define TXT_APPENDEOL   0x00000008      /* Appending after EOL. */
 258 #define TXT_AUTOINDENT  0x00000010      /* Autoindent set this line. */
 259 #define TXT_BACKSLASH   0x00000020      /* Backslashes escape characters. */
 260 #define TXT_BEAUTIFY    0x00000040      /* Only printable characters. */
 261 #define TXT_BS          0x00000080      /* Backspace returns the buffer. */
 262 #define TXT_CEDIT       0x00000100      /* Can return TERM_CEDIT. */
 263 #define TXT_CNTRLD      0x00000200      /* Control-D is a command. */
 264 #define TXT_CNTRLT      0x00000400      /* Control-T is an indent special. */
 265 #define TXT_CR          0x00000800      /* CR returns the buffer. */
 266 #define TXT_DOTTERM     0x00001000      /* Leading '.' terminates the input. */
 267 #define TXT_EMARK       0x00002000      /* End of replacement mark. */
 268 #define TXT_EOFCHAR     0x00004000      /* ICANON set, return EOF character. */
 269 #define TXT_ESCAPE      0x00008000      /* Escape returns the buffer. */
 270 #define TXT_FILEC       0x00010000      /* Option: filec. */
 271 #define TXT_INFOLINE    0x00020000      /* Editing the info line. */
 272 #define TXT_MAPINPUT    0x00040000      /* Apply the input map. */
 273 #define TXT_NLECHO      0x00080000      /* Echo the newline. */
 274 #define TXT_NUMBER      0x00100000      /* Number the line. */
 275 #define TXT_OVERWRITE   0x00200000      /* Overwrite characters. */
 276 #define TXT_PROMPT      0x00400000      /* Display a prompt. */
 277 #define TXT_RECORD      0x00800000      /* Record for replay. */
 278 #define TXT_REPLACE     0x01000000      /* Replace; don't delete overwrite. */
 279 #define TXT_REPLAY      0x02000000      /* Replay the last input. */
 280 #define TXT_RESOLVE     0x04000000      /* Resolve the text into the file. */
 281 #define TXT_SEARCHINCR  0x08000000      /* Incremental search. */
 282 #define TXT_SHOWMATCH   0x10000000      /* Option: showmatch. */
 283 #define TXT_TTYWERASE   0x20000000      /* Option: ttywerase. */
 284 #define TXT_WRAPMARGIN  0x40000000      /* Option: wrapmargin. */