3 iZ8@sdZddlmZdZdZdZdddd d d d d ddddddddddddddddddd gZdd!lZdd!lZdd!l Z dd!l Z dd!l Z dd!l Z dd!lZeek reZyeZWneZYnXe j d"jd#krd"Zn4e j d$jd#krd$Zne j d%jd#krd%Zned&yeWnek r eZYnXd'Zejdd(krZ=d?Z>d@Z?dAZ@dBZAdCZBdDZCdEZDdFZEdGZFdHZGdIZHdJZIdKZJdLZKdMZLdNZMdOZNdPZOdQZPdRZQdSZRdTZSdUZTdVZUdWZVdXZWdYZXdZZYiZZx6e[e\j]D]$\Z^Z_e^d!d(d[krVe^eZe_<qVWd\Z`dNeed to fix a bug with 32 bit arrays, please contact author...Tzutf-8cCsL|tjjjkr&tj|}|j||Stj|}|jtj|j||S)an Create a suitable logger object for this module. The goal is not to change settings of the root logger, to avoid getting other modules' logs on the screen. If a logger exists with same name, reuse it. (Else it would have duplicate handlers and messages would be doubled.) The level is set to CRITICAL+1 by default, to avoid any logging. )loggingZLoggermanagerZ loggerDictZ getLoggersetLevelZ addHandlerZ NullHandler)namelevelZloggerr)1/usr/lib/python3/dist-packages/olefile/olefile.py get_loggers     r+olefilecCstjtjdS)z Enable logging for this module (disabled by default). This will set the module-specific logger level to NOTSET, which means the main application controls the actual logging level. N)logr&r$ZNOTSETr)r)r)r*rssࡱllllli @ABCDEFGHiZVT_z$00020900-0000-0000-C000-000000000046(ic Cst|dr$|jtt}|jdnLt|trLt|tkrL|dtt}n$t|d}|jtt}WdQRX|tkr|dSdSdS)aJ Test if a file is an OLE container (according to the magic bytes in its header). .. note:: This function only checks the first 8 bytes of the file, not the rest of the OLE structure. .. versionadded:: 0.16 :param filename: filename, contents or file-like object of the OLE file (string-like or file-like object) - if filename is a string smaller than 1536 bytes, it is the path of the file to open. (bytes or unicode string) - if filename is a string longer than 1535 bytes, it is parsed as the content of an OLE file in memory. (bytes type only) - if filename is a file-like object (with read and seek methods), it is parsed as-is. :type filename: bytes or str or unicode or file :returns: True if OLE, False otherwise. :rtype: bool readrNrbTF) hasattrrSlenrseek isinstancebytesropen)filenameheaderfpr)r)r*rs   cCst|S)N)ord)cr)r)r*i8@sr`cCs|jtkr|S|dS)Nr) __class__int)r_r)r)r*r`DscCstjd|||ddS)z Converts a 2-bytes (16 bits) string to an integer. :param c: string containing bytes to convert :param o: offset of bytes to convert in string z|_$tj d|j$|j|jft&||_'|j tkr|j$dkr|jt(dd|_)|j ttfkr`|j$dkr`|j$|j*krJ|j tkrJd|_)nd|_)|j+|j|j)d|_,dS)aI Constructor for an OleDirectoryEntry object. Parses a 128-bytes entry from the OLE Directory stream. :param entry : string (must be 128 bytes long) :param sid : index of this directory entry in the OLE file directory :param olefile: OleFileIO containing this directory entry Fzunhandled OLE storage typerzduplicate OLE root entryzincorrect OLE root entryrIz(incorrect DirEntry name length >64 bytesNr.zDirEntry SID=%d: %sz - type: %dz - sect: %Xhz% - SID left: %d, right: %d, child: %dilz+sectorsize=%d, sizeLow=%d, sizeHigh=%d (%X)zincorrect OLE stream size z% - size: %d (sizeLow=%d, sizeHigh=%d)zOLE storage with size>0T)-sidr,kids kids_dictusedrcrdrSTRUCT_DIRENTRYZname_rawZ namelength entry_typeZcolorsid_left sid_right sid_childZ dwUserFlags createTime modifyTime isectStartZsizeLowZsizeHighr r r rrrZ name_utf16_decode_utf16_strr'r-rrrrrlongrornr is_minifatminisectorcutoff_check_duplicate_stream sect_chain)rentryrr,rnr)r)r*rsR D            zOleDirectoryEntry.__init__cCs|jr dS|jttfks"|jdkr&dSt|_|jrD|j rD|j|j }x4|t kr~|jj ||jrr|j|}qL|j |}qLWdS)Nr) rrr r rlistrminifat loadminifatrrrr)rr,Z next_sectr)r)r*build_sect_chain.s   z"OleDirectoryEntry.build_sect_chaincCsBtjd|jt|j|jf|jtkr>|j|j|jj dS)z Read and build the red-black tree attached to this OleDirectoryEntry object, if it is a storage. Note that this method builds a tree of all subentries, so it should only be called for the root object once. z.build_storage_tree: SID=%d - %s - sid_child=%dN) r-rrrr'rr append_kidsrsort)rr)r)r*build_storage_treeAs   z$OleDirectoryEntry.build_storage_treecCstjd||tkrdS|dks2|t|jjkrB|jjtdn|jj|}tjd|j t |j |j |j |jf|j|j |j j}||jkr|jjtd|jj|||j|<|jr|jjtdd|_|j|j |jdS) a) Walk through red-black tree of children of this directory entry to add all of them to the kids list. (recursive method) :param child_sid: index of child directory entry to use, or None when called first time for the root. (only used during recursion) zappend_kids: child_sid=%dNrzOLE DirEntry index out of rangezHappend_kids: child_sid=%d - %s - sid_left=%d, sid_right=%d, sid_child=%dz!Duplicate filename in OLE storagez#OLE Entry referenced more than onceT)r-rrrVr, direntriesrr_load_direntryrrr'rrrrlowerrrrrr)rZ child_sidZchildZ name_lowerr)r)r*rYs*        zOleDirectoryEntry.append_kidscCs |j|jkS)zCompare entries by name)r')rotherr)r)r*__eq__szOleDirectoryEntry.__eq__cCs |j|jkS)zCompare entries by name)r')rrr)r)r*__lt__szOleDirectoryEntry.__lt__cCs |j| S)N)r)rrr)r)r*__ne__szOleDirectoryEntry.__ne__cCs|j|p|j|S)N)rr)rrr)r)r*__le__szOleDirectoryEntry.__le__rcCsddddddg}td|t|j||jdd|jttfkrPt|jd ddt|jttfkr|jrtd|d |jx|j D]}|j |d qWd S) zADump this entry, and all its subentries (for debug purposes only)z (invalid)z (storage)z(stream)z (lockbytes)z (property)z(root) )endrYz{%s}r.N) rrr'rr r rr rnrr)rtabZTYPESkidr)r)r*rs" zOleDirectoryEntry.dumpcCs|jdkrdSt|jS)z Return modification time of a directory entry. :returns: None if modification time is null, a python datetime object otherwise (UTC timezone) new in version 0.26 rN)rrt)rr)r)r*getmtimes zOleDirectoryEntry.getmtimecCs|jdkrdSt|jS)z Return creation time of a directory entry. :returns: None if modification time is null, a python datetime object otherwise (UTC timezone) new in version 0.26 rN)rrt)rr)r)r*getctimes zOleDirectoryEntry.getctimeN)r)rrrrrZ DIRENTRY_SIZErccalcsizerjrrrrrrrrrrrr)r)r)r*rsb. rc@sJeZdZdZdeddefddZefddZdLd d Z dMd d Z d dZ dNddZ dOddZ dPddZddZddZddZddZddZdQd!d"ZdRd#d$Zd%d&Zd'd(Zd)d*Zedfd+d,ZdSd.d/ZdTd0d1Zd2d3Zd4d5Zd6d7Zd8d9Z d:d;Z!dd?Z#d@dAZ$dBdCZ%dDdEZ&dFdGZ'dUdHdIZ(dJdKZ)dS)Vra OLE container object This class encapsulates the interface to an OLE 2 structured storage file. Use the listdir and openstream methods to access the contents of this file. Object names are given as a list of strings, one for each subentry level. The root entry should be omitted. For example, the following code extracts all image streams from a Microsoft Image Composer file:: ole = OleFileIO("fan.mic") for entry in ole.listdir(): if entry[1:2] == "Image": fin = ole.openstream(entry) fout = open(entry[0:1], "wb") while True: s = fin.read(8192) if not s: break fout.write(s) You can use the viewer application provided with the Python Imaging Library to view the resulting files (which happens to be standard TIFF files). NFcCs||_g|_||_||_d|_d|_g|_g|_d|_d|_ d|_ d|_ d|_ d|_ d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_d|_ d|_!d|_"d|_#d|_$d|_%d|_&|r|j'||ddS)a Constructor for the OleFileIO class. :param filename: file to open. - if filename is a string smaller than 1536 bytes, it is the path of the file to open. (bytes or unicode string) - if filename is a string longer than 1535 bytes, it is parsed as the content of an OLE file in memory. (bytes type only) - if filename is a file-like object (with read, seek and tell methods), it is parsed as-is. :param raise_defects: minimal level for defects to be raised as exceptions. (use DEFECT_FATAL for a typical application, DEFECT_INCORRECT for a security-oriented application, see source code for details) :param write_mode: bool, if True the file is opened in read/write mode instead of read-only by default. :param debug: bool, set debug mode (deprecated, not used anymore) :param path_encoding: None or str, name of the codec to use for path names (streams and storages), or None for Unicode. Unicode by default on Python 3+, UTF-8 on Python 2.x. (new in olefile 0.42, was hardcoded to Latin-1 until olefile v0.41) N) write_mode)(_raise_defects_levelparsing_issuesr path_encoding _filesize ministream_used_streams_fat_used_streams_minifat byte_order directory_fpr dll_versionrfirst_difat_sectorfirst_dir_sectorfirst_mini_fat_sectorr] header_clsidheader_signaturemetadatamini_sector_shiftmini_sector_sizemini_stream_cutoff_sizer minifatsectrminisectorsize minor_versionnb_sectnum_difat_sectorsnum_dir_sectorsnum_fat_sectorsnum_mini_fat_sectors reserved1 reserved2root sector_shift sector_sizetransaction_signature_numberrZ)rr[Z raise_defectsrrrr)r)r*rsTzOleFileIO.__init__cCs<||jkrtj|||n|jj||ftj|dS)a This method should be called for any defect found during file parsing. It may raise an IOError exception according to the minimal level chosen for the OleFileIO object. :param defect_level: defect level, possible values are: - DEFECT_UNSURE : a case which looks weird, but not sure it's a defect - DEFECT_POTENTIAL : a potential defect - DEFECT_INCORRECT : an error according to specifications, but parsing can go on - DEFECT_FATAL : an error which cannot be ignored, parsing is impossible :param message: string describing the defect, used with raised exception. :param exception_type: exception class to be raised, IOError by default N)rr-errorrrwarning)rZ defect_levelmessageZexception_typer)r)r*r2s    zOleFileIO._raise_defectreplacecCs(|jd|}|jr |j|j|S|SdS)a Decode a string encoded in UTF-16 LE format, as found in the OLE directory or in property streams. Return a string encoded according to the path_encoding specified for the OleFileIO object. :param utf16_str: bytes string encoded in UTF-16 LE format :param errors: str, see python documentation for str.decode() :return: str, encoded according to path_encoding zUTF-16LEN)decoderencode)rZ utf16_strerrorsZ unicode_strr)r)r*rLs zOleFileIO._decode_utf16_strc Cs||_t|dr||_n@t|tr0)z/Mini Stream cutoff size = %Xh (expected: 1000h)z/incorrect mini_stream_cutoff_size in OLE headerzJFixing the mini_stream_cutoff_size to 4096 (mandatory value) instead of %dzFirst MiniFAT sector = %XhzNumber of MiniFAT sectors = %dzFirst DIFAT sector = %XhzNumber of DIFAT sectors = %dr#z/Maximum number of sectors in the file: %d (%Xh)rAi)r"r)r"r$)rI);rrUr]rXrYrVrrrrZrWosSEEK_ENDtellrr-rrrrSrrrrcrrdrrrrrrr rrrrrrr rrrr bytearrayrrr rrrrorrrrloadfat loaddirectoryr ) rr[rmoderr\Z fmt_headerZ header_sizeZheader1r)r)r*rZ_s    '  T                          zOleFileIO.opencCs|jjdS)z@ close the OLE file, to release the file object N)r]close)rr)r)r*r,?szOleFileIO.closecCsf|rtjd||j}n(tjd||ttttfkrN)rrrrrVrr) rr firstindexVPLZfatnamesnbsectnlinesr!lr-rZauxr'r)r)r*dumpfat`s4   zOleFileIO.dumpfatc Csd}tjt|}tjdkr"|jt|}||d|}tdddx t|D]}td|ddqPWtxpt|D]d}||} td|| ddx 6.8MB.r#z#incorrect DIFAT, not enough sectorsz)incorrect DIFAT, first index out of rangezDIFAT analysis...r#z nb_difat = %dzincorrect DIFATzDIFAT block %d, sector %XNznext DIFAT sector: %Xzincorrect end of DIFATz$No DIFAT, because file size < 6.8MB.z!len(fat)=%d, shrunk to nb_sect=%dz6FAT references %d sectors / Maximum %d sectors in filez FAT:)r-rrVr5r6rrBrrrrrrrrIOError iterranger@r=r>r$r?r;rrr3) rr\rZnb_difat_sectorsZnb_difatZ isect_difatr!Z sector_difatZdifatr)r)r*r)sJ                 zOleFileIO.loadfatcCs|j|j}|jj|jd|j}|d}tjd|j|j|||f||kr\|jt d|j |j|ddj }|j ||_ tjdt|j |f|j d||_ tjd t|j tjtjrtjd |j|j dS) z) Load the MiniFAT table. r#rzaloadminifat(): minifatsect=%d, nb FAT sectors=%d, used_size=%d, stream_size=%d, nb MiniSectors=%dz%OLE MiniStream is larger than MiniFATT) force_FATz$MiniFAT shrunk from %d to %d sectorsNzloadminifat(): len=%dz MiniFAT:)rrrrr r-rr rr_openrSr=rrVr>r$r?r3)rZ stream_sizeZnb_minisectorsZ used_sizerAr)r)r*r"s     zOleFileIO.loadminifatc Csy|jj|j|dWn8tjd||j|d|jf|jtdYnX|jj|j}t ||jkrtjd|t ||jf|jtd|S)z Read given sector from file on disk. :param sect: int, sector index :returns: a string containing the sector data. r#z(getsect(): sect=%X, seek=%d, filesize=%dzOLE sector index out of rangez*getsect(): sect=%X, read=%d, sectorsize=%dzincomplete OLE sector) r]rWrr-rrrrrSrV)rrr:r)r)r*r@Fs zOleFileIO.getsectrhc Cst|tstdt|t s*t|dkr2tdy|jj|j|dWn8tjd||j|d|j f|j t dYnXt||jkr|||jt|7}nt||jkrt d|jj |dS)z Write given sector to file on disk. :param sect: int, sector index :param data: bytes, sector data :param padding: single byte, padding character if data < sector size z'write_sect: data must be a bytes stringr#z4write_sect: padding must be a bytes string of 1 charz+write_sect(): sect=%X, seek=%d, filesize=%dzOLE sector index out of rangezData is larger than sector sizeN)rXrY TypeErrorrVr]rWrr-rrrr ValueErrorwrite)rrrpaddingr)r)r* write_sectfs zOleFileIO.write_sectc Cst|tstdt|t s*t|dkr2tdy|jj|Wn,tjd||jf|j t dYnXt|}||j kr|||j |7}|j |krt d|jj |dS)z Write given sector to file on disk. :param fp_pos: int, file position :param data: bytes, sector data :param padding: single byte, padding character if data < sector size z,write_mini_sect: data must be a bytes stringr#z9write_mini_sect: padding must be a bytes string of 1 charz)write_mini_sect(): fp_pos=%d, filesize=%dzOLE sector index out of rangezData is larger than sector sizeN)rXrYrHrVr]rWr-rrrrr rIrJ)rfp_posrrKZlen_datar)r)r*_write_mini_sects    zOleFileIO._write_mini_sectcCsltjd|j|dd|_|jjd}tjd|jj|fdg||_|jd}|jd|_|jjdS)z] Load the directory. :param sect: sector index of directory stream. zLoading the Directory:T)rFrz&loaddirectory: size=%d, max_entries=%dNr) r-rrGrrrrrr)rrZ max_entriesZ root_entryr)r)r*r*s     zOleFileIO.loaddirectorycCs~|dks|t|jkr"|jtd|j|dk rF|jtd|j|S|jj|d|jjd}t||||j|<|j|S)aY Load a directory entry from the directory. This method should only be called once for each storage/stream when loading the directory. :param sid: index of storage/stream in the directory. :returns: a OleDirectoryEntry object :exception IOError: if the entry has always been referenced. rz OLE directory index out of rangeNz'double reference for OLE stream/storager) rVrrrrrrWrSr)rrrr)r)r*rs    zOleFileIO._load_direntrycCs|jjdS)z5 Dump directory (for debugging only) N)rr)rr)r)r* dumpdirectoryszOleFileIO.dumpdirectoryc Cstjd||t|f||jkr| r|jsj|j|jj}tjd|jj|f|j |jj|dd|_t |j||d|j |j |jj|dSt |j |||j|j|j|j|dSdS)a| Open a stream, either in FAT or MiniFAT according to its size. (openstream helper) :param start: index of first sector :param size: size of stream (or nothing if size is unknown) :param force_FAT: if False (default), stream will be opened in FAT or MiniFAT according to size. If True, it will always be opened in FAT. z1OleFileIO.open(): sect=%Xh, size=%d, force_FAT=%sz%Opening MiniStream: sect=%Xh, size=%dT)rFr)r]rrrrrrrN)r-rstrrrrrrrrGrrrr]rrr)rstartrrFZsize_ministreamr)r)r*rGs&      zOleFileIO._openTcCs||jg}x|jD]v}|jtkrT|r@|j|dd|jg|j|||||q|jtkr~|r|j|dd|jgq|jtdqWdS)a listdir helper :param files: list of files to fill in :param prefix: current location in storage tree (list of names) :param node: current node (OleDirectoryEntry object) :param streams: bool, include streams if True (True by default) - new in v0.26 :param storages: bool, include storages if True (False by default) - new in v0.26 (note: the root storage is never included) r#NzIThe directory tree contains an entry which is not a stream nor a storage.) r'rrr r_listr rr)rfilesprefixnodestreamsstoragesrr)r)r*rR s    zOleFileIO._listcCsg}|j|g|j|||S)am Return a list of streams and/or storages stored in this file :param streams: bool, include streams if True (True by default) - new in v0.26 :param storages: bool, include storages if True (False by default) - new in v0.26 (note: the root storage is never included) :returns: list of stream and/or storage paths )rRr)rrVrWrSr)r)r*listdir's zOleFileIO.listdircCs^t|tr|jd}|j}x<|D]4}x*|jD]}|jj|jkr,Pq,Wtd|}q W|jS)a* Returns directory entry of given filename. (openstream helper) Note: this method is case-insensitive. :param filename: path of stream in storage tree (except root entry), either: - a string using Unix path syntax, for example: 'storage_1/storage_1.2/stream' - or a list of storage filenames, path to the desired stream/storage. Example: ['storage_1', 'storage_1.2', 'stream'] :returns: sid of requested filename :exception IOError: if file not found /zfile not found) rX basestringsplitrrr'rrDr)rr[rUr'rr)r)r*_find5s    zOleFileIO._findcCs6|j|}|j|}|jtkr&td|j|j|jS)a; Open a stream as a read-only file object (BytesIO). Note: filename is case-insensitive. :param filename: path of stream in storage tree (except root entry), either: - a string using Unix path syntax, for example: 'storage_1/storage_1.2/stream' - or a list of storage filenames, path to the desired stream/storage. Example: ['storage_1', 'storage_1.2', 'stream'] :returns: file object (read-only) :exception IOError: if filename not found, or if this is not a stream. zthis file is not a stream)r\rrr rDrGrr)rr[rrr)r)r* openstreamUs    zOleFileIO.openstreamc Cs|js|j|t|j}|jjs.|jj||j|j}xt|jD]\}}||}||}|jj|d|j||j} ||dkr|||j|d|j} n|||jd} |j| | qFWdS)Nr#)rrrVrrr  enumeraterN) rr data_to_writerZ block_sizeidxrZ sect_baseZ sect_offsetrMZdata_per_sectorr)r)r*_write_mini_streamjs      zOleFileIO._write_mini_streamc Cst|tstd|j|}|j|}|jtkr8td|j}|t |krRt d||j krt|jt krt|j ||dS|j}||jd|j}tjd|xt|D]}||dkr|||j|d|j} t | |jkstnR|||jd} tjd||jt | ||jft | |j||jks8t|j|| y|j|}Wqtk rptd YqXqW|tkrtd dS) aD Write a stream to disk. For now, it is only possible to replace an existing stream by data of the same size. :param stream_name: path of stream in storage tree (except root entry), either: - a string using Unix path syntax, for example: 'storage_1/storage_1.2/stream' - or a list of storage filenames, path to the desired stream/storage. Example: ['storage_1', 'storage_1.2', 'stream'] :param data: bytes, data to be written, must be the same size as the original stream. z)write_stream: data must be a bytes stringzthis is not a streamz?write_stream: data must be the same size as the existing stream)rr_r#znb_sectors = %dNzGwrite_stream: size=%d sectorsize=%d data_sector=%Xh size%%sectorsize=%dz,incorrect OLE FAT, sector index out of rangez)incorrect last sector index in OLE stream)rXrYrHr\rrr rDrrVrIrr rarrr-rrrjrLrrr) rZ stream_namerrrrrrr!Z data_sectorr)r)r* write_stream|s:        zOleFileIO.write_streamc Cs*y|j|}|j|}|jSdSdS)a Test if given filename exists as a stream or a storage in the OLE container, and return its type. :param filename: path of stream in storage tree. (see openstream for syntax) :returns: False if object does not exist, its entry type (>0) otherwise: - STGTY_STREAM: a stream - STGTY_STORAGE: a storage - STGTY_ROOT: the root entry FN)r\rr)rr[rrr)r)r*get_types   zOleFileIO.get_typecCs|j|}|j|}|jS)a Return clsid of a stream/storage. :param filename: path of stream/storage in storage tree. (see openstream for syntax) :returns: Empty string if clsid is null, a printable representation of the clsid otherwise new in version 0.44 )r\rrn)rr[rrr)r)r*getclsids  zOleFileIO.getclsidcCs|j|}|j|}|jS)a9 Return modification time of a stream/storage. :param filename: path of stream/storage in storage tree. (see openstream for syntax) :returns: None if modification time is null, a python datetime object otherwise (UTC timezone) new in version 0.26 )r\rr)rr[rrr)r)r*rs  zOleFileIO.getmtimecCs|j|}|j|}|jS)a1 Return creation time of a stream/storage. :param filename: path of stream/storage in storage tree. (see openstream for syntax) :returns: None if creation time is null, a python datetime object otherwise (UTC timezone) new in version 0.26 )r\rr)rr[rrr)r)r*rs  zOleFileIO.getctimec Csy|j|}dSdSdS)a Test if given filename exists as a stream or a storage in the OLE container. Note: filename is case-insensitive. :param filename: path of stream in storage tree. (see openstream for syntax) :returns: True if object exist, else False. TFN)r\)rr[rr)r)r*rs  zOleFileIO.existscCs,|j|}|j|}|jtkr&td|jS)a2 Return size of a stream in the OLE container, in bytes. :param filename: path of stream in storage tree (see openstream for syntax) :returns: size in bytes (long integer) :exception IOError: if file not found :exception TypeError: if this is not a stream. zobject is not an OLE stream)r\rrr rHr)rr[rrr)r)r*get_size s   zOleFileIO.get_sizecCs|jjS)zp Return root entry name. Should usually be 'Root Entry' or 'R' in most implementations. )rr')rr)r)r*get_rootentry_nameszOleFileIO.get_rootentry_namec Cs@|dkr g}|}t|ts$dj|}|j|}i}yn|jd}t|dd}|jd}t|dd} |jt|dd|jt|jd d }t|d } WnBtk r} z&d t || f} |j t | t | |Sd} ~ XnXt | t|d} xBt| D]4} d }yt|d| d}t|d | d}t||}tjd |||f|tkrt||d }|dkr|d}nb|tkrt||d }nF|tttfkrt||d }n$|ttfkrt||d }n|ttfkr&t||d }||d|d|d}|jdd}n|tkrZt||d }||d|d|}n|tkrt||d }|j||d|d|d}nJ|t kr}|r2||kr2tjd||t"|dft#j#dddd d d }tjd|d!|t#j$|dd}n|d}n|t%krXt&||d }n|t'kr|t||d |d}nf|t(krt||d }||d|d|}n4|t)krt*t||d }nd}tjd||f|||<WnHtk r4} z*d|t || f} |j t | t | WYdd} ~ XnXqW|S)"a Return properties described in substream. :param filename: path of stream in storage tree (see openstream for syntax) :param convert_time: bool, if True timestamps will be converted to Python datetime :param no_conversion: None or list of int, timestamps not to be converted (for example total editing time is not a real timestamp) :returns: a dictionary of values indexed by id (integer) NrYrEr2rAr=r9s****rz6Error while parsing properties header in stream %s: %srr6z!property id=%d: type=%d offset=%Xiir#rhrr.rz8Converting property #%d to python datetime, value=%d=%fsiiAztimedelta days=%dr4i@Bi)rpz5property id=%d: type=%d not implemented in parser yetz3Error while parsing property id %d in stream %s: %silhC!l@T$)+rXrPrr]rSrorWrg BaseExceptionrrrtypeminrVrEr-rVT_I2rfVT_UI2VT_I4VT_INTVT_ERRORVT_UI4VT_UINTVT_BSTRVT_LPSTRrVT_BLOB VT_LPWSTRr VT_FILETIMErfloatrqrrVT_UI1r`VT_CLSIDVT_CFVT_BOOLbool)rr[rrZ streampathr]rrArnZfmtidZ num_propsexcmsgr!Z property_idrZ property_typercountrsr)r)r*r&s             & (      *zOleFileIO.getpropertiescCst|_|jj||jS)z Parse standard properties streams, return an OleMetadata object containing all the available metadata. (also stored in the metadata attribute of the OleFileIO object) new in version 0.25 )rr r)rr)r)r* get_metadatas zOleFileIO.get_metadata)r)F)F)r)r)rh)rh)TF)TF)FN)*rrrrrrrrDrrrZr,rr3r;r=rBr)rr@rLrNr*rrOrrGrRrXr\r]rarbrcrdrrrrerfrrr)r)r)r*rsLL   a  %  $T$  )&   > __main__r)rinforrZcriticalz1usage: %prog [options] [filename2 ...])usagez-c store_true check_streamsz*check all streams (for debugging purposes))actiondesthelpz-d debug_modez\debug mode, shortcut for -l debug (displays a lot of debug information, for developers only)z-lz --loglevelloglevelZstorezBlogging level debug/info/warning/error/critical (default=%default))rrdefaultrz=olefile version %s %s - https://www.decalage.info/en/olefile rz%(levelname)-8s %(message)s)r(format-z%r: properties)r2z (binary data)z z&Error while parsing property stream %rz Checking streams...rYr)rzsize %dzNOT a stream : type=%dz5Modification/Creation times of all directory entries:z- %s: mtime=%s ctime=%szError while parsing metadatazRoot entry name: "%s"Z worddocumentzThis is a Word document.ztype of stream 'WordDocument':zsize :z macros/vbaz%This document may contain VBA macros.z( Non-fatal issues raised during parsing:z- %s: %sNonezError while parsing file %r)r)r)r#r.r"rr/r0r1r5r6r8rr9r:r;r<r=r>r?r@rArBrCrDrErFrGrH)rZ __future__rZ__date__ __version__ __author____all__rr7rcr5os.pathr%rqr$rPrYrbrZxrangerEritemsizer6rIrZ NameErrorr version_inforZCRITICALr+r-rrrrrrrrrrr r rr r rZVT_EMPTYZVT_NULLrjrlZVT_R4ZVT_R8ZVT_CYZVT_DATErqZ VT_DISPATCHrnrzZ VT_VARIANTZ VT_UNKNOWNZ VT_DECIMALZVT_I1rwrkroZVT_I8ZVT_UI8rmrpZVT_VOIDZ VT_HRESULTZVT_PTRZ VT_SAFEARRAYZ VT_CARRAYZVT_USERDEFINEDrrrtrursZ VT_STREAMZ VT_STORAGEZVT_STREAMED_OBJECTZVT_STORED_OBJECTZVT_BLOB_OBJECTryrxZ VT_VECTORZVTrvarsitemskeywordvarrrrrrrrr`rfrgrortrrrrrrZoptparseZDEFAULT_LOG_LEVELr?INFOZWARNINGZERRORZ LOG_LEVELSrZ OptionParserparserZ add_option parse_argsZoptionsargsrrVZ print_helpexitrrZ basicConfigr[rrOrXZ streamnamerrsortedkvrXr_r(Z exceptionrrrrcZst_typerer]rrr'rrrmetarrfrrrexctyper}r)r)r)r*s <  (    *