Aucbvax.4930
fa.unix-wizards
utzoo!decvax!ucbvax!unix-wizards
Tue Nov 3 00:03:04 1981
>From sdcsvax!sdcattb:madden@NPRDC Mon Nov 2 23:49:51 1981
The following simple awk program exhibits an apparant bug in awk's
field handling:
{
$1 = "newfield1"
v = $0
print v # This will erroneously generate the original
# contents of field 1, not "newfield1".
length # This implicit reference to $0 causes the following
v = $0 # assignment to proceed properly so that
print v # this statement prints the expected result
}
When pointed at an input record, such as
abc
this program will produce printoutwhich looks like
abc
newfield1
rather than the expected
newfield1
newfield1
Since it is remotely possible that some program might take advantage
of the update failure, perhaps this is not a bug although the
inconsistency involved makes this unlikely.
In any case, the following changes to awk sources run.c and lib.c
correct the problem. The commented lines are the changes.
Jim Madden
UCSD Computer Center
------- run.c -------
obj nodetoobj(a) node *a;
{
obj x;
x.optr = (cell *) a->nobj;
x.otype = OCELL;
x.osub = a->subtype;
if (x.optr->sval == record && donerec == 0) /* Added to force recbld */
recbld(); /* on $1="ab"; x=$0 */
if (isfld(x)) fldbld();
return(x);
}
------- lib.c -------
recbld()
{
int i;
register char *r, *p;
if (donefld == 0 || donerec == 1)
return;
donerec = 1; /* Added to avoid repeated calls on recbld */
r = record;
for (i = 1; i <= ; I++) P="getsval(&fldtab[i]);" DPRINTF("IN { } RECBLD (*R++="*p++)" RECLOC, RECLOC- *NF; FS="%o," RECLOC='%o\n",' NULL); *(R-1)="\0" WHILE **FS,>tval = STR | FLD;
dprintf("in recbld FS=%o, recloc=%o\n", **FS, recloc, NULL);
if (r > record+RECSIZE)
error(FATAL, "built giant record `%.20s...'", record);
dprintf("recbld = |%s|\n", record, NULL, NULL);
}
-----------------------------------------------------------------
gopher://quux.org/ conversion by John Goerzen <
[email protected]>
of
http://communication.ucsd.edu/A-News/
This Usenet Oldnews Archive
article may be copied and distributed freely, provided:
1. There is no money collected for the text(s) of the articles.
2. The following notice remains appended to each copy:
The Usenet Oldnews Archive: Compilation Copyright (C) 1981, 1996
Bruce Jones, Henry Spencer, David Wiseman.
