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;
}
