[Pkg-tcltk-devel] Bug#913189: /usr/bin/tclsh8.6: `file delete' can produce EFAULT

[Ian Jackson]

Package: tcl8.6
Version: 8.6.6+dfsg-1+b1
Severity: normal
File: /usr/bin/tclsh8.6

To reproduce:

$ rm -rf d
$ mkdir d
$ cd d
$ rm -rf ../d
$ env - pwd
pwd: couldn't find directory entry in '..' with matching i-node
$ tclsh8.6
% file delete spong
error deleting "spong": bad address in system call argument
%

strace shows:

getcwd(0x7ffcf224aeb0, 4097)            = -1 ENOENT (No such file or directory)
lstat(NULL, 0x7ffcf224c100)             = -1 EFAULT (Bad address)

Not sure why `file delete spong' needs to call cwd at all, but
certainly it should have a proper error check.

-- System Information:
Debian Release: 9.5
  APT prefers stable-debug
  APT policy: (500, 'stable-debug'), (500, 'stable')
Architecture: amd64 (x86_64)
Foreign Architectures: i386

Kernel: Linux 4.16.0-0.bpo.2-amd64 (SMP w/4 CPU cores)
Locale: LANG=C.UTF-8, LC_CTYPE=C.UTF-8 (charmap=UTF-8), LANGUAGE=C.UTF-8 (charmap=UTF-8)
Shell: /bin/sh linked to /bin/dash
Init: sysvinit (via /sbin/init)

Versions of packages tcl8.6 depends on:
ii  libc6      2.24-11+deb9u3
ii  libtcl8.6  8.6.6+dfsg-1+b1
ii  zlib1g     1:1.2.8.dfsg-5

tcl8.6 recommends no packages.

Versions of packages tcl8.6 suggests:
pn  tcl-tclreadline  <none>

-- no debconf information