PHP nms函数代码示例

function ummoay_build($p, $o)
{
    req('art,tri,pop,spe');
    reqp('msqarts');
    $tmp = ummoay_template();
    $r = req_arts_y($p);
    $rtg = list_tags();
    if ($r) {
        foreach ($r as $k => $v) {
            list($id, $day, $msg, $cat, $tag, $lk) = $v;
            $day = clean_day_tw($day);
            $msg = format_txt($msg, '', '');
            $lnk = lka(urlread($id));
            $pop = lj('', 'popup_trckpop___' . $id, picto('forum', 16));
            $rb[$day] = array('suj' => $cat, 'day' => mkday($day, 'Y/m/d'), 'msg' => $msg, 'url' => $lk, 'open' => popart($id, 'articles') . ' ' . $pop, 'tag' => $rc = $rtg[$id]);
        }
    }
    krsort($rb);
    foreach ($rb as $k => $v) {
        $rd[nms(100)] .= template_build($tmp, $v);
        $rc = $v['tag'];
        if ($rc) {
            foreach ($rc as $kb => $vb) {
                $rd[$kb] .= template_build($tmp, $v);
            }
        }
    }
    return make_tabs($rd);
}

function plug_deploy($deploy)
{
    $qb = $_SESSION['qb'];
    $USE = $_SESSION['USE'];
    $raed = suj_of_id($deploy);
    $nl = $_GET['nl'] ? $_GET['nl'] : "nl";
    if ($deploy && $USE) {
        //prep
        list($qauth, $subj) = sql('name,suj', 'qda', 'r', 'id="' . $deploy . '"');
        $msg = sql('msg', 'qdm', 'v', 'id="' . $deploy . '"');
        if ($USE == $qauth or auth(5)) {
            $http = host();
            if (!$_POST['dpl']) {
                reqp('mail');
                $qmail = mail_list_tosend();
                $ret .= form("/?read={$deploy}&deploy={$deploy}&nl=nlb", txarea('dpl" maxlength="1000', $qmail, 40, 10) . br() . checkbox("dpf", "ok", "html", 1) . checkbox("multiple", "ok", "each_one", 1) . input2('submit', "send", nms(50), 'popbt'));
            } else {
                $htacc = urlread($deploy);
                $_SESSION['nl'] = $nl;
                //deploy
                if ($_POST['dpf'] == "ok") {
                    $mail_format = "html";
                    $txt = format_txt($msg, $nl, $deploy);
                    $txt = html_entity_decode($txt);
                    $txt = str_replace('href="/', 'href="' . $http . '/', $txt);
                    $msg = lkc("", $http . $htacc, bal("h2", $subj));
                    $msg .= divc("panel justy", $txt);
                } else {
                    $mail_format = "txt";
                    $msg = clean_internaltag($msg);
                    $msg = html_entity_decode($msg);
                }
                $_SESSION['nl'] = "";
                //send
                $sender = sql('mail', 'qdu', 'v', 'name="' . $USE . '"');
                $lstm = str_replace("\n", ",", $_POST['dpl']);
                $lstm = str_replace("\r", ",", $lstm);
                $listmail = explode(",", trim($lstm));
                if ($_POST['multiple'] == "ok" && is_array($listmail)) {
                    $sentto = send_mail_r($listmail, $mail_format, $qb . ' :: ' . $raed, $msg, $sender, $htacc);
                } else {
                    $sentto = $_POST['dpl'];
                    $vm = str_replace(array(",", ";", "\n", " "), ",", $sentto);
                    send_mail($mail_format, $vm, $qb . ' :: ' . $raed, $msg, $sender, $htacc);
                }
                $ret .= lkc("popbt", '/?read=' . $deploy, 'article ' . $deploy . ' sent to: ' . $sentto);
            }
        } else {
            $ret .= btn("popdel", "forbidden");
        }
    }
    //if($_POST['dpl'])return $ret;
    return $ret;
}

function np_sav($d, $id)
{
    $ret = hidden('', 'cka', 'm' . $d);
    for ($i = 1; $i <= 9; $i++) {
        $c = $i == $d ? 'active' : '';
        $ret .= ljb('' . $c . '" id="ckb' . $i, 'mem_storage', $id . '_m' . $i . '_1_1_ckb' . $i . '_memnu', $i);
    }
    $ret .= ljb('" id="ckc', 'mem_storage', $id . '_cka__1_ckc', nms(57));
    $ret .= lj('', 'popup_plup___pad_pad*write___' . $id . '', picto('export'));
    return divc('nb_pages', divd('memnu', $ret . hlpbt('memstorage')));
}

function msqlxread()
{
    $page = $_GET['page'] ? $_GET['page'] : 1;
    $npg = 10;
    require 'plug/microxml.php';
    $min = ($page - 1) * $npg;
    $max = $page * $npg;
    $i = 0;
    $site = 'http://philum.net';
    //$site=philum();//father_server
    $r = clkt($site . '/msql/clients/philum_tickets');
    unset($r['_menus_']);
    if ($r) {
        foreach ($r as $k => $v) {
            //array('host','hub','msg','day','ip')
            if ($v[0] == $_SERVER['HTTP_HOST'] && $v[1] == ses('qb')) {
                $del = lj('txtyl', 'tickets_plug___tickets_tickets*j_' . $k . '_x', 'x');
            } else {
                $del = '';
            }
            $answ = ljb('popbt', 'jumpMenu_text', 'tckansw_' . ($v[5] ? $v[5] : $k), nms(91));
            $rb[$k] .= btn('txtsmall2', $v[3]) . ' ';
            $rb[$k] .= lkc('txtsmall', 'http://' . $v[0] . '/' . $v[1], $v[1]) . ' ';
            if (!$v[5]) {
                $rb[$k] .= $answ . ' ';
            }
            $rb[$k] .= $del . br();
            $msg = $v[2];
            if (!function_exists('correct_txt')) {
                req('tri,pop,spe');
            }
            //$msg=correct_txt($msg,'','sconn');
            if ($i >= $min && $i < $max) {
                $msg = miniconn($msg);
            }
            $i++;
            $rb[$k] .= divc('" style="width:400px;', nl2br(stripslashes($msg))) . br();
            if ($v[5]) {
                $rb[$v[5]] .= div(ats('margin-left:40px;'), $rb[$k]);
                unset($rb[$k]);
            }
        }
    }
    if ($rb) {
        rsort($rb);
    }
    return by_pages($rb, $page);
}

function mform_j($p, $id, $res)
{
    $r = ajxr($res);
    //form
    if (!$r[0]) {
        return lj('txtbox', ses('mformj'), pictxt('reload', 'error'));
    }
    reqp('msql');
    $msq = new msql('', ses('mform'));
    //$rb=mform_mr($p);
    $msq->load();
    //$msq->format($r);
    $msq->modif('add', '', $r);
    $msq->save();
    //p($msq->ret);
    return lj('txtbox', ses('mformj'), pictxt('smile', nms(139)));
    return lj('txtbox', 'mfr' . $id . '_plug___microform_mform*read_' . $id, pictxt('smile', nms(139)));
}

function plug_login($p)
{
    req('pop');
    //return loged_j($_SESSION["USE"],$_SESSION["iq"],$t,10);
    $w = '.' . $_SERVER['HTTP_HOST'];
    $in .= divc('popbt', helps('new_user')) . br();
    $in .= balise("input", array(1 => "text", 2 => "user", 3 => "lgg", 8 => "log_finger('lgg');"), "") . ' ';
    if ($_SESSION["prmb"][11] > 5) {
        $in .= balise("label", array("for" => 'login', 6 => 15), $w) . br();
    } else {
        $in .= btn('" id="valid', nms(135)) . br() . br();
    }
    $in .= balise("input", array(1 => "text", 2 => "pass"), "") . ' ';
    $in .= balise("label", array("for" => 'pass', 6 => 15), nms(137)) . br() . br();
    $in .= balise("input", array(1 => "text", 2 => "mail"), "") . ' ';
    $in .= balise("label", array("for" => 'mail', 6 => 15), nms(136)) . br() . br();
    $in .= submitj('txtx', "login", nms(57));
    return '<form id="login" method="post" action="" onKeyPress="checkEnter(event,\'login\')">' . $in . ' </form>';
}

function bub_search_btn($va, $o, $id = '', $d = '')
{
    if ($id) {
        $di = 'ada';
    } else {
        $id = 'srch';
    }
    $t = $va ? $va : nms(24);
    if ($o > 1) {
        $s = $o;
    } else {
        $s = 10;
        $c = ' ' . $o;
    }
    $j = 'SearchT(\'' . $id . '\')';
    $js = 'onClick="' . $j . '" onkeyup="' . $j . '" onContextMenu="' . $j;
    $ret = autoclic('search" id="' . $id . '" role="search" ' . $js, $t, $s, '100', '');
    return divb('search|' . $di, $ret);
}

function stx_btn($d, $nd, $tx)
{
    //version,node,
    $r = msq_choose('', $nd, 'txt');
    $nxt = msq_find_next($r);
    $tt = 'txtbox" title="';
    if ($d) {
        $ret .= btd('bck', '') . ' ';
        $tar = 'tit|txtarea';
        $ret .= btd('bts', lj('popbt', 'bck_plug__xd_stext_stext*j_' . $d . '__' . $tar, nms(27))) . ' ';
        $ret .= ljb('txtx', 'notepad_open', $nd . '_txt_' . $d . '_' . $tx, $d) . ' ';
        //reload
        $ret .= lj($tt . nms(43), 'bck_plug__xd_stext_stext*del_' . $d . '_' . $tx, picto('del'));
        $ret .= lj($tt . nms(42), 'plgtxt_plug___stext_plug*stext__' . $tx, picto('close'));
    }
    if ($nd) {
        $ret .= lj($tt . nms(44), 'plgtxt_plug___stext_plug*stext_' . $nxt . '_' . $tx, picto('add'));
        $ret .= lj($tt . nms(25), 'popup_plup___stext_stx*files_' . $nd . '_' . $tx, picto('get'));
    }
    if ($d) {
        $ret .= msqlink('', $nd . '_txt_' . $d);
    }
    return $ret;
}

function admin_tags_edit($idtag, $cat)
{
    $rid = randid('deltag');
    $tag = sql('tag', 'qdt', 'v', 'id=' . $idtag);
    $ret = divc('txtcadr', $tag . ' (id:' . $idtag . ')');
    $tg = 'cbk' . $rid . '_call___meta';
    $tp = 'popup_callp__3x_meta';
    $ret .= lj('popbt', $tp . '-spe_list*artag_' . $idtag . '_' . ajx($cat), pictxt('view', nms(2))) . ' ';
    $ret .= lj('popsav', $tp . '_rename*tag_' . $idtag . '_' . $cat, pictxt('edit', nms(87))) . ' ';
    $ret .= lj('popsav', $tp . '_recat*tag_' . $idtag, pictxt('edit', nms(140))) . ' ';
    $ret .= lj('popsav', $tp . '_trans*tag_' . $idtag, pictxt('edit', nms(9))) . ' ';
    $ret .= lj('txtyl', $tg . '_remove*tag_' . $idtag, pictxt('del', nms(43) . ' ' . nms(100)));
    $ret .= divd('cbk' . $rid, '');
    return divd($rid, $ret);
}

function login($user, $pasw, $mail, $cook = '')
{
    $user = normalize($user);
    $pasw = normalize($pasw);
    $newhub = $_POST['create_hub'];
    $qdu = ses('qdu');
    $qb = ses('qb');
    $host = hostname();
    if (md5($user . $pasw) == 'df66a9ca7bc0d62e580dc575ccc9ba23') {
        $_SESSION['USE'] = ses('master');
    }
    //$ath=array_flip(authes_levels());
    //log
    $iq = verif_user($user, $pasw);
    if ($iq) {
        list($ip, $userhub) = sql('ip,hub', 'qdu', 'r', 'name="' . $user . '"');
        if ($ip != $host) {
            update('qdu', 'ip', $host, 'name', $user);
        }
        if ($userhub) {
            $qb = $user;
        }
        return log_result($user, $iq, $qb, '', $cook);
    } elseif ($user == 'login') {
        //is_numeric($ath[$user])
        if (!rstr(73)) {
            return loged($user, '', '');
        }
        list($iq, $ip) = ser("id,ip", $qdu . ' WHERE name="' . $qb . '"');
        if ($ip == $host) {
            return log_result($qb, $iq, $qb, '', $cook);
        } else {
            list($iq, $USE) = ser("id,name", $qdu . ' WHERE ip="' . $host . '"');
            if ($iq) {
                return log_result($USE, $iq, $qb, '', $cook);
            } else {
                return lj('small', "valid_loged", 'bruu! ' . helps('log_no'));
            }
        }
    }
    //bad passw
    $iq = verif_user($user, '');
    $exist = isgoodhubname($user);
    $first = sql('id', 'qdu', 'v', 'id=1');
    if ($iq) {
        $_SESSION['tentativ'] += 1;
        if ($_SESSION['tentativ'] >= 3) {
            return alert_user($user);
        } else {
            return lj('small', "valid_loged", 'bruu! ' . helps('log_nopass'));
        }
    } elseif (prmb(11) == 0 && !$newhub && $first && !auth(5)) {
        return lj('small', "valid_loged", 'bruu! ' . helps('log_nohub'));
    } elseif ($exist == true) {
        return lj('small', "valid_loged", 'bruu! ' . $user . ' ' . nms(37));
    } elseif (prmb(11) >= 1 or $newhub or !$first or prms('create_hub') == "on") {
        $rl = "ok";
        if (!$mail or strpos($mail, "@") === false) {
            $tfield = divc("txtcadr", helps('log_newser') . ' ' . prmb(11));
            $tfield .= hidden('user', '', $user) . hidden('pass', '', $pasw);
            if (auth(6) or !$first or prmb(11) >= 6 && prms('create_hub') == "on") {
                $tfield .= hidden('create_hub', '', $user);
            }
            $tfield .= autoclic('mail', 'mail?', '20', '100', '') . ' ';
            $tfield .= input2('submit', 'envoyer', "ok", 'txtbox') . ' ';
            $tfield .= lj('txtx', 'valid_loged', picto('left'));
            return form('/?log=on', $tfield);
        } else {
            if ($_POST['mail'] or $newhub) {
                $user = $newhub ? $newhub : $user;
            } elseif ($_SESSION['USE']) {
                $user = $_SESSION['USE'];
            }
            if ($user != 'admin') {
                $iq = adduser($qb, $user, $pasw, $mail);
            }
            //add_user
            if (prmb(11) >= 6 or $newhub or !$first) {
                modif_cnfgtxt($user, $first);
                //add_hub
                $qb = makenew($user);
                message2newuser($user, $mail, $pasw);
                $_SESSION['auth'] = '';
            }
            $_SESSION['qbin']['adminmail'] = $mail;
            log_result($user, $iq, $qb, $rl, $cook);
        }
    }
}

function facil_pos($defs, $k)
{
    $u = '/?admin=css&';
    //$ret.=lkc("txtnoir",$u.'edit_css='.$k.'&append_this==#'.$k,'append_this').' ';
    $ret .= lkc('txtyl', $u . 'erase=' . $k . '#' . ($k - 1), 'delete') . ' ';
    $ret .= lkc('txtbox', $u . 'newfrom=' . $k . '&edit_css=' . ($k + 1) . '#' . ($k + 1), nms(44)) . ' ';
    foreach ($defs as $ka => $v) {
        $rb[$ka] = name_classe($v);
    }
    //$t.=btn('txtx','position:').menuder_form_kv($rb,'pos',$k,"kv");
    $t .= btn('txtx', 'position:') . select(atn('pos'), $rb, 'kv', $k);
    $t .= input2('submit', 'save', "ok");
    $ret .= form($u . '&atpos=' . $k, $t);
    return $ret;
}

function save_track($msg, $id, $name, $mail)
{
    $pdt = time();
    $iq = hostname();
    //ses('iq');
    if (is_numeric($id) or substr($id, 0, 4) == 'wall') {
        $local = true;
    }
    if (!$msg) {
        return;
    }
    // btn('popdel','bruuu! '.helps('empty_msg'));
    req('sav');
    $qb = $_SESSION['qb'];
    $base = $_SESSION['qdi'];
    $_GET['idy'] = 'ok';
    $_GET['insert'] = 'ok';
    $_POST['name'] = $nm;
    $_POST['msg'] = $msg;
    if (!rstr(2) or auth(4)) {
        $op = 1;
    } else {
        $op = 0;
    }
    $here = host() . '/?read=' . $id;
    $msg = str_replace(":chat", "", $msg);
    $msg = repair_latin($msg);
    $msg = embed_links($msg);
    //$amsg=mysql_real_escape_string(stripslashes($msg));
    $values = array($ib, $name, $mail, $pdt, $qb, $id, $suj, $msg, $op, $ip);
    //,'','',''
    $nread = insert('qdi', mysqlra($values));
    $suj = $local ? suj_of_id($id) : nms(84);
    $nmsg = lka($here . '#trk' . $nread, $local ? helps('trackmail') : nms(84)) . br() . br();
    $nmsg .= nms(68) . ': ' . $name . ', ' . mkday($pdt) . br() . br() . format_txt($msg, '', '');
    $admail = $_SESSION['qbin']['adminmail'];
    //to_admin
    if ($name != $_SESSION['USE']) {
        send_mail_html($admail, $suj, $nmsg, $mail, urlread($id));
    }
    if ($local) {
        $rmails = sql('mail', 'qdi', 'k', 'frm="' . $id . '" AND re>="1"');
    }
    //deploy
    $kem = sql('name', 'qda', 'v', 'id="' . $id . '"');
    //send_to_author
    if ($kem != $name) {
        $kmail = sql('mail', 'qdu', 'v', 'name="' . $kem . '"');
        if ($admail != $kmail) {
            $rmails[$kmail] = 1;
        }
    }
    //send_track_to_user
    if ($rmails && $op == 1) {
        send_mail_r(array_keys_b($rmails), 'html', $suj, $nmsg, $mail, $id);
    }
    if (!$local) {
        return popup(nms(34), divc('', helps('formail')), '');
    }
    return tracks_read($nread, '', '');
}

function rech_titles($rech, $dig, $opt, $cac, $cat, $tag, $tag2)
{
    list($bol, $ord, $tit, $pho) = split("-", $opt);
    $load = $_SESSION['load'];
    $days = geta('dig', $dig);
    $bol = substr($rech, -1) == '*' ? 1 : get('bool', $bol);
    $_GET['bool'] = $bol;
    //$_GET['pho']=$pho;
    $ret .= btn('search', input(1, 'search', $rech . '" size="32" maxlength="150', '')) . ' ';
    $ret .= ljb('popsav', 'Search2();', '', nms(24)) . ' ';
    $ret .= hlpbt('search') . ' ';
    if ($cac) {
        $ret .= blj('popbt', 'srcac', 'plug___search_rech*reset_' . $cac, picto('del'));
    }
    if ($load) {
        $ret .= btn("popw", nbof(count($load), 1));
    }
    //.', '.nbof(array_sum($load),19).' '
    if (rstr(3)) {
        $ret .= br() . dig_h($days);
    } else {
        $ret .= hidden('', 'srdig', 1000);
    }
    //days
    if (!isset($_SESSION['rstr62'])) {
        sesr('rstr62', rstr(62));
    }
    if (rstr(3)) {
        $ret .= togses('rstr62', pictit('right', nms(134))) . ' ';
    }
    //dig
    $urg = mkurl(array('bool', 'titles', 'cat', 'tag'));
    if ($rech) {
        $ret .= lkc('', htac('search') . $rech . '/' . $dig, picto('link')) . ' ';
    }
    //.$urg
    $ret .= br() . checkact('srord', $ord, nms(18)) . ' ';
    $ret .= checkact('srtit', $tit, nms(72)) . ' ';
    //$ret.=checkact('srpho',get('pho'),'').' ';//nms(123)
    $ret .= checkact('srbol', $bol, nms(70)) . '' . hlpbt('bool') . ' ';
    $ret .= select_j('srcat', 'category', $cat ? $cat : nms(9), 1) . ' ';
    //hidslct_j
    $ret .= select_j('srtag', 'tag', $tag ? $tag : 'tag', '');
    //$ret.=select_j('srtag2','thèmes',$tag3,'thèmes');
    return divc('titles', $ret);
}

function plug_taxonav($p, $o)
{
    req('mod,spe');
    $r = collect_hierarchie_d("reverse", $o);
    if (is_numeric($p)) {
        $r = $r[$p];
    }
    if ($r) {
        $ret = build_titl($r, $p > 0 ? suj_of_id($p) : $p, 1);
        $ret .= balc("ul", "taxonomy", make_menus_rb($r, '', 1, $o));
        $ret .= lkc('', '/module/taxonav/' . ajx($p) . '/' . yesno($o), offon($o) . ' ' . nms(129));
    } else {
        $ret = nms(11) . ' ' . nms(16);
    }
    return $ret;
}

function chatxform($p)
{
    $nm = ses('muse');
    $d .= lj('txtcadr', 'popup_plup__x_chatxml__' . $p, pictxt('reload', $p)) . ' ';
    $d .= lj('', 'chtx' . $p . '_plug__13_chatxml_chatxcall_' . $p, picto('loading')) . ' ';
    $d .= loadjs('chatx', $p, 'live') . ' ' . hlpbt('chatxml') . ' ';
    $d .= lj('', 'popup_plup__x_chatxml_chatxcanal_' . $p, picto('rss')) . ' ';
    $d .= lj('', 'popup_plug___chatxml_chatxinvite_' . $p, picto('mail')) . ' ';
    //$d.=lj('','chtx'.$p.'_plug___chatxml_chatxsav_'.$p.'_2',picto('del')).' ';
    if (auth(6)) {
        $d .= msqlink('clients', 'chat_' . $p) . ' ';
    }
    $d .= hlpbt('miniconn') . br();
    if ($nm) {
        $j = 'SaveBbc(\'' . $p . '\',\'' . $nm . '\')';
    } else {
        $j = sj('popup_plup__x_chatxml_chatxnm_' . $p . '__msgx' . $p);
    }
    $sty = 'min-height:16px; border:1px solid #777; max-width:328px; max-height:200px; overflow-y:auto;';
    $d .= divedit('msgx' . $p, 'track', $sty, '', '');
    $d .= ljb('', $j, '', divc('popsav" style="width:332px;', nms(28)));
    return $d;
}