<?php

namespace Sabre\CalDAV;

/**
 * The CalendarObject represents a single VEVENT or VTODO within a Calendar.
 *
 * @copyright Copyright (C) fruux GmbH (https://fruux.com/)
 * @author Evert Pot (http://evertpot.com/)
 * @license http://sabre.io/license/ Modified BSD License
 */
class CalendarObject extends \Sabre\DAV\File implements ICalendarObject, \Sabre\DAVACL\IACL {

    use \Sabre\DAVACL\ACLTrait;

    /**
     * Sabre\CalDAV\Backend\BackendInterface
     *
     * @var Backend\AbstractBackend
     */
    protected $caldavBackend;

    /**
     * Array with information about this CalendarObject
     *
     * @var array
     */
    protected $objectData;

    /**
     * Array with information about the containing calendar
     *
     * @var array
     */
    protected $calendarInfo;

    /**
     * Constructor
     *
     * The following properties may be passed within $objectData:
     *
     *   * calendarid - This must refer to a calendarid from a caldavBackend
     *   * uri - A unique uri. Only the 'basename' must be passed.
     *   * calendardata (optional) - The iCalendar data
     *   * etag - (optional) The etag for this object, MUST be encloded with
     *            double-quotes.
     *   * size - (optional) The size of the data in bytes.
     *   * lastmodified - (optional) format as a unix timestamp.
     *   * acl - (optional) Use this to override the default ACL for the node.
     *
     * @param Backend\BackendInterface $caldavBackend
     * @param array $calendarInfo
     * @param array $objectData
     */
    function __construct(Backend\BackendInterface $caldavBackend, array $calendarInfo, array $objectData) {

        $this->caldavBackend = $caldavBackend;

        if (!isset($objectData['uri'])) {
            throw new \InvalidArgumentException('The objectData argument must contain an \'uri\' property');
        }

        $this->calendarInfo = $calendarInfo;
        $this->objectData = $objectData;

    }

    /**
     * Returns the uri for this object
     *
     * @return string
     */
    function getName() {

        return $this->objectData['uri'];

    }

    /**
     * Returns the ICalendar-formatted object
     *
     * @return string
     */
    function get() {

        // Pre-populating the 'calendardata' is optional, if we don't have it
        // already we fetch it from the backend.
        if (!isset($this->objectData['calendardata'])) {
            $this->objectData = $this->caldavBackend->getCalendarObject($this->calendarInfo['id'], $this->objectData['uri']);
        }
        if(array_key_exists('shareduri',$this->calendarInfo) && $this->calendarInfo['permission']=='busy'){
//            dbg("WASH for FREEBUSY ==>".vl($this->objectData));
            //$this->objectData['calendardata'] = 
            $new_ics = $this->washFreeBusy($this->objectData['calendardata'], $this->calendarInfo['shared_by']);
//            dbg("WASHED for FREEBUSY ==>".vl($new_ics));
            $this->objectData['calendardata'] = $new_ics;
        }
//        dbg("***ICS ".vl($this->objectData));

        return $this->objectData['calendardata'];

    }

    /**
     * Updates the ICalendar-formatted object
     *
     * @param string|resource $calendarData
     * @return string
     */
    function put($calendarData) {

        if (is_resource($calendarData)) {
            $calendarData = stream_get_contents($calendarData);
        }
        $etag = $this->caldavBackend->updateCalendarObject($this->calendarInfo['id'], $this->objectData['uri'], $calendarData);
        $this->objectData['calendardata'] = $calendarData;
        $this->objectData['etag'] = $etag;

        return $etag;

    }

    /**
     * Deletes the calendar object
     *
     * @return void
     */
    function delete() {

        $this->caldavBackend->deleteCalendarObject($this->calendarInfo['id'], $this->objectData['uri']);

    }

    /**
     * Returns the mime content-type
     *
     * @return string
     */
    function getContentType() {

        $mime = 'text/calendar; charset=utf-8';
        if (isset($this->objectData['component']) && $this->objectData['component']) {
            $mime .= '; component=' . $this->objectData['component'];
        }
        return $mime;

    }

    /**
     * Returns an ETag for this object.
     *
     * The ETag is an arbitrary string, but MUST be surrounded by double-quotes.
     *
     * @return string
     */
    function getETag() {

        if (isset($this->objectData['etag'])) {
            return $this->objectData['etag'];
        } else {
            return '"' . md5($this->get()) . '"';
        }

    }

    /**
     * Returns the last modification date as a unix timestamp
     *
     * @return int
     */
    function getLastModified() {

        return $this->objectData['lastmodified'];

    }

    /**
     * Returns the size of this object in bytes
     *
     * @return int
     */
    function getSize() {

        if (array_key_exists('size', $this->objectData)) {
            return $this->objectData['size'];
        } else {
            return strlen($this->get());
        }

    }

    /**
     * Returns the owner principal
     *
     * This must be a url to a principal, or null if there's no owner
     *
     * @return string|null
     */
    function getOwner() {

        return $this->calendarInfo['principaluri'];

    }

    /**
     * Returns a list of ACE's for this node.
     *
     * Each ACE has the following properties:
     *   * 'privilege', a string such as {DAV:}read or {DAV:}write. These are
     *     currently the only supported privileges
     *   * 'principal', a url to the principal who owns the node
     *   * 'protected' (optional), indicating that this ACE is not allowed to
     *      be updated.
     *
     * @return array
     */
    function getACL() {
        $uri='principaluri';


        // An alternative acl may be specified in the object data.
        if (isset($this->objectData['acl'])) {
			dbg('NEW ACL CODEPATH!');
            return $this->objectData['acl'];
        }

        $read = true; $write=true; $shared = true;
        if(array_key_exists('shareduri',$this->calendarInfo)){
            $uri='shareduri';
            $shared=true;
//            dbg("ACL ICS getACL uri=".vl($this->calendarInfo['uri'])." shareduri=".$this->calendarInfo['shareduri']);
            if($this->calendarInfo['permission']!='write')
                $write=false;
        }else{
//            dbg("ACL ICS NOT getACL shareduri [".vl($this->calendarInfo['uri'])."]");
        }
        $ret = array();

        // The default ACL
/*        if(true){
            $ret[] = array [
                'privilege' => '{DAV:}all',
                'principal' => $this->calendarInfo[$uri],
                'protected' => true,
            ];
		}
*/
        if($read){
            $ret[] = array(
                'privilege' => '{DAV:}read',
                'principal' => $this->calendarInfo[$uri],
                'protected' => true,
            );
        }
        if($write){
            $ret[] = array(
                'privilege' => '{DAV:}write',
                'principal' => $this->calendarInfo[$uri],
                'protected' => true,
            );
        }
        if($shared){
            $ret[] = array [
                'privilege' => '{DAV:}all',
                'principal' => $this->calendarInfo[$uri] . '/calendar-proxy-write',
                'protected' => true,
            ];
            $ret[] = array [
                'privilege' => '{DAV:}read',
                'principal' => $this->calendarInfo[$uri] . '/calendar-proxy-read',
                'protected' => true,
            ];

        }
		return $ret;
    }
    /**
     * Returns the path to real principal
     *
     * @return string
     */
    public function sharedPath($path) {

        if(!array_key_exists('shareduri',$this->calendarInfo)) return $path;
        
        $xpath = str_replace( $this->calendarInfo['shared_by'], $this->calendarInfo['shared_with'], $path );

        dbg("*** UPDATED 1 [$path]->[$xpath]");

        return $xpath;
    }


    public function washFreeBusy($ics, $sharing)
    {
        dbg("WASHING");
        
        $pp = preg_split("/[\/@]+/",$sharing);
        $name = $pp[0];
 
        $lines = explode("\n",$ics);
        $updated = array();
        foreach($lines as $line){
            if(substr($line,0,8)=='SUMMARY:') {$updated[]="SUMMARY: $name busy"; continue;}
            if(substr($line,0,9)=='LOCATION:') {$updated[]="LOCATION:"; continue;}
            if(substr($line,0,12)=='DESCRIPTION:') {$updated[]="DESCRIPTION:"; continue;}
            
            $updated[]=$line;
        }
        $new_ics=implode("\n",$updated);
        dbg("WASHED ".vl($new_ics));
        return $new_ics;
    }

    

}
