#!/usr/bin/ruby
require "tmpdir"
require "fileutils"
require "kconv"

print "Please give me the path of the winmail.dat file: "
a = STDIN.gets
if a[0, 1] == "~"
  a[0, 1] = ENV["HOME"]
end
a.gsub!("\\", "")
a.strip!
Dir.mktmpdir { |dir|
  FileUtils.copy_file(a, "#{dir}/winmail.dat")
  d = File.dirname(a)
  b = File.basename(a, ".*")
  if FileTest.exist?("#{d}/#{b}")
    n = 1
    while FileTest.exist?("#{d}/#{b}_#{n}")
      n += 1
    end
    b = "#{b}_#{n}"
  end
  Dir.chdir(dir)
  system("tnef <winmail.dat")
  puts "d = #{d} b = #{b}"
  Dir.mkdir("#{d}/#{b}")
  Dir.foreach(".") { |f|
    next if f == "." || f == ".." || f == "winmail.dat"
    n = 0
    s = ""
    while n < f.length
      if f[n, 1] == "%"
        s += f[n + 1, 2].hex.chr
        n += 3
      else
        s += f[n, 1]
        n += 1
      end
    end
    s = s.kconv(Kconv::UTF8, Kconv::SJIS)
    puts s
    FileUtils.copy_entry(f, "#{d}/#{b}/#{s}")
  }
}