DedeBIZ
/
DedeV6
Watch 2
Star 0
Fork 0
Code Pull Requests 0 Releases 25 Activity
国内流行的内容管理系统（CMS）多端全媒体解决方案 https://www.dedebiz.com
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1627 Commits
3 Branches
110MB
Tree: 0c76340867
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '0c76340867'
${ noResults }
DedeV6/src/admin/module_main.php

521 lines
22KB
Raw Blame History 

  1. <?php

  2. /**

  3.  * 模块管理

  4.  *

  5.  * @version        $id:module_main.php 14:17 2010年7月20日 tianya $

  6.  * @package        DedeBIZ.Administrator

  7.  * @copyright      Copyright (c) 2022 DedeBIZ.COM

  8.  * @license        https://www.dedebiz.com/license

  9.  * @link           https://www.dedebiz.com

  10.  */

  11. require_once(dirname(__FILE__)."/config.php");

  12. if (DEDEBIZ_SAFE_MODE) {

  13.   die(DedeAlert("系统已启用安全模式，无法使用当前功能",ALERT_DANGER));

  14. }

  15. CheckPurview('sys_module');

  16. require_once(DEDEINC."/dedemodule.class.php");

  17. require_once(DEDEINC."/libraries/oxwindow.class.php");

  18. if (empty($action)) $action = '';

  19. $mdir = DEDEDATA.'/module';

  20. $mdurl = "";

  21. function TestWriteAble($d)

  22. {

  23.     $tfile = '_dedet.txt';

  24.     $d = preg_replace("#\/$#", '', $d);

  25.     $fp = @fopen($d.'/'.$tfile, 'w');

  26.     if (!$fp) return FALSE;

  27.     else {

  28.         fclose($fp);

  29.         $rs = @unlink($d.'/'.$tfile);

  30.         if ($rs) return TRUE;

  31.       else return FALSE;

  32.     }

  33. }

  34. function ReWriteConfigAuto()

  35. {

  36.     global $dsql;

  37.     $configfile = DEDEDATA.'/config.cache.inc.php';

  38.     if (!is_writeable($configfile)) {

  39.         echo "配置文件<span class='text-primary'>{$configfile}</span>不支持写入，无法修改系统配置参数";

  40.         exit();

  41.     }

  42.     $fp = fopen($configfile, 'w');

  43.     flock($fp, 3);

  44.     fwrite($fp, "<"."?php\r\n");

  45.     $dsql->SetQuery("SELECT `varname`,`type`,`value`,`groupid` FROM `#@__sysconfig` ORDER BY aid ASC ");

  46.     $dsql->Execute();

  47.     while ($row = $dsql->GetArray()) {

  48.         if (empty($row['value']) && $row['type'] == 'number') $row['value'] = 0;

  49.         if ($row['type'] == 'number') fwrite($fp, "\${$row['varname']} = ".$row['value'].";\r\n");

  50.         else fwrite($fp, "\${$row['varname']} = '".str_replace("'", '', $row['value'])."';\r\n");

  51.       }

  52.       fwrite($fp, "?".">");

  53.       fclose($fp);

  54. }

  55. if ($action == '') {

  56.     $types = array('soft' => '模块', 'templets' => '模板', 'plus' => '小插件', 'patch' => '补丁');

  57.     $dm = new DedeModule($mdir);

  58.     if (empty($moduletype)) $moduletype = '';

  59.     $modules_remote = $dm->GetModuleUrlList($moduletype, $mdurl);

  60.     $modules = array();

  61.     $modules = $dm->GetModuleList($moduletype);

  62.     is_array($modules) || $modules = array();

  63.     if (is_array($modules_remote) && count($modules_remote) > 0) {

  64.         $modules = array_merge($modules, $modules_remote);

  65.     }

  66.     require_once(dirname(__FILE__)."/templets/module_main.htm");

  67.     $dm->Clear();

  68.     exit();

  69. } else if ($action == 'view_developoer') {

  70.     //检验开发者信息

  71.     $dm = new DedeModule($mdir);

  72.     $info = $dm->GetModuleInfo($hash);

  73.     if ($info == null) {

  74.         ShowMsg("获取模块信息错误，模块文件可能被篡改", -1);

  75.         exit;

  76.     }

  77.     $dev_id = $info['dev_id'];

  78.     $devURL = DEDECDNURL."/developers/$dev_id.json";

  79.     $dhd = new DedeHttpDown();

  80.     $dhd->OpenUrl($devURL);

  81.     $devContent = $dhd->GetHtml();

  82.     $devInfo = (array)json_decode($devContent);

  83.     $offUrl = "";

  84.     if ($devInfo['dev_type'] == 1) {

  85.         $offUrl = "<p>官方网址：<code>{$devInfo['offurl']}</code><small>（复制在浏览器中打开）</small></p>";

  86.     }

  87.     $authAt = date("Y-m-d", $devInfo['auth_at']);

  88.     if (!isset($info['dev_id'])) {

  89.         $devInfo['dev_name'] = $info['team']."<span class='btn btn-danger btn-sm'>未认证</span>";

  90.         $authAt = "未知";

  91.     }

  92.     ShowMsg("<p>开发者名称：{$devInfo['dev_name']}</p><p>开发者id：{$devInfo['dev_id']}</p><span>认证于：{$authAt}</span>", "-1");

  93.     exit;

  94. } else if ($action == 'setup') {

  95.     $dm = new DedeModule($mdir);

  96.     $infos = $dm->GetModuleInfo($hash);

  97.     if ($infos == null) {

  98.         ShowMsg("获取模块信息错误，模块文件可能被篡改", -1);

  99.         exit;

  100.     }

  101.     $alertMsg = ($infos['lang'] == $cfg_soft_lang ? '' : '<br>该模块的语言编码与您系统的编码不一致，请向开发者确认它的兼容性');

  102.     $filelists = (array)$dm->GetFileLists($hash);

  103.     $filelist = '';

  104.     $prvdirs = array();

  105.     $incdir = array();

  106.     foreach ($filelists as $v) {

  107.         if (empty($v['name'])) continue;

  108.         if ($v['type'] == 'dir') {

  109.             $v['type'] = '目录';

  110.             $incdir[] = $v['name'];

  111.         } else {

  112.             $v['type'] = '文件';

  113.         }

  114.         $filelist .= "{$v['type']}|{$v['name']}\r\n";

  115.     }

  116.     //检测需要的目录权限

  117.     foreach ($filelists as $v) {

  118.         $prvdir = preg_replace("#\/([^\/]*)$#", '/', $v['name']);

  119.         if (!preg_match("#^\.#", $prvdir)) $prvdir = './';

  120.         $n = TRUE;

  121.         foreach ($incdir as $k => $v) {

  122.             if (preg_match("#^".$v."#i", $prvdir)) {

  123.                 $n = FALSE;

  124.                 break;

  125.             }

  126.         }

  127.         if (!isset($prvdirs[$prvdir]) && $n && is_dir($prvdir)) {

  128.             $prvdirs[$prvdir][0] = 1;

  129.             $prvdirs[$prvdir][1] = TestWriteAble($prvdir);

  130.         }

  131.     }

  132.     $prvdir = "<table cellpadding='1' cellspacing='1'>\r\n";

  133.     $prvdir .= "<tr bgcolor='#e9ecef'><th width='270'>目录</td><th align='center'>可写</td></tr>\r\n";

  134.     foreach ($prvdirs as $k => $v) {

  135.         if ($v) $cw = "<span class='text-success'><i class='fa fa-check'></i></span>";

  136.         else $cw = "<span class='text-danger'>×</span>";

  137.         $prvdir .= "<tr><td>$k</td>";

  138.         $prvdir .= "<td align='center'>$cw</td></tr>\r\n";

  139.     }

  140.     $prvdir .= "</table>";

  141.     $win = new OxWindow();

  142.     $win->Init("module_main.php", "js/blank.js", "post");

  143.     $wecome_info = "模块管理";

  144.     $devURL = DEDECDNURL."/developers/{$infos['dev_id']}.json";

  145.     $dhd = new DedeHttpDown();

  146.     $dhd->OpenUrl($devURL);

  147.     $devContent = $dhd->GetHtml();

  148.     $devInfo = (array)json_decode($devContent);

  149.     $s = "未认证";

  150.     if (($devInfo['dev_id'] == $infos['dev_id']) && !empty($devInfo['dev_id'])) {

  151.       $s = "已认证";

  152.     }

  153.     $win->AddTitle("<a href='module_main.php'>模块管理</a> &gt; 安装{$infos['name']}");

  154.     $win->AddHidden("hash", $hash);

  155.     $win->AddHidden("action", 'setupstart');

  156.     $msg = "<table width='98%' cellspacing='0' cellpadding='0' class='table'>

  157.     <tr>

  158.         <td class='admin-td' colspan='2'>

  159.             <div class='alert alert-danger mb-0'>安装时文件列表中涉及的目录前可写入权限，此外后台管理目录和主题目录也必须暂时设置可写入权限</div>

  160.         </td>

  161.     </tr>

  162.     <tr>

  163.         <td width='260' class='admin-td'>模块名称：</td>

  164.         <td class='admin-td'>{$infos['name']}</td>

  165.     </tr>

  166.     <tr>

  167.         <td class='admin-td'>语言：</td>

  168.         <td class='admin-td'>{$infos['lang']} {$alertMsg}</td>

  169.     </tr>

  170.     <tr>

  171.         <td class='admin-td'>文件大小：</td>

  172.         <td class='admin-td'>{$infos['filesize']}</td>

  173.     </tr>

  174.     <tr>

  175.         <td class='admin-td'>开发者id：</td>

  176.         <td class='admin-td'>{$infos['dev_id']} <a href='{$cfg_biz_dedebizUrl}/developer?dev_id={$infos['dev_id']}' target='_blank' class='btn btn-success btn-sm'>{$s}</a></td>

  177.     </tr>

  178.     <tr>

  179.         <td class='admin-td'>发布时间：</td>

  180.         <td class='admin-td'>{$infos['time']}</td>

  181.     </tr>

  182.     <tr>

  183.         <td class='admin-td'>使用协议：</td>

  184.         <td class='admin-td'><a href='module_main.php?action=showreadme&hash={$hash}' target='_blank' class='btn btn-success btn-sm'>浏览</a></td>

  185.     </tr>

  186.     <tr>

  187.         <td>目录权限说明：<br>../为根目录<br>./表示当前目录</td>

  188.         <td>$prvdir</td>

  189.     </tr>

  190.     <tr>

  191.         <td>模块包含的所有文件列表：</td>

  192.         <td></td>

  193.     </tr>

  194.     <tr>

  195.         <td colspan='2'><textarea name='filelists' id='filelists' class='admin-textarea-xl'>{$filelist}</textarea></td>

  196.     </tr>

  197.     <tr>

  198.         <td>对于已存在文件处理方法：</td>

  199.         <td>

  200.             <label><input type='radio' name='isreplace' value='1' checked='checked'> 覆盖</label>

  201.             <label><input type='radio' name='isreplace' value='3'> 覆盖，保留副本</label>

  202.             <label><input type='radio' name='isreplace' value='0'> 保留旧文件</label>

  203.         </td>

  204.     </tr>

  205.     </table>";

  206.     $win->AddMsgItem("$msg");

  207.     $winform = $win->GetWindow("ok", "");

  208.     $win->Display();

  209.     $dm->Clear();

  210.     exit();

  211. } else if ($action == 'setupstart') {

  212.     if (!is_writeable($mdir)) {

  213.         ShowMsg("目录<span class='text-primary'>{$mdir}</span>不支持写入，这导致程序安装没法正常创建", "-1");

  214.         exit();

  215.     }

  216.     $dm = new DedeModule($mdir);

  217.     $minfos = (array)$dm->GetModuleInfo($hash);

  218.     extract($minfos, EXTR_SKIP);

  219.     $menustring = addslashes($dm->GetSystemFile($hash, 'menustring'));

  220.     $indexurl = str_replace('**', '=', $indexurl);

  221.     $query = "INSERT INTO `#@__sys_module` (`hashcode`,`modname`,`indexname`,`indexurl`,`ismember`,`menustring` ) VALUES ('$hash','$name','$indexname','$indexurl','$ismember','$menustring' ) ";

  222.     $rs = $dsql->ExecuteNoneQuery("DELETE FROM `#@__sys_module` WHERE hashcode LIKE '$hash' ");

  223.     $rs = $dsql->ExecuteNoneQuery($query);

  224.     if (!$rs) {

  225.         ShowMsg('保存数据库信息失败，无法完成安装'.$dsql->GetError(), 'javascript:;');

  226.         exit();

  227.     }

  228.     $dm->WriteFiles($hash, $isreplace);

  229.     $filename = '';

  230.     if (!isset($autosetup) || $autosetup == 0) $filename = $dm->WriteSystemFile($hash, 'setup');

  231.     if (!isset($autodel) || $autodel == 0) $dm->WriteSystemFile($hash, 'uninstall');

  232.     $dm->WriteSystemFile($hash, 'readme');

  233.     $dm->Clear();

  234.     //用模块的程序安装安装

  235.     if (!isset($autosetup) || $autosetup == 0) {

  236.         include(DEDEDATA.'/module/'.$filename);

  237.         exit();

  238.     }

  239.     //系统自动安装

  240.     else {

  241.         $mysql_version = $dsql->GetVersion(TRUE);

  242.         //默认使用MySQL 4.1 以下版本的SQL语句，对大于4.1版本采用替换处理 TYPE=MyISAM ==> ENGINE=MyISAM DEFAULT CHARSET=#~lang~#

  243.         $setupsql = $dm->GetSystemFile($hash, 'setupsql40');

  244.         $setupsql = preg_replace("#ENGINE=MyISAM#i", 'TYPE=MyISAM', $setupsql);

  245.         $sql41tmp = 'ENGINE=MyISAM DEFAULT CHARSET='.$cfg_db_language;

  246.         if ($mysql_version >= 4.1) {

  247.             $setupsql = preg_replace("#TYPE=MyISAM#i", $sql41tmp, $setupsql);

  248.         }

  249.         //_ROOTURL_

  250.         if ($cfg_cmspath == '/') $cfg_cmspath = '';

  251.         $rooturl = $cfg_basehost.$cfg_cmspath;

  252.         $setupsql = preg_replace("#_ROOTURL_#i", $rooturl, $setupsql);

  253.         $setupsql = preg_replace("#[\r\n]{1,}#", "\n", $setupsql);

  254.         $sqls = @split(";[ \t]{0,}\n", $setupsql);

  255.         foreach ($sqls as $sql) {

  256.             if (trim($sql) != '') $dsql->ExecuteNoneQuery($sql);

  257.         }

  258.         ReWriteConfigAuto();

  259.         $rflwft = "<script>\r\n";

  260.         $rflwft .= "if (window.navigator.userAgent.indexOf('MSIE')>=1) top.document.frames.menu.location = 'index_menu.php';\r\n";

  261.         $rflwft .= "else top.document.getElementsByName('menu').src = 'index_menu.php';\r\n";

  262.         $rflwft .= "</script>";

  263.         echo $rflwft;

  264.         UpDateCatCache();

  265.         ShowMsg('模块安装完成', 'module_main.php');

  266.         exit();

  267.     }

  268. } else if ($action == 'del') {

  269.     $dm = new DedeModule($mdir);

  270.     $infos = $dm->GetModuleInfo($hash);

  271.     $alertMsg = ($infos['lang'] == $cfg_soft_lang ? '' : '<br>该模块的语言编码与您系统的编码不一致，请向开发者确认它的兼容性');

  272.     $dev_id = empty($infos['dev_id'])? "<a href='{$cfg_biz_dedebizUrl}/developer' target='_blank' class='btn btn-danger btn-sm'>未认证</a>" : "{$infos['dev_id']} <a href='{$cfg_biz_dedebizUrl}/developer?dev_id={$infos['dev_id']}' target='_blank' class='btn btn-success btn-sm'>已认证</a>";

  273.     $win = new OxWindow();

  274.     $win->Init("module_main.php", "js/blank.js", "post");

  275.     $wecome_info = "模块管理";

  276.     $win->AddTitle("<a href='module_main.php'>模块管理</a> &gt; 删除{$infos['name']}");

  277.     $win->AddHidden('hash', $hash);

  278.     $win->AddHidden('action', 'delok');

  279.     $msg = "<table width='98%' cellspacing='0' cellpadding='0' class='table'>

  280.     <tr>

  281.         <td width='260' class='admin-td'>模块名称：</td>

  282.         <td class='admin-td'>{$infos['name']}</td>

  283.     </tr>

  284.     <tr>

  285.         <td class='admin-td'>语言：</td>

  286.         <td class='admin-td'>{$infos['lang']} {$alertMsg}</td>

  287.     </tr>

  288.     <tr>

  289.         <td class='admin-td'>文件大小：</td>

  290.         <td class='admin-td'>{$infos['filesize']}</td>

  291.     </tr>

  292.     <tr>

  293.         <td class='admin-td'>开发者id：</td>

  294.         <td class='admin-td'>{$dev_id}</td>

  295.     </tr>

  296.     <tr>

  297.         <td class='admin-td'>发布时间：</td>

  298.         <td class='admin-td'>{$infos['time']}</td>

  299.     </tr>

  300.     <tr>

  301.         <td class='admin-td'>使用协议：</td>

  302.         <td class='admin-td'><a href='module_main.php?action=showreadme&hash={$hash}' target='_blank' class='btn btn-success btn-sm'>浏览</a></td>

  303.     </tr>

  304.     <tr>

  305.         <td colspan='2'>删除模块仅删除这个模块的安装包文件，如果您已经安装，请执行<a href='module_main.php?hash={$hash}&action=uninstall'>卸载程序</a>来删除</td>

  306.     </tr>

  307.     </table>";

  308.     $win->AddMsgItem("$msg");

  309.     $winform = $win->GetWindow("ok", "");

  310.     $win->Display();

  311.     $dm->Clear();

  312.     exit();

  313.     } else if ($action == 'delok') {

  314.     $dm = new DedeModule($mdir);

  315.     $modfile = $mdir."/".$dm->GetHashFile($hash);

  316.     unlink($modfile) or die("删除文件<span class='text-primary'>{$modfile}</span>失败");

  317.     ShowMsg("成功删除一个模块文件", "module_main.php");

  318.     exit();

  319. } else if ($action == 'uninstall') {

  320.     $dm = new DedeModule($mdir);

  321.     $infos = $dm->GetModuleInfo($hash);

  322.     if ($infos['url'] == '') $infos['url'] = ' ';

  323.     $alertMsg = ($infos['lang'] == $cfg_soft_lang ? '' : '<br>该模块的语言编码与您系统的编码不一致，请向开发者确认它的兼容性');

  324.     $filelists = (array)$dm->GetFileLists($hash);

  325.     $filelist = '';

  326.     foreach ($filelists as $v) {

  327.         if (empty($v['name'])) continue;

  328.         if ($v['type'] == 'dir') $v['type'] = '目录';

  329.         else $v['type'] = '文件';

  330.         $filelist .= "{$v['type']}|{$v['name']}\r\n";

  331.     }

  332.     $dev_id = empty($infos['dev_id'])? "<a href='{$cfg_biz_dedebizUrl}/developer' target='_blank' class='btn btn-danger btn-sm'>未认证</a>" : "{$infos['dev_id']} <a href='{$cfg_biz_dedebizUrl}/developer?dev_id={$infos['dev_id']}' target='_blank' class='btn btn-success btn-sm'>已认证</a>";

  333.     $win = new OxWindow();

  334.     $win->Init("module_main.php", "js/blank.js", "post");

  335.     $wecome_info = "模块管理";

  336.     $win->AddTitle("<a href='module_main.php'>模块管理</a> &gt; 卸载{$infos['name']}");

  337.     $win->AddHidden("hash", $hash);

  338.     $win->AddHidden("action", 'uninstallok');

  339.     $msg = "<table width='98%' cellspacing='0' cellpadding='0' class='table'>

  340.     <tr>

  341.         <td width='260' class='admin-td'>模块名称：</td>

  342.         <td class='admin-td'>{$infos['name']}</td>

  343.     </tr>

  344.     <tr>

  345.         <td class='admin-td'>语言：</td>

  346.         <td class='admin-td'>{$infos['lang']} {$alertMsg}</td>

  347.     </tr>

  348.     <tr>

  349.         <td class='admin-td'>文件大小：</td>

  350.         <td class='admin-td'>{$infos['filesize']}</td>

  351.     </tr>

  352.     <tr>

  353.         <td class='admin-td'>开发者id：</td>

  354.         <td class='admin-td'>{$dev_id}</td>

  355.     </tr>

  356.     <tr>

  357.         <td class='admin-td'>发布时间：</td>

  358.         <td class='admin-td'>{$infos['time']}</td>

  359.     </tr>

  360.     <tr>

  361.         <td class='admin-td'>使用协议：</td>

  362.         <td class='admin-td'><a href='module_main.php?action=showreadme&hash={$hash}' target='_blank' class='btn btn-success btn-sm'>浏览</a></td>

  363.     </tr>

  364.     <tr>

  365.         <td>模块包含的文件（文件路径相对于当前目录）</td>

  366.         <td></td>

  367.     </tr>

  368.     <tr>

  369.         <td colspan='2'><textarea name='filelists' id='filelists' class='admin-textarea-xl'>{$filelist}</textarea></td>

  370.     </tr>

  371.     <tr>

  372.         <td>对于模块的文件处理方法：</td>

  373.         <td>

  374.             <label><input type='radio' name='isreplace' value='0' checked='checked'> 手工删除文件，仅运行卸载程序</label>

  375.             <label><input type='radio' name='isreplace' value='2'> 删除模块的所有文件</label>

  376.         </td>

  377.     </tr>

  378.     </table>";

  379.     $win->AddMsgItem("$msg");

  380.     $winform = $win->GetWindow("ok", "");

  381.     $win->Display();

  382.     $dm->Clear();

  383.     exit();

  384. } else if ($action == 'uninstallok') {

  385.     $dsql->ExecuteNoneQuery("DELETE FROM `#@__sys_module` WHERE hashcode LIKE '$hash' ");

  386.     $dm = new DedeModule($mdir);

  387.     $minfos = (array)$dm->GetModuleInfo($hash);

  388.     extract($minfos, EXTR_SKIP);

  389.     if (!isset($moduletype) || $moduletype != 'patch') {

  390.         $dm->DeleteFiles($hash, $isreplace);

  391.     }

  392.     @$dm->DelSystemFile($hash, 'readme');

  393.     @$dm->DelSystemFile($hash, 'setup');

  394.     $dm->Clear();

  395.     if (!isset($autodel) || $autodel == 0) {

  396.         include(DEDEDATA."/module/{$hash}-uninstall.php");

  397.         @unlink(DEDEDATA."/module/{$hash}-uninstall.php");

  398.         exit();

  399.     } else {

  400.         @$dm->DelSystemFile($hash, 'uninstall');

  401.         $delsql = $dm->GetSystemFile($hash, 'delsql');

  402.         if (trim($delsql) != '') {

  403.             $sqls = explode(';', $delsql);

  404.             foreach ($sqls as $sql) {

  405.                 if (trim($sql) != '') $dsql->ExecuteNoneQuery($sql);

  406.             }

  407.         }

  408.         ReWriteConfigAuto();

  409.         $rflwft = "<script>\r\n";

  410.         $rflwft .= "if (window.navigator.userAgent.indexOf('MSIE')>=1) top.document.frames.menu.location = 'index_menu.php';\r\n";

  411.         $rflwft .= "else top.document.getElementsByName('menu').src = 'index_menu.php';\r\n";

  412.         $rflwft .= "</script>";

  413.         echo $rflwft;

  414.         ShowMsg('模块卸载完成', 'module_main.php');

  415.         exit();

  416.     }

  417. } else if ($action == 'showreadme') {

  418.     $dm = new DedeModule($mdir);

  419.     $msg = $dm->GetSystemFile($hash, 'readme');

  420.     $msg = preg_replace("/(.*)<body/isU", "", $msg);

  421.     $msg = preg_replace("/<\/body>(.*)/isU", "", $msg);

  422.     $dm->Clear();

  423.     $win = new OxWindow();

  424.     $win->Init("module_main.php", "js/blank.js", "post");

  425.     $wecome_info = "模块管理";

  426.     $win->AddTitle("<a href='module_main.php'>模块管理</a> &gt; 使用说明");

  427.     $win->AddMsgItem("$msg");

  428.     $winform = $win->GetWindow("hand");

  429.     $win->Display();

  430.     exit();

  431. } else if ($action == 'view') {

  432.     $dm = new DedeModule($mdir);

  433.     $infos = $dm->GetModuleInfo($hash);

  434.     if ($infos['url'] == '') $infos['url'] = ' ';

  435.     $alertMsg = ($infos['lang'] == $cfg_soft_lang ? '' : '<br>该模块的语言编码与您系统的编码不一致，请向开发者确认它的兼容性');

  436.     $filelists = (array)$dm->GetFileLists($hash);

  437.     $filelist = '';

  438.     $setupinfo = '';

  439.     $devURL = DEDECDNURL."/developers/{$infos['dev_id']}.json";

  440.     $dhd = new DedeHttpDown();

  441.     $dhd->OpenUrl($devURL);

  442.     $devContent = $dhd->GetHtml();

  443.     $devInfo = (array)json_decode($devContent);

  444.     $s = "未认证";

  445.     if (($devInfo['dev_id'] == $infos['dev_id']) && !empty($devInfo['dev_id'])) {

  446.       $s = "已认证";

  447.     }

  448.     foreach ($filelists as $v) {

  449.         if (empty($v['name'])) continue;

  450.         if ($v['type'] == 'dir') $v['type'] = '目录';

  451.         else $v['type'] = '文件';

  452.         $filelist .= "{$v['type']}|{$v['name']}\r\n";

  453.     }

  454.     if (file_exists(DEDEDATA."/module/{$hash}-readme.php")) {

  455.         $setupinfo = "已安装 <a href='module_main.php?action=uninstall&hash={$hash}'>卸载</a>";

  456.     } else {

  457.         $setupinfo = "未安装 <a href='module_main.php?action=setup&hash={$hash}'>安装</a>";

  458.     }

  459. 

  460.     $dev_id = empty($infos['dev_id'])? "<a href='module_main.php?action=setup&hash={$hash}' class='btn btn-warning btn-sm'>安装</a><a href='{$cfg_biz_dedebizUrl}/developer' target='_blank' class='btn btn-success btn-sm'>{$s}</a>" : "{$infos['dev_id']} <a href='module_main.php?action=setup&hash={$hash}' class='btn btn-warning btn-sm'>安装</a><a href='{$cfg_biz_dedebizUrl}/developer?dev_id={$infos['dev_id']}' target='_blank' class='btn btn-success btn-sm'>{$s}</a>";

  461.     $win = new OxWindow();

  462.     $win->Init("", "js/blank.js", "");

  463.     $wecome_info = "模块管理";

  464.     $win->AddTitle("<a href='module_main.php'>模块管理</a> &gt; {$infos['name']}");

  465.     $msg = "<table width='98%' cellspacing='0' cellpadding='0'>

  466.     <tr>

  467.         <td width='260' class='admin-td'>模块名称：</td>

  468.         <td class='admin-td'>{$infos['name']}</td>

  469.     </tr>

  470.     <tr>

  471.         <td class='admin-td'>语言：</td>

  472.         <td class='admin-td'>{$infos['lang']} {$alertMsg}</td>

  473.     </tr>

  474.     <tr>

  475.         <td class='admin-td'>文件大小：</td>

  476.         <td class='admin-td'>{$infos['filesize']}</td>

  477.     </tr>

  478.     <tr>

  479.         <td class='admin-td'>开发者id：</td>

  480.         <td class='admin-td'>{$dev_id}</td>

  481.     </tr>

  482.     <tr>

  483.         <td class='admin-td'>发布时间：</td>

  484.         <td class='admin-td'>{$infos['time']}</td>

  485.     </tr>

  486.     <tr>

  487.         <td class='admin-td'>使用协议：</td>

  488.         <td class='admin-td'><a href='module_main.php?action=showreadme&hash={$hash}' target='_blank' class='btn btn-success btn-sm'>浏览</a></td>

  489.     </tr>

  490.     <tr>

  491.         <td>模块包含的文件（文件路径相对于当前目录）</td>

  492.         <td></td>

  493.     </tr>

  494.     <tr>

  495.         <td colspan='2'><textarea name='filelists' id='filelists' class='admin-textarea-xl'>{$filelist}</textarea></td>

  496.     </tr>

  497.     </table>";

  498.     $win->AddMsgItem("$msg");

  499.     $winform = $win->GetWindow('hand', '');

  500.     $win->Display();

  501.     $dm->Clear();

  502.     exit();

  503. } else if ($action == 'edit') {

  504.     $dm = new DedeModule($mdir);

  505.     $minfos = (array)$dm->GetModuleInfo($hash);

  506.     extract($minfos, EXTR_SKIP);

  507.     if (!isset($lang)) $lang = 'gb2312';

  508.     if (!isset($moduletype)) $moduletype = 'soft';

  509.     $menustring = $dm->GetSystemFile($hash, 'menustring');

  510.     $setupsql40 = dede_htmlspecialchars($dm->GetSystemFile($hash, 'setupsql40'));

  511.     $readmetxt = $dm->GetSystemFile($hash, 'readme');

  512.     $delsql = $dm->GetSystemFile($hash, 'delsql');

  513.     $filelist = $dm->GetSystemFile($hash, 'oldfilelist', false);

  514.     $indexurl = str_replace('**', '=', $indexurl);

  515.     $dm->Clear();

  516.     require_once(dirname(__FILE__).'/templets/module_edit.htm');

  517.     exit();

  518. } else if ($action == 'download') {

  519.     ShowMsg("暂不支持模块下载功能", "javascript:;");

  520. }

  521. ?>