fonctions.php

Go to the documentation of this file.

<?php
// This file should be in UTF8 without BOM - Accents examples: éèê
// +----------------------------------------------------------------------+
// | Copyright (c) 2004-2015 Advisto SAS, service PEEL - contact@peel.fr  |
// +----------------------------------------------------------------------+
// | This file is part of PEEL Shopping 8.0.0, which is subject to an        |
// | opensource GPL license: you are allowed to customize the code           |
// | for your own needs, but must keep your changes under GPL                |
// | More information: https://www.peel.fr/lire/licence-gpl-70.html          |
// +----------------------------------------------------------------------+
// | Author: Advisto SAS, RCS 479 205 452, France, https://www.peel.fr/    |
// +----------------------------------------------------------------------+
// $Id: fonctions.php 47305 2015-10-12 10:14:59Z gboussin $
if (!defined('IN_PEEL')) {
     die();
}

function display_prices_with_taxes_active() {
    if (vn($GLOBALS['site_parameters']['display_prices_with_taxes']) == '0' || (check_if_module_active('reseller') && a_priv('reve') && !empty($GLOBALS['site_parameters']['force_display_reseller_prices_without_taxes']))) {
        return false;
    } else {
        return true;
    }
}

function unique_id()
{
     mt_srand(microtime_float() * 1000000);
     return substr(sha256($GLOBALS['site_parameters']['sha256_encoding_salt'] . mt_rand(0, 9999999)), 0, 32);
}

function MDP($chrs = 8)
{
     $pwd = "";
     mt_srand(microtime_float() * 1000000);
     while (String::strlen($pwd) < $chrs) {
          $chr = chr(mt_rand(0, 255));
          // on évite les 1, i, I, o, O et 0
          if (preg_match("/^[a-hj-km-np-zA-HJ-KM-NP-Z2-9]$/i", $chr)) {
               $pwd = $pwd . $chr;
          }
     }
     return $pwd;
}

function generate_token($name = 'general', $use_existing_token = true)
{
     if ($use_existing_token && !empty($_SESSION['token_' . $name])) {
          $_SESSION['token_time_' . $name] = time();
     } else {
          srand(microtime_float() * 1000000);
          $_SESSION['token_' . $name] = md5(uniqid(mt_rand()));
          $_SESSION['token_time_' . $name] = time();
     }
     $_SESSION['token_referer_' . $name] = 'http://' . $_SERVER['HTTP_HOST'] . $_SERVER['REQUEST_URI'];
     if (!empty($_SERVER['HTTPS']) && $_SERVER['HTTPS'] != 'off') {
          $_SESSION['token_referer_' . $name] = str_replace('http://', 'https://', $_SESSION['token_referer_' . $name]);
     }
     return $_SESSION['token_' . $name];
}

function get_form_token_input($name = 'general', $use_existing_token = true, $return_as_input_form = true)
{
     $token = generate_token($name, $use_existing_token);
     if ($return_as_input_form) {
          return '<input type="hidden" name="token" value="' . String::str_form_value($token) . '" />';
     } else {
          return $token;
     }
}

function verify_token($name = 'general', $delay_in_minutes = 60, $check_referer_if_set_by_server = true, $cancel_token = true, $minimum_wait_in_seconds_before_use = 0)
{
     if (!empty($_POST['token'])) {
          $user_token = $_POST['token'];
     } elseif (!empty($_GET['token'])) {
          $user_token = $_GET['token'];
     }

     $result = false;
     if (isset($_SESSION['token_' . $name]) && isset($_SESSION['token_time_' . $name]) && !empty($user_token)) {
          if ($_SESSION['token_' . $name] == $user_token && $_SESSION['token_time_' . $name] + $delay_in_minutes * 60 >= time() && $_SESSION['token_time_' . $name] + $minimum_wait_in_seconds_before_use <= time()) {
               if (!$check_referer_if_set_by_server || !isset($_SERVER['HTTP_REFERER']) || $_SERVER['HTTP_REFERER'] == $_SESSION['token_referer_' . $name]) {
                    $result = true;
               }
          }
     }
     if ($cancel_token) {
          unset($_SESSION['token_' . $name], $_SESSION['token_time_' . $name], $_SESSION['token_referer_' . $name]);
     }
     return $result;
}

function get_sons_cat($all_parents_with_ordered_direct_sons_array, $catid, $ids_array = array())
{
     // On met une protection au cas où une catégorie parente ait un enfant direct ou indirect qui est son propre parent
     static $studied_cats_array;
     $hash = md5(serialize($all_parents_with_ordered_direct_sons_array));
     if(!count($ids_array)) {
          // Si on relance la fonction avec la même liste $all_parents_with_ordered_direct_sons_array
          unset($studied_cats_array[$hash]);
     }
     if(empty($studied_cats_array[$hash][$catid])) {
          $studied_cats_array[$hash][$catid] = true;
          foreach ($all_parents_with_ordered_direct_sons_array[$catid] as $son_catid) {
               $ids_array[] = $son_catid;
               if (!empty($all_parents_with_ordered_direct_sons_array[$son_catid])) {
                    $ids_array = get_sons_cat($all_parents_with_ordered_direct_sons_array, $son_catid, $ids_array);
               }
          }
     }
     return $ids_array;
}

function calcul_nbprod_parcat($catid, $all_parents_with_ordered_direct_sons_array)
{
     $cache_id = 'calcul_nbprod_parcat_' . $catid . '_' . $GLOBALS['site_parameters']['category_count_method'] . '_' . $GLOBALS['site_id'];
     if (!empty($all_parents_with_ordered_direct_sons_array) && !empty($all_parents_with_ordered_direct_sons_array[$catid])) {
          $cache_id .= '_' . md5(serialize($all_parents_with_ordered_direct_sons_array[$catid]));
     }
     $this_cache_object = new Cache($cache_id, array('group' => 'data'));
     if ($this_cache_object->testTime(900, true)) {
          $results_count = $this_cache_object->get();
     } else {
          if ($GLOBALS['site_parameters']['category_count_method'] == 'global' && !empty($all_parents_with_ordered_direct_sons_array) && !empty($all_parents_with_ordered_direct_sons_array[$catid])) {
               // En mode global, on compte le nombre d'annonce des catégories et sous-catégories
               $ids_array = get_sons_cat($all_parents_with_ordered_direct_sons_array, $catid);
          }
          if(empty($ids_array)) {
               // Dans ce cas, on compte uniquement le nombre d'annonces de categories
               $ids_array = array($catid);
          }
          $sql = "SELECT COUNT(*) AS this_count
               FROM peel_produits p
               INNER JOIN peel_produits_categories pc ON pc.produit_id = p.id
               WHERE pc.categorie_id IN (" . nohtml_real_escape_string(implode(',', $ids_array)) . ") AND p.etat='1' AND " . get_filter_site_cond('produits', 'p') . "";
          $query = query($sql);
          if ($this_count = fetch_assoc($query)) {
               $results_count = $this_count['this_count'];
          } else {
               $results_count = null;
          }
          $this_cache_object->save($results_count);
     }
     unset($this_cache_object);
     return $results_count;
}

function calcul_nbarti_parrub($rub)
{
     $resCount = query("SELECT COUNT(*) AS this_count
          FROM peel_articles p
          INNER JOIN peel_articles_rubriques pa ON pa.article_id = p.id
          WHERE pa.rubrique_id  = '" . intval($rub) . "' AND p.etat='1' AND " . get_filter_site_cond('articles', 'p') . "");
     $count = fetch_assoc($resCount);
     return $count['this_count'];
}

function fprix($price, $display_currency = false, $currency_code_or_default = null, $convertion_needed_into_currency = true, $currency_rate = null, $display_iso_currency_code = false, $format = true, $force_format_separator = null, $add_rdfa_properties = false, $round_even_if_no_format = false)
{
     static $currency_infos_by_code;
     if(!empty($GLOBALS['site_parameters']['price_hide_if_not_loggued']) && !defined('IN_IPN') && (!est_identifie() || (!a_priv('util') && !a_priv('admin*') && !a_priv('reve')))) {
          return '-';
     }
     
     if (!empty($currency_code_or_default)) {
          if (!isset($currency_infos_by_code[$currency_code_or_default])) {
               // Si on a demandé le prix dans le code ISO d'une devise, alors on va chercher le taux de conversion associé
               $req = "SELECT code, conversion, symbole, symbole_place
                    FROM peel_devises
                    WHERE code = '" . nohtml_real_escape_string($currency_code_or_default) . "' AND " . get_filter_site_cond('devises') . "";
               $res = query($req);
               $currency_infos_by_code[$currency_code_or_default] = fetch_assoc($res);
          }
          if (!empty($currency_infos_by_code[$currency_code_or_default])) {
               $currency_code = $currency_infos_by_code[$currency_code_or_default]['code'];
               $currency_symbole = String::html_entity_decode(str_replace('&euro;', '€', $currency_infos_by_code[$currency_code_or_default]['symbole']));
               $currency_rate_item = $currency_infos_by_code[$currency_code_or_default]['conversion'];
               $symbole_place = $currency_infos_by_code[$currency_code_or_default]['symbole_place'];
          }
     }
     if (empty($currency_symbole)) {
          // Par défaut ou si on ne recupère aucun symbole de devise alors on utilise le symbole et le taux de conversion de session
          $currency_code = $_SESSION['session_devise']['code'];
          $currency_symbole = $_SESSION['session_devise']['symbole'];
          $currency_rate_item = $_SESSION['session_devise']['conversion'];
          $symbole_place = $_SESSION['session_devise']['symbole_place'];
     }
     if (!empty($currency_rate)) {
          // Si on veut forcer le taux de change, alors on l'applique à la place de celui qu'on a récupéré en BDD ou en session
          $currency_rate_item = $currency_rate;
     }
     if (!empty($convertion_needed_into_currency)) {
          // Par défaut, on effectue une conversion du montant
          $price_displayed = $price * $currency_rate_item;
     } else {
          // Sinon on affiche le prix sans aucune conversion
          $price_displayed = $price;
     }
     if(!empty($GLOBALS['site_parameters']['prices_precision']) && is_array($GLOBALS['site_parameters']['prices_precision']) && isset($GLOBALS['site_parameters']['prices_precision'][$currency_code])) {
          $prices_precision = $GLOBALS['site_parameters']['prices_precision'][$currency_code];
     } else {
          $prices_precision = vb($GLOBALS['site_parameters']['prices_precision'], 2);
     }
     if($force_format_separator) {
          $prices_decimal_separator = $force_format_separator;
     } else {
          if(!empty($GLOBALS['site_parameters']['prices_decimal_separator']) && is_array($GLOBALS['site_parameters']['prices_decimal_separator']) && isset($GLOBALS['site_parameters']['prices_decimal_separator'][$currency_code])) {
               $prices_decimal_separator = $GLOBALS['site_parameters']['prices_decimal_separator'][$currency_code];
          } else {
               $prices_decimal_separator = vb($GLOBALS['site_parameters']['prices_decimal_separator'], ',');
          }
     }
     if(!empty($GLOBALS['site_parameters']['prices_thousands_separator']) && is_array($GLOBALS['site_parameters']['prices_thousands_separator']) && isset($GLOBALS['site_parameters']['prices_thousands_separator'][$currency_code])) {
          $prices_thousands_separator = $GLOBALS['site_parameters']['prices_thousands_separator'][$currency_code];
     } else {
          $prices_thousands_separator = vb($GLOBALS['site_parameters']['prices_thousands_separator'], ' ');
     }

     if (round($price_displayed, $prices_precision) == 0 && $price_displayed < 0) {
          // On veut éviter que le résultat affiché soit -0,00 => on force à un réel 0
          $price_displayed = 0;
     }
     if ($format) {
          // On formatte le prix pour l'affichage
          // Seuls les float sont admis dans la fonction number_format():
          if (is_numeric($price_displayed)) {
               if(!empty($GLOBALS['site_parameters']['prices_show_rounded_if_possible']) && round($price_displayed) == round($price_displayed, $prices_precision)) {
                    $prices_precision = 0;
               }
               $price_displayed = number_format($price_displayed, $prices_precision, $prices_decimal_separator, $prices_thousands_separator);
          }
          if($add_rdfa_properties) {
               $price_displayed = '<span property="price">'.$price_displayed.'</span>';
          }
          if ($display_iso_currency_code) {
               if($add_rdfa_properties) {
                    $currency_code = '<span property="priceCurrency">'.$currency_code.'</span>';
               }
               $price_displayed .= ' ' . $currency_code;
          } elseif ($display_currency) {
               // Si on veut afficher le symbole de la devise (Par défaut, on affiche uniquement le montant)
               if ($symbole_place == 1) {
                    $price_displayed .= $GLOBALS['STR_BEFORE_TWO_POINTS'] . $currency_symbole;
               } else {
                    $price_displayed = $currency_symbole . ' ' . $price_displayed;
               }
               /*if($add_rdfa_properties) {
                    $price_displayed .= ' <span class="hidden" property="priceCurrency">'.$currency_code.'</span>';
               }*/
          }
     } elseif($round_even_if_no_format) {
          $price_displayed = round($price_displayed, $prices_precision);
     } else {
          // Etant donné le fonctionnement du stockage des float, il peut y avoir des nombres qui apparaissent en tant que X.49999 au lieu de X.50000 par exemple
          // Donc même si on ne formatte pas, on veut afficher le prix corrigé de ce défaut (sinon, on n'aurait pas fait appel à la fonction fprix si on ne voulait pas un minimum de traitement)
          if(abs($price_displayed-round($price_displayed, $prices_precision))<0.0001 == $price_displayed) {
               $price_displayed = number_format($price_displayed, $prices_precision, '.', '');
     }
     }
     return $price_displayed;
}

function get_currency_rate($currency)
{
     if (!empty($currency) && !is_numeric($currency)) {
          $_SESSION['session_curr']['EUR'] = 1;
          $_SESSION['session_curr']['FRF'] = 6.55957;
          if (isset($_SESSION['session_curr'][$currency]) && is_numeric($_SESSION['session_curr'][$currency])) {
               $rate = $_SESSION['session_curr'][$currency];
          } else {
               $sql_query = "
                    SELECT `conversion`
                    FROM `peel_devises`
                    WHERE `code`='" . nohtml_real_escape_string($currency) . "' AND " . get_filter_site_cond('devises') . "
                    LIMIT 1";
               // echo $sql_query;
               query($sql_query);
               while ($result = fetch_object()) {
                    $rate = $result->conversion;
                    $_SESSION['session_curr'][$currency] = $rate;
               }
               if (count($_SESSION['session_curr']) > 30) {
                    // On retire le premier élément du tableau si on a atteint la limite de taille du tableau
                    // NB : current() ne peut focntionner car il ne retourne pas de référence mais une copie
                    unset($_SESSION['session_curr'][key($_SESSION['session_curr'])]);
               }
          }
     }
     if (isset($rate) && is_numeric($rate)) {
          return $rate;
     } else {
          return null;
     }
}

function charge_article($id, $show_all_etat_if_admin = true)
{
     $qid = query("SELECT
                a.id
               ,a.surtitre_" . $_SESSION['session_langue'] . " AS surtitre
               ,a.titre_" . $_SESSION['session_langue'] . " AS titre
               ,a.date_insere
               ,a.texte_" . $_SESSION['session_langue'] . " AS texte
               ,a.chapo_" . $_SESSION['session_langue'] . " AS chapo
               ,a.image1
               ,a.etat
               ,a.on_special
               ,ar.rubrique_id
          FROM peel_articles a
          INNER JOIN peel_articles_rubriques ar ON a.id = ar.article_id
          WHERE a.id='" . intval($id) . "' AND " . get_filter_site_cond('articles', 'a') . " " . ($show_all_etat_if_admin && a_priv("admin_content", false) ? '' : "AND a.etat = '1' AND (a.titre_" . $_SESSION['session_langue'] . "!='' OR a.texte_" . $_SESSION['session_langue'] . "!='' OR a.chapo_" . $_SESSION['session_langue'] . "!='' OR a.surtitre_" . $_SESSION['session_langue'] . "!='')") . "");
     return fetch_assoc($qid);
}

function get_discount_text($remise_valeur, $remise_percent, $is_remise_valeur_including_taxe)
{
     $remise_displayed = array();
     $remise_valeur = floatval($remise_valeur);
     $remise_percent = floatval($remise_percent);
     if (!empty($remise_valeur)) {
          $remise_displayed[] = fprix($remise_valeur, true, $GLOBALS['site_parameters']['code'], false);
     }
     if (!empty($remise_percent)) {
          $remise_displayed[] = sprintf("%0.2f", $remise_percent) . '% ' . ($is_remise_valeur_including_taxe ? $GLOBALS['STR_TTC'] : $GLOBALS['STR_HT']);
     }

     return implode(' / ', $remise_displayed);
}

function get_tag_analytics()
{
     if (!empty($GLOBALS['site_parameters']['tag_analytics'])) {
          if (!empty($GLOBALS['site_parameters']['no_display_tag_analytics_for_ip'])) {
               foreach(explode(',', str_replace(array(' ', ';'), array(',', ','), $GLOBALS['site_parameters']['no_display_tag_analytics_for_ip'])) as $this_ip_part) {
                    if (!empty($this_ip_part) && ($this_ip_part == '*' || strpos($_SERVER['REMOTE_ADDR'], $this_ip_part) === 0)) {
                         // IP utilisée détectée comme commençant par une IP listée dans no_display_tag_analytics_for_ip
                         return false;
                    }
               }
          }
          return $GLOBALS['site_parameters']['tag_analytics'];
     } else {
          return false;
     }
}

function get_modules_array($only_active = false, $location = null, $technical_code = null, $force_update_cache_information = false, $specific_site_id = null, $exclude_public_items = false)
{
     static $modules_array;
     $static_hash = '';
     if ($only_active) {
          $static_hash .= 'only_active';
     }
     // On ajoute wwwroot dans le hash, en cas de configuration multisite certaines données sont différentes en fonction du site.
     $static_hash .= $location . '_' . $technical_code . '_' . vb($GLOBALS['page_columns_count']). '_' . vb($GLOBALS['wwwroot']);
     if (!isset($modules_array[$static_hash]) || $force_update_cache_information) {
          $modules = array();
          // defined('IN_PEEL_ADMIN') pour get_filter_site_cond : Cette fonction est appelée en front office pour l'affichage des modules mais aussi en back office pour l'administration des modules. 
          // Pour l'édition des modules on exclut (ou pas) les éléments publiques en fonction de la configuration de l'administrateur.
          $sql = 'SELECT *
               FROM peel_modules
               WHERE ' . get_filter_site_cond('modules', null, defined('IN_PEEL_ADMIN'), $specific_site_id, $exclude_public_items) . ' AND ' . ($location == 'header' && vn($GLOBALS['page_columns_count']) == 2 ?'(':'') . '(1' . ($technical_code ? ' AND technical_code="' . nohtml_real_escape_string($technical_code) . '"' : '') . ($location ? ' AND location="' . nohtml_real_escape_string($location) . '"' : '') . ')' . ($location == 'header' && vn($GLOBALS['page_columns_count']) == 2 ? ' OR (technical_code="caddie" AND location="below_middle")' : '') . ($location == 'header' && vn($GLOBALS['page_columns_count']) == 2 ?')':'') . ($only_active ? ' AND etat="1"' : '') . '
               ORDER BY position, id';
          $query = query($sql);
          while ($this_module = fetch_assoc($query)) {
               if(!empty($GLOBALS['site_parameters']['modules_disabled_array']) && in_array($this_module['technical_code'], $GLOBALS['site_parameters']['modules_disabled_array'])) {
                    // Permet de désactiver un modèle dans un contexte particulier que ne permet pas la table peel_modules
                    continue;
               }
               if(!empty($GLOBALS['site_parameters']['modules_only_if_constant_defined']) && !empty($GLOBALS['site_parameters']['modules_only_if_constant_defined'][$this_module['technical_code']])) {
                    $ok = false;
                    foreach(explode(',', $GLOBALS['site_parameters']['modules_only_if_constant_defined'][$this_module['technical_code']]) as $this_constant) {
                         if(defined(trim($this_constant))) {
                              $ok = true;
                              break;
                         }
                    }
                    if(empty($ok)) {
                         continue;
                    }
                    unset($ok);
               }
               // Traitement spécifique
               if ($this_module['location'] == 'below_middle' && vn($GLOBALS['page_columns_count']) == 2 && $this_module['technical_code'] == 'caddie') {
                    // On déplace le module de droite vers le haut pour l'afficher quand même
                    if ((empty($location) || $location == 'header') && empty($GLOBALS['site_parameters']['bootstrap_enabled'])) {
                         $this_module['location'] = 'header';
                         $this_module['display_mode'] = '';
                    } else {
                         continue;
                    }
               } else {
                    $this_module['location'] = str_replace(array('left_annonce', 'right_annonce'), array('left', 'right'), $this_module['location']);
               }
               // On prend cet élément éventuellement modifié
               // Si le module est défini pour être afficher uniquement sur la home, alors on vérifie si on est sur la page Home, sinon on ne l'affiche pas.
               if (empty($this_module['in_home']) || (!empty($this_module['in_home']) && defined('IN_HOME'))) {
                    $modules[$this_module['id']] = $this_module;
               }
          }
          $modules_array[$static_hash] = $modules;
     }
     // Traitement spécifique
     return $modules_array[$static_hash];
}

function get_modules($location, $return_mode = false, $technical_code = null, $id_categorie = null, $this_annonce_number = 0, $return_array_with_raw_information = false, $criterias = null)
{    
     if (empty($criterias)) {
          $criterias = $_GET;
     }
     // Ne pas mettre upsell dans la liste ci-après car un cache est déjà mis en place à l'intérieur du module
     $allowing_cache_modules_technical_codes = array('annonces' => 4500, 'tagcloud' => 120);
     // Pour annonces, si module de crons activé, le cron toutes les heures regénère les fichiers de cache pour éviter que ce soit un utilisateur qui le déclenche
     $output = '';
     $output_array = array();
     $modules_array = get_modules_array(true, $location, $technical_code);

     $i = 0;
     foreach ($modules_array as $this_module) {
          $load_module = true;
          $this_block_style = '';
          $this_module_output = '';
          if (!empty($id_categorie)) {
               $display_catalog_allowed = extra_catalogue_condition($id_categorie);
          } else {
               $display_catalog_allowed = true;
          }
          if (!empty($allowing_cache_modules_technical_codes[$this_module['technical_code']]) && !a_priv('admin*')) {
               $cache_id = $this_module['technical_code'] . '_' . $_SESSION['session_langue'] . '_' . vn($criterias['catid']) . '_' . $GLOBALS['site_id'] . '_' . vn($_SESSION['session_admin_multisite']);
               $this_module_output_cache_object = new Cache($cache_id, array('group' => 'html_block'));
               if ($this_module_output_cache_object->testTime($allowing_cache_modules_technical_codes[$this_module['technical_code']], true)) {
                    $this_module_output = $this_module_output_cache_object->get();
                    $load_module = false;
               }
          }
          if ($load_module) {
               if ($this_module['technical_code'] == 'catalogue') {
                    if($display_catalog_allowed) {
                         if (function_exists('affiche_menu_catalogue')) {
                              // Test sur la présence de affiche_menu_catalogue qui est l'ancienne fonction pour l'affichage du catalogue. L'utilisation est permise ici pour des raions de compatibilité avec d'anciens templates, dans le cas où la fonction est définie dans display_custom.php
                              $this_module_output = affiche_menu_catalogue($this_module['location'], true, true);
                         } else {
                              $this_module_output = get_categories_output($this_module['location'], 'categories', vn($_GET['catid']), ($this_module['location']=='footer'?'div':''), null);
                         }
                         $tpl = $GLOBALS['tplEngine']->createTemplate('menu_catalogue.tpl');
                         $tpl->assign('menu', $this_module_output);
                         $tpl->assign('add_ul_if_result', true);
                         $this_module_output = $tpl->fetch();
                    }
               } elseif ($this_module['technical_code'] == 'tagcloud' && check_if_module_active('tagcloud')) {
                    $this_module_output = affiche_tagcloud(true);
               } elseif ($this_module['technical_code'] == 'search') {
                    if(!empty($this_module['technical_code'])){
                         $this_module_output = affiche_menu_recherche(true, $this_module['location']);
                    }
               } elseif ($this_module['technical_code'] == 'guide') {
                    $this_module_output = affiche_guide($this_module['location'], true, true);
               } elseif ($this_module['technical_code'] == 'guide_simplified') {
                    $this_module_output = affiche_guide($this_module['location'], true, false);
               } elseif ($this_module['technical_code'] == 'caddie') {
                    // Le caddie est affiché en mode condensé si dans le header, ou détaillé sinon
                    $this_module_output = affiche_mini_caddie($this_module['location'] != 'header', true);
               } elseif ($this_module['technical_code'] == 'account') {
                    $this_module_output = affiche_compte(true, $this_module['location']);
               } elseif ($this_module['technical_code'] == 'best_seller') {
                    if (check_if_module_active('best_seller')) {
                         $this_module_output = affiche_best_seller_produit_colonne(true, $this_module['location']);
                         $width_class = '';
                    }
               } elseif ($this_module['technical_code'] == 'brand') {
                    // affiche du block marque
                    $this_module_output = get_brand_link_html(null, true, true, $this_module['location']);
               } elseif ($this_module['technical_code'] == 'last_views') {
                    if (check_if_module_active('last_views')) {
                         $this_module_output = affiche_last_views($this_module['location']);
                    }
               } elseif ($this_module['technical_code'] == 'quick_access') {
                    if (function_exists('get_quick_access')) {
                         $this_module_output = get_quick_access($this_module['location'], true);
                    }
               } elseif ($this_module['technical_code'] == 'news' || $this_module['technical_code'] == 'articles_rollover') {
                    if (check_if_module_active('menus')) {
                         if($this_module['technical_code'] == 'news') {
                              $items_html_array = get_on_rollover_products_html();
                         } else {
                              $items_html_array = get_on_rollover_articles_html();
                         }
                         if (vn($GLOBALS['site_parameters']['type_rollover']) == 1) {
                              $this_module_output = affiche_menu_deroulant_1('scrollerdiv_' . $this_module['technical_code'], $items_html_array);
                         } elseif (vn($GLOBALS['site_parameters']['type_rollover']) == 2) {
                              $this_module_output = affiche_menu_deroulant_2('scrollerdiv_' . $this_module['technical_code'], $items_html_array);
                         }
                    }
               } elseif (String::substr($this_module['technical_code'], 0, String::strlen('advertising')) == 'advertising' && check_if_module_active('banner')) {
                    /* Explication du fonctionnement des bannières publicitaires */
                    
                    // A NE PAS CONFONDRE
                    // Location    : Correspond à l'emplacement 'physique' de la fonction get_module sur la page (left, top, right, etc ...). Cette valeur est administrable dans la page d'administration des modules, via des boutons radios qui représente chaque emplacement prévu dans le site. Ce paramètre est utilisé par get_module seulement.
                    // Espace : C'est un emplacement publicitaire, qui est administrable en back office. Ce chiffre permet de faire le lien entre le module de la table peel_modules et la bannière pub. Dans peel_modules, le numéro de l'espace pour la bannière pub est concaténé avec code technique du module dans le champ technical_code.
                    // ATTENTION => l'espace est stocké dans le champ POSITION de peel_banniere ! Il faudra refondre le module pour rendre tout ça cohérent.
                    // Position : La position d'une bannière est défini par le champ 'rang' de peel_banniere. Cela permet de trier les bannières entre elles dans un même espace publicitaire.

                    // ROLE DE GET_MODULE POUR L'AFFICHAGE DES PUB
                    // Défini l'emplacement sur la page où la publicité s'affichera. La fonction récupère dans un premier temps les modules dont la 'location' choisi par l'administrateur en back office est égal au paramètre location get_module
                    // Pour chaque résultat, un technical_code indique la fonction associé au module. Pour les pubs ce technical_code commence par advertising

                    // UTILITE DE LA VALEUR TECHNICAL_CODE DE PEEL_MODULES
                    // => cette valeur est une association de deux valeurs : 
                         // - advertising, qui indique que le module doit afficher une pub
                         // - l'espace, qui permet de faire le lien avec la bannière publicitaire lié au module.

                    // ROLE DE AFFICHE_BANNER
                    // affiche_banner rècupère l'espace publicitaire qui a été fourni par le technical_code du module. La fonction retourne la(les) bannière(s) associée(s) à cet espace par l'administrateur en back office, en plus des critères de dates, de contrainte sur les pages, etc....
                    // Exemple : advertising5 affiche la publicité en position 5

                    // Définition du type de page pour ne sélectionner que les bannières adéquates
                    if (defined('IN_HOME')) {
                         $page_type = 'home_page';
                    } elseif ((defined('IN_CATALOGUE') || defined('IN_CATALOGUE_ANNONCE')) && (empty($criterias['page']) || $criterias['page'] === '0' || $criterias['page'] == 1)) {
                         $page_type = 'first_page_category';
                    } elseif ((defined('IN_CATALOGUE') || defined('IN_CATALOGUE_ANNONCE')) && $criterias['page'] > 1) {
                         $page_type = 'other_page_category';
                    } elseif (defined('IN_CATALOGUE_ANNONCE_DETAILS')) {
                         $page_type = 'ad_page_details';
                    } elseif (defined('IN_SEARCH')) {
                         $page_type = 'search_engine_page';
                    } elseif (defined('IN_AD_CREATION')) {
                         $page_type = 'ad_creation_page';
                    } else {
                         $page_type = 'other_page';
                    }
                    if (!empty($keywords_array)) {
                         $sql_cond .= ' AND ' . build_terms_clause($keywords_array, array('keywords'), 2);
                    }
                    $this_module_output = affiche_banner(String::substr($this_module['technical_code'], strlen('advertising')), true, (isset($criterias['page'])?$criterias['page']:null), $id_categorie, $this_annonce_number, $page_type, (isset($criterias['search'])?explode(' ', $criterias['search']):null), $_SESSION['session_langue'], $return_array_with_raw_information, (isset($criterias['ref'])?$criterias['ref']:null), vn($GLOBALS['page_related_to_user_id']));
               } elseif ($this_module['technical_code'] == 'menu') {
                    $this_block_style = ' ';
                    foreach ($modules_array as $this_module2) {
                         if ($this_module2['technical_code'] == 'caddie' && $this_module['location'] == 'header' && empty($GLOBALS['site_parameters']['bootstrap_enabled'])) {
                              $this_block_style = ' style="width:80%"';
                         }
                    }
                    $this_module_output = get_menu(vb($GLOBALS['main_div_id']));
               } elseif ($this_module['technical_code'] == 'ariane') {
                    $this_module_output = affiche_ariane(true);
               } elseif ($this_module['technical_code'] == 'paiement_secu') {
                    $this_module_output = get_modules_paiement_secu();
               } elseif ($this_module['technical_code'] == 'newsletter_in_column') {
                    // $this_module_output = get_newsletter_in_column();
               } elseif ($this_module['technical_code'] == 'subscribe_newsletter') {
                    $this_module_output = get_newsletter_form($this_module['location'], true);
               } elseif ($this_module['technical_code'] == 'contact') {
                    $this_module_output = get_contact_sideblock($this_module['location'], true);
               } elseif ($this_module['technical_code'] == 'annonces' && check_if_module_active('annonces')) {
                    $this_module_output = affiche_menu_annonce($this_module['location'], true, true);
               } elseif ($this_module['technical_code'] == 'become_verified' && check_if_module_active('abonnement')) {
                    $this_module_output = get_verified_sideblock_link($this_module['location'], true);
               } elseif ($this_module['technical_code'] == 'upsell' && check_if_module_active('abonnement')) {
                    $this_module_output = getVerifiedAdsList();
               } elseif ($this_module['technical_code'] == 'search_by_list' && check_if_module_active('annonces')) {
                    $this_module_output = get_annonces_in_box('search_by_list', $this_module['location'], true);
                    $this_module['sliding_mode'] = false;
               } elseif ($this_module['technical_code'] == 'product_new') {
                    if (check_if_module_active('annonces')) {
                         $this_module_output = get_annonces_in_box('last', $this_module['location'], true);
                         $this_module['sliding_mode'] = false;
                    } else {
                         $this_module_output = get_product_new_list($this_module['location'], true);
                    }
               } elseif ($this_module['technical_code'] == 'last_forum_posts' && check_if_module_active('forum')) {
                    $this_module_output = getForumLastMessages($_SESSION['session_langue']);
               } elseif ($this_module['technical_code'] == 'new_members_list' && check_if_module_active('groups_advanced')) {
                    $this_module_output = get_new_members_list();
               } elseif ($this_module['technical_code'] == 'birthday_members_list' && check_if_module_active('groups_advanced')) {
                    $this_module_output = get_birthday_members_list();
               } elseif ($this_module['technical_code'] == 'agenda_datepicker' && check_if_module_active('agenda')) {
                    $this_module_output = display_agenda();
               } elseif ($this_module['technical_code'] == 'get_search_product_form' ) {
                    $this_module_output = get_search_form($_GET, vb($_GET['search']), vb($_GET['match']), null, 'module_products');
               } elseif ($this_module['technical_code'] == 'get_search_ads_form' ) {
                    $this_module_output = get_search_form($_GET, vb($_GET['search']), vb($_GET['match']), null, 'module_ads');
               } elseif ($this_module['technical_code'] == 'get_search_member_form' && check_if_module_active('groups_advanced')) {
                    $this_module_output = get_search_user_form("module");
               } elseif ($this_module['technical_code'] == 'next_product_flash' && check_if_module_active('flash')) {
                    $this_module_output = get_next_product_flash();
               } elseif ($this_module['technical_code'] == 'references' && check_if_module_active('carrousel')) {
                    $this_module_output = Carrousel::display('references', true);
               } elseif ($this_module['technical_code'] == 'partenaires' && check_if_module_active('carrousel')) {
                    $this_module_output = Carrousel::display('partenaires', true);
               }elseif ($this_module['technical_code'] == 'forum_rss') {
                    $this_module_output = get_xml_value($GLOBALS['site_parameters']['forum_rss_url'], $GLOBALS['site_parameters']['forum_rss_filter_string'], 9, 90);
               }elseif (function_exists('get_'.$this_module['technical_code'].'_module')) {
                    $this_module_output = call_user_func('get_'.$this_module['technical_code'].'_module');
               }
               if (!empty($this_module_output_cache_object)) {
                    // Si le module est mis en cache, on sauvegarde son contenu
                    $this_module_output_cache_object->save($this_module_output);
               }
          }
          unset($this_module_output_cache_object);

          if (!empty($this_module_output)) {
               // On remplace d'éventuels tags par leurs valeurs (exemple : [WWWROOT])
               $this_module_output = template_tags_replace($this_module_output);
               if (!empty($return_array_with_raw_information)) {
                    $output_array[] = $this_module_output;
               } else {
                    $block_class = $this_module['display_mode'] . '_' . $this_module['technical_code'];
                    if(!empty($GLOBALS['site_parameters']['modules_block_class_by_technical_code_array']) && !empty($GLOBALS['site_parameters']['modules_block_class_by_technical_code_array'][$this_module['technical_code']])) {
                         $block_class .= ' ' . $GLOBALS['site_parameters']['modules_block_class_by_technical_code_array'][$this_module['technical_code']];
                    } elseif(!empty($GLOBALS['site_parameters']['modules_block_class_by_display_mode_array']) && !empty($GLOBALS['site_parameters']['modules_block_class_by_display_mode_array'][$this_module['display_mode']])) {
                         $block_class .= ' ' . $GLOBALS['site_parameters']['modules_block_class_by_display_mode_array'][$this_module['display_mode']];
                    } elseif(in_array($this_module['location'], vb($GLOBALS['site_parameters']['modules_no_class_location_array'], array('left', 'right', 'left_annonce', 'right_annonce')))) {
                         $block_class .= '';
                    } elseif(isset($width_class)) {
                         $block_class .= ' ' . $width_class;
                    } elseif($this_module['location'] != 'header' && String::substr($this_module['technical_code'], 0, String::strlen('advertising')) != 'advertising') {
                         $block_class .= ' col-md-4';
                    }
                    if ($this_module['display_mode'] == 'sideblocktitle' && $this_module['location'] != 'header' && $this_module['location'] != 'footer' && $this_module['location'] != 'middle') {
                         $output .= affiche_sideblocktitle(vb($this_module['title_' . $_SESSION['session_langue']]), $this_module_output, $block_class, true);
                    } elseif ($this_module['display_mode'] == 'sideblock' && $this_module['location'] != 'header' && $this_module['location'] != 'footer' && $this_module['location'] != 'middle') {
                         $output .= affiche_sideblock(vb($this_module['title_' . $_SESSION['session_langue']]), $this_module_output, $block_class, true);
                    } else {
                         if (!empty($this_module['sliding_mode'])) {
                              $output .= affiche_block($this_module['display_mode'], $this_module['location'], $this_module['technical_code'], vb($this_module['title_' . $_SESSION['session_langue']]), $this_module_output, $this_module['display_mode'] . '_' . $this_module['technical_code'], $this_block_style, true, true);
                         } else {
                              $block_class .= ' ' . $this_module['display_mode'] . ' ' . $this_module['location'] . '_basicblock ' . $this_module['location'] . '_' . $this_module['technical_code'] . '  ' . $this_module['technical_code'] . '_' . $_SESSION['session_langue'];
                              if (($this_module['display_mode'] == 'sideblocktitle' || $this_module['display_mode'] == 'sideblock') && $this_module['location'] == 'footer') {
                                   $extra_class = true;
                              } else {
                                   $extra_class = false;
                              }
                              $output .= affiche_block($this_module['display_mode'], $this_module['location'], $this_module['technical_code'], vb($this_module['title_' . $_SESSION['session_langue']]), $this_module_output, $block_class, $this_block_style, true, true, true, vb($extra_class));
                         }
                    }
               }
          }
          if ($location == 'center_middle_home') {
               if($i % 2 == 0) {
                    $output .= '<div class="clearfix"></div>';
               }
               // Ne pas incrementer le compteur pour les bannières qui prennent toutes la largeur du contenu
               if ($this_module['display_mode'] != 'banner_up') {
                    $i++;
               }
          }
     }

     if ($return_array_with_raw_information) {
          return $output_array;
     } elseif ($return_mode) {
          return $output;
     } elseif (!empty($output)) {
          echo $output;
     } else {
          return false;
     }
}

function insere_ticket(&$frm)
{
     if (check_if_module_active('webmail')) {
          save_mail_db($frm);
     }
     if ((String::strpos(vb($frm['sujet']), '/24') !== false || String::strpos(vb($frm['sujet']), '24/') !== false) && !empty($GLOBALS['site_parameters']['email_emergency'])) {
          $recipient_email = $GLOBALS['site_parameters']['email_emergency'];
     } else {
          $recipient_email = $GLOBALS['support_sav_client'];
     }
     if (!empty($recipient_email)) {
          unset($custom_template_tags);
          $custom_template_tags['DATE'] = get_formatted_date(time(), 'short', 'long');
          $custom_template_tags['NOM_FAMILLE'] = vb($frm['nom']);
          $custom_template_tags['SOCIETE'] = vb($frm['societe']);
          $custom_template_tags['TELEPHONE'] = vb($frm['telephone']);
          $custom_template_tags['ADRESSE'] = vb($frm['adresse']) . ' ' . vb($frm['code_postal']) . ' ' . vb($frm['ville']) . ' ' . vb($frm['pays']);
          $custom_template_tags['EMAIL'] = vb($frm['email']);
          $custom_template_tags['DISPO'] = vb($frm['dispo']);
          $custom_template_tags['TEXTE'] = vb($frm['texte']);
          $custom_template_tags['SUJET'] = ((!empty($frm['commande_id'])) ? "[" . $GLOBALS['STR_ORDER_NAME'] . " " . $frm['commande_id'] . "] " : "") . vb($frm['sujet']);
          $custom_template_tags['PRENOM'] = vb($frm['prenom']);
          send_email($recipient_email, '', '', 'insere_ticket', $custom_template_tags, null, $GLOBALS['support'], true, false, false, vb($frm['email']));
     }
}

function getFlashBannerHTML($url, $width = 680, $height = 250, $mode_transparent = false)
{
     $tpl = $GLOBALS['tplEngine']->createTemplate('FlashBannerHTML.tpl');
     $tpl->assign('url', $url);
     $tpl->assign('width', $width);
     $tpl->assign('height', $height);
     $tpl->assign('mode_transparent', $mode_transparent);
     return $tpl->fetch();
}

function get_country_name($id)
{
     if(strpos($id, ',') !== false) {
          $site_country_array = array();
          foreach(explode(',', $id) as $this_id) {
               $site_country_array[] = get_country_name($this_id);
          }
          return implode(', ', $site_country_array);
     } elseif($id === null || $id === '') {
          return null;
     }
     $id = intval($id);
     if($id == 0) {
          return $GLOBALS['STR_WORLD'];
     } else {
          $sql = 'SELECT pays_' . $_SESSION['session_langue'] . '
               FROM peel_pays
               WHERE id="' . intval($id) . '"';
          $q = query($sql);
          if ($result = fetch_assoc($q)) {
               return String::html_entity_decode_if_needed($result['pays_' . $_SESSION['session_langue']]);
          } else {
               return false;
          }
     }
}

function get_country_id($country_name)
{
     $sql = 'SELECT id
          FROM peel_pays
          WHERE pays_' . $_SESSION['session_langue'] . '="' . nohtml_real_escape_string($country_id_or_name) . '" AND ' .  get_filter_site_cond('pays') . '
          LIMIT 1';
     $query = query($sql);
     if ($obj = fetch_object($query)) {
          $result = $obj->id;
     }
     if (!empty($result)) {
          return $result;
     } else {
          return false;
     }
}

function get_category_name($id)
{
     $sql = 'SELECT nom_' . $_SESSION['session_langue'] . ' AS name
          FROM peel_categories c
          WHERE id="' . intval($id) . '" AND ' . get_filter_site_cond('categories', 'c') . '';
     $q = query($sql);
     if ($result = fetch_assoc($q)) {
          return String::html_entity_decode_if_needed($result['name']);
     } else {
          return false;
     }
}

function get_category_tree_and_itself($id_or_ids_array, $mode = 'sons', $table_to_use = 'categories')
{
     static $result_array;
     static $first_depth_results_array;
     if(empty($first_depth_results_array[$mode][$table_to_use])) {
          if ($mode == 'sons') {
               $select_field = 'id';
               $condition_field = 'parent_id';
          } elseif ($mode == 'parents') {
               $select_field = 'parent_id AS id';
               $condition_field = 'id';
          } else {
               // erreur de paramétrage
               return false;
          }
          $site_cond = "";
          if ($table_to_use == 'rubriques') {
               $table = 'peel_rubriques';
               $site_cond .= " AND " . get_filter_site_cond($table_to_use) . "";
          } elseif ($table_to_use == 'categories') {
               $table = 'peel_categories';
               $site_cond .= " AND " . get_filter_site_cond($table_to_use) . "";
          } elseif ($table_to_use == 'annonces') {
               $table = 'peel_categories_annonces';
          } else {
               // erreur de paramétrage
               return false;
          }
          $sql = 'SELECT id, parent_id
               FROM ' . $table . '
               WHERE etat=1 '.$site_cond.'
               ORDER BY position ASC';
          $qid = query($sql);
          while ($cat = fetch_assoc($qid)) {
               $first_depth_results_array[$mode][$table_to_use][$cat[$condition_field]][] = $cat[$select_field];
          }
     }
     if (is_array($id_or_ids_array)) {
          $ids_list = implode(',', $id_or_ids_array);
     } else {
          $ids_list = $id_or_ids_array;
     }
     if (empty($result_array[$mode][$table_to_use][$ids_list])) {
          if (is_array($id_or_ids_array)) {
               $result_array[$mode][$table_to_use][$ids_list] = $id_or_ids_array;
          } else {
               $result_array[$mode][$table_to_use][$ids_list][] = $id_or_ids_array;
          }
          foreach(explode(',', $ids_list) as $this_condition_id) {
               if(!empty($first_depth_results_array[$mode][$table_to_use][$this_condition_id])) {
                    foreach($first_depth_results_array[$mode][$table_to_use][$this_condition_id] as $this_found_id) {
                         $result_array[$mode][$table_to_use][$ids_list] = array_merge($result_array[$mode][$table_to_use][$ids_list], get_category_tree_and_itself($this_found_id, $mode, $table_to_use));
                    }
               }
          }
     }
     return $result_array[$mode][$table_to_use][$ids_list];
}

function get_country_select_options($selected_country_name = null, $selected_country_id = null, $option_value = 'name', $display_inactive_country = false, $allowed_zone_id = null, $preselect_shop_country_if_none_selected = true, $selected_country_lang = null, $allowed_ids = null)
{
     $output = '';
     $sql_condition = '';
     if ($preselect_shop_country_if_none_selected && empty($selected_country_name) && empty($selected_country_id)) {
          if(!empty($_SESSION['session_country_detected'])) {
               $selected_country_id = vn($_SESSION['session_country_detected']);
          } else {
               $selected_country_id = vn($GLOBALS['site_parameters']['default_country_id']);
          }
     }
     if (empty($selected_country_lang)) {
          $sql_select_add_fields = '';
          $selected_country_lang = $_SESSION['session_langue'];
     } else {
          $sql_select_add_fields = ', pays_' . $selected_country_lang;
     }
     if (!$display_inactive_country) {
          $sql_condition .= ' AND etat = "1"';
     }
     if (!empty($allowed_zone_id)) {
          $sql_condition .= ' AND zone = "' . intval($allowed_zone_id) . '"';
     }
     if (!empty($allowed_ids)) {
          $sql_condition .= ' AND id IN ("' . implode('","', real_escape_string($allowed_ids)) . '")';
     }
     $sql_pays = 'SELECT id, pays_' . $_SESSION['session_langue'] . ' ' . $sql_select_add_fields . '
          FROM peel_pays
          WHERE 1 ' . $sql_condition . '  AND ' . get_filter_site_cond('pays') . '
          ORDER BY position, pays_' . $_SESSION['session_langue'];

     $res_pays = query($sql_pays);
     $tpl = $GLOBALS['tplEngine']->createTemplate('select_options.tpl');
     $tpl_options = array();
     while ($tab_pays = fetch_assoc($res_pays)) {
          if ($option_value == 'name') {
               $value = $tab_pays['pays_' . $selected_country_lang];
          } elseif ($option_value == 'id') {
               $value = $tab_pays['id'];
          }
          $tpl_options[] = array(
               'value' => $value,
               'name' => $tab_pays['pays_' . $_SESSION['session_langue']],
               'issel' => (vb($selected_country_name) == $tab_pays['pays_' . $selected_country_lang] || vb($selected_country_id) == $tab_pays['id'])
          );
     }
     $tpl->assign('options', $tpl_options);
     $output .= $tpl->fetch();
     return $output;
}

function get_all_site_countries_array($admin_force_multisite_if_allowed = false, $exclude_public_items = false, $show_only_site_country_allowed_array = false) {
     $sites_name_array = array();
     $sql_where = '';
     if($show_only_site_country_allowed_array) {
          $sql_where .= ' AND id IN ("' . implode('","', vb($GLOBALS['site_parameters']['site_country_allowed_array'])) . '")';
     }
     $sql_pays = 'SELECT id, pays_' . $_SESSION['session_langue'] . ' AS name
          FROM peel_pays
          WHERE etat=1 ' . $sql_where . ' AND ' . get_filter_site_cond('pays', null, false, null, $exclude_public_items, $admin_force_multisite_if_allowed) . '
          ORDER BY position, pays_' . $_SESSION['session_langue'];
     $res_pays = query($sql_pays);
     while($result = fetch_assoc($res_pays)) {
          $sites_name_array[$result['id']] = $result['name'];
     }
     return $sites_name_array;
}

function get_tag_function_countries_values_list($mode = 'id') {
     $result_array = get_all_site_countries_array();
     if($mode == 'id') {
          return implode(',', array_keys($result_array));
     } else {
          return implode(',', $result_array);
     }
}

function get_tag_function_countries_titles_list() {
     return get_tag_function_countries_values_list('name');
}

function get_delivery_type_options($selected_delivery_type_id_or_name = null)
{
     $output = '';
     $sql_type = "SELECT id, nom_" . $_SESSION['session_langue'] . ", site_id
          FROM peel_types
          WHERE etat = 1 AND " . get_filter_site_cond('types') . " AND (nom_" . $_SESSION['session_langue'] . "!=''".(!empty($selected_delivery_type_id_or_name)?" OR id='" . real_escape_string($selected_delivery_type_id_or_name) . "'":"").")
          ORDER BY position ASC, nom_" . $_SESSION['session_langue'] . " ASC";
     $res_type = query($sql_type);

     $tpl = $GLOBALS['tplEngine']->createTemplate('delivery_type_options.tpl');
     $tpl_options = array();
     while ($tab_type = fetch_assoc($res_type)) {
          $tpl_options[] = array(
               'value' => intval($tab_type['id']),
               'name' => get_site_info($tab_type).$tab_type['nom_' . $_SESSION['session_langue']],
               'issel' => ($tab_type['id'] == $selected_delivery_type_id_or_name || $tab_type['nom_' . $_SESSION['session_langue']] === $selected_delivery_type_id_or_name)
          );
     }
     $tpl->assign('options', $tpl_options);
     $output .= $tpl->fetch();
     return $output;
}


function is_delivery_address_necessary_for_delivery_type($selected_delivery_type_id = null)
{
     $sql_type = "SELECT without_delivery_address
          FROM peel_types
          WHERE id='" . intval($selected_delivery_type_id) . "' AND " . get_filter_site_cond('types') . "";
     $res_type = query($sql_type);

     if ($type = fetch_assoc($res_type)) {
          return (!$type['without_delivery_address']);
     } else {
          return null;
     }
}

function set_paiement(&$frm)
{
     if (!empty($frm['payment_technical_code'])) {
          $sql = "SELECT nom_" . $_SESSION['session_langue'] . " as paiement, tarif, tarif_percent, tva
               FROM peel_paiement
               WHERE technical_code = '" . nohtml_real_escape_string($frm['payment_technical_code']) . "' AND " .  get_filter_site_cond('paiement') . "";
          $query = query($sql);
          if ($obj = fetch_object($query)) {
               $frm['tarif_paiement_ht'] = $frm['sub_total_ht'] * ($obj->tarif_percent / 100) + $obj->tarif;
               $frm['tarif_paiement'] = $frm['sub_total'] * ($obj->tarif_percent / 100) + $obj->tarif;
               $frm['tva_tarif_paiement'] = $frm['tarif_paiement'] - $frm['tarif_paiement_ht'];
          }
     } else {
          $frm['tarif_paiement'] = 0;
          $frm['tarif_paiement_ht'] = 0;
          $frm['tva_tarif_paiement'] = 0;
     }
}

function get_payment_select($selected_payment_technical_code = null, $show_selected_even_if_not_available = false, $show_site_info_if_needed = false)
{
     $output = '';
     $where = 'WHERE ' .  get_filter_site_cond('paiement', 'p') . ' AND (totalmin<=' . floatval($_SESSION['session_caddie']->total) . ' OR totalmin=0) AND (totalmax>=' . floatval($_SESSION['session_caddie']->total) . ' OR totalmax=0)';

     if (check_if_module_active('payment_by_product')) {
          $where = payment_by_product_condition();
     }
     
     $sql_paiement = 'SELECT p.*
          FROM peel_paiement p
          ' . $where . '
          ORDER BY p.position';
     $res_paiement = query($sql_paiement);
     $results_count = num_rows($res_paiement);
     while ($tab_paiement = fetch_assoc($res_paiement)) {
          $payment_complement_informations = '';
          if((empty($tab_paiement['etat']) || empty($tab_paiement['nom_' . $_SESSION['session_langue']])) && (!$show_selected_even_if_not_available || $tab_paiement['technical_code'] != $selected_payment_technical_code)){
               // On ne prend que les moyens de paiement actifs, ou ceux qui ont pour code technique $selected_payment_technical_code si $show_selected_even_if_not_available = true
               // Dans les autres cas, on passe au suivant
               continue;
          }
          if (($tab_paiement['technical_code'] == 'kwixo' && ($_SESSION['session_caddie']->zone_technical_code != 'france_mainland' && $_SESSION['session_caddie']->zone_technical_code != 'france_and_overseas')) || $tab_paiement['technical_code'] == 'kwixo_credit' && ($_SESSION['session_caddie']->montant >= 150 && $_SESSION['session_caddie']->montant <= 4000)) {
               // Fianet n'autorise que les paiement en france et DOM
               // Le paiement à crédit FIANET est possible entre 150 et 4000 €
               continue;
          }
          if (!defined('IN_PEEL_ADMIN') && !empty($GLOBALS['site_parameters']['payment_disable_display_on_payment_select_page']) && in_array($tab_paiement['technical_code'], $GLOBALS['site_parameters']['payment_disable_display_on_payment_select_page'])) {
               // On ne veut pas afficher ce moyen de paiement en front office. Il sera disponible uniquement dans l'administration.
               continue;
          }
          if (($tab_paiement['technical_code'] != 'paypal' || !empty($GLOBALS['site_parameters']['email_paypal'])) && ($tab_paiement['technical_code'] != 'moneybookers' || !empty($GLOBALS['site_parameters']['email_moneybookers']))) {
               if (String::strpos($tab_paiement['technical_code'], 'kwixo') !== false) {
                    if ($tab_paiement['technical_code'] == 'kwixo_credit') {
                         // Popup popuprnp3x et popuprnp1xrnp défini dans ' . $GLOBALS['wwwroot'] . '/modules/fianet/lib/js/fianet.js
                         $payment_complement_informations .= '<a onclick="popuprnp3x();return false;" href="#" title="kwixo3x">';
                    } elseif($tab_paiement['technical_code'] == 'kwixo') {
                         $payment_complement_informations .= '<a onclick="popuprnp1xrnp();return false;" href="#" title="kwixo1x">';
                    }
                    if(file_exists($GLOBALS['dirroot'].'/modules/fianet/images/' . $tab_paiement['technical_code'] .'_mini.png')) {
                         $payment_complement_informations .= '
               <img src="'.$GLOBALS['wwwroot'].'/modules/fianet/images/' . $tab_paiement['technical_code'] .'_mini.png" alt="'.String::str_form_value($tab_paiement['nom_' . $_SESSION['session_langue']]).'" />
';
                    }
                    $payment_complement_informations .= $GLOBALS['STR_MORE_DETAILS'] . '</a></td>';
               }
               $tpl = $GLOBALS['tplEngine']->createTemplate('payment_select.tpl');
               $tpl->assign('technical_code', $tab_paiement['technical_code']);
               $tpl->assign('nom', ($show_site_info_if_needed?get_site_info($tab_paiement):'') . $tab_paiement['nom_' . $_SESSION['session_langue']]);
               $tpl->assign('issel', (vb($selected_payment_technical_code) == $tab_paiement['technical_code'] || $results_count == 1));
               if ($tab_paiement['tarif'] != 0) {
                    $tpl->assign('fprix_tarif', fprix($tab_paiement['tarif'], true));
               }
               if ($tab_paiement['tarif_percent'] != 0) {
                    $tpl->assign('tarif_percent', $tab_paiement['tarif_percent']);
               }
               $tpl->assign('isempty_moneybookers_payment_methods', empty($_SESSION['session_commande']['moneybookers_payment_methods']));
               $tpl->assign('moneybookers_payment_methods', vb($_SESSION['session_commande']['moneybookers_payment_methods']));
               $tpl->assign('isempty_email_moneybookers', empty($GLOBALS['site_parameters']['email_moneybookers']));
               if (!empty($payment_complement_informations)) {
                    $tpl->assign('payment_complement_informations', $payment_complement_informations);
               }
               $tpl->assign('STR_BEFORE_TWO_POINTS', $GLOBALS['STR_BEFORE_TWO_POINTS']);
               $tpl->assign('STR_TRANSFER', $GLOBALS['STR_TRANSFER']);
               $output .= $tpl->fetch();
          }
     }
     return $output;
}


function get_javascript_output($async = false, $minify = false, $output_only_script_loading = false, $js_filenames_array = array('js_files', 'js_files_pageonly', 'js_files_nominify', 'js_files_noasync', 'js_files_nominify_noasync'))
{
     static $already_loaded = false;
     if($already_loaded) {
          // Si on affiche du javascript en haut de page, et qu'il y a quand même des scripts pour le bas de page, on ne minify pas le bas de page
          $minify = false;    
     }
     $already_loaded = true;
     $js_content = '';
     $output = '';
     if(!empty($GLOBALS['site_parameters']['load_site_specific_js_files'])) {
          if(!empty($GLOBALS['js_files'])) {
               ksort($GLOBALS['js_files']);
          }
          $GLOBALS['js_files'] = array_merge(vb($GLOBALS['js_files'], array()), $GLOBALS['site_parameters']['load_site_specific_js_files']);
     }
     if(!empty($GLOBALS['site_parameters']['load_site_specific_js_content_array'])) {
          $GLOBALS['js_content_array'] = array_merge(vb($GLOBALS['js_content_array'], array()), $GLOBALS['site_parameters']['load_site_specific_js_content_array']);
     }
     if(!empty($GLOBALS['site_parameters']['load_site_specific_js_ready_content_array'])) {
          $GLOBALS['js_ready_content_array'] = array_merge(vb($GLOBALS['js_ready_content_array'], array()), $GLOBALS['site_parameters']['load_site_specific_js_ready_content_array']);
     }
     foreach($js_filenames_array as $this_js_array_name) {
          if(!empty($GLOBALS[$this_js_array_name])) {
               ksort($GLOBALS[$this_js_array_name]);
               if(count($GLOBALS[$this_js_array_name])>1 && $minify && String::strpos($this_js_array_name, 'nominify') === false) {
                    $GLOBALS[$this_js_array_name] = get_minified_src($GLOBALS[$this_js_array_name], 'js', 10800);
               }elseif(!empty($_GET['update']) && $_GET['update'] == 1) {
                    foreach($GLOBALS[$this_js_array_name] as $this_key => $this_js_file) {
                         $GLOBALS[$this_js_array_name][$this_key] = $this_js_file . (String::strpos($this_js_file, '?')!==false?'&':'?') . time();
                    }
               }
          }
     }
     if(!empty($GLOBALS['js_ready_content_array'])) {
          if(!$async) {
               $GLOBALS['js_content_array'][] = '
     (function($) {
          $(document).ready(function() {
               ' . implode("\n", $GLOBALS['js_ready_content_array']) . '
          });
     })(jQuery);
     ';
          } else {
               // On a déjà attendu le DOM loaded avant, pas besoin de réattendre le ready (qui se produit au onload dans Firefox)
               $GLOBALS['js_content_array'][] = '
     (function($) {
               ' . implode("\n", $GLOBALS['js_ready_content_array']) . '
     })(jQuery);
     ';
          }
     }
     if(!empty($GLOBALS['js_content_array'])) {
          $js_content .= implode("\n", $GLOBALS['js_content_array']);
     }
     if(!$async) {
          $noasync_js_filenames_array = $js_filenames_array;
     } else {
          foreach($js_filenames_array as $this_key => $this_js_array_name) {
               if(!empty($GLOBALS[$this_js_array_name]) && String::strpos($this_js_array_name, 'noasync') !== false) {
                    $noasync_js_filenames_array[] = $this_js_array_name;
                    unset($js_filenames_array[$this_key]);
               }
          }
     }
     if(!empty($noasync_js_filenames_array)) {
          foreach($noasync_js_filenames_array as $this_js_array_name) {
               if(!empty($GLOBALS[$this_js_array_name])) {
                    ksort($GLOBALS[$this_js_array_name]);
                    foreach($GLOBALS[$this_js_array_name] as $js_href) {
                         $output .= '<script src="' . String::str_form_value($js_href) . '"></script>
';
                    }
               }
               if($output_only_script_loading) {
                    $GLOBALS[$this_js_array_name] = array();
               }
          }
     }
     if(!$async) {
          if($output_only_script_loading) {
               return $output;
          }
     }
     if($async) {
          krsort($js_filenames_array);
          foreach($js_filenames_array as $this_js_array_name) {
               if(!empty($GLOBALS[$this_js_array_name])) {
                    krsort($GLOBALS[$this_js_array_name]);
                    foreach($GLOBALS[$this_js_array_name] as $this_filename) {
                         // On appelle le javascript de manière récursive, si plusieurs fichiers doivent être chargés avant l'exécution du script en ligne
                         if(String::substr($this_filename, 0, 2) == '//') {
                              // Gestion des chemins de fichiers http/https automatiques
                              if(strpos($GLOBALS['wwwroot'], 'https') === 0) {
                                   $this_filename = 'https:'.$this_filename;
                              } else {
                                   $this_filename = 'http:'.$this_filename;
                              }
                         }
                         $js_content = '
          loadScript("'.String::html_entity_decode($this_filename).'", function(){
                    '.$js_content.'
               });
';
                    }
               }
          }
          $js_content = '
     function loadScript(url,callback){
          var script = document.createElement("script");
          if(typeof document.attachEvent === "object"){
               // IE<=8
               script.onreadystatechange = function(){
                    //once the script is loaded, run the callback
                    if (script.readyState === "loaded" || script.readyState=="complete"){
                         script.onreadystatechange = null;
                         if (callback){callback()};
                    };
               };  
          } else {
               // All other browsers
               script.onload = function(){
                    //once the script is loaded, run the callback
                    script.onload = null;
                    if (callback){callback()};
               };
          };
          script.src = url;
          document.getElementsByTagName("head")[0].appendChild(script);
     };
     function downloadJSAtOnload() {
          if(async_launched) {
               return false;
          }
          async_launched = true;
          ' . $js_content . '
     }
     // Different browsers
     var async_launched = false;
     if(document.addEventListener) document.addEventListener("DOMContentLoaded", downloadJSAtOnload, false);
     else if (window.addEventListener) window.addEventListener("load", downloadJSAtOnload, false);
     else if (window.attachEvent) window.attachEvent("onload", downloadJSAtOnload);
     else window.onload = downloadJSAtOnload;
     // Si onload trop retardé par chargement d\'un site extérieur
     setTimeout(downloadJSAtOnload, 10000);
     ';
     }
     if(!empty($js_content)) {
          $output .= '
          <script><!--//--><![CDATA[//><!--
               ' . $js_content . '
          //--><!]]></script>
';
     }
     foreach($js_filenames_array as $this_js_array_name) {
          $GLOBALS[$this_js_array_name] = array();
     }
     $GLOBALS['js_content_array'] = array();
     $GLOBALS['js_ready_content_array'] = array();
     return $output;
}


function get_datepicker_javascript($load_timepicker = false)
{
     $datepicker_format = str_replace(array('%d','%m','%Y','%y'), array('dd','mm','yy','y'), $GLOBALS['date_format_short']);
     $output = '
     $(".datepicker").datepicker({                    
          dateFormat: "' . $datepicker_format . '",
          changeMonth: true,
          changeYear: true,
          yearRange: "1902:2037",
          beforeShow: function() {
               setTimeout(function(){
                    $(".ui-datepicker").css("z-index", 9999999);
               }, 0);
          }
     });
     $(".datepicker").attr("placeholder","'.str_replace(array('d', 'm', 'y'), array(String::substr(String::strtolower($GLOBALS['strDays']), 0, 1), String::substr(String::strtolower($GLOBALS['strMonths']), 0, 1), String::substr(String::strtolower($GLOBALS['strYears']), 0, 1)), str_replace('y', 'yy', $datepicker_format)).'");
';
     if(!empty($_SERVER['HTTP_USER_AGENT']) && (strstr($_SERVER['HTTP_USER_AGENT'],'iPhone') || strstr($_SERVER['HTTP_USER_AGENT'],'iPod') || strstr($_SERVER['HTTP_USER_AGENT'],'iPad'))) {
          // Quand on rentre la date on ne veut pas avoir le clavier qui s'affiche car on se sert du datepicker
          $GLOBALS['js_ready_content_array'][] = '
               $(".datepicker").prop("readonly", true);
               $(".datepicker").css("background-color", "white");
';
     }
     if(!empty($load_timepicker)) {
          $GLOBALS['js_files'][] = $GLOBALS['wwwroot_in_admin'] . '/lib/js/jquery-ui-timepicker-addon.js';
          if(file_exists($GLOBALS['dirroot'] . '/lib/js/jquery-ui-timepicker-'.$_SESSION['session_langue'].'.js')) {
               // Configuration pour une langue donnée
               $GLOBALS['js_files'][] = $GLOBALS['wwwroot_in_admin'] . '/lib/js/jquery-ui-timepicker-'.$_SESSION['session_langue'].'.js';
          }
          $datepicker_time_format = str_replace(array('h','%H','%M','%S'), array("'h'",'HH','mm','ss'), $GLOBALS['time_format_long']);
          $GLOBALS['js_ready_content_array'][] = '
               load_timepicker = true;
               $(".datetimepicker").datetimepicker({
                    dateFormat: "'.$datepicker_format.'",
                    changeMonth: true,
                    changeYear: true,
                    showTimePicker: true,
                    showSecond: true,
                    timeFormat: "'.$datepicker_time_format.'",
                    yearRange: "2012:2037"
               });
               $(".datetimepicker").attr("placeholder","'.str_replace(array('HH', 'MM', 'ss', 'd', 'm', 'y', "'"), array('00', '00', '00', String::substr(String::strtolower($GLOBALS['strDays']), 0, 1), String::substr(String::strtolower($GLOBALS['strMonths']), 0, 1), String::substr(String::strtolower($GLOBALS['strYears']), 0, 1), ""), str_replace('y', 'yy', $datepicker_format . ' ' . str_replace('mm', 'MM', $datepicker_time_format))).'");
';
          if(!empty($_SERVER['HTTP_USER_AGENT']) && (strstr($_SERVER['HTTP_USER_AGENT'],'iPhone') || strstr($_SERVER['HTTP_USER_AGENT'],'iPod') || strstr($_SERVER['HTTP_USER_AGENT'],'iPad'))) {
               // Quand on rentre la date on ne veut pas avoir le clavier qui s'affiche car on se sert du datepicker
               $GLOBALS['js_ready_content_array'][] = '
               $(".datetimepicker").prop("readonly", true);
               $(".datetimepicker").css("background-color", "white");
';
          }
     }
     return $output;
}

function get_css_files_to_load($minify = false)
{
     ksort($GLOBALS['css_files']);
     $GLOBALS['css_files'] = array_unique($GLOBALS['css_files']);
     if($minify) {
          $GLOBALS['css_files'] = get_minified_src($GLOBALS['css_files'], 'css', 10800);
          ksort($GLOBALS['css_files']);
     } elseif(!empty($_GET['update']) && $_GET['update'] == 1) {
          foreach($GLOBALS['css_files'] as $this_key => $this_css_file) {
               $GLOBALS['css_files'][$this_key] = $this_css_file . (String::strpos($this_css_file, '?')!==false?'&':'?') . time();
          }
     }
     $temp = $GLOBALS['css_files'];
     $GLOBALS['css_files'] = array();
     return $temp;
}

function output_general_http_header($page_encoding = null, $cache_duration_in_seconds = null) {
     if(empty($page_encoding)) {
          $page_encoding = GENERAL_ENCODING;
     }
     header('Content-type: text/html; charset=' . $page_encoding);
     if (!empty($_SERVER['HTTP_USER_AGENT']) && strpos($_SERVER['HTTP_USER_AGENT'], 'MSIE')!== false) {
          // Demande à IE de ne pas se mettre dans un mode de compatibilité => permet de bénéficier des dernières avancées de la version utilisée
          header('X-UA-Compatible: IE=edge,chrome=1');
     }
     if(!empty($cache_duration_in_seconds)) {
          header('Pragma: public');
          header('Cache-Control: public, max-age=' . $cache_duration_in_seconds . ', must-revalidate');
     }
}

function redirect_and_die($url, $permanent_redirection = false, $avoid_loop = false)
{
     if($avoid_loop && empty($_POST) && $url == get_current_url(true, false)) {
          return false;
     }
     header("Location: " . $url);
     if ($permanent_redirection) {
          header(String::substr(vb($_SERVER['SERVER_PROTOCOL'], 'HTTP/1.0'), 0 , 10) . " 301 Moved Permanently");
     }
     header('Connection: close');
     die();
}

function necessite_priv($priv, $demo_allowed = true, $configuration_modification = false)
{
     if (!a_priv($priv, $demo_allowed, $configuration_modification)) {
          if(String::strpos(get_current_url(true),'chart-data.php')===false){
               $_SESSION['session_redirect_after_login'] = get_current_url(true);
          }
          if(String::strpos($priv, 'admin') === 0 && a_priv("admin*")) {
               redirect_and_die($GLOBALS['administrer_url'] . '/?error=admin_rights');
          } elseif (est_identifie()) {
               redirect_and_die($GLOBALS['wwwroot'] . '/compte.php?error=admin_rights');
          } else {
               redirect_and_die($GLOBALS['wwwroot'] . '/membre.php?error=admin_rights');
          }
     }
}

function necessite_identification()
{
     if (!est_identifie()) {
          $_SESSION['session_redirect_after_login'] = get_current_url(true);
          redirect_and_die($GLOBALS['wwwroot'] . '/membre.php?error=login_rights');
     }
}

function get_identified_lang($langs_array = array())
{
     if (!empty($_GET['langue']) && String::strlen($_GET['langue']) == 2) {
          $return_lang = String::strtolower(trim($_GET['langue']));
     } elseif (empty($_SESSION['session_langue']) || empty($GLOBALS['get_lang_rewrited_wwwroot'][$_SESSION['session_langue']]) || $GLOBALS['get_lang_rewrited_wwwroot'][$_SESSION['session_langue']] != $GLOBALS['detected_wwwroot']) {
          // Au cas où on doit définir la langue à partir de l'URL, donc si on n'est pas dans une logique de langue par repértoire
          // mais de langue par domaine ou sous-domaine, on prend la première trouvée (celle qui a la variable "position" la plus faible)
          // NB : On veut pouvoir détecter des URL du type http://xxxxx.en.domain.com pour des sous-domaines
          foreach ($langs_array as $this_lang) {
               if ((!empty($GLOBALS['get_lang_rewrited_wwwroot'][$this_lang]) && $GLOBALS['get_lang_rewrited_wwwroot'][$this_lang] == $GLOBALS['detected_wwwroot']) || (!empty($GLOBALS['get_lang_rewrited_wwwroot']) && !in_array($GLOBALS['detected_wwwroot'], $GLOBALS['get_lang_rewrited_wwwroot']) && substr_count(str_replace(array('http://', 'https://', 'www.'), '', $GLOBALS['detected_wwwroot']), '.') <= 1 + substr_count(str_replace(array('http://', 'https://', 'www.'), '', $GLOBALS['get_lang_rewrited_wwwroot'][$this_lang]), '.') && strpos(str_replace(array('http://', 'https://', 'www.'), '', $GLOBALS['detected_wwwroot']), str_replace(array('http://', 'https://', 'www.'), '', $GLOBALS['get_lang_rewrited_wwwroot'][$this_lang])) !== false)) {
                    $return_lang = $this_lang;
                    break;
               }
          }
     }
     if (empty($return_lang) && !empty($_SESSION['session_langue'])) {
          // On n'a pas trouvé la langue par défaut proposée (fr) ou on n'a pas trouvé une et une seule langue qui corresponde à l'URL => on force la langue à partir de l'URL
          // La langue de session est applicable dans tous les autres cas
          $return_lang = $_SESSION['session_langue'];
     } elseif (empty($return_lang) && !empty($langs_array)) {
          // Par défaut on prend la langue du navigateur
          $temp = explode(',', vb($_SERVER['HTTP_ACCEPT_LANGUAGE']));
          $return_lang = String::strtolower(String::substr(trim($temp[0]), 0, 2));
          if(!in_array($return_lang, $langs_array)) {
               // A défaut on prend l'anglais
               $return_lang = 'en';
          }
          if(!in_array($return_lang, $langs_array)) {
               // Si on ne trouve aucune langue, on prendra la première langue du site trouvée par défaut
               $return_lang = $langs_array[0];
          }
     } elseif (empty($return_lang)) {
          // Aucune langue configurée : on force l'anglais pour éviter langue vide
          $return_lang = 'en';
     }
     $return_lang = check_language($return_lang, $langs_array);
     return String::substr($return_lang, 0, 2);
}

function check_language($this_lang, $langs_array)
{
     if (!in_array($this_lang, $langs_array) || empty($GLOBALS['lang_etat'][$this_lang]) || !file_exists($GLOBALS['dirroot'] . "/lib/lang/" . $this_lang . ".php")) {
          // The language asked in the URL is not available
          // We redirect to the equivalent page in the default language
          foreach ($langs_array as $this_new_lang) {
               if ($this_new_lang != $this_lang && !empty($GLOBALS['lang_etat'][$this_new_lang]) && get_current_url() != get_current_url_in_other_language($this_new_lang)) {
                    redirect_and_die(get_current_url_in_other_language($this_new_lang));
               }
          }
          // No redirection already done => there was a problem in lang detection => we force a correct language
          $this_lang = current($langs_array);
     }
     return $this_lang;
}

function get_current_url_in_other_language($this_lang)
{
     $this_url_lang = $_SERVER['REQUEST_URI'];
     if (!empty($_GET['langue'])) {
          $original_lang = $_GET['langue'];
          $this_url_lang = str_replace(array('&langue=' . $_GET['langue'], '?langue=' . $_GET['langue'].'&', '?langue=' . $_GET['langue'], 'langue=' . $_GET['langue']), array('', '?', '', ''), $this_url_lang);
     } elseif (!empty($_SESSION['session_langue'])) {
          $original_lang = $_SESSION['session_langue'];
     } else {
          $original_lang = $this_lang;
     }

     $original_lang = strtolower($original_lang);

     if (!check_if_module_active('url_rewriting') || (!empty($GLOBALS['get_lang_rewrited_wwwroot'][$this_lang]) && !empty($GLOBALS['langs_array_by_wwwroot'][$GLOBALS['get_lang_rewrited_wwwroot'][$this_lang]]) && count($GLOBALS['langs_array_by_wwwroot'][$GLOBALS['get_lang_rewrited_wwwroot'][$this_lang]]) > 1)) {
          // Comme le chemin pour une page dans cette langue n'est pas spécifique, alors on doit préciser la langue quand on veut changer de page
          // Il ne faut pas compter les GET pour savoir si on rajoute ? ou &, car les GET peuvent venir du décodage de l'URL Rewriting => il faut regarder uniquement REQUEST_URI
          if (String::strpos($this_url_lang, '?') === false) {
               $this_url_lang .= '?';
          } else {
               $this_url_lang .= '&';
          }
          $this_url_lang .= 'langue=' . $this_lang;
     }
     if (defined('IN_404_ERROR_PAGE')) {
          // Si on est sur une URL qui n'existe pas, il ne faut pas créer de liens dans d'autres langues vers cette URL
          $this_url_lang = '/';
     }
     if (!empty($_SERVER['HTTPS']) && $_SERVER['HTTPS'] != 'off') {
          $this_url_lang = 'https://' . $_SERVER['HTTP_HOST'] . $this_url_lang;
     } else {
          $this_url_lang = 'http://' . $_SERVER['HTTP_HOST'] . $this_url_lang;
     }
     $this_url_lang = str_replace($GLOBALS['wwwroot'], $GLOBALS['wwwroot_main'], $this_url_lang);
     if (!empty($GLOBALS['get_lang_rewrited_wwwroot'][$original_lang])) {
          $this_url_lang = str_replace($GLOBALS['get_lang_rewrited_wwwroot'][$original_lang], $GLOBALS['wwwroot_main'], $this_url_lang);
     } else {
          $this_url_lang = str_replace($GLOBALS['wwwroot_main'] . '/' . $original_lang, $GLOBALS['wwwroot_main'], $this_url_lang);
     }
     if (defined('USER_SUBDOMAIN') && $GLOBALS['detected_wwwroot'] != $GLOBALS['wwwroot']) {
          // URL du type http://xxxx.domain.com/x.html  => on veut retiter les xxx et les remettre après
          $subdomain_array = explode('.', $_SERVER['HTTP_HOST']);
          $subdomain = $subdomain_array[0];
          $this_url_lang = str_replace(array('http://' . $_SERVER['HTTP_HOST'], 'https://' . $_SERVER['HTTP_HOST']), $GLOBALS['wwwroot_main'], $this_url_lang);
     }
     if (!empty($GLOBALS['get_lang_rewrited_wwwroot'][$this_lang])) {
          $this_url_lang = str_replace($GLOBALS['wwwroot_main'], $GLOBALS['get_lang_rewrited_wwwroot'][$this_lang], $this_url_lang);
     }
     if (!empty($subdomain) && $subdomain != 'www' && $subdomain != $original_lang) {
          // On remet le sous-domaine si nécessaire
          $this_url_lang = str_replace(array('://', 'www.'), array('://' . $subdomain . '.', ''), $this_url_lang);
     }
     return $this_url_lang;
}

function get_current_url($with_get = true, $get_short_url = false, $take_away_get_args_array = null)
{
     if(defined('IN_CRON')) {
          // get_current_url ne doit pas être utilisée dans un cron, aucune URL n'appelle la page dans ce cas.
          return null;
     }
     $url = '';
     if (!$get_short_url) {
          if (!empty($_SERVER['HTTPS']) && $_SERVER['HTTPS'] != 'off') {
               $url .= 'https://';
          } else {
               $url .= 'http://';
          }
          $url .= $_SERVER['HTTP_HOST'];
     }
     $url .= $_SERVER['REQUEST_URI'];
     if (!$with_get && String::strpos($url, '?') !== false) {
          $url = String::substr($url, 0, String::strpos($url, '?'));
     } elseif(!empty($take_away_get_args_array)) {
          // On évite par exemple  les problèmes de parenthèses encodées par PHP mais pas par apache
          $entities = array('%21', '%2A', '%27', '%28', '%29', '%3B', '%3A', '%40', '%26', '%3D', '%2B', '%24', '%2C', '%2F', '%3F', '%25', '%23', '%5B', '%5D');
          $replacements = array('!', '*', "'", "(", ")", ";", ":", "@", "&", "=", "+", "$", ",", "/", "?", "%", "#", "[", "]");
          foreach($take_away_get_args_array as $key) {
               if (!empty($_GET[$key])) {
                    $this_value = $_GET[$key];
                    if(is_array($this_value)) {
                         continue;
                    }
                    $url = str_replace(array(urlencode($key).'='.urlencode($this_value), urlencode($key).'='.str_replace($entities, $replacements, urlencode($this_value)), $key.'='.$this_value), '', $url);
                    $url = str_replace(array('?&', '&&'), array('?','&'), $url);
               }
          }
          if (String::substr($url, - 1) == '?' || String::substr($url, - 1) == '&') {
               $url = String::substr($url, 0, String::strlen($url) - 1);
          }
     }
     return $url;
}


function get_current_generic_url()
{
     static $uri_array;
     $params = $_GET;
     $cache_key = md5(serialize($params));
     if (empty($uri_array[$cache_key])) {
          $queryString = array();
          $uri = get_current_url(false);
          $excluded_get[] = 'page';
          $excluded_get[] = 'multipage';
          $excluded_get[] = 'nombre';
          $excluded_get[] = 'update';
          if(!empty($params['type']) && $params['type']=='error404') {
               $excluded_get[] = 'type';
          }
          if (check_if_module_active('url_rewriting')) {
               // Si le module d'URL Rewriting est activé, ces données GET sont déjà comprises dans les URL
               // et doivent donc être exclues ici
               if (strpos($_SERVER['PHP_SELF'], 'lire/index.php') !== false) {
                    $excluded_get[] = 'rubid';
               } elseif (strpos($_SERVER['PHP_SELF'], 'lire/article_details.php') !== false) {
                    $excluded_get[] = 'id';
                    $excluded_get[] = 'rubid';
               } elseif (strpos($_SERVER['PHP_SELF'], 'achat/index.php') !== false) {
                    $excluded_get[] = 'catid';
               } elseif (strpos($_SERVER['PHP_SELF'], 'achat/produit_details.php') !== false) {
                    $excluded_get[] = 'id';
                    $excluded_get[] = 'catid';
               }
               if (check_if_module_active('annonces') && !empty($_GET['catid']) && defined('IN_CATALOGUE_ANNONCE')) {
                    // Page de catégorie d'annonces
                    $excluded_get[] = 'catid';
                    $uri = str_replace('-' . String::rawurlencode(vn($_GET['page'])) . '-' . String::rawurlencode(vn($_GET['catid'])) . '.html', '-[PAGE]-' . String::rawurlencode(vn($_GET['catid'])) . '.html', $uri);
               } elseif (check_if_module_active('vitrine') && get_current_url(false, true) == '/' . vn($_GET['page']) . '.html') {
                    // Page de boutique
                    $uri = str_replace('/' . String::rawurlencode(vn($_GET['page'])) . '.html', '/[PAGE]' . '.html', $uri);
               } elseif (check_if_module_active('vitrine') && get_current_url(false, true) == '/') {
                    // Page de boutique : accueil
                    $uri .= '[PAGE].html';
               } elseif (check_if_module_active('vitrine') && String::rawurldecode(get_current_url(false, true)) == String::rawurldecode('/' . $GLOBALS['STR_MODULE_ANNONCES_URL_BUY'] . '/' . $GLOBALS['STR_MODULE_ANNONCES_URL_LIST_SHOWCASE'] . '-' . String::rawurlencode(vn($_GET['page'])) . '.html')) {
                    // Page de liste des vitrines
                    $uri = str_replace('-' . String::rawurlencode(vn($_GET['page'])) . '.html', '-[PAGE].html', $uri);
               } elseif (check_if_module_active('vitrine') && strpos(get_current_url(false, true), '/'.$GLOBALS['STR_MODULE_ANNONCES_URL_VITRINE'].'-')===0) {
                    // Page de boutique non verified
                    $excluded_get[] = 'bt';
                    $uri = str_replace('/'.$GLOBALS['STR_MODULE_ANNONCES_URL_VITRINE'].'-'.String::rawurlencode(vn($_GET['page'])), '/'.$GLOBALS['STR_MODULE_ANNONCES_URL_VITRINE'].'', $uri);
                    // On fait le remplacement en deux étapes pour bien capter les URL STR_MODULE_ANNONCES_URL_VITRINE-... et STR_MODULE_ANNONCES_URL_VITRINE tout court
                    $uri = str_replace('/'.$GLOBALS['STR_MODULE_ANNONCES_URL_VITRINE'], '/'.$GLOBALS['STR_MODULE_ANNONCES_URL_VITRINE'].'-[PAGE]', $uri);
               } elseif (check_if_module_active('vitrine') && strpos(get_current_url(false, true), '/'.$GLOBALS['STR_MODULE_ANNONCES_URL_VITRINE'].'-'.String::rawurlencode(vn($_GET['page'])) . '-')===0) {
                    // Page de boutique non verified
                    $excluded_get[] = 'bt';
                    $uri = str_replace('/'.$GLOBALS['STR_MODULE_ANNONCES_URL_VITRINE'].'-'.String::rawurlencode(vn($_GET['page'])), '/'.$GLOBALS['STR_MODULE_ANNONCES_URL_VITRINE'].'-[PAGE]', $uri);
               } elseif (String::rawurldecode(get_current_url(false, true)) == String::rawurldecode('/produits/' . String::rawurlencode(vb($_GET['search'])) . '.html')) {
                    $excluded_get[] = 'search';
                    $uri = str_replace('.html', '-[PAGE].html', $uri);
               } elseif (String::rawurldecode(get_current_url(false, true)) == String::rawurldecode('/produits/' . String::rawurlencode(vb($_GET['search'])) . '-' . String::rawurlencode(vn($_GET['page'])) . '.html')) {
                    $excluded_get[] = 'search';
                    $uri = str_replace('-' . String::rawurlencode(vn($_GET['page'])) . '.html', '-[PAGE].html', $uri);
               } elseif (check_if_module_active('annonces') && !empty($_GET['country']) && strpos(get_current_url(false, true),'-' . String::rawurlencode(vb($_GET['country'])) . '.html') !== false) {
                    // Page de liste des vitrines
                    $excluded_get[] = 'country';
               }
               if (check_if_module_active('annonces')) {
                    foreach(array('/' . $GLOBALS['STR_MODULE_ANNONCES_URL_BUY'] . '/'.$GLOBALS['STR_MODULE_PREMIUM_URL_ADS_BY_KEYWORD'].'-', '/kopen/supplier-research-', '/kaufen/supplier-research-', '/buy/supplier-research-', '/buy/supplier-research-', '/acheter/recherche-fournisseur-', '/comprar/busqueda-proveedor-') as $this_url_rewriting_main_expression) {
                         if(    String::rawurldecode(get_current_url(false, true)) == String::rawurldecode($this_url_rewriting_main_expression . String::rawurlencode(vn($_GET['page'])) . '-' . String::rawurlencode(vb($_GET['search'])) . '.html')
                              || String::rawurldecode(get_current_url(false, true)) == String::rawurldecode($this_url_rewriting_main_expression . String::rawurlencode(vn($_GET['page'])) . '-' . String::rawurlencode(urlencode(vb($_GET['search']))) . '.html')) {
                              $excluded_get[] = 'search';
                              // Si l'URL contient un +, pas encodé ou encodé en %2B, il faut le gérer quoiqu'il arrive => on a deux possibilités dans le str_replace
                              // La troisième est là pour couvrir des URL du type : /acheter/recherche-fournisseur-54-pc+.html?search=pc+
                              // Rappel : dans une URL réécrite, la partie en dehors du GET est gérée du type String::rawurlencode (et + vaut normalement %2B), et la partie GET est gérée par urlencode (et espace vaut +)
                              $uri = str_replace($this_url_rewriting_main_expression, '/' . $GLOBALS['STR_MODULE_ANNONCES_URL_BUY'] . '/'.$GLOBALS['STR_MODULE_PREMIUM_URL_ADS_BY_KEYWORD'].'-', str_replace(array('-' . String::rawurlencode(vn($_GET['page'])) . '-' . String::rawurlencode(vb($_GET['search'])) . '.html', '-' . vn($_GET['page']) . '-' . vb($_GET['search']) . '.html', '-' . vn($_GET['page']) . '-' . urlencode(vb($_GET['search'])) . '.html'), '-[PAGE]-' . String::rawurlencode(vb($_GET['search'])) . '.html', $uri));
                              break;
                         }
                    }
               }
               // Compatibilité anciennes URL
               $excluded_get[] = 'subdomain';
               $excluded_get[] = 'pageNum_rs1';
          }
          foreach ($params as $key => $value) {
               if (!in_array($key, $excluded_get) && (!empty($value) || $value==='0')) {
                    if(is_array($value)){
                         foreach($value as $this_key => $this_value){
                              $queryString[] = $key . '[' . $this_key . ']=' . urlencode($this_value);
                         }
                    }else{
                         $queryString[] = $key . '=' . urlencode($value);
                    }
               }
          }
          if (count($queryString) > 0) {
               $uri .= '?' . implode('&', $queryString);
          }
          $uri_array[$cache_key] = $uri;
     }
     return $uri_array[$cache_key];
}
     
function get_size_name($size_id)
{
     $sql = 'SELECT nom_' . $_SESSION['session_langue'] . '
          FROM peel_tailles
          WHERE id ="' . intval($size_id) . '" AND ' . get_filter_site_cond('tailles');
     $query = query($sql);

     if ($size = fetch_assoc($query)) {
          $return = $size['nom_' . $_SESSION['session_langue']];
     } else {
          $return = "";
     }

     return $return;
}

function get_color_name($color_id)
{
     $sql = "SELECT c.*
          FROM peel_couleurs c
          WHERE c.id = '" . intval(vn($color_id)) . "' AND " .  get_filter_site_cond('couleurs', 'c');
     $query = query($sql);

     if ($this_color = fetch_assoc($query)) {
          $couleur = $this_color['nom_' . $_SESSION['session_langue']];
     } else {
          $couleur = "";
     }
     return $couleur;
}

function set_lang_configuration_and_texts($lang, $load_default_lang_files_before_main_lang_array = null, $general_setup = true, $load_modules_files = true, $load_general_admin_files = true, $exclude_empty_string = true, $skip_load_files = false)
{
     if (empty($lang) && !empty($GLOBALS['lang_codes'])) {
          // pas de langue passé en paramètre. Il faut récupérer la langue principal du site. $GLOBALS['lang_codes'] est rempli selon les contraintes du site en cours, et dans le bon ordre. On peut prendre le premier éléments de ce tableau.
          $lang = $GLOBALS['lang_codes'][0];
     }
     if($general_setup) {
          // On redéfinit wwwroot proprement à partir du wwwroot théorique et des règles d'URL rewriting.
          $GLOBALS['wwwroot'] = get_lang_rewrited_wwwroot($lang);
          if(!empty($GLOBALS['site_parameters']['avoid_lang_folders_in_minified_css']) && !empty($GLOBALS['lang_url_rewriting'][$_SESSION['session_langue']]) && strpos($GLOBALS['lang_url_rewriting'][$_SESSION['session_langue']], '//') === false && strpos($GLOBALS['lang_url_rewriting'][$_SESSION['session_langue']], '.') === false) {
               // Si on veut dans le minify avoir des liens vers les fichiers sans les dossiers de langue
               $GLOBALS['apparent_folder'] = $GLOBALS['apparent_folder_main'] . $GLOBALS['lang_url_rewriting'][$_SESSION['session_langue']];
          }
          // Maintenant que wwwroot est paramétré définitivement, on peut définir les derniers répertoires
          if (!empty($GLOBALS['site_parameters']['admin_force_ssl']) || (defined('IN_PEEL_ADMIN') && (!empty($_SERVER['HTTPS']) && $_SERVER['HTTPS'] != 'off'))) {
               // L'administrateur consulte la page en https dans l'administration => Les liens dans la page doivent être en https également.
               $GLOBALS['wwwroot_in_admin'] = str_replace('http://', 'https://', $GLOBALS['wwwroot']);
          } else {
               $GLOBALS['wwwroot_in_admin'] = $GLOBALS['wwwroot'];
          }
          $GLOBALS['administrer_url'] = $GLOBALS['wwwroot_in_admin'] . "/" . vb($GLOBALS['site_parameters']['backoffice_directory_name']);
          // Attention : $GLOBALS['repertoire_modele'] est avec dirroot et non pas wwwroot, n'est pas forcément encore défini quand on passe ici, il ne faut donc pas l'utiliser
          $GLOBALS['repertoire_css'] = get_wwwroot_cdn('repertoire_css') . "/modeles/" . vb($GLOBALS['site_parameters']['template_directory']) . "/css";
          $GLOBALS['repertoire_images'] = get_wwwroot_cdn('repertoire_images') . "/modeles/" . vb($GLOBALS['site_parameters']['template_directory']) . "/images";
          $GLOBALS['repertoire_upload'] = get_wwwroot_cdn('repertoire_upload') . "/upload";
          $GLOBALS['repertoire_mp3'] = get_wwwroot_cdn('repertoire_mp3') . "/mp3";
          $GLOBALS['repertoire_mp3_extrait'] = get_wwwroot_cdn('repertoire_mp3_extrait') . "/mp3_extrait";
          // Paramétrage des formats de date pour les fonctions strftime()
          $main_langs = array('en' => 'en_US', 'fr' => 'fr_FR', 'de' => 'de_DE', 'es' => 'es_ES', 'it' => 'it_IT', 'pt' => 'pt_PT', 'ar' => 'ar_SA', 'el' => 'el', 'fi' => 'fi',
               'hu' => 'hu', 'bg' => 'bg', 'zh' => 'zh_cn', 'no' => 'no_no');
          if (empty($main_langs[$lang])) {
               $main_langs[$lang] = String::strtolower($lang) . '_' . String::strtoupper($lang);
          }
          // Gestion de setlocale sous windows : pour gérer les langues sous windows il faut mettre la langue sous format 3 lettres ou l'écrire en anglais
          // Voir http://www.w3schools.com/vbscript/func_setlocale.asp
          // lang_TERRITORY.codeset
          // - language is an ISO 639 language code
          // - territory is an ISO 3166 country code
          // - codeset is a character set or encoding identifier like ISO-8859-1 or UTF-8
          $variations_langs = array('en' => 'english', 'fr' => 'french', 'de' => 'german', 'es' => 'spanish', 'pt' => 'portuguese', 'it' => 'italian', 'zh' => 'chinese-simplified',
               'ja' => 'japanese', 'ru' => 'russian', 'nl' => 'dutch');
          $variations_langs2 = array('zh' => 'chi');
          setlocale(LC_TIME, $main_langs[$lang] . '.UTF8', String::strtolower($lang) . '.UTF8', vb($variations_langs[$lang], String::strtolower($lang)) . '.utf8', vb($variations_langs2[$lang], String::strtolower($lang)) . '.utf8', $main_langs[$lang], String::strtolower($lang), vb($variations_langs[$lang], String::strtolower($lang)), vb($variations_langs2[$lang], String::strtolower($lang)));
          // Déclaration du nom de la boutique
          $GLOBALS['site'] = vb($GLOBALS['site_parameters']['nom_' . $lang]);
          if (empty($GLOBALS['site'])) {
               $GLOBALS['site'] = $GLOBALS['wwwroot'];
          }
     }
     if(!$skip_load_files) {
          if(!empty($load_default_lang_files_before_main_lang_array)){
               $successive_loads = $load_default_lang_files_before_main_lang_array;
          }
          $successive_loads[] = $lang;
          foreach(array_unique($successive_loads) as $this_lang) {
               if($exclude_empty_string && count($successive_loads)>1 && $this_lang != $successive_loads[0]){
                    foreach($GLOBALS as $this_global => $this_value) {
                         // On ne copie pas GLOBALS simplement car sinon ça fait une copie par référence. Or on veut les valeurs et surtout pas les références
                         if($this_value !== '' && substr($this_global, 0, 4) == 'STR_') {
                              // On récupère les variables de langue non vides
                              $temp_globals[$this_global] = $this_value;
                         }
                    }
               }
               if($general_setup) {
                    if(file_exists($GLOBALS['dirroot'] . "/lib/lang/datetime_" . $this_lang . ".php")) {
                         include($GLOBALS['dirroot'] . "/lib/lang/datetime_" . $this_lang . ".php");
                    }
                    if(file_exists($GLOBALS['dirroot'] . "/lib/lang/" . $this_lang . ".php")) {
                         include($GLOBALS['dirroot'] . "/lib/lang/" . $this_lang . ".php");
                    }
                    if(file_exists($GLOBALS['dirroot'] . "/lib/lang/meta_" . $this_lang . ".php")) {
                         include($GLOBALS['dirroot'] . "/lib/lang/meta_" . $this_lang . ".php");
                    }
               }
               if($load_general_admin_files) {
                    if(file_exists($GLOBALS['dirroot'] . "/lib/lang/admin_" . $this_lang . ".php")) {
                         include($GLOBALS['dirroot'] . "/lib/lang/admin_" . $this_lang . ".php");
                    }
               }
               if(IN_INSTALLATION || !empty($GLOBALS['installation_folder_active'])) {
                    include($GLOBALS['dirroot'] . "/lib/lang/admin_install_" . $this_lang . ".php");
               }
               if($load_modules_files && !empty($GLOBALS['modules_lang_folders_to_load_array'])){
                    // Les variables de langue dans les modules sont plus prioritaires que celles de lib/lang/
                    // => la surcharge des valeurs STR_XXX par défaut est possible
                    $default_lang_if_file_not_found = 'en';
                    ksort($GLOBALS['modules_lang_folders_to_load_array']);
                    foreach($GLOBALS['modules_lang_folders_to_load_array'] as $this_directory) {
                         if(String::strpos($this_directory, $GLOBALS['dirroot']) === false) {
                              $this_directory = $GLOBALS['dirroot'] . $this_directory;
                         }
                         if(file_exists($this_directory . $this_lang . ".php")) {
                              include($this_directory . $this_lang . ".php");
                         } elseif(file_exists($this_directory . $default_lang_if_file_not_found . ".php")) {
                              include($this_directory . $default_lang_if_file_not_found . ".php");
                         }
                    }
               }
               if($exclude_empty_string && count($successive_loads)>1 && $this_lang != $successive_loads[0]) {
                    foreach($GLOBALS as $this_global => $this_value) {
                         // Le test ci-dessous doit être très rapide, car on a plus de mille passages ici à chaque fois
                         // Rappel : si un test renvoie false, la suite && ... n'est pas exécuté => commencer tests par le plus discrimant et le plus rapide
                         if($this_value === '' && substr($this_global, 0, 4) == 'STR_' && !empty($temp_globals[$this_global]) && $this_global != 'STR_BEFORE_TWO_POINTS') {
                              // On récupère les variables de langue non vides
                              $GLOBALS[$this_global] = $temp_globals[$this_global];
                         }
                    }
               }
               // Chargement des variables de langue venant de la BDD
               // On charge d'abord les variables de langue s'appliquant à toutes les langues (lang='') puis celles spécifiques à la langue donnée
               if ($general_setup && !IN_INSTALLATION && empty($GLOBALS['installation_folder_active'])) {
                    load_site_parameters($this_lang, true);
               }
          }
          foreach($GLOBALS as $this_global => $this_value) {
               if(substr($this_global, 0, 4) == 'STR_') {
                    if(strpos($this_global, '_URL_') === false) {
                         $this_config = 'replace_words_in_lang_files';
                    } else {
                         $this_config = 'replace_url_words_in_lang_files';
                    }
                    if(!empty($GLOBALS['site_parameters'][$this_config]) && is_array($GLOBALS['site_parameters'][$this_config])) {
                         // Remplacement de mots clés par des versions personnalisées pour le site
                         foreach($GLOBALS['site_parameters'][$this_config] as $replaced=>$new) {
                              if(strpos($this_value, $replaced) !== false) {
                                   $GLOBALS['before_replace_words_in_lang_files'][$this_global] = $this_value;
                                   $this_value = str_replace($replaced, $new, $this_value);
                                   $this_value = str_replace('/'.$new, '/'.$replaced, $this_value);
                                   $GLOBALS[$this_global] = $this_value;
                              }
                         }
                    }
                    // Préparation d'un tableau de variables de langue pour Smarty => facilite intégrations graphiques de pouvoir intégrer facilement les textes directement
                    $GLOBALS['LANG'][$this_global] = $this_value;
               }
          }
          // Gestion des ids correspondant à contact commercial et autres
          // A modifier manuellement suivant configuration du site - Par défaut:  choix 5 et 7
          $i = 0;
          while (isset($GLOBALS['STR_USER_ORIGIN_OPTIONS_' . ($i+1)])) {
               $i++;
          }
          $GLOBALS['origin_other_ids'] = array($i - 2, $i);
          if(!isset($GLOBALS['site_parameters']['user_mandatory_fields'])) {
               $GLOBALS['site_parameters']['user_mandatory_fields'] = array(
                    'prenom' => 'STR_ERR_FIRSTNAME',
                    'nom_famille' => 'STR_ERR_NAME',
                    'adresse' => 'STR_ERR_ADDRESS',
                    'code_postal' => 'STR_ERR_ZIP',
                    'ville' => 'STR_ERR_TOWN',
                    'pays' => 'STR_ERR_COUNTRY',
                    'telephone' => 'STR_ERR_TEL',
                    'email' => 'STR_ERR_EMAIL',
                    'pseudo' => 'STR_ERR_PSEUDO',
                    'token' => 'STR_INVALID_TOKEN');
               if(check_if_module_active('annonces')) {
                    if(vb($GLOBALS['site_parameters']['type_affichage_user_favorite_id_categories']) == 'checkbox') {
                         $GLOBALS['site_parameters']['user_mandatory_fields']['id_categories'] = 'STR_ERR_FIRST_CHOICE';
                    } elseif (vb($GLOBALS['site_parameters']['type_affichage_user_favorite_id_categories']) == 'select') {
                         $GLOBALS['site_parameters']['user_mandatory_fields']['id_cat_1']  = 'STR_ERR_FIRST_CHOICE';
                    }
                    $GLOBALS['site_parameters']['user_mandatory_fields']['cgv_confirm'] = 'STR_ERR_CGV';
                    $GLOBALS['site_parameters']['user_mandatory_fields']['mot_passe_confirm'] = 'STR_ERR_PASS_CONFIRM';
               }
               if(!empty($GLOBALS['site_parameters']['add_b2b_form_inputs'])) {
                    $GLOBALS['site_parameters']['user_mandatory_fields']['societe'] = 'STR_ERR_SOCIETY';
                    $GLOBALS['site_parameters']['user_mandatory_fields']['type'] = 'STR_ERR_YOU_ARE';
                    $GLOBALS['site_parameters']['user_mandatory_fields']['activity'] = 'STR_ERR_ACTIVITY';
                    $GLOBALS['site_parameters']['user_mandatory_fields']['siret'] = 'STR_ERR_SIREN';
               }
          }
          if (preg_match('/msie 6./i', $_SERVER['HTTP_USER_AGENT']) || preg_match('/msie 7./i', $_SERVER['HTTP_USER_AGENT']) || preg_match('/msie 8./i', $_SERVER['HTTP_USER_AGENT'])) {
               // NB : Fineuploader est désactivé pour IE <=8
               $GLOBALS['site_parameters']['used_uploader'] = 'html';
          }
          if (preg_match('/msie 6./i', $_SERVER['HTTP_USER_AGENT']) || preg_match('/msie 7./i', $_SERVER['HTTP_USER_AGENT'])) {
               // NB : aucun support de IE6 ou 7, mais ça permet tout de même d'accéder à la homepage de l'administration sans bug javascript
               $GLOBALS['site_parameters']['chart_product'] = 'flash';
          }
     }
}

function load_active_languages_list($site_id = null)
{
     // loaded_once ne sert que pour l'installation.
     static $loaded_once;
     if (!IN_INSTALLATION && empty($GLOBALS['installation_folder_active'])) {
          unset($GLOBALS['lang_codes'], $GLOBALS['admin_lang_codes'], $GLOBALS['lang_flags'], $GLOBALS['lang_names'], $GLOBALS['lang_etat'], $GLOBALS['lang_url_rewriting'], $GLOBALS['load_default_lang_files_before_main_lang_array_by_lang'], $GLOBALS['get_lang_rewrited_wwwroot'], $GLOBALS['langs_array_by_wwwroot']);
          $select = '';
          if(!empty($site_id)) {
               // D'abord on récupère les langues actives
               $sql_or_array[] = get_filter_site_cond('langues');
               if(defined('IN_PEEL_ADMIN')) {
                    // On récupère la liste des langues administrables (ce sera avec un OR par rapport à la condition ci-dessus des langues actives)
                    $sql_or_array[] = get_filter_site_cond('langues', null, true);
                    // Si une langue est sélectionnée du fait des droits sur le site administré, elle ne doit pas pour autant être autorisée en etat=1 => on recalcule la variable etat
                    // Par ailleurs une langue qui est active sur le site en cours d'utilisation ne doit pas se retrouver dans la liste des langues administrables (du fait qu'on administre à ce moment-là un autre site)
                    $select .= ", ".(!empty($site_id)?"IF(etat=1 AND NOT (" . get_filter_site_cond('langues') . "), -1, etat)":"etat") . " AS etat, IF(NOT (".get_filter_site_cond('langues', null, true). "), 1, 0) AS admin_disallowed";
               }
               if(empty($sql_or_array)) {
                    $sql_or_array[] = "1";
               }
          } else {
               $sql_or_array[] = 1;
          }
          $sqlLng = "SELECT * ".$select."
               FROM peel_langues
               WHERE (" . implode(" OR ", $sql_or_array) . ")";
          if (!empty($GLOBALS['site_parameters']['restricted_languages_array'])) {
               // La requête va chercher toutes les langues disponibles selon la configuration en BDD. Il est possible avec restricted_languages_array de restreindre les langues retournées par la requête.
               // C'est pratique par exemple dans le cas d'un site multisite, et qu'il est nécessaire de configurer des langues pour certains sites. Il faut dans ce cas associer les langues pour 'Tous les sites' sur la page d'administration des langues, et définir la variable restricted_languages_array pour chaque site.
               $sqlLng .= " AND (lang IN ('" . implode("','", $GLOBALS['site_parameters']['restricted_languages_array']) . "'))";
          }
          $sqlLng .= "
               ORDER BY IF(etat = '1'". (!empty($_GET['langue'])?" OR lang='" . word_real_escape_string($_GET['langue']) . "'":'') . ", 1, 0) DESC, position ASC";
          $resLng = query($sqlLng);
          $GLOBALS['lang_etat'] = array();
          while ($lng = fetch_assoc($resLng)) {
               if($lng['etat'] == 1 || (!empty($_GET['langue']) && $lng['lang'] == $_GET['langue'])) {
                    $GLOBALS['lang_codes'][] = $lng['lang'];
                    $GLOBALS['admin_lang_codes'][] = $lng['lang'];
                    if(empty($lng['admin_disallowed'])) {
                         $GLOBALS['admin_lang_codes_with_modify_rights'][] = $lng['lang'];
                    }
               } elseif($lng['etat'] == -1) {
                    // Langue administrable mais pas en production
                    $GLOBALS['admin_lang_codes'][] = $lng['lang'];
                    if(empty($lng['admin_disallowed'])) {
                         $GLOBALS['admin_lang_codes_with_modify_rights'][] = $lng['lang'];
                    }
               }
               if(!isset($GLOBALS['lang_etat'][$lng['lang']])) {
                    $GLOBALS['lang_flags'][$lng['lang']] = $lng['flag'];
                    $GLOBALS['lang_names'][$lng['lang']] = $lng["nom_" . $lng['lang']];
                    $GLOBALS['lang_etat'][$lng['lang']] = $lng['etat'];
                    $GLOBALS['lang_url_rewriting'][$lng['lang']] = $lng["url_rewriting"];
               }
               if(!empty($lng['load_default_lang_files_before_main_lang'])) {
                    $GLOBALS['load_default_lang_files_before_main_lang_array_by_lang'][$lng['lang']] = explode(',', $lng['load_default_lang_files_before_main_lang']);
               }
          }
          if(empty($GLOBALS['lang_codes'])){
               // Si on n'a pas trouvé au moins une langue, on prend les langues même inactives
               $GLOBALS['lang_codes'] = array_keys($GLOBALS['lang_etat']);
          }
          if(empty($GLOBALS['lang_codes'])){
               // Si on n'a toujours pas trouvé au moins une langue, on renseigne l'anglais par défaut
               $GLOBALS['lang_flags']['en'] = '/images/en.png';
               $GLOBALS['lang_names']['en'] = 'English';
               $GLOBALS['lang_etat']['en'] = 1;
               $GLOBALS['lang_url_rewriting']['en'] = '';
               $GLOBALS['lang_codes'][] = 'en';
          }
          if(empty($GLOBALS['admin_lang_codes'])){
               // Si on n'a pas trouvé au moins une langue, on prend les langues même inactives
               $GLOBALS['admin_lang_codes'] = $GLOBALS['lang_codes'];
          }
          $GLOBALS['lang_codes'] = array_unique($GLOBALS['lang_codes']);
          $GLOBALS['admin_lang_codes'] = array_unique($GLOBALS['admin_lang_codes']);
          if(!empty($GLOBALS['admin_lang_codes_with_modify_rights'])) {
               $GLOBALS['admin_lang_codes_with_modify_rights'] = array_unique($GLOBALS['admin_lang_codes_with_modify_rights']);
          }
          // Initialisation de la SESSION langue
          foreach($GLOBALS['lang_codes'] as $this_lang) {
               $GLOBALS['get_lang_rewrited_wwwroot'][$this_lang] = get_lang_rewrited_wwwroot($this_lang);
               $GLOBALS['langs_array_by_wwwroot'][$GLOBALS['get_lang_rewrited_wwwroot'][$this_lang]][] = $this_lang;
          }
     } elseif(empty($loaded_once)) {
          // Récupération des langues possibles pour l'installation
          $lang_dir = $GLOBALS['dirroot'] . "/lib/lang";
          if ($handle = opendir($lang_dir)) {
               while ($file = readdir($handle)) {
                    if ($file != "." && $file != ".." && is_file($lang_dir . '/' . $file) && strtolower($file) == $file) {
                         if (substr($file, 0, strlen('admin_install_')) == 'admin_install_' && substr($file, strlen('admin_install_')+2) == '.php') {
                              $lng = substr($file, strlen('admin_install_'), 2);
                              // Fichier du type admin_install_xx.php pour l'interface d'installation
                              $GLOBALS['lang_codes'][] = $lng;
                              if(!empty($GLOBALS['langs_flags_correspondance'][$lng])){
                                   $GLOBALS['lang_flags'][$lng] = $GLOBALS['langs_flags_correspondance'][$lng];
                              } else {
                                   $GLOBALS['lang_flags'][$lng] = '/images/'.$lng.'.png';
                              }
                              if(file_exists($GLOBALS['dirroot'] . '/lib/lang/database_langues_'.$lng.'.php')) {
                                   include($GLOBALS['dirroot'] . '/lib/lang/database_langues_'.$lng.'.php');
                              } else {
                                   include($GLOBALS['dirroot'] . '/lib/lang/database_langues_en.php');
                              }
                              if(!empty($peel_langues['nom']) && !empty($peel_langues['nom'][$lng])) {
                                   // Variable locale et non pas globale pour peel_langues car issue de @include($GLOBALS['dirroot'] . '/lib/lang/database_langues_'.$_SESSION['session_langue'].'.php');
                                   $GLOBALS['lang_names'][$lng] = $peel_langues['nom'][$lng];
                              } else {
                                   $GLOBALS['lang_names'][$lng] = $lng;
                              }
                              $GLOBALS['admin_lang_codes'][$GLOBALS['lang_names'][$lng]] = $lng;
                              $GLOBALS['lang_etat'][$lng] = 1;
                              $GLOBALS['lang_url_rewriting'][$lng] = '';
                         }elseif (substr($file, 2) == '.php') {
                              $lng = substr($file, 0, 2);
                              // Fichier du type xx.php pour savoir quelles langues on peut installer pour le site
                              $GLOBALS['available_languages'][] = $lng;
                         }
                    }
               }
          }
          ksort($GLOBALS['admin_lang_codes']);
     }
     foreach($GLOBALS['lang_codes'] as $this_lang) {
          // Ajout des gros drapeaux
          if(file_exists($GLOBALS['dirroot'] . '/images/'.$this_lang.'_large.png')) {
               $GLOBALS['lang_flags_big'][$this_lang] = vb($GLOBALS['wwwroot']) . '/images/'.$this_lang.'_large.png';
          }
     }
     $loaded_once = true;
}

function get_apparent_folder() {
     $formatted_dirroot = str_replace('\\', '/', $GLOBALS['dirroot']);
     $file_called_real_path = str_replace('\\', '/', @realpath('./'));
     if (!empty($_SERVER['SCRIPT_FILENAME']) && (empty($file_called_real_path) || (strpos($file_called_real_path, $formatted_dirroot) === false && strpos(str_replace('\\', '/', dirname($_SERVER['SCRIPT_FILENAME'])), $formatted_dirroot) !== false))) {
          // On gère les cas d'incohérences entre realpath et SCRIPT_FILENAME chez certains hébergeurs
          $file_called_real_path = str_replace('\\', '/', dirname($_SERVER['SCRIPT_FILENAME']));
     }
     if (strpos($file_called_real_path, 'public_html') === false && strpos($formatted_dirroot, 'public_html') !== false) {
          $file_called_real_path = str_replace('private_html/', 'public_html/', $file_called_real_path);
     }
     if (!empty($file_called_real_path) && strpos($file_called_real_path, $formatted_dirroot) !== false) {
          // Cas normal
          if ($formatted_dirroot == $file_called_real_path) {
               $peel_subfolder = '';
          } else {
               // CAS PARTICULIER : Sur 1&1 par exemple quand on est en multidomaine, le début de dirroot est /kunden/ alors que sinon il n'y a pas /kunden
               // Pour être le plus compatible possible, on commence donc par strpos($file_called_real_path, $formatted_dirroot)
               $peel_subfolder = substr($file_called_real_path, strpos($file_called_real_path, $formatted_dirroot) + strlen($formatted_dirroot));
          }
     } else {
          // Au cas où __FILE__ et SCRIPT_FILENAME ne seraient pas cohérents à cause d'alias de dossiers sur l'hébergement
          // Dans ce cas on considère arbitrairement qu'il n'y a pas de sous-dossier à prendre
          $peel_subfolder = '';
     }
     $file_called_relative_path = str_replace('\\', '/', dirname($_SERVER['PHP_SELF']));
     $apparent_folder = substr($file_called_relative_path, 0, strlen($file_called_relative_path) - strlen($peel_subfolder));
     if (empty($apparent_folder) || substr($apparent_folder, strlen($apparent_folder) - 1) != '/') {
          $apparent_folder .= '/';
     }
     if (substr($apparent_folder, 0, 1) != '/') {
          // Protection contre des requêtes de hackers du type GET http://xxxxx/  qui ne commencent anormalement pas par / et qui pourraient permettre d'inclure l'URL dans wwwroot
          $apparent_folder = '/' . $apparent_folder;
     }
     return $apparent_folder;
}

function get_wwwroot_cdn($subject) {
     if(!empty($GLOBALS['site_parameters']['cdn_specific_domains_array']) && !empty($GLOBALS['site_parameters']['cdn_specific_domains_array'][$subject])) {
          return $GLOBALS['site_parameters']['cdn_specific_domains_array'][$subject];
     } else    if(!empty($GLOBALS['site_parameters']['cdn_generic_domain'])) {
          return $GLOBALS['site_parameters']['cdn_generic_domain'];
     } else {
          return $GLOBALS['wwwroot'];
     }
}


function handle_php_default_setup() {
     if (strval(floatval('1000.1')) != '1000.1') {
          // Homogénéisation des configurations serveur : avoir toujours une manipulation interne des décimales sous forme de point (évite notamment des problèmes lors d'insertions de float en SQL)
          @setlocale(LC_NUMERIC, 'C');
     }
     @ini_set('scream.enabled', false); // Désactivation de scream qui altère le fonctionnement normal de error_reporting
     @ini_set('default_socket_timeout', 4); // Eviter de bloquer sur la récupération d'une information venant d'un serveur extérieur
     @ini_set('display_errors', 1); // Cette valeur est ensuite modifiée quand on accède à la base de données suivant la configuration du site
     @ini_set("gd.jpeg_ignore_warning", 1); // Ignore les alertes créées par la fonction jpeg2wbmp() et la fonction imagecreatefromjpeg()

     // Configuration de l'affichage des var_dump. -1 => Supression de la limite des résultats retournés : http://xdebug.org/docs/display
     @ini_set('xdebug.var_display_max_depth','-1');
     @ini_set('xdebug.var_display_max_children','-1');
     @ini_set('xdebug.var_display_max_data','-1');
     // Sur 1and1 par exemple les fonctions ci-dessous ne sont pas fonctionnelles, c'est donc via les ini_set que ça marche ci-après
     if (function_exists('mb_internal_encoding')) {
          @mb_internal_encoding(GENERAL_ENCODING);
     }
     if (function_exists('mb_detect_order')) {
          @mb_detect_order(GENERAL_ENCODING);
     }
     if (function_exists('mb_http_input')) {
          @mb_http_input(GENERAL_ENCODING);
     }
     if (function_exists('mb_http_output')) {
          @mb_http_output(GENERAL_ENCODING);
     }
     // En PHP >= 5.6 les ini_set ci-dessous ne sont plus fonctionnels, il faut passer par default_charset ci-après
     @ini_set('mbstring.internal_encoding', GENERAL_ENCODING);
     @ini_set('mbstring.detect_order', GENERAL_ENCODING);
     @ini_set('mbstring.http_input', GENERAL_ENCODING);
     @ini_set('mbstring.http_output', GENERAL_ENCODING);
     @ini_set('mbstring.http_output', GENERAL_ENCODING);
     // Spécial PHP >= 5.6
     @ini_set('default_charset', GENERAL_ENCODING);

     // la fonction date_default_timezone_set existe depuis PHP 5.1.0
     if (version_compare(PHP_VERSION, '5.1.0', '>=')) {
          // Supprimer les warnings dans certains cas de configuration serveur en version PHP >= 5.3
          @date_default_timezone_set(@date_default_timezone_get());
     }
     @set_magic_quotes_runtime(0);
}

function handle_register_globals() {
     if(!empty($_SERVER['RAW_HTTP_COOKIE'])){
          // On complète les informations de cookie si le serveur envoie les cookies encryptés, et donc refuse les cookies provenant du navigateur par sécurité
          foreach(explode(';', $_SERVER['RAW_HTTP_COOKIE']) as $this_cookie){
               if(strpos($this_cookie, '=') !== false){
                    list($key,$value) = explode('=', $this_cookie, 2);
                    $key = rawurldecode(trim($key));
                    if(!array_key_exists($key, $_COOKIE)){
                         $_COOKIE[$key] = rawurldecode(trim($value));
                    }
               }
          }
     }
     if (!function_exists('ini_get') || @ini_get('register_globals')) {
          // Code à laisser absolument en début de fichier
          // Protection si register_globals est à ON
          foreach (array('_POST', '_GET', '_COOKIE', '_REQUEST', '_SERVER', '_ENV', '_FILES') as $array_name) {
               foreach ($$array_name as $key => $value) {
                    if (isset($GLOBALS[$key])) {
                         unset($GLOBALS[$key]);
                    }
                    if (isset($$key)) {
                         // Au cas où pour d'anciennes versions de PHP
                         unset($$key);
                    }
               }
               unset($key);
               unset($value);
          }
     }
}

function handle_template_engine_init($templates_force_compile = false) {
     // Chargement du moteur de template : Smarty ou Twig
     include($GLOBALS['dirroot'] . "/lib/templateEngines/EngineTpl.php");
     /* @var $GLOBALS['tplEngine'] EngineTpl */
     if(!in_array(vb($GLOBALS['site_parameters']['template_engine']), array('smarty', 'twig'))) {
          $GLOBALS['site_parameters']['template_engine'] = 'smarty';
     }
     if($GLOBALS['site_parameters']['template_engine'] == 'twig') {
          require $GLOBALS['dirroot'] . '/lib/templateEngines/twig/Autoloader.php';
          Twig_Autoloader::register();
     }
     $GLOBALS['tplEngine'] = EngineTpl::create($GLOBALS['site_parameters']['template_engine'], $GLOBALS['repertoire_modele'] . '/' . $GLOBALS['site_parameters']['template_engine'] . '/', $templates_force_compile, defined('DEBUG_TEMPLATES') && DEBUG_TEMPLATES);
}

function handle_site_suspended() {
     if(!empty($GLOBALS['site_parameters']['site_suspended'])) {
          if (!empty($GLOBALS['site_parameters']['site_suspended_excluded_ips'])) {
               if($GLOBALS['site_parameters']['site_suspended_excluded_ips'] == 'display_errors_for_ips') {
                    $GLOBALS['site_parameters']['site_suspended_excluded_ips'] = $GLOBALS['site_parameters']['display_errors_for_ips'];
               }
               foreach(explode(',', str_replace(array(' ', ';'), array(',', ','), $GLOBALS['site_parameters']['site_suspended_excluded_ips'])) as $this_ip_part) {
                    if (!empty($this_ip_part) && ($this_ip_part == '*' || strpos($_SERVER['REMOTE_ADDR'], $this_ip_part) === 0)) {
                         $allow_access_if_suspended = true;
                         break;
                    }
               }
          }
          if (!IN_INSTALLATION && !defined('IN_PATHFILE') && !defined('IN_IPN') && !defined('IN_PEEL_ADMIN') && !defined('IN_ACCES_ACCOUNT') && !defined('IN_GET_PASSWORD') && !a_priv('admin*', true) && empty($allow_access_if_suspended)) {
               header(String::substr(vb($_SERVER['SERVER_PROTOCOL'], 'HTTP/1.0'), 0 , 10) . " 503 Service Unavailable", true, 503);
               header('Status: 503 Service Unavailable');
               header('Retry-After: 7200');
               echo '<div style="text-align:center; font-size:20px; font-family: Arial,Helvetica Neue,Helvetica,sans-serif; "><br /><br /><b>' . $GLOBALS['STR_UPDATE_WEBSITE'] . '</b><br /><br /><img src="' . $GLOBALS['wwwroot'] . '/modeles/' . $GLOBALS['site_parameters']['template_directory'] . '/images/site_under_work.jpg" style="max-width:100%" /><br /><br />' . $GLOBALS['STR_THANKS_UNDERSTANDING'] . '</div>';
               die();
          }
     }
     return null;
}

function handle_setup_redirections($url, $mode = 'redirect') {
     // Redirections définies par variables de configuration
     static $tags_handled;
     if (!empty($GLOBALS['site_parameters']['redirections'])) {
          if(empty($tags_handled)) {
               $GLOBALS['site_parameters']['redirections'] = template_tags_replace($GLOBALS['site_parameters']['redirections'], array(), defined('SKIP_SET_LANG'), null, null, true);
               $tags_handled = true;
          }
          // Format : URL_from => URL_to  OU  URL_from => URL_to,301  
          // Si pas de slash à la fin d'un domaine, alors ça concerne tout le domaine - sinon juste une page
          foreach($GLOBALS['site_parameters']['redirections'] as $url_from => $url_to) {
               $temp = explode(',', $url_to, 2);
               if(!empty($temp[0]) && !empty($url_from) && $temp[0] != $url_from) {
                    if (String::strpos($url, $url_from) === 0) {
                         $new_url = str_replace($url_from, $temp[0], $url);
                         if($new_url != $url) {
                              if($mode == 'redirect') {
                                   redirect_and_die($new_url, intval(vb($temp[1], 301)) == 301);
                              } else {
                                   $url = $new_url;
                              }
                         }
                    }
               }
          }
     }
     return $url; 
}


function handle_sessions() {
     // Paramétrage des sessions
     // Pour permettre d'avoir à la fois des cookies de session valides pour N sous-domaines, et à la fois
     // permettre que plusieurs boutiques PEEL puissent tourner dans des sous-domaines différents, on prend
     // un nom de cookie de session différent pour chaque installation de PEEL.
     $GLOBALS['session_cookie_name'] = vb($GLOBALS['site_parameters']['session_cookie_basename']) . substr(md5(vb($GLOBALS['site_parameters']['session_cookie_unique_part'], $GLOBALS['wwwroot_main'])), 0, 8);
     $user_agent_salt = vb($GLOBALS['site_parameters']['session_user_agent_salt'], 'GcFsD5EOvgSvQFtL4nIy');
     if (!empty($GLOBALS['site_parameters']['sessions_duration'])) {
          @ini_set('session.gc_maxlifetime', 60 * $GLOBALS['site_parameters']['sessions_duration']);
          @ini_set('session.cache_expire', $GLOBALS['site_parameters']['sessions_duration']);
     }
     @ini_set('session.use_cookies', '1');
     @ini_set('session.use_only_cookies', '1'); // évite les attaques avec session id dans l'URL
     @ini_set('session.use_trans_sid', '0'); // empêche la propagation des SESSION_ID dans les URL
     @ini_set('session.hash_function', '1'); // Hash avec SHA-1 et non pas MD5
     @ini_set('url_rewriter.tags', '');
     @ini_set('session.name', $GLOBALS['session_cookie_name']);
     if (!empty($GLOBALS['site_parameters']['session_save_path'])) {
          @ini_set('session.save_path', $GLOBALS['site_parameters']['session_save_path']);
     }
     if (vb($GLOBALS['site_parameters']['force_sessions_for_subdomains']) && get_site_domain(true) && strpos($GLOBALS['wwwroot'], '://127.0.0.1') === false && strpos($GLOBALS['wwwroot'], '://localhost') === false) {
          // On ne passe pas ici si l'URL est à la base d'IP et non pas de domaine
          @ini_set('session.cookie_domain', '.' . get_site_domain());
     }

     session_start();
     if (!isset($_SESSION['session_initiated']) && isset($_COOKIE[$GLOBALS['session_cookie_name']])) {
          // Protection contre les fixations de session : l'utilisateur déclare qu'il possède une session alors que le serveur ne la connait pas
          // => il ne faut pas prendre l'identifiant de session proposé par l'utilisateur
          @session_regenerate_id();
     }
     $_SESSION['session_initiated'] = true;
     // Protection contre les vols de sessions
     // On ne se base pas sur les IP car certains FAI ne permettent pas de naviguer avec une seule IP (AOL,...)
     // Lorsqu'on installe un plugin sur un navigateur ou qu'on le met à jour, le HTTP_USER_AGENT est modifié, mais on redémarre le navigateur
     // Donc cette protection est bien compatible avec tout type de user_agents
     if (!isset($_SERVER['HTTP_USER_AGENT'])) {
          $_SERVER['HTTP_USER_AGENT'] = '';
     }
     if (empty($GLOBALS['site_parameters']['disable_session_user_agent_check']) && isset($_SESSION['session_user_agent'])) {
          if ($_SESSION['session_user_agent'] != sha1($user_agent_salt . $_SERVER['HTTP_USER_AGENT'])) {
               // On suppose qu'il y a vol de session => on la désactive
               session_unset();
               session_destroy();
               @session_regenerate_id(true);
               // On redémarre une nouvelle session après une redirection
               session_start();
               // On prend le nouveau user_agent comme la référence pour cette session
               $_SESSION['session_user_agent'] = sha1($user_agent_salt . $_SERVER['HTTP_USER_AGENT']);
               $_SESSION['session_initiated'] = true;
          }
     } else {
          $_SESSION['session_user_agent'] = sha1($user_agent_salt . $_SERVER['HTTP_USER_AGENT']);
     }
     // Initialisation de SESSION si nécessaire
     if (!isset($_SESSION)) {
          $_SESSION = array();
     }
}

function load_site_parameters($lang = null, $skip_loading_currency_infos = false, $forced_site_id = null)
{
     $parameter_needing_full_rights_prefix = array('multisite_');
     if (!IN_INSTALLATION) {
          if(empty($lang)) {
               // On récupère l'id du site si on est en multisite
               $sql = "SELECT c.site_id, c.string
                    FROM peel_configuration c
                    LEFT JOIN peel_langues l ON l.etat = '1' AND l.url_rewriting LIKE '%.%' AND " . get_filter_site_cond('langues', 'l', false, $forced_site_id) . "
                    WHERE c.technical_code='wwwroot' AND ";
                    if ($forced_site_id === null) {
                         $sql .= "(c.string='".real_escape_string($GLOBALS['wwwroot'])."' OR REPLACE(c.string,'www.','')='".real_escape_string($GLOBALS['wwwroot'])."' OR (l.url_rewriting LIKE '%.%' AND (REPLACE(c.string,'www.',l.url_rewriting)='".real_escape_string($GLOBALS['wwwroot'])."' OR l.url_rewriting='".real_escape_string($GLOBALS['wwwroot'])."')))";
                    } else {
                         $sql .= get_filter_site_cond('configuration', 'c', false, $forced_site_id);
                    }
                    $sql .= "
                    ORDER BY IF(c.technical_code='wwwroot',1,0) DESC, l.position ASC
                    LIMIT 1";
               $query = query($sql);
               while ($result = fetch_assoc($query)) {
                    // forced_site_id ne doit pas être utilisé pour définir $GLOBALS['site_id']. C'est la configuration du site qui doit déterminer cette valeur.
                    $GLOBALS['site_id'] = $result['site_id'];
                    $GLOBALS['wwwroot_main'] = $result['string'];
               }
               // Si aucun site n'a été trouvé en base de données correspondant à l'URL, c'est peut-être que wwwroot n'est pas défini dans la table de configuration
               // Dans ce cas on se contente de la version de wwwroot calculée dans configuration.inc.php : celle définie dans info.inc.php si pas vide, ou de wwwwroot_detected à défaut
               // On fait le test uniquement si forced_site_id n'est pas égal à 0. Si on cherche uniquement les variables de configuration général (site_id=0), la contrainte sur wwwroot ne nous intéresse pas.
               if($forced_site_id!==0 && empty($GLOBALS['site_id'])) {
                    // Si la configuration multisite n'est pas trouvée
                    $sql = "SELECT count(*) AS this_count
                         FROM peel_configuration c
                         WHERE c.technical_code='wwwroot'";
                    $query = query($sql);
                    $result = fetch_assoc($query);
                    // this_count_wwwroot contient le nombre total de site configuré
                    $this_count_wwwroot = $result['this_count'];

                    // Il faut définir $GLOBALS['site_id']
                    if ($this_count_wwwroot <=1) {
                         // Si un seul ou zéro wwwroot est défini, alors la valeur de site_id est 1.
                         $GLOBALS['site_id'] = 1;
                    } elseif ($this_count_wwwroot > 1) {
                         // plusieurs wwwroot défini dans la BDD, il faut choisir le site_id par défaut dans ce cas.
                         // On met une condition sur site_id=0 pour éviter qu'un site ne s'arroge ce droit indûment
                         $sql = "SELECT string
                              FROM peel_configuration c
                              WHERE c.technical_code='site_id_showed_by_default_if_domain_not_found' AND site_id=0";
                         $query = query($sql);
                         if($result = fetch_assoc($query)) {
                              $GLOBALS['site_id'] = $result['string'];
                         } else {
                              // il y a plusieurs sites configurés et site_id_showed_by_default_if_domain_not_found n'est pas trouvé, donc on ne peut pas choisir le site_id du site. Impossible de continuer.
                              die('Site configuration not detected');
                         }
                    }

                    // Il faut définir $GLOBALS['wwwroot_main'] 
                    if ($this_count_wwwroot > 0) {
                         // A ce stade $GLOBALS['site_id'] est défini et wwwroot est défini, on va chercher le wwwroot associé.
                         $sql = "SELECT string
                              FROM peel_configuration c
                              WHERE c.technical_code='wwwroot' AND ".get_filter_site_cond('configuration', 'c')."
                              ORDER BY site_id DESC
                              LIMIT 1";
                         $query = query($sql);
                         if($result = fetch_assoc($query)) {
                              $GLOBALS['wwwroot_main'] = $result['string'];
                         } else {
                              // Il y a bien un wwwroot défini dans la base de données, mais pas pour ce site.
                              die('Site configuration not detected');
                         }
                    } else {
                         // pas de wwwroot dans la BDD, wwwroot sera detected_wwwroot qui est défini dans configuration.inc.php.
                    }
               }
               if (!defined('IN_PEEL_ADMIN') && !empty($_SERVER['HTTPS']) && $_SERVER['HTTPS'] != 'off') {
                    // En front office, les pages sont appelées en https => on force https dans wwwroot_main pour que toutes les ressources chargées par le site soient en https, sinon le contenu est bloqué par certain navigateur.
                    $GLOBALS['wwwroot_main'] = str_replace('http://', 'https://', $GLOBALS['wwwroot_main']);
               }
          }
          // Initialisation des paramètres du site
          $sql = "SELECT *
               FROM peel_configuration
               WHERE etat='1' AND ";
          if ($forced_site_id === null) {
               $sql .= get_filter_site_cond('configuration') . " AND ";
          } else {
               $sql .= get_filter_site_cond('configuration', null, false, $forced_site_id) . " AND ";
          }
          if(empty($lang)) {
               $sql .= "lang='' AND technical_code NOT LIKE 'STR_%'";
          } else {
               $sql .= "(lang='" . real_escape_string($lang) . "' OR lang='')";
          }
          $sql .= "
               ORDER BY IF(site_id='0', 0, 1) ASC, IF(lang='', 0, 1) ASC, technical_code ASC";
          // Chargement des paramètres de configuration (PEEL 7+)
          $query = query($sql);
          while($result = fetch_assoc($query)) {
               $skip_parameter = false;
               foreach($parameter_needing_full_rights_prefix as $this_parameter_begin) {
                    if(strpos($result['technical_code'], $this_parameter_begin) === 0 && !empty($result['site_id'])) {
                         $skip_parameter = true;
                    }
               }
               if($skip_parameter) {
                    continue;
               }
               // On surcharge les valeurs par défaut définies plus haut dans ce fichier par celles trouvées en base de données
               if(strpos($result['technical_code'], 'chmod') !== false) {
                    if($result['type'] == 'integer') {
                         $result['type'] = 'octal';
                    }
                    if(strpos($result['technical_code'], 'file') !== false) {
                         // Filtre sur file pour ne modifier que les fichier et pas les dossier. Exemple de technical code utilisé : chmod_new_files.
                         // Pour la sécurité des fichiers, il faut interdire les chmod qui rendent un fichier exécutable :
                         $result['string'] = str_replace(array('1','3','5','7'), array('0','2','4','6'), $result['string']);
                    }
               }
               if($result['type'] == 'boolean'){
                    if(in_array(String::strtolower($result['string']), array('true', 'yes', '1'))){
                         $result['string'] = true;
                    } elseif(in_array(String::strtolower($result['string']), array('false', 'no', '0'))){
                         $result['string'] = false;
                    }
               } elseif($result['type'] == 'array'){
                    // Chaine du type : "key" => "value", 'key' => value, ...
                    $result['string'] = get_array_from_string($result['string']);
               } elseif($result['type'] == 'integer'){
                    $result['string'] = intval($result['string']);
               } elseif($result['type'] == 'float'){
                    $result['string'] = floatval($result['string']);
               } elseif($result['type'] == 'octal') {
                    $result['string'] = octdec(intval($result['string']));
               } elseif($result['type'] == 'string' || (empty($result['type']) && String::strpos($result['string'], ':')===false)){
                    $result['string'] = str_replace(array('{$GLOBALS[\'repertoire_images\']}', '{$GLOBALS[\'wwwroot\']}', '{$GLOBALS[\'dirroot\']}', ), array(vb($GLOBALS['repertoire_images']), vb($GLOBALS['wwwroot']), $GLOBALS['dirroot']), $result['string']);
               } elseif(!empty($result['string'])) {
                    $result['string'] = @unserialize($result['string']);
               }

               if(String::substr($result['technical_code'], 0, 4)== 'STR_') {
                    // Variable de langue
                    $GLOBALS[$result['technical_code']] = $result['string'];
               } else {
                    if(String::strlen($result['technical_code'])== 7 && String::substr($result['technical_code'], 0, 5) == 'logo_' && strpos($result['string'], '//') === false && !empty($result['string'])) {
                         // Ajout de wwwroot si nécessaire
                         if(substr($result['string'], 0, 1) != '/') {
                              $result['string'] = $GLOBALS['wwwroot'] . '/' . $result['string'];
                         } else {
                              $result['string'] = $GLOBALS['wwwroot'] . $result['string'];
                         }
                    }
                    // On surcharge les valeurs par défaut définies plus haut dans ce fichier par celles trouvées en base de données
                    $GLOBALS['site_parameters'][$result['technical_code']] = $result['string'];
               }
          }
          if(!$skip_loading_currency_infos) {
               $query_devises = query("SELECT pd.devise, pd.conversion, pd.symbole, pd.symbole_place, pd.code
                    FROM peel_devises pd
                    WHERE pd.id = '".intval(vb($GLOBALS['site_parameters']['devise_defaut']))."' AND " . get_filter_site_cond('devises', 'pd') . "");
               if($result_devises = fetch_assoc($query_devises)) {
                    // On ajoute aux valeurs par défaut définies plus haut dans ce fichier par celles trouvées dans peel_devises
                    // Si elles existent déjà (ce qui serait inattendu), on n'y touche pas
                    foreach($result_devises as $this_key => $this_value) {
                         if(!isset($GLOBALS['site_parameters'][$this_key])) {
                              $GLOBALS['site_parameters'][$this_key] = $this_value;
                         }
                    }
               }
          }
          if ((defined('IN_PEEL_ADMIN') || IN_INSTALLATION) && !empty($GLOBALS['site_parameters']['template_directory_forced_in_admin'])) {
               $GLOBALS['site_parameters']['template_directory'] = $GLOBALS['site_parameters']['template_directory_forced_in_admin'];
          }
     }
     if(!empty($GLOBALS['site_parameters']['mysql_sql_mode_force'])) {
          // Eviter les problèmes sur MySQL 5 sous Windows
          query("SET @@session.sql_mode='" . vb($GLOBALS['site_parameters']['mysql_sql_mode_force'], 'MYSQL40') . "'");
     }
     // On prend un dossier de template par défaut si pas défini ou inexistant
     if(!isset($GLOBALS['site_parameters']['template_directory']) || !file_exists($GLOBALS['dirroot'] . "/modeles/" . $GLOBALS['site_parameters']['template_directory'])) {
          if(empty($GLOBALS['site_parameters']['peel_database_version'])) {
               // La version de la base de donnée est inférieur à 8. On est dans un contexte de migration, il faut forcer le dossier modele à PEEL7.
               // Les dossiers modeles des versions plus ancienne utilisent des fonctions is_module_XXXX_active qui ne sont plus défini dans la version 8.
               $GLOBALS['site_parameters']['template_directory'] = 'peel7';
          } else {
               $modeles_dir = $GLOBALS['dirroot'] . "/modeles";
               if ($handle = opendir($modeles_dir)) {
                    while (false !== ($file = readdir($handle))) {
                         if ($file != "." && $file != ".." && is_dir($modeles_dir . '/' . $file)) {
                              if(empty($GLOBALS['repertoire_modele']) || substr($GLOBALS['repertoire_modele'], 0, 4)!='peel') {
                                   // On prend de préférence un répertoire de nom différent de peelXXX
                                   $GLOBALS['site_parameters']['template_directory'] = $file;
                              }
                         }
                    }
               }
          }
     }
     if(!empty($GLOBALS['site_parameters']['mysql_sql_mode_force'])) {
          // Eviter les problèmes sur MySQL 5 sous Windows
          query("SET @@session.sql_mode='" . vb($GLOBALS['site_parameters']['mysql_sql_mode_force'], 'MYSQL40') . "'");
     }
}

function microtime_float()
{
     return array_sum(explode(' ', microtime()));
}

function params_affiche_produits($condition_value1, $unused, $type, $nb_par_page, $mode = 'general', $reference_id = 0, $nb_colonnes, $always_show_multipage_footer = true, $additional_sql_inner = null, $additional_sql_cond = null, $additionnal_sql_having = null, $use_index_sql = null)
{
     $sql_cond_array = array();
     $titre = '';
     $affiche_filtre = '';
     $sql_inner = '';
     $params_list = array();
     if (!empty($nb_colonnes) && ($nb_par_page % $nb_colonnes > 0)) {
          $nb_par_page = $nb_par_page + ($nb_colonnes - ($nb_par_page % $nb_colonnes));
     }
     if ($type == 'associated_product') {
          $params_list['small_width'] = 160;
          $params_list['small_height'] = 160;
     } else {
          $params_list['small_width'] = vn($GLOBALS['site_parameters']['small_width']);
          $params_list['small_height'] = vn($GLOBALS['site_parameters']['small_height']);
     }
     $params_list['cartridge_product_css_class'] = 'item-column product_per_line_' . $nb_colonnes;
     $display_multipage_template_name = null;
     if ($type == 'catalogue') {
          $sql_cond_array[] = "p.id_marque='" . intval($condition_value1) . "'";
     } elseif ($type == 'nouveaute') {
          $sql_cond_array[] = "p.on_new='1'";
          $params_list['affiche_filtre'] = affiche_filtre(null, true);
          $titre = $GLOBALS['STR_NOUVEAUTES'];
     } elseif ($type == 'promotion') {
          // Si l'option est activée dans les paramètres du site
          if (vn($GLOBALS['site_parameters']['auto_promo']) == 1) {
               // Si une promotion est appliquée au produit
               $this_sql_cond = "p.promotion>0";
               // Si le module flash est actif
               if (is_flash_active_on_site()) {
                    $this_sql_cond .= " OR (p.on_flash='1' AND '" . date('Y-m-d H:i:s', time()) . "' BETWEEN p.flash_start AND p.flash_end)";
               }
               // Si le module Promotions par marque est actif
               if (check_if_module_active('marques_promotion')) {
                    $sql_inner .= " LEFT JOIN peel_marques pm ON pm.id = p.id_marque AND " . get_filter_site_cond('marques', 'pm');
                    $this_sql_cond .= " OR pm.promotion_percent>0 OR pm.promotion_devises>0 ";
               }
               // Si le module Promotions par catégorie est actif
               if (check_if_module_active('category_promotion')) {
                    $this_sql_cond .= " OR c.promotion_percent>0 OR c.promotion_devises>0";
               }
               $sql_cond_array[] = $this_sql_cond;
          } else {
               $sql_cond_array[] = "p.on_promo='1'";
          }
          $titre = $GLOBALS['STR_PROMOTIONS'];
     } elseif ($type == 'special') {
          $sql_cond_array[] = "p.on_special='1'";
          $titre = $GLOBALS['STR_SPECIAL'];
     } elseif ($type == 'suggest') {
          $sql_cond_array[] = "p.prix>='" . nohtml_real_escape_string($condition_value1) . "'";
          $titre = $GLOBALS['STR_OUR_SUGGEST'];
     } elseif ($type == 'top') {
          $sql_cond_array[] = "p.on_top='1'";
          $titre = $GLOBALS['STR_TOP'];
     } elseif ($type == 'category') {
          $params_list['affiche_filtre'] = affiche_filtre($condition_value1, true);
          if (vb($GLOBALS['site_parameters']['category_count_method']) == 'global') {
               $catid_array = get_category_tree_and_itself($condition_value1, 'sons');
          } else {
               $catid_array = array($condition_value1);
          }
          $sql_cond_array[] = "pc.categorie_id IN ('" . implode("','", real_escape_string($catid_array)) . "')";
          $titre = $GLOBALS['STR_LIST_PRODUCT'];
     } elseif ($type == 'flash') {
          $sql_cond_array[] = "p.on_flash='1' AND '" . date('Y-m-d', time()) . "' BETWEEN p.flash_start AND p.flash_end";
          $titre = $GLOBALS['STR_FLASH'];
     } elseif ($type == 'flash_passed') {
          $sql_cond_array[] = "p.on_flash='1' AND '" . date('Y-m-d', time()) . "' > flash_end";
          $titre = $GLOBALS['STR_FLASH_PASSED'];
     } elseif ($type == 'user_flash_passed') {
          $sql_cond_array[] = "p.on_flash='1' AND '" . date('Y-m-d', time()) . "' > flash_end AND id_utilisateur = " . intval($reference_id);
          $titre = $GLOBALS['STR_FLASH_PASSED'];
     } elseif ($type == 'coming_product_flash') {
          $sql_cond_array[] = "p.on_flash='1' AND '" . date('Y-m-d', time()) . "' < flash_start";
          $titre = $GLOBALS['STR_COMING_PRODUCT_FLASH'];
     } elseif ($type == 'user_coming_product_flash') {
          $sql_cond_array[] = "p.on_flash='1' AND '" . date('Y-m-d', time()) . "' <= flash_start AND id_utilisateur = " . intval($reference_id);
          $titre = $GLOBALS['STR_COMING_PRODUCT_FLASH'];
     } elseif ($type == 'check') {
          $sql_cond_array[] = "p.on_check='1'";
          $titre = $GLOBALS['STR_CHEQUE_CADEAU'];
     } elseif ($type == 'associated_product') {
          $nb_par_page = '*';
          $infos = array();
          $commande_id_array = array();
          // On vérifie si la case remontée de produit a été cochée et qu'un nombre de produits à afficher a bien été saisi
          $sql = query('SELECT on_ref_produit, nb_ref_produits
               FROM peel_produits
               WHERE id = ' . intval(vn($reference_id))." AND " . get_filter_site_cond('produits') . "");
          $infos = fetch_assoc($sql);
          if (!empty($infos)) {
               // Récupération des id des commandes dont le produit fait partie
               $sql = 'SELECT commande_id
                    FROM peel_commandes_articles
                    WHERE produit_id = "' . intval($reference_id) . '"  AND  ' . get_filter_site_cond('commandes_articles');
               $q = query($sql);
               while ($result = fetch_assoc($q)) {
                    $commande_id_array[] = $result['commande_id'];
               }
               // Si la case a bien été cochée et qu'un nombre a été saisi et que le produit affiché a déjà été commandé
               if ($infos['on_ref_produit'] == 1 && $infos['nb_ref_produits'] > 0 && count($commande_id_array) > 0) {
                    $sql_inner .= " INNER JOIN peel_commandes_articles pca ON pca.produit_id = p.id AND " . get_filter_site_cond('commandes_articles', 'pca') . "";
                    $sql_cond_array[] = "pca.commande_id IN ('" . implode("','", nohtml_real_escape_string($commande_id_array)) . "')";
                    $sql_cond_array[] = "p.id!=" . intval($reference_id);
                    $nb_par_page = intval($infos['nb_ref_produits']);
               } else { 
                    // Dans le cas contraire, on affiche les références produit associées
                    $sql_cond_array[] = "pr.produit_id = '" . intval($reference_id) . "'";
                    if(empty($GLOBALS['site_parameters']['product_references_display_limit']) && empty($GLOBALS['site_parameters']['product_references_order_by'])) {
                         $sql_inner .= " INNER JOIN peel_produits_references pr ON p.id = pr.reference_id";
                    } else {
                         $sql_inner .= " INNER JOIN (SELECT * FROM peel_produits_references WHERE produit_id='" . intval($reference_id) . "' ORDER BY ".real_escape_string(vb($GLOBALS['site_parameters']['product_references_order_by'], 'reference_id ASC'))." LIMIT ".intval(vn($GLOBALS['site_parameters']['product_references_display_limit'], 10)).") pr ON p.id = pr.reference_id";
                    }
               }
          }
          $titre = $GLOBALS['STR_ASSOCIATED_PRODUCT'];
     } elseif ($type == 'save_cart') {
          $sql_inner .= " INNER JOIN peel_save_cart sc ON sc.produit_id = p.id ";
          $sql_cond_array[] = "sc.id_utilisateur = '" . intval($condition_value1) . "'";
          if (!empty($GLOBALS['site_parameters']['quick_add_product_from_search_page'])) {
               // On ne veut pas voir dans la liste des produits sauvegardés les produits qui ont été enregistrés pour la liste de produits "quick_search"
               $sql_cond_array[] = "sc.products_list_name = ''";
          }
     } elseif ($type == 'convert_gift_points') {
          $titre = $GLOBALS['STR_VOIR_LISTE_CADEAU'];
          $sql_cond_array[] = "p.on_gift=1 AND on_gift_points<='".intval($_SESSION['session_utilisateur']['points'])."'";
     } elseif ($type == 'show_draft') {
          $titre = $GLOBALS['STR_MODULE_CREATE_PRODUCT_IN_FRONT_OFFICE_SORTIE_SAVE_DRAFT'];
          $params_list['show_draft'] = true;
          $sql_cond_array[] = "p.etat=0 AND id_utilisateur = '".intval($_SESSION['session_utilisateur']['id_utilisateur'])."'";
     }
     if (empty($GLOBALS['site_parameters']['allow_command_product_ongift']) && $type != 'convert_gift_points' && check_if_module_active('gifts')) {
          $sql_cond_array[] = 'p.on_gift = "0"';
     }
     if (!empty($additional_sql_cond)) {
          // On ajoute les conditions supplémentaires
          $sql_cond_array[] = $additional_sql_cond;
     }
     if (!empty($additional_sql_inner)) {
          // On ajoute les jointures supplémentaires
          $sql_inner .= $additional_sql_inner;
     }
     // Les chèques cadeaux ne sont pas associé à une catégorie.
     $join_categories = ($type != 'check');
     $join_categories_for_count = ($join_categories && (empty($GLOBALS['site_parameters']['allow_products_without_category']) || String::strpos(implode('', $sql_cond_array), 'c.') !== false));

     $sql = "SELECT p.*, p.nom_".(!empty($GLOBALS['site_parameters']['product_name_forced_lang'])?$GLOBALS['site_parameters']['product_name_forced_lang']:$_SESSION['session_langue'])." AS name " . ($join_categories?', IF(c.id IS NOT NULL, c.id, 0) AS categorie_id, IF(c.nom_' . $_SESSION['session_langue'] . ' IS NOT NULL, c.nom_' . $_SESSION['session_langue'] . ', 0) AS categorie':'');
     if (($type == 'save_cart')) {
          $sql .= ', sc.id as save_cart_id, sc.couleur_id as saved_couleur_id, sc.taille_id as saved_taille_id, sc.id_attribut as saved_attributs_list, sc.quantite as saved_quantity ';
     }
     $sql_main = '
          FROM peel_produits p '.$use_index_sql.'
          ' ;
     $sql_join_categories = ($join_categories?(!empty($GLOBALS['site_parameters']['allow_products_without_category']) ? 'LEFT' : 'INNER') . ' JOIN peel_produits_categories pc ON pc.produit_id = p.id':'') . '
          ';
     $sql_main2 = ($join_categories?(!empty($GLOBALS['site_parameters']['allow_products_without_category']) ? 'LEFT' : 'INNER') . ' JOIN peel_categories c ON pc.categorie_id = c.id AND c.etat=1 AND ' . get_filter_site_cond('categories', 'c'):'');
     $sql_main3 =  '
          ' . $sql_inner . '
          WHERE '.($type != 'show_draft'?'p.etat = "1" AND ':'').' ' . get_filter_site_cond('produits', 'p') . ' AND p.nom_'.(!empty($GLOBALS['site_parameters']['product_name_forced_lang'])?$GLOBALS['site_parameters']['product_name_forced_lang']:$_SESSION['session_langue']).' != ""';

     if (!empty($sql_cond_array)) {
          $sql_main3 .= ' AND (' . implode(') AND (', array_unique($sql_cond_array)) . ')';
     }
     $sql .= $sql_main . $sql_join_categories . $sql_main2 . $sql_main3;
     if ($type != 'save_cart') {
          if($join_categories && empty($GLOBALS['site_parameters']['allow_products_multiple_results_if_multiple_categories'])) {
               $sql .= ' GROUP BY p.id';
          }
          if($join_categories_for_count && empty($GLOBALS['site_parameters']['allow_products_multiple_results_if_multiple_categories'])) {
               $sql_manual_count = 'SELECT COUNT(DISTINCT p.id) AS rows_count ' . $sql_main . $sql_join_categories . $sql_main3;
          } elseif($join_categories_for_count) {
               $sql_manual_count = 'SELECT COUNT(*) AS rows_count ' . $sql_main. $sql_join_categories . $sql_main3;
          } else {
               $sql_manual_count = 'SELECT COUNT(*) AS rows_count ' . $sql_main. $sql_main3;
          }
     } else {
          $sql .= ' GROUP BY save_cart_id';
          $sql_manual_count = 'SELECT COUNT(DISTINCT p.save_cart_id) AS rows_count ' . $sql_main. $sql_main3;
     }
     if (!empty($additionnal_sql_having)) {
          $sql .= ' ' . $additionnal_sql_having;
     }
     $GLOBALS['multipage_avoid_redirect_if_page_over_limit'] = true;
     if ($type == 'special') {
          $Links = new Multipage($sql, 'home', $nb_par_page, 7, 0, $always_show_multipage_footer);
     } elseif ($type == 'associated_product') {
          $Links = new Multipage($sql, 'affiche_produits_reference', $nb_par_page, 7, 0, $always_show_multipage_footer);
     } else {
          $Links = new Multipage($sql, 'affiche_produits', $nb_par_page, 7, 0, $always_show_multipage_footer, $display_multipage_template_name);
     }
     if (!empty($_GET['tri']) && !in_array($_GET['tri'], array('nom_' . $_SESSION['session_langue'], 'prix'))) {
          // Filtrage des colonnes de tri possibles
          $_GET['tri'] = 'p.nom_'.(!empty($GLOBALS['site_parameters']['product_name_forced_lang'])?$GLOBALS['site_parameters']['product_name_forced_lang']:$_SESSION['session_langue']);
     }
     if(!empty($GLOBALS['site_parameters']['sql_count_avoid_found_rows'])) {
          $Links->sql_count = $sql_manual_count;
     }
     $Links->order_get_variable = vb($GLOBALS['order_get_variable'], 'tri');
     $Links->sort_get_variable = 'sort';
     $Links->OrderDefault = 'position';
     $Links->SortDefault = 'ASC';
     
     //$Links->forced_second_order_by_string = 'p.id DESC';
     $Links->forced_before_first_order_by_string = null;
     if ($type == 'category' && vb($GLOBALS['site_parameters']['category_count_method']) == 'global' && $join_categories && !empty($condition_value1)) {
          $Links->forced_before_first_order_by_string .= 'IF(pc.categorie_id="'.intval($condition_value1).'", 1, 0) DESC';
     }
     if ($type == 'save_cart') {
          if(!empty($Links->forced_before_first_order_by_string)) {
               $Links->forced_before_first_order_by_string .= ', ';
          }
          $Links->forced_before_first_order_by_string .= 'save_cart_id DESC';
     }
     $params_list['nb_colonnes'] = $nb_colonnes;
     $params_list['Links'] = $Links;
     $params_list['titre'] = $titre;
     $params_list['mode'] = $mode;

     return $params_list;
}

if (!function_exists('ipGet')) {
     function ipGet()
     {
          if (isset($_SERVER['HTTP_X_FORWARDED_FOR']) && isPublicIP($_SERVER['HTTP_X_FORWARDED_FOR'])) {
               $ip = $_SERVER['HTTP_X_FORWARDED_FOR'];
          } elseif (isset($_SERVER['HTTP_CLIENT_IP']) && isPublicIP($_SERVER['HTTP_CLIENT_IP'])) {
               $ip = $_SERVER['HTTP_CLIENT_IP'];
          } elseif (isset($_SERVER['REMOTE_ADDR'])) {
               $ip = $_SERVER['REMOTE_ADDR'];
          } else {
               $ip = 'undefined';
          }
          if (strpos($ip, ',') !== false) {
               $ip_array = explode(',', $ip);
               $ip = $ip_array[0];
          }
          return $ip;
     }
}

if (!function_exists('isPublicIP')) {
     function isPublicIP($ip_to_test)
     {
          if (preg_match('/^([0-9]{1,3}.){3,3}[0-9]{1,3}$/', $ip_to_test)) {
               $ip_as_array = explode('.', $ip_to_test);
               if (count($ip_as_array) == 4 && !empty($ip_as_array[3])) {
                    // Référence :  http://www.faqs.org/rfcs/rfc3330.html pour les ip privées en complément à RFC 1918
                    $test1 = $ip_as_array[0] != 10 && $ip_as_array[0] != 127; // Test no Loopback
                    $test2 = $ip_as_array[0] != 172 || $ip_as_array[1] < 16 || $ip_as_array[1] > 31; // Test no Private-Use Networks
                    $test3 = $ip_as_array[0] != 192 || $ip_as_array[1] != 168; // Test no Private-Use Networks
                    $test4 = $ip_as_array[0] != 192 || $ip_as_array[1] != 88 || $ip_as_array[2] != 99; // Test no 6to4 Relay Anycast
                    $test5 = $ip_as_array[0] != 169 || $ip_as_array[1] != 254; // Test no Link Local
                    if ($test1 && $test2 && $test3 && $test4 && $test5) {
                         // IP non privée
                         return true;
                    }
               }
          }
          return false;
     }
}

function is_user_bot($ip = null, $user_agent = null)
{
     static $result;
     if($ip === null) {
          $ip = vb($_SERVER['REMOTE_ADDR']);
     }
     if($user_agent === null) {
          $user_agent = vb($_SERVER['HTTP_USER_AGENT']);
     }
     if(!isset($result)){
          // Premier test rapide sur user_agent
          $result = false;
          $lower_user_agent = String::strtolower($user_agent);
          if(!empty($user_agent)) {
               foreach(array('mediapartners-google', 'googlebot', 'google page speed', 'feedfetcher', 'slurp', 'bingbot', 'msnbot', 'voilabot', 'baiduspider', 'genieo', 'sindup', 'ahrefsbot', 'yandex', 'spider', 'robot', '/bot', 'crawler', 'netvibes') as $this_name) {
                    $result = $result || String::strpos($lower_user_agent, $this_name) !== false;
               }
          }
          if(!$result) {
               // Second test un peu plus lent sur IP
               // Cette liste d'IP n'est pas exhaustive et reprséente des IP de moteurs de recherche
               $good_bots = array('62.119.21.157',
                    '62.212.117.198',
                    '64.4.8.', '64.62.0.', '64.68.82.', '64.68.84.', '64.68.85.',
                    '64.241.242.177', '64.241.243.65',
                    '65.54.164.', '65.54.165.', '65.54.188.', '65.55.208.', '65.55.209.', '65.55.213.',
                    '65.55.214.', '65.55.215.', '65.55.233.', '65.55.246.',
                    '65.214.36.', '65.214.38.10', '65.214.44.',
                    '66.154.103.146', '66.196.72.', '66.196.90.',
                    '66.237.60.22',
                    '66.249.64.', '66.249.65.', '66.249.66.', '66.249.67.', '66.249.68.', '66.249.69.',
                    '66.249.70.', '66.249.71.', '66.249.72.', '66.249.73.',
                    '72.30.61.', '72.30.110.', '72.30.133.', '72.30.179.', '72.30.215.', '72.30.216.', '72.30.226.',
                    '72.30.215.', '72.30.216.', '72.30.226.', '72.30.252.',
                    '74.6.19.', '74.6.20.', '74.6.24.', '74.6.25.', '74.6.27.', '74.6.28.',
                    '74.6.64.', '74.6.65.', '74.6.66.', '74.6.67.', '74.6.68.', '74.6.69.', '74.6.70.',
                    '74.6.71.', '74.6.72.', '74.6.73.', '74.6.74.', '74.6.85.', '74.6.86.', '74.6.87.',
                    '172.207.68.',
                    '193.218.115.6',
                    '195.93.102.', '195.101.94.',
                    '204.95.98.',
                    '207.46.89.', '207.68.146.', '207.68.157.',
                    '209.249.67.1  ', '209.73.164.50',
                    '210.59.144.149',
                    '212.127.141.180', '212.78.206.',
                    '213.73.184.',
                    '216.39.48.58', '216.39.48.82', '216.39.48.164', '216.39.50.', '216.239.46.', '216.243.113.1',
                    '217.205.60.225',
                    '218.145.25.');
               foreach($good_bots as $bot_ip) {
                    if (strpos($ip, $bot_ip) === 0) {
                         $result = true;
                         break;
                    }
               }
          }
     }
     return $result;
}

function get_xml_value($filename, $filter_string, $items_count_max = 8, $line_length_max = 50)
{
     $output = '';
     $forum_output = '';
     $valid_titre = array();

     $data = String::file_get_contents_utf8($filename);
     $parser = xml_parser_create();
     xml_parser_set_option($parser, XML_OPTION_CASE_FOLDING, 0);
     xml_parser_set_option($parser, XML_OPTION_SKIP_WHITE, 1);
     xml_parse_into_struct($parser, $data, $values, $tags);
     xml_parser_free($parser);
     // loop through the structures
     $filter_array = explode('|', $filter_string);
     if(!empty($tags['title'])) {
          foreach ($tags['title'] as $tag_key => $value_key) {
               if($tag_key == 0) {
                    // Le premier title est celui de l'ensemble, mais pas du premier message => on saute
                    continue;
               }
               // Il y a un décalage de 1 dans les clés pour les dates de publication et les titres
               // On retire ce qui est épinglé en haut d'un flux, pour avoir les nouveautés : si on voit que la date repart à la hausse, on efface ce qui a été généré
               if(!empty($last_time) && strtotime($values[$tags['pubDate'][$tag_key-1]]['value'])>$last_time) {
                    unset($titles_array);
               }
               $titles_array[$tag_key] = $values[$value_key]['value'];
               if(!empty($tags['pubDate'])) {
                    $last_time = strtotime($values[$tags['pubDate'][$tag_key-1]]['value']);
               }
          }
     }
     if(!empty($tags['link'])) {
          foreach ($tags['link'] as $tag_key => $value_key) {
               $links_array[$tag_key] = $values[$value_key]['value'];
          }
     }
     if (!empty($titles_array)) {
          $tpl = $GLOBALS['tplEngine']->createTemplate('xml_value.tpl');
          $tpl_links = array();
          
          $i = 0;
          foreach ($titles_array as $key => $this_title) {
               $skip_this = false;
               foreach ($filter_array as $this_filter) {
                    if (stripos($this_title, $this_filter) !== false) {
                         $skip_this = true;
                    }
               }
               if ($skip_this) {
                    // On saute les titres qui contiennent des mots à problèmes
                    continue;
               }
               $tpl_links[] = array(
                    'href' => $links_array[$key],
                    'label' => $titles_array[$key]
               );
               $i++;
               if ($i >= $items_count_max) {
                    break;
               }
          }
          $tpl->assign('links', $tpl_links);
          $tpl->assign('line_length_max', $line_length_max);
          $output .= $tpl->fetch();
     }
     return $output;
}

function clean_str($string)
{
     $string = preg_replace('/[^a-z0-9]/', "-", utf8_decode(String::convert_accents(String::strtolower($string))));
     $string = preg_replace('/[-]{2,}/', "-", $string);
     $output = urlencode($string);
     return $output;
}

function get_upload_errors_text($file_infos, $file_kind = 'image')
{
     $error = "";
     if (empty($file_kind)) {
          $file_kind = 'any';
     }
     $extension = String::strtolower(pathinfo($file_infos['name'], PATHINFO_EXTENSION));
     if ($file_infos == "none") {
          $error = $GLOBALS["STR_UPLOAD_ERROR_YOU_UPLOAD_NOTHING"];
     } elseif (!empty($file_infos['error'])) {
          // Si fichier a essayé d'être téléchargé
          $error = $GLOBALS["STR_UPLOAD_ERROR_DURING_TRANSFER"];
     } elseif ($file_infos['size'] > $GLOBALS['site_parameters']['uploaded_file_max_size']) {
          $error = sprintf($GLOBALS["STR_UPLOAD_ERROR_FILE_IS_TOO_BIG"], round($GLOBALS['site_parameters']['uploaded_file_max_size'] / 1024));
     } elseif (!is_uploaded_file($file_infos['tmp_name'])) {
          $error = $GLOBALS["STR_UPLOAD_ERROR_DURING_TRANSFER"];
     } elseif ($GLOBALS['site_parameters']['check_allowed_types'] && !isset($GLOBALS['site_parameters']['allowed_types'][$file_infos['type']])) {
          // Vérification du type de fichier uploadé
          $error = sprintf($GLOBALS["STR_UPLOAD_ERROR_FILE_NOT_ALLOWED"], $file_infos['type']);
     } elseif (!in_array($extension, $GLOBALS['site_parameters']['extensions_valides_'.$file_kind])) {
          // Vérification de l'extension de fichier uploadé
          $error = $GLOBALS["STR_UPLOAD_ERROR_FILE_TYPE_NOT_VALID"];
     } elseif (!empty($GLOBALS['site_parameters']['extensions_valides_image']) && in_array($extension, $GLOBALS['site_parameters']['extensions_valides_image'])) {
          // Quand on passe ici, Bonne extension d'un fichier qui est une image
          if (!empty($GLOBALS['site_parameters']['upload_oversized_images_forbidden'])) {
               // SECTION DESACTIVEE PAR DEFAUT car les grandes images sont habituellement redimensionnées
               // A ACTIVER avec la variable upload_oversized_images_forbidden à true SI ON VEUT EMPECHER UPLOAD D'IMAGE NECESSITANT UN REDIMENSIONNEMENT
               list($width, $height, $type, $attr) = getimagesize($file_infos['tmp_name']);
               if ($width > $GLOBALS['site_parameters']['image_max_width']) {
                    $error .= sprintf($GLOBALS["STR_UPLOAD_ERROR_IMAGE_MUST_NOT_BE_LARGER_THAN"], $GLOBALS['site_parameters']['image_max_width']);
               }
               if ($height > $GLOBALS['site_parameters']['image_max_height']) {
                    // NE PAS ACTIVER car les grandes images sont redimensionnées
                    $error .= sprintf($GLOBALS["STR_UPLOAD_ERROR_IMAGE_MUST_NOT_BE_HIGHER_THAN"], $GLOBALS['site_parameters']['image_max_height']);
               }
          }
     }
     if (!empty($error)) {
          //On a un problème à afficher
          $tpl = $GLOBALS['tplEngine']->createTemplate('upload_errors_text.tpl');
          $tpl->assign('allowed_types', $GLOBALS['site_parameters']['allowed_types']);
          $tpl->assign('msg', $error);
          return $tpl->fetch();
     } else {
          // Pas d'affichage de problème
          return false;
     }
}

function upload($field_name, $rename_file = true, $file_kind = null, $image_max_width = null, $image_max_height = null, $path = null, $new_file_name_without_extension = null, $default_return_value = null)
{
     if (empty($path)) {
          $path = $GLOBALS['uploaddir'] . '/';
     }
     if (is_array($field_name)) {
          // Compatibilité anciennes versions PEEL < 7.0
          if (!empty($field_name)) {
               // $field_name contient $_FILES[$field_name]
               $file_infos = $field_name;
          } else {
               // Rien à télécharger
               return $default_return_value;
          }
     } elseif (!empty($_REQUEST[$field_name])) {
          // Fichier déjà existant et téléchargé par le passé
          if(strpos($_REQUEST[$field_name], '/' . $GLOBALS['site_parameters']['cache_folder'] . '/') === 0) {
               // Le fichier a été chargé en cache : on va le déplacer et garder le nom
               $file_infos['name'] = basename($_REQUEST[$field_name]);
               $format_filename_base_disabled = true;
          } else {
               // Le fichier est à sa place, on renvoie simplement le nom déjà existant
               return $_REQUEST[$field_name];
          }
     } elseif (empty($_FILES[$field_name]['name'])) {
          // Rien à télécharger, ni de fichier existant
          return $default_return_value;
     } else {
          // On procède à un téléchargement
          $file_infos = $_FILES[$field_name];
          // Teste la validité du téléchargement
          $error = get_upload_errors_text($_FILES[$field_name], $file_kind); 
     }
     if (empty($error) && !empty($file_infos['name'])) {
          // Upload OK
          // Extension du fichier téléchargé
          $extension = String::strtolower(pathinfo($file_infos['name'], PATHINFO_EXTENSION));
          if (empty($new_file_name_without_extension)) {
               if(!empty($format_filename_base_disabled)) {
                    $the_new_file_name = $file_infos['name'];
               } else {
               // Si aucun nom forcé, on en crée un
                    $the_new_file_name = format_filename_base(vb($file_infos['name']), $rename_file). '.' . $extension;
          }
          } else {
          $the_new_file_name = $new_file_name_without_extension . '.' . $extension;
          }
          if(!isset($file_infos['tmp_name'])) {
               // Fichier temporaire stocké dans le cache, on va le déplacer dans le répertoire $path avec le bon nom
               // Si il est déjà déplacé (car on revalide une seconde fois le formulaire), on s'arrange pour que ça marche aussi - dans ce cas on ne passe pas dans le test qui suit
               if($GLOBALS['dirroot'] . $_REQUEST[$field_name] != $path . $the_new_file_name && file_exists($GLOBALS['dirroot'] . $_REQUEST[$field_name])) {
                    rename($GLOBALS['dirroot'] . $_REQUEST[$field_name], $path . $the_new_file_name);
               }
               if(!file_exists($path . $the_new_file_name)) {
                    // Fichier inexistant ou échec du déplacement => on annule le souvenir de ce fichier
                    return $default_return_value;
               }
               return $the_new_file_name;
          } elseif (move_uploaded_file($file_infos['tmp_name'], $path . $the_new_file_name)) {
               // Le fichier est maintenant dans le répertoire des téléchargements
               if(!empty($GLOBALS['site_parameters']['chmod_new_files'])) {
                    @chmod ($path . $the_new_file_name, $GLOBALS['site_parameters']['chmod_new_files']);
               }
               if (!empty($GLOBALS['site_parameters']['extensions_valides_image']) && in_array($extension, $GLOBALS['site_parameters']['extensions_valides_image']) && !empty($image_max_width) && !empty($image_max_height)) {
                    // Les fichiers image sont convertis en jpg uniquement si nécessaire - sinon on garde le fichier d'origine
                    $the_new_jpg_name = $new_file_name_without_extension . '.jpg';
                    // On charge l'image, et si sa taille est supérieure à $destinationW ou $destinationH, ou si elle fait plus de $GLOBALS['site_parameters']['filesize_limit_keep_origin_file'] octets, on doit la régénèrer (sinon on la garde telle qu'elle était)
                    // Si on est dans le cas où on la regénère, on la convertit en JPEG à qualité $GLOBALS['site_parameters']['jpeg_quality'] % (par défaut dans PHP c'est 75%, et dans PEEL on utilise 88% par défaut) et on la sauvegarde sous son nouveau nom
                    $result = image_resize($path . $the_new_file_name, $path . $the_new_jpg_name, $image_max_width, $image_max_height, false, true, $GLOBALS['site_parameters']['filesize_limit_keep_origin_file'], $GLOBALS['site_parameters']['jpeg_quality']);
                    if (!empty($result)) {
                         return basename($result);
                    } else {
                         $tpl = $GLOBALS['tplEngine']->createTemplate('global_error.tpl');
                         $tpl->assign('message', $GLOBALS['STR_ERROR_DECOD_PICTURE']);
                         $error = $tpl->fetch();
                    }
               } else {
                    return $the_new_file_name;
               }
          } else {
               $tpl = $GLOBALS['tplEngine']->createTemplate('global_error.tpl');
               $tpl->assign('message', $GLOBALS['STR_ERROR_SOMETHING_PICTURE'] . ' ' .$path);
               $error = $tpl->fetch();
          }
     }
     if (!empty($error)) {
          $GLOBALS['notification_output_array'][] = $error;
          return $default_return_value;
     }
}

function format_filename_base($original_name, $rename_file = true) {
     if ($rename_file || (function_exists('is_filtered') && is_filtered($original_name))) {
          $new_file_name_without_extension = strftime("%d%m%y_%H%M%S") . "_PEEL_" . MDP(4);
     } else {
          $extension = String::strtolower(pathinfo($original_name, PATHINFO_EXTENSION));
          $modified_old_name_without_extension = preg_replace('/([^.a-z0-9]+)/i', '-', String::strtolower(String::convert_accents(str_replace(array('%2520', '%20', ';', ',', ' ', '^', '$', '#', '<', '>', '[', ']', '{', '}', '(', ')', "'", '"'), array('-', '-', '-', '-', '-', '-', '-', '', '', '', '', '', '', '', '', '', '', ''), basename($original_name, '.' . $extension)))));
          $new_file_name_without_extension = String::strtolower(String::substr(str_replace(array('-----', '----', '---', '--'), array('-', '-', '-', '-'), $modified_old_name_without_extension), 0, 33) . '-' . MDP(6));
     }
     return $new_file_name_without_extension;
}

function delete_uploaded_file_and_thumbs($filename)
{
     if (a_priv('demo')) {
          return false;
     }
     // Protection : ne pas prendre autre chose qu'un nom de fichier
     $filename = str_replace(array('/', '.htaccess'), '', $filename);
     $extension = @pathinfo($filename , PATHINFO_EXTENSION);
     $nom = @basename($filename, '.' . $extension);
     $thumbs_array = @glob($GLOBALS['uploaddir'] . '/thumbs/' . $nom . "-????.jpg");
     if (!empty($thumbs_array)) {
          foreach ($thumbs_array as $this_thumb) {
               unlink($this_thumb);
          }
     }
     return @unlink($GLOBALS['uploaddir'] . '/' . $filename);
}

function http_download_and_die($filename_with_realpath, $serve_download_with_php = true, $file_content_given = null, $file_name_given = null, $force_download = true)
{
     if (!$serve_download_with_php) {
          // redirection vers le fichier à télécharger
          redirect_and_die(str_replace($GLOBALS['dirroot'], $GLOBALS['wwwroot'], $filename_with_realpath));
     } else {
          switch (strrchr(basename($filename_with_realpath), ".")) {
               case ".gz":
                    $type = "application/x-gzip";
                    break;
               case ".tgz":
                    $type = "application/x-gzip";
                    break;
               case ".zip":
                    $type = "application/zip";
                    break;
               case ".pdf":
                    $type = "application/pdf";
                    break;
               case ".png":
                    $type = "image/png";
                    break;
               case ".gif":
                    $type = "image/gif";
                    break;
               case ".jpg":
                    $type = "image/jpeg";
                    break;
               case ".txt":
                    $type = "text/plain";
                    break;
               case ".htm":
                    $type = "text/html";
                    break;
               case ".html":
                    $type = "text/html";
                    break;
               case ".mp3":
                    $type = "audio/mpeg";
                    break;
               case ".ogg":
                    $type = "audio/ogg";
                    break;
               case ".wav":
                    $type = "audio/wav";
                    break;
               case ".wma":
                    $type = "audio/x-ms-wma";
                    break;
               default:
                    $type = "application/octet-stream";
                    break;
          }
          @ignore_user_abort(true);
          @set_time_limit(0);
          if (!empty($file_content_given)) {
               $content_length = strlen($file_content_given);
          } else {
               $content_length = filesize($filename_with_realpath);
          }
          if(empty($file_name_given)) {
               $file_name_given = basename($filename_with_realpath);
          }
          if($force_download) {
               header('Content-Description: File Transfer');
          }
          header("Pragma: no-cache");
          header("Cache-Control: must-revalidate, post-check=0, pre-check=0");
          header('Expires: Sat, 26 Jul 1997 05:00:00 GMT'); // Date in the past
          header('Last-Modified: '.gmdate('D, d M Y H:i:s').' GMT');
          if($force_download) {
               // force download dialog
               // Un hébergement peut éventuellement faire une erreur 500 si exécution des 3 lignes suivantes, mais problème jamais reproduit ailleurs
               if(!empty($GLOBALS['site_parameters']['donwload_headers_force_download_skip'])) {
                    header('Content-Type: application/force-download');
                    header('Content-Type: application/octet-stream', false);
                    header('Content-Type: application/download', false);
               }
               $content_disposition = 'attachment';
          } else {
               $content_disposition = 'inline';
          }
          header("Content-Type: " . $type . "", false);
          header("Content-disposition: " . $content_disposition . "; filename=\"" . rawurlencode($file_name_given) . "\"");
          header("Content-Transfer-Encoding: binary");
          header("Content-Length: " . intval($content_length));
          ob_clean();
          flush();
          if (!empty($file_content_given)) {
               echo $file_content_given;
          } else {
               readfile($filename_with_realpath);
          }
          die();
     }
}

function get_url_from_uploaded_filename($filename)
{
     if(strpos($filename, '//') !== false) {
          $this_url = $filename;
     } elseif(strpos($filename, '/'.$GLOBALS['site_parameters']['cache_folder']) === 0) {
          $this_url = $GLOBALS['wwwroot'] . $filename;
     } else {
          $this_url = $GLOBALS['repertoire_upload'] . '/' . $filename;
     }
     return $this_url;
}

function get_file_type($filename)
{
     $ext = String::strtolower(String::substr($filename, strrpos($filename, ".") + 1));
     if(in_array($ext, array('gif', 'jpg', 'jpeg', 'png'))) {
          $ext = 'image';
     }
     return $ext;
}

function get_document_image_html($filename, $width = 100, $height = 100)
{
     if(!empty($filename)) {
          return '<a href="' . get_url_from_uploaded_filename($filename) . '" onclick="return(window.open(this.href)?false:true);"><img src="' . $GLOBALS['repertoire_upload'] . '/thumbs/' . thumbs($filename, $width, $height, 'fit') . '" alt="" style="max-width: ' . $width . 'px; max-height: ' . $height . 'px" /></a>';
     }
}

function get_uploaded_file_infos($field_name, $file, $delete_url, $logo_width = 100, $logo_height = 100)
{
     if(empty($field_name)) {
          return array();
     }
     $file_type = get_file_type($file);
     $div_id = $field_name . '_' . substr(md5(rand()),0,6);
     $result = array('name' => basename($file),
          'div_id' => $div_id,
          'form_name' => $field_name,
          'form_value' => $file,
          'drop_src' => $GLOBALS['administrer_url'] . '/images/b_drop.png',
          'drop_href' => str_replace(array('[DIV_ID]', "'".$field_name."'", '"'.$field_name.'"'),array($div_id, "'".$div_id."'", '"'.$div_id.'"'), $delete_url),
          'url' => (!empty($file)?get_url_from_uploaded_filename($file):null),
          'type' => $file_type,
          'STR_DELETE_THIS_FILE' => $GLOBALS['STR_DELETE_THIS_FILE']
          );
     if($file_type != 'image') {
          $result['file_logo_src'] = $GLOBALS['repertoire_upload'] . '/thumbs/' . thumbs($file, $logo_width, $logo_height, 'fit');
     }
     return $result;
}

function get_site_domain($return_only_domains = false, $domain = null, $strip_subdomain = true)
{
     if(strpos($GLOBALS['wwwroot'], '://127.0.0.1')!==false) {
          return $_SERVER["HTTP_HOST"];
     } elseif (empty($domain)) {
          $domain = $_SERVER["HTTP_HOST"];
     } else {
          $domain = str_replace(array('http://', 'https://', '://', '//'), '', $domain);
          $temp = explode('/', $domain, 2);
          $domain = $temp[0];
     }
     $temp = explode('.', $domain);
     if(count($temp)>1 && (count($temp)!=4 || !is_numeric(str_replace('.','',$domain)))) {
          // Ce n'est pas une IP, ni localhost ou un nom de machine => c'est un domaine avec potentiellement un (sous-)sous-domaine
          if(in_array($temp[count($temp)-2], array('com', 'org', 'co'))) {
               // Domaine en .co.uk, .com.sb, .org.uk, etc.
               $temp[count($temp)-2] = $temp[count($temp)-2] . '.' . $temp[count($temp)-1];
               unset($temp[count($temp)-1]);
          }
          if ($strip_subdomain) {
               return $temp[count($temp)-2].'.'.$temp[count($temp)-1];
          } else {
               return $temp[count($temp)-3].'.'.$temp[count($temp)-2].'.'.$temp[count($temp)-1];
          }
     } elseif(!$return_only_domains) {
          return $domain;
     } else {
          return false;
     }
}


function build_search_terms($search, $match_method)
{
     $terms = array();
     $quote_terms = array();

     /* Si c'est une phrase exacte */
     if (!empty($search)) {
          if ($match_method == 3) {
               $terms[] = $search;
          } else {
               /* Si ce n'est pas une phrase exacte, on découpe la chaine */
               if (strstr($search, '"')) {
                    // first pull out all the double quoted strings (e.g. '"iMac DV" or -"iMac DV"')
                    preg_match_all('/-*".*?"/', $search, $matched_terms_array);
                    $search = preg_replace('/-*".*?"/', '', $search);
                    $quote_terms = preg_replace('/"/', '', $matched_terms_array[0]);
               }
               // finally pull out the rest words in the string
               $terms = preg_split("/\s+/", $search, 0, PREG_SPLIT_NO_EMPTY);
          }
     }
     // merge them all together and return
     // array_unique() Takes an input array and returns a new array without duplicate values.
     return array_unique(array_merge($terms, $quote_terms));
}

function build_terms_clause($terms, $fields, $match_method)
{
     if (empty($terms) || empty($fields)) {
          return ' 1 ';
     }
     if ($match_method == 2) {
          $compare_type = 'OR';
     } else {
          $compare_type = 'AND';
     }
     // construction de la requete
     $conditions_array = array();
     foreach ($terms as $term) {
          // si on a un - devant, alors on ne veut pas du mot
          if (String::substr($term, 0, 1) == '-') {
               // on enleve le '-' qu'on convertir en NOT
               $term = String::substr($term, 1);
               $notmod = 'NOT';
          } else {
               $notmod = '';
          }
          $this_term_conditions_array = array();
          foreach ($fields as $val) {
               if ($term !== '') {
                    $this_term_conditions_array[] = word_real_escape_string($val) . ' ' . word_real_escape_string($notmod) . ' LIKE "%' . nohtml_real_escape_string($term) . '%"';
               } else {
                    $this_term_conditions_array[] = word_real_escape_string($val) . ' ' . word_real_escape_string($notmod) . ' LIKE ""';
               }
          }
          // Si notmod est actif, il faut utiliser AND pour que l'exclusion s'applique
          $conditions_array[] = '(' . implode((empty($notmod)?' OR ':' AND '), $this_term_conditions_array) . ')';
     }
     $where_clause = '( ' . implode(' ' . $compare_type . ' ', $conditions_array) . ' )';

     return $where_clause;
}

function updateTelContactNotClosed()
{
     query('UPDATE peel_admins_actions
          SET remarque="Clotûre a posteriori car pas de fin déclarée par l\'administrateur",
               data=DATE_ADD(date, INTERVAL 10 MINUTE)
          WHERE ((action = "PHONE_EMITTED") OR (action = "PHONE_RECEIVED")) AND data="NOT_ENDED_CALL" AND ' . get_filter_site_cond('admins_actions') . '
          ');
}

if (!function_exists('desinscription_newsletter')) {
     function desinscription_newsletter($mail)
     {
          $tpl = $GLOBALS['tplEngine']->createTemplate('desinscription_newsletter.tpl');
          $q = query('SELECT id_utilisateur
               FROM peel_utilisateurs
               WHERE email = "' . nohtml_real_escape_string($mail) . '" AND ' . get_filter_site_cond('utilisateurs') . '');
          if ($data = fetch_assoc($q)) {
               query('UPDATE peel_utilisateurs
                    SET newsletter = "0"
                    WHERE id_utilisateur=' . intval($data['id_utilisateur']) . ' AND ' . get_filter_site_cond('utilisateurs') . '');
               $tpl->assign('msg', $GLOBALS['STR_DESINSCRIPTION_NEWSLETTER_OK']);
          } else {
               $tpl->assign('msg', $GLOBALS['STR_EMAIL_ABSENT']);
          }
          $tpl->assign('STR_DESINSCRIPTION_NEWSLETTER', $GLOBALS['STR_DESINSCRIPTION_NEWSLETTER']);
          return $tpl->fetch();
     }
}

function close_page_generation($html_page = true)
{
     $output = '';
     // Evite de devoir lancer un cron pour optimisations et nettoyages divers
     // On fait des tests séparés pour ne pas tout lancer d'un coup, mais répartir au mieux
     $GLOBALS['contentMail'] = '';
     call_module_hook('close_page_generation', array());

     if(!empty($GLOBALS['site_parameters']['force_systematic_user_session_reload']) && est_identifie()) {
          // Si on veut forcer à chaque chargement de page la mise à jour des droits des utilisateurs
          $q = query('SELECT priv
               FROM peel_utilisateurs
               WHERE id_utilisateur = "'.intval($_SESSION['session_utilisateur']['id_utilisateur']).'" AND ' . get_filter_site_cond('utilisateurs'));
          if($result = fetch_assoc($q)) {
               $_SESSION['session_utilisateur']['priv'] = $result['priv'];
          } else {
               unset($_SESSION['session_utilisateur']);
          }
     }
     if(!check_if_module_active('crons')) {
          if (mt_rand(1, 10000) == 5000) {
               optimize_Tables();
          }
          if (mt_rand(1, 10000) == 5000) {
               clean_utilisateur_connexions();
          }
          if (mt_rand(1, 10000) == 5000) {
               clean_admins_actions();
          }
          if (mt_rand(1, 10000) == 5000) {
               clean_Cache();
          }
     }
     if ($html_page && defined('PEEL_DEBUG') && PEEL_DEBUG) {
          // Affichage des infos de pseudo cron remplies par les fonctions ci-dessus
          $output .= $GLOBALS['contentMail'];
     }
     db_close();
     
     if(!$html_page && !empty($GLOBALS['site_parameters']['google_analytics_site_code_for_nohtml_pages']) && !is_user_bot()) {
          // On appelle directement Google analytics pour déclarer qu'une page a été vue, car la page n'est pas en HTML et donc on ne peut faire exécuter par le client du javascript ou faire appeler une image d'un pixel
          $var_cookie=10000000+(hexdec(session_id())%89999999); // rand(10000000,99999999);//random cookie number
          $var_random=rand(1000000000,2147483647); //number under 2147483647
          $var_today=time(); //today
          $visitorId = '0x' . substr (md5(vb($_SERVER['REMOTE_ADDR'])),0,16);
          $var_uservar='-'; //enter your own user defined variable
          if(!empty($_COOKIE['__utma'])) {
               $utma = $_COOKIE['__utma'];
               $temp = explode('.', $utma);
               $var_cookie = $temp[0];
          } else {
               $utma = ''.$var_cookie.'.'.$var_random.'.'.$var_today.'.'.$var_today.'.'.$var_today.'.2';
          }
          if(!empty($_COOKIE['__utmb'])) {
               $utmb = $_COOKIE['__utmb'];
          } else {
               $utmb = $var_cookie;
          }
          if(!empty($_COOKIE['__utmc'])) {
               $utmc = $_COOKIE['__utmc'];
          } else {
               $utmc = $var_cookie;
          }
          if(!empty($_COOKIE['__utmz'])) {
               $utmz = $_COOKIE['__utmz'];
          } else {
               $utmz = ''.$var_cookie.'.'.$var_today.'.2.2.utmccn%3D(direct)%7Cutmcsr%3D(direct)%7Cutmcmd%3D(none)';
          }
          if(!empty($_COOKIE['__utmv'])) {
               $utmv = $_COOKIE['__utmv'];
          } else {
               $utmv = $var_cookie.'.'.$var_uservar;
          }
          $utm_get[] = "utmwv=" . urlencode(isset($_COOKIE['__utmwv'])?$_COOKIE['__utmwv']:'1');
          $utm_get[] = "utmn=" . urlencode(rand(1000000000,9999999999));
          $utm_get[] = "utmhn=" . urlencode(get_site_domain(true));
          $utm_get[] = "utmr=" . urlencode(vb($_SERVER['HTTP_REFERER']));
          $utm_get[] = "utmp=" . urlencode($_SERVER['REQUEST_URI']);
          $utm_get[] = "utmac=" . urlencode(str_replace('UA-', 'MO-', $GLOBALS['site_parameters']['google_analytics_site_code_for_nohtml_pages']));
          $utm_get[] = "utmcc=__utma%3D" . urlencode($utma) . '%3B%2B__utmb%3D' . urlencode($utmb) . '%3B%2B__utmc%3D' . urlencode($utmc) . '%3B%2B__utmz%3D' . $utmz . '%3B%2B__utmv%3D' . urlencode($utmv) . "%3B";
          $utm_get[] = "utmvid=" . urlencode(isset($_COOKIE['__utmvid'])?$_COOKIE['__utmvid']:$visitorId);
          $utm_get[] = "utmip=" . urlencode(substr(vb($_SERVER["REMOTE_ADDR"]), 0, strrpos(vb($_SERVER["REMOTE_ADDR"]), '.')).'.0');
          $utm_get[] = "utmsr=" . urlencode(isset($_COOKIE['__utmsr'])?$_COOKIE['__utmsr']:'-');
          $utm_get[] = "utmsc=" . urlencode(isset($_COOKIE['__utmsc'])?$_COOKIE['__utmsc']:'-');
          $utm_get[] = "utmul=" . urlencode(isset($_COOKIE['__utmul'])?$_COOKIE['__utmul']:'-');
          $utm_get[] = "utmje=" . urlencode(isset($_COOKIE['__utmje'])?$_COOKIE['__utmje']:'0');
          $utm_get[] = "utmfl=" . urlencode(isset($_COOKIE['__utmfl'])?$_COOKIE['__utmfl']:'-');
          $utm_get[] = "guid=on";
          $utm_get[] = "utmdt=" . urlencode(isset($GLOBALS['meta_title'])?$GLOBALS['meta_title']:'-');
          $handle = fopen ('http://www.google-analytics.com/__utm.gif?'.implode('&', $utm_get), "r");
          $test = fgets($handle);
          fclose($handle);
     }
     return $output;
}

function optimize_Tables()
{
     $GLOBALS['contentMail'] .= 'Optimisation des tables : ';
     $tables = '';
     $q = query('SHOW TABLES FROM ' . $GLOBALS['nom_de_la_base']);
     while ($row = fetch_row($q)) {
          query('OPTIMIZE TABLE `' . $row[0] . '`');
          sleep(2);
     }
     $GLOBALS['contentMail'] .= 'Ok' . "\r\n\r\n";
}

function clean_Cache($days_max = 15, $filename_beginning = null)
{
     $files_deleted = nettoyer_dir($GLOBALS['dirroot'] . '/' . $GLOBALS['site_parameters']['cache_folder'], 3600 * 24 * $days_max, $filename_beginning);
     if(!empty($GLOBALS['contentMail'])) {
          $GLOBALS['contentMail'] .= 'Suppression des fichiers de plus de ' . $days_max . ' jours dans le dossier ' . $dir . '/ : ';
          $GLOBALS['contentMail'] .= 'Ok - ' . $files_deleted . ' fichiers supprimés' . "\r\n\r\n";
     }
}

function nettoyer_dir($dir, $older_than_seconds = 3, $filename_beginning = null, $create_files_array_found_instead_of_delete = false)
{
     if (a_priv('demo')) {
          return false;
     }
     $files_deleted = 0;
     if(String::substr($dir, -1) == '/') {
          $dir = String::substr($dir, 0, String::strlen($dir) - 1);
     }
     if ($dir != $GLOBALS['dirroot'] && is_dir($dir) && ($dossier = opendir($dir))) {
          while (false !== ($file = readdir($dossier))) {
               if ($file != '.' && $file != '..' && $file[0] != '.' && filemtime($dir . '/' . $file) < time() - $older_than_seconds && is_file($dir . '/' . $file) && (empty($filename_beginning) || strpos($file, $filename_beginning) === 0)) {
                    // On efface les fichiers vieux de plus de $older_than_seconds secondes et qui ne sont pas des .htaccess
                    if($create_files_array_found_instead_of_delete) {
                         $GLOBALS['files_found_in_folder'][] = $file;
                    } else {
                         unlink($dir . '/' . $file);
                    }
                    $files_deleted++;
               } elseif ($file != '.' && $file != '..' && is_dir($dir . '/' . $file)) {
                    // On efface récursivement le contenu des sous-dossiers
                    $files_deleted += nettoyer_dir($dir . '/' . $file, $older_than_seconds, $filename_beginning);
               }
          }
     }
     return $files_deleted;
}

function clean_utilisateur_connexions($days_max = 730)
{
     $max_reduce_size = false;
     if ($max_reduce_size) {
          $days_max2 = 365 + 30;
          // Archivage peel_utilisateur_connexions sur 1 an pour les utilisateurs qui viennent encore, ou 2 ans pour les autres
          $GLOBALS['contentMail'] .= 'Suppression des infos de connexion utilisateurs de plus de ' . $days_max2 . ' jours dans la BDD : ';
          $q = query('SELECT *, MAX(date) AS max_date, MIN(date) AS min_date
               FROM peel_utilisateur_connexions uc
               GROUP BY uc.user_id
               HAVING max_date>"' . date('Y-m-d H:i:s', time() - $days_max2 * 24 * 3600) . '"  AND min_date<"' . date('Y-m-d H:i:s', time() - $days_max2 * 24 * 3600) . '"');
          $users_ids_array = array();
          while ($result = fetch_assoc($q)) {
               $users_ids_array[] = $result['user_id'];
          }
          if (!empty($users_ids_array)) {
               query('DELETE FROM peel_utilisateur_connexions
                    WHERE date<="' . date('Y-m-d H:i:s', time() - $days_max2 * 24 * 3600) . '" AND user_id IN ("' . implode('","', nohtml_real_escape_string($users_ids_array)) . '")');
          }
          $GLOBALS['contentMail'] .= 'Ok - ' . count($users_ids_array) . ' utilisateurs concernés' . "\r\n\r\n";
          sleep(1);
     }
     $GLOBALS['contentMail'] .= 'Suppression des infos de connexion utilisateurs de plus de ' . $days_max . ' jours dans la BDD : ';
     // On supprime tout ce qui dépasse 2 ans
     query('DELETE FROM peel_utilisateur_connexions
          WHERE date<="' . date('Y-m-d H:i:s', time() - $days_max * 24 * 3600) . '"');
     $GLOBALS['contentMail'] .= 'Ok - ' . affected_rows() . ' lignes effacées' . "\r\n\r\n";
}

function clean_admins_actions($days_max = 1460)
{
     $GLOBALS['contentMail'] .= 'Suppression des actions administrateur de plus de ' . $days_max . ' jours dans la BDD : ';
     // On supprime tout ce qui dépasse 4 ans
     query('DELETE FROM peel_admins_actions
          WHERE date<="' . date('Y-m-d H:i:s', time() - $days_max * 24 * 3600) . '"');
     $GLOBALS['contentMail'] .= 'Ok - ' . affected_rows() . ' lignes effacées' . "\r\n\r\n";
}

function formSelect ($name, $tab, $preselected_value = null, $addOne = 0, $get = 0)
{
     $o = '';
     foreach ($tab as $k => $v) {
          $k = ($addOne) ? $k + 1 : $k;

          if (!empty($preselected_value)) {
               $s = (($preselected_value == $k)) ? (' selected="selected"') : ('');
          } elseif (!$get) {
               $s = (isset($_POST['form_' . $name . '']) && $_POST['form_' . $name . ''] == $k) ? (' selected="selected"') : ('');
          } else {
               $s = (isset($_GET[$name]) && urldecode($_GET['' . $name . '']) == $k) ? ' selected="selected"' : '';
          }
          $o .= '<option value="' . String::str_form_value($k) . '" ' . $s . '>' . $v . '</option>' . "\n";
     }
     return $o;
}

function getTextEditor($instance_name, $width, $height, $default_text, $default_path = null, $type_html_editor = 0, $compter_char_max_if_enabled = 255, $placeholder = '')
{
     $output = '';
     if (is_numeric($width)) {
          $width_css = $width . 'px';
          $cols = $width / 12;
     } else {
          $width_css = $width;
          $cols = 50;
     }
     if (!empty($type_html_editor)) {
          // Editeur choisi en paramètre de la fonction
          $this_html_editor = vb($type_html_editor);
     } else {
          // Editeur sélectionné depuis la configuration du site
          $this_html_editor = vn($GLOBALS['site_parameters']['html_editor']);
     }
     // Pour les éditeurs WISIWYG, définition des CSS qui sont ajoutés pour l'édition si c'est possible techniquement
     $css_files = array();
     if(!empty($GLOBALS['site_parameters']['bootstrap_enabled'])) {
          $css_files[] = get_url('/lib/css/bootstrap.css');
     }
     if(!empty($GLOBALS['site_parameters']['css'])) {
          foreach (get_array_from_string($GLOBALS['site_parameters']['css']) as $this_css_filename) {
               if(file_exists($GLOBALS['repertoire_modele'] . '/css/' . trim($this_css_filename))) {
                    $css_files[] = $GLOBALS['repertoire_css'] . '/' . trim($this_css_filename); // .'?'.time()
               }
          }
     }
     if ($this_html_editor == '1') {
          // Editeur nicEditor
          if(empty($GLOBALS['html_editor_loaded'])) {
               $GLOBALS['html_editor_loaded'] = true;
               $GLOBALS['js_files_pageonly'][] = get_url('/lib/nicEditor/nicEdit.js');
          }
          $GLOBALS['js_ready_content_array'][] = '
bkLib.onDomLoaded(function() {
     new nicEditor({iconsPath : \'' . $GLOBALS['wwwroot'] . '/lib/nicEditor/nicEditorIcons.gif\',fullPanel : true}).panelInstance(\'' . $instance_name . '\');
});
';
          $output .= '
<div style="width:' . $width . '; max-width: 100%; overflow-x: auto; -webkit-overflow-scrolling: touch;">
     <div style="min-width:200px">
          <textarea name="' . $instance_name . '" id="' . $instance_name . '" style="width:' . $width_css . '; height:' . $height . 'px" rows="' . ($height / 12) . '" cols="' . $cols . '">' . String::htmlentities($default_text) . '</textarea>
     </div>
</div>
';
     } elseif ($this_html_editor == '0') {
          $default_text = String::nl2br_if_needed($default_text);
          // Editeur FCKeditor
          include_once($GLOBALS['dirroot'] . "/lib/FCKeditor/fckeditor.php");
          $oFCKeditor = new FCKeditor($instance_name);
          if(empty($default_path)) {
               $default_path = get_url('/');
          }
          $oFCKeditor->BasePath = $default_path . 'lib/FCKeditor/';
          $oFCKeditor->Value = String::htmlspecialchars_decode($default_text, ENT_QUOTES);
          $oFCKeditor->Height = $height;
          $oFCKeditor->Width = $width;
          $oFCKeditor->Config = array('EditorAreaCSS' => implode(',', $css_files));
          $output .= '
<div style="width:' . $width . '; max-width: 100%; overflow-x: auto; -webkit-overflow-scrolling: touch;">
     <div style="min-width:550px">
          '.$oFCKeditor->CreateHtml().'
     </div>
</div>
';
     } elseif ($this_html_editor == '3') {
          $default_text = String::nl2br_if_needed($default_text);
          // Editeur CKeditor
          include_once($GLOBALS['dirroot'] . "/lib/ckeditor/ckeditor.php");
          $config = array('width' => $width, 'height' => $height, 'contentsCss' => $css_files);
          $CKEditor = new CKEditor($GLOBALS['wwwroot'] . '/lib/ckeditor/');
          $CKEditor->returnOutput = true;
          $output .= '
<div style="width:' . $width . '; max-width: 100%; height:' . $height . 'px; overflow-x: auto; -webkit-overflow-scrolling: touch;">
     <div style="min-width:270px">
          '.$CKEditor->editor($instance_name, String::htmlspecialchars_decode($default_text, ENT_QUOTES), $config).'
     </div>
</div>
';
     } elseif ($this_html_editor == '4') {
          $default_text = String::nl2br_if_needed($default_text);
          // Editeur TinyMCE
          if(empty($GLOBALS['html_editor_loaded'])) {
               $GLOBALS['html_editor_loaded'] = true;
               $GLOBALS['js_files_pageonly'][] = get_url('/lib/tiny_mce/jquery.tinymce.js');
               $GLOBALS['js_ready_content_array'][] = '
          $("textarea.tinymce").tinymce({
               // Location of TinyMCE script
               script_url : "' . $GLOBALS['wwwroot'] . '/lib/tiny_mce/tiny_mce.js",

               // General options
               theme : "advanced",
               plugins : "pagebreak,style,layer,table,save,advhr,advimage,advlink,emotions,iespell,inlinepopups,insertdatetime,preview,media,searchreplace,print,contextmenu,paste,directionality,fullscreen,noneditable,visualchars,nonbreaking,xhtmlxtras,template",
               entity_encoding : "raw",

               // Theme options
               theme_advanced_buttons1 : "save,newdocument,|,bold,italic,underline,strikethrough,|,justifyleft,justifycenter,justifyright,justifyfull,styleselect,formatselect,fontselect,fontsizeselect",
               theme_advanced_buttons2 : "cut,copy,paste,pastetext,pasteword,|,search,replace,|,bullist,numlist,|,outdent,indent,blockquote,|,undo,redo,|,link,unlink,anchor,image,cleanup,help,code,|,insertdate,inserttime,preview,|,forecolor,backcolor",
               theme_advanced_buttons3 : "tablecontrols,|,hr,removeformat,visualaid,|,sub,sup,|,charmap,emotions,iespell,media,advhr,|,print,|,ltr,rtl,|,fullscreen",
               theme_advanced_buttons4 : "insertlayer,moveforward,movebackward,absolute,|,styleprops,|,cite,abbr,acronym,del,ins,attribs,|,visualchars,nonbreaking,template,pagebreak",
               theme_advanced_toolbar_location : "top",
               theme_advanced_toolbar_align : "left",
               theme_advanced_statusbar_location : "bottom",
               theme_advanced_resizing : true,
               width: \''.$width.'\',
               height: \''.$height.'\',

               // Example content CSS (should be your site CSS)
               content_css : "'.implode(',', $css_files).'",
          });
';
          }
          $output .= '
<div style="width:' . $width . '; max-width: 100%; overflow-x: auto; -webkit-overflow-scrolling: touch;">
     <div style="min-width:600px">
          <textarea class="tinymce" name="' . $instance_name . '" id="' . $instance_name . '" style="width:' . $width_css . '; height:' . $height . 'px" rows="' . ($height / 12) . '" cols="' . $cols . '">' . String::htmlentities($default_text) . '</textarea>
     </div>
</div>
';
     } elseif($this_html_editor == '5') {
          // Champ textarea de base + Compteur de caractères
          $output .= '
               <textarea class="form-control" placeholder="'. $placeholder.'" name="' . $instance_name . '" cols="' . $cols . '" rows="' . ($height / 12) . '" onfocus="Compter(this,'.$compter_char_max_if_enabled.',compteur, true)" onkeypress="Compter(this,'.$compter_char_max_if_enabled.',compteur, true)" onkeyup="Compter(this,'.$compter_char_max_if_enabled.',compteur, true)" onblur="Compter(this,'.$compter_char_max_if_enabled.',compteur, true)">' . String::htmlentities($default_text) . '</textarea><br />
               <div class="compteur_contener"><span style="margin:5px;">'.$GLOBALS['STR_REMINDING_CHAR'].'</span><input class="form-control compteur" type="number" name="compteur" size="4" onfocus="blur()" value="0" /></div>
';
     } else {
          // Champ textarea de base
          $output .= '
               <textarea name="' . $instance_name . '" id="' . $instance_name . '" style="width:' . $width_css . '; height:' . $height . 'px" rows="' . ($height / 12) . '" cols="' . $cols . '">' . String::htmlentities($default_text) . '</textarea>
';
     }
     return $output;
}

function set_configuration_variable($frm, $update_if_technical_code_exists = false, $allow_create = true)
{
     if(!isset($frm['etat'])) {
          $frm['etat'] = 1;
     }
     if(!isset($frm['site_id'])) {
          if(defined('IN_PEEL_ADMIN') && isset($_SESSION['session_admin_multisite'])) {
               // Par défaut, s'applique au site en cours d'utilisation
               $frm['site_id'] = $_SESSION['session_admin_multisite'];
          } else {
               $frm['site_id'] = $GLOBALS['site_id'];
          }
     }
     if($update_if_technical_code_exists && !empty($frm['technical_code'])) {
          // On récupère la ligne si elle existe pour ce site_id et pas un autre
          $sql = "SELECT id
               FROM peel_configuration
               WHERE technical_code = '" . real_escape_string($frm['technical_code']) . "' AND " . get_filter_site_cond('configuration', null, false, vb($frm['site_id']), true);
          $qid = query($sql); 
          if ($select = fetch_assoc($qid)) {
               // Elément déjà existant, qu'on met à jour
               update_configuration_variable($select['id'], $frm);
               return true;
          }
     }
     if($allow_create) {
          // La création d'un nouveau paramètre n'est pas souhaitée à chaque fois, afin d'éviter des doublons.
          if(in_array($frm['string'], array('true', 'false'))) {
               $frm['type'] = 'boolean';
          } elseif(!isset($frm['type'])) {
               $frm['type'] = 'string';
          }
          if(is_array($frm['string'])) {
               $frm['string'] = get_string_from_array($frm['string']);
               $frm['type'] = 'array';
          }
          // On cherche d'abord si cette configuration demandée est la même qu'une configuration publique
          $sql_items[] = "etat = '" . intval($frm['etat']) . "'";
          $sql_items[] = "technical_code = '" . nohtml_real_escape_string($frm['technical_code']) . "'";
          $sql_items[] = "string = '" . real_escape_string($frm['string']) . "'";
          $sql_items[] = "lang = '" . nohtml_real_escape_string(vb($frm['lang'])) . "'";
          $sql = "SELECT id
               FROM peel_configuration
               WHERE " . implode(' AND ', $sql_items) . " AND " . get_filter_site_cond('configuration', null, false, 0, true);
          $qid = query($sql); 
          if (!fetch_assoc($qid)) {
               $sql_items[] = "`type` = '" . nohtml_real_escape_string($frm['type']) . "'";
               $sql_items[] = "`last_update` = '" . date('Y-m-d H:i:s', time()) . "'";
               $sql_items[] = "`origin` = '" . nohtml_real_escape_string(vb($frm['origin'])) . "'";
               $sql_items[] = "`explain` = '" . nohtml_real_escape_string(vb($frm['explain'])) . "'";
               // MAJ pour la page en cours de génération
               if($frm['type'] == 'array') {
                    $GLOBALS['site_parameters'][$frm['technical_code']] = get_array_from_string($frm['string']);
               } else {
                    $GLOBALS['site_parameters'][$frm['technical_code']] = $frm['string'];
               }
               // MAJ en BDD
               $sql = "INSERT INTO peel_configuration
                    SET " . implode(', ', $sql_items) . ", `site_id` = '" . nohtml_real_escape_string(get_site_id_sql_set_value($frm['site_id'])) . "'";
               return query($sql);
          }
     } else {
          return null;
     }
}

function update_configuration_variable($id_or_technical_code, $frm, $delete = false)
{
     if(isset($frm['string']) && is_array($frm['string'])) {
          $frm['string'] = get_string_from_array($frm['string']);
     }
     if($delete) {
          // MAJ pour la page en cours de génération
          unset($GLOBALS['site_parameters'][$frm['technical_code']]);
          // Modification en BDD
          $sql = "DELETE FROM peel_configuration
               WHERE ";
     } else {
          // MAJ pour la page en cours de génération
          if(isset($frm['string'])) {
               if(vb($frm['type']) == 'array') {
                    $GLOBALS['site_parameters'][$frm['technical_code']] = get_array_from_string($frm['string']);
               } else {
                    $GLOBALS['site_parameters'][$frm['technical_code']] = $frm['string'];
               }
          }
          // Modification en BDD
          $sql = "UPDATE peel_configuration
               SET etat = '" . intval($frm['etat']) . "'
                    , technical_code = '" . nohtml_real_escape_string($frm['technical_code']) . "'
                    ".(isset($frm['type'])?", type = '" . nohtml_real_escape_string($frm['type']) . "'":"")."
                    ".(isset($frm['string'])?", string = '" . real_escape_string($frm['string']) . "'":"")."
                    , last_update = '" . date('Y-m-d H:i:s', time()) . "'
                    ".(isset($frm['origin'])?", origin = '" . nohtml_real_escape_string($frm['origin']) . "'":"")."
                    ".(isset($frm['lang'])?", lang = '" . nohtml_real_escape_string($frm['lang']) . "'":"")."
                    ".(isset($frm['explain'])?", `explain` = '" . nohtml_real_escape_string($frm['explain']) . "'":"")."
                    ".(isset($frm['site_id'])?", `site_id` = '" . nohtml_real_escape_string(get_site_id_sql_set_value($frm['site_id'])) . "'":"")."
               WHERE ";
     }
     if(is_numeric($id_or_technical_code)) {
          $sql .= "id = '" . intval($id_or_technical_code) . "'";
     } else {
          $sql .= "technical_code = '" . real_escape_string($id_or_technical_code) . "'";
     }
     $sql .= " AND " . get_filter_site_cond('configuration', null, true, vb($frm['site_id'], null));
     return query($sql);
}

function get_minified_src($files_array, $files_type = 'css', $lifetime = 3600) {
     //if(a_priv('admin*')) { var_dump($files_array); }
     if($files_type == 'css') {
          // NB : Si on utilise un CDN pour repertoire_css, ce CDN va être utilisé pour les autres dossiers qui contiennent des CSS également
          $this_wwwroot = get_wwwroot_cdn('repertoire_css');
     } else {
          $this_wwwroot = $GLOBALS['wwwroot'];
     }
     if($files_type == 'js') {
          // Pour des raisons de compatibilité, on n'applique pas de minified sur les fichiers contenant ces chaines de caractères
          $excluded_files = vb($GLOBALS['site_parameters']['minify_js_exclude_array'], array());
          $excluded_files[] = 'prototype.js';
          $excluded_files[] = 'controls.js';
          $excluded_files[] = 'effects.js';
          $included_files = array('datepicker');
     } elseif($files_type == 'css') {
          if(!empty($GLOBALS['site_parameters']['minify_css_exclude_array'])) {
               $excluded_files = $GLOBALS['site_parameters']['minify_css_exclude_array'];
          }
     }
     $original_files_array = $files_array;
     foreach($files_array as $this_key => $this_file) {
          if(String::substr($this_file, 0, 2) == '//') {
               // Gestion des chemins de fichiers http/https automatiques
               $this_file = 'http:' . $this_file;
          } elseif(String::strpos($this_file, '//') === false && String::substr($this_file, 0, 1) == '/') {
               // Chemin absolu
               $this_file = $this_wwwroot . $this_file;
          } elseif(String::strpos($this_file, '//') === false) {
               // Chemin relatif car le nom du fichier ne commence pas par / => par défaut on considère qu'il est dans le répertoire CSS dans modeles/
               $this_file = $GLOBALS['repertoire_css'] . '/' . $this_file;
          } 
          if($GLOBALS['wwwroot'] != $this_wwwroot) {
               $this_file = str_replace($GLOBALS['wwwroot'], $this_wwwroot, $this_file);
          }
          $files_array[$this_key] = $this_file = String::html_entity_decode($this_file);
          unset($skip);
          if(!empty($excluded_files)) {
               foreach($excluded_files as $this_excluded_file) {
                    if(strpos($this_file, $this_excluded_file) !== false) {
                         $avoid_skip = false;
                         if(!empty($included_files)) {
                              foreach($included_files as $this_included_file) {
                                   if(strpos($this_file, $this_included_file) !== false) {
                                        $avoid_skip = true;
                                   }
                              }
                         }
                         if(!$avoid_skip) {
                              $skip = true;
                              break;
                         }
                    }
               }
          }
          if(empty($skip)) {
               $files_to_minify_array[$this_key] = $this_file;
               unset($files_array[$this_key]);
          }
     }
     if(!empty($_GET['update']) && $_GET['update'] == 1 && empty($GLOBALS['already_updated_minify_id_increment'])) {
          $GLOBALS['site_parameters']['minify_id_increment'] = intval($GLOBALS['site_parameters']['minify_id_increment'])+1;
          $GLOBALS['already_updated_minify_id_increment'] = true;
     }
     $cache_id = md5(implode(',', $files_to_minify_array) . ','. vb($GLOBALS['site_parameters']['minify_id_increment']));
     $file_name = $files_type . '_minified_' . substr($cache_id, 0, 8).'.'.$files_type;
     $minified_doc_root = $GLOBALS['dirroot'] . '/'.$GLOBALS['site_parameters']['cache_folder'].'/';
     $file_path = $minified_doc_root . $file_name;
     if (file_exists($file_path) === false || (($filemtime = @filemtime($file_path)) < time() - $lifetime) || (!empty($_GET['update']) && $_GET['update'] == 1)) {
          if(!empty($_GET['update']) && $_GET['update'] == 1) {
               $generate = true;
          } elseif(!empty($filemtime)) {
               foreach($files_to_minify_array as $this_key => $this_file) {
                    // On regarde les fichiers à fusionner pour voir si ils ont changé depuis la dernière création du fichier de cache
                    if(strpos($this_file, '//') === false || strpos($this_file, $GLOBALS['wwwroot']) !== false) {
                         // On ne peut faire le test si fichier récent ou pas que si il est en local
                         $this_local_path = str_replace($GLOBALS['wwwroot'], $GLOBALS['dirroot'], $this_file);
                         $this_mtime = @filemtime($this_local_path);
                         if(empty($this_mtime) && !file_exists($this_local_path)) {
                              // Le fichier est en local et n'existe pas, on ne tient donc pas compte de ce fichier
                              unset($files_to_minify_array[$this_key]);
                         }
                         if($this_mtime < $filemtime) {
                              // Fichier minified pas à jour
                              $generate = true;
                         }
                    } elseif(strpos($this_file, $this_wwwroot) !== false) {
                         // Fichier sur cdn peut-être modifié => fichier minified peut-être pas à jour, et est donc à regénérer
                         $generate = true;
                    } elseif(strpos($this_file, 'googleapis') !== false) {
                         if($filemtime < time() - min($lifetime*24, 3600*24)) {
                              // Fichier sur googleapis peut-être modifié => fichier minified peut-être pas à jour, et est donc à regénérer
                              $generate = true;
                         }
                    } else {
                         if($filemtime < time() - min($lifetime*24, 3600*24)) {
                              // Fichier externe de CSS peut-être modifié => fichier minified peut-être pas à jour, et est donc à regénérer
                              $generate = true;
                         }
                    }
               }
          } else {
               // Fichier absent
               $generate = true;
          }
          if(!empty($generate)) {
               $output = '';
               if($files_type == 'css') {
                    require_once($GLOBALS['dirroot'] . '/lib/class/Minify_CSS.php');
               } elseif($files_type == 'js') {
                    if(!version_compare(PHP_VERSION, '5.3.0', '<')) {
                         // JShrink non compatible si PHP < 5.3 => on désactive la minification
                         require_once($GLOBALS['dirroot'] . '/lib/class/JShrink.php');
                    }
               }
               foreach($files_to_minify_array as $this_key => $this_file) {
                    if($files_type == 'css') {
                         $symlinks = array();
                         $docroot = $GLOBALS['dirroot'];
                         if(String::strlen($GLOBALS['apparent_folder'])>1 && String::strpos($this_wwwroot, String::substr($GLOBALS['apparent_folder'], 0, String::strlen($GLOBALS['apparent_folder']) - 1)) !== false) {
                              $this_http_main_path = String::substr($this_wwwroot, 0, String::strlen($this_wwwroot) - String::strlen($GLOBALS['apparent_folder']) + 1);
                              if(empty($GLOBALS['site_parameters']['avoid_lang_folders_in_minified_css']) && !empty($GLOBALS['lang_url_rewriting'][$_SESSION['session_langue']]) && strpos($GLOBALS['lang_url_rewriting'][$_SESSION['session_langue']], '//') === false && strpos($GLOBALS['lang_url_rewriting'][$_SESSION['session_langue']], '.') === false) {
                                   // On n'a pas choisi d'activer l'option pour avoir des liens vers les fichiers sans les dossiers de langue
                                   // Donc il faut corriger le chemin qu'on vient de retravailler
                                   $this_http_main_path = String::substr($this_http_main_path, 0, String::strlen($this_http_main_path) - String::strlen($GLOBALS['lang_url_rewriting'][$_SESSION['session_langue']]));
                              }
                         } else {
                              $this_http_main_path = $this_wwwroot;
                         }
                         $options = array('currentDir' => str_replace($this_http_main_path, $GLOBALS['dirroot'], dirname($this_file)), 'docRoot' => $docroot, 'symlinks' => $symlinks);
                         $css_content = String::file_get_contents_utf8(str_replace($this_wwwroot, $GLOBALS['dirroot'], $this_file));
                         if(!empty($css_content) && strlen(trim($css_content))>5) {
                              if(String::strpos(str_replace('@import url(http://fonts.googleapis.com', '', $css_content), '@import')!==false) {
                                   // On rajoute à la liste des exclusions le fichier concerné si il y a @import dedans pour éviter les dysfonctionnements, sauf si c'est l'import d'une font externe
                                   $GLOBALS['site_parameters']['minify_css_exclude_array'][] = $this_file;
                                   set_configuration_variable(array('technical_code' => 'minify_css_exclude_array', 'string' => get_string_from_array($GLOBALS['site_parameters']['minify_css_exclude_array']), 'type' => 'array', 'origin' => 'auto '.date('Y-m-d'), 'site_id' => $GLOBALS['site_id']), true);
                                   continue;
                              }
                              if(strlen($css_content)/max(1,substr_count($css_content, "\n"))>50) {
                                   // Si le fichier semble déjà être minified, on ne cherche pas à compresser davantage => gain de temps et limite les risques d'altération du fichier
                                   // Néanmoins on appelle quand même la classe minify qui va corriger les chemins des URL appelées dans le fichier
                                   $options['do_compress'] = false;
                              }
                              $output .= "\n\n\n".Minify_CSS::minify($css_content, $options);
                         } else {
                              trigger_error('Minify CSS impossible - File load problem : '.str_replace($this_wwwroot, $GLOBALS['dirroot'], $this_file), E_USER_NOTICE);
                              if(file_exists($file_path)) {
                                   // Le fichier minified attendu existe déjà => même si il est périmé, on le laisse tel qu'il est
                                   // On annule donc le travail déjà fait et on sort en gardant le fichier existant
                                   $output = null;
                                   $write_result = true;
                                   break; 
                              } else {
                                   // Le fichier minified n'existe pas, et on a un problème => on ne va pas du tout faire de minify
                                   // Si on voulait néanmoins écrire le fichier minified partiel, il faudrait repartir de manière récursive. Et à chaque appel de page, ça aurait lieu => pas une bonne idée pour les ressources serveur
                                   // Donc on renvoie la liste des fichiers CSS complète sans altération
                                   return $original_files_array;
                              }
                         }
                    } elseif($files_type == 'js') {
                         $js_content = String::file_get_contents_utf8(str_replace($this_wwwroot, $GLOBALS['dirroot'], $this_file));
                         if(!empty($js_content) && strlen(trim($js_content))>5) {
                              // Le fichier n'est pas vide, on le prend
                              if(strlen($js_content)/max(1,substr_count($js_content, "\n"))>50 || version_compare(PHP_VERSION, '5.3.0', '<')) {
                                   // NB : Si le fichier semble déjà être minified, on ne cherche pas à compresser davantage => gain de temps et limite les risques d'altération du fichier
                                   $output .= "\n\n\n" . $js_content;
                              }else {
                                   $output .= "\n\n\n" . Minifier::minify($js_content);
                              }
                         }
                    } else {
                         $output .= "\n\n\n".String::file_get_contents_utf8(str_replace($this_wwwroot, $GLOBALS['dirroot'], $this_file));
                    }
               }
               if(!empty($output)) {
                    $output = trim($output);
                    $fp = String::fopen_utf8($file_path, 'wb');
                    @flock($fp, LOCK_EX);
                    // On utilise strlen et non pas String::strlen car on veut le nombre d'octets et non pas de caractères
                    $write_result = fwrite($fp, $output, strlen($output));
                    @flock($fp, LOCK_UN);
                    fclose($fp);
                    set_configuration_variable(array('technical_code' => 'minify_id_increment', 'string' => $GLOBALS['site_parameters']['minify_id_increment'], 'type' => 'integer', 'origin' => 'auto '.date('Y-m-d'), 'site_id' => $GLOBALS['site_id']), true);
               }
               if(!$write_result) {
                    return $files_array;
               }
          } else {
               // On valide le fichier pour une nouvelle période de durée $lifetime
               touch($file_path);
          }
     }
     // On remet le fichier CSS minifié en position dans le tableau de tous les CSS à charger, à la position du premier fichier qui a été minifié (pour respecter au mieux les priorités)
     $files_array[key($files_to_minify_array)] = str_replace($GLOBALS['dirroot'], $this_wwwroot, $file_path);
     return $files_array;
}

function get_load_facebook_sdk_script($facebook_api_id = null) {
     static $sdk_loaded;
     $output = '';
     if(empty($sdk_loaded)) {
          $sdk_loaded = true;
          $output .= '
<div id="fb-root"></div>
';
          $GLOBALS['js_content_array']['facebook_sdk'] = '
(function(d, s, id) {
  var js, fjs = d.getElementsByTagName(s)[0];
  if (d.getElementById(id)) return;
  js = d.createElement(s); js.id = id;
  js.src = "//connect.facebook.net/fr_FR/all.js#xfbml=1'.(!empty($facebook_api_id)?'&appId='.$facebook_api_id:'').'";
  fjs.parentNode.insertBefore(js, fjs);
}(document, \'script\', \'facebook-jssdk\'));';
     }
     return $output;
}

function get_quick_search_results($search, $maxRows, $active_only = false, $search_category = null, $mode = 'products') {
     $queries_results_array = array();
     if($mode=='products'){
          $sql_additional_cond = '';
          $sql_additional_join = '';
          if(!empty($GLOBALS['site_parameters']['quick_search_results_main_search_field'])) {
               $name_field = $GLOBALS['site_parameters']['quick_search_results_main_search_field'];
          } else {
               $name_field = "nom_".(!empty($GLOBALS['site_parameters']['product_name_forced_lang'])?$GLOBALS['site_parameters']['product_name_forced_lang']:$_SESSION['session_langue'])."";
          }
          // Pour optimiser, on segmente la recherche en plusieurs requêtes courtes
          if($active_only) {
               $sql_additional_cond .= " AND etat='1'";
          }
          if(is_numeric($search)) {
               $queries_sql_array[] = "SELECT p.*, p." . word_real_escape_string($name_field) . " AS nom
                    FROM peel_produits p
                    WHERE (p.id='" . nohtml_real_escape_string($search) . "' OR ean_code = '" . nohtml_real_escape_string($search) . "') AND " . get_filter_site_cond('produits', 'p') . "" . $sql_additional_cond . "
                    LIMIT 1";
          }
          if(!empty($search_category)) {
               $sql_additional_cond .= " AND pc.categorie_id IN ('" . implode("','", get_category_tree_and_itself(intval($search_category), 'sons', 'categories')) . "')";
               $sql_additional_join .= 'INNER JOIN peel_produits_categories pc ON pc.produit_id=p.id';
          }
          $queries_sql_array[] = "SELECT p.*, p." . word_real_escape_string($name_field) . " AS nom
               FROM peel_produits p
               ".$sql_additional_join."
               WHERE p." . word_real_escape_string($name_field) . " LIKE '" . nohtml_real_escape_string($search) . "%' AND " . get_filter_site_cond('produits', 'p') . "" . $sql_additional_cond . "
               ORDER BY p." . word_real_escape_string($name_field) . " ASC";
          $queries_sql_array[] = "SELECT p.*, p." . word_real_escape_string($name_field) . " AS nom
               FROM peel_produits p
               ".$sql_additional_join."
               WHERE p.reference LIKE '" . nohtml_real_escape_string($search) . "%' AND p." . word_real_escape_string($name_field) . "!='' AND " . get_filter_site_cond('produits', 'p') . "" . $sql_additional_cond . "
               ORDER BY IF(p.reference LIKE '" . nohtml_real_escape_string($search) . "',1,0) DESC, p." . word_real_escape_string($name_field) . " ASC";
          if(empty($GLOBALS['site_parameters']['autocomplete_fast_partial_search'])) {
               $queries_sql_array[] = "SELECT p.*, p." . word_real_escape_string($name_field) . " AS nom
                    FROM peel_produits p
                    ".$sql_additional_join."
                    WHERE (ean_code = '" . nohtml_real_escape_string($search) . "' OR p." . word_real_escape_string($name_field) . " LIKE '%" . nohtml_real_escape_string($search) . "%' OR (p.reference LIKE '%" . nohtml_real_escape_string($search) . "%' AND p." . word_real_escape_string($name_field) . "!=''))" . $sql_additional_cond . " AND " . get_filter_site_cond('produits', 'p') . "
                    ORDER BY p." . word_real_escape_string($name_field) . " ASC";
          }
          foreach($queries_sql_array as $this_query_sql) {
               if(String::strpos($this_query_sql, 'LIMIT') === false) {
                    $this_query_sql .= ' LIMIT '.intval($maxRows);
               }
               $query = query($this_query_sql);
               while ($result = fetch_object($query)) {
                    $queries_results_array[$result->id] = $result;
               }
               if(count($queries_results_array) >= $maxRows) {
                    break;
               }
          }
     } elseif($mode=='offers') {
          if(!empty($GLOBALS['site_parameters']['user_offers_table_enable'])) {
               $sql = 'SELECT *
                    FROM peel_offres
                    WHERE num_offre LIKE "'.nohtml_real_escape_string($search).'%"
                    LIMIT '.$maxRows;
               $query = query($sql);
               while ($result = fetch_object($query)) {
                    $queries_results_array[$result->id] = $result;
               }
          }
     } elseif($mode=='offer_add_user') {
          $sql = 'SELECT *
               FROM peel_utilisateurs
               WHERE (prenom LIKE "%'.nohtml_real_escape_string($search).'%" OR nom_famille LIKE "%'.nohtml_real_escape_string($search).'%") AND ' . get_filter_site_cond('utilisateurs') . '
               LIMIT '.intval($maxRows);
          $query = query($sql);
          while ($result = fetch_object($query)) {
               $queries_results_array[$result->id_utilisateur] = $result;
          }
     }
     return $queries_results_array;
}

function get_filter_site_cond($table_technical_code, $table_alias = null, $use_strict_rights_if_in_admin = false, $specific_site_id = null, $exclude_public_items = false, $admin_force_multisite_if_allowed = false) {
     if($table_technical_code == '') {
          // Pour certaine table, le champ qui contient l'id du site n'est pas site_id, mais id_ecom
          $field = 'id_ecom';
     } else {
          // Cas général
          $field = 'site_id';
     }
     if(is_array($specific_site_id)) {
          $specific_site_id = current($specific_site_id);
     }
     if(in_array($table_technical_code, array('continents'))) {
          // Cette table n'est pas multisite.
          return 1;
     }
     if(!empty($GLOBALS['site_parameters']['multisite_disable']) || !empty($GLOBALS['site_parameters']['multisite_disable_' . $table_technical_code])) {
          // Désactivation du multisite pour accélérer les requêtes sur un site isolé
          return 1;
     } elseif(defined('IN_IPN') && !empty($GLOBALS['site_parameters']['multisite_disable_in_ipn'])) {
          // Désactivation du multisite pour accélérer les requêtes sur un site isolé
          return 1;
     }
     if(!empty($table_alias)) {
          // Utilise l'alias de la table comme préfix. L'alias de la table est défini dans la requête
          $prefix = word_real_escape_string($table_alias) . '.';
     } elseif($table_alias === null) {
          $prefix = 'peel_' . word_real_escape_string($table_technical_code) . '.';
     } else {
          // table sans prefix, dans la cas d'une interconnexion avec des scripts spécifiques qui ne respectent pas cette norme
          $prefix = '';
     }
     if ($specific_site_id !== null) {
          // Utilise le site_id spécifié en paramètre, utile pour manipuler des données qui ne concernent pas le site qui exécute la page. $specific_site_id peut être égal à 0.
          $site_id = $specific_site_id;
     } else {
          if(empty($GLOBALS['site_id']) && defined('IN_CRON') && $use_strict_rights_if_in_admin === false && $exclude_public_items === false) {
               // $GLOBALS['site_id'] est vide, et on ne cherche pas à avoir des droits d'administration particuliers
               // On est dans un cron, on veut gérer tous les sites en même temps sans avoir à charger la configuration de chaque site
               return 1;
          }
          // Utilise l'id du site en cours de consultation (cas général). $GLOBALS['site_id'] est défini au chargement du site
          $site_id = vn($GLOBALS['site_id']);
     }
     if (defined('IN_PEEL_ADMIN')) {
          if(isset($_SESSION['session_utilisateur']['site_id']) && $_SESSION['session_utilisateur']['site_id'] == 0) {
               // L'administrateur a les droits sur tous les sites
               if($admin_force_multisite_if_allowed) {
                    // Lorsque l'ensemble des sites est concerné par la requête et pas seulement un site, ou que la configuration générale l'impose, aucun filtre sur site_id ne doit être ajouté.
                    return 1;
               } elseif(isset($_SESSION['session_admin_multisite']) && $specific_site_id === null) {
                    if(intval($_SESSION['session_admin_multisite'])==0) {
                         // on administre tous les sites en même temps
                         return 1;
                    } else {
                         // on administre un autre site, d'après la préférence de l'administrateur mise en session
                         $site_id = intval($_SESSION['session_admin_multisite']);
                         if($use_strict_rights_if_in_admin) {
                              $exclude_public_items = true;
                         }
                    }
               }
          } elseif($specific_site_id === null) {
               // L'administrateur ne peut administrer que son propre site
               if($use_strict_rights_if_in_admin) {
                    $exclude_public_items = true;
               }
               if(((!est_identifie() || !isset($_SESSION['session_utilisateur']['site_id'])) && $site_id != vn($GLOBALS['site_id'])) || (est_identifie() && $_SESSION['session_utilisateur']['site_id'] != $site_id && $_SESSION['session_utilisateur']['site_id'] != 0)) {
                    // problème de droit : sécurité, on empêche l'administrateur d'agir sur un site qui ne le concerne pas. Si l'administrateur est associé à site_id = 0, il peut administrer tous les sites, donc cette contrainte ne s'applique pas
                    return 0;
               }
          }
     } elseif(!empty($site_id) && !empty($_SESSION['session_utilisateur']['site_id']) && $site_id != $_SESSION['session_utilisateur']['site_id'] && $site_id != vn($GLOBALS['site_id']) && empty($GLOBALS['site_parameters']['multisite_disable_utilisateurs'])) {
          // Protection sur les site_id autorisés : sécurité, on empêche l'utilisateur d'agir sur un site qui ne le concerne pas
          return 0;
     } elseif(isset($_SESSION['session_site_country']) && !empty($GLOBALS['site_parameters']['site_country_allowed_array']) && in_array($table_technical_code, array('articles', 'marques', 'html', 'produits', 'vignettes_carrousels'))) {
          // Gestion de l'affichage de contenu spécifique en fonction du pays du visiteur. Cette fonction nécessite une mise en place spécifique en SQL et n'est pas standard.
          // Si pas dans un contexte d'administration de la donnée : ajout de la condition de le pays du visiteur 
          $cond_array[] = "FIND_IN_SET('" . real_escape_string($_SESSION['session_site_country']) . "', " . $prefix . "site_country)";
     }

     if($exclude_public_items) {
          // La requête concerne un seul site, sans tenir compte de la configuration globale.
          if(empty($GLOBALS['site_parameters']['multisite_using_array_for_site_id'])) {
               $cond_array[] = $prefix.word_real_escape_string($field)."='".intval($site_id)."'";   
          } else {
               $cond_array[] = "FIND_IN_SET('" . intval($site_id) . "', " . $prefix.word_real_escape_string($field) . ")";
          }
     } else {
          if(empty($GLOBALS['site_parameters']['multisite_using_array_for_site_id'])) {
          // Concerne un site, ou tous les sites
          $cond_array[] = $prefix.word_real_escape_string($field)." IN (0,'" . intval($site_id) . "')";
          } else {
               $cond_array[] = "(FIND_IN_SET('0', " . $prefix.word_real_escape_string($field) . ") OR FIND_IN_SET('" . intval($site_id) . "', " . $prefix.word_real_escape_string($field) . "))";
          }
     }
     return implode(' AND ', $cond_array);
}

function get_site_id_sql_set_value($site_ids) {
     $output = '';
     if(!is_array($site_ids)) {
          $site_ids = array($site_ids);
     }
     $output = "" . implode(",", $site_ids) . "";
     return $output;
}

function get_site_name($site_ids, $skip_rights_check = false) {
     static $all_sites_name_array;
     $output_array = array();
     if(!is_array($site_ids)) {
          $site_ids = explode(',', $site_ids);
     }
     foreach($site_ids as $this_site_id) {
          if($this_site_id == 0) {
               $output_array[] = vb($GLOBALS['STR_ADMIN_ALL_SITES'], '*');
          } else {
               if(!isset($all_sites_name_array)) {
                    $all_sites_name_array = get_all_sites_name_array(false, false, !empty($GLOBALS['site_parameters']['multisite_get_all_site_names_always_allow']));
               }
               if(isset($all_sites_name_array[$this_site_id])) {
                    $output_array[] = $all_sites_name_array[$this_site_id];
               }
          }
     }
     return implode(', ', $output_array);
}

function get_all_sites_name_array($admin_force_multisite_if_allowed = false, $allow_null_site_id = false, $skip_rights_check = false) {
     $all_sites_name_array = array();
     // site_id>0 est utile pour ne pas lister les sites avec site_id = 0 qui est en théorie impossible en dehors d'une erreur d'administration
     // Sélection des site_id qui existe en base de donnée.
     $sql = 'SELECT site_id
          FROM peel_configuration
          WHERE ' . (!$allow_null_site_id?'site_id!="0" ':'') . ' ' . (!$skip_rights_check?'AND '.get_filter_site_cond('configuration', null, true, null, false, $admin_force_multisite_if_allowed):'') . '
          GROUP BY site_id';
     $query = query($sql);
     while($result = fetch_assoc($query)) {
          // Sélection du nom du site.
          $query_name = query('SELECT string
          FROM peel_configuration
          WHERE site_id="' . nohtml_real_escape_string(get_site_id_sql_set_value($result['site_id'])).'" AND technical_code="nom_' . $_SESSION['session_langue'] . '"
          LIMIT 1');
          $result_name = fetch_assoc($query_name);
          if (!empty($result_name['string'])) {
               $all_sites_name_array[$result['site_id']] = $result_name['string'];
          } else {
               // Le nom du site n'a pas été trouvé. On récupère le wwwroot pour ce site afin d'afficher quand même une valeur.
               $query_wwwroot = query('SELECT string
                    FROM peel_configuration
                    WHERE site_id="' . nohtml_real_escape_string(get_site_id_sql_set_value($result['site_id'])).'" AND technical_code="wwwroot"
                    LIMIT 1');
               $result_wwwroot = fetch_assoc($query_wwwroot);
               $all_sites_name_array[$result['site_id']] = str_replace(array('http://' ,'https://'), '', $result_wwwroot['string']);
          }
     }
     return $all_sites_name_array;
}

function get_user_job_options($selected_fonction_name = null)
{
     $output = '';
     if (!empty($GLOBALS['site_parameters']['user_job_array'])) {
          $tpl_options = array();
          foreach($GLOBALS['site_parameters']['user_job_array'] as $this_job_code=>$this_job) {
               if(String::substr($this_job, 0, 4)== 'STR_' && !empty($GLOBALS[$this_job])) {
                    // Si le nom est une variable de langue, il faut utiliser cette variable.
                    $this_job = $GLOBALS[$this_job];
               }
               $output .= '<option value="'.String::str_form_value($this_job_code).'" ' . frmvalide($selected_fonction_name == $this_job_code, ' selected="selected"') . '>'.$this_job.'</option>';
          }
     }
     return $output;
}

function get_generic_options($values_array, $selected_values = null)
{
     $output = '';
     $tpl = $GLOBALS['tplEngine']->createTemplate('generic_options.tpl');
     $tpl_options = array();
     foreach ($values_array as $tab_type) {
          $tpl_options[] = array(
               'value' => String::str_form_value($tab_type['id']),
               'name' => $tab_type['name'],
               'issel' => ($tab_type['id'] == $selected_values)
          );
     }
     $tpl->assign('options', $tpl_options);
     $output .= $tpl->fetch();
     return $output;
}

function get_site_wwwroot($site_id, $lang = null)
{
     static $output;
     if(empty($output[$site_id.'_'.$lang])) {
          if(!empty($site_id)) {
               $sql = "SELECT c.string, l.url_rewriting
                    FROM peel_configuration c
                    LEFT JOIN peel_langues l ON l.lang='" . real_escape_string($lang) . "' AND " . get_filter_site_cond('langues', 'l', false, $site_id) . "
                    WHERE c.technical_code = 'wwwroot' AND " . get_filter_site_cond('configuration', 'c', false, $site_id) . " AND c.etat=1
                    LIMIT 1";
               $query = query($sql);
               $result = fetch_assoc($query);
          }
          if(!empty($result)) {
               $output[$site_id.'_'.$lang] = get_lang_rewrited_wwwroot($lang, $result['string'], $result['url_rewriting']);
          } else {
               $output[$site_id.'_'.$lang] = get_lang_rewrited_wwwroot($lang);
          }
     }
     return $output[$site_id.'_'.$lang];
}

function handle_contact_form($frm, $skip_introduction_text = false) {
     include($GLOBALS['dirroot'] . "/lib/fonctions/display_user_forms.php");
     if (check_if_module_active('photodesk')) {
          include($GLOBALS['fonctionsphotodesk']);
     }
     $output = '';
     $form_error_object = new FormError();

     if (!empty($frm) && empty($_GET['prodid'])) {
          if (!empty($frm['phone'])) {
               // Formulaire de demande de rappel par téléphone
               // Non implémenté par défaut
               $frm['nom'] = $frm['phone'];
               $frm['telephone'] = $frm['phone'];
               $frm['sujet'] = $GLOBALS["STR_CALL_BACK_EMAIL"]; // Variable de langue à définir
          } else {
               // Le formulaire a été soumis, on essaie de créer un nouveau compte d'utilisateur
               if (!empty($GLOBALS['site_parameters']['contact_form_short_mode'])) {
                    $form_error_object->valide_form($frm,
                         array('nom' => $GLOBALS['STR_ERR_NAME'],
                              'email' => $GLOBALS['STR_ERR_EMAIL'],
                              'texte' => $GLOBALS['STR_ERR_MESSAGE'],
                              'token' => ''));
               } else {
                    $form_error_object->valide_form($frm,
                         array('nom' => $GLOBALS['STR_ERR_NAME'],
                              'telephone' => $GLOBALS['STR_ERR_TEL'],
                              'email' => $GLOBALS['STR_ERR_EMAIL'],
                              'texte' => $GLOBALS['STR_ERR_MESSAGE'],
                              'sujet' => $GLOBALS['STR_ERR_SUBJECT'],
                              'token' => ''));
               }
               if (!$form_error_object->has_error('email')) {
                    $frm['email'] = trim($frm['email']);
                    if (!EmailOK($frm['email'])) {
                         // si il y a un email on teste l'email
                         $form_error_object->add('email', $GLOBALS['STR_ERR_EMAIL_BAD']);
                    }
               }
               if (isset($frm['commande_id']) && !$form_error_object->has_error('commande_id') && vb($frm['sujet']) == $GLOBALS['STR_CONTACT_SELECT3'] && empty($frm['commande_id'])) {
                    $form_error_object->add('commande_id', $GLOBALS['STR_ERR_ORDER_NUMBER']);
               }
               if (check_if_module_active('captcha')) {
                    if (empty($frm['code'])) {
                         // Pas de tentative de déchiffrement, on laisse le captcha
                         $form_error_object->add('code', $GLOBALS['STR_EMPTY_FIELD']);
                    } else {
                         if (!check_captcha($frm['code'], $frm['code_id'])) {
                              $form_error_object->add('code', $GLOBALS['STR_CODE_INVALID']);
                              // Code mal déchiffré, on en donne un autre
                              delete_captcha(vb($frm['code_id']));
                              unset($frm['code']);
                         }
                    }
               }
          }
          if (!verify_token('user_contact', 120, false, true, 5)) {
               // Le délai de 5s permet d'éviter du spam de la part de robots simples qui chargent le token et appellent en POST la validation de formulaire
               // Ce délai ne doit pas être trop long pour un utilisateur qui revalide son formulaire déjà tout rempli suite à premier envoi incomplet
               $form_error_object->add('token', $GLOBALS['STR_INVALID_TOKEN']);
          }
          if (!$form_error_object->count()) {
               if (check_if_module_active('captcha')) {
                    // Code OK on peut effacer le code
                    delete_captcha(vb($frm['code_id']));
               }
               if(empty($_SERVER['HTTP_USER_AGENT']) || $_SERVER['REQUEST_METHOD'] != "POST" || is_user_bot()) {
                    // Protection du formulaire contre les robots
                    die();
               }
               // Limitation du nombre de messages envoyés dans une session
               if (empty($_SESSION['session_form_contact_sent'])) {
                    $_SESSION['session_form_contact_sent'] = 0;
               }
               if ($_SESSION['session_form_contact_sent'] < vb($GLOBALS['site_parameters']['contact_form_max_sent_by_session'], 8)) {
                    if($_SESSION['session_form_contact_sent']>0) {
                         sleep($_SESSION['session_form_contact_sent']);
                    }
                    $mail_spam_points = floor($_SESSION['session_form_contact_sent']*10/vb($GLOBALS['site_parameters']['contact_form_max_sent_by_session'], 8));
                    if (check_if_module_active('spam')) {
                         $mail_spam_points += getSpamPoints($frm['texte'], $frm['email']);
                    }
                    if($mail_spam_points <= vb($GLOBALS['site_parameters']['contact_form_max_spam_points_allowed'], 20)) {
                         insere_ticket($frm);
                    }
                    $_SESSION['session_form_contact_sent']++;
               }
               // Même si la limite d'envois autorisés est atteinte, on dit que c'est OK à l'utilisateur pour que le spammeur ne se rende pas compte qu'il est découvert
               $frm['is_ok'] = true;
               // Si le module webmail est activé, on insère dans la table webmail la requête user
               $output .= get_contact_success($frm);
               $form_validated = true;
          }
     } elseif (!empty($_GET['prodid'])) {
          $product_object = new Product($_GET['prodid'], null, false, null, true, !is_user_tva_intracom_for_no_vat() && !check_if_module_active('micro_entreprise'));
          $attribut_list = get_attribut_list_from_post_data($product_object, $frm);
          if (!empty($frm['critere'])) {
               // Affichage des combinaisons de couleur et taille dans un unique select
               $criteres = explode("|", $frm['critere']);
               $couleur_id = intval(vn($criteres[0]));
               $taille_id = intval(vn($criteres[1]));
          } else {
               $couleur_id = intval(vn($frm['couleur']));
               $taille_id = intval(vn($frm['taille']));
          }
          // On enregistre la taille pour revenir sur la bonne valeur du select
          $_SESSION['session_taille_id'] = $taille_id;
          // On enregistre le message à afficher si la quantité demandée est trop élevée par rapport au stock disponnible
          $product_object->set_configuration($couleur_id, $taille_id, $attribut_list, check_if_module_active('reseller') && is_reseller());

          $color = $product_object->get_color();
          $size = $product_object->get_size();

          $frm['texte'] = $GLOBALS['STR_PRODUCT'] . $GLOBALS['STR_BEFORE_TWO_POINTS'] . ": " .$product_object->name.
               (!empty($color)?"\r\n" . $GLOBALS['STR_COLOR'] . $GLOBALS['STR_BEFORE_TWO_POINTS'] . ": " . $color :'' ). 
               (!empty($size)?"\r\n" . $GLOBALS['STR_SIZE'] . $GLOBALS['STR_BEFORE_TWO_POINTS'] . ": " . $size :'' ). 
               (!empty($product_object->configuration_attributs_list) ? "\r\n" .  str_replace('<br />', "\r\n", $product_object->configuration_attributs_description) : '');
     }

     if(empty($form_validated)) {
          if (!empty($noticemsg)) {
               $output .= $noticemsg;
          }
          if(empty($frm) && est_identifie()) {
               $frm['email'] = vb($_SESSION['session_utilisateur']['email']);
               $frm['telephone'] = vb($_SESSION['session_utilisateur']['telephone']);
               $frm['nom'] = vb($_SESSION['session_utilisateur']['nom_famille']);
               $frm['prenom'] = vb($_SESSION['session_utilisateur']['prenom']);
               $frm['societe'] = vb($_SESSION['session_utilisateur']['societe']);
               $frm['adresse'] = vb($_SESSION['session_utilisateur']['adresse']);
               $frm['ville'] = vb($_SESSION['session_utilisateur']['ville']);
               $frm['code_postal'] = vb($_SESSION['session_utilisateur']['code_postal']);
               if(isset($_SESSION['session_utilisateur']['pays'])) {
                    $frm['pays'] = get_country_name($_SESSION['session_utilisateur']['pays']);
               }
          }
          $output .= get_contact_form($frm, $form_error_object, $skip_introduction_text);
     }
     return $output;
}

function insere_code_promo($frm)
{
     $qid = query("SELECT *
          FROM peel_codes_promos
          WHERE nom = '" . nohtml_real_escape_string(String::strtoupper($frm['nom'])) . "' AND " . get_filter_site_cond('codes_promos') . "");
     if ($result = fetch_assoc($qid)) {
          return false;
     }
     if (empty($frm["date_debut"])) {
          $frm["date_debut"] = get_formatted_date(time());
     } 
     if (empty($frm["date_fin"])) {
          $frm["date_fin"] = get_formatted_date(date("Y-m-d", mktime(0, 0, 0, date('m'), date('d') + 30, date('Y'))));
     }
     if (empty($frm['on_type'])) {
          $frm['on_type'] = 2;
     }
     if (empty($frm['source'])) {
          $frm['source'] = 'CHQ';
     }
     if (!isset($frm['nombre_prevue'])) {
          $frm['nombre_prevue'] = 1;
     }
     if (!isset($frm['nb_used_per_client'])) {
          $frm['nb_used_per_client'] = 1;
     }

     $sql = "INSERT INTO peel_codes_promos (
          nom
          , date_debut
          , date_fin
          , remise_percent
          , remise_valeur
          , email_ami
          , email_acheteur
          , on_type
          , on_check
          , montant_min
          , etat
          , source
          , id_utilisateur
          , site_id
          , id_categorie
          , nombre_prevue
          , nb_used_per_client
          , product_filter
          , cat_not_apply_code_promo
     ) VALUES (
          '" . nohtml_real_escape_string(String::strtoupper(vb($frm['nom']))) . "'
          , '" . nohtml_real_escape_string(get_mysql_date_from_user_input($frm["date_debut"])) . "'
          , '" . nohtml_real_escape_string(get_mysql_date_from_user_input($frm["date_fin"])) . "'
          , '" . (vb($frm['on_type']) == 1 ? floatval(get_float_from_user_input(vn($frm['remise_percent']))) : '0') . "'
          , '" . (vb($frm['on_type']) == 2 ? floatval(get_float_from_user_input(vn($frm['remise_valeur']))) : '0') . "'
          , '" . nohtml_real_escape_string(vb($frm['email_ami'])) . "'
          , '" . nohtml_real_escape_string(vb($frm['email_acheteur'])) . "'
          , '" . intval($frm['on_type']) . "'
          , '" . intval(vb($frm['on_check'])) . "'
          , '" . floatval(get_float_from_user_input(vb($frm['montant_min']))) . "'
          , '" . intval(vn($frm['etat'])) . "'
          , '" . nohtml_real_escape_string(vb($frm['source'])) . "'
          , '" . intval(vb($frm['id_utilisateur'])) . "'
          , '" . nohtml_real_escape_string(get_site_id_sql_set_value(vn($frm['site_id'], $GLOBALS['site_id']))) . "'
          , '" . intval(vb($frm['id_categorie'])) . "'
          , '" . intval(vb($frm['nombre_prevue'])) . "'
          , '" . intval(vb($frm['nb_used_per_client'])) . "'
          , '" . nohtml_real_escape_string(vb($frm['product_filter'])) . "'
          , '" . nohtml_real_escape_string(get_string_from_array(vb($frm['cat_not_apply_code_promo']))) . "'
          )";
     query($sql);
     return insert_id();
}


function get_default_vat()
{
     $query = query("SELECT max(tva) as default_vat
          FROM peel_tva 
          WHERE " . get_filter_site_cond('tva'));
     if ($result = fetch_assoc($query)) {
          return $result['default_vat'];
     } else {
          // table TVA vide.
          return null;
     }
}

function get_specific_field_infos($frm, $form_error_object = null, $form_usage = "user", $step = null) {
     $specific_fields = array();
     $field_types_with_single_value_array = array('datepicker', 'hidden', 'password', 'separator', 'text', 'textarea', 'html', 'upload');
     
     $specific_field_prefix = $form_usage;
     if (in_array($form_usage, array('reseller', 'user'))) {
          $mandatory_field_prefix = 'user';
     } else {
          $mandatory_field_prefix = $specific_field_prefix;
     }
     $mandatory_fields = vb($GLOBALS['site_parameters'][$mandatory_field_prefix . '_mandatory_fields'], array());
     $specific_field_titles = template_tags_replace(vb($GLOBALS['site_parameters'][$specific_field_prefix . '_specific_field_titles']));
     $specific_field_types = vb($GLOBALS['site_parameters'][$specific_field_prefix . '_specific_field_types']);
     $specific_field_names = vb($GLOBALS['site_parameters'][$specific_field_prefix . '_specific_field_names']);
     $specific_field_values = vb($GLOBALS['site_parameters'][$specific_field_prefix . '_specific_field_values']);
     $specific_field_positions = vb($GLOBALS['site_parameters'][$specific_field_prefix . '_specific_field_positions']);
     $specific_field_steps = vb($GLOBALS['site_parameters'][$specific_field_prefix . '_specific_field_steps']);
          

          if(!empty($specific_field_titles)) {
          foreach($specific_field_titles as $this_field => $this_title) {
               // Les noms des différents champs dans l'étape sont séparés par des virgules
               if (!empty($specific_field_steps) && is_numeric($step) && !empty($specific_field_steps[$step]) && !in_array($this_field, get_array_from_string($specific_field_steps[$step]))) {
                    // Si le formulaire est segmenté par étape, $specific_field_steps[$step] contient le tableau des champs qui sont configurés pour être affichés à l'étape $step. Si le champ n'est pas trouvé dans ce tableau, on passe au champ suivant.
                    continue;
               }
               unset($tpl_options);
               unset($this_value);
               if(String::substr($this_title, 0, 4)== 'STR_') {
                    // Le titre est une variabe de langue
                    $this_title = $GLOBALS[$this_title];
               }
               if (defined('IN_CHANGE_PARAMS') && !empty($GLOBALS['site_parameters']['disable_user_specific_field_on_change_params_page']) && in_array($this_field, $GLOBALS['site_parameters']['disable_user_specific_field_on_change_params_page'])) {
                    // permet d'avoir des champs spécifiques qui seront utilisé lors de l'inscription, et ne pas les afficher sur la page de changement de paramètres
                    continue;
               }
               $this_position = vb($specific_field_positions[$this_field]);
               $field_type = vb($specific_field_types[$this_field], 'text');

               // Le champ paramétré fait partie des champs valides. Ca évite les erreurs de saisie, et d'avoir un affichage incohérent.
               if (empty($specific_field_values[$this_field]) && in_array($specific_field_types[$this_field], array('radio','hidden','checkbox'))) {
                    // La valeur est obligatoire pour un champ hidden, checkbox ou radio.
                    continue;
               }
               // Récupération d'éventuelle valeur préremplie stockée dans $frm, venant de BDD ou d'un formulaire
               if ($field_type == 'checkbox') {
                    if (isset($frm[$this_field])) {
                         if (is_array($frm[$this_field])) {
                              // Si $frm vient directement du formulaire, les valeurs pour les checkbox sont sous forme de tableau.
                              $frm_this_field_values_array = $frm[$this_field];
                         } else {
                              // pour les checkbox, $frm[$this_field] peut contenir plusieurs valeurs séparées par des virgules si les données viennent de la BDD
                              $frm_this_field_values_array = explode(',', $frm[$this_field]);
                         }
                    }
               } else {
                    // Pour les autres champs, $frm[$this_field] contient une valeur unique.
                    $frm_this_field_values_array = array(vb($frm[$this_field]));
               }
          if (empty($frm_this_field_values_array[0])) {
                    // la valeur est vide, on regarde si une valeur par défaut est rempli.
                    if (defined('IN_PEEL_ADMIN')) {
                         // Valeur par défaut dans l'administration
                         $frm_this_field_values_array = array(vb($GLOBALS['site_parameters']['funding_admin_form_default_values'][$this_field]));
                    } else {
                         // valeur par défaut en front office
                         $frm_this_field_values_array = array(vb($GLOBALS['site_parameters']['funding_form_default_values'][$this_field]));
                    }
               }
               $this_field_infos = array('field_type' => $field_type,
                         'field_name' => $this_field,
                         'field_title' => $this_title,
                         'field_position' => $this_position,
                         'mandatory' => (!empty($mandatory_fields[$this_field])),
                         'error_text' => (is_object($form_error_object)?$form_error_object->text($this_field):''),
                         'STR_CHOOSE' => $GLOBALS['STR_CHOOSE']
                    );
               if (in_array($field_type, $field_types_with_single_value_array) || empty($field_type) || empty($specific_field_names[$this_field])) {
                    if (!empty($frm_this_field_values_array[0])) {
                         // Pour récuperer la valeur d'un champ text, la valeur du formulaire $frm_this_field_values_array a priorité sur la valeur prédéfinie en back office.
                         $this_value = $frm_this_field_values_array[0];
                    } else {
                         $this_value = template_tags_replace(vb($specific_field_values[$this_field]));
                    }
                    if($field_type == 'html') {
                         $this_field_infos['text_editor_html'] = getTextEditor($this_field, '100%', 300, $this_value, null, 3);
                    } else {
                         if ($field_type == 'datepicker') {
                              $this_value = get_formatted_date($this_value);
                         }
                         $this_field_infos['field_value'] = $this_value;
                    }
               } else {
                    $this_field_names = explode(',', template_tags_replace(vb($specific_field_names[$this_field])));
                    // Préparation du tableau de valeurs
                    $this_field_values = explode(',', template_tags_replace($specific_field_values[$this_field]));
                    foreach($this_field_values as $this_key => $this_value) {
                         if(String::substr($this_value, 0, 4)== 'STR_') {
                              // Variable de langue
                              $this_field_values[$this_key] = $GLOBALS[$this_value];
                         }
                    }
                    // Nom de chaque option
                    // Checkbox, radio ou select
                    foreach($this_field_values as $this_key => $this_value) {
                         if ($this_field=="ad_closed") {
                              // Pour clôturer une annonce on passe la date d'insertion à 0. Cet état est différent de enligne.
                              $issel = (vb($frm['date_insertion']) == "0000-00-00 00:00:00");
                         } else {
                              $issel = in_array($this_value, $frm_this_field_values_array);
                         }
                         $this_field_infos['options'][] = array('value' => $this_value,
                                   'issel' => $issel,
                                   'name' => $this_field_names[$this_key]
                              );
                    }
               }
               if($field_type == 'upload' && !empty($this_value)) {
                    // $delete_link = get_current_url(false) . '?mode=suppr&field=' . $this_field . '&file=' . $this_value;
                    $delete_link = 'javascript:reinit_upload_field("'.$this_field.'");';
                    $this_field_infos['upload_infos'] = get_uploaded_file_infos($this_field, $this_value, $delete_link);
               } 
               $specific_fields[] = $this_field_infos;
          }
     }
     return $specific_fields;
}

function handle_specific_fields(&$frm, $form_usage = 'user') {
     $table_correspondance = array('user' => 'utilisateurs', 'order' => 'commandes', 'ad' => 'lot_vente');
     $adresses_potentiel_fields_array = array('prenom', 'nom', 'adresse', 'code_postal', 'ville', 'pays', 'email', 'contact');
     if(empty($table_correspondance[$form_usage])) {
          return null;
     }
     $specific_fields_titles = vb($GLOBALS['site_parameters'][$form_usage . '_specific_field_titles'], array());
     $specific_field_types = vb($GLOBALS['site_parameters'][$form_usage . '_specific_field_types'], array());
               
     // Récupération des champs de la BDD, pour éviter les erreurs de mise à jour du à une erreur d'administration de user_specific_field_titles, et ne pas mettre les champs type separator dans la requête SQL, et tout autre intru qui ferais échoué la requete.
     $this_table_field_types = get_table_field_types('peel_' . $table_correspondance[$form_usage]);
     $this_table_field_names = get_table_field_names('peel_' . $table_correspondance[$form_usage]);
     foreach($this_table_field_names as $this_field) {
          // On identifie tous les champs d'adresse relatifs à cette table
          if(in_array($this_field, $adresses_potentiel_fields_array)) {
               $frm['adresses_fields_array'][$this_field] = $this_field;
          } elseif ((String::substr($this_field,-5) == '_ship' ||  String::substr($this_field,-5) == '_bill')) {
               $frm['adresses_fields_array'][String::substr($this_field, 0, -5)] = String::substr($this_field, 0, -5);
          }
          if (empty($specific_fields_titles) || empty($specific_fields_titles[$this_field])) {
               // Champ qui n'est pas un specific_field, on ne l'ajoute pas à la requête SQL ici mais on le traite par la suite en dehors de cette fonction
               continue;
          }
          // On traite ci-dessous tous les champs spécifiques
          if ($form_usage == 'user' && (defined('IN_REGISTER') || defined('IN_RETAILER')) && !empty($GLOBALS['site_parameters']['disable_user_specific_field_on_register_page']) && in_array($this_field, $GLOBALS['site_parameters']['disable_user_specific_field_on_register_page'])) {
               // Ne pas prendre en compte les champs absents de la page d'enregistrement
               continue;
          } elseif (vb($specific_field_types[$this_field]) == 'upload') {
               $frm[$this_field] = upload($this_field, false, 'image', $GLOBALS['site_parameters']['image_max_width'], $GLOBALS['site_parameters']['image_max_height'], null, null, vb($frm[$this_field]));
          }
          if (isset($frm[$this_field])) {
               if (vb($specific_field_types[$this_field]) == 'datepicker') {
                    $frm[$this_field] = get_mysql_date_from_user_input($frm[$this_field]);
               } elseif (is_array($frm[$this_field])) {
                    // Si $frm[$this_field] est un tableau, il faut le convertir en chaine de caractères pour le stockage en BDD
                    $frm[$this_field] = implode(',', $frm[$this_field]);
               } elseif(!is_array($frm[$this_field]) && (strpos(vb($this_table_field_types[$this_field]), 'int(') !== false || strpos(vb($this_table_field_types[$this_field]), 'float(') !== false)) {
                    $frm[$this_field] = get_float_from_user_input($frm[$this_field]);
                    if(strpos(vb($this_table_field_types[$this_field]), 'int(') !== false) {
                         $frm[$this_field] = round($frm[$this_field]);
                    }
               }
               $frm['specific_field_values'][$this_field] = $frm[$this_field];
               $frm['specific_field_sql_set'][$this_field] = word_real_escape_string($this_field) . '="' . nohtml_real_escape_string($frm[$this_field]) . '"';
          }
     }
}

function display_specific_field_form($specific_field_infos_array, $display_mode = 'table') {
     $output='';
     foreach($specific_field_infos_array as $specific_fields) {
          $tpl = $GLOBALS['tplEngine']->createTemplate('specific_field.tpl');
          $tpl->assign('f', $specific_fields);
          if(!empty($specific_fields['error_text'])) {
               $error_on_page = true;
          }
          if(!empty($specific_fields['field_title']) || !in_array($specific_fields['field_type'], array('hidden', 'separator', 'textarea', 'html'))) {
               if($display_mode == 'div') {
                    $output .= '
<div class="row" style="margin-bottom:10px">
     <div class="col-sm-6 col-md-5 col-lg-4">'.(!empty($specific_fields['field_title'])?$specific_fields['field_title'].''. (!empty($specific_fields['mandatory']) ? ' <span class="etoile">*</span>':'') . $GLOBALS['STR_BEFORE_TWO_POINTS'] .':':'') .'</div>
     <div class="col-sm-6 col-md-7 col-lg-8">' . $tpl->fetch() . vb($specific_fields['error_text']) . '</div>
</div>
';
               } else {
                    $output .= '
               <tr>
                    <td>'.$specific_fields['field_title'].''. (!empty($specific_fields['mandatory']) ? ' <span class="etoile">*</span>':'') . $GLOBALS['STR_BEFORE_TWO_POINTS'] .':</td>
                    <td>' . $tpl->fetch() . vb($specific_fields['error_text']) . '</td>
               </tr>';
               }
          } else {
               if($display_mode == 'div') {
                    $output .= '
<div style="margin-bottom:10px">
     ' . $tpl->fetch() . '
</div>';
               } else {
                    $output .= '
               <tr>
                    <td></td>
                    <td>' . $tpl->fetch() . vb($specific_fields['error_text']) . '</td>
               </tr>';
               }
          }
     }
     if(!empty($error_on_page)) {
          $output = $GLOBALS['tplEngine']->createTemplate('global_error.tpl', array('message' => $GLOBALS['STR_ERR_FORM']))->fetch() . $output;
     }
     return $output;
}

 function init_fineuploader_interface() {
     if(defined('IN_PEEL_ADMIN')) {
          $wwwroot = $GLOBALS['wwwroot_in_admin'];
     } else {
          $wwwroot = $GLOBALS['wwwroot'];
     }
     $GLOBALS['js_files'][] = $wwwroot . '/lib/js/jquery-fineuploader.js';
     $GLOBALS['css_files'][] = $wwwroot . '/lib/css/fineuploader.css';
     $GLOBALS['js_content_array'][] = '
window.init_fineuploader = function(object) {
     object.fineUploader({
          multiple: false,
          request: {
                    endpoint: "' . $wwwroot . '/fine_uploader.php?origin=' . urlencode($_SERVER['SCRIPT_FILENAME']) . '",
                    inputName: object.attr("id")
               },
          failedUploadTextDisplay: {
                    mode: "custom",
                    maxChars: 100
               },
          text: {
               uploadButton: "' . String::str_form_value($GLOBALS["STR_DOWNLOAD"]) . '",
               cancelButton: "' . String::str_form_value($GLOBALS["STR_CANCEL"]) . '",
               failUpload: "' . String::str_form_value($GLOBALS["STR_FTP_GET_FAILED"]) . '",
               formatProgress: "{percent}% ' . String::str_form_value($GLOBALS["STR_OUT_OF"]) . ' {total_size}"
          }
     }).on("complete", function(event, id, fileName, responseJSON) {
          if (responseJSON.success) {
               object.replaceWith(responseJSON.html);
          }
     });
};
window.reinit_upload_field = function(input_name) {
     $("#"+input_name).replaceWith("<div class=\"uploader\" id=\""+input_name+"\"></div>");
     init_fineuploader($("#"+input_name));
};
';
     $GLOBALS['js_ready_content_array'][] = '
$("input[type=file]").each(function () {
     $(this).replaceWith("<div class=\"uploader\" id=\""+$(this).attr("name")+"\"></div>");
});
$(".uploader").each(function () {
     init_fineuploader($(this));
});
';   
}

function create_or_update_product($field_values, $columns_skipped = array(), $product_field_names = array(), $specific_fields_array = array(), $admin_mode = false) {
     $output = '';
     if(!isset($GLOBALS['nbprod_update'])) {
          $GLOBALS['nbprod_update'] = 0;
          $GLOBALS['nbprod_update_null'] = 0;
          $GLOBALS['nbprod_insert'] = 0;
          $GLOBALS['nbprod_categorie_insert'] = 0;
     }

     if (!empty($field_values['site_id'])) {
          $site_id = $field_values['site_id'];
     } else {
          $site_id = $GLOBALS['site_id'];
     }
     // Gestion des champs impactant $field_values (transformation d'un nom en id par exemple)
     if (!empty($field_values['id_marque'])) {
          if(!is_array($field_values['id_marque'])) {
               $field_values['id_marque'] = array($field_values['id_marque']);
          }
          foreach($field_values['id_marque'] as $this_key => $this_field_value) {
               if(String::strlen($this_field_value)>0) {
                    // La marque n'est pas vide - il faut que l'import soit compatible avec des noms de marque pouvant être des nombres
                    // Par défaut on considère qu'une marque donnée est une id de marque, sinon on gère comme si c'était un nom si pas trouvée et non numérique
                    $q = query('SELECT id
                         FROM peel_marques
                         WHERE id=' . intval($this_field_value) . " AND " . get_filter_site_cond('marques'));
                    if ($brand = fetch_assoc($q)) {
                         // Marque existante
                         $this_brand_id_array = $brand['id'];
                    } else {
                         $sql_select_brand = 'SELECT id 
                              FROM peel_marques
                              WHERE nom_'.$_SESSION['session_langue'].' = "'.real_escape_string($this_field_value).'" AND ' . get_filter_site_cond('marques');
                         $query_brand = query($sql_select_brand);
                         if($brand = fetch_assoc($query_brand)){
                              $this_brand_id_array = $brand['id'];
                         }elseif(!empty($this_field_value) && !is_numeric($this_field_value)) {
                              // Marque inexistante, on l'insère en base de données.
                              $q = query('INSERT INTO peel_marques
                                   SET nom_' . $_SESSION['session_langue'] . '="' . nohtml_real_escape_string($this_field_value) . '", etat="1", site_id="' . nohtml_real_escape_string(get_site_id_sql_set_value($site_id)) . '"');
                              $this_brand_id_array = insert_id();
                              if($admin_mode) {
                                   $output .= $GLOBALS['tplEngine']->createTemplate('global_success.tpl', array('message' => sprintf($GLOBALS['STR_ADMIN_IMPORT_PRODUCTS_MSG_BRAND_CREATED'], $GLOBALS['line_number'], $field_values['id_marque'])))->fetch();
                              }
                         }
                    }
               }
          }
          // On ne peut stocker qu'un seul id de marque, même si un tableau est fourni. Aritraitement on ne retient que la dernière .
          $field_values['id_marque'] = end($this_brand_id_array);
     }
     // Génération du SQL à partir de $field_values. product_field_names peut contenir des inforamtions non vérifié, provenant d'un formulaire par exemple. Il faut s'assurer qu'il n'y a pas de champ utilisé qui n'existe pas réélement dans la bas de 
     $product_table_field_names = get_table_field_names('peel_produits');
     foreach($field_values as $this_field_name => $this_value) {
          if (!empty($this_field_name) && !in_array($this_field_name, $columns_skipped)) {
               // On ne souhaite pas inclure les champs spécifiques ou non reconnus dans la requête SQL des produits. Mais il ne faut pas supprimer les champs specifiques de $field_values puisque l'on s'en sert après
               if((empty($product_field_names) || in_array($this_field_name, $product_field_names)) && !in_array($this_field_name, array('id', 'Categorie', 'categorie_id')) && in_array($this_field_name, $product_table_field_names)) {
                    // On ne tient compte que des colonnes présentes dans la table produits pour sql_fields, les autres champs sont traités séparément
                    if(String::strpos($this_field_name, 'nom_') === 0 && String::strlen($this_field_name) == 6 && !empty($GLOBALS['site_parameters']['product_name_forced_lang']) && $this_field_name != 'nom_' . $GLOBALS['site_parameters']['product_name_forced_lang']) {
                         // Colonne nom_XX n'existant pas sur ce site, on ne traite pas le champ
                         continue;
                    }
                    if(String::strpos($this_field_name, 'description_') === 0 && String::strlen($this_field_name) == 14 && !empty($GLOBALS['site_parameters']['product_description_forced_lang']) && $this_field_name != 'description_' . $GLOBALS['site_parameters']['product_description_forced_lang']) {
                         // Colonne description_XX n'existant pas sur ce site, on ne traite pas le champ
                         continue;
                    }
                    $set_sql_fields[$this_field_name] = word_real_escape_string($this_field_name) . "='" . real_escape_string($this_value) . "'";
               }
          } elseif(empty($specific_fields_array[$this_field_name])) {
               // Ce champ ne sera pas utilisé, on le supprime
               unset($field_values[$this_field_name]);
          }
     }
          
     if (!empty($field_values['id'])) {
          // On a spécifié une id Produit, donc on essaie de faire un UPDATE
          if (!empty($set_sql_fields)) {
               $sql = "UPDATE peel_produits
                    SET " . implode(', ', $set_sql_fields) . "
                    WHERE id='" . intval($field_values['id']) . "' AND " . get_filter_site_cond('produits', null, true) . "";
               query($sql);
               if (affected_rows()) {
                    $product_id = $field_values['id'];
                    $GLOBALS['nbprod_update']++;
                    if($admin_mode) {
                         $output .= $GLOBALS['tplEngine']->createTemplate('global_success.tpl', array('message' => sprintf($GLOBALS['STR_ADMIN_IMPORT_PRODUCTS_MSG_LINE_UPDATED'], $GLOBALS['line_number'], $product_id)))->fetch();
                    } else {
                         $output = true;
                    }
               } 
          }
          if (!isset($product_id)) {
               // On vérifie si le produit existe déjà (et donc n'a pas été modifié) ou si il est à créer
               $q = query("SELECT id
                    FROM peel_produits
                    WHERE id='" . intval($field_values['id']) . "' AND " . get_filter_site_cond('produits', null, true));
               if ($product = fetch_assoc($q)) {
                    // Produit existe, et n'avait donc pas été modifié
                    $GLOBALS['nbprod_update_null']++;
                    $product_id = $field_values['id'];
               } else {
                    // Produit inexistant : on va exécuter l'INSERT INTO plus loin en imposant l'id
                    $set_sql_fields['id'] = "id='" . intval($field_values['id']) . "'";
               }
          }
     }
     if (!isset($product_id) && !empty($set_sql_fields)) {
          // Produit pas encore existant et $set_sql_fields est forcément non vide ici
          $sql = "INSERT INTO peel_produits
               SET " . implode(', ', $set_sql_fields);
          query($sql);
          $product_id = insert_id();
          $GLOBALS['nbprod_insert']++;
          if($admin_mode) {
               $output .= $GLOBALS['tplEngine']->createTemplate('global_success.tpl', array('message' => sprintf($GLOBALS['STR_ADMIN_IMPORT_PRODUCTS_MSG_LINE_CREATED'], $GLOBALS['line_number'], $product_id)))->fetch();
          } else {
               $output = true;
          }
     } elseif(!isset($product_id)) {
          if($admin_mode) {
               $output .= 'Problem empty product_id';
          }
          return false;
     }
     // Gestion des champs nécessitant d'écrire dans d'autres tables en connaissant $product_id
     foreach($field_values as $this_field_name => $this_field_value) {
          if($admin_mode && $this_field_name == $GLOBALS['STR_ADMIN_EXPORT_PRODUCTS_COLORS']) {
               // Gestion de la couleur
               query('DELETE FROM peel_produits_couleurs 
                    WHERE produit_id="' . intval($product_id) . '"');
               $this_list_color = explode(",", $this_field_value);
               foreach($this_list_color as $this_id => $this_value){
                    if(String::strlen($this_value)>0) {
                         if(!is_numeric($this_value)) {
                              $sql_select_color = 'SELECT * 
                                   FROM peel_couleurs
                                   WHERE nom_'.$_SESSION['session_langue'].' = "'.real_escape_string($this_value).'" AND ' .  get_filter_site_cond('couleurs');
                              $query_color = query($sql_select_color);
                              if($color = fetch_assoc($query_color)){
                                   $this_value = $color['id'];
                              }else{
                                   $sql_insert_color = 'INSERT INTO peel_couleurs (nom_'.$_SESSION['session_langue'].', site_id) 
                                        VALUES ("'.real_escape_string($this_value).'", "'.nohtml_real_escape_string(get_site_id_sql_set_value($site_id)).'")';
                                   query($sql_insert_color);
                                   $this_value = insert_id();
                              }
                         }
                         $sql_select_product_color = 'SELECT * 
                              FROM peel_produits_couleurs 
                              WHERE produit_id = "' . intval($product_id) . '" AND couleur_id = "' . intval($this_value) . '"';
                         $query_select_product_color = query($sql_select_product_color);
                         if(!fetch_assoc($query_select_product_color)){
                              $sql_match_product_color = 'INSERT INTO peel_produits_couleurs(produit_id,couleur_id) 
                                   VALUES ("' . intval($product_id) . '","' . intval($this_value) . '")';
                              query($sql_match_product_color);
                         }
                    }
               }
          } elseif($admin_mode && $this_field_name == $GLOBALS['STR_ADMIN_EXPORT_PRODUCTS_SIZES']){
               // Gestion de la taille
               query('DELETE FROM peel_produits_tailles 
                    WHERE produit_id="' . intval($product_id) . '"');
               $this_list_size = explode(",", $this_field_value);
               foreach($this_list_size as $this_id => $this_value){
                    $this_list_size_and_price = explode("§", $this_value);
                    $size_name = $this_list_size_and_price[0];
                    if(String::strlen($size_name)>0) {
                         $size_price = vn($this_list_size_and_price[1]);
                         $size_price_reseller = vn($this_list_size_and_price[2]);
                         // On ne fait pas de test is_numeric ou pas sur les tailles pour savoir si on parle d'id ou de nom, car une taille peut être un nombre !
                         // Donc obligatoirement, on considère qu'une taille est rentrée par son nom
                         $sql_size = 'SELECT * 
                              FROM peel_tailles 
                              WHERE nom_'.$_SESSION['session_langue'].' = "'.real_escape_string($size_name).'"  AND ' . get_filter_site_cond('tailles');
                         $query_size = query($sql_size);
                         if($size = fetch_assoc($query_size)){
                              if(isset($this_list_size_and_price[1]) && get_float_from_user_input($size_price) != $size['prix']){
                                   query('UPDATE peel_tailles 
                                        SET prix = "'.real_escape_string(get_float_from_user_input($size_price)).'" 
                                        WHERE id="'.intval($size['id']).'" AND ' . get_filter_site_cond('tailles'));
                              }
                              if(isset($this_list_size_and_price[2]) && get_float_from_user_input($size_price_reseller) != $size['prix_revendeur']){
                                   query('UPDATE peel_tailles 
                                        SET prix_revendeur = "'.real_escape_string(get_float_from_user_input($size_price_reseller)).'" 
                                        WHERE id="'.intval($size['id']).'" AND ' . get_filter_site_cond('tailles'));
                              }
                              $this_size_id = $size['id'];
                         }else{
                              $sql_insert_size = 'INSERT INTO peel_tailles (nom_'.$_SESSION['session_langue'].', prix, prix_revendeur, site_id) 
                                   VALUES ("'.real_escape_string($size_name).'", "'.floatval(get_float_from_user_input(vn($size_price))).'", "'.floatval(get_float_from_user_input(vn($size_price_reseller))).'", "'. nohtml_real_escape_string(get_site_id_sql_set_value($site_id)).'")';
                              query($sql_insert_size);
                              $this_size_id = insert_id();
                         }
                         $select_size_product = 'SELECT * 
                              FROM peel_produits_tailles 
                              WHERE produit_id = "' . intval($product_id) . '" AND taille_id = "' . intval($this_size_id) . '"';
                         $query_size_product = query($select_size_product);
                         if(!fetch_assoc($query_size_product)){
                              $sql_match_product_size = 'INSERT INTO peel_produits_tailles (produit_id, taille_id) 
                                   VALUES ("' . intval($product_id) . '", "' . intval($this_size_id) . '")';
                              query($sql_match_product_size);
                         }
                    }
               }
          } elseif (strpos($this_field_name, "§") !== false) {
               // Gestion des prix par lots : tarifs dégressifs
               // Nom du champs
               $this_bulk_discount = explode("§", $this_field_name);
               $this_quantity = $this_bulk_discount[0];
               $this_price_standard = $this_bulk_discount[1];
               $this_price_reseller = $this_bulk_discount[2];
               // Valeur du champs
               if(!empty($this_field_value)){
                    $this_package_price = explode("§", $this_field_value);
                    $quantity = $this_package_price[0];
                    $price_standard = $this_package_price[1];
                    $price_reseller = $this_package_price[2];
                    if (check_if_module_active('lot')) {
                         $sql_prix_lot = 'SELECT * 
                              FROM peel_quantites 
                              WHERE produit_id="' . intval($product_id) . '" AND quantite = "' . intval($quantity) . '" AND ' . get_filter_site_cond('quantites');
                         $query_prix_lot = query($sql_prix_lot);
                         if(fetch_assoc($query_prix_lot)){
                              $sql_update = 'UPDATE peel_quantites 
                                   SET quantite = "'.intval($quantity).'"';
                              if(isset($this_price_standard) && isset($price_standard)) {
                                   $sql_update.= ', prix ="'.nohtml_real_escape_string($price_standard).'"';
                              }
                              if(isset($this_price_reseller) && isset($price_reseller)) {
                                   $sql_update.= ', prix_revendeur ="'.nohtml_real_escape_string($price_reseller).'"';
                              }
                              $sql_update.= ', site_id = "'.nohtml_real_escape_string(get_site_id_sql_set_value($site_id)).'"
                                   WHERE produit_id="' . intval($product_id) . '" AND quantite = "'.intval($quantity).'"';
                              query($sql_update);
                              if($admin_mode) {
                                   $output .= $GLOBALS['tplEngine']->createTemplate('global_success.tpl', array('message' => sprintf($GLOBALS['STR_ADMIN_IMPORT_PRODUCTS_MSG_TARIF_UPDATED'], vb($price_standard), vb($price_reseller), vb($quantity), $product_id)))->fetch();
                              }
                         } else {
                              if(isset($quantity) && $quantity > 0) {
                                   $q = 'INSERT INTO peel_quantites 
                                        SET produit_id="' . intval($product_id) . '"';    
                                   $q.= ', quantite ="'.intval($quantity).'" 
                                        , site_id = "'.nohtml_real_escape_string(get_site_id_sql_set_value($site_id)).'"';
                                   if(isset($this_price_standard) && isset($price_standard)){
                                        $q.= ', prix ="'.nohtml_real_escape_string($price_standard).'"';
                                   }
                                   if(isset($this_price_reseller) && isset($price_reseller)){
                                        $q.= ', prix_revendeur ="'.nohtml_real_escape_string($price_reseller).'"';
                                   }
                                   query($q);
                                   if($admin_mode) {
                                        $output .= $GLOBALS['tplEngine']->createTemplate('global_success.tpl', array('message' => sprintf($GLOBALS['STR_ADMIN_IMPORT_PRODUCTS_MSG_TARIF_CREATED'], vb($price_standard), vb($price_reseller), vb($quantity), $product_id)))->fetch();
                                   }
                              }
                         }
                    }
               }
          } elseif (strpos($this_field_name, "#") !== false && check_if_module_active('attributs')) {
               // Gestion des attributs
               if($admin_mode) {
                    $output .= attributes_create_or_update($this_field_name, $this_field_value, $product_id, $site_id, $admin_mode);
               }
          }
     }    
     // Gestion de la catégorie
     unset($this_categories_array);
     if (!empty($field_values['categorie_id']) && !is_numeric($field_values['categorie_id']) && empty($field_values['Categorie'])) {
          // Compatibilité avec anciens champs appelés categorie_id et contenant des noms de catégories
          $field_values['Categorie'] = $field_values['categorie_id'];
          unset($field_values['categorie_id']);
     }
     if (!empty($field_values['Categorie'])) {
          // Ce champ contient une liste de catégories séparées par des virgules
          foreach(explode(',', $field_values['Categorie']) as $this_category) {
               if (is_numeric($this_category)) {
                    // le champ Categorie est un id
                    $this_categorie_id = intval($this_category);
               } else {
                    // le champ Categorie n'est pas un nombre, on tente une recherche dans la BDD sur le nom de la catégorie.
                    $q = query('SELECT id
                         FROM peel_categories
                         WHERE nom_' . $_SESSION['session_langue'] . '="' . nohtml_real_escape_string($this_category) . '" AND ' . get_filter_site_cond('categories') . '');
                    // Catégorie existante, ou le champ Categorie du fichier n'est ni un ID, ni le nom de la catégorie
                    if ($categorie = fetch_assoc($q)) {
                         $this_categorie_id = $categorie['id'];
                    } else {
                         // Catégorie inexistante : on l'insère en base de données
                         $q = query('INSERT INTO peel_categories
                              SET nom_' . $_SESSION['session_langue'] . '="' . nohtml_real_escape_string($this_category) . '", etat="1", site_id = "' . nohtml_real_escape_string(get_site_id_sql_set_value($site_id)) . '"');
                         $this_categorie_id = insert_id();
                         if($admin_mode) {
                              $output .= $GLOBALS['tplEngine']->createTemplate('global_success.tpl', array('message' => sprintf($GLOBALS['STR_ADMIN_IMPORT_PRODUCTS_MSG_CATEGORY_CREATED'], $this_category, $this_categorie_id)))->fetch();
                         }
                    }
               }
               $this_categories_array[] = $this_categorie_id;
          }
     }
     if (!empty($field_values['categorie_id'])) {
          // On a déjà testé plus haut si categorie_id était numérique ou non, et si pas numérique on l'a supprimé
          // donc là il est forcément numérique
          if (get_category_name($field_values['categorie_id']) !== false) {
               $this_categories_array[] = $field_values['categorie_id'];
          } else {
               if($admin_mode) {
                    $output .= $GLOBALS['tplEngine']->createTemplate('global_error.tpl', array('message' => sprintf($GLOBALS['STR_ADMIN_IMPORT_PRODUCTS_ERR_REFERENCE_DOES_NOT_EXIST'], $field_values['categorie_id'])))->fetch();
               }
          }
     }
     if (!empty($this_categories_array)) {
          if(empty($GLOBALS['site_parameters']['products_import_reset_category_associations_disable'])) {
               // Suppression des anciennes associations entre les produits et les catégories, pour insérer celles du fichier.
               query('DELETE FROM peel_produits_categories
                    WHERE produit_id="' . intval($product_id) . '"');
          }
          foreach($this_categories_array as $this_categorie_id) {
               if (!empty($this_categorie_id)) {
                    // Vérification que l'association entre les produits, les catégories de produits
                    $q = query('SELECT produit_id, categorie_id
                         FROM peel_produits_categories
                         WHERE produit_id="' . intval($product_id) . '" AND categorie_id="' . intval($this_categorie_id) . '"');
                    if (!num_rows($q)) {
                         query('INSERT INTO peel_produits_categories
                              SET produit_id="' . intval($product_id) . '",
                                   categorie_id="' . intval($this_categorie_id) . '"');
                         $GLOBALS['nbprod_categorie_insert']++;
                    }
               }
          }
     }
     // Gestion des stocks
     // Doit être fait à la fin car on doit déjà avoir les couleurs et tailles bien rentrées en base de données
     if(!empty($field_values["Stock"]) && $admin_mode && check_if_module_active('stock_advanced')) {
          // Format stock ou stock§color§size, et les combinaisons sont séparées par ,
          $this_list_stock = explode(",", $field_values["Stock"]);
          $stock_frm = array();
          foreach($this_list_stock as $this_id => $this_value){
               $this_list_infos = explode("§", $this_value);
               $stock_frm["id"][$this_id] = $product_id;
               $stock_frm["stock"][$this_id] = $this_list_infos[0];
               $this_value = vb($this_list_infos[1]);
               if(is_numeric($this_value)) {
                    $stock_frm["couleur_id"][$this_id] = $this_value;
               } elseif(!empty($this_value) && !is_numeric($this_value)) {
                    $sql_select_color = 'SELECT * 
                         FROM peel_couleurs
                         WHERE nom_'.$_SESSION['session_langue'].' = "'.real_escape_string($this_value).'" AND ' . get_filter_site_cond('couleurs');
                    $query_color = query($sql_select_color);
                    if($color = fetch_assoc($query_color)){
                         $stock_frm["couleur_id"][$this_id] = $color['id'];
                    }
               }
               if(!empty($this_list_infos[2])) {
                    // Taille donnée forcément par son nom
                    $sql_size = 'SELECT * 
                         FROM peel_tailles 
                         WHERE nom_'.$_SESSION['session_langue'].' = "'.real_escape_string($this_list_infos[2]).'"  AND ' . get_filter_site_cond('tailles');
                    $query_size = query($sql_size);
                    if($size = fetch_assoc($query_size)){
                         $stock_frm["taille_id"][$this_id] = $size['id'];
                    }
               }
          }
          $output .= insere_stock_produit($stock_frm);
     }
     if (check_if_module_active('stock_advanced') && !empty($field_values['on_stock']) && $field_values['on_stock'] == 1) {
          // pas d'output sur cette fonction. Elle ne fait que des manipulation en BDD
          insert_product_in_stock_table_if_not_exist($product_id, 1);
     }
     return $output;
}

function data_position_sort($arg1, $arg2) {
     $pos1 = vb($arg1['position'], 999999);
     $pos2 = vb($arg2['position'], 999999);
     if ($pos1 < $pos2) {
          return -1;
     } elseif ($pos1 == $pos2) {
          return 0; 
     } else {
          return 1; 
     }
}