Merge pull request #230 from bytesatwork-xx/master

Aleksander Machniak

2014-10-18 ced34cb15e095836767971aa4d27b141fb1d7ec9

 program/lib/Roundcube/rcube_vcard.php

@@ -110,7 +110,7 @@
    public function load($vcard, $charset = RCUBE_CHARSET, $detect = false)
    {
        self::$values_decoded = false;
        $this->raw = self::vcard_decode($vcard);
        $this->raw = self::vcard_decode(self::cleanup($vcard));

        // resolve charset parameters
        if ($charset == null) {
@@ -496,7 +496,7 @@

            if (preg_match('/^END:VCARD$/i', $line)) {
                // parse vcard
                $obj = new rcube_vcard(self::cleanup($vcard_block), $charset, true, self::$fieldmap);
                $obj = new rcube_vcard($vcard_block, $charset, true, self::$fieldmap);
                // FN and N is required by vCard format (RFC 2426)
                // on import we can be less restrictive, let's addressbook decide
                if (!empty($obj->displayname) || !empty($obj->surname) || !empty($obj->firstname) || !empty($obj->email)) {
@@ -532,9 +532,9 @@
        // Cleanup
        $vcard = preg_replace(array(
                // convert special types (like Skype) to normal type='skype' classes with this simple regex ;)
                '/item(\d+)\.(TEL|EMAIL|URL)([^:]*?):(.*?)item\1.X-ABLabel:(?:_\$!<)?([\w-() ]*)(?:>!\$_)?./s',
                '/^item\d*\.X-AB.*$/m',  // remove cruft like item1.X-AB*
                '/^item\d*\./m',         // remove item1.ADR instead of ADR
                '/item(\d+)\.(TEL|EMAIL|URL)([^:]*?):(.*?)item\1.X-ABLabel:(?:_\$!<)?([\w-() ]*)(?:>!\$_)?./si',
                '/^item\d*\.X-AB.*$/mi',  // remove cruft like item1.X-AB*
                '/^item\d*\./mi',         // remove item1.ADR instead of ADR
                '/\n+/',                 // remove empty lines
                '/^(N:[^;\R]*)$/m',      // if N doesn't have any semicolons, add some
            ),
@@ -594,29 +594,34 @@
    private static function vcard_decode($vcard)
    {
        // Perform RFC2425 line unfolding and split lines
        $vcard = preg_replace(array("/\r/", "/\n\s+/"), '', $vcard);
        $lines = explode("\n", $vcard);
        $data  = array();
        $vcard  = preg_replace(array("/\r/", "/\n\s+/"), '', $vcard);
        $lines  = explode("\n", $vcard);
        $result = array();

        for ($i=0; $i < count($lines); $i++) {
            if (!preg_match('/^([^:]+):(.+)$/', $lines[$i], $line))
            if (!($pos = strpos($lines[$i], ':'))) {
                continue;
            }

            if (preg_match('/^(BEGIN|END)$/i', $line[1]))
            $prefix = substr($lines[$i], 0, $pos);
            $data   = substr($lines[$i], $pos+1);

            if (preg_match('/^(BEGIN|END)$/i', $prefix)) {
                continue;
            }

            // convert 2.1-style "EMAIL;internet;home:" to 3.0-style "EMAIL;TYPE=internet;TYPE=home:"
            if ($data['VERSION'][0] == "2.1"
                && preg_match('/^([^;]+);([^:]+)/', $line[1], $regs2)
            if ($result['VERSION'][0] == "2.1"
                && preg_match('/^([^;]+);([^:]+)/', $prefix, $regs2)
                && !preg_match('/^TYPE=/i', $regs2[2])
            ) {
                $line[1] = $regs2[1];
                $prefix = $regs2[1];
                foreach (explode(';', $regs2[2]) as $prop) {
                    $line[1] .= ';' . (strpos($prop, '=') ? $prop : 'TYPE='.$prop);
                    $prefix .= ';' . (strpos($prop, '=') ? $prop : 'TYPE='.$prop);
                }
            }

            if (preg_match_all('/([^\\;]+);?/', $line[1], $regs2)) {
            if (preg_match_all('/([^\\;]+);?/', $prefix, $regs2)) {
                $entry = array();
                $field = strtoupper($regs2[1][0]);
                $enc   = null;
@@ -629,10 +634,10 @@
                            // add next line(s) to value string if QP line end detected
                            if ($value == 'QUOTED-PRINTABLE') {
                                while (preg_match('/=$/', $lines[$i])) {
                                    $line[2] .= "\n" . $lines[++$i];
                                    $data .= "\n" . $lines[++$i];
                                }
                            }
                            $enc = $value;
                            $enc = $value == 'BASE64' ? 'B' : $value;
                        }
                        else {
                            $lc_key = strtolower($key);
@@ -652,20 +657,30 @@
                        // should we use vCard 3.0 instead?
                        // $entry['base64'] = true;
                    }
                    $line[2] = self::decode_value($line[2], $enc ? $enc : 'base64');

                    $data = self::decode_value($data, $enc ? $enc : 'base64');
                }
                else if ($field == 'PHOTO') {
                    // vCard 4.0 data URI, "PHOTO:data:image/jpeg;base64,..."
                    if (preg_match('/^data:[a-z\/_-]+;base64,/i', $data, $m)) {
                        $entry['encoding'] = $enc = 'B';
                        $data = substr($data, strlen($m[0]));
                        $data = self::decode_value($data, 'base64');
                    }
                }

                if ($enc != 'B' && empty($entry['base64'])) {
                    $line[2] = self::vcard_unquote($line[2]);
                    $data = self::vcard_unquote($data);
                }

                $entry = array_merge($entry, (array) $line[2]);
                $data[$field][] = $entry;
                $entry = array_merge($entry, (array) $data);
                $result[$field][] = $entry;
            }
        }

        unset($data['VERSION']);
        return $data;
        unset($result['VERSION']);

        return $result;
    }

    /**