60 lines
1.3 KiB
C
60 lines
1.3 KiB
C
/**********
|
|
Copyright 1990 Regents of the University of California. All rights reserved.
|
|
**********/
|
|
|
|
/* from FILENAME.txt, make FILENAME.idx */
|
|
|
|
#include "ngspice.h"
|
|
#include <stdio.h>
|
|
#include "cpdefs.h"
|
|
#include "hlpdefs.h"
|
|
#include "suffix.h"
|
|
|
|
|
|
|
|
int
|
|
main(argc, argv)
|
|
int argc;
|
|
char *argv[];
|
|
{
|
|
|
|
FILE *fp;
|
|
FILE *wfp;
|
|
char buf[BSIZE_SP];
|
|
long fpos;
|
|
char subject[BSIZE_SP];
|
|
struct hlp_index indexitem;
|
|
char *pos;
|
|
|
|
|
|
while (--argc) {
|
|
if (!(fp = fopen(argv[argc], "r"))) {
|
|
perror(argv[argc]);
|
|
continue;
|
|
}
|
|
strcpy(buf, argv[argc]);
|
|
if (((pos =strrchr(buf, '.')) == 0) ||
|
|
strcmp(pos, ".txt")) {
|
|
fprintf(stderr, "%s does not end in .txt\n", buf);
|
|
continue;
|
|
}
|
|
*++pos = 'i'; *++pos = 'd'; *++pos = 'x';
|
|
if (!(wfp = fopen(buf, "wb"))) {
|
|
perror(buf);
|
|
continue;
|
|
}
|
|
fpos = 0;
|
|
while (fgets(buf, sizeof(buf), fp)) {
|
|
if (!strncmp(buf, "SUBJECT: ", 9)) {
|
|
strcpy(subject, &buf[9]);
|
|
subject[strlen(subject) - 1] = '\0'; /* get rid of '\n' */
|
|
strncpy(indexitem.subject, subject, 64); /* zero out end */
|
|
indexitem.fpos = fpos;
|
|
fwrite(&indexitem, sizeof(struct hlp_index), 1, wfp);
|
|
}
|
|
fpos = ftell(fp);
|
|
}
|
|
}
|
|
exit(0);
|
|
}
|