[gentoo-commits] gentoo commit in src/patchsets/luatex/0.60.0: 040_all_poppler-0.11.3.patch 050_all_upstream-epstopdf_cc_no_xpdf_patching.patch series

[Alexis Ballier (aballier)]

aballier    10/04/27 10:44:07

  Added:                040_all_poppler-0.11.3.patch
                        050_all_upstream-epstopdf_cc_no_xpdf_patching.patch
                        series
  Log:
  add patches for 0.60.0

Revision  Changes    Path
1.1                  src/patchsets/luatex/0.60.0/040_all_poppler-0.11.3.patch

file : http://sources.gentoo.org/viewcvs.py/gentoo/src/patchsets/luatex/0.60.0/040_all_poppler-0.11.3.patch?rev=1.1&view=markup
plain: http://sources.gentoo.org/viewcvs.py/gentoo/src/patchsets/luatex/0.60.0/040_all_poppler-0.11.3.patch?rev=1.1&content-type=text/plain

Index: 040_all_poppler-0.11.3.patch
===================================================================
Index: luatex-beta-0.60.0/source/texk/web2c/luatexdir/image/pdftoepdf.cc
===================================================================
--- luatex-beta-0.60.0.orig/source/texk/web2c/luatexdir/image/pdftoepdf.cc
+++ luatex-beta-0.60.0/source/texk/web2c/luatexdir/image/pdftoepdf.cc
@@ -471,7 +471,8 @@ read_pdf_info(image_dict * idict, int mi
     int rotate;
     char *checksum;
     PDFRectangle *pagebox;
-    float pdf_version_found, pdf_version_wanted, xsize, ysize, xorig, yorig;
+    float xsize, ysize, xorig, yorig;
+    int minor_pdf_version_found, major_pdf_version_found;
     assert(idict != NULL);
     assert(img_type(idict) == IMG_TYPE_PDF);
     assert(readtype == IMG_CLOSEINBETWEEN);     // only this is implemented
@@ -494,15 +495,15 @@ read_pdf_info(image_dict * idict, int mi
     // this works only for PDF 1.x -- but since any versions of PDF newer
     // than 1.x will not be backwards compatible to PDF 1.x, pdfTeX will
     // then have to changed drastically anyway.
-    pdf_version_found = pdf_doc->doc->getPDFVersion();
-    pdf_version_wanted = 1 + (minor_pdf_version_wanted * 0.1);
-    if (pdf_version_found > pdf_version_wanted + 0.01) {
+    minor_pdf_version_found = pdf_doc->doc->getPDFMinorVersion();
+    major_pdf_version_found = pdf_doc->doc->getPDFMajorVersion();
+    if (major_pdf_version_found > 1 || minor_pdf_version_found > minor_pdf_version_wanted) {
         char msg[] =
-            "PDF inclusion: found PDF version <%.1f>, but at most version <%.1f> allowed";
+            "PDF inclusion: found PDF version <%d.%d>, but at most version <1.%d> allowed";
         if (pdf_inclusion_errorlevel > 0) {
-            pdftex_fail(msg, pdf_version_found, pdf_version_wanted);
+            pdftex_fail(msg, major_pdf_version_found, minor_pdf_version_found, minor_pdf_version_wanted);
         } else {
-            pdftex_warn(msg, pdf_version_found, pdf_version_wanted);
+            pdftex_warn(msg, major_pdf_version_found, minor_pdf_version_found, minor_pdf_version_wanted);
         }
     }
     img_totalpages(idict) = pdf_doc->doc->getCatalog()->getNumPages();



1.1                  src/patchsets/luatex/0.60.0/050_all_upstream-epstopdf_cc_no_xpdf_patching.patch

file : http://sources.gentoo.org/viewcvs.py/gentoo/src/patchsets/luatex/0.60.0/050_all_upstream-epstopdf_cc_no_xpdf_patching.patch?rev=1.1&view=markup
plain: http://sources.gentoo.org/viewcvs.py/gentoo/src/patchsets/luatex/0.60.0/050_all_upstream-epstopdf_cc_no_xpdf_patching.patch?rev=1.1&content-type=text/plain

Index: 050_all_upstream-epstopdf_cc_no_xpdf_patching.patch
===================================================================
---
 source/texk/web2c/luatexdir/image/pdftoepdf.cc |   86 +++++++++++--------------
 1 file changed, 39 insertions(+), 47 deletions(-)

Index: luatex-beta-0.60.0/source/texk/web2c/luatexdir/image/pdftoepdf.cc
===================================================================
--- luatex-beta-0.60.0.orig/source/texk/web2c/luatexdir/image/pdftoepdf.cc
+++ luatex-beta-0.60.0/source/texk/web2c/luatexdir/image/pdftoepdf.cc
@@ -19,8 +19,8 @@
    with LuaTeX; if not, see <http://www.gnu.org/licenses/>. */
 
 static const char _svn_version[] =
-    "$Id: 050_all_upstream-epstopdf_cc_no_xpdf_patching.patch,v 1.1 2010/04/27 10:44:07 aballier Exp $ "
-    "$URL: http://foundry.supelec.fr/svn/luatex/tags/beta-0.60.0/source/texk/web2c/luatexdir/image/pdftoepdf.cc $";
+    "$Id: 050_all_upstream-epstopdf_cc_no_xpdf_patching.patch,v 1.1 2010/04/27 10:44:07 aballier Exp $ "
+    "$URL: http://foundry.supelec.fr/svn/luatex/trunk/source/texk/web2c/luatexdir/image/pdftoepdf.cc $";
 
 #include "epdf.h"
 
@@ -592,11 +592,19 @@ static void write_epdf1(PDF pdf, image_d
 {
     PdfDocument *pdf_doc;
     Page *page;
-    PdfObject info, contents, metadata, obj1;
-    Object *metadataNF, *resourcesNF;
+    Ref *pageref;
+    Dict *pageDict;
+    PdfObject info, contents, obj1, pageObj, dictObj;
+    PDFRectangle *pagebox;
+    int i, l;
+    float bbox[4];
     char *checksum;
     char s[256];
-    int i, l;
+    char *pagedictkeys[] =
+        { "Group", "LastModified", "Metadata", "PieceInfo", "Resources",
+        "SeparationInfo", NULL
+    };
+
     assert(idict != NULL);
     // calculate a checksum string
     checksum = get_file_checksum(img_filepath(idict));
@@ -607,10 +615,12 @@ static void write_epdf1(PDF pdf, image_d
                     img_filename(idict));
     }
     free(checksum);
-    (void) pdf_doc->doc->getCatalog()->getPage(img_pagenum(idict));
     page = pdf_doc->doc->getCatalog()->getPage(img_pagenum(idict));
-    PDFRectangle *pagebox;
-    float bbox[4];
+    pageref = pdf_doc->doc->getCatalog()->getPageRef(img_pagenum(idict));
+    assert(pageref != NULL);    // was checked already in read_pdf_info()
+    pdf_doc->doc->getXRef()->fetch(pageref->num, pageref->gen, &pageObj);
+    pageDict = pageObj->getDict();
+
     // write the Page header
     pdf_puts(pdf, "/Type /XObject\n/Subtype /Form\n");
     if (img_attr(idict) != NULL && strlen(img_attr(idict)) > 0)
@@ -647,51 +657,33 @@ static void write_epdf1(PDF pdf, image_d
     pdf_puts(pdf, stripzeros(s));
     // The /Matrix calculation is replaced by transforms in out_img().
 
-    // Now all relevant parts of the /Page dictionary are copied:
+    // Now all relevant parts of the Page dictionary are copied:
 
-    // write the /Resources dictionary
-    if (page->getResourceDict() == NULL) {
+    // Resources validity check
+    pageDict->lookupNF("Resources", &dictObj);
+    if (dictObj->isNull()) {
         // Resources can be missing (files without them have been spotted
         // in the wild); in which case the /Resouces of the /Page will be used.
         // "This practice is not recommended".
         pdftex_warn
             ("PDF inclusion: /Resources missing. 'This practice is not recommended' (PDF Ref.)");
-    } else {
-        resourcesNF = page->getResourcesNF();
-        pdf_puts(pdf, "/Resources ");
-        copyObject(pdf, pdf_doc, resourcesNF);
-    }
-    // write the page /Metadata if it's there (as a stream it must be indirect)
-    if (page->getMetadata() != NULL) {
-        metadataNF = page->getMetadataNF();     // *NF = "don't resolve indirects"
-        if (!metadataNF->isRef())
-            pdftex_warn("PDF inclusion: /Metadata must be indirect object");
-        else {
-            pdf_printf(pdf, "/Metadata %d 0 R",
-                       addInObj(pdf, pdf_doc, metadataNF->getRef()));
-        }
     }
-    // write the page /Group if it's there
-    if (page->getGroup() != NULL) {
-        pdf_puts(pdf, "/Group ");
-        copyDict(pdf, pdf_doc, page->getGroup());
-    }
-    // write the page /PieceInfo if it's there
-    if (page->getPieceInfo() != NULL) {
-        pdf_puts(pdf, "/PieceInfo ");
-        copyDict(pdf, pdf_doc, page->getPieceInfo());
-    }
-    // write the page /SeparationInfo if it's there
-    if (page->getSeparationInfo() != NULL) {
-        pdf_puts(pdf, "/SeparationInfo ");
-        copyDict(pdf, pdf_doc, page->getSeparationInfo());
-    }
-    // copy LastModified (needed when PieceInfo is there)
-    if (page->getLastModified() != NULL) {
-        pdf_printf(pdf, "/LastModified (%s)\n",
-                   page->getLastModified()->getCString());
+
+    // Metadata validity check (as a stream it must be indirect)
+    pageDict->lookupNF("Metadata", &dictObj);
+    if (!dictObj->isNull() && !dictObj->isRef())
+        pdftex_warn("PDF inclusion: /Metadata must be indirect object");
+
+    // copy selected items in Page dictionary
+    for (i = 0; pagedictkeys[i] != NULL; i++) {
+        pageDict->lookupNF(pagedictkeys[i], &dictObj);
+        if (!dictObj->isNull()) {
+            pdf_printf(pdf, "/%s ", pagedictkeys[i]);
+            copyObject(pdf, pdf_doc, &dictObj); // preserves indirection
+        }
     }
-    // write the page contents
+
+    // write the Page contents
     page->getContents(&contents);
     if (contents->isStream()) {
         // Variant A: get stream and recompress under control
@@ -732,8 +724,8 @@ static void write_epdf1(PDF pdf, image_d
         for (i = 0, l = contents->arrayGetLength(); i < l; ++i) {
             PdfObject contentsobj;
             copyStreamStream(pdf,
-                             (contents->arrayGet(i, &contentsobj))->
-                             getStream());
+                             (contents->
+                              arrayGet(i, &contentsobj))->getStream());
             if (i < (l - 1)) {
                 // put a space between streams to be on the safe side (streams
                 // should have a trailing space here, but one never knows)



1.1                  src/patchsets/luatex/0.60.0/series

file : http://sources.gentoo.org/viewcvs.py/gentoo/src/patchsets/luatex/0.60.0/series?rev=1.1&view=markup
plain: http://sources.gentoo.org/viewcvs.py/gentoo/src/patchsets/luatex/0.60.0/series?rev=1.1&content-type=text/plain

Index: series
===================================================================
040_all_poppler-0.11.3.patch
050_all_upstream-epstopdf_cc_no_xpdf_patching.patch