e/4ddlZddlZddlZddlmZddlmZdZejdZ dZ dZ dZ d Z d Zd Zd Zgd ZdZdZdZdZdZdZdZdZdZdZdZdZdZdedee e!ffdZ"dZ#de deee!ffd Z$Gd!d"ejJZ%Gd#d$ejLZ&d%Z'ejPe'd&Z)y)'N)Tuple) getglobalui)zX-LabelKeywordsz &[^-]*-|\+cg}|D]}|jt|tjddj |y)Nimap )appendstrrdebugjoin)argsmsgargs //usr/share/offlineimap3/offlineimap/imaputil.py__debugr!s@ C 3s8M .c|rK|jdr:|jdr)|dd}|jdd}|jdd}|S)zTakes string which may or may not be quoted and unquotes it. It only considers double quotes. This function does NOT consider parenthised lists to be quoted."\"\\\) startswithendswithreplacess rdequoter(sL  Q\\# 1::c? aG IIeS ! IIfd # HrcT|jdd}|jdd}d|zS)zTakes an unquoted string and quotes it. It only adds double quotes. This function does NOT consider parenthised lists to be quoted.rrrrz"%s")rrs rquoter!5s. #uA $A A:rcZ|ddk7s|ddk7rtd|zt|ddS)zConverts a string of IMAP flags to a list :returns: E.g. '(\Draft \Deleted)' returns ['\Draft','\Deleted']. (FLAGS (\Seen Old) UID 4807) returns ['FLAGS,'(\Seen Old)','UID', '4807'] r(r)z Passed s '%s' is not a flag listr) ValueError imapsplitrs r flagsplitr'@s; ts{aesl;a?@@ QqW rci}d}|t|kr"||dz|||<|dz }|t|kr"td||S)z/convert l_list [1,2,3,4,5,6] to {1:2, 3:4, 5:6}rrz__options2hash returning:)lenr)l_listretvalcounters r__options2hashr.MsZ FG CK "(1"5vg1  CK  '0 Mrc*tt|S)zConverts IMAP response string from eg IMAP4.fetch() to a hash. E.g. '(FLAGS (\Seen Old) UID 4807)' leads to {'FLAGS': '(\Seen Old)', 'UID': '4807'})r.r')flagss r flags2hashr1\s )E* ++rcnt|ts|jd}|j}g}t |r|ddk(rSd}d}|r#||dk(r|dz}n ||dk(r|dz }|dz }|r#|d|}||dj }|j |n|ddk(r"t|\}}|j ||}netj|d}t |} | d k(r|j |d|d}| dk(r|j |d |S| dk(r |St |r|S) zTakes a string from an IMAP conversation and returns a list containing its components. One example string is: (\HasNoChildren) "." "INBOX.Sent" The result from parsing this will be: ['(\HasNoChildren)', '"."', '"INBOX.Sent"']utf-8rr#rr$Nr)maxsplitr)) isinstancer decodestripr*lstripr __split_quotedsplit) imapstringworkstrr,rparencrpareni parenlistquotedrestsplits splitslens rr&r&esg j# &&&w/  G F g, 1: GG7#s*qLGW%,qLG1    '*Igh'..0G MM) $ QZ3 +G4NVT MM& !GYYwY3FF IA~ fQi( )a fQi( Ma MI g,H Mr))z\SeenS)z \AnsweredR)z\FlaggedF)z\DeletedT)z\DraftDct}|ddj}tD]\}}||vs |j||S)z8Convert string '(\Draft \Deleted)' into a flags set(DR).rr)setr:flagmapadd) flagstringr, imapflaglistimapflag maildirflags rflagsimap2maildirrQsOUFa#))+L!($+ | # JJ{ #$ Mrct|ddj}ttDcgc]\}}| c}}}||z Scc}}w)znConvert string '(\Draft \Deleted somekeyword otherkeyword)' into a keyword set (somekeyword otherkeyword).rr)rJr:rK)rM imapflagsetflagc serverflagsets rflagsimap2keywordsrWsGj2&,,./Kw7)478M  &&8s A cg}tD]\}}||vs |j|ddjt|zdzS)z>Convert set of flags ([DR]) into a string '(\Deleted \Draft)'.r#rr$)rKr r sorted)maildirflaglistr,rOrPs rflagsmaildir2imapr[sPF!($+ / ) MM( #$ &.) )C //rcDd}t|syd\}}g}ttt|}t |D];}t|}|||}}||dzk(r|} |j |||||}}=|j |||dj |S)zCollapse UID lists into shorter sequence sets [1,2,3,4,5,10,12,13] will return "1:5,10,12:13". This function sorts the list, and only collapses if subsequent entries form a range. :returns: The collapsed UID list as string.c0||k(r t|S|d|S)N:)r )startends rgetrangezuid_sequence..getranges C<u: %%r)NNr,)r*rYmapintiterr r )uidlistrar_r`r, sorted_uidsitems r uid_sequencerjs& w<JE3 FS'*+K[!$4y =t3E S1W_C MM(5#. /t3E$ MM(5#&' 88F rc.t|dk(ry|dx}}|dd} |j|}|dk(rtd|d|dd }|dz }|dk\r||d k(r|dz}| }|dk\r ||d k(r||d|dzz }||dzd}|s||jfSz) a{Looks for the ending quote character in the string that starts with quote character, splitting out quoted component and the rest of the string (without possible space between these two parts. First character of the string is taken to be quote character. Examples: - "this is " a test" (\None) => ("this is " a test", (\None)) - "\" => ("\", ) r)rbrbrNrzcan't find ending quote 'z' in ''Fr)r*findr%r8)rqr@rAnext_q is_escapedis rr9r9s 1v{1A QR5D 1 R<q!LM M  QJ1faD FA'J1faD $q!$$FQJK 4;;=( (! rc>|tvrd}nd}|j|S)a:Formats labels for embedding into a message, with format according to header name. Headers from SPACE_SEPARATED_LABEL_HEADERS keep space-separated list of labels, the rest uses comma (',') as the separator. Also see parse_labels_string() and modify it accordingly if logics here gets changed.rrc)SPACE_SEPARATED_LABEL_HEADERSr )headerlabelsseps rformat_labels_stringrws&.. 88F rc|tvrd}nd}|jj|}t|Dcgc]#}|js|j%c}Scc}w)a~Parses a string into a set of labels, with a format according to the name of the header. See __format_labels_string() for explanation on header handling and keep these two functions synced with each other. TODO: add test to ensure that - format_labels_string * parse_labels_string is unity and - parse_labels_string * format_labels_string is unity rrc)rsr7r:rJ)rt labels_strrvruls rparse_labels_stringr{sW..     % %c *F 67aQWWY 7 887s A% A%c:|rt||}|St}|S)a Helper that builds label set from the corresponding header value. Arguments: - header_name: name of the header that keeps labels; - header_value: value of the said header, can be None Returns: set of labels parsed from the header (or empty set). )r{rJ) header_name header_valuerus rlabels_from_headerr0s($[,? M Mrcd}tj||} |jdjdS#tt f$r|cYSwxYw)zDecodes a modified UTF-7 mailbox name. If the string cannot be decoded, it is returned unmodified. See RFC 3501, sec. 5.1.3. Arguments: - name: string, possibly encoded with modified UTF-7 Returns: decoded UTF-8 string. cd|j}|dk(ryd|ddjddzdzS)N+z+-rrrc/-)groupr)mrs rdemodifyz%decode_mailbox_name..demodifyOs8 GGI 8QqW__S#..44rzutf-7r3)MUTF7_SHIFT_REsubr6encodeUnicodeDecodeErrorUnicodeEncodeError)namerrets rdecode_mailbox_namerBsT5   Xt ,Czz'"))'22  2 3 s;AActj|jdjdjS)z+Convert IMAP4_utf_7 encoded string to utf-8 imap4-utf-7r3codecsr6r foldernames r IMAP_utf8rbs3 ==  fWoffhrctj|jdjdjS)z+Convert utf-8 encoded string to IMAP4_utf_7r3rrrs r utf8_IMAPrjs4 ==  f]FFH%rc|jd}tj|jdj ddS)Nutf-16bes =/,)rbinascii b2a_base64rstriprrs rmodified_base64rss9 A   q ! ( ( 0 8 8t DDrcl|r2|jdtdj|z|dd=yy)Ns&%s-rb)r rr )_inrs rdoB64rxs/  ?2773<889 F rtextreturncg}g}|D]]}dt|cxkrdkr6nn3t|||j|dk(rdn|jM|j|_t||dj |t |fS)N ~&s&-r)ordrr rr r*)rrrrUs r utf7m_encoder~s| A C  3q6 !T ! #qM HHa3hUAHHJ 7 JJqM  #qM 88A;D !!rcjtj|jdddz}t|dS)Nrcrz===r)r a2b_base64rr )rbs rmodified_unbase64rs/AIIc3/%78A q* rbinaryc g}g}|D]}|tdk(r|s|jd%|tdk(rQ|rOt|dk(r|jdn,|jtdj |ddg}|r|jt ||jt ||r,|jtdj |dddj |t|fS)Nrrrrb)rr r*rr chr)rrr6rUs r utf7m_decoders A F   C= MM#  #c(]v6{a *2776!":+>?@F  MM#a& ! HHSV   "2776!":#678 771:s6{ ""rceZdZddZy) StreamReaderct|SN)rselfrerrorss rr6zStreamReader.decode ArNstrict__name__ __module__ __qualname__r6rrrrrrceZdZddZy) StreamWriterct|Sr)rrs rr6zStreamWriter.decoderrNrrrrrrrrrrcVtjtttt dS)Nrr)r CodecInforrrrrs rutf7m_search_functionrs$      rcHgdtfd|Drd|zdz}|S)z This function returns the folder_name ready to send to the IMAP server. It tests if the folder_name has special characters Then, quote it. Args: folder_name: Folder's name Returns: The folder_name quoted if needed )rrr#r${}c3&K|]}|v ywrr).0rU atom_specialss r z)foldername_to_imapname..s 5AA  5sr)any) folder_namers @rfoldername_to_imapnamers-3M 5 55K'#- r)*rerrtypingrofflineimap.uirrscompilerrrr!r'r.r1r&rKrQrWr[rjr9rwr{rrrrrrr bytesrerrrrrrregisterrrrrrs$  & !8M*/    ,3l '0D")J$9.$@%E  "s "uUCZ0 "  ##5c?#.6&& 6&& %&r