function admin_art_edit($id)
{
$msg = sql('msg', 'qdm', 'v', 'id=' . $id);
$ath = data_val('msg', $id, 'authlevel');
if ($ath > $_SESSION['auth']) {
return popup('article ' . $id, nms(55));
}
//$msg=str_replace('['.ses('qb').'/','['.host().'/users/'.ses('qb').'/',$msg);
//$msg=str_replace('['.ses('qb'),'['.host().'/img/'.ses('qb'),$msg);
$j = 'popup_editbrut_edit' . $id . '_x_' . $id;
if (auth(5)) {
$ret = btn('', btd('bts', lj('popsav', $j, 'save'))) . ' ';
}
$ret .= lj('txtbox', 'pop_editbrut___' . $id, 'connectors') . ' ';
$ret .= lj('txtbox', 'edit' . $id . '_delconn__4_' . $id, 'text') . ' ';
$ret .= lj('txtbox', 'edit' . $id . '_conn2__4_' . $id, 'html') . ' ';
$ret .= hlpbt('conn_pub') . br();
$ret .= txarea('edit' . $id, $msg, 64, 20, 'console');
return popup('article ' . $id, $ret);
}
function tar_com($p, $o)
{
$rid = 'plg' . randid();
$id = 'del' . $o;
$ret .= autoclic($id, $p ? $p : $o, 44, 1000, '', 1);
$ret .= lj('popsav', $rid . '_plug__xd_del_delj_' . $o . '__' . $id, 'ok') . ' ';
$ret .= btd($rid, '') . br();
return $ret;
}
function pane_base($url, $suj, $frm, $day, $img, $msg, $alx)
{
static $id;
$id++;
//$msg=ereg_replace('width='."^[_a-zA-Z0-9.]+$","",$msg);//([[:digit:]]*)
$ara = array("<![CDATA[", "]]>");
$suj = str_replace($ara, " ", $suj);
$url = str_replace($ara, " ", $url);
$msg = str_replace($ara, " ", $msg);
if ($img != "") {
$gmi = '<img src="' . $img . '" class="imgl" border="0" height="72">';
}
$id_art = recognize_article($url, clean_title($suj), $alx);
//already_exists
if ($id_art) {
$opt .= popart($id_art);
} elseif ($_SESSION["USE"] == $_SESSION["qb"] or $_SESSION["auth"] > 3) {
$purl = ajx($url, '');
$opt .= ljb('txtx', 'SaveJ', 'popup_addArt___' . $purl . '_1', "save") . ' ';
//$opt.=ljb('txtbox','SaveIf',$purl,'save').' ';
$opt .= btd('btc' . $id, lj('txtx', 'btc' . $id . '_batch__xd_' . $purl . '_p', '+')) . ' ';
$opt .= ljb('txtx', 'Close', 'art' . $id, 'x');
}
$panout = array('sty' => 'tab', 'id' => $id, 'suj' => $suj, 'date' => $day, 'tag' => " ", 'opt' => $opt, 'thumb' => $gmi, 'msg' => $msg, 'url' => $url);
$ret = template_build(template_rss(), $panout);
return divd('article', $ret);
}
function del_com($p, $o)
{
$rid = 'plg' . randid();
$id = 'del' . $o;
$ret .= inp('inp' . $o, $p ? $p : $o, atz(44)) . ' ';
$ret .= lj('popsav', $rid . '_plug___del_delj_' . $o . '__inp' . $o, 'delete') . ' ';
$ret .= btd($rid, '') . br();
return $ret;
}
function plug_msqadd($p, $o)
{
$p = $p ? $p : '1';
$bt .= balise('input', atd('type', 'text') . atd('nod') . atv($p) . ats('padding:4px;'), '', 1) . ' ';
$bt .= lj('txtbox', 'cbk_plug___msqadd_msqadd*j_' . ajx($p) . '__nod|txt', 'save') . ' ';
$bt .= btd('cbk', '') . br();
//callback
$bt .= txarea('txt', '', 60, 10, ats('font-size:medium; padding:4px; width:340px; height:300px;')) . br();
$ret = msqadd_read('msqadd_' . $p);
return $bt . divd('plugmsqadd', $ret);
}
function plug_ftext($d, $tx)
{
$nd = stext_log();
$ra = msql_read('', $nd . '_txt_ftxt', '1');
$msg = stripslashes($ra[1]);
$msg = html_entity_decode_b($msg);
if (!$ra && $nd) {
msql_modif('users', $nd . '_txt_ftxt', array('day', 'text'), '', 'one', 1);
}
$ret .= btd('bts', lj('', 'bck_plug__xd_ftext_ftext*j_ftxt__ftxt', picto(save))) . ' ';
$ret .= btd('bck', '') . hlpbt('ftext') . br();
if (!$tx) {
$ret .= txarea('ftxt', $msg, 54, 12);
}
return btd('plgtxt', $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_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 plug_codev($p, $o, $fc = '')
{
//echo $fc;
$dr = ($p == 'plug' ? $p : 'progb') . '/';
$oa = $o . '.php';
if (!is_file($dr . $oa)) {
$oa = $o . '.js';
}
$sav = 'save: ' . $oa;
if ($p) {
$d = read_file($dr . $oa);
}
$d = str_replace(array('<' . '?php' . "\n", "\n" . '?' . '>', '<' . '?php', '?' . '>'), '', $d);
if ($fc) {
$d = find_end($d, 'function ' . $fc . '(', '{', '}');
}
//$ret.=txarea('txt',htmlentities($d),52,26,atc('console')).br();
$ret .= lj('', 'codev_plugin___codev_' . $p . '_' . $o . '_' . $fc, picto('reload')) . ' ';
$ret .= btd('bts', lj('popsav', 'cbk_plug__xd_codev_codsav_' . $p . '|' . ajx($oa) . '|' . ajx($fc) . '__txt', $sav)) . btd('cbk', '') . br();
$ret .= '<textarea id="txt" class="console" style="min-width:550px; min-height:320px;">' . $d . '</textarea>';
//htmlentities
return divd('codev', $ret);
}
function rssj($p, $o)
{
$r = msql_read('', ses('qb') . '_' . $p, '', 1);
//$r=msq_sort($r,1,'');
if ($r) {
foreach ($r as $k => $v) {
if ($v[2] == $o or !$o) {
if (substr($v[0], 0, 4) == 'http') {
$v[0] = substr($v[0], 7);
}
if ($v[0]) {
$ret[$v[2]] .= toggle('', 'rsj' . $k . '_rssj_' . $k . '_' . ajx($v[0], ''), $v[1] ? $v[1] : preplink($v[0])) . ' ' . btd('rsj' . $k, '') . br();
}
}
}
}
//$v[2]
//foreach($ret as $k=>$v){ksort($v); $ret[$k]=implode('',$v);}
if (auth(6)) {
$b = msqlink('', ses('qb') . '_' . $p) . ' ';
}
return make_tabs($ret, 'rss', 'nbp') . $b;
}
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 poplist()
{
$rid = randid('ppl');
$_SESSION['popm'] = ljb('philum', 'poplist', $rid, btd($rid, 'é')) . ' ';
}
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_txt($d, $tx)
{
$nd = txt_log();
if ($d) {
$ra = msql_read('', $nd . '_txt_' . $d, '');
}
$msg = stripslashes($ra[1][1]);
$msg = html_entity_decode_b($msg);
if ($d && !$ra && $nd) {
msql_modif('users', $nd . '_txt_' . $d, array('title', ''), '', 'one', 1);
}
$ret .= st_paste($d) . ' ';
if ($d) {
$ret .= input('text', 'tit', stripslashes($ra[1][0])) . ' ';
}
$ret .= stx_btn($d, $nd, $tx) . br();
if (!$tx) {
$ret .= txarea('txtarea', $msg, 44, 4, ats('min-width:640px; min-height:400px; font-size:large; padding:16px;'));
}
return btd('plgtxt', $ret);
}
function lj_tog($n, $d, $v)
{
return toggle('', $n . $d . '_' . $n . '_' . $d, $v) . btd($n . $d, '');
}
function trk_redit($id)
{
$msg = sql('msg', 'qdi', 'v', 'id=' . $id);
$ret = lj('popsav', 'trk' . $id . '_trkedit_trkedit_x_' . $id . '', 'save') . btd('bts', '') . ' ';
$ret .= micro_connedit('trkedit') . br() . txarea('trkedit', $msg, 80, 16, atc('console')) . br();
return $ret;
}
function kbtog($d, $t)
{
$id = 'oo' . randid();
$v = ses($d);
return lj('', $id . '_togses___' . $d, btd($id, offon($v)) . $t);
}
function plug_stext($d, $tx)
{
$nd = stext_log();
if ($d) {
$ra = msql_read('', $nd . '_txt_' . $d, '');
}
$msg = stripslashes($ra[1][1]);
$msg = html_entity_decode_b($msg);
if ($d && !$ra && $nd) {
msql_modif('users', $nd . '_txt_' . $d, array('title', ''), '', 'one', 1);
}
$ret .= st_paste($d) . ' ';
if ($d) {
$ret .= input('text', 'tit', stripslashes($ra[1][0])) . ' ';
}
$ret .= stx_btn($d, $nd, $tx) . br();
if (!$tx) {
$ret .= txarea('txtarea', $msg, 64, 20);
}
return btd('plgtxt', $ret);
}
function edit_tags($idart, $cat, $ico)
{
$rid = $cat . $idart;
$auto = lj('', 'slct' . $rid . '_matchtag__3_' . $idart . '_' . ajx($cat), '▼') . '';
$picto = lj('', 'slct' . $rid . '_call__3_meta-spe_list*tags_' . $idart . '_' . ajx($cat), picto($ico)) . '';
$r = read_tags($idart, $cat);
$ret = del_tag_btn($r, $idart, $cat);
$js = '" onkeyup="autocomp(\'' . $idart . '_' . $cat . '\');';
//addtag
$js .= '" onclick="autocomp(\'' . $idart . '_' . $cat . '\');';
$inp = input('', 'inp' . $rid, $cat . $js, '', 1, 12) . '';
return divc('nbp', $picto . $auto . $inp . btd($rid, $ret) . divd('slct' . $rid, ''));
}
function func_edit($v, $d, $p, $f)
{
$view = $d . '/' . $p . '.php';
//if($p)$_SESSION['crpag'][$p]=$d;
if ($f) {
$_SESSION['crfnc'][$f] = array($d, $p, $f);
}
if ($d) {
$fd = round(filesize($view) / 1024, 2) . 'Ko';
}
//$vb=clean_f($view);
$ret .= btn('txtcadr', $d . '/' . $p . '/' . $f . ' (' . $fd . ')') . ' ';
$jx = 'edsv_plug__xd_dev_func*sav_' . $d . '|' . $p . '|' . ajx($f, '') . '__txtarea';
if (auth(6)) {
$ret .= lj('popsav', $jx, 'save');
}
//save
$ret .= btd('edsv', '') . ' ';
$ret .= lj('popbt', 'popup_plup___dev_cancel*menu_', 'history') . ' ';
//$ret.=lj('txtx','edc_plug__2_dev_func*edit*j_'.$d.'|'.$p.'|'.ajx($f,''),'refresh');
//$ret.=openpages();
//$db=$_SESSION['crdir']?$_SESSION['crdir']:'progb||';//func_menus
$ret .= lj('popbt', 'popup_plup___dev_func*menus_' . $d, 'open') . ' ';
$ret .= hlpbt('dev') . br() . br();
$ret .= openfuncs();
//if($d=='progb')$ret.=ljb('txt','SaveJ','edc_plug___dev_func*copy','prod').' ';
$ret .= txarea('txtarea', parse($v), 64, 20, atc('console') . atb('onclick', 'detctfunc(this)') . atb('ondblclick', 'findfunc(this)') . atb('wrap', 'on'));
//$v=parse($v); $v=highlight_string('<'.'?php'.$v.'?'.'>',true);
//$v=str_replace(array('FF8000','007700','0000BB','DD0000','0000BB'),array('FF8000','00ee00','afafff','eeeeee','ffbf00'),$v);
//$sj='SaveG(this,event,\'txarec_plug_dev_dev*render\')';
//$ret.=divedit('txarec','console','width:545px;',$sj,$v);
return $ret;
}
function f_inp($mil, $link)
{
$_SESSION['cur_div'] = 'content';
$ip = hostname();
$qda = $_SESSION['qda'];
$USE = $_SESSION['USE'];
$cont = $_GET['continue'];
$read = $_SESSION['read'];
$raed = $_SESSION['raed'];
$frm = $_SESSION['frm'];
if ($USE) {
$us = $USE;
} else {
list($us, $ml) = sql('name,mail', 'qdi', 'r', 'host="' . $ip . '" ORDER BY id DESC LIMIT 1');
}
$currid = lastid('qda') + 1;
if ($frm == "" or $frm == "Home") {
$frm = "public";
}
//sections
if ($_GET['edit'] == "=") {
$cit = "&edit==";
}
$goto = '/?read=' . $read . $cit;
if (substr($link, 0, 4) == 'http' && !$cont) {
$link = https(utmsrc($link));
//vacuum
$_GET['urlsrc'] = $link;
list($suj, $msg) = vacuum($link, '');
}
//elseif($read)$link=$_SESSION['rqt'][$read][9];
if (!$cont) {
$r['urlsrc'] = autoclic('urlsrc', "url", '10" id="urlsrc" onClick="SaveI(\'urlsrc\')" onContextMenu="SaveIt()" value="' . $link, '250', '') . btd('urledt', '');
}
//urlsrc
if ($USE && !$cont) {
$r['trkname'] = hidden('name', 'trkname', $USE) . hidden('mail', 'trkmail', '');
$r['slcat'] = select_j('frm', 'category', $frm, '3', $frm, '');
} elseif (!$USE) {
$gn = '" onkeyup="log_goodname(\'trkname\');';
$r['trkname'] = autoclic('name" id="trkname' . $gn, $us ? $us : nms(38), '8', '50', 'txtx');
//name
$r['trkmail'] = autoclic('mail" id="trkmail', $ml ? $ml : 'mail', '13', '50', 'txtx');
}
//mail
if (!$cont) {
$r['parent'] = select_jp('ib', 'parent', rstr(10) ? $read : '', '0', picto('topo'), '1');
}
//if(!$cont)$r['parent']=togbub();
if (!$cont && auth(3)) {
$r['publish'] = checkbox_j('pub', $_SESSION['auth'] < 4 ? 0 : rstr(11), nms(29));
} else {
$r['publish'] = hidden('pub', 'pub', 0);
}
if (!$cont) {
//new
$r['pstdat'] = select_j('postdat', 'date', date('y-m-d-H-i'), 0, picto('time'), 0);
$r['pstsuj'] = balise('input', array('', '', 'suj', 'suj1', '', 'editor', 7 => 255, 16 => 'width:100%;', 23 => $suj ? $suj : nms(71)), '');
}
if ($cont) {
$msg = sql('msg', 'qdm', 'v', 'id=' . $read);
$btcntn = 'continue=ok#' . $read;
$alrt = conn_correct($msg);
} else {
$goto = '/?read=' . $currid;
$btcntn = 'insert=ok';
}
//&continue==#'.$currid
$msg = str_replace("\r", "", $msg);
//msg
$msg = str_replace(array("<br />\n", "<br />", "<br>"), "\n", $msg);
//save
$ids = 'suj1|frm|urlsrc|postdat|trkname|trkmail|ib|pub';
//|sub
$c = 'popbt';
$sav = ljb($c, 'SaveJb', 'socket_saveart_txtarea_id4_' . $read . '_no\',\'art' . $read . '_readart___' . $read, picto('save'));
if ($cont && rstr(53)) {
$sav .= ljb($c, 'SaveJb', 'txarea_saveart_txtarea_id4_' . $read . '\',\'art' . $read . '_readart___' . $read, nms(57)) . ' ';
} elseif (!rstr(53)) {
$sav .= submitj($c, 'sav', nms(57)) . ' ';
} else {
$sav .= lj($c, 'socket_newart_txtarea_' . (rstr(57) ? 7 : 9) . '_____' . $ids, nms(57)) . ' ';
}
//pop
$btdt = lj('', 'popup_artwedit_txtarea__', pictit('editor', nms(107))) . ' ';
$btdt .= ljb('' . '" title="test', 'captslct', 'preview', picto('valid')) . ' ';
if ($cont && $read) {
$btdt .= urledt_id($read);
}
//defcon//urledt($link)
$ret = '<form method="POST" id="sav" action="' . $goto . '&' . $btcntn . '">' . "\n";
//form
$ret .= btd('bts' . $read, $sav) . ' ' . $btdt;
$ret .= implode(' ', $r);
$ret .= sesmk('conn_edit', '', '');
//1
$ret .= $alrt;
$ret .= divd('txarea', txarea1($msg));
//if(auth(4))$ret.=checkbox("randim","ok","rename_img",0);
$ret .= ' </form>' . "\n";
return $ret;
}
function meta_all($id, $prw)
{
$r['tag'] = 'tag';
$bt = lj('', $id . '_artin___' . $id . '_' . $prw, picto('valid')) . ' ';
$re = sql('re', 'qda', 'v', 'id=' . $id);
$bt .= btd('rdbt' . $id, prior_edit($re, $id)) . ' ';
//priority
$ica = explode(' ', prmb(18));
$ico = explode(' ', prmb(19));
$r += array_combine($ica, $ico);
foreach ($r as $cat => $ico) {
if ($cat) {
$ret .= editag($id, $cat, $ico);
}
}
$bt .= ljb('', 'SaveJc', implode(';', $_POST['opall']), picto('down')) . br();
//$arl=explode(' ',prmb(26)); $lang=sql('msg','qdd','v','ib="'.$id.'" and val="lang"');
//$ret.=radiobtj($arl,$lang,'lang'.$id);
return divs('min-width:340px;', $bt . $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);
}
function poplist()
{
$rid = 'ppl' . randid();
$_SESSION['popm'] = ljb('philum', 'poplist(\'' . $rid . '\')', '', btd($rid, 'l')) . ' ';
}
