@@ -1,117 +0,0 @@
|
||||
<?php
|
||||
|
||||
/**
|
||||
* dbInfo.php
|
||||
*
|
||||
* ProcessMaker Open Source Edition
|
||||
* Copyright (C) 2004 - 2008 Colosa Inc.23
|
||||
*
|
||||
* This program is free software: you can redistribute it and/or modify
|
||||
* it under the terms of the GNU Affero General Public License as
|
||||
* published by the Free Software Foundation, either version 3 of the
|
||||
* License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU Affero General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU Affero General Public License
|
||||
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||
*
|
||||
* For more information, contact Colosa Inc, 2566 Le Jeune Rd.,
|
||||
* Coral Gables, FL, 33134, USA, or email info@colosa.com.
|
||||
*
|
||||
*/
|
||||
|
||||
function lookup ($target)
|
||||
{
|
||||
global $ntarget;
|
||||
$msg = $target . ' => ';
|
||||
//if (eregi ( '[a-zA-Z]', $target ))
|
||||
if (preg_match( '[a-zA-Z]', $target )) {
|
||||
//Made compatible to PHP 5.3
|
||||
$ntarget = gethostbyname ( $target );
|
||||
} else {
|
||||
$ntarget = gethostbyaddr ( $target );
|
||||
}
|
||||
$msg .= $ntarget;
|
||||
return ($msg);
|
||||
}
|
||||
|
||||
G::LoadClass("system");
|
||||
|
||||
if (getenv ( 'HTTP_CLIENT_IP' )) {
|
||||
$ip = getenv ( 'HTTP_CLIENT_IP' );
|
||||
} else {
|
||||
if (getenv ( 'HTTP_X_FORWARDED_FOR' )) {
|
||||
$ip = getenv ( 'HTTP_X_FORWARDED_FOR' );
|
||||
} else {
|
||||
$ip = getenv ( 'REMOTE_ADDR' );
|
||||
}
|
||||
}
|
||||
|
||||
$redhat = '';
|
||||
if (file_exists ( '/etc/redhat-release' )) {
|
||||
$fnewsize = filesize ( '/etc/redhat-release' );
|
||||
$fp = fopen ( '/etc/redhat-release', 'r' );
|
||||
$redhat = trim ( fread ( $fp, $fnewsize ) );
|
||||
fclose ( $fp );
|
||||
}
|
||||
|
||||
$redhat .= " (" . PHP_OS . ")";
|
||||
if (defined ( "DB_HOST" )) {
|
||||
G::LoadClass ( 'net' );
|
||||
G::LoadClass ( 'dbConnections' );
|
||||
$dbNetView = new NET ( DB_HOST );
|
||||
$dbNetView->loginDbServer ( DB_USER, DB_PASS );
|
||||
$dbConns = new dbConnections ( '' );
|
||||
$availdb = '';
|
||||
foreach ($dbConns->getDbServicesAvailables () as $key => $val) {
|
||||
if ($availdb != '') {
|
||||
$availdb .= ', ';
|
||||
}
|
||||
$availdb .= $val ['name'];
|
||||
}
|
||||
try {
|
||||
$sMySQLVersion = $dbNetView->getDbServerVersion ( DB_ADAPTER );
|
||||
} catch (Exception $oException) {
|
||||
$sMySQLVersion = '?????';
|
||||
}
|
||||
}
|
||||
|
||||
$Fields ['SYSTEM'] = $redhat;
|
||||
if (defined ( "DB_HOST" )) {
|
||||
$Fields ['DATABASE'] = $dbNetView->dbName ( DB_ADAPTER ) . ' (Version ' . $sMySQLVersion . ')';
|
||||
$Fields ['DATABASE_SERVER'] = DB_HOST;
|
||||
$Fields ['DATABASE_NAME'] = DB_NAME;
|
||||
$Fields ['AVAILABLE_DB'] = $availdb;
|
||||
} else {
|
||||
$Fields ['DATABASE'] = "Not defined";
|
||||
$Fields ['DATABASE_SERVER'] = "Not defined";
|
||||
$Fields ['DATABASE_NAME'] = "Not defined";
|
||||
$Fields ['AVAILABLE_DB'] = "Not defined";
|
||||
}
|
||||
$eeT="";
|
||||
if (class_exists('pmLicenseManager')) {
|
||||
$eeT=" - Enterprise Edition";
|
||||
}
|
||||
$Fields ['PHP'] = phpversion ();
|
||||
$Fields ['FLUID'] = System::getVersion() . $eeT;
|
||||
$Fields ['IP'] = lookup ( $ip );
|
||||
$Fields ['ENVIRONMENT'] = defined ( "SYS_SYS" ) ? SYS_SYS : "Not defined";
|
||||
$Fields ['SERVER_SOFTWARE'] = getenv ( 'SERVER_SOFTWARE' );
|
||||
$Fields ['SERVER_NAME'] = getenv ( 'SERVER_NAME' );
|
||||
$Fields ['SERVER_PROTOCOL'] = getenv ( 'SERVER_PROTOCOL' );
|
||||
$Fields ['SERVER_PORT'] = getenv ( 'SERVER_PORT' );
|
||||
$Fields ['REMOTE_HOST'] = getenv ( 'REMOTE_HOST' );
|
||||
$Fields ['SERVER_ADDR'] = getenv ( 'SERVER_ADDR' );
|
||||
$Fields ['HTTP_USER_AGENT'] = getenv ( 'HTTP_USER_AGENT' );
|
||||
$Fields ['TIME_ZONE'] = (defined('TIME_ZONE')) ? TIME_ZONE : "Unknown";
|
||||
|
||||
if (!defined( 'SKIP_RENDER_SYSTEM_INFORMATION')) {
|
||||
$G_PUBLISH = new Publisher ( );
|
||||
$G_PUBLISH->AddContent ( 'xmlform', 'xmlform', 'login/dbInfo', '', $Fields, 'appNew2' );
|
||||
G::RenderPage ( 'publish', 'raw' );
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user