#!/usr/bin/env ruby
require 'rubygems'
require 'timeout'
require 'optparse'
require 'hashlib'

def report(&block)
  Onering::Reporter.add(&block)
end

module Onering
  class Reporter
    DEFAULT_PLUGIN_GEMNAMES=[
      'onering-report-plugins'
    ]

    DEFAULT_PLUGIN_PATH = [
      '/var/lib/onering/reporter'
    ]

    DEFAULT_FACTER_PATH = [
      '/etc/facter'
    ]

    class<<self
      include Onering::Util

      attr_reader :facter_path

      def setup(config={})
        @options = config
        @facter_path = DEFAULT_FACTER_PATH

        @path = [*Onering::Config.get('reporter.plugin_path',[])]
        @path += DEFAULT_PLUGIN_PATH

      # add gem paths to the @path
        ([*Onering::Config.get('reporter.plugin_gems',[])]+DEFAULT_PLUGIN_GEMNAMES).compact.each do |g|
          begin
            p = File.join(Util.gem_path(g), 'lib')
            @path << File.join(p, 'reporter')
            @facter_path << File.join(p, 'facter')
          rescue Gem::LoadError => e
            Onering::Logger.warn("Error loading gem: #{e.message}", "Onering::Reporter")
            next
          end
        end

        begin
          ENV['FACTERLIB'] = @facter_path.join(':')
          require 'facter'
          Onering::Logger.debug("Facter loaded successfully, FACTERLIB is #{ENV['FACTERLIB']}", "Onering::Reporter")

        rescue LoadError
          Onering::Logger.error("Unable to load Facter library", "Onering::Reporter")
        end
      end

      def load_plugins()
      # load plugins from @path
        @path.compact.each do |root|
          begin
            Dir["#{root}/*"].each do |directory|

            # only process top-level directories
              if File.directory?(directory)
                d = File.basename(directory)

              # allow plugins to be conditionally loaded based on fact values:
              #   default - always load
              #   <fact>-<fact_value> - load if <fact> == <fact_value>
              #
                if d == 'default' or Facter.value(d.split('-',2).first).to_s.downcase.nil_empty == d.split('-',2).last.to_s.downcase.nil_empty
                  Dir[File.join(directory, '*.rb')].each do |plugin|
                    plugin = File.basename(plugin, '.rb')

                    begin
                      Timeout.timeout((@options[:plugin_timeout] || 10).to_i) do
                        Onering::Logger.debug("Loading plugin #{plugin}", "Onering::Reporter")
                        require "#{directory}/#{plugin}"
                      end
                    rescue Timeout::Error => e
                      Onering::Logger.warn("Plugin #{plugin} took too long to return, skipping", "Onering::Reporter")
                    end
                  end
                end
              end
            end
          rescue Exception => e
            Onering::Logger.warn(e.message, e.class.name)
            next
          end
        end
      end

      def add(&block)
        if block_given?
          instance_eval(&block)
        end
      end

      def property(name, value=nil)
        @_report[:properties].set(name.to_s.gsub('.','_'), value) unless value.nil?
      end

      def stat(name, value=nil)
        @_report[:properties][:metrics] ||= {}
        @_report[:properties][:metrics].set(name.to_s.gsub('.','_'), value) unless value.nil?
      end

      def report()
        @id = (@options[:id] || Onering::Util.fact('hardwareid', nil))

        if not @id.nil?
          Timeout.timeout((@options[:timeout] || 60).to_i) do
            hostname = (Facter.value('fqdn') rescue %x{hostname -f}.strip.chomp)

            @_report = {
              :id           => @id,
              :name         => hostname,
              :aliases      => @options[:aliases],
              :tags         => @options[:tags],
              :status       => (@options[:status] || 'online'),
              :inventory    => true,
              :properties   => {}
            }

          # loads plugins and populates @_report
            load_plugins

            return @_report.stringify_keys()
          end
        else
          Onering::Logger.fatal("Cannot generate report without a hardware ID", "Onering::Reporter")
        end

        {}
      end
    end
  end
end