#!/usr/bin/env ruby
# -*- coding: utf-8 -*-

require File.join(File.dirname(__FILE__), *%w".. lib Things2THL")
require "optparse"
require "ostruct"

# Command line options and defaults    
options=OpenStruct.new
options.completed = false
options.database = nil
options.structure = :projects_as_lists
options.areas = true
options.quiet = false
options.archivecompleted = true
options.projectsfolder = nil
options.contexttagsregex = '^@'
opts = OptionParser.new do |opts|
  opts.separator ''
  opts.separator 'Options:'
  
  opts.banner = "Usage: things2thl [options]"
  
  def opts.show_usage
    puts self
    exit  
  end
  
  opts.on("--projects-as-lists", "Convert projects in Things to lists in THL (default)") { options.structure = :projects_as_lists }
  opts.on("--projects-as-tasks", "Convert projects in Things to tasks in THL") { options.structure = :projects_as_tasks }
  opts.on("--no-areas", "Ignore areas in Things") { options.areas = false }
  opts.on('-C REGEX', '--context-tags-regex REGEX', 'Regular expression to identify tags that should be interpreted as contexts.',
          "  (default: #{options.contexttagsregex})") do |regex|
    options.contexttagsregex = regex
  end

  opts.on("--top-level-folder FOLDER", "If specified, do the import inside the named folders, instead of the top level",
          " (Inbox, etc. will also be created there instead of their corresponding places)") do |toplevel|
    options.toplevel = toplevel
  end
  opts.on("--projects-folder FOLDER", "If specified, the named folder will be created to contain all projects when",
          "  --projects-as-lists is used (otherwise they will be put in the top folders group).",
          "  If --projects-as-tasks is used, a 'Projects' list is always created, but this option",
          "  can be used to specify its name.") do |projfolder|
    options.projectsfolder = projfolder
  end

  opts.on("-c", "--completed", 'Transfer also completed/canceled tasks and projects (default: no)') { options.completed = true }
  opts.on("--no-archive-completed", 'If transferring completed/canceled tasks, also mark them as archived (default: yes)') {options.archivecompleted = false }
  opts.on("-q", "--quiet", "Do not print items as they are processed") { options.quiet = true }
#  opts.on("-n", "--dry-run", "Do not create anything in THL, just print the items that would be created") { options.dryrun = true }
#  opts.on("-n", "--notes", "Shows only tasks with notes") { options[:tasks] = { :onlynotes => true } }
#  opts.on("-a", "--all", 'Shows all tasks in the focus') { |f| options[:tasks] = { :children => false } }

  opts.on("-h", "--help", "Shows this help message") { opts.show_usage }
  opts.on("-v", "--version", "Shows version") do
    puts Things2THL::Version::STRING
    exit
  end

  opts.separator("")
  opts.separator("Options you should seldom need:")
  opts.on("--things THINGSAPP", "Location of the Things application (default: /Applications/Things.app)") do |things|    
    options.thingsapp = things
  end
  opts.on("--thl THLAPP", "Location of the The Hit List application (default: /Applications/The Hit List.app)") do |thl|
    options.thlapp = thl
  end
  
end

######################################################################
# Main program
######################################################################

opts.parse!
#opts.show_usage unless options.key?(:focus)

converter = Things2THL.new(options, options.thingsapp, options.thlapp)
things = converter.things
thl = converter.thl

# Create top-level containers if needed

# First, traverse all areas
if options.areas
  things.areas.get.each do |area|
    converter.process(Things2THL::ThingsNode.new(area))
  end
end

# Next, traverse all projects, putting each one inside its corresponding area
things.projects.get.each do |project|
  converter.process(Things2THL::ThingsNode.new(project))
end

# Now do the tasks
# This is more complicated because:
# - to_dos returns not only tasks, also projects (not areas)
# - to-dos returns tasks from all the views: Inbox, Today, Scheduled, Someday, and Next, so we have
#   to separate them and create the appropriate containers as needed
things.to_dos.get.each do |t|
  task=Things2THL::ThingsNode.new(t)
  next if task.type != :selected_to_do
  converter.process(task)
end