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 plug_microform($p, $id)
{
$rid = 'mfr' . randid();
//echo $p.'-'.$id;
$nod = ses('mform', ses('qb') . '_microform_' . $id);
req('pop');
ses('mformj', $rid . '_plug___microform_plug*microform_' . ajx($p) . '_' . $id);
reqp('msql');
$msq = new msql('', $nod);
//table
list($p, $tp) = explode('§', $p);
$rb = mform_mr($p);
//p($rb);
$msq->create($rb);
$ret .= make_form($p, 'mfr' . $id, '_plug___microform_mform*j_' . ajx($p, '') . '_' . $id . '_') . br();
if (auth(4)) {
$ret .= msqlink('users', ses('mform')) . ' ' . btn('txtsmall2', $nod) . ' ';
}
if ($tp == 1) {
$ret .= mform_read($id);
} elseif ($tp) {
$ret .= plugin('msqtemplate', $nod, $tp);
}
return divd($rid, $ret . $bt);
}
function operations_build($p, $o)
{
reqp('mysql');
//$ret=$p.'-'.$o;
//$r=plugin('mysql',$p,$o); p($r);
$msq = new mysql('qda');
//echo $msq->b;
$msq->read('id,day', 'kv', 'frm="oaxiiboo 6" order by day ASC');
$r = $msq->ret;
setlocale(LC_ALL, "fr_FR");
$dr = array('jan' => 'jan', 'fev' => 'feb', 'mars' => 'mar', 'avr.' => 'apr', 'mai' => 'may', 'juin' => 'jun', 'juil' => 'jul', 'août' => 'aug', 'sept' => 'sep', 'oct' => 'oct', 'nov' => 'nov', 'déc' => 'dec');
foreach ($r as $k => $v) {
$nb++;
//14.12.28 00.50 (122)
//$suj=date('y.m.d H.i',$v).' ('.$nb.')';
//20:41 - 19 juin 2015
$suj = date("H:i - d M Y", $v);
//$suj=strftime("%R - %e %b %G",$v);
//$suj=date('H:i - d m Y',$v).' ('.$nb.')';
$suj = strtolower($suj);
$suj = str_replace(array_values($dr), array_keys($dr), $suj);
$suj .= ' (' . $nb . ')';
echo $suj . br();
//$msq->update('suj',$suj,'id',$k);
}
//p($r);
return $ret;
}
function plug_deploy($deploy)
{
$qb = $_SESSION['qb'];
$USE = $_SESSION['USE'];
$raed = suj_of_id($deploy);
$nl = $_GET['nl'] ? $_GET['nl'] : "nl";
if ($deploy && $USE) {
//prep
list($qauth, $subj) = sql('name,suj', 'qda', 'r', 'id="' . $deploy . '"');
$msg = sql('msg', 'qdm', 'v', 'id="' . $deploy . '"');
if ($USE == $qauth or auth(5)) {
$http = host();
if (!$_POST['dpl']) {
reqp('mail');
$qmail = mail_list_tosend();
$ret .= form("/?read={$deploy}&deploy={$deploy}&nl=nlb", txarea('dpl" maxlength="1000', $qmail, 40, 10) . br() . checkbox("dpf", "ok", "html", 1) . checkbox("multiple", "ok", "each_one", 1) . input2('submit', "send", nms(50), 'popbt'));
} else {
$htacc = urlread($deploy);
$_SESSION['nl'] = $nl;
//deploy
if ($_POST['dpf'] == "ok") {
$mail_format = "html";
$txt = format_txt($msg, $nl, $deploy);
$txt = html_entity_decode($txt);
$txt = str_replace('href="/', 'href="' . $http . '/', $txt);
$msg = lkc("", $http . $htacc, bal("h2", $subj));
$msg .= divc("panel justy", $txt);
} else {
$mail_format = "txt";
$msg = clean_internaltag($msg);
$msg = html_entity_decode($msg);
}
$_SESSION['nl'] = "";
//send
$sender = sql('mail', 'qdu', 'v', 'name="' . $USE . '"');
$lstm = str_replace("\n", ",", $_POST['dpl']);
$lstm = str_replace("\r", ",", $lstm);
$listmail = explode(",", trim($lstm));
if ($_POST['multiple'] == "ok" && is_array($listmail)) {
$sentto = send_mail_r($listmail, $mail_format, $qb . ' :: ' . $raed, $msg, $sender, $htacc);
} else {
$sentto = $_POST['dpl'];
$vm = str_replace(array(",", ";", "\n", " "), ",", $sentto);
send_mail($mail_format, $vm, $qb . ' :: ' . $raed, $msg, $sender, $htacc);
}
$ret .= lkc("popbt", '/?read=' . $deploy, 'article ' . $deploy . ' sent to: ' . $sentto);
}
} else {
$ret .= btn("popdel", "forbidden");
}
}
//if($_POST['dpl'])return $ret;
return $ret;
}
function plug_msqads($p, $o)
{
$rid = 'plg' . randid();
$p = $p ? $p : 'msqads';
reqp('msql');
$msq = new msql('', $p);
//table
$rb = array('day', 'quest', 'resp');
$msq->create($rb);
$ret .= input(1, $rb[0], $rb[0], '', 1) . br() . txarea($rb[1], '', 40, 4) . txarea($rb[2], '', 40, 4);
$ret .= lj('txtbox', $rid . '_plug___msqads_msqads*j_' . $p . '__' . implode('|', $rb), 'save') . ' ';
$ret .= msqlink('users', ses('qb') . '_' . $p);
$msq->read('i');
return $ret . divd($rid, make_table($msq->ret, 'txtblc', 'txtx'));
}
function plug_model($p, $o)
{
$rid = 'plg' . randid();
$p = $p ? $p : 'model';
reqp('msql');
$msq = new msql('', $p);
//table
$rb = array('title', 'text');
$msq->create($rb);
//cols
$ret .= input(1, $rb[0], '', '', 20);
$ret .= lj('txtbox', $rid . '_plug___model_model*j_' . $p . '__' . implode('|', $rb), 'save') . br();
$ret .= txarea($rb[1], '', 40, 4);
$ret .= msqlink('users', ses('qb') . '_' . $p);
$msq->read('i');
return $ret . divd($rid, make_table($msq->ret, 'txtblc', 'txtx'));
}
//case("meta"):req('pop,spe,tri,meta'); $ret=u_words($id); $t=nms(47); $s=440; break;//
//tracks
case "track":
req('pop,spe');
$ret = plugin_func('tracks', 'f_inp_track', $id, $va);
if (substr($id, 0, 4) == 'wall') {
$t = nms(29);
} else {
$t = $id > 0 ? nms(21) : nms(34) . ' ' . nms(36) . ' ' . $id;
}
break;
case "tracks":
req('pop,spe,art,tri');
$id = convhtml_b(nl2br($id), 1);
//ajx()
reqp('tracks');
$ret = save_track($id, $va, $opt, $optb);
break;
case "trkpreview":
req('pop,spe,art,tri');
$t = nms(65);
$s = 550;
$msg = miniconn(del_n($id), 2, 'test');
$ret = divc('track', correct_txt($msg, '', 'sconn'));
break;
case "trckpop":
req('pop,spe,art,tri');
$_SESSION['read'] = $id;
$t = 'Tracks';
$ret = divs('width:550px;', output_trk(read_idy($id, "DESC")));
break;
function troc_init()
{
reqp('mysql');
troc_ses();
ses('jscode', troc_js());
troc_mysql_obj();
troc_mysql_prop();
}
}
return mkbub($ret, 'inline', '', 'this.style.zIndex=popz+1;') . divc('admnu', '');
}
#
$_SESSION['jscode'] = $_SESSION['onload'] = '';
$_SESSION['prog'] = $_SESSION['prog'] ? $_SESSION['prog'] : 'prog/';
$d = $_GET['call'];
$p = $_GET['p'];
$o = $_GET['o'];
if (substr($d, -1) == '/') {
$d = substr($d, 0, -1);
}
if (substr($p, -1) == '/') {
$p = substr($p, 0, -1);
}
$dr = reqp($d);
#--render
Head::add('tag', array('title', $d ? $d : 'plugin'));
Head::add('meta', array('http-equiv', 'Content-Type', 'text/html; charset=' . $_SESSION['enc']));
Head::add('rel', array('shortcut icon', uicon('copy_16', 'picol/16', '/')));
//Head::add('code','<base'.atb('href',$host).' />');
Head::add('meta', array('name', 'generator', 'philum_' . $_SESSION['philum']));
Head::add('csslink', '/css/_global.css');
Head::add('csslink', '/css/_pictos.css');
Head::add('csslink', '/css/_admin.css');
Head::add('csslink', '/css/_classic.css');
//if($_SESSION['prmb'][5])$nod=$_SESSION['qb'].'_auto';
//else $nod=$_SESSION['qb'].'_design_'.$_SESSION['prmd'];
//Head::add('csslink','/css/'.$nod.'.css');
Head::add('jslink', '/progb/ajx.js');
Head::add('jslink', '/progb/utils.js');
function rssin_load($f)
{
$alx = alx();
//sesmk('alx');
$r = rssin_xml($f);
if (!$r) {
$r = rssin_old($f);
}
reqp('search');
if ($r) {
foreach ($r as $k => $v) {
list($suj, $lnk, $dat) = $v;
if (strpos($lnk, 'feedproxy')) {
$lnk = feedproxy($lnk);
}
if (strpos($lnk, 'spip.')) {
$lnk = strdeb($lnk, 'spip.') . str_extract('/spip', $lnk, 1, 1);
}
$id = recognize_article($lnk, $suj, $alx);
$ret[] = array($suj, $lnk, $dat, $id);
}
}
return $ret;
}
}
$p = $p1;
$ret .= plugin_func($id, $va, $opt, $optb, $res);
$t = $id;
break;
case "openapp":
$ret = openapp($id, $va, $opt);
$t = $id;
break;
case "class":
reqp($id);
$ret = $id::$va($opt, $optb, $res);
$tt = $id;
break;
case "app":
reqp($id);
$ret = $id::$va($opt, $optb, $res);
$tt = $id;
break;
//actions
//actions
case "sesmake":
if (forbidden_sessions($va)) {
$_SESSION[$va] = $id;
}
break;
case "session":
$ret = $_SESSION[$id];
break;
case "togses":
$ret = offon(yesnoses($id));
function plugin_func($d, $fc, $p = '', $o = '', $res = '')
{
reqp($d);
$fc = $fc ? $fc : 'plug_' . $d;
if (function_exists($fc)) {
return call_user_func($fc, $p, $o, $res);
}
}
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']) {
reqp('backup_msql');
$ret .= make_archive_msql('');
}
}
return $ret;
}
