<?php
// +-------------------------------------------------+
// | 2002-2011 PMB Services / www.sigb.net pmb@sigb.net et contributeurs (voir www.sigb.net)
// +-------------------------------------------------+
// $Id: cms_module_root.class.php,v 1.20 2012-11-15 09:47:33 arenou Exp $

if (stristr($_SERVER['REQUEST_URI'], ".class.php")) die("no access");


//définition de constantes pour le débug
if(!defined("CMS_DEBUG_MODE_OFF")){
	define("CMS_DEBUG_MODE_OFF",0);
}
if(!defined("CMS_DEBUG_MODE_PHP")){
	define("CMS_DEBUG_MODE_PHP",1);
}
if(!defined("CMS_DEBUG_MODE_CONSOLE")){
	define("CMS_DEBUG_MODE_CONSOLE",2);
}
if(!defined("CMS_DEBUG_MODE_FILE")){
	define("CMS_DEBUG_MODE_FILE",3);
}
//l'autoload a quelques suprises
global $cms_debug_mode;
$cms_debug_mode = CMS_DEBUG_MODE_CONSOLE;

class cms_module_root {
	protected $parameters;
	protected $msg = array();
	protected $class_name;
	protected $hash;
	public $id = 0;
	protected $cms_build_env;
	protected $module_folder;
	protected $managed_params =array();
	
	function __construct(){
		//on va chercher les messages...
		$this->class_name = get_class($this);
		$this->load_msg();
		
		$this->fetch_datas();
		if(!$this->hash){
			$this->get_hash_from_form();
		}
	}
	
	public function serialize(){
		global $charset;
//		//formulaire chargé en ajax donc en UTF-8
//		if($charset!="utf-8"){
//			$this->parameters = $this->utf8_decode($this->parameters);
//		}
		return serialize($this->parameters);
	}
	
	public function unserialize($parameters){
		$this->parameters = unserialize($parameters);
	}
	
	protected function load_msg(){
		global $lang;
		global $base_path;

		//on regarde si on doit intégrer des fichiers de messages de parents
		$parents = $this->get_parent_classes();
		for($i=count($parents)-1 ; $i>=0 ; $i--){
			if($parents[$i] != "cms_module_root"){
				$parent = str_replace("cms_module_","",$parents[$i]);
				if(strpos($parent,"_") !== false){	
					$module_rep = substr($parent,0,strpos($parent,"_"));
				}else{
					$module_rep = $parent;
				}
				//on regarde la langue par défaut du module
				$default_language = $this->get_default_language($module_rep);
				//si elle est différente de celle de l'interface, on l'intègre
				// la langue par défaut donne l'assurance d'avoir tous les messages...
				if($default_language != $lang){
					$file = $base_path."/cms/modules/".$module_rep."/messages/".$default_language."/".$parents[$i].".xml";
					$this->load_msg_file($file);
				}				
				//on commence par charger les messages de la langue par défaut du module...
				$file = $base_path."/cms/modules/".$module_rep."/messages/".$lang."/".$parents[$i].".xml";
				$this->load_msg_file($file);
			}else{
				$file = $base_path."/cms/modules/common/messages/".$lang."/cms_module_root.xml";
				$this->load_msg_file($file);
			}
		}
		$var = str_replace("cms_module_","",$this->class_name);
		if(strpos($var,"_") !== false){	
			$module_rep = substr($var,0,strpos($var,"_"));
		}else{
			$module_rep = $var;
		}
		//on regarde la langue par défaut du module
		$default_language = $this->get_default_language($module_rep);
		//si elle est différente de celle de l'interface, on l'intègre
		// la langue par défaut donne l'assurance d'avoir tous les messages...
		if($default_language != $lang){
			$file = $base_path."/cms/modules/".$module_rep."/messages/".$default_language."/".$this->class_name.".xml";
			$this->load_msg_file($file);
		}
		$file = $base_path."/cms/modules/".$module_rep."/messages/".$lang."/".$this->class_name.".xml";
		$this->load_msg_file($file);
	}
	
	protected function get_parent_classes(){
		$parents = array();
		$parent = get_parent_class($this->class_name);
		if($parent){
			$parents[] =$parent;
			while($parent = get_parent_class($parent)){
				$parents[] =$parent;
			}
		}
		return $parents;
	}
	
	
	protected function get_recurse_classes_parent($name,$parents=array()){		
		$parent = get_parent_class($name);
		$parents[]=$parent;
		if(get_parent_class($parent)!=""){
			$parents = $this->get_recurse_classes_parent($parent,$parents);
		}
		return $parents;
	}
	
	protected function load_msg_file($file){
		global $charset;
		if(file_exists($file)){
			@ini_set("zend.ze1_compatibility_mode", "0");
			$dom = new domDocument();
			$dom->load($file);
			$entries = $dom->getElementsByTagName('entry');
			for($i=0 ; $i<$entries->length ; $i++){
				if($entries->item($i)->hasAttributes()){
					$attributes = $entries->item($i)->attributes;
					for($j=0 ; $j<$attributes->length ; $j++){
						if($attributes->item($j)->nodeName == "code"){
							//dom retourne de l'utf-8 à tous les coups...
							$this->msg[$attributes->item($j)->nodeValue] = $this->charset_normalize($entries->item($i)->nodeValue,"utf-8");
							break;
						}
					}
				}
			}	
			@ini_set("zend.ze1_compatibility_mode", "1");
			return true;
		}else{
			return false;
		}	
	}
	
	protected function format_text($text){
		global $charset;
		return htmlentities($text,ENT_QUOTES,$charset);
	}
	
	public function get_hash(){
		if(!$this->hash){
			$this->hash = $this->generate_hash($this->class_name);
		}
		$query = "insert into cms_hash set hash = '".$this->hash."'";
		mysql_query($query);
		return $this->hash;
	}
	
	public function delete_hash(){
		$query = "delete from cms_hash where hash = '".$this->hash."'";
		$result = mysql_query($query);
		if($result){
			$this->hash = "";
		}
	}

	protected function generate_hash($phrase=""){
		$hash = md5($phrase.time());
		$query = "select hash from cms_hash where hash = '".$hash."'";
		$result = mysql_query($query);
		if(mysql_num_rows($result)){
			$hash = $this->generate_hash($hash);
		}
		return $hash;		
	}
	
	protected function charset_normalize($elem,$input_charset){
		global $charset;
		if(is_array($elem)){
			foreach ($elem as $key =>$value){
				$elem[$key] = $this->charset_normalize($value,$input_charset);
			}
		}else{
			//PMB dans un autre charset, on converti la chaine...
			if($charset != $input_charset){
				$elem = iconv($input_charset,$charset,$elem);
			}
		}
		return $elem;
	}
	
	public function addslashes($elem){
		if(is_array($elem) || is_object($elem)){
			foreach ($elem as $key =>$value){
				$elem[$key] = $this->addslashes($value);
			}
		}else{
			$elem = addslashes($elem);
		}
		return $elem;
	}
	
	public function stripslashes($elem){
		if(is_array($elem) || is_object($elem)){
			foreach ($elem as $key =>$value){
				$elem[$key] = $this->stripslashes($value);
			}
		}else{
			$elem = stripslashes($elem);
		}
		return $elem;
	}
	
	public function debug($elem,$mode=""){
		global $cms_debug_mode;
		if(!$mode){
			global $cms_debug_mode;
			$mode = $cms_debug_mode;
		}
		switch ($mode){
			//impression à l'écran	
			case CMS_DEBUG_MODE_PHP :			
				highlight_string(print_r($elem,true));
				break;
			//renvoi dans la console
			case CMS_DEBUG_MODE_CONSOLE :
				print "
				<!-- Debug/Verbose mode -->
				<script type='text/javascript'>
					console.log(".json_encode(cms_module_root::utf8_normalize($elem)).");
				</script>";
				break;
			case CMS_DEBUG_MODE_FILE :
				global $base_path;
				if(is_string($elem)){
					file_put_contents($base_path."/temp/debug_portail.txt",$elem."\n",FILE_APPEND);
				}else{
					file_put_contents($base_path."/temp/debug_portail.txt",print_r($elem,true)."\n",FILE_APPEND);
				}
				break;
			case CMS_DEBUG_MODE_OFF : 
			default :
				// rien à faire...
				break;	
		}
	}
	
	public function get_default_language($module){
		global $base_path;
		//si c'est un module, on a déjà lu le manifest...
		if($this->manifest){
			$default_language = $this->informations['default_language'];
		}else{
			//sinon, le cas des common est à part, on sait que c'est en français...
			if($module == "common"){
				$default_language = "fr_FR";
			}else{
				//sinon, on va chercher l'info dans le manifest du module...
				$default_language = self::get_module_default_language($base_path."/cms/modules/".$module."/manifest.xml");
			}
		}
		return $default_language;		
	}
	
	public static function get_module_default_language($xml){
		@ini_set("zend.ze1_compatibility_mode", "0");
		if(!is_object($xml)){
			$dom = new domDocument();
			$dom->load($xml);
			$xml = $dom;
			
		}	
		$default_language = $xml->getElementsByTagName("default_language")->item(0)->nodeValue;
		@ini_set("zend.ze1_compatibility_mode", "1");
		return $default_language;
	}
	
	public function set_cms_build_env($env){
		$this->cms_build_env = $env;
	}
	
	public function get_module_folder(){
		if(!$this->module_folder){
			global $base_path;
			$var = str_replace("cms_module_","",$this->class_name);
			if(strpos($var,"_") !== false){	
				$module_rep = substr($var,0,strpos($var,"_"));
			}else{
				$module_rep = $var;
			}
			$this->module_folder = $base_path."/cms/modules/".$module_rep."/";
		}
		return $this->module_folder;
	}
	
	public function convert_utf8($str){
		global $charset;
		if($charset != "utf-8"){
			return iconv($charset,"utf-8",$str);
		}
	}
	
	public function get_headers(){
		return array();	
	}

	public function get_ajax_link($args){
		global $base_path;
		$request = "";
		foreach($args as $key => $val){
			$request.="&".$key."=".$val;
		}
		return $base_path."/ajax.php?module=cms&categ=module&elem=".$this->class_name."&id=".$this->id."&action=ajax".$request;
	}
	
	public function execute_ajax(){
		global $do;
		switch($do){
			case "get_infopages" :
				$query = "select id_infopage,title_infopage from infopages where valid_infopage = 1 order by title_infopage";
				$result = mysql_query($query);
				$infopages = array();
				if(mysql_num_rows($result)){
					while($row = mysql_fetch_object($result)){
						$infopages[$row->id_infopage]=$row->title_infopage;
					}
				}
				$response['content'] = json_encode($this->utf8_encode($infopages));
				$response['content-type'] = "application/json";
				break;
			case "get_pages" :
				$query = "select id_page,page_name from cms_pages order by page_name asc";
				$result = mysql_query($query);
				$pages = array();
				$pages[0] = $this->msg["cms_module_menu_menu_entry_page_choice"];
				if(mysql_num_rows($result)){
					while($row = mysql_fetch_object($result)){
						$pages[$row->id_page]=$row->page_name;
					}			
				}
				$response['content'] = json_encode($this->utf8_encode($pages));
				$response['content-type'] = "application/json";
				break;	
			case 'get_page_vars' :
				global $page;
				$page+=0;
				$query = "select var_name,var_comment from cms_vars where var_num_page = ".$page;
				$result = mysql_query($query);
				$vars = array();
				if(mysql_num_rows($result)){
					while($row = mysql_fetch_object($result)){
						$vars[] = array(
							'name' => $row->var_name,
							'comment' => $row->var_comment
						);
					}			
				}
				$response['content'] = json_encode($this->utf8_encode($vars));
				$response['content-type'] = "application/json";
				break;
			
			default :
				$response = array(
					'content' => "", 
					'content-type' => "text/html"
				);
				break;
		}
		return $response;
	}
	
	public function get_module_dom_id(){
		if(method_exists($this,"get_dom_id")){
			return $this->get_dom_id();
		}else{
			$query = "select cadre_object from cms_cadres where id_cadre = ".$this->cadre_parent;
			$result = mysql_query($query);
			if(mysql_num_rows($result)){
				$obj = mysql_result($result,0,0);
				return $obj."_".$this->cadre_parent;
			}
		}
	}
	
	protected function fetch_managed_datas($type){
		switch($type){
			case "conditions" :
			case "datasources" :
			case "views" :
				if($this->module_class_name){
					$query = "select managed_module_box from cms_managed_modules where managed_module_name = '".$this->module_class_name."'";
					$result = mysql_query($query);
					if(mysql_num_rows($result)){
						$datas = unserialize(mysql_result($result,0,0));
						$this->managed_datas = $datas[$type][$this->class_name];
					}
				}
				break;
			default : 
				$query = "select managed_module_box from cms_managed_modules where managed_module_name = '".$this->class_name."'";
				$result = mysql_query($query);
				if(mysql_num_rows($result)){
					$this->managed_datas = unserialize(mysql_result($result,0,0));
				}
				break;
		}
	}
	
	protected function get_managed_form_start($pvars=""){
		global $base_path;
		$vars ="";
		$params =array(
			'categ' => "manage"
		);
		if($this->module_class_name){
			$params['sub']= str_replace("cms_module_","",$this->module_class_name);	
			$var = explode("_",$this->class_name);
			$params['quoi'] = $var[3]."s";
			$params['elem'] = $this->class_name;
		}else {
			$params['sub']= str_replace("cms_module_","",$this->class_name);
			$params['quoi'] = "module";
		}
		$params['action'] = "save_form";  
		foreach($params as $key=>$val){
			if($vars!="") $vars .="&";
			$vars.=$key."=".$val; 
		}
		if($pvars){
			foreach($pvars as $key=>$val){
				if($vars!="") $vars .="&";
				$vars.=$key."=".$val; 
			}
		}
		return "
		<form name='".$this->class_name."_manage_form' method='POST' action='".$base_path."/cms.php?".$vars."'>
			<div class='form-contenu'>";
	}
	
	protected function get_managed_form_end(){
		return "
			</div>
			<div class='row'>
				<hr/>
				<input type='submit' class='bouton' value='".$this->format_text($this->msg['cms_manage_module_save'])."'/>
			</div>
		</form>";
	}

	protected function get_exported_datas(){
		$infos = array(
			"id" => $this->id,
			"class" => $this->class_name,
			"hash" => $this->hash,
			"parameters" => $this->parameters
		);
		$infos['selectors'] = array();
		if(count($this->selectors)){
			for($i=0 ; $i<count($this->selectors) ; $i++){
				$selector = new $this->selectors[$i]['name']($this->selectors[$i]['id']);
				$infos['selectors'][] = $selector->get_exported_datas();
			}
		}
		return $infos;
	}
	
	protected function utf8_decode($elem){
		if(is_array($elem)){
			foreach ($elem as $key =>$value){
				$elem[$key] = $this->utf8_decode($value);
			}
		}else if(is_object($elem)){
			$elem = $this->obj2array($elem);
			$elem = $this->utf8_encode($elem);
		}else{
			$elem = utf8_decode($elem);
		}
		return $elem;
	}
	
	protected function utf8_encode($elem){
		if(is_array($elem)){
			foreach ($elem as $key =>$value){
				$elem[$key] = cms_module_root::utf8_encode($value);
			}
		}else if(is_object($elem)){
			$elem = $this->obj2array($elem);
			$elem = $this->utf8_encode($elem);
		}else{
			$elem = utf8_encode($elem);
		}
		return $elem;
	}
	
	public function utf8_normalize($elem){
		global $charset;
		if($charset != "utf-8"){
			return cms_module_root::utf8_encode($elem);
		}else{
			return $elem;
		}
	}
	
	//offrons un peu de bonheur...
	//quelques méthodes génériques pour construire du lien...
	public function get_constructor_link_form($type,$name=""){
		if(!$name) $name = $this->class_name."_link_".$type;
		
		$form = "
				<select id='".$name."' name='".$name."' onChange='".$this->class_name."_load_".$type."_page_env();'>
					<option value='0'>".$this->format_text($this->msg['cms_module_common_link_constructor_page'])."</option>";
		
		$query = "select id_page,page_name from cms_pages order by 2";
		$result = mysql_query($query);
		if(mysql_num_rows($result)){
			
			while( $row = mysql_fetch_object($result)){
				$form.= "
					<option value='".$row->id_page."' ".($row->id_page == $this->parameters['links'][$type]['page'] ? "selected='selected'" : "").">".$this->format_text($row->page_name)."</option>";
			}
		}
		$form.="		
				</select>
				<script type='text/javascript'>
					function ".$this->class_name."_load_".$type."_page_env(){
						dijit.byId('".$name."_env').href = './ajax.php?module=cms&elem=".$this->class_name."&categ=module&action=get_env&name=".$this->class_name."_page_".$type."_var"."&pageid='+dojo.byId('".$name."').value;
						dijit.byId('".$name."_env').refresh();
					}
				</script>";
		$href = "";
		if($this->parameters['links'][$type]['page']){
			$href = "./ajax.php?module=cms&elem=".$this->class_name."&categ=module&action=get_env&name=".$this->class_name."_page_".$type."_var"."&pageid=".$this->parameters['links'][$type]['page']."&var=".$this->parameters['links'][$type]['var'];
		}
		$form.="
				<div id='".$name."_env' dojoType='dojox.layout.ContentPane'".($href!= ""? " preload='true' href='".$href."'":"")."></div>";
		return $form;
	}
	
	public function get_page_env_select($pageid,$name,$var=""){
		$pageid+=0;
		$page = new cms_page($pageid);
		$form="
		<div class='row'>
			<div class='colonne3'>
				<label for='".$name."'>".$this->format_text($this->msg['cms_module_common_link_constructor_page_var'])."</label>
			</div>
			<div class='colonne-suite'>
				<select name='".$name."' id='".$name."'>";
		foreach($page->vars as $var){
				$form.="
					<option value='".$this->format_text($var['name'])."' ".($var['name'] == $var ? "selected='selected'" : "").">".$this->format_text(($var['comment']!=""? $var['comment'] : $var['name']))."</option>";
		}		
		$form.="	
				</select>
			</div>
		</div>";
		return $form;		
	}
	
	protected function save_constructor_link_form($type){
		$page = $this->class_name."_link_".$type;
		$var = $this->class_name."_page_".$type."_var";
		
		global $$page;
		global $$var;
		$this->parameters['links'][$type] = array(
			'page' => $$page+0,
			'var'  => $$var
		);
	}

	protected function get_constructed_link($type,$value){
		global $opac_url_base;
		$link = "";
		switch($type){
			case "article":
			case "section" :
			default :
				$link = "./index.php?lvl=cmspage&pageid=".$this->parameters['links'][$type]['page']."&".$this->parameters['links'][$type]['var']."=".$value;
				break;
		}
		return $link;
	}
	
	protected function obj2array($obj){
		$array = array();
		if(is_object($obj)){
			foreach($obj as $key => $value){
				if(is_object($value)){
					$value = $this->obj2array($value);
				}
				$array[$key] = $value;
			}
		}else{
			$array = $obj;
		}
		return $array;
	}
	
	protected function get_form_value_name($name){
		//calcule le hash si pas encore fait...
		
		return $this->get_hash()."_".$name;
	}
	
	protected function get_value_from_form($name){
		$var_name = $this->get_form_value_name($name);
		global $$var_name;
		return $$var_name;
	}
	
	protected function get_hash_form(){
		return "
			<input type='hidden' name='".$this->class_name."_hash[]' value='".$this->get_hash()."'/>";
	}
	
	protected function get_hash_from_form(){
		$var_name = $this->class_name."_hash";
		global $$var_name;
		if(is_array($$var_name)){
			$this->hash = array_shift($$var_name);
		}
	}
	
	protected function clean_hash_table(){
		//on commence par créer une table tempo de tous les hash utilisés ! 
		$query = "create temporary table used_hash (hash varchar(255))";
		mysql_query($query);
		//on ajoute les hash des pages...
		$query = "insert into used_hash select page_hash as hash from cms_pages";
		mysql_query($query);
		//on ajoute les hash des modules...
		$query = "insert into used_hash select cadre_hash as hashfrom cms_cadres";
		mysql_query($query);
		//on ajoute les hash des éléments des modules...
		$query = "insert into used_hash select cadre_content_hash as hash from cms_cadre_content";
		mysql_query($query);
		//on nettoie !
		$query = "delete from cms_hash left join used_hash on cms_hash.hash = used_hash.hash where used_hash is null";
		mysql_query($query);
	}
	
	protected function prefix_var_tree($tree,$prefix){
		for($i=0 ; $i<count($tree) ; $i++){
			$tree[$i]['var'] = $prefix.".".$tree[$i]['var'];
			if($tree[$i]['children']){
				$tree[$i]['children'] = $this->prefix_var_tree($tree[$i]['children'],$prefix);
			}
		}
		return $tree;
	}

}