tma/include/standard.inc.php
2020-11-29 11:25:34 +01:00

429 lines
14 KiB
PHP

<?php
// extract($themeset, EXTR_OVERWRITE);
// fonctions & icones par nitro skateboarding
// http://www.multimania.com/nskate
$souriez = array(
array("|:-)", "lunettes.gif"),
array(";-)", "clin.gif"),
array(";)", "clin.gif"),
array(";o)", "clin.gif"),
array(":-))", "dents.gif"),
array(":))", "dents.gif"),
array(":-)", "content.gif"),
array(":)", "content.gif"),
array(":-o", "couteau.gif"),
array(":o)", "debile.gif"),
array(":-((", "enerve.gif"),
array(":((", "enerve.gif"),
array(":-(", "decu.gif"),
array(":(", "decu.gif"),
array("8-)", "hallucine.gif"),
array(":-p", "langue.gif"),
array(";-(", "pleure.gif"),
array(";(", "pleure.gif"),
array(";o(", "pleure.gif")
);
// traitement des chaines - transformation des caractères
function parse_string($chaine)
{
include "include/theme.inc.php";
// smileys
global $souriez;
$traite = str_replace($souriez[0][0], "<img src='modules/share/".$souriez[0][1]."' border='0' alt='|:-&#41;' />", $chaine);
$traite = str_replace($souriez[1][0], "<img src='modules/share/".$souriez[1][1]."' border='0' alt=';-&#41;' />", $traite);
$traite = str_replace($souriez[2][0], "<img src='modules/share/".$souriez[2][1]."' border='0' alt=';&#41;' />", $traite);
$traite = str_replace($souriez[3][0], "<img src='modules/share/".$souriez[3][1]."' border='0' alt=';o&#41;' />", $traite);
$traite = str_replace($souriez[4][0], "<img src='modules/share/".$souriez[4][1]."' border='0' alt=':-&#41;&#41; /'>", $traite);
$traite = str_replace($souriez[5][0], "<img src='modules/share/".$souriez[5][1]."' border='0' alt=':&#41;&#41' />", $traite);
$traite = str_replace($souriez[6][0], "<img src='modules/share/".$souriez[6][1]."' border='0' alt=':-&#41;' />", $traite);
$traite = str_replace($souriez[7][0], "<img src='modules/share/".$souriez[7][1]."' border='0' alt=':&#41;' />", $traite);
$traite = str_replace($souriez[8][0], "<img src='modules/share/".$souriez[8][1]."' border='0' alt=':-o' />", $traite);
$traite = str_replace($souriez[9][0], "<img src='modules/share/".$souriez[9][1]."' border='0' alt=':o&#40; /'>", $traite);
$traite = str_replace($souriez[10][0], "<img src='modules/share/".$souriez[10][1]."' border='0' alt=':o&#40;&#40; /'>", $traite);
$traite = str_replace($souriez[11][0], "<img src='modules/share/".$souriez[11][1]."' border='0' alt=':&#40;&#40;' />", $traite);
$traite = str_replace($souriez[12][0], "<img src='modules/share/".$souriez[12][1]."' border='0' alt=':-&#40;' />", $traite);
$traite = str_replace($souriez[13][0], "<img src='modules/share/".$souriez[13][1]."' border='0' alt=':&#40;' />", $traite);
$traite = str_replace($souriez[14][0], "<img src='modules/share/".$souriez[14][1]."' border='0' alt='8-&#41' />", $traite);
$traite = str_replace($souriez[15][0], "<img src='modules/share/".$souriez[15][1]."' border='0' alt=':-p' />", $traite);
$traite = str_replace($souriez[16][0], "<img src='modules/share/".$souriez[16][1]."' border='0' alt=';-&#40;' />", $traite);
$traite = str_replace($souriez[17][0], "<img src='modules/share/".$souriez[17][1]."' border='0' alt=';-&#40;' />", $traite);
$traite = str_replace($souriez[18][0], "<img src='modules/share/".$souriez[18][1]."' border='0' alt=';-&#40;' />", $traite);
// liens
//$traite = ereg_replace("\n","<br />",$traite);
//$traite = ereg_replace("<url>","<a href=\"",$traite);
//$traite = ereg_replace("</url>","\">[Lien]</a>",$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";
else if ($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 = "<input name='theme' value='$theme' type=hidden>
<input name='section' value='$section' type=hidden>
<input name='page' value='$page' type=hidden>";
else if ($modulepage != "")
$formcaller = "<input name='theme' value='$theme' type=hidden>
<input name='modulepage' value='$modulepage' type=hidden>";
else
$formcaller = "<input name='theme' value='$theme' type=hidden>";
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;
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 "
<html>
<head>
<meta http-equiv='Content-Type' content='HTTP/1.0 401 Unauthorized' />
<title>Rapport d'erreur</title>
</head>
<body>
<h1><font color='red'>Erreur 401</font></h1>
<br />
<br />$msg_err<br />
<hr />
</body>
</html>";
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 = strftime ("%d/%m/%Y", time());
$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("&eacute;","é",$inputstring);
$outputstring = eregi_replace("&egrave;","è",$outputstring);
$outputstring = eregi_replace("&agrave;","à",$outputstring);
$outputstring = eregi_replace("&ugrave;","ù",$outputstring);
$outputstring = eregi_replace("&ocirc;","ô",$outputstring);
$outputstring = eregi_replace("&ecirc;","ê",$outputstring);
$outputstring = eregi_replace("&icirc;","î",$outputstring);
$outputstring = eregi_replace("&acirc;","â",$outputstring);
$outputstring = eregi_replace("&ucirc;","û",$outputstring);
$outputstring = eregi_replace("&iuml;","ï",$outputstring);
$outputstring = eregi_replace("&euml;","ë",$outputstring);
$outputstring = eregi_replace("&ccedil;","ç",$outputstring);
$outputstring = eregi_replace("&nbsp;"," ",$outputstring);
$outputstring = eregi_replace("&quot;","\"",$outputstring);
$outputstring = eregi_replace("&amp;","&",$outputstring);
return $outputstring;
}
// ------------------------------------------------------------------------- //
// Compteur de connectés //
// ------------------------------------------------------------------------- //
// Auteur: Merckel Loïc <loic@merckel.org> //
// 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;
}
?>