o H@sdZddlZddlZddgZddZddZdd Zd d Zd d ZddZ ddZ ddgfddZ d ddZ gfddZ ddZddZddZedkrRedSdS)!z%Mailcap file handling. See RFC 1524.Ngetcaps findmatchcCsd|vr d|dfSdS)Nlinenor)r)entryrr-/app/.heroku/python/lib/python3.10/mailcap.pylineno_sort_key s r c Csi}d}tD]F}zt|d}Wn tyYqw|t||\}}Wdn1s.wY|D]\}}||vrD|||<q7|||||<q7q|S)aReturn a dictionary containing the mailcap database. The dictionary maps a MIME type (in all lowercase, e.g. 'text/plain') to a list of dictionaries corresponding to mailcap entries. The list collects all the entries for that MIME type from all available mailcap files. Each dictionary contains key-value pairs for that MIME type, where the viewing command is stored with the key "view". rrN)listmailcapfilesopenOSError_readmailcapfileitems)capsrZmailcapfpZmorecapskeyvaluerrrrs"    cCsRdtjvrtjd}|tj}|Sdtjvrtjd}nd}|ddddg}|S)z7Return a list of all mailcap files found on the system.ZMAILCAPSHOME.z /.mailcapz /etc/mailcapz/usr/etc/mailcapz/usr/local/etc/mailcap)osenvironsplitpathsep)ZpathstrZmailcapshomerrrr -s    r cCs tdtdt|d\}}|S)z?Read a mailcap file and return a dictionary keyed by MIME type.z2readmailcapfile is deprecated, use getcaps insteadN)warningswarnDeprecationWarningr)rr_rrrreadmailcapfile?s r c Csi} |}|s ||fS|ddks|dkrq|}|dddkr<|}|s,d}|dd|}|dddks$t|\}}|rF|sGq|durS||d <|d7}|d }tt|D] }||||<q^d |}||vr||||n|g||<q) aRead a mailcap file and return a dictionary keyed by MIME type. Each MIME type is mapped to an entry consisting of a list of dictionaries; the list will contain more than one such dictionary if a given MIME type appears more than once in the mailcap file. Each dictionary contains key-value pairs for that MIME type, where the viewing command is stored with the key "view". rr#Nz\  r/) readlinestrip parselinerrangelenjoinlowerappend) rrrlineZnextlinerfieldstypesjrrrrGs6    rc Csg}dt|}}||kr"t|||\}}|||d}||ks t|dkr*dS|d|d|dd}}}d|i}|D]+}|d}|dkrP|}d} n|d|}||dd} ||vrgq@| ||<q@||fS) zParse one entry in a mailcap file and return a dictionary. The viewing command is stored as the value with the key "view", and the rest of the fields produce key-value pairs in the dict. rrrNNNview=r")r* parsefieldr-findr') r.r/infieldrr3restZfkeyZfvaluerrrr(ps,     r(cCsT|}||kr ||}|dkrn|dkr|d}n|d}||ks||||fS)z/Separate one key-value pair in a mailcap entry.;\rr)r')r.r7r8startcrrrr5s r5r3z /dev/nullc Csbt|||}|D]&}d|vr t|d||}|r t|dkr qt|||||}||fSdS)aFind a match for a mailcap entry. Return a tuple containing the command line, and the mailcap entry used; (None, None) if no match is found. This may invoke the 'test' command of several matching entries before deciding which entry to use. testrr2)lookupsubstrsystem) rMIMEtyperfilenameplistentrieser?commandrrrrs  cslg}||vr |||}|d}|dd}||vr!|||}dur.fdd|D}t|td}|S)Nr%rz/*csg|]}|vr|qSrr).0rGrrr szlookup..rJ)rsortedr )rrCrrFZ MIMEtypesrrJrr@s     r@c Csd}dt|}}||kr||}|d}|dkr.|dkr)|||d}|d}||}nY||}|d}|dkr?||}nH|dkrH||}n?|dkrQ||}n6|dkr|}||kro||d kro|d}||kro||d ksa|||} |d}|t| |}n|d|}||ks |S) Nr"rr%r<st{})r* findparam) r9rCrDrEresr7r8r>r=namerrrrAs4      rAcCsF|d}t|}|D]}|d||kr ||dSq dS)Nr4r")r,r*)rTrEr8prrrrRs rRc Csddl}t}|jddst|dStdt|jdD]G}|j||d}t|dkr5tddS|d}|d}t||d|\}}|sNtdtqtd|t |}t |}|rdtd|qdS) Nrrrz"usage: mailcap [MIMEtype file] ...r3zNo viewer found forz Executing:z Exit status:) sysrargvshowr)r*printrtyperrBwaitstatus_to_exitcode) rVrr7argsrCfilerHrGstsrrrr?s,      r?cCstdtD]}td|qt|st}tdtt|}|D]$}t|||}|D]}t|}|D] }td|||q9tq1q%dS)NzMailcap files: zMailcap entries:z %-15s)rYr rrL)rfnZckeysrZrFrGkeyskrrrrXs" rX__main__)N)__doc__rr__all__r rr r rr(r5rr@rArRr?rX__name__rrrrs( )