function baz_u($d) { list($ob, $op) = split_right(':', $d); list($od, $oq) = split_one('/', $op); //echo $ob.'-'.$od.'-'.$oq.br(); if ($oq) { switch ($od) { case 'bal': return bal($oq, $ob); break; case 'plug': return plugin($oq, $ob); break; } } else { switch ($op) { case 'br': return br(); break; case 'b': return bal($op, $ob); break; case 'u': return bal($op, $ob); break; } } return '(' . $d . ')'; }
function output_pages_from_cache($http, $otp) { $npg = $_SESSION['prmb'][6]; $page = $_SESSION['page']; $min = ($page - 1) * $npg; $max = $page * $npg; if (is_array($otp)) { foreach ($otp as $id => $nb) { if (is_numeric($id)) { $i++; if ($i >= $min && $i < $max) { $mg = $http . '/imgc/' . first_img($nb[3]); if (is_link($mg)) { $ret .= btn('imgl', image($mg, '', 50)); } $ret .= bal('h2', lka($http . '/' . $id, $nb[2])); $ret .= btn('txtx', $nb[1]) . ' '; if (rstr(27)) { $ret .= btn('txtsmall', mkday($nb[0], 1)) . ' ' . pub_link($nb[9]) . ' '; } if (rstr(25)) { $ret .= btn('txtsmall', art_length($nb[8])); } $ret .= br() . br(); } } } } $n_pages = nb_page($i, $npg, $page); return $n_pages . $ret . $n_pages; }
function plug_rssin($u) { req('pop,art,tri,spe'); Head::add('jslink', '/prog/utils.js'); if ($_GET['rssurl']) { foreach ($_GET as $k => $v) { if ($k == "rssurl") { $u = $v; } else { $u .= '&' . $k . '=' . $v; } } } $u = str_replace('http://', '', $u); if ($u) { $alx = alx(); $rss = load_xml('http://' . $u, 1); $ret .= bal('h1', lkt('', 'http://' . $u, preplink($u))); $ret .= lkt("", '/?plug=rssin&rssurl=' . $u, picto('url')); foreach ($rss as $k => $v) { if ($v[1]) { $ret .= pane_base($v[1], $v[0], "", rss_date($v[2]), "", $v[3], $alx); } } } return $ret; }
function uds_btn($r) { $rb = array('vocable', 'name', 'planet', 'unit', 'math'); $ret = $rb[$r[2]] ? ' (' . $rb[$r[2]] . ') ' : ' '; $ret .= lj('', 'popup_search___' . ajx($r[0]), picto('search', 16)) . ' '; if ($r[3]) { $ret .= ' [' . $r[3] . '] '; } $ret .= ud_glyphe($r[0]) . br(); return hr() . bal('b', $r[0]) . $ret . divc('justy', nl2br(stripslashes($r[1]))); }
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 readerurl($a, $b, $f) { $f = ajxg($f); req('tri,pop'); if ($f) { list($suj, $ret, $rec, $defid, $defs) = vacuum($f, ''); } $ret = format_txt_r($ret, '3', ''); $ret = nl2br(embed_p($ret)); return bal('h2', $suj) . $ret; }
function plug_ummdico($p, $o) { //umm_sav(); ses('qu', 'umm_dico'); $ret = bal('h3', 'Recherche sur le dictionnaire des vocables'); $ret .= input(1, 'search', '', '') . ' '; $ret .= checkbox('chk', '1', 'phonétique', 0); $ret .= lj('txtbox', 'ucbk_plug___ummdico_ud*search_1_2_search|chk', 'chercher') . br() . br(); $ret .= divd('ucbk', '') . br(); //callback return $ret; }
function plug_gallery($q) { if ($q == "gl") { $q = ""; } $img_d = sql('img', 'qda', 'v', 'id="' . $_SESSION['read'] . '"'); $img_d = substr($img_d, 0, 1) == '/' ? substr($img_d, 1) : $img_d; $img_d = str_replace("/", ",", $img_d); if ($q == "auto") { $s = ""; } elseif ($q == "manual") { $s = $q; $imgs = str_replace(",", ",\n", $img_d); } elseif ($q == "dir") { $s = $q; $dirs = br() . plugin('dsnav', 'gl', 'users/' . $_SESSION['qb']); } else { $s = $q; } $ret .= bal("b", "source:") . ' '; if (!$q) { //gallerygl if ($img_d) { $ret .= lj('popbt', 'popup_gallery__x_auto', "auto") . ' '; $ret .= lj('popbt', 'popup_gallery__x_manual', "manual") . ' '; } $ret .= lj('popbt', 'popup_gallery__x_dir', "user/directory"); } else { $ret .= lj("popbt", 'popup_gallery', $q == "dir" ? "user_directory" : $q); } if ($imgs) { $ret .= br() . txarea('dpl', $imgs, 40, 10, atd('source') . atc('popw') . ats('border:1px solid black')); } //pb name=src if ($dirs) { $ret .= $dirs; } if ($q != "dir" && $q) { $ret .= br() . bal("b", "type:") . ' '; $ret .= ljb("popbt", "insert_photo", $s . '\',\'', "Thumbnails") . ' '; $ret .= ljb("popbt", "insert_photo", $s . '\',\'2', "Ajax") . ' '; $ret .= ljb("popbt", "insert_photo", $s . '\',\'1', "Flash") . ' '; $ret .= lj("popbt", 'popup_slider_' . ($s == 'manual' ? 'source' : '') . '_3x_' . $s . '_' . $_SESSION['read'], "Slider") . ' '; } return $ret; }
function vmailsend($id, $o, $res) { req('pop,spe,tri,mod'); $http = host(); $htacc = urlread($id); list($from, $to, $txt, $suj) = ajxr($res); if (strpos($to, "@") !== false) { $suj = sql('suj', 'qda', 'v', 'id="' . $id . '"'); $msg = divc("panel justy", $txt); $msg .= lkc("", $http . $htacc, bal("h2", $suj)); $msg .= divc("panel justy", read_msg($id, "nlb")); send_mail("html", $to, $suj, $msg, $from ? $from : hostname(), $htacc); return btn("popbt", nms(34) . ' ' . nms(79) . ' ' . nms(36) . ': ' . $to); } else { return btn("popdel", 'error' . $to); } }
function umnb_j($p, $o = '', $res = '') { list($p, $o) = ajxp($res, $p, $o); //base 12 $n = base_convert($p, 10, 12); //nominations base 6 $r_c = array(0 => 'OU', 1 => 'I', 2 => 'I', 3 => 'I', 4 => 'I', 5 => 'I', 6 => 'O', 7 => 'O', 8 => 'O', 9 => 'O', 'a' => 'O', 'b' => 'O'); //chiffres $r_u = array(0 => 'O', 1 => 'AS', 2 => 'EN', 3 => 'EDOO', 4 => 'ES', 5 => 'EGO', 6 => 'AEE', 7 => 'ANA', 8 => 'ANMA', 9 => 'ADA', 'a' => 'AS', 'b' => 'ADEN'); //décimales $r_d = array(0 => '', 1 => 'D', 2 => 'K', 3 => '?', 4 => '?', 5 => '?'); $r = str_split($n); //p($r); $nb = count($r); //nb de chiffres $ra = array($r_c, $r_u, $r_d); //theory //le zéro de chaque décimale base 12 est préfixé d'un incrément de demi-décimale $r_c: I, O $decimale12 = floor($p / 12); if ($decimale12 == $p / 12) { $indicatif_zero = $r_c[$decimale12]; } //foreach($r as $k=>$v)$ren.=$umnb_pic($r[$i]).' '; for ($i = $nb - 1; $i >= 0; $i--) { $ren .= umnb_pic($r[$i]) . $r[$i] . br(); } if ($nb == 1) { $res = $r_c[$r[0]] . '-' . $r_u[$r[0]]; } if ($nb == 2) { $res = $r_d[$r[0]] . '' . $r_c[$r[1]] . '-' . $indicatif_zero . $r_u[$r[1]]; } $ret = lka('/plug/umnb/' . $p, picto('link')) . ' '; $ret .= lj('', $o . '_plug__2_umnb_umnb*j_' . ($p - 1) . '_' . $o, picto('previous')) . ' '; $ret .= lj('', $o . '_plug__2_umnb_umnb*j_' . ($p + 1) . '_' . $o, picto('next')) . ' '; $ret .= bal('b', $p) . ' (' . bal('b', $n) . ' en base 12, décimale ' . $decimale12 . '): '; $ret .= bal('h3', $res); $ret .= $ren; return $ret; }
function plug_rss($hub, $preview) { if ($hub) { $_GET['hub'] = $hub; } if ($preview == '=' or !$preview) { $preview = 2; } if (!$hub) { return slct_menus(ses('mn'), '/plug/rss/', '', '', '', 'kv'); } require_once '../prog/lib.php'; req('pop,art'); require '../plug/sys.php'; require '../plug/lib.php'; $fnod = $_SESSION["qb"] . '_cache'; $main = msql_read_b('users', $fnod, '', 1); $nb_arts = count($main); $lastid = lastid('qda'); $last_art = $main[$lastid]; $newest = key($main); $oldest = array_pop($main); $nb_days = round((time() - $oldest[0]) / 86400); $cache = 1; $f = '../plug/_data/' . $_SESSION["qb"] . '_' . $newest . '_' . $preview . '.xml'; if (is_file($f) && !$_GET['rebuild'] && $cache) { return read_file($f); } else { $http = host(); if ($preview) { req('tri,pop,art'); } //spe,mod $xml .= '<' . '?xml version="1.0" encoding="iso-8859-1"?' . '>' . "\n"; $xml .= '<rss version="2.0">' . "\n"; $xml .= '<channel>' . "\n"; $xml .= bal('title', $_SESSION['qb']) . "\n"; $xml .= bal('link', $http) . "\n"; $xml .= bal('description', $nb_arts . ' articles / ' . $nb_days . ' days - preview=' . $preview . ' - static url=' . $http . substr($f, 2)) . "\n"; $xml .= bal('language', 'fr') . "\n"; $xml .= bal('lastBuildDate', date("r", $last_art[0])) . "\n"; if ($main) { $xml .= flux_xml($main, $preview) . "\n"; } $xml .= '</channel>' . "\n"; $xml .= '</rss>' . "\n"; write_file($f, $xml); rss_del_old($newest); } //eye eye('rss'); return $xml; }
function conn_icon($v, $rp) { $r = array('k' => 'strike', 'l' => 'small'); if ($r[$v]) { return bal($r[$v], $v); } if ($v == 's') { return btn('stabilo', $v); } if ($v == 'r') { return btn('txtclr', $v); } return $rp[$v] ? picto($rp[$v], '16') : $v; }
function plug_codeview($dr, $f, $fc = '') { if ($dr == 'param') { $dr = $f = ''; } require_once 'params/_connectx.php'; if (!$f && $fc) { $f = sql_b('select page from _sys where name="' . $fc . '"', 'v'); } if (strpos($f, '.') === false && $f) { $f .= '.php'; } if ($fc == 'all') { $fc = ''; } $ret .= lj('', 'codeview_plugin___codeview_' . $dr . '_' . $f . '_' . ajx($fc), picto('reload')) . ' '; if ($dr == 'save') { $_GET['sav'] = 1; $dr = $_SESSION['dr']; $dr == 'plug' ? savefunc_plug() : savefunc(); } else { $_GET['sav'] = 0; } //if($dr=='all')$dr=''; $dr = $dr ? $dr : 'progb'; $_SESSION['dr'] = $dr; $_SESSION['file'] = $f; $_SESSION['func'] = $fc; if ($dr != 'params') { list($rep, $res) = functions_list($dr, $f); } if (auth(6)) { $ret .= btn('nbp', cv_btn('progb', $dr) . cv_btn('plug', $dr) . (auth(5) ? cv_btn('save', $dr) : '')) . ' '; } //cv_btn('all',$dr). $nbfunc = count($_SESSION['rec']); if (!$nbfunc) { $nbfunc = rse('COUNT(id)', '_sys'); } $ret .= bal('small', $nbfunc . ' functions') . ' '; $jp = ajx(substrpos($f, '.')); //list if ($rep) { ksort($rep); array_unshift($rep, '...'); } else { $rep[] = '...'; } $ret .= slct_sj($rep, $f, 'codeview_plugin__15_codeview_' . ajx($dr) . '_'); //page if ($f && auth(6)) { $ret .= lj('', 'popup_plupin___codev_' . $dr . '_' . $jp, picto('editxt')) . ' '; if ($dr == 'plug') { $ret .= lj('', 'popup_plupin___' . $jp, picto('window')) . ' '; } } //list $rec = array_values($_SESSION['rec']); array_unshift($rec, 'all'); //if($rec)ksort($rec); if ($f) { $ret .= slct_sj($rec, $fc, 'codeview_plugin__15_codeview_' . ajx($dr) . '_' . ajx($f) . '_'); } //func if ($fc && auth(6)) { $ret .= lj('', 'popup_plupin___codev_' . $dr . '_' . $jp . '_' . ajx($fc), picto('editxt')) . ' '; if ($dr == 'plug') { $ret .= lj('', 'popup_plup___' . $jp . '_' . ajx($fc), picto('window')) . ' '; } } //search $ret .= input1('funcsrch', $fc, 8) . ' ' . lj('popbt', 'popup_plup___codeview_findfunc___funcsrch', 'find') . ' ' . lj('popbt', 'popup_plup___coremap_coremap___funcsrch', 'map'); if ($dr != 'save_all') { return divd('codeview', $rea . $ret . $res); } }
function fav_art($id, $rtg = '') { $im = minimg(sql('img', 'qda', 'v', 'id=' . $id), 'h'); $day = sql('day', 'qda', 'v', 'id=' . $id); $dat = mkday($day) . ' '; if ($rtg) { $tag = fav_tag_maker($rtg) . ' '; } //$del=plugin('like',$id,1).' '; $suj = bal('h4', suj_of_id($id) . ' '); if ($id) { return divc('txtcadr', $im . $dat . $tag . $del . lj('', 'popup_popart__3_' . $id . '_3', $suj)); } }
function current_step($mn) { $step = $_SESSION['step']; $menu = bal("p", $step . '. ' . $mn[$step]); $connect = test_connection(); $c = "okay"; switch ($mn[$step]) { case "directories": $l = list_of_dirs(); foreach ($l as $k => $v) { if (!is_dir($v)) { $no = "ok"; } } if ($no) { $ret = instlink('make_dirs', '='); } else { $ret = $c; } break; //instlink('make_dirs','remove'); //instlink('make_dirs','remove'); case "phpini": $ret = 'php version: ' . $_SESSION['phpv'] . br(); if ($_SESSION['phpv'] >= 5.3) { if (!is_file('.user.ini')) { w_ini(); $ret .= 'php>5.3 : phpini a été installé, pour voir les erreurs'; } else { $ret = $c; } } else { $ret .= 'php<5.3 : phpini n\'a pas besoin d\'être installé'; } break; case "connexion": if ($connect == 'pas de connexion') { $ret = instlink('connexion', '='); } else { $ret = $c; } break; case "databases": if ($connect != "pas de connexion") { if (!mysql_num_rows(mysql_query('SHOW TABLES'))) { $ret = instlink('install_databases', '='); } else { $ret = $c; } } w_master_p(); break; case "program": $nbp = count($_SESSION['progam']); $_SESSION['progam'] = ''; if (count(dl_dirs()) == $nbp) { $ret = $c; } else { $ret = dl_prog(); } break; case "htaccess": if (!is_file('.htaccess')) { $ret = instlink('htacc', '='); } else { $ret = $c; } break; case "usefull": $ret = instlink('usefull', '='); break; case "philum": $ret = instlink('philum', '='); break; case "fin": $ret = 'Si ' . lien('/', 'tout va bien') . ', ' . lien('?fin==', 'auto-supprimer') . ' ce fichier'; break; } return $menu . $ret; }
function find_navigation($id) { $ib = ib_of_id($id); if (is_numeric($ib) && $ib != $id) { list($idb, $suj) = ser("id,suj", $_SESSION['qda'] . ' WHERE id="' . $ib . '"'); if ($suj) { $nav = bal('h4', lka(urlread($idb), pictxt('paste', $suj)) . ' ' . popart($idb)); } if ($idb != ses('read')) { return find_navigation($idb) . $nav; } } }
public static function generate() { return header_html() . bal('head', self::get()); }
# # # # # # # # # # # get settings require "../settings.php"; require "../core-settings.php"; # decide what to do if (isset($_GET["id"])) { $OUTPUT = bal($_GET["id"]); } else { # Display error $OUTPUT = "<li> Error : Invalid Trial Balance Number."; } require "../template.php"; function bal($id) { # validate input require_lib("validate"); $v = new validate(); $v->isOk($id, "num", 1, 20, "Invalid Trial Balance number."); # display errors, if any if ($v->isError()) { $theseErrors = ""; $errors = $v->getErrors();
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 make_ban($here, $t) { $qb = ses('qb'); $htacc = subdom($qb); $banim = 'img/ban_' . $qb . '.jpg'; if (file_exists($banim)) { return lkc("", $htacc, img($banim)); } else { return bal('h1', lka($htacc, $t ? $t : $_SESSION['mn'][$qb])); } }
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 batch_preview($f, $sug = '') { req('pop,spe,tri'); $f = http($f); $_GET['urlsrc'] = $f; $w = prma('content'); list($suj, $msg) = vacuum($f); $msg = embed_links($msg); $msg = clean_br_lite($msg); $msg = clean_punct($msg); $msg = format_txt($msg, '', 'test'); $sty = atc('justy') . ats('width:' . $w . 'px;'); if (strlen($msg) > 400) { $sty .= atd('scroll'); } $titl = bal('h2', $suj); $_SESSION['sugm'] = $sug; $rid = randid('btch'); $rel = lj('', 'popup_call__x_ajxf_batch*preview_' . ajx($f) . '_', pictit('reload', nms(101))) . ' '; $rel .= lj('', 'popup_addArt__x_' . ajx($f) . '_1', picto('edit')) . ' '; if (auth(6)) { $titl .= $rel . urledt($f) . ' '; } $titl .= lkt('', $f, picto('url')); if (auth(6)) { $titl .= newartcat($f); } $ret .= bal('section', bal('header', $titl) . balb('article', $sty, $msg)); //$_SESSION['vacuum'][$f]=''; return popup(preplink($f), $ret, $w); }
function find_navigation($id) { $ib = ib_of_id($id); if (is_numeric($ib) && $ib != $id && $ib) { //$nav=pane_art($ib,''); $nav = bal('h4', lka(urlread($ib), pictxt('topo', suj_of_id($ib))) . ' ' . popart($ib)); if ($ib != ses('read')) { return find_navigation($ib) . $nav; } } }
{ } function foo($x, $y) { return $x == $y; } $x = new X(); foo($x, $x); $x = new X(); $y = new stdClass(); function baz($r, $s) { switch ($r) { case $s: echo 'arg '; break; default: echo 'def '; } } baz($x, $y); function bal($r, $s) { if ($r == $s) { echo 'arg '; } else { echo 'def '; } } bal($x, $y); printf("\n");
function mk_table($d) { list($doc, $opt) = good_param($d); if ($opt == 'div') { return mk_dtable($doc); } if ($opt && !is_numeric($opt)) { $doc = str_replace(array($opt == 'auto' ? ' ' : $opt, "\n"), array('|', '¬'), $doc); } $doc = str_replace(array('|¬', "¬\n"), '¬', $doc); if (substr(trim($doc), -1) == "¬") { $doc = substr(trim($doc), 0, -1); } $taba = 'tr'; $tabb = 'td'; $tabc = "table"; $tr = explode('¬', $doc); if (!$opt) { $csb = ''; } foreach ($tr as $k => $tra) { $td = explode('|', $tra); $ia++; $trb = ''; if ($opt) { $csa = ''; if ($opt > 1) { if ($ia / 2 == round($ia / 2)) { $csa = 'txtblc'; } else { $csa = 'txtx'; } } if ($ia == 1) { $csa = 'txtcadr'; } } foreach ($td as $kb => $tda) { $re .= balc($tabb, $csa, $tda); $trb .= trim($tda); } if (str_replace(':', '', $trb)) { $ret .= bal($taba, $re); } $re = ''; } return balc($tabc, $csb, $ret); }
function pagup($t, $d, $p = '') { $popa = div(atd('popa') . atc('popa') . ats('margin:auto; display:inline-block;'), ljb('', 'Close', 'popup', picto('close')) . $p . bal('small', $t)); return div(ats(''), $popa . div(atd('popu') . atc('') . ats('margin:auto;'), $d)); }
function sconn_defs_r($d, $xf) { list($pdb, $xfb) = split_one(':', $d, 1); if ($xfb) { $d = sconn_defs_r($pdb, $xfb); } //join switch ($xf) { case "b": return bal('b', $d); break; case "i": return bal('i', $d); break; case "u": return bal('u', $d); break; case "h": return bal('h3', $d); break; case "h1": return bal('h1', $d); break; case "h2": return bal('h2', $d); break; case "h4": return bal('h4', $d); break; case "k": return bal('strike', $d); break; case "l": return bal('small', $d); break; case "e": return bal('sup', $d); break; case "q": return bal('blockquote', $d, ''); break; case 'c': return btn("txtclr", $d); break; case 's': return btn("stabilo", $d); break; case 'r': return pub_clr($d . '§dd0000'); break; case "list": return make_li_b($d); break; case "color": return pub_clr($d); break; case 'css': return pub_css($d); break; case 'font': return pub_font($d); break; case 'size': return pub_size($d); break; case 'color': return pub_clr($d); break; case 'html': return pub_html($d); break; case 'web': return weblink($d); break; default: return $d . ($xf ? ':' . $xf : ''); break; } }
function siteclics($src) { $id = ses('read'); if ($id) { $src = $_SESSION['rqt'][$id][9]; } $r = sql('lu', 'qda', 'rv', 'mail LIKE "%' . $src . '%"'); foreach ($r as $k => $v) { $n += $v; } return bal('h3', $src) . divc('', $n . ' vues'); }
function canvas($d, $w, $h) { return balb('canvas', atd('myCanvas') . atb('width', $w) . atb('height', $h) . atc(''), 'error') . bal('script', 'var c=document.getElementById("myCanvas"); var ctx=c.getContext("2d"); ctx.font="12px Arial"; ' . $d); }
function api_titles($ra) { if (!$ra['nbarts']) { $ra['nbarts'] = api_query_nb($ra); } $t = $ra['link']; if (rstr(3) && !$ra['minday'] && !$ra['nodig']) { $ra['minday'] = ses('nbj'); } $com = implode_k($ra, ',', ':'); $ret = hidden('', 'hid' . $ra['rid'], $com); if ($nb = $_GET['nboc']) { $nboc = ' ' . btn('small', nbof($nb, 19)); } if ($t && $ra[$t]) { if ($ra['minday'] > 1) { $pg = '/' . $ra['minday']; } if ($ra['page'] > 1) { $pg .= '/page/' . $ra['page']; } $lk = eradic_acc($t) . '/' . $ra[$t] . $pg; $ret .= bal('h3', lka($lk, $ra[$t] . $nboc)); } elseif ($ra['t']) { $ret .= divd('titles', bal('h3', $ra['t'] . $nboc)); } $ret .= lj('popbt', 'popup_apicom_hid' . $ra['rid'], nbof($ra['nbarts'], 1)) . ' '; if (rstr(3) && !$ra['nodig']) { $ret .= api_dig($ra) . br(); } if (!$ra['nopages']) { $ret .= api_pages($ra); } return bal('header', $ret); }