<?php
use Pmb\Animations\Models\MailingTypeModel;

// +-------------------------------------------------+
// © 2002-2007 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net)
// +-------------------------------------------------+
// $Id: mailtpl.class.php,v 1.27.8.4 2026/08/05 08:24:00 dbellamy Exp $

if (stristr($_SERVER['REQUEST_URI'], ".class.php")) {
    die("no access");
}

global $class_path, $include_path;
require_once $include_path . "/templates/mailtpl.tpl.php";
require_once $class_path . "/files_gestion.class.php";

class mailtpl
{

    public $id = 0;

    public $info = array();

    public $users = array();

    public static $error = "";

    public $all_users;

    public $all_userid;

    public function __construct($id = 0)
    {
        $this->id = intval($id);
        $this->fetch_data();
    }

    public function fetch_data()
    {
        global $PMBuserid;

        $this->info = array(
            'id' => $this->id,
            'name' => '',
            'objet' => '',
            'tpl' => '',
            'users' => array()
        );
        $this->users = array();
        $requete_users = "SELECT userid, username FROM users order by username ";
        $res_users = pmb_mysql_query($requete_users);
        $this->all_users = array();
        while (list ($this->all_userid, $all_username) = pmb_mysql_fetch_row($res_users)) {
            $this->all_users[] = array($this->all_userid, $all_username);
        }
        if (!$this->id) {
            $this->users[] = $PMBuserid;
            return;
        }
        $req = "select * from mailtpl where id_mailtpl=" . $this->id;

        $resultat = pmb_mysql_query($req);
        if (pmb_mysql_num_rows($resultat)) {
            $r = pmb_mysql_fetch_object($resultat);
            $this->info['id'] = $r->id_mailtpl;
            $this->info['name'] = $r->mailtpl_name;
            $this->info['objet'] = $r->mailtpl_objet;
            $this->info['tpl'] = $r->mailtpl_tpl;
            $this->info['users'] = $r->mailtpl_users;
        }
        $this->users = explode(" ", $this->info['users']);

        // printr($this->info[28]);
    }

    public function get_mailtpl()
    {
        global $charset;
        $ajax_send = $this->info;
        if ($charset != 'utf-8') { // cause: json_encode veut de l'utf8
            $ajax_send['id'] = encoding_normalize::utf8_normalize($this->info['id']);
            $ajax_send['name'] = encoding_normalize::utf8_normalize($this->info['name']);
            $ajax_send['objet'] = encoding_normalize::utf8_normalize($this->info['objet']);
            $ajax_send['tpl'] = encoding_normalize::utf8_normalize($this->info['tpl']);
            $ajax_send['users'] = encoding_normalize::utf8_normalize($this->info['users']);
        }
        return ($ajax_send);
    }

    public static function get_options_selvars()
    {
        global $animations_active;

        $selvars = [
            'empr_group_empr' => [
                'empr_name',
                'empr_first_name',
                'empr_sexe',
                'empr_cb',
                'empr_login',
                'empr_mail',
                'empr_loans',
                'empr_loans_late',
                'empr_resas',
                'empr_resa_confirme',
                'empr_resa_not_confirme',
                'empr_name_and_adress',
                'empr_dated',
                'empr_datef',
                'empr_nb_days_before_expiration',
                'empr_all_information',
                'empr_auth_opac',
                'empr_auth_opac_subscribe_link',
                'empr_last_loan_date',
                'empr_auth_opac_change_password_link',
                'empr_auth_opac_change_mail_tracking_link'
            ],
            'empr_group_loc' => [
                'empr_loc_name',
                'empr_loc_adr1',
                'empr_loc_adr2',
                'empr_loc_cp',
                'empr_loc_town',
                'empr_loc_phone',
                'empr_loc_email',
                'empr_loc_website',
            ],
            'empr_group_misc' => [
                'empr_day_date',
            ]
        ];

        if ($animations_active) {
            $selvars['animation_group'] = [
                'animation_name',
                'animation_start_date',
                'animation_start_hour',
                'animation_end_date',
                'animation_end_hour',
                'animation_registered_list',
                'animation_location',
                'animation_empr_name',
                'animation_empr_firstname',
                'animation_registration_unsubscribe_link'
            ];
        }
        return $selvars;
    }

    public static function get_formatted_options_selvars($type = 'readers', $groups = [])
    {
        $formatted_options = [];
        switch ($type) {
            case 'readers':
                $objects = list_patterns_readers_ui::get_instance(array('groups' => $groups))->get_objects();
                break;
            case 'users':
                $objects = list_patterns_users_ui::get_instance(array('groups' => $groups))->get_objects();
                break;
            case 'demandes':
                $objects = list_patterns_demandes_ui::get_instance(array('groups' => $groups))->get_objects();
                break;
            default:
                $objects = array();
                break;
        }
        foreach ($objects as $object) {
            if (empty($formatted_options[$object->group_code])) {
                $formatted_options[$object->group_code] = ["msg" => $object->group_label];
            }
            $formatted_options[$object->group_code]["elements"][] = [
                "code" => $object->code,
                "msg" => $object->label
            ];
        }
        return $formatted_options;
    }

    /**
     * Construit les optgroups d'un selecteur d'insertion de variables
     *
     * @param array $formatted_options Retour de get_formatted_options_selvars()
     * @return string
     */
    protected static function build_options_selvars($formatted_options)
    {
        global $charset;

        $options_selvars = '';
        foreach ($formatted_options as $group) {
            $options_selvars .= "<optgroup label='" . htmlentities($group["msg"], ENT_QUOTES, $charset) . "'>";
            foreach ($group["elements"] as $element) {
                $options_selvars .= "<option value='!!" . $element['code'] . "!!'>" . htmlentities($element['msg'], ENT_QUOTES, $charset) . "</option>";
            }
            $options_selvars .= "</optgroup>";
        }
        return $options_selvars;
    }

    public static function get_selvars()
    {
        global $mailtpl_form_selvars, $charset, $class_path;

        $options_selvars = static::build_options_selvars(static::get_formatted_options_selvars());

        require_once ($class_path . '/event/events/event_mailing.class.php');
        $event = new event_mailing('mailing', 'get_selvars');
        $evth = events_handler::get_instance();
        $evth->send($event);
        $additionnal_selvars = $event->get_selvars();
        if (!empty($additionnal_selvars)) {
            foreach ($additionnal_selvars as $libelle_optgroup => $options) {
                $options_selvars .= "<optgroup label='" . htmlentities($libelle_optgroup, ENT_QUOTES, $charset) . "'>";
                foreach ($options as $option => $libelle_option) {
                    $options_selvars .= "<option value='!!$option!!'>" . htmlentities($libelle_option, ENT_QUOTES, $charset) . "</option>";
                }
                $options_selvars .= "</optgroup>";
            }
        }
        $mailtpl_form_selvars = str_replace('!!options_selvars!!', $options_selvars, $mailtpl_form_selvars);
        return $mailtpl_form_selvars;
    }

    public static function get_resavars()
    {
        global $mailtpl_form_resavars;
        return $mailtpl_form_resavars;
    }

    /**
     * Selecteur d'insertion des variables du module demandes
     *
     * @return string
     */
    public static function get_demandesvars()
    {
        global $mailtpl_form_demandesvars;

        $options_demandesvars = static::build_options_selvars(static::get_formatted_options_selvars('demandes'));
        return str_replace('!!options_demandesvars!!', $options_demandesvars, $mailtpl_form_demandesvars);
    }

    public static function get_sel_img()
    {
        global $mailtpl_form_sel_img, $pmb_img_folder;
        if (!$pmb_img_folder) return '';
        $tpl = $mailtpl_form_sel_img;
        $img = new files_gestion('img');
        if (!$img->get_count_file()) return '';

        $select = $img->get_sel('select_file', "!!path!!!!name!!", "!!name!!");
        $tpl = str_replace('!!select_file!!', $select, $tpl);
        return $tpl;
    }

    public function get_content_form()
    {
        global $pdflettreresa_resa_prolong_email, $demandes_active;

        $interface_content_form = new interface_content_form(static::class);
        $interface_content_form->add_element('name', 'admin_mailtpl_form_name')
            ->add_input_node('text', $this->info['name']);
        $interface_content_form->add_element('f_objet_mail', 'empr_mailing_form_obj_mail')
            ->add_input_node('text', $this->info['objet'])
            ->set_class('saisie-80em');
        $interface_content_form->add_element('f_message', 'admin_mailtpl_form_tpl')
            ->add_textarea_node($this->info['tpl'], 100, 20);
        $interface_content_form->add_element('selvars', 'admin_mailtpl_form_selvars')
            ->add_html_node(mailtpl::get_selvars());
        if ($demandes_active) {
            $interface_content_form->add_element('demandesvars', 'admin_mailtpl_form_demandes_selvars')
            	->add_html_node(mailtpl::get_demandesvars());
        }
        if ($pdflettreresa_resa_prolong_email) {
            $interface_content_form->add_element('resavars', 'admin_mailtpl_form_resa_prolong_selvars')
            ->add_html_node(mailtpl::get_resavars());
        }
        $sel_img = mailtpl::get_sel_img();
        if ($sel_img) {
            $interface_content_form->add_element('sel_img', 'admin_mailtpl_form_sel_img')
                ->add_html_node($sel_img);
        }
        $interface_content_form->add_inherited_element('permissions_users', 'autorisations', 'procs_autorisations')
            ->set_autorisations(implode(' ', $this->users))
            ->set_on_create(($this->id ? 0 : 1));
        $interface_content_form->add_element('id_mailtpl')
            ->add_input_node('hidden', $this->id);
        return $interface_content_form->get_display();
    }

    public function get_form()
    {
        global $mailtpl_js_content_form, $msg;

        $interface_form = new interface_admin_form('mailtpl');
        if (!$this->id) {
            $interface_form->set_label($msg['admin_mailtpl_form_add']);
        } else {
            $interface_form->set_label($msg['admin_mailtpl_form_edit']);
        }

        //On vérifie si le mailtpl n'est pas utilisé dans les types de communications en animation
        $useInMailingType = MailingTypeModel::checkMailtplIsUse(intval($this->id));
        $interface_form->set_no_deletable($useInMailingType);
        $interface_form->set_no_deletable_msg($msg["animation_mailtpl_use"]);

        // Idem pour les notifications du module demandes : le bouton reste affiche
        // mais alerte au clic, la suppression etant refusee par delete()
        $used_by_demandes = static::get_demandes_usage_message(intval($this->id));
        if (!empty($used_by_demandes)) {
            $interface_form->set_no_deletable(true);
            $interface_form->set_no_deletable_msg($useInMailingType ? $msg["animation_mailtpl_use"] . " " . $used_by_demandes : $used_by_demandes);
        }

        $interface_form->set_object_id($this->id)
            ->set_duplicable(true)
            ->set_confirm_delete_msg($msg['confirm_suppr_de'] . " " . $this->info['name'] . " ?")
            ->set_content_form($mailtpl_js_content_form . $this->get_content_form())
            ->set_table_name('mailtpl')
            ->set_field_focus('name');
        return $interface_form->get_display();
    }

    public function set_properties_from_form()
    {
        global $name, $f_objet_mail, $f_message, $autorisations;

        $this->info['name'] = stripslashes($name);
        $this->info['objet'] = stripslashes($f_objet_mail);
        $this->info['tpl'] = stripslashes($f_message);
        $this->info['users'] = $autorisations;
    }

    public function save()
    {
        $fields = "
			mailtpl_name='" . addslashes($this->info['name']) . "',
			mailtpl_objet='" . addslashes($this->info['objet']) . "',
			mailtpl_tpl='" . addslashes($this->info['tpl']) . "',
			mailtpl_users=' " . implode(" ", $this->info['users']) . " '
		";

        if (!$this->id) { // Ajout
            $req = "INSERT INTO mailtpl SET $fields ";
            pmb_mysql_query($req);
            $this->id = pmb_mysql_insert_id();
        } else {
            $req = "UPDATE mailtpl SET $fields where id_mailtpl=" . $this->id;
            pmb_mysql_query($req);
        }
    }

    public static function delete($id)
    {
        global $msg;

        $id = intval($id);
        if ($id) {
            // Controle serveur : set_no_deletable() ne fait qu'alerter en Javascript,
            // l'URL de suppression reste atteignable directement
            if (MailingTypeModel::checkMailtplIsUse($id)) {
                pmb_error::get_instance(static::class)->add_message('admin_mailtpl_form_edit', $msg["animation_mailtpl_use"]);
                return false;
            }
            $used_by_demandes = static::get_demandes_usage_message($id);
            if (!empty($used_by_demandes)) {
                pmb_error::get_instance(static::class)->add_message('admin_mailtpl_form_edit', $used_by_demandes);
                return false;
            }
            $req = "DELETE from mailtpl WHERE id_mailtpl=" . $id;
            pmb_mysql_query($req);
        }
        return true;
    }

    /**
     * Message d'avertissement si le template est associe a une notification du
     * module demandes
     *
     * L'association est stockee dans la table parametres : sa suppression n'etant
     * pas cascadee, un template efface laisserait un identifiant orphelin et la
     * notification repartirait sans bruit sur son message par defaut.
     *
     * @param int $id
     * @return string Chaine vide si le template n'est pas associe
     */
    protected static function get_demandes_usage_message($id)
    {
        global $msg;

        $events = demandes_mail_tpl::get_events_using_mailtpl($id);
        if (empty($events)) {
            return '';
        }
        return $msg['demandes_mail_tpl_used'] . " " . implode(', ', $events);
    }

    public static function get_attachments_content_form()
    {
        global $mailtpl_attachments_content_form_tpl;

        $form = $mailtpl_attachments_content_form_tpl;
        return $form;
    }

    public static function get_attachments_form()
    {
        global $mailtpl_attachments_form_tpl;

        $form = $mailtpl_attachments_form_tpl;
        return $form;
    }

    public static function upload_attachments_form($path, $MAX_FILESIZE = 0x500000)
    {
        global $msg;

        $statut = false;
        static::$error = "";
        if (count($_FILES['pieces_jointes_mailing']['name'])) {
            for ($i = 0; $i < count($_FILES['pieces_jointes_mailing']['name']); $i++) {
                $name = $_FILES['pieces_jointes_mailing']['name'][$i];
                $tmp_name = $_FILES['pieces_jointes_mailing']['tmp_name'][$i];
                if (!is_uploaded_file($tmp_name)) {
                    static::$error = $msg["admin_files_gestion_error_not_write"] . $name;
                    return $statut;
                }

                if ($_FILES['pieces_jointes_mailing'][$i]['size'] >= $MAX_FILESIZE) {
                    static::$error = $msg["admin_files_gestion_error_to_big"] . $name;
                    return $statut;
                }
                //		"/^\.(jpg|jpeg|gif|png|doc|docx|txt|rtf|pdf|xls|xlsx|ppt|pptx){1}$/i";
                $no_valid_extension = "/^\.(php|PHP){1}$/i";
                if (preg_match($no_valid_extension, strrchr($name, '.'))) {
                    static::$error = $msg["admin_files_gestion_error_not_valid"] . $name;
                    return $statut;
                }
                // tout semble ok on le déplace au bon endroit
                $statut = move_uploaded_file($tmp_name, $path . $name);
                if ($statut == false) {
                    static::$error = $msg["admin_files_gestion_error_not_loaded"] . $name;
                }

                chmod($path . $name, 0777);
            }
        }
        return $statut;
    }
}

//mailtpl class end
class mailtpls
{

    public $info = array();

    public function __construct()
    {
        $this->fetch_data();
    }

    public function fetch_data()
    {
        global $PMBuserid;
        $this->info = array();
        $i = 0;
        $req = "SELECT * FROM mailtpl WHERE mailtpl_users LIKE '% $PMBuserid %' ORDER BY mailtpl_name";
        $resultat = pmb_mysql_query($req);
        if (pmb_mysql_num_rows($resultat)) {
            while ($r = pmb_mysql_fetch_object($resultat)) {
                $this->info[$i] = new mailtpl($r->id_mailtpl);
                $i++;
            }
        }
    }

    public function get_count_tpl()
    {
        return count($this->info);
    }

    public function get_selector_options()
    {
        $options = [];
        if (!empty($this->info)) {
            foreach ($this->info as $elt) {
                $options[$elt->info['id']] = $elt->info['name'];
            }
        }
        return $options;
    }

    public function get_sel($sel_name, $sel_id = 0)
    {
        $tpl = "<select name='$sel_name' id='$sel_name'>";
        foreach ($this->info as $elt) {
            if ($elt->info['id'] == $sel_id) {
                $tpl .= "<option value=" . $elt->info['id'] . " selected='selected'>" . $elt->info['name'] . "</option>";
            } else {
                $tpl .= "<option value=" . $elt->info['id'] . ">" . $elt->info['name'] . "</option>";
            }
        }
        $tpl .= "</select>";
        return $tpl;
    }
} // mailtpls class end
