Просмотр файла includes/wap/builder/insert.php

<?php
if ($param3!='') {include($buildpath.'insert2.php');exit;}
 
$npage='';
$page_=file($userpath.$editfile.'.wml');
unset($page); array($page);
for ($i=0;$i<sizeof($page_);$i++) if (trim($page_[$i])!='') $page[]=trim($page_[$i])."\n";
$page[sizeof($page)-1]='</p></card></wml>';
for ($i=0;$i<sizeof($page);$i++)
	{
	if (substr(trim($page[$i]),0,12)=='<!-- cnt -->') {$page[$i]='<!-- delete -->';}
	if (($editfile=='index')&&(trim($page[$i])=='</p></card></wml>')) $npage.='<!-- cnt --><br/><a href="http://top.kmx.ru/'.$user.'"><img src="http://cnt.kmx.ru/'.$user.'" alt="TOP-KMX.Ru"/></a>'."\n".trim($page[$i])."\n";
	elseif (trim($page[$i])!='<!-- delete -->') $npage.=trim($page[$i])."\n";
	}
$fp = fopen ($userpath.$editfile.'.wml', "w+");
fwrite ($fp, $npage);
fclose ($fp);
$page=file($userpath.$editfile.'.wml');
for ($i=0;$i<sizeof($page);$i++) $page[$i]=trim($page[$i])."\n";
 
$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><br/>После');
 
$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='';
 
switch ($stra[0])
    {
    case '<card':
    case '<!--':
        $param2=$param3='';
        include($buildpath.'element.php');
        exit;
        break;
    case '<br/>':
        print $head2.cyr2utf('<br/><u>переноса строки</u><br/>');
        break;
    case '<p':
    case '</p><p':
        print $head2.cyr2utf('<br/><u>выравнивания</u> ');
        $stra=explode('align="',$str);
        $stra=explode('"',$stra[1]);
        $algn=$stra[0];
        if ($algn=='center') print cyr2utf('по центру<br/>');
        elseif ($algn=='right') print cyr2utf('вправо<br/>');
        else print cyr2utf('влево<br/>');
        break;
    case '<a':
        $stra=explode('">',$str);
        $strb=explode(' ',$stra[1]);
        if ($strb[0]=='<img')
            {
            $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 '<!--var':
        $stra=explode('|',$str);
        print $head2.cyr2utf('<br/><u>переменной</u> ').$stra[1].'<br/>';
        break;
    case '<anchor':
        $stra=explode('<anchor >',$str);
        $stra=explode('<',$stra[1]);
        print $head2.cyr2utf('<br/><u>ссылки</u> ').$stra[0].'<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/>';
#	default : print $head2.'<br/><u>Текст</u>: '.htmlspecialchars(substr(html_entity_decode($str), 0, 10)).'...]<br/>';
        break;
    }
 
print cyr2utf('вставить:<br/>'.
'<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/text">Текст</a><br/>'.
'<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/break">Перенос</a><br/>'.
'<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/align">Выравнивание</a><br/>'.
'<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/link">Ссылку</a><br/>'.
'<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/image">Рисунок</a><br/>'.
'<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/banner">Баннер,счетчик</a><br/>'.
'<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/input">Поле ввода</a><br/>'.
'<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/var">Пременную</a><br/>'.
'<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/anchor">Ссылку с парам.</a><br/>'.
'<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/code">WML-код</a><br/>'.
'<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'">Отмена</a><br/>'.
'</p></card></wml>');
exit;
?>