';
}
}
/**
* Get the links for the Frequently Used section of the admin toolbar
*
*/
public static function GetFrequentlyUsed($in_panel){
global $langmessage, $gpAdmin;
$expand_class = 'expand_child';
if( !$in_panel ){
$expand_class = 'expand_child_click';
}
//frequently used
echo '
';
echo '';
echo $langmessage['frequently_used'];
echo '';
if( $in_panel ){
echo '';
}else{
echo '';
}
$scripts = self::AdminScripts();
$add_one = true;
if( isset($gpAdmin['freq_scripts']) ){
foreach($gpAdmin['freq_scripts'] as $link => $hits ){
if( isset($scripts[$link]) && isset($scripts[$link]['label']) ){
echo '- ';
echo \gp\tool::Link($link, $scripts[$link]['label']);
echo '
';
if( $link === 'Admin/Menu' ){
$add_one = false;
}
}
}
if( $add_one && count($gpAdmin['freq_scripts']) >= 5 ){
$add_one = false;
}
}
if( $add_one ){
echo '- ';
echo \gp\tool::Link('Admin/Menu', $scripts['Admin/Menu']['label']);
echo '
';
}
echo '
';
echo '
';
}
/**
* Ues $update_status from update codes to execute some cleanup code
* on a regular interval (7 days)
*
*/
public static function ScheduledTasks(){
global $dataDir;
switch(self::$update_status){
case 'embedcheck':
case 'checkincompat':
//these will continue
break;
case 'checklater':
default:
return;
}
self::CleanCache();
}
/**
* Delete all files older than 2 weeks
* If there are more than 200 files older than one week
*
*/
public static function CleanCache(){
global $dataDir;
$dir = $dataDir . '/data/_cache';
if( !file_exists($dir) ){
return;
}
$files = scandir($dir);
$times = [];
foreach($files as $file){
if( $file == '.' || $file == '..' || strpos($file, '.php') !== false ){
continue;
}
$full_path = $dir . '/' . $file;
$time = filemtime($full_path);
$diff = time() - $time;
//if relatively new ( < 3 days), don't delete it
if( $diff < 259200 ){
continue;
}
//if old ( > 14 days ), delete it
if( $diff > 1209600 ){
\gp\tool\Files::RmAll($full_path);
continue;
}
$times[$file] = $time;
}
//reduce further if needed till we have less than 200 files
arsort($times);
$times = array_keys($times);
while( count($times) > 200 ){
$full_path = $dir . '/' . array_pop($times);
\gp\tool\Files::RmAll($full_path);
}
}
public static function AdminHtml(){
global $page, $gp_admin_html;
ob_start();
echo '
';
if( isset($page->admin_html) ){
echo $page->admin_html;
}
self::GetAdminPanel();
self::CheckStatus();
self::ScheduledTasks();
$gp_admin_html = ob_get_clean() . $gp_admin_html;
}
public static function CheckStatus(){
switch(self::$update_status){
case 'embedcheck':
$img_path = \gp\tool::GetUrl('Admin', 'cmd=embededcheck');
\gp\tool::IdReq($img_path);
break;
case 'checkincompat':
$img_path = \gp\tool::IdUrl('ci'); //check in
\gp\tool::IdReq($img_path);
break;
}
}
public static function GetAdminGroup($grouping){
global $langmessage, $page;
$scripts = self::AdminScripts();
ob_start();
foreach($scripts as $script => $info){
if( !isset($info['group']) || $info['group'] !== $grouping ){
continue;
}
if( !self::HasPermission($script) ){
continue;
}
echo '
';
if( isset($info['popup']) && $info['popup'] == true ){
echo \gp\tool::Link(
$script,
$info['label'],
'',
['data-cmd' => 'gpabox']
);
}else{
echo \gp\tool::Link(
$script,
$info['label']
);
}
echo '';
switch($script){
case 'Admin/Menu':
echo '
';
echo \gp\tool::Link(
'Admin/Menu/Ajax',
'+ ' . $langmessage['create_new_file'],
'cmd=AddHidden&redir=redir',
[
'title' => $langmessage['create_new_file'],
'data-cmd' => 'gpabox',
]
);
echo '';
break;
}
}
$result = ob_get_clean();
if( !empty($result) ){
return $result;
}
return false;
}
public static function GetAppearanceGroup($in_panel){
global $page, $langmessage, $gpLayouts, $config;
if( !self::HasPermission('Admin_Theme_Content') ){
return false;
}
ob_start();
echo '
';
echo \gp\tool::Link('Admin_Theme_Content', $langmessage['manage']);
echo '';
if( !empty($page->gpLayout) ){
echo '
';
echo \gp\tool::Link(
'Admin_Theme_Content/Edit/' . urlencode($page->gpLayout),
$langmessage['edit_this_layout']
);
echo '';
}
echo '
';
echo \gp\tool::Link(
'Admin_Theme_Content/Available',
$langmessage['available_themes']
);
echo '';
if( gp_remote_themes ){
echo '
';
echo \gp\tool::Link(
'Admin_Theme_Content/Remote',
$langmessage['Download Themes']
);
echo '';
}
//list of layouts
$expand_class = 'expand_child';
if( !$in_panel ){
$expand_class = 'expand_child_click';
}
echo '
';
echo '' . $langmessage['layouts'] . '';
if( $in_panel ){
echo '';
}else{
echo '';
}
if( !empty($page->gpLayout) ){
$to_hightlight = $page->gpLayout;
}else{
$to_hightlight = $config['gpLayout'];
}
foreach($gpLayouts as $layout => $info){
if( $to_hightlight == $layout ){
echo '- ';
}else{
echo '
- ';
}
$display = '' .
' ' . $info['label'];
echo \gp\tool::Link(
'Admin_Theme_Content/Edit/' . rawurlencode($layout),
$display
);
echo '
';
}
echo '
';
echo '
';
return ob_get_clean();
}
/**
* Clean a string for use in a page label
* Some tags will be allowed
*
*/
public static function PostedLabel($string){
// Remove control characters
$string = preg_replace('#[[:cntrl:]]#u', '', $string); //[\x00-\x1F\x7F]
//change known entities to their character equivalent
$string = \gp\tool\Strings::entity_unescape($string);
return self::LabelHtml($string);
}
/**
* Convert a label to a slug
* Does not use PostedSlug() so entity_unescape isn't called twice
* @since 2.5b1
*
*/
public static function LabelToSlug($string){
return self::PostedSlug($string, true);
}
/**
* Clean a slug posted by the user
* @param string $slug The slug provided by the user
* @return string
* @since 2.4b5
*
*/
public static function PostedSlug($string, $from_label=false){
global $config;
$orig_string = $string;
$string = \gp\tool\Editing::Sanitize($string);
//illegal characters
$string = str_replace(
['?', '*', ':', '|'],
['', '', '', ''],
$string
);
//change known entities to their character equivalent
$string = \gp\tool\Strings::entity_unescape($string);
//if it's from a label, remove any html
if( $from_label ){
$string = self::LabelHtml($string);
$string = strip_tags($string);
//after removing tags, unescape special characters
$string = str_replace(
['<', '>', '"', ''', '&'],
['<', '>', '"', "'", '&'],
$string
);
}
// # character after unescape for entities and unescape of special chacters when $from_label is true
$string = str_replace('#', '', $string);
//slashes
$string = self::SlugSlashes($string);
$string = str_replace(' ', $config['space_char'], $string);
return \gp\tool\Plugins::Filter('PostedSlug', [$string, $orig_string, $from_label]);
}
/**
* Fix the html for page labels
*
*/
public static function LabelHtml($string){
//prepend with space for preg_split(), space will be trimmed at the end
$string = ' ' . $string;
//change non html entity uses of & to & (not exact but should be sufficient)
$pieces = preg_split('#(&(?:\#[0-9]{2,4}|[a-zA-Z0-9]{2,8});)#', $string, 0, PREG_SPLIT_DELIM_CAPTURE);
$string = '';
for($i = 0; $i < count($pieces); $i++){
if( $i % 2 ){
$string .= $pieces[$i];
}else{
$string .= str_replace('&', '&', $pieces[$i]);
}
}
//change non html tag < and > into < and >
$pieces = preg_split('#(<(?:/?)[a-zA-Z0-9][^<>]*>)#', $string, 0, PREG_SPLIT_DELIM_CAPTURE);
$string = '';
for($i=0; $i< count($pieces); $i++){
if( $i % 2 ){
$string .= $pieces[$i];
}else{
$string .= \gp\tool::LabelSpecialChars($pieces[$i]);
}
}
//only allow tags that are legal to be inside
except for