1 /* $NetBSD: menuutils.c,v 1.3 2008/12/14 18:46:33 christos Exp $ */ 2 3 /* 4 * Copyright (c) 1996, 1997 5 * Matthias Drochner. All rights reserved. 6 * Copyright (c) 1996, 1997 7 * Perry E. Metzger. All rights reserved. 8 * Copyright (c) 1997 9 * Jason R. Thorpe. All rights reserved 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 3. All advertising materials mentioning features or use of this software 20 * must display the following acknowledgements: 21 * This product includes software developed for the NetBSD Project 22 * by Matthias Drochner. 23 * This product includes software developed for the NetBSD Project 24 * by Perry E. Metzger. 25 * 4. The names of the authors may not be used to endorse or promote products 26 * derived from this software without specific prior written permission. 27 * 28 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 29 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 30 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 31 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 32 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 33 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 34 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 35 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 36 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 37 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 38 */ 39 40 #include <lib/libkern/libkern.h> 41 #include <lib/libsa/stand.h> 42 43 #include "libi386.h" 44 45 void 46 docommand(char *arg) 47 { 48 char *options; 49 int i; 50 51 options = gettrailer(arg); 52 53 for (i = 0; commands[i].c_name != NULL; i++) { 54 if (strcmp(arg, commands[i].c_name) == 0) { 55 (*commands[i].c_fn)(options); 56 return; 57 } 58 } 59 60 printf("unknown command\n"); 61 command_help(NULL); 62 } 63 64 void 65 prompt(int allowreturn) 66 { 67 char input[80]; 68 69 for (;;) { 70 char *c = input; 71 72 input[0] = '\0'; 73 printf("> "); 74 editline(input, sizeof(input), NULL); 75 76 /* 77 * Skip leading whitespace. 78 */ 79 while (*c == ' ') 80 c++; 81 if (allowreturn && !strcmp(c, "menu")) 82 break; 83 if (*c) 84 docommand(c); 85 } 86 } 87 88 void 89 bootmenu(void) 90 { 91 prompt(0); 92 } 93 94 /* Derived from libsa gets(). */ 95 void 96 editline(char *buf, size_t size, char *input) 97 { 98 int c, i, pos, len = 0; 99 100 /* If an initial input has been given, copy and print this first. */ 101 if (input != NULL) { 102 while (*input && len < size - 1) 103 putchar(buf[len++] = *input++); 104 } 105 pos = len; 106 107 for (;;) { 108 c = getchar_ex(); 109 switch (c & 0177) { 110 case '\0': 111 switch (c) { 112 case 0x4b00: /* Left arrow: move cursor to left. */ 113 if (pos > 0) { 114 putchar('\b'); 115 pos--; 116 } 117 break; 118 case 0x4d00: /* Right arrow: move cursor to right. */ 119 if (pos < len) putchar(buf[pos++]); 120 break; 121 } 122 break; 123 case 'b' & 037: /* Ctrl+B: move cursor to left. */ 124 if (pos > 0) { 125 putchar('\b'); 126 pos--; 127 } 128 break; 129 case 'f' & 037: /* Ctrl+F: move cursor to right. */ 130 if (pos < len) putchar(buf[pos++]); 131 break; 132 case 'a' & 037: /* Ctrl+A: move cursor to start of line. */ 133 for ( ; pos > 0; pos--) putchar('\b'); 134 break; 135 case 'e' & 037: /* Ctrl+E: move cursor to end of line. */ 136 for ( ; pos < len; pos++) putchar(buf[pos]); 137 break; 138 case '\n': /* Enter: return line. */ 139 case '\r': 140 for ( ; pos < len; pos++) putchar(buf[pos]); 141 buf[len] = '\0'; 142 putchar('\n'); 143 return; 144 #if HASH_ERASE 145 case '#': 146 #endif 147 case '\b': /* Backspace: erase character before cursor. */ 148 case '\177': 149 if (pos > 0) { 150 pos--; 151 len--; 152 putchar('\b'); 153 for (i = pos; i < len; i++) 154 putchar(buf[i] = buf[i + 1]); 155 putchar(' '); 156 for (i = pos; i < len; i++) putchar('\b'); 157 putchar('\b'); 158 } 159 break; 160 case 'r' & 037: /* Ctrl+R: reprint line. */ 161 putchar('\n'); 162 for (i = 0; i < len; i++) putchar(buf[i]); 163 for (i = len; i > pos; i--) putchar('\b'); 164 break; 165 #if AT_ERASE 166 case '@': 167 #endif 168 case 'u' & 037: /* Ctrl+U: clear entire line. */ 169 case 'w' & 037: 170 for ( ; pos > 0; pos--) putchar('\b'); 171 for ( ; pos < len; pos++) putchar(' '); 172 for ( ; pos > 0; pos--) putchar('\b'); 173 len = 0; 174 break; 175 case '\a': /* Ctrl+G: sound bell but do not store character. */ 176 putchar(c); 177 break; 178 case '\t': /* Tab: convert to single space. */ 179 c = ' '; 180 /*FALLTHROUGH*/ 181 default: /* Insert character at cursor position. */ 182 if (len < size - 1) { 183 for (i = len; i > pos; i--) 184 buf[i] = buf[i - 1]; 185 buf[pos] = c; 186 pos++; 187 len++; 188 putchar(c); 189 for (i = pos; i < len; i++) putchar(buf[i]); 190 for (i = pos; i < len; i++) putchar('\b'); 191 } else { 192 putchar('\a'); 193 } 194 break; 195 } 196 } 197 /*NOTREACHED*/ 198 } 199