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 radio_edit($nod, $dr, $md, $id = '')
{
$id = $id ? $id : $_SESSION['read'];
$nd = 'radio' . $id;
if (!$nod) {
$nod = $_SESSION['qb'] . '_' . $nd;
}
$nodb = str_replace('_', '*', $nod);
if ($dr) {
$ret .= radio_build($dr, $nod);
}
$r = msql_read('radio', $nod, '');
$ret .= msqlink('radio', $_SESSION['qb'] . '_' . $nd);
if ($r[$md]) {
foreach ($r[$md] as $k => $v) {
$ky .= $md . '.' . $k . '|';
$edit .= input2('text', '"id="' . $md . '.' . $k, $v) . btn('txtsmall', $r['_menus_'][$k]) . br();
}
$edit .= ljb('popbt', 'SaveR', 'popup_radiosav_' . $nodb . '__' . $k . '\',\'' . $ky, 'save');
}
$ret .= divc('edit', $edit);
if ($r) {
foreach ($r as $k => $v) {
foreach ($v as $ka => $va) {
$datas[$k][] = $va;
}
if ($k != '_menus_' && $k != $md) {
$datas[$k][] = ljb('popbt', 'SaveJ', 'popup_radioedit___' . $nodb . '__' . $k, 'edit');
}
}
}
$ret .= make_divtable($datas);
return popup('build_playlist', $ret);
}
function plug_color($p, $o)
{
$rid = 'plg' . randid();
$ret = color_j($p, $o);
$bt .= msqlink('', 'system/edition_colors');
return $bt . divd($rid, $ret);
}
function finder_menu($r, $p)
{
if ($r[0] == 'shared' or $r[0] == '') {
if (auth(4)) {
$ret .= fi_mnu($r, '', 'local', 1, 1) . fi_mnu($r, '', 'global', 1) . fi_mnu($r, '', 'distant', 1);
$ret .= ' | ';
$ret .= fi_mnu($r, $p, 'virtual', 2, 1) . fi_mnu($r, $p, 'real', 2) . ' | ';
}
} elseif ($r[3] == 'list' or $r[3] == '') {
$ret .= fi_mnu($r, $p, 'normal', 4, 1) . fi_mnu($r, $p, 'recursive', 4) . ' | ';
}
if (auth(4)) {
$ret .= fi_mnu($r, '', 'shared', 0, 1) . fi_mnu($r, $_SESSION['qb'], 'disk', 0) . ' | ';
}
$ret .= fi_mnu($r, $p, 'flap', 3, 1) . fi_mnu($r, $p, 'icons', 3);
$ret .= ' | ';
//$ret.=fi_mnu($r,$p,'panel',3).fi_mnu($r,$p,'list',3);
//$ret.=fi_mnu($r,$p,'pictos',6,1,1).fi_mnu($r,$p,'mini',6,'',1).' | ';
if ($r[0] == 'shared' or $r[0] == '') {
if (auth(4)) {
if ($r[1] == 'global') {
$ret .= fi_mnu($r, $p, 'update', 5);
}
if ($r[1] == 'global') {
$ret .= msqlink('server', 'shared_files');
} elseif ($r[1] != 'distant') {
$ret .= msqlink('', $_SESSION['qb'] . '_shared');
}
}
}
return $ret;
}
function msqedit($p, $o)
{
$bt = lj('', 'popup_plup___msqedit_msqdt*add_' . ajx($p) . '_' . $o, pictxt('add')) . ' ';
$bt .= lj('', 'editmsql_plug__15_msqedit_msqdt*build_' . ajx($p) . '_' . $o, pictxt('refresh')) . ' ';
//$bt.=lj('txtx','editmsql_plug___msqedit_msqdt*herit*overmenus_'.ajx($p),'herit overmenus');
$bt .= msqlink('', ses('qb') . '_' . $p);
$_SESSION['popm'] = $bt;
return $bt . divd('editmsql', msqdt_build($p, $o));
}
function plug_icocss($p, $o)
{
$rid = randid('plg');
Head::add('csslink', '/css/_pictos.css');
$bt = icocss_menu($p, $o, $rid);
$bt .= msqlink('system', 'edition_pictos');
//$ret.=icocss_build($p,$o);
return $bt . divd($rid, $ret);
}
function plug_umdico($p, $o)
{
ses('qdvoc', qd('umvoc'));
ses('qdvoc_b', qd('umvoc_arts'));
$ret = udc_build($p);
$ret .= msqlink('', 'ummo_umvoc_1', '') . ' ';
$ret .= lkt('', '/plug/umvoc', picto('link'));
return $ret;
}
function plug_umglyphes($p, $o)
{
if ($o == '1') {
return ug_build($p);
}
$ret .= lj('', 'umglph___4', picto('del')) . ' ';
$ret .= inp('umglph', $p, atz('44')) . ' ';
$ret .= lj('popsav', 'umgl_plug___umglyphes_ug*build_' . ajx($p) . '__umglph', 'ok') . ' ';
$ret .= divd('umgl', ug_build($p)) . br();
$ret .= msqlink('', 'ummo_umvoc_1', '') . ' ';
$ret .= lkt('', '/plug/umvoc', picto('link'));
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 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 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'));
}
function plug_umtoa($p, $o)
{
$rid = 'plg' . randid();
Head::add('csscode', '
.hline{padding-left:10px; border-top:2px solid black;width:100%;}
.hline:hover{z-index:2; background:silver; min-height:40px;}
.vline{border-left:20px dashed black;}
.aeon{border-top:2px solid dashed; background:silver;}
.aeon1{background:bisque;}
.aeon2{background:darkkhaki;}
.aeonblack{background:lightslategray;}
.aeon3{background:darkturquoise;}
.aeon4{background:hotpink;}');
$ret = umtoa_build($p, $o);
$bt .= msqlink('', ses('qb') . '_umtoa');
return $bt . divd($rid, $ret);
}
function plug_htaccess($d)
{
$here = 'htaccess';
$default = msql_read('system', 'default_htaccess', 1);
$actual = read_file('.' . $here);
if (!$actual or $d) {
$actual = $default;
$ret .= btn('txtyl', 'default_loaded') . br();
}
$ret .= picto('alert�24') . ' ' . btn('txtcadr', 'critical_operations') . ' ';
$ret .= lj('txtbox', 'txt_plug__4_' . $here . '_' . $here . '*default', 'default') . ' ';
$ret .= lj('txtbox', 'cbk_plug__xd_' . $here . '_' . $here . '*mkdefault___txt', 'backup') . ' ';
$ret .= msqlink('system', 'default_htaccess') . ' ';
$ret .= lkc('txtx', '.htaccess', 'link') . ' ';
$ret .= hlpbt('htaccess') . ' ' . btd('cbk', '') . ' ';
$ret .= btd('bts', lj('txtbox', 'cbk_plug__xd_' . $here . '_' . $here . '*j___txt', 'save')) . br() . br();
$ret .= txarea('txt', $actual, 120, 26) . br();
$ret .= lkt('txtblc', 'http://htaccess.madewithlove.be/', 'tests');
return $ret;
}
function plug_menu($d, $p, $o, $dr)
{
if ($dr) {
$dr = '/' . $dr;
}
//$ret.=li(lien('txtsmall','/plug/index',picto('phi')));
$ret .= popbub('plug', 'plugin', picto('phi2'), 'd', 1);
//$ret.=llj('','popup_plup___plug_plug*slct',picto('list'));
$ret .= li(lkc('txtsmall', host() . '/plug/' . $d . ($p ? '/' . $p : '' . ($o ? '/' . $o : '')), picto('reload')));
$ret .= li(call_plug('txtsmall', 'popup', 'codeview', 'plug' . $dr . '_' . ajx($d), picto('conn')));
//source
if (auth(3)) {
$ret .= msqlink('system', 'program_plugs') . ' ';
}
$ret .= plug_hlp($d);
if (auth(4)) {
$ret .= lj('', 'popup_editmsql___system/program*plugs_' . ajx($d) . '__1', picto('edit')) . ' ';
$ret .= lj('', 'popup_editmsql___lang/fr/program*plugs_' . ajx($d) . '__1', picto('flag')) . ' ';
}
return mkbub($ret, 'inline', '', 'this.style.zIndex=popz+1;') . divc('admnu', '');
}
function plug_pictos($d, $id)
{
$rid = 'bld' . randid();
$ret = lj('popbt', $rid . '_plug___pictos_pictos*refresh', picto('reload')) . ' ';
$ret .= hlpbt('pictos') . ' ' . msqlink('system', 'program_pictos') . br();
$r = msql_read('system', 'program_pictos', '', 1);
foreach ($r as $k => $v) {
list($p, $c) = split(':', $v);
if ($c == 'icon') {
$ico = icon($p, $k);
} elseif (is_numeric($c)) {
$ico = icosys($p, $c);
} elseif ($c == 'svg') {
$ico = svg($p);
} else {
$ico = '';
}
$edit = lj('popbt', 'popup_plug___pictos_pictos*edit_' . $k, $k) . ' ';
$rb[] = div('', picto($k, 24) . ' ' . $edit . btd('ico' . $k, $ico));
}
$ret .= onxcols($rb, 4, 680);
return divd($rid, $ret);
}
function stx_btn($d, $nd, $tx)
{
//version,node,
$r = msq_choose('', $nd, 'txt');
$nxt = msq_find_next($r);
$tt = 'txtbox" title="';
if ($d) {
$ret .= btd('bck', '') . ' ';
$tar = 'tit|txtarea';
$ret .= btd('bts', lj('popbt', 'bck_plug__xd_stext_stext*j_' . $d . '__' . $tar, nms(27))) . ' ';
$ret .= ljb('txtx', 'notepad_open', $nd . '_txt_' . $d . '_' . $tx, $d) . ' ';
//reload
$ret .= lj($tt . nms(43), 'bck_plug__xd_stext_stext*del_' . $d . '_' . $tx, picto('del'));
$ret .= lj($tt . nms(42), 'plgtxt_plug___stext_plug*stext__' . $tx, picto('close'));
}
if ($nd) {
$ret .= lj($tt . nms(44), 'plgtxt_plug___stext_plug*stext_' . $nxt . '_' . $tx, picto('add'));
$ret .= lj($tt . nms(25), 'popup_plup___stext_stx*files_' . $nd . '_' . $tx, picto('get'));
}
if ($d) {
$ret .= msqlink('', $nd . '_txt_' . $d);
}
return $ret;
}
function backup_console()
{
//(421)
$base = 'msql/users/';
$nod = $_SESSION['modsnod'];
$f = $base . $nod . '_sav.php';
$goto = '/?admin=console';
if ($d = $_GET["newfrom_mods"]) {
newmodfrom($d);
select_mods($d);
}
if ($_GET["adopt_mods"]) {
foreach ($_SESSION['prmb'] as $k => $v) {
$vaue .= $v . '#';
}
update("qdu", "config", $vaue, "name", ses('qb'));
}
if ($_GET["backup_mods"]) {
copy($base . $nod . '.php', $f);
}
if ($_GET["mk_default"]) {
msq_copy('users', $nod, 'system', 'default_mods');
msq_copy('users', $nod, 'users', 'public_mods_1');
alert('system/default_mods;public_mods_1');
}
if ($_GET["restore_mods"]) {
copy($f, $base . $nod . '.php');
define_mods('');
define_condition();
}
if ($_GET["refresh_mods"]) {
define_mods('');
define_condition();
}
if ($_GET["make_copy"]) {
msq_copy('users', ses('qb') . '_mods_' . ses('prmb1'), 'users', $nod);
define_mods('');
define_condition();
}
if ($_GET["default_mods"]) {
msq_copy('system', 'default_mods', 'users', $nod);
define_mods('');
define_condition();
}
$rt = array('backup' => 'save', 'restore' => 'left', 'refresh' => 'reload', 'copy' => 'copy', 'default' => 'file', 'mkdef' => 'export');
foreach ($rt as $k => $v) {
$rt[$k] = picto($v);
}
$ret = lkc('txtx" title="' . nms(94), $goto . '&backup_mods==', $rt['backup']);
if (is_file($f)) {
$ret .= lkc('txtx" title="' . nms(95), $goto . '&restore_mods==', $rt['restore']);
}
$ret .= lkc('txtx" title="' . nms(97), $goto . '&refresh_mods==', $rt['refresh']);
if ($p1 = ses('prmb1')) {
$ret .= lkc('txtx" title="' . nms(132) . ':' . $p1, $goto . '&make_copy==', $rt['copy']);
}
$ret .= lkc('txtx" title="' . nms(96), $goto . '&default_mods==', $rt['default']);
if (auth(6)) {
$ret .= lkc('txtx" title="' . nms(113), $goto . '&mk_default==', $rt['mkdef']) . ' ';
}
$ret .= hlpbt('console') . ' ';
$ret .= msqlink('', ses('qb') . '_mods_' . prmb(1));
$ret .= msqlink('system', 'admin_modules');
return $ret . br();
}
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 facil_globalc($k, $nc)
{
$r = css_default(1);
$ret .= btn('txtcadr', 'herit from _global.css') . ' ';
$ret .= msqlink('design', 'public_design_1') . br() . br();
if ($r) {
foreach ($r as $k => $v) {
$ncb = name_classe($v);
if ($ncb == $nc) {
$ret .= name_line_j($k, $v, 1, 1);
}
}
}
return $ret;
}
function plug_addfonts($d)
{
$here = 'addfonts';
//Head::add('css','../css/_admin.css')); Head::add('js','../progb/ajx.js'));
$r = msql_read('', 'public_addfonts', '');
$ret .= divc('txtalert', 'coller la classe @face-font (avec url absolue)') . br();
$ret .= txarea('txt', '', 60, 10);
$ret .= lj('txtbox', 'cbk_plug___' . $here . '_addfonts*j_1_2_txt', 'save') . br() . br();
//xd
if ($_SESSION['auth'] > 4) {
$ret .= divd('cbk', addf_read($r));
}
$ret .= msqlink('', 'public_addfonts');
$ret = divd('page', divd('content', $ret));
return $ret;
}
function plug_icons($d)
{
Head::add('csscode', icons_css());
Head::add('jscode', icons_js());
//echo js_code('addjs(\'\',\''.icons_js().'\',\'\')');
$ret .= lj('popbt', 'popup_plup___icons_icons*edit_new', picto('add'));
$ret .= btd('cbk', '') . br();
$ret .= divd('pctpanel', icons_read()) . br();
$ret .= msqlink('system', 'program_pictos');
return $ret;
}
function plug_tickets()
{
//$t=msql_read('lang','helps_plugs','tickets');
$ret .= btn('txtcadr', ' philum_discussions');
$ret .= msqlink('clients', 'philum_tickets') . br() . br();
$ret .= microxform() . br();
$ret .= divd('tickets', msqlxread());
return $ret;
}
function plug_spitable($d)
{
//echo js_code('document.onkeydown="if(event.keyCode == 39);');
$pub = msqlink('', 'public_atomic', '');
$ret = spi_table($d);
return divd('spi', $ret) . br() . spi_fams() . br() . $pub;
}
function plug_index()
{
$ico = picto('editxt');
$dir = 'plug/';
$plug = msql_read('system', 'program_plugs', '');
$help = msql_read('lang', 'program_plugs', '');
$mt = msql_read_prep('system', 'program_plugs_types');
$re = explore($dir, 'files', 1);
sort($re);
$rt = array('url', 'plugin', 'open', 'edit', 'do', 'usage', 'tag', 'private', 'interface', 'dev', 'old', 'modified');
foreach ($re as $k => $v) {
$va = substr($v, 0, -4);
$plg = $plug[$va];
if (auth(4)) {
$fi = lj('', 'popup_editmsql___system/program*plugs_' . ajx($va) . '__1', $ico) . ' ';
}
if (auth(4)) {
$hlp = lj('', 'popup_editmsql___lang/fr/program*plugs_' . ajx($va) . '__1', $ico) . ' ';
}
$do = $help[$va][0];
if ($do) {
$dobt = lj('', 'popup_popmsq___lang_program*plugs_' . ajx($va) . '_usage', picto('view'));
} else {
$dobt = '';
}
$edt = lj('', 'popup_plupin__3_codev_plug_' . $va, picto('conn'));
$mkc = '-';
$pb = $plg[3] ? $plg[3] : '-';
if ($plg[2] == 1) {
$op = lj('', 'popup_plupin__3_' . $va, picto('get'));
} else {
$op = '';
}
$lk = lkt('txtx', '/plugin/' . $va, picto('link'));
$tim = filemtime($dir . $v);
$dat = date($d ? $d : 'ymd', $tim);
if (substr($v, 0, 1) != '_' && substr($v, -4) == '.php' && $va) {
$ra['all'][] = $rv;
$ssh = $plg[4];
$dev = $plg[5];
$rv = array($lk, $fi . $va, $op, $edt, $hlp . $dobt, $plg[0], $plg[1], $pb, $ssh, $dev, $plg[6], $dat);
if (strpos($plg[1], ' ')) {
$kr = explode(' ', $plg[1]);
for ($i = 0; $i < count($kr); $i++) {
$ra[$kr[$i]][] = $rv;
}
} elseif ($plg[1]) {
$ra[$plg[1]][] = $rv;
} else {
$ra['new'][] = $rv;
}
}
}
foreach ($ra as $k => $v) {
$rd = array_merge(array($rt), $v);
if ($k == 'all') {
$rb[$k] .= msqlink('system', 'program_plugs');
} elseif ($mt[$k]) {
$rb[$k] .= divc('', current($mt[$k])) . br();
}
$rb[$k] .= make_table($rd, 'txtcadr', '');
}
return make_tabs($rb);
}
function twitart($d, $id)
{
$k = strrchr_b($d, '/');
$ret = msql_read('', ses('qb') . '_twit_' . $id, $k);
if (!$ret) {
list($t, $ret) = vacuum($d);
$r = msq_create('twit_' . $id, array($ret), array('txt'), $k);
}
$ret = format_txt_r('[' . $ret . ':q]', '', '');
if (auth(3)) {
$ret .= msqlink('', ses('qb') . '_twit_' . $id, $k);
}
return $ret;
}
function add_defcon($d)
{
$d = http_domain($d);
return msqlink('', (rstr(18) ? 'public' : $_SESSION['qb']) . '_defcons', ajx($d));
}
function slider_build($dir, $id, $opt)
{
//$dir.'+'.$id.'+'.$opt;
$hub = $_SESSION["qb"] . '_';
//$ret.=divd('popslide','');
if ($id == 'base') {
$nod = $dir;
} elseif (!$dir && $id) {
$r = sql('img', 'qda', 'v', 'id="' . $id . '"');
$re = explode("/", $r);
$predir = 'img/';
$nod = $hub . $id;
} elseif ($id == 'manual') {
// or (strpos($dir,'manual')!==false && $opt=='rebuild')
$predir = 'img/';
$nod = $hub . $_SESSION['read'] . 'manual';
$re = explode(",", str_replace("\n", "", $dir));
$opt = 'rebuild';
} elseif (strpos($dir, "/") !== false) {
$predir = 'users/' . $dir . '/';
$re = explore($predir);
$nod = $hub . str_replace("/", "", str_replace($_SESSION["qb"], "", $dir));
} else {
$nod = $dir;
$edit = 'ok';
list($hb, $nd) = split('_', $dir);
if (is_numeric($nd)) {
$dir = $dir;
} elseif (strpos($nd, 'manual') !== false) {
$edit = 'ok';
} else {
$rb = msql_read('gallery', $nod, '');
list($prd, $fil) = split_right('/', $rb[1][2], 1);
$predir = $prd . '/';
$dir = str_replace("users/", "", $prd);
$re = explore($predir);
}
}
$dor = ajx($dir, '');
$ret .= lj('popbt', 'popup_gallery', '<-') . ' ';
$ret .= lj('popbt', 'popup_slider__x_' . $dor . '_' . $id, picto('reload')) . ' ';
if ($edit) {
$ret .= lj('popsav', 'popup_slider__3x_' . $dor . '_' . $id . '_rebuild', "Rebuild") . ' ';
}
list($base, $table) = split('_', $nod);
if ($edit) {
$ret .= msqlink('gallery', $base . '_' . $table) . br();
} else {
$ret .= ljb("popbt", "insert_photo", $nod . '\',\'slider', "Slider (Flash)") . ' ';
$ret .= ljb("popbt", "insert_photo", $nod . '\',\'sliderJ', "SliderJ (Ajax)") . ' ';
$ret .= ljb("popbt", "insert_photo", $nod . '§1\',\'sliderJ', "SliderJ+thumbs") . br();
}
$ret .= br();
$dirg = 'msql/gallery/';
if (!is_dir($dirg)) {
mkdir($dirg);
}
$file = 'msql/gallery/' . $nod . '.php';
if ($re && (!is_file($file) or $opt == 'rebuild')) {
$r = slider_builder($re, $predir, $nod);
} else {
$r = msql_read('gallery', $nod, '');
}
$nodb = str_replace('_', '*', $nod);
if ($r['_menus_']) {
unset($r['_menus_']);
}
if ($r) {
foreach ($r as $k => $v) {
$img = image('gallery/mini/' . $v[1], '', '');
$rj = array('edit' . $k, 'plug', '', '', 'slider', 'slider*edit', $nodb, $k, '');
$imgnma = str_replace('*', '_', $v[0]);
$imgnm = jimg($v[2], $img) . br();
$imgnm .= call_func('popbt', $rj, $imgnma);
$datas[$imgnm] = array(divd('edit' . $k, $v[7]));
}
}
$ret .= make_tables('', $datas, 'txtred', 'txtblc" style="padding:4px;');
return popup($nod, $ret);
}
$ret .= $optb !== false ? stripslashes($r[$optb]) : $r;
break;
case "msqlread":
$ret = msq_goodtable($id . '_' . $va . '_' . $opt . '_' . $optb . '§' . $optb);
if ($res) {
req('pop,spe,art,tri');
$ret = format_txt_r(stripslashes($ret), '', '');
}
break;
case "popmsqt":
$rt = msql_read($id, $va, $opt);
if (is_array($rt)) {
$rt = $rt[$optb ? $optb : 0];
}
if (auth(6)) {
$ret = msqlink($id, $va, $opt) . ' ';
}
$ret .= nl2br(stripslashes($rt));
$t = $va . ' ' . $opt . ' ' . $optb;
$s = 440;
break;
case "msqlp":
$r = msql_read($id, $va, $opt);
$t = 'help';
$s = 550;
if (is_array($r)) {
$ret = make_divtable($r, 1);
} else {
$ret = $r;
}
break;
function twit_edit($p, $o, $rid)
{
$ret = input(1, 'twinp2', 'text to twit', '') . ' ';
$ret .= lj('', $rid . '_plug__2_twit_twit*post___twinp2', picto('export')) . ' ';
$ret .= lj('', $rid . '_plug__2_twit_twit*config', picto('tools')) . ' ';
$ret .= msqlink('', ses('qb') . '_twit') . ' ';
return $ret;
}
function plug_editor($reset = '')
{
secure_inputs();
if ($_SESSION["dev"] == "dev" or $_SESSION["dev"] == "lab") {
$g = "b";
}
req('pop,spe,art,tri');
Head::add('csscode', '.tabc{border:1px dotted grey;padding:10px;min-height:25px;width:550px;}');
Head::add('jscode', '
function SaveIcpb(){//convert
var opt=document.getElementById("txtareb").innerHTML;
document.getElementById("txt").value=opt;
SaveJ("txtarea_convhtml_txtareb_4");
toggle_tab(\'tab-1\',2);}
function editab(p){
var act=document.getElementById("edt").className;
if(act=="txtx" || p==1){var arr=[true,"on","txtred",""];}
else{var arr=[false,"off","txtx","none"];}
document.getElementById("txtareb").contentEditable=arr[0];
document.getElementById("txtareb").designMode="arr[1]"; void 0;
document.getElementById("txtareb").focus;
document.getElementById("edt").className=arr[2];
document.getElementById("edtc").style.display=arr[3];}
');
//Head::add('rel',array('shortcut icon',uicon('copy_16','edit2','/')));
$out["head"] .= div(atd('popup') . ats('position:fixed;'), '');
$out["head"] .= hidden('', 'socket', '');
if ($_GET['switch_defcon']) {
$_SESSION['rstr'][18] = $_SESSION['rstr'][18] == 0 ? 1 : 0;
}
$basedefs = $_SESSION['rstr'][18] == 0 ? 'public' : $_SESSION['qb'];
if ($reset == 'reset_cache') {
$_SESSION['vacuum'] = '';
}
####
if ($_GET["urlsrc"]) {
$urlsrc = $_GET["urlsrc"];
$_GET["urlsrc"] = $urlsrc = strdeb($urlsrc, '?utm_source');
$urlsrc = str_replace("\$", "?", $urlsrc);
foreach ($_GET as $k => $v) {
if ($k == "rssurl") {
$urlsrc = $v;
} elseif ($k != 'urlsrc') {
$urlsrc .= '&' . $k . '=' . $v;
}
}
}
if ($_POST["urlsrc"]) {
$urlsrc = $_POST["urlsrc"];
// && $_POST["txt"]==""
$_POST["urlsrc"] = $urlsrc = strdeb($urlsrc, '?utm_source');
}
if ($_POST["suj"]) {
$title = $_POST["suj"];
}
if (strpos($urlsrc, "http") === false && $urlsrc) {
$urlsrc = 'http://' . $urlsrc;
}
if ($urlsrc && $_POST["txt"] == "") {
list($title, $reb, $ret, $defid, $defs) = vacuum($urlsrc, "");
}
//echo txarea('',$ret,20,4);
####
//see h-number in html(mnu)
$tabnam = 'tbmdtab-1';
if ($_POST["urlsrc"] or $_POST["txt"] or $_POST["txb"]) {
$_SESSION[$tabnam] = '2';
$npb = $_SESSION['npnb'];
} elseif ($_POST["urlsrc"] && !$_POST["txt"]) {
$_SESSION[$tabnam] = '1';
}
//else $_SESSION[$tabnam]='0';//current_tab
if ($_POST["txt"]) {
$ret = stripslashes($_POST['txt']);
}
//html
if ($_POST["txb"]) {
$reb = stripslashes($_POST['txb']);
}
//conn
if ($_POST["title"]) {
$title = stripslashes($_POST['title']);
}
if ($_POST["convent"]) {
$ret = html_entity_decode($ret);
}
if ($_POST["convutf"]) {
$ret = utf8_decode($ret);
}
if ($_POST["convurl"]) {
$ret = urldecode($ret);
}
if ($_POST["urlencode"]) {
$ret = urlencode($ret);
}
if ($_POST["table2array"]) {
$reb = plugin_func('table2array', 'table2array_build', $reb);
}
if ($ret && !$reb) {
//if(!strpos($ret,'<br />') && strpos($ret,"\r"))$ret=nl2br($ret);
$reb = converthtml($ret);
//htmlentities //htmlspecialchars
$reb = html_entity_decode_b($reb);
$reb = html_entity_decode($reb);
$reb = convertmail($reb);
$reb = embed_links($reb);
} elseif (!$ret) {
$ret = format_txt(stripslashes($reb), 0, "");
}
//if(!$ret)
$ree = clean_br($ret);
#edit
//transformers
if ($_POST['repla']) {
if ($_POST['rec_prg']) {
$reb = ereg_replace(stripslashes($_POST['repla']), stripslashes($_POST['replb']), $reb);
} else {
$reb = str_replace(stripslashes($_POST['repla']), stripslashes($_POST['replb']), $reb);
}
}
if ($_POST['del_tab']) {
$reb = del_tables($reb);
}
//if($_POST['conn_to_del']){$reb=correct_txt($reb,$_POST['conn_to_del'],'correct');
// $reb=str_replace(array("¬","|"),"",$reb); $reb=clean_br($reb);}
if ($_POST['del_n'] == "ok") {
$reb = del_n($reb);
}
if ($_POST['clean_mail']) {
$reb = convertmail($reb);
}
if ($_POST["clean_punct"]) {
$reb = clean_punct($reb);
}
if ($_POST["add_punct"] == "ok") {
$reb = add_lines($reb);
}
if ($_POST['clean_br'] or $urlsrc) {
$reb = clean_br($reb);
}
/*----------------------*/
//import
if ($_SESSION["dev"]) {
$dv = ' ' . btn('txtsmall', $_SESSION["dev"]);
}
$out['head'] .= lkc("txtx", "/plug/editor", picto('editxt', 16) . $dv) . ' ';
//'₪'
//defcons
if (!$defid) {
$defid = str_replace(array('http://', 'www.'), '', $urlsrc);
$defid = substr($defid, 0, strpos($defid, '/'));
}
$defcon .= msqlink('users', $basedefs . '_defcons');
if ($_SESSION['rstr'][18] == 1 && $_SESSION['auth'] > 4) {
$defcon .= lkc("txtblc", '?switch_defcon==', "switch") . ' ';
$defcon .= lkt("txtblc", '/msql/users/' . $basedefs . '_defcons&append=users/public_defcons', "herit_from_public") . ' ';
$defcon .= lkt("txtblc", '/msql/users/public_defcons&append=users/' . $_SESSION["qb"] . '_defcons', "inform_public") . ' ';
} else {
$defcon .= btn('txtsmall', 'public_defcons') . ' ';
}
if ($defid) {
$defcon .= lj("txtred", 'popup_editmsql___users/' . $basedefs . '*defcons_' . $defid, "edit");
}
$otab['html'] .= '<form id="form1" name="coded" method="post" action="/plug/editor">';
$otab['html'] .= ljb('txtbox', 'document.coded.txt.select()', '', '::');
$otab['html'] .= submitj('txtbox', 'codeb', 'convert') . ' ';
$otab['html'] .= input2("text", "urlsrc", $urlsrc, '" size="36') . ' ';
if ($urlsrc) {
$otab['html'] .= lkt('txtx', $urlsrc, 'go') . ' ';
}
$otab['html'] .= br();
$otab['html'] .= '<textarea name="txt" id="txt" class="console" rows="21" cols="61">' . $ret . '</textarea>' . br();
//htmlentities
$otab['html'] .= $defcon . ' ';
$otab['html'] .= checkbox("objects", "ok", "objects", 0) . ' ';
//$otab['html'].=checkbox("jump","ok","not_convert",0).br();
$otab['html'] .= checkbox("nobr", "ok", "br", 0);
$otab['html'] .= checkbox("convent", "ok", "entities", 0) . ' ';
$otab['html'] .= checkbox("convutf", "ok", "utf8", 0) . ' ';
$otab['html'] .= checkbox("convurl", "ok", "url", 0) . ' ';
$otab['html'] .= checkbox("see", "ok", "show_work", 0) . br();
$otab['html'] .= lkt("txtblc", "/plug/converts", "conversions") . ' ';
$otab['html'] .= lkt("txtblc", "/plug/pad", "notepad") . ' ';
$otab['html'] .= lkt("txtblc", "/plug/ifram", "iframe") . ' ';
$otab['html'] .= lkc('txtblc', '/plug/editor/reset_cache', 'reset_cache') . ' ';
$otab['html'] .= '</form>';
//notepad
if ($_SESSION['USE']) {
$otab['connectors'] .= divs('position:absolute; right:0; top:0;', plugin('txt', $npb, 1));
}
$otab['connectors'] .= btn('txtit', $title);
$otab['connectors'] .= '<form name="converted" method="post" action="">';
$otab['connectors'] .= ljb('txtbox', 'document.converted.txb.select()', '', '::');
$otab['connectors'] .= submitj('txtbox', 'converted', 'modif') . ' ';
$otab["connectors"] .= div('', conn_correct($reb));
//local_reparation
$otab['connectors'] .= div(ats('width:630px;'), conn_edit(""));
$otab['connectors'] .= input(0, 'title', $title, '');
$otab['connectors'] .= '<textarea name="txb" id="txtarea" class="tab" rows="16" cols="68" wrap="VIRTUAL" onselect="storeCaret(this);" onclick="storeCaret(this);" onkeyup="storeCaret(this);" ondblclick="storeCaret(this);" onChange="clip.setText(this.value)">' . $reb . '</textarea><br>';
$otab['connectors'] .= '<div class="txtsmall2">';
$otab['connectors'] .= $defcon . ' ';
$otab['connectors'] .= checkbox("clean_mail", "ok", "clean_mail", 0) . ' ';
$otab['connectors'] .= checkbox("clean_br", "ok", "clean_br", 0) . ' ';
$otab['connectors'] .= checkbox("del_n", "ok", "del_nl", 0) . ' ';
$otab['connectors'] .= checkbox("add_punct", "ok", "add_nl", 0) . ' ';
$otab['connectors'] .= checkbox("clean_punct", "ok", "typo_rules", 0) . ' ';
$otab['connectors'] .= checkbox("del_tab", "ok", "del_tables", 0) . ' ';
$otab['connectors'] .= checkbox("table2array", "ok", "table2array", 0) . ' ';
//$otab['connectors'].='<label>delete:</label>'.balise("select",array(2=>"conn_to_del",5=>"txtblc"),batch_defil_kv(connectors_reference_lite(),"","vv")).' ';
$otab['connectors'] .= '</div>';
$otab['connectors'] .= divc('txtsmall2', 'replace by:') . '' . txarea("repla", $_POST['repla'], 15, 1) . ' ' . txarea("replb", $_POST['replb'], 15, 1) . ' ' . checkbox("rec_prg", "ok", "preg", 0);
$otab['connectors'] .= '</form>';
$otab['connectors'] .= lkt("txtblc", "/plug/converts", "converts") . ' ';
$otab['connectors'] .= lkt("txtblc", "/plug/pad", "notepad") . ' ';
$otab['connectors'] .= lkt("txtblc", "/plug/buildtable", "buildtable") . ' ';
//wysiwyg
//if($title)$otab["render"].=btn("txtit",$title).br();
$otab['render'] .= btd('bts', ljb('txtbox', 'SaveIcpb()', '', 'convert')) . ' ';
$otab['render'] .= ljb('txtx" id="edt', 'editab(0)', '', 'editable') . ' ';
$otab['render'] .= txareacb($ree, 'tabc panel justy');
$otab['render'] .= btd('bts', ljb('txtbox', 'SaveIcpb()', '', 'convert')) . ' ';
$otab['render'] .= ljb('txtx" id="edt', 'editab(0)', '', 'editable') . ' ';
$otab['render'] .= divd('popup', '') . "\n";
$otab['render'] .= divd('popw', '') . "\n";
$otab['render'] .= hidden('', 'socket', '');
$out["end"] .= '</body>' . "\n" . '</html>';
return implode("", $out) . make_tabs($otab);
}
