PHP Decode

function getIP() {

  if (isset($_SERVER)) {
    if (isset($_SERVER['HTTP_X_FORWARDED_FOR'])) {
      return $_SERVER['HTTP_X_FORWARDED_FOR'];
    } else {
      return $_SERVER['REMOTE_ADDR'];
    }
  } else {
    if (isset($GLOBALS['HTTP_SERVER_VARS']['HTTP_X_FORWARDER_FOR'])) {
      return $GLOBALS['HTTP_SERVER_VARS']['HTTP_X_FORWARDED_FOR'];
    } else {
      return $GLOBALS['HTTP_SERVER_VARS']['REMOTE_ADDR'];
    }
  }

}

function CrearMiniaturas( $Archivo, $Ancho_IMG , $Altura_IMG, $NuevoNombre )
{
	  if (!$info = getimagesize($Archivo) ) return false;

	  $aspect = $info['0'] / $info['1'];

      if ($Ancho_IMG/$Altura_IMG > $aspect) {
         $Ancho_IMG = $Altura_IMG*$aspect;
      }
      else {
         $Altura_IMG = $Ancho_IMG/$aspect;
      }

	  //$Altura = round( $Ancho_IMG/$aspect);

      switch ($info['2'])
      {
        case 1:   //   gif -> jpg
          $src = @imagecreatefromgif($Archivo);
          break;
        case 2:   //   jpeg -> jpg
          $src = @imagecreatefromjpeg($Archivo);
          break;
        case 3:  //   png -> jpg
          $src = @imagecreatefrompng($Archivo);
          break;
      }

	  if ( !$src ) return false;

	  $tmp = @imagecreatetruecolor( $Ancho_IMG, $Altura_IMG );
	  imagecopyresampled( $tmp, $src, 0, 0, 0, 0, $Ancho_IMG, $Altura_IMG, $info[0], $info[1] );

	  imagejpeg( $tmp, $NuevoNombre, 100 );
	  imagedestroy( $src );
	  imagedestroy( $tmp );
	  return true;
}


function limpiar($texto){
   $texto = htmlspecialchars(trim(addslashes(stripslashes($texto))));
   $texto = str_replace(chr(160),'',$texto);
   return $texto;
}

function comprobar_email($email){
    $mail_correcto = 0; 
    //compruebo unas cosas primeras 
    if ((strlen($email) >= 6) && (substr_count($email,"@") == 1) && (substr($email,0,1) != "@") 
	    && (substr($email,strlen($email)-1,1) != "@")){ 
       if ((!strstr($email,"'")) && (!strstr($email,"\"")) && (!strstr($email,"\")) && (!strstr($email,"\$")) 
	      && (!strstr($email," "))) { 
          //miro si tiene caracter . 
          if (substr_count($email,".")>= 1){ 
             //obtengo la terminacion del dominio 
             $term_dom = substr(strrchr ($email, '.'),1); 
             //compruebo que la terminacin del dominio sea correcta 
             if (strlen($term_dom)>1 && strlen($term_dom)<5 && (!strstr($term_dom,"@")) ){ 
                //compruebo que lo de antes del dominio sea correcto 
                $antes_dom = substr($email,0,strlen($email) - strlen($term_dom) - 1); 
                $caracter_ult = substr($antes_dom,strlen($antes_dom)-1,1); 
                if ($caracter_ult != "@" && $caracter_ult != "."){ 
                   $mail_correcto = 1; 
                } 
             } 
          } 
       } 
    } 
    if ($mail_correcto) 
       return 1; 
    else 
       return 0; 
} 

function security(){

   $dominio = "http://".$_SERVER['HTTP_HOST'];
   $dominio = str_replace('http://elhueco.com.pe','http://www.elhueco.com.pe',$dominio);
   $URL1 = $dominio;
   $URL2 = "http://www.elhueco.com.pe";

   if($URL1 == $URL2){ $prueba = 1; }
   else{ $prueba = 0; }

   return $prueba;
}

function noUrl($url)   
{   
    $posicion = strrpos($url, "http://");
	if ($posicion === false) { 
		$validar = 0;// no se encontro...
	} 
	elseif ($posicion !== false) {
		$validar = 1;// si se encontro...
	} 
	
	return $validar;
} 

 
function limpiar_texto($cadena){

  $a = "";
  $b = "AAAAAAaaaaaaOOOOOOooooooEEEEeeeeCcIIIIiiiiUUUUuuuuyNn";
  $cadena = strtolower(strtr($cadena,$a,$b));
  $cadena = ereg_replace("[^A-Za-z0-9]", " ", $cadena);
  $cadena = str_replace(" ", "-", $cadena);

  // LIMPIANDO GUIONES CONSECUTIVOS
  do {
     $posicion = strrpos($cadena, "--");
     $cadena = str_replace("--","-",$cadena);
  }while ($posicion !== false);

  // VERIFICAR SI EL PRIMER CARACTER ES ' - '
  $evaluar1 = substr($cadena, 0, 1);
  if ($evaluar1 == '-'){ $cadena = substr($cadena,1,strlen($cadena)); }

  // VERIFICAR SI EL ULTIMO CARACTER ES ' - '
  $evaluar2 = substr($cadena, strlen($cadena)-1, 1);
  if ($evaluar2 == '-'){ $cadena = substr($cadena,0,strlen($cadena)-1); }

  // ELIMINANDO ALGUNOS ARTICULOS
  $Palabras = array("-al-","-las-","-la-","-que-","-los-","-de-","-en-","-a-","-sus-","-su-","-por-","-un-","-se-","-e-","-i-","-o-","-u-","-y-","-del-","-el-","-es-");
  for( $i=0;$i<count($Palabras);$i++ ){
     $cadena = str_replace($Palabras[$i],"-",$cadena);
  }

  return $cadena;

}

function my_browser(){

	if((ereg("Nav", $_SERVER["HTTP_USER_AGENT"])) || (ereg("Gold",
	$_SERVER["HTTP_USER_AGENT"])) || (ereg("X11",
	$_SERVER["HTTP_USER_AGENT"])) || (ereg("Mozilla",
	$_SERVER["HTTP_USER_AGENT"])) || (ereg("Netscape",
	$_SERVER["HTTP_USER_AGENT"])) and (!ereg("MSIE",
	$_SERVER["HTTP_USER_AGENT"]) and (!ereg("Konqueror",
	$_SERVER["HTTP_USER_AGENT"])))) $browser = "Netscape";


			elseif(ereg("MSIE", $_SERVER["HTTP_USER_AGENT"])) $browser = "MSIE";

			elseif(ereg("Lynx", $_SERVER["HTTP_USER_AGENT"])) $browser = "Lynx";

			elseif(ereg("Opera", $_SERVER["HTTP_USER_AGENT"])) $browser = "Opera";

			elseif(ereg("Netscape", $_SERVER["HTTP_USER_AGENT"])) $browser = "Netscape";

			elseif(ereg("Konqueror", $_SERVER["HTTP_USER_AGENT"])) $browser = "Konqueror";

			elseif((eregi("bot", $_SERVER["HTTP_USER_AGENT"])) ||
	(ereg("Google", $_SERVER["HTTP_USER_AGENT"])) || (ereg("Slurp",
	$_SERVER["HTTP_USER_AGENT"])) || (ereg("Scooter",
	$_SERVER["HTTP_USER_AGENT"])) || (eregi("Spider",
	$_SERVER["HTTP_USER_AGENT"])) || (eregi("Infoseek",
	$_SERVER["HTTP_USER_AGENT"]))) $browser = "Bot";

	else $browser = "Other";
	return $browser;

}

function Ver_Archivo($Size,$Type){

    $PE = 500 * 1024; // 500KB Convirtiendo a Bytes

    switch ($Type) { // Verificando TIPO
      case 'image/x-jpg': $bool = true; break;
      case 'image/jpeg': $bool = true; break;
      case 'image/pjpeg': $bool = true; break;
      case 'image/jpg':$bool = true; break;
      case 'image/gif':$bool = true; break;
      case 'image/png':$bool = true; break;
      case 'image/x-png':$bool = true; break;

      default:$bool = false; break;
    }

    if( $bool == true && $Size <= $PE ){
       $Reporte = '_CORRECTO_';
    }
    else{
       $Reporte = '_INCORRECTO_';
    }

    return $Reporte;
}

function Ver_Adjunto($Size,$Type){

    $PE = 800 * 1024;

    switch ($Type) {
      case 'application/pdf':$bool = true; break;
      case 'application/msword': $bool = true; break;            // Archivo .DOC
      case 'application/vnd.ms-excel': $bool = true; break;      // Archivo .XLS
      case 'application/vnd.ms-powerpoint': $bool = true; break; // Archivo .PPT
      case 'application/vnd.openxmlformats-officedocument.wordprocessingml.document': $bool = true; break; // Archivo .DOCX
	  case 'application/vnd.openxmlformats-officedocument.spreadsheetml.sheet': $bool = true; break; // Archivo .XLSX
	  case 'application/vnd.openxmlformats-officedocument.presentationml.presentation': $bool = true; break; // Archivo .PPTX 
      default:$bool = false; break;
    }

    if( $bool == true && $Size <= $PE ){ $Reporte = '_CORRECTO_'; }
    else{ $Reporte = '_INCORRECTO_'; }

    return $Reporte;
}

function DimensionarVideo($w,$h,$texto){

    $lista_palabras = array('width');

    for($i=0;$i<count($lista_palabras);$i++){
        $palabra = $lista_palabras[$i];
        $continuawhile = true;
        while($continuawhile){
            $posicion = stripos($texto,$palabra);
            if($posicion!==false){

                $texto = substr($texto, 0, $posicion )." xxxxx ".substr($texto, $posicion+24 );

            }else{
                $continuawhile = false;
            }
        }
    }
	$texto = str_replace(' xxxxx ','width="'.$w.'" height="'.$h.'"',$texto);
    $texto = str_replace('allowscriptaccess="always"></embed>','allowscriptaccess="always" wmode="transparent"></embed>',$texto);

    return $texto;
}

function Categoria($t){

 switch($t){
	case 1: $r='Actualidades'; break;
	case 2: $r='Ambiente Natural'; break;
	case 3: $r='Arte y Cultura'; break;
	case 4: $r='Cocina'; break;
	case 5: $r='Deportes'; break;
	case 6: $r='Politicas'; break;
	case 7: $r='Promociones'; break;
	case 8: $r='Salud'; break;
	case 9: $r='Tecnologicas'; break;
	default: $r='Vacio'; break;
 }

 return($r);

}