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&#171^;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){&nbsp^;&nbsp^;&nbsp^;&nbsp^;}
        !            62:        ^if($x.nodeType == $xnode:ELEMENT_NODE){
        !            63:                &lt^;$x.nodeName^if(def $x.attributes){^x.attributes.foreach[key;value]{ $key="$value.nodeValue"}}&gt^;
        !            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){&nbsp^;&nbsp^;&nbsp^;&nbsp^;}&lt^;/$x.nodeName&gt^;<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: