OpenUrl($devURL);
$devContent = $dhd->GetHtml();
$devInfo = (array)json_decode($devContent);
if (($devInfo['auth_at']+60*60*24*365) < time()) {
ShowMsg("您的开发者账号已经过期,请登录www.dedebiz.com重新申请!","-1");
exit();
}
$filelist = str_replace("\r", "\n", trim($filelist));
$filelist = trim(preg_replace("#[\n]{1,}#", "\n", $filelist));
if($filelist=='')
{
ShowMsg("对不起，你没有指定模块的文件列表，因此不能创建项目！","-1");
exit();
}
if (empty($dev_id)) {
ShowMsg("开发者ID不能为空！","-1");
exit();
}
if (empty($priv)) {
ShowMsg("请填写开发者私钥信息","-1");
exit();
}
if (strlen($modulname) > 150) {
ShowMsg("模块名称过长","-1");
exit();
}
// 校验私钥合法性
$enstr = json_encode(array(
"module_name" => $modulname,
"dev_id" => $devInfo['dev_id'],
));
// 私钥加密模块信息
openssl_private_encrypt($enstr,$encotent,$priv);
$moduleInfo = base64url_encode($encotent);
openssl_public_decrypt($encotent,$decontent,$devInfo['pub_key']);
$minfo = (array)json_decode($decontent);
if ($minfo['module_name'] != $modulname || $minfo['dev_id'] != $devInfo['dev_id']) {
ShowMsg("开发者私钥校验失败，请确保填写正确的开发者私钥","-1");
exit();
}
//去除转义
foreach($_POST as $k=>$v) $$k = stripslashes($v);
if(!isset($autosetup)) $autosetup = 0;
if(!isset($autodel)) $autodel = 0;
$mdir = DEDEDATA.'/module';
$hashcode = md5($modulname.$devInfo['dev_id']);
$moduleFilename = $mdir.'/'.$hashcode.'.xml';
$menustring = base64_encode($menustring);
$indexurl = str_replace('=', '**', $indexurl);
$dm = new DedeModule($mdir);
if($dm->HasModule($hashcode))
{
$dm->Clear();
ShowMsg("对不起，你指定同名模块已经存在，因此不能创建项目！
如果你要更新这个模块，请先删除：module/{$hashcode}.xml","-1");
exit();
}
$readmef = $setupf = $uninstallf = '';
if(empty($readmetxt))
{
move_uploaded_file($readme, $mdir."/{$hashcode}-r.html") or die("你没填写说明或上传说明文件！");
$readmef = $dm->GetEncodeFile($mdir."/{$hashcode}-r.html", TRUE);
}
else
{
$readmetxt = "".$readmetxt;
$readmetxt = preg_replace("#[\r\n]{1,}#", "
\r\n", $readmetxt);
$readmetxt .= "
";
$readmef = base64_encode(trim($readmetxt));
}
if($autosetup==0)
{
move_uploaded_file($setup,$mdir."/{$hashcode}-s.php") or die("你没上传，或系统无法把setup文件移动到 module 目录！");
$setupf = $dm->GetEncodeFile($mdir."/{$hashcode}-s.php",TRUE);
}
if($autodel==0)
{
move_uploaded_file($uninstall, $mdir."/{$hashcode}-u.php") or die("你没上传，或系统无法把uninstall文件移动到 module 目录！");
$uninstallf = $dm->GetEncodeFile($mdir."/{$hashcode}-u.php", TRUE);
}
if(trim($setupsql40)=='') $setupsql40 = '';
else $setupsql40 = base64_encode(trim($setupsql40));
//if(trim($setupsql41)=='') $setupsql41 = '';
//else $setupsql41 = base64_encode(trim($setupsql41));
if(trim($delsql)=='') $delsql = '';
else $delsql = base64_encode(trim($delsql));
$modulinfo = "
name={$modulname}
dev_id={$devInfo['dev_id']}
info={$moduleInfo}
time={$mtime}
hash={$hashcode}
indexname={$indexname}
indexurl={$indexurl}
ismember={$ismember}
autosetup={$autosetup}
autodel={$autodel}
lang=utf-8
moduletype={$moduletype}
$menustring
{$readmef}
$setupsql40
$delsql
{$setupf}
{$uninstallf}
$filelist
";
$filelists = explode("\n", $filelist);
foreach($filelists as $v)
{
$v = trim($v);
if(!empty($v)) $dm->MakeEncodeFileTest(dirname(__FILE__), $v);
}
//测试无误后编译安装包
$fp = fopen($moduleFilename, 'w');
fwrite($fp, $modulinfo);
fwrite($fp, "\r\n");
foreach($filelists as $v)
{
$v = trim($v);
if(!empty($v)) $dm->MakeEncodeFile(dirname(__FILE__), $v, $fp);
}
fwrite($fp, "\r\n");
fwrite($fp, "\r\n");
fclose($fp);
ShowMsg("成功对一个新模块进行编译！", "module_main.php");
exit();
}
/*-------------
//修改项目
function editModule()
--------------*/
else if($action=='edit')
{
$filelist = str_replace("\r", "\n", trim($filelist));
$filelist = trim(preg_replace("#[\n]{1,}#", "\n", $filelist));
if($filelist=="")
{
ShowMsg("对不起，你没有指定模块的文件列表，因此不能创建项目！","-1");
exit();
}
if (empty($dev_id)) {
ShowMsg("开发者ID不能为空！","-1");
exit();
}
if (empty($priv)) {
ShowMsg("请填写开发者私钥信息","-1");
exit();
}
// 校验私钥,确定开发者身份
$devURL = DEDECDNURL."/developers/$dev_id.json";
$dhd = new DedeHttpDown();
$dhd->OpenUrl($devURL);
$devContent = $dhd->GetHtml();
$devInfo = (array)json_decode($devContent);
if (($devInfo['auth_at']+60*60*24*365) < time()) {
ShowMsg("您的开发者账号已经过期,请登录www.dedebiz.com重新申请!","-1");
exit();
}
if (strlen($modulname) > 150) {
ShowMsg("模块名称过长","-1");
exit();
}
// 校验私钥合法性
$enstr = json_encode(array(
"module_name" => $modulname,
"dev_id" => $devInfo['dev_id'],
));
// 私钥加密模块信息
openssl_private_encrypt($enstr,$encotent,$priv);
$moduleInfo = base64url_encode($encotent);
openssl_public_decrypt($encotent,$decontent,$devInfo['pub_key']);
$minfo = (array)json_decode($decontent);
if ($minfo['module_name'] != $modulname || $minfo['dev_id'] != $devInfo['dev_id']) {
ShowMsg("开发者私钥校验失败，请确保填写正确的开发者私钥","-1");
exit();
}
//已经去除转义
foreach($_POST as $k=>$v) $$k = stripslashes($v);
if(!isset($autosetup)) $autosetup = 0;
if(!isset($autodel)) $autodel = 0;
$mdir = DEDEDATA.'/module';
$hashcode = $hash;
$moduleFilename = $mdir.'/'.$hashcode.'.xml';
$modulname = str_replace('=', '', $modulname);
$indexurl = str_replace('=', '**', $indexurl);
$menustring = base64_encode($menustring);
$dm = new DedeModule($mdir);
$readmef = base64_encode($readmetxt);
$setupf = $uninstallf = '';
//编译setup文件
if(is_uploaded_file($setup))
{
move_uploaded_file($setup, $mdir."/{$hashcode}-s.php") or die("你没上传，或系统无法把setup文件移动到 module 目录！");
$setupf = $dm->GetEncodeFile($mdir."/{$hashcode}-s.php", TRUE);
} else {
if($autosetup==0) $setupf = base64_encode($dm->GetSystemFile($hashcode, 'setup'));
}
//编译uninstall文件
if(is_uploaded_file($uninstall))
{
move_uploaded_file($uninstall,$mdir."/{$hashcode}-u.php") or die("你没上传，或系统无法把uninstall文件移动到 module 目录！");
$uninstallf = $dm->GetEncodeFile($mdir."/{$hashcode}-u.php",true);
} else {
if($autodel==0) $uninstallf = base64_encode($dm->GetSystemFile($hashcode,'uninstall'));
}
if(trim($setupsql40)=='') $setupsql40 = '';
else $setupsql40 = base64_encode(htmlspecialchars_decode(trim($setupsql40)));
//if(trim($setupsql41)=='') $setupsql41 = '';
//else $setupsql41 = base64_encode(trim($setupsql41));
if(trim($delsql)=='') $delsql = '';
else $delsql = base64_encode(strip_tags(trim($delsql)));
$modulinfo = "
name={$modulname}
dev_id={$devInfo['dev_id']}
info={$moduleInfo}
time={$mtime}
hash={$hashcode}
indexname={$indexname}
indexurl={$indexurl}
ismember={$ismember}
autosetup={$autosetup}
autodel={$autodel}
lang=utf-8
moduletype={$moduletype}
$menustring
{$readmef}
$setupsql40
$delsql
{$setupf}
{$uninstallf}
$filelist
";
if($rebuild=='yes')
{
$filelists = explode("\n", $filelist);
foreach($filelists as $v)
{
$v = trim($v);
if(!empty($v)) $dm->MakeEncodeFileTest(dirname(__FILE__),$v);
}
//测试无误后编译安装包
$fp = fopen($moduleFilename, 'w');
fwrite($fp, $modulinfo."\r\n");
fwrite($fp, "\r\n");
foreach($filelists as $v)
{
$v = trim($v);
if(!empty($v)) $dm->MakeEncodeFile(dirname(__FILE__),$v,$fp);
}
fwrite($fp,"\r\n");
fwrite($fp,"\r\n");
fclose($fp);
} else {
$fxml = $dm->GetFileXml($hashcode);
$fp = fopen($moduleFilename, 'w');
fwrite($fp, $modulinfo."\r\n");
fwrite($fp, $fxml);
fclose($fp);
}
ShowMsg("成功对模块重新编译！", "module_main.php");
exit();
}
//ClearAllLink();