diff options
author | Hans Nilsson <[email protected]> | 2016-10-18 13:41:18 +0200 |
---|---|---|
committer | Hans Nilsson <[email protected]> | 2016-10-18 13:41:18 +0200 |
commit | 7acb583c17dbfcfe2105c08f2cd125e1e88c2e4c (patch) | |
tree | 436e8a46cac1a333922196cd0fb0dd225a9eb362 /lib/inets/test | |
parent | dce8f71b473a093fb2fa01ac00ea791e4c23cef3 (diff) | |
parent | 6aba6239e8ab54b8db7ad0b76b1a8870af682d32 (diff) | |
download | otp-7acb583c17dbfcfe2105c08f2cd125e1e88c2e4c.tar.gz otp-7acb583c17dbfcfe2105c08f2cd125e1e88c2e4c.tar.bz2 otp-7acb583c17dbfcfe2105c08f2cd125e1e88c2e4c.zip |
Merge branch 'hans/inets/ftp_multiline_resp/PR-1196/OTP-13960' into maint
Diffstat (limited to 'lib/inets/test')
-rw-r--r-- | lib/inets/test/ftp_format_SUITE.erl | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/lib/inets/test/ftp_format_SUITE.erl b/lib/inets/test/ftp_format_SUITE.erl index a33b31f46f..95d594a44b 100644 --- a/lib/inets/test/ftp_format_SUITE.erl +++ b/lib/inets/test/ftp_format_SUITE.erl @@ -38,8 +38,8 @@ all() -> groups() -> [{ftp_response, [], [ftp_150, ftp_200, ftp_220, ftp_226, ftp_257, ftp_331, - ftp_425, ftp_other_status_codes, ftp_multiple_lines, - ftp_multipel_ctrl_messages]}]. + ftp_425, ftp_other_status_codes, ftp_multiple_lines_status_in_msg, + ftp_multiple_lines, ftp_multipel_ctrl_messages]}]. init_per_suite(Config) -> Config. @@ -141,6 +141,15 @@ ftp_425(Config) when is_list(Config) -> {trans_neg_compl, _} = ftp_response:interpret(Msg), ok. +ftp_multiple_lines_status_in_msg() -> + [{doc, "check that multiple lines gets parsed correct, even if we have " + " the status code within the msg being sent"}]. +ftp_multiple_lines_status_in_msg(Config) when is_list(Config) -> + ML = "230-User usr-230 is logged in\r\n" ++ + "230 OK. Current directory is /\r\n", + {ok, ML, <<>>} = ftp_response:parse_lines(list_to_binary(ML), [], start), + ok. + ftp_multiple_lines() -> [{doc, "Especially check multiple lines devided in significant places"}]. ftp_multiple_lines(Config) when is_list(Config) -> |