fluxbb/include/cache.php

   1 <?php
   2 /***********************************************************************
   3
   4   Copyright (C) 2002-2005  Rickard Andersson (rickard@punbb.org)
   5
   6   This file is part of PunBB.
   7
   8   PunBB is free software; you can redistribute it and/or modify it
   9   under the terms of the GNU General Public License as published
  10   by the Free Software Foundation; either version 2 of the License,
  11   or (at your option) any later version.
  12
  13   PunBB is distributed in the hope that it will be useful, but
  14   WITHOUT ANY WARRANTY; without even the implied warranty of
  15   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16   GNU General Public License for more details.
  17
  18   You should have received a copy of the GNU General Public License
  19   along with this program; if not, write to the Free Software
  20   Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  21   MA  02111-1307  USA
  22
  23 ************************************************************************/
  24
  25
  26 // Make sure no one attempts to run this script "directly"
  27 if (!defined('PUN'))
  28         exit;
  29
  30
  31 //
  32 // If we are running pre PHP 4.2.0, we add our own implementation of var_export
  33 //
  34 if (!function_exists('var_export'))
  35 {
  36         function var_export()
  37         {
  38                 $args = func_get_args();
  39                 $indent = (isset($args[2])) ? $args[2] : '';
  40
  41                 if (is_array($args[0]))
  42                 {
  43                         $output = 'array ('."\n";
  44
  45                         foreach ($args[0] as $k => $v)
  46                         {
  47                                 if (is_numeric($k))
  48                                         $output .= $indent.'  '.$k.' => ';
  49                                 else
  50                                         $output .= $indent.'  \''.str_replace('\'', '\\\'', str_replace('\\', '\\\\', $k)).'\' => ';
  51
  52                                 if (is_array($v))
  53                                         $output .= var_export($v, true, $indent.'  ');
  54                                 else
  55                                 {
  56                                         if (gettype($v) != 'string' && !empty($v))
  57                                                 $output .= $v.','."\n";
  58                                         else
  59                                                 $output .= '\''.str_replace('\'', '\\\'', str_replace('\\', '\\\\', $v)).'\','."\n";
  60                                 }
  61                         }
  62
  63                         $output .= ($indent != '') ? $indent.'),'."\n" : ')';
  64                 }
  65                 else
  66                         $output = $args[0];
  67
  68                 if ($args[1] == true)
  69                         return $output;
  70                 else
  71                         echo $output;
  72         }
  73 }
  74
  75
  76 //
  77 // Generate the config cache PHP script
  78 //
  79 function generate_config_cache()
  80 {
  81         global $db;
  82
  83         // Get the forum config from the DB
  84         $result = $db->query('SELECT * FROM '.$db->prefix.'config', true) or error('Unable to fetch forum config', __FILE__, __LINE__, $db->error());
  85         while ($cur_config_item = $db->fetch_row($result))
  86                 $output[$cur_config_item[0]] = $cur_config_item[1];
  87
  88         // Output config as PHP code
  89         $fh = @fopen(PUN_ROOT.'cache/cache_config.php', 'wb');
  90         if (!$fh)
  91                 error('Unable to write configuration cache file to cache directory. Please make sure PHP has write access to the directory \'cache\'', __FILE__, __LINE__);
  92
  93         fwrite($fh, '<?php'."\n\n".'define(\'PUN_CONFIG_LOADED\', 1);'."\n\n".'$pun_config = '.var_export($output, true).';'."\n\n".'?>');
  94
  95         fclose($fh);
  96 }
  97
  98
  99 //
 100 // Generate the bans cache PHP script
 101 //
 102 function generate_bans_cache()
 103 {
 104         global $db;
 105
 106         // Get the ban list from the DB
 107         $result = $db->query('SELECT * FROM '.$db->prefix.'bans', true) or error('Unable to fetch ban list', __FILE__, __LINE__, $db->error());
 108
 109         $output = array();
 110         while ($cur_ban = $db->fetch_assoc($result))
 111                 $output[] = $cur_ban;
 112
 113         // Output ban list as PHP code
 114         $fh = @fopen(PUN_ROOT.'cache/cache_bans.php', 'wb');
 115         if (!$fh)
 116                 error('Unable to write bans cache file to cache directory. Please make sure PHP has write access to the directory \'cache\'', __FILE__, __LINE__);
 117
 118         fwrite($fh, '<?php'."\n\n".'define(\'PUN_BANS_LOADED\', 1);'."\n\n".'$pun_bans = '.var_export($output, true).';'."\n\n".'?>');
 119
 120         fclose($fh);
 121 }
 122
 123
 124 //
 125 // Generate the ranks cache PHP script
 126 //
 127 function generate_ranks_cache()
 128 {
 129         global $db;
 130
 131         // Get the rank list from the DB
 132         $result = $db->query('SELECT * FROM '.$db->prefix.'ranks ORDER BY min_posts', true) or error('Unable to fetch rank list', __FILE__, __LINE__, $db->error());
 133
 134         $output = array();
 135         while ($cur_rank = $db->fetch_assoc($result))
 136                 $output[] = $cur_rank;
 137
 138         // Output ranks list as PHP code
 139         $fh = @fopen(PUN_ROOT.'cache/cache_ranks.php', 'wb');
 140         if (!$fh)
 141                 error('Unable to write ranks cache file to cache directory. Please make sure PHP has write access to the directory \'cache\'', __FILE__, __LINE__);
 142
 143         fwrite($fh, '<?php'."\n\n".'define(\'PUN_RANKS_LOADED\', 1);'."\n\n".'$pun_ranks = '.var_export($output, true).';'."\n\n".'?>');
 144
 145         fclose($fh);
 146 }
 147
 148
 149 //
 150 // Generate quickjump cache PHP scripts
 151 //
 152 function generate_quickjump_cache($group_id = false)
 153 {
 154         global $db, $lang_common, $pun_user;
 155
 156         // If a group_id was supplied, we generate the quickjump cache for that group only
 157         if ($group_id !== false)
 158                 $groups[0] = $group_id;
 159         else
 160         {
 161                 // A group_id was now supplied, so we generate the quickjump cache for all groups
 162                 $result = $db->query('SELECT g_id FROM '.$db->prefix.'groups') or error('Unable to fetch user group list', __FILE__, __LINE__, $db->error());
 163                 $num_groups = $db->num_rows($result);
 164
 165                 for ($i = 0; $i < $num_groups; ++$i)
 166                         $groups[] = $db->result($result, $i);
 167         }
 168
 169         // Loop through the groups in $groups and output the cache for each of them
 170         while (list(, $group_id) = @each($groups))
 171         {
 172                 // Output quickjump as PHP code
 173                 $fh = @fopen(PUN_ROOT.'cache/cache_quickjump_'.$group_id.'.php', 'wb');
 174                 if (!$fh)
 175                         error('Unable to write quickjump cache file to cache directory. Please make sure PHP has write access to the directory \'cache\'', __FILE__, __LINE__);
 176
 177                 $output = '<?php'."\n\n".'if (!defined(\'PUN\')) exit;'."\n".'define(\'PUN_QJ_LOADED\', 1);'."\n\n".'?>';
 178                 $output .= "\t\t\t\t".'<form id="qjump" method="get" action="viewforum.php">'."\n\t\t\t\t\t".'<div><label><?php echo $lang_common[\'Jump to\'] ?>'."\n\n\t\t\t\t\t".'<br /><select name="id" onchange="window.location=(\'viewforum.php?id=\'+this.options[this.selectedIndex].value)">'."\n";
 179
 180
 181                 $result = $db->query('SELECT c.id AS cid, c.cat_name, f.id AS fid, f.forum_name, f.redirect_url FROM '.$db->prefix.'categories AS c INNER JOIN '.$db->prefix.'forums AS f ON c.id=f.cat_id LEFT JOIN '.$db->prefix.'forum_perms AS fp ON (fp.forum_id=f.id AND fp.group_id='.$group_id.') WHERE fp.read_forum IS NULL OR fp.read_forum=1 ORDER BY c.disp_position, c.id, f.disp_position', true) or error('Unable to fetch category/forum list', __FILE__, __LINE__, $db->error());
 182
 183                 $cur_category = 0;
 184                 while ($cur_forum = $db->fetch_assoc($result))
 185                 {
 186                         if ($cur_forum['cid'] != $cur_category) // A new category since last iteration?
 187                         {
 188                                 if ($cur_category)
 189                                         $output .= "\t\t\t\t\t\t".'</optgroup>'."\n";
 190
 191                                 $output .= "\t\t\t\t\t\t".'<optgroup label="'.pun_htmlspecialchars($cur_forum['cat_name']).'">'."\n";
 192                                 $cur_category = $cur_forum['cid'];
 193                         }
 194
 195                         $redirect_tag = ($cur_forum['redirect_url'] != '') ? ' &gt;&gt;&gt;' : '';
 196                         $output .= "\t\t\t\t\t\t\t".'<option value="'.$cur_forum['fid'].'"<?php echo ($forum_id == '.$cur_forum['fid'].') ? \' selected="selected"\' : \'\' ?>>'.pun_htmlspecialchars($cur_forum['forum_name']).$redirect_tag.'</option>'."\n";
 197                 }
 198
 199                 $output .= "\t\t\t\t\t".'</optgroup>'."\n\t\t\t\t\t".'</select>'."\n\t\t\t\t\t".'<input type="submit" value="<?php echo $lang_common[\'Go\'] ?>" accesskey="g" />'."\n\t\t\t\t\t".'</label></div>'."\n\t\t\t\t".'</form>'."\n";
 200
 201                 fwrite($fh, $output);
 202
 203                 fclose($fh);
 204         }
 205 }