1 1.27 christos /* $NetBSD: prompt.c,v 1.27 2017/06/27 23:25:13 christos Exp $ */ 2 1.2 lukem 3 1.1 cgd /*- 4 1.1 cgd * Copyright (c) 1992, 1993 5 1.1 cgd * The Regents of the University of California. All rights reserved. 6 1.1 cgd * 7 1.1 cgd * This code is derived from software contributed to Berkeley by 8 1.1 cgd * Christos Zoulas of Cornell University. 9 1.1 cgd * 10 1.1 cgd * Redistribution and use in source and binary forms, with or without 11 1.1 cgd * modification, are permitted provided that the following conditions 12 1.1 cgd * are met: 13 1.1 cgd * 1. Redistributions of source code must retain the above copyright 14 1.1 cgd * notice, this list of conditions and the following disclaimer. 15 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright 16 1.1 cgd * notice, this list of conditions and the following disclaimer in the 17 1.1 cgd * documentation and/or other materials provided with the distribution. 18 1.11 agc * 3. Neither the name of the University nor the names of its contributors 19 1.1 cgd * may be used to endorse or promote products derived from this software 20 1.1 cgd * without specific prior written permission. 21 1.1 cgd * 22 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 23 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 26 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 27 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 28 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 30 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 31 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 32 1.1 cgd * SUCH DAMAGE. 33 1.1 cgd */ 34 1.1 cgd 35 1.9 christos #include "config.h" 36 1.1 cgd #if !defined(lint) && !defined(SCCSID) 37 1.2 lukem #if 0 38 1.1 cgd static char sccsid[] = "@(#)prompt.c 8.1 (Berkeley) 6/4/93"; 39 1.2 lukem #else 40 1.27 christos __RCSID("$NetBSD: prompt.c,v 1.27 2017/06/27 23:25:13 christos Exp $"); 41 1.2 lukem #endif 42 1.1 cgd #endif /* not lint && not SCCSID */ 43 1.1 cgd 44 1.1 cgd /* 45 1.1 cgd * prompt.c: Prompt printing functions 46 1.1 cgd */ 47 1.1 cgd #include <stdio.h> 48 1.1 cgd #include "el.h" 49 1.1 cgd 50 1.25 christos static wchar_t *prompt_default(EditLine *); 51 1.25 christos static wchar_t *prompt_default_r(EditLine *); 52 1.1 cgd 53 1.1 cgd /* prompt_default(): 54 1.1 cgd * Just a default prompt, in case the user did not provide one 55 1.1 cgd */ 56 1.25 christos static wchar_t * 57 1.1 cgd /*ARGSUSED*/ 58 1.10 christos prompt_default(EditLine *el __attribute__((__unused__))) 59 1.1 cgd { 60 1.24 christos static wchar_t a[3] = L"? "; 61 1.7 lukem 62 1.20 christos return a; 63 1.1 cgd } 64 1.1 cgd 65 1.7 lukem 66 1.6 lukem /* prompt_default_r(): 67 1.6 lukem * Just a default rprompt, in case the user did not provide one 68 1.6 lukem */ 69 1.25 christos static wchar_t * 70 1.6 lukem /*ARGSUSED*/ 71 1.10 christos prompt_default_r(EditLine *el __attribute__((__unused__))) 72 1.6 lukem { 73 1.24 christos static wchar_t a[1] = L""; 74 1.7 lukem 75 1.20 christos return a; 76 1.6 lukem } 77 1.6 lukem 78 1.1 cgd 79 1.1 cgd /* prompt_print(): 80 1.1 cgd * Print the prompt and update the prompt position. 81 1.1 cgd */ 82 1.26 christos libedit_private void 83 1.7 lukem prompt_print(EditLine *el, int op) 84 1.7 lukem { 85 1.7 lukem el_prompt_t *elp; 86 1.24 christos wchar_t *p; 87 1.7 lukem 88 1.7 lukem if (op == EL_PROMPT) 89 1.7 lukem elp = &el->el_prompt; 90 1.7 lukem else 91 1.7 lukem elp = &el->el_rprompt; 92 1.15 christos 93 1.17 christos if (elp->p_wide) 94 1.17 christos p = (*elp->p_func)(el); 95 1.17 christos else 96 1.18 christos p = ct_decode_string((char *)(void *)(*elp->p_func)(el), 97 1.17 christos &el->el_scratch); 98 1.17 christos 99 1.17 christos for (; *p; p++) { 100 1.14 christos if (elp->p_ignore == *p) { 101 1.27 christos wchar_t *litstart = ++p; 102 1.27 christos while (*p && *p != elp->p_ignore) 103 1.27 christos p++; 104 1.27 christos if (!*p || !p[1]) { 105 1.27 christos // XXX: We lose the last literal 106 1.27 christos break; 107 1.27 christos } 108 1.27 christos re_putliteral(el, litstart, p++); 109 1.14 christos continue; 110 1.14 christos } 111 1.27 christos re_putc(el, *p, 1); 112 1.14 christos } 113 1.7 lukem 114 1.7 lukem elp->p_pos.v = el->el_refresh.r_cursor.v; 115 1.7 lukem elp->p_pos.h = el->el_refresh.r_cursor.h; 116 1.7 lukem } 117 1.1 cgd 118 1.1 cgd 119 1.1 cgd /* prompt_init(): 120 1.1 cgd * Initialize the prompt stuff 121 1.1 cgd */ 122 1.26 christos libedit_private int 123 1.7 lukem prompt_init(EditLine *el) 124 1.1 cgd { 125 1.7 lukem 126 1.7 lukem el->el_prompt.p_func = prompt_default; 127 1.7 lukem el->el_prompt.p_pos.v = 0; 128 1.7 lukem el->el_prompt.p_pos.h = 0; 129 1.14 christos el->el_prompt.p_ignore = '\0'; 130 1.7 lukem el->el_rprompt.p_func = prompt_default_r; 131 1.7 lukem el->el_rprompt.p_pos.v = 0; 132 1.7 lukem el->el_rprompt.p_pos.h = 0; 133 1.14 christos el->el_rprompt.p_ignore = '\0'; 134 1.14 christos return 0; 135 1.7 lukem } 136 1.1 cgd 137 1.1 cgd 138 1.1 cgd /* prompt_end(): 139 1.1 cgd * Clean up the prompt stuff 140 1.1 cgd */ 141 1.26 christos libedit_private void 142 1.5 simonb /*ARGSUSED*/ 143 1.10 christos prompt_end(EditLine *el __attribute__((__unused__))) 144 1.1 cgd { 145 1.7 lukem } 146 1.1 cgd 147 1.1 cgd 148 1.1 cgd /* prompt_set(): 149 1.1 cgd * Install a prompt printing function 150 1.1 cgd */ 151 1.26 christos libedit_private int 152 1.24 christos prompt_set(EditLine *el, el_pfunc_t prf, wchar_t c, int op, int wide) 153 1.7 lukem { 154 1.7 lukem el_prompt_t *p; 155 1.7 lukem 156 1.16 christos if (op == EL_PROMPT || op == EL_PROMPT_ESC) 157 1.7 lukem p = &el->el_prompt; 158 1.6 lukem else 159 1.7 lukem p = &el->el_rprompt; 160 1.14 christos 161 1.7 lukem if (prf == NULL) { 162 1.16 christos if (op == EL_PROMPT || op == EL_PROMPT_ESC) 163 1.7 lukem p->p_func = prompt_default; 164 1.7 lukem else 165 1.7 lukem p->p_func = prompt_default_r; 166 1.17 christos } else { 167 1.7 lukem p->p_func = prf; 168 1.17 christos } 169 1.14 christos 170 1.14 christos p->p_ignore = c; 171 1.14 christos 172 1.7 lukem p->p_pos.v = 0; 173 1.7 lukem p->p_pos.h = 0; 174 1.17 christos p->p_wide = wide; 175 1.14 christos 176 1.14 christos return 0; 177 1.7 lukem } 178 1.4 lukem 179 1.4 lukem 180 1.4 lukem /* prompt_get(): 181 1.4 lukem * Retrieve the prompt printing function 182 1.4 lukem */ 183 1.26 christos libedit_private int 184 1.24 christos prompt_get(EditLine *el, el_pfunc_t *prf, wchar_t *c, int op) 185 1.7 lukem { 186 1.14 christos el_prompt_t *p; 187 1.7 lukem 188 1.7 lukem if (prf == NULL) 189 1.14 christos return -1; 190 1.14 christos 191 1.7 lukem if (op == EL_PROMPT) 192 1.14 christos p = &el->el_prompt; 193 1.7 lukem else 194 1.14 christos p = &el->el_rprompt; 195 1.14 christos 196 1.17 christos if (prf) 197 1.17 christos *prf = p->p_func; 198 1.14 christos if (c) 199 1.14 christos *c = p->p_ignore; 200 1.14 christos 201 1.14 christos return 0; 202 1.7 lukem } 203