Размер файла: 2.4Kb
- <?php
- $param1=strtolower(rus2tr(utf2cyr($param1)));
-
- $fname=explode('.',$param1);
- $name=$fname[0];
- $ext=$fname[1];
- if ($ext=='wml') $param1=$name;
-
- if ($param1!='')
- {
- if ((strlen(trim(strtr(strtr(trim($param1),' ','^'),'0123456789-_abcdefghjiklmnopqrstuvwxyz',' ')))!=0)||(strlen($param1)>16))
- {
- print $head.cyr2utf('<card id="main" title="Создать"><p>'.
- '<b>'.$param1.'.wml - недопустимое имя файла страницы</b><br/>'.
- '<b>Имя файла новой страницы:</b><br/>'.
- '<input name="pg'.$nocache.'" type="text" title="Имя страницы" value="page'.$i.'" maxlength="16"/><br/>'.
- '<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/index/new/$(pg'.$nocache.')/new/'.$nocache.'">Создать</a> <br/>'.
- '<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'">Отмена</a><br/>'.
- '</p></card></wml>');
- exit;
- }
- if ($query5!='') $nocache_=$query5+0;
- $fp = @fopen ($userpath."opeation.cache", "r");$testcache = trim(@fgets($fp, 10));@fclose ($fp);
- if ($nocache_!=$testcache)
- {
- if (file_exists($userpath.$currentdir.$param1.'.wml') && ($param2!='rewrite'))
- {
- print $head.cyr2utf('<card id="main" title="Создать"><p>'.
- '<b>Файл '.$param1.'.wml уже существует, очистить его?</b><br/>'.
- '<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/index/new/'.$param1.'/rewrite/'.$nocache.'">Очистить</a><br/>'.
- '<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'/index/new">Отмена</a>'.
- '</p></card></wml>');
- exit;
- }
-
- @unlink($userpath.$currentdir.$param1.'.wml');
- @copy($sitespath.'../_default/index.wml',$userpath.$currentdir.$param1.'.wml');
- @chmod($userpath.$currentdir.$param1.'.wml',0777);
- $fp = fopen ($userpath."opeation.cache", "w+");fwrite ($fp, $nocache_);fclose ($fp);
- }
- $editfile=$param1;
- $query2=$action='';
- include($buildpath.'page_menu.php');
- exit;
- }
- else
- {
- for ($i=1;file_exists($userpath.$currentdir.'page'.$i.'.wml');$i++);
- print $head.cyr2utf('<card id="main" title="Создать"><p>'.
- '<b>Имя файла новой страницы:</b><br/>'.
- '<input name="pg'.$nocache.'" type="text" title="Имя страницы" value="page'.$i.'" maxlength="16"/><br/>'.
- '<a href="/?'.$id.'/pm'.$dmpage.$mpage.'/index/new/$(pg'.$nocache.')/new/'.$nocache.'">Создать</a> <br/>'.
- '<a href="http://wap.kmx.ru/?'.$id.'/pm'.$dmpage.$mpage.'">Отмена</a><br/>'.
- '</p></card></wml>');
- exit;
- }
- ?>