some improvements
[banana.git] / scripts / spoolgen.php
CommitLineData
14f1a075 1<?php
2/********************************************************************************
3ca86dfe 3 * spoolgen.php : spool generation
4 * --------------
5 *
6 * This file is part of the banana distribution
7 * Copyright: See COPYING files that comes with this distribution
8 ********************************************************************************/
14f1a075 9
10ini_set('max_execution_time','300');
3ca86dfe 11ini_set('include_path','.:..:../platal/include:../../platal/include');
14f1a075 12
0d407ce1 13require_once("include/encoding.inc.php");
14require_once("include/config.inc.php");
15require_once("include/NetNNTP.inc.php");
16require_once("include/post.inc.php");
17require_once("include/groups.inc.php");
18require_once("include/spool.inc.php");
19require_once("include/password.inc.php");
14f1a075 20
21
22$nntp = new nntp($news['server']);
23if (!$nntp) {
3ca86dfe 24 print "cannot connect to server\n";
25 exit;
14f1a075 26}
27
28if ($news['user']!="anonymous") {
3ca86dfe 29 $result = $nntp->authinfo($news["user"],$news["pass"]);
30 if (!$result) {
31 print "authentication error\n";
32 exit;
33 }
14f1a075 34}
35unset($result);
36
37$groups = new groups($nntp,2);
38$list = array_keys($groups->overview);
39unset($groups);
40foreach ($list as $g) {
3ca86dfe 41 print "Generating spool for $g : ";
42 $spool = new spool($nntp,$g);
43 print "done.\n";
44 unset($spool);
14f1a075 45}
46$nntp->quit();
47?>