Размер файла: 2.65Kb
- <?php
- $fname=explode('.',$editfile);
- $name=$fname[0];
- $ext=$fname[1];
-
- $param1=strtolower(rus2tr(utf2cyr($param1)));
- $fname=explode('.',$param1);
- $name2=$fname[0];
- $ext2=$fname[1];
- if ($ext==$ext2) $param1=$name2;
-
- if ((strlen(trim(strtr(strtr(trim($param1),' ','^'),'0123456789-_abcdefghjiklmnopqrstuvwxyz',' ')))!=0)||(strlen($param1)>16))
- {
- print $head.cyr2utf('<card id="main" title="Переименовать"><p>'.
- '<b>'.$param1.'.'.$ext.' - недопустимое имя файла</b><br/>'.
- '<a href="http://wap.kmx.ru/?'.$id.'/fm'.$dmpage.$mpage.'/'.$editfile.'/rename">Отмена</a>'.
- '</p></card></wml>');
- exit;
- }
-
- if ($param1!='')
- {
- if (file_exists($userpath.$param1.'.'.$ext) && ($param2!='rewrite'))
- {
- print $head.cyr2utf('<card id="main" title="Переименовать"><p>'.
- '<b>Файл '.$param1.'.'.$ext.' уже существует, заменить?</b><br/>'.
- '<a href="http://wap.kmx.ru/?'.$id.'/fm'.$dmpage.$mpage.'/'.$editfile.'/rename/'.$param1.'/rewrite">Заменить</a><br/>'.
- '<a href="http://wap.kmx.ru/?'.$id.'/fm'.$dmpage.$mpage.'/'.$editfile.'/rename">Отмена</a>'.
- '</p></card></wml>');
- exit;
- }
-
- if ((!file_exists($userpath.$param1.'.'.$ext) && ($param2=='ok')) || (file_exists($userpath.$param1.'.'.$ext) && ($param2=='rewrite')))
- {
- @unlink($userpath.$param1.'.'.$ext);
- @copy($userpath.$editfile,$userpath.$param1.'.'.$ext);
- @unlink($userpath.$editfile);
- $editfile=$param1.'.'.$ext;
- $action='';
- include($buildpath.'menufile.php');
- exit;
- }
-
- print $head.cyr2utf('<card id="main" title="Переименовать"><p>'.
- '<b>Вы действительно хотите переименовать файл '.$editfile.' в '.$param1.'.'.$ext.'?</b><br/>'.
- '<a href="http://wap.kmx.ru/?'.$id.'/fm'.$dmpage.$mpage.'/'.$editfile.'/rename/'.$param1.'/ok">Переименовать</a><br/>'.
- '<a href="http://wap.kmx.ru/?'.$id.'/fm'.$dmpage.$mpage.'/'.$editfile.'">Отмена</a>'.
- '</p></card></wml>');
- exit;
- }
- else
- {
- for ($i=1;file_exists($userpath.'/file'.$i.'.'.$ext);$i++);
- print $head.cyr2utf('<card id="main" title="Переименовать"><p>'.
- '<b>'.$editfile.' переименовать в:</b><br/>'.
- '<input name="pg" type="text" title="Переименовать" value="file'.$i.'" maxlength="16"/><br/>'.
- '<anchor>Далее'.
- '<go href="http://wap.kmx.ru" method="post">'.
- '<postfield name="query" value="'.$id.'/fm'.$dmpage.$mpage.'/'.$editfile.'/rename/$(pg)"/>'.
- '</go>'.
- '</anchor><br/>'.
- '<a href="http://wap.kmx.ru/?'.$id.'/fm'.$dmpage.$mpage.'/'.$editfile.'">Отмена</a><br/>'.
- '</p></card></wml>');
- exit;
- }
- ?>