lapluviosilla-wizardly 0.1.8.8

data/lib/wizardly/wizard/configuration/methods.rb

@@ -0,0 +1,414 @@
+module Wizardly
+  module Wizard
+    class Configuration
+      
+      def print_callback_macros
+        macros = [ 
+          %w(on_post _on_post_%s_form),
+          %w(on_get _on_get_%s_form),
+          %w(on_errors _on_invalid_%s_form)
+        ]
+        self.buttons.each do |id, button|
+          macros << ['on_'+ id.to_s, '_on_%s_form_'+ id.to_s ]
+        end
+        mb = StringIO.new
+        macros.each do |macro|
+          mb << <<-MACRO
+  def self.#{macro.first}(*args, &block)
+    self._define_action_callback_macro('#{macro.first}', '#{macro.last}', *args, &block)
+  end
+MACRO
+        end
+        mb << <<-DEFMAC
+  def self._define_action_callback_macro(macro_first, macro_last, *args, &block)
+    return if args.empty?
+    all_forms = #{page_order.inspect}
+    if args.include?(:all)
+      forms = all_forms
+    else
+      forms = args.map do |fa|
+        unless all_forms.include?(fa)
+          raise(ArgumentError, ":"+fa.to_s+" in callback '" + macro_first + "' is not a form defined for the wizard", caller)
+        end
+        fa
+      end
+    end
+    forms.each do |form|
+      self.send(:define_method, sprintf(macro_last, form.to_s), &block )
+      hide_action macro_last.to_sym
+    end
+  end
+
+DEFMAC
+        
+        [
+          %w(on_completed _after_wizard_save)
+        ].each do |macro|
+          mb << <<-EVENTS
+  def self.#{macro.first}(&block)
+    self.send(:define_method, :#{macro.last}, &block )
+  end
+EVENTS
+        end
+        mb.string
+      end
+      
+      def print_page_action_methods
+        mb = StringIO.new
+        self.pages.each do |id, p|
+          mb << <<-COMMENT
+
+  # #{id} action method
+#{self.print_page_action_method(id)}
+          COMMENT
+        end
+        mb << <<-INDEX
+  def index
+    redirect_to :action=>:#{self.page_order.first}
+  end
+
+        INDEX
+        mb.string
+      end
+
+      def initial_referer_key
+        @initial_referer_key ||= "#{self.controller_path.sub(/\//, '')}_irk".to_sym
+      end
+      def persist_key;
+        @persist_key ||= "#{self.controller_path.sub(/\//, '')}_dat".to_sym 
+      end
+      def progression_key
+        @progression_key ||= "#{self.controller_path.sub(/\//, '')}_prg".to_sym
+      end
+
+      def print_page_action_method(id)
+        page = @pages[id]
+        finish_button = self.button_for_function(:finish).id
+        next_button = self.button_for_function(:next).id
+
+        (mb = StringIO.new) << <<-ONE
+  def #{page.name}
+    begin
+      @step = :#{id}
+      @wizard = wizard_config
+      @title = '#{page.title}'
+      @description = '#{page.description}'
+      _build_wizard_model
+      if request.post? && callback_performs_action?(:_on_post_#{id}_form)
+        raise CallbackError, "render or redirect not allowed in :on_post(:#{id}) callback", caller
+      end
+      button_id = check_action_for_button
+      return if performed?
+      if request.get?
+        return if callback_performs_action?(:_on_get_#{id}_form)
+        render_wizard_form
+        return
+      end
+
+      # @#{self.model}.enable_validation_group :#{id}
+      unless @#{self.model}.valid?(:#{id})
+        return if callback_performs_action?(:_on_invalid_#{id}_form)
+        render_wizard_form
+        return
+      end
+
+      @do_not_complete = false
+        ONE
+        if self.last_page?(id)
+          mb << <<-TWO
+      callback_performs_action?(:_on_#{id}_form_#{finish_button})
+      complete_wizard unless @do_not_complete
+        TWO
+        elsif self.first_page?(id)
+          mb << <<-THREE
+      if button_id == :#{finish_button}
+        callback_performs_action?(:_on_#{id}_form_#{finish_button})
+        complete_wizard unless @do_not_complete
+        return
+      end
+      return if callback_performs_action?(:_on_#{id}_form_#{next_button})
+      redirect_to :action=>:#{self.next_page(id)}
+        THREE
+        else 
+          mb << <<-FOUR
+      if button_id == :#{finish_button}
+        callback_performs_action?(:_on_#{id}_form_#{finish_button})
+        complete_wizard unless @do_not_complete
+        return
+      end
+      return if callback_performs_action?(:_on_#{id}_form_#{next_button})
+      redirect_to :action=>:#{self.next_page(id)}
+        FOUR
+        end
+        
+        mb << <<-ENSURE
+    ensure
+      _preserve_wizard_model
+    end
+  end        
+ENSURE
+        mb.string
+      end
+
+      def print_callbacks
+        finish = self.button_for_function(:finish).id
+        skip = self.button_for_function(:skip).id
+        back = self.button_for_function(:back).id
+        cancel = self.button_for_function(:cancel).id
+      <<-CALLBACKS 
+  protected
+  def _on_wizard_#{finish}
+    return if @wizard_completed_flag
+    @#{self.model}.save_without_validation! if @#{self.model}.changed?
+    @wizard_completed_flag = true
+    reset_wizard_form_data
+    _wizard_final_redirect_to(:completed)
+  end
+  def _on_wizard_#{skip}
+    self.progression = self.progression - [@step]
+    redirect_to(:action=>wizard_config.next_page(@step)) unless self.performed?
+  end
+  def _on_wizard_#{back} 
+    redirect_to(:action=>(previous_in_progression_from(@step) || :#{self.page_order.first})) unless self.performed?
+  end
+  def _on_wizard_#{cancel}
+    _wizard_final_redirect_to(:canceled)
+  end
+  def _wizard_final_redirect_to(type)
+    init = (type == :canceled && wizard_config.form_data_keep_in_session?) ?
+      self.initial_referer :
+      reset_wizard_session_vars
+    unless self.performed?
+      redir = (type == :canceled ? wizard_config.canceled_redirect : wizard_config.completed_redirect) || init
+      return redirect_to(redir) if redir
+      raise Wizardly::RedirectNotDefinedError, "No redirect was defined for completion or canceling the wizard.  Use :completed and :canceled options to define redirects.", caller
+    end
+  end
+  hide_action :_on_wizard_#{finish}, :_on_wizard_#{skip}, :_on_wizard_#{back}, :_on_wizard_#{cancel}, :_wizard_final_redirect_to
+      CALLBACKS
+      end
+
+      def print_helpers
+        next_id = self.button_for_function(:next).id
+        finish_id = self.button_for_function(:finish).id
+        first_page = self.page_order.first
+        finish_button = self.button_for_function(:finish).id        
+        guard_line = self.guard? ? '' : 'return check_progression #guard entry disabled'
+        mb = StringIO.new
+        mb << <<-PROGRESSION
+  protected
+  def do_not_complete; @do_not_complete = true; end
+  def previous_in_progression_from(step)
+    po = #{self.page_order.inspect}
+    p = self.progression
+    p -= po[po.index(step)..-1]
+    self.progression = p
+    p.last
+  end
+  def check_progression
+    p = self.progression
+    a = params[:action].to_sym
+    return if p.last == a
+    po = #{self.page_order.inspect}
+    return unless (ai = po.index(a))
+    p -= po[ai..-1]
+    p << a
+    self.progression = p
+  end        
+PROGRESSION
+        if self.form_data_keep_in_session?
+          mb << <<-SESSION
+  # for :form_data=>:session
+  def guard_entry 
+    if (r = request.env['HTTP_REFERER'])
+      h = ::ActionController::Routing::Routes.recognize_path(URI.parse(r).path)
+      return check_progression if (h[:controller]||'') == '#{self.controller_name}'
+      self.initial_referer = h unless self.initial_referer
+    end
+    # coming from outside the controller
+    #{guard_line}
+    if (params[:action] == '#{first_page}' || params[:action] == 'index')
+      return check_progression
+    elsif self.wizard_form_data
+      p = self.progression
+      return check_progression if p.include?(params[:action].to_sym)
+      return redirect_to(:action=>(p.last||:#{first_page}))
+    end
+    redirect_to :action=>:#{first_page}
+  end
+  hide_action :guard_entry
+
+SESSION
+        else
+          mb << <<-SANDBOX
+  # for :form_data=>:sandbox            
+  def guard_entry 
+    if (r = request.env['HTTP_REFERER'])
+      h = ::ActionController::Routing::Routes.recognize_path(URI.parse(r).path)
+      return check_progression if (h[:controller]||'') == '#{self.controller_name}'
+      self.initial_referer = h
+    else
+      self.initial_referer = nil 
+    end
+    # coming from outside the controller
+    reset_wizard_form_data 
+    #{guard_line}
+    return redirect_to(:action=>:#{first_page}) unless (params[:action] || '') == '#{first_page}'
+    check_progression
+  end
+  hide_action :guard_entry
+
+SANDBOX
+        end
+        mb << <<-HELPERS
+  def render_and_return
+    return if callback_performs_action?('_on_get_'+@step.to_s+'_form')
+    render_wizard_form
+    render unless self.performed?
+  end
+
+  def complete_wizard(redirect = nil)
+    unless @wizard_completed_flag
+      @#{self.model}.save_without_validation!
+      callback_performs_action?(:_after_wizard_save)
+    end
+    redirect_to redirect if (redirect && !self.performed?)
+    return if @wizard_completed_flag
+    _on_wizard_#{finish_button}
+    redirect_to(#{Utils.formatted_redirect(self.completed_redirect)}) unless self.performed?
+  end
+  def _build_wizard_model
+    if self.wizard_config.persist_model_per_page?
+      h = self.wizard_form_data
+      if (h && model_id = h['id'])
+          _model = #{self.model_class_name}.find(model_id)
+          _model.attributes = params[:#{self.model}]||{}
+          @#{self.model} = _model
+          return
+      end
+      @#{self.model} = #{self.model_class_name}.new(params[:#{self.model}])
+    else # persist data in session or flash
+      h = (self.wizard_form_data||{}).merge(params[:#{self.model}] || {})
+      @#{self.model} = #{self.model_class_name}.new(h)
+    end
+  end
+  def _preserve_wizard_model
+    return unless (@#{self.model} && !@wizard_completed_flag)
+    if self.wizard_config.persist_model_per_page?
+      @#{self.model}.save_without_validation!
+      if request.get?
+        @#{self.model}.errors.clear
+      else
+        @#{self.model}.reject_non_validation_group_errors
+      end
+      self.wizard_form_data = {'id'=>@#{self.model}.id}
+    else
+      self.wizard_form_data = @#{self.model}.attributes
+    end
+  end
+  hide_action :_build_wizard_model, :_preserve_wizard_model
+
+  def initial_referer
+    session[:#{self.initial_referer_key}]
+  end
+  def initial_referer=(val)
+    session[:#{self.initial_referer_key}] = val
+  end
+  def progression=(array)
+    session[:#{self.progression_key}] = array
+  end
+  def progression
+    session[:#{self.progression_key}]||[]
+  end
+  hide_action :progression, :progression=, :initial_referer, :initial_referer=
+
+  def wizard_form_data=(hash)
+    if wizard_config.form_data_keep_in_session?
+      session[:#{self.persist_key}] = hash
+    else
+      if hash
+        flash[:#{self.persist_key}] = hash
+      else
+        flash.discard(:#{self.persist_key})
+      end
+    end
+  end
+
+  def reset_wizard_form_data; self.wizard_form_data = nil; end
+  def wizard_form_data
+    wizard_config.form_data_keep_in_session? ? session[:#{self.persist_key}] : flash[:#{self.persist_key}]
+  end
+  hide_action :wizard_form_data, :wizard_form_data=, :reset_wizard_form_data
+
+  def render_wizard_form
+  end
+  hide_action :render_wizard_form
+
+  def performed?; super; end
+  hide_action :performed?
+
+  def underscore_button_name(value)
+    value.to_s.strip.squeeze(' ').gsub(/ /, '_').downcase
+  end
+  hide_action :underscore_button_name
+
+  def reset_wizard_session_vars
+    self.progression = nil
+    init = self.initial_referer
+    self.initial_referer = nil
+    init
+  end
+  hide_action :reset_wizard_session_vars
+
+  def check_action_for_button
+    button_id = nil
+    case 
+    when params[:commit]
+      button_name = params[:commit]
+      button_id = underscore_button_name(button_name).to_sym
+    when ((b_ar = self.wizard_config.buttons.find{|k,b| params[k]}) && params[b_ar.first] == b_ar.last.name)
+      button_name = b_ar.last.name
+      button_id = b_ar.first
+    end
+    if button_id
+      unless [:#{next_id}, :#{finish_id}].include?(button_id) 
+        action_method_name = "_on_" + params[:action].to_s + "_form_" + button_id.to_s
+        callback_performs_action?(action_method_name)
+        unless ((btn_obj = self.wizard_config.buttons[button_id]) == nil || btn_obj.user_defined?)
+          method_name = "_on_wizard_" + button_id.to_s
+          if (self.method(method_name))
+            self.__send__(method_name)
+          else
+            raise MissingCallbackError, "Callback method either '" + action_method_name + "' or '" + method_name + "' not defined", caller
+          end
+        end
+      end
+    end
+    button_id
+  end
+  hide_action :check_action_for_button
+
+  @wizard_callbacks ||= []
+  def self.wizard_callbacks; @wizard_callbacks; end
+
+  def callback_performs_action?(methId)
+    cache = self.class.wizard_callbacks
+    return false if cache.include?(methId)
+
+    begin
+      self.send(methId)
+    rescue NoMethodError
+      cache << methId
+      return false
+    end
+    
+    self.performed?
+  end
+  hide_action :callback_performs_action?
+
+      HELPERS
+        mb.string
+      end
+    end
+  end
+end

data/lib/wizardly/wizard/dsl.rb

@@ -0,0 +1,27 @@
+module Wizardly
+  module Wizard
+    class DSL
+    
+      def initialize(config)
+        @config = config
+      end
+    
+      # DSL methods
+      def when_completed_redirect_to(redir); @config._when_completed_redirect_to(redir); end
+      def when_canceled_redirect_to(redir); @config._when_canceled_redirect_to(redir); end
+      def change_button(name)
+        @config._change_button(name)
+      end
+      def create_button(name, opts)
+        @config._create_button(name, opts)
+      end
+      def set_page(name); 
+        @config._set_page(name)
+      end
+      def mask_passwords(passwords)
+        @config._mask_passwords(passwords)
+      end
+      alias_method :mask_password, :mask_passwords    
+    end    
+  end
+end

data/lib/wizardly/wizard/page.rb

@@ -0,0 +1,62 @@
+require 'wizardly/wizard/text_helpers'
+
+module Wizardly
+  module Wizard
+    class Page
+      include TextHelpers
+      
+      attr_reader :id, :title, :description
+      attr_accessor :buttons, :fields
+
+      def initialize(config, id, fields)
+        @buttons = []
+        @title = symbol_to_button_name(id)
+        @id = id
+        @description = ''
+        @fields = fields 
+        @config = config
+      end
+
+      def name; id.to_s; end
+
+      def buttons_to(*args)
+        buttons = @config.buttons
+        @buttons = args.map do |button_id|
+          raise(WizardConfigurationError, ":#{button_id} not defined as a button id in :button_to() call", caller) unless buttons.key?(button_id)
+          buttons[button_id]
+        end
+      end
+      def title_to(name)
+        @title = name.strip.squeeze(' ')
+      end
+      def description_to(name)
+        @description = name.strip.squeeze(' ')
+      end
+    end
+
+    class PageField
+      attr_reader :name, :column_type
+
+      def initialize(name, type)
+        @name = name
+        @column_type = type.to_sym
+        @field_type = nil
+      end
+
+      def field_type
+        @field_type ||= case @column_type
+        when :string                      then :text_field
+        when :password                    then :password_field
+        when :enum                        then :enum_select
+        when :text                        then :text_area
+        when :boolean                     then :check_box
+        when :integer, :float, :decimal   then :text_field
+        when :datetime, :timestamp, :time then :datetime_select
+        when :date                        then :date_select
+        else
+          :text_field
+        end
+      end
+    end    
+  end
+end