Index: trunk/index.php
===================================================================
diff -u -r13 -r3307
--- trunk/index.php	(.../index.php)	(revision 13)
+++ trunk/index.php	(.../index.php)	(revision 3307)
@@ -1,126 +1,32 @@
 <?php
 
-if( file_exists('debug.php') ) include_once('debug.php');
-if( defined('DEBUG_MODE') )
-{
-	error_reporting(E_ALL);
-}
-else
-	error_reporting(0);
+$start = getmicrotime();
 
-list($usec, $sec) = explode(" ",microtime());
-$timestart = (float)$usec + (float)$sec;
+define('FULL_PATH', realpath(dirname(__FILE__)));
+define('APPLICATION_CLASS', 'MyApplication');
+include_once(FULL_PATH.'/kernel/kernel4/startup.php');
 
-$pathtoroot = "./";
-$pathtoroot = realpath($pathtoroot)."/";
+$application =& kApplication::Instance();
+$application->Init();
+$application->Run();
+$application->Done();
 
-if (!file_exists($pathtoroot."config.php")) {
-	echo "In-Portal is probably not installed, or configuration file is missing.<br>";
-	echo "Please use the installation script to fix the problem.<br><br>";
-	echo "<a href='admin/install.php'>Go to installation script</a><br><br>";
-	flush();
-	die();
-}
+/*$application->Debugger->appendHTML('Objects if kDBItem, kDBList class created (<b>'.count($application->APCalled).'</b>):');
+print_pre($application->APCalled);*/
 
-ob_start();
-$FrontEnd=1;
+$end = getmicrotime();
 
-$indexURL="../../index.php"; //Set to relative URL from the theme directory
-
-/* initalize the in-portal system */
-include_once("kernel/startup.php");
-
-LogEntry("System Init Complete\n");
-/* load the current front-end language set */
-
-//$objLanguageCache->LoadLanguage($objSession->Get("Language"),0);
-
-$rootURL="http://".ThisDomain().$objConfig->Get("Site_Path");
-
-//$secureURL = "https://".ThisDomain().$objConfig->Get("Site_Path");
-$secureURL = $rootURL;
-
-$html="<HTML>No Template</HTML>";
-
-if( !$var_list['t'] ) $var_list['t'] = 'index';
-
-if( !isset($CurrentTheme) ) $CurrentTheme = null;
-if( !is_object($CurrentTheme) ) $CurrentTheme = $objThemes->GetItem($m_var_list["theme"]);
-
-if(is_object($CurrentTheme))
+if ( $application->isDebugMode() )
 {
-	if(!$CurrentTheme->Get("Enabled"))
-	{
-		$CurrentTheme = $objThemes->GetItem($objThemes->GetPrimaryTheme());
-	}
-	if((int)$CurrentTheme->Get("ThemeId")>0)
-	{
-      $timeout = $CurrentTheme->Get("CacheTimeout");
-      $objLanguageCache->LoadTemplateCache($var_list["t"],$timeout,$CurrentTheme->Get("ThemeId"));
-      $objLanguageCache->LoadCachedVars($objSession->Get("Language"));
-
-	  LogEntry("Language Set Loaded\n");
-
-  	  $TemplateRoot = $CurrentTheme->ThemeDirectory()."/";
-//	echo "Template Root: $TemplateRoot<br>\n";
-
-	  LogEntry("Parsing Templates in $TemplateRoot\n");
-	  $objTemplate = new clsTemplateList($TemplateRoot);
-	  $html = $objTemplate->ParseTemplate($var_list["t"]);	 
-    }
-    else 
-    {
-      echo "No Primary Theme Selected";
-      die();
-    }
+	echo '<br><br><div style="font-family: arial,verdana; font-size: 8pt;">Memory used: '.round(memory_get_usage()/1024/1024, 1).' Mb <br>';
+	echo 'Time used: '.round(($end - $start), 5).' Sec <br></div>';
 }
-else
-{
-  echo "No Primary Theme Selected\n";
-  die();
-} 
 
+//print_pre(get_included_files());
 
-
-if(is_object($objSession))
-{
-	
-	$objSession->SetVariable("Template_Referer", $_local_t);
-}
-if($objTemplate->ErrorNo == -1)
-{
-    $html = $objTemplate->ParseTemplate("error_template");
-    
-}
-//$html = replacePngTags($html);
-LogEntry("Output Start\n");
-$html .= "<!-- Page Execution Time: ".( isset($ptime) ? $ptime : 0 )." -->";
-header("Content-length: ".strlen($html));
-header("Connection-Type: Keep-Alive");
-echo $html;
-
-LogEntry("Output End\n");
-
-if( isset($template) && $template->ErrorNo != 0 )
-{
-  print "\n(".$objTemplate->ErrorNo.") ".$objTemplate->ErrorStr."\n";
-}
-
-LogEntry("Output Complete\n");
-$objLanguageCache->SaveTemplateCache();
-LogEntry("Templates Cached\n");
-
-//if($objSession->SessionEnabled())
-//  $objSession->SaveSessionData();   
-//echo "Cookie: <PRE>"; print_r($_COOKIE); echo "</PRE><br>\n";
-ob_end_flush();
-$timeend = getmicrotime();
-$diff = $timeend - $timestart;
-
-LogEntry("\nTotal Queries Executed: $sqlcount in $totalsql seconds\n");
-LogEntry("\nPage Execution Time: $diff seconds\n", true);
-if($LogFile)
-  fclose($LogFile);
-
-
-?>
+function getmicrotime() 
+{ 
+    list($usec, $sec) = explode(" ", microtime()); 
+    return ((float)$usec + (float)$sec); 
+} 
+?>
\ No newline at end of file