wheelhouse-forms 1.0

data/app/controllers/forms/forms_controller.rb

@@ -0,0 +1,9 @@
+class Forms::FormsController < Wheelhouse::ResourceController
+  self.resource_class = Forms::Form
+  manage_site_breadcrumb
+  
+  def version
+    resource.revert_to(params[:version].to_i)
+    render :edit
+  end
+end

data/app/controllers/forms/submissions_controller.rb

@@ -0,0 +1,19 @@
+require_dependency "forms/csv_exporter"
+
+class Forms::SubmissionsController < Wheelhouse::ResourceController
+  belongs_to :form, :class_name => Forms::Form
+  self.resource_class = Forms::Submission
+  
+  manage_site_breadcrumb
+  breadcrumb { [parent.label, parent] }
+  
+  actions :show, :destroy
+  
+  respond_to :csv
+  
+  def index
+    respond_with(parent) do |format|
+      format.csv { render :text => Forms::CsvExporter.new(parent).to_csv }
+    end
+  end
+end

data/app/handlers/forms/form_handler.rb

@@ -0,0 +1,17 @@
+class Forms::FormHandler < Wheelhouse::ResourceHandler
+  skip_before_filter :verify_authenticity_token
+  
+  before_filter :set_form_context
+  
+  get do
+  end
+  
+  post do
+    @form.submit(params[:submission])
+  end
+
+private
+  def set_form_context
+    @form.view_context = view_context
+  end
+end

data/app/helpers/forms/forms_helper.rb

@@ -0,0 +1,36 @@
+module Forms::FormsHelper
+  class FormBuilder < ActionView::Helpers::FormBuilder
+    def required_field_checkbox
+      @template.content_tag(:label, :class => "required") do
+        check_box(:required, :id => nil) + " This field is required"
+      end
+    end
+  end
+  
+  def form_field(field, options={}, &block)
+    builder = FormBuilder.new(options[:prefix], field, self, {}, block)
+    icon = options[:icon] || field.class.model_name.demodulize.underscore.dasherize
+    
+    content_tag(:div, :class => options[:class], :data => { :index => options[:index] }) do
+      concat builder.hidden_field(:type, :value => field.type.demodulize, :id => nil)
+      
+      concat content_tag(:div, image_tag("wheelhouse-forms/#{icon}.png", :alt => field.class.model_name.human, :title => field.class.model_name.human), :class => "drag")
+      
+      concat content_tag(:div, capture(builder, &block), :class => "drag-area")
+      
+      concat link_to("Delete", '#', :class => 'delete')
+    end
+  end
+  
+  def render_fields(fields, prefix)
+    fields.map_with_index do |field, index|
+      render(:partial => field.class.partial, :object => field, :locals => { :index => index, :prefix => "#{prefix}[#{index}]" })
+    end.join("\n").html_safe
+  end
+  
+  def field_template(id, klass)
+    jquery_template_tag(id) do
+      render :partial => klass.partial, :object => klass.new, :locals => { :index => "${index}", :prefix => "${prefix}" }
+    end
+  end
+end

data/app/helpers/forms/mailer_helper.rb

@@ -0,0 +1,67 @@
+module Forms::MailerHelper
+  def render_field(field)
+    case field
+    when Forms::Fields::FieldSet
+      render_fieldset(field)
+    when Forms::Fields::CustomField
+      render_custom_field(field)
+    when Forms::Fields::Checkboxes
+      render_array(field, @submission.value_for(field) || ["None given"])
+    when Forms::Fields::ContentField
+      # Nothing
+    else
+      render_text_field(field, @submission.value_for(field))
+    end
+  end
+  
+private
+  def render_fieldset(fieldset)
+    content_tag(:div, :class => "fieldset") do
+      concat content_tag(:h3, fieldset.legend) if fieldset.legend?
+      concat safe_join(fieldset.fields.map { |f| render_field(f) }, "\n")
+      nil
+    end
+  end
+  
+  def render_custom_field(field)
+    value = @submission.value_for(field)
+    
+    case value
+    when Array
+      render_array(field, value)
+    when Hash
+      render_hash(field, value)
+    else
+      render_text_field(field, value)
+    end
+  end
+  
+  def render_array(field, array)
+    labelled_field(field) do
+      concat content_tag(:ul, safe_join(array.map { |i| content_tag(:li, i) }))
+    end
+  end
+  
+  def render_hash(field, hash)
+    labelled_field(field) do
+      concat content_tag(:ul, safe_join(hash.map { |k, v|
+        content_tag(:li, content_tag(:strong, k) + ": " + v)
+      }))
+    end
+  end
+  
+  def render_text_field(field, value)
+    labelled_field(field) do
+      concat field.is_a?(Forms::Fields::TextArea) ? tag(:br) : " "
+      concat value
+    end
+  end
+  
+  def labelled_field(field)
+    content_tag(:p, :class => "field") do
+      concat content_tag(:strong, field.label + ":")
+      yield
+      nil
+    end
+  end
+end

data/app/helpers/forms/submissions_helper.rb

@@ -0,0 +1,71 @@
+module Forms::SubmissionsHelper
+  def render_field(field)
+    case field
+    when Forms::Fields::FieldSet
+      render_fieldset(field)
+    when Forms::Fields::CustomField
+      render_custom_field(field)
+    when Forms::Fields::Checkboxes
+      labelled_field(field) do
+        value = @submission.value_for(field)
+        render_array(field, value || [""])
+      end
+    when Forms::Fields::TextArea
+      labelled_field(field) do
+        value = @submission.value_for(field)
+        form.text_area field.label, :value => value || "", :readonly => true, :rows => 5
+      end
+    when Forms::Fields::ContentField
+      # Nothing
+    else
+      labelled_field(field) do
+        value = @submission.value_for(field)
+        form.text_field field.label, :value => value || "", :readonly => true
+      end
+    end
+  end
+
+private
+  def labelled_field(field)
+    field(field.label, :label => field.label.html_safe) do
+      yield
+    end
+  end
+
+  def render_fieldset(fieldset)
+    content_tag(:div, :class => "shaded") do
+      concat content_tag(:h2, fieldset.legend) if fieldset.legend?
+      concat safe_join(fieldset.fields.map { |f| render_field(f) })
+      nil
+    end
+  end
+  
+  def render_custom_field(field)
+    labelled_field(field) do
+      value = @submission.value_for(field)
+      
+      case value
+      when Array
+        render_array(field, value)
+      when Hash
+        render_hash(field, value)
+      else
+        form.text_field field.label, :value => value || "", :readonly => true
+      end
+    end
+  end
+  
+  def render_array(field, array)
+    content_tag(:ul, safe_join(array.map { |value|
+      content_tag(:li, form.text_field("#{field.label}[]", :value => value || "", :readonly => true))
+    }))
+  end
+  
+  def render_hash(field, hash)
+    content_tag(:div, :class => "inline") do
+      safe_join(hash.map { |key, value|
+        form.label("#{field.label} #{key}", key) + form.text_field("#{field.label} #{key}", :value => value || "", :readonly => true, :size => nil)
+      })
+    end
+  end
+end

data/app/mailers/forms/mailer.rb

@@ -0,0 +1,11 @@
+class Forms::Mailer < ActionMailer::Base
+  default :template_path => "form"
+  
+  def submission(form, submission)
+    @form, @submission = form, submission
+    
+    mail(:from => "no-reply@#{form.site.domain}",
+         :to => form.recipients,
+         :subject => form.subject)
+  end
+end

data/app/models/forms/field_collection.rb

@@ -0,0 +1,21 @@
+class Forms::FieldCollection < MongoModel::Collection[Forms::Fields::Field]
+  def map_with_index
+    result = []
+    each_with_index { |item, index| result[index] = yield(item, index) }
+    result
+  end
+  
+  def self.cast(collection)
+    case collection
+    when Hash
+      sorted_attrs = collection.sort { |(a, _), (b, _)| a.to_i <=> b.to_i }.map { |_, attrs| attrs }
+      super(sorted_attrs)
+    else
+      super
+    end
+  end
+  
+  def render(submission, template)
+    Forms::FieldCollectionRenderer.new(self, submission, template).render
+  end
+end

data/app/models/forms/fields/checkbox.rb

@@ -0,0 +1,8 @@
+module Forms::Fields
+  class Checkbox < Field
+    property :label, String, :required => true
+    property :required, Boolean, :default => false
+    
+    self.renderer = Forms::CheckboxRenderer
+  end
+end

data/app/models/forms/fields/checkboxes.rb

@@ -0,0 +1,10 @@
+module Forms::Fields
+  class Checkboxes < Field
+    include OptionedField
+  
+    property :label, String, :required => true
+    property :required, Boolean, :default => false
+    
+    self.renderer = Forms::CheckboxesRenderer
+  end
+end

data/app/models/forms/fields/content_field.rb

@@ -0,0 +1,7 @@
+module Forms::Fields
+  class ContentField < Field
+    property :content, Translated[ActionView::OutputBuffer]
+    
+    self.renderer = Forms::ContentFieldRenderer
+  end
+end

data/app/models/forms/fields/countries_dropdown.rb

@@ -0,0 +1,14 @@
+module Forms::Fields
+  class CountriesDropdown < Field
+    property :label, String, :default => "Country", :required => true
+    property :required, Boolean, :default => false
+    
+    self.renderer = Forms::SelectFieldRenderer
+
+    def options
+      COUNTRIES
+    end
+    
+    COUNTRIES = Forms::Plugin.load_yaml("countries.yml")
+  end
+end

data/app/models/forms/fields/custom_field.rb

@@ -0,0 +1,8 @@
+module Forms::Fields
+  class CustomField < Field
+    property :label, String, :required => true
+    property :partial, String
+    
+    self.renderer = Forms::CustomFieldRenderer
+  end
+end

data/app/models/forms/fields/field.rb

@@ -0,0 +1,28 @@
+module Forms::Fields
+  class Field < Wheelhouse::EmbeddedResource
+    class_attribute :renderer
+    self.renderer = Forms::FieldRenderer
+    
+    def render(submission, template)
+      self.class.renderer.new(self, submission, template).render
+    end
+    
+    def required?
+      read_attribute(:required)
+    end
+    
+    def self.partial
+      name.demodulize.underscore
+    end
+    
+    def self.cast(attrs)
+      case attrs
+      when Hash
+        type = attrs.delete('type')
+        Forms::Fields.const_get(type).new(attrs)
+      else
+        super
+      end
+    end
+  end
+end

data/app/models/forms/fields/field_set.rb

@@ -0,0 +1,14 @@
+module Forms::Fields
+  class FieldSet < Field
+    property :legend, String
+    property :fields, Forms::FieldCollection
+    
+    validates_associated :fields
+    
+    self.renderer = Forms::FieldSetRenderer
+    
+    def to_ary
+      fields
+    end
+  end
+end

data/app/models/forms/fields/optioned_field.rb

@@ -0,0 +1,17 @@
+module Forms::Fields
+  module OptionedField
+    extend ActiveSupport::Concern
+  
+    included do
+      property :options, MongoModel::Collection[String]
+    end
+  
+    def options=(options)
+      write_attribute(:options, options.reject(&:blank?))
+    end
+
+    def options(include_blank = false)
+      read_attribute(:options) + (include_blank ? [""] : [])
+    end
+  end
+end

data/app/models/forms/fields/radio_buttons.rb

@@ -0,0 +1,10 @@
+module Forms::Fields
+  class RadioButtons < Field
+    include OptionedField
+  
+    property :label, String, :required => true
+    property :required, Boolean, :default => false
+    
+    self.renderer = Forms::RadioButtonsRenderer
+  end
+end

data/app/models/forms/fields/select_field.rb

@@ -0,0 +1,10 @@
+module Forms::Fields
+  class SelectField < Field
+    include OptionedField
+
+    property :label, String, :required => true
+    property :required, Boolean, :default => false
+    
+    self.renderer = Forms::SelectFieldRenderer
+  end
+end

data/app/models/forms/fields/states_dropdown.rb

@@ -0,0 +1,15 @@
+module Forms::Fields
+  class StatesDropdown < Field
+    property :label, String, :default => "State", :required => true
+    property :country, String, :required => true
+    property :required, Boolean, :default => false
+
+    self.renderer = Forms::SelectFieldRenderer
+
+    def options
+      STATES[country]
+    end
+
+    STATES = Forms::Plugin.load_yaml("states.yml").tap { |hash| hash.each { |k, v| hash[k] = v.invert } }
+  end
+end

data/app/models/forms/fields/submit_button.rb

@@ -0,0 +1,7 @@
+module Forms::Fields
+  class SubmitButton < Field
+    property :label, String, :default => "Submit", :required => true
+    
+    self.renderer = Forms::SubmitButtonRenderer
+  end
+end

data/app/models/forms/fields/text_area.rb

@@ -0,0 +1,8 @@
+module Forms::Fields
+  class TextArea < Field
+    property :label, String, :required => true
+    property :required, Boolean, :default => false
+    
+    self.renderer = Forms::TextAreaRenderer
+  end
+end