<?php
/* $Id$ */
(defined('USE_MCMS') && (basename(__FILE__) != basename($_SERVER['SCRIPT_NAME']))) or die('ACCESS DENIED');

if(!defined('USE_MAMMUT'))
	define('USE_MAMMUT', true);
	
// import mammut framework
require_once ('Mammut' . DIRECTORY_SEPARATOR . 'lib.mammut.php');

if(!(defined('MAMMUT') && function_exists('importlib')))
	die('CRITICAL ERROR: mammut framework not found (missing function: importlib())');

if (!defined('__DS__'))
	define('__DS__',DIRECTORY_SEPARATOR);
	
// define version
define('MCMS', '1.1.0.0');
// defines the database version which should be present to fit the system
//define('MCMS_DB', '1.1.0.0');
define('MCMS_DB', '1.0.1.1'); // TODO: Update

/**
 * searches the path of a module
 */
function getModulePath($namespace) {
	foreach(array('_MODPATHX_','_MODPATH_') as $const) {
		if(defined($const)) {
			$base = constant($const);
			$st = $base . __DS__ . str_replace('.', __DS__, $namespace);
			if(file_exists($st))
				return $st;
		}
	}
	return false;
}

/**
 * searches the path of a plugin
 */
function getPluginPath($namespace) {
	foreach(array('_PLUGINPATHX_','_PLUGINPATH_') as $const) {
		if(defined($const)) {
			$base = constant($const);
			$st = $base . __DS__ . str_replace('.', __DS__, $namespace);
			if(file_exists($st))
				return $st;
		}
	}
	return false;
}

/**
 * loads a class defined by a dotted classpath.
 * caches loaded classes in $GLOBALS['MF']['import'] to improve performens (experimental)
 *
 * @param string $modPaththe
 *        	dotted classpath of the class that should be included
 * @param string $classpath
 *        	dotted classpath of the class that should be included
 * @return string the simple class name without the namespace
 * @since 1.0.0.0
 */
function importModClass($modPath, $classpath) {
	static $loaded;
	if(!isset($loaded))
		$loaded = array();
	
	$basepath = false;
	
	$path = '';
	$parts = explode('.', strtolower($modPath));
	for($i = 0; $i < count($parts); $i++)
		$path .= $parts[$i] . __DS__;
	
	foreach(array('_MODPATHX_','_MODPATH_') as $const) {
		if(defined($const)) {
			$basepath = constant($const) . __DS__ . $path;
			if(is_dir($basepath)) {
				$ns = '';
				$parts = explode('.', $classpath);
				for($i = 0; $i < count($parts) - 1; $i++)
					$ns .= $parts[$i] . __DS__;
				$cpath = $basepath . '_lib_' . __DS__ . $ns . 'cls.' . strtolower($parts[count($parts) - 1]) . '.php';
				if(!include_exists($cpath))
					throw new \Exception('import failed: class ' . $classpath . ' not found in module ' . $modPath);
				require_once ($cpath);
				$loaded[] = $modPath . '|' . $classpath;
				return $parts[count($parts) - 1];
			}
		}
	}
	throw new \Exception('import failed: module dir not found for module ' . $modPath);
}

/**
 * loads a class defined by a dotted classpath.
 * caches loaded classes in $GLOBALS['MF']['import'] to improve performens (experimental)
 *
 * @param string $modPaththe
 *        	dotted classpath of the class that should be included
 * @param string $classpath
 *        	dotted classpath of the class that should be included
 * @return string the simple class name without the namespace
 * @since 1.0.1.0
 */
function importPluginClass($cat, $pluginPath, $classpath) {
	static $loaded;
	if(!isset($loaded))
		$loaded = array();
	
	$basepath = false;
	
	$path = '';
	$parts = explode('.', strtolower($pluginPath));
	for($i = 0; $i < count($parts); $i++)
		$path .= $parts[$i] . __DS__;
	
	foreach(array('_PLUGINPATHX_','_PLUGINPATH_') as $const) {
		if(defined($const)) {
			$basepath = constant($const) . __DS__ . $cat . __DS__ . $path;
			if(is_dir($basepath)) {
				$ns = '';
				$parts = explode('.', $classpath);
				for($i = 0; $i < count($parts) - 1; $i++)
					$ns .= $parts[$i] . __DS__;
				$cpath = $basepath . '_lib_' . __DS__ . $ns . 'cls.' . strtolower($parts[count($parts) - 1]) . '.php';
				if(!include_exists($cpath))
					throw new \Exception('import failed: class ' . $classpath . ' not found in module ' . $pluginPath);
				require_once ($cpath);
				$loaded[] = $pluginPath . '|' . $classpath;
				return $parts[count($parts) - 1];
			}
		}
	}
	throw new \Exception('import failed: plugin dir not found for plugin ' . $pluginPath);
}

/**
 * checks if an component is installed on the file system
 *
 * @param string $cat
 *        	component category
 * @param string $classpath
 *        	component name
 * @return boolean trhe if the component is found
 */
function isComponentInstalled($cat, $classpath) {
	if(!(defined('_COMPATH_') || defined('_COMPATHX_')))
		throw new MFIllegalStateException('neigher _COMPATH_ nor _COMPATHX_ defined');
	$path = strtolower($cat) . __DS__;
	$parts = explode('.', $classpath);
	
	for($i = 0; $i < count($parts) - 1; $i++)
		$path .= strtolower($parts[$i]) . __DS__;
	
	$class = $parts[count($parts) - 1];
	$classname = ucfirst($class);
	
	foreach(array('_COMPATHX_','_COMPATH_') as $const) {
		if(defined($const)) {
			$basepath = constant($const) . __DS__ . strtolower($path);
			if(is_dir($basepath)) {
				if(file_exists($basepath . 'com.' . strtolower($class) . '.php')) {
					return true;
				}
			}
		}
	}
	return false;
}

/**
 * loads a component
 *
 * @param string $cat
 *        	component category
 * @param string $classpath
 *        	component name
 * @return string the class name of the component
 * @throws MMPageNotFoundException if component isn't found
 * @throws MFIllegalStateException if component class isn't found
 */
function loadComponent($cat, $classpath) {
	static $loaded;
	if(!(defined('_COMPATH_') || defined('_COMPATHX_')))
		throw new \Mammut\Exception\IllegalStateException('neigher _COMPATH_ nor _COMPATHX_ defined');
	if(!isset($loaded))
		$loaded = array();
	if(array_search($classpath, $loaded))
		return;
	
	$path = strtolower($cat) . __DS__;
	$parts = explode('.', $classpath);
	
	for($i = 0; $i < count($parts) - 1; $i++)
		$path .= strtolower($parts[$i]) . __DS__;
	
	$class = $parts[count($parts) - 1];
	$classname = ucfirst($class);
	
	foreach(array('_COMPATHX_','_COMPATH_') as $const) {
		if(defined($const)) {
			$basepath = constant($const) . __DS__ . strtolower($path);
			if(is_dir($basepath)) {
				if(file_exists($basepath . 'com.' . strtolower($class) . '.php')) {
					require_once ($basepath . 'com.' . strtolower($class) . '.php');
					if(!class_exists($classname))
						throw new \Mammut\Exception\IllegalStateException('class file found, but class is missing: ' . $classname);
					else {
						$loaded[] = $classpath;
						return $classname;
					}
				}
			}
		}
	}
	throw new \Mammut\Exception\ImplementationException('class not found: ' . $classname);
}

function getModuleInfo($modPath) {
	$path = '';
	$parts = explode('.', $modPath);
	for($i = 0; $i < count($parts); $i++)
		$path .= $parts[$i] . __DS__;
	
	$info = array();
	$info['modname'] = $parts[count($parts) - 1];
	
	foreach(array('_MODPATHX_','_MODPATH_') as $const) {
		if(defined($const)) {
			$basepath = constant($const) . __DS__ . $path . __DS__;
			if(is_dir($basepath)) {
				$info['layout_path'] = $basepath . '_layout_' . __DS__;
				$info['layout_pathx'] = _LAYOUTPATHX_ . __DS__ . '_module_' . __DS__ . $path . '_layout_' . __DS__;
				$info['admin_path'] = false;
				$info['entries'] = array('index' => 'Index');
				// automatically search for admin page and create a default link
				if(is_dir($basepath . '_admin_' . __DS__))
					$info['admin_path'] = $basepath . '_admin_' . __DS__;
				$info['title'] = 'Untitled module';
				$info['verion'] = 'Unversioned module';
				if(file_exists($basepath . '_info_.php')) {
					include ($basepath . '_info_.php');
				}
				else {
					$info = array();
				}
				$info['path'] = $basepath;
				return $info;
			}
		}
	}
}

/**
 * loads a module
 *
 * @param string $classpath
 *        	component name
 * @return string the class name of the component
 * @throws MMPageNotFoundException if component isn't found
 * @throws MFIllegalStateException if component class isn't found
 */
function loadModule($classpath) {
	static $loaded;
	if(!(defined('_MODPATH_') || defined('_MODPATHX_')))
		throw new \Mammut\Exception\IllegalStateException('neigher _MODPATH_ nor _MODPATHX_ defined');
	if(!isset($loaded))
		$loaded = array();
	
	$path = '';
	$parts = explode('.', $classpath);
	
	for($i = 0; $i < count($parts) - 1; $i++)
		$path .= $parts[$i] . __DS__;
	
	$class = $parts[count($parts) - 1];
	$classname = 'MMMod' . ucfirst($class);
	
	if(array_search($classpath, $loaded))
		return $classname;
	
	foreach(array('_MODPATHX_','_MODPATH_') as $const) {
		if(defined($const)) {
			$basepath = constant($const) . __DS__ . $path . __DS__ . strtolower($class) . __DS__;
			if(is_dir($basepath)) {
//					if (file_exists($basepath.'_info_.php')) {
//						$info = array();
//						include($basepath.'_info_.php');
//					}
				if(file_exists($basepath . 'mod.' . strtolower($class) . '.php')) {
					require_once ($basepath . 'mod.' . strtolower($class) . '.php');
					if(!class_exists($classname))
						throw new \Mammut\Exception\IllegalStateException('module class file found, but class is missing: ' . $classname);
					else {
						$loaded[] = $classpath;
						return $classname;
					}
				}
			}
		}
	}
	throw new \Mammut\Exception\ImplementationException('class not found: ' . $classname);
}

/**
 * loads a plugin
 *
 * @param string $category
 *        	plugin category
 * @param string $classpath
 *        	plugin classpath
 * @return string the class name of the component
 * @throws MMPageNotFoundException if component isn't found
 * @throws MFIllegalStateException if component class isn't found
 */
function loadPlugin($category, $classpath) {
	static $loaded;
	
	$classpath = $category . '.' . $classpath; // simple but it works for now
	

	if(!(defined('_PLUGINPATH_') || defined('_PLUGINPATHX_')))
		throw new \Mammut\Exception\IllegalStateException('neigher _PLUGINPATH_ nor _PLUGINPATHX_ defined');
	if(!isset($loaded))
		$loaded = array();
	
	$path = '';
	$parts = explode('.', $classpath);
	
	for($i = 0; $i < count($parts) - 1; $i++)
		$path .= $parts[$i] . __DS__;
	
	$class = $parts[count($parts) - 1];
	$classname = 'PlugIn' . ucfirst($class);
	if(array_search($classpath, $loaded))
		return $classname;
	
	foreach(array('_PLUGINPATHX_','_PLUGINPATH_') as $const) {
		if(defined($const)) {
			$basepath = constant($const) . __DS__ . $path . strtolower($class) . __DS__;
			if(is_dir($basepath)) {
				if(file_exists($basepath . '_info_.php')) {
					$info = array();
					include ($basepath . '_info_.php');
					if(isset($info['needs']) && (count($info['needs']) > 0)) {
						foreach($info['needs'] as $need)
							loadPlugin($category, $need);
					}
				}
				if(file_exists($basepath . 'pin.' . strtolower($class) . '.php')) {
					require_once ($basepath . 'pin.' . strtolower($class) . '.php');
					if(!class_exists($classname))
						throw new \Mammut\Exception\IllegalStateException('class file found, but class is missing: ' . $classname);
					else {
						$loaded[] = $classpath;
						return $classname;
					}
				}
			}
		}
	}
	throw new \Mammut\Exception\ImplementationException('class not found: ' . $classname);
}

/**
 * loads a plugin admin class
 *
 * @param string $category
 *        	plugin category
 * @param string $classpath
 *        	plugin classpath
 * @param string $name
 *        	the admin class name part
 * @return string the class name of the component
 * @return string the class name of the component
 * @throws MFIllegalStateException if component class isn't found
 */
function loadPluginAdmin($category, $classpath, $name) {
	static $loaded;
	
	$classpath = $category . '.' . $classpath; // simple but it works for now
	

	if(!(defined('_PLUGINPATH_') || defined('_PLUGINPATHX_')))
		throw new \Mammut\Exception\IllegalStateException('neigher _PLUGINPATH_ nor _PLUGINPATHX_ defined');
	if(!isset($loaded))
		$loaded = array();
	
	$path = '';
	$parts = explode('.', $classpath);
	
	for($i = 0; $i < count($parts) - 1; $i++)
		$path .= $parts[$i] . __DS__;
	
	$class = $parts[count($parts) - 1];
	$classname = 'PIA' . ucfirst($class) . ucfirst($name);
	
	if(array_search($classpath, $loaded))
		return $classname;
	
	foreach(array('_PLUGINPATHX_','_PLUGINPATH_') as $const) {
		if(defined($const)) {
			$basepath = constant($const) . __DS__ . $path . strtolower($class) . __DS__;
			if(is_dir($basepath)) {
				if(file_exists($basepath . '_info_.php')) {
					$info = array();
					include ($basepath . '_info_.php');
					if(isset($info['needs']) && (count($info['needs']) > 0)) {
						foreach($info['needs'] as $need)
							loadPlugin($category, $need);
					}
				}
				$file = $basepath . '_admin_' . __DS__ . 'pia.' . strtolower($name) . '.php';
				if(file_exists($file)) {
					require_once ($file);
					if(!class_exists($classname))
						throw new \Mammut\Exception\IllegalStateException('class file found, but class is missing: ' . $classname);
					else {
						$loaded[] = $classpath;
						return $classname;
					}
				}
			}
		}
	}
	throw new \Mammut\Exception\ImplementationException('class not found: ' . $classname);
}

// create a better default errror handler (using html)
function mcms_exception_handler($ex) {
	echo ($ex instanceof ErrorException) ? '<p><b>Critical error!</b></p>' : '<p><b>Error!</b></p>';
	echo '<p><b>Uncaught exception:</b> ' . get_class($ex) . '<br/>';
	echo '<b>Code:</b> ' . $ex->getCode() . '<br/>';
	echo '<b>Message:</b> ' . $ex->getMessage() . '</p>';
	if(defined('DEBUG')) {
		echo '<pre><b>Stack trace:</b><br/>';
		echo $ex->getTraceAsString() . '</pre>';
	}
	die();
}

// we want all errors to be exceptions
function mcms_error_handler($severity, $errString, $filename, $lineno, $errContext) {
	switch($severity) {
		case E_USER_NOTICE:
		case E_NOTICE:
			if(defined('DEBUG'))
				if(defined('_CLI_'))
					echo 'Notice: ' . $errString . ' | ' . $filename . ':' . $lineno . "\n";
				else
					echo '<div class="notice"><i>Notice</i>: ' . $errString . ' | ' . $filename . ':' . $lineno . '</div>';
		break;
		case E_USER_DEPRECATED:
		case E_DEPRECATED:
			if(defined('DEBUG'))
				if(defined('_CLI_'))
					echo 'Deprecated: ' . $errString . ' | ' . $filename . ':' . $lineno . "\n";
				else
					echo '<div class="notice"><i>Deprecated</i>: ' . $errString . ' | ' . $filename . ':' . $lineno . '</div>';
		break;
		case E_WARNING:
			if(defined('_CLI_'))
				echo 'Warning: ' . $errString . ' | ' . $filename . ':' . $lineno . "\n";
			else {
				echo '<div class="notice"><i>Warning</i>';
				if(defined('DEBUG'))
					echo ': ' . $errString . ' | ' . $filename . ':' . $lineno;
				else
					echo ' (Enable debug mode for details)';
				echo '</div>';
			}
		break;
		default:
			throw new ErrorException($errString, 0, $severity, $filename, $lineno);
		break;
	}
}

// this method should not exist, but if you want to write your own, do it
if(!function_exists('__autoload')) {
	require_once ('Mammut' . __DS__ . 'AutoLoader' . __DS__ . 'cls.iautoloader.php');
	require_once (__DIR__ . __DS__ . 'AutoLoader' . __DS__ . 'cls.mmautoloader.php');
	spl_autoload_register(array('\MCMS\AutoLoader\MMAutoLoader','loadClass'));
}

set_exception_handler('mcms_exception_handler');
set_error_handler('mcms_error_handler');

// import base libaries
try {
	importlib('Mammut.Math');
	importlib('vendor.composer'); // Pseudo-Libloader for composer fragments
}
catch(Exception $e) {
	die("INIT-ERROR: " . $e->getMessage());
}