16 |
|
#include "lookup.h" |
17 |
|
#include "calcomp.h" |
18 |
|
|
19 |
+ |
#ifndef MAXMODLIST |
20 |
|
#define MAXMODLIST 1024 /* maximum modifiers we'll track */ |
21 |
+ |
#endif |
22 |
|
|
23 |
|
int treebufsiz = BUFSIZ; /* current tree buffer size */ |
24 |
|
|
74 |
|
}; /* rtrace process buffer */ |
75 |
|
|
76 |
|
/* rtrace command and defaults */ |
77 |
< |
char *rtargv[256] = { "rtrace", "-dj", ".5", "-dr", "3", |
77 |
> |
char *rtargv[256+2*MAXMODLIST] = { "rtrace", |
78 |
> |
"-dj", ".5", "-dr", "3", |
79 |
|
"-ab", "1", "-ad", "128", }; |
80 |
|
int rtargc = 9; |
81 |
|
/* overriding rtrace options */ |
113 |
|
int nmods = 0; /* number of modifiers */ |
114 |
|
|
115 |
|
MODCONT *addmodifier(char *modn, char *outf, char *binv); |
116 |
+ |
void addmodfile(char *fname, char *outf, char *binv); |
117 |
|
|
118 |
|
void init(int np); |
119 |
|
int done_rprocs(struct rtproc *rtp); |
261 |
|
rtargv[rtargc++] = argv[++i]; |
262 |
|
addmodifier(argv[i], curout, binval); |
263 |
|
continue; |
264 |
+ |
case 'M': /* modifier file */ |
265 |
+ |
if (argv[i][2] || i >= argc-1) break; |
266 |
+ |
rtargv[rtargc++] = "-tI"; |
267 |
+ |
rtargv[rtargc++] = argv[++i]; |
268 |
+ |
addmodfile(argv[i], curout, binval); |
269 |
+ |
continue; |
270 |
|
} |
271 |
|
rtargv[rtargc++] = argv[i]; /* assume rtrace option */ |
272 |
|
} |
462 |
|
return mp; |
463 |
|
} |
464 |
|
|
465 |
+ |
/* add modifiers from a file list */ |
466 |
+ |
void |
467 |
+ |
addmodfile(char *fname, char *outf, char *binv) |
468 |
+ |
{ |
469 |
+ |
char *mname[MAXMODLIST]; |
470 |
+ |
int i; |
471 |
+ |
/* load the file & store strings */ |
472 |
+ |
wordfile(mname, fname); |
473 |
+ |
for (i = 0; mname[i]; i++) /* add each one */ |
474 |
+ |
addmodifier(mname[i], outf, binv); |
475 |
+ |
} |
476 |
+ |
|
477 |
|
/* put string to stderr */ |
478 |
|
void |
479 |
|
eputs(char *s) |
1067 |
|
break; /* no bin separation */ |
1068 |
|
} |
1069 |
|
if (!lastout) { /* empty output */ |
1070 |
< |
error(WARNING, "no data to recover"); |
1070 |
> |
error(WARNING, "no previous data to recover"); |
1071 |
|
lu_done(&ofiletab); /* reclose all outputs */ |
1072 |
|
return; |
1073 |
|
} |
1082 |
|
} |
1083 |
|
} |
1084 |
|
if (lastout < 0) { |
1085 |
< |
error(WARNING, "no existing output to recover"); |
1085 |
> |
error(WARNING, "no output files to recover"); |
1086 |
|
return; |
1087 |
|
} |
1088 |
|
/* seek on all files */ |