egroupware_official/addressbook/inc/class.uivcard.inc.php

<?php
  /**************************************************************************\
  * eGroupWare - Addressbook                                                 *
  * http://www.egroupware.org                                                *
  * Written by Joseph Engo <jengo@phpgroupware.org> and                      *
  * Miles Lott <milos@groupwhere.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$ */

	class uivcard
	{
		var $template;
		var $contacts;
		var $browser;
		var $vcard;
		var $bo;

		var $public_functions = array(
			'in'  => True,
			'out' => True
		);

		var $extrafields = array(
			'ophone'   => 'ophone',
			'address2' => 'address2',
			'address3' => 'address3'
		);

		function uivcard()
		{
			$this->template = &$GLOBALS['phpgw']->template;
			$this->contacts = CreateObject('phpgwapi.contacts');
			$this->browser  = CreateObject('phpgwapi.browser');
			$this->vcard    = CreateObject('phpgwapi.vcard');
			$this->bo = CreateObject('addressbook.boaddressbook',True);
		}

		function in()
		{
			$uploadedfile = get_var('uploadedfile','FILES');
			$action = get_var('action',array('POST','GET'));

			if($uploadedfile)
			{
				$ab_id = $this->bo->add_vcard($uploadedfile);
				if($ab_id)
				{
					Header('Location: ' . $GLOBALS['phpgw']->link('/index.php','menuaction=addressbook.uiaddressbook.view&ab_id=' . $ab_id));
				}
			}

			$GLOBALS['phpgw']->common->phpgw_header();
			echo parse_navbar();
			echo '<body bgcolor="' . $GLOBALS['phpgw_info']['theme']['bg_color'] . '">';

			if($action == 'GetFile')
			{
				echo '<b><center>' . lang('You must select a vcard. (*.vcf)') . '</b></center><br><br>';
			}

			$this->template->set_file(array('vcardin' => 'vcardin.tpl'));

			$this->template->set_var('lang_load_vcard', lang('load vcard'));
			$this->template->set_var('vcard_header','<p>&nbsp;<b>' . lang('Address book - VCard in') . '</b><hr><p>');
			$this->template->set_var('action_url',$GLOBALS['phpgw']->link('/index.php','menuaction=addressbook.uivcard.in'));
			$this->template->set_var('lang_access',lang('Access'));
			$this->template->set_var('lang_groups',lang('Which groups'));
			$this->template->set_var('access_option',$access_option);
			$this->template->set_var('group_option',$group_option);

			$this->template->pparse('out','vcardin');

			$GLOBALS['phpgw']->common->phpgw_footer();
		}

		function out()
		{
			$ab_id   = get_var('ab_id',array('GET','POST'));
			$nolname = get_var('nolname','GET');
			$nofname = get_var('nofname','GET');

			if($nolname || $nofname)
			{
				$GLOBALS['phpgw']->common->phpgw_header();
				echo parse_navbar();
			}

			if(!$ab_id)
			{
				Header('Location: ' . $GLOBALS['phpgw']->link('/addressbook/index.php'));
				$GLOBALS['phpgw']->common->phpgw_exit();
			}

			// First, make sure they have permission to this entry
			$check = $this->bo->read_entry(array('id' => $ab_id, 'fields' => array('owner' => 'owner')));
			$perms = $this->contacts->check_perms($this->contacts->grants[$check[0]['owner']],PHPGW_ACL_READ);

			if((!$perms) && ($check[0]['owner'] != $GLOBALS['phpgw_info']['user']['account_id']))
			{
				Header("Location: " . $GLOBALS['phpgw']->link('/index.php','menuaction=addressbook.uiaddressbook.get_list'));
				$GLOBALS['phpgw']->common->phpgw_exit();
			}

			$extrafields = array('address2' => 'address2');
			$qfields = $this->contacts->stock_contact_fields + $extrafields;

			$fieldlist = $this->bo->read_entry(array('id' => $ab_id, 'fields' => $qfields));
			$fields = $fieldlist[0];

			$email        = $fields['email'];
			$emailtype    = $fields['email_type'];
			if(!$emailtype)
			{
				$fields['email_type'] = 'INTERNET';
			}
			$hemail       = $fields['email_home'];
			$hemailtype   = $fields['email_home_type'];
			if(!$hemailtype)
			{
				$fields['email_home_type'] = 'INTERNET';
			}
			$firstname    = $fields['n_given'];
			$lastname     = $fields['n_family'];

			if(!$nolname && !$nofname)
			{
				/* First name and last must be in the vcard. */
				if($lastname == '')
				{
					/* Run away here. */
					Header('Location: ' . $GLOBALS['phpgw']->link('/index.php',"menuaction=addressbook.uivcard.out&nolname=1&ab_id=$ab_id"));
				}
				if($firstname == '')
				{
					Header('Location: ' . $GLOBALS['phpgw']->link('/index.php',"menuaction=addressbook.uivcard.out&nofname=1&ab_id=$ab_id"));
				}

				if($email)
				{
					$fn =  explode('@',$email);
					$filename = sprintf("%s.vcf", $fn[0]);
				}
				elseif($hemail)
				{
					$fn =  explode('@',$hemail);
					$filename = sprintf("%s.vcf", $fn[0]);
				}
				else
				{
					$fn = strtolower($firstname);
					$filename = sprintf("%s.vcf", $fn);
				}

				// set translation variable
				$myexport = $this->vcard->export;
				// check that each $fields exists in the export array and
				// set a new array to equal the translation and original value
				while(list($name,$value) = each($fields))
				{
					if($myexport[$name] && ($value != ''))
					{
						//echo '<br>'.$name."=".$fields[$name]."\n";
						$buffer[$myexport[$name]] = $value;
					}
				}

				// create a vcard from this translated array
				$entry = $this->vcard->out($buffer);
				// print it using browser class for headers
				// filename, mimetype, no length, default nocache True
				$this->browser->content_header($filename,'text/x-vcard');
				echo $entry;
				exit;
				//$GLOBALS['phpgw']->common->exit;
			} /* !nolname && !nofname */

			if($nofname)
			{
				echo '<br><br><center>';
				echo lang("This person's first name was not in the address book.") .'<br>';
				echo lang('Vcards require a first name entry.') . '<br><br>';
				echo '<a href="' . $GLOBALS['phpgw']->link('/addressbook/index.php',
					"order=$order&start=$start&filter=$filter&query=$query&sort=$sort&cat_id=$cat_id") . '">' . lang('OK') . '</a>';
				echo '</center>';
			}

			if($nolname)
			{
				echo '<br><br><center>';
				echo lang("This person's last name was not in the address book.") . '<br>';
				echo lang('Vcards require a last name entry.') . '<br><br>';
				echo '<a href="' . $GLOBALS['phpgw']->link('/addressbook/index.php',
					"order=$order&start=$start&filter=$filter&query=$query&sort=$sort&cat_id=$cat_id") . '">' . lang('OK') . '</a>';
				echo '</center>';
			}

			if($nolname || $nofname)
			{
				//$GLOBALS['phpgw']->common->phpgw_footer();
			}
		}
	}
?>
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`<?php`
			`/**************************************************************************\`
small changes in the header 2004-01-25 23:02:59 +01:00			`* eGroupWare - Addressbook *`
			`* http://www.egroupware.org *`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`* Written by Joseph Engo <jengo@phpgroupware.org> and *`
Use get_var() 2003-10-19 08:14:21 +02:00			`* Miles Lott <milos@groupwhere.org> *`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`* -------------------------------------------- *`
			`* 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$ */`

			`class uivcard`
			`{`
			`var $template;`
			`var $contacts;`
			`var $browser;`
			`var $vcard;`
			`var $bo;`

			`var $public_functions = array(`
			`'in' => True,`
			`'out' => True`
			`);`

Use get_var() 2003-10-19 08:14:21 +02:00			`var $extrafields = array(`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`'ophone' => 'ophone',`
			`'address2' => 'address2',`
			`'address3' => 'address3'`
			`);`

			`function uivcard()`
			`{`
Remove header redirection from bo class - one function left to do 2003-11-19 15:16:15 +01:00			`$this->template = &$GLOBALS['phpgw']->template;`
php3 fixes 2001-07-10 21:52:30 +02:00			`$this->contacts = CreateObject('phpgwapi.contacts');`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`$this->browser = CreateObject('phpgwapi.browser');`
			`$this->vcard = CreateObject('phpgwapi.vcard');`
			`$this->bo = CreateObject('addressbook.boaddressbook',True);`
			`}`

			`function in()`
			`{`
Remove header redirection from bo class - one function left to do 2003-11-19 15:16:15 +01:00			`$uploadedfile = get_var('uploadedfile','FILES');`
Use get_var() 2003-10-19 08:14:21 +02:00			`$action = get_var('action',array('POST','GET'));`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00
Remove header redirection from bo class - one function left to do 2003-11-19 15:16:15 +01:00			`if($uploadedfile)`
			`{`
			`$ab_id = $this->bo->add_vcard($uploadedfile);`
Cleanup handling of vcard file import 2003-12-05 12:27:47 +01:00			`if($ab_id)`
Remove header redirection from bo class - one function left to do 2003-11-19 15:16:15 +01:00			`{`
			`Header('Location: ' . $GLOBALS['phpgw']->link('/index.php','menuaction=addressbook.uiaddressbook.view&ab_id=' . $ab_id));`
			`}`
			`}`

Cleanup handling of vcard file import 2003-12-05 12:27:47 +01:00			`$GLOBALS['phpgw']->common->phpgw_header();`
			`echo parse_navbar();`
			`echo '<body bgcolor="' . $GLOBALS['phpgw_info']['theme']['bg_color'] . '">';`

Use get_var() 2003-10-19 08:14:21 +02:00			`if($action == 'GetFile')`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`{`
			`echo '<b><center>' . lang('You must select a vcard. (*.vcf)') . '</b></center><br><br>';`
			`}`

			`$this->template->set_file(array('vcardin' => 'vcardin.tpl'));`

Added button translation 2004-09-18 23:33:23 +02:00			`$this->template->set_var('lang_load_vcard', lang('load vcard'));`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`$this->template->set_var('vcard_header','<p> <b>' . lang('Address book - VCard in') . '</b><hr><p>');`
Remove header redirection from bo class - one function left to do 2003-11-19 15:16:15 +01:00			`$this->template->set_var('action_url',$GLOBALS['phpgw']->link('/index.php','menuaction=addressbook.uivcard.in'));`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`$this->template->set_var('lang_access',lang('Access'));`
			`$this->template->set_var('lang_groups',lang('Which groups'));`
			`$this->template->set_var('access_option',$access_option);`
			`$this->template->set_var('group_option',$group_option);`

			`$this->template->pparse('out','vcardin');`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00
			`$GLOBALS['phpgw']->common->phpgw_footer();`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`}`

			`function out()`
			`{`
Use get_var() 2003-10-19 08:14:21 +02:00			`$ab_id = get_var('ab_id',array('GET','POST'));`
			`$nolname = get_var('nolname','GET');`
			`$nofname = get_var('nofname','GET');`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00
Fix email link; Formatting; 2002-01-17 04:52:56 +01:00			`if($nolname \|\| $nofname)`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`{`
Fix email link; Formatting; 2002-01-17 04:52:56 +01:00			`$GLOBALS['phpgw']->common->phpgw_header();`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`echo parse_navbar();`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`}`

Fix email link; Formatting; 2002-01-17 04:52:56 +01:00			`if(!$ab_id)`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`{`
Fix email link; Formatting; 2002-01-17 04:52:56 +01:00			`Header('Location: ' . $GLOBALS['phpgw']->link('/addressbook/index.php'));`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`$GLOBALS['phpgw']->common->phpgw_exit();`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`}`

			`// First, make sure they have permission to this entry`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`$check = $this->bo->read_entry(array('id' => $ab_id, 'fields' => array('owner' => 'owner')));`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`$perms = $this->contacts->check_perms($this->contacts->grants[$check[0]['owner']],PHPGW_ACL_READ);`

Use get_var() 2003-10-19 08:14:21 +02:00			`if((!$perms) && ($check[0]['owner'] != $GLOBALS['phpgw_info']['user']['account_id']))`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`{`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`Header("Location: " . $GLOBALS['phpgw']->link('/index.php','menuaction=addressbook.uiaddressbook.get_list'));`
			`$GLOBALS['phpgw']->common->phpgw_exit();`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`}`

Use get_var() 2003-10-19 08:14:21 +02:00			`$extrafields = array('address2' => 'address2');`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`$qfields = $this->contacts->stock_contact_fields + $extrafields;`

Working to changeover to use of arrays for all bo functions, fix some other broken calls that were in limbo 2001-08-09 02:19:28 +02:00			`$fieldlist = $this->bo->read_entry(array('id' => $ab_id, 'fields' => $qfields));`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`$fields = $fieldlist[0];`

			`$email = $fields['email'];`
			`$emailtype = $fields['email_type'];`
Use get_var() 2003-10-19 08:14:21 +02:00			`if(!$emailtype)`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`{`
			`$fields['email_type'] = 'INTERNET';`
			`}`
			`$hemail = $fields['email_home'];`
			`$hemailtype = $fields['email_home_type'];`
Use get_var() 2003-10-19 08:14:21 +02:00			`if(!$hemailtype)`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`{`
			`$fields['email_home_type'] = 'INTERNET';`
			`}`
			`$firstname = $fields['n_given'];`
			`$lastname = $fields['n_family'];`

			`if(!$nolname && !$nofname)`
			`{`
			`/* First name and last must be in the vcard. */`
			`if($lastname == '')`
			`{`
			`/* Run away here. */`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`Header('Location: ' . $GLOBALS['phpgw']->link('/index.php',"menuaction=addressbook.uivcard.out&nolname=1&ab_id=$ab_id"));`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`}`
			`if($firstname == '')`
			`{`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`Header('Location: ' . $GLOBALS['phpgw']->link('/index.php',"menuaction=addressbook.uivcard.out&nofname=1&ab_id=$ab_id"));`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`}`

Use get_var() 2003-10-19 08:14:21 +02:00			`if($email)`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`{`
			`$fn = explode('@',$email);`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`$filename = sprintf("%s.vcf", $fn[0]);`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`}`
Use get_var() 2003-10-19 08:14:21 +02:00			`elseif($hemail)`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`{`
			`$fn = explode('@',$hemail);`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`$filename = sprintf("%s.vcf", $fn[0]);`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`}`
			`else`
			`{`
			`$fn = strtolower($firstname);`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`$filename = sprintf("%s.vcf", $fn);`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`}`

			`// set translation variable`
			`$myexport = $this->vcard->export;`
			`// check that each $fields exists in the export array and`
			`// set a new array to equal the translation and original value`
Use get_var() 2003-10-19 08:14:21 +02:00			`while(list($name,$value) = each($fields))`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`{`
Use get_var() 2003-10-19 08:14:21 +02:00			`if($myexport[$name] && ($value != ''))`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`{`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`//echo '<br>'.$name."=".$fields[$name]."\n";`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`$buffer[$myexport[$name]] = $value;`
			`}`
			`}`

			`// create a vcard from this translated array`
Use get_var() 2003-10-19 08:14:21 +02:00			`$entry = $this->vcard->out($buffer);`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`// print it using browser class for headers`
			`// filename, mimetype, no length, default nocache True`
			`$this->browser->content_header($filename,'text/x-vcard');`
			`echo $entry;`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`exit;`
			`//$GLOBALS['phpgw']->common->exit;`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`} /* !nolname && !nofname */`

			`if($nofname)`
			`{`
			`echo '<br><br><center>';`
			`echo lang("This person's first name was not in the address book.") .'<br>';`
			`echo lang('Vcards require a first name entry.') . '<br><br>';`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`echo '<a href="' . $GLOBALS['phpgw']->link('/addressbook/index.php',`
			`"order=$order&start=$start&filter=$filter&query=$query&sort=$sort&cat_id=$cat_id") . '">' . lang('OK') . '</a>';`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`echo '</center>';`
			`}`

			`if($nolname)`
			`{`
			`echo '<br><br><center>';`
			`echo lang("This person's last name was not in the address book.") . '<br>';`
			`echo lang('Vcards require a last name entry.') . '<br><br>';`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00			`echo '<a href="' . $GLOBALS['phpgw']->link('/addressbook/index.php',`
			`"order=$order&start=$start&filter=$filter&query=$query&sort=$sort&cat_id=$cat_id") . '">' . lang('OK') . '</a>';`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`echo '</center>';`
			`}`
make the phpgw Version-0_9_16-branch HEAD 2003-08-28 16:16:30 +02:00
			`if($nolname \|\| $nofname)`
			`{`
			`//$GLOBALS['phpgw']->common->phpgw_footer();`
			`}`
Starting to commit mostly working redesign using 3layer 2001-07-08 15:54:40 +02:00			`}`
			`}`
			`?>`