This patch makes the UUIDs in the XMP header optional, depending on the
setting of the environment variable GS_GENERATE_UUIDS.

If the environment variable GS_GENERATE_UUIDS is set to "0" or "no", it will
not write out the Document UUID field and also will write the Instance ID
field value as "".

Upstream does not want to do this.

See: https://bugs.ghostscript.com/show_bug.cgi?id=698208
diff --git a/devices/vector/gdevpdfe.c b/devices/vector/gdevpdfe.c
index f083f1e93..a19c64ac0 100644
--- a/devices/vector/gdevpdfe.c
+++ b/devices/vector/gdevpdfe.c
@@ -624,7 +624,7 @@ pdf_write_document_metadata(gx_device_pdf *pdev, const byte digest[6])
         return code;
 
     /* PDF/A XMP reference recommends setting UUID to empty. If not empty must be a URI */
-    if (pdev->PDFA != 0)
+    if (pdev->PDFA != 0 || (getenv("GS_GENERATE_UUIDS") && (strcasecmp(getenv("GS_GENERATE_UUIDS"), "0") == 0 || strcasecmp(getenv("GS_GENERATE_UUIDS"), "no") == 0)))
         instance_uuid[0] = 0x00;
 
     cre_date_time_len = pdf_get_docinfo_item(pdev, "/CreationDate", cre_date_time, sizeof(cre_date_time));
@@ -730,14 +730,17 @@ pdf_write_document_metadata(gx_device_pdf *pdev, const byte digest[6])
             pdf_xml_tag_close(s, "rdf:Description");
             pdf_xml_newline(s);
 
-            pdf_xml_tag_open_beg(s, "rdf:Description");
-            pdf_xml_copy(s, " rdf:about=\"\"");
-            pdf_xml_attribute_name(s, "xmlns:xapMM");
-            pdf_xml_attribute_value(s, "http://ns.adobe.com/xap/1.0/mm/");
-            pdf_xml_attribute_name(s, "xapMM:DocumentID");
-            pdf_xml_attribute_value(s, document_uuid);
-            pdf_xml_tag_end_empty(s);
-            pdf_xml_newline(s);
+            if (!getenv("GS_GENERATE_UUIDS") || (strcasecmp(getenv("GS_GENERATE_UUIDS"), "0") != 0 && strcasecmp(getenv("GS_GENERATE_UUIDS"), "no") != 0))
+            {
+                pdf_xml_tag_open_beg(s, "rdf:Description");
+                pdf_xml_copy(s, " rdf:about=\"\"");
+                pdf_xml_attribute_name(s, "xmlns:xapMM");
+                pdf_xml_attribute_value(s, "http://ns.adobe.com/xap/1.0/mm/");
+                pdf_xml_attribute_name(s, "xapMM:DocumentID");
+                pdf_xml_attribute_value(s, document_uuid);
+                pdf_xml_tag_end_empty(s);
+                pdf_xml_newline(s);
+            }
 
             pdf_xml_tag_open_beg(s, "rdf:Description");
             pdf_xml_copy(s, " rdf:about=\"\"");
th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/packages/gnucash.scm?id=9834d1ab3836730cf3308603019b736d0a653013&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2020-11-10 22:32:14 +0100'>2020-11-10</span></td><td><a href='/guix/commit/gnu/packages/gnucash.scm?id=26ee22f0bec408ac062eec5cdb1b1fb65f0b9e32'>gnu: gnucash: Enable python bindings.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/gnucash.scm (gnucash):
  [inputs]: Add python.
  [outputs]: Add new output 'python' for python bindings.
  [arguments]&lt;configure-flags&gt;: Add '-DWITH_PYTHON=ON'
  [arguments]: Add new build phase 'split-python-bindings'

Signed-off-by: Marius Bakke &lt;marius@gnu.org&gt;
</span></span></td><td>Prafulla Giri</td></tr>
<tr><td><span title='2020-09-30 09:28:26 +0300'>2020-09-30</span></td><td><a href='/guix/commit/gnu/packages/gnucash.scm?id=1628d57bb5c6ab30a04202c229de642b94faac85'>gnu: Fix package references.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/algebra.scm (iml)[inputs]: Correctly refer to package
inputs.
* gnu/packages/astronomy.scm (xplanet),
* gnu/packages/audio.scm (redkite, libaudec, lv2lint, lv2toweb),
* gnu/packages/bioconductor.scm (r-cummerbund),
* gnu/packages/chicken.scm (chicken),
* gnu/packages/conky.scm (conky),
* gnu/packages/cran.scm (r-latex2exp),
* gnu/packages/crates-io.scm (rust-rgb),
* gnu/packages/databases.scm (mariadb),
* gnu/packages/diffoscope.scm (reprotest),
* gnu/packages/file-systems.scm (glusterfs),
* gnu/packages/finance.scm (electron-cash),
* gnu/packages/games.scm (rinutils, ksudoku, kdiamond, kigo),
* gnu/packages/geo.scm (grass),
* gnu/packages/gnome.scm (libmediaart, gnome-contacts, geoclue),
* gnu/packages/gnucash.scm (aqbanking),
* gnu/packages/image.scm (mtpaint),
* gnu/packages/kde-internet.scm (kopete, ktorrent),
* gnu/packages/kde-utils.scm (kmousetool, kmouth, kronometer),
* gnu/packages/linphone.scm (liblinphone),
* gnu/packages/maths.scm (ppl),
* gnu/packages/mercury.scm (mercury-minimal),
* gnu/packages/music.scm (bjumblr, bschaffl, lsp-plugins,
spectacle-analyzer, helm, tap-lv2, wolf-shaper, shiru-lv2),
* gnu/packages/networking.scm (restinio),
* gnu/packages/prolog.scm (swi-prolog),
* gnu/packages/python-web.scm (gunicorn),
* gnu/packages/python-xyz.scm (python-docusign-esign),
* gnu/packages/ruby.scm (ruby-cucumber, ruby_version, ruby-addressable),
* gnu/packages/sagemath.scm (python-cypari2),
* gnu/packages/skarnet.scm (s6-linux-init),
* gnu/packages/vpn.scm (sshuttle),
* gnu/packages/web.scm (libcyaml),
* gnu/packages/xdisorg.scm (kbdd),
* gnu/packages/xorg.scm (xpra): Same.
</span></span></td><td>Efraim Flashner</td></tr>
<tr><td><span title='2020-01-17 15:19:14 -0500'>2020-01-17</span></td><td><a href='/guix/commit/gnu/packages/gnucash.scm?id=dfb01912865898545c278e691f43db31aed301aa'>gnu: gnucash: Enable libofx support.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/gnucash.scm (gnucash)[arguments]: Remove '-DWITH_OFX=OFF'
configure flag to enable libofx support.
[inputs]: Add libofx.
[propagated-inputs]: Add dconf.
</span></span></td><td>Kei Kebreau</td></tr>
<tr><td><span title='2020-01-10 23:01:28 +0100'>2020-01-10</span></td><td><a href='/guix/commit/gnu/packages/gnucash.scm?id=bc818a57caf0a523227b4653aa2720e49d2877ee'>gnu: gnucash: Update to 3.8.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/gnucash.scm (gnucash, gnucash-doc): Update to 3.8.
</span></span></td><td>Hartmut Goebel</td></tr>
<tr><td><span title='2020-01-10 23:01:28 +0100'>2020-01-10</span></td><td><a href='/guix/commit/gnu/packages/gnucash.scm?id=219fe54c8a4d1eebea175dd600108f7130aa40a6'>gnu: aqbanking: Update to 5.99.44beta.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/gnucash.scm (aqbanking): Update to 5.99.44beta.
  [argmuents]&lt;configure-flags&gt;: Remove.
  [native-inputs]. Add gettext-minimal.
</span></span></td><td>Hartmut Goebel</td></tr>
<tr><td><span title='2020-01-10 23:01:28 +0100'>2020-01-10</span></td><td><a href='/guix/commit/gnu/packages/gnucash.scm?id=c82eab7f42e9ce5fa64ba66f4e62fbbfedf13373'>gnu: gwenhywfar: Update to 4.99.25rc9.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/packages/gnucash.scm (gwenhywfar): Update to 4.99.25rc9.
</span></span></td><td>Hartmut Goebel</td></tr>