# Copyright, 2016, by Samuel G. D. Williams. <http://www.codeotaku.com>
#
# Permission is hereby granted, free of charge, to any person obtaining a copy
# of this software and associated documentation files (the "Software"), to deal
# in the Software without restriction, including without limitation the rights
# to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
# copies of the Software, and to permit persons to whom the Software is
# furnished to do so, subject to the following conditions:
#
# The above copyright notice and this permission notice shall be included in
# all copies or substantial portions of the Software.
#
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
# IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
# FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
# AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
# LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
# OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
# THE SOFTWARE.

require_relative 'controller'
require_relative 'controller/build'
require_relative 'controller/clean'
require_relative 'controller/create'
require_relative 'controller/fetch'
require_relative 'controller/generate'
require_relative 'controller/list'
require_relative 'controller/visualize'

require_relative 'repository'

# For IncompatibleTeapotError
require_relative 'loader'

require 'samovar'

module Teapot
	module Command
		class Create < Samovar::Command
			self.description = "Create a new teapot package using the specified repository."
			
			one :project_name, "The name of the new project in title-case, e.g. 'My Project'."
			one :source, "The source repository to use for fetching packages, e.g. https://github.com/kurocha."
			many :packages, "Any additional packages you'd like to include in the project."
			
			def invoke(parent)
				project_path = parent.root || project_name.gsub(/\s+/, '-').downcase
				root = ::Build::Files::Path.expand(project_path)
				
				if root.exist?
					raise ArgumentError.new("#{root} already exists!")
				end
				
				# Make the path:
				root.create
				
				Teapot::Repository.new(root).init!
				
				parent.controller(root).create(@project_name, @source, @packages)
			end
		end

		class Generate < Samovar::Command
			self.description = "Run a generator to create files in your project."
			
			options do
				option '-f/--force', "Force the generator to run even if the current work-tree is dirty."
			end
			
			one :generator_name, "The name of the generator to be invoked."
			many :arguments, "The arguments that will be passed to the generator."
			
			def invoke(parent)
				generator_name, *arguments = @arguments
				
				parent.controller.generate(@generator_name, @arguments, @options[:force])
			end
		end

		class Fetch < Samovar::Command
			self.description = "Fetch remote packages according to the specified configuration."
			
			# 3 typical use cases:
			# - fetch current packages according to lockfile
			# - write current pacakges into lockfile
			# - update packages and update lockfile
			
			options do
				option '--update', "Update dependencies to the latest versions."
				option '--local', "Don't update from source, assume updated local packages."
			end
			
			def invoke(parent)
				parent.controller.fetch(**@options)
			end
		end

		class List < Samovar::Command
			self.description = "List provisions and dependencies of the specified package."
			
			many :packages, "Limit the listing to only these packages, or all packages if none specified."
			
			def invoke(parent)
				if @packages.any?
					only = Set.new(@packages)
				end
				
				parent.controller.list(only)
			end
		end

		class Build < Samovar::Command
			self.description = "Build the specified target."
			
			options do
				option '-j/-l/--limit <n>', "Limit the build to <n> concurrent processes."
				option '--only', "Only compile direct dependencies."
				option '-c/--continuous', "Run the build graph continually (experimental)."
			end
			
			many :targets, "Build these targets, or use them to help the dependency resolution process."
			split :argv, "Arguments passed to child process(es) of build if any."
			
			def invoke(parent)
				# TODO: This is a bit of a hack, figure out a way to pass it directly through to build subsystem.
				ARGV.replace(@argv) if @argv
				
				parent.controller.build(@targets)
			end
		end

		class Visualize < Samovar::Command
			self.description = "Generate a picture of the dependency graph."
			
			options do
				option '-o/--output-path <path>', "The output path for the visualization.", default: "dependency.svg"
				option '-d/--dependency-name <name>', "Show the partial chain for the given named dependency."
			end
			
			many :targets, "Visualize these targets, or use them to help the dependency resolution process."
			
			def invoke(parent)
				parent.controller.visualize(@targets, **@options)
			end
		end

		class Clean < Samovar::Command
			self.description = "Delete everything in the teapot directory."
			
			def invoke(parent)
				parent.controller.clean
			end
		end
		
		class Top < Samovar::Command
			self.description = "A decentralised package manager and build tool."
			
			options do
				option '-c/--configuration <name>', "Specify a specific build configuration.", default: ENV['TEAPOT_CONFIGURATION']
				option '-i/--in/--root <path>', "Work in the given root directory."
				option '--verbose | --quiet', "Verbosity of output for debugging.", key: :logging
				option '-h/--help', "Print out help information."
				option '-v/--version', "Print out the application version."
			end
			
			nested '<command>',
				'create' => Create,
				'generate' => Generate,
				'fetch' => Fetch,
				'list' => List,
				'build' => Build,
				'visualize' => Visualize,
				'clean' => Clean
			
			def root
				@options[:root]
			end
			
			def controller(root = nil, **options)
				Teapot::Controller.new(root || self.root || Dir.getwd, @options)
			end
			
			def invoke(program_name: File.basename($0))
				if @options[:version]
					puts "teapot v#{Teapot::VERSION}"
				elsif @options[:help] or @command.nil?
					print_usage(program_name)
				else
					track_time do
						@command.invoke(self)
					end
				end
			end
		end
	end
end