diff options
| -rw-r--r-- | ChangeLog | 40 | ||||
| -rw-r--r-- | Makefile.in | 2 | ||||
| -rw-r--r-- | NEWS | 12 | ||||
| -rw-r--r-- | TODO | 210 | ||||
| -rw-r--r-- | awk.h | 1 | ||||
| -rw-r--r-- | builtin.c | 63 | ||||
| -rwxr-xr-x | configure | 20 | ||||
| -rw-r--r-- | configure.ac | 2 | ||||
| -rw-r--r-- | doc/ChangeLog | 7 | ||||
| -rw-r--r-- | doc/gawk.1 | 8 | ||||
| -rw-r--r-- | doc/gawk.info | 798 | ||||
| -rw-r--r-- | doc/gawk.texi | 26 | ||||
| -rw-r--r-- | doc/gawktexi.in | 26 | ||||
| -rw-r--r-- | main.c | 4 | ||||
| -rw-r--r-- | pc/config.h | 6 | ||||
| -rw-r--r-- | str_array.c | 79 | ||||
| -rw-r--r-- | test/ChangeLog | 6 | ||||
| -rw-r--r-- | test/Makefile.am | 10 | ||||
| -rw-r--r-- | test/Makefile.in | 9 | ||||
| -rw-r--r-- | test/rand.ok | 2 | ||||
| -rw-r--r-- | test/randtest.ok | 0 | ||||
| -rwxr-xr-x | test/randtest.sh | 113 |
22 files changed, 1012 insertions, 432 deletions
@@ -103,6 +103,13 @@ been moved into the inetfile() function. (two_way_open): Update args to inetfile(). +2014-04-20 Arnold D. Robbins <arnold@skeeve.com> + + * builtin.c (do_rand): Make calls to random() in predictable + order to avoid order of evaluation differences amongst compilers. + Thanks to Anders Magnusson <ragge@ludd.ltu.se> (of the PCC team) + for the suggestion. + 2014-04-18 Arnold D. Robbins <arnold@skeeve.com> * configure.ac: Change adding of -export-dynamic for GCC to be @@ -469,6 +476,11 @@ * main.c (main): Ignore SIGPIPE. See the comment in the code. Thanks to Alan Broder for reporting the issue. + Unrelated: + + * rand.c (do_rand): Fix computation and loop checking against + 1.0 to use do..while. + 2013-10-16 Arnold D. Robbins <arnold@skeeve.com> Make -O work again. Turns out that C99 bool variables @@ -486,6 +498,11 @@ * re.c (resetup): Add a comment about the joy of syntax bits. + Unrelated: + + * builtin.c (do_rand): If result is exactly 1.0, keep trying. + Thanks to Nelson Beebe. + 2013-10-10 Arnold D. Robbins <arnold@skeeve.com> * dfa.c (lex): Sync with GNU grep. Handle multibyte \s and \S. @@ -505,6 +522,13 @@ * dfa.c: Sync with GNU grep. +2013-09-25 Arnold D. Robbins <arnold@skeeve.com> + + * builtin.c (do_rand): Make the result more random by calling + random() twice. See the comment in the code. Thanks to + Bob Jewett <jewett@bill.scs.agilent.com> for the report and + the fix. + 2013-09-24 Arnold D. Robbins <arnold@skeeve.com> * debug.c (find_rule): Handle case where lineno is zero. Can happen @@ -586,6 +610,12 @@ * regcomp.c, regex.h, regex_internal.h: Sync with GLIBC. +2013-08-22 Arnold D. Robbins <arnold@skeeve.com> + + * str_array.c (env_store): If the new value being stored is NULL, + pass in "" instead. Avoids core dump on Mac OS X. + Thanks to Hermann Peifer for the bug report. + 2013-08-20 Arnold D. Robbins <arnold@skeeve.com> * nonposix.h: New file. Contains FAKE_FD_VALUE. @@ -594,6 +624,16 @@ 2013-08-18 Arnold D. Robbins <arnold@skeeve.com> + Reflect updates to ENVIRON into the real environment. + + * awk.h (init_env_array): Add declaration. + * main.c (load_environ): Call init_env_array. + * str_array.c (env_remove, env_store, env_clear, init_env_array): + New functions. + (env_array_func): New array vtable. + +2013-08-18 Arnold D. Robbins <arnold@skeeve.com> + * array.c (force_array): Set symbol->xarray to NULL before initing the array if it was Node_var_new. (null_array): Restore assert, undoing change of 2013-05-27. diff --git a/Makefile.in b/Makefile.in index d243df5b..2abf5b46 100644 --- a/Makefile.in +++ b/Makefile.in @@ -107,7 +107,7 @@ DIST_COMMON = INSTALL NEWS README AUTHORS ChangeLog \ $(srcdir)/Makefile.in $(srcdir)/Makefile.am \ $(top_srcdir)/configure $(am__configure_deps) \ $(srcdir)/configh.in mkinstalldirs ABOUT-NLS awkgram.c \ - command.c depcomp ylwrap $(include_HEADERS) COPYING \ + command.c depcomp ylwrap $(include_HEADERS) COPYING TODO \ config.guess config.rpath config.sub install-sh missing ACLOCAL_M4 = $(top_srcdir)/aclocal.m4 am__aclocal_m4_deps = $(top_srcdir)/m4/arch.m4 \ @@ -4,6 +4,18 @@ are permitted in any medium without royalty provided the copyright notice and this notice are preserved. +Changes from 4.1.x to 4.2.0 +--------------------------- + +1. If not in POSIX mode, changes to ENVIRON are reflected into + gawk's environment, affecting any programs run by system() + or for piped redirections. + +2. The series of numbers returned by rand() should now be "more + random" than previously. Gawk's rand() remains repeatable; you will + get the same series of numbers each time you call rand() repeatedly, + but this will be a different series than previously. + Changes from 4.1.1 to 4.1.2 --------------------------- @@ -0,0 +1,210 @@ +Thu Apr 17 11:31:24 IDT 2014 +============================ + +There were too many files tracking different thoughts and ideas for +things to do, or consider doing. This file merges them into one. As +tasks are completed, they should be moved to the DONE section, below, +or simply removed. + +Upon creation of a release (major or patch release), items from the +previous release should be removed. + +This file should exist only in the master branch or branches based off +of it for development, but not in the stable branch. This may require some +careful work with Git. + +TODO +==== + +Minor Cleanups and Code Improvements +------------------------------------ + + Nuke installing the igawk script and the igawk.1 man page. Just + remove them from the dist. + + Review the bash source script for working with shared libraries in + order to nuke the use of libtool. [ Partially started in the + nolibtool branch. ] + + Enhance profiling to save comments in a byte-code that does nothing + but that can be used when pretty printing the program. + + API: + ??? #if !defined(GAWK) && !defined(GAWK_OMIT_CONVENIENCE_MACROS) + + ?? Add debugger commands to reference card + + Look at function order within files. + + regex.h - remove underscores in param names + + Consider removing use of and/or need for the protos.h file. + + Recheck if gnulib regex can be dropped in + + Fully synchronize whitespaces tests (for \s, \S in Unicode + environment) with those of GNU grep. + +Minor New Features +------------------ + + Add a div() function to do integer division result. Needed + esp for MPFR with large ints. + + Enhance extension/fork.c waitpid to allow the caller to specify + the options. And add an optional array argument to wait and + waitpid in which to return exit status information. + + Consider relaxing the strictness of --posix. + + Make it possible to put print/printf + redirections into + an expression. + + Have pretty printing not run the program and nuke the + undocumented GAWK_NO_PP_RUN env var. Requires test suite + adjustments. + + ? Add an optional base to strtonum, allowing 2-36. + + ? Optional third argument for index indicating where to start the + search. + +Major New Features +------------------ + + Think about how to generalize indirect access. Manuel Collado + suggests things like + + foo = 5 + @"foo" += 4 + + Also needed: + + Indirect calls of built-ins + Indirect calls of extension functions + Indirect through array elements, not just scalar variables + + Some way to make regexp constants first class citizens: + - Assign to variables + - Pass to functions + Tawk has this and it would also make indirect calling of builtins + work more reasonably. Probably would use a special syntax like + @/.../ for such objects. + + Consider a typeof() function that returns a string (scalar, array, + regexp). + + Fix the early chapters in the doc with more up-to-date examples. + No-one uses Bulletin Board Systems anymore. + + Add ability to do decimal arithmetic. + + Rework management of array index storage. (Partially DONE.) + + Consider using an atom table for all string array indices. + + DBM storage of awk arrays. Try to allow multiple dbm packages. + + ?? A RECLEN variable for fixed-length record input. PROCINFO["RS"] + would be "RS" or "RECLEN" depending upon what's in use. + *** Could this be done as an extension? + + ?? Use a new or improved dfa and/or regex library. + + Rewrite in C++. + +Things To Think About That May Never Happen +------------------------------------------- + + Consider making shadowed variables a warning and not + a fatal warning when --lint=fatal. + + Similar for extra parameters in a function call. + + Look at code coverage tools, like S2E: https://s2e.epfl.ch/ + + Try running with diehard. See http://www.diehard-software.org, + https://github.com/emeryberger/DieHard + + Implement namespaces. Arnold suggested the following in an email: + - Extend the definition of an 'identifier' to include "." as a valid character + although an identifier can't start with it. + - Extension libraries install functions and global variables with names + that have a "." in them: XML.parse(), XML.name, whatever. + - Awk code can read/write such variables and call such functions, but they + cannot define such functions + function XML.foo() { .. } # error + or create a variable with such a name if it doesn't exist. This would + be a run-time error, not a parse-time error. + - This last rule may be too restrictive. + I don't want to get into fancy rules a la perl and file-scope visibility + etc, I'd like to keep things simple. But how we design this is going + to be very important. + + Include a sample rpm spec file in a new packaging subdirectory. + + Patch lexer for @include and @load to make quotes optional. + + ? Have strftime() pay attention to the value of ENVIRON["TZ"] + + Add a lint check if the return value of a function is used but + the function did not supply a value. + + Consider making gawk output +nan for NaN values so that it + will accept its own output as input. + NOTE: Investigated this. GLIBC formats NaN as '-nan' + and -NaN as 'nan'. Dealing with this is not simple. + + Enhance FIELDWIDTHS with some way to indicate "the rest of the record". + E.g., a length of 0 or -1 or something. Maybe "n"? + + +DONE +==== + +Minor Cleanups and Code Improvements +------------------------------------ + +Minor New Features +------------------ + +Major New Features +------------------ + +Things That We Decided We Will Never Do +======================================= + + Consider moving var_value info into Node_var itself to reduce + memory usage. This would break all uses of get_lhs in the + code. It's too sweeping a change. + + Add macros for working with flags instead of using & and | + directly. + + FIX regular field splitting to use FPAT algorithm. + Note: Looked at this. Not sure it's with the trouble: + If it ain't broke... + + Scope IDs for IPv6 addresses + + Gnulib + + Make FIELDWIDTHS be an array? + + "Do an optimization pass over parse tree?" + This isn't relevant now that we are using a byte code engine. + + "Consider integrating Fred Fish's DBUG library into gawk." + I did this once as an experiment. But I don't see a lot of value + to this at this stage of the development. Stepping through things + in a debugger is generally enough. Also, I would have to try to + track down the latest version of this. + + "Make awk '/foo/' files... run at egrep speeds (how?)" + This has been on the list since the early days (gawk 1.x or early + 2.x). But I am not sure how to really do this, nor have I done + timings, nor does there seem to be any real demand for this. + + Change from dlopen to using the libltdl library (i.e. lt_dlopen). + This may support more platforms. If we move off of libtool + then this is the wrong direction. @@ -1361,6 +1361,7 @@ extern NODE *do_aoption(int nargs); extern NODE *do_asort(int nargs); extern NODE *do_asorti(int nargs); extern unsigned long (*hash)(const char *s, size_t len, unsigned long hsize, size_t *code); +extern void init_env_array(NODE *env_node); /* awkgram.c */ extern NODE *variable(int location, char *name, NODETYPE type); extern int parse_program(INSTRUCTION **pcode); @@ -2393,6 +2393,8 @@ static char *const state = (char *const) istate; NODE * do_rand(int nargs ATTRIBUTE_UNUSED) { + double tmprand; +#define RAND_DIVISOR ((double)GAWK_RANDOM_MAX+1.0) if (firstrand) { (void) initstate((unsigned) 1, state, SIZEOF_STATE); /* don't need to srandom(1), initstate() does it for us. */ @@ -2404,7 +2406,66 @@ do_rand(int nargs ATTRIBUTE_UNUSED) * * 0 <= n < 1 */ - return make_number((AWKNUM) (random() % GAWK_RANDOM_MAX) / GAWK_RANDOM_MAX); + /* + * Date: Wed, 28 Aug 2013 17:52:46 -0700 + * From: Bob Jewett <jewett@bill.scs.agilent.com> + * + * Call random() twice to fill in more bits in the value + * of the double. Also, there is a bug in random() such + * that when the values of successive values are combined + * like (rand1*rand2)^2, (rand3*rand4)^2, ... the + * resulting time series is not white noise. The + * following also seems to fix that bug. + * + * The add/subtract 0.5 keeps small bits from filling + * below 2^-53 in the double, not that anyone should be + * looking down there. + * + * Date: Wed, 25 Sep 2013 10:45:38 -0600 (MDT) + * From: "Nelson H. F. Beebe" <beebe@math.utah.edu> + * (4) The code is typical of many published fragments for converting + * from integer to floating-point, and I discuss the serious pitfalls + * in my book, because it leads to platform-dependent behavior at the + * end points of the interval [0,1] + * + * (5) the documentation in the gawk info node says + * + * `rand()' + * Return a random number. The values of `rand()' are uniformly + * distributed between zero and one. The value could be zero but is + * never one.(1) + * + * The division by RAND_DIVISOR may not guarantee that 1.0 is never + * returned: the programmer forgot the platform-dependent issue of + * rounding. + * + * For points 4 and 5, the safe way is a loop: + * + * double + * rand(void) // return value in [0.0, 1.0) + * { + * value = internal_rand(); + * + * while (value == 1.0) + * value = internal_rand(); + * + * return (value); + * } + */ + + do { + long d1, d2; + /* + * Do the calls in predictable order to avoid + * compiler differences in order of evaluation. + */ + d1 = random(); + d2 = random(); + tmprand = 0.5 + ( (d1/RAND_DIVISOR + d2) / RAND_DIVISOR ); + tmprand -= 0.5; + } while (tmprand == 1.0); + + return make_number((AWKNUM) tmprand); } /* do_srand --- seed the random number generator */ @@ -1,6 +1,6 @@ #! /bin/sh # Guess values for system-dependent variables and create Makefiles. -# Generated by GNU Autoconf 2.69 for GNU Awk 4.1.1a. +# Generated by GNU Autoconf 2.69 for GNU Awk 4.1.60. # # Report bugs to <bug-gawk@gnu.org>. # @@ -580,8 +580,8 @@ MAKEFLAGS= # Identity of this package. PACKAGE_NAME='GNU Awk' PACKAGE_TARNAME='gawk' -PACKAGE_VERSION='4.1.1a' -PACKAGE_STRING='GNU Awk 4.1.1a' +PACKAGE_VERSION='4.1.60' +PACKAGE_STRING='GNU Awk 4.1.60' PACKAGE_BUGREPORT='bug-gawk@gnu.org' PACKAGE_URL='http://www.gnu.org/software/gawk/' @@ -1324,7 +1324,7 @@ if test "$ac_init_help" = "long"; then # Omit some internal or obsolete options to make the list less imposing. # This message is too long to be a string in the A/UX 3.1 sh. cat <<_ACEOF -\`configure' configures GNU Awk 4.1.1a to adapt to many kinds of systems. +\`configure' configures GNU Awk 4.1.60 to adapt to many kinds of systems. Usage: $0 [OPTION]... [VAR=VALUE]... @@ -1394,7 +1394,7 @@ fi if test -n "$ac_init_help"; then case $ac_init_help in - short | recursive ) echo "Configuration of GNU Awk 4.1.1a:";; + short | recursive ) echo "Configuration of GNU Awk 4.1.60:";; esac cat <<\_ACEOF @@ -1512,7 +1512,7 @@ fi test -n "$ac_init_help" && exit $ac_status if $ac_init_version; then cat <<\_ACEOF -GNU Awk configure 4.1.1a +GNU Awk configure 4.1.60 generated by GNU Autoconf 2.69 Copyright (C) 2012 Free Software Foundation, Inc. @@ -2221,7 +2221,7 @@ cat >config.log <<_ACEOF This file contains any messages produced by compilers while running configure, to aid debugging if configure makes a mistake. -It was created by GNU Awk $as_me 4.1.1a, which was +It was created by GNU Awk $as_me 4.1.60, which was generated by GNU Autoconf 2.69. Invocation command line was $ $0 $@ @@ -3104,7 +3104,7 @@ fi # Define the identity of the package. PACKAGE='gawk' - VERSION='4.1.1a' + VERSION='4.1.60' cat >>confdefs.h <<_ACEOF @@ -11506,7 +11506,7 @@ cat >>$CONFIG_STATUS <<\_ACEOF || ac_write_fail=1 # report actual input values of CONFIG_FILES etc. instead of their # values after options handling. ac_log=" -This file was extended by GNU Awk $as_me 4.1.1a, which was +This file was extended by GNU Awk $as_me 4.1.60, which was generated by GNU Autoconf 2.69. Invocation command line was CONFIG_FILES = $CONFIG_FILES @@ -11574,7 +11574,7 @@ _ACEOF cat >>$CONFIG_STATUS <<_ACEOF || ac_write_fail=1 ac_cs_config="`$as_echo "$ac_configure_args" | sed 's/^ //; s/[\\""\`\$]/\\\\&/g'`" ac_cs_version="\\ -GNU Awk config.status 4.1.1a +GNU Awk config.status 4.1.60 configured by $0, generated by GNU Autoconf 2.69, with options \\"\$ac_cs_config\\" diff --git a/configure.ac b/configure.ac index b0817ba3..e7e2d5f6 100644 --- a/configure.ac +++ b/configure.ac @@ -23,7 +23,7 @@ dnl dnl Process this file with autoconf to produce a configure script. -AC_INIT([GNU Awk], 4.1.1a, bug-gawk@gnu.org, gawk) +AC_INIT([GNU Awk], 4.1.60, bug-gawk@gnu.org, gawk) # This is a hack. Different versions of install on different systems # are just too different. Chuck it and use install-sh. diff --git a/doc/ChangeLog b/doc/ChangeLog index 8da64d31..00f83725 100644 --- a/doc/ChangeLog +++ b/doc/ChangeLog @@ -280,7 +280,7 @@ 2013-12-26 Arnold D. Robbins <arnold@skeeve.com> * gawktexi.in: More minor additions / fixes. - (Bugs): Add John Malmberg for VMS. + (Bugs): Add John Malmberg for VMS. Other minor edits. 2013-12-25 Arnold D. Robbins <arnold@skeeve.com> @@ -354,6 +354,11 @@ * gawktexi.in (FN, FFN, DF,DDF, PVERSION, CTL): Remove macros. They have no alternate versions and are just in the way. +2013-08-15 Arnold D. Robbins <arnold@skeeve.com> + + * gawk.1: Document that ENVIRON updates affect the environment. + * gawktexi.in: Ditto. + 2013-06-27 Arnold D. Robbins <arnold@skeeve.com> * texinfo.tex: Update from Karl, fixes a formating problem. @@ -917,11 +917,17 @@ An array containing the values of the current environment. The array is indexed by the environment variables, each element being the value of that variable (e.g., \fBENVIRON["HOME"]\fP might be \fB"/home/arnold"\fR). -Changing this array does not affect the environment seen by programs which +.sp +In POSIX mode, +changing this array does not affect the environment seen by programs which .I gawk spawns via redirection or the .B system() function. +Otherwise, +.I gawk +updates its real environment so that programs it spawns see +the changes. .TP .B ERRNO If a system error occurs either doing a redirection for diff --git a/doc/gawk.info b/doc/gawk.info index a7d489bd..d65c1276 100644 --- a/doc/gawk.info +++ b/doc/gawk.info @@ -10128,10 +10128,18 @@ Options::), they are not special. An associative array containing the values of the environment. The array indices are the environment variable names; the elements are the values of the particular environment variables. For - example, `ENVIRON["HOME"]' might be `"/home/arnold"'. Changing - this array does not affect the environment passed on to any - programs that `awk' may spawn via redirection or the `system()' - function. (In a future version of `gawk', it may do so.) + example, `ENVIRON["HOME"]' might be `/home/arnold'. + + For POSIX `awk', changing this array does not affect the + environment passed on to any programs that `awk' may spawn via + redirection or the `system()' function. + + However, beginning with version 4.2, if not in POSIX compatibility + mode, `gawk' does update its own environment when `ENVIRON' is + changed, thus changing the environment seen by programs that it + creates. You should therefore be especially careful if you modify + `ENVIRON["PATH"]"', which is the search path for finding + executable programs. Some operating systems may not have environment variables. On such systems, the `ENVIRON' array is empty (except for @@ -31713,9 +31721,9 @@ Index * dark corner, exit statement: Exit Statement. (line 30) * dark corner, field separators: Field Splitting Summary. (line 46) -* dark corner, FILENAME variable <1>: Auto-set. (line 90) +* dark corner, FILENAME variable <1>: Auto-set. (line 98) * dark corner, FILENAME variable: Getline Notes. (line 19) -* dark corner, FNR/NR variables: Auto-set. (line 301) +* dark corner, FNR/NR variables: Auto-set. (line 309) * dark corner, format-control characters: Control Letters. (line 18) * dark corner, FS as null string: Single Character Fields. (line 20) @@ -31899,12 +31907,12 @@ Index (line 81) * differences in awk and gawk, command line directories: Command line directories. (line 6) -* differences in awk and gawk, ERRNO variable: Auto-set. (line 74) +* differences in awk and gawk, ERRNO variable: Auto-set. (line 82) * differences in awk and gawk, error messages: Special FD. (line 16) * differences in awk and gawk, FIELDWIDTHS variable: User-modified. (line 37) * differences in awk and gawk, FPAT variable: User-modified. (line 43) -* differences in awk and gawk, FUNCTAB variable: Auto-set. (line 115) +* differences in awk and gawk, FUNCTAB variable: Auto-set. (line 123) * differences in awk and gawk, function arguments (gawk): Calling Built-in. (line 16) * differences in awk and gawk, getline command: Getline. (line 19) @@ -31927,7 +31935,7 @@ Index (line 260) * differences in awk and gawk, print/printf statements: Format Modifiers. (line 13) -* differences in awk and gawk, PROCINFO array: Auto-set. (line 128) +* differences in awk and gawk, PROCINFO array: Auto-set. (line 136) * differences in awk and gawk, read timeouts: Read Timeout. (line 6) * differences in awk and gawk, record separators: awk split records. (line 124) @@ -31937,7 +31945,7 @@ Index (line 26) * differences in awk and gawk, RS/RT variables: gawk split records. (line 58) -* differences in awk and gawk, RT variable: Auto-set. (line 257) +* differences in awk and gawk, RT variable: Auto-set. (line 265) * differences in awk and gawk, single-character fields: Single Character Fields. (line 6) * differences in awk and gawk, split() function: String Functions. @@ -31945,7 +31953,7 @@ Index * differences in awk and gawk, strings: Scalar Constants. (line 20) * differences in awk and gawk, strings, storing: gawk split records. (line 77) -* differences in awk and gawk, SYMTAB variable: Auto-set. (line 261) +* differences in awk and gawk, SYMTAB variable: Auto-set. (line 269) * differences in awk and gawk, TEXTDOMAIN variable: User-modified. (line 152) * differences in awk and gawk, trunc-mod operation: Arithmetic Ops. @@ -31985,8 +31993,8 @@ Index * dynamically loaded extensions: Dynamic Extensions. (line 6) * e debugger command (alias for enable): Breakpoint Control. (line 73) * EBCDIC: Ordinal Functions. (line 45) -* effective group ID of gawk user: Auto-set. (line 133) -* effective user ID of gawk user: Auto-set. (line 137) +* effective group ID of gawk user: Auto-set. (line 141) +* effective user ID of gawk user: Auto-set. (line 145) * egrep utility <1>: Egrep Program. (line 6) * egrep utility: Bracket Expressions. (line 24) * egrep.awk program: Egrep Program. (line 54) @@ -32042,13 +32050,13 @@ Index (line 11) * EREs (Extended Regular Expressions): Bracket Expressions. (line 24) * ERRNO variable <1>: TCP/IP Networking. (line 54) -* ERRNO variable: Auto-set. (line 74) +* ERRNO variable: Auto-set. (line 82) * ERRNO variable, with BEGINFILE pattern: BEGINFILE/ENDFILE. (line 26) * ERRNO variable, with close() function: Close Files And Pipes. (line 139) * ERRNO variable, with getline command: Getline. (line 19) * error handling: Special FD. (line 16) -* error handling, ERRNO variable and: Auto-set. (line 74) +* error handling, ERRNO variable and: Auto-set. (line 82) * error output: Special FD. (line 6) * escape processing, gsub()/gensub()/sub() functions: Gory Details. (line 6) @@ -32102,7 +32110,7 @@ Index (line 6) * extension API version: Extension Versioning. (line 6) -* extension API, version number: Auto-set. (line 224) +* extension API, version number: Auto-set. (line 232) * extension example: Extension Example. (line 6) * extension registration: Registration Functions. (line 6) @@ -32181,7 +32189,7 @@ Index * file names, distinguishing: Auto-set. (line 56) * file names, in compatibility mode: Special Caveats. (line 9) * file names, standard streams in gawk: Special FD. (line 46) -* FILENAME variable <1>: Auto-set. (line 90) +* FILENAME variable <1>: Auto-set. (line 98) * FILENAME variable: Reading Files. (line 6) * FILENAME variable, getline, setting with: Getline Notes. (line 19) * filenames, assignments as: Ignoring Assigns. (line 6) @@ -32249,9 +32257,9 @@ Index * flush buffered output: I/O Functions. (line 28) * fnmatch() extension function: Extension Sample Fnmatch. (line 12) -* FNR variable <1>: Auto-set. (line 99) +* FNR variable <1>: Auto-set. (line 107) * FNR variable: Records. (line 6) -* FNR variable, changing: Auto-set. (line 301) +* FNR variable, changing: Auto-set. (line 309) * for statement: For Statement. (line 6) * for statement, looping over arrays: Scanning an Array. (line 20) * fork() extension function: Extension Sample Fork. @@ -32301,7 +32309,7 @@ Index * FSF (Free Software Foundation): Manual History. (line 6) * fts() extension function: Extension Sample File Functions. (line 61) -* FUNCTAB array: Auto-set. (line 115) +* FUNCTAB array: Auto-set. (line 123) * function calls: Function Calls. (line 6) * function calls, indirect: Indirect Calls. (line 6) * function definition example: Function Example. (line 6) @@ -32351,7 +32359,7 @@ Index * G-d: Acknowledgments. (line 78) * Garfinkle, Scott: Contributors. (line 34) * gawk program, dynamic profiling: Profiling. (line 179) -* gawk version: Auto-set. (line 199) +* gawk version: Auto-set. (line 207) * gawk, ARGIND variable in: Other Arguments. (line 12) * gawk, awk and <1>: This Manual. (line 14) * gawk, awk and: Preface. (line 23) @@ -32372,7 +32380,7 @@ Index * gawk, distribution: Distribution contents. (line 6) * gawk, ERRNO variable in <1>: TCP/IP Networking. (line 54) -* gawk, ERRNO variable in <2>: Auto-set. (line 74) +* gawk, ERRNO variable in <2>: Auto-set. (line 82) * gawk, ERRNO variable in <3>: BEGINFILE/ENDFILE. (line 26) * gawk, ERRNO variable in <4>: Close Files And Pipes. (line 139) @@ -32389,7 +32397,7 @@ Index * gawk, FPAT variable in <1>: User-modified. (line 43) * gawk, FPAT variable in: Splitting By Content. (line 27) -* gawk, FUNCTAB array in: Auto-set. (line 115) +* gawk, FUNCTAB array in: Auto-set. (line 123) * gawk, function arguments and: Calling Built-in. (line 16) * gawk, hexadecimal numbers and: Nondecimal-numbers. (line 42) * gawk, IGNORECASE variable in <1>: Array Sorting Functions. @@ -32420,7 +32428,7 @@ Index * gawk, OS/2 version of: PC Using. (line 16) * gawk, PROCINFO array in <1>: Two-way I/O. (line 117) * gawk, PROCINFO array in <2>: Time Functions. (line 47) -* gawk, PROCINFO array in: Auto-set. (line 128) +* gawk, PROCINFO array in: Auto-set. (line 136) * gawk, regexp constants and: Using Constant Regexps. (line 28) * gawk, regular expressions, case sensitivity: Case-sensitivity. @@ -32428,14 +32436,14 @@ Index * gawk, regular expressions, operators: GNU Regexp Operators. (line 6) * gawk, regular expressions, precedence: Regexp Operators. (line 162) -* gawk, RT variable in <1>: Auto-set. (line 257) +* gawk, RT variable in <1>: Auto-set. (line 265) * gawk, RT variable in <2>: Multiple Line. (line 129) * gawk, RT variable in: awk split records. (line 124) * gawk, See Also awk: Preface. (line 36) * gawk, source code, obtaining: Getting. (line 6) * gawk, splitting fields and: Constant Size. (line 88) * gawk, string-translation functions: I18N Functions. (line 6) -* gawk, SYMTAB array in: Auto-set. (line 261) +* gawk, SYMTAB array in: Auto-set. (line 269) * gawk, TEXTDOMAIN variable in: User-modified. (line 152) * gawk, timestamps: Time Functions. (line 6) * gawk, uses for: Preface. (line 36) @@ -32521,7 +32529,7 @@ Index * Grigera, Juan: Contributors. (line 57) * group database, reading: Group Functions. (line 6) * group file: Group Functions. (line 6) -* group ID of gawk user: Auto-set. (line 172) +* group ID of gawk user: Auto-set. (line 180) * groups, information about: Group Functions. (line 6) * gsub <1>: String Functions. (line 139) * gsub: Using Constant Regexps. @@ -32812,7 +32820,7 @@ Index * mawk utility <3>: Concatenation. (line 36) * mawk utility <4>: Getline/Pipe. (line 62) * mawk utility: Escape Sequences. (line 124) -* maximum precision supported by MPFR library: Auto-set. (line 213) +* maximum precision supported by MPFR library: Auto-set. (line 221) * McIlroy, Doug: Glossary. (line 149) * McPhee, Patrick: Contributors. (line 100) * message object files: Explaining gettext. (line 42) @@ -32825,7 +32833,7 @@ Index * messages from extensions: Printing Messages. (line 6) * metacharacters in regular expressions: Regexp Operators. (line 6) * metacharacters, escape sequences for: Escape Sequences. (line 130) -* minimum precision supported by MPFR library: Auto-set. (line 216) +* minimum precision supported by MPFR library: Auto-set. (line 224) * mktime: Time Functions. (line 25) * modifiers, in format specifiers: Format Modifiers. (line 6) * monetary information, localization: Explaining gettext. (line 104) @@ -32877,7 +32885,7 @@ Index (line 47) * nexti debugger command: Debugger Execution Control. (line 49) -* NF variable <1>: Auto-set. (line 104) +* NF variable <1>: Auto-set. (line 112) * NF variable: Fields. (line 33) * NF variable, decrementing: Changing Fields. (line 107) * ni debugger command (alias for nexti): Debugger Execution Control. @@ -32886,9 +32894,9 @@ Index * non-existent array elements: Reference to Elements. (line 23) * not Boolean-logic operator: Boolean Ops. (line 6) -* NR variable <1>: Auto-set. (line 123) +* NR variable <1>: Auto-set. (line 131) * NR variable: Records. (line 6) -* NR variable, changing: Auto-set. (line 301) +* NR variable, changing: Auto-set. (line 309) * null strings <1>: Basic Data Typing. (line 26) * null strings <2>: Truth Values. (line 6) * null strings <3>: Regexp Field Splitting. @@ -33002,7 +33010,7 @@ Index * p debugger command (alias for print): Viewing And Changing Data. (line 36) * Papadopoulos, Panos: Contributors. (line 129) -* parent process ID of gawk process: Auto-set. (line 181) +* parent process ID of gawk process: Auto-set. (line 189) * parentheses (), in a profile: Profiling. (line 146) * parentheses (), regexp operator: Regexp Operators. (line 80) * password file: Passwd Functions. (line 16) @@ -33165,24 +33173,24 @@ Index * printing, unduplicated lines of text: Uniq Program. (line 6) * printing, user information: Id Program. (line 6) * private variables: Library Names. (line 11) -* process group idIDof gawk process: Auto-set. (line 175) -* process ID of gawk process: Auto-set. (line 178) +* process group idIDof gawk process: Auto-set. (line 183) +* process ID of gawk process: Auto-set. (line 186) * processes, two-way communications with: Two-way I/O. (line 23) * processing data: Basic High Level. (line 6) * PROCINFO array <1>: Passwd Functions. (line 6) * PROCINFO array <2>: Time Functions. (line 47) -* PROCINFO array: Auto-set. (line 128) +* PROCINFO array: Auto-set. (line 136) * PROCINFO array, and communications via ptys: Two-way I/O. (line 117) * PROCINFO array, and group membership: Group Functions. (line 6) * PROCINFO array, and user and group ID numbers: Id Program. (line 15) * PROCINFO array, testing the field splitting: Passwd Functions. (line 161) -* PROCINFO array, uses: Auto-set. (line 234) +* PROCINFO array, uses: Auto-set. (line 242) * PROCINFO, values of sorted_in: Controlling Scanning. (line 26) * profiling awk programs: Profiling. (line 6) * profiling awk programs, dynamically: Profiling. (line 179) -* program identifiers: Auto-set. (line 146) +* program identifiers: Auto-set. (line 154) * program, definition of: Getting Started. (line 21) * programmers, attractiveness of: Two-way I/O. (line 6) * programming conventions, --non-decimal-data option: Nondecimal Data. @@ -33342,7 +33350,7 @@ Index * right shift: Bitwise Functions. (line 52) * right shift, bitwise: Bitwise Functions. (line 32) * Ritchie, Dennis: Basic Data Typing. (line 54) -* RLENGTH variable: Auto-set. (line 244) +* RLENGTH variable: Auto-set. (line 252) * RLENGTH variable, match() function and: String Functions. (line 224) * Robbins, Arnold <1>: Future Extensions. (line 6) * Robbins, Arnold <2>: Bugs. (line 32) @@ -33368,9 +33376,9 @@ Index * RS variable: awk split records. (line 12) * RS variable, multiline records and: Multiple Line. (line 17) * rshift: Bitwise Functions. (line 52) -* RSTART variable: Auto-set. (line 250) +* RSTART variable: Auto-set. (line 258) * RSTART variable, match() function and: String Functions. (line 224) -* RT variable <1>: Auto-set. (line 257) +* RT variable <1>: Auto-set. (line 265) * RT variable <2>: Multiple Line. (line 129) * RT variable: awk split records. (line 124) * Rubin, Paul <1>: Contributors. (line 15) @@ -33390,7 +33398,7 @@ Index * scanning arrays: Scanning an Array. (line 6) * scanning multidimensional arrays: Multiscanning. (line 11) * Schorr, Andrew <1>: Contributors. (line 134) -* Schorr, Andrew <2>: Auto-set. (line 284) +* Schorr, Andrew <2>: Auto-set. (line 292) * Schorr, Andrew: Acknowledgments. (line 60) * Schreiber, Bert: Acknowledgments. (line 38) * Schreiber, Rita: Acknowledgments. (line 38) @@ -33475,7 +33483,7 @@ Index (line 110) * sidebar, Changing FS Does Not Affect the Fields: Field Splitting Summary. (line 38) -* sidebar, Changing NR and FNR: Auto-set. (line 299) +* sidebar, Changing NR and FNR: Auto-set. (line 307) * sidebar, Controlling Output Buffering with system(): I/O Functions. (line 138) * sidebar, Escape Sequences for Metacharacters: Escape Sequences. @@ -33636,9 +33644,9 @@ Index * substr: String Functions. (line 479) * substring: String Functions. (line 479) * Sumner, Andrew: Other Versions. (line 64) -* supplementary groups of gawk process: Auto-set. (line 229) +* supplementary groups of gawk process: Auto-set. (line 237) * switch statement: Switch Statement. (line 6) -* SYMTAB array: Auto-set. (line 261) +* SYMTAB array: Auto-set. (line 269) * syntactic ambiguity: /= operator vs. /=.../ regexp constant: Assignment Ops. (line 148) * system: I/O Functions. (line 75) @@ -33816,10 +33824,10 @@ Index * variables, uninitialized, as array subscripts: Uninitialized Subscripts. (line 6) * variables, user-defined: Variables. (line 6) -* version of gawk: Auto-set. (line 199) -* version of gawk extension API: Auto-set. (line 224) -* version of GNU MP library: Auto-set. (line 210) -* version of GNU MPFR library: Auto-set. (line 206) +* version of gawk: Auto-set. (line 207) +* version of gawk extension API: Auto-set. (line 232) +* version of GNU MP library: Auto-set. (line 218) +* version of GNU MPFR library: Auto-set. (line 214) * vertical bar (|): Regexp Operators. (line 70) * vertical bar (|), | operator (I/O) <1>: Precedence. (line 65) * vertical bar (|), | operator (I/O): Getline/Pipe. (line 9) @@ -34105,351 +34113,351 @@ Node: Built-in Variables422572 Node: User-modified423699 Ref: User-modified-Footnote-1431388 Node: Auto-set431450 -Ref: Auto-set-Footnote-1444032 -Ref: Auto-set-Footnote-2444237 -Node: ARGC and ARGV444293 -Node: Pattern Action Summary448147 -Node: Arrays450370 -Node: Array Basics451919 -Node: Array Intro452745 -Ref: figure-array-elements454718 -Node: Reference to Elements457125 -Node: Assigning Elements459398 -Node: Array Example459889 -Node: Scanning an Array461621 -Node: Controlling Scanning464636 -Ref: Controlling Scanning-Footnote-1469809 -Node: Delete470125 -Ref: Delete-Footnote-1472890 -Node: Numeric Array Subscripts472947 -Node: Uninitialized Subscripts475130 -Node: Multidimensional476755 -Node: Multiscanning479848 -Node: Arrays of Arrays481437 -Node: Arrays Summary486100 -Node: Functions488205 -Node: Built-in489078 -Node: Calling Built-in490156 -Node: Numeric Functions492144 -Ref: Numeric Functions-Footnote-1495978 -Ref: Numeric Functions-Footnote-2496335 -Ref: Numeric Functions-Footnote-3496383 -Node: String Functions496652 -Ref: String Functions-Footnote-1519663 -Ref: String Functions-Footnote-2519792 -Ref: String Functions-Footnote-3520040 -Node: Gory Details520127 -Ref: table-sub-escapes521796 -Ref: table-sub-posix-92523150 -Ref: table-sub-proposed524501 -Ref: table-posix-sub525855 -Ref: table-gensub-escapes527400 -Ref: Gory Details-Footnote-1528576 -Ref: Gory Details-Footnote-2528627 -Node: I/O Functions528778 -Ref: I/O Functions-Footnote-1535901 -Node: Time Functions536048 -Ref: Time Functions-Footnote-1546512 -Ref: Time Functions-Footnote-2546580 -Ref: Time Functions-Footnote-3546738 -Ref: Time Functions-Footnote-4546849 -Ref: Time Functions-Footnote-5546961 -Ref: Time Functions-Footnote-6547188 -Node: Bitwise Functions547454 -Ref: table-bitwise-ops548016 -Ref: Bitwise Functions-Footnote-1552261 -Node: Type Functions552445 -Node: I18N Functions553587 -Node: User-defined555232 -Node: Definition Syntax556036 -Ref: Definition Syntax-Footnote-1560961 -Node: Function Example561030 -Ref: Function Example-Footnote-1563674 -Node: Function Caveats563696 -Node: Calling A Function564214 -Node: Variable Scope565169 -Node: Pass By Value/Reference568157 -Node: Return Statement571665 -Node: Dynamic Typing574649 -Node: Indirect Calls575578 -Node: Functions Summary585291 -Node: Library Functions587830 -Ref: Library Functions-Footnote-1591448 -Ref: Library Functions-Footnote-2591591 -Node: Library Names591762 -Ref: Library Names-Footnote-1595235 -Ref: Library Names-Footnote-2595455 -Node: General Functions595541 -Node: Strtonum Function596569 -Node: Assert Function599349 -Node: Round Function602675 -Node: Cliff Random Function604216 -Node: Ordinal Functions605232 -Ref: Ordinal Functions-Footnote-1608309 -Ref: Ordinal Functions-Footnote-2608561 -Node: Join Function608772 -Ref: Join Function-Footnote-1610543 -Node: Getlocaltime Function610743 -Node: Readfile Function614479 -Node: Data File Management616318 -Node: Filetrans Function616950 -Node: Rewind Function621019 -Node: File Checking622406 -Ref: File Checking-Footnote-1623538 -Node: Empty Files623739 -Node: Ignoring Assigns625718 -Node: Getopt Function627272 -Ref: Getopt Function-Footnote-1638575 -Node: Passwd Functions638778 -Ref: Passwd Functions-Footnote-1647757 -Node: Group Functions647845 -Ref: Group Functions-Footnote-1655786 -Node: Walking Arrays655999 -Node: Library Functions Summary657602 -Node: Library exercises658990 -Node: Sample Programs660270 -Node: Running Examples661040 -Node: Clones661768 -Node: Cut Program662992 -Node: Egrep Program672860 -Ref: Egrep Program-Footnote-1680831 -Node: Id Program680941 -Node: Split Program684605 -Ref: Split Program-Footnote-1688143 -Node: Tee Program688271 -Node: Uniq Program691078 -Node: Wc Program698508 -Ref: Wc Program-Footnote-1702773 -Node: Miscellaneous Programs702865 -Node: Dupword Program704078 -Node: Alarm Program706109 -Node: Translate Program710923 -Ref: Translate Program-Footnote-1715314 -Ref: Translate Program-Footnote-2715584 -Node: Labels Program715718 -Ref: Labels Program-Footnote-1719089 -Node: Word Sorting719173 -Node: History Sorting723216 -Node: Extract Program725052 -Node: Simple Sed732588 -Node: Igawk Program735650 -Ref: Igawk Program-Footnote-1749961 -Ref: Igawk Program-Footnote-2750162 -Node: Anagram Program750300 -Node: Signature Program753368 -Node: Programs Summary754615 -Node: Programs Exercises755830 -Node: Advanced Features759481 -Node: Nondecimal Data761429 -Node: Array Sorting763006 -Node: Controlling Array Traversal763703 -Node: Array Sorting Functions771983 -Ref: Array Sorting Functions-Footnote-1775890 -Node: Two-way I/O776084 -Ref: Two-way I/O-Footnote-1781600 -Node: TCP/IP Networking781682 -Node: Profiling784526 -Node: Advanced Features Summary792068 -Node: Internationalization793932 -Node: I18N and L10N795412 -Node: Explaining gettext796098 -Ref: Explaining gettext-Footnote-1801238 -Ref: Explaining gettext-Footnote-2801422 -Node: Programmer i18n801587 -Node: Translator i18n805812 -Node: String Extraction806606 -Ref: String Extraction-Footnote-1807567 -Node: Printf Ordering807653 -Ref: Printf Ordering-Footnote-1810435 -Node: I18N Portability810499 -Ref: I18N Portability-Footnote-1812948 -Node: I18N Example813011 -Ref: I18N Example-Footnote-1815733 -Node: Gawk I18N815805 -Node: I18N Summary816443 -Node: Debugger817782 -Node: Debugging818804 -Node: Debugging Concepts819245 -Node: Debugging Terms821101 -Node: Awk Debugging823698 -Node: Sample Debugging Session824590 -Node: Debugger Invocation825110 -Node: Finding The Bug826443 -Node: List of Debugger Commands832925 -Node: Breakpoint Control834257 -Node: Debugger Execution Control837921 -Node: Viewing And Changing Data841281 -Node: Execution Stack844639 -Node: Debugger Info846152 -Node: Miscellaneous Debugger Commands850146 -Node: Readline Support855330 -Node: Limitations856222 -Node: Debugging Summary858496 -Node: Arbitrary Precision Arithmetic859660 -Node: Computer Arithmetic860989 -Ref: Computer Arithmetic-Footnote-1865376 -Node: Math Definitions865433 -Ref: table-ieee-formats868317 -Node: MPFR features868821 -Node: FP Math Caution870463 -Ref: FP Math Caution-Footnote-1871504 -Node: Inexactness of computations871873 -Node: Inexact representation872821 -Node: Comparing FP Values874176 -Node: Errors accumulate875140 -Node: Getting Accuracy876573 -Node: Try To Round879232 -Node: Setting precision880131 -Ref: table-predefined-precision-strings880813 -Node: Setting the rounding mode882606 -Ref: table-gawk-rounding-modes882970 -Ref: Setting the rounding mode-Footnote-1886424 -Node: Arbitrary Precision Integers886603 -Ref: Arbitrary Precision Integers-Footnote-1889573 -Node: POSIX Floating Point Problems889722 -Ref: POSIX Floating Point Problems-Footnote-1893591 -Node: Floating point summary893629 -Node: Dynamic Extensions895846 -Node: Extension Intro897398 -Node: Plugin License898663 -Node: Extension Mechanism Outline899348 -Ref: figure-load-extension899772 -Ref: figure-load-new-function901257 -Ref: figure-call-new-function902259 -Node: Extension API Description904243 -Node: Extension API Functions Introduction905693 -Node: General Data Types910558 -Ref: General Data Types-Footnote-1916251 -Node: Requesting Values916550 -Ref: table-value-types-returned917287 -Node: Memory Allocation Functions918245 -Ref: Memory Allocation Functions-Footnote-1920992 -Node: Constructor Functions921088 -Node: Registration Functions922846 -Node: Extension Functions923531 -Node: Exit Callback Functions925833 -Node: Extension Version String927082 -Node: Input Parsers927732 -Node: Output Wrappers937535 -Node: Two-way processors942051 -Node: Printing Messages944255 -Ref: Printing Messages-Footnote-1945332 -Node: Updating `ERRNO'945484 -Node: Accessing Parameters946223 -Node: Symbol Table Access947453 -Node: Symbol table by name947967 -Node: Symbol table by cookie949943 -Ref: Symbol table by cookie-Footnote-1954076 -Node: Cached values954139 -Ref: Cached values-Footnote-1957643 -Node: Array Manipulation957734 -Ref: Array Manipulation-Footnote-1958832 -Node: Array Data Types958871 -Ref: Array Data Types-Footnote-1961574 -Node: Array Functions961666 -Node: Flattening Arrays965540 -Node: Creating Arrays972392 -Node: Extension API Variables977123 -Node: Extension Versioning977759 -Node: Extension API Informational Variables979660 -Node: Extension API Boilerplate980746 -Node: Finding Extensions984550 -Node: Extension Example985110 -Node: Internal File Description985840 -Node: Internal File Ops989931 -Ref: Internal File Ops-Footnote-11001363 -Node: Using Internal File Ops1001503 -Ref: Using Internal File Ops-Footnote-11003850 -Node: Extension Samples1004118 -Node: Extension Sample File Functions1005642 -Node: Extension Sample Fnmatch1013210 -Node: Extension Sample Fork1014691 -Node: Extension Sample Inplace1015904 -Node: Extension Sample Ord1017579 -Node: Extension Sample Readdir1018415 -Ref: table-readdir-file-types1019271 -Node: Extension Sample Revout1020070 -Node: Extension Sample Rev2way1020661 -Node: Extension Sample Read write array1021402 -Node: Extension Sample Readfile1023281 -Node: Extension Sample API Tests1024381 -Node: Extension Sample Time1024906 -Node: gawkextlib1026221 -Node: Extension summary1029034 -Node: Extension Exercises1032727 -Node: Language History1033449 -Node: V7/SVR3.11035092 -Node: SVR41037412 -Node: POSIX1038854 -Node: BTL1040240 -Node: POSIX/GNU1040974 -Node: Feature History1046573 -Node: Common Extensions1059703 -Node: Ranges and Locales1061015 -Ref: Ranges and Locales-Footnote-11065632 -Ref: Ranges and Locales-Footnote-21065659 -Ref: Ranges and Locales-Footnote-31065893 -Node: Contributors1066114 -Node: History summary1071576 -Node: Installation1072945 -Node: Gawk Distribution1073896 -Node: Getting1074380 -Node: Extracting1075204 -Node: Distribution contents1076846 -Node: Unix Installation1082563 -Node: Quick Installation1083180 -Node: Additional Configuration Options1085622 -Node: Configuration Philosophy1087360 -Node: Non-Unix Installation1089711 -Node: PC Installation1090169 -Node: PC Binary Installation1091480 -Node: PC Compiling1093328 -Ref: PC Compiling-Footnote-11096327 -Node: PC Testing1096432 -Node: PC Using1097608 -Node: Cygwin1101766 -Node: MSYS1102575 -Node: VMS Installation1103089 -Node: VMS Compilation1103885 -Ref: VMS Compilation-Footnote-11105107 -Node: VMS Dynamic Extensions1105165 -Node: VMS Installation Details1106538 -Node: VMS Running1108790 -Node: VMS GNV1111624 -Node: VMS Old Gawk1112347 -Node: Bugs1112817 -Node: Other Versions1116821 -Node: Installation summary1123076 -Node: Notes1124132 -Node: Compatibility Mode1124997 -Node: Additions1125779 -Node: Accessing The Source1126704 -Node: Adding Code1128140 -Node: New Ports1134318 -Node: Derived Files1138799 -Ref: Derived Files-Footnote-11143880 -Ref: Derived Files-Footnote-21143914 -Ref: Derived Files-Footnote-31144510 -Node: Future Extensions1144624 -Node: Implementation Limitations1145230 -Node: Extension Design1146478 -Node: Old Extension Problems1147632 -Ref: Old Extension Problems-Footnote-11149149 -Node: Extension New Mechanism Goals1149206 -Ref: Extension New Mechanism Goals-Footnote-11152566 -Node: Extension Other Design Decisions1152755 -Node: Extension Future Growth1154861 -Node: Old Extension Mechanism1155697 -Node: Notes summary1157459 -Node: Basic Concepts1158645 -Node: Basic High Level1159326 -Ref: figure-general-flow1159598 -Ref: figure-process-flow1160197 -Ref: Basic High Level-Footnote-11163426 -Node: Basic Data Typing1163611 -Node: Glossary1166939 -Node: Copying1192091 -Node: GNU Free Documentation License1229647 -Node: Index1254783 +Ref: Auto-set-Footnote-1444369 +Ref: Auto-set-Footnote-2444574 +Node: ARGC and ARGV444630 +Node: Pattern Action Summary448484 +Node: Arrays450707 +Node: Array Basics452256 +Node: Array Intro453082 +Ref: figure-array-elements455055 +Node: Reference to Elements457462 +Node: Assigning Elements459735 +Node: Array Example460226 +Node: Scanning an Array461958 +Node: Controlling Scanning464973 +Ref: Controlling Scanning-Footnote-1470146 +Node: Delete470462 +Ref: Delete-Footnote-1473227 +Node: Numeric Array Subscripts473284 +Node: Uninitialized Subscripts475467 +Node: Multidimensional477092 +Node: Multiscanning480185 +Node: Arrays of Arrays481774 +Node: Arrays Summary486437 +Node: Functions488542 +Node: Built-in489415 +Node: Calling Built-in490493 +Node: Numeric Functions492481 +Ref: Numeric Functions-Footnote-1496315 +Ref: Numeric Functions-Footnote-2496672 +Ref: Numeric Functions-Footnote-3496720 +Node: String Functions496989 +Ref: String Functions-Footnote-1520000 +Ref: String Functions-Footnote-2520129 +Ref: String Functions-Footnote-3520377 +Node: Gory Details520464 +Ref: table-sub-escapes522133 +Ref: table-sub-posix-92523487 +Ref: table-sub-proposed524838 +Ref: table-posix-sub526192 +Ref: table-gensub-escapes527737 +Ref: Gory Details-Footnote-1528913 +Ref: Gory Details-Footnote-2528964 +Node: I/O Functions529115 +Ref: I/O Functions-Footnote-1536238 +Node: Time Functions536385 +Ref: Time Functions-Footnote-1546849 +Ref: Time Functions-Footnote-2546917 +Ref: Time Functions-Footnote-3547075 +Ref: Time Functions-Footnote-4547186 +Ref: Time Functions-Footnote-5547298 +Ref: Time Functions-Footnote-6547525 +Node: Bitwise Functions547791 +Ref: table-bitwise-ops548353 +Ref: Bitwise Functions-Footnote-1552598 +Node: Type Functions552782 +Node: I18N Functions553924 +Node: User-defined555569 +Node: Definition Syntax556373 +Ref: Definition Syntax-Footnote-1561298 +Node: Function Example561367 +Ref: Function Example-Footnote-1564011 +Node: Function Caveats564033 +Node: Calling A Function564551 +Node: Variable Scope565506 +Node: Pass By Value/Reference568494 +Node: Return Statement572002 +Node: Dynamic Typing574986 +Node: Indirect Calls575915 +Node: Functions Summary585628 +Node: Library Functions588167 +Ref: Library Functions-Footnote-1591785 +Ref: Library Functions-Footnote-2591928 +Node: Library Names592099 +Ref: Library Names-Footnote-1595572 +Ref: Library Names-Footnote-2595792 +Node: General Functions595878 +Node: Strtonum Function596906 +Node: Assert Function599686 +Node: Round Function603012 +Node: Cliff Random Function604553 +Node: Ordinal Functions605569 +Ref: Ordinal Functions-Footnote-1608646 +Ref: Ordinal Functions-Footnote-2608898 +Node: Join Function609109 +Ref: Join Function-Footnote-1610880 +Node: Getlocaltime Function611080 +Node: Readfile Function614816 +Node: Data File Management616655 +Node: Filetrans Function617287 +Node: Rewind Function621356 +Node: File Checking622743 +Ref: File Checking-Footnote-1623875 +Node: Empty Files624076 +Node: Ignoring Assigns626055 +Node: Getopt Function627609 +Ref: Getopt Function-Footnote-1638912 +Node: Passwd Functions639115 +Ref: Passwd Functions-Footnote-1648094 +Node: Group Functions648182 +Ref: Group Functions-Footnote-1656123 +Node: Walking Arrays656336 +Node: Library Functions Summary657939 +Node: Library exercises659327 +Node: Sample Programs660607 +Node: Running Examples661377 +Node: Clones662105 +Node: Cut Program663329 +Node: Egrep Program673197 +Ref: Egrep Program-Footnote-1681168 +Node: Id Program681278 +Node: Split Program684942 +Ref: Split Program-Footnote-1688480 +Node: Tee Program688608 +Node: Uniq Program691415 +Node: Wc Program698845 +Ref: Wc Program-Footnote-1703110 +Node: Miscellaneous Programs703202 +Node: Dupword Program704415 +Node: Alarm Program706446 +Node: Translate Program711260 +Ref: Translate Program-Footnote-1715651 +Ref: Translate Program-Footnote-2715921 +Node: Labels Program716055 +Ref: Labels Program-Footnote-1719426 +Node: Word Sorting719510 +Node: History Sorting723553 +Node: Extract Program725389 +Node: Simple Sed732925 +Node: Igawk Program735987 +Ref: Igawk Program-Footnote-1750298 +Ref: Igawk Program-Footnote-2750499 +Node: Anagram Program750637 +Node: Signature Program753705 +Node: Programs Summary754952 +Node: Programs Exercises756167 +Node: Advanced Features759818 +Node: Nondecimal Data761766 +Node: Array Sorting763343 +Node: Controlling Array Traversal764040 +Node: Array Sorting Functions772320 +Ref: Array Sorting Functions-Footnote-1776227 +Node: Two-way I/O776421 +Ref: Two-way I/O-Footnote-1781937 +Node: TCP/IP Networking782019 +Node: Profiling784863 +Node: Advanced Features Summary792405 +Node: Internationalization794269 +Node: I18N and L10N795749 +Node: Explaining gettext796435 +Ref: Explaining gettext-Footnote-1801575 +Ref: Explaining gettext-Footnote-2801759 +Node: Programmer i18n801924 +Node: Translator i18n806149 +Node: String Extraction806943 +Ref: String Extraction-Footnote-1807904 +Node: Printf Ordering807990 +Ref: Printf Ordering-Footnote-1810772 +Node: I18N Portability810836 +Ref: I18N Portability-Footnote-1813285 +Node: I18N Example813348 +Ref: I18N Example-Footnote-1816070 +Node: Gawk I18N816142 +Node: I18N Summary816780 +Node: Debugger818119 +Node: Debugging819141 +Node: Debugging Concepts819582 +Node: Debugging Terms821438 +Node: Awk Debugging824035 +Node: Sample Debugging Session824927 +Node: Debugger Invocation825447 +Node: Finding The Bug826780 +Node: List of Debugger Commands833262 +Node: Breakpoint Control834594 +Node: Debugger Execution Control838258 +Node: Viewing And Changing Data841618 +Node: Execution Stack844976 +Node: Debugger Info846489 +Node: Miscellaneous Debugger Commands850483 +Node: Readline Support855667 +Node: Limitations856559 +Node: Debugging Summary858833 +Node: Arbitrary Precision Arithmetic859997 +Node: Computer Arithmetic861326 +Ref: Computer Arithmetic-Footnote-1865713 +Node: Math Definitions865770 +Ref: table-ieee-formats868654 +Node: MPFR features869158 +Node: FP Math Caution870800 +Ref: FP Math Caution-Footnote-1871841 +Node: Inexactness of computations872210 +Node: Inexact representation873158 +Node: Comparing FP Values874513 +Node: Errors accumulate875477 +Node: Getting Accuracy876910 +Node: Try To Round879569 +Node: Setting precision880468 +Ref: table-predefined-precision-strings881150 +Node: Setting the rounding mode882943 +Ref: table-gawk-rounding-modes883307 +Ref: Setting the rounding mode-Footnote-1886761 +Node: Arbitrary Precision Integers886940 +Ref: Arbitrary Precision Integers-Footnote-1889910 +Node: POSIX Floating Point Problems890059 +Ref: POSIX Floating Point Problems-Footnote-1893928 +Node: Floating point summary893966 +Node: Dynamic Extensions896183 +Node: Extension Intro897735 +Node: Plugin License899000 +Node: Extension Mechanism Outline899685 +Ref: figure-load-extension900109 +Ref: figure-load-new-function901594 +Ref: figure-call-new-function902596 +Node: Extension API Description904580 +Node: Extension API Functions Introduction906030 +Node: General Data Types910895 +Ref: General Data Types-Footnote-1916588 +Node: Requesting Values916887 +Ref: table-value-types-returned917624 +Node: Memory Allocation Functions918582 +Ref: Memory Allocation Functions-Footnote-1921329 +Node: Constructor Functions921425 +Node: Registration Functions923183 +Node: Extension Functions923868 +Node: Exit Callback Functions926170 +Node: Extension Version String927419 +Node: Input Parsers928069 +Node: Output Wrappers937872 +Node: Two-way processors942388 +Node: Printing Messages944592 +Ref: Printing Messages-Footnote-1945669 +Node: Updating `ERRNO'945821 +Node: Accessing Parameters946560 +Node: Symbol Table Access947790 +Node: Symbol table by name948304 +Node: Symbol table by cookie950280 +Ref: Symbol table by cookie-Footnote-1954413 +Node: Cached values954476 +Ref: Cached values-Footnote-1957980 +Node: Array Manipulation958071 +Ref: Array Manipulation-Footnote-1959169 +Node: Array Data Types959208 +Ref: Array Data Types-Footnote-1961911 +Node: Array Functions962003 +Node: Flattening Arrays965877 +Node: Creating Arrays972729 +Node: Extension API Variables977460 +Node: Extension Versioning978096 +Node: Extension API Informational Variables979997 +Node: Extension API Boilerplate981083 +Node: Finding Extensions984887 +Node: Extension Example985447 +Node: Internal File Description986177 +Node: Internal File Ops990268 +Ref: Internal File Ops-Footnote-11001700 +Node: Using Internal File Ops1001840 +Ref: Using Internal File Ops-Footnote-11004187 +Node: Extension Samples1004455 +Node: Extension Sample File Functions1005979 +Node: Extension Sample Fnmatch1013547 +Node: Extension Sample Fork1015028 +Node: Extension Sample Inplace1016241 +Node: Extension Sample Ord1017916 +Node: Extension Sample Readdir1018752 +Ref: table-readdir-file-types1019608 +Node: Extension Sample Revout1020407 +Node: Extension Sample Rev2way1020998 +Node: Extension Sample Read write array1021739 +Node: Extension Sample Readfile1023618 +Node: Extension Sample API Tests1024718 +Node: Extension Sample Time1025243 +Node: gawkextlib1026558 +Node: Extension summary1029371 +Node: Extension Exercises1033064 +Node: Language History1033786 +Node: V7/SVR3.11035429 +Node: SVR41037749 +Node: POSIX1039191 +Node: BTL1040577 +Node: POSIX/GNU1041311 +Node: Feature History1046910 +Node: Common Extensions1060040 +Node: Ranges and Locales1061352 +Ref: Ranges and Locales-Footnote-11065969 +Ref: Ranges and Locales-Footnote-21065996 +Ref: Ranges and Locales-Footnote-31066230 +Node: Contributors1066451 +Node: History summary1071913 +Node: Installation1073282 +Node: Gawk Distribution1074233 +Node: Getting1074717 +Node: Extracting1075541 +Node: Distribution contents1077183 +Node: Unix Installation1082900 +Node: Quick Installation1083517 +Node: Additional Configuration Options1085959 +Node: Configuration Philosophy1087697 +Node: Non-Unix Installation1090048 +Node: PC Installation1090506 +Node: PC Binary Installation1091817 +Node: PC Compiling1093665 +Ref: PC Compiling-Footnote-11096664 +Node: PC Testing1096769 +Node: PC Using1097945 +Node: Cygwin1102103 +Node: MSYS1102912 +Node: VMS Installation1103426 +Node: VMS Compilation1104222 +Ref: VMS Compilation-Footnote-11105444 +Node: VMS Dynamic Extensions1105502 +Node: VMS Installation Details1106875 +Node: VMS Running1109127 +Node: VMS GNV1111961 +Node: VMS Old Gawk1112684 +Node: Bugs1113154 +Node: Other Versions1117158 +Node: Installation summary1123413 +Node: Notes1124469 +Node: Compatibility Mode1125334 +Node: Additions1126116 +Node: Accessing The Source1127041 +Node: Adding Code1128477 +Node: New Ports1134655 +Node: Derived Files1139136 +Ref: Derived Files-Footnote-11144217 +Ref: Derived Files-Footnote-21144251 +Ref: Derived Files-Footnote-31144847 +Node: Future Extensions1144961 +Node: Implementation Limitations1145567 +Node: Extension Design1146815 +Node: Old Extension Problems1147969 +Ref: Old Extension Problems-Footnote-11149486 +Node: Extension New Mechanism Goals1149543 +Ref: Extension New Mechanism Goals-Footnote-11152903 +Node: Extension Other Design Decisions1153092 +Node: Extension Future Growth1155198 +Node: Old Extension Mechanism1156034 +Node: Notes summary1157796 +Node: Basic Concepts1158982 +Node: Basic High Level1159663 +Ref: figure-general-flow1159935 +Ref: figure-process-flow1160534 +Ref: Basic High Level-Footnote-11163763 +Node: Basic Data Typing1163948 +Node: Glossary1167276 +Node: Copying1192428 +Node: GNU Free Documentation License1229984 +Node: Index1255120 End Tag Table diff --git a/doc/gawk.texi b/doc/gawk.texi index 3d910ee0..04dbca47 100644 --- a/doc/gawk.texi +++ b/doc/gawk.texi @@ -14447,10 +14447,18 @@ next file is opened. An associative array containing the values of the environment. The array indices are the environment variable names; the elements are the values of the particular environment variables. For example, -@code{ENVIRON["HOME"]} might be @code{"/home/arnold"}. Changing this array -does not affect the environment passed on to any programs that -@command{awk} may spawn via redirection or the @code{system()} function. -(In a future version of @command{gawk}, it may do so.) +@code{ENVIRON["HOME"]} might be @code{/home/arnold}. + +For POSIX @command{awk}, changing this array does not affect the +environment passed on to any programs that @command{awk} may spawn via +redirection or the @code{system()} function. + +However, beginning with version 4.2, if not in POSIX +compatibility mode, @command{gawk} does update its own environment when +@code{ENVIRON} is changed, thus changing the environment seen by programs +that it creates. You should therefore be especially careful if you +modify @code{ENVIRON["PATH"]"}, which is the search path for finding +executable programs. Some operating systems may not have environment variables. On such systems, the @code{ENVIRON} array is empty (except for @@ -37620,9 +37628,10 @@ mail at the Internet address noted previously. If you find bugs in one of the non-Unix ports of @command{gawk}, please send an electronic mail message to the person who maintains that port. They -are named in the following list, as well as in the @file{README} file in the @command{gawk} -distribution. Information in the @file{README} file should be considered -authoritative if it conflicts with this @value{DOCUMENT}. +are named in the following list, as well as in the @file{README} file +in the @command{gawk} distribution. Information in the @file{README} +file should be considered authoritative if it conflicts with this +@value{DOCUMENT}. The people maintaining the non-Unix ports of @command{gawk} are as follows: @@ -37650,7 +37659,8 @@ John Malmberg, @EMAIL{wb8tyw@@qsl.net,wb8tyw at qsl.net}. @end multitable If your bug is also reproducible under Unix, please send a copy of your -report to the @EMAIL{bug-gawk@@gnu.org,bug-gawk at gnu dot org} email list as well. +report to the @EMAIL{bug-gawk@@gnu.org,bug-gawk at gnu dot org} email +list as well. @c ENDOFRANGE dbugg @c ENDOFRANGE tblgawb diff --git a/doc/gawktexi.in b/doc/gawktexi.in index eac398a9..0c32c9f5 100644 --- a/doc/gawktexi.in +++ b/doc/gawktexi.in @@ -13827,10 +13827,18 @@ next file is opened. An associative array containing the values of the environment. The array indices are the environment variable names; the elements are the values of the particular environment variables. For example, -@code{ENVIRON["HOME"]} might be @code{"/home/arnold"}. Changing this array -does not affect the environment passed on to any programs that -@command{awk} may spawn via redirection or the @code{system()} function. -(In a future version of @command{gawk}, it may do so.) +@code{ENVIRON["HOME"]} might be @code{/home/arnold}. + +For POSIX @command{awk}, changing this array does not affect the +environment passed on to any programs that @command{awk} may spawn via +redirection or the @code{system()} function. + +However, beginning with version 4.2, if not in POSIX +compatibility mode, @command{gawk} does update its own environment when +@code{ENVIRON} is changed, thus changing the environment seen by programs +that it creates. You should therefore be especially careful if you +modify @code{ENVIRON["PATH"]"}, which is the search path for finding +executable programs. Some operating systems may not have environment variables. On such systems, the @code{ENVIRON} array is empty (except for @@ -36764,9 +36772,10 @@ mail at the Internet address noted previously. If you find bugs in one of the non-Unix ports of @command{gawk}, please send an electronic mail message to the person who maintains that port. They -are named in the following list, as well as in the @file{README} file in the @command{gawk} -distribution. Information in the @file{README} file should be considered -authoritative if it conflicts with this @value{DOCUMENT}. +are named in the following list, as well as in the @file{README} file +in the @command{gawk} distribution. Information in the @file{README} +file should be considered authoritative if it conflicts with this +@value{DOCUMENT}. The people maintaining the non-Unix ports of @command{gawk} are as follows: @@ -36794,7 +36803,8 @@ John Malmberg, @EMAIL{wb8tyw@@qsl.net,wb8tyw at qsl.net}. @end multitable If your bug is also reproducible under Unix, please send a copy of your -report to the @EMAIL{bug-gawk@@gnu.org,bug-gawk at gnu dot org} email list as well. +report to the @EMAIL{bug-gawk@@gnu.org,bug-gawk at gnu dot org} email +list as well. @c ENDOFRANGE dbugg @c ENDOFRANGE tblgawb @@ -1120,6 +1120,10 @@ load_environ() */ path_environ("AWKPATH", defpath); path_environ("AWKLIBPATH", deflibpath); + + /* set up array functions */ + init_env_array(ENVIRON_node); + return ENVIRON_node; } diff --git a/pc/config.h b/pc/config.h index 85389eb2..c5d78a96 100644 --- a/pc/config.h +++ b/pc/config.h @@ -423,7 +423,7 @@ #define PACKAGE_NAME "GNU Awk" /* Define to the full name and version of this package. */ -#define PACKAGE_STRING "GNU Awk 4.1.1a" +#define PACKAGE_STRING "GNU Awk 4.1.60" /* Define to the one symbol short name of this package. */ #define PACKAGE_TARNAME "gawk" @@ -432,7 +432,7 @@ #define PACKAGE_URL "http://www.gnu.org/software/gawk/" /* Define to the version of this package. */ -#define PACKAGE_VERSION "4.1.1a" +#define PACKAGE_VERSION "4.1.60" /* Define to 1 if *printf supports %F format */ #undef PRINTF_HAS_F_FORMAT @@ -494,7 +494,7 @@ /* Version number of package */ -#define VERSION "4.1.1a" +#define VERSION "4.1.60" /* Enable large inode numbers on Mac OS X 10.5. */ #ifndef _DARWIN_USE_64_BIT_INODE diff --git a/str_array.c b/str_array.c index aa82d71b..33c9ddcc 100644 --- a/str_array.c +++ b/str_array.c @@ -69,6 +69,25 @@ afunc_t str_array_func[] = { (afunc_t) 0, }; +static NODE **env_remove(NODE *symbol, NODE *subs); +static NODE **env_store(NODE *symbol, NODE *subs); +static NODE **env_clear(NODE *symbol, NODE *subs); + +/* special case for ENVIRON */ +afunc_t env_array_func[] = { + str_array_init, + (afunc_t) 0, + null_length, + str_lookup, + str_exists, + env_clear, + env_remove, + str_list, + str_copy, + str_dump, + env_store, +}; + static inline NODE **str_find(NODE *symbol, NODE *s1, size_t code1, unsigned long hash1); static void grow_table(NODE *symbol); @@ -737,3 +756,63 @@ scramble(unsigned long x) return x; } + +/* env_remove --- for ENVIRON, remove value from real environment */ + +static NODE ** +env_remove(NODE *symbol, NODE *subs) +{ + NODE **val = str_remove(symbol, subs); + + if (val != NULL) + (void) unsetenv(subs->stptr); + + return val; +} + +/* env_clear --- clear out the environment when ENVIRON is deleted */ + +static NODE ** +env_clear(NODE *symbol, NODE *subs) +{ + extern char **environ; + NODE **val = str_clear(symbol, subs); + + environ = NULL; /* ZAP! */ + + /* str_clear zaps the vtable, reset it */ + symbol->array_funcs = env_array_func; + + return val; +} + +/* env_store --- post assign function for ENVIRON, put new value into env */ + +static NODE ** +env_store(NODE *symbol, NODE *subs) +{ + NODE **val = str_exists(symbol, subs); + const char *newval; + + assert(val != NULL); + + newval = (*val)->stptr; + if (newval == NULL) + newval = ""; + + (void) setenv(subs->stptr, newval, 1); + + return val; +} + +/* init_env_array --- set up the pointers for ENVIRON. A bit hacky. */ + +void +init_env_array(NODE *env_node) +{ + /* If POSIX simply don't reset the vtable and things work as before */ + if (do_posix) + return; + + env_node->array_funcs = env_array_func; +} diff --git a/test/ChangeLog b/test/ChangeLog index 4315bbb9..cd5e5fa8 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -210,6 +210,12 @@ * Makefile.am (badassign1): New test. * badassign1.awk, badassign1.ok: New files. +2013-09-25 Arnold D. Robbins <arnold@skeeve.com> + + * Makfile.am (randtest): New test. + * randtest.sh, randtest.ok: New files. + * rand.ok: Updated to reflect new results based on code change. + 2013-09-13 Arnold D. Robbins <arnold@skeeve.com> * Makefile.am: Fix quoting for generation of Maketests file so diff --git a/test/Makefile.am b/test/Makefile.am index e5c3c1eb..077c5ea2 100644 --- a/test/Makefile.am +++ b/test/Makefile.am @@ -705,6 +705,8 @@ EXTRA_DIST = \ rand-mpfr.ok \ rand.awk \ rand.ok \ + randtest.sh \ + randtest.ok \ range1.awk \ range1.in \ range1.ok \ @@ -979,7 +981,7 @@ BASIC_TESTS = \ paramdup paramres paramtyp paramuninitglobal parse1 parsefld parseme \ pcntplus posix2008sub prdupval prec printf0 printf1 prmarscl prmreuse \ prt1eval prtoeval \ - rand range1 rebt8b1 redfilnm regeq regexprange regrange reindops \ + rand randtest range1 rebt8b1 redfilnm regeq regexprange regrange reindops \ reparse resplit rri1 rs rsnul1nl rsnulbig rsnulbig2 rstest1 rstest2 \ rstest3 rstest4 rstest5 rswhite \ scalar sclforin sclifin sortempty splitargv splitarr splitdef \ @@ -1916,6 +1918,12 @@ dfamb1: AWKPATH="$(srcdir)" $(AWK) -f $@.awk "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@ @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@ + +randtest:: + @echo $@ + @GAWK="$(AWKPROG)" "$(srcdir)"/randtest.sh >_$@ + @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@ + backbigs1: @echo $@ @[ -z "$$GAWKLOCALE" ] && GAWKLOCALE=en_US.UTF-8; \ diff --git a/test/Makefile.in b/test/Makefile.in index 5326e0b1..a603f0b4 100644 --- a/test/Makefile.in +++ b/test/Makefile.in @@ -951,6 +951,8 @@ EXTRA_DIST = \ rand-mpfr.ok \ rand.awk \ rand.ok \ + randtest.sh \ + randtest.ok \ range1.awk \ range1.in \ range1.ok \ @@ -1224,7 +1226,7 @@ BASIC_TESTS = \ paramdup paramres paramtyp paramuninitglobal parse1 parsefld parseme \ pcntplus posix2008sub prdupval prec printf0 printf1 prmarscl prmreuse \ prt1eval prtoeval \ - rand range1 rebt8b1 redfilnm regeq regexprange regrange reindops \ + rand randtest range1 rebt8b1 redfilnm regeq regexprange regrange reindops \ reparse resplit rri1 rs rsnul1nl rsnulbig rsnulbig2 rstest1 rstest2 \ rstest3 rstest4 rstest5 rswhite \ scalar sclforin sclifin sortempty splitargv splitarr splitdef \ @@ -2340,6 +2342,11 @@ dfamb1: AWKPATH="$(srcdir)" $(AWK) -f $@.awk "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@ @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@ +randtest:: + @echo $@ + @GAWK="$(AWKPROG)" "$(srcdir)"/randtest.sh >_$@ + @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@ + backbigs1: @echo $@ @[ -z "$$GAWKLOCALE" ] && GAWKLOCALE=en_US.UTF-8; \ diff --git a/test/rand.ok b/test/rand.ok index 60432b95..1df4ba39 100644 --- a/test/rand.ok +++ b/test/rand.ok @@ -1 +1 @@ - 62 67 88 6 35 77 3 68 30 96 90 26 35 8 88 93 49 53 37 + 67 6 77 68 96 26 8 93 53 74 53 95 78 74 96 77 33 58 91 diff --git a/test/randtest.ok b/test/randtest.ok new file mode 100644 index 00000000..e69de29b --- /dev/null +++ b/test/randtest.ok diff --git a/test/randtest.sh b/test/randtest.sh new file mode 100755 index 00000000..b17fda73 --- /dev/null +++ b/test/randtest.sh @@ -0,0 +1,113 @@ +# THIS PURPOSELY DOES NOT HAVE A !# LINE !!!! +# +# Date: Mon, 9 Sep 2013 14:49:43 -0700 +# From: Bob Jewett <jewett@bill.scs.agilent.com> +# Message-Id: <201309092149.r89Lnh94010909@bill.scs.agilent.com> +# To: arnold@skeeve.com +# Subject: Re: [bug-gawk] Bug in random() in builtin.c +# +# Hi Arnold, +# +# Attached below is a script that tests gawk for this particular +# rand() problem. The pair-wise combinations show a strong +# autocorrelation for a delay of 31 pairs of rand() samples. +# +# The script prints out the measured autocorrelation for a record +# of NSAMPLES pairs. It also prints a fail message at the end if +# it fails. +# +# If you want to see the autocorrelation values, there is a print +# statement that if uncommented will save them to a file. +# +# Please let me know if the mailer screws up the transfer or +# if you have any questions about the test. +# +# Best regards, +# Bob +# +# -------------- test_pair_power_autocorrelation ----------------------- +# +#!/bin/ksh + +#GAWK=/bin/gawk + +# ADR: Get GAWK from the environment. +# Additional note: This wants ksh/bash for the use of $RANDOM below to +# seed the generator. However, shells that don't provide it won't be +# a problem since gawk will then seed the generator with the time of day, +# as srand() will be called without an argument. + +# large NSAMPLES and NRUNS will bring any correlation out of the noise better +NSAMPLES=1024; MAX_ALLOWED_SIGMA=5; NRUNS=50; + +$GAWK 'BEGIN{ + srand('$RANDOM'); + nsamples=('$NSAMPLES'); + max_allowed_sigma=('$MAX_ALLOWED_SIGMA'); + nruns=('$NRUNS'); + for(tau=0;tau<nsamples/2;tau++) corr[tau]=0; + + for(run=0;run<nruns;run++) { + sum=0; + + # Fill an array with a sequence of samples that are a + # function of pairs of rand() values. + + for(i=0;i<nsamples;i++) { + samp[i]=((rand()-0.5)*(rand()-0.5))^2; + sum=sum+samp[i]; + } + + # Subtract off the mean of the sequence: + + mean=sum/nsamples; + for(i=0;i<nsamples;i++) samp[i]=samp[i]-mean; + + # Calculate an autocorrelation function on the sequence. + # Because the values of rand() should be independent, there + # should be no peaks in the autocorrelation. + + for(tau=0;tau<nsamples/2;tau++) { + sum=0; + for(i=0;i<nsamples/2;i++) sum=sum+samp[i]*samp[i+tau]; + corr[tau]=corr[tau]+sum; + } + + } + # Normalize the autocorrelation to the tau=0 value. + + max_corr=corr[0]; + for(tau=0;tau<nsamples/2;tau++) corr[tau]=corr[tau]/max_corr; + + # OPTIONALLY Print out the autocorrelation values: + + # for(tau=0;tau<nsamples/2;tau++) print tau, corr[tau] > "pairpower_corr.data"; + + # Calculate the sigma for the non-zero tau values: + + power_sum=0; + + for(tau=1;tau<nsamples/2;tau++) power_sum=power_sum+(corr[tau])^2; + + sigma=sqrt(power_sum/(nsamples/2-1)); + + # See if any of the correlations exceed a reasonable number of sigma: + + passed=1; + for(tau=1;tau<nsamples/2;tau++) { + if ( abs(corr[tau])/sigma > max_allowed_sigma ) { + print "Tau=", tau ", Autocorr=", corr[tau]/sigma, "sigma"; + passed=0; + } + } + if(!passed) { + print "Test failed." + exit(1); + } + else exit (0); + } + +function abs(abs_input) { return(sqrt(abs_input^2)) ; } +' + +exit 0 |