", $chaine);
$traite = str_replace($souriez[1][0], "", $traite);
$traite = str_replace($souriez[2][0], "", $traite);
$traite = str_replace($souriez[3][0], "", $traite);
$traite = str_replace($souriez[4][0], "", $traite);
$traite = str_replace($souriez[5][0], "", $traite);
$traite = str_replace($souriez[6][0], "", $traite);
$traite = str_replace($souriez[7][0], "", $traite);
$traite = str_replace($souriez[8][0], "", $traite);
$traite = str_replace($souriez[9][0], "", $traite);
$traite = str_replace($souriez[10][0], "", $traite);
$traite = str_replace($souriez[11][0], "", $traite);
$traite = str_replace($souriez[12][0], "", $traite);
$traite = str_replace($souriez[13][0], "", $traite);
$traite = str_replace($souriez[14][0], "", $traite);
$traite = str_replace($souriez[15][0], "", $traite);
$traite = str_replace($souriez[16][0], "", $traite);
$traite = str_replace($souriez[17][0], "", $traite);
$traite = str_replace($souriez[18][0], "", $traite);
// liens
//$traite = ereg_replace("\n","
",$traite);
//$traite = ereg_replace("","","\">[Lien]",$traite);
// themes
global $theme;
$traite = ereg_replace("THEME_COURANT", $theme, $traite);
return $traite;
}
// renvoie la page ou le module en cours
// (nécessaire car netscape ne reconnait pas la constante __SELF__)
function caller()
{
include "include/theme.inc.php";
global $section;
global $page;
global $modulepage;
global $theme;
if (($section != "") && ($page != "")) {
$liencaller = "index.php?section=$section&page=$page&theme=$theme";
} elseif ($modulepage != "") {
$liencaller = "index.php?modulepage=$modulepage&theme=$theme";
} else {
$liencaller = "index.php?theme=$theme";
}
return $liencaller;
}
// renvoie la page ou le module en cours, à ajouter dans un formulaire
// (pour le passage de paramètres par méthode get)
function formcaller()
{
require_once "include/theme.inc.php";
global $section;
global $page;
global $modulepage;
global $theme;
if (($section != "") && ($page != "")) {
$formcaller = "
";
} elseif ($modulepage != "") {
$formcaller = "
";
} else {
$formcaller = "";
}
return $formcaller;
}
// formate un nombre pour stockage dans un fichier d'index
function splitchar($Number)
{
$byte = strval(dechex($Number));
switch(strlen($byte)) {
case 1:
$byte0 = $byte;
$byte1 = $byte2 = $byte3 = 0;
break;
case 2:
$byte0 = "$byte[0]$byte[1]";
$byte1 = $byte2 = $byte3 = 0;
break;
case 3:
$byte0 = "$byte[1]$byte[2]";
$byte1 = $byte[0];
$byte2 = $byte3 = 0;
break;
case 4:
$byte0 = "$byte[2]$byte[3]";
$byte1 = "$byte[0]$byte[1]";
$byte2 = $byte3 = 0;
break;
case 5:
$byte0 = "$byte[3]$byte[4]";
$byte1 = "$byte[1]$byte[2]";
$byte2 = $byte[0];
$byte3 = 0;
break;
case 6:
$byte0 = "$byte[4]$byte[5]";
$byte1 = "$byte[2]$byte[3]";
$byte2 = "$byte[0]$byte[1]";
$byte3 = 0;
// no break
case 7:
$byte0 = "$byte[5]$byte[6]";
$byte1 = "$byte[3]$byte[4]";
$byte2 = "$byte[1]$byte[2]";
$byte3 = $byte[0];
break;
case 8:
$byte0 = "$byte[6]$byte[7]";
$byte1 = "$byte[4]$byte[5]";
$byte2 = "$byte[2]$byte[3]";
$byte3 = "$byte[0]$byte[1]";
break;
default:
echo "depassement !!!!!!";
}
$string = sprintf("%c%c%c%c", hexdec($byte3), hexdec($byte2), hexdec($byte1), hexdec($byte0));
return $string;
}
// créé un fichier d'index
function strfile($FileName)
{
$Nb = 0;
$index[$Nb++] = "0";
$input = fopen("$FileName.csv", "r");
while ($data = fgetcsv($input, 10000, ",")) {
$index[$Nb++] = ftell($input);
}
fclose($input);
$index[--$Nb] = 0;
$output = fopen("$FileName.dat", "w");
fwrite($output, splitchar($Nb));
for ($i = 0 ; $i < $Nb ; $i++) {
fwrite($output, splitchar($index[$i]));
}
fclose($output);
}
// lit un fichier d'index et renvoie l'index correspondant au numéro d'enregistrement
function unstr($FileName, $Num)
{
if (!file_exists("$FileName.dat")) {
strfile($FileName);
}
$indexfile = fopen("$FileName.dat", "r");
$total = hexdec(bin2hex(fread($indexfile, 4)));
// echo $total;
if ($Num > $total) {
$Num = $total;
}
fseek($indexfile, ($Num * 4) + 4);
$pos = hexdec(bin2hex(fread($indexfile, 4)));
fclose($indexfile);
return $pos;
}
// retourne le nombre d'enregistrement d'après le fichier d'index
function gettotal($FileName)
{
if (!file_exists("$FileName.dat")) {
strfile($FileName);
}
$indexfile = fopen("$FileName.dat", "r");
return hexdec(bin2hex(fread($indexfile, 4)));
}
// compte le nombre d'enregistrement d'un fichier csv
function countcsv($File)
{
$max = 0;
$fd = fopen("$File.csv", "r");
while (fgetcsv($fd, 10000, ",")) {
$max++;
}
fclose($fd);
return $max;
}
// créé un fichier
function createfile($FileName)
{
$fp = fopen($FileName, "w+");
fclose($fp);
}
// affiche une erreur 401
function err401($msg_err)
{
echo "
Rapport d'erreur
Erreur 401
$msg_err
";
exit();
}
// affiche une demande de mot de passe suivant le fichier password.txt
function password($folder)
{
//************** indentification de l'utilisateur *************
$fd = fopen("$folder/password.txt", "r");
$titre = fgetcsv($fd, 10000, ",");
while($fd) {
$data = fgetcsv($fd, 10000, ",");
$login[$i] = $data[0];
$mdp[$i] = $data[1];
$bienvenue[$i] = parse_string(stripcslashes($data[2]));
}
fclose($fd);
// vide le cache
header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); // Date du passé
if (!isset($PHP_AUTH_USER)) {
header("WWW-Authenticate: Basic realm=\"iphp\" ");
err401("Action annulée");
} else {
if ($login[0] == $PHP_AUTH_USER) {
echo "bienvenue superuser !";
} else {
while (($login[$Cpt++] != $PHP_AUTH_USER) && ($mdp[$Cpt++] != $PHP_AUTH_PW));
echo "bienvenue user !";
}
}
}
// créé un fichier de log
function addlog($url)
{
$File = "/logs/".str_replace("/", "_", $url).".log";
// si le fichier n'existe pas, on le crée:
if (!file_exists("$File.csv")) {
createfile("$File.csv");
}
$date = date_format(date_create(), "d/m/Y");
$string = sprintf("\"".$date."\",\"".iheure()."\",\"".$_SERVER["REMOTE_ADDR"]."\",\"".$_SERVER["HTTP_REFERER"]."\",\"".$_SERVER["HTTP_USER_AGENT"]."\"\n");
$fp = fopen("$File.csv", "a");
fwrite($fp, $string);
fclose($fp);
strfile($File);
}
// convertit les entités HTML en charactères spéciaux
function html2ascii($inputstring)
{
$outputstring = eregi_replace("é", "é", $inputstring);
$outputstring = eregi_replace("è", "è", $outputstring);
$outputstring = eregi_replace("à", "à", $outputstring);
$outputstring = eregi_replace("ù", "ù", $outputstring);
$outputstring = eregi_replace("ô", "ô", $outputstring);
$outputstring = eregi_replace("ê", "ê", $outputstring);
$outputstring = eregi_replace("î", "î", $outputstring);
$outputstring = eregi_replace("â", "â", $outputstring);
$outputstring = eregi_replace("û", "û", $outputstring);
$outputstring = eregi_replace("ï", "ï", $outputstring);
$outputstring = eregi_replace("ë", "ë", $outputstring);
$outputstring = eregi_replace("ç", "ç", $outputstring);
$outputstring = eregi_replace(" ", " ", $outputstring);
$outputstring = eregi_replace(""", "\"", $outputstring);
$outputstring = eregi_replace("&", "&", $outputstring);
return $outputstring;
}
// ------------------------------------------------------------------------- //
// Compteur de connectés //
// ------------------------------------------------------------------------- //
// Auteur: Merckel Loïc //
// Web: http://www.merckel.org/spip //
// ------------------------------------------------------------------------- //
/*
Ce script permet de connaitre le nombre de visiteurs connectés sur une période
de temps donnée (i.e. permet de savoir combien il y a de visiteurs en ligne).
Ce script n'utilise pas de base de données. Il stocke les informations dans un
fichier .dat
*/
// $time est le temps en seconde à partir duquel on considère que
// le visiteur n'est plus connecté
// $text_color est la couleur d'affichage du compteur
// $filename est le nom du fichier créé pour stocker les informations
function nb_visiteurs_connecte($time, $filename = "/tmp/nbweb.dat")
{
$ip = getenv("REMOTE_ADDR");
$date = time();
$i = 0;
$ii = 0;
$bool = 0;
if(file_exists($filename)) {
if($fichier = fopen($filename, "r")) {
while(!feof($fichier)) {
$ligne = fgets($fichier, 4096);
$tab = explode("|", $ligne);
if($tab[1] > 0) {
$tab_de_tab[$i][0] = $tab[0];
$tab_de_tab[$i][1] = $tab[1];
$i++;
}
}
fclose($fichier);
}
}
for($j = 0;$j < $i;$j++) {
if(($date - chop($tab_de_tab[$j][1])) > $time) {
//on ne fait rien
} else {
$tab_de_tab_actualise[$ii][0] = $tab_de_tab[$j][0];
$tab_de_tab_actualise[$ii][1] = chop($tab_de_tab[$j][1]);
$ii++;
}
}
for($j = 0;$j < $ii;$j++) {
if($tab_de_tab_actualise[$j][0] == $ip) {
$bool = 1;
}
}
if($bool == 0) {
$tab_de_tab_actualise[$ii][0] = $ip;
$tab_de_tab_actualise[$ii][1] = $date;
$ii++;
}
if($fichier = fopen($filename, "w")) {
for($j = 0;$j < $ii;$j++) {
fputs($fichier, chop($tab_de_tab_actualise[$j][0]));
fputs($fichier, "|");
fputs($fichier, chop($tab_de_tab_actualise[$j][1]));
fputs($fichier, "\n");
}
fclose($fichier);
}
return $ii;
}