Fix bug in FIELDWIDTHS and grab some other patches from Fedora.

(Portage version: 2.1_pre7-r5)

4 files changed, 100 insertions, 0 deletions

diff --git a/sys-apps/gawk/files/digest-gawk-3.1.5-r1 b/sys-apps/gawk/files/digest-gawk-3.1.5-r1
new file mode 100644
index 000000000000..9ac602be41d5
--- /dev/null
+++ b/sys-apps/gawk/files/digest-gawk-3.1.5-r1
@@ -0,0 +1,3 @@
+MD5 4760325489479cac17fe0114b8f62f30 gawk-3.1.5.tar.gz 2310919
+RMD160 8d875f4ea9e9ef5c932468cf43c691f6e082b197 gawk-3.1.5.tar.gz 2310919
+SHA256 463dcb9d0ca398b1d4f5a332f6cd9cec56441265fca616f2ea1b44d459e9f0f8 gawk-3.1.5.tar.gz 2310919
diff --git a/sys-apps/gawk/files/gawk-3.1.5-binmode.patch b/sys-apps/gawk/files/gawk-3.1.5-binmode.patch
new file mode 100644
index 000000000000..ab811d2c92f7
--- /dev/null
+++ b/sys-apps/gawk/files/gawk-3.1.5-binmode.patch
@@ -0,0 +1,20 @@
+Ripped from Fedora
+
+* Thu Dec 22 2005 Karel Zak <kzak@redhat.com> 3.1.5-5
+- fix "gawk -v BINMODE=1" (patch by Aharon Robbins)
+
+        * eval.c (set_BINMODE): Fix logic of test for no numeric value.
+        Makes `gawk -v BINMODE=1 ...' work again. Thanks to Eli Zaretskii
+        <eliz@gnu.org> for pointing out the problem.
+
+--- gawk-3.1.5/eval.c.binmode	2005-12-22 19:05:32.000000000 +0100
++++ gawk-3.1.5/eval.c	2005-12-22 19:06:40.000000000 +0100
+@@ -2167,7 +2167,7 @@
+ 			}
+ 		}
+ 
+-		if (! digits || (BINMODE_node->var_value->flags & MAYBE_NUM) == 0) {
++		if (! digits && (BINMODE_node->var_value->flags & MAYBE_NUM) == 0) {
+ 			BINMODE = 0;
+ 			if (strcmp(p, "r") == 0)
+ 				BINMODE = 1;
diff --git a/sys-apps/gawk/files/gawk-3.1.5-fieldwidths.patch b/sys-apps/gawk/files/gawk-3.1.5-fieldwidths.patch
new file mode 100644
index 000000000000..905718b1f2f6
--- /dev/null
+++ b/sys-apps/gawk/files/gawk-3.1.5-fieldwidths.patch
@@ -0,0 +1,35 @@
+Ripped from Fedora
+
+* Sun Oct  9 2005 Karel Zak <kzak@redhat.com> 3.1.5-4
+- fix off-by-one error in assignment of sentinel value at
+  end of FIELDWIDTHS array. (patch by Aharon Robbins)
+
+--- gawk-3.1.5/field.c.fieldwidths	2005-05-11 17:28:15.000000000 +0200
++++ gawk-3.1.5/field.c	2005-10-09 08:35:54.000000000 +0200
+@@ -916,7 +916,7 @@
+ 
+ 	parse_field = fw_parse_field;
+ 	scan = force_string(FIELDWIDTHS_node->var_value)->stptr;
+-	end = scan + 1;
++
+ 	if (FIELDWIDTHS == NULL)
+ 		emalloc(FIELDWIDTHS, int *, fw_alloc * sizeof(int), "set_FIELDWIDTHS");
+ 	FIELDWIDTHS[0] = 0;
+@@ -941,7 +941,7 @@
+ 		errno = 0;
+ 		tmp = strtoul(scan, &end, 10);
+ 		if (errno != 0
+-		    || !(*end == '\0' || is_blank(*end))
++		    || (*end != '\0' && ! is_blank(*end))
+ 		    || !(0 < tmp && tmp <= INT_MAX))
+ 			fatal(_("invalid FIELDWIDTHS value, near `%s'"),
+ 			      scan);
+@@ -954,7 +954,7 @@
+ 		if (*scan == '\0')
+ 			break;
+ 	}
+-	FIELDWIDTHS[i] = -1;
++	FIELDWIDTHS[i+1] = -1;
+ 
+ 	update_PROCINFO("FS", "FIELDWIDTHS");
+ }
diff --git a/sys-apps/gawk/files/gawk-3.1.5-num2str.patch b/sys-apps/gawk/files/gawk-3.1.5-num2str.patch
new file mode 100644
index 000000000000..57ecd46b4762
--- /dev/null
+++ b/sys-apps/gawk/files/gawk-3.1.5-num2str.patch
@@ -0,0 +1,42 @@
+Ripped from Fedora
+
+* Thu Dec 22 2005 Karel Zak <kzak@redhat.com> 3.1.5-5
+- fix conversion from large number to string (patch by Aharon Robbins)
+
+--- gawk-3.1.5/node.c.num2str	2005-07-26 20:07:43.000000000 +0200
++++ gawk-3.1.5/node.c	2005-12-22 19:41:55.000000000 +0100
+@@ -151,6 +151,7 @@
+ 	register char *sp = buf;
+ 	double val;
+ 	char *orig, *trans, save;
++	register long num;
+ 
+ 	if (! do_traditional && (s->flags & INTLSTR) != 0) {
+ 		save = s->stptr[s->stlen];
+@@ -163,9 +164,12 @@
+ 		return tmp_string(trans, strlen(trans));
+ 	}
+ 
+-	/* not an integral value, or out of range */
+-	if ((val = double_to_int(s->numbr)) != s->numbr
+-	    || val < LONG_MIN || val > LONG_MAX) {
++	/* conversion to long overflows, or out of range, or not integral */
++	val = double_to_int(s->numbr);
++	num = (long) val;
++	if (   (s->numbr > 0 && num < 0)
++	    || (s->numbr < 0 && num > 0)
++	    || val < LONG_MIN || val > LONG_MAX || val != s->numbr) {
+ 		/*
+ 		 * Once upon a time, if GFMT_WORKAROUND wasn't defined,
+ 		 * we just blindly did this:
+@@ -199,9 +203,7 @@
+ 
+ 		goto no_malloc;
+ 	} else {
+-		/* integral value */
+-	        /* force conversion to long only once */
+-		register long num = (long) val;
++		/* integral value, in range, too! */
+ 		if (num < NVAL && num >= 0) {
+ 			sp = (char *) values[num];
+ 			s->stlen = 1;