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