rpv_core 0.2

data/lib/rpv/generators/templates/app/README

@@ -0,0 +1,12 @@
+So you created a new RPV app. Here is a short guide to get started:
+
+- Add your favorite GUI framework (at the time of writing there just is rpv_swing)
+  - add "require 'rpv/swing'" to app/setup.rb
+- Check out the generators:
+  - run "rpv g" (or "jruby -S rpv g") in your application's directory to see what generators there are
+- Create a presenter and a view.
+- Make sure your app/main.rb creates an instance of your presenter.
+- Run your app with "ruby app/main.rb" (or "jruby app/main.rb" if you use rpv_swing)
+  - "rpv r" serves as a shortcut for that
+
+TODO: link to GH wiki?

data/lib/rpv/generators/templates/app/Rakefile

@@ -0,0 +1,3 @@
+Dir.glob("tasks/**/*.rake").each do |rake_file|
+  load File.expand_path(File.join(File.dirname(__FILE__), rake_file))
+end

data/lib/rpv/generators/templates/app/app/main.rb

@@ -0,0 +1,4 @@
+#this file is used to start your application
+require File.join(File.dirname(__FILE__), 'setup')
+
+#MainPresenter.new

data/lib/rpv/generators/templates/app/app/setup.rb

@@ -0,0 +1,11 @@
+AppBase = File.expand_path(File.dirname(__FILE__)) unless defined?(AppBase)
+#AppBase contains the to .../your_application/app
+
+require 'rubygems'
+require 'rpv'
+
+#autoload:
+require 'rpv/autoload'
+RPV::Autoload.setup_paths AppBase
+
+#this is the right place to require any libs your application needs

data/lib/rpv/generators/templates/app/spec/spec_helper.rb

@@ -0,0 +1,5 @@
+require 'spec'
+require 'spec/autorun'
+
+Spec::Runner.configure do |config|
+end

data/lib/rpv/generators/templates/app/tasks/rspec.rake

@@ -0,0 +1,9 @@
+require 'rake'
+require 'spec/rake/spectask'
+
+desc "Run all specs"
+Spec::Rake::SpecTask.new('spec') do |t|
+  t.ruby_opts = ["-r app/setup"]
+  t.spec_opts = ["--colour", "--format progress", "--loadby mtime"]
+  t.spec_files = FileList['spec/**/*_spec.rb']
+end

data/lib/rpv/generators/templates/presenter/presenter.rb.erb

@@ -0,0 +1,10 @@
+require 'rpv/base_presenter'
+
+class <%= class_name %> < RPV::BasePresenter
+  
+  
+  def initialize(*args)
+    @view = extract_options(args, :view) || MyView.new
+    
+  end
+end

data/lib/rpv/generators/templates/presenter/presenter_spec.rb.erb

@@ -0,0 +1,22 @@
+require File.dirname(__FILE__) + "/../spec_helper.rb"
+
+describe <%= class_name %> do
+  describe "event handling" do
+    before(:all) do
+      @view = mock_event_publisher { |m|
+        #m.fires :some_event
+      }
+      @presenter = <%= class_name %>.new(:view => @view)
+    end
+    
+    
+  end
+  
+  describe "setup" do
+    before(:each) do
+      @view = mock("view", :null_object => true)
+    end
+    
+    
+  end
+end

data/lib/rpv/inflector.rb

@@ -0,0 +1,68 @@
+# This code is a modified version of the Inflector class
+# from the Ruby on Rails project (http://www.rubyonrails.com)
+
+module RPV
+  module Inflector
+    # The reverse of +camelize+. Makes an underscored form from the expression in the string.
+    #
+    # Changes '::' to '/' to convert namespaces to paths.
+    #
+    # Examples
+    #   "ActiveRecord".underscore #=> "active_record"
+    #   "ActiveRecord::Errors".underscore #=> active_record/errors
+    def underscore()
+      self.to_s.gsub(/::/, '/').
+        gsub(/([A-Z]+)([A-Z][a-z])/,'\1_\2').
+        gsub(/([a-z\d])([A-Z])/,'\1_\2').
+        tr("-", "_").
+        downcase
+    end
+
+    # Constantize tries to find a declared constant with the name specified
+    # in the string. It raises a NameError when the name is not in CamelCase
+    # or is not initialized.
+    #
+    # Examples
+    #   "Module".constantize #=> Module
+    #   "Class".constantize #=> Class
+    def constantize()
+      unless /\A(?:::)?([A-Z]\w*(?:::[A-Z]\w*)*)\z/ =~ self.to_s
+        raise NameError, "#{self.inspect} is not a valid constant name!"
+      end
+
+      Object.module_eval("::#{$1}", __FILE__, __LINE__)
+    end
+
+    # By default, camelize converts strings to UpperCamelCase. If the argument to camelize
+    # is set to ":lower" then camelize produces lowerCamelCase.
+    #
+    # camelize will also convert '/' to '::' which is useful for converting paths to namespaces
+    #
+    # Examples
+    #   "active_record".camelize #=> "ActiveRecord"
+    #   "active_record".camelize(:lower) #=> "activeRecord"
+    #   "active_record/errors".camelize #=> "ActiveRecord::Errors"
+    #   "active_record/errors".camelize(:lower) #=> "activeRecord::Errors"
+    def camelize(first_letter_in_uppercase = true)
+      if first_letter_in_uppercase
+        self.to_s.gsub(/\/(.?)/) { "::" + $1.upcase }.gsub(/(^|_)(.)/) { $2.upcase }
+      else
+        self.to_s[0..0] + camelize(self.to_s)[1..-1]
+      end
+    end
+  end
+end
+
+class String
+  include RPV::Inflector
+end
+
+class Symbol
+  include RPV::Inflector
+end
+
+class Class
+  def constantize
+    self
+  end
+end

data/lib/rpv/method.rb

@@ -0,0 +1,13 @@
+module RPV
+  class Method
+    attr_reader :object, :method
+    
+    def initialize(object, method)
+      @object, @method = object, method
+    end
+    
+    def call(*args)
+      @object.send(@method, *args)
+    end
+  end
+end

data/lib/rpv/method_helper.rb

@@ -0,0 +1,9 @@
+require 'rpv/method'
+
+module RPV
+  module MethodHelper
+    def method(name)
+      RPV::Method.new(self, name.to_sym)
+    end
+  end
+end

data/lib/rpv/option_extractor.rb

@@ -0,0 +1,15 @@
+module RPV
+  module OptionExtractor
+    def extract_options(args, *names)
+      args = args.find { |e| e.is_a?(Hash) } || {}
+      values = names.map do |name|
+        args[name]
+      end
+      if values.size == 1
+        values.first
+      else
+        values
+      end
+    end
+  end
+end

data/lib/rpv/spec_helper.rb

@@ -0,0 +1,118 @@
+require 'rpv/event_publisher'
+require 'spec/mocks'
+
+class RPV::MockEventPublisher
+  include RPV::EventPublisher
+  
+  # A wrapper for the private method 'fire'
+  def do_fire(event, *args)
+    fire event, *args
+  end
+  
+  # Ignore missing methods
+  def method_missing(sym, *args)
+    Spec::Mocks::Mock.new("null object from MockEventPublisher#{sym.to_s}", :null_object => true)
+  end
+end
+
+def mock_event_publisher
+  m = Class.new(RPV::MockEventPublisher) 
+  yield m if block_given?
+  m.new
+end
+
+def mock_block(*args)
+  yield m = mock(args)
+  m
+end
+
+Spec::Matchers.define :fire_event do |event|
+  match do |actual|
+    actual.fires?(event.to_sym)
+  end
+  
+  failure_message_for_should do |actual|
+    "expected #{actual} to fire #{event}"
+  end
+  
+  failure_message_for_should_not do |actual|
+    "expected #{actual} not to fire #{event}"
+  end
+  
+  description do
+    "fire #{event}"
+  end
+end
+
+Spec::Matchers.define :fire_events do |*events|
+  match do |actual|
+    events.flatten.each do |event|
+      actual.should fire_event event
+    end
+  end
+  
+  description do
+    "fire #{events.join(', ')}"
+  end
+end
+
+Spec::Matchers.define :have_attr_reader do |attr|
+  match do |actual|
+    actual.respond_to?(attr)
+  end
+  
+  failure_message_for_should do |actual|
+    "expected #{actual} to have an attribute reader for #{attr}"
+  end
+  
+  failure_message_for_should_not do |actual|
+    "expected #{actual} not to have an attribute reader for #{attr}"
+  end
+  
+  description do
+    "have an attribute reader for #{attr}"
+  end
+end
+
+Spec::Matchers.define :have_attr_accessor do |attr|
+  match do |actual|
+    actual.respond_to?(attr) && actual.respond_to?("#{attr}=")
+  end
+  
+  
+  failure_message_for_should do |actual|
+    "expected #{actual} to have an attribute accessor for #{attr}"
+  end
+  
+  failure_message_for_should_not do |actual|
+    "expected #{actual} not to have an attribute accessor for #{attr}"
+  end
+  
+  description do
+    "have an attribute accessor for #{attr}"
+  end
+end
+
+Spec::Matchers.define :have_attr_accessors do |*attrs|
+  match do |actual|
+    attrs.flatten.each do |attr|
+      actual.should have_attr_accessor attr
+    end
+  end
+  
+  description do
+    "have attribute accessors for #{attrs.join(', ')}"
+  end
+end
+
+Spec::Matchers.define :have_attr_readers do |*attrs|
+  match do |actual|
+    attrs.flatten.each do |attr|
+      actual.should have_attr_reader attr
+    end
+  end
+  
+  description do
+    "have attribute readers for #{attrs.join(', ')}"
+  end
+end

data/lib/rpv/wiring/base.rb

@@ -0,0 +1,49 @@
+module RPV
+  module Wiring
+    class Base
+      def initialize(args = {})
+        @model, @view, @presenter = args[:model], args[:view], args[:presenter]
+        raise ArgumentError, "View field must be given" if @view.nil? || (!@model.nil? && !@presenter.nil?)     
+      end
+      
+      # Match the view method against a hash of constraints (like { :only => /^bar\.(.*)/, :except => /(.*)\.text$/ })
+      def view_match(args = {})
+        match(@view, args)
+      end
+      
+      # Match the presenter method against a hash of constraints (like { :only => /^bar\.(.*)/, :except => /(.*)\.text$/ })
+      def presenter_match(args = {})
+        match(@presenter, args)
+      end
+      
+      # Match the model method against a hash of constraints (like { :only => /^bar\.(.*)/, :except => /(.*)\.text$/ })
+      def model_match(args = {})
+        match(@model, args)
+      end
+      
+      def update_view(model, view, presenter)
+      end
+      
+      def update_model(model, view, presenter)
+      end
+      
+      def update_presenter(model, view, presenter)
+      end
+      
+      protected
+        def match(method, args)
+          !method.nil? && (args[:only].nil? || method =~ args[:only]) && (args[:except].nil? || !(method =~ args[:except]))
+        end
+        
+        def send_nested(obj, methods_string, *args)
+          methods = methods_string.to_s.split('.')
+          if methods.size > 1
+            first = methods.slice! 0
+            send_nested(obj.send(first), methods.join('.'), *args)
+          else
+            obj.send(methods.first, *args)
+          end
+        end
+    end
+  end
+end

data/lib/rpv/wiring/callable.rb

@@ -0,0 +1,20 @@
+require 'rpv/wiring/converting'
+
+module RPV
+  module Wiring
+    class Callable < Converting
+      def initialize(*args)
+        super
+        @to_block, @from_block = args[0][:to_view], args[0][:from_view]
+      end
+      
+      def convert_to_view(value)
+        @to_block.call(value)
+      end
+      
+      def convert_from_view(value)
+        @from_block.call(value)
+      end
+    end
+  end
+end

data/lib/rpv/wiring/converting.rb

@@ -0,0 +1,36 @@
+require 'rpv/wiring/base'
+
+module RPV
+  module Wiring
+    # Abstract
+    class Converting < Base
+      def initialize(args)
+        super
+      end
+      
+      def update_view(model, view, presenter)
+        unless @model.nil?
+          send_nested(view, "#{@view}=", convert_to_view(send_nested(model, @model)))
+        else
+          send_nested(view, "#{@view}=", convert_to_view(send_nested(presenter, @presenter)))
+        end
+      end
+      
+      def update_model(model, view, presenter)
+        send_nested(model, "#{@model}=", convert_from_view(send_nested(view, @view))) unless @model.nil?
+      end
+      
+      def update_presenter(model, view, presenter)
+        send_nested(presenter, "#{@presenter}=", convert_from_view(send_nested(view, @view))) unless @presenter.nil?
+      end
+      
+      def convert_from_view(value)
+        nil
+      end
+      
+      def convert_to_view(value)
+        nil
+      end
+    end
+  end
+end

data/lib/rpv/wiring/helpers.rb

@@ -0,0 +1,23 @@
+module RPV
+  module Wiring
+    module WireHelpers
+      module ClassMethods
+        def simple(*args)
+          Simple.new(*args)
+        end
+        
+        def unidirectional(*args)
+          Unidirectional.new(*args)
+        end
+        
+        def callable(*args)
+          Callable.new(*args)
+        end
+      end
+      
+      def self.included(base)
+        base.extend(ClassMethods)
+      end
+    end
+  end
+end