3
_Vjk# @ s d Z ddlZddlZddlZddgZdd ZejdjZG 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 r )entryr r /usr/lib64/python3.6/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}xt D ]}yt|d}W n tk
r8 wY nX | t||\}}W dQ R X x6|j D ]*\}}|| kr||| |< qb| | | | |< qbW qW | 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 jkr"t jd } | jt 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 jdtd 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 }x| j }|sP |d dks|j dkr.q|}x4|d d dkrf| j }|sTd}|dd | }q4W t|\}}|oz|s~q|dk r||d< |d 7 }|jd
}x$tt|D ]}|| j ||< qW d
j|j }||kr|| j| q|g||< qW ||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 # r Nz\
r r /r* ) readlinestrip parseliner rangelenjoinlowerappend) r r r lineZnextliner fieldstypesjr r r r M s6
r c
C s g }dt | }}x.||k r@t| ||\}}|j| |d }qW t |dk rRdS |d |d |dd }}}d|i}x^|D ]V}|jd}|dk r|}d} n$|d| j }||d d j } ||krq| ||< qW ||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 Nview=r' )NN)r/
parsefieldr2 findr, )
r3 r4 infieldr r7 restZfkeyZfvaluer r r r- v s*
r- c C sT |}x:||k r>| | }|dkr"P q|dkr4|d }q|d }qW | || j |fS )z/Separate one key-value pair in a mailcap entry.;\r r )r, )r3 r; r< startcr r r r9 s
r9 r7 z /dev/nullc
C s t |r"d|f }tj|t dS t| ||}xd|D ]\}d|krnt|d ||}|dkrZq4|rntj|dkrnq4t|| |||} | dk r4| |fS q4W dS )a Find 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.
zHRefusing to use mailcap with filename %r. Use a safe temporary filename.Ntestr )NN)NN) _find_unsafer! r" r
lookupsubstr system)
r MIMEtyper filenameplistmsgentrieserC commandr r r r s
c sl g }|| kr|| | }|j d}|d d }|| krB|| | } d k r\ fdd|D }t|td}|S )Nr) r z/*c s g | ]} |kr|qS r r ).0rM )r r r
s zlookup..)r )r sortedr )r rH r rL Z MIMEtypesr )r r rE s
rE c C s\ d}dt | }}xB||k rV| | }|d }|dkrb|dkrX| ||d }|d }|| }q| | }|d }|dkr|| }q|dkr|| }q|dkrt|rd|f }tj|t d S || }q|d krH|} x ||k r| | d
kr|d }qW | | | }
|d }t|
|} t| r>d | |
f }tj|t d S || }q|d | }qW |S ) Nr' r r %r@ stz9Refusing to substitute MIME type %r into a shell command.{}z=Refusing to substitute parameter %r (%s) into a shell command)r/ rD r! r" r
findparam) r= rH rI rJ resr; r< rB rK rA nameZparamr r r rF sH
rF c C sF | j d } t| }x,|D ]$}|d | j | kr||d S qW dS )Nr8 r' )r1 r/ )rY rJ r< pr r r rW s
rW c C s dd l } t }| jdd s(t| d S xtdt| jdD ]}| j||d }t|dk rjtd d S |d }|d }t||d|\}}|stdt q s* )
)