prompt.c revision 1.27 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