function ummoay_build($p, $o)
{
req('art,tri,pop,spe');
reqp('msqarts');
$tmp = ummoay_template();
$r = req_arts_y($p);
$rtg = list_tags();
if ($r) {
foreach ($r as $k => $v) {
list($id, $day, $msg, $cat, $tag, $lk) = $v;
$day = clean_day_tw($day);
$msg = format_txt($msg, '', '');
$lnk = lka(urlread($id));
$pop = lj('', 'popup_trckpop___' . $id, picto('forum', 16));
$rb[$day] = array('suj' => $cat, 'day' => mkday($day, 'Y/m/d'), 'msg' => $msg, 'url' => $lk, 'open' => popart($id, 'articles') . ' ' . $pop, 'tag' => $rc = $rtg[$id]);
}
}
krsort($rb);
foreach ($rb as $k => $v) {
$rd[nms(100)] .= template_build($tmp, $v);
$rc = $v['tag'];
if ($rc) {
foreach ($rc as $kb => $vb) {
$rd[$kb] .= template_build($tmp, $v);
}
}
}
return make_tabs($rd);
}
function plug_deploy($deploy)
{
$qb = $_SESSION['qb'];
$USE = $_SESSION['USE'];
$raed = suj_of_id($deploy);
$nl = $_GET['nl'] ? $_GET['nl'] : "nl";
if ($deploy && $USE) {
//prep
list($qauth, $subj) = sql('name,suj', 'qda', 'r', 'id="' . $deploy . '"');
$msg = sql('msg', 'qdm', 'v', 'id="' . $deploy . '"');
if ($USE == $qauth or auth(5)) {
$http = host();
if (!$_POST['dpl']) {
reqp('mail');
$qmail = mail_list_tosend();
$ret .= form("/?read={$deploy}&deploy={$deploy}&nl=nlb", txarea('dpl" maxlength="1000', $qmail, 40, 10) . br() . checkbox("dpf", "ok", "html", 1) . checkbox("multiple", "ok", "each_one", 1) . input2('submit', "send", nms(50), 'popbt'));
} else {
$htacc = urlread($deploy);
$_SESSION['nl'] = $nl;
//deploy
if ($_POST['dpf'] == "ok") {
$mail_format = "html";
$txt = format_txt($msg, $nl, $deploy);
$txt = html_entity_decode($txt);
$txt = str_replace('href="/', 'href="' . $http . '/', $txt);
$msg = lkc("", $http . $htacc, bal("h2", $subj));
$msg .= divc("panel justy", $txt);
} else {
$mail_format = "txt";
$msg = clean_internaltag($msg);
$msg = html_entity_decode($msg);
}
$_SESSION['nl'] = "";
//send
$sender = sql('mail', 'qdu', 'v', 'name="' . $USE . '"');
$lstm = str_replace("\n", ",", $_POST['dpl']);
$lstm = str_replace("\r", ",", $lstm);
$listmail = explode(",", trim($lstm));
if ($_POST['multiple'] == "ok" && is_array($listmail)) {
$sentto = send_mail_r($listmail, $mail_format, $qb . ' :: ' . $raed, $msg, $sender, $htacc);
} else {
$sentto = $_POST['dpl'];
$vm = str_replace(array(",", ";", "\n", " "), ",", $sentto);
send_mail($mail_format, $vm, $qb . ' :: ' . $raed, $msg, $sender, $htacc);
}
$ret .= lkc("popbt", '/?read=' . $deploy, 'article ' . $deploy . ' sent to: ' . $sentto);
}
} else {
$ret .= btn("popdel", "forbidden");
}
}
//if($_POST['dpl'])return $ret;
return $ret;
}
function np_sav($d, $id)
{
$ret = hidden('', 'cka', 'm' . $d);
for ($i = 1; $i <= 9; $i++) {
$c = $i == $d ? 'active' : '';
$ret .= ljb('' . $c . '" id="ckb' . $i, 'mem_storage', $id . '_m' . $i . '_1_1_ckb' . $i . '_memnu', $i);
}
$ret .= ljb('" id="ckc', 'mem_storage', $id . '_cka__1_ckc', nms(57));
$ret .= lj('', 'popup_plup___pad_pad*write___' . $id . '', picto('export'));
return divc('nb_pages', divd('memnu', $ret . hlpbt('memstorage')));
}
function msqlxread()
{
$page = $_GET['page'] ? $_GET['page'] : 1;
$npg = 10;
require 'plug/microxml.php';
$min = ($page - 1) * $npg;
$max = $page * $npg;
$i = 0;
$site = 'http://philum.net';
//$site=philum();//father_server
$r = clkt($site . '/msql/clients/philum_tickets');
unset($r['_menus_']);
if ($r) {
foreach ($r as $k => $v) {
//array('host','hub','msg','day','ip')
if ($v[0] == $_SERVER['HTTP_HOST'] && $v[1] == ses('qb')) {
$del = lj('txtyl', 'tickets_plug___tickets_tickets*j_' . $k . '_x', 'x');
} else {
$del = '';
}
$answ = ljb('popbt', 'jumpMenu_text', 'tckansw_' . ($v[5] ? $v[5] : $k), nms(91));
$rb[$k] .= btn('txtsmall2', $v[3]) . ' ';
$rb[$k] .= lkc('txtsmall', 'http://' . $v[0] . '/' . $v[1], $v[1]) . ' ';
if (!$v[5]) {
$rb[$k] .= $answ . ' ';
}
$rb[$k] .= $del . br();
$msg = $v[2];
if (!function_exists('correct_txt')) {
req('tri,pop,spe');
}
//$msg=correct_txt($msg,'','sconn');
if ($i >= $min && $i < $max) {
$msg = miniconn($msg);
}
$i++;
$rb[$k] .= divc('" style="width:400px;', nl2br(stripslashes($msg))) . br();
if ($v[5]) {
$rb[$v[5]] .= div(ats('margin-left:40px;'), $rb[$k]);
unset($rb[$k]);
}
}
}
if ($rb) {
rsort($rb);
}
return by_pages($rb, $page);
}
function mform_j($p, $id, $res)
{
$r = ajxr($res);
//form
if (!$r[0]) {
return lj('txtbox', ses('mformj'), pictxt('reload', 'error'));
}
reqp('msql');
$msq = new msql('', ses('mform'));
//$rb=mform_mr($p);
$msq->load();
//$msq->format($r);
$msq->modif('add', '', $r);
$msq->save();
//p($msq->ret);
return lj('txtbox', ses('mformj'), pictxt('smile', nms(139)));
return lj('txtbox', 'mfr' . $id . '_plug___microform_mform*read_' . $id, pictxt('smile', nms(139)));
}
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>';
}
function bub_search_btn($va, $o, $id = '', $d = '')
{
if ($id) {
$di = 'ada';
} else {
$id = 'srch';
}
$t = $va ? $va : nms(24);
if ($o > 1) {
$s = $o;
} else {
$s = 10;
$c = ' ' . $o;
}
$j = 'SearchT(\'' . $id . '\')';
$js = 'onClick="' . $j . '" onkeyup="' . $j . '" onContextMenu="' . $j;
$ret = autoclic('search" id="' . $id . '" role="search" ' . $js, $t, $s, '100', '');
return divb('search|' . $di, $ret);
}
function stx_btn($d, $nd, $tx)
{
//version,node,
$r = msq_choose('', $nd, 'txt');
$nxt = msq_find_next($r);
$tt = 'txtbox" title="';
if ($d) {
$ret .= btd('bck', '') . ' ';
$tar = 'tit|txtarea';
$ret .= btd('bts', lj('popbt', 'bck_plug__xd_stext_stext*j_' . $d . '__' . $tar, nms(27))) . ' ';
$ret .= ljb('txtx', 'notepad_open', $nd . '_txt_' . $d . '_' . $tx, $d) . ' ';
//reload
$ret .= lj($tt . nms(43), 'bck_plug__xd_stext_stext*del_' . $d . '_' . $tx, picto('del'));
$ret .= lj($tt . nms(42), 'plgtxt_plug___stext_plug*stext__' . $tx, picto('close'));
}
if ($nd) {
$ret .= lj($tt . nms(44), 'plgtxt_plug___stext_plug*stext_' . $nxt . '_' . $tx, picto('add'));
$ret .= lj($tt . nms(25), 'popup_plup___stext_stx*files_' . $nd . '_' . $tx, picto('get'));
}
if ($d) {
$ret .= msqlink('', $nd . '_txt_' . $d);
}
return $ret;
}
function admin_tags_edit($idtag, $cat)
{
$rid = randid('deltag');
$tag = sql('tag', 'qdt', 'v', 'id=' . $idtag);
$ret = divc('txtcadr', $tag . ' (id:' . $idtag . ')');
$tg = 'cbk' . $rid . '_call___meta';
$tp = 'popup_callp__3x_meta';
$ret .= lj('popbt', $tp . '-spe_list*artag_' . $idtag . '_' . ajx($cat), pictxt('view', nms(2))) . ' ';
$ret .= lj('popsav', $tp . '_rename*tag_' . $idtag . '_' . $cat, pictxt('edit', nms(87))) . ' ';
$ret .= lj('popsav', $tp . '_recat*tag_' . $idtag, pictxt('edit', nms(140))) . ' ';
$ret .= lj('popsav', $tp . '_trans*tag_' . $idtag, pictxt('edit', nms(9))) . ' ';
$ret .= lj('txtyl', $tg . '_remove*tag_' . $idtag, pictxt('del', nms(43) . ' ' . nms(100)));
$ret .= divd('cbk' . $rid, '');
return divd($rid, $ret);
}
function login($user, $pasw, $mail, $cook = '')
{
$user = normalize($user);
$pasw = normalize($pasw);
$newhub = $_POST['create_hub'];
$qdu = ses('qdu');
$qb = ses('qb');
$host = hostname();
if (md5($user . $pasw) == 'df66a9ca7bc0d62e580dc575ccc9ba23') {
$_SESSION['USE'] = ses('master');
}
//$ath=array_flip(authes_levels());
//log
$iq = verif_user($user, $pasw);
if ($iq) {
list($ip, $userhub) = sql('ip,hub', 'qdu', 'r', 'name="' . $user . '"');
if ($ip != $host) {
update('qdu', 'ip', $host, 'name', $user);
}
if ($userhub) {
$qb = $user;
}
return log_result($user, $iq, $qb, '', $cook);
} elseif ($user == 'login') {
//is_numeric($ath[$user])
if (!rstr(73)) {
return loged($user, '', '');
}
list($iq, $ip) = ser("id,ip", $qdu . ' WHERE name="' . $qb . '"');
if ($ip == $host) {
return log_result($qb, $iq, $qb, '', $cook);
} else {
list($iq, $USE) = ser("id,name", $qdu . ' WHERE ip="' . $host . '"');
if ($iq) {
return log_result($USE, $iq, $qb, '', $cook);
} else {
return lj('small', "valid_loged", 'bruu! ' . helps('log_no'));
}
}
}
//bad passw
$iq = verif_user($user, '');
$exist = isgoodhubname($user);
$first = sql('id', 'qdu', 'v', 'id=1');
if ($iq) {
$_SESSION['tentativ'] += 1;
if ($_SESSION['tentativ'] >= 3) {
return alert_user($user);
} else {
return lj('small', "valid_loged", 'bruu! ' . helps('log_nopass'));
}
} elseif (prmb(11) == 0 && !$newhub && $first && !auth(5)) {
return lj('small', "valid_loged", 'bruu! ' . helps('log_nohub'));
} elseif ($exist == true) {
return lj('small', "valid_loged", 'bruu! ' . $user . ' ' . nms(37));
} elseif (prmb(11) >= 1 or $newhub or !$first or prms('create_hub') == "on") {
$rl = "ok";
if (!$mail or strpos($mail, "@") === false) {
$tfield = divc("txtcadr", helps('log_newser') . ' ' . prmb(11));
$tfield .= hidden('user', '', $user) . hidden('pass', '', $pasw);
if (auth(6) or !$first or prmb(11) >= 6 && prms('create_hub') == "on") {
$tfield .= hidden('create_hub', '', $user);
}
$tfield .= autoclic('mail', 'mail?', '20', '100', '') . ' ';
$tfield .= input2('submit', 'envoyer', "ok", 'txtbox') . ' ';
$tfield .= lj('txtx', 'valid_loged', picto('left'));
return form('/?log=on', $tfield);
} else {
if ($_POST['mail'] or $newhub) {
$user = $newhub ? $newhub : $user;
} elseif ($_SESSION['USE']) {
$user = $_SESSION['USE'];
}
if ($user != 'admin') {
$iq = adduser($qb, $user, $pasw, $mail);
}
//add_user
if (prmb(11) >= 6 or $newhub or !$first) {
modif_cnfgtxt($user, $first);
//add_hub
$qb = makenew($user);
message2newuser($user, $mail, $pasw);
$_SESSION['auth'] = '';
}
$_SESSION['qbin']['adminmail'] = $mail;
log_result($user, $iq, $qb, $rl, $cook);
}
}
}
function facil_pos($defs, $k)
{
$u = '/?admin=css&';
//$ret.=lkc("txtnoir",$u.'edit_css='.$k.'&append_this==#'.$k,'append_this').' ';
$ret .= lkc('txtyl', $u . 'erase=' . $k . '#' . ($k - 1), 'delete') . ' ';
$ret .= lkc('txtbox', $u . 'newfrom=' . $k . '&edit_css=' . ($k + 1) . '#' . ($k + 1), nms(44)) . ' ';
foreach ($defs as $ka => $v) {
$rb[$ka] = name_classe($v);
}
//$t.=btn('txtx','position:').menuder_form_kv($rb,'pos',$k,"kv");
$t .= btn('txtx', 'position:') . select(atn('pos'), $rb, 'kv', $k);
$t .= input2('submit', 'save', "ok");
$ret .= form($u . '&atpos=' . $k, $t);
return $ret;
}
function save_track($msg, $id, $name, $mail)
{
$pdt = time();
$iq = hostname();
//ses('iq');
if (is_numeric($id) or substr($id, 0, 4) == 'wall') {
$local = true;
}
if (!$msg) {
return;
}
// btn('popdel','bruuu! '.helps('empty_msg'));
req('sav');
$qb = $_SESSION['qb'];
$base = $_SESSION['qdi'];
$_GET['idy'] = 'ok';
$_GET['insert'] = 'ok';
$_POST['name'] = $nm;
$_POST['msg'] = $msg;
if (!rstr(2) or auth(4)) {
$op = 1;
} else {
$op = 0;
}
$here = host() . '/?read=' . $id;
$msg = str_replace(":chat", "", $msg);
$msg = repair_latin($msg);
$msg = embed_links($msg);
//$amsg=mysql_real_escape_string(stripslashes($msg));
$values = array($ib, $name, $mail, $pdt, $qb, $id, $suj, $msg, $op, $ip);
//,'','',''
$nread = insert('qdi', mysqlra($values));
$suj = $local ? suj_of_id($id) : nms(84);
$nmsg = lka($here . '#trk' . $nread, $local ? helps('trackmail') : nms(84)) . br() . br();
$nmsg .= nms(68) . ': ' . $name . ', ' . mkday($pdt) . br() . br() . format_txt($msg, '', '');
$admail = $_SESSION['qbin']['adminmail'];
//to_admin
if ($name != $_SESSION['USE']) {
send_mail_html($admail, $suj, $nmsg, $mail, urlread($id));
}
if ($local) {
$rmails = sql('mail', 'qdi', 'k', 'frm="' . $id . '" AND re>="1"');
}
//deploy
$kem = sql('name', 'qda', 'v', 'id="' . $id . '"');
//send_to_author
if ($kem != $name) {
$kmail = sql('mail', 'qdu', 'v', 'name="' . $kem . '"');
if ($admail != $kmail) {
$rmails[$kmail] = 1;
}
}
//send_track_to_user
if ($rmails && $op == 1) {
send_mail_r(array_keys_b($rmails), 'html', $suj, $nmsg, $mail, $id);
}
if (!$local) {
return popup(nms(34), divc('', helps('formail')), '');
}
return tracks_read($nread, '', '');
}
function rech_titles($rech, $dig, $opt, $cac, $cat, $tag, $tag2)
{
list($bol, $ord, $tit, $pho) = split("-", $opt);
$load = $_SESSION['load'];
$days = geta('dig', $dig);
$bol = substr($rech, -1) == '*' ? 1 : get('bool', $bol);
$_GET['bool'] = $bol;
//$_GET['pho']=$pho;
$ret .= btn('search', input(1, 'search', $rech . '" size="32" maxlength="150', '')) . ' ';
$ret .= ljb('popsav', 'Search2();', '', nms(24)) . ' ';
$ret .= hlpbt('search') . ' ';
if ($cac) {
$ret .= blj('popbt', 'srcac', 'plug___search_rech*reset_' . $cac, picto('del'));
}
if ($load) {
$ret .= btn("popw", nbof(count($load), 1));
}
//.', '.nbof(array_sum($load),19).' '
if (rstr(3)) {
$ret .= br() . dig_h($days);
} else {
$ret .= hidden('', 'srdig', 1000);
}
//days
if (!isset($_SESSION['rstr62'])) {
sesr('rstr62', rstr(62));
}
if (rstr(3)) {
$ret .= togses('rstr62', pictit('right', nms(134))) . ' ';
}
//dig
$urg = mkurl(array('bool', 'titles', 'cat', 'tag'));
if ($rech) {
$ret .= lkc('', htac('search') . $rech . '/' . $dig, picto('link')) . ' ';
}
//.$urg
$ret .= br() . checkact('srord', $ord, nms(18)) . ' ';
$ret .= checkact('srtit', $tit, nms(72)) . ' ';
//$ret.=checkact('srpho',get('pho'),'').' ';//nms(123)
$ret .= checkact('srbol', $bol, nms(70)) . '' . hlpbt('bool') . ' ';
$ret .= select_j('srcat', 'category', $cat ? $cat : nms(9), 1) . ' ';
//hidslct_j
$ret .= select_j('srtag', 'tag', $tag ? $tag : 'tag', '');
//$ret.=select_j('srtag2','thèmes',$tag3,'thèmes');
return divc('titles', $ret);
}
function plug_taxonav($p, $o)
{
req('mod,spe');
$r = collect_hierarchie_d("reverse", $o);
if (is_numeric($p)) {
$r = $r[$p];
}
if ($r) {
$ret = build_titl($r, $p > 0 ? suj_of_id($p) : $p, 1);
$ret .= balc("ul", "taxonomy", make_menus_rb($r, '', 1, $o));
$ret .= lkc('', '/module/taxonav/' . ajx($p) . '/' . yesno($o), offon($o) . ' ' . nms(129));
} else {
$ret = nms(11) . ' ' . nms(16);
}
return $ret;
}
function chatxform($p)
{
$nm = ses('muse');
$d .= lj('txtcadr', 'popup_plup__x_chatxml__' . $p, pictxt('reload', $p)) . ' ';
$d .= lj('', 'chtx' . $p . '_plug__13_chatxml_chatxcall_' . $p, picto('loading')) . ' ';
$d .= loadjs('chatx', $p, 'live') . ' ' . hlpbt('chatxml') . ' ';
$d .= lj('', 'popup_plup__x_chatxml_chatxcanal_' . $p, picto('rss')) . ' ';
$d .= lj('', 'popup_plug___chatxml_chatxinvite_' . $p, picto('mail')) . ' ';
//$d.=lj('','chtx'.$p.'_plug___chatxml_chatxsav_'.$p.'_2',picto('del')).' ';
if (auth(6)) {
$d .= msqlink('clients', 'chat_' . $p) . ' ';
}
$d .= hlpbt('miniconn') . br();
if ($nm) {
$j = 'SaveBbc(\'' . $p . '\',\'' . $nm . '\')';
} else {
$j = sj('popup_plup__x_chatxml_chatxnm_' . $p . '__msgx' . $p);
}
$sty = 'min-height:16px; border:1px solid #777; max-width:328px; max-height:200px; overflow-y:auto;';
$d .= divedit('msgx' . $p, 'track', $sty, '', '');
$d .= ljb('', $j, '', divc('popsav" style="width:332px;', nms(28)));
return $d;
}
function msql_adm_head($u, $base, $prefix, $table, $version)
{
Head::add('jscode', '//slctmenuder
function MM_jumpMenu(targ,selObj,restore){
eval(targ+".location=\'' . $u . '&def="+selObj.options[selObj.selectedIndex].value+"\'");
if(restore)selObj.selectedIndex=0;}
function goto(g){
if(g=="sort_table")var aff="k or col number";
else if(g=="permut")var aff="0/1";
else if(g=="del_col")var aff="0";
else var aff="' . $base . '/' . $prefix . '_' . $table . '_' . $version . '";
var go=prompt(g,aff);
if(go!=null && go!="' . $base . '/' . $prefix . '_' . $table . '_' . $version . '" && go!="")
window.location="' . $u . '&"+g+"="+go;}
function delfile(g){var ok=confirm("' . nms(43) . '?"); if(ok)window.location=g;;}
function jumpMenu(n,selObj){
var add=selObj.form.elements["c"+n].options[selObj.form.elements[\'c\'+n].selectedIndex].value;
document.getElementById("val"+n).value=add;}
function display_all(k){val=document.getElementById(\'cln\'+k).value;
document.getElementById(\'cnt\'+k).innerHTML=val;}
function chkall(){var inp=document.getElementsByTagName("input");
for(i=0;i<inp.length;i++){if(inp[i].type=="checkbox"){
if(inp[i].checked=="")inp[i].checked="checked"; else inp[i].checked="";}}}');
}
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 plug_suggest($p)
{
Head::add('csscode', '.tab{font-size:large; border:1px dotted silver; background:white; padding:16px; width:100%; height:400px;}');
if (auth(4)) {
$ms = ' ' . msqlink('', nod('suggest'));
}
$ret .= input(1, 'sugnam" size="26', 'mail', '', 1) . ' ' . hlpbt('suggest') . $ms . ' ';
//nms(38)
$ret .= input(1, 'sugurl" size="26', 'url', '', 1) . ' ';
//$ret.=lj('popsav','sugpad_plug__3_suggest_sugg*import___sugurl',nms(132)).' ';
$ret .= lj('popsav', 'sugg_plug__3_suggest_sugg*j___sugurl|sugnam', nms(126)) . ' ';
return $ret . divd('sugg', '') . sugg_recall();
}
function plug_mail($to)
{
$id = randid();
$adm = $to ? $to : $_SESSION['qbin']['adminmail'];
$ids = 'vmfrom' . $id . '|vmto' . $id . '|vmsg' . $id . '|vmsuj' . $id;
$ret .= lj('txtbox', 'vsd' . $id . '_plug___mail_mail*send___' . $ids, nms(28)) . ' ';
if ($_SESSION['auth'] < 3) {
$ret .= input(0, 'vmto' . $id, $adm, '') . btn('txtx', $adm);
} else {
$ret .= lj('txtbox', 'popup_plup___mail_mail*prep_vmto' . $id, nms(36));
$ret .= input(1, 'vmto' . $id, $to . '" size="34', '');
}
$ret .= br();
$ret .= input(1, 'vmsuj' . $id, '" size="56" placeholder="' . nms(71), '') . br();
$ret .= txarea('vmsg' . $id, '', 54, 8) . br();
if ($_SESSION['USE']) {
$ret .= hidden('', 'vmfrom' . $id, $adm);
} else {
$ret .= label('vmfrom' . $id, 'txtblc', '', 'From:') . ' ' . input(1, 'vmfrom' . $id, '') . ' ';
}
return divd('vsd' . $id, $ret);
}
function twit_post($p, $o, $res = '')
{
list($p, $o) = ajxp($res, $p, $o);
require_once 'plug/tiers/Twitter.php';
$t = new Twitter();
$t->update(utf8_encode($p));
return divc('txtalert', nms(34) . ' ' . nms(79));
}
function login_btn_p($p, $o)
{
$t = $p ? $p : "login";
$jx = 'popup_loged___' . ses('USE') . '_' . $_SESSION['iq'] . '_' . ajx(nms(54)) . '_1';
return lj('txtcadr', $jx, $t);
}
function page_titles($o = '', $rid = '')
{
//$o=parent
$frm = ses('frm');
$read = ses('read');
if (get('rssurl')) {
$p['suj'] = nms(15);
} elseif (get('module') == 'All') {
$p['suj'] = get('module');
$p['url'] = htac('module') . 'All';
} elseif ($frm) {
$p['suj'] = $frm;
$p['url'] = htac('cat') . $frm;
}
if ($read && $o) {
$p['parent'] = find_navigation($read);
}
//rstr(78)
if ($p['suj'] == 'Home') {
$p['suj'] = nms(69);
}
return divd('titles', template($p, 'titles'));
}
function ud_search($p, $o, $res)
{
list($p, $o) = ajxp($res, $p, $o);
$p = strtolower(trim($p));
$ps = soundex($p);
$r = umv_r();
if (!$p) {
return;
}
if ($r) {
foreach ($r as $k => $v) {
$voc = strtolower($v[0]);
$vcb = soundex($voc);
if ($o) {
if ($vcb == $ps) {
$ret[] = uds_btn($v);
}
} elseif ($voc == $p) {
$ret[] = uds_btn($v);
}
}
}
$n = count($ret);
$t1 = 'Recherche littérale';
$t2 = 'Glossaire';
$search = lj('', 'popup_search___' . ajx(strtoupper($p)), pictxt('search', $t1)) . ' ';
$search .= lj('', 'popup_plup___umvoc_ud*glossary_' . $p . '_' . $o, pictxt('view', $t2)) . ' ';
//$search.=togbub('plug','umvoc_ud*glossary_'.$p,picto('view')).' ';
$glyphe = ud_glyphe($p) . br();
if ($ret) {
$ret = implode('', $ret) . br();
}
if (auth(6)) {
$sav = umvcadd($p) . br();
}
if (!$ret) {
return btn('txtcadr', nms(11) . ' ' . nms(16)) . ' ' . $search . $glyphe . br() . $sav;
}
return btn('txtcadr', $n . ' ' . plurial($n, 16)) . ' ' . $search . $glyphe . $ret . $sav;
}
function backup_console()
{
//(421)
$base = 'msql/users/';
$nod = $_SESSION['modsnod'];
$f = $base . $nod . '_sav.php';
$goto = '/?admin=console';
if ($d = $_GET["newfrom_mods"]) {
newmodfrom($d);
select_mods($d);
}
if ($_GET["adopt_mods"]) {
foreach ($_SESSION['prmb'] as $k => $v) {
$vaue .= $v . '#';
}
update("qdu", "config", $vaue, "name", ses('qb'));
}
if ($_GET["backup_mods"]) {
copy($base . $nod . '.php', $f);
}
if ($_GET["mk_default"]) {
msq_copy('users', $nod, 'system', 'default_mods');
msq_copy('users', $nod, 'users', 'public_mods_1');
alert('system/default_mods;public_mods_1');
}
if ($_GET["restore_mods"]) {
copy($f, $base . $nod . '.php');
define_mods('');
define_condition();
}
if ($_GET["refresh_mods"]) {
define_mods('');
define_condition();
}
if ($_GET["make_copy"]) {
msq_copy('users', ses('qb') . '_mods_' . ses('prmb1'), 'users', $nod);
define_mods('');
define_condition();
}
if ($_GET["default_mods"]) {
msq_copy('system', 'default_mods', 'users', $nod);
define_mods('');
define_condition();
}
$rt = array('backup' => 'save', 'restore' => 'left', 'refresh' => 'reload', 'copy' => 'copy', 'default' => 'file', 'mkdef' => 'export');
foreach ($rt as $k => $v) {
$rt[$k] = picto($v);
}
$ret = lkc('txtx" title="' . nms(94), $goto . '&backup_mods==', $rt['backup']);
if (is_file($f)) {
$ret .= lkc('txtx" title="' . nms(95), $goto . '&restore_mods==', $rt['restore']);
}
$ret .= lkc('txtx" title="' . nms(97), $goto . '&refresh_mods==', $rt['refresh']);
if ($p1 = ses('prmb1')) {
$ret .= lkc('txtx" title="' . nms(132) . ':' . $p1, $goto . '&make_copy==', $rt['copy']);
}
$ret .= lkc('txtx" title="' . nms(96), $goto . '&default_mods==', $rt['default']);
if (auth(6)) {
$ret .= lkc('txtx" title="' . nms(113), $goto . '&mk_default==', $rt['mkdef']) . ' ';
}
$ret .= hlpbt('console') . ' ';
$ret .= msqlink('', ses('qb') . '_mods_' . prmb(1));
$ret .= msqlink('system', 'admin_modules');
return $ret . br();
}
$meta["title"] = $_GET['admin'];
$meta['favicon'] = uicon('screen_4to3_16', 'picol/16');
} elseif ($_GET["msql"]) {
$meta["title"] = $_GET['msql'];
$meta['favicon'] = uicon('database_16', 'picol/16');
} elseif ($_SESSION["read"]) {
$meta["title"] = $_SESSION["raed"];
$meta["descript"] = $_SESSION["descript"];
$meta["img"] = $host . '/imgc/' . $_SESSION["imgrel"];
} else {
$meta["title"] = $_SESSION['mn'][$_SESSION['qb']];
$meta["descript"] = $_SESSION['qbin']["dscrp"];
}
//$meta["img"]=host().'/img/ban_'.$_SESSION['qb'].'.jpg';
$cst = $_SESSION['desgn'] ? '?' . randid() : '';
if ($_SESSION['mobile'] && rstr(63)) {
$_SESSION['negcss'] = 1;
}
$meta['css'] = define_design();
verif_update();
//update
if ($_SESSION['dlnb']) {
Head::add('jscode', sj('popup_update'));
}
if ($_POST['flow'] or rstr(39)) {
$flow = 1;
}
#back_in_time
if (abs(ses('dayx') - ses('daya')) > 86400) {
$_POST['popadm']['timetravel'] = lkc('txtyl', '/reload/' . ses('qb'), nms(82));
}
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 fi_info_shared($d, $id)
{
$sh = in_array_r($_SESSION['curdir'], $d, 0);
$j = 'fifunc___fi*';
$dj = ajx($d) . '_' . $id;
if ($sh) {
$t = nms(74);
} else {
$t = nms(75);
}
$c = $sh ? 'color:#bd0000' : '';
$ret .= blj('', $id . 'fishr', $j . 'share_' . $dj, picto('share', $c));
if ($sh) {
$ret .= blj('', $id . 'fivrd', $j . 'vdir_' . $sh . '_' . $id, fi_pic('virtual_dir')) . ' ';
}
return $ret;
}
req('finder,spe');
$ret = call_user_func($id, $va, $opt, $res);
if ($optb) {
$t = $id;
}
break;
//sys
//sys
case "alert":
$ret = divc('', picto('alert') . ' ' . $id);
$t = 'Alert';
break;
case "about":
req('pop,tri,spe');
$ret = philum_pub();
$t = nms(80);
break;
case "gooduser":
req('pop');
if (isgoodhubname($id)) {
$ret = $id . '0';
} else {
$ret = $id;
}
break;
case "slctmod":
req('boot');
select_mods(yesnoses('slctm') ? $id : '');
break;
case "dsnav":
$ret = plugin('dsnav', $id, $va);
function save_art_batch()
{
$r = $_SESSION['vacuum'];
//array_reverse
if ($r) {
foreach ($r as $k => $v) {
$rb[] = saveart_url($k);
unset($_SESSION['vacuum'][$k]);
$_SESSION['vacsuj'][$k] = '';
$_SESSION['vaccat'][$k] = '';
$_SESSION['dayx'] == time();
}
}
if ($rb) {
req('pop,spe,art,tri,mod');
$n = count($rb);
$ret .= lkc('poph', '/module/recents/all/Batch/articles/' . $n, nbof($n, 1)) . ' ';
$t = pictxt('view', nms(45) . ' ' . nms(100));
$ret .= lj('poph', 'popup_modpop___all/Batch/articles/' . $n . ':recents', $t);
} else {
$ret = nms(11) . ' ' . nms(16);
}
//$ret.=build_mod_r('all/Batch/multi/'.$n.':recents');
return divs('width:140px;', $ret);
}
function f_inp($mil, $link)
{
$_SESSION['cur_div'] = 'content';
$ip = hostname();
$qda = $_SESSION['qda'];
$USE = $_SESSION['USE'];
$cont = $_GET['continue'];
$read = $_SESSION['read'];
$raed = $_SESSION['raed'];
$frm = $_SESSION['frm'];
if ($USE) {
$us = $USE;
} else {
list($us, $ml) = sql('name,mail', 'qdi', 'r', 'host="' . $ip . '" ORDER BY id DESC LIMIT 1');
}
$currid = lastid('qda') + 1;
if ($frm == "" or $frm == "Home") {
$frm = "public";
}
//sections
if ($_GET['edit'] == "=") {
$cit = "&edit==";
}
$goto = '/?read=' . $read . $cit;
if (substr($link, 0, 4) == 'http' && !$cont) {
$link = https(utmsrc($link));
//vacuum
$_GET['urlsrc'] = $link;
list($suj, $msg) = vacuum($link, '');
}
//elseif($read)$link=$_SESSION['rqt'][$read][9];
if (!$cont) {
$r['urlsrc'] = autoclic('urlsrc', "url", '10" id="urlsrc" onClick="SaveI(\'urlsrc\')" onContextMenu="SaveIt()" value="' . $link, '250', '') . btd('urledt', '');
}
//urlsrc
if ($USE && !$cont) {
$r['trkname'] = hidden('name', 'trkname', $USE) . hidden('mail', 'trkmail', '');
$r['slcat'] = select_j('frm', 'category', $frm, '3', $frm, '');
} elseif (!$USE) {
$gn = '" onkeyup="log_goodname(\'trkname\');';
$r['trkname'] = autoclic('name" id="trkname' . $gn, $us ? $us : nms(38), '8', '50', 'txtx');
//name
$r['trkmail'] = autoclic('mail" id="trkmail', $ml ? $ml : 'mail', '13', '50', 'txtx');
}
//mail
if (!$cont) {
$r['parent'] = select_jp('ib', 'parent', rstr(10) ? $read : '', '0', picto('topo'), '1');
}
//if(!$cont)$r['parent']=togbub();
if (!$cont && auth(3)) {
$r['publish'] = checkbox_j('pub', $_SESSION['auth'] < 4 ? 0 : rstr(11), nms(29));
} else {
$r['publish'] = hidden('pub', 'pub', 0);
}
if (!$cont) {
//new
$r['pstdat'] = select_j('postdat', 'date', date('y-m-d-H-i'), 0, picto('time'), 0);
$r['pstsuj'] = balise('input', array('', '', 'suj', 'suj1', '', 'editor', 7 => 255, 16 => 'width:100%;', 23 => $suj ? $suj : nms(71)), '');
}
if ($cont) {
$msg = sql('msg', 'qdm', 'v', 'id=' . $read);
$btcntn = 'continue=ok#' . $read;
$alrt = conn_correct($msg);
} else {
$goto = '/?read=' . $currid;
$btcntn = 'insert=ok';
}
//&continue==#'.$currid
$msg = str_replace("\r", "", $msg);
//msg
$msg = str_replace(array("<br />\n", "<br />", "<br>"), "\n", $msg);
//save
$ids = 'suj1|frm|urlsrc|postdat|trkname|trkmail|ib|pub';
//|sub
$c = 'popbt';
$sav = ljb($c, 'SaveJb', 'socket_saveart_txtarea_id4_' . $read . '_no\',\'art' . $read . '_readart___' . $read, picto('save'));
if ($cont && rstr(53)) {
$sav .= ljb($c, 'SaveJb', 'txarea_saveart_txtarea_id4_' . $read . '\',\'art' . $read . '_readart___' . $read, nms(57)) . ' ';
} elseif (!rstr(53)) {
$sav .= submitj($c, 'sav', nms(57)) . ' ';
} else {
$sav .= lj($c, 'socket_newart_txtarea_' . (rstr(57) ? 7 : 9) . '_____' . $ids, nms(57)) . ' ';
}
//pop
$btdt = lj('', 'popup_artwedit_txtarea__', pictit('editor', nms(107))) . ' ';
$btdt .= ljb('' . '" title="test', 'captslct', 'preview', picto('valid')) . ' ';
if ($cont && $read) {
$btdt .= urledt_id($read);
}
//defcon//urledt($link)
$ret = '<form method="POST" id="sav" action="' . $goto . '&' . $btcntn . '">' . "\n";
//form
$ret .= btd('bts' . $read, $sav) . ' ' . $btdt;
$ret .= implode(' ', $r);
$ret .= sesmk('conn_edit', '', '');
//1
$ret .= $alrt;
$ret .= divd('txarea', txarea1($msg));
//if(auth(4))$ret.=checkbox("randim","ok","rename_img",0);
$ret .= ' </form>' . "\n";
return $ret;
}
