3
sjŐ @ s d Z ddlmZmZmZ ddlmZ ddlZddlZddl Z
ddl m Z ddl
mZ ddlmZ ddlZddlZddlZdd d
d d d
dddddddddgZdadadd Zdd Zd d Zd d Zeada dej ddd fd!d
Z d5d"d Z d6d#d Z d$d
Z!d%d& Z"d'd Z#G d(d dZ$G d)d d Z%ej fd*dZ&d7d+dZ'ej fd,dZ(d-d Z)d.d Z*d/d Z+d0d Z,d8d1dZ-d2d3 Z.e/d4kre& dS )9z2.6 )StringIOBytesIO
TextIOWrapper)MappingN)
FeedParser)Message)warnMiniFieldStorage FieldStorageparseparse_qs parse_qslparse_multipart parse_headertestprint_exception
print_environ
print_formprint_directoryprint_argumentsprint_environ_usageescape c G sH t r.t r.ytt daW n tk
r, Y nX ts8tantat| d S )Na)logfilelogfpopenOSErrornologlogdolog)allargs r" /usr/lib64/python3.6/cgi.pyinitlog: s
r$ c G s t j| | d d S )N
)r write)Zfmtargsr" r" r# r ] s r c G s d S )Nr" )r! r" r" r# r a s r c C s da trtj d atad S )Nr )r r closer$ r r" r" r" r# closeloge s
r) &c
C sZ | d krt j} t| dr | j}nd}t| tr4| j} d|krDd|d< |d dkrt|d \}}|dkrtt| |S |dkrt |d }t
r|t
krt d
| j |j
|} nd } d |kr| r| d
} | |d } n*t jdd r| r| d
} | t jd } | |d < n<d |kr |d } n(t jdd r8t jd } nd } | |d < tjj| ||||dS )Nencodingzlatin-1REQUEST_METHODGETPOST CONTENT_TYPEzmultipart/form-dataz!application/x-www-form-urlencodedCONTENT_LENGTHz Maximum content length exceededr QUERY_STRINGr* )r+ separator)sysstdinhasattrr+
isinstancer bufferr r intmaxlen
ValueErrorreaddecodeargvurllibr r )
fpenvironkeep_blank_valuesstrict_parsingr3 r+ ctypepdictclengthqsr" r" r# r x sH
c C s t dtd tjj| ||S )Nz=cgi.parse_qs is deprecated, use urllib.parse.parse_qs instead )r DeprecationWarningr? r r )rG rB rC r" r" r# r s c C s t dtd tjj| ||S )Nz?cgi.parse_qsl is deprecated, use urllib.parse.parse_qsl insteadrH )r rI r? r r
)rG rB rC r" r" r# r
s c C s dd l }d}d|kr |d }t|s2td|f d| }d| d }i }d}x||krd}d } |r|jj| }
|
jd} | ry t| }W n tk
r Y nX |dkrtr|tkrtd| j|} nd} g } xD| j }
|
s|}P |
j
dr |
j }|||fkr P | j |
qW | d kr&qR|dk r| r| d }
|
dd d
kr^|
d d }
n |
dd d kr||
d d }
|
| d< dj
| } |
d }
|
sqRt|
\}}|d
krqRd|krR|d }nqR||kr|| j | qR| g||< qRW |S )Nr boundaryz&Invalid boundary in multipart form: %rs --r2 zcontent-lengthz Maximum content length exceededrH s
zcontent-dispositionz form-datanamerN rO rN rN rN )Z http.clientvalid_boundaryr; ZclientZ
parse_headersgetr9 r: r< readline
startswithrstripappendjoinr )r@ rE ZhttprK ZnextpartZlastpartZpartdict
terminatorbytesdataheadersrF lineslinekeyZparamsrM r" r" r# r s|
c c s x| d d dkr| dd } | j d}x<|dkrd| jdd|| jdd| d rd| j d|d }q*W |dk rvt| }| d | }|j V | |d } qW d S )Nr2 ;r "z\"rH )findcountlenstrip)sendfr" r" r# _parseparam1 s
*
rg c C s t d| }|j }i }x|D ]}|jd}|dkr |d | j j }||d d j }t|dkr|d |d
kodkn r|dd }|jddjd d}|||< q W ||fS ) Nr^ =r r2 rH r_ z\\\z\"rN rN )rg __next__r` rc lowerrb replace)r\ partsr] rE pirM valuer" r" r# r = s
, c @ s< e Zd ZdZdZdZdZi ZdZi Z i Z
dd Z dd Z dS )r Nc C s || _ || _d S )N)rM rp )selfrM rp r" r" r# __init__c s zMiniFieldStorage.__init__c C s d| j | jf S )NzMiniFieldStorage(%r, %r))rM rp )rq r" r" r# __repr__i s zMiniFieldStorage.__repr__)
__name__
__module__ __qualname__filenamelisttypefile type_options dispositiondisposition_optionsrZ rr rs r" r" r" r# r U s c @ s e Zd Zdddejdddddddf ddZd d
Zd d Zd
d Zdd Z dd Z
dd Z dd Z d;ddZ
d<ddZdd Zd d Zd d Zd!d" Zd#d$ Zd%d& ZdZd'd( Zd)d* Zd=Zd-d. Zd/d0 Zd1d2 Zd3d4 Z d5d6 Z d7d8 Z d9d: Z dS )>r
NrJ r zutf-8rl r* c C sR d} || _ || _|
| _| | _d|kr0|d j } d | _| dksF| dkrd|krX|d }
n tjdd rrtjd }
nd}
|
jt j
d}
t |
}|d krdd i}|d kri }| d
krd |d< d |kr|d |d< d|kr|d | _d |kr|d |d
< nt |t
tfstd|| _|d kr*tjj| _n<t |tr@|j| _n&t|doTt|ds`td|| _|| _| | _t |tstdt|j || _d| _ || _ di }}d| jkrt | jd \}}|| _ || _ d | _!d|kr|d | _!d | _"d|kr
|d | _"| j"d k | _#d| jkr6t | jd \}}n(| jsH| d
krTdi }}n
d i }}|| _|| _$d|kr|d j| j| _%nd| _%d }d
| jkryt&| jd
}W n t'k
r Y nX t(r|t(krt'd|| _)| j d kr|r|| _ d | _*| _+d| _,|d kr$| j- n*|d d d krF| j.||| n| j/ d S ) Nr- r, ZHEADr1 r2 r surrogateescapez content-typez!application/x-www-form-urlencodedr. r/ r0 zcontent-lengthz?headers must be mapping or an instance of email.message.Messager< rR zfp must be file pointerz#outerboundary must be bytes, not %sr zcontent-dispositionrM rw z
text/plainrK rJ z Maximum content length exceeded
z
multipart/rN )0rB rC max_num_fieldsr3 upper
qs_on_postr4 r> encodelocalegetpreferredencodingr r7 r r TypeErrorrZ r5 r8 r@ r r6 r+ errorsrX ry rt
outerboundary
bytes_readlimitr r| r} rM rw _binary_filer{
innerboundaryr9 r; r: lengthrx rz doneread_urlencoded
read_multi read_single)rq r@ rZ r rA rB rC r r+ r r r3 methodrG ZcdisprE rD Zclenr" r" r# rr s /
zFieldStorage.__init__c C s( y| j j W n tk
r" Y nX d S )N)rz r( AttributeError)rq r" r" r# __del__= s zFieldStorage.__del__c C s | S )Nr" )rq r" r" r# __enter__C s zFieldStorage.__enter__c G s | j j d S )N)rz r( )rq r' r" r" r# __exit__F s zFieldStorage.__exit__c C s d| j | j| jf S )NzFieldStorage(%r, %r, %r))rM rw rp )rq r" r" r# rs I s zFieldStorage.__repr__c C s t | j S )N)iterkeys)rq r" r" r# __iter__N s zFieldStorage.__iter__c C sT |dkrt || jr:| jjd | jj }| jjd n| jd k rL| j}nd }|S )Nrp r )r rz seekr< rx )rq rM rp r" r" r# __getattr__Q s
zFieldStorage.__getattr__c C sb | j d krtdg }x"| j D ]}|j|kr |j| q W |sFt|t|dkrZ|d S |S d S )Nz
not indexabler2 r )rx r rM rU KeyErrorrb )rq r] founditemr" r" r# __getitem__^ s
zFieldStorage.__getitem__c C s8 || kr0| | }t |tr(dd |D S |jS n|S d S )Nc S s g | ]
}|j qS r" )rp ).0xr" r" r#
<listcomp>q s z)FieldStorage.getvalue.<locals>.<listcomp>)r7 rx rp )rq r] defaultrp r" r" r# getvaluel s
zFieldStorage.getvaluec C s4 || kr,| | }t |tr$|d jS |jS n|S d S )Nr )r7 rx rp )rq r] r rp r" r" r# getfirstw s
zFieldStorage.getfirstc C s: || kr2| | }t |tr(dd |D S |jgS ng S d S )Nc S s g | ]
}|j qS r" )rp )r r r" r" r# r s z(FieldStorage.getlist.<locals>.<listcomp>)r7 rx rp )rq r] rp r" r" r# getlist s
zFieldStorage.getlistc C s* | j d krtdt tdd | j D S )Nz
not indexablec s s | ] }|j V qd S )N)rM )r r r" r" r# <genexpr> s z$FieldStorage.keys.<locals>.<genexpr>)rx r set)rq r" r" r# r s
zFieldStorage.keysc s* | j d krtdt fdd| j D S )Nz
not indexablec 3 s | ]}|j kV qd S )N)rM )r r )r] r" r# r s z,FieldStorage.__contains__.<locals>.<genexpr>)rx r any)rq r] r" )r] r# __contains__ s
zFieldStorage.__contains__c C s t | j S )N)rb r )rq r" r" r# __len__ s zFieldStorage.__len__c C s | j d krtdt| j S )Nz Cannot be converted to bool.)rx r bool)rq r" r" r# __bool__ s
zFieldStorage.__bool__c C s | j j| j}t|ts0td| j t|jf |j| j | j
}| j rT|d| j 7 }t j
j|| j| j| j | j
| j| jd}dd |D | _| j d S )Nz %s should return bytes, got %sr* )r+ r r r3 c S s g | ]\}}t ||qS r" )r )r r] rp r" r" r# r s z0FieldStorage.read_urlencoded.<locals>.<listcomp>)r@ r< r r7 rX r; ry rt r= r+ r r r? r r
rB rC r r3 rx
skip_lines)rq rG queryr" r" r# r s
z FieldStorage.read_urlencodedc C s@ | j }t|s td|f g | _| jrftjj| j| j| j | j
| j | j | j
d}| jjdd |D | jpp| j}| jj }t|tstd| jt|jf | jt|7 _x6|j d| j kr|r| jj }| jt|7 _qW | j }|d k r|t| j8 }x*t } d}
x$| jj } |
| 7 }
| j sP qW |
sBP | jt|
7 _| j|
j | j
| j | j } d| kr| d= || j| ||||| j | j | j
| j || j
}
|d k r|d 8 }|
jr|t|
j8 }|d
k rtd | j|
j7 _| jj |
|
j s,| j| j! ko$d
kn r
P q
W | j" d S ) Nz&Invalid boundary in multipart form: %r)r+ r r r3 c s s | ]\}}t ||V qd S )N)r )r r] rp r" r" r# r s z*FieldStorage.read_multi.<locals>.<genexpr>z %s should return bytes, got %ss --rJ zcontent-lengthr2 r z Max number of fields exceeded)#r rP r; rx r r? r r
rB rC r+ r r r3 extendFieldStorageClass __class__r@ rR r7 rX ry rt r rb rc r Zfeedr= r( r rU r r r )rq rA rB rC Zibr klassZ
first_liner parserZhdr_textrY rZ partr" r" r# r sh
(zFieldStorage.read_multic C s4 | j dkr | j | j n| j | jjd d S )Nr )r read_binaryr
read_linesrz r )rq r" r" r# r s
zFieldStorage.read_single i c C s | j | _| j}|dkrxx|dkr| jjt|| j}t|tsXt d| jt
|j f | j t
|7 _ |svd| _P | jj| |t
| }qW d S )Nr z %s should return bytes, got %sr2 rN ) make_filerz r r@ r< minbufsizer7 rX r; ry rt r rb r r& )rq ZtodorY r" r" r# r s
zFieldStorage.read_binaryc C s@ | j rt | _| _nt | _| _| jr4| j n| j d S )N)r r rz _FieldStorage__filer r read_lines_to_outerboundaryread_lines_to_eof)rq r" r" r# r s
zFieldStorage.read_linesc C sv | j d k rF| j j t| dkrF| j | _| j j }| jj| d | _ | jrZ| jj| n| jj|j| j | j
d S )Ni ) r tellrb r rz r r& r r= r+ r )rq r\ rY r" r" r# Z__write s
zFieldStorage.__writec C s> x8| j jd}| jt|7 _|s,d| _P | j| qW d S )Nr2 i rN )r@ rR r rb r _FieldStorage__write)rq r\ r" r" r# r - s z FieldStorage.read_lines_to_eofc C s, d| j }|d }d}d}d}x|| jkr.P | jjd }| jt|7 _|t|7 }|sdd
| _P |dkrx|| }d}|jdr|r|j }||krP ||krd| _P |}|j drd}|d d }d}nJ|j d
rd
}|d d }d}n*|j drd}|d d }d }nd}d }| j
|| q"W d S )Ns --rJ Tr r2 r
s
rH rL Fi rN rO rN rN ) r r r@ rR r rb r rS rT endswithr ) rq
next_boundary
last_boundaryZdelimlast_line_lfendZ_readr\ strippedlineZodelimr" r" r# r 7 sP
z(FieldStorage.read_lines_to_outerboundaryc C s | j s| jrd S d| j }|d }d}xh| jjd}| jt|7 _|sTd| _P |jdr|r|j }||krtP ||krd| _P |jd}q*W d S )Ns --Tr2 r rL i rN )r r r@ rR r rb r rc )rq r r r r\ r r" r" r# r h s&
zFieldStorage.skip_linesc C s& | j rtjdS tjd| jddS d S )Nzwb+zw+r% )r+ newline)r tempfileZ
TemporaryFiler+ )rq r" r" r# r ~ s
zFieldStorage.make_file)N)Ni ) rt ru rv osrA rr r r r rs r r r r r r r r r r r r r r r r r r r r r r r" r" r" r# r
n s> + "
C
1c C s t d t tjt_yNt }t t t| t| t dd }|fdd}t d | W n t
Y nX t d da y&t }t t t| t| W n t
Y nX d S ) NzContent-type: text/htmlc S s t d d S )Nz,testing print_exception() -- <I>italics?</I>)execr" r" r" r# rf s ztest.<locals>.fc S s
| d S )Nr" )rf 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 ) printr4 stdoutstderrr
r r r r r r r: )rA formrf r r" r" r# r s4
c C sx | d krt j \} }}dd l}t td |j|||j| | }tdtjdj|d d tj|d f ~d S )Nr z+<H3>Traceback (most recent call last):</H3>z<PRE>%s<B>%s</B></PRE>r r2 rN rN ) r4 exc_info tracebackr format_tbformat_exception_onlyhtmlr rV )ry rp tbr r rx r" r" r# r s
c C s` t | j }t td td x*|D ]"}tdtj|dtj| | q(W td t d S )Nz<H3>Shell Environment:</H3>z<DL>z<DT>z<DD>z</DL>)sortedr r r r )rA r r] r" r" r# r s
"c C s t | j }t td |s&td td xb|D ]Z}tdtj| d dd | | }tdtjtt| d td
tjt| q4W td t d S ) Nz<H3>Form Contents:</H3>z<P>No form fields.z<DL>z<DT>: )re z<i>z</i>z<DD>z</DL>)r r r r r reprry )r r r] rp r" r" r# r s
c C sj t t d y tj } W n6 tk
rP } zt dtjt| W Y d d }~X nX t tj| t d S )Nz#<H3>Current Working Directory:</H3>zOSError:)r r getcwdr r r str)pwdmsgr" r" r# r s &c C s( t t d t t tj t d S )Nz <H3>Command Line Arguments:</H3>)r r4 r> r" r" r" r# r s
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 s 'c C sF t dtdd | jdd} | jdd} | jdd } |rB| jd
d } | S ) Nz1cgi.escape is deprecated, use html.escape insteadrH )
stacklevelr* z&<z<>z>r_ z")r rI rl )rd Zquoter" r" r# r 2 s
c C s( dd l }t| trd}nd}|j|| S )Nr s ^[ -~]{0,200}[!-~]$z^[ -~]{0,200}[!-~]$)rer7 rX match)rd r Z _vb_patternr" r" r# rP > s
rP __main__)r r )r r )NNNN)N)0 __version__ior r r collectionsr r4 r Z urllib.parser? Z email.parserr Z
email.messager warningsr r r r __all__r r r$ r r r) r r: rA r r r
r rg r r r
r r r r r r r r rP rt r" r" r" r# <module> s` # H
d 6'
/