function sliderJ_thumbs($r, $f, $a) { $w = currentwidth(); if ($r) { unset($r['_menus_']); } if ($r) { $rb = array_keys_r($r, 5); } if ($rb) { $wt = array_sum($rb); } $limit = 0 - ($wt - $w + 22); if ($r) { foreach ($r as $k => $v) { $i++; $imn = 'gallery/mini/' . $v[1]; if (is_file($imn)) { $im = image($imn, $v[5], $v[6]); $gdp = 0 - $wa + ($w / 2 - $v[5] / 2); if ($gdp < $limit) { $gdp = $limit; } if ($gdp > 0) { $gdp = 0; } $ret .= ljb('', 'sliderjnav_' . $a, $gdp . '\',\'' . $k, $im); $wa += $v[5]; } } } $ret = div(' id="sdjv' . $a . '" style="margin-left:0px;"', $ret); $ret = div(' style="overflow:hidden; width:' . $w . 'px; height:75px;"', $ret); return $ret; }
function plug_cubes($d) { req('pop'); $w = currentwidth(); $r = $_SESSION['rqt']; $cols = 4; $c = $cols * 3; $n = count($r); $nl = ceil($n / $c); $l = $w / $c; $cats = array_keys_r($r, 1, 'k'); $clr = cub_clr($cats); foreach ($r as $k => $v) { if ($v[11] > 1 && $v[3]) { $lx = $l * ($v[11] - 1); //$pub=minimg($v[3],"h").lka(htac($k),$v[2]); //$pub=make_thumb_d($v[3],round($lx).'/'.round($lx));// $pub = image('/imgc/' . $v[3], round($lx), round($lx)); $pub = lka(htac($k) . '" title="' . $v[2], $pub); $ret .= divs(cub_sz($lx, $clr[$v[1]]), $pub); } } //for($ic=0;$ic<$c;$ic++){} //for($ib=0;$ib<$nl;$ib++){$i++;} return $ret; }
function detect_core() { $dr = 'progb/'; $rec = recup_func($dr, 'lib'); //p($rec); $r = msql_read('system', 'program_core', '', '1'); $rk = array_keys_r($r, 0, 'k'); //p($r); foreach ($rec as $k => $v) { $rc = $r[$rk[$k]]; $v = str_replace('$', '', $v); $rc[2] = str_replace('$', '', $rc[2]); if ($k) { $rb[] = array($k, $v[0], $rc[2], $rc[3], $v[1]); } //$rc[4]?$rc[4]: if (!$rk[$k]) { $na++; } } foreach ($rk as $k => $v) { if (!$rec[$k]) { $nb++; } } //p($rb); $rb = msq_reorder($rb); //p($rb); //req('msql'); //$rb=sort_table($rb,0); $rh = array('function', 'variables', 'usage', 'return', 'context'); msql_save('system', 'program_core', $rb, $rh); //,'input','output' return 'program_core: added: ' . ($na ? $na - 1 : 0) . ' deleted: ' . ($nb ? $nb : 0) . br(); }
function exc_lib() { $rf = msql_read('system', 'program_core', '', 1); $ref = array_keys_r($rf, 0); asort($ref); foreach ($ref as $k => $v) { $ret .= lj('', 'popup_plup___exec_readfunc_' . $k, $v) . br(); } return divs('width:180px; overflow:auto; height:240px;', $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 msqt_read($nod, $p) { $r = read_vars('msql/users/', $nod, ''); if (isset($r['_menus_'])) { $mnu = $r['_menus_']; unset($r['_menus_']); } if (substr($p, 0, 1) == 'x') { $p = substr($p, 1); } else { $o = 'x'; } $rb = array_keys_r($r, $p); if ($o) { arsort($rb); } else { asort($rb); } $r = conform_order($r, $rb); foreach ($mnu as $k => $v) { $pb = ajx($o . $v, 0); $tts[] = lj('', 'msqt_plug___msqtemplate_msqt*read_' . ajx($nod, 0) . '_' . $o . $k, $v); } foreach ($r as $k => $v) { if ($v) { foreach ($v as $ka => $va) { if ($mnu[$ka] == 'date') { $va = date('d/m/Y', $va); } $r[$k][$ka] = $va; } } } array_unshift($r, $tts); return make_table($r, 'txtred', 'txtx'); }
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 array_merge_px($r, $rb) { if ($r) { $ka = array_keys_r($r, 0, 'k'); } if ($rb) { foreach ($rb as $k => $v) { if (!$r[$ka[$v[0]]]) { $r[] = $v; } } } return $r; }
function inject_fonts() { $dr = 'fonts/'; $ra = msql_read('server', 'edition_typos', ''); $vra = array_keys_r($ra, 0); $rb = msql_read('system', 'edition_typos', ''); $vrb = array_keys_r($rb, 0); $rc = explore($dr, 'files', 1); $vrf[] = 1; if ($rc) { foreach ($rc as $k => $v) { list($nm, $xt) = split_right('.', $v, 1, 1); //add if ($xt == 'woff' or $xt == 'eot' or $xt == 'svg') { // or $xt=='ttf' if (!in_array($nm, $vra) && !in_array($nm, $vrb) && !in_array($nm, $vrf)) { $rb[] = array($nm, 'user', '', '', ''); $vrf[] = $nm; $add[] = $nm; } elseif (!in_array($nm, $vra) && in_array($nm, $vrb)) { $kb = in_array_b($nm, $vrb); $rb[] = $ra[$kb]; $vrf[] = $nm; $add[] = $nm; } } } } foreach ($rb as $k => $v) { if ($k != '_menus_') { //del if (!is_file($dr . $v[0] . '.woff') && !is_file($dr . $v[0] . '.eot') && !is_file($dr . $v[0] . '.svg')) { unset($rb[$k]); $del[] = $v[0]; } } } if (!is_dir('msql/server')) { mkdir('msql/server'); } //sav save_vars('msql/server/', 'edition_typos', $rb); save_vars('msql/system/', 'edition_typos', $rb); $ret .= 'table server/edition_typos updated' . br() . br(); $ret .= count($add) . ' elements added: ' . br() . ($add ? implode(br(), $add) . br() : '') . br(); $ret .= count($del) . ' elements deleted:' . br() . ($del ? implode(br(), $del) . br() : '') . br(); return $ret; }
function spp_table($rid) { $dfb['_menus_'] = array('projet', 'poll'); $r = msql_read('', $_SESSION['sppnod'], '', 1); //p($r); if ($r) { $ra = array_keys_r($r, 1); arsort($ra); foreach ($ra as $k => $v) { $bt = ljb('txtbox', 'SaveJb', 'ob' . $k . '_plug___superpoll_spp*poll_' . $k . '_0\',\'' . $rid . '_plug___superpoll_spp*table', '-') . ' '; $bt .= btn('txtred" id="ob' . $k, $r[$k][1] ? $r[$k][1] : 0); $bt .= ljb('txtbox', 'SaveJb', 'ob' . $k . '_plug___superpoll_spp*poll_' . $k . '_1\',\'' . $rid . '_plug___superpoll_spp*table', '+') . ' '; if (auth(4)) { $bt .= ljb('txtbox', 'SaveJb', 'res_plug___superpoll_spp*del_' . $k . '\',\'' . $rid . '_plug___superpoll_spp*table', 'x') . ' '; } $ret .= divc('txtcadr', divc('imgr', $bt) . $r[$k][0]); } } return $ret; }
function mbd_css($cnn) { //pub_css $r = msql_read('design', $_SESSION['qb'] . '_design_' . $_SESSION['prmd'], ''); if ($r) { $r = array_keys_r($r, 1, 'k'); } if ($r) { foreach ($r as $k => $v) { if (strpos($k, ':') === false && strpos($k, '.') === false && trim($k)) { $ret .= ljb('', 'jumpvalue', 'cnn_' . $k, $k) . ' '; } } } return divc('nbp', $ret) . br() . assistant('cnn', 'embed_css', $cnn, '', ''); }
function rand_clr() { $r = colors(); $rb = array_keys_r($r, 0); sort($rb); $n = rand(0, count($rb)); return $rb[$n]; }