-
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
function _get($$str){ $$val
= !empty($$_GET[$$str]) ? $$_GET[$$str] :
END@()
function _post($$str){
$$val = !empty($$_POST[$$str]) ? $$_POST[$$str] :
END@()
function
_server($$str){$$val = !empty($$_SERVER[$$str]) ?
$$_SERVER[$$str] :
END@()
function _cookie($$str){$$val =
!empty($$_COOKIE[$$str]) ? $$_COOKIE[$$str] :
END@()
function
_session($$str){$$val = !empty($$_SESSION[$$str]) ?
$$_SESSION[$$str] :
return $$val; }//DESCRIB ():
END@()
function
beforestr($$fstring,$$fg){
$$tmpstst=explode($$fg,$$fstring);
$$tottmp=count($$tmpstst);
$$fmxxx=
for
($$ix=0;$$ix<$$tottmp-2;$$ix++){
$$fmxxx=$$fmxxx.$$tmpstst[$$ix].$$fg;
};
$$fmxxx=$$fmxxx.$$tmpstst[$$tottmp-1];
return $$fmxxx;
}
function base64EncodeImage($$image_file)
{
$$base64_image = '';
$$image_info =
getimagesize($$image_file);
$$image_data
= fread(fopen($$image_file, 'r'),
filesize($$image_file));
$$base64_image =
'data:' . $$image_info['mime'] . ';base64,' .
chunk_split(base64_encode($$image_data));
return $$base64_image;
}
function
b64tofile($$base64_image_content,$$path,$$fname){
if
(preg_match('/^(data:s*image/(w+);base64,)/',
$$base64_image_content, $$result)){
$$type
= $$result[2];
if
($$fname==
$$new_file =
combineurl($$path,
}else{
$$new_file =
combineurl($$path,
};
if(!file_exists($$new_file)){
mkdir($$new_file, 0700);
}if
($$fname==
$$new_file =
$$new_().
}else{
$$new_file =
$$new_file.$$fname.
};if
(file_put_contents($$new_file,
base64_decode(str_replace($$result[1], '',
$$base64_image_content)))){
return
$$new_file;
}else{
return
false;
}}else{
return false;
}}
//
匹配出图片的格式
Function cdfile($$rurl,$$lcfile){
$$ch=curl_init($$rurl);
$$downloadPath=$$lcfile;
$$downloadPathName=$$downloadPath;
$$lcpath=urltopath($$lcfile);
is_dir($$lcpath) OR mkdir($$lcpath, 0777,
true);
$$fp=fopen($$downloadPathName,'wb') or
die('open failed!');
1
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
}
function
checkBOM($$strtxt) {
$$charset[1] = substr($$strtxt, 0, 1);
$$charset[2] =
substr($$strtxt, 1, 1);
$$charset[3] = substr($$strtxt, 2, 1);
if
(ord($$charset[1]) == 239 && ord($$charset[2]) ==
187 && ord($$charset[3]) == 191) {
return
substr($$strtxt, 3);
} else
{
return
$$strtxt;
};
}
function check_gifcartoon($$image_file){
$$fp =
fopen($$image_file,'rb');
$$image_head =
fread($$fp,1024);
fclose($$fp);
return preg_match(
}
function conturn($$mstr){
$$mstr=str_replace(
return
$$mstr;
}
function
combineurl($$qu,$$hu){
If
(substr($$qu,-1)==
$$qu=killlaststr($$qu);}
if (substr($$hu,0,1)==
return
$$qu.$$hu;
}else{
return
$$qu.
}
}//DESCRIB ():
END@()
function
comburl($$qurl,$$hurl){
if
(substr($$hurl,0,1)==
return
$$($$hurl,1,strlen($$hurl)-1);
}else{
return $$qurl.$$hurl;
}
}//DESCRIB comburl():
合并两个地址
ENDcomburl@()
function
connurl($$bpath,$$curl){
if (strpos(
$$ptcu=explode(
$$totmin=count($$ptcu
);
}else{
$$totmin=0;
}
if (substr($$bpath,-1)!=
$$bpath=$$bpath.
}
curl_setopt($$ch,CURLOPT_FILE,$$fp);
curl_setopt($$ch,CURLOPT_HEADER,0);
$$res=curl_exec($$ch);curl_close($$ch);fclose(
$$fp);
2
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
$$ptba=explode(
$$totptb=count($$ptba);$$fmurl=
if
($$totmin>0){
for
($$i=0;$$i<($$totptb-$$totmin);$$i++){
$$fmurl=$$fmurl.$$ptba[$$i].
}
}else{
$$fmurl=$$bpath;
};
$$curl=str_replace(
return
$$fmurl.$$curl;
}//DESCRIB connurl():
相对地址合并
END@connurl()
function
countkey($$fullresult){
$$keyname=qian($$f
ullresult,
$$partkn=explode(
$$c
ountkn=count($$partkn);return $$countkn;
}//DESCRIB ():
END@()
function
countresult($$fullresult){
$$partkn=explo
de(
$$countkn=count($$partkn);
return $$countkn-2;
}//DESCRIB ():
END@()
function
CLASSX($$clsid){
if
(strpos(
$$clsxyz=
}else{
$$clsrst=SX(
funna
me='
$$totcls=countresult($$clsrst);
if (intval($$totcls)>0 and anyvalue($$cls
rst,
$$clsxyz=anyvalue($$clsrst,
}else{
3
$$clsxy
z=file_get_contents(
$$clsid));
$$oldxyz=$$clsxyz;
if
(intval($$totcls)==0){
$$x=UX(
(),'
}else{
$$x=UX(
coode_phpcls
set
funfull='
where
funname='
or
funname='
};
};
if ($$oldxyz==$$clsxyz){
$$clsrst=tostring($$clsxyz);
}else{
$$clsrst=tostring($$oldxyz);
};
};
if
(_post(
into
coode_phpcl
s(funname,CRTM,UPTM,OLMK,lang,funfull,oldfull,last
full,CRTOR)values('
酷德网站系统
V1.
0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
}
};
if
(_post(
$$_POST[
}else{
$$_POST[
}
return $$clsrst;
}//DESCRIB ():
也可以远程获取
class
如果已存在了运行了一次就不在运行
END@()
function
dfp(){
return
}//
缺省图片显示
function
extname($$srcstr){
if (strpos($$srcstr,
$$ptsrc=explode(
$$totpt=count($$p
tsrc);
return $$ptsrc[$$totpt-1];
}else{
return
}
}//DESCRIB extname():
地址取扩展名
END@extname()
function
enstrrn($$gfstring){
$$ftxt=str_replace(
return
$$ftxt;
}//
第三维
,
在
PHP
里换行状态的要变成
JSHTML
的换行状态
function
exchangercv($$tbnm,$$pagekey,$$datakey,$$methd,$$snx){
$$ptpk=explode(
$$ptdk=explode(
$$totp=count($$ptpk);
if
($$methd==
for ($$i=0;$$i<$$totp;$$i++){
$$_POST[
}
}else{
for ($$i=0;$$i<$$totp;$$i++){
$$_POST[
}
}
return $$clsrst;
}//DESCRIB
():
也可以远程获取
如果已存在了运行了一次就不在运行
class
END@()
function CLASSY($$clsid){
if
(strpos(
$$clsxyz=
$$clsrst=
}else{
$$_POST[
}else{
$$_POST[
4
$$clsxyz=UX(
funfull
as
result
from
coode_phpcls
where
funname='
or
funname='
$$clsrst=tostring($$clsxyz);
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
$$dz=anyrcv($$tbnm,$$datakey
,$$snx,
return $$dz;
}//DESCRIB
():
END@()
function
fmpost($$garr=array(array()),$$gsno,$$gtnm,$$gkies){
eval(CLASSX(
$$fmp=new
formpost();
return $$fmp->fmpost($$garr=a
rray(array()),$$gsno,$$gtnm,$$gkies);
}//DESCRIB ():
END@()
function gl(){return
本系统
mysql
数据库
IP END@glb()
function glu(){return
本系统
mysql
数据库用户名
END@glu()
function glp(){return
本系统
mysql
数据库密码
END@glp()
function glb(){return
本系统
mysql
数据库
END@lgb()
function gln(){return
当前使用系统名称
END@gln()
function
glt(){return
当前实例名称
END@glt()
function
glm(){return
母系统域名
END@glt()
function
glr(){return
授权注册码
END@glt()
5
function
glw(){return
$$_SERVER[
glw():
本服务器域名
结尾要加
/
如果没有域名请用本机分
配的固定
IP
,
结尾也要加
/ END@glw()
function get_between($$input, $$start,
$$end){$$substr = substr($$input,
strlen($$start)+strpos($$input,
$$start),(strlen($$input) - strpos($$input,
$$end))*(-1));return $$substr;}//DESCRIB
get_between():
取字符串中间
END@get_between()
function
getRandChar($$length){
$$str =
null;$$strPol =
$$max = strlen($$strPol)-1
;for($$i=0;$$i<$$length;$$i++){$$str.=$$strPol[rand(0,$$m
ax)]; }return $$str;}
function grpcid(){
$$grpx=atv(
return $$grpx;
}//DESCRIB ():
END@()
function
hexhh2hstr($$hhstr){return
String2Hex(str_replace(
END@()
function
hh2hstr($$hhstr){return str_replace(
END@()
function
hexany2str($$hexstr){if
(strp
os($$hexstr,
str_replace(
END@()
function
huanhang(){return
END@()
function vfhttp($$hstr){if (strpos(
检验
HTTP
地址
):
END@()
function
vfhttps($$hstr){if (strpos(
检验
HTTPS
地址
):
END@()
function
dadenghao(){return
＝
END@()
function
dawenhao(){return
？
END@()
function
killctrl($$strx){
$$strx=str_replace(
$$strx=str_replace(
$$strx=str_repl
ace(
$$strx=str_replace(
$$strx=
str_replace(
$$strx=str_replace(
$$strx=str_replace(
return $$strx;
}
function
shuangyinhao(){return
function
hou($$fullstr,$$astr){
if
($$fullstr!=
$$cunzaibu=strpos(
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
}
}//DESCRIB
():
END@()
}
}else{
return false;
}
}//DESCRIB ():
END@()
function
isx2($$brst,$$frst,$$trst){
if
(strpos(
return true;
}else{
return false;
}
}//DESCRIB ():
END@()
function
iso2($$brst,$$frst,$$trst){
if
(strpos(
return true;
}else{
return false;
}
}//DESCRIB ():
END@()
function
isx3($$brst,$$frst,$$trst,$$thrst){
if
(strpos(
return true;
}else{
return false;
if
($$cunzaibu>0 ){
$$spos=strpos($$fullstr,$$astr);
$$lens=strlen($$astr);
$$alll=strlen($$fullstr);
return substr($$fullstr,($$spos+$$lens),($$
alll-($$spos+$$lens)));
}else{
return $$fullstr;
};
}else{
return
}
}//DESCRIB ():
完美兼容中文混合取字符串后面
END@()
6
function
Hex2String($$hex){$$string='';for
($$i=0;
$$i
<
strlen($$hex)-1;
$$i+=2){$$string
.=
chr(hexdec($$hex[$$i].$$hex[$$i+1]));}return
$$string;}
function
isen($$str){ if(preg_match(
function
ischi($$str){if
(preg_match('/^[x{4e00}-x{9fa5}]+$$/u', $$str) > 0)
{return 1;} else if
(preg_match('/[x{4e00}-x{9fa5}]/u',
$$str) > 0) {return 0.5;}else{return
0;}}
function isx1($$brst,$$frst){if
(strpos(
END@()
function iso1($$brst,$$frst,$$isxy){
if ($$isxy==true){
if
(strpos(
return true;
}else{
return false;
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
}
function
localroot(){
if (substr(str_replace(
$$gml=str_replace(
}else{
$$gml=str_replace(
};
if (strpos($$gml,
$$qdq=qian($$g
ml,
$$gml=strtoupper($$qdq).
};
return $$gml;
}//DESCRIB
localroot():
获取本地根目录
END@localroot()
function
labturn($$mstr){
if ( strpos(
$$mstr=str_replace(
｛
$$mstr=str_replace(
｝
$$mstr=str_replace(
$$mstr=str_replace
(
}
return $$mstr;
}//
把真实代码模板化存储
function
labturns($$mstr){
$$mstr=str_
replace(
｛
$$mstr=st
r_replace(
｝
$$mstr=
str_replace(
$$mstr=str_replace(
$$mstr=str_replace(
$$mstr=str_replace(<
/p>
$$mstr=str_replace(
$$mstr=str_r
eplace(
}
function
lastsplit($$strx,$$splt){
function
iso3($$brst,$$frst,$$trst,$$thrst){
if
(strpos(
return true;
}else{
return false;
}
}//DESCRIB ():
END@()
function
killlaststr($$strx){ return
substr($$strx,0,strlen($$strx)-1);}
function killfirststr($$strx){return
substr($$strx,1,strlen($$strx)-1);}
function killlastsplit($$strx,$$splt){
$$ptstrx=explode($$splt,$$strx);
$$totp=count($$ptstrx);
$$fmxxx=
for
($$i=0;$$i<$$totp-1;$$i++){
$$fmxxx=$$fmxxx.$$ptstrx[$$i].$$splt;
}
return $$fmxxx;
7
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
}
}else{
return
}
}//DESCRIB qian():
完美兼容中文混合
END@qian()
function
SX($$asqlstr){
$$conn=mysql_connect(gl(),glu(),glp());
return selecteds($$conn,glb(),$$asqlstr,<
/p>
}//DESCRIB ():
END@()
}
if
($$ljx==2){
return true;
}else{
return false;
}
}//DESCRIB ():
判断是否是质数
END@()
function qian($$fullstr,$$astr){
if ($$fullstr!=
$$cunzaibu=strp
os(
if ($$cunzaibu>0 ){
$$astrlen=strpos($$fullstr,$$astr);
$$fmrt=substr($$fullstr,0,$$astrlen);
return $$fmrt;
}else{
return $$fullstr;
$$ptstrx=explode($$splt,$$strx);
$$totp=count($$ptstrx);
return $$ptstrx[$$totp-1];
}
function laststr($$fstring,$$fg){
$$tmpstst=explode($$fg,$$fstring);
$$tottmp=count($$tmpstst);
return $$tmpstst[$$tottmp-1];
}//DESCRIB ():
判断是否是质数
END@()
function mrmn(){return
function mysql_connect($$fi,$$fu,$$fp){
return new mysqli($$fi,$$fu,$$fp);
8
}//DESCRIB
mysql_connect():
连接数据库方法，如果是
php5.5-
去掉此函数并修改
select
相关方法
< br>
END@mysql_connect()
function myfirstpos(){
$$conn=mysql_connect(gl(),glu(),glp());
$$fps=updatings($$conn,glb(),
r
eturn $$fps;
}//DESCRIB ():
END@()
function
pmenum($$numx){
$$ljx=0;
for
($$px=1;$$px<($$numx+1);$$px++){
if
(($$numx/$$px)==ceil($$numx/$$px)){
$$ljx=$$ljx+1;
}
rid
as
result
from
coode_role
where
cid='
and
CRTOR='
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
}
return $$mstr;
}//
把模板实例化使用
function
toerror($$etype,$$emsg,$$efile,$$eline){
$$sqla=
}
function
tabstr(){return
function
turncon($$mstr){
$$mstr=str_replace(
$$mstr=str_replace(
return $$mstr; <
/p>
}//
把
[]
标
签替换成
{}
防止静态模板自己被解析，使用的时候实例化与
静态有区别，不然编辑静态的时候容易出错
function
turnlab($$mstr){
if (strpos(
$$
mstr=str_replace(
$$mstr=str_replace(
$$mstr=str_replace(
｛
$$mstr=str_replace(
｝
}
function
String2Hex($$string){
if
(substr($$string,0,10)==
return $$string;
}else{
$$hex='';
for ($$i=0; $$i < strlen($$string); $$i++){
$$hex .= dechex(ord($$string[$$i]));
}
return $$hex;
9
$$sqlb=
uid
$$xz=UX(<
/p>
function trimall($$str){
$$qians=array(
$$hous=array(
return
str_replace($$qians,$$hous,$$str);
}//DESCRIB
():
删除空格
END@()
function
urltopath($$url){
$$ptxyz=explode(
$$totp=count($$ptxyz);
$$lslen=strlen($$ptxyz[$$totp-1]);
return
substr($$url,0,strlen($$url)-$$lslen);
}//DESCRIB ():
END@()
function
urlfname($$urlx){
$$ptxyz=explode(
$$totp=count($$ptxyz);
return
$$ptxyz[$$totp-1];
}//DESCRIB ():
END@()
function
unicode_encode($$name){
$$name =
iconv('UTF-8', 'UCS-2', $$name);
$$len =
strlen($$name);
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
}
function unicodeDecode($$unicode_str){
$$json = '{
$$arr =
json_decode($$json,true);
if(empty($$arr)) return '';
return $$arr['str'];}
function UX($$asqlstr){
$$conn=mysql_connect(gl(),glu(),glp());
return updatings($$conn,glb(),$$asqlstr,<
/p>
}//DESCRIB ():
END@()
function
zyferror($$type, $$message, $$file, $$line){
}
return $$name;
}
//
转换编码，将
Unicode
编
码转换成可以浏览的
utf-8
编码
function UnicodeEncode($$str){
preg_match_all('/./u',$$str,$$matches);
$$unicodeStr =
foreach($$matches[0] as $$m){
$$unicodeStr .=
}
return $$unicodeStr;
}
}
}
Return $$str;
}//
两个字节的文字
function unicode_decode($$name){
$$pattern = '/([w]+)|(u([w]{4}))/i';
preg_match_all($$pattern, $$name,
$$matches);
if (!empty($$matches)){
$$name = '';
for ($$j = 0; $$j
< count($$matches[0]); $$j++){
$$str =
$$matches[0][$$j];
if (strpos($$str, 'u')
=== 0){
$$code =
base_convert(substr($$str, 2, 2), 16, 10);
$$code2 = base_convert(substr($$str, 4),
16, 10);
$$c = chr($$code).chr($$code2);
$$c = iconv('UCS-2', 'UTF-8', $$c);
$$name .= $$c;
}else{
$$name .= $$str;
$$str = '';
for($$i=0;$$i<$$len-1;$$i=$$i+2){
$$c = $$name[$$i];
$$c2 = $$name[$$i + 1];
if
(ord($$c) > 0){
$$str .=
'u'.base_convert(ord($$c), 10,
16).base_convert(ord($$c2), 10, 16);
}else{
$$str .= $$c2;
}
1
0
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
1
1
$$rtnstr=
$$type .
$$message .
in
$$file .
on
$$line .
line
--
$$z=toerror($$type,$$message,$$file,$$line);
return $$z;
}//DESCRIB ():
END@()
function
zyfshutdownfunc(){
if ($$error =
error_get_last()) {
$$rtnstr=
...register_shutdown_function:
Type:
.
$$error[
.
Msg:
.
$$error[
.
in
. <
/p>
$$error[
$$z=toerror($$error[
return $$z;
}
}//DESCRIB ():
END@()
function
jstohex($$vlsx){
if (strpos($$vsx,
return $$vlsx;
}else{
if
(strlen($$vlsx)>200
or
strpos($$vlsx,
or
strpos($$vlsx,
or
strpos($$vlsx,
or
strpos($$vlsx,
or
strpos($$vlsx,
$$vlsx=str_replace(
return
}else{
$$vlsx=str_replace(
return str_replace(
};
}
}
function s17url($$urlx){
$$pturl=explode(
$$cpt=count($$pturl);
$$partx=$$pturl[6];
$$frontpath=qian($$urlx,
$$backpath=hou($$urlx,
return $$frontpath.
}
function
enstrs($$gfstring){
$$ftxt=str_replace('<','<',$$gfstring);
$$ftxt=str_replace('>','>',$$ftxt);
$$ftxt=str_repla
ce('
第三维
,JS
里的换行
;
写出的代码里又生成的
JS
代码
< br>$$ftxt=str_replace('rn','/-r/-n',$$ftxt);//
第二维
,PHP
里写出的代码
;
return
$$ftxt;
}
function tohex($$vlsx){
if (strpos($$vsx,
return $$vlsx;
}else{
if (strlen($$vlsx)>200 or
strpos($$vlsx,
){
$$vlsx=str_replace(
return
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
}else{
$$vlsx=str_replace(
return str_replace(
};
}
}
function gohex($$vlsx){
if (strpos($$vsx,
return $$vlsx;
}else{
$$vlsx=str_replace(
return
}
}
function
tostring($$vlsx){
if (strpos(
$$houvlx=Hex2Str
ing(hou($$vlsx,
$$houvlx=str_replace(
return str_replace(
}else{
$$vlsx=str_replace(
return str_replace(
};
}
function haspmtoffun($$fid,$$uid,$$cid){
$$bwl=SX(
$$tot=countresult($$bwl);
if
($$tot>0){
$$wlist=anyvalue($$bwl,
$$blist=anyvalue($$bwl,
if
(strpos(
return false;
}
if (strpos(
return true;
}
}
$$frst=SX(
$$totx=countresult($$frst);
if ($$totx==0){
return true;
}else{
if
(intval(anyvalue($$frst,
return true;
}else{
return false;
}
}
}
function
plotnextid($$plmk,$$pltb){
1
2
酷德网站系统
V1.0
1
switch($$pltb){
2
case
3
return intval(UX(
4
break;
5
case
6
return intval(UX(
7
break;
8
default:
9
}
10
}
11
function haspmtofpage($$pgid,$$uid,$$cid){
12
$$bwl=SX(
13
$$tot=countresult($$bwl);
14
if ($$tot>0){
15
$$wlist=anyvalue($$bwl,
16
$$blist=anyvalue($$bwl,
17
if (strpos(
18
return false;
19
}
20
if (strpos(
21
return true;
22
}
23
}
24
$$prst=SX(
STATUS,valx
from
coode_ppmtru
where
pagemark='
and
comid='
25
clientid='
26
$$totx=countresult($$prst);
27
if
($$totx==0){
28
return true;
29
}else{
30
if
(intval(anyvalue($$prst,
TUS
31
return true;
32
}else{
33
return false;
34
}
35
}
36
}
37
function haspmtoftab($$tbid,$$uid,$$cid){
38
$$bwl=SX(
39
$$tot=countresult($$bwl);
40
if ($$tot>0){
41
$$wlist=anyvalue($$bwl,
42
$$blist=anyvalue($$bwl,
43
if (strpos(
44
return
45
}
46
if (strpos(
47
return
48
}
49
}
50
return
1
3
and
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
}
function
switchplot($$markid){
$$srst=SX(
$$totrst=countresult($$srst);
if
(intval($$totrst)>0){
$$ecode=anyvalue($$srst,
$$stitle=anyvalue($$srst,
$$stt=anyvalue($$srst,
$$rtnstt=$$stt;
$$_GET[
if ($$ecode!=
$$_GET[
$$switchstatus=$$stt;
eval($$ecode);
};
if (intval($$rtnstt)>=1){
return true;
}else{
return false;
}
}else{
return true;
}
}
function systoscvofcom($$comid){
$$sqla=
$$sysrst=SX(
coode_sysinformation
$$totsys=countresult($$sysrst);
for ($$i=0;$$i<$$totsys;$$i++){
$$sysid=anyvalue($$sysrst,
$$sysname=anyvalue($$sysrst,
$$inurl=anyvalue($$sysrst,
$$outurl=anyvalue($$sysrst,
$$indexurl=anyvalue($$sysrst,
$$syscls=anyvalue($$sysrst,
$$units=anyvalue($$sysrst,
$$faceimg=anyvalue($$sysrst,
$$lastupdt=anyvalue($$sysrst,
$$plotid=anyvalue($$sysrst,
$$idxplid=anyvalue($$sysrst,
$$apps=anyvalue($$sysrst,
$$newindexurl=$$indexurl;
$$newinurl=$$inurl;
sysid,sysname,inurl,outurl,
indexurl,syscls,units,faceimg,lastupdt,plotid,idxp
lid,apps
1
4
from
//qian($$inurl,
$$newouturl=qian($$outurl,
mn=
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
1
5
$$sqlb=
$$z=UX(
}
return true;
}
function appstate($$cid,$$appid){
$$stt=UX(
return
intval($$stt);
}
function
anyvalue($$fullresult,$$keynm,$$sqc)
{
$$keyname=qian($$fullresult,
$$partkn=explode(
$$partresult=explode(
$$countprs=count($$partresult);
$$countkn=count($$partkn);
$$tempkey=0;
for
($$x=0;$$x<=$$countkn-1;$$x++)
{
if
($$partkn[$$x]==$$keynm)
{
$$tempkey=$$x;
};
};
$$sqcresult=$$partresult[$$sqc+1];
$$partpart=explode(
return $$partpart[$$tempkey];
}//DESCRIB ():
END@()
function
strLength($$str, $$charset = 'utf-8') {
if ($$charset == 'utf-8')
$$str = iconv ( 'utf-8', 'gb2312', $$str
);
$$num =
strlen ( $$str );
$$cnNum = 0;
for($$i = 0; $$i < $$num; $$i ++) {
if (ord ( substr ( $$str, $$i + 1, 1 ) )
> 127) {
$$cnNum ++;
$$i ++;
}
}
$$enNum = $$num - ($$cnNum * 2);
$$number =
($$enNum / 2) + $$cnNum;
return ceil ( $$number );
}//DESCRIB ():
END@()
function
cut_str($$sourcestr, $$cutlength) {
$$returnstr = '';
$$i = 0;
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
$$n = 0;
$$str_length = strlen ( $$sourcestr );
//
字符串的字节数
while ( ($$n <
$$cutlength) and ($$i <= $$str_length) ) {
$$temp_str = substr ( $$sourcestr, $$i, 1
);
$$ascnum = Ord ( $$temp_str ); //
< br>得到字符串中第
$$i
位字符的
a
scii
码
if ($$ascnum >= 224) //
如果
ASCII
位高与
224
，
{
$$returnstr = $$returnstr . substr (
$$sourcestr, $$i, 3 ); //
根据
UTF
-8
编码规范，将
3
个连续的字符计为
单个字符
$$i
= $$i + 3; //
实际
Byte
计为
3
$$n ++; //
字串长度计
1
} elseif ($$ascnum >= 192) //
如果
ASCII
位高与
192
，
{
$$returnstr = $$returnstr .
substr ( $$sourcestr, $$i, 2 ); //
根据
UTF-8
编码规范，将
2
个连续的字符计为单个字符
$$i = $$i + 2; //
实
际
Byte
计为
2
$$n ++;
//
字串长度计
1
}
elseif ($$ascnum >= 65 && $$ascnum <= 90)
//
如果是大写字母，
{
$$returnstr =
$$returnstr . substr ( $$sourcestr, $$i, 1 );
$$i = $$i + 1; //
实际的
Byte
数仍计
1
个
$$n ++;
//
但考虑整体美观，大写字母计成一个高位字符
} else
//
其他情况下，包括小写字母和半角标点符号，
{
$$returnstr = $$returnstr . substr (
$$sourcestr, $$i, 1 );
$$i = $$i + 1; //
实际的
Byte
数计
1
个
< br>
$$n
= $$n + 0.5;
//
小写字母和半角标点等与半个高位字符宽
...
}
}
if ($$str_length
> $$cutlength) {
$$returnstr =
$$returnstr //
超过
}
return $$returnstr;
}//DESCRIB ():
END@()
function
unstrs($$gfstring){
if ($$gfstring!=
$$gftxt=str_repl
ace('?
','<'.'?'.'p'.'hp',$$gfstring);
$$gftxt=str_replace('?
','?'.'>'
,$$gftxt);
$$gftxt=str_replace(
$$gf
txt=str_replace(
卍卍
$$
gftxt=str_replace(
卍
$$gftxt=str_replace(
$$gftxt=str_replace(
$$gftxt=str_replace('','',$$gftxt);
$$gftxt=str_replace(
$$gftxt=str_replace(
$$gf
txt=str_replace(
＝
$$gf
txt=str_replace('
？
','?',$$gft
xt);
$$gftxt=str_replace(
< br>＋
$$gftxt=str_replace('/|','',$$gftxt);
$$gftxt=str_replace(
1
6
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
$$gftxt=str_replace(
< br>要转义的
$$gf
txt=str_replace('/~','
不转
$$gftxt=str_replace('@r@n','
$$gf
txt=str_replace('/-r/-n','rn',$$gftxt);
$$gftxt=str_replace(
$$gftxt=str_replace(
$$gf
txt=str_replace(
↘
return $$gftxt;
}else{
return
}
}
function hostaddr($$hid){
$$hrst=SX(
$$toth=countresult($$hrst);
if
($$toth>0){
if
(anyvalue($$hrst,
return
anyvalue($$hrst,
}else{
return anyvalue($$hrst,
}
}else{
return
file_get_contents(
}
}
function
downunits($$units,$$host){
$$ptunits=explode(
$$totpt=count($$ptunits);
$$alls=0;
$$suss=0;
for
($$i=0;$$i<$$totpt;$$i++){
if
($$ptunits[$$i]!=
$$tmppt=$$ptunits[$$i];
if
(strpos($$tmppt,
$$ptpt=explode(
$$totptpt=count($$ptpt);
$$kzm=$$ptpt[$$totptpt-1];
$$ppath=urltopath($$tmppt);
$$usrc=
$$mysrc=combineurl(localroot(),$$tmppt);
}else{
$$mysrc=
$$usrc=
$$kzm=
$$ppath=$$tmppt;
}
is_dir($$ppath) OR
mkdir($$ppath, 0777, true);
if (file_exists($$mysrc) and
_get(
}else{
1
7
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
switch($$kzm){
case
$$z=overfile($$my
src,file_get_contents($$usrc));
break;
case
$$z=overfile($$my
src,file_get_contents($$usrc));
break;
case
$$z=overfile($$my
src,file_get_contents($$usrc));
break;
case
$$z=overfile($$my
src,file_get_contents($$usrc));
break;
case
$$z=overfile($$my
src,file_get_contents($$usrc));
break;
case
GrabImage($$usrc, $$mysrc);
break;
case
GrabImage($$usrc, $$mysrc);
break;
case
GrabImage($$usrc, $$mysrc);
break;
case
$$z=overfile($$my
src,file_get_contents($$usrc));
break;
case
1
8
$$z=overfile($$mysrc,tostring
(file_get_contents(
break;
case
$$z=overfile($$my
src,file_get_contents($$usrc));
break;
case
$$z=overfile($$my
src,file_get_contents($$usrc));
break;
case
$$z=cdfile($$usrc,$$mysrc);
break;
case
$$z=cdfile($$usrc,$$mysrc);
break;
case
$$z=cdfile($$usrc,$$mysrc);
break;
default:
}//
switch
}//
如果文件存在就不下载了
if ( $$mysrc!=
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
$$alls=$$alls+1;
if (file_exists($$mysrc)){
$$succ=$$succ+1;
}
}
}//pt i if not =
}//for
return
}//DESCRIB ():
END@()
function
downanyfile($$usrc,$$mysrc){//
文件存不存在都下载，覆
盖原来
if ($$rurl!=
$$pathmy=urltopath($$mysrc);
$$ptmy=explode(
$$totpt=count($$ptmy);
$$kzm=$$ptmy[$$totpt-1];
is_dir($$pathmy)
OR mkdir($$pathmy, 0777, true);
switch($$kzm){
case
$$z=overfile($$mysrc,file_get_contents($$usr
c));
break;
case
$$z=overfile($$mysrc,file_get_contents($$usr
c));
break;
case
$$z=overfile($$mysrc,file_get_contents($$usr
c));
break;
case
$$z=overfile($$mysrc,file_get_contents($$usr
c));
break;
case
$$z=overfile($$mysrc,file_get_contents($$usr
c));
break;
case
GrabImage($$usrc, $$mysrc);
break;
case
GrabImage($$usrc, $$mysrc);
break;
case
GrabImage($$usrc, $$mysrc);
break;
case
$$z=overfile($$my
src,file_get_contents($$usrc));
break;
case
$$z=overfile($$my
src,tostring(file_get_contents(
break;
case
$$z=cdfile($$usrc,$$mysrc);
break;
1
9
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
case
$$z=cdfile($$usrc,$$mysrc);
break;
case
$$z=cdfile($$usrc,$$mysrc);
break;
case
$$z=cdfile($$usrc,$$mysrc);
break;
case
$$z=cdfile($$usrc,$$mysrc);
break;
default:
}//
switch
if
(file_exists($$mysrc)){
return true;
}else{
return false;
}
}else{
return false;
}
}//DESCRIB ():
END@()
function
datatofun($$fid,$$fdata,$$imk){
$$sqla=
$$sqlb=
$$cz=UX(
if (intval($$cz)==0){
$$z=UX(
$$cz=UX(
if
(intval($$cz)>0){
return true;
}else{
return false;
}
}else{
return true;
}
}//DESCRIB ():
END@()
function
datatocls($$cid,$$cdata,$$imk){
$$sqla=
$$sqlb=
$$cz=UX(
if (intval($$cz)==0){
$$z=UX(
$$cz=UX(
if
(intval($$cz)>0){
return true;
}else{
return false;
2
0
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
}
}else{
return true;
}
}//DESCRIB ():
END@()
function
syspagepmt($$cid){
$$pgrst=SX(
$$totpg=countresult($$pgrst);
for ($$i=0;$$i<$$totpg;$$i++){
if (anyvalue($$pgrst,
$$z=makepagepmt(anyvalue($$pgrst,
$$z=makecompagebw(anyvalue($$pgrst,
};
};
return true;
}
function
makecomtabbw($$tabid,$$comid,$$sysid){
if
($$tabid!=
$$tbtt=UX(
$$sqlx=
$$sqly=
$$z=UX(
return true;
}else{
return false;
}
}
function
makecomfunbw($$funid,$$comid,$$sysid){
if
($$funid!=
$$funtt=UX(
$$sqlx=
$$sqly=
$$z=UX(
return true;
}else{
return false;
}
}
function
makecompagebw($$pageid,$$comid,$$sysid){
if
($$pageid!=
$$pagett=UX(
$$sqlx=
$$sqly=
$$z=UX(
return true;
}else{
return false;
}
}
function
makecomappbw($$comid){
2
1
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
if
($$comid!=
2
2
$$z=UX(
into
coode_
appstatelist(sysid,comid,pertitle,scvid,appid,star
ttime,endtime,CRTM,UPTM,STATUS)select
sysid,'
return true;
}else{
return false;
}
}
function
maketabpmt($$tabid,$$sysid){
if
($$tabid!=
$$tbtt=UX(
$$sqla=
$$sqlb=
$$zz=UX(
$$sqla=
$$sqlb=
$$zz=UX(
$$sqla=
$$sqlb=
$$zz=UX(
$$sqla=
$$sqlb=
$$zz=UX(
return true;
}else{
return false;
}
}
function
makefunpmt($$funid,$$sysid){
if
($$funid!=
$$funtt=UX(
$$sqla=
$$sqlb=
$$zz=UX(
return true;
}else{
return false;
}
}
function makepagepmt($$pgmk,$$sysid){
if ($$pgmk!=
$$pagett=UX(
$$sqla=
$$sqlb=
$$zz=UX(
删
除
','','compid','groupid',1,'clientid','dat
a','mysql','delete',1,'DA:selfitem,DA:selfpos,DA:s
onpos,DA:selfandsonpos,DA:selfleaddepart,'
< br>选
择
','','compid','groupid'
,1,'clientid','data','mysql','select',1,'DA:selfit
em,DA:selfpos,DA:sonpos,DA:selfandsonpos,DA:selfle
addepart,'
更
改
','',
'compid','groupid',1,'clientid','data','mysql','up
date',1,'DA:selfitem,DA:selfpos,DA:sonpos,DA:selfa
ndsonpos,DA:selfleaddepart,'
新
增
','','compid','groupid',1,'clientid',
'data','mysql','insert',1,'DA:selfitem,DA:selfpos,
DA:sonpos,DA:selfandsonpos,DA:selfleaddepart,'
from
coode_appdefault
where
STATUS=1
and
concat('
酷德网站系
统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
return true;
}else{
return false;
}
}
function
changeist($$strx){
if (strpos($$strx,
$$ptist=explode(
$$totpt=count($$ptist);
for
($$i=0;$$i<$$totpt;$$i++){
$$tmppt=qian($$ptist[$$i],
$$tmppx=qian($$ptist[$$i],
$$tmppt=str_replace(
< br>∨
$$strx=str_replace(
};
return $$strx;
}else{
return $$strx;
}
}
function runinstall($$x,$$y,$$z,$$i){
if
($$z!=
$$sysid=$$_GET[
$$z=$$z.
$$ptz=explode(
$$totp=count($$ptz);
$$succ=0;
$$xyz=
$$abc=
for ($$i=0;$$i<$$totp;$$i++){
if
($$ptz[$$i]!=
$$tmpq=qian($$ptz[$$i],
$$fcid=qian(hou($$ptz[$$i],
$$tmph=hou($$ptz[$$i],
switch($$tmpq){
case
$$tmptab=qian(hou($$ptz[$$i],
if
(_get(
$$conn=mysql_connect(gl(),glu(),glp());
$$extx=updatingx($$conn,glb(),
}
$$conn=mysql_connect(gl(),glu(),glp());
2
3
$$extx=updatingx($$conn,
and
TABLE_SCHEMA='
if
(intval($$extx)==0){
if ($$tmph!=
$$z=maketabpmt($$tmptab,$$sysid);
$$conn=mysql_connect(gl(),glu(),glp());
$$x=
updatingx($$conn,glb(),$$tmph,
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
$$conn=mysql_connect(gl(),glu(),glp());
$$extj=updatingx($$conn,
if
(intval($$extj)>0){
$$succ=$$succ+1;
$$abc=$$abc.
}else{
$$xyz=$$xyz.
}
}else{
$$succ=$$succ+1;
}
}else{
$$succ=$$succ+1;
}
break;
case
$$z=makefunpmt($$fcid,$$sysid);
if (datatofun($$fcid,$$tmph,$$i)){
$$succ=$$succ+1;
$$abc=$$abc.
}else{
$$xyz=$$xyz.
}
break;
case
if
(datatocls($$fcid,$$tmph,$$i)){
$$succ=$$succ+1;
$$abc=$$abc.
}else{
$$xyz=$$xyz.
}
break;
default:
if
(strpos(
$$tmptab=qian(hou($$ptz[$$i],
$$tmptolmk=qian(hou($$ptz[$$i],
if (_get(
$$conn=mysql_connect(gl(),glu(),glp());
$$etx=updatingx($$conn,glb(),
}
$$extj=UX(
if
(intval($$extj)==0){
if ($$tmph!=
$$tmph=changeist($$tmph);
$$tmph=str_replace(
$$tmpq=str_replace(
$$tmpq=str_replace(
∨
$$tmpq=str_replace(
〖
$$tmpq=str_repla
ce(
〗
count(*)
as
result
from
TABLES
2
4
where
TABLE_NAME='
and
TABLE_SCHEMA='
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
$$conn=mysql_connect(gl(),glu(),glp());
$$x=updatingx($$conn,glb(),$$t
mpq,
$$exti=UX(
if (intval($$exti)>0){
$$succ=$$succ+1;
$$abc=$$abc.$$tmptab.
}else{
$$xyz=$$xyz.$$tmptab.
};
}else{
$$succ=$$succ+1;
$$abc=$$abc.$$tmptab.
}
}else{
$$succ=$$succ+1;
$$abc=$$abc.$$tmptab.
}
}else{
$$succ=$$succ+1;
}
}; //switch
}else{
$$succ=$$succ+1;
};//ifptz
};//for
if
($$succ>=$$totp){
return
}else{
return
}
}else{
return
}
}//DESCRIB ():
END@()
function
unittree($$pd,$$um){
$$rtnstr=
if
(substr(str_replace(
$$gml=str_replace(
}else{
$$gml=str_replace(
};
$$exty=UX(
if (intval($$exty)>0){
$$z=UX(
}else{
$$z=UX(
};
$$pathdir=combineurl($$gml,$$pd);
$$extx=UX(
2
5
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
if (intval($$extx)>0){
$$x=UX(
}else{
$$ptpd=explode(
$$totp=count($$ptpd);
$$fnm=$$ptpd[$$totp-1];
$$flen=strlen($$fnm);
$$dirx=substr($$pd,0,strlen($$pd)-$$flen);
$$diry=str_replace($$gml,
$$y=UX(
der','
}
if(is_empty_dir($$pathdir)){
$$rtnstr=$$rtnstr
.
成功单元化目录
}else{//
否则读这个目录，除了
.
和
.
.
外
$$d=dir($$pathdir);
while($$a=$$d->read()) {
if(is_file($$pathdir.'/'.$$a) &&
($$a!='.') && ($$a!='..')){
//unlink($$pathdir.'/'.$$a);
$$extx=UX(
if
(intval($$extx)>0){
$$x=UX(
}else{
$$ptpd=explode(
$$totp=count($$ptpd);
$$fnm=$$a;
//$$ptpd[$$totp-1];
$$flen=strlen($$fnm);
$$dirx=substr($$pd.
$$diry=str_replace($$gml,
$$y=UX(
','
}
$$rtnstr=$$rtnstr.
成功单元化文件
}
//
如果是文件就直接删除
if(is_dir($$pathdir.'/'.$$a) && ($$a!='.')
&& ($$a!='..')) {//
如果是目录
$$extx=UX(
if
(intval($$extx)>0){
$$x=UX(
}else{
$$ptpd=explode(
$$totp=count($$ptpd);
$$fnm=$$a;
//$$ptpd[$$totp-1];
$$flen=strlen($$fnm);
$$dirx=substr($$pd.
$$diry=str_replace($$gml,
2
6
into
coode_sitefile(filename
,filecname,filetype,PTOF,folder,updateurl,CRTM,UPT
M,CRTOR,RIP,OLMK)values('
into
coode_sitefile(filename,filecname,filetype,PTOF, folder,updateurl,CRTM,UPTM,CRTOR,RIP,OLMK)values('
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
$$y=UX(
um.
}
$$rt
nstr=$$rtnstr.
成功单元化目录
< br>
if(!is_empty_dir($$pathdir.'/'.$$a))
{//
是否为空
//<
/p>
如果不是，调用自身，不过是原来的路径
+
他下级的目录名
$$rtnstr=$$ee($$pd.'/'.$$a,$$um);
}else{
}
}
}//while
$$z=UX(
PTOF='
$$d->close();
}
//empty
return
}//DESCRIB ():
END@()
function makecore(){
$$coretxt=file_g
et_contents(combineurl(localroot(),
$$coretxt=str_replace('
$$coretxt=str_replace('?>','',$$coretxt);
$$coretxt=str_replace(
$$coretxt=str_replace(
$$coretxt=str_replace(
$$coretxt=str_replace(
$$coretxt=str_replace(
$$coretxt=str_replace(
$$coretxt=str_replace(
$$coretxt=str_replace(
$$z=overfile(combineurl(loca
lroot(),
$$isttxt
=file_get_contents(combineurl(localroot(),
< br>
$$isttxt=str_replace(
$$z=overfile(combineurl(loca
lroot(),
return
true;
}//DESCRIB ():
END@()
function
newsyscoretabfun($$sysid){
$$z=UX(
coode_sitefile
set
folder=replace(folder,'/
/','/'),updateurl=replace(updateurl,'//','/')
2
7
into
coode_sitefile(filename
,filecname,filetype,PTOF,folder,updateurl,CRTM,UPT
M,CRTOR,RIP)values('
where
$$k=UX(
from
coode_pagefuntab
where
sysid='
and
(pagemark='coodecore'
or
pagemark='funlist'
or
pagemark='tablist')
$$k=UX(
coode_tablist where
issys=1)
$$k=UX(
and
sourcecls='fun' and sourceid in (select
replace(funname,'()','')
from
coode_funlist where issys=1)
$$sqla=
$$sqlb=
$$x=UX(
into
coode_pagefuntab(
from
coode_tablist
where
issys=1
and
TABLE_NAME not in(select sourceid from
coode_pagefuntab where sysid='
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
$$sqlb=
$$x=UX(
into
coode_pagefuntab(
from
coode_tablist
2
8
where
sysid='
$$sqla=
$$sqlb=
$$y=UX(
into
coode_
pagefuntab(
from
coode_funlist
where
issys=1
and
replace(funname,'()','') not in(select sourceid
from coode_pagefuntab where sysid='
$$sqlb=
$$y=UX(
into
coode_
pagefuntab(
from
coode_funlist
where
sysid='
$$sqla=
$$sqlb=
$$y=UX(
into
coode_
pagefuntab(
from
coode_phpcls
where
issys=1
and
replace(funname,'()','') not in(select sourceid
from coode_pagefuntab where sysid='
$$sqla=
$$sqlb=
$$y=UX(
into
coode_
pagefuntab(
from
coode_phpcls
where
sysid='
return true;
}//DESCRIB ():
END@()
function
updatingtemp($$con,$$db,$$sqlstr,$$lan){
//mysql_select_db($$db, $$con);
//mysql_query(
//$$result =
mysql_query($$sqlstr);
$$con ->
query(
数据库输出编码
应该与
你的数据库编码保持一致
.
建议用
UT
F-8
国际标准编码
.
$$con -> select_db($$db);
//
打开数据库
$$result = $$con->query($$sqlstr);
//
查询成功
if (strpos($$sqlstr,
{
while($$row =
mysqli_fetch_array($$result))
{
return
$$row[
}
}else
{
return
};
mysqli_close($$con);
}//DESCRIB ():
END@()
function
curPageURL()
{
$$pageURL = 'http';
//if ($$_SERVER[
//
{
//
$$pageURL .=
//
}
$$pageURL .=
if
($$_SERVER[
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
{
$$pageURL .=
$$_SERVER[
}
else
{
$$pageURL
}
return $$pageURL;
}//DESCRIB
():
END@()
function ipToArea($$ip=
$$ap
i=
V3otqbppnN2DJv/?query=
$$ch
= curl_init();
curl_setopt($$ch,CURLOPT_URL,$$api);
curl_setopt($$ch,CURLOPT_HTTP_VERSION,CURL
_HTTP_VERSION_1_1);
//curl_setopt($$
ch,CURLOPT_HTTPHEADER,C('IP138_TOKEN'));//undefine
d c
curl_setopt($$ch,CURLOPT_RET
URNTRANSFER,1);
curl_setopt($$ch
,CURLOPT_CONNECTTIMEOUT,3);
$$handles = curl_exec($$ch);
curl_close($$ch);
$$handles= iconv('GB2312', 'UTF-8',
$$handles);
$$arr=json_decode($$handles,true);
return $$arr[data][0][location];
}//DESCRIB ():
END@()
function getip(){
global $$ip;
if
(getenv(
$$ip =
getenv(
else
if(getenv(
ARDED_FOR
$$ip = getenv(
else if(getenv(
$$ip = getenv(
else $$ip =
return $$ip;
}//DESCRIB ():
END@()
function
excurl($$urlx){
if (strpos($$urlx,
$$urlx=hou($$urlx,
}
$$urlx=qian($$urlx,
$$urlx=str_replace(
$$urlx=str_replace(
return $$urlx;
}//DESCRIB ():
END@()
function
absorbimgs($$textx,$$mimgs=array(array())){
$$pattern=
preg_match_all($$pattern,$$textx,$$mimgs);
return $$mimgs;
}//DESCRIB ():
END@()
function
isimage($$xurl){
.=$$_SERVER['QUERY_STRING'];//
$$_SERVER[
2
9
.
$$_SERVER[
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
3
0
if
((strpos($$xurl,
or
strpos($$xurl,
or
strpos($$xurl,
or
strpos($$xurl,
and
strpos(
strpos(
strpos(
return true;
}else{
return false;
}
}//DESCRIB ():
END@()
function
isfunc($$srcid,$$longexp){
if
(strpos($$longexp,
and
strpos($$srcid,
and
strpos($$srcid,
and
strpos($$srcid,
and strpos($$srcid,
return true;
}else{
$$longexp=str_replace(
$$longexp=str_replace(
$$longexp=str_replace(
if
(strpos(
return true;
}else{
return false;
}
}
}//DESCRIB ():
END@()
function
absorburls($$textx,$$mimgs=array()){
$$marr=array(array());
$$m=0;
$$pattern=
preg_match_all($$pattern,$$textx,$$marr);
本页合计 <
br>
for ($$i=0;$$i
if (isimage($$marr[1][$$i])){
$$mimgs[$$m]=$$marr[1][$$i];
$$m=$$m+1;
}
}
return $$mimgs;
}//DESCRIB ():
END@()
function
absorbpics($$textx,$$mimgs=array()){
$$marr=array(array());
$$m=0;
$$pattern=
preg_match_all($$pattern,$$textx,$$marr);
for ($$i=0;$$i
if (isimage($$marr[1][$$i])){
$$mimgs[$$m]=$$marr[1][$$i];
$$m=$$m+1;
}
}
$$pattern=
preg_match_all($$pattern,$$textx,$$marr);
for ($$i=0;$$i
if (isimage($$marr[1][$$i])){
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
function
anytab($$itab=array()){
$$appid=_get(
$$shortid=_get(
$$pgnum=_get(
if
($$pgnum!=
$$pgnum=$$pgnum*1;
};
$$cssmk=_get(
if
($$cssmk!=
$$conn=mysql_connect(gl(),glu(),glp());
$$htmcss=htmlcss($$cssmk,$$htmcss);
$$csurd=$$htmcss[
$$chtml=$$htmcss[
$$ncss=combinecss($$shortid,$$htmccs);
}else{
$$csurd=
$$chtml=
}
$$page=_get(
if
($$page!=
$$page=$$page*1;
}
$$allsc=_get(
$$xk=_get(
$$xv=_get(
if ($$shortid!=
想办
法把下面独立出来，如果有制定
KEYS
借用某
SHORT
页要可以实现，这样就能任意表查询了
$$_POST[$$shortid.
$$_POST[$$shortid.
$$_POST[$$shortid.
$$_POST[$$shortid.
$$sbase=shortinfo($$shortid,$$sbase);
$$ncss=combinecss($$shortid,$$sbase);
$$scss=shortcss($$shortid,$$scss);
$$ncss=combinecss($$shortid,$$scss);
$$pcss=pagecss($$sbase[
$$ncss=combinecss($$shortid,$$pcss);
if ($$sbase[
$$ccs=caseinfo($$sbase[
if (strpos(
eval($$ccs[
};
$$ncss=combinecss($$shortid,$$ccs);
//
之后加上
denycdt
$$mk
cdt=comcdt($$pgnum,$$page,$$sbase[
$$gkinfo=thekeyfun($$gkinfo,g
lb(),$$sbase[
if
($$allsc.$$xk.$$xv==
$$alltot=UX(
$$cdtstr=
}else{
if
(strpos($$mkcdt,
3
1
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
$$nolmt=qian($$mkcdt,
$$alltot=UX(
$$cdtstr=$$nolmt;
}else{
$$alltot=UX(
$$cdtstr=$$mkcdt;
}
}
//echo
$$pghtml=makepagerow($$pgnum,
$$page,$$alltot,$$shortid,$$ccs,$$allsc,$$xk,$$xv);
$$conn=mysql_connect(gl(),glu(),glp());
$$sqlx=
if
(str_replace(
条件
$$sqlx=
}else{
$$sqlx=
}
$$dtrst=selecteds($$conn,glb(),$$sqlx
,
//echo
$$totrcd=countresult($$dtrst);
if ($$totrcd>0){
$$arraydata=array();
$$arraydata=arrdata($$arraydata,$$dtrst);
$$ar
raydata=arrdefault($$sbase[
//
FUN:$$funvalue=
$$shoks=$$sbase[
$$partk=explode(
$$totptk=count($$partk);
$$tablehd=maketbhead($$shoks,
$$gkinfo,$$ccs,$$sbase);
//
之后加上
denykey
$$binfo=array();
$$fmhtmlx=
$$sbase[
$$sbase[
$$sbase[
$$sbase[
$$sbase[
$$sbase[
$$fmktps=
for ($$p=0;$$p<$$totptk;$$p++){
$$jjshow=$$gkinfo[$$partk[$$p]][
$$jjpost=$$gkinfo[$$partk[$$p]][
if (strpos($$jjshow,
|| strpos($$jjshow,
$$jjshow=
};
if
(strpos($$jjpost,
||
strpos($$jjpost,
$$jjpost=
};
3
2
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
3
3
$$fm
ktps=$$fmktps.
nfo[$$partk[$$p]][
$$partk[$$p]][
if
($$gkinfo[$$partk[$$p]][
$$fmcantc=$$fmcantc.$$partk[$$p].
};
};
if($$totptk>0){
$$fmktps=
};
$$fm
js=
.
$$fmch=
for
($$ti=1;$$ti<($$totrcd+1);$$ti++){
$$fmtrinner=
$$fmtrouter=$$ccs[
$$fmjs=$$fmjs.
$$demo=$$chtml;
for
($$tj=0;$$tj<$$totptk;$$tj++){
$$fmjs=$$fmjs.
$$tdxtp=$$gkinfo[$$partk[$$tj]][
$$binfo=formtrow($$binfo,$$par
tk[$$tj],$$arraydata[$$partk[$$tj]][$$ti],$$arraydata[
,$$arraydata);
$$co
mux=exchangeunit($$binfo,$$ccs[$$tdxtp]);
$$demo=str_replace(
$$demo=str_replace(
$$demo=str_replace(
$$demo=str_replace(
$$demo=str_replace(
$$fmtrinner=$$fmtrinner.$$comux;
};//
有空加
OPRT
if ($$totptk>0){
$$fmjs=substr($$fmjs,0,strlen($$fmjs)-1).
$$fmch=$$fmch.$$demo;
$$fmhtmlx=$$_replace(
};
};//
有必要的时候加上统计行
$$onlyrow=$$fmhtmlx;
if ($$sbase[
$$fmtrinner=
$$fmtrouter=$$ccs[
for
($$tj=0;$$tj<$$totptk;$$tj++){
$$tdxtp=
酷德网站系统
V1.0
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
3
4
$$bi
nfo=formtrow($$binfo,$$partk[$$tj],$$arraydata[$$partk[
$$tj]][$$totrcd+2],$$arraydata[
2],$$gkinfo,
$$sbase,$$totrcd+2,$$arraydata);
$$comux=exchangeunit($$binfo,$$ccs[$$tdxtp]);
$$demo=str_replace(
$$de
mo=str_replace(
本页合计
$$demo=str_replace(
本页合计
$$demo=str_replace(
$$demo=str_replace(
$$fmtrinner=$$fmtrinner.$$comux;
};//
$$fmhtmlx=$$_replace(
};//ctraw
$$fmdft=
for
($$tj=0;$$tj<$$totptk;$$tj++){
$$fmdft=$$fmdft.
};//
有空加
OPRT
if ($$totrcd>0){
$$fmjs=substr($$f
mjs,0,strlen($$fmjs)-1).
$$csurd=str_replace(
}else{
$$fmdft=substr($$fmdft,0,strl
en($$fmdft)-1).
$$fmjs=$$fmjs.$$fmdft.
};
//maketable
前把
SBASE<
/p>
里的各种
DIY
解析了
$$sbase[
$$sbase[
$$sbase[
$$sbase[
$$tablehtml=maketable($$ccs[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
$$itab[
酷德网站系统
V1.0
1
$$itab[
2
$$itab[
3
}else{
4
};//totrcd>0
5
return $$itab;
6
}else{//caseid
7
return $$itab;
8
};
9
}else{
10
//shortid!=
11
return $$itab;
12
};
13
}
14
function
setkeysearch($$shortid){
15
$$tmfx='';
29
$$allkeyx=SX(
COLUMN_NAME,DATA
_TYPE,keytitle,VQX,clstxt,dxtype
from
coode_keydetaily
30
shortid='
31
$$fmlix=
32
$$fmkix=
33
$$tot=countresult($$allkeyx);
34
$$prevqx=anyvalue($$allkeyx,
35
for ($$i=0;$$i<$$tot;$$i++){
36
$$fmkix=$$ue($$allkeyx,
37
if
(anyvalue($$allkeyx,
38
$$ne
wonex=anyvalue($$allkeyx,
39
if
(strpos($$newonex,
40
$$hk=qian(hou($$newonex,
41
$$newonex=
42
}else{
43
$$newonex=str_replace(
44
$$newonex=str_replace(
45
$$newonex=str_replace(
46
$$newonex=str_replace(
47
if
(strpos(
48
if (strpos($$newonex,
49
$$ptnewo=explode(
50
$$totpn=count($$ptnewo);
3
5
where