function vacuum($f, $sj = '')
{
$f = https($f);
$f = http($f);
$f = utmsrc($f);
$reb = vaccum_ses($f);
if (!$reb) {
$_SESSION['vacuum'][nohttp($f)] = '';
return array('nothing');
}
if ($_POST['see']) {
eco($reb, 1);
}
$enc = embed_detect(strtolower($reb), 'charset=', '"');
if (!$enc) {
$enc = mb_detect_encoding($reb);
}
list($defid, $defs) = verif_defcon($f);
//defcons
if (!$defs) {
$defs = known_defcon($reb);
}
if (!$defs) {
$defs = recognize_defcon($reb);
}
$auv = auto_video($f, 'pop');
if (!$defs && !$auv) {
add_defcon($f);
return array('Title', $f, $f, '', '', '');
}
if (strtolower($enc) == 'utf-8' or $_POST['utf'] or $defs[5]) {
$reb = utf8_decode_b($reb);
}
if ($defs[2]) {
if (!$defs[3]) {
$suj = embed_detect_c($reb, $defs[2]);
} elseif ($defs[3]) {
$suj = embed_detect($reb, $defs[2], $defs[3]);
}
$suj = trim(del_n($suj));
$suj = interpret_html($suj, "ok");
}
if ($defs[0]) {
if (!$defs[1]) {
$rec = embed_detect_c($reb, $defs[0]);
} elseif ($defs[1]) {
$rec = embed_detect($reb, $defs[0], $defs[1]);
}
} else {
$rec = embed_detect_c($reb, '<body');
}
if ($defs[8]) {
if (!$defs[9]) {
$opt = embed_detect_c($reb, $defs[8]);
} elseif ($defs[9]) {
$opt = embed_detect($reb, $defs[8], $defs[9]);
}
if ($opt) {
$opt .= br() . br();
}
}
if ($defs[4] && $defs[4] != 1) {
if (strpos($reb, $defs[4]) !== false) {
$end = embed_detect_c($reb, $defs[4]);
}
if ($end) {
$end = br() . br() . $end;
}
}
if ($auv) {
$ret = $auv;
} elseif (strpos($f, 'twitter.com')) {
//twit
list($suj, $ret, $day) = plugin_func('twit', 'twit_vacuum', $f);
} else {
$ret = converthtml($opt . $rec . $end);
}
//foot
if ($suj) {
$title = clean_title($suj);
} else {
$title = clean_internaltag(pre_clean($sj ? $sj : 'Title'));
}
if ($defs[6]) {
$ret = post_treat_batch($ret, $title, $defs[6]);
}
//post_treat
if ($_SESSION['sugm']) {
$sug = sugnote();
}
if (!$auv) {
$ret .= "\n\n" . $sug . '[' . $f . ']';
}
//eco($rec,1);
return array($title, $ret, $rec, $defid, $defs);
}
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 batch_prep($v)
{
$http = strdeb($v, '/');
req('pop');
$rss = rssin_load(http($v));
$vac = $_SESSION['vacuum'];
//pr($rss);
foreach ($rss as $k => $v) {
list($suj, $f, $dat, $id) = $v;
$f = (string) $f;
if ($id) {
break;
} elseif ($f && !isset($vac[$f])) {
$f = nohttp($f);
@($_SESSION['vacsuj'][$f] = $suj);
@($_SESSION['vacdat'][$f] = $dat);
@($_SESSION['vacuum'][$f] = '');
}
}
}
function save_art()
{
$dayx = $_SESSION['dayx'];
$frm = $_SESSION['frm'];
$qb = $_SESSION['qb'];
$base = $_SESSION['qda'];
$qdm = $_SESSION['qdm'];
$USE = $_SESSION['USE'];
if (!$frm or $frm == "Home" or $frm == "user") {
$frm = "public";
}
$suj = clean_title($_POST['suj']);
$suj = etc($suj, 240);
$msg = nl2br($_POST['msg']);
$name = $_POST['name'];
$mail = $_POST['mail'];
$ib = trim($_POST['ib']);
$pdat = $_POST['postdat'];
$urlsrc = $_POST['urlsrc'];
if ($_POST['pub']) {
$re = 1;
}
if ($urlsrc) {
$mail = https($urlsrc);
}
$mail = utmsrc($mail);
if (!$ib) {
$ib = '/';
}
//!$_POST['sub'] or
if (!$name or $name == nms(38)) {
alert("empty_name {$name}");
$stoop = "ok";
}
if ($mail == "mail" or $mail == "url") {
$mail = '';
$urlsrc = '';
}
$msg = str_replace(array("<br />", "<br/>", "<br>", "<BR>"), "\n", $msg);
$msg = str_replace("\n", "", $msg);
$msg = str_replace("\r", "\n", $msg);
if (!$msg && $urlsrc) {
list($suj, $msg) = vacuum($mail, $suj);
}
$msg = html_entity_decode_b($msg);
$msg = embed_links($msg);
$msg = unescape($msg);
$msg = clean_br_lite($msg);
$msg = clean_punct($msg);
if ($pdat != date("y-m-d-H-i", $dayx) && $pdat) {
$rdat = explode('-', $pdat);
$pdt = mktime($rdat[3], $rdat[4], 0, $rdat[1], $rdat[2], $rdat[0]);
} else {
$pdt = $dayx;
}
if (empty($suj)) {
$suj = "forbidden title";
}
if (empty($msg)) {
alert('msg forbidden');
$stoop = 'ok';
}
if ($stoop == "") {
$msg = mysql_real_escape_string(stripslashes($msg));
$siz = strlen($msg);
$suj = mysql_real_escape_string(stripslashes($suj));
$frm = mysql_real_escape_string(stripslashes($frm));
$nid = msquery("INSERT INTO {$base} VALUES ('','{$ib}','{$name}','{$mail}','{$pdt}','{$qb}','{$frm}','{$suj}','{$re}','{$lu}','{$img}','{$kywk}','{$siz}')");
$nid = msquery("INSERT INTO {$qdm} VALUES ('{$nid}','{$msg}')");
}
if ($nid && $USE != $qb && $_SESSION["auth"] < 6) {
mail($_SESSION['qbin']["adminmail"], 'new article: ' . stripslashes($suj), '
' . host() . '/' . $nid . ',
auth_level: ' . $_SESSION["auth"] . "\n", 'From: ' . $USE);
}
if ($_SESSION['vacuum'][nohttp($urlsrc)]) {
unset($_SESSION['vacuum'][nohttp($urlsrc)]);
}
if ($nid) {
$_SESSION['rqt'][$nid] = array($pdt, stripslashes($frm), stripslashes($suj), '', $qb, '', '', '', $siz, $urlsrc, $ib, $re);
$msg = correct_txt($msg, $nid, 'savimg');
$exp_out = $nid;
$_GET['read'] = $nid;
deductions_from_read($nid, '');
$_POST = '';
}
$_SESSION['daya'] = $_SESSION['dayx'];
return $exp_out;
}
function preplink($lk)
{
$lk = nohttp($lk);
$pos = strpos($lk, '/');
if ($pos === false) {
$pos = strpos($lk, '.');
}
return substr($lk, 0, $pos);
}
