summaryrefslogtreecommitdiff
path: root/scripts/bb_mkdep.c
diff options
context:
space:
mode:
author"Vladimir N. Oleynik"2005-09-13 16:50:53 +0000
committer"Vladimir N. Oleynik"2005-09-13 16:50:53 +0000
commit676e95ea3da081f52325233f5aa89f04b097f452 (patch)
tree0392c8888e17ca58d0efd38e727028f0ef71dc77 /scripts/bb_mkdep.c
parent6943a9489ebdf93460e3e0500938af02f08530bf (diff)
downloadbusybox-676e95ea3da081f52325233f5aa89f04b097f452.zip
busybox-676e95ea3da081f52325233f5aa89f04b097f452.tar.gz
bb_mkdep release. speed up *3, clearing, more comments
Diffstat (limited to 'scripts/bb_mkdep.c')
-rw-r--r--scripts/bb_mkdep.c483
1 files changed, 266 insertions, 217 deletions
diff --git a/scripts/bb_mkdep.c b/scripts/bb_mkdep.c
index 68b3f5b..ee84567 100644
--- a/scripts/bb_mkdep.c
+++ b/scripts/bb_mkdep.c
@@ -1,5 +1,5 @@
/*
- * Another dependences for Makefile mashine generator
+ * Another dependences for Makefile fast mashine generator
*
* Copyright (C) 2005 by Vladimir Oleynik <dzo@simtreas.ru>
*
@@ -19,6 +19,7 @@
* -w (show warning if include files not found)
* -k include/config (default: INCLUDE_CONFIG_PATH)
* -c include/config.h (configs, default: INCLUDE_CONFIG_KEYS_PATH)
+ * dirs_for_scan (default ".")
*/
#define LOCAL_INCLUDE_PATH "include"
@@ -47,9 +48,13 @@ typedef struct BB_KEYS {
struct BB_KEYS *next;
} bb_key_t;
+typedef struct FILE_LIST {
+ char *name;
+ char *ext; /* *.c or *.h, point to last char */
+ long size;
+} file_list_t;
/* partial and simplify libbb routine */
-
static void bb_error_d(const char *s, ...) __attribute__ ((noreturn, format (printf, 1, 2)));
static char * bb_asprint(const char *format, ...) __attribute__ ((format (printf, 1, 2)));
@@ -66,15 +71,20 @@ static char *bb_simplify_path(const char *path);
/* for lexical analyzier */
static bb_key_t *key_top;
+static llist_t *configs;
static void parse_inc(const char *include, const char *fname);
static void parse_conf_opt(char *opt, const char *val, size_t rsz);
-static char first_char_conf_opts[256]; /* for speed */
+/* for speed triks */
+static char first_chars[257]; /* + L_EOF */
-#define CHECK_ONLY 0
-#define MAKE_NEW 1
-static bb_key_t *find_already(bb_key_t *k, const char *nk, int flg_save_new);
+static int pagesizem1;
+static size_t mema_id = 128; /* first allocated for id */
+static char *id_s;
+
+static bb_key_t *check_key(bb_key_t *k, const char *nk);
+static bb_key_t *make_new_key(bb_key_t *k, const char *nk);
#define yy_error_d(s) bb_error_d("%s:%d hmm, %s", fname, line, s)
@@ -82,40 +92,41 @@ static bb_key_t *find_already(bb_key_t *k, const char *nk, int flg_save_new);
#define S 0 /* start state */
#define STR '"' /* string */
#define CHR '\'' /* char */
-#define REM '*' /* block comment */
+#define REM '/' /* block comment */
+#define BS '\\' /* back slash */
#define POUND '#' /* # */
#define I 'i' /* #include preprocessor`s directive */
#define D 'd' /* #define preprocessor`s directive */
#define U 'u' /* #undef preprocessor`s directive */
#define LI 'I' /* #include "... */
#define DK 'K' /* #define KEY... (config mode) */
-#define DV 'V' /* #define KEY "... or #define KEY '... */
-#define NLC 'n' /* \+\n */
-#define ANY '?' /* skip unparsed . */
+#define DV 'V' /* #define KEY "VALUE or #define KEY 'VALUE */
+#define NLC 'n' /* \ and \n */
+#define ANY '*' /* any unparsed chars */
+#define L_EOF 256
/* [A-Z_a-z] */
#define ID(c) ((c >= 'A' && c <= 'Z') || (c >= 'a' && c <= 'z') || c == '_')
/* [A-Z_a-z0-9] */
#define ISALNUM(c) (ID(c) || (c >= '0' && c <= '9'))
-#define getc1() do { c = (optr >= oend) ? EOF : *optr++; } while(0)
+#define getc1() do { c = (optr >= oend) ? L_EOF : *optr++; } while(0)
#define ungetc1() optr--
-#define put_id(c) do { if(id_len == mema_id) \
- id = xrealloc(id, mema_id += 16); \
+#define put_id(c) do { if(id_len == local_mema_id) \
+ id = xrealloc(id, local_mema_id += 16); \
id[id_len++] = c; } while(0)
/* stupid C lexical analizator */
-static void c_lex(const char *fname, int flg_config_include)
+static void c_lex(const char *fname, long fsize)
{
- int c = EOF; /* stupid initialize */
- int prev_state = EOF;
+ int c = L_EOF; /* stupid initialize */
+ int prev_state = L_EOF;
int called;
int state;
int line;
- static size_t mema_id;
- static char *id_s;
- char *id;
+ char *id = id_s;
+ size_t local_mema_id = mema_id;
size_t id_len = 0; /* stupid initialize */
char *val = NULL;
unsigned char *optr, *oend;
@@ -124,35 +135,20 @@ static void c_lex(const char *fname, int flg_config_include)
int fd;
char *map;
int mapsize;
- {
- /* stolen from mkdep by Linus Torvalds */
- int pagesizem1 = getpagesize() - 1;
- struct stat st;
- fd = open(fname, O_RDONLY);
- if(fd < 0) {
+ fd = open(fname, O_RDONLY);
+ if(fd < 0) {
perror(fname);
return;
- }
- fstat(fd, &st);
- if (st.st_size == 0)
- bb_error_d("%s is empty", fname);
- mapsize = st.st_size;
- mapsize = (mapsize+pagesizem1) & ~pagesizem1;
- map = mmap(NULL, mapsize, PROT_READ, MAP_PRIVATE, fd, 0);
- if ((long) map == -1)
+ }
+ mapsize = (fsize+pagesizem1) & ~pagesizem1;
+ map = mmap(NULL, mapsize, PROT_READ, MAP_PRIVATE, fd, 0);
+ if ((long) map == -1)
bb_error_d("%s: mmap: %m", fname);
- /* hereinafter is my */
- optr = (unsigned char *)map;
- oend = optr + st.st_size;
- }
+ optr = (unsigned char *)map;
+ oend = optr + fsize;
- if(id_s == NULL) {
- /* fist allocate */
- id_s = xmalloc(mema_id=128);
- }
- id = id_s;
line = 1;
called = state = S;
@@ -163,10 +159,7 @@ static void c_lex(const char *fname, int flg_config_include)
if(state == LI) {
parse_inc(id, fname);
} else {
- /*
- if(val[0] == '\0')
- yy_error_d("expected value");
- */
+ /* #define KEY "[VAL]" */
parse_conf_opt(id, val, (optr - start));
}
state = S;
@@ -180,7 +173,7 @@ static void c_lex(const char *fname, int flg_config_include)
while(c == ' ' || c == '\t')
getc1();
- if(c == '\\') {
+ if(c == BS) {
getc1();
if(c == '\n') {
/* \\\n eat continued */
@@ -189,49 +182,50 @@ static void c_lex(const char *fname, int flg_config_include)
continue;
}
ungetc1();
- c = '\\';
+ c = BS;
}
if(state == S) {
- while(c <= ' ' && c != EOF) {
- /* <S>[\000- ]+ */
+ while(first_chars[c] == ANY) {
+ /* <S>unparsed */
if(c == '\n')
line++;
getc1();
}
- if(c == EOF) {
+ if(c == L_EOF) {
/* <S><<EOF>> */
+ id_s = id;
+ mema_id = local_mema_id;
munmap(map, mapsize);
close(fd);
return;
}
- if(c == '/') {
+ if(c == REM) {
/* <S>/ */
- getc1();
- if(c == '/') {
+ getc1(); /* eat <S>/ */
+ if(c == REM) {
/* <S>"//"[^\n]* */
- do getc1(); while(c != '\n' && c != EOF);
+ do getc1(); while(c != '\n' && c != L_EOF);
} else if(c == '*') {
/* <S>[/][*] */
called = S;
state = REM;
}
- /* eat <S>/ */
- } else if(c == '#') {
- /* <S>\"|\'|# */
+ } else if(c == POUND) {
+ /* <S># */
start = optr - 1;
state = c;
} else if(c == STR || c == CHR) {
- /* <S>\"|\'|# */
+ /* <S>\"|\' */
val = NULL;
called = S;
state = c;
- } else if(ISALNUM(c)) {
+ } else if(c != BS) {
/* <S>[A-Z_a-z0-9] */
/* trick for fast drop id
if key with this first char undefined */
- if(first_char_conf_opts[c] == 0) {
+ if(first_chars[c] == 0) {
/* skip <S>[A-Z_a-z0-9]+ */
do getc1(); while(ISALNUM(c));
} else {
@@ -242,11 +236,11 @@ static void c_lex(const char *fname, int flg_config_include)
getc1();
} while(ISALNUM(c));
put_id(0);
- find_already(key_top, id, CHECK_ONLY);
+ check_key(key_top, id);
}
} else {
- /* <S>. */
- prev_state = ANY;
+ /* <S>\\ */
+ prev_state = c;
}
continue;
}
@@ -259,13 +253,13 @@ static void c_lex(const char *fname, int flg_config_include)
if(called != S)
yy_error_d("unexpected newline");
line++;
- } else if(c == EOF)
+ } else if(c == L_EOF)
yy_error_d("unexpected EOF");
getc1();
}
/* <REM>[*] */
getc1();
- if(c == '/') {
+ if(c == REM) {
/* <REM>[*][/] */
state = called;
break;
@@ -276,14 +270,14 @@ static void c_lex(const char *fname, int flg_config_include)
if(state == STR || state == CHR) {
for(;;) {
/* <STR,CHR>\n|<<EOF>> */
- if(c == '\n' || c == EOF)
+ if(c == '\n' || c == L_EOF)
yy_error_d("unterminating");
- if(c == '\\') {
+ if(c == BS) {
/* <STR,CHR>\\ */
getc1();
- if(c != '\\' && c != '\n' && c != state) {
+ if(c != BS && c != '\n' && c != state) {
/* another usage \ in str or char */
- if(c == EOF)
+ if(c == L_EOF)
yy_error_d("unexpected EOF");
if(val)
put_id(c);
@@ -298,7 +292,7 @@ static void c_lex(const char *fname, int flg_config_include)
} else if(c == state) {
/* <STR>\" or <CHR>\' */
if(called == DV)
- put_id(c);
+ put_id(c); /* #define KEY "VALUE"<- */
state = called;
break;
} else if(val)
@@ -310,12 +304,12 @@ static void c_lex(const char *fname, int flg_config_include)
}
/* begin preprocessor states */
- if(c == EOF)
+ if(c == L_EOF)
yy_error_d("unexpected EOF");
- if(c == '/') {
+ if(c == REM) {
/* <#.*>/ */
getc1();
- if(c == '/')
+ if(c == REM)
yy_error_d("detect // in preprocessor line");
if(c == '*') {
/* <#.*>[/][*] */
@@ -326,51 +320,55 @@ static void c_lex(const char *fname, int flg_config_include)
/* hmm, #.*[/] */
yy_error_d("strange preprocessor line");
}
- if(state == '#') {
+ if(state == POUND) {
+ if(c != 'd' && c != 'u' && c != 'i') {
+ while(ISALNUM(c))
+ getc1();
+ state = S;
+ } else {
static const char * const preproc[] = {
"define", "undef", "include", ""
};
const char * const *str_type;
id_len = 0;
- while(ISALNUM(c)) {
- put_id(c);
- getc1();
- }
+ do { put_id(c); getc1(); } while(ISALNUM(c));
put_id(0);
for(str_type = preproc; (state = **str_type); str_type++) {
if(*id == state && strcmp(id, *str_type) == 0)
break;
}
/* to S if another #directive */
- ungetc1();
id_len = 0; /* common for save */
- continue;
+ }
+ ungetc1();
+ continue;
}
if(state == I) {
if(c == STR) {
/* <I>\" */
val = id;
- state = STR;
called = LI;
- continue;
+ state = STR;
+ } else {
+ /* another (may be wrong) #include ... */
+ ungetc1();
+ state = S;
}
- /* another (may be wrong) #include ... */
- ungetc1();
- state = S;
continue;
}
if(state == D || state == U) {
- while(ISALNUM(c)) {
- if(flg_config_include) {
- /* save KEY from #"define"|"undef" ... */
- put_id(c);
- }
- getc1();
- }
- if(!flg_config_include) {
+ if(configs == NULL) {
+ /* ignore depend with #define or #undef KEY */
+ while(ISALNUM(c))
+ getc1();
state = S;
} else {
+ /* save KEY from #"define"|"undef" ... */
+ while(ISALNUM(c)) {
+ put_id(c);
+ getc1();
+ }
if(!id_len)
yy_error_d("expected identificator");
put_id(0);
@@ -386,7 +384,7 @@ static void c_lex(const char *fname, int flg_config_include)
continue;
}
if(state == DK) {
- /* #define (config mode) */
+ /* #define KEY[ ] (config mode) */
val = id + id_len;
if(c == STR || c == CHR) {
/* define KEY "... or define KEY '... */
@@ -396,6 +394,7 @@ static void c_lex(const char *fname, int flg_config_include)
continue;
}
while(ISALNUM(c)) {
+ /* VALUE */
put_id(c);
getc1();
}
@@ -410,43 +409,51 @@ static void c_lex(const char *fname, int flg_config_include)
static void show_usage(void) __attribute__ ((noreturn));
static void show_usage(void)
{
- bb_error_d("Usage: [-I local_include_path] [-dw] "
- "[-k path_for_store_keys] [-s skip_file]");
+ bb_error_d("Usage: [-I local_include_paths] [-dw] "
+ "[-k path_for_store_keys] [-s skip_file] [dirs]");
}
static const char *kp;
+static size_t kp_len;
static llist_t *Iop;
static bb_key_t *Ifound;
static int noiwarning;
-static llist_t *configs;
-static bb_key_t *find_already(bb_key_t *k, const char *nk, int flg_save_new)
+static bb_key_t *check_key(bb_key_t *k, const char *nk)
{
- bb_key_t *cur;
+ bb_key_t *cur;
- for(cur = k; cur; cur = cur->next) {
- if(strcmp(cur->keyname, nk) == 0) {
- cur->checked = 1;
- return NULL;
- }
+ for(cur = k; cur; cur = cur->next) {
+ if(strcmp(cur->keyname, nk) == 0) {
+ cur->checked = 1;
+ return cur;
}
- if(flg_save_new == CHECK_ONLY)
- return NULL;
- cur = xmalloc(sizeof(bb_key_t));
- cur->keyname = bb_xstrdup(nk);
+ }
+ return NULL;
+}
+
+static bb_key_t *make_new_key(bb_key_t *k, const char *nk)
+{
+ bb_key_t *cur;
+ size_t nk_size;
+
+ nk_size = strlen(nk) + 1;
+ cur = xmalloc(sizeof(bb_key_t) + nk_size);
+ cur->keyname = memcpy(cur + 1, nk, nk_size);
cur->checked = 1;
cur->next = k;
return cur;
}
-static int store_include_fullpath(char *p_i, bb_key_t *li)
+static inline char *store_include_fullpath(char *p_i, bb_key_t *li)
{
struct stat st;
- int ok = 0;
+ char *ok;
if(stat(p_i, &st) == 0) {
- li->stored_path = bb_simplify_path(p_i);
- ok = 1;
+ ok = li->stored_path = bb_simplify_path(p_i);
+ } else {
+ ok = NULL;
}
free(p_i);
return ok;
@@ -458,9 +465,11 @@ static void parse_inc(const char *include, const char *fname)
char *p_i;
llist_t *lo;
- if((li = find_already(Ifound, include, MAKE_NEW)) == NULL)
+ li = check_key(Ifound, include);
+ if(li)
return;
- Ifound = li;
+ Ifound = li = make_new_key(Ifound, include);
+
if(include[0] != '/') {
/* relative */
int w;
@@ -490,9 +499,10 @@ static void parse_inc(const char *include, const char *fname)
static void parse_conf_opt(char *opt, const char *val, size_t recordsz)
{
- bb_key_t *cur = find_already(key_top, opt, MAKE_NEW);
+ bb_key_t *cur;
- if(cur != NULL) {
+ cur = check_key(key_top, opt);
+ if(cur == NULL) {
/* new key, check old key if present after previous usage */
char *s, *p;
struct stat st;
@@ -501,6 +511,9 @@ static void parse_conf_opt(char *opt, const char *val, size_t recordsz)
static char *record_buf;
static char *r_cmp;
static size_t r_sz;
+ ssize_t rw_ret;
+
+ cur = make_new_key(key_top, opt);
recordsz += 2; /* \n\0 */
if(recordsz > r_sz) {
@@ -509,12 +522,24 @@ static void parse_conf_opt(char *opt, const char *val, size_t recordsz)
}
s = record_buf;
/* may be short count " " */
- if(val)
- recordsz = sprintf(s, "#define %s%s%s\n", opt, (*val ? " " : ""), val);
- else
+ if(val) {
+ if(*val == '\0') {
+ cur->value = "";
+ recordsz = sprintf(s, "#define %s\n", opt);
+ } else {
+ cur->value = bb_xstrdup(val);
+ recordsz = sprintf(s, "#define %s %s\n", opt, val);
+ }
+ } else {
+ cur->value = NULL;
recordsz = sprintf(s, "#undef %s\n", opt);
- first_char_conf_opts[((int)((unsigned char)(*opt)))] = *opt;
- /* key converting [A-Z] -> [a-z] */
+ }
+ /* size_t -> ssize_t :( */
+ rw_ret = (ssize_t)recordsz;
+ /* trick, save first char KEY for do fast identify id */
+ first_chars[(int)*opt] = *opt;
+
+ /* key converting [A-Z_] -> [a-z/] */
for(p = opt; *p; p++) {
if(*p >= 'A' && *p <= 'Z')
*p = *p - 'A' + 'a';
@@ -524,6 +549,7 @@ static void parse_conf_opt(char *opt, const char *val, size_t recordsz)
p = bb_asprint("%s/%s.h", kp, opt);
cur->stored_path = opt = p;
if(stat(opt, &st)) {
+ p += kp_len;
while(*++p) {
/* Auto-create directories. */
if (*p == '/') {
@@ -535,9 +561,9 @@ static void parse_conf_opt(char *opt, const char *val, size_t recordsz)
}
} else {
/* found */
- if(st.st_size == recordsz) {
+ if(st.st_size == (off_t)recordsz) {
fd = open(opt, O_RDONLY);
- if(fd < 0 || read(fd, r_cmp, recordsz) != recordsz)
+ if(fd < 0 || read(fd, r_cmp, recordsz) < rw_ret)
bb_error_d("%s: %m", opt);
close(fd);
cmp_ok = memcmp(s, r_cmp, recordsz) == 0;
@@ -545,57 +571,30 @@ static void parse_conf_opt(char *opt, const char *val, size_t recordsz)
}
if(!cmp_ok) {
fd = open(opt, O_WRONLY|O_CREAT|O_TRUNC, 0644);
- if(fd < 0 || write(fd, s, recordsz) != recordsz)
+ if(fd < 0 || write(fd, s, recordsz) < rw_ret)
bb_error_d("%s: %m", opt);
close(fd);
}
- /* store only */
- cur->checked = 0;
- if(val) {
- if(*val == '\0') {
- cur->value = "";
- } else {
- cur->value = bb_xstrdup(val);
- }
- } else {
- cur->value = NULL;
- }
key_top = cur;
} else {
/* present already */
- for(cur = key_top; cur; cur = cur->next) {
- if(strcmp(cur->keyname, opt) == 0) {
- cur->checked = 0;
- if(cur->value == NULL && val == NULL)
- return;
- if((cur->value == NULL && val != NULL) ||
- (cur->value != NULL && val == NULL) ||
- strcmp(cur->value, val))
- fprintf(stderr, "Warning: redefined %s\n", opt);
- return;
- }
- }
+ if((cur->value == NULL && val != NULL) ||
+ (cur->value != NULL && val == NULL) ||
+ (cur->value != NULL && val != NULL && strcmp(cur->value, val)))
+ fprintf(stderr, "Warning: redefined %s\n", opt);
}
+ /* store only */
+ cur->checked = 0;
}
-static int show_dep(int first, bb_key_t *k, const char *a)
+static int show_dep(int first, bb_key_t *k, const char *name)
{
bb_key_t *cur;
for(cur = k; cur; cur = cur->next) {
if(cur->checked && cur->stored_path) {
if(first) {
- const char *ext;
-
- if(*a == '.' && a[1] == '/')
- a += 2;
- ext = strrchr(a, '.');
- if(ext && ext[1] == 'c' && ext[2] == '\0') {
- /* *.c -> *.o */
- printf("\n%.*s.o:", (ext - a), a);
- } else {
- printf("\n%s:", a);
- }
+ printf("\n%s:", name);
first = 0;
} else {
printf(" \\\n ");
@@ -608,50 +607,56 @@ static int show_dep(int first, bb_key_t *k, const char *a)
}
static llist_t *files;
+static struct stat st_kp;
+
+static char *dir_and_entry;
-static llist_t *filter_chd(const char *fe, const char *p, llist_t *pdirs)
+static char *
+filter_chd(const char *fe, const char *p, size_t dirlen)
{
struct stat st;
char *fp;
char *afp;
llist_t *cfl;
- static struct stat st_kp;
+ file_list_t *f;
+ size_t df_sz;
+ static size_t dir_and_entry_sz;
if (*fe == '.')
return NULL;
- fp = bb_asprint("%s/%s", p, fe);
+
+ df_sz = dirlen + strlen(fe) + 2; /* dir/file\0 */
+ if(df_sz > dir_and_entry_sz)
+ dir_and_entry = xrealloc(dir_and_entry, dir_and_entry_sz = df_sz);
+ fp = dir_and_entry;
+ sprintf(fp, "%s/%s", p, fe);
+
if(stat(fp, &st)) {
fprintf(stderr, "Warning: stat(%s): %m", fp);
- free(fp);
return NULL;
}
if(S_ISREG(st.st_mode)) {
- const char *e = strrchr(fe, '.');
-
- if(e == NULL || !((e[1]=='c' || e[1]=='h') && e[2]=='\0')) {
+ afp = fp + df_sz - 3;
+ if(*afp++ != '.' || (*afp != 'c' && *afp != 'h')) {
/* direntry is regular file, but is not *.[ch] */
- free(fp);
return NULL;
}
- } else {
- if(st_kp.st_ino == 0) {
- /* first call */
- if(stat(kp, &st_kp))
- bb_error_d("stat(%s): %m", kp);
- if(!S_ISDIR(st_kp.st_mode))
- bb_error_d("%s is not directory", kp);
+ if (st.st_size == 0) {
+ fprintf(stderr, "Warning: %s is empty\n", fp);
+ return NULL;
}
+ } else {
if(S_ISDIR(st.st_mode)) {
if (st.st_dev == st_kp.st_dev && st.st_ino == st_kp.st_ino) {
- /* is autogenerated to kp/key* by previous usage */
- free(fp);
/* drop scan kp/ directory */
return NULL;
}
- return llist_add_to(pdirs, fp);
+ /* buff is returned, begin of zero allocate */
+ dir_and_entry = NULL;
+ dir_and_entry_sz = 0;
+ return fp;
}
/* hmm, is device! */
- free(fp);
return NULL;
}
afp = bb_simplify_path(fp);
@@ -659,16 +664,18 @@ static llist_t *filter_chd(const char *fe, const char *p, llist_t *pdirs)
if(cfl->data && strcmp(cfl->data, afp) == 0) {
/* parse configs.h */
free(afp);
- c_lex(fp, 1);
- free(fp);
+ c_lex(fp, st.st_size);
free(cfl->data);
cfl->data = NULL;
return NULL;
}
}
- free(fp);
/* direntry is *.[ch] regular file */
- files = llist_add_to(files, afp);
+ f = xmalloc(sizeof(file_list_t));
+ f->name = afp;
+ f->ext = strrchr(afp, '.') + 1;
+ f->size = st.st_size;
+ files = llist_add_to(files, (char *)f);
return NULL;
}
@@ -679,6 +686,7 @@ static void scan_dir_find_ch_files(char *p)
llist_t *d;
struct dirent *de;
DIR *dir;
+ size_t dirlen;
dirs = llist_add_to(NULL, p);
/* emulate recursive */
@@ -688,10 +696,12 @@ static void scan_dir_find_ch_files(char *p)
dir = opendir(dirs->data);
if (dir == NULL)
fprintf(stderr, "Warning: opendir(%s): %m", dirs->data);
+ dirlen = strlen(dirs->data);
while ((de = readdir(dir)) != NULL) {
- d = filter_chd(de->d_name, dirs->data, d_add);
- if(d)
- d_add = d;
+ char *found_dir = filter_chd(de->d_name, dirs->data, dirlen);
+
+ if(found_dir)
+ d_add = llist_add_to(d_add, found_dir);
}
closedir(dir);
if(dirs->data != p)
@@ -702,15 +712,10 @@ static void scan_dir_find_ch_files(char *p)
}
dirs = d_add;
}
- for(d = configs; d; d = d->link) {
- if(d->data) {
- /* configs.h placed outsize of "." */
- c_lex(d->data, 1);
- free(d->data);
- }
- }
}
+static char *pwd;
+
int main(int argc, char **argv)
{
int generate_dep = 1;
@@ -718,6 +723,22 @@ int main(int argc, char **argv)
int i;
llist_t *fl;
+ {
+ /* for bb_simplify_path */
+ /* libbb xgetcwd(), this program have not chdir() */
+ unsigned path_max = 512;
+
+ s = xmalloc (path_max);
+#define PATH_INCR 32
+ while (getcwd (s, path_max) == NULL) {
+ if(errno != ERANGE)
+ bb_error_d("getcwd: %m");
+ path_max += PATH_INCR;
+ s = xrealloc (s, path_max);
+ }
+ pwd = s;
+ }
+
while ((i = getopt(argc, argv, "I:c:dk:w")) > 0) {
switch(i) {
case 'I':
@@ -742,9 +763,6 @@ int main(int argc, char **argv)
show_usage();
}
}
- if(argc > optind)
- show_usage();
-
/* defaults */
if(kp == NULL)
kp = bb_simplify_path(INCLUDE_CONFIG_PATH);
@@ -754,13 +772,57 @@ int main(int argc, char **argv)
s = bb_simplify_path(INCLUDE_CONFIG_KEYS_PATH);
configs = llist_add_to(configs, s);
}
+ /* globals initialize */
+ /* for c_lex */
+ pagesizem1 = getpagesize() - 1;
+ id_s = xmalloc(mema_id);
+ for(i = 0; i < 256; i++) {
+ /* set unparsed chars for speed up of parser */
+ if(!ISALNUM(i) && i != CHR && i != STR &&
+ i != POUND && i != REM && i != BS)
+ first_chars[i] = ANY;
+ }
+ first_chars[i] = '-'; /* L_EOF */
+
+ kp_len = strlen(kp);
+ if(stat(kp, &st_kp))
+ bb_error_d("stat(%s): %m", kp);
+ if(!S_ISDIR(st_kp.st_mode))
+ bb_error_d("%s is not directory", kp);
+
+ /* main loops */
+ argv += optind;
+ if(*argv) {
+ while(*argv)
+ scan_dir_find_ch_files(*argv++);
+ } else {
+ scan_dir_find_ch_files(".");
+ }
+
+ for(fl = configs; fl; fl = fl->link) {
+ if(fl->data) {
+ /* configs.h placed outsize of scanned dirs or not "*.ch" */
+ struct stat st;
+
+ if(stat(fl->data, &st))
+ bb_error_d("stat(%s): %m", fl->data);
+ c_lex(fl->data, st.st_size);
+ free(fl->data);
+ }
+ }
+ free(configs);
+ configs = NULL; /* flag read config --> parse sourses mode */
- scan_dir_find_ch_files(".");
for(fl = files; fl; fl = fl->link) {
- c_lex(fl->data, 0);
+ file_list_t *t = (file_list_t *)(fl->data);
+ c_lex(t->name, t->size);
if(generate_dep) {
- i = show_dep(1, Ifound, fl->data);
- i = show_dep(i, key_top, fl->data);
+ if(t->ext[0] == 'c') {
+ /* *.c -> *.o */
+ t->ext[0] = 'o';
+ }
+ i = show_dep(1, Ifound, t->name);
+ i = show_dep(i, key_top, t->name);
if(i == 0)
putchar('\n');
}
@@ -768,6 +830,7 @@ int main(int argc, char **argv)
return 0;
}
+/* partial and simplify libbb routine */
static void bb_error_d(const char *s, ...)
{
va_list p;
@@ -836,24 +899,10 @@ static char *bb_simplify_path(const char *path)
char *s, *start, *p;
if (path[0] == '/')
- start = bb_xstrdup(path);
+ start = bb_xstrdup(path);
else {
- static char *pwd;
-
- if(pwd == NULL) {
- /* is not libbb, but this program have not chdir() */
- unsigned path_max = 512;
- char *cwd = xmalloc (path_max);
-#define PATH_INCR 32
- while (getcwd (cwd, path_max) == NULL) {
- if(errno != ERANGE)
- bb_error_d("getcwd: %m");
- path_max += PATH_INCR;
- cwd = xrealloc (cwd, path_max);
- }
- pwd = cwd;
- }
- start = bb_asprint("%s/%s", pwd, path);
+ /* is not libbb, but this program have not chdir() */
+ start = bb_asprint("%s/%s", pwd, path);
}
p = s = start;