Subversion-Projekte lars-tiefland.php_share

Revision

Details | Letzte Änderung | Log anzeigen | RSS feed

Revision Autor Zeilennr. Zeile
1 lars 1 
<?php
2 
/**
3 
 * package.xml parsing class, package.xml version 2.0
4 
 *
5 
 * PHP versions 4 and 5
6 
 *
7 
 * @category   pear
8 
 * @package    PEAR
9 
 * @author     Greg Beaver <cellog@php.net>
10 
 * @copyright  1997-2009 The Authors
11 
 * @license    http://opensource.org/licenses/bsd-license.php New BSD License
12 
 * @version    CVS: $Id: v2.php 313023 2011-07-06 19:17:11Z dufuz $
13 
 * @link       http://pear.php.net/package/PEAR
14 
 * @since      File available since Release 1.4.0a1
15 
 */
16 
/**
17 
 * base xml parser class
18 
 */
19 
require_once 'PEAR/XMLParser.php';
20 
require_once 'PEAR/PackageFile/v2.php';
21 
/**
22 
 * Parser for package.xml version 2.0
23 
 * @category   pear
24 
 * @package    PEAR
25 
 * @author     Greg Beaver <cellog@php.net>
26 
 * @copyright  1997-2009 The Authors
27 
 * @license    http://opensource.org/licenses/bsd-license.php New BSD License
28 
 * @version    Release: @PEAR-VER@
29 
 * @link       http://pear.php.net/package/PEAR
30 
 * @since      Class available since Release 1.4.0a1
31 
 */
32 
class PEAR_PackageFile_Parser_v2 extends PEAR_XMLParser
33 
{
34 
    var $_config;
35 
    var $_logger;
36 
    var $_registry;
37 
 
38 
    function setConfig(&$c)
39 
    {
40 
        $this->_config = &$c;
41 
        $this->_registry = &$c->getRegistry();
42 
    }
43 
 
44 
    function setLogger(&$l)
45 
    {
46 
        $this->_logger = &$l;
47 
    }
48 
    /**
49 
     * Unindent given string
50 
     *
51 
     * @param string $str The string that has to be unindented.
52 
     * @return string
53 
     * @access private
54 
     */
55 
    function _unIndent($str)
56 
    {
57 
        // remove leading newlines
58 
        $str = preg_replace('/^[\r\n]+/', '', $str);
59 
        // find whitespace at the beginning of the first line
60 
        $indent_len = strspn($str, " \t");
61 
        $indent = substr($str, 0, $indent_len);
62 
        $data = '';
63 
        // remove the same amount of whitespace from following lines
64 
        foreach (explode("\n", $str) as $line) {
65 
            if (substr($line, 0, $indent_len) == $indent) {
66 
                $data .= substr($line, $indent_len) . "\n";
67 
            } else {
68 
                $data .= $line . "\n";
69 
            }
70 
        }
71 
        return $data;
72 
    }
73 
 
74 
    /**
75 
     * post-process data
76 
     *
77 
     * @param string $data
78 
     * @param string $element element name
79 
     */
80 
    function postProcess($data, $element)
81 
    {
82 
        if ($element == 'notes') {
83 
            return trim($this->_unIndent($data));
84 
        }
85 
        return trim($data);
86 
    }
87 
 
88 
    /**
89 
     * @param string
90 
     * @param string file name of the package.xml
91 
     * @param string|false name of the archive this package.xml came from, if any
92 
     * @param string class name to instantiate and return.  This must be PEAR_PackageFile_v2 or
93 
     *               a subclass
94 
     * @return PEAR_PackageFile_v2
95 
     */
96 
    function &parse($data, $file, $archive = false, $class = 'PEAR_PackageFile_v2')
97 
    {
98 
        if (PEAR::isError($err = parent::parse($data, $file))) {
99 
            return $err;
100 
        }
101 
 
102 
        $ret = new $class;
103 
        $ret->encoding = $this->encoding;
104 
        $ret->setConfig($this->_config);
105 
        if (isset($this->_logger)) {
106 
            $ret->setLogger($this->_logger);
107 
        }
108 
 
109 
        $ret->fromArray($this->_unserializedData);
110 
        $ret->setPackagefile($file, $archive);
111 
        return $ret;
112 
    }
113 
}