diff options
author | Dmitry Belyaev <[email protected]> | 2014-11-14 13:52:03 +1100 |
---|---|---|
committer | Dmitry Belyaev <[email protected]> | 2014-11-14 13:53:16 +1100 |
commit | 51e0f884c4bc534c9df5642cca9abc0716fe6308 (patch) | |
tree | 4fe440f40feb58722a27a3d5ac73846b97960948 | |
parent | e61f384adff0c9b134750ee239581296d25c10cd (diff) | |
download | otp-51e0f884c4bc534c9df5642cca9abc0716fe6308.tar.gz otp-51e0f884c4bc534c9df5642cca9abc0716fe6308.tar.bz2 otp-51e0f884c4bc534c9df5642cca9abc0716fe6308.zip |
Test to reveal odbcserver protocol bug
-rw-r--r-- | lib/odbc/test/odbc_start_SUITE.erl | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/lib/odbc/test/odbc_start_SUITE.erl b/lib/odbc/test/odbc_start_SUITE.erl index a7bb1d0ffe..51ef76da09 100644 --- a/lib/odbc/test/odbc_start_SUITE.erl +++ b/lib/odbc/test/odbc_start_SUITE.erl @@ -109,8 +109,8 @@ suite() -> [{ct_hooks,[ts_install_cth]}]. all() -> case odbc_test_lib:odbc_check() of - ok -> [app, appup, start]; - Other -> [app, appup] + ok -> [app, appup, start, long_connection_line]; + _Other -> [app, appup] end. groups() -> @@ -168,3 +168,11 @@ start_odbc(Type) -> {error, odbc_not_started} -> test_server:fail(start_failed) end. + + +long_connection_line(doc)-> + ["Test a connection line longer than 127 characters"]; +long_connection_line(suite) -> []; +long_connection_line(_Config) -> + String133 = "unknown_odbc_parameter=01234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789", + {error,"[unixODBC][Driver Manager]Data source name" ++ _} = odbc:connect(String133, []). |