* @author Ralf Becker * @package addressbook * @license http://opensource.org/licenses/gpl-license.php GPL - GNU General Public License * @version $Id$ */ require_once EGW_SERVER_ROOT.'/addressbook/inc/class.bocontacts.inc.php'; require_once EGW_SERVER_ROOT.'/phpgwapi/inc/horde/Horde/iCalendar.php'; class vcaladdressbook extends bocontacts { /** * import a vard into addressbook * * @param string $_vcard the vcard * @param int/string $_abID=null the internal addressbook id or !$_abID for a new enty * @return int contact id */ function addVCard($_vcard, $_abID) { if(!$contact = $this->vcardtoegw($_vcard)) { return false; } if($_abID) { // update entry $contact['id'] = $_abID; } return $this->save($contact); } /** * return a vcard * * @param int/string $_id the id of the contact * @param int $_vcardProfile profile id for mapping from vcard values to egw addressbook * @return string containing the vcard */ function getVCard($_id) { require_once(EGW_SERVER_ROOT.'/phpgwapi/inc/horde/Horde/iCalendar/vcard.php'); $vCard =& new Horde_iCalendar_vcard; if(!is_array($this->supportedFields)) { $this->setSupportedFields(); } $sysCharSet = $GLOBALS['egw']->translation->charset(); if(!($entry = $this->read($_id))) { return false; } $this->fixup_contact($entry); foreach($this->supportedFields as $vcardField => $databaseFields) { $values = array(); $options = array(); $hasdata = 0; foreach($databaseFields as $databaseField) { $value = ""; if (!empty($databaseField)) { $value = trim($entry[$databaseField]); } switch($databaseField) { case 'private': $value = $value ? 'PRIVATE' : 'PUBLIC'; $hasdata++; break; case 'bday': if (!empty($value)) { $value = str_replace('-','',$value).'T000000Z'; $hasdata++; } break; case 'jpegphoto': if(!empty($value)) { error_log("PHOTO='".$value."'"); $hasdata++; } break; case 'cat_id': if (!empty($value)) { $value = implode(",", $this->get_categories($value)); } // fall-through to the normal processing of string values default: if(!empty($value)) { $value = $GLOBALS['egw']->translation->convert(trim($value), $sysCharSet, 'utf-8'); $options['CHARSET'] = 'UTF-8'; if(preg_match('/([\000-\012\015\016\020-\037\075])/',$value)) { $options['ENCODING'] = 'QUOTED-PRINTABLE'; } $hasdata++; } break; } if (empty($value)) { $value = ""; } $values[] = $value; } if ($hasdata <= 0 && !in_array($vcardField,array('FN','ORG','N'))) { // don't add the entry if there is no data for this field, // except it's a mendatory field continue; } $vCard->setAttribute($vcardField, implode(';', $values)); $vCard->setParameter($vcardField, $options); } $result = $vCard->exportvCalendar(); return $result; } function search($_vcard) { if(!($contact = $this->vcardtoegw($_vcard))) { return false; } unset($contact['private']); unset($contact['note']); unset($contact['n_fn']); unset($contact['email']); unset($contact['email_home']); unset($contact['url']); unset($contact['url_home']); // some clients cut the values, because they do not support the same length of data like eGW // at least the first 10 characters must match $maybeCuttedFields = array('org_unit', 'org_name','title'); foreach($maybeCuttedFields as $fieldName) { if(!empty($contact[$fieldName]) && strlen($contact[$fieldName]) > 10) { $contact[$fieldName] .= '*'; } } //error_log(print_r($contact, true)); #if($foundContacts = parent::search($contact, true, '', '', '%')) { if($foundContacts = parent::search($contact)) { return $foundContacts[0]['id']; } return false; } function setSupportedFields($_productManufacturer='file', $_productName='') { /** * ToDo Lars: * + changes / renamed fields in 1.3+: * - access --> private (already done by Ralf) * - tel_msg --> tel_assistent * - tel_modem --> tel_fax_home * - tel_isdn --> tel_cell_private * - tel_voice/ophone --> tel_other * - address2 --> adr_one_street2 * - address3 --> adr_two_street2 * - freebusy_url --> freebusy_uri (i instead l !) * - fn --> n_fn * - last_mod --> modified * + new fields in 1.3+: * - n_fileas * - role * - assistent * - room * - calendar_uri * - url_home * - created * - creator (preset with owner) * - modifier * - jpegphoto */ $defaultFields[0] = array( // multisync 'ADR' => array('','','adr_one_street','adr_one_locality','adr_one_region', 'adr_one_postalcode','adr_one_countryname'), 'CATEGORIES' => array('cat_id'), 'CLASS' => array('private'), 'EMAIL' => array('email'), 'N' => array('n_family','n_given','','',''), 'FN' => array('n_fn'), 'NOTE' => array('note'), 'ORG' => array('org_name',''), 'TEL;CELL' => array('tel_cell'), 'TEL;FAX' => array('tel_fax'), 'TEL;HOME' => array('tel_home'), 'TEL;WORK' => array('tel_work'), 'TITLE' => array('title'), ); $defaultFields[1] = array( // all entries, nexthaus corporation, ... 'ADR;WORK' => array('','','adr_one_street','adr_one_locality','adr_one_region', 'adr_one_postalcode','adr_one_countryname'), 'ADR;HOME' => array('','','adr_two_street','adr_two_locality','adr_two_region', 'adr_two_postalcode','adr_two_countryname'), 'BDAY' => array('bday'), 'CATEGORIES' => array('cat_id'), 'EMAIL;INTERNET;WORK' => array('email'), 'EMAIL;INTERNET;HOME' => array('email_home'), 'N' => array('n_family','n_given','n_middle','n_prefix','n_suffix'), 'FN' => array('n_fn'), 'NOTE' => array('note'), 'ORG' => array('org_name','org_unit'), 'TEL;CELL;WORK' => array('tel_cell'), 'TEL;CELL;HOME' => array('tel_cell_private'), 'TEL;FAX;WORK' => array('tel_fax'), 'TEL;FAX;HOME' => array('tel_fax_home'), 'TEL;HOME' => array('tel_home'), 'TEL;PAGER;WORK' => array('tel_pager'), 'TEL;WORK' => array('tel_work'), 'TITLE' => array('title'), 'URL;WORK' => array('url'), 'ROLE' => array('role'), 'URL;HOME' => array('url_home'), 'FBURL' => array('freebusy_uri'), ); $defaultFields[2] = array( // sony ericson 'ADR;HOME' => array('','','adr_one_street','adr_one_locality','adr_one_region', 'adr_one_postalcode','adr_one_countryname'), 'BDAY' => array('bday'), 'CATEGORIES' => array('cat_id'), 'CLASS' => array('private'), 'EMAIL' => array('email'), 'N' => array('n_family','n_given','','',''), 'FN' => array('n_fn'), 'NOTE' => array('note'), 'ORG' => array('org_name',''), 'TEL;CELL;WORK' => array('tel_cell'), 'TEL;FAX;WORK' => array('tel_fax'), 'TEL;HOME' => array('tel_home'), 'TEL;WORK' => array('tel_work'), 'TITLE' => array('title'), 'URL;WORK' => array('url'), ); $defaultFields[3] = array( // siemens 'ADR;WORK' => array('','','adr_one_street','adr_one_locality','adr_one_region', 'adr_one_postalcode','adr_one_countryname'), 'ADR;HOME' => array('','','adr_two_street','adr_two_locality','adr_two_region', 'adr_two_postalcode','adr_two_countryname'), 'BDAY' => array('bday'), 'EMAIL;INTERNET;WORK' => array('email'), 'EMAIL;INTERNET;HOME' => array('email_home'), 'N' => array('n_family','n_given','','',''), 'FN' => array('n_fn'), 'NOTE' => array('note'), 'ORG' => array('org_name','org_unit'), 'TEL;CELL;WORK' => array('tel_cell'), 'TEL;FAX;WORK' => array('tel_fax'), 'TEL;HOME' => array('tel_home'), 'TEL;PAGER;WORK' => array('tel_pager'), 'TEL;WORK' => array('tel_work'), 'TITLE' => array('title'), 'URL;WORK' => array('url'), ); $defaultFields[4] = array( // nokia 6600 'ADR;WORK' => array('','','adr_one_street','adr_one_locality','adr_one_region', 'adr_one_postalcode','adr_one_countryname'), 'ADR;HOME' => array('','','adr_two_street','adr_two_locality','adr_two_region', 'adr_two_postalcode','adr_two_countryname'), 'BDAY' => array('bday'), 'EMAIL;INTERNET;WORK' => array('email'), 'EMAIL;INTERNET;HOME' => array('email_home'), 'N' => array('n_family','n_given','','',''), 'FN' => array('n_fn'), 'NOTE' => array('note'), 'ORG' => array('org_name',''), 'TEL;CELL;WORK' => array('tel_cell'), 'TEL;CELL;HOME' => array('tel_cell_private'), 'TEL;FAX;WORK' => array('tel_fax'), 'TEL;FAX;HOME' => array('tel_fax_home'), 'TEL;HOME' => array('tel_home'), 'TEL;PAGER;WORK' => array('tel_pager'), 'TEL;WORK' => array('tel_work'), 'TITLE' => array('title'), 'URL;WORK' => array('url'), 'URL;HOME' => array('url_home'), ); $defaultFields[5] = array( // nokia e61 'ADR;WORK' => array('','','adr_one_street','adr_one_locality','adr_one_region', 'adr_one_postalcode','adr_one_countryname'), 'ADR;HOME' => array('','','adr_two_street','adr_two_locality','adr_two_region', 'adr_two_postalcode','adr_two_countryname'), 'BDAY' => array('bday'), 'EMAIL;INTERNET;WORK' => array('email'), 'EMAIL;INTERNET;HOME' => array('email_home'), 'N' => array('n_family','n_given','','n_prefix','n_suffix'), 'FN' => array('n_fn'), 'NOTE' => array('note'), 'ORG' => array('org_name',''), 'TEL;CELL;WORK' => array('tel_cell'), 'TEL;CELL;HOME' => array('tel_cell_private'), 'TEL;FAX;WORK' => array('tel_fax'), 'TEL;FAX;HOME' => array('tel_fax_home'), 'TEL;HOME' => array('tel_home'), 'TEL;PAGER;WORK' => array('tel_pager'), 'TEL;WORK' => array('tel_work'), 'TITLE' => array('title'), 'URL;WORK' => array('url'), 'URL;HOME' => array('url_home'), ); $defaultFields[6] = array( // funambol: fmz-thunderbird-plugin 'ADR;WORK' => array('','','adr_one_street','adr_one_locality','adr_one_region', 'adr_one_postalcode','adr_one_countryname'), 'ADR;HOME' => array('','','adr_two_street','adr_two_locality','adr_two_region', 'adr_two_postalcode','adr_two_countryname'), 'EMAIL' => array('email'), 'EMAIL;HOME' => array('email_home'), 'N' => array('n_family','n_given','','',''), 'FN' => array('n_fn'), 'NOTE' => array('note'), 'ORG' => array('org_name','org_unit'), 'TEL;CELL' => array('tel_cell'), 'TEL;HOME;FAX' => array('tel_fax'), 'TEL;HOME;VOICE' => array('tel_home'), 'TEL;PAGER' => array('tel_pager'), 'TEL;WORK;VOICE' => array('tel_work'), 'TITLE' => array('title'), 'URL;WORK' => array('url'), 'URL' => array('url_home'), ); $defaultFields[7] = array( 'N'=> array('n_family','n_given','n_middle','n_prefix','n_suffix'), 'TITLE' => array('title'), 'ROLE' => array('role'), 'ORG' => array('org_name','org_unit','room'), 'ADR;WORK' => array('','adr_one_street2','adr_one_street','adr_one_locality','adr_one_region', 'adr_one_postalcode','adr_one_countryname'), 'ADR;HOME' => array('','adr_two_street2','adr_two_street','adr_two_locality','adr_two_region', 'adr_two_postalcode','adr_two_countryname'), 'TEL;WORK;VOICE' => array('tel_work'), 'TEL;HOME;VOICE' => array('tel_home'), 'TEL;CELL;WORK' => array('tel_cell'), 'TEL;FAX;WORK' => array('tel_fax'), 'TEL;FAX;HOME' => array('tel_fax_home'), 'TEL;PAGER;WORK' => array('tel_pager'), 'TEL;CAR' => array('tel_car'), 'TEL;VOICE' => array('tel_other'), 'EMAIL;INTERNET;WORK' => array('email'), 'EMAIL;INTERNET;HOME' => array('email_home'), 'URL;WORK' => array('url'), 'BDAY' => array('bday'), 'CATEGORIES' => array('cat_id'), 'NOTE' => array('note'), 'X-EVOLUTION-ASSISTANT' => array('assistent'), // segmentation fault ? 'PHOTO;JPEG' => array('jpegphoto'), ); //error_log("Client: $_productManufacturer $_productName"); switch(strtolower($_productManufacturer)) { case 'funambol': switch (strtolower($_productName)) { case 'thunderbird': $this->supportedFields = $defaultFields[6]; break; default: error_log("Funambol product '$_productName', assuming same as thunderbird"); $this->supportedFields = $defaultFields[6]; break; } break; case 'nexthaus corporation': switch(strtolower($_productName)) { case 'syncje outlook edition': $this->supportedFields = $defaultFields[1]; break; default: error_log("Nethaus product '$_productName', assuming same as 'syncje outlook'"); $this->supportedFields = $defaultFields[1]; break; } break; case 'nokia': switch(strtolower($_productName)) { case 'e61': $this->supportedFields = $defaultFields[5]; break; case '6600': $this->supportedFields = $defaultFields[4]; break; default: error_log("Unknown Nokia phone '$_productName', assuming same as '6600'"); $this->supportedFields = $defaultFields[4]; break; } break; // multisync does not provide anymore information then the manufacturer // we suppose multisync with evolution case 'the multisync project': switch(strtolower($_productName)) { default: $this->supportedFields = $defaultFields[0]; break; } break; case 'siemens': switch(strtolower($_productName)) { case 'sx1': $this->supportedFields = $defaultFields[3]; break; default: error_log("Unknown Siemens phone '$_productName', assuming same as 'sx1'"); $this->supportedFields = $defaultFields[3]; break; } break; case 'sonyericsson': case 'sony ericsson': switch(strtolower($_productName)) { case 'd750i': $this->supportedFields = $defaultFields[2]; break; case 'p910i': default: error_log("unknown Sony Ericsson phone '$_productName', assuming same as 'd750i'"); $this->supportedFields = $defaultFields[2]; break; } break; case 'synthesis ag': switch(strtolower($_productName)) { case 'sysync client pocketpc pro': case 'sysync client pocketpc std': $this->supportedFields = $defaultFields[1]; #$this->supportedFields['PHOTO'] = array('jpegphoto'); break; default: error_log("Synthesis connector '$_productName', using default fields"); $this->supportedFields = $defaultFields[0]; break; } break; case 'patrick ohly': // SyncEvolution $this->supportedFields = $defaultFields[7]; break; case 'file': // used outside of SyncML, eg. by the calendar itself ==> all possible fields $this->supportedFields = $defaultFields[1]; break; // the fallback for SyncML default: error_log("Client not found: '$_productManufacturer' '$_productName'"); $this->supportedFields = $defaultFields[0]; break; } } function vcardtoegw($_vcard) { // the horde class does the charset conversion. DO NOT CONVERT HERE. if(!is_array($this->supportedFields)) { $this->setSupportedFields(); } require_once(EGW_SERVER_ROOT.'/phpgwapi/inc/horde/Horde/iCalendar.php'); $vCard = Horde_iCalendar::newComponent('vcard', $container); // Unfold any folded lines. $vCardUnfolded = preg_replace ('/(\r|\n)+ /', ' ', $_vcard); if(!$vCard->parsevCalendar($vCardUnfolded, 'VCARD')) { return False; } $vcardValues = $vCard->getAllAttributes(); #print "
$_vcard
"; #error_log(print_r($vcardValues, true)); foreach($vcardValues as $key => $vcardRow) { $rowName = $vcardRow['name']; if(isset($vcardRow['params']['INTERNET'])) { $rowName .= ";INTERNET"; } $type = strtoupper($vcardRow['params']['TYPE']); // vCard3 sets TYPE={work|home|cell|fax}! if(isset($vcardRow['params']['CELL']) || $type == 'CELL') { $rowName .= ';CELL'; } if(isset($vcardRow['params']['FAX']) || $type == 'FAX') { $rowName .= ';FAX'; } if(isset($vcardRow['params']['PAGER']) || $type == 'PAGER') { $rowName .= ';PAGER'; } if(isset($vcardRow['params']['WORK']) || $type == 'WORK') { $rowName .= ';WORK'; } if(isset($vcardRow['params']['HOME']) || $type == 'HOME') { $rowName .= ';HOME'; } if(isset($vcardRow['params']['VOICE']) || $type == 'VOICE') { $rowName .= ';VOICE'; } if(isset($vcardRow['params']['CAR']) || $type == 'CAR') { $rowName .= ';CAR'; } //error_log("key: $key --> $rowName: name=$vcardRow[name], params=".print_r($vcardRow['params'],true)); $rowNames[$rowName] = $key; } #error_log(print_r($rowNames, true)); // now we have all rowNames the vcard provides // we just need to map to the right addressbook fieldnames // we need also to take care about ADR for example. we do not // support this. We support only ADR;WORK or ADR;HOME foreach($rowNames as $rowName => $vcardKey) { switch($rowName) { case 'ADR': case 'TEL': case 'URL': case 'TEL;FAX': case 'TEL;CELL': case 'TEL;PAGER': if(!isset($rowNames[$rowName. ';WORK'])) { $finalRowNames[$rowName. ';WORK'] = $vcardKey; } break; case 'EMAIL': case 'EMAIL;WORK': case 'EMAIL;INTERNET': if(!isset($rowNames['EMAIL;INTERNET;WORK'])) { $finalRowNames['EMAIL;INTERNET;WORK'] = $vcardKey; } break; case 'EMAIL;HOME': if(!isset($rowNames['EMAIL;INTERNET;HOME'])) { $finalRowNames['EMAIL;INTERNET;HOME'] = $vcardKey; } break; case 'VERSION': break; default: $finalRowNames[$rowName] = $vcardKey; break; } } #error_log(print_r($finalRowNames, true)); $contact = array(); foreach($finalRowNames as $key => $vcardKey) { if(isset($this->supportedFields[$key])) { $fieldNames = $this->supportedFields[$key]; foreach($fieldNames as $fieldKey => $fieldName) { if(!empty($fieldName)) { $value = trim($vcardValues[$vcardKey]['values'][$fieldKey]); //error_log("$fieldName=$vcardKey[$fieldKey]='$value'"); switch($fieldName) { case 'bday': if(!empty($value)) { $contact[$fieldName] = date('Y-m-d', $value); } break; case 'private': $contact[$fieldName] = (int) ($value == 'PRIVATE'); break; case 'cat_id': $contact[$fieldName] = implode(',',$this->find_or_add_categories(explode(',',$value))); break; case 'note': // note may contain ','s but maybe this needs to be fixed in vcard parser... //$contact[$fieldName] = trim($vcardValues[$vcardKey]['value']); //break; default: $contact[$fieldName] = $value; break; } } } } } $this->fixup_contact($contact); return $contact; } /** * Exports some contacts: download or write to a file * * @param array $ids contact-ids * @param string $file filename or null for download */ function export($ids,$file=null) { if (!$file) { $browser =& CreateObject('phpgwapi.browser'); $browser->content_header('addressbook.vcf','text/x-vcard'); } if (!($fp = fopen($file ? $file : 'php://output','w'))) { return false; } foreach($ids as $id) { fwrite($fp,$this->getVCard($id)); } fclose($fp); if (!$file) { $GLOBALS['egw']->common->egw_exit(); } return true; } }