RubyGems - ruby-xslt - Versions diffs - 0.9.2 - Mend

ruby-xslt 0.9.2

Files changed (38) hide show

data/AUTHORS +23 -0
data/COPYING +340 -0
data/ChangeLog +64 -0
data/README +137 -0
data/debug/memwatch.c +2664 -0
data/debug/memwatch.h +707 -0
data/examples/commentary.dtd +34 -0
data/examples/functions.xsl +51 -0
data/examples/fuzface.rb +13 -0
data/examples/fuzface.xml +154 -0
data/examples/fuzface.xsl +4 -0
data/examples/fuzface_REXML.rb +11 -0
data/examples/fuzface_XML-Simple.rb +12 -0
data/examples/fuzface_data.rb +13 -0
data/examples/fuzface_error.rb +86 -0
data/examples/fuzface_to_s.rb +9 -0
data/examples/info.rb +19 -0
data/examples/ramblings.xsl +46 -0
data/examples/test.xml +5 -0
data/examples/test.xsl +18 -0
data/examples/test_functions.rb +18 -0
data/examples/test_parameters.rb +13 -0
data/extconf.rb +114 -0
data/extfunc.c +216 -0
data/extfunc.h +26 -0
data/parameters.c +59 -0
data/parameters.h +20 -0
data/parser.c +228 -0
data/parser.h +30 -0
data/rb_utils.c +30 -0
data/rb_utils.h +34 -0
data/ruby-xslt.gemspec +19 -0
data/tests/t.xml +2 -0
data/tests/t.xsl +6 -0
data/tests/test.rb +125 -0
data/xslt.c +619 -0
data/xslt.h +98 -0
metadata +98 -0

@@ -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/examples/functions.xsl ADDED

@@ -0,0 +1,51 @@
+<?xml version="1.0"?>
+<xsl:stylesheet
+	xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+	xmlns:src="http://xml.apache.org/xindice/Query"
+	xmlns:ex="http://test.none"
+	xsl:version="1.0">
+<xsl:output
+  encoding="UTF-8"
+  indent="yes"
+	/>
+<xsl:variable name="number" select="1"/>
+<xsl:variable name="string" select="'comment appelle-tu ça?'"/>
+<xsl:variable name="bool" select="true()"/>
+<xsl:variable name="nodes" select="nodes"/>
+<xsl:template match="/">
+  <table>
+    <tr><th>value-of</th><th>ex:type()</th><th>ex:round-trip()</th></tr>
+    <tr>
+      <td><xsl:value-of select="$nodes"/></td>
+      <td><xsl:value-of select="ex:type($nodes)"/></td>
+      <td><xsl:apply-templates select="ex:round-trip($nodes)"/></td>
+    </tr>
+    <xsl:call-template name="row">
+      <xsl:with-param name="value" select="$number"/>
+    </xsl:call-template>
+    <xsl:call-template name="row">
+      <xsl:with-param name="value" select="$string"/>
+    </xsl:call-template>
+    <xsl:call-template name="row">
+      <xsl:with-param name="value" select="$bool"/>
+    </xsl:call-template>
+  </table>
+</xsl:template>
+<xsl:template name="row">
+  <xsl:param name="value"/>
+  <tr>
+    <td><xsl:value-of select="$value"/></td>
+    <td><xsl:value-of select="ex:type($value)"/></td>
+    <td><xsl:value-of select="ex:round-trip($value)"/></td>
+  </tr>
+</xsl:template>
+<xsl:template match="node">
+	<xsl:value-of select="."/>(<xsl:value-of select="@number"/>)&#10;
+</xsl:template>
+</xsl:stylesheet>

data/examples/fuzface.rb ADDED

@@ -0,0 +1,13 @@
+#!/usr/bin/ruby -w
+require '../xslt'
+xslt = XML::XSLT.new()
+xslt.xmlfile = "fuzface.xml"
+xslt.xslfile = "fuzface.xsl"
+out = xslt.serve()
+print out;
+out = xslt.serve()
+print out;

data/examples/fuzface.xml ADDED

@@ -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: 2005/11/07 07:42:28 $</date>
+    <id>$Id: fuzface.xml,v 1.1 2005/11/07 07:42:28 greg Exp $</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/examples/fuzface.xsl ADDED

@@ -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/examples/fuzface_REXML.rb ADDED

@@ -0,0 +1,11 @@
+#!/usr/bin/ruby -w
+require 'rexml/document'
+require '../xslt'
+xslt = XML::XSLT.new()
+xslt.xml = REXML::Document.new File.open( "fuzface.xml" )
+xslt.xsl = REXML::Document.new File.open( "fuzface.xsl" )
+out = xslt.serve()
+puts out

data/examples/fuzface_XML-Simple.rb ADDED

@@ -0,0 +1,12 @@
+#!/usr/bin/ruby -w
+require 'xml/smart'
+require '../xslt'
+xslt = XML::XSLT.new()
+xslt.xml = XML::Smart.open( "fuzface.xml" )
+xslt.xsl = XML::Smart.open( "fuzface.xsl" )
+out = xslt.serve()
+puts out

data/examples/fuzface_data.rb ADDED

@@ -0,0 +1,13 @@
+#!/usr/bin/ruby -w
+require '../xslt'
+xslt = XML::XSLT.new()
+xslt.xml = IO::readlines( "fuzface.xml" ).join
+xslt.xsl = IO::readlines( "fuzface.xsl" ).join
+out = xslt.serve()
+print out;
+out = xslt.serve()
+print out;

data/examples/fuzface_error.rb ADDED

@@ -0,0 +1,86 @@
+#!/usr/bin/ruby -w
+require '../xslt'
+xslt = XML::XSLT.new()
+print "\n-------------------------------------------------\n"
+print "ERROR #1 : XML XSL inverse\n"
+begin
+xslt.xsl = IO::readlines( "fuzface.xml" ).join( )
+rescue => e
+  print "Error trapped by ", e.class, " : ", e.message, "\n"
+  p XML::XSLT::errors
+end
+begin
+  xslt.xml = IO::readlines( "fuzface.xsl" ).join( )
+rescue => e
+  print "Error trapped by ", e.class, " : ", e.message, "\n"
+  p XML::XSLT::errors
+end
+begin
+  out = xslt.serve()
+rescue => e
+  print "Error trapped by ", e.class, " : ", e.message, "\n"
+  p XML::XSLT::errors
+end
+print "\n-------------------------------------------------\n"
+print "ERROR #2 : XSL error\n"
+begin
+  xslt.xml = IO::readlines( "fuzface.xml" ).join( )
+rescue => e
+  print "Error trapped by ", e.class, " : ", e.message, "\n"
+  p XML::XSLT::errors
+end
+begin
+  xslt.xsl = "totototototot"
+rescue => e
+  print "Error trapped by ", e.class, " : ", e.message, "\n"
+  p XML::XSLT::errors
+end
+begin
+  out = xslt.serve()
+rescue => e
+  print "Error trapped by ", e.class, " : ", e.message, "\n"
+  p XML::XSLT::errors
+end
+print "\n-------------------------------------------------\n"
+print "ERROR #3 : XML error\n"
+begin
+  xslt.xml = "totototototot"
+rescue => e
+  print "Error trapped by ", e.class, " : ", e.message, "\n"
+  p XML::XSLT::errors
+end
+begin
+  xslt.xsl = IO::readlines( "fuzface.xsl" ).join( )
+rescue => e
+  print "Error trapped by ", e.class, " : ", e.message, "\n"
+  p XML::XSLT::errors
+end
+begin
+  out = xslt.serve()
+rescue => e
+  print "Error trapped by ", e.class, " : ", e.message, "\n"
+  p XML::XSLT::errors
+end
+print "\n-------------------------------------------------\n"
+print "SUCCESS !\n"
+xslt.xml = IO::readlines( "fuzface.xml" ).join( )
+xslt.xsl = IO::readlines( "fuzface.xsl" ).join( )
+begin
+  out = xslt.serve()
+rescue => e
+  print "Error trapped by ", e.class, " : ", e.message, "\n"
+  p XML::XSLT::errors
+end

data/examples/fuzface_to_s.rb ADDED

@@ -0,0 +1,9 @@
+#!/usr/bin/ruby -w
+require '../xslt'
+xslt = XML::XSLT.new()
+xslt.xsl = "fuzface.xsl"
+print xslt.xsl_to_s;
+puts

data/examples/info.rb ADDED

@@ -0,0 +1,19 @@
+#!/usr/bin/ruby
+require "../xslt"
+print "MAX_DEPTH = ", XML::XSLT::MAX_DEPTH, "\n"
+print "MAX_SORT = ", XML::XSLT::MAX_SORT, "\n"
+print "ENGINE_VERSION = ", XML::XSLT::ENGINE_VERSION, "\n"
+print "LIBXSLT_VERSION = ", XML::XSLT::LIBXSLT_VERSION, "\n"
+print "LIBXML_VERSION = ", XML::XSLT::LIBXML_VERSION, "\n"
+print "XSLT_NAMESPACE = ", XML::XSLT::XSLT_NAMESPACE, "\n"
+print "DEFAULT_VENDOR = ", XML::XSLT::DEFAULT_VENDOR, "\n"
+print "DEFAULT_VERSION = ", XML::XSLT::DEFAULT_VERSION, "\n"
+print "DEFAULT_URL = ", XML::XSLT::DEFAULT_URL, "\n"
+print "NAMESPACE_LIBXSLT = ", XML::XSLT::NAMESPACE_LIBXSLT, "\n"
+print "NAMESPACE_NORM_SAXON = ", XML::XSLT::NAMESPACE_NORM_SAXON, "\n"
+print "NAMESPACE_SAXON = ", XML::XSLT::NAMESPACE_SAXON, "\n"
+print "NAMESPACE_XT = ", XML::XSLT::NAMESPACE_XT, "\n"
+print "NAMESPACE_XALAN = ", XML::XSLT::NAMESPACE_XALAN, "\n"
+print "RUBY_XSLT_VERSION = ", XML::XSLT::RUBY_XSLT_VERSION, "\n"

data/examples/ramblings.xsl ADDED

@@ -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>