Annotation of parser3/tests/107.html, revision 1.4
1.2 paf 1: @main[]
1.4 ! misha 2: $request:charset[UTF-8]
! 3: $response:charset[UTF-8]
! 4: $response:content-type[
! 5: $.value[text/html]
! 6: $.charset[$response:charset]
! 7: ]
1.2 paf 8: ^xdata[]
9:
10: ^show_xdoc2[$xdoc]<hr>
11: ^show_xnode1[$xdoc]<hr>
12:
1.4 ! misha 13: XPath1 [*/man]:<br>
1.2 paf 14: $people[^xdoc.select[*/man]]
15: ^show_xnodes1[$people]<hr>
16:
1.4 ! misha 17: XPath1 [//man]:<br>
! 18: $people[^xdoc.select[//man]]
! 19: ^show_xnodes1[$people]<hr>
! 20:
! 21: XPath2 [*/man[2]/name]:<br>
1.2 paf 22: ^show_xnode1[^xdoc.selectSingle[*/man[2]/name];0;1]<hr>
23:
1.4 ! misha 24:
1.2 paf 25: @xdata[]
1.3 paf 26: $xdoc[^xdoc::create{<?xml version="1.0" encoding="$request:charset"?>
1.2 paf 27: <!--for getByID to work we need to enable doctype checking in pa_global.C :( <?DOCTYPE people SYSTEM "107.dtd"?>-->
28: <people>
1.3 paf 29: <man id="1" имя="word слово">
1.2 paf 30: <name>P«^;AF B</name>
31: </man>
1.4 ! misha 32: <man id="2">
! 33: <name>ПИФ^taint[&]</name>
! 34: </man>
! 35: <group>
! 36: <man id="3">
! 37: <name>ПАФ</name>
! 38: </man>
! 39: </group>
1.2 paf 40: </people>
41: }]
42:
43: @show1[array]
44: ^for[i](0;$array-1){
1.4 ! misha 45: $x[$array.$i]
1.2 paf 46: $x.firstChild.nodeValue:
47: $pattributes[$x.parentNode.attributes]
48: ^if(^pattributes._count[]){
49: $pattributes.id.name=$pattributes.id.nodeValue
50: }
51: <br>
52: }
53:
54: @show_xnodes1[array][i]
55: ^for[i](0;^array._count[]-1){
56: ^show_xnode1[$array.$i;0;1]
57: }
58:
1.4 ! misha 59: @show_xnode1[x;level;single][l;key;value]
1.2 paf 60: ^if(def $x){
1.4 ! misha 61: ^for[l](0;$level-1){ ^; ^; ^; ^;}
! 62: ^if($x.nodeType == $xnode:ELEMENT_NODE){
! 63: <^;$x.nodeName^if(def $x.attributes){^x.attributes.foreach[key;value]{ $key="$value.nodeValue"}}>^;
! 64: }{
! 65: [$x.nodeType]
! 66: }
! 67: ^if(def $x.nodeValue){$x.nodeValue}<br>
! 68: ^show_xnode1[$x.firstChild]($level+1)
! 69: ^if(!$single){
1.2 paf 70: ^show_xnode1[$x.nextSibling]($level)
1.4 ! misha 71: }
1.2 paf 72:
1.4 ! misha 73: ^if($x.nodeType == $xnode:ELEMENT_NODE){
! 74: ^for[l](0;$level-1){ ^; ^; ^; ^;}<^;/$x.nodeName>^;<br>
! 75: }
1.2 paf 76: }
77:
78: @show_xdoc2[xdoc]
79: #$response:body[^xdoc.file[ $.media-type[text/paf] ]]
80: <pre>^taint[html][^xdoc.string[
81: $.method[html]
82: # $.encoding[utF-8]
1.4 ! misha 83: # $.omit-xml-declaration[yes]
1.2 paf 84: # $.standalone[no]
85: # -$.doctype-public[-//W3C//DTD XHTML]
86: # -$.doctype-system[/a/b/c/]
87: # $.indent[yes]
88: # $.media-type[text/paf]
89: ]]
90: </pre>
E-mail: