<?php
/*
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; under version 2
 * of the License (non-upgradable).
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
 *
 * Copyright (c) 2002-2008 (original work) Public Research Centre Henri Tudor & University of Luxembourg (under the project TAO & TAO2);
 *               2008-2010 (update and modification) Deutsche Institut für Internationale Pädagogische Forschung (under the project TAO-TRANSFER);
 *               2009-2012 (update and modification) Public Research Centre Henri Tudor (under the project TAO-SUSTAIN & TAO-DEV);
 *
 */

/**
 * The ConfigWriter class enables you to create config file from samples
 * and to write the constants inside.
 *
 * @author Bertrand CHEVRIER <bertrand.chevrier@tudor.lu>
 * @access public
 * @package tao

 *
 */
class tao_install_utils_ConfigWriter
{
    
    /**
     * @var string the path to the sample file
     */
    protected $sample;
    
    /**
     * @var string the path to the real config file
     */
    protected $file;
    
    /**
     * instantiate by config file
     * @param string $sample
     * @param string $file
     * @throws tao_install_utils_Exception
     */
    public function __construct($sample, $file)
    {
        if (!file_exists($sample)) {
            throw new tao_install_utils_Exception('Unable to find sample config ' . $sample);
        }
        $this->sample   = $sample;
        $this->file     = $file;
    }
    
    /**
     * Create the config file from the sample
     * @throws tao_install_utils_Exception
     */
    public function createConfig()
    {
        
        //common checks
        if (!is_writable(dirname($this->file))) {
            throw new tao_install_utils_Exception('Unable to create configuration file. Please set write permission to : ' . dirname($this->file));
        }
        if (file_exists($this->file) && !is_writable($this->file)) {
            throw new tao_install_utils_Exception('Unable to create the configuration file. Please set the write permissions to : ' . $this->file);
        }
        if (!is_readable($this->sample)) {
            throw new tao_install_utils_Exception('Unable to read the sample configuration. Please set the read permissions to : ' . $this->sample);
        }
        
        if (!copy($this->sample, $this->file)) {
            throw new tao_install_utils_Exception('Unable to copy the sample configuration to : ' . $this->file);
        }
    }
    
    /**
     * Write the constants into the config file
     * @param array $constants the list of constants to write (the key is the name of the constant)
     * @throws tao_install_utils_Exception
     */
    public function writeConstants(array $constants)
    {
        
        //common checks
        if (!file_exists($this->file)) {
            throw new tao_install_utils_Exception("Unable to write constants: $this->file don't exists!");
        }
        if (!is_readable($this->file) || !is_writable($this->file)) {
            throw new tao_install_utils_Exception("Unable to write constants: $this->file must have read and write permissions!");
        }

        $content = file_get_contents($this->file);
        if (!empty($content)) {
            foreach ($constants as $name => $val) {
                if (is_string($val)) {
                    $val = addslashes((string)$val);
                    $content = preg_replace('/(\'' . $name . '\')(.*?)$/ms', '$1,\'' . addslashes($val) . '\');', $content);
                } elseif (is_bool($val)) {
                    ($val === true) ? $val = 'true' : $val = 'false';
                    $content = preg_replace('/(\'' . $name . '\')(.*?)$/ms', '$1, ' . $val . ');', $content);
                } elseif (is_numeric($val)) {
                    $content = preg_replace('/(\'' . $name . '\')(.*?)$/ms', '$1, ' . $val . ');', $content);
                }
            }
            file_put_contents($this->file, $content);
        }
    }
}