function flux_xml($main, $preview)
{
$http = host();
foreach ($main as $k => $v) {
if ($v[1] != "user" && $v[7] != "") {
$url = $http . htacc('read') . $k;
if ($preview) {
$msg = sql('msg', 'qdm', 'v', 'id="' . $k . '"');
$msg = correct_txt($msg, 'b i h c l /2 /3', 'corrfast');
if ($preview != "full") {
$msg = substr($msg, 0, kmax_nb(400, $msg));
}
$msg = format_txt($msg, "nlc", $k);
$msg = parse_msg_xml($msg);
}
$gmi = $http . '/imgc/' . $v[3];
if ($gmi && $preview) {
$gmo = '<img src="' . $gmi . '" style="margin:0 10px 4px 0;" />' . "\n";
$gmo = parse_msg_xml($gmo);
} else {
$gmi = "";
$gmo = "";
}
$lang = data_val('msg', $k, 'lang');
$xml .= "<item>\n";
$v[2] = str_replace(" ", ' ', $v[2]);
$xml .= bal('title', parse_msg_xml($v[2])) . "\n";
$xml .= bal('link', $url) . "\n";
$xml .= bal('category', parse_msg_xml($v[1])) . "\n";
$xml .= balb('guid', ' isPermaLink="true"', $url) . "\n";
$xml .= bal('pubDate', date("r", $v[0])) . "\n";
$xml .= bal('description', $gmo . $msg) . "\n";
$xml .= bal('author', $author) . "\n";
$xml .= bal('language', $lang ? $lang : $_SESSION['prmb'][25]) . "\n";
$xml .= "</item>" . "\n\n";
}
}
return $xml;
}
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 popa($t, $o = '', $s = '')
{
return div(atd('popa') . atc('popa'), popbt($o) . balb('small', ats('cursor:move;') . atb('onmouseup', 'stop_drag(event); noslct(1);') . atb('onmousedown', 'noslct(0);'), $t ? etc($t, 70) : 'popup'));
}
function make_table_clr($r, $rb)
{
if (is_array($r)) {
foreach ($r as $k => $v) {
$td = '';
if (is_array($v)) {
foreach ($v as $ka => $va) {
$td .= balb('td', ats(ub_sty($rb[$k][$ka])), $va);
}
}
if ($td) {
$tr .= balb('tr', ats($rb[$k][$ka]), $td);
}
}
}
return balb('table', '', $tr);
}
function art_read_mecanics($id, $r, $msg, $n, $prw, $tp)
{
if (!$id) {
return;
}
$n = $_SESSION['nl'] ? $_SESSION['nl'] : $n;
//no_edit
$rear = nb_ib_arts($id) + 1;
$otp = read_idy($id, 'DESC');
$r['opts'] = $_SESSION['opts'] ? $_SESSION['opts'] : art_opts($id);
$panout['id'] = $id;
$panout['suj'] = $r['suj'];
//$prw=slct_media($prw);
if ($r['re'] == 0) {
$panout['css'] = "hide";
} else {
$panout['css'] = "";
}
//if($_GET['module']=="agenda")$panout['suj']=strftime("%A %d %B %Y",$r['day']).' :: ';
$panout += prepare_tits($id, $r, $rear, $otp, $n, $prw);
//count($otp)
if ($prw < 3) {
$panout['thumb'] = prepare_thumb($r['img']);
}
if (good_rech() && $n) {
$panout += prepare_msg_rech($id, $msg, $r, $n);
} elseif ($msg) {
$panout += prepare_msg($id, $msg, $r, $prw);
//corps && $prw!=1
if (!$_SESSION['nl']) {
$trk = prepare_tracks($id, $otp);
}
}
return balb('section', atd($id) . atn($id), template($panout, $tp)) . $trk;
}
function colonize($re, $prm, $id, $cls, $w = '', $b = '')
{
$b = $b ? 'div' : 'ul';
$w = $w ? $w : currentwidth() - 10;
$ret = onxcols($re, $prm, $w);
$wb = atd($id) . atc($cls) . ats('width:100%;');
//-($prm*5)
return balb($b, $wb, $ret) . divc("clear", "");
}
function prior_edit($va, $id)
{
$css = 'popbt';
$r = array(2 => picto('s1'), 3 => picto('s2'), 4 => picto('s3'));
//0=>nms(30),1=>nms(29),
if ($va == 0) {
$ret .= lkc($css, '/?read=' . $id . '&trash_art=' . $id, picto('trash')) . '';
}
if ($va == 0) {
$ret .= lkc($css . ' active" title="' . nms(43), '/?read=' . $id . '&delete_art=' . $id, picto('del')) . '';
}
$ret .= ljc($css, 'rdbt' . $id, 'meta_prior*sav_' . ($va == 0 ? 1 : 0) . '_' . $id, offon($va)) . ' ';
foreach ($r as $k => $v) {
$c = $k == $va ? 'active' : '';
$j = 'rdbt' . $id . '_call___meta_prior*sav_' . ($k == $va ? 1 : $k) . '_' . $id;
$js = ' var ob=document.getElementById(\'art\'+' . $id . '); ';
if ($k) {
$js .= 'ob.className=ob.className.replace(\'tab hide\',\'tab\');';
} else {
$js .= 'ob.className=ob.className.replace(\'tab\',\'tab hide\');';
}
$ret .= balb('a', atc($css . ' ' . $c) . atb('onclick', sj($j) . $js), $v) . '';
}
return $ret;
}
function finder_flap_dirs($r, $p, $o)
{
ksort($r);
static $i;
foreach ($r as $k => $v) {
if (is_array($v)) {
$np = $p . '/' . $k;
$i++;
$j = 'active_list_finder(\'fdirs\',' . $i . '); ';
$j .= sj('ffils_fifunc___fi*flapf_' . ajx($np) . '_' . $o);
$lk = ljb('', $j, '', $k);
$ul = balb('ul', 'style="display:none;"', finder_flap_dirs($v, $np, $o));
$ret .= li($lk . $ul);
}
}
return $ret;
}
function api_menu($p, $o, $rid)
{
$ret .= balb('textarea', atd('inp') . atb('cols', 70) . atb('row', 4), $p) . ' ';
$ret .= lj('', $rid . '_plug__3_api_api*j___inp', picto('reload')) . ' ';
return $ret;
}
function art_read_mecanics($id, $r, $msg, $n, $prw, $tp)
{
if (!$id) {
return;
}
$n = $_SESSION['nl'] ? $_SESSION['nl'] : $n;
//no_edit
$rear = nb_ib_arts($id) + 1;
$otp = read_idy($id, 'ASC');
$r['opts'] = $_SESSION['opts'] ? $_SESSION['opts'] : art_opts($id);
//p($r['opts']);
$panout['id'] = $id;
$panout['suj'] = $r['suj'];
//$prw=slct_media($prw);
if ($r['re'] == 0) {
$panout['css'] = "hide";
} else {
$panout['css'] = '';
}
if ($prw == 1 or $prw == 2) {
$panout['thumb'] = prepare_thumb($r['img'], $id);
}
if ($prw == 'rch') {
$panout += prepare_msg_rech($id, $msg, $r);
} elseif ($msg) {
$panout += prepare_msg($id, $msg, $r, $prw);
//corps && $prw!=1
if (!$_SESSION['nl']) {
$trk = prepare_tracks($id, $otp);
}
}
$panout += prepare_tits($id, $r, $rear, $otp, $panout['count'], $prw);
//count($otp)
return balb('section', atd($id) . atn($id), template($panout, $tp)) . $trk . "\n";
}
function adm_backup($qb, $auth, $goto, $rep)
{
$r = msql_read('', $qb . '_cache', '', 1);
$bkf = min(array_keys($r));
if ($auth == 7) {
$xt_end = checkbox('xtend', 'ok', 'all_hubs', 0) . checkbox('no_id', 'ok', 'no_ID', 0);
}
if ($_GET['bkp_from'] == '') {
$ret = form($goto . '&bkp_from==', autoclic('from', $bkf, '5', '6', '') . input2('submit', 'Submit', 'from', '') . $xt_end);
if ($auth > 6) {
$ret .= ' ' . lkc('txtx', $goto . '&bkp_sql==', 'insert');
}
} else {
$bkf = $_POST['from'];
if (!$bkf) {
$bkf = 1;
}
//echo $qb;
if ($auth == 7 && $_POST['xtend'] != 'ok') {
$wh = 'nod="' . $qb . '" AND ';
}
$ret .= backups($wh, $bkf, $rep, $qb);
}
if ($auth > 6) {
if ($_GET['bkp_sql']) {
$ret .= form($goto . '&bkp_sql==&save=ok', balb('textarea', 'name="insertsql" cols="50" rows="10"', '') . input2('submit', 'Submit', 'insert', ''));
}
if ($_GET['save'] == 'ok') {
$toinsert = stripslashes($_POST['insertsql']);
$verif = msquery($toinsert);
if (!$verif) {
$ret .= 'error';
} else {
$ret .= btn('txtyl', 'saved');
}
}
$ret .= br();
$ret .= lkc('txtblc', 'plug/export.php', 'master_backup') . br();
$ret .= btn('txtblc', 'master_dump:') . ' ';
$ret .= lkc('txtblc', 'plug/dump.php?tb=' . ses('qda'), '_art') . ' ';
$ret .= lkc('txtblc', 'plug/dump.php?tb=' . ses('qdi'), '_txt') . ' ';
$ret .= lkc('txtblc', 'plug/dump.php?tb=' . ses('qdu'), '_idy') . br() . br();
$ret .= lkc('txtbox', $goto . '&backup_msql==', 'backup_msql');
if ($_GET['backup_msql']) {
require 'plug/backup_msql.php';
$ret .= make_archive_msql('');
}
}
return $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 iframe($d, $w = '', $h = '')
{
list($dc, $wb, $hb, $p, $o, $d) = subparams_a($d);
//url§w/h
$w = $wb ? $wb : $w;
$h = $hb ? $hb : ($h ? $h : '400px');
$w = $w ? $w : '100%';
if (strpos($dc, 'http') === false) {
$f = 'users/' . $dc;
}
$prm = atb('width', $w) . atb('height', $h) . atb('name', $p) . atb('seamless', $o) . atb('srcdoc', $o);
//
return balb('iframe', ' src="' . $dc . '" frameborder="0"' . $prm . ' webkitallowfullscreen mozallowfullscreen allowfullscreen', '');
}
function svgjs_build($p, $o)
{
//$ret=js_code('cree_rectangle(event)');
return balb('svg', atb('xmlns', 'http://www.w3.org/2000/svg') . atb('xmlns:xlink', 'http://www.w3.org/2000/svg') . atb('onload', 'cree_rectangle(evt)'), $ret);
}
function apicom_menu($p, $o, $rid)
{
if ($o && $o != 1) {
$rid = $o;
}
if (!$p) {
$p = 'hub:' . ses('qb') . ',minday:' . ses('nbj') . ',nbyp:' . prmb(6);
}
$rb = msql_read('lang', 'helps_api', '', 1);
$r = apicom_ex();
foreach ($r as $k => $v) {
$o = atb('onclick', 'apijumptoarea(\'inp' . $k . '\')');
$o .= atb('onkeyup', 'apijumptoarea(\'inp' . $k . '\')');
$o .= atb('placeholder', $v);
if ($rb[$k]) {
$hlp = ' (' . $rb[$k] . ')';
}
if ($k == 'cat') {
$hlp = select_j('inp' . $k, 'pfunc', '', 'apicom/apicom_cat', '', '2');
}
if ($k == 'tag' or strpos(prmb(18), $k) !== false) {
$hlp = select_j('inp' . $k, 'tag', '', $k, '', '2');
}
$ret .= div('', inp('inp' . $k, '', $o) . ' ' . btn('small', ($k == 'cat' ? 'category' : $k) . $hlp));
}
$ret = divc('cols', $ret);
$o = atb('onclick', 'apijumptoinputs()') . atb('onkeyup', 'apijumptoinputs()');
$ret .= ljb('', 'apijumpall', implode_k($r, ',', ':'), picto('right')) . br();
$ret .= balb('textarea', atd('inp') . $o . atb('cols', 64) . atb('row', 4), $p) . ' ';
$ret .= lj('', $rid . '_plug__3_api_api*j___inp', picto('reload')) . ' ';
$ret .= hlpbt('api');
return $ret;
}
