| 1 | <?php | 
| 2 |  | 
| 3 | /** | 
| 4 | * Config_File class. | 
| 5 | * | 
| 6 | * This library is free software; you can redistribute it and/or | 
| 7 | * modify it under the terms of the GNU Lesser General Public | 
| 8 | * License as published by the Free Software Foundation; either | 
| 9 | * version 2.1 of the License, or (at your option) any later version. | 
| 10 | * | 
| 11 | * This library is distributed in the hope that it will be useful, | 
| 12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of | 
| 13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU | 
| 14 | * Lesser General Public License for more details. | 
| 15 | * | 
| 16 | * You should have received a copy of the GNU Lesser General Public | 
| 17 | * License along with this library; if not, write to the Free Software | 
| 18 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA | 
| 19 | * | 
| 20 | * @link http://smarty.php.net/ | 
| 21 | * @version 2.6.3 | 
| 22 | * @copyright Copyright: 2001-2004 ispi of Lincoln, Inc. | 
| 23 | * @author Andrei Zmievski <andrei@php.net> | 
| 24 | * @access public | 
| 25 | * @package Smarty | 
| 26 | */ | 
| 27 |  | 
| 28 | /* $Id: Config_File.class.php,v 1.70 2004/04/12 12:38:35 messju Exp $ */ | 
| 29 |  | 
| 30 | /** | 
| 31 | * Config file reading class | 
| 32 | * @package Smarty | 
| 33 | */ | 
| 34 | class Config_File { | 
| 35 | /**#@+ | 
| 36 | * Options | 
| 37 | * @var boolean | 
| 38 | */ | 
| 39 | /** | 
| 40 | * Controls whether variables with the same name overwrite each other. | 
| 41 | */ | 
| 42 | var $overwrite        =    true; | 
| 43 |  | 
| 44 | /** | 
| 45 | * Controls whether config values of on/true/yes and off/false/no get | 
| 46 | * converted to boolean values automatically. | 
| 47 | */ | 
| 48 | var $booleanize        =    true; | 
| 49 |  | 
| 50 | /** | 
| 51 | * Controls whether hidden config sections/vars are read from the file. | 
| 52 | */ | 
| 53 | var $read_hidden     =    true; | 
| 54 |  | 
| 55 | /** | 
| 56 | * Controls whether or not to fix mac or dos formatted newlines. | 
| 57 | * If set to true, \r or \r\n will be changed to \n. | 
| 58 | */ | 
| 59 | var $fix_newlines =    true; | 
| 60 | /**#@-*/ | 
| 61 |  | 
| 62 | /** @access private */ | 
| 63 | var $_config_path    = ""; | 
| 64 | var $_config_data    = array(); | 
| 65 | /**#@-*/ | 
| 66 |  | 
| 67 | /** | 
| 68 | * Constructs a new config file class. | 
| 69 | * | 
| 70 | * @param string $config_path (optional) path to the config files | 
| 71 | */ | 
| 72 | function Config_File($config_path = NULL) | 
| 73 | { | 
| 74 | if (isset($config_path)) | 
| 75 | $this->set_path($config_path); | 
| 76 | } | 
| 77 |  | 
| 78 |  | 
| 79 | /** | 
| 80 | * Set the path where configuration files can be found. | 
| 81 | * | 
| 82 | * @param string $config_path path to the config files | 
| 83 | */ | 
| 84 | function set_path($config_path) | 
| 85 | { | 
| 86 | if (!empty($config_path)) { | 
| 87 | if (!is_string($config_path) || !file_exists($config_path) || !is_dir($config_path)) { | 
| 88 | $this->_trigger_error_msg("Bad config file path '$config_path'"); | 
| 89 | return; | 
| 90 | } | 
| 91 | if(substr($config_path, -1) != DIRECTORY_SEPARATOR) { | 
| 92 | $config_path .= DIRECTORY_SEPARATOR; | 
| 93 | } | 
| 94 |  | 
| 95 | $this->_config_path = $config_path; | 
| 96 | } | 
| 97 | } | 
| 98 |  | 
| 99 |  | 
| 100 | /** | 
| 101 | * Retrieves config info based on the file, section, and variable name. | 
| 102 | * | 
| 103 | * @param string $file_name config file to get info for | 
| 104 | * @param string $section_name (optional) section to get info for | 
| 105 | * @param string $var_name (optional) variable to get info for | 
| 106 | * @return string|array a value or array of values | 
| 107 | */ | 
| 108 | function &get($file_name, $section_name = NULL, $var_name = NULL) | 
| 109 | { | 
| 110 | if (empty($file_name)) { | 
| 111 | $this->_trigger_error_msg('Empty config file name'); | 
| 112 | return; | 
| 113 | } else { | 
| 114 | $file_name = $this->_config_path . $file_name; | 
| 115 | if (!isset($this->_config_data[$file_name])) | 
| 116 | $this->load_file($file_name, false); | 
| 117 | } | 
| 118 |  | 
| 119 | if (!empty($var_name)) { | 
| 120 | if (empty($section_name)) { | 
| 121 | return $this->_config_data[$file_name]["vars"][$var_name]; | 
| 122 | } else { | 
| 123 | if(isset($this->_config_data[$file_name]["sections"][$section_name]["vars"][$var_name])) | 
| 124 | return $this->_config_data[$file_name]["sections"][$section_name]["vars"][$var_name]; | 
| 125 | else | 
| 126 | return array(); | 
| 127 | } | 
| 128 | } else { | 
| 129 | if (empty($section_name)) { | 
| 130 | return (array)$this->_config_data[$file_name]["vars"]; | 
| 131 | } else { | 
| 132 | if(isset($this->_config_data[$file_name]["sections"][$section_name]["vars"])) | 
| 133 | return (array)$this->_config_data[$file_name]["sections"][$section_name]["vars"]; | 
| 134 | else | 
| 135 | return array(); | 
| 136 | } | 
| 137 | } | 
| 138 | } | 
| 139 |  | 
| 140 |  | 
| 141 | /** | 
| 142 | * Retrieves config info based on the key. | 
| 143 | * | 
| 144 | * @param $file_name string config key (filename/section/var) | 
| 145 | * @return string|array same as get() | 
| 146 | * @uses get() retrieves information from config file and returns it | 
| 147 | */ | 
| 148 | function &get_key($config_key) | 
| 149 | { | 
| 150 | list($file_name, $section_name, $var_name) = explode('/', $config_key, 3); | 
| 151 | $result = &$this->get($file_name, $section_name, $var_name); | 
| 152 | return $result; | 
| 153 | } | 
| 154 |  | 
| 155 | /** | 
| 156 | * Get all loaded config file names. | 
| 157 | * | 
| 158 | * @return array an array of loaded config file names | 
| 159 | */ | 
| 160 | function get_file_names() | 
| 161 | { | 
| 162 | return array_keys($this->_config_data); | 
| 163 | } | 
| 164 |  | 
| 165 |  | 
| 166 | /** | 
| 167 | * Get all section names from a loaded file. | 
| 168 | * | 
| 169 | * @param string $file_name config file to get section names from | 
| 170 | * @return array an array of section names from the specified file | 
| 171 | */ | 
| 172 | function get_section_names($file_name) | 
| 173 | { | 
| 174 | $file_name = $this->_config_path . $file_name; | 
| 175 | if (!isset($this->_config_data[$file_name])) { | 
| 176 | $this->_trigger_error_msg("Unknown config file '$file_name'"); | 
| 177 | return; | 
| 178 | } | 
| 179 |  | 
| 180 | return array_keys($this->_config_data[$file_name]["sections"]); | 
| 181 | } | 
| 182 |  | 
| 183 |  | 
| 184 | /** | 
| 185 | * Get all global or section variable names. | 
| 186 | * | 
| 187 | * @param string $file_name config file to get info for | 
| 188 | * @param string $section_name (optional) section to get info for | 
| 189 | * @return array an array of variables names from the specified file/section | 
| 190 | */ | 
| 191 | function get_var_names($file_name, $section = NULL) | 
| 192 | { | 
| 193 | if (empty($file_name)) { | 
| 194 | $this->_trigger_error_msg('Empty config file name'); | 
| 195 | return; | 
| 196 | } else if (!isset($this->_config_data[$file_name])) { | 
| 197 | $this->_trigger_error_msg("Unknown config file '$file_name'"); | 
| 198 | return; | 
| 199 | } | 
| 200 |  | 
| 201 | if (empty($section)) | 
| 202 | return array_keys($this->_config_data[$file_name]["vars"]); | 
| 203 | else | 
| 204 | return array_keys($this->_config_data[$file_name]["sections"][$section]["vars"]); | 
| 205 | } | 
| 206 |  | 
| 207 |  | 
| 208 | /** | 
| 209 | * Clear loaded config data for a certain file or all files. | 
| 210 | * | 
| 211 | * @param string $file_name file to clear config data for | 
| 212 | */ | 
| 213 | function clear($file_name = NULL) | 
| 214 | { | 
| 215 | if ($file_name === NULL) | 
| 216 | $this->_config_data = array(); | 
| 217 | else if (isset($this->_config_data[$file_name])) | 
| 218 | $this->_config_data[$file_name] = array(); | 
| 219 | } | 
| 220 |  | 
| 221 |  | 
| 222 | /** | 
| 223 | * Load a configuration file manually. | 
| 224 | * | 
| 225 | * @param string $file_name file name to load | 
| 226 | * @param boolean $prepend_path whether current config path should be | 
| 227 | *                              prepended to the filename | 
| 228 | */ | 
| 229 | function load_file($file_name, $prepend_path = true) | 
| 230 | { | 
| 231 | if ($prepend_path && $this->_config_path != "") | 
| 232 | $config_file = $this->_config_path . $file_name; | 
| 233 | else | 
| 234 | $config_file = $file_name; | 
| 235 |  | 
| 236 | ini_set('track_errors', true); | 
| 237 | $fp = @fopen($config_file, "r"); | 
| 238 | if (!is_resource($fp)) { | 
| 239 | $this->_trigger_error_msg("Could not open config file '$config_file'"); | 
| 240 | return false; | 
| 241 | } | 
| 242 |  | 
| 243 | $contents = ($size = filesize($config_file)) ? fread($fp, $size) : ''; | 
| 244 | fclose($fp); | 
| 245 |  | 
| 246 | $this->_config_data[$config_file] = $this->parse_contents($contents); | 
| 247 | return true; | 
| 248 | } | 
| 249 |  | 
| 250 | /** | 
| 251 | * Store the contents of a file manually. | 
| 252 | * | 
| 253 | * @param string $config_file file name of the related contents | 
| 254 | * @param string $contents the file-contents to parse | 
| 255 | */ | 
| 256 | function set_file_contents($config_file, $contents) | 
| 257 | { | 
| 258 | $this->_config_data[$config_file] = $this->parse_contents($contents); | 
| 259 | return true; | 
| 260 | } | 
| 261 |  | 
| 262 | /** | 
| 263 | * parse the source of a configuration file manually. | 
| 264 | * | 
| 265 | * @param string $contents the file-contents to parse | 
| 266 | */ | 
| 267 | function parse_contents($contents) | 
| 268 | { | 
| 269 | if($this->fix_newlines) { | 
| 270 | // fix mac/dos formatted newlines | 
| 271 | $contents = preg_replace('!\r\n?!', "\n", $contents); | 
| 272 | } | 
| 273 |  | 
| 274 | $config_data = array(); | 
| 275 | $config_data['sections'] = array(); | 
| 276 | $config_data['vars'] = array(); | 
| 277 |  | 
| 278 | /* reference to fill with data */ | 
| 279 | $vars =& $config_data['vars']; | 
| 280 |  | 
| 281 | /* parse file line by line */ | 
| 282 | preg_match_all('!^.*\r?\n?!m', $contents, $match); | 
| 283 | $lines = $match[0]; | 
| 284 | for ($i=0, $count=count($lines); $i<$count; $i++) { | 
| 285 | $line = $lines[$i]; | 
| 286 | if (empty($line)) continue; | 
| 287 |  | 
| 288 | if ( $line{0} == '[' && preg_match('!^\[(.*?)\]!', $line, $match) ) { | 
| 289 | /* section found */ | 
| 290 | if ($match[1]{0} == '.') { | 
| 291 | /* hidden section */ | 
| 292 | if ($this->read_hidden) { | 
| 293 | $section_name = substr($match[1], 1); | 
| 294 | } else { | 
| 295 | /* break reference to $vars to ignore hidden section */ | 
| 296 | unset($vars); | 
| 297 | $vars = array(); | 
| 298 | continue; | 
| 299 | } | 
| 300 | } else { | 
| 301 | $section_name = $match[1]; | 
| 302 | } | 
| 303 | if (!isset($config_data['sections'][$section_name])) | 
| 304 | $config_data['sections'][$section_name] = array('vars' => array()); | 
| 305 | $vars =& $config_data['sections'][$section_name]['vars']; | 
| 306 | continue; | 
| 307 | } | 
| 308 |  | 
| 309 | if (preg_match('/^\s*(\.?\w+)\s*=\s*(.*)/s', $line, $match)) { | 
| 310 | /* variable found */ | 
| 311 | $var_name = rtrim($match[1]); | 
| 312 | if (strpos($match[2], '"""') === 0) { | 
| 313 | /* handle multiline-value */ | 
| 314 | $lines[$i] = substr($match[2], 3); | 
| 315 | $var_value = ''; | 
| 316 | while ($i<$count) { | 
| 317 | if (($pos = strpos($lines[$i], '"""')) === false) { | 
| 318 | $var_value .= $lines[$i++]; | 
| 319 | } else { | 
| 320 | /* end of multiline-value */ | 
| 321 | $var_value .= substr($lines[$i], 0, $pos); | 
| 322 | break; | 
| 323 | } | 
| 324 | } | 
| 325 | $booleanize = false; | 
| 326 |  | 
| 327 | } else { | 
| 328 | /* handle simple value */ | 
| 329 | $var_value = preg_replace('/^([\'"])(.*)\1$/', '\2', rtrim($match[2])); | 
| 330 | $booleanize = $this->booleanize; | 
| 331 |  | 
| 332 | } | 
| 333 | $this->_set_config_var($vars, $var_name, $var_value, $booleanize); | 
| 334 | } | 
| 335 | /* else unparsable line / means it is a comment / means ignore it */ | 
| 336 | } | 
| 337 | return $config_data; | 
| 338 | } | 
| 339 |  | 
| 340 | /**#@+ @access private */ | 
| 341 | /** | 
| 342 | * @param array &$container | 
| 343 | * @param string $var_name | 
| 344 | * @param mixed $var_value | 
| 345 | * @param boolean $booleanize determines whether $var_value is converted to | 
| 346 | *                            to true/false | 
| 347 | */ | 
| 348 | function _set_config_var(&$container, $var_name, $var_value, $booleanize) | 
| 349 | { | 
| 350 | if ($var_name{0} == '.') { | 
| 351 | if (!$this->read_hidden) | 
| 352 | return; | 
| 353 | else | 
| 354 | $var_name = substr($var_name, 1); | 
| 355 | } | 
| 356 |  | 
| 357 | if (!preg_match("/^[a-zA-Z_]\w*$/", $var_name)) { | 
| 358 | $this->_trigger_error_msg("Bad variable name '$var_name'"); | 
| 359 | return; | 
| 360 | } | 
| 361 |  | 
| 362 | if ($booleanize) { | 
| 363 | if (preg_match("/^(on|true|yes)$/i", $var_value)) | 
| 364 | $var_value = true; | 
| 365 | else if (preg_match("/^(off|false|no)$/i", $var_value)) | 
| 366 | $var_value = false; | 
| 367 | } | 
| 368 |  | 
| 369 | if (!isset($container[$var_name]) || $this->overwrite) | 
| 370 | $container[$var_name] = $var_value; | 
| 371 | else { | 
| 372 | settype($container[$var_name], 'array'); | 
| 373 | $container[$var_name][] = $var_value; | 
| 374 | } | 
| 375 | } | 
| 376 |  | 
| 377 | /** | 
| 378 | * @uses trigger_error() creates a PHP warning/error | 
| 379 | * @param string $error_msg | 
| 380 | * @param integer $error_type one of | 
| 381 | */ | 
| 382 | function _trigger_error_msg($error_msg, $error_type = E_USER_WARNING) | 
| 383 | { | 
| 384 | trigger_error("Config_File error: $error_msg", $error_type); | 
| 385 | } | 
| 386 | /**#@-*/ | 
| 387 | } | 
| 388 |  | 
| 389 | ?> |