ConLite/conlite/external/edit_area/edit_area_compressor_cl.php

405 Zeilen
17 KiB
PHP

<?php
/**
* Adapted version of editarea compressor for ConLite
*
* @package EditArea
* @author Ortwin Pinke <o.pinke@conlite.org>
* @version $Rev$
*
* $Id$
*/
/* * ****
*
* EditArea PHP compressor
* Developped by Christophe Dolivet
* Released under LGPL, Apache and BSD licenses
* v1.1.3 (2007/01/18)
*
* **** */
if (!defined("CON_FRAMEWORK")) {
define("CON_FRAMEWORK", true);
}
include_once dirname(dirname(dirname(__FILE__)))."/includes/startup.php";
// 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 CL_Compressor($param);
class CL_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__) . "/";
$this->cachepath = dirname(dirname(dirname(dirname(__FILE__)))) . "/data/cache/";
if (isset($_GET['plugins'])) {
$this->load_all_plugins = true;
$this->full_cache_file = $this->cachepath . "edit_area_full_with_plugins.js";
$this->gzip_cache_file = $this->cachepath . "edit_area_full_with_plugins.gz";
} else {
$this->load_all_plugins = false;
$this->full_cache_file = $this->cachepath . "edit_area_full.js";
$this->gzip_cache_file = $this->cachepath . "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->cachepath)) {
while (($file = readdir($dir)) !== false) {
if (is_file($this->cachepath . $file) && $file != "." && $file != "..")
$cache_date = max($cache_date, filemtime($this->cachepath . $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
preg_match_all("/(t\.scripts_to_load=\s*)\[([^\]]*)\];/", $loader, $matches, PREG_SET_ORDER);
foreach ($matches as $val) {
$newValue = $this->replace_scripts("script_list", $val[1], $val[2]);
$loader = str_replace($val[0], $newValue, $loader);
}
preg_match_all("/(t\.sub_scripts_to_load=\s*)\[([^\]]*)\];/", $loader, $matches, PREG_SET_ORDER);
foreach ($matches as $val) {
$newValue = $this->replace_scripts("sub_script_list", $val[1], $val[2]);
$loader = str_replace($val[0], $newValue, $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) . "':'" . clHtmlSpecialChars($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);
}
}
?>