Просмотр файла wml.php

Размер файла: 1.81Kb
<?php
function wmlStart()
/*передает заголовок, и выводит шапку wml-страницы*/
{
header ("Content-type:text/vnd.wap.wml; charset=utf-8");
print '<?xml version="1.0" encoding="UTF-8"?>'.
'<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml">'.
'<wml><head><meta http-equiv="Cache-Control" content="no-cache" forua="true"/></head>';
}
function wmlEnd()
/*смысл очевиден*/
{
echo "</wml>";
}
function cardStart($id,$title)
/*смысл очевиден*/
{
return "<card id=\"$id\" title=\"$title\">";
}
function cardEnd()
{
echo "</p></card>";
}
function win2utf($t)
/*переводит текст из кодировки win-1251 в utf-8*/
{
$r=""; $i_end=strlen($t);
for ($i=0;$i<$i_end;$i++)
{
$cc=substr($t,$i,1); $c=ord($cc); $r.=($c>=192?chr(38).chr(35).($c+848).chr(59):$cc);
if($c==38)$r.='amp;';
}
return $r;
}
function mani($now){
/*принимает значение переменной $now
и заменяет его предыдущим значением*/
if($now==200)$now=100;
if($now==300)$now=200;
if($now==500)$now=300;
if($now==1000)$now=500;
if($now==2000)$now=1000;
if($now==4000)$now=2000;
if($now==8000)$now=4000;
if($now==16000)$now=8000;
if($now==32000)$now=16000;
if($now==64000)$now=32000;
if($now==125000)$now=64000;
if($now==250000)$now=125000;
if($now==500000)$now=250000;
if($now==1000000)$now=500000;
return $now;
}
function del()
/*функция читает файлы в каталоге name и удаляет те,
 время изменений которых превышает 10 минут*/
{
chdir("./name");
$startdir=opendir("."); /* начальная директория*/
while (false !== ($file = readdir($startdir)))
{
/*удаляем из проверки файлы "rekord.txt",".",".." и каталоги*/
if($file!="." and $file!=".." and $file!="rekord.txt" and $file!=".htaccess" and !is_dir($file))
if(time()-filemtime($file)>600)/*если со времени изменения прошло больше 10 мин*/
@unlink($file);/*удаляем такие файлы*/
}
closedir($startdir);
chdir("..");
}
?>