<?

function cache_write($dir,$filename,$content) {

	$dir_target = "cache/";
	
	foreach($dir as $dir_once) {
		$dir_target .= $dir_once."/";
		if(!is_dir($dir_target))
			mkdir($dir_target);
	}
	//print $dir_target.$filename;
	
	@unlink($dir_target.$filename);
	
	$handle = fopen($dir_target.$filename,"x+");
	fwrite($handle,$content);
	fclose($handle);

}
function cache_check($dir,$filename,$expire) {

	$dir_target = "cache/";

	foreach($dir as $dir_once) {
		$dir_target .= $dir_once."/";
	}

	if (file_exists($dir_target.$filename))
		if((time()-filemtime($dir_target.$filename))<$expire) {

			return true;
			}
	return false;


}

function cache_read($dir,$filename) {

	$dir_target = "cache/";

	foreach($dir as $dir_once) {
		$dir_target .= $dir_once."/";
	}
	if(filesize($dir_target.$filename)>0) {
		$handle = fopen($dir_target.$filename, "r");
		if(!($handle))
			return false;
		$contents = fread($handle, filesize($dir_target.$filename));
		fclose($handle);
	
		return $contents;
	}
	else
		return "";

}

function cache_delete($dir,$filename) {

	$dir_target = "../cache/";

	foreach($dir as $dir_once) {
		$dir_target .= $dir_once."/";
	}

	if(file_exists($dir_target.$filename)) {
		unlink($dir_target.$filename);
		return TRUE;
	}
	else
		return FALSE;
}

?>