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 10 #include "multibyte.h" 11 12 #ifdef USE_WIDECHAR 13 #define FILE2INT5(sp,buf,n,nlen,w,wlen) \ 14 sp->conv.file2int(sp, n, nlen, &buf, &wlen, &w) 15 #define INT2FILE(sp,w,wlen,n,nlen) \ 16 sp->conv.int2file(sp, w, wlen, &sp->cw, &nlen, &n) 17 #define CHAR2INT5(sp,buf,n,nlen,w,wlen) \ 18 sp->conv.sys2int(sp, n, nlen, &buf, &wlen, &w) 19 #define INT2CHAR(sp,w,wlen,n,nlen) \ 20 sp->conv.int2sys(sp, w, wlen, &sp->cw, &nlen, &n) 21 #define INPUT2INT5(sp,cw,n,nlen,w,wlen) \ 22 sp->conv.input2int(sp, n, nlen, &(cw), &wlen, &w) 23 #define CONST 24 #define INTISWIDE(c) (wctob(c) == EOF) 25 #define CHAR_WIDTH(sp, ch) wcwidth(ch) 26 #define CAN_PRINT(sp, ch) (CHAR_WIDTH(sp, ch) > 0) 27 #else 28 #define FILE2INT5(sp,buf,n,nlen,w,wlen) \ 29 (w = n, wlen = nlen, 0) 30 #define INT2FILE(sp,w,wlen,n,nlen) \ 31 (n = w, nlen = wlen, 0) 32 #define CHAR2INT5(sp,buf,n,nlen,w,wlen) \ 33 (w = n, wlen = nlen, 0) 34 #define INT2CHAR(sp,w,wlen,n,nlen) \ 35 (n = w, nlen = wlen, 0) 36 #define INPUT2INT5(sp,buf,n,nlen,w,wlen) \ 37 (w = n, wlen = nlen, 0) 38 #define CONST const 39 #define INTISWIDE(c) 0 40 #define CHAR_WIDTH(sp, ch) 1 41 #define CAN_PRINT(sp, ch) isprint(ch) 42 #endif 43 #define FILE2INT(sp,n,nlen,w,wlen) \ 44 FILE2INT5(sp,sp->cw,n,nlen,w,wlen) 45 #define CHAR2INT(sp,n,nlen,w,wlen) \ 46 CHAR2INT5(sp,sp->cw,n,nlen,w,wlen) 47 48 /* The maximum number of columns any character can take up on a screen. */ 49 #define MAX_CHARACTER_COLUMNS 7 50 51 /* 52 * Event types. 53 * 54 * The program structure depends on the event loop being able to return 55 * E_EOF/E_ERR multiple times -- eventually enough things will end due 56 * to the events that vi will reach the command level for the screen, at 57 * which point the exit flags will be set and vi will exit. 58 */ 59 typedef enum { 60 E_NOTUSED = 0, /* Not set. */ 61 E_CHARACTER, /* Input character: e_c set. */ 62 E_EOF, /* End of input (NOT ^D). */ 63 E_ERR, /* Input error. */ 64 E_INTERRUPT, /* Interrupt. */ 65 E_REPAINT, /* Repaint: e_flno, e_tlno set. */ 66 E_SIGHUP, /* SIGHUP. */ 67 E_SIGTERM, /* SIGTERM. */ 68 E_STRING, /* Input string: e_csp, e_len set. */ 69 E_TIMEOUT, /* Timeout. */ 70 E_WRESIZE, /* Window resize. */ 71 } e_event_t; 72 73 /* 74 * Character values. 75 */ 76 typedef enum { 77 K_NOTUSED = 0, /* Not set. */ 78 K_BACKSLASH, /* \ */ 79 K_CARAT, /* ^ */ 80 K_CNTRLD, /* ^D */ 81 K_CNTRLR, /* ^R */ 82 K_CNTRLT, /* ^T */ 83 K_CNTRLZ, /* ^Z */ 84 K_COLON, /* : */ 85 K_CR, /* \r */ 86 K_ESCAPE, /* ^[ */ 87 K_FORMFEED, /* \f */ 88 K_HEXCHAR, /* ^X */ 89 K_NL, /* \n */ 90 K_RIGHTBRACE, /* } */ 91 K_RIGHTPAREN, /* ) */ 92 K_TAB, /* \t */ 93 K_VERASE, /* set from tty: default ^H */ 94 K_VKILL, /* set from tty: default ^U */ 95 K_VLNEXT, /* set from tty: default ^V */ 96 K_VWERASE, /* set from tty: default ^W */ 97 K_ZERO /* 0 */ 98 } e_key_t; 99 100 struct _event { 101 TAILQ_ENTRY(_event) q; /* Linked list of events. */ 102 e_event_t e_event; /* Event type. */ 103 union { 104 struct { /* Input character. */ 105 CHAR_T c; /* Character. */ 106 e_key_t value; /* Key type. */ 107 108 #define CH_ABBREVIATED 0x01 /* Character is from an abbreviation. */ 109 #define CH_MAPPED 0x02 /* Character is from a map. */ 110 #define CH_NOMAP 0x04 /* Do not map the character. */ 111 #define CH_QUOTED 0x08 /* Character is already quoted. */ 112 u_int8_t flags; 113 } _e_ch; 114 #define e_ch _u_event._e_ch /* !!! The structure, not the char. */ 115 #define e_c _u_event._e_ch.c 116 #define e_value _u_event._e_ch.value 117 #define e_flags _u_event._e_ch.flags 118 119 struct { /* Screen position, size. */ 120 size_t lno1; /* Line number. */ 121 size_t cno1; /* Column number. */ 122 size_t lno2; /* Line number. */ 123 size_t cno2; /* Column number. */ 124 } _e_mark; 125 #define e_lno _u_event._e_mark.lno1 /* Single location. */ 126 #define e_cno _u_event._e_mark.cno1 127 #define e_flno _u_event._e_mark.lno1 /* Text region. */ 128 #define e_fcno _u_event._e_mark.cno1 129 #define e_tlno _u_event._e_mark.lno2 130 #define e_tcno _u_event._e_mark.cno2 131 132 struct { /* Input string. */ 133 CHAR_T *asp; /* Allocated string. */ 134 CHAR_T *csp; /* String. */ 135 size_t len; /* String length. */ 136 } _e_str; 137 #define e_asp _u_event._e_str.asp 138 #define e_csp _u_event._e_str.csp 139 #define e_len _u_event._e_str.len 140 } _u_event; 141 }; 142 143 typedef struct _keylist { 144 e_key_t value; /* Special value. */ 145 int ch; /* Key. */ 146 } KEYLIST; 147 extern KEYLIST keylist[]; 148 149 /* Return if more keys in queue. */ 150 #define KEYS_WAITING(sp) ((sp)->gp->i_cnt != 0) 151 #define MAPPED_KEYS_WAITING(sp) \ 152 (KEYS_WAITING(sp) && \ 153 F_ISSET(&sp->gp->i_event[sp->gp->i_next].e_ch, CH_MAPPED)) 154 155 /* 156 * Ex/vi commands are generally separated by whitespace characters. We 157 * can't use the standard isspace(3) macro because it returns true for 158 * characters like ^K in the ASCII character set. The POSIX isblank(3) 159 * has the same problem for non-ASCII locale, so we need a standalone one. 160 */ 161 162 static __inline int 163 cmdskip(CHAR_T ch) 164 { 165 return ch == ' ' || ch == '\t'; 166 } 167 168 /* The "standard" tab width, for displaying things to users. */ 169 #define STANDARD_TAB 6 170 171 /* Various special characters, messages. */ 172 #define CH_BSEARCH '?' /* Backward search prompt. */ 173 #define CH_CURSOR ' ' /* Cursor character. */ 174 #define CH_ENDMARK '$' /* End of a range. */ 175 #define CH_EXPROMPT ':' /* Ex prompt. */ 176 #define CH_FSEARCH '/' /* Forward search prompt. */ 177 #define CH_HEX '\030' /* Leading hex character. */ 178 #define CH_LITERAL '\026' /* ASCII ^V. */ 179 #define CH_NO 'n' /* No. */ 180 #define CH_NOT_DIGIT 'a' /* A non-isdigit() character. */ 181 #define CH_QUIT 'q' /* Quit. */ 182 #define CH_YES 'y' /* Yes. */ 183 184 /* 185 * Checking for interrupts means that we look at the bit that gets set if the 186 * screen code supports asynchronous events, and call back into the event code 187 * so that non-asynchronous screens get a chance to post the interrupt. 188 * 189 * INTERRUPT_CHECK is the number of lines "operated" on before checking for 190 * interrupts. 191 */ 192 #define INTERRUPT_CHECK 100 193 #define INTERRUPTED(sp) \ 194 (F_ISSET((sp)->gp, G_INTERRUPTED) || \ 195 (!v_event_get(sp, NULL, 0, EC_INTERRUPT) && \ 196 F_ISSET((sp)->gp, G_INTERRUPTED))) 197 #define CLR_INTERRUPT(sp) \ 198 F_CLR((sp)->gp, G_INTERRUPTED) 199 200 /* Flags describing types of characters being requested. */ 201 #define EC_INTERRUPT 0x001 /* Checking for interrupts. */ 202 #define EC_MAPCOMMAND 0x002 /* Apply the command map. */ 203 #define EC_MAPINPUT 0x004 /* Apply the input map. */ 204 #define EC_MAPNODIGIT 0x008 /* Return to a digit. */ 205 #define EC_QUOTED 0x010 /* Try to quote next character */ 206 #define EC_RAW 0x020 /* Any next character. XXX: not used. */ 207 #define EC_TIMEOUT 0x040 /* Timeout to next character. */ 208 209 /* Flags describing text input special cases. */ 210 #define TXT_ADDNEWLINE 0x00000001 /* Replay starts on a new line. */ 211 #define TXT_AICHARS 0x00000002 /* Leading autoindent chars. */ 212 #define TXT_ALTWERASE 0x00000004 /* Option: altwerase. */ 213 #define TXT_APPENDEOL 0x00000008 /* Appending after EOL. */ 214 #define TXT_AUTOINDENT 0x00000010 /* Autoindent set this line. */ 215 #define TXT_BACKSLASH 0x00000020 /* Backslashes escape characters. */ 216 #define TXT_BEAUTIFY 0x00000040 /* Only printable characters. */ 217 #define TXT_BS 0x00000080 /* Backspace returns the buffer. */ 218 #define TXT_CEDIT 0x00000100 /* Can return TERM_CEDIT. */ 219 #define TXT_CNTRLD 0x00000200 /* Control-D is a command. */ 220 #define TXT_CNTRLT 0x00000400 /* Control-T is an indent special. */ 221 #define TXT_CR 0x00000800 /* CR returns the buffer. */ 222 #define TXT_DOTTERM 0x00001000 /* Leading '.' terminates the input. */ 223 #define TXT_EMARK 0x00002000 /* End of replacement mark. */ 224 #define TXT_EOFCHAR 0x00004000 /* ICANON set, return EOF character. */ 225 #define TXT_ESCAPE 0x00008000 /* Escape returns the buffer. */ 226 #define TXT_FILEC 0x00010000 /* Option: filec. */ 227 #define TXT_INFOLINE 0x00020000 /* Editing the info line. */ 228 #define TXT_MAPINPUT 0x00040000 /* Apply the input map. */ 229 #define TXT_NLECHO 0x00080000 /* Echo the newline. */ 230 #define TXT_NUMBER 0x00100000 /* Number the line. */ 231 #define TXT_OVERWRITE 0x00200000 /* Overwrite characters. */ 232 #define TXT_PROMPT 0x00400000 /* Display a prompt. */ 233 #define TXT_RECORD 0x00800000 /* Record for replay. */ 234 #define TXT_REPLACE 0x01000000 /* Replace; don't delete overwrite. */ 235 #define TXT_REPLAY 0x02000000 /* Replay the last input. */ 236 #define TXT_RESOLVE 0x04000000 /* Resolve the text into the file. */ 237 #define TXT_SEARCHINCR 0x08000000 /* Incremental search. */ 238 #define TXT_SHOWMATCH 0x10000000 /* Option: showmatch. */ 239 #define TXT_TTYWERASE 0x20000000 /* Option: ttywerase. */ 240 #define TXT_WRAPMARGIN 0x40000000 /* Option: wrapmargin. */ 241