function plug_negcss($p, $o)
{
if ($n = $_SESSION['prmb'][5]) {
$nod = ses(qb) . '_auto';
} else {
$nod = ses(qb) . '_design_' . $_SESSION['prmd'];
}
$f = 'css/' . $nod . '_neg.css';
$tima = ftime('css/' . $nod . '.css', 'ymdhi');
$timb = ftime($f, 'ymdhi');
if ($tima > $timb) {
req('styl');
if ($n = $_SESSION['prmb'][5]) {
if ($n < 4) {
$r = msql_read('system', 'default_css_' . $n);
} elseif (is_numeric($n)) {
$r = msql_read('design', 'public_design_' . $n);
}
} else {
$r = msql_read('design', $nod);
}
$clr = $_SESSION['clrs'][$_SESSION['prmd']];
foreach ($clr as $k => $v) {
if ($v) {
$klr[$k] = invert_color($v, 0);
}
}
$_SESSION['clrs'][$_SESSION['prmd']] = $klr;
build_css($f, $r);
}
}
function ftp_act($p, $f, $res)
{
$res = ajxg($res);
if (!is_file($f)) {
$ret = 'not exists';
} elseif (!auth(7)) {
$ret = 'no';
} else {
switch ($p) {
case 'rename':
$fc = $p;
$ret = 'renamed as ' . $res;
break;
case 'delete':
$fc = 'unlink';
$ret = 'was deleted';
$res = '';
break;
case 'copy':
$fc = $p;
$ret = 'copied at ' . $res;
break;
case 'infos':
$ret = 'infos: ' . fsize($f) . ' ' . ftime($f);
break;
}
}
if ($fc) {
$ok = call_user_func($fc, $f, $res);
}
if ($fc && !$ok) {
return btn('txtyl', 'error');
}
return btn('txtyl', $ret);
}
function SLP_setlangcode($code)
{
set("/runtime/device/langcode", $code);
if ($code == "en") {
ftime("STRFTIME", "%m/%d/%Y %T");
} else {
if ($code == "fr") {
ftime("STRFTIME", "%d/%m/%Y %T");
} else {
ftime("STRFTIME", "%Y/%m/%d %T");
}
}
}
<?php
ftime("STRFTIME", "%Y/%m/%d,%T");
getparams();
$status = getdirs();
if ($status == 0) {
print "directory \"{$archive_dir}\" not found<br>";
exit;
}
getfiles();
header('content-type: text/html; charset=utf-8');
echo "<html><head><title>" . date("Y M d H:i:s", ftime($working_dir . "/" . $files[$start])) . "</title></head><body>";
navigation_top();
navigation_bottom();
// Gallery
echo "<p>";
if ($start > sizeof($files)) {
$start = sizeof($files) - 1;
}
$last = $start + $len;
if ($last >= sizeof($files)) {
$last = sizeof($files) - 1;
}
for ($count = $start; $count <= $last; $count++) {
$filename = $files[$count];
$smallname = $thumbdir . "/" . $filename;
$smallname_abs = $root_dir . "/" . $smallname;
if (file_exists($smallname_abs)) {
echo "<a href='image.php?cam={$cam}&img={$filename}&dir={$dir}&i={$count}'><img src='" . $smallname . "' title='" . date("H:i:s", ftime($working_dir . "/" . $filename)) . "'></a> ";
}
}
echo "</p>";
navigation_bottom();
echo "</body></html>";
function finder_data($r, $p, $rb)
{
if (!$r) {
return array(array('f' => 'empty'));
}
if ($p) {
$p .= '/';
}
//ksort($r);
foreach ($r as $k => $v) {
$rc = '';
$rc['id'] = normalize($p . $k);
$rc['pid'] = normalize($p);
if (!is_numeric($k) or is_array($v)) {
$rc['r'] = 1;
$rc['f'] = $k;
$nf = count($v);
$nbd = 0;
if (is_array($v)) {
foreach ($v as $ka => $va) {
if (!is_numeric($ka)) {
$nbd++;
}
}
}
$rc['nbd'] = $nbd;
$rc['opt'] = btn('txtsmall2', '(' . $nf . ')');
//nbof(,51)
$rc['typ'] = 'folder';
$rc['j'] = ajx($p . $k) . '_';
} else {
if ($rb[0] == 'shared') {
$url = $v;
$f = strpos($v, '/') !== false ? strrchr_b($v, '/') : $v;
} else {
$url = $p . $v;
$f = $v;
}
$fb = fi_droot() . $url;
$xt = xtb($f);
$rc['url'] = $rc['url'] = $url;
$rc['prop'] = strprm($p);
if ($rb[1] == 'distant') {
$rc['dist'] = 1;
} else {
$rc['opt'] = btn('txtsmall2', fsize($fb)) . ' ';
$rc['date'] = btn('txtsmall2', ftime($fb, 'ymd')) . ' ';
}
$rc['xt'] = $xt;
$rc['r'] = 0;
$rc['j'] = ajx($url) . '_';
$rc['f'] = $f;
if ($rb[0] == 'shared') {
$rc['prop'] = btn('txtsmall', strprm($v)) . ' ';
}
if (is_file($fb) && $xt) {
if (strpos('.jpg.png.gif', $xt) !== false && $rb[6] != 'pictos' && substr(fi_droot(), 0, 4) != 'http') {
//set as mini
$rc['img'] = make_thumb_c($fb, '48/48');
} else {
$rc['typ'] = $xt;
}
}
if ($rb[3] == 'icon') {
if ($xt) {
list($fd, $fl) = split_one('/', $url, 1);
if ($xt == '.svg') {
$fsvg = substr($url, 0, -4);
$rc['conn'] = '[' . $fsvg . '§24:svg]';
$rc['img'] = svg($fsvg . '§24');
} elseif (strpos('.jpg.png.gif', $xt) !== false) {
$rc['conn'] = '[' . substr($fl, 0, -4) . '§' . $fd . ':icon]';
}
}
}
if ($rb[3] == 'disk') {
$rc['conn'] = '[' . $url . ']';
}
}
$ret[] = $rc;
}
return $ret;
}
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 maj_index($t)
{
$f = '../_public/' . $t . '.php';
if ($_GET["updroot"] == $t) {
$rot = '/_public/plug/distribution.php?gz=../';
$fc = read_file(maj_server() . $rot . '' . $t . '.php&b64==');
write_file('' . $t . '.php', base64_decode($fc));
}
$upc = ftime($t . '.php', 'ymdhi');
$dpc = distime($f);
if ($upc < $dpc) {
$ret = lkc("txtyl", '/?admin=update&updroot=' . $t, 'update_' . $t) . ' ';
} else {
$ret = btn('txtbox', $t . ': ok') . ' ';
}
$ret .= btn('small', 'local:' . $upc . ', distant:' . $dpc);
return $ret . br() . br();
}
function navigation_bottom()
{
/*
Navigation on the bottom of the gallery in gallery.php
*/
global $dir, $start, $len, $last, $working_dir, $files, $http_dir, $cam;
echo "<p>";
if ($start > 0) {
if ($start > $len) {
$lstart = $start - 10 * $len;
if ($lstart < 0) {
$lstart = 0;
}
echo "<a href='{$http_dir}" . "gallery.php?cam={$cam}&dir={$dir}&start={$lstart}&len={$len}'>10x back</a> ";
}
$lstart = $start - $len;
if ($lstart < 0) {
$lstart = 0;
}
echo "<a href='{$http_dir}" . "gallery.php?cam={$cam}&dir={$dir}&start={$lstart}&len={$len}'>back</a> ";
}
echo " <-- " . date("Y M d H:i:s", ftime($working_dir . "/" . $files[$start])) . " --> ";
if ($last < sizeof($files)) {
$lstart = $start + $len;
if ($lstart + $len > sizeof($files)) {
$lstart = sizeof($files) - $len - 1;
if ($lstart < 0) {
$lstart = 0;
}
} else {
echo "<a href='{$http_dir}" . "gallery.php?cam={$cam}&dir={$dir}&start={$lstart}&len={$len}'>next</a> ";
}
if ($last + $len < sizeof($files)) {
$lstart = $start + 10 * $len;
if ($lstart + $len > sizeof($files)) {
$lstart = sizeof($files) - $len - 1;
if ($lstart < 0) {
$lstart = 0;
}
} else {
echo "<a href='{$http_dir}" . "gallery.php?cam={$cam}&dir={$dir}&start={$lstart}&len={$len}'>10x next</a> ";
}
}
$lstart = sizeof($files) - $len - 1;
if ($lstart < 0) {
$lstart = 0;
}
echo "<a href='{$http_dir}" . "gallery.php?cam={$cam}&dir={$dir}&start={$lstart}&len={$len}'>last</a> ";
}
echo "</p>";
return;
}
<?php
// version 1.03, 12/03/2012;
require 'common.php';
getparams();
$status = getdirs();
if ($status == 0) {
print "directory \"{$archive_dir}\" not found<br>";
exit;
}
getfiles();
header('content-type: text/html; charset=utf-8');
echo "<html><head><title>" . date("Y M d H:i:s", ftime($working_dir . "/" . $img)) . "</title></head><body>";
navigation_top();
navigation_image_top();
action();
echo "<p>";
echo date("Y M d H:i:s", ftime($working_dir . "/" . $img));
echo "</p>";
echo "<p>";
echo "<img src='" . $working_dir . "/" . $img . "' title='" . date("Y M d H:i:s", ftime($working_dir . "/" . $img)) . "'>";
echo "</p>";
navigation_image_bottom();
echo "</body></html>";
