2984 lines
96 KiB
PHP
2984 lines
96 KiB
PHP
|
<?php
|
|||
|
|
/**
|
|||
|
|
* class.util.php
|
|||
|
|
*
|
|||
|
|
* @package gulliver.system
|
|||
|
|
*
|
|||
|
|
*
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
class G
|
|||
|
|
{
|
|||
|
|
/**
|
|||
|
|
* mk_dir , copied from class.G.php
|
|||
|
|
*
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function mk_dir($strPath, $rights = 0777) {
|
|||
|
|
$folder_path = array ( $strPath );
|
|||
|
|
$oldumask = umask ( 0 );
|
|||
|
|
while ( ! @is_dir ( dirname ( end ( $folder_path ) ) ) && dirname ( end ( $folder_path ) ) != '/' && dirname ( end ( $folder_path ) ) != '.' && dirname ( end ( $folder_path ) ) != '' ) {
|
|||
|
|
array_push ( $folder_path, dirname ( end ( $folder_path ) ) );
|
|||
|
|
// var_dump($folder_path);
|
|||
|
|
// die;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
while ( $parent_folder_path = array_pop ( $folder_path ) ) {
|
|||
|
|
if (! @is_dir ( $parent_folder_path )) {
|
|||
|
|
if (! @mkdir ( $parent_folder_path, $rights )) {
|
|||
|
|
// trigger_error ("Can't create folder
|
|||
|
|
// \"$parent_folder_path\".", E_USER_WARNING);
|
|||
|
|
umask ( $oldumask );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* verify if all files & directories passed by param.
|
|||
|
|
* are writable
|
|||
|
|
*
|
|||
|
|
* @author Erik Amaru Ortiz <erik@colosa.com>
|
|||
|
|
* @param $resources array
|
|||
|
|
* a list of files to verify write access
|
|||
|
|
*/
|
|||
|
|
public function verifyWriteAccess($resources) {
|
|||
|
|
$noWritable = array ();
|
|||
|
|
foreach ( $resources as $i => $resource ) {
|
|||
|
|
if (! is_writable ( $resource )) {
|
|||
|
|
$noWritable [] = $resource;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (count ( $noWritable ) > 0) {
|
|||
|
|
$e = new Exception ( "Write access not allowed for ProcessMaker resources" );
|
|||
|
|
$e->files = $noWritable;
|
|||
|
|
throw $e;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* render a smarty template
|
|||
|
|
*
|
|||
|
|
* @author Erik Amaru Ortiz <erik@colosa.com>
|
|||
|
|
* @param $template string
|
|||
|
|
* containing the template filename on /gulliver/templates/
|
|||
|
|
* directory
|
|||
|
|
* @param $data associative
|
|||
|
|
* array containig the template data
|
|||
|
|
*/
|
|||
|
|
public function renderTemplate($template, $data = array()) {
|
|||
|
|
if (! defined ( 'PATH_THIRDPARTY' )) {
|
|||
|
|
throw new Exception ( 'System constant (PATH_THIRDPARTY) is not defined!' );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
require_once PATH_THIRDPARTY . 'smarty/libs/Smarty.class.php';
|
|||
|
|
$fInfo = pathinfo ( $template );
|
|||
|
|
|
|||
|
|
$tplExists = true;
|
|||
|
|
|
|||
|
|
// file has absolute path
|
|||
|
|
if (substr ( $template, 0, 1 ) != PATH_SEP) {
|
|||
|
|
$template = PATH_TEMPLATE . $template;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// fix for template that have dot in its name but is not a valid
|
|||
|
|
// extension
|
|||
|
|
if (isset ( $fInfo ['extension'] ) && ($fInfo ['extension'] != 'tpl' || $fInfo ['extension'] != 'html')) {
|
|||
|
|
unset ( $fInfo ['extension'] );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (! isset ( $fInfo ['extension'] )) {
|
|||
|
|
if (file_exists ( $template . '.tpl' )) {
|
|||
|
|
$template .= '.tpl';
|
|||
|
|
} elseif (file_exists ( $template . '.html' )) {
|
|||
|
|
$template .= '.html';
|
|||
|
|
} else {
|
|||
|
|
$tplExists = false;
|
|||
|
|
}
|
|||
|
|
} else {
|
|||
|
|
if (! file_exists ( $template )) {
|
|||
|
|
$tplExists = false;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (! $tplExists) {
|
|||
|
|
throw new Exception ( "Template: $template, doesn't exist!" );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$smarty = new Smarty ();
|
|||
|
|
$smarty->compile_dir = g::sys_get_temp_dir ();
|
|||
|
|
$smarty->cache_dir = g::sys_get_temp_dir ();
|
|||
|
|
$smarty->config_dir = PATH_THIRDPARTY . 'smarty/configs';
|
|||
|
|
|
|||
|
|
$smarty->template_dir = PATH_TEMPLATE;
|
|||
|
|
$smarty->force_compile = true;
|
|||
|
|
|
|||
|
|
foreach ( $data as $key => $value ) {
|
|||
|
|
$smarty->assign ( $key, $value );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$smarty->display ( $template );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Load Gulliver Classes
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $strClass
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function LoadSystem($strClass) {
|
|||
|
|
require_once (PATH_GULLIVER . 'class.' . $strClass . '.php');
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Get the temporal directory path on differents O.S.
|
|||
|
|
* i.e. /temp -> linux, C:/Temp -> win
|
|||
|
|
*
|
|||
|
|
* @author <erik@colosa.com>
|
|||
|
|
*/
|
|||
|
|
public function sys_get_temp_dir() {
|
|||
|
|
if (! function_exists ( 'sys_get_temp_dir' )) {
|
|||
|
|
// Based on http://www.phpit.net/
|
|||
|
|
// article/creating-zip-tar-archives-dynamically-php/2/
|
|||
|
|
// Try to get from environment variable
|
|||
|
|
if (! empty ( $_ENV ['TMP'] )) {
|
|||
|
|
return realpath ( $_ENV ['TMP'] );
|
|||
|
|
} elseif (! empty ( $_ENV ['TMPDIR'] )) {
|
|||
|
|
return realpath ( $_ENV ['TMPDIR'] );
|
|||
|
|
} elseif (! empty ( $_ENV ['TEMP'] )) {
|
|||
|
|
return realpath ( $_ENV ['TEMP'] );
|
|||
|
|
} else {
|
|||
|
|
// Detect by creating a temporary file
|
|||
|
|
// Try to use system's temporary directory as random name
|
|||
|
|
// shouldn't exist
|
|||
|
|
$temp_file = tempnam ( md5 ( uniqid ( rand (), true ) ), '' );
|
|||
|
|
if ($temp_file) {
|
|||
|
|
$temp_dir = realpath ( dirname ( $temp_file ) );
|
|||
|
|
unlink ( $temp_file );
|
|||
|
|
return $temp_dir;
|
|||
|
|
} else {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
} else {
|
|||
|
|
return sys_get_temp_dir ();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Transform a public URL into a local path.
|
|||
|
|
*
|
|||
|
|
* @author David S. Callizaya S. <davidsantos@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $url
|
|||
|
|
* @param string $corvertionTable
|
|||
|
|
* @param string $realPath
|
|||
|
|
* = local path
|
|||
|
|
* @return boolean
|
|||
|
|
*/
|
|||
|
|
public function virtualURI($url, $convertionTable, &$realPath) {
|
|||
|
|
foreach ( $convertionTable as $urlPattern => $localPath ) {
|
|||
|
|
// $urlPattern = addcslashes( $urlPattern , '/');
|
|||
|
|
$urlPattern = addcslashes ( $urlPattern, './' );
|
|||
|
|
$urlPattern = '/^' . str_replace ( array (
|
|||
|
|
'*',
|
|||
|
|
'?'
|
|||
|
|
), array (
|
|||
|
|
'.*',
|
|||
|
|
'.?'
|
|||
|
|
), $urlPattern ) . '$/';
|
|||
|
|
if (preg_match ( $urlPattern, $url, $match )) {
|
|||
|
|
if ($localPath === false) {
|
|||
|
|
$realPath = $url;
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
if ($localPath != 'jsMethod') {
|
|||
|
|
$realPath = $localPath . $match [1];
|
|||
|
|
} else {
|
|||
|
|
$realPath = $localPath;
|
|||
|
|
}
|
|||
|
|
return true;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
$realPath = $url;
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* streaming a file
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $file
|
|||
|
|
* @param boolean $download
|
|||
|
|
* @param string $downloadFileName
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function streamFile($file, $download = false, $downloadFileName = '') {
|
|||
|
|
require_once (PATH_THIRDPARTY . 'jsmin/jsmin.php');
|
|||
|
|
$folderarray = explode ( '/', $file );
|
|||
|
|
$typearray = explode ( '.', basename ( $file ) );
|
|||
|
|
$typefile = $typearray [count ( $typearray ) - 1];
|
|||
|
|
$filename = $file;
|
|||
|
|
|
|||
|
|
// trick to generate the translation.language.js file , merging two
|
|||
|
|
// files and then minified the content.
|
|||
|
|
if (strtolower ( $typefile ) == 'js' && $typearray [0] == 'translation') {
|
|||
|
|
$output = g::streamJSTranslationFile ( $filename, $typearray [1] );
|
|||
|
|
print $output;
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// trick to generate the big css file for ext style .
|
|||
|
|
if (strtolower ( $typefile ) == 'css' && $folderarray [count ( $folderarray ) - 2] == 'css') {
|
|||
|
|
$output = g::streamCSSBigFile ( $typearray [0] );
|
|||
|
|
print $output;
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (file_exists ( $filename )) {
|
|||
|
|
switch (strtolower ( $typefile )) {
|
|||
|
|
case 'swf' :
|
|||
|
|
g::sendHeaders ( $filename, 'application/x-shockwave-flash', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'js' :
|
|||
|
|
g::sendHeaders ( $filename, 'text/javascript', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'htm' :
|
|||
|
|
case 'html' :
|
|||
|
|
g::sendHeaders ( $filename, 'text/html', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'htc' :
|
|||
|
|
g::sendHeaders ( $filename, 'text/plain', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'json' :
|
|||
|
|
g::sendHeaders ( $filename, 'text/plain', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'gif' :
|
|||
|
|
g::sendHeaders ( $filename, 'image/gif', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'png' :
|
|||
|
|
g::sendHeaders ( $filename, 'image/png', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'jpg' :
|
|||
|
|
g::sendHeaders ( $filename, 'image/jpg', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'css' :
|
|||
|
|
g::sendHeaders ( $filename, 'text/css', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'css' :
|
|||
|
|
g::sendHeaders ( $filename, 'text/css', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'xml' :
|
|||
|
|
g::sendHeaders ( $filename, 'text/xml', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'txt' :
|
|||
|
|
g::sendHeaders ( $filename, 'text/html', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'doc' :
|
|||
|
|
case 'pdf' :
|
|||
|
|
case 'pm' :
|
|||
|
|
case 'po' :
|
|||
|
|
g::sendHeaders ( $filename, 'application/octet-stream', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
case 'php' :
|
|||
|
|
if ($download) {
|
|||
|
|
g::sendHeaders ( $filename, 'text/plain', $download, $downloadFileName );
|
|||
|
|
} else {
|
|||
|
|
require_once ($filename);
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 'tar' :
|
|||
|
|
g::sendHeaders ( $filename, 'application/x-tar', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
default :
|
|||
|
|
// throw new Exception ( "Unknown type of file '$file'. " );
|
|||
|
|
g::sendHeaders ( $filename, 'application/octet-stream', $download, $downloadFileName );
|
|||
|
|
break;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
} else {
|
|||
|
|
if (strpos ( $file, 'gulliver' ) !== false) {
|
|||
|
|
list ( $path, $filename ) = explode ( 'gulliver', $file );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$_SESSION ['phpFileNotFound'] = $file;
|
|||
|
|
g::header ( "location: /errors/error404.php?l=" . $_SERVER ['REQUEST_URI'] );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
switch (strtolower ( $typefile )) {
|
|||
|
|
case "js" :
|
|||
|
|
$paths = explode ( '/', $filename );
|
|||
|
|
$jsName = $paths [count ( $paths ) - 1];
|
|||
|
|
$output = '';
|
|||
|
|
$pathJs = PATH_GULLIVER_HOME . PATH_SEP . 'js' . PATH_SEP;
|
|||
|
|
switch ($jsName) {
|
|||
|
|
//
|
|||
|
|
case 'draw2d.js' :
|
|||
|
|
$cachePath = PATH_C . 'ExtJs' . PATH_SEP;
|
|||
|
|
$checksum = g::getCheckSum ( array (
|
|||
|
|
$pathJs . 'ext/wz_jsgraphics.js',
|
|||
|
|
$pathJs . 'ext/mootools.js',
|
|||
|
|
$pathJs . 'ext/moocanvas.js'
|
|||
|
|
) );
|
|||
|
|
|
|||
|
|
$cf = $cachePath . "ext-draw2d-cache.$checksum.js";
|
|||
|
|
$cfStored = g::getCacheFileNameByPattern ( $cachePath, 'ext-draw2d-cache.*.js' );
|
|||
|
|
// error_log("draw2d.js ".$checksum ."==".
|
|||
|
|
// $cfStored['checksum']);
|
|||
|
|
if (is_file ( $cfStored ['filename'] ) && $checksum == $cfStored ['checksum']) {
|
|||
|
|
$output = file_get_contents ( $cf );
|
|||
|
|
} else {
|
|||
|
|
if (is_file ( $cfStored ['filename'] )) {
|
|||
|
|
@unlink ( $cfStored ['filename'] );
|
|||
|
|
}
|
|||
|
|
$output .= JSMin::minify ( file_get_contents ( $pathJs . 'ext/wz_jsgraphics.js' ) );
|
|||
|
|
$output .= JSMin::minify ( file_get_contents ( $pathJs . 'ext/mootools.js' ) );
|
|||
|
|
$output .= JSMin::minify ( file_get_contents ( $pathJs . 'ext/moocanvas.js' ) );
|
|||
|
|
$output .= file_get_contents ( $pathJs . 'ext/draw2d.js' ); // already
|
|||
|
|
// minified
|
|||
|
|
file_put_contents ( $cf, $output );
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 'ext-all.js' :
|
|||
|
|
$cachePath = PATH_C . 'ExtJs' . PATH_SEP;
|
|||
|
|
$checksum = g::getCheckSum ( array (
|
|||
|
|
$pathJs . 'ext/pmos-common.js',
|
|||
|
|
$pathJs . 'ext/ux/miframe.js',
|
|||
|
|
$pathJs . 'ext/ux.locationbar/Ext.ux.LocationBar.js',
|
|||
|
|
$pathJs . 'ext/ux.statusbar/ext-statusbar.js',
|
|||
|
|
$pathJs . 'ext/ux.treefilterx/Ext.ux.tree.TreeFilterX.js'
|
|||
|
|
) );
|
|||
|
|
|
|||
|
|
$cfStored = g::getCacheFileNameByPattern ( $cachePath, 'ext-all-cache.*.js' );
|
|||
|
|
$cf = PATH_C . 'ExtJs' . PATH_SEP . "ext-all-cache.$checksum.js";
|
|||
|
|
if (is_file ( $cfStored ['filename'] ) && $checksum == $cfStored ['checksum']) {
|
|||
|
|
$output = file_get_contents ( $cf );
|
|||
|
|
} else {
|
|||
|
|
if (is_file ( $cfStored ['filename'] )) {
|
|||
|
|
@unlink ( $cfStored ['filename'] );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$output .= file_get_contents ( $pathJs . 'ext/ext-all.js' ); // already
|
|||
|
|
// minified
|
|||
|
|
$output .= file_get_contents ( $pathJs . 'ext/ux/ux-all.js' ); // already
|
|||
|
|
// minified
|
|||
|
|
$output .= JSMin::minify ( file_get_contents ( $pathJs . 'ext/pmos-common.js' ) );
|
|||
|
|
$output .= JSMin::minify ( file_get_contents ( $pathJs . 'ext/ux/miframe.js' ) );
|
|||
|
|
$output .= JSMin::minify ( file_get_contents ( $pathJs . 'ext/ux.locationbar/Ext.ux.LocationBar.js' ) );
|
|||
|
|
$output .= JSMin::minify ( file_get_contents ( $pathJs . 'ext/ux.statusbar/ext-statusbar.js' ) );
|
|||
|
|
$output .= JSMin::minify ( file_get_contents ( $pathJs . 'ext/ux.treefilterx/Ext.ux.tree.TreeFilterX.js' ) );
|
|||
|
|
|
|||
|
|
file_put_contents ( $cf, $output );
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 'maborak.js' :
|
|||
|
|
$oHeadPublisher = & headPublisher::getSingleton ();
|
|||
|
|
foreach ( $oHeadPublisher->maborakFiles as $fileJS ) {
|
|||
|
|
$output .= JSMin::minify ( file_get_contents ( $fileJS ) );
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 'maborak.loader.js' :
|
|||
|
|
$oHeadPublisher = & headPublisher::getSingleton ();
|
|||
|
|
foreach ( $oHeadPublisher->maborakLoaderFiles as $fileJS ) {
|
|||
|
|
$output .= JSMin::minify ( file_get_contents ( $fileJS ) );
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
default :
|
|||
|
|
$output = JSMin::minify ( file_get_contents ( $filename ) );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
print $output;
|
|||
|
|
break;
|
|||
|
|
case 'css' :
|
|||
|
|
print g::trimSourceCodeFile ( $filename );
|
|||
|
|
break;
|
|||
|
|
default :
|
|||
|
|
@readfile ( $filename );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Parsing the URI
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $urlLink
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
static public function parseURI($uri, $isRestRequest = false) {
|
|||
|
|
// *** process the $_POST with magic_quotes enabled
|
|||
|
|
// The magic_quotes_gpc feature has been DEPRECATED as of PHP 5.3.0.
|
|||
|
|
if (get_magic_quotes_gpc () === 1) {
|
|||
|
|
$_POST = g::strip_slashes ( $_POST );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$aRequestUri = explode ( '/', $uri );
|
|||
|
|
if ($isRestRequest) {
|
|||
|
|
$args = self::parseRestUri ( $aRequestUri );
|
|||
|
|
} else {
|
|||
|
|
$args = self::parseNormalUri ( $aRequestUri );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
define ( "SYS_LANG", $args ['SYS_LANG'] );
|
|||
|
|
define ( "SYS_SKIN", $args ['SYS_SKIN'] );
|
|||
|
|
define ( 'SYS_COLLECTION', $args ['SYS_COLLECTION'] );
|
|||
|
|
define ( 'SYS_TARGET', $args ['SYS_TARGET'] );
|
|||
|
|
|
|||
|
|
if ($args ['SYS_COLLECTION'] == 'js2') {
|
|||
|
|
print "ERROR";
|
|||
|
|
die ();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* isPMUnderUpdating, Used to set a file flag to check if PM is upgrading.
|
|||
|
|
*
|
|||
|
|
* @setFlag Contains the flag to set or unset the temporary file:
|
|||
|
|
* 0 to delete the temporary file flag
|
|||
|
|
* 1 to set the temporary file flag.
|
|||
|
|
* 2 or bigger to check if the temporary file exists.
|
|||
|
|
* return true if the file exists, otherwise false.
|
|||
|
|
*/
|
|||
|
|
public function isPMUnderUpdating($setFlag = 2) {
|
|||
|
|
$fileCheck = PATH_DATA . "UPDATE.dat";
|
|||
|
|
if ($setFlag == 0) {
|
|||
|
|
if (file_exists ( $fileCheck )) {
|
|||
|
|
unlink ( $fileCheck );
|
|||
|
|
}
|
|||
|
|
} elseif ($setFlag == 1) {
|
|||
|
|
$fp = fopen ( $fileCheck, 'w' );
|
|||
|
|
$line = fputs ( $fp, "true" );
|
|||
|
|
}
|
|||
|
|
// checking temporary file
|
|||
|
|
if ($setFlag >= 1) {
|
|||
|
|
if (file_exists ( $fileCheck )) {
|
|||
|
|
return true;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* parse a smarty template and return teh result as string
|
|||
|
|
*
|
|||
|
|
* @author Erik Amaru Ortiz <erik@colosa.com>
|
|||
|
|
* @param $template string
|
|||
|
|
* containing the template filename on /gulliver/templates/
|
|||
|
|
* directory
|
|||
|
|
* @param $data associative
|
|||
|
|
* array containig the template data
|
|||
|
|
* @return $content string containing the parsed template content
|
|||
|
|
*/
|
|||
|
|
public function parseTemplate($template, $data = array()) {
|
|||
|
|
$content = '';
|
|||
|
|
|
|||
|
|
ob_start ();
|
|||
|
|
g::renderTemplate ( $template, $data );
|
|||
|
|
$content = ob_get_contents ();
|
|||
|
|
ob_get_clean ();
|
|||
|
|
|
|||
|
|
return $content;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* If the class is not defined by the aplication, it
|
|||
|
|
* attempt to load the class from gulliver.system
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>, David S. Callizaya
|
|||
|
|
* @access public
|
|||
|
|
* @param string $strClass
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function LoadClass($strClass) {
|
|||
|
|
$classfile = g::ExpandPath ( "classes" ) . 'class.' . $strClass . '.php';
|
|||
|
|
if (! file_exists ( $classfile )) {
|
|||
|
|
if (file_exists ( PATH_GULLIVER . 'class.' . $strClass . '.php' )) {
|
|||
|
|
return require_once (PATH_GULLIVER . 'class.' . $strClass . '.php');
|
|||
|
|
} else {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
} else {
|
|||
|
|
return require_once ($classfile);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Loads a Class.
|
|||
|
|
* If the class is not defined by the aplication, it
|
|||
|
|
* attempt to load the class from gulliver.system
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>, David S. Callizaya
|
|||
|
|
* @access public
|
|||
|
|
* @param string $strClass
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function LoadThirdParty($sPath, $sFile) {
|
|||
|
|
$classfile = PATH_THIRDPARTY . $sPath . '/' . $sFile . ((substr ( $sFile, 0, - 4 ) !== '.php') ? '.php' : '');
|
|||
|
|
return require_once ($classfile);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Function LoadTranslationObject
|
|||
|
|
* It generates a global Translation variable that will be used in all the
|
|||
|
|
* system.
|
|||
|
|
* Per script
|
|||
|
|
*
|
|||
|
|
* @author Hugo Loza. <hugo@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param
|
|||
|
|
* eter string lang
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function LoadTranslationObject($lang = SYS_LANG) {
|
|||
|
|
$defaultTranslations = Array ();
|
|||
|
|
$foreignTranslations = Array ();
|
|||
|
|
|
|||
|
|
// if the default translations table doesn't exist we can't proceed
|
|||
|
|
if (! is_file ( PATH_LANGUAGECONT . 'translation.en' )) {
|
|||
|
|
return null;
|
|||
|
|
}
|
|||
|
|
// load the translations table
|
|||
|
|
require_once (PATH_LANGUAGECONT . 'translation.en');
|
|||
|
|
$defaultTranslations = $translation;
|
|||
|
|
|
|||
|
|
// if some foreign language was requested and its translation file
|
|||
|
|
// exists
|
|||
|
|
if ($lang != 'en' && file_exists ( PATH_LANGUAGECONT . 'translation.' . $lang )) {
|
|||
|
|
require_once (PATH_LANGUAGECONT . 'translation.' . $lang); // load the foreign translations table
|
|||
|
|
$foreignTranslations = $translation;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
global $translation;
|
|||
|
|
if (defined ( "SHOW_UNTRANSLATED_AS_TAG" ) && SHOW_UNTRANSLATED_AS_TAG != 0) {
|
|||
|
|
$translation = $foreignTranslations;
|
|||
|
|
} else {
|
|||
|
|
$translation = array_merge ( $defaultTranslations, $foreignTranslations );
|
|||
|
|
}
|
|||
|
|
return true;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Render Page
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param object $objContent
|
|||
|
|
* @param string $strTemplate
|
|||
|
|
* @param string $strSkin
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function RenderPage($strTemplate = "default", $strSkin = SYS_SKIN, $objContent = null, $layout = '') {
|
|||
|
|
global $G_CONTENT;
|
|||
|
|
global $G_TEMPLATE;
|
|||
|
|
global $G_SKIN;
|
|||
|
|
global $G_PUBLISH;
|
|||
|
|
|
|||
|
|
$G_CONTENT = $objContent;
|
|||
|
|
$G_TEMPLATE = $strTemplate;
|
|||
|
|
$G_SKIN = $strSkin;
|
|||
|
|
|
|||
|
|
try {
|
|||
|
|
$file = g::ExpandPath ( 'skinEngine' ) . 'skinEngine.php';
|
|||
|
|
include $file;
|
|||
|
|
$skinEngine = new SkinEngine ( $G_TEMPLATE, $G_SKIN, $G_CONTENT );
|
|||
|
|
$skinEngine->setLayout ( $layout );
|
|||
|
|
$skinEngine->dispatch ();
|
|||
|
|
} catch ( Exception $e ) {
|
|||
|
|
global $G_PUBLISH;
|
|||
|
|
if (is_null ( $G_PUBLISH )) {
|
|||
|
|
$G_PUBLISH = new Publisher ();
|
|||
|
|
}
|
|||
|
|
if (count ( $G_PUBLISH->Parts ) == 1) {
|
|||
|
|
array_shift ( $G_PUBLISH->Parts );
|
|||
|
|
}
|
|||
|
|
global $oHeadPublisher;
|
|||
|
|
$leimnudInitString = $oHeadPublisher->leimnudInitString;
|
|||
|
|
$oHeadPublisher->clearScripts ();
|
|||
|
|
$oHeadPublisher->leimnudInitString = $leimnudInitString;
|
|||
|
|
$oHeadPublisher->addScriptFile ( '/js/maborak/core/maborak.js' );
|
|||
|
|
$G_PUBLISH->AddContent ( 'xmlform', 'xmlform', 'login/showMessage', null, array (
|
|||
|
|
'MESSAGE' => $e->getMessage ()
|
|||
|
|
) );
|
|||
|
|
if (class_exists ( 'SkinEngine' )) {
|
|||
|
|
$skinEngine = new SkinEngine ( 'publish', 'blank', '' );
|
|||
|
|
$skinEngine->dispatch ();
|
|||
|
|
} else {
|
|||
|
|
die ( $e->getMessage () );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* SendTemporalMessage
|
|||
|
|
*
|
|||
|
|
* @param string $msgID
|
|||
|
|
* @param string $strType
|
|||
|
|
* @param string $sType
|
|||
|
|
* default value 'LABEL'
|
|||
|
|
* @param date $time
|
|||
|
|
* default value null
|
|||
|
|
* @param integer $width
|
|||
|
|
* default value null
|
|||
|
|
* @param string $customLabels
|
|||
|
|
* default value null
|
|||
|
|
*
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function SendTemporalMessage($msgID, $strType, $sType = 'LABEL', $time = null, $width = null, $customLabels = null) {
|
|||
|
|
if (isset ( $width )) {
|
|||
|
|
$_SESSION ['G_MESSAGE_WIDTH'] = $width;
|
|||
|
|
}
|
|||
|
|
if (isset ( $time )) {
|
|||
|
|
$_SESSION ['G_MESSAGE_TIME'] = $time;
|
|||
|
|
}
|
|||
|
|
switch (strtolower ( $sType )) {
|
|||
|
|
case 'label' :
|
|||
|
|
case 'labels' :
|
|||
|
|
$_SESSION ['G_MESSAGE_TYPE'] = $strType;
|
|||
|
|
$_SESSION ['G_MESSAGE'] = nl2br ( g::LoadTranslation ( $msgID ) );
|
|||
|
|
break;
|
|||
|
|
case 'string' :
|
|||
|
|
$_SESSION ['G_MESSAGE_TYPE'] = $strType;
|
|||
|
|
$_SESSION ['G_MESSAGE'] = nl2br ( $msgID );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
if ($customLabels != null) {
|
|||
|
|
$message = $_SESSION ['G_MESSAGE'];
|
|||
|
|
foreach ( $customLabels as $key => $val ) {
|
|||
|
|
$message = str_replace ( '{' . nl2br ( $key ) . '}', nl2br ( $val ), $message );
|
|||
|
|
}
|
|||
|
|
$_SESSION ['G_MESSAGE'] = $message;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Redirect URL
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $parameter
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function header($parameter) {
|
|||
|
|
if (defined ( 'ENABLE_ENCRYPT' ) && (ENABLE_ENCRYPT == 'yes') && (substr ( $parameter, 0, 9 ) == 'location:')) {
|
|||
|
|
$url = g::encrypt ( substr ( $parameter, 10 ), URL_KEY );
|
|||
|
|
header ( 'location:' . $url );
|
|||
|
|
} else {
|
|||
|
|
header ( $parameter );
|
|||
|
|
}
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Include all model plugin files
|
|||
|
|
*
|
|||
|
|
* LoadAllPluginModelClasses
|
|||
|
|
*
|
|||
|
|
* @author Hugo Loza <hugo@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function LoadAllPluginModelClasses() {
|
|||
|
|
// Get the current Include path, where the plugins directories should be
|
|||
|
|
if (! defined ( 'PATH_SEPARATOR' )) {
|
|||
|
|
define ( 'PATH_SEPARATOR', (substr ( PHP_OS, 0, 3 ) == 'WIN') ? ';' : ':' );
|
|||
|
|
}
|
|||
|
|
$path = explode ( PATH_SEPARATOR, get_include_path () );
|
|||
|
|
|
|||
|
|
foreach ( $path as $possiblePath ) {
|
|||
|
|
if (strstr ( $possiblePath, "plugins" )) {
|
|||
|
|
$baseDir = $possiblePath . 'classes' . PATH_SEP . 'model';
|
|||
|
|
if (file_exists ( $baseDir )) {
|
|||
|
|
if ($handle = opendir ( $baseDir )) {
|
|||
|
|
while ( false !== ($file = readdir ( $handle )) ) {
|
|||
|
|
if (strpos ( $file, '.php', 1 ) && ! strpos ( $file, 'Peer.php', 1 )) {
|
|||
|
|
require_once ($baseDir . PATH_SEP . $file);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
// Include also the extendGulliverClass that could have some
|
|||
|
|
// new definitions for fields
|
|||
|
|
if (file_exists ( $possiblePath . 'classes' . PATH_SEP . 'class.extendGulliver.php' )) {
|
|||
|
|
include_once $possiblePath . 'classes' . PATH_SEP . 'class.extendGulliver.php';
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Expand the path using the path constants
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $strPath
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function expandPath($strPath = '') {
|
|||
|
|
$res = "";
|
|||
|
|
$res = PATH_CORE;
|
|||
|
|
if ($strPath != "") {
|
|||
|
|
$res .= $strPath . "/";
|
|||
|
|
}
|
|||
|
|
return $res;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* This method allow dispatch rest services using 'Restler' thirdparty library
|
|||
|
|
*
|
|||
|
|
* @author Erik Amaru Ortiz <aortiz.erik@gmail.com>
|
|||
|
|
*/
|
|||
|
|
public function dispatchRestService ($uri, $config, $apiClassesPath = '')
|
|||
|
|
{
|
|||
|
|
require_once 'restler/restler.php';
|
|||
|
|
|
|||
|
|
$rest = new Restler();
|
|||
|
|
$rest->setSupportedFormats( 'JsonFormat', 'XmlFormat' );
|
|||
|
|
// getting all services class
|
|||
|
|
$restClasses = array ();
|
|||
|
|
$restClassesList = g::rglob( '*', 0, PATH_CORE . 'services/' );
|
|||
|
|
foreach ($restClassesList as $classFile) {
|
|||
|
|
if (substr( $classFile, - 4 ) === '.php') {
|
|||
|
|
$restClasses[str_replace( '.php', '', basename( $classFile ) )] = $classFile;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
if (! empty( $apiClassesPath )) {
|
|||
|
|
$pluginRestClasses = array ();
|
|||
|
|
$restClassesList = g::rglob( '*', 0, $apiClassesPath . 'services/' );
|
|||
|
|
foreach ($restClassesList as $classFile) {
|
|||
|
|
if (substr( $classFile, - 4 ) === '.php') {
|
|||
|
|
$pluginRestClasses[str_replace( '.php', '', basename( $classFile ) )] = $classFile;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
$restClasses = array_merge( $restClasses, $pluginRestClasses );
|
|||
|
|
}
|
|||
|
|
// hook to get rest api classes from plugins
|
|||
|
|
if (class_exists( 'PMPluginRegistry' )) {
|
|||
|
|
$pluginRegistry = & PMPluginRegistry::getSingleton();
|
|||
|
|
$pluginClasses = $pluginRegistry->getRegisteredRestClassFiles();
|
|||
|
|
$restClasses = array_merge( $restClasses, $pluginClasses );
|
|||
|
|
}
|
|||
|
|
foreach ($restClasses as $key => $classFile) {
|
|||
|
|
if (! file_exists( $classFile )) {
|
|||
|
|
unset( $restClasses[$key] );
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
//load the file, and check if exist the class inside it.
|
|||
|
|
require_once $classFile;
|
|||
|
|
$namespace = 'Services_Rest_';
|
|||
|
|
$className = str_replace( '.php', '', basename( $classFile ) );
|
|||
|
|
|
|||
|
|
// if the core class does not exists try resolve the for a plugin
|
|||
|
|
if (! class_exists( $namespace . $className )) {
|
|||
|
|
$namespace = 'Plugin_Services_Rest_';
|
|||
|
|
// Couldn't resolve the class name, just skipp it
|
|||
|
|
if (! class_exists( $namespace . $className )) {
|
|||
|
|
unset( $restClasses[$key] );
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
// verify if there is an auth class implementing 'iAuthenticate'
|
|||
|
|
$classNameAuth = $namespace . $className;
|
|||
|
|
$reflClass = new ReflectionClass( $classNameAuth );
|
|||
|
|
// that wasn't from plugin
|
|||
|
|
if ($reflClass->implementsInterface( 'iAuthenticate' ) && $namespace != 'Plugin_Services_Rest_') {
|
|||
|
|
// auth class found, set as restler authentication class handler
|
|||
|
|
$rest->addAuthenticationClass( $classNameAuth );
|
|||
|
|
} else {
|
|||
|
|
// add api class
|
|||
|
|
$rest->addAPIClass( $classNameAuth );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
//end foreach rest class
|
|||
|
|
// resolving the class for current request
|
|||
|
|
$uriPart = explode( '/', $uri );
|
|||
|
|
$requestedClass = '';
|
|||
|
|
if (isset( $uriPart[1] )) {
|
|||
|
|
$requestedClass = ucfirst( $uriPart[1] );
|
|||
|
|
}
|
|||
|
|
if (class_exists( 'Services_Rest_' . $requestedClass )) {
|
|||
|
|
$namespace = 'Services_Rest_';
|
|||
|
|
} elseif (class_exists( 'Plugin_Services_Rest_' . $requestedClass )) {
|
|||
|
|
$namespace = 'Plugin_Services_Rest_';
|
|||
|
|
} else {
|
|||
|
|
$namespace = '';
|
|||
|
|
}
|
|||
|
|
// end resolv.
|
|||
|
|
// Send additional headers (if exists) configured on rest-config.ini
|
|||
|
|
if (array_key_exists( 'HEADERS', $config )) {
|
|||
|
|
foreach ($config['HEADERS'] as $name => $value) {
|
|||
|
|
header( "$name: $value" );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
// to handle a request with "OPTIONS" method
|
|||
|
|
if (! empty( $namespace ) && $_SERVER['REQUEST_METHOD'] === 'OPTIONS') {
|
|||
|
|
$reflClass = new ReflectionClass( $namespace . $requestedClass );
|
|||
|
|
// if the rest class has not a "options" method
|
|||
|
|
if (! $reflClass->hasMethod( 'options' )) {
|
|||
|
|
header( 'Access-Control-Allow-Methods: GET, POST, PUT, DELETE, OPTIONS, HEADERS' );
|
|||
|
|
header( 'Access-Control-Allow-Headers: authorization, content-type' );
|
|||
|
|
header( "Access-Control-Allow-Credentials", "false" );
|
|||
|
|
header( 'Access-Control-Max-Age: 60' );
|
|||
|
|
exit();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
// override global REQUEST_URI to pass to Restler library
|
|||
|
|
$_SERVER['REQUEST_URI'] = '/' . strtolower( $namespace ) . ltrim( $uri, '/' );
|
|||
|
|
// handle the rest request
|
|||
|
|
$rest->handle();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* function to calculate the time used to render a page
|
|||
|
|
*/
|
|||
|
|
public function logTimeByPage() {
|
|||
|
|
if (! defined ( PATH_DATA )) {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$serverAddr = $_SERVER ['SERVER_ADDR'];
|
|||
|
|
global $startingTime;
|
|||
|
|
$endTime = microtime ( true );
|
|||
|
|
$time = $endTime - $startingTime;
|
|||
|
|
$fpt = fopen ( PATH_DATA . 'log/time.log', 'a' );
|
|||
|
|
fwrite ( $fpt, sprintf ( "%s.%03d %15s %s %5.3f %s\n", date ( 'Y-m-d H:i:s' ), $time, getenv ( 'REMOTE_ADDR' ), substr ( $serverAddr, - 4 ), $time, $_SERVER ['REQUEST_URI'] ) );
|
|||
|
|
fclose ( $fpt );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* streaming a big JS file with small js files
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $file
|
|||
|
|
* @param boolean $download
|
|||
|
|
* @param string $downloadFileName
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function streamJSTranslationFile($filename, $locale = 'en') {
|
|||
|
|
header ( 'Content-Type: text/javascript' );
|
|||
|
|
|
|||
|
|
if (! g::LoadTranslationObject ( $locale )) {
|
|||
|
|
header ( 'Cache-Control: no-cache' );
|
|||
|
|
header ( 'Pragma: no-cache' );
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
global $translation;
|
|||
|
|
|
|||
|
|
// if userAgent (BROWSER) is MSIE we need special headers to avoid MSIE
|
|||
|
|
// behaivor.
|
|||
|
|
$userAgent = strtolower ( $_SERVER ['HTTP_USER_AGENT'] );
|
|||
|
|
if (file_exists ( $filename )) {
|
|||
|
|
$mtime = filemtime ( $filename );
|
|||
|
|
} else {
|
|||
|
|
$mtime = date ( 'U' );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$gmt_mtime = gmdate ( "D, d M Y H:i:s", $mtime ) . " GMT";
|
|||
|
|
header ( 'Pragma: cache' );
|
|||
|
|
header ( 'ETag: "' . md5 ( $mtime . $filename ) . '"' );
|
|||
|
|
header ( "Last-Modified: " . $gmt_mtime );
|
|||
|
|
header ( 'Cache-Control: public' );
|
|||
|
|
header ( "Expires: " . gmdate ( "D, d M Y H:i:s", time () + 30 * 60 * 60 * 24 ) . " GMT" ); // 1
|
|||
|
|
// month
|
|||
|
|
if (isset ( $_SERVER ['HTTP_IF_MODIFIED_SINCE'] )) {
|
|||
|
|
if ($_SERVER ['HTTP_IF_MODIFIED_SINCE'] == $gmt_mtime) {
|
|||
|
|
header ( 'HTTP/1.1 304 Not Modified' );
|
|||
|
|
exit ();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (isset ( $_SERVER ['HTTP_IF_NONE_MATCH'] )) {
|
|||
|
|
if (str_replace ( '"', '', stripslashes ( $_SERVER ['HTTP_IF_NONE_MATCH'] ) ) == md5 ( $mtime . $filename )) {
|
|||
|
|
header ( "HTTP/1.1 304 Not Modified" );
|
|||
|
|
exit ();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return JSMin::minify ( 'var TRANSLATIONS = ' . g::json_encode ( $translation ) . ';' );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* streaming a big JS file with small js files
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $file
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function streamCSSBigFile ($filename)
|
|||
|
|
{
|
|||
|
|
header( 'Content-Type: text/css' );
|
|||
|
|
|
|||
|
|
//First get Skin info
|
|||
|
|
$filenameParts = explode( "-", $filename );
|
|||
|
|
$skinName = $filenameParts[0];
|
|||
|
|
$skinVariant = "skin";
|
|||
|
|
|
|||
|
|
if (isset( $filenameParts[1] )) {
|
|||
|
|
$skinVariant = strtolower( $filenameParts[1] );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$configurationFile = '';
|
|||
|
|
if ($skinName == "jscolors") {
|
|||
|
|
$skinName = "classic";
|
|||
|
|
}
|
|||
|
|
if ($skinName == "xmlcolors") {
|
|||
|
|
$skinName = "classic";
|
|||
|
|
}
|
|||
|
|
if ($skinName == "classic") {
|
|||
|
|
$configurationFile = g::ExpandPath( "skinEngine" ) . 'base' . PATH_SEP . 'config.xml';
|
|||
|
|
} else {
|
|||
|
|
$configurationFile = PATH_CUSTOM_SKINS . $skinName . PATH_SEP . 'config.xml';
|
|||
|
|
|
|||
|
|
if (! is_file( $configurationFile )) {
|
|||
|
|
$configurationFile = g::ExpandPath( "skinEngine" ) . $skinName . PATH_SEP . 'config.xml';
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//Read Configuration File
|
|||
|
|
$xmlConfiguration = file_get_contents( $configurationFile );
|
|||
|
|
$xmlConfigurationObj = g::xmlParser( $xmlConfiguration );
|
|||
|
|
$baseSkinDirectory = dirname( $configurationFile );
|
|||
|
|
$directorySize = g::getDirectorySize( $baseSkinDirectory );
|
|||
|
|
$mtime = $directorySize['maxmtime'];
|
|||
|
|
|
|||
|
|
//if userAgent (BROWSER) is MSIE we need special headers to avoid MSIE behaivor.
|
|||
|
|
//$userAgent = strtolower($_SERVER['HTTP_USER_AGENT']);
|
|||
|
|
|
|||
|
|
$gmt_mtime = gmdate( "D, d M Y H:i:s", $mtime ) . " GMT";
|
|||
|
|
header( 'Pragma: cache' );
|
|||
|
|
header( 'ETag: "' . md5( $mtime . $filename ) . '"' );
|
|||
|
|
header( "Last-Modified: " . $gmt_mtime );
|
|||
|
|
header( 'Cache-Control: public' );
|
|||
|
|
header( "Expires: " . gmdate( "D, d M Y H:i:s", time() + 30 * 60 * 60 * 24 ) . " GMT" ); //1 month
|
|||
|
|
//header("Expires: " . gmdate("D, d M Y H:i:s", time () + 60*60*24 ) . " GMT"); //1 day - tempor
|
|||
|
|
if (isset( $_SERVER['HTTP_IF_MODIFIED_SINCE'] )) {
|
|||
|
|
if ($_SERVER['HTTP_IF_MODIFIED_SINCE'] == $gmt_mtime) {
|
|||
|
|
header( 'HTTP/1.1 304 Not Modified' );
|
|||
|
|
exit();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (isset( $_SERVER['HTTP_IF_NONE_MATCH'] )) {
|
|||
|
|
if (str_replace( '"', '', stripslashes( $_SERVER['HTTP_IF_NONE_MATCH'] ) ) == md5( $mtime . $filename )) {
|
|||
|
|
header( "HTTP/1.1 304 Not Modified" );
|
|||
|
|
exit();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$outputHeader = "/* Autogenerated CSS file by gulliver framework \n";
|
|||
|
|
$outputHeader .= " Skin: $filename\n";
|
|||
|
|
$outputHeader .= " Configuration: $configurationFile\n";
|
|||
|
|
$mtimeNow = date( 'U' );
|
|||
|
|
$gmt_mtimeNow = gmdate( "D, d M Y H:i:s", $mtimeNow ) . " GMT";
|
|||
|
|
$outputHeader .= " Date: $gmt_mtimeNow*/\n";
|
|||
|
|
$output = "";
|
|||
|
|
//Base files
|
|||
|
|
switch (strtolower( $skinVariant )) {
|
|||
|
|
case "extjs":
|
|||
|
|
//Basepublic function getDirectorySize ($path, $maxmtime = 0)
|
|||
|
|
{
|
|||
|
|
$totalsize = 0;
|
|||
|
|
$totalcount = 0;
|
|||
|
|
$dircount = 0;
|
|||
|
|
if ($handle = opendir( $path )) {
|
|||
|
|
while (false !== ($file = readdir( $handle ))) {
|
|||
|
|
$nextpath = $path . '/' . $file;
|
|||
|
|
if ($file != '.' && $file != '..' && ! is_link( $nextpath ) && $file != '.svn') {
|
|||
|
|
if (is_dir( $nextpath )) {
|
|||
|
|
$dircount ++;
|
|||
|
|
$result = g::getDirectorySize( $nextpath, $maxmtime );
|
|||
|
|
$totalsize += $result['size'];
|
|||
|
|
$totalcount += $result['count'];
|
|||
|
|
$dircount += $result['dircount'];
|
|||
|
|
$maxmtime = $result['maxmtime'] > $maxmtime ? $result['maxmtime'] : $maxmtime;
|
|||
|
|
} elseif (is_file( $nextpath )) {
|
|||
|
|
$totalsize += filesize( $nextpath );
|
|||
|
|
$totalcount ++;
|
|||
|
|
|
|||
|
|
$mtime = filemtime( $nextpath );
|
|||
|
|
if ($mtime > $maxmtime) {
|
|||
|
|
$maxmtime = $mtime;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
closedir( $handle );
|
|||
|
|
$total['size'] = $totalsize;
|
|||
|
|
$total['count'] = $totalcount;
|
|||
|
|
$total['dircount'] = $dircount;
|
|||
|
|
$total['maxmtime'] = $maxmtime;
|
|||
|
|
|
|||
|
|
return $total;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$baseCSSPath = PATH_SKIN_ENGINE . "base" . PATH_SEP . "baseCss" . PATH_SEP;
|
|||
|
|
$output .= file_get_contents( $baseCSSPath . 'ext-all-notheme.css' );
|
|||
|
|
//$output .= file_get_contents ( $publicExtPath . 'ext-all.css' );
|
|||
|
|
|
|||
|
|
//Classic Skin
|
|||
|
|
$extJsSkin = 'xtheme-gray';
|
|||
|
|
|
|||
|
|
break;
|
|||
|
|
default:
|
|||
|
|
|
|||
|
|
break;
|
|||
|
|
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//Get Browser Info
|
|||
|
|
$infoBrowser = g::browser_detection( 'full_assoc' );
|
|||
|
|
$browserName = $infoBrowser['browser_working'];
|
|||
|
|
if (isset( $infoBrowser[$browserName . '_data'] )) {
|
|||
|
|
if ($infoBrowser[$browserName . '_data'][0] != "") {
|
|||
|
|
$browserName = $infoBrowser[$browserName . '_data'][0];
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//Read Configuration File
|
|||
|
|
$xmlConfiguration = file_get_contents ( $configurationFile );
|
|||
|
|
$xmlConfigurationObj = g::xmlParser($xmlConfiguration);
|
|||
|
|
|
|||
|
|
$skinFilesArray=$xmlConfigurationObj->result['skinConfiguration']['__CONTENT__']['cssFiles']['__CONTENT__'][$skinVariant]['__CONTENT__']['cssFile'] ;
|
|||
|
|
foreach ($skinFilesArray as $keyFile => $cssFileInfo) {
|
|||
|
|
$enabledBrowsers=explode(",",$cssFileInfo['__ATTRIBUTES__']['enabledBrowsers']);
|
|||
|
|
$disabledBrowsers=explode(",",$cssFileInfo['__ATTRIBUTES__']['disabledBrowsers']);
|
|||
|
|
|
|||
|
|
if (((in_array($browserName, $enabledBrowsers))||(in_array('ALL', $enabledBrowsers)))&&(!(in_array($browserName, $disabledBrowsers)))) {
|
|||
|
|
if ($cssFileInfo['__ATTRIBUTES__']['file'] == 'rtl.css') {
|
|||
|
|
g::LoadClass('serverConfiguration');
|
|||
|
|
$oServerConf =& serverConf::getSingleton();
|
|||
|
|
if (!(defined('SYS_LANG'))) {
|
|||
|
|
if (isset($_SERVER['HTTP_REFERER'])) {
|
|||
|
|
$syss = explode('://', $_SERVER['HTTP_REFERER']);
|
|||
|
|
$sysObjets = explode('/', $syss['1']);
|
|||
|
|
$sysLang = $sysObjets['2'];
|
|||
|
|
} else {
|
|||
|
|
$sysLang = 'en';
|
|||
|
|
}
|
|||
|
|
} else {
|
|||
|
|
$sysLang = SYS_LANG;
|
|||
|
|
}
|
|||
|
|
if ($oServerConf->isRtl($sysLang)) {
|
|||
|
|
$output .= file_get_contents ( $baseSkinDirectory . PATH_SEP.'css'.PATH_SEP.$cssFileInfo['__ATTRIBUTES__']['file'] );
|
|||
|
|
}
|
|||
|
|
} else {
|
|||
|
|
$output .= file_get_contents ( $baseSkinDirectory . PATH_SEP.'css'.PATH_SEP.$cssFileInfo['__ATTRIBUTES__']['file'] );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//Remove comments..
|
|||
|
|
$regex = array ("`^([\t\s]+)`ism" => '',"`^\/\*(.+?)\*\/`ism" => "","`([\n\A;]+)\/\*(.+?)\*\/`ism" => "$1","`([\n\A;\s]+)//(.+?)[\n\r]`ism" => "$1\n","`(^[\r\n]*|[\r\n]+)[\s\t]*[\r\n]+`ism" => "\n" );
|
|||
|
|
$output = preg_replace( array_keys( $regex ), $regex, $output );
|
|||
|
|
$output = $outputHeader . $output;
|
|||
|
|
|
|||
|
|
return $output;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* sendHeaders
|
|||
|
|
*
|
|||
|
|
* @param string $filename
|
|||
|
|
* @param string $contentType
|
|||
|
|
* default value ''
|
|||
|
|
* @param boolean $download
|
|||
|
|
* default value false
|
|||
|
|
* @param string $downloadFileName
|
|||
|
|
* default value ''
|
|||
|
|
*
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function sendHeaders($filename, $contentType = '', $download = false, $downloadFileName = '') {
|
|||
|
|
if ($download) {
|
|||
|
|
if ($downloadFileName == '') {
|
|||
|
|
$aAux = explode ( '/', $filename );
|
|||
|
|
$downloadFileName = $aAux [count ( $aAux ) - 1];
|
|||
|
|
}
|
|||
|
|
header ( 'Content-Disposition: attachment; filename="' . $downloadFileName . '"' );
|
|||
|
|
}
|
|||
|
|
header ( 'Content-Type: ' . $contentType );
|
|||
|
|
|
|||
|
|
// if userAgent (BROWSER) is MSIE we need special headers to avoid MSIE
|
|||
|
|
// behaivor.
|
|||
|
|
$userAgent = strtolower ( $_SERVER ['HTTP_USER_AGENT'] );
|
|||
|
|
if (preg_match ( "/msie/i", $userAgent )) {
|
|||
|
|
// if ( ereg("msie", $userAgent)) {
|
|||
|
|
header ( 'Pragma: cache' );
|
|||
|
|
|
|||
|
|
$mtime = filemtime ( $filename );
|
|||
|
|
$gmt_mtime = gmdate ( "D, d M Y H:i:s", $mtime ) . " GMT";
|
|||
|
|
header ( 'ETag: "' . md5 ( $mtime . $filename ) . '"' );
|
|||
|
|
header ( "Last-Modified: " . $gmt_mtime );
|
|||
|
|
header ( 'Cache-Control: public' );
|
|||
|
|
header ( "Expires: " . gmdate ( "D, d M Y H:i:s", time () + 60 * 10 ) . " GMT" ); // ten
|
|||
|
|
// minutes
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (! $download) {
|
|||
|
|
|
|||
|
|
header ( 'Pragma: cache' );
|
|||
|
|
|
|||
|
|
if (file_exists ( $filename )) {
|
|||
|
|
$mtime = filemtime ( $filename );
|
|||
|
|
} else {
|
|||
|
|
$mtime = date ( 'U' );
|
|||
|
|
}
|
|||
|
|
$gmt_mtime = gmdate ( "D, d M Y H:i:s", $mtime ) . " GMT";
|
|||
|
|
header ( 'ETag: "' . md5 ( $mtime . $filename ) . '"' );
|
|||
|
|
header ( "Last-Modified: " . $gmt_mtime );
|
|||
|
|
header ( 'Cache-Control: public' );
|
|||
|
|
header ( "Expires: " . gmdate ( "D, d M Y H:i:s", time () + 90 * 60 * 60 * 24 ) . " GMT" );
|
|||
|
|
if (isset ( $_SERVER ['HTTP_IF_MODIFIED_SINCE'] )) {
|
|||
|
|
if ($_SERVER ['HTTP_IF_MODIFIED_SINCE'] == $gmt_mtime) {
|
|||
|
|
header ( 'HTTP/1.1 304 Not Modified' );
|
|||
|
|
exit ();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (isset ( $_SERVER ['HTTP_IF_NONE_MATCH'] )) {
|
|||
|
|
if (str_replace ( '"', '', stripslashes ( $_SERVER ['HTTP_IF_NONE_MATCH'] ) ) == md5 ( $mtime . $filename )) {
|
|||
|
|
header ( "HTTP/1.1 304 Not Modified" );
|
|||
|
|
exit ();
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Get checksum from multiple files
|
|||
|
|
*
|
|||
|
|
* @author erik amaru ortiz <erik@colosa.com>
|
|||
|
|
*/
|
|||
|
|
public function getCheckSum ($files)
|
|||
|
|
{
|
|||
|
|
g::LoadClass( 'system' );
|
|||
|
|
$key = System::getVersion();
|
|||
|
|
|
|||
|
|
if (! is_array( $files )) {
|
|||
|
|
$tmp = $files;
|
|||
|
|
$files = array ();
|
|||
|
|
$files[0] = $tmp;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$checkSum = '';
|
|||
|
|
foreach ($files as $file) {
|
|||
|
|
if (is_file( $file )) {
|
|||
|
|
$checkSum .= md5_file( $file );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return md5( $checkSum . $key );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Get checksum from multiple files
|
|||
|
|
*
|
|||
|
|
* @author erik amaru ortiz <erik@colosa.com>
|
|||
|
|
*/
|
|||
|
|
public function getCacheFileNameByPattern ($path, $pattern)
|
|||
|
|
{
|
|||
|
|
if ($file = glob( $path . $pattern )) {
|
|||
|
|
preg_match( '/[a-f0-9]{32}/', $file[0], $match );
|
|||
|
|
} else {
|
|||
|
|
$file[0] = '';
|
|||
|
|
}
|
|||
|
|
return array ('filename' => $file[0],'checksum' => (isset( $match[0] ) ? $match[0] : ''));
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* trimSourceCodeFile
|
|||
|
|
*
|
|||
|
|
* @param string $filename
|
|||
|
|
*
|
|||
|
|
* @return string $output
|
|||
|
|
*/
|
|||
|
|
public function trimSourceCodeFile ($filename)
|
|||
|
|
{
|
|||
|
|
$handle = fopen( $filename, "r" );
|
|||
|
|
$lastChar = '';
|
|||
|
|
$firstChar = '';
|
|||
|
|
$content = '';
|
|||
|
|
$line = '';
|
|||
|
|
|
|||
|
|
if ($handle) {
|
|||
|
|
while (! feof( $handle )) {
|
|||
|
|
//$line = trim( fgets($handle, 16096) ) . "\n" ;
|
|||
|
|
$line = fgets( $handle, 16096 );
|
|||
|
|
$content .= $line;
|
|||
|
|
}
|
|||
|
|
fclose( $handle );
|
|||
|
|
}
|
|||
|
|
return $content;
|
|||
|
|
|
|||
|
|
$index = 0;
|
|||
|
|
$output = '';
|
|||
|
|
while ($index < strlen( $content )) {
|
|||
|
|
$car = $content[$index];
|
|||
|
|
$index ++;
|
|||
|
|
if ($car == '/' && isset( $content[$index] ) && $content[$index] == '*') {
|
|||
|
|
$endComment = false;
|
|||
|
|
$index ++;
|
|||
|
|
while ($endComment == false && $index < strlen( $content )) {
|
|||
|
|
if ($content[$index] == '*' && isset( $content[$index + 1] ) && $content[$index + 1] == '/') {
|
|||
|
|
$endComment = true;
|
|||
|
|
$index ++;
|
|||
|
|
}
|
|||
|
|
$index ++;
|
|||
|
|
}
|
|||
|
|
$car = '';
|
|||
|
|
}
|
|||
|
|
$output .= $car;
|
|||
|
|
}
|
|||
|
|
return $output;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* strip_slashes
|
|||
|
|
* @param vVar
|
|||
|
|
*/
|
|||
|
|
public function strip_slashes ($vVar)
|
|||
|
|
{
|
|||
|
|
if (is_array( $vVar )) {
|
|||
|
|
foreach ($vVar as $sKey => $vValue) {
|
|||
|
|
if (is_array( $vValue )) {
|
|||
|
|
g::strip_slashes( $vVar[$sKey] );
|
|||
|
|
} else {
|
|||
|
|
$vVar[$sKey] = stripslashes( $vVar[$sKey] );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
} else {
|
|||
|
|
$vVar = stripslashes( $vVar );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return $vVar;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Function LoadTranslation
|
|||
|
|
*
|
|||
|
|
* @author Aldo Mauricio Veliz Valenzuela. <mauricio@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param eter string msgID
|
|||
|
|
* @param eter string file
|
|||
|
|
* @param eter array data // erik: associative array within data input to replace for formatted string i.e "any messsage {replaced_label} that contains a replace label"
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function LoadTranslation ($msgID, $lang = SYS_LANG, $data = null)
|
|||
|
|
{
|
|||
|
|
global $translation;
|
|||
|
|
|
|||
|
|
// if the second parameter $lang is an array does mean it was especified to use as data
|
|||
|
|
if (is_array( $lang )) {
|
|||
|
|
$data = $lang;
|
|||
|
|
$lang = SYS_LANG;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (isset( $translation[$msgID] )) {
|
|||
|
|
$translationString = preg_replace( "[\n|\r|\n\r]", ' ', $translation[$msgID] );
|
|||
|
|
|
|||
|
|
if (isset( $data ) && is_array( $data )) {
|
|||
|
|
foreach ($data as $label => $value) {
|
|||
|
|
$translationString = str_replace( '{' . $label . '}', $value, $translationString );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return $translationString;
|
|||
|
|
} else {
|
|||
|
|
if (defined( "UNTRANSLATED_MARK" )) {
|
|||
|
|
$untranslatedMark = strip_tags( UNTRANSLATED_MARK );
|
|||
|
|
} else {
|
|||
|
|
$untranslatedMark = "**";
|
|||
|
|
}
|
|||
|
|
return $untranslatedMark . $msgID . $untranslatedMark;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Recursive version of glob php standard function
|
|||
|
|
*
|
|||
|
|
* @author Erik Amaru Ortiz <erik@colosa.com>
|
|||
|
|
*
|
|||
|
|
* @param $path path to scan recursively the write permission
|
|||
|
|
* @param $flags to notive glob function
|
|||
|
|
* @param $pattern pattern to filter some especified files
|
|||
|
|
* @return <array> array containing the recursive glob results
|
|||
|
|
*/
|
|||
|
|
public function rglob($pattern = '*', $flags = 0, $path = '')
|
|||
|
|
{
|
|||
|
|
$paths = glob($path.'*', GLOB_MARK|GLOB_ONLYDIR|GLOB_NOSORT);
|
|||
|
|
$files = glob($path.$pattern, $flags);
|
|||
|
|
foreach ($paths as $path) {
|
|||
|
|
$files = array_merge($files, g::rglob($pattern, $flags, $path));
|
|||
|
|
}
|
|||
|
|
return $files;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* JSON encode
|
|||
|
|
*
|
|||
|
|
* @author Erik A.O. <erik@gmail.com, aortiz.erik@gmail.com>
|
|||
|
|
*/
|
|||
|
|
public function json_encode($Json)
|
|||
|
|
{
|
|||
|
|
if ( function_exists('json_encode') ) {
|
|||
|
|
return json_encode($Json);
|
|||
|
|
} else {
|
|||
|
|
g::LoadThirdParty('pear/json', 'class.json');
|
|||
|
|
$oJSON = new Services_JSON();
|
|||
|
|
return $oJSON->encode($Json);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* JSON decode
|
|||
|
|
*
|
|||
|
|
* @author Erik A.O. <erik@gmail.com, aortiz.erik@gmail.com>
|
|||
|
|
*/
|
|||
|
|
public function json_decode($Json)
|
|||
|
|
{
|
|||
|
|
if (function_exists('json_decode')) {
|
|||
|
|
return json_decode($Json);
|
|||
|
|
} else {
|
|||
|
|
g::LoadThirdParty('pear/json', 'class.json');
|
|||
|
|
$oJSON = new Services_JSON();
|
|||
|
|
return $oJSON->decode($Json);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* ************************************* init **********************************************
|
|||
|
|
* Xml parse collection functions
|
|||
|
|
* Returns a associative array within the xml structure and data
|
|||
|
|
*
|
|||
|
|
* @author Erik Amaru Ortiz <erik@colosa.com>
|
|||
|
|
*/
|
|||
|
|
public function xmlParser (&$string)
|
|||
|
|
{
|
|||
|
|
$parser = xml_parser_create();
|
|||
|
|
xml_parser_set_option( $parser, XML_OPTION_CASE_FOLDING, 0 );
|
|||
|
|
xml_parse_into_struct( $parser, $string, $vals, $index );
|
|||
|
|
|
|||
|
|
$mnary = array ();
|
|||
|
|
$ary = &$mnary;
|
|||
|
|
foreach ($vals as $r) {
|
|||
|
|
$t = $r['tag'];
|
|||
|
|
if ($r['type'] == 'open') {
|
|||
|
|
if (isset( $ary[$t] )) {
|
|||
|
|
if (isset( $ary[$t][0] )) {
|
|||
|
|
$ary[$t][] = array ();
|
|||
|
|
} else {
|
|||
|
|
$ary[$t] = array ($ary[$t],array () );
|
|||
|
|
}
|
|||
|
|
$cv = &$ary[$t][count( $ary[$t] ) - 1];
|
|||
|
|
} else {
|
|||
|
|
$cv = &$ary[$t];
|
|||
|
|
}
|
|||
|
|
if (isset( $r['attributes'] )) {
|
|||
|
|
foreach ($r['attributes'] as $k => $v) {
|
|||
|
|
$cv['__ATTRIBUTES__'][$k] = $v;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
// note by gustavo cruz gustavo[at]colosa[dot]com
|
|||
|
|
// minor adjustments to validate if an open node have a value attribute.
|
|||
|
|
// for example a dropdown has many childs, but also can have a value attribute.
|
|||
|
|
if (isset( $r['value'] ) && trim( $r['value'] ) != '') {
|
|||
|
|
$cv['__VALUE__'] = $r['value'];
|
|||
|
|
}
|
|||
|
|
// end added code
|
|||
|
|
$cv['__CONTENT__'] = array ();
|
|||
|
|
$cv['__CONTENT__']['_p'] = &$ary;
|
|||
|
|
$ary = &$cv['__CONTENT__'];
|
|||
|
|
|
|||
|
|
} elseif ($r['type'] == 'complete') {
|
|||
|
|
if (isset( $ary[$t] )) {
|
|||
|
|
if (isset( $ary[$t][0] )) {
|
|||
|
|
$ary[$t][] = array ();
|
|||
|
|
} else {
|
|||
|
|
$ary[$t] = array ($ary[$t],array ());
|
|||
|
|
}
|
|||
|
|
$cv = &$ary[$t][count( $ary[$t] ) - 1];
|
|||
|
|
} else {
|
|||
|
|
$cv = &$ary[$t];
|
|||
|
|
}
|
|||
|
|
if (isset( $r['attributes'] )) {
|
|||
|
|
foreach ($r['attributes'] as $k => $v) {
|
|||
|
|
$cv['__ATTRIBUTES__'][$k] = $v;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
$cv['__VALUE__'] = (isset( $r['value'] ) ? $r['value'] : '');
|
|||
|
|
|
|||
|
|
} elseif ($r['type'] == 'close') {
|
|||
|
|
$ary = &$ary['_p'];
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
self::_del_p( $mnary );
|
|||
|
|
|
|||
|
|
$obj_resp->code = xml_get_error_code( $parser );
|
|||
|
|
$obj_resp->message = xml_error_string( $obj_resp->code );
|
|||
|
|
$obj_resp->result = $mnary;
|
|||
|
|
xml_parser_free( $parser );
|
|||
|
|
|
|||
|
|
return $obj_resp;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
*
|
|||
|
|
* @param unknown_type $path
|
|||
|
|
* @param unknown_type $maxmtime
|
|||
|
|
* @return Ambigous <number, unknown>
|
|||
|
|
*/
|
|||
|
|
public function getDirectorySize ($path, $maxmtime = 0)
|
|||
|
|
{
|
|||
|
|
$totalsize = 0;
|
|||
|
|
$totalcount = 0;
|
|||
|
|
$dircount = 0;
|
|||
|
|
if ($handle = opendir( $path )) {
|
|||
|
|
while (false !== ($file = readdir( $handle ))) {
|
|||
|
|
$nextpath = $path . '/' . $file;
|
|||
|
|
if ($file != '.' && $file != '..' && ! is_link( $nextpath ) && $file != '.svn') {
|
|||
|
|
if (is_dir( $nextpath )) {
|
|||
|
|
$dircount ++;
|
|||
|
|
$result = g::getDirectorySize( $nextpath, $maxmtime );
|
|||
|
|
$totalsize += $result['size'];
|
|||
|
|
$totalcount += $result['count'];
|
|||
|
|
$dircount += $result['dircount'];
|
|||
|
|
$maxmtime = $result['maxmtime'] > $maxmtime ? $result['maxmtime'] : $maxmtime;
|
|||
|
|
} elseif (is_file( $nextpath )) {
|
|||
|
|
$totalsize += filesize( $nextpath );
|
|||
|
|
$totalcount ++;
|
|||
|
|
|
|||
|
|
$mtime = filemtime( $nextpath );
|
|||
|
|
if ($mtime > $maxmtime) {
|
|||
|
|
$maxmtime = $mtime;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
closedir( $handle );
|
|||
|
|
$total['size'] = $totalsize;
|
|||
|
|
$total['count'] = $totalcount;
|
|||
|
|
$total['dircount'] = $dircount;
|
|||
|
|
$total['maxmtime'] = $maxmtime;
|
|||
|
|
|
|||
|
|
return $total;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* _del_p
|
|||
|
|
*
|
|||
|
|
* @param string &$ary
|
|||
|
|
*
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
// _Internal: Remove recursion in result array
|
|||
|
|
public function _del_p (&$ary)
|
|||
|
|
{
|
|||
|
|
foreach ($ary as $k => $v) {
|
|||
|
|
if ($k === '_p') {
|
|||
|
|
unset( $ary[$k] );
|
|||
|
|
} elseif (is_array( $ary[$k] )) {
|
|||
|
|
self::_del_p( $ary[$k] );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
*
|
|||
|
|
* @param unknown_type $which_test
|
|||
|
|
* @param unknown_type $test_excludes
|
|||
|
|
* @param unknown_type $external_ua_string
|
|||
|
|
* @return multitype:unknown string boolean number multitype:string unknown multitype:string Ambigous <string, number> unknown multitype:string Ambigous <string, number, unknown, multitype:string > |Ambigous <unknown, string, boolean, number, multitype:string unknown , multitype:string Ambigous <string, number> unknown , multitype:string , Ambigous <string, number, unknown, multitype:string >>
|
|||
|
|
*/
|
|||
|
|
public function browser_detection($which_test, $test_excludes = '', $external_ua_string = '')
|
|||
|
|
{
|
|||
|
|
g::script_time(); // set script timer to start timing
|
|||
|
|
|
|||
|
|
static $a_full_assoc_data, $a_mobile_data, $a_moz_data, $a_webkit_data, $b_dom_browser, $b_repeat, $b_safe_browser, $browser_name, $browser_number, $browser_math_number, $browser_user_agent, $browser_working, $ie_version, $mobile_test, $moz_number, $moz_rv, $moz_rv_full, $moz_release_date, $moz_type, $os_number, $os_type, $true_ie_number, $ua_type, $webkit_type, $webkit_type_number;
|
|||
|
|
|
|||
|
|
// switch off the optimization for external ua string testing.
|
|||
|
|
if ( $external_ua_string ) {
|
|||
|
|
$b_repeat = false;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
this makes the test only run once no matter how many times you call it since
|
|||
|
|
all the variables are filled on the first run through, it's only a matter of
|
|||
|
|
returning the the right ones
|
|||
|
|
*/
|
|||
|
|
if ( !$b_repeat ) {
|
|||
|
|
//initialize all variables with default values to prevent error
|
|||
|
|
$a_browser_math_number = '';
|
|||
|
|
$a_full_assoc_data = '';
|
|||
|
|
$a_full_data = '';
|
|||
|
|
$a_mobile_data = '';
|
|||
|
|
$a_moz_data = '';
|
|||
|
|
$a_os_data = '';
|
|||
|
|
$a_unhandled_browser = '';
|
|||
|
|
$a_webkit_data = '';
|
|||
|
|
$b_dom_browser = false;
|
|||
|
|
$b_os_test = true;
|
|||
|
|
$b_mobile_test = true;
|
|||
|
|
$b_safe_browser = false;
|
|||
|
|
$b_success = false;// boolean for if browser found in main test
|
|||
|
|
$browser_math_number = '';
|
|||
|
|
$browser_temp = '';
|
|||
|
|
$browser_working = '';
|
|||
|
|
$browser_number = '';
|
|||
|
|
$ie_version = '';
|
|||
|
|
$mobile_test = '';
|
|||
|
|
$moz_release_date = '';
|
|||
|
|
$moz_rv = '';
|
|||
|
|
$moz_rv_full = '';
|
|||
|
|
$moz_type = '';
|
|||
|
|
$moz_number = '';
|
|||
|
|
$os_number = '';
|
|||
|
|
$os_type = '';
|
|||
|
|
$run_time = '';
|
|||
|
|
$true_ie_number = '';
|
|||
|
|
$ua_type = 'bot';// default to bot since you never know with bots
|
|||
|
|
$webkit_type = '';
|
|||
|
|
$webkit_type_number = '';
|
|||
|
|
|
|||
|
|
// set the excludes if required
|
|||
|
|
if ( $test_excludes ) {
|
|||
|
|
switch ( $test_excludes ){
|
|||
|
|
case '1':
|
|||
|
|
$b_os_test = false;
|
|||
|
|
break;
|
|||
|
|
case '2':
|
|||
|
|
$b_mobile_test = false;
|
|||
|
|
break;
|
|||
|
|
case '3':
|
|||
|
|
$b_os_test = false;
|
|||
|
|
$b_mobile_test = false;
|
|||
|
|
break;
|
|||
|
|
default:
|
|||
|
|
die( 'Error: bad $test_excludes parameter 2 used: ' . $test_excludes );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
make navigator user agent string lower case to make sure all versions get caught
|
|||
|
|
isset protects against blank user agent failure. tolower also lets the script use
|
|||
|
|
strstr instead of stristr, which drops overhead slightly.
|
|||
|
|
*/
|
|||
|
|
if ( $external_ua_string ) {
|
|||
|
|
$browser_user_agent = strtolower( $external_ua_string );
|
|||
|
|
} elseif ( isset( $_SERVER['HTTP_USER_AGENT'] ) ) {
|
|||
|
|
$browser_user_agent = strtolower( $_SERVER['HTTP_USER_AGENT'] );
|
|||
|
|
} else {
|
|||
|
|
$browser_user_agent = '';
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// known browsers, list will be updated routinely, check back now and then
|
|||
|
|
$a_browser_types = array(
|
|||
|
|
array( 'opera', true, 'op', 'bro' ),
|
|||
|
|
array( 'msie', true, 'ie', 'bro' ),
|
|||
|
|
// webkit before gecko because some webkit ua strings say: like gecko
|
|||
|
|
array( 'webkit', true, 'webkit', 'bro' ),
|
|||
|
|
// konq will be using webkit soon
|
|||
|
|
array( 'konqueror', true, 'konq', 'bro' ),
|
|||
|
|
// covers Netscape 6-7, K-Meleon, Most linux versions, uses moz array below
|
|||
|
|
array( 'gecko', true, 'moz', 'bro' ),
|
|||
|
|
array( 'netpositive', false, 'netp', 'bbro' ),// beos browser
|
|||
|
|
array( 'lynx', false, 'lynx', 'bbro' ), // command line browser
|
|||
|
|
array( 'elinks ', false, 'elinks', 'bbro' ), // new version of links
|
|||
|
|
array( 'elinks', false, 'elinks', 'bbro' ), // alternate id for it
|
|||
|
|
array( 'links2', false, 'links2', 'bbro' ), // alternate links version
|
|||
|
|
array( 'links ', false, 'links', 'bbro' ), // old name for links
|
|||
|
|
array( 'links', false, 'links', 'bbro' ), // alternate id for it
|
|||
|
|
array( 'w3m', false, 'w3m', 'bbro' ), // open source browser, more features than lynx/links
|
|||
|
|
array( 'webtv', false, 'webtv', 'bbro' ),// junk ms webtv
|
|||
|
|
array( 'amaya', false, 'amaya', 'bbro' ),// w3c browser
|
|||
|
|
array( 'dillo', false, 'dillo', 'bbro' ),// linux browser, basic table support
|
|||
|
|
array( 'ibrowse', false, 'ibrowse', 'bbro' ),// amiga browser
|
|||
|
|
array( 'icab', false, 'icab', 'bro' ),// mac browser
|
|||
|
|
array( 'crazy browser', true, 'ie', 'bro' ),// uses ie rendering engine
|
|||
|
|
|
|||
|
|
// search engine spider bots:
|
|||
|
|
array( 'bingbot', false, 'bing', 'bot' ),// bing
|
|||
|
|
array( 'exabot', false, 'exabot', 'bot' ),// exabot
|
|||
|
|
array( 'googlebot', false, 'google', 'bot' ),// google
|
|||
|
|
array( 'google web preview', false, 'googlewp', 'bot' ),// google preview
|
|||
|
|
array( 'mediapartners-google', false, 'adsense', 'bot' ),// google adsense
|
|||
|
|
array( 'yahoo-verticalcrawler', false, 'yahoo', 'bot' ),// old yahoo bot
|
|||
|
|
array( 'yahoo! slurp', false, 'yahoo', 'bot' ), // new yahoo bot
|
|||
|
|
array( 'yahoo-mm', false, 'yahoomm', 'bot' ), // gets Yahoo-MMCrawler and Yahoo-MMAudVid bots
|
|||
|
|
array( 'inktomi', false, 'inktomi', 'bot' ), // inktomi bot
|
|||
|
|
array( 'slurp', false, 'inktomi', 'bot' ), // inktomi bot
|
|||
|
|
array( 'fast-webcrawler', false, 'fast', 'bot' ),// Fast AllTheWeb
|
|||
|
|
array( 'msnbot', false, 'msn', 'bot' ),// msn search
|
|||
|
|
array( 'ask jeeves', false, 'ask', 'bot' ), //jeeves/teoma
|
|||
|
|
array( 'teoma', false, 'ask', 'bot' ),//jeeves teoma
|
|||
|
|
array( 'scooter', false, 'scooter', 'bot' ),// altavista
|
|||
|
|
array( 'openbot', false, 'openbot', 'bot' ),// openbot, from taiwan
|
|||
|
|
array( 'ia_archiver', false, 'ia_archiver', 'bot' ),// ia archiver
|
|||
|
|
array( 'zyborg', false, 'looksmart', 'bot' ),// looksmart
|
|||
|
|
array( 'almaden', false, 'ibm', 'bot' ),// ibm almaden web crawler
|
|||
|
|
array( 'baiduspider', false, 'baidu', 'bot' ),// Baiduspider asian search spider
|
|||
|
|
array( 'psbot', false, 'psbot', 'bot' ),// psbot image crawler
|
|||
|
|
array( 'gigabot', false, 'gigabot', 'bot' ),// gigabot crawler
|
|||
|
|
array( 'naverbot', false, 'naverbot', 'bot' ),// naverbot crawler, bad bot, block
|
|||
|
|
array( 'surveybot', false, 'surveybot', 'bot' ),//
|
|||
|
|
array( 'boitho.com-dc', false, 'boitho', 'bot' ),//norwegian search engine
|
|||
|
|
array( 'objectssearch', false, 'objectsearch', 'bot' ),// open source search engine
|
|||
|
|
array( 'answerbus', false, 'answerbus', 'bot' ),// http://www.answerbus.com/, web questions
|
|||
|
|
array( 'sohu-search', false, 'sohu', 'bot' ),// chinese media company, search component
|
|||
|
|
array( 'iltrovatore-setaccio', false, 'il-set', 'bot' ),
|
|||
|
|
|
|||
|
|
// various http utility libaries
|
|||
|
|
array( 'w3c_validator', false, 'w3c', 'lib' ), // uses libperl, make first
|
|||
|
|
array( 'wdg_validator', false, 'wdg', 'lib' ), //
|
|||
|
|
array( 'libwww-perl', false, 'libwww-perl', 'lib' ),
|
|||
|
|
array( 'jakarta commons-httpclient', false, 'jakarta', 'lib' ),
|
|||
|
|
array( 'python-urllib', false, 'python-urllib', 'lib' ),
|
|||
|
|
// download apps
|
|||
|
|
array( 'getright', false, 'getright', 'dow' ),
|
|||
|
|
array( 'wget', false, 'wget', 'dow' ),// open source downloader, obeys robots.txt
|
|||
|
|
// netscape 4 and earlier tests, put last so spiders don't get caught
|
|||
|
|
array( 'mozilla/4.', false, 'ns', 'bbro' ),
|
|||
|
|
array( 'mozilla/3.', false, 'ns', 'bbro' ),
|
|||
|
|
array( 'mozilla/2.', false, 'ns', 'bbro' )
|
|||
|
|
);
|
|||
|
|
|
|||
|
|
//array( '', false ); // browser array template
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
moz types array
|
|||
|
|
note the order, netscape6 must come before netscape, which is how netscape 7 id's itself.
|
|||
|
|
rv comes last in case it is plain old mozilla. firefox/netscape/seamonkey need to be later
|
|||
|
|
Thanks to: http://www.zytrax.com/tech/web/firefox-history.html
|
|||
|
|
*/
|
|||
|
|
$a_moz_types = array( 'bonecho', 'camino', 'epiphany', 'firebird', 'flock', 'galeon', 'iceape', 'icecat', 'k-meleon', 'minimo', 'multizilla', 'phoenix', 'songbird', 'swiftfox', 'seamonkey', 'shiretoko', 'iceweasel', 'firefox', 'minefield', 'netscape6', 'netscape', 'rv' );
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
webkit types, this is going to expand over time as webkit browsers spread
|
|||
|
|
konqueror is probably going to move to webkit, so this is preparing for that
|
|||
|
|
It will now default to khtml. gtklauncher is the temp id for epiphany, might
|
|||
|
|
change. Defaults to applewebkit, and will all show the webkit number.
|
|||
|
|
*/
|
|||
|
|
$a_webkit_types = array( 'arora', 'chrome', 'epiphany', 'gtklauncher', 'konqueror', 'midori', 'omniweb', 'safari', 'uzbl', 'applewebkit', 'webkit' );
|
|||
|
|
|
|||
|
|
/*
|
|||
|
|
run through the browser_types array, break if you hit a match, if no match, assume old browser
|
|||
|
|
or non dom browser, assigns false value to $b_success.
|
|||
|
|
*/
|
|||
|
|
$i_count = count( $a_browser_types );
|
|||
|
|
for ($i = 0; $i < $i_count; $i++) {
|
|||
|
|
//unpacks browser array, assigns to variables, need to not assign til found in string
|
|||
|
|
$browser_temp = $a_browser_types[$i][0];// text string to id browser from array
|
|||
|
|
|
|||
|
|
if ( strstr( $browser_user_agent, $browser_temp ) ) {
|
|||
|
|
/*
|
|||
|
|
it defaults to true, will become false below if needed
|
|||
|
|
this keeps it easier to keep track of what is safe, only
|
|||
|
|
explicit false assignment will make it false.
|
|||
|
|
*/
|
|||
|
|
$b_safe_browser = true;
|
|||
|
|
$browser_name = $browser_temp;// text string to id browser from array
|
|||
|
|
|
|||
|
|
// assign values based on match of user agent string
|
|||
|
|
$b_dom_browser = $a_browser_types[$i][1];// hardcoded dom support from array
|
|||
|
|
$browser_working = $a_browser_types[$i][2];// working name for browser
|
|||
|
|
$ua_type = $a_browser_types[$i][3];// sets whether bot or browser
|
|||
|
|
|
|||
|
|
switch ( $browser_working ) {
|
|||
|
|
// this is modified quite a bit, now will return proper netscape version number
|
|||
|
|
// check your implementation to make sure it works
|
|||
|
|
case 'ns':
|
|||
|
|
$b_safe_browser = false;
|
|||
|
|
$browser_number = g::get_item_version( $browser_user_agent, 'mozilla' );
|
|||
|
|
break;
|
|||
|
|
case 'moz':
|
|||
|
|
/*
|
|||
|
|
note: The 'rv' test is not absolute since the rv number is very different on
|
|||
|
|
different versions, for example Galean doesn't use the same rv version as Mozilla,
|
|||
|
|
neither do later Netscapes, like 7.x. For more on this, read the full mozilla
|
|||
|
|
numbering conventions here: http://www.mozilla.org/releases/cvstags.html
|
|||
|
|
*/
|
|||
|
|
// this will return alpha and beta version numbers, if present
|
|||
|
|
$moz_rv_full = g::get_item_version( $browser_user_agent, 'rv' );
|
|||
|
|
// this slices them back off for math comparisons
|
|||
|
|
$moz_rv = substr( $moz_rv_full, 0, 3 );
|
|||
|
|
|
|||
|
|
// this is to pull out specific mozilla versions, firebird, netscape etc..
|
|||
|
|
$j_count = count( $a_moz_types );
|
|||
|
|
for ($j = 0; $j < $j_count; $j++) {
|
|||
|
|
if ( strstr( $browser_user_agent, $a_moz_types[$j] ) ) {
|
|||
|
|
$moz_type = $a_moz_types[$j];
|
|||
|
|
$moz_number = g::get_item_version( $browser_user_agent, $moz_type );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
/*
|
|||
|
|
this is necesary to protect against false id'ed moz'es and new moz'es.
|
|||
|
|
this corrects for galeon, or any other moz browser without an rv number
|
|||
|
|
*/
|
|||
|
|
if ( !$moz_rv ) {
|
|||
|
|
// you can use this if you are running php >= 4.2
|
|||
|
|
if ( function_exists( 'floatval' ) ) {
|
|||
|
|
$moz_rv = floatval( $moz_number );
|
|||
|
|
} else {
|
|||
|
|
$moz_rv = substr( $moz_number, 0, 3 );
|
|||
|
|
}
|
|||
|
|
$moz_rv_full = $moz_number;
|
|||
|
|
}
|
|||
|
|
// this corrects the version name in case it went to the default 'rv' for the test
|
|||
|
|
if ( $moz_type == 'rv' ) {
|
|||
|
|
$moz_type = 'mozilla';
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//the moz version will be taken from the rv number, see notes above for rv problems
|
|||
|
|
$browser_number = $moz_rv;
|
|||
|
|
// gets the actual release date, necessary if you need to do functionality tests
|
|||
|
|
g::get_set_count( 'set', 0 );
|
|||
|
|
$moz_release_date = g::get_item_version( $browser_user_agent, 'gecko/' );
|
|||
|
|
/*
|
|||
|
|
Test for mozilla 0.9.x / netscape 6.x
|
|||
|
|
test your javascript/CSS to see if it works in these mozilla releases, if it
|
|||
|
|
does, just default it to: $b_safe_browser = true;
|
|||
|
|
*/
|
|||
|
|
if ( ( $moz_release_date < 20020400 ) || ( $moz_rv < 1 ) ) {
|
|||
|
|
$b_safe_browser = false;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 'ie':
|
|||
|
|
/*
|
|||
|
|
note we're adding in the trident/ search to return only first instance in case
|
|||
|
|
of msie 8, and we're triggering the break last condition in the test, as well
|
|||
|
|
as the test for a second search string, trident/
|
|||
|
|
*/
|
|||
|
|
$browser_number = g::get_item_version( $browser_user_agent, $browser_name, true, 'trident/' );
|
|||
|
|
// construct the proper real number if it's in compat mode and msie 8.0/9.0
|
|||
|
|
if ( strstr( $browser_number, '7.' ) && strstr( $browser_user_agent, 'trident/5' ) ) {
|
|||
|
|
// note that 7.0 becomes 9 when adding 1, but if it's 7.1 it will be 9.1
|
|||
|
|
$true_ie_number = $browser_number + 2;
|
|||
|
|
} elseif ( strstr( $browser_number, '7.' ) && strstr( $browser_user_agent, 'trident/4' ) ) {
|
|||
|
|
// note that 7.0 becomes 8 when adding 1, but if it's 7.1 it will be 8.1
|
|||
|
|
$true_ie_number = $browser_number + 1;
|
|||
|
|
}
|
|||
|
|
// the 9 series is finally standards compatible, html 5 etc, so worth a new id
|
|||
|
|
if ( $browser_number >= 9 ) {
|
|||
|
|
$ie_version = 'ie9x';
|
|||
|
|
} elseif ( $browser_number >= 7 ) {
|
|||
|
|
$ie_version = 'ie7x';
|
|||
|
|
} elseif ( strstr( $browser_user_agent, 'mac') ) {
|
|||
|
|
$ie_version = 'ieMac';
|
|||
|
|
} elseif ( $browser_number >= 5 ) {
|
|||
|
|
$ie_version = 'ie5x';
|
|||
|
|
} elseif ( ( $browser_number > 3 ) && ( $browser_number < 5 ) ) {
|
|||
|
|
$b_dom_browser = false;
|
|||
|
|
$ie_version = 'ie4';
|
|||
|
|
// this depends on what you're using the script for, make sure this fits your needs
|
|||
|
|
$b_safe_browser = true;
|
|||
|
|
} else {
|
|||
|
|
$ie_version = 'old';
|
|||
|
|
$b_dom_browser = false;
|
|||
|
|
$b_safe_browser = false;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 'op':
|
|||
|
|
$browser_number = g::get_item_version( $browser_user_agent, $browser_name );
|
|||
|
|
// opera is leaving version at 9.80 (or xx) for 10.x - see this for explanation
|
|||
|
|
// http://dev.opera.com/articles/view/opera-ua-string-changes/
|
|||
|
|
if ( strstr( $browser_number, '9.' ) && strstr( $browser_user_agent, 'version/' ) ) {
|
|||
|
|
g::get_set_count( 'set', 0 );
|
|||
|
|
$browser_number = g::get_item_version( $browser_user_agent, 'version/' );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if ( $browser_number < 5 ) {
|
|||
|
|
$b_safe_browser = false;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 'webkit':
|
|||
|
|
// note that this is the Webkit version number
|
|||
|
|
$browser_number = g::get_item_version( $browser_user_agent, $browser_name );
|
|||
|
|
// this is to pull out specific webkit versions, safari, google-chrome etc..
|
|||
|
|
$j_count = count( $a_webkit_types );
|
|||
|
|
for ($j = 0; $j < $j_count; $j++) {
|
|||
|
|
if (strstr( $browser_user_agent, $a_webkit_types[$j])) {
|
|||
|
|
$webkit_type = $a_webkit_types[$j];
|
|||
|
|
if ( $webkit_type == 'omniweb' ) {
|
|||
|
|
g::get_set_count( 'set', 2 );
|
|||
|
|
}
|
|||
|
|
$webkit_type_number = g::get_item_version( $browser_user_agent, $webkit_type );
|
|||
|
|
// epiphany hack
|
|||
|
|
if ( $a_webkit_types[$j] == 'gtklauncher' ) {
|
|||
|
|
$browser_name = 'epiphany';
|
|||
|
|
} else {
|
|||
|
|
$browser_name = $a_webkit_types[$j];
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
default:
|
|||
|
|
$browser_number = g::get_item_version( $browser_user_agent, $browser_name );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
// the browser was id'ed
|
|||
|
|
$b_success = true;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//assigns defaults if the browser was not found in the loop test
|
|||
|
|
if ( !$b_success ) {
|
|||
|
|
/*
|
|||
|
|
this will return the first part of the browser string if the above id's failed
|
|||
|
|
usually the first part of the browser string has the navigator useragent name/version in it.
|
|||
|
|
This will usually correctly id the browser and the browser number if it didn't get
|
|||
|
|
caught by the above routine.
|
|||
|
|
If you want a '' to do a if browser == '' type test, just comment out all lines below
|
|||
|
|
except for the last line, and uncomment the last line. If you want undefined values,
|
|||
|
|
the browser_name is '', you can always test for that
|
|||
|
|
*/
|
|||
|
|
// delete this part if you want an unknown browser returned
|
|||
|
|
$browser_name = substr( $browser_user_agent, 0, strcspn( $browser_user_agent , '();') );
|
|||
|
|
// this extracts just the browser name from the string, if something usable was found
|
|||
|
|
if ( $browser_name && preg_match( '/[^0-9][a-z]*-*\ *[a-z]*\ *[a-z]*/', $browser_name, $a_unhandled_browser ) ) {
|
|||
|
|
$browser_name = $a_unhandled_browser[0];
|
|||
|
|
if ( $browser_name == 'blackberry' ) {
|
|||
|
|
g::get_set_count( 'set', 0 );
|
|||
|
|
}
|
|||
|
|
$browser_number = g::get_item_version( $browser_user_agent, $browser_name );
|
|||
|
|
} else {
|
|||
|
|
$browser_name = 'NA';
|
|||
|
|
$browser_number = 'NA';
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
// get os data, mac os x test requires browser/version information, this is a change from older scripts
|
|||
|
|
if ($b_os_test) {
|
|||
|
|
$a_os_data = g::get_os_data( $browser_user_agent, $browser_working, $browser_number );
|
|||
|
|
$os_type = $a_os_data[0];// os name, abbreviated
|
|||
|
|
$os_number = $a_os_data[1];// os number or version if available
|
|||
|
|
}
|
|||
|
|
/*
|
|||
|
|
this ends the run through once if clause, set the boolean
|
|||
|
|
to true so the function won't retest everything
|
|||
|
|
*/
|
|||
|
|
$b_repeat = true;
|
|||
|
|
if ($browser_number && preg_match( '/[0-9]*\.*[0-9]*/', $browser_number, $a_browser_math_number ) ) {
|
|||
|
|
$browser_math_number = $a_browser_math_number[0];
|
|||
|
|
}
|
|||
|
|
if ( $b_mobile_test ) {
|
|||
|
|
$mobile_test = g::check_is_mobile( $browser_user_agent );
|
|||
|
|
if ( $mobile_test ) {
|
|||
|
|
$a_mobile_data = g::get_mobile_data( $browser_user_agent );
|
|||
|
|
$ua_type = 'mobile';
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
switch ($which_test) {
|
|||
|
|
case 'math_number':
|
|||
|
|
$which_test = 'browser_math_number';
|
|||
|
|
break;
|
|||
|
|
case 'number':
|
|||
|
|
$which_test = 'browser_number';
|
|||
|
|
break;
|
|||
|
|
case 'browser':
|
|||
|
|
$which_test = 'browser_working';
|
|||
|
|
break;
|
|||
|
|
case 'moz_version':
|
|||
|
|
$which_test = 'moz_data';
|
|||
|
|
break;
|
|||
|
|
case 'true_msie_version':
|
|||
|
|
$which_test = 'true_ie_number';
|
|||
|
|
break;
|
|||
|
|
case 'type':
|
|||
|
|
$which_test = 'ua_type';
|
|||
|
|
break;
|
|||
|
|
case 'webkit_version':
|
|||
|
|
$which_test = 'webkit_data';
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
/*
|
|||
|
|
assemble these first so they can be included in full return data, using static variables
|
|||
|
|
Note that there's no need to keep repacking these every time the script is called
|
|||
|
|
*/
|
|||
|
|
if (!$a_moz_data) {
|
|||
|
|
$a_moz_data = array( $moz_type, $moz_number, $moz_rv, $moz_rv_full, $moz_release_date );
|
|||
|
|
}
|
|||
|
|
if (!$a_webkit_data) {
|
|||
|
|
$a_webkit_data = array( $webkit_type, $webkit_type_number, $browser_number );
|
|||
|
|
}
|
|||
|
|
$run_time = g::script_time();
|
|||
|
|
|
|||
|
|
if ( !$a_full_assoc_data ) {
|
|||
|
|
$a_full_assoc_data = array(
|
|||
|
|
'browser_working' => $browser_working,
|
|||
|
|
'browser_number' => $browser_number,
|
|||
|
|
'ie_version' => $ie_version,
|
|||
|
|
'dom' => $b_dom_browser,
|
|||
|
|
'safe' => $b_safe_browser,
|
|||
|
|
'os' => $os_type,
|
|||
|
|
'os_number' => $os_number,
|
|||
|
|
'browser_name' => $browser_name,
|
|||
|
|
'ua_type' => $ua_type,
|
|||
|
|
'browser_math_number' => $browser_math_number,
|
|||
|
|
'moz_data' => $a_moz_data,
|
|||
|
|
'webkit_data' => $a_webkit_data,
|
|||
|
|
'mobile_test' => $mobile_test,
|
|||
|
|
'mobile_data' => $a_mobile_data,
|
|||
|
|
'true_ie_number' => $true_ie_number,
|
|||
|
|
'run_time' => $run_time
|
|||
|
|
);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// return parameters, either full data arrays, or by associative array index key
|
|||
|
|
switch ($which_test) {
|
|||
|
|
// returns all relevant browser information in an array with standard numberic indexes
|
|||
|
|
case 'full':
|
|||
|
|
$a_full_data = array($browser_working,
|
|||
|
|
$browser_number,
|
|||
|
|
$ie_version,
|
|||
|
|
$b_dom_browser,
|
|||
|
|
$b_safe_browser,
|
|||
|
|
$os_type,
|
|||
|
|
$os_number,
|
|||
|
|
$browser_name,
|
|||
|
|
$ua_type,
|
|||
|
|
$browser_math_number,
|
|||
|
|
$a_moz_data,
|
|||
|
|
$a_webkit_data,
|
|||
|
|
$mobile_test,
|
|||
|
|
$a_mobile_data,
|
|||
|
|
$true_ie_number,
|
|||
|
|
$run_time
|
|||
|
|
);
|
|||
|
|
return $a_full_data;
|
|||
|
|
break;
|
|||
|
|
case 'full_assoc':
|
|||
|
|
return $a_full_assoc_data;
|
|||
|
|
break;
|
|||
|
|
default:
|
|||
|
|
# check to see if the data is available, otherwise it's user typo of unsupported option
|
|||
|
|
if (isset( $a_full_assoc_data[$which_test])) {
|
|||
|
|
return $a_full_assoc_data[$which_test];
|
|||
|
|
} else {
|
|||
|
|
die( "You passed the browser detector an unsupported option for parameter 1: " . $which_test );
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* track total script execution time
|
|||
|
|
*/
|
|||
|
|
public function script_time ()
|
|||
|
|
{
|
|||
|
|
static $script_time;
|
|||
|
|
$elapsed_time = '';
|
|||
|
|
/*
|
|||
|
|
note that microtime(true) requires php 5 or greater for microtime(true)
|
|||
|
|
*/
|
|||
|
|
if (sprintf( "%01.1f", phpversion() ) >= 5) {
|
|||
|
|
if (is_null( $script_time )) {
|
|||
|
|
$script_time = microtime( true );
|
|||
|
|
} else {
|
|||
|
|
// note: (string)$var is same as strval($var)
|
|||
|
|
// $elapsed_time = (string)( microtime(true) - $script_time );
|
|||
|
|
$elapsed_time = (microtime( true ) - $script_time);
|
|||
|
|
$elapsed_time = sprintf( "%01.8f", $elapsed_time );
|
|||
|
|
$script_time = null; // can't unset a static variable
|
|||
|
|
return $elapsed_time;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
*
|
|||
|
|
* @param unknown_type $pv_browser_user_agent
|
|||
|
|
* @param unknown_type $pv_search_string
|
|||
|
|
* @param unknown_type $pv_b_break_last
|
|||
|
|
* @param unknown_type $pv_extra_search
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function get_item_version($pv_browser_user_agent, $pv_search_string, $pv_b_break_last = '', $pv_extra_search = '')
|
|||
|
|
{
|
|||
|
|
$substring_length = 15;
|
|||
|
|
$start_pos = 0; // set $start_pos to 0 for first iteration
|
|||
|
|
$string_working_number = '';
|
|||
|
|
for ($i = 0; $i < 4; $i++) {
|
|||
|
|
//start the search after the first string occurrence
|
|||
|
|
if (strpos( $pv_browser_user_agent, $pv_search_string, $start_pos ) !== false) {
|
|||
|
|
$start_pos = strpos( $pv_browser_user_agent, $pv_search_string, $start_pos ) + strlen( $pv_search_string );
|
|||
|
|
if (!$pv_b_break_last || ( $pv_extra_search && strstr( $pv_browser_user_agent, $pv_extra_search ) )) {
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
} else {
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$start_pos += g::get_set_count( 'get' );
|
|||
|
|
$string_working_number = substr( $pv_browser_user_agent, $start_pos, $substring_length );
|
|||
|
|
$string_working_number = substr( $string_working_number, 0, strcspn($string_working_number, ' );/') );
|
|||
|
|
if (!is_numeric( substr( $string_working_number, 0, 1 ))) {
|
|||
|
|
$string_working_number = '';
|
|||
|
|
}
|
|||
|
|
return $string_working_number;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
*
|
|||
|
|
* @param unknown_type $pv_type
|
|||
|
|
* @param unknown_type $pv_value
|
|||
|
|
*/
|
|||
|
|
public function get_set_count($pv_type, $pv_value = '')
|
|||
|
|
{
|
|||
|
|
static $slice_increment;
|
|||
|
|
$return_value = '';
|
|||
|
|
switch ( $pv_type ) {
|
|||
|
|
case 'get':
|
|||
|
|
if ( is_null( $slice_increment ) ) {
|
|||
|
|
$slice_increment = 1;
|
|||
|
|
}
|
|||
|
|
$return_value = $slice_increment;
|
|||
|
|
$slice_increment = 1; // reset to default
|
|||
|
|
return $return_value;
|
|||
|
|
break;
|
|||
|
|
case 'set':
|
|||
|
|
$slice_increment = $pv_value;
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* gets which os from the browser string
|
|||
|
|
*/
|
|||
|
|
public function get_os_data ($pv_browser_string, $pv_browser_name, $pv_version_number)
|
|||
|
|
{
|
|||
|
|
// initialize variables
|
|||
|
|
$os_working_type = '';
|
|||
|
|
$os_working_number = '';
|
|||
|
|
/*
|
|||
|
|
packs the os array. Use this order since some navigator user agents will put 'macintosh'
|
|||
|
|
in the navigator user agent string which would make the nt test register true
|
|||
|
|
*/
|
|||
|
|
$a_mac = array( 'intel mac', 'ppc mac', 'mac68k' );// this is not used currently
|
|||
|
|
// same logic, check in order to catch the os's in order, last is always default item
|
|||
|
|
$a_unix_types = array( 'dragonfly', 'freebsd', 'openbsd', 'netbsd', 'bsd', 'unixware', 'solaris', 'sunos', 'sun4', 'sun5', 'suni86', 'sun', 'irix5', 'irix6', 'irix', 'hpux9', 'hpux10', 'hpux11', 'hpux', 'hp-ux', 'aix1', 'aix2', 'aix3', 'aix4', 'aix5', 'aix', 'sco', 'unixware', 'mpras', 'reliant', 'dec', 'sinix', 'unix' );
|
|||
|
|
// only sometimes will you get a linux distro to id itself...
|
|||
|
|
$a_linux_distros = array( 'ubuntu', 'kubuntu', 'xubuntu', 'mepis', 'xandros', 'linspire', 'winspire', 'jolicloud', 'sidux', 'kanotix', 'debian', 'opensuse', 'suse', 'fedora', 'redhat', 'slackware', 'slax', 'mandrake', 'mandriva', 'gentoo', 'sabayon', 'linux' );
|
|||
|
|
$a_linux_process = array ( 'i386', 'i586', 'i686' );// not use currently
|
|||
|
|
// note, order of os very important in os array, you will get failed ids if changed
|
|||
|
|
$a_os_types = array( 'android', 'blackberry', 'iphone', 'palmos', 'palmsource', 'symbian', 'beos', 'os2', 'amiga', 'webtv', 'mac', 'nt', 'win', $a_unix_types, $a_linux_distros );
|
|||
|
|
|
|||
|
|
//os tester
|
|||
|
|
$i_count = count( $a_os_types );
|
|||
|
|
for ($i = 0; $i < $i_count; $i++) {
|
|||
|
|
// unpacks os array, assigns to variable $a_os_working
|
|||
|
|
$os_working_data = $a_os_types[$i];
|
|||
|
|
/*
|
|||
|
|
assign os to global os variable, os flag true on success
|
|||
|
|
!strstr($pv_browser_string, "linux" ) corrects a linux detection bug
|
|||
|
|
*/
|
|||
|
|
if (!is_array($os_working_data) && strstr($pv_browser_string, $os_working_data ) && !strstr( $pv_browser_string, "linux")) {
|
|||
|
|
$os_working_type = $os_working_data;
|
|||
|
|
|
|||
|
|
switch ($os_working_type) {
|
|||
|
|
// most windows now uses: NT X.Y syntax
|
|||
|
|
case 'nt':
|
|||
|
|
if (strstr( $pv_browser_string, 'nt 6.1' )) {
|
|||
|
|
$os_working_number = 6.1;
|
|||
|
|
} elseif (strstr( $pv_browser_string, 'nt 6.0')) {
|
|||
|
|
$os_working_number = 6.0;
|
|||
|
|
} elseif (strstr( $pv_browser_string, 'nt 5.2')) {
|
|||
|
|
$os_working_number = 5.2;
|
|||
|
|
} elseif (strstr( $pv_browser_string, 'nt 5.1') || strstr( $pv_browser_string, 'xp')) {
|
|||
|
|
$os_working_number = 5.1;//
|
|||
|
|
} elseif (strstr( $pv_browser_string, 'nt 5') || strstr( $pv_browser_string, '2000')) {
|
|||
|
|
$os_working_number = 5.0;
|
|||
|
|
} elseif (strstr( $pv_browser_string, 'nt 4')) {
|
|||
|
|
$os_working_number = 4;
|
|||
|
|
} elseif (strstr( $pv_browser_string, 'nt 3')) {
|
|||
|
|
$os_working_number = 3;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 'win':
|
|||
|
|
if (strstr( $pv_browser_string, 'vista')) {
|
|||
|
|
$os_working_number = 6.0;
|
|||
|
|
$os_working_type = 'nt';
|
|||
|
|
} elseif ( strstr( $pv_browser_string, 'xp')) {
|
|||
|
|
$os_working_number = 5.1;
|
|||
|
|
$os_working_type = 'nt';
|
|||
|
|
} elseif ( strstr( $pv_browser_string, '2003')) {
|
|||
|
|
$os_working_number = 5.2;
|
|||
|
|
$os_working_type = 'nt';
|
|||
|
|
}
|
|||
|
|
elseif ( strstr( $pv_browser_string, 'windows ce' ) )// windows CE
|
|||
|
|
{
|
|||
|
|
$os_working_number = 'ce';
|
|||
|
|
$os_working_type = 'nt';
|
|||
|
|
}
|
|||
|
|
elseif ( strstr( $pv_browser_string, '95' ) )
|
|||
|
|
{
|
|||
|
|
$os_working_number = '95';
|
|||
|
|
}
|
|||
|
|
elseif ( ( strstr( $pv_browser_string, '9x 4.9' ) ) || ( strstr( $pv_browser_string, ' me' ) ) )
|
|||
|
|
{
|
|||
|
|
$os_working_number = 'me';
|
|||
|
|
}
|
|||
|
|
elseif ( strstr( $pv_browser_string, '98' ) )
|
|||
|
|
{
|
|||
|
|
$os_working_number = '98';
|
|||
|
|
}
|
|||
|
|
elseif ( strstr( $pv_browser_string, '2000' ) )// windows 2000, for opera ID
|
|||
|
|
{
|
|||
|
|
$os_working_number = 5.0;
|
|||
|
|
$os_working_type = 'nt';
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 'mac':
|
|||
|
|
if (strstr($pv_browser_string, 'os x')) {
|
|||
|
|
if (strstr($pv_browser_string, 'os x ')) {
|
|||
|
|
$os_working_number = str_replace( '_', '.', g::get_item_version( $pv_browser_string, 'os x' ) );
|
|||
|
|
} else {
|
|||
|
|
$os_working_number = 10;
|
|||
|
|
}
|
|||
|
|
} elseif ( ( $pv_browser_name == 'saf' ) || ( $pv_browser_name == 'cam' ) ||
|
|||
|
|
( ( $pv_browser_name == 'moz' ) && ( $pv_version_number >= 1.3 ) ) ||
|
|||
|
|
( ( $pv_browser_name == 'ie' ) && ( $pv_version_number >= 5.2 ) ) ) {
|
|||
|
|
$os_working_number = 10;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 'iphone':
|
|||
|
|
$os_working_number = 10;
|
|||
|
|
break;
|
|||
|
|
default:
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
} elseif ( is_array( $os_working_data ) && ( $i == ( $i_count - 2 ) ) ) {
|
|||
|
|
$j_count = count($os_working_data);
|
|||
|
|
for ($j = 0; $j < $j_count; $j++) {
|
|||
|
|
if (strstr( $pv_browser_string, $os_working_data[$j])) {
|
|||
|
|
$os_working_type = 'unix'; //if the os is in the unix array, it's unix, obviously...
|
|||
|
|
$os_working_number = ( $os_working_data[$j] != 'unix' ) ? $os_working_data[$j] : '';// assign sub unix version from the unix array
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
} elseif (is_array( $os_working_data ) && ( $i == ( $i_count - 1 ))) {
|
|||
|
|
$j_count = count($os_working_data);
|
|||
|
|
for ($j = 0; $j < $j_count; $j++) {
|
|||
|
|
if ( strstr( $pv_browser_string, $os_working_data[$j] )) {
|
|||
|
|
$os_working_type = 'lin';
|
|||
|
|
// assign linux distro from the linux array, there's a default
|
|||
|
|
//search for 'lin', if it's that, set version to ''
|
|||
|
|
$os_working_number = ( $os_working_data[$j] != 'linux' ) ? $os_working_data[$j] : '';
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
// pack the os data array for return to main function
|
|||
|
|
$a_os_data = array( $os_working_type, $os_working_number );
|
|||
|
|
|
|||
|
|
return $a_os_data;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
*
|
|||
|
|
* @param unknown_type $pv_browser_user_agent
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function check_is_mobile($pv_browser_user_agent)
|
|||
|
|
{
|
|||
|
|
$mobile_working_test = '';
|
|||
|
|
$a_mobile_search = array(
|
|||
|
|
'android', 'epoc', 'linux armv', 'palmos', 'palmsource', 'windows ce', 'windows phone os', 'symbianos', 'symbian os', 'symbian', 'webos',
|
|||
|
|
// devices - ipod before iphone or fails
|
|||
|
|
'benq', 'blackberry', 'danger hiptop', 'ddipocket', ' droid', 'ipad', 'ipod', 'iphone', 'kindle', 'lge-cx', 'lge-lx', 'lge-mx', 'lge vx', 'lge ', 'lge-', 'lg;lx', 'nintendo wii', 'nokia', 'palm', 'pdxgw', 'playstation', 'sagem', 'samsung', 'sec-sgh', 'sharp', 'sonyericsson', 'sprint', 'zune', 'j-phone', 'n410', 'mot 24', 'mot-', 'htc-', 'htc_', 'htc ', 'sec-', 'sie-m', 'sie-s', 'spv ', 'vodaphone', 'smartphone', 'armv', 'midp', 'mobilephone',
|
|||
|
|
// browsers
|
|||
|
|
'avantgo', 'blazer', 'elaine', 'eudoraweb', 'iemobile', 'minimo', 'mobile safari', 'mobileexplorer', 'opera mobi', 'opera mini', 'netfront', 'opwv', 'polaris', 'semc-browser', 'up.browser', 'webpro', 'wms pie', 'xiino',
|
|||
|
|
// services - astel out of business
|
|||
|
|
'astel', 'docomo', 'novarra-vision', 'portalmmm', 'reqwirelessweb', 'vodafone'
|
|||
|
|
);
|
|||
|
|
|
|||
|
|
// then do basic mobile type search, this uses data from: get_mobile_data()
|
|||
|
|
$j_count = count( $a_mobile_search );
|
|||
|
|
for ($j = 0; $j < $j_count; $j++) {
|
|||
|
|
if (strstr( $pv_browser_user_agent, $a_mobile_search[$j] )) {
|
|||
|
|
$mobile_working_test = $a_mobile_search[$j];
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return $mobile_working_test;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
*
|
|||
|
|
* @param unknown_type $pv_browser_user_agent
|
|||
|
|
*/
|
|||
|
|
public function get_mobile_data ($pv_browser_user_agent)
|
|||
|
|
{
|
|||
|
|
$mobile_browser = '';
|
|||
|
|
$mobile_browser_number = '';
|
|||
|
|
$mobile_device = '';
|
|||
|
|
$mobile_device_number = '';
|
|||
|
|
$mobile_os = ''; // will usually be null, sorry
|
|||
|
|
$mobile_os_number = '';
|
|||
|
|
$mobile_server = '';
|
|||
|
|
$mobile_server_number = '';
|
|||
|
|
|
|||
|
|
$a_mobile_browser = array( 'avantgo', 'blazer', 'elaine', 'eudoraweb', 'iemobile', 'minimo', 'mobile safari', 'mobileexplorer', 'opera mobi', 'opera mini', 'netfront', 'opwv', 'polaris', 'semc-browser', 'up.browser', 'webpro', 'wms pie', 'xiino' );
|
|||
|
|
$a_mobile_device = array( 'benq', 'blackberry', 'danger hiptop', 'ddipocket', ' droid', 'htc_dream', 'htc espresso', 'htc hero', 'htc halo', 'htc huangshan', 'htc legend', 'htc liberty', 'htc paradise', 'htc supersonic', 'htc tattoo', 'ipad', 'ipod', 'iphone', 'kindle', 'lge-cx', 'lge-lx', 'lge-mx', 'lge vx', 'lg;lx', 'nintendo wii', 'nokia', 'palm', 'pdxgw', 'playstation', 'sagem', 'samsung', 'sec-sgh', 'sharp', 'sonyericsson', 'sprint', 'zunehd', 'zune', 'j-phone', 'milestone', 'n410', 'mot 24', 'mot-', 'htc-', 'htc_', 'htc ', 'lge ', 'lge-', 'sec-', 'sie-m', 'sie-s', 'spv ', 'smartphone', 'armv', 'midp', 'mobilephone' );
|
|||
|
|
$a_mobile_os = array( 'android', 'epoc', 'cpu os', 'iphone os', 'palmos', 'palmsource', 'windows phone os', 'windows ce', 'symbianos', 'symbian os', 'symbian', 'webos', 'linux armv' );
|
|||
|
|
$a_mobile_server = array( 'astel', 'docomo', 'novarra-vision', 'portalmmm', 'reqwirelessweb', 'vodafone' );
|
|||
|
|
|
|||
|
|
$k_count = count( $a_mobile_browser );
|
|||
|
|
for ($k = 0; $k < $k_count; $k++) {
|
|||
|
|
if (strstr( $pv_browser_user_agent, $a_mobile_browser[$k] )) {
|
|||
|
|
$mobile_browser = $a_mobile_browser[$k];
|
|||
|
|
$mobile_browser_number = g::get_item_version( $pv_browser_user_agent, $mobile_browser );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
$k_count = count( $a_mobile_device );
|
|||
|
|
for ($k = 0; $k < $k_count; $k++) {
|
|||
|
|
if (strstr( $pv_browser_user_agent, $a_mobile_device[$k] )) {
|
|||
|
|
$mobile_device = trim ( $a_mobile_device[$k], '-_' ); // but not space trims yet
|
|||
|
|
if ($mobile_device == 'blackberry') {
|
|||
|
|
g::get_set_count( 'set', 0 );
|
|||
|
|
}
|
|||
|
|
$mobile_device_number = g::get_item_version( $pv_browser_user_agent, $mobile_device );
|
|||
|
|
$mobile_device = trim( $mobile_device ); // some of the id search strings have white space
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
$k_count = count( $a_mobile_os );
|
|||
|
|
for ($k = 0; $k < $k_count; $k++) {
|
|||
|
|
if (strstr( $pv_browser_user_agent, $a_mobile_os[$k] )) {
|
|||
|
|
$mobile_os = $a_mobile_os[$k];
|
|||
|
|
$mobile_os_number = str_replace( '_', '.', g::get_item_version( $pv_browser_user_agent, $mobile_os ) );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
$k_count = count( $a_mobile_server );
|
|||
|
|
for ($k = 0; $k < $k_count; $k++) {
|
|||
|
|
if (strstr( $pv_browser_user_agent, $a_mobile_server[$k] )) {
|
|||
|
|
$mobile_server = $a_mobile_server[$k];
|
|||
|
|
$mobile_server_number = g::get_item_version( $pv_browser_user_agent, $mobile_server );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
// just for cases where we know it's a mobile device already
|
|||
|
|
if (!$mobile_os && ( $mobile_browser || $mobile_device || $mobile_server ) && strstr( $pv_browser_user_agent, 'linux' ) ) {
|
|||
|
|
$mobile_os = 'linux';
|
|||
|
|
$mobile_os_number = g::get_item_version( $pv_browser_user_agent, 'linux' );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$a_mobile_data = array( $mobile_device, $mobile_browser, $mobile_browser_number, $mobile_os, $mobile_os_number, $mobile_server, $mobile_server_number, $mobile_device_number );
|
|||
|
|
return $a_mobile_data;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
*
|
|||
|
|
* @param unknown_type $requestUri
|
|||
|
|
*/
|
|||
|
|
public function parseRestUri ($requestUri)
|
|||
|
|
{
|
|||
|
|
$args = array ();
|
|||
|
|
//$args['SYS_TEMP'] = $requestUri[1];
|
|||
|
|
define( 'SYS_TEMP', $requestUri[2] );
|
|||
|
|
$restUri = '';
|
|||
|
|
|
|||
|
|
for ($i = 3; $i < count( $requestUri ); $i ++) {
|
|||
|
|
$restUri .= '/' . $requestUri[$i];
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$args['SYS_LANG'] = 'en'; // TODO, this can be set from http header
|
|||
|
|
$args['SYS_SKIN'] = '';
|
|||
|
|
$args['SYS_COLLECTION'] = '';
|
|||
|
|
$args['SYS_TARGET'] = $restUri;
|
|||
|
|
|
|||
|
|
return $args;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
*
|
|||
|
|
* @param unknown_type $aRequestUri
|
|||
|
|
* @return multitype:string mixed Ambigous <number, string>
|
|||
|
|
*/
|
|||
|
|
public function parseNormalUri ($aRequestUri)
|
|||
|
|
{
|
|||
|
|
if (substr( $aRequestUri[1], 0, 3 ) == 'sys') {
|
|||
|
|
define( 'SYS_TEMP', substr( $aRequestUri[1], 3 ) );
|
|||
|
|
} else {
|
|||
|
|
define( "ENABLE_ENCRYPT", 'yes' );
|
|||
|
|
define( 'SYS_TEMP', $aRequestUri[1] );
|
|||
|
|
$plain = '/sys' . SYS_TEMP;
|
|||
|
|
|
|||
|
|
for ($i = 2; $i < count( $aRequestUri ); $i ++) {
|
|||
|
|
$decoded = g::decrypt( urldecode( $aRequestUri[$i] ), URL_KEY );
|
|||
|
|
if ($decoded == 'sWì›') {
|
|||
|
|
$decoded = $VARS[$i]; //this is for the string "../"
|
|||
|
|
}
|
|||
|
|
$plain .= '/' . $decoded;
|
|||
|
|
}
|
|||
|
|
$_SERVER["REQUEST_URI"] = $plain;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$work = explode( '?', $_SERVER["REQUEST_URI"] );
|
|||
|
|
|
|||
|
|
if (count( $work ) > 1) {
|
|||
|
|
define( 'SYS_CURRENT_PARMS', $work[1] );
|
|||
|
|
} else {
|
|||
|
|
define( 'SYS_CURRENT_PARMS', '' );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
define( 'SYS_CURRENT_URI', $work[0] );
|
|||
|
|
|
|||
|
|
if (! defined( 'SYS_CURRENT_PARMS' )) {
|
|||
|
|
define( 'SYS_CURRENT_PARMS', $work[1] );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$preArray = explode( '&', SYS_CURRENT_PARMS );
|
|||
|
|
$buffer = explode( '.', $work[0] );
|
|||
|
|
|
|||
|
|
if (count( $buffer ) == 1) {
|
|||
|
|
$buffer[1] = '';
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//request type
|
|||
|
|
define( 'REQUEST_TYPE', ($buffer[1] != "" ? $buffer[1] : 'html') );
|
|||
|
|
|
|||
|
|
$toparse = substr( $buffer[0], 1, strlen( $buffer[0] ) - 1 );
|
|||
|
|
$uriVars = explode( '/', $toparse );
|
|||
|
|
|
|||
|
|
unset( $work );
|
|||
|
|
unset( $buffer );
|
|||
|
|
unset( $toparse );
|
|||
|
|
array_shift( $uriVars );
|
|||
|
|
|
|||
|
|
$args = array ();
|
|||
|
|
$args['SYS_LANG'] = array_shift( $uriVars );
|
|||
|
|
$args['SYS_SKIN'] = array_shift( $uriVars );
|
|||
|
|
$args['SYS_COLLECTION'] = array_shift( $uriVars );
|
|||
|
|
$args['SYS_TARGET'] = array_shift( $uriVars );
|
|||
|
|
|
|||
|
|
//to enable more than 2 directories...in the methods structure
|
|||
|
|
while (count( $uriVars ) > 0) {
|
|||
|
|
$args['SYS_TARGET'] .= '/' . array_shift( $uriVars );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/* Fix to prevent use uxs skin outside siplified interface,
|
|||
|
|
because that skin is not compatible with others interfaces*/
|
|||
|
|
if ($args['SYS_SKIN'] == 'uxs' && $args['SYS_COLLECTION'] != 'home' && $args['SYS_COLLECTION'] != 'cases') {
|
|||
|
|
$config = System::getSystemConfiguration();
|
|||
|
|
$args['SYS_SKIN'] = $config['default_skin'];
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return $args;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* * Encrypt and decrypt functions ***
|
|||
|
|
*/
|
|||
|
|
/**
|
|||
|
|
* Encrypt string
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $string
|
|||
|
|
* @param string $key
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function encrypt ($string, $key)
|
|||
|
|
{
|
|||
|
|
//print $string;
|
|||
|
|
// if ( defined ( 'ENABLE_ENCRYPT' ) && ENABLE_ENCRYPT == 'yes' ) {
|
|||
|
|
if (strpos( $string, '|', 0 ) !== false) {
|
|||
|
|
return $string;
|
|||
|
|
}
|
|||
|
|
$result = '';
|
|||
|
|
for ($i = 0; $i < strlen( $string ); $i ++) {
|
|||
|
|
$char = substr( $string, $i, 1 );
|
|||
|
|
$keychar = substr( $key, ($i % strlen( $key )) - 1, 1 );
|
|||
|
|
$char = chr( ord( $char ) + ord( $keychar ) );
|
|||
|
|
$result .= $char;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$result = base64_encode( $result );
|
|||
|
|
$result = str_replace( '/', '°', $result );
|
|||
|
|
$result = str_replace( '=', '', $result );
|
|||
|
|
return $result;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Decrypt string
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $string
|
|||
|
|
* @param string $key
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function decrypt ($string, $key)
|
|||
|
|
{
|
|||
|
|
// if ( defined ( 'ENABLE_ENCRYPT' ) && ENABLE_ENCRYPT == 'yes' ) {
|
|||
|
|
//if (strpos($string, '|', 0) !== false) return $string;
|
|||
|
|
$result = '';
|
|||
|
|
$string = str_replace( '°', '/', $string );
|
|||
|
|
$string_jhl = explode( "?", $string );
|
|||
|
|
$string = base64_decode( $string );
|
|||
|
|
$string = base64_decode( $string_jhl[0] );
|
|||
|
|
|
|||
|
|
for ($i = 0; $i < strlen( $string ); $i ++) {
|
|||
|
|
$char = substr( $string, $i, 1 );
|
|||
|
|
$keychar = substr( $key, ($i % strlen( $key )) - 1, 1 );
|
|||
|
|
$char = chr( ord( $char ) - ord( $keychar ) );
|
|||
|
|
$result .= $char;
|
|||
|
|
}
|
|||
|
|
if (! empty( $string_jhl[1] )) {
|
|||
|
|
$result .= '?' . $string_jhl[1];
|
|||
|
|
}
|
|||
|
|
return $result;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
*
|
|||
|
|
* @param unknown_type $model
|
|||
|
|
* @return unknown
|
|||
|
|
*/
|
|||
|
|
public function getModel($model)
|
|||
|
|
{
|
|||
|
|
require_once "classes/model/$model.php";
|
|||
|
|
return new $model();
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Create an encrypted unique identifier based on $id and the selected scope id.
|
|||
|
|
*
|
|||
|
|
* @author David S. Callizaya S. <davidsantos@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $scope
|
|||
|
|
* @param string $id
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function createUID ($scope, $id)
|
|||
|
|
{
|
|||
|
|
$e = $scope . $id;
|
|||
|
|
$e = g::encrypt( $e, URL_KEY );
|
|||
|
|
$e = str_replace( array ('+','/','='
|
|||
|
|
), array ('__','_','___'
|
|||
|
|
), base64_encode( $e ) );
|
|||
|
|
return $e;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* (Create an encrypted unique identificator based on $id and the selected scope id.) ^-1
|
|||
|
|
* getUIDName
|
|||
|
|
*
|
|||
|
|
* @author David S. Callizaya S. <davidsantos@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $id
|
|||
|
|
* @param string $scope
|
|||
|
|
* @return string
|
|||
|
|
*/
|
|||
|
|
public function getUIDName ($uid, $scope = '')
|
|||
|
|
{
|
|||
|
|
$e = str_replace( array ('=','+','/'
|
|||
|
|
), array ('___','__','_'
|
|||
|
|
), $uid );
|
|||
|
|
$e = base64_decode( $e );
|
|||
|
|
$e = g::decrypt( $e, URL_KEY );
|
|||
|
|
$e = substr( $e, strlen( $scope ) );
|
|||
|
|
return $e;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Merge 2 arrays
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @return array
|
|||
|
|
*/
|
|||
|
|
public function array_merges ()
|
|||
|
|
{
|
|||
|
|
$array = array ();
|
|||
|
|
$arrays = & func_get_args();
|
|||
|
|
foreach ($arrays as $array_i) {
|
|||
|
|
if (is_array( $array_i )) {
|
|||
|
|
g::array_merge_2( $array, $array_i );
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return $array;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Merge 2 arrays
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $array
|
|||
|
|
* @param string $array_i
|
|||
|
|
* @return array
|
|||
|
|
*/
|
|||
|
|
public function array_merge_2 (&$array, &$array_i)
|
|||
|
|
{
|
|||
|
|
foreach ($array_i as $k => $v) {
|
|||
|
|
if (is_array( $v )) {
|
|||
|
|
if (! isset( $array[$k] )) {
|
|||
|
|
$array[$k] = array ();
|
|||
|
|
}
|
|||
|
|
g::array_merge_2( $array[$k], $v );
|
|||
|
|
} else {
|
|||
|
|
if (isset( $array[$k] ) && is_array( $array[$k] )) {
|
|||
|
|
$array[$k][0] = $v;
|
|||
|
|
} else {
|
|||
|
|
if (isset( $array ) && ! is_array( $array )) {
|
|||
|
|
$temp = $array;
|
|||
|
|
$array = array();
|
|||
|
|
$array[0] = $temp;
|
|||
|
|
}
|
|||
|
|
$array[$k] = $v;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/* Returns a sql string with @@parameters replaced with its values defined
|
|||
|
|
* in array $result using the next notation:
|
|||
|
|
* NOTATION:
|
|||
|
|
* @@ Quoted parameter acording to the SYSTEM's Database
|
|||
|
|
* @Q Double quoted parameter \\ \"
|
|||
|
|
* @q Single quoted parameter \\ \'
|
|||
|
|
* @% URL string
|
|||
|
|
* @# Non-quoted parameter
|
|||
|
|
* @! Evaluate string : Replace the parameters in value and then in the sql string
|
|||
|
|
* @fn() Evaluate string with the function "fn"
|
|||
|
|
* @author David Callizaya <calidavidx21@hotmail.com>
|
|||
|
|
*/
|
|||
|
|
public function replaceDataField ($sqlString, $result, $DBEngine = 'mysql')
|
|||
|
|
{
|
|||
|
|
if (! is_array( $result )) {
|
|||
|
|
$result = array ();
|
|||
|
|
}
|
|||
|
|
$result = $result + g::getSystemConstants();
|
|||
|
|
$__textoEval = "";
|
|||
|
|
$u = 0;
|
|||
|
|
//$count=preg_match_all('/\@(?:([\@\%\#\!Qq])([a-zA-Z\_]\w*)|([a-zA-Z\_][\w\-\>\:]*)\(((?:[^\\\\\)]*(?:[\\\\][\w\W])?)*)\))/',$sqlString,$match,PREG_PATTERN_ORDER | PREG_OFFSET_CAPTURE);
|
|||
|
|
$count = preg_match_all( '/\@(?:([\@\%\#\=\!Qq])([a-zA-Z\_]\w*)|([a-zA-Z\_][\w\-\>\:]*)\(((?:[^\\\\\)]*?)*)\))/', $sqlString, $match, PREG_PATTERN_ORDER | PREG_OFFSET_CAPTURE );
|
|||
|
|
if ($count) {
|
|||
|
|
for ($r = 0; $r < $count; $r ++) {
|
|||
|
|
if (! isset( $result[$match[2][$r][0]] )) {
|
|||
|
|
$result[$match[2][$r][0]] = '';
|
|||
|
|
}
|
|||
|
|
if (! is_array( $result[$match[2][$r][0]] )) {
|
|||
|
|
$__textoEval .= substr( $sqlString, $u, $match[0][$r][1] - $u );
|
|||
|
|
$u = $match[0][$r][1] + strlen( $match[0][$r][0] );
|
|||
|
|
//Mysql quotes scape
|
|||
|
|
if (($match[1][$r][0] == '@') && (isset( $result[$match[2][$r][0]] ))) {
|
|||
|
|
$__textoEval .= "\"" . g::sqlEscape( $result[$match[2][$r][0]], $DBEngine ) . "\"";
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
//URL encode
|
|||
|
|
if (($match[1][$r][0]=='%')&&(isset($result[$match[2][$r][0]]))) {
|
|||
|
|
$__textoEval.=urlencode($result[$match[2][$r][0]]);
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
//Double quoted parameter
|
|||
|
|
if (($match[1][$r][0]=='Q')&&(isset($result[$match[2][$r][0]]))) {
|
|||
|
|
$__textoEval.='"'.addcslashes($result[$match[2][$r][0]],'\\"').'"';
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
//Single quoted parameter
|
|||
|
|
if (($match[1][$r][0]=='q')&&(isset($result[$match[2][$r][0]]))) {
|
|||
|
|
$__textoEval.="'".addcslashes($result[$match[2][$r][0]],'\\\'')."'";
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
//Substring (Sub replaceDataField)
|
|||
|
|
if (($match[1][$r][0]=='!')&&(isset($result[$match[2][$r][0]]))) {
|
|||
|
|
$__textoEval.=g::replaceDataField($result[$match[2][$r][0]],$result);
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
//Call function
|
|||
|
|
if (($match[1][$r][0]==='')&&($match[2][$r][0]==='')&&($match[3][$r][0]!=='')) {
|
|||
|
|
eval('$strAux = ' . $match[3][$r][0] . '(\'' . addcslashes(g::replaceDataField(stripslashes($match[4][$r][0]),$result),'\\\'') . '\');');
|
|||
|
|
|
|||
|
|
if ($match[3][$r][0] == "g::LoadTranslation") {
|
|||
|
|
$arraySearch = array("'");
|
|||
|
|
$arrayReplace = array("\\'");
|
|||
|
|
$strAux = str_replace($arraySearch, $arrayReplace, $strAux);
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$__textoEval .= $strAux;
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
//Non-quoted
|
|||
|
|
if (($match[1][$r][0]=='#')&&(isset($result[$match[2][$r][0]]))) {
|
|||
|
|
$__textoEval.=g::replaceDataField($result[$match[2][$r][0]],$result);
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
//Non-quoted =
|
|||
|
|
if (($match[1][$r][0]=='=')&&(isset($result[$match[2][$r][0]]))) {
|
|||
|
|
$__textoEval.=g::replaceDataField($result[$match[2][$r][0]],$result);
|
|||
|
|
continue;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
$__textoEval.=substr($sqlString,$u);
|
|||
|
|
return $__textoEval;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* microtime_float
|
|||
|
|
*
|
|||
|
|
* @return array_sum(explode(' ',microtime()))
|
|||
|
|
*/
|
|||
|
|
/*public static*/
|
|||
|
|
public function microtime_float ()
|
|||
|
|
{
|
|||
|
|
return array_sum( explode( ' ', microtime() ) );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Return the System defined constants and Application variables
|
|||
|
|
* Constants: SYS_*
|
|||
|
|
* Sessions : USER_* , URS_*
|
|||
|
|
*/
|
|||
|
|
public function getSystemConstants($params = null)
|
|||
|
|
{
|
|||
|
|
$t1 = g::microtime_float();
|
|||
|
|
$sysCon = array();
|
|||
|
|
|
|||
|
|
if (defined("SYS_LANG")) {
|
|||
|
|
$sysCon["SYS_LANG"] = SYS_LANG;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (defined("SYS_SKIN")) {
|
|||
|
|
$sysCon["SYS_SKIN"] = SYS_SKIN;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (defined("SYS_SYS")) {
|
|||
|
|
$sysCon["SYS_SYS"] = SYS_SYS;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$sysCon["APPLICATION"] = (isset($_SESSION["APPLICATION"]))? $_SESSION["APPLICATION"] : "";
|
|||
|
|
$sysCon["PROCESS"] = (isset($_SESSION["PROCESS"]))? $_SESSION["PROCESS"] : "";
|
|||
|
|
$sysCon["TASK"] = (isset($_SESSION["TASK"]))? $_SESSION["TASK"] : "";
|
|||
|
|
$sysCon["INDEX"] = (isset($_SESSION["INDEX"]))? $_SESSION["INDEX"] : "";
|
|||
|
|
$sysCon["USER_LOGGED"] = (isset($_SESSION["USER_LOGGED"]))? $_SESSION["USER_LOGGED"] : "";
|
|||
|
|
$sysCon["USR_USERNAME"] = (isset($_SESSION["USR_USERNAME"]))? $_SESSION["USR_USERNAME"] : "";
|
|||
|
|
|
|||
|
|
//###############################################################################################
|
|||
|
|
// Added for compatibility betweek aplication called from web Entry that uses just WS functions
|
|||
|
|
//###############################################################################################
|
|||
|
|
|
|||
|
|
if ($params != null) {
|
|||
|
|
if (isset($params->option)) {
|
|||
|
|
switch ($params->option) {
|
|||
|
|
case "STORED SESSION":
|
|||
|
|
if (isset($params->SID)) {
|
|||
|
|
g::LoadClass("sessions");
|
|||
|
|
|
|||
|
|
$oSessions = new Sessions($params->SID);
|
|||
|
|
$sysCon = array_merge($sysCon, $oSessions->getGlobals());
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
if (isset($params->appData) && is_array($params->appData)) {
|
|||
|
|
$sysCon["APPLICATION"] = $params->appData["APPLICATION"];
|
|||
|
|
$sysCon["PROCESS"] = $params->appData["PROCESS"];
|
|||
|
|
$sysCon["TASK"] = $params->appData["TASK"];
|
|||
|
|
$sysCon["INDEX"] = $params->appData["INDEX"];
|
|||
|
|
|
|||
|
|
if (empty($sysCon["USER_LOGGED"])) {
|
|||
|
|
$sysCon["USER_LOGGED"] = $params->appData["USER_LOGGED"];
|
|||
|
|
$sysCon["USR_USERNAME"] = $params->appData["USR_USERNAME"];
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return $sysCon;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Escapes special characters in a string for use in a SQL statement
|
|||
|
|
* @author David Callizaya <calidavidx21@hotmail.com>
|
|||
|
|
* @param string $sqlString The string to be escaped
|
|||
|
|
* @param string $DBEngine Target DBMS
|
|||
|
|
*/
|
|||
|
|
public function sqlEscape ($sqlString, $DBEngine = DB_ADAPTER)
|
|||
|
|
{
|
|||
|
|
$DBEngine = DB_ADAPTER;
|
|||
|
|
switch ($DBEngine) {
|
|||
|
|
case 'mysql':
|
|||
|
|
$con = Propel::getConnection( 'workflow' );
|
|||
|
|
return mysql_real_escape_string( stripslashes( $sqlString ), $con->getResource() );
|
|||
|
|
break;
|
|||
|
|
case 'myxml':
|
|||
|
|
$sqlString = str_replace( '"', '""', $sqlString );
|
|||
|
|
return str_replace( "'", "''", $sqlString );
|
|||
|
|
break;
|
|||
|
|
default:
|
|||
|
|
return addslashes( stripslashes( $sqlString ) );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* Load a template
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $strTemplateName
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function LoadTemplate ($strTemplateName)
|
|||
|
|
{
|
|||
|
|
if ($strTemplateName == '') {
|
|||
|
|
return;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$temp = $strTemplateName . ".php";
|
|||
|
|
$file = g::ExpandPath( 'templates' ) . $temp;
|
|||
|
|
// Check if its a user template
|
|||
|
|
if (file_exists( $file )) {
|
|||
|
|
//require_once( $file );
|
|||
|
|
include ($file);
|
|||
|
|
} else {
|
|||
|
|
// Try to get the global system template
|
|||
|
|
$file = PATH_TEMPLATE . PATH_SEP . $temp;
|
|||
|
|
//require_once( $file );
|
|||
|
|
if (file_exists( $file )) {
|
|||
|
|
include ($file);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* verify path
|
|||
|
|
*
|
|||
|
|
* @author Fernando Ontiveros Lira <fernando@colosa.com>
|
|||
|
|
* @access public
|
|||
|
|
* @param string $strPath path
|
|||
|
|
* @param boolean $createPath if true this public function will create the path
|
|||
|
|
* @return boolean
|
|||
|
|
*/
|
|||
|
|
public function verifyPath ($strPath, $createPath = false)
|
|||
|
|
{
|
|||
|
|
$folder_path = strstr( $strPath, '.' ) ? dirname( $strPath ) : $strPath;
|
|||
|
|
|
|||
|
|
if (file_exists( $strPath ) || @is_dir( $strPath )) {
|
|||
|
|
return true;
|
|||
|
|
} else {
|
|||
|
|
if ($createPath) {
|
|||
|
|
//TODO:: Define Environment constants: Devel (0777), Production (0770), ...
|
|||
|
|
G::mk_dir( $strPath, 0777 );
|
|||
|
|
} else {
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
return false;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* getformatedDate
|
|||
|
|
*
|
|||
|
|
* @param date $date
|
|||
|
|
* @param string $format default value 'yyyy-mm-dd',
|
|||
|
|
* @param string $lang default value ''
|
|||
|
|
*
|
|||
|
|
* @return string $ret
|
|||
|
|
*/
|
|||
|
|
public function getformatedDate ($date, $format = 'yyyy-mm-dd', $lang = '')
|
|||
|
|
{
|
|||
|
|
/**
|
|||
|
|
* ******************************************************************************************************
|
|||
|
|
* if the year is 2008 and the format is yy then -> 08
|
|||
|
|
* if the year is 2008 and the format is yyyy then -> 2008
|
|||
|
|
*
|
|||
|
|
* if the month is 05 and the format is mm then -> 05
|
|||
|
|
* if the month is 05 and the format is m and the month is less than 10 then -> 5 else digit normal
|
|||
|
|
* if the month is 05 and the format is MM or M then -> May
|
|||
|
|
*
|
|||
|
|
* if the day is 5 and the format is dd then -> 05
|
|||
|
|
* if the day is 5 and the format is d and the day is less than 10 then -> 5 else digit normal
|
|||
|
|
* if the day is 5 and the format is DD or D then -> five
|
|||
|
|
* *******************************************************************************************************
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
//scape the literal
|
|||
|
|
switch ($lang) {
|
|||
|
|
case 'es':
|
|||
|
|
$format = str_replace( ' de ', '[of]', $format );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//first we must formatted the string
|
|||
|
|
$format = str_replace( 'yyyy', '{YEAR}', $format );
|
|||
|
|
$format = str_replace( 'yy', '{year}', $format );
|
|||
|
|
|
|||
|
|
$format = str_replace( 'mm', '{YONTH}', $format );
|
|||
|
|
$format = str_replace( 'm', '{month}', $format );
|
|||
|
|
$format = str_replace( 'M', '{XONTH}', $format );
|
|||
|
|
|
|||
|
|
$format = str_replace( 'dd', '{DAY}', $format );
|
|||
|
|
$format = str_replace( 'd', '{day}', $format );
|
|||
|
|
|
|||
|
|
$format = str_replace( 'h', '{h}', $format );
|
|||
|
|
$format = str_replace( 'i', '{i}', $format );
|
|||
|
|
$format = str_replace( 's', '{s}', $format );
|
|||
|
|
|
|||
|
|
if ($lang === '') {
|
|||
|
|
$lang = defined( SYS_LANG ) ? SYS_LANG : 'en';
|
|||
|
|
}
|
|||
|
|
$aux = explode( ' ', $date ); //para dividir la fecha del dia
|
|||
|
|
$date = explode( '-', isset( $aux[0] ) ? $aux[0] : '00-00-00' ); //para obtener los dias, el mes, y el año.
|
|||
|
|
$time = explode( ':', isset( $aux[1] ) ? $aux[1] : '00:00:00' ); //para obtener las horas, minutos, segundos.
|
|||
|
|
|
|||
|
|
|
|||
|
|
$year = (int) ((isset( $date[0] )) ? $date[0] : '0'); //year
|
|||
|
|
$month = (int) ((isset( $date[1] )) ? $date[1] : '0'); //month
|
|||
|
|
$day = (int) ((isset( $date[2] )) ? $date[2] : '0'); //day
|
|||
|
|
|
|||
|
|
|
|||
|
|
$h = isset( $time[0] ) ? $time[0] : '00'; //hour
|
|||
|
|
$i = isset( $time[1] ) ? $time[1] : '00'; //minute
|
|||
|
|
$s = isset( $time[2] ) ? $time[2] : '00'; //second
|
|||
|
|
|
|||
|
|
|
|||
|
|
$MONTHS = Array ();
|
|||
|
|
for ($i = 1; $i <= 12; $i ++) {
|
|||
|
|
$MONTHS[$i] = g::LoadTranslation( "ID_MONTH_$i", $lang );
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$d = (int) $day;
|
|||
|
|
$dd = g::complete_field( $day, 2, 1 );
|
|||
|
|
|
|||
|
|
//missing D
|
|||
|
|
|
|||
|
|
|
|||
|
|
$M = $MONTHS[$month];
|
|||
|
|
$m = (int) $month;
|
|||
|
|
$mm = g::complete_field( $month, 2, 1 );
|
|||
|
|
|
|||
|
|
$yy = substr( $year, strlen( $year ) - 2, 2 );
|
|||
|
|
$yyyy = $year;
|
|||
|
|
|
|||
|
|
$names = array ('{day}','{DAY}','{month}','{YONTH}','{XONTH}','{year}','{YEAR}','{h}','{i}','{s}'
|
|||
|
|
);
|
|||
|
|
$values = array ($d,$dd,$m,$mm,$M,$yy,$yyyy,$h,$i,$s
|
|||
|
|
);
|
|||
|
|
|
|||
|
|
$ret = str_replace( $names, $values, $format );
|
|||
|
|
|
|||
|
|
//recovering the original literal
|
|||
|
|
switch ($lang) {
|
|||
|
|
case 'es':
|
|||
|
|
$ret = str_replace( '[of]', ' de ', $ret );
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
return $ret;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
*
|
|||
|
|
* @author Erik Amaru Ortiz <erik@colosa.com>
|
|||
|
|
* @name complete_field($string, $lenght, $type={1:number/2:string/3:float})
|
|||
|
|
*/
|
|||
|
|
public function complete_field ($campo, $long, $tipo)
|
|||
|
|
{
|
|||
|
|
$campo = trim( $campo );
|
|||
|
|
switch ($tipo) {
|
|||
|
|
case 1: //number
|
|||
|
|
$long = $long - strlen( $campo );
|
|||
|
|
for ($i = 1; $i <= $long; $i ++) {
|
|||
|
|
$campo = "0" . $campo;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 2: //string
|
|||
|
|
$long = $long - strlen( $campo );
|
|||
|
|
for ($i = 1; $i <= $long; $i ++) {
|
|||
|
|
$campo = " " . $campo;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
case 3: //float
|
|||
|
|
if ($campo != "0") {
|
|||
|
|
$vals = explode( ".", $long );
|
|||
|
|
$ints = $vals[0];
|
|||
|
|
|
|||
|
|
$decs = $vals[1];
|
|||
|
|
|
|||
|
|
$valscampo = explode( ".", $campo );
|
|||
|
|
|
|||
|
|
$intscampo = $valscampo[0];
|
|||
|
|
$decscampo = $valscampo[1];
|
|||
|
|
|
|||
|
|
$ints = $ints - strlen( $intscampo );
|
|||
|
|
|
|||
|
|
for ($i = 1; $i <= $ints; $i ++) {
|
|||
|
|
$intscampo = "0" . $intscampo;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//los decimales pueden ser 0 uno o dos
|
|||
|
|
$decs = $decs - strlen( $decscampo );
|
|||
|
|
for ($i = 1; $i <= $decs; $i ++) {
|
|||
|
|
$decscampo = $decscampo . "0";
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$campo = $intscampo . "." . $decscampo;
|
|||
|
|
} else {
|
|||
|
|
$vals = explode( ".", $long );
|
|||
|
|
$ints = $vals[0];
|
|||
|
|
$decs = $vals[1];
|
|||
|
|
|
|||
|
|
$campo = "";
|
|||
|
|
for ($i = 1; $i <= $ints; $i ++) {
|
|||
|
|
$campo = "0" . $campo;
|
|||
|
|
}
|
|||
|
|
$campod = "";
|
|||
|
|
for ($i = 1; $i <= $decs; $i ++) {
|
|||
|
|
$campod = "0" . $campod;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
$campo = $campo . "." . $campod;
|
|||
|
|
}
|
|||
|
|
break;
|
|||
|
|
}
|
|||
|
|
return $campo;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
/**
|
|||
|
|
* evalJScript
|
|||
|
|
*
|
|||
|
|
* @param string $c
|
|||
|
|
*
|
|||
|
|
* @return void
|
|||
|
|
*/
|
|||
|
|
public function evalJScript ($c)
|
|||
|
|
{
|
|||
|
|
print ("<script language=\"javascript\">{$c}</script>") ;
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
|
|||
|
|
}
|