function statsrv_build($p, $o)
{
$dr = '/var/log/apache2';
//$f='error.log';
$f = 'access.log';
//$f='other_vhosts_access.log';
//$r=explore($dr); p($r);
//echo $d=file_get_contents($dr.'/'.$f,FALSE,NULL,100,1000);
$d = file_get_contents($dr . '/' . $f, NULL, NULL, 0, 10000);
/*$d='w41k.com:80 66.249.67.73 - - [11/Jun/2015:18:09:14 +0200] "GET /34758 HTTP/1.1" 403 505 "-" "Mozilla/5.0 (compatible; Googlebot/2.1; +http://www.google.com/bot.html)" [2] => w41k.com:80 85.170.69.142 - -';*/
$r = explode("\n", $d);
//p($r);
foreach ($r as $k => $v) {
//$ra=explode('-',$v);
$rb = explode(' ', $v);
//p($rb);
$ip = $rb[1];
$day = substr($rb[4], 1);
$pag = $rb[7];
$day = stsrv_date($day);
$day = mkday($day, 'ymdHis');
$ret[] = array($ip, $day, $pag);
//$ret[$ip][]=array($day,$pag);
}
pr($ret);
//
//echo count($ret);
return $ret;
}
function ifrim($f, $ret)
{
$dr = 'users/public/ifram/';
mkdir_r($dr);
write_file($dr . mkday('', 'ydmHis') . '.jpg', $ret);
return image($f);
}
function output_pages_from_cache($http, $otp)
{
$npg = $_SESSION['prmb'][6];
$page = $_SESSION['page'];
$min = ($page - 1) * $npg;
$max = $page * $npg;
if (is_array($otp)) {
foreach ($otp as $id => $nb) {
if (is_numeric($id)) {
$i++;
if ($i >= $min && $i < $max) {
$mg = $http . '/imgc/' . first_img($nb[3]);
if (is_link($mg)) {
$ret .= btn('imgl', image($mg, '', 50));
}
$ret .= bal('h2', lka($http . '/' . $id, $nb[2]));
$ret .= btn('txtx', $nb[1]) . ' ';
if (rstr(27)) {
$ret .= btn('txtsmall', mkday($nb[0], 1)) . ' ' . pub_link($nb[9]) . ' ';
}
if (rstr(25)) {
$ret .= btn('txtsmall', art_length($nb[8]));
}
$ret .= br() . br();
}
}
}
}
$n_pages = nb_page($i, $npg, $page);
return $n_pages . $ret . $n_pages;
}
function smsreader($r, $p, $o)
{
$o = '+' . $o;
foreach ($r as $k => $v) {
$numbr = $v[0] ? $v[0] : $v[1];
$numb = substr($numbr, 1);
$day = $v[2] . $v[3] . $v[4] . $v[5] . $v[6] . $v[7];
if ($v[7]) {
$time = mktime($v[5], $v[6], $v[7], $v[3], $v[4], $v[2]);
}
if ($v[0] && $v[0] == $o or $v[1] && $v[1] == $o) {
//szFromNumber
//$day=$v['uYear'].$v['uMonth'].$v['uDay'].$v['uHour'].$v['uMinute'].$v['uSecond'];
if ($time) {
$realday = mkday($time, 'ymd.hi');
}
$ret .= $day . br() . $v[8] . br() . hr();
$who = ($v[0] ? 'From' : 'To') . ':' . $numbr;
$rb[$time] = divc('panel', $who . ', ' . $realday . br() . divc('justy', $v[8]));
} else {
$rb[$time] .= lkc('', '/plugin/smsreader/' . $p . '/' . $numb, $numb) . ' ';
}
}
ksort($rb);
//p($rb);
$ret = implode(hr(), $rb);
//echo $ret;
return $ret;
}
function ummoay_build($p, $o)
{
req('art,tri,pop,spe');
reqp('msqarts');
$tmp = ummoay_template();
$r = req_arts_y($p);
$rtg = list_tags();
if ($r) {
foreach ($r as $k => $v) {
list($id, $day, $msg, $cat, $tag, $lk) = $v;
$day = clean_day_tw($day);
$msg = format_txt($msg, '', '');
$lnk = lka(urlread($id));
$pop = lj('', 'popup_trckpop___' . $id, picto('forum', 16));
$rb[$day] = array('suj' => $cat, 'day' => mkday($day, 'Y/m/d'), 'msg' => $msg, 'url' => $lk, 'open' => popart($id, 'articles') . ' ' . $pop, 'tag' => $rc = $rtg[$id]);
}
}
krsort($rb);
foreach ($rb as $k => $v) {
$rd[nms(100)] .= template_build($tmp, $v);
$rc = $v['tag'];
if ($rc) {
foreach ($rc as $kb => $vb) {
$rd[$kb] .= template_build($tmp, $v);
}
}
}
return make_tabs($rd);
}
function ftext_j($n, $b, $res)
{
$nd = stext_log();
$rb = ajxr($res);
$ra = array(mkday(), html_entity_decode_b($rb[0]));
//p($ra);
msql_modif('users', $nd . '_txt_' . $n, $ra, '', 'one', 1);
return btn('txtyl', 'ok');
}
function msqadd_j($p, $o, $res)
{
list($p, $msg) = ajxp($res, $p, $o);
$dfb['_menus_'] = array('day', 'text');
$nod = ses('qb') . '_msqadd_' . $p;
if ($msg) {
$rb = array(mkday(), $msg);
}
//if($rb)$r=msql_modif('users',$nod,$rb,$dfb,'push','');
if ($rb) {
$r = modif_vars('users', $nod, $rb, 'push', $dfb);
}
$bt = msqlink('users', $nod);
return lj('popbt', 'plugmsqadd_plug___msqadd_msqadd*read_' . ajx($p), 'reload') . ' ' . $bt;
}
function chatread($p)
{
$nm = ses('muse');
$c = 'txtsmall';
$r = chatdata($p);
if ($r) {
$r = array_reverse_b($r, 50);
foreach ($r as $k => $v) {
$erz = '';
$msg = $v[2];
if ($nm == $v[1] or auth(6)) {
$erz = lj($c, 'cht' . $p . '_chat___chaterz_' . $p . '_' . $k, '(x)');
}
$bt = btn('popbt', $v[1]) . ' ' . btn($c . '2', mkday($v[0], 'dhi')) . $erz . br();
if (!function_exists('miniconn')) {
req('tri,pop,spe');
}
$msg = miniconn($msg);
$ret .= divc('track', $bt . $msg);
}
}
return scroll($r, $ret, 7);
}
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 book_read($id, $rid)
{
bk_rq();
curwidth_set($_SESSION['prma']['content'] - 60);
//[120:setwidth]
$p['back'] .= book_prevnxt($id, $rid);
$p['id'] = $id;
$r = pecho_arts($id);
$p['date'] = mkday($r[0], 1);
$p['title'] = $r[2];
$p['opt'] = $r[1];
$p['tag'] = $r[5];
$p['length'] = art_length($r[8]);
//$p['length'].=' '.lka(urlread($id),picto('articles'));
$p['length'] .= ' ' . popart($id);
$msg = sql('msg', 'qdm', 'v', 'id=' . $id);
$msg = format_txt($msg, 'nlb', $id);
$p['player'] = book_pages($id, $rid);
$p['msg'] = scroll_c($msg, $rid);
$ret .= template($p, 'book');
$_SESSION['cur_div'] = 'content';
//setwidth in template
return $ret;
}
function troc_create_obj($rid, $idx, $res)
{
$obj = ajxg($res);
//p($r);
$r = troc_array_obj();
unset($r['id']);
foreach ($r as $k => $v) {
$r[$k] = '';
}
$r['user'] = ses('USE');
$r['obj'] = $obj;
$r['day'] = mkday();
$r['state'] = 1;
//p($r);
if ($obj) {
$id = insert('obj', mysqlra($r));
}
//if(!$id)return 'error';
return troc_edit($id, $rid);
}
function make_form($d, $div, $jx)
{
$prod = explode(",", $d);
$n = count($prod);
for ($i = 0; $i < $n; $i++) {
list($val, $type) = explode("=", $prod[$i]);
$vb = normalize($val);
if ($type == 'check') {
$chk = 'chk' . $ia++;
$hn[] = $chk;
} elseif ($type != 'button') {
$hn[] = $vb;
}
switch ($type) {
case 'text':
$ret .= txarea('" id="' . $vb, '', 44, 8);
break;
case 'check':
$ret .= checkbox($chk, 'no', '', '');
break;
case 'hidden':
$ret .= hidden('', $vb, $val);
break;
case 'uniqid':
$ret .= hidden('', $vb, ses('iq'));
break;
case 'hidden':
$ret .= balise("input", array(1 => $type, 3 => $vb, 4 => $val), '');
break;
case 'list':
//$ret.=balise("select",array(3=>$vb),batch_defil(array_flip(explode("/",$val))));
$ret .= select(atd($vb), explode('/', $val), 'vv');
break;
case 'radio':
$rb = explode("/", $val);
$ret .= radiobtn($rb, $vb, $val) . br();
break;
case 'date':
$ret .= hidden('', $vb, mkday('', 'ymd.his'));
break;
case 'upload':
$ret .= balise('input', array(1 => 'text', 3 => $vb, 4 => 'url'), '');
break;
case 'button':
$btn = $val;
break;
case 'mail':
$ret .= balise('input', array(1 => 'text', 3 => $vb, 6 => 20, 23 => $val, 21 => 'num_mail(\'' . $vb . '\');'), '');
break;
default:
$ret .= autoclic($val . '" id="' . $vb, '', 20, 255, '');
break;
}
if ($type != 'button' && $type != 'date' && $type != 'hidden' && $type != 'uniqid' && $type != 'radio') {
$ret .= ' ' . label($vb, 'txtsmall2', '', $val) . br();
}
}
$ret .= lj("popsav", $div . $jx . implode('|', $hn), $btn ? $btn : picto('right'));
return divd($div, $ret);
}
function admin_articles($r)
{
$ye = btn('" style="color:green;', picto('true')) . ' ';
$no = btn('" style="color:#bd0000;', picto('false')) . ' ';
foreach ($_GET as $ka => $va) {
$goto .= $ka . '=' . $va . '&';
}
$goto .= 'publish=';
foreach ($r as $id => $va) {
$cid = '&art=' . $id . '#' . $id;
foreach ($va as $k => $v) {
switch ($k) {
case "id":
$v = '<a name="' . $v . '"></a>' . lkt("", '/?read=' . $id, $v);
break;
case "day":
$v = mkday($v, 1);
break;
case "suj":
$v = lj('', 'popup_editbrut___' . $id, $v);
break;
case "img":
$v = "";
break;
case "re":
if ($v) {
$v = lkc("", '/?' . $goto . 'off' . $cid, $ye);
} else {
$v = lkc("", '/?' . $goto . 'on' . $cid, $no);
}
break;
case "host":
$v = art_lenght($v);
break;
}
$ret[$id][$k] = $v;
}
}
return $ret;
}
function edit_css()
{
$base = "msql/design/";
$basy = "msql/system/";
clrpckr_js();
$qb = ses('qb');
$lh = sesmk('csslang');
$defsb["_menus_"] = array("div", "class", "element", "color", "bkg", "border", "free");
$edit = $_GET["edit_css"] ? $_GET["edit_css"] : $_POST["edit_css"];
if (!$_SESSION['desgn']) {
$_SESSION['desgn'] = $_SESSION['prmd'];
}
$numb = $_GET["desgn"];
//desgn
if ($numb && $numb != "=") {
$_SESSION['desgn'] = $numb;
$_SESSION['clrset'] = $numb;
$_SESSION['prmd'] = $numb;
$_SESSION['clrs'][$numb] = msql_read('design', $qb . '_clrset_' . $_SESSION['clrset'], '');
$defs = read_vars($base, $qb . '_design_' . $_SESSION['desgn'], $defsb);
}
$desgn = $_SESSION['desgn'];
$prmd = $_SESSION['prmd'];
$clrset = $_SESSION['clrset'] = $_SESSION['clrset'] ? $_SESSION['clrset'] : $prmd;
$f_dsn = $qb . '_design_' . $desgn;
$f_clr = $qb . '_clrset_' . $clrset;
$basecss = 'css/' . $f_dsn . '.css';
$basecss_temp = 'css/' . $qb . '_design_dev_' . $prmd . '.css';
#load
if (!$defs) {
$defs = read_vars($base, $f_dsn, $defsb);
}
unset($defs['_menus_']);
//good_nb
unset($defs[0]);
$defs = reorder_keys($defs);
if (!is_file($basecss_temp)) {
build_css($basecss_temp, $defs);
}
#sav
if ($nd = $_GET["newdiv"]) {
$defs = defs_addnew($defs, $_GET["from"], array($nd, '', '', '', '', '', ''));
//p($defs);
save_vars($base, $f_dsn, $defs);
$edit = find_value($defs, array($nd));
}
if ($_GET["new_from"]) {
$tbn = msq_find_last('design', $qb, 'design');
save_vars($base, $qb . '_design_' . $tbn, $defs);
msq_copy('design', $f_clr, 'design', $qb . '_clrset_' . $tbn);
//msq_copy('design',$qb.'_blocks_'.$desgn,'design',$qb.'_blocks_'.$tbn);
$_SESSION['clrs'][$tbn] = $_SESSION['clrs'][$_SESSION['desgn']];
$_SESSION['desgn'] = $_SESSION['clrset'] = $tbn;
$f_dsn = $qb . '_design_' . $tbn;
$f_clr = $qb . '_clrset_' . $tbn;
msql_modif('users', 'public_design', dsnam_arr(desname($qb, $desgn)), '', 'one', $tbn);
build_css('css/' . $qb . '_design_dev_' . $tbn . '.css', $defs);
}
if ($_GET["make_public"]) {
if ($_GET["inform"]) {
$tbn = $desgn;
} else {
$tbn = msq_find_last('design', 'public', 'design');
}
save_vars($base, 'public_design_' . $tbn, $defs);
msq_copy('design', $f_clr, 'design', 'public_clrset_' . $tbn);
msql_modif('users', 'public_design', dsnam_arr(desname($qb, $desgn)), '', 'one', $desgn);
build_css('css/public_design_' . $tbn . '.css', $defs);
alert('created: public_design_' . $tbn);
}
if ($_GET["make_admin"]) {
build_css('css/_admin.css', $defs);
save_vars($basy, 'default_css_3', $defs);
alert('modified: system/default_css_3, _admin.css');
}
if ($_GET["make_global"]) {
build_css('css/_global.css', $defs);
save_vars($basy, 'default_css_1', $defs);
msq_copy('design', $f_clr, 'system', 'default_clr_1');
alert('modified: system/default_css_1, _global.css');
}
if ($_GET["make_default"]) {
build_css('css/_classic.css', $defs);
save_vars($basy, 'default_css_2', $defs);
msq_copy('design', $f_clr, 'system', 'default_clr_2');
$defse = empty_design($defs, 'clr');
build_css('css/_default.css', $defse);
alert('modified: table system/default_css_2, _classic.css, _default.css (no colors)');
}
//clrset
if ($_GET["clrset"]) {
$_SESSION['clrset'] = $clrset = $_GET["clrset"];
$f_clr = $qb . '_clrset_' . $clrset;
$_SESSION['clrs'][$prmd] = msql_read('design', $f_clr, '');
build_css($basecss_temp, $defs);
}
//import_clrset
if ($_GET["import_clrset"]) {
$_SESSION['clrs'][$prmd] = explode("_", $_GET["import_clrset"]);
if ($_SESSION["auth"] >= 6) {
save_clr($qb . '_' . $clrset);
}
}
if ($_GET["add_clrset"]) {
save_clr($qb . '_' . $_GET["clrset"]);
}
//reset
if ($_GET["reset_clr"] or $_GET["add_design"]) {
$_SESSION['clrs'][$prmd] = msql_read('system', "default_clr_2", '');
save_clr($f_clr);
}
if ($_GET["reset_default"] or $_GET["add_design"]) {
$defs = css_default();
unset($defs['_menus_']);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($_GET["reset_global"] or $_GET["add_design"]) {
$defs = css_default(1);
unset($defs['_menus_']);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
//public
if ($pub = $_GET["public_clr"]) {
$_SESSION['clrs'][$prmd] = msql_read('design', 'public_clrset_' . $pub, '');
save_clr($f_clr);
}
if ($pub = $_GET["public_design"]) {
$defs = msql_read('design', 'public_design_' . $pub, '');
unset($defs['_menus_']);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
//null
if ($_GET["empty_design"]) {
$defs = empty_design($defs, 'css');
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($pub = $_GET["null_clr"]) {
$_SESSION['clrs'][$prmd] = array('', '', '', '', '', '', '', '');
save_clr($f_clr);
}
if ($pub = $_GET["null_design"]) {
$defs = css_default();
$defs = empty_design($defs, 'css');
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
//append
if ($_GET["append"]) {
$defsc = css_default();
unset($defsc['_menus_']);
$defs = array_append($defs, $defsc);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($_GET["append_global"]) {
$defsc = css_default();
unset($defsc['_menus_']);
$defs = array_append($defs, $defsc);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($_GET["inject_global"]) {
$defsc = css_default();
unset($defsc['_menus_']);
$defs = append_design($defs, $defsc);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($_GET["reset_this"]) {
$ec = $_GET["edit_css"];
$defsc = css_default();
$ecb = find_value($defsc, $defs[$ec]);
if ($ecb) {
$defs[$ec] = $defsc[$ecb];
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
}
//restore_design
if ($_GET["restore"] == "design") {
$defs = read_vars($base, $f_dsn . '_sav', $defsb);
unset($defs['_menus_']);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
//restore_clrset
if ($_GET["restore"] == "clrset") {
$r = read_vars($base, $f_clr . '_sav', '');
foreach ($r as $k => $v) {
$clrst[] = $v[0];
}
$_SESSION['clrs'][$prmd] = $clrst;
save_clr($f_clr);
build_css($basecss_temp, $defs);
}
//herits
if ($_GET["herit_desgn"]) {
list($qbb, $nbd) = explode('_', $_GET["herit_desgn"]);
$defs = read_vars($base, $qbb . '_design_' . $nbd, $defsb);
//$_SESSION['clrs'][$desgn]=msql_read("design",$qbb.'_clrset_'.$nbd,'');
//save_clr($f_clr);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
if ($_GET["herit_clrset"]) {
list($qbb, $nbd) = explode('_', $_GET["herit_clrset"]);
$_SESSION['clrs'][$desgn] = msql_read("design", $qbb . '_clrset_' . $nbd, '');
save_clr($f_clr);
build_css($basecss_temp, $defs);
}
//ff
if ($_GET['addff']) {
$defs = defs_adder_ff($defs);
save_vars($base, $f_dsn, $defs);
build_css($basecss_temp, $defs);
}
//save//add
if ($_POST["save"] or $_GET["save_img"] or $_GET["save"]) {
$defs = save_defs($base, $f_dsn, $defs, $defsb["_menus_"]);
build_css($basecss_temp, $defs);
if ($_POST["saveblocks"] or $_GET["save"]) {
build_css($basecss, $defs);
}
}
if ($_GET["invert_clr"]) {
$_SESSION['clrs'][$prmd] = invert_defsclr();
save_clr($f_clr);
build_css($basecss_temp, $defs);
}
//sav
if ($_GET["erase"]) {
$defs = save_css_j_del($defs, $_GET["erase"]);
save_vars($base, $f_dsn, $defs);
}
if ($_GET["newfrom"]) {
$defs = save_css_newfrom($defs, $_GET["newfrom"]);
//if($newdiv=$_GET["newdiv"])$defs[$edit]=array($newdiv);
save_vars($base, $f_dsn, $defs);
}
if ($_GET["atpos"]) {
$n = count($defs);
$defs = save_css_displace($defs, $_GET["atpos"], $_POST["pos"]);
if (count($defs) == $n) {
save_vars($base, $f_dsn, $defs);
}
}
if ($_GET['sav']) {
save_vars($base, $f_dsn . '_sav', $defs, 1);
save_clr($f_clr);
}
//_sav
if ($_GET["apply"]) {
save_vars($base, $f_dsn, $defs);
save_clr($f_clr);
build_css($basecss, $defs);
informe_config_design();
}
//informe_config_width($defs);
//build_css
if ($_GET["build_css"]) {
build_css($basecss_temp, $defs);
}
#body
$go = '/?admin=css';
$ret .= lkc("txtcadr", $go, $f_dsn) . ' ';
$ret .= msql_desnam($qb, $desgn, '') . "\n";
$ret .= hlpbt('design') . ' ';
$ret .= msqlink('design', $qb . '_design_' . $desgn) . ' ';
$ret .= lkc('popsav', "/?admin=console&exit_design==", pictxt('logout', nms(112)));
//$ret.=lj('popbt','page_deskbkg','desk').lj('popbt','popup_site___desktop_ok__autosize','site');
//icon('exit')
$ret .= br() . br();
if (prmb(5)) {
$ret .= picto(alert) . helps('prmb5') . br() . br();
}
//$ret.=btn_switch('desgn',$prmd,'/?admin=css','live_edit');
$ret .= see_conds_b() . ' ';
//$ret.=lkc('txtx','/?admin=css&apply==cr_mod==','create conditionnal design').' ';
$ret .= hlpbt('designcond') . br() . br();
$ret .= btn("txtsmall", "save:") . ' ';
$ret .= lkc('txtx', $go . '&sav==', "backup") . ' ';
if ($_SESSION['prmd'] != $_SESSION['desgn']) {
$ret .= lkc('txtx', $go . '&apply==', 'test design ' . $desgn) . ' ';
}
$ret .= lkc('txtx', $go . '&apply=save', nms(66) . ' (mods:' . prmb(1) . ')') . ' ';
$ret .= lkc("popsav", $go . '&save==', nms(57)) . ' ';
//$ret.=lkc("txtx",$go.'&save_inverted==','black').' ';
$ret .= br();
$ret .= btn("txtsmall", nms(111)) . ' ';
//select
$ret .= lj("txtbox", 'popup_styls___select', 'design:' . $desgn . '/clrset:' . $clrset) . ' ';
$ret .= lj('txtx', 'popup_styls___herit', $lh[3]) . ' | ';
//herit
$ret .= lkc('txtx', $go . '&build_css==', nms(93)) . ' | ';
//rebuild
//$ret.=lkc('txtx',$go.'&build_css==&cmpq==',"cmpq").' ';
$ret .= lj('txtx', 'popup_stylsff___1', '@font-face') . br();
$ret .= btn("txtsmall", nms(113)) . ' ';
//make
$ret .= lkc('txtx', $go . '&new_from==', nms(44)) . ' ';
$ret .= lkc('txtx', $go . '&empty_design==', nms(46)) . ' ';
$ret .= lkc('txtx', $go . '&invert_clr==', nms(115)) . ' ';
$ret .= lkc('txtx', $go . '&make_public==', $lh[4]) . ' ';
//make_public
$ret .= lkc('txtx', $go . '&make_public==&inform==', $lh[5]) . ' ';
//inform_public
if ($_SESSION['auth'] > 5) {
$r = msql_read('users', $qb . '_design', $desgn);
$desgname = $r[0] ? $r[0] : $r['name'];
if ($desgname == 'admin') {
$make = 'make_admin';
} elseif ($desgname == 'global') {
$make = 'make_global';
} else {
$make = 'make_default';
}
$ret .= lkc('txtbox', $go . '&' . $make . '==', $make);
}
$ret .= br();
$ret .= btn("txtsmall", nms(95)) . ' ';
//restore
if (is_file($base . $f_dsn . '_sav.php')) {
$ret .= lkc('txtx', $go . '&restore=design', 'design') . ' ';
}
//restore
$ret .= lkc('txtx', $go . '&restore=clrset', 'clr') . ' | ';
$ret .= lkc('txtx', $go . '&reset_default==', nms(96)) . ' ';
//defaults
$ret .= lkc('txtx', $go . '&reset_clr==', "clr") . ' | ';
$ret .= lkc('txtx', $go . '&reset_global=1', "global") . ' ';
$ret .= lkc('txtx', $go . '&public_clr=1', "clr") . ' | ';
$ret .= lkc('txtx', $go . '&public_design=2', "public") . ' ';
//public
$ret .= lkc('txtx', $go . '&public_clr=2', "clr") . ' | ';
$ret .= lkc('txtx', $go . '&null_design==', "null") . ' ';
$ret .= lkc('txtx', $go . '&null_clr==', "clr") . br();
$ret .= btn("txtsmall", nms(92)) . ' ';
//append
$ret .= lkc('txtx', $go . '&append==', nms(96)) . ' ';
//default
$ret .= lkc('txtx', $go . '&append_global==', "global") . ' ';
$ret .= lkc('txtx', $go . '&inject_global==', $lh[9]) . br();
//inject_globals
$ret .= btn("txtsmall", nms(45)) . ' ';
//see
$ret .= lkt('txtx', $basecss, $lh[10]) . ' ';
$ret .= lkt('txtx', $basecss_temp, $lh[11]) . ' ';
//$ret.=lkt('txtx',$f_clr,"clr").' ';
$ret .= lj('txtx', 'popup_styls___clr', "clrset") . ' ';
$ret .= btn('txtx', count($defs) . ' ' . nms(117)) . ' ';
$ret .= btn('txtx', mkday(filemtime($base . $f_dsn . '.php'))) . ' ';
$ret .= br() . br();
$ret .= f_inp_clr_manage_j() . br();
//colors
//plugin('csswidth'); $ret.=f_inp_widths($defs);//widths
if ($defs) {
$ret .= f_inp_plugs($defs, $defsb["_menus_"], $edit, 1) . br() . br();
}
//edit_css
return $ret;
}
function pet_read($r, $nba, $page)
{
$limit = ($page - 1) * $nba;
$nbr = pet_count_valid($r);
$ret = str_replace('_NB', $nbr, pet_hlp('actually')) . br() . br();
$head = $r['_menus_'];
unset($r['_menus_']);
krsort($r);
$id = $_SESSION['read'];
//$head=explode(',',pet_hlp('entries'));
$datas[] = array('date', $head[0], $head[3], $head[4]);
foreach ($r as $k => $v) {
if ($v[6] == 1) {
$i++;
if ($v[2]) {
$name = lkt('', $v[2], $v[0]);
} else {
$name = $v[0];
}
if ($i > $limit && $i <= $limit + $nba) {
$datas[] = array(mkday($k), $name, $v[3], $v[4]);
}
}
}
if ($nbr > $nba) {
$nbp = ceil($nbr / $nba);
if ($nbp > 1) {
for ($i = 1; $i <= $nbp; $i++) {
$aff[$i] = $i;
}
}
$pages = slctmenusj($aff, 'pet' . $id . '_plug___petition_pet*j_' . $nba . '|' . $id . '|', $page, ' ');
}
if ($_GET['read'] == $id && $id) {
$ret .= make_table($datas, 'popbt', '') . br() . $pages . br() . br();
}
return $ret;
}
function chatxread($p, $r)
{
$c = 'txtsmall';
$nm = ses('muse');
$use = ses('USE');
if ($r) {
foreach ($r as $k => $v) {
$erz = '';
$ml = '';
$msg = $v[2];
if ($use && ($v[1] == $nm or $p == $use)) {
$erz = lj($c, 'chtx' . $p . '_plug___chatxml_chatxsav_' . $p . '_' . $k, picto('sclose'));
}
if (strchr_b($v[3], '/') == $use) {
$ml = lj('popbt', 'popup_plug___chatxml_chatxinvitx_' . $p . '_' . ajx($v[3]), '@') . '';
}
$bt = lkt('popbt', 'http://' . $v[3], $v[1]) . ' ' . btn($c . '2', mkday($v[0], 'ymd:hi'));
$msg = correct_txt(html_entity_decode($msg), '', 'sconn');
$msg = miniconn($msg, strdeb($v[3], '/'));
$ret .= divc('track', $ml . $bt . $erz . br() . nl2br(stripslashes($msg)));
}
}
return $ret;
}
function cache_html($read)
{
if (!is_dir('cache')) {
mkdir('cache');
}
$f = 'cache/' . $read . '_' . mkday() . '.txt';
// or $_SESSION['USE']
if (!is_file($f) or $_GET['rebuild_cachart']) {
$out = build_blocks();
$rout = implode('', $out);
write_file($f, $rout);
return $rout;
} else {
return read_file($f);
}
$f = 'cache/' . $read . '_' . mkday(calc_date(1)) . '.txt';
if (is_file($f)) {
unlink($f);
}
}
function save_track($msg, $id, $name, $mail)
{
$pdt = time();
$iq = hostname();
//ses('iq');
if (is_numeric($id) or substr($id, 0, 4) == 'wall') {
$local = true;
}
if (!$msg) {
return;
}
// btn('popdel','bruuu! '.helps('empty_msg'));
req('sav');
$qb = $_SESSION['qb'];
$base = $_SESSION['qdi'];
$_GET['idy'] = 'ok';
$_GET['insert'] = 'ok';
$_POST['name'] = $nm;
$_POST['msg'] = $msg;
if (!rstr(2) or auth(4)) {
$op = 1;
} else {
$op = 0;
}
$here = host() . '/?read=' . $id;
$msg = str_replace(":chat", "", $msg);
$msg = repair_latin($msg);
$msg = embed_links($msg);
//$amsg=mysql_real_escape_string(stripslashes($msg));
$values = array($ib, $name, $mail, $pdt, $qb, $id, $suj, $msg, $op, $ip);
//,'','',''
$nread = insert('qdi', mysqlra($values));
$suj = $local ? suj_of_id($id) : nms(84);
$nmsg = lka($here . '#trk' . $nread, $local ? helps('trackmail') : nms(84)) . br() . br();
$nmsg .= nms(68) . ': ' . $name . ', ' . mkday($pdt) . br() . br() . format_txt($msg, '', '');
$admail = $_SESSION['qbin']['adminmail'];
//to_admin
if ($name != $_SESSION['USE']) {
send_mail_html($admail, $suj, $nmsg, $mail, urlread($id));
}
if ($local) {
$rmails = sql('mail', 'qdi', 'k', 'frm="' . $id . '" AND re>="1"');
}
//deploy
$kem = sql('name', 'qda', 'v', 'id="' . $id . '"');
//send_to_author
if ($kem != $name) {
$kmail = sql('mail', 'qdu', 'v', 'name="' . $kem . '"');
if ($admail != $kmail) {
$rmails[$kmail] = 1;
}
}
//send_track_to_user
if ($rmails && $op == 1) {
send_mail_r(array_keys_b($rmails), 'html', $suj, $nmsg, $mail, $id);
}
if (!$local) {
return popup(nms(34), divc('', helps('formail')), '');
}
return tracks_read($nread, '', '');
}
function pub_art($id, $tpl = '')
{
$rst = $_SESSION['rstr'];
list($day, $frm, $suj, $amg, $nod, $thm, $lu, $re) = pecho_arts($id);
$panout['url'] = urlread($id);
$panout['suj'] = $suj;
$panout['jurl'] = 'content_ajxlnk2__2_read_' . $id;
$panout['purl'] = 'popup_popart__3_' . $id . '_3';
if ($rst[32] != 1 && $amg) {
$panout['img1'] = first_img($amg);
}
if ($rst[36] != 1) {
$panout['back'] = art_back($id, $ib, $frm);
$panout['cat'] = $frm;
}
if ($rst[7] != 1) {
$panout['date'] = mkday($day);
}
if ($rst[4] != 1) {
$r = tag_maker($id, 1);
if ($r) {
$panout += $r;
}
}
if (!$tpl) {
if ($rstr[8]) {
$tpl = 'pubart';
} else {
$tpl = 'pubart_j';
}
}
if ($re) {
return divc('pubart', template($panout, $tpl));
}
}
function fav_art($id, $rtg = '')
{
$im = minimg(sql('img', 'qda', 'v', 'id=' . $id), 'h');
$day = sql('day', 'qda', 'v', 'id=' . $id);
$dat = mkday($day) . ' ';
if ($rtg) {
$tag = fav_tag_maker($rtg) . ' ';
}
//$del=plugin('like',$id,1).' ';
$suj = bal('h4', suj_of_id($id) . ' ');
if ($id) {
return divc('txtcadr', $im . $dat . $tag . $del . lj('', 'popup_popart__3_' . $id . '_3', $suj));
}
}
function fi_finfo($d, $id, $f, $dj)
{
$ra = explode('/', $d);
$nm = strrchr_b($f, '/');
$ret .= lkt('popw" title="' . $f, $f, picto('url') . ' ' . $nm) . br();
if (!auth(4)) {
$ret .= lkc('', 'plug/download.php?file=' . $f, fi_pic('download'));
} elseif ($ra[0] == $_SESSION['qb']) {
$ret .= fi_info_shared($d, $id) . ' ';
$ret .= blj('', $id . 'firnm', 'fifunc___fi*rename_' . $dj, fi_pic('rename')) . ' ';
$ret .= blj('', $id . 'fidel', 'fifunc___fi*del_' . $dj, fi_pic('delete')) . ' ';
} else {
$ret .= blj('', $id . 'fidwn', 'fifunc___fi*download_' . $dj, fi_pic('download')) . ' ';
}
if (substr(fi_droot(), 0, 4) == 'http') {
$size = fi_info_dist($f, 'fsize');
$date = mkday(fi_info_dist($f, 'fdate'));
} else {
$date = ftime($f, 'ymd');
$size = fsize($f);
}
$ret .= btn('txtsmall2', $size . ' ' . $date . ' ' . strprm($d));
return $ret;
}
function sun_menu($p, $o, $rid)
{
$ret = input(1, 'inp', $p ? $p : mkday('', 'ymdHis'), '') . ' ';
$ret .= lj('', $rid . '_plug__2_sun_sun*j___inp', picto('reload')) . ' ';
return $ret;
}
