texlive[46343] Build/source/texk/kpathsea: mktexlsr (treefile): use

[commits+preining at tug.org]

Revision: 46343
          http://tug.org/svn/texlive?view=revision&revision=46343
Author:   preining
Date:     2018-01-17 01:55:32 +0100 (Wed, 17 Jan 2018)
Log Message:
-----------
mktexlsr (treefile): use mktemp with fallback option

Modified Paths:
--------------
    trunk/Build/source/texk/kpathsea/ChangeLog
    trunk/Build/source/texk/kpathsea/mktexlsr

Modified: trunk/Build/source/texk/kpathsea/ChangeLog
===================================================================
--- trunk/Build/source/texk/kpathsea/ChangeLog	2018-01-17 00:51:27 UTC (rev 46342)
+++ trunk/Build/source/texk/kpathsea/ChangeLog	2018-01-17 00:55:32 UTC (rev 46343)
@@ -1,3 +1,7 @@
+2018-01-17  Norbert Preining  <norbert at preining.info>
+
+	* mktexlsr (treefile): use mktemp with fallback option for temporary file.
+
 2018-01-16  Karl Berry  <karl at freefriends.org>
 
 	* kpathsea.pc.in (Cflags): remove -I${libdir} per Debian.

Modified: trunk/Build/source/texk/kpathsea/mktexlsr
===================================================================
--- trunk/Build/source/texk/kpathsea/mktexlsr	2018-01-17 00:51:27 UTC (rev 46342)
+++ trunk/Build/source/texk/kpathsea/mktexlsr	2018-01-17 00:55:32 UTC (rev 46343)
@@ -73,7 +73,18 @@
 dry_run=false
 trees=
 
-treefile="${TMPDIR-/tmp}/mktexlsrtrees$$.tmp"
+# initialize treefile by either mktemp or some random name
+# code taken from pdfjam and adjusted
+{
+  treefile=`
+    (umask 077 && mktemp "${TMPDIR-/tmp}/mktexlsrtrees.XXXXXXXXXX") 2>/dev/null
+  ` && test -n "$treefile" && test -f "$treefile"
+} || {
+  ##  We'll use awk to make random number, for portability
+  random=`awk 'END { srand(); printf ("%d\n", rand()*1000000); }' /dev/null`
+  treefile="${TMPDIR-/tmp}/mktexlsrtrees$$.$random"
+} || exit $?
+
 trap 'cd /; rm -f $treefile; test -z "$db_dir_tmp" || rm -rf "$db_dir_tmp"; 
       exit' 0 1 2 3 7 13 15