org.netfrag.glib/Application/Core.php

<?
/**
 * This file contains the Application::Core module.
 *
 * @author Andreas Motl <andreas.motl@ilo.de>
 * @package org.netfrag.glib
 * @name Application::Core
 *
 */


// ---------------------------------------------------------------------------
//  $Id: Core.php,v 1.5 2003/03/05 23:16:47 joko Exp $
// ---------------------------------------------------------------------------
//  $Log: Core.php,v $
//  Revision 1.5  2003/03/05 23:16:47  joko
//  updated docu - phpDocumentor is very strict about its 'blocks'...
//
//  Revision 1.4  2003/03/03 21:11:01  joko
//  mungled the namespaces
//
//  Revision 1.3  2003/02/09 17:05:15  joko
//  + minor update related to new log level constants
//  + restructured get-/setter methods
//
//  Revision 1.2  2003/02/03 14:42:28  joko
//  + added logging
//  + methods for accessing configuration variables
//
//  Revision 1.1  2003/02/03 05:00:01  joko
//  + initial commit
//
// ---------------------------------------------------------------------------


$appConfig = mkObject('Application::Config', $init);

$app = mkObject('Application::Core', $appConfig);
$app->run();


loadModule('Class::Logger');


/**
 * This is the Application::Core module.
 *
 * How to use this?
 *
 * <code>
 * require_once("../etc/defaults.php");
 * require_once("../etc/includes.php");
 * 
 * $init =
 *   array(
 *     'machine' => 'grasshopper',
 *     'appname' => 'pub',
 *     'resources' => array(
 *       'machines' => '../etc/machines.php',
 *     ),
 *     'run' => array(
 *       'boot' => array(
 *         'scripts' => array( '../core/boot/boot.php' ),
 *         //'objects' => array(),
 *         'methods' => array( 'e_init', 'e_start', 'e_shutdown' ),
 *       ),
 *     ),
 *   );
 * </code>
 *
 *
 * @author Andreas Motl <andreas.motl@ilo.de>
 * @package org.netfrag.glib
 * @subpackage Application
 * @name Application::Core
 *
 */
class Application_Core extends Class_Logger {
  
  var $_config;
  
  function Application_Core($initCfgObject = null) {
    $this->_config = $initCfgObject;
  }
  
  function run() {
    //print Dumper($this->_config);

    parent::constructor();

    $this->log("-----------------------------------------------------------------", PEAR_LOG_INFO);
    $this->log(get_class($this) . "->run: begin", PEAR_LOG_INFO);
    
    $cfg = $this->getConfig();

//print Dumper($cfg); exit;

    if (!is_array($cfg[run])) { return; }
    
    foreach ($cfg[run] as $key => $container) {
   
      //print "key: $key<br>";
      
      // include files
      if (is_array($container[scripts])) {
        foreach ($container[scripts] as $script) {
          $this->_require_once_isolated($script);
          $this->_config->merge();
        }
      }
      
      // run procedural functions
      if (is_array($container[methods])) {
        foreach ($container[methods] as $method) {
          $this->log(get_class($this) . "->run: calling function in global namespace: '$method'", PEAR_LOG_DEBUG);
          call_user_func($method);
        }
      }

    }
    
    $this->log(get_class($this) . "->run: end", PEAR_LOG_INFO);

  }
  
  function getConfig($var = null) {
    return $this->_config->get($var);
  }
  
  function _require_once_isolated($file) {
    $this->log(get_class($this) . "->_require_once_isolated: $file", PEAR_LOG_DEBUG);
    if (require_once($file)) {
      return 1;
    }
  }
  
  function setConfigVar($var, $val) {
    //print "$var=$val<br>";
    $this->_config->set_absolute($var, $val);
  }

  function getConfigVar($var) {
    return $this->_config->get_absolute($var);
  }

}

?>
1	joko	1.1	<?
2	joko	1.5	/**
3			* This file contains the Application::Core module.
4			*
5			* @author Andreas Motl <andreas.motl@ilo.de>
6			* @package org.netfrag.glib
7			* @name Application::Core
8			*
9			*/
10
11
12	joko	1.1	// ---------------------------------------------------------------------------
13	joko	1.6	// $Id: Core.php,v 1.5 2003/03/05 23:16:47 joko Exp $
14	joko	1.1	// ---------------------------------------------------------------------------
15	joko	1.2	// $Log: Core.php,v $
16	joko	1.6	// Revision 1.5 2003/03/05 23:16:47 joko
17			// updated docu - phpDocumentor is very strict about its 'blocks'...
18			//
19	joko	1.5	// Revision 1.4 2003/03/03 21:11:01 joko
20			// mungled the namespaces
21			//
22	joko	1.4	// Revision 1.3 2003/02/09 17:05:15 joko
23			// + minor update related to new log level constants
24			// + restructured get-/setter methods
25			//
26	joko	1.3	// Revision 1.2 2003/02/03 14:42:28 joko
27			// + added logging
28			// + methods for accessing configuration variables
29			//
30	joko	1.2	// Revision 1.1 2003/02/03 05:00:01 joko
31			// + initial commit
32			//
33	joko	1.1	// ---------------------------------------------------------------------------
34
35
36	joko	1.5	$appConfig = mkObject('Application::Config', $init);
37	joko	1.1
38	joko	1.5	$app = mkObject('Application::Core', $appConfig);
39			$app->run();
40	joko	1.1
41
42	joko	1.5	loadModule('Class::Logger');
43	joko	1.1
44
45	joko	1.5	/**
46			* This is the Application::Core module.
47			*
48			* How to use this?
49			*
50			* <code>
51			* require_once("../etc/defaults.php");
52			* require_once("../etc/includes.php");
53			*
54			* $init =
55			* array(
56			* 'machine' => 'grasshopper',
57			* 'appname' => 'pub',
58			* 'resources' => array(
59			* 'machines' => '../etc/machines.php',
60			* ),
61			* 'run' => array(
62			* 'boot' => array(
63			* 'scripts' => array( '../core/boot/boot.php' ),
64			* //'objects' => array(),
65			* 'methods' => array( 'e_init', 'e_start', 'e_shutdown' ),
66			* ),
67			* ),
68			* );
69			* </code>
70			*
71			*
72			* @author Andreas Motl <andreas.motl@ilo.de>
73			* @package org.netfrag.glib
74			* @subpackage Application
75	joko	1.6	* @name Application::Core
76	joko	1.5	*
77			*/
78	joko	1.4	class Application_Core extends Class_Logger {
79	joko	1.1
80			var $_config;
81
82			function Application_Core($initCfgObject = null) {
83			$this->_config = $initCfgObject;
84			}
85
86			function run() {
87			//print Dumper($this->_config);
88	joko	1.2
89			parent::constructor();
90
91	joko	1.3	$this->log("-----------------------------------------------------------------", PEAR_LOG_INFO);
92			$this->log(get_class($this) . "->run: begin", PEAR_LOG_INFO);
93	joko	1.2
94			$cfg = $this->getConfig();
95
96			//print Dumper($cfg); exit;
97
98			if (!is_array($cfg[run])) { return; }
99
100			foreach ($cfg[run] as $key => $container) {
101
102			//print "key: $key<br>";
103	joko	1.1
104			// include files
105	joko	1.2	if (is_array($container[scripts])) {
106			foreach ($container[scripts] as $script) {
107			$this->_require_once_isolated($script);
108			$this->_config->merge();
109			}
110	joko	1.1	}
111
112			// run procedural functions
113	joko	1.2	if (is_array($container[methods])) {
114			foreach ($container[methods] as $method) {
115	joko	1.3	$this->log(get_class($this) . "->run: calling function in global namespace: '$method'", PEAR_LOG_DEBUG);
116	joko	1.2	call_user_func($method);
117			}
118	joko	1.1	}
119	joko	1.2
120			}
121
122	joko	1.3	$this->log(get_class($this) . "->run: end", PEAR_LOG_INFO);
123	joko	1.2
124			}
125
126			function getConfig($var = null) {
127	joko	1.3	return $this->_config->get($var);
128	joko	1.2	}
129
130			function _require_once_isolated($file) {
131	joko	1.3	$this->log(get_class($this) . "->_require_once_isolated: $file", PEAR_LOG_DEBUG);
132	joko	1.2	if (require_once($file)) {
133			return 1;
134	joko	1.1	}
135			}
136
137	joko	1.2	function setConfigVar($var, $val) {
138			//print "$var=$val<br>";
139	joko	1.3	$this->_config->set_absolute($var, $val);
140	joko	1.2	}
141
142			function getConfigVar($var) {
143	joko	1.3	return $this->_config->get_absolute($var);
144	joko	1.2	}
145
146	joko	1.1	}
147
148			?>
MailToCvsAdmin">MailToCvsAdmin	ViewVC Help
Powered by ViewVC 1.1.26