magic_xml 0.1.0

data/xquery_use_cases/sgml/q1.out

@@ -0,0 +1,44 @@
+<result><para>With the ever-changing and growing global market, companies and
+large organizations are searching for ways to become more viable and
+competitive. Downsizing and other cost-cutting measures demand more
+efficient use of corporate resources. One very important resource is
+an organization's information.</para><para>As part of the move toward integrated information management,
+whole industries are developing and implementing standards for
+exchanging technical information. This report describes how one such
+standard, the Standard Generalized Markup Language (SGML), works as
+part of an overall information management strategy.</para><para>While SGML is a fairly recent technology, the use of
+<emph>markup</emph> in computer-generated documents has existed for a
+while.</para><para>Markup is everything in a document that is not content. The
+traditional meaning of markup is the manual <emph>marking</emph> up
+of typewritten text to give instructions for a typesetter or
+compositor about how to fit the text on a page and what typefaces to
+use. This kind of markup is known as <emph>procedural markup</emph>.</para><para>Most electronic publishing systems today use some form of
+procedural markup. Procedural markup codes are good for one
+presentation of the information.</para><para>Generic markup (also known as descriptive markup) describes the
+<emph>purpose</emph> of the text in a document. A basic concept of
+generic markup is that the content of a document must be separate from
+the style. Generic markup allows for multiple presentations of the
+information.</para><para>Industries involved in technical documentation increasingly
+prefer generic over procedural markup schemes. When a company changes
+software or hardware systems, enormous data translation tasks arise,
+often resulting in errors.</para><para>SGML defines a strict markup scheme with a syntax for defining
+document data elements and an overall framework for marking up
+documents.</para><para>SGML can describe and create documents that are not dependent on
+any hardware, software, formatter, or operating system. Since SGML documents
+conform to an international standard, they are portable.</para><para>You can break a typical document into three layers: structure,
+content, and style. SGML works by separating these three aspects and
+deals mainly with the relationship between structure and content.</para><para>At the heart of an SGML application is a file called the DTD, or
+Document Type Definition. The DTD sets up the structure of a document,
+much like a database schema describes the types of information it
+handles.</para><para>A database schema also defines the relationships between the
+various types of data. Similarly, a DTD specifies <emph>rules</emph>
+to help ensure documents have a consistent, logical structure.</para><para>Content is the information itself. The method for identifying
+the information and its meaning within this framework is called
+<emph>tagging</emph>. Tagging must
+conform to the rules established in the DTD (see <xref xrefid='top4'/>).</para><para>SGML does not standardize style or other processing methods for
+information stored in SGML.</para><para>The Graphic Communications Association has been
+instrumental in the development of SGML. GCA provides conferences,
+tutorials, newsletters, and publication sales for both members and
+non-members.</para><para security='c'>Exiled members of the former Soviet Union's secret
+police, the KGB, have infiltrated the upper ranks of the GCA and are
+planning the Final Revolution as soon as DSSSL is completed.</para></result>

data/xquery_use_cases/sgml/q1.rb

@@ -0,0 +1,23 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.result!(XML.load('sgml.xml').descendants(:para))

data/xquery_use_cases/sgml/q1.xquery

@@ -0,0 +1,5 @@
+<result>
+  { 
+    doc("sgml.xml")//report//para 
+  }
+</result>

data/xquery_use_cases/sgml/q10.out

@@ -0,0 +1 @@
+<result><title>Content</title></result>

data/xquery_use_cases/sgml/q10.rb

@@ -0,0 +1,28 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+doc = XML.load('sgml.xml')
+
+XML.result! {
+    xref = doc.descendants(:xref).find{|xref| xref[:xrefid] == "top4"}
+    add! doc.range(nil,xref).descendants(:title)[-1]
+}

data/xquery_use_cases/sgml/q10.xquery

@@ -0,0 +1,7 @@
+<result>
+  {
+    let $x := doc("sgml.xml")//xref[@xrefid = "top4"],
+        $t := doc("sgml.xml")//title[. << $x]
+    return $t[last()]
+  }
+</result>

data/xquery_use_cases/sgml/q2.out

@@ -0,0 +1,26 @@
+<result><para>With the ever-changing and growing global market, companies and
+large organizations are searching for ways to become more viable and
+competitive. Downsizing and other cost-cutting measures demand more
+efficient use of corporate resources. One very important resource is
+an organization's information.</para><para>As part of the move toward integrated information management,
+whole industries are developing and implementing standards for
+exchanging technical information. This report describes how one such
+standard, the Standard Generalized Markup Language (SGML), works as
+part of an overall information management strategy.</para><para>While SGML is a fairly recent technology, the use of
+<emph>markup</emph> in computer-generated documents has existed for a
+while.</para><para>Markup is everything in a document that is not content. The
+traditional meaning of markup is the manual <emph>marking</emph> up
+of typewritten text to give instructions for a typesetter or
+compositor about how to fit the text on a page and what typefaces to
+use. This kind of markup is known as <emph>procedural markup</emph>.</para><para>SGML defines a strict markup scheme with a syntax for defining
+document data elements and an overall framework for marking up
+documents.</para><para>SGML can describe and create documents that are not dependent on
+any hardware, software, formatter, or operating system. Since SGML documents
+conform to an international standard, they are portable.</para><para>You can break a typical document into three layers: structure,
+content, and style. SGML works by separating these three aspects and
+deals mainly with the relationship between structure and content.</para><para>The Graphic Communications Association has been
+instrumental in the development of SGML. GCA provides conferences,
+tutorials, newsletters, and publication sales for both members and
+non-members.</para><para security='c'>Exiled members of the former Soviet Union's secret
+police, the KGB, have infiltrated the upper ranks of the GCA and are
+planning the Final Revolution as soon as DSSSL is completed.</para></result>

data/xquery_use_cases/sgml/q2.rb

@@ -0,0 +1,23 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+puts XML.result(XML.load('sgml.xml').descendants(:intro, :para))

data/xquery_use_cases/sgml/q2.xquery

@@ -0,0 +1,5 @@
+<result>
+  { 
+    doc("sgml.xml")//intro/para 
+  }
+</result>

data/xquery_use_cases/sgml/q3.out

@@ -0,0 +1,6 @@
+<result><para>The Graphic Communications Association has been
+instrumental in the development of SGML. GCA provides conferences,
+tutorials, newsletters, and publication sales for both members and
+non-members.</para><para security='c'>Exiled members of the former Soviet Union's secret
+police, the KGB, have infiltrated the upper ranks of the GCA and are
+planning the Final Revolution as soon as DSSSL is completed.</para></result>

data/xquery_use_cases/sgml/q3.rb

@@ -0,0 +1,28 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.result! {
+    XML.load('sgml.xml').descendants(:chapter) {|c|
+        next unless c.children(:intro).empty?
+        add! c.children(:section, :intro, :para)
+    }
+}

data/xquery_use_cases/sgml/q3.xquery

@@ -0,0 +1,7 @@
+<result>
+  {
+    for $c in doc("sgml.xml")//chapter
+    where empty($c/intro)
+    return $c/section/intro/para
+  }
+</result>

data/xquery_use_cases/sgml/q4.out

@@ -0,0 +1,4 @@
+<result><para>At the heart of an SGML application is a file called the DTD, or
+Document Type Definition. The DTD sets up the structure of a document,
+much like a database schema describes the types of information it
+handles.</para></result>

data/xquery_use_cases/sgml/q4.rb

@@ -0,0 +1,25 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.result!(
+    XML.load('sgml.xml').descendants(:chapter)[1].descendants(:section)[2].descendants(:para)[1]
+)

data/xquery_use_cases/sgml/q4.xquery

@@ -0,0 +1,5 @@
+<result>
+  {
+    (((doc("sgml.xml")//chapter)[2]//section)[3]//para)[2]
+  }
+</result>

data/xquery_use_cases/sgml/q5.out

@@ -0,0 +1,3 @@
+<result><para security='c'>Exiled members of the former Soviet Union's secret
+police, the KGB, have infiltrated the upper ranks of the GCA and are
+planning the Final Revolution as soon as DSSSL is completed.</para></result>

data/xquery_use_cases/sgml/q5.rb

@@ -0,0 +1,23 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.result!(XML.load('sgml.xml').descendants(:para).find_all{|p| p[:security] == 'c'})

data/xquery_use_cases/sgml/q5.xquery

@@ -0,0 +1,5 @@
+<result>
+  {
+    doc("sgml.xml")//para[@security = "c"]
+  }
+</result> 

data/xquery_use_cases/sgml/q6.out

@@ -0,0 +1 @@
+<result><stitle>What is markup?</stitle><stitle>What is SGML?</stitle><stitle>How does SGML work?</stitle><stitle/></result>

data/xquery_use_cases/sgml/q6.rb

@@ -0,0 +1,27 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.result! {
+    XML.load('sgml.xml').descendants(:section).each{|s|
+        stitle! s[:shorttitle]
+    }
+}

data/xquery_use_cases/sgml/q6.xquery

@@ -0,0 +1,6 @@
+<result>
+  {
+    for $s in doc("sgml.xml")//section/@shorttitle
+    return <stitle>{ $s }</stitle>
+  }
+</result>

data/xquery_use_cases/sgml/q7.out

@@ -0,0 +1 @@
+<result><first_letter>W</first_letter><first_letter>W</first_letter><first_letter>M</first_letter><first_letter>S</first_letter><first_letter>Y</first_letter><first_letter>T</first_letter></result>

data/xquery_use_cases/sgml/q7.rb

@@ -0,0 +1,27 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.result! {
+    XML.load('sgml.xml').descendants(:intro) {|i|
+        first_letter! i.children(:para)[0].text[0,1]
+    }
+}

data/xquery_use_cases/sgml/q7.xquery

@@ -0,0 +1,7 @@
+<result>
+  {
+    for $i in doc("sgml.xml")//intro/para[1]
+    return
+        <first_letter>{ substring(string($i), 1, 1) }</first_letter>
+  }
+</result>

data/xquery_use_cases/sgml/q8a.out

@@ -0,0 +1,34 @@
+<result><section shorttitle='What is SGML?'>
+<title>What <emph>is</emph> SGML in the grand scheme of the universe, anyway?</title>
+<intro>
+<para>SGML defines a strict markup scheme with a syntax for defining
+document data elements and an overall framework for marking up
+documents.</para>
+<para>SGML can describe and create documents that are not dependent on
+any hardware, software, formatter, or operating system. Since SGML documents
+conform to an international standard, they are portable.</para></intro></section><section shorttitle='How does SGML work?'>
+<title>How is SGML and would you recommend it to your grandmother?</title>
+<intro>
+<para>You can break a typical document into three layers: structure,
+content, and style. SGML works by separating these three aspects and
+deals mainly with the relationship between structure and content.</para></intro>
+<topic topicid='top4'>
+<title>Structure</title>
+<para>At the heart of an SGML application is a file called the DTD, or
+Document Type Definition. The DTD sets up the structure of a document,
+much like a database schema describes the types of information it
+handles.</para>
+<para>A database schema also defines the relationships between the
+various types of data. Similarly, a DTD specifies <emph>rules</emph>
+to help ensure documents have a consistent, logical structure.</para></topic>
+<topic topicid='top5'>
+<title>Content</title>
+<para>Content is the information itself. The method for identifying
+the information and its meaning within this framework is called
+<emph>tagging</emph>. Tagging must
+conform to the rules established in the DTD (see <xref xrefid='top4'/>).</para>
+<graphic graphname='tagexamp'/></topic>
+<topic topicid='top6'>
+<title>Style</title>
+<para>SGML does not standardize style or other processing methods for
+information stored in SGML.</para></topic></section></result>

data/xquery_use_cases/sgml/q8a.rb

@@ -0,0 +1,27 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.result! {
+    XML.load('sgml.xml').descendants(:section) {|s|
+        add! s if s.descendants(:title).any?{|t| t =~ /is SGML/}
+    }
+}

data/xquery_use_cases/sgml/q8a.xquery

@@ -0,0 +1,5 @@
+<result>
+   {
+     doc("sgml.xml")//section[.//title[contains(., "is SGML")]]
+   }
+</result>

data/xquery_use_cases/sgml/q8b.out

@@ -0,0 +1,26 @@
+<result><section shorttitle='How does SGML work?'>
+<title>How is SGML and would you recommend it to your grandmother?</title>
+<intro>
+<para>You can break a typical document into three layers: structure,
+content, and style. SGML works by separating these three aspects and
+deals mainly with the relationship between structure and content.</para></intro>
+<topic topicid='top4'>
+<title>Structure</title>
+<para>At the heart of an SGML application is a file called the DTD, or
+Document Type Definition. The DTD sets up the structure of a document,
+much like a database schema describes the types of information it
+handles.</para>
+<para>A database schema also defines the relationships between the
+various types of data. Similarly, a DTD specifies <emph>rules</emph>
+to help ensure documents have a consistent, logical structure.</para></topic>
+<topic topicid='top5'>
+<title>Content</title>
+<para>Content is the information itself. The method for identifying
+the information and its meaning within this framework is called
+<emph>tagging</emph>. Tagging must
+conform to the rules established in the DTD (see <xref xrefid='top4'/>).</para>
+<graphic graphname='tagexamp'/></topic>
+<topic topicid='top6'>
+<title>Style</title>
+<para>SGML does not standardize style or other processing methods for
+information stored in SGML.</para></topic></section></result>

data/xquery_use_cases/sgml/q8b.rb

@@ -0,0 +1,32 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+XML.result! {
+    doc = XML.load('sgml.xml')
+# If we don't normalize "single text node" isn't very meaningful
+    doc.normalize!
+    doc.descendants(:section) {|s|
+        add! s if s.descendants(:title).any?{|t|
+            t.descendants.any?{|d| d.is_a? String and d =~ /is SGML/}
+        }
+    }
+}

data/xquery_use_cases/sgml/q8b.xquery

@@ -0,0 +1,5 @@
+<result>
+   {
+     doc("sgml.xml")//section[.//title/text()[contains(., "is SGML")]]
+   }
+</result>

data/xquery_use_cases/sgml/q9.out

@@ -0,0 +1,9 @@
+<result><topic topicid='top4'>
+<title>Structure</title>
+<para>At the heart of an SGML application is a file called the DTD, or
+Document Type Definition. The DTD sets up the structure of a document,
+much like a database schema describes the types of information it
+handles.</para>
+<para>A database schema also defines the relationships between the
+various types of data. Similarly, a DTD specifies <emph>rules</emph>
+to help ensure documents have a consistent, logical structure.</para></topic></result>

data/xquery_use_cases/sgml/q9.rb

@@ -0,0 +1,29 @@
+#!/usr/bin/ruby -I../.. -rmagic_xml
+#Copyright (c) 2006-2007 Tomasz Wegrzanowski <Tomasz.Wegrzanowski@gmail.com>
+#
+#Permission is hereby granted, free of charge, to any person obtaining a
+#copy of this software and associated documentation files (the "Software"),
+#to deal in the Software without restriction, including without limitation
+#the rights to use, copy, modify, merge, publish, distribute, sublicense,
+#and/or sell copies of the Software, and to permit persons to whom the
+#Software is furnished to do so, subject to the following conditions:
+#
+#The above copyright notice and this permission notice shall be included in
+#all copies or substantial portions of the Software.
+#
+#THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+#IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+#FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+#THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+#OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+#ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
+#DEALINGS IN THE SOFTWARE.
+
+
+doc = XML.load('sgml.xml')
+
+XML.result! {
+    doc.descendants(:xref) {|xref|
+        add! doc.descendants(:topic).find_all{|t| t[:topicid] == xref[:xrefid]}
+    }
+}

data/xquery_use_cases/sgml/q9.xquery

@@ -0,0 +1,6 @@
+<result>
+  {
+    for $id in doc("sgml.xml")//xref/@xrefid
+    return doc("sgml.xml")//topic[@topicid = $id]
+  }
+</result>