getenv("SERVER_NAME"),
"script_name" => getenv("SCRIPT_NAME"),
"request_uri" => getenv("REQUEST_URI"),
"remote_addr" => getenv("REMOTE_ADDR")
);
$self = str_replace('http://','',str_replace('http://www.','',$server['name']));
if (isset($_GET)) {
$get = $_GET;
$post = $_POST;
} elseif (isset($HTTP_GET_VARS)) {
$get = $HTTP_GET_VARS;
$post = $HTTP_POST_VARS;
}
if ($v['self']!=$self && $get['test']=='ok') {
//echo 'Этот инсталлятор был сгенерирован специально для '.$v['self'].'
Если Вы используете этот инсталлятор для другого сайта - он будет заблокирован
';
}
$t = explode('/',$server['script_name']);
$n = sizeof($t)-1;
unset($t[$n]);
$dir = implode('/',$t).'/';
$v['url'] = $dir.$v['script'];
if (!$get) {
echo '';
exit();
} elseif ($get['test']=='ok') {
$f = @fopen('http://'.$v['domain'].'/r2/test.txt','r');
if (!$f) {
echo 'у Вашего хостинга запрещены исходящие соединения, установка кода невозможна';
exit();
} else {
if (fread($f, 10) != 'okay') {
echo 'нет связи с '.$v['domain'].', установка кода невозможна';
exit();
}
}
$f = @fopen(".htaccess", "w");
if (!$f) {
echo 'нет прав на запись в папку, пожалуйста установите их и обновите эту страницу';
} else {
$htaccess_test = 'RewriteEngine on
RewriteBase '.$dir.'
RewriteRule ^'.$v['name'].'_([^\.]+)\. install.php?test=$1 [L]';
fputs($f, $htaccess_test);
fclose($f);
$f = @fopen('http://'.$server['name'].$dir.$v['name'].'_check.html','r');
if (!$f) {
$rewrite = -1;
} else {
if (fread($f, 10) != 'check') {
$rewrite = -1;
} else {
$rewrite = 1;
}
fclose($f);
}
unlink('.htaccess');
$f = @fopen('http://'.$v['domain'].'/r2/client/?a=code&dir='.urlencode($dir.$v['script']).'&rewrite='.$rewrite.'&base='.$v['b'].'&uid='.$v['u'].'&i='.$server['remote_addr'].'&vname='.$v['name'],'r');
if (!$f) {
echo 'нет связи с '.$v['domain'].', установка кода невозможна';
exit();
} else {
$code = fread($f,101011);
fclose($f);
$f = @fopen($v['script'], 'w');
fputs($f,$code);
fclose($f);
chmod($v['script'],0755);
if ($rewrite=='1') {
$f = @fopen(".htaccess", "w");
$htaccess = 'RewriteEngine on
RewriteBase '.$dir.'
RewriteRule ^'.$v['name'].'_([^\.]+)\. '.$v['script'].'?q=$1 [L]';
fputs($f, $htaccess);
fclose($f);
}
echo 'Установка кода успешно завершена, теперь необходимо установить ссылку на файл '.$v['script'].', для этого достаточно разместить код на главной странице: <A HREF="'.$v['url'].'">'.$v['link'].'</A>
';
unlink('install.php');
echo '
файл инсталлятора успешно удален из соображений безопасности';
$f = @fopen('http://'.$v['domain'].'/r2/client/?a=finish&dir='.urlencode($v['url']).'&base='.$v['b'].'&uid='.$v['u'].'&i='.$server['remote_addr'],'r');
fclose($f);
}
}
} elseif ($get['m']) {
echo $dir;
}else {
echo $get['test'];
}
?>