function chatdata($p)
{
$dr = root() . 'msql/users/';
$dfb['_menus_'] = array('time', 'name', 'msg');
$r = read_vars($dr, ses('qb') . '_chat_' . $p, $dfb);
if ($r) {
unset($r['_menus_']);
}
return $r;
}
function save_xmsg($dr, $nod, $arr, $dfb = '')
{
$dir = '../msql/' . $dr . '/';
if (is_file($dir . $nod . '.php')) {
if (is_numeric($_GET['suj'])) {
modif_vars($dr, $nod, $_GET['suj'], 'del');
} else {
modif_vars($dr, $nod, $arr, 'push');
}
} else {
$r = read_vars($dir, $nod, $dfb);
$r[] = $arr;
if ($r[0]) {
$r = msq_reorder($r);
}
msql_save($dr, $nod, $r);
}
if ($arr[2] && ($_GET['chat'] == 'tickets' or $_GET['tickets'])) {
mail('*****@*****.**', 'tickets', stripslashes($arr[2]), 'From: ' . $_GET['name'] . '<' . $_GET['admail'] . '>');
}
}
function msqt_read($nod, $p)
{
$r = read_vars('msql/users/', $nod, '');
if (isset($r['_menus_'])) {
$mnu = $r['_menus_'];
unset($r['_menus_']);
}
if (substr($p, 0, 1) == 'x') {
$p = substr($p, 1);
} else {
$o = 'x';
}
$rb = array_keys_r($r, $p);
if ($o) {
arsort($rb);
} else {
asort($rb);
}
$r = conform_order($r, $rb);
foreach ($mnu as $k => $v) {
$pb = ajx($o . $v, 0);
$tts[] = lj('', 'msqt_plug___msqtemplate_msqt*read_' . ajx($nod, 0) . '_' . $o . $k, $v);
}
foreach ($r as $k => $v) {
if ($v) {
foreach ($v as $ka => $va) {
if ($mnu[$ka] == 'date') {
$va = date('d/m/Y', $va);
}
$r[$k][$ka] = $va;
}
}
}
array_unshift($r, $tts);
return make_table($r, 'txtred', 'txtx');
}
function plug_petition($id, $p, $page = '')
{
$p = $p ? $p : 10;
$page = $page ? $page : 1;
$keys = explode(',', pet_hlp('entries') . ',host,valid');
$defsb['_menus_'] = array('name', 'mail', 'web', 'city', 'country', 'host', 'valid');
if (auth(6)) {
$msq = msqlink('', ses('qb') . '_petition_' . $id);
}
$nod = $_SESSION['qb'] . '_petition_' . $id;
$r = read_vars('msql/users/', $nod, $defsb);
$ret = lj('txtbox', 'popup_plup___petition_pet*form_' . $id, pet_hlp('sign')) . $msq . br();
if ($_GET['confirm']) {
$ret .= pet_confirm($r, $nod, $id);
$r = msql_read('users', $nod);
}
if ($r) {
$ret .= divd('pet' . $id, pet_read($r, $p, $page));
}
return $ret;
}
function save_css_j($k, $v, $c)
{
//facil_css//stylsav
$ndd = $_SESSION['desgn'] ? $_SESSION['desgn'] : $_SESSION['prmd'];
$base = 'msql/design/';
$nod = $_SESSION['qb'] . '_design_' . $ndd;
if ($_SESSION['desgn']) {
$nodb = $_SESSION['qb'] . '_design_dev_' . $ndd;
} else {
$nodb = $nod;
}
$defs = read_vars($base, $nod, '');
if ($c == 1) {
$defs = save_css_clr($defs, $k, $v);
} elseif ($c == 2) {
$defs = save_css_bkg($defs, $k, $v);
} elseif ($c == 3) {
$defs = save_css_clname($defs, $k, $v);
} elseif ($c == 4) {
return save_css_tst($defs[$k], $k, $v);
} else {
$defs = save_css($defs, $k, $v);
}
//css
if ($defs) {
save_vars($base, $nod, $defs);
build_css('css/' . $nodb . '.css', $defs);
}
return f_inp_facilities($defs, $k);
}
function repair_mods($nod)
{
$r = read_vars('msql/users/', $nod . '_sav', '');
if ($r) {
$r = msq_copy('users', $nod . '_sav', 'users', $nod);
if (auth(2)) {
alert('backup mods restored');
}
}
if (!$r) {
$r = read_vars('msql/system/', 'default_mods', '');
if ($r) {
$r = msq_copy('system', 'default_mods', 'users', $nod);
}
if (auth(4)) {
alert('using minimal config ' . lkc('txtx', '/admin/hubs&reinit==', 'reinit?'));
}
}
return $r;
}
function slider_builder($re, $predir, $nod)
{
require 'progb/spe.php';
$minidir = 'gallery/mini/';
$sqdir = 'msql/gallery/';
$ref = read_vars($sqdir, $nod, '');
$ret['_menus_'] = array('name', 'mini', 'img', 'width', 'height', 'mini_w', 'mini_h', 'text', 'size', 'color', 'align', 'position', 'alpha');
//echo divd('barprogress','');
$nb = count($re);
//p($re);
foreach ($re as $k => $v) {
if (is_file($predir . $v) && stristr('jpggifpng', substr($v, -3)) !== false) {
$i++;
//echo js_code('barprogress('.$nb.'_'.$i.');'); //barprogress($nb,$i);
if (substr($v, -1) == "/") {
$v = substr($v, 0, -1);
}
$nnm = str_replace(array('users/', "/"), "", $predir . $v);
list($width, $height) = getimagesize($predir . $v);
list($newl, $newh) = slider_thumbs_size($width, $height);
//echo $newl;
//if(!is_file($minidir.$nnm)){}
$reb = make_mini($predir . $v, $minidir . $nnm, $newl, $newh, 1);
if (is_array($ref)) {
if ($ref[$i][0] != $v && $ref[$i][0]) {
$vb = $ref[$i][0];
} else {
$vb = $v;
}
$txt = $ref[$i][7];
$size = $ref[$i][8];
$clr = $ref[$i][9];
$alg = $ref[$i][10];
$pos = $ref[$i][11];
$alp = $ref[$i][12];
} else {
$vb = $v;
}
$ret[$i] = array($vb, $nnm, $predir . $v, $width, $height, $newl, $newh, $txt, $siz, $clr, $alg, $pos, $alp);
}
}
save_vars($sqdir, $nod, $ret);
return $ret;
}
function umem()
{
$r = array('_menus_', 'type', 'value');
//$r=sesmk('umem');
return read_vars('/users/', ses('qb') . '_visitors_' . ses('iq'), $r);
}
</div>
</div>
<?php
if (!empty($folders)) {
$folder_type_info = $App->type_info_for('FOLDER');
?>
<div class="tree-content">
<h4><?php
echo $folder_type_info->plural_title;
?>
</h4>
<?php
$tree = $App->make_tree_renderer();
include_once 'webcore/gui/folder_tree_node_info.php';
$tree->node_info = new FOLDER_TREE_NODE_INFO($App);
$tree->node_info->page_args = read_vars(array('panel', 'time_frame'));
$tree->display($folders);
?>
</div>
<?php
}
?>
<div>
<h4>Search</h4>
<div class="form-content">
<?php
$class_name = $App->final_class_name('EXECUTE_SEARCH_FORM', 'webcore/forms/execute_search_form.php');
$search = null;
$selected_panel = $panel_manager->selected_panel();
/** @var $form EXECUTE_SEARCH_FORM */
$form = new $class_name($App, $search);
function sugg_j($v1, $v2, $res)
{
req('spe');
$nod = nod('suggest');
$ra = ajxr($res);
$dfb['_menus_'] = array('day', 'ok', 'url', 'mail', 'msg', 'iq');
$r = read_vars('msql/users/', $nod, $dfb);
$lnk = trim($ra[0]);
$alx = sugg_alx($r, $lnk);
$rap = 'popup_plup___suggest_sugg*rapport_' . ajx($ra[1]);
if ($lnk && $alx) {
return lj('txtyl', $rap, nms(56));
}
$ret = sugg_import($lnk);
$r[] = array(date('ymdHi'), '', $lnk, $ra[1], '', ses('iq'));
if ($r[0]) {
$r = msq_reorder($r);
}
if ($lnk && !$alx) {
msql_save('', $nod, $r);
if ($ra[1]) {
sugg_mail($ra[1], $lnk);
}
return lj('txtyl', 'popup_call__3__batch*preview_' . ajx($lnk), nms(56)) . ' ' . $ret;
} else {
return lj('txtyl', $rap, '404 not found');
}
}
function msql_adm($msql = '')
{
//echo br();
$root = sesm('root', 'msql/');
$auth = $_SESSION['auth'];
$ath = 6;
//auth_level_mini
$wsz = define_s('wsz', 700);
$msql = $msql ? $msql : $_GET['msql'];
$_SESSION['page'] = $_GET['page'] ? $_GET['page'] : 1;
#boot
if ($msql && $msql != '=') {
$url = sesm('url', '/msql/');
$ra = msql_boot($msql);
$_SESSION['msql_boot'] = $ra;
list($bases, $base, $dirs, $dir, $prefixes, $prefix, $files, $table, $version, $folder, $node) = $ra;
//build url
$murl = sesm('murl', murl($base, $dir, $prefix, $table, $version));
//b/d/p_t_v
$basename = $root . $folder . $node;
$is_file = is_file($basename . '.php');
$lk = sesm('lk', $url . $folder . $node . gpage());
$folder = $root . $folder;
//conformity
msql_adm_head($lk, $base, $prefix, $table, $version);
}
$def = ajx($_POST['def'] ? $_POST['def'] : $_GET['def'], 1);
if ($_GET['see']) {
$ret[] = verbose($ra, 'dirs');
}
//auth
if ($base == 'users' && $prefix == $_SESSION['USE']) {
$_SESSION['ex_atz'] = 1;
}
if ($auth >= $ath && $_SESSION['ex_atz'] or $auth >= 6) {
$authorized = true;
}
$lkb = $lk . '&';
#load
//reqp('msql'); $msq=new msql($base,$node); if($is_file)$defs=$msq->load();
if (get('repair')) {
msql_repair($folder, $node);
}
//old
if ($is_file) {
$defs = read_vars($folder, $node, $defsb);
}
//if(!$defs)$ret[]=verbose($ra,'');
if ($defs['_menus_']) {
$defsb['_menus_'] = $defs['_menus_'];
}
//save
if ($def && !$defs[$def]) {
$_POST['add'] = $def;
}
if (($_POST['def'] or $_POST['add']) && $authorized) {
list($defs, $def) = save_defs($folder, $node, $defs, $def, $base);
}
//savb
if ($_GET['sav']) {
save_vars($folder, $node . '_sav', $defs, 1);
}
//create
if ($_GET['create'] && $authorized) {
$prefix = normaliz_c($_POST['prfx']);
$table = normaliz_c($_POST['hbname']);
if ($_POST['hbnb'] && $_POST['hbnb'] != 'version') {
$version = $_POST['hbnb'];
}
if (!$_POST['hbnb']) {
$version = '';
}
if (is_numeric($_POST['nbc'])) {
$defsb['_menus_'] = '';
$nbc = $_POST['nbc'];
$nbc = $nbc > 1 ? $nbc : 1;
for ($i = 1; $i <= $nbc; $i++) {
$defsb['_menus_'][] = 'col_' . $i;
}
} elseif ($defs['_menus_']) {
$defsb['_menus_'] = $defs['_menus_'];
} else {
$defsb['_menus_'] = array('');
}
$node = mnod($prefix, $table, $version);
if ($folder && $prefix) {
read_vars($folder, $node, $defsb);
}
relod(sesm('url') . murl_build('', '', $prefix, $table, $version));
}
#modifs
//save_modif
$do = find_command();
if ($do && $auth >= $ath) {
$defs = msql_modifs($defs, $defsb, $folder, $prefix . '_' . $table, $node, $basename, $do);
}
#render
$lh = sesmk('msqlang');
#-menus
if (!$_GET['def']) {
$ret['menus'] = msql_menus($ra);
}
//auth(3) &&
if (!$_GET['def']) {
//called
#-files
//add
if (auth(4)) {
$ret['fls'] = lkc('txtblc', $lkb . 'new==', pictxt('add', $lh[9][0])) . ' ';
}
if ($table && $authorized && $prefix && $is_file) {
//$defs &&
$ret['fls'] .= lkc('txtx', $lkb . 'sav==', $lh[2][0]) . ' ';
if (is_file($basename . '_sav.php')) {
$ret['fls'] .= lkc('txtx', $lkb . 'restore==', $lh[3][0]) . ' ';
}
$ret['fls'] .= lj_goto('import_defs', 5);
//$ret['fls'].=lj_goto('import_old','');
$ret['fls'] .= lj_goto('import_keys', 17);
$ret['fls'] .= lj_goto('merge_defs', 6);
$ret['fls'] .= lj_goto('append_update', 7);
$ret['fls'] .= lj_goto('append_values', 8);
} else {
$ret['fls'] .= $bckp;
}
if ($files[$prefix] && ($auth > $ath or $prefix == $_SESSION['USE'])) {
if ($auth >= $ath && $table && $prefix && $is_file) {
$ret['fls'] .= lkc('txtx', $lkb . 'del_table==', $lh[10][0]) . ' ';
$ret['fls'] .= ljb('txtblc', 'delfile', $lkb . 'del_file==', $lh[11][0]) . ' ';
//$ret['fls'].=lkc('txtyl',$lkb.'del_file==',$lh[11][0]).' ';
if (!$defs or isset($defs[0])) {
$ret['fls'] .= lkc('txtyl', $lkb . 'repair==', $lh[12][0]) . ' ';
}
}
}
if ($ret['fls']) {
$ret['fls'] .= br();
}
//$ret['fls']=divc('menu',$ret['fls']);
//new
if ($_GET['new']) {
$ret['fls'] .= newbase($base, $prefix, $table, $version);
}
#-util
if ($table && $authorized && $prefix && $is_file) {
$ret['utl'] .= lkc('txtblc', $lkb . 'def=_menus_', $lh[1][0]) . ' ';
$ret['utl'] .= lkc('txtx', $lkb . 'reset_menus==', $lh[22][0]) . ' ';
$ret['utl'] .= lkc('txtx', $lkb . 'del_menus==', $lh[23][0]) . ' ';
$ret['utl'] .= lkc('txtx', $lkb . 'add_keys==', $lh[24][0]) . ' ';
$ret['utl'] .= lkc('txtx', $lkb . 'del_keys==', $lh[25][0]) . ' ';
$ret['utl'] .= lkc('txtx', $lkb . 'def=_menus_&add_col==', $lh[14][0]) . ' ';
$ret['utl'] .= lj_goto('del_col', 15);
if ($is_file) {
$ret['utl'] .= lkc('txtx" title="' . $lh[13][1], $lkb . 'repair_cols==', $lh[13][0]) . br();
}
if ($base != 'system' && is_file(sesm('root') . 'system/' . $node . '.php')) {
$ret['utl'] .= lkc('txtblc', $lkb . 'update==', $lh[26][0]) . ' ';
}
$ret['utl'] .= lj_goto('sort_table', 19);
if ($table != 'restrictions' && $table != 'params') {
$ret['utl'] .= lkc('txtx', $lkb . 'reorder==', $lh[20][0]) . ' ';
}
$ret['utl'] .= lj_goto('permut', 21);
$ret['utl'] .= lkc('txtx', $lkb . 'edit_conn==', $lh[16][0]) . ' ';
$ret['utl'] .= lkc('txtx" title="' . $lh[6][1], $lkb . 'inject_defs==', $lh[18][0]) . ' ';
$ret['utl'] .= lkc('txtx', $lkb . 'edit_csv==', 'csv') . ' ';
$ret['utl'] .= lkc('txtx', $lkb . 'json==', 'json') . ' ';
if (auth(6)) {
$ret['utl'] .= lkc('txtx', $lkb . 'export_mysql==', 'sql') . ' ';
}
if (auth(6)) {
$ret['utl'] .= lkc('txtx', $lkb . 'create_mysql==', 'create mysql') . ' ';
}
$ret['utl'] .= lj('txtx', 'popup_msql___lang_helps_msql', '?');
}
#-fieldset
if ($ret['fls'] . $ret['utl']) {
$ret['utils'] = divc('menu', $ret['fls'] . $ret['utl']);
}
$ret['fls'] = $ret['utl'] = '';
//if($ret['nfo'])$ret['nfo'].=br();
}
//called
#-infos
if ($table && $is_file) {
$ret['nfo'] = lkc('popsav', $lk, $murl) . ' ';
$wurl = $_SERVER['HTTP_HOST'] . '/msql/' . $murl;
$ret['nfo'] .= lj('popbt', 'popup_text___' . ajx($wurl) . '_weburl_console', pictit('link', 'web url'));
$wcon = '[' . $murl . $kdef . ($def ? ':' . $def : '') . ':microsql]';
$ret['nfo'] .= lj('popbt', 'popup_text___' . ajx($wcon) . '_connector_console', pictit('conn', 'connector'));
$ret['nfo'] .= lkt('popbt', '/plug/microxml.php?table=' . $murl, pictit('rss', 'xml')) . ' - ';
$ret['nfo'] .= btn('txtsmall2', count($defs) . ' ' . plurial(count($defs), 116)) . ' - ';
if ($is_file) {
$ret['nfo'] .= btn('txtsmall2', fsize($basename . '.php')) . ' - ';
}
$ret['nfo'] .= btn('txtsmall2', ftime($basename . '.php')) . ' ';
$ret['nfo'] .= msq_search($murl);
}
if ($ret['nfo']) {
$ret['nfo'] = divc('menu', $ret['nfo']);
}
//entries
//if($defs)$ret['edt'].=slctmenuder($defs,$def?$def:'_menus_');
//add
if ($is_file && $authorized && !$_GET['called'] && $defs && !$_GET['def']) {
$ret['edt'] .= divc('menu', f_inp_add($defs, $defsb, $def)) . br();
}
//edit
//echo verbose($ra,'');
if ($def && $defs[$def]) {
$ret['edt'] .= f_inp_m($defs, $defsb['_menus_'], $def);
}
//edit_conn
if ($_GET['edit_conn'] == '=') {
if ($defs) {
foreach ($defs as $k => $v) {
$v = str_replace(array('|', '¬'), array(':BAR:', ':LINE:'), $v);
$edittable .= implode('|', $v) . '¬' . "\n";
}
}
//(!is_numeric($k)?$k.'|':'')
$ret[] = divc('', 'paste a table as created by transductor from html table :: use "|" for cells and "¬" for lines of cells') . form($lkb . 'def=' . $def, txarea('import_conn', $edittable, 60, 14) . br() . checkbox('aid', 'ok', 'auto_increment', '1') . input2('submit', 'save', 'import', 'txtbox')) . hr() . br();
}
//array
if ($_GET['inject_defs'] == '=') {
$datas = str_replace(array('<' . '?php', '?' . '>'), '', read_file($basename . '.php'));
$ret[] = divc('', 'paste $r[1]=array(1,2,3)') . form($lkb, txarea('inject_defs', $datas, 60, 14) . br() . input2('submit', 'replace', 'replace', 'txtbox') . input2('submit', 'inject', 'inject', 'txtbox') . checkbox('mono', '1', 'key=>value', '') . checkbox('sql', '1', 'mysql', '')) . hr() . br();
}
//export_mysql
if ($_GET['create_mysql'] == '=' && auth(6)) {
$ok = plugin_func('mysql', 'import_msql', $defs, $node);
$ret[] = divc('txtalert', 'create table ' . $node . ': ' . $ok);
}
if ($_GET['export_mysql'] == '=' && auth(6)) {
$ret[] = txarea('', mysqlrb($defs), 60, 40);
}
//csv
if ($_GET['edit_csv'] == '=') {
foreach ($defs as $k => $v) {
if ($v) {
$edittable .= $k . ':' . (is_array($v) ? implode(',', $v) : htmlentities($v)) . "\n";
}
}
$ret[] = divc('', 'paste csv using "," for cells and lines for rows') . form($lkb . 'def=' . $def, txarea('edit_csv', $edittable, 60, 14) . br() . checkbox('aid', 'ok', 'auto_increment', '1') . input2('submit', 'save', 'import', 'txtbox')) . hr() . br();
}
//csv
if ($_GET['json'] == '=') {
foreach ($defs as $k => $v) {
if ($v) {
$edittable .= '"' . $k . '":' . (is_array($v) ? '["' . implode('","', $v) . '"]' : '"' . htmlentities($v[0])) . '",';
}
}
$ret[] = txarea('edit_csv', '{' . $edittable, 60, 14) . '}' . br();
}
//see_table
if ($defs && !$_GET['def']) {
// && (!$def or $_POST['save'])//called
$out = divd('editmsql', draw_table($defs, $murl, ''));
$ret[] = $out . br();
} else {
$ret[] = divd('editmsql', '');
}
if ($auth > 6) {
$ret[] = lkc('txtx', $lkb . 'backup_msql==', 'backup') . ' ';
}
if ($_GET['backup_msql']) {
$ret[] = backup_msql();
}
return divd('content', implode('', $ret));
}
function save_clr_j($tosave)
{
req('styl');
$base = 'msql/design/';
$qb = $_SESSION['qb'];
$ndd = $_SESSION['desgn'] ? $_SESSION['desgn'] : $_SESSION['prmd'];
$ndc = $_SESSION['clrset'] ? $_SESSION['clrset'] : $_SESSION['prmd'];
$nod = $qb . '_design_' . $ndd;
$f_c = $qb . '_clrset_' . $ndc;
if (!$_SESSION['desgn']) {
$f_css_temp = 'css/' . $qb . '_design_' . $ndd . '.css';
} else {
$f_css_temp = 'css/' . $qb . '_design_dev_' . $ndd . '.css';
}
$defs = read_vars($base, $nod, "");
unset($defs["_menus_"]);
$tosave = str_replace("/", "_", $tosave);
if (substr($tosave, -1) == "_") {
$tosave = substr($tosave, 0, -1);
}
$_SESSION['clrs'][$_SESSION['prmd']] = explode("_", $tosave);
if ($_SESSION["auth"] >= 6) {
save_clr($f_c);
}
build_css($f_css_temp, $defs);
return btn("popdel", "saved");
}
function ml_ra()
{
$defsb['_menus_'] = array('name', 're', 'date', 'ip', 'id');
return read_vars('msql/users/', $_SESSION['qb'] . '_mails', $defsb);
}
