#!/usr/bin/env ruby

# == Synopsis
#
# rtouch: recursively touch files.
#
# == Usage
#
# rtouch [OPTIONS] file [files...]
#
# -h, --help
#   show help
#
# -t, --time [[CC]YY]MMDDhhmm[.SS]
#   use the given time instead of the current time
#
# files: the files to create or touch.
# If directories, rtouch will update their time and everything within them.

require 'find'
require 'FileUtils'
require 'getoptlong'
require 'rdoc/usage'

def parse_time(tstr)
  if tstr =~ /^(\d\d\d\d|\d\d)?(\d\d)(\d\d)(\d\d)(\d\d)(\.(\d\d))?$/
    if $1
      if $1.length == 2
        year = $1.to_i + ((Time.new.year / 100).floor * 100)
      else
        year = $1
      end
    else
      year = Time.new.year
    end
    secs = $7 ? $7 : 0
    return Time.local(year, $2, $3, $4, $5, secs)
  else
    raise "bad time parameter"
  end
end

opts = GetoptLong.new(
            [ '--help', '-h', GetoptLong::NO_ARGUMENT ],
            [ '--time', '-t', GetoptLong::REQUIRED_ARGUMENT ]
           )

time = Time.new
begin
  opts.each do |opt, arg|
    case opt
    when '--help'
      RDoc::usage 0
    when '--time'
      time = parse_time arg
    end
  end
rescue Exception
  puts $!
  RDoc::usage 1
end

if not ARGV.length > 0
  RDoc::usage 1
end

ARGV.each do |dir|
  if File.exists? dir
    Find.find(dir) do |path|
      File::utime time, time, path
    end
  else
    FileUtils.touch dir
    File::utime time, time, dir
  end
end