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