rui 0.1.0

data/rui.gemspec

@@ -0,0 +1,92 @@
+# Generated by jeweler
+# DO NOT EDIT THIS FILE DIRECTLY
+# Instead, edit Jeweler::Tasks in Rakefile, and run 'rake gemspec'
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{rui}
+  s.version = "0.1.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Paolo Capriotti"]
+  s.date = %q{2011-01-01}
+  s.description = %q{GUI abstraction library supporting Qt and KDE backends}
+  s.email = %q{p.capriotti@gmail.com}
+  s.extra_rdoc_files = [
+    "README.md"
+  ]
+  s.files = [
+    ".document",
+    "COPYING",
+    "Gemfile",
+    "Gemfile.lock",
+    "README.md",
+    "Rakefile",
+    "VERSION",
+    "examples/autogui/main.rb",
+    "examples/hello/main.rb",
+    "examples/kderun.rb",
+    "examples/qtrun.rb",
+    "examples/signals/main.rb",
+    "lib/rui.rb",
+    "lib/rui/descriptor.rb",
+    "lib/rui/factory.rb",
+    "lib/rui/observer_utils.rb",
+    "lib/rui/toolkits/kde/kde.rb",
+    "lib/rui/toolkits/qt/qt.rb",
+    "lib/rui/toolkits/qtbase/gui_builder.rb",
+    "lib/rui/toolkits/qtbase/qt.rb",
+    "lib/rui/utils.rb",
+    "rui.gemspec",
+    "test/helper.rb",
+    "test/test_descriptor.rb",
+    "test/test_factory.rb",
+    "test/test_observer_utils.rb"
+  ]
+  s.homepage = %q{http://github.com/pcapriotti/rui}
+  s.licenses = ["LGPL"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{nowarning}
+  s.rubygems_version = %q{1.3.7}
+  s.summary = %q{GUI abstraction library}
+  s.test_files = [
+    "examples/autogui/main.rb",
+    "examples/hello/main.rb",
+    "examples/kderun.rb",
+    "examples/qtrun.rb",
+    "examples/signals/main.rb",
+    "test/helper.rb",
+    "test/test_descriptor.rb",
+    "test/test_factory.rb",
+    "test/test_observer_utils.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::VERSION) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<builder>, [">= 0"])
+      s.add_development_dependency(%q<yard>, ["~> 0.6.0"])
+      s.add_development_dependency(%q<bluecloth>, [">= 0"])
+      s.add_development_dependency(%q<bundler>, ["~> 1.0.0"])
+      s.add_development_dependency(%q<jeweler>, ["~> 1.5.1"])
+      s.add_development_dependency(%q<rcov>, [">= 0"])
+    else
+      s.add_dependency(%q<builder>, [">= 0"])
+      s.add_dependency(%q<yard>, ["~> 0.6.0"])
+      s.add_dependency(%q<bluecloth>, [">= 0"])
+      s.add_dependency(%q<bundler>, ["~> 1.0.0"])
+      s.add_dependency(%q<jeweler>, ["~> 1.5.1"])
+      s.add_dependency(%q<rcov>, [">= 0"])
+    end
+  else
+    s.add_dependency(%q<builder>, [">= 0"])
+    s.add_dependency(%q<yard>, ["~> 0.6.0"])
+    s.add_dependency(%q<bluecloth>, [">= 0"])
+    s.add_dependency(%q<bundler>, ["~> 1.0.0"])
+    s.add_dependency(%q<jeweler>, ["~> 1.5.1"])
+    s.add_dependency(%q<rcov>, [">= 0"])
+  end
+end
+

data/test/helper.rb

@@ -0,0 +1,17 @@
+require 'rubygems'
+require 'bundler'
+begin
+  Bundler.setup(:default, :development)
+rescue Bundler::BundlerError => e
+  $stderr.puts e.message
+  $stderr.puts "Run `bundle install` to install missing gems"
+  exit e.status_code
+end
+require 'test/unit'
+
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+require 'rui'
+
+class Test::Unit::TestCase
+end

data/test/test_descriptor.rb

@@ -0,0 +1,237 @@
+# Copyright (c) 2010 Paolo Capriotti <p.capriotti@gmail.com>
+# 
+# This library is free software; you can redistribute it and/or modify
+# it under the terms of the GNU Lesser General Public License as
+# published by the Free Software Foundation; either version 3 of the
+# License, or (at your option) any later version.
+
+require 'test/unit'
+require 'rui/descriptor'
+
+class TestDescriptor < Test::Unit::TestCase
+  def test_add_child
+    parent = Descriptor.new(:parent)
+    child = Descriptor.new(:child)
+    parent.add_child(child)
+    
+    assert_equal 1, parent.children.size
+    assert_equal :child, parent.children.first.tag
+  end
+  
+  def test_merge_child_with_no_merge_points
+    parent = Descriptor.new(:parent)
+    children = (0...5).map do |i|
+      child = Descriptor.new("child#{i}".to_sym)
+      parent.add_child(child)
+    end
+    extra_child = Descriptor.new(:extra)
+    
+    parent.merge_child(extra_child)
+
+    assert_equal 6, parent.children.size
+    assert_equal :extra, parent.children.last.tag
+  end
+
+  def test_merge_child_with_merge_point
+    parent = Descriptor.new(:parent)
+    parent.add_merge_point(3)
+
+    (0...5).each do |i|
+      child = Descriptor.new("child#{i}".to_sym)
+      parent.add_child(child)
+    end
+    extra_child = Descriptor.new(:extra)
+    
+    parent.merge_child(extra_child)
+
+    assert_equal 6, parent.children.size
+    assert_equal :extra, parent.children[3].tag
+  end
+
+  def test_merge_child_with_capped_merge_point
+    parent = Descriptor.new(:parent)
+    parent.add_merge_point(3, 2)
+
+    (0...5).each do |i|
+      child = Descriptor.new("child#{i}".to_sym)
+      parent.add_child(child)
+    end
+    (0...3).each do |i|
+      child = Descriptor.new("extra#{i}".to_sym)
+      parent.merge_child(child)
+    end
+
+    assert_equal 8, parent.children.size
+    assert_equal :extra0, parent.children[3].tag
+    assert_equal :extra1, parent.children[4].tag
+    assert_equal :extra2, parent.children[7].tag
+  end
+
+  def test_simple_to_sexp
+    desc = Descriptor.new("hello", :foo => 42)
+    assert_equal "(hello {:foo=>42})", desc.to_sexp
+  end
+
+  def test_hierarchical_to_sexp
+    parent = Descriptor.new("parent", :foo => 42)
+    child = Descriptor.new("child")
+    parent.add_child(child)
+
+    assert_equal("(parent {:foo=>42} (child {}))", parent.to_sexp)
+  end
+
+  def test_builder
+    desc = Descriptor.build(:gui) do
+      menu_bar do
+        menu(:file) do
+          action :new
+          action :open
+          separator
+          action :quit
+        end
+      end
+    end
+    
+    sexp = '(gui {} ' +
+              '(menu_bar {} ' +
+                '(menu {:name=>:file} ' +
+                  '(action {:name=>:new}) ' +
+                  '(action {:name=>:open}) ' +
+                  '(separator {}) ' +
+                  '(action {:name=>:quit}))))'
+    assert_equal sexp, desc.to_sexp
+  end
+  
+  def test_merge_equal
+    desc = Descriptor.build(:gui)
+    desc2 = Descriptor.build(:gui)
+    
+    desc.merge!(desc2)
+    sexp = '(gui {})'
+    assert_equal sexp, desc.to_sexp
+  end
+  
+  def test_merge_children
+    desc = Descriptor.build(:gui) do |g|
+      g.item :a
+      g.item :b
+    end
+    
+    desc2 = Descriptor.build(:gui) do |g|
+      g.item :c
+      g.item :d
+    end
+    
+    desc.merge!(desc2)
+    sexp = '(gui {} ' +
+              '(item {:name=>:a}) ' +
+              '(item {:name=>:b}) ' +
+              '(item {:name=>:c}) ' +
+              '(item {:name=>:d}))'
+    assert_equal sexp, desc.to_sexp
+  end
+  
+  def test_merge_recursive
+    desc = Descriptor.build(:gui) do |g|
+      g.menu_bar do |mb|
+        mb.item :a
+        mb.item :b
+      end
+    end
+    
+    desc2 = Descriptor.build(:gui) do |g|
+      g.menu_bar do |mb|
+        mb.item :c
+        mb.item :d
+      end
+    end
+    
+    desc.merge!(desc2)
+    sexp = '(gui {} ' +
+              '(menu_bar {} ' + 
+                '(item {:name=>:a}) ' +
+                '(item {:name=>:b}) ' +
+                '(item {:name=>:c}) ' +
+                '(item {:name=>:d})))'
+    assert_equal sexp, desc.to_sexp
+  end
+  
+  def test_simple_merge
+    desc = Descriptor.build(:gui) do |g|
+      g.menu_bar do |mb|
+        mb.menu(:file) do |m|
+          m.action :new
+          m.action :open
+          m.separator
+          m.action :quit
+        end
+      end
+    end
+
+    desc2 = Descriptor.build(:gui) do |g|
+      g.menu_bar do |mb|
+        mb.menu(:file) do |m|
+          m.action :save
+        end
+        mb.menu(:edit) do |m|
+          m.action :undo
+        end
+      end
+      g.tool_bar(:main_tool_bar)
+    end
+
+    desc.merge!(desc2)
+    sexp = '(gui {} ' +
+              '(menu_bar {} ' +
+                '(menu {:name=>:file} ' +
+                  '(action {:name=>:new}) ' +
+                  '(action {:name=>:open}) ' +
+                  '(separator {}) ' +
+                  '(action {:name=>:quit}) ' +
+                  '(action {:name=>:save})) ' +
+                '(menu {:name=>:edit} ' +
+                  '(action {:name=>:undo}))) ' +
+              '(tool_bar {:name=>:main_tool_bar}))'
+    
+    assert_equal sexp, desc.to_sexp
+  end
+  
+  def test_merge_partial
+    desc = Descriptor.build(:gui) do |g|
+      g.menu_bar do |mb|
+        mb.menu(:file) do |m|
+          m.action :open
+        end
+        mb.menu(:edit) do |m|
+          m.action :undo
+        end
+      end
+    end
+    
+    desc2 = Descriptor.build(:gui) do |g|
+      g.menu_bar do |mb|
+        mb.menu(:edit) do |m|
+          m.action :redo
+        end
+        mb.menu(:game) do |m|
+          m.action :forward
+          m.action :back
+        end
+      end
+    end
+    
+    desc.merge!(desc2)
+    sexp = '(gui {} ' +
+              '(menu_bar {} ' +
+                '(menu {:name=>:file} ' +
+                  '(action {:name=>:open})) ' +
+                '(menu {:name=>:edit} ' +
+                  '(action {:name=>:undo}) ' +
+                  '(action {:name=>:redo})) ' +
+                '(menu {:name=>:game} ' +
+                  '(action {:name=>:forward}) ' +
+                  '(action {:name=>:back}))))'
+    assert_equal sexp, desc.to_sexp
+  end
+end
+

data/test/test_factory.rb

@@ -0,0 +1,38 @@
+# Copyright (c) 2010 Paolo Capriotti <p.capriotti@gmail.com>
+#
+# This library is free software; you can redistribute it and/or modify
+# it under the terms of the GNU Lesser General Public License as
+# published by the Free Software Foundation; either version 3 of the
+# License, or (at your option) any later version.
+
+require 'test/unit'
+require 'rui/factory'
+
+class TestFactory < Test::Unit::TestCase
+  def test_simple_factory
+    factory = Factory.new { "hello" }
+    assert_equal "hello", factory.new
+  end
+
+  def test_factory_with_arguments
+    factory = Factory.new {|x, y| x + y }
+    assert_equal 42, factory.new(40, 2)
+  end
+
+  def test_component
+    factory = Factory.new(Array) do |n, value|
+      Array.new(n) { value }
+    end
+    assert_equal Array, factory.component
+    assert_equal Array, factory.new(10, "hello").class
+  end
+
+  def test_rebind
+    factory = Factory.new(Array) do |n, value|
+      new(n) { value }
+    end
+    factory = factory.__bind__(factory.component)
+    assert_equal Array, factory.component
+    assert_equal [:hello, :hello], factory.new(2, :hello)
+  end
+end

data/test/test_observer_utils.rb

@@ -0,0 +1,67 @@
+# Copyright (c) 2010 Paolo Capriotti <p.capriotti@gmail.com>
+# 
+# This library is free software; you can redistribute it and/or modify
+# it under the terms of the GNU Lesser General Public License as
+# published by the Free Software Foundation; either version 3 of the
+# License, or (at your option) any later version.
+
+require 'test/unit'
+require 'rui/observer_utils'
+
+class TestObserverUtils < Test::Unit::TestCase
+  class FakeObservable
+    include Observable
+  end
+  
+  def setup
+    @object = FakeObservable.new
+  end
+  
+  def test_simple_observer
+    ok = false
+    @object.on(:something) { ok = true }
+    @object.fire :something
+    assert ok
+  end
+  
+  def test_observer
+    obs = Object.new
+    class << obs
+      include Observer
+      attr_reader :arg
+      
+      def on_something(arg)
+        @arg = arg
+      end
+    end
+    
+    @object.add_observer(obs)
+    @object.changed
+    @object.notify_observers :something => 37
+    
+    assert_equal 37, obs.arg
+  end
+  
+  def test_multiple_observer
+    obs = Object.new
+    class << obs
+      include Observer
+      attr_reader :arg1, :arg2
+      
+      def on_whatever(arg1)
+        @arg1 = arg1
+      end
+      
+      def on_something(arg2)
+        @arg2 = arg2
+      end
+    end
+    
+    @object.add_observer(obs)
+    @object.changed
+    @object.notify_observers :something => 2, :whatever => 1, :nothing => 3
+    
+    assert_equal 1, obs.arg1
+    assert_equal 2, obs.arg2
+  end
+end

metadata

@@ -0,0 +1,189 @@
+--- !ruby/object:Gem::Specification 
+name: rui
+version: !ruby/object:Gem::Version 
+  hash: 27
+  prerelease: false
+  segments: 
+  - 0
+  - 1
+  - 0
+  version: 0.1.0
+platform: ruby
+authors: 
+- Paolo Capriotti
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-01-01 00:00:00 +00:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  version_requirements: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  name: builder
+  requirement: *id001
+  type: :runtime
+  prerelease: false
+- !ruby/object:Gem::Dependency 
+  version_requirements: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        hash: 7
+        segments: 
+        - 0
+        - 6
+        - 0
+        version: 0.6.0
+  name: yard
+  requirement: *id002
+  type: :development
+  prerelease: false
+- !ruby/object:Gem::Dependency 
+  version_requirements: &id003 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  name: bluecloth
+  requirement: *id003
+  type: :development
+  prerelease: false
+- !ruby/object:Gem::Dependency 
+  version_requirements: &id004 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        hash: 23
+        segments: 
+        - 1
+        - 0
+        - 0
+        version: 1.0.0
+  name: bundler
+  requirement: *id004
+  type: :development
+  prerelease: false
+- !ruby/object:Gem::Dependency 
+  version_requirements: &id005 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ~>
+      - !ruby/object:Gem::Version 
+        hash: 1
+        segments: 
+        - 1
+        - 5
+        - 1
+        version: 1.5.1
+  name: jeweler
+  requirement: *id005
+  type: :development
+  prerelease: false
+- !ruby/object:Gem::Dependency 
+  version_requirements: &id006 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  name: rcov
+  requirement: *id006
+  type: :development
+  prerelease: false
+description: GUI abstraction library supporting Qt and KDE backends
+email: p.capriotti@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README.md
+files: 
+- .document
+- COPYING
+- Gemfile
+- Gemfile.lock
+- README.md
+- Rakefile
+- VERSION
+- examples/autogui/main.rb
+- examples/hello/main.rb
+- examples/kderun.rb
+- examples/qtrun.rb
+- examples/signals/main.rb
+- lib/rui.rb
+- lib/rui/descriptor.rb
+- lib/rui/factory.rb
+- lib/rui/observer_utils.rb
+- lib/rui/toolkits/kde/kde.rb
+- lib/rui/toolkits/qt/qt.rb
+- lib/rui/toolkits/qtbase/gui_builder.rb
+- lib/rui/toolkits/qtbase/qt.rb
+- lib/rui/utils.rb
+- rui.gemspec
+- test/helper.rb
+- test/test_descriptor.rb
+- test/test_factory.rb
+- test/test_observer_utils.rb
+has_rdoc: true
+homepage: http://github.com/pcapriotti/rui
+licenses: 
+- LGPL
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: nowarning
+rubygems_version: 1.3.7
+signing_key: 
+specification_version: 3
+summary: GUI abstraction library
+test_files: 
+- examples/autogui/main.rb
+- examples/hello/main.rb
+- examples/kderun.rb
+- examples/qtrun.rb
+- examples/signals/main.rb
+- test/helper.rb
+- test/test_descriptor.rb
+- test/test_factory.rb
+- test/test_observer_utils.rb