Viewing file:  PHPConstants.php (6.23 KB) -rw-rw-rw-
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
<?php
/**
* Part of the PEAR Config package
*
* PHP Version 4
*
* @category Configuration
* @package Config
* @author Phillip Oertel <me@phillipoertel.com>
* @license http://www.php.net/license PHP License
* @version SVN: $Id: PHPConstants.php 306571 2010-12-22 06:50:39Z cweiske $
* @link http://pear.php.net/package/Config
*/
require_once 'Config/Container.php';
/**
* Config parser for PHP constant files
*
* @category Configuration
* @package Config
* @author Phillip Oertel <me@phillipoertel.com>
* @license http://www.php.net/license PHP License
* @link http://pear.php.net/package/Config
*/
class Config_Container_PHPConstants extends Config_Container
{
/**
* Valid config options:
* - "lowercase" - boolean - config names are lowercased when reading them
*
* @var array
*/
var $options = array(
'lowercase' => false
);
/**
* Constructor
*
* @param string $options (optional)Options to be used by renderer
*
* @access public
*/
function Config_Container_PHPConstants($options = array())
{
$this->options = array_merge($this->options, $options);
} // end constructor
/**
* Parses the data of the given configuration file
*
* @param string $datasrc Path to the configuration file
* @param object &$obj Reference to a config object
*
* @return mixed PEAR_ERROR, if error occurs or true if ok
*
* @access public
*/
function &parseDatasrc($datasrc, &$obj)
{
$return = true;
if (!file_exists($datasrc)) {
return PEAR::raiseError(
'Datasource file does not exist.',
null, PEAR_ERROR_RETURN
);
}
$fileContent = file_get_contents($datasrc, true);
if (!$fileContent) {
return PEAR::raiseError(
"File '$datasrc' could not be read.",
null, PEAR_ERROR_RETURN
);
}
$rows = explode("\n", $fileContent);
for ($i=0, $max=count($rows); $i<$max; $i++) {
$line = $rows[$i];
//blanks?
// sections
if (preg_match("/^\/\/\s*$/", $line)) {
preg_match("/^\/\/\s*(.+)$/", $rows[$i+1], $matches);
$obj->container->createSection(trim($matches[1]));
$i += 2;
continue;
}
// comments
if (preg_match("/^\/\/\s*(.+)$/", $line, $matches)
|| preg_match("/^#\s*(.+)$/", $line, $matches)
) {
$obj->container->createComment(trim($matches[1]));
continue;
}
// directives
$regex = "/^\s*define\s*\('([A-Z1-9_]+)',\s*'*(.[^\']*)'*\)/";
preg_match($regex, $line, $matches);
if (!empty($matches)) {
$name = trim($matches[1]);
if ($this->options['lowercase']) {
$name = strtolower($name);
}
$obj->container->createDirective(
$name, trim($matches[2])
);
}
}
return $return;
} // end func parseDatasrc
/**
* Returns a formatted string of the object
*
* @param object &$obj Container object to be output as string
*
* @return string
*
* @access public
*/
function toString(&$obj)
{
$string = '';
switch ($obj->type)
{
case 'blank':
$string = "\n";
break;
case 'comment':
$string = '// '.$obj->content."\n";
break;
case 'directive':
$content = $obj->content;
// don't quote numeric values, true/false and constants
if (is_bool($content)) {
$content = var_export($content, true);
} else if (!is_numeric($content)
&& !in_array($content, array('false', 'true'))
&& !preg_match('/^[A-Z_]+$/', $content)
) {
$content = "'" . str_replace("'", '\\\'', $content) . "'";
}
$string = 'define('
. '\'' . strtoupper($obj->name) . '\''
. ', ' . $content . ');'
. chr(10);
break;
case 'section':
if (!$obj->isRoot()) {
$string = chr(10);
$string .= '//'.chr(10);
$string .= '// '.$obj->name.chr(10);
$string .= '//'.chr(10);
}
if (count($obj->children) > 0) {
for ($i = 0, $max = count($obj->children); $i < $max; $i++) {
$string .= $this->toString($obj->getChild($i));
}
}
break;
default:
$string = '';
}
return $string;
} // end func toString
/**
* Writes the configuration to a file
*
* @param mixed $datasrc Info on datasource such as path to the file
* @param string &$obj Configuration object to write
*
* @return mixed PEAR_Error on failure or boolean true if all went well
*
* @access public
*/
function writeDatasrc($datasrc, &$obj)
{
$fp = @fopen($datasrc, 'w');
if (!$fp) {
return PEAR::raiseError(
'Cannot open datasource for writing.',
1, PEAR_ERROR_RETURN
);
}
$string = "<?php";
$string .= "\n\n";
$string .= '/**' . chr(10);
$string .= ' *' . chr(10);
$string .= ' * AUTOMATICALLY GENERATED CODE - DO NOT EDIT BY HAND' . chr(10);
$string .= ' *' . chr(10);
$string .= '**/' . chr(10);
$string .= $this->toString($obj);
$string .= "\n?>"; // <? : Fix my syntax coloring
$len = strlen($string);
@flock($fp, LOCK_EX);
@fwrite($fp, $string, $len);
@flock($fp, LOCK_UN);
@fclose($fp);
// need an error check here
return true;
} // end func writeDatasrc
} // end class Config_Container_PHPConstants
?>
|