U
ifk# @ 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| krd| d fS dS d S )Nlinenor ) r )entryr r ,/opt/alt/python38/lib64/python3.8/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 tk
r8 Y qY nX | t||\}}W 5 Q R X | D ]*\}}|| krz|| |< q`| | | | |< q`q| 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 r)listmailcapfilesopenOSError_readmailcapfileitems)capsr ZmailcapfpZmorecapskeyvaluer r r r s
c C sP dt jkr"t jd } | t j}n*dt jkr8t 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|dk r||d< |d 7 }|d
}tt|D ]}|| ||< qd
| }||kr|| | 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 s4
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 } ||krqz| ||< 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 s zlookup..rQ )r sortedr )r rI r rM Z MIMEtypesr rQ r rF s
rF c C sR d}dt | }}||k rN| | }|d }|dkr^|dkrT| ||d }|d }|| }q| | }|d }|dkr|| }q|dkr|| }q|dkrt|rd|f }t|t d S || }q|d kr@|} ||k r| | d
kr|d }q| | | }
|d }t|
|} t| r6d | |
f }t|t d S || }q|d | }q|S ) Nr' r r %rA stz9Refusing to substitute MIME type %r into a shell command.{}z=Refusing to substitute parameter %r (%s) into a shell command)r/ rE r! r" r
findparam) r> rI rJ rK resr< r= rC rL rB nameZparamr r r rG sH
rG c C sF | d } t| }|D ](}|d | | kr||d S qdS )Nr9 r' )r1 r/ )r[ rK r= pr r r rY s rY c C s dd l } t }| jdd s(t| d S tdt| jdD ]}| j||d }t|dk rjtd d S |d }|d }t||d|\}}|stdt q:td| t
|}|r:td| q:d S ) Nr r r z"usage: mailcap [MIMEtype file] ...r8 zNo viewer found forz
Executing:z Exit status:) sysr argvshowr. r/ printr typer rH ) r] r r< argsrI filerO rN stsr r r rD s&
rD c C s t d t D ]}t d| qt | s0t } t d t t| }|D ]H}t | | | }|D ].}t|}|D ]}t d| || qrt qbqJd S )NzMailcap files: zMailcap entries:z %-15s)r` r r rS )r fnZckeysra rM rN keyskr r r r_ s"
r_ __main__)N)r r r! re__all__r compilesearchrE Warningr
r r r% r r- r: r rF rG rY rD r_ r r r r r s* )
)