source: branches/samba-3.3.x/source/lib/readline.c@ 224

Last change on this file since 224 was 206, checked in by Herwig Bauernfeind, 16 years ago

Import Samba 3.3 branch at 3.0.0 level (psmedley's port)
File size: 6.0 KB
Line 
1/*
2 Unix SMB/CIFS implementation.
3 Samba readline wrapper implementation
4 Copyright (C) Simo Sorce 2001
5 Copyright (C) Andrew Tridgell 2001
6
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>.
19*/
20
21#include "includes.h"
22
23#ifdef HAVE_LIBREADLINE
24# ifdef HAVE_READLINE_READLINE_H
25# include <readline/readline.h>
26# ifdef HAVE_READLINE_HISTORY_H
27# include <readline/history.h>
28# endif
29# else
30# ifdef HAVE_READLINE_H
31# include <readline.h>
32# ifdef HAVE_HISTORY_H
33# include <history.h>
34# endif
35# else
36# undef HAVE_LIBREADLINE
37# endif
38# endif
39#endif
40
41#ifdef HAVE_NEW_LIBREADLINE
42# define RL_COMPLETION_CAST (rl_completion_func_t *)
43#else
44/* This type is missing from libreadline<4.0 (approximately) */
45# define RL_COMPLETION_CAST
46#endif /* HAVE_NEW_LIBREADLINE */
47
48static bool smb_rl_done;
49
50#if HAVE_LIBREADLINE
51/*
52 * MacOS/X does not have rl_done in readline.h, but
53 * readline.so has it
54 */
55extern int rl_done;
56#endif
57
58void smb_readline_done(void)
59{
60 smb_rl_done = true;
61#if HAVE_LIBREADLINE
62 rl_done = 1;
63#endif
64}
65
66/****************************************************************************
67 Display the prompt and wait for input. Call callback() regularly
68****************************************************************************/
69
70static char *smb_readline_replacement(const char *prompt, void (*callback)(void),
71 char **(completion_fn)(const char *text, int start, int end))
72{
73 fd_set fds;
74 char *line = NULL;
75 struct timeval timeout;
76 int fd = x_fileno(x_stdin);
77 char *ret;
78
79 /* Prompt might be NULL in non-interactive mode. */
80 if (prompt) {
81 x_fprintf(x_stdout, "%s", prompt);
82 x_fflush(x_stdout);
83 }
84
85 line = (char *)SMB_MALLOC(BUFSIZ);
86 if (!line) {
87 return NULL;
88 }
89
90 while (!smb_rl_done) {
91 timeout.tv_sec = 5;
92 timeout.tv_usec = 0;
93
94 FD_ZERO(&fds);
95 FD_SET(fd,&fds);
96
97 if (sys_select_intr(fd+1,&fds,NULL,NULL,&timeout) == 1) {
98 ret = x_fgets(line, BUFSIZ, x_stdin);
99 if (ret == 0) {
100 SAFE_FREE(line);
101 }
102 return ret;
103 }
104#ifdef __OS2__
105#include <conio.h>
106 {
107 char * cp = line;
108 char c;
109 int flag = 1;
110 while (flag && cp < line + sizeof(line) - 1)
111 {
112 c = getch();
113 switch (c)
114 {
115 case 8:
116 {
117 if (cp > line)
118 {
119 cp--;
120 putchar(8);
121 putchar(32);
122 putchar(8);
123 }
124 } break;
125 case 0: break;
126 case 10: // generally should not be
127 case 13:
128 {
129 flag = 0;
130 } break;
131 case 27:
132 {
133 for (; cp > line; cp--)
134 {
135 putchar(8);
136 putchar(32);
137 putchar(8);
138 }
139 } break;
140 default:
141 {
142 *cp++ = c;
143 putchar(c);
144 }
145 }
146 }
147 *cp = 0;
148 printf("\n");
149 return line;
150 }
151#endif /* __OS2__ */
152 if (callback) {
153 callback();
154 }
155 }
156 SAFE_FREE(line);
157 return NULL;
158}
159
160/****************************************************************************
161 Display the prompt and wait for input. Call callback() regularly.
162****************************************************************************/
163
164char *smb_readline(const char *prompt, void (*callback)(void),
165 char **(completion_fn)(const char *text, int start, int end))
166{
167 char *ret;
168 bool interactive;
169
170 interactive = isatty(x_fileno(x_stdin)) || getenv("CLI_FORCE_INTERACTIVE");
171 if (!interactive) {
172 return smb_readline_replacement(NULL, callback, completion_fn);
173 }
174
175#if HAVE_LIBREADLINE
176
177 /* Aargh! Readline does bizzare things with the terminal width
178 that mucks up expect(1). Set CLI_NO_READLINE in the environment
179 to force readline not to be used. */
180
181 if (getenv("CLI_NO_READLINE"))
182 return smb_readline_replacement(prompt, callback, completion_fn);
183
184 if (completion_fn) {
185 /* The callback prototype has changed slightly between
186 different versions of Readline, so the same function
187 works in all of them to date, but we get compiler
188 warnings in some. */
189 rl_attempted_completion_function = RL_COMPLETION_CAST completion_fn;
190 }
191
192#if HAVE_DECL_RL_EVENT_HOOK
193 if (callback)
194 rl_event_hook = (Function *)callback;
195#endif
196 ret = readline(prompt);
197 if (ret && *ret)
198 add_history(ret);
199
200#else
201 ret = smb_readline_replacement(prompt, callback, completion_fn);
202#endif
203
204 return ret;
205}
206
207/****************************************************************************
208 * return line buffer text
209 ****************************************************************************/
210const char *smb_readline_get_line_buffer(void)
211{
212#if defined(HAVE_LIBREADLINE)
213 return rl_line_buffer;
214#else
215 return NULL;
216#endif
217}
218
219
220/****************************************************************************
221 * set completion append character
222 ***************************************************************************/
223void smb_readline_ca_char(char c)
224{
225#if defined(HAVE_LIBREADLINE)
226 rl_completion_append_character = c;
227#endif
228}
229
230/****************************************************************************
231history
232****************************************************************************/
233int cmd_history(void)
234{
235#if defined(HAVE_LIBREADLINE) && defined(HAVE_HISTORY_LIST)
236 HIST_ENTRY **hlist;
237 int i;
238
239 hlist = history_list();
240
241 for (i = 0; hlist && hlist[i]; i++) {
242 DEBUG(0, ("%d: %s\n", i, hlist[i]->line));
243 }
244#else
245 DEBUG(0,("no history without readline support\n"));
246#endif
247
248 return 0;
249}
Note: See TracBrowser for help on using the repository browser.