o
6��f?� � @ s^ d Z ddlmZmZmZ ddlmZ ddlZddlZddl Z
ddl m Z ddl
mZ ddlZddlZddlZddlZg d�Zdadad d
� Zd d � Zd
d� Zdd� Zeadadej dddfdd�Z d1dd�Z dd� Z dd� Z G d d � d �Z!G d d � d �Z"ej fd d!�Z#d2d"d#�Z$ej fd$d%�Z%d&d'� Z&d(d)� Z'd*d+� Z(d,d-� Z)d.d/� Z*e+d0kr�e#� dS dS )3z2.6� )�StringIO�BytesIO�
TextIOWrapper)�MappingN)�
FeedParser)�Message) �MiniFieldStorage� FieldStorage�parse�parse_multipart� parse_header�test�print_exception�
print_environ�
print_form�print_directory�print_arguments�print_environ_usage� c G sZ t jdtdd� tr ts z ttddd�aW n ty Y nw ts%tant at| � d S )Nz7cgi.log() is deprecated as of 3.10. Use logging instead� )�
stacklevel�a�locale)�encoding)
�warnings�warn�DeprecationWarning�logfile�logfp�open�OSError�nolog�log�dolog�Zallargs� r% �*/opt/alt/python310/lib64/python3.10/cgi.py�initlog9 s � � r' c G s t �| | d � d S )N�
)r �write)Zfmt�argsr% r% r& r# ^ s r# c G s d S �Nr% r$ r% r% r& r! b s r! c C s da tr t�� d atad S )Nr )r r �closer' r" r% r% r% r& �closelogf s r- �&c
C sX | d u rt j} t| d�r| j}nd}t| t�r| j} d|vr#d|d< |d dkr�t|d �\}}|dkr<t| ||d�S |d krYt |d
�}t
rP|t
krPt d ��| � |��
|�} nd } d
|v rl| re| d } | |d
} nt jdd � r�| ry| d } | t jd } | |d
< n d
|v r�|d
} nt jdd � r�t jd } nd } | |d
< tjj| ||||d�S )Nr zlatin-1�REQUEST_METHOD�GET�POST� CONTENT_TYPEzmultipart/form-data)� separator�!application/x-www-form-urlencoded�CONTENT_LENGTH� Maximum content length exceededr � QUERY_STRINGr. � )r r3 )�sys�stdin�hasattrr �
isinstancer �bufferr r �int�maxlen�
ValueError�read�decode�argv�urllibr
Zparse_qs)
�fp�environ�keep_blank_values�strict_parsingr3 r �ctype�pdictZclength�qsr% r% r& r
y sH
�r
�utf-8�replacec sx |d � d�}d�|�}t� }|�|� z|d |d< W n ty& Y nw t| |||ddi|d�� � fd d
�� D �S ) N�boundary�asciiz multipart/form-data; boundary={}zCONTENT-LENGTHzContent-Lengthr/ r1 )�headersr �errorsrF r3 c s i | ]}|� � |��qS r% )�getlist)�.0�k�Zfsr% r& �
<dictcomp>� s z#parse_multipart.<locals>.<dictcomp>)rB �formatr Zset_type�KeyErrorr )rE rJ r rQ r3 rN rI rP r% rU r& r � s
�
�r c c s� � | d d� dkrg| dd � } | � d�}|dkrD| �dd|�| �dd|� d rD| � d|d �}|dkrD| �dd|�| �dd|� d s(|dk rLt| �}| d |� }|�� V | |d � } | d d� dks d S d S )Nr8 �;r �"�\"r )�find�count�len�strip)�s�end�fr% r% r& � _parseparam� s �
((�
�rc c C s� t d| �}|�� }i }|D ]I}|�d�}|dkrX|d |� �� �� }||d d � �� }t|�dkrT|d |d krBdkrTn n|dd� }|�dd ��d
d�}|||< q||fS ) NrY �=r r8 r ���rZ z\\�\r[ )rc �__next__r\ r_ �lowerr^ rM )�line�parts�keyrJ �p�i�name�valuer% r% r& r � s
, �r c @ s> e Zd Z dZdZdZdZi ZdZi Z i Z
dd� Z dd� Z dS )r Nc C s || _ || _d S r+ �rn ro ��selfrn ro r% r% r& �__init__ s
zMiniFieldStorage.__init__c C s d| j | jf S )NzMiniFieldStorage(%r, %r)rp �rr r% r% r& �__repr__ s zMiniFieldStorage.__repr__)
�__name__�
__module__� __qualname__�filename�list�type�file� type_options� disposition�disposition_optionsrP rs ru r% r% r% r& r � s r c @ s� e Zd Z dddejdddddddf dd�Zd d
� Zd d � Zd
d� Zdd� Z dd� Z
dd� Z dd� Z d:dd�Z
d:dd�Zdd � Zd d � Zd d � Zd!d"� Zd#d$� Zd%d&� ZdZd'd(� Zd)d*� Zd+Zd,d-� Zd.d/� Zd0d1� Zd2d3� Z d4d5� Z d6d7� Z d8d9� Z dS );r N� r rL rM r. c C sL d} || _ || _|
| _| | _d|v r|d �� } d | _| dks$| dkrPd|v r-|d }
ntjdd � r:tjd }
nd}
|
�t �
� d�}
t |
�}|d u rPdd i}|d u r|i }| d
kr^d |d< d |v rh|d |d< d|v rq|d | _d |v r{|d |d
< n t |t
tf�s�td��|| _|d u r�tjj| _nt |t�r�|j| _nt|d�r�t|d�s�td��|| _|| _| | _t |t�s�tdt|�j ��|| _d| _ || _ di }}d| jv r�t | jd �\}}|| _ || _ d | _!d|v r�|d | _!d | _"d|v r�|d | _"| j"d u| _#d| jv �rt | jd �\}}n| j�s | d
k�r"di }}nd i }}|| _|| _$d|v �r>|d �| j| j�| _%nd| _%d}d
| jv �riz t&| jd
�}W n
t'�y\ Y nw t(�ri|t(k�rit'd��|| _)| j d u �rz|dk�rz|| _ d | _*| _+d| _,|d k�r�| �-� d S |d d � d k�r�| �.|||� d S | �/� d S ) Nr0 r/ ZHEADr7 r8 r �surrogateescapez content-typer4 r1 r2 r5 �content-lengthz?headers must be mapping or an instance of email.message.MessagerA �readlinezfp must be file pointerz#outerboundary must be bytes, not %sr zcontent-dispositionrn ry z
text/plainrN r� re r6 �
z
multipart/)0rG rH �max_num_fieldsr3 �upper�
qs_on_postr9 rC �encoder Zgetpreferredencodingr r< r r � TypeErrorrP r: r= rE r r; r rQ �bytesr{ rv �
outerboundary�
bytes_read�limitr r~ r rn ry � _binary_filer} �
innerboundaryr> r@ r? �lengthrz r| �done�read_urlencoded�
read_multi� read_single)rr rE rP r� rF rG rH r� r rQ r� r3 �methodrK ZcdisprJ rI Zclenr% r% r& rs B s� +
�
�
�
� �
zFieldStorage.__init__c C s& z| j �� W d S ty Y d S w r+ )r| r, �AttributeErrorrt r% r% r& �__del__� s
�zFieldStorage.__del__c C s | S r+ r% rt r% r% r& � __enter__� s zFieldStorage.__enter__c G s | j �� d S r+ )r| r, )rr r* r% r% r& �__exit__� s zFieldStorage.__exit__c C s d| j | j| jf S )NzFieldStorage(%r, %r, %r))rn ry ro rt r% r% r& ru � s �zFieldStorage.__repr__c C s t | �� �S r+ )�iter�keysrt r% r% r& �__iter__� � zFieldStorage.__iter__c C sX |dkrt |��| jr | j�d� | j�� }| j�d� |S | jd ur(| j}|S d }|S )Nro r )r� r| �seekrA rz rq r% r% r& � __getattr__� s
��zFieldStorage.__getattr__c C s\ | j d u r
td��g }| j D ] }|j|kr|�|� q|s"t|��t|�dkr,|d S |S )N�
not indexabler8 r )rz r� rn �appendrX r^ )rr rk �found�itemr% r% r& � __getitem__ s
� zFieldStorage.__getitem__c C s4 || v r| | }t |t�rdd� |D �S |jS |S )Nc S � g | ]}|j �qS r% �ro �rS �xr% r% r& �
<listcomp> � z)FieldStorage.getvalue.<locals>.<listcomp>�r< rz ro �rr rk �defaultro r% r% r& �getvalue s
zFieldStorage.getvaluec C s0 || v r| | }t |t�r|d jS |jS |S �Nr r� r� r% r% r& �getfirst! s
zFieldStorage.getfirstc C s6 || v r| | }t |t�rdd� |D �S |jgS g S )Nc S r� r% r� r� r% r% r& r� 1 r� z(FieldStorage.getlist.<locals>.<listcomp>r� )rr rk ro r% r% r& rR , s
zFieldStorage.getlistc C s, | j d u r
td��t tdd� | j D ���S )Nr� c s s � | ]}|j V qd S r+ �rn �rS r� r% r% r& � <genexpr>; s � z$FieldStorage.keys.<locals>.<genexpr>)rz r� �setrt r% r% r& r� 7 �
zFieldStorage.keysc s, | j d u r
td��t� fdd�| j D ��S )Nr� c 3 s � | ]}|j � kV qd S r+ r� r� �rk r% r& r� A s � z,FieldStorage.__contains__.<locals>.<genexpr>)rz r� �any)rr rk r% r� r& � __contains__= r� zFieldStorage.__contains__c C s t | �� �S r+ )r^ r� rt r% r% r& �__len__C � zFieldStorage.__len__c C s | j d u r td��t| j �S )Nz Cannot be converted to bool.)rz r� �boolrt r% r% r& �__bool__G s
zFieldStorage.__bool__c C s� | j �| j�}t|t�std| j t|�jf ��|�| j | j
�}| j r+|d| j 7 }t j
j|| j| j| j | j
| j| jd�}dd� |D �| _| �� d S )N� %s should return bytes, got %sr. �r rQ r� r3 c S s g | ] \}}t ||��qS r% �r �rS rk ro r% r% r& r� Y s z0FieldStorage.read_urlencoded.<locals>.<listcomp>)rE rA r� r< r� r@ r{ rv rB r rQ r� rD r
� parse_qslrG rH r� r3 rz �
skip_lines)rr rK �queryr% r% r& r� L s
�
� z FieldStorage.read_urlencodedc C sL | j }t|�std|f ��g | _| jr4tjj| j| j| j | j
| j | j | j
d�}| j�dd� |D �� | jp9| j}| j�� }t|t�sPtd| jt|�jf ��| jt|�7 _|�� d| j kr}|r}| j�� }| jt|�7 _|�� d| j kr}|sd| j }|d ur�|t| j�8 } t� } d}
| j�� } |
| 7 }
| �� s�nq�|
s�n|| jt|
�7 _| �|
� | j
| j �� | � � } d | v r�| d = | j d u r�d n| j | j }
|| j| |||||
| j
| j || j
� }|d ur�|d
8 }|jr�|t|j�8 }|d k r�td ��| j|j7 _| j� |� |j �s | j| j! k�r d k�r n nnq�| �"� d S )
Nz&Invalid boundary in multipart form: %rr� c s s � | ]
\}}t ||�V qd S r+ r� r� r% r% r& r� i s � z*FieldStorage.read_multi.<locals>.<genexpr>r� � --Tr� r� r8 r z Max number of fields exceeded)#r� �valid_boundaryr@ rz r� rD r
r� rG rH r rQ r� r3 �extend�FieldStorageClass� __class__rE r� r< r� r{ rv r� r^ r_ r ZfeedrB r, r� r� r� r� r� )rr rF rG rH Zibr� �klassZ
first_liner� �parserZhdr_text�datarP r� �partr% r% r& r� ^ s� �
��
��
�
�� (� $zFieldStorage.read_multic C s6 | j dkr| �� | �� n| �� | j�d� d S r� )r� � read_binaryr� �
read_linesr| r� rt r% r% r& r� � s
zFieldStorage.read_singlei c C s� | � � | _| j}|dkrN|dkrP| j�t|| j��}t|t�s,t d| jt
|�j f ��| j t
|�7 _ |s<d| _d S | j�|� |t
|� }|dksd S d S d S )Nr r� re )� make_filer| r� rE rA �min�bufsizer< r� r@ r{ rv r� r^ r� r) )rr Ztodor� r% r% r& r� � s&
� ��zFieldStorage.read_binaryc C sD | j r t� | _| _nt� | _| _| jr | �� d S | �� d S r+ )r� r r| �_FieldStorage__filer r� �read_lines_to_outerboundary�read_lines_to_eofrt r% r% r& r� � s zFieldStorage.read_linesc C sz | j d ur$| j �� t|� dkr$| �� | _| j �� }| j�|� d | _ | jr/| j�|� d S | j�|�| j | j
�� d S )Ni� ) r� �tellr^ r� r| r� r) r� rB r rQ )rr ri r� r% r% r& Z__write� s
zFieldStorage.__writec C s< | j �d�}| jt|�7 _|sd| _d S | �|� q)Nr8 � re )rE r� r� r^ r� �_FieldStorage__write)rr ri r% r% r& r� � s
�z FieldStorage.read_lines_to_eofc C sB d| j }|d }d}d}d} | jd ur#d| j kr"|kr#d S | j�d�}| jt|�7 _|t|�7 }|s?d| _d S |dkrI|| }d}|�d�rc|rc|�� }||krZd S ||krcd| _d S |}|� d �rud }|d d
� }d}n$|� d �r�d }|d d� }d}n|� d�r�d}|d d� }d }nd}d }| �
|| � q)
Nr� r� Tr r8 r� re �
s
����
F) r� r� rE r� r� r^ r� �
startswith�rstrip�endswithr� ) rr �
next_boundary�
last_boundaryZdelim�last_line_lfendZ_readri � strippedlineZodelimr% r% r& r� � sV
�
�z(FieldStorage.read_lines_to_outerboundaryc C s� | j r| jr d S d| j }|d }d} | j�d�}| jt|�7 _|s+d| _d S |�d�rE|rE|�� }||kr<d S ||krEd| _d S |�d�}q)Nr� Tr� re r8 r� )r� r� rE r� r� r^ r� r_ )rr r� r� r� ri r� r% r% r& r� s*
�zFieldStorage.skip_linesc C s$ | j r t�d�S tjd| jdd�S )Nzwb+zw+r( )r �newline)r� �tempfileZ
TemporaryFiler rt r% r% r& r� + s
�zFieldStorage.make_filer+ ) rv rw rx �osrF rs r� r� r� ru r� r� r� r� r� rR r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r% r% r% r& r sD )
� &
E
2 r c C s� t d� t � tjt_z't� }t� t� t|� t| � t � dd� }|fdd�}t d� |� W n t
� Y t d� da zt� }t� t� t|� t| � W d S t
� Y d S ) NzContent-type: text/htmlc S s t d� d S )Nz,testing print_exception() -- <I>italics?</I>)�execr% r% r% r& rb ^ r� ztest.<locals>.fc S s
| � d S r+ r% )rb r% r% r& �g` s
ztest.<locals>.gz9<H3>What follows is a test, not an actual exception:</H3>z*<H1>Second try with a small maxlen...</H1>�2 ) �printr9 �stdout�stderrr r r r r r r r? )rF �formrb r� r% r% r& r
M s6
r
c C sx | d u r t �� \} }}dd l}t� td� |�||�|�| |� }tdt�d�|d d� ��t�|d �f � ~d S )Nr z+<H3>Traceback (most recent call last):</H3>z<PRE>%s<B>%s</B></PRE>r re ) r9 �exc_info� tracebackr� � format_tb�format_exception_only�html�escape�join)r{ ro �tbr� r� rz r% r% r& r t s
� �r c C s^ t | �� �}t� td� td� |D ]}tdt�|�dt�| | �� qtd� t� d S )Nz<H3>Shell Environment:</H3>�<DL>�<DT>�<DD>�</DL>)�sortedr� r� r� r� )rF r� rk r% r% r& r � s
r c C s� t | �� �}t� td� |std� td� |D ]-}tdt�|� d dd� | | }tdt�tt|��� d � td
t�t|�� � qtd � t� d S ) Nz<H3>Form Contents:</H3>z<P>No form fields.r� r� �:� )ra z<i>z</i>r� r� )r� r� r� r� r� �reprr{ )r� r� rk ro r% r% r& r � s
r c
C sn t � t d� zt�� } W n ty* } zt dt�t|��� W Y d }~n d }~ww t t�| �� t � d S )Nz#<H3>Current Working Directory:</H3>zOSError:)r� r� �getcwdr r� r� �str)�pwd�msgr% r% r& r � s ��
r c C s( t � t d� t � t tj� t � d S )Nz <H3>Command Line Arguments:</H3>)r� r9 rC r% r% r% r& r � s
r c C s t d� d S )Na�
<H3>These environment variables could have been set:</H3>
<UL>
<LI>AUTH_TYPE
<LI>CONTENT_LENGTH
<LI>CONTENT_TYPE
<LI>DATE_GMT
<LI>DATE_LOCAL
<LI>DOCUMENT_NAME
<LI>DOCUMENT_ROOT
<LI>DOCUMENT_URI
<LI>GATEWAY_INTERFACE
<LI>LAST_MODIFIED
<LI>PATH
<LI>PATH_INFO
<LI>PATH_TRANSLATED
<LI>QUERY_STRING
<LI>REMOTE_ADDR
<LI>REMOTE_HOST
<LI>REMOTE_IDENT
<LI>REMOTE_USER
<LI>REQUEST_METHOD
<LI>SCRIPT_NAME
<LI>SERVER_NAME
<LI>SERVER_PORT
<LI>SERVER_PROTOCOL
<LI>SERVER_ROOT
<LI>SERVER_SOFTWARE
</UL>
In addition, HTTP headers sent by the server may be passed in the
environment as well. Here are some common variable names:
<UL>
<LI>HTTP_ACCEPT
<LI>HTTP_CONNECTION
<LI>HTTP_HOST
<LI>HTTP_PRAGMA
<LI>HTTP_REFERER
<LI>HTTP_USER_AGENT
</UL>
)r� r% r% r% r& r � r� r c C s( dd l }t| t�r d}nd}|�|| �S )Nr s ^[ -~]{0,200}[!-~]$z^[ -~]{0,200}[!-~]$)�rer< r� �match)r` r Z _vb_patternr% r% r& r� � s
r� �__main__)rL rM r. )NNNN),� __version__�ior r r Zcollections.abcr r9 r� Z urllib.parserD Z email.parserr Z
email.messager r� r r� r �__all__r r r' r# r! r- r" r? rF r
r rc r r r r
r r r r r r r� rv r% r% r% r& �<module> sZ %
�
F :
' /
�