#
#--
#
# $Id: webgen.rb 203 2005-02-21 18:42:04Z thomas $
#
# webgen: template based static website generator
# Copyright (C) 2004 Thomas Leitner
#
# This program is free software; you can redistribute it and/or modify it under the terms of the GNU
# General Public License as published by the Free Software Foundation; either version 2 of the
# License, or (at your option) any later version.
#
# This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without
# even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# General Public License for more details.
#
# You should have received a copy of the GNU General Public License along with this program; if not,
# write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#
#++
#

require 'optparse'
require 'webgen/configuration'

module Webgen

  class Color

    @@colors = {:bold => [0, 1], :green => [0, 32], :lblue => [1, 34], :lred => [1, 31], :reset => [0, 0]}

    def Color.colorify
      @@colors.each do |color, values|
        module_eval <<-EOF
        def Color.#{color.to_s}
        "\e[#{values[0]};#{values[1]}m"
        end
        EOF
      end
    end

    def Color.method_missing( id )
      ''
    end

  end

  class WebgenMain

    def main( cmdOptions )
      Color.colorify if $stdout.isatty
      main, data = parse_options( cmdOptions )

      Plugin['Configuration'].init_all( data )
      main.call
    end


    def parse_options( cmdOptions )
      config = Plugin['Configuration']
      data = {}
      main = method( :runMain )

      opts = OptionParser.new do |opts|
        opts.summary_width = 25
        opts.summary_indent = '  '

        opts.banner = "Usage: webgen [options]\n#{Webgen::SUMMARY}"

        opts.separator ""
        opts.separator "Configuration options:"

        opts.on( "--config-file FILE", "-C", String, "The configuration file which should be used" ) { |data['configfile']| }
        opts.on( "--source-dir DIR", "-S", String, "The directory from where the files are read" ) { |data['srcDirectory']| }
        opts.on( "--output-dir DIR", "-O", String, "The directory where the output should go" ) { |data['outDirectory']| }
        opts.on( "--verbosity LEVEL", "-V", Integer, "The verbosity level" ) { |data['verbosityLevel']| }
        opts.on( "--[no-]logfile", "-L", "Log to file webgen.log" ) { |logfile| config.set_log_dev_to_logfile if logfile }

        opts.separator ""
        opts.separator "Other options:"

        opts.on( "--list-plugins", "-p", "List all the plugins and information about them" ) { main = method( :runListPlugins ) }
        opts.on( "--list-configuration", "-c", "List all plugin configuration parameters" ) { main = method( :runListConfiguration ) }
        opts.on_tail( "--help", "Display this help screen" ) { puts opts; exit }
        opts.on_tail( "--version", "-v", "Show version" ) do
          puts "Webgen #{Webgen::VERSION}"
          exit
        end
      end

      begin
        opts.parse!( cmdOptions )
      rescue RuntimeError => e
        print "Error:\n" << e.reason << ": " << e.args.join(", ") << "\n\n"
        puts opts
        exit
      end

      [main, data]
    end


    def runMain
      logger.info "Starting Webgen..."

      # load all the files in src dir and build tree
      tree = Plugin['FileHandler'].build_tree

      # execute tree transformer plugins
      Plugin['TreeWalker'].execute( tree ) unless tree.nil?

      # generate output files
      Plugin['FileHandler'].write_tree( tree ) unless tree.nil?

      logger.info "Webgen finished"
    end


    def runListPlugins
      print "List of loaded plugins:\n"

      headers = Hash.new {|h,k| h[k] = k.gsub(/([A-Z])/, ' \1').strip}

      ljustlength = 30 + Color.green.length + Color.reset.length
      header = ''
      Plugin.config.sort { |a, b| a[0] <=> b[0] }.each do |classname, data|
        newHeader = headers[classname[/^.*?(?=::)/]]
        unless newHeader == header
          print "\n  #{Color.bold}#{newHeader}#{Color.reset}:\n";
          header = newHeader
        end
        print "    - #{Color.green}#{data.plugin}#{Color.reset}:".ljust(ljustlength) +"#{data.summary}\n"
      end
    end


    def runListConfiguration
      print "List of configuration parameters:\n\n"
      ljustlength = 20 + Color.green.length + Color.reset.length
      Plugin.config.sort.each do |classname, data|
        next if data.params.nil?
        print "  #{Color.bold}#{data.plugin}#{Color.reset}:\n"
        data.params.sort.each do |key, item|
          print "    #{Color.green}Parameter:#{Color.reset}".ljust(ljustlength)
          puts Color.lred + item.name + Color.reset + " = " + Color.lblue +  item.value.inspect + Color.reset + " (" + item.default.inspect + ")"
          puts "    #{Color.green}Description:#{Color.reset}".ljust(ljustlength) + item.description
          print "\n"
        end
        print "\n"
      end
    end

  end

end