/edit_area/edit_area_compressor.php

<?php

	/******

	 *

	 *	EditArea PHP compressor

	 * 	Developped by Christophe Dolivet

	 *	Released under LGPL, Apache and BSD licenses

	 *	v1.1.3 (2007/01/18)	 

	 *

	******/

	

	// CONFIG

	$param['cache_duration']= 3600 * 24 * 10;		// 10 days util client cache expires

	$param['compress'] = true;						// enable the code compression, should be activated but it can be usefull to desactivate it for easier error retrieving (true or false)

	$param['debug'] = false;						// Enable this option if you need debuging info

	$param['use_disk_cache']= true;					// If you enable this option gzip files will be cached on disk.

	$param['use_gzip']= true;						// Enable gzip compression

	// END CONFIG

	

	$compressor= new Compressor($param);

	

	class Compressor{

	



		

		function __construct($param)

		{

			$this->start_time= $this->get_microtime();

			$this->file_loaded_size=0;

			$this->param= $param;

			$this->script_list="";

			$this->path= dirname(__FILE__)."/";

			if(isset($_GET['plugins'])){

				$this->load_all_plugins= true;

				$this->full_cache_file= $this->path."edit_area_full_with_plugins.js";

				$this->gzip_cache_file= $this->path."edit_area_full_with_plugins.gz";

			}else{

				$this->load_all_plugins= false;

				$this->full_cache_file= $this->path."edit_area_full.js";

				$this->gzip_cache_file= $this->path."edit_area_full.gz";

			}

			

			$this->check_gzip_use();

			$this->send_headers();

			$this->check_cache();

			$this->load_files();

			$this->send_datas();

		}

		

		function send_headers()

		{

			header("Content-type: text/javascript; charset: UTF-8");

			header("Vary: Accept-Encoding"); // Handle proxies

			header(sprintf("Expires: %s GMT", gmdate("D, d M Y H:i:s", time() + $this->param['cache_duration'])) );

			if($this->use_gzip)

				header("Content-Encoding: ".$this->gzip_enc_header);

		}

		

		function check_gzip_use()

		{

			$encodings = array();

			$desactivate_gzip=false;

					

			if (isset($_SERVER['HTTP_ACCEPT_ENCODING']))

				$encodings = explode(',', strtolower(preg_replace("/\s+/", "", $_SERVER['HTTP_ACCEPT_ENCODING'])));

			

			// desactivate gzip for IE version < 7

			if(preg_match("/(?:msie )([0-9.]+)/i", $_SERVER['HTTP_USER_AGENT'], $ie))

			{

				if($ie[1]<7)

					$desactivate_gzip=true;	

			}

			

			// Check for gzip header or northon internet securities

			if (!$desactivate_gzip && $this->param['use_gzip'] && (in_array('gzip', $encodings) || in_array('x-gzip', $encodings) || isset($_SERVER['---------------'])) && function_exists('ob_gzhandler') && !ini_get('zlib.output_compression')) {

				$this->gzip_enc_header= in_array('x-gzip', $encodings) ? "x-gzip" : "gzip";

				$this->use_gzip=true;

				$this->cache_file=$this->gzip_cache_file;

			}else{

				$this->use_gzip=false;

				$this->cache_file=$this->full_cache_file;

			}

		}

		

		function check_cache()

		{

			// Only gzip the contents if clients and server support it

			if (file_exists($this->cache_file)) {

				// check if cache file must be updated

				$cache_date=0;				

				if ($dir = opendir($this->path)) {

					while (($file = readdir($dir)) !== false) {

						if(is_file($this->path.$file) && $file!="." && $file!="..")

							$cache_date= max($cache_date, filemtime($this->path.$file));

					}

					closedir($dir);

				}

				if($this->load_all_plugins){

					$plug_path= $this->path."plugins/";

					if (($dir = @opendir($plug_path)) !== false)

					{

						while (($file = readdir($dir)) !== false)

						{

							if ($file !== "." && $file !== "..")

							{

								if(is_dir($plug_path.$file) && file_exists($plug_path.$file."/".$file.".js"))

									$cache_date= max($cache_date, filemtime("plugins/".$file."/".$file.".js"));

							}

						}

						closedir($dir);

					}

				}



				if(filemtime($this->cache_file) >= $cache_date){

					// if cache file is up to date

					$last_modified = gmdate("D, d M Y H:i:s",filemtime($this->cache_file))." GMT";

					if (isset($_SERVER["HTTP_IF_MODIFIED_SINCE"]) && strcasecmp($_SERVER["HTTP_IF_MODIFIED_SINCE"], $last_modified) === 0)

					{

						header("HTTP/1.1 304 Not Modified");

						header("Last-modified: ".$last_modified);

						header("Cache-Control: Public"); // Tells HTTP 1.1 clients to cache

						header("Pragma:"); // Tells HTTP 1.0 clients to cache

					}

					else

					{

						header("Last-modified: ".$last_modified);

						header("Cache-Control: Public"); // Tells HTTP 1.1 clients to cache

						header("Pragma:"); // Tells HTTP 1.0 clients to cache

						header('Content-Length: '.filesize($this->cache_file));

						echo file_get_contents($this->cache_file);

					}				

					die;

				}

			}

			return false;

		}

		

		function load_files()

		{

			$loader= $this->get_content("edit_area_loader.js")."\n";

			

			// get the list of other files to load

	    	$loader= preg_replace("/(t\.scripts_to_load=\s*)\[([^\]]*)\];/e"

						, "\$this->replace_scripts('script_list', '\\1', '\\2')"

						, $loader);

		

			$loader= preg_replace("/(t\.sub_scripts_to_load=\s*)\[([^\]]*)\];/e"

						, "\$this->replace_scripts('sub_script_list', '\\1', '\\2')"

						, $loader);



			// replace languages names

			$reg_path= $this->path."reg_syntax/";

			$a_displayName	= array();

			if (($dir = @opendir($reg_path)) !== false)

			{

				while (($file = readdir($dir)) !== false)

				{

					if( $file !== "." && $file !== ".." && ( $pos = strpos( $file, '.js' ) ) !== false )

					{

						$jsContent	= $this->file_get_contents( $reg_path.$file );

						if( preg_match( '@(\'|")DISPLAY_NAME\1\s*:\s*(\'|")(.*)\2@', $jsContent, $match ) )

						{

							$a_displayName[] = "'". substr( $file, 0, $pos ) ."':'". htmlspecialchars( $match[3], ENT_QUOTES ) ."'";

						}

					}

				}

				closedir($dir);

			}

			$loader	= str_replace( '/*syntax_display_name_AUTO-FILL-BY-COMPRESSOR*/', implode( ",", $a_displayName ), $loader );

						

			$this->datas= $loader;

			$this->compress_javascript($this->datas);

			

			// load other scripts needed for the loader

			preg_match_all('/"([^"]*)"/', $this->script_list, $match);

			foreach($match[1] as $key => $value)

			{

				$content= $this->get_content(preg_replace("/\\|\//i", "", $value).".js");

				$this->compress_javascript($content);

				$this->datas.= $content."\n";

			}

			//$this->datas);

			//$this->datas= preg_replace('/(( |\t|\r)*\n( |\t)*)+/s', "", $this->datas);

			

			// improved compression step 1/2	

			$this->datas= preg_replace(array("/(\b)EditAreaLoader(\b)/", "/(\b)editAreaLoader(\b)/", "/(\b)editAreas(\b)/"), array("EAL", "eAL", "eAs"), $this->datas);

			//$this->datas= str_replace(array("EditAreaLoader", "editAreaLoader", "editAreas"), array("EAL", "eAL", "eAs"), $this->datas);

			$this->datas.= "var editAreaLoader= eAL;var editAreas=eAs;EditAreaLoader=EAL;";

		

			// load sub scripts

			$sub_scripts="";

			$sub_scripts_list= array();

			preg_match_all('/"([^"]*)"/', $this->sub_script_list, $match);

			foreach($match[1] as $value){

				$sub_scripts_list[]= preg_replace("/\\|\//i", "", $value).".js";

			}

		

			if($this->load_all_plugins){

				// load plugins scripts

				$plug_path= $this->path."plugins/";

				if (($dir = @opendir($plug_path)) !== false)

				{

					while (($file = readdir($dir)) !== false)

					{

						if ($file !== "." && $file !== "..")

						{

							if(is_dir($plug_path.$file) && file_exists($plug_path.$file."/".$file.".js"))

								$sub_scripts_list[]= "plugins/".$file."/".$file.".js";

						}

					}

					closedir($dir);

				}

			}

							

			foreach($sub_scripts_list as $value){

				$sub_scripts.= $this->get_javascript_content($value);

			}

			// improved compression step 2/2	

			$sub_scripts= preg_replace(array("/(\b)editAreaLoader(\b)/", "/(\b)editAreas(\b)/", "/(\b)editArea(\b)/", "/(\b)EditArea(\b)/"), array("eAL", "eAs", "eA", "EA"), $sub_scripts);

		//	$sub_scripts= str_replace(array("editAreaLoader", "editAreas", "editArea", "EditArea"), array("eAL", "eAs", "eA", "EA"), $sub_scripts);

			$sub_scripts.= "var editArea= eA;EditArea=EA;";

			

			

			// add the scripts

		//	$this->datas.= sprintf("editAreaLoader.iframe_script= \"<script type='text/javascript'>%s</script>\";\n", $sub_scripts);

		

		

			// add the script and use a last compression 

			if( $this->param['compress'] )

			{

				$last_comp	= array( 'Á' => 'this',

								 'Â' => 'textarea',

								 'Ã' => 'function',

								 'Ä' => 'prototype',

								 'Å' => 'settings',

								 'Æ' => 'length',

								 'Ç' => 'style',

								 'È' => 'parent',

								 'É' => 'last_selection',

								 'Ê' => 'value',

								 'Ë' => 'true',

								 'Ì' => 'false'

								 /*,

									'Î' => '"',

								 'Ï' => "\n",

								 'À' => "\r"*/);

			}

			else

			{

				$last_comp	= array();

			}

			

			$js_replace= '';

			foreach( $last_comp as $key => $val )

				$js_replace .= ".replace(/". $key ."/g,'". str_replace( array("\n", "\r"), array('\n','\r'), $val ) ."')";

			

			$this->datas.= sprintf("editAreaLoader.iframe_script= \"<script type='text/javascript'>%s</script>\"%s;\n",

								str_replace( array_values($last_comp), array_keys($last_comp), $sub_scripts ), 

								$js_replace);

			

			if($this->load_all_plugins)

				$this->datas.="editAreaLoader.all_plugins_loaded=true;\n";

		

			

			// load the template

			$this->datas.= sprintf("editAreaLoader.template= \"%s\";\n", $this->get_html_content("template.html"));

			// load the css

			$this->datas.= sprintf("editAreaLoader.iframe_css= \"<style>%s</style>\";\n", $this->get_css_content("edit_area.css"));

					

		//	$this->datas= "function editArea(){};editArea.prototype.loader= function(){alert('bouhbouh');} var a= new editArea();a.loader();";

					

		}

		

		function send_datas()

		{

			if($this->param['debug']){

				$header=sprintf("/* USE PHP COMPRESSION\n");

				$header.=sprintf("javascript size: based files: %s => PHP COMPRESSION => %s ", $this->file_loaded_size, strlen($this->datas));

				if($this->use_gzip){

					$gzip_datas=  gzencode($this->datas, 9, FORCE_GZIP);				

					$header.=sprintf("=> GZIP COMPRESSION => %s", strlen($gzip_datas));

					$ratio = round(100 - strlen($gzip_datas) / $this->file_loaded_size * 100.0);			

				}else{

					$ratio = round(100 - strlen($this->datas) / $this->file_loaded_size * 100.0);

				}

				$header.=sprintf(", reduced by %s%%\n", $ratio);

				$header.=sprintf("compression time: %s\n", $this->get_microtime()-$this->start_time); 

				$header.=sprintf("%s\n", implode("\n", $this->infos));

				$header.=sprintf("*/\n");

				$this->datas= $header.$this->datas;	

			}

			$mtime= time(); // ensure that the 2 disk files will have the same update time

			// generate gzip file and cahce it if using disk cache

			if($this->use_gzip){

				$this->gzip_datas= gzencode($this->datas, 9, FORCE_GZIP);

				if($this->param['use_disk_cache'])

					$this->file_put_contents($this->gzip_cache_file, $this->gzip_datas, $mtime);

			}

			

			// generate full js file and cache it if using disk cache			

			if($this->param['use_disk_cache'])

				$this->file_put_contents($this->full_cache_file, $this->datas, $mtime);

			

			// generate output

			if($this->use_gzip)

				echo $this->gzip_datas;

			else

				echo $this->datas;

				

//			die;

		}

				

		

		function get_content($end_uri)

		{

			$end_uri=preg_replace("/\.\./", "", $end_uri); // Remove any .. (security)

			$file= $this->path.$end_uri;

			if(file_exists($file)){

				$this->infos[]=sprintf("'%s' loaded", $end_uri);

				/*$fd = fopen($file, 'rb');

				$content = fread($fd, filesize($file));

				fclose($fd);

				return $content;*/

				return $this->file_get_contents($file);

			}else{

				$this->infos[]=sprintf("'%s' not loaded", $end_uri);

				return "";

			}

		}

		

		function get_javascript_content($end_uri)

		{

			$val=$this->get_content($end_uri);

	

			$this->compress_javascript($val);

			$this->prepare_string_for_quotes($val);

			return $val;

		}

		

		function compress_javascript(&$code)

		{

			if($this->param['compress'])

			{

				// remove all comments

				//	(\"(?:[^\"\\]*(?:\\\\)*(?:\\\"?)?)*(?:\"|$))|(\'(?:[^\'\\]*(?:\\\\)*(?:\\'?)?)*(?:\'|$))|(?:\/\/(?:.|\r|\t)*?(\n|$))|(?:\/\*(?:.|\n|\r|\t)*?(?:\*\/|$))

				$code= preg_replace("/(\"(?:[^\"\\\\]*(?:\\\\\\\\)*(?:\\\\\"?)?)*(?:\"|$))|(\'(?:[^\'\\\\]*(?:\\\\\\\\)*(?:\\\\\'?)?)*(?:\'|$))|(?:\/\/(?:.|\r|\t)*?(\n|$))|(?:\/\*(?:.|\n|\r|\t)*?(?:\*\/|$))/s", "$1$2$3", $code);

				// remove line return, empty line and tabulation

				$code= preg_replace('/(( |\t|\r)*\n( |\t)*)+/s', " ", $code);

				// add line break before "else" otherwise navigators can't manage to parse the file

				$code= preg_replace('/(\b(else)\b)/', "\n$1", $code);

				// remove unnecessary spaces

				$code= preg_replace('/( |\t|\r)*(;|\{|\}|=|==|\-|\+|,|\(|\)|\|\||&\&|\:)( |\t|\r)*/', "$2", $code);

			}

		}

		

		function get_css_content($end_uri){

			$code=$this->get_content($end_uri);

			// remove comments

			$code= preg_replace("/(?:\/\*(?:.|\n|\r|\t)*?(?:\*\/|$))/s", "", $code);

			// remove spaces

			$code= preg_replace('/(( |\t|\r)*\n( |\t)*)+/s', "", $code);

			// remove spaces

			$code= preg_replace('/( |\t|\r)?(\:|,|\{|\})( |\t|\r)+/', "$2", $code);

		

			$this->prepare_string_for_quotes($code);

			return $code;

		}

		

		function get_html_content($end_uri){

			$code=$this->get_content($end_uri);

			//$code= preg_replace('/(\"(?:\\\"|[^\"])*(?:\"|$))|' . "(\'(?:\\\'|[^\'])*(?:\'|$))|(?:\/\/(?:.|\r|\t)*?(\n|$))|(?:\/\*(?:.|\n|\r|\t)*?(?:\*\/|$))/s", "$1$2$3", $code);

			$code= preg_replace('/(( |\t|\r)*\n( |\t)*)+/s', " ", $code);

			$this->prepare_string_for_quotes($code);

			return $code;

		}

		

		function prepare_string_for_quotes(&$str){

			// prepare the code to be putted into quotes 

			/*$pattern= array("/(\\\\)?\"/", '/\\\n/'	, '/\\\r/'	, "/(\r?\n)/");

			$replace= array('$1$1\\"', '\\\\\\n', '\\\\\\r'	, '\\\n"$1+"');*/

			$pattern= array("/(\\\\)?\"/", '/\\\n/'	, '/\\\r/'	, "/(\r?\n)/");

			if($this->param['compress'])

				$replace= array('$1$1\\"', '\\\\\\n', '\\\\\\r'	, '\n');

			else

				$replace= array('$1$1\\"', '\\\\\\n', '\\\\\\r'	, "\\n\"\n+\"");

			$str= preg_replace($pattern, $replace, $str);

		}

		

		function replace_scripts($var, $param1, $param2)

		{

			$this->$var=stripslashes($param2);

	        return $param1."[];";

		}



		/* for php version that have not thoses functions */

		function file_get_contents($file)

		{

			$fd = fopen($file, 'rb');

			$content = fread($fd, filesize($file));

			fclose($fd);

			$this->file_loaded_size+= strlen($content);

			return $content;				

		}

		

		function file_put_contents($file, &$content, $mtime=-1)

		{

			if($mtime==-1)

				$mtime=time();

			$fp = @fopen($file, "wb");

			if ($fp) {

				fwrite($fp, $content);

				fclose($fp);

				touch($file, $mtime);

				return true;

			}

			return false;

		}

		

		function get_microtime()

		{

		   list($usec, $sec) = explode(" ", microtime());

		   return ((float)$usec + (float)$sec);

		}

	}	

?>