dav.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2018 Destailleur Laurent <eldy@users.sourceforge.net>
 * Copyright (C) 2024       Frédéric France             <frederic.france@free.fr>
 *
 * 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 3 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, see <https://www.gnu.org/licenses/>.
 */
 
class CdavLib
{
  private $db;
 
  private $user;
 
  private $langs; // @phpstan-ignore-line
 
  public function __construct($user, $db, $langs)
  {
    $this->user = $user;
    $this->db = $db;
    $this->langs = $langs;
  }
 
  public function getSqlCalEvents($calid, $oid = false, $ouri = false)
  {
    // TODO : replace GROUP_CONCAT by
    $sql = 'SELECT
          a.tms AS lastupd,
          a.*,
          sp.firstname,
          sp.lastname,
          sp.address,
          sp.zip,
          sp.town,
          co.label country_label,
          sp.phone,
          sp.phone_perso,
          sp.phone_mobile,
          s.nom AS soc_nom,
          s.address soc_address,
          s.zip soc_zip,
          s.town soc_town,
          cos.label soc_country_label,
          s.phone soc_phone,
          ac.sourceuid,
          (SELECT GROUP_CONCAT(u.login) FROM '.MAIN_DB_PREFIX.'actioncomm_resources ar
            LEFT OUTER JOIN '.MAIN_DB_PREFIX.'user AS u ON (u.rowid=fk_element)
            WHERE ar.element_type=\'user\' AND fk_actioncomm=a.id) AS other_users
        FROM '.MAIN_DB_PREFIX.'actioncomm AS a';
    $sql .= " LEFT JOIN '.MAIN_DB_PREFIX.'c_country as co ON co.rowid = sp.fk_pays
        LEFT JOIN '.MAIN_DB_PREFIX.'c_country as cos ON cos.rowid = s.fk_pays
        WHERE   a.id IN (SELECT ar.fk_actioncomm FROM '.MAIN_DB_PREFIX.'actioncomm_resources ar WHERE ar.element_type='user' AND ar.fk_element=".((int) $calid).")
            AND a.code IN (SELECT cac.code FROM '.MAIN_DB_PREFIX.'c_actioncomm cac WHERE cac.type <> 'systemauto')
            AND a.entity IN (".getEntity('societe', 1).")";
    // TODO Restrict on external users
    if ($oid !== false) {
      if ($ouri === false) {
        $sql .= ' AND a.id = '.((int) $oid);
      } else {
        $sql .= ' AND (a.id = '.((int) $oid)." OR ac.uuidext = '".$this->db->escape($ouri)."')";
      }
    }
 
    return $sql;
  }
 
  public function toVCalendar($calid, $obj)
  {
    /*$categ = array();
    if($obj->soc_client)
    {
      $nick[] = $obj->soc_code_client;
      $categ[] = $this->langs->transnoentitiesnoconv('Customer');
    }*/
 
    $location = $obj->location;
 
    // contact address
    if (empty($location) && !empty($obj->address)) {
      $location = trim(str_replace(array("\r", "\t", "\n"), ' ', $obj->address));
      $location = trim($location.', '.$obj->zip);
      $location = trim($location.' '.$obj->town);
      $location = trim($location.', '.$obj->country_label);
    }
 
    // contact address
    if (empty($location) && !empty($obj->soc_address)) {
      $location = trim(str_replace(array("\r", "\t", "\n"), ' ', $obj->soc_address));
      $location = trim($location.', '.$obj->soc_zip);
      $location = trim($location.' '.$obj->soc_town);
      $location = trim($location.', '.$obj->soc_country_label);
    }
 
    /*
    $address = explode("\n", $obj->address, 2);
    foreach ($address as $kAddr => $vAddr) {
      $address[$kAddr] = trim(str_replace(array("\r", "\t"), ' ', str_replace("\n", ' | ', trim($vAddr))));
    }
    $address[] = '';
    $address[] = '';
    */
 
    if ($obj->percent == -1 && trim($obj->datep) != '') {
      $type = 'VEVENT';
    } else {
      $type = 'VTODO';
    }
 
    $timezone = date_default_timezone_get();
 
    $caldata = "BEGIN:VCALENDAR\n";
    $caldata .= "VERSION:2.0\n";
    $caldata .= "METHOD:PUBLISH\n";
    $caldata .= "PRODID:-//Dolibarr CDav//FR\n";
    $caldata .= "BEGIN:".$type."\n";
    $caldata .= "CREATED:".gmdate('Ymd\THis', strtotime($obj->datec))."Z\n";
    $caldata .= "LAST-MODIFIED:".gmdate('Ymd\THis', strtotime($obj->lastupd))."Z\n";
    $caldata .= "DTSTAMP:".gmdate('Ymd\THis', strtotime($obj->lastupd))."Z\n";
    if ($obj->sourceuid == '') {
      $caldata .= "UID:".$obj->id.'-ev-'.$calid.'-cal-'.constant('CDAV_URI_KEY')."\n";
    } else {
      $caldata .= "UID:".$obj->sourceuid."\n";
    }
    $caldata .= "SUMMARY:".$obj->label."\n";
    $caldata .= "LOCATION:".$location."\n";
    $caldata .= "PRIORITY:".$obj->priority."\n";
    if ($obj->fulldayevent) {
      $caldata .= "DTSTART;VALUE=DATE:".date('Ymd', strtotime($obj->datep))."\n";
      if ($type == 'VEVENT') {
        if (trim($obj->datep2) != '') {
          $caldata .= "DTEND;VALUE=DATE:".date('Ymd', strtotime($obj->datep2) + 1)."\n";
        } else {
          $caldata .= "DTEND;VALUE=DATE:".date('Ymd', strtotime($obj->datep) + (25 * 3600))."\n";
        }
      } elseif (trim($obj->datep2) != '') {
        $caldata .= "DUE;VALUE=DATE:".date('Ymd', strtotime($obj->datep2) + 1)."\n";
      }
    } else {
      $caldata .= "DTSTART;TZID=".$timezone.":".strtr($obj->datep, array(" "=>"T", ":"=>"", "-"=>""))."\n";
      if ($type == 'VEVENT') {
        if (trim($obj->datep2) != '') {
          $caldata .= "DTEND;TZID=".$timezone.":".strtr($obj->datep2, array(" "=>"T", ":"=>"", "-"=>""))."\n";
        } else {
          $caldata .= "DTEND;TZID=".$timezone.":".strtr($obj->datep, array(" "=>"T", ":"=>"", "-"=>""))."\n";
        }
      } elseif (trim($obj->datep2) != '') {
        $caldata .= "DUE;TZID=".$timezone.":".strtr($obj->datep2, array(" "=>"T", ":"=>"", "-"=>""))."\n";
      }
    }
    $caldata .= "CLASS:PUBLIC\n";
    if ($obj->transparency == 1) {
      $caldata .= "TRANSP:TRANSPARENT\n";
    } else {
      $caldata .= "TRANSP:OPAQUE\n";
    }
 
    if ($type == 'VEVENT') {
      $caldata .= "STATUS:CONFIRMED\n";
    } elseif ($obj->percent == 0) {
      $caldata .= "STATUS:NEEDS-ACTION\n";
    } elseif ($obj->percent == 100) {
      $caldata .= "STATUS:COMPLETED\n";
    } else {
      $caldata .= "STATUS:IN-PROCESS\n";
      $caldata .= "PERCENT-COMPLETE:".$obj->percent."\n";
    }
 
    $caldata .= "DESCRIPTION:";
    $caldata .= strtr($obj->note, array("\n"=>"\\n", "\r"=>""));
    if (!empty($obj->soc_nom)) {
      $caldata .= "\\n*DOLIBARR-SOC: ".$obj->soc_nom;
    }
    if (!empty($obj->soc_phone)) {
      $caldata .= "\\n*DOLIBARR-SOC-TEL: ".$obj->soc_phone;
    }
    if (!empty($obj->firstname) || !empty($obj->lastname)) {
      $caldata .= "\\n*DOLIBARR-CTC: ".trim($obj->firstname.' '.$obj->lastname);
    }
    if (!empty($obj->phone) || !empty($obj->phone_perso) || !empty($obj->phone_mobile)) {
      $caldata .= "\\n*DOLIBARR-CTC-TEL: ".trim($obj->phone.' '.$obj->phone_perso.' '.$obj->phone_mobile);
    }
    if (strpos($obj->other_users, ',')) { // several
      $caldata .= "\\n*DOLIBARR-USR: ".$obj->other_users;
    }
    $caldata .= "\n";
 
    $caldata .= "END:".$type."\n";
    $caldata .= "END:VCALENDAR\n";
 
    return $caldata;
  }
 
  public function getFullCalendarObjects($calendarId, $bCalendarData)
  {
    $calid = (int) $calendarId;
    $calevents = array();
 
    if (!$this->user->rights->agenda->myactions->read) {
      return $calevents;
    }
 
    if ($calid != $this->user->id && (!isset($this->user->rights->agenda->allactions->read) || !$this->user->rights->agenda->allactions->read)) {
      return $calevents;
    }
 
    $sql = $this->getSqlCalEvents($calid);
 
    $result = $this->db->query($sql);
 
    if ($result) {
      while ($obj = $this->db->fetch_object($result)) {
        $calendardata = $this->toVCalendar($calid, $obj);
 
        if ($bCalendarData) {
          $calevents[] = array(
            'calendardata' => $calendardata,
            'uri' => $obj->id.'-ev-'.constant('CDAV_URI_KEY'),
            'lastmodified' => strtotime($obj->lastupd),
            'etag' => '"'.md5($calendardata).'"',
            'calendarid'   => $calendarId,
            'size' => strlen($calendardata),
            'component' => strpos($calendardata, 'BEGIN:VEVENT') > 0 ? 'vevent' : 'vtodo',
          );
        } else {
          $calevents[] = array(
            // 'calendardata' => $calendardata,  not necessary because etag+size are present
            'uri' => $obj->id.'-ev-'.constant('CDAV_URI_KEY'),
            'lastmodified' => strtotime($obj->lastupd),
            'etag' => '"'.md5($calendardata).'"',
            'calendarid'   => $calendarId,
            'size' => strlen($calendardata),
            'component' => strpos($calendardata, 'BEGIN:VEVENT') > 0 ? 'vevent' : 'vtodo',
          );
        }
      }
    }
    return $calevents;
  }
}