Page Menu
Home
Phorge
Search
Configure Global Search
Log In
Files
F117876906
eimap_command_tests.erl
No One
Temporary
Actions
View File
Edit File
Delete File
View Transforms
Subscribe
Flag For Later
Award Token
Authored By
Unknown
Size
2 KB
Referenced Files
None
Subscribers
None
eimap_command_tests.erl
View Options
%% Copyright 2014 Kolab Systems AG (http://www.kolabsys.com)
%%
%% Aaron Seigo (Kolab Systems) <seigo a kolabsys.com>
%%
%% This program is free software: you can redistribute it and/or modify
%% it under the terms of the GNU General Public License as published by
%% the Free Software Foundation, either version 3 of the License, or
%% (at your option) any later version.
%%
%% This program is distributed in the hope that it will be useful,
%% but WITHOUT ANY WARRANTY; without even the implied warranty of
%% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
%% GNU General Public License for more details.
%%
%% You should have received a copy of the GNU General Public License
%% along with this program. If not, see <http://www.gnu.org/licenses/>.
-
module
(
eimap_command_tests
).
-
include_lib
(
"eunit/include/eunit.hrl"
).
-
export
([
process_line
/
2
,
formulate_response
/
2
]).
% c("test/eimap_command_tests.erl"). eunit:test(eimap_command).
process_line
(
Data
,
Acc
)
->
[{
marked
,
Data
}
|
Acc
].
formulate_response
(
Result
,
Data
)
->
eimap_command
:
formulate_response
(
Result
,
lists
:
reverse
(
Data
)).
literal_continuations_test_
()
->
Data
=
[
% input, output
% { Binary Response, Binary Tag, Parsed Results }
{
<<
"* STATUS 1 (MESSAGES 231 {14}
\r\n
UIDNEXT 44292)
\r\n
abcd OK Begin TLS negotiation now
\r\n
"
>>
,
<<
"abcd"
>>
,
{
fini
,
[
{
marked
,
<<
"* STATUS 1 (MESSAGES 231 UIDNEXT 44292)"
>>
}
]
}
},
{
<<
"* STATUS 1a (MESSAGES 231 {14}
\r\n
UIDNEXT 44292)
\r\n
abcd OK Begin TLS negotiation"
>>
,
<<
"abcd"
>>
,
{
more
,
{
<<
"abcd OK Begin TLS negotiation"
>>
,
[
{
marked
,
<<
"* STATUS 1a (MESSAGES 231 UIDNEXT 44292)"
>>
}
],
?
MODULE
}
}
},
{
<<
"* STATUS 2 (MESSAGES 231 {14}
\r\n
"
>>
,
<<
"abcd"
>>
,
{
more
,
{
<<
"* STATUS 2 (MESSAGES 231 {14}"
>>
,
[],
?
MODULE
}
}
},
{
<<
"* STATUS 3 (MESSAGES 231 {h14}
\r\n
UIDNEXT 44292)
\r\n
abcd OK Begin TLS negotiation now
\r\n
"
>>
,
<<
"abcd"
>>
,
{
fini
,
[
{
marked
,
<<
"* STATUS 3 (MESSAGES 231 {h14}"
>>
},
{
marked
,
<<
"UIDNEXT 44292)"
>>
}
]
}
},
{
<<
"* STATUS 4 (MESSAGES 231
\r\n
UIDNEXT 44292)
\r\n
abcd OK Begin TLS negotiation now
\r\n
"
>>
,
<<
"abcd"
>>
,
{
fini
,
[
{
marked
,
<<
"* STATUS 4 (MESSAGES 231 "
>>
},
{
marked
,
<<
"UIDNEXT 44292)"
>>
}
]
}
},
{
<<
"* STATUS 5 (MESSAGES 231 UIDNEXT 44292)
\r\n
abcd OK Begin TLS negotiation now
\r\n
"
>>
,
<<
"abcd"
>>
,
{
fini
,
[
{
marked
,
<<
"* STATUS 5 (MESSAGES 231 UIDNEXT 44292)"
>>
}
]
}
}
],
lists
:
foldl
(
fun
({
Binary
,
Tag
,
Result
},
Acc
)
->
[
?
_
assertEqual
(
Result
,
eimap_command
:
parse_response
(
multiline_response
,
Binary
,
Tag
,
?
MODULE
))|
Acc
]
end
,
[],
Data
).
File Metadata
Details
Attached
Mime Type
text/plain
Expires
Sun, Apr 5, 9:19 PM (4 w, 1 d ago)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
18794304
Default Alt Text
eimap_command_tests.erl (2 KB)
Attached To
Mode
rEI eimap
Attached
Detach File
Event Timeline