be687ea39859e5248e17f08f690ef6157ec51dd0
[reactos.git] / sdk / lib / 3rdparty / libxml2 / c14n.c
1 /*
2 * "Canonical XML" implementation
3 * http://www.w3.org/TR/xml-c14n
4 *
5 * "Exclusive XML Canonicalization" implementation
6 * http://www.w3.org/TR/xml-exc-c14n
7 *
8 * See Copyright for the status of this software.
9 *
10 * Author: Aleksey Sanin <aleksey@aleksey.com>
11 */
12 #define IN_LIBXML
13 #include "libxml.h"
14 #ifdef LIBXML_C14N_ENABLED
15 #ifdef LIBXML_OUTPUT_ENABLED
16
17 #ifdef HAVE_STDLIB_H
18 #include <stdlib.h>
19 #endif
20 #include <string.h>
21
22 #include <libxml/tree.h>
23 #include <libxml/parser.h>
24 #include <libxml/uri.h>
25 #include <libxml/xmlerror.h>
26 #include <libxml/globals.h>
27 #include <libxml/xpathInternals.h>
28 #include <libxml/c14n.h>
29
30 #include "buf.h"
31
32 /************************************************************************
33 * *
34 * Some declaration better left private ATM *
35 * *
36 ************************************************************************/
37
38 typedef enum {
39 XMLC14N_BEFORE_DOCUMENT_ELEMENT = 0,
40 XMLC14N_INSIDE_DOCUMENT_ELEMENT = 1,
41 XMLC14N_AFTER_DOCUMENT_ELEMENT = 2
42 } xmlC14NPosition;
43
44 typedef struct _xmlC14NVisibleNsStack {
45 int nsCurEnd; /* number of nodes in the set */
46 int nsPrevStart; /* the begginning of the stack for previous visible node */
47 int nsPrevEnd; /* the end of the stack for previous visible node */
48 int nsMax; /* size of the array as allocated */
49 xmlNsPtr *nsTab; /* array of ns in no particular order */
50 xmlNodePtr *nodeTab; /* array of nodes in no particular order */
51 } xmlC14NVisibleNsStack, *xmlC14NVisibleNsStackPtr;
52
53 typedef struct _xmlC14NCtx {
54 /* input parameters */
55 xmlDocPtr doc;
56 xmlC14NIsVisibleCallback is_visible_callback;
57 void* user_data;
58 int with_comments;
59 xmlOutputBufferPtr buf;
60
61 /* position in the XML document */
62 xmlC14NPosition pos;
63 int parent_is_doc;
64 xmlC14NVisibleNsStackPtr ns_rendered;
65
66 /* C14N mode */
67 xmlC14NMode mode;
68
69 /* exclusive canonicalization */
70 xmlChar **inclusive_ns_prefixes;
71
72 /* error number */
73 int error;
74 } xmlC14NCtx, *xmlC14NCtxPtr;
75
76 static xmlC14NVisibleNsStackPtr xmlC14NVisibleNsStackCreate (void);
77 static void xmlC14NVisibleNsStackDestroy (xmlC14NVisibleNsStackPtr cur);
78 static void xmlC14NVisibleNsStackAdd (xmlC14NVisibleNsStackPtr cur,
79 xmlNsPtr ns,
80 xmlNodePtr node);
81 static void xmlC14NVisibleNsStackSave (xmlC14NVisibleNsStackPtr cur,
82 xmlC14NVisibleNsStackPtr state);
83 static void xmlC14NVisibleNsStackRestore (xmlC14NVisibleNsStackPtr cur,
84 xmlC14NVisibleNsStackPtr state);
85 static void xmlC14NVisibleNsStackShift (xmlC14NVisibleNsStackPtr cur);
86 static int xmlC14NVisibleNsStackFind (xmlC14NVisibleNsStackPtr cur,
87 xmlNsPtr ns);
88 static int xmlExcC14NVisibleNsStackFind (xmlC14NVisibleNsStackPtr cur,
89 xmlNsPtr ns,
90 xmlC14NCtxPtr ctx);
91
92 static int xmlC14NIsNodeInNodeset (xmlNodeSetPtr nodes,
93 xmlNodePtr node,
94 xmlNodePtr parent);
95
96
97
98 static int xmlC14NProcessNode(xmlC14NCtxPtr ctx, xmlNodePtr cur);
99 static int xmlC14NProcessNodeList(xmlC14NCtxPtr ctx, xmlNodePtr cur);
100 typedef enum {
101 XMLC14N_NORMALIZE_ATTR = 0,
102 XMLC14N_NORMALIZE_COMMENT = 1,
103 XMLC14N_NORMALIZE_PI = 2,
104 XMLC14N_NORMALIZE_TEXT = 3
105 } xmlC14NNormalizationMode;
106
107 static xmlChar *xmlC11NNormalizeString(const xmlChar * input,
108 xmlC14NNormalizationMode mode);
109
110 #define xmlC11NNormalizeAttr( a ) \
111 xmlC11NNormalizeString((a), XMLC14N_NORMALIZE_ATTR)
112 #define xmlC11NNormalizeComment( a ) \
113 xmlC11NNormalizeString((a), XMLC14N_NORMALIZE_COMMENT)
114 #define xmlC11NNormalizePI( a ) \
115 xmlC11NNormalizeString((a), XMLC14N_NORMALIZE_PI)
116 #define xmlC11NNormalizeText( a ) \
117 xmlC11NNormalizeString((a), XMLC14N_NORMALIZE_TEXT)
118
119 #define xmlC14NIsVisible( ctx, node, parent ) \
120 (((ctx)->is_visible_callback != NULL) ? \
121 (ctx)->is_visible_callback((ctx)->user_data, \
122 (xmlNodePtr)(node), (xmlNodePtr)(parent)) : 1)
123
124 #define xmlC14NIsExclusive( ctx ) \
125 ( (ctx)->mode == XML_C14N_EXCLUSIVE_1_0 )
126
127 /************************************************************************
128 * *
129 * Some factorized error routines *
130 * *
131 ************************************************************************/
132
133 /**
134 * xmlC14NErrMemory:
135 * @extra: extra informations
136 *
137 * Handle a redefinition of memory error
138 */
139 static void
140 xmlC14NErrMemory(const char *extra)
141 {
142 __xmlRaiseError(NULL, NULL, NULL, NULL, NULL, XML_FROM_C14N,
143 XML_ERR_NO_MEMORY, XML_ERR_ERROR, NULL, 0, extra,
144 NULL, NULL, 0, 0,
145 "Memory allocation failed : %s\n", extra);
146 }
147
148 /**
149 * xmlC14NErrParam:
150 * @extra: extra informations
151 *
152 * Handle a redefinition of param error
153 */
154 static void
155 xmlC14NErrParam(const char *extra)
156 {
157 __xmlRaiseError(NULL, NULL, NULL, NULL, NULL, XML_FROM_C14N,
158 XML_ERR_INTERNAL_ERROR, XML_ERR_ERROR, NULL, 0, extra,
159 NULL, NULL, 0, 0,
160 "Invalid parameter : %s\n", extra);
161 }
162
163 /**
164 * xmlC14NErrInternal:
165 * @extra: extra informations
166 *
167 * Handle a redefinition of internal error
168 */
169 static void
170 xmlC14NErrInternal(const char *extra)
171 {
172 __xmlRaiseError(NULL, NULL, NULL, NULL, NULL, XML_FROM_C14N,
173 XML_ERR_INTERNAL_ERROR, XML_ERR_ERROR, NULL, 0, extra,
174 NULL, NULL, 0, 0,
175 "Internal error : %s\n", extra);
176 }
177
178 /**
179 * xmlC14NErrInvalidNode:
180 * @extra: extra informations
181 *
182 * Handle a redefinition of invalid node error
183 */
184 static void
185 xmlC14NErrInvalidNode(const char *node_type, const char *extra)
186 {
187 __xmlRaiseError(NULL, NULL, NULL, NULL, NULL, XML_FROM_C14N,
188 XML_C14N_INVALID_NODE, XML_ERR_ERROR, NULL, 0, extra,
189 NULL, NULL, 0, 0,
190 "Node %s is invalid here : %s\n", node_type, extra);
191 }
192
193 /**
194 * xmlC14NErrUnknownNode:
195 * @extra: extra informations
196 *
197 * Handle a redefinition of unknown node error
198 */
199 static void
200 xmlC14NErrUnknownNode(int node_type, const char *extra)
201 {
202 __xmlRaiseError(NULL, NULL, NULL, NULL, NULL, XML_FROM_C14N,
203 XML_C14N_UNKNOW_NODE, XML_ERR_ERROR, NULL, 0, extra,
204 NULL, NULL, 0, 0,
205 "Unknown node type %d found : %s\n", node_type, extra);
206 }
207
208 /**
209 * xmlC14NErrRelativeNamespace:
210 * @extra: extra informations
211 *
212 * Handle a redefinition of relative namespace error
213 */
214 static void
215 xmlC14NErrRelativeNamespace(const char *ns_uri)
216 {
217 __xmlRaiseError(NULL, NULL, NULL, NULL, NULL, XML_FROM_C14N,
218 XML_C14N_RELATIVE_NAMESPACE, XML_ERR_ERROR, NULL, 0, NULL,
219 NULL, NULL, 0, 0,
220 "Relative namespace UR is invalid here : %s\n", ns_uri);
221 }
222
223
224
225 /**
226 * xmlC14NErr:
227 * @ctxt: a C14N evaluation context
228 * @node: the context node
229 * @error: the erorr code
230 * @msg: the message
231 * @extra: extra informations
232 *
233 * Handle a redefinition of attribute error
234 */
235 static void
236 xmlC14NErr(xmlC14NCtxPtr ctxt, xmlNodePtr node, int error,
237 const char * msg)
238 {
239 if (ctxt != NULL)
240 ctxt->error = error;
241 __xmlRaiseError(NULL, NULL, NULL,
242 ctxt, node, XML_FROM_C14N, error,
243 XML_ERR_ERROR, NULL, 0,
244 NULL, NULL, NULL, 0, 0, "%s", msg);
245 }
246
247 /************************************************************************
248 * *
249 * The implementation internals *
250 * *
251 ************************************************************************/
252 #define XML_NAMESPACES_DEFAULT 16
253
254 static int
255 xmlC14NIsNodeInNodeset(xmlNodeSetPtr nodes, xmlNodePtr node, xmlNodePtr parent) {
256 if((nodes != NULL) && (node != NULL)) {
257 if(node->type != XML_NAMESPACE_DECL) {
258 return(xmlXPathNodeSetContains(nodes, node));
259 } else {
260 xmlNs ns;
261
262 memcpy(&ns, node, sizeof(ns));
263
264 /* this is a libxml hack! check xpath.c for details */
265 if((parent != NULL) && (parent->type == XML_ATTRIBUTE_NODE)) {
266 ns.next = (xmlNsPtr)parent->parent;
267 } else {
268 ns.next = (xmlNsPtr)parent;
269 }
270
271 /*
272 * If the input is an XPath node-set, then the node-set must explicitly
273 * contain every node to be rendered to the canonical form.
274 */
275 return(xmlXPathNodeSetContains(nodes, (xmlNodePtr)&ns));
276 }
277 }
278 return(1);
279 }
280
281 static xmlC14NVisibleNsStackPtr
282 xmlC14NVisibleNsStackCreate(void) {
283 xmlC14NVisibleNsStackPtr ret;
284
285 ret = (xmlC14NVisibleNsStackPtr) xmlMalloc(sizeof(xmlC14NVisibleNsStack));
286 if (ret == NULL) {
287 xmlC14NErrMemory("creating namespaces stack");
288 return(NULL);
289 }
290 memset(ret, 0 , (size_t) sizeof(xmlC14NVisibleNsStack));
291 return(ret);
292 }
293
294 static void
295 xmlC14NVisibleNsStackDestroy(xmlC14NVisibleNsStackPtr cur) {
296 if(cur == NULL) {
297 xmlC14NErrParam("destroying namespaces stack");
298 return;
299 }
300 if(cur->nsTab != NULL) {
301 memset(cur->nsTab, 0, cur->nsMax * sizeof(xmlNsPtr));
302 xmlFree(cur->nsTab);
303 }
304 if(cur->nodeTab != NULL) {
305 memset(cur->nodeTab, 0, cur->nsMax * sizeof(xmlNodePtr));
306 xmlFree(cur->nodeTab);
307 }
308 memset(cur, 0, sizeof(xmlC14NVisibleNsStack));
309 xmlFree(cur);
310
311 }
312
313 static void
314 xmlC14NVisibleNsStackAdd(xmlC14NVisibleNsStackPtr cur, xmlNsPtr ns, xmlNodePtr node) {
315 if((cur == NULL) ||
316 ((cur->nsTab == NULL) && (cur->nodeTab != NULL)) ||
317 ((cur->nsTab != NULL) && (cur->nodeTab == NULL))) {
318 xmlC14NErrParam("adding namespace to stack");
319 return;
320 }
321
322 if ((cur->nsTab == NULL) && (cur->nodeTab == NULL)) {
323 cur->nsTab = (xmlNsPtr*) xmlMalloc(XML_NAMESPACES_DEFAULT * sizeof(xmlNsPtr));
324 cur->nodeTab = (xmlNodePtr*) xmlMalloc(XML_NAMESPACES_DEFAULT * sizeof(xmlNodePtr));
325 if ((cur->nsTab == NULL) || (cur->nodeTab == NULL)) {
326 xmlC14NErrMemory("adding node to stack");
327 return;
328 }
329 memset(cur->nsTab, 0 , XML_NAMESPACES_DEFAULT * sizeof(xmlNsPtr));
330 memset(cur->nodeTab, 0 , XML_NAMESPACES_DEFAULT * sizeof(xmlNodePtr));
331 cur->nsMax = XML_NAMESPACES_DEFAULT;
332 } else if(cur->nsMax == cur->nsCurEnd) {
333 void *tmp;
334 int tmpSize;
335
336 tmpSize = 2 * cur->nsMax;
337 tmp = xmlRealloc(cur->nsTab, tmpSize * sizeof(xmlNsPtr));
338 if (tmp == NULL) {
339 xmlC14NErrMemory("adding node to stack");
340 return;
341 }
342 cur->nsTab = (xmlNsPtr*)tmp;
343
344 tmp = xmlRealloc(cur->nodeTab, tmpSize * sizeof(xmlNodePtr));
345 if (tmp == NULL) {
346 xmlC14NErrMemory("adding node to stack");
347 return;
348 }
349 cur->nodeTab = (xmlNodePtr*)tmp;
350
351 cur->nsMax = tmpSize;
352 }
353 cur->nsTab[cur->nsCurEnd] = ns;
354 cur->nodeTab[cur->nsCurEnd] = node;
355
356 ++cur->nsCurEnd;
357 }
358
359 static void
360 xmlC14NVisibleNsStackSave(xmlC14NVisibleNsStackPtr cur, xmlC14NVisibleNsStackPtr state) {
361 if((cur == NULL) || (state == NULL)) {
362 xmlC14NErrParam("saving namespaces stack");
363 return;
364 }
365
366 state->nsCurEnd = cur->nsCurEnd;
367 state->nsPrevStart = cur->nsPrevStart;
368 state->nsPrevEnd = cur->nsPrevEnd;
369 }
370
371 static void
372 xmlC14NVisibleNsStackRestore(xmlC14NVisibleNsStackPtr cur, xmlC14NVisibleNsStackPtr state) {
373 if((cur == NULL) || (state == NULL)) {
374 xmlC14NErrParam("restoring namespaces stack");
375 return;
376 }
377 cur->nsCurEnd = state->nsCurEnd;
378 cur->nsPrevStart = state->nsPrevStart;
379 cur->nsPrevEnd = state->nsPrevEnd;
380 }
381
382 static void
383 xmlC14NVisibleNsStackShift(xmlC14NVisibleNsStackPtr cur) {
384 if(cur == NULL) {
385 xmlC14NErrParam("shifting namespaces stack");
386 return;
387 }
388 cur->nsPrevStart = cur->nsPrevEnd;
389 cur->nsPrevEnd = cur->nsCurEnd;
390 }
391
392 static int
393 xmlC14NStrEqual(const xmlChar *str1, const xmlChar *str2) {
394 if (str1 == str2) return(1);
395 if (str1 == NULL) return((*str2) == '\0');
396 if (str2 == NULL) return((*str1) == '\0');
397 do {
398 if (*str1++ != *str2) return(0);
399 } while (*str2++);
400 return(1);
401 }
402
403 /**
404 * xmlC14NVisibleNsStackFind:
405 * @ctx: the C14N context
406 * @ns: the namespace to check
407 *
408 * Checks whether the given namespace was already rendered or not
409 *
410 * Returns 1 if we already wrote this namespace or 0 otherwise
411 */
412 static int
413 xmlC14NVisibleNsStackFind(xmlC14NVisibleNsStackPtr cur, xmlNsPtr ns)
414 {
415 int i;
416 const xmlChar *prefix;
417 const xmlChar *href;
418 int has_empty_ns;
419
420 if(cur == NULL) {
421 xmlC14NErrParam("searching namespaces stack (c14n)");
422 return (0);
423 }
424
425 /*
426 * if the default namespace xmlns="" is not defined yet then
427 * we do not want to print it out
428 */
429 prefix = ((ns == NULL) || (ns->prefix == NULL)) ? BAD_CAST "" : ns->prefix;
430 href = ((ns == NULL) || (ns->href == NULL)) ? BAD_CAST "" : ns->href;
431 has_empty_ns = (xmlC14NStrEqual(prefix, NULL) && xmlC14NStrEqual(href, NULL));
432
433 if (cur->nsTab != NULL) {
434 int start = (has_empty_ns) ? 0 : cur->nsPrevStart;
435 for (i = cur->nsCurEnd - 1; i >= start; --i) {
436 xmlNsPtr ns1 = cur->nsTab[i];
437
438 if(xmlC14NStrEqual(prefix, (ns1 != NULL) ? ns1->prefix : NULL)) {
439 return(xmlC14NStrEqual(href, (ns1 != NULL) ? ns1->href : NULL));
440 }
441 }
442 }
443 return(has_empty_ns);
444 }
445
446 static int
447 xmlExcC14NVisibleNsStackFind(xmlC14NVisibleNsStackPtr cur, xmlNsPtr ns, xmlC14NCtxPtr ctx) {
448 int i;
449 const xmlChar *prefix;
450 const xmlChar *href;
451 int has_empty_ns;
452
453 if(cur == NULL) {
454 xmlC14NErrParam("searching namespaces stack (exc c14n)");
455 return (0);
456 }
457
458 /*
459 * if the default namespace xmlns="" is not defined yet then
460 * we do not want to print it out
461 */
462 prefix = ((ns == NULL) || (ns->prefix == NULL)) ? BAD_CAST "" : ns->prefix;
463 href = ((ns == NULL) || (ns->href == NULL)) ? BAD_CAST "" : ns->href;
464 has_empty_ns = (xmlC14NStrEqual(prefix, NULL) && xmlC14NStrEqual(href, NULL));
465
466 if (cur->nsTab != NULL) {
467 int start = 0;
468 for (i = cur->nsCurEnd - 1; i >= start; --i) {
469 xmlNsPtr ns1 = cur->nsTab[i];
470
471 if(xmlC14NStrEqual(prefix, (ns1 != NULL) ? ns1->prefix : NULL)) {
472 if(xmlC14NStrEqual(href, (ns1 != NULL) ? ns1->href : NULL)) {
473 return(xmlC14NIsVisible(ctx, ns1, cur->nodeTab[i]));
474 } else {
475 return(0);
476 }
477 }
478 }
479 }
480 return(has_empty_ns);
481 }
482
483
484
485
486 /**
487 * xmlC14NIsXmlNs:
488 * @ns: the namespace to check
489 *
490 * Checks whether the given namespace is a default "xml:" namespace
491 * with href="http://www.w3.org/XML/1998/namespace"
492 *
493 * Returns 1 if the node is default or 0 otherwise
494 */
495
496 /* todo: make it a define? */
497 static int
498 xmlC14NIsXmlNs(xmlNsPtr ns)
499 {
500 return ((ns != NULL) &&
501 (xmlStrEqual(ns->prefix, BAD_CAST "xml")) &&
502 (xmlStrEqual(ns->href, XML_XML_NAMESPACE)));
503 }
504
505
506 /**
507 * xmlC14NNsCompare:
508 * @ns1: the pointer to first namespace
509 * @ns2: the pointer to second namespace
510 *
511 * Compares the namespaces by names (prefixes).
512 *
513 * Returns -1 if ns1 < ns2, 0 if ns1 == ns2 or 1 if ns1 > ns2.
514 */
515 static int
516 xmlC14NNsCompare(xmlNsPtr ns1, xmlNsPtr ns2)
517 {
518 if (ns1 == ns2)
519 return (0);
520 if (ns1 == NULL)
521 return (-1);
522 if (ns2 == NULL)
523 return (1);
524
525 return (xmlStrcmp(ns1->prefix, ns2->prefix));
526 }
527
528
529 /**
530 * xmlC14NPrintNamespaces:
531 * @ns: the pointer to namespace
532 * @ctx: the C14N context
533 *
534 * Prints the given namespace to the output buffer from C14N context.
535 *
536 * Returns 1 on success or 0 on fail.
537 */
538 static int
539 xmlC14NPrintNamespaces(const xmlNsPtr ns, xmlC14NCtxPtr ctx)
540 {
541
542 if ((ns == NULL) || (ctx == NULL)) {
543 xmlC14NErrParam("writing namespaces");
544 return 0;
545 }
546
547 if (ns->prefix != NULL) {
548 xmlOutputBufferWriteString(ctx->buf, " xmlns:");
549 xmlOutputBufferWriteString(ctx->buf, (const char *) ns->prefix);
550 xmlOutputBufferWriteString(ctx->buf, "=");
551 } else {
552 xmlOutputBufferWriteString(ctx->buf, " xmlns=");
553 }
554 if(ns->href != NULL) {
555 xmlBufWriteQuotedString(ctx->buf->buffer, ns->href);
556 } else {
557 xmlOutputBufferWriteString(ctx->buf, "\"\"");
558 }
559 return (1);
560 }
561
562 /**
563 * xmlC14NProcessNamespacesAxis:
564 * @ctx: the C14N context
565 * @node: the current node
566 *
567 * Prints out canonical namespace axis of the current node to the
568 * buffer from C14N context as follows
569 *
570 * Canonical XML v 1.0 (http://www.w3.org/TR/xml-c14n)
571 *
572 * Namespace Axis
573 * Consider a list L containing only namespace nodes in the
574 * axis and in the node-set in lexicographic order (ascending). To begin
575 * processing L, if the first node is not the default namespace node (a node
576 * with no namespace URI and no local name), then generate a space followed
577 * by xmlns="" if and only if the following conditions are met:
578 * - the element E that owns the axis is in the node-set
579 * - The nearest ancestor element of E in the node-set has a default
580 * namespace node in the node-set (default namespace nodes always
581 * have non-empty values in XPath)
582 * The latter condition eliminates unnecessary occurrences of xmlns="" in
583 * the canonical form since an element only receives an xmlns="" if its
584 * default namespace is empty and if it has an immediate parent in the
585 * canonical form that has a non-empty default namespace. To finish
586 * processing L, simply process every namespace node in L, except omit
587 * namespace node with local name xml, which defines the xml prefix,
588 * if its string value is http://www.w3.org/XML/1998/namespace.
589 *
590 * Exclusive XML Canonicalization v 1.0 (http://www.w3.org/TR/xml-exc-c14n)
591 * Canonical XML applied to a document subset requires the search of the
592 * ancestor nodes of each orphan element node for attributes in the xml
593 * namespace, such as xml:lang and xml:space. These are copied into the
594 * element node except if a declaration of the same attribute is already
595 * in the attribute axis of the element (whether or not it is included in
596 * the document subset). This search and copying are omitted from the
597 * Exclusive XML Canonicalization method.
598 *
599 * Returns 0 on success or -1 on fail.
600 */
601 static int
602 xmlC14NProcessNamespacesAxis(xmlC14NCtxPtr ctx, xmlNodePtr cur, int visible)
603 {
604 xmlNodePtr n;
605 xmlNsPtr ns, tmp;
606 xmlListPtr list;
607 int already_rendered;
608 int has_empty_ns = 0;
609
610 if ((ctx == NULL) || (cur == NULL) || (cur->type != XML_ELEMENT_NODE)) {
611 xmlC14NErrParam("processing namespaces axis (c14n)");
612 return (-1);
613 }
614
615 /*
616 * Create a sorted list to store element namespaces
617 */
618 list = xmlListCreate(NULL, (xmlListDataCompare) xmlC14NNsCompare);
619 if (list == NULL) {
620 xmlC14NErrInternal("creating namespaces list (c14n)");
621 return (-1);
622 }
623
624 /* check all namespaces */
625 for(n = cur; n != NULL; n = n->parent) {
626 for(ns = n->nsDef; ns != NULL; ns = ns->next) {
627 tmp = xmlSearchNs(cur->doc, cur, ns->prefix);
628
629 if((tmp == ns) && !xmlC14NIsXmlNs(ns) && xmlC14NIsVisible(ctx, ns, cur)) {
630 already_rendered = xmlC14NVisibleNsStackFind(ctx->ns_rendered, ns);
631 if(visible) {
632 xmlC14NVisibleNsStackAdd(ctx->ns_rendered, ns, cur);
633 }
634 if(!already_rendered) {
635 xmlListInsert(list, ns);
636 }
637 if(xmlStrlen(ns->prefix) == 0) {
638 has_empty_ns = 1;
639 }
640 }
641 }
642 }
643
644 /**
645 * if the first node is not the default namespace node (a node with no
646 * namespace URI and no local name), then generate a space followed by
647 * xmlns="" if and only if the following conditions are met:
648 * - the element E that owns the axis is in the node-set
649 * - the nearest ancestor element of E in the node-set has a default
650 * namespace node in the node-set (default namespace nodes always
651 * have non-empty values in XPath)
652 */
653 if(visible && !has_empty_ns) {
654 static xmlNs ns_default;
655
656 memset(&ns_default, 0, sizeof(ns_default));
657 if(!xmlC14NVisibleNsStackFind(ctx->ns_rendered, &ns_default)) {
658 xmlC14NPrintNamespaces(&ns_default, ctx);
659 }
660 }
661
662
663 /*
664 * print out all elements from list
665 */
666 xmlListWalk(list, (xmlListWalker) xmlC14NPrintNamespaces, (const void *) ctx);
667
668 /*
669 * Cleanup
670 */
671 xmlListDelete(list);
672 return (0);
673 }
674
675
676 /**
677 * xmlExcC14NProcessNamespacesAxis:
678 * @ctx: the C14N context
679 * @node: the current node
680 *
681 * Prints out exclusive canonical namespace axis of the current node to the
682 * buffer from C14N context as follows
683 *
684 * Exclusive XML Canonicalization
685 * http://www.w3.org/TR/xml-exc-c14n
686 *
687 * If the element node is in the XPath subset then output the node in
688 * accordance with Canonical XML except for namespace nodes which are
689 * rendered as follows:
690 *
691 * 1. Render each namespace node iff:
692 * * it is visibly utilized by the immediate parent element or one of
693 * its attributes, or is present in InclusiveNamespaces PrefixList, and
694 * * its prefix and value do not appear in ns_rendered. ns_rendered is
695 * obtained by popping the state stack in order to obtain a list of
696 * prefixes and their values which have already been rendered by
697 * an output ancestor of the namespace node's parent element.
698 * 2. Append the rendered namespace node to the list ns_rendered of namespace
699 * nodes rendered by output ancestors. Push ns_rendered on state stack and
700 * recurse.
701 * 3. After the recursion returns, pop thestate stack.
702 *
703 *
704 * Returns 0 on success or -1 on fail.
705 */
706 static int
707 xmlExcC14NProcessNamespacesAxis(xmlC14NCtxPtr ctx, xmlNodePtr cur, int visible)
708 {
709 xmlNsPtr ns;
710 xmlListPtr list;
711 xmlAttrPtr attr;
712 int already_rendered;
713 int has_empty_ns = 0;
714 int has_visibly_utilized_empty_ns = 0;
715 int has_empty_ns_in_inclusive_list = 0;
716
717 if ((ctx == NULL) || (cur == NULL) || (cur->type != XML_ELEMENT_NODE)) {
718 xmlC14NErrParam("processing namespaces axis (exc c14n)");
719 return (-1);
720 }
721
722 if(!xmlC14NIsExclusive(ctx)) {
723 xmlC14NErrParam("processing namespaces axis (exc c14n)");
724 return (-1);
725
726 }
727
728 /*
729 * Create a sorted list to store element namespaces
730 */
731 list = xmlListCreate(NULL, (xmlListDataCompare) xmlC14NNsCompare);
732 if (list == NULL) {
733 xmlC14NErrInternal("creating namespaces list (exc c14n)");
734 return (-1);
735 }
736
737 /*
738 * process inclusive namespaces:
739 * All namespace nodes appearing on inclusive ns list are
740 * handled as provided in Canonical XML
741 */
742 if(ctx->inclusive_ns_prefixes != NULL) {
743 xmlChar *prefix;
744 int i;
745
746 for (i = 0; ctx->inclusive_ns_prefixes[i] != NULL; ++i) {
747 prefix = ctx->inclusive_ns_prefixes[i];
748 /*
749 * Special values for namespace with empty prefix
750 */
751 if (xmlStrEqual(prefix, BAD_CAST "#default")
752 || xmlStrEqual(prefix, BAD_CAST "")) {
753 prefix = NULL;
754 has_empty_ns_in_inclusive_list = 1;
755 }
756
757 ns = xmlSearchNs(cur->doc, cur, prefix);
758 if((ns != NULL) && !xmlC14NIsXmlNs(ns) && xmlC14NIsVisible(ctx, ns, cur)) {
759 already_rendered = xmlC14NVisibleNsStackFind(ctx->ns_rendered, ns);
760 if(visible) {
761 xmlC14NVisibleNsStackAdd(ctx->ns_rendered, ns, cur);
762 }
763 if(!already_rendered) {
764 xmlListInsert(list, ns);
765 }
766 if(xmlStrlen(ns->prefix) == 0) {
767 has_empty_ns = 1;
768 }
769 }
770 }
771 }
772
773 /* add node namespace */
774 if(cur->ns != NULL) {
775 ns = cur->ns;
776 } else {
777 ns = xmlSearchNs(cur->doc, cur, NULL);
778 has_visibly_utilized_empty_ns = 1;
779 }
780 if((ns != NULL) && !xmlC14NIsXmlNs(ns)) {
781 if(visible && xmlC14NIsVisible(ctx, ns, cur)) {
782 if(!xmlExcC14NVisibleNsStackFind(ctx->ns_rendered, ns, ctx)) {
783 xmlListInsert(list, ns);
784 }
785 }
786 if(visible) {
787 xmlC14NVisibleNsStackAdd(ctx->ns_rendered, ns, cur);
788 }
789 if(xmlStrlen(ns->prefix) == 0) {
790 has_empty_ns = 1;
791 }
792 }
793
794
795 /* add attributes */
796 for(attr = cur->properties; attr != NULL; attr = attr->next) {
797 /*
798 * we need to check that attribute is visible and has non
799 * default namespace (XML Namespaces: "default namespaces
800 * do not apply directly to attributes")
801 */
802 if((attr->ns != NULL) && !xmlC14NIsXmlNs(attr->ns) && xmlC14NIsVisible(ctx, attr, cur)) {
803 already_rendered = xmlExcC14NVisibleNsStackFind(ctx->ns_rendered, attr->ns, ctx);
804 xmlC14NVisibleNsStackAdd(ctx->ns_rendered, attr->ns, cur);
805 if(!already_rendered && visible) {
806 xmlListInsert(list, attr->ns);
807 }
808 if(xmlStrlen(attr->ns->prefix) == 0) {
809 has_empty_ns = 1;
810 }
811 } else if((attr->ns != NULL) && (xmlStrlen(attr->ns->prefix) == 0) && (xmlStrlen(attr->ns->href) == 0)) {
812 has_visibly_utilized_empty_ns = 1;
813 }
814 }
815
816 /*
817 * Process xmlns=""
818 */
819 if(visible && has_visibly_utilized_empty_ns &&
820 !has_empty_ns && !has_empty_ns_in_inclusive_list) {
821 static xmlNs ns_default;
822
823 memset(&ns_default, 0, sizeof(ns_default));
824
825 already_rendered = xmlExcC14NVisibleNsStackFind(ctx->ns_rendered, &ns_default, ctx);
826 if(!already_rendered) {
827 xmlC14NPrintNamespaces(&ns_default, ctx);
828 }
829 } else if(visible && !has_empty_ns && has_empty_ns_in_inclusive_list) {
830 static xmlNs ns_default;
831
832 memset(&ns_default, 0, sizeof(ns_default));
833 if(!xmlC14NVisibleNsStackFind(ctx->ns_rendered, &ns_default)) {
834 xmlC14NPrintNamespaces(&ns_default, ctx);
835 }
836 }
837
838
839
840 /*
841 * print out all elements from list
842 */
843 xmlListWalk(list, (xmlListWalker) xmlC14NPrintNamespaces, (const void *) ctx);
844
845 /*
846 * Cleanup
847 */
848 xmlListDelete(list);
849 return (0);
850 }
851
852
853 /**
854 * xmlC14NIsXmlAttr:
855 * @attr: the attr to check
856 *
857 * Checks whether the given attribute is a default "xml:" namespace
858 * with href="http://www.w3.org/XML/1998/namespace"
859 *
860 * Returns 1 if the node is default or 0 otherwise
861 */
862
863 /* todo: make it a define? */
864 static int
865 xmlC14NIsXmlAttr(xmlAttrPtr attr)
866 {
867 return ((attr->ns != NULL) &&
868 (xmlC14NIsXmlNs(attr->ns) != 0));
869 }
870
871
872 /**
873 * xmlC14NAttrsCompare:
874 * @attr1: the pointer tls o first attr
875 * @attr2: the pointer to second attr
876 *
877 * Prints the given attribute to the output buffer from C14N context.
878 *
879 * Returns -1 if attr1 < attr2, 0 if attr1 == attr2 or 1 if attr1 > attr2.
880 */
881 static int
882 xmlC14NAttrsCompare(xmlAttrPtr attr1, xmlAttrPtr attr2)
883 {
884 int ret = 0;
885
886 /*
887 * Simple cases
888 */
889 if (attr1 == attr2)
890 return (0);
891 if (attr1 == NULL)
892 return (-1);
893 if (attr2 == NULL)
894 return (1);
895 if (attr1->ns == attr2->ns) {
896 return (xmlStrcmp(attr1->name, attr2->name));
897 }
898
899 /*
900 * Attributes in the default namespace are first
901 * because the default namespace is not applied to
902 * unqualified attributes
903 */
904 if (attr1->ns == NULL)
905 return (-1);
906 if (attr2->ns == NULL)
907 return (1);
908 if (attr1->ns->prefix == NULL)
909 return (-1);
910 if (attr2->ns->prefix == NULL)
911 return (1);
912
913 ret = xmlStrcmp(attr1->ns->href, attr2->ns->href);
914 if (ret == 0) {
915 ret = xmlStrcmp(attr1->name, attr2->name);
916 }
917 return (ret);
918 }
919
920
921 /**
922 * xmlC14NPrintAttrs:
923 * @attr: the pointer to attr
924 * @ctx: the C14N context
925 *
926 * Prints out canonical attribute urrent node to the
927 * buffer from C14N context as follows
928 *
929 * Canonical XML v 1.0 (http://www.w3.org/TR/xml-c14n)
930 *
931 * Returns 1 on success or 0 on fail.
932 */
933 static int
934 xmlC14NPrintAttrs(const xmlAttrPtr attr, xmlC14NCtxPtr ctx)
935 {
936 xmlChar *value;
937 xmlChar *buffer;
938
939 if ((attr == NULL) || (ctx == NULL)) {
940 xmlC14NErrParam("writing attributes");
941 return (0);
942 }
943
944 xmlOutputBufferWriteString(ctx->buf, " ");
945 if (attr->ns != NULL && xmlStrlen(attr->ns->prefix) > 0) {
946 xmlOutputBufferWriteString(ctx->buf,
947 (const char *) attr->ns->prefix);
948 xmlOutputBufferWriteString(ctx->buf, ":");
949 }
950 xmlOutputBufferWriteString(ctx->buf, (const char *) attr->name);
951 xmlOutputBufferWriteString(ctx->buf, "=\"");
952
953 value = xmlNodeListGetString(ctx->doc, attr->children, 1);
954 /* todo: should we log an error if value==NULL ? */
955 if (value != NULL) {
956 buffer = xmlC11NNormalizeAttr(value);
957 xmlFree(value);
958 if (buffer != NULL) {
959 xmlOutputBufferWriteString(ctx->buf, (const char *) buffer);
960 xmlFree(buffer);
961 } else {
962 xmlC14NErrInternal("normalizing attributes axis");
963 return (0);
964 }
965 }
966 xmlOutputBufferWriteString(ctx->buf, "\"");
967 return (1);
968 }
969
970 /**
971 * xmlC14NFindHiddenParentAttr:
972 *
973 * Finds an attribute in a hidden parent node.
974 *
975 * Returns a pointer to the attribute node (if found) or NULL otherwise.
976 */
977 static xmlAttrPtr
978 xmlC14NFindHiddenParentAttr(xmlC14NCtxPtr ctx, xmlNodePtr cur, const xmlChar * name, const xmlChar * ns)
979 {
980 xmlAttrPtr res;
981 while((cur != NULL) && (!xmlC14NIsVisible(ctx, cur, cur->parent))) {
982 res = xmlHasNsProp(cur, name, ns);
983 if(res != NULL) {
984 return res;
985 }
986
987 cur = cur->parent;
988 }
989
990 return NULL;
991 }
992
993 /**
994 * xmlC14NFixupBaseAttr:
995 *
996 * Fixes up the xml:base attribute
997 *
998 * Returns the newly created attribute or NULL
999 */
1000 static xmlAttrPtr
1001 xmlC14NFixupBaseAttr(xmlC14NCtxPtr ctx, xmlAttrPtr xml_base_attr)
1002 {
1003 xmlChar * res = NULL;
1004 xmlNodePtr cur;
1005 xmlAttrPtr attr;
1006 xmlChar * tmp_str;
1007 xmlChar * tmp_str2;
1008 int tmp_str_len;
1009
1010 if ((ctx == NULL) || (xml_base_attr == NULL) || (xml_base_attr->parent == NULL)) {
1011 xmlC14NErrParam("processing xml:base attribute");
1012 return (NULL);
1013 }
1014
1015 /* start from current value */
1016 res = xmlNodeListGetString(ctx->doc, xml_base_attr->children, 1);
1017 if(res == NULL) {
1018 xmlC14NErrInternal("processing xml:base attribute - can't get attr value");
1019 return (NULL);
1020 }
1021
1022 /* go up the stack until we find a node that we rendered already */
1023 cur = xml_base_attr->parent->parent;
1024 while((cur != NULL) && (!xmlC14NIsVisible(ctx, cur, cur->parent))) {
1025 attr = xmlHasNsProp(cur, BAD_CAST "base", XML_XML_NAMESPACE);
1026 if(attr != NULL) {
1027 /* get attr value */
1028 tmp_str = xmlNodeListGetString(ctx->doc, attr->children, 1);
1029 if(tmp_str == NULL) {
1030 xmlFree(res);
1031
1032 xmlC14NErrInternal("processing xml:base attribute - can't get attr value");
1033 return (NULL);
1034 }
1035
1036 /* we need to add '/' if our current base uri ends with '..' or '.'
1037 to ensure that we are forced to go "up" all the time */
1038 tmp_str_len = xmlStrlen(tmp_str);
1039 if(tmp_str_len > 1 && tmp_str[tmp_str_len - 2] == '.') {
1040 tmp_str2 = xmlStrcat(tmp_str, BAD_CAST "/");
1041 if(tmp_str2 == NULL) {
1042 xmlFree(tmp_str);
1043 xmlFree(res);
1044
1045 xmlC14NErrInternal("processing xml:base attribute - can't modify uri");
1046 return (NULL);
1047 }
1048
1049 tmp_str = tmp_str2;
1050 }
1051
1052 /* build uri */
1053 tmp_str2 = xmlBuildURI(res, tmp_str);
1054 if(tmp_str2 == NULL) {
1055 xmlFree(tmp_str);
1056 xmlFree(res);
1057
1058 xmlC14NErrInternal("processing xml:base attribute - can't construct uri");
1059 return (NULL);
1060 }
1061
1062 /* cleanup and set the new res */
1063 xmlFree(tmp_str);
1064 xmlFree(res);
1065 res = tmp_str2;
1066 }
1067
1068 /* next */
1069 cur = cur->parent;
1070 }
1071
1072 /* check if result uri is empty or not */
1073 if((res == NULL) || xmlStrEqual(res, BAD_CAST "")) {
1074 xmlFree(res);
1075 return (NULL);
1076 }
1077
1078 /* create and return the new attribute node */
1079 attr = xmlNewNsProp(NULL, xml_base_attr->ns, BAD_CAST "base", res);
1080 if(attr == NULL) {
1081 xmlFree(res);
1082
1083 xmlC14NErrInternal("processing xml:base attribute - can't construct attribute");
1084 return (NULL);
1085 }
1086
1087 /* done */
1088 xmlFree(res);
1089 return (attr);
1090 }
1091
1092 /**
1093 * xmlC14NProcessAttrsAxis:
1094 * @ctx: the C14N context
1095 * @cur: the current node
1096 * @parent_visible: the visibility of parent node
1097 * @all_parents_visible: the visibility of all parent nodes
1098 *
1099 * Prints out canonical attribute axis of the current node to the
1100 * buffer from C14N context as follows
1101 *
1102 * Canonical XML v 1.0 (http://www.w3.org/TR/xml-c14n)
1103 *
1104 * Attribute Axis
1105 * In lexicographic order (ascending), process each node that
1106 * is in the element's attribute axis and in the node-set.
1107 *
1108 * The processing of an element node E MUST be modified slightly
1109 * when an XPath node-set is given as input and the element's
1110 * parent is omitted from the node-set.
1111 *
1112 *
1113 * Exclusive XML Canonicalization v 1.0 (http://www.w3.org/TR/xml-exc-c14n)
1114 *
1115 * Canonical XML applied to a document subset requires the search of the
1116 * ancestor nodes of each orphan element node for attributes in the xml
1117 * namespace, such as xml:lang and xml:space. These are copied into the
1118 * element node except if a declaration of the same attribute is already
1119 * in the attribute axis of the element (whether or not it is included in
1120 * the document subset). This search and copying are omitted from the
1121 * Exclusive XML Canonicalization method.
1122 *
1123 * Returns 0 on success or -1 on fail.
1124 */
1125 static int
1126 xmlC14NProcessAttrsAxis(xmlC14NCtxPtr ctx, xmlNodePtr cur, int parent_visible)
1127 {
1128 xmlAttrPtr attr;
1129 xmlListPtr list;
1130 xmlAttrPtr attrs_to_delete = NULL;
1131
1132 /* special processing for 1.1 spec */
1133 xmlAttrPtr xml_base_attr = NULL;
1134 xmlAttrPtr xml_lang_attr = NULL;
1135 xmlAttrPtr xml_space_attr = NULL;
1136
1137 if ((ctx == NULL) || (cur == NULL) || (cur->type != XML_ELEMENT_NODE)) {
1138 xmlC14NErrParam("processing attributes axis");
1139 return (-1);
1140 }
1141
1142 /*
1143 * Create a sorted list to store element attributes
1144 */
1145 list = xmlListCreate(NULL, (xmlListDataCompare) xmlC14NAttrsCompare);
1146 if (list == NULL) {
1147 xmlC14NErrInternal("creating attributes list");
1148 return (-1);
1149 }
1150
1151 switch(ctx->mode) {
1152 case XML_C14N_1_0:
1153 /* The processing of an element node E MUST be modified slightly when an XPath node-set is
1154 * given as input and the element's parent is omitted from the node-set. The method for processing
1155 * the attribute axis of an element E in the node-set is enhanced. All element nodes along E's
1156 * ancestor axis are examined for nearest occurrences of attributes in the xml namespace, such
1157 * as xml:lang and xml:space (whether or not they are in the node-set). From this list of attributes,
1158 * remove any that are in E's attribute axis (whether or not they are in the node-set). Then,
1159 * lexicographically merge this attribute list with the nodes of E's attribute axis that are in
1160 * the node-set. The result of visiting the attribute axis is computed by processing the attribute
1161 * nodes in this merged attribute list.
1162 */
1163
1164 /*
1165 * Add all visible attributes from current node.
1166 */
1167 attr = cur->properties;
1168 while (attr != NULL) {
1169 /* check that attribute is visible */
1170 if (xmlC14NIsVisible(ctx, attr, cur)) {
1171 xmlListInsert(list, attr);
1172 }
1173 attr = attr->next;
1174 }
1175
1176 /*
1177 * Handle xml attributes
1178 */
1179 if (parent_visible && (cur->parent != NULL) &&
1180 (!xmlC14NIsVisible(ctx, cur->parent, cur->parent->parent)))
1181 {
1182 xmlNodePtr tmp;
1183
1184 /*
1185 * If XPath node-set is not specified then the parent is always
1186 * visible!
1187 */
1188 tmp = cur->parent;
1189 while (tmp != NULL) {
1190 attr = tmp->properties;
1191 while (attr != NULL) {
1192 if (xmlC14NIsXmlAttr(attr) != 0) {
1193 if (xmlListSearch(list, attr) == NULL) {
1194 xmlListInsert(list, attr);
1195 }
1196 }
1197 attr = attr->next;
1198 }
1199 tmp = tmp->parent;
1200 }
1201 }
1202
1203 /* done */
1204 break;
1205 case XML_C14N_EXCLUSIVE_1_0:
1206 /* attributes in the XML namespace, such as xml:lang and xml:space
1207 * are not imported into orphan nodes of the document subset
1208 */
1209
1210 /*
1211 * Add all visible attributes from current node.
1212 */
1213 attr = cur->properties;
1214 while (attr != NULL) {
1215 /* check that attribute is visible */
1216 if (xmlC14NIsVisible(ctx, attr, cur)) {
1217 xmlListInsert(list, attr);
1218 }
1219 attr = attr->next;
1220 }
1221
1222 /* do nothing special for xml attributes */
1223 break;
1224 case XML_C14N_1_1:
1225 /* The processing of an element node E MUST be modified slightly when an XPath node-set is
1226 * given as input and some of the element's ancestors are omitted from the node-set.
1227 *
1228 * Simple inheritable attributes are attributes that have a value that requires at most a simple
1229 * redeclaration. This redeclaration is done by supplying a new value in the child axis. The
1230 * redeclaration of a simple inheritable attribute A contained in one of E's ancestors is done
1231 * by supplying a value to an attribute Ae inside E with the same name. Simple inheritable attributes
1232 * are xml:lang and xml:space.
1233 *
1234 * The method for processing the attribute axis of an element E in the node-set is hence enhanced.
1235 * All element nodes along E's ancestor axis are examined for the nearest occurrences of simple
1236 * inheritable attributes in the xml namespace, such as xml:lang and xml:space (whether or not they
1237 * are in the node-set). From this list of attributes, any simple inheritable attributes that are
1238 * already in E's attribute axis (whether or not they are in the node-set) are removed. Then,
1239 * lexicographically merge this attribute list with the nodes of E's attribute axis that are in
1240 * the node-set. The result of visiting the attribute axis is computed by processing the attribute
1241 * nodes in this merged attribute list.
1242 *
1243 * The xml:id attribute is not a simple inheritable attribute and no processing of these attributes is
1244 * performed.
1245 *
1246 * The xml:base attribute is not a simple inheritable attribute and requires special processing beyond
1247 * a simple redeclaration.
1248 *
1249 * Attributes in the XML namespace other than xml:base, xml:id, xml:lang, and xml:space MUST be processed
1250 * as ordinary attributes.
1251 */
1252
1253 /*
1254 * Add all visible attributes from current node.
1255 */
1256 attr = cur->properties;
1257 while (attr != NULL) {
1258 /* special processing for XML attribute kiks in only when we have invisible parents */
1259 if ((!parent_visible) || (xmlC14NIsXmlAttr(attr) == 0)) {
1260 /* check that attribute is visible */
1261 if (xmlC14NIsVisible(ctx, attr, cur)) {
1262 xmlListInsert(list, attr);
1263 }
1264 } else {
1265 int matched = 0;
1266
1267 /* check for simple inheritance attributes */
1268 if((!matched) && (xml_lang_attr == NULL) && xmlStrEqual(attr->name, BAD_CAST "lang")) {
1269 xml_lang_attr = attr;
1270 matched = 1;
1271 }
1272 if((!matched) && (xml_space_attr == NULL) && xmlStrEqual(attr->name, BAD_CAST "space")) {
1273 xml_space_attr = attr;
1274 matched = 1;
1275 }
1276
1277 /* check for base attr */
1278 if((!matched) && (xml_base_attr == NULL) && xmlStrEqual(attr->name, BAD_CAST "base")) {
1279 xml_base_attr = attr;
1280 matched = 1;
1281 }
1282
1283 /* otherwise, it is a normal attribute, so just check if it is visible */
1284 if((!matched) && xmlC14NIsVisible(ctx, attr, cur)) {
1285 xmlListInsert(list, attr);
1286 }
1287 }
1288
1289 /* move to the next one */
1290 attr = attr->next;
1291 }
1292
1293 /* special processing for XML attribute kiks in only when we have invisible parents */
1294 if ((parent_visible)) {
1295
1296 /* simple inheritance attributes - copy */
1297 if(xml_lang_attr == NULL) {
1298 xml_lang_attr = xmlC14NFindHiddenParentAttr(ctx, cur->parent, BAD_CAST "lang", XML_XML_NAMESPACE);
1299 }
1300 if(xml_lang_attr != NULL) {
1301 xmlListInsert(list, xml_lang_attr);
1302 }
1303 if(xml_space_attr == NULL) {
1304 xml_space_attr = xmlC14NFindHiddenParentAttr(ctx, cur->parent, BAD_CAST "space", XML_XML_NAMESPACE);
1305 }
1306 if(xml_space_attr != NULL) {
1307 xmlListInsert(list, xml_space_attr);
1308 }
1309
1310 /* base uri attribute - fix up */
1311 if(xml_base_attr == NULL) {
1312 /* if we don't have base uri attribute, check if we have a "hidden" one above */
1313 xml_base_attr = xmlC14NFindHiddenParentAttr(ctx, cur->parent, BAD_CAST "base", XML_XML_NAMESPACE);
1314 }
1315 if(xml_base_attr != NULL) {
1316 xml_base_attr = xmlC14NFixupBaseAttr(ctx, xml_base_attr);
1317 if(xml_base_attr != NULL) {
1318 xmlListInsert(list, xml_base_attr);
1319
1320 /* note that we MUST delete returned attr node ourselves! */
1321 xml_base_attr->next = attrs_to_delete;
1322 attrs_to_delete = xml_base_attr;
1323 }
1324 }
1325 }
1326
1327 /* done */
1328 break;
1329 }
1330
1331 /*
1332 * print out all elements from list
1333 */
1334 xmlListWalk(list, (xmlListWalker) xmlC14NPrintAttrs, (const void *) ctx);
1335
1336 /*
1337 * Cleanup
1338 */
1339 xmlFreePropList(attrs_to_delete);
1340 xmlListDelete(list);
1341 return (0);
1342 }
1343
1344 /**
1345 * xmlC14NCheckForRelativeNamespaces:
1346 * @ctx: the C14N context
1347 * @cur: the current element node
1348 *
1349 * Checks that current element node has no relative namespaces defined
1350 *
1351 * Returns 0 if the node has no relative namespaces or -1 otherwise.
1352 */
1353 static int
1354 xmlC14NCheckForRelativeNamespaces(xmlC14NCtxPtr ctx, xmlNodePtr cur)
1355 {
1356 xmlNsPtr ns;
1357
1358 if ((ctx == NULL) || (cur == NULL) || (cur->type != XML_ELEMENT_NODE)) {
1359 xmlC14NErrParam("checking for relative namespaces");
1360 return (-1);
1361 }
1362
1363 ns = cur->nsDef;
1364 while (ns != NULL) {
1365 if (xmlStrlen(ns->href) > 0) {
1366 xmlURIPtr uri;
1367
1368 uri = xmlParseURI((const char *) ns->href);
1369 if (uri == NULL) {
1370 xmlC14NErrInternal("parsing namespace uri");
1371 return (-1);
1372 }
1373 if (xmlStrlen((const xmlChar *) uri->scheme) == 0) {
1374 xmlC14NErrRelativeNamespace(uri->scheme);
1375 xmlFreeURI(uri);
1376 return (-1);
1377 }
1378 xmlFreeURI(uri);
1379 }
1380 ns = ns->next;
1381 }
1382 return (0);
1383 }
1384
1385 /**
1386 * xmlC14NProcessElementNode:
1387 * @ctx: the pointer to C14N context object
1388 * @cur: the node to process
1389 * @visible: this node is visible
1390 * @all_parents_visible: whether all the parents of this node are visible
1391 *
1392 * Canonical XML v 1.0 (http://www.w3.org/TR/xml-c14n)
1393 *
1394 * Element Nodes
1395 * If the element is not in the node-set, then the result is obtained
1396 * by processing the namespace axis, then the attribute axis, then
1397 * processing the child nodes of the element that are in the node-set
1398 * (in document order). If the element is in the node-set, then the result
1399 * is an open angle bracket (<), the element QName, the result of
1400 * processing the namespace axis, the result of processing the attribute
1401 * axis, a close angle bracket (>), the result of processing the child
1402 * nodes of the element that are in the node-set (in document order), an
1403 * open angle bracket, a forward slash (/), the element QName, and a close
1404 * angle bracket.
1405 *
1406 * Returns non-negative value on success or negative value on fail
1407 */
1408 static int
1409 xmlC14NProcessElementNode(xmlC14NCtxPtr ctx, xmlNodePtr cur, int visible)
1410 {
1411 int ret;
1412 xmlC14NVisibleNsStack state;
1413 int parent_is_doc = 0;
1414
1415 if ((ctx == NULL) || (cur == NULL) || (cur->type != XML_ELEMENT_NODE)) {
1416 xmlC14NErrParam("processing element node");
1417 return (-1);
1418 }
1419
1420 /*
1421 * Check relative relative namespaces:
1422 * implementations of XML canonicalization MUST report an operation
1423 * failure on documents containing relative namespace URIs.
1424 */
1425 if (xmlC14NCheckForRelativeNamespaces(ctx, cur) < 0) {
1426 xmlC14NErrInternal("checking for relative namespaces");
1427 return (-1);
1428 }
1429
1430
1431 /*
1432 * Save ns_rendered stack position
1433 */
1434 memset(&state, 0, sizeof(state));
1435 xmlC14NVisibleNsStackSave(ctx->ns_rendered, &state);
1436
1437 if (visible) {
1438 if (ctx->parent_is_doc) {
1439 /* save this flag into the stack */
1440 parent_is_doc = ctx->parent_is_doc;
1441 ctx->parent_is_doc = 0;
1442 ctx->pos = XMLC14N_INSIDE_DOCUMENT_ELEMENT;
1443 }
1444 xmlOutputBufferWriteString(ctx->buf, "<");
1445
1446 if ((cur->ns != NULL) && (xmlStrlen(cur->ns->prefix) > 0)) {
1447 xmlOutputBufferWriteString(ctx->buf,
1448 (const char *) cur->ns->prefix);
1449 xmlOutputBufferWriteString(ctx->buf, ":");
1450 }
1451 xmlOutputBufferWriteString(ctx->buf, (const char *) cur->name);
1452 }
1453
1454 if (!xmlC14NIsExclusive(ctx)) {
1455 ret = xmlC14NProcessNamespacesAxis(ctx, cur, visible);
1456 } else {
1457 ret = xmlExcC14NProcessNamespacesAxis(ctx, cur, visible);
1458 }
1459 if (ret < 0) {
1460 xmlC14NErrInternal("processing namespaces axis");
1461 return (-1);
1462 }
1463 /* todo: shouldn't this go to "visible only"? */
1464 if(visible) {
1465 xmlC14NVisibleNsStackShift(ctx->ns_rendered);
1466 }
1467
1468 ret = xmlC14NProcessAttrsAxis(ctx, cur, visible);
1469 if (ret < 0) {
1470 xmlC14NErrInternal("processing attributes axis");
1471 return (-1);
1472 }
1473
1474 if (visible) {
1475 xmlOutputBufferWriteString(ctx->buf, ">");
1476 }
1477 if (cur->children != NULL) {
1478 ret = xmlC14NProcessNodeList(ctx, cur->children);
1479 if (ret < 0) {
1480 xmlC14NErrInternal("processing childrens list");
1481 return (-1);
1482 }
1483 }
1484 if (visible) {
1485 xmlOutputBufferWriteString(ctx->buf, "</");
1486 if ((cur->ns != NULL) && (xmlStrlen(cur->ns->prefix) > 0)) {
1487 xmlOutputBufferWriteString(ctx->buf,
1488 (const char *) cur->ns->prefix);
1489 xmlOutputBufferWriteString(ctx->buf, ":");
1490 }
1491 xmlOutputBufferWriteString(ctx->buf, (const char *) cur->name);
1492 xmlOutputBufferWriteString(ctx->buf, ">");
1493 if (parent_is_doc) {
1494 /* restore this flag from the stack for next node */
1495 ctx->parent_is_doc = parent_is_doc;
1496 ctx->pos = XMLC14N_AFTER_DOCUMENT_ELEMENT;
1497 }
1498 }
1499
1500 /*
1501 * Restore ns_rendered stack position
1502 */
1503 xmlC14NVisibleNsStackRestore(ctx->ns_rendered, &state);
1504 return (0);
1505 }
1506
1507 /**
1508 * xmlC14NProcessNode:
1509 * @ctx: the pointer to C14N context object
1510 * @cur: the node to process
1511 *
1512 * Processes the given node
1513 *
1514 * Returns non-negative value on success or negative value on fail
1515 */
1516 static int
1517 xmlC14NProcessNode(xmlC14NCtxPtr ctx, xmlNodePtr cur)
1518 {
1519 int ret = 0;
1520 int visible;
1521
1522 if ((ctx == NULL) || (cur == NULL)) {
1523 xmlC14NErrParam("processing node");
1524 return (-1);
1525 }
1526
1527 visible = xmlC14NIsVisible(ctx, cur, cur->parent);
1528 switch (cur->type) {
1529 case XML_ELEMENT_NODE:
1530 ret = xmlC14NProcessElementNode(ctx, cur, visible);
1531 break;
1532 case XML_CDATA_SECTION_NODE:
1533 case XML_TEXT_NODE:
1534 /*
1535 * Text Nodes
1536 * the string value, except all ampersands are replaced
1537 * by &amp;, all open angle brackets (<) are replaced by &lt;, all closing
1538 * angle brackets (>) are replaced by &gt;, and all #xD characters are
1539 * replaced by &#xD;.
1540 */
1541 /* cdata sections are processed as text nodes */
1542 /* todo: verify that cdata sections are included in XPath nodes set */
1543 if ((visible) && (cur->content != NULL)) {
1544 xmlChar *buffer;
1545
1546 buffer = xmlC11NNormalizeText(cur->content);
1547 if (buffer != NULL) {
1548 xmlOutputBufferWriteString(ctx->buf,
1549 (const char *) buffer);
1550 xmlFree(buffer);
1551 } else {
1552 xmlC14NErrInternal("normalizing text node");
1553 return (-1);
1554 }
1555 }
1556 break;
1557 case XML_PI_NODE:
1558 /*
1559 * Processing Instruction (PI) Nodes-
1560 * The opening PI symbol (<?), the PI target name of the node,
1561 * a leading space and the string value if it is not empty, and
1562 * the closing PI symbol (?>). If the string value is empty,
1563 * then the leading space is not added. Also, a trailing #xA is
1564 * rendered after the closing PI symbol for PI children of the
1565 * root node with a lesser document order than the document
1566 * element, and a leading #xA is rendered before the opening PI
1567 * symbol of PI children of the root node with a greater document
1568 * order than the document element.
1569 */
1570 if (visible) {
1571 if (ctx->pos == XMLC14N_AFTER_DOCUMENT_ELEMENT) {
1572 xmlOutputBufferWriteString(ctx->buf, "\x0A<?");
1573 } else {
1574 xmlOutputBufferWriteString(ctx->buf, "<?");
1575 }
1576
1577 xmlOutputBufferWriteString(ctx->buf,
1578 (const char *) cur->name);
1579 if ((cur->content != NULL) && (*(cur->content) != '\0')) {
1580 xmlChar *buffer;
1581
1582 xmlOutputBufferWriteString(ctx->buf, " ");
1583
1584 /* todo: do we need to normalize pi? */
1585 buffer = xmlC11NNormalizePI(cur->content);
1586 if (buffer != NULL) {
1587 xmlOutputBufferWriteString(ctx->buf,
1588 (const char *) buffer);
1589 xmlFree(buffer);
1590 } else {
1591 xmlC14NErrInternal("normalizing pi node");
1592 return (-1);
1593 }
1594 }
1595
1596 if (ctx->pos == XMLC14N_BEFORE_DOCUMENT_ELEMENT) {
1597 xmlOutputBufferWriteString(ctx->buf, "?>\x0A");
1598 } else {
1599 xmlOutputBufferWriteString(ctx->buf, "?>");
1600 }
1601 }
1602 break;
1603 case XML_COMMENT_NODE:
1604 /*
1605 * Comment Nodes
1606 * Nothing if generating canonical XML without comments. For
1607 * canonical XML with comments, generate the opening comment
1608 * symbol (<!--), the string value of the node, and the
1609 * closing comment symbol (-->). Also, a trailing #xA is rendered
1610 * after the closing comment symbol for comment children of the
1611 * root node with a lesser document order than the document
1612 * element, and a leading #xA is rendered before the opening
1613 * comment symbol of comment children of the root node with a
1614 * greater document order than the document element. (Comment
1615 * children of the root node represent comments outside of the
1616 * top-level document element and outside of the document type
1617 * declaration).
1618 */
1619 if (visible && ctx->with_comments) {
1620 if (ctx->pos == XMLC14N_AFTER_DOCUMENT_ELEMENT) {
1621 xmlOutputBufferWriteString(ctx->buf, "\x0A<!--");
1622 } else {
1623 xmlOutputBufferWriteString(ctx->buf, "<!--");
1624 }
1625
1626 if (cur->content != NULL) {
1627 xmlChar *buffer;
1628
1629 /* todo: do we need to normalize comment? */
1630 buffer = xmlC11NNormalizeComment(cur->content);
1631 if (buffer != NULL) {
1632 xmlOutputBufferWriteString(ctx->buf,
1633 (const char *) buffer);
1634 xmlFree(buffer);
1635 } else {
1636 xmlC14NErrInternal("normalizing comment node");
1637 return (-1);
1638 }
1639 }
1640
1641 if (ctx->pos == XMLC14N_BEFORE_DOCUMENT_ELEMENT) {
1642 xmlOutputBufferWriteString(ctx->buf, "-->\x0A");
1643 } else {
1644 xmlOutputBufferWriteString(ctx->buf, "-->");
1645 }
1646 }
1647 break;
1648 case XML_DOCUMENT_NODE:
1649 case XML_DOCUMENT_FRAG_NODE: /* should be processed as document? */
1650 #ifdef LIBXML_DOCB_ENABLED
1651 case XML_DOCB_DOCUMENT_NODE: /* should be processed as document? */
1652 #endif
1653 #ifdef LIBXML_HTML_ENABLED
1654 case XML_HTML_DOCUMENT_NODE: /* should be processed as document? */
1655 #endif
1656 if (cur->children != NULL) {
1657 ctx->pos = XMLC14N_BEFORE_DOCUMENT_ELEMENT;
1658 ctx->parent_is_doc = 1;
1659 ret = xmlC14NProcessNodeList(ctx, cur->children);
1660 }
1661 break;
1662
1663 case XML_ATTRIBUTE_NODE:
1664 xmlC14NErrInvalidNode("XML_ATTRIBUTE_NODE", "processing node");
1665 return (-1);
1666 case XML_NAMESPACE_DECL:
1667 xmlC14NErrInvalidNode("XML_NAMESPACE_DECL", "processing node");
1668 return (-1);
1669 case XML_ENTITY_REF_NODE:
1670 xmlC14NErrInvalidNode("XML_ENTITY_REF_NODE", "processing node");
1671 return (-1);
1672 case XML_ENTITY_NODE:
1673 xmlC14NErrInvalidNode("XML_ENTITY_NODE", "processing node");
1674 return (-1);
1675
1676 case XML_DOCUMENT_TYPE_NODE:
1677 case XML_NOTATION_NODE:
1678 case XML_DTD_NODE:
1679 case XML_ELEMENT_DECL:
1680 case XML_ATTRIBUTE_DECL:
1681 case XML_ENTITY_DECL:
1682 #ifdef LIBXML_XINCLUDE_ENABLED
1683 case XML_XINCLUDE_START:
1684 case XML_XINCLUDE_END:
1685 #endif
1686 /*
1687 * should be ignored according to "W3C Canonical XML"
1688 */
1689 break;
1690 default:
1691 xmlC14NErrUnknownNode(cur->type, "processing node");
1692 return (-1);
1693 }
1694
1695 return (ret);
1696 }
1697
1698 /**
1699 * xmlC14NProcessNodeList:
1700 * @ctx: the pointer to C14N context object
1701 * @cur: the node to start from
1702 *
1703 * Processes all nodes in the row starting from cur.
1704 *
1705 * Returns non-negative value on success or negative value on fail
1706 */
1707 static int
1708 xmlC14NProcessNodeList(xmlC14NCtxPtr ctx, xmlNodePtr cur)
1709 {
1710 int ret;
1711
1712 if (ctx == NULL) {
1713 xmlC14NErrParam("processing node list");
1714 return (-1);
1715 }
1716
1717 for (ret = 0; cur != NULL && ret >= 0; cur = cur->next) {
1718 ret = xmlC14NProcessNode(ctx, cur);
1719 }
1720 return (ret);
1721 }
1722
1723
1724 /**
1725 * xmlC14NFreeCtx:
1726 * @ctx: the pointer to C14N context object
1727 *
1728 * Cleanups the C14N context object.
1729 */
1730
1731 static void
1732 xmlC14NFreeCtx(xmlC14NCtxPtr ctx)
1733 {
1734 if (ctx == NULL) {
1735 xmlC14NErrParam("freeing context");
1736 return;
1737 }
1738
1739 if (ctx->ns_rendered != NULL) {
1740 xmlC14NVisibleNsStackDestroy(ctx->ns_rendered);
1741 }
1742 xmlFree(ctx);
1743 }
1744
1745 /**
1746 * xmlC14NNewCtx:
1747 * @doc: the XML document for canonization
1748 * @is_visible_callback:the function to use to determine is node visible
1749 * or not
1750 * @user_data: the first parameter for @is_visible_callback function
1751 * (in most cases, it is nodes set)
1752 * @mode: the c14n mode (see @xmlC14NMode)
1753 * @inclusive_ns_prefixe the list of inclusive namespace prefixes
1754 * ended with a NULL or NULL if there is no
1755 * inclusive namespaces (only for `
1756 * canonicalization)
1757 * @with_comments: include comments in the result (!=0) or not (==0)
1758 * @buf: the output buffer to store canonical XML; this
1759 * buffer MUST have encoder==NULL because C14N requires
1760 * UTF-8 output
1761 *
1762 * Creates new C14N context object to store C14N parameters.
1763 *
1764 * Returns pointer to newly created object (success) or NULL (fail)
1765 */
1766 static xmlC14NCtxPtr
1767 xmlC14NNewCtx(xmlDocPtr doc,
1768 xmlC14NIsVisibleCallback is_visible_callback, void* user_data,
1769 xmlC14NMode mode, xmlChar ** inclusive_ns_prefixes,
1770 int with_comments, xmlOutputBufferPtr buf)
1771 {
1772 xmlC14NCtxPtr ctx = NULL;
1773
1774 if ((doc == NULL) || (buf == NULL)) {
1775 xmlC14NErrParam("creating new context");
1776 return (NULL);
1777 }
1778
1779 /*
1780 * Validate the encoding output buffer encoding
1781 */
1782 if (buf->encoder != NULL) {
1783 xmlC14NErr(ctx, (xmlNodePtr) doc, XML_C14N_REQUIRES_UTF8,
1784 "xmlC14NNewCtx: output buffer encoder != NULL but C14N requires UTF8 output\n");
1785 return (NULL);
1786 }
1787
1788 /*
1789 * Validate the XML document encoding value, if provided.
1790 */
1791 if (doc->charset != XML_CHAR_ENCODING_UTF8) {
1792 xmlC14NErr(ctx, (xmlNodePtr) doc, XML_C14N_REQUIRES_UTF8,
1793 "xmlC14NNewCtx: source document not in UTF8\n");
1794 return (NULL);
1795 }
1796
1797 /*
1798 * Allocate a new xmlC14NCtxPtr and fill the fields.
1799 */
1800 ctx = (xmlC14NCtxPtr) xmlMalloc(sizeof(xmlC14NCtx));
1801 if (ctx == NULL) {
1802 xmlC14NErrMemory("creating context");
1803 return (NULL);
1804 }
1805 memset(ctx, 0, sizeof(xmlC14NCtx));
1806
1807 /*
1808 * initialize C14N context
1809 */
1810 ctx->doc = doc;
1811 ctx->with_comments = with_comments;
1812 ctx->is_visible_callback = is_visible_callback;
1813 ctx->user_data = user_data;
1814 ctx->buf = buf;
1815 ctx->parent_is_doc = 1;
1816 ctx->pos = XMLC14N_BEFORE_DOCUMENT_ELEMENT;
1817 ctx->ns_rendered = xmlC14NVisibleNsStackCreate();
1818
1819 if(ctx->ns_rendered == NULL) {
1820 xmlC14NErr(ctx, (xmlNodePtr) doc, XML_C14N_CREATE_STACK,
1821 "xmlC14NNewCtx: xmlC14NVisibleNsStackCreate failed\n");
1822 xmlC14NFreeCtx(ctx);
1823 return (NULL);
1824 }
1825
1826 /*
1827 * Set "mode" flag and remember list of incluseve prefixes
1828 * for exclusive c14n
1829 */
1830 ctx->mode = mode;
1831 if(xmlC14NIsExclusive(ctx)) {
1832 ctx->inclusive_ns_prefixes = inclusive_ns_prefixes;
1833 }
1834 return (ctx);
1835 }
1836
1837 /**
1838 * xmlC14NExecute:
1839 * @doc: the XML document for canonization
1840 * @is_visible_callback:the function to use to determine is node visible
1841 * or not
1842 * @user_data: the first parameter for @is_visible_callback function
1843 * (in most cases, it is nodes set)
1844 * @mode: the c14n mode (see @xmlC14NMode)
1845 * @inclusive_ns_prefixes: the list of inclusive namespace prefixes
1846 * ended with a NULL or NULL if there is no
1847 * inclusive namespaces (only for exclusive
1848 * canonicalization, ignored otherwise)
1849 * @with_comments: include comments in the result (!=0) or not (==0)
1850 * @buf: the output buffer to store canonical XML; this
1851 * buffer MUST have encoder==NULL because C14N requires
1852 * UTF-8 output
1853 *
1854 * Dumps the canonized image of given XML document into the provided buffer.
1855 * For details see "Canonical XML" (http://www.w3.org/TR/xml-c14n) or
1856 * "Exclusive XML Canonicalization" (http://www.w3.org/TR/xml-exc-c14n)
1857 *
1858 * Returns non-negative value on success or a negative value on fail
1859 */
1860 int
1861 xmlC14NExecute(xmlDocPtr doc, xmlC14NIsVisibleCallback is_visible_callback,
1862 void* user_data, int mode, xmlChar **inclusive_ns_prefixes,
1863 int with_comments, xmlOutputBufferPtr buf) {
1864
1865 xmlC14NCtxPtr ctx;
1866 xmlC14NMode c14n_mode = XML_C14N_1_0;
1867 int ret;
1868
1869 if ((buf == NULL) || (doc == NULL)) {
1870 xmlC14NErrParam("executing c14n");
1871 return (-1);
1872 }
1873
1874 /* for backward compatibility, we have to have "mode" as "int"
1875 and here we check that user gives valid value */
1876 switch(mode) {
1877 case XML_C14N_1_0:
1878 case XML_C14N_EXCLUSIVE_1_0:
1879 case XML_C14N_1_1:
1880 c14n_mode = (xmlC14NMode)mode;
1881 break;
1882 default:
1883 xmlC14NErrParam("invalid mode for executing c14n");
1884 return (-1);
1885 }
1886
1887 /*
1888 * Validate the encoding output buffer encoding
1889 */
1890 if (buf->encoder != NULL) {
1891 xmlC14NErr(NULL, (xmlNodePtr) doc, XML_C14N_REQUIRES_UTF8,
1892 "xmlC14NExecute: output buffer encoder != NULL but C14N requires UTF8 output\n");
1893 return (-1);
1894 }
1895
1896 ctx = xmlC14NNewCtx(doc, is_visible_callback, user_data,
1897 c14n_mode, inclusive_ns_prefixes,
1898 with_comments, buf);
1899 if (ctx == NULL) {
1900 xmlC14NErr(NULL, (xmlNodePtr) doc, XML_C14N_CREATE_CTXT,
1901 "xmlC14NExecute: unable to create C14N context\n");
1902 return (-1);
1903 }
1904
1905
1906
1907 /*
1908 * Root Node
1909 * The root node is the parent of the top-level document element. The
1910 * result of processing each of its child nodes that is in the node-set
1911 * in document order. The root node does not generate a byte order mark,
1912 * XML declaration, nor anything from within the document type
1913 * declaration.
1914 */
1915 if (doc->children != NULL) {
1916 ret = xmlC14NProcessNodeList(ctx, doc->children);
1917 if (ret < 0) {
1918 xmlC14NErrInternal("processing docs children list");
1919 xmlC14NFreeCtx(ctx);
1920 return (-1);
1921 }
1922 }
1923
1924 /*
1925 * Flush buffer to get number of bytes written
1926 */
1927 ret = xmlOutputBufferFlush(buf);
1928 if (ret < 0) {
1929 xmlC14NErrInternal("flushing output buffer");
1930 xmlC14NFreeCtx(ctx);
1931 return (-1);
1932 }
1933
1934 /*
1935 * Cleanup
1936 */
1937 xmlC14NFreeCtx(ctx);
1938 return (ret);
1939 }
1940
1941 /**
1942 * xmlC14NDocSaveTo:
1943 * @doc: the XML document for canonization
1944 * @nodes: the nodes set to be included in the canonized image
1945 * or NULL if all document nodes should be included
1946 * @mode: the c14n mode (see @xmlC14NMode)
1947 * @inclusive_ns_prefixes: the list of inclusive namespace prefixes
1948 * ended with a NULL or NULL if there is no
1949 * inclusive namespaces (only for exclusive
1950 * canonicalization, ignored otherwise)
1951 * @with_comments: include comments in the result (!=0) or not (==0)
1952 * @buf: the output buffer to store canonical XML; this
1953 * buffer MUST have encoder==NULL because C14N requires
1954 * UTF-8 output
1955 *
1956 * Dumps the canonized image of given XML document into the provided buffer.
1957 * For details see "Canonical XML" (http://www.w3.org/TR/xml-c14n) or
1958 * "Exclusive XML Canonicalization" (http://www.w3.org/TR/xml-exc-c14n)
1959 *
1960 * Returns non-negative value on success or a negative value on fail
1961 */
1962 int
1963 xmlC14NDocSaveTo(xmlDocPtr doc, xmlNodeSetPtr nodes,
1964 int mode, xmlChar ** inclusive_ns_prefixes,
1965 int with_comments, xmlOutputBufferPtr buf) {
1966 return(xmlC14NExecute(doc,
1967 (xmlC14NIsVisibleCallback)xmlC14NIsNodeInNodeset,
1968 nodes,
1969 mode,
1970 inclusive_ns_prefixes,
1971 with_comments,
1972 buf));
1973 }
1974
1975
1976 /**
1977 * xmlC14NDocDumpMemory:
1978 * @doc: the XML document for canonization
1979 * @nodes: the nodes set to be included in the canonized image
1980 * or NULL if all document nodes should be included
1981 * @mode: the c14n mode (see @xmlC14NMode)
1982 * @inclusive_ns_prefixes: the list of inclusive namespace prefixes
1983 * ended with a NULL or NULL if there is no
1984 * inclusive namespaces (only for exclusive
1985 * canonicalization, ignored otherwise)
1986 * @with_comments: include comments in the result (!=0) or not (==0)
1987 * @doc_txt_ptr: the memory pointer for allocated canonical XML text;
1988 * the caller of this functions is responsible for calling
1989 * xmlFree() to free allocated memory
1990 *
1991 * Dumps the canonized image of given XML document into memory.
1992 * For details see "Canonical XML" (http://www.w3.org/TR/xml-c14n) or
1993 * "Exclusive XML Canonicalization" (http://www.w3.org/TR/xml-exc-c14n)
1994 *
1995 * Returns the number of bytes written on success or a negative value on fail
1996 */
1997 int
1998 xmlC14NDocDumpMemory(xmlDocPtr doc, xmlNodeSetPtr nodes,
1999 int mode, xmlChar ** inclusive_ns_prefixes,
2000 int with_comments, xmlChar ** doc_txt_ptr)
2001 {
2002 int ret;
2003 xmlOutputBufferPtr buf;
2004
2005 if (doc_txt_ptr == NULL) {
2006 xmlC14NErrParam("dumping doc to memory");
2007 return (-1);
2008 }
2009
2010 *doc_txt_ptr = NULL;
2011
2012 /*
2013 * create memory buffer with UTF8 (default) encoding
2014 */
2015 buf = xmlAllocOutputBuffer(NULL);
2016 if (buf == NULL) {
2017 xmlC14NErrMemory("creating output buffer");
2018 return (-1);
2019 }
2020
2021 /*
2022 * canonize document and write to buffer
2023 */
2024 ret = xmlC14NDocSaveTo(doc, nodes, mode, inclusive_ns_prefixes,
2025 with_comments, buf);
2026 if (ret < 0) {
2027 xmlC14NErrInternal("saving doc to output buffer");
2028 (void) xmlOutputBufferClose(buf);
2029 return (-1);
2030 }
2031
2032 ret = xmlBufUse(buf->buffer);
2033 if (ret > 0) {
2034 *doc_txt_ptr = xmlStrndup(xmlBufContent(buf->buffer), ret);
2035 }
2036 (void) xmlOutputBufferClose(buf);
2037
2038 if ((*doc_txt_ptr == NULL) && (ret > 0)) {
2039 xmlC14NErrMemory("coping canonicanized document");
2040 return (-1);
2041 }
2042 return (ret);
2043 }
2044
2045 /**
2046 * xmlC14NDocSave:
2047 * @doc: the XML document for canonization
2048 * @nodes: the nodes set to be included in the canonized image
2049 * or NULL if all document nodes should be included
2050 * @mode: the c14n mode (see @xmlC14NMode)
2051 * @inclusive_ns_prefixes: the list of inclusive namespace prefixes
2052 * ended with a NULL or NULL if there is no
2053 * inclusive namespaces (only for exclusive
2054 * canonicalization, ignored otherwise)
2055 * @with_comments: include comments in the result (!=0) or not (==0)
2056 * @filename: the filename to store canonical XML image
2057 * @compression: the compression level (zlib requred):
2058 * -1 - libxml default,
2059 * 0 - uncompressed,
2060 * >0 - compression level
2061 *
2062 * Dumps the canonized image of given XML document into the file.
2063 * For details see "Canonical XML" (http://www.w3.org/TR/xml-c14n) or
2064 * "Exclusive XML Canonicalization" (http://www.w3.org/TR/xml-exc-c14n)
2065 *
2066 * Returns the number of bytes written success or a negative value on fail
2067 */
2068 int
2069 xmlC14NDocSave(xmlDocPtr doc, xmlNodeSetPtr nodes,
2070 int mode, xmlChar ** inclusive_ns_prefixes,
2071 int with_comments, const char *filename, int compression)
2072 {
2073 xmlOutputBufferPtr buf;
2074 int ret;
2075
2076 if (filename == NULL) {
2077 xmlC14NErrParam("saving doc");
2078 return (-1);
2079 }
2080 #ifdef HAVE_ZLIB_H
2081 if (compression < 0)
2082 compression = xmlGetCompressMode();
2083 #endif
2084
2085 /*
2086 * save the content to a temp buffer, use default UTF8 encoding.
2087 */
2088 buf = xmlOutputBufferCreateFilename(filename, NULL, compression);
2089 if (buf == NULL) {
2090 xmlC14NErrInternal("creating temporary filename");
2091 return (-1);
2092 }
2093
2094 /*
2095 * canonize document and write to buffer
2096 */
2097 ret = xmlC14NDocSaveTo(doc, nodes, mode, inclusive_ns_prefixes,
2098 with_comments, buf);
2099 if (ret < 0) {
2100 xmlC14NErrInternal("cannicanize document to buffer");
2101 (void) xmlOutputBufferClose(buf);
2102 return (-1);
2103 }
2104
2105 /*
2106 * get the numbers of bytes written
2107 */
2108 ret = xmlOutputBufferClose(buf);
2109 return (ret);
2110 }
2111
2112
2113
2114 /*
2115 * Macro used to grow the current buffer.
2116 */
2117 #define growBufferReentrant() { \
2118 buffer_size *= 2; \
2119 buffer = (xmlChar *) \
2120 xmlRealloc(buffer, buffer_size * sizeof(xmlChar)); \
2121 if (buffer == NULL) { \
2122 xmlC14NErrMemory("growing buffer"); \
2123 return(NULL); \
2124 } \
2125 }
2126
2127 /**
2128 * xmlC11NNormalizeString:
2129 * @input: the input string
2130 * @mode: the normalization mode (attribute, comment, PI or text)
2131 *
2132 * Converts a string to a canonical (normalized) format. The code is stolen
2133 * from xmlEncodeEntitiesReentrant(). Added normalization of \x09, \x0a, \x0A
2134 * and the @mode parameter
2135 *
2136 * Returns a normalized string (caller is responsible for calling xmlFree())
2137 * or NULL if an error occurs
2138 */
2139 static xmlChar *
2140 xmlC11NNormalizeString(const xmlChar * input,
2141 xmlC14NNormalizationMode mode)
2142 {
2143 const xmlChar *cur = input;
2144 xmlChar *buffer = NULL;
2145 xmlChar *out = NULL;
2146 int buffer_size = 0;
2147
2148 if (input == NULL)
2149 return (NULL);
2150
2151 /*
2152 * allocate an translation buffer.
2153 */
2154 buffer_size = 1000;
2155 buffer = (xmlChar *) xmlMallocAtomic(buffer_size * sizeof(xmlChar));
2156 if (buffer == NULL) {
2157 xmlC14NErrMemory("allocating buffer");
2158 return (NULL);
2159 }
2160 out = buffer;
2161
2162 while (*cur != '\0') {
2163 if ((out - buffer) > (buffer_size - 10)) {
2164 int indx = out - buffer;
2165
2166 growBufferReentrant();
2167 out = &buffer[indx];
2168 }
2169
2170 if ((*cur == '<') && ((mode == XMLC14N_NORMALIZE_ATTR) ||
2171 (mode == XMLC14N_NORMALIZE_TEXT))) {
2172 *out++ = '&';
2173 *out++ = 'l';
2174 *out++ = 't';
2175 *out++ = ';';
2176 } else if ((*cur == '>') && (mode == XMLC14N_NORMALIZE_TEXT)) {
2177 *out++ = '&';
2178 *out++ = 'g';
2179 *out++ = 't';
2180 *out++ = ';';
2181 } else if ((*cur == '&') && ((mode == XMLC14N_NORMALIZE_ATTR) ||
2182 (mode == XMLC14N_NORMALIZE_TEXT))) {
2183 *out++ = '&';
2184 *out++ = 'a';
2185 *out++ = 'm';
2186 *out++ = 'p';
2187 *out++ = ';';
2188 } else if ((*cur == '"') && (mode == XMLC14N_NORMALIZE_ATTR)) {
2189 *out++ = '&';
2190 *out++ = 'q';
2191 *out++ = 'u';
2192 *out++ = 'o';
2193 *out++ = 't';
2194 *out++ = ';';
2195 } else if ((*cur == '\x09') && (mode == XMLC14N_NORMALIZE_ATTR)) {
2196 *out++ = '&';
2197 *out++ = '#';
2198 *out++ = 'x';
2199 *out++ = '9';
2200 *out++ = ';';
2201 } else if ((*cur == '\x0A') && (mode == XMLC14N_NORMALIZE_ATTR)) {
2202 *out++ = '&';
2203 *out++ = '#';
2204 *out++ = 'x';
2205 *out++ = 'A';
2206 *out++ = ';';
2207 } else if ((*cur == '\x0D') && ((mode == XMLC14N_NORMALIZE_ATTR) ||
2208 (mode == XMLC14N_NORMALIZE_TEXT) ||
2209 (mode == XMLC14N_NORMALIZE_COMMENT) ||
2210 (mode == XMLC14N_NORMALIZE_PI))) {
2211 *out++ = '&';
2212 *out++ = '#';
2213 *out++ = 'x';
2214 *out++ = 'D';
2215 *out++ = ';';
2216 } else {
2217 /*
2218 * Works because on UTF-8, all extended sequences cannot
2219 * result in bytes in the ASCII range.
2220 */
2221 *out++ = *cur;
2222 }
2223 cur++;
2224 }
2225 *out = 0;
2226 return (buffer);
2227 }
2228 #endif /* LIBXML_OUTPUT_ENABLED */
2229 #define bottom_c14n
2230 #include "elfgcchack.h"
2231 #endif /* LIBXML_C14N_ENABLED */