<?php
/* Advanced Versioning Procedures ( FOR PHP 3 )
* Written by Asher Holley ( http://www.wolfoxinc.com/opensource/ )
* Released under the GNU General Public License ( http://www.opensource.org/licenses/gpl-license.html )
* Copyright © 2006 Asher Holley
*
* These procedures are useful for determining what version of PHP you are running,
* as well as filtering included classes and function libraries so that the
* appropriate lines are executed for the appropriate PHP version. Due to
* the scope of eval inside of a method/function global variables must be
* assigned using either the keyword global (not recommended) or through
* $GLOBALS (recommended) within the filtered file.
*
* PLEASE NOTE!!! THESE PROCEDURES ASSUME YOU ARE RUNNING PHP >= 3.0.9. FOR PHP 4+
* PLEASE INCLUDE/REQUIRE THE .class.php FILE INSTEAD!
*
* In order to make this class 'compatible' or in the least parseable without
* errors, 'vars' were avoided along with any constructor. You can use
* This class without making an instance of it. */
require_once( 'phpizer.define.php' );
// require_once( 'filebase.class5.php' );
function include_file( $filepath, $options = 0 ) {
if ( $options & V_FILEBASE ) {
$filepath = Filebase::inc_path() . DIR_SEP . $filepath;
}
if ( $options & V_INC_PATH ) {
$code = file( $filepath, 1 );
} else {
$code = file( $filepath );
}
if ( !( $options & V_TRUNC_PHP ) ) {
$code[0] = substr( $code[0], 5 );
$code[ count( $code ) - 1 ] =
substr( $code[ count( $code ) - 1 ], 0, -2 );
$code = join( '', $code );
}
preg_match_all( VL_FIND_PHP, $code, $l_matches, PREG_SET_ORDER + PREG_OFFSET_CAPTURE );
preg_match_all( VB_FIND_PHP, $code, $b_matches, PREG_SET_ORDER + PREG_OFFSET_CAPTURE );
$matches = array_merge( $l_matches, $b_matches );
foreach ( $matches as $match ) {
for ( $a = 2; $a < 9; $a++ ) {
if ( !isset( $match[$a] ) ) {
$match[$a] = null;
}
}
unset( $v1, $v2, $v1_1, $v1_2, $v1_3, $v2_1, $v2_2, $v2_3 );
if ( $v1_1 = $match[2][0] ) {
$v1 = $v1_1;
if ( $v1_2 = $match[3][0] ) {
$v1 .= ".$v1_2";
if ( $v1_3 = $match[4][0] ) {
$v1 = ".$v1_3";
}
}
} else {
trigger_error( 'Phpizer::include_file range without start',
E_USER_ERROR );
}
if ( $r = $match[5][0] ) {
if ( $match[6][0] ) {
$v2 = $v2_1 = $match[6][0];
if ( $v2_2 = $match[7][0] ? $match[7][0] : 0 ) {
$v2 = ".$v2_2";
}
if ( $v2_3 = $match[8][0] ? $match[8][0] : 0 ) {
$v2 = ".$v2_3";
}
}
}
$chg_set = false;
if ( isset( $v1_2 ) ) {
if ( isset( $v1_3 ) ) {
if ( !$r ) {
if ( check_version( $v1, true ) ) {
$chg_set = true;
}
} elseif ( isset( $v2 ) ) {
if ( check_version( $v1 ) &&
( check_version( $v2, true ) ||
!check_version( $v2 ) ) ) {
$chg_set = true;
}
} else {
if ( check_version( $v1 ) ) {
$chg_set = true;
}
}
} else {
if ( !$r ) {
if ( check_version( $v1 . '.0' ) &&
!check_version(
implode( '.', array( $v1_1, $v1_2 + 1, '0' ) ) ) ) {
$chg_set = true;
}
} elseif ( isset( $v2 ) ) {
if ( check_version( $v1 ) &&
( check_version( $v2, true ) ||
!check_version( $v2 ) ) ) {
$chg_set = true;
}
} else {
if ( check_version( $v1 . '.0' ) ) {
$chg_set = true;
}
}
}
} else {
if ( !$r ) {
if ( check_version( $v1 . '.0.0' ) &&
!check_version( $v1 + 1 . '.0.0' ) ) {
$chg_set = true;
}
} elseif ( isset( $v2 ) ) {
if ( check_version( $v1 ) &&
( check_version( $v2, true ) ||
!check_version( $v2 ) ) ) {
$chg_set = true;
}
} else {
if ( check_version( $v1 . '.0.0' ) ) {
$chg_set = true;
}
}
}
if ( $chg_set ) {
$chg[] = array( 'loc' => $match[0][1],
'len' => strlen( $match[0][0] ),
'aft' => $match[1][0] );
}
}
$adjust = 0;
usort( $chg, 'cmp_rpl' );
foreach ( $chg as $change ) {
$l = strlen( $code );
$code = substr( $code, 0, $change['loc'] - $adjust ) .
$change['aft'] .
substr( $code, $change['loc'] - $adjust + $change['len'] );
$adjust += $l - strlen( $code );
}
$code = preg_replace( array( VB_COMMENT, VL_COMMENT ), '', $code );
$offlimits = get_outer_sections( $code );
$v_matches = array();
preg_match_all( '/\$[a-zA-Z_][a-zA-Z0-9_]*/', $code, $v_matches, PREG_OFFSET_CAPTURE );
$adjust = 0;
foreach( $v_matches[0] as $match ) {
if ( $match[0] == '$GLOBALS' ) {
break;
}
$outer = true;
foreach ( $offlimits as $limit ) {
if ( $match[1] >= $limit['s'] && $match[1] <= $limit['e'] ) {
$outer = false;
break;
}
}
if ( $outer ) {
$code = substr_replace( $code, '$GLOBALS[\'' . $match[0] . '\']',
$match[1] + $adjust * 12, strlen( $match[0] ) );
$adjust++;
}
}
if ( !( $options & V_NOT_TRUNC_PHP ) ) {
$ret = eval( $code );
return array( $ret, $code );
}
return $code;
}
function get_outer_sections( $code ) {
$l_matches = $r_matches = $c_matches = $f_matches = array();
preg_match_all( '/class\s*\w+\s*(extends.*)?\s*\{/Uis',
$code, $c_matches, PREG_OFFSET_CAPTURE );
preg_match_all( '/function\s*\w+\s*\(.*\)\s*\{/Uis',
$code, $f_matches, PREG_OFFSET_CAPTURE );
preg_match_all( '/(?<!\\\\)([\'"]).*(?<!\\\\)\\1/Uis',
$code, $q_matches, PREG_OFFSET_CAPTURE );
for ( $a = 0; $a < count( $q_matches[0] ); $a++ ) {
if ( strlen( $q_matches[0][$a][0] ) == 2 ) {
unset( $q_matches[0][$a] );
}
}
preg_match_all( '/\{/', $code, $l_matches, PREG_OFFSET_CAPTURE );
preg_match_all( '/\}/', $code, $r_matches, PREG_OFFSET_CAPTURE );
$mast = array_merge( $l_matches[0], $r_matches[0] );
foreach ( $q_matches[0] as $loc ) {
for ( $a = 0; $a < count( $mast ); $a++ ) {
if ( ( $end_char = $loc[1] + strlen( $loc[0] ) ) < $mast[$a][1] ) {
break;
}
if ( !in_array( $a, $g ) ) {
if ( $mast[$a][1] >= $loc[1] &&
$mast[$a][1] <= $end_char ) {
unset( $mast[$a] );
$g[] = $a;
}
}
}
$c = array();
if ( preg_match_all( '/\\\\\\$[a-zA-Z_][a-zA-Z0-9_]*/',
$loc[0], $c, PREG_OFFSET_CAPTURE ) ) {
foreach ( $c[0] as $m ) {
$ret[] = array( 's' => $m[1] + $loc[1],
'e' => ( $m[1] + $loc[1] ) + strlen( $m[0] ) );
}
}
}
$mast = array_merge( $c_matches[0], $f_matches[0], $mast );
usort( $mast, array( 'Phpizer', 'cmp_tok' ) );
reset( $mast );
while ( ( $e_tok = each( $mast ) ) !== false ) {
$tok = $e_tok[1];
$s = array( 's' => 0, 'e' => 0 );
$bcount = 0;
if ( substr( $tok[0], 0, 5 ) == 'class' ) {
$s['s'] = $tok[1];
$e_tok = each( $mast );
if ( $e_tok[1][0] != '{' ) {
trigger_error( 'Phpizer::get_outer_sections class token not ' .
'followed by bracket', E_USER_ERROR );
} else {
$bcount++;
}
while ( ( $e_tok = each( $mast ) ) !== false ) {
$tok = $e_tok[1];
if ( $tok[0] == '{' ) {
$bcount++;
} elseif ( $tok[0] == '}' ) {
$bcount--;
}
if ( $bcount == 0 ) {
$s['e'] = $tok[1];
break;
}
}
} elseif ( substr( $tok[0], 0, 8 ) == 'function' ) {
$s['s'] = $tok[1];
$e_tok = each( $mast );
if ( $e_tok[1][0] != '{' ) {
trigger_error( 'Phpizer::get_outer_sections class token not ' .
'followed by bracket', E_USER_ERROR );
} else {
$bcount++;
}
while ( ( $e_tok = each( $mast ) ) !== false ) {
$tok = $e_tok[1];
if ( $tok[0] == '{' ) {
$bcount++;
} elseif ( $tok[0] == '}' ) {
$bcount--;
}
if ( $bcount == 0 ) {
$s['e'] = $tok[1];
break;
}
}
}
$ret[] = $s;
}
return $ret;
}
// Sorting algorithm for outer sections code
function cmp_tok( $a, $b ) {
if ( $a[1] == $b[1] ) {
return 0;
}
return ( $a[1] < $b[1] ) ? -1 : 1;
}
// Sorting for replacements
function cmp_rpl( $a, $b ) {
if ( $a['loc'] == $b['loc'] ) {
return 0;
}
return ( $a['loc'] < $b['loc'] ) ? -1 : 1;
}
/* from php.net anonymous
* modified by Asher Holley
* if $req is '>=' PHP_VERSION returns true else return false */
function check_version( $req, $opt = false ) {
list( $c_major, $c_minor, $c_edit ) = split( '[/.-]', PHP_VERSION );
list( $r_major, $r_minor, $r_edit ) = split( '[/.-]', $req );
// Asher Holley modification
if ( $opt ) {
if ( $c_major == $r_major ) {
if ( $c_minor == $r_minor ) {
if ( $c_edit == $r_edit ) {
return true;
} else {
return false;
}
} else {
return false;
}
} else {
return false;
}
}
if ( $c_major > $r_major ) {
return true;
} else if ( $c_major < $r_major ) {
return false;
}
// same major - check minor
if ( $c_minor > $r_minor ) {
return true;
} else if ( $c_minor < $r_major ) {
return false;
}
// same minor - check edit
if ( $c_edit > $r_edit ) {
return true;
} else if ( $c_edit < $r_edit ) {
return false;
}
// equal versions
return true;
}
?>
|