egroupware_official/addressbook/inc/functions.inc.php
2001-07-03 07:17:13 +00:00

1091 lines
33 KiB
PHP
Executable File

<?php
/**************************************************************************\
* phpGroupWare - addressbook *
* http://www.phpgroupware.org *
* Written by Joseph Engo <jengo@mail.com> *
* -------------------------------------------- *
* This program is free software; you can redistribute it and/or modify it *
* under the terms of the GNU General Public License as published by the *
* Free Software Foundation; either version 2 of the License, or (at your *
* option) any later version. *
\**************************************************************************/
/* $Id$ */
// I don't think this is needed anymore
// Perform acl check, set $rights
if(!isset($owner)) { $owner = 0; }
$grants = $phpgw->acl->get_grants('addressbook');
if(!isset($owner) || !$owner)
{
$owner = $phpgw_info['user']['account_id'];
$rights = PHPGW_ACL_READ + PHPGW_ACL_ADD + PHPGW_ACL_EDIT + PHPGW_ACL_DELETE + 16;
}
else
{
if($grants[$owner])
{
$rights = $grants[$owner];
if (!($rights & PHPGW_ACL_READ))
{
$owner = $phpgw_info['user']['account_id'];
$rights = PHPGW_ACL_READ + PHPGW_ACL_ADD + PHPGW_ACL_EDIT + PHPGW_ACL_DELETE + 16;
}
}
}
/* Generic formatted list function */
function formatted_list($name,$list,$id='',$default=False,$java=False)
{
if ($java)
{
$jselect = ' onChange="this.form.submit();"';
}
$select = "\n" .'<select name="' . $name . '"' . $jselect . ">\n";
if($default)
{
$select .= '<option value="">' . lang('Please Select') . '</option>'."\n";
}
while (list($key,$val) = each($list))
{
$select .= '<option value="' . $key . '"';
if ($key == $id && $id != '')
{
$select .= ' selected';
}
$select .= '>' . $val . '</option>'."\n";
}
$select .= '</select>'."\n";
$select .= '<noscript><input type="submit" name="' . $name . '_select" value="True"></noscript>' . "\n";
return $select;
}
function read_custom_fields($start='',$limit='',$query='',$sort='ASC')
{
global $phpgw,$phpgw_info;
$phpgw->preferences->read_repository($phpgw_info['user']['account_id']);
$i=0;$j=0;
while (list($col,$descr) = @each($phpgw_info["user"]["preferences"]["addressbook"]))
{
if ( substr($col,0,6) == 'extra_' )
{
$fields[$j]['name'] = ereg_replace('extra_','',$col);
$fields[$j]['name'] = ereg_replace(' ','_',$fields[$j]['name']);
$fields[$j]['id'] = $i;
if ($query && ($fields[$j]['name'] != $query))
{
unset($fields[$j]['name']);
unset($fields[$j]['id']);
}
else
{
//echo "<br>".$j.": '".$fields[$j]['name']."'";
$j++;
}
}
$i++;
}
return $fields;
}
function save_custom_field($old='',$new='')
{
global $phpgw,$phpgw_info;
$phpgw->preferences->read_repository($phpgw_info['user']['account_id']);
if ($old)
{
$phpgw->preferences->delete("addressbook","extra_".$old);
}
if($new)
{
$phpgw->preferences->add("addressbook","extra_".$new);
}
$phpgw->preferences->save_repository(1);
}
/* Return a select form element with the categories option dialog in it */
function cat_option($cat_id='',$notall=False,$java=True,$multiple=False)
{
global $phpgw_info;
if ($java)
{
$jselect = ' onChange="this.form.submit();"';
}
// Setup all and none first
$cats_link = "\n" .'<select name="cat_id'.($multiple?'[]':'').'"' .$jselect . ($multiple ? 'multiple size="3"' : '') . ">\n";
if (!$notall)
{
$cats_link .= '<option value=""';
if ($cat_id=="all")
{
$cats_link .= ' selected';
}
$cats_link .= '>'.lang("all").'</option>'."\n";
}
/* Get global and app-specific category listings */
$cats = CreateObject('phpgwapi.categories');
$cats_link .= $cats->formated_list('select','all',$cat_id,True);
$cats_link .= '</select>'."\n";
return $cats_link;
}
/* SET THE FONT TO DEFAULT IF IT DOESNT EXISTS */
function set_font()
{
if($phpgw_info['user']['preferences']['notes']['notes_font'] == '')
{
$font = "Arial";
return $font;
}
else
{
$font = $phpgw_info['user']['preferences']['notes']['notes_font'];
return $font;
}
}
/* SET FONT SIZE */
function set_font_size()
{
if($phpgw_info['user']['preferences']['notes']['notes_font_size'] == '')
{
$font_size = "3";
return $font_size;
}
else
{
$font_size = $phpgw_info['user']['preferences']['notes']['notes_font_size'];
return $font_size;
}
}
// this cleans up the fieldnames for display
function display_name($column)
{
$abc = array(
'fn' => 'full name',
'sound' => 'Sound',
'org_name' => 'company name',
'org_unit' => 'department',
'title' => 'title',
'n_prefix' => 'prefix',
'n_given' => 'first name',
'n_middle' => 'middle name',
'n_family' => 'last name',
'n_suffix' => 'suffix',
'label' => 'label',
'adr_one_street' => 'business street',
'adr_one_locality' => 'business city',
'adr_one_region' => 'business state',
'adr_one_postalcode' => 'business zip code',
'adr_one_countryname' => 'business country',
'adr_one_type' => 'business address type',
'adr_two_street' => 'home street',
'adr_two_locality' => 'home city',
'adr_two_region' => 'home state',
'adr_two_postalcode' => 'home zip code',
'adr_two_countryname' => 'home country',
'adr_two_type' => 'home address type',
'tz' => 'time zone',
'geo' => 'geo',
'tel_work' => 'business phone',
'tel_home' => 'home phone',
'tel_voice' => 'voice phone',
'tel_msg' => 'message phone',
'tel_fax' => 'fax',
'tel_pager' => 'pager',
'tel_cell' => 'mobile phone',
'tel_bbs' => 'bbs phone',
'tel_modem' => 'modem phone',
'tel_isdn' => 'isdn phone',
'tel_car' => 'car phone',
'tel_video' => 'video phone',
'tel_prefer' => 'preferred phone',
'email' => 'business email',
'email_type' => 'business email type',
'email_home' => 'home email',
'email_home_type' => 'home email type',
'address2' => 'address line 2',
'address3' => 'address line 3',
'ophone' => 'Other Phone',
'bday' => 'birthday',
'url' => 'url',
'pubkey' => 'public key',
'note' => 'notes'
);
if ($abc[$column])
{
return lang($abc[$column]);
}
else
{
return;
}
}
function addressbook_strip_html($dirty = '')
{
global $phpgw;
if ($dirty == ""){$dirty = array();}
for($i=0;$i<count($dirty);$i++)
{
while (list($name,$value) = each($dirty[$i])) {
$cleaned[$i][$name] = $phpgw->strip_html($dirty[$i][$name]);
}
}
return $cleaned;
}
function addressbook_read_entries($start,$offset,$qcols,$query,$qfilter,$sort,$order,$userid='')
{
global $contacts,$rights;
$readrights = $rights & PHPGW_ACL_READ;
$entries = $contacts->read($start,$offset,$qcols,$query,$qfilter,$sort,$order,$readrights);
$cleaned = addressbook_strip_html($entries);
return $cleaned;
}
function addressbook_read_entry($id,$fields,$userid='')
{
global $contacts,$rights;
if ($rights & PHPGW_ACL_READ)
{
$entry = $contacts->read_single_entry($id,$fields);
$cleaned = addressbook_strip_html($entry);
return $cleaned;
}
else
{
$rtrn = array('No access' => 'No access');
return $rtrn;
}
}
function addressbook_read_last_entry($fields)
{
global $contacts,$rights;
if ($rights & PHPGW_ACL_READ)
{
$entry = $contacts->read_last_entry($fields);
$cleaned = addressbook_strip_html($entry);
return $cleaned;
}
else
{
$rtrn = array('No access' => 'No access');
return $rtrn;
}
}
function addressbook_add_entry($userid,$fields,$access='',$cat_id='',$tid='n')
{
global $contacts,$rights;
if ($rights & PHPGW_ACL_ADD)
{
$contacts->add($userid,$fields,$access,$cat_id,$tid);
}
return;
}
function addressbook_get_lastid()
{
global $contacts;
$entry = $contacts->read_last_entry();
$ab_id = $entry[0]['id'];
return $ab_id;
}
function addressbook_update_entry($id,$userid,$fields,$access,$cat_id)
{
global $contacts,$rights;
if ($rights & PHPGW_ACL_EDIT)
{
$contacts->update($id,$userid,$fields,$access,$cat_id);
}
return;
}
// Folowing used for add/edit
function addressbook_form($format,$action,$title='',$fields='',$customfields='',$cat_id='')
{
global $phpgw,$phpgw_info,$referer;
$t = CreateObject('phpgwapi.Template',PHPGW_APP_TPL);
$t->set_file(array('form' => 'form.tpl'));
//$t->set_block('form','add','add');
//$t->set_block('form','edit','edit');
if ( ($phpgw_info['server']['countrylist'] == 'user_choice' &&
$phpgw_info['user']['preferences']['common']['countrylist'] == 'use_select') ||
($phpgw_info['server']['countrylist'] == 'force_select'))
{
$countrylist = True;
}
$email = $fields['email'];
$emailtype = $fields['email_type'];
$hemail = $fields['email_home'];
$hemailtype = $fields['email_home_type'];
$firstname = $fields['n_given'];
$middle = $fields['n_middle'];
$prefix = $fields['n_prefix'];
$suffix = $fields['n_suffix'];
$lastname = $fields['n_family'];
$title = $fields['title'];
$wphone = $fields['tel_work'];
$hphone = $fields['tel_home'];
$fax = $fields['tel_fax'];
$pager = $fields['tel_pager'];
$mphone = $fields['tel_cell'];
$ophone = $fields['ophone'];
$msgphone = $fields['tel_msg'];
$isdnphone = $fields['tel_isdn'];
$carphone = $fields['tel_car'];
$vidphone = $fields['tel_video'];
$preferred = $fields['tel_prefer'];
$bstreet = $fields['adr_one_street'];
$address2 = $fields['address2'];
$address3 = $fields['address3'];
$bcity = $fields['adr_one_locality'];
$bstate = $fields['adr_one_region'];
$bzip = $fields['adr_one_postalcode'];
$bcountry = $fields['adr_one_countryname'];
$one_dom = $fields['one_dom'];
$one_intl = $fields['one_intl'];
$one_parcel = $fields['one_parcel'];
$one_postal = $fields['one_postal'];
$hstreet = $fields['adr_two_street'];
$hcity = $fields['adr_two_locality'];
$hstate = $fields['adr_two_region'];
$hzip = $fields['adr_two_postalcode'];
$hcountry = $fields['adr_two_countryname'];
$btype = $fields['adr_two_type'];
$two_dom = $fields['two_dom'];
$two_intl = $fields['two_intl'];
$two_parcel = $fields['two_parcel'];
$two_postal = $fields['two_postal'];
$timezone = $fields['tz'];
$bday = $fields['bday'];
$notes = stripslashes($fields['note']);
$label = stripslashes($fields['label']);
$company = $fields['org_name'];
$department = $fields['org_unit'];
$url = $fields['url'];
$pubkey = $fields['pubkey'];
$access = $fields['access'];
if(!$cat_id) {
$cat_id = $fields['cat_id'];
}
/* allow multiple categories on sql */
$cats_link = cat_option(
$cat_id,
True,
False,
!$phpgw_info['server']['contact_repository'] || $phpgw_info['server']['contact_repository'] == 'sql'
);
if ($access == 'private')
{
$access_check = ' checked';
}
else
{
$access_check = '';
}
if ($customfields)
{
while(list($name,$value) = each($customfields))
{
$value = ereg_replace('_',' ',$value);
$custom .= '
<tr bgcolor="' . $phpgw_info['theme']['row_off'] . '">
<td>&nbsp;</td>
<td><font color="' . $phpgw_info['theme']['th_text'] . '" face="" size="-1">'.$value.':</font></td>
<td colspan="3"><INPUT size="30" name="' . $name . '" value="' . $fields[$name] . '"></td>
</tr>
';
}
}
$c = CreateObject("phpgwapi.contacts");
if ($format != "view")
{
// Preferred phone number radio buttons
$pref[0] = "<font size=\"-2\">";
$pref[1] = "(".lang('pref').")</font>";
while (list($name,$val) = each($c->tel_types))
{
$str[$name] = "\n".' <input type="radio" name="tel_prefer" value="'.$name.'"';
if ($name == $preferred)
{
$str[$name] .= ' checked';
}
$str[$name] .= '>';
$str[$name] = $pref[0].$str[$name].$pref[1];
$t->set_var("pref_".$name,$str[$name]);
}
if (strlen($bday) > 2)
{
list( $month, $day, $year ) = split( '/', $bday );
$temp_month[$month] = "SELECTED";
$bday_month = "<select name=bday_month>"
. "<option value=\"\" $temp_month[0]> </option>"
. "<option value=1 $temp_month[1]>" . lang('january') . "</option>"
. "<option value=2 $temp_month[2]>" . lang('february') . "</option>"
. "<option value=3 $temp_month[3]>" . lang('march') . "</option>"
. "<option value=4 $temp_month[4]>" . lang('april') . "</option>"
. "<option value=5 $temp_month[5]>" . lang('may') . "</option>"
. "<option value=6 $temp_month[6]>" . lang('june') . "</option>"
. "<option value=7 $temp_month[7]>" . lang('july') . "</option>"
. "<option value=8 $temp_month[8]>" . lang('august') . "</option>"
. "<option value=9 $temp_month[9]>" . lang('september') . "</option>"
. "<option value=10 $temp_month[10]>" . lang('october') . "</option>"
. "<option value=11 $temp_month[11]>" . lang('november') . "</option>"
. "<option value=12 $temp_month[12]>" . lang('december') . "</option>"
. "</select>";
$bday_day = '<input maxlength="2" name="bday_day" value="' . $day . '" size="2">';
$bday_year = '<input maxlength="4" name="bday_year" value="' . $year . '" size="4">';
}
else
{
$bday_month = "<select name=bday_month>"
. "<option value=\"\" SELECTED> </option>"
. "<option value=1>" . lang('january') . "</option>"
. "<option value=2>" . lang('february') . "</option>"
. "<option value=3>" . lang('march') . "</option>"
. "<option value=4>" . lang('april') . "</option>"
. "<option value=5>" . lang('may') . "</option>"
. "<option value=6>" . lang('june') . "</option>"
. "<option value=7>" . lang('july') . "</option>"
. "<option value=8>" . lang('august') . "</option>"
. "<option value=9>" . lang('september') . "</option>"
. "<option value=10>" . lang('october') . "</option>"
. "<option value=11>" . lang('november') . "</option>"
. "<option value=12>" . lang('december') . "</option>"
. "</select>";
$bday_day = '<input name="bday_day" size="2" maxlength="2">';
$bday_year = '<input name="bday_year" size="4" maxlength="4">';
}
$time_zone = "<select name=\"timezone\">\n";
for ($i = -23; $i<24; $i++)
{
$time_zone .= "<option value=\"$i\"";
if ($i == $timezone)
{
$time_zone .= " selected";
}
if ($i < 1)
{
$time_zone .= ">$i</option>\n";
}
else
{
$time_zone .= ">+$i</option>\n";
}
}
$time_zone .= "</select>\n";
$email_type = '<select name=email_type>';
while ($type = each($c->email_types))
{
$email_type .= '<option value="'.$type[0].'"';
if ($type[0] == $emailtype) { $email_type .= ' selected'; }
$email_type .= '>'.$type[1].'</option>';
}
$email_type .= "</select>";
reset($c->email_types);
$hemail_type = '<select name=hemail_type>';
while ($type = each($c->email_types))
{
$hemail_type .= '<option value="'.$type[0].'"';
if ($type[0] == $hemailtype) { $hemail_type .= ' selected'; }
$hemail_type .= '>'.$type[1].'</option>';
}
$hemail_type .= "</select>";
reset($c->adr_types);
while (list($type,$val) = each($c->adr_types))
{
$badrtype .= "\n".'<INPUT type="checkbox" name="one_'.$type.'"';
$ot = 'one_'.$type;
eval("
if (\$$ot=='on') {
\$badrtype \.= ' value=\"on\" checked';
}
");
$badrtype .= '>'.$val;
}
reset($c->adr_types);
while (list($type,$val) = each($c->adr_types))
{
$hadrtype .= "\n".'<INPUT type="checkbox" name="two_'.$type.'"';
$tt = 'two_'.$type;
eval("
if (\$$tt=='on') {
\$hadrtype \.= ' value=\"on\" checked';
}
");
$hadrtype .= '>'.$val;
}
$notes = '<TEXTAREA cols="60" name="notes" rows="4">' . $notes . '</TEXTAREA>';
$label = '<TEXTAREA cols="60" name="label" rows="6">' . $label . '</TEXTAREA>';
$pubkey = '<TEXTAREA cols="60" name="pubkey" rows="6">' . $pubkey . '</TEXTAREA>';
}
else
{
$notes = "<form><TEXTAREA cols=\"60\" name=\"notes\" rows=\"4\">"
. $notes . "</TEXTAREA></form>";
if ($bday == "//")
{
$bday = "";
}
}
if ($action)
{
echo '<FORM action="' . $phpgw->link('/addressbook/' . $action, 'referer='.urlencode($referer)).'" method="post">';
}
if (!ereg("^http://",$url))
{
$url = "http://". $url;
}
$birthday = $phpgw->common->dateformatorder($bday_year,$bday_month,$bday_day)
. '<font face="'.$theme["font"].'" size="-2">(e.g. 1969)</font>';
if ($format == 'edit')
{
$create .= '<tr bgcolor="' . $phpgw_info['theme']['th_bg'] . '"><td colspan="2"><font size="-1">' . lang("Created by") . ':</font></td>'
. '<td colspan="3"><font size="-1">'
. $phpgw->common->grab_owner_name($fields["owner"]);
}
else
{
$create .= '';
}
$t->set_var('lang_home',lang('Home'));
$t->set_var('lang_business',lang('Business'));
$t->set_var('lang_personal',lang('Personal'));
$t->set_var('lang_lastname',lang('Last Name'));
$t->set_var('lastname',$lastname);
$t->set_var('lang_firstname',lang('First Name'));
$t->set_var('firstname',$firstname);
$t->set_var('lang_middle',lang('Middle Name'));
$t->set_var('middle',$middle);
$t->set_var('lang_prefix',lang('Prefix'));
$t->set_var('prefix',$prefix);
$t->set_var('lang_suffix',lang('Suffix'));
$t->set_var('suffix',$suffix);
$t->set_var('lang_birthday',lang('Birthday'));
$t->set_var('birthday',$birthday);
$t->set_var('lang_company',lang('Company Name'));
$t->set_var('company',$company);
$t->set_var('lang_department',lang('Department'));
$t->set_var('department',$department);
$t->set_var('lang_title',lang('Title'));
$t->set_var('title',$title);
$t->set_var('lang_email',lang('Business Email'));
$t->set_var('email',$email);
$t->set_var('lang_email_type',lang('Business EMail Type'));
$t->set_var('email_type',$email_type);
$t->set_var('lang_url',lang('URL'));
$t->set_var('url',$url);
$t->set_var('lang_timezone',lang('time zone offset'));
$t->set_var('timezone',$time_zone);
$t->set_var('lang_fax',lang('Business Fax'));
$t->set_var('fax',$fax);
$t->set_var('lang_wphone',lang('Business Phone'));
$t->set_var('wphone',$wphone);
$t->set_var('lang_pager',lang('Pager'));
$t->set_var('pager',$pager);
$t->set_var('lang_mphone',lang('Cell Phone'));
$t->set_var('mphone',$mphone);
$t->set_var('lang_msgphone',lang('Message Phone'));
$t->set_var('msgphone',$msgphone);
$t->set_var('lang_isdnphone',lang('ISDN Phone'));
$t->set_var('isdnphone',$isdnphone);
$t->set_var('lang_carphone',lang('Car Phone'));
$t->set_var('carphone',$carphone);
$t->set_var('lang_vidphone',lang('Video Phone'));
$t->set_var('vidphone',$vidphone);
$t->set_var('lang_ophone',lang('Other Number'));
$t->set_var('ophone',$ophone);
$t->set_var('lang_bstreet',lang('Business Street'));
$t->set_var('bstreet',$bstreet);
$t->set_var('lang_address2',lang('Address Line 2'));
$t->set_var('address2',$address2);
$t->set_var('lang_address3',lang('Address Line 3'));
$t->set_var('address3',$address3);
$t->set_var('lang_bcity',lang('Business City'));
$t->set_var('bcity',$bcity);
$t->set_var('lang_bstate',lang('Business State'));
$t->set_var('bstate',$bstate);
$t->set_var('lang_bzip',lang('Business Zip Code'));
$t->set_var('bzip',$bzip);
$t->set_var('lang_bcountry',lang('Business Country'));
$t->set_var('bcountry',$bcountry);
if ($countrylist)
{
$t->set_var('bcountry',$phpgw->country->form_select($bcountry,'bcountry'));
}
else
{
$t->set_var('bcountry','<input name="bcountry" value="' . $bcountry . '">');
}
$t->set_var('lang_badrtype',lang('Address Type'));
$t->set_var('badrtype',$badrtype);
$t->set_var('lang_hphone',lang('Home Phone'));
$t->set_var('hphone',$hphone);
$t->set_var('lang_hemail',lang('Home Email'));
$t->set_var('hemail',$hemail);
$t->set_var('lang_hemail_type',lang('Home EMail Type'));
$t->set_var('hemail_type',$hemail_type);
$t->set_var('lang_hstreet',lang('Home Street'));
$t->set_var('hstreet',$hstreet);
$t->set_var('lang_hcity',lang('Home City'));
$t->set_var('hcity',$hcity);
$t->set_var('lang_hstate',lang('Home State'));
$t->set_var('hstate',$hstate);
$t->set_var('lang_hzip',lang('Home Zip Code'));
$t->set_var('hzip',$hzip);
$t->set_var('lang_hcountry',lang('Home Country'));
if ($countrylist)
{
$t->set_var('hcountry',$phpgw->country->form_select($hcountry,'hcountry'));
}
else
{
$t->set_var('hcountry','<input name="hcountry" value="' . $hcountry . '">');
}
$t->set_var('lang_hadrtype',lang('Address Type'));
$t->set_var('hadrtype',$hadrtype);
$t->set_var('create',$create);
$t->set_var('lang_notes',lang('notes'));
$t->set_var('notes',$notes);
$t->set_var('lang_label',lang('label'));
$t->set_var('label',$label);
$t->set_var('lang_pubkey',lang('Public Key'));
$t->set_var('pubkey',$pubkey);
$t->set_var('access_check',$access_check);
$t->set_var('lang_private',lang('Private'));
$t->set_var('lang_cats',lang('Category'));
$t->set_var('cats_link',$cats_link);
if ($customfields)
{
$t->set_var('lang_custom',lang('Custom Fields').':');
$t->set_var('custom',$custom);
}
else
{
$t->set_var('lang_custom','');
$t->set_var('custom','');
}
$t->set_var('th_bg',$phpgw_info['theme']['th_bg']);
$t->set_var('th_text',$phpgw_info['theme']['th_text']);
$t->set_var('row_on',$phpgw_info['theme']['row_on']);
$t->set_var('row_off',$phpgw_info['theme']['row_off']);
$t->set_var('row_text',$phpgw_info['theme']['row_text']);
$t->pfp('out','form');
} //end form function
function OLDparsevcard($filename,$access='')
{
global $phpgw;
global $phpgw_info;
$vcard = fopen($filename, 'r');
// Make sure we have a file to read.
if (!$vcard) {
fclose($vcard);
return FALSE;
}
// Keep running through this to support vcards
// with multiple entries.
while (!feof($vcard)) {
if(!empty($varray))
unset($varray);
// Make sure our file is a vcard.
// I should deal with empty line at the
// begining of the file. Those will fail here.
$vline = fgets($vcard,20);
$vline = strtolower($vline);
if(strcmp("begin:vcard", substr($vline, 0, strlen("begin:vcard")) ) != 0) {
fclose($vcard);
return FALSE;
}
// Write the vcard into an array.
// You can have multiple vcards in one file.
// I only deal with halve of that. :)
// It will only return values from the 1st vcard.
$varray[0] = "begin";
$varray[1] = "vcard";
$i=2;
while(!feof($vcard) && strcmp("end:vcard", strtolower(substr($vline, 0, strlen("end:vcard"))) ) !=0 ) {
$vline = fgets($vcard,4096);
// Check for folded lines and escaped colons '\:'
$la = explode(":", $vline);
if (count($la) > 1) {
$varray[$i] = strtolower($la[0]);
$i++;
for($j=1;$j<=count($la);$j++) {
$varray[$i] .= $la[$j];
}
$i++;
} else { // This is the continuation of a folded line.
$varray[$i-1] .= $la[0];
}
}
// Add this entry to the addressbook before moving on to the next one.
fillab($varray);
} // while(!feof($vcard))
fclose($vcard);
return TRUE;
}
function fillab($varray,$access='') {
global $phpgw;
global $phpgw_info;
$i=0;
// while($i < count($varray)) {
// echo '<br>'.$varray[$i].' %% '.$varray[$i+1];
// $i++;$i++;
// }
// exit;
// incremented by 2
while($i < count($varray)) {
$k = explode(";",$varray[$i]); // Key
$v = explode(";",$varray[$i+1]); // Values
for($h=0;$h<count($k);$h++) {
// Cleanup groupings
$k[$h] = ereg_replace("a\.",'',$k[$h]);
$k[$h] = ereg_replace("b\.",'',$k[$h]);
$k[$h] = ereg_replace("c\.",'',$k[$h]);
$k[$h] = ereg_replace("d\.",'',$k[$h]);
//echo '<br>kh="'.$k[$h].'",v0="'.$v[0].'",v1="'.$v[1].'",v2="'.$v[2].'",v3="'.$v[3].'",v4="'.$v[4].'",v5="'.$v[5].'",v6="'.$v[6].'",v7="'.$v[7].'"';
switch($k[$h]) {
case "fn":
$fn = $v[0];
break;
case "n":
$lastname = $v[0];
$firstname = $v[1];
break;
case "bday":
$bday = $v[0];
break;
case "url":
$url = $v[0];
// Fix the result of exploding on ':' above
if (substr($url,0,5) == 'http/') {
$url = ereg_replace('http//','http://',$url);
} elseif (substr($url,0,6) == 'https/') {
$url = ereg_replace('https//','https://',$url);
} elseif (substr($url,0,7) != 'http://') {
$url = 'http://' . $url;
}
break;
case "label":
$label = $v[0];
break;
case "adr": // This one is real ugly. Still! :(
if(!$street) {
$street = $v[2];
$address2 = $v[1] . " " . $v[0];
$city = $v[3];
$state = $v[4];
$zip = $v[5];
$country = $v[6];
if (strstr($k[$h+1],"intl")) { $adronetype .= "INTL;"; }
if (strstr($k[$h+1],"dom")) { $adronetype .= "DOM;"; }
} else {
$hstreet = $v[2];
$hcity = $v[3];
$hstate = $v[4];
$hzip = $v[5];
$hcountry = $v[6];
if (strstr($k[$h+1],"intl")) { $adrtwotype .= "INTL;"; }
if (strstr($k[$h+1],"dom")) { $adrtwotype .= "DOM;"; }
}
break;
case "tel":
switch ($k[$h+1]) {
case "work":
$wphone = $v[0];
break;
case "home":
$hphone = $v[0];
break;
case "cell":
$mphone = $v[0];
break;
case "pager":
$pager = $v[0];
break;
case "fax":
$fax = $v[0];
break;
case "msg":
$msgphone = $v[0];
break;
case "bbs":
$bbsphone = $v[0];
break;
case "modem":
$modem = $v[0];
break;
case "car":
$carphone = $v[0];
break;
case "isdn":
$isdn = $v[0];
break;
case "video":
$vidphone = $v[0];
break;
case "pref":
switch ($k[$h+2]) {
case "work":
$tel_prefer .= "work;";
$wphone = $v[0];
break;
case "home":
$tel_prefer .= "home;";
$hphone = $v[0];
break;
case "cell":
$tel_prefer .= "cell;";
$mphone = $v[0];
break;
case "pager":
$tel_prefer .= "pager;";
$pager = $v[0];
break;
case "fax":
$tel_prefer .= "fax;";
$fax = $v[0];
break;
case "msg":
$tel_prefer .= "msg;";
$msgphone = $v[0];
break;
case "bbs":
$tel_prefer .= "bbs;";
$bbsphone = $v[0];
break;
case "modem":
$tel_prefer .= "modem;";
$modem = $v[0];
break;
case "car":
$tel_prefer .= "car;";
$carphone = $v[0];
break;
case "isdn":
$tel_prefer .= "isdn;";
$isdn = $v[0];
break;
case "video":
$tel_prefer .= "video;";
$vidphone = $v[0];
break;
}
default:
$whphone = $v[0];
break;
}
break;
case "email":
if (empty($email)) { $email = $v[0]; }
else { $hemail = $v[0]; }
switch ($k[$h+1]) {
case "compuserve":
if (!$adronetype) { $emailtype="CompuServe"; }
else { $hemailtype="CompuServe"; }
break;
case "aol":
if (!$adronetype) { $emailtype="AOL"; }
else { $hemailtype="AOL"; }
break;
case "prodigy":
if (!$adronetype) { $emailtype="Prodigy"; }
else { $hemailtype="Prodigy"; }
break;
case "eworld":
if (!$adronetype) { $emailtype="eWorld"; }
else { $hemailtype="eWorld"; }
break;
case "applelink":
if (!$adronetype) { $emailtype="AppleLink"; }
else { $hemailtype="AppleLink"; }
break;
case "appletalk":
if (!$adronetype) { $emailtype="AppleTalk"; }
else { $hemailtype="AppleTalk"; }
break;
case "powershare":
if (!$adronetype) { $emailtype="PowerShare"; }
else { $hemailtype="PowerShare"; }
break;
case "ibmmail":
if (!$adronetype) { $emailtype="IBMMail"; }
else { $hemailtype="IBMMail"; }
break;
case "attmail":
if (!$adronetype) { $emailtype="ATTMail"; }
else { $hemailtype="ATTMail"; }
break;
case "mcimail":
if (!$adronetype) { $emailtype="MCIMail"; }
else { $hemailtype="MCIMail"; }
break;
case "x.400":
if (!$adronetype) { $emailtype="X.400"; }
else { $hemailtype="X.400"; }
break;
case "tlx":
if (!$adronetype) { $emailtype="TLX"; }
else { $hemailtype="TLX"; }
break;
default:
if (!$adronetype) { $emailtype="INTERNET"; }
else { $hemailtype="INTERNET"; }
break;
}
break;
case "title":
$title = $v[0];
break;
case "org":
$company = $v[0];
if(count($v) > 1) {
$notes .= $v[0] . "\n";
for($j=1;$j<count($v);$j++) {
$notes .= $v[$j] . "\n";
}
}
break;
default:
break;
} // switch
} // for
$i++;
} // All of the values that are getting filled are.
$fields["tel_prefer"] = substr($tel_prefer,0,-1);
$fields["owner"] = $phpgw_info["user"]["account_id"];
$fields["n_given"] = addslashes($firstname);
$fields["n_family"] = addslashes($lastname);
$fields["fn"] = addslashes($firstname . " " . $lastname);
$fields["title"] = addslashes($title);
$fields["email"] = addslashes($email);
$fields["email_type"] = $emailtype;
$fields["hemail"] = addslashes($hemail);
$fields["hemail_type"] = $hemailtype;
$fields["tel_work"] = addslashes($wphone);
$fields["tel_home"] = addslashes($hphone);
$fields["tel_fax"] = addslashes($fax);
$fields["tel_pager"] = addslashes($pager);
$fields["tel_cell"] = addslashes($mphone);
$fields["tel_msg"] = addslashes($ophone);
$fields["tel_car"] = addslashes($carphone);
$fields["tel_modem"] = addslashes($modem);
$fields["tel_bbs"] = addslashes($bbsphone);
$fields["tel_isdn"] = addslashes($isdn);
$fields["tel_video"] = addslashes($vidphone);
$fields["adr_one_street"] = addslashes($street);
$fields["address2"] = addslashes($address2);
$fields["adr_one_locality"] = addslashes($city);
$fields["adr_one_region"] = addslashes($state);
$fields["adr_one_postalcode"] = addslashes($zip);
$fields["adr_one_countryname"] = addslashes($country);
$fields["adr_one_type"] = substr($adronetype,0,-1);
$fields["adr_two_street"] = addslashes($hstreet);
$fields["adr_two_locality"] = addslashes($hcity);
$fields["adr_two_region"] = addslashes($hstate);
$fields["adr_two_postalcode"] = addslashes($hzip);
$fields["adr_two_countryname"] = addslashes($hcountry);
$fields["adr_two_type"] = substr($adrtwotype,0,-1);
$fields["bday"] = addslashes($bday);
$fields["url"] = $url;
$fields["note"] = addslashes($notes);
$fields["org_name"] = addslashes($company);
/*
echo '<br>tel_prefer: '.$fields["tel_prefer"];
echo '<br>owner: '.$fields["owner"];
echo '<br>firstname: '.$fields["n_given"];
echo '<br>lastname: '.$fields["n_family"];
echo '<br>full name: '.$fields["fn"];
echo '<br>title: '.$fields["title"];
echo '<br>email: '.$fields["email"];
echo '<br>work#: '.$fields["tel_work"];
echo '<br>home#: '.$fields["tel_home"];
echo '<br>fax#: '.$fields["tel_fax"];
echo '<br>pager#: '.$fields["tel_pager"];
echo '<br>cell#: '.$fields["tel_cell"];
echo '<br>msg#: '.$fields["tel_msg"];
echo '<br>car#: '.$fields["tel_car"];
echo '<br>modem# '.$fields["tel_modem"];
echo '<br>bbs#: '.$fields["tel_bbs"];
echo '<br>isdn#: '.$fields["tel_isdn"];
echo '<br>video#: '.$fields["tel_video"];
echo '<br>street: '.$fields["adr_one_street"];
echo '<br>addr2: '.$fields["address2"];
echo '<br>city: '.$fields["adr_one_locality"];
echo '<br>state: '.$fields["adr_one_region"];
echo '<br>zip: '.$fields["adr_one_postalcode"];
echo '<br>adronetype: '.$fields["adr_one_type"];
echo '<br>bday: '.$fields["bday"];
echo '<br>url: '.$fields["url"];
echo '<br>note: '.$fields["note"];
echo '<br>company: '.$fields["org_name"];
exit;
*/
$c = CreateObject("phpgwapi.contacts");
$c->add($phpgw_info["user"]["account_id"],$fields);
}
?>