class
	EL_MAKE_DIRECTORY_COMMAND_IMP

inherit
	EL_MAKE_DIRECTORY_COMMAND_I
		export
			{NONE} all
		redefine
			execute
		end

	EL_OS_COMMAND_IMP
		undefine
			execute
		end

create
	make, make_default

feature -- Basic operations

	execute
		-- simulate behaviour of Unix command `mkdir --parents' with recursion
		-- (will work with sudo on Windows)
		do
			if attached directory_path as path and then not path.is_empty
				and then not path.exists and then attached path.parent as parent_dir
			then
				if parent_dir.exists_and_is_writeable then
					Precursor -- mkdir
				else
					directory_path := parent_dir
					execute -- recurse
					directory_path := path
					if parent_dir.exists_and_is_writeable then
						Precursor -- mkdir
					else
						check
							parent_writeable: False
						end
					end
				end
			end
		end

feature {NONE} -- Constants

	Template: STRING = "mkdir $directory_path"
end