function patch_tags() { $table["_meta"] = ' CREATE TABLE IF NOT EXISTS `' . ses('qd') . '_meta` ( `id` int(7) NOT NULL AUTO_INCREMENT, `cat` varchar(255) collate latin1_general_ci NOT NULL, `tag` varchar(255) collate latin1_general_ci NOT NULL, PRIMARY KEY (`id`) ) ENGINE=MyISAM DEFAULT CHARSET=latin1 COLLATE=latin1_general_ci;'; /* $table["_meta-id"]=' ALTER TABLE `'.ses('qd').'_meta` ADD PRIMARY KEY (`id`);';*/ $table["_meta_art"] = ' CREATE TABLE IF NOT EXISTS `' . ses('qd') . '_meta_art` ( `id` int(11) NOT NULL AUTO_INCREMENT, `idart` int(7) NOT NULL, `idtag` int(11) NOT NULL, PRIMARY KEY (`id`) ) ENGINE=MyISAM DEFAULT CHARSET=latin1 COLLATE=latin1_general_ci;'; /* $table["_meta_art-id"]=' ALTER TABLE `'.ses('qd').'_meta_art` ADD PRIMARY KEY (`id`);';*/ foreach ($table as $k => $sql) { $req = mysql_query($sql) or die(mysql_error()); $ret .= divc('', ses('qd') . '' . $k . ': created'); } $ret .= lka('/plug/tagpatch/', 'Apply patch to fill the new databases (click on each links)'); 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 ummoay_build($p, $o) { req('art,tri,pop,spe'); reqp('msqarts'); $tmp = ummoay_template(); $r = req_arts_y($p); $rtg = list_tags(); if ($r) { foreach ($r as $k => $v) { list($id, $day, $msg, $cat, $tag, $lk) = $v; $day = clean_day_tw($day); $msg = format_txt($msg, '', ''); $lnk = lka(urlread($id)); $pop = lj('', 'popup_trckpop___' . $id, picto('forum', 16)); $rb[$day] = array('suj' => $cat, 'day' => mkday($day, 'Y/m/d'), 'msg' => $msg, 'url' => $lk, 'open' => popart($id, 'articles') . ' ' . $pop, 'tag' => $rc = $rtg[$id]); } } krsort($rb); foreach ($rb as $k => $v) { $rd[nms(100)] .= template_build($tmp, $v); $rc = $v['tag']; if ($rc) { foreach ($rc as $kb => $vb) { $rd[$kb] .= template_build($tmp, $v); } } } return make_tabs($rd); }
function twit_embed_url($d) { $d = str_replace("\n", ' && ', $d); $r = explode(' ', $d); foreach ($r as $v) { if (strncmp($v, 'http', 4) === 0) { $ret .= lka($v, $v) . ' '; } elseif (strncmp($v, '@', 1) === 0) { $ret .= lka('https://twitter.com/' . strrchr_b($v, '@'), $v) . ' '; } else { $ret .= $v . ' '; } } return str_replace(' && ', br(), $ret); }
function channel($p, $t, $d = '') { $ra = explode(' ', $p); foreach ($ra as $ka => $va) { list($kab, $vab) = split(':', $va); $sc[$vab] = $kab; } if ($sc['site']) { require_once 'plug/microxml.php'; $site = 'http://' . $sc['site']; $t = lka($site, $sc['site'] . '/' . $sc['hub']); $load = clkt($sc['site'] . '/msql/users/' . $sc['hub'] . '_cache'); } else { $load = msql_read('users', $sc['hub'] . '_cache', '', 1); } if ($load) { if ($sc['cat']) { $load = channel_tri($load, $sc['cat'], 1); } if ($sc['parent']) { $load = channel_tri($load, $sc['art'], 10); } if ($sc['art']) { $load = channel_tri($load, $sc['art'], ''); } if ($sc['tag']) { $load = channel_tri($load, $sc['tag'], 5); } if ($sc['last']) { $load = splice($load, $sc['last']); } $t = build_titl($load, !$t ? $sc['hub'] : $t, 1, $sc['hub']); if ($d == 'articles') { if ($site) { $ret .= output_pages_from_cache($site, $load); } else { $ret .= output_pages($load, 2, ''); } } elseif ($load) { foreach ($load as $k => $v) { $re[] = llk('', $site . '/' . $k, html_entity_decode($v[2])); } $ret = implode('', $re); $ret = balc('ul', 'panel pubart', $ret); } } return $t . $ret; }
function sugg_recall() { $nod = nod('suggest'); $r = msql_read('', $nod, ''); $js = 'popup_call__3_ajxf_batch*preview_'; if ($r) { foreach ($r as $k => $v) { $j = ajx($v[2]); $lnk = lka($v[2], picto('url')); if (!$v[1]) { $ret .= br() . lj('popbt', $js . $j . '_' . $k, $v[0] . ' ' . preplink($v[2])) . ' ' . $lnk; } } } return $ret; }
function addf_inject() { calltar(); $ra = msql_read('server', 'edition_typos', ''); if ($ra) { $vra = array_keys_r($ra, 0, 'k'); } $r = msql_read('', 'public_addfonts', ''); if ($r) { $vr = array_shift($r); } $dir = 'fonts/'; $diru = 'users/' . $_SESSION['qb'] . '/fonts/'; if (!is_dir($diru)) { mkdir($diru); } if ($r) { foreach ($r as $k => $v) { $font = normalize($v[0]); if (!$vra[$font]) { $rb = array($font, '', '', '', ''); for ($i = 1; $i < count($v); $i++) { $f = $font . '.' . $vr[$i]; $rc[] = $dir . $f; $ret .= addf_copy($v[$i], $dir . $f) . br(); } //u //msql_modif('server','edition_typos',$rb,$dfb,'push',''); //modif_vars('','public_addfonts',$k,'del'); if ($rc) { PclTarCreate($diru . $font . '.tar.gz', $rc, '', '', ''); } $ret .= btn('txtblc', lka($diru . $font . '.tar.gz')) . ' ' . btn('txtx', 'saved') . br(); } else { $ret .= $font . ' already_exists' . br(); } } } //if($rb)msql_modif('server','edition_typos',$rb,$dfb,'add',''); $ret .= lkc('txtbox', '/?admin=fonts&inject==', 'inject datas (admin/fonts)') . br(); return $ret; }
function msqmerge($r, $d) { $d = strrchr_b($d, '_'); if ($r) { foreach ($r as $k => $v) { $dy = substr($v[1], 0, 6); $msg = $v[2]; $msg = delconn($msg); $msg = msqm_msg($msg); //echo 'eee'; //$msg=miniconn($msg); //$msg=embed_links($msg); //$msg=format_txt($msg,'',''); $msg = correct_txt($msg, '', 'sconn'); $msg = nl2br($msg); $ret[$v[0]] = array($d, lka($v[0], $dy), $msg, lka($v[3], picto('tw'))); } } return $ret; }
function icocss_build($p, $o) { $f = 'css/_pictos.css'; $r = msql_read('system', 'edition_pictos', '', 1); //$ret='@font-face {font-family: "philum"; src: url("/fonts/philum.eot?iefix") format("eot"), url("/fonts/philum.woff?v8.908") format("woff"), url("/fonts/philum.svg#philum") format("svg"), url("/fonts/philum.ttf") format("truetype");}'; //$ret='.philum{font-family:"philum"; height:20px; font-size:16px; display:inline-block; text-align:center;}'."\n"; foreach ($r as $k => $v) { //if($k=='add' or $k=='msql')echo $k.'-'.$v.'-'.ord($v).'-'.dechex(ord($v)).br(); if ($k == 'msql') { $v = '$'; } if ($k == 'less') { $v = "'"; } if ($k == 'triangle') { $v = 'å'; } if ($k == 'round') { $v = 'ã'; } if ($k == 'quote') { $v = '"'; } if ($k == 'tree') { $v = 'â'; } if ($k == 'refresh') { $v = '0'; } if ($k == 'agenda') { $v = '\\'; } if ($k == 'builders') { $v = ','; } $v = '\\' . str_pad(dechex(ord($v)), 4, 0, STR_PAD_LEFT); $ret .= '.ic-' . $k . ':before{content:"' . $v . '";}' . "\n"; } write_file($f, $ret); return lka($f); }
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 upload_j() { //p($_FILES); if (isset($_FILES['myfile']) && $_SESSION['uproot']) { $tmp = $_FILES['myfile']['tmp_name']; $t = $_FILES['myfile']['type']; $s = fsize_b($_FILES['myfile']['size']); $n = $_FILES['myfile']['name']; $n = strtolower($n); $f = $_SESSION['uproot'] . '/' . $n; //if(is_uploaded_file($tmp))echo $tmp; if (is_file($tmp)) { echo $f; } //if(is_file($tmp))$d=read_file($tmp); if($d)write_file($f,$d); if (move_uploaded_file($tmp, $f)) { return lka($f) . ' type: ' . $t . ' ' . $s . br(); } else { return 'error'; } } else { return 'nothing'; } }
function rech_internal($rech) { $load = search_engine($rech); $t = btn('', lka(htac('search') . $rech, $rech)); if ($load) { return $t . m_pubart($load, "cols", 3); } }
function draw_table($r, $murl, $adm = '') { //adm=saving list($dr, $nd, $n) = murl_vars($murl); foreach ($r as $k => $v) { $ra = ''; $i++; if (is_array($v)) { foreach ($v as $ka => $va) { $ra[] = msq_data(cutat($va), 1); } } $css = $k == $_GET['def'] ? 'txtyl' : 'txtbox'; $jurl = ajx($murl) . '_' . ajx($k); $edit = lka(sesm('url') . $murl . ':' . $k . gpage(), picto('editor')); //ajx if ($k == '_menus_' && $ra) { foreach ($ra as $ka => $va) { $ra[$ka] = lka(sesm('url') . $murl . '&sort=' . $ka, $ka . ':' . $va); } array_unshift($ra, lka(sesm('url') . $murl . '&sort=k', 'keys')); if (auth(4)) { array_unshift($ra, ''); } } elseif (is_array($ra)) { foreach ($ra as $ka => $va) { $ra[$ka] = medit_shot_bt($va, $k, $ka, $dr, ajx($nd)); } if (auth(4)) { array_unshift($ra, lj($css, 'popup_editmsql___' . $jurl, $k)); } if (auth(4)) { array_unshift($ra, $edit); } else { array_unshift($ra, $k); } } $datas[$k] = $ra; } return make_table_bypage($datas, 'popw', ''); }
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'); }
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 weblink($u) { $r = readmeta($u); $p['url'] = $u; $p['suj'] = $r[0]; $p['msg'] = $r[1]; $p['img1'] = $r[2]; if ($r[0]) { return template($p, 'weblink'); } return lka($u); }
function video_url($d, $p, $t = '') { if ($p == 'vimeo') { $u = 'vimeo.com/' . $d; } elseif ($p == 'youtube') { $u = 'youtube.com/watch?v=' . $d; } elseif ($p == 'daily') { $u = 'dailymotion.com/video/' . $d; } if ($u) { return lka('http://' . $u, picto('url')); } }
function same_suj($suj) { $r = sql('id', 'qda', 'k', 'suj="' . $suj . '" AND nod="' . $_SESSION['qb'] . '" ORDER BY id DESC'); foreach ($r as $k => $v) { if ($k != $_SESSION['read']) { $ret .= lka('/?read=' . $k, $k) . ' '; } } if ($ret) { return btn('txtsmall', 'with_same_title: ' . $ret); } }
function maj_fonts() { $dr = 'fonts/'; $updt = $_GET["update"]; calltar(); $go = '/?admin=update&update==&upload='; //&dest=fonts $r = msql_read('system', 'edition_typos', '', 1); $favs = lka('/?admin=update&update=1&upload=' . $v[0], 'favs'); $arr[] = array('dir', 'fonts (woff, eot, svg)', 'category', 'accents', $favs, 'update'); foreach ($r as $k => $v) { if (!is_file($dr . $v[0] . '.woff')) { if ($_GET["upload"] == $v[0] or $updt == "all" or $updt == $v[3]) { PclTarExtract(maj_server() . '/_public/fonts/' . $v[0] . '.tar.gz', '/', '', ''); } $dl = lkc('txtbox', $go . $v[0], 'download'); } else { $dl = 'ok'; } $arr[] = array($dr, $v[0], $v[1], $v[2], $v[3], $dl); } return make_table($arr, 'txtred', 'txtx') . br(); }
function saveart_url($k) { $cat = $_SESSION['vaccat'][$k]; $base = $_SESSION['qda']; $qdm = $_SESSION['qdm']; $qb = $name = $_SESSION['qb']; $pdt = $_SESSION['dayx']; $frm = $cat ? $cat : 'public'; $re = rstr(11) ? 1 : 0; $_GET['urlsrc'] = $k; list($suj, $msg) = vacuum($k, ''); $msg = embed_links($msg); $msg = clean_br_lite($msg); $msg = clean_punct($msg); $s = strlen($msg); $lnk = mysql_real_escape_string(stripslashes($k)); $frm = mysql_real_escape_string(stripslashes($frm)); $suj = mysql_real_escape_string(stripslashes($suj)); $msg = mysql_real_escape_string(stripslashes($msg)); $nid = msquery("INSERT INTO {$base} VALUES ('','/','{$name}','{$lnk}','{$pdt}','{$qb}','{$frm}','{$suj}','{$re}','{$lu}','{$img}','{$kywk}','')"); $nid = msquery("INSERT INTO {$qdm} VALUES ('{$nid}','{$msg}')"); $msg = correct_txt($msg, $nid, 'savimg'); $_SESSION['rqt'][$nid] = array($pdt, stripslashes($frm), stripslashes($suj), '', $qb, '', '', '', $s, $lnk, $ib, $re); $_SESSION['daya'] = $_SESSION['dayx']; return divc('txtx', lka(htac('read') . $nid, $suj)); }
function plug_publish_site() { $r = dirs(); //p($r); if ($_SESSION['auth'] < 6) { return 'no'; } if (!is_dir('_public')) { mkdir('_public'); } echo divc('panel', 'this will backup program files in public directory to let users upgrade Philum from this server - ' . lka('/plug/_zip_prog.php?createzip=', 'tar.gz')); echo update_msql(); echo plugin('coreflush') . br(); echo plugin('philumsize') . br(); foreach ($r as $k => $v) { $xt = substr($v, -3); if ($xt == 'php' or $xt == 'css' or $xt == 'txt' or $xt == '.js' or strpos($v, 'philum')) { //$pos=strrpos($v,'/'); $j=substr($v,0,$pos); $va=substr($v,$pos+1); list($j, $va) = split_one('/', $v, 1); funcb($j, $k, $va, ''); funcc('_public/' . $j, $k, $va, ''); } else { walk_dir('' . $v, 'funcb'); } walk_dir('_public/' . $v, 'funcc'); } }
function see_also_source($o = '') { $o = $o ? $o : 10; $id = ses('read'); $src = $_SESSION['rqt'][$id][9]; if (!$src) { $src = sql('mail', 'qda', 'v', 'id=' . ses('read')); } if ($src) { $src = preplink($src); $r = $_SESSION['rqt']; if ($r) { foreach ($r as $k => $v) { if (preplink($v[9]) == $src) { $ret[$k] += 1; } } } if (!$ret && $src) { $ret = sql('id', 'qda', 'k', 'mail LIKE "%' . $src . '%" limit ' . $o); } if ($ret) { unset($ret[$id]); return array($ret, lka(htac('source') . strdeb($src, '.'), $src . ' ' . $n)); } } }
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 prepare_tits($id, $r, $rear, $nbtrk, $nl, $prw) { $ib = trim($r['ib']); $nl = $nl ? $nl : $_SESSION['nl']; $rst = $_SESSION['rstr']; $USE = $_SESSION['USE']; $read = $_SESSION['read']; $page = $_SESSION['page']; if ($nl == 'nlpop') { $nl = ''; $nlp = 1; } $out['jurl'] = 'content_ajxlnk2__2_art_' . $id; $out['purl'] = 'popup_popart__3_' . $id . '_3'; $out['day'] = $r['day']; $out['artedit'] = ' '; $nlb = substr($nl, 0, 2); if ($nlb == "nl") { $http = host(); } $out['url'] = $http . good_url($id, $r['suj']); //urlread($id); if (!$rst[19]) { $out['img1'] = first_img($r['img']); } //img1 if (!$rst[68] && $r['img'] && strpos($r['img'], '/')) { //gallery $out['btim'] = lj('', 'popup_callp___spe-ajxf_art*gallery_' . $id . '_gallery', picto('img')); } if ($_SESSION['prma']['art_mod']) { if ($read == $id && $prw > 2 && !$nl && !$nlp && rstr(60)) { $out['float'] = build_art_mod(1); } // $out['float']=mkbub(popbub('seek','',picto('list'),'c'),'inline','position:relative; display:inline-block;','');//seek $out['open'] .= lj('', 'popup_popartmod__3_' . $id, picto('virtual')) . ' '; } if (!$rst[31]) { $out['back'] = art_back($id, $ib, $r['frm']); } //back if (!$rst[6] && $r['name'] != ses('qb')) { //author $out['author'] = lka(htac('author') . $r['name'], $r['name']); } if (!$rst[23] && $r['re'] > 1) { $out['priority'] = picto('s' . ($r['re'] - 1), 16); } if (!$rst[24]) { $day = mkday($r['day'], 1); //date if (!$rst[54]) { $out['date'] = lka(target_date($r['day']), $day); } else { $out['date'] = $day; } } if (!$rst[26]) { $out['pid'] = $id; } //id if (!$rst[29]) { $out['tag'] = tag_maker($id); } //tags if ($nl != 'nl') { $out['edit'] = admin_edit($r['name'], $id, $r['re'], $prw); } //edit if (rstr(27) && trim($r['mail'])) { $out['source'] = pub_link($r['mail']); } //source if ($_GET['search'] && $nl) { $out['search'] = nbof($nl, 19); } //rech if ($rear > 1 && rstr(43)) { $out['nbarts'] = lj('', 'popup_getcontent___parent_' . $id, nbof($rear, 1)); } //nb_arts if (is_array($nbtrk)) { $nbtk = count($nbtrk); //tracks if ($read) { $out['tracks'] = lka(urlread($id) . '#trackback', picto('forum') . $nbtk); } else { $out['tracks'] = lj('', 'popup_trckpop___' . $id, picto('forum') . $nbtk); } } if ($ib > 0 && $read != $id && $read != $ib) { $sujb = suj_of_id($ib); //parent if ($sujb) { $out['parent'] = lka(urlread($ib), pictxt('copy', $sujb)); } } if (!$rst[58] && $nlb != "nl") { $out['open'] .= lj('', 'popup_editbrut___' . $id, picto('conn')) . ' '; } if (!$rst[37] && $nlb != "nl") { $out['open'] .= popart($id) . ' '; } //popen if (!$rst[28] && $nlb != "nl") { //open if ($prw <= 2 && $rst[41] != "0") { $out['open'] .= opnart($id, $prw, '') . ' '; } elseif ($prw == 3 && $rear > 1) { $out['open'] .= opnart($id, 2, '1') . ' '; } } if (!$rst[25] && $r['host'] > 1000) { //lenght $out['lenght'] = picto('time', 16) . ' ' . art_lenght($r['host']); } if (!$rst[40]) { //rss $out['rss'] = lkt("", '/plug/rss1.php?read=' . $id . '&preview=full', picto('rss', 16)); } if (!$rst[71] && $nlb != "nl") { $out['social'] = lj('', 'popup_artstats___' . $id . '_' . $r['day'], picto('users', 16)); } //if($ath=@$r['opts']['authlevel'])$out['social'].=asciinb($ath); if ($nlb != "nl") { $root = host() . urlread($id); //social//&via=philum_info $rsoc = array(44 => 'http://www.facebook.com/sharer.php?u=' . $root, 45 => 'http://twitter.com/intent/tweet?original_referer=' . $root . '&url=' . $root . '&text=' . utf8_encode($r['suj']) . '&title=' . utf8_encode($r['suj']), 46 => 'http://wd.sharethis.com/api/sharer.php?destination=stumbleupon&url=' . $root); if (auth(6) && !$rst[45]) { $out['social'] .= lj('', 'popup_plup___twit_twit*share_' . $id, callico('tw')); } if (!$rst[45]) { $out['social'] .= lkt('', $rsoc[45], callico('tw')); } if (!$rst[44]) { $out['social'] .= lkt('', $rsoc[44], callico('fb')); } if (!$rst[46]) { $out['social'] .= lkt('', $rsoc[46], icon('stumble')); } if (!$rst[52]) { $out['social'] .= favs_edt($id) . ' '; } // if(!$rst[86])$out['social'].=lj($css,'popup_track___'.$id,picto('forum')).' '; if (!$rst[47]) { $out['social'] .= lj('', 'popup_vmail___' . $id, callico('mail')) . ' '; } if (!$rst[12]) { $out['social'] .= lkt('', '/plug/read/' . $id, picto('print')) . ' '; } if (!$rst[49]) { $out['words'] = lj('', 'popup_words___' . $id, picto('search')); } } if ($_SESSION['plgs'] && $nlb != "nl") { $out['social'] = $_SESSION['plgs']; } $out['artlang'] = lang_art($id, $r['opts']); $out['lang'] = lang_rel_arts($id, $r['opts']); if (!$rst[50] or $USE) { $out['opt'] = btn('txtsmall2', picto('view', 16) . ' ' . $r['lu']) . ' '; } //nbof $out['sty'] = ''; return $out; }
error_reporting(-1); ini_set('display_errors', 1); if (!function_exists('p')) { require 'progb/lib.php'; } // $_SESSION['uproot'] = '../users/' . ses('qb') . '/downloads'; //destination folder function fsize_b($d) { $u = array('B', 'KB', 'MB'); return @round($d / pow(1024, $i = floor(log($d, 1024))), 1) . ' ' . $u[$i]; } if (isset($_FILES['myfile'])) { $n = $_FILES['myfile']['name']; $n = strtolower($n); $tmp = $_FILES['myfile']['tmp_name']; $t = $_FILES['myfile']['type']; $s = fsize_b($_FILES['myfile']['size']); $f = $_SESSION['uproot'] . '/' . $n; //if(is_file($tmp))echo $f; if (is_uploaded_file($tmp)) { //echo $tmp; //if(is_file($tmp))$d=read_file($tmp); if($d)write_file($f,$d); if (move_uploaded_file($tmp, $f)) { echo lka($f) . ' type: ' . $t . ' ' . $s . br(); } else { return 'error'; } } }
function make_archive_philum_c() { $d = '../users/philum/maj/philum' . date('ym', time()) . '.tar'; plug_tar($d, '../_public'); echo lka($d, $d); }
function miniconn_w($doc, $h) { list($pd, $c) = split_one(':', $doc, 1); if ($c && $pd != 'http') { $d = sconn_defs_r($pd, $c); if ($d != $doc) { return $d; } } if ($c) { $d = sconn_defs_app($pd, $c, $h); if ($d) { return $d; } } list($p, $o) = split_one('§', $doc, 1); if ($o) { if (is_numeric($p) && $o) { return pop_art('http://' . $h . '/' . $p . '§' . $o); } elseif ($p && $o) { return lkt('', $p, pictxt('get', $o)); } } $xt = strtolower(strrchr($doc, '.')); if ($xt == '.mp3') { $j = ajx(goodroot($doc, $h)); return lj('', 'popup_popmp3___' . $j, pictxt('music', strrchr_b($doc, '/'))); } if ($xt == '.pdf') { return pdfreader($doc); } if (is_image($doc)) { $im = goodroot($doc); if (@is_file($im)) { return popim($im, picto('img')); } elseif (strlen($doc) > 4) { return popim_w($im, $h); } } if (strpos($doc, "@") !== false && strpos($doc, '.') !== false) { return lka('mailto:' . $doc, strdeb($doc, '@')); } if (substr($doc, 0, 1) == '@') { return poptwit(substr($doc, 1)); } //if(substr($doc,0,1)=='@')return plugin_func('tracks','track_answer',substr($doc,1),''); //if(substr($doc,0,1)=='#')return call_plug('','popup','chatxml',substr($doc,1),pictxt('chat',substr($doc,1))); if ($pd == 'http') { return lkt('', $doc, pictxt('get', http_domain($doc))); } return $doc; }
function import_hub() { $h = $_SESSION['target_hub']; $dirs = array('css', 'msql/users', 'msql/design', 'users', 'img', 'datas'); foreach ($dirs as $k => $v) { echo lka('?target_hub=' . $h . '&block=' . $v, $v) . ' '; } echo br(); if ($_GET['block'] == 'css') { batch_dl('css', $h); } if ($_GET['block'] == 'msql/users') { batch_php('msql/users', $h); } if ($_GET['block'] == 'msql/design') { batch_php('msql/design', $h); } if ($_GET['block'] == 'users') { batch_dir('users', $h); } if ($_GET['block'] == 'img') { batch_dl('img', $h); } if ($_GET['block'] == 'ban') { echo lka('?block=ban&import=ban', $txt) . br(); } if ($_GET['block'] == 'datas') { $txt = 'enter like "pub_art_from_56257" '; echo lka('?block=' . $v . '&data=', $txt) . br(); if ($_GET['data']) { dl_data($h); } } }
function cache_arts() { $nod = $_SESSION['qb'] . '_cache'; $main = msql_read_b('', $nod); if ($main["_menus_"]) { unset($main["_menus_"]); } if ($main) { $last = current($main); } $lastart = last_art($last[0]); if (!is_array($main[$lastart]) && $lastart or get('refresh') or $_GET['nbj']) { list($slct, $in, $wh, $ord) = play_req(' and re>0'); $sq = sqlmk($slct, 'qda', $in, $wh, $ord); $rq = $req = mysql_query($sq); $ret["_menus_"] = array('date', 'cat', 'title', 'img', 'hub', 'tag', 'lu', 'author', 'lenght', 'url', 'ib', 're'); $rtb = tri_cache($rq); if ($rtb) { $ret += $rtb; } if ($rq) { mysql_free_result($rq); } if (!$_GET["lang"] && count($ret) < 500) { //!$_GET["timetravel"] && !$_GET["nbj"] && $ok = 'cache reloaded'; msql_save('', $nod, $ret); maj_nbarts($last[0]); } } else { $_SESSION['rqt'] = $main; } //if($ok && $rtb)alert($ok); return lka('/reload/' . ses('qb'), 'reload'); }
function plug_draw($w, $h) { if (!$w) { $w = 400; } //currentwidth(); Head::add('jslink', '/js/jquery.js'); Head::add('jscode', draw_js()); Head::add('csscode', draw_css()); $ret = balc('canvas', '" id="canvas" width="' . $w . 'px" height="' . $h . 'px', ''); $r = array('black', 'white', 'blue', 'green', 'yellow', 'orange', 'brown', 'red', 'indigo', 'violet', 'pink', 'cyan'); $n = count($r); for ($i = 0; $i < $n; $i++) { $c = '" style="background: none repeat scroll 0% 0% ' . $r[$i] . ';" data-couleur="' . $r[$i]; $cl .= balc('li', '', lka($c, $r[$i])); } $ret .= balc('ul', '" id="couleurs', $cl); $inp = label('largeur_pinceau', '', '', 'width'); $inp .= input('range', 'largeur_pinceau', 5, '" min="2" max="20" size=1'); //$inp.=balc('output','" id="output','pixels'); $inp .= input('reset', 'reset', 'reset', ''); $inp .= input('button', 'save', 'save', ''); $ret .= '<form id="largeurs_pinceau">' . $inp . '</form>'; return $ret; }