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.
423 Commits
3 Branches
110MB
Tree: 9d70912541
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '9d70912541'
${ noResults }
DedeV6/src/dede/module_main.php

552 lines
22KB
Raw Blame History 

  1. <?php

  2. /**

  3.  * 模块管理

  4.  *

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

  6.  * @package        DedeBIZ.Administrator

  7.  * @copyright      Copyright (c) 2021, DedeBIZ.COM

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

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

  10.  */

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

  12. CheckPurview('sys_module');

  13. require_once(dirname(__FILE__)."/../include/dedemodule.class.php");

  14. require_once(dirname(__FILE__)."/../include/oxwindow.class.php");

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

  16. require_once(DEDEDATA."/admin/config_update.php");

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

  18. $mdurl = "";

  19. function TestWriteAble($d)

  20. {

  21.   $tfile = '_dedet.txt';

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

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

  24.   if (!$fp) return FALSE;

  25.   else {

  26.     fclose($fp);

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

  28.     if ($rs) return TRUE;

  29.     else return FALSE;

  30.   }

  31. }

  32. function ReWriteConfigAuto()

  33. {

  34.   global $dsql;

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

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

  37.     echo "配置文件'{$configfile}'不支持写入，无法修改系统配置参数";

  38.     //ClearAllLink();

  39.     exit();

  40.   }

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

  42.   flock($fp, 3);

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

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

  45.   $dsql->Execute();

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

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

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

  49.   }

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

  51.   fclose($fp);

  52. }

  53. /*--------------

  54. function ShowAll();

  55. --------------*/

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

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

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

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

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

  61.   $modules = array();

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

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

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

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

  66.   }

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

  68.   $dm->Clear();

  69.   exit();

  70. }

  71. /*--------------

  72. function ViewDevelopoer();

  73. --------------*/

  74. else if ($action == 'view_developoer') {

  75.   //检验开发者信息

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

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

  78.   if ($info == null) {

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

  80.     exit;

  81.   }

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

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

  84.   $dhd = new DedeHttpDown();

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

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

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

  88.   $offUrl = "";

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

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

  91.   }

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

  93. 

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

  95.     $devInfo['realname'] = $devInfo['dev_name'] = $info['team']." <font color='red'>未认证</font>";

  96.     $authAt = "0000-00-00";

  97.   }

  98.   ShowMsg("<div class='text-left'><p>开发者名称：{$devInfo['dev_name']}</p><p>开发者全称：{$devInfo['realname']}</p><p>开发者ID：{$devInfo['dev_id']} <a target='_blank' href='{$cfg_biz_dedebizUrl}/developer?dev_id={$devInfo['dev_id']}' class='btn btn-success btn-sm'>未认证</a></p>$offUrl<p>认证于：{$authAt}</p></a>", "javascript:;");

  99.   exit;

  100. }

  101. /*--------------

  102. function Setup();

  103. --------------*/

  104. else if ($action == 'setup') {

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

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

  107.   if ($infos == null) {

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

  109.     exit;

  110.   }

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

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

  113.   $filelist = '';

  114.   $prvdirs = array();

  115.   $incdir = array();

  116.   foreach ($filelists as $v) {

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

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

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

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

  121.     } else {

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

  123.     }

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

  125.   }

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

  127.   foreach ($filelists as $v) {

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

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

  130.     $n = TRUE;

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

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

  133.         $n = FALSE;

  134.         break;

  135.       }

  136.     }

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

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

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

  140.     }

  141.   }

  142.   $prvdir = "<table cellpadding='1' cellspacing='1' width='350' bgcolor='#cfcfcf' style='margin-top:10px'>\r\n";

  143.   $prvdir .= "<tr style='background:#FBFCE2'><th width='270'>目录</td><th align='center'>可写</td></tr>\r\n";

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

  145.     if ($v) $cw = '√';

  146.     else $cw = '<font color="red">×</font>';

  147.     $prvdir .= "<tr bgcolor='#ffffff'><td>$k</td>";

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

  149.   }

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

  151.   $win = new OxWindow();

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

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

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

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

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

  157.   $msg = "<style>.dtb{border-bottom:1px dotted #ccc}</style>

  158.     <table width='98%' border='0' cellspacing='0' cellpadding='0' class='table'>

  159.   <tr>

  160.     <td width='20%' height='26' class='dtb'>模块名称：</td>

  161.     <td width='80%' class='dtb'>{$infos['name']}</td>

  162.   </tr>

  163.   <tr>

  164.     <td height='26' class='dtb'>语言：</td>

  165.     <td class='dtb'>{$infos['lang']} {$alertMsg}</td>

  166.   </tr>

  167.   <tr>

  168.     <td height='26' class='dtb'>文件大小：</td>

  169.     <td class='dtb'>{$infos['filesize']}</td>

  170.   </tr>

  171.   <tr>

  172.     <td height='26' class='dtb'>开发者ID：</td>

  173.     <td class='dtb'>{$infos['dev_id']} <a href='{$cfg_biz_dedebizUrl}/developer?dev_id={$infos['dev_id']}' target='_blank' class='btn btn-success btn-sm'>未认证</a></td>

  174.   </tr>

  175.   <tr>

  176.     <td height='26' class='dtb'>发布时间：</td>

  177.     <td class='dtb'>{$infos['time']}</td>

  178.   </tr>

  179.   <tr>

  180.     <td height='26' class='dtb'>使用协议：</td>

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

  182.   </tr>

  183.   <tr>

  184.     <td height='30' class='dtb' colspan='2'>

  185.     <div class='alert alert-danger'><b>注意事项：</b>安装时请确保文件列表中涉及的目录前可写入权限，此外“后台管理目录”、“后台管理目录/templets”目录也必须暂时设置可写入权限。</div>

  186.     </td>

  187.   </tr>

  188.   <tr>

  189.     <td height='30'><b>目录权限检测：</b><br /> ../ 为根目录 <br /> ./ 表示当前目录</td>

  190.     <td>$prvdir</td>

  191.   </tr>

  192.   <tr>

  193.     <td height='30'>模块包含的所有文件列表：</td>

  194.     <td></td>

  195.   </tr>

  196.   <tr>

  197.     <td height='160' colspan='2'>

  198.      <textarea name='filelists' id='filelists' style='width:90%;height:200px'>{$filelist}</textarea>

  199.     </td>

  200.   </tr>

  201.   <tr>

  202.     <td height='26'>对于已存在文件处理方法：</td>

  203.     <td>

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

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

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

  207.    </td>

  208.   </tr>

  209. </table>";

  210.   $win->AddMsgItem("<div style='padding-left:10px;line-height:150%'>$msg</div>");

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

  212.   $win->Display();

  213.   $dm->Clear();

  214.   exit();

  215. }

  216. /*---------------

  217. function SetupRun()

  218. --------------*/

  219. else if ($action == 'setupstart') {

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

  221.     ShowMsg("目录 {$mdir} 不支持写入，这将导致安装程序没法正常创建", "-1");

  222.     exit();

  223.   }

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

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

  226.   extract($minfos, EXTR_SKIP);

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

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

  229.   $query = "INSERT INTO `#@__sys_module`(`hashcode` , `modname` , `indexname` , `indexurl` , `ismember` , `menustring` )

  230.     VALUES ('$hash' , '$name' , '$indexname' , '$indexurl' , '$ismember' , '$menustring' ) ";

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

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

  233.   if (!$rs) {

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

  235.     exit();

  236.   }

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

  238.   $filename = '';

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

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

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

  242.   $dm->Clear();

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

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

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

  246.     exit();

  247.   }

  248.   //系统自动安装

  249.   else {

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

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

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

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

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

  255.     if ($mysql_version >= 4.1) {

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

  257.     }

  258.     //_ROOTURL_

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

  260.     $rooturl = $cfg_basehost.$cfg_cmspath;

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

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

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

  264.     foreach ($sqls as $sql) {

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

  266.     }

  267.     ReWriteConfigAuto();

  268.     $rflwft = "<script language='javascript' type='text/javascript'>\r\n";

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

  270.     $rflwft .= "else top.document.getElementById('menufra').src = 'index_menu_module.php';\r\n";

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

  272.     echo $rflwft;

  273.     UpDateCatCache();

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

  275.     exit();

  276.   }

  277. }

  278. /*--------------

  279. function DelModule();

  280. --------------*/

  281. else if ($action == 'del') {

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

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

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

  285.   $dev_id = empty($infos['dev_id'])? "<a href='{$cfg_biz_dedebizUrl}/developer' target='_blank' class='btn btn-success 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>";

  286.   $win = new OxWindow();

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

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

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

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

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

  292.   $msg = "<style>.dtb{border-bottom:1px dotted #ccc}</style>

  293.     <table width='750' border='0' cellspacing='0' cellpadding='0'>

  294.     <tr>

  295.       <td width='20%' height='26' class='dtb'>模块名称：</td>

  296.       <td width='80%' class='dtb'>{$infos['name']}</td>

  297.     </tr>

  298.     <tr>

  299.       <td height='26' class='dtb'>语言：</td>

  300.       <td class='dtb'>{$infos['lang']} {$alertMsg}</td>

  301.     </tr>

  302.     <tr>

  303.       <td height='26' class='dtb'>文件大小：</td>

  304.       <td class='dtb'>{$infos['filesize']}</td>

  305.     </tr>

  306.     <tr>

  307.       <td height='26' class='dtb'>开发者ID：</td>

  308.       <td class='dtb'>{$dev_id}</td>

  309.     </tr>

  310.     <tr>

  311.       <td height='26' class='dtb'>发布时间：</td>

  312.       <td class='dtb'>{$infos['time']}</td>

  313.     </tr>

  314.     <tr>

  315.       <td height='26' class='dtb'>使用协议：</td>

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

  317.     </tr>

  318.     <tr>

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

  320.     </tr>

  321. </table>";

  322.   $win->AddMsgItem("<div style='padding-left:10px;line-height:150%'>$msg</div>");

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

  324.   $win->Display();

  325.   $dm->Clear();

  326.   exit();

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

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

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

  330.   unlink($modfile) or die("删除文件 {$modfile} 失败");

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

  332.   exit();

  333. }

  334. /*--------------

  335. function UnInstall();

  336. --------------*/

  337. else if ($action == 'uninstall') {

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

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

  340.   if ($infos['url'] == '') $infos['url'] = '&nbsp;';

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

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

  343.   $filelist = '';

  344.   foreach ($filelists as $v) {

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

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

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

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

  349.   }

  350.   $dev_id = empty($infos['dev_id'])? "<a href='{$cfg_biz_dedebizUrl}/developer' target='_blank' class='btn btn-success 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>";

  351.   $win = new OxWindow();

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

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

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

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

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

  357.   $msg = "<style>.dtb{border-bottom:1px dotted #ccc}</style>

  358.     <table width='750' border='0' cellspacing='0' cellpadding='0'>

  359.   <tr>

  360.     <td width='200' height='26' class='dtb'>模块名称：</td>

  361.     <td width='550' class='dtb'>{$infos['name']}</td>

  362.   </tr>

  363.   <tr>

  364.     <td height='26' class='dtb'>语言：</td>

  365.     <td class='dtb'>{$infos['lang']} {$alertMsg}</td>

  366.   </tr>

  367.   <tr>

  368.     <td height='26' class='dtb'>文件大小：</td>

  369.     <td class='dtb'>{$infos['filesize']}</td>

  370.   </tr>

  371.   <tr>

  372.     <td height='26' class='dtb'>开发者ID：</td>

  373.     <td class='dtb'>{$dev_id}</td>

  374.   </tr>

  375.   <tr>

  376.     <td height='26' class='dtb'>发布时间：</td>

  377.     <td class='dtb'>{$infos['time']}</td>

  378.   </tr>

  379.   <tr>

  380.     <td height='26' class='dtb'>使用协议：</td>

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

  382.   </tr>

  383.   <tr>

  384.     <td height='26'>模块包含的文件：<br />(文件路径相对于当前目录)</td><td>&nbsp;</td>

  385.   </tr>

  386.   <tr>

  387.     <td height='160' colspan='2'>

  388.      <textarea name='filelists' id='filelists' style='width:90%;height:200px'>{$filelist}</textarea>

  389.     </td>

  390.   </tr>

  391.   <tr>

  392.     <td height='26'>对于模块的文件处理方法：</td>

  393.     <td>

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

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

  396.    </td>

  397.   </tr>

  398. </table>";

  399.   $win->AddMsgItem("<div style='padding-left:10px;line-height:150%'>$msg</div>");

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

  401.   $win->Display();

  402.   $dm->Clear();

  403.   exit();

  404. }

  405. /*--------------

  406. function UnInstallRun();

  407. --------------*/

  408. else if ($action == 'uninstallok') {

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

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

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

  412.   extract($minfos, EXTR_SKIP);

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

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

  415.   }

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

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

  418.   $dm->Clear();

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

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

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

  422.     exit();

  423.   } else {

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

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

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

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

  428.       foreach ($sqls as $sql) {

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

  430.       }

  431.     }

  432.     ReWriteConfigAuto();

  433.     $rflwft = "<script language='javascript' type='text/javascript'>\r\n";

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

  435.     $rflwft .= "else top.document.getElementById('menufra').src = 'index_menu_module.php';\r\n";

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

  437.     echo $rflwft;

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

  439.     exit();

  440.   }

  441. }

  442. /*--------------

  443. function ShowReadme();

  444. --------------*/

  445. else if ($action == 'showreadme') {

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

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

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

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

  450.   $dm->Clear();

  451.   $win = new OxWindow();

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

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

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

  455.   $win->AddMsgItem("<div style='padding-left:10px;line-height:150%'>$msg</div>");

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

  457.   $win->Display();

  458.   exit();

  459. }

  460. /*--------------

  461. function ViewOne();

  462. --------------*/

  463. else if ($action == 'view') {

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

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

  466.   if ($infos['url'] == '') $infos['url'] = '&nbsp;';

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

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

  469.   $filelist = '';

  470.   $setupinfo = '';

  471.   foreach ($filelists as $v) {

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

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

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

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

  476.   }

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

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

  479.   } else {

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

  481.   }

  482.   $dev_id = empty($infos['dev_id'])? "<a href='module_main.php?action=setup&hash={$hash}' class='btn btn-success btn-sm'>安装</a> <a href='{$cfg_biz_dedebizUrl}/developer' target='_blank' class='btn btn-success 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>";

  483.   $win = new OxWindow();

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

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

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

  487.   $msg = "<style>.dtb{border-bottom:1px dotted #ccc}</style>

  488.     <table width='98%' border='0' cellspacing='0' cellpadding='0'>

  489.   <tr>

  490.     <td width='20%' height='26' class='dtb'>模块名称：</td>

  491.     <td width='80%' class='dtb'>{$infos['name']}</td>

  492.   </tr>

  493.   <tr>

  494.     <td height='26' class='dtb'>语言：</td>

  495.     <td class='dtb'>{$infos['lang']} {$alertMsg}</td>

  496.   </tr>

  497.   <tr>

  498.     <td height='26' class='dtb'>文件大小：</td>

  499.     <td class='dtb'>{$infos['filesize']}</td>

  500.   </tr>

  501.   <tr>

  502.     <td height='26' class='dtb'>开发者ID：</td>

  503.     <td class='dtb'>{$dev_id}</td>

  504.   </tr>

  505.   <tr>

  506.     <td height='26' class='dtb'>发布时间：</td>

  507.     <td class='dtb'>{$infos['time']}</td>

  508.   </tr>

  509.   <tr>

  510.     <td height='26' class='dtb'>使用协议：</td>

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

  512.   </tr>

  513.   <tr>

  514.     <td height='26'>模块包含的文件：<br />(文件路径相对于当前目录)</td><td>&nbsp;</td>

  515.   </tr>

  516.   <tr>

  517.     <td height='160' colspan='2'>

  518.      <textarea name='filelists' id='filelists' style='width:90%;height:200px'>{$filelist}</textarea>

  519.     </td>

  520.   </tr>

  521. </table>";

  522.   $win->AddMsgItem("<div style='padding-left:10px;line-height:150%'>$msg</div>");

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

  524.   $win->Display();

  525.   $dm->Clear();

  526.   exit();

  527. }

  528. /*--------------

  529. function Edit();

  530. --------------*/

  531. else if ($action == 'edit') {

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

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

  534.   extract($minfos, EXTR_SKIP);

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

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

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

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

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

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

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

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

  543.   $dm->Clear();

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

  545.   exit();

  546. }

  547. /*--------------

  548. function Download();

  549. --------------*/

  550. else if ($action == 'download') {

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

  552. }