riddl 0.99.105

data/test/tc_declaration-hybrid.rb

@@ -0,0 +1,71 @@
+require File.expand_path(File.dirname(__FILE__) + '/smartrunner.rb')
+require File.expand_path(File.dirname(__FILE__) + '/../lib/riddl/client')
+require 'xml/smart'
+require 'pp'
+
+class TestDecHy <  MiniTest::Unit::TestCase
+  include ServerCase
+
+  SERVER = [
+    TestServerInfo.new(
+      File.expand_path(File.dirname(__FILE__) + '/../examples/declaration-server-hybrid/xsloverlay.rb'),
+      File.expand_path(File.dirname(__FILE__) + '/../examples/declaration-server-hybrid/xsloverlay.xml')
+    ),
+    TestServerInfo.new(
+      File.expand_path(File.dirname(__FILE__) + '/../examples/declaration-server-hybrid/declaration.rb'),
+      File.expand_path(File.dirname(__FILE__) + '/../examples/declaration-server-hybrid/declaration.xml')
+    )
+  ]
+  NORUN = false
+
+  def test_dechy
+    ep = Riddl::Client.interface(SERVER[1].url,SERVER[1].schema)
+
+    test = ep.resource('/')
+    status, res = test.get
+    assert status == 200
+    doc = XML::Smart.string(res[0].value.read)
+    assert doc.find('/processing-instruction("xml-stylesheet")').length == 1
+    assert doc.find('/processing-instruction("xml-stylesheet")').first.content =~ /instances\.xsl/
+    assert doc.find('/instances/instance').length == 2
+
+    test = ep.resource('/1')
+    status, res = test.get
+    assert status == 200
+    doc = XML::Smart.string(res[0].value.read)
+    assert doc.find('/processing-instruction("xml-stylesheet")').length == 1
+    assert doc.find('/processing-instruction("xml-stylesheet")').first.content =~ /info\.xsl/
+    assert doc.find('/info/properties').length == 1
+
+    test = ep.resource('/1/properties')
+    status, res = test.get
+    assert status == 200
+    doc = XML::Smart.string(res[0].value.read)
+    assert doc.find('/processing-instruction("xml-stylesheet")').length == 1
+    assert doc.find('/processing-instruction("xml-stylesheet")').first.content =~ /properties\.xsl/
+    assert doc.find('/xmlns:properties/xmlns:name').length == 1
+    assert doc.find('/xmlns:properties/xmlns:state').length == 1
+    assert doc.find('/xmlns:properties/xmlns:dataelements').length == 1
+    assert doc.find('/xmlns:properties/xmlns:endpoints').length == 1
+    assert doc.find('/xmlns:properties/xmlns:handlerwrapper').length == 1
+    assert doc.find('/xmlns:properties/xmlns:description').length == 1
+
+    test = ep.resource('/1/properties/values')
+    status, res = test.get
+    assert status == 200
+    doc = XML::Smart.string(res[0].value.read)
+    assert doc.find('/processing-instruction("xml-stylesheet")').length == 1
+    assert doc.find('/processing-instruction("xml-stylesheet")').first.content =~ /values\.xsl/
+    assert doc.find('/xmlns:properties/xmlns:property[.="name"]').length == 1
+    assert doc.find('/xmlns:properties/xmlns:property[.="state"]').length == 1
+    assert doc.find('/xmlns:properties/xmlns:property[.="dataelements"]').length == 1
+    assert doc.find('/xmlns:properties/xmlns:property[.="endpoints"]').length == 1
+    assert doc.find('/xmlns:properties/xmlns:property[.="handlerwrapper"]').length == 1
+    assert doc.find('/xmlns:properties/xmlns:property[.="description"]').length == 1
+
+    test = ep.resource('/1/properties/values/name')
+    status, res = test.get
+    assert status == 200
+    assert res[0].value == 'laller'
+  end
+end

data/test/tc_declaration-local.rb

@@ -0,0 +1,47 @@
+require File.expand_path(File.dirname(__FILE__) + '/smartrunner.rb')
+require File.expand_path(File.dirname(__FILE__) + '/../lib/riddl/client')
+require 'xml/smart'
+require 'pp'
+
+class TestDecLo <  MiniTest::Unit::TestCase
+  include ServerCase
+
+  SERVER = [
+    TestServerInfo.new(
+      File.expand_path(File.dirname(__FILE__) + '/../examples/declaration-server-local/declaration.rb'),
+      File.expand_path(File.dirname(__FILE__) + '/../examples/declaration-server-local/declaration.xml')
+    )
+  ]
+  NORUN = false
+
+  def test_declo
+    ep = Riddl::Client.interface(SERVER[0].url,SERVER[0].schema)
+
+    test = ep.resource('/')
+    status, res = test.get
+    assert status == 200
+    doc = XML::Smart.string(res[0].value.read)
+
+    assert doc.find('/processing-instruction("xml-stylesheet")').length == 1
+    assert doc.find('/processing-instruction("xml-stylesheet")').first.content =~ /properties\.xsl/
+    assert doc.find('/xmlns:properties/xmlns:dataelements/*').length == 2
+
+    test = ep.resource('/values')
+    status, res = test.get
+    assert status == 200
+    doc = XML::Smart.string(res[0].value.read)
+    assert doc.find('/processing-instruction("xml-stylesheet")').length == 1
+    assert doc.find('/processing-instruction("xml-stylesheet")').first.content =~ /values\.xsl/
+    assert doc.find('/xmlns:properties/xmlns:property[.="name"]').length == 1
+    assert doc.find('/xmlns:properties/xmlns:property[.="state"]').length == 1
+    assert doc.find('/xmlns:properties/xmlns:property[.="dataelements"]').length == 1
+    assert doc.find('/xmlns:properties/xmlns:property[.="endpoints"]').length == 1
+    assert doc.find('/xmlns:properties/xmlns:property[.="handlerwrapper"]').length == 1
+    assert doc.find('/xmlns:properties/xmlns:property[.="description"]').length == 1
+
+    test = ep.resource('/values/state')
+    status, res = test.get
+    assert status == 200
+    assert res[0].value == 'stopped'
+  end
+end

data/test/tc_helloworld.rb

@@ -0,0 +1,17 @@
+require File.expand_path(File.dirname(__FILE__) + '/smartrunner.rb')
+require File.expand_path(File.dirname(__FILE__) + '/../lib/riddl/wrapper')
+
+class TestHelloWorld <  MiniTest::Unit::TestCase
+
+  def test_hw
+    riddl = Riddl::Wrapper.new(
+      File.expand_path(File.dirname(__FILE__) + '/../examples/helloworld/declaration.xml')
+    )
+
+    assert riddl.declaration?
+    assert riddl.validate!
+    assert riddl.declaration.description_xml == File.read(
+      File.expand_path(File.dirname(__FILE__) + '/../examples/helloworld/declaration-definition_goal.xml')
+    )
+  end
+end

data/test/tc_producer.rb

@@ -0,0 +1,54 @@
+require File.expand_path(File.dirname(__FILE__) + '/smartrunner.rb')
+require File.expand_path(File.dirname(__FILE__) + '/../lib/riddl/client')
+require 'xml/smart'
+
+class TestProd <  MiniTest::Unit::TestCase
+  include ServerCase
+
+  SERVER = [
+    TestServerInfo.new(
+      File.expand_path(File.dirname(__FILE__) + '/../examples/notifications/producer.rb'),
+      File.expand_path(File.dirname(__FILE__) + '/../examples/notifications/producer.declaration.xml')
+    )
+  ]
+  NORUN = false
+
+  def test_producer
+    nots = Riddl::Client.interface(SERVER[0].url,SERVER[0].schema)
+
+    test = nots.resource("/notifications/subscriptions")
+    status, res = test.post [
+      Riddl::Parameter::Simple.new("url","http://test.org"),
+      Riddl::Parameter::Simple.new("topic","/oliver"),
+      Riddl::Parameter::Simple.new("events","get"),
+      Riddl::Parameter::Simple.new("topic","/juergen"),
+      Riddl::Parameter::Simple.new("events","praise,adore")
+    ]
+    assert status == 200
+    assert (key = res[0].value).is_a?(String)
+
+    status, res = test.get
+
+    doc = XML::Smart.string(res[0].value.read)
+    doc.register_namespace 'n', 'http://riddl.org/ns/common-patterns/notifications-producer/1.0'
+    assert doc.find("/n:subscriptions/n:subscription[@id='#{key}' and @url='http://test.org']").any?
+
+    test = nots.resource("/notifications/subscriptions/#{key}")
+    status, res = test.get
+    assert status == 200
+
+    doc = XML::Smart.string(res[0].value.read)
+    doc.register_namespace 'n', 'http://riddl.org/ns/common-patterns/notifications-producer/1.0'
+
+    assert doc.find('/n:subscription/n:topic').length == 2
+    assert doc.find('/n:subscription/n:topic[1]/n:event').length == 1
+    assert doc.find('/n:subscription/n:topic[2]/n:event').length == 2
+
+    status, res = test.delete
+    assert status == 200
+
+    test = nots.resource("/notifications/subscriptions/#{key}")
+    status, res = test.get
+    assert status == 500
+  end
+end

data/test/tc_properties.rb

@@ -0,0 +1,72 @@
+require File.expand_path(File.dirname(__FILE__) + '/smartrunner.rb')
+require File.expand_path(File.dirname(__FILE__) + '/../lib/riddl/client')
+require 'xml/smart'
+
+class TestProp <  MiniTest::Unit::TestCase
+  include ServerCase
+
+  SERVER = [
+    TestServerInfo.new(
+      File.expand_path(File.dirname(__FILE__) + '/../examples/properties/description.rb'),
+      File.expand_path(File.dirname(__FILE__) + '/../examples/properties/properties.xml')
+    )
+  ]
+  NORUN = false
+
+  def test_properties
+    props = Riddl::Client.new(SERVER[0].url,SERVER[0].schema)
+
+    test = props.resource("/values/state")
+    status, res = test.get
+    assert status == 200
+    assert res.length == 1
+
+    if res[0].value == 'running'
+      status, res = test.put [ Riddl::Parameter::Simple.new("value","stopped") ]; assert status == 200
+      status, res = test.put [ Riddl::Parameter::Simple.new("value","stopped") ]; assert status == 404
+    else  
+      status, res = test.put [ Riddl::Parameter::Simple.new("value","running") ]; assert status == 200
+      status, res = test.put [ Riddl::Parameter::Simple.new("value","running") ]; assert status == 404
+    end
+
+    test = props.resource("/values")
+    status, res = test.get
+    assert status == 200
+    assert res.length == 1
+    
+    doc = XML::Smart.open(res[0].value)
+    assert doc.find('/xmlns:properties/xmlns:property[.="name"]').any?
+    assert doc.find('/xmlns:properties/xmlns:property[.="description"]').any?
+    assert doc.find('/xmlns:properties/xmlns:property[.="dataelements"]').any?
+
+    if doc.find('/xmlns:properties/xmlns:property[.="transformation"]').any?
+      test = props.resource("/values/transformation")
+      status, res = test.delete; assert status == 200
+      test = props.resource("/values")
+      status, res = test.post [ Riddl::Parameter::Simple.new("name","transformation"), Riddl::Parameter::Simple.new("value","xxx") ]; assert status == 200
+    else
+      test = props.resource("/values")
+      status, res = test.post [ Riddl::Parameter::Simple.new("name","transformation"), Riddl::Parameter::Simple.new("value","xxx") ]; assert status == 200
+    end
+
+    test = props.resource("/values/dataelements/c")
+    status, res = test.get
+    if status == 404
+      test = props.resource("/values/dataelements")
+      status, res = test.post [ Riddl::Parameter::Simple.new("value","<c>hallo</c>") ]; assert status == 200
+    elsif status == 200
+      test = props.resource("/values/dataelements/c")
+      status, res = test.delete; assert status == 200
+      test = props.resource("/values/dataelements")
+      status, res = test.post [ Riddl::Parameter::Simple.new("value","<c>hallo</c>") ]; assert status == 200
+    else
+      assert false
+    end
+
+    test = props.resource("/values/dataelements/c")
+    status, res = test.put [ Riddl::Parameter::Simple.new("value","foo") ]; assert status == 200
+
+    test = props.resource("/values/name")
+    status, res = test.put [ Riddl::Parameter::Simple.new("value","juergen") ]; assert status == 500
+  end
+end

data/tools/flash-policy-server.rb

@@ -0,0 +1,12 @@
+#!/usr/bin/ruby
+require "socket"
+
+WS_FLASH_SOCKET_POLICY = "<cross-domain-policy><allow-access-from domain='*' to-ports='*'/></cross-domain-policy>\n"
+
+server = TCPServer.open(843)
+loop {
+  Thread.start(server.accept) do |client|
+    client.puts WS_FLASH_SOCKET_POLICY
+    client.close
+  end
+}

data/tools/riddlcheck

@@ -0,0 +1,36 @@
+#!/usr/bin/ruby 
+curpath = __FILE__
+while ::File::symlink?(curpath)
+  curpath = ::File::dirname(curpath) + '/' + ::File::readlink(curpath)
+end  
+require 'rubygems'
+require ::File::dirname(curpath) + "/../lib/riddl/wrapper"
+require 'optparse'
+
+ARGV.options { |opt|
+  opt.summary_indent = ' ' * 2
+  opt.banner = "Usage:\n#{opt.summary_indent}#{File.basename($0)} [options] [FILENAME]\n"
+  opt.on("Options:")
+  opt.on("--help", "-h", "This text") { puts opt; exit }
+  opt.on("Filename is either a description or a declaration.")
+  opt.parse!
+}
+if ARGV.length == 0 || !File.exists?(ARGV[0])
+  puts ARGV.options
+  exit
+end
+fname = ARGV[0]
+
+riddl = Riddl::Wrapper::new(fname)
+
+if riddl.description?
+  puts 'RIDDL description found.'
+elsif riddl.declaration?
+  puts 'RIDDL declaration found.'
+else  
+  puts 'Neither a RIDDL description, nor a RIDDL declaration.'
+  exit
+end
+
+messages = riddl.validate!
+puts messages ? "RIDDL looks valid." : "RIDDL not valid."

data/tools/riddlcheck-1_0

@@ -0,0 +1,36 @@
+#!/usr/bin/ruby 
+curpath = __FILE__
+while ::File::symlink?(curpath)
+  curpath = ::File::dirname(curpath) + '/' + ::File::readlink(curpath)
+end  
+require 'rubygems'
+require ::File::dirname(curpath) + "/../lib/riddl/wrapper"
+require 'optparse'
+
+ARGV.options { |opt|
+  opt.summary_indent = ' ' * 2
+  opt.banner = "Usage:\n#{opt.summary_indent}#{File.basename($0)} [options] [FILENAME]\n"
+  opt.on("Options:")
+  opt.on("--help", "-h", "This text") { puts opt; exit }
+  opt.on("Filename is either a description or a declaration.")
+  opt.parse!
+}
+if ARGV.length == 0 || !File.exists?(ARGV[0])
+  puts ARGV.options
+  exit
+end
+fname = ARGV[0]
+
+riddl = Riddl::Wrapper::new(fname)
+
+if riddl.description?
+  puts 'RIDDL description found.'
+elsif riddl.declaration?
+  puts 'RIDDL declaration found.'
+else  
+  puts 'Neither a RIDDL description, nor a RIDDL declaration.'
+  exit
+end
+
+messages = riddl.validate!
+puts messages ? "RIDDL looks valid." : "RIDDL not valid."

data/tools/riddlprocess

@@ -0,0 +1,51 @@
+#!/usr/bin/ruby 
+curpath = __FILE__
+while ::File::symlink?(curpath)
+  curpath = ::File::dirname(curpath) + '/' + ::File::readlink(curpath)
+end  
+require 'rubygems'
+require ::File::dirname(curpath) + "/../lib/riddl/wrapper"
+require 'optparse'
+require 'pp'
+
+dowhat = nil
+ARGV.options { |opt|
+  opt.summary_indent = ' ' * 2
+  opt.banner = "Usage:\n#{opt.summary_indent}#{File.basename($0)} [options] [FILENAME]\n"
+  opt.on("Options:")
+  opt.on("--help", "-h", "This text.") { puts opt; exit }
+  opt.on("--vtl", "-l", "For each tile visualize the resource tree and the layers.") { dowhat = "layers" }
+  opt.on("--vtc", "-c", "For each tile visualize the resource tree and the resulting compositions.") { dowhat = "compositions" }
+  opt.on("--vf", "-f", "Visualize the resulting facade.") { dowhat = "facade" }
+  opt.on("--description", "-d", "Return the XML description for the facade.") { dowhat = "description" }
+  opt.on("Filename has to be a declaration.")
+  opt.parse!
+}
+if ARGV.length == 0 || !File.exists?(ARGV[0]) || dowhat.nil?
+  puts ARGV.options
+  exit
+end
+fname = ARGV[0]
+
+riddl = Riddl::Wrapper.new(fname)
+
+unless riddl.declaration?
+  puts 'Not a RIDDL declaration.' 
+  exit
+end
+unless riddl.validate!
+  puts "Does not conform to specification."
+  exit
+end
+
+d = riddl.declaration
+case dowhat
+  when 'layers'
+    d.visualize_tiles_and_layers
+  when 'compositions'
+    d.visualize_tiles_and_compositions
+  when 'facade'
+    d.visualize_facade
+  when 'description'
+    puts d.description_xml
+end 

data/tools/riddlprocess-1_0

@@ -0,0 +1,51 @@
+#!/usr/bin/ruby 
+curpath = __FILE__
+while ::File::symlink?(curpath)
+  curpath = ::File::dirname(curpath) + '/' + ::File::readlink(curpath)
+end  
+require 'rubygems'
+require ::File::dirname(curpath) + "/../lib/riddl/wrapper"
+require 'optparse'
+require 'pp'
+
+dowhat = nil
+ARGV.options { |opt|
+  opt.summary_indent = ' ' * 2
+  opt.banner = "Usage:\n#{opt.summary_indent}#{File.basename($0)} [options] [FILENAME]\n"
+  opt.on("Options:")
+  opt.on("--help", "-h", "This text.") { puts opt; exit }
+  opt.on("--vtl", "-l", "For each tile visualize the resource tree and the layers.") { dowhat = "layers" }
+  opt.on("--vtc", "-c", "For each tile visualize the resource tree and the resulting compositions.") { dowhat = "compositions" }
+  opt.on("--vf", "-f", "Visualize the resulting facade.") { dowhat = "facade" }
+  opt.on("--description", "-d", "Return the XML description for the facade.") { dowhat = "description" }
+  opt.on("Filename has to be a declaration.")
+  opt.parse!
+}
+if ARGV.length == 0 || !File.exists?(ARGV[0]) || dowhat.nil?
+  puts ARGV.options
+  exit
+end
+fname = ARGV[0]
+
+riddl = Riddl::Wrapper.new(fname)
+
+unless riddl.declaration?
+  puts 'Not a RIDDL declaration.' 
+  exit
+end
+unless riddl.validate!
+  puts "Does not conform to specification."
+  exit
+end
+
+d = riddl.declaration
+case dowhat
+  when 'layers'
+    d.visualize_tiles_and_layers
+  when 'compositions'
+    d.visualize_tiles_and_compositions
+  when 'facade'
+    d.visualize_facade
+  when 'description'
+    puts d.description_xml
+end