- 论坛徽章:
- 0
|
主流编程语言未来的趋势？请斧正！
- <?php
- error_reporting(E_ALL);
- define('XMD_ZE2', (function_exists('version_compare') &&
- version_compare(zend_version(), "2-dev", "ge")));
- /**
- * 定义操作系统特性
- */
- if (substr(PHP_OS, 0, 3) == 'WIN') {
- define ('XMD_OS', 'Win', true);
- define ('XMD_DIR_SEPARATOR', "\\");
- define ('XMD_LINE_SEPARATOR', "\r\n");
- define ('XMD_ENV_SEPARATOR', ";");
- define ('XMD_BACKUP_FILENAME', ".bak");
- define ('OS_WINDOWS', true);
- define ('OS_UNIX', false);
- } else {
- define ('XMD_OS', 'Unix');
- define ('XMD_DIR_SEPARATOR', "/");
- define ('XMD_LINE_SEPARATOR', "\n");
- define ('XMD_ENV_SEPARATOR', ":");
- define ('XMD_BACKUP_FILENAME', '~');
- define ('OS_WINDOWS', false);
- define ('OS_UNIX', true);
- }
- //define('XMD_DIR_SEPARATOR', DIRECTORY_SEPARATOR);
- /**
- * 定义文件目录,默认扩展名
- */
- define ('XMD_GLOBAL_PATH', dirname(__FILE__));
- define ('XMD_FILE_EXTENSION', '.php');
- define ('XMD_BASE_PHP_VERSION', '4.3.0');
- //===============================
- // 定义全局数组变量
- //===============================
- /**
- * 析构器数组
- */
- $GLOBALS['XMA_DESTRUCTOR_LIST'] = array();
- /**
- * 退出时执行的函数数组
- */
- $GLOBALS['XMA_SHUTDOWN_FUNCTIONS'] = array();
- /**
- * 尝试一种新的用数组方式实现单一模式的手段
- * 目前解决方法一般是:
- * 1: 在类中建一属性(如 Instance)记录
- * 2: 在创建实例的方法中采用静态变量记录
- * 根据具体情况我将采用多种方式实现,但主要采用全局数组的方式.
- * 有什么好处呢?
- * 1: PHP 的数组功能非常强大,完全能够方便的支撑这一手段(不需要使用迭代器等)
- * 2: 可以记录附加信息,比如是否需要析构等(我这里是分开的,毕竟需要析构的是很少的)
- * 3: 或许可以进行对象替换,代理,认证等高级应用
- */
- $GLOBALS['XMA_INSTANCE_LIST'] = array();
- /**
- * include an file
- *
- * @param string $filename : file name and path
- * @param boolean $return : is return file's value(TRUE|FALSE default FALSE)
- * @access public
- * @author bighan <phpminer@21cn.com>;
- * @return filename|FALSE
- */
- function doInclude($filename, $return = FALSE)
- {
- if ($filename = (string)$filename) {
- $filename = trim(str_replace('/', XMD_DIR_SEPARATOR, $filename));
- $filename = preg_replace("/\\" . XMD_DIR_SEPARATOR ."{2,}/", '', $filename);
- if (file_exists($filename)) {
- if ($return === TRUE) {
- return (include_once($filename));
- } else {
- if (!include_once($filename)) return FALSE;
- else return $filename;
- }
- }
- return FALSE;
- }
- return FALSE;
- }
- /**
- * Import an file or dir
- *
- * @param string $separator : 'xx.xx.xx'
- * @param string $root : root path (default XMD_GLOBAL_PATH)
- * @param string $extension : file extension (default XMD_FILE_EXTENSION)
- * @access public
- * @author bighan <phpminer@21cn.com>;
- * @return file(s)|FALSE
- */
- function doImport($separator, $root = XMD_GLOBAL_PATH, $extension = XMD_FILE_EXTENSION)
- {
- $separator = explode('.', $separator);
- $space = $separator[0];
- $name = array_pop($separator);
- $size = sizeof($separator);
- $path = '';
- if ($size >; 0) {
- for($i = 0; $i < $size; $i++) {
- $path .= ucfirst($separator[$i]);
- $path .= XMD_DIR_SEPARATOR;
- }
- $path = $root. XMD_DIR_SEPARATOR . $path;
- } else {
- $path = $root. XMD_DIR_SEPARATOR;
- }
- if ($name !== "*") {
- if (strcasecmp($space, 'php') === 0) {
- $fixname = '';
- for($i = 1; $i < $size; $i++) {
- $fixname .= ucfirst($separator[$i]);
- }
- $name = $fixname . $name;
- }
- $realfile = $path . $name . $extension;
- if (!include_once($realfile)) return FALSE;
- else return $name;
- } else {
- $directory = @dir($path);
- if (FALSE === $directory)
- return FALSE;
- while (FALSE !== ($file = $directory->;read())) {
- if ($file == '.' || $file == '..' || is_dir($path . $file)) {
- continue;
- }
- $realfile = $path . $file;
- if (!@include_once($realfile)) return FALSE;
- }
- return TRUE;
- }
-
- }
- function sentMessage($msg, $target) {
- }
- /**
- * 函数: debug
- * 作用: 调试接口
- */
- function debug($msg)
- {
- echo "<br>;============================================<br>;";
- if (is_string($msg)) {
- echo "<font color=green>;MSG: </font>;$msg";
- } elseif (is_object($msg) || is_array($msg)) {
- print_r($msg);
- } elseif (is_bool($msg)) {
- echo "<font color=green>;MSG: </font>; bool", (int)$msg;
- } else {
- echo "<font color=green>;MSG: </font>;$msg";
- }
- echo "<br>;============================================<br>;";
- }
- /**
- * register an class instance
- *
- * @param object $object : ref object
- * @param string $space : class namespace (default php)
- * @param string $alias : key nmae (default empty)
- * @access public
- * @author bighan <phpminer@21cn.com>;
- * @return void
- * @see $XMA_INSTANCE_LIST, getInstance(), #class::newInstance()
- */
- function setInstance(&$object, $space = 'php', $alias = '')
- {
- global $XMA_INSTANCE_LIST;
- if (empty($alias)) $alias = get_class($object);
- $key = $space . '::' . $alias;
- $key = strtolower($key);
- $XMA_INSTANCE_LIST[$key] =& $object;
- }
- /**
- * get an class instance
- *
- * @param string $key : key nmae
- * @param string $space : class namespace (default php)
- * @access public
- * @author bighan <phpminer@21cn.com>;
- * @return object|false
- * @see $XMA_INSTANCE_LIST, registerInstance(), #class::newInstance()
- */
- function &getInstance($key, $space = 'php')
- {
- global $XMA_INSTANCE_LIST;
- $key = $space . '::' . $key;
- $key = strtolower($key);
- if (isset($XMA_INSTANCE_LIST[$key]) && is_object($XMA_INSTANCE_LIST[$key])) {
- $instance =& $XMA_INSTANCE_LIST[$key];
- return $instance;
- }
- return FALSE;
- }
- /**
- * get an class instance
- *
- * @param string $key : key nmae
- * @param string $space : class namespace (default php)
- * @access public
- * @author bighan <phpminer@21cn.com>;
- * @return object|false
- * @see $XMA_INSTANCE_LIST, registerInstance(), #class::newInstance()
- */
- function unInstance($key, $space = 'php')
- {
- global $XMA_INSTANCE_LIST;
- $key = $space . '::' . $key;
- $key = strtolower($key);
- if (isset($XMA_INSTANCE_LIST[$key]) && is_object($XMA_INSTANCE_LIST[$key])) {
- unset($XMA_INSTANCE_LIST[$key]);
- return TRUE;
- }
- return FALSE;
- }
- /**
- * register an object destructor
- *
- * @param object $object : ref object
- * @param string $methodName : run method name
- * @param boolean $checkHas : is check (TRUE|FALSE)
- * @access public
- * @author bighan <phpminer@21cn.com>;
- * @return void
- * @see $XMA_DESTRUCTOR_LIST, callShutdownFunction(), #class::registerDestructor()
- */
- function registerDestructor(&$object, $methodName, $checkHas = FALSE)
- {
- global $XMA_DESTRUCTOR_LIST;
- if ($checkHas && hasDestructor($object, $methodName)) return;
- if (is_object($object) && method_exists($object, $methodName)) {
- $newItem[0] = &$object;
- $newItem[1] = $methodName;
- $XMA_DESTRUCTOR_LIST[] =& $newItem;
- }
- }
- function hasDestructor($object, $methodName = '')
- {
- global $XMA_DESTRUCTOR_LIST;
- $has = false;
- $objectname = get_class($object);
- foreach($XMA_DESTRUCTOR_LIST as $obj =>; $destructor) {
- $classname = get_class($obj);
- if (!$methodName) {
- if (($objectname == $classname) && ($destructor == $methodName)) {
- $has = true;
- break;
- }
- } else {
- if ($objectname == $classname) {
- $has = true;
- break;
- }
- }
- }
- return $has;
- }
- /**
- * register an shutdown function
- *
- * @param array|string $function : if array ->; $function[0] = object
- * ->; $function[1] = function name
- * @param array $args : function args
- * @access public
- * @author bighan <phpminer@21cn.com>;
- * @return void
- * @see $XMA_SHUTDOWN_FUNCTIONS, callShutdownFunction(), #class::registerShutdownFunc()
- */
- function registerShutdownFunc($function, $args = array())
- {
- global $XMA_SHUTDOWN_FUNCTIONS;
- if (is_array($function)) {
- if (is_object($function[0]) && method_exists($function[0], $function[1])) {
- $newItem[0] = &$function[0];
- $newItem[1] = $function[1];
- $newItem[2] = $args;
- $XMA_SHUTDOWN_FUNCTIONS[] = $newItem;
- }
- } else {
- $XMA_SHUTDOWN_FUNCTIONS[] = array($function, $args);
- }
- }
- /**
- * for register_shutdown_function()
- *
- * @access public
- * @author bighan <phpminer@21cn.com>;
- * @return void
- * @see $XMA_DESTRUCTOR_LIST, $XMA_DESTRUCTOR_LIST, register_shutdown_function()
- */
- function callShutdownFunction()
- {
- global $XMA_DESTRUCTOR_LIST, $XMA_SHUTDOWN_FUNCTIONS;
- if (is_array($XMA_DESTRUCTOR_LIST) && sizeof($XMA_DESTRUCTOR_LIST)) {
- foreach($XMA_DESTRUCTOR_LIST as $destructor) {
- $object =& $destructor[0];
- $method = $destructor[1];
- $object->;$method();
- //unset($object);
- }
- }
- if (is_array($XMA_SHUTDOWN_FUNCTIONS) && sizeof($XMA_SHUTDOWN_FUNCTIONS)) {
- foreach($XMA_SHUTDOWN_FUNCTIONS as $function) {
- if (sizeOf($function) == 3) {
- $object =& $function[0];
- $method = $function[1];
- $args = implode(',', $function[2]);
- eval("\$object->;$method($args);");
- } else {
- call_user_func_array($function[0], $function[1]);
- }
- }
- }
- $GLOBALS['XMA_DESTRUCTOR_LIST'] = array();
- $GLOBALS['XMA_SHUTDOWN_FUNCTIONS'] = array();
- }
- function raiseError($msg = 'error')
- {
- debug($msg);
- dieMessage();
- }
- function throwError()
- {
- }
- function dieMessage($msg = "")
- {
- callShutdownFunction();
- die($msg);
- }
- /*
- define ('XEAM_ROOT', phpOption::putEnv('XEAM_ROOT=' . XMD_GLOBAL_PATH, TRUE));
- if (!phpOption::currentCompare(XMD_BASE_PHP_VERSION)) {
- trigger_error("You's php version too lower", E_USER_ERROR);
- } else {
- define ('XMD_BASE_VERSION_NAME', str_replace('.', '', XMD_BASE_PHP_VERSION));
- }
- */
- doInclude (XMD_GLOBAL_PATH . "/Php/iObject" . XMD_FILE_EXTENSION);
- doImport ("Api.Object.CreateObject");
- doImport ("Api.Object.newInstance");
- //$timer = newInstance("php.util.Timer");
- register_shutdown_function("callShutdownFunction");
- ?>;
|
|
免费注册
楼主: vidarz
发表于 2004-05-10 14:32
