f1f986
diff --git a/libqpdf/QPDF.cc b/libqpdf/QPDF.cc
f1f986
index 3475afe..f93ba0d 100644
f1f986
--- a/libqpdf/QPDF.cc
f1f986
+++ b/libqpdf/QPDF.cc
f1f986
@@ -19,6 +19,10 @@
f1f986
 #include <qpdf/QPDF_Null.hh>
f1f986
 #include <qpdf/QPDF_Dictionary.hh>
f1f986
 
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+# include <gnutls/crypto.h>
f1f986
+#endif
f1f986
+
f1f986
 std::string QPDF::qpdf_version = "7.1.1";
f1f986
 
f1f986
 static char const* EMPTY_PDF =
f1f986
@@ -139,7 +143,13 @@ QPDF::processFile(char const* filename, char const* password)
f1f986
 {
f1f986
     FileInputSource* fi = new FileInputSource();
f1f986
     fi->setFilename(filename);
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+    GNUTLS_FIPS140_SET_LAX_MODE();
f1f986
+#endif
f1f986
     processInputSource(fi, password);
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+    GNUTLS_FIPS140_SET_STRICT_MODE();
f1f986
+#endif
f1f986
 }
f1f986
 
f1f986
 void
f1f986
@@ -148,7 +158,13 @@ QPDF::processFile(char const* description, FILE* filep,
f1f986
 {
f1f986
     FileInputSource* fi = new FileInputSource();
f1f986
     fi->setFile(description, filep, close_file);
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+    GNUTLS_FIPS140_SET_LAX_MODE();
f1f986
+#endif
f1f986
     processInputSource(fi, password);
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+    GNUTLS_FIPS140_SET_STRICT_MODE();
f1f986
+#endif
f1f986
 }
f1f986
 
f1f986
 void
f1f986
diff --git a/libqpdf/QPDFWriter.cc b/libqpdf/QPDFWriter.cc
f1f986
index 0544640..48fe50d 100644
f1f986
--- a/libqpdf/QPDFWriter.cc
f1f986
+++ b/libqpdf/QPDFWriter.cc
f1f986
@@ -23,6 +23,10 @@
f1f986
 #include <algorithm>
f1f986
 #include <stdlib.h>
f1f986
 
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+#include <gnutls/crypto.h>
f1f986
+#endif
f1f986
+
f1f986
 QPDFWriter::Members::Members(QPDF& pdf) :
f1f986
     pdf(pdf),
f1f986
     filename(0),
f1f986
@@ -323,6 +327,13 @@ void
f1f986
 QPDFWriter::setDeterministicID(bool val)
f1f986
 {
f1f986
     this->m->deterministic_id = val;
f1f986
+
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+    if (val)
f1f986
+	GNUTLS_FIPS140_SET_LAX_MODE();
f1f986
+    else
f1f986
+	GNUTLS_FIPS140_SET_STRICT_MODE();
f1f986
+#endif
f1f986
 }
f1f986
 
f1f986
 void
f1f986
@@ -344,6 +355,13 @@ void
f1f986
 QPDFWriter::setPreserveEncryption(bool val)
f1f986
 {
f1f986
     this->m->preserve_encryption = val;
f1f986
+
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+    if (val)
f1f986
+	GNUTLS_FIPS140_SET_STRICT_MODE();
f1f986
+    else
f1f986
+	GNUTLS_FIPS140_SET_LAX_MODE();
f1f986
+#endif
f1f986
 }
f1f986
 
f1f986
 void
f1f986
diff --git a/libqpdf/QPDF_encryption.cc b/libqpdf/QPDF_encryption.cc
f1f986
index fd717c3..9b38914 100644
f1f986
--- a/libqpdf/QPDF_encryption.cc
f1f986
+++ b/libqpdf/QPDF_encryption.cc
f1f986
@@ -1,6 +1,8 @@
f1f986
 // This file implements methods from the QPDF class that involve
f1f986
 // encryption.
f1f986
 
f1f986
+#include <qpdf/qpdf-config.h>
f1f986
+
f1f986
 #include <qpdf/QPDF.hh>
f1f986
 
f1f986
 #include <qpdf/QPDFExc.hh>
f1f986
@@ -18,6 +20,10 @@
f1f986
 #include <assert.h>
f1f986
 #include <string.h>
f1f986
 
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+# include <gnutls/crypto.h>
f1f986
+#endif
f1f986
+
f1f986
 static unsigned char const padding_string[] = {
f1f986
     0x28, 0xbf, 0x4e, 0x5e, 0x4e, 0x75, 0x8a, 0x41,
f1f986
     0x64, 0x00, 0x4e, 0x56, 0xff, 0xfa, 0x01, 0x08,
f1f986
@@ -1084,6 +1090,12 @@ QPDF::getKeyForObject(int objid, int generation, bool use_aes)
f1f986
 void
f1f986
 QPDF::decryptString(std::string& str, int objid, int generation)
f1f986
 {
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+    unsigned oldmode = gnutls_fips140_mode_enabled();
f1f986
+
f1f986
+    gnutls_fips140_set_mode(GNUTLS_FIPS140_LAX, GNUTLS_FIPS140_SET_MODE_THREAD);
f1f986
+#endif
f1f986
+
f1f986
     if (objid == 0)
f1f986
     {
f1f986
 	return;
f1f986
@@ -1162,6 +1174,10 @@ QPDF::decryptString(std::string& str, int objid, int generation)
f1f986
 		      QUtil::int_to_string(objid) + " " +
f1f986
 		      QUtil::int_to_string(generation) + ": " + e.what());
f1f986
     }
f1f986
+
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+    gnutls_fips140_set_mode(static_cast<gnutls_fips_mode_t>(oldmode), GNUTLS_FIPS140_SET_MODE_THREAD);
f1f986
+#endif
f1f986
 }
f1f986
 
f1f986
 void
f1f986
@@ -1169,6 +1185,12 @@ QPDF::decryptStream(Pipeline*& pipeline, int objid, int generation,
f1f986
 		    QPDFObjectHandle& stream_dict,
f1f986
 		    std::vector<PointerHolder<Pipeline> >& heap)
f1f986
 {
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+    unsigned oldmode = gnutls_fips140_mode_enabled();
f1f986
+
f1f986
+    gnutls_fips140_set_mode(GNUTLS_FIPS140_LAX, GNUTLS_FIPS140_SET_MODE_THREAD);
f1f986
+#endif
f1f986
+
f1f986
     std::string type;
f1f986
     if (stream_dict.getKey("/Type").isName())
f1f986
     {
f1f986
@@ -1297,6 +1319,10 @@ QPDF::decryptStream(Pipeline*& pipeline, int objid, int generation,
f1f986
                               key.length());
f1f986
     }
f1f986
     heap.push_back(pipeline);
f1f986
+
f1f986
+#ifdef HAVE_GNUTLS
f1f986
+    gnutls_fips140_set_mode(static_cast<gnutls_fips_mode_t>(oldmode), GNUTLS_FIPS140_SET_MODE_THREAD);
f1f986
+#endif
f1f986
 }
f1f986
 
f1f986
 void