texlive[43113] Build/source/texk/web2c/lib: web2c/lib/texmfmp.c:

[commits+kakuto at tug.org]

Revision: 43113
          http://tug.org/svn/texlive?view=revision&revision=43113
Author:   kakuto
Date:     2017-02-01 05:41:12 +0100 (Wed, 01 Feb 2017)
Log Message:
-----------
web2c/lib/texmfmp.c: avoid a crash in xelatex

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/lib/ChangeLog
    trunk/Build/source/texk/web2c/lib/texmfmp.c

Modified: trunk/Build/source/texk/web2c/lib/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/lib/ChangeLog	2017-02-01 01:02:43 UTC (rev 43112)
+++ trunk/Build/source/texk/web2c/lib/ChangeLog	2017-02-01 04:41:12 UTC (rev 43113)
@@ -1,3 +1,9 @@
+2017-02-01  Akira Kakuto  <kakuto at fuk.kinidai.ac.jp>
+
+	* texmfmp.c: Avoid a crash in xelatex for
+	http://tug.org/pipermail/xetex/2017-January/026975.html.
+	It is not a fix but a stopgap.
+
 2017-01-02  Akira Kakuto  <kakuto at fuk.kinidai.ac.jp>
 
 	* printversion.c: 2016 ---> 2017.

Modified: trunk/Build/source/texk/web2c/lib/texmfmp.c
===================================================================
--- trunk/Build/source/texk/web2c/lib/texmfmp.c	2017-02-01 01:02:43 UTC (rev 43112)
+++ trunk/Build/source/texk/web2c/lib/texmfmp.c	2017-02-01 04:41:12 UTC (rev 43113)
@@ -2818,6 +2818,8 @@
   unsigned bytesToWrite = 0;
   poolpointer len, i, j;
   string name;
+  if (strstart[s + 1 - 65536L] < strstart[s - 65536L])
+    return NULL;
   len = strstart[s + 1 - 65536L] - strstart[s - 65536L];
   name = xmalloc(len * 3 + 1); /* max UTF16->UTF8 expansion
                                   (code units, not bytes) */