View file includes/wap/builder/delelement.php

<?php
$j=$i=$param1;
$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='&#xA4;';$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.$editfile.'.wml', "w+");
	fwrite ($fp, $page);
	fclose ($fp);
	$param1=$param2=$param3='';
	include($buildpath.'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.'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;
    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;
?>