200 lines
7.2 KiB
PHP
200 lines
7.2 KiB
PHP
<?php
|
|
/**
|
|
* iCalcreator, a PHP rfc2445/rfc5545 solution.
|
|
*
|
|
* This file is a part of iCalcreator.
|
|
*
|
|
* Copyright (c) 2007-2017 Kjell-Inge Gustafsson, kigkonsult, All rights reserved
|
|
* Link http://kigkonsult.se/iCalcreator/index.php
|
|
* Package iCalcreator
|
|
* Version 2.24
|
|
* License Subject matter of licence is the software iCalcreator.
|
|
* The above copyright, link, package and version notices,
|
|
* this licence notice and the [rfc5545] PRODID as implemented and
|
|
* invoked in iCalcreator shall be included in all copies or
|
|
* substantial portions of the iCalcreator.
|
|
* iCalcreator can be used either under the terms of
|
|
* a proprietary license, available at <https://kigkonsult.se/>
|
|
* or the GNU Affero General Public License, version 3:
|
|
* iCalcreator is free software: you can redistribute it and/or
|
|
* modify it under the terms of the GNU Affero General Public License
|
|
* as published by the Free Software Foundation, either version 3 of
|
|
* the License, or (at your option) any later version.
|
|
* iCalcreator 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 Affero General Public License for more details.
|
|
* You should have received a copy of the GNU Affero General Public
|
|
* License along with this program.
|
|
* If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
namespace kigkonsult\iCalcreator;
|
|
use kigkonsult\iCalcreator\util\util;
|
|
/**
|
|
* iCalcreator vCard support class
|
|
*
|
|
* @author Kjell-Inge Gustafsson, kigkonsult <ical@kigkonsult.se>
|
|
* @since 2.22.20 - 2017-01-30
|
|
*/
|
|
class iCalvCard {
|
|
/**
|
|
* Convert single ATTENDEE, CONTACT or ORGANIZER (in email format) to vCard
|
|
*
|
|
* Returns vCard/true or if directory (if set) or file write is unvalid, false
|
|
* @author Kjell-Inge Gustafsson, kigkonsult <ical@kigkonsult.se>
|
|
* @since 2.23.8 - 2017-04-17
|
|
* @param string $email
|
|
* @param string $version vCard version (default 2.1)
|
|
* @param string $directory where to save vCards (default false)
|
|
* @param string $ext vCard file extension (default 'vcf')
|
|
* @return mixed bool true (if directory set and save ok), string (if not), false on error
|
|
* @static
|
|
*/
|
|
public static function iCal2vCard( $email, $version=null, $directory=null, $ext=null ) {
|
|
static $UCMAILTOCOLON = 'MAILTO:';
|
|
static $CRLF = "\r\n";
|
|
static $FMTFN = "FN:%s\r\n";
|
|
static $FMTN = 'N:%s';
|
|
static $V2_1 = '2.1';
|
|
static $AT = '@';
|
|
static $V4_0 = '4.0';
|
|
static $FMTEMAIL = "EMAIL:%s\r\n";
|
|
static $BEGINVCARD = "BEGIN:VCARD\r\n";
|
|
static $FMTVERSION = "VERSION:%s\r\n";
|
|
static $FMTPRODID = "PRODID:-//kigkonsult.se %s\r\n";
|
|
static $FMTREV = "REV:%s\r\n";
|
|
static $YMDTHISZ = 'Ymd\THis\Z';
|
|
static $ENDVCARD = "END:VCARD\r\n";
|
|
static $EXPR = '/[^a-z0-9.]/i';
|
|
static $FMTFNAME = '%s%s%s.%s';
|
|
static $EXTVCF = 'vcf';
|
|
if( empty( $version ))
|
|
$version = $V2_1;
|
|
if( false === ( $pos = strpos( $email, $AT )))
|
|
return false;
|
|
if( $directory ) {
|
|
if( DIRECTORY_SEPARATOR != substr( $directory, ( 0 - strlen( DIRECTORY_SEPARATOR ))))
|
|
$directory .= DIRECTORY_SEPARATOR;
|
|
if( ! is_dir( $directory ) || ! is_writable( $directory ))
|
|
return false;
|
|
}
|
|
/* prepare vCard */
|
|
$email = str_replace( $UCMAILTOCOLON, null, $email );
|
|
$name = $person = substr( $email, 0, $pos );
|
|
if( ctype_upper( $name ) || ctype_lower( $name ))
|
|
$name = [$name];
|
|
else {
|
|
if( false !== ( $pos = strpos( $name, util::$DOT ))) {
|
|
$name = explode( util::$DOT, $name );
|
|
foreach( $name as $k => $part )
|
|
$name[$k] = ucfirst( $part );
|
|
}
|
|
else { // split camelCase
|
|
$chars = $name;
|
|
$name = [$chars[0]];
|
|
$k = 0;
|
|
$len = strlen( $chars );
|
|
$x = 1;
|
|
while( $x < $len ) {
|
|
if( ctype_upper( $chars[$x] )) {
|
|
$k += 1;
|
|
$name[$k] = null;
|
|
}
|
|
$name[$k] .= $chars[$x];
|
|
$x++;
|
|
}
|
|
}
|
|
}
|
|
$FN = sprintf( $FMTFN, implode( utiL::$SP1, $name ));
|
|
$name = array_reverse( $name );
|
|
$N = sprintf( $FMTN, array_shift( $name ));
|
|
$scCnt = 0;
|
|
while( NULL != ( $part = array_shift( $name ))) {
|
|
if(( $V4_0 != $version ) || ( 4 > $scCnt ))
|
|
$scCnt += 1;
|
|
$N .= util::$SEMIC . $part;
|
|
}
|
|
while(( $V4_0 == $version ) && ( 4 > $scCnt )) {
|
|
$N .= util::$SEMIC;
|
|
$scCnt += 1;
|
|
}
|
|
$N .= $CRLF;
|
|
$EMAIL = sprintf( $FMTEMAIL, $email );
|
|
/* create vCard */
|
|
$vCard = $BEGINVCARD;
|
|
$vCard .= sprintf( $FMTVERSION, $version );
|
|
$vCard .= sprintf( $FMTPRODID, ICALCREATOR_VERSION );
|
|
$vCard .= $N;
|
|
$vCard .= $FN;
|
|
$vCard .= $EMAIL;
|
|
$vCard .= sprintf( $FMTREV, gmdate( $YMDTHISZ ));
|
|
$vCard .= $ENDVCARD;
|
|
/* save each vCard as (unique) single file */
|
|
if( ! empty( $directory )) {
|
|
if( empty( $ext ))
|
|
$ext = $EXTVCF;
|
|
$fprfx = $directory.preg_replace( $EXPR, null, $email );
|
|
$cnt = 1;
|
|
$dbl = null;
|
|
$fName = sprintf( $FMTFNAME, $fprfx, $dbl, $ext );
|
|
while( is_file ( $fName )) {
|
|
$cnt += 1;
|
|
$dbl = $cnt;
|
|
$fName = sprintf( $FMTFNAME, $fprfx, $dbl, $ext );
|
|
}
|
|
if( false === file_put_contents( $fName, $vCard ))
|
|
return false;
|
|
return true;
|
|
}
|
|
/* return vCard */
|
|
else
|
|
return $vCard;
|
|
}
|
|
/**
|
|
* Convert ATTENDEEs, CONTACTs and ORGANIZERs (in email format) to vCards
|
|
*
|
|
* @author Kjell-Inge Gustafsson, kigkonsult <ical@kigkonsult.se>
|
|
* @since 2.23.20 - 2017-02-20
|
|
* @param vcalendar $calendar iCalcreator vcalendar instance
|
|
* @param string $version vCard version (default 2.1)
|
|
* @param string $directory where to save vCards (default false)
|
|
* @param string $ext vCard file extension (default 'vcf')
|
|
* @return mixed bool true (if directory set and save ok), string (if not), false on error
|
|
* @static
|
|
*/
|
|
public static function iCal2vCards( vcalendar $calendar, $version=null, $directory=null, $ext=null ) {
|
|
static $vCardP = ['ATTENDEE', 'CONTACT', 'ORGANIZER'];
|
|
static $AT = '@';
|
|
static $UCMAILTOCOLON = 'MAILTO:';
|
|
$hits = [];
|
|
foreach( $vCardP as $prop ) {
|
|
$hits2 = $calendar->getProperty( $prop );
|
|
foreach( $hits2 as $propValue => $occCnt ) {
|
|
if( false === ( $pos = strpos( $propValue, $AT )))
|
|
continue;
|
|
$propValue = str_replace( $UCMAILTOCOLON, null, $propValue );
|
|
if( isset( $hits[$propValue] ))
|
|
$hits[$propValue] += $occCnt;
|
|
else
|
|
$hits[$propValue] = $occCnt;
|
|
}
|
|
}
|
|
if( empty( $hits ))
|
|
return false;
|
|
ksort( $hits );
|
|
$output = null;
|
|
foreach( $hits as $email => $skip ) {
|
|
$res = self::iCal2vCard( $email, $version, $directory, $ext );
|
|
if( ! empty( $directory ) && ! $res )
|
|
return false;
|
|
elseif( ! $res )
|
|
return $res;
|
|
else
|
|
$output .= $res;
|
|
}
|
|
if( $directory )
|
|
return true;
|
|
return ( empty( $output )) ? false : $output;
|
|
}
|
|
}
|