<?php
list($msec,$sec)=explode(chr(32),microtime());
$HeadTime=$sec+$msec;
header ("Content-type: text/vnd.wap.wml");
include ("config.php");
include ("conv.php");
$THIS_FILE = "files.php"; // путь к текущему файлу
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\">";
//php setlocale (LC_CTYPE, 'ru_RU.CP1251');
//function win2unicode ( $s ) { if ( (ord($s)>=192) & (ord($s)<=255) ) $hexvalue=dechex(ord($s)+848); if ($s=="Ё") $hexvalue="401"; if ($s=="ё") $hexvalue="451"; return("�".$hexvalue.";");}
//function translate($s) {return(preg_replace("/[А-яЁё]/e","win2unicode('\\0')",$s));}
//ob_start("translate");
// default
if(!isset($num)) $num = 0; // первая страница
if(!isset($inf)) $inf = false; // показать инфу о файле
if ($inf) $tmp = "инфо";
else $tmp = $name_title;
echo "<wml>\n".
"<head><meta http-equiv=\"Cache-Control\" content=\"no-cache\" forua=\"true\"/></head>\n".
"<card id=\"filo\" title=\"".$tmp."\">\n".
"<p align=\"center\"><small>\n";
$num2 = $nums;
$openfile = file($file_filo);
$openfile = array_reverse($openfile);
$total = count($openfile);
if(!$inf) { //главное окно (со ссылками)
if ($num == 0) // только на главной
echo "Bы мoжeтe зaгpyзить в этoт фaйлoбмeнник cвoи фaйлы (фoтo, игpы, mid, mmf и дp.)<br/>\n".
"Для этoгo нyжнo: нaбpaть нa PC aдpec <u>http://gta.4mak.net/upload/index.php</u> и зaгpyзить Baш фaйл !<br/>---<br/>\n";
// цикл по строкам файла файлообменника
for($i=$num; $i<min($num+$nums,$total); $i++) {
// 1- номер (порядок-с самого позднего) 2- путь(имя) 3-дата small
// 4- дата 5- размер 6- инфо файла 7- юзер 8- мыло юзера 9- инфо юзера 10- mime тип
list($no,$fname,$data_small,$data,$fsize,$file_info,$user,$user_mail,$user_info,$mime) = split("::",$openfile[$i]);
$tmp = round($fsize/1024,1);
// выводим ссылки на файлы
echo "<a href=\"".$fname."\">".$fname." </a> (".$tmp."kb) ".
"<a href=\"".$THIS_FILE."?no=".$i."&num=".$num."&inf=true\">[+] </a> - ".$data_small."<br/>\n";
} // end for
//навигация
$page_beg = 0;
$page_next = $num + $nums;
$page_prev = $num - $nums;
$page_next1 = $num + ($nums + $num2);
$page_prev1 = $num - ($nums + $num2);
$page_end = ceil($total/$nums)*$nums-$nums;
$num3 = $total - $num2;
$p=$page_next/$nums;
$d=$p+1;
$dd=$d+1;
$ddd=ceil($total/$nums);
$n=$p-1;
$nn=$n-1;
$nnn=1;
print "</small></p>\n";
print "<p align=\"center\"><small>\n";
//echo ",";
if ($num >= $nums*3)
echo "<a href=\"$THIS_FILE?num=$page_beg\">$nnn</a>,...,";
if ($num > $num2)
echo "<a href=\"$THIS_FILE?num=$page_prev1\">$nn</a>,";
if ($num >= $nums)
echo "<a href=\"$THIS_FILE?num=$page_prev\">$n</a>,";
echo "<b>$p</b>,";
if ($num + $nums < $total)
echo "<a href=\"$THIS_FILE?num=$page_next\">$d</a>,";
if ($num + $num2 < $num3)
echo "<a href=\"$THIS_FILE?num=$page_next1\">$dd</a>,";
if ($num + $nums*3 < $total)
echo "...,<a href=\"$THIS_FILE?num=$page_end\">$ddd</a>";
print "<br/>\n
Файлов: $total<br/>\n";
//if ($total == $totals) print " (max)";
} else { // окно с выводом инфы о выбранном линке
//$openfile = array_reverse($openfile); // т.к. в обратном порядке
for($i=$num; $i<($num+$nums); $i++) {
if ($no == $i)
// 1- номер (порядок-с самого позднего) 2- путь(имя) 3-дата small
// 4- дата 5- размер 6- инфо файла 7- юзер 8- мыло юзера 9- инфо юзера 10- mime тип
list($tmp,$fname,$data_small,$data,$fsize,$file_info,$user,$user_mail,$user_info,$mime) = split("::",$openfile[$no]);
} // end for
$tmp = round($fsize/1024,1);
// $tmp2 = date ("j.m.y (H:i)", fileatime($filename));
list($width, $height, $type, $attr) = getimagesize($fname);
if($width && $height) $tmp3 = " ".$width."x".$height;
echo "<a href=\"".$fname."\">Скачать!</a><br/>\n";
// выводим инфу офайле
echo "<b>Добавил</b>: ";
if ($user) echo conv("$user")." ";
else echo "- ";
if ($user_mail) echo "(".conv("$user_mail").")";
echo "<br/>\n";
echo "<b>Инфо</b>: ";
if ($file_info) echo conv("$file_info")."<br/>\n";
else echo "-"."<br/>\n";
//echo "<b>Mime тип</b>: ".$mime."<br/>\n";
echo "<b>Размер</b>: ".$tmp3." ".$fsize." byte"."<br/>\n".
"<b>Имя</b>: ".$fname."<br/>\n".
"<b>Выложен</b>: ".$data."<br/>\n";
echo "<a href=\"".$fname."\">Скачать!</a><br/>\n";
print "<anchor>Назад<prev/></anchor></small></p>\n";
print "<p align=\"center\"><small>\n";
echo "<a href=\"$THIS_FILE?num=$num\">".$name_title." (".($num + $nums)/$nums.")</a><br/>\n";
}
////counter
/*if ($num == 0 && !$inf) {
if (!file_exists($file_c_filo)) {
$all = 0;
$file = fopen ($file_c_filo, "w");
fputs($file,$all);
fclose ($file);
}
$n_array = file($file_c_filo);
$all = $n_array[0]+1;
$fp = fopen($file_c_filo,"w");
fputs($fp,$all);
fclose($fp);
echo "[".$all."]<br/>\n";
} else */
echo "<br/>\n";
echo "<a href=\"../\"> Главная</a><br/>\n";
if ($num == 0 && !$inf)
echo "_____<br/>\n".
"";
echo "</small></p>".
"</card></wml>";
?>