AnonymousFox

/home/develito/www/plugins/system/sunfw/includes/site/compress/js.php

<?php
/**
 * @version    $Id$
 * @package    SUN Framework
 * @author     JoomlaShine Team <support@joomlashine.com>
 * @copyright  Copyright (C) 2012 JoomlaShine.com. All Rights Reserved.
 * @license    GNU/GPL v2 or later http://www.gnu.org/licenses/gpl-2.0.html
 *
 * Websites: http://www.joomlashine.com
 * Technical Support:  Feedback - http://www.joomlashine.com/contact-us/get-support.html
 */

// No direct access to this file.
defined('_JEXEC') or die('Restricted access');

// Import necessary Joomla libraries
jimport('joomla.filesystem.folder');
jimport('joomla.filesystem.file');

/**
 * Javascript compression class.
 *
 * @package     SUN Framework
 * @since       1.0.0
 */
abstract class SunFwSiteCompressJs
{

/**
	 * Method to compress the specified stylesheet files.
	 *
	 * @param   array  $styleSheets  Array of stylesheets to compress.
	 *
	 * @return  array  Array of compressed files.
	 */
	public static function compress($scripts)
	{
		static $compressedFiles;

// Get object for working with URI
		$uri = JUri::getInstance();

// Generate link prefix if current scheme is HTTPS
		$prefix = '';

if ($uri->getScheme() == 'https')
		{
			$prefix = $uri->toString(array(
				'scheme',
				'host',
				'port'
			));
		}

// Initialize variables
		$groupIndex = 0;
		$groupType = 'default';
		$groupFiles = array();
		$compress = array();

// Sometime, script file need to be stored in the original location and file name
		$systemData = SunFwSite::getInstance()->system_data;
		$leaveAlone = preg_split('/[\r\n]+/', $systemData['compressionExclude']);

// We already know some files must be excluded from compression
		$leaveAlone[] = 'modal.js';
		$leaveAlone[] = 'tiny_mce.js';
		$leaveAlone[] = 'tinymce.min.js';

// Parse script tags
		foreach ($scripts as $src => $args)
		{
			// Set default group
			$attributes['group'] = 'default';
			$attributes['src'] = $src;

// Check if script should be loaded within conditional checking tags?
			if (@is_array($args['options']) && !empty($args['options']['conditional']))
			{
				// Add collected files to compress list
				if (!empty($groupFiles))
				{
					$compress[] = array(
						'files' => $groupFiles[$groupIndex],
						'group' => $groupType
					);

$groupFiles = array();
				}

$compress[] = array(
					'src' => $attributes['src'],
					'args' => $args
				);

continue;
			}

// Add to result list if this is external file
			if (!( $isInternal = SunFwSiteCompressHelper::isInternal($attributes['src']) ) or strpos($attributes['src'], '//') === 0)
			{
				// Add collected files to compress list
				if (!empty($groupFiles))
				{
					$compress[] = array(
						'files' => $groupFiles[$groupIndex],
						'group' => $groupType
					);

$groupFiles = array();
				}

$compress[] = array(
					'src' => $attributes['src'],
					'args' => $args
				);

continue;
			}

// Add to result list if this is dynamic generation content
			if (( $questionPos = strpos($attributes['src'], '?') ) !== false)
			{
				$isDynamic = ( substr($attributes['src'], $questionPos - 4, 4) == '.php' );
				$path = SunFwSiteCompressHelper::getFilePath(substr($attributes['src'], 0, $questionPos));

// Check if this is a dynamic generation content
				if (!$isDynamic and SunFwSiteCompressHelper::isInternal($attributes['src']))
				{
					$isDynamic = !is_file($path);
				}

if ($isDynamic)
				{
					// Add collected files to compress list
					if (!empty($groupFiles))
					{
						$compress[] = array(
							'files' => $groupFiles[$groupIndex],
							'group' => $groupType
						);

$groupFiles = array();
					}

$compress[] = array(
						'src' => $attributes['src'],
						'args' => $args
					);

continue;
				}
			}

// Check if reserving script file name is required
			$scriptName = basename($questionPos !== false ? $path : $attributes['src']);

if (in_array($scriptName, $leaveAlone))
			{
				$attributes['group'] = 'reserve|' . $attributes['src'];
			}

// Create new compression group if reserving script file name is required
			if ($attributes['group'] != $groupType)
			{
				// Add collected files to compress list
				if (isset($groupFiles[$groupIndex]) and !empty($groupFiles[$groupIndex]))
				{
					$compress[] = array(
						'files' => $groupFiles[$groupIndex],
						'group' => $groupType
					);
				}

// Increase index number of the group
				$groupIndex++;
				$groupType = $attributes['group'];
			}

// Initial group
			if (!isset($groupFiles[$groupIndex]))
			{
				$groupFiles[$groupIndex] = array();
			}

$src = $attributes['src'];
			$queryStringIndex = strpos($src, '?');

if ($queryStringIndex !== false)
			{
				$src = substr($src, 0, $queryStringIndex);
			}

// Add file to the group
			$groupFiles[$groupIndex][] = preg_match('/^reserve\|(.+)$/', $groupType) ? $attributes['src'] : $src;
		}

// Add collected files to result list
		if (isset($groupFiles[$groupIndex]) and !empty($groupFiles[$groupIndex]))
		{
			$compress[] = array(
				'files' => $groupFiles[$groupIndex],
				'group' => $groupType
			);
		}

// Initial compress result
		$compressResult = array();
		$fileCompressed = array();

// Get template details
		$templateName = PlgSystemSunFw::$template ? PlgSystemSunFw::$template->template : JFactory::getApplication()->getTemplate();

// Generate path to store compressed files
		$compressPath = SunFwSiteHelper::getCacheDirectory() . '/' . $templateName . '/';

// Create directory if not exists
		if (!is_dir($compressPath))
		{
			JFolder::create($compressPath);
		}

// Loop to each compress element to compress file
		$modifiedFlag = false;

foreach ($compress as $group)
		{
			// Ignore compress when group is a external file
			if (isset($group['src']))
			{
				$compressResult[] = sprintf('<script src="%s" type="text/javascript"></script>', $group['src']);
				$fileCompressed[] = $group;
				continue;
			}

// Check if reserving script file name is required
			if (isset($group['group']) and preg_match('/^reserve\|(.+)$/', $group['group']))
			{
				$compressResult[] = sprintf('<script src="%s" type="text/javascript"></script>', $group['files'][0]);
				$fileCompressed[] = $group['files'][0];
				continue;
			}

// Generate compress file name
			$compressFile = md5(implode('', $group['files'])) . '.js';
			$lastModified = 0;
			$splittedFiles = array();

// Check last modified time for each file in the group
			foreach ($group['files'] as $file)
			{
				$path = SunFwSiteCompressHelper::getFilePath($file);
				$lastModified = ( is_file($path) && @filemtime($path) > $lastModified ) ? @filemtime($path) : $lastModified;
			}

if (@filemtime($compressPath . $compressFile) < $lastModified)
			{
				$modifiedFlag = true;
			}

// Compress group when expired
			if (!is_file($compressPath . $compressFile) || $modifiedFlag)
			{
				// Preset compression buffer
				$buffer = '';

// Preset some variables to hold compression status
				$processedFiles = array();
				$maxFileSize = $maxFileSize = 1024 * (int) $systemData['maxCompressionSize'];
				$currentSize = 0;

// Read content of each file and write it to the cache file
				foreach ($group['files'] as $file)
				{
					$filePath = SunFwSiteCompressHelper::getFilePath($file);

// Skip when cannot access to file
					if (!is_file($filePath) or !is_readable($filePath))
					{
						continue;
					}

// Prepend path to source file
					$source = str_replace(str_replace('\\', '/', JPATH_ROOT), '', str_replace('\\', '/', $filePath));
					$source = "/* FILE: {$source} */\n" . self::minify(JFile::read($filePath));

// Get length of processed content
					$length = strlen($source);

if ($length > $maxFileSize or ( $currentSize + $length ) > $maxFileSize)
					{
						if (!empty($buffer))
						{
							// Write buffer to cache file
							JFile::write($compressPath . $compressFile, $buffer);

// Rename created cache file
							if ($currentSize > 0)
							{
								$newFileName = md5(implode('', $processedFiles)) . '.js';
								JFile::move($compressPath . $compressFile, $compressPath . $newFileName);

// Save every compressed file associated with this page for maintenance later
								$compressedFiles[] = str_replace('\\', '/', $compressPath) . $newFileName;

// Store splitted file URL for later reference
								$splittedFiles[] = $prefix . str_replace(str_replace('\\', '/', JPATH_ROOT), JUri::root(true),
									str_replace('\\', '/', $compressPath)) . $newFileName;
							}

// Reset compression buffer
							$buffer = '';
						}

// Reset current file size
						$currentSize = $length;

$processedFiles = array(
							$filePath
						);
					}
					else
					{
						// Update current file size
						$currentSize += $length;

$processedFiles[] = $filePath;
					}

// Append processed content to buffer
					$buffer .= ( empty($buffer) ? '' : "\n" ) . $source . ";\n";
				}

// Write buffer to cache file
				JFile::write($compressPath . $compressFile, $buffer);

// Save every compressed file associated with this page for maintenance later
				$compressedFiles[] = str_replace('\\', '/', $compressPath) . $compressFile;

// Prepend splitted compress files into trackable compress file
				if (count($splittedFiles))
				{
					for ($n = count($splittedFiles), $i = $n - 1; $i >= 0; $i--)
					{
						SunFwSiteCompressHelper::prependIntoFile("// Include: {$splittedFiles[$i]}" . ( $i + 1 < $n ? "\n" : "\n\n" ),
							$compressPath . $compressFile);
					}
				}
			}
			else
			{
				// Read compressed file for list of splitted file
				$include = file_get_contents($compressPath . $compressFile);
				$include = substr($include, 0, strpos($include, "\n\n"));

// Parse splitted compress file
				foreach (explode("\n", $include) as $line)
				{
					if (strpos($line, '// Include: ') === 0)
					{
						$splittedFiles[] = str_replace('// Include: ', '', $line);
					}
				}
			}

// Load splitted compress file
			if (count($splittedFiles))
			{
				foreach ($splittedFiles as $file)
				{
					$compressResult[] = sprintf('<script src="%s" type="text/javascript"></script>', $file);
					$fileCompressed[] = $file;
				}
			}

// Add compressed file to the compress result list
			$compressUrl = str_replace(str_replace('\\', '/', JPATH_ROOT), JUri::root(true), str_replace('\\', '/', $compressPath)) .
				 $compressFile;
			$compressResult[] = sprintf('<script src="%s" type="text/javascript"></script>', $prefix . $compressUrl);
			$fileCompressed[] = $prefix . $compressUrl;
		}

// Verify if scripts associated with this page has been changed
		if (isset($compressedFiles))
		{
			$trackFile = $compressPath . 'tracking.php';
			$pageLink = JUri::current();
			$cleanUp = array();

if (file_exists($trackFile))
			{
				if (!file_exists("{$trackFile}.lock"))
				{
					// Get tracking data
					include $trackFile;

if (isset($tracking) && isset($tracking[$pageLink]) && isset($tracking[$pageLink]['js']))
					{
						foreach ($tracking[$pageLink]['js'] as $file)
						{
							if (!in_array($file, $compressedFiles))
							{
								// Store obsolete file to be removed
								$cleanUp[] = $file;
							}
						}

// Remove obsolete file only if not used in another page
						foreach ($cleanUp as $file)
						{
							$removable = true;

foreach ($tracking as $link => $assets)
							{
								if ($pageLink == $link)
								{
									continue;
								}

if (!empty($assets['js']) && in_array($file, $assets['js']))
								{
									$removable = false;

break;
								}
							}

if ($removable && !$modifiedFlag)
							{
								JFile::delete($file);
							}
						}
					}
				}
			}
			else
			{
				// Clean all unmaintained compressed files
				if ($files = glob($compressPath . '*.js'))
				{
					foreach ($files as $file)
					{
						$file = str_replace('\\', '/', $file);

if (!in_array($file, $compressedFiles))
						{
							JFile::delete($file);
						}
					}
				}
			}

// Update tracking file if not locked
			if (!file_exists("{$trackFile}.lock"))
			{
				// Create lock file
				$content = 'Updating';

JFile::write("{$trackFile}.lock", $content);

// Preset tracking array
				if (!isset($tracking))
				{
					$tracking = array(
						$pageLink => array()
					);
				}

$tracking[$pageLink]['js'] = $compressedFiles;

// Update tracking data
				$content = "<?php\n\$tracking = json_decode('" . json_encode($tracking) . "', true);\n?>";

// Update tracking file
				JFile::write($trackFile, $content);

// Remove lock file
				JFile::delete("{$trackFile}.lock");
			}
		}

return $fileCompressed;
	}

/**
	 * Minify Javascript source code.
	 *
	 * @param   string  $source  Javascript source code.
	 *
	 * @return  string
	 */
	protected static function minify($source)
	{
		// Remove all single-line comments.
		$source = preg_replace('#(\r?\n)[ \t]*//[^\r\n]+#', '', $source);

// Remove all blank lines.
		$source = preg_replace('#(\r?\n)[ \t]*[\r\n]+#', '\\1', $source);

// Remove all leading while-spaces.
		$source = preg_replace('#(\r?\n)[ \t]+#', '\\1', $source);

// Remove all trailing while-spaces.
		$source = preg_replace('#[ \t]+(\r?\n)#', '\\1', $source);

return trim($source);
	}
}