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 | 788 | ||||
-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, 1007 insertions, 427 deletions
@@ -99,6 +99,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 @@ -465,6 +472,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 @@ -482,6 +494,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. @@ -501,6 +518,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 @@ -582,6 +606,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. @@ -590,6 +620,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.1 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.0 to 4.1.1 --------------------------- @@ -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 b004023b..61052c98 100644 --- a/doc/ChangeLog +++ b/doc/ChangeLog @@ -240,7 +240,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> @@ -314,6 +314,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 c5038115..244a836d 100644 --- a/doc/gawk.info +++ b/doc/gawk.info @@ -9806,10 +9806,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 @@ -31004,9 +31012,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 89) +* dark corner, FILENAME variable <1>: Auto-set. (line 97) * dark corner, FILENAME variable: Getline Notes. (line 19) -* dark corner, FNR/NR variables: Auto-set. (line 300) +* dark corner, FNR/NR variables: Auto-set. (line 308) * dark corner, format-control characters: Control Letters. (line 18) * dark corner, FS as null string: Single Character Fields. (line 20) @@ -31190,12 +31198,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 73) +* differences in awk and gawk, ERRNO variable: Auto-set. (line 81) * 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 114) +* differences in awk and gawk, FUNCTAB variable: Auto-set. (line 122) * differences in awk and gawk, function arguments (gawk): Calling Built-in. (line 16) * differences in awk and gawk, getline command: Getline. (line 19) @@ -31218,7 +31226,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 127) +* differences in awk and gawk, PROCINFO array: Auto-set. (line 135) * differences in awk and gawk, read timeouts: Read Timeout. (line 6) * differences in awk and gawk, record separators: awk split records. (line 124) @@ -31228,7 +31236,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 256) +* differences in awk and gawk, RT variable: Auto-set. (line 264) * differences in awk and gawk, single-character fields: Single Character Fields. (line 6) * differences in awk and gawk, split() function: String Functions. @@ -31236,7 +31244,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 260) +* differences in awk and gawk, SYMTAB variable: Auto-set. (line 268) * differences in awk and gawk, TEXTDOMAIN variable: User-modified. (line 152) * differences in awk and gawk, trunc-mod operation: Arithmetic Ops. @@ -31277,8 +31285,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 132) -* effective user ID of gawk user: Auto-set. (line 136) +* effective group ID of gawk user: Auto-set. (line 140) +* effective user ID of gawk user: Auto-set. (line 144) * egrep utility <1>: Egrep Program. (line 6) * egrep utility: Bracket Expressions. (line 24) * egrep.awk program: Egrep Program. (line 53) @@ -31333,13 +31341,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 73) +* ERRNO variable: Auto-set. (line 81) * 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 73) +* error handling, ERRNO variable and: Auto-set. (line 81) * error output: Special FD. (line 6) * escape processing, gsub()/gensub()/sub() functions: Gory Details. (line 6) @@ -31393,7 +31401,7 @@ Index (line 6) * extension API version: Extension Versioning. (line 6) -* extension API, version number: Auto-set. (line 223) +* extension API, version number: Auto-set. (line 231) * extension example: Extension Example. (line 6) * extension registration: Registration Functions. (line 6) @@ -31472,7 +31480,7 @@ Index * file names, distinguishing: Auto-set. (line 55) * 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 89) +* FILENAME variable <1>: Auto-set. (line 97) * FILENAME variable: Reading Files. (line 6) * FILENAME variable, getline, setting with: Getline Notes. (line 19) * filenames, assignments as: Ignoring Assigns. (line 6) @@ -31542,9 +31550,9 @@ Index * flush buffered output: I/O Functions. (line 28) * fnmatch() extension function: Extension Sample Fnmatch. (line 12) -* FNR variable <1>: Auto-set. (line 98) +* FNR variable <1>: Auto-set. (line 106) * FNR variable: Records. (line 6) -* FNR variable, changing: Auto-set. (line 300) +* FNR variable, changing: Auto-set. (line 308) * for statement: For Statement. (line 6) * for statement, looping over arrays: Scanning an Array. (line 20) * fork() extension function: Extension Sample Fork. @@ -31594,7 +31602,7 @@ Index * FSF (Free Software Foundation): Manual History. (line 6) * fts() extension function: Extension Sample File Functions. (line 61) -* FUNCTAB array: Auto-set. (line 114) +* FUNCTAB array: Auto-set. (line 122) * function calls: Function Calls. (line 6) * function calls, indirect: Indirect Calls. (line 6) * function definition example: Function Example. (line 6) @@ -31644,7 +31652,7 @@ Index * G-d: Acknowledgments. (line 78) * Garfinkle, Scott: Contributors. (line 34) * gawk program, dynamic profiling: Profiling. (line 179) -* gawk version: Auto-set. (line 198) +* gawk version: Auto-set. (line 206) * gawk, ARGIND variable in: Other Arguments. (line 12) * gawk, awk and <1>: This Manual. (line 14) * gawk, awk and: Preface. (line 23) @@ -31665,7 +31673,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 73) +* gawk, ERRNO variable in <2>: Auto-set. (line 81) * gawk, ERRNO variable in <3>: BEGINFILE/ENDFILE. (line 26) * gawk, ERRNO variable in <4>: Close Files And Pipes. (line 139) @@ -31682,7 +31690,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 114) +* gawk, FUNCTAB array in: Auto-set. (line 122) * 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. @@ -31713,7 +31721,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 127) +* gawk, PROCINFO array in: Auto-set. (line 135) * gawk, regexp constants and: Using Constant Regexps. (line 28) * gawk, regular expressions, case sensitivity: Case-sensitivity. @@ -31721,14 +31729,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 256) +* gawk, RT variable in <1>: Auto-set. (line 264) * 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 260) +* gawk, SYMTAB array in: Auto-set. (line 268) * gawk, TEXTDOMAIN variable in: User-modified. (line 152) * gawk, timestamps: Time Functions. (line 6) * gawk, uses for: Preface. (line 36) @@ -31815,7 +31823,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 171) +* group ID of gawk user: Auto-set. (line 179) * groups, information about: Group Functions. (line 6) * gsub <1>: String Functions. (line 139) * gsub: Using Constant Regexps. @@ -32111,7 +32119,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 212) +* maximum precision supported by MPFR library: Auto-set. (line 220) * McIlroy, Doug: Glossary. (line 149) * McPhee, Patrick: Contributors. (line 100) * message object files: Explaining gettext. (line 42) @@ -32124,7 +32132,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 215) +* minimum precision supported by MPFR library: Auto-set. (line 223) * mktime: Time Functions. (line 25) * modifiers, in format specifiers: Format Modifiers. (line 6) * monetary information, localization: Explaining gettext. (line 104) @@ -32178,7 +32186,7 @@ Index (line 47) * nexti debugger command: Debugger Execution Control. (line 49) -* NF variable <1>: Auto-set. (line 103) +* NF variable <1>: Auto-set. (line 111) * NF variable: Fields. (line 33) * NF variable, decrementing: Changing Fields. (line 107) * ni debugger command (alias for nexti): Debugger Execution Control. @@ -32187,9 +32195,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 122) +* NR variable <1>: Auto-set. (line 130) * NR variable: Records. (line 6) -* NR variable, changing: Auto-set. (line 300) +* NR variable, changing: Auto-set. (line 308) * null strings <1>: Basic Data Typing. (line 26) * null strings <2>: Truth Values. (line 6) * null strings <3>: Regexp Field Splitting. @@ -32304,7 +32312,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 180) +* parent process ID of gawk process: Auto-set. (line 188) * parentheses (), in a profile: Profiling. (line 146) * parentheses (), regexp operator: Regexp Operators. (line 80) * password file: Passwd Functions. (line 16) @@ -32469,24 +32477,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 174) -* process ID of gawk process: Auto-set. (line 177) +* process group idIDof gawk process: Auto-set. (line 182) +* process ID of gawk process: Auto-set. (line 185) * 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 127) +* PROCINFO array: Auto-set. (line 135) * 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 233) +* PROCINFO array, uses: Auto-set. (line 241) * 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 145) +* program identifiers: Auto-set. (line 153) * program, definition of: Getting Started. (line 21) * programmers, attractiveness of: Two-way I/O. (line 6) * programming conventions, --non-decimal-data option: Nondecimal Data. @@ -32646,7 +32654,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 243) +* RLENGTH variable: Auto-set. (line 251) * RLENGTH variable, match() function and: String Functions. (line 224) * Robbins, Arnold <1>: Future Extensions. (line 6) * Robbins, Arnold <2>: Bugs. (line 32) @@ -32675,9 +32683,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 249) +* RSTART variable: Auto-set. (line 257) * RSTART variable, match() function and: String Functions. (line 224) -* RT variable <1>: Auto-set. (line 256) +* RT variable <1>: Auto-set. (line 264) * RT variable <2>: Multiple Line. (line 129) * RT variable: awk split records. (line 124) * Rubin, Paul <1>: Contributors. (line 15) @@ -32697,7 +32705,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 283) +* Schorr, Andrew <2>: Auto-set. (line 291) * Schorr, Andrew: Acknowledgments. (line 60) * Schreiber, Bert: Acknowledgments. (line 38) * Schreiber, Rita: Acknowledgments. (line 38) @@ -32785,7 +32793,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 298) +* sidebar, Changing NR and FNR: Auto-set. (line 306) * sidebar, Controlling Output Buffering with system(): I/O Functions. (line 138) * sidebar, Escape Sequences for Metacharacters: Escape Sequences. @@ -32947,9 +32955,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 228) +* supplementary groups of gawk process: Auto-set. (line 236) * switch statement: Switch Statement. (line 6) -* SYMTAB array: Auto-set. (line 260) +* SYMTAB array: Auto-set. (line 268) * syntactic ambiguity: /= operator vs. /=.../ regexp constant: Assignment Ops. (line 148) * system: I/O Functions. (line 75) @@ -33127,10 +33135,10 @@ Index * variables, uninitialized, as array subscripts: Uninitialized Subscripts. (line 6) * variables, user-defined: Variables. (line 6) -* version of gawk: Auto-set. (line 198) -* version of gawk extension API: Auto-set. (line 223) -* version of GNU MP library: Auto-set. (line 209) -* version of GNU MPFR library: Auto-set. (line 205) +* version of gawk: Auto-set. (line 206) +* version of gawk extension API: Auto-set. (line 231) +* version of GNU MP library: Auto-set. (line 217) +* version of GNU MPFR library: Auto-set. (line 213) * vertical bar (|): Regexp Operators. (line 70) * vertical bar (|), | operator (I/O) <1>: Precedence. (line 65) * vertical bar (|), | operator (I/O): Getline/Pipe. (line 9) @@ -33409,346 +33417,346 @@ Node: Built-in Variables408984 Node: User-modified410080 Ref: User-modified-Footnote-1417765 Node: Auto-set417827 -Ref: Auto-set-Footnote-1430373 -Ref: Auto-set-Footnote-2430578 -Node: ARGC and ARGV430634 -Node: Arrays434473 -Node: Array Basics435971 -Node: Array Intro436797 -Ref: figure-array-elements438770 -Node: Reference to Elements441177 -Node: Assigning Elements443450 -Node: Array Example443941 -Node: Scanning an Array445673 -Node: Controlling Scanning448688 -Ref: Controlling Scanning-Footnote-1453861 -Node: Delete454177 -Ref: Delete-Footnote-1456942 -Node: Numeric Array Subscripts456999 -Node: Uninitialized Subscripts459182 -Node: Multidimensional460807 -Node: Multiscanning463900 -Node: Arrays of Arrays465489 -Node: Functions470129 -Node: Built-in470948 -Node: Calling Built-in472026 -Node: Numeric Functions474014 -Ref: Numeric Functions-Footnote-1477848 -Ref: Numeric Functions-Footnote-2478205 -Ref: Numeric Functions-Footnote-3478253 -Node: String Functions478522 -Ref: String Functions-Footnote-1501533 -Ref: String Functions-Footnote-2501662 -Ref: String Functions-Footnote-3501910 -Node: Gory Details501997 -Ref: table-sub-escapes503666 -Ref: table-sub-posix-92505020 -Ref: table-sub-proposed506371 -Ref: table-posix-sub507725 -Ref: table-gensub-escapes509270 -Ref: Gory Details-Footnote-1510446 -Ref: Gory Details-Footnote-2510497 -Node: I/O Functions510648 -Ref: I/O Functions-Footnote-1517771 -Node: Time Functions517918 -Ref: Time Functions-Footnote-1528382 -Ref: Time Functions-Footnote-2528450 -Ref: Time Functions-Footnote-3528608 -Ref: Time Functions-Footnote-4528719 -Ref: Time Functions-Footnote-5528831 -Ref: Time Functions-Footnote-6529058 -Node: Bitwise Functions529324 -Ref: table-bitwise-ops529886 -Ref: Bitwise Functions-Footnote-1534131 -Node: Type Functions534315 -Node: I18N Functions535457 -Node: User-defined537102 -Node: Definition Syntax537906 -Ref: Definition Syntax-Footnote-1542831 -Node: Function Example542900 -Ref: Function Example-Footnote-1545544 -Node: Function Caveats545566 -Node: Calling A Function546084 -Node: Variable Scope547039 -Node: Pass By Value/Reference550027 -Node: Return Statement553535 -Node: Dynamic Typing556519 -Node: Indirect Calls557448 -Node: Library Functions567135 -Ref: Library Functions-Footnote-1570648 -Ref: Library Functions-Footnote-2570791 -Node: Library Names570962 -Ref: Library Names-Footnote-1574435 -Ref: Library Names-Footnote-2574655 -Node: General Functions574741 -Node: Strtonum Function575769 -Node: Assert Function578699 -Node: Round Function582025 -Node: Cliff Random Function583566 -Node: Ordinal Functions584582 -Ref: Ordinal Functions-Footnote-1587659 -Ref: Ordinal Functions-Footnote-2587911 -Node: Join Function588122 -Ref: Join Function-Footnote-1589893 -Node: Getlocaltime Function590093 -Node: Readfile Function593829 -Node: Data File Management595668 -Node: Filetrans Function596300 -Node: Rewind Function600355 -Node: File Checking601742 -Ref: File Checking-Footnote-1602874 -Node: Empty Files603075 -Node: Ignoring Assigns605298 -Node: Getopt Function606829 -Ref: Getopt Function-Footnote-1618125 -Node: Passwd Functions618328 -Ref: Passwd Functions-Footnote-1627307 -Node: Group Functions627395 -Ref: Group Functions-Footnote-1635337 -Node: Walking Arrays635550 -Node: Sample Programs637686 -Node: Running Examples638360 -Node: Clones639088 -Node: Cut Program640312 -Node: Egrep Program650173 -Ref: Egrep Program-Footnote-1658102 -Node: Id Program658212 -Node: Split Program661876 -Ref: Split Program-Footnote-1665407 -Node: Tee Program665535 -Node: Uniq Program668342 -Node: Wc Program675772 -Ref: Wc Program-Footnote-1680040 -Ref: Wc Program-Footnote-2680240 -Node: Miscellaneous Programs680332 -Node: Dupword Program681520 -Node: Alarm Program683551 -Node: Translate Program688365 -Ref: Translate Program-Footnote-1692756 -Ref: Translate Program-Footnote-2693026 -Node: Labels Program693160 -Ref: Labels Program-Footnote-1696531 -Node: Word Sorting696615 -Node: History Sorting700658 -Node: Extract Program702494 -Ref: Extract Program-Footnote-1710069 -Node: Simple Sed710198 -Node: Igawk Program713260 -Ref: Igawk Program-Footnote-1728436 -Ref: Igawk Program-Footnote-2728637 -Node: Anagram Program728775 -Node: Signature Program731843 -Node: Advanced Features733090 -Node: Nondecimal Data734976 -Node: Array Sorting736553 -Node: Controlling Array Traversal737250 -Node: Array Sorting Functions745530 -Ref: Array Sorting Functions-Footnote-1749437 -Node: Two-way I/O749631 -Ref: Two-way I/O-Footnote-1755147 -Node: TCP/IP Networking755229 -Node: Profiling758073 -Node: Internationalization765581 -Node: I18N and L10N767006 -Node: Explaining gettext767692 -Ref: Explaining gettext-Footnote-1772832 -Ref: Explaining gettext-Footnote-2773016 -Node: Programmer i18n773181 -Node: Translator i18n777406 -Node: String Extraction778200 -Ref: String Extraction-Footnote-1779161 -Node: Printf Ordering779247 -Ref: Printf Ordering-Footnote-1782029 -Node: I18N Portability782093 -Ref: I18N Portability-Footnote-1784542 -Node: I18N Example784605 -Ref: I18N Example-Footnote-1787327 -Node: Gawk I18N787399 -Node: Debugger788012 -Node: Debugging788983 -Node: Debugging Concepts789424 -Node: Debugging Terms791280 -Node: Awk Debugging793877 -Node: Sample Debugging Session794769 -Node: Debugger Invocation795289 -Node: Finding The Bug796622 -Node: List of Debugger Commands803104 -Node: Breakpoint Control804436 -Node: Debugger Execution Control808100 -Node: Viewing And Changing Data811460 -Node: Execution Stack814818 -Node: Debugger Info816331 -Node: Miscellaneous Debugger Commands820325 -Node: Readline Support825509 -Node: Limitations826401 -Node: Arbitrary Precision Arithmetic828649 -Ref: Arbitrary Precision Arithmetic-Footnote-1830298 -Node: General Arithmetic830446 -Node: Floating Point Issues832166 -Node: String Conversion Precision833047 -Ref: String Conversion Precision-Footnote-1834752 -Node: Unexpected Results834861 -Node: POSIX Floating Point Problems837014 -Ref: POSIX Floating Point Problems-Footnote-1840835 -Node: Integer Programming840873 -Node: Floating-point Programming842684 -Ref: Floating-point Programming-Footnote-1849012 -Ref: Floating-point Programming-Footnote-2849282 -Node: Floating-point Representation849546 -Node: Floating-point Context850711 -Ref: table-ieee-formats851550 -Node: Rounding Mode852934 -Ref: table-rounding-modes853413 -Ref: Rounding Mode-Footnote-1856428 -Node: Gawk and MPFR856607 -Node: Arbitrary Precision Floats858016 -Ref: Arbitrary Precision Floats-Footnote-1860459 -Node: Setting Precision860780 -Ref: table-predefined-precision-strings861464 -Node: Setting Rounding Mode863609 -Ref: table-gawk-rounding-modes864013 -Node: Floating-point Constants865200 -Node: Changing Precision866652 -Ref: Changing Precision-Footnote-1868044 -Node: Exact Arithmetic868218 -Node: Arbitrary Precision Integers871352 -Ref: Arbitrary Precision Integers-Footnote-1874367 -Node: Dynamic Extensions874514 -Node: Extension Intro875972 -Node: Plugin License877237 -Node: Extension Mechanism Outline877922 -Ref: figure-load-extension878346 -Ref: figure-load-new-function879831 -Ref: figure-call-new-function880833 -Node: Extension API Description882817 -Node: Extension API Functions Introduction884267 -Node: General Data Types889133 -Ref: General Data Types-Footnote-1894826 -Node: Requesting Values895125 -Ref: table-value-types-returned895862 -Node: Memory Allocation Functions896820 -Ref: Memory Allocation Functions-Footnote-1899567 -Node: Constructor Functions899663 -Node: Registration Functions901421 -Node: Extension Functions902106 -Node: Exit Callback Functions904408 -Node: Extension Version String905658 -Node: Input Parsers906308 -Node: Output Wrappers916111 -Node: Two-way processors920627 -Node: Printing Messages922831 -Ref: Printing Messages-Footnote-1923908 -Node: Updating `ERRNO'924060 -Node: Accessing Parameters924799 -Node: Symbol Table Access926029 -Node: Symbol table by name926543 -Node: Symbol table by cookie928519 -Ref: Symbol table by cookie-Footnote-1932652 -Node: Cached values932715 -Ref: Cached values-Footnote-1936220 -Node: Array Manipulation936311 -Ref: Array Manipulation-Footnote-1937409 -Node: Array Data Types937448 -Ref: Array Data Types-Footnote-1940151 -Node: Array Functions940243 -Node: Flattening Arrays944117 -Node: Creating Arrays950969 -Node: Extension API Variables955700 -Node: Extension Versioning956336 -Node: Extension API Informational Variables958237 -Node: Extension API Boilerplate959323 -Node: Finding Extensions963127 -Node: Extension Example963687 -Node: Internal File Description964417 -Node: Internal File Ops968508 -Ref: Internal File Ops-Footnote-1980054 -Node: Using Internal File Ops980194 -Ref: Using Internal File Ops-Footnote-1982541 -Node: Extension Samples982809 -Node: Extension Sample File Functions984333 -Node: Extension Sample Fnmatch991901 -Node: Extension Sample Fork993368 -Node: Extension Sample Inplace994581 -Node: Extension Sample Ord996347 -Node: Extension Sample Readdir997183 -Ref: table-readdir-file-types998032 -Node: Extension Sample Revout998831 -Node: Extension Sample Rev2way999422 -Node: Extension Sample Read write array1000163 -Node: Extension Sample Readfile1002042 -Node: Extension Sample API Tests1003142 -Node: Extension Sample Time1003667 -Node: gawkextlib1004982 -Node: Language History1007769 -Node: V7/SVR3.11009363 -Node: SVR41011683 -Node: POSIX1013125 -Node: BTL1014511 -Node: POSIX/GNU1015245 -Node: Feature History1020844 -Node: Common Extensions1033956 -Node: Ranges and Locales1035268 -Ref: Ranges and Locales-Footnote-11039885 -Ref: Ranges and Locales-Footnote-21039912 -Ref: Ranges and Locales-Footnote-31040146 -Node: Contributors1040367 -Node: Installation1045805 -Node: Gawk Distribution1046699 -Node: Getting1047183 -Node: Extracting1048009 -Node: Distribution contents1049651 -Node: Unix Installation1055368 -Node: Quick Installation1055985 -Node: Additional Configuration Options1058427 -Node: Configuration Philosophy1060165 -Node: Non-Unix Installation1062516 -Node: PC Installation1062974 -Node: PC Binary Installation1064285 -Node: PC Compiling1066133 -Ref: PC Compiling-Footnote-11069132 -Node: PC Testing1069237 -Node: PC Using1070413 -Node: Cygwin1074571 -Node: MSYS1075380 -Node: VMS Installation1075894 -Node: VMS Compilation1076690 -Ref: VMS Compilation-Footnote-11077905 -Node: VMS Dynamic Extensions1077963 -Node: VMS Installation Details1079336 -Node: VMS Running1081582 -Node: VMS GNV1084416 -Node: VMS Old Gawk1085139 -Node: Bugs1085609 -Node: Other Versions1089613 -Node: Notes1095838 -Node: Compatibility Mode1096638 -Node: Additions1097420 -Node: Accessing The Source1098345 -Node: Adding Code1099781 -Node: New Ports1105959 -Node: Derived Files1110440 -Ref: Derived Files-Footnote-11115521 -Ref: Derived Files-Footnote-21115555 -Ref: Derived Files-Footnote-31116151 -Node: Future Extensions1116265 -Node: Implementation Limitations1116871 -Node: Extension Design1118119 -Node: Old Extension Problems1119273 -Ref: Old Extension Problems-Footnote-11120790 -Node: Extension New Mechanism Goals1120847 -Ref: Extension New Mechanism Goals-Footnote-11124208 -Node: Extension Other Design Decisions1124397 -Node: Extension Future Growth1126503 -Node: Old Extension Mechanism1127339 -Node: Basic Concepts1129079 -Node: Basic High Level1129760 -Ref: figure-general-flow1130032 -Ref: figure-process-flow1130631 -Ref: Basic High Level-Footnote-11133860 -Node: Basic Data Typing1134045 -Node: Glossary1137372 -Node: Copying1162524 -Node: GNU Free Documentation License1200080 -Node: Index1225216 +Ref: Auto-set-Footnote-1430710 +Ref: Auto-set-Footnote-2430915 +Node: ARGC and ARGV430971 +Node: Arrays434810 +Node: Array Basics436308 +Node: Array Intro437134 +Ref: figure-array-elements439107 +Node: Reference to Elements441514 +Node: Assigning Elements443787 +Node: Array Example444278 +Node: Scanning an Array446010 +Node: Controlling Scanning449025 +Ref: Controlling Scanning-Footnote-1454198 +Node: Delete454514 +Ref: Delete-Footnote-1457279 +Node: Numeric Array Subscripts457336 +Node: Uninitialized Subscripts459519 +Node: Multidimensional461144 +Node: Multiscanning464237 +Node: Arrays of Arrays465826 +Node: Functions470466 +Node: Built-in471285 +Node: Calling Built-in472363 +Node: Numeric Functions474351 +Ref: Numeric Functions-Footnote-1478185 +Ref: Numeric Functions-Footnote-2478542 +Ref: Numeric Functions-Footnote-3478590 +Node: String Functions478859 +Ref: String Functions-Footnote-1501870 +Ref: String Functions-Footnote-2501999 +Ref: String Functions-Footnote-3502247 +Node: Gory Details502334 +Ref: table-sub-escapes504003 +Ref: table-sub-posix-92505357 +Ref: table-sub-proposed506708 +Ref: table-posix-sub508062 +Ref: table-gensub-escapes509607 +Ref: Gory Details-Footnote-1510783 +Ref: Gory Details-Footnote-2510834 +Node: I/O Functions510985 +Ref: I/O Functions-Footnote-1518108 +Node: Time Functions518255 +Ref: Time Functions-Footnote-1528719 +Ref: Time Functions-Footnote-2528787 +Ref: Time Functions-Footnote-3528945 +Ref: Time Functions-Footnote-4529056 +Ref: Time Functions-Footnote-5529168 +Ref: Time Functions-Footnote-6529395 +Node: Bitwise Functions529661 +Ref: table-bitwise-ops530223 +Ref: Bitwise Functions-Footnote-1534468 +Node: Type Functions534652 +Node: I18N Functions535794 +Node: User-defined537439 +Node: Definition Syntax538243 +Ref: Definition Syntax-Footnote-1543168 +Node: Function Example543237 +Ref: Function Example-Footnote-1545881 +Node: Function Caveats545903 +Node: Calling A Function546421 +Node: Variable Scope547376 +Node: Pass By Value/Reference550364 +Node: Return Statement553872 +Node: Dynamic Typing556856 +Node: Indirect Calls557785 +Node: Library Functions567472 +Ref: Library Functions-Footnote-1570985 +Ref: Library Functions-Footnote-2571128 +Node: Library Names571299 +Ref: Library Names-Footnote-1574772 +Ref: Library Names-Footnote-2574992 +Node: General Functions575078 +Node: Strtonum Function576106 +Node: Assert Function579036 +Node: Round Function582362 +Node: Cliff Random Function583903 +Node: Ordinal Functions584919 +Ref: Ordinal Functions-Footnote-1587996 +Ref: Ordinal Functions-Footnote-2588248 +Node: Join Function588459 +Ref: Join Function-Footnote-1590230 +Node: Getlocaltime Function590430 +Node: Readfile Function594166 +Node: Data File Management596005 +Node: Filetrans Function596637 +Node: Rewind Function600692 +Node: File Checking602079 +Ref: File Checking-Footnote-1603211 +Node: Empty Files603412 +Node: Ignoring Assigns605635 +Node: Getopt Function607166 +Ref: Getopt Function-Footnote-1618462 +Node: Passwd Functions618665 +Ref: Passwd Functions-Footnote-1627644 +Node: Group Functions627732 +Ref: Group Functions-Footnote-1635674 +Node: Walking Arrays635887 +Node: Sample Programs638023 +Node: Running Examples638697 +Node: Clones639425 +Node: Cut Program640649 +Node: Egrep Program650510 +Ref: Egrep Program-Footnote-1658439 +Node: Id Program658549 +Node: Split Program662213 +Ref: Split Program-Footnote-1665744 +Node: Tee Program665872 +Node: Uniq Program668679 +Node: Wc Program676109 +Ref: Wc Program-Footnote-1680377 +Ref: Wc Program-Footnote-2680577 +Node: Miscellaneous Programs680669 +Node: Dupword Program681857 +Node: Alarm Program683888 +Node: Translate Program688702 +Ref: Translate Program-Footnote-1693093 +Ref: Translate Program-Footnote-2693363 +Node: Labels Program693497 +Ref: Labels Program-Footnote-1696868 +Node: Word Sorting696952 +Node: History Sorting700995 +Node: Extract Program702831 +Ref: Extract Program-Footnote-1710406 +Node: Simple Sed710535 +Node: Igawk Program713597 +Ref: Igawk Program-Footnote-1728773 +Ref: Igawk Program-Footnote-2728974 +Node: Anagram Program729112 +Node: Signature Program732180 +Node: Advanced Features733427 +Node: Nondecimal Data735313 +Node: Array Sorting736890 +Node: Controlling Array Traversal737587 +Node: Array Sorting Functions745867 +Ref: Array Sorting Functions-Footnote-1749774 +Node: Two-way I/O749968 +Ref: Two-way I/O-Footnote-1755484 +Node: TCP/IP Networking755566 +Node: Profiling758410 +Node: Internationalization765918 +Node: I18N and L10N767343 +Node: Explaining gettext768029 +Ref: Explaining gettext-Footnote-1773169 +Ref: Explaining gettext-Footnote-2773353 +Node: Programmer i18n773518 +Node: Translator i18n777743 +Node: String Extraction778537 +Ref: String Extraction-Footnote-1779498 +Node: Printf Ordering779584 +Ref: Printf Ordering-Footnote-1782366 +Node: I18N Portability782430 +Ref: I18N Portability-Footnote-1784879 +Node: I18N Example784942 +Ref: I18N Example-Footnote-1787664 +Node: Gawk I18N787736 +Node: Debugger788349 +Node: Debugging789320 +Node: Debugging Concepts789761 +Node: Debugging Terms791617 +Node: Awk Debugging794214 +Node: Sample Debugging Session795106 +Node: Debugger Invocation795626 +Node: Finding The Bug796959 +Node: List of Debugger Commands803441 +Node: Breakpoint Control804773 +Node: Debugger Execution Control808437 +Node: Viewing And Changing Data811797 +Node: Execution Stack815155 +Node: Debugger Info816668 +Node: Miscellaneous Debugger Commands820662 +Node: Readline Support825846 +Node: Limitations826738 +Node: Arbitrary Precision Arithmetic828986 +Ref: Arbitrary Precision Arithmetic-Footnote-1830635 +Node: General Arithmetic830783 +Node: Floating Point Issues832503 +Node: String Conversion Precision833384 +Ref: String Conversion Precision-Footnote-1835089 +Node: Unexpected Results835198 +Node: POSIX Floating Point Problems837351 +Ref: POSIX Floating Point Problems-Footnote-1841172 +Node: Integer Programming841210 +Node: Floating-point Programming843021 +Ref: Floating-point Programming-Footnote-1849349 +Ref: Floating-point Programming-Footnote-2849619 +Node: Floating-point Representation849883 +Node: Floating-point Context851048 +Ref: table-ieee-formats851887 +Node: Rounding Mode853271 +Ref: table-rounding-modes853750 +Ref: Rounding Mode-Footnote-1856765 +Node: Gawk and MPFR856944 +Node: Arbitrary Precision Floats858353 +Ref: Arbitrary Precision Floats-Footnote-1860796 +Node: Setting Precision861117 +Ref: table-predefined-precision-strings861801 +Node: Setting Rounding Mode863946 +Ref: table-gawk-rounding-modes864350 +Node: Floating-point Constants865537 +Node: Changing Precision866989 +Ref: Changing Precision-Footnote-1868381 +Node: Exact Arithmetic868555 +Node: Arbitrary Precision Integers871689 +Ref: Arbitrary Precision Integers-Footnote-1874704 +Node: Dynamic Extensions874851 +Node: Extension Intro876309 +Node: Plugin License877574 +Node: Extension Mechanism Outline878259 +Ref: figure-load-extension878683 +Ref: figure-load-new-function880168 +Ref: figure-call-new-function881170 +Node: Extension API Description883154 +Node: Extension API Functions Introduction884604 +Node: General Data Types889470 +Ref: General Data Types-Footnote-1895163 +Node: Requesting Values895462 +Ref: table-value-types-returned896199 +Node: Memory Allocation Functions897157 +Ref: Memory Allocation Functions-Footnote-1899904 +Node: Constructor Functions900000 +Node: Registration Functions901758 +Node: Extension Functions902443 +Node: Exit Callback Functions904745 +Node: Extension Version String905995 +Node: Input Parsers906645 +Node: Output Wrappers916448 +Node: Two-way processors920964 +Node: Printing Messages923168 +Ref: Printing Messages-Footnote-1924245 +Node: Updating `ERRNO'924397 +Node: Accessing Parameters925136 +Node: Symbol Table Access926366 +Node: Symbol table by name926880 +Node: Symbol table by cookie928856 +Ref: Symbol table by cookie-Footnote-1932989 +Node: Cached values933052 +Ref: Cached values-Footnote-1936557 +Node: Array Manipulation936648 +Ref: Array Manipulation-Footnote-1937746 +Node: Array Data Types937785 +Ref: Array Data Types-Footnote-1940488 +Node: Array Functions940580 +Node: Flattening Arrays944454 +Node: Creating Arrays951306 +Node: Extension API Variables956037 +Node: Extension Versioning956673 +Node: Extension API Informational Variables958574 +Node: Extension API Boilerplate959660 +Node: Finding Extensions963464 +Node: Extension Example964024 +Node: Internal File Description964754 +Node: Internal File Ops968845 +Ref: Internal File Ops-Footnote-1980391 +Node: Using Internal File Ops980531 +Ref: Using Internal File Ops-Footnote-1982878 +Node: Extension Samples983146 +Node: Extension Sample File Functions984670 +Node: Extension Sample Fnmatch992238 +Node: Extension Sample Fork993705 +Node: Extension Sample Inplace994918 +Node: Extension Sample Ord996684 +Node: Extension Sample Readdir997520 +Ref: table-readdir-file-types998369 +Node: Extension Sample Revout999168 +Node: Extension Sample Rev2way999759 +Node: Extension Sample Read write array1000500 +Node: Extension Sample Readfile1002379 +Node: Extension Sample API Tests1003479 +Node: Extension Sample Time1004004 +Node: gawkextlib1005319 +Node: Language History1008106 +Node: V7/SVR3.11009700 +Node: SVR41012020 +Node: POSIX1013462 +Node: BTL1014848 +Node: POSIX/GNU1015582 +Node: Feature History1021181 +Node: Common Extensions1034293 +Node: Ranges and Locales1035605 +Ref: Ranges and Locales-Footnote-11040222 +Ref: Ranges and Locales-Footnote-21040249 +Ref: Ranges and Locales-Footnote-31040483 +Node: Contributors1040704 +Node: Installation1046142 +Node: Gawk Distribution1047036 +Node: Getting1047520 +Node: Extracting1048346 +Node: Distribution contents1049988 +Node: Unix Installation1055705 +Node: Quick Installation1056322 +Node: Additional Configuration Options1058764 +Node: Configuration Philosophy1060502 +Node: Non-Unix Installation1062853 +Node: PC Installation1063311 +Node: PC Binary Installation1064622 +Node: PC Compiling1066470 +Ref: PC Compiling-Footnote-11069469 +Node: PC Testing1069574 +Node: PC Using1070750 +Node: Cygwin1074908 +Node: MSYS1075717 +Node: VMS Installation1076231 +Node: VMS Compilation1077027 +Ref: VMS Compilation-Footnote-11078242 +Node: VMS Dynamic Extensions1078300 +Node: VMS Installation Details1079673 +Node: VMS Running1081919 +Node: VMS GNV1084753 +Node: VMS Old Gawk1085476 +Node: Bugs1085946 +Node: Other Versions1089950 +Node: Notes1096175 +Node: Compatibility Mode1096975 +Node: Additions1097757 +Node: Accessing The Source1098682 +Node: Adding Code1100118 +Node: New Ports1106296 +Node: Derived Files1110777 +Ref: Derived Files-Footnote-11115858 +Ref: Derived Files-Footnote-21115892 +Ref: Derived Files-Footnote-31116488 +Node: Future Extensions1116602 +Node: Implementation Limitations1117208 +Node: Extension Design1118456 +Node: Old Extension Problems1119610 +Ref: Old Extension Problems-Footnote-11121127 +Node: Extension New Mechanism Goals1121184 +Ref: Extension New Mechanism Goals-Footnote-11124545 +Node: Extension Other Design Decisions1124734 +Node: Extension Future Growth1126840 +Node: Old Extension Mechanism1127676 +Node: Basic Concepts1129416 +Node: Basic High Level1130097 +Ref: figure-general-flow1130369 +Ref: figure-process-flow1130968 +Ref: Basic High Level-Footnote-11134197 +Node: Basic Data Typing1134382 +Node: Glossary1137709 +Node: Copying1162861 +Node: GNU Free Documentation License1200417 +Node: Index1225553 End Tag Table diff --git a/doc/gawk.texi b/doc/gawk.texi index 093c776b..aefd080d 100644 --- a/doc/gawk.texi +++ b/doc/gawk.texi @@ -14090,10 +14090,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 @@ -36974,9 +36982,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: @@ -37004,7 +37013,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 b80a6849..11583184 100644 --- a/doc/gawktexi.in +++ b/doc/gawktexi.in @@ -13470,10 +13470,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 @@ -36118,9 +36126,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: @@ -36148,7 +36157,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 ae144a27..5de042ea 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -206,6 +206,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 5675c1d6..4f5f8c27 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 a7e1f193..25d26148 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 |