module Cms
  class ContentType < ActiveRecord::Base
    attr_accessor :group_name
    belongs_to :content_type_group, :class_name => 'Cms::ContentTypeGroup'
    validates_presence_of :content_type_group
    before_validation :set_content_type_group

    scope :named, lambda { |name| {:conditions => ["#{ContentType.table_name}.name = ?", name]} }

    scope :connectable,
          :include => :content_type_group,
          :conditions => ["#{ContentTypeGroup.table_name}.name != ?", 'Categorization'],
          :order => "#{ContentType.table_name}.priority, #{ContentType.table_name}.name"

    def self.list
      all.map { |f| f.name.underscore.to_sym }
    end


    # Given a 'key' like 'html_blocks' or 'portlet'. Looks first for a class in the Cms:: namespace, then again without it.
    # Raises exception if nothing was found.
    def self.find_by_key(key)
      class_name = key.tableize.classify
      content_type = find(:first, :conditions => ["name like ?", "%#{class_name}"])
      if content_type.nil?
        if class_name.constantize.ancestors.include?(Cms::Portlet)
          content_type = Cms::ContentType.new(:name => class_name)
          content_type.content_type_group = Cms::ContentTypeGroup.find_by_name('Core')
          content_type.freeze
          content_type
        else
          raise "Not a Portlet"
        end
      else
        content_type
      end
    rescue Exception
      if class_name.starts_with? "Cms::"
        return self.find_by_key(class_name.gsub(/Cms::/, ""))
      end
      raise "Couldn't find ContentType of class '#{class_name}'"
    end

    # Returns URL friendly 'key' which is used to identify this
    def key
      model_class_form_name
    end

    # Returns the partial used to render the form fields for a given block.
    def form
      f = model_class.respond_to?(:form) ? model_class.form : "#{name.underscore.pluralize}/form"
      if main_app_model?
        f = "cms/#{f}"
      end
      f
    end

    def display_name
      model_class.respond_to?(:display_name) ? model_class.display_name : Cms::Behaviors::Connecting.default_naming_for(model_class)
    end

    def display_name_plural
      model_class.respond_to?(:display_name_plural) ? model_class.display_name_plural : display_name.pluralize
    end

    def model_class
      name.constantize
    end

    # @deprecated Should be removed eventually
    def route_name
      if model_class.name.starts_with?("Cms")
        model_class_form_name
      else
        "main_app.cms_#{model_class_form_name}"
      end
    end

    include EngineHelper
    def target_class
      model_class
    end

    def path_subject
      model_class
    end

    # Cms::HtmlBlock -> html_block
    # ThingBlock -> thing_block
    def model_class_form_name
      model_class.model_name.element
    end

    # Allows models to show additional columns when being shown in a list.
    def columns_for_index
      if model_class.respond_to?(:columns_for_index)
        model_class.columns_for_index.map do |column|
          column.respond_to?(:humanize) ? {:label => column.humanize, :method => column} : column
        end
      else
        [{:label => "Name", :method => :name, :order => "name"},
         {:label => "Updated On", :method => :updated_on_string, :order => "updated_at"}]
      end
    end

    # Used in ERB for pathing
    def content_block_type
      name.demodulize.pluralize.underscore
    end

    # This is used for situations where you want different to use a type for the list page
    # This is true for portlets, where you don't want to list all portlets of a given type,
    # You want to list all portlets
    def content_block_type_for_list
      if model_class.respond_to?(:content_block_type_for_list)
        model_class.content_block_type_for_list
      else
        content_block_type
      end
    end

    def set_content_type_group
      if group_name
        group = Cms::ContentTypeGroup.first(:conditions => {:name => group_name})
        self.content_type_group = group || build_content_type_group(:name => group_name)
      end
    end

  end
end