function plug_rssin($u)
{
req('pop,art,tri,spe');
Head::add('jslink', '/prog/utils.js');
if ($_GET['rssurl']) {
foreach ($_GET as $k => $v) {
if ($k == "rssurl") {
$u = $v;
} else {
$u .= '&' . $k . '=' . $v;
}
}
}
$u = str_replace('http://', '', $u);
if ($u) {
$alx = alx();
$rss = load_xml('http://' . $u, 1);
$ret .= bal('h1', lkt('', 'http://' . $u, preplink($u)));
$ret .= lkt("", '/?plug=rssin&rssurl=' . $u, picto('url'));
foreach ($rss as $k => $v) {
if ($v[1]) {
$ret .= pane_base($v[1], $v[0], "", rss_date($v[2]), "", $v[3], $alx);
}
}
}
return $ret;
}
function pad_write($p, $o, $res)
{
$pad = 'pad' . ses('USE') . date('ymd');
$f = 'plug/_data/' . $pad . '.txt';
write_file($f, ajxg($res));
return lkt('popbt', root() . $f, $pad);
}
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 api_file($ra)
{
$ra['template'] = 'fastart';
ses('nl', 1);
$ret = api_callr($ra);
$f = 'plug/_data/' . $ra['file'] . '.html';
ses('nl', 0);
write_file($f, $ret);
return lkt('', '/' . $f, $ra['file']);
}
function embed_li_dsnav($d, $v, $isr)
{
$_SESSION["nbsd"]++;
$ds = $_SESSION["ds"];
$qb = $_SESSION['qb'];
$xt = substr($v, -4);
if ($v) {
$f = $d . '/' . $v;
} else {
$f = $d;
}
if ($xt == ".jpg" or $xt == ".png" or $xt == ".gif") {
$img = make_thumb_c($f);
if (is_file($f)) {
list($w, $h) = getimagesize($f);
}
$ww = '_' . $w . '_' . $h;
}
$f = str_replace(array('users/', 'imgb/icons/'), '', $f);
$fb = ajx($f, 0);
if (is_numeric($ds)) {
//bkg
if ($isr) {
$ret = lj("popbt", 'bkg' . $ds . '_dsnav___' . $fb . '_bkg', $v);
} else {
list($w, $h) = getimagesize($f);
$tx = $v . ' (' . $w . ' * ' . $h . ')';
//if(is_file($f))
$ret = lj('', 'css' . $ds . '_stylsav___' . $fb . '_' . $ds . '_2', $img . $tx) . hr();
}
}
if ($ds == "gl") {
if ($isr) {
$ret = lj("popbt", 'popup_gallery__3x_' . $fb, $v);
}
}
//photo
if ($ds == "dl") {
$dlm = $_SESSION['qb'] . '/' . $_SESSION['dlmod'];
//dwnl
if ($isr) {
$ret = lj("popbt", 'dsnavds_dsnav___' . $fb . '_users/' . $dlm, $v);
} elseif ($img) {
$ret = ljb("popw", 'SaveBf', 'photo_users/' . $fb . $ww, $img . $v);
} else {
$ret = lkt("popw", $d . '/' . $v, $img . $v);
}
}
if ($ds == "ic" && !$isr) {
return $ret;
} elseif ($ret) {
return '├' . $ret . br();
}
}
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_backup_msql()
{
require 'plug/tar.php';
$f = 'plug/_data/msql_backup_' . date('ymd', time()) . '.tar.gz';
//unlink($f);
$r = read_dir('msql');
//p($r);
if (auth(6)) {
tar($f, $r);
}
if (is_file($f)) {
return lkt('txtyl', $f, $f);
} else {
return 'brrrr';
}
}
function plug_cards()
{
req('pop');
$data = sql('msg', 'qdm', 'v', 'id="' . $_GET['cards'] . '"');
$data = str_replace('[cards:plug]', '', $data);
$obj = format_txt($data, 3, $_SESSION['read']);
$obj = nl2br($obj);
$size = msql_read('system', 'edition_cards', '');
//p($size);
$styl = '" style="float:left; width:' . $size['card_width'] . 'px; height:' . $size['card_height'] . 'px; margin:' . $size['card_margin'] . 'px; border:' . $size['card_border'] . ';';
for ($i = 0; $i < 10; $i++) {
$ret .= divc($styl, $obj);
}
if ($_GET['cards']) {
Head::add('csscode', '/css/' . $_SESSION['qb'] . '_design_' . $_SESSION['prmd'] . '.css');
return divc('" style="width:' . $size['page_width'] . 'px; padding:' . $size['page_padding'] . 'px;', $ret);
} else {
return lkt('txtx', '/plug/cards.php?cards=' . $_SESSION['read'], 'open');
}
}
function embed_gallery($f, $id)
{
$w = currentwidth();
$h = $w * (3 / 4);
if (!$f) {
$cachefile = $id;
} else {
$cachefile = $f;
}
$fvars = '&servr=' . host() . '/&rot=' . $cachefile . '&clr=' . $_SESSION['clrs'][$_SESSION['prmd']][6];
$file = 'gallery/cache/' . str_replace("/", "--", $cachefile . '/') . '.php';
$goto = 'gallery/gal.php?root=' . $f . '&pid=' . $id . '&rebuild==';
if (!is_file($file)) {
return lkt('red', $goto, picto('alert'));
}
if ($_SESSION['USE']) {
$add = lkt('', $goto, picto('builders'));
}
return embed_flsh('fla/gallery.swf', $w, $h, $fvars) . $add;
}
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 finder_flap_files($r, $o, $p)
{
$jc = fi_droot();
foreach ($r as $k => $v) {
if (!$v['r']) {
$furl = $jc . $v['url'];
if ($v['img']) {
list($w, $h) = fi_sizes($furl);
$ico = ljb('', 'SaveBf', 'photo_users(slash)' . $v['j'] . '' . $w . '_' . $h, $v['img']) . ' ';
} else {
$ico = mimes($v['xt'], '', 18) . ' ';
}
$op = lkt('txtsmall', $furl, picto('url')) . ' ';
if ($v['xt'] == '.mp3') {
$mp3 = 1;
}
if ($v['xt'] == '.jpg') {
$jpg = 1;
}
$lk = lj('', 'popup_fifunc___fi*reader*pop_' . $v['j'] . $v['dist'], etc($v['f'], 40)) . ' ';
if (!auth(4)) {
$sh = lkc('', 'plug/download.php?file=' . $furl, fi_pic('download'));
} elseif ($v['prop'] == $_SESSION['qb']) {
$sh = fi_info_shared($v['url'], randid());
}
$ret .= divc('', $ico . $op . $sh . $lk);
}
}
$dir = '../' . str_extract('/', $furl, 1, 0);
if ($mp3) {
$rt = lj('', 'popup_callp___pop_jukebox_' . $dir . '_autosize', picto('play'));
}
if ($jpg) {
$rt = lj('', 'popup_callp___pop_gallery*j_' . $dir . '_autosize', picto('play'));
}
return $rt . $ret;
}
}
if ($n == 'call' or $n == 'callp') {
if ($n == 'callp') {
$t = $va;
}
if ($res) {
list($s, $h) = split('-', $res);
}
$s = $s ? $s : 640;
if ($id) {
req(str_replace('-', ',', $id));
}
$ret = call_user_func_array($va, array($opt, $optb, $res));
}
if ($n == 'plup' or $n == 'plupin') {
$p = lkt('', '/plug/' . $id . '/' . $va, picto('url')) . ' ';
}
//if(strpos('art popart popartmod',$n))eye();//api apij
if ($n == 'popart') {
eye();
}
if ($_GET['popup'] && $tt) {
$t = $tt;
}
if ($_GET['pagup']) {
$ret = pagup($t, $ret, $p);
} elseif ($t) {
$ret = popup($t, $ret, $s, $p);
}
//
if (Head::$add) {
function video_url($d, $p, $t = '')
{
$t = $t ? $t : $p;
if ($p == 'vimeo') {
$u = 'vimeo.com/' . $d;
} elseif ($p == 'youtube') {
$u = 'youtube.com/watch?v=' . $d;
} elseif ($p == 'daily') {
$u = 'dailymotion.com/video/' . $d;
}
if ($u) {
return lkt('', 'http://' . $u, $t);
} else {
return $t;
}
}
function plink($f)
{
return lkt('popbt', $f, preplink($f));
}
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 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 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;
}
$rstr13 = $_SESSION['rstr'][13];
$_SESSION['rstr'][13] = 1;
if (!$_SESSION["keep"][$id]) {
$rtb .= '<a name="top' . $id . '">';
$rtb .= date($_SESSION["prmb"][17], $cnt[0]) . ' ' . lkc("", '#' . $id, $cnt[2]) . ' [' . art_lenght($cnt[8]) . '] ' . $tj . br();
} else {
$rtc .= date($_SESSION["prmb"][17], $cnt[0]) . ' <small>' . lkc("", '#' . $id, $cnt[2]) . ' ' . art_lenght($cnt[8]) . '</small> ' . $tj . br();
}
if (!$_SESSION["keep"][$id]) {
$rtr .= '<a name="' . $id . '">';
$rtr .= lkc("", '#top' . $id, "^") . divc("titres", $cnt[2]) . br();
$rtr .= '<div class="txtfrmb">';
$rtr .= '<div class="txtb">';
$rtr .= '' . date($_SESSION["prmb"][17], $cnt[0]) . ' ';
$rtr .= art_lenght($cnt[8]) . ' ';
$rtr .= lkt('', '/' . $id, '>');
$rtr .= br() . br();
$rtr .= '</div>';
$rtr .= '<div class="justy">';
$msg = sql('msg', 'qdm', 'v', 'id="' . $id . '"');
$msg = correct_txt($msg, 'striplink', 'correct');
$msg = format_txt($msg, "nl", $id);
$rtr .= $msg;
$rtr .= '</div>';
$rtr .= '</div>';
$rtr .= br() . hr() . br();
$duree += $cnt[8];
if ($_GET["save_xml"]) {
$i++;
$xml .= bald("id", $id);
$xml .= bald("title", $cnt[2]);
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 plug_umvoc($p, $o)
{
ses('nl', 1);
ses('umvcnod', 'ummo_umvoc_1');
ses('qdvoc', qd('umvoc'));
ses('qdvoc_b', qd('umvoc_arts'));
$ret = slct_j($p) . ' ';
$ret .= lj('', 'usrch___4', picto('del')) . ' ';
$ret .= input(1, 'usrch', $p, '') . ' ';
$ret .= lj('popsav', 'ucbk_plug___umvoc_ud*search_' . ajx($p) . '__usrch|udsnd', 'chercher') . ' ';
$ret .= checkbox_j('udsnd', 1, 'soundex') . br() . br();
//|chk
$ret .= divd('ucbk', ud_search($p, '1', '')) . br();
$ret .= msqlink('', ses('umvcnod'), '') . ' ';
$ret .= lkt('', '/plug/umvoc', picto('link'));
return $ret;
}
function batch_preview($f, $sug = '')
{
req('pop,spe,tri');
$f = http($f);
$_GET['urlsrc'] = $f;
$w = prma('content');
list($suj, $msg) = vacuum($f);
$msg = embed_links($msg);
$msg = clean_br_lite($msg);
$msg = clean_punct($msg);
$msg = format_txt($msg, '', 'test');
$sty = atc('justy') . ats('width:' . $w . 'px;');
if (strlen($msg) > 400) {
$sty .= atd('scroll');
}
$titl = bal('h2', $suj);
$_SESSION['sugm'] = $sug;
$rid = randid('btch');
$rel = lj('', 'popup_call__x_ajxf_batch*preview_' . ajx($f) . '_', pictit('reload', nms(101))) . ' ';
$rel .= lj('', 'popup_addArt__x_' . ajx($f) . '_1', picto('edit')) . ' ';
if (auth(6)) {
$titl .= $rel . urledt($f) . ' ';
}
$titl .= lkt('', $f, picto('url'));
if (auth(6)) {
$titl .= newartcat($f);
}
$ret .= bal('section', bal('header', $titl) . balb('article', $sty, $msg));
//$_SESSION['vacuum'][$f]='';
return popup(preplink($f), $ret, $w);
}
function backup_config()
{
$f = 'params/' . ses('qb') . '_saveconfig.txt';
$goto = '/?admin=' . $_GET["admin"];
$ret .= lkc("popbt", $goto . '&backup_config==', "backup_config") . ' ';
if (is_file($f)) {
$ret .= lkc("popbt", $goto . '&restore_config==', "restore_config") . ' ';
}
$ret .= lkt("popbt", $f, "config") . ' ';
if ($_SESSION["auth"] >= 5) {
if ($_GET["backup_config"]) {
$ret .= lkc("txtred", $goto . '&reset_config==', "!! default_config") . ' ';
$tosave = implode("#", $_SESSION['prmb']);
write_file($f, $tosave);
}
if ($_GET["restore_config"]) {
$config = read_file($f);
$_SESSION['prmb'] = explode('#', $config);
update("qdu", "config", $config, "name", ses('qb'));
$ret .= lkc("popdel", $goto, "old_config_restored");
relod($goto);
}
if ($_GET["reset_config"]) {
$prmdef = ndprms_defaults();
$config = ses('qb') . $prmdef[1];
$_SESSION['prmb'] = explode('#', $config);
update("qdu", "config", $config, "name", ses('qb'));
relod($goto);
}
}
return $ret;
}
function miniconn_w($doc, $h)
{
list($pd, $c) = split_one(':', $doc, 1);
if ($c && $pd != 'http') {
$d = sconn_defs_r($pd, $c);
if ($d != $doc) {
return $d;
}
}
if ($c) {
$d = sconn_defs_app($pd, $c, $h);
if ($d) {
return $d;
}
}
list($p, $o) = split_one('§', $doc, 1);
if ($o) {
if (is_numeric($p) && $o) {
return pop_art('http://' . $h . '/' . $p . '§' . $o);
} elseif ($p && $o) {
return lkt('', $p, pictxt('get', $o));
}
}
$xt = strtolower(strrchr($doc, '.'));
if ($xt == '.mp3') {
$j = ajx(goodroot($doc, $h));
return lj('', 'popup_popmp3___' . $j, pictxt('music', strrchr_b($doc, '/')));
}
if ($xt == '.pdf') {
return pdfreader($doc);
}
if (is_image($doc)) {
$im = goodroot($doc);
if (@is_file($im)) {
return popim($im, picto('img'));
} elseif (strlen($doc) > 4) {
return popim_w($im, $h);
}
}
if (strpos($doc, "@") !== false && strpos($doc, '.') !== false) {
return lka('mailto:' . $doc, strdeb($doc, '@'));
}
if (substr($doc, 0, 1) == '@') {
return poptwit(substr($doc, 1));
}
//if(substr($doc,0,1)=='@')return plugin_func('tracks','track_answer',substr($doc,1),'');
//if(substr($doc,0,1)=='#')return call_plug('','popup','chatxml',substr($doc,1),pictxt('chat',substr($doc,1)));
if ($pd == 'http') {
return lkt('', $doc, pictxt('get', http_domain($doc)));
}
return $doc;
}
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 facil_images($k, $url, $val)
{
$ret .= btn('txtx', toggle('', 'bkg' . $k . '_dsnav_bkg_' . $k, 'backgrounds')) . ' ';
if (strpos($val, ':url(/') !== false) {
$ret .= lkc("txtred", $url . '&save_img=' . $k . '&erase_img==', 'delete_background');
}
$ret .= btd('bkg' . $k, '');
$mnu_bkg = array('', "no-repeat", "repeat-x", "repeat-y", "repeat");
$mnu_im_align = array('', "left", "right", "center");
$mnu_im_valign = array('', "top", "bottom", "center");
if (strpos($val, "background:url") !== false) {
$t_ims = embed_detect($val, "background:url", ";", '');
}
list($urb, $reap, $fixd, $alg, $vlg) = explode(" ", $t_ims);
if ($fixd) {
$chk = ' checked';
}
if ($urb) {
$urb = substr($urb, 1, -1);
$ret .= lkt('txtx', $urb, 'open') . br();
}
$mnu .= select(atn('repeat'), $mnu_bkg, 'vv', $reap) . ' ';
$mnu .= select(atn('align'), $mnu_im_align, 'vv', $alg) . ' ';
$mnu .= select(atn('valign'), $mnu_im_valign, 'vv', $vlg) . ' ';
$mnu .= checkbox('fixed', 'fixed', 'fixed', $chk);
//$upl=upload_btn('upl',$url.'&save_img='.$k,'upload').br();
return $ret . imgform($url . '&save_img=' . $k, $mnu, '');
}
function twit_from($q)
{
$name = utf8_decode($q['user']['name']);
return lkt('txtx', 'https://twitter.com/' . $q['user']['screen_name'] . '/status/' . $q['id'], $name);
}
function prepare_tits($id, $r, $rear, $nbtrk, $nl, $prw)
{
$ib = trim($r['ib']);
$nl = $nl ? $nl : $_SESSION['nl'];
$rst = $_SESSION['rstr'];
$USE = $_SESSION['USE'];
$read = $_SESSION['read'];
$page = $_SESSION['page'];
if ($nl == 'nlpop') {
$nl = '';
$nlp = 1;
}
$out['jurl'] = 'content_ajxlnk2__2_art_' . $id;
$out['purl'] = 'popup_popart__3_' . $id . '_3';
$out['day'] = $r['day'];
$out['artedit'] = ' ';
$nlb = substr($nl, 0, 2);
if ($nlb == "nl") {
$http = host();
}
$out['url'] = $http . good_url($id, $r['suj']);
//urlread($id);
if (!$rst[19]) {
$out['img1'] = first_img($r['img']);
}
//img1
if (!$rst[68] && $r['img'] && strpos($r['img'], '/')) {
//gallery
$out['btim'] = lj('', 'popup_callp___spe-ajxf_art*gallery_' . $id . '_gallery', picto('img'));
}
if ($_SESSION['prma']['art_mod']) {
if ($read == $id && $prw > 2 && !$nl && !$nlp && rstr(60)) {
$out['float'] = build_art_mod(1);
}
// $out['float']=mkbub(popbub('seek','',picto('list'),'c'),'inline','position:relative; display:inline-block;','');//seek
$out['open'] .= lj('', 'popup_popartmod__3_' . $id, picto('virtual')) . ' ';
}
if (!$rst[31]) {
$out['back'] = art_back($id, $ib, $r['frm']);
}
//back
if (!$rst[6] && $r['name'] != ses('qb')) {
//author
$out['author'] = lka(htac('author') . $r['name'], $r['name']);
}
if (!$rst[23] && $r['re'] > 1) {
$out['priority'] = picto('s' . ($r['re'] - 1), 16);
}
if (!$rst[24]) {
$day = mkday($r['day'], 1);
//date
if (!$rst[54]) {
$out['date'] = lka(target_date($r['day']), $day);
} else {
$out['date'] = $day;
}
}
if (!$rst[26]) {
$out['pid'] = $id;
}
//id
if (!$rst[29]) {
$out['tag'] = tag_maker($id);
}
//tags
if ($nl != 'nl') {
$out['edit'] = admin_edit($r['name'], $id, $r['re'], $prw);
}
//edit
if (rstr(27) && trim($r['mail'])) {
$out['source'] = pub_link($r['mail']);
}
//source
if ($_GET['search'] && $nl) {
$out['search'] = nbof($nl, 19);
}
//rech
if ($rear > 1 && rstr(43)) {
$out['nbarts'] = lj('', 'popup_getcontent___parent_' . $id, nbof($rear, 1));
}
//nb_arts
if (is_array($nbtrk)) {
$nbtk = count($nbtrk);
//tracks
if ($read) {
$out['tracks'] = lka(urlread($id) . '#trackback', picto('forum') . $nbtk);
} else {
$out['tracks'] = lj('', 'popup_trckpop___' . $id, picto('forum') . $nbtk);
}
}
if ($ib > 0 && $read != $id && $read != $ib) {
$sujb = suj_of_id($ib);
//parent
if ($sujb) {
$out['parent'] = lka(urlread($ib), pictxt('copy', $sujb));
}
}
if (!$rst[58] && $nlb != "nl") {
$out['open'] .= lj('', 'popup_editbrut___' . $id, picto('conn')) . ' ';
}
if (!$rst[37] && $nlb != "nl") {
$out['open'] .= popart($id) . ' ';
}
//popen
if (!$rst[28] && $nlb != "nl") {
//open
if ($prw <= 2 && $rst[41] != "0") {
$out['open'] .= opnart($id, $prw, '') . ' ';
} elseif ($prw == 3 && $rear > 1) {
$out['open'] .= opnart($id, 2, '1') . ' ';
}
}
if (!$rst[25] && $r['host'] > 1000) {
//lenght
$out['lenght'] = picto('time', 16) . ' ' . art_lenght($r['host']);
}
if (!$rst[40]) {
//rss
$out['rss'] = lkt("", '/plug/rss1.php?read=' . $id . '&preview=full', picto('rss', 16));
}
if (!$rst[71] && $nlb != "nl") {
$out['social'] = lj('', 'popup_artstats___' . $id . '_' . $r['day'], picto('users', 16));
}
//if($ath=@$r['opts']['authlevel'])$out['social'].=asciinb($ath);
if ($nlb != "nl") {
$root = host() . urlread($id);
//social//&via=philum_info
$rsoc = array(44 => 'http://www.facebook.com/sharer.php?u=' . $root, 45 => 'http://twitter.com/intent/tweet?original_referer=' . $root . '&url=' . $root . '&text=' . utf8_encode($r['suj']) . '&title=' . utf8_encode($r['suj']), 46 => 'http://wd.sharethis.com/api/sharer.php?destination=stumbleupon&url=' . $root);
if (auth(6) && !$rst[45]) {
$out['social'] .= lj('', 'popup_plup___twit_twit*share_' . $id, callico('tw'));
}
if (!$rst[45]) {
$out['social'] .= lkt('', $rsoc[45], callico('tw'));
}
if (!$rst[44]) {
$out['social'] .= lkt('', $rsoc[44], callico('fb'));
}
if (!$rst[46]) {
$out['social'] .= lkt('', $rsoc[46], icon('stumble'));
}
if (!$rst[52]) {
$out['social'] .= favs_edt($id) . ' ';
}
// if(!$rst[86])$out['social'].=lj($css,'popup_track___'.$id,picto('forum')).' ';
if (!$rst[47]) {
$out['social'] .= lj('', 'popup_vmail___' . $id, callico('mail')) . ' ';
}
if (!$rst[12]) {
$out['social'] .= lkt('', '/plug/read/' . $id, picto('print')) . ' ';
}
if (!$rst[49]) {
$out['words'] = lj('', 'popup_words___' . $id, picto('search'));
}
}
if ($_SESSION['plgs'] && $nlb != "nl") {
$out['social'] = $_SESSION['plgs'];
}
$out['artlang'] = lang_art($id, $r['opts']);
$out['lang'] = lang_rel_arts($id, $r['opts']);
if (!$rst[50] or $USE) {
$out['opt'] = btn('txtsmall2', picto('view', 16) . ' ' . $r['lu']) . ' ';
}
//nbof
$out['sty'] = '';
return $out;
}
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);
}
