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_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 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);
}
$xml .= bald("category", $cnt[1]);
$xml .= bald("date", date($_SESSION["prmb"][17], $cnt[0]));
$xml .= bald("lenght", $length);
$xml .= bald("link", $id);
//$_SERVER['HTTP_HOST'].'/'.
//$xml.=bald("nfo",date($_SESSION["prmb"][17],$cnt[0]).' '.$cnt[1].' '.$length.' '.$id);
//$msg=correct_txt($msg,'stripconn','correct');
//$msg=format_txt($msg,"nl",$id);
//$msg=str_replace("<br />","\n",$msg);
//$msg=str_replace(array("<",">"),"",$msg);
//$msg=parse_msg_xml($msg);
$msg = strip_tags($msg);
$xml .= bald("description", $msg);
$xml = str_replace(" ", " ", $xml);
$xml = html_entity_decode($xml);
$xml = html_entity_decode_b($xml);
$item = 'item';
//
//$item='item'.$id;
//$item=normalize($cnt[2]);//eradic_acc
$xml_out .= bald($item, $xml);
}
//::'.$i.'::'.$id
$xml = "";
}
}
}
}
//$rtr.=tracks_read($id,$page,$share,"nl",$nb);
$_SESSION['rstr'][13] = rstr13;
$xml = '<' . '?xml version="1.0" encoding="iso-8859-1" ?' . '>' . "\n";
function modif_art($read, $msg)
{
$qdm = $_SESSION['qdm'];
if ($_SESSION['auth'] < 3) {
return;
}
$msg = str_replace("\r", "", $msg);
$msg = html_entity_decode_b($msg);
$msg = embed_links($msg);
$msg = unescape($msg);
$msg = correct_txt($msg, $read, 'savimg');
$msg = clean_br_lite($msg);
$msg = clean_punct($msg);
$msg = repair_tags($msg);
//if(rstr(70))$msg=retape($msg,$read);
$msg = addslashes(stripslashes($msg));
msquery("UPDATE {$qdm} SET msg='{$msg}' WHERE id='{$read}' LIMIT 1");
return stripslashes($msg);
}
function convhtml_b($ret)
{
//$ret=nl2br($ret); $ret=str_replace('<br />','',$ret);
$ret = unescape($ret);
$ret = converthtml($ret);
$ret = html_entity_decode_b($ret);
$ret = html_entity_decode($ret);
$ret = clean_prespace($ret);
return $ret;
}
function send_mail_txt($dest, $suj, $v, $from, $url)
{
$n = "\r\n";
$v = wordwrap($v, 70, $n);
$suj = html_entity_decode_b($suj);
$head = 'From:' . $from . $n;
$msg = $v . $n . $n . prep_host(ses('qb')) . $url;
if (mail($dest, $suj, $msg, $head)) {
return btn('txtyl', 'mail_sent_to: ' . $dest);
}
}
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);
}
