o
6��f�# � @ 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"krde� dS dS )$z%Mailcap file handling. See RFC 1524.� N�getcaps� findmatchc C s d| v r
d| d fS dS )N�linenor )� r � )�entryr r �./opt/alt/python310/lib64/python3.10/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 ]F}zt|d�}W n ty Y qw |� t||�\}}W d � n1 s.w Y |�� D ]\}}|| vrD|| |< q7| | | | |< q7q| 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)�listmailcapfiles�open�OSError�_readmailcapfile�items)�capsr Zmailcap�fpZmorecaps�key�valuer r r r s"
� �
�c C sR dt jv rt jd } | �t j�}|S dt jv r t 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 } | � � }|s
||fS |d dks|�� dkrq|}|dd� dkr<| � � }|s,d}|dd� | }|dd� dks$t|�\}}|rF|sGq|durS||d < |d7 }|�d
�}tt|��D ]
}|| �� ||< q^d
�|��� }||v r||| �|� n|g||< q) 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 �/) �readline�strip� parseliner �range�len�join�lower�append) r r r �lineZnextliner �fields�types�jr r r r M s6 ��
�r c
C s� g }dt | �}}||k r"t| ||�\}}|�|� |d }||k s
t |�dk r*dS |d |d |dd� }}}d|i}|D ]+}|�d�}|dk rP|}d} n|d|� �� }||d d� �� } ||v rgq@| ||< q@||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 sT |}||k r | | }|dkrn|dkr|d }n|d }||k s| ||� � � |fS )z/Separate one key-value pair in a mailcap entry.�;�\r r )r, )r3 r< r= �start�cr r r r: � s
�r: r8 z /dev/nullc
C s� t |�rd|f }t�|t� dS t| ||�}|D ]0}d|v r6t|d ||�}|du r,q|r6t�|�dkr6qt|| |||�} | durI| |f S qdS )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.r7 �testNr )� _find_unsafer! r" r
�lookup�substr �system)
r �MIMEtyper �filename�plist�msg�entries�erD �commandr r r r � s"
�c sl g }|| v r || | }|� d�}|d d }|| v r!|| | }� d ur.� fdd�|D �}t|td�}|S )Nr* r z/*c s g | ]}� |v r|�qS r r )�.0rN �r r r �
<listcomp>� s zlookup.<locals>.<listcomp>rQ )r �sortedr )r rI r rM Z MIMEtypesr rQ r rF � s
rF c C sd d}dt | �}}||k r�| | }|d }|dkr.|dkr)| ||d � }|d }|| }n~| | }|d }|dkr?|| }nm|dkrH|| }nd|dkrbt|�r]d|f }t�|t� d S || }nJ|d kr�|} ||k r�| | d
kr�|d }||k r�| | d
ksr| | |� }
|d }t|
|�} t| �r�d | |
f }t�|t� d S || }n|d | }||k s
|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 � sF
�
�#rG c C sF | � � d } t| �}|D ]}|d |� � � | kr ||d � S q dS )Nr9 r' )r1 r/ )r[ rK r= �pr r r rY � s �rY c C s� dd l } t� }| jdd � st|� d S tdt| j�d�D ]G}| j||d � }t|�dk r5td� d S |d }|d }t||d|�\}}|sNtdt� q td|� t �
|�}t � |�}|rdtd|� 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 �waitstatus_to_exitcode) r] r r< �argsrI �filerO rN �stsr r r rD s,
��rD c C s� t d� t� D ]}t d| � qt � | st� } t d� t � t| �}|D ]$}t |� | | }|D ]}t|�}|D ] }t d| || � q9t � q1q%d 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 �<module> s. )
)
�