function flux_sitmap($r)
{
foreach ($r as $k => $v) {
//0=day 1=frm 2=suj 3=img 4=nod 5=tag 6=lu 7=re
$url = 'http://' . $_SERVER['HTTP_HOST'] . htacc('read') . $k;
$date = date("Y-m-d", $v[0]);
$freq = 'never';
$prio = '';
if ($v[11] == 4) {
$prio = 1;
} elseif ($v[11] == 3) {
$prio = 0.8;
} elseif ($v[11] == 2) {
$prio = 0.5;
} elseif ($v[11] == 1) {
$prio = 0.2;
}
$xml .= node_build('url', $url, $date, $freq, $prio);
}
return $xml;
}
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 tracks_read($id, $page = '', $n = '')
{
$USE = $_SESSION['USE'];
$qb = $_SESSION['qb'];
$read = $_SESSION['read'];
$ip = hostname();
$panout['css'] = 'track';
$panout['sty'] = 'margin:8px 0;';
if ($id) {
$panout['id'] = $id;
list($ib, $name, $mail, $day, $nod, $frm, $suj, $msg, $re, $lu, $img, $thm, $host) = sql('ib,name,mail,day,nod,frm,suj,msg,re,lu,img,thm,host', 'qdi', 'r', 'id=' . $id);
}
$panout['date'] = mkday($day, 'y/m/d H:i');
//time_ago($day);
$panout['edit'] .= lj('', 'popup_track___' . $read . '_[' . $id . ':track]', picto('get')) . ' ';
if ($re == "0" && $host == $ip) {
$panout['sty'] .= 'opacity:0.5;';
$panout['edit'] .= btn('txtsmall', helps('trackbacks')) . ' ';
}
if ($_GET['admin']) {
$purl = '/?admin=' . $_GET['admin'];
}
if ($_GET['read']) {
$purl = '/?read=' . $_GET['read'];
}
if ($host == $ip && $_SESSION['dayx'] - $day < 600 or auth(6)) {
//redit
$panout['edit'] .= lj('', 'popup_trkedit___' . $id, picto('edit')) . ' ';
}
$sender = rse("id", $_SESSION['qdu'] . ' WHERE name="' . $name . '"');
if ($sender) {
$panout['author'] = lj('', 'popup_track___' . $name, $name);
} elseif ($mail != 'mail') {
$panout['author'] = lj('', 'popup_plupin___mail_' . $mail, $name);
} else {
$panout['author'] = $name;
}
if (substr($suj, 0, 4) != "hide" or $_GET['idy_show'] == $id) {
$state = "hide";
$f = 'imgb/avatar_' . $name . '.gif';
//avat
if (is_file($f)) {
$panout['avatar'] .= image($f, 48, 48, ats('vertical-align:bottom;'));
}
if ($re != "0" or auth(3) or $host == $ip) {
//$msg=format_txt($msg,'','');
$msg = correct_br($msg);
$msg = miniconn($msg);
$msg = correct_txt($msg, '', 'sconn');
$msg = embed_p($msg);
$msg = nl2br($msg);
} else {
$msg = divc('txtalert', helps('trackbacks'));
}
} else {
$state = 'show';
$msg = '';
}
if (auth(4) && $frm != $qb) {
$j = 'trk' . $id . '_plug___tracks_trk*publish_' . $id;
if ($re != 1) {
$panout['edit'] .= lj('txtyl', $j . '_on', nms(29)) . ' ';
} else {
$panout['edit'] .= lj('', $j . '_off', offon(0)) . ' ';
}
}
if ((auth(4) or $USE == $name) && ($re == 0 or auth(6))) {
$panout['edit'] .= lj('" title="' . nms(43), 'trk' . $id . '_call___sav_edit*tracks__' . $id . '', picto('trash')) . ' ';
}
$panout['msg'] = stripslashes($msg);
if (substr($n, 0, 2) == "nl") {
$http = host() . '/';
}
$panout['url'] = $http . htacc('read');
return template($panout, 'tracks');
}
function prevnext_art($b, $t, $o)
{
$ra = explode("|", $t);
$htacc = htacc('read');
$id = $_SESSION['read'];
$ta = $ra[0] ? $ra[0] : callico('kleft');
$tb = $ra[1] ? $ra[1] : callico('kright');
if ($_SESSION['rqt']) {
krsort($_SESSION['rqt']);
foreach ($_SESSION['rqt'] as $k => $v) {
if ($b == "rub") {
if ($v[1] == $_SESSION['frm']) {
$r[] = $k;
}
} else {
$r[] = $k;
}
}
}
if ($r) {
$rb = array_flip($r);
}
if (!$rb[$id]) {
$dt = sql('day', 'qda', 'v', 'id=' . $id);
$w = 'nod="' . ses('qb') . '" AND substring(frm,1,1)!="_" AND day>' . ($dt - 86400) . ' AND day<' . ($dt + 86400) . ' ORDER BY ' . prmb(9);
$r = sql('id', 'qda', 'rv', $w);
}
if ($r) {
foreach ($r as $k => $v) {
if ($v == $id) {
$k1 = $r[$k + 1] ? $r[$k + 1] : "";
$k2 = $r[$k - 1] ? $r[$k - 1] : "";
$prnx = array($k1, $k2, $v);
}
}
}
$prevnext .= lkc($prnx[0] ? '' : 'hide', $htacc . ($prnx[0] ? $prnx[0] : $prnx[2]), $ta) . ' ';
$prevnext .= lkc($prnx[1] ? '' : 'hide', $htacc . ($prnx[1] ? $prnx[1] : $prnx[2]), $tb);
if ($prevnext) {
return btn('nb_pages ' . ($o ? $o : 'right'), $prevnext);
}
}
function prep_host($nod)
{
if ($_SESSION['sbdm']) {
return subdom($nod);
} else {
return host() . htacc('id') . $nod;
}
}
