[banana.git] / examples / index.php

<?php
/********************************************************************************
* index.php : Banana NNTP client example
* -----------
*
* This file is part of the banana distribution
* Copyright: See COPYING files that comes with this distribution
********************************************************************************/

require_once("banana/banana.inc.php");

session_start();

// Some configuration
Banana::$nntp_host  = 'news://user:password@host:119/'; // where is the news server
Banana::$spool_root  = dirname(__FILE__) . '/spool'; // where to store cache files
Banana::$debug_nntp   = false; // if true, show the NNTP backtrace
Banana::$debug_smarty = false; // if true, shos php-error in page generation
Banana::$feed_active  = true;  // Activate RSS feed

// Implement a Banana which stores subscription list in a cookie
class MyBanana extends Banana
{
    protected function action_saveSubs($groups)
    {
        parent::action_saveSubs($groups);
        setcookie('banana_subs', serialize(Banana::$profile['subscribe']), time() + 25920000);
        return true;
    }
}

if (!isset($_SESSION['banana_email']) || isset($_POST['change_login']) || isset($_POST['valid_change'])) {
    if (isset($_COOKIE['banana_login']) && !isset($_POST['change_login']) && !isset($_POST['valid_change'])) {
        $_SESSION['banana_email'] = $_COOKIE['banana_email'];
    } elseif (isset($_POST['valid_change'])) {
        $_SESSION['banana_name'] = $_POST['name'];
        $_SESSION['banana_email'] = $_POST['email'];
        setcookie('banana_name', $_POST['name'],  time() + 25920000);
        setcookie('banana_email', $_POST['email'],  time() + 25920000);
    } else {
?>
<html xmlns="http://www.w3.org/1999/xhtml"> 
  <head> 
    <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" /> 
    <meta name="description" content="WebForum2/Banana" /> 
    <link href="css/style.css" type="text/css" rel="stylesheet" media="screen" /> 
    <link href="css/banana.css" type="text/css" rel="stylesheet" media="screen"> 
    <title>Banana, a NNTP<->Web Gateway</title>
  </head>
  <body>
    <div class="bloc">
      <h1>Les Forums de Banana</h1>
      Merci d'entrer vos identifiants pour accéder à Banana :
      <form action="" method="post">
        <div class="banana" style="margin: auto; width: 50%">
          Nom : <input type="text" name="name" size="40" /><br />
          Email : <input type="text" name="email" size="40" />
          <div class="center">
            <input type="submit" name="valid_change" value="Valider" />
          </div>
        </div>
      </form>
      <div class="foot">
        <em>Banana</em>, a Web interface for a NNTP Server<br /> 
        Developed under GPL License for <a href="http://www.polytechnique.org">Polytechnique.org</a><br />
        Use <em>silk</em> icons from <a href="http://www.famfamfam.com/lab/icons/silk/">www.famfamfam.com</a> 
      </div>
    </div>
  </body>
</html>
<?php
        exit;
    }
}

// Restore subscription list
if (isset($_COOKIE['banana_subs'])) {
    Banana::$profile['subscribe'] = unserialize($_COOKIE['banana_subs']);
}

// Compute and set last visit time
if (!isset($_SESSION['banana_lastnews']) && isset($_COOKIE['banana_lastnews'])) {
    $_SESSION['banana_lastnews'] = $_COOKIE['banana_lastnews'];
} else if (!isset($_SESSION['banana_lastnews'])) {
    $_SESSION['banana_lastnews'] = 0;
}
Banana::$profile['signature'] = $_SESSION['banana_name'];
Banana::$profile['headers']['From'] = '"' . $_SESSION['banana_name'] . '" <' . $_SESSION['banana_email'] . '>';
Banana::$profile['lastnews'] = $_SESSION['banana_lastnews'];
setcookie('banana_lastnews', time(),  time() + 25920000);

// Run Bananan
$banana = new MyBanana();    // Create the instance of Banana
$res  = $banana->run();       // Run banana, and generate the XHTML output
$css  = $banana->css();       // Get the CSS code to add in my page headers
$feed = $banana->feed();      // Get a link to banana's feed. You need to use Banana::refreshAllFeeds in a cron or enable Banana::$feed_updateOnDemand in order to keep up-to-date feeds
$bt   = $banana->backtrace(); // Get protocole execution backtrace

session_write_close();

// Genererate the page
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
  <head>
    <meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
    <meta name="description" content="WebForum2/Banana" />
    <link href="css/style.css" type="text/css" rel="stylesheet" media="screen" />
    <link href="css/banana.css" type="text/css" rel="stylesheet" media="screen" />
<?php if ($feed) { ?>
    <link rel="alternate" type="application/rss+xml" title="Banana :: Abonnements" href="<?php echo htmlentities($feed); ?>" />
<?php } ?>
<?php if ($css) { ?>
    <style type="text/css">
        <?php echo $css; ?>
    </style>
<?php } ?>
    <title>
      Banana, a NNTP<->Web Gateway 
    </title>
  </head>
  <body>
    <div class="bloc">
      <h1>Les Forums de Banana</h1>
      <?php echo $res; ?>
      <div>
      <div style="padding-top: 1ex; float: right; text-align: right; font-size: small"> 
        <form action="" method="post">
        Vous êtes :<br /> 
        <?php echo $_SESSION['banana_name'] . ' &lt;' . $_SESSION['banana_email'] . '&gt;'; ?><br /> 
        <input type="submit" name="change_login" value="Changer" />
        </form>
      </div> 
      <div class="foot">
        <em>Banana</em>, a Web interface for a NNTP Server<br />
        Developed under GPL License for <a href="http://www.polytechnique.org">Polytechnique.org</a><br />
        Use <em>silk</em> icons from <a href="http://www.famfamfam.com/lab/icons/silk/">www.famfamfam.com</a>
      </div>
      </div>
<?php
    // Generate the protocole Backtrace at the bottom of the page
    if ($bt) {
        echo "<div class=\"backtrace\">";
        foreach ($bt as &$entry) {
            echo "<div><pre>" . $entry['action'] . "</pre>";
            echo "<p style=\"padding-left: 4em;\">"
                 . "Exécution en " . sprintf("%.3fs", $entry['time']) . "<br />"
                 . "Retour : " . $entry['code'] . "<br />"
                 . "Lignes : " . $entry['response'] . "</p></div>";
        }
        echo "</div>";
    }
?>
    </div>
  </body>
</html>
<?php

// vim:set et sw=4 sts=4 ts=4
?>
Commit	Line	Data
90962c86	1	<?php
90962c86	2	/********************************************************************************
dfb752b1	3	* index.php : Banana NNTP client example
90962c86	4	* -----------
	5	*
	6	* This file is part of the banana distribution
	7	* Copyright: See COPYING files that comes with this distribution
	8	********************************************************************************/
	9
4cc7f778	10	require_once("banana/banana.inc.php");
fe44f824	11
	12	session_start();
	13
dfb752b1	14	// Some configuration
	15	Banana::$nntp_host = 'news://user:password@host:119/'; // where is the news server
	16	Banana::$spool_root = dirname(__FILE__) . '/spool'; // where to store cache files
	17	Banana::$debug_nntp = false; // if true, show the NNTP backtrace
	18	Banana::$debug_smarty = false; // if true, shos php-error in page generation
	19	Banana::$feed_active = true; // Activate RSS feed
	20
	21	// Implement a Banana which stores subscription list in a cookie
fe44f824	22	class MyBanana extends Banana
	23	{
	24	protected function action_saveSubs($groups)
	25	{
	26	parent::action_saveSubs($groups);
dfb752b1	27	setcookie('banana_subs', serialize(Banana::$profile['subscribe']), time() + 25920000);
fe44f824	28	return true;
	29	}
	30	}
	31
e83d5aa0	32	if (!isset($_SESSION['banana_email']) \|\| isset($_POST['change_login']) \|\| isset($_POST['valid_change'])) {
	33	if (isset($_COOKIE['banana_login']) && !isset($_POST['change_login']) && !isset($_POST['valid_change'])) {
	34	$_SESSION['banana_email'] = $_COOKIE['banana_email'];
	35	} elseif (isset($_POST['valid_change'])) {
	36	$_SESSION['banana_name'] = $_POST['name'];
	37	$_SESSION['banana_email'] = $_POST['email'];
	38	setcookie('banana_name', $_POST['name'], time() + 25920000);
	39	setcookie('banana_email', $_POST['email'], time() + 25920000);
	40	} else {
	41	?>
	42	<html xmlns="http://www.w3.org/1999/xhtml">
	43	<head>
	44	<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
	45	<meta name="description" content="WebForum2/Banana" />
	46	<link href="css/style.css" type="text/css" rel="stylesheet" media="screen" />
	47	<link href="css/banana.css" type="text/css" rel="stylesheet" media="screen">
	48	<title>Banana, a NNTP<->Web Gateway</title>
	49	</head>
	50	<body>
	51	<div class="bloc">
	52	<h1>Les Forums de Banana</h1>
	53	Merci d'entrer vos identifiants pour accéder à Banana :
	54	<form action="" method="post">
	55	<div class="banana" style="margin: auto; width: 50%">
	56	Nom : <input type="text" name="name" size="40" /><br />
	57	Email : <input type="text" name="email" size="40" />
	58	<div class="center">
	59	<input type="submit" name="valid_change" value="Valider" />
	60	</div>
	61	</div>
	62	</form>
	63	<div class="foot">
	64	<em>Banana</em>, a Web interface for a NNTP Server<br />
	65	Developed under GPL License for <a href="http://www.polytechnique.org">Polytechnique.org</a><br />
	66	Use <em>silk</em> icons from <a href="http://www.famfamfam.com/lab/icons/silk/">www.famfamfam.com</a>
	67	</div>
	68	</div>
	69	</body>
	70	</html>
	71	<?php
	72	exit;
	73	}
	74	}
	75
dfb752b1	76	// Restore subscription list
fe44f824	77	if (isset($_COOKIE['banana_subs'])) {
	78	Banana::$profile['subscribe'] = unserialize($_COOKIE['banana_subs']);
	79	}
dfb752b1	80
dfb752b1	81	// Compute and set last visit time
fe44f824	82	if (!isset($_SESSION['banana_lastnews']) && isset($_COOKIE['banana_lastnews'])) {
fe44f824	83	$_SESSION['banana_lastnews'] = $_COOKIE['banana_lastnews'];
dfb752b1	84	} else if (!isset($_SESSION['banana_lastnews'])) {
dfb752b1	85	$_SESSION['banana_lastnews'] = 0;
fe44f824	86	}
e83d5aa0	87	Banana::$profile['signature'] = $_SESSION['banana_name'];
e83d5aa0	88	Banana::$profile['headers']['From'] = '"' . $_SESSION['banana_name'] . '" <' . $_SESSION['banana_email'] . '>';
dfb752b1	89	Banana::$profile['lastnews'] = $_SESSION['banana_lastnews'];
dfb752b1	90	setcookie('banana_lastnews', time(), time() + 25920000);
fe44f824	91
dfb752b1	92	// Run Bananan
	93	$banana = new MyBanana(); // Create the instance of Banana
	94	$res = $banana->run(); // Run banana, and generate the XHTML output
	95	$css = $banana->css(); // Get the CSS code to add in my page headers
	96	$feed = $banana->feed(); // Get a link to banana's feed. You need to use Banana::refreshAllFeeds in a cron or enable Banana::$feed_updateOnDemand in order to keep up-to-date feeds
	97	$bt = $banana->backtrace(); // Get protocole execution backtrace
90962c86	98
fe44f824	99	session_write_close();
fe44f824	100
dfb752b1	101	// Genererate the page
90962c86	102	?>
0e25d15d	103	<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
0e25d15d	104	<html xmlns="http://www.w3.org/1999/xhtml">
8d99c683	105	<head>
62add405	106	<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
	107	<meta name="description" content="WebForum2/Banana" />
	108	<link href="css/style.css" type="text/css" rel="stylesheet" media="screen" />
	109	<link href="css/banana.css" type="text/css" rel="stylesheet" media="screen" />
dfb752b1	110	<?php if ($feed) { ?>
	111	<link rel="alternate" type="application/rss+xml" title="Banana :: Abonnements" href="<?php echo htmlentities($feed); ?>" />
	112	<?php } ?>
1ee29bd5	113	<?php if ($css) { ?>
	114	<style type="text/css">
	115	<?php echo $css; ?>
	116	</style>
	117	<?php } ?>
8d99c683	118	<title>
	119	Banana, a NNTP<->Web Gateway
	120	</title>
	121	</head>
	122	<body>
	123	<div class="bloc">
fe44f824	124	<h1>Les Forums de Banana</h1>
fe44f824	125	<?php echo $res; ?>
e83d5aa0	126	<div>
	127	<div style="padding-top: 1ex; float: right; text-align: right; font-size: small">
	128	<form action="" method="post">
	129	Vous êtes :<br />
	130	<?php echo $_SESSION['banana_name'] . ' <' . $_SESSION['banana_email'] . '>'; ?><br />
	131	<input type="submit" name="change_login" value="Changer" />
	132	</form>
	133	</div>
8d99c683	134	<div class="foot">
8d99c683	135	<em>Banana</em>, a Web interface for a NNTP Server<br />
e83d5aa0	136	Developed under GPL License for <a href="http://www.polytechnique.org">Polytechnique.org</a><br />
35bf53d0	137	Use <em>silk</em> icons from <a href="http://www.famfamfam.com/lab/icons/silk/">www.famfamfam.com</a>
8d99c683	138	</div>
e83d5aa0	139	</div>
1ee29bd5	140	<?php
dfb752b1	141	// Generate the protocole Backtrace at the bottom of the page
1ee29bd5	142	if ($bt) {
	143	echo "<div class=\"backtrace\">";
	144	foreach ($bt as &$entry) {
	145	echo "<div><pre>" . $entry['action'] . "</pre>";
	146	echo "<p style=\"padding-left: 4em;\">"
	147	. "Exécution en " . sprintf("%.3fs", $entry['time']) . "<br />"
	148	. "Retour : " . $entry['code'] . "<br />"
	149	. "Lignes : " . $entry['response'] . "</p></div>";
	150	}
	151	echo "</div>";
	152	}
	153	?>
8d99c683	154	</div>
	155	</body>
	156	</html>
608f5b71	157	<?php
d5588318	158
d5588318	159	// vim:set et sw=4 sts=4 ts=4
608f5b71	160	?>