- <?php
- $param1=$param1+0;
- if ($param1<1) {$param1='';include($buildpath.'structure.php');exit;}
- for ($i=1;($i<sizeof($page)&&!((trim($page[$i])=='</p></card></wml>')));$i++);
- if ($param1>=$i) {$param1='';include($buildpath.'structure.php');exit;}
- $j=$i=$param1;
-
- if ($param2=='edit') {include($buildpath.'edit.php');exit;}
- if ($param2=='overwrite') {include($buildpath.'overwrite.php');exit;}
- if ($param2=='insert') {include($buildpath.'insert.php');exit;}
- if ($param2=='delete') {include($buildpath.'delelement.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>');
-
- $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.'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="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>');
- print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$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="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/softkey">Вставить кнопку</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
- break;
- case '<br/>':
- print $head2.cyr2utf('<br/><a href="#code">Переход на новую строку</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/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="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>');
- if ($j==$i) print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>');
- print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>');
- if ($j==$i) print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/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="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/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="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
- }
- break;
- case '<img':
- $stra=explode('" alt="',$str);
- $stra=explode('"',$stra[1]);
- print $head2.cyr2utf('<br/><a href="#code">Картинка</a>: "').$stra[0].cyr2utf('"'.
- $br.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/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="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/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="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/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="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/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=htmlspecialchars($str);
- print $head2.cyr2utf('<br/><a href="#code">Код</a>:<br/> ').$str.$dot.cyr2utf(''.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/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="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
- '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
- break;
- }
-
- print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'">Отмена</a>');
- print '</p></card>';
- print cyr2utf('<card id="code" title="Код элемента"><p><b><small>').$code.cyr2utf('</small></b> <br/> <br/> <a href="#main">Назад</a></p></card></wml>');
- exit;
- ?>