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
38static 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
50static wchar_t	*prompt_default(EditLine *);
51static wchar_t	*prompt_default_r(EditLine *);
52
53/* prompt_default():
54 *	Just a default prompt, in case the user did not provide one
55 */
56static wchar_t *
57/*ARGSUSED*/
58prompt_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 */
69static wchar_t *
70/*ARGSUSED*/
71prompt_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 */
82libedit_private void
83prompt_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 */
122libedit_private int
123prompt_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 */
141libedit_private void
142/*ARGSUSED*/
143prompt_end(EditLine *el __attribute__((__unused__)))
144{
145}
146
147
148/* prompt_set():
149 *	Install a prompt printing function
150 */
151libedit_private int
152prompt_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 */
183libedit_private int
184prompt_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