function chatxinvit($p, $nm, $to)
{
$nm = ses('muse');
$to = ajxg($to);
$msg = str_replace('_NAME', $nm, helps('chatcall'));
$url = host() . '/module/chatxml/' . $p;
if ($to) {
send_mail_txt($to, $msg, $url, $nm, '');
return nms(109) . ' ' . nms(79) . 'e';
} else {
return nms(114);
}
}
function plug_login($p)
{
req('pop');
//return loged_j($_SESSION["USE"],$_SESSION["iq"],$t,10);
$w = '.' . $_SERVER['HTTP_HOST'];
$in .= divc('popbt', helps('new_user')) . br();
$in .= balise("input", array(1 => "text", 2 => "user", 3 => "lgg", 8 => "log_finger('lgg');"), "") . ' ';
if ($_SESSION["prmb"][11] > 5) {
$in .= balise("label", array("for" => 'login', 6 => 15), $w) . br();
} else {
$in .= btn('" id="valid', nms(135)) . br() . br();
}
$in .= balise("input", array(1 => "text", 2 => "pass"), "") . ' ';
$in .= balise("label", array("for" => 'pass', 6 => 15), nms(137)) . br() . br();
$in .= balise("input", array(1 => "text", 2 => "mail"), "") . ' ';
$in .= balise("label", array("for" => 'mail', 6 => 15), nms(136)) . br() . br();
$in .= submitj('txtx', "login", nms(57));
return '<form id="login" method="post" action="" onKeyPress="checkEnter(event,\'login\')">' . $in . ' </form>';
}
case "msqlp":
$r = msql_read($id, $va, $opt);
$t = 'help';
$s = 550;
if (is_array($r)) {
$ret = make_divtable($r, 1);
} else {
$ret = $r;
}
break;
case "syshelps":
req('pop,tri');
if (auth(6)) {
$b = lj('small', 'popup_msql__3_lang_helps_txts_' . ajx($id), $id) . ' ';
}
$ret = divc('small', format_txt_r($b . helps($id), '', ''));
break;
//os
//os
case "desktop":
req('spe');
$ret = desktop_root($id, $va, $opt, $optb);
$t = $va ? $va : 'Desktop';
$s = 400;
break;
case "desk":
req('spe');
$ret = desktop_ico($id);
break;
//menus
//menus
function sugnote()
{
$sg = $_SESSION['sugm'];
$_SESSION['sugm'] = '';
$r = msql_modif('users', ses('qb') . '_suggest', 'ok', 1, 'val', $sg);
$mail = $r[$sg][3];
list($m, $a) = split("@", $mail);
$id = lastid('qda') + 1;
$msg = lkc('', host() . urlread($id), helps('suggest_ok'));
if ($mail) {
send_mail_html($mail, nms(1) . ' ' . nms(89), $msg, $_SESSION['qbin']['adminmail'], $id);
}
if ($m) {
return '[' . nms(56) . ' ' . nms(88) . ' ' . $m . ':q]' . "\n";
}
}
function philum_pub()
{
return format_txt_r(helps('philum_pub_txt'), '', '');
}
function config_mod($mnb, $option)
{
$rm = msql_read('users', $_SESSION['modsnod'], $mnb);
//module
$mod = $rm['module'];
$bloc = $rm['block'];
$param = $rm['param'];
if (strpos($param, ',')) {
$param = str_replace(', ', ",\n", $param);
$param = ereg_replace("[\n]{2,}", "\n", $param);
}
$arb = msql_read('system', 'admin_modules', $mod);
//props
$type = $arb['category'];
$prm = $arb['param'];
$opt = $arb['option'];
$com = $arb['command'];
$com = str_replace('scroll', 'scroll scrold', $com);
$arc = msql_read('lang', 'admin_modules', $mod);
$fhlp = $arc['description'];
if (strpos(prma('blocks'), $mod) !== false && $mod) {
$type = "div";
$fhlp = $fhlp ? $fhlp : nms(90);
$prm = 3;
$arb["title"] = 1;
} elseif (!$type && $mod != 'system') {
$type = 'user_mod';
$fhlp = 'obsolete';
} elseif ($mod == 'Page_titles') {
$fhlp .= ' ' . hlpbt('breadcrumb');
}
if ($bloc == 'menus') {
$type = 'menu_link';
$fhlp = 'menu link';
}
if ($arc['help']) {
$phlp = admhlp('grey', ajx($mod), 'help') . ' ';
}
if ($arc['option']) {
$ohlp = admhlp('grey', ajx($mod), 'option') . ' ';
}
if ($arc['command']) {
$dhlp = admhlp('grey', ajx($mod), 'command') . ' ';
}
//usage
$rc = array('module' => bal('strong', $mod) . ' (' . $type . ') ' . $mnb, 'usage' => divc('small', $fhlp));
if ($_SESSION['line'][$param]) {
$rc["article"] = lkt('', htac('section') . $param, $param);
} elseif ($prm == 2) {
//wait_ID
if (!is_numeric($param)) {
$id = find_id($param);
} else {
$id = $param;
}
if (is_numeric($id) && $param > 3) {
list($dy, $frm, $suj, $amg) = pecho_arts($id);
//art
$rc["article"] = lkt('', '/?read=' . $id, $suj);
}
}
$l = 'modules_' . $bloc . '_' . $mnb;
$rid = randid();
$rds = array('mb', 'mm', 'mp', 'mt', 'mc', 'md', 'mo', 'mh', 'mv', 'me', 'mr', 'mi', 'mj');
foreach ($rds as $k => $v) {
$rvs[$v] = $v . $rid;
$dvs .= $v . $rid . '|';
}
//$dvs.=;
$sty = '" onkeypress="checkEnter(event,\'savmod\')';
$form .= hidden('', $rvs['mm'], $mod);
//edit
if ($mod == "submenus") {
require_once 'spe.php';
$rc["edit"] = menus_h($mnb);
if ($option) {
$param = menu_h_g($option);
}
}
if ($mod == "Banner") {
$rc["edit"] = lkc("popbt", '/admin/banner', 'edit_banner');
} elseif ($mod == "user_menu") {
$rc["edit"] = jump_btns($rvs['mp'], spelinks(), ' ');
} elseif ($mod == "app_menu") {
$rc["edit"] = btn('console', 'button/type/process/param/option/condition/root/icon/hide/private§display[,]');
} elseif ($mod == 'link' or $mod == "url") {
$arr = explode('|', spelinks());
if ($_SESSION['line']) {
$arr += array_flip($_SESSION['line']);
}
$rc["edit"] = select(array('id' => 'mps', 'onchange' => 'jumpslct(\'' . $rvs['mp'] . '\',this)', 'style' => "width:90px;"), $arr, 'vv');
} elseif ($mod == 'template') {
$ra = msql_read('', ses('qb') . '_template', '', 1);
if ($ra) {
$rb = array_keys_r($ra, 1, 'k');
$rc["edit"] = jump_btns($rvs['mp'], $rb, '');
}
} elseif ($mod == 'msql_links') {
$rc["edit"] = jump_btns($rvs['mp'], 'links|rssurl|deploy', '');
} elseif ($mod == 'connector') {
req('art');
$rc["edit"] = conn_edit();
$rc["edit"] .= txarea('txtarea', $param, 50, 5, 'txtnoir" onkeyup="transvalue(\'' . $rvs['mp'] . '\')" onclick="transvalue(\'' . $rvs['mp'] . '\')"; onblur="transvalue(\'' . $rvs['mp'] . '\');');
} elseif ($mod == 'desktop') {
$rc["edit"] = hlpbt('desklr');
} elseif ($mod == 'cssfonts') {
$rc["edit"] = jump_btns($rvs['mp'], 'fontphilum|fontmicrosys|', ' ');
} elseif ($mod == 'columns') {
$rc["edit"] = mod_edit('', 1, $rvs['mp']);
} elseif ($mod == 'articles') {
$rc["edit"] = divd('amc', artmod_edit_l($rvs['mp'], '', ''));
} elseif ($mod == "design" && prmb(5)) {
$rc["edit"] = picto(alert) . helps('prmb5');
}
//param
if ($mod == 'tab_mods' or $mod == 'MenusJ' or $mod == 'art_mod') {
$rc["param"] = comline($param, $rvs['mp']);
} elseif ($mod == 'app_menu') {
$rc["param"] = appmenu($param, $rvs['mp']);
} elseif ($mod == "submenus") {
$rc["param"] = txarea($rvs['mp'], $param, 42, 4);
} elseif ($prm != '0') {
$rc["param"] = goodarea($param, $rvs['mp'], '', $j, 42);
} else {
$form .= hidden('', $rvs['mp'], '');
}
if ($mod == 'desktop') {
$rc["edit"] = $phlp;
$rc["param"] .= ' ' . hlpbt('desklr');
} elseif ($rc["param"] && $mod != 'apps' && $phlp) {
$rc["param"] .= ' ' . $phlp;
}
//title
if ($prm != '1' && !$arb["title"]) {
$rc["title"] = input(1, $rvs['mt'] . '" size="42' . $sty, $rm['title'], "");
} else {
$form .= hidden('', $rvs['mt'], '');
}
//bloc
if ($bloc != 'system' && $bloc != 'newsletter' && $bloc != 'gsm') {
$rc["bloc"] = select_j($rvs['mb'], 'system ' . prma('blocks'), $bloc, 1, $bloc, 0);
} else {
$form .= hidden('', $rvs['mb'], $bloc);
}
//condition
if ($bloc != 'newsletter') {
$rc["condition"] = select_j($rvs['mc'], '- home cat art', $rm['condition'], 3, $rm['condition'], 0) . ' ' . hlpbt('mod_cond');
} else {
$form .= hidden('', $rvs['mc'], '');
}
//command
if ($com) {
$rc["command"] = select_j($rvs['md'], '- ' . ajx($com), $rm['command'], 1, $rm['command'], 0) . ' ' . $dhlp;
} else {
$form .= hidden('', $rvs['md'], '');
}
//option
if ($opt != '0') {
$rc["option"] = select_j($rvs['mo'], '-|' . $opt, $rm['option'], 3, $rm['option'], 0) . ' ';
if ($mod == 'LOAD') {
$rc["option"] .= hlpbt('art_render');
} else {
$rc['option'] .= $ohlp;
}
} else {
$form .= hidden('', $rvs['mo'], '');
}
//template
if ($arb["template"]) {
$ara = msql_read('', ses('qb') . '_template', '', 1);
if ($ara) {
$tmp = implode(' ', array_keys($ara));
}
$rc["template"] = select_j($rvs['me'], '- ' . ajx($tmp), $rm['template'], 1, $rm['template'], 0);
} else {
$form .= hidden('', $rvs['me'], '');
}
//cache
if ($arb["cacheable"]) {
$rc["cache"] = checkbox_j($rvs['mh'], $rm['cache'], '');
} else {
$form .= hidden('', $rvs['mh'], '');
}
$rc["hide"] = checkbox_j($rvs['mv'], $rm['hide'], '');
//hide
if ($arb["nobr"] != '0') {
$rc["nobr"] = checkbox_j($rvs['mr'], $rm['nobr'], '');
} else {
$form .= hidden('', $rvs['mr'], '');
}
if ($arb["div"] != '0') {
$rc["div"] = checkbox_j($rvs['mi'], $rm['div'], '');
} else {
$form .= hidden('', $rvs['mi'], '');
}
if ($arb["ajax button"] != '0') {
$rc["ajax button"] = checkbox_j($rvs['mj'], $rm['js'], '');
} else {
$form .= hidden('', $rvs['mj'], '');
}
//script
if ($type != 'system') {
$oks = lj('popbt', 'popup_modsee__3_' . $mnb . '_1', 'script') . hlpbt('comline') . ' ';
$oks .= lj('popbt', 'popup_modsee__3_' . $mnb, nms(65)) . ' ';
}
//if($mod=='LOAD')$rc["edit"]=fast_sets('load');
//render
$bt .= ljb("popdel", "SaveR", $l . '_del\',\'' . $dvs, nms(43)) . ' ';
$bt .= ljb('popbt', "SaveR", $l . '_new\',\'' . $dvs, nms(44)) . ' ';
$bt .= ljb('popbt', "SaveR", $l . '_savb\',\'' . $dvs, nms(66)) . ' ';
$bt .= ljb('popsav', "SaveR", $l . '_sav\',\'' . $dvs, nms(57)) . ' ';
//master_config
$ret .= '<form id="savmod" action="javascript:SaveR(\'' . $l . '_sav\',\'' . $dvs . '\')">' . $form;
$ret .= on2cols($rc, 470, 5);
$ret .= '</form>';
$ret .= divs('', $bt . $oks);
return $ret;
}
function css_fontface($p, $b, $c, $o, $s, $u)
{
//page,cat,size,opt
$csa = 'txtx';
$csb = 'txtred';
$jx = 'pop_';
if (!$b) {
$b = 'all';
}
$r = msql_read('server', 'edition_typos', '', 1);
$n = count($r);
asort($r);
$rb['all'] = 1;
$b = $b == '' ? 'unclassed' : $b;
$gf = 'stylsff___';
$s = substr($s, 0, -1);
if ($s) {
$o = 'rch' . $s;
}
if (!is_file('msql/server/edition_typos.php')) {
$ret .= lkc('txtyl', '?admin=fonts', 'update server_table') . br() . br();
}
//rb//rd
$ard = array('', 'fontsquirrel', 'fontspring', 'myfonts');
if ($r) {
foreach ($r as $k => $v) {
if ($v[1]) {
$rb[$v[1]] = 1;
}
if (is_numeric($v[4])) {
$rd[$v[4]] = $ard[$v[4]];
}
}
}
// else $rd[$v[4]]=$v[4];
$rb['unclassed'] = 1;
ksort($rb);
$_SESSION['fntcat'] = $rb;
//cat
if ($b && $b != 'unclassed' && $b != 'all') {
$hlp = divc('panel', helps($b, 'typos')) . br();
}
foreach ($rb as $k => $v) {
$mnu .= lj($k == $b ? $csb : $csa, $jx . $gf . '1_' . ajx($k) . '_' . $c . '_' . $o, $k) . ' ';
}
$mnu .= br();
$b = $b == 'unclassed' ? '' : $b;
$pk = substr($o, 0, 3);
$pv = substr($o, 3);
if ($pv) {
$pp[$pk] = $pv;
}
//rech
$srch .= input2('text', 'srch" size="8" id="srchfnt', $pp['rch'] ? $pp['rch'] : 'search', '');
$srch .= ' ' . lj('popbt', $jx . $gf . '1_' . $b . '_' . $c . '_' . $o . '_srchfnt', 'ok') . ' ';
$srch .= lj('popbt', $jx . $gf . '1_all', 'x');
//tri
foreach ($r as $k => $v) {
if (!$pv or ($pp['acc'] && $pp['acc'] == $v[2] or $pp['fav'] && $pp['fav'] == $v[3] or $pp['fam'] && $pp['fam'] == $v[4] or $pp['rch'] && stristr($v[0], $pp['rch']) !== false)) {
if ($v[1] == $b or $b == 'all') {
$rc[$k] = $v;
}
}
}
$n = count($rc);
//pages
$no = 20;
$np = 10;
$min = $p - $np;
$max = $p + $np;
$nb = ceil($n / $no);
$bb = ajx($b);
for ($i = 1; $i <= $nb; $i++) {
if ($i == 1 or $i == $nb or $i > $min && $i < $max) {
//$rtp.=lj(($i==$p?'active':''),$jx.$gf.$i.'_'.$bb.'_'.$c.'_'.$o,$i);
$rtp .= lj($i == $p ? 'active' : '', $jx . $gf . $i . '_' . $bb . '_' . $c . '_' . $o, $i) . ' ';
}
if ($i == 2 && $min > 2 or $i == $nb - 1 && $max < $nb - 1) {
$rtp .= '... ';
}
}
$nbp = divc('nb_pages', $rtp);
$c = is_numeric($c) ? $cb = $c : 48;
$arz = array(12, 24, 36, 48, 72);
foreach ($arz as $k => $v) {
//size
$siz .= lj($v == $c ? $csb : $csa, $jx . $gf . $p . '_' . $b . '_' . $v . '_' . $o, $v) . ' ';
}
//label
$go = $gf . $p . '_' . $bb . '__';
if ($rd) {
foreach ($rd as $k => $v) {
$prp .= lj($pp['fam'] == $k ? $csb : $csa, $jx . $go . 'fam' . ($pp['fam'] == $k ? '' : $k), $v) . ' ';
}
}
$prp .= lj($pp['acc'] ? $csb : $csa, $jx . $go . 'acc' . ($pp['acc'] ? '' : 1), 'accents') . ' ';
$prp .= lj($pp['fav'] ? $csb : $csa, $jx . $go . 'fav' . ($pp['fav'] ? '' : 1), 'favs') . ' ';
//render
$max = $p * $no;
$min = $max - $no;
if ($rc) {
foreach ($rc as $k => $v) {
$ia++;
if ($ia >= $min && $ia < $max && $v[0]) {
$rta .= '@font-face {' . css_ff($v[0]) . '}' . "\n";
$rtb .= preview_ff($k, $v, $c);
}
}
}
$ret .= css_code($rta) . $mnu . $hlp . $siz . $prp . $srch . br() . br();
$ret .= input(1, 'ffwr', $_SESSION['ffstr'] ? $_SESSION['ffstr'] : 'AaBbCcDdEe0123יא', '" size="44');
$ret .= lj('txtx', 'ffwr_sesmake_ffwr__ffstr', 'set');
$ret .= divd('scroll', divd('pop', $nbp . br() . $rtb . $nbp)) . br();
if ($u) {
return popup('create font-face', divs('width:640px;', $ret));
} else {
return css_code($rta) . $nbp . br() . $rtb . $nbp;
}
}
function send_track_to_user($id)
{
$sender = $_SESSION['qbin']['adminmail'];
//i.
list($name, $day, $idt, $msg) = sql('name,day,frm,msg', 'qdi', 'r', 'id=' . $id);
$by = helps('trackmail');
$msg = format_txt($msg, '', $idt) . "\n\n";
$msg = nl2br($by . "\n\n" . 'By: ' . $name . ', ' . mkday($day) . "\n\n" . $msg);
$suj = sql('suj', 'qda', 'v', 'id=' . $idt);
$rmails = sql('mail', 'qdi', 'k', 'frm="' . $idt . '"');
if ($rmails) {
$r = array_keys_b($rmails);
}
if ($r) {
send_mail_r($r, 'html', $suj, $msg, $sender, $id);
}
}
function twit_config_sav($p, $o, $res = '')
{
$r = ajxr($res);
foreach ($r as $v) {
$defs[] = array($v);
}
msql_modif('', ses('qb') . '_twit', $defs, '', 'arr', '');
return btn('txtalert', helps('userforms'));
}
function tracks_read($id, $page = '', $n = '')
{
$USE = $_SESSION['USE'];
$qb = $_SESSION['qb'];
$read = $_SESSION['read'];
$ip = hostname();
$panout['css'] = 'track';
$panout['sty'] = 'margin:8px 0;';
if ($id) {
$panout['id'] = $id;
list($ib, $name, $mail, $day, $nod, $frm, $suj, $msg, $re, $lu, $img, $thm, $host) = sql('ib,name,mail,day,nod,frm,suj,msg,re,lu,img,thm,host', 'qdi', 'r', 'id=' . $id);
}
$panout['date'] = mkday($day, 'y/m/d H:i');
//time_ago($day);
$panout['edit'] .= lj('', 'popup_track___' . $read . '_[' . $id . ':track]', picto('get')) . ' ';
if ($re == "0" && $host == $ip) {
$panout['sty'] .= 'opacity:0.5;';
$panout['edit'] .= btn('txtsmall', helps('trackbacks')) . ' ';
}
if ($_GET['admin']) {
$purl = '/?admin=' . $_GET['admin'];
}
if ($_GET['read']) {
$purl = '/?read=' . $_GET['read'];
}
if ($host == $ip && $_SESSION['dayx'] - $day < 600 or auth(6)) {
//redit
$panout['edit'] .= lj('', 'popup_trkedit___' . $id, picto('edit')) . ' ';
}
$sender = rse("id", $_SESSION['qdu'] . ' WHERE name="' . $name . '"');
if ($sender) {
$panout['author'] = lj('', 'popup_track___' . $name, $name);
} elseif ($mail != 'mail') {
$panout['author'] = lj('', 'popup_plupin___mail_' . $mail, $name);
} else {
$panout['author'] = $name;
}
if (substr($suj, 0, 4) != "hide" or $_GET['idy_show'] == $id) {
$state = "hide";
$f = 'imgb/avatar_' . $name . '.gif';
//avat
if (is_file($f)) {
$panout['avatar'] .= image($f, 48, 48, ats('vertical-align:bottom;'));
}
if ($re != "0" or auth(3) or $host == $ip) {
//$msg=format_txt($msg,'','');
$msg = correct_br($msg);
$msg = miniconn($msg);
$msg = correct_txt($msg, '', 'sconn');
$msg = embed_p($msg);
$msg = nl2br($msg);
} else {
$msg = divc('txtalert', helps('trackbacks'));
}
} else {
$state = 'show';
$msg = '';
}
if (auth(4) && $frm != $qb) {
$j = 'trk' . $id . '_plug___tracks_trk*publish_' . $id;
if ($re != 1) {
$panout['edit'] .= lj('txtyl', $j . '_on', nms(29)) . ' ';
} else {
$panout['edit'] .= lj('', $j . '_off', offon(0)) . ' ';
}
}
if ((auth(4) or $USE == $name) && ($re == 0 or auth(6))) {
$panout['edit'] .= lj('" title="' . nms(43), 'trk' . $id . '_call___sav_edit*tracks__' . $id . '', picto('trash')) . ' ';
}
$panout['msg'] = stripslashes($msg);
if (substr($n, 0, 2) == "nl") {
$http = host() . '/';
}
$panout['url'] = $http . htacc('read');
return template($panout, 'tracks');
}
function recat_tag($idtag, $newcat = '')
{
if (!auth(6)) {
return;
}
$rid = randid('recat');
list($tag, $cat) = sql('tag,cat', 'qdt', 'r', 'id=' . $idtag);
$ret = divc('txtcadr', nms(140) . ': ' . $tag . ' in ' . $cat);
$ret .= divc('small', helps('tag_rename'));
$utags = explode(' ', 'tag ' . prmb(18));
//cats
foreach ($utags as $v) {
if ($v != $cat) {
$ret .= lj('popbt', $rid . '_call___meta_recat*tag_' . $idtag . '_' . ajx($v), $v) . br();
}
}
if ($newcat) {
$ex = sql('id', 'qdt', 'v', 'tag="' . $tag . '" and cat="' . $newcat . '"');
if (!$ex) {
update('qdt', 'cat', $newcat, 'id', $idtag);
$ret = divc('txtalert', $cat . ' => ' . $newcat);
} else {
update('qdta', 'idtag', $ex, 'idtag', $idtag);
$ret = divc('txtalert', $tag . ' in ' . $cat . ' is erased and references are linked to ' . $tag . ' in ' . $newcat);
if ($idtag) {
delete('qdt', $idtag);
}
}
}
return divd($rid, $ret);
}
function admin()
{
$qb = ses('qb');
$qda = ses('qda');
$qdu = ses('qdu');
$USE = ses('USE');
$auth = ses('auth');
$admin = $_GET['admin'] ? $_SESSION['admin'] = $_GET['admin'] : $_SESSION['admin'];
if ($_GET['set']) {
$_SESSION['set'] = $_GET['set'];
}
if ($USE != "") {
$hubname = rse("hub", $qdu . ' WHERE name="' . $qb . '"');
if (!$hubname) {
$hubname = $qb;
}
list($autologok, $userhub) = sql('name,hub', 'qdu', 'r', 'ip="' . hostname() . '"');
}
$rep = "params";
//verif_user
if ($USE != $qb && $USE != "" && $userhub) {
$hub = lka('/' . $USE, $USE);
} elseif ($USE != $qb && $USE != "" && $autologok != $USE && $autologok) {
$alert .= lkc('txtx', '/?log=on', 'autolog') . ' ';
} elseif ($USE == $qb && !$userhub && prmb(11) >= 4) {
$alert .= lkc("txtred", "/?log=create_hub", "create_hub!");
} elseif ($USE == "") {
$reta = lkc('txtx', htac('module') . 'Home', $qb) . br() . br() . loged($USE, $_SESSION['iq'], "", 7) . br();
}
//admin_menu
$aff = adminauthes();
if ($admin == "=") {
$_SESSION['set'] = $_GET['set'] = $USE ? "Global" : "User";
}
//defaults
if ($aff[$_GET['set']]) {
$admin = key($aff[$_GET['set']]);
}
$_SESSION['admin'] = $admin;
$goto = '/?admin=' . $admin;
//if(!$userhub){unset($aff['User']['mail']); unset($aff['User']['password']);}
//auto_select_category
foreach ($aff as $k => $v) {
if ($v[$admin]) {
$_SESSION['set'] = $k;
$curauth = $v[$admin];
}
$raf = array_merge_b($raf, array_keys($v));
}
if ($curauth === false) {
$curauth = 7;
}
//login
if ($USE) {
$w .= lkc('popw', htac('module') . 'Home', pictxt('home', $hubname)) . ' ';
$w .= btn("popbt", pictxt('user', $USE . ' ' . asciinb($auth)) . ' (' . nameofauthes($auth) . ')');
}
//fastmenu
$fmn = array('console', 'params', 'restrictions', 'apps', 'css', 'finder', 'templates', 'connectors', 'plugin', 'msql', 'tools', 'pictos', 'stats', 'update');
foreach ($raf as $v) {
if (in_array($v, $fmn)) {
$tit .= lkc(active($admin, $v), htac('admin') . $v, pictit(mimes_types($v), $v)) . ' ';
}
}
$reta .= divc('right', $w . $alert);
$tit .= lkc('txtit', htac('admin') . $admin, $admin) . ' ';
if ($admin != "=") {
$reta .= div('', $tit);
}
if ($auth >= 7 && $admin == 'update') {
$ret = adm_update();
}
if ($auth >= $curauth && $curauth) {
switch ($admin) {
//global
case 'console':
$ret = adm_console($auth);
break;
case 'apps':
require_once 'adminx.php';
$ret = adm_apps($_GET['set'], '', $_GET['dig']);
break;
case 'messages':
if ($qb == $USE or $auth >= $curauth) {
$ret = adm_messages();
} else {
$ret = contact(nms(84), 'txtcadr');
}
break;
case 'hubs':
$ret = adm_hubs($auth);
break;
case 'nodes':
$ret = adm_nodes($auth, $goto);
break;
case 'stats':
list($p, $o) = explode('/', $_GET['set']);
$ret = plugin('stats', $p, $o);
break;
case 'newsletter':
$ret = adm_newsletter($_GET['send']);
break;
case 'disk':
$ret = plugin('disk', '', '');
break;
case 'share':
$ret = plugin('share', '', '');
break;
case 'tickets':
$ret = plugin('tickets', '', '');
break;
case 'faq':
$r = msql_read('system', 'program_faq', '');
$ret = nl2br(stripslashes(make_divtable($r, 1)));
break;
}
//articles
if ($_SESSION['set'] == 'Articles') {
switch ($admin) {
case 'create':
$ret = f_inp('', '');
break;
case 'categories':
$ret = catarts();
break;
case 'trackbacks':
req('mod,art');
$ret = trkarts('');
break;
default:
$ret = adminarts();
break;
}
}
switch ($admin) {
case 'chat':
require_once 'art.php';
$ret = output_trk(read_idy('microchat', 'DESC'));
break;
case 'shop':
$ret = helps('shop_class');
break;
case 'book':
$ret = lkc('txtblc', '/plug/book.php', 'book');
break;
}
//configs
switch ($admin) {
case 'restrictions':
$ret = adm_restrictions();
break;
case 'params':
$ret = adm_params($curauth, rep);
break;
case 'avatar':
if ($USE) {
$ret = adm_avatar(0);
}
break;
case 'mail':
if ($_POST['amail']) {
if ($USE == $qb) {
$_SESSION['qbin']['adminmail'] = $_POST['amail'];
}
update('qdu', 'mail', $_POST['amail'], 'name', $USE);
}
$ml = rse('mail', $qdu . ' WHERE name = "' . $USE . '"');
if ($ml) {
$valu = input2('text', 'amail', $ml . '" size="35" maxlength="50') . ' ' . input2('submit', 'Submit', 'modif_mail', '');
}
$ret = form($goto, $valu);
break;
case 'password':
$ret = set_password($USE);
break;
case 'banner':
$ret = set_ban();
break;
case 'descript':
$ret = editbrain($admin);
break;
case 'google':
$ret = editbrain($admin);
break;
case 'members':
$ret = adm_members_a($auth, $goto);
break;
case 'authes':
$titles = array('fonction', 'auth');
if (auth(6)) {
$ret = msqlink('system', 'admin_authes') . br();
}
foreach ($aff as $k => $v) {
$datas = '';
arsort($v);
foreach ($v as $ka => $va) {
$datas[$ka] = array($va);
}
$outre[$k] = make_tables($titles, $datas, 'txtblc', '');
}
$ret .= make_tabs($outre, 'at');
break;
}
//constructors
switch ($admin) {
case 'css':
$ret = adm_editcss();
break;
case 'fonts':
$ret = edit_fonts();
break;
case 'connectors':
$ret = data_brain('connectors') . br() . br();
$ret .= lkc('txtblc', $goto . '&help==', 'connectors_infos') . br();
if ($_GET['help']) {
$ret .= conn_help() . br();
}
break;
case 'modules':
$ret = data_brain('modules') . br() . br() . adm_mod_hlp($goto);
break;
case 'templates':
$ret = data_brain('template');
break;
case 'plugin':
$ret = adm_plugin();
break;
case 'msql':
$ret = adm_msql();
break;
case 'dev':
$ret = plugin('dev', '', '');
break;
case 'editags':
req('meta');
$ret = admin_tags(get('set'));
break;
case 'finder':
$ret = call_finder($qb, 'disk');
break;
case 'backup':
$ret = adm_backup($qb, $auth, $goto, $rep);
break;
case 'update_notes':
$ret .= adm_update_notes('', 1);
break;
case 'plug':
$ret .= adm_edit_plug();
break;
}
if ($admin && !$ret && $auth >= $curauth) {
//editbrain
$ret = plugin($admin, $_GET['p'], $_GET['o']);
}
} else {
switch ($admin) {
case 'members':
$ret = adm_members_b();
break;
}
}
#render
if ($_SESSION['admin'] && !$_GET['callj']) {
$head = $reta . br();
} else {
$head = bal('h2', lka('/admin/' . $_SESSION['admin'], $_SESSION['admin'])) . br();
}
return $head . $ret;
}
function formail($d, $res)
{
$ra = explode(',', ajx($d, 1));
$na = count($r) - 1;
$rb = ajxr($res);
$nb = count($rb) - 1;
for ($i = 0; $i < $nb; $i++) {
list($label, $type) = split('=', $ra[$i]);
$ret .= $label . ' : ' . $rb[$i] . br();
}
$from = $_SESSION['qbin']['adminmail'];
$url = urlread($_SESSION['read']);
send_mail_html($from, host() . $url, $ret, $from, $url);
return br() . btn('', helps('formail'));
}
function mbd_book($cnn)
{
req('adminx');
$ret .= btn('txtcadr', 'param [,]');
$ret .= divd('amc', artmod_edit_l('cnv', '', ''));
$ret .= assistant('cnv', 'insert_conn', 'book', '', 'title/1/book');
$ret .= br() . helps('book');
return $ret;
}
