ConLite/conlite/includes/include.system_sysvalues.php

<?php
/**
 * Project: 
 * Contenido Content Management System
 * 
 * Description: 
 * Output of important system variables
 * 
 * Requirements: 
 * @con_php_req 5.0
 * 
 *
 * @package    Contenido Backend includes
 * @version    1.7.1
 * @author     Marco Jahn
 * @copyright  four for business AG <www.4fb.de>
 * @license    http://www.contenido.org/license/LIZENZ.txt
 * @link       http://www.4fb.de
 * @link       http://www.contenido.org
 * @since      file available since contenido release <= 4.6
 * 
 * {@internal 
 *   created 2003-08-15
 *   modified 2008-06-27, Frederic Schneider, add security fix
 *   modified 2011-05-18, Ortwin Pinke, clean url due to validate page
 *
 *   $Id: include.system_sysvalues.php 378 2015-11-09 20:01:25Z oldperl $:
 * }}
 * 
 */

if(!defined('CON_FRAMEWORK')) {
	die('Illegal call');
}

$tpl->reset();

/*
 * print out tmp_notifications if any action has been done
*/
if (isset($tmp_notification))
{
	$tpl->set('s', 'TEMPNOTIFICATION', $tmp_notification);
}
else
{
	$tpl->set('s', 'TEMPNOTIFICATION', '');	
}

/* get system variables for output */
writeSystemValuesOutput($usage='output');

// error log
$sNewErrorLogPath = $cfg['path']['conlite_logs']."errorlog.txt";
$sOldErrorLogPath = $cfg['path']['contenido']."logs/errorlog.txt";
$sUseLog = '';
$bHasLog = false;

if(file_exists($sNewErrorLogPath)) {
    $sUseLog = $sNewErrorLogPath;
    $bHasLog = true;
} else if(file_exists($sOldErrorLogPath)) {
    $sUseLog = $sOldErrorLogPath;
    $bHasLog = true;
}
if($bHasLog) {
    $errorLogHandle = fopen ($sUseLog, "rb");
    $txtAreaHeight = "200";
    
    /* If the file is larger than 16KB, seek to the file's length - 16KB) */
    fseek($errorLogHandle, -16384,SEEK_END);
    
    while (!feof($errorLogHandle))
    {
        $errorLogBuffer .= fgets($errorLogHandle, 16384);
    }
    fclose ($errorLogHandle);
    if (strlen ($errorLogBuffer) == 0) {
        $errorLogBuffer = i18n("No error log entries found");
        $txtAreaHeight = "20";	
    }    
} else {
	$errorLogBuffer = i18n("No error log file found");
	$txtAreaHeight = "20";	
}
$tpl->set('s', 'TXTERRORLOGSIZE', $txtAreaHeight);
$tpl->set('s', 'ERRORLOG', $errorLogBuffer);

// upgrade error log
$sNewErrorLogPath = $cfg['path']['conlite_logs']."install.log.txt";
$sOldErrorLogPath = $cfg['path']['contenido']."logs/install.log.txt";
$sUseLog = '';
$bHasLog = false;

if(file_exists($sNewErrorLogPath)) {
    $sUseLog = $sNewErrorLogPath;
    $bHasLog = true;
} else if(file_exists($sOldErrorLogPath)) {
    $sUseLog = $sOldErrorLogPath;
    $bHasLog = true;
}
if($bHasLog) {
    $upgErrorLogHandle = fopen ($sUseLog, "rb");
    $txtAreaHeight = "200";
    
    /* If the file is larger than 200KB, seek to the file's length - 200KB) */
    fseek($upgErrorLogHandle, -16384,SEEK_END);
        
    while (!feof($upgErrorLogHandle))
    {
        $upgErrorLogBuffer.= fgets($upgErrorLogHandle, 16384);
    }
    fclose ($upgErrorLogHandle);
    if (strlen ($upgErrorLogBuffer) == 0)
    {
    	$upgErrorLogBuffer = i18n("No install error log entries found");
    	$txtAreaHeight = "20";	
    }
    
}
else
{
	$upgErrorLogBuffer = i18n("No error log entries found");
	$txtAreaHeight = "20";	
}
$tpl->set('s', 'TXTUPGERRORLOGSIZE', $txtAreaHeight);
$tpl->set('s', 'UPGERRORLOG', $upgErrorLogBuffer);

/*
 * parameter which log shoult be cleared
 * log = 1	clear /contenido/logs/errorlog.txt
 * log = 2	clear /contenido/upgrade_errorlog.txt
*/
$tpl->set('s', 'LOGEMPTYURL', clHtmlEntities($sess->url("main.php?area=$area&frame=$frame&action=emptyLog&log=1")));
$tpl->set('s', 'UPGLOGEMPTYURL', clHtmlEntities($sess->url("main.php?area=$area&frame=$frame&action=emptyLog&log=2")));

// parse out template
$tpl->generate($cfg['path']['templates'] . $cfg['templates']['systam_variables']);
?>