<?
/***************************************************************************

PHP vCard class v2.0
(c) Kai Blankenhorn
www.bitfolge.de/en
kaib@bitfolge.de


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.

This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
GNU General Public License for more details.

You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.

***************************************************************************/


function encode($string) {
  return escape(quoted_printable_encode($string));
}

function escape($string) {
  return str_replace(";","\;",$string);
}

// taken from PHP documentation comments
function quoted_printable_encode($input, $line_max = 76) {
  $hex = array('0','1','2','3','4','5','6','7','8','9','A','B','C','D','E','F');
  $lines = preg_split("/(?:\r\n|\r|\n)/", $input);
  $eol = "\r\n";
  $linebreak = "=0D=0A";
  $escape = "=";
  $output = "";

  for ($j=0;$j<count($lines);$j++) {
    $line = $lines[$j];
    $linlen = strlen($line);
    $newline = "";
    for($i = 0; $i < $linlen; $i++) {
      $c = substr($line, $i, 1);
      $dec = ord($c);
      if ( ($dec == 32) && ($i == ($linlen - 1)) ) { // convert space at eol only
        $c = "=20"; 
      } elseif ( ($dec == 61) || ($dec < 32 ) || ($dec > 126) ) { // always encode "\t", which is *not* required
        $h2 = floor($dec/16); $h1 = floor($dec%16); 
        $c = $escape.$hex["$h2"].$hex["$h1"]; 
      }
      if ( (strlen($newline) + strlen($c)) >= $line_max ) { // CRLF is not counted
        $output .= $newline.$escape.$eol; // soft line break; " =\r\n" is okay
        $newline = "    ";
      }
      $newline .= $c;
    } // end of for
    $output .= $newline;
    if ($j<count($lines)-1) $output .= $linebreak;
  }
  return trim($output);
}

class vCard {
  var $properties;
  var $filename;
  
  function setPhoneNumber($number, $type="") {
  // type may be PREF | WORK | HOME | VOICE | FAX | MSG | CELL | PAGER | BBS | CAR | MODEM | ISDN | VIDEO or any senseful combination, e.g. "PREF;WORK;VOICE"
    $key = "TEL";
    if ($type!="") $key .= ";".$type;
    $key.= ";ENCODING=QUOTED-PRINTABLE";
    $this->properties[$key] = quoted_printable_encode($number);
  }
  
  // UNTESTED !!!
  function setPhoto($type, $photo) { // $type = "GIF" | "JPEG"
    $this->properties["PHOTO;TYPE=$type;ENCODING=BASE64"] = base64_encode($photo);
  }
  
  function setFormattedName($name) {
    $this->properties["FN"] = quoted_printable_encode($name);
  }
  
  function setName($family="", $first="", $additional="", $prefix="", $suffix="") {
    $this->properties["N"] = "$family;$first;$additional;$prefix;$suffix";
    $this->filename = "$first%20$family.vcf";
    if ($this->properties["FN"]=="") $this->setFormattedName(trim("$prefix $first $additional $family $suffix"));
  }
  
  function setBirthday($date) { // $date format is YYYY-MM-DD
    $this->properties["BDAY"] = $date;
  }
  
  function setAddress($postoffice="", $extended="", $street="", $city="", $region="", $zip="", $country="", $type="HOME;POSTAL") {
  // $type may be DOM | INTL | POSTAL | PARCEL | HOME | WORK or any combination of these: e.g. "WORK;PARCEL;POSTAL"
    $key = "ADR";
    if ($type!="") $key.= ";$type";
    $key.= ";ENCODING=QUOTED-PRINTABLE";
    $this->properties[$key] = encode($name).";".encode($extended).";".encode($street).";".encode($city).";".encode($region).";".encode($zip).";".encode($country);
    
    if ($this->properties["LABEL;$type;ENCODING=QUOTED-PRINTABLE"] == "") {
      //$this->setLabel($postoffice, $extended, $street, $city, $region, $zip, $country, $type);
    }
  }
  
  function setLabel($postoffice="", $extended="", $street="", $city="", $region="", $zip="", $country="", $type="HOME;POSTAL") {
    $label = "";
    if ($postoffice!="") $label.= "$postoffice\r\n";
    if ($extended!="") $label.= "$extended\r\n";
    if ($street!="") $label.= "$street\r\n";
    if ($zip!="") $label.= "$zip ";
    if ($city!="") $label.= "$city\r\n";
    if ($region!="") $label.= "$region\r\n";
    if ($country!="") $country.= "$country\r\n";
    
    $this->properties["LABEL;$type;ENCODING=QUOTED-PRINTABLE"] = quoted_printable_encode($label);
  }
  
  function setEmail($address) {
    $this->properties["EMAIL;INTERNET"] = $address;
  }
  
  function setNote($note) {
    $this->properties["NOTE;ENCODING=QUOTED-PRINTABLE"] = quoted_printable_encode($note);
  }
  
  function setURL($url, $type="") {
  // $type may be WORK | HOME
    $key = "URL";
    if ($type!="") $key.= ";$type";
    $this->properties[$key] = $url;
  }
  
  function getVCard() {
    $text = "BEGIN:VCARD\r\n";
    $text.= "VERSION:2.1\r\n";
    foreach($this->properties as $key => $value) {
      $text.= "$key:$value\r\n";
    }
    $text.= "REV:".date("Y-m-d")."T".date("H:i:s")."Z\r\n";
    $text.= "MAILER:PHP vCard class by Kai Blankenhorn\r\n";
    $text.= "END:VCARD\r\n";
    return $text;
  }
  
  function getFileName() {
    return $this->filename;
  }
}


//  USAGE EXAMPLE

$v = new vCard();

$v->setPhoneNumber("+49 23 456789", "PREF;HOME;VOICE");
$v->setName("Mustermann", "Thomas", "", "Herr");
$v->setBirthday("1960-07-31");
$v->setAddress("", "", "Musterstrasse 20", "Musterstadt", "", "98765", "Deutschland");
$v->setEmail("thomas.mustermann@thomas-mustermann.de");
$v->setNote("You can take some notes here.\r\nMultiple lines are supported via \\r\\n.");
$v->setURL("http://www.thomas-mustermann.de", "WORK");

$output = $v->getVCard();
$filename = $v->getFileName();

Header("Content-Disposition: attachment; filename=$filename");
Header("Content-Length: ".strlen($output));
Header("Connection: close");
Header("Content-Type: text/x-vCard; name=$filename");

echo $output;
?>