#include <config.h>
#include "edit_locl.h"
RCSID("$Id$");
static int
compare(const void *p1, const void *p2)
{
char * const *v1;
char * const *v2;
v1 = (char * const *)p1;
v2 = (char * const *)p2;
return strcmp(*v1, *v2);
}
static int
FindMatches(char *dir, char *file, char ***avp)
{
char **av;
char **new;
char *p;
DIR *dp;
DIRENTRY *ep;
size_t ac;
size_t len;
if ((dp = opendir(dir)) == NULL)
return 0;
av = NULL;
ac = 0;
len = strlen(file);
while ((ep = readdir(dp)) != NULL) {
p = ep->d_name;
if (p[0] == '.' && (p[1] == '\0' || (p[1] == '.' && p[2] == '\0')))
continue;
if (len && strncmp(p, file, len) != 0)
continue;
if ((ac % MEM_INC) == 0) {
if ((new = malloc(sizeof(char*) * (ac + MEM_INC))) == NULL)
break;
if (ac) {
memcpy(new, av, ac * sizeof (char **));
free(av);
}
*avp = av = new;
}
if ((av[ac] = strdup(p)) == NULL) {
if (ac == 0)
free(av);
break;
}
ac++;
}
(void)closedir(dp);
if (ac)
qsort(av, ac, sizeof (char **), compare);
return ac;
}
static int SplitPath(char *path, char **dirpart, char **filepart)
{
static char DOT[] = ".";
char *dpart;
char *fpart;
if ((fpart = strrchr(path, '/')) == NULL) {
if ((dpart = strdup(DOT)) == NULL)
return -1;
if ((fpart = strdup(path)) == NULL) {
free(dpart);
return -1;
}
}
else {
if ((dpart = strdup(path)) == NULL)
return -1;
dpart[fpart - path] = '\0';
if ((fpart = strdup(fpart + 1)) == NULL) {
free(dpart);
return -1;
}
}
*dirpart = dpart;
*filepart = fpart;
return 0;
}
static char *
rl_complete_filename(char *pathname, int *unique)
{
char **av;
char *new;
char *p;
size_t ac;
size_t end;
size_t i;
size_t j;
size_t len;
char *s;
ac = rl_list_possib(pathname, &av);
if(ac == 0)
return NULL;
s = strrchr(pathname, '/');
if(s == NULL)
len = strlen(pathname);
else
len = strlen(s + 1);
p = NULL;
if (ac == 1) {
*unique = 1;
j = strlen(av[0]) - len + 2;
if ((p = malloc(j + 1)) != NULL) {
memcpy(p, av[0] + len, j);
asprintf(&new, "%s%s", pathname, p);
if(new != NULL) {
rl_add_slash(new, p, j + 1);
free(new);
}
}
}
else {
*unique = 0;
if (len) {
for (i = len, end = strlen(av[0]); i < end; i++)
for (j = 1; j < ac; j++)
if (av[0][i] != av[j][i])
goto breakout;
breakout:
if (i > len) {
j = i - len + 1;
if ((p = malloc(j)) != NULL) {
memcpy(p, av[0] + len, j);
p[j - 1] = '\0';
}
}
}
}
for (i = 0; i < ac; i++)
free(av[i]);
free(av);
return p;
}
static rl_complete_func_t complete_func = rl_complete_filename;
char *
rl_complete(char *pathname, int *unique)
{
return (*complete_func)(pathname, unique);
}
rl_complete_func_t
rl_set_complete_func(rl_complete_func_t func)
{
rl_complete_func_t old = complete_func;
complete_func = func;
return old;
}
static int
rl_list_possib_filename(char *pathname, char ***avp)
{
char *dir;
char *file;
int ac;
if (SplitPath(pathname, &dir, &file) < 0)
return 0;
ac = FindMatches(dir, file, avp);
free(dir);
free(file);
return ac;
}
static rl_list_possib_func_t list_possib_func = rl_list_possib_filename;
int
rl_list_possib(char *pathname, char ***avp)
{
return (*list_possib_func)(pathname, avp);
}
rl_list_possib_func_t
rl_set_list_possib_func(rl_list_possib_func_t func)
{
rl_list_possib_func_t old = list_possib_func;
list_possib_func = func;
return old;
}