nhZdZddlZddlZddlmZddldZdZdZd Z d Z d Z Gd d e Z GddZdZGddZddZej$fdZy)z Implements the minimal functionality required to extract a "Workbook" or "Book" stream (as one big string) from an OLE2 Compound Document file. N)unpack)*sࡱc eZdZy) CompDocErrorN)__name__ __module__ __qualname__u/var/www/html/SchoolMeal/SchoolMeal/pds_admin_SchoolMeal/Backend/venv/lib/python3.12/site-packages/excelrd/compdoc.pyr r srr c4eZdZdejfdZddZy)DirNodercj||_||_td|dd\}|_|_|_|_|_td|dd\|_|_ |dk(rd|_ nt|d|d z d |_ g|_ d |_ td |d d|_|r|j|yy)Nz4=+1S *F' q=DIDX\2K@DI  Wd3sm4  IIe  rc\t|jd|j|j|j|j |j |j|j|j|j|j |dk(r#td|j|jyy)NzbDID=%d name=%r etype=%d DIDs(left=%d right=%d root=%d parent=%d kids=%r) first_SID=%d tot_size=%d rztimestamp infofile)fprintfrrr'r r"r#r$r*r)r%r&printr+)r-r/s rr,z DirNode.dump5s} LL q HH II JJ MM NN MM KK MM NN MM  A: "DKKdll C rN)r)r rrsysstdoutr1r,rrrrr"s()3::$Drrc"|dkryt||||j||jj||||_t||||j ||j dk(rt||||jyy)Nrr)_build_family_treer"r)appendr*r#r r$)dirlist parent_DID child_DIDs rr:r:Is1}w GI,>,G,GH J  '' 2 *GIw GI,>,H,HIy1$7Iwy/A/J/JK%rcTeZdZdZej ddfdZd dZd dZdZ d Z d Z y) CompDocz Compound document handler. :param mem: The raw contents of the file, as a string, or as an :class:`mmap.mmap` object. The only operation it needs to support is slicing. rFc ||_||_||_|ddtk7r t d|dddk7rt d|ddzt d|d d\}}|rt d |d d |d | ||_t d|dd\}}|dkDrt d|z| d}||kDrt d|z| d}d|zx|_} d|z|_ |jdk7s|jdk7r&t d|j|jfz| t d|dd\} |_ } |_ } } }}t|dz }t|| \}}|r |dz }t dt|| fz| ||_||_t!j ddg|zx}|_|rxt d||| |j| t d||fz| t d| |j|jfz| t d | | fz| t d!||fz| | d"z}d#|z}d}t%t d$|dd}||zdz |z}t'd|d%z |zd&z |dz z}d}|dk(r|t(t*dfvrn|}|t(t*t,fvr|dkDrt d'||fz| ||k\r%d(||fz}|dkDrt || nt ||dkrt d)|z||rt d*|||fzd||<|dz }|r||kDrt d+|||||| d| |zz}|j/t ||||| z|j1}|t(t*t,fvr|r||k7rt d,|||||| |r$t d-t|| t3|d.|g|_d}d}t7t|D]} || }!|!t*t(fvr|!|k\r/|s!t d/| t d0|!|fz| d}t8|| <d}K|!d1krt d2|!z||!rt d3|!||!fzd&||!<|dz }|r||kDrt d4|||||||!| d| |!zz}|j4j/t ||||| z|rDt d5t|j4| t3|j4d.|t | |r|rt d-t|| t3|d.|t7|t|j4D]}"t8|j4|"<t d5t|j4| t3|j4d.||j;|jd|j4|j|jd6d78}#g}$d9}%t7dt|#d:D]*}&|%dz }%|$j=t?|%|#|&|&d:zd|,|$|_ tC|$d|$djD|r|$D]}'|'jG||j@d}(|(jHd;k(sJ|(jJdks|(jLdk(rd<|_'nF|j;|jd|j4| |(jJ|(jLd=d"8|_'g|_(| dkDr|(jLdk(r t d>| |(jLdkDr| }| })|dk\r|)dkDrz||rt d?|||fzd;||<|)dz})d|| zz}*t%t |||*|*| z}+|jPj/|+|j4|}|dk\r|)dkDrz|rt d@||)fz| |)dk(r |t(k(sJ|r$t dA| t3|jPd.||rt dB| t3|d|yy)CNrzNot an OLE2 compound documentsz)Expected "little-endian" marker, found %rz>>z [2]===>>>z MSAT: len = z8WARNING *** File is truncated, or OLE2 MSAT is corrupt!!z6INFO: Trying to access sector %d but only %d availablerzMSAT: invalid sector id: %dz)MSAT extension corruption: seen[%d] == %dz [3]===>>>z SAT: len = directoryr'seen_idrrSSCSzHWARNING *** OLE2 inconsistency: SSCS size is 0 but SSAT size is non-zerozSSAT corruption: seen[%d] == %dz&SSAT last sid %d; remaining sectors %dSSATseen))rignore_workbook_corruptionr/ SIGNATUREr rr6memsec_sizeshort_sec_sizedir_first_sec_sidmin_size_std_streamlendivmod mem_data_secs mem_data_lenarrayrZlistmaxEOCSIDFREESIDMSATSIDextendpop dump_listSATrangeEVILSID _get_streamr;rr<r:r$r,r r%r&rXrY),r-r]rr/r[revisionversionsszssszr^ SAT_tot_secs_unusedSSAT_first_sec_sid SSAT_tot_secsMSATX_first_sec_sidMSATX_tot_secsrerd left_overrZnentfmt trunc_warnedMSATSAT_sectors_reqdexpected_MSATX_sectorsactual_MSATX_sectorssidmsgoffsetactual_SAT_sectors dump_againmsidxmsidsatxdbytesr<didposdsscs_dirnsecs start_posnewss, rr1zCompDoc.__init__]sE  *D' q8y >? ? r": $JSQSTVZWX X"5#b*5'  .wsm<QT~V 5#b*- T 8 _  C #: k  D#$8+ 4i ==C 4#6#6"#< 4 tGZGZ7[[  ;Br +   "   $    3x#~ #),#A y  Q M Ss8X&'  +( ;;sQC0=@@ty  +sD(D4G4Gg V 4 m7TT[b c O **,,   9&!    ;'"   1}tm F7C3K01)D014=!$Q)9C)?$)F)JPTWXPX(Y!Z  Q #667A:N#N %Cfgw77192c3Z?gN-'S%WCqyc0&s++1W&'NQT'TUU9&'HCQUVYQZK['[\\S $)$14JJ#%(.,$x#~- F3FVh5F(GHIhhjCfgw77F )-CC  &$   -T 9 dB ( 3t9%% JE;D((}$#T[bcP/0$ $%L%U  "#@4#GHHDz"#NRVX\]aXbQc#cddDJ ! # +.>>!$*(&  8d?*F HHOOF3FVh5F(GH IK% JN  ,DHH G < dhhG , w  Z -T 9 dB (mS]; )!( ) ,DHH G < dhhG ,!! HH  HH MM  " "" CK- NC 1HC NN73sS3Y(?GL M N 7Awqz':':;  u   <<?~~"""    !X%6%6!%;DI((""!!) DI 1 !2!2a!7 Z    q $C!E(uqy9&'HCQUVYQZK['[\\S  #.0 F3I H8L(MNO   &hhsm(uqy>#uMT[\A:#- //  &w ' diiW -  &w ' dB ( rNc g} |} |y| dk\ri|<|j| rtd|| |j| fz||j| <|| |zz} | j|| | |z || } | dk\ri| tk(sJ|} | dk\rw|<|j| rtd|| |j| fz||j| <|| |zz} |} | | kDr| } | | z} | j|| | | z || } | dk\rw| tk(sJ| dk7rt |j d|||| z dj| S#t$rtd|| fzwxYw#t$rtd|| fzwxYw)Nr%s corruption: seen[%d] == %dz:OLE2 stream %r: sector allocation table invalid entry (%d)z=WARNING *** OLE2 stream %r: expected size %d, actual size %d r)rZr r; IndexErrorrir5rjoin)r-r]basesatr^ start_sidsizer'rUsectorssrtodograbs rrrzCompDoc._get_streams  <q&&yy|*;tQ RS >UU$+DIIaL 1x</ s9y8/CDEAAq&; ;Dq&&yy|*;tQ RS >UU$+DIIaL 1x</ $;D s9y4/?@AAAq&&; ;qyLLT4K xx  I"&TX\^_W``,"&TX\^_W``s*D;3E;EE2ct|d}|dd}|j}||jD]}||jj|jk(s2||j}|dk(r||cS|dk(r!|s t d|j ||cS||jdt dy)Nrrrz"Requested component is a 'storage'z'Requested stream is not a 'user stream')r<r)r'lowerr r _dir_searchr,)r-path storage_DIDheadtaildlchildets rrzCompDoc._dir_searchsAwABx \\ _-- NE%y~~##%5Y__7e9$7*+OPP++D%885 q!"#LMM Nrc |j|jd}|y|j|jk\rX|j |j d|j |j|j|j||jdzS|j |jd|j|j|j|j|dzdS)a Interrogate the compound document's directory; return the stream as a string if found, otherwise return ``None``. :param qname: Name of the desired stream e.g. ``'Workbook'``. Should be in Unicode or convertible thereto. /NrKrJrTr (from SSCS)) rsplitr&rarrr]ror^r%rrXrYr_)r-qnamers rget_named_streamzCompDoc.get_named_streams   U[[- . 9 ::11 1##    $  ##  ##  ^+$  rc |j|jd}|y|j|jkDr%t d||j|jfz|j|j k\r|j |jd|j|j|j|j||jdz}|jr8td|jt|j d |j|S|j#|j$d |j&|j(|j|j|d zdd |jfS) aq Interrogate the compound document's directory. If the named stream is not found, ``(None, 0, 0)`` will be returned. If the named stream is found and is contiguous within the original byte sequence (``mem``) used when the document was opened, then ``(mem, offset_to_start_of_stream, length_of_stream)`` is returned. Otherwise a new string is built from the fragments and ``(new_string, 0, length_of_stream)`` is returned. :param qname: Name of the desired stream e.g. ``'Workbook'``. Should be in Unicode or convertible thereto. rN)Nrrz7%r stream length (%d bytes) > file data size (%d bytes)rKrJz seenr3rHrr)rrr&rer ra_locate_streamr]ror^r%rr/r6rrnrZrrrXrYr_)r-rrresults rlocate_named_streamzCompDoc.locate_named_streams@"   U[[- . 9 ::)) )I!**d&7&789  ::11 1((#txx QZZQVXYX]X]`aXaFzzhT\\2$))R6M  IIII''KKJJN*    rc |} | dkrtd|zd} d} d} g} d}||zdz |z}| dk\r|j| re|jsYtd|z|jt |jd |jtd || |j| fz||j| <|dz }||kDrtd |||zfz| | dzk(r| |z } n%| dk\r| j | | f|| |zz} | |z} | } || } | dk\r| tk(sJ||k(sJ| s| |fS| j | | fd jfd | Dd|fS)Nrz%_locate_stream: start_sid (%d) is -veiiiHrz_locate_stream(%s): seenr3rHrz,%s: size exceeds expected %d bytes; corrupt?rc3.K|] \}}||yw)Nr).0rend_posr]s r z)CompDoc._locate_stream..LsM0B 7S7+Ms) r rZr[r6rrnr;rir)r-r]rrr^rexpected_stream_sizerrUrprrslices tot_found found_limits ` rrzCompDoc._locate_streams  q5FRS S   +h6:xG 1fyy|664u<4<<PdiiT\\:&'F%QRTXT]T]^_T`Ia'abb"DIIaL NI;&"Be[[cMcEddAEz8#6MM9g"67 1x</ #h.AAA11f2F{{K'''$89 9 y'*+ HHMfM M   r)NrNr) r rr__doc__r7r8r1rrrrrrrrrr@r@Ts8%(JJaTYa)F 5!n$!F/b2 rr@ctd|d|fzd|||||zD]}tt|d|t|yNz%5d%sz = )endr4r3r6r()aliststridefdposequalvalues r x_dump_linerSsM 'T4;' 'Sq9tdVm,+ c%jc*+ qMrcdfd }d}d}tdtD]@}| |||}||z||zk7s"||z kDr ||z d|||}B||||k7r ||dyyyy)Nrctd|d|fzd||zD]}tt|dtyrr)rrrrrrs r _dump_linezdump_list.._dump_line[sN gtE{++1=4$-0 /E #e*#A . / 1 rr)rr)rprb)rrrrroldposs``` rrnrnZs C FQE F+ > sOF 3v &%&*I IV|f$3rsw   0      9 $D$DNL{ { ~ #zz!r