*jF S r / SQrSSKrSrSrSr/ SQr/ SQrSSSSS S
S S S S S
S SS
S.rS r S r
S r S r S r
" S S5 r " S S\5 rg)zcEmail address parsing code.
Lifted directly from rfc822.py. This should eventually be rewritten.
) mktime_tz parsedate parsedate_tzquote N z, )janfebmaraprmayjunjulaugsepoctnovdecjanuaryfebruarymarchaprilr
junejulyaugust septemberoctobernovemberdecember)montuewedthufrisatsunipii iiDi)UTUTCGMTZASTADTESTEDTCSTCDTMSTMDTPSTPDTc T [ U 5 nU( d gUS c SUS' [ U5 $ )zIConvert a date string to a time tuple.
Accounts for military timezones.
N r )
_parsedate_tztuple)dataress 7/opt/alt/python313/lib64/python3.13/email/_parseaddr.pyr r - s0
C
1v~A : c
U ( d gU R 5 n U ( d gU S R S5 ( d U S R 5 [ ; a U S O(U S R S5 nUS: a U S US- S U S' [ U 5 S:X a* U S R S5 n[ U5 S:X a X SS - n [ U 5 S:X aQ U S nUR
S5 nUS :X a UR
S5 nUS: a
USU X1S /U SS& OU R S
5 [ U 5 S : a gU SS n U u pEpgnU( a U( a U( d gUR 5 nU[ ; a XTR 5 pTU[ ; a g[ R U5 S- nUS : a US - nUS S:X a USS nUR
S
5 nUS: a XvpvUS S:X a
USS nU( d gUS R 5 ( d XpUS S:X a USS nUR S
5 n[ U5 S:X a Uu pSn On[ U5 S:X a Uu pn OY[ U5 S:X aI SUS ; a@ US R S5 n[ U5 S:X a Uu pSn O[ U5 S:X a Uu pn Ogg [ U5 n[ U5 n[ U 5 n [ U
5 n
[ U 5 n US: a US: a US-
nOUS-
nSn UR 5 nU[ ; a
[ U n O* [ U5 n U S:X a UR S5 ( a Sn U ( a! U S: a S n
U * n OSn
XS- S- U S- S- - - n XeXIXSSS U /
$ ! [ a gf = f! [ a Nkf = f)ao Convert date to extended time tuple.
The last (additional) element is the time zone offset in seconds, except if
the timezone was specified as -0000. In that case the last element is
None. This indicates a UTC timestamp that explicitly disclaims knowledge of
the source timezone, as opposed to a +0000 timestamp that indicates the
source timezone really was UTC.
Nr , - +r : 0.d D il i i < )splitendswithlower _daynamesrfindlenfindappend _monthnamesindexisdigitint
ValueErrorupper
_timezones
startswith)r9 istuffsddmmyytmtzthhtmmtsstzoffsettzsigns r; r7 r7 9 s :: 2wH Q;2==--H a<F yHF}d 2hnb5H HI BSq!R ::G , s$ 7M- M= -
M:9M:=
N
N
c P [ U 5 n[ U[ 5 ( a USS $ U$ )z&Convert a time string to a time tuple.Nr6 )r
isinstancer8 )r9 ts r; r r s) TA!U!u r< c ~ U S c [ R " U SS S- 5 $ SSKnUR U 5 nX S -
$ )zETurn a 10-tuple as returned by parsedate_tz() into a POSIX timestamp.r6 N )rD r )timemktimecalendartimegm)r9 rr rm s r; r r sD Aw{{48e+,, OOD !7{r< c F U R SS5 R SS5 $ )zPrepare string to be used in a quoted string.
Turns backslash and double quote characters into quoted pairs. These
are the only characters that need to be quoted inside a quoted string.
Does not add the surrounding double quotes.
\z\\"z\")replace)strs r; r r s" ;;tV $ , ,S% 88r< c n \ rS rSrSrS rS rS rS rS r S r
S r SS
jr S r
S rS
rSS jrS rSrg)
AddrlistClass zAddress parser class by Ben Escoto.
To understand what this class does, it helps to have a copy of RFC 2822 in
front of you.
Note: this class interface is deprecated and may be removed in the future.
Use email.utils.AddressList instead.
c * SU l SU l SU l SU l U R U R - U l U R U R - U R - U l U R
R
SS5 U l Xl / U l g)zkInitialize a new instance.
`field' is an unparsed address header field, containing
one or more addresses.
z ()<>@,:;."[]r z z
rJ r N)
specialsposLWSCRFWSatomendsrw
phraseendsfield commentlistselfr s r; __init__AddrlistClass.__init__ sx (
88dgg%
0477:
--//R8
r< c Z / nU R [ U R 5 : a U R U R U R S- ; a[ U R U R S; a( UR U R U R 5 U =R S-
sl OHU R U R S:X a* U R
R U R
5 5 OO%U R [ U R 5 : a M [ R U5 $ )z&Skip white space and extract comments.z
r? () r~ rS r r rU r
getcomment EMPTYSTRINGjoin)r wslists r; gotonextAddrlistClass.gotonext s hhTZZ (zz$((#txx&'88::dhh'v5MM$**TXX"67A
DHH%, ''(9: hhTZZ ( ''r< c / nU R [ U R 5 : aR U R 5 nU( a X-
nOUR S5 U R [ U R 5 : a MR U$ )zFParse all addresses.
Returns a list containing all of the addresses.
)r r )r~ rS r
getaddressrU )r resultads r; getaddrlistAddrlistClass.getaddrlist s\
hhTZZ ( "B
h' hhTZZ (
r< c / U l U R 5 U R nU R nU R 5 nU R 5 / nU R [ U R
5 : a. U( a% [ R U R 5 US 4/nGOPU R
U R S; a@ Xl X l U R 5 n[ R U R 5 U4/nGOU R
U R S:X a / n[ U R
5 nU =R S-
sl U R [ U R
5 : a U R 5 U R U: a4 U R
U R S:X a U =R S-
sl GO3X@R 5 - nU R [ U R
5 : a M OU R
U R S:X au U R 5 nU R ( a; [ R U5 S- SR U R 5 - S - U4/nO[ R U5 U4/nOiU( a& [ R U R 5 US 4/nO ) r r r~
getphraselistrS r SPACEr getaddrspecr getrouteaddrr} )r oldposoldclplist
returnlistaddrspecfieldlen routeaddrs r; r AddrlistClass.getaddress s
""$
88s4:: & $zz$*:*: ;U1X F G
ZZ
!T
) H $ '')H ::d&6&67BCJ
ZZ
!S
(J4::H HHMH((S_,
88h&4::dhh+?3+FHHMH '//*; ;
((S_, ZZ
!S
( ))+I $zz% 04 7 "xx(8(8 9 :#*E HHMHr< c U R U R S:w a gSnU =R S-
sl U R 5 SnU R [ U R 5 : Ga U( a U R 5 SnOU R U R S:X a U =R S-
sl U$ U R U R S:X a U =R S-
sl SnO[U R U R S :X a U =R S-
sl O(U R 5 nU =R S-
sl U$ U R 5 U R [ U R 5 : a GM U$ )
zqParse a route address (Return-path value).
This method just skips all the route stuff and returns the addrspec.
r NFr? r >@TrG )r r~ r rS getdomainr )r expectrouteadlists r; r AddrlistClass.getrouteaddrM s&
::dhh 3 & A
hhTZZ ( # DHH%,A
DHH%,A
" DHH%,A
))+A
MMO! hhTZZ ($
r< c / nU R 5 U R [ U R 5 : Ga SnU R U R S:X aX U( a( US R 5 ( d UR 5 UR
S5 U =R S-
sl SnOU R U R S:X a, UR
S[ U R 5 5 - 5 OvU R U R U R ; a0 U( a( US R 5 ( d UR 5 OtUR
U R 5 5 U R 5 nU( a U( a UR
U5 U R [ U R 5 : a GM U R [ U R 5 : d U R U R S:w a [ R U5 $ UR
S5 U =R S-
sl U R 5 U R 5 nU( d [ $ [ R U5 U- $ ) z Parse an RFC 2822 addr-spec.TrJ rD r? Frv z"%s"r )r r~ rS r strippoprU r getquoter getatomr r r )r aslist preserve_wswsdomains r; r AddrlistClass.getaddrspecm s
hhTZZ ( Kzz$((#s*&*"2"2"4"4JJL
c"A
# DHH%,
fuT]]_'= =>DHH% 6&*"2"2"4"4JJL
dlln- Br
b!% hhTZZ (( 88s4:: &$**TXX*>#*E ##F+ +
c A
! '&00r< c / nU R [ U R 5 : Ga U R U R U R ; a U =R S-
sl GO2U R U R S:X a* U R R U R
5 5 OU R U R S:X a UR U R 5 5 OU R U R S:X a' U =R S-
sl UR S5 OjU R U R S:X a [ $ U R U R U R ; a OEUR U R 5 5 U R [ U R 5 : a GM [ R U5 $ )z-Get the complete domain name from an address.r? r [rJ r ) r~ rS r r r rU r getdomainliteralr r r r )r sdlists r; r AddrlistClass.getdomain s= hhTZZ (zz$((#txx/A
DHH%, ''(9:DHH%,
d 3 3 56DHH%,A
c"DHH%, #"DHH% 6
dlln-# hhTZZ ($ ''r< c > U R U R U:w a gS/nSnU =R S-
sl U R [ U R 5 : Ga- U( a+ UR U R U R 5 SnOU R U R U; a U =R S-
sl OU( a> U R U R S:X a! UR U R 5 5 M U R U R S:X a SnO(UR U R U R 5 U =R S-
sl U R [ U R 5 : a GM- [
R
U5 $ )a Parse a header fragment delimited by special characters.
`beginchar' is the start character for the fragment.
If self is not looking at an instance of `beginchar' then
getdelimited returns the empty string.
`endchars' is a sequence of allowable end-delimiting characters.
Parsing stops when one of these is encountered.
If `allowcomments' is non-zero, embedded RFC 2822 comments are allowed
within the parsed fragment.
r Fr? r ru T)r r~ rS rU r r r )r begincharendchars
allowcommentsslistr s r; getdelimitedAddrlistClass.getdelimited s% ::dhh 9 , A
hhTZZ ( TZZ 12 DHH%1A
4::dhh#73#> T__ ./DHH%- TZZ 12 HHMH hhTZZ ( &&r< c ( U R SSS5 $ )z1Get a quote-delimited fragment from self's field.rv z"
Fr r s r; r AddrlistClass.getquote s eU33r< c ( U R SSS5 $ )z7Get a parenthesis-delimited fragment from self's field.r z)
Tr r s r; r AddrlistClass.getcomment s eT22r< c . SU R SSS5 - $ )z!Parse an RFC 2822 domain-literal.z[%s]r z]
Fr r s r; r AddrlistClass.getdomainliteral s ))#ue<<r s
I
> AQA$$$$$
{;|
9m m^ -'- -'r<