Upgrade to libxml 2.9.2 and libxslt 1.1.28

third_party/libxslt/libexslt/saxon.c

 #define IN_LIBEXSLT
 #include "libexslt/libexslt.h"
 
 #if defined(WIN32) && !defined (__CYGWIN__) && (!__MINGW32__)
 #include <win32config.h>
 #else
 #include "config.h"
 #endif
 
 #include <libxml/tree.h>
@@ skipping 162 matching lines @@
      if (nargs != 1) {
           xmlXPathSetArityError(ctxt);
           return;
      }
 
      exsltSaxonExpressionFunction(ctxt, 1);
      exsltSaxonEvalFunction(ctxt, 1);
 }
 
 /**
+ * exsltSaxonSystemIdFunction:
+ * @ctxt:  an XPath parser context
+ * @nargs: number of arguments
+ *
+ * Implements the SAXON systemId() function
+ *     string saxon:systemId ()
+ * This function returns the system ID of the document being styled.
+ */
+static void
+exsltSaxonSystemIdFunction(xmlXPathParserContextPtr ctxt, int nargs)
+{
+    if (ctxt == NULL)
+        return;
+    if (nargs != 0) {
+        xmlXPathSetArityError(ctxt);
+        return;
+    }
+
+    if ((ctxt->context) && (ctxt->context->doc) &&
+        (ctxt->context->doc->URL))
+        valuePush(ctxt, xmlXPathNewString(ctxt->context->doc->URL));
+    else
+        valuePush(ctxt, xmlXPathNewString(BAD_CAST ""));
+}
+
+/**
  * exsltSaxonLineNumberFunction:
  * @ctxt:  an XPath parser context
  * @nargs: number of arguments
- * 
+ *
  * Implements the SAXON line-number() function
  *     integer saxon:line-number()
  *
  * This returns the line number of the context node in the source document
  * within the entity that contains it. There are no arguments. If line numbers
  * are not maintained for the current document, the function returns -1. (To
  * ensure that line numbers are maintained, use the -l option on the command
  * line)
  *
  * The extension has been extended to have the following form:
@@ skipping 60 matching lines @@
                                    exsltSaxonExpressionFunction);
      xsltRegisterExtModuleFunction((const xmlChar *) "eval",
                                    SAXON_NAMESPACE,
                                    exsltSaxonEvalFunction);
      xsltRegisterExtModuleFunction((const xmlChar *) "evaluate",
                                    SAXON_NAMESPACE,
                                    exsltSaxonEvaluateFunction);
     xsltRegisterExtModuleFunction ((const xmlChar *) "line-number",
                                    SAXON_NAMESPACE,
                                    exsltSaxonLineNumberFunction);
+    xsltRegisterExtModuleFunction ((const xmlChar *) "systemId",
+                                   SAXON_NAMESPACE,
+                                   exsltSaxonSystemIdFunction);
 }