version 1.4, 1999/05/24 17:57:17 |
version 1.5, 2001/02/04 21:27:00 |
|
|
struct field fieldtable[]; |
struct field fieldtable[]; |
{ |
{ |
int i; |
int i; |
register u_char *l_d_mask; |
u_char *l_d_mask; |
register u_char *lineend, *pos; |
u_char *lineend, *pos; |
u_char *endkey, *keypos; |
u_char *endkey, *keypos; |
register struct coldesc *clpos; |
struct coldesc *clpos; |
register int col = 1; |
int col = 1; |
struct field *ftpos; |
struct field *ftpos; |
l_d_mask = d_mask; |
l_d_mask = d_mask; |
pos = (u_char *) line->data - 1; |
pos = (u_char *) line->data - 1; |
|
|
|
|
for (i = 0; i < ncols; i++) { |
for (i = 0; i < ncols; i++) { |
clpos = clist + i; |
clpos = clist + i; |
for (; (col < clpos->num) && (pos < lineend); col++) |
for (; (col < clpos->num) && (pos < lineend); col++) { |
{ NEXTCOL(pos); } |
NEXTCOL(pos); |
|
} |
if (pos >= lineend) |
if (pos >= lineend) |
break; |
break; |
clpos->start = SEP_FLAG ? pos + 1 : pos; |
clpos->start = SEP_FLAG ? pos + 1 : pos; |
|
|
u_char * |
u_char * |
enterfield(tablepos, endkey, cur_fld, gflags) |
enterfield(tablepos, endkey, cur_fld, gflags) |
struct field *cur_fld; |
struct field *cur_fld; |
register u_char *tablepos, *endkey; |
u_char *tablepos, *endkey; |
int gflags; |
int gflags; |
{ |
{ |
register u_char *start, *end, *lineend, *mask, *lweight; |
u_char *start, *end, *lineend, *mask, *lweight; |
struct column icol, tcol; |
struct column icol, tcol; |
register u_int flags; |
u_int flags; |
u_int Rflag; |
u_int Rflag; |
|
|
icol = cur_fld->icol; |
icol = cur_fld->icol; |
|
|
|
|
u_char * |
u_char * |
number(pos, bufend, line, lineend, Rflag) |
number(pos, bufend, line, lineend, Rflag) |
register u_char *line, *pos, *bufend, *lineend; |
u_char *line, *pos, *bufend, *lineend; |
int Rflag; |
int Rflag; |
{ |
{ |
register int or_sign, parity = 0; |
int or_sign, parity = 0; |
register int expincr = 1, exponent = -1; |
int expincr = 1, exponent = -1; |
int bite, expsign = 1, sign = 1; |
int bite, expsign = 1, sign = 1; |
register u_char lastvalue, *nonzero, *tline, *C_TENS; |
u_char lastvalue, *nonzero, *tline, *C_TENS; |
u_char *nweights; |
u_char *nweights; |
|
|
if (Rflag) |
if (Rflag) |