int main(int argc, char **argv) { const char *outfile = "ATAGS"; /* output file */ int exit_val; /* exit value */ int step; /* step through args */ int ch; /* getopts char */ setlocale(LC_ALL, "C"); dflag = qflag = tflag = vflag = 0; while ((ch = getopt(argc, argv, "df:qtv")) != -1) switch(ch) { case 'd': dflag++; break; case 'f': outfile = optarg; break; case 'q': qflag++; break; case 't': tflag++; break; case 'v': vflag++; break; case '?': default: usage(); } argv += optind; argc -= optind; if (!argc) usage(); setlocale(LC_COLLATE, "C"); init(); for (exit_val = step = 0; step < argc; ++step) if (!(inf = fopen(argv[step], "r"))) { warn("%s", argv[step]); exit_val = 1; } else { curfile = argv[step]; find_entries(argv[step]); (void)fclose(inf); } if (head) { if (!(outf = fopen(outfile, "w"))) err(1, "%s", outfile); put_entries(head); (void)fclose(outf); } exit(exit_val); }
/* * pfnote -- * enter a new node in the tree */ void pfnote(const char *name, int ln) { NODE *np; char *fp; char nbuf[MAXTOKEN]; /*NOSTRICT*/ if (!(np = (NODE *)malloc(sizeof(NODE)))) { warnx("too many entries to sort"); put_entries(head); free_tree(head); /*NOSTRICT*/ if (!(head = np = (NODE *)malloc(sizeof(NODE)))) errx(1, "out of space"); } if (!xflag && !strcmp(name, "main")) { if (!(fp = strrchr(curfile, '/'))) fp = curfile; else ++fp; (void)snprintf(nbuf, sizeof(nbuf), "M%s", fp); fp = strrchr(nbuf, '.'); if (fp && !fp[2]) *fp = EOS; name = nbuf; } if (!(np->entry = strdup(name))) err(1, NULL); np->file = curfile; np->lno = ln; np->left = np->right = 0; if (!(np->pat = strdup(lbuf))) err(1, NULL); if (!head) head = np; else add_node(np, head); }
int main(int argc, char **argv) { static char *outfile = "tags"; /* output file */ int aflag; /* -a: append to tags */ int uflag; /* -u: update tags */ int exit_val; /* exit value */ int step; /* step through args */ int ch; /* getopts char */ static char cmd[100]; /* too ugly to explain */ #ifdef __ORCAC203__ aflag = NO; uflag = NO; #else aflag = uflag = NO; #endif while ((ch = getopt(argc, argv, "BFadf:tuwvx")) != EOF) switch(ch) { case 'B': searchar = '?'; break; case 'F': searchar = '/'; break; case 'a': aflag++; break; case 'd': dflag++; break; case 'f': outfile = optarg; break; case 't': tflag++; break; case 'u': uflag++; break; case 'w': wflag++; break; case 'v': vflag++; case 'x': xflag++; break; case '?': default: goto usage; } argv += optind; argc -= optind; if (!argc) { usage: (void)fprintf(stderr, "usage: ctags [-BFadtuwvx] [-f tagsfile] file ...\n"); exit(1); } init(); #ifdef __ORCAC203__ for (exit_val = 0, step = 0; step < argc; ++step) #else for (exit_val = step = 0; step < argc; ++step) #endif if (!(inf = fopen(argv[step], "r"))) { warn("%s", argv[step]); exit_val = 1; } else { curfile = argv[step]; find_entries(argv[step]); (void)fclose(inf); } if (head) if (xflag) put_entries(head); else { if (uflag) { for (step = 0; step < argc; step++) { (void)sprintf(cmd, "mv %s OTAGS; fgrep -v '\t%s\t' OTAGS >%s; rm OTAGS", outfile, argv[step], outfile); system(cmd); } ++aflag; } if (!(outf = fopen(outfile, aflag ? "a" : "w"))) err(exit_val, "%s", outfile); put_entries(head); (void)fclose(outf); if (uflag) { (void)sprintf(cmd, "sort -o %s %s", outfile, outfile); system(cmd); } } exit(exit_val); }
int main(int argc, char **argv) { static const char *outfile = "tags"; /* output file */ int aflag; /* -a: append to tags */ int uflag; /* -u: update tags */ int exit_val; /* exit value */ int step; /* step through args */ int ch; /* getopts char */ setlocale(LC_ALL, ""); aflag = uflag = NO; tflag = YES; while ((ch = getopt(argc, argv, "BFTadf:tuwvx")) != -1) switch(ch) { case 'B': searchar = '?'; break; case 'F': searchar = '/'; break; case 'T': tflag = NO; break; case 'a': aflag++; break; case 'd': dflag++; break; case 'f': outfile = optarg; break; case 't': tflag = YES; break; case 'u': uflag++; break; case 'w': wflag++; break; case 'v': vflag++; case 'x': xflag++; break; case '?': default: usage(); } argv += optind; argc -= optind; if (!argc) usage(); if (!xflag) setlocale(LC_COLLATE, "C"); init(); for (exit_val = step = 0; step < argc; ++step) if (!(inf = fopen(argv[step], "r"))) { warn("%s", argv[step]); exit_val = 1; } else { curfile = argv[step]; find_entries(argv[step]); (void)fclose(inf); } if (head) { if (xflag) put_entries(head); else { if (uflag) { FILE *oldf; regex_t *regx; if ((oldf = fopen(outfile, "r")) == NULL) err(1, "opening %s", outfile); if (unlink(outfile)) err(1, "unlinking %s", outfile); if ((outf = fopen(outfile, "w")) == NULL) err(1, "recreating %s", outfile); if ((regx = calloc(argc, sizeof(regex_t))) == NULL) err(1, "RE alloc"); for (step = 0; step < argc; step++) { (void)strcpy(lbuf, "\t"); (void)strlcat(lbuf, argv[step], LINE_MAX); (void)strlcat(lbuf, "\t", LINE_MAX); if (regcomp(regx + step, lbuf, REG_NOSPEC)) warn("RE compilation failed"); } nextline: while (fgets(lbuf, LINE_MAX, oldf)) { for (step = 0; step < argc; step++) if (regexec(regx + step, lbuf, 0, NULL, 0) == 0) goto nextline; fputs(lbuf, outf); } for (step = 0; step < argc; step++) regfree(regx + step); free(regx); fclose(oldf); fclose(outf); ++aflag; } if (!(outf = fopen(outfile, aflag ? "a" : "w"))) err(1, "%s", outfile); put_entries(head); (void)fclose(outf); if (uflag) { pid_t pid; if ((pid = fork()) == -1) err(1, "fork failed"); else if (pid == 0) { execlp("sort", "sort", "-o", outfile, outfile, NULL); err(1, "exec of sort failed"); } /* Just assume the sort went OK. The old code did not do any checks either. */ (void)wait(NULL); } } } exit(exit_val); }
int main(int argc, char *argv[]) { static char *outfile = "tags"; /* output file */ int aflag; /* -a: append to tags */ int uflag; /* -u: update tags */ int exit_val; /* exit value */ int step; /* step through args */ int ch; /* getopts char */ if (pledge("stdio rpath wpath cpath", NULL) == -1) err(1, "pledge"); aflag = uflag = NO; while ((ch = getopt(argc, argv, "BFadf:tuwvx")) != -1) switch(ch) { case 'B': searchar = '?'; break; case 'F': searchar = '/'; break; case 'a': aflag = 1; break; case 'd': dflag = 1; break; case 'f': outfile = optarg; break; case 't': /* backwards compatibility */ break; case 'u': uflag = 1; break; case 'w': wflag = 1; break; case 'v': vflag = 1; case 'x': xflag = 1; break; case '?': default: goto usage; } argv += optind; argc -= optind; if (!argc) { usage: (void)fprintf(stderr, "usage: ctags [-aBdFuvwx] [-f tagsfile] file ...\n"); exit(1); } init(); if (uflag && !vflag && !xflag) preload_entries(outfile, argc, argv); for (exit_val = step = 0; step < argc; ++step) if (!(inf = fopen(argv[step], "r"))) { warn("%s", argv[step]); exit_val = 1; } else { curfile = argv[step]; find_entries(argv[step]); (void)fclose(inf); } if (head) { if (xflag) put_entries(head); else { if (!(outf = fopen(outfile, aflag ? "a" : "w"))) err(exit_val, "%s", outfile); put_entries(head); (void)fclose(outf); } } exit(exit_val); }