diff options
| -rw-r--r-- | ChangeLog | 33 | ||||
| -rw-r--r-- | Makefile.in | 2 | ||||
| -rw-r--r-- | NEWS | 12 | ||||
| -rw-r--r-- | TODO | 207 | ||||
| -rw-r--r-- | awk.h | 1 | ||||
| -rw-r--r-- | builtin.c | 57 | ||||
| -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 | 775 | ||||
| -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, 985 insertions, 420 deletions
@@ -344,6 +344,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 @@ -361,6 +366,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. @@ -380,6 +390,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 @@ -461,6 +478,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. @@ -469,6 +492,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,207 @@ +Thu Oct 24 22:11:44 IDT 2013 +============================ + +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 +------------------------------------ + + 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,60 @@ 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 { + tmprand = 0.5 + ( (random()/RAND_DIVISOR + random()) + / 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.0h. +# 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.0h' -PACKAGE_STRING='GNU Awk 4.1.0h' +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.0h 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.0h:";; + 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.0h +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.0h, 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.0h' + 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.0h, 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.0h +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 95647bf5..9c39db76 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.0h, 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 b0a25850..d2763325 100644 --- a/doc/ChangeLog +++ b/doc/ChangeLog @@ -131,7 +131,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> @@ -205,6 +205,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 f63c62ce..d11fdac9 100644 --- a/doc/gawk.info +++ b/doc/gawk.info @@ -9730,9 +9730,18 @@ with a pound sign (`#'). 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. + 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 @@ -30885,9 +30894,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 93) +* dark corner, FILENAME variable <1>: Auto-set. (line 102) * dark corner, FILENAME variable: Getline Notes. (line 19) -* dark corner, FNR/NR variables: Auto-set. (line 314) +* dark corner, FNR/NR variables: Auto-set. (line 323) * dark corner, format-control characters: Control Letters. (line 18) * dark corner, FS as null string: Single Character Fields. (line 20) @@ -31071,12 +31080,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 82) * differences in awk and gawk, error messages: Special FD. (line 16) * differences in awk and gawk, FIELDWIDTHS variable: User-modified. (line 35) * differences in awk and gawk, FPAT variable: User-modified. (line 45) -* differences in awk and gawk, FUNCTAB variable: Auto-set. (line 119) +* differences in awk and gawk, FUNCTAB variable: Auto-set. (line 128) * differences in awk and gawk, function arguments (gawk): Calling Built-in. (line 16) * differences in awk and gawk, getline command: Getline. (line 19) @@ -31099,21 +31108,21 @@ Index (line 257) * differences in awk and gawk, print/printf statements: Format Modifiers. (line 13) -* differences in awk and gawk, PROCINFO array: Auto-set. (line 133) +* differences in awk and gawk, PROCINFO array: Auto-set. (line 142) * differences in awk and gawk, record separators: Records. (line 132) * differences in awk and gawk, regexp constants: Using Constant Regexps. (line 43) * differences in awk and gawk, regular expressions: Case-sensitivity. (line 26) * differences in awk and gawk, RS/RT variables: Records. (line 187) -* differences in awk and gawk, RT variable: Auto-set. (line 266) +* differences in awk and gawk, RT variable: Auto-set. (line 275) * differences in awk and gawk, single-character fields: Single Character Fields. (line 6) * differences in awk and gawk, split() function: String Functions. (line 347) * differences in awk and gawk, strings: Scalar Constants. (line 20) * differences in awk and gawk, strings, storing: Records. (line 206) -* differences in awk and gawk, SYMTAB variable: Auto-set. (line 274) +* differences in awk and gawk, SYMTAB variable: Auto-set. (line 283) * differences in awk and gawk, TEXTDOMAIN variable: User-modified. (line 162) * differences in awk and gawk, trunc-mod operation: Arithmetic Ops. @@ -31154,8 +31163,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 138) -* effective user ID of gawk user: Auto-set. (line 142) +* effective group ID of gawk user: Auto-set. (line 147) +* effective user ID of gawk user: Auto-set. (line 151) * egrep utility <1>: Egrep Program. (line 6) * egrep utility: Bracket Expressions. (line 24) * egrep.awk program: Egrep Program. (line 54) @@ -31210,13 +31219,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 82) * ERRNO variable, with BEGINFILE pattern: BEGINFILE/ENDFILE. (line 26) * ERRNO variable, with close() function: Close Files And Pipes. (line 138) * 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 82) * error output: Special FD. (line 6) * escape processing, gsub()/gensub()/sub() functions: Gory Details. (line 6) @@ -31270,7 +31279,7 @@ Index (line 6) * extension API version: Extension Versioning. (line 6) -* extension API, version number: Auto-set. (line 229) +* extension API, version number: Auto-set. (line 238) * extension example: Extension Example. (line 6) * extension registration: Registration Functions. (line 6) @@ -31350,7 +31359,7 @@ Index * file names, distinguishing: Auto-set. (line 52) * 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 93) +* FILENAME variable <1>: Auto-set. (line 102) * FILENAME variable: Reading Files. (line 6) * FILENAME variable, getline, setting with: Getline Notes. (line 19) * filenames, assignments as: Ignoring Assigns. (line 6) @@ -31420,9 +31429,9 @@ Index * flush buffered output: I/O Functions. (line 25) * fnmatch() extension function: Extension Sample Fnmatch. (line 12) -* FNR variable <1>: Auto-set. (line 103) +* FNR variable <1>: Auto-set. (line 112) * FNR variable: Records. (line 6) -* FNR variable, changing: Auto-set. (line 314) +* FNR variable, changing: Auto-set. (line 323) * for statement: For Statement. (line 6) * for statement, looping over arrays: Scanning an Array. (line 20) * fork() extension function: Extension Sample Fork. @@ -31472,7 +31481,7 @@ Index * FSF (Free Software Foundation): Manual History. (line 6) * fts() extension function: Extension Sample File Functions. (line 77) -* FUNCTAB array: Auto-set. (line 119) +* FUNCTAB array: Auto-set. (line 128) * function calls: Function Calls. (line 6) * function calls, indirect: Indirect Calls. (line 6) * function definition example: Function Example. (line 6) @@ -31522,7 +31531,7 @@ Index * G-d: Acknowledgments. (line 78) * Garfinkle, Scott: Contributors. (line 34) * gawk program, dynamic profiling: Profiling. (line 179) -* gawk version: Auto-set. (line 204) +* gawk version: Auto-set. (line 213) * gawk, ARGIND variable in: Other Arguments. (line 12) * gawk, awk and <1>: This Manual. (line 14) * gawk, awk and: Preface. (line 23) @@ -31543,7 +31552,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 82) * gawk, ERRNO variable in <3>: BEGINFILE/ENDFILE. (line 26) * gawk, ERRNO variable in <4>: Close Files And Pipes. (line 138) @@ -31560,7 +31569,7 @@ Index * gawk, FPAT variable in <1>: User-modified. (line 45) * gawk, FPAT variable in: Splitting By Content. (line 27) -* gawk, FUNCTAB array in: Auto-set. (line 119) +* gawk, FUNCTAB array in: Auto-set. (line 128) * 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. @@ -31591,7 +31600,7 @@ Index * gawk, OS/2 version of: PC Using. (line 10) * gawk, PROCINFO array in <1>: Two-way I/O. (line 116) * gawk, PROCINFO array in <2>: Time Functions. (line 47) -* gawk, PROCINFO array in: Auto-set. (line 133) +* gawk, PROCINFO array in: Auto-set. (line 142) * gawk, regexp constants and: Using Constant Regexps. (line 28) * gawk, regular expressions, case sensitivity: Case-sensitivity. @@ -31599,14 +31608,14 @@ Index * gawk, regular expressions, operators: GNU Regexp Operators. (line 6) * gawk, regular expressions, precedence: Regexp Operators. (line 161) -* gawk, RT variable in <1>: Auto-set. (line 266) +* gawk, RT variable in <1>: Auto-set. (line 275) * gawk, RT variable in <2>: Multiple Line. (line 129) * gawk, RT variable in: Records. (line 132) * 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 274) +* gawk, SYMTAB array in: Auto-set. (line 283) * gawk, TEXTDOMAIN variable in: User-modified. (line 162) * gawk, timestamps: Time Functions. (line 6) * gawk, uses for: Preface. (line 36) @@ -31693,7 +31702,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 177) +* group ID of gawk user: Auto-set. (line 186) * groups, information about: Group Functions. (line 6) * gsub <1>: String Functions. (line 135) * gsub: Using Constant Regexps. @@ -31988,7 +31997,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 218) +* maximum precision supported by MPFR library: Auto-set. (line 227) * McPhee, Patrick: Contributors. (line 100) * message object files: Explaining gettext. (line 41) * message object files, converting from portable object files: I18N Example. @@ -32000,7 +32009,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 221) +* minimum precision supported by MPFR library: Auto-set. (line 230) * mktime: Time Functions. (line 25) * modifiers, in format specifiers: Format Modifiers. (line 6) * monetary information, localization: Explaining gettext. (line 103) @@ -32053,7 +32062,7 @@ Index (line 47) * nexti debugger command: Debugger Execution Control. (line 49) -* NF variable <1>: Auto-set. (line 108) +* NF variable <1>: Auto-set. (line 117) * NF variable: Fields. (line 33) * NF variable, decrementing: Changing Fields. (line 107) * ni debugger command (alias for nexti): Debugger Execution Control. @@ -32062,9 +32071,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 128) +* NR variable <1>: Auto-set. (line 137) * NR variable: Records. (line 6) -* NR variable, changing: Auto-set. (line 314) +* NR variable, changing: Auto-set. (line 323) * null strings <1>: Basic Data Typing. (line 26) * null strings <2>: Truth Values. (line 6) * null strings <3>: Regexp Field Splitting. @@ -32179,7 +32188,7 @@ Index * p debugger command (alias for print): Viewing And Changing Data. (line 36) * P1003.1 POSIX standard: Glossary. (line 454) -* parent process ID of gawk process: Auto-set. (line 186) +* parent process ID of gawk process: Auto-set. (line 195) * parentheses (), in a profile: Profiling. (line 146) * parentheses (), regexp operator: Regexp Operators. (line 79) * password file: Passwd Functions. (line 16) @@ -32343,24 +32352,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 180) -* process ID of gawk process: Auto-set. (line 183) +* process group idIDof gawk process: Auto-set. (line 189) +* process ID of gawk process: Auto-set. (line 192) * 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 133) +* PROCINFO array: Auto-set. (line 142) * PROCINFO array, and communications via ptys: Two-way I/O. (line 116) * 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 239) +* PROCINFO array, uses: Auto-set. (line 248) * PROCINFO, values of sorted_in: Controlling Scanning. (line 24) * profiling awk programs: Profiling. (line 6) * profiling awk programs, dynamically: Profiling. (line 179) -* program identifiers: Auto-set. (line 151) +* program identifiers: Auto-set. (line 160) * program, definition of: Getting Started. (line 21) * programmers, attractiveness of: Two-way I/O. (line 6) * programming conventions, --non-decimal-data option: Nondecimal Data. @@ -32518,7 +32527,7 @@ Index * right shift: Bitwise Functions. (line 52) * right shift, bitwise: Bitwise Functions. (line 32) * Ritchie, Dennis: Basic Data Typing. (line 55) -* RLENGTH variable: Auto-set. (line 253) +* RLENGTH variable: Auto-set. (line 262) * RLENGTH variable, match() function and: String Functions. (line 221) * Robbins, Arnold <1>: Future Extensions. (line 6) * Robbins, Arnold <2>: Bugs. (line 32) @@ -32547,9 +32556,9 @@ Index * RS variable: Records. (line 20) * RS variable, multiline records and: Multiple Line. (line 17) * rshift: Bitwise Functions. (line 52) -* RSTART variable: Auto-set. (line 259) +* RSTART variable: Auto-set. (line 268) * RSTART variable, match() function and: String Functions. (line 221) -* RT variable <1>: Auto-set. (line 266) +* RT variable <1>: Auto-set. (line 275) * RT variable <2>: Multiple Line. (line 129) * RT variable: Records. (line 132) * Rubin, Paul <1>: Contributors. (line 15) @@ -32655,7 +32664,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 312) +* sidebar, Changing NR and FNR: Auto-set. (line 321) * sidebar, Controlling Output Buffering with system(): I/O Functions. (line 135) * sidebar, Escape Sequences for Metacharacters: Escape Sequences. @@ -32817,9 +32826,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 234) +* supplementary groups of gawk process: Auto-set. (line 243) * switch statement: Switch Statement. (line 6) -* SYMTAB array: Auto-set. (line 274) +* SYMTAB array: Auto-set. (line 283) * syntactic ambiguity: /= operator vs. /=.../ regexp constant: Assignment Ops. (line 147) * system: I/O Functions. (line 72) @@ -32998,10 +33007,10 @@ Index * variables, uninitialized, as array subscripts: Uninitialized Subscripts. (line 6) * variables, user-defined: Variables. (line 6) -* version of gawk: Auto-set. (line 204) -* version of gawk extension API: Auto-set. (line 229) -* version of GNU MP library: Auto-set. (line 215) -* version of GNU MPFR library: Auto-set. (line 211) +* version of gawk: Auto-set. (line 213) +* version of gawk extension API: Auto-set. (line 238) +* version of GNU MP library: Auto-set. (line 224) +* version of GNU MPFR library: Auto-set. (line 220) * vertical bar (|): Regexp Operators. (line 69) * vertical bar (|), | operator (I/O) <1>: Precedence. (line 65) * vertical bar (|), | operator (I/O): Getline/Pipe. (line 9) @@ -33277,341 +33286,341 @@ Node: Built-in Variables404874 Node: User-modified405969 Ref: User-modified-Footnote-1414327 Node: Auto-set414389 -Ref: Auto-set-Footnote-1427453 -Ref: Auto-set-Footnote-2427658 -Node: ARGC and ARGV427714 -Node: Arrays431568 -Node: Array Basics433073 -Node: Array Intro433899 -Node: Reference to Elements438216 -Node: Assigning Elements440486 -Node: Array Example440977 -Node: Scanning an Array442709 -Node: Controlling Scanning445023 -Ref: Controlling Scanning-Footnote-1450110 -Node: Delete450426 -Ref: Delete-Footnote-1453191 -Node: Numeric Array Subscripts453248 -Node: Uninitialized Subscripts455431 -Node: Multidimensional457058 -Node: Multiscanning460151 -Node: Arrays of Arrays461740 -Node: Functions466380 -Node: Built-in467199 -Node: Calling Built-in468277 -Node: Numeric Functions470265 -Ref: Numeric Functions-Footnote-1474097 -Ref: Numeric Functions-Footnote-2474454 -Ref: Numeric Functions-Footnote-3474502 -Node: String Functions474771 -Ref: String Functions-Footnote-1497729 -Ref: String Functions-Footnote-2497858 -Ref: String Functions-Footnote-3498106 -Node: Gory Details498193 -Ref: table-sub-escapes499872 -Ref: table-sub-posix-92501226 -Ref: table-sub-proposed502577 -Ref: table-posix-sub503931 -Ref: table-gensub-escapes505476 -Ref: Gory Details-Footnote-1506652 -Ref: Gory Details-Footnote-2506703 -Node: I/O Functions506854 -Ref: I/O Functions-Footnote-1513844 -Node: Time Functions513991 -Ref: Time Functions-Footnote-1524974 -Ref: Time Functions-Footnote-2525042 -Ref: Time Functions-Footnote-3525200 -Ref: Time Functions-Footnote-4525311 -Ref: Time Functions-Footnote-5525423 -Ref: Time Functions-Footnote-6525650 -Node: Bitwise Functions525916 -Ref: table-bitwise-ops526478 -Ref: Bitwise Functions-Footnote-1530699 -Node: Type Functions530883 -Node: I18N Functions532034 -Node: User-defined533661 -Node: Definition Syntax534465 -Ref: Definition Syntax-Footnote-1539379 -Node: Function Example539448 -Ref: Function Example-Footnote-1542097 -Node: Function Caveats542119 -Node: Calling A Function542637 -Node: Variable Scope543592 -Node: Pass By Value/Reference546555 -Node: Return Statement550063 -Node: Dynamic Typing553044 -Node: Indirect Calls553975 -Node: Library Functions563662 -Ref: Library Functions-Footnote-1567175 -Ref: Library Functions-Footnote-2567318 -Node: Library Names567489 -Ref: Library Names-Footnote-1570962 -Ref: Library Names-Footnote-2571182 -Node: General Functions571268 -Node: Strtonum Function572296 -Node: Assert Function575226 -Node: Round Function578552 -Node: Cliff Random Function580093 -Node: Ordinal Functions581109 -Ref: Ordinal Functions-Footnote-1584186 -Ref: Ordinal Functions-Footnote-2584438 -Node: Join Function584649 -Ref: Join Function-Footnote-1586420 -Node: Getlocaltime Function586620 -Node: Readfile Function590361 -Node: Data File Management592200 -Node: Filetrans Function592832 -Node: Rewind Function596901 -Node: File Checking598288 -Node: Empty Files599382 -Node: Ignoring Assigns601612 -Node: Getopt Function603166 -Ref: Getopt Function-Footnote-1614469 -Node: Passwd Functions614672 -Ref: Passwd Functions-Footnote-1623650 -Node: Group Functions623738 -Node: Walking Arrays631822 -Node: Sample Programs633958 -Node: Running Examples634632 -Node: Clones635360 -Node: Cut Program636584 -Node: Egrep Program646435 -Ref: Egrep Program-Footnote-1654208 -Node: Id Program654318 -Node: Split Program657967 -Ref: Split Program-Footnote-1661486 -Node: Tee Program661614 -Node: Uniq Program664417 -Node: Wc Program671846 -Ref: Wc Program-Footnote-1676112 -Ref: Wc Program-Footnote-2676312 -Node: Miscellaneous Programs676404 -Node: Dupword Program677592 -Node: Alarm Program679623 -Node: Translate Program684430 -Ref: Translate Program-Footnote-1688817 -Ref: Translate Program-Footnote-2689065 -Node: Labels Program689199 -Ref: Labels Program-Footnote-1692570 -Node: Word Sorting692654 -Node: History Sorting696538 -Node: Extract Program698377 -Ref: Extract Program-Footnote-1705880 -Node: Simple Sed706008 -Node: Igawk Program709070 -Ref: Igawk Program-Footnote-1724227 -Ref: Igawk Program-Footnote-2724428 -Node: Anagram Program724566 -Node: Signature Program727634 -Node: Advanced Features728734 -Node: Nondecimal Data730620 -Node: Array Sorting732203 -Node: Controlling Array Traversal732900 -Node: Array Sorting Functions741184 -Ref: Array Sorting Functions-Footnote-1745053 -Node: Two-way I/O745247 -Ref: Two-way I/O-Footnote-1750679 -Node: TCP/IP Networking750761 -Node: Profiling753605 -Node: Internationalization761108 -Node: I18N and L10N762533 -Node: Explaining gettext763219 -Ref: Explaining gettext-Footnote-1768287 -Ref: Explaining gettext-Footnote-2768471 -Node: Programmer i18n768636 -Node: Translator i18n772838 -Node: String Extraction773632 -Ref: String Extraction-Footnote-1774593 -Node: Printf Ordering774679 -Ref: Printf Ordering-Footnote-1777461 -Node: I18N Portability777525 -Ref: I18N Portability-Footnote-1779974 -Node: I18N Example780037 -Ref: I18N Example-Footnote-1782675 -Node: Gawk I18N782747 -Node: Debugger783368 -Node: Debugging784339 -Node: Debugging Concepts784772 -Node: Debugging Terms786628 -Node: Awk Debugging789225 -Node: Sample Debugging Session790117 -Node: Debugger Invocation790637 -Node: Finding The Bug791970 -Node: List of Debugger Commands798457 -Node: Breakpoint Control799791 -Node: Debugger Execution Control803455 -Node: Viewing And Changing Data806815 -Node: Execution Stack810171 -Node: Debugger Info811638 -Node: Miscellaneous Debugger Commands815620 -Node: Readline Support820796 -Node: Limitations821627 -Node: Arbitrary Precision Arithmetic823879 -Ref: Arbitrary Precision Arithmetic-Footnote-1825528 -Node: General Arithmetic825676 -Node: Floating Point Issues827396 -Node: String Conversion Precision828277 -Ref: String Conversion Precision-Footnote-1829982 -Node: Unexpected Results830091 -Node: POSIX Floating Point Problems832244 -Ref: POSIX Floating Point Problems-Footnote-1836069 -Node: Integer Programming836107 -Node: Floating-point Programming837846 -Ref: Floating-point Programming-Footnote-1844177 -Ref: Floating-point Programming-Footnote-2844447 -Node: Floating-point Representation844711 -Node: Floating-point Context845876 -Ref: table-ieee-formats846715 -Node: Rounding Mode848099 -Ref: table-rounding-modes848578 -Ref: Rounding Mode-Footnote-1851593 -Node: Gawk and MPFR851772 -Node: Arbitrary Precision Floats853027 -Ref: Arbitrary Precision Floats-Footnote-1855470 -Node: Setting Precision855786 -Ref: table-predefined-precision-strings856472 -Node: Setting Rounding Mode858617 -Ref: table-gawk-rounding-modes859021 -Node: Floating-point Constants860208 -Node: Changing Precision861637 -Ref: Changing Precision-Footnote-1863034 -Node: Exact Arithmetic863208 -Node: Arbitrary Precision Integers866346 -Ref: Arbitrary Precision Integers-Footnote-1869361 -Node: Dynamic Extensions869508 -Node: Extension Intro870966 -Node: Plugin License872231 -Node: Extension Mechanism Outline872916 -Ref: load-extension873333 -Ref: load-new-function874811 -Ref: call-new-function875806 -Node: Extension API Description877821 -Node: Extension API Functions Introduction879108 -Node: General Data Types884035 -Ref: General Data Types-Footnote-1889730 -Node: Requesting Values890029 -Ref: table-value-types-returned890766 -Node: Memory Allocation Functions891720 -Ref: Memory Allocation Functions-Footnote-1894466 -Node: Constructor Functions894562 -Node: Registration Functions896320 -Node: Extension Functions897005 -Node: Exit Callback Functions899307 -Node: Extension Version String900556 -Node: Input Parsers901206 -Node: Output Wrappers910963 -Node: Two-way processors915473 -Node: Printing Messages917681 -Ref: Printing Messages-Footnote-1918758 -Node: Updating `ERRNO'918910 -Node: Accessing Parameters919649 -Node: Symbol Table Access920879 -Node: Symbol table by name921393 -Node: Symbol table by cookie923369 -Ref: Symbol table by cookie-Footnote-1927501 -Node: Cached values927564 -Ref: Cached values-Footnote-1931054 -Node: Array Manipulation931145 -Ref: Array Manipulation-Footnote-1932243 -Node: Array Data Types932282 -Ref: Array Data Types-Footnote-1934985 -Node: Array Functions935077 -Node: Flattening Arrays938913 -Node: Creating Arrays945765 -Node: Extension API Variables950490 -Node: Extension Versioning951126 -Node: Extension API Informational Variables953027 -Node: Extension API Boilerplate954113 -Node: Finding Extensions957917 -Node: Extension Example958477 -Node: Internal File Description959207 -Node: Internal File Ops963298 -Ref: Internal File Ops-Footnote-1974807 -Node: Using Internal File Ops974947 -Ref: Using Internal File Ops-Footnote-1977300 -Node: Extension Samples977566 -Node: Extension Sample File Functions979090 -Node: Extension Sample Fnmatch987575 -Node: Extension Sample Fork989344 -Node: Extension Sample Inplace990557 -Node: Extension Sample Ord992335 -Node: Extension Sample Readdir993171 -Node: Extension Sample Revout994703 -Node: Extension Sample Rev2way995296 -Node: Extension Sample Read write array995986 -Node: Extension Sample Readfile997869 -Node: Extension Sample API Tests998969 -Node: Extension Sample Time999494 -Node: gawkextlib1000858 -Node: Language History1003639 -Node: V7/SVR3.11005232 -Node: SVR41007552 -Node: POSIX1008994 -Node: BTL1010380 -Node: POSIX/GNU1011114 -Node: Feature History1016713 -Node: Common Extensions1029689 -Node: Ranges and Locales1031001 -Ref: Ranges and Locales-Footnote-11035618 -Ref: Ranges and Locales-Footnote-21035645 -Ref: Ranges and Locales-Footnote-31035879 -Node: Contributors1036100 -Node: Installation1041481 -Node: Gawk Distribution1042375 -Node: Getting1042859 -Node: Extracting1043685 -Node: Distribution contents1045377 -Node: Unix Installation1051082 -Node: Quick Installation1051699 -Node: Additional Configuration Options1054145 -Node: Configuration Philosophy1055881 -Node: Non-Unix Installation1058235 -Node: PC Installation1058693 -Node: PC Binary Installation1059992 -Node: PC Compiling1061840 -Node: PC Testing1064784 -Node: PC Using1065960 -Node: Cygwin1070128 -Node: MSYS1070937 -Node: VMS Installation1071451 -Node: VMS Compilation1072215 -Ref: VMS Compilation-Footnote-11073467 -Node: VMS Dynamic Extensions1073525 -Node: VMS Installation Details1074898 -Node: VMS Running1077149 -Node: VMS GNV1079983 -Node: VMS Old Gawk1080706 -Node: Bugs1081176 -Node: Other Versions1085094 -Node: Notes1091178 -Node: Compatibility Mode1091978 -Node: Additions1092761 -Node: Accessing The Source1093688 -Node: Adding Code1095128 -Node: New Ports1101173 -Node: Derived Files1105308 -Ref: Derived Files-Footnote-11110629 -Ref: Derived Files-Footnote-21110663 -Ref: Derived Files-Footnote-31111263 -Node: Future Extensions1111361 -Node: Implementation Limitations1111944 -Node: Extension Design1113196 -Node: Old Extension Problems1114350 -Ref: Old Extension Problems-Footnote-11115858 -Node: Extension New Mechanism Goals1115915 -Ref: Extension New Mechanism Goals-Footnote-11119280 -Node: Extension Other Design Decisions1119466 -Node: Extension Future Growth1121572 -Node: Old Extension Mechanism1122408 -Node: Basic Concepts1124148 -Node: Basic High Level1124829 -Ref: figure-general-flow1125101 -Ref: figure-process-flow1125700 -Ref: Basic High Level-Footnote-11128929 -Node: Basic Data Typing1129114 -Node: Glossary1132469 -Node: Copying1157700 -Node: GNU Free Documentation License1195256 -Node: Index1220392 +Ref: Auto-set-Footnote-1427845 +Ref: Auto-set-Footnote-2428050 +Node: ARGC and ARGV428106 +Node: Arrays431960 +Node: Array Basics433465 +Node: Array Intro434291 +Node: Reference to Elements438608 +Node: Assigning Elements440878 +Node: Array Example441369 +Node: Scanning an Array443101 +Node: Controlling Scanning445415 +Ref: Controlling Scanning-Footnote-1450502 +Node: Delete450818 +Ref: Delete-Footnote-1453583 +Node: Numeric Array Subscripts453640 +Node: Uninitialized Subscripts455823 +Node: Multidimensional457450 +Node: Multiscanning460543 +Node: Arrays of Arrays462132 +Node: Functions466772 +Node: Built-in467591 +Node: Calling Built-in468669 +Node: Numeric Functions470657 +Ref: Numeric Functions-Footnote-1474489 +Ref: Numeric Functions-Footnote-2474846 +Ref: Numeric Functions-Footnote-3474894 +Node: String Functions475163 +Ref: String Functions-Footnote-1498121 +Ref: String Functions-Footnote-2498250 +Ref: String Functions-Footnote-3498498 +Node: Gory Details498585 +Ref: table-sub-escapes500264 +Ref: table-sub-posix-92501618 +Ref: table-sub-proposed502969 +Ref: table-posix-sub504323 +Ref: table-gensub-escapes505868 +Ref: Gory Details-Footnote-1507044 +Ref: Gory Details-Footnote-2507095 +Node: I/O Functions507246 +Ref: I/O Functions-Footnote-1514236 +Node: Time Functions514383 +Ref: Time Functions-Footnote-1525366 +Ref: Time Functions-Footnote-2525434 +Ref: Time Functions-Footnote-3525592 +Ref: Time Functions-Footnote-4525703 +Ref: Time Functions-Footnote-5525815 +Ref: Time Functions-Footnote-6526042 +Node: Bitwise Functions526308 +Ref: table-bitwise-ops526870 +Ref: Bitwise Functions-Footnote-1531091 +Node: Type Functions531275 +Node: I18N Functions532426 +Node: User-defined534053 +Node: Definition Syntax534857 +Ref: Definition Syntax-Footnote-1539771 +Node: Function Example539840 +Ref: Function Example-Footnote-1542489 +Node: Function Caveats542511 +Node: Calling A Function543029 +Node: Variable Scope543984 +Node: Pass By Value/Reference546947 +Node: Return Statement550455 +Node: Dynamic Typing553436 +Node: Indirect Calls554367 +Node: Library Functions564054 +Ref: Library Functions-Footnote-1567567 +Ref: Library Functions-Footnote-2567710 +Node: Library Names567881 +Ref: Library Names-Footnote-1571354 +Ref: Library Names-Footnote-2571574 +Node: General Functions571660 +Node: Strtonum Function572688 +Node: Assert Function575618 +Node: Round Function578944 +Node: Cliff Random Function580485 +Node: Ordinal Functions581501 +Ref: Ordinal Functions-Footnote-1584578 +Ref: Ordinal Functions-Footnote-2584830 +Node: Join Function585041 +Ref: Join Function-Footnote-1586812 +Node: Getlocaltime Function587012 +Node: Readfile Function590753 +Node: Data File Management592592 +Node: Filetrans Function593224 +Node: Rewind Function597293 +Node: File Checking598680 +Node: Empty Files599774 +Node: Ignoring Assigns602004 +Node: Getopt Function603558 +Ref: Getopt Function-Footnote-1614861 +Node: Passwd Functions615064 +Ref: Passwd Functions-Footnote-1624042 +Node: Group Functions624130 +Node: Walking Arrays632214 +Node: Sample Programs634350 +Node: Running Examples635024 +Node: Clones635752 +Node: Cut Program636976 +Node: Egrep Program646827 +Ref: Egrep Program-Footnote-1654600 +Node: Id Program654710 +Node: Split Program658359 +Ref: Split Program-Footnote-1661878 +Node: Tee Program662006 +Node: Uniq Program664809 +Node: Wc Program672238 +Ref: Wc Program-Footnote-1676504 +Ref: Wc Program-Footnote-2676704 +Node: Miscellaneous Programs676796 +Node: Dupword Program677984 +Node: Alarm Program680015 +Node: Translate Program684822 +Ref: Translate Program-Footnote-1689209 +Ref: Translate Program-Footnote-2689457 +Node: Labels Program689591 +Ref: Labels Program-Footnote-1692962 +Node: Word Sorting693046 +Node: History Sorting696930 +Node: Extract Program698769 +Ref: Extract Program-Footnote-1706272 +Node: Simple Sed706400 +Node: Igawk Program709462 +Ref: Igawk Program-Footnote-1724619 +Ref: Igawk Program-Footnote-2724820 +Node: Anagram Program724958 +Node: Signature Program728026 +Node: Advanced Features729126 +Node: Nondecimal Data731012 +Node: Array Sorting732595 +Node: Controlling Array Traversal733292 +Node: Array Sorting Functions741576 +Ref: Array Sorting Functions-Footnote-1745445 +Node: Two-way I/O745639 +Ref: Two-way I/O-Footnote-1751071 +Node: TCP/IP Networking751153 +Node: Profiling753997 +Node: Internationalization761500 +Node: I18N and L10N762925 +Node: Explaining gettext763611 +Ref: Explaining gettext-Footnote-1768679 +Ref: Explaining gettext-Footnote-2768863 +Node: Programmer i18n769028 +Node: Translator i18n773230 +Node: String Extraction774024 +Ref: String Extraction-Footnote-1774985 +Node: Printf Ordering775071 +Ref: Printf Ordering-Footnote-1777853 +Node: I18N Portability777917 +Ref: I18N Portability-Footnote-1780366 +Node: I18N Example780429 +Ref: I18N Example-Footnote-1783067 +Node: Gawk I18N783139 +Node: Debugger783760 +Node: Debugging784731 +Node: Debugging Concepts785164 +Node: Debugging Terms787020 +Node: Awk Debugging789617 +Node: Sample Debugging Session790509 +Node: Debugger Invocation791029 +Node: Finding The Bug792362 +Node: List of Debugger Commands798849 +Node: Breakpoint Control800183 +Node: Debugger Execution Control803847 +Node: Viewing And Changing Data807207 +Node: Execution Stack810563 +Node: Debugger Info812030 +Node: Miscellaneous Debugger Commands816012 +Node: Readline Support821188 +Node: Limitations822019 +Node: Arbitrary Precision Arithmetic824271 +Ref: Arbitrary Precision Arithmetic-Footnote-1825920 +Node: General Arithmetic826068 +Node: Floating Point Issues827788 +Node: String Conversion Precision828669 +Ref: String Conversion Precision-Footnote-1830374 +Node: Unexpected Results830483 +Node: POSIX Floating Point Problems832636 +Ref: POSIX Floating Point Problems-Footnote-1836461 +Node: Integer Programming836499 +Node: Floating-point Programming838238 +Ref: Floating-point Programming-Footnote-1844569 +Ref: Floating-point Programming-Footnote-2844839 +Node: Floating-point Representation845103 +Node: Floating-point Context846268 +Ref: table-ieee-formats847107 +Node: Rounding Mode848491 +Ref: table-rounding-modes848970 +Ref: Rounding Mode-Footnote-1851985 +Node: Gawk and MPFR852164 +Node: Arbitrary Precision Floats853419 +Ref: Arbitrary Precision Floats-Footnote-1855862 +Node: Setting Precision856178 +Ref: table-predefined-precision-strings856864 +Node: Setting Rounding Mode859009 +Ref: table-gawk-rounding-modes859413 +Node: Floating-point Constants860600 +Node: Changing Precision862029 +Ref: Changing Precision-Footnote-1863426 +Node: Exact Arithmetic863600 +Node: Arbitrary Precision Integers866738 +Ref: Arbitrary Precision Integers-Footnote-1869753 +Node: Dynamic Extensions869900 +Node: Extension Intro871358 +Node: Plugin License872623 +Node: Extension Mechanism Outline873308 +Ref: load-extension873725 +Ref: load-new-function875203 +Ref: call-new-function876198 +Node: Extension API Description878213 +Node: Extension API Functions Introduction879500 +Node: General Data Types884427 +Ref: General Data Types-Footnote-1890122 +Node: Requesting Values890421 +Ref: table-value-types-returned891158 +Node: Memory Allocation Functions892112 +Ref: Memory Allocation Functions-Footnote-1894858 +Node: Constructor Functions894954 +Node: Registration Functions896712 +Node: Extension Functions897397 +Node: Exit Callback Functions899699 +Node: Extension Version String900948 +Node: Input Parsers901598 +Node: Output Wrappers911355 +Node: Two-way processors915865 +Node: Printing Messages918073 +Ref: Printing Messages-Footnote-1919150 +Node: Updating `ERRNO'919302 +Node: Accessing Parameters920041 +Node: Symbol Table Access921271 +Node: Symbol table by name921785 +Node: Symbol table by cookie923761 +Ref: Symbol table by cookie-Footnote-1927893 +Node: Cached values927956 +Ref: Cached values-Footnote-1931446 +Node: Array Manipulation931537 +Ref: Array Manipulation-Footnote-1932635 +Node: Array Data Types932674 +Ref: Array Data Types-Footnote-1935377 +Node: Array Functions935469 +Node: Flattening Arrays939305 +Node: Creating Arrays946157 +Node: Extension API Variables950882 +Node: Extension Versioning951518 +Node: Extension API Informational Variables953419 +Node: Extension API Boilerplate954505 +Node: Finding Extensions958309 +Node: Extension Example958869 +Node: Internal File Description959599 +Node: Internal File Ops963690 +Ref: Internal File Ops-Footnote-1975199 +Node: Using Internal File Ops975339 +Ref: Using Internal File Ops-Footnote-1977692 +Node: Extension Samples977958 +Node: Extension Sample File Functions979482 +Node: Extension Sample Fnmatch987967 +Node: Extension Sample Fork989736 +Node: Extension Sample Inplace990949 +Node: Extension Sample Ord992727 +Node: Extension Sample Readdir993563 +Node: Extension Sample Revout995095 +Node: Extension Sample Rev2way995688 +Node: Extension Sample Read write array996378 +Node: Extension Sample Readfile998261 +Node: Extension Sample API Tests999361 +Node: Extension Sample Time999886 +Node: gawkextlib1001250 +Node: Language History1004031 +Node: V7/SVR3.11005624 +Node: SVR41007944 +Node: POSIX1009386 +Node: BTL1010772 +Node: POSIX/GNU1011506 +Node: Feature History1017105 +Node: Common Extensions1030081 +Node: Ranges and Locales1031393 +Ref: Ranges and Locales-Footnote-11036010 +Ref: Ranges and Locales-Footnote-21036037 +Ref: Ranges and Locales-Footnote-31036271 +Node: Contributors1036492 +Node: Installation1041873 +Node: Gawk Distribution1042767 +Node: Getting1043251 +Node: Extracting1044077 +Node: Distribution contents1045769 +Node: Unix Installation1051474 +Node: Quick Installation1052091 +Node: Additional Configuration Options1054537 +Node: Configuration Philosophy1056273 +Node: Non-Unix Installation1058627 +Node: PC Installation1059085 +Node: PC Binary Installation1060384 +Node: PC Compiling1062232 +Node: PC Testing1065176 +Node: PC Using1066352 +Node: Cygwin1070520 +Node: MSYS1071329 +Node: VMS Installation1071843 +Node: VMS Compilation1072607 +Ref: VMS Compilation-Footnote-11073859 +Node: VMS Dynamic Extensions1073917 +Node: VMS Installation Details1075290 +Node: VMS Running1077541 +Node: VMS GNV1080375 +Node: VMS Old Gawk1081098 +Node: Bugs1081568 +Node: Other Versions1085486 +Node: Notes1091570 +Node: Compatibility Mode1092370 +Node: Additions1093153 +Node: Accessing The Source1094080 +Node: Adding Code1095520 +Node: New Ports1101565 +Node: Derived Files1105700 +Ref: Derived Files-Footnote-11111021 +Ref: Derived Files-Footnote-21111055 +Ref: Derived Files-Footnote-31111655 +Node: Future Extensions1111753 +Node: Implementation Limitations1112336 +Node: Extension Design1113588 +Node: Old Extension Problems1114742 +Ref: Old Extension Problems-Footnote-11116250 +Node: Extension New Mechanism Goals1116307 +Ref: Extension New Mechanism Goals-Footnote-11119672 +Node: Extension Other Design Decisions1119858 +Node: Extension Future Growth1121964 +Node: Old Extension Mechanism1122800 +Node: Basic Concepts1124540 +Node: Basic High Level1125221 +Ref: figure-general-flow1125493 +Ref: figure-process-flow1126092 +Ref: Basic High Level-Footnote-11129321 +Node: Basic Data Typing1129506 +Node: Glossary1132861 +Node: Copying1158092 +Node: GNU Free Documentation License1195648 +Node: Index1220784 End Tag Table diff --git a/doc/gawk.texi b/doc/gawk.texi index 48219eb8..47dee34c 100644 --- a/doc/gawk.texi +++ b/doc/gawk.texi @@ -13826,10 +13826,18 @@ it is 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, -@code{ENVIRON["HOME"]} might be @file{/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. -@c (In a future version of @command{gawk}, it may do so.) +@code{ENVIRON["HOME"]} might be @file{/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 @@ -36522,9 +36530,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: @@ -36550,7 +36559,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 81407770..446c13d5 100644 --- a/doc/gawktexi.in +++ b/doc/gawktexi.in @@ -13203,10 +13203,18 @@ it is 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, -@code{ENVIRON["HOME"]} might be @file{/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. -@c (In a future version of @command{gawk}, it may do so.) +@code{ENVIRON["HOME"]} might be @file{/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 @@ -35663,9 +35671,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: @@ -35691,7 +35700,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 0c7fec35..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.0h" +#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.0h" +#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.0h" +#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 68615c9a..1aafc32d 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -162,6 +162,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 d295f6f2..3958dda8 100644 --- a/test/Makefile.am +++ b/test/Makefile.am @@ -703,6 +703,8 @@ EXTRA_DIST = \ rand-mpfr.ok \ rand.awk \ rand.ok \ + randtest.sh \ + randtest.ok \ range1.awk \ range1.in \ range1.ok \ @@ -970,7 +972,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 \ @@ -1893,6 +1895,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 0c582a00..c02cafe8 100644 --- a/test/Makefile.in +++ b/test/Makefile.in @@ -949,6 +949,8 @@ EXTRA_DIST = \ rand-mpfr.ok \ rand.awk \ rand.ok \ + randtest.sh \ + randtest.ok \ range1.awk \ range1.in \ range1.ok \ @@ -1215,7 +1217,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 \ @@ -2317,6 +2319,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 |