1*136d69caSBaptiste Daroussin /* $NetBSD: filecomplete.c,v 1.73 2023/04/25 17:51:32 christos Exp $ */
2d0ef721eSBaptiste Daroussin
3d0ef721eSBaptiste Daroussin /*-
4d0ef721eSBaptiste Daroussin * Copyright (c) 1997 The NetBSD Foundation, Inc.
5d0ef721eSBaptiste Daroussin * All rights reserved.
6d0ef721eSBaptiste Daroussin *
7d0ef721eSBaptiste Daroussin * This code is derived from software contributed to The NetBSD Foundation
8d0ef721eSBaptiste Daroussin * by Jaromir Dolecek.
9d0ef721eSBaptiste Daroussin *
10d0ef721eSBaptiste Daroussin * Redistribution and use in source and binary forms, with or without
11d0ef721eSBaptiste Daroussin * modification, are permitted provided that the following conditions
12d0ef721eSBaptiste Daroussin * are met:
13d0ef721eSBaptiste Daroussin * 1. Redistributions of source code must retain the above copyright
14d0ef721eSBaptiste Daroussin * notice, this list of conditions and the following disclaimer.
15d0ef721eSBaptiste Daroussin * 2. Redistributions in binary form must reproduce the above copyright
16d0ef721eSBaptiste Daroussin * notice, this list of conditions and the following disclaimer in the
17d0ef721eSBaptiste Daroussin * documentation and/or other materials provided with the distribution.
18d0ef721eSBaptiste Daroussin *
19d0ef721eSBaptiste Daroussin * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20d0ef721eSBaptiste Daroussin * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21d0ef721eSBaptiste Daroussin * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22d0ef721eSBaptiste Daroussin * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23d0ef721eSBaptiste Daroussin * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24d0ef721eSBaptiste Daroussin * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25d0ef721eSBaptiste Daroussin * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26d0ef721eSBaptiste Daroussin * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27d0ef721eSBaptiste Daroussin * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28d0ef721eSBaptiste Daroussin * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29d0ef721eSBaptiste Daroussin * POSSIBILITY OF SUCH DAMAGE.
30d0ef721eSBaptiste Daroussin */
31d0ef721eSBaptiste Daroussin
32d0ef721eSBaptiste Daroussin #include "config.h"
33d0ef721eSBaptiste Daroussin #if !defined(lint) && !defined(SCCSID)
34*136d69caSBaptiste Daroussin __RCSID("$NetBSD: filecomplete.c,v 1.73 2023/04/25 17:51:32 christos Exp $");
35d0ef721eSBaptiste Daroussin #endif /* not lint && not SCCSID */
36d0ef721eSBaptiste Daroussin
37d0ef721eSBaptiste Daroussin #include <sys/types.h>
38d0ef721eSBaptiste Daroussin #include <sys/stat.h>
39d0ef721eSBaptiste Daroussin #include <dirent.h>
40d0ef721eSBaptiste Daroussin #include <errno.h>
41d0ef721eSBaptiste Daroussin #include <fcntl.h>
42d0ef721eSBaptiste Daroussin #include <limits.h>
43d0ef721eSBaptiste Daroussin #include <pwd.h>
44d0ef721eSBaptiste Daroussin #include <stdio.h>
45d0ef721eSBaptiste Daroussin #include <stdlib.h>
46d0ef721eSBaptiste Daroussin #include <string.h>
47d0ef721eSBaptiste Daroussin #include <unistd.h>
48d0ef721eSBaptiste Daroussin
49d0ef721eSBaptiste Daroussin #include "el.h"
50d0ef721eSBaptiste Daroussin #include "filecomplete.h"
51d0ef721eSBaptiste Daroussin
52d0ef721eSBaptiste Daroussin static const wchar_t break_chars[] = L" \t\n\"\\'`@$><=;|&{(";
53d0ef721eSBaptiste Daroussin
54d0ef721eSBaptiste Daroussin /********************************/
55d0ef721eSBaptiste Daroussin /* completion functions */
56d0ef721eSBaptiste Daroussin
57d0ef721eSBaptiste Daroussin /*
58d0ef721eSBaptiste Daroussin * does tilde expansion of strings of type ``~user/foo''
59d0ef721eSBaptiste Daroussin * if ``user'' isn't valid user name or ``txt'' doesn't start
60d0ef721eSBaptiste Daroussin * w/ '~', returns pointer to strdup()ed copy of ``txt''
61d0ef721eSBaptiste Daroussin *
62d0ef721eSBaptiste Daroussin * it's the caller's responsibility to free() the returned string
63d0ef721eSBaptiste Daroussin */
64d0ef721eSBaptiste Daroussin char *
fn_tilde_expand(const char * txt)65d0ef721eSBaptiste Daroussin fn_tilde_expand(const char *txt)
66d0ef721eSBaptiste Daroussin {
67d0ef721eSBaptiste Daroussin #if defined(HAVE_GETPW_R_POSIX) || defined(HAVE_GETPW_R_DRAFT)
68d0ef721eSBaptiste Daroussin struct passwd pwres;
69d0ef721eSBaptiste Daroussin char pwbuf[1024];
70d0ef721eSBaptiste Daroussin #endif
71d0ef721eSBaptiste Daroussin struct passwd *pass;
727f399375SBaptiste Daroussin const char *pos;
73d0ef721eSBaptiste Daroussin char *temp;
74d0ef721eSBaptiste Daroussin size_t len = 0;
75d0ef721eSBaptiste Daroussin
76d0ef721eSBaptiste Daroussin if (txt[0] != '~')
77d0ef721eSBaptiste Daroussin return strdup(txt);
78d0ef721eSBaptiste Daroussin
797f399375SBaptiste Daroussin pos = strchr(txt + 1, '/');
807f399375SBaptiste Daroussin if (pos == NULL) {
81d0ef721eSBaptiste Daroussin temp = strdup(txt + 1);
82d0ef721eSBaptiste Daroussin if (temp == NULL)
83d0ef721eSBaptiste Daroussin return NULL;
84d0ef721eSBaptiste Daroussin } else {
85d0ef721eSBaptiste Daroussin /* text until string after slash */
867f399375SBaptiste Daroussin len = (size_t)(pos - txt + 1);
87d0ef721eSBaptiste Daroussin temp = el_calloc(len, sizeof(*temp));
88d0ef721eSBaptiste Daroussin if (temp == NULL)
89d0ef721eSBaptiste Daroussin return NULL;
90f9a159daSBaptiste Daroussin (void)strlcpy(temp, txt + 1, len - 1);
91d0ef721eSBaptiste Daroussin }
92d0ef721eSBaptiste Daroussin if (temp[0] == 0) {
93d0ef721eSBaptiste Daroussin #ifdef HAVE_GETPW_R_POSIX
94d0ef721eSBaptiste Daroussin if (getpwuid_r(getuid(), &pwres, pwbuf, sizeof(pwbuf),
95d0ef721eSBaptiste Daroussin &pass) != 0)
96d0ef721eSBaptiste Daroussin pass = NULL;
97d0ef721eSBaptiste Daroussin #elif HAVE_GETPW_R_DRAFT
98d0ef721eSBaptiste Daroussin pass = getpwuid_r(getuid(), &pwres, pwbuf, sizeof(pwbuf));
99d0ef721eSBaptiste Daroussin #else
100d0ef721eSBaptiste Daroussin pass = getpwuid(getuid());
101d0ef721eSBaptiste Daroussin #endif
102d0ef721eSBaptiste Daroussin } else {
103d0ef721eSBaptiste Daroussin #ifdef HAVE_GETPW_R_POSIX
104d0ef721eSBaptiste Daroussin if (getpwnam_r(temp, &pwres, pwbuf, sizeof(pwbuf), &pass) != 0)
105d0ef721eSBaptiste Daroussin pass = NULL;
106d0ef721eSBaptiste Daroussin #elif HAVE_GETPW_R_DRAFT
107d0ef721eSBaptiste Daroussin pass = getpwnam_r(temp, &pwres, pwbuf, sizeof(pwbuf));
108d0ef721eSBaptiste Daroussin #else
109d0ef721eSBaptiste Daroussin pass = getpwnam(temp);
110d0ef721eSBaptiste Daroussin #endif
111d0ef721eSBaptiste Daroussin }
112d0ef721eSBaptiste Daroussin el_free(temp); /* value no more needed */
113d0ef721eSBaptiste Daroussin if (pass == NULL)
114d0ef721eSBaptiste Daroussin return strdup(txt);
115d0ef721eSBaptiste Daroussin
116d0ef721eSBaptiste Daroussin /* update pointer txt to point at string immedially following */
117d0ef721eSBaptiste Daroussin /* first slash */
118d0ef721eSBaptiste Daroussin txt += len;
119d0ef721eSBaptiste Daroussin
120d0ef721eSBaptiste Daroussin len = strlen(pass->pw_dir) + 1 + strlen(txt) + 1;
121d0ef721eSBaptiste Daroussin temp = el_calloc(len, sizeof(*temp));
122d0ef721eSBaptiste Daroussin if (temp == NULL)
123d0ef721eSBaptiste Daroussin return NULL;
124d0ef721eSBaptiste Daroussin (void)snprintf(temp, len, "%s/%s", pass->pw_dir, txt);
125d0ef721eSBaptiste Daroussin
126d0ef721eSBaptiste Daroussin return temp;
127d0ef721eSBaptiste Daroussin }
128d0ef721eSBaptiste Daroussin
129d0ef721eSBaptiste Daroussin static int
needs_escaping(wchar_t c)1307f399375SBaptiste Daroussin needs_escaping(wchar_t c)
131d0ef721eSBaptiste Daroussin {
132d0ef721eSBaptiste Daroussin switch (c) {
133d0ef721eSBaptiste Daroussin case '\'':
134d0ef721eSBaptiste Daroussin case '"':
135d0ef721eSBaptiste Daroussin case '(':
136d0ef721eSBaptiste Daroussin case ')':
137d0ef721eSBaptiste Daroussin case '\\':
138d0ef721eSBaptiste Daroussin case '<':
139d0ef721eSBaptiste Daroussin case '>':
140d0ef721eSBaptiste Daroussin case '$':
141d0ef721eSBaptiste Daroussin case '#':
142d0ef721eSBaptiste Daroussin case ' ':
143d0ef721eSBaptiste Daroussin case '\n':
144d0ef721eSBaptiste Daroussin case '\t':
145d0ef721eSBaptiste Daroussin case '?':
146d0ef721eSBaptiste Daroussin case ';':
147d0ef721eSBaptiste Daroussin case '`':
148d0ef721eSBaptiste Daroussin case '@':
149d0ef721eSBaptiste Daroussin case '=':
150d0ef721eSBaptiste Daroussin case '|':
151d0ef721eSBaptiste Daroussin case '{':
152d0ef721eSBaptiste Daroussin case '}':
153d0ef721eSBaptiste Daroussin case '&':
154d0ef721eSBaptiste Daroussin case '*':
155d0ef721eSBaptiste Daroussin case '[':
156d0ef721eSBaptiste Daroussin return 1;
157d0ef721eSBaptiste Daroussin default:
158d0ef721eSBaptiste Daroussin return 0;
159d0ef721eSBaptiste Daroussin }
160d0ef721eSBaptiste Daroussin }
161d0ef721eSBaptiste Daroussin
162d0ef721eSBaptiste Daroussin static int
needs_dquote_escaping(char c)163d0ef721eSBaptiste Daroussin needs_dquote_escaping(char c)
164d0ef721eSBaptiste Daroussin {
165d0ef721eSBaptiste Daroussin switch (c) {
166d0ef721eSBaptiste Daroussin case '"':
167d0ef721eSBaptiste Daroussin case '\\':
168d0ef721eSBaptiste Daroussin case '`':
169d0ef721eSBaptiste Daroussin case '$':
170d0ef721eSBaptiste Daroussin return 1;
171d0ef721eSBaptiste Daroussin default:
172d0ef721eSBaptiste Daroussin return 0;
173d0ef721eSBaptiste Daroussin }
174d0ef721eSBaptiste Daroussin }
175d0ef721eSBaptiste Daroussin
176d0ef721eSBaptiste Daroussin
177d0ef721eSBaptiste Daroussin static wchar_t *
unescape_string(const wchar_t * string,size_t length)178d0ef721eSBaptiste Daroussin unescape_string(const wchar_t *string, size_t length)
179d0ef721eSBaptiste Daroussin {
180d0ef721eSBaptiste Daroussin size_t i;
181d0ef721eSBaptiste Daroussin size_t j = 0;
182d0ef721eSBaptiste Daroussin wchar_t *unescaped = el_calloc(length + 1, sizeof(*string));
183d0ef721eSBaptiste Daroussin if (unescaped == NULL)
184d0ef721eSBaptiste Daroussin return NULL;
185d0ef721eSBaptiste Daroussin for (i = 0; i < length ; i++) {
186d0ef721eSBaptiste Daroussin if (string[i] == '\\')
187d0ef721eSBaptiste Daroussin continue;
188d0ef721eSBaptiste Daroussin unescaped[j++] = string[i];
189d0ef721eSBaptiste Daroussin }
190d0ef721eSBaptiste Daroussin unescaped[j] = 0;
191d0ef721eSBaptiste Daroussin return unescaped;
192d0ef721eSBaptiste Daroussin }
193d0ef721eSBaptiste Daroussin
194d0ef721eSBaptiste Daroussin static char *
escape_filename(EditLine * el,const char * filename,int single_match,const char * (* app_func)(const char *))195d0ef721eSBaptiste Daroussin escape_filename(EditLine * el, const char *filename, int single_match,
196d0ef721eSBaptiste Daroussin const char *(*app_func)(const char *))
197d0ef721eSBaptiste Daroussin {
198d0ef721eSBaptiste Daroussin size_t original_len = 0;
199d0ef721eSBaptiste Daroussin size_t escaped_character_count = 0;
200d0ef721eSBaptiste Daroussin size_t offset = 0;
201d0ef721eSBaptiste Daroussin size_t newlen;
202d0ef721eSBaptiste Daroussin const char *s;
203d0ef721eSBaptiste Daroussin char c;
204d0ef721eSBaptiste Daroussin size_t s_quoted = 0; /* does the input contain a single quote */
205d0ef721eSBaptiste Daroussin size_t d_quoted = 0; /* does the input contain a double quote */
206d0ef721eSBaptiste Daroussin char *escaped_str;
207d0ef721eSBaptiste Daroussin wchar_t *temp = el->el_line.buffer;
208d0ef721eSBaptiste Daroussin const char *append_char = NULL;
209d0ef721eSBaptiste Daroussin
210d0ef721eSBaptiste Daroussin if (filename == NULL)
211d0ef721eSBaptiste Daroussin return NULL;
212d0ef721eSBaptiste Daroussin
213d0ef721eSBaptiste Daroussin while (temp != el->el_line.cursor) {
214d0ef721eSBaptiste Daroussin /*
215d0ef721eSBaptiste Daroussin * If we see a single quote but have not seen a double quote
2167f399375SBaptiste Daroussin * so far set/unset s_quote, unless it is already quoted
217d0ef721eSBaptiste Daroussin */
2187f399375SBaptiste Daroussin if (temp[0] == '\'' && !d_quoted &&
2197f399375SBaptiste Daroussin (temp == el->el_line.buffer || temp[-1] != '\\'))
220d0ef721eSBaptiste Daroussin s_quoted = !s_quoted;
221d0ef721eSBaptiste Daroussin /*
222d0ef721eSBaptiste Daroussin * vice versa to the above condition
223d0ef721eSBaptiste Daroussin */
224d0ef721eSBaptiste Daroussin else if (temp[0] == '"' && !s_quoted)
225d0ef721eSBaptiste Daroussin d_quoted = !d_quoted;
226d0ef721eSBaptiste Daroussin temp++;
227d0ef721eSBaptiste Daroussin }
228d0ef721eSBaptiste Daroussin
229d0ef721eSBaptiste Daroussin /* Count number of special characters so that we can calculate
230d0ef721eSBaptiste Daroussin * number of extra bytes needed in the new string
231d0ef721eSBaptiste Daroussin */
232d0ef721eSBaptiste Daroussin for (s = filename; *s; s++, original_len++) {
233d0ef721eSBaptiste Daroussin c = *s;
234d0ef721eSBaptiste Daroussin /* Inside a single quote only single quotes need escaping */
235d0ef721eSBaptiste Daroussin if (s_quoted && c == '\'') {
236d0ef721eSBaptiste Daroussin escaped_character_count += 3;
237d0ef721eSBaptiste Daroussin continue;
238d0ef721eSBaptiste Daroussin }
239d0ef721eSBaptiste Daroussin /* Inside double quotes only ", \, ` and $ need escaping */
240d0ef721eSBaptiste Daroussin if (d_quoted && needs_dquote_escaping(c)) {
241d0ef721eSBaptiste Daroussin escaped_character_count++;
242d0ef721eSBaptiste Daroussin continue;
243d0ef721eSBaptiste Daroussin }
244d0ef721eSBaptiste Daroussin if (!s_quoted && !d_quoted && needs_escaping(c))
245d0ef721eSBaptiste Daroussin escaped_character_count++;
246d0ef721eSBaptiste Daroussin }
247d0ef721eSBaptiste Daroussin
248d0ef721eSBaptiste Daroussin newlen = original_len + escaped_character_count + 1;
249d0ef721eSBaptiste Daroussin if (s_quoted || d_quoted)
250d0ef721eSBaptiste Daroussin newlen++;
251d0ef721eSBaptiste Daroussin
252d0ef721eSBaptiste Daroussin if (single_match && app_func)
253d0ef721eSBaptiste Daroussin newlen++;
254d0ef721eSBaptiste Daroussin
255d0ef721eSBaptiste Daroussin if ((escaped_str = el_malloc(newlen)) == NULL)
256d0ef721eSBaptiste Daroussin return NULL;
257d0ef721eSBaptiste Daroussin
258d0ef721eSBaptiste Daroussin for (s = filename; *s; s++) {
259d0ef721eSBaptiste Daroussin c = *s;
260d0ef721eSBaptiste Daroussin if (!needs_escaping(c)) {
261d0ef721eSBaptiste Daroussin /* no escaping is required continue as usual */
262d0ef721eSBaptiste Daroussin escaped_str[offset++] = c;
263d0ef721eSBaptiste Daroussin continue;
264d0ef721eSBaptiste Daroussin }
265d0ef721eSBaptiste Daroussin
266d0ef721eSBaptiste Daroussin /* single quotes inside single quotes require special handling */
267d0ef721eSBaptiste Daroussin if (c == '\'' && s_quoted) {
268d0ef721eSBaptiste Daroussin escaped_str[offset++] = '\'';
269d0ef721eSBaptiste Daroussin escaped_str[offset++] = '\\';
270d0ef721eSBaptiste Daroussin escaped_str[offset++] = '\'';
271d0ef721eSBaptiste Daroussin escaped_str[offset++] = '\'';
272d0ef721eSBaptiste Daroussin continue;
273d0ef721eSBaptiste Daroussin }
274d0ef721eSBaptiste Daroussin
275d0ef721eSBaptiste Daroussin /* Otherwise no escaping needed inside single quotes */
276d0ef721eSBaptiste Daroussin if (s_quoted) {
277d0ef721eSBaptiste Daroussin escaped_str[offset++] = c;
278d0ef721eSBaptiste Daroussin continue;
279d0ef721eSBaptiste Daroussin }
280d0ef721eSBaptiste Daroussin
281d0ef721eSBaptiste Daroussin /* No escaping needed inside a double quoted string either
282d0ef721eSBaptiste Daroussin * unless we see a '$', '\', '`', or '"' (itself)
283d0ef721eSBaptiste Daroussin */
284d0ef721eSBaptiste Daroussin if (d_quoted && !needs_dquote_escaping(c)) {
285d0ef721eSBaptiste Daroussin escaped_str[offset++] = c;
286d0ef721eSBaptiste Daroussin continue;
287d0ef721eSBaptiste Daroussin }
288d0ef721eSBaptiste Daroussin
289d0ef721eSBaptiste Daroussin /* If we reach here that means escaping is actually needed */
290d0ef721eSBaptiste Daroussin escaped_str[offset++] = '\\';
291d0ef721eSBaptiste Daroussin escaped_str[offset++] = c;
292d0ef721eSBaptiste Daroussin }
293d0ef721eSBaptiste Daroussin
294d0ef721eSBaptiste Daroussin if (single_match && app_func) {
295d0ef721eSBaptiste Daroussin escaped_str[offset] = 0;
29619318a62SBaptiste Daroussin append_char = app_func(filename);
297d0ef721eSBaptiste Daroussin /* we want to append space only if we are not inside quotes */
298d0ef721eSBaptiste Daroussin if (append_char[0] == ' ') {
299d0ef721eSBaptiste Daroussin if (!s_quoted && !d_quoted)
300d0ef721eSBaptiste Daroussin escaped_str[offset++] = append_char[0];
301d0ef721eSBaptiste Daroussin } else
302d0ef721eSBaptiste Daroussin escaped_str[offset++] = append_char[0];
303d0ef721eSBaptiste Daroussin }
304d0ef721eSBaptiste Daroussin
305d0ef721eSBaptiste Daroussin /* close the quotes if single match and the match is not a directory */
306d0ef721eSBaptiste Daroussin if (single_match && (append_char && append_char[0] == ' ')) {
307d0ef721eSBaptiste Daroussin if (s_quoted)
308d0ef721eSBaptiste Daroussin escaped_str[offset++] = '\'';
309d0ef721eSBaptiste Daroussin else if (d_quoted)
310d0ef721eSBaptiste Daroussin escaped_str[offset++] = '"';
311d0ef721eSBaptiste Daroussin }
312d0ef721eSBaptiste Daroussin
313d0ef721eSBaptiste Daroussin escaped_str[offset] = 0;
314d0ef721eSBaptiste Daroussin return escaped_str;
315d0ef721eSBaptiste Daroussin }
316d0ef721eSBaptiste Daroussin
317d0ef721eSBaptiste Daroussin /*
318d0ef721eSBaptiste Daroussin * return first found file name starting by the ``text'' or NULL if no
319d0ef721eSBaptiste Daroussin * such file can be found
320d0ef721eSBaptiste Daroussin * value of ``state'' is ignored
321d0ef721eSBaptiste Daroussin *
322d0ef721eSBaptiste Daroussin * it's the caller's responsibility to free the returned string
323d0ef721eSBaptiste Daroussin */
324d0ef721eSBaptiste Daroussin char *
fn_filename_completion_function(const char * text,int state)325d0ef721eSBaptiste Daroussin fn_filename_completion_function(const char *text, int state)
326d0ef721eSBaptiste Daroussin {
327d0ef721eSBaptiste Daroussin static DIR *dir = NULL;
328d0ef721eSBaptiste Daroussin static char *filename = NULL, *dirname = NULL, *dirpath = NULL;
329d0ef721eSBaptiste Daroussin static size_t filename_len = 0;
330d0ef721eSBaptiste Daroussin struct dirent *entry;
331d0ef721eSBaptiste Daroussin char *temp;
3327f399375SBaptiste Daroussin const char *pos;
333d0ef721eSBaptiste Daroussin size_t len;
334d0ef721eSBaptiste Daroussin
335d0ef721eSBaptiste Daroussin if (state == 0 || dir == NULL) {
3367f399375SBaptiste Daroussin pos = strrchr(text, '/');
3377f399375SBaptiste Daroussin if (pos) {
338d0ef721eSBaptiste Daroussin char *nptr;
3397f399375SBaptiste Daroussin pos++;
3407f399375SBaptiste Daroussin nptr = el_realloc(filename, (strlen(pos) + 1) *
341d0ef721eSBaptiste Daroussin sizeof(*nptr));
342d0ef721eSBaptiste Daroussin if (nptr == NULL) {
343d0ef721eSBaptiste Daroussin el_free(filename);
344d0ef721eSBaptiste Daroussin filename = NULL;
345d0ef721eSBaptiste Daroussin return NULL;
346d0ef721eSBaptiste Daroussin }
347d0ef721eSBaptiste Daroussin filename = nptr;
3487f399375SBaptiste Daroussin (void)strcpy(filename, pos);
3497f399375SBaptiste Daroussin len = (size_t)(pos - text); /* including last slash */
350d0ef721eSBaptiste Daroussin
351d0ef721eSBaptiste Daroussin nptr = el_realloc(dirname, (len + 1) *
352d0ef721eSBaptiste Daroussin sizeof(*nptr));
353d0ef721eSBaptiste Daroussin if (nptr == NULL) {
354d0ef721eSBaptiste Daroussin el_free(dirname);
355d0ef721eSBaptiste Daroussin dirname = NULL;
356d0ef721eSBaptiste Daroussin return NULL;
357d0ef721eSBaptiste Daroussin }
358d0ef721eSBaptiste Daroussin dirname = nptr;
359f9a159daSBaptiste Daroussin (void)strlcpy(dirname, text, len + 1);
360d0ef721eSBaptiste Daroussin } else {
361d0ef721eSBaptiste Daroussin el_free(filename);
362d0ef721eSBaptiste Daroussin if (*text == 0)
363d0ef721eSBaptiste Daroussin filename = NULL;
364d0ef721eSBaptiste Daroussin else {
365d0ef721eSBaptiste Daroussin filename = strdup(text);
366d0ef721eSBaptiste Daroussin if (filename == NULL)
367d0ef721eSBaptiste Daroussin return NULL;
368d0ef721eSBaptiste Daroussin }
369d0ef721eSBaptiste Daroussin el_free(dirname);
370d0ef721eSBaptiste Daroussin dirname = NULL;
371d0ef721eSBaptiste Daroussin }
372d0ef721eSBaptiste Daroussin
373d0ef721eSBaptiste Daroussin if (dir != NULL) {
374d0ef721eSBaptiste Daroussin (void)closedir(dir);
375d0ef721eSBaptiste Daroussin dir = NULL;
376d0ef721eSBaptiste Daroussin }
377d0ef721eSBaptiste Daroussin
378d0ef721eSBaptiste Daroussin /* support for ``~user'' syntax */
379d0ef721eSBaptiste Daroussin
380d0ef721eSBaptiste Daroussin el_free(dirpath);
381d0ef721eSBaptiste Daroussin dirpath = NULL;
382d0ef721eSBaptiste Daroussin if (dirname == NULL) {
383d0ef721eSBaptiste Daroussin if ((dirname = strdup("")) == NULL)
384d0ef721eSBaptiste Daroussin return NULL;
385d0ef721eSBaptiste Daroussin dirpath = strdup("./");
386d0ef721eSBaptiste Daroussin } else if (*dirname == '~')
387d0ef721eSBaptiste Daroussin dirpath = fn_tilde_expand(dirname);
388d0ef721eSBaptiste Daroussin else
389d0ef721eSBaptiste Daroussin dirpath = strdup(dirname);
390d0ef721eSBaptiste Daroussin
391d0ef721eSBaptiste Daroussin if (dirpath == NULL)
392d0ef721eSBaptiste Daroussin return NULL;
393d0ef721eSBaptiste Daroussin
394d0ef721eSBaptiste Daroussin dir = opendir(dirpath);
395d0ef721eSBaptiste Daroussin if (!dir)
396d0ef721eSBaptiste Daroussin return NULL; /* cannot open the directory */
397d0ef721eSBaptiste Daroussin
398d0ef721eSBaptiste Daroussin /* will be used in cycle */
399d0ef721eSBaptiste Daroussin filename_len = filename ? strlen(filename) : 0;
400d0ef721eSBaptiste Daroussin }
401d0ef721eSBaptiste Daroussin
402d0ef721eSBaptiste Daroussin /* find the match */
403d0ef721eSBaptiste Daroussin while ((entry = readdir(dir)) != NULL) {
404d0ef721eSBaptiste Daroussin /* skip . and .. */
405d0ef721eSBaptiste Daroussin if (entry->d_name[0] == '.' && (!entry->d_name[1]
406d0ef721eSBaptiste Daroussin || (entry->d_name[1] == '.' && !entry->d_name[2])))
407d0ef721eSBaptiste Daroussin continue;
408d0ef721eSBaptiste Daroussin if (filename_len == 0)
409d0ef721eSBaptiste Daroussin break;
410d0ef721eSBaptiste Daroussin /* otherwise, get first entry where first */
411d0ef721eSBaptiste Daroussin /* filename_len characters are equal */
412d0ef721eSBaptiste Daroussin if (entry->d_name[0] == filename[0]
413d0ef721eSBaptiste Daroussin #if HAVE_STRUCT_DIRENT_D_NAMLEN
414d0ef721eSBaptiste Daroussin && entry->d_namlen >= filename_len
415d0ef721eSBaptiste Daroussin #else
416d0ef721eSBaptiste Daroussin && strlen(entry->d_name) >= filename_len
417d0ef721eSBaptiste Daroussin #endif
418d0ef721eSBaptiste Daroussin && strncmp(entry->d_name, filename,
419d0ef721eSBaptiste Daroussin filename_len) == 0)
420d0ef721eSBaptiste Daroussin break;
421d0ef721eSBaptiste Daroussin }
422d0ef721eSBaptiste Daroussin
423d0ef721eSBaptiste Daroussin if (entry) { /* match found */
424d0ef721eSBaptiste Daroussin
425d0ef721eSBaptiste Daroussin #if HAVE_STRUCT_DIRENT_D_NAMLEN
426d0ef721eSBaptiste Daroussin len = entry->d_namlen;
427d0ef721eSBaptiste Daroussin #else
428d0ef721eSBaptiste Daroussin len = strlen(entry->d_name);
429d0ef721eSBaptiste Daroussin #endif
430d0ef721eSBaptiste Daroussin
431d0ef721eSBaptiste Daroussin len = strlen(dirname) + len + 1;
432d0ef721eSBaptiste Daroussin temp = el_calloc(len, sizeof(*temp));
433d0ef721eSBaptiste Daroussin if (temp == NULL)
434d0ef721eSBaptiste Daroussin return NULL;
435d0ef721eSBaptiste Daroussin (void)snprintf(temp, len, "%s%s", dirname, entry->d_name);
436d0ef721eSBaptiste Daroussin } else {
437d0ef721eSBaptiste Daroussin (void)closedir(dir);
438d0ef721eSBaptiste Daroussin dir = NULL;
439d0ef721eSBaptiste Daroussin temp = NULL;
440d0ef721eSBaptiste Daroussin }
441d0ef721eSBaptiste Daroussin
442d0ef721eSBaptiste Daroussin return temp;
443d0ef721eSBaptiste Daroussin }
444d0ef721eSBaptiste Daroussin
445d0ef721eSBaptiste Daroussin
446d0ef721eSBaptiste Daroussin static const char *
append_char_function(const char * name)447d0ef721eSBaptiste Daroussin append_char_function(const char *name)
448d0ef721eSBaptiste Daroussin {
449d0ef721eSBaptiste Daroussin struct stat stbuf;
450d0ef721eSBaptiste Daroussin char *expname = *name == '~' ? fn_tilde_expand(name) : NULL;
451d0ef721eSBaptiste Daroussin const char *rs = " ";
452d0ef721eSBaptiste Daroussin
453d0ef721eSBaptiste Daroussin if (stat(expname ? expname : name, &stbuf) == -1)
454d0ef721eSBaptiste Daroussin goto out;
455d0ef721eSBaptiste Daroussin if (S_ISDIR(stbuf.st_mode))
456d0ef721eSBaptiste Daroussin rs = "/";
457d0ef721eSBaptiste Daroussin out:
458d0ef721eSBaptiste Daroussin if (expname)
459d0ef721eSBaptiste Daroussin el_free(expname);
460d0ef721eSBaptiste Daroussin return rs;
461d0ef721eSBaptiste Daroussin }
462*136d69caSBaptiste Daroussin
463d0ef721eSBaptiste Daroussin /*
464d0ef721eSBaptiste Daroussin * returns list of completions for text given
465d0ef721eSBaptiste Daroussin * non-static for readline.
466d0ef721eSBaptiste Daroussin */
467d0ef721eSBaptiste Daroussin char **
completion_matches(const char * text,char * (* genfunc)(const char *,int))468d0ef721eSBaptiste Daroussin completion_matches(const char *text, char *(*genfunc)(const char *, int))
469d0ef721eSBaptiste Daroussin {
470d0ef721eSBaptiste Daroussin char **match_list = NULL, *retstr, *prevstr;
471d0ef721eSBaptiste Daroussin size_t match_list_len, max_equal, which, i;
472d0ef721eSBaptiste Daroussin size_t matches;
473d0ef721eSBaptiste Daroussin
474d0ef721eSBaptiste Daroussin matches = 0;
475d0ef721eSBaptiste Daroussin match_list_len = 1;
476d0ef721eSBaptiste Daroussin while ((retstr = (*genfunc) (text, (int)matches)) != NULL) {
477d0ef721eSBaptiste Daroussin /* allow for list terminator here */
478d0ef721eSBaptiste Daroussin if (matches + 3 >= match_list_len) {
479d0ef721eSBaptiste Daroussin char **nmatch_list;
480d0ef721eSBaptiste Daroussin while (matches + 3 >= match_list_len)
481d0ef721eSBaptiste Daroussin match_list_len <<= 1;
482d0ef721eSBaptiste Daroussin nmatch_list = el_realloc(match_list,
483d0ef721eSBaptiste Daroussin match_list_len * sizeof(*nmatch_list));
484d0ef721eSBaptiste Daroussin if (nmatch_list == NULL) {
485d0ef721eSBaptiste Daroussin el_free(match_list);
486d0ef721eSBaptiste Daroussin return NULL;
487d0ef721eSBaptiste Daroussin }
488d0ef721eSBaptiste Daroussin match_list = nmatch_list;
489d0ef721eSBaptiste Daroussin
490d0ef721eSBaptiste Daroussin }
491d0ef721eSBaptiste Daroussin match_list[++matches] = retstr;
492d0ef721eSBaptiste Daroussin }
493d0ef721eSBaptiste Daroussin
494d0ef721eSBaptiste Daroussin if (!match_list)
495d0ef721eSBaptiste Daroussin return NULL; /* nothing found */
496d0ef721eSBaptiste Daroussin
497d0ef721eSBaptiste Daroussin /* find least denominator and insert it to match_list[0] */
498d0ef721eSBaptiste Daroussin which = 2;
499d0ef721eSBaptiste Daroussin prevstr = match_list[1];
500d0ef721eSBaptiste Daroussin max_equal = strlen(prevstr);
501d0ef721eSBaptiste Daroussin for (; which <= matches; which++) {
502d0ef721eSBaptiste Daroussin for (i = 0; i < max_equal &&
503d0ef721eSBaptiste Daroussin prevstr[i] == match_list[which][i]; i++)
504d0ef721eSBaptiste Daroussin continue;
505d0ef721eSBaptiste Daroussin max_equal = i;
506d0ef721eSBaptiste Daroussin }
507d0ef721eSBaptiste Daroussin
508d0ef721eSBaptiste Daroussin retstr = el_calloc(max_equal + 1, sizeof(*retstr));
509d0ef721eSBaptiste Daroussin if (retstr == NULL) {
510d0ef721eSBaptiste Daroussin el_free(match_list);
511d0ef721eSBaptiste Daroussin return NULL;
512d0ef721eSBaptiste Daroussin }
513f9a159daSBaptiste Daroussin (void)strlcpy(retstr, match_list[1], max_equal + 1);
514d0ef721eSBaptiste Daroussin match_list[0] = retstr;
515d0ef721eSBaptiste Daroussin
516d0ef721eSBaptiste Daroussin /* add NULL as last pointer to the array */
517d0ef721eSBaptiste Daroussin match_list[matches + 1] = NULL;
518d0ef721eSBaptiste Daroussin
519d0ef721eSBaptiste Daroussin return match_list;
520d0ef721eSBaptiste Daroussin }
521d0ef721eSBaptiste Daroussin
522d0ef721eSBaptiste Daroussin /*
523d0ef721eSBaptiste Daroussin * Sort function for qsort(). Just wrapper around strcasecmp().
524d0ef721eSBaptiste Daroussin */
525d0ef721eSBaptiste Daroussin static int
_fn_qsort_string_compare(const void * i1,const void * i2)526d0ef721eSBaptiste Daroussin _fn_qsort_string_compare(const void *i1, const void *i2)
527d0ef721eSBaptiste Daroussin {
528d0ef721eSBaptiste Daroussin const char *s1 = ((const char * const *)i1)[0];
529d0ef721eSBaptiste Daroussin const char *s2 = ((const char * const *)i2)[0];
530d0ef721eSBaptiste Daroussin
531d0ef721eSBaptiste Daroussin return strcasecmp(s1, s2);
532d0ef721eSBaptiste Daroussin }
533d0ef721eSBaptiste Daroussin
534d0ef721eSBaptiste Daroussin /*
535d0ef721eSBaptiste Daroussin * Display list of strings in columnar format on readline's output stream.
536d0ef721eSBaptiste Daroussin * 'matches' is list of strings, 'num' is number of strings in 'matches',
537d0ef721eSBaptiste Daroussin * 'width' is maximum length of string in 'matches'.
538d0ef721eSBaptiste Daroussin *
539d0ef721eSBaptiste Daroussin * matches[0] is not one of the match strings, but it is counted in
540d0ef721eSBaptiste Daroussin * num, so the strings are matches[1] *through* matches[num-1].
541d0ef721eSBaptiste Daroussin */
542d0ef721eSBaptiste Daroussin void
fn_display_match_list(EditLine * el,char ** matches,size_t num,size_t width,const char * (* app_func)(const char *))543d0ef721eSBaptiste Daroussin fn_display_match_list(EditLine * el, char **matches, size_t num, size_t width,
544d0ef721eSBaptiste Daroussin const char *(*app_func) (const char *))
545d0ef721eSBaptiste Daroussin {
546d0ef721eSBaptiste Daroussin size_t line, lines, col, cols, thisguy;
547d0ef721eSBaptiste Daroussin int screenwidth = el->el_terminal.t_size.h;
548d0ef721eSBaptiste Daroussin if (app_func == NULL)
549d0ef721eSBaptiste Daroussin app_func = append_char_function;
550d0ef721eSBaptiste Daroussin
551d0ef721eSBaptiste Daroussin /* Ignore matches[0]. Avoid 1-based array logic below. */
552d0ef721eSBaptiste Daroussin matches++;
553d0ef721eSBaptiste Daroussin num--;
554d0ef721eSBaptiste Daroussin
555d0ef721eSBaptiste Daroussin /*
556d0ef721eSBaptiste Daroussin * Find out how many entries can be put on one line; count
557d0ef721eSBaptiste Daroussin * with one space between strings the same way it's printed.
558d0ef721eSBaptiste Daroussin */
559d0ef721eSBaptiste Daroussin cols = (size_t)screenwidth / (width + 2);
560d0ef721eSBaptiste Daroussin if (cols == 0)
561d0ef721eSBaptiste Daroussin cols = 1;
562d0ef721eSBaptiste Daroussin
563d0ef721eSBaptiste Daroussin /* how many lines of output, rounded up */
564d0ef721eSBaptiste Daroussin lines = (num + cols - 1) / cols;
565d0ef721eSBaptiste Daroussin
566d0ef721eSBaptiste Daroussin /* Sort the items. */
567d0ef721eSBaptiste Daroussin qsort(matches, num, sizeof(char *), _fn_qsort_string_compare);
568d0ef721eSBaptiste Daroussin
569d0ef721eSBaptiste Daroussin /*
570d0ef721eSBaptiste Daroussin * On the ith line print elements i, i+lines, i+lines*2, etc.
571d0ef721eSBaptiste Daroussin */
572d0ef721eSBaptiste Daroussin for (line = 0; line < lines; line++) {
573d0ef721eSBaptiste Daroussin for (col = 0; col < cols; col++) {
574d0ef721eSBaptiste Daroussin thisguy = line + col * lines;
575d0ef721eSBaptiste Daroussin if (thisguy >= num)
576d0ef721eSBaptiste Daroussin break;
577d0ef721eSBaptiste Daroussin (void)fprintf(el->el_outfile, "%s%s%s",
578d0ef721eSBaptiste Daroussin col == 0 ? "" : " ", matches[thisguy],
579d0ef721eSBaptiste Daroussin (*app_func)(matches[thisguy]));
580d0ef721eSBaptiste Daroussin (void)fprintf(el->el_outfile, "%-*s",
581d0ef721eSBaptiste Daroussin (int) (width - strlen(matches[thisguy])), "");
582d0ef721eSBaptiste Daroussin }
583d0ef721eSBaptiste Daroussin (void)fprintf(el->el_outfile, "\n");
584d0ef721eSBaptiste Daroussin }
585d0ef721eSBaptiste Daroussin }
586d0ef721eSBaptiste Daroussin
587d0ef721eSBaptiste Daroussin static wchar_t *
find_word_to_complete(const wchar_t * cursor,const wchar_t * buffer,const wchar_t * word_break,const wchar_t * special_prefixes,size_t * length,int do_unescape)588d0ef721eSBaptiste Daroussin find_word_to_complete(const wchar_t * cursor, const wchar_t * buffer,
589f9a159daSBaptiste Daroussin const wchar_t * word_break, const wchar_t * special_prefixes, size_t * length,
590f9a159daSBaptiste Daroussin int do_unescape)
591d0ef721eSBaptiste Daroussin {
592d0ef721eSBaptiste Daroussin /* We now look backwards for the start of a filename/variable word */
593d0ef721eSBaptiste Daroussin const wchar_t *ctemp = cursor;
594f9a159daSBaptiste Daroussin wchar_t *temp;
595d0ef721eSBaptiste Daroussin size_t len;
596d0ef721eSBaptiste Daroussin
597d0ef721eSBaptiste Daroussin /* if the cursor is placed at a slash or a quote, we need to find the
598d0ef721eSBaptiste Daroussin * word before it
599d0ef721eSBaptiste Daroussin */
600d0ef721eSBaptiste Daroussin if (ctemp > buffer) {
601d0ef721eSBaptiste Daroussin switch (ctemp[-1]) {
602d0ef721eSBaptiste Daroussin case '\\':
603d0ef721eSBaptiste Daroussin case '\'':
604d0ef721eSBaptiste Daroussin case '"':
605d0ef721eSBaptiste Daroussin ctemp--;
606d0ef721eSBaptiste Daroussin break;
607d0ef721eSBaptiste Daroussin default:
608d0ef721eSBaptiste Daroussin break;
609d0ef721eSBaptiste Daroussin }
610d0ef721eSBaptiste Daroussin }
611d0ef721eSBaptiste Daroussin
612d0ef721eSBaptiste Daroussin for (;;) {
613d0ef721eSBaptiste Daroussin if (ctemp <= buffer)
614d0ef721eSBaptiste Daroussin break;
6157f399375SBaptiste Daroussin if (ctemp - buffer >= 2 && ctemp[-2] == '\\' &&
6167f399375SBaptiste Daroussin needs_escaping(ctemp[-1])) {
617d0ef721eSBaptiste Daroussin ctemp -= 2;
618d0ef721eSBaptiste Daroussin continue;
619f9a159daSBaptiste Daroussin }
6207f399375SBaptiste Daroussin if (wcschr(word_break, ctemp[-1]))
621d0ef721eSBaptiste Daroussin break;
622d0ef721eSBaptiste Daroussin if (special_prefixes && wcschr(special_prefixes, ctemp[-1]))
623d0ef721eSBaptiste Daroussin break;
624d0ef721eSBaptiste Daroussin ctemp--;
625d0ef721eSBaptiste Daroussin }
626d0ef721eSBaptiste Daroussin
627d0ef721eSBaptiste Daroussin len = (size_t) (cursor - ctemp);
628d0ef721eSBaptiste Daroussin if (len == 1 && (ctemp[0] == '\'' || ctemp[0] == '"')) {
629d0ef721eSBaptiste Daroussin len = 0;
630d0ef721eSBaptiste Daroussin ctemp++;
631d0ef721eSBaptiste Daroussin }
632d0ef721eSBaptiste Daroussin *length = len;
633f9a159daSBaptiste Daroussin if (do_unescape) {
634d0ef721eSBaptiste Daroussin wchar_t *unescaped_word = unescape_string(ctemp, len);
635d0ef721eSBaptiste Daroussin if (unescaped_word == NULL)
636d0ef721eSBaptiste Daroussin return NULL;
637d0ef721eSBaptiste Daroussin return unescaped_word;
638d0ef721eSBaptiste Daroussin }
639f9a159daSBaptiste Daroussin temp = el_malloc((len + 1) * sizeof(*temp));
640baff8195SBaptiste Daroussin if (temp == NULL)
641baff8195SBaptiste Daroussin return NULL;
642f9a159daSBaptiste Daroussin (void) wcsncpy(temp, ctemp, len);
643f9a159daSBaptiste Daroussin temp[len] = '\0';
644f9a159daSBaptiste Daroussin return temp;
645f9a159daSBaptiste Daroussin }
646d0ef721eSBaptiste Daroussin
647d0ef721eSBaptiste Daroussin /*
648d0ef721eSBaptiste Daroussin * Complete the word at or before point,
649d0ef721eSBaptiste Daroussin * 'what_to_do' says what to do with the completion.
650d0ef721eSBaptiste Daroussin * \t means do standard completion.
651d0ef721eSBaptiste Daroussin * `?' means list the possible completions.
652d0ef721eSBaptiste Daroussin * `*' means insert all of the possible completions.
653d0ef721eSBaptiste Daroussin * `!' means to do standard completion, and list all possible completions if
654d0ef721eSBaptiste Daroussin * there is more than one.
655d0ef721eSBaptiste Daroussin *
656d0ef721eSBaptiste Daroussin * Note: '*' support is not implemented
657d0ef721eSBaptiste Daroussin * '!' could never be invoked
658d0ef721eSBaptiste Daroussin */
659d0ef721eSBaptiste Daroussin int
fn_complete2(EditLine * el,char * (* complete_func)(const char *,int),char ** (* attempted_completion_function)(const char *,int,int),const wchar_t * word_break,const wchar_t * special_prefixes,const char * (* app_func)(const char *),size_t query_items,int * completion_type,int * over,int * point,int * end,unsigned int flags)66019318a62SBaptiste Daroussin fn_complete2(EditLine *el,
66119318a62SBaptiste Daroussin char *(*complete_func)(const char *, int),
662d0ef721eSBaptiste Daroussin char **(*attempted_completion_function)(const char *, int, int),
663d0ef721eSBaptiste Daroussin const wchar_t *word_break, const wchar_t *special_prefixes,
664d0ef721eSBaptiste Daroussin const char *(*app_func)(const char *), size_t query_items,
66519318a62SBaptiste Daroussin int *completion_type, int *over, int *point, int *end,
66619318a62SBaptiste Daroussin unsigned int flags)
667d0ef721eSBaptiste Daroussin {
668d0ef721eSBaptiste Daroussin const LineInfoW *li;
669d0ef721eSBaptiste Daroussin wchar_t *temp;
670d0ef721eSBaptiste Daroussin char **matches;
671d0ef721eSBaptiste Daroussin char *completion;
672d0ef721eSBaptiste Daroussin size_t len;
673d0ef721eSBaptiste Daroussin int what_to_do = '\t';
674d0ef721eSBaptiste Daroussin int retval = CC_NORM;
67519318a62SBaptiste Daroussin int do_unescape = flags & FN_QUOTE_MATCH;
676d0ef721eSBaptiste Daroussin
677d0ef721eSBaptiste Daroussin if (el->el_state.lastcmd == el->el_state.thiscmd)
678d0ef721eSBaptiste Daroussin what_to_do = '?';
679d0ef721eSBaptiste Daroussin
680d0ef721eSBaptiste Daroussin /* readline's rl_complete() has to be told what we did... */
681d0ef721eSBaptiste Daroussin if (completion_type != NULL)
682d0ef721eSBaptiste Daroussin *completion_type = what_to_do;
683d0ef721eSBaptiste Daroussin
68419318a62SBaptiste Daroussin if (!complete_func)
68519318a62SBaptiste Daroussin complete_func = fn_filename_completion_function;
686d0ef721eSBaptiste Daroussin if (!app_func)
687d0ef721eSBaptiste Daroussin app_func = append_char_function;
688d0ef721eSBaptiste Daroussin
689d0ef721eSBaptiste Daroussin li = el_wline(el);
690d0ef721eSBaptiste Daroussin temp = find_word_to_complete(li->cursor,
691f9a159daSBaptiste Daroussin li->buffer, word_break, special_prefixes, &len, do_unescape);
692d0ef721eSBaptiste Daroussin if (temp == NULL)
693d0ef721eSBaptiste Daroussin goto out;
694d0ef721eSBaptiste Daroussin
695d0ef721eSBaptiste Daroussin /* these can be used by function called in completion_matches() */
696d0ef721eSBaptiste Daroussin /* or (*attempted_completion_function)() */
697d0ef721eSBaptiste Daroussin if (point != NULL)
698d0ef721eSBaptiste Daroussin *point = (int)(li->cursor - li->buffer);
699d0ef721eSBaptiste Daroussin if (end != NULL)
700d0ef721eSBaptiste Daroussin *end = (int)(li->lastchar - li->buffer);
701d0ef721eSBaptiste Daroussin
702d0ef721eSBaptiste Daroussin if (attempted_completion_function) {
703d0ef721eSBaptiste Daroussin int cur_off = (int)(li->cursor - li->buffer);
704d0ef721eSBaptiste Daroussin matches = (*attempted_completion_function)(
705d0ef721eSBaptiste Daroussin ct_encode_string(temp, &el->el_scratch),
706d0ef721eSBaptiste Daroussin cur_off - (int)len, cur_off);
707d0ef721eSBaptiste Daroussin } else
708d0ef721eSBaptiste Daroussin matches = NULL;
709d0ef721eSBaptiste Daroussin if (!attempted_completion_function ||
710d0ef721eSBaptiste Daroussin (over != NULL && !*over && !matches))
711d0ef721eSBaptiste Daroussin matches = completion_matches(
71219318a62SBaptiste Daroussin ct_encode_string(temp, &el->el_scratch), complete_func);
713d0ef721eSBaptiste Daroussin
714d0ef721eSBaptiste Daroussin if (over != NULL)
715d0ef721eSBaptiste Daroussin *over = 0;
716d0ef721eSBaptiste Daroussin
717f9a159daSBaptiste Daroussin if (matches == NULL) {
718f9a159daSBaptiste Daroussin goto out;
719f9a159daSBaptiste Daroussin }
720d0ef721eSBaptiste Daroussin int i;
721d0ef721eSBaptiste Daroussin size_t matches_num, maxlen, match_len, match_display=1;
722d0ef721eSBaptiste Daroussin int single_match = matches[2] == NULL &&
723d0ef721eSBaptiste Daroussin (matches[1] == NULL || strcmp(matches[0], matches[1]) == 0);
724d0ef721eSBaptiste Daroussin
725d0ef721eSBaptiste Daroussin retval = CC_REFRESH;
726d0ef721eSBaptiste Daroussin
727d0ef721eSBaptiste Daroussin if (matches[0][0] != '\0') {
728d0ef721eSBaptiste Daroussin el_deletestr(el, (int)len);
72919318a62SBaptiste Daroussin if (flags & FN_QUOTE_MATCH)
730d0ef721eSBaptiste Daroussin completion = escape_filename(el, matches[0],
731d0ef721eSBaptiste Daroussin single_match, app_func);
732d0ef721eSBaptiste Daroussin else
733d0ef721eSBaptiste Daroussin completion = strdup(matches[0]);
734d0ef721eSBaptiste Daroussin if (completion == NULL)
73591f76417SBaptiste Daroussin goto out2;
736f9a159daSBaptiste Daroussin
737f9a159daSBaptiste Daroussin /*
738f9a159daSBaptiste Daroussin * Replace the completed string with the common part of
739f9a159daSBaptiste Daroussin * all possible matches if there is a possible completion.
740f9a159daSBaptiste Daroussin */
741f9a159daSBaptiste Daroussin el_winsertstr(el,
742f9a159daSBaptiste Daroussin ct_decode_string(completion, &el->el_scratch));
743f9a159daSBaptiste Daroussin
74419318a62SBaptiste Daroussin if (single_match && attempted_completion_function &&
74519318a62SBaptiste Daroussin !(flags & FN_QUOTE_MATCH))
74619318a62SBaptiste Daroussin {
747f9a159daSBaptiste Daroussin /*
748f9a159daSBaptiste Daroussin * We found an exact match. Add a space after
749f9a159daSBaptiste Daroussin * it, unless we do filename completion and the
750d0ef721eSBaptiste Daroussin * object is a directory. Also do necessary
751d0ef721eSBaptiste Daroussin * escape quoting
752d0ef721eSBaptiste Daroussin */
753f9a159daSBaptiste Daroussin el_winsertstr(el, ct_decode_string(
754f9a159daSBaptiste Daroussin (*app_func)(completion), &el->el_scratch));
755d0ef721eSBaptiste Daroussin }
756d0ef721eSBaptiste Daroussin free(completion);
757d0ef721eSBaptiste Daroussin }
758d0ef721eSBaptiste Daroussin
759d0ef721eSBaptiste Daroussin
760d0ef721eSBaptiste Daroussin if (!single_match && (what_to_do == '!' || what_to_do == '?')) {
761d0ef721eSBaptiste Daroussin /*
762d0ef721eSBaptiste Daroussin * More than one match and requested to list possible
763d0ef721eSBaptiste Daroussin * matches.
764d0ef721eSBaptiste Daroussin */
765d0ef721eSBaptiste Daroussin
766d0ef721eSBaptiste Daroussin for(i = 1, maxlen = 0; matches[i]; i++) {
767d0ef721eSBaptiste Daroussin match_len = strlen(matches[i]);
768d0ef721eSBaptiste Daroussin if (match_len > maxlen)
769d0ef721eSBaptiste Daroussin maxlen = match_len;
770d0ef721eSBaptiste Daroussin }
771d0ef721eSBaptiste Daroussin /* matches[1] through matches[i-1] are available */
772d0ef721eSBaptiste Daroussin matches_num = (size_t)(i - 1);
773d0ef721eSBaptiste Daroussin
774d0ef721eSBaptiste Daroussin /* newline to get on next line from command line */
775d0ef721eSBaptiste Daroussin (void)fprintf(el->el_outfile, "\n");
776d0ef721eSBaptiste Daroussin
777d0ef721eSBaptiste Daroussin /*
778d0ef721eSBaptiste Daroussin * If there are too many items, ask user for display
779d0ef721eSBaptiste Daroussin * confirmation.
780d0ef721eSBaptiste Daroussin */
781d0ef721eSBaptiste Daroussin if (matches_num > query_items) {
782d0ef721eSBaptiste Daroussin (void)fprintf(el->el_outfile,
783d0ef721eSBaptiste Daroussin "Display all %zu possibilities? (y or n) ",
784d0ef721eSBaptiste Daroussin matches_num);
785d0ef721eSBaptiste Daroussin (void)fflush(el->el_outfile);
786d0ef721eSBaptiste Daroussin if (getc(stdin) != 'y')
787d0ef721eSBaptiste Daroussin match_display = 0;
788d0ef721eSBaptiste Daroussin (void)fprintf(el->el_outfile, "\n");
789d0ef721eSBaptiste Daroussin }
790d0ef721eSBaptiste Daroussin
791d0ef721eSBaptiste Daroussin if (match_display) {
792d0ef721eSBaptiste Daroussin /*
793d0ef721eSBaptiste Daroussin * Interface of this function requires the
794d0ef721eSBaptiste Daroussin * strings be matches[1..num-1] for compat.
795d0ef721eSBaptiste Daroussin * We have matches_num strings not counting
796d0ef721eSBaptiste Daroussin * the prefix in matches[0], so we need to
797d0ef721eSBaptiste Daroussin * add 1 to matches_num for the call.
798d0ef721eSBaptiste Daroussin */
799d0ef721eSBaptiste Daroussin fn_display_match_list(el, matches,
800d0ef721eSBaptiste Daroussin matches_num+1, maxlen, app_func);
801d0ef721eSBaptiste Daroussin }
802d0ef721eSBaptiste Daroussin retval = CC_REDISPLAY;
803d0ef721eSBaptiste Daroussin } else if (matches[0][0]) {
804d0ef721eSBaptiste Daroussin /*
805d0ef721eSBaptiste Daroussin * There was some common match, but the name was
806d0ef721eSBaptiste Daroussin * not complete enough. Next tab will print possible
807d0ef721eSBaptiste Daroussin * completions.
808d0ef721eSBaptiste Daroussin */
809d0ef721eSBaptiste Daroussin el_beep(el);
810d0ef721eSBaptiste Daroussin } else {
811d0ef721eSBaptiste Daroussin /* lcd is not a valid object - further specification */
812d0ef721eSBaptiste Daroussin /* is needed */
813d0ef721eSBaptiste Daroussin el_beep(el);
814d0ef721eSBaptiste Daroussin retval = CC_NORM;
815d0ef721eSBaptiste Daroussin }
816d0ef721eSBaptiste Daroussin
817d0ef721eSBaptiste Daroussin /* free elements of array and the array itself */
81891f76417SBaptiste Daroussin out2:
819d0ef721eSBaptiste Daroussin for (i = 0; matches[i]; i++)
820d0ef721eSBaptiste Daroussin el_free(matches[i]);
821d0ef721eSBaptiste Daroussin el_free(matches);
822d0ef721eSBaptiste Daroussin matches = NULL;
823d0ef721eSBaptiste Daroussin
824d0ef721eSBaptiste Daroussin out:
825d0ef721eSBaptiste Daroussin el_free(temp);
826d0ef721eSBaptiste Daroussin return retval;
827d0ef721eSBaptiste Daroussin }
828d0ef721eSBaptiste Daroussin
82919318a62SBaptiste Daroussin int
fn_complete(EditLine * el,char * (* complete_func)(const char *,int),char ** (* attempted_completion_function)(const char *,int,int),const wchar_t * word_break,const wchar_t * special_prefixes,const char * (* app_func)(const char *),size_t query_items,int * completion_type,int * over,int * point,int * end)83019318a62SBaptiste Daroussin fn_complete(EditLine *el,
83119318a62SBaptiste Daroussin char *(*complete_func)(const char *, int),
83219318a62SBaptiste Daroussin char **(*attempted_completion_function)(const char *, int, int),
83319318a62SBaptiste Daroussin const wchar_t *word_break, const wchar_t *special_prefixes,
83419318a62SBaptiste Daroussin const char *(*app_func)(const char *), size_t query_items,
83519318a62SBaptiste Daroussin int *completion_type, int *over, int *point, int *end)
83619318a62SBaptiste Daroussin {
83719318a62SBaptiste Daroussin return fn_complete2(el, complete_func, attempted_completion_function,
83819318a62SBaptiste Daroussin word_break, special_prefixes, app_func, query_items,
83919318a62SBaptiste Daroussin completion_type, over, point, end,
84019318a62SBaptiste Daroussin attempted_completion_function ? 0 : FN_QUOTE_MATCH);
84119318a62SBaptiste Daroussin }
84219318a62SBaptiste Daroussin
843d0ef721eSBaptiste Daroussin /*
844d0ef721eSBaptiste Daroussin * el-compatible wrapper around rl_complete; needed for key binding
845d0ef721eSBaptiste Daroussin */
846d0ef721eSBaptiste Daroussin /* ARGSUSED */
847d0ef721eSBaptiste Daroussin unsigned char
_el_fn_complete(EditLine * el,int ch)848d0ef721eSBaptiste Daroussin _el_fn_complete(EditLine *el, int ch __attribute__((__unused__)))
849d0ef721eSBaptiste Daroussin {
850d0ef721eSBaptiste Daroussin return (unsigned char)fn_complete(el, NULL, NULL,
851d0ef721eSBaptiste Daroussin break_chars, NULL, NULL, (size_t)100,
852d0ef721eSBaptiste Daroussin NULL, NULL, NULL, NULL);
853d0ef721eSBaptiste Daroussin }
85496c81c97SBaptiste Daroussin
85596c81c97SBaptiste Daroussin /*
85696c81c97SBaptiste Daroussin * el-compatible wrapper around rl_complete; needed for key binding
85796c81c97SBaptiste Daroussin */
85896c81c97SBaptiste Daroussin /* ARGSUSED */
85996c81c97SBaptiste Daroussin unsigned char
_el_fn_sh_complete(EditLine * el,int ch)86096c81c97SBaptiste Daroussin _el_fn_sh_complete(EditLine *el, int ch)
86196c81c97SBaptiste Daroussin {
86296c81c97SBaptiste Daroussin return _el_fn_complete(el, ch);
86396c81c97SBaptiste Daroussin }
864