File: //usr/local/ssl/lib/python2.4/test/test_tarfile.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 l Z y d k Z e i
Wn e e f j
o
d Z n Xy
d k Z Wn e j
o
d Z n Xd Z e d Z e i i e i d e i d Z e i Z d Z d d Z d Z d
Z d e i f d YZ d
e f d YZ d e f d YZ d e f d YZ d e f d YZ d e f d YZ! d e f d YZ" d e f d YZ# d e f d YZ$ d e f d YZ% d e f d YZ& d! e$ f d" YZ' d# e i f d$ YZ( d% e i f d& YZ) d' e f d( YZ* d) e f d* YZ+ d+ e f d, YZ, d- e f d. YZ- d/ e$ f d0 YZ. d1 e' f d2 YZ/ d3 e f d4 YZ0 d5 e f d6 YZ1 d7 e! f d8 YZ2 d9 e" f d: YZ3 d; e# f d< YZ4 d= e i f d> YZ5 d? e f d@ YZ6 e o dA e, f dB YZ7 dC e- f dD YZ8 dE e$ f dF YZ9 dG e/ f dH YZ: dI e f dJ YZ; dK e f dL YZ< dM e! f dN YZ= dO e" f dP YZ> dQ e# f dR YZ? dS e i f dT YZ@ n e p [, [- [. [/ n dU ZA eB dV j o eA n d S(W N( s test_supportc C s
t i | S( N( t test_supportt findfilet path( R ( ( t' /usr/lib/python2.4/test/test_tarfile.pyR s s testtar.tart testtart diri
t c C s2 | p t Sn t i i t d t t i | f S( Ns %s%s%s( t compR t osR t joint tempdirt extsep( R ( ( R t tarname s c C s( t i i t p t i t n t S( N( R R t existsR
t mkdir( ( ( R t dirname$ s c C s t S( N( t tempname( ( ( R t tmpname) s t BaseTestc B s, t Z d Z d Z d Z d Z d Z RS( NR t rt :c C s9 | i | i | i } t i t | i | | _ d S( N( t selft modet sepR t tarfilet openR t tar( R R ( ( R t setUp2 s c C s | i i d S( N( R R t close( R ( ( R t tearDown6 s ( t __name__t
__module__R R R R R ( ( ( R R - s
t ReadTestc B sY t Z d Z d Z d Z d Z d Z d Z d Z d Z d Z
RS(
Nc C s d } xp | i D]e } | d 7} | i p q n | i i | } | i t | i | i
j d | i q W| i | t j d d S( s Test member extraction.
i i s& size read does not match expected sizes could not find all membersN(
t membersR R t tarinfot isregt extractfilet ft assert_t lent readt sizeR t membercount( R R% R! R" ( ( R t test; s
c C s^ | i d j oJ | i i d } | i i d } | i | i | i j d n d S( s' Test sparse member extraction.
t |s S-SPARSEs S-SPARSE-WITH-NULLSs( _FileObject failed on sparse file memberN( R R R R$ t f1t f2R& R( ( R R- R. ( ( R t test_sparseK s c C s | i d j o d } | i i | t t t i i t | d } | i } | i
| i i | i } | i | | j d n d S( s0 Test readlines() method of _FileObject.
R, s 0-REGTYPE-TEXTt rUs. _FileObject.readline() does not work correctlyN( R R t filenameR t extractR R R R R R% t readlinest lines1R R$ t lines2R& ( R R% R4 R1 R5 ( ( R t test_readlinesT s !
c C s | i d j o d } | i i | t t t i i t | d } | i } | i
g } | i i | D]
} | | qz ~ } | i | | j d n d S( NR, s 0-REGTYPE-TEXTR0 s. ExFileObject iteration does not work correctly( R R R1 R R2 R R R R R R% R3 R4 R t _[1]R$ t lineR5 R& ( R R% R4 R1 R7 R5 R8 ( ( R t test_itera s !
-c C s | i d j od } | i i | t t t i i t | d } | i } | i
| i i | }
| i i |
} | i } | i d | i d | i j d | i d d | i d | i j d | i d d | i d
| i j d | i d
d | i d | i j d | i d
} | i | | d d !j d | i d d | i |
i | i j d | i | i d j d | i |
i d | i d | i j d | i d | i } | i d | i } | i | | j d | i d | i t | i | i j d | i d | i t | i d | i j d | i d | i } | i | i | t | j d | i
n d S( sA Test seek() method of _FileObject, incl. random reading.
R, s 0-REGTYPE-TEXTt rbi s seek() to file's start failedi s" seek() to absolute position failedi i i s+ seek() to negative relative position faileds+ seek() to positive relative position failedi
i
s read() after seek failedi s seek() to file's end failedR s0 read() at file's end did not return empty strings& relative seek() to file's start failedi s readlines() after seek faileds tell() after readline() faileds) tell() after seek() and readline() faileds read() after readline() failedN( R R R1 R R2 R R R R R R% R( t dataR t getmemberR" R$ t fobjt textt seekR& t tellt sR) R3 t s1t s2R' t readlineR8 ( R RC R% R1 R= RA R; R> R8 RB R" ( ( R t test_seekm sd !
!
%
c C s t } t i d } t i | _ t | d } | i | i
| i z_ t i | } | i
d } | i | i | i t i j | i | i i d Wd y t i | Wn n XXd S( s6 Test old style dirtype member (bug #1336623).
s
directory/t wi t /N( R R1 R t TarInfoR" t REGTYPEt typeR R= t writet tobufR R t
getmembersR R& t DIRTYPEt namet endswithR t unlink( R R R= R1 R" ( ( R t test_old_dirtype s$
c C s` xY | i D]N } | i o; | i | i i d | i | i d i d q
q
Wd S( NRG i( R R R" t isdirR& RO RP ( R R" ( ( R t test_dirtype s
c C sT t i d j o d Sn t i } t i d | d d } xH d D]@ } t i | } t i
| _ d | _ d | _
| i | qC W| i | i d t i i t d
} t i d | } | i | xn | i D]` } t i i | | i } | i | i
t i | i d @ | i | i t i i | q W| i d S(
Nt win32t fileobjR s w:t foos foo/bari>i i s extract-testi ( RW s foo/bar( t syst platformt StringIOR= R R R RO RH R" RN RJ t mtimeR t addfileR R? R R R R t TEMPDIRt
extractallRM R t assertEqualt statt st_modet getmtime( R RO R R= R] R R" ( ( R t test_extractall s,
##c C s; y | i i d Wn t j
o | i d n Xd S( Ns 7-STARs. finding 7-STAR member failed (mangled prefix?)( R R R< t KeyErrort fail( R ( ( R t test_star s ( R R R+ R/ R6 R9 RE RR RT Rc Rf ( ( ( R R 9 s
7 t ReadStreamTestc B s t Z d Z d Z d Z RS( NR, c C sL t i | | i i d } | i i | } | i t i
| i d S( sW Test member extraction, and for StreamError when
seeking backwards.
i N( R R+ R R RM R" R$ R% t assertRaisesR t StreamErrorR( ( R R" R% ( ( R R+ s
c C s" | i } t i t d } x | i } | i } | d j o Pn | i
| d j d | i p
| i o | i
t i | i | q! n | i | } | i | } | d j o q! n | i
| d j d | i
| i | i j d q! W| i | i d S( s3 Compare the normal tar and the stream tar.
R i s stream.next() failed.s stream.extractfile() faileds stream extraction failedN( R R t streamR R R t nextt t1t t2t NoneR& t islnkt issymRh Ri R$ t v1t v2R( R ( R Rj R Rm Rl Rq Rr ( ( R t test_stream s*
'
( R R R R+ Rs ( ( ( R Rg s t ReadDetectTestc B s t Z d Z RS( Nc C s% t i t | i | i | _ d S( N( R R R R R R R ( R ( ( R R s ( R R R ( ( ( R Rt s t ReadDetectFileobjTestc B s t Z d Z RS( Nc C s= t | i } t i | d | i d t | d | _ d S( NR RV R: ( R R R RO R R R R ( R RO ( ( R R s ( R R R ( ( ( R Ru s t ReadAsteriskTestc B s t Z d Z RS( Nc C s6 | i | i d } t i t | i | | _ d S( Nt *( R R R R R R R R ( R R ( ( R R s ( R R R ( ( ( R Rv s t ReadStreamAsteriskTestc B s t Z d Z RS( Nc C s6 | i | i d } t i t | i | | _ d S( NRw ( R R R R R R R R ( R R ( ( R R % s ( R R R ( ( ( R Rx # s t ReadFileobjTestc B s t Z d Z RS( Nc C s4 | i i | i i } | i } | i } | i i | i } | i i | i
d j o
t i } n$ | i
d j o
t i } n t } | t | i
d } | i | t i t | i
d d | | _ | i i } | i | i | | i i | i | i i | i | d d S( Nt gzt bz2R: s r:RV s seek back did not work( R R Rk t tRO t offsetR$ R( R; R R t gzipt GzipFilet _openR{ t BZ2FileR R R= R? R R_ RM ( R RO R R= R| R} R; ( ( R t test_fileobj_with_offset+ s&
$
( R R R ( ( ( R Ry ) s t WriteTestc B sM t Z d Z d Z d Z d Z d Z d Z d Z d Z RS( NRF c C s] | i | i | i } t i t | i d | _ t | _ t i | i | | _
d S( NR ( R R R R R R R t srcR t dstnamet dst( R R ( ( R R L s c C s | i i | i i d S( N( R R R R ( R ( ( R R R s
c C s d | i _ | i d S( Ni ( R R t posixt _test( R ( ( R t
test_posixV s c C s d | i _ | i d S( Ni ( R R R R ( R ( ( R t
test_nonposixZ s c C s[ | i i t i i t i i t d | i i | i t i
| i i d d S( Ns cfgparser.1i (
R R t addR R R R t __file__R t assertNotEqualR` R t st_size( R ( ( R t
test_small^ s +
c C s x | i D] } | i p q
n | i i | } | i i oI t | i t
i j o0 d | i j o | i t
| i i | | q
| i i | | q
Wd S( NRG ( R R R" R# R$ R% R R R' RO R t LENGTH_NAMERh t
ValueErrorR\ ( R R% R" ( ( R R c s
6c C s t i i | i } | i | i i | d | i i | | i | i i g d t i
} t i t
| i i | t i | | i | i i g d d S( Ns archive name must be absolutes added the archive to itself( R R t abspathR R R_ R RO R t getnamest getcwdt cwdt chdirR ( R R R ( ( R t
test_add_selfn s
(
R R R R R R R R R R ( ( ( R R I s t Write100Testc B s# t Z d Z d Z d Z RS( Nc C sx d | _ | i d 7_ t i t d | _ t i | i } | i i | | i i t i t | _ d S( Nt2 01234567890123456789012345678901234567890123456789RF (
R RO R R R R RH R| R\ R ( R R| ( ( R R s
c C s | i i d S( N( R R R ( R ( ( R R s c C s' | i | i i d | i d d S( Ni s! failed to store 100 char filename( R R_ R R RO ( R ( ( R R+ s ( R R R R R+ ( ( ( R R } s t WriteSize0Testc B s; t Z d Z d Z d Z d Z d Z d Z RS( NRF c C s4 t | _ t | _ t i | i d | _ d S( NRF ( R R t tmpdirR R R R R ( R ( ( R R s c C s | i i d S( N( R R R ( R ( ( R R s c C s t i i | i d } t | d } | i | i i | } | i | i d t | d } | i
d | i | i i | } | i | i d d S( Nt fileRF i t aaai ( R R R R R R R% R R t
gettarinfoR" R_ R) RK ( R R% R R" ( ( R t test_file s
c C sr t i i | i d } t i i | o t i | n t i | | i i
| } | i | i
d d S( Nt directoryi ( R R R R R R
t shutilt rmtreeR R R R" R_ R) ( R R R" ( ( R t test_directory s
c C se t t d oQ t i i | i d } t i d | | i i | } | i
| i d n d S( Nt symlinkt link_targeti ( t hasattrR R R R R R R R R" R_ R) ( R R R" ( ( R t test_symlink s
( R R R R R R R R ( ( ( R R s
t WriteStreamTestc B s t Z d Z d Z RS( NR, c C s | i i | i d j o, t i | i } | i } | i n | i d j oP t
i } t | i i } | i
| } | i t | i d d n& t | i } | i } | i | i | i d t i d d S( NRz R{ i s
trailing datat s incorrect zero padding( R R R R R~ R R R% R( RA R{ t BZ2DecompressorR t
decompressR_ R' t unused_datat countR t
RECORDSIZE( R R% RA ( ( R t test_padding s
( R R R R ( ( ( R R s t WriteGNULongTestc B s t Z d Z d Z e d Z e d Z d Z d Z d Z d Z
d Z d Z d
Z
d Z d Z RS(
sG This testcase checks for correct creation of GNU Longname
and Longlink extensions.
It creates a tarfile and adds empty members with either
long names, long linknames or both and compares the size
of the tarfile with the expected size.
It checks for SF bug #812325 in TarFile._create_gnulong().
While I was writing this testcase, I noticed a second bug
in the same method:
Long{names,links} weren't null-terminated which lead to
bad tarfiles when their length was a multiple of 512. This
is tested as well.
c C s< t t | d d \ } } | o | d 7} n | d S( Ni i ( t divmodR' RA t blockst remainder( R RA R R ( ( R t _length s c C s d } t | t i j o! | d 7} | | i | 7} n | d j o7 t | t i j o! | d 7} | | i | 7} n | S( Ni (
R R' RO R R R R t linkRn t LENGTH_LINK( R RO R R ( ( R t
_calc_size s
#
c C s t i | } | o | | _ t i | _ n t i t d } t | _ | i
| | i | | } | i } | i | | d | i t i t } | i } | i | d j d | i | i | i j o | i | i j d d S( NRF s% GNU longname/longlink creation faileds unable to read longname member( R RH RO R" R t linknamet LNKTYPERJ R R R t FalseR R\ R R Rq R} Rr R_ R Rk t membert failIfRn R& ( R RO R R Rq R Rr R" ( ( R R s
(c C s | i d d d d S( Ns longnam/i t longnam( R R ( R ( ( R t test_longname_1023 s c C s | i d d d d S( Ns longnam/i t longname( R R ( R ( ( R t test_longname_1024 s c C s | i d d d d S( Ns longnam/i t longname_( R R ( R ( ( R t test_longname_1025 s c C s | i d d d d d S( NRO s longlnk/i t longlnk( R R ( R ( ( R t test_longlink_1023 s c C s | i d d d d d S( NRO s longlnk/i t longlink( R R ( R ( ( R t test_longlink_1024! s c C s | i d d d d d S( NRO s longlnk/i t longlink_( R R ( R ( ( R t test_longlink_1025$ s c C s$ | i d d d d d d d S( Ns longnam/i R s longlnk/R ( R R ( R ( ( R t test_longnamelink_1023' s c C s$ | i d d d d d d d S( Ns longnam/i R s longlnk/R ( R R ( R ( ( R t test_longnamelink_1024+ s c C s$ | i d d d d d d d S( Ns longnam/i R s longlnk/R ( R R ( R ( ( R t test_longnamelink_1025/ s ( R R t __doc__R Rn R R R R R R R R R R R ( ( ( R R s t ReadGNULongTestc B s> t Z d Z d Z d Z d Z d Z d Z RS( Nc C s t i t | _ d S( N( R R R R R ( R ( ( R R 5 s c C s | i i d S( N( R R R ( R ( ( R R 8 s c C sv d d d } y | i i | } Wn t j
o
d } n X| i | d j d | i | i t i
j d d S( s1 Test reading of longname (bug #1471427).
s test/i s 0-REGTYPEs longname not founds read longname as dirtypeN( RO R R R< R" Rd Rn R& RJ R RN ( R RO R" ( ( R t test_1471427; s c C sZ d d d } y | i i | } Wn t j
o
d } n X| i | d j d d S( Ns 0-LONGNAME-i
ie s longname not found( RO R R R< R" Rd Rn R& ( R RO R" ( ( R t test_read_nameF s c C s d d d } d d d } y | i i | } Wn t j
o
d } n X| i | d j d | i | i | j d d S( Ns 1-LONGLINK-i
ie s 0-LONGNAME-s longlink not founds linkname wrong(
R RO R R R< R" Rd Rn R& R ( R RO R R" ( ( R t test_read_linkN s c C sy t t } t i | i d } | i t i d d d | } | i
t | i d j d | i d S( Ni RO s foo.tarRV i R (
R R R% RZ R( R= R R R R R& R' RM ( R R R% R= ( ( R t test_truncated_longnameX s
"( R R R R R R R R ( ( ( R R 3 s
t ExtractHardlinkTestc B s t Z d Z RS( Nc C s d | i _ | i i d t y | i i d t WnB t j
o6 } d k } | i | i j o | i d q n Xd S( s/ Test hardlink extraction (bug #857297)
i s 0-REGTYPEs 1-LNKTYPENs hardlink not extracted properly(
R R t
errorlevelR2 R t EnvironmentErrort et errnot ENOENTRe ( R R R ( ( R t
test_hardlinkc s ( R R R ( ( ( R R a s t CreateHardlinkTestc B s2 t Z d Z d Z d Z d Z d Z RS( s Test the creation of LNKTYPE (hardlink) members in an archive.
In this respect tarfile.py mimics the behaviour of GNU tar: If
a file has a st_nlink > 1, it will be added a REGTYPE member
only the first time.
c C s t i t d | _ t i i t d | _ t i i t d | _
t i i | i o t i | i n t i i | i
o t i | i
n t | i d } | i d | i | i i | i d S( NRF RW t bar( R R R R R R R R R RW R R
t removeR% RK R R ( R R% ( ( R R y s
c C s2 | i i | i } | i | i t i d d S( Ns add file as regular failed( R R R RW R" R_ RJ R RI ( R R" ( ( R t test_add_twice s c C sv t i | i | i | i i | i } | i | i t
i d | i i | i } | i | i t
i d d S( Ns add file as hardlink failed( R R R RW R R R R" R_ RJ R R ( R R" ( ( R t test_add_hardlink s c C sT t | i _ t i | i | i | i i | i } | i
| i t i
d d S( Ns dereferencing hardlink failed( t TrueR R t dereferenceR R RW R R R" R_ RJ R RI ( R R" ( ( R t test_dereference_hardlink s
( R R R R R R R ( ( ( R R r s
t ReadTestGzipc B s t Z d Z RS( NRz ( R R R ( ( ( R R s t ReadStreamTestGzipc B s t Z d Z RS( NRz ( R R R ( ( ( R R s t
WriteTestGzipc B s t Z d Z RS( NRz ( R R R ( ( ( R R s t WriteStreamTestGzipc B s t Z d Z RS( NRz ( R R R ( ( ( R R s t ReadDetectTestGzipc B s t Z d Z RS( NRz ( R R R ( ( ( R R s t ReadDetectFileobjTestGzipc B s t Z d Z RS( NRz ( R R R ( ( ( R R s t ReadAsteriskTestGzipc B s t Z d Z RS( NRz ( R R R ( ( ( R R s t ReadStreamAsteriskTestGzipc B s t Z d Z RS( NRz ( R R R ( ( ( R R s t ReadFileobjTestGzipc B s t Z d Z RS( NRz ( R R R ( ( ( R R s t FileModeTestc B s t Z d Z RS( Nc C s6 | i t i d d | i t i d d d S( Ni s
-rwxr-xr-xiI s
---s--s--t( R R_ R t filemode( R ( ( R t
test_modes s ( R R R ( ( ( R R s t OpenFileobjTestc B s, t Z d Z d Z d Z d Z RS( Nc C sb t i d } y t i d d d d | Wn/ t i j
o | i | i d d n Xd S( Ns foo
R R R RV i s fileobj's position has moved( RZ R= R R t ReadErrorR R_ R@ ( R R= ( ( R t test_opener s
c C sM t t d } t i d | d d } | i | i t i i
| i d S( NR: RV R R ( R R R= R R R R_ RO R R R ( R R R= ( ( R t test_no_name_argument s c C si t t d i } t i | } | i t t | d t
i d | d d } | i | i
d d S( NR: RO RV R R ( R R R( R; RZ R= R Rh t AttributeErrort getattrR R R_ RO Rn ( R R R; R= ( ( R t test_no_name_attribute s
c C s\ t t d i } t i | } d | _ t i d | d d } | i
| i d d S( NR: R RV R R ( R R R( R; RZ R= RO R R R R_ Rn ( R R R; R= ( ( R t test_empty_name_attribute s
( R R R R R R ( ( ( R R s t
ReadTestBzip2c B s t Z d Z RS( NR{ ( R R R ( ( ( R R s t ReadStreamTestBzip2c B s t Z d Z RS( NR{ ( R R R ( ( ( R R s t WriteTestBzip2c B s t Z d Z RS( NR{ ( R R R ( ( ( R R s t WriteStreamTestBzip2c B s t Z d Z RS( NR{ ( R R R ( ( ( R R s t ReadDetectTestBzip2c B s t Z d Z RS( NR{ ( R R R ( ( ( R R s t ReadDetectFileobjTestBzip2c B s t Z d Z RS( NR{ ( R R R ( ( ( R R s t ReadAsteriskTestBzip2c B s t Z d Z RS( NR{ ( R R R ( ( ( R R s t ReadStreamAsteriskTestBzip2c B s t Z d Z RS( NR{ ( R R R ( ( ( R R s t ReadFileobjTestBzip2c B s t Z d Z RS( NR{ ( R R R ( ( ( R R s t PartialReadTestBzip2c B s# t Z d Z d Z d Z RS( Nc C s| d t i f d Y} t i t i d i } x> t t | d D]& } t i d | | | d | qN Wd S( Nt
MyStringIOc B s t Z e Z d Z RS( Nc C sB | i o t d n | i | i j | _ t i i | | S( Ns( infinite loop detected in tarfile.open()( R t hit_eoft AssertionErrort posR' RZ R( t n( R R ( ( R R( s
( R R R R R( ( ( ( R R s RW i RV R (
RZ R R{ t compressR RH RL R; t rangeR' t xR R ( R R R R R; ( ( R t _test_partial_input s
c C s | i d d S( NR ( R R ( R ( ( R t test_partial_input s c C s | i d d S( Ns r:bz2( R R ( R ( ( R t test_partial_input_bz2 s ( R R R R R ( ( ( R R s
c C s t t d } | i } | i t o3 t i t d d } | i | | i n t o3 t i
t d d } | i | | i n t t t
t t t t t t t t t t t t g } t t d o | i t | i t n t o, | i t! t" t# t$ t% t& t' t( t) g n t o/ | i t* t+ t, t- t. t/ t0 t1 t2 t3 g
n z t4 i5 | Wd t o t i6 t d n t o t i6 t d n t i7 i8 t9 o t: i; t9 n t i7 i8 t< o t i6 t< n Xd S( NR: Rz t wbR{ R (= R R R% R( t fgutsR R~ R RK R{ R R R R Rg Rt Ru Rv Rx Ry R R R R R R t testsR R t appendR R t extendR R R R R R R R R R R R R R R R R R R R t run_unittestR R R
R R R R ( R R R R% ( ( R t test_main s<
3
,/ t __main__(C RX R R t tempfileRZ t unittestR R+ R R~ R t ImportErrorR Rn R{ R R R t
gettempdirR R
t TESTFNR R* R R R t TestCaseR R Rg Rt Ru Rv Rx Ry R R R R R R R R R R R R R R R R R R R R R R R R R R R R R R R (8 R R R R Rx R R R R* R R R R R R{ R R R R R R R R R R
R Rt Rv R R R R Ru R RX R R R R R R R R R R Ry RZ R R R R Rg R~ R R R ( ( R t ? s
& & 4)\.3 C