U
��,a� � @ s� d Z ddlZddlZddgZdd� Zdd� Zdd � Zd
d � Zd d
� Zdd� Z dd� Z
ddg fdd�Z d dd�Z g fdd�Z
dd� Zdd � 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 �,/opt/alt/python38/lib64/python3.8/mailcap.py�lineno_sort_key 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 - 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 �readmailcapfile? 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 G 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* �
parsefieldr- �findr' )
r. r/ �i�n�fieldr r3 �restZfkeyZfvaluer r r r( p s*
r( c C sP |}||k r<| | }|dkr q<q|dkr2|d }q|d }q| ||� � � |fS )z/Separate one key-value pair in a mailcap entry.�;�\r r )r' )r. r7 r8 �start�cr r r r5 � s
r5 r3 z /dev/nullc C sb t | ||�}|D ]L}d|kr@t|d ||�}|r@t�|�dkr@qt|| |||�}||f S 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.
�testr r2 )�lookup�substr �system) r �MIMEtyper �filename�plist�entries�er? �commandr r r r � s c sl g }|| kr|| | }|� d�}|d d }|| krB|| | }� d k r\� fdd�|D �}t|td�}|S )Nr% r z/*c s g | ]}� |kr|�qS r r )�.0rG �r r r �
<listcomp>� s zlookup.<locals>.<listcomp>rJ )r �sortedr )r rC r rF Z MIMEtypesr rJ r r@ � s
r@ c
C s d}dt | � }}||k �r | | }|d }|dkr^|dkrT| ||d � }|d }|| }q| | }|d }|dkr�|| }q|dkr�|| }q|dkr�|| }q|dkr�|}||k r�| | d kr�|d }q�| ||� } |d }|t| |� }q|d | }q|S )
Nr" r r �%r< �s�t�{�})r* � findparam)
r9 rC rD rE �resr7 r8 r> r= �namer r r rA � s6
rA c C sF | � � d } t| �}|D ](}|d |� � � | kr||d � S qdS )Nr4 r" )r, r* )rT rE r8 �pr r r rR � s rR 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] ...r3 zNo viewer found forz
Executing:z Exit status:) �sysr �argv�showr) r* �printr �typer rB ) rV r r7 �argsrC �filerH rG �stsr r r r? � s&
r? 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)rY r r rL )r �fnZckeysrZ rF rG �keys�kr r r rX s"
rX �__main__)N)�__doc__r r �__all__r r r r r r( r5 r r@ rA rR r? rX �__name__r r r r �<module> s$
)