function pray_sav($p, $o, $res = '') { list($p, $o) = ajxp($res, $p, $o); //echo $p.'-'.$o.'-'.$res; //$r=db_read('ummo/pray/1511'); $r = msql_read('', 'ummo_pray_1', '', ''); if ($r) { foreach ($r as $k => $v) { if ($v[0] == $p && $v[1] == $o) { $id = $k; } } } if ($id) { unset($r[$id]); } else { $r[] = array($p, $o, 1); } msql_modif('users', 'ummo_pray_1', $r, $dfb, 'arr', ''); db_write('ummo/pray/1511', $r); //if(!$id)modif_vars('users','ummo_pray_1',array($p,$o,1),'push'); //else modif_vars('users','ummo_pray_1',array($id=>array($p,$o,0)),'mdf'); $ret = pray_build($p, $o, $r); return $ret; }
function pictos_save($k, $d, $res) { $file = ajxg(trim($res)); $r = array($file); $r = msql_modif('system', 'program_pictos', $r, '', 'one', $k); $_SESSION['icons'][$k] = $file; return ico($file); }
function umvcsav($p, $o, $res) { $def = ajxg($res); $rb = sql_inner('frm', 'qdm', 'qda', 'id', 'k', 'where nod="ummo" and substring(frm,1,1)!="_" and frm!="études" and frm!="Idéogrammes" and frm!="AiooyaaOaxiiboo" and re>0 and msg like "% ' . $p . ' %"', ''); if ($rb) { $ref = implode(' ', array_keys($rb)); } $defs = array(strtoupper($p), $def, '', $ref); msql_modif('', ses('umvcnod'), $defs, '', 'push', ''); return ud_search($p, '1', ''); }
function msqdt_herit_overmenus($p, $o) { $r = sql('msg', 'qdd', 'rv', 'val="surcat"'); if ($r) { foreach ($r as $k => $v) { list($over, $cat) = split_right('/', $v, 1); //root,action,type,button,icon,auth $ra[] = array('Sections/' . $over, '/cat/' . $cat, '', $cat, 'url', ''); } } msql_modif('', ses('msqdt'), $ra, '', 'add', ''); return msqdt_build($p, $o); }
function plug_dir2table($d, $p) { $r = explore($d); //p($r); list($dr, $nod) = split_right('/', $p, ''); if ($r) { msql_modif($dr, $nod, msq_prep($r), array('src'), 'add', 'mdf'); } $rb = msql_read($dr, $nod, ''); if (!$rb) { return 'error'; } //p($rb); //1d_array return make_tables('', msq_prep($rb), $csa, $csb); }
function plug_ftext($d, $tx) { $nd = stext_log(); $ra = msql_read('', $nd . '_txt_ftxt', '1'); $msg = stripslashes($ra[1]); $msg = html_entity_decode_b($msg); if (!$ra && $nd) { msql_modif('users', $nd . '_txt_ftxt', array('day', 'text'), '', 'one', 1); } $ret .= btd('bts', lj('', 'bck_plug__xd_ftext_ftext*j_ftxt__ftxt', picto(save))) . ' '; $ret .= btd('bck', '') . hlpbt('ftext') . br(); if (!$tx) { $ret .= txarea('ftxt', $msg, 54, 12); } return btd('plgtxt', $ret); }
function udc_source() { //AADOAUGOO $r = msql_read('users', 'ummo_umvoc_1', ''); $sql = 'where nod="ummo" and substring(frm,1,1)!="_" and frm!="études" and frm!="Idéogrammes" and frm!="AiooyaaOaxiiboo" and re>0 and msg like '; if ($r) { foreach ($r as $k => $v) { if ($k != '_menus_') { $rb = sql_inner('frm', 'qdm', 'qda', 'id', 'k', $sql . '"% ' . $v[0] . ' %"', ''); } if ($rb) { $rb = array_keys($rb); $v[3] = count($rb) ? implode(', ', $rb) : ''; $rc[$k] = $v; } } } $r = msql_modif('', 'ummo_umvoc_1', $rc, '', 'arr', ''); }
function plug_txt($d, $tx) { $nd = txt_log(); if ($d) { $ra = msql_read('', $nd . '_txt_' . $d, ''); } $msg = stripslashes($ra[1][1]); $msg = html_entity_decode_b($msg); if ($d && !$ra && $nd) { msql_modif('users', $nd . '_txt_' . $d, array('title', ''), '', 'one', 1); } $ret .= st_paste($d) . ' '; if ($d) { $ret .= input('text', 'tit', stripslashes($ra[1][0])) . ' '; } $ret .= stx_btn($d, $nd, $tx) . br(); if (!$tx) { $ret .= txarea('txtarea', $msg, 44, 4, ats('min-width:640px; min-height:400px; font-size:large; padding:16px;')); } return btd('plgtxt', $ret); }
function plug_stext($d, $tx) { $nd = stext_log(); if ($d) { $ra = msql_read('', $nd . '_txt_' . $d, ''); } $msg = stripslashes($ra[1][1]); $msg = html_entity_decode_b($msg); if ($d && !$ra && $nd) { msql_modif('users', $nd . '_txt_' . $d, array('title', ''), '', 'one', 1); } $ret .= st_paste($d) . ' '; if ($d) { $ret .= input('text', 'tit', stripslashes($ra[1][0])) . ' '; } $ret .= stx_btn($d, $nd, $tx) . br(); if (!$tx) { $ret .= txarea('txtarea', $msg, 64, 20); } return btd('plgtxt', $ret); }
static function displace($r, $a, $b) { $add = 0; $rb['_menus_'] = array('ib', 'val', 'to'); $move = $r[$a]; unset($r[$a]); foreach ($r as $k => $v) { if ($k == $b) { $rb[$k] = $move; $add = 1; } if ($k >= $a) { $add = 0; $v[0] = $b; } if ($add && $v[0] >= $b) { $v[0] += 1; } $rb[$k + $add] = $v; } msql_modif('', ses('topo'), $rb, '', 'arr', ''); return $rb; }
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 addfonts_j($var1, $var2, $res) { $r = msql_read('', 'public_addfonts', ''); if ($r) { $rk = array_keys_r($r, 0, 'k'); } $res = ajx(substr($res, 0, -1), 1); $res = embed_detect($res, '{', '}', ''); $res = str_replace(array('"', "'", ' ', "\n", "\r", "\t", "?#iefix", "?", "!"), '', $res); $ra = explode(';', $res); $nb = count($ra); for ($i = 0; $i < $nb; $i++) { list($attrb, $value) = split_right(':', $ra[$i], 0); if ($attrb == 'font-family') { $rb['name'] = $value; } $rab = explode(',', $ra[$i]); if ($rab) { foreach ($rab as $k => $va) { $rt = embed_detect($va, 'url(', ')', ''); //echo $rt.br().br(); if ($rt && !$rk[$rb['name']]) { $rs = str_extract('#', $rt, 0, 0); $xt = strrchr_b($rt, '.'); if ($xt && substr($rs, 0, 4) == 'http' && $xt != 'eot?') { $rb[$xt] = $rs; } else { $noturl = 1; } } } } } if ($rb[0]) { $rb = msq_reorder($rb); } //p($rb); $dfb['_menus_'] = array('name', 'eot', 'woff', 'svg', 'ttf'); if (count($rb) > 1) { $r = msql_modif('users', 'public_addfonts', $rb, $dfb, 'push', ''); //p($rb); return addf_read($r); } else { return btn('txtred', $noturl ? 'not absolte url' : 'already_exists'); } }
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 icons_del($d) { $dfb['_menus_'] = array('data'); $r = msql_modif('system', 'program_icons', '', $dfb, 'del', $d); $f = 'imgb/icons/system/philum/16/' . $d . '.png'; if (is_file($f)) { unlink($f); } return icons_read(); }
function auto_design() { $n = $_SESSION['prmb'][5]; $phi = ses('philum'); $d = msql_read_b('', ses('qb') . '_autodesign', $phi, '', array($phi => array(1))); if (!$d) { req('styl'); // or get(id) if ($n < 4) { $r = msql_read('system', 'default_css_' . $n); } elseif (is_numeric($n)) { $r = msql_read('design', 'public_design_' . $n); } $f = 'css/' . ses('qb') . '_auto.css'; build_css('css/' . ses('qb') . '_auto.css', $r); msql_modif('users', ses('qb') . '_autodesign', array(1), '', 'one', $phi); alert('css_auto re-generated'); } }
function slider_sav($nod, $n) { $rb = explode('_', $nod); $rb = ajxr($_GET['res']); $nb = count($rb); //preload("","","") $r = msql_read('gallery', $nod, substr($n, 0, 3) == 'mdf' ? '' : $n); if (substr($n, 0, 3) == 'mdf') { list($n, $nb) = split('-', $n); foreach ($r as $k => $v) { if ($k == '_menus_') { $rc[$k] = $v; } else { $rc[$k] = array($v[0], $v[1], $v[2], $v[3], $v[4], $v[5], $v[6], $v[7], $rb[2], $rb[3], $rb[4], $rb[5], $rb[6]); } } } elseif (substr($n, 0, 3) == 'del') { list($n, $rc) = split('-', $n); msql_modif('gallery', $nod, '', '', 'del', $rc); return ''; } else { $rc = array($rb[0], $r['mini'], $r['img'], $r['width'], $r['height'], $r['mini_w'], $r['mini_h'], $rb[1], $rb[2], $rb[3], $rb[4], $rb[5], $rb[6]); } modif_vars('gallery', $nod, $rc, $n); if ($n == 'mdf') { return slider_edit($nod, $nb); } else { return slider_edit($nod, $n); } }
function func_sav($fa, $fb, $va) { if (!auth(6)) { return; } if ($fa) { list($d, $p, $f) = explode('|', $fa); } $fb = $d . '/' . $p . '.php'; $va = substr(ajx($va, 1), 0, -1); if (is_file($fb)) { //echo $fab; $t = read_file($fb); $od = find_end($t, 'function ' . $f . '(', '{', '}'); $t = str_replace($od, $va . '}', $t); //echo txarea('',$od,40,20); $va = str_replace("\r", "\n", $va); $defs = array($d, $p, $f, $va); msql_modif('server', 'program_dev', $defs, $dfb, 'one', time()); echo write_file($fb, $t); } return btn('txtyl', 'saved'); }
$msg = receive_xmsg($_GET['msg']); $dfb['_menus_'] = array('time', 'name', 'msg', 'host'); $arr = array(time(), $_GET['name'], $msg, $_GET['host']); //html_entity_decode save_xmsg('clients', 'chat_' . $_GET['chat'], $arr, $dfb); } if ($_GET['canalchat']) { echo implode(';', array_keys(msq_choose('clients', 'chat', ''))); } if ($m = $_GET['kmail']) { require 'sys.php'; echo sql('mail', 'qdu', 'v', 'name="' . $m . '"'); } if ($_GET['connect']) { $mnu['_menus_'] = array('url'); msql_modif('server', 'philum_share', array($_GET['share']), $mnu, 'mdf', 0); } if ($f = $_GET['fdate']) { if (is_file($f)) { echo filemtime($f); } } if ($f = $_GET['fsize']) { if (is_file($f)) { echo round(filesize($f) / 1024) . ' Ko'; } } if ($f = $_GET['fwidth']) { if (is_file($f)) { list($w, $h) = getimagesize($f); echo $w . '_' . $h;
function slides($p, $id) { $s = strpos($p, '--') ? '--' : "\n"; $r = explode($s, $p); foreach ($r as $v) { if ($v) { $rb[] = array($v); } } $r = msql_modif('', nod('slides_' . $id), $rb, array('val'), 'arr', ''); return plugin('slides', $id); }
function htaccess_mkdefault($var1, $var2, $res) { $rb = ajxr($res); $r = msql_modif('system', 'default_htaccess', $rb, $dfb, 'one', 1); return btn('txtyl', 'saved'); }
function msql_desnam($qb, $desgn, $res) { $jv = 'admin_msql*desnam_' . $qb . '_' . $desgn; if ($res) { $res = ajxg($res); } $ret = desname($qb, $desgn); if ($res == 'init') { return formj('rnt', $jv, '', $ret ? $ret : 'table_name'); } $defb = array('_menus_' => array('name', 'site', 'last-update', 'mods')); $r = dsnam_arr($res); if ($res && $res != 'init') { msql_modif('users', $qb . '_design', $r, $defb, 'one', $desgn); return formj('rnt', $jv, $res, ''); } return formj('rnt', $jv, $ret, ''); }
function submod_move($d) { $r = locapps(); $ra = $r[$d - 1]; $r[$d - 1] = $r[$d]; $r[$d] = $ra; msql_modif('users', ses('qb') . '_apps', $r, '', 'add', 'mdf'); }
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_vdir($sh, $id, $res) { $v = $_SESSION['curdir'][$sh]; if (!$res) { $j = $id . 'fivrd_fifunc___fi*vdir_' . $sh . '_' . $id . '__' . $id . 'fvdr'; $ret = input(1, $id . 'fvdr', $v[1]) . ' ' . lj('popsav', $j, 'ok') . ljb('popbt', 'Close', $id . 'fivrd', 'x'); } elseif (auth(3)) { $res = ajxg($res); $v[1] = $res; $_SESSION['curdir'] = msql_modif('users', $_SESSION['qb'] . '_shared', $v, '', 'one', $sh); distrib_share(); $ret = fi_parent($v[0], $id . 'fivrd', 'saved'); } return $ret; }
if (!$opt) { $ret = edit_microsql($id, $r); } break; case "delmsql": req('admin,msql'); $r = edit_msql_del($id, $va); $ret = edit_microsql($id, $r); break; 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;
function update_msql() { $nm = date('ymd', time()); $nmb = date('ym', time()); //mensuel/quotidien modif_vars('system', 'program_version', array($nm), 1); $exs = msql_read('system', 'program_updates_' . $nmb, ''); $r = array(date('md', time()), 'publication'); $dfb['_menus_'] = array('date', 'text'); if (!$exs) { msql_modif('system', 'program_updates_' . $nmb, $r, $dfb, 'push', ''); } $r = array('updates-table', 'ajax', 'popup', 'msql___system_program_updates*' . $nmb, '', 'menu', 'sys', 'server', '', '7'); //menus //modif_vars('system','default_apps_desk',$r,27); }