<?php
$str=trim($page[$i]);
if (strpos(' '.$str,'<i>')) $atr.='i;';
if (strpos(' '.$str,'<u>')) $atr.='u;';
if (strpos(' '.$str,'<b>')) $atr.='b';
if (strpos(' '.$str,'<big>')) $size='big';
elseif (strpos(' '.$str,'<small>')) $size='small';
else $size='normal';
$str=str_replace('<i>','',$str);$str=str_replace('</i>','',$str);
$str=str_replace('<u>','',$str);$str=str_replace('</u>','',$str);
$str=str_replace('<b>','',$str);$str=str_replace('</b>','',$str);
$str=str_replace('<big>','',$str);$str=str_replace('</big>','',$str);
$str=str_replace('<small>','',$str);$str=str_replace('</small>','',$str);
$stra=explode(' ',trim($str));
if (substr($str,-5)=='<br/>') {$br='¤';$str=substr($str,0,-5);} else $br='';
if (($param3=='ok')&&($stra[0]!='<card')&&($stra[0]!='<p')&&($stra[0]!='<!--'))
{
$page[$i]="<!-- delete -->\n";
$page=implode("",$page);
$fp = fopen ($userpath.$currentdir.$editfile.'.wml', "w+");
fwrite ($fp, $page);
fclose ($fp);
$param1=$param2=$param3='';
include($buildpath.'page_structure.php');
exit;
}
$head2=$head.$meta_nostore.cyr2utf('<card id="main" title="Удаление">'.
'<do name="m" type="options" label="Меню"><go href="?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/"/></do><p>'.
'<b>'.$editfile.'.wml</b>');
switch ($stra[0])
{
case '<card':
case '<p':
case '<!--':
$param2=$param3='';
include($buildpath.'page_element.php');
exit;
break;
case '<do':
$stra=explode('label="',$str);
$stra=explode('"',$stra[1]);
$caption=$stra[0];
$stra=explode('href="',$str);
$stra=explode('"',$stra[1]);
$link_=$stra[0];
print $head2.cyr2utf('<br/><u>Soft-кнопка</u>:<br/>URL: ').$link_.cyr2utf('<br/>Подпись: ').$caption.'<br/>';
break;
case '<br/>':
print $head2.cyr2utf('<br/><u>Перенос строки</u>.<br/>');
break;
case '</p><p':
print $head2.cyr2utf('<br/><u>Выравнивание</u> ');
if ($stra[1]=='align="center">') print cyr2utf('по центру<br/>');
elseif ($stra[1]=='align="right">') print cyr2utf('вправо<br/>');
else print cyr2utf('влево<br/>');
break;
case '<a':
$stra=explode('">',$str);
$strb=explode(' ',$stra[1]);
if ($strb[0]=='<img')
{
$stra=explode('" alt="',$stra[1]);
$stra=explode('"',$stra[1]);
print $head2.cyr2utf('<br/><u>Баннер</u>: ').$stra[0].'<br/>';
}
else
{
$stra=explode('">',$str);
$stra=explode('</a>',$stra[1]);
print $head2.cyr2utf('<br/><u>Ссылку</u>: ').$stra[0].'<br/>';
}
break;
case '<img':
$stra=explode('" alt="',$str);
$stra=explode('"',$stra[1]);
print $head2.cyr2utf('<br/><u>Картинку</u>: ').$str.'<br/>';
break;
case '<input':
$stra=explode('" name="',$str);
$stra=explode('"',$stra[1]);
print $head2.cyr2utf('<br/><u>Ввод</u>: ').$stra[0].'<br/>';
break;
case '<anchor':
$stra=explode('<anchor >',$str);
$stra=explode('<',$stra[1]);
print $head2.cyr2utf('<br/><u>Ссылку+</u>: ').$stra[0].'<br/>';
break;
case '<!--var':
$stra=explode('|',$str);
print $head2.cyr2utf('<br/><u>Переменную</u>: ').$stra[1].'<br/>';
break;
case '<!--r':
$str=substr($str,9);
if (strlen($str)>13) { $str=substr($str, 0, 10); $dot='...'; }
else $dot='';
$str=htmlspecialchars($str);
print $head2.cyr2utf('<br/><u>WML-код</u>: ').$str.$dot.'<br/>';
break;
default :
$str=str_replace('<i>','',$str);$str=str_replace('</i>','',$str);
$str=str_replace('<u>','',$str);$str=str_replace('</u>','',$str);
$str=str_replace('<b>','',$str);$str=str_replace('</b>','',$str);
$str=str_replace('<big>','',$str);$str=str_replace('</big>','',$str);
$str=str_replace('<small>','',$str);$str=str_replace('</small>','',$str);
print $head2.cyr2utf('<br/><u>Текст</u>: [').htmlspecialchars(cyr2utf(substr(utf2cyr(html_entity_decode($str, ENT_QUOTES)), 0, 10)), ENT_QUOTES).'...]<br/>';
break;
}
print cyr2utf('Действительно удалить?'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete/ok">Удалить</a>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'">Отмена</a><br/>'.
'</p></card></wml>');
exit;
?>