class Drudje

# File lib/drudje.rb, line 7
    def initialize(src, dest, ext, lib, pattern)
lib = src if lib == nil
            @extension = ext
@src = src.end_with?('/') ? src.chomp('/') : src
@dest = dest.end_with?('/') ? dest.chomp('/') : dest
            @io = DrudjeIo.new
@lib = lib
@pattern = pattern || File.join(src, '*.' + extension)
    end

# File lib/drudje.rb, line 84
def expand(call_str)
        template = io.read template_file(call_str)
        args = get_args call_str
        render template, args
end

# File lib/drudje.rb, line 90
def find_call_loc(str, cstart = 0, cend = str.length)
  group_start = str.index('[[', cstart)
  group_end = str.rindex(']]', cend)
  return nil if !group_start || !group_end

  # We want group_end to point to the last ], not the first
  group_end = group_end + 1

  call_start = group_start + 2
  call_end = group_end - 2
  length = call_end - call_start + 1
  substr = str[call_start, length]
  # Make sure the substring doesn't have more calls nested
  if substr =~ /\[\[/
    find_call_loc(str, call_start, group_end)
  elsif substr =~ /\]\]/
    find_call_loc(str, group_start, call_end)
  else
    [group_start, group_end]
  end
end

# File lib/drudje.rb, line 56
def get_arg_hash(arg_str)
        parts = arg_str.scan(/(?:"(?:\\.|[^"])*"|[^"\s\n\r])+/)
        res = {}
        parts.each{|part|
                key, eq, val = part.partition('=')
                res[key] = unquote(val)
        }
        res
end

# File lib/drudje.rb, line 37
def get_args(call_str)
        arg_str = call_str.strip.partition(/[\n\r\s]+/)[2]
        if is_empty_args(arg_str)
                {}
        elsif is_arg_hash(arg_str)
                get_arg_hash arg_str
        else
                {'contents' => arg_str}
        end
end

# File lib/drudje.rb, line 52
def is_arg_hash(arg_str)
        arg_str =~ /\A([^ ]+=.+[\s\n\r]*)+\z/
end

# File lib/drudje.rb, line 48
def is_empty_args(arg_str)
        arg_str =~ /\A[\s\n\r]*\z/
end

# File lib/drudje.rb, line 71
    def output_file(file)
path = File.dirname file
if path =~ Regexp.new("\/" + self.src + "\/")
  destpath = path.gsub Regexp.new("\/" + self.src + "\/"), "/" + self.dest + "/"
elsif path =~ Regexp.new("^" + self.src + "\/")
  destpath = path.gsub Regexp.new("^" + self.src + "\/"), self.dest + "/"
else
  destpath = self.dest
end
            base = File.basename file
            File.join destpath, base
    end

# File lib/drudje.rb, line 121
def process(str)
        processed = process_pass(str)
        while(processed != str)
        str = processed
                processed = process_pass(str)
        end
        processed
end

# File lib/drudje.rb, line 112
    def process_pass(str)
call_loc = find_call_loc(str)
return str if !call_loc
before = str[0, call_loc[0]]
during = str[call_loc[0]+2..call_loc[1]-2]
after = str[call_loc[1]+1,str.length]
before + expand(during) + after
    end

# File lib/drudje.rb, line 17
def render(template, args)
        template.gsub(/\[\[=([^\]]+)\]\]/){
                if(args[$1] != nil)
                        args[$1]
                else
                        ''
                end
        }
end

# File lib/drudje.rb, line 130
    def run
            files = Dir.glob(self.pattern)
puts "No files found matching " + self.pattern.to_s if files.length == 0
            files.each do |file|
  outfile = output_file(file)
                    puts 'Processing file ' + file + ' to ' + outfile
                    contents = self.io.read file
                    processed = process contents
                    self.io.write outfile, processed
            end
    end

# File lib/drudje.rb, line 66
def template_file(call_str)
        parts = call_str.strip.partition(/[\s\n\r]+/)
        File.join self.lib, parts[0] + '.' + self.extension
end

# File lib/drudje.rb, line 27
def unquote(str)
        if str.start_with?('"', "'")
                str = str.slice(1..-1)
        end
        if str.end_with?('"', "'")
                str = str.slice(0..-2)
        end
        str
end