File: //proc/2/cwd/proc/2/cwd/usr/lib/python2.4/Demo/scripts/newslist.pyc
mò
‚=5Dc @ sã d k Z d k Z d k Z d k Z d k Z d k Z d k Z d k Z d Z d Z d Z d Z
e Z d Z d Z
d Z d Z d Z xZ e i e i d
f D]B Z e i i e d ƒ Z e i i e ƒ o e GHe e ƒ Pq› q› Wd k l Z d
k Td Z e i e d „ e i e ƒ ƒ ƒ Z h a e i i e e ƒ Z e i i e e
ƒ Z
e i i e e ƒ Z d „ Z d „ Z! d „ Z" d „ Z# d „ Z$ d „ Z% d „ Z& d „ Z' d „ Z( d „ Z) d „ Z* e+ d j o e* ƒ n d S( Ns! /anfs/qsbigdisc/web/html/newspages nntp-serv.cl.cam.ac.ukt grouptreet
newsgroupst t rooti s; ... <img src="http://pelican.cl.cam.ac.uk/icons/page.xbm"> i t HOMEs .newslistrc.py( s NNTP( t *s $Revision: 37320 $c C s
d | j S( Nt $( t s( R ( ( t+ /usr/lib/python2.4/Demo/scripts/newslist.pyt <lambda>m s c C s9 d GHx- | D]% } t i | d ƒ } t | | ƒ q Wd S( Ns Updating tree...t .( t groupst it stringt splitfieldst partst makeleaft tree( R R R R ( ( R t addtotreex s
c C s} | d } t | ƒ } | i | ƒ p h | | <n | d j o d | | d <n | d j o t | | | d ƒ n d S( Ni i R
( t patht jt lent lR t has_keyR ( R R R R ( ( R R s
c C sâ t i i t | d ƒ } | t j o
d } n d | } t | d ƒ } | i
d | d ƒ | i
d | d ƒ | i
d t t d
ƒ t | | d | ƒ | i
d t d
ƒ | i
t i t i ƒ ƒ d ƒ | i ƒ d S( Ns .htmlR s under t ws <TITLE>Newsgroups availables </TITLE>
s <H1>Newsgroups availables </H1>
s <A HREF="s .html">Back to top level</A><P>
i s4 <I>This page automatically created by 'newslist' v. R
s </I><P>( t osR t joint pagedirR t filenamet rootpaget detailt opent ft writet httppreft printtreeR t pt rcsrevt timet ctimet close( R R R$ R R R ( ( R t
createpage s
c C s» t | ƒ } | t j op | d j oc | i d t | d d ƒ | i | d d ƒ | i d t d ƒ t
| d | | ƒ d Sn | i ƒ } | d j oO | i
ƒ | d j o | i d | d d ƒ n | i d
ƒ | d } n x¥ | D] } | d j ok | i d | d d
| d d ƒ t i | d ƒ o! | i d t | d d ƒ q•| i d ƒ qø t | | | | | d | ƒ qø W| d j o | i d ƒ n d S( Ni s <LI><B><A HREF="i s .html">s .*s </A></B>s
s <LI>s
<UL>s <UL>R
s <LI><A HREF="news:s ">s </A> s <I>s </I>
s
</UL>( R R R t sublistsizet indentR R! R" R$ t pagelinkiconR) t keyst klt sortR t descR R# ( R R R+ R$ R R R. ( ( R R# £ s2
%!#
c C sî h a | d j o d Sn y t | d ƒ } d GHWn t j
o d | GHd Sn X| i ƒ } x… | d j ow t i | ƒ } yB | d } t i | d ƒ } t
| ƒ d j o | t | <n Wn t j
o n X| i ƒ } qe Wd S( NR t rs Reading descriptions...s Failed to open description file i i ( R0 t descfileR t dt IOErrort readlineR R
t splitt bitst grpR t dscR t
IndexError( R2 R3 R8 R7 R R9 ( ( R t readdescÎ s,
c C s t i i | ƒ pv d | d GHd GHt i i ƒ d d j o4 y t i | d ƒ Wq… d GHt i d ƒ q… Xq‰ d GHt i d ƒ n d S(
Ns
Directory s does not exist.s Shall I create it for you? (y/n)i t yiÿ s Sorry - failed!i s OK. Exiting.( R R t isdirR t syst stdinR5 t mkdirt exit( R ( ( R t
checkopdirë s
c C sÍ d GHh } y t i t i | ƒ t ƒ } Wn' d | GHd GHd GHt i d ƒ n Xd | d d | d | d f } y, t | d
ƒ } t
i | ƒ } | i ƒ Wn t j
o d | GHn X| | f S( Ns# Reading current local group list...s&
*** Failed to open local group cache s5 If this is the first time you have run newslist, thens use the -a option to create it.i s %02d%02d%02di id i R1 s Cannot open local group list ( R R& t localtimeR t statt treefilet ST_MTIMEt treetimeR> RA t treedateR t dumpt marshalt loadR( R4 ( RE RI RH R RG ( ( R t
readlocallistû s" #c C se y< t | d ƒ } t i | | ƒ } | i ƒ d | d GHWn" d | GHd GHt i d ƒ n Xd S( NR s Saved list to s
s- Sorry - failed to write to local group cache s8 Does it (or its directory) have the correct permissions?i ( R RE RI RJ R R R( R> RA ( RE R RI R ( ( R t writelocallist s
c C s¾ d GHd } | i ƒ d } g } d GHt o d GHn xl | D]d } t i | d ƒ d } t o3 t i
| d ƒ t i
| d ƒ j o | d Gq= | i | ƒ q= Wd GHt o d
GHn | S( Ns Getting list of all groups...t 010101i s
Processing...s!
Ignoring following empty groups:i i t s
s (End of empty groups)( RH t servert listt infoR t skipemptyR R
R6 t grpnamet atoit append( RP RR RT R RH R ( ( R t getallgroups s" . c C su d | d G| i | d ƒ d } d t | ƒ GHd Gg } x. | D]& } t i | ƒ d } | i
| ƒ qB Wd GH| S( Ns* Getting list of new groups since start of s ...t 000001i s got %d.s
Processing...i t Done( RH RP t newgroupsRR R R R R
R6 RT RV ( RP RH RR RT R R ( ( R t getnewgroups0 s c C sL h } t t ƒ yJ d t d GHt i d d j o t i t ƒ } n
t t ƒ } d } Wn5 t
i t
i f j
o } d G| GHd GHd } n X| o: t t i ƒ d j o$ t i d d j o t | ƒ } n- t t ƒ \ } } | o t | | ƒ } n | o t | | ƒ t t | ƒ n t t ƒ d GHt t | d
ƒ d GHd S( Ns Connecting to s ...i t 0i s Error connecting to host:s$ I'll try to use just the local list.s -as Creating pages...R RY ( R RB R t newshostR> t versiont NNTPt initR t connectedt nntplibt
error_tempt
error_permt xR t argvRW R RL RE RH R[ R RM R; R2 R) R ( R R Ra R RH Re ( ( R t main> s2
1
t __main__(, R> Rb R
RJ R& R t posixt topdirR] RE R2 R R" R RS R, R* t curdirt environt dirR R t rcfilet existst execfileR_ RD R% t filterR6 R0 t pageR R R) R# R; RB RL RM RW R[ Rg t __name__(! R RS RL RW R% R[ R2 R R) R RB R
Rb R> R, Rn R# Rg R" Rj R RM Rr RE R] Ri R* R& R R; R_ RJ Rm ( ( R t ?# sL H
$ +
,