From: Paul Eggert <eggert@cs.ucla.edu>
Date: Thu, 2 Jun 2005 23:30:13 +0000 (+0000)
Subject: (AT_INIT): Don't create a regular
X-Git-Tag: AUTOCONF-2.59c~361
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=756608a3c30b5be6e87143448c642b21676f43fd;p=thirdparty%2Fautoconf.git

(AT_INIT): Don't create a regular
expression of unbounded size when processing the --list
option.  This runs afoul of a limit of 399 bytes per regular
expression on AIX.  Problem reported by Ralf Wildenhues.
---

diff --git a/lib/autotest/general.m4 b/lib/autotest/general.m4
index 02e32b19e..831abd9fa 100644
--- a/lib/autotest/general.m4
+++ b/lib/autotest/general.m4
@@ -442,12 +442,17 @@ AT_TESTSUITE_NAME test groups:
 
 _ATEOF
   # "  1 42  45 " => "^(1|42|45);".
-  at_groups_pattern=`echo "$at_groups" | sed 's/^  *//;s/  *$//;s/  */|/g'`
   echo "$at_help_all" |
-    awk 'BEGIN { FS = ";" }
-	 { if ($[1] !~ /^('"$at_groups_pattern"')$/) next }
-	 { if ($[1]) printf " %3d: %-18s %s\n", $[1], $[2], $[3]
-	   if ($[4]) printf "      %s\n", $[4] } '
+    awk 'BEGIN {
+	   for (n = split("'"$at_groups"'", a); n; n--) selected[[a[n]]] = 1
+	   FS = ";"
+	 }
+	 {
+	   if (selected[[$ 1]]) {
+	     printf " %3d: %-18s %s\n", $ 1, $ 2, $ 3
+	     if ($ 4) printf "      %s\n", $ 4
+	   }
+	 }'
   exit 0
 fi
 m4_divert_pop([HELP_END])dnl