cache.php

很好的一套PHP树形论坛程序

	global $db;
	$momtiondb="<?php\n\$motion=array(\n";
	$facedb="\$face=array(\n";
	$query=$db->query("SELECT * FROM pw_actions");
	while(@extract(db_cv($db->fetch_array($query)))){
		$momtiondb.="'$id'=>array(\n\t'$name',\n\t'$descrip',\n\t'$images',\n\t),\n";
	}
	$query=$db->query("SELECT * FROM pw_smiles");
	while(@extract(db_cv($db->fetch_array($query)))){
		$facedb.="\t'$id'=>'$image',\n";
	}
	$momtiondb.=");\n";
	$facedb.=");";
	writeover(D_P."data/bbscache/postcache.php",$momtiondb.$facedb);
}
/**
* 更新禁用词语缓冲
*/
function updatecache_w(){
	global $db;
	$replace = "\$replace=array(\r\n";
	$wordsfb = "\$wordsfb=array(\r\n";
	$query=$db->query("SELECT * FROM pw_wordfb");
	while(@extract(db_cv($db->fetch_array($query)))){
		if($word){
			if($type==0){
				$replace .= "\t'$word'=>'$wordreplace',\r\n";
			} else{
				$wordsfb .= "\t'$word'=>'$wordreplace',\r\n";
			}
		}
	}
	$replace .= ");";
	$wordsfb .= ");";
	writeover(D_P."data/bbscache/wordsfb.php","<?php\r\n".$replace."\r\n".$wordsfb."\r\n?>");
}

/*
* 更新自定义积分数据
*/
function updatecache_cr(){
	global $db;
	$creditdb="\$_CREDITDB=array(\r\n\t\t";
	$query=$db->query("SELECT * FROM  pw_credits");
	while($write=db_cv($db->fetch_array($query))){
		if($write){
			$creditdb.="'".$write['cid']."'=>array('$write[name]','$write[unit]','$write[description]'),\r\n\t\t";
		}
	}
	$creditdb.=");";
	writeover(D_P."data/bbscache/creditdb.php","<?php\r\n".$creditdb."\r\n?>");
}

function updatecache_bk(){
	global $db;
	$query=$db->query("SELECT * FROM pw_hack WHERE hk_name LIKE 'bk_%'");
	$configdb="<?php\r\n";
	while(@extract(db_cv($db->fetch_array($query)))){
		$hk_name = key_cv($hk_name);
		if($hk_name=='bk_A'){
			$hk_value=unserialize($hk_value);
			$bkdb='';
			foreach($hk_value as $key=>$value){
				$bkdb.="'$key'=>array('$value[0]','$value[1]','$value[2]','$value[3]','$value[4]','$value[5]'),\r\n\t\t";
			}
		} else{
			//$hk_value=addslashes($hk_value);
			$configdb.="\$$hk_name='$hk_value';\r\n";
		}
	}
	$configdb.="\$bk_A=array(\r\n\t\t".$bkdb.");\r\n";
	$configdb.="?>";
	writeover(D_P.'data/bbscache/bk_config.php',$configdb);
}
function updatecache_df(){
	global $db;
	$query=$db->query("SELECT * FROM pw_config WHERE db_name LIKE 'df_%'");
	$configdb="<?php\r\n";
	while(@extract(db_cv($db->fetch_array($query)))){
		$db_name = key_cv($db_name);
		if($db_name=='df_cache'){
			$db_value=P_unserialize($db_value);
			if(is_array($db_value)){
				$_cachedb='';
				foreach($db_value as $key=>$value){
					$value[0]  = trim($value[0]);
					$value[1]  = trim($value[1]);
					$_cachedb .= "'$key'=>array('$value[0]','$value[1]'),\r\n\t\t";
				}
			}
		} elseif($db_name=='df_NEW'){
			$db_value=P_unserialize($db_value);
			if(is_array($db_value)){
				$_newdb='';
				foreach($db_value as $value){
					$_newdb.="'$value',";
				}
			}
		} elseif($db_name=='df_CMS'){
			$db_value=P_unserialize($db_value);
			if(is_array($db_value)){
				$_cmsdb='';
				foreach($db_value as $value){
					$_cmsdb.="'$value',";
				}
			}
		}   elseif($db_name=='df_FID'){
			$db_value=P_unserialize($db_value);
			if(is_array($db_value)){
				$_fiddb='';
				foreach($db_value as $value){
					$_fiddb.="'$value',";
				}
			}
		} elseif($db_name=='df_forumlogo'){
			$db_value=P_unserialize($db_value);
			if(is_array($db_value)){
				$_forumlogodb = '';
				foreach($db_value as $key => $value){
					if($value[0]){
						$_forumlogodb .= "'$key'=>array('$value[0]','$value[1]','$value[2]','$value[3]'),\r\n\t\t";
					}
				}
			}
		} else{
			$configdb.="\$$db_name='$db_value';\r\n";
		}
	}
	$configdb.="\r\n\$df_cache=array(\r\n\t\t".$_cachedb.");\r\n";
	$configdb.="\r\n\$df_NEW=array(".$_newdb.");\r\n";
	$configdb.="\r\n\$df_CMS=array(".$_cmsdb.");\r\n";
	$configdb.="\r\n\$df_FID=array(".$_fiddb.");\r\n";
	$configdb.="\r\n\$df_forumlogo=array(\r\n\t\t".$_forumlogodb.");\r\n";
	$configdb.="?>";
	writeover(D_P.'data/bbscache/c_config.php',$configdb);
}
function updatecache_h(){
	include(D_P.'data/sql_config.php');
	$db_hackdb = db_cv($db_hackdb);
	foreach($db_hackdb as $key=>$value){
		$hackdb.="//===========$value[1]===========//\r\n if(\$H_name=='$value[1]'){\r\n\t require_once(R_P.'hack/$value[2]');\r\n}\r\n//===========$value[1]===========//\r\n\r\n";
		$hacksetdb.="//===========$value[1]===========//\r\n if(\$hackset=='$value[1]'){\r\n\t require_once(R_P.'hack/$value[3]');\r\n}\r\n//===========$value[1]===========//\r\n\r\n";
	}
	writeover(D_P."data/hack.php","<?php\r\n!function_exists('readover') && exit('Forbidden');\r\n".$hackdb."?>");
	writeover(D_P."data/hackset.php","<?php\r\n!function_exists('adminmsg') && exit('Forbidden');\r\n".$hacksetdb."?>");
}
function updatecache_cy(){
	global $db;
	$query = $db->query("SELECT * FROM pw_hack WHERE hk_name LIKE 'cn_%'");
	$colonydb = "<?php\r\n";
	while(@extract(db_cv($db->fetch_array($query)))){
		$hk_name = key_cv($hk_name);
		$colonydb .= "\$$hk_name='$hk_value';\r\n";
	}
	$colonydb .= "\n?>";
	writeover(D_P.'data/bbscache/cn_config.php', $colonydb);
}
function updatecache_ol(){
	global $db;
	$onlinedb="<?php\r\n";
	$query = $db->query("SELECT * FROM pw_config WHERE db_name LIKE 'ol_%'");
	while(@extract(db_cv($db->fetch_array($query)))){
		$db_name = key_cv($db_name);
		$onlinedb.="\$$db_name='$db_value';\r\n";
	}
	$onlinedb.="?>";
	writeover(D_P.'data/bbscache/ol_config.php',$onlinedb);
}
function updatecache_md(){
	global $db;
	$medaldb='';
	$query = $db->query("SELECT * FROM pw_hack WHERE hk_name LIKE 'md\_%'");
	while(@extract(db_cv($db->fetch_array($query)))){
		$hk_name = key_cv($hk_name);
		$medaldb.="\$$hk_name='$hk_value';";
	}
	writeover(D_P.'data/bbscache/md_config.php',"<?php\r\n".$medaldb."\r\n?>");
}
function updatecache_mddb(){
	global $db;
	$medaldb="<?php\r\n\$_MEDALDB=array(\r\n";
	$query = $db->query("SELECT * FROM pw_medalinfo ORDER BY id");
	while($rt=db_cv($db->fetch_array($query))){
		$medaldb.="'$rt[id]'=>array(\r\n";
		foreach($rt as $key=>$value){
			$medaldb.="\t'$key'=>'$value',\r\n";
		}
		$medaldb.="),\r\n";
	}
	$medaldb.=");\r\n?>";
	writeover(D_P.'data/bbscache/medaldb.php',$medaldb);
}
function updatemedal_list(){
	global $db;
	$query   = $db->query("SELECT uid,medals FROM pw_members WHERE medals!=''");
	$medaldb = '<?die;?>0';
	while($rt=$db->fetch_array($query)){
		if(str_replace(',','',$rt['medals'])){
			$medaldb .= ','.$rt['uid'];
		}
	}
	writeover(D_P.'data/bbscache/medals_list.php',$medaldb);
}
function updatecache_ml(){
	global $db;
	$maildb	= '';
	$query	= $db->query("SELECT * FROM pw_config WHERE db_name LIKE 'ml\_%'");
	while(@extract(db_cv($db->fetch_array($query)))){
		$db_name = key_cv($db_name);
		$maildb	.= "\$$db_name='$db_value';\r\n";
	}
	writeover(D_P.'data/bbscache/mail_config.php',"<?php\r\n".$maildb."?>");
}
function updatecache_advert(){
	global $db;
	$advertdb	= '';
	$query	= $db->query("SELECT * FROM pw_modules WHERE state=1 ORDER BY vieworder");
	while($rt=db_cv($db->fetch_array($query))){
		$conf = unserialize(str_replace(array("\\\\","\'"),array("\\","'"),$rt['config']));
		if($conf['style'] == 'code'){
			$code = $conf['htmlcode'];
		}elseif($conf['style'] == 'txt'){
			$style='';
			if($conf['color']){
				$style .= "color:$conf[color];";
			}
			if($conf['size']){
				$style .= "font-size:$conf[size];";
			}
			if($style){
				$style = "style=\"$style\"";
			}
			$code = "<a href=\"$conf[link]\" target=\"_blank\" $style>$conf[title]</a>";
		}elseif($conf['style'] == 'img'){
			$style='';
			if($conf['width']){
				$style .= "width=\"$conf[width]\"";
			}
			if($conf['height']){
				$style .= "height=\"$conf[height]\"";
			}
			if($conf['descrip']){
				$style .= "alt=\"$conf[descrip]\"";
			}
			$code = "<a href=\"$conf[link]\" target=\"_blank\"><img src=\"$conf[url]\" $style></a>";
		}elseif($conf['style'] == 'flash'){
			$style='';
			if($conf['width']){
				$style .= "width=\"$conf[width]\"";
			}
			if($conf['height']){
				$style .= "height=\"$conf[height]\"";
			}
			$code = "<embed $style src=\"$conf[link]\" type=\"application/x-shockwave-flash\"></embed>";
		}
		$ad['starttime'] = $conf['starttime'];
		$ad['endtime']	 = $conf['endtime'];
		$ad['fid']		 = $conf['fid'];
		$ad['descrip']	 = $conf['descrip'];
		$ad['link']	 = $conf['link'];
		$ad['code']		 = $code;
		$advertdb[$rt['varname']][] = $ad;
	}
	$cachedb = "\$advertdb=".pw_var_export($advertdb).";\r\n";
	writeover(D_P.'data/bbscache/advert_data.php',"<?php\r\n".$cachedb."?>");
}
function updatecache_ad(){
	global $db,$db_cp;
	if(!isset($db_cp)) return;
	$maildb	= '';
	$query	= $db->query("SELECT * FROM pw_cmsmodule WHERE type=5 AND state=1 ORDER BY vieworder");
	while($rt=db_cv($db->fetch_array($query))){
		$conf = unserialize($rt['config']);
		if($conf['style'] == 'code'){
			$code = $conf['htmlcode'];
		}elseif($conf['style'] == 'txt'){
			$style='';
			if($conf['color']){
				$style .= "color:$conf[color]";
			}
			if($conf['size']){
				$style .= "font-size:$conf[size]";
			}
			if($style){
				$style = "style=\"$style\"";
			}
			$code = "<a href=\"$conf[link]\" target=\"_blank\" $style>$conf[title]</a>";
		}elseif($conf['style'] == 'img'){
			$style='';
			if($conf['width']){
				$style .= "width=\"$conf[width]\"";
			}
			if($conf['height']){
				$style .= "height=\"$conf[height]\"";
			}
			if($conf['descrip']){
				$style .= "alt=\"$conf[descrip]\"";
			}
			$code = "<a href=\"$conf[link]\" target=\"_blank\"><img src=\"$conf[url]\" $style></a>";
		}elseif($conf['style'] == 'flash'){
			$style='';
			if($conf['width']){
				$style .= "width=\"$conf[width]\"";
			}
			if($conf['height']){
				$style .= "height=\"$conf[height]\"";
			}
			$code = "<embed $style src=\"$conf[link]\" type=\"application/x-shockwave-flash\"></embed>";
		}
		$ad['starttime'] = $conf['starttime'];
		$ad['endtime']	 = $conf['endtime'];
		$ad['fid']		 = $conf['fid'];
		$ad['descrip']	 = $conf['descrip'];
		$ad['link']	 = $conf['link'];
		$ad['code']		 = $code;
		$advertdb[$rt['varname']][] = $ad;
	}
	$cachedb = "\$advertdb=".pw_var_export($advertdb).";\r\n";
	writeover(D_P.'data/bbscache/advert_config.php',"<?php\r\n".$cachedb."?>");
}
/*
function cache_read(){
	global $db;
	list($forum_cache,$forumcache) = updatecache_f();
	$medaldb = updatecache_md();
	$leveldb = updatecache_l();
	$creditdb= updatecache_cr();
	$gpright = updatecache_gr();
	$readdb = $forum_cache."\r\n".$forumcache."\r\n".$medaldb."\r\n".$leveldb."\r\n".$creditdb."\r\n".$gpright;
	writeover(D_P.'data/bbscache/cache_read.php',"<?php\r\n".$readdb."\r\n?>");
}*/

function db_cv($array){
	if(is_array($array)){
		foreach($array as $key=>$value){
			$array[$key]=str_replace(array("\\","'"),array("\\\\","\'"),$value);
		}
	}
	return $array;
	
}
function key_cv($key){
	$key = str_replace(
		array(';','\\','/','(',')','$'),
		'',
		$key
	);
	return $key;
}
function pw_var_export($array,$c=1,$t='',$var=''){
	$c && $var="array(\r\n";
	$t.="\t";
	if(is_array($array)){
		foreach($array as $key => $value){
			$var.="$t'".str_replace(array("\\","'"),array("\\\\","\'"),$key)."'=>";
			if(is_array($value)){
				$var.="array(\r\n";
				$var=pw_var_export($value,0,$t,$var);
				$var.="$t),\r\n";
			} else{
				$var.="'".str_replace(array("\\","'"),array("\\\\","\'"),$value)."',\r\n";
			}
		}
	}
	if($c){
		$var.=")";
	}
	return $var;
}
?>