Index: fusl/src/regex/glob.c |
diff --git a/fusl/src/regex/glob.c b/fusl/src/regex/glob.c |
index 6affee040c310f435008d227c73bfee7eacab3cb..56410212a7c4c7730d76be038c8b738a19fea2f1 100644 |
--- a/fusl/src/regex/glob.c |
+++ b/fusl/src/regex/glob.c |
@@ -9,229 +9,241 @@ |
#include <stddef.h> |
#include "libc.h" |
-struct match |
-{ |
- struct match *next; |
- char name[1]; |
+struct match { |
+ struct match* next; |
+ char name[1]; |
}; |
-static int is_literal(const char *p, int useesc) |
-{ |
- int bracket = 0; |
- for (; *p; p++) { |
- switch (*p) { |
- case '\\': |
- if (!useesc) break; |
- case '?': |
- case '*': |
- return 0; |
- case '[': |
- bracket = 1; |
- break; |
- case ']': |
- if (bracket) return 0; |
- break; |
- } |
- } |
- return 1; |
+static int is_literal(const char* p, int useesc) { |
+ int bracket = 0; |
+ for (; *p; p++) { |
+ switch (*p) { |
+ case '\\': |
+ if (!useesc) |
+ break; |
+ case '?': |
+ case '*': |
+ return 0; |
+ case '[': |
+ bracket = 1; |
+ break; |
+ case ']': |
+ if (bracket) |
+ return 0; |
+ break; |
+ } |
+ } |
+ return 1; |
} |
-static int append(struct match **tail, const char *name, size_t len, int mark) |
-{ |
- struct match *new = malloc(sizeof(struct match) + len + 1); |
- if (!new) return -1; |
- (*tail)->next = new; |
- new->next = NULL; |
- strcpy(new->name, name); |
- if (mark) strcat(new->name, "/"); |
- *tail = new; |
- return 0; |
+static int append(struct match** tail, const char* name, size_t len, int mark) { |
+ struct match* new = malloc(sizeof(struct match) + len + 1); |
+ if (!new) |
+ return -1; |
+ (*tail)->next = new; |
+ new->next = NULL; |
+ strcpy(new->name, name); |
+ if (mark) |
+ strcat(new->name, "/"); |
+ *tail = new; |
+ return 0; |
} |
-static int match_in_dir(const char *d, const char *p, int flags, int (*errfunc)(const char *path, int err), struct match **tail) |
-{ |
- DIR *dir; |
- struct dirent de_buf, *de; |
- char pat[strlen(p)+1]; |
- char *p2; |
- size_t l = strlen(d); |
- int literal; |
- int fnm_flags= ((flags & GLOB_NOESCAPE) ? FNM_NOESCAPE : 0) |
- | ((!(flags & GLOB_PERIOD)) ? FNM_PERIOD : 0); |
- int error; |
- |
- if ((p2 = strchr(p, '/'))) { |
- strcpy(pat, p); |
- pat[p2-p] = 0; |
- for (; *p2 == '/'; p2++); |
- p = pat; |
- } |
- literal = is_literal(p, !(flags & GLOB_NOESCAPE)); |
- if (*d == '/' && !*(d+1)) l = 0; |
- |
- /* rely on opendir failing for nondirectory objects */ |
- dir = opendir(*d ? d : "."); |
- error = errno; |
- if (!dir) { |
- /* this is not an error -- we let opendir call stat for us */ |
- if (error == ENOTDIR) return 0; |
- if (error == EACCES && !*p) { |
- struct stat st; |
- if (!stat(d, &st) && S_ISDIR(st.st_mode)) { |
- if (append(tail, d, l, l)) |
- return GLOB_NOSPACE; |
- return 0; |
- } |
- } |
- if (errfunc(d, error) || (flags & GLOB_ERR)) |
- return GLOB_ABORTED; |
- return 0; |
- } |
- if (!*p) { |
- error = append(tail, d, l, l) ? GLOB_NOSPACE : 0; |
- closedir(dir); |
- return error; |
- } |
- while (!(error = readdir_r(dir, &de_buf, &de)) && de) { |
- char namebuf[l+de->d_reclen+2], *name = namebuf; |
- if (!literal && fnmatch(p, de->d_name, fnm_flags)) |
- continue; |
- if (literal && strcmp(p, de->d_name)) |
- continue; |
- if (p2 && de->d_type && !S_ISDIR(de->d_type<<12) && !S_ISLNK(de->d_type<<12)) |
- continue; |
- if (*d) { |
- memcpy(name, d, l); |
- name[l] = '/'; |
- strcpy(name+l+1, de->d_name); |
- } else { |
- name = de->d_name; |
- } |
- if (p2) { |
- if ((error = match_in_dir(name, p2, flags, errfunc, tail))) { |
- closedir(dir); |
- return error; |
- } |
- } else { |
- int mark = 0; |
- if (flags & GLOB_MARK) { |
- if (de->d_type && !S_ISLNK(de->d_type<<12)) |
- mark = S_ISDIR(de->d_type<<12); |
- else { |
- struct stat st; |
- stat(name, &st); |
- mark = S_ISDIR(st.st_mode); |
- } |
- } |
- if (append(tail, name, l+de->d_reclen+1, mark)) { |
- closedir(dir); |
- return GLOB_NOSPACE; |
- } |
- } |
- } |
- closedir(dir); |
- if (error && (errfunc(d, error) || (flags & GLOB_ERR))) |
- return GLOB_ABORTED; |
- return 0; |
+static int match_in_dir(const char* d, |
+ const char* p, |
+ int flags, |
+ int (*errfunc)(const char* path, int err), |
+ struct match** tail) { |
+ DIR* dir; |
+ struct dirent de_buf, *de; |
+ char pat[strlen(p) + 1]; |
+ char* p2; |
+ size_t l = strlen(d); |
+ int literal; |
+ int fnm_flags = ((flags & GLOB_NOESCAPE) ? FNM_NOESCAPE : 0) | |
+ ((!(flags & GLOB_PERIOD)) ? FNM_PERIOD : 0); |
+ int error; |
+ |
+ if ((p2 = strchr(p, '/'))) { |
+ strcpy(pat, p); |
+ pat[p2 - p] = 0; |
+ for (; *p2 == '/'; p2++) |
+ ; |
+ p = pat; |
+ } |
+ literal = is_literal(p, !(flags & GLOB_NOESCAPE)); |
+ if (*d == '/' && !*(d + 1)) |
+ l = 0; |
+ |
+ /* rely on opendir failing for nondirectory objects */ |
+ dir = opendir(*d ? d : "."); |
+ error = errno; |
+ if (!dir) { |
+ /* this is not an error -- we let opendir call stat for us */ |
+ if (error == ENOTDIR) |
+ return 0; |
+ if (error == EACCES && !*p) { |
+ struct stat st; |
+ if (!stat(d, &st) && S_ISDIR(st.st_mode)) { |
+ if (append(tail, d, l, l)) |
+ return GLOB_NOSPACE; |
+ return 0; |
+ } |
+ } |
+ if (errfunc(d, error) || (flags & GLOB_ERR)) |
+ return GLOB_ABORTED; |
+ return 0; |
+ } |
+ if (!*p) { |
+ error = append(tail, d, l, l) ? GLOB_NOSPACE : 0; |
+ closedir(dir); |
+ return error; |
+ } |
+ while (!(error = readdir_r(dir, &de_buf, &de)) && de) { |
+ char namebuf[l + de->d_reclen + 2], *name = namebuf; |
+ if (!literal && fnmatch(p, de->d_name, fnm_flags)) |
+ continue; |
+ if (literal && strcmp(p, de->d_name)) |
+ continue; |
+ if (p2 && de->d_type && !S_ISDIR(de->d_type << 12) && |
+ !S_ISLNK(de->d_type << 12)) |
+ continue; |
+ if (*d) { |
+ memcpy(name, d, l); |
+ name[l] = '/'; |
+ strcpy(name + l + 1, de->d_name); |
+ } else { |
+ name = de->d_name; |
+ } |
+ if (p2) { |
+ if ((error = match_in_dir(name, p2, flags, errfunc, tail))) { |
+ closedir(dir); |
+ return error; |
+ } |
+ } else { |
+ int mark = 0; |
+ if (flags & GLOB_MARK) { |
+ if (de->d_type && !S_ISLNK(de->d_type << 12)) |
+ mark = S_ISDIR(de->d_type << 12); |
+ else { |
+ struct stat st; |
+ stat(name, &st); |
+ mark = S_ISDIR(st.st_mode); |
+ } |
+ } |
+ if (append(tail, name, l + de->d_reclen + 1, mark)) { |
+ closedir(dir); |
+ return GLOB_NOSPACE; |
+ } |
+ } |
+ } |
+ closedir(dir); |
+ if (error && (errfunc(d, error) || (flags & GLOB_ERR))) |
+ return GLOB_ABORTED; |
+ return 0; |
} |
-static int ignore_err(const char *path, int err) |
-{ |
- return 0; |
+static int ignore_err(const char* path, int err) { |
+ return 0; |
} |
-static void freelist(struct match *head) |
-{ |
- struct match *match, *next; |
- for (match=head->next; match; match=next) { |
- next = match->next; |
- free(match); |
- } |
+static void freelist(struct match* head) { |
+ struct match *match, *next; |
+ for (match = head->next; match; match = next) { |
+ next = match->next; |
+ free(match); |
+ } |
} |
-static int sort(const void *a, const void *b) |
-{ |
- return strcmp(*(const char **)a, *(const char **)b); |
+static int sort(const void* a, const void* b) { |
+ return strcmp(*(const char**)a, *(const char**)b); |
} |
-int glob(const char *restrict pat, int flags, int (*errfunc)(const char *path, int err), glob_t *restrict g) |
-{ |
- const char *p=pat, *d; |
- struct match head = { .next = NULL }, *tail = &head; |
- size_t cnt, i; |
- size_t offs = (flags & GLOB_DOOFFS) ? g->gl_offs : 0; |
- int error = 0; |
- |
- if (*p == '/') { |
- for (; *p == '/'; p++); |
- d = "/"; |
- } else { |
- d = ""; |
- } |
- |
- if (strlen(p) > PATH_MAX) return GLOB_NOSPACE; |
- |
- if (!errfunc) errfunc = ignore_err; |
- |
- if (!(flags & GLOB_APPEND)) { |
- g->gl_offs = offs; |
- g->gl_pathc = 0; |
- g->gl_pathv = NULL; |
- } |
- |
- if (*p) error = match_in_dir(d, p, flags, errfunc, &tail); |
- if (error == GLOB_NOSPACE) { |
- freelist(&head); |
- return error; |
- } |
- |
- for (cnt=0, tail=head.next; tail; tail=tail->next, cnt++); |
- if (!cnt) { |
- if (flags & GLOB_NOCHECK) { |
- tail = &head; |
- if (append(&tail, pat, strlen(pat), 0)) |
- return GLOB_NOSPACE; |
- cnt++; |
- } else |
- return GLOB_NOMATCH; |
- } |
- |
- if (flags & GLOB_APPEND) { |
- char **pathv = realloc(g->gl_pathv, (offs + g->gl_pathc + cnt + 1) * sizeof(char *)); |
- if (!pathv) { |
- freelist(&head); |
- return GLOB_NOSPACE; |
- } |
- g->gl_pathv = pathv; |
- offs += g->gl_pathc; |
- } else { |
- g->gl_pathv = malloc((offs + cnt + 1) * sizeof(char *)); |
- if (!g->gl_pathv) { |
- freelist(&head); |
- return GLOB_NOSPACE; |
- } |
- for (i=0; i<offs; i++) |
- g->gl_pathv[i] = NULL; |
- } |
- for (i=0, tail=head.next; i<cnt; tail=tail->next, i++) |
- g->gl_pathv[offs + i] = tail->name; |
- g->gl_pathv[offs + i] = NULL; |
- g->gl_pathc += cnt; |
- |
- if (!(flags & GLOB_NOSORT)) |
- qsort(g->gl_pathv+offs, cnt, sizeof(char *), sort); |
- |
- return error; |
+int glob(const char* restrict pat, |
+ int flags, |
+ int (*errfunc)(const char* path, int err), |
+ glob_t* restrict g) { |
+ const char *p = pat, *d; |
+ struct match head = {.next = NULL}, *tail = &head; |
+ size_t cnt, i; |
+ size_t offs = (flags & GLOB_DOOFFS) ? g->gl_offs : 0; |
+ int error = 0; |
+ |
+ if (*p == '/') { |
+ for (; *p == '/'; p++) |
+ ; |
+ d = "/"; |
+ } else { |
+ d = ""; |
+ } |
+ |
+ if (strlen(p) > PATH_MAX) |
+ return GLOB_NOSPACE; |
+ |
+ if (!errfunc) |
+ errfunc = ignore_err; |
+ |
+ if (!(flags & GLOB_APPEND)) { |
+ g->gl_offs = offs; |
+ g->gl_pathc = 0; |
+ g->gl_pathv = NULL; |
+ } |
+ |
+ if (*p) |
+ error = match_in_dir(d, p, flags, errfunc, &tail); |
+ if (error == GLOB_NOSPACE) { |
+ freelist(&head); |
+ return error; |
+ } |
+ |
+ for (cnt = 0, tail = head.next; tail; tail = tail->next, cnt++) |
+ ; |
+ if (!cnt) { |
+ if (flags & GLOB_NOCHECK) { |
+ tail = &head; |
+ if (append(&tail, pat, strlen(pat), 0)) |
+ return GLOB_NOSPACE; |
+ cnt++; |
+ } else |
+ return GLOB_NOMATCH; |
+ } |
+ |
+ if (flags & GLOB_APPEND) { |
+ char** pathv = |
+ realloc(g->gl_pathv, (offs + g->gl_pathc + cnt + 1) * sizeof(char*)); |
+ if (!pathv) { |
+ freelist(&head); |
+ return GLOB_NOSPACE; |
+ } |
+ g->gl_pathv = pathv; |
+ offs += g->gl_pathc; |
+ } else { |
+ g->gl_pathv = malloc((offs + cnt + 1) * sizeof(char*)); |
+ if (!g->gl_pathv) { |
+ freelist(&head); |
+ return GLOB_NOSPACE; |
+ } |
+ for (i = 0; i < offs; i++) |
+ g->gl_pathv[i] = NULL; |
+ } |
+ for (i = 0, tail = head.next; i < cnt; tail = tail->next, i++) |
+ g->gl_pathv[offs + i] = tail->name; |
+ g->gl_pathv[offs + i] = NULL; |
+ g->gl_pathc += cnt; |
+ |
+ if (!(flags & GLOB_NOSORT)) |
+ qsort(g->gl_pathv + offs, cnt, sizeof(char*), sort); |
+ |
+ return error; |
} |
-void globfree(glob_t *g) |
-{ |
- size_t i; |
- for (i=0; i<g->gl_pathc; i++) |
- free(g->gl_pathv[g->gl_offs + i] - offsetof(struct match, name)); |
- free(g->gl_pathv); |
- g->gl_pathc = 0; |
- g->gl_pathv = NULL; |
+void globfree(glob_t* g) { |
+ size_t i; |
+ for (i = 0; i < g->gl_pathc; i++) |
+ free(g->gl_pathv[g->gl_offs + i] - offsetof(struct match, name)); |
+ free(g->gl_pathv); |
+ g->gl_pathc = 0; |
+ g->gl_pathv = NULL; |
} |
LFS64(glob); |