prompt.c revision 1.18 1 1.18 christos /* $NetBSD: prompt.c,v 1.18 2009/12/31 15:58:26 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.18 christos __RCSID("$NetBSD: prompt.c,v 1.18 2009/12/31 15:58:26 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.17 christos private Char *prompt_default(EditLine *);
51 1.17 christos private Char *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.17 christos private Char *
57 1.1 cgd /*ARGSUSED*/
58 1.10 christos prompt_default(EditLine *el __attribute__((__unused__)))
59 1.1 cgd {
60 1.17 christos static Char a[3] = {'?', ' ', '\0'};
61 1.7 lukem
62 1.7 lukem 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.17 christos private Char *
70 1.6 lukem /*ARGSUSED*/
71 1.10 christos prompt_default_r(EditLine *el __attribute__((__unused__)))
72 1.6 lukem {
73 1.17 christos static Char a[1] = {'\0'};
74 1.7 lukem
75 1.7 lukem 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.1 cgd protected 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.17 christos Char *p;
87 1.14 christos int ignore = 0;
88 1.7 lukem
89 1.7 lukem if (op == EL_PROMPT)
90 1.7 lukem elp = &el->el_prompt;
91 1.7 lukem else
92 1.7 lukem elp = &el->el_rprompt;
93 1.15 christos
94 1.17 christos if (elp->p_wide)
95 1.17 christos p = (*elp->p_func)(el);
96 1.17 christos else
97 1.18 christos p = ct_decode_string((char *)(void *)(*elp->p_func)(el),
98 1.17 christos &el->el_scratch);
99 1.17 christos
100 1.17 christos for (; *p; p++) {
101 1.14 christos if (elp->p_ignore == *p) {
102 1.14 christos ignore = !ignore;
103 1.14 christos continue;
104 1.14 christos }
105 1.14 christos if (ignore)
106 1.15 christos term__putc(el, *p);
107 1.14 christos else
108 1.15 christos re_putc(el, *p, 1);
109 1.14 christos }
110 1.7 lukem
111 1.7 lukem elp->p_pos.v = el->el_refresh.r_cursor.v;
112 1.7 lukem elp->p_pos.h = el->el_refresh.r_cursor.h;
113 1.7 lukem }
114 1.1 cgd
115 1.1 cgd
116 1.1 cgd /* prompt_init():
117 1.1 cgd * Initialize the prompt stuff
118 1.1 cgd */
119 1.5 simonb protected int
120 1.7 lukem prompt_init(EditLine *el)
121 1.1 cgd {
122 1.7 lukem
123 1.7 lukem el->el_prompt.p_func = prompt_default;
124 1.7 lukem el->el_prompt.p_pos.v = 0;
125 1.7 lukem el->el_prompt.p_pos.h = 0;
126 1.14 christos el->el_prompt.p_ignore = '\0';
127 1.7 lukem el->el_rprompt.p_func = prompt_default_r;
128 1.7 lukem el->el_rprompt.p_pos.v = 0;
129 1.7 lukem el->el_rprompt.p_pos.h = 0;
130 1.14 christos el->el_rprompt.p_ignore = '\0';
131 1.14 christos return 0;
132 1.7 lukem }
133 1.1 cgd
134 1.1 cgd
135 1.1 cgd /* prompt_end():
136 1.1 cgd * Clean up the prompt stuff
137 1.1 cgd */
138 1.1 cgd protected void
139 1.5 simonb /*ARGSUSED*/
140 1.10 christos prompt_end(EditLine *el __attribute__((__unused__)))
141 1.1 cgd {
142 1.7 lukem }
143 1.1 cgd
144 1.1 cgd
145 1.1 cgd /* prompt_set():
146 1.1 cgd * Install a prompt printing function
147 1.1 cgd */
148 1.5 simonb protected int
149 1.17 christos prompt_set(EditLine *el, el_pfunc_t prf, Char c, int op, int wide)
150 1.7 lukem {
151 1.7 lukem el_prompt_t *p;
152 1.7 lukem
153 1.16 christos if (op == EL_PROMPT || op == EL_PROMPT_ESC)
154 1.7 lukem p = &el->el_prompt;
155 1.6 lukem else
156 1.7 lukem p = &el->el_rprompt;
157 1.14 christos
158 1.7 lukem if (prf == NULL) {
159 1.16 christos if (op == EL_PROMPT || op == EL_PROMPT_ESC)
160 1.7 lukem p->p_func = prompt_default;
161 1.7 lukem else
162 1.7 lukem p->p_func = prompt_default_r;
163 1.17 christos } else {
164 1.7 lukem p->p_func = prf;
165 1.17 christos }
166 1.14 christos
167 1.14 christos p->p_ignore = c;
168 1.14 christos
169 1.7 lukem p->p_pos.v = 0;
170 1.7 lukem p->p_pos.h = 0;
171 1.17 christos p->p_wide = wide;
172 1.14 christos
173 1.14 christos return 0;
174 1.7 lukem }
175 1.4 lukem
176 1.4 lukem
177 1.4 lukem /* prompt_get():
178 1.4 lukem * Retrieve the prompt printing function
179 1.4 lukem */
180 1.5 simonb protected int
181 1.17 christos prompt_get(EditLine *el, el_pfunc_t *prf, Char *c, int op)
182 1.7 lukem {
183 1.14 christos el_prompt_t *p;
184 1.7 lukem
185 1.7 lukem if (prf == NULL)
186 1.14 christos return -1;
187 1.14 christos
188 1.7 lukem if (op == EL_PROMPT)
189 1.14 christos p = &el->el_prompt;
190 1.7 lukem else
191 1.14 christos p = &el->el_rprompt;
192 1.14 christos
193 1.17 christos if (prf)
194 1.17 christos *prf = p->p_func;
195 1.14 christos if (c)
196 1.14 christos *c = p->p_ignore;
197 1.14 christos
198 1.14 christos return 0;
199 1.7 lukem }
200