function vmailsend($id, $o, $res)
{
req('pop,spe,tri,mod');
$http = host();
$htacc = urlread($id);
list($from, $to, $txt, $suj) = ajxr($res);
if (strpos($to, "@") !== false) {
$suj = sql('suj', 'qda', 'v', 'id="' . $id . '"');
$msg = divc("panel justy", $txt);
$msg .= lkc("", $http . $htacc, bal("h2", $suj));
$msg .= divc("panel justy", read_msg($id, "nlb"));
send_mail("html", $to, $suj, $msg, $from ? $from : hostname(), $htacc);
return btn("popbt", nms(34) . ' ' . nms(79) . ' ' . nms(36) . ': ' . $to);
} else {
return btn("popdel", 'error' . $to);
}
}
$t = $id;
$s = 440;
break;
case "popmsql":
$r = msql_read($id, $va, $opt, 1);
p($r);
if ($r) {
$ret = make_divtable($r, 1);
}
$t = $id;
$s = 440;
break;
case "popread":
req('pop,spe,tri');
$t = 'article';
$ret = read_msg($id, 3);
break;
case "popvideo":
req('pop,spe,tri');
$t = 'video';
$ret = jwplayer($id, 400);
break;
//
//
case "poppdf":
$ret = pdfreader_j($id, $va);
break;
case "swf":
req('pop');
$t = 'swf';
$ret = embed_flsh($id, $va, $opt, '');
function codeline($v, $p, $c)
{
//v§p:c //v:c
switch ($c) {
//elements
case 'br':
return br();
break;
case 'hr':
return hr();
break;
case 'balise':
if ($p) {
@(list($bal, $id, $css, $sty) = explode('|', $p));
if ($v) {
return balise($bal, array(5 => $css, 3 => $id, 16 => $sty), $v);
}
}
break;
case 'html':
if ($p && $v) {
return bal($p, $v);
}
break;
case 'span':
if (trim($v)) {
return span($p, $v);
}
break;
case 'div':
if (trim($v)) {
return div($p, $v);
}
break;
case 'css':
if (trim($v)) {
return btn($p, $v);
}
break;
case 'clear':
return divc($c, $v);
break;
//attributs
//attributs
case 'id':
return atd($c, $v);
break;
case 'class':
return atb($c, $v);
break;
case 'style':
return atb($c, $v);
break;
case 'name':
return atb($c, $v);
break;
case 'font-size':
return atb($c, $v);
break;
case 'font-family':
return atb($c, $v);
break;
//apps
//apps
case 'text':
return $v ? $v : $p;
break;
case 'url':
return lka($v, $p ? $p : preplink($v));
break;
case 'jurl':
return lj('', $v, $p);
break;
case 'link':
return special_link($v . '§' . $p);
break;
case 'ajx':
return lj('', 'popup', '_' . $p, $v);
break;
case 'anchor':
return '<a name="' . $v . '"></a>';
break;
case 'date':
return mkday(is_numeric($p) ? $p : '', $v);
break;
case 'title':
return suj_of_id($v);
break;
case 'read':
return read_msg($p, 3);
break;
case 'image':
return image($v);
break;
case 'thumb':
return make_thumb_d($v, $p);
break;
case 'picto':
return picto($v, $p);
break;
//high_level
//high_level
case 'cut':
list($s, $e) = split("/", $p);
return embed_detect($v, $s, $e, '');
break;
case 'split':
return explode($p, $v);
break;
case 'conn':
return connectors($v . ':' . $p, 3, '');
break;
case 'exec':
if (auth(5)) {
$data = $p;
eval($v);
return $output;
}
break;
case 'core':
if (is_array($v)) {
return call_user_func($p, $v, '', '');
} else {
$vb = explode('/', $v);
return call_user_func($p, $vb[0], $vb[1], $vb[2], $vb[3]);
}
break;
case 'plug':
return plugin($v, $p);
break;
case 'foreach':
foreach ($v as $va) {
$ret .= cbasic_exec($va, '', '', $o);
}
return $ret;
break;
default:
return $v;
}
}
function import_art($d, $m)
{
list($dy, $nod, $frm, $suj) = sql('day,nod,frm,suj,img', 'qda', 'r', 'id="' . $d . '"');
$nde = $_SESSION['mn'][$nod];
//.'#'.$id
$ret = lkc("txtsmall", urlread($d), $nde . ' (' . $frm . ') ' . mkday($dy)) . ' ';
if ($_GET['read'] == $d) {
$m = 3;
}
$msg = read_msg($d, $m);
$msg = str_replace("<br />", "", $msg);
//if(rstr(13))
return $ret . $msg;
}
function restricted_area($n)
{
$ret = read_msg("restricted_area", "");
if (!$ret) {
$ret = nms(55);
}
return divc('txtalert', $ret . ': ' . nameofauthes($n));
}
function friend_art($o)
{
if ($_SESSION['read']) {
$id = id_of_suj($_SESSION['read']);
$in = read_msg($id, 1, "");
}
if (is_numeric($id)) {
return divc($o, $in);
}
}
function projectDispatch($op)
{
switch ($op) {
case "project":
project();
break;
case "addprj":
addprj();
break;
case "addprj_now":
if (!isset($_POST["undo"])) {
addprj_now();
} else {
project();
}
break;
case "showprj":
show_prj();
break;
case "manprjadmin":
manprjadmin();
break;
case "update_admins":
update_admins();
break;
case "prjadditem":
if (isset($_POST["undo"])) {
Util::jump_to("index.php?modname=project&op=showprj&id=" . $_GET["id"]);
} else {
if ($_GET["type"] == "news") {
edit_news("new");
}
if ($_GET["type"] == "todo") {
edit_todo("new");
}
if ($_GET["type"] == "task") {
edit_tasks("new");
}
if ($_GET["type"] == "file") {
edit_files("new");
}
}
break;
case "prjedititem":
if (isset($_POST["undo"])) {
Util::jump_to("index.php?modname=project&op=showprj&id=" . $_GET["id"]);
} else {
if ($_GET["type"] == "news") {
edit_news();
}
if ($_GET["type"] == "todo") {
edit_todo();
}
if ($_GET["type"] == "task") {
edit_tasks();
}
if ($_GET["type"] == "file") {
edit_files();
}
}
break;
case "prjdelitem":
del_item();
break;
case "prjsendmsg":
send_msg();
break;
case "prjreadmsg":
read_msg();
break;
case "modprj":
if ($_GET["id"] == 0) {
sel_prj("modprj");
} else {
if (!isset($_POST["undo"])) {
mod_prj($_GET["id"]);
} else {
project();
}
}
break;
case "delprj":
if ($_GET["id"] == 0) {
sel_prj("delprj");
} else {
del_prj();
}
break;
case "prjreaditem":
read_item();
break;
case "editprogtot":
edit_progtot();
break;
case "download":
require_once _base_ . '/lib/lib.download.php';
$id = importVar('id', true, 0);
$type = importVar('type');
$can_view = checkPerm('view', true);
switch ($type) {
case "file":
$query = sql_query("SELECT * FROM " . $GLOBALS["prefix_lms"] . "_prj_msg WHERE pid='{$id}' {$filter} ORDER BY {$oby} {$ord}, id DESC;");
list($pid, $fname, $ftitle) = sql_fetch_row(sql_query("\r\n\t\t\t\t\tSELECT pid, fname, ftitle\r\n\t\t\t\t\tFROM " . $GLOBALS["prefix_lms"] . "_prj_files\r\n\t\t\t\t\tWHERE id = '{$id}'"));
$myprj = user_projects(Docebo::user()->getIdSt());
if ($can_view && in_array($pid, $myprj)) {
$expFileName = explode('.', $fname);
$totPart = count($expFileName) - 1;
sendFile(_FPATH_INTERNAL, $fname, $expFileName[$totPart], $ftitle);
} else {
die('You can\'t access');
}
break;
}
break;
}
}
/**
*导入备份文件
*
*/
function m__backin()
{
global $dbm, $dbkdir;
check_level("E0902");
m__list();
$act = isset($_GET['act']) ? trim($_GET['act']) : 'recover';
if ($act == 'recover') {
if (file_exists($dbkdir . DB_DBNAME . ".sql")) {
$sql = read_msg($dbkdir . DB_DBNAME . ".sql");
if (!isset($_GET['table']) && empty($_GET['table'])) {
die('没有恢复的数据表');
}
$tables = @trim($_GET['table']);
$tb_ext = explode(',', $tables);
//die(print_r($tb_ext));
recover_data($sql, $tb_ext);
//$table = get_tables_name();
//$tables = implode(',', $table);
$selfurl = "dbbak.php?m=backin&act=recover_data&table=" . $tables;
helper::redirect($selfurl, 2, '数据表结构已经恢复，正在恢复数据信息！');
} else {
die('数据表结构文件不存在!');
}
} else {
if ($act == 'recover_data') {
if (!isset($_GET['table']) && empty($_GET['table'])) {
die('没有恢复的数据表');
}
$table = trim($_GET['table']);
//die(print_r($table));
//每次跳转接收所有的表名
$tables = $table;
$table = explode(',', $table);
//表数组中索引，默认为0
$tableid = isset($_GET["tableid"]) ? intval($_GET["tableid"]) : 0;
//分卷id号，默认为0
$pageid = isset($_GET["pageid"]) ? intval($_GET["pageid"]) : 0;
//统计表个数
$table_count = count($table);
//当前表名在数组中索引值小于表个数
if ($tableid < $table_count) {
//检查当前表分卷备份文件是否存在,如果不存在，则跳转到下一个表,否则，导入数据库
if (!file_exists($dbkdir . $table[$tableid] . "_" . $pageid . ".sql")) {
$selfurl = "dbbak.php?m=backin&act=recover_data&table=" . $tables . "&tableid=" . ($tableid + 1);
$msg = "数据表 <font color='red'>" . $table[$tableid] . "</font> 信息不存在或未曾备份！";
helper::redirect($selfurl, 2, $msg);
}
//读取当前分卷备份文件的内容
$sql = read_msg($dbkdir . $table[$tableid] . "_" . $pageid . ".sql");
//将当前分卷备份文件的insert语句导入数据库
if ($sql) {
recover_data($sql);
}
//检查当前表下一个分卷备份文件是否存在,如果存在，则跳转到当前表下下一个分卷备份,否则，跳转到下个表
if (file_exists($dbkdir . $table[$tableid] . "_" . ($pageid + 1) . ".sql")) {
$selfurl = "dbbak.php?m=backin&act=recover_data&table=" . $tables . "&tableid=" . $tableid . "&pageid=" . ($pageid + 1);
$msg = "正在恢复数据表 <font color='red'>" . $table[$tableid] . "</font> 信息";
helper::redirect($selfurl, 2, $msg);
} else {
$selfurl = "dbbak.php?m=backin&act=recover_data&table=" . $tables . "&tableid=" . ($tableid + 1);
$msg = "已经恢复数据表 <font color='red'>" . $table[$tableid] . "</font> 信息，将恢复下一个数据表信息！";
helper::redirect($selfurl, 2, $msg);
}
} else {
//删除缓存，解决数据还原后，页面及即时更新
if (is_dir('../cache') && dir_size("../cache") > 0) {
del_dir('../cache', 1);
}
logs("数据信息均已经恢复完毕");
echo "<font color='red'>数据信息均已经恢复完毕！</font>";
die('<script>setTimeout(function(){parent.window.location.href="dbbak.php";},3000);</script>');
}
}
}
}
