function charge_sets($d)
{
//select-herit
$qb = $_SESSION['qb'];
$go = '/?admin=css&';
if ($d == "herit") {
$ht = "herit_";
}
$r = explore("msql/design/", 'files', 1);
asort($r);
if ($r) {
foreach ($r as $k => $v) {
$v = substr($v, 0, -4);
list($nd, $bs, $nb, $sv) = split("_", $v);
if ($sv != "sav" && $nd && is_numeric($nb) && ($nd == $qb or $d == "herit" && ($nd == "public" or $_SESSION['auth'] > 6))) {
$rb[$nd][$nb][$bs] = $nb;
}
}
$tab[] = array('hub', 'design', 'clrset');
if ($rb) {
foreach ($rb as $k => $v) {
if (is_array($v)) {
$taba = '';
$tabb = '';
foreach ($v as $nb => $bs) {
$ra = msql_read('users', $k . '_design', '');
$na = $ra[$nb][0] ? $ra[$nb][0] : $bs["design"];
if ($d == "herit") {
$nd = $k . '_';
} else {
$nd = '';
}
$tabt[$nb] = $nb;
if ($bs["design"]) {
$taba[$nb] = lkc("txtbox", $go . $ht . 'desgn=' . $nd . $bs["design"], $na);
}
if ($bs["clrset"]) {
$tabb[$nb] = lkc("txtbox", $go . $ht . 'clrset=' . $nd . $bs["clrset"], clrset_view($k . '_clrset_' . $bs["clrset"]));
}
}
if ($taba) {
$nbd = count($taba);
}
if ($tabb) {
$nbc = count($tabb);
}
if ($d == "select") {
$add = lkc("txtbox", $go . 'desgn=' . ($nbd + 1) . '&add_design==', "add_design");
$adc = lkc("txtbox", $go . 'clrset=' . ($nbc + 1) . '&add_clrset==', "add_colorset");
}
$tab[] = array(btn('txtcadr', $k), $add, $adc);
$nb = count($taba);
for ($i = 0; $i <= $nb; $i++) {
$tab[] = array($tabt[$i], $taba[$i], $tabb[$i]);
}
}
}
}
}
return scroll_b($tab, make_table($tab), 20, 320, 320);
}
function rssin($k, $v)
{
$lk = prepdlink($v);
$f = $lk[0];
$f = https($f);
if (substr($f, 0, 4) != 'http' && $f) {
$f = 'http://' . $f;
}
$r = rssin_load($f);
$nb = count($r);
$ret = hidden('', 'addop', 1);
$t = rssin_t($k, $v, $f);
foreach ($r as $k => $v) {
list($va, $lnk, $dat, $id) = $v;
$btc = '';
$lnj = ajx($lnk);
$i++;
if (!$id) {
$btc = ljc('', 'popup', 'ajxf_batch*preview_' . $lnj, picto('view'));
$fb = nohttp($lnk);
if (auth(4)) {
$mem = @$_SESSION['vacuum'][$fb] ? 'ok' : picto('add');
$btc .= lj('" id="ars' . $i, 'ars' . $i . '_batch___' . $lnj . '_p', $mem);
$btc .= saveiec($lnj, @$_SESSION['vaccat'][$fb], 'rss' . randid(), '', '', '', '', $va);
$btc .= lj('', 'popup_search__3_' . ajx($va) . '_', picto('search'));
}
} else {
$btc .= popart($id) . ' ';
}
$btc .= lkt('', $lnk, picto('url'));
$btc .= btn('txtsmall', $dat);
if ($va) {
$ret .= balc('li', '', $btc . ' ' . $va);
}
}
//$id?'hide':
$ret = scroll_b($nb, $ret, 16, 320);
return $t . balc("ul", "panel pubart", $ret);
}
function m_nodes_b($mn, $o)
{
return scroll_b($mn, implode('', m_nodes($mn, $o)), 20);
}
function art_read_c($id, $prw, $rstr35)
{
//4ajax: only_content
if ($prw > 2) {
$_SESSION['read'] = $id;
} else {
$_SESSION['read'] = '';
}
$r = art_datas($id);
//$prw=slct_media($prw);
if (rstr(5) or $prw > 2) {
$msg = rse('msg', $_SESSION['qdm'] . ' WHERE id="' . $id . '"');
}
$ret = implode('', prepare_msg($id, $msg, $r, $prw));
$ret .= divc('clear', '');
if (rstr(35) && !$rstr35) {
$ret = scroll_b(strlen($ret), $ret, 1000, '', '400', $id);
}
//navig($id).
if ($prw == 3) {
$ret .= lj('" href="#' . $id, 'art' . $id . '_art___' . $id . '_1', picto('ktop'));
}
return $ret;
}
function read_art($n, $t)
{
$in = read_msg($n, "");
if (strlen($in) > 1000) {
$nbc = array("1", "1");
}
if (is_numeric($n)) {
$tit = suj_of_id($n);
} else {
$tit = $n;
}
if ($t) {
$ret = divc("txtcadr", $t == 1 ? $tit : $t);
}
$ret .= divc("panel", scroll_b($nbc, $in, 0));
if (trim($in)) {
return $ret;
}
}
function plug_chatxml($p, $msg = '', $res = '')
{
if (!$p) {
return chatxcanal('public');
}
$p = normalize($p);
ses('muse', $res ? ajxg($res) : ses('USE'));
chtses($p, '0');
list($r, $r1) = chatxdata($p);
$form = chatxform($p);
$head = chathead($p, $r1);
$sty = atd('chtx' . $p) . ats('width:344px;');
return $head . $form . scroll_b($r, div($sty, chatxread($p, $r)), 5, 344);
}
function batch($f, $d)
{
$f = utmsrc($f);
$fb = nohttp($f);
$idt = 'adc';
//if($d=='c')$idt.='p';
if ($f == 'z') {
req('sav');
return save_art_batch();
}
if (substr($f, 0, 4) != 'http' && $f && $f != 'x' && $f != '1') {
$f = 'http://' . $f;
}
if ($f == 'x') {
$_SESSION['vacuum'] = '';
}
//p($_SESSION['vacuum']);
if (trim($f) && $f != '1' && $d != '1' && $f != 'x' && $d != 'x' && !@$_SESSION['vacuum'][$fb]) {
if (joinable($f)) {
$_SESSION['vacuum'][$fb] = read_file($f);
}
}
//
if ($d == 'x') {
unset($_SESSION['vacuum'][$fb]);
}
//echo $f; //p($_SESSION['vacuum']);
if ($d == 'p') {
return 'ok';
}
if ($d == 'c') {
$ret = lj('', sj('popup_batch') . ' closebub(this);', picto('get'));
}
$ret .= lj('', $idt . '_batch____in_' . $d, picto('reload'));
$ret .= lj('', $idt . '_batch___x_1', picto('del'));
$ret .= lj('', 'popup_rssjb___rssurl_1', picto('rss'));
$ret .= lj('', $idt . '_batchfbi__3', picto('update'));
$ret .= lj('', 'page_deskbkg', picto('desktop'));
$ret .= msqlink('', ses('qb') . '_rssurl');
$r = $_SESSION['vacuum'];
if ($r) {
$r = array_reverse($r);
}
if ($r) {
$ret .= lj('popsav', $idt . '_batch___z_1', nms(57));
}
if ($r) {
foreach ($r as $k => $v) {
$i++;
if ((!$_SESSION['vacsuj'][$k] or $k == $f) && $k != 1 && $k && $k != 'http://loading...') {
list($_SESSION['vacsuj'][$k], $msg) = vacuum($k, '');
}
if (!$_SESSION['vacsuj'][$k] && $v) {
$suj = 'no_title';
} else {
$suj = $_SESSION['vacsuj'][$k];
}
$kb = ajx($k, '');
$cat = $_SESSION['vaccat'][$k];
$rid = randid('bth');
$btb = ljc('', 'popup', 'ajxf_batch*preview_' . $kb, picto('view'));
$btb .= slct_cat($rid, $cat, $i);
//$btb.=select_j($rid,'category',$cat,3,$cat?$cat:picto('list'));
$btb .= saveiec($kb, $cat, $rid);
$btb .= lj('', 'popup_search__3_' . ajx($suj) . '_', picto('search'));
$btb .= lkt('" title="' . preplink($k) . ' ' . $_SESSION['vacdat'][$k], http($k), picto('url'));
$btb .= lj('', $idt . '_batch___' . $kb . '_x', picto('del')) . ' ';
$btb .= btn('small', http_domain($k)) . br();
$ret .= divc('small', $btb . $suj);
}
}
if ($d != 'in') {
$ret = div(atd($idt) . ats('padding:2px; min-width:240px;'), $ret);
}
return scroll_b($i, $ret, 10);
}
