| | |
| | | header('Content-Disposition: attachment; filename="contacts.vcf"'); |
| | | |
| | | while ($result && ($row = $result->next())) { |
| | | prepare_for_export($row, $CONTACTS); |
| | | if ($CONTACTS) { |
| | | prepare_for_export($row, $CONTACTS); |
| | | } |
| | | |
| | | // fix folding and end-of-line chars |
| | | $row['vcard'] = preg_replace('/\r|\n\s+/', '', $row['vcard']); |
| | |
| | | */ |
| | | function prepare_for_export(&$record, $source = null) |
| | | { |
| | | $groups = $source && $source->groups && $source->export_groups ? $source->get_record_groups($record['ID']) : null; |
| | | $groups = $source && $source->groups && $source->export_groups ? $source->get_record_groups($record['ID']) : null; |
| | | $fieldmap = $source ? $source->vcard_map : null; |
| | | |
| | | if (empty($record['vcard'])) { |
| | | $vcard = new rcube_vcard(); |
| | | if ($source) { |
| | | $vcard->extend_fieldmap($source->vcard_map); |
| | | } |
| | | $vcard->load($record['vcard']); |
| | | $vcard = new rcube_vcard($record['vcard'], RCUBE_CHARSET, false, $fieldmap); |
| | | $vcard->reset(); |
| | | |
| | | foreach ($record as $key => $values) { |
| | | list($field, $section) = explode(':', $key); |
| | | foreach ((array)$values as $value) { |
| | | if (is_array($value) || @strlen($value)) { |
| | | // avoid unwanted casting of DateTime objects to an array |
| | | // (same as in rcube_contacts::convert_save_data()) |
| | | if (is_object($values) && is_a($values, 'DateTime')) { |
| | | $values = array($values); |
| | | } |
| | | |
| | | foreach ((array) $values as $value) { |
| | | if (is_array($value) || is_a($value, 'DateTime') || @strlen($value)) { |
| | | $vcard->set($field, $value, strtoupper($section)); |
| | | } |
| | | } |
| | |
| | | $vcard->set('groups', join(',', $groups), null); |
| | | } |
| | | |
| | | $record['vcard'] = $vcard->export(true); |
| | | $record['vcard'] = $vcard->export(); |
| | | } |
| | | // patch categories to alread existing vcard block |
| | | else if ($record['vcard'] && !empty($groups) && !strpos($record['vcard'], 'CATEGORIES:')) { |
| | | $vgroups = 'CATEGORIES:' . rcube_vcard::vcard_quote(join(',', $groups)); |
| | | $record['vcard'] = str_replace('END:VCARD', $vgroups . rcube_vcard::$eol . 'END:VCARD', $record['vcard']); |
| | | else if ($record['vcard']) { |
| | | $vcard = new rcube_vcard($record['vcard'], RCUBE_CHARSET, false, $fieldmap); |
| | | |
| | | // unset CATEGORIES entry, it might be not up-to-date (#1490277) |
| | | $vcard->set('groups', null); |
| | | $record['vcard'] = $vcard->export(); |
| | | |
| | | if (!empty($groups)) { |
| | | $vgroups = 'CATEGORIES:' . rcube_vcard::vcard_quote($groups, ','); |
| | | $record['vcard'] = str_replace('END:VCARD', $vgroups . rcube_vcard::$eol . 'END:VCARD', $record['vcard']); |
| | | } |
| | | } |
| | | } |