a
}|g.X @ s, d Z ddlZddlZddlZddlZddlZddlZddlmZ ddlm Z ddlm
Z
ddlm Z ddlm Z ddlm
Z
dd lmZ dd
lmZ dd lmZ dd lmZ dd
lmZ ddlZddlmZ ddlmZ ddlZddlm Z ddlm Z e e Z edddZ!G dd dej"Z#G dd dej"Z$G dd de#Z%G dd de#Z&G d d d e$Z'G d d d e&ej(d Z)e$j*G d!d" d"e'Z+e#j*G d#d$ d$e)Z,e$j*G d%d& d&e'Z-e#j*G d'd( d(e)Z.e$j*G d)d* d*e'Z/e#j*G d+d, d,e)Z0e#j*G d-d. d.e&Z1e$j*G d/d0 d0e$Z2dS )1z&ACME Identifier Validation Challenges. N)Any)cast)Dict)Mapping)Optional)Tuple)Type)TypeVar)Union)x509)hashes)crypto)SSL) crypto_util)errorsGenericChallenge Challenge)boundc s\ e Zd ZU dZi Zeeed f ed< e ee
e ee f e
e
df d fdd Z ZS )r zACME challenge.TYPESUnrecognizedChallenge)clsjobjreturnc
sT zt tt |W S tjyN } z t| t|W Y d }~S d }~0 0 d S N) r r super from_jsonjoseZUnrecognizedTypeErrorloggerdebugr )r r error __class__ 3/usr/lib/python3.9/site-packages/acme/challenges.pyr & s
zChallenge.from_json)__name__
__module__ __qualname____doc__r r strr __annotations__ classmethodr r r r
r
__classcell__r" r" r r# r ! s
c sH e Zd ZU dZi Zeeed f ed< eee f d fdd Z
Z S )ChallengeResponsezACME challenge response.r r c s t }|| jd |S r )r to_partial_jsonpopZtype_field_nameselfr r r" r# r. 5 s
z!ChallengeResponse.to_partial_json) r$ r% r& r' r r r( r r) r r. r+ r" r" r r# r, 0 s
r, c st e Zd ZU dZeeef ed< eeef dd fdd Z eeef ddd Z
e eeef d dd
d Z Z
S ) r al Unrecognized challenge.
ACME specification defines a generic framework for challenges and
defines some standard challenges that are implemented in this
module. However, other implementations (including peers) might
define additional challenge types, which should be ignored if
unrecognized.
:ivar jobj: Original JSON decoded object.
r N)r r c s t t| d| d S )Nr )r __init__object __setattr__r0 r r" r# r2 K s
z UnrecognizedChallenge.__init__r- c C s | j S r )r r1 r" r" r# r. O s z%UnrecognizedChallenge.to_partial_jsonc C s | |S r r" )r r r" r" r# r R s z UnrecognizedChallenge.from_json)r$ r% r& r' r r( r r) r r2 r. r* r r+ r" r" r r# r = s
r c @ sP e Zd ZU dZdZejdejej ej
edddZ e e
d< eeddd Zd
S ) _TokenChallengez3Challenge with token.
:ivar bytes token:
tokenT)sizeZminimum)encoderdecoderr- c C s d| j vod| j vS )zIs `token` good?
.. todo:: acme-spec wants "It MUST NOT contain any non-ASCII
characters", but it should also warrant that it doesn't
contain ".." or "/"...
s .. /)r8 r5 r" r" r#
good_tokenf s z_TokenChallenge.good_tokenN)r$ r% r& r' Z
TOKEN_SIZEr fieldZencode_b64jose functoolspartialZdecode_b64joser8 bytesr) propertyboolr= r" r" r" r# r6 W s
r6 c s\ e Zd ZU dZedZeed< e j
Z dej e
dddZeeef d fd d
Z ZS ) !KeyAuthorizationChallengeResponsez[Response to Challenges based on Key Authorization.
:param str key_authorization:
keyAuthorizationkey_authorizationKeyAuthorizationChallengechallaccount_public_keyr c C s | j d}t|dkr*td| j dS |d |dkrXtd|d |d dS t|j| j d
}|d |krtd
|d | dS d S ) a% Verify the key authorization.
:param KeyAuthorization chall: Challenge that corresponds to
this response.
:param JWK account_public_key:
:return: ``True`` iff verification of the key authorization was
successful.
:rtype: bool
. z)Key authorization (%r) is not well formedFr r8 z8Mismatching token in key authorization: %r instead of %rZ
hash_function z=Mismatching thumbprint in key authorization: %r instead of %rT) rF splitlenr r encoder b64encode
thumbprintthumbprint_hash_functiondecode)r1 rI rJ partsrS r" r" r# verify~ s( z(KeyAuthorizationChallengeResponse.verifyr- c s t }|dd |S )NrE )r r. r/ r0 r r" r# r. s
z1KeyAuthorizationChallengeResponse.to_partial_json)r$ r% r& r' r r> rF r( r) r SHA256rT JWKrC rW r r r. r+ r" r" r r# rD u s
rD c @ s e Zd ZU dZeZeed< eZe e
ed< e
j Z e j
edddZe j
e
dddZeje j
eed d
d Ze j
eeee
ef d d
dZdS )rG zChallenge based on Key Authorization.
:param response_cls: Subclass of `KeyAuthorizationChallengeResponse`
that will be used to generate ``response``.
:param str typ: type of the challenge
typ response_cls) account_keyr c C s& | dd t|j| jd S )zZGenerate Key Authorization.
:param JWK account_key:
:rtype str:
r8 rK rM )rQ r rR rS rT rU r1 r\ r" r" r# rF s
z+KeyAuthorizationChallenge.key_authorizationc C s | j | |dS )zGenerate response to the challenge.
:param JWK account_key:
:returns: Response (initialized `response_cls`) to the challenge.
:rtype: KeyAuthorizationChallengeResponse
rF )r[ rF r] r" r" r# response s z"KeyAuthorizationChallenge.responser\ kwargsr c K s
t dS )a Generate validation for the challenge.
Subclasses must implement this method, but they are likely to
return completely different data structures, depending on what's
necessary to complete the challenge. Interpretation of that
return value must be known to the caller.
:param JWK account_key:
:returns: Challenge-specific validation.
N)NotImplementedErrorr1 r\ ra r" r" r#
validation s
z$KeyAuthorizationChallenge.validation)r\ argsra r c O s" | || j|g|R i |fS )zGenerate response and validation.
Convenience function that return results of `response` and
`validation`.
:param JWK account_key:
:rtype: tuple
)r_ rd )r1 r\ re ra r" r" r# response_and_validation s z1KeyAuthorizationChallenge.response_and_validationN)r$ r% r& r' NotImplementedrZ r( r) r[ r rD rT r rY rF r_ abcabstractmethodr rd r rf r" r" r" r# rG s
rG ) metaclassc @ s* e Zd ZdZdZdeejedddZ dS )
DNS01Responsez ACME dns-01 challenge response.zdns-01DNS01)rI domainrJ r c C s | ||}|std |S )a Simple verify.
This method no longer checks DNS records and is a simple wrapper
around `KeyAuthorizationChallengeResponse.verify`.
:param challenges.DNS01 chall: Corresponding challenge.
:param str domain: Domain name being verified.
:param JWK account_public_key: Public key for the key pair
being authorized.
:return: ``True`` iff verification of the key authorization was
successful.
:rtype: bool
4Verification of key authorization in response failed)rW r r )r1 rI rm rJ Zverifiedr" r" r#
simple_verify s
zDNS01Response.simple_verifyN)
r$ r% r& r' rZ r( r rY rC ro r" r" r" r# rk s rk c @ sB e Zd ZdZeZejZdZej e
e dddZ e e dddZ
d S )
rl zACME dns-01 challenge._acme-challenger\
unused_kwargsr c K s$ t t| |d S )SGenerate validation.
:param JWK account_key:
:rtype: str
utf-8)r rR hashlibsha256rF rQ digestrU r1 r\ rr r" r" r# rd s
zDNS01.validationnamer c C s | j d| S )z{Domain name for TXT validation record.
:param str name: Domain name being validated.
:rtype: str
rK )LABELr1 rz r" r" r# validation_domain_name s z DNS01.validation_domain_nameN)r$ r% r& r' rk r[ rZ r{ r rY r r( rd r} r" r" r" r# rl s
rl c @ s< e Zd ZdZdZdZdZd deej e
e e e dd d
Z
dS ) HTTP01Responsez ACME http-01 challenge response.zhttp-01P z
N HTTP01)rI rm rJ porttimeoutr c
C s | ||std dS |durF|| jkrFtd| |d|7 }||}td|j| ztj |d|d}W n8 tj
j y } z t d|| W Y d}~dS d}~0 0 d |_
td
||j|j |j| j} | j| k rtd | j| dS d S )
a Simple verify.
:param challenges.SimpleHTTP chall: Corresponding challenge.
:param str domain: Domain name being verified.
:param JWK account_public_key: Public key for the key pair
being authorized.
:param int port: Port used in the validation.
:param int timeout: Timeout in seconds.
:returns: ``True`` iff validation with the files currently served by the
HTTP server is successful.
:rtype: bool
rn FNz4Using non-standard port for http-01 verification: %sz:{0}zVerifying %s at %s...)rW r zUnable to reach %s: %sasciiz Received %s: %s. Headers: %szEKey authorization from response (%r) doesn't match HTTP response (%r)T)rW r r PORTZwarningformaturirZ requestsget
exceptionsZRequestExceptionr encodingtextZheadersrstripWHITESPACE_CUTSETrF )
r1 rI rm rJ r r r Z
http_responser Zchallenge_responser" r" r# ro 0 s6
z HTTP01Response.simple_verify)Nr )r$ r% r& r' rZ r r r( r rY r intrC ro r" r" r" r# r~ s
r~ c @ sT e Zd ZdZeZejZdZee dddZ
e e dddZ e j
ee d d
d Zd S )
r zACME http-01 challenge.z.well-known/acme-challenger- c C s d| j d | d S )zQPath (starting with '/') for provisioned resource.
:rtype: str
/r8 )
URI_ROOT_PATHrQ r5 r" r" r# pathr s z HTTP01.path)rm r c C s d| | j S )zCreate an URI to the provisioned resource.
Forms an URI to the HTTPS server provisioned resource
(containing :attr:`~SimpleHTTP.token`).
:param str domain: Domain name being verified.
:rtype: str
zhttp://)r )r1 rm r" r" r# r { s
z
HTTP01.urirq c K s
| |S )rs r^ rx r" r" r# rd s zHTTP01.validationN)r$ r% r& r' r~ r[ rZ r rB r( r r r rY r rd r" r" r" r# r i s r c @ s e Zd ZdZdZdZdZdZee dddZ
de e e
j eee
je
jf d d d
Zde e e e e e
jdddZe eeje
jf edddZdde eje e
j e e e e edddZd S )TLSALPN01Responsez$ACME tls-alpn-01 challenge response.z tls-alpn-01i s 1.3.6.1.5.5.7.1.30.1s
acme-tls/1r- c C s t | jd S )z*Hash value stored in challenge certificatert )ru rv rF rQ rw r5 r" r" r# h s zTLSALPN01Response.hN )rm keybitsr c C s\ |du r t }|t j| dt| jd }t j| jd|d}t j
||gd|gd|fS )a Generate tls-alpn-01 certificate.
:param str domain: Domain verified by the challenge.
:param OpenSSL.crypto.PKey key: Optional private key used in
certificate generation. If not provided (``None``), then
fresh key will be generated.
:param int bits: Number of bits for newly generated key.
:rtype: `tuple` of `OpenSSL.crypto.X509` and `OpenSSL.crypto.PKey`
Ns DER:hexT)Zcriticalvalue)Z force_san
extensions) r
PKeyZ generate_keyZTYPE_RSAcodecsrQ r Z
X509ExtensionID_PE_ACME_IDENTIFIER_V1r Z gen_ss_cert)r1 rm r r Z der_valueZacme_extensionr" r" r# gen_cert s
zTLSALPN01Response.gen_cert)rm hostr r c C sL |du r t |}td|| |du r.| j}tj| || | jgdS )zProbe tls-alpn-01 challenge certificate.
:param str domain: domain being validated, required.
:param str host: IP address used to probe the certificate.
:param int port: Port used to probe the certificate.
Nz%s resolved to %s)r r rz Zalpn_protocols) socketZ
gethostbynamer r r r Z probe_snirQ ACME_TLS_1_PROTOCOL)r1 rm r r r" r" r#
probe_cert s
z TLSALPN01Response.probe_cert)rm certr c C s t |tjs| }t|j|j}t d|
t | t
|dks\|d | kr`dS z |jt| j }W n tjy Y dS 0 t |jtjsJ |jj| jkS )a@ Verify tls-alpn-01 challenge certificate.
:param str domain: Domain name being validated.
:param cert: Challenge certificate.
:type cert: `cryptography.x509.Certificate` or `OpenSSL.crypto.X509`
:returns: Whether the certificate was successfully verified.
:rtype: bool
zCertificate %s. SANs: %srN r F)
isinstancer CertificateZto_cryptographyr Z%get_names_from_subject_and_extensionsZsubjectr r r Z fingerprintr rX rP lowerZget_extension_for_oidZObjectIdentifierr rU ZExtensionNotFoundr ZUnrecognizedExtensionr )r1 rm r namesextr" r" r# verify_cert s$ z TLSALPN01Response.verify_cert TLSALPN01)rI rm rJ r r r r c
C s~ | ||std dS |du rrz| j|||d}W n: tjyp } z tjt|dd W Y d}~dS d}~0 0 | ||S )a Simple verify.
Verify ``validation`` using ``account_public_key``, optionally
probe tls-alpn-01 certificate and check using `verify_cert`.
:param .challenges.TLSALPN01 chall: Corresponding challenge.
:param str domain: Domain name being validated.
:param JWK account_public_key:
:param OpenSSL.crypto.X509 cert: Optional certificate. If not
provided (``None``) certificate will be retrieved using
`probe_cert`.
:param string host: IP address used to probe the certificate.
:param int port: Port used to probe the certificate.
:returns: ``True`` if and only if client's control of the domain has been verified.
:rtype: bool
rn FN)rm r r T)exc_info)rW r r r r Errorr( r )r1 rI rm rJ r r r r r" r" r# ro s
z TLSALPN01Response.simple_verify)Nr )NN)NNN) r$ r% r& r' rZ r r r rB rA r r( r r
r r r X509r r r
r r rC r r rY ro r" r" r" r# r s,
$
r c @ sL e Zd ZdZeZejZeje e
e j e j
f dddZeedddZdS ) r zACME tls-alpn-01 challenge.r` c K s, t t| |j|dt t|ddS )a Generate validation.
:param JWK account_key:
:param str domain: Domain verified by the challenge.
:param OpenSSL.crypto.PKey cert_key: Optional private key used
in certificate generation. If not provided (``None``), then
fresh key will be generated.
:rtype: `tuple` of `OpenSSL.crypto.X509` and `OpenSSL.crypto.PKey`
Zcert_keyrm )r rm )r r r_ r r r( rc r" r" r# rd s
zTLSALPN01.validationr- c C s t tjdot tjdS )ai
Check if TLS-ALPN-01 challenge is supported on this machine.
This implies that a recent version of OpenSSL is installed (>= 1.0.2),
or a recent cryptography version shipped with the OpenSSL library is installed.
:returns: ``True`` if TLS-ALPN-01 is supported on this machine, ``False`` otherwise.
:rtype: bool
Zset_alpn_protosZset_alpn_select_callback)hasattrr Z
ConnectionZContextr" r" r" r# is_supported. s
zTLSALPN01.is_supportedN)r$ r% r& r' r r[ rZ r rY r r r
r r rd staticmethodrC r r" r" r" r# r s r c @ sr e Zd ZdZdZdZejfejej e
ej dddZ ej eje
ddd Zeje
d
d d d
ZeedddZdS )DNSzACME "dns" challenge.dnsrp )r\ algra r c K s( t jjf | jddd||d|S )zGenerate validation.
:param .JWK account_key: Private account key.
:param .JWA alg:
:returns: This challenge wrapped in `.JWS`
:rtype: .JWS
T)Z sort_keysrt )payloadr r )r JWSsignZ
json_dumpsrQ )r1 r\ r ra r" r" r# gen_validationE s zDNS.gen_validation)rd rJ r c
C sb |j |dsdS z| | |jdkW S tjy\ } ztd| W Y d}~dS d}~0 0 dS )zwCheck validation.
:param JWS validation:
:param JWK account_public_key:
:rtype: bool
)r Frt z&Checking validation for DNS failed: %sN)rW Z
json_loadsr rU r ZDeserializationErrorr r )r1 rd rJ r r" r" r# check_validationT s
zDNS.check_validation DNSResponser` c K s t | j|fi |dS )zGenerate response.
:param .JWK account_key: Private account key.
:param .JWA alg:
:rtype: DNSResponse
)rd )r r rc r" r" r# gen_responsee s zDNS.gen_responsery c C s d | j|S )zgDomain name for TXT validation record.
:param str name: Domain name being validated.
z{0}.{1})r r{ r| r" r" r# r} p s zDNS.validation_domain_nameN)r$ r% r& r' rZ r{ r ZRS256rY Z JWASignaturer r r rC r r r( r} r" r" r" r# r = s r c @ sF e Zd ZU dZdZejdejjdZ eje
d< dej e dddZ
d S )
r z@ACME "dns" challenge response.
:param JWS validation:
r rd )r; r rH c C s | | j|S )z~Check validation.
:param challenges.DNS chall:
:param JWK account_public_key:
:rtype: bool
)r rd )r1 rI rJ r" r" r# r s z DNSResponse.check_validationN)r$ r% r& r' rZ r r> r r rd r) rY rC r r" r" r" r# r y s
r )3r' rh r r? ru Zloggingr typingr r r r r r r r r
Z cryptographyr Z cryptography.hazmat.primitivesr Zjosepyr ZOpenSSLr
r r Zacmer r Z getLoggerr$ r r ZTypedJSONObjectWithFieldsr r, r r6 rD ABCMetarG registerrk rl r~ r r r r r r" r" r" r# s`
2A H' %;