mirror of
https://github.com/EGroupware/egroupware.git
synced 2024-11-25 09:23:28 +01:00
Added missing file
This commit is contained in:
parent
4fa39a29f5
commit
f32802380c
308
addressbook/parsecard.php
Normal file
308
addressbook/parsecard.php
Normal file
@ -0,0 +1,308 @@
|
||||
<?php
|
||||
|
||||
/**************************************************************************\
|
||||
* phpGroupWare - addressbook *
|
||||
* http://www.phpgroupware.org *
|
||||
* Written by Joseph Engo <jengo@phpgroupware.org> *
|
||||
* -------------------------------------------- *
|
||||
* 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$ */
|
||||
|
||||
$phpgw_info["flags"] = array("noheader" => True, "nonavbar" => True);
|
||||
$phpgw_info["flags"]["currentapp"] = "addressbook";
|
||||
include("../header.inc.php");
|
||||
|
||||
|
||||
// parse a vcard and fill the address book with it.
|
||||
function parsevcard($filename,$access)
|
||||
{
|
||||
global $phpgw;
|
||||
global $phpgw_info;
|
||||
|
||||
$vcard = fopen($filename, "r");
|
||||
if (!$vcard) // Make sure we have a file to read.
|
||||
{
|
||||
fclose($vcard);
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
|
||||
// Keep runnig 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 (ereg("\:",$vline))
|
||||
//{
|
||||
// // Oh, no.... Horrible disaster....
|
||||
// // Yell.
|
||||
// echo "<PRE><FLAILING ARMS></PRE><BR>";
|
||||
// echo "DANGER WILL ROBINSON!!!!!!!!!!<BR>";
|
||||
// echo "This just broke. Really.<BR>";
|
||||
// echo "<PRE></FLAILING ARMS></PRE><BR>";
|
||||
//}
|
||||
|
||||
|
||||
// DANGER Will Robinson!!!!!!!
|
||||
// I don't check for escaped colons here.
|
||||
// '\:' These would cause horrible disaster..
|
||||
// Fix this situation. Check if the last character
|
||||
// of the line is \ If it is, you've found one.
|
||||
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];
|
||||
}
|
||||
}
|
||||
|
||||
fillab($varray,$access); // Add this entry to the addressbook before
|
||||
// moving on to the next one.
|
||||
|
||||
} // while(!feof($vcard))
|
||||
|
||||
fclose($vcard);
|
||||
return TRUE;
|
||||
}
|
||||
|
||||
|
||||
function fillab($varray,$access)
|
||||
{
|
||||
global $phpgw;
|
||||
global $phpgw_info;
|
||||
|
||||
$i=0;
|
||||
while($i < count($varray)) // incremented by 2
|
||||
{
|
||||
$k = explode(";",$varray[$i]); // Key
|
||||
$v = explode(";",$varray[$i+1]); // Values
|
||||
for($h=0;$h<count($k);$h++)
|
||||
{
|
||||
switch($k[$h])
|
||||
{
|
||||
case "fn":
|
||||
$formattedname = $v[0];
|
||||
break;
|
||||
case "n":
|
||||
$lastname = $v[0];
|
||||
$firstname = $v[1];
|
||||
break;
|
||||
case "bday":
|
||||
$bday = $v[0];
|
||||
break;
|
||||
case "adr": // This one is real ugly. :(
|
||||
$street = $v[2];
|
||||
$address2 = $v[1] . " " . $v[0];
|
||||
$city = $v[3];
|
||||
$state = $v[4];
|
||||
$zip = $v[5];
|
||||
$country = $v[6];
|
||||
break;
|
||||
case "tel": // Check to see if there another phone entry.
|
||||
if(!ereg("home",$varray[$i]) &&
|
||||
!ereg("work",$varray[$i]) &&
|
||||
!ereg("fax",$varray[$i]) &&
|
||||
!ereg("cell",$varray[$i]) &&
|
||||
!ereg("pager",$varray[$i]) &&
|
||||
!ereg("bbs",$varray[$i]) &&
|
||||
!ereg("modem",$varray[$i]) &&
|
||||
!ereg("car",$varray[$i]) &&
|
||||
!ereg("isdn",$varray[$i]) &&
|
||||
!ereg("video",$varray[$i]) )
|
||||
{ // There isn't a seperate home entry.
|
||||
// Use this number.
|
||||
$hphone = $v[0];
|
||||
}
|
||||
break;
|
||||
case "home":
|
||||
$hphone = $v[0];
|
||||
break;
|
||||
case "work":
|
||||
$wphone = $v[0];
|
||||
break;
|
||||
case "fax":
|
||||
$fax = $v[0];
|
||||
break;
|
||||
case "pager":
|
||||
$pager = $v[0];
|
||||
break;
|
||||
case "cell":
|
||||
$mphone = $v[0];
|
||||
break;
|
||||
case "pref":
|
||||
$notes .= "Preferred phone number is ";
|
||||
$notes .= $v[0] . "\n";
|
||||
break;
|
||||
case "msg":
|
||||
$notes .= "Messaging service on number ";
|
||||
$notes .= $v[0] . "\n";
|
||||
break;
|
||||
case "bbs":
|
||||
$notes .= "BBS phone number ";
|
||||
$notes .= $v[0] . "\n";
|
||||
break;
|
||||
case "modem":
|
||||
$notes .= "Modem phone number ";
|
||||
$notes .= $v[0] . "\n";
|
||||
break;
|
||||
case "car":
|
||||
$notes .= "Car phone number ";
|
||||
$notes .= $v[0] . "\n";
|
||||
break;
|
||||
case "isdn":
|
||||
$notes .= "ISDN number ";
|
||||
$notes .= $v[0] . "\n";
|
||||
break;
|
||||
case "video":
|
||||
$notes .= "Video phone number ";
|
||||
$notes .= $v[0] . "\n";
|
||||
break;
|
||||
case "email":
|
||||
if(!ereg("internet",$varray[$i]))
|
||||
{
|
||||
$email = $v[0];
|
||||
}
|
||||
break;
|
||||
case "internet":
|
||||
$email = $v[0];
|
||||
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: // Throw most other things into notes.
|
||||
break;
|
||||
} // switch
|
||||
} // for
|
||||
$i++;
|
||||
} // All of the values that are getting filled are.
|
||||
|
||||
//echo "Formatted name: " . $formattedname . "<BR>";
|
||||
//echo "First Name: " . $firstname . "<BR>";
|
||||
//echo "Last Name: " . $lastname . "<BR>";
|
||||
//echo "Home Phone: " .$hphone . "<BR>";
|
||||
//echo "Cell Phone: " . $mphone . "<BR>";
|
||||
//echo "Work Phone: " . $wphone . "<BR>";
|
||||
//echo "Fax: " . $fax . "<BR>";
|
||||
//echo "Email: " . $email . "<BR>";
|
||||
//echo "Organization: " . $company . "<BR>";
|
||||
//echo "Address:<BR>";
|
||||
//echo $address2 . "<BR>" . $street ."<BR>";
|
||||
//echo $city . " " . $state . " " . $zip . "<BR>";
|
||||
//echo "Notes: " . $notes . "<BR>";
|
||||
|
||||
|
||||
if($phpgw_info["apps"]["timetrack"]["enabled"]) {
|
||||
$sql = "insert into addressbook (ab_owner,ab_access,ab_firstname,ab_lastname,ab_title,ab_email,"
|
||||
. "ab_hphone,ab_wphone,ab_fax,ab_pager,ab_mphone,ab_ophone,ab_street,ab_address2,ab_city,"
|
||||
. "ab_state,ab_zip,ab_bday,"
|
||||
. "ab_notes,ab_company_id) values ('" . $phpgw_info["user"]["account_id"] . "','$access','"
|
||||
. addslashes($firstname). "','"
|
||||
. addslashes($lastname) . "','"
|
||||
. addslashes($title) . "','"
|
||||
. addslashes($email) . "','"
|
||||
. addslashes($hphone) . "','"
|
||||
. addslashes($wphone) . "','"
|
||||
. addslashes($fax) . "','"
|
||||
. addslashes($pager) . "','"
|
||||
. addslashes($mphone) . "','"
|
||||
. addslashes($ophone) . "','"
|
||||
. addslashes($street) . "','"
|
||||
. addslashes($address2) . "','"
|
||||
. addslashes($city) . "','"
|
||||
. addslashes($state) . "','"
|
||||
. addslashes($zip) . "','"
|
||||
. addslashes($bday) . "','"
|
||||
. addslashes($notes) . "','"
|
||||
. addslashes($company). "')";
|
||||
} else {
|
||||
$sql = "insert into addressbook (ab_owner,ab_access,ab_firstname,ab_lastname,ab_title,ab_email,"
|
||||
. "ab_hphone,ab_wphone,ab_fax,ab_pager,ab_mphone,ab_ophone,ab_street,ab_address2,ab_city,"
|
||||
. "ab_state,ab_zip,ab_bday,"
|
||||
. "ab_notes,ab_company) values ('" . $phpgw_info["user"]["account_id"] . "','$access','"
|
||||
. addslashes($firstname). "','"
|
||||
. addslashes($lastname) . "','"
|
||||
. addslashes($title) . "','"
|
||||
. addslashes($email) . "','"
|
||||
. addslashes($hphone) . "','"
|
||||
. addslashes($wphone) . "','"
|
||||
. addslashes($fax) . "','"
|
||||
. addslashes($pager) . "','"
|
||||
. addslashes($mphone) . "','"
|
||||
. addslashes($ophone) . "','"
|
||||
. addslashes($street) . "','"
|
||||
. addslashes($address2) . "','"
|
||||
. addslashes($city) . "','"
|
||||
. addslashes($state) . "','"
|
||||
. addslashes($zip) . "','"
|
||||
. addslashes($bday) . "','"
|
||||
. addslashes($notes) . "','"
|
||||
. addslashes($company). "')";
|
||||
}
|
||||
$phpgw->db->query($sql);
|
||||
}
|
||||
|
||||
if($access == "group")
|
||||
$access = $n_groups;
|
||||
//echo $access . "<BR>";
|
||||
|
||||
parsevcard($filename,$access);
|
||||
// Delete the temp file.
|
||||
unlink($filename);
|
||||
unlink($filename . ".info");
|
||||
Header("Location: " . $phpgw->link($phpgw_info["server"]["webserver_url"] . "/addressbook/",
|
||||
"cd=14"));
|
||||
|
||||
// End of php.
|
||||
?>
|
Loading…
Reference in New Issue
Block a user