Coverage Report

Created: 2026-09-14 06:09

next uncovered line (L), next uncovered region (R), next uncovered branch (B)
/src/libxslt/libexslt/common.c
Line
Count
Source
1
#define IN_LIBEXSLT
2
#include "libexslt/libexslt.h"
3
4
#include <libxml/tree.h>
5
#include <libxml/xpath.h>
6
#include <libxml/xpathInternals.h>
7
8
#include <libxslt/xsltutils.h>
9
#include <libxslt/xsltInternals.h>
10
#include <libxslt/extensions.h>
11
#include <libxslt/transform.h>
12
#include <libxslt/extra.h>
13
#include <libxslt/preproc.h>
14
15
#include "exslt.h"
16
17
static void
18
11.8k
exsltNodeSetFunction (xmlXPathParserContextPtr ctxt, int nargs) {
19
11.8k
    if (nargs != 1) {
20
717
  xmlXPathSetArityError(ctxt);
21
717
  return;
22
717
    }
23
11.0k
    if (xmlXPathStackIsNodeSet (ctxt)) {
24
8.22k
  xsltFunctionNodeSet (ctxt, nargs);
25
8.22k
  return;
26
8.22k
    } else {
27
2.86k
  xmlDocPtr fragment;
28
2.86k
  xsltTransformContextPtr tctxt = xsltXPathGetTransformContext(ctxt);
29
2.86k
  xmlNodePtr txt;
30
2.86k
  xmlChar *strval;
31
2.86k
  xmlXPathObjectPtr obj;
32
  /*
33
  * SPEC EXSLT:
34
  * "You can also use this function to turn a string into a text
35
  * node, which is helpful if you want to pass a string to a
36
  * function that only accepts a node-set."
37
  */
38
2.86k
  fragment = xsltCreateRVT(tctxt);
39
2.86k
  if (fragment == NULL) {
40
4
      xsltTransformError(tctxt, NULL, tctxt->inst,
41
4
    "exsltNodeSetFunction: Failed to create a tree fragment.\n");
42
4
      tctxt->state = XSLT_STATE_STOPPED;
43
4
      return;
44
4
  }
45
2.86k
  xsltRegisterLocalRVT(tctxt, fragment);
46
47
2.86k
  strval = xmlXPathPopString (ctxt);
48
49
2.86k
  txt = xmlNewDocText (fragment, strval);
50
2.86k
  xmlAddChild((xmlNodePtr) fragment, txt);
51
2.86k
  obj = xmlXPathNewNodeSet(txt);
52
2.86k
  if (obj == NULL) {
53
37
      xsltTransformError(tctxt, NULL, tctxt->inst,
54
37
    "exsltNodeSetFunction: Failed to create a node set object.\n");
55
37
      tctxt->state = XSLT_STATE_STOPPED;
56
37
  }
57
2.86k
  if (strval != NULL)
58
2.85k
      xmlFree (strval);
59
60
2.86k
  valuePush (ctxt, obj);
61
2.86k
    }
62
11.0k
}
63
64
static void
65
117
exsltObjectTypeFunction (xmlXPathParserContextPtr ctxt, int nargs) {
66
117
    xmlXPathObjectPtr obj, ret;
67
68
117
    if (nargs != 1) {
69
1
  xmlXPathSetArityError(ctxt);
70
1
  return;
71
1
    }
72
73
116
    obj = valuePop(ctxt);
74
75
116
    switch (obj->type) {
76
9
    case XPATH_STRING:
77
9
  ret = xmlXPathNewCString("string");
78
9
  break;
79
40
    case XPATH_NUMBER:
80
40
  ret = xmlXPathNewCString("number");
81
40
  break;
82
50
    case XPATH_BOOLEAN:
83
50
  ret = xmlXPathNewCString("boolean");
84
50
  break;
85
16
    case XPATH_NODESET:
86
16
  ret = xmlXPathNewCString("node-set");
87
16
  break;
88
0
    case XPATH_XSLT_TREE:
89
0
  ret = xmlXPathNewCString("RTF");
90
0
  break;
91
1
    case XPATH_USERS:
92
1
  ret = xmlXPathNewCString("external");
93
1
  break;
94
0
    default:
95
0
  xsltGenericError(xsltGenericErrorContext,
96
0
    "object-type() invalid arg\n");
97
0
  ctxt->error = XPATH_INVALID_TYPE;
98
0
  xmlXPathFreeObject(obj);
99
0
  return;
100
116
    }
101
116
    xmlXPathFreeObject(obj);
102
116
    valuePush(ctxt, ret);
103
116
}
104
105
106
/**
107
 * exsltCommonRegister:
108
 *
109
 * Registers the EXSLT - Common module
110
 */
111
112
void
113
2
exsltCommonRegister (void) {
114
2
    xsltRegisterExtModuleFunction((const xmlChar *) "node-set",
115
2
          EXSLT_COMMON_NAMESPACE,
116
2
          exsltNodeSetFunction);
117
2
    xsltRegisterExtModuleFunction((const xmlChar *) "object-type",
118
2
          EXSLT_COMMON_NAMESPACE,
119
2
          exsltObjectTypeFunction);
120
2
    xsltRegisterExtModuleElement((const xmlChar *) "document",
121
2
         EXSLT_COMMON_NAMESPACE,
122
2
         xsltDocumentComp,
123
2
         xsltDocumentElem);
124
2
}