a

�DOg�#�@s�dZd
dl
Z
d
dlZd
dlZddgZdd�Ze�d�
jZGdd	�d	e	�Z
d
d�Zdd�Zd
d�Z
dd�Zdd�Zdd�Zddgfdd�
Zd#dd�
Zgf
dd�
Zdd�Zdd�Zd d!�Zed"kr�e�
dS)$z%Mailcap file handling.  See RFC 1524.�N�getcaps�	findmatchc

Csd
|vrd|d
fSdSdS)N�linenor
)�
r
�)
�entryrr�/usr/lib64/python3.9/mailcap.py�lineno_sort_key
s
r	z[^\xa1-\U0010FFFF\w@+=:,./-]c
@seZ
dZd
ZdS)�UnsafeMailcapInputz)Warning raised when refusing unsafe inputN)�__name__�
__module__�__qualname__�__doc__rrrrr
s
r
c	Cs�i}d
}
t�D]�}zt
|d�}Wnty6


YqYn0|�
t||
�\}}
Wd�
n1s`0


Y
|��D]*\}}||v
r�|||<qr|||||<qrq|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)�capsrZmailcap�fpZmorecaps�key�valuerrrrs










,




cCsPd
tj
vr"tj
d
}|�tj�
}
n*dtj
vr8tj
d}nd}|ddddg}
|
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�homerrrr3s







�rc
Cs t�
d
td�
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)rr�
_rrr�readmailcapfileEs

�
r%c	Cs�i}|��}|sq�|d
dks|�
�dkr,q|}|dd�dkrb|��}|sPd}|dd�|}q0t|�
\}}|r|sxq|
du
r�|
|d<|
d	7}
|�d
�
}tt|�
�
D]}||�
�||<q�d
�|�
��}||vr�||�|�

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\
�

rr�
/)	�readline�strip�	parseliner�range�len�join�lower�append)	rrr�lineZnextliner�fields�types�
jrrrrMs0	
















rc

Cs�g}
d
t|�
}}||kr>t
|||�\}}|
�|�

|d}qt|
�
dkrNdS|
d
|
d|
dd�}}}d|i
}
|D]V}|�d�
}|d
kr�|}d}	n$|d|���}||dd���}	||
vr�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
rr �NNN�view�
=r')r/�
parsefieldr2�findr,)
r3r4�
i�
n�fieldrr8�restZfkeyZfvaluerrrr-vs*









 










r-cCsP|
}|
|kr<||
}|d
kr q<q|dkr2|
d}
q|
d}
q|||
���|
fS)z/Separate one key-value pair in a mailcap entry.�
;�
\r r)
r,)r3r<r=�start�
crrrr:�s








r:r8z	/dev/nullc
Cs�t|�
r"d
|f
}t
�|t�
dSt||
|�}|D]`}d|vrlt|d||�}|durXq2|rlt�|�
dkrlq2t|||
||�}	|	du
r2|	|f
Sq2dS)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�commandrrrr�s 	














cslg}|
|vr|||
}|
�d
�
}|dd}
|
|vrB|||
}�du
r\�f
dd�|D�
}t
|td�}|S)Nr*r
z/*c
sg|]}
�|
vr|
�qSrr)�.0rN�
rrr�
<listcomp>��zlookup.<locals>.<listcomp>rQ)r�sortedr	)rrIrrMZ	MIMEtypesrrQrrF�s











rFcCsR
d
}dt|�
}}||k�
rN||}|d}|dkr^|dkrT|||d�}|d}||}q||}|d}|dkr�||}q|dkr�||}q|dkr�t
|
�
r�d|
f
}t�|t�
dS||
}q|d	k�
r@|}	||kr�||d
kr�|d}q�||	|�}
|d}t|
|�}t
|�
�
r6d||
f}t�|t�
dS||}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/rEr!r"r
�	findparam)r>rIrJrK�resr<r=rCrLrB�nameZparamrrrrG�sB








































rGcCsF|��d
}t
|�
}|
D](}|d|���|kr||d�
SqdS)Nr9r')r1r/)r\rKr=�
prrrrZ�s





rZc	Cs�d
dl}t
�}
|jdd�s(t|
�

dStdt|j�
d�D]�}|j||d�}t|�
dkrjtd�


dS|d
}|d}t|
|d|�\}}|s�tdt�
q:td|�
t	�
|�
}t	�|�
}|r:td|�
q:dS)	Nr
rr z"usage: mailcap [MIMEtype file] ...r8zNo viewer found forz
Executing:zExit status:)�sysr�argv�showr.r/�printr�typerrH�waitstatus_to_exitcode)	r^rr<�argsrI�filerOrN�stsrrrrD

s(





















rDc
Cs�td
�

t
�D]}
td|
�

qt�
|s0t�}td�

t�
t|�
}|D]H}t|�

||}|D].}t|�
}|D]}td|||�
qrt�
qbqJdS)NzMailcap files:�
	zMailcap entries:z  %-15s)rarrrT)r�fnZckeysrbrMrN�keys�
krrrr`
s















r`�__main__)
N)rrr!�re�__all__r	�compile�searchrE�Warningr
rrr%rr-r:rrFrGrZrDr`rrrrr�<module>
s*

)

)