function f_inp_widths($defs)
{
$set = 'text" size="3';
list($l_large, $m_large, $r_large, $t_large) = obtain_widths($defs);
$t .= btn("txtnoir", 'leftbar ' . input2($set, 'l_large', $l_large, "")) . ' ';
$t .= btn("txtnoir", 'content ' . $m_large . 'px') . ' ';
$t .= btn("txtnoir", 'rightbar ' . input2($set, 'r_large', $r_large, "")) . ' ';
$t .= btn("txtnoir", 'page ' . input2($set, 't_total', $t_large, "")) . ' ';
$t .= input2('submit', 'save', "apply_widths", "") . ' ';
$t .= checkbox('saveblocks', 'ok', 'apply (mods_' . prmb(1) . ')', 0) . ' ';
$t .= hlpbt('designwidths') . br();
$inp = $t . br();
return form('/?admin=css', $inp);
}
function play_req($wh)
{
$qda = $_SESSION['qda'];
$slct = $qda . '.id,' . $qda . '.ib,' . $qda . '.day,mail,frm,suj,img,nod,thm,name,lu,re,host';
if ($_SESSION['lang'] != 'all') {
$in = lang_req();
}
$wh = 'nod="' . $_SESSION['qb'] . '" ' . $wh;
if ($dig = get('dig')) {
$dayb = calc_date($dig);
$daya = calc_date(time_prev($dig));
} else {
$dayb = ses('dayb');
$daya = ses('daya');
}
$wh .= ' and ' . $qda . '.day<' . $daya;
if ($dayb) {
$wh .= ' and ' . $qda . '.day>' . $dayb;
}
return array($slct, $in, $wh, $qda . '.' . prmb(9), ' group by ' . $qda . '.id');
}
function plug_tagpatch($p, $o)
{
$rid = 'plg' . randid();
$bt = btn('popsav', 'Transfert datas to the new tables') . br();
ses('qdt', 'pub_meta');
ses('qdta', 'pub_meta_art');
ses('qdtag', 'pub_tag');
$n = 12;
//req('spe'); echo $n=ceil(lastid('qda')/10000);
for ($i = 0; $i < $n; $i++) {
$bt .= lj('txtbox', $rid . '_plug__3_tagpatch_tagpatch*j_' . $i * 10000, $i);
}
//jb
//patch user_tags
if (prmb(18)) {
$utags = explode(' ', prmb(18));
$ico = explode(' ', prmb(19));
foreach ($utags as $k => $v) {
$bt .= lj('txtbox', $rid . '_plug__2_tagpatch_tagpatch*u_' . ajx($v), $v) . ' ';
}
}
if ($p == 'finalize') {
erase_unused_datas();
} else {
$ret .= lkc('popsav', '/plug/tagpatch/finalize', 'Finalize (delete unused datas !)');
}
//req('meta'); $ret=admin_tags($p?($p):'tag');//utf8_encode
return $bt . divd($rid, $ret);
}
function admin_tags($cat = 'tag')
{
req('spe');
$rid = randid('admtag');
if (!$cat) {
$cat = 'tag';
}
$utags = explode(' ', 'tag ' . prmb(18));
foreach ($utags as $v) {
$c = $v == $cat ? 'txtblc' : 'txtx';
$ret .= lj($c, $rid . '_call___meta_admin*tags_' . ajx($v), $v) . ' ';
}
$ret = divc('', $ret);
$ra = sql_inner('idtag,idart', 'qda', 'qdta', 'idart', 'k', 'where nod="' . ses('qb') . '"');
if ($ra) {
arsort($ra);
}
$rb = sql('id,tag', 'qdt', 'kv', 'cat="' . $cat . '"');
if ($ra) {
foreach ($ra as $k => $v) {
if ($rb[$k]) {
$rc[$k] = array($rb[$k], $v);
}
}
}
$ret .= divc('nbp', count($rc) . ' ' . $cat) . br();
if ($rc) {
foreach ($rc as $idtag => $v) {
$ret .= lj('popbt', 'popup_callp___meta-spe_admin*tags*edit_' . $idtag . '_' . $cat, pictxt('popup', $v[0] . ' (' . $v[1] . ')')) . ' ';
}
}
//
return divd($rid, $ret);
}
function mini_empty($prm)
{
list($w, $h) = split("/", prmb(27));
$out = 'imgc/' . ses('qb') . '_empty.jpg';
$clr = $_SESSION['clrs'][$_SESSION['prmd']][1];
if (!$prm or $prm == 'nl') {
$c = atc('imgl');
}
if (!file_exists($out) or $_GET['rebuild_img']) {
graphics($out, $w, $h, '', $clr, '');
}
return image($out, '', '', $c);
}
function adduser($qb, $user, $pasw, $mail)
{
$dayx = $_SESSION['dayx'];
$qdu = $_SESSION['qdu'];
$mbrs = "7::admin,";
$open = '';
$ip = hostname();
if (prmb(11) >= 6 or $_POST['create_hub']) {
$open = 1;
$menus = $dayx;
$hub = $user;
list($rstr, $config) = ndprms_defaults();
if (!$_SESSION['line']) {
$mbrs .= '7::' . $qb . ',';
} else {
$mbrs .= '6::' . $qb . ',';
}
} elseif (prmb(11) >= 1) {
add_member($qb, $user, prmb(11));
}
$ex = rse("id", $_SESSION['qdu'] . ' WHERE id=1');
if (!$ex) {
echo plugin('install', 'pub');
}
return insert('qdu', "('','{$user}',PASSWORD('{$pasw}'),'{$mail}','" . $dayx . "','{$clr}','{$ip}','{$rstr}','{$mbrs}','{$hub}','','{$config}','{$strct}','{$dscrpt}','{$menus}','{$open}')");
}
function edit_css()
{
$base = "msql/design/";
$basy = "msql/system/";
clrpckr_js();
$qb = ses('qb');
$lh = sesmk('csslang');
$defsb["_menus_"] = array("div", "class", "element", "color", "bkg", "border", "free");
$edit = $_GET["edit_css"] ? $_GET["edit_css"] : $_POST["edit_css"];
if (!$_SESSION['desgn']) {
$_SESSION['desgn'] = $_SESSION['prmd'];
}
$numb = $_GET["desgn"];
//desgn
if ($numb && $numb != "=") {
$_SESSION['desgn'] = $numb;
$_SESSION['clrset'] = $numb;
$_SESSION['prmd'] = $numb;
$_SESSION['clrs'][$numb] = msql_read('design', $qb . '_clrset_' . $_SESSION['clrset'], '');
$defs = read_vars($base, $qb . '_design_' . $_SESSION['desgn'], $defsb);
}
$desgn = $_SESSION['desgn'];
$prmd = $_SESSION['prmd'];
$clrset = $_SESSION['clrset'] = $_SESSION['clrset'] ? $_SESSION['clrset'] : $prmd;
$f_dsn = $qb . '_design_' . $desgn;
$f_clr = $qb . '_clrset_' . $clrset;
$basecss = 'css/' . $f_dsn . '.css';
$basecss_temp = 'css/' . $qb . '_design_dev_' . $prmd . '.css';
#load
if (!$defs) {
$defs = read_vars($base, $f_dsn, $defsb);
}
unset($defs['_menus_']);
//good_nb
unset($defs[0]);
$defs = reorder_keys($defs);
if (!is_file($basecss_temp)) {
build_css($basecss_temp, $defs);
}
#sav
if ($nd = $_GET["newdiv"]) {
$defs = defs_addnew($defs, $_GET["from"], array($nd, '', '', '', '', '', ''));
//p($defs);
save_vars($base, $f_dsn, $defs);
$edit = find_value($defs, array($nd));
}
if ($_GET["new_from"]) {
$tbn = msq_find_last('design', $qb, 'design');
save_vars($base, $qb . '_design_' . $tbn, $defs);
msq_copy('design', $f_clr, 'design', $qb . '_clrset_' . $tbn);
//msq_copy('design',$qb.'_blocks_'.$desgn,'design',$qb.'_blocks_'.$tbn);
$_SESSION['clrs'][$tbn] = $_SESSION['clrs'][$_SESSION['desgn']];
$_SESSION['desgn'] = $_SESSION['clrset'] = $tbn;
$f_dsn = $qb . '_design_' . $tbn;
$f_clr = $qb . '_clrset_' . $tbn;
msql_modif('users', 'public_design', dsnam_arr(desname($qb, $desgn)), '', 'one', $tbn);
build_css('css/' . $qb . '_design_dev_' . $tbn . '.css', $defs);
}
if ($_GET["make_public"]) {
if ($_GET["inform"]) {
$tbn = $desgn;
} else {
$tbn = msq_find_last('design', 'public', 'design');
}
save_vars($base, 'public_design_' . $tbn, $defs);
msq_copy('design', $f_clr, 'design', 'public_clrset_' . $tbn);
msql_modif('users', 'public_design', dsnam_arr(desname($qb, $desgn)), '', 'one', $desgn);
build_css('css/public_design_' . $tbn . '.css', $defs);
alert('created: public_design_' . $tbn);
}
if ($_GET["make_admin"]) {
build_css('css/_admin.css', $defs);
save_vars($basy, 'default_css_3', $defs);
alert('modified: system/default_css_3, _admin.css');
}
if ($_GET["make_global"]) {
build_css('css/_global.css', $defs);
save_vars($basy, 'default_css_1', $defs);
msq_copy('design', $f_clr, 'system', 'default_clr_1');
alert('modified: system/default_css_1, _global.css');
}
if ($_GET["make_default"]) {
build_css('css/_classic.css', $defs);
save_vars($basy, 'default_css_2', $defs);
msq_copy('design', $f_clr, 'system', 'default_clr_2');
$defse = empty_design($defs, 'clr');
build_css('css/_default.css', $defse);
alert('modified: table system/default_css_2, _classic.css, _default.css (no colors)');
}
//clrset
if ($_GET["clrset"]) {
$_SESSION['clrset'] = $clrset = $_GET["clrset"];
$f_clr = $qb . '_clrset_' . $clrset;
$_SESSION['clrs'][$prmd] = msql_read('design', $f_clr, '');
build_css($basecss_temp, $defs);
}
//import_clrset
if ($_GET["import_clrset"]) {
$_SESSION['clrs'][$prmd] = explode("_", $_GET["import_clrset"]);
if ($_SESSION["auth"] >= 6) {
save_clr($qb . '_' . $clrset);
}
}
if ($_GET["add_clrset"]) {
save_clr($qb . '_' . $_GET["clrset"]);
}
//reset
if ($_GET["reset_clr"] or $_GET["add_design"]) {
$_SESSION['clrs'][$prmd] = msql_read('system', "default_clr_2", '');
save_clr($f_clr);
}
if ($_GET["reset_default"] or $_GET["add_design"]) {
$defs = css_default();
unset($defs['_menus_']);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($_GET["reset_global"] or $_GET["add_design"]) {
$defs = css_default(1);
unset($defs['_menus_']);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
//public
if ($pub = $_GET["public_clr"]) {
$_SESSION['clrs'][$prmd] = msql_read('design', 'public_clrset_' . $pub, '');
save_clr($f_clr);
}
if ($pub = $_GET["public_design"]) {
$defs = msql_read('design', 'public_design_' . $pub, '');
unset($defs['_menus_']);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
//null
if ($_GET["empty_design"]) {
$defs = empty_design($defs, 'css');
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($pub = $_GET["null_clr"]) {
$_SESSION['clrs'][$prmd] = array('', '', '', '', '', '', '', '');
save_clr($f_clr);
}
if ($pub = $_GET["null_design"]) {
$defs = css_default();
$defs = empty_design($defs, 'css');
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
//append
if ($_GET["append"]) {
$defsc = css_default();
unset($defsc['_menus_']);
$defs = array_append($defs, $defsc);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($_GET["append_global"]) {
$defsc = css_default();
unset($defsc['_menus_']);
$defs = array_append($defs, $defsc);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($_GET["inject_global"]) {
$defsc = css_default();
unset($defsc['_menus_']);
$defs = append_design($defs, $defsc);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($_GET["reset_this"]) {
$ec = $_GET["edit_css"];
$defsc = css_default();
$ecb = find_value($defsc, $defs[$ec]);
if ($ecb) {
$defs[$ec] = $defsc[$ecb];
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
}
//restore_design
if ($_GET["restore"] == "design") {
$defs = read_vars($base, $f_dsn . '_sav', $defsb);
unset($defs['_menus_']);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
//restore_clrset
if ($_GET["restore"] == "clrset") {
$r = read_vars($base, $f_clr . '_sav', '');
foreach ($r as $k => $v) {
$clrst[] = $v[0];
}
$_SESSION['clrs'][$prmd] = $clrst;
save_clr($f_clr);
build_css($basecss_temp, $defs);
}
//herits
if ($_GET["herit_desgn"]) {
list($qbb, $nbd) = explode('_', $_GET["herit_desgn"]);
$defs = read_vars($base, $qbb . '_design_' . $nbd, $defsb);
//$_SESSION['clrs'][$desgn]=msql_read("design",$qbb.'_clrset_'.$nbd,'');
//save_clr($f_clr);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($_GET["herit_clrset"]) {
list($qbb, $nbd) = explode('_', $_GET["herit_clrset"]);
$_SESSION['clrs'][$desgn] = msql_read("design", $qbb . '_clrset_' . $nbd, '');
save_clr($f_clr);
build_css($basecss_temp, $defs);
}
//ff
if ($_GET['addff']) {
$defs = defs_adder_ff($defs);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
//save//add
if ($_POST["save"] or $_GET["save_img"] or $_GET["save"]) {
$defs = save_defs($base, $f_dsn, $defs, $defsb["_menus_"]);
build_css($basecss_temp, $defs);
if ($_POST["saveblocks"] or $_GET["save"]) {
build_css($basecss, $defs);
}
}
if ($_GET["invert_clr"]) {
$_SESSION['clrs'][$prmd] = invert_defsclr();
save_clr($f_clr);
build_css($basecss_temp, $defs);
}
//sav
if ($_GET["erase"]) {
$defs = save_css_j_del($defs, $_GET["erase"]);
save_vars($base, $f_dsn, $defs);
}
if ($_GET["newfrom"]) {
$defs = save_css_newfrom($defs, $_GET["newfrom"]);
//if($newdiv=$_GET["newdiv"])$defs[$edit]=array($newdiv);
save_vars($base, $f_dsn, $defs);
}
if ($_GET["atpos"]) {
$n = count($defs);
$defs = save_css_displace($defs, $_GET["atpos"], $_POST["pos"]);
if (count($defs) == $n) {
save_vars($base, $f_dsn, $defs);
}
}
if ($_GET['sav']) {
save_vars($base, $f_dsn . '_sav', $defs, 1);
save_clr($f_clr);
}
//_sav
if ($_GET["apply"]) {
save_vars($base, $f_dsn, $defs);
save_clr($f_clr);
build_css($basecss, $defs);
informe_config_design();
}
//informe_config_width($defs);
//build_css
if ($_GET["build_css"]) {
build_css($basecss_temp, $defs);
}
#body
$go = '/?admin=css';
$ret .= lkc("txtcadr", $go, $f_dsn) . ' ';
$ret .= msql_desnam($qb, $desgn, '') . "\n";
$ret .= hlpbt('design') . ' ';
$ret .= msqlink('design', $qb . '_design_' . $desgn) . ' ';
$ret .= lkc('popsav', "/?admin=console&exit_design==", pictxt('logout', nms(112)));
//$ret.=lj('popbt','page_deskbkg','desk').lj('popbt','popup_site___desktop_ok__autosize','site');
//icon('exit')
$ret .= br() . br();
if (prmb(5)) {
$ret .= picto(alert) . helps('prmb5') . br() . br();
}
//$ret.=btn_switch('desgn',$prmd,'/?admin=css','live_edit');
$ret .= see_conds_b() . ' ';
//$ret.=lkc('txtx','/?admin=css&apply==cr_mod==','create conditionnal design').' ';
$ret .= hlpbt('designcond') . br() . br();
$ret .= btn("txtsmall", "save:") . ' ';
$ret .= lkc('txtx', $go . '&sav==', "backup") . ' ';
if ($_SESSION['prmd'] != $_SESSION['desgn']) {
$ret .= lkc('txtx', $go . '&apply==', 'test design ' . $desgn) . ' ';
}
$ret .= lkc('txtx', $go . '&apply=save', nms(66) . ' (mods:' . prmb(1) . ')') . ' ';
$ret .= lkc("popsav", $go . '&save==', nms(57)) . ' ';
//$ret.=lkc("txtx",$go.'&save_inverted==','black').' ';
$ret .= br();
$ret .= btn("txtsmall", nms(111)) . ' ';
//select
$ret .= lj("txtbox", 'popup_styls___select', 'design:' . $desgn . '/clrset:' . $clrset) . ' ';
$ret .= lj('txtx', 'popup_styls___herit', $lh[3]) . ' | ';
//herit
$ret .= lkc('txtx', $go . '&build_css==', nms(93)) . ' | ';
//rebuild
//$ret.=lkc('txtx',$go.'&build_css==&cmpq==',"cmpq").' ';
$ret .= lj('txtx', 'popup_stylsff___1', '@font-face') . br();
$ret .= btn("txtsmall", nms(113)) . ' ';
//make
$ret .= lkc('txtx', $go . '&new_from==', nms(44)) . ' ';
$ret .= lkc('txtx', $go . '&empty_design==', nms(46)) . ' ';
$ret .= lkc('txtx', $go . '&invert_clr==', nms(115)) . ' ';
$ret .= lkc('txtx', $go . '&make_public==', $lh[4]) . ' ';
//make_public
$ret .= lkc('txtx', $go . '&make_public==&inform==', $lh[5]) . ' ';
//inform_public
if ($_SESSION['auth'] > 5) {
$r = msql_read('users', $qb . '_design', $desgn);
$desgname = $r[0] ? $r[0] : $r['name'];
if ($desgname == 'admin') {
$make = 'make_admin';
} elseif ($desgname == 'global') {
$make = 'make_global';
} else {
$make = 'make_default';
}
$ret .= lkc('txtbox', $go . '&' . $make . '==', $make);
}
$ret .= br();
$ret .= btn("txtsmall", nms(95)) . ' ';
//restore
if (is_file($base . $f_dsn . '_sav.php')) {
$ret .= lkc('txtx', $go . '&restore=design', 'design') . ' ';
}
//restore
$ret .= lkc('txtx', $go . '&restore=clrset', 'clr') . ' | ';
$ret .= lkc('txtx', $go . '&reset_default==', nms(96)) . ' ';
//defaults
$ret .= lkc('txtx', $go . '&reset_clr==', "clr") . ' | ';
$ret .= lkc('txtx', $go . '&reset_global=1', "global") . ' ';
$ret .= lkc('txtx', $go . '&public_clr=1', "clr") . ' | ';
$ret .= lkc('txtx', $go . '&public_design=2', "public") . ' ';
//public
$ret .= lkc('txtx', $go . '&public_clr=2', "clr") . ' | ';
$ret .= lkc('txtx', $go . '&null_design==', "null") . ' ';
$ret .= lkc('txtx', $go . '&null_clr==', "clr") . br();
$ret .= btn("txtsmall", nms(92)) . ' ';
//append
$ret .= lkc('txtx', $go . '&append==', nms(96)) . ' ';
//default
$ret .= lkc('txtx', $go . '&append_global==', "global") . ' ';
$ret .= lkc('txtx', $go . '&inject_global==', $lh[9]) . br();
//inject_globals
$ret .= btn("txtsmall", nms(45)) . ' ';
//see
$ret .= lkt('txtx', $basecss, $lh[10]) . ' ';
$ret .= lkt('txtx', $basecss_temp, $lh[11]) . ' ';
//$ret.=lkt('txtx',$f_clr,"clr").' ';
$ret .= lj('txtx', 'popup_styls___clr', "clrset") . ' ';
$ret .= btn('txtx', count($defs) . ' ' . nms(117)) . ' ';
$ret .= btn('txtx', mkday(filemtime($base . $f_dsn . '.php'))) . ' ';
$ret .= br() . br();
$ret .= f_inp_clr_manage_j() . br();
//colors
//plugin('csswidth'); $ret.=f_inp_widths($defs);//widths
if ($defs) {
$ret .= f_inp_plugs($defs, $defsb["_menus_"], $edit, 1) . br() . br();
}
//edit_css
return $ret;
}
function bub_seek()
{
$r = explode(' ', 'tag ' . prmb(18));
req('art');
foreach ($r as $k => $v) {
$ret = seek_merge($v, $ret);
}
//if($v)$ret[]=array($v,'bub','seektag',ajx($v),'','','','folder2');
return $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 murl_read($u)
{
if (substr($u, 0, 4) == 'lang') {
list($base, $dir, $node) = explode('/', $u);
} else {
list($base, $node) = split_one('/', $u, 1);
}
list($node, $row) = split_one('|', $node, 1);
//92,190:no,191,657,msqlink,admin:msqlj:54,ajax:"msql"
list($node, $line) = split_one(':', $node, 1);
list($b, $d) = split_one('/', $base, 0);
list($p, $t, $v, $l) = explode('_', $node);
$l = $l ? $l : $line;
if (!$b) {
$b = $p;
$p = '';
}
if (!$b) {
$b = 'users';
}
if ($b == 'lang') {
$d = $dir ? $dir : prmb(25);
}
return array($b, $d, $p, ajx($t), ajx($v), ajx($l));
}
function slct_r($d, $o, $vrf = '')
{
switch ($d) {
case 'parent':
$r = newartparent();
break;
case 'category':
$r = $_SESSION['line'];
if ($r) {
ksort($r);
}
break;
//$r=array(nms(9)=>1);
//$r=array(nms(9)=>1);
case 'tag':
$r = tags_list_nb($o, 30);
break;
//$r=array('tag'=>1);
//$r=array('tag'=>1);
case 'lang':
$r = array_flip(explode(' ', prmb(26)));
$cl = 1;
break;
case 'msql':
req('msql');
list($dr, $nd, $vn) = murl_vars($o);
$r = msql_read($dr, $nd, '', 1);
//echo $o.'-'.$vrf.':'.$dr.'/'.$nd.'='.$vn.br();
if ($r) {
ksort($r);
}
if ($r) {
$r = array_flip(array_keys($r));
}
break;
case 'msqlc':
req('msql');
list($dr, $nd, $vn) = murl_vars($o);
$ra = msql_read($dr, $nd, '', 'k', 1);
$vrf = $vn ? $vn : 0;
if ($ra) {
foreach ($ra as $k => $v) {
$v = parse($v[$vrf]);
$r[$v] = $v;
}
}
if ($r) {
ksort($r);
}
break;
case 'plug':
$r = msql_read('system', 'program_plugs');
if ($r) {
ksort($r);
}
break;
case 'func':
if ($o) {
$r = call_user_func($o);
}
$r = array_keys($r);
if ($r) {
ksort($r);
}
break;
case 'pfunc':
list($plg, $fnc, $prm) = explode('/', $o);
$r = plugin_func($plg, $fnc, $prm);
break;
case 'pfuncb':
list($plg, $fnc, $prm) = explode('/', $o);
$r = plugin_func($plg, $fnc, $prm);
break;
default:
if (strpos($d, '|')) {
$r = array_flip(explode('|', $d));
} else {
$r = array_flip(explode(' ', $d));
}
break;
}
if ($r && $cl) {
$r = array_unshift_b($r, '', 'x');
}
//if($r[0])unset($r[0]);
return $r;
}
function timelang()
{
setlocale(LC_TIME, prmb(25) . '_' . strtoupper(prmb(25)));
}
function apicom_menu($p, $o, $rid)
{
if ($o && $o != 1) {
$rid = $o;
}
if (!$p) {
$p = 'hub:' . ses('qb') . ',minday:' . ses('nbj') . ',nbyp:' . prmb(6);
}
$rb = msql_read('lang', 'helps_api', '', 1);
$r = apicom_ex();
foreach ($r as $k => $v) {
$o = atb('onclick', 'apijumptoarea(\'inp' . $k . '\')');
$o .= atb('onkeyup', 'apijumptoarea(\'inp' . $k . '\')');
$o .= atb('placeholder', $v);
if ($rb[$k]) {
$hlp = ' (' . $rb[$k] . ')';
}
if ($k == 'cat') {
$hlp = select_j('inp' . $k, 'pfunc', '', 'apicom/apicom_cat', '', '2');
}
if ($k == 'tag' or strpos(prmb(18), $k) !== false) {
$hlp = select_j('inp' . $k, 'tag', '', $k, '', '2');
}
$ret .= div('', inp('inp' . $k, '', $o) . ' ' . btn('small', ($k == 'cat' ? 'category' : $k) . $hlp));
}
$ret = divc('cols', $ret);
$o = atb('onclick', 'apijumptoinputs()') . atb('onkeyup', 'apijumptoinputs()');
$ret .= ljb('', 'apijumpall', implode_k($r, ',', ':'), picto('right')) . br();
$ret .= balb('textarea', atd('inp') . $o . atb('cols', 64) . atb('row', 4), $p) . ' ';
$ret .= lj('', $rid . '_plug__3_api_api*j___inp', picto('reload')) . ' ';
$ret .= hlpbt('api');
return $ret;
}
function cache_arts()
{
$nod = $_SESSION['qb'] . '_cache';
$main = msql_read_b('', $nod, '', 1);
if ($main) {
$last = current($main);
}
$lastart = last_art($last[0]);
if (!is_array($main[$lastart]) && $lastart or get('refresh')) {
$ret['_menus_'] = array('date', 'cat', 'title', 'img', 'hub', 'tag', 'lu', 'author', 'length', 'url', 'ib', 're');
//if(!ses('dayb'))ses('dayb',calc_date(ses('nbj')));
$slct = 'id,day,frm,suj,img,nod,thm,lu,name,host,mail,ib,re';
if (ses('dayb')) {
$wh = ' and day>"' . ses('dayb') . '"';
}
$r = sq($slct, 'qda', 'where nod="' . ses('qb') . '"' . $wh . ' and substring(frm,1,1)!="_" and re>"0" order by ' . prmb(9));
if ($r) {
while ($rb = mysql_fetch_row($r)) {
$k = array_shift($rb);
$rb[3] = first_img($rb[3]);
$rtb[$k] = $rb;
if ($rtb) {
$ret += $rtb;
}
}
}
$ok = 'cache reloaded';
msql_save('', $nod, $ret);
$_SESSION['rqt'] = $rtb;
} else {
$_SESSION['rqt'] = $main;
}
return lka('/reload/' . ses('qb'), 'reload');
}
<?php
$ret = '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">' . "\n";
//"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">'."\n";
$ret .= '<html lang="' . prmb(25) . '"><head>' . "\n";
$ret .= '<title>' . $meta["title"] . '</title>' . "\n";
$ret .= meta('http-equiv', 'Content-Type', 'text/html; charset=' . $_SESSION['enc']);
//$ret.=meta('charset',$_SESSION['enc']);
$ret .= '<link rel="shortcut icon" href="' . $meta['favicon'] . '"><base href="' . $host . '/">' . "\n";
//<link rel="image_src" href="'.$host.$meta["img"].'">
$ret .= meta('name', 'robots', $_SESSION['rstr'][22] == 0 ? 'index, follow' : 'nofollow');
$ret .= meta('name', 'revisit-after', '1 hour');
$ret .= meta('name', 'distribution', 'Global');
if (rstr(74)) {
$ret .= meta('property', 'og:title', $meta["title"]);
$ret .= meta('property', 'og:image', $meta["img"]);
$ret .= meta('property', 'og:description', $meta["descript"]);
} else {
$ret .= meta('name', 'title', $meta["title"]);
$ret .= meta('name', 'image', $meta["img"]);
$ret .= meta('name', 'description', $meta["descript"]);
}
//$ret.=meta('name','author',$_SESSION['rqt'][$read][7]);
//$ret.=meta('name','language',$_SESSION['opts']['lang']);
$ret .= meta('name', 'category', $_SESSION['frm']);
$ret .= meta('name', 'generator', 'philum_' . $_SESSION['philum']);
//needed
$ret .= meta('name', 'hub', $_SESSION['qb']);
//$ret.=meta('name','copyright','GNU/GPLv3');
$ret .= meta('name', 'viewport', 'user-scalable=no, initial-scale=1, minimum-scale=1, maximum-scale=1, width=device-width');
//prmb(4)
function twit_vacuum($f)
{
$p = strrchr_b($f, '/');
require_once 'plug/tiers/Twitter.php';
$t = new Twitter();
$q = $t->read($p);
$r = twit_datas($q);
setlocale(LC_TIME, prmb(25) . '_' . strtoupper(prmb(25)));
//$ret['from']='@'.$q['user']['screen_name'];
$ret['suj'] = strftime('%H:%M - %d %b %Y', strtotime($q['created_at']));
$ret['day'] = $q['created_at'];
$ret['msg'] = clean_firstspace($r['text']);
if ($q['entities']['media']) {
foreach ($q['entities']['media'] as $v) {
$ret['msg'] .= "\n\n" . '[' . $v['media_url_https'] . ']';
}
}
if ($r['reply-to_id']) {
$q = $t->read($r['reply-to_id']);
$r = twit_datas($q);
$answtxt = ucfirst(nms(91)) . ' ' . nms(36);
$ret['msg'] .= "\n\n" . $answtxt . ' [' . $q['id'] . 'ยง' . $r['name'] . ':poptwit]';
}
return array($ret['suj'], $ret['msg'], $ret['day']);
}
function make_thumb_css($im)
{
if (!file_exists('imgc/' . $im)) {
list($w, $h) = split('/', prmb(27));
make_mini('img/' . $im, 'imgc/' . $im, $w, $h, 0);
}
return $im;
}
function tag_arts($tag, $cat = '', $nbday = '', $pday = '')
{
$wh = 'and tag="' . $tag . '"';
if ($cat) {
$wh .= ' and cat="' . $cat . '"';
}
if ($nbday) {
$wh .= ' and day>"' . calc_date($nbday) . '"';
}
if ($pday) {
$wh .= ' and day<"' . calc_date($pday) . '"';
}
if (prmb(9)) {
$wh .= ' order by ' . ses('qda') . '.' . prmb(9);
}
return artags('idart', $wh, 'k');
}
function icotag()
{
$t = 'related_arts related_by see_also-source source rub_taxo taxo_arts same_title tags ' . prmb(18);
$r = explode(' ', $t);
$n = count($r);
$t = 'up down home home topo-open topo articles tag ' . prmb(19);
$ico = explode(' ', $t);
for ($i = 0; $i < $n; $i++) {
$ret[$r[$i]] = picto($ico[$i]);
}
return $ret;
}
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();
}
function select_mods($d = '')
{
if ($d) {
$_SESSION['prmb1'] = prmb(1);
$_SESSION['prmb'][1] = $d;
} elseif ($_SESSION['prmb1']) {
$_SESSION['prmb'][1] = $_SESSION['prmb1'];
}
reset_mjx();
$_SESSION['modsnod'] = $_SESSION['qb'] . '_mods_' . prmb(1);
define_mods('');
define_condition();
}
case "msqledit":
req('msql');
$ret = medit_shot($id, $va, $opt, $optb, $res);
$tt = 'edit';
break;
case "msqlmodif":
msql_modif($id, $va, ajxg($res), $optb, 'shot', $opt);
$ret = nl2br(ajxg($res));
break;
case "msql":
req('spe');
if ($optb) {
$optb = ':' . ajxg($optb);
}
list($w, $h) = explode('-', $sz);
$url = '/msql/' . ($id == 'lang' ? $id . '/' . prmb(25) : $id) . '/' . $va . ($opt ? '_' . $opt . $optb : '');
$ret = iframe($url, $w - 20, $h - 40);
if (!$ret) {
$ret = $url;
}
$t = 'msql';
$s = $w ? $w : 720;
break;
//plugs
//plugs
case "favs":
req('mod');
$ret = vfavs_sav($id);
break;
case "artstats":
$ret = plugin_func('stats', 'stat_graph', 'nba', $id, '400_40_' . $va);
function api_mod_arts($p, $t = '', $tp = '')
{
//module api_arts
$ra = api_mod_rq($p);
$ra['rid'] = 'loadmodart';
$ra['nbyp'] = prmb(6);
$ra['page'] = 1;
$ra['t'] = $ra['t'] ? $ra['t'] : $t;
$ra['template'] = $tp;
//$ra['seesql']=1;
return $ra;
}