File Source for php_functions.inc.php

<?php /*
*@=@=@=@ START LICENSE @=@=@=@*
Copyright or © or Copr. Stéphane TRICHET and Nicolas SOTRON
stephane.t@simpliciweb.net and nicolas.s@simpliciweb.net
This software is a computer program whose purpose is to make a
web hosting platform
This software is governed by the CeCILL license under French law and
abiding by the rules of distribution of free software. You can use,
modify and/ or redistribute the software under the terms of the CeCILL
license as circulated by CEA, CNRS and INRIA at the following URL
"http://www.cecill.info".
As a counterpart to the access to the source code and rights to copy,
modify and redistribute granted by the license, users are provided only
with a limited warranty and the software's author, the holder of the
economic rights, and the successive licensors have only limited
liability.
In this respect, the user's attention is drawn to the risks associated
with loading, using, modifying and/or developing or reproducing the
software by the user in light of its specific status of free software,
that may mean that it is complicated to manipulate, and that also
therefore means that it is reserved for developers and experienced
professionals having in-depth computer knowledge. Users are therefore
encouraged to load and test the software's suitability as regards their
requirements in conditions enabling the security of their systems and/or
data to be ensured and, more generally, to use and operate it in the
same conditions as regards security.
The fact that you are presently reading this means that you have had
knowledge of the CeCILL license and that you accept its terms.
*@=@=@=@ END LICENSE @=@=@=@*
*/?><?php
/**
* All the function available into PLICI
*
*
* @author SimpliciWeb
* @version $Id: php_functions.inc.php 859 2008-01-23 08:50:43Z stephanet $
* @package Common
* @subpackage Start
*/
/**
* Include dirname(__FILE__)."/plicitag_function.inc.php"
*/
include_once(dirname(__FILE__)."/plicitag_function.inc.php");
// Define all path //
define('PLICI_MY_DIRECTORY', 'my');
define('PLICI_FOR_PLICI_DIRECTORY', 'for_plici');
define('PLICI_LOG_DIRECTORY', 'log');
define('PLICI_TMP_DIRECTORY', 'tmp');
define('PLICI_MOD_USER_DIRECTORY', "module"); // Module for user directoryin my directory
define('PLICI_ADMIN_SITES_DIRECTORY', "admin_sites");
define('PLICI_ADMIN_PLICI_DIRECTORY', "admin_plici");
define('PLICI_BD_DIRECTORY', "bd");
define('PLICI_BD_MY_DIRECTORY', PLICI_BD_DIRECTORY."/".PLICI_MY_DIRECTORY);
define('PLICI_BD_MY_ADMIN_SUPER_DIRECTORY', PLICI_BD_MY_DIRECTORY."/admin_super");
define('PLICI_BD_MY_ALL_SITES_DIRECTORY', PLICI_BD_MY_DIRECTORY."/_all_sites");
define('PLICI_BD_FOR_PLICI_DIRECTORY', PLICI_BD_DIRECTORY."/".PLICI_FOR_PLICI_DIRECTORY);
define('PLICI_BD_FOR_PLICI_ADMIN_SUPER_DIRECTORY', PLICI_BD_DIRECTORY."/".PLICI_FOR_PLICI_DIRECTORY."/admin_super");
define('PLICI_CORE_DIRECTORY', "core");
define('PLICI_CORE_ENTREES_DIRECTORY', PLICI_CORE_DIRECTORY."/entrees");
define('PLICI_CORE_ENTREES_FRONT_SITES_DIRECTORY', PLICI_CORE_ENTREES_DIRECTORY."/front_sites");
define('PLICI_CORE_ENTREES_ADMIN_SITES_DIRECTORY', PLICI_CORE_ENTREES_DIRECTORY."/".PLICI_ADMIN_SITES_DIRECTORY);
define('PLICI_INCLUDE_ENTREES_FRONT_SITES_FOR_PLICI_DIRECTORY', "entrees/front_sites/".PLICI_FOR_PLICI_DIRECTORY);
define('PLICI_CORE_ENTREES_FRONT_SITES_MY_DIRECTORY', PLICI_CORE_ENTREES_FRONT_SITES_DIRECTORY."/".PLICI_MY_DIRECTORY);
define('PLICI_CORE_ENTREES_FRONT_SITES_FOR_PLICI_DIRECTORY', PLICI_CORE_ENTREES_FRONT_SITES_DIRECTORY."/".PLICI_FOR_PLICI_DIRECTORY);
define('PLICI_CORE_ENTREES_ADMIN_SITES_MY_DIRECTORY', PLICI_CORE_ENTREES_ADMIN_SITES_DIRECTORY."/".PLICI_MY_DIRECTORY);
define('PLICI_CORE_EXTERNAL_COMPONENTS_PEAR_DIRECTORY', PLICI_CORE_DIRECTORY.'/external_components/pears');
define('PLICI_CORE_INTERNAL_COMMON_GLOBALS', PLICI_CORE_DIRECTORY.'/internal_components/common/globals');
define('PLICI_CORE_INTERNAL_COMPONENTS_FRONT_SITES_THEME_ELEMENT_DIRECTORY', PLICI_CORE_DIRECTORY."/internal_components/front_sites/theme_elements");
define('PLICI_CORE_INTERNAL_COMPONENTS_FRONT_SITES_THEME_ELEMENT_MY_DIRECTORY', PLICI_CORE_INTERNAL_COMPONENTS_FRONT_SITES_THEME_ELEMENT_DIRECTORY."/".PLICI_MY_DIRECTORY);
define('PLICI_CORE_MODULE_DIRECTORY', PLICI_CORE_DIRECTORY."/module"); // Internal module
define('PLICI_MOD_SRC_DIRECTORY', "original_module");
define('PLICI_MOD_SRC_MY_DIRECTORY', PLICI_MOD_SRC_DIRECTORY."/".PLICI_MY_DIRECTORY);
define('PLICI_VIEW_DIRECTORY', "view");
define('PLICI_VIEW_SITES_DIRECTORY', PLICI_VIEW_DIRECTORY."/sites");
define('PLICI_VIEW_SITES_MY_DIRECTORY', PLICI_VIEW_SITES_DIRECTORY."/".PLICI_MY_DIRECTORY);
define('PLICI_VIEW_SITES_MY_ADMIN_SITES_DIRECTORY', PLICI_VIEW_SITES_DIRECTORY."/".PLICI_MY_DIRECTORY.'/'.PLICI_ADMIN_SITES_DIRECTORY);
define('PLICI_VIEW_SITES_FOR_PLICI_DIRECTORY', PLICI_VIEW_SITES_DIRECTORY."/".PLICI_FOR_PLICI_DIRECTORY);
define('PLICI_VIEW_SITES_FOR_PLICI_ADMIN_PLICI_DIRECTORY', PLICI_VIEW_SITES_FOR_PLICI_DIRECTORY."/".PLICI_ADMIN_PLICI_DIRECTORY);
//define('PLICI_VIEW_THEME_REWRITING_DIRECTORY', PLICI_VIEW_DIRECTORY."/theme_rewriting");
//define('PLICI_VIEW_THEME_REWRITING_MY_DIRECTORY', PLICI_VIEW_THEME_REWRITING_DIRECTORY."/".PLICI_MY_DIRECTORY);
define('PLICI_VIEW_EXTERNAL_COMPONENTS_STATS_PHPMV2_LIBS_DIRECTORY', PLICI_VIEW_DIRECTORY.'/external_components/stats/phpmv2/libs' );
define('PLICI_VIEW_EXTERNAL_COMPONENTS_DIRECTORY', PLICI_VIEW_DIRECTORY.'/external_components' );
define('PLICI_VIEW_EXTERNAL_COMPONENTS_MY_DIRECTORY', PLICI_VIEW_EXTERNAL_COMPONENTS_DIRECTORY."/".PLICI_MY_DIRECTORY );
define('PLICI_PICTURE_DIRECTORY', "picture");
define('PLICI_PICTURE_EXT_DIRECTORY', PLICI_PICTURE_DIRECTORY."/ext");
// Detect the file config path
// Detect use current file to determine root path of PLICI
$current_dir = dirname(__FILE__);
// Work on copy of directory
$current_dir_for_search = $current_dir;
if (isWindows())
{
// If windows replace \ by /
// Because the define used / as dir separator
$current_dir_for_search = str_replace("\\", "/", $current_dir_for_search);
}
// Find position of this file(with all plici's dir) in the path
$string_pos = strpos($current_dir_for_search, PLICI_CORE_INTERNAL_COMMON_GLOBALS);
// Select only the path
$plici_root_path = substr($current_dir, 0, $string_pos);
global $plici_config_file_path;
$plici_config_file_path = $plici_root_path."config/plici_config.php";
global $smarty_bloc_not_cached_old_tpl_vars;
$smarty_bloc_not_cached_old_tpl_vars = array();
/**
* Test if is a Windows server or not
*
* @return bool
*/
function isWindows()
{
return ( substr(PHP_OS,0,3) == 'WIN');
}
/**
* Translate an array in a PHP script file wich declare this array
*
* @param array $array
* @param string $array_name_in_php
* @return string
*/
function array_to_php_script($array, $array_name_in_php) {
$result = "<?php \n";
$result .= "\$$array_name_in_php = array (\n";
foreach($array as $key => $value) {
$result .= " '$key' => '$value', \n";
}
$result .= ");\n";
$result .= "?".">";
return $result;
}
/**
* Get list of MY directories needed for PLICI
*
* @param string $p_racin_path
* @return array
*/
function getArrayListOfMyDirectories($p_racin_path) {
$directory_to_make = array(
$p_racin_path.'/'.PLICI_BD_MY_DIRECTORY.'/',
$p_racin_path.'/'.PLICI_BD_MY_ADMIN_SUPER_DIRECTORY.'/',
$p_racin_path.'/'.PLICI_BD_MY_ALL_SITES_DIRECTORY.'/',
$p_racin_path.'/'.PLICI_CORE_ENTREES_FRONT_SITES_MY_DIRECTORY.'/',
$p_racin_path.'/'.PLICI_VIEW_SITES_MY_DIRECTORY.'/',
$p_racin_path.'/'.PLICI_MOD_SRC_MY_DIRECTORY.'/',
$p_racin_path.'/'.PLICI_BD_FOR_PLICI_ADMIN_SUPER_DIRECTORY.'/',
// $p_racin_path.'/'.PLICI_VIEW_THEME_REWRITING_MY_DIRECTORY.'/',
$p_racin_path.'/'.PLICI_CORE_ENTREES_ADMIN_SITES_MY_DIRECTORY.'/',
$p_racin_path.'/'.PLICI_CORE_INTERNAL_COMPONENTS_FRONT_SITES_THEME_ELEMENT_MY_DIRECTORY.'/',
$p_racin_path.'/'.PLICI_LOG_DIRECTORY.'/',
$p_racin_path.'/'.PLICI_TMP_DIRECTORY.'/',
//$p_racin_path.'/'.PLICI_VIEW_EXTERNAL_COMPONENTS_MY_DIRECTORY.'/',
);
return $directory_to_make;
}
/**
* Create the /my directories for PLICI environnement
*
* @param string $p_racin_path
* @return bool TRUE on error
*/
function createMyDirectories($p_racin_path) {
$directory_to_make = getArrayListOfMyDirectories($p_racin_path);
$all_is_ok = true;
foreach($directory_to_make as $directory_to_make) {
if (!(file_exists($directory_to_make) && is_dir($directory_to_make))) {
if (!@plici_mkdir($directory_to_make)) {
$all_is_ok = false;
echo(" Error creating : $directory_to_make\n");
} else {
echo(" Created dir: $directory_to_make\n");
}
} else
;//echo(" Not needed to create : $directory_to_make\n"); cette ligne induit les gens en erreur, ils croient que c'est une erreur
}
return $all_is_ok;
}
/**
* Update the PLICI config
*
* @param array $array_cfg
*/
function update_config_file($array_cfg) {
global $plici_config_file_path;
net_file_put_contents($plici_config_file_path, array_to_php_script($array_cfg, "_PLICI_CFG"));
}
/**
* Escape a string to replace " and ' by html codes
*
* @param string $string
* @return string
*/
function net_value($string)
{
return str_replace(array("\"","'"), array(""","'"), $string);
}
/**
* Connect to a database and wait 10 times for a free connexion if mysql is out.
*
* @param string $p_hostname
* @param string $p_username
* @param string $p_password
* @param integer $p_max_attempt
* @return resource
*/
function plici_mysql_connect($p_hostname, $p_username, $p_password, $p_max_attempt = 10, $p_force_new_connection = false) {
$id_sql = FALSE;
$i = 0;
while ($id_sql === FALSE) {
// echo("Connecting $p_hostname, $p_username, $p_password");
/*
* Alors, voici pourquoi on utilise un mysql_connect et pas un mysql_Pconnect
* Car, le pconnect va renvoyer une connexion SQL déjà existante
* mais il va se référer au Login/Pass/Host pour l'identifier
* Il peut ainsi renvoyer une connexion qui ne selectionne pas la bonne base de donnée
*
* Donc le pconnect pause un problème avec une selection de bases multiples contenant des
* identifiants et host identiques car la selection de la BD ne peux plus être fiable
*
*/
//$id_sql = @mysql_pconnect($p_hostname, $p_username, $p_password);
$id_sql = mysql_connect($p_hostname, $p_username, $p_password, $p_force_new_connection);
//, true);
if ($id_sql === FALSE) {
trigger_error("BD_WAIT : Waiting for a free connexion (attempt $i)...");
sleep(0.5);
$i++;
if ($i > $p_max_attempt) {
trigger_error("BD_BAD : Sorry... Too many waiting time for a free connexion (attempt $i)...");
break;
}
} else if ($i > 0)
trigger_error("BD_OK : Waiting solve the problem, you have got a new connexion (attempt $i)...");
}
return $id_sql;
}
/**
* Create multiple directories
*
* @param string $path
* @param bool $all_is_ok
* @return bool TRUE if all is of (BECAREFUL)
*/
function net_mkdirs($path, $all_is_ok = true) {
$path = preg_replace("|(.+)[/\\\\]$|is", "\\1", $path);
// echo_net($path);
if (!file_exists($path)) {
$all_is_ok = net_mkdirs(dirname($path)."/", $all_is_ok);
if (!@plici_mkdir($path, 0777)) {
$all_is_ok = false;
echo_net("error creating ".$path);
}
}
// echo_net($all_is_ok);
return $all_is_ok;
}
/**
* Net url build a PLICI URL
*
* @param array $params
* @param bool $print_stdout
* @param Smarty_custom $smarty
* @return string
*/
function net_url($params, $print_stdout = true, $smarty=NULL){
//Récupération du type de lien
$p_type = getFromArray("type", $params, "PRODUCT");
//Utile si redirection => les & ne doivent pas être encodé
$separator = getFromArray("nes", $params, false)?"&":"&"; //Nes pour no-encode-separator
global $g_object_siteinformation;
// Get plici page id
$p_plici_page_id = getFromArray("plici_page_id", $params, "");
if (0<strlen(trim($p_plici_page_id)))
{
// transform plici page id in page id //
// Declare object loader
global $g_object_loader;
// Load object for page
$o_page =& $g_object_loader->getTPageFo();
// Get page id
$o_page->translatePliciPageId($p_plici_page_id, $params["page_id"]);
}
switch(strtoupper($p_type)) {
case "INDEX_FULL":
$url = $g_object_siteinformation->getBaseFullHttp();
break;
case "INDEX":
$url = $g_object_siteinformation->getBaseHttp();
break;
case "SELF":
$url = $_SERVER['PHP_SELF'];
break;
case "SELF_FULL":
$url = $g_object_siteinformation->getHTTPorHTTPS().$_SERVER['HTTP_HOST'].$_SERVER['PHP_SELF'];
break;
case "PRODUCT":
$p_url_prefix = getFromArray("url_prefix", $params, ""); // Utile pour le lien vers le produit dans les stats des paniers
$p_url_prefix = "/"==$p_url_prefix[strlen($p_url_prefix)-1]?substr($p_url_prefix, 0, -1):$p_url_prefix;
$p_product_id = getFromArray("pro_id", $params, 0);
$p_product_title = getFromArray("pro_title", $params, "product"); // Sert uniquement au référencement
$p_father_page = getFromArray("id_page", $params, 0);
// global $g_object_siteinformation;
// if ($g_object_siteinformation->isAdmin())
// // ici on est dans l'admin est on veut une adresse du front
// $url = $g_object_siteinformation->getBaseFullHttpFoWithoutLanguage();
// else
// $url = $g_object_siteinformation->getBaseHttp();
$lang_current_id = 0;
$g_object_siteinformation->getCurrentLanguageId($lang_current_id);
$url = $p_url_prefix."/l".$lang_current_id."/p".$p_father_page."_r".$p_product_id."-".net_urlencode($p_product_title).".html";
break;
case "LINK_BACK":
//Lien avec un lien vers la page qui a envoyé le lien
$p_previous_id_page = getFromArray("prev_page", $params, 0);
$p_previous_id_product = getFromArray("prev_pro", $params, 0);
$p_previous_title = net_urlencode(getFromArray("prev_title", $params, "index"));
if (0 !== $p_previous_id_page)
{
$previous_url = "/p".$p_previous_id_page."_r".$p_previous_id_product."-".$p_previous_title.".html";
$params["_prevUrl"] = $previous_url;
}
// Surtout pas de break;
case "LINK":
default:
//$p_tpl_uri = getFromArray("tpl", $params, null);
$p_page_id = getFromArray("page_id", $params, 0);
$p_page_title = getFromArray("page_title", $params, "page"); //Sert uniquement au référencement
$p_prefix_url = getFromArray("prefix_url", $params, ""); //Sert uniquement au référencement
// trigger_error("Sorry you are still using net_url() but it is deprecated.".print_r(debug_backtrace(),true));
$url_suffix = "";
if (!is_null($smarty))
{
if ($g_object_siteinformation->isAdmin())
{
// Admin => display link to add/modify page
$mod_id = $smarty->get_template_vars('plici_page_mod_id');
$mod_index = $smarty->get_template_vars('plici_page_mod_index');
} else {
// Front office
// Search if this page have an module
$array_son_link = is_array($smarty->get_template_vars('array_son_link'))?$smarty->get_template_vars('array_son_link'):array();
$array_sub_link = is_array($smarty->get_template_vars('array_sub_link'))?$smarty->get_template_vars('array_sub_link'):array();
$array_link = array_merge($array_son_link, $array_sub_link);
$not_find = TRUE;
$nof_array_link = count($array_link);
$i=0;
while (($i<$nof_array_link) && ($not_find))
{
$not_find = $p_page_id!=$array_link[$i]['page_id'];
$i++;
}
$mod_id = $not_find?$smarty->get_template_vars('plici_page_mod_id'):$array_link[$i-1]['page_mod_id'];
$mod_index = $not_find?$smarty->get_template_vars('plici_page_mod_index'):$array_link[$i-1]['mod_index'];
}
if ((is_null($mod_id)) || ('|' == $mod_id)) {
$url_suffix = "-".net_urlencode($p_page_title).".html";
} else if ('' == $mod_id) {
//loader en bd
$mod = array();
global $g_object_loader;
$o_page =& $g_object_loader->getTPageFo();
$o_page->getModuleFromPage($p_page_id, $mod);
if (0<sizeof($mod))
$url_suffix = '/plici_mod/'.$mod['mod_id'].'/'.$mod['mod_index_file'] ;
else $url_suffix = "-".net_urlencode($p_page_title).".html";
} else {
$url_suffix= '/plici_mod/'.$mod_id.'/'.$mod_index;
}
} else {
$url_suffix = "-".net_urlencode($p_page_title).".html";
}
if (10 != $p_page_id) {
$lang_current_id = 0;
$g_object_siteinformation->getCurrentLanguageId($lang_current_id);
$url = "/l".$lang_current_id."/p".$p_page_id.$url_suffix;
if ($p_prefix_url != "") {
//echo_net($p_prefix_url[strlen($p_prefix_url)]);
if ($p_prefix_url[strlen($p_prefix_url)-1] == "/")
$p_prefix_url=substr($p_prefix_url,0,strlen($p_prefix_url)-1);
$url = $p_prefix_url.$url;
}
} else {
// Index
// index.html in case of / because some time we use / to have a flash intro
$url = "/index.html";
}
break;
}
//Récupération paramètres du lien
$string_param = array();
foreach($params as $key=>$value) {
if ("_"==$key[0])
{
array_push($string_param, substr($key,1)."=".urlencode($value));
}
}
$p_cat_param = getFromArray("cat_param", $params, "");
if ("" != $p_cat_param)
{
//On supprime le premier &
if ("&"==$p_cat_param[0])
$p_cat_param = substr($p_cat_param,1);
$p_cat_param = implode($separator ,explode("&", $p_cat_param));
array_push($string_param, $p_cat_param);
}
if (0<count($string_param))
$url .= "?".implode($separator ,$string_param);
if ($print_stdout)
@print($url);
return $url;
}
/**
* Transform a Smarty date to a string
*
* @param string $p_var_name
* @param array $p_array
* @param string $p_default_value
* @return string
*/
function getDateSmartyFromArray($p_var_name, &$p_array, $p_default_value) {
$date_day = (isset($p_array[$p_var_name.'Day'])?$p_array[$p_var_name.'Day']:"");
$date_month = (isset($p_array[$p_var_name.'Month'])?$p_array[$p_var_name.'Month']:"");
$date_year = (isset($p_array[$p_var_name.'Year'])?$p_array[$p_var_name.'Year']:"");
if ($date_day=="" && $date_month=="" && $date_year=="")
return $p_default_value;
$f_birthday = $date_year;
$f_birthday .= "-".$date_month;
$f_birthday .= "-".$date_day;
return $f_birthday;
}
/**
* Transform a Smarty date to a string and assign to smarty
*
* @param string $p_var_name
* @param array $p_array
* @param string $p_default_value
* @param Smarty_custom $smarty
* @return string
*/
function getDateSmartyFromArrayAndAssign($p_var_name, &$p_array, $p_default_value, &$smarty) {
$result = getDateSmartyFromArray($p_var_name, $p_array, $p_default_value);
if ($result != '') {
$smarty->assign_by_ref($p_var_name, $result);
}
return $result;
}
/**
* Delete accent from a string
*
* $tofind = "+-àáâãäåÒÓÔÖØ=óôõöøèéêë>ÇçÝÏìíîïÝ<ùúûüÿÑñ";
* $replac = "--aaaaaaOOOOO-oooooeeee-CcYIiiiiY-uuuuyNn";
* @param string $chaine
* @return string
*/
function SuppAccents($chaine){
$tofind = "+-àáâãäåÒÓÔÖØ=óôõöøèéêë>ÇçÝÏìíîïÝ<ùúûüÿÑñ";
$replac = "--aaaaaaOOOOO-oooooeeee-CcYIiiiiY-uuuuyNn";
return(strtr($chaine,$tofind,$replac));
}
/**
* Find a key in an array an return it or return default value
*
* @param string $p_var_name
* @param array $p_array
* @param string $p_default_value
* @return mixed
*/
function getFromArray($p_var_name, &$p_array, $p_default_value) {
return isset($p_array[$p_var_name])?$p_array[$p_var_name]:$p_default_value;
}
/**
* Find a key (or default value) in an array an assign it to smarty
*
* @param string $p_var_name
* @param array $p_array
* @param string $p_default_value
* @param Smarty_custom $smarty
* @return mixed
*/
function getFromArrayAndAssign($p_var_name, &$p_array, $p_default_value, &$smarty) {
$result = getFromArray($p_var_name, $p_array, $p_default_value);
//if ($result != '') {
$smarty->assign_by_ref($p_var_name, $result);
//}
return $result;
}
/**
* Dump a var
*
* @access private
* @param mixed $data
* @return string
*/
function xDumpVar($data) {
$B_echo = true;
ob_start();
var_dump($data);
$c = ob_get_contents();
ob_end_clean();
$c = preg_replace("/\r\n|\r/", "\n", $c);
$c = str_replace("]=>\n", '] = ', $c);
$c = preg_replace('/= {2,}/', '= ', $c);
$c = preg_replace("/\[\"(.*?)\"\] = /i", "[$1] = ", $c);
$c = preg_replace('/ /', " ", $c);
$c = preg_replace("/\"\"(.*?)\"/i", "\"$1\"", $c);
$c = htmlspecialchars($c, ENT_NOQUOTES);
// Expand numbers (ie. int(2) 10 => int(1) 2 10, float(6) 128.64 => float(1) 6 128.64 etc.)
$c = preg_replace("/(int|float)$([0-9\.]+)$/ie", "'$1('.strlen('$2').') $2'", $c);
// Syntax Highlighting of Strings. This seems cryptic, but it will also allow non-terminated strings to get parsed.
$c = preg_replace("/(\[[\w ]+\] = string$[0-9]+$ )\"(.*?)/sim", "$1\"", $c);
$c = preg_replace("/(\"\n{1,})( {0,}\})/sim", "$1$2", $c);
$c = preg_replace("/(\"\n{1,})( {0,}\[)/sim", "$1$2", $c);
$c = preg_replace("/(string$[0-9]+$ )\"(.*?)\"\n/sim", "$1\"$2\"\n", $c);
$regex = array(
// Numberrs
'numbers' => array('/(^|] = )(array|float|int|string|resource|object$.*$|\&object$.*$)$([0-9\.]+)$/i', '$1$2($3)'),
// Keywords
'null' => array('/(^|] = )(null)/i', '$1$2'),
'bool' => array('/(bool)$(true|false)$/i', '$1($2)'),
// Types
'types' => array('/(of type )$(.*)$/i', '$1($2)'),
// Objects
'object' => array('/(object|\&object)$([\w]+)$/i', '$1($2)'),
// Function
'function' => array('/(^|] = )(array|string|int|float|bool|resource|object|\&object)\(/i', '$1$2('),
);
foreach ($regex as $x) {
$c = preg_replace($x[0], $x[1], $c);
}
$style = '
/* outside div - it will float and match the screen */
.dumpr {
margin: 2px;
padding: 2px;
background-color: #fbfbfb;
float: left;
clear: both;
}
/* font size and family */
.dumpr pre {
color: #000000;
font-size: 9pt;
font-family: "Courier New",Courier,Monaco,monospace;
margin: 0px;
padding-top: 5px;
padding-bottom: 7px;
padding-left: 9px;
padding-right: 9px;
}
/* inside div */
.dumpr div {
background-color: #fcfcfc;
border: 1px solid #d9d9d9;
float: left;
clear: both;
}
/* syntax highlighting */
.dumpr span.string {color: #c40000;}
.dumpr span.number {color: #ff0000;}
.dumpr span.keyword {color: #007200;}
.dumpr span.function {color: #0000c4;}
.dumpr span.object {color: #ac00ac;}
.dumpr span.type {color: #0072c4;}
.legenddumpr {
background-color: #fcfcfc;
border: 1px solid #d9d9d9;
padding: 2px;
}
';
$style = preg_replace("/ {2,}/", "", $style);
$style = preg_replace("/\t|\r\n|\r|\n/", "", $style);
$style = preg_replace("/\/\*.*?\*\//i", '', $style);
$style = str_replace('}', '} ', $style);
$style = str_replace(' {', '{', $style);
$style = trim($style);
$c = trim($c);
$c = preg_replace("/\n<\/span>/", "\n", $c);
$S_from = '';
// Nom du fichier appelant la fonction
$A_backTrace = debug_backtrace();
if (is_array($A_backTrace) && array_key_exists(0, $A_backTrace)) {
$S_from = <<< BACKTRACE
{$A_backTrace[1]{'file'}}, ligne {$A_backTrace[1]{'line'}}
BACKTRACE;
} else {
$S_from = basename($_SERVER['SCRIPT_FILENAME']);
}
$S_out = '';
$S_out .= "<style type=\"text/css\">".$style."</style>\n";
$S_out .= '<fieldset class="dumpr">';
$S_out .= '<legend class="legenddumpr">'.$S_from.'</legend>';
$S_out .= '<pre>'.$c.'</pre>';
$S_out .= '</fieldset>';
$S_out .= "<div style=\"clear:both;\"> </div>";
if ($B_echo) {
echo $S_out;
} else {
return $S_out;
}
}
/**
* PLICI debug function
*
* @param mixed $array
*/
function print_r_net($array) {
xDumpVar($array);
}
/**
* PLICI Debug echo
*
* @param mixed $string
*/
function echo_net($string) {
xDumpVar($string);
}
/**
* A plici debug function
*
* @return array ['file'] => filename,['call']=> error
*/
function plici_debug_backtrace()
{
$debug_output = array();
$debug_stack = debug_backtrace();
// Reformat output
foreach($debug_stack as $debug_step)
{
$tmp = array();
$tmp['file'] = $debug_step['file'];
$tmp['call'] = "(L. ".$debug_step['line'].") ";
$tmp['call'] .= $debug_step['function'];
$tmp['call'] .= "(";
if (is_array($debug_step['args']))
$tmp['call'] .= implode(",", $debug_step['args']);
else if (is_string($debug_step['args']))
$tmp['call'] .= $debug_step['args'];
$tmp['call'] .= ")";
$debug_output[] = $tmp;
}
return $debug_output;
}
/**
* encode url
*
* @param string $p_value
* @return string
*/
function net_urlencode($p_value) {
$separator_car = "-";
$p_value = SuppAccents(html_entity_decode(trim($p_value),ENT_QUOTES));
$p_value = ereg_replace("[^[:alnum:]]", $separator_car, $p_value);
$p_value = ereg_replace("[-]+", $separator_car, $p_value);
return $p_value;
}
/**
* Usefull function to support multilanguage request.
*
* It change a "param_name" to "param_name_l1" for language 1 for example.
*
* @param string $param_name
* @param bool $p_for_insert (deprecated)
* @return string
*/
function multilang($param_name, $p_for_insert=FALSE) {
global $g_object_siteinformation;
$id_lang = "";
$g_object_siteinformation->getCurrentFrontLanguageId($id_lang);
//$id_lang = 1;
$result = $param_name."_l".$id_lang;
if ((!$p_for_insert) && ($id_lang != 1)) {
if ($g_object_siteinformation->isAdmin())
$result = " IFNULL(".$result.", CONCAT('non traduit :',".$param_name."_l1)) ";
else
$result = " IFNULL(".$result.", ".$param_name."_l1) ";
return $result;
}
/*
if ($is_for_select && $id_lang != 1)
$result = " COALESCE(".$result.",CONCAT('NT:',".$param_name."_l1)) ";
return $result;
*/
return $result;
}
/**
* A Smarty bloc forcing to not use cache
*
* @param array $param
* @param string $content
* @param Smarty_custom $smarty
* @return string
*/
function smarty_bloc_dynamique($param, $content, &$smarty) {
global $smarty_bloc_not_cached_old_tpl_vars;
if (isset($param['design_id']) && isset($param['page_id'])) {
if (is_null($content)) {
// premier passage dans la fonction BLOC
//echo("!START NO-CACHE!");
global $g_object_loader;
//$object_smarty =& $g_object_loader->getSmarty_Custom();
$object_tpage =& $g_object_loader->getTPageFo();
// $smarty_bloc_not_cached_old_tpl_vars = $object_smarty->_tpl_vars;
$smarty_bloc_not_cached_old_tpl_vars = $smarty->_tpl_vars;
/** Le cas de isnotset si dessus est possible pour un not_cached dans une page
* il ne s'agit pas d'un problème, mais il ne faut pas chercher les infos pour un
* include car sinon le tableau renvoyé est vide
* **/
if (isset($object_tpage->m_array_link_data[$param['page_id']]))
$smarty->_tpl_vars = array_merge($object_tpage->m_array_link_data[$param['page_id']]
, $smarty->m_tpl_var_for_all);
// $object_smarty->_tpl_vars = array_merge($object_tpage->m_array_link_data[$param['page_id']]
// , $object_smarty->m_tpl_var_for_all);
$smarty->assign('design_id', $param['design_id']);
//$smarty->assign('page_id', $param['page_id']);
} else{
//echo("!END NO-CACHE!");
$smarty->_tpl_vars = $smarty_bloc_not_cached_old_tpl_vars;
}
}
return $content;
}
// hander pour la protection des Adresses mail
/**
* Protect email
*
* @param string $tpl_output
* @param Smarty_custom $smarty
* @return string
*/
function protect_email($tpl_output, &$smarty)
{
// $tpl_output =
// preg_replace('!([_a-z0-9-]+)@([a-zA-Z0-9\.\-]+\.([a-zA-Z]{2,3}|[0-9]{1,3}))!',
// '$1@$2', $tpl_output);
return $tpl_output;
}
/**
* Print an integer in byte
*
* @param integer $p_param Value in Octets
* @return string
*/
function print_byte($p_param) {
$array_convertion = array(0 => "o", 1024 => "Ko", 1048576 => "Mo", 1073741824 => "Go");
$ext = $array_convertion[0];
$divide = 0;
foreach($array_convertion as $key => $value) {
if ($p_param >= $key) {
$ext = $array_convertion[$key];
$divide = $key;
} else {
break;
}
}
if ($divide > 0)
$p_param = round($p_param/$divide, 3);
return $p_param." ".$ext;
}
/**
* Print formated weight
*
* @param integer $p_param
* @return string
*/
function print_weight($p_param) {
global $g_object_loader;
$weight_format = "";
$object_weight_format =& $g_object_loader->getTGlobalScopeVariable();
$object_weight_format->getWeightFormat($weight_format);
if ((!(isset($p_param))) || (!(is_numeric($p_param)))) {
$weight_string = $weight_format['null']['symbol'];
} else {
if (1000>$p_param) {
$weight_string = sprintf("%.".str_replace('%', '%%',$weight_format['gr']['nof_decimal'])."f ", $p_param);
$weight_string = str_replace(".", $weight_format['gr']['decimal_separator'], $weight_string).$weight_format['gr']['symbol'];
} else {
if (1000000>$p_param) {
$weight_string = sprintf("%.".str_replace('%', '%%',$weight_format['kg']['nof_decimal'])."f ", $p_param/1000);
$weight_string = str_replace(".", $weight_format['kg']['decimal_separator'], $weight_string).$weight_format['kg']['symbol'];
} else {
$weight_string = sprintf("%.".str_replace('%', '%%',$weight_format['t']['nof_decimal'])."f ", $p_param/1000000);
$weight_string = str_replace(".", $weight_format['t']['decimal_separator'], $weight_string).$weight_format['t']['symbol'];
}
}
}
return $weight_string;
}
/**
* Print a price from a float
*
* @param float $p_param
* @return string
*/
function print_price($p_param) {
//echo_net($p_param);
global $g_object_loader;
$price_format = "";
$object_price_format =& $g_object_loader->getTGlobalScopeVariable();
$object_price_format->getPriceFormat($price_format);
global $g_object_siteinformation;
//echo_net("($p_param)");
if ((!(isset($p_param))) || (!(is_numeric($p_param)) )) {
$price_string = $price_format['symbol_null'];
} else {
if ((0 == $p_param) && (!($g_object_siteinformation->isAdmin()))) {
$price_string = $price_format['symbol_free'];
} else {
//echo($p_param);
$price = explode(".", $p_param, 2); // $price[0]=Partie entière; $price[1]=partie décimale
// Séparateur de milliers
$price[0] = strrev($price[0]);
$price[0] = wordwrap($price[0], 3, $price_format['hundred_separator'], 1);
$price[0] = strrev($price[0]);
// Nombre de décimales
$price[1]= isset($price[1])?substr($price[1],0,$price_format['number_of_decimal']):0;
$price[1] = str_pad($price[1], $price_format['number_of_decimal'], "0");
// Séparateur de décimales
// Symbole
$price_string = $price[0];
if (0<$price[1]) {
$price_string = $price_string.$price_format['decimal_separator'].$price[1];
}
$price_string = $price_string." ".$price_format['symbol'];
}
}
return $price_string;
}
/**
* Print an integer to the format 0.00%
*
* @param string $p_param Ex : 0.4
* @return string Ex : 0.40 %
*/
function print_perct($p_param) {
$default_value = "0";
$symbol = " %";
$nb_decimal = 2;
$decimal_separator = ".";
if ((!(isset($p_param))) || (!(is_numeric($p_param)))) {
$perct_string = $default_value.$symbol;
} else {
$perct = explode(".", $p_param, 2); // $perct[0]=Partie entière; $perct[1]=partie décimale
// Nombre de décimales
$perct[1]= isset($perct[1])?substr($perct[1],0,$nb_decimal):0;
$perct[1] = str_pad($perct[1], $nb_decimal, "0");
// Séparateur de décimales
// Symbole
$perct_string = $perct[0];
/*if (0<$price[1])*/ {
$perct_string = $perct_string.$decimal_separator.$perct[1];
}
$perct_string = $perct_string." ".$symbol;
}
return $perct_string;
}
/**
* Print price with 2 decimals
*
* @param unknown_type $p_param
* @return unknown
*/
function print_price_2dec($p_param) {
global $g_object_loader;
$price_format = "";
$object_price_format =& $g_object_loader->getTGlobalScopeVariable();
$object_price_format->getPriceFormat($price_format);
global $g_object_siteinformation;
if ((!(isset($p_param))) || (!(is_numeric($p_param)))) {
$price_string = $price_format['symbol_null'];
} else {
if ((0 == $p_param) && (!($g_object_siteinformation->isAdmin()))) {
$price_string = $price_format['symbol_free'];
} else {
$price = explode(".", $p_param, 2); // $price[0]=Partie entière; $price[1]=partie décimale
// Séparateur de milliers
$price[0] = strrev($price[0]);
$price[0] = wordwrap($price[0], 3, $price_format['hundred_separator'], 1);
$price[0] = strrev($price[0]);
// Nombre de décimales
$price_format['number_of_decimal'] = 2;
$price[1]= isset($price[1])?substr($price[1],0,$price_format['number_of_decimal']):0;
$price[1] = str_pad($price[1], $price_format['number_of_decimal'], "0");
// Séparateur de décimales
// Symbole
$price_string = $price[0];
/*if (0<$price[1])*/ {
$price_string = $price_string.$price_format['decimal_separator'].$price[1];
}
$price_string = $price_string." ".$price_format['symbol'];
}
}
return $price_string;
}
/**
* Print a string to the PLICI date format
*
* @param string $p_param
* @return string
*/
function print_date($p_param) {
global $g_object_loader;
$date_format = "";
$object_date_format =& $g_object_loader->getTGlobalScopeVariable();
$object_date_format->getDateFormat($date_format);
if (NULL != $p_param) {
$date_string = @date($date_format, strtotime($p_param));
} else {$date_string = " ";}
return $date_string;
}
/**
* Print an integer with day or days.
* Sample : 4 days, 0 day
*
* @param integer $p_param
* @return string
*/
function print_day($p_param) {
if ($p_param>1)
return $p_param." ".plici_lang('lang_str_days');
else
return $p_param." ".plici_lang('lang_str_day');
}
/**
* Retreive from an id the convert string in the good language
*
* @param string $p_id
* @param array $params
* @param string $p_type
* @return string
*/
function plici_lang($p_id, $params = array(), $p_type = "TPL") {
global $plici_by_pass_tlang_for_webhosting, $g_lang_access_db;
if (!isset($g_lang_access_db))
$g_lang_access_db = true;
if (($plici_by_pass_tlang_for_webhosting == true) || ($g_lang_access_db == false))
return $p_id;
$not_used = array();
$params = array_merge(array('id'=>$p_id, 'tp'=>$p_type), $params);
return x_smarty_function_plici_lang($params, $not_used, false);
}
/**
* Print a string translated in the current language from smarty
*
* @access private
* @param array $params
* @param Smarty_custom $smarty
* @param bool $print_stdout
* @return string
*/
function x_smarty_function_plici_lang($params, &$smarty, $print_stdout = true)
{
// on recupère la valeur de l'id
$id = getFromArray('id', $params, '');
if ('' == $id)
return;
// on recupère la valeur du type
$tp = getFromArray('tp', $params, '');
if ('' == $tp) $tp = "TPL";
// on realise le tableau pour le sprintf
unset($params['id']);
unset($params['tp']);
global $g_object_loader;
$object_tlang =& $g_object_loader->getTLang();
$string = $object_tlang->getString($tp, $id);
//echo_net($string);
//trigger_error("$string, $params");
$string = str_replace('%', '%%', $string);
$string = str_replace('%%VALEUR%%', '%s', $string);
if ($print_stdout) {
//trigger_error("$string, $params");
@vprintf($string, $params);
} else
return @vsprintf($string, $params);
return ;
}
/**
* delete a directory recursively
*
* @param array|string$p_array_dir
* @return bool TRUE on error
*/
function net_rmdir($p_array_dir) {
if (is_string($p_array_dir))
$p_array_dir = array($p_array_dir);
$there_is_an_error = false;
foreach($p_array_dir as $p_dir) {
$r_files = array();
if (net_scandir($p_dir, $r_files, false, "", "", true, array(), array(), false, false))
return true;
$r_files = array_reverse($r_files);
array_push($r_files, array('current_path' => $p_dir));
foreach($r_files as $value) {
if (file_exists($value['current_path'])) {
$last_car = substr($value['current_path'], strlen($value['current_path'])-1);
// trigger_error("last car = ".$last_car);
if ($last_car == "/") {
$name_for_test_link = substr($value['current_path'], 0, strlen($value['current_path'])-1);
// trigger_error("name for link test = ".$name_for_test_link);
}
if ($name_for_test_link != "" && is_link($name_for_test_link)) {
// trigger_error("is a link");
if (!@unlink($name_for_test_link)) {
$there_is_an_error = true;
}
} else if (is_dir($value['current_path'])) {
// trigger_error("is a dir");
if (!@rmdir($value['current_path'])) {
$there_is_an_error = true;
}
} else {
// trigger_error("is a unlink");
if (!@unlink($value['current_path'])) {
$there_is_an_error = true;
}
}
}
}
}
return $there_is_an_error;
}
/**
* Scan a directory to list is files and directory (replace the php scan_dir function and add functionnalities)
*
* @param string $dir
* @param array $r_files
* @param bool $p_only_path
* @param string $parent_dir
* @param string $filename_for_not_copy_directory
* @param bool $recurse_sub_folder
* @param array $exclude_dirs
* @param array $p_directory_not_parsed
* @param bool $p_get_filie_size
* @param bool $p_not_get_symbolic_links
* @param false $p_echo
* @param integer $p_deep
* @return true on error, else false
*/
function net_scandir(
$dir,
&$r_files,
$p_only_path = false,
$parent_dir = "",
$filename_for_not_copy_directory = "",
$recurse_sub_folder = true,
$exclude_dirs = array(),
$p_directory_not_parsed = array(".svn"=>"no"),
$p_get_filie_size = false,
$p_not_get_symbolic_links = true,
$p_echo = false,
$p_deep = 1) {
if ($p_echo) echo("\n");
$p_directory_not_parsed = array_merge($p_directory_not_parsed, array("."=>"no", ".."=>"no"));
$return_value = xnet_scandir($dir, $r_files, $p_only_path, $parent_dir, $filename_for_not_copy_directory, $recurse_sub_folder,
$exclude_dirs, $p_directory_not_parsed, $p_get_filie_size, $p_not_get_symbolic_links, $p_echo, $p_deep);
if (!function_exists("sw_cmp_order_net_scan_dir")) {
function sw_cmp_order_net_scan_dir($a, $b)
{
return strcmp($a['current_path'], $b['current_path']);
}
}
usort($r_files, "sw_cmp_order_net_scan_dir");
return $return_value;
}
/**
* List of file into a folder and sub folder
* $exclude_dirs = Keys are the dirs to excludes
*
* @access private
* @param string $dir
* @param array $r_files
* @param bool $p_only_path
* @param string $parent_dir
* @param stirng $filename_for_not_copy_directory
* @param bool $recurse_sub_folder
* @param array $exclude_dirs
* @param array $p_directory_not_parsed
* @param bool $p_get_filie_size
* @param bool $p_not_get_symbolic_links
* @param bool $p_echo
* @param integer $p_deep
* @return bool TRUE on error
*/
function xnet_scandir(
$dir,
&$r_files,
$p_only_path,
$parent_dir,
$filename_for_not_copy_directory,
$recurse_sub_folder,
$exclude_dirs,
$p_directory_not_parsed,
$p_get_filie_size,
$p_not_get_symbolic_links,
$p_echo = false,
$p_deep = 1) {
if (!is_dir($dir))
return false;
$dh = opendir($dir);
$tmp_r_files = array();
$break_because_file_not_copy_finded = false;
while (false !== ($filename = readdir($dh))) {
if (($filename_for_not_copy_directory == $filename)&&($filename_for_not_copy_directory != "")){
$break_because_file_not_copy_finded = true;
$tmp_r_files = array();
break;
}
if ($p_not_get_symbolic_links && is_link($dir.$filename)) {
if ($p_echo)
echo("Excluded SymLink : ".$dir.$filename."\n");
continue;
}
// echo_net($filename);
// echo($p_directory_not_parsed[$filename]);
if (isset($p_directory_not_parsed[$filename]) && (is_dir($dir.$filename."/") || is_link($dir.$filename."/"))) {
if ($p_echo && $filename != "." && $filename != ".." && $filename != ".svn")
echo("Excluded : ".$dir.$filename."\n");
continue;
}
if (is_dir($dir.$filename)) {
$informations = array();
$informations['name'] = $filename;
$informations['parent_dir'] = $parent_dir;
$informations['type'] = "directory";
$informations['current_path'] = $dir.$filename."/";
$informations['deep'] = $p_deep;
if ($p_only_path == false) {
array_push($tmp_r_files,$informations);
} else {
//array_push($tmp_r_files,$informations['current_path']);
}
//echo($informations['current_path']."\n");
if (!is_link($dir.$filename) && $recurse_sub_folder && (!isset($exclude_dirs[$informations['current_path']])) && !is_link($informations['current_path'])) {
xnet_scandir($informations['current_path'], $tmp_r_files, $p_only_path, $filename,
$filename_for_not_copy_directory, $recurse_sub_folder, $exclude_dirs,
$p_directory_not_parsed, $p_get_filie_size, $p_not_get_symbolic_links, $p_echo, $p_deep+1);
} else {
if ($p_echo)echo("Excluded : ".$informations['current_path']."\n");
}
} else {
$informations = array();
$informations['name'] = $filename;
$informations['parent_dir'] = $parent_dir;
$informations['type'] = "file";
$informations['current_path'] = $dir.$filename;
$informations['deep'] = $p_deep;
$pathinfo = pathinfo($informations['current_path']);
if (isset($pathinfo["extension"]))
$informations['extension'] = $pathinfo["extension"];
else
$informations['extension'] = '';
if ($p_get_filie_size)
$informations['size'] = filesize($informations['current_path']);
if ($p_only_path == false) {
array_push($tmp_r_files,$informations);
} else {
array_push($tmp_r_files,$informations['current_path']);
}
}
}
if (sizeof($tmp_r_files)>0)
foreach($tmp_r_files as $value)
array_push($r_files, $value);
else if ($break_because_file_not_copy_finded)
/* le repertoire ne doit pas etre listé pour cause de fichier "not copy"*/
array_pop($r_files);
closedir($dh);
//sort($files);
return false;
}
/**
* Create the symbolic link for PLICI
*
* @ deprecated Not used
* @ param bool $echo
* @ return bool TRUE on error
function createDocRootSymbolicLink ($echo = true) {
global $_PLICI_CFG;
$all_is_ok = true;
$docRoot = $_SERVER["DOCUMENT_ROOT"]."/";
if (file_exists($_SERVER["DOCUMENT_ROOT"]))
if (!createSymbolicLinksForPlici($docRoot, $echo))
$all_is_ok = false;
if ($all_is_ok)
if ($echo) echo("\n Links created successfully");
return $all_is_ok;
}
*/
/**
function createViewSymbolicLink ($echo = true) {
global $_PLICI_CFG;
$all_is_ok = true;
if (file_exists($_PLICI_CFG['racine_web']."/".PLICI_VIEW_SITES_DIRECTORY."/"))
if (!createSymbolicLinksForPlici($_PLICI_CFG['racine_web']."/".PLICI_VIEW_SITES_DIRECTORY."/", $echo))
$all_is_ok = false;
if ($all_is_ok)
if ($echo) echo("\n Links created successfully");
return $all_is_ok;
}
* Create picture external symbolic links
*
* @ deprecated Not used
* @ param bool $echo
* @ return bool TRUE on error
*/
/*
function createPictureExtSymbolicLink($echo = true) {
global $_PLICI_CFG;
$r_files = array();
$all_is_ok = true;
net_scandir($_PLICI_CFG['racine_web']."/".PLICI_VIEW_SITES_MY_DIRECTORY."/", $r_files, false, "", "", false);
array_push($r_files, array(
'type' => 'directory',
'current_path' => $_PLICI_CFG['racine_web']."/".PLICI_VIEW_SITES_FOR_PLICI_ADMIN_PLICI_DIRECTORY
));
foreach($r_files as $value) {
if ($value['type'] == 'directory') {
if (file_exists($value['current_path']."/".PLICI_PICTURE_EXT_DIRECTORY."/"))
if (!createSymbolicLinksForPlici($value['current_path']."/".PLICI_PICTURE_EXT_DIRECTORY."/", $echo))
$all_is_ok = false;
}
}
if ($all_is_ok)
if ($echo) echo("\n Links created successfully");
return $all_is_ok;
}
function createSymbolicLinksForPlici($p_base_dir, $echo = true) {
global $_PLICI_CFG;
$all_is_ok = true;
$directory_to_create = $p_base_dir."/core";
if (!((file_exists($directory_to_create) && is_dir($directory_to_create)) || @mkdir($directory_to_create))) {
if ($echo) echo("\n Error creating directory '".$directory_to_create."'.");
$all_is_ok = false;
}
$link_one_link = $p_base_dir."/core/entrees";
if (str_replace("//","/",$_PLICI_CFG['racine_web']."/core/entrees/") != str_replace("//","/",$link_one_link)."/")
if (!((file_exists($link_one_link) && is_link($link_one_link)) || @symlink( $_PLICI_CFG['racine_web']."/core/entrees/", $link_one_link ))) {
if ($echo) echo("\n Error creating link ".$link_one_link." to ".$_PLICI_CFG['racine_web']."/core/entrees/");
$all_is_ok = false;
}
$link_two_link = $p_base_dir."/view";
if (str_replace("//","/",$_PLICI_CFG['racine_web']."/view/") != str_replace("//","/",$link_two_link."/"))
if (!((file_exists($link_two_link) && is_link($link_two_link)) || @symlink ( $_PLICI_CFG['racine_web']."/view/", $link_two_link ))) {
if ($echo) echo("\n Error creating link ".$link_two_link." to ".$_PLICI_CFG['racine_web']."/view/");
$all_is_ok = false;
}
return $all_is_ok;
}
*/
/*
function createSymbolicLinkPliciWebSite($site_name, $admin_site_name, $echo = true) {
return xCreateSymbolicLinkWebSite($site_name, $admin_site_name, $echo, "for_plici");
}
function createSymbolicLinkMyWebSite($site_name, $admin_site_name, $echo = true) {
return xCreateSymbolicLinkWebSite($site_name, $admin_site_name, $echo, "my");
}
function xCreateSymbolicLinkWebSite($site_name, $admin_site_name, $echo = true, $p_for_plici_or_my) {
global $_PLICI_CFG;
$all_is_ok = true;
if ($p_for_plici_or_my == "my") {
$array_base_dir = array (
$_PLICI_CFG['racine_web']."/".PLICI_VIEW_SITES_MY_DIRECTORY."/".$site_name."/".$admin_site_name,
$_PLICI_CFG['racine_web']."/".PLICI_VIEW_SITES_MY_DIRECTORY."/".$site_name,
);
} else {
$array_base_dir = array (
$_PLICI_CFG['racine_web']."/".PLICI_VIEW_SITES_FOR_PLICI_DIRECTORY."/".$site_name."/".$admin_site_name,
$_PLICI_CFG['racine_web']."/".PLICI_VIEW_SITES_FOR_PLICI_DIRECTORY."/".$site_name,
);
}
foreach($array_base_dir as $base_dir) {
if (!createSymbolicLinksForPlici($base_dir, $echo))
$all_is_ok = false;
}
if ($all_is_ok)
if ($echo) echo("\n Links created successfully");
return $all_is_ok;
}
*/
/**
* Put a string into a file
*
* @param string $filename
* @param string $data_string
* @return bool TRUE on error
*/
function net_file_put_contents($filename, $data_string){
$ressource = @fopen($filename, "w");
if ($ressource === FALSE) {
return true;
}
flock($ressource, LOCK_EX);
fwrite($ressource, $data_string);
flock($ressource, LOCK_UN);
fclose($ressource);
return false;
}
/**
* Generate a random password
*
* @param integer $length
* @return string
*/
function generatePassword ($length = 8)
{
// start with a blank password
$password = "";
// define possible characters
$possible = "0123456789bcdfghjkmnpqrstvwxyz";
// set up a counter
$i = 0;
// add random characters to $password until $length is reached
while ($i < $length) {
// pick a random character from the possible ones
$char = substr($possible, mt_rand(0, strlen($possible)-1), 1);
// we don't want this character if it's already in the password
if (!strstr($password, $char)) {
$password .= $char;
$i++;
}
}
// done!
return $password;
}
/**
* Delete database cache (/bd/my/website/*.already_made) for a specific website
*
* @param unknown_type $p_database
* @param unknown_type $p_racine_web_path
* @param unknown_type $echo
* @return unknown
*/
function deleteCacheForMyDatabase($p_database, $p_racine_web_path, $echo = true) {
return xDeleteCacheForDatabase($p_database, $p_racine_web_path, $echo, "my");
}
/**
* Delete database cache (/bd/for_plici/website/*.already_made) for a specific website
*
* @param unknown_type $p_database
* @param unknown_type $p_racine_web_path
* @param unknown_type $echo
* @return unknown
*/
function deleteCacheForPliciDatabase($p_database, $p_racine_web_path, $echo = true) {
return xDeleteCacheForDatabase($p_database, $p_racine_web_path, $echo, "for_plici");
}
/**
* Delete the database script cache (already made)
*
* @access private
* @param string $p_database
* @param string $p_racine_web_path
* @param bool $echo
* @param string $p_my_or_plici
*/
function xDeleteCacheForDatabase($p_database, $p_racine_web_path, $echo = true, $p_my_or_plici = "") {
if ($echo)echo("Deleting lock files for '".$p_database."' in '$p_my_or_plici'");
global $_PLICI_CFG;
if (isset($_PLICI_CFG['superadmin_databasename']) && ($p_database == $_PLICI_CFG['superadmin_databasename'])
)
$p_database = "admin_super";
// else
// {if ($echo)echo("deleteCacheForDatabase");die();}
if ($p_my_or_plici == 'my') {
$cache_dir_to_delete = $p_racine_web_path."/".PLICI_BD_MY_DIRECTORY."/".$p_database."/";
} else
$cache_dir_to_delete = $p_racine_web_path."/".PLICI_BD_FOR_PLICI_DIRECTORY."/".$p_database."/";
$result_file = array();
net_scandir($cache_dir_to_delete, $result_file);
foreach($result_file as $key => $value) {
if ($value["extension"] == "already_made") {
if ($echo)echo("\n Deleting file : ".$value['name']);
unlink($value['current_path']);
}
}
if (sizeof($result_file) == 0)
if ($echo)echo("\n Nothing to delete");
if ($echo)echo ("\n ");
}
/**
* Delete all cache (/tmp/website/) for a specific website
*
* @param string $p_web_site_name
* @param string $p_racine_web_path
* @param bool $echo
*/
function deleteCompleteCacheForWebSite($p_web_site_name, $p_racine_web_path, $echo = true) {
$cache_dir_to_delete = $p_racine_web_path."/tmp/".$p_web_site_name.'/';
// delete the host cache
if (file_exists($p_racine_web_path."/tmp/host.cache"))
@unlink($p_racine_web_path."/tmp/host.cache");
if ($echo)echo("\n Deleting complete cache dir for website:".$p_web_site_name." :");
$result_file = array();
net_scandir($cache_dir_to_delete, $result_file);
foreach($result_file as $key => $value) {
if ($echo)echo(".");
unlink($value['current_path']);
}
if (sizeof($result_file) == 0)
if ($echo)echo("\n Nothing to do");
if ($echo)echo ("\n ");
}
/**
* Delete Smarty file cache (/tmp/websitename/cache/websitename/) for a specific website
*
* @param string $p_web_site_name
* @param string $p_racine_web_path
* @param bool $echo
*/
function deleteCacheForWebSite($p_web_site_name, $p_racine_web_path, $echo = true) {
$cache_dir_to_delete = $p_racine_web_path."/tmp/".$p_web_site_name."/cache/".$p_web_site_name.'/';
// delete the host cache
$host_file_cache = $p_racine_web_path."/tmp/host.cache";
if (file_exists($host_file_cache))
@unlink($host_file_cache);
if ($echo)echo("\n Deleting cache dir for website:".$p_web_site_name." :");
$result_file = array();
net_scandir($cache_dir_to_delete, $result_file);
foreach($result_file as $key => $value) {
if ($echo)echo(".");
unlink($value['current_path']);
}
if (sizeof($result_file) == 0)
if ($echo)echo("\n Nothing to do");
if ($echo)echo ("\n ");
}
/**
* Copy a directory to another
*
* @param string $base_src
* @param string $base_dest
* @param array $extension_to_copy Becareful sample $array ('html'=>'OK', 'php'=>'OK')
* @param string $filename_for_not_copy_directory
* @param bool $is_no_error_if_file_exist_and_no_overwrite
* @return bool TRUE on error
*/
function net_copy($base_src, $base_dest, $extension_to_copy,
$filename_for_not_copy_directory = ".not_copy_this_directory", $is_no_error_if_file_exist_and_no_overwrite = false) {
if (!file_exists($base_dest))
if (net_mkdirs($base_dest) === FALSE) {
return true;
}
$sub_dir_and_files = array();
if (!file_exists($base_src))
return true;
net_scandir($base_src, $sub_dir_and_files, false, "", $filename_for_not_copy_directory);
foreach($sub_dir_and_files as $value) {
if ((sizeof($extension_to_copy) == 0) || ($extension_to_copy[$value['extension']] == 'OK')) {
// transformation du chemin pour créer le path de destination
$value['current_path_dest'] = str_replace($base_src, $base_dest, $value['current_path']);
//echo($value['current_path_dest']."\n ");
// copie
if ($value['type'] == 'directory'){
if (file_exists($value['current_path_dest']) && is_dir($value['current_path_dest'])) {
//echo("Already exist directory ".$value['current_path_dest'].", is OK\n ");
;
} else if (net_mkdirs($value['current_path_dest']) == FALSE){
echo("Error creating the directory :".$value['current_path_dest']."\n ");
return true;
}
} else if ($value['type'] == 'file') {
if ($is_no_error_if_file_exist_and_no_overwrite && file_exists($value['current_path_dest'])){
//echo("Already exist file ".$value['current_path_dest'].", is OK\n ");
continue;
}
if (!file_exists(dirname($value['current_path_dest']))) {
//echo("Directories doesn't exist, then create it ".dirname($value['current_path_dest'])."\n ");
net_mkdirs(dirname($value['current_path_dest']));
}
if (copy($value['current_path'], $value['current_path_dest']) == FALSE) {
echo("Error copying ".$value['current_path']." to ".$value['current_path_dest']."\n ");
return true;
}
}
//echo(".");
}
}
return false;
}
/**
* Generate a unique id (35 characters)
*
* @return unknown
*/
function generateUniqueId() {
return md5(uniqid(rand(), true));
}
/**
* No return new directory, only return the actual admin dir.
* @todo It is really wath we need ?
*
* @return string
*/
function getNewAdminSuperDirectory() {
global $_PLICI_CFG;
$base_directory = $_PLICI_CFG['racine_web'].'/'.PLICI_VIEW_SITES_FOR_PLICI_ADMIN_PLICI_DIRECTORY.'/';
$result = array();
net_scandir($base_directory, $result, false, "", "", false);
$already_moved_to = "";
foreach($result as $key => $value) {
if (substr($value['name'], 0, 7) == 'admins_') {
$already_moved_to = $value['name'];
}
}
return $already_moved_to;
}
/**
* Find the admin directory of a web site
*
* @param string $p_dbname
* @return string
*/
function getAdminDirectory($p_dbname) {
global $_PLICI_CFG;
$base_directory = $_PLICI_CFG['racine_web'].'/'.PLICI_VIEW_SITES_MY_DIRECTORY.'/'.$p_dbname.'/';
$result = array();
net_scandir($base_directory, $result, false, "", "", false);
$already_moved_to = "";
foreach($result as $key => $value) {
if (substr($value['name'], 0, 6) == 'admin_') {
$already_moved_to = $value['name'];
}
}
return $already_moved_to;
}
/**
* Replace in files
*
* @param array $array_files_to_parse
* @param array $parameters
* @param string $suffix_for_file_generated
* @return bool TRUE on error
*/
function replace_in_files($array_files_to_parse, $parameters, $suffix_for_file_generated = "") {
foreach($array_files_to_parse as $filename) {
// on va parser les fichiers qui en ont besoin
$string_to_parse = file_get_contents($filename);
if ($string_to_parse === FALSE)
return true;
foreach($parameters as $key => $value)
$string_to_parse = str_replace($key, $value,$string_to_parse);
$ressource = fopen($filename.$suffix_for_file_generated, "w");
if ($ressource === FALSE)
return true;
flock($ressource, LOCK_EX);
fwrite($ressource, $string_to_parse);
flock($ressource, LOCK_UN);
fclose($ressource);
//file_put_contents(, $string_to_parse);
//echo(".");
}
return false;
}
/**
* Transform a string
*
* @param string $insert_for_admin_super
* @param array $parameters
* @return string
*/
function transformWithParameters($insert_for_admin_super ,$parameters) {
foreach ($parameters as $key => $value)
$insert_for_admin_super = str_replace($key, $value, $insert_for_admin_super);
return $insert_for_admin_super;
}
/**
* Transform a string and write it
*
* @param string $string
* @param array $parameters [to_change]=>"change by"
* @param string $filename
*/
function transformStringAndWriteToFile($string, $parameters, $filename) {
$string = transformWithParameters($string ,$parameters);
$ressource = fopen($filename, "w");
flock($ressource, LOCK_EX);
fwrite($ressource, $string);
flock($ressource, LOCK_UN);
fclose($ressource);
}
/**
* run an SQL script file
*
* @param string $file_path
* @param resource $mysql_link
* @param string $end_line
* @return bool TRUE on error
*/
function mysql_execute_script($file_path, &$mysql_link, $end_line = " ") {
$sql_to_play = file_get_contents($file_path);
return mysql_execute_multiplerequest($sql_to_play, $mysql_link, $end_line);
}
/**
* execute multiple SQL requests in a string
* BECAREFULL : She is also declared in databaseconnexion object
*
* @param string $sql_to_play
* @param resource $mysql_link
* @param string $end_line
* @return bool TRUE on error
*/
function mysql_execute_multiplerequest($sql_to_play, &$mysql_link, $end_line = " ") {
$all_is_ok = true;
$next_request = "";
$i_am_in_quote = false;
$last_start = 0;
$array_request = array();
$is_car_inhibiter = false;
$remember_initial_quote = '';
$waiting_for_possible_comment = true;
$first_comment_finded = false;
$second_comment_finded = false;
for($i=0; $i<strlen($sql_to_play);$i++) {
if (!$i_am_in_quote) {
if ($second_comment_finded && $sql_to_play[$i] == "\n"){
$last_start = $i+1;
} else if ($second_comment_finded) {
continue;
}
if ($sql_to_play[$i] == "\n") {
$waiting_for_possible_comment = true;
$first_comment_finded = false;
$second_comment_finded = false;
} else if ($waiting_for_possible_comment && $sql_to_play[$i] == "-") {
if ($first_comment_finded)
$second_comment_finded = true;
else
$first_comment_finded = true;
} else if ($sql_to_play[$i] != " " && $sql_to_play[$i] != "\t") {
$waiting_for_possible_comment = false;
$first_comment_finded = false;
$second_comment_finded = false;
} else {
$first_comment_finded = false;
$second_comment_finded = false;
}
}
if ($is_car_inhibiter) {
$is_car_inhibiter = false;
// echo_net("inhibiter to FALSE ".$sql_to_play[$i]." (remembered quote :".$remember_initial_quote.")");
continue;
}
if ($sql_to_play[$i] == "\\") {
$is_car_inhibiter = true;
// echo_net("inhibiter to TRUE ".$sql_to_play[$i]." (remembered quote :".$remember_initial_quote.")");
} else {
if (($remember_initial_quote == "") && (($sql_to_play[$i] == "'") || ($sql_to_play[$i] == '"'))){
$i_am_in_quote = true;
$remember_initial_quote = $sql_to_play[$i];
// echo_net("STARTING quote : ".$sql_to_play[$i]." (remembered quote :".$remember_initial_quote.")");
} else if (($remember_initial_quote != '') && ($sql_to_play[$i] == $remember_initial_quote )) {
$i_am_in_quote = false;
// echo_net("ENDING quote : ".$sql_to_play[$i]." (remembered quote :".$remember_initial_quote.")");
$remember_initial_quote = '';
} else if (($sql_to_play[$i] == ";") && !$i_am_in_quote) {
$new_request = substr($sql_to_play, $last_start, $i+1-$last_start);
$new_request = trim(ereg_replace("/^[ \n\r\t]*/i", "", $new_request));
// on desactive les LOCK TABLES
if (preg_match('/^LOCK[\s]+TABLES/i', $new_request) || preg_match('/^UNLOCK[\s]+TABLES[\s]*;/i', $new_request))
$new_request = "";
if ($new_request != "" && $new_request != ";") {
$mysql_result = mysql_query($new_request, $mysql_link);
if (!$mysql_result) {
echo("\n\n ERROR mysql_execute_multiplerequest : ".mysql_error($mysql_link)." for request ".$new_request." Link :".$mysql_link." ");
trigger_error(" ERROR mysql_execute_multiplerequest : ".mysql_error($mysql_link)." for request ".$new_request." Link :".$mysql_link." ");
$all_is_ok = false;
} else {
//echo_net(".");
}
}
array_push($array_request, $new_request);
$last_start = $i+1;
// echo_net("finded ;"." (remembered quote :".$remember_initial_quote.")");
// echo_net("Making string ".$new_request." (remembered quote :".$remember_initial_quote.")");
} else {
// echo_net("car not used : ".$sql_to_play[$i]." (remembered quote :".$remember_initial_quote.")");
}
}
// echo("\n");
}
// print_r_net($array_request);
return $all_is_ok;
}
global $g_plici_connexion_pool;
$g_plici_connexion_pool = array();
/**
* Find the link to connect to a database
*
* @param string $database_name
* @param string $p_dbc_inherited_sitename Inherited site name
* @return resource
*/
function get_mysql_link_for_database($database_name, &$p_dbc_inherited_sitename) {
//trigger_error("asking connection for $database_name.");
global $g_plici_connexion_pool;
global $_PLICI_CFG;
if ($database_name == "admin_super")
$database_name = $_PLICI_CFG['superadmin_databasename'];
//trigger_error(print_r($g_plici_connexion_pool, true));
if (isset($g_plici_connexion_pool[$database_name])) {
//trigger_error("Connection exist.");
if($result = mysql_query("SELECT DATABASE();", $g_plici_connexion_pool[$database_name]['link'])) {
$row = mysql_fetch_row($result);
//if(mysql_ping($g_plici_connexion_pool[$database_name]['link'])) {
// i must select the bd because mysql_connect can give me same link but i need it for
// another BD
if ($row[0] <> $database_name) {
$selected_is_ok = mysql_select_db($database_name, $g_plici_connexion_pool[$database_name]['link']);
//trigger_error("mysql_select_db($database_name, ".$g_plici_connexion_pool[$database_name]['link'].")");
if (!$selected_is_ok) {
//trigger_error("mysql_select_db OK");
} else {
//trigger_error("mysql_select_db BAD");
}
} else {
//trigger_error("mysql_select_db not needed connected and database selected is ".$row[0]);
}
//trigger_error("already connected to $database_name:)\n");
$p_dbc_inherited_sitename = $g_plici_connexion_pool[$database_name]['dbc_inherited_sitename'];
// on set dans une variable globale la connection courrante
// pour les scripts
global $run_db_directory_current_link;
$run_db_directory_current_link = $g_plici_connexion_pool[$database_name]['link'];
return $g_plici_connexion_pool[$database_name]['link'];
}
}
//trigger_error("CREATING connection $database_name :( \n");
$link_for_database = "";
$p_dbc_inherited_sitename = "";
$all_is_ok = true;
// correction pour OVH car trop de requete sur autre bd je pense (enfin a voir pas sûr)
$admin_mysql_link =&
plici_mysql_connect($_PLICI_CFG['superadmin_hostname'],
$_PLICI_CFG['superadmin_username'], $_PLICI_CFG['superadmin_password'], 10, true);
if ($admin_mysql_link === FALSE) {
echo("ERROR get_mysql_link_for_database: connect error \n");
trigger_error("ERROR get_mysql_link_for_database: connect error \n");
return "error";
}
//trigger_error("mysql_select_db(".$_PLICI_CFG['superadmin_databasename'].", ".$admin_mysql_link.")");
$_3d6f_loc_select_db_is_ok = mysql_select_db($_PLICI_CFG['superadmin_databasename'], $admin_mysql_link);
if ($database_name != $_PLICI_CFG['superadmin_databasename']) {
$request = "SELECT dbc_dblogin, dbc_dbpass, dbc_dbhost, dbc_inherited_sitename FROM databaseconnect WHERE dbc_dbname = '$database_name' and dbc_dblogin <> 'ALIAS';";
//trigger_error($request);
$result = mysql_query($request , $admin_mysql_link);
if (!$result){
echo("ERROR get_mysql_link_for_database: mysql_query \n");
trigger_error("ERROR get_mysql_link_for_database: mysql_query ");
$all_is_ok = false;
}
$row = mysql_fetch_assoc($result);
mysql_close($admin_mysql_link);
$p_dbc_inherited_sitename = $row["dbc_inherited_sitename"];
//trigger_error("mysql_connect(".$_PLICI_CFG['superadmin_hostname'].", ".$row["dbc_dblogin"].", ".$row["dbc_dbpass"].")");
//trigger_error($row["dbc_dbhost"]." - ".$row["dbc_dblogin"]." - ".$row["dbc_dbpass"]);
// on place un mysql_connect en forçant une nouvelle connextion car sinon, si login et pass et host
// sont identiques on va avoir les même id de connexion et dans les script de update_database
// quand on utilise l'id de connexion pour le super admin, on sera pas peut être plus sur la bonne bd.
$link_for_database =& plici_mysql_connect($row["dbc_dbhost"], $row["dbc_dblogin"], $row["dbc_dbpass"], 10, true);
if ($link_for_database === FALSE){
echo("ERROR get_mysql_link_for_database: can't connect \n");
trigger_error("ERROR get_mysql_link_for_database: can't connect ");
$all_is_ok = false;
} else {
//trigger_error("mysql_select_db(".$database_name.", ".$link_for_database.")");
if (mysql_select_db($database_name, $link_for_database) === FALSE) {
echo("ERROR get_mysql_link_for_database: can't select db '$database_name' ".mysql_error($link_for_database)." \n");
trigger_error("ERROR get_mysql_link_for_database: can't select db '$database_name' ".mysql_error($link_for_database)." \n");
$all_is_ok = false;
}
//trigger_error("Connected to db : ".$database_name." ");
}
//trigger_error($link_for_database);
}
//trigger_error(sprintf ("current thread id is %d\n", mysql_thread_id()));
if ($all_is_ok) {
$g_plici_connexion_pool[$database_name] = array();
if ($database_name == $_PLICI_CFG['superadmin_databasename']) {
$link_for_database =& $admin_mysql_link;
$g_plici_connexion_pool[$database_name]['dbc_inherited_sitename'] = "";
$g_plici_connexion_pool[$database_name]['link'] = &$admin_mysql_link;
} else {
$g_plici_connexion_pool[$database_name]['dbc_inherited_sitename'] = $p_dbc_inherited_sitename;
$g_plici_connexion_pool[$database_name]['link'] = &$link_for_database;
}
//trigger_error(print_r($g_plici_connexion_pool, true));
global $run_db_directory_current_link;
$run_db_directory_current_link = $link_for_database;
return $link_for_database;
} else
return "error";
}
/**
* Drop a database.
* BECAREFULL : Use it with care !
*
* @param string $host
* @param string $databasename
* @param string $login
* @param string $pass
* @param bool $echo
* @return bool TRUE on error
*/
function mysql_drop_database($host, $databasename, $login, $pass, $echo = true) {
// $_3d6f_loc_id_sql_admin_super = mysql_connect($host, $login, $pass);
// $_3d6f_loc_select_db_is_ok = mysql_select_db($databasename);
// mysql_list_tables();
if($echo)echo("Cleanning database '$databasename' \n");
$link = plici_mysql_connect($host, $login, $pass, 10, true);
if (!$link) {
if($echo)print 'Could not connect to mysql';
return true;
}
$result = mysql_list_tables($databasename, $link);
mysql_select_db($databasename, $link);
if (!$result) {
if($echo)print "DB Error, could not list tables\n";
if($echo)print 'MySQL Error: ' . mysql_error();
return true;
}
while ($row = mysql_fetch_row($result)) {
mysql_query("drop table ".$row[0].";", $link);
if($echo)echo("Drop table ".$row[0]." \n");
}
mysql_close($link);
return false;
}
/**
* Execute an SQL script an find the login to connect to the good database
*
* @param string $database_name
* @param string $script_filename
* @return bool TRUE on error
*/
function mysql_exec_script_and_search_login_from_admin (&$database_name, $script_filename) {
$all_is_ok = true;
$link_for_database = "";
$close_db = false;
//if ($database_name != "admin_super") {
// create a connection to the database
$link_for_database = "";
//trigger_error("get_mysql_link_for_database($database_name, $admin_mysql_link, $link_for_database);");
$not_used = "";
$link_for_database =& get_mysql_link_for_database($database_name, $not_used);
// echo_net($link_for_database);
$close_db = true;
//} else {
// $link_for_database = $admin_mysql_link;
//}
if ($all_is_ok)
$all_is_ok = mysql_execute_script($script_filename, $link_for_database);
// echo_net($link_for_database);
// mysql_close($link_for_database);
// echo_net($link_for_database." ENDED_PLOP");
return $all_is_ok;
}
global $_3d6f_loc_extention_already_done;
$_3d6f_loc_extention_already_done = ".already_made";
/**
* For {@link run_db_directory}, make vars
*
* @param array $_PLICI_CFG
* @param string $_3d6f_loc_bd_director_name
* @param string $_3d6f_loc_extention_must_be_redone
* @param array $_3d6f_loc_directory_to_redo
* @param array $_3d6f_loc_accepted_extension
* @param string $_3d6f_loc_racine_web_path
* @param string $_3d6f_loc_bd_path
*/
function getForRunDbDirectory($_PLICI_CFG, &$_3d6f_loc_bd_director_name, &$_3d6f_loc_extention_must_be_redone,
&$_3d6f_loc_directory_to_redo, &$_3d6f_loc_accepted_extension, &$_3d6f_loc_racine_web_path,
&$_3d6f_loc_bd_path) {
$_3d6f_loc_bd_director_name = "/bd/";
$_3d6f_loc_extention_must_be_redone = ".to_redo";
$_3d6f_loc_directory_to_redo = array('test_site'=>'redo', 'theme1com_site'=>'redo', 'theme2com_site'=>'redo');
$_3d6f_loc_accepted_extension = array('sql' => 'ok', 'php' => 'ok');
$_3d6f_loc_racine_web_path = $_PLICI_CFG['racine_web'];
$_3d6f_loc_bd_path = $_3d6f_loc_racine_web_path.$_3d6f_loc_bd_director_name;
}
/**
* Run the database scripts on /db/
*
* @param array $_PLICI_CFG
* @param string $p_unique_database_to_load
* @param string $p_br_or_n
* @param bool $p_is_simulation
* @return bool TRUE on error
*/
function run_db_directory($_PLICI_CFG, $p_unique_database_to_load = "", $p_br_or_n = " ", $p_is_simulation = false) {
if (isset($_PLICI_CFG['superadmin_databasename']) && $p_unique_database_to_load == $_PLICI_CFG['superadmin_databasename'])
$p_unique_database_to_load = "admin_super";
global $_3d6f_loc_extention_already_done;
$_3d6f_loc_bd_director_name = "";
$_3d6f_loc_extention_must_be_redone = "";
$_3d6f_loc_directory_to_redo = "";
$_3d6f_loc_accepted_extension = "";
$_3d6f_loc_racine_web_path = "";
$_3d6f_loc_bd_path = "";
$all_is_ok = true;
getForRunDbDirectory($_PLICI_CFG, $_3d6f_loc_bd_director_name, $_3d6f_loc_extention_must_be_redone,
$_3d6f_loc_directory_to_redo,$_3d6f_loc_accepted_extension, $_3d6f_loc_racine_web_path, $_3d6f_loc_bd_path);
// $_3d6f_loc_bd_director_name = "/bd/";
// $_3d6f_loc_extention_must_be_redone = ".to_redo";
// $_3d6f_loc_directory_to_redo = array('test_site'=>'redo', 'theme1com_site'=>'redo', 'theme2com_site'=>'redo'/*, 'graphiste_site'=>'redo'*/);
// $_3d6f_loc_accepted_extension = array('sql' => 'ok', 'php' => 'ok');
//$_3d6f_loc_herit_begin = "_INHERIT_";
//$_3d6f_loc_herit_begin_position = 6;
//$_3d6f_loc_herit_begin_made = "_INHERITMADE_";
// //print_r($_SERVER['argv']);
// foreach($_SERVER['argv'] as $_3d6f_loc_key => $_3d6f_loc_value)
// $_SERVER['argv'][$_3d6f_loc_key] = trim($_3d6f_loc_value);
//
// if (!isset($_SERVER['argv'][1]))
// die() ;
// if (!isset($_SERVER['argv'][2]))
// die() ;
/*
* on recoit en parametre le chemin racine : c:\racine_web
*
*/
if( !ini_get('safe_mode') ) @set_time_limit(3600);
//include('./../include/net_scandir.php');
$_path_for_php_function_includes = $_3d6f_loc_bd_path."_php_function_includes/";
/**
* Include $_path_for_php_function_includes."_methods.php3"
*/
include_once($_path_for_php_function_includes."_methods.php3");
echo("$p_br_or_n DB information :");
echo ("$p_br_or_n File path for DB :".$_3d6f_loc_bd_path."");
//echo ("liste des fichiers et repertoires ");
// si on demande que l'admin super il n'a pas besoin de faire l'héritage et comme on se connecte à l'admin_super
// la BD peut ne pas exister et entrainer des soucis
if ($p_unique_database_to_load != "admin_super") {
plici_makeInherit($_PLICI_CFG, $p_br_or_n, true);
}
/*
*
* Reelle partie de l'update database
*
*/
// die();
$_3d6f_loc_sub_dir_and_files = array();
net_scandir($_3d6f_loc_bd_path, $_3d6f_loc_sub_dir_and_files);
// can have a order problem with the database then, it put the admin_super scripts in first.
$new_array = array();
foreach($_3d6f_loc_sub_dir_and_files as $_3d6f_loc_key => $_3d6f_loc_value) {
if ($_3d6f_loc_value['parent_dir'] == "admin_super") {
array_push($new_array, $_3d6f_loc_value);
}
}
foreach($_3d6f_loc_sub_dir_and_files as $_3d6f_loc_key => $_3d6f_loc_value) {
if ($_3d6f_loc_value['parent_dir'] != "admin_super") {
array_push($new_array, $_3d6f_loc_value);
}
}
$_3d6f_loc_sub_dir_and_files = $new_array;
// foreach($_3d6f_loc_sub_dir_and_files as $_3d6f_loc_key => $_3d6f_loc_value) {
// if ($_3d6f_loc_key < 200)
// echo($_3d6f_loc_value['current_path']."\n");
// }
// die();
// $_tmp_to_not_used_can_be_bad =&
// plici_mysql_connect($_PLICI_CFG['superadmin_hostname'], $_PLICI_CFG['superadmin_username'], $_PLICI_CFG['superadmin_password'], true);
// echo_net("mysql_select_db(".$_PLICI_CFG['superadmin_databasename'].", ".$_3d6f_loc_id_sql_admin_super.")");
// $_3d6f_loc_select_db_is_ok = mysql_select_db($_PLICI_CFG['superadmin_databasename'], $_tmp_to_not_used_can_be_bad);
$tmp = "";
$_tmp_to_not_used_can_be_bad =& get_mysql_link_for_database($_PLICI_CFG['superadmin_databasename'], $tmp);
// echo_net($_3d6f_loc_bd_path);
// print_r_net($_3d6f_loc_sub_dir_and_files);
$_3d6f_loc_array_cachedir_to_delete = array();
global $_3d6f_loc_force_run_db_directory_to_redo_all;
$_3d6f_loc_force_run_db_directory_to_redo_all = false;
//echo("Legende : . = deja joue, S = sql a jouer, p = php a jouer ");
// on determine quelles scripts on doit jouer et sur quelle BD
$_3d6f_loc_old_db_name = "";
$my_is_passed = false;
foreach($_3d6f_loc_sub_dir_and_files as $_3d6f_loc_key => $_3d6f_loc_value) {
if ($_3d6f_loc_value['type'] == 'directory')
$_3d6f_loc_last_directory = $_3d6f_loc_value['current_path'];
if (($_3d6f_loc_value['type'] == 'directory' && $_3d6f_loc_value['name'] == '_all_sites')
|| $_3d6f_loc_value['parent_dir'] == "_all_sites")
continue;
if ($_3d6f_loc_value['type'] == 'directory' && $_3d6f_loc_value['name'] == "my")
$my_is_passed = true;
if ($_3d6f_loc_value['type'] == 'directory' && $_3d6f_loc_value['parent_dir'] == "my") {
/**
* Make picture inherit
* Copy the picture from the web_site Father (if there is one) to this child
* Doesn't overwrite
*/
$_3d6f_p_dbc_inherited_sitename = "";
get_mysql_link_for_database($_3d6f_loc_value['name'], $_3d6f_p_dbc_inherited_sitename);
$theme_directory = "";
if ($_3d6f_p_dbc_inherited_sitename != "") {
$theme_directory = $_3d6f_loc_racine_web_path."/".PLICI_VIEW_SITES_FOR_PLICI_DIRECTORY.'/'.$_3d6f_p_dbc_inherited_sitename.'/';
if (!file_exists($theme_directory)) {
$theme_directory = $_3d6f_loc_racine_web_path."/".PLICI_VIEW_SITES_MY_DIRECTORY."/".$_3d6f_p_dbc_inherited_sitename."/";
if (!file_exists($theme_directory))
$theme_directory = "";
}
}
if ($theme_directory != "") {
$picture_files = array();
$theme_picture_directory = realpath($theme_directory."picture/")."/";
$dest_directory = $_3d6f_loc_racine_web_path."/".PLICI_VIEW_SITES_MY_DIRECTORY."/".$_3d6f_loc_value['name']."/picture/";
net_scandir($theme_picture_directory, $picture_files);
$dest_directory = realpath($dest_directory);
echo("$p_br_or_n Start picture Inherit $p_br_or_n");
$picture_file_i = 0;
// on evite de pusher des images à la racine car il manquerait un répertoire, ça fait désordre
if ($dest_directory != "" && $dest_directory != "/")
foreach($picture_files as $file_array) {
$source_file = $file_array['current_path'];
$dest_file = $dest_directory."/".substr($file_array['current_path'], strlen($theme_picture_directory));
if ($file_array['name'] != ".not_copy_this_directory")
if ($file_array['type'] == 'directory' && !file_exists($dest_file)) {
@plici_mkdir($dest_file);
echo("D");
} else if (!file_exists($dest_file)) {
copy($source_file, $dest_file);
echo("F");
} else {
echo("=");
}
$picture_file_i++;
if ($picture_file_i%40==0){
echo($p_br_or_n);
}
}
echo("$p_br_or_n End picture Inherit");
}
}
if (!$my_is_passed && $_3d6f_loc_value['parent_dir'] != "admin_super")
continue;
if ($p_unique_database_to_load != "" && $p_unique_database_to_load != $_3d6f_loc_value['parent_dir'])
continue;
flush();
if (isset($_3d6f_loc_value['extension']) && isset($_3d6f_loc_accepted_extension[$_3d6f_loc_value['extension']])) {
// un fichier sql ou php
$_3d6f_loc_current_file_extension = strtoupper($_3d6f_loc_value['extension']);
if ($_3d6f_loc_old_db_name != $_3d6f_loc_value['parent_dir'] )
echo("$p_br_or_n Scripts for database '".$_3d6f_loc_value['parent_dir']."' :");
$_3d6f_loc_file_already_made = false;
if (isset($_3d6f_loc_sub_dir_and_files[$_3d6f_loc_key+1])) {
// ce fichier a-t-il deja été joué ?
// $a = $_3d6f_loc_value['current_path'].$_3d6f_loc_extention_already_done;
// $b = $_3d6f_loc_sub_dir_and_files[$_3d6f_loc_key+1]['current_path'];
// echo_net("comparaison de $a et $b");
if ($_3d6f_loc_value['current_path'].$_3d6f_loc_extention_already_done == $_3d6f_loc_sub_dir_and_files[$_3d6f_loc_key+1]['current_path']){
$_3d6f_loc_file_already_made = true;
//echo(" Already made");
//echo("($_3d6f_loc_current_file_extension)=> DEJA joue : ".$_3d6f_loc_value['name']." (".$_3d6f_loc_value['parent_dir'].") ");
}
}
if (!$_3d6f_loc_file_already_made && !$p_is_simulation) {
// on doit jouer le fichier SQL ou PHP
//echo("*Fichier a jouer: ".$_3d6f_loc_value['name']." (".$_3d6f_loc_value['parent_dir'].") ");
// on determine si on doit selectionne une database ou pas
$_3d6f_loc_select_database = true;
if ($_3d6f_loc_value['extension'] == 'sql')
if ((substr($_3d6f_loc_value['name'], 0, 1) == "0") ||
(substr($_3d6f_loc_value['name'], 0, 1) == "1"))
$_3d6f_loc_select_database = false;
if (isset($_3d6f_loc_directory_to_redo[$_3d6f_loc_value['parent_dir']]))
$_3d6f_loc_filename_already = $_3d6f_loc_value['current_path'].$_3d6f_loc_extention_already_done.$_3d6f_loc_extention_must_be_redone;
else
$_3d6f_loc_filename_already = $_3d6f_loc_value['current_path'].$_3d6f_loc_extention_already_done;
//@unlink($_3d6f_loc_filename_already);
$temp_file_name = $_3d6f_loc_value['current_path'].$_3d6f_loc_extention_already_done.$_3d6f_loc_extention_must_be_redone;
if (file_exists($temp_file_name))
@unlink($temp_file_name);
$temp_file_name = $_3d6f_loc_value['current_path'].$_3d6f_loc_extention_already_done;
if (file_exists($temp_file_name))
@unlink($temp_file_name);
$_3d6f_loc_redirect_errors = $_3d6f_loc_filename_already;
flush();
$_3d6f_loc_errors = "";
if ($_3d6f_loc_value['extension'] == 'sql') {
echo("$p_br_or_n Loading : ".$_3d6f_loc_value['name']."");
if ($_3d6f_loc_select_database) {
if (mysql_exec_script_and_search_login_from_admin(
$_3d6f_loc_value['parent_dir'], $_3d6f_loc_value['current_path'])) {
$_3d6f_loc_errors = "";
touch($_3d6f_loc_redirect_errors);
} else {
$_3d6f_loc_errors = "$p_br_or_n Error : mysql_exec_script_and_search_login_from_admin";
$all_is_ok = false;
}
//shell_exec("\"".$_3d6f_loc_mysql_path."mysql.exe\" -uroot -p".$_3d6f_loc_root_password." -D ".$_3d6f_loc_value['parent_dir']." < ".$_3d6f_loc_value['current_path'].$_3d6f_loc_redirect_errors);
} else
touch($_3d6f_loc_redirect_errors);// devenu inutile : shell_exec("\"".$_3d6f_loc_mysql_path."mysql.exe\" -uroot -p".$_3d6f_loc_root_password." < ".$_3d6f_loc_value['current_path'].$_3d6f_loc_redirect_errors);
//$_3d6f_loc_errors = file_get_contents($_3d6f_loc_filename_already);
$_3d6f_loc_array_cachedir_to_delete[$_3d6f_loc_value['parent_dir']] = "delete_cache";
} else if ($_3d6f_loc_value['extension'] == 'php') {
echo("$p_br_or_n Loading : ".$_3d6f_loc_value['name']."");
// on met en place une connexion de base de donnée vers la bd concernée
$link_for_database = "";
$_3d6f_p_dbc_inherited_sitename = "";
$link_for_database =& get_mysql_link_for_database($_3d6f_loc_value['parent_dir'], $_3d6f_p_dbc_inherited_sitename);
// mysql_connect("localhost", "root", $_3d6f_loc_root_password);
// $_3d6f_loc_select_db_is_ok = mysql_select_db($_3d6f_loc_value['parent_dir']);
// if (!$_3d6f_loc_select_db_is_ok)
// echo("$p_br_or_n erreur de connexion sur ".$_3d6f_loc_value['parent_dir']."$p_br_or_n");
flush();
ob_start();
/**
* Include $_3d6f_loc_value['current_path']
*/
include($_3d6f_loc_value['current_path']);
$_3d6f_loc_errors = ob_get_contents();
flush();
ob_end_clean();
flush();
if (trim($_3d6f_loc_errors) =="")
touch($_3d6f_loc_filename_already);
$_3d6f_loc_array_cachedir_to_delete[$_3d6f_loc_value['parent_dir']] = "delete_cache";
if ($_3d6f_loc_value['parent_dir'] != "admin_super")
;
//trigger_error("Changes for ppool normaly close");// mysql_close($link_for_database);
}
if (trim($_3d6f_loc_errors) !="") {
echo("$p_br_or_n ($_3d6f_loc_current_file_extension)=> !!BAD!! ".$_3d6f_loc_value['name']." (".$_3d6f_loc_value['parent_dir'].")$p_br_or_n");
echo(">>>>>".trim($_3d6f_loc_errors)."$p_br_or_n $p_br_or_n");
$all_is_ok = false;
}
} else if (!$_3d6f_loc_file_already_made && $p_is_simulation) {
echo("$p_br_or_n Will be done : ".$_3d6f_loc_value['name']."");
}
//echo(" redo_update :".($_3d6f_loc_force_run_db_directory_to_redo_all?'true':'false'));
$_3d6f_loc_old_db_name = $_3d6f_loc_value['parent_dir'];
} else if (isset($_3d6f_loc_value['extension']) && (($_3d6f_loc_value['extension'] == substr($_3d6f_loc_extention_already_done, 1)) ||
($_3d6f_loc_value['extension'] == substr($_3d6f_loc_extention_must_be_redone, 1)))) {
// un fichier non sql
// on verifie qu'il y est bien son homologue
$_3d6f_loc_is_already_done = false;
$_3d6f_loc_is_re_done = false;
$_3d6f_loc_truncated1 = str_replace($_3d6f_loc_extention_already_done, '', $_3d6f_loc_value['name']);
$_3d6f_loc_truncated = str_replace($_3d6f_loc_extention_must_be_redone, '', $_3d6f_loc_truncated1);
$_3d6f_loc_is_already_done = ($_3d6f_loc_truncated != $_3d6f_loc_value['name']);
$_3d6f_loc_is_re_done = ($_3d6f_loc_truncated != $_3d6f_loc_truncated1);
if (($_3d6f_loc_is_already_done) || ($_3d6f_loc_is_already_done && $_3d6f_loc_is_re_done)) {
// on a bien un fichier qu'on a généré
// on cherche s'il a un équivalent
$_3d6f_loc_is_alone = true;
if (isset($_3d6f_loc_sub_dir_and_files[$_3d6f_loc_key-1])) {
$_3d6f_loc_is_alone = ($_3d6f_loc_sub_dir_and_files[$_3d6f_loc_key-1]['name'] != $_3d6f_loc_truncated);
}
if ($_3d6f_loc_is_alone) {
@unlink($_3d6f_loc_value['current_path']);
echo("$p_br_or_n => CLEANING ".$_3d6f_loc_value['name']." (".$_3d6f_loc_value['parent_dir'].")$p_br_or_n ");
}
}
}
//mysql_close($_3d6f_loc_id_sql_admin_super);
}
//$_3d6f_loc_directory_to_redo = array('test_site'=>'redo', 'theme1com_site'=>'redo'/*, 'graphiste_site'=>'redo'*/);
//
// Il faut vider le caches des sites qui ont joué un script PHP ou SQL
//
if (!$p_is_simulation)
foreach($_3d6f_loc_array_cachedir_to_delete as $key=>$value) {
deleteCacheForWebSite($key, $_3d6f_loc_racine_web_path);
}
// @DONE : ne traiter que les fichiers sql
// @DONE : lire le fichier SQL et le jouer sur la bonne BD
// @DONE : creer le fichier de deja joué
// @DONE : test_site ne doit pas creer de fichier indiquant que la requete a été jouée
// on met a jour les le fichier pour les noms de domaine (urlrewriting)
// echo("$p_br_or_n -> Generate the Url Rewriting htaccess $p_br_or_n ");
//require_once('internal_components/common/databaseconnect/databaseconnect.class.php');
// $object_databaseconnet = new Databaseconnect(true);
// $object_databaseconnet->xGenerateUrlRewriting($_3d6f_loc_id_sql_admin_super);
echo($p_br_or_n);
flush();
// ATTENTION : @mysql_close($_3d6f_loc_id_sql_admin_super);
// En fait il ne faut pas closer cette connexion SQL
// car comme on ne demande pas une connexion nouvelle dans le plic_mysql_connect pour executer les requêtes en admin
// ça peut utiliser la connexion actuelle de l'admin.
// car ce sont les meme login, pass, host (et c'est logique).
// mais si on ferme, ça ferme la connexion pour les autres requêtes (le cas est visible dans la mise à jour PLICI
// par diff)
// on fait un test de verification de propagation de script
//
echo("All is ok : ".($all_is_ok?"true":"false")."\n");
echo("Is Simulating : ".($p_is_simulation?"true":"false")."\n");
echo("Must redo update : ".($_3d6f_loc_force_run_db_directory_to_redo_all?"true":"false")."\n");
if($all_is_ok && !$p_is_simulation && $_3d6f_loc_force_run_db_directory_to_redo_all) {
return run_db_directory($_PLICI_CFG, $p_unique_database_to_load, $p_br_or_n, $p_is_simulation);
}
return $all_is_ok;
}
/**
* For the {@link run_db_directory}
*
* @param array $_PLICI_CFG
* @param string $p_br_or_n
* @param bool $echo
* @return bool TRUE on error
*/
function plici_makeInherit($_PLICI_CFG, $p_br_or_n, $echo = false) {
$_3d6f_loc_sub_dir_and_files = array();
$_3d6f_loc_bd_director_name = "";
$_3d6f_loc_extention_must_be_redone = "";
$_3d6f_loc_directory_to_redo = "";
$_3d6f_loc_accepted_extension = "";
$_3d6f_loc_racine_web_path = "";
$_3d6f_loc_bd_path = "";
getForRunDbDirectory($_PLICI_CFG, $_3d6f_loc_bd_director_name, $_3d6f_loc_extention_must_be_redone,
$_3d6f_loc_directory_to_redo,$_3d6f_loc_accepted_extension, $_3d6f_loc_racine_web_path, $_3d6f_loc_bd_path);
/*
*
* partie de la gestion de l'héritage
*
*/
global $_PLICI_CFG;
$_3d6f_loc_id_sql_admin_super =
plici_mysql_connect($_PLICI_CFG['superadmin_hostname'], $_PLICI_CFG['superadmin_username'], $_PLICI_CFG['superadmin_password']);
// echo_net("mysql_select_db(".$_PLICI_CFG['superadmin_databasename'].", ".$_3d6f_loc_id_sql_admin_super.")");
$_3d6f_loc_select_db_is_ok = mysql_select_db($_PLICI_CFG['superadmin_databasename'], $_3d6f_loc_id_sql_admin_super);
$_3d6f_loc_heritage_finded = false;
$all_is_ok = true;
if ($echo) echo("$p_br_or_n $p_br_or_nScript inherited :$p_br_or_n");
$_3d6f_loc_sub_dir_and_files = array();
//echo_net($_3d6f_loc_bd_path);
net_scandir($_3d6f_loc_bd_path, $_3d6f_loc_sub_dir_and_files);
//trigger_error(print_r($_3d6f_loc_sub_dir_and_files, true));
//$_3d6f_loc_herit_begin_len = strlen($_3d6f_loc_herit_begin);
// Mise en place du système d'héritage des _all_sites et des thèmes
$inherit_files = array(
'_all_sites' => array(),
'_all_sites_directory_made' => array(),
'theme_made' => array(),
);
$inherit_all_sites_started = false;
$_3d6f_loc_last_directory = "";
$my_is_passed = PLICI_FOR_PLICI_DIRECTORY;
$for_new_line_of_point = 0;
foreach($_3d6f_loc_sub_dir_and_files as $_3d6f_loc_key => $_3d6f_loc_value) {
if ($_3d6f_loc_value['type'] == 'directory' && $_3d6f_loc_value['name'] == "my")
$my_is_passed = PLICI_MY_DIRECTORY;
if ($_3d6f_loc_value['type'] == 'directory')
$_3d6f_loc_last_directory = $_3d6f_loc_value['current_path'];
if (isset($_3d6f_loc_value['extension']) && isset($_3d6f_loc_accepted_extension[$_3d6f_loc_value['extension']])) {
/*
* Gestion de l'héritage qui vient de _all_sites
*
*/
if ($_3d6f_loc_value['parent_dir'] == '_all_sites') {
// on remet à zéro si on entre dans '_all_sites'
// if ($inherit_all_sites_started == false)
// $inherit_files['_all_sites'] = array();
// il s'agit d'un script qui va être répercuté sur tous les autres sites
$inherit_all_sites_started = true;
// on stock le fichier qui est dans _all_sites
array_push($inherit_files['_all_sites'], $_3d6f_loc_value);
} else if ($_3d6f_loc_value['parent_dir'] != "admin_super" && $_3d6f_loc_value['parent_dir'] != "admin_plici"){
// si le répertoire n'a pas déjà été fait
if (!isset($inherit_files['_all_sites_directory_made'][$my_is_passed.$_3d6f_loc_value['parent_dir']])){
// dépose les fichier de _all_sites
foreach($inherit_files['_all_sites'] as $_3d6f_loc_value_all_sites) {
// on doit écrire les fichiers de _all_sites
$source = $_3d6f_loc_value_all_sites['current_path'];
$dest = $_3d6f_loc_last_directory."/".$_3d6f_loc_value_all_sites['name']."_inherit.".$_3d6f_loc_value_all_sites['extension'];
$dest_orig = $_3d6f_loc_last_directory."/".$_3d6f_loc_value_all_sites['name'];
// on teste si le fichier original n'existe pas déjà (sans extension modifié)
if (!file_exists($dest_orig)/* && !file_exists($dest)*/) {
if (!copy($source, $dest)) {
echo("$p_br_or_n !BAD! Copy ".$_3d6f_loc_value_all_sites['name']." to ".$_3d6f_loc_value['parent_dir']);
$all_is_ok = false;
} else {
$for_new_line_of_point++;
if ($echo) echo(".");
if ($echo && $for_new_line_of_point%15==0) echo(" ");
//echo("$p_br_or_n OK Copy ".$_3d6f_loc_value_all_sites['name']." to ".$_3d6f_loc_value['parent_dir']);
$_3d6f_loc_heritage_finded = true;
}
}
}
$inherit_files['_all_sites_directory_made'][$my_is_passed.$_3d6f_loc_value['parent_dir']] = "made";
}
$inherit_all_sites_started = false;
}
/*
* Gestion de l'héritage en fonction des thèmes
*
*/
//@DONE : héritage de thème j'ai un souci car ca copie TOUS LES FICHIERS
// - en fait je ne copie pas si le même nom de fichier existe déjà
//if ($_3d6f_loc_value['parent_dir'] != "admin_super" && $_3d6f_loc_value['parent_dir'] != "admin_plici")
// if ($echo) echo("\n my_passed : $my_is_passed\n exist : ".$_3d6f_loc_racine_web_path.$_3d6f_loc_bd_director_name.PLICI_BD_FOR_PLICI_DIRECTORY."/".$_3d6f_loc_value['parent_dir']."/"."\n");
// la condition evite que pour un site dans MY qui a le même nom qu'un theme de for_plici
// on a envoi ses propres scripts vers les autres themes
// enfin dans notre cas, evite que un script dans /my/theme1com soit envoyé vers
// tous les sites qui en heritent
if (($my_is_passed != PLICI_MY_DIRECTORY) ||
($my_is_passed == PLICI_MY_DIRECTORY &&
!file_exists($_3d6f_loc_racine_web_path.$_3d6f_loc_bd_director_name.PLICI_MY_DIRECTORY."/".$_3d6f_loc_value['parent_dir']."/"))
)
{
// on charge à partir de la database les sites vers lesquels on doit copier les scripts
if (!isset($inherit_files['theme_made'][$_3d6f_loc_value['parent_dir']])
) {
$_3d6f_loc_request = "select dbc_dbname from databaseconnect
where dbc_inherited_sitename <> 'ALIAS' and dbc_inherited_sitename = '%s' ;";
$req_temp = sprintf($_3d6f_loc_request, $_3d6f_loc_value['parent_dir'], $_3d6f_loc_value['parent_dir']);
//echo_net($req_temp);
$_3d6f_loc_ressource = mysql_query($req_temp, $_3d6f_loc_id_sql_admin_super);
$inherit_files['theme_made'][$_3d6f_loc_value['parent_dir']] = array();
while ((!$_3d6f_loc_ressource) && ( $_3d6f_loc_row = mysql_fetch_row($_3d6f_loc_ressource))) {
array_push($inherit_files['theme_made'][$_3d6f_loc_value['parent_dir']],
$_3d6f_loc_row[0]
);
}
//print_r($inherit_files['theme_made'][$_3d6f_loc_value['parent_dir']]);
}
foreach($inherit_files['theme_made'][$_3d6f_loc_value['parent_dir']] as $_3d6f_loc_value_theme) {
// on doit écrire les fichiers du nouveau thème
$source = $_3d6f_loc_value['current_path'];
$dest = $_3d6f_loc_racine_web_path.$_3d6f_loc_bd_director_name.PLICI_MY_DIRECTORY."/".$_3d6f_loc_value_theme."/".$_3d6f_loc_value['name']."_inherit.".$_3d6f_loc_value['extension'];
$dest_orig = $_3d6f_loc_racine_web_path.$_3d6f_loc_bd_director_name.PLICI_MY_DIRECTORY."/".$_3d6f_loc_value_theme."/".$_3d6f_loc_value['name'];
if (!file_exists($dest_orig)
/*&& !file_exists($dest)*/
&& substr($_3d6f_loc_value['name'], 0, 12 )!= "3_0000_data_"
) {
if (!copy($source, $dest)) {
echo("$p_br_or_n !BAD! Copy ".$_3d6f_loc_value['name']." to ".$_3d6f_loc_value_theme);
$all_is_ok = false;
} else {
$for_new_line_of_point++;
if ($echo) echo(".");
if ($echo && $for_new_line_of_point%15==0) echo(" ");
$_3d6f_loc_heritage_finded = true;
//echo("$p_br_or_n OK Copy ".$_3d6f_loc_value['name']." to ".$_3d6f_loc_value_theme);
}
}
}
}
}
}
if ($_3d6f_loc_heritage_finded == false) {
if ($echo) echo("$p_br_or_n Nothing to do");
return $_3d6f_loc_heritage_finded;
} else {
if ($echo) echo("$p_br_or_n Copy done");
return $_3d6f_loc_heritage_finded;
}
//die();
//echo(" ");
// CLOSE THE FIRST CONNECTION
//mysql_close($_3d6f_loc_id_sql_admin_super);
}
/**
* Translate a RSS to an Array
*
* @param string $url
* @return array
*/
function plici_rssToArray($url) {
global $g_object_siteinformation;
if(!isset($g_object_siteinformation)) {
trigger_error("plici_rssToArray : Error site Information not exist");
return;
}
/**
* Include 'external_components/magpierss/rss_fetch.inc'
*/
require_once('external_components/magpierss/rss_fetch.inc');
/*
* CONSTANTS - redefine these in your script to change the
* behaviour of fetch_rss() currently, most options effect the cache
*
* MAGPIE_CACHE_ON - Should Magpie cache parsed RSS objects?
* For me a built in cache was essential to creating a "PHP-like"
* feel to Magpie, see rss_cache.inc for rationale
*
*
* MAGPIE_CACHE_DIR - Where should Magpie cache parsed RSS objects?
* This should be a location that the webserver can write to. If this
* directory does not already exist Mapie will try to be smart and create
* it. This will often fail for permissions reasons.
*
*
* MAGPIE_CACHE_AGE - How long to store cached RSS objects? In seconds.
*
*
* MAGPIE_CACHE_FRESH_ONLY - If remote fetch fails, throw error
* instead of returning stale object?
*
* MAGPIE_DEBUG - Display debugging notices?
*
*/
if (!defined('MAGPIE_CACHE_DIR'))
define('MAGPIE_CACHE_DIR', $g_object_siteinformation->getTmpFilePath(true).'/magpierss_cache');
$rss = fetch_rss($url);
$array_result = array();
$array_result = $rss->channel;
$array_result['items'] = $rss->items;
return $array_result;
}
/**
* Returns true if the given file/dir has been made writable (or is already
* writable).
*
* @param string $file
* @return bool
*/
function plici_make_writable($file)
{
$ret_val = false;
if(is_file($file) || is_dir($file))
{
if(is_writable($file))
{
$ret_val = true;
}
else
{
$original_fileperms = fileperms($file);
// add user writable permission
$new_fileperms = $original_fileperms | 0x0080;
@chmod($file, $new_fileperms);
if(is_writable($file))
{
$ret_val = true;
}
else
{
// add group writable permission
$new_fileperms = $original_fileperms | 0x0010;
@chmod($file, $new_fileperms);
if(is_writable($file))
{
$ret_val = true;
}
else
{
// add world writable permission
$new_fileperms = $original_fileperms | 0x0002;
@chmod($file, $new_fileperms);
if(is_writable($file))
{
$ret_val = true;
}
}
}
}
}
if (!$ret_val)
echo("File that can't be writtent : ".$file." ");
return $ret_val;
}
/**
* Function roud price
*
* @param float $p_price
* @return float
*/
function plici_round_price($p_price)
{
return round($p_price, 2);
}
/**
* Returns true if the given file/dir has been made writable (or is already
* writable).
*
* @param string $file
* @return bool
*/
function make_writable($file)
{
$ret_val = false;
if(is_file($file) || is_dir($file))
{
if(is_writable($file))
{
$ret_val = true;
}
else
{
$original_fileperms = fileperms($file);
// add user writable permission
$new_fileperms = $original_fileperms | 0x0080;
@chmod($file, $new_fileperms);
if(is_writable($file))
{
$ret_val = true;
}
else
{
// add group writable permission
$new_fileperms = $original_fileperms | 0x0010;
@chmod($file, $new_fileperms);
if(is_writable($file))
{
$ret_val = true;
}
else
{
// add world writable permission
$new_fileperms = $original_fileperms | 0x0002;
@chmod($file, $new_fileperms);
if(is_writable($file))
{
$ret_val = true;
}
}
}
}
}
if (!$ret_val)
trigger_error("make_writable => File that can't be writtent : ".$file." \n");
return $ret_val;
}
/**
* Recursive make writable
*
* @param string $start_file
* @return bool
*/
function recursive_make_writable($start_file)
{
$ret_val = make_writable($start_file);
if($ret_val && is_dir($start_file) && !is_link($start_file))
{
// PHP 4 alternative to scandir()
$files = array();
$dh = opendir($start_file);
$filename = readdir($dh);
while(!empty($filename))
{
if($filename != '.' && $filename != '..')
{
$files[] = $filename;
}
$filename = readdir($dh);
}
foreach($files as $file)
{
if(is_dir($start_file . '/' . $file) && $file != '.svn')
$ret_val = recursive_make_writable($start_file . '/' . $file);
if(!$ret_val)
{
break;
}
}
}
return $ret_val;
}
/**
* Recursibly test if is writable
*
* @param string $start_file
* @return bool
*/
function recursive_is_writable($start_file)
{
$ret_val = is_writable($start_file);
if($ret_val && is_dir($start_file) && !is_link($start_file))
{
// PHP 4 alternative to scandir()
$files = array();
$dh = opendir($start_file);
$filename = readdir($dh);
while(!empty($filename))
{
if($filename != '.' && $filename != '..')
{
$files[] = $filename;
}
$filename = readdir($dh);
}
foreach($files as $file)
{
$ret_val = recursive_is_writable($start_file . '/' . $file);
if(!$ret_val)
{
break;
}
}
}
return $ret_val;
}
/**
* Make a directory with path ending by a slash or not
*
* @param string $pathname
* @return bool TRUE on success or FALSE on failure.
*/
function plici_mkdir($pathname) {
$pathname = preg_replace("|(.+)[/\\\\]$|is", "\\1", $pathname);
// echo_net($pathname);
return mkdir($pathname);
}
/**
* Print an image from t_graphic by smarty
*
* @access private
* @param array $params
* @param Smarty_custom $smarty
* @return string
*/
function x_smarty_function_net_img($params, &$smarty)
{
$id = getFromArray('id', $params, '');
if ($id == '')
return "";
$notag = getFromArray('notag', $params, '');
global $g_object_loader;
$o_tgraphic =& $g_object_loader->getTGraphic();
$plici_net_img = $o_tgraphic->initAndLoadNetImgArray();
if (isset($plici_net_img[$id])) {
$current_element = $plici_net_img[$id]["string"];
if ($notag == true) {
$before_tag = "";
$after_tag = "";
$old_current_element_memory = $current_element;
if (ereg ("(src[ ]*=[ ]*['\"][^'\"]*['\"])", $old_current_element_memory, $regs)) {
//echo_net($regs[1]);
$current_element = $regs[1];
}
if (ereg ("(align[ ]*=[ ]*['\"][^'\"]*['\"])", $old_current_element_memory, $regs)) {
//echo_net($regs[1]);
$current_element .= " ".$regs[1];
}
//echo_net($current_element);
} else {
$before_tag = "<img ";
$after_tag = " />";
}
// Correct xhtml warning
if (!preg_match("@alt=@", $current_element))
$after_tag = " alt='' ".$after_tag;
$will_return = str_replace("%PICTURE_BASE_HTTP%",$smarty->get_template_vars("picture_path"),$current_element).$after_tag;
//$will_return = $before_tag." style='border: thin dashed red;' onMouseOver='findDOM(\"plici_change_design\").innerHTML = \"".ereg_replace("[<>'\"]+", "_", $will_return)."\"; '; ".$will_return;
$will_return = $before_tag.$will_return;
return $will_return;
}
return "";
}
/**
* Load php5 function for php4
*/
include(dirname(__FILE__)."/php5_function.inc.php");
?>

Documentation generated on Tue, 25 Mar 2008 15:35:32 +0100 by phpDocumentor 1.3.2

Source for file php_functions.inc.php