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
@@ -335,6 +335,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 @@ -352,6 +357,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. @@ -371,6 +381,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 @@ -452,6 +469,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. @@ -460,6 +483,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 fe921ad8..4fed13ff 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.0g. +# 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.0g' -PACKAGE_STRING='GNU Awk 4.1.0g' +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.0g 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.0g:";; + 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.0g +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.0g, 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.0g' + 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.0g, 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.0g +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 85f0497b..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.0g, 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 c8781f4e..8d6166a8 100644 --- a/doc/ChangeLog +++ b/doc/ChangeLog @@ -118,7 +118,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> @@ -192,6 +192,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 6bff2719..4c1d5972 100644 --- a/doc/gawk.info +++ b/doc/gawk.info @@ -9732,9 +9732,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 @@ -30889,9 +30898,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) @@ -31074,12 +31083,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) @@ -31102,21 +31111,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. @@ -31157,8 +31166,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) @@ -31213,13 +31222,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) @@ -31273,7 +31282,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) @@ -31353,7 +31362,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) @@ -31423,9 +31432,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. @@ -31475,7 +31484,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) @@ -31525,7 +31534,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) @@ -31546,7 +31555,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) @@ -31563,7 +31572,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. @@ -31594,7 +31603,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. @@ -31602,14 +31611,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) @@ -31696,7 +31705,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. @@ -31991,7 +32000,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. @@ -32003,7 +32012,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) @@ -32056,7 +32065,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. @@ -32065,9 +32074,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. @@ -32182,7 +32191,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) @@ -32346,24 +32355,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 id of gawk process: Auto-set. (line 180) -* process id of gawk process: Auto-set. (line 183) +* process group id of 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. @@ -32521,7 +32530,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) @@ -32550,9 +32559,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) @@ -32658,7 +32667,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. @@ -32820,9 +32829,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) @@ -33001,10 +33010,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) @@ -33280,341 +33289,341 @@ Node: Built-in Variables405022 Node: User-modified406117 Ref: User-modified-Footnote-1414475 Node: Auto-set414537 -Ref: Auto-set-Footnote-1427601 -Ref: Auto-set-Footnote-2427806 -Node: ARGC and ARGV427862 -Node: Arrays431716 -Node: Array Basics433221 -Node: Array Intro434047 -Node: Reference to Elements438364 -Node: Assigning Elements440634 -Node: Array Example441125 -Node: Scanning an Array442857 -Node: Controlling Scanning445171 -Ref: Controlling Scanning-Footnote-1450258 -Node: Delete450574 -Ref: Delete-Footnote-1453339 -Node: Numeric Array Subscripts453396 -Node: Uninitialized Subscripts455579 -Node: Multidimensional457206 -Node: Multiscanning460299 -Node: Arrays of Arrays461888 -Node: Functions466528 -Node: Built-in467347 -Node: Calling Built-in468425 -Node: Numeric Functions470413 -Ref: Numeric Functions-Footnote-1474245 -Ref: Numeric Functions-Footnote-2474602 -Ref: Numeric Functions-Footnote-3474650 -Node: String Functions474919 -Ref: String Functions-Footnote-1497877 -Ref: String Functions-Footnote-2498006 -Ref: String Functions-Footnote-3498254 -Node: Gory Details498341 -Ref: table-sub-escapes500020 -Ref: table-sub-posix-92501374 -Ref: table-sub-proposed502725 -Ref: table-posix-sub504079 -Ref: table-gensub-escapes505624 -Ref: Gory Details-Footnote-1506800 -Ref: Gory Details-Footnote-2506851 -Node: I/O Functions507002 -Ref: I/O Functions-Footnote-1513992 -Node: Time Functions514139 -Ref: Time Functions-Footnote-1525122 -Ref: Time Functions-Footnote-2525190 -Ref: Time Functions-Footnote-3525348 -Ref: Time Functions-Footnote-4525459 -Ref: Time Functions-Footnote-5525571 -Ref: Time Functions-Footnote-6525798 -Node: Bitwise Functions526064 -Ref: table-bitwise-ops526626 -Ref: Bitwise Functions-Footnote-1530847 -Node: Type Functions531031 -Node: I18N Functions532182 -Node: User-defined533809 -Node: Definition Syntax534613 -Ref: Definition Syntax-Footnote-1539527 -Node: Function Example539596 -Ref: Function Example-Footnote-1542245 -Node: Function Caveats542267 -Node: Calling A Function542785 -Node: Variable Scope543740 -Node: Pass By Value/Reference546703 -Node: Return Statement550211 -Node: Dynamic Typing553192 -Node: Indirect Calls554123 -Node: Library Functions563810 -Ref: Library Functions-Footnote-1567323 -Ref: Library Functions-Footnote-2567466 -Node: Library Names567637 -Ref: Library Names-Footnote-1571110 -Ref: Library Names-Footnote-2571330 -Node: General Functions571416 -Node: Strtonum Function572444 -Node: Assert Function575374 -Node: Round Function578700 -Node: Cliff Random Function580241 -Node: Ordinal Functions581257 -Ref: Ordinal Functions-Footnote-1584334 -Ref: Ordinal Functions-Footnote-2584586 -Node: Join Function584797 -Ref: Join Function-Footnote-1586568 -Node: Getlocaltime Function586768 -Node: Readfile Function590509 -Node: Data File Management592348 -Node: Filetrans Function592980 -Node: Rewind Function597049 -Node: File Checking598436 -Node: Empty Files599530 -Node: Ignoring Assigns601760 -Node: Getopt Function603314 -Ref: Getopt Function-Footnote-1614617 -Node: Passwd Functions614820 -Ref: Passwd Functions-Footnote-1623798 -Node: Group Functions623886 -Node: Walking Arrays631970 -Node: Sample Programs634106 -Node: Running Examples634780 -Node: Clones635508 -Node: Cut Program636732 -Node: Egrep Program646583 -Ref: Egrep Program-Footnote-1654356 -Node: Id Program654466 -Node: Split Program658115 -Ref: Split Program-Footnote-1661634 -Node: Tee Program661762 -Node: Uniq Program664565 -Node: Wc Program671994 -Ref: Wc Program-Footnote-1676260 -Ref: Wc Program-Footnote-2676460 -Node: Miscellaneous Programs676552 -Node: Dupword Program677740 -Node: Alarm Program679771 -Node: Translate Program684578 -Ref: Translate Program-Footnote-1688965 -Ref: Translate Program-Footnote-2689213 -Node: Labels Program689347 -Ref: Labels Program-Footnote-1692718 -Node: Word Sorting692802 -Node: History Sorting696686 -Node: Extract Program698525 -Ref: Extract Program-Footnote-1706028 -Node: Simple Sed706156 -Node: Igawk Program709218 -Ref: Igawk Program-Footnote-1724375 -Ref: Igawk Program-Footnote-2724576 -Node: Anagram Program724714 -Node: Signature Program727782 -Node: Advanced Features728882 -Node: Nondecimal Data730768 -Node: Array Sorting732351 -Node: Controlling Array Traversal733048 -Node: Array Sorting Functions741332 -Ref: Array Sorting Functions-Footnote-1745201 -Node: Two-way I/O745395 -Ref: Two-way I/O-Footnote-1750827 -Node: TCP/IP Networking750909 -Node: Profiling753753 -Node: Internationalization761256 -Node: I18N and L10N762681 -Node: Explaining gettext763367 -Ref: Explaining gettext-Footnote-1768435 -Ref: Explaining gettext-Footnote-2768619 -Node: Programmer i18n768784 -Node: Translator i18n772986 -Node: String Extraction773780 -Ref: String Extraction-Footnote-1774741 -Node: Printf Ordering774827 -Ref: Printf Ordering-Footnote-1777609 -Node: I18N Portability777673 -Ref: I18N Portability-Footnote-1780122 -Node: I18N Example780185 -Ref: I18N Example-Footnote-1782823 -Node: Gawk I18N782895 -Node: Debugger783516 -Node: Debugging784487 -Node: Debugging Concepts784920 -Node: Debugging Terms786776 -Node: Awk Debugging789373 -Node: Sample Debugging Session790265 -Node: Debugger Invocation790785 -Node: Finding The Bug792118 -Node: List of Debugger Commands798605 -Node: Breakpoint Control799939 -Node: Debugger Execution Control803603 -Node: Viewing And Changing Data806963 -Node: Execution Stack810319 -Node: Debugger Info811786 -Node: Miscellaneous Debugger Commands815768 -Node: Readline Support820944 -Node: Limitations821775 -Node: Arbitrary Precision Arithmetic824027 -Ref: Arbitrary Precision Arithmetic-Footnote-1825676 -Node: General Arithmetic825824 -Node: Floating Point Issues827544 -Node: String Conversion Precision828425 -Ref: String Conversion Precision-Footnote-1830130 -Node: Unexpected Results830239 -Node: POSIX Floating Point Problems832392 -Ref: POSIX Floating Point Problems-Footnote-1836217 -Node: Integer Programming836255 -Node: Floating-point Programming837994 -Ref: Floating-point Programming-Footnote-1844325 -Ref: Floating-point Programming-Footnote-2844595 -Node: Floating-point Representation844859 -Node: Floating-point Context846024 -Ref: table-ieee-formats846863 -Node: Rounding Mode848247 -Ref: table-rounding-modes848726 -Ref: Rounding Mode-Footnote-1851741 -Node: Gawk and MPFR851920 -Node: Arbitrary Precision Floats853175 -Ref: Arbitrary Precision Floats-Footnote-1855618 -Node: Setting Precision855934 -Ref: table-predefined-precision-strings856620 -Node: Setting Rounding Mode858765 -Ref: table-gawk-rounding-modes859169 -Node: Floating-point Constants860356 -Node: Changing Precision861785 -Ref: Changing Precision-Footnote-1863182 -Node: Exact Arithmetic863356 -Node: Arbitrary Precision Integers866494 -Ref: Arbitrary Precision Integers-Footnote-1869509 -Node: Dynamic Extensions869656 -Node: Extension Intro871114 -Node: Plugin License872379 -Node: Extension Mechanism Outline873064 -Ref: load-extension873481 -Ref: load-new-function874959 -Ref: call-new-function875954 -Node: Extension API Description877969 -Node: Extension API Functions Introduction879256 -Node: General Data Types884183 -Ref: General Data Types-Footnote-1889878 -Node: Requesting Values890177 -Ref: table-value-types-returned890914 -Node: Memory Allocation Functions891868 -Ref: Memory Allocation Functions-Footnote-1894614 -Node: Constructor Functions894710 -Node: Registration Functions896468 -Node: Extension Functions897153 -Node: Exit Callback Functions899455 -Node: Extension Version String900704 -Node: Input Parsers901354 -Node: Output Wrappers911111 -Node: Two-way processors915621 -Node: Printing Messages917829 -Ref: Printing Messages-Footnote-1918906 -Node: Updating `ERRNO'919058 -Node: Accessing Parameters919797 -Node: Symbol Table Access921027 -Node: Symbol table by name921541 -Node: Symbol table by cookie923517 -Ref: Symbol table by cookie-Footnote-1927649 -Node: Cached values927712 -Ref: Cached values-Footnote-1931202 -Node: Array Manipulation931293 -Ref: Array Manipulation-Footnote-1932391 -Node: Array Data Types932430 -Ref: Array Data Types-Footnote-1935133 -Node: Array Functions935225 -Node: Flattening Arrays939061 -Node: Creating Arrays945913 -Node: Extension API Variables950638 -Node: Extension Versioning951274 -Node: Extension API Informational Variables953175 -Node: Extension API Boilerplate954261 -Node: Finding Extensions958065 -Node: Extension Example958625 -Node: Internal File Description959355 -Node: Internal File Ops963446 -Ref: Internal File Ops-Footnote-1974955 -Node: Using Internal File Ops975095 -Ref: Using Internal File Ops-Footnote-1977448 -Node: Extension Samples977714 -Node: Extension Sample File Functions979238 -Node: Extension Sample Fnmatch987723 -Node: Extension Sample Fork989492 -Node: Extension Sample Inplace990705 -Node: Extension Sample Ord992483 -Node: Extension Sample Readdir993319 -Node: Extension Sample Revout994851 -Node: Extension Sample Rev2way995444 -Node: Extension Sample Read write array996134 -Node: Extension Sample Readfile998017 -Node: Extension Sample API Tests999117 -Node: Extension Sample Time999642 -Node: gawkextlib1001006 -Node: Language History1003787 -Node: V7/SVR3.11005380 -Node: SVR41007700 -Node: POSIX1009142 -Node: BTL1010528 -Node: POSIX/GNU1011262 -Node: Feature History1016861 -Node: Common Extensions1029837 -Node: Ranges and Locales1031149 -Ref: Ranges and Locales-Footnote-11035766 -Ref: Ranges and Locales-Footnote-21035793 -Ref: Ranges and Locales-Footnote-31036027 -Node: Contributors1036248 -Node: Installation1041629 -Node: Gawk Distribution1042523 -Node: Getting1043007 -Node: Extracting1043833 -Node: Distribution contents1045525 -Node: Unix Installation1051230 -Node: Quick Installation1051847 -Node: Additional Configuration Options1054293 -Node: Configuration Philosophy1056029 -Node: Non-Unix Installation1058383 -Node: PC Installation1058841 -Node: PC Binary Installation1060140 -Node: PC Compiling1061988 -Node: PC Testing1064932 -Node: PC Using1066108 -Node: Cygwin1070276 -Node: MSYS1071085 -Node: VMS Installation1071599 -Node: VMS Compilation1072363 -Ref: VMS Compilation-Footnote-11073615 -Node: VMS Dynamic Extensions1073673 -Node: VMS Installation Details1075046 -Node: VMS Running1077297 -Node: VMS GNV1080131 -Node: VMS Old Gawk1080854 -Node: Bugs1081324 -Node: Other Versions1085242 -Node: Notes1091326 -Node: Compatibility Mode1092126 -Node: Additions1092909 -Node: Accessing The Source1093836 -Node: Adding Code1095276 -Node: New Ports1101321 -Node: Derived Files1105456 -Ref: Derived Files-Footnote-11110777 -Ref: Derived Files-Footnote-21110811 -Ref: Derived Files-Footnote-31111411 -Node: Future Extensions1111509 -Node: Implementation Limitations1112092 -Node: Extension Design1113344 -Node: Old Extension Problems1114498 -Ref: Old Extension Problems-Footnote-11116006 -Node: Extension New Mechanism Goals1116063 -Ref: Extension New Mechanism Goals-Footnote-11119428 -Node: Extension Other Design Decisions1119614 -Node: Extension Future Growth1121720 -Node: Old Extension Mechanism1122556 -Node: Basic Concepts1124296 -Node: Basic High Level1124977 -Ref: figure-general-flow1125248 -Ref: figure-process-flow1125847 -Ref: Basic High Level-Footnote-11129076 -Node: Basic Data Typing1129261 -Node: Glossary1132616 -Node: Copying1157845 -Node: GNU Free Documentation License1195402 -Node: Index1220539 +Ref: Auto-set-Footnote-1427993 +Ref: Auto-set-Footnote-2428198 +Node: ARGC and ARGV428254 +Node: Arrays432108 +Node: Array Basics433613 +Node: Array Intro434439 +Node: Reference to Elements438756 +Node: Assigning Elements441026 +Node: Array Example441517 +Node: Scanning an Array443249 +Node: Controlling Scanning445563 +Ref: Controlling Scanning-Footnote-1450650 +Node: Delete450966 +Ref: Delete-Footnote-1453731 +Node: Numeric Array Subscripts453788 +Node: Uninitialized Subscripts455971 +Node: Multidimensional457598 +Node: Multiscanning460691 +Node: Arrays of Arrays462280 +Node: Functions466920 +Node: Built-in467739 +Node: Calling Built-in468817 +Node: Numeric Functions470805 +Ref: Numeric Functions-Footnote-1474637 +Ref: Numeric Functions-Footnote-2474994 +Ref: Numeric Functions-Footnote-3475042 +Node: String Functions475311 +Ref: String Functions-Footnote-1498269 +Ref: String Functions-Footnote-2498398 +Ref: String Functions-Footnote-3498646 +Node: Gory Details498733 +Ref: table-sub-escapes500412 +Ref: table-sub-posix-92501766 +Ref: table-sub-proposed503117 +Ref: table-posix-sub504471 +Ref: table-gensub-escapes506016 +Ref: Gory Details-Footnote-1507192 +Ref: Gory Details-Footnote-2507243 +Node: I/O Functions507394 +Ref: I/O Functions-Footnote-1514384 +Node: Time Functions514531 +Ref: Time Functions-Footnote-1525514 +Ref: Time Functions-Footnote-2525582 +Ref: Time Functions-Footnote-3525740 +Ref: Time Functions-Footnote-4525851 +Ref: Time Functions-Footnote-5525963 +Ref: Time Functions-Footnote-6526190 +Node: Bitwise Functions526456 +Ref: table-bitwise-ops527018 +Ref: Bitwise Functions-Footnote-1531239 +Node: Type Functions531423 +Node: I18N Functions532574 +Node: User-defined534201 +Node: Definition Syntax535005 +Ref: Definition Syntax-Footnote-1539919 +Node: Function Example539988 +Ref: Function Example-Footnote-1542637 +Node: Function Caveats542659 +Node: Calling A Function543177 +Node: Variable Scope544132 +Node: Pass By Value/Reference547095 +Node: Return Statement550603 +Node: Dynamic Typing553584 +Node: Indirect Calls554515 +Node: Library Functions564202 +Ref: Library Functions-Footnote-1567715 +Ref: Library Functions-Footnote-2567858 +Node: Library Names568029 +Ref: Library Names-Footnote-1571502 +Ref: Library Names-Footnote-2571722 +Node: General Functions571808 +Node: Strtonum Function572836 +Node: Assert Function575766 +Node: Round Function579092 +Node: Cliff Random Function580633 +Node: Ordinal Functions581649 +Ref: Ordinal Functions-Footnote-1584726 +Ref: Ordinal Functions-Footnote-2584978 +Node: Join Function585189 +Ref: Join Function-Footnote-1586960 +Node: Getlocaltime Function587160 +Node: Readfile Function590901 +Node: Data File Management592740 +Node: Filetrans Function593372 +Node: Rewind Function597441 +Node: File Checking598828 +Node: Empty Files599922 +Node: Ignoring Assigns602152 +Node: Getopt Function603706 +Ref: Getopt Function-Footnote-1615009 +Node: Passwd Functions615212 +Ref: Passwd Functions-Footnote-1624190 +Node: Group Functions624278 +Node: Walking Arrays632362 +Node: Sample Programs634498 +Node: Running Examples635172 +Node: Clones635900 +Node: Cut Program637124 +Node: Egrep Program646975 +Ref: Egrep Program-Footnote-1654748 +Node: Id Program654858 +Node: Split Program658507 +Ref: Split Program-Footnote-1662026 +Node: Tee Program662154 +Node: Uniq Program664957 +Node: Wc Program672386 +Ref: Wc Program-Footnote-1676652 +Ref: Wc Program-Footnote-2676852 +Node: Miscellaneous Programs676944 +Node: Dupword Program678132 +Node: Alarm Program680163 +Node: Translate Program684970 +Ref: Translate Program-Footnote-1689357 +Ref: Translate Program-Footnote-2689605 +Node: Labels Program689739 +Ref: Labels Program-Footnote-1693110 +Node: Word Sorting693194 +Node: History Sorting697078 +Node: Extract Program698917 +Ref: Extract Program-Footnote-1706420 +Node: Simple Sed706548 +Node: Igawk Program709610 +Ref: Igawk Program-Footnote-1724767 +Ref: Igawk Program-Footnote-2724968 +Node: Anagram Program725106 +Node: Signature Program728174 +Node: Advanced Features729274 +Node: Nondecimal Data731160 +Node: Array Sorting732743 +Node: Controlling Array Traversal733440 +Node: Array Sorting Functions741724 +Ref: Array Sorting Functions-Footnote-1745593 +Node: Two-way I/O745787 +Ref: Two-way I/O-Footnote-1751219 +Node: TCP/IP Networking751301 +Node: Profiling754145 +Node: Internationalization761648 +Node: I18N and L10N763073 +Node: Explaining gettext763759 +Ref: Explaining gettext-Footnote-1768827 +Ref: Explaining gettext-Footnote-2769011 +Node: Programmer i18n769176 +Node: Translator i18n773378 +Node: String Extraction774172 +Ref: String Extraction-Footnote-1775133 +Node: Printf Ordering775219 +Ref: Printf Ordering-Footnote-1778001 +Node: I18N Portability778065 +Ref: I18N Portability-Footnote-1780514 +Node: I18N Example780577 +Ref: I18N Example-Footnote-1783215 +Node: Gawk I18N783287 +Node: Debugger783908 +Node: Debugging784879 +Node: Debugging Concepts785312 +Node: Debugging Terms787168 +Node: Awk Debugging789765 +Node: Sample Debugging Session790657 +Node: Debugger Invocation791177 +Node: Finding The Bug792510 +Node: List of Debugger Commands798997 +Node: Breakpoint Control800331 +Node: Debugger Execution Control803995 +Node: Viewing And Changing Data807355 +Node: Execution Stack810711 +Node: Debugger Info812178 +Node: Miscellaneous Debugger Commands816160 +Node: Readline Support821336 +Node: Limitations822167 +Node: Arbitrary Precision Arithmetic824419 +Ref: Arbitrary Precision Arithmetic-Footnote-1826068 +Node: General Arithmetic826216 +Node: Floating Point Issues827936 +Node: String Conversion Precision828817 +Ref: String Conversion Precision-Footnote-1830522 +Node: Unexpected Results830631 +Node: POSIX Floating Point Problems832784 +Ref: POSIX Floating Point Problems-Footnote-1836609 +Node: Integer Programming836647 +Node: Floating-point Programming838386 +Ref: Floating-point Programming-Footnote-1844717 +Ref: Floating-point Programming-Footnote-2844987 +Node: Floating-point Representation845251 +Node: Floating-point Context846416 +Ref: table-ieee-formats847255 +Node: Rounding Mode848639 +Ref: table-rounding-modes849118 +Ref: Rounding Mode-Footnote-1852133 +Node: Gawk and MPFR852312 +Node: Arbitrary Precision Floats853567 +Ref: Arbitrary Precision Floats-Footnote-1856010 +Node: Setting Precision856326 +Ref: table-predefined-precision-strings857012 +Node: Setting Rounding Mode859157 +Ref: table-gawk-rounding-modes859561 +Node: Floating-point Constants860748 +Node: Changing Precision862177 +Ref: Changing Precision-Footnote-1863574 +Node: Exact Arithmetic863748 +Node: Arbitrary Precision Integers866886 +Ref: Arbitrary Precision Integers-Footnote-1869901 +Node: Dynamic Extensions870048 +Node: Extension Intro871506 +Node: Plugin License872771 +Node: Extension Mechanism Outline873456 +Ref: load-extension873873 +Ref: load-new-function875351 +Ref: call-new-function876346 +Node: Extension API Description878361 +Node: Extension API Functions Introduction879648 +Node: General Data Types884575 +Ref: General Data Types-Footnote-1890270 +Node: Requesting Values890569 +Ref: table-value-types-returned891306 +Node: Memory Allocation Functions892260 +Ref: Memory Allocation Functions-Footnote-1895006 +Node: Constructor Functions895102 +Node: Registration Functions896860 +Node: Extension Functions897545 +Node: Exit Callback Functions899847 +Node: Extension Version String901096 +Node: Input Parsers901746 +Node: Output Wrappers911503 +Node: Two-way processors916013 +Node: Printing Messages918221 +Ref: Printing Messages-Footnote-1919298 +Node: Updating `ERRNO'919450 +Node: Accessing Parameters920189 +Node: Symbol Table Access921419 +Node: Symbol table by name921933 +Node: Symbol table by cookie923909 +Ref: Symbol table by cookie-Footnote-1928041 +Node: Cached values928104 +Ref: Cached values-Footnote-1931594 +Node: Array Manipulation931685 +Ref: Array Manipulation-Footnote-1932783 +Node: Array Data Types932822 +Ref: Array Data Types-Footnote-1935525 +Node: Array Functions935617 +Node: Flattening Arrays939453 +Node: Creating Arrays946305 +Node: Extension API Variables951030 +Node: Extension Versioning951666 +Node: Extension API Informational Variables953567 +Node: Extension API Boilerplate954653 +Node: Finding Extensions958457 +Node: Extension Example959017 +Node: Internal File Description959747 +Node: Internal File Ops963838 +Ref: Internal File Ops-Footnote-1975347 +Node: Using Internal File Ops975487 +Ref: Using Internal File Ops-Footnote-1977840 +Node: Extension Samples978106 +Node: Extension Sample File Functions979630 +Node: Extension Sample Fnmatch988115 +Node: Extension Sample Fork989884 +Node: Extension Sample Inplace991097 +Node: Extension Sample Ord992875 +Node: Extension Sample Readdir993711 +Node: Extension Sample Revout995243 +Node: Extension Sample Rev2way995836 +Node: Extension Sample Read write array996526 +Node: Extension Sample Readfile998409 +Node: Extension Sample API Tests999509 +Node: Extension Sample Time1000034 +Node: gawkextlib1001398 +Node: Language History1004179 +Node: V7/SVR3.11005772 +Node: SVR41008092 +Node: POSIX1009534 +Node: BTL1010920 +Node: POSIX/GNU1011654 +Node: Feature History1017253 +Node: Common Extensions1030229 +Node: Ranges and Locales1031541 +Ref: Ranges and Locales-Footnote-11036158 +Ref: Ranges and Locales-Footnote-21036185 +Ref: Ranges and Locales-Footnote-31036419 +Node: Contributors1036640 +Node: Installation1042021 +Node: Gawk Distribution1042915 +Node: Getting1043399 +Node: Extracting1044225 +Node: Distribution contents1045917 +Node: Unix Installation1051622 +Node: Quick Installation1052239 +Node: Additional Configuration Options1054685 +Node: Configuration Philosophy1056421 +Node: Non-Unix Installation1058775 +Node: PC Installation1059233 +Node: PC Binary Installation1060532 +Node: PC Compiling1062380 +Node: PC Testing1065324 +Node: PC Using1066500 +Node: Cygwin1070668 +Node: MSYS1071477 +Node: VMS Installation1071991 +Node: VMS Compilation1072755 +Ref: VMS Compilation-Footnote-11074007 +Node: VMS Dynamic Extensions1074065 +Node: VMS Installation Details1075438 +Node: VMS Running1077689 +Node: VMS GNV1080523 +Node: VMS Old Gawk1081246 +Node: Bugs1081716 +Node: Other Versions1085634 +Node: Notes1091718 +Node: Compatibility Mode1092518 +Node: Additions1093301 +Node: Accessing The Source1094228 +Node: Adding Code1095668 +Node: New Ports1101713 +Node: Derived Files1105848 +Ref: Derived Files-Footnote-11111169 +Ref: Derived Files-Footnote-21111203 +Ref: Derived Files-Footnote-31111803 +Node: Future Extensions1111901 +Node: Implementation Limitations1112484 +Node: Extension Design1113736 +Node: Old Extension Problems1114890 +Ref: Old Extension Problems-Footnote-11116398 +Node: Extension New Mechanism Goals1116455 +Ref: Extension New Mechanism Goals-Footnote-11119820 +Node: Extension Other Design Decisions1120006 +Node: Extension Future Growth1122112 +Node: Old Extension Mechanism1122948 +Node: Basic Concepts1124688 +Node: Basic High Level1125369 +Ref: figure-general-flow1125640 +Ref: figure-process-flow1126239 +Ref: Basic High Level-Footnote-11129468 +Node: Basic Data Typing1129653 +Node: Glossary1133008 +Node: Copying1158237 +Node: GNU Free Documentation License1195794 +Node: Index1220931 End Tag Table diff --git a/doc/gawk.texi b/doc/gawk.texi index 139af5f7..b9d65bd0 100644 --- a/doc/gawk.texi +++ b/doc/gawk.texi @@ -13754,10 +13754,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 @@ -36258,9 +36266,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: @@ -36285,7 +36294,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 dfdf3434..cb35e37c 100644 --- a/doc/gawktexi.in +++ b/doc/gawktexi.in @@ -13131,10 +13131,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 @@ -35399,9 +35407,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: @@ -35426,7 +35435,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 38d77490..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.0g" +#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.0g" +#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.0g" +#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 f8d9f943..8340cac4 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -158,6 +158,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 d92f358e..23a6b626 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 \ @@ -969,7 +971,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 \ @@ -1892,6 +1894,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 6e1bcbb3..3d05bd67 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 \ @@ -1214,7 +1216,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 \ @@ -2316,6 +2318,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 |