Просмотр архива Конструктор кмх


<?php

$param1=$param1+0;

if ($param1<1) {$param1='';include($buildpath.'page_structure.php');exit;}

for ($i=1;($i<sizeof($page)&&!((trim($page[$i])=='</p></card></wml>')));$i++);

if ($param1>=$i) {$param1='';include($buildpath.'page_structure.php');exit;}

$j=$i=$param1=$query3;



if ($param2=='edit')        {include($buildpath.'page_element_edit.php');exit;}

if ($param2=='overwrite')    {include($buildpath.'page_element_overwrite.php');exit;}

if ($param2=='insert')        {include($buildpath.'page_element_insert.php');exit;}

if ($param2=='delete')        {include($buildpath.'page_element_delete.php');exit;}



$head2=$head.$meta_nostore.cyr2utf('<card id="main" title="Элемент">'.

'<do name="x" type="options" label="xPanel"><go href="/?'.$id.'"/></do>'.

'<do name="m" type="options" label="Менеджер"><go href="/?'.$id.'/pm'.$dmpage.$mpage.'"/></do>'.

'<do name="n" type="options" label="Меню страницы"><go href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'"/></do>'.

'<do name="s" type="options" label="Структура"><go href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit"/></do>'.

'<p>'.

'<b>'.$editfile.'.wml</b>');



$j=$i=$param1;

$str=trim($page[$i]);

$code=str_replace('$','$$',stripslashes(htmlspecialchars($str)));

$stra=explode(' ',$str);

if (substr($str,-5)=='<br/>') {$br='<br/>С переносом';$str=substr($str,0,-5);} else $br='';

switch ($stra[0])

    {

    case '<!--':

        $param1=$param2=$param3='';

        include($buildpath.'page_structure.php');

    case '<card':

        $stra=explode('" title="',$str);

        $stra=explode('"',$stra[1]);

        print $head2.cyr2utf('<br/><a href="#code">Заголовок</a>: ').$stra[0];

        $stra=explode('" ontimer="',$str);

        $stra=explode('"',$stra[1]);

        if ($stra[0]!='') print cyr2utf('<br/>+ переадресация');

        print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>');

        print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/softkey">Вставить кнопку</a>');

        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/><a href="#code">Soft-кнопка</a>:<br/>URL: ').$link_.cyr2utf('<br/>Подпись: ').$caption.cyr2utf(''.

        '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.

        '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/softkey">Вставить кнопку</a>'.

        '<br/><a href="#delete">Удалить</a>');

        break;

    case '<br/>':

        print $head2.cyr2utf('<br/><a href="#code">Переход на новую строку</a>'.

        '<br/><anchor>Заменить<go href="#action"><setvar name="a" value="Выбранный элемент заменить на"/><setvar name="l" value="overwrite"/></go></anchor>'.

        '<br/><anchor>Вставить<go href="#action"><setvar name="a" value="После выбранного элемента вставить"/><setvar name="l" value="insert"/></go></anchor>'.

        '<br/><a href="#delete">Удалить</a>');

        break;

    case '<p':

        $i++;

    case '</p><p':

        print $head2.'<br/>';

        $stra=explode('align="',$str);

        $stra=explode('"',$stra[1]);

        $algn=$stra[0];

        $stra=explode('mode="',$str);

        $stra=explode('"',$stra[1]);

        $wrp=$stra[0];

        if ($algn=='center') print cyr2utf('<a href="#code">Выравнивание</a>: по центру');

        elseif ($algn=='right') print cyr2utf('<a href="#code">Выравнивание</a>: вправо');

        else print cyr2utf('<a href="#code">Выравнивание</a>: влево');

        if ($wrp=='nowrap') print cyr2utf(', <br/>неразрывные строки');

                    print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>');

        if ($j==$i) print cyr2utf('<br/><anchor>Заменить<go href="#action"><setvar name="a" value="Выбранный элемент заменить на"/><setvar name="l" value="overwrite"/></go></anchor>');

                    print cyr2utf('<br/><anchor>Вставить<go href="#action"><setvar name="a" value="После выбранного элемента вставить"/><setvar name="l" value="insert"/></go></anchor>');

        if ($j==$i) print cyr2utf('<br/><a href="#delete">Удалить</a>');

        break;

    case '<a':

        $stra=explode('">',$str);

        $strb=explode(' ',$stra[1]);

        if ($strb[0]=='<img')

            {

            $stra=explode('href="',$str);

            $stra=explode('"',$stra[1]);

            $link_=$stra[0];

            $stra=explode('<img src="',$str);

            $stra=explode('"',$stra[1]);

            $imgurl=$stra[0];

            $stra=explode(' alt="',$str);

            $stra=explode('"',$stra[1]);

            $alttext=$stra[0];

            print $head2.cyr2utf('<br/><a href="#code">Баннер</a>:<br/>URL ссылки: ').$link_.cyr2utf('<br/>URL рисунка: ').$imgurl.cyr2utf('<br/>Подпись: ').$alttext.cyr2utf(''.

            $br.

            '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.

            '<br/><anchor>Заменить<go href="#action"><setvar name="a" value="Выбранный элемент заменить на"/><setvar name="l" value="overwrite"/></go></anchor>'.

            '<br/><anchor>Вставить<go href="#action"><setvar name="a" value="После выбранного элемента вставить"/><setvar name="l" value="insert"/></go></anchor>'.

            '<br/><a href="#delete">Удалить</a>');

            }

        else

            {

            $stra=explode('href="',$str);

            $stra=explode('"',$stra[1]);

            $link_=$stra[0];

            $stra=explode('">',$str);

            $stra=explode('</a>',$stra[1]);

            $caption=$stra[0];

            print $head2.cyr2utf('<br/><a href="#code">Ссылка</a>:<br/>URL: ').$link_.cyr2utf('<br/>Подпись: ').$caption.cyr2utf(''.

            $br.

            '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.

            '<br/><anchor>Заменить<go href="#action"><setvar name="a" value="Выбранный элемент заменить на"/><setvar name="l" value="overwrite"/></go></anchor>'.

            '<br/><anchor>Вставить<go href="#action"><setvar name="a" value="После выбранного элемента вставить"/><setvar name="l" value="insert"/></go></anchor>'.

            '<br/><a href="#delete">Удалить</a>');

            }

        break;

    case '<img':

        $stra=explode('<img src="',$str);

        $stra=explode('"',$stra[1]);

        $imgurl=$stra[0];

        $stra=explode(' alt="',$str);

        $stra=explode('"',$stra[1]);

        $alttext=$stra[0];

        print $head2.cyr2utf('<br/><a href="#code">Картинка</a>:<br/>URL рисунка: ').$imgurl.cyr2utf('<br/>Подпись: ').$alttext.cyr2utf(''.

        $br.

        '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.

        '<br/><anchor>Заменить<go href="#action"><setvar name="a" value="Выбранный элемент заменить на"/><setvar name="l" value="overwrite"/></go></anchor>'.

        '<br/><anchor>Вставить<go href="#action"><setvar name="a" value="После выбранного элемента вставить"/><setvar name="l" value="insert"/></go></anchor>'.

        '<br/><a href="#delete">Удалить</a>');

        break;

    case '<input':

        $stra=explode('title="',$str);

        $stra=explode('"',$stra[1]);

        $caption=$stra[0];

        $stra=explode('name="',$str);

        $stra=explode('"',$stra[1]);

        print $head2.cyr2utf('<br/><a href="#code">Ввод</a>: ').$stra[0].cyr2utf('<br/>Подпись: "').$caption.cyr2utf('"'.$br.

        '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.

        '<br/><anchor>Заменить<go href="#action"><setvar name="a" value="Выбранный элемент заменить на"/><setvar name="l" value="overwrite"/></go></anchor>'.

        '<br/><anchor>Вставить<go href="#action"><setvar name="a" value="После выбранного элемента вставить"/><setvar name="l" value="insert"/></go></anchor>'.

        '<br/><a href="#delete">Удалить</a>');

        break;

    case '<anchor':

        $stra=explode('href="',$str);

        $stra=explode('"',$stra[1]);

        $link_=$stra[0];

        $stra=explode('<anchor >',$str);

        $stra=explode('<',$stra[1]);

        $caption=$stra[0];

        print $head2.cyr2utf('<br/><a href="#code">Ссылка+</a>:<br/>URL: ').$link_.cyr2utf('<br/>Подпись: "').$caption.cyr2utf('"'.$br.

        '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.

        '<br/><anchor>Заменить<go href="#action"><setvar name="a" value="Выбранный элемент заменить на"/><setvar name="l" value="overwrite"/></go></anchor>'.

        '<br/><anchor>Вставить<go href="#action"><setvar name="a" value="После выбранного элемента вставить"/><setvar name="l" value="insert"/></go></anchor>'.

        '<br/><a href="#delete">Удалить</a>');

        break;

    case '<!--var':

        $str=explode('|',$str);

        print $head2.cyr2utf('<br/><a href="#code">Переменная</a>:<br/>Имя: ').$str[1].cyr2utf('<br/>Значение: "').$str[2].cyr2utf('"'.

        '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.

        '<br/><anchor>Заменить<go href="#action"><setvar name="a" value="Выбранный элемент заменить на"/><setvar name="l" value="overwrite"/></go></anchor>'.

        '<br/><anchor>Вставить<go href="#action"><setvar name="a" value="После выбранного элемента вставить"/><setvar name="l" value="insert"/></go></anchor>'.

        '<br/><a href="#delete">Удалить</a>');

        $code=cyr2utf('Код данного элемента встраивается в код элемента "Ссылка+".');

        break;

    case '<!--r':

        $str=substr($str,9);

        $code=str_replace('$','$$',htmlspecialchars($str));

        if (strlen($str)>13) { $str=substr($str, 0, 10); $dot='...'; }

        else $dot='';

        $str=str_replace('$','$$',htmlspecialchars($str));

        print $head2.cyr2utf('<br/><a href="#code">Код</a>:<br/> ').$str.$dot.cyr2utf(''.

        '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.

        '<br/><anchor>Заменить<go href="#action"><setvar name="a" value="Выбранный элемент заменить на"/><setvar name="l" value="overwrite"/></go></anchor>'.

        '<br/><anchor>Вставить<go href="#action"><setvar name="a" value="После выбранного элемента вставить"/><setvar name="l" value="insert"/></go></anchor>'.

        '<br/><a href="#delete">Удалить</a>');

        break;

        break;

    default :

        print $head2.cyr2utf('<br/><a href="#code">Текст</a>:');

        $atr='';

        if (strpos(' '.$str,'<i>')) $atr.='наклонный, ';

        if (strpos(' '.$str,'<u>')) $atr.='подчеркнутый, ';

        if (strpos(' '.$str,'<b>')) $atr.='полужирный, ';

        if (strpos(' '.$str,'<big>')) $atr.='крупный.';

        elseif (strpos(' '.$str,'<small>')) $atr.='мелкий.';

        else $atr.='обычный.';

        $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 cyr2utf('<br/>Атрибуты: '.$atr.

        '<br/>Текст: [').$str.cyr2utf(']'.

        $br.

        '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.

        '<br/><anchor>Заменить<go href="#action"><setvar name="a" value="Выбранный элемент заменить на"/><setvar name="l" value="overwrite"/></go></anchor>'.

        '<br/><anchor>Вставить<go href="#action"><setvar name="a" value="После выбранного элемента вставить"/><setvar name="l" value="insert"/></go></anchor>'.

        '<br/><a href="#delete">Удалить</a>');

        break;

    }



print cyr2utf(' <br/> <br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'">К структуре страницы</a>');

print '</p></card>';



if (strlen($code)>700) $code=htmlspecialchars(cyr2utf(utf2cyr(html_entity_decode(substr($code,0,700), ENT_QUOTES))), ENT_QUOTES).cyr2utf('... и т.д.');

print cyr2utf('<card id="code" title="Код элемента"><p><b><small>').$code.cyr2utf('</small></b> <br/> <br/> <a href="#main">Назад</a></p></card>');



print cyr2utf('<card id="delete" title="Удаление элемента"><p><b>Действительно удалить?</b> <br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete/ok">Удалить</a> <br/>'.

'<a href="#main">Отмена</a>'.

'</p></card>');



print cyr2utf('<card id="action" title="Вставка/замена элемента"><p><b>$(a):</b> <br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/$(l)/text">Текст</a><br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/$(l)/break">Перенос</a><br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/$(l)/align">Выравнивание</a><br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/$(l)/link">Ссылку</a><br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/$(l)/image">Рисунок</a><br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/$(l)/banner">Баннер,счетчик</a><br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/$(l)/input">Поле ввода</a><br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/$(l)/var">Пременную</a><br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/$(l)/anchor">Ссылку с парам.</a><br/>'.

'<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/$(l)/code">WML-код</a><br/>'.

'<br/>'.

'<a href="#main">Отмена</a>'.

'</p></card>');

print '</wml>';

exit;

?>