Tai - Think About It

php cache

admin — Wed, 16 Apr 2008 09:44:48 +0000


$url = 'http://www.site.com/file.php';

$dest_file = 'footercache.txt'; //be sure it is chmod-ed to 0666  !!
$pagesource = request_cache($url, $dest_file, 3600*24*7);

echo $pagesource;
function request_cache($url, $dest_file, $timeout=7200) {
 if(strlen($dest_file) > 100) $dest_file = substr($dest_file, 20, 60) . substr($dest_file, strlen($dest_file) - 4);//keep some chars and the probable extension
if(!file_exists($dest_file) || filemtime($dest_file) < (time()-$timeout)) {
 $data = @file_get_contents($url);

if ($data !== false) {
 $tmpf = tempnam('/tmp','YWS');

$fp = @fopen($tmpf,»w»);

@fwrite($fp, $data);

@fclose($fp);

if(file_exists($dest_file)) @unlink($dest_file);

rename($tmpf, $dest_file);
}else{
 touch($dest_file);//update its date only
}
} else {
 $data = file_get_contents($dest_file);
}

return($data);
}
?>



Common PHP functions
admin — Wed, 16 Apr 2008 09:44:46 +0000
function parse_input($var_array, $var_name){ if(!isset($var_array[$var_name])) return '';

 if(!is_array($var_array[$var_name])){  if (!get_magic_quotes_gpc()) {   $retVal = trim(addslashes($var_array[$var_name]));  } else {   $retVal = trim($var_array[$var_name]);  } }else{  if (!get_magic_quotes_gpc()) {   foreach ($var_array[$var_name] as $value){    $retVal[] = trim(addslashes($value));   }  } else {   foreach ($var_array[$var_name] as $value) {    $retVal[] = trim($value);   }  } } return $retVal;}

function dprint($var, $message = ''){ if(DEBUG){  echo(«DEBUG : $message\r\n»);  if(is_array($var) || is_object($var)){   print_r($var);  }else{   echo($var);  }  echo(«\r\n»); }}

function sql_date_format($sqldate, $format = 'M j, Y  g:i a'){ list($dy,$dm,$dd, $h,$m,$s) = sscanf($sqldate, «%4d-%2d-%2d %2d:%2d:%2d»); $str = date($format, mktime($h, $m, $s, $dm, $dd, $dy)); return $str;}



Menu at mouse cursor
admin — Wed, 16 Apr 2008 09:44:36 +0000
 


Used as:

Tags



RegEx email parser
admin — Wed, 16 Apr 2008 09:44:35 +0000
Split email formats in pieces through preg_match:
$str=' (|(([^a-zA-Z0-9_\-.]|)(.*?)(|[^a-zA-Z0-9_\-.]+?)([a-zA-Z0-9_\-.]+?)(|[^a-zA-Z0-9_\-.]+?)))(|[^a-zA-Z0-9_\-.])([a-zA-Z0-9_\-.]+?)(|[^a-zA-Z0-9_\-.])@(.+?)\.([^>]+)';



Format long texts
admin — Wed, 16 Apr 2008 09:44:34 +0000
/** * Cut a text so it won't have more than $max_length chars and any word should not have more than $max_word chars * * @param unknown_type $length_limit * @param unknown_type $length_word */function format_long_text($str, $max_length=99999, $max_word = 60){ //limit string length $has_tail = false; if(strlen($str) > $max_length){  $new_str = substr($str, 0, $max_length);  //search for non-alpha char  for($i = $max_length; $i < strlen($str) && ctype_alpha($str[$i]); $i++) $new_str .= $str[$i];  $str = $new_str;  $has_tail = true; }

 if(3 < $max_word && $max_word < $max_length){  do{   $words = explode(' ', $str);   $do_loop = false;   foreach ($words as $word){

    if(strlen($word) > $max_word){     //bug in IE: point followed by char does not split the text     $fixed_word = str_replace('.', '. ', $word);

     $new_word = '';     $j = 0;     for($i = 0; $i < strlen($fixed_word); $i++){      $j = (' ' == $fixed_word[$i]?0:$j+1);

      if(($j+1)%$max_word==0){       $new_word .= ' ' . $fixed_word[$i];      }else{       $new_word .= $fixed_word[$i];      }     }     $str = str_replace($word, $new_word, $str);     $do_loop = true;     break;    }   }  }while($do_loop); }

 return $str . ($has_tail?'..':'');}





Phrase to URL-format
admin — Wed, 16 Apr 2008 09:44:34 +0000
preg_replace('/[^a-zA-Z]+/','_',$phrase)



Instant popup on mouseover
admin — Wed, 16 Apr 2008 09:44:33 +0000



Usage:
click here



META tag library
admin — Wed, 16 Apr 2008 09:44:31 +0000
This library if for obtaining content for the META TAGS like keywords, description and also for computing tags to be used in searches based on the given text.
http://www.worldsview.com/metataggen_library.zip



Email validity check
admin — Wed, 16 Apr 2008 09:44:31 +0000
PHP code:
function is_email($email){   $x = '\d\w!\#\$%&\'*+\-/=?\^_`{|}~';    //just for clarity

   return count($email = explode('@', $email, 3)) == 2       && strlen($email[0]) < 65       && strlen($email[1]) < 256       && preg_match("#^[$x]+(\.?([$x]+\.)*[$x]+)?$#", $email[0])       && preg_match('#^(([a-z0-9]+-*)?[a-z0-9]+\.)+[a-z]{2,6}.?$#', $email[1]);}



switch order of two records in a table
admin — Wed, 16 Apr 2008 09:44:30 +0000
When in need to change the order of a list use a field to store the order as an int: 
Change the order of the records by switching the order value between consecutive elements.

case 'orderdown':case 'orderup':{ //get all list and retain two elements: if moveup operation then I keep prev and current  //otherwise I keep current and next $rec_list = $this->getChildren($record->id_parent);//all records on this level $switch = array(); for($i = 0; $i < count($rec_list) ; $i++){  if($rec_list[$i]['id'] == $record['id']){   if('orderup' == $what && $i != 0){    //not first    $switch[$rec_list[$i-1]['id']] = $rec_list[$i]['corder'];    $switch[$rec_list[$i]['id']] = $rec_list[$i-1]['corder'];    break;   }elseif('orderdown' == $what && $i != (count($rec_list)-1)){    //not last    $switch[$rec_list[$i+1]['id']] = $rec_list[$i]['corder'];    $switch[$rec_list[$i]['id']] = $rec_list[$i+1]['corder'];    break;   }  } }
   
   //valid elements found. Switch them if(count($switch) > 0){  foreach ($switch as $id=>$corder) {   $sql = "UPDATE page SET corder=$corder WHERE$id";   $result = mysql_query($sql) or die("SQL ERROR " . mysql_error() . " [$sql] on " . __FILE__ . " at line " . __LINE__);  } }