Bug in GNU Awk 3.1.5

[Filip Gieszczykiewicz]

Triggered by:
ls /usr/lib/* | grep -v "/" | awk '{if (length($1) > 14) {print $1}}'

(BTW, using this to print all filename longer than 14 characters)

Get dump:
*** glibc detected *** awk: double free or corruption (fasttop): 0x083b78f8 ***
======= Backtrace: =========
/lib/libc.so.6[0x890efd]
/lib/libc.so.6(cfree+0x90)[0x894550]
awk(str2wstr+0x42)[0x80700d2]
awk(do_length+0xb5)[0x8058bb5]
awk(r_tree_eval+0x52e)[0x80824ce]
awk(r_tree_eval+0x7f)[0x808201f]
awk[0x8083596]
awk(interpret+0x96b)[0x8080e4b]
awk(interpret+0x1d6)[0x80806b6]
awk(do_input+0x38)[0x806d128]
awk(main+0x1063)[0x806f7a3]
/lib/libc.so.6(__libc_start_main+0xdc)[0x840f2c]
awk[0x804c9a1]
======= Memory map: ========
00643000-00644000 r-xp 00643000 00:00 0          [vdso]
0080e000-00827000 r-xp 00000000 03:06 197477     /lib/ld-2.5.so
00827000-00828000 r-xp 00018000 03:06 197477     /lib/ld-2.5.so
00828000-00829000 rwxp 00019000 03:06 197477     /lib/ld-2.5.so
0082b000-00962000 r-xp 00000000 03:06 197478     /lib/libc-2.5.so
00962000-00964000 r-xp 00137000 03:06 197478     /lib/libc-2.5.so
00964000-00965000 rwxp 00139000 03:06 197478     /lib/libc-2.5.so
00965000-00968000 rwxp 00965000 00:00 0 
0096a000-0098f000 r-xp 00000000 03:06 197485     /lib/libm-2.5.so
0098f000-00990000 r-xp 00024000 03:06 197485     /lib/libm-2.5.so
00990000-00991000 rwxp 00025000 03:06 197485     /lib/libm-2.5.so
00993000-00995000 r-xp 00000000 03:06 197479     /lib/libdl-2.5.so
00995000-00996000 r-xp 00001000 03:06 197479     /lib/libdl-2.5.so
00996000-00997000 rwxp 00002000 03:06 197479     /lib/libdl-2.5.so
00c1c000-00c27000 r-xp 00000000 03:06 197487     
/lib/libgcc_s-4.1.1-20061011.so.1
00c27000-00c28000 rwxp 0000a000 03:06 197487     
/lib/libgcc_s-4.1.1-20061011.so.1
08047000-08095000 r-xp 00000000 03:06 2284803    /bin/gawk
08095000-08096000 rw-p 0004d000 03:06 2284803    /bin/gawk
08096000-0809b000 rw-p 08096000 00:00 0 
083b7000-083d8000 rw-p 083b7000 00:00 0 
b7c00000-b7c21000 rw-p b7c00000 00:00 0 
b7c21000-b7d00000 ---p b7c21000 00:00 0 
b7dc9000-b7fc9000 r--p 00000000 03:09 1471186    /usr/lib/locale/locale-archive
b7fc9000-b7fcb000 rw-p b7fc9000 00:00 0 
b7fde000-b7fe5000 r--s 00000000 03:09 1534323    /usr/lib/gconv/gconv-modules.cache
bffa8000-bffbe000 rw-p bffa8000 00:00 0          [stack]
Abort

GNU Awk 3.1.5
Copyright (C) 1989, 1991-2005 Free Software Foundation.

Stock Fedora Core 6:
Linux localhost.localdomain 2.6.18-1.2798.fc6 #1 SMP Mon Oct 16 14:54:20 EDT 
2006 i686 athlon i386
GNU/Linux

I plead ignorance to knowing how to debug stuff in a pipe with gdb.

Can duplicate 100% reliably - which is why I had to convert that to a perl 
one-liner :)

Cheers in the New Year,
Fil