<?php
//=============================================================================
//
// Copyright Francois Laupretre <phk@tekwire.net>
//
//   Licensed under the Apache License, Version 2.0 (the "License");
//   you may not use this file except in compliance with the License.
//   You may obtain a copy of the License at
//
//       http://www.apache.org/licenses/LICENSE-2.0
//
//   Unless required by applicable law or agreed to in writing, software
//   distributed under the License is distributed on an "AS IS" BASIS,
//   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
//   See the License for the specific language governing permissions and
//   limitations under the License.
//
//=============================================================================
/**
* @copyright Francois Laupretre <phk@tekwire.net>
* @license http://www.apache.org/licenses/LICENSE-2.0 Apache License, V 2.0
* @category PHK
* @package PHK
*///==========================================================================

namespace PHK\CLI {

if (!class_exists('PHK\CLI\Cmd',false))
{

//=============================================================================
/**
* phkmgr CLI script. Builds and manages PHK packages.
*
* API status: Private
* Included in the PHK PHP runtime: No
* Implemented in the extension: No
*///==========================================================================

class Cmd
{
//---------

private static function errorAbort($msg,$usage=true)
{
if ($usage) $msg .= " - Use 'help' command for syntax";
throw new \Exception($msg);
}

//---------

private static function usage()
{
echo "
Available commands :

  - build [-s <psf-path>] [-d <var>=<value> ...]] <package-path>
        Builds a PHK package
        Options :
            -s <psf-path> : the path to the Package Specification File. If this
			                option is not set, the PSF path is computed from
							the package path (replacing file suffix with '.psf').
            -d <var>=<value> : Define a variable. In the PSF, variable expansion
                               syntax is '\$(var)'. Can be set more than once.

  - check <package-path>
        Checks an existing package's integrity
        Options :
            -f <format> : Output format. Default is 'auto'.

    - help
        Display this message

Global options :

  -v : Increase verbose level (can be set more than once)
  -q : Decrease verbose level (can be set more than once)

More information at http://phk.tekwire.net\n\n";
}

//---------
// Main
// Options can be located before AND after the action keyword.

public static function run($args)
{
$op=new Options;
$op->parseAll($args);
$action=(count($args)) ? array_shift($args) : 'help';

switch($action)
	{
	case 'build':
		if (count($args)!=1) self::errorAbort("$action requires 1 argument");
		$phk_path=array_shift($args);
		\PHK\Build\PSF\Parser::build($phk_path,$op->option('psf_path'),$op->option('vars'));
		break;

	case 'check':
		if (count($args)!=1) self::errorAbort("$action requires 1 argument");
		$phk_path=array_shift($args);
		$mnt=\PHK\Mgr::mount($phk_path);
		$obj=\PHK\Mgr::instance($mnt);
		$errs=$obj->check();
		if (count($errs))
			{
			foreach($errs as $err) \Phool\Display::error($err);
			throw new \Exception("*** The check procedure found errors in $phk_path");
			}
		\Phool\Display::info('Check OK');
		break;

	case 'help':
		self::usage();
		break;

	default:
		self::errorAbort("Unknown action: '$action'");
	}
}

//---
} // End of class
//===========================================================================
} // End of class_exists
//===========================================================================
} // End of namespace
//===========================================================================
?>