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

Размер файла: 12.67Kb
  1. <?php
  2. $param1=$param1+0;
  3. if ($param1<1) {$param1='';include($buildpath.'structure.php');exit;}
  4. for ($i=1;($i<sizeof($page)&&!((trim($page[$i])=='</p></card></wml>')));$i++);
  5. if ($param1>=$i) {$param1='';include($buildpath.'structure.php');exit;}
  6. $j=$i=$param1;
  7.  
  8. if ($param2=='edit') {include($buildpath.'edit.php');exit;}
  9. if ($param2=='overwrite') {include($buildpath.'overwrite.php');exit;}
  10. if ($param2=='insert') {include($buildpath.'insert.php');exit;}
  11. if ($param2=='delete') {include($buildpath.'delelement.php');exit;}
  12.  
  13. $head2=$head.$meta_nostore.cyr2utf('<card id="main" title="Редактировать">'.
  14. '<do name="m" type="options" label="Страница"><go href="?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/"/></do><p>'.
  15. '<b>'.$editfile.'.wml</b>');
  16.  
  17. $j=$i=$param1;
  18. $str=trim($page[$i]);
  19. $code=str_replace('$','$$',stripslashes(htmlspecialchars($str)));
  20. $stra=explode(' ',$str);
  21. if (substr($str,-5)=='<br/>') {$br='<br/>С переносом';$str=substr($str,0,-5);} else $br='';
  22. switch ($stra[0])
  23. {
  24. case '<!--':
  25. $param1=$param2=$param3='';
  26. include($buildpath.'structure.php');
  27. case '<card':
  28. $stra=explode('" title="',$str);
  29. $stra=explode('"',$stra[1]);
  30. print $head2.cyr2utf('<br/><a href="#code">Заголовок</a>: ').$stra[0];
  31. $stra=explode('" ontimer="',$str);
  32. $stra=explode('"',$stra[1]);
  33. if ($stra[0]!='') print cyr2utf('<br/>+ переадресация');
  34. print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>');
  35. print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/softkey">Вставить кнопку</a>');
  36. break;
  37. case '<do':
  38. $stra=explode('label="',$str);
  39. $stra=explode('"',$stra[1]);
  40. $caption=$stra[0];
  41. $stra=explode('href="',$str);
  42. $stra=explode('"',$stra[1]);
  43. $link_=$stra[0];
  44. print $head2.cyr2utf('<br/><a href="#code">Soft-кнопка</a>:<br/>URL: ').$link_.cyr2utf('<br/>Подпись: ').$caption.cyr2utf(''.
  45. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
  46. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert/softkey">Вставить кнопку</a>'.
  47. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  48. break;
  49. case '<br/>':
  50. print $head2.cyr2utf('<br/><a href="#code">Переход на новую строку</a>'.
  51. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
  52. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
  53. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  54. break;
  55. case '<p':
  56. $i++;
  57. case '</p><p':
  58. print $head2.'<br/>';
  59. $stra=explode('align="',$str);
  60. $stra=explode('"',$stra[1]);
  61. $algn=$stra[0];
  62. $stra=explode('mode="',$str);
  63. $stra=explode('"',$stra[1]);
  64. $wrp=$stra[0];
  65. if ($algn=='center') print cyr2utf('<a href="#code">Выравнивание</a>: по центру');
  66. elseif ($algn=='right') print cyr2utf('<a href="#code">Выравнивание</a>: вправо');
  67. else print cyr2utf('<a href="#code">Выравнивание</a>: влево');
  68. if ($wrp=='nowrap') print cyr2utf(', <br/>неразрывные строки');
  69. print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>');
  70. if ($j==$i) print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>');
  71. print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>');
  72. if ($j==$i) print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  73. break;
  74. case '<a':
  75. $stra=explode('">',$str);
  76. $strb=explode(' ',$stra[1]);
  77. if ($strb[0]=='<img')
  78. {
  79. $stra=explode('href="',$str);
  80. $stra=explode('"',$stra[1]);
  81. $link_=$stra[0];
  82. $stra=explode('<img src="',$str);
  83. $stra=explode('"',$stra[1]);
  84. $imgurl=$stra[0];
  85. $stra=explode(' alt="',$str);
  86. $stra=explode('"',$stra[1]);
  87. $alttext=$stra[0];
  88. print $head2.cyr2utf('<br/><a href="#code">Баннер</a>:<br/>URL ссылки: ').$link_.cyr2utf('<br/>URL рисунка: ').$imgurl.cyr2utf('<br/>Подпись: ').$alttext.cyr2utf(''.
  89. $br.
  90. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
  91. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
  92. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
  93. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  94. }
  95. else
  96. {
  97. $stra=explode('href="',$str);
  98. $stra=explode('"',$stra[1]);
  99. $link_=$stra[0];
  100. $stra=explode('">',$str);
  101. $stra=explode('</a>',$stra[1]);
  102. $caption=$stra[0];
  103. print $head2.cyr2utf('<br/><a href="#code">Ссылка</a>:<br/>URL: ').$link_.cyr2utf('<br/>Подпись: ').$caption.cyr2utf(''.
  104. $br.
  105. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
  106. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
  107. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
  108. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  109. }
  110. break;
  111. case '<img':
  112. $stra=explode('" alt="',$str);
  113. $stra=explode('"',$stra[1]);
  114. print $head2.cyr2utf('<br/><a href="#code">Картинка</a>: "').$stra[0].cyr2utf('"'.
  115. $br.
  116. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
  117. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
  118. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
  119. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  120. break;
  121. case '<input':
  122. $stra=explode('title="',$str);
  123. $stra=explode('"',$stra[1]);
  124. $caption=$stra[0];
  125. $stra=explode('name="',$str);
  126. $stra=explode('"',$stra[1]);
  127. print $head2.cyr2utf('<br/><a href="#code">Ввод</a>: ').$stra[0].cyr2utf('<br/>Подпись: "').$caption.cyr2utf('"'.$br.
  128. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
  129. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
  130. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
  131. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  132. break;
  133. case '<anchor':
  134. $stra=explode('href="',$str);
  135. $stra=explode('"',$stra[1]);
  136. $link_=$stra[0];
  137. $stra=explode('<anchor >',$str);
  138. $stra=explode('<',$stra[1]);
  139. $caption=$stra[0];
  140. print $head2.cyr2utf('<br/><a href="#code">Ссылка+</a>:<br/>URL: ').$link_.cyr2utf('<br/>Подпись: "').$caption.cyr2utf('"'.$br.
  141. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
  142. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
  143. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
  144. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  145. break;
  146. case '<!--var':
  147. $str=explode('|',$str);
  148. print $head2.cyr2utf('<br/><a href="#code">Переменная</a>:<br/>Имя: ').$str[1].cyr2utf('<br/>Значение: "').$str[2].cyr2utf('"'.
  149. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
  150. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
  151. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
  152. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  153. $code=cyr2utf('Код данного элемента встраивается в код элемента "Ссылка+".');
  154. break;
  155. case '<!--r':
  156. $str=substr($str,9);
  157. $code=str_replace('$','$$',htmlspecialchars($str));
  158. if (strlen($str)>13) { $str=substr($str, 0, 10); $dot='...'; }
  159. else $dot='';
  160. $str=htmlspecialchars($str);
  161. print $head2.cyr2utf('<br/><a href="#code">Код</a>:<br/> ').$str.$dot.cyr2utf(''.
  162. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
  163. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
  164. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
  165. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  166. break;
  167. break;
  168. default :
  169. print $head2.cyr2utf('<br/><a href="#code">Текст</a>:');
  170. $atr='';
  171. if (strpos(' '.$str,'<i>')) $atr.='наклонный, ';
  172. if (strpos(' '.$str,'<u>')) $atr.='подчеркнутый, ';
  173. if (strpos(' '.$str,'<b>')) $atr.='полужирный, ';
  174. if (strpos(' '.$str,'<big>')) $atr.='крупный.';
  175. elseif (strpos(' '.$str,'<small>')) $atr.='мелкий.';
  176. else $atr.='обычный.';
  177. $str=str_replace('<i>','',$str);$str=str_replace('</i>','',$str);
  178. $str=str_replace('<u>','',$str);$str=str_replace('</u>','',$str);
  179. $str=str_replace('<b>','',$str);$str=str_replace('</b>','',$str);
  180. $str=str_replace('<big>','',$str);$str=str_replace('</big>','',$str);
  181. $str=str_replace('<small>','',$str);$str=str_replace('</small>','',$str);
  182. print cyr2utf('<br/>Атрибуты: '.$atr.
  183. '<br/>Текст: [').$str.cyr2utf(']'.
  184. $br.
  185. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/edit">Изменить</a>'.
  186. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/overwrite">Заменить</a>'.
  187. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/insert">Вставить</a>'.
  188. '<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$param1.'/delete">Удалить</a>');
  189. break;
  190. }
  191.  
  192. print cyr2utf('<br/><a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'">Отмена</a>');
  193. print '</p></card>';
  194. print cyr2utf('<card id="code" title="Код элемента"><p><b><small>').$code.cyr2utf('</small></b> <br/> <br/> <a href="#main">Назад</a></p></card></wml>');
  195. exit;
  196. ?>