rails_admin_cms 0.0.1

data/app/models/form/email.rb

@@ -0,0 +1,21 @@
+module Form
+  class Email < ActiveRecord::Base
+    include Admin::Form::Email
+
+    self.table_name_prefix = 'form_'
+
+    has_one :structure
+
+    def subject
+      send("subject_#{I18n.locale}").presence || I18n.t('cms.form.email.default_subject')
+    end
+
+    def body
+      send("body_#{I18n.locale}").presence || I18n.t('cms.form.email.default_body')
+    end
+
+    def send_to
+      read_attribute(:send_to).presence || Setting[:cms_mail_bcc]
+    end
+  end
+end

data/app/models/form/field.rb

@@ -0,0 +1,75 @@
+module Form
+  class Field < ActiveRecord::Base
+    include Admin::Form::Field
+
+    TYPES ||= %w[ string text email ]
+
+    self.table_name_prefix = 'form_'
+    self.inheritance_column = nil
+
+    belongs_to :structure, touch: true
+    has_many :fields, through: :structure
+
+    delegate :count, to: :fields, prefix: true
+    delegate :header, to: :structure
+
+    after_create ::Callbacks::Form::FieldAfterCreate.new
+    after_destroy ::Callbacks::Form::FieldAfterDestroy.new
+    before_update ::Callbacks::Form::FieldBeforeUpdate.new, if: :position_changed?
+    after_update :update_column_header, if: :default_label_changed_but_not_position?
+
+    with_options presence: true do
+      validates :type, inclusion: { in: TYPES }
+      validates :structure
+      validates :position, numericality: { greater_than_or_equal_to: 0}
+      with_options on: :create do
+        validates :position, numericality: { less_than_or_equal_to: :fields_count }
+      end
+      with_options on: :update do
+        validates :position, numericality: { less_than: :fields_count }
+      end
+    end
+
+    def column_key
+      :"column_#{position}"
+    end
+
+    def label
+      send("label_#{I18n.locale}")
+    end
+
+    def default_label
+      send("label_#{I18n.default_locale}")
+    end
+
+    def input_type
+      type.demodulize.underscore.to_sym
+    end
+
+    def type_enum
+      TYPES
+    end
+
+    def update_header
+      attributes = RailsAdminCMS::Config.custom_form_max_size.times.map do |i|
+        [:"column_#{i}", '']
+      end.to_h
+
+      fields.map do |field|
+        attributes[field.column_key] = field.default_label
+      end
+
+      header.update! attributes
+    end
+
+    private
+
+    def default_label_changed_but_not_position?
+      send("label_#{I18n.default_locale}_changed?") && !position_changed?
+    end
+
+    def update_column_header
+      header.update! column_key => default_label
+    end
+  end
+end

data/app/models/form/row.rb

@@ -0,0 +1,30 @@
+module Form
+  class Row < ActiveRecord::Base
+    include Form
+    include Admin::Form::Row
+
+    self.table_name_prefix = 'form_'
+
+    belongs_to :structure
+    has_many :fields, through: :structure
+    has_one :viewable, through: :structure, class_name: 'Viewable::Form'
+
+    validates :structure, presence: true
+
+    delegate :with_email?, :send_to, :subject, :body, :email_column_key, :header, to: :structure
+    delegate :form_name, to: :viewable
+
+    def send_from
+      send(email_column_key) if email_column_key
+    end
+
+    def labelled_values
+      columns = fields.count.times.map{ |i| "column_#{i}" }
+      values = header.attributes.slice(*columns)
+      values.reduce({}) do |values, (column_key, label)|
+        values[label] = send(column_key)
+        values
+      end
+    end
+  end
+end

data/app/models/form/static.rb

@@ -0,0 +1,17 @@
+module Form
+  module Static
+    extend ActiveSupport::Concern
+
+    included do
+      self.abstract_class = true
+    end
+
+    def with_email?
+      false
+    end
+
+    def form_name
+      model_name.element
+    end
+  end
+end

data/app/models/form/static/attachment.rb

@@ -0,0 +1,62 @@
+module Form
+  module Static
+    module Attachment
+      extend ActiveSupport::Concern
+
+      class_methods do
+        def has_attachments(*attachments)
+          define_singleton_method :attachments do
+            attachments
+          end
+
+          delegate :attachments, to: :class
+
+          if virtual?
+            attachments.each do |attachment|
+              attribute "#{attachment}_file_name",    :string
+              attribute "#{attachment}_content_type", :string
+              attribute "#{attachment}_file_size",    :integer
+              attribute "#{attachment}_updated_at",   :datetime
+            end
+          end
+
+          attachments.each do |attachment|
+            has_attached_file attachment,
+              url: "/attachments/:class/:id_partition/:basename.:extension",
+              path: ":rails_root/private/attachments/:class/:id_partition/:basename.:extension"
+
+            validates_attachment_content_type attachment, { content_type: %w[
+            text/plain
+            application/pdf
+            application/msword
+            application/vnd.openxmlformats-officedocument.wordprocessingml.document
+            image/jpeg
+            image/png
+            image/gif
+          ] }
+            validates_attachment_file_name attachment, matches: [
+                /txt\Z/i,
+                /pdf\Z/i,
+                /doc\Z/i,
+                /docx\Z/i,
+                /jpe?g\Z/i,
+                /png\Z/i,
+                /gif\Z/i,
+              ]
+            validates_attachment_size attachment, less_than: 5.megabytes
+          end
+
+          before_post_process :normalize_attachment
+        end
+      end
+
+      private
+
+      def normalize_attachment
+        attachments.each do |attachment|
+          Rich::Backends::Paperclip.normalize_attachment(attachment)
+        end
+      end
+    end
+  end
+end

data/app/models/form/static/base.rb

@@ -0,0 +1,10 @@
+module Form
+  module Static
+    class Base < ActiveRecord::Base
+      include Form
+      include Static
+
+      self.table_name_prefix = 'form_static_'
+    end
+  end
+end

data/app/models/form/static/email.rb

@@ -0,0 +1,23 @@
+module Form
+  module Static
+    module Email
+      extend ActiveSupport::Concern
+
+      def subject
+        I18n.t('cms.form.email.default_subject')
+      end
+
+      def send_from
+        try(:email)
+      end
+
+      def send_to
+        Setting[:cms_mail_bcc]
+      end
+
+      def with_email?
+        true
+      end
+    end
+  end
+end

data/app/models/form/static/object.rb

@@ -0,0 +1,12 @@
+module Form
+  module Static
+    class Object < ActiveType::Object
+      include Form
+      include Static
+
+      def self.virtual?
+        true
+      end
+    end
+  end
+end

data/app/models/form/structure.rb

@@ -0,0 +1,90 @@
+module Form
+  class Structure < ActiveRecord::Base
+    include Admin::Form::Structure
+
+    self.table_name_prefix = 'form_'
+
+    has_one :viewable, class_name: 'Viewable::Form'
+    has_many :fields, -> { order(:position) }, dependent: :destroy
+    has_many :rows, -> { order(:id) }, dependent: :destroy
+    belongs_to :email, dependent: :destroy
+
+    validates :fields, length: { maximum: RailsAdminCMS::Config.custom_form_max_size }
+
+    after_create :create_header
+    after_update :expire_cache
+    after_touch  :expire_cache
+
+    accepts_nested_attributes_for :fields, allow_destroy: true
+    accepts_nested_attributes_for :email
+
+    delegate :form_name, to: :viewable
+    delegate :with_email?, :send_to, :subject, :body, to: :email
+
+    def name
+      @_name ||= "#{form_name}_#{id}".to_sym
+    end
+
+    def email_column_key
+      @email_column_key ||= fields.where(type: 'email').first.try(:column_key)
+    end
+
+    def header
+      rows.first
+    end
+
+    private
+
+    def create_header
+      rows.create!
+    end
+
+    def expire_cache
+      viewable.touch
+    end
+
+    module Splitter
+      extend ActiveSupport::Concern
+
+      included do
+        class << self
+          attr_accessor :scopes, :form_name
+        end
+        self.scopes = []
+        self.includes(:viewable).each do |structure|
+          current_id = structure.id
+          current_name = "#{structure.viewable.form_name}_#{current_id}".to_sym
+          ::Form::Row.define_singleton_method(current_name) do
+            where(structure_id: current_id)
+          end
+          self.scopes << current_name
+        end
+
+        after_create :add_to_scopes
+        before_destroy :remove_from_scopes
+      end
+
+      private
+
+      def add_to_scopes
+        current_id = self.id
+        ::Form::Row.define_singleton_method(name) do
+          where(structure_id: current_id)
+        end
+        self.class.scopes << name
+      end
+
+      def remove_from_scopes
+        if (current_name = self.class.form_name)
+          current_name = "#{current_name}_#{id}".to_sym
+          self.class.form_name = nil
+        else
+          current_name = name
+        end
+        self.class.scopes.delete(current_name)
+      end
+    end
+
+    include Splitter
+  end
+end

data/app/models/setting.rb

@@ -0,0 +1,85 @@
+class Setting < ActiveRecord::Base
+  include Admin::Setting
+
+  has_paper_trail if RailsAdminCMS::Config.with_paper_trail?
+
+  cattr_accessor :cache
+  self.cache = Rails.cache
+
+  after_commit :expire_cache
+
+  class << self
+    def []=(name, value)
+      write(name, value)
+
+      find_or_create_by!(name: name) do |setting|
+        setting.value = value
+      end
+
+      value
+    end
+
+    def [](name)
+      if has_key? name
+        return read(name)
+      end
+
+      if (setting = find_by(name: name))
+        value = setting.value
+      else
+        value = yield # default value passed as block
+      end
+
+      write(name, value)
+
+      value
+    end
+
+    def has_key?(name)
+      cache.exist? cache_key(name)
+    end
+
+    def expire(name)
+      cache.delete cache_key(name)
+    end
+
+    def apply_all(settings = {})
+      settings.each do |name, value|
+        find_or_create_by!(name: name) do |setting|
+          if value.is_a? Array
+            setting.value, setting.unit = value
+          else
+            setting.value = value
+          end
+        end
+      end
+    end
+
+    def remove_all(*settings)
+      settings.each do |name|
+        find_by(name: name).try(:destroy!)
+        expire(name)
+      end
+    end
+
+    private
+
+    def read(name)
+      cache.read cache_key(name)
+    end
+
+    def write(name, value)
+      cache.write cache_key(name), value
+    end
+
+    def cache_key(name)
+      "setting/#{name}"
+    end
+  end
+
+  private
+
+  def expire_cache
+    self.class.expire(name)
+  end
+end

data/app/models/unique_key.rb

@@ -0,0 +1,62 @@
+class UniqueKey < ActiveRecord::Base
+  include Admin::UniqueKey
+
+  has_paper_trail if RailsAdminCMS::Config.with_paper_trail?
+
+  belongs_to :viewable, polymorphic: true
+
+  before_update ::Callbacks::UniqueKeyBeforeUpdate.new
+
+  with_options on: :update do
+    validates :position, numericality: { greater_than: 0 }
+    validates :position, numericality: { less_than_or_equal_to: :list_count }
+  end
+
+  delegate :count, to: :list, prefix: true
+
+  class << self
+    def find_viewable(unique_key)
+      (unique_key = find_by(unique_key)) ? unique_key.viewable : nil
+    end
+
+    def find_or_create_viewable!(unique_key)
+      unless (viewable = find_viewable(unique_key))
+        viewable = create_localized_viewable!(unique_key)
+      end
+      viewable
+    end
+
+    def create_localized_viewable!(unique_key)
+      viewable = nil
+      I18n.available_locales.each do |locale|
+        attributes = unique_key.merge(locale: locale, viewable: unique_key[:viewable_type].constantize.new)
+        new_record = find_or_create_by! attributes
+        if I18n.locale == locale
+          viewable = new_record.viewable
+        end
+      end
+      viewable.try(:uuid) # forces uuid creation
+      viewable
+    end
+  end
+
+  def list(locale = nil)
+    self.class
+      .where(viewable_type: viewable_type, view_path: view_path, name: name)
+      .where(locale: locale || self.locale)
+  end
+
+  def other_locales(position = nil)
+    self.class
+      .where(viewable_type: viewable_type, view_path: view_path, name: name)
+      .where(position: position || self.position)
+      .where.not(locale: locale)
+  end
+
+  def with_buffered_position(new_position)
+    update_column(:position, 0)
+    yield
+    update_column(:position, new_position)
+    viewable.touch
+  end
+end