RubyGems - blackwinter-libxslt-ruby - Versions diffs - 1.0.1 - Mend

blackwinter-libxslt-ruby 1.0.1

Files changed (29) hide show

data/CHANGES +81 -0
data/LICENSE +21 -0
data/README +164 -0
data/Rakefile +75 -0
data/ext/libxslt/extconf.rb +146 -0
data/ext/libxslt/libxslt.c +235 -0
data/ext/libxslt/libxslt.h +32 -0
data/ext/libxslt/ruby_xslt_stylesheet.c +271 -0
data/ext/libxslt/ruby_xslt_stylesheet.h +16 -0
data/ext/libxslt/version.h +5 -0
data/ext/vc/libxslt_ruby.sln +26 -0
data/ext/vc/libxslt_ruby.vcxproj +110 -0
data/lib/libxslt.rb +19 -0
data/lib/libxslt/deprecated.rb +68 -0
data/lib/xslt.rb +15 -0
data/libxslt-ruby.gemspec +49 -0
data/setup.rb +1585 -0
data/test/files/commentary.dtd +34 -0
data/test/files/fuzface.xml +154 -0
data/test/files/fuzface.xsl +4 -0
data/test/files/params.xml +2 -0
data/test/files/params.xsl +11 -0
data/test/files/ramblings.xsl +46 -0
data/test/test_deprecated.rb +100 -0
data/test/test_helper.rb +12 -0
data/test/test_libxslt.rb +22 -0
data/test/test_stylesheet.rb +106 -0
data/test/test_suite.rb +10 -0
metadata +113 -0

data/test/files/commentary.dtd ADDED Viewed

@@ -0,0 +1,34 @@
+<!ELEMENT commentary (meta, body)>
+<!ELEMENT meta (author, version, date, id, title, subtitle?)>
+<!-- Metadata about the requirements -->
+<!ENTITY % string       "#PCDATA">
+<!ENTITY % character    "#PCDATA">
+<!ENTITY % letter       "#PCDATA">
+<!ENTITY % number_att   "CDATA">
+<!ELEMENT author (first_name, last_name, email)>
+<!ELEMENT first_name   (%string;)>
+<!ELEMENT last_name    (%string;)>
+<!ELEMENT email        (%string;)>
+<!ELEMENT version       (#PCDATA)>
+<!ELEMENT date          (#PCDATA)>
+<!ELEMENT id            (#PCDATA)>
+<!ELEMENT title         (#PCDATA)>
+<!ELEMENT subtitle      (#PCDATA)>
+<!ELEMENT body (para+)>
+<!ELEMENT para (#PCDATA|thought|url|ol)*>
+<!ATTLIST para
+          style     (default|ps) "default">
+<!ELEMENT ol      (li+)>
+<!ELEMENT li      (#PCDATA)>
+<!ELEMENT url     (#PCDATA)>
+<!ELEMENT thought (#PCDATA)>

data/test/files/fuzface.xml ADDED Viewed

@@ -0,0 +1,154 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<?xml-stylesheet href="fuzface.xsl" type="text/xsl"?>
+<!DOCTYPE commentary SYSTEM "commentary.dtd">
+<commentary>
+  <meta>
+    <author>
+      <first_name>Sean</first_name>
+      <last_name>Chittenden</last_name>
+      <email>sean@chittenden.org</email>
+    </author>
+    <version>$Version$</version>
+    <date>$Date$</date>
+    <id>$Id$</id>
+    <title>Fuzface...</title>
+    <subtitle>The Internet's a big place and here's some proof...</subtitle>
+  </meta>
+  <body>
+    <para>
+      I think it's a tragedy that I'm going to start off my new
+      commentary by talking about facial hair and the Internet.
+      Something about that just screams pathetic, but whatever: it's
+      humor and that's life.
+    </para>
+    <para>
+      I've been working at home for a while now, which has been great.
+      I've been doing a lot of reading, good work, contributing to the
+      FreeBSD project, and living life at my own pace.  The problem?
+      I don't have to interact with people, so I've let my appearance
+      slide a bit, most notably I've gone two weeks without shaving
+      and I have an awful hairy face.
+    </para>
+    <para>
+      Nothing is worse than going for a hard run, coming back, and
+      then bending your head down so that the hairs under your chin
+      touch the hairs on your neck.  This has to be one of the most
+      disgusting/gross feelings I've experienced in a while.  While
+      today wasn't the first time I'd experienced such a slimy tangled
+      mess, it is the first time I seriously considered shaving part
+      of my face, but not all of it: I was considering a beard.
+    </para>
+    <para>
+      Alright, so it's 5pm and I'm a sweaty post-run mess (it was 110
+      degrees in direct sunlight according to my thermometer) and
+      considering the possibility of growing a beard.  Swifty nift?
+      Maybe.  This is something I'd never done before, let alone
+      seriously consider.  Normally I'd call my dad for such manly
+      advice, but he is: a) normally in another state, and; b) in
+      another country right now probably growing a beard (he's
+      notorious for coming back from a trip with a gnarly unshaven
+      face, sometimes he'll shape it into a decent beard).  So, what's
+      a tech-junkie to do?  Hop on the Internet and see if Google's
+      able to provide me with some inspiration.
+    </para>
+    <para>
+      Sure enough, I typed in "pictures of bearded men" and I was able
+      to find something: 14,000 pages of something to be exact.
+      Anyway, so most of these were rinky dink sites, a few of them
+      had some promise.  One guy was trying to start a tradition where
+      everyone grows a beard for New Years.  As I was scrolling down
+      the page trying to find some pictures, my mind was having the
+      following thought process: <thought>This seems like a dumb
+      idea... New Years provides a perfectly good excuse to kiss some
+      total stranger that you've had your eye on for the duration of a
+      New Years party.  Why waste such an opportunity with a crappy
+      kiss?</thought> And at about this point I said this page sucks,
+      and flipped back to my search results.
+    </para>
+    <para>
+      Since I'd never done this before, I didn't know what was
+      fashionably correct in terms of where a guy should shave under
+      his neck, or what the deal was...  I knew there were lots of
+      styles out there, just none that I could picture in my mind
+      (save maybe Santa Claus and a few really gnarly beards that are
+      long enough to be used as full-body covering.  Oooh!  And don't
+      forget the Russian and Amish beards, those stand out in my mind
+      too.).  Google, being pretty comprehensive, and the Internet
+      being huge, found the exact screwball page I was looking for:
+      <url>http://fuzface-gallery.tripod.com/</url>
+    </para>
+    <para>
+      I don't know if I really should be amazed at the sheer number of
+      entries that Google returned, or that the Internet is big enough
+      to house such random gallery of crap, but it is and it never
+      ceases to amaze me...  it's almost as amazing as the fact that
+      some bozo spent the time to create such a page.  Don't people
+      have lives?  Oh wait, I just visited his page...  so back to my
+      diatribe...
+    </para>
+    <para>
+      There were tons of faces, lots of men, lots of hair, and plenty
+      of styles to choose from.  Page after page of faces and hair.
+      Ugh.  This wasn't getting any where and I was now entertaining
+      the rebound though of shaving my head.  Time to close my browser
+      and hop in the shower: I reak.  So what'd I do?  Well, after
+      looking through enough of those pictures, I decided a few
+      things:
+    </para>
+    <para>
+      <ol>
+        <li>
+	  I'm amazed that the Internet is big enough to foster the
+	  creation of such random and utterly useless information.  Then
+	  again, I've been on and using the Net since '95, so this
+	  shouldn't surprise me that much.
+        </li>
+        <li>
+          There are a lot of guys out there with varying tastes in,
+	  shall we say, "facial hair styles," most of which I find
+	  pretty unappealing.
+        </li>
+        <li>
+	  I don't like beards.  After one clogged drain, two
+	  reapplications of shaving cream, and a few pases with the
+	  razor, it took me about 5-10 minutes to get a nice cleanly
+	  shaven face.
+        </li>
+        <li>
+          &lt;crass comment&gt;And - back me up here fellas, you can
+	  sympathize with this feeling after you get done looking
+	  through a magazine for a hair-cut style (ladies.. just smile
+	  and nod and pretend you care) - after looking at a few dozen
+	  pictures of men, I was able to safely reaffirm my desire for
+	  heterosexual relations (translation from Bill Clintonese: have
+	  sex with a woman).  And with that thought in mind, I began to
+	  pine for the college porn collection of old.  Mmmm,
+	  Playboy.&lt;/crass comment&gt;
+        </li>
+      </ol>
+    </para>
+    <para>
+      ::grin::  Until next time.  -Sean
+    </para>
+    <para style="ps">
+      P.S.  To the guys out there with beards, this is just my
+      opinion: take it with a grain of salt.
+    </para>
+  </body>
+</commentary>

data/test/files/fuzface.xsl ADDED Viewed

@@ -0,0 +1,4 @@
+<?xml version="1.0" ?>
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
+<xsl:include href="ramblings.xsl" />
+</xsl:stylesheet>

data/test/files/params.xml ADDED Viewed

	@@ -0,0 +1,2 @@
1	+ <?xml version="1.0" encoding="UTF-8"?>
2	+ <doc>abc</doc>

data/test/files/params.xsl ADDED Viewed

@@ -0,0 +1,11 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<xsl:stylesheet version='1.0'
+  xmlns:xsl='http://www.w3.org/1999/XSL/Transform'
+  xmlns:foo='http://example.com/foo'
+  exclude-result-prefixes='foo'>
+  <xsl:param name='bar'>failure</xsl:param>
+  <xsl:template match='/'>
+    <article><xsl:value-of select='$bar'/></article>
+  </xsl:template>
+</xsl:stylesheet>

data/test/files/ramblings.xsl ADDED Viewed

@@ -0,0 +1,46 @@
+<?xml version="1.0" ?>
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
+<xsl:template match="/">
+  <xsl:element name="html">
+    <xsl:element name="head">
+      <xsl:element name="title">Ramblings - <xsl:value-of select="commentary/meta/title" /> - <xsl:value-of select="commentary/meta/subtitle" /></xsl:element>
+    </xsl:element>
+    <xsl:element name="body">
+      <xsl:element name="h1"><xsl:value-of select="commentary/meta/title" /></xsl:element>
+      <xsl:element name="h3"><xsl:value-of select="commentary/meta/subtitle" /></xsl:element>
+      By: <xsl:value-of select="commentary/meta/author/first_name" /> <xsl:value-of select="commentary/meta/author/last_name" /><xsl:element name="br" />
+      Date: <xsl:value-of select="commentary/meta/date" /><xsl:element name="br" />
+      <xsl:for-each select="./commentary/body">
+        <xsl:apply-templates />
+      </xsl:for-each>
+    </xsl:element>
+  </xsl:element>
+</xsl:template>
+<xsl:template match="para">
+  <xsl:element name="p">
+    <xsl:apply-templates />
+  </xsl:element>
+</xsl:template>
+<xsl:template match="ol">
+  <xsl:element name="ol">
+    <xsl:apply-templates select="li" />
+  </xsl:element>
+</xsl:template>
+<xsl:template match="li">
+  <xsl:element name="li">
+    <xsl:value-of select="." />
+  </xsl:element>
+</xsl:template>
+<xsl:template match="thought">
+  <xsl:element name="i">
+    <xsl:value-of select="." />
+  </xsl:element>
+</xsl:template>
+</xsl:stylesheet>

data/test/test_deprecated.rb ADDED Viewed

@@ -0,0 +1,100 @@
+# encoding: UTF-8
+require 'test/unit'
+require 'test_helper'
+class TestDeprecated < Test::Unit::TestCase
+  def setup()
+    xsl_file = File.join(File.dirname(__FILE__), 'files/fuzface.xsl')
+    xml_file = File.join(File.dirname(__FILE__), 'files/fuzface.xml')
+    @xslt = XML::XSLT.file(xsl_file)
+    @xslt.doc = XML::Document.file(xml_file)
+    @stylesheet = @xslt.parse
+  end
+  def tear_down()
+    @xslt = nil
+    @stylesheet = nil
+  end
+  def test_constants
+    assert_instance_of(Fixnum, XML::XSLT::MAX_DEPTH)
+    assert_instance_of(Fixnum, XML::XSLT::MAX_SORT)
+    assert_instance_of(String, XML::XSLT::ENGINE_VERSION)
+    assert_instance_of(Fixnum, XML::XSLT::LIBXSLT_VERSION)
+    assert_instance_of(Fixnum, XML::XSLT::LIBXML_VERSION)
+    assert_instance_of(String, XML::XSLT::XSLT_NAMESPACE)
+    assert_instance_of(String, XML::XSLT::DEFAULT_URL)
+    assert_instance_of(String, XML::XSLT::DEFAULT_VENDOR)
+    assert_instance_of(String, XML::XSLT::DEFAULT_VERSION)
+    assert_instance_of(String, XML::XSLT::NAMESPACE_LIBXSLT)
+    assert_instance_of(String, XML::XSLT::NAMESPACE_SAXON)
+    assert_instance_of(String, XML::XSLT::NAMESPACE_XT)
+    assert_instance_of(String, XML::XSLT::NAMESPACE_XALAN)
+    assert_instance_of(String, XML::XSLT::NAMESPACE_NORM_SAXON)
+  end
+  def test_new
+    xslt = XML::XSLT.new
+    assert_instance_of(XML::XSLT::Stylesheet, xslt)
+    xslt.filename = File.join(File.dirname(__FILE__), 'files/fuzface.xsl')
+    assert_instance_of(String, xslt.filename)
+  end
+  def test_file_type
+    assert_instance_of(XML::XSLT::Stylesheet, @xslt)
+  end
+  def test_doc
+    xsl_file = File.join(File.dirname(__FILE__), 'files/fuzface.xsl')
+    xml_file = File.join(File.dirname(__FILE__), 'files/fuzface.xml')
+    xslt = XML::XSLT.file(xsl_file)
+    xslt.doc = XML::Document.file(xml_file)
+    assert_instance_of(XML::Document, xslt.doc)
+  end
+  def test_parse
+    xsl_file = File.join(File.dirname(__FILE__), 'files/fuzface.xsl')
+    xml_file = File.join(File.dirname(__FILE__), 'files/fuzface.xml')
+    xslt = XML::XSLT.file(xsl_file)
+    stylesheet = xslt.parse
+    assert_instance_of(XML::XSLT::Stylesheet, stylesheet)
+  end
+  def test_parse
+    assert_instance_of(XML::XSLT::Stylesheet, @stylesheet)
+  end
+  def test_to_s
+    @stylesheet.apply
+    str = @stylesheet.to_s
+    assert_instance_of(String, str)
+  end
+  def test_save
+    @stylesheet.apply
+    @stylesheet.save(file = "text.xml")
+  ensure
+    File.unlink(file) if file && File.exist?(file)
+  end
+  def test_print_invalid
+    @stylesheet.apply
+    @stylesheet.print
+  end
+  def test_save_invalid
+    assert_raises(ArgumentError) do
+      @stylesheet.save("str")
+    end
+  end
+  def test_print_invalid
+    assert_raises(ArgumentError) do
+      @stylesheet.print
+    end
+  end
+end

data/test/test_helper.rb ADDED Viewed

@@ -0,0 +1,12 @@
+# encoding: UTF-8
+# To make testing/debugging easier, test within this source tree versus an installed gem
+dir = File.dirname(__FILE__)
+root = File.expand_path(File.join(dir, '..'))
+lib = File.expand_path(File.join(root, 'lib'))
+$LOAD_PATH << lib
+require 'xslt'

data/test/test_libxslt.rb ADDED Viewed

@@ -0,0 +1,22 @@
+# encoding: UTF-8
+require 'test/unit'
+require 'test_helper'
+class TextLibXslt < Test::Unit::TestCase
+  def test_constants
+    assert_instance_of(Fixnum, XSLT::MAX_DEPTH)
+    assert_instance_of(Fixnum, XSLT::MAX_SORT)
+    assert_instance_of(String, XSLT::ENGINE_VERSION)
+    assert_instance_of(Fixnum, XSLT::LIBXSLT_VERSION)
+    assert_instance_of(Fixnum, XSLT::LIBXML_VERSION)
+    assert_instance_of(String, XSLT::XSLT_NAMESPACE)
+    assert_instance_of(String, XSLT::DEFAULT_URL)
+    assert_instance_of(String, XSLT::DEFAULT_VENDOR)
+    assert_instance_of(String, XSLT::DEFAULT_VERSION)
+    assert_instance_of(String, XSLT::NAMESPACE_LIBXSLT)
+    assert_instance_of(String, XSLT::NAMESPACE_SAXON)
+    assert_instance_of(String, XSLT::NAMESPACE_XT)
+    assert_instance_of(String, XSLT::NAMESPACE_XALAN)
+    assert_instance_of(String, XSLT::NAMESPACE_NORM_SAXON)
+  end
+end

data/test/test_stylesheet.rb ADDED Viewed

@@ -0,0 +1,106 @@
+# encoding: UTF-8
+require 'test/unit'
+require 'test_helper'
+class TestStylesheet < Test::Unit::TestCase
+  def setup
+    filename = File.join(File.dirname(__FILE__), 'files/fuzface.xsl')
+    doc = XML::Document.file(filename)
+    @stylesheet = XSLT::Stylesheet.new(doc)
+  end
+  def tear_down
+    @stylesheet = nil
+  end
+  def doc
+    filename = File.join(File.dirname(__FILE__), 'files/fuzface.xml')
+    XML::Document.file(filename)
+  end
+  def test_class
+    assert_instance_of(XSLT::Stylesheet, @stylesheet)
+  end
+  def test_apply
+    result = @stylesheet.apply(doc)
+    assert_instance_of(XML::Document, result)
+    paragraphs = result.find('//p')
+    assert_equal(11, paragraphs.length)
+  end
+  def test_apply_multiple
+    10.times do
+      test_apply
+    end
+  end
+  def test_params
+    filename = File.join(File.dirname(__FILE__), 'files/params.xsl')
+    sdoc = XML::Document.file(filename)
+    filename = File.join(File.dirname(__FILE__), 'files/params.xml')
+    stylesheet = XSLT::Stylesheet.new(sdoc)
+    doc = XML::Document.file(filename)
+    # Start with no params
+    result = stylesheet.apply(doc)
+    assert_equal('<article>failure</article>', result.root.to_s)
+    # Now try with params as hash.  /doc is evaluated
+    # as an xpath expression
+    result = stylesheet.apply(doc, 'bar' => "/doc")
+    assert_equal('<article>abc</article>', result.root.to_s)
+    # Now try with params as hash.  Note the double quote
+    # on success - we want to pass a literal string and
+    # not an xpath expression.
+    result = stylesheet.apply(doc, 'bar' => "'success'")
+    assert_equal('<article>success</article>', result.root.to_s)
+    # Now try with params as an array.
+    result = stylesheet.apply(doc, ['bar', "'success'"])
+    assert_equal('<article>success</article>', result.root.to_s)
+    # Now try with invalid array.
+    result = stylesheet.apply(doc, ['bar'])
+    assert_equal('<article>failure</article>', result.root.to_s)
+  end
+  # -- Memory Tests ----
+  def test_doc_ownership
+    10.times do
+      filename = File.join(File.dirname(__FILE__), 'files/fuzface.xsl')
+      sdoc = XML::Document.file(filename)
+      GC.start
+      assert_equal(173, sdoc.to_s.length)
+    end
+  end
+  def test_stylesheet_ownership
+    10.times do
+      filename = File.join(File.dirname(__FILE__), 'files/fuzface.xsl')
+      sdoc = XML::Document.file(filename)
+      stylesheet = XSLT::Stylesheet.new(sdoc)
+      sdoc = nil
+      GC.start
+      rdoc = stylesheet.apply(doc)
+      assert_equal(5963, rdoc.to_s.length)
+    end
+  end
+  def test_result_ownership
+    10.times do
+      filename = File.join(File.dirname(__FILE__), 'files/fuzface.xsl')
+      sdoc = XML::Document.file(filename)
+      stylesheet = XSLT::Stylesheet.new(sdoc)
+      rdoc = stylesheet.apply(doc)
+      rdoc = nil
+      GC.start
+    end
+  end
+end