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