path: root/test/files/jvm/xmlstuff.scala

import java.io.StringReader
import org.xml.sax.InputSource
import scala.xml.{Node, NodeSeq, Elem, Text, XML}

object Test {

  /** returns true if exception was thrown */
  def catcher(att: Function1[Unit, scala.xml.MetaData]): Boolean = {
    var ex = false
    try {
      att.apply({})
    } catch {
      case scala.xml.MalformedAttributeException(msg) =>
        println(msg)
        ex = true
    }
    ex
  }

  def main(args: Array[String]) {

    println("NodeSeq")

    val p = <foo>
    <bar gt='ga' value="3"/>
    <baz bazValue="8"/>
    <bar value="5" gi='go'/>
    </foo>;
    
    val pelems_1 = for (x <- p \ "bar"; y <- p \ "baz" ) yield {
      Text(x.attributes("value").toString + y.attributes("bazValue").toString+ "!")
    };
    val pelems_2 = new NodeSeq { val theSeq = List(Text("38!"),Text("58!")) };
    assert(pelems_1 sameElements pelems_2)

    assert(Text("8") sameElements (p \\ "@bazValue"))

    val books = 
      <bks>
    <book><title>Blabla</title></book>
    <book><title>Blubabla</title></book>
    <book><title>Baaaaaaalabla</title></book>
    </bks>;

    val reviews = 
      <reviews>
    <entry><title>Blabla</title>
    <remarks>
    Hallo Welt.
    </remarks>
    </entry>
    <entry><title>Blubabla</title>
    <remarks>
    Hello Blu
    </remarks>
    </entry>
    <entry><title>Blubabla</title>
    <remarks>
    rem 2
    </remarks>
    </entry>
    </reviews>;

    println( new scala.xml.PrettyPrinter(80, 5).formatNodes (
      for (t <- books \\ "title";
           r <- reviews \\ "entry"
           if (r \ "title") xml_== t) yield
             <result>
      { t }
      { r \ "remarks" }
      </result>
    ));

    // example
    println( 
      for (t @ <book><title>Blabla</title></book> <- new NodeSeq { val theSeq = books.child }.toList)
      yield t
    );
    val phoneBook =  
      <phonebook>
    <descr>
    This is the <b>phonebook</b> of the 
    <a href="http://acme.org">ACME</a> corporation.
    </descr>
    <entry>
    <name>John</name> 
    <phone where="work">  +41 21 693 68 67</phone>
    <phone where="mobile">+41 79 602 23 23</phone>
    </entry>
    </phonebook>;


    val addrBook =  
      <addrbook>
    <descr>
    This is the <b>addressbook</b> of the 
    <a href="http://acme.org">ACME</a> corporation.
    </descr>
    <entry>
    <name>John</name> 
    <street> Elm Street</street>
    <city>Dolphin City</city>
    </entry>
    </addrbook>;

    println( new scala.xml.PrettyPrinter(80, 5).formatNodes (
      for (t <- addrBook \\ "entry";
           r <- phoneBook \\ "entry"
           if (t \ "name") xml_== (r \ "name")) yield
             <result>
      { t.child }
      { r \ "phone" }
      </result>
    ));

    
    /* namespaces */
    // begin tmp
    println("namespaces")
    val cuckoo = <cuckoo xmlns="http://cuckoo.com">
    <foo/>
    <bar/>
    </cuckoo>;
    assert(cuckoo.namespace == "http://cuckoo.com")
    for (n <- cuckoo \ "_" ) {
      //println("n = "+n);
      //println("n.prefix = "+n.prefix);
      //.println("n.scope = "+n.scope);
      assert( n.namespace == "http://cuckoo.com")
    }

    println("validation - elements")
    val vtor = new scala.xml.dtd.ElementValidator();
    {
      import scala.xml.dtd.ELEMENTS
      import scala.xml.dtd.ContentModel._
      vtor.setContentModel(
	ELEMENTS( 
	  Sequ(
	    Letter(ElemName("bar")), 
	    Star(Letter(ElemName("baz"))) )));

    }
    assert(vtor( <foo><bar/><baz/><baz/></foo> ))

    {
      import scala.xml.dtd.MIXED
      import scala.xml.dtd.ContentModel._
      
      vtor.setContentModel(
        MIXED(
          Alt(Letter(ElemName("bar")), 
              Letter(ElemName("baz")), 
              Letter(ElemName("bal")))));
    }

    assert(vtor(<foo><bar/><baz/><baz/></foo> ))
    assert(vtor(<foo>ab<bar/>cd<baz/>ed<baz/>gh</foo> ))
    assert(!vtor(<foo> <ugha/> <bugha/> </foo> ))

    println("validation - attributes")
    vtor.setContentModel(null)
    vtor.setMetaData(List())
    assert(!vtor( <foo bar="hello"/> ))
    
    { 
      import scala.xml.dtd._ 
      vtor setMetaData List(AttrDecl("bar", "CDATA", IMPLIED))
    }
    assert(!vtor(<foo href="http://foo.com" bar="hello"/>))
    assert(vtor(<foo bar="hello"/>))

    { 
      import scala.xml.dtd._
      vtor.setMetaData(List(AttrDecl("bar","CDATA",REQUIRED)))
    }
    assert(!vtor( <foo href="http://foo.com" /> ))
    assert( vtor( <foo bar="http://foo.com" /> ))
    
  }
}