static char *sccsid
= "@(#)hunt6.c 4.1 (Berkeley) %G%";
extern int soutlen
, iflong
;
baddrop(master
, nf
, fc
, nitem
, qitem
, rprog
, full
)
/* checks list of drops for real bad drops; finds items with "deliv" */
int i
, g
, j
, need
, got
, na
, len
;
char res
[100], *ar
[50], output
[TXTLEN
];
extern int colevel
, reached
;
fprintf(stderr
,"in baddrop, nf %d master %ld %ld %ld\n",
nf
, master
.b
[0], master
.b
[1], master
.b
[2]);
fprintf(stderr
,"in baddrop, nf %d master %d %d %d\n",
nf
, master
.a
[0], master
.a
[1], master
.a
[2]);
lp
= iflong
? master
.b
[i
] : master
.a
[i
];
fprintf(stderr
, "i %d master %lo lp %lo\n",
fprintf(stderr
, "i %d master %o lp %lo\n",
fprintf(stderr
, "tag %s", res
);
fprintf(stderr
, "not auxil try rprog %c\n",
if (c
== ';' || c
== '\n')
corout (res
, output
, rprog
, 0, TXTLEN
) :
findline (res
, output
, TXTLEN
, indexdate
);
fprintf(stderr
,"item %d of %d, tag %s len %d output\n%s\n..\n",
i
, nf
, res
, len
, output
);
need
= colevel
? reached
: nitem
;
fprintf(stderr
, "calling fgrep len %d ar[4] %s %o %d \n",
fprintf(stderr
, "fgrep found it\n");
master
.b
[g
++] = master
.b
[i
];
master
.a
[g
++] = master
.a
[i
];
strcpy (soutput
, output
);
fprintf(stderr
, "after fgrep\n");
sscanf(res
, "%ld,%d", &lp
, &len
);