/**
 *  Function limpiarPTags
 *
 *   Elimina las etiquetas de parrafo <P> (sin parametros) y las sustituye por
 *   saltos de linea <BR />.
 *   En caso necesario inserta un <BR /> adicional para simular la separacion de
 *   parrafos.
 *   
 *   Parámetros:
 *   @param string $cadena -> texto a limpiar
 *   @param boolean $separar_parrafos -> separar parrafos ??
 *   @return string $cadena -> texto limpio
*/
    function limpiarPTags($cadena, $separar_parrafos = true)
    {
        $cadena = trim($cadena);
        $cadena = eregi_replace("^<p>","", $cadena);
        if ($separar_parrafos) {
            $cadena = eregi_replace("<p>","<br /><br />", $cadena);
        } else {
            $cadena = eregi_replace("<p>","<br />", $cadena);
        }
        $cadena = eregi_replace("</p>","", $cadena);
        return $cadena;
    }

function updateKillPoints($PlayerID) {
	$TKP = 0;
	$result = mysql_query("SELECT `KillID` FROM `Involved` WHERE `PlayerID` = '".$PlayerID."'");

	while($data = mysql_fetch_array($result)) {
		$KillID = $data['KillID'];

		$get_result = mysql_query("SELECT `ShipID` FROM `Kill` WHERE `KillID` = '".$KillID."'");

		while($get_kills = mysql_fetch_array($get_result)) {
			$ShipID = $get_kills['ShipID'];

			$get_points = mysql_query("SELECT `Points` FROM `Ship` WHERE `ShipID` = '".$ShipID."'");

			while($get_points = mysql_fetch_array($get_points)) {
				$TKP = $TKP + $get_points;
			}
		}
	}

	echo $TKP;
	#mysql_query("UPDATE Player SET KillPoints = ".$TKP." WHERE PlayerID = ".$PlayerID."");
}

// Affichage d'une chaine de la forme YYYYMMJJ
sprintf("%02d/%02d/%04d", substr($date,6,2), substr($date,4,2), substr($date,0,4));
// Chaine YYYYMMJJ representant la date 
$date_courante = date("YmdHis", time());
// Chaine YYYYMMJJ representant la date d'hier 
$date=date("Ymd", mktime(0, 0, 0, date("m") , date("d") - 1, date("Y")));

//h:m:s entre 2 dates 
$time_submitted=mktime(substr($bug["date_submitted"],11,2),substr($bug["date_submitted"],14,2),substr($bug["date_submitted"],17,2),substr($bug["date_submitted"],5,2),substr($bug["date_submitted"],8,2),substr($bug["date_submitted"],0,4));
$time_resolved=mktime(substr($bug["date_resolved"],11,2),substr($bug["date_resolved"],14,2),substr($bug["date_resolved"],17,2),substr($bug["date_resolved"],5,2),substr($bug["date_resolved"],8,2),substr($bug["date_resolved"],0,4));
$bug["time_to_resolve"]=calcul_hours($time_resolved-$time_submitted);

function calcul_hours($temps)
{
  //combien d'heures ?
  $hours = floor($temps / 3600);

  //combien de minutes ?
  $min = floor(($temps - ($hours * 3600)) / 60);
  if ($min < 10)
    $min = "0".$min;

  //combien de secondes
  $sec = $temps - ($hours * 3600) - ($min * 60);
  if ($sec < 10)
    $sec = "0".$sec;
        
  return $hours."h".$min."m".$sec."s";
}

//**** Extraction de la table et création du fichier CSV
$FileOut = "/data/web_dev/Voila_shopping/liens_voila.csv";
$sql="SELECT * FROM liens ORDER BY mot";
$TABLiens=$myDB_select->queryAllRecord($sql);

$fpout = fopen($FileOut, "w");
if(count($TABLiens)) foreach($TABLiens as $lien) {
	fwrite($fpout,$lien[mot].";".$lien[titre].";".$lien[descriptif].";".$lien[lien]."
");
}
fclose($fpout);

header("Location: identification.php3");

echo '<pre><br>';print_r($HTTP_POST_VARS);echo'</pre>';

echo "<PRE>";print_r($HTTP_COOKIE_VARS);echo "</PRE>";

//Merge XML/XSL
$ficXsl = '/www/docs/suivi_cmd/xsl/detail_commande_emballage.xsl';
$DomXml = domxml_open_mem(stripslashes($strXml),DOMXML_LOAD_PARSING + DOMXML_LOAD_COMPLETE_ATTRS + DOMXML_LOAD_SUBSTITUTE_ENTITIES + DOMXML_LOAD_DONT_KEEP_BLANKS);
$DomXsl = domxml_xslt_stylesheet_file($ficXsl);
$result = $DomXsl->process($DomXml);
$DomXml->free();
$result = $DomXsl->result_dump_mem($result);

// Vérifie la validité de l'email
function est_email ($adresse) { 
	$reg = "^[a-zA-Z0-9._-]+@[a-zA-Z0-9.-]*[.][a-z]{2,3}$";
	$email = ereg($reg,$adresse);
	if ($email) 
	{
		return TRUE;
	}
}

if (!est_email("http://caphar@lepotlatch.org")) 
{
	print "Ce n'est pas un e-mail";
}

// Renvoie "Ce n'est pas un e-mail"

// Coupe un texte à $longueur caractères, sur les espaces, et ajoute des points de suspension...
function tronque($chaine, $longueur = 120) 
{
 
	if (empty ($chaine)) 
	{ 
		return ""; 
	}
	elseif (strlen ($chaine) < $longueur) 
	{ 
		return $chaine; 
	}
	elseif (preg_match ("/(.{1,$longueur})\s./ms", $chaine, $match)) 
	{ 
		return $match [1] . "..."; 
	}
	else 
	{ 
		return substr ($chaine, 0, $longueur) . "..."; 
	}
}
print tronque("Ceci n'est pas un tuyau",12);
// Renvoie Ceci n'est pas...