<?php

require_once dirname(__FILE__) . DIRECTORY_SEPARATOR . 'ConversionException.php';

class FontForgeScript {

	const ORDER_QUADRATIC = 2;
	const ORDER_CUBIC = 3;

	/**
	 * @var array
	 */
	private $commands = array();

	/**
	 * @var array
	 */
	private $files = array();

	/**
	 * @return void
	 */
	public function __construct()
	{
	}

	/**
	 * @return string
	 */
	public function __toString()
	{
		return implode("\n", $this->commands);
	}

	/**
	 * @return void
	 */
	public function __destruct()
	{
		foreach ($this->files as $file)
		{
			if (is_file($file))
			{
				unlink($file);
			}
		}
	}

	/**
	 * @return FontForgeScript
	 */
	public function close()
	{
		$this->commands[] = 'Close()';

		return $this;
	}

	/**
	 * @fixme Sometimes removes glyphs it shouldn't.
	 * @return FontForgeScript
	 */
	public function clear()
	{
		$this->commands[] = 'Clear()';

		return $this;
	}

	/**
	 * @return FontForgeScript
	 */
	public function detachAndRemoveGlyphs()
	{
		$this->commands[] = 'DetachAndRemoveGlyphs()';

		return $this;
	}

	/**
	 * @return string
	 */
	public function execute()
	{
		$filename = Cufon::getUnusedFilename('.pe');

		file_put_contents($filename, $this->__toString());

		$this->files[] = $filename;

		chmod($filename, 0777);

		$command = sprintf('env %s -script %s', CUFON_FONTFORGE, escapeshellarg($filename));

		Cufon::log('Executing command: %s', $command);

		$status = 0;

		$output = array();

		exec($command, $output, $status);

		Cufon::log('Exited with status %d', $status);

		if ($status > 0)
		{
			throw new ConversionException('Conversion failed');
		}

		return implode("\n", $output);
	}

	/**
	 * @return FontForgeScript
	 */
	public function flattenCID()
	{
		$this->commands[] = 'if ($iscid); CIDFlatten(); endif;';

		return $this;
	}

	/**
	 * @param string $filename
	 * @return FontForgeScript
	 */
	public function generate($filename)
	{
		$this->commands[] = sprintf('Generate("%s")', addslashes($filename));

		return $this;
	}

	/**
	 * @return FontForgeScript
	 */
	public function printNameIDs()
	{
		$fields = array(
			'Copyright' => array(0, '$copyright'),
			'Trademark' => array(7, null),
			'Full name' => array(4, null),
			'Description' => array(10, null),
			'Manufacturer' => array(8, null),
			'Designer' => array(9, null),
			'Vendor URL' => array(11, null),
			'License information' => array(14, null)
		);

		foreach ($fields as $field => $info)
		{
			list($code, $alt) = $info;

			$this->commands[] =
				"if (GetTTFName(0x409, ${code}) != '')\n" .
					"\tPrint('${field}:')\n" .
					"\tPrint(GetTTFName(0x409, ${code}))\n" .
					"\tPrint('')\n" .
				(!empty($alt) ?
				"elseif (${alt} != '')" .
					"\tPrint('${field}:')\n" .
					"\tPrint(${alt})\n" .
					"\tPrint('')\n" : '') .
				"endif";
		}

		return $this;
	}

	/**
	 * @param int $at
	 * @return FontForgeScript
	 */
	public function horizontalFlip($at = null)
	{
		$this->commands[] = sprintf('HFlip(%s)', is_int($at) ? $at : '');

		return $this;
	}

	/**
	 * @param string $filename
	 * @return FontForgeScript
	 */
	public function open($filename)
	{
		$this->commands[] = sprintf('Open("%s")', addslashes($filename));

		return $this;
	}

	/**
	 * @param int $point
	 * @return FontForgeScript
	 */
	public function reduceUnicode($point)
	{
		$this->commands[] = sprintf('SelectFewerSingletons(0u%X)', $point);

		return $this;
	}

	/**
	 * @param int $from
	 * @param int $to
	 * @return FontForgeScript
	 */
	public function reduceUnicodeRange($from, $to)
	{
		$this->commands[] = sprintf('SelectFewer(0u%X, 0u%X)', $from, $to);

		return $this;
	}

	/**
	 * @param string $encoding
	 * @return FontForgeScript
	 */
	public function reEncode($encoding)
	{
		$this->commands[] = sprintf('Reencode("%s")', $encoding);

		return $this;
	}

	/**
	 * @return FontForgeScript
	 */
	public function removeAllKerns()
	{
		$this->commands[] = 'RemoveAllKerns()';

		return $this;
	}

	/**
	 * http://fontforge.sourceforge.net/scripting-alpha.html#RoundToInt
	 *
	 * @param int $factor
	 * @return unknown
	 */
	public function roundToInt($factor = 1)
	{
		$this->commands[] = sprintf('RoundToInt(%d)', $factor);

		return $this;
	}

	/**
	 * @param int $emSize
	 * @return FontForgeScript
	 */
	public function scaleToEm($emSize)
	{
		$this->commands[] = sprintf('ScaleToEm(%d)', $emSize);
	}

	/**
	 * @return FontForgeScript
	 */
	public function selectAll()
	{
		$this->commands[] = 'SelectAll()';

		return $this;
	}

	/**
	 * @return FontForgeScript
	 */
	public function selectInvert()
	{
		$this->commands[] = 'SelectInvert()';

		return $this;
	}

	/**
	 * @return FontForgeScript
	 */
	public function selectNone()
	{
		$this->commands[] = 'SelectNone()';

		return $this;
	}

	/**
	 * @param int $point
	 * @return FontForgeScript
	 */
	public function selectUnicode($point)
	{
		$this->commands[] = sprintf('SelectMoreSingletons(0u%X)', $point);

		return $this;
	}

	/**
	 * @param int $from
	 * @param int $to
	 * @return FontForgeScript
	 */
	public function selectUnicodeRange($from, $to)
	{
		$this->commands[] = sprintf('SelectMore(0u%X, 0u%X)', $from, $to);

		return $this;
	}

	/**
	 * @param int $order
	 * @return FontForgeScript
	 */
	public function setFontOrder($order)
	{
		$this->commands[] = sprintf('SetFontOrder(%d)', $order);

		return $this;
	}

	/**
	 * http://fontforge.sourceforge.net/scripting-alpha.html#Simplify
	 *
	 * @return FontForgeScript
	 */
	public function simplify($error = 3)
	{
		$this->commands[] = sprintf('Simplify(1 | 2 | 4 | 8 | 32 | 64, %d)', $error);

		return $this;
	}

	/**
	 * @param int $at
	 * @return FontForgeScript
	 */
	public function verticalFlip($at = null)
	{
		$this->commands[] = sprintf('VFlip(%s)', is_int($at) ? $at : '');

		return $this;
	}

}