shithub: trueawk

Info  •  Files  •  Log  •  Branches

awkgetline: do not access unitialized data on EOF
getrec() returns 0 on EOF and leaves the contents of buf unchanged.
Fixes #133.

--- a/run.c

+++ b/run.c

@@ -447,13 +447,15 @@

 			n = getrec(&record, &recsize, true);

 		else {			/* getline var */

 			n = getrec(&buf, &bufsize, false);

-			x = execute(a[0]);

-			setsval(x, buf);

-			if (is_number(x->sval, & result)) {

-				x->fval = result;

-				x->tval |= NUM;

+			if (n > 0) {

+				x = execute(a[0]);

+				setsval(x, buf);

+				if (is_number(x->sval, & result)) {

+					x->fval = result;

+					x->tval |= NUM;

+				}

+				tempfree(x);

 			}

-			tempfree(x);

 		}

 	}

 	setfval(r, (Awkfloat) n);

-- 

⑨