a
i# @ s d Z ddlZddlZddlZddgZdd ZedjZG dd d e Z
d
d Z d d Z d
d Z
dd Zdd Zdd Zddg fddZd#ddZg fddZd d Zd d Zd d! Zed"kre dS )$z%Mailcap file handling. See RFC 1524. Ngetcaps findmatchc C s d| v rd| d fS dS d S )Nlinenor ) r )entryr r /usr/lib64/python3.9/mailcap.pylineno_sort_key
s r z [^\xa1-\U0010FFFF\w@+=:,./-]c @ s e Zd ZdZdS )UnsafeMailcapInputz)Warning raised when refusing unsafe inputN)__name__
__module__ __qualname____doc__r r r r r
s r
c C s i } d}t D ]}zt|d}W n ty6 Y qY n0 | t||\}}W d n1 s`0 Y | D ]*\}}|| vr|| |< qr| | | | |< qrq| S )a Return 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".
r rN)listmailcapfilesopenOSError_readmailcapfileitems)capsr ZmailcapfpZmorecapskeyvaluer r r r s
,
c C sP dt jv r"t jd } | t j}n*dt jv r8t jd }nd}|d dddg}|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)ZpathstrZmailcapshomer r r r 3 s
r c C s t dtd t| d\}}|S )z?Read a mailcap file and return a dictionary keyed by MIME type.z2readmailcapfile is deprecated, use getcaps instead N)warningswarnDeprecationWarningr )r r _r r r readmailcapfileE s
r% c C s i }| }|sq|d dks| dkr,q|}|dd dkrb| }|sPd}|dd | }q0t|\}}|r|sxq|dur||d< |d 7 }|d
}tt|D ]}|| ||< qd
| }||v r|| | q|g||< q||fS ) a Read 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".
r # Nz\
r r /) readlinestrip parseliner rangelenjoinlowerappend) r r r lineZnextliner fieldstypesjr r r r M s0
r c
C s g }dt | }}||k r>t| ||\}}|| |d }qt |dk rNdS |d |d |dd }}}d|i}|D ]V}|d}|dk r|}d} n$|d| }||d d } ||v rqz| ||< qz||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.
r r r NNNview=r' )r/
parsefieldr2 findr, )
r3 r4 infieldr r8 restZfkeyZfvaluer r r r- v s*
r- c C sP |}||k r<| | }|dkr q