function svg_conn($d)
{
$ra = svg_motor();
list($p, $b) = split_one(':', $d, 1);
list($p, $v) = split('§', $p);
$rb = explode(',', $p);
$pr = array_combine_a($ra[$b], $rb);
if ($b == 'attr') {
ses('attr', $pr);
$pr = '';
} elseif (ses('attr')) {
$pr = array_merge_b($pr, ses('attr'));
$_SESSION['attr'] = '';
}
//
//if($b=='attrb'){foreach($rb as $vb){list($atb,$va)=split('=',$vb);$pr[$atb]=$va;}ses('attr',$pr);$pr='';}
if (isset($pr['points'])) {
$pr['points'] = svg_build_prop($pr['points']);
}
if (isset($pr['transform'])) {
$pr['transform'] = svg_build_prop($pr['transform']);
}
if (isset($pr['fill'])) {
$pr['fill'] = svg_clr($pr['fill']);
}
if (isset($pr['stroke'])) {
$pr['stroke'] = svg_clr($pr['stroke']);
}
if (isset($pr['onclick']) && $b == 'lj') {
$pr['onclick'] = sj($pr['onclick']);
$b = 'a';
}
if (@$pr['fillurl']) {
$pr['fill'] = 'url(#' . $pr['fillurl'] . ')';
$pr['fillurl'] = '';
}
if (@$pr['filter']) {
$pr['filter'] = 'url(#' . $pr['filter'] . ')';
}
if ($b == 'feColorMatrix') {
$pr['values'] = svg_build_prop($pr['values']);
}
if ($b == 'stop') {
$pr['style'] = 'stop-color:' . svg_clr($pr['style']) . '; stop-opacity:' . $pr['opac'] . ';';
}
//echo $b.br(); pr($pr);
if ($b != 'attr') {
return balise($b, $pr, $v);
}
}
function make_archive_philum_d()
{
$f = '../users/philum/maj/philum' . date('ym', time()) . '.tar';
$rf = array("index.php", "ajax.php", "app.php", "plug.php", "install.php", "htaccess.txt", "favicon.ico", "readme.txt", "vps.txt", 'params/_connectx.php.txt', "avatar/FungShui", "css", "msql", "params", "plug", "prog", "progb", "pub", "video", "app", "js/colorpicker", "js/jquery.js", "js/live.js", 'fonts/philum.woff', 'fonts/philum.eot', 'fonts/philum.svg', 'fonts/philum.ttf', "fonts/philum.tar.gz");
//"bkg","avatar","bkg/shadow","gdf","gallery","img","imgb","imgc",
//,"users/public","fla",
foreach ($rf as $k => $v) {
$o = $v == 'plug' ? 1 : 0;
$v = '../_public/' . $v;
if (is_dir($v)) {
$rg = array_merge_b($rg, read_dir($v, $o));
}
if (is_file($v)) {
$rg[] = $v;
}
}
$rg = array_flip(array_flip($rg));
//doublons
//p($rg);
echo targz($f, $rg);
}
function m_system()
{
$auth = $_SESSION['auth'];
$id = ses('read');
$top = rstr(69) ? '' : 'd';
$hv = 1;
$ra = array(0 => 'phi2', 1 => 'loading', 2 => 'admin', 3 => 'apps', 4 => 'download', 5 => 'search', 6 => 'articles', 7 => 'add', 8 => 'link', 9 => 'flag', 10 => 'time', 11 => 'phi', 12 => 'phi1', 13 => 'list', 14 => 'user', 15 => 'menu');
foreach ($ra as $k => $v) {
$ico[$k] = picto($v);
}
$ret['home'] = popbub('home', '', $ico[0], $top, $hv);
//if(rstr(20))
if (rstr(94)) {
$ret['menuB'] = popbub('menubub', '', $ico[15], $top, $hv);
}
if (rstr(95)) {
$ret['menuO'] = popbub('overcat', '', $ico[15], $top, $hv);
}
if (rstr(51)) {
$ret['apps'] = popbub('apps', '', $ico[3], $top, $hv);
}
if ($auth > 4) {
$ret['admin'] = popbub('fadm', 'fastmenu', $ico[2], $top, $hv);
}
if (rstr(75)) {
if ($top) {
$ret['search'] = search_btn(nms(24), 'right', '', 1);
} else {
$ret['search'] = popbub('call', 'search', $ico[5], $top, $hv);
}
}
if ($auth > 1) {
if (rstr(83)) {
$ret['ucom'] = popbub('call', 'ucom', $ico[8], $top, $hv);
}
if ($auth > 3 && rstr(76)) {
$ret['batch'] = popbub('call', 'batch', $ico[4], $top, $hv);
}
}
if ($auth > 2) {
if (rstr(79)) {
$ret['addurl'] = popbub('call', 'addart', $ico[7], $top, $hv);
} else {
$ret['addart'] = li(lja('', sj('popup_addArt____1') . ' closebub(this);', $ico[7]));
}
}
if (rstr(81)) {
$ret['favs'] = llj('', 'popup_modpop___favs:plug', picto('like'));
}
//favs
if (rstr(80)) {
$ret['arts'] = popbub('', 'arts', $ico[6], $top, $hv);
}
//arts
if ($_SESSION['lang'] != 'all' or rstr(82)) {
$ret['lang'] = popbub('lang', 'lang', $ico[9], $top, $hv);
}
//lang
if (abs(ses('dayx') - ses('daya')) > 86400 or rstr(84)) {
//back_in_time
$ret['time'] = popbub('timetravel', '', $ico[10], $top, $hv);
}
//archives
if (rstr(48)) {
if ($top) {
$nm = ' ' . btn('small', ses('USE'));
}
//usr
$ret['user'] = popbub('user', '', $ico[14], $top, $hv);
}
if ($id && rstr(89)) {
$ret['seek'] = popbub('seek', '', $ico[13], $top, $hv);
}
//metas
if ($id && auth(6)) {
$ret['edit'] = li(lj('', 'popup_metall___' . $id . '_3', picto('tag'))) . li(lj('', 'popup_tit___' . $id . '_3', picto('localize'))) . li(lj('', 'popup_artedit___' . $id . '___autosize', picto('edit')));
}
//edit
if (auth(6) or $_SESSION['dev']) {
$ret['dev'] = popbub('dev', 'dev', $_SESSION['dev'] ? $ico[11] : $ico[12], $top, $hv);
}
//dev
$ret['fixit'] = btd('fixtit', ' ');
//$ret['alert']=' ';
$_POST['popadm'] = array_merge_b($_POST['popadm'], $ret);
}
function r_apps_home($o)
{
$r = msql_read_b('system', 'default_apps_home', '', 1);
if ($o) {
return $r;
}
$rb = r_apps_cond('home');
if (!rstr(56)) {
$r = unset_in($r, 'hubs', 0);
}
//if(!rstr(48))$r=unset_in($r,'boot',6);
return array_merge_b($rb, $r);
}
function art_options($id)
{
$r = $_SESSION['art_options'];
$arl = explode(' ', prmb(26));
$rdata = sql('val,msg', 'qdd', 'kv', 'ib="' . $id . '"');
if ($r) {
foreach ($r as $k => $v) {
$val = $rdata[$v];
$hlp = '';
if ($v == 'folder') {
$ret .= picto('virtual') . lj('poph', 'popup_addfolder___' . $id, nms(73)) . ' ';
}
if ($v == 'related') {
$ret .= pictxt('articles') . btn('poph', nms(138));
$hlp = hlpbt('meta_related');
}
if ($v == 'agenda') {
$ret .= pictxt('localize') . btn('poph', 'Agenda');
//$hlp=togbub('plug','calendar_calendar*build__'.$v.$id,picto('time'));
$hlp = lj('', 'popup_plup___calendar_calendar*build__' . $v . $id, picto('time'));
} elseif ($v == 'lang') {
$ret .= picto('global');
} elseif ($v == 'template') {
$ret .= pictxt('conn', $v);
}
if ($v == 'authlevel') {
$ret .= btn('popbt', $v . ' ' . menuderj_prep('all|1|2|3|4|5|6|7|8', $v . $id, $val, '1')) . ' ';
} elseif ($v == 'template') {
$val = $val ? $val : ' ';
$tmpub = msql_read('', 'public_template', $tpl, 1);
$tmprv = msql_read('', $_SESSION['qb'] . '_template', $tpl, 1);
$arr = array_merge_b($tmpub, $tmprv);
$arr[' '] = array('' => 1);
$ret .= btn('popbt', $v . ' ' . menuderj_prep(implode('|', array_keys($arr)), $v . $id, $val ? trim($val) : $v, '1')) . ' ';
} elseif ($v == 'tracks') {
if (rstr(1) && !$val or $val == 'true') {
$chk = 1;
} else {
$chk = 0;
}
$ret .= btn('popbt', $v . ' ' . checkbox_j($v . $id, $chk));
} elseif ($v == '2cols') {
if (rstr(17) && !$val or $val == 'true') {
$chk = 1;
} else {
$chk = 0;
}
$ret .= btn('popbt', $v . ' ' . checkbox_j($v . $id, $chk));
} elseif ($v == 'fav') {
if (rstr(52) && !$val or $val == 'true') {
$chk = 1;
} else {
$chk = 0;
}
$ret .= btn('popbt', $v . ' ' . checkbox_j($v . $id, $chk));
} elseif ($v == 'like') {
if (rstr(90) && !$val or $val == 'true') {
$chk = 1;
} else {
$chk = 0;
}
$ret .= btn('popbt', $v . ' ' . checkbox_j($v . $id, $chk));
} elseif ($v == 'poll') {
if (rstr(91) && !$val or $val == 'true') {
$chk = 1;
} else {
$chk = 0;
}
$ret .= btn('popbt', $v . ' ' . checkbox_j($v . $id, $chk));
} elseif ($v == 'lang') {
if ($arl) {
foreach ($arl as $va) {
//$rl[$va]=$rdata['lang'.$va];
if ($val && $va != $val or !$val && $va != prmb(25)) {
$ret .= lj('txtsmall2', $v . $va . $id . '_autolang__4_' . $id . '_' . $va, $va);
$ret .= input(1, $v . $va . $id, $rdata['lang' . $va], '" size="4');
} else {
$ret .= hidden('', $v . $va . $id, '');
}
}
$ret .= hlpbt('meta_lang');
$lang = $rdata['lang'];
//lang
$ret .= langslct($arl, $lang, 'lang' . $id);
} else {
$ret .= hidden('', $v . $id, '');
}
$ret .= br();
} else {
$ret .= ljb('poph', 'jumpvalue', $v . $id . '_ ', 'x') . ' ' . balise('input', array(1 => 'text', 3 => $v . $id, 4 => $val, 5 => '', 6 => '14', 7 => '255', 'autocomplete' => 'off'), '') . $hlp . br();
}
}
}
return $ret;
}
function interpret_xml($v)
{
static $i;
$i++;
//static $ret;
$aa = strpos($v, "<");
$ab = strpos($v, ">");
//aa_balise
if ($aa !== false && $ab !== false && $ab > $aa) {
$before = substr($v, 0, $aa);
//...< //htmlentities
$aa_inner = ecart($v, $aa, $ab);
//<...>
$aa_end = strpos($aa_inner, " ");
if ($aa_end !== false) {
$aa_balise = substr($aa_inner, 0, $aa_end);
} else {
$aa_balise = $aa_inner;
}
}
$ba = strpos($v, '</' . $aa_balise, $ab);
$bb = strpos($v, ">", $ba);
//bb_balise
if ($ba !== false && $bb !== false && $aa_balise != "" && $bb > $ba) {
$ba = recursearch($v, $ab, $ba, $aa_balise);
//recursearch
$bb = strpos($v, ">", $ba);
if ($bb) {
$bb_balise = ecart($v, $ba, $bb);
}
$balise = ecart($v, $ab, $ba);
} elseif ($ab !== false) {
$bb = $ab;
} else {
$bb = -1;
}
$after = substr($v, $bb + 1);
//>...
//ok,go
$ia = $i;
$aa_balise = strtolower($aa_balise);
$bb_balise = strtolower($bb_balise);
$ret[$ia]['balise'] = $aa_balise;
$attrb = mk_attrb($aa_inner, ' ', '=');
if ($attrb) {
$ret[$ia]['props'] = $attrb;
}
//itération
if (strpos($balise, '<') !== false) {
$balise = interpret_xml($balise);
}
if ($balise) {
$ret[$ia]['content'] = $balise;
}
//sequence
if (strpos($after, '<') !== false) {
$retb = interpret_xml($after);
}
if ($retb) {
$ret = array_merge_b($ret, $retb);
}
return $ret;
}
function art_options($id)
{
$r = $_SESSION["art_options"];
$arl = explode(' ', prmb(26));
$rdata = sql('val,msg', 'qdd', 'kv', 'ib="' . $id . '"');
if ($r) {
foreach ($r as $k => $v) {
$val = $rdata[$v];
$hlp = '';
if ($v == 'folder') {
$j = 'popup_addfolder___' . $id;
} else {
$j = '';
}
if ($j) {
$ret .= picto('virtual') . lj('poph', $j, $v) . ' ';
}
if ($v == 'related') {
$picto = 'articles';
$hlp = hlpbt('meta_related');
} elseif ($v == 'lang') {
$picto = 'global';
} elseif ($v == 'template') {
$picto = 'conn';
} else {
$picto = 'file';
}
if (!$j) {
$ret .= picto($picto) . btn('poph', $v) . ' ';
}
if ($v == 'authlevel') {
$ret .= menuderj_prep('all|1|2|3|4|5|6|7|8', $v . $id, $val, '1') . ' ';
} elseif ($v == "template") {
$val = $val ? $val : " ";
$tmpub = msql_read('', 'public_template', $tpl, 1);
$tmprv = msql_read('', $_SESSION['qb'] . '_template', $tpl, 1);
$arr = array_merge_b($tmpub, $tmprv);
$arr[" "] = array("" => 1);
$ret .= menuderj_prep(implode('|', array_keys($arr)), $v . $id, $val ? trim($val) : $v, '1') . ' ';
} elseif ($v == "tracks") {
if (rstr(1) && $val == "" or $val == 'true') {
$chk = 1;
} else {
$chk = 0;
}
$ret .= checkbox_j($v . $id, $chk) . ' ';
} elseif ($v == "2cols") {
if (rstr(17) && $val == "" or $val == 'true') {
$chk = 1;
} else {
$chk = 0;
}
$ret .= checkbox_j($v . $id, $chk);
} elseif ($v == "lang") {
if ($arl) {
foreach ($arl as $va) {
//$rl[$va]=$rdata['lang'.$va];
if ($val && $va != $val or !$val && $va != prmb(25)) {
$ret .= lj('txtsmall2', $v . $va . $id . '_autolang__4_' . $id . '_' . $va, $va);
$ret .= input(1, $v . $va . $id, $rdata['lang' . $va], '" size="4');
} else {
$ret .= hidden('', $v . $va . $id, '');
}
}
$ret .= hlpbt('meta_lang');
$lang = $rdata['lang'];
//lang
//$ret.=select_j('lang'.$id,'lang',$lang,1,$lang,0);
$ret .= radiobtj($arl, $lang, 'lang' . $id);
} else {
$ret .= hidden('', $v . $id, '');
}
$ret .= br();
} else {
$ret .= ljb('poph', 'jumpvalue', $v . $id . '_ ', 'x') . ' ' . balise('input', array(1 => 'text', 3 => $v . $id, 4 => $val, 5 => '', 6 => '14', 7 => '255', 'autocomplete' => 'off'), '') . $hlp . br();
}
}
}
return $ret;
}
function merge_defs($r, $d)
{
list($a, $b) = split_one('/', $d, 1);
$rb = msql_read_b($a, $b, '', 1);
return array_merge_b($r, $rb);
}
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 msq_merge($r, $dr, $nd)
{
$rb = msql_read_b($dr, $nd, '', 1);
return array_merge_b($r, $rb);
}
