64 строки
1.1 KiB
Plaintext
64 строки
1.1 KiB
Plaintext
<testcase>
|
|
<info>
|
|
<keywords>
|
|
POP3
|
|
SASL
|
|
SASL AUTH OAUTH2
|
|
RFC1734
|
|
RFC5034
|
|
RFC6749
|
|
RFC7628
|
|
</keywords>
|
|
</info>
|
|
|
|
#
|
|
# Server-side
|
|
<reply>
|
|
<servercmd>
|
|
AUTH OAUTHBEARER
|
|
REPLY AUTH +
|
|
REPLY dXNlcj11c2VyAWhvc3Q9MTI3LjAuMC4xAXBvcnQ9OTAwMQFhdXRoPUJlYXJlciBtRl85LkI1Zi00LjFKcU0BAQ== +OK Login successful
|
|
</servercmd>
|
|
<data>
|
|
From: me@somewhere
|
|
To: fake@nowhere
|
|
|
|
body
|
|
|
|
--
|
|
yours sincerely
|
|
</data>
|
|
</reply>
|
|
|
|
#
|
|
# Client-side
|
|
<client>
|
|
<server>
|
|
pop3
|
|
</server>
|
|
<name>
|
|
POP3 OAuth 2.0 (OAUTHBEARER) authentication
|
|
</name>
|
|
<command>
|
|
pop3://%HOSTIP:%POP3PORT/887 -u user --oauth2-bearer mF_9.B5f-4.1JqM
|
|
</command>
|
|
# The protocol section doesn't support ways of specifying the raw data in the
|
|
# base64 encoded message so we must assert this
|
|
<precheck>
|
|
perl -e "print 'Test requires default test server host and port' if ( '%HOSTIP' ne '127.0.0.1' || '%POP3PORT' ne '9001' );"
|
|
</precheck>
|
|
</client>
|
|
|
|
#
|
|
# Verify data after the test has been "shot"
|
|
<verify>
|
|
<protocol>
|
|
CAPA
|
|
AUTH OAUTHBEARER
|
|
dXNlcj11c2VyAWhvc3Q9MTI3LjAuMC4xAXBvcnQ9OTAwMQFhdXRoPUJlYXJlciBtRl85LkI1Zi00LjFKcU0BAQ==
|
|
RETR 887
|
|
QUIT
|
|
</protocol>
|
|
</verify>
|
|
</testcase>
|