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

Размер файла: 7.79Kb
  1. <?php
  2. $page_=file($userpath.$currentdir.$editfile.'.wml');
  3. $page_[0]='<?xml version="1.0" encoding="Utf-8"?><!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.2//EN" "http://www.wapforum.org/DTD/wml_1.2.xml"><wml><head><meta forua="true" http-equiv="Cache-Control" content="max-age=0,proxy-revalidate,must-revalidate"/></head>';
  4. unset($page); array($page);
  5. for ($i=0;$i<sizeof($page_);$i++) if (trim($page_[$i])!='') $page[]=trim($page_[$i])."\n";
  6. $page[sizeof($page)-1]='</p></card></wml>';
  7.  
  8. $meta_nostore='<head><meta forua="true" http-equiv="Cache-Control" content="no-cache,no-store,must-revalidate"/></head>';
  9.  
  10. if ($param1!='') {include($buildpath.'page_element.php');exit;}
  11.  
  12. print $head.cyr2utf('<card id="main" title="Структура страницы">'.
  13. '<do name="x" type="options" label="xPanel"><go href="/?'.$id.'"/></do>'.
  14. '<do name="m" type="options" label="Менеджер"><go href="/?'.$id.'/pm'.$dmpage.$mpage.'"/></do>'.
  15. '<do name="n" type="options" label="Меню страницы"><go href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'"/></do>'.
  16. '<do name="s" type="options" label="Смотреть"><go href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/show"/></do>'.
  17. '<p align="center"><b>'.$editfile.'.wml<br/>---</b>');
  18.  
  19. if (($apage+0)>1) $tapage=$apage+0;
  20. else $tapage=1;
  21.  
  22. if ($tapage<2) $dapage=$apage='';
  23. else {$dapage='-';$apage=$apage+0;}
  24.  
  25. if ($tapage>1) print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit-'.($tapage-1).'">&lt;&lt;&lt;</a><br/>');
  26.  
  27. $nextpage=false;
  28. $i=0;
  29. $e=0;
  30. $cntpage=1;
  31. while (true)
  32. {
  33. $i++;
  34. $str=trim($page[$i]);
  35. if (substr($str,0,5)=='<!-- ') continue;
  36. if ($str=='</p></card></wml>') break;
  37. if ($i>sizeof($page)) break;
  38. $e++;
  39. if ( $e > 20 )
  40. {
  41. $cntpage++;
  42. $cntpage>
  43. $e=1;
  44. }
  45. if ($cntpage>$tapage) { $nextpage=true; break; }
  46. if ($cntpage!=$tapage) continue;
  47.  
  48. $str=str_replace('<i>','',$str);$str=str_replace('</i>','',$str);
  49. $str=str_replace('<u>','',$str);$str=str_replace('</u>','',$str);
  50. $str=str_replace('<b>','',$str);$str=str_replace('</b>','',$str);
  51. $str=str_replace('<big>','',$str);$str=str_replace('</big>','',$str);
  52. $str=str_replace('<small>','',$str);$str=str_replace('</small>','',$str);
  53.  
  54. $stra=explode(' ',trim($str));
  55.  
  56. if (substr($str,-5)=='<br/>') {$br='&#xA4;';$str=substr($str,0,-5);} else $br='';
  57.  
  58. switch ($stra[0])
  59. {
  60. case '<card':
  61. $stra=explode('" title="',$str);
  62. $stra=explode('"',$stra[1]);
  63. $str=$stra[0];
  64. $str=utf2cyr(html_entity_decode($str, ENT_QUOTES));
  65. if (strlen($str)>10) { $str=substr($str, 0, 7); $dot='...'; }
  66. else $dot='';
  67. $str=htmlspecialchars(cyr2utf($str), ENT_QUOTES);
  68. print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">Заголовок: ').$str.$dot.'</a>';
  69. break;
  70. case '<do':
  71. $stra=explode('label="',$str);
  72. $stra=explode('"',$stra[1]);
  73. $str=$stra[0];
  74. $str=utf2cyr(html_entity_decode($str, ENT_QUOTES));
  75. if (strlen($str)>10) { $str=substr($str, 0, 7); $dot='...'; }
  76. else $dot='';
  77. $str=htmlspecialchars(cyr2utf($str), ENT_QUOTES);
  78. print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">Soft-кнопка: ').$str.$dot.'</a>';
  79. break;
  80. case '<br/>':
  81. print '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">&#xA4;</a>';
  82. break;
  83. case '<p':
  84. case '</p><p':
  85. $stra=explode('align="',$str);
  86. $stra=explode('"',$stra[1]);
  87. $algn=$stra[0];
  88. $stra=explode('mode="',$str);
  89. $stra=explode('"',$stra[1]);
  90. $wrp=$stra[0];
  91. print '<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">';
  92. if ($algn=='center') $prnt='-=-';
  93. elseif ($algn=='right') $prnt='-==';
  94. else $prnt='==-';
  95. if ($wrp=='nowrap') $prnt='&lt;'.$prnt.'&gt;';
  96. print $prnt.'</a>';
  97. break;
  98. case '<a':
  99. $stra=explode('">',$str);
  100. $strb=explode(' ',$stra[1]);
  101. if ($strb[0]=='<img')
  102. {
  103. $stra=explode('" alt="',$stra[1]);
  104. $stra=explode('"',$stra[1]);
  105. $str=$stra[0];
  106. $str=utf2cyr(html_entity_decode($str, ENT_QUOTES));
  107. if (strlen($str)>10) { $str=substr($str, 0, 7); $dot='...'; }
  108. else $dot='';
  109. $str=htmlspecialchars(cyr2utf($str), ENT_QUOTES);
  110. print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">Баннер: "').$str.$dot.'"'.$br.'</a>';
  111. }
  112. else
  113. {
  114. $stra=explode('">',$str);
  115. $stra=explode('</a>',$stra[1]);
  116. $str=$stra[0];
  117. $str=utf2cyr(html_entity_decode($str, ENT_QUOTES));
  118. if (strlen($str)>10) { $str=substr($str, 0, 7); $dot='...'; }
  119. else $dot='';
  120. $str=htmlspecialchars(cyr2utf($str), ENT_QUOTES);
  121. print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">Ссылка: "').$str.$dot.'"'.$br.'</a>';
  122. }
  123. break;
  124. case '<img':
  125. $stra=explode('" alt="',$str);
  126. $stra=explode('"',$stra[1]);
  127. $str=$stra[0];
  128. $str=utf2cyr(html_entity_decode($str, ENT_QUOTES));
  129. if (strlen($str)>10) { $str=substr($str, 0, 7); $dot='...'; }
  130. else $dot='';
  131. $str=htmlspecialchars(cyr2utf($str), ENT_QUOTES);
  132. print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">Картинка: "').$str.$dot.'"'.$br.'</a>';
  133. break;
  134. case '<input':
  135. $stra=explode('name="',$str);
  136. $stra=explode('"',$stra[1]);
  137. $str=$stra[0];
  138. print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">Ввод: ').$str.$br.'</a>';
  139. break;
  140. case '<!--var':
  141. $stra=explode('|',$str);
  142. $str=$stra[1];
  143. print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">Переменная: ').$str.'</a>';
  144. break;
  145. case '<!--r':
  146. $str=substr($str,9);
  147. if (strlen($str)>13) { $str=substr($str, 0, 10); $dot='...'; }
  148. else $dot='';
  149. $str=str_replace('$','$$',htmlspecialchars($str));
  150. print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">WML-код: ').$str.'</a>';
  151. break;
  152. case '<anchor':
  153. $stra=explode('<anchor >',$str);
  154. $stra=explode('<',$stra[1]);
  155. $str=$stra[0];
  156. $str=utf2cyr(html_entity_decode($str, ENT_QUOTES));
  157. if (strlen($str)>10) { $str=substr($str, 0, 7); $dot='...'; }
  158. else $dot='';
  159. $str=htmlspecialchars(cyr2utf($str), ENT_QUOTES);
  160. print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">Ссылка+: "').$str.$dot.'"'.$br.'</a>';
  161. break;
  162. default :
  163. $str=utf2cyr(html_entity_decode($str, ENT_QUOTES));
  164. if (strlen($str)>10) { $str=substr($str, 0, 7); $dot='...'; }
  165. else $dot='';
  166. $str=htmlspecialchars(cyr2utf($str), ENT_QUOTES);
  167. print cyr2utf('<br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit'.$dapage.$apage.'/'.$i.'">Текст: ').$str.$dot.$br.'</a>';
  168. break;
  169. }
  170. }
  171.  
  172. if ($nextpage) print cyr2utf('<br/><br/><a href="/?'.$id.'/pm'.$dmpage.$mpage.'/'.$editfile.'/edit-'.($tapage+1).'">&gt;&gt;&gt;</a>');
  173.  
  174. #print '<a href="?'.$id.'/'.$editfile.'/copy">Отмена</a>';
  175. print '</p></card></wml>';
  176. exit;
  177. ?>