module RamenRails

  module AutoInclude
    def add_ramen_script_tag 
      RamenAfterFilter.filter(self)
    end

    def ramen_script_tag_options
      @ramen_script_tag_options || {}
    end
  end

  class RamenAfterFilter
   
    class InvalidUserObject < StandardError; end

    include ScriptTagHelper
    CLOSING_BODY_TAG = %r{</body>}

    def self.filter(controller)
      auto_include_filter = new(controller)
      return unless auto_include_filter.include_javascript?

      auto_include_filter.include_javascript!
    end

    attr_reader :controller

    def initialize(kontroller)
      @controller = kontroller 
    end

    def ramen_script_tag_options
      controller.ramen_script_tag_options
    end

    def include_javascript! 
      response.body = response.body.gsub(CLOSING_BODY_TAG, ramen_script_tag + '\\0')
    end

    def include_javascript?
      !ramen_script_tag_called_manually? &&
        html_content_type? &&
        response_has_closing_body_tag? &&
        ramen_org_id.present? &&
        ramen_user_object.present?
    end

    private
    def response
      controller.response
    end

    def html_content_type?
      response.content_type == 'text/html'
    end

    def response_has_closing_body_tag?
      !!(response.body[CLOSING_BODY_TAG])
    end

    def logged_in_url
      return controller.instance_eval(&RamenRails.config.logged_in_url) if RamenRails.config.logged_in_url
    end

    def return_url
      return controller.instance_eval(&RamenRails.config.return_url) if RamenRails.config.return_url
      ourl = Proc.new { request.original_url }
      return controller.instance_eval(&ourl)
    end

    def return_label
      return false unless RamenRails.config.return_label
      
      controller.instance_eval(&RamenRails.config.return_label)
    end

    def manual_opt_in
      return false unless RamenRails.config.manual_opt_in
      
      !!controller.instance_eval(&RamenRails.config.manual_opt_in)
    end

    def ramen_script_tag_called_manually?
      controller.instance_variable_get(SCRIPT_TAG_HELPER_CALLED_INSTANCE_VARIABLE)
    end

    POTENTIAL_RAMEN_COMPANY_OBJECTS = [
      Proc.new { instance_eval(&RamenRails.config.current_company) if RamenRails.config.current_company.present? },
      Proc.new { current_company },
      Proc.new { @company }
    ]

    def ramen_company_labels
      return nil unless ramen_company_object
      controller.instance_eval(&RamenRails.config.current_company_labels) if RamenRails.config.current_company_labels.present?
    rescue NameError => e
      Rails.logger.debug "Swallowing NameError. We're probably in an Engine or some other context like Devise."
      Rails.logger.debug e
    
      nil
    end

    def ramen_company_object
      POTENTIAL_RAMEN_COMPANY_OBJECTS.each do |potential_company|
        begin
          company = controller.instance_eval &potential_company
          if (company.present? && company.name.present? && company.id.present?)
            return company
          end

        rescue NameError
          next
        end
      end

      nil
    end

    POTENTIAL_RAMEN_USER_OBJECTS = [
      Proc.new { instance_eval(&RamenRails.config.current_user) if RamenRails.config.current_user.present? },
      Proc.new { current_user },
      Proc.new { @user }
    ]

    def ramen_user_labels
      return nil unless ramen_user_object
      controller.instance_eval(&RamenRails.config.current_user_labels) if RamenRails.config.current_user_labels.present?
    rescue NameError => e
      Rails.logger.debug "Swallowing NameError. We're probably in an Engine or some other context like Devise."
      Rails.logger.debug e
    
      nil
    end

    def ramen_user_object
      POTENTIAL_RAMEN_USER_OBJECTS.each do |potential_user|
        begin
          user = controller.instance_eval &potential_user
          return user if user.present? && 
            (user.email.present? || user.id.present?)
        rescue NameError
          next
        end
      end

      nil
    end

    def ramen_user_value
      return nil unless ramen_user_object
      controller.instance_eval(&RamenRails.config.current_user_value) if RamenRails.config.current_user_value.present?
    rescue NameError => e
      Rails.logger.debug "Swallowing NameError. We're probably in an Engine or some other context like Devise."
      Rails.logger.debug e
    
      nil
    end

    def ramen_org_id
      return ENV['RAMEN_ORGANIZATION_ID'] if ENV['RAMEN_ORGANIZATION_ID'].present?
      return RamenRails.config.organization_id if RamenRails.config.organization_id.present?
      return 'organization-id' if defined?(Rails) && Rails.env.development?
    
      nil
    end

    def ramen_org_secret
      return ENV['RAMEN_ORGANIZATION_SECRET'] if ENV['RAMEN_ORGANIZATION_SECRET'].present?
      return RamenRails.config.organization_secret if RamenRails.config.organization_secret.present?
      return 'organization-secret' if defined?(Rails) && Rails.env.development?
    
      nil
    end

    def ramen_custom_links
      RamenRails.config.custom_links
    end

    def ramen_script_tag
      obj = {}
      obj[:organization_id] = ramen_org_id
      obj[:user] = {}
      obj[:timestamp] = Time.now.to_i
      obj[:manual_opt_in] = manual_opt_in
      obj[:logged_in_url] = logged_in_url if logged_in_url.present?
      obj[:return_url] = return_url 
      obj[:return_label] = return_label
  
      user = ramen_user_object

      raise InvalidUserObject.new("User #{user} does not respond to and have a present? #id") unless user.respond_to?(:id) && user.id.present?
      raise InvalidUserObject.new("User #{user} does not respond to and have a present? #name") unless user.respond_to?(:name) && user.name.present?
      raise InvalidUserObject.new("User #{user} does not respond to and have a present? #email") unless user.respond_to?(:email) && user.email.present?

      [:email, :name, :id].each do |attr|
        obj[:user][attr] = user.send(attr)
      end
     
      if user.respond_to?(:created_at) && user.send(:created_at).present?
        obj[:user][:created_at] = user.send(:created_at).to_i
      end
      
      obj[:user][:value] = ramen_user_value if ramen_user_value.present?
      obj[:user][:labels] = ramen_user_labels unless ramen_user_labels.nil?
      obj[:custom_links] = ramen_custom_links if ramen_custom_links.present?

      company = ramen_company_object
      if company
        obj[:company] = {}

        [:url, :name, :id].each do |attr|
          obj[:company][attr] = company.send(attr)
        end
      
        obj[:company][:labels] = ramen_company_labels unless ramen_company_labels.nil?
      end

      obj = obj.deep_merge(ramen_script_tag_options) if ramen_script_tag_options.present?

      super(obj, organization_secret: ramen_org_secret)

    rescue InvalidUserObject => e
      ::Rails.logger.debug "InvalidUserObject exception. Not rendering Ramen script tag. Error details: #{e.inspect}"
      "<!-- Exception in ramen script tag. See logs. -->"
    rescue => e
      ::Rails.logger.debug "Exception in ramen-rails script tag method. Not rendering Ramen script tag. Error details: #{e.inspect}"
      "<!-- Exception in ramen script tag. See logs. -->"
    end

  end
end