U
e5dk# � @ s� d Z ddlZddlZddlZddgZdd� Ze�d�jZG dd � d e �Z
d
d� Z d d � Z d
d� Z
dd� Zdd� Zdd� Zddg fdd�Zd#dd�Zg fdd�Zd d � Zd d � Zd d!� Zed"kr�e� dS )$z%Mailcap file handling. See RFC 1524.� N�getcaps� findmatchc C s d| krd| d fS dS d S )N�linenor )� r � )�entryr r � /usr/lib64/python3.8/mailcap.py�lineno_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)�listmailcapfiles�open�OSError�_readmailcapfile�items)�capsr Zmailcap�fpZmorecaps�key�valuer 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.ZMAILCAPS�HOME�.z /.mailcapz /etc/mailcapz/usr/etc/mailcapz/usr/local/etc/mailcap)�os�environ�split�pathsep)ZpathstrZmailcaps�homer 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)�warnings�warn�DeprecationWarningr )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 ]}|| �� ||< q�d
�|��� }||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 �/) �readline�strip� parseliner �range�len�join�lower�append) r r r �lineZnextliner �fields�types�jr 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� �� } ||kr�qz| ||< qz||fS ) z�Parse 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 �NNN�view�=r' )r/ �
parsefieldr2 �findr, )
r3 r4 �i�n�fieldr 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|dkr�t|�r�d|f }t�|t� d S || }q|d k�r@|} ||k r�| | d
kr�|d }q�| | |� }
|d }t|
|�} t| ��r6d | |
f }t�|t� d S || }q|d | }q|S ) Nr' r r �%rA �s�tz9Refusing 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| j�d�D ]�}| j||d � }t|�dk rjtd� d S |d }|d }t||d|�\}}|s�tdt� 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 �argv�showr. 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 �keys�kr r r r_ s"
r_ �__main__)N)r r r! �re�__all__r �compile�searchrE �Warningr
r r r% r r- r: r rF rG rY rD r_ r r r r r � s* )
)