function readerurl($a, $b, $f)
{
$f = ajxg($f);
req('tri,pop');
if ($f) {
list($suj, $ret, $rec, $defid, $defs) = vacuum($f, '');
}
$ret = format_txt_r($ret, '3', '');
$ret = nl2br(embed_p($ret));
return bal('h2', $suj) . $ret;
}
function sugg_import($f, $o = '', $res = '')
{
list($f, $o) = ajxp($res, $f, $o);
if (substr($f, 0, 4) != 'http') {
return;
}
req('tri,pop');
$_GET['urlsrc'] = $f;
list($suj, $msg) = vacuum($f, '');
$msg = format_txt($msg, '', '');
$ret = balc('h2', '', clean_title($suj)) . br() . $msg;
return $ret;
}
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 saveart_url($k)
{
$cat = $_SESSION['vaccat'][$k];
$base = $_SESSION['qda'];
$qdm = $_SESSION['qdm'];
$qb = $name = $_SESSION['qb'];
$pdt = $_SESSION['dayx'];
$frm = $cat ? $cat : 'public';
$re = rstr(11) ? 1 : 0;
$_GET['urlsrc'] = $k;
list($suj, $msg) = vacuum($k, '');
$msg = embed_links($msg);
$msg = clean_br_lite($msg);
$msg = clean_punct($msg);
$s = strlen($msg);
$lnk = mysql_real_escape_string(stripslashes($k));
$frm = mysql_real_escape_string(stripslashes($frm));
$suj = mysql_real_escape_string(stripslashes($suj));
$msg = mysql_real_escape_string(stripslashes($msg));
$nid = msquery("INSERT INTO {$base} VALUES ('','/','{$name}','{$lnk}','{$pdt}','{$qb}','{$frm}','{$suj}','{$re}','{$lu}','{$img}','{$kywk}','')");
$nid = msquery("INSERT INTO {$qdm} VALUES ('{$nid}','{$msg}')");
$msg = correct_txt($msg, $nid, 'savimg');
$_SESSION['rqt'][$nid] = array($pdt, stripslashes($frm), stripslashes($suj), '', $qb, '', '', '', $s, $lnk, $ib, $re);
$_SESSION['daya'] = $_SESSION['dayx'];
return divc('txtx', lka(htac('read') . $nid, $suj));
}
function build_mods($r)
{
//p($r);
$ptit_css = 'txtcadr';
$pbdy_css = 'panel';
$smcss = 'small';
//mod,param,title,condition,command,option,(bloc),hide,template,nobr,div,ajxbtn
list($m, $p, $t, $c, $d, $o, $ch, $hd, $tp, $nbr, $dv, $jbt) = $r;
$t = stripslashes($t);
switch ($m) {
//main
case 'LOAD':
if ($_SESSION['read']) {
$ret = art_read($tp);
} else {
$ret = api_arts($_SESSION['frm'], $o, $tp);
}
break;
case 'Page_titles':
$ret = page_titles($o);
break;
case 'All':
$api = api_arts_rq($p, $o);
$api['t'] = $t ? $t : nms(100);
break;
case 'category':
if ($p == 1 && $_SESSION['frm'] == 'Home') {
$p = 'All';
}
$ret = api_arts($p, $o, $tp);
break;
case 'Board':
$ret = collect_board($p);
break;
case 'plan':
$ret = arts_plan($m, $p);
break;
case 'Hubs':
$ret = arts_plan($m, $p);
break;
case 'gallery':
$ret = arts_plan($m, $p);
break;
case 'tracks':
$ret = trkarts($p, $t);
break;
//api_tracks($t)
//api_tracks($t)
case 'MenusJ':
$ret = ajxlink($p, 'mjx', $o, $d);
break;
//case('Wall'): $ret=wall_arts($t,$p); break;
//case('Wall'): $ret=wall_arts($t,$p); break;
case 'api':
$ret = plugin('apicom', str_replace(';', ',', $p), $o);
break;
case 'api_mod':
$api = api_defaults_rq(explode_k(str_replace(';', ',', $p), ',', ':'));
break;
//:,
//:,
case 'api_arts':
$api = api_mod_arts($p, $t, $tp);
if ($d == 'panel') {
$api['cmd'] = $d;
}
$api['cols'] = $o;
break;
//&=
//&=
case 'articles':
$load = api_mod_arts_row($p);
$obj = 1;
break;
//&=
//case('articles'): $api=api_mod_rq($p.'&t=x'); break;//&=
//&=
//case('articles'): $api=api_mod_rq($p.'&t=x'); break;//&=
case 'tab_mods':
$ret = tab_mods($p);
break;
case 'last':
$ret = art_read_b('last', $n, 3, '');
break;
case 'player':
$ret = flash_prep('', $p);
break;
case 'friend_art':
$ret = friend_art($o);
break;
case 'friend_rub':
$ret = friend_rub($o);
break;
case 'related_arts':
$load = related_art();
break;
case 'related_by':
$load = related_art_by();
break;
case 'prev_next':
$ret = prevnext_art($d, $p, $o);
break;
case 'cat_arts':
$p = $p != 1 ? $p : $_SESSION['frm'];
$t = $t != $m ? $t : $p;
$load = tri_rqt($p, 1, $_SESSION['dayx']);
break;
case 'priority_arts':
$load = tri_rqt($p, 11);
$t = $t != $m ? $t : $p;
break;
case 'recents':
$load = recents_arts($p, $o);
$obj = 1;
break;
case 'read':
$ret = divc($o, read_msg($p, 3));
break;
case 'popart':
$ret = pop_art($p);
break;
case 'pub_art':
$ret = pub_art_b($p, $o);
break;
case 'pub_arts':
$load = array_flip(explode(' ', $p));
break;
case 'pub_img':
$ret = pub_img($p);
break;
case 'taxo_arts':
$load = taxo_arts($p);
if ($t > 1) {
$t = suj_of_id($t);
}
break;
case 'taxo_nav':
$ret = plugin('taxonav', $p, $o);
break;
case 'read_art':
$ret = read_art($p, $t);
$t = '';
break;
case 'short_arts':
$load = short_arts($p);
if ($o <= 3) {
$prw = $o;
}
break;
case 'most_read':
$ret = most_read_mod($p, $t, $d, $o, $m, $tp);
$t = '';
break;
case 'same_title':
$load = same_title();
break;
case 'deja_vu':
if ($_SESSION['mem']) {
$load = $_SESSION['mem'];
}
break;
//com
//com
case 'rss_input':
if ($p) {
$ret = rssin(ajx($p, 1));
}
break;
case 'disk':
require_once 'ajxf.php';
$_SESSION['dlmod'] = $p;
if ($p && $p != '/') {
$pb = '/' . $p;
}
$ret = divd('dsnavds', ds_nav('dl', 'users/' . ses('qb') . $pb));
break;
case 'finder':
$ra = array('|', '-');
$p = str_replace($ra, '/', $p);
$o = str_replace($ra, '/', $o);
req('finder');
$ret = finder($p, $o, $d);
break;
case 'channel':
$ret = plugin('channel', $p, $t, $d, $o);
$t = '';
break;
case 'hour':
setlocale(LC_TIME, "fr_FR");
//%A%d%B%G%T
if ($p) {
$dat = strftime($p ? $p : '%y%m%d:%H%M', $_SESSION['dayx']);
} else {
$dat = mkday('', 1);
}
if (!$d) {
$ret = btn($o, $dat);
} else {
$ret = divc($o, $dat);
}
break;
case 'cart':
$ret = lkc("txtcadr", "/?plug=cart", $p != 1 ? $p : "Cart");
$ret = divd('cart', m_pubart($_SESSION['cart'], 'scroll', 7));
break;
case 'video':
$ret = video_auto($p, '', '', 3);
break;
case 'video_playlist':
$load = videoplaylist($p);
$obj = 1;
$prw = 'vd';
break;
case 'video_viewer':
$ret = videoboard($p, $c, $o);
break;
//txt
//txt
case 'text':
$ret = stripslashes(urldecode($p));
if ($o) {
$ret = divc($o, $ret);
}
break;
case 'connector':
if (substr($p, 0, 1) != "[" && substr($p, -1, 1) != "]") {
$p = '[' . $p . ']';
}
$ret = nl2br(format_txt_r($p, '', ''));
if ($o == 'article') {
$ret = balc('article', 'justy', format_txt($p, '', ''));
}
break;
case 'codeline':
if ($p) {
$ret = correct_txt($p, "", 'codeline');
}
break;
case 'clear':
$ret = divc("clear", "");
break;
case 'hr':
$ret = '<hr' . atc($p) . ' />';
break;
case 'br':
$ret = br();
break;
//menus
//case('ajax'): $ret=lj('',$p,$t); break;
//menus
//case('ajax'): $ret=lj('',$p,$t); break;
case 'conn':
$ret = connectors($p, $o, '');
break;
case 'link':
if ($d == 'noli') {
$ret = special_link($p, $o);
} else {
if (strpos($p, '§')) {
list($p, $t) = split_one('§', $p, 0);
}
$lin[] = mod_link_r($p, $t);
}
break;
case 'user_menu':
$ret = user_menu($p);
break;
//mod_link
//mod_link
case 'app_link':
$ret = read_apps_link($p, $d, $o);
break;
case 'app_menu':
$r = build_apps($p, $d);
$ra = m_apps($r, 'menu', '');
if ($o == 'icons') {
$ret = desktop_build_ico($ra, 'icones');
} else {
$ret = app_list($ra, '', $o);
}
$ret .= divc('clear', '');
break;
case 'app_popup':
Head::add('jscode', sj(read_apps(explode(',', $p))));
break;
case 'categories':
$line = $_SESSION['line'];
if ($line) {
ksort($line);
$d = $d ? $d : 'lines';
if ($d == 'cols' && !$o) {
$o = 4;
}
if ($o == 'home') {
$lin[] = array($_GET['module'], 'module', 'Home', 'Home');
}
foreach ($line as $k => $va) {
if ($o == 'nb') {
$ka = $k . ' (' . $va . ')';
} else {
$ka = $k;
}
$lin[] = array($_SESSION['frm'], 'cat', $k, $ka);
}
}
break;
case 'overcats':
req('bubs');
return mkbub(bub_root('overcat', 'zero'), 'inline', '1');
break;
case 'MenuBub':
req('bubs');
return mkbub(bub_root('menubub', 'zero'), 'inline', '1');
break;
case 'timetravel':
return timetravel($p, $o);
break;
case 'submenus':
return bubble_menus($p, $o);
break;
case 'taxonomy':
$ret = taxonomy($p, $o);
break;
case 'rub_taxo':
$ret = rub_taxo($p, $t);
$t = '';
break;
case 'folders':
$load = supertriad_ask();
$prw = $o;
$obj = 63;
break;
case 'desk':
$ret = deskmod($p);
break;
case 'desktop_arts':
$ret = title($t) . desktop_arts($p, $o, 'arts');
break;
case 'desktop_varts':
$ret = title($t) . desktop_arts($p, $o, 'varts');
break;
case 'desktop_files':
$ret = title($t) . desktop_arts($p, $o, 'files');
break;
case 'hierarchics':
$in = m_suj_hierarchic('active', '');
$ret = balc("ul", $pbdy_css, $in);
break;
//cacheable
//cacheable
case 'hubs':
$mn = $_SESSION['mn'];
if (count($mn) >= 2) {
$t = $p != 1 ? $p : $t;
if ($t) {
$t = lkc('', htac('module') . 'hubs', $t);
}
$in = m_nodes_b($mn, $o);
$ret = balc("ul", $pbdy_css, $in);
}
break;
case 'tags':
if ($t) {
$t = lkc('', '/plugin/tags/' . $p . '/1', $t);
}
$lin = tag_mod($p, $o, $d);
break;
case 'tags_cloud':
$p = $p ? $p : 'tag';
$ret = btn($ptit_css, lkc('', "/plug/tags", $p));
$line = tags_list($p, ses('nbj'));
$in = tags_cloud($line, 10, 22, ' ', $p);
$ret .= divc($pbdy_css, $in);
break;
case 'tag_arts':
list($p, $o) = split_one(':', $p);
$load = tag_arts($p, $o);
break;
case 'last_tags':
$lin = last_tags($p, $o, $d);
break;
case 'classtag_arts':
$load = classtag_arts($p);
break;
//class find id//$o=$p;
//class find id//$o=$p;
case 'see_also-tags':
$r = see_also_tags($p ? $p : 'tag');
if ($r) {
$ret = see_also($r, $p, $d, $o, $tp);
}
break;
case 'see_also-rub':
$t = $p != 1 ? $p : $_SESSION['frm'];
if ($_GET['read']) {
$load = see_also_rub($p);
}
break;
case 'see_also-source':
list($load, $t) = see_also_source($o);
break;
case 'siteclics':
$ret = siteclics($p);
break;
case 'rub_tags':
$ret = rub_tags($p);
break;
case 'sources':
if ($t) {
$t = lkc('', '/module/source', $t);
}
$lin = art_sources($p);
break;
case 'msql_links':
if ($o == 'rss') {
$l = '/?plug=rssin&rssurl=';
} elseif ($o == 'mail') {
$l = 'mailto:';
} else {
$l = '';
}
$ret = msql_links($p, $o, $l, $d, $t);
$t = '';
break;
case 'rss':
$ret .= balc('ul', 'panel', divd('rssj', rssj($p ? $p : 'rssurl', $o)));
break;
case 'rssin':
$ret .= rssj_m($p, $o);
break;
case 'chat':
if ($t) {
$t = ljb('', 'SaveD', 'cht' . $p . '_chat_' . $p, $t);
}
$p = $p != 1 ? $p : 'pub';
$in = plugin('chat', $p, $o ? $o : 10);
if ($in) {
$ret = divc($pbdy_css, $in);
}
break;
case 'stats':
$ret = plugin('stats', '', '');
break;
case 'archives':
if ($p == 1) {
$p = $m;
}
if ($p) {
$ret = btn($ptit_css, $p);
}
$in = divd("archives", m_archives(""));
$ret .= balc('ul', $pbdy_css, $in);
break;
case 'agenda':
$load = sql('ib,msg', 'qdd', 'kv', 'val="agenda"');
$tim = time();
if ($load) {
foreach ($load as $k => $v) {
if (strtotime($v) < $tim) {
unset($load[$k]);
}
}
}
break;
case 'folders_varts':
$load = mod_varts($p);
break;
case 'panel_arts':
$ret = plugin_func('panart', 'panart_build', $p);
break;
case 'calendar':
$in = calendar(ses('daya'));
if ($p == 1) {
$p = $m;
}
if ($p) {
$ret = btn($ptit_css, $p);
}
$ret .= divc($pbdy_css, $in);
break;
case 'newsletter':
if ($o) {
$ret = call_plug($ptit_css, 'popup', 'mailist', $p, $p) . ' ';
} else {
$ret = plugin('mailist', '', $p);
}
break;
case 'bridge':
$_GET['urlsrc'] = $p = 'http://' . $p . '/' . ajx($t, 1);
$rea = vacuum($p, '');
$po['suj'] = $rea[0];
$po['msg'] = format_txt($rea[1], 3, $id);
$po['source'] = picto('link') . ' ' . pub_link($p);
$ret = template($po, '');
break;
case 'columns':
$ret = mod_columns($p, $o);
break;
//users
//users
case 'login':
$ret = login_btn($p, $o);
break;
case 'login_popup':
$ret = login_btn_p($p, $o);
break;
case 'log-out':
if (ses('USE')) {
$ret .= lkc($smcss, '/logout', picto('logout')) . ' ';
}
break;
case 'search_form':
$ret = search_btn($p, $o, '', $d);
break;
case 'search':
$load = plugin_func('search', 'rech', $p, $o);
break;
case 'social':
$ret = plugin('social', $p, $o);
break;
//banner
//banner
case 'Banner':
$ret = make_ban($p, $t, $o);
break;
case 'ban_art':
if ($p != 1) {
$ret .= lka(subdom(ses('qb')), read_msg($p, ''));
}
break;
//footer
//footer
case 'credits':
$ret = lj('bevel', 'popup_about', picto('phi2'));
break;
case 'admin':
$ret = lkc($smcss, '/admin/log/open', $t ? $t : picto('admin')) . ' ';
$t = '';
break;
case 'chrono':
$ret = btn('txtsmall2', round(mtime() - $_SESSION['stime'], 2) . 's') . ' ';
break;
case 'contact':
$ret = contact($p, $o ? $o : $smcss) . ' ';
break;
//plugs
//plugs
case 'taxonav':
return plugin('taxonav', $p, $t);
$t = '';
break;
case 'iframe':
$ret = plugin('ifram', '', '');
break;
case 'suggest':
$ret = pluginside(nms(126), 'suggest', $p, $o);
break;
case 'create_art':
$ret = f_inp('', '');
break;
case 'twitter':
if ($p) {
$ret = plugin('twitter', $p, $o);
}
break;
case 'profil':
$ret = plugin_func('profil', $p, $o);
break;
//special
//special
case 'BLOCK':
$ret = build_modules($p, '');
break;
case 'module':
$ret = build_mod_r($p);
break;
case 'command':
$ret = com_mod($p);
break;
case 'plug':
list($pp, $po) = split('-', $o);
$ret = plugin($p, $pp, $po);
break;
case 'pluf':
list($pp, $po) = split('-', $p);
list($op, $oo) = split('-', $o);
$ret = plugin_func($pp, $po, $op, $oo);
break;
case 'plup':
return lj('', 'popup_plupin___' . $p . '_' . $o . '_', $t ? $t : $p);
break;
case 'close':
$ret = '';
default:
if ($p && $m) {
$reb = connectors($p . ($o ? '§' . $o : '') . ':' . $m, "", "");
}
if ($reb && $reb != '[' . $p . ':' . $m . ']') {
$ret = $reb;
} else {
$reb = plugin($m, $p, $o);
if ($reb) {
$ret = build_titl('', $t ? $t : $m, '') . $reb;
}
}
break;
}
//menus
if ($lin) {
$ret = mod_lin($lin, $t, $d, $o);
}
//arts
if ($load) {
$ret = mod_load($load, $ret, $t, $d, $o, $obj, $prw, $tp, $id);
}
//api
if ($api) {
$ret = api_load($api);
}
//umods
if (!$ret && !$lin && !$load && $p && $m) {
//user_mods
$func = msql_read('', $_SESSION['qb'] . '_modules', $m);
if ($func && !is_array($func)) {
$ret = cbasic($func, $p);
}
}
if (!$nbr) {
$br = br();
}
if ($ret) {
if ($dv) {
return divc('mod', $ret) . $br;
} else {
return $ret . $br;
}
}
}
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 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 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);
}
