From 91b0c37877959acaafb91e5335ebcd351e6ad4b1 Mon Sep 17 00:00:00 2001
From: Miles Lott <milosch@alumni.egroupware.org>
Date: Mon, 5 Feb 2001 05:38:26 +0000
Subject: [PATCH] Move parsecard's functions to functions.inc.php and basically
 remove call to parsecard.php

---
 addressbook/inc/functions.inc.php | 236 +++++++++++++++++++++++
 addressbook/parsecard.php         | 299 ++----------------------------
 addressbook/vcardin.php           |  46 +++--
 3 files changed, 273 insertions(+), 308 deletions(-)

diff --git a/addressbook/inc/functions.inc.php b/addressbook/inc/functions.inc.php
index b994cf9027..89eac71129 100755
--- a/addressbook/inc/functions.inc.php
+++ b/addressbook/inc/functions.inc.php
@@ -370,4 +370,240 @@
     $t->pparse("out","form");
   } //end form function
 
+  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 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];
+        }
+      }
+
+      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.
+
+/*    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 {
+*/
+
+     $fields["owner"]          = $phpgw_info["user"]["account_id"];
+     $fields["access"]         = $access;
+     $fields["n_given"]        = addslashes($firstname);
+     $fields["n_family"]       = addslashes($lastname);
+     $fields["fn"]             = addslashes($firstname . " " . $lastname);
+     $fields["title"]          = addslashes($title);
+     $fields["d_email"]        = addslashes($email);
+     $fields["a_tel"]          = addslashes($hphone);
+     $fields["b_tel"]          = addslashes($wphone);
+     $fields["c_tel"]          = addslashes($fax);
+     $fields["pager"]          = addslashes($pager);
+     $fields["mphone"]         = addslashes($mphone);
+     $fields["ophone"]         = addslashes($ophone);
+     $fields["adr_street"]     = addslashes($street);
+     $fields["address2"]       = addslashes($address2);
+     $fields["adr_locality"]   = addslashes($city);
+     $fields["adr_region"]     = addslashes($state);
+     $fields["adr_postalcode"] = addslashes($zip);
+     $fields["bday"]           = addslashes($bday);
+     $fields["notes"]          = addslashes($notes);
+     $fields["org_name"]       = addslashes($company);
+
+     $this = CreateObject("phpgwapi.contacts");
+     $this->add($phpgw_info["user"]["account_id"],$fields);
+  }
+
 ?>
diff --git a/addressbook/parsecard.php b/addressbook/parsecard.php
index a62972b788..852b6abe9d 100644
--- a/addressbook/parsecard.php
+++ b/addressbook/parsecard.php
@@ -13,295 +13,18 @@
 
   /* $Id$ */
 
-  $phpgw_info["flags"] = array("currentapp" => "addressbook", "enable_addressbook_class" => True, "noheader" => True, "nonavbar" => True);
+  $phpgw_info["flags"] = array("currentapp" => "addressbook",
+                               "enable_contact_class" => True,
+                               "noheader" => True, "nonavbar" => True);
   include("../header.inc.php");
 
+  if($access == "group")
+    $access = $n_groups;
+  //echo $access . "<BR>";
 
-// 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.
+  parsevcard($filename,$access);
+  // Delete the temp file.
+  unlink($filename);
+  unlink($filename . ".info");
+  Header("Location: " . $phpgw->link($phpgw_info["server"]["webserver_url"] . "/addressbook/", "cd=14"));
 ?>
diff --git a/addressbook/vcardin.php b/addressbook/vcardin.php
index 0df5f53d12..cab372ca87 100644
--- a/addressbook/vcardin.php
+++ b/addressbook/vcardin.php
@@ -30,28 +30,34 @@ if ($action == "Load Vcard"){
   $uploaddir = $phpgw_info["server"]["temp_dir"] . $sep . $phpgw_info["user"]["sessionid"] . $sep;
 
   if ($action == "Load Vcard") {
-     if($uploadedfile == "none" || $uploadedfile == "")
-     {
-       Header("Location: " . $phpgw->link($phpgw_info["server"]["webserver_url"] .
+    if($uploadedfile == "none" || $uploadedfile == "") {
+      Header("Location: " . $phpgw->link($phpgw_info["server"]["webserver_url"] .
             "/addressbook/vcardin.php","action=GetFile"));
-     }
-     else
-     {
-       srand((double)microtime()*1000000);
-       $random_number = rand(100000000,999999999);
-       $newfilename = md5("$uploadedfile, $uploadedfile_name, " . $phpgw_info["user"]["sessionid"]
-   		          . time() . getenv("REMOTE_ADDR") . $random_number );
+    } else {
+      srand((double)microtime()*1000000);
+      $random_number = rand(100000000,999999999);
+      $newfilename = md5("$uploadedfile, $uploadedfile_name, " . $phpgw_info["user"]["sessionid"]
+                     . time() . getenv("REMOTE_ADDR") . $random_number );
 
-       copy($uploadedfile, $uploaddir . $newfilename);
-       $ftp = fopen($uploaddir . $newfilename . ".info","w");
-        fputs($ftp,"$uploadedfile_type\n$uploadedfile_name\n");
-       fclose($ftp);
-       // This has to be non-interactive in case of a multi-entry vcard.
-       Header("Location: " . $phpgw->link($phpgw_info["server"]["webserver_url"] .
-              "/addressbook/parsecard.php","filename=" . $uploaddir . $newfilename .
-              "&access=" . $access . "&n_groups=" . $phpgw->accounts->array_to_string($access,$n_groups)
-             ));
-      }
+      copy($uploadedfile, $uploaddir . $newfilename);
+      $ftp = fopen($uploaddir . $newfilename . ".info","w");
+      fputs($ftp,"$uploadedfile_type\n$uploadedfile_name\n");
+      fclose($ftp);
+
+      // This has to be non-interactive in case of a multi-entry vcard.
+      $filename = $uploaddir . $newfilename;
+      $n_groups = $phpgw->accounts->array_to_string($access,$n_groups);
+      
+      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"));
+    }
   }
 
   if (! file_exists($phpgw_info["server"]["temp_dir"] . $sep . $phpgw_info["user"]["sessionid"]))