)WddlZddlZddlZddlZddlZddlZddlZddlZddlZddl Z ddl Z ddl m Z ddl mZmZddlmZmZm Z mZmZddlmZmZmZe j2rddlmZmZmZmZeeeeefsJGdd ej@Z!Gd d ej@Z"d Z#d Z$dZ%dZ&dZ'd!dZ(d!dZ)dZ*dZ+d"dZ,dZ-dZ.dZ/d#dZ0d!dZ1d#dZ2d#dZ3d#dZ4ejjjlZ7dZ8dZ9d Z:y)$N)_)getattropen)encodingerrorpycompatsslutilutil)procutil stringutilurlutil)AnyListTupleUnionc eZdZdZddZddZy)STARTTLSzDerived class to verify the peer certificate for STARTTLS. This class allows to pass any keyword arguments to SSL socket creation. Nc `tjj|fi|||_||_yN)smtplibSMTP__init___ui_host)selfuihostkwargss 2usr/lib/python3.12/site-packages/mercurial/mail.pyrzSTARTTLS.__init__4s' d-f- c~|jdsd}tj||jd\}}|dk(ryt j |j |||j|j|_|j jd|_ d|_ d|_ i|_ d|_||fS)Nstarttlsz*STARTTLS extension not supported by serverrrserverhostnamerbr)has_extnr SMTPExceptiondocmdr wrapsocketsockrrmakefilefile helo_resp ehlo_respesmtp_features does_esmtp)rkeyfilecertfilecontextmsgrespreplys r r#zSTARTTLS.starttls9s}}Z(>C'', , :. u 3;** 88#zz DI **40DI!DN!DN"$D DOe}r!rNNN)__name__ __module__ __qualname____doc__rr#r!r rr.s  r!rceZdZdZddZdZy)SMTPSzDerived class to verify the peer certificate for SMTPS. This class allows to pass any keyword arguments to SSL socket creation. Nc ||_||_tjj|fi|||_tj |_||_yr) r3r4rrrr SMTP_SSL_PORT default_portr)rrr3r4rrs r rzSMTPS.__init__TsC    d-f- #11r!cF|jdkDr!|jjd||ffztj||f|}t j ||j|j|j|j}|jd|_ |S)Nrs connect: %r r%r') debuglevelrdebugsocketcreate_connectionr r+r3r4rr-r.)rrporttimeout new_sockets r _get_socketzSMTPS._get_socket\s ??Q  HHNN+d|o= >--tTlGD ''  LL MMxx::  ''- r!r9)r:r;r<r=rrLr>r!r r@r@Ns  r!r@cF ddl}t|ddy#t$rYywxYw)z9Returns true iff Python has TLS support, false otherwise.rNHAS_TLSFT)sslr ImportError)rOs r _pyhastlsrQks+Y& s   cp |jdd}|jdd}|dk(xstj|}|dk(}|s|r(tst j t d|jdd}|st j t d|r)|jt d t|||  n'|rt|||  ntj|  |rd }nd }tj|jdd|}|jt d||fz j|||rJ|jt d j j! j|s|r9|jt dt#j$ j& t)| || fd} | S#tj*$r-}t j tj,|d}~wwxYw)z;build an smtp connection and return a function to send mailsmtpslocal_hostnamestlssstarttlsssmtpss/can't use TLS: Python SSL support not installedhosts+smtp.host not configured - cannot send mails(using smtps) )local_hostnamer)rUisports$sending mail: smtp host %s, port %d )rrIs(using starttls) s(verifying remote certificate) Nc j|||S#tj$r\}|jj Dcgc]}|d ncc}w}}t j ddj|zd}~wtj$r-}t j tj|d}~wwxYw)Nr ) sendmailrSMTPRecipientsRefused recipientsvaluesrAbortjoinr)r forcebytestr)senderr[r6instrss r sendz_smtp..sends =::fj#6 6,, >(,(>(>(@A(@1!A$(@AJA++eejj&<<= =$$ =++j55d;< < =s,CB A/BC(B>>C)configr parseboolrQrr]rnoter@rrrrgetportconnectehlor#r validatesocketr, _smtp_loginr)r_) rrUtlsr#smtpsmailhost defaultportmailportrardrcs @r _smtprrwsYYw(9:N ))GV $Ck!>Z%9%9#%>H 8OEE9;kk!NOPPyy'*H kk!JKLL  $%& "^( C  RX F LL 7   ryy';GHHGGA6 78X:N NOII8(I+ '()   5 567qvv&9B8X.= K  9kk*11$7889s G55H5(H00H5cb|jdd}|jdd}|r?|rtj|}n'|j}|tj|}|rH|rE|j t d|ztj|}|j ||yyy)azA hook for the keyring extension to perform the actual SMTP login. An already connected SMTP object of the proper type is provided, based on the current configuration. The host and port to which the connection was established are provided for accessibility, since the SMTP object doesn't provide an accessor. ``smtplib.SMTPException`` is raised on error. rSsusernamespasswordNs&(authenticating to mail server as %s) )rer strfromlocalgetpassrgrlogin)rsmtprorqusernamepasswords r rlrlsyy+.Hyy+.H ,,X6Hzz|H##00:H <=HI((2 8X&xr!c |jdd}d}d|||djt||fz}|jt d|zt j |d}|jtj||j}|r`tjdtjjt j |d t j"|fzy ) zsend mail using sendmail.emailmethodcxtjtjt j |Sr)r shellquoter emailr strtolocal)xs r stremailz_sendmail..stremails)"":#3#3H4G4G4J#KLLr!s %s -f %s %s ssending mail: %s wbs%s %srN)rer^maprgrr popenwriter tonativeeolcloserr]ospathbasename shellsplit explainexit) rr`r[r6programrcmdlinefprets r _sendmailrsii),GM #h +, G GGA# $w ./  'BHHT  c "# ((*C kk   !4!4W!=a!@A$$S)    r!cRt|d5}tjdtj}|j dt j |t j |fz|j ||j ddddy#1swYyxYw)zwrite mails to mboxsab+z%a %b %d %H:%M:%S %Ys From %s %s s N)rtimestrftime localtimerrr)mboxr`r[r6rdates r _mboxrs dF r}}3T^^5EF  ""6*H,?,?,EF G       s BBB&crtdjfdSjdddk(r tSfdS)znmake a mail connection. return a function to send mail. call as sendmail(sender, list-of-recipients, msg).rc t|||Sr)r)rcrbmrs r zconnect..suT1a3r!r{r|rSc t|||Sr)r)rcrbrrs r rzconnect..s9RAq1r!)rrrerr)rrs``r ririsD  T5!33 yy9%0Ry 11r!c0t||}||||S)N)r)ri)rr`r[r6rrds r rYrYs 2D !D  C ((r!c@|jdd}|dk(r1|jddstjtdy t j |}|r|dnd}|rt j |s!tjtd|zy ) z=determine if we have enough config data to try sending email.r{r|rSrTs>smtp specified as email transport, but no smtp host configuredrr!s0%r specified as email transport, but not in PATHN)rerr]rr rfindexe)rmethodcommands r validateconfigrs YYx +F yy'*++3 +%%f- ''!*SH,,W5++EFP 6r!ctjj|jj }|j dr|j dsd|ddzS|S) isoziso-N)rcharsetCharset input_charsetlower startswith)css r codec2ianarsU   r " 0 0 6 6 8B }}UBMM&$912 Ir!c4ddtjtjtjtjg}|rdg}|D]+} |j |t ||t |cSt ||dS#t$rYFwxYw)a2Return MIME message suitable for a patch. Charset will be detected by first trying to decode as us-ascii, then utf-8, and finally the global encodings. If all those fail, fall back to ISO-8859-1, an encoding with that allows all byte sequences. Transfer encodings will be used if necessary.us-asciiutf-8z iso-8859-1)r sysstrrfallbackencodingdecode mimetextqprUnicodeDecodeError)rcsubtypedisplayrrs r mimetextpatchrs ))*112  B \  HHW a*W*=> > a, //"   s&B  BBcTtjj|}tjj }|j d|z|j D]1}t|dkDstjj|_ n|j|||S)z[Return MIME message. Quoted-printable transfer encoding will be used if necessary. ztext/i) rrrmessageMessageset_type splitlineslenQP body_encoding set_payload)bodyrrrr6lines r rr4s   w 'B --   !CLL7"#! t9s?$}}//B  "OOD" Jr!c|jddDcgc]%}tj|j'}}tjtj jtjtjjdg}|D]}||vs|j ||Dcgc]}|jdr|c}Scc}wcc}w)z;Obtains charsets to send mail parts not containing patches.r{scharsetsrascii) configlistr rrrrappendendswith)rrcharsets fallbackss r _charsetsrNs --+66B  #6  11779:))//12I  X  OOB " >2W)=B >> ?s*C#C(C(c  |xs t|}t|ts0|D]} |j||fcS|jdddfS |jd|dfS#t$rYOt $r3|j tdtj|zYwxYw#t$rtjtjfD]}tj|} |j|}n#t$rY6wxYw|D]d} |j||fcccYS#t$rY(t $r3|j tdtj|zYbwxYwY|dfSwxYw)aReturns (converted) string, charset tuple. Finds out best charset by cycling through sendcharsets in descending order. Tries both encoding and fallbackencoding for input. Only as last resort send as is in fake ascii. Caveat: Do not use for mail parts containing patches!s!ignoring invalid sendcharset: %s rbackslashreplacer)r isinstancebytesencodeUnicodeEncodeError LookupErrorwarnrr sysbytesrrrrr)rrcr sendcharsetsocsicsus r _encoder`s,y}L a  C xx}c)) 88G%78*D D & j=C&  ;<'',-  %%x'@'@AC//#&C HHSM%  #88C=#--)"GG?@"++C01 $ B" j=%s~A&B/& B,18B,+B,/AF1DF D FDFD1*F1 E7 :F<8E7 4F6E7 7FFc|s>t|||\}}tjj||j St j |S)z4Returns RFC-2047 compliant header from given string.)rrheaderHeaderrrrtrrcrrrs r headencodersJ Ax(2||""1b)0022   ##r!c|tj|}t|||} |jd\}}|j d|j t j tjjd}d||fz}tjj|tj |fS#t$r"tjtd|zt$rD |j dn.#t$r"tjtd|zwxYwYwxYw)N@ridnas%s@%ssinvalid email address: %ssinvalid local address: %s)rrrsplitrr rrrrr]r ValueErrorrutils formataddrrt)rnameaddrraccdoms r _addressencoders   t $D b$ )D F::d#S 7jj):):;<CCFK3*$ ;; ! !4)>)>t)D"E FF Bkk!89D@AA F F KK ! F++a <=DE E F !Fs*A-C2D;8D  D; +D55D;:D;c|s|stj|xsdStjj tj|\}}t ||||S)z-Turns address into RFC-2047 compliant header.r!)rrtrr parseaddrr)raddressrrrrs r addressencodersRg$$W^44&&x'<'r!r r"s      .. T5%( )) )w||@GLL: 1h'. 4 2) (044?$0f$G(4(& OO * *   2r!