337dbf6867
* gnu/packages/patches/xfig-Enable-error-message-for-missing-libraries.patch: New file. * gnu/packages/patches/xfig-Fix-double-free-when-requesting-MediaBox.patch: Likewise. * gnu/packages/patches/xfig-Use-pkg-config-to-set-fontconfig-CFLAGS-and-LIBS.patch: Likewise. * gnu/local.mk (dist_patch_DATA): Register new patches. * gnu/packages/xfig.scm (xfig): Update to 3.2.9. [source]: Use new patches. [arguments]<#:phases>: Add ‘wrap-program’. [native-inputs]: Add pkg-config, autoconf, automake and libtool. Move ghostscript to … [inputs]: … here. Add fig2dev, libxaw3d and libxft. [license]: Update URL. Signed-off-by: Liliana Marie Prikler <liliana.prikler@gmail.com>
58 lines
2.4 KiB
Diff
58 lines
2.4 KiB
Diff
From a9181df87d78828318f2e9f8d4ea012bc06883b9 Mon Sep 17 00:00:00 2001
|
|
From: Bruno Victal <mirai@makinata.eu>
|
|
Date: Thu, 7 Sep 2023 16:51:23 +0100
|
|
Subject: [PATCH 3/3] Fix double-free when requesting MediaBox.
|
|
|
|
Explicitly close the Ghostscript PDF interpreter before calling quit.
|
|
|
|
References:
|
|
[1]: <https://bugs.ghostscript.com/show_bug.cgi?id=705855>
|
|
[2]: <https://bugs.ghostscript.com/show_bug.cgi?id=705836>
|
|
---
|
|
src/u_ghostscript.c | 13 ++++++++-----
|
|
1 file changed, 8 insertions(+), 5 deletions(-)
|
|
|
|
diff --git a/src/u_ghostscript.c b/src/u_ghostscript.c
|
|
index 5974b31..d14674f 100644
|
|
--- a/src/u_ghostscript.c
|
|
+++ b/src/u_ghostscript.c
|
|
@@ -317,10 +317,10 @@ gsexe(FILE **out, bool *isnew, char *exenew, char *exeold)
|
|
* Call ghostscript to extract the /MediaBox from the pdf given in file.
|
|
* Command line, for gs >= 9.50,
|
|
* gs -q -dNODISPLAY --permit-file-read=in.pdf -c \
|
|
- * "(in.pdf) (r) file runpdfbegin 1 pdfgetpage /MediaBox pget pop == quit"
|
|
+ * "(in.pdf) (r) file runpdfbegin 1 pdfgetpage /MediaBox pget pop == runpdfend quit"
|
|
* gs < 9.50:
|
|
* gs -q -dNODISPLAY -dNOSAFER -c \
|
|
- * "(in.pdf) (r) file runpdfbegin 1 pdfgetpage /MediaBox pget pop == quit"
|
|
+ * "(in.pdf) (r) file runpdfbegin 1 pdfgetpage /MediaBox pget pop == runpdfend quit"
|
|
* The command line was found, and modified a bit, at
|
|
*https://stackoverflow.com/questions/2943281/using-ghostscript-to-get-page-size
|
|
* Beginning with gs 9.50, "-dSAFER" is the default, and permission to access
|
|
@@ -349,9 +349,11 @@ gsexe_mediabox(char *file, int *llx, int *lly, int *urx, int *ury)
|
|
return -3;
|
|
|
|
exenew = "%s -q -dNODISPLAY \"--permit-file-read=%s\" -c \"(%s) (r) "
|
|
- "file runpdfbegin 1 pdfgetpage /MediaBox pget pop == quit\"";
|
|
+ "file runpdfbegin 1 pdfgetpage /MediaBox pget pop == "
|
|
+ "runpdfend quit\"";
|
|
exeold = "%s -q -dNODISPLAY -c \"(%s) (r) "
|
|
- "file runpdfbegin 1 pdfgetpage /MediaBox pget pop == quit\"";
|
|
+ "file runpdfbegin 1 pdfgetpage /MediaBox pget pop == "
|
|
+ "runpdfend quit\"";
|
|
|
|
/* malloc() buffers for the command line, if necessary */
|
|
fmt = exenew;
|
|
@@ -445,7 +447,8 @@ gslib_mediabox(char *file, int *llx, int *lly, int *urx, int *ury)
|
|
argnew[3] = "--permit-file-read=%s"; /* file */
|
|
argnew[4] = "-c";
|
|
argnew[5] =
|
|
- "(%s) (r) file runpdfbegin 1 pdfgetpage /MediaBox pget pop == quit";
|
|
+ "(%s) (r) file runpdfbegin 1 pdfgetpage /MediaBox pget pop == "
|
|
+ "runpdfend quit";
|
|
|
|
argold[0] = argnew[0];
|
|
argold[1] = argnew[1];
|
|
--
|
|
2.40.1
|
|
|