datapolicy.class.php

Go to the documentation of this file.

<?php
/* Copyright (C) 2018 Nicolas ZABOURI <info@inovea-conseil.com>
 * 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/>.
 */
 
include_once DOL_DOCUMENT_ROOT.'/contact/class/contact.class.php';
include_once DOL_DOCUMENT_ROOT.'/societe/class/societe.class.php';
include_once DOL_DOCUMENT_ROOT.'/adherents/class/adherent.class.php';
include_once DOL_DOCUMENT_ROOT.'/core/lib/security.lib.php';
 
 
class DataPolicy
{
  public $db;
 
  public $error;
 
 
  public function __construct($db)
  {
    $this->db = $db;
  }
 
  public function getAllContactNotInformed()
  {
    global $langs, $conf, $db, $user;
 
    $langs->load("companies");
 
    $sql = "SELECT c.rowid";
    $sql .= " FROM ".MAIN_DB_PREFIX."socpeople as c";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe as s ON c.fk_soc = s.rowid";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."socpeople_extrafields as spe ON spe.fk_object = c.rowid";
    $sql .= " WHERE (c.statut=1 AND c.no_email=0 AND (spe.datapolicy_consentement=0 OR spe.datapolicy_consentement IS NULL) AND (spe.datapolicy_opposition_traitement=0 OR spe.datapolicy_opposition_traitement IS NULL) AND (spe.datapolicy_opposition_prospection=0 OR spe.datapolicy_opposition_prospection IS NULL))";
    $sql .= " AND spe.datapolicy_send IS NULL";
    $sql .= " AND c.entity=".$conf->entity;
    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);
      $i = 0;
      while ($i < $num) {
        $obj = $this->db->fetch_object($resql);
        $contact = new Contact($db);
        $contact->fetch($obj->rowid);
 
        DataPolicy::sendMailDataPolicyContact($contact);
        $i++;
      }
    } else {
      $this->error = $this->db->error();
      return -1;
    }
 
    return 1;
  }
 
  public function getAllCompaniesNotInformed()
  {
    global $langs, $conf, $db, $user;
 
    $langs->load("companies");
 
    $sql = "SELECT s.rowid";
    $sql .= " FROM ".MAIN_DB_PREFIX."societe as s";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."societe_extrafields as se ON se.fk_object = s.rowid";
    $sql .= " WHERE s.statut=0 AND (se.datapolicy_consentement=0 OR se.datapolicy_consentement IS NULL) AND (se.datapolicy_opposition_traitement=0 OR se.datapolicy_opposition_traitement IS NULL) AND (se.datapolicy_opposition_prospection=0 OR se.datapolicy_opposition_prospection IS NULL)";
    $sql .= " AND se.datapolicy_send IS NULL";
    $sql .= " AND s.entity=".$conf->entity;
    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);
      $i = 0;
      while ($i < $num) {
        $obj = $this->db->fetch_object($resql);
        $societe = new Societe($db);
        $societe->fetch($obj->rowid);
 
        DataPolicy::sendMailDataPolicyCompany($societe);
        $i++;
      }
    } else {
      $this->error = $this->db->error();
      return -1;
    }
 
    return 1;
  }
 
  public function getAllAdherentsNotInformed()
  {
    global $langs, $conf, $db, $user;
 
    $langs->load("adherent");
 
    $sql = "SELECT a.rowid";
    $sql .= " FROM ".MAIN_DB_PREFIX."adherent as a";
    $sql .= " LEFT JOIN ".MAIN_DB_PREFIX."adherent_extrafields as ae ON ae.fk_object = a.rowid";
    $sql .= " WHERE a.statut=0 AND (ae.datapolicy_consentement=0 OR ae.datapolicy_consentement IS NULL) AND (ae.datapolicy_opposition_traitement=0 OR ae.datapolicy_opposition_traitement IS NULL) AND (ae.datapolicy_opposition_prospection=0 OR ae.datapolicy_opposition_prospection IS NULL)";
    $sql .= " AND ae.datapolicy_send IS NULL";
    $sql .= " AND a.entity=".$conf->entity;
    $resql = $this->db->query($sql);
    if ($resql) {
      $num = $this->db->num_rows($resql);
      $i = 0;
      while ($i < $num) {
        $obj = $this->db->fetch_object($resql);
        $adherent = new Adherent($db);
        $adherent->fetch($obj->rowid);
 
        DataPolicy::sendMailDataPolicyAdherent($adherent);
        $i++;
      }
    } else {
      $this->error = $this->db->error();
      return -1;
    }
 
    return 1;
  }
 
  public static function sendMailDataPolicyContact($contact)
  {
    global $langs, $conf, $db, $user;
 
    $error = 0;
 
    $from = $user->getFullName($langs).' <'.$user->email.'>';
 
    $sendto = $contact->email;
    $code = dol_hash($contact->email, 'md5');
    if (!empty($contact->default_lang)) {
      $l = $contact->default_lang;
    } else {
      $l = $langs->defaultlang;
    }
    // TODO Use a dolibarr email template
    $s = "DATAPOLICYSUBJECT_".$l;
    $ma = "DATAPOLICYCONTENT_".$l;
    $la = 'TXTLINKDATAPOLICYACCEPT_'.$l;
    $lr = 'TXTLINKDATAPOLICYREFUSE_'.$l;
 
    $subject = getDolGlobalString($s);
    $message = getDolGlobalString($ma);
    $linka = getDolGlobalString($la);
    $linkr = getDolGlobalString($lr);
    $sendtocc = $sendtobcc = '';
    $filepath = $mimetype = $filename = array();
    $deliveryreceipt = 0;
 
    $substitutionarray = array(
      '__LINKACCEPT__' => '<a href="'.dol_buildpath('/public/datapolicy/index.php?action=1&c='.$contact->id.'&l='.$l.'&key='.$code, 3).'" target="_blank" rel="noopener noreferrer">'.$linka.'</a>',
      '__LINKREFUSED__' => '<a href="'.dol_buildpath('/public/datapolicy/index.php?action=2&c='.$contact->id.'&l='.$l.'&key='.$code, 3).'" target="_blank" rel="noopener noreferrer">'.$linkr.'</a>',
      '__FIRSTNAME__' => $contact->firstname,
      '__NAME__' => $contact->lastname,
      '__CIVILITY__' => $contact->civility,
    );
    $subject = make_substitutions($subject, $substitutionarray);
    $message = make_substitutions($message, $substitutionarray);
 
    $actiontypecode = 'AC_EMAIL';
    $actionmsg = $langs->transnoentities('MailSentByTo', $from, $sendto);
    if ($message) {
      if ($sendtocc) {
        $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('Bcc').": ".$sendtocc);
      }
      $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('MailTopic').": ".$subject);
      $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('TextUsedInTheMessageBody').":");
      $actionmsg = dol_concatdesc($actionmsg, $message);
    }
 
 
    // Send mail
    require_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
    $mailfile = new CMailFile($subject, $sendto, $from, $message, $filepath, $mimetype, $filename, $sendtocc, $sendtobcc, $deliveryreceipt, -1);
 
    $resultmasssend = '';
    if ($mailfile->error) {
      $resultmasssend .= '<div class="error">'.$mailfile->error.'</div>';
    } else {
      $resultmail = $mailfile->sendfile();
 
      if ($resultmail) {
        $resultmasssend .= $langs->trans("MailSent").': '.$sendto."<br>";
        $contact->array_options['options_datapolicy_send'] = date('Y-m-d', time());
        $contact->update($contact->id);
      } else {
        dol_print_error($db);
      }
    }
    setEventMessage($resultmasssend);
  }
 
  public static function sendMailDataPolicyCompany($societe)
  {
    global $langs, $conf, $db, $user;
 
    $error = 0;
 
    $from = $user->getFullName($langs).' <'.$user->email.'>';
 
    $sendto = $societe->email;
 
    $code = dol_hash($societe->email, 'md5');
    if (!empty($societe->default_lang)) {
      $l = $societe->default_lang;
    } else {
      $l = $langs->defaultlang;
    }
    // TODO Use a dolibarr email template
    $s = "DATAPOLICYSUBJECT_".$l;
    $ma = "DATAPOLICYCONTENT_".$l;
    $la = 'TXTLINKDATAPOLICYACCEPT_'.$l;
    $lr = 'TXTLINKDATAPOLICYREFUSE_'.$l;
 
    $subject = getDolGlobalString($s);
    $message = getDolGlobalString($ma);
    $linka = getDolGlobalString($la);
    $linkr = getDolGlobalString($lr);
    $sendtocc = $sendtobcc = '';
    $filepath = $mimetype = $filename = array();
    $deliveryreceipt = 0;
 
    $substitutionarray = array(
      '__LINKACCEPT__' => '<a href="'.dol_buildpath('/public/datapolicy/index.php?action=1&s='.$societe->id.'&l='.$l.'&key='.$code, 3).'" target="_blank" rel="noopener noreferrer">'.$linka.'</a>',
      '__LINKREFUSED__' => '<a href="'.dol_buildpath('/public/datapolicy/index.php?action=2&s='.$societe->id.'&l='.$l.'&key='.$code, 3).'" target="_blank" rel="noopener noreferrer">'.$linkr.'</a>',
    );
    $subject = make_substitutions($subject, $substitutionarray);
    $message = make_substitutions($message, $substitutionarray);
 
    $actiontypecode = 'AC_EMAIL';
    $actionmsg = $langs->transnoentities('MailSentByTo', $from, $sendto);
    if ($message) {
      if ($sendtocc) {
        $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('Bcc').": ".$sendtocc);
      }
      $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('MailTopic').": ".$subject);
      $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('TextUsedInTheMessageBody').":");
      $actionmsg = dol_concatdesc($actionmsg, $message);
    }
 
    // Send mail
    require_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
    $mailfile = new CMailFile($subject, $sendto, $from, $message, $filepath, $mimetype, $filename, $sendtocc, $sendtobcc, $deliveryreceipt, -1);
 
    $resultmasssend = '';
    if ($mailfile->error) {
      $resultmasssend .= '<div class="error">'.$mailfile->error.'</div>';
    } else {
      $resultmail = $mailfile->sendfile();
 
      if ($resultmail) {
        $resultmasssend .= $langs->trans("MailSent").': '.$sendto."<br>";
        $societe->array_options['options_datapolicy_send'] = date('Y-m-d', time());
        $societe->update($societe->id, $user);
      } else {
        dol_print_error($db);
      }
    }
    setEventMessage($resultmasssend);
  }
 
  public static function sendMailDataPolicyAdherent($adherent)
  {
    global $langs, $conf, $db, $user;
 
    $error = 0;
 
    $from = $user->getFullName($langs).' <'.$user->email.'>';
 
    $sendto = $adherent->email;
 
    $code = dol_hash($adherent->email, 'md5');
    if (!empty($adherent->default_lang)) {
      $l = $adherent->default_lang;
    } else {
      $l = $langs->defaultlang;
    }
    // TODO Use a dolibarr email template
    $s = 'TXTLINKDATAPOLICYSUBJECT_'.$l;
    $ma = 'TXTLINKDATAPOLICYMESSAGE_'.$l;
    $la = 'TXTLINKDATAPOLICYACCEPT_'.$l;
    $lr = 'TXTLINKDATAPOLICYREFUSE_'.$l;
 
    $subject = getDolGlobalString($s);
    $message = getDolGlobalString($ma);
    $linka = getDolGlobalString($la);
    $linkr = getDolGlobalString($lr);
    $sendtocc = $sendtobcc = '';
    $filepath = $mimetype = $filename = array();
    $deliveryreceipt = 0;
 
    $substitutionarray = array(
      '__LINKACCEPT__' => '<a href="'.dol_buildpath('/public/datapolicy/index.php?action=1&a='.$adherent->id.'&l='.$l.'&key='.$code, 3).'" target="_blank" rel="noopener noreferrer">'.$linka.'</a>',
      '__LINKREFUSED__' => '<a href="'.dol_buildpath('/public/datapolicy/index.php?action=2&a='.$adherent->id.'&l='.$l.'&key='.$code, 3).'" target="_blank" rel="noopener noreferrer">'.$linkr.'</a>',
    );
    $subject = make_substitutions($subject, $substitutionarray);
    $message = make_substitutions($message, $substitutionarray);
 
    $actiontypecode = 'AC_EMAIL';
    $actionmsg = $langs->transnoentities('MailSentByTo', $from, $sendto);
    if ($message) {
      if ($sendtocc) {
        $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('Bcc').": ".$sendtocc);
      }
      $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('MailTopic').": ".$subject);
      $actionmsg = dol_concatdesc($actionmsg, $langs->transnoentities('TextUsedInTheMessageBody').":");
      $actionmsg = dol_concatdesc($actionmsg, $message);
    }
 
 
    // Send mail
    require_once DOL_DOCUMENT_ROOT.'/core/class/CMailFile.class.php';
    $mailfile = new CMailFile($subject, $sendto, $from, $message, $filepath, $mimetype, $filename, $sendtocc, $sendtobcc, $deliveryreceipt, -1);
 
    $resultmasssend = '';
    if ($mailfile->error) {
      $resultmasssend .= '<div class="error">'.$mailfile->error.'</div>';
    } else {
      $resultmail = $mailfile->sendfile();
 
      if ($resultmail) {
        $resultmasssend .= $langs->trans("MailSent").': '.$sendto."<br>";
        $adherent->array_options['options_datapolicy_send'] = date('Y-m-d', time());
        $adherent->update($user);
      } else {
        dol_print_error($db);
      }
    }
    setEventMessage($resultmasssend);
  }
}