724 lines
23 KiB
PHP
724 lines
23 KiB
PHP
<?php
|
|
/* Copyright (C) 2008-2024 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2024 Charlene Benke <charlene@patas-monkey.com>
|
|
*
|
|
* 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/>.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/public/fichinter/calendarexport.php
|
|
* \ingroup fichinter
|
|
* \brief Page to export fichinter agenda into a vcal, ical or rss
|
|
* http://127.0.0.1/dolibarr/public/fichinter/calendarexport.php?format=vcal&exportkey=cle
|
|
* http://127.0.0.1/dolibarr/public/fichinter/calendarexport.php?format=ical&type=event&exportkey=cle
|
|
* http://127.0.0.1/dolibarr/public/fichinter/calendarexport.php?format=rss&exportkey=cle
|
|
* Other parameters into url are:
|
|
* ¬olderthan=99
|
|
* &year=2015
|
|
* &limit=1000
|
|
* &id=..., &idfrom=..., &idto=...
|
|
*/
|
|
|
|
if (!defined('NOTOKENRENEWAL')) {
|
|
define('NOTOKENRENEWAL', '1');
|
|
}
|
|
if (!defined('NOREQUIREMENU')) {
|
|
define('NOREQUIREMENU', '1'); // If there is no menu to show
|
|
}
|
|
if (!defined('NOREQUIREHTML')) {
|
|
define('NOREQUIREHTML', '1'); // If we don't need to load the html.form.class.php
|
|
}
|
|
if (!defined('NOREQUIREAJAX')) {
|
|
define('NOREQUIREAJAX', '1');
|
|
}
|
|
if (!defined('NOLOGIN')) {
|
|
define("NOLOGIN", 1); // This means this output page does not require to be logged.
|
|
}
|
|
if (!defined('NOCSRFCHECK')) {
|
|
define("NOCSRFCHECK", 1); // We accept to go on this page from external web site.
|
|
}
|
|
if (!defined('NOIPCHECK')) {
|
|
define('NOIPCHECK', '1'); // Do not check IP defined into conf $dolibarr_main_restrict_ip
|
|
}
|
|
|
|
|
|
// For MultiCompany module.
|
|
// Do not use GETPOST here, function is not defined and define must be done before including main.inc.php
|
|
// Because 2 entities can have the same ref
|
|
$entity = (!empty($_GET['entity']) ? (int) $_GET['entity'] : (!empty($_POST['entity']) ? (int) $_POST['entity'] : 1));
|
|
if (is_numeric($entity)) {
|
|
define("DOLENTITY", $entity);
|
|
}
|
|
|
|
// Load Dolibarr environment
|
|
require '../../main.inc.php';
|
|
require_once DOL_DOCUMENT_ROOT.'/fichinter/class/fichinter.class.php';
|
|
|
|
$fichinterStatic = new Fichinter($db);
|
|
|
|
// Not older than
|
|
if (!getDolGlobalString('MAIN_FICHINTER_EXPORT_PAST_DELAY')) {
|
|
$conf->global->MAIN_FICHINTER_EXPORT_PAST_DELAY = 100; // default limit
|
|
}
|
|
|
|
// Define format, type and filter
|
|
$format = 'ical';
|
|
$type = 'event';
|
|
if (GETPOST("format", 'alpha')) {
|
|
$format = GETPOST("format", 'alpha');
|
|
}
|
|
if (GETPOST("type", 'alpha')) {
|
|
$type = GETPOST("type", 'alpha');
|
|
}
|
|
|
|
$filters = array();
|
|
if (GETPOSTINT("year")) {
|
|
$filters['year'] = GETPOSTINT("year");
|
|
}
|
|
if (GETPOSTINT("id")) {
|
|
$filters['id'] = GETPOSTINT("id");
|
|
}
|
|
if (GETPOSTINT("idfrom")) {
|
|
$filters['idfrom'] = GETPOSTINT("idfrom");
|
|
}
|
|
if (GETPOSTINT("idto")) {
|
|
$filters['idto'] = GETPOSTINT("idto");
|
|
}
|
|
if (GETPOST("project", 'alpha')) {
|
|
$filters['project'] = GETPOST("project", 'alpha');
|
|
}
|
|
if (GETPOST("logina", 'alpha')) {
|
|
$filters['logina'] = GETPOST("logina", 'alpha');
|
|
}
|
|
if (GETPOST("logint", 'alpha')) {
|
|
$filters['logint'] = GETPOST("logint", 'alpha');
|
|
}
|
|
|
|
if (GETPOSTINT("notolderthan")) {
|
|
$filters['notolderthan'] = GETPOSTINT("notolderthan");
|
|
} else {
|
|
$filters['notolderthan'] = getDolGlobalString('MAIN_FICHINTER_EXPORT_PAST_DELAY', 100);
|
|
}
|
|
if (GETPOSTINT("limit")) {
|
|
$filters['limit'] = GETPOSTINT("limit");
|
|
} else {
|
|
$filters['limit'] = 1000;
|
|
}
|
|
if (GETPOST("module", 'alpha')) {
|
|
$filters['module'] = GETPOST("module", 'alpha');
|
|
}
|
|
if (GETPOST("status", "intcomma")) {
|
|
$filters['status'] = GETPOST("status", "intcomma");
|
|
}
|
|
|
|
// Security check
|
|
if (!isModEnabled('intervention')) {
|
|
httponly_accessforbidden('Module fichinter not enabled');
|
|
}
|
|
|
|
|
|
/*
|
|
* View
|
|
*/
|
|
|
|
// Check config
|
|
if (!getDolGlobalString('MAIN_FICHINTER_XCAL_EXPORTKEY')) {
|
|
top_httphead();
|
|
|
|
print '<html><title>Export fichinter cal</title><body>';
|
|
print '<div class="error">Module Agenda was not configured properly.</div>';
|
|
print '</body></html>';
|
|
exit;
|
|
}
|
|
|
|
// Initialize technical object to manage hooks. Note that conf->hooks_modules contains array of hooks
|
|
$hookmanager->initHooks(array('fichinterexport'));
|
|
|
|
// Note that $action and $object may have been modified by some
|
|
$reshook = $hookmanager->executeHooks('doActions', $filters);
|
|
if ($reshook < 0) {
|
|
top_httphead();
|
|
|
|
print '<html><title>Export fichinter cal</title><body>';
|
|
if (!empty($hookmanager->errors) && is_array($hookmanager->errors)) {
|
|
print '<div class="error">'.implode('<br>', $hookmanager->errors).'</div>';
|
|
} else {
|
|
print '<div class="error">'.$hookmanager->error.'</div>';
|
|
}
|
|
print '</body></html>';
|
|
} elseif (empty($reshook)) {
|
|
// Check exportkey
|
|
if (!GETPOST("exportkey") || getDolGlobalString('MAIN_FICHINTER_XCAL_EXPORTKEY') != GETPOST("exportkey")) {
|
|
top_httphead();
|
|
|
|
print '<html><title>Export fichinter cal</title><body>';
|
|
print '<div class="error">Bad value for key.</div>';
|
|
print '</body></html>';
|
|
exit;
|
|
}
|
|
}
|
|
|
|
// Define filename with prefix on filters predica (each predica set must have on cache file)
|
|
$shortfilename = 'dolibarrcalendar';
|
|
$filename = $shortfilename;
|
|
// Complete long filename
|
|
foreach ($filters as $key => $value) {
|
|
//if ($key == 'notolderthan')
|
|
// $filename.='-notolderthan'.$value; This filter key is already added before and does not need to be in filename
|
|
if ($key == 'year') {
|
|
$filename .= '-year'.$value;
|
|
}
|
|
if ($key == 'id') {
|
|
$filename .= '-id'.$value;
|
|
}
|
|
if ($key == 'idfrom') {
|
|
$filename .= '-idfrom'.$value;
|
|
}
|
|
if ($key == 'idto') {
|
|
$filename .= '-idto'.$value;
|
|
}
|
|
if ($key == 'project') {
|
|
$filename .= '-project'.$value;
|
|
$shortfilename .= '-project'.$value;
|
|
}
|
|
if ($key == 'logina') {
|
|
$filename .= '-logina'.$value; // Author
|
|
}
|
|
if ($key == 'logint') {
|
|
$filename .= '-logint'.$value; // Assigned to
|
|
}
|
|
|
|
if ($key == 'module') {
|
|
$filename .= '-module'.$value;
|
|
if ($value == 'project@eventorganization') {
|
|
$shortfilename .= '-project';
|
|
} elseif ($value == 'conforbooth@eventorganization') {
|
|
$shortfilename .= '-conforbooth';
|
|
}
|
|
}
|
|
if ($key == 'status') {
|
|
$filename .= '-status'.$value;
|
|
}
|
|
}
|
|
// Add extension
|
|
if ($format == 'vcal') {
|
|
$shortfilename .= '.vcs';
|
|
$filename .= '.vcs';
|
|
}
|
|
if ($format == 'ical') {
|
|
$shortfilename .= '.ics';
|
|
$filename .= '.ics';
|
|
}
|
|
if ($format == 'rss') {
|
|
$shortfilename .= '.rss';
|
|
$filename .= '.rss';
|
|
}
|
|
if ($shortfilename == 'dolibarrcalendar') {
|
|
$langs->load("errors");
|
|
|
|
top_httphead();
|
|
|
|
print '<html><title>Export fichinter cal</title><body>';
|
|
print '<div class="error">'.$langs->trans("ErrorWrongValueForParameterX", 'format').'</div>';
|
|
print '</body></html>';
|
|
exit;
|
|
}
|
|
|
|
$fichinter = new Fichinter($db);
|
|
|
|
$cachedelay = 0;
|
|
if (getDolGlobalString('MAIN_FICHINTER_EXPORT_CACHE')) {
|
|
$cachedelay = getDolGlobalString('MAIN_FICHINTER_EXPORT_CACHE');
|
|
}
|
|
|
|
$exportholidays = GETPOSTINT('includeholidays');
|
|
|
|
// Build file
|
|
if ($format == 'ical' || $format == 'vcal') {
|
|
$result = build_exportfile($format, $type, $cachedelay, $filename, $filters);
|
|
if ($result >= 0) {
|
|
$attachment = true;
|
|
if (GETPOSTISSET("attachment")) {
|
|
$attachment = GETPOST("attachment");
|
|
}
|
|
//$attachment = false;
|
|
$contenttype = 'text/calendar';
|
|
if (GETPOSTISSET("contenttype")) {
|
|
$contenttype = GETPOST("contenttype");
|
|
}
|
|
//$contenttype='text/plain';
|
|
$outputencoding = 'UTF-8';
|
|
|
|
if ($contenttype) {
|
|
header('Content-Type: '.$contenttype.($outputencoding ? '; charset='.$outputencoding : ''));
|
|
}
|
|
if ($attachment) {
|
|
header('Content-Disposition: attachment; filename="'.$shortfilename.'"');
|
|
}
|
|
|
|
if ($cachedelay) {
|
|
header('Cache-Control: max-age='.$cachedelay.', private, must-revalidate');
|
|
} else {
|
|
header('Cache-Control: private, must-revalidate');
|
|
}
|
|
|
|
// By default, frames allowed only if on same domain (stop some XSS attacks)
|
|
header("X-Frame-Options: SAMEORIGIN");
|
|
|
|
// Clean parameters
|
|
$outputfile = $conf->agenda->dir_temp.'/'.$filename;
|
|
$result = readfile($outputfile);
|
|
if (!$result) {
|
|
print 'File '.$outputfile.' was empty.';
|
|
}
|
|
|
|
//header("Location: ".DOL_URL_ROOT.'/document.php?modulepart=agenda&file='.urlencode($filename));
|
|
exit;
|
|
} else {
|
|
top_httphead();
|
|
|
|
print 'Error '.$fichinterStatic->error;
|
|
|
|
exit;
|
|
}
|
|
}
|
|
|
|
if ($format == 'rss') {
|
|
$result = build_exportfile($format, $type, $cachedelay, $filename, $filters);
|
|
if ($result >= 0) {
|
|
$attachment = false;
|
|
if (GETPOSTISSET("attachment")) {
|
|
$attachment = GETPOST("attachment");
|
|
}
|
|
//$attachment = false;
|
|
$contenttype = 'application/rss+xml';
|
|
if (GETPOSTISSET("contenttype")) {
|
|
$contenttype = GETPOST("contenttype");
|
|
}
|
|
//$contenttype='text/plain';
|
|
$outputencoding = 'UTF-8';
|
|
|
|
if ($contenttype) {
|
|
header('Content-Type: '.$contenttype.($outputencoding ? '; charset='.$outputencoding : ''));
|
|
}
|
|
if ($attachment) {
|
|
header('Content-Disposition: attachment; filename="'.$filename.'"');
|
|
} else {
|
|
header('Content-Disposition: inline; filename="'.$filename.'"');
|
|
}
|
|
|
|
// Ajout directives pour resoudre bug IE
|
|
//header('Cache-Control: Public, must-revalidate');
|
|
//header('Pragma: public');
|
|
if ($cachedelay) {
|
|
header('Cache-Control: max-age='.$cachedelay.', private, must-revalidate');
|
|
} else {
|
|
header('Cache-Control: private, must-revalidate');
|
|
}
|
|
|
|
// By default, frames allowed only if on same domain (stop some XSS attacks)
|
|
header("X-Frame-Options: SAMEORIGIN");
|
|
|
|
// Clean parameters
|
|
$outputfile = $conf->agenda->dir_temp.'/'.$filename;
|
|
$result = readfile($outputfile);
|
|
if (!$result) {
|
|
print 'File '.$outputfile.' was empty.';
|
|
}
|
|
|
|
// header("Location: ".DOL_URL_ROOT.'/document.php?modulepart=agenda&file='.urlencode($filename));
|
|
exit;
|
|
} else {
|
|
top_httphead();
|
|
|
|
print 'Error '.$fichinterStatic->error;
|
|
|
|
exit;
|
|
}
|
|
}
|
|
|
|
|
|
top_httphead();
|
|
|
|
print '<html><title>Export fichinter cal</title><body>';
|
|
print '<div class="error">'.$fichinterStatic->error.'</div>';
|
|
print '</body></html>';
|
|
|
|
|
|
|
|
// phpcs:disable PEAR.NamingConventions.ValidFunctionName.ScopeNotCamelCaps
|
|
/**
|
|
* Export events from database into a cal file.
|
|
*
|
|
* @param string $format The format of the export 'vcal', 'ical/ics' or 'rss'
|
|
* @param string $type The type of the export 'event' or 'journal'
|
|
* @param integer $cachedelay Do not rebuild file if date older than cachedelay seconds
|
|
* @param string $filename The name for the exported file.
|
|
* @param array<string,int|string> $filters Array of filters.
|
|
* @return int<-1,1> -1 = error on build export file, 0 = export okay
|
|
*/
|
|
function build_exportfile($format, $type, $cachedelay, $filename, $filters)
|
|
{
|
|
|
|
// quelques filtres possible au nivau du tableau $filters
|
|
// logina : user login who is create interventional (author)
|
|
// logini : user login who make the intenventional
|
|
// loginr : user login who is responsible of interventional
|
|
|
|
global $hookmanager;
|
|
global $db;
|
|
|
|
// phpcs:enable
|
|
global $conf, $langs, $dolibarr_main_url_root, $mysoc;
|
|
|
|
require_once DOL_DOCUMENT_ROOT."/core/lib/xcal.lib.php";
|
|
require_once DOL_DOCUMENT_ROOT."/core/lib/date.lib.php";
|
|
require_once DOL_DOCUMENT_ROOT."/core/lib/files.lib.php";
|
|
|
|
dol_syslog("build_exportfile Build export file format=".$format.", type=".$type.", cachedelay=".$cachedelay.", filename=".$filename.", filters size=".count($filters), LOG_DEBUG);
|
|
|
|
// Check parameters
|
|
if (empty($format)) {
|
|
return -1;
|
|
}
|
|
|
|
// Clean parameters
|
|
if (!$filename) {
|
|
$extension = 'vcs';
|
|
if ($format == 'ical') {
|
|
$extension = 'ics';
|
|
}
|
|
$filename = $format.'.'.$extension;
|
|
}
|
|
|
|
// Create dir and define output file (definitive and temporary)
|
|
$result = dol_mkdir($conf->agenda->dir_temp);
|
|
$outputfile = $conf->agenda->dir_temp.'/'.$filename;
|
|
|
|
$result = 0;
|
|
|
|
$buildfile = true;
|
|
$login = '';
|
|
$logina = '';
|
|
$logini = '';
|
|
$loginr = '';
|
|
|
|
$eventorganization = '';
|
|
|
|
$now = dol_now();
|
|
|
|
if ($cachedelay) {
|
|
$nowgmt = dol_now();
|
|
include_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php';
|
|
if (dol_filemtime($outputfile) > ($nowgmt - $cachedelay)) {
|
|
dol_syslog("build_exportfile file ".$outputfile." is not older than now - cachedelay (".$nowgmt." - ".$cachedelay."). Build is canceled");
|
|
$buildfile = false;
|
|
}
|
|
}
|
|
|
|
if ($buildfile) {
|
|
// Build event array
|
|
$eventarray = array();
|
|
|
|
$sql = "SELECT f.rowid,";
|
|
$sql .= " fd.date,"; // on récupère la date et la durée sur le détail d'inter pour avoir aussi l'heure
|
|
$sql .= " f.datee,"; // End ne sera pas utilisée
|
|
$sql .= " fd.duree,"; // durée de l'intervention
|
|
$sql .= " f.datec, f.tms as datem,";
|
|
$sql .= " f.ref, f.ref_client, fd.description, f.note_private, f.note_public,";
|
|
$sql .= " f.fk_soc,";
|
|
$sql .= " f.fk_user_author, f.fk_user_modif,";
|
|
$sql .= " f.fk_user_valid,";
|
|
$sql .= " u.firstname, u.lastname, u.email,";
|
|
$sql .= " p.ref as ref_project, c.ref as ref_contract,";
|
|
$sql .= " s.nom as socname, f.fk_statut";
|
|
|
|
$sql .= " FROM ".MAIN_DB_PREFIX."fichinter as f";
|
|
$sql .= " INNER JOIN ".MAIN_DB_PREFIX."fichinterdet as fd ON f.rowid = fd.fk_fichinter";
|
|
$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."user as u on u.rowid = f.fk_user_author";
|
|
|
|
$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s on s.rowid = f.fk_soc";
|
|
$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."projet as p on p.rowid = f.fk_projet";
|
|
$sql .= " LEFT JOIN ".MAIN_DB_PREFIX."contrat as c on c.rowid = f.fk_contrat";
|
|
|
|
$parameters = array('filters' => $filters);
|
|
// Note that $action and $object may have been modified by hook
|
|
$reshook = $hookmanager->executeHooks('printFieldListFrom', $parameters);
|
|
$sql .= $hookmanager->resPrint;
|
|
|
|
$sql .= " WHERE f.entity IN (".getEntity('fichinter').")";
|
|
|
|
foreach ($filters as $key => $value) {
|
|
if ($key == 'notolderthan' && $value != '') {
|
|
$sql .= " AND fd.date >= '".$db->idate($now - ($value * 24 * 60 * 60))."'";
|
|
}
|
|
if ($key == 'year') {
|
|
$sql .= " AND fd.date BETWEEN '".$db->idate(dol_get_first_day($value, 1))."'";
|
|
$sql .= " AND '".$db->idate(dol_get_last_day($value, 12))."'";
|
|
}
|
|
if ($key == 'id') {
|
|
$sql .= " AND f.rowid = ".(is_numeric($value) ? $value : 0);
|
|
}
|
|
if ($key == 'idfrom') {
|
|
$sql .= " AND f.rowid >= ".(is_numeric($value) ? $value : 0);
|
|
}
|
|
if ($key == 'idto') {
|
|
$sql .= " AND f.rowid <= ".(is_numeric($value) ? $value : 0);
|
|
}
|
|
if ($key == 'project') {
|
|
$sql .= " AND f.fk_project = ".(is_numeric($value) ? $value : 0);
|
|
}
|
|
if ($key == 'contract') {
|
|
$sql .= " AND f.fk_contract = ".(is_numeric($value) ? $value : 0);
|
|
}
|
|
|
|
if ($key == 'logina') {
|
|
$logina = $value;
|
|
$condition = '=';
|
|
if (preg_match('/^!/', $logina)) {
|
|
$logina = preg_replace('/^!/', '', $logina);
|
|
$condition = '<>';
|
|
}
|
|
$userforfilter = new User($db);
|
|
$result = $userforfilter->fetch(0, $logina);
|
|
if ($result > 0) {
|
|
$sql .= " AND a.fk_user_author ".$condition." ".$userforfilter->id;
|
|
} elseif ($result < 0 || $condition == '=') {
|
|
$sql .= " AND a.fk_user_author = 0";
|
|
}
|
|
}
|
|
if ($key == 'logini') {
|
|
$logini = $value;
|
|
$condition = '=';
|
|
if (preg_match('/^!/', $logini)) {
|
|
$logini = preg_replace('/^!/', '', $logini);
|
|
$condition = '<>';
|
|
}
|
|
$userforfilter = new User($db);
|
|
$result = $userforfilter->fetch(0, $logini);
|
|
$sql .= " AND EXISTS (SELECT ec.rowid FROM ".MAIN_DB_PREFIX."element_contact as ec";
|
|
$sql .= " WHERE ec.element_id = f.rowid";
|
|
$sql .= " AND ec.fk_c_type_contact = 26";
|
|
if ($result > 0) {
|
|
$sql .= " AND ec.fk_socpeople = ".((int) $userforfilter->id);
|
|
} elseif ($result < 0 || $condition == '=') {
|
|
$sql .= " AND ec.fk_socpeople = 0";
|
|
}
|
|
$sql .= ")";
|
|
}
|
|
if ($key == 'loginr') {
|
|
$loginr = $value;
|
|
$condition = '=';
|
|
if (preg_match('/^!/', $loginr)) {
|
|
$loginr = preg_replace('/^!/', '', $loginr);
|
|
$condition = '<>';
|
|
}
|
|
$userforfilter = new User($db);
|
|
$result = $userforfilter->fetch(0, $loginr);
|
|
$sql .= " AND EXISTS (SELECT ecr.rowid FROM ".MAIN_DB_PREFIX."element_contact as ecr";
|
|
$sql .= " WHERE ecr.element_id = f.rowid";
|
|
$sql .= " WHERE AND ecr.fk_c_type_contact = 27";
|
|
if ($result > 0) {
|
|
$sql .= " AND ecr.fk_socpeople = ".((int) $userforfilter->id);
|
|
} elseif ($result < 0 || $condition == '=') {
|
|
$sql .= " AND ecr.fk_socpeople = 0";
|
|
}
|
|
$sql .= ")";
|
|
}
|
|
|
|
if ($key == 'status') {
|
|
$sql .= " AND f.fk_statut = ".((int) $value);
|
|
}
|
|
}
|
|
|
|
// To exclude corrupted events and avoid errors in lightning/sunbird import
|
|
$sql .= " AND f.dateo IS NOT NULL";
|
|
|
|
$parameters = array('filters' => $filters);
|
|
// Note that $action and $object may have been modified by hook
|
|
$reshook = $hookmanager->executeHooks('printFieldListWhere', $parameters);
|
|
$sql .= $hookmanager->resPrint;
|
|
|
|
$sql .= " ORDER by fd.date";
|
|
|
|
|
|
if (!empty($filters['limit'])) {
|
|
$sql .= $db->plimit((int) $filters['limit']);
|
|
}
|
|
|
|
// print $sql;exit;
|
|
|
|
dol_syslog("build_exportfile select event(s)", LOG_DEBUG);
|
|
|
|
$resql = $db->query($sql);
|
|
if ($resql) {
|
|
$diff = 0;
|
|
while ($obj = $db->fetch_object($resql)) {
|
|
$qualified = true;
|
|
|
|
// 'eid','startdate','duration','enddate','title','summary','category','email','url','desc','author'
|
|
$event = array();
|
|
$event['uid'] = 'dolibarragenda-'.$db->database_name.'-'.$obj->id."@".$_SERVER["SERVER_NAME"];
|
|
$event['type'] = $type;
|
|
|
|
$datestart = $db->jdate($obj->date) - ((int) getDolGlobalString('MAIN_FICHINTER_EXPORT_FIX_TZ', 0) * 3600);
|
|
|
|
// fix for -> Warning: A non-numeric value encountered
|
|
// if (is_numeric($db->jdate($obj->datee))) {
|
|
// $dateend = $db->jdate($obj->datee) - ((int) getDolGlobalString('MAIN_FICHINTER_EXPORT_FIX_TZ', 0) * 3600);
|
|
// } else {
|
|
// // use start date as fall-back to avoid pb with empty end date on ICS readers
|
|
// $dateend = $datestart;
|
|
// }
|
|
|
|
$duration = $obj->duree;
|
|
$event['location'] = ($obj->socname ? $obj->socname : "");
|
|
$event['summary'] = $obj->ref." - ". $obj->description;
|
|
if ($obj->ref_client)
|
|
$event['summary'].= " (".$obj->ref_client.")";
|
|
|
|
$event['desc'] = $obj->description;
|
|
|
|
if ($obj->ref_project)
|
|
$event['desc'] .= " - ".$obj->ref_project;
|
|
|
|
if ($obj->ref_contract)
|
|
$event['desc'] .= " - ".$obj->ref_contract;
|
|
|
|
if ($obj->note_public)
|
|
$event['desc'].= " - ".$obj->note_public;
|
|
|
|
$event['startdate'] = $datestart;
|
|
$event['enddate'] = ''; // $dateend; // Not required with type 'journal'
|
|
$event['duration'] = $duration; // Not required with type 'journal'
|
|
$event['author'] = dolGetFirstLastname($obj->firstname, $obj->lastname);
|
|
|
|
// OPAQUE (busy) or TRANSPARENT (not busy)
|
|
//$event['transparency'] = (($obj->transparency > 0) ? 'OPAQUE' : 'TRANSPARENT');
|
|
//$event['category'] = $obj->type_label;
|
|
$event['email'] = $obj->email;
|
|
|
|
// Public URL of event
|
|
if ($eventorganization != '') {
|
|
$link_subscription = $dolibarr_main_url_root.'/public/eventorganization/attendee_new.php?id='.((int) $obj->id).'&type=global&noregistration=1';
|
|
$encodedsecurekey = dol_hash(getDolGlobalString('EVENTORGANIZATION_SECUREKEY').'conferenceorbooth'.((int) $obj->id), 'md5');
|
|
$link_subscription .= '&securekey='.urlencode($encodedsecurekey);
|
|
|
|
//$event['url'] = $link_subscription;
|
|
}
|
|
|
|
$event['created'] = $db->jdate($obj->datec) - ((int) getDolGlobalString('MAIN_FICHINTER_EXPORT_FIX_TZ', 0) * 3600);
|
|
$event['modified'] = $db->jdate($obj->datem) - ((int) getDolGlobalString('MAIN_FICHINTER_EXPORT_FIX_TZ', 0) * 3600);
|
|
// $event['num_vote'] = $this->num_vote;
|
|
// $event['event_paid'] = $this->event_paid;
|
|
$event['status'] = $obj->fk_statut;
|
|
|
|
// // TODO: find a way to call "$this->fetch_userassigned();" without override "$this" properties
|
|
// $this->id = $obj->rowid;
|
|
// $this->fetch_userassigned(false);
|
|
|
|
// $assignedUserArray = array();
|
|
|
|
// foreach ($this->userassigned as $key => $value) {
|
|
// $assignedUser = new User($db);
|
|
// $assignedUser->fetch($value['id']);
|
|
|
|
// $assignedUserArray[$key] = $assignedUser;
|
|
// }
|
|
|
|
// $event['assignedUsers'] = $assignedUserArray;
|
|
|
|
if ($qualified && $datestart) {
|
|
$eventarray[] = $event;
|
|
}
|
|
$diff++;
|
|
}
|
|
|
|
$parameters = array('filters' => $filters, 'eventarray' => &$eventarray);
|
|
// Note that $action and $object may have been modified by hook
|
|
$reshook = $hookmanager->executeHooks('addMoreEventsExport', $parameters);
|
|
if ($reshook > 0) {
|
|
$eventarray = $hookmanager->resArray;
|
|
}
|
|
} else {
|
|
print $db->lasterror();
|
|
return -1;
|
|
}
|
|
|
|
$langs->load("agenda");
|
|
|
|
// Define title and desc
|
|
$title = '';
|
|
$more = '';
|
|
if ($login) {
|
|
$more = $langs->transnoentities("User").' '.$login;
|
|
}
|
|
if ($logina) {
|
|
$more = $langs->transnoentities("ActionsAskedBy").' '.$logina;
|
|
}
|
|
if ($logini) {
|
|
$more = $langs->transnoentities("ActionsToDoBy").' '.$logini;
|
|
}
|
|
if ($eventorganization) {
|
|
$langs->load("eventorganization");
|
|
$title = $langs->transnoentities("OrganizedEvent").(empty($eventarray[0]['label']) ? '' : ' '.$eventarray[0]['label']);
|
|
$more = 'ICS file - '.$langs->transnoentities("OrganizedEvent").(empty($eventarray[0]['label']) ? '' : ' '.$eventarray[0]['label']);
|
|
}
|
|
if ($more) {
|
|
if (empty($title)) {
|
|
$title = 'Dolibarr actions '.$mysoc->name.' - '.$more;
|
|
}
|
|
$desc = $more;
|
|
$desc .= ' ('.$mysoc->name.' - built by Dolibarr)';
|
|
} else {
|
|
if (empty($title)) {
|
|
$title = 'Dolibarr actions '.$mysoc->name;
|
|
}
|
|
$desc = $langs->transnoentities('ListOfActions');
|
|
$desc .= ' ('.$mysoc->name.' - built by Dolibarr)';
|
|
}
|
|
|
|
// Create temp file
|
|
// Temporary file (allow call of function by different threads
|
|
$outputfiletmp = tempnam($conf->fichinter->dir_temp, 'tmp');
|
|
dolChmod($outputfiletmp);
|
|
|
|
// Write file
|
|
if ($format == 'vcal') {
|
|
$result = build_calfile($format, $title, $desc, $eventarray, $outputfiletmp);
|
|
} elseif ($format == 'ical') {
|
|
$result = build_calfile($format, $title, $desc, $eventarray, $outputfiletmp);
|
|
} elseif ($format == 'rss') {
|
|
$result = build_rssfile($format, $title, $desc, $eventarray, $outputfiletmp);
|
|
}
|
|
|
|
if ($result >= 0) {
|
|
if (dol_move($outputfiletmp, $outputfile, 0, 1, 0, 0)) {
|
|
$result = 1;
|
|
} else {
|
|
$error = 'Failed to rename '.$outputfiletmp.' into '.$outputfile;
|
|
dol_syslog("build_exportfile ".$error, LOG_ERR);
|
|
dol_delete_file($outputfiletmp, 0, 1);
|
|
$result = -1;
|
|
}
|
|
} else {
|
|
dol_syslog("build_exportfile build_xxxfile function fails to for format=".$format." outputfiletmp=".$outputfile, LOG_ERR);
|
|
dol_delete_file($outputfiletmp, 0, 1);
|
|
$langs->load("errors");
|
|
$error = $langs->trans("ErrorFailToCreateFile", $outputfile);
|
|
}
|
|
}
|
|
return $result;
|
|
}
|