[pettanr/pettanr.git] / lib / peta / item.rb

module Peta
  class Item < ActiveRecord::Base
    self.abstract_class = true
    attr :boosters
    
    # Dynamic ClassMethods
    
    def self._dev?
      Rails.env == "development"
    end
    
    def self._skip_load?
      if self._dev?
        return true unless self.my_manifest
        return true unless Manifest.manifest.items
        return true unless Manifest.manifest.models
      end
      false
    end
    
    def self.load_manifest
      return nil if self._skip_load?
      vc = self.my_manifest.valid_encode_columns
      define_singleton_method("valid_encode_columns") do 
        vc
      end
      cm = self.my_manifest.child_models
      define_singleton_method("child_models") do
        cm
      end
      cen = self.my_manifest.child_element_names
      define_singleton_method("child_element_names") do
        cen
      end
      # Instance Methods
    end
    
    # ClassMethods
    # class_name
    # table_name
    
    before_validation :valid_encode
    
    def self.my_peta
      return nil unless Manifest.manifest.items
      Manifest.manifest.items[self.item_name]
    end
    
    def self.my_controller
      return nil unless Manifest.manifest.controllers
      Manifest.manifest.controllers[self.table_name]
    end
    
    def self.my_manifest
      return nil unless Manifest.manifest.models
      Manifest.manifest.models[self.item_name]
    end
    
    def self.singular
      self.to_s
    end
    
    def self.plural
      self.singular.pluralize
    end
    
    def self.item_name
      self.singular.underscore
    end
    
    def self.item?
      true
    end
    
    def self.content?
      false
    end
    
    def self.element?
      false
    end
    
    def self.root?
      false
    end
    
    def self.parent_model
      nil
    end
    
    def self.path_name with_engine = false
      self.plural.underscore
    end
    
    def self.pickup_item_name
      self.item_name
    end
    
    def self.pickup_column_name
      'id'
    end
    
    def self.find_boost_name column_name
      self.my_peta.find_boost_name column_name
    end
    
    def self.extend_column? column_name
      self.my_peta.extend_column? column_name
    end
    
    def self.list_where
      ''
    end
    
    def self.list_order
      self.table_name + '.updated_at desc'
    end
    
    def self.list_opt
      {}
    end
    
    def self.list_json_opt
      {}
    end
    
    def self.show item_id, operators = nil
      opt = {}
      opt.merge!(self.show_opt)
      item = self.find(item_id, opt)
      item.boosts 'read'
      raise ActiveRecord::Forbidden if operators and item.visible?(operators) == false
      item
    end
    
    def self.show_opt
      {}
    end
    
    def self.show_json_opt
      {}
    end
    
    def self.fold_extend_settings attr
      self.my_peta.boost.each do |name, manifest|
        my_settings = attr[manifest.settings_column_name]
        if my_settings.is_a?(Hash)
          attr[manifest.settings_column_name] = my_settings.to_json
        end
      end
    end
    
    #InstanceMethods
    
    def item_name
      self.class.item_name
    end
    
    def model_name
      self.item_name
    end
    
    def table_name
      self.class.table_name
    end
    
    def path_name with_engine = false
      self.class.path_name(with_engine)
    end
    
    def pickup_item_name
      self.class.pickup_item_name
    end
    
    def pickup_column_name
      self.class.pickup_column_name
    end
    
    def pickup_id
      self.attributes[self.pickup_column_name]
    end
    
    def form_template with_engine = false
      self.path_name(with_engine) + '/form'
    end
    
    def form_name
      self.extend_column ? self.attributes[self.extend_column] : self.item_name
    end
    
    def valid_encode
      self.class.valid_encode_columns.each do |a|
        next if attributes[a] == nil
        raise Pettanr::BadRequest unless self.attributes[a].valid_encoding?
      end
    end
    
    def boosts level
      self.class.my_peta.boost.each do |boost_name, boost_manifest|
        next if level == 'read' and boost_manifest.level == 'post'
        self.boost boost_manifest
      end
    end
    
    def boost boost_manifest
      @boosters ||= {}
      @boosters[boost_manifest.name] ||= Locmare::Booster.new(boost_manifest, self)
    end
    
    def boosters
      @boosters ||= {}
    end
    
    def extend_column? column_name
      self.class.extend_column? column_name
    end
    
    def supply_default
      self.boosters.each do |boost_name, booster|
        booster.supply_default
      end
    end
    
    def overwrite 
      self.boosters.each do |boost_name, booster|
        booster.overwrite
      end
    end
    
    def user_visible? operators
      if Manifest.manifest.magic_numbers['run_mode'] == 0
        return false unless operators.guest?
      else
        return false unless operators.resource_reader?
      end
      true
    end
    
    def visible? operators
      return false unless self.user_visible? operators
      true
    end
    
    def editize?
      self.respond_to? :editor
    end
    
    def dom_id
      self.id.to_s
    end
    
    def dom_pool_type
      self.new_record? ? 'stored' : 'new'
    end
    
    def merge_dom_item_id attr, name = nil
      if self.editize?
        attr.merge({'id' => self.dom_item_id(name)})
      else
        attr
      end
    end
    
    def tag_attributes name = nil, opt = {}
      r = {
        'data-pool_type' => self.dom_pool_type, 'data-id' => self.dom_id, 
        'data-item_name' => self.item_name
      }
      r = self.merge_dom_item_id r, name
      r.merge!(opt)
      r
    end
    
    def field_tag_attributes column_name, opt = {}
      self.tag_attributes(column_name, opt).merge(
        {'data-column_name' => column_name}
      )
    end
    
    def post_attribute_key
      self.dom_id
    end
    
    ##################################################################
    # importer
    ##################################################################
    
    def self.each_import data
      data.each do |n, d|
        yield n, d
      end
    end
    
    def self.import_system_picture attr
      d = attr["text"]
      return false if d.blank?
      imager = PettanImager.load(Base64.decode64(d.to_s))
      return false unless imager
      sp = SystemPicture.store(imager)
      return false unless sp
      sp.id
    end
    
    def self.replace_system_picture attr
      attr.each do |name, value|
        if value.is_a? Hash
          r = if name.to_s =~ /_id$/
            self.import_system_picture value
          else
            self.replace_system_picture value
          end
          return false unless r
          attr[name] = r
        end
      end
    end
    
    def self.modify_object(name, attr, key = 'name')
      c = 'find_by_' + key.to_s
      r = self.__send__ c, name
      if r
        r.attributes = attr
      else
        r = self.new attr
        r[key] = name
      end
      r
    end
    
    def self.import_list(attrs, &blk)
      res = []
      self.transaction do
        attrs.each do |name, item|
          m = blk.call(name, item)
          res.push(m) unless m.valid?
        end
        raise ActiveRecord::Rollback unless res.empty?
      end
      res
    end
    
    def self.import_text(text, &blk)
      attrs = JSON.parse(text)
      self.import_list attrs, &blk
    end
    
    def self.import_file(filename, &blk)
      text = File.open(filename, 'r').read
      self.import_text text, &blk
    end
    
    def self.import_url(url, &blk)
      text = open(url).read
      self.import_text text, &blk
    end
    
    def self.import_urls(urls, &blk)
      r = {}
      urls.each do |url|
        h = {}
        begin
          h[:validations] = self.import_url(url, &blk)
        rescue
          h[:exception] = {:location => $@, :message => $!}
        end
        r[url] = h
      end
      r
    end
    
  end
end