Page Menu
Home
In-Portal Phabricator
Search
Configure Global Search
Log In
Files
F805146
show_cache.php
No One
Temporary
Actions
Download File
Edit File
Delete File
View Transforms
Subscribe
Mute Notifications
Award Token
Flag For Later
Subscribers
None
File Metadata
Details
File Info
Storage
Attached
Created
Wed, Feb 26, 11:47 PM
Size
1 KB
Mime Type
text/x-php
Expires
Fri, Feb 28, 11:47 PM (5 h, 16 s)
Engine
blob
Format
Raw Data
Handle
577382
Attached To
rINP In-Portal
show_cache.php
View Options
<?php
/**
* @version $Id: show_cache.php 15012 2012-01-06 20:38:49Z alex $
* @package In-Portal
* @copyright Copyright (C) 1997 - 2009 Intechnic. All rights reserved.
* @license GNU/GPL
* In-Portal is Open Source software.
* This means that this software may have been modified pursuant
* the GNU General Public License, and as distributed it includes
* or is derivative of works licensed under the GNU General Public License
* or other free or open source software licenses.
* See http://www.in-portal.org/license for copyright notices and details.
*/
// comment line below for debugging parsed configs
//die('Restrictred use!');
$start
=
microtime
(
true
);
define
(
'ADMIN'
,
0
);
define
(
'FULL_PATH'
,
realpath
(
dirname
(
__FILE__
).
'/..'
));
include_once
(
FULL_PATH
.
'/core/kernel/startup.php'
);
$application
=&
kApplication
::
Instance
();
$application
->
Init
();
if
(!
$application
->
isDebugMode
())
{
die
(
'Restrictred use!'
);
}
$show_var
=
$application
->
GetVar
(
'show_var'
);
if
(
$show_var
)
{
$var_data
=
$application
->
getDBCache
(
$show_var
);
if
(
$var_data
===
false
)
{
echo
'Not Found'
;
}
else
{
kUtil
::
print_r
(
unserialize
(
$var_data
),
'Cache "'
.
$show_var
.
'" content:'
,
true
);
}
}
else
{
$sql
=
'SELECT VarName
FROM '
.
TABLE_PREFIX
.
'SystemCache'
;
$var_names
=
$application
->
Conn
->
GetCol
(
$sql
);
foreach
(
$var_names
as
$index
=>
$var_name
)
{
$var_names
[
$index
]
=
'<a href="'
.
$application
->
BaseURL
()
.
'tools/show_cache.php?show_var='
.
$var_name
.
'">'
.
$var_name
.
'</a>'
;
}
kUtil
::
print_r
(
$var_names
,
'Cache variable names:'
,
true
);
}
$application
->
Done
();
$end
=
microtime
(
true
);
Event Timeline
Log In to Comment