1 /* $NetBSD: wsemul_vt100_keys.c,v 1.5 2001/11/13 06:17:47 lukem Exp $ */ 2 3 /* 4 * Copyright (c) 1998 5 * Matthias Drochner. All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed for the NetBSD Project 18 * by Matthias Drochner. 19 * 4. The name of the author may not be used to endorse or promote products 20 * derived from this software without specific prior written permission. 21 * 22 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 23 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 24 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 25 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 26 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 27 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 28 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 29 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 30 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 31 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 32 * 33 */ 34 35 #include <sys/cdefs.h> 36 __KERNEL_RCSID(0, "$NetBSD: wsemul_vt100_keys.c,v 1.5 2001/11/13 06:17:47 lukem Exp $"); 37 38 #include <sys/param.h> 39 #include <sys/systm.h> 40 41 #include <dev/wscons/wsdisplayvar.h> 42 #include <dev/wscons/wsksymvar.h> 43 #include <dev/wscons/wsksymdef.h> 44 #include <dev/wscons/wsemul_vt100var.h> 45 46 static char *vt100_fkeys[] = { 47 "\033[11~", /* F1 */ 48 "\033[12~", 49 "\033[13~", /* F1-F5 normally don't send codes */ 50 "\033[14~", 51 "\033[15~", /* F5 */ 52 "\033[17~", /* F6 */ 53 "\033[18~", 54 "\033[19~", 55 "\033[20~", 56 "\033[21~", 57 "\033[23~", /* VT100: ESC */ 58 "\033[24~", /* VT100: BS */ 59 "\033[25~", /* VT100: LF */ 60 "\033[26~", 61 "\033[28~", /* help */ 62 "\033[29~", /* do */ 63 "\033[31~", 64 "\033[32~", 65 "\033[33~", 66 "\033[34~", /* F20 */ 67 }; 68 69 static char *vt100_pfkeys[] = { 70 "\033OP", /* PF1 */ 71 "\033OQ", 72 "\033OR", 73 "\033OS", /* PF4 */ 74 }; 75 76 static char *vt100_numpad[] = { 77 "\033Op", /* KP 0 */ 78 "\033Oq", /* KP 1 */ 79 "\033Or", /* KP 2 */ 80 "\033Os", /* KP 3 */ 81 "\033Ot", /* KP 4 */ 82 "\033Ou", /* KP 5 */ 83 "\033Ov", /* KP 6 */ 84 "\033Ow", /* KP 7 */ 85 "\033Ox", /* KP 8 */ 86 "\033Oy", /* KP 9 */ 87 }; 88 89 int 90 wsemul_vt100_translate(void *cookie, keysym_t in, char **out) 91 { 92 struct wsemul_vt100_emuldata *edp = cookie; 93 static char c; 94 95 if (in >= KS_f1 && in <= KS_f20) { 96 *out = vt100_fkeys[in - KS_f1]; 97 return (5); 98 } 99 if (in >= KS_F1 && in <= KS_F20) { 100 *out = vt100_fkeys[in - KS_F1]; 101 return (5); 102 } 103 if (in >= KS_KP_F1 && in <= KS_KP_F4) { 104 *out = vt100_pfkeys[in - KS_KP_F1]; 105 return (3); 106 } 107 if (edp->flags & VTFL_APPLKEYPAD) { 108 if (in >= KS_KP_0 && in <= KS_KP_9) { 109 *out = vt100_numpad[in - KS_KP_0]; 110 return (3); 111 } 112 switch (in) { 113 case KS_KP_Tab: 114 *out = "\033OI"; 115 return (3); 116 case KS_KP_Enter: 117 *out = "\033OM"; 118 return (3); 119 case KS_KP_Multiply: 120 *out = "\033Oj"; 121 return (3); 122 case KS_KP_Add: 123 *out = "\033Ok"; 124 return (3); 125 case KS_KP_Separator: 126 *out = "\033Ol"; 127 return (3); 128 case KS_KP_Subtract: 129 *out = "\033Om"; 130 return (3); 131 case KS_KP_Decimal: 132 *out = "\033On"; 133 return (3); 134 case KS_KP_Divide: 135 *out = "\033Oo"; 136 return (3); 137 } 138 } else { 139 if (!(in & 0x80)) { 140 c = in & 0xff; /* turn into ASCII */ 141 *out = &c; 142 return (1); 143 } 144 } 145 switch (in) { 146 case KS_Help: 147 *out = vt100_fkeys[15 - 1]; 148 return (5); 149 case KS_Execute: /* "Do" */ 150 *out = vt100_fkeys[16 - 1]; 151 return (5); 152 case KS_Find: 153 *out = "\033[1~"; 154 return (4); 155 case KS_Insert: 156 case KS_KP_Insert: 157 *out = "\033[2~"; 158 return (4); 159 case KS_KP_Delete: 160 *out = "\033[3~"; 161 return (4); 162 case KS_Select: 163 *out = "\033[4~"; 164 return (4); 165 case KS_Prior: 166 case KS_KP_Prior: 167 *out = "\033[5~"; 168 return (4); 169 case KS_Next: 170 case KS_KP_Next: 171 *out = "\033[6~"; 172 return (4); 173 case KS_Home: 174 case KS_KP_Home: 175 *out = "\033[7~"; 176 return (4); 177 case KS_End: 178 case KS_KP_End: 179 *out = "\033[8~"; 180 return (4); 181 case KS_Up: 182 case KS_KP_Up: 183 if (edp->flags & VTFL_APPLCURSOR) 184 *out = "\033OA"; 185 else 186 *out = "\033[A"; 187 return (3); 188 case KS_Down: 189 case KS_KP_Down: 190 if (edp->flags & VTFL_APPLCURSOR) 191 *out = "\033OB"; 192 else 193 *out = "\033[B"; 194 return (3); 195 case KS_Left: 196 case KS_KP_Left: 197 if (edp->flags & VTFL_APPLCURSOR) 198 *out = "\033OD"; 199 else 200 *out = "\033[D"; 201 return (3); 202 case KS_Right: 203 case KS_KP_Right: 204 if (edp->flags & VTFL_APPLCURSOR) 205 *out = "\033OC"; 206 else 207 *out = "\033[C"; 208 return (3); 209 } 210 return (0); 211 } 212