From owner-freebsd-current@freebsd.org  Fri Feb 10 13:19:11 2017
Return-Path: <owner-freebsd-current@freebsd.org>
Delivered-To: freebsd-current@mailman.ysv.freebsd.org
Received: from mx1.freebsd.org (mx1.freebsd.org
 [IPv6:2001:1900:2254:206a::19:1])
 by mailman.ysv.freebsd.org (Postfix) with ESMTP id A63EBCD6E90
 for <freebsd-current@mailman.ysv.freebsd.org>;
 Fri, 10 Feb 2017 13:19:11 +0000 (UTC)
 (envelope-from iblis@hs.ntnu.edu.tw)
Received: from mail.hs.ntnu.edu.tw (mail.hs.ntnu.edu.tw [140.131.149.3])
 (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits))
 (Client did not present a certificate)
 by mx1.freebsd.org (Postfix) with ESMTPS id 76D56371
 for <freebsd-current@freebsd.org>; Fri, 10 Feb 2017 13:19:11 +0000 (UTC)
 (envelope-from iblis@hs.ntnu.edu.tw)
Received: by mail.hs.ntnu.edu.tw (Postfix, from userid 800)
 id 017AD1C6450; Fri, 10 Feb 2017 21:09:54 +0800 (CST)
Received: from abeing (IP-215-9.cs.nctu.edu.tw [140.113.215.9])
 (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits))
 (No client certificate requested)
 (Authenticated sender: iblis@hs.ntnu.edu.tw)
 by mail.hs.ntnu.edu.tw (Postfix) with ESMTPSA id BB9D21C644A
 for <freebsd-current@freebsd.org>; Fri, 10 Feb 2017 21:09:54 +0800 (CST)
Date: Fri, 10 Feb 2017 21:09:52 +0800
From: Iblis Lin <iblis@hs.ntnu.edu.tw>
To: freebsd-current@freebsd.org
Subject: r313494 make perl File::Temp broken
Message-ID: <20170210130952.GA70284@abeing>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Disposition: inline
Content-Transfer-Encoding: 8bit
User-Agent: Mutt/1.7.1 (2016-10-04)
X-Bogosity: Ham, tests=bogofilter, spamicity=0.071492, version=1.2.4
X-BeenThere: freebsd-current@freebsd.org
X-Mailman-Version: 2.1.23
Precedence: list
List-Id: Discussions about the use of FreeBSD-current
 <freebsd-current.freebsd.org>
List-Unsubscribe: <https://lists.freebsd.org/mailman/options/freebsd-current>, 
 <mailto:freebsd-current-request@freebsd.org?subject=unsubscribe>
List-Archive: <http://lists.freebsd.org/pipermail/freebsd-current/>
List-Post: <mailto:freebsd-current@freebsd.org>
List-Help: <mailto:freebsd-current-request@freebsd.org?subject=help>
List-Subscribe: <https://lists.freebsd.org/mailman/listinfo/freebsd-current>, 
 <mailto:freebsd-current-request@freebsd.org?subject=subscribe>
X-List-Received-Date: Fri, 10 Feb 2017 13:19:11 -0000

Hi,

as not a perl programmer myself. I have no idea what is going on.
I found this issue while compiling math/openblas.

[iblis@ns]% uname -a
FreeBSD ns 12.0-CURRENT FreeBSD 12.0-CURRENT #1 r313500: Fri Feb 10 16:39:21 
CST 2017     root@ns:/usr/obj/usr/src/sys/GENERIC  amd64

[iblis@ns]% cat test.pl 
use File::Temp qw(tempfile);
$tmpf = new File::Temp( UNLINK => 1 );

[iblis@ns]% perl test.pl
Error in tempfile() using template /tmp/XXXXXXXXXX: Could not create temp file
/tmp/dI5uhUsijR: Bad file descriptor at test.pl line 2.


And part of truss's output:

close(3)                                         = 0 (0x0)
stat("/tmp/",{ mode=drwxrwxrwt ,inode=24317568,size=1024,blksize=32768 }) = 0 (0x0)
stat("/tmp/",{ mode=drwxrwxrwt ,inode=24317568,size=1024,blksize=32768 }) = 0 (0x0)
openat(AT_FDCWD,"/tmp/Nn0Epra5ff",O_RDWR|O_EXLOCK|O_NOFOLLOW|O_CREAT|O_EXCL,0600) ERR#9 'Bad file descriptor'
stat("/usr/share/nls/C/libc.cat",0x7fffffffdcf8) ERR#2 'No such file or directory'
stat("/usr/share/nls/libc/C",0x7fffffffdcf8)     ERR#2 'No such file or directory'
stat("/usr/local/share/nls/C/libc.cat",0x7fffffffdcf8) ERR#2 'No such file or directory'
stat("/usr/local/share/nls/libc/C",0x7fffffffdcf8) ERR#2 'No such file or directory'
Error in tempfile() using template /tmp/XXXXXXXXXX: Could not create temp file /tmp/Nn0Epra5ff: Bad file descriptor at test.pl line 2.
write(2,"Error in tempfile() using templa"...,135) = 135 (0x87)


-- 
Iblis Lin
林峻頤