Admin functions library
| > Script written by Matt Mecham
| > Date started: 1st march 2002
|
| > DBA Checked: Tue 25th May 2004
+--------------------------------------------------------------------------
*/
class admin_functions {
var $img_url;
var $page_title = "Welcome to the Invision Power Board Administration CP";
var $page_detail = "You can set up and customize your board from within this control panel.
Clicking on one of the links in the left menu pane will show you the relevant options for that administration category. Each option will contain further information on configuration, etc.";
var $html;
var $errors = "";
var $nav = array();
var $time_offset = 0;
var $jump_menu = "";
var $no_jump = 0;
var $master_skin = array();
var $depth_guide = '--';
var $menu_ids = array();
function admin_functions()
{
global $ibforums;
$this->base_url = $ibforums->base_url;
$this->img_url = $ibforums->skin_url;
}
//-----------------------------------------
// Get mysql version
//-----------------------------------------
function get_mysql_version()
{
global $ibforums, $DB, $std;
//-----------------------------------------
// Get the mySQL version.
// Adapted from phpMyAdmin
//-----------------------------------------
$DB->sql_get_version();
$ibforums->true_version = $DB->true_version;
$ibforums->mysql_version = $DB->mysql_version;
}
//-----------------------------------------
// Get mysql version
//-----------------------------------------
function get_fulltextindex_status()
{
global $ibforums, $DB, $std;
if ( $DB->sql_is_currently_fulltext( 'posts' ) == TRUE )
{
return 1;
}
else
{
return 0;
}
}
/*-------------------------------------------------------------------------*/
// make template / text data safe for forms
/*-------------------------------------------------------------------------*/
function text_to_form($t="")
{
// Use forward look up to only convert & not {
//$t = preg_replace("/&(?!#[0-9]+;)/s", '&', $t );
$t = str_replace("&", "&" , $t );
$t = str_replace( "<" , "<" , $t );
$t = str_replace( ">" , ">" , $t );
$t = str_replace( '"' , """ , $t );
$t = str_replace( "'" , ''' , $t );
$t = str_replace( "\\", "\" , $t );
return $t; // A nice cup of?
}
/*-------------------------------------------------------------------------*/
// Converts form data back into raw text
/*-------------------------------------------------------------------------*/
function form_to_text($t="")
{
$t = str_replace( '\\' , '\\\\', $t );
$t = str_replace( "&" , "&", $t );
$t = str_replace( "<" , "<", $t );
$t = str_replace( ">" , ">", $t );
$t = str_replace( """ , '"', $t );
$t = str_replace( "'" , "'", $t );
$t = str_replace( '\' ,'\\', $t );
return $t;
}
//-----------------------------------------
// Generate skin list
//-----------------------------------------
function skin_get_skin_dropdown()
{
global $ibforums;
$skin_array = array();
foreach( $ibforums->cache['skin_id_cache'] as $id => $data )
{
if ( $data['set_parent'] < 1 and $id > 1 )
{
$data['set_parent'] = 'root';
}
$this->master_skin[ $data['set_parent'] ][ $id ] = $data;
}
foreach( $this->master_skin['root'] as $id => $data )
{
$skin_array[] = array( $id, $data['set_name'] );
if ( is_array( $this->master_skin[ $id ] ) )
{
foreach( $this->master_skin[ $id ] as $id => $data )
{
$skin_array[] = array( $id, $this->depth_guide.$data['set_name'] );
$skin_array = $this->skin_get_skin_dropdown_recurse( $id, $skin_array, $this->depth_guide.$this->depth_guide );
}
}
}
return $skin_array;
}
function skin_get_skin_dropdown_recurse( $root_id, $skin_array=array(), $depth_guide='' )
{
global $ibforums;
if ( is_array( $this->master_skin[ $root_id ] ) )
{
foreach( $this->master_skin[ $root_id ] as $id => $data )
{
$skin_array[] = array( $id, $this->depth_guide.$data['set_name'] );
$skin_array = $this->skin_get_skin_dropdown_recurse( $id, $skin_array, $this->depth_guide.$this->depth_guide );
}
}
return $skin_array;
}
//-----------------------------------------
// IMPORT FUNCTION
//-----------------------------------------
function import_xml( $infilename )
{
global $ibforums, $DB, $std;
//-----------------------------------------
// Upload
//-----------------------------------------
$FILE_NAME = $_FILES['FILE_UPLOAD']['name'];
$FILE_SIZE = $_FILES['FILE_UPLOAD']['size'];
$FILE_TYPE = $_FILES['FILE_UPLOAD']['type'];
//-----------------------------------------
// Naughty Opera adds the filename on the end of the
// mime type - we don't want this.
//-----------------------------------------
$FILE_TYPE = preg_replace( "/^(.+?);.*$/", "\\1", $FILE_TYPE );
//-----------------------------------------
// Naughty Mozilla likes to use "none" to indicate an empty upload field.
// I love universal languages that aren't universal.
//-----------------------------------------
if ( $_FILES['FILE_UPLOAD']['name'] == "" or ! $_FILES['FILE_UPLOAD']['name'] or ($_FILES['FILE_UPLOAD']['name'] == "none") )
{
continue;
}
$content = "";
if ( strstr( $FILE_NAME, $infilename ) )
{
if ( move_uploaded_file( $_FILES[ 'FILE_UPLOAD' ]['tmp_name'], ROOT_PATH."uploads/".$FILE_NAME) )
{
if ( $FILE_NAME == $infilename.'.gz' )
{
if ( $FH = @gzopen( ROOT_PATH."uploads/".$FILE_NAME, 'rb' ) )
{
while ( ! @gzeof( $FH ) )
{
$content .= @gzread( $FH, 1024 );
}
@gzclose( $FH );
}
}
else if ( $FILE_NAME == $infilename )
{
if ( $FH = @fopen( ROOT_PATH."uploads/".$FILE_NAME, 'rb' ) )
{
$content = @fread( $FH, filesize(ROOT_PATH."uploads/".$FILE_NAME) );
@fclose( $FH );
}
}
@unlink( ROOT_PATH."uploads/".$FILE_NAME );
}
}
return $content;
}
//-----------------------------------------
// Shows dialogue download box
//-----------------------------------------
function show_download( $data, $name, $type="unknown/unknown", $compress=1 )
{
//@flush();
if ( $compress and @function_exists('gzencode') )
{
$name .= '.gz';
//$type = 'application/x-gzip';
}
else
{
$compress = 0;
}
header('Content-Type: '.$type);
header('Expires: ' . gmdate('D, d M Y H:i:s') . ' GMT');
header('Content-Disposition: attachment; filename="' . $name . '"');
if ( ! $compress )
{
@header('Content-Length: ' . strlen($data) );
}
@header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
@header('Pragma: public');
if ( $compress )
{
print gzencode($data);
}
else
{
print $data;
}
exit();
}
//-----------------------------------------
// Makes good raw form text
//-----------------------------------------
function make_safe($t)
{
$t = stripslashes($t);
$t = preg_replace( "/\\\/", "\", $t );
return $t;
}
//-----------------------------------------
// Sets up time offset for ACP use
//-----------------------------------------
function get_date($date="", $method="")
{
global $ibforums, $DB, $std;
$this->time_options = array( 'JOINED' => $ibforums->vars['clock_joined'],
'SHORT' => $ibforums->vars['clock_short'],
'LONG' => $ibforums->vars['clock_long']
);
if (!$date)
{
return '--';
}
if (empty($method))
{
$method = 'LONG';
}
$this->time_offset = (($ibforums->member['time_offset'] != "") ? $ibforums->member['time_offset'] : $ibforums->vars['time_offset']) * 3600;
if ($ibforums->vars['time_adjust'] != "" and $ibforums->vars['time_adjust'] != 0)
{
$this->time_offset += ($ibforums->vars['time_adjust'] * 60);
}
if ($ibforums->member['dst_in_use'])
{
$this->time_offset += 3600;
}
return gmdate($this->time_options[$method], ($date + $this->time_offset) );
}
//**********************************************/
// save_log
//
// Add an entry into the admin logs, yeah.
//**********************************************/
function save_log($action="")
{
global $ibforums, $DB;
$DB->do_insert( 'admin_logs', array(
'act' => $ibforums->input['act'],
'code' => $ibforums->input['code'],
'member_id' => $ibforums->member['id'],
'ctime' => time(),
'note' => $action,
'ip_address' => $ibforums->input['IP_ADDRESS'],
) );
return true; // to anyone that cares..
}
//**********************************************/
// get_tar_names
//
// Simply returns a list of tarballs that start
// with the given filename
//**********************************************/
function get_tar_names($start='lang-')
{
global $ibforums;
// Remove trailing slashes..
$files = array();
$dir = $ibforums->vars['base_dir']."archive_in";
if ( is_dir($dir) )
{
$handle = opendir($dir);
while (($filename = readdir($handle)) !== false)
{
if (($filename != ".") && ($filename != ".."))
{
if (preg_match("/^$start.+?\.tar$/", $filename))
{
$files[] = $filename;
}
}
}
closedir($handle);
}
return $files;
}
//**********************************************/
// copy_dir
//
// Copies to contents of a dir to a new dir, creating
// destination dir if needed.
//
//**********************************************/
function copy_dir($from_path, $to_path, $mode = 0777)
{
global $ibforums;
// Strip off trailing slashes...
$from_path = preg_replace( "#/$#", "", $from_path);
$to_path = preg_replace( "#/$#", "", $to_path);
if ( ! is_dir($from_path) )
{
$this->errors = "Could not locate directory '$from_path'";
return FALSE;
}
if ( ! is_dir($to_path) )
{
if ( ! @mkdir($to_path, $mode) )
{
$this->errors = "Could not create directory '$to_path' please check the CHMOD permissions and re-try";
return FALSE;
}
else
{
@chmod($to_path, $mode);
}
}
//$this_path = getcwd();
if (is_dir($from_path))
{
//chdir($from_path);
$handle = opendir($from_path);
while (($file = readdir($handle)) !== false)
{
if (($file != ".") && ($file != ".."))
{
if ( is_dir( $from_path."/".$file ) )
{
$this->copy_dir($from_path."/".$file, $to_path."/".$file);
//chdir($from_path);
}
if ( is_file( $from_path."/".$file ) )
{
copy($from_path."/".$file, $to_path."/".$file);
@chmod($to_path."/".$file, 0777);
}
}
}
closedir($handle);
}
if ($this->errors == "")
{
return TRUE;
}
}
//**********************************************/
// rm_dir
//
// Removes directories, if non empty, removes
// content and directories
// (Code based on annotations from the php.net
// manual by pal@degerstrom.com)
//**********************************************/
function rm_dir($file)
{
global $ibforums;
$errors = 0;
// Remove trailing slashes..
$file = preg_replace( "#/$#", "", $file );
if ( file_exists($file) )
{
// Attempt CHMOD
@chmod($file, 0777);
if ( is_dir($file) )
{
$handle = opendir($file);
while (($filename = readdir($handle)) !== false)
{
if (($filename != ".") && ($filename != ".."))
{
$this->rm_dir($file."/".$filename);
}
}
closedir($handle);
if ( ! @rmdir($file) )
{
$errors++;
}
}
else
{
if ( ! @unlink($file) )
{
$errors++;
}
}
}
if ($errors == 0)
{
return TRUE;
}
else
{
return FALSE;
}
}
//**********************************************/
// rebuild_config:
//
// Er, rebuilds the config file
//
//**********************************************/
function rebuild_config( $new = "" )
{
global $ibforums, $std, $ADMIN, $root_path;
//-----------------------------------------
// Check to make sure this is a valid array
//-----------------------------------------
if (! is_array($new) )
{
$ibforums->admin->error("Error whilst attempting to rebuild the board config file, attempt aborted");
}
//-----------------------------------------
// Do we have anything to save out?
//-----------------------------------------
if ( count($new) < 1 )
{
return "";
}
//-----------------------------------------
// Get an up to date copy of the config file
// (Imports $INFO)
//-----------------------------------------
require ROOT_PATH.'conf_global.php';
//-----------------------------------------
// Rebuild the $INFO hash
//-----------------------------------------
foreach( $new as $k => $v )
{
// Update the old...
$v = preg_replace( "/'/", "\\'" , $v );
$v = preg_replace( "/\r/", "" , $v );
$ibforums->vars[ $k ] = $v;
}
//-----------------------------------------
// Rename the old config file
//-----------------------------------------
@rename( ROOT_PATH.'conf_global.php', ROOT_PATH.'conf_global-bak.php' );
@chmod( ROOT_PATH.'conf_global-bak.php', 0777);
//-----------------------------------------
// Rebuild the old file
//-----------------------------------------
ksort($ibforums->vars);
$file_string = "vars as $k => $v )
{
if ($k == 'skin' or $k == 'languages')
{
// Protect serailized arrays..
$v = stripslashes($v);
$v = addslashes($v);
}
$file_string .= '$INFO['."'".$k."'".']'."\t\t\t=\t'".$v."';\n";
}
$file_string .= "\n".'?'.'>'; // Question mark + greater than together break syntax hi-lighting in BBEdit 6 :p
if ( $fh = fopen( ROOT_PATH.'conf_global.php', 'w' ) )
{
fwrite($fh, $file_string, strlen($file_string) );
fclose($fh);
}
else
{
$ibforums->admin->error("Fatal Error: Could not open conf_global for writing - no changes applied. Try changing the CHMOD to 0777");
}
// Pass back the new $INFO array to anyone who cares...
return $ibforums->vars;
}
//**********************************************/
// compile_forum_perms:
//
// Returns the READ/REPLY/START DB strings
//
//**********************************************/
function compile_forum_perms()
{
global $DB, $ibforums;
$r_array = array( 'READ' => '', 'REPLY' => '', 'START' => '', 'UPLOAD' => '' );
if ($ibforums->input['READ_ALL'] == 1)
{
$r_array['READ'] = '*';
}
if ($ibforums->input['REPLY_ALL'] == 1)
{
$r_array['REPLY'] = '*';
}
if ($ibforums->input['START_ALL'] == 1)
{
$r_array['START'] = '*';
}
if ($ibforums->input['UPLOAD_ALL'] == 1)
{
$r_array['UPLOAD'] = '*';
}
if ($ibforums->input['SHOW_ALL'] == 1)
{
$r_array['SHOW'] = '*';
}
$DB->simple_construct( array( 'select' => 'perm_id, perm_name', 'from' => 'forum_perms', 'order' => "perm_id" ) );
$DB->simple_exec();
while ( $data = $DB->fetch_row() )
{
if ($r_array['SHOW'] != '*')
{
if ($ibforums->input[ 'SHOW_'.$data['perm_id'] ] == 1)
{
$r_array['SHOW'] .= $data['perm_id'].",";
}
}
//-----------------------------------------
if ($r_array['READ'] != '*')
{
if ($ibforums->input[ 'READ_'.$data['perm_id'] ] == 1)
{
$r_array['READ'] .= $data['perm_id'].",";
}
}
//-----------------------------------------
if ($r_array['REPLY'] != '*')
{
if ($ibforums->input[ 'REPLY_'.$data['perm_id'] ] == 1)
{
$r_array['REPLY'] .= $data['perm_id'].",";
}
}
//-----------------------------------------
if ($r_array['START'] != '*')
{
if ($ibforums->input[ 'START_'.$data['perm_id'] ] == 1)
{
$r_array['START'] .= $data['perm_id'].",";
}
}
//-----------------------------------------
if ($r_array['UPLOAD'] != '*')
{
if ($ibforums->input[ 'UPLOAD_'.$data['perm_id'] ] == 1)
{
$r_array['UPLOAD'] .= $data['perm_id'].",";
}
}
}
$r_array['START'] = preg_replace( "/,$/", "", $r_array['START'] );
$r_array['REPLY'] = preg_replace( "/,$/", "", $r_array['REPLY'] );
$r_array['READ'] = preg_replace( "/,$/", "", $r_array['READ'] );
$r_array['UPLOAD'] = preg_replace( "/,$/", "", $r_array['UPLOAD'] );
$r_array['SHOW'] = preg_replace( "/,$/", "", $r_array['SHOW'] );
return $r_array;
}
//-----------------------------------------
//------------------------------------------------
// OUTPUT FUNCTIONS
//-----------------------------------------
//------------------------------------------------
function print_popup()
{
global $ibforums, $DB, $std, $use_gzip;
$html = "
IPB
skin_url}/acp_css.css\" />
";
$html .= $ibforums->html;
$html .= "";
print $html;
exit();
}
//-----------------------------------------
// OUTPUT
//-----------------------------------------
function output()
{
global $ibforums, $DB, $std, $use_gzip;
$html = $ibforums->adskin->print_top($this->page_title, $this->page_detail);
$html .= $ibforums->html;
$html .= $ibforums->adskin->print_foot();
$DB->close_db();
$navigation = array( "ACP Home" );
if ( count($this->nav) > 0 )
{
foreach ( $this->nav as $idx => $links )
{
if ($links[0] != "")
{
$navigation[] = "{$links[1]}";
}
else
{
$navigation[] = $links[1];
}
}
}
//-----------------------------------------
// Navigation?
//-----------------------------------------
if ( count($navigation) > 0 )
{
$html = str_replace( "", $ibforums->adskin->wrap_nav( implode( " / ", $navigation ) ), $html );
}
//-----------------------------------------
// Quick Jump?
//-----------------------------------------
if ( $this->no_jump != 1 )
{
$html = str_replace( "", $this->build_jump_menu(), $html );
}
//-----------------------------------------
// Message in a bottle?
//-----------------------------------------
if ( $ibforums->main_msg )
{
$message = "