PHP kontrolu_rajton函数代码示例

<?php

/**
 * Redaktilo por la individuaj tekstoj en
 * la teksto-tabelo (kaj por krei novajn tiajn).
 */
/*
 * TODO!: post aldono aux sxangxo de teksto eblu tuj redaktado de gxi.
 */
//define(DEBUG, true);
require_once 'iloj/iloj.php';
session_start();
malfermu_datumaro();
Htmlkapo();
kontrolu_rajton("teknikumi");
if ($_POST['sendu'] == "aldonu") {
    eoecho("<h2>Aldono de Teksto</h2>");
    // unue ni rigardas, cxu teksto kun sama identifikilo jam estas en la datumbazo
    $sql = datumbazdemando(array('id', 'teksto'), "tekstoj", "mesagxoID = '" . $mesagxoID . "'", "renkontigxoID");
    $rez = sql_faru($sql);
    if (mysql_num_rows($rez) > 0) {
        // se jes, ni eldonas erarmesagxon kaj ebligas novan provon.
        $linio = mysql_fetch_assoc($rez);
        erareldono("Jam ekzistas mesag^o kun tia identifikilo en la aktuala renkontig^o:");
        echo "<pre>" . $linio['teksto'] . "</pre>";
        eoecho("<p>Bonvolu elekti alian identifikilon (au^ ");
        ligu("nova_teksto.php?id=" . $linio['id'], "redaktu la originalan tekston");
        eoecho(".)");
        //	  require('nova_teksto.php');
        HtmlFino();
        exit;

<?php

require_once 'iloj/iloj.php';
require_once 'iloj/iloj_kotizo.php';
session_start();
malfermu_datumaro();
kontrolu_rajton("administri");
HtmlKapo();
switch ($_REQUEST['sendu']) {
    case '':
        break;
    case 'sxangxu':
        // TODO: sxangxu bazajn datumojn
        break;
    case 'kreu':
    case 'kopiu':
        aldonu_al_datumbazo("malaligxkondicxsistemoj", array('nomo' => $_REQUEST['nomo'], 'priskribo' => $_REQUEST['priskribo'], 'aligxkategorisistemo' => $_REQUEST['aligxkategorisistemo']));
        $id = mysql_insert_id();
        $sistemo = new Malaligxkondicxsistemo($id);
        if ($_REQUEST['sendu'] == 'kopiu') {
            $sistemo->kopiu_kondicxojn_el($_REQUEST['ID']);
            eoecho("<p>Kreis novan Malalig^kotizosistemon" . " #" . $id . " kiel kopio de #" . $_REQUEST['ID'] . ".</p>\n");
        } else {
            eoecho("<p>Kreis novan Malalig^kotizosistemon #" . $id . ".</p>\n");
        }
        $_REQUEST['id'] = $id;
        // case kreu/kopiu
        break;
    case 'sxangxuKond':
        foreach ($_REQUEST['kondicxtipo'] as $kat => $tipo) {
            $sql = datumbazdemando("kondicxtipo", "malaligxkondicxoj", array("sistemo = '" . $_REQUEST['ID'] . "'", "aligxkategorio = '" . $kat . "'"));

<?php

/*
 * Akceptado de partoprenantoj
 *
 * Pasxo 3 - TEJO-membreco
 *
 */
/*
 * TODO: elpensu pri bonan sistemon de kalkulado kaj registrado
 * de individuaj krompagoj (ne nur la sumo, kiel cxi tie).
 */
require_once 'iloj/iloj.php';
session_start();
malfermu_datumaro();
kontrolu_rajton("akcepti");
require_once 'iloj/iloj_akceptado.php';
$partoprenanto = $_SESSION["partoprenanto"];
$partopreno = $_SESSION['partopreno'];
if ($_REQUEST['partoprenidento'] and $_REQUEST['partoprenidento'] != $partopreno->datoj['ID']) {
    // iu malgxusta okazis - ni rekreu la $partoprenon.
    $partopreno = new Partopreno($_REQUEST['partoprenidento']);
    $_SESSION['partopreno'] = $partopreno;
    $partoprenanto = new Partoprenanto($partopreno->datoj['partoprenantoID']);
    $_SESSION['partoprenanto'] = $partoprenanto;
}
// la persona pronomo (li aux sxi)
$ri = $partoprenanto->personapronomo;
$Ri = ucfirst($ri);
akceptado_kapo("tejo");
if ($_POST['sendu']) {

/* ############################# 
 * Montras kelkajn statistikojn 
 * ############################# 
 *
 *
 * Gxi montras, kiom da homoj venos/venis/malaligxis/...
 * el kiuj landoj (ordigita unufoje laux nomo, unufoje
 * laux nombro).
 *
 * TODO: ebligu facile elekti kombinojn de alvenstatoj,
 *       ekzemple a+i aux n+m.
 */
require_once "iloj/iloj.php";
session_start();
malfermu_datumaro();
kontrolu_rajton('statistikumi');
HtmlKapo();
echo "<p>";
ligu("cxambrostatistiko.php", "Mang^- kaj c^ambrostatistiko");
echo "</p>";
eoecho("<h1>Landostatistiko</h1>");
if (!empty($_REQUEST['alvenstato'])) {
    $alvenstato = $_REQUEST['alvenstato'];
} else {
    if (kalkulu_tagojn(date('y-m-d'), $_SESSION['renkontigxo']->datoj['de']) > 0) {
        $alvenstato = 'v';
    } else {
        $alvenstato = 'a';
    }
    // a = akceptigxis
}

        eoecho("Vi ne havas la rajton por elsendi" . " la mesag^on.");
    }
    echo "</p>\n";
}
if ($_REQUEST['faru'] == 'sendu_unuan_konfirmilon') {
    kontrolu_rajton('retumi');
    require_once $prafix . '/iloj/retmesagxiloj.php';
    require_once $prafix . '/tradukendaj_iloj/iloj_konfirmilo.php';
    require_once $prafix . '/iloj/diversaj_retmesagxoj.php';
    $teksto = kreu_kaj_sendu_unuan_konfirmilon($_SESSION["partoprenanto"], $_SESSION["partopreno"], $partopreno_renkontigxo, $_SESSION['kkren']['entajpantonomo']);
    echo "<p>Ni sendis la jenan unuan konfirmilon:</p><pre>";
    echo eotransformado($teksto, 'utf-8');
    echo "</pre>";
}
if ('sendu_informmesagxon' == $_REQUEST['faru']) {
    kontrolu_rajton('retumi');
    require_once $prafix . '/iloj/retmesagxiloj.php';
    require_once $prafix . '/tradukendaj_iloj/iloj_konfirmilo.php';
    require_once $prafix . '/iloj/diversaj_retmesagxoj.php';
    $teksto = sendu_informmesagxon_al_partoprenanto($_SESSION["partoprenanto"], $_SESSION["partopreno"], $partopreno_renkontigxo, $_SESSION['kkren']['entajpantonomo']);
    echo "<p>Ni sendis la jenan informmesagxon:</p><pre>";
    echo eotransformado($teksto, 'utf-8');
    echo "</pre>";
}
if ($faru == "ekzporti") {
    require_once $prafix . '/iloj/retmesagxiloj.php';
    require_once $prafix . '/iloj/diversaj_retmesagxoj.php';
    //  simpla_test_mesagxo();
    sendu_sekurkopion_de_aligxinto($_SESSION['partoprenanto'], $_SESSION['partopreno'], $partopreno_renkontigxo, $_SESSION['kkren']['entajpantonomo']);
    echo "<p> Sekurkopio sendita al la administranto. </p>";
}

<?php

require_once 'iloj/iloj.php';
require_once 'iloj/iloj_cxambroj.php';
session_start();
malfermu_datumaro();
kontrolu_rajton("cxambrumi");
$renkontigxodauxro = kalkulu_tagojn($_SESSION["renkontigxo"]->datoj[de], $_SESSION["renkontigxo"]->datoj[gxis]);
if ($partoprenID) {
    $_SESSION["partopreno"] = new Partopreno($partoprenID);
    $_SESSION["partoprenanto"] = new Partoprenanto($partopreno->datoj[partoprenantoID]);
}
// TODO:? Cxambrotipo nochmal überarbeiten
// [respondo de Martin:] Früher gab es 'u', 'g' und 'n'. Das 'n' für negravas wurde irgendwann rausgenommen. Das wollte ich nochmal überdenken und ggf. anpassen.
/*
//sql_farukajmontru("select count(*) from litonoktoj where cxambro = '$cxambronombro'");
$row = mysql_fetch_array(sql_faru("select count(*) from litonoktoj where cxambro = '$cxambronombro'"));
if ($row[0] == 0)
{
  if ($_SESSION["partopreno"]->datoj[cxambrotipo] == 'u')
  {
    sql_faru("update cxambroj set tipo = '".$_SESSION["partoprenanto"]->datoj[sekso]."'");
  }
  else
  {
    sql_faru("update cxambroj set tipo = 'g'");
  }
}*/
if ($sendu == "Ek!") {
    //echo "Typenupdate".$rimarkoj;
    //    sql_faru("update cxambroj set tipo = '".$tipo."', rimarkoj='".$rimarkoj."',dulita='".$dulita."' where ID='".$cxambronombro."'");

 * Statistiko pri uzado de ĉambroj, uzado de manĝoj ktp. dum la tuta tempo.
 *
 * @author Martin Sawitzki, Paul Ebermann
 * @version $Id$
 * @package aligilo
 * @subpackage pagxoj
 * @copyright 2001-2004 Martin Sawitzki, 2004-2009 Paul Ebermann.
 *       Uzebla laŭ kondiĉoj de GNU Ĝenerala Publika Permesilo (GNU GPL)
 */
/**
 */
//define("DEBUG", true);
require_once "iloj/iloj.php";
session_start();
malfermu_datumaro();
kontrolu_rajton("statistikumi");
HtmlKapo();
/**
 * montras, kiel statas iu cifero por cxiuj unuopaj noktoj.
 *
 * @param eostring $nomo la tabellinia kapo
 * @param int $noktonombro la nombro de nokto por montri
 * @param string $sql SQL-cxeno, kiu povas enhavi la indikon
 *    <samp>{{noktoj}}</samp>, kiu estos anstatauxita per la
 *    koncerna nokto-numero.
 * @param string $klaro CSS-klaso por tiu tabellinio, ekzemple
 *          por kolorado.
 */
function montru_laux_tage($nomo, $noktonombro, $sql, $klaso)
{
    eoecho("<tr class='" . $klaso . "'><th>" . $nomo . "</th>");

if ($sendu == "detaloj") {
    $partoprenantoidento = $fonto;
    require "partrezultoj.php";
    return;
}
require_once "iloj/iloj.php";
session_start();
malfermu_datumaro();
kontrolu_rajton("vidi");
HtmlKapo();
if ($sendu == "vidu") {
    $_SESSION["partoprenanto"] = new Partoprenanto($fonto);
    unset($_SESSION["partopreno"]);
}
if ($sendu == "transferuAl" || $sendu == "transferuDe" || $sendu == "transferuDeMenuo" || $sendu == "transferuAlMenuo") {
    kontrolu_rajton("estingi");
    switch ($sendu) {
        case "transferuAl":
            $de = $_SESSION["partoprenanto"];
            $al = new Partoprenanto($fonto);
            break;
        case "transferuDe":
            $al = $_SESSION["partoprenanto"];
            $de = new Partoprenanto($fonto);
            break;
        case "transferuDeMenuo":
            $al = $_SESSION["partoprenanto"];
            $de = new Partoprenanto($kune);
            break;
        case "transferuAlMenuo":
            $de = $_SESSION["partoprenanto"];

<?php

/**
 * kreado + redaktado/administrado de unuopaj kategoriaj sistemoj
 * (aligxtempo, lando, agxo, logxado).
 */
require_once 'iloj/iloj.php';
require_once 'iloj/iloj_kotizo.php';
// TODO: rerigardu la uzojn de $_REQUEST['ID'] kaj $_REQUEST['id'].
session_start();
malfermu_datumaro();
kontrolu_rajton("vidi");
// TODO: cxiuj krom teknikisto (aux administranto?) nur
// rajtu redakti sian proprajn kategorisistemojn.
if (!in_array($_REQUEST['tipo'], $GLOBALS['kategoriotipoj'])) {
    // mankas tipo, aux nevalida tipo.
    http_redirect("kategorisistemoj.php", null, false, 303);
    return;
}
$tipo = $_REQUEST['tipo'];
HtmlKapo();
switch ($_REQUEST['sendu']) {
    case '':
        // (neniu buton-premado, simpla
        //   voko de la pagxo)
        break;
    case 'sxangxu':
        sxangxu_datumbazon($tipo . "kategorisistemoj", array('nomo' => $_REQUEST['nomo'], 'priskribo' => $_REQUEST['priskribo']), array('ID' => $_REQUEST['ID']));
        $_REQUEST['id'] = $_REQUEST['ID'];
        eoecho("<p>S^ang^is la bazajn datojn de la " . donu_eokatsisnomon($tipo) . " #" . $_REQUEST['id'] . ".</p>\n");
        break;

 *       Uzebla laŭ kondiĉoj de GNU Ĝenerala Publika Permesilo (GNU GPL)
 */
/*
         1         2         3         4         5         6         7         8
12345678901234567890123456789012345678901234567890123456789012345678901234567890
*/
/**
 */
$prafix = "..";
require_once $prafix . "/iloj/iloj.php";
require_once $prafix . "/iloj/retmesagxiloj.php";
require_once $prafix . "/tradukendaj_iloj/iloj_konfirmilo.php";
require_once $prafix . "/iloj/diversaj_retmesagxoj.php";
session_start();
malfermu_datumaro();
kontrolu_rajton("retumi");
HtmlKapo('speciala');
die("Vi ne rajtas uzi tiun dosieron. Se vi ne scias, kial, demandu Pauxlon.");
if ($_POST['sendu'] == 'sendu') {
    $komenco = $_POST['komenco'];
    $nombro = $_POST['nombro'];
    echo "<p>\n";
    $demando = datumbazdemando(array("p.ID" => "antoID", "pn.ID" => "enoID"), array("partoprenantoj" => "p", "partoprenoj" => "pn"), array("pn.partoprenantoID = p.ID", "p.retposxto <> ''"), "renkontigxoID", array("limit" => "{$komenco}, {$nombro}", "order" => "pn.ID ASC"));
    eoecho("Demando: [<code>" . $demando . "</code>]</p><p>\n");
    eoecho("dato: " . date("Y-m-d H:i:s") . "<br/>\n");
    $rezulto = sql_faru($demando);
    $i = $komenco;
    while ($row = mysql_fetch_array($rezulto, MYSQL_BOTH)) {
        $anto = new Partoprenanto($row['antoID']);
        $eno = new Partopreno($row['enoID']);
        eoecho($i . " " . $anto->tuta_nomo() . "<br/>\n");

 *
 *
 * @author Martin Sawitzki, Paul Ebermann
 * @version $Id$
 * @package aligilo
 * @subpackage pagxoj
 * @copyright 2001-2004 Martin Sawitzki, 2004-2008 Paul Ebermann.
 *       Uzebla laŭ kondiĉoj de GNU Ĝenerala Publika Permesilo (GNU GPL)
 */
/**
 */
require_once 'iloj/iloj.php';
require_once 'iloj/iloj_cxambroj.php';
session_start();
malfermu_datumaro();
kontrolu_rajton('cxambrumi');
sesio_aktualigu_laux_get();
HtmlKapo();
if ($_REQUEST['sendu'] == "sxangxu") {
    $tempID = rand(-10000, -1000);
    $al = substr($_REQUEST['al'], 1);
    $ppID = $_REQUEST['ppID'];
    // intersxangxu la cxambrojn ...
    sxangxu_datumbazon("litonoktoj", array("partopreno" => $tempID), array("partopreno" => $ppID));
    sxangxu_datumbazon("litonoktoj", array("partopreno" => $ppID), array("partopreno" => $al));
    sxangxu_datumbazon("litonoktoj", array("partopreno" => $al), array("partopreno" => $tempID));
    eoecho("<p>S^ang^o de");
    ligu("partrezultoj.php?partoprenidento=" . $ppID, "#" . $ppID);
    eoecho(" al ");
    ligu("partrezultoj.php?partoprenidento=" . $al, "#" . $al);
    eoecho(" farita.</p>");

<?php

require_once 'iloj/iloj.php';
session_start();
malfermu_datumaro();
kontrolu_rajton("sxangxi");
sesio_aktualigu_laux_get();
if ($_POST['alvenstato']) {
    // TODO: kontrolo, cxu estas tauxga valoro
    $_SESSION['partopreno']->datoj['alvenstato'] = $_POST['alvenstato'];
    $_SESSION['partopreno']->skribu();
}
$sekvapagxo = $_SESSION["sekvontapagxo"] or $sekvapagxo = 'partrezultoj.php';
http_redirect($sekvapagxo, null, false, 303);

 * debug-moduso.
 */
// define("DEBUG", true);
/**
 * la kutimaj iloj.
 */
require_once 'iloj/iloj.php';
malfermu_datumaro();
session_start();
$GLOBALS['pd_klasonomoj'] = $GLOBALS['pp_klasonomoj'];
$GLOBALS['pd_titoloj'] = array('pago' => "pago", 'rabato' => "rabato", 'krom' => "krompago");
$GLOBALS['pd_tiponomo'] = array('pago' => "pagotipo", 'rabato' => "rabatkialo", 'krom' => "krompago-kialo");
$GLOBALS['pd_rajtoj'] = array('pago' => 'mono', 'rabato' => 'rabati', 'krom' => 'rabati');
$GLOBALS['pd_valuto_elektebla'] = array('pago' => true, 'rabato' => false, 'krom' => true);
echo "<!-- klaso: " . $_REQUEST['klaso'] . "-->";
kontrolu_rajton($GLOBALS['pd_rajtoj'][$_REQUEST['klaso']]);
HtmlKapo();
function donu_objekton($tipo, $id)
{
    $klaso = $GLOBALS['pd_klasonomoj'][$tipo];
    $objekto = new $klaso($id);
    if (!$objekto->datoj['ID']) {
        // nova pago/rabato/...
        $objekto->datoj['partoprenoID'] = $_SESSION['partopreno']->datoj['ID'];
        $objekto->datoj['dato'] = date('Y-m-d');
        $objekto->datoj['valuto'] = CXEFA_VALUTO;
    }
    return $objekto;
}
/**
 * savas objekton kaj redonas gxin.

<?php

require_once 'iloj/iloj.php';
session_start();
malfermu_datumaro();
kontrolu_rajton("inviti");
HtmlKapo();
if ($_REQUEST['sendu'] == 'Elektu' && $_REQUEST['invitpetoID']) {
    // ni uzas la saman identifikilon por la invitpetoj
    // kiel por la partoprenoj, cxar estas 1-1-rilato.
    $partoprenoID = $_REQUEST['invitpetoID'];
    if ($partoprenoID) {
        $_SESSION['partopreno'] = new Partopreno($partoprenoID);
    } else {
        erareldono("La invitpeto-identifikilo #" . $_REQUEST['invitpetoID'] . " ne ekzistas.");
    }
}
if (!$_SESSION['partopreno']) {
    // ne okazu
    erareldono("Forgesig^is la partopreno. Bonvolu unue elekti partoprenon..");
    echo "<form method='GET' action='invitpeto.php'>\n";
    entajpejo("Por specialaj uzoj, vi povas entajpi c^i tie la partopreno-identifikilon:", 'invitpetoID');
    send_butono("Elektu");
    echo "</form>";
    HtmlFino();
    exit;
}
if ($_SESSION['partoprenanto']->datoj['ID'] != $_SESSION['partopreno']->datoj['partoprenantoID']) {
    $_SESSION['partoprenanto'] = new Partoprenanto($_SESSION['partopreno']->datoj['partoprenantoID']);
}
/*