1 1.5 agc /* $NetBSD: decode.c,v 1.5 2003/10/13 14:34:25 agc Exp $ */ 2 1.2 perry 3 1.1 cjs /* 4 1.5 agc * Copyright (c) 1988 Mark Nudelman 5 1.1 cjs * Copyright (c) 1988, 1993 6 1.1 cjs * The Regents of the University of California. All rights reserved. 7 1.1 cjs * 8 1.1 cjs * Redistribution and use in source and binary forms, with or without 9 1.1 cjs * modification, are permitted provided that the following conditions 10 1.1 cjs * are met: 11 1.1 cjs * 1. Redistributions of source code must retain the above copyright 12 1.1 cjs * notice, this list of conditions and the following disclaimer. 13 1.1 cjs * 2. Redistributions in binary form must reproduce the above copyright 14 1.1 cjs * notice, this list of conditions and the following disclaimer in the 15 1.1 cjs * documentation and/or other materials provided with the distribution. 16 1.4 agc * 3. Neither the name of the University nor the names of its contributors 17 1.4 agc * may be used to endorse or promote products derived from this software 18 1.4 agc * without specific prior written permission. 19 1.4 agc * 20 1.4 agc * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 21 1.4 agc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 1.4 agc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 1.4 agc * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 24 1.4 agc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25 1.4 agc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26 1.4 agc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27 1.4 agc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28 1.4 agc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29 1.4 agc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 1.4 agc * SUCH DAMAGE. 31 1.4 agc */ 32 1.4 agc 33 1.3 christos #include <sys/cdefs.h> 34 1.1 cjs #ifndef lint 35 1.3 christos #if 0 36 1.1 cjs static char sccsid[] = "@(#)decode.c 8.1 (Berkeley) 6/6/93"; 37 1.3 christos #else 38 1.5 agc __RCSID("$NetBSD: decode.c,v 1.5 2003/10/13 14:34:25 agc Exp $"); 39 1.3 christos #endif 40 1.1 cjs #endif /* not lint */ 41 1.1 cjs 42 1.1 cjs /* 43 1.1 cjs * Routines to decode user commands. 44 1.1 cjs * 45 1.1 cjs * This is all table driven. 46 1.1 cjs * A command table is a sequence of command descriptors. 47 1.1 cjs * Each command descriptor is a sequence of bytes with the following format: 48 1.1 cjs * <c1><c2>...<cN><0><action> 49 1.1 cjs * The characters c1,c2,...,cN are the command string; that is, 50 1.1 cjs * the characters which the user must type. 51 1.1 cjs * It is terminated by a null <0> byte. 52 1.1 cjs * The byte after the null byte is the action code associated 53 1.1 cjs * with the command string. 54 1.1 cjs * 55 1.1 cjs * The default commands are described by cmdtable. 56 1.1 cjs */ 57 1.1 cjs 58 1.1 cjs #include <sys/param.h> 59 1.1 cjs #include <sys/file.h> 60 1.1 cjs #include <stdio.h> 61 1.3 christos 62 1.3 christos #include "less.h" 63 1.3 christos #include "extern.h" 64 1.1 cjs 65 1.1 cjs /* 66 1.1 cjs * Command table is ordered roughly according to expected 67 1.1 cjs * frequency of use, so the common commands are near the beginning. 68 1.1 cjs */ 69 1.1 cjs #define CONTROL(c) ((c)&037) 70 1.1 cjs 71 1.1 cjs static char cmdtable[] = { 72 1.1 cjs '\r',0, A_F_LINE, 73 1.1 cjs '\n',0, A_F_LINE, 74 1.1 cjs 'j',0, A_F_LINE, 75 1.1 cjs 'k',0, A_B_LINE, 76 1.1 cjs 'd',0, A_F_SCROLL, 77 1.1 cjs CONTROL('D'),0, A_F_SCROLL, 78 1.1 cjs 'u',0, A_B_SCROLL, 79 1.1 cjs CONTROL('U'),0, A_B_SCROLL, 80 1.1 cjs ' ',0, A_F_SCREEN, 81 1.1 cjs 'f',0, A_F_SCREEN, 82 1.1 cjs CONTROL('F'),0, A_F_SCREEN, 83 1.1 cjs 'b',0, A_B_SCREEN, 84 1.1 cjs CONTROL('B'),0, A_B_SCREEN, 85 1.1 cjs 'R',0, A_FREPAINT, 86 1.1 cjs 'r',0, A_REPAINT, 87 1.1 cjs CONTROL('L'),0, A_REPAINT, 88 1.1 cjs 'g',0, A_GOLINE, 89 1.1 cjs 'p',0, A_PERCENT, 90 1.1 cjs '%',0, A_PERCENT, 91 1.1 cjs 'G',0, A_GOEND, 92 1.1 cjs '0',0, A_DIGIT, 93 1.1 cjs '1',0, A_DIGIT, 94 1.1 cjs '2',0, A_DIGIT, 95 1.1 cjs '3',0, A_DIGIT, 96 1.1 cjs '4',0, A_DIGIT, 97 1.1 cjs '5',0, A_DIGIT, 98 1.1 cjs '6',0, A_DIGIT, 99 1.1 cjs '7',0, A_DIGIT, 100 1.1 cjs '8',0, A_DIGIT, 101 1.1 cjs '9',0, A_DIGIT, 102 1.1 cjs 103 1.1 cjs '=',0, A_STAT, 104 1.1 cjs CONTROL('G'),0, A_STAT, 105 1.1 cjs '/',0, A_F_SEARCH, 106 1.1 cjs '?',0, A_B_SEARCH, 107 1.1 cjs 'n',0, A_AGAIN_SEARCH, 108 1.1 cjs 'm',0, A_SETMARK, 109 1.1 cjs '\'',0, A_GOMARK, 110 1.1 cjs 'E',0, A_EXAMINE, 111 1.1 cjs 'N',0, A_NEXT_FILE, 112 1.1 cjs ':','n',0, A_NEXT_FILE, 113 1.1 cjs 'P',0, A_PREV_FILE, 114 1.1 cjs ':','p',0, A_PREV_FILE, 115 1.1 cjs 'v',0, A_VISUAL, 116 1.1 cjs 117 1.1 cjs 'h',0, A_HELP, 118 1.1 cjs 'q',0, A_QUIT, 119 1.1 cjs ':','q',0, A_QUIT, 120 1.1 cjs ':','t',0, A_TAGFILE, 121 1.1 cjs ':', 'a', 0, A_FILE_LIST, 122 1.1 cjs 'Z','Z',0, A_QUIT, 123 1.1 cjs }; 124 1.1 cjs 125 1.1 cjs char *cmdendtable = cmdtable + sizeof(cmdtable); 126 1.1 cjs 127 1.1 cjs #define MAX_CMDLEN 16 128 1.1 cjs 129 1.1 cjs static char kbuf[MAX_CMDLEN+1]; 130 1.1 cjs static char *kp = kbuf; 131 1.1 cjs 132 1.1 cjs /* 133 1.1 cjs * Indicate that we're not in a prefix command 134 1.1 cjs * by resetting the command buffer pointer. 135 1.1 cjs */ 136 1.3 christos void 137 1.1 cjs noprefix() 138 1.1 cjs { 139 1.1 cjs kp = kbuf; 140 1.1 cjs } 141 1.1 cjs 142 1.1 cjs /* 143 1.1 cjs * Decode a command character and return the associated action. 144 1.1 cjs */ 145 1.3 christos int 146 1.1 cjs cmd_decode(c) 147 1.1 cjs int c; 148 1.1 cjs { 149 1.3 christos int action = A_INVALID; 150 1.1 cjs 151 1.1 cjs /* 152 1.1 cjs * Append the new command character to the command string in kbuf. 153 1.1 cjs */ 154 1.1 cjs *kp++ = c; 155 1.1 cjs *kp = '\0'; 156 1.1 cjs 157 1.1 cjs action = cmd_search(cmdtable, cmdendtable); 158 1.1 cjs 159 1.1 cjs /* This is not a prefix character. */ 160 1.1 cjs if (action != A_PREFIX) 161 1.1 cjs noprefix(); 162 1.1 cjs return(action); 163 1.1 cjs } 164 1.1 cjs 165 1.1 cjs /* 166 1.1 cjs * Search a command table for the current command string (in kbuf). 167 1.1 cjs */ 168 1.3 christos int 169 1.1 cjs cmd_search(table, endtable) 170 1.1 cjs char *table; 171 1.1 cjs char *endtable; 172 1.1 cjs { 173 1.3 christos char *p, *q; 174 1.1 cjs 175 1.1 cjs for (p = table, q = kbuf; p < endtable; p++, q++) { 176 1.1 cjs if (*p == *q) { 177 1.1 cjs /* 178 1.1 cjs * Current characters match. 179 1.1 cjs * If we're at the end of the string, we've found it. 180 1.1 cjs * Return the action code, which is the character 181 1.1 cjs * after the null at the end of the string 182 1.1 cjs * in the command table. 183 1.1 cjs */ 184 1.1 cjs if (*p == '\0') 185 1.1 cjs return(p[1]); 186 1.1 cjs } 187 1.1 cjs else if (*q == '\0') { 188 1.1 cjs /* 189 1.1 cjs * Hit the end of the user's command, 190 1.1 cjs * but not the end of the string in the command table. 191 1.1 cjs * The user's command is incomplete. 192 1.1 cjs */ 193 1.1 cjs return(A_PREFIX); 194 1.1 cjs } else { 195 1.1 cjs /* 196 1.1 cjs * Not a match. 197 1.1 cjs * Skip ahead to the next command in the 198 1.1 cjs * command table, and reset the pointer 199 1.1 cjs * to the user's command. 200 1.1 cjs */ 201 1.1 cjs while (*p++ != '\0'); 202 1.1 cjs q = kbuf-1; 203 1.1 cjs } 204 1.1 cjs } 205 1.1 cjs /* 206 1.1 cjs * No match found in the entire command table. 207 1.1 cjs */ 208 1.1 cjs return(A_INVALID); 209 1.1 cjs } 210