<?php

/**

 * Zend Framework

 *

 * LICENSE

 *

 * This source file is subject to the new BSD license that is bundled

 * with this package in the file LICENSE.txt.

 * It is also available through the world-wide-web at this URL:

 * http://framework.zend.com/license/new-bsd

 * If you did not receive a copy of the license and are unable to

 * obtain it through the world-wide-web, please send an email

 * to license@zend.com so we can send you a copy immediately.

 *

 * @category   Zend

 * @package    Zend_Config

 * @copyright  Copyright (c) 2005-2009 Zend Technologies USA Inc. (http://www.zend.com)

 * @license    http://framework.zend.com/license/new-bsd     New BSD License

 * @version    $Id: Yaml.php 23650 2011-01-21 21:32:57Z mikaelkael $

 */

/**

 * @see Zend_Config_Writer

 */

require_once 'Zend/Config/Writer/FileAbstract.php';

/**

 * @see Zend_Config_Yaml

 */

require_once 'Zend/Config/Yaml.php';

/**

 * @category   Zend

 * @package    Zend_Config

 * @copyright  Copyright (c) 2005-2009 Zend Technologies USA Inc. (http://www.zend.com)

 * @license    http://framework.zend.com/license/new-bsd     New BSD License

 */

class Zend_Config_Writer_Yaml extends Zend_Config_Writer_FileAbstract

{

    /**

     * What to call when we need to decode some YAML?

     *

     * @var callable

     */

    protected $_yamlEncoder = array('Zend_Config_Writer_Yaml', 'encode');

    /**

     * Get callback for decoding YAML

     *

     * @return callable

     */

    public function getYamlEncoder()

    {

        return $this->_yamlEncoder;

    }

    /**

     * Set callback for decoding YAML

     *

     * @param  callable $yamlEncoder the decoder to set

     * @return Zend_Config_Yaml

     */

    public function setYamlEncoder($yamlEncoder)

    {

        if (!is_callable($yamlEncoder)) {

            require_once 'Zend/Config/Exception.php';

            throw new Zend_Config_Exception('Invalid parameter to setYamlEncoder - must be callable');

        }

        $this->_yamlEncoder = $yamlEncoder;

        return $this;

    }

    /**

     * Render a Zend_Config into a YAML config string.

     *

     * @since 1.10

     * @return string

     */

    public function render()

    {

        $data        = $this->_config->toArray();

        $sectionName = $this->_config->getSectionName();

        $extends     = $this->_config->getExtends();

        if (is_string($sectionName)) {

            $data = array($sectionName => $data);

        }

        foreach ($extends as $section => $parentSection) {

            $data[$section][Zend_Config_Yaml::EXTENDS_NAME] = $parentSection;

        }

        // Ensure that each "extends" section actually exists

        foreach ($data as $section => $sectionData) {

            if (is_array($sectionData) && isset($sectionData[Zend_Config_Yaml::EXTENDS_NAME])) {

                $sectionExtends = $sectionData[Zend_Config_Yaml::EXTENDS_NAME];

                if (!isset($data[$sectionExtends])) {

                    // Remove "extends" declaration if section does not exist

                    unset($data[$section][Zend_Config_Yaml::EXTENDS_NAME]);

                }

            }

        }

        return call_user_func($this->getYamlEncoder(), $data);

    }

    /**

     * Very dumb YAML encoder

     *

     * Until we have Zend_Yaml...

     *

     * @param array $data YAML data

     * @return string

     */

    public static function encode($data)

    {

        return self::_encodeYaml(0, $data);

    }

    /**

     * Service function for encoding YAML

     *

     * @param int $indent Current indent level

     * @param array $data Data to encode

     * @return string

     */

    protected static function _encodeYaml($indent, $data)

    {

        reset($data);

        $result = "";

        $numeric = is_numeric(key($data));

        foreach($data as $key => $value) {

            if(is_array($value)) {

                $encoded = "\n".self::_encodeYaml($indent+1, $value);

            } else {

                $encoded = (string)$value."\n";

            }

            $result .= str_repeat("  ", $indent).($numeric?"- ":"$key: ").$encoded;

        }

        return $result;

    }

}