mirror of
https://github.com/internetee/epp_proxy.git
synced 2025-08-18 21:43:47 +02:00
Change function name from *_case to *_test_case
This commit is contained in:
parent
02de9f1e41
commit
3fb6ec85d8
5 changed files with 86 additions and 84 deletions
|
@ -3,15 +3,15 @@
|
||||||
-include_lib("public_key/include/public_key.hrl").
|
-include_lib("public_key/include/public_key.hrl").
|
||||||
|
|
||||||
-export([all/0]).
|
-export([all/0]).
|
||||||
-export([der_certificate_case/1, subject_from_otp_certificate_case/1,
|
-export([der_certificate_test_case/1, subject_from_otp_certificate_test_case/1,
|
||||||
common_name_from_subject_case/1]).
|
common_name_from_subject_test_case/1]).
|
||||||
|
|
||||||
all() -> [der_certificate_case, subject_from_otp_certificate_case,
|
all() -> [der_certificate_test_case, subject_from_otp_certificate_test_case,
|
||||||
common_name_from_subject_case].
|
common_name_from_subject_test_case].
|
||||||
|
|
||||||
%% Run Unit tests.
|
%% Run Unit tests.
|
||||||
%% Todo: these should be property tests, not unit tests.
|
%% Todo: these should be property tests, not unit tests.
|
||||||
der_certificate_case(_Config) ->
|
der_certificate_test_case(_Config) ->
|
||||||
PemEntries = public_key:pem_decode(certificate_pem()),
|
PemEntries = public_key:pem_decode(certificate_pem()),
|
||||||
{value, CertEntry} = lists:keysearch('Certificate', 1, PemEntries),
|
{value, CertEntry} = lists:keysearch('Certificate', 1, PemEntries),
|
||||||
{_, DerCert, _} = CertEntry,
|
{_, DerCert, _} = CertEntry,
|
||||||
|
@ -19,13 +19,13 @@ der_certificate_case(_Config) ->
|
||||||
true = is_record(Certificate, 'OTPCertificate'),
|
true = is_record(Certificate, 'OTPCertificate'),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
subject_from_otp_certificate_case(_Config) ->
|
subject_from_otp_certificate_test_case(_Config) ->
|
||||||
Certificate = test_certificate(),
|
Certificate = test_certificate(),
|
||||||
Subject = epp_certs:subject_from_otp_certificate(Certificate),
|
Subject = epp_certs:subject_from_otp_certificate(Certificate),
|
||||||
{rdnSequence, _ListOfAttributes} = Subject,
|
{rdnSequence, _ListOfAttributes} = Subject,
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
common_name_from_subject_case(_Config) ->
|
common_name_from_subject_test_case(_Config) ->
|
||||||
Certificate = test_certificate(),
|
Certificate = test_certificate(),
|
||||||
Subject = epp_certs:subject_from_otp_certificate(Certificate),
|
Subject = epp_certs:subject_from_otp_certificate(Certificate),
|
||||||
CommonName = epp_certs:common_name_from_subject(Subject),
|
CommonName = epp_certs:common_name_from_subject(Subject),
|
||||||
|
|
|
@ -5,15 +5,15 @@
|
||||||
|
|
||||||
-export([all/0]).
|
-export([all/0]).
|
||||||
|
|
||||||
-export([hello_request_builder_case/1,
|
-export([hello_request_builder_test_case/1,
|
||||||
error_request_builder_case/1,
|
error_request_builder_test_case/1,
|
||||||
command_request_builder_case/1]).
|
command_request_builder_test_case/1]).
|
||||||
|
|
||||||
all() -> [hello_request_builder_case,
|
all() -> [hello_request_builder_test_case,
|
||||||
error_request_builder_case,
|
error_request_builder_test_case,
|
||||||
command_request_builder_case].
|
command_request_builder_test_case].
|
||||||
|
|
||||||
hello_request_builder_case(_Config) ->
|
hello_request_builder_test_case(_Config) ->
|
||||||
RequestMap = #{command => "hello", session_id => "Random",
|
RequestMap = #{command => "hello", session_id => "Random",
|
||||||
cl_trid => "EE-123456789", raw_frame => "",
|
cl_trid => "EE-123456789", raw_frame => "",
|
||||||
headers => [{"User-Agent", <<"EPP proxy">>}]},
|
headers => [{"User-Agent", <<"EPP proxy">>}]},
|
||||||
|
@ -25,7 +25,7 @@ hello_request_builder_case(_Config) ->
|
||||||
true = is_record(Request, epp_request),
|
true = is_record(Request, epp_request),
|
||||||
ExpectedTuple = Request.
|
ExpectedTuple = Request.
|
||||||
|
|
||||||
error_request_builder_case(_Config) ->
|
error_request_builder_test_case(_Config) ->
|
||||||
RequestMap = #{command => "error", session_id => "Random",
|
RequestMap = #{command => "error", session_id => "Random",
|
||||||
cl_trid => "EE-123456789", code => <<"2001">>,
|
cl_trid => "EE-123456789", code => <<"2001">>,
|
||||||
message => <<"Expected better XML">>,
|
message => <<"Expected better XML">>,
|
||||||
|
@ -41,7 +41,7 @@ error_request_builder_case(_Config) ->
|
||||||
ExpectedTuple = Request,
|
ExpectedTuple = Request,
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
command_request_builder_case(_Config) ->
|
command_request_builder_test_case(_Config) ->
|
||||||
RequestMap = #{command => "create", session_id => "Random",
|
RequestMap = #{command => "create", session_id => "Random",
|
||||||
cl_trid => "EE-123456789", raw_frame => "Some XML here",
|
cl_trid => "EE-123456789", raw_frame => "Some XML here",
|
||||||
headers => [{"User-Agent", <<"EPP proxy">>}]},
|
headers => [{"User-Agent", <<"EPP proxy">>}]},
|
||||||
|
|
|
@ -3,18 +3,18 @@
|
||||||
-include_lib("common_test/include/ct.hrl").
|
-include_lib("common_test/include/ct.hrl").
|
||||||
|
|
||||||
-export([all/0]).
|
-export([all/0]).
|
||||||
-export([request_method_case/1, hello_url_case/1, login_url_case/1,
|
-export([request_method_test_case/1, hello_url_test_case/1, login_url_test_case/1,
|
||||||
logout_url_case/1, check_url_case/1, info_url_case/1, poll_url_case/1,
|
logout_url_test_case/1, check_url_test_case/1, info_url_test_case/1, poll_url_test_case/1,
|
||||||
create_url_case/1, delete_url_case/1, renew_url_case/1,
|
create_url_test_case/1, delete_url_test_case/1, renew_url_test_case/1,
|
||||||
update_url_case/1, transfer_url_case/1, error_url_case/1]).
|
update_url_test_case/1, transfer_url_test_case/1, error_url_test_case/1]).
|
||||||
|
|
||||||
all() -> [request_method_case, hello_url_case, login_url_case,
|
all() -> [request_method_test_case, hello_url_test_case, login_url_test_case,
|
||||||
logout_url_case, check_url_case, info_url_case, poll_url_case,
|
logout_url_test_case, check_url_test_case, info_url_test_case, poll_url_test_case,
|
||||||
create_url_case, delete_url_case, renew_url_case,
|
create_url_test_case, delete_url_test_case, renew_url_test_case,
|
||||||
update_url_case, transfer_url_case, error_url_case].
|
update_url_test_case, transfer_url_test_case, error_url_test_case].
|
||||||
|
|
||||||
%% Run Unit tests
|
%% Run Unit tests
|
||||||
request_method_case(_Config) ->
|
request_method_test_case(_Config) ->
|
||||||
get = epp_router:request_method("hello"),
|
get = epp_router:request_method("hello"),
|
||||||
get = epp_router:request_method(<<"hello">>),
|
get = epp_router:request_method(<<"hello">>),
|
||||||
get = epp_router:request_method("error"),
|
get = epp_router:request_method("error"),
|
||||||
|
@ -24,62 +24,62 @@ request_method_case(_Config) ->
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
%% TODO: Make less verbose and repetitive
|
%% TODO: Make less verbose and repetitive
|
||||||
hello_url_case(_Config) ->
|
hello_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/session/hello" = epp_router:route_request("hello"),
|
"https://localhost:9292/epp/session/hello" = epp_router:route_request("hello"),
|
||||||
"https://localhost:9292/epp/session/hello" = epp_router:route_request(<<"hello">>),
|
"https://localhost:9292/epp/session/hello" = epp_router:route_request(<<"hello">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
login_url_case(_Config) ->
|
login_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/session/login" = epp_router:route_request("login"),
|
"https://localhost:9292/epp/session/login" = epp_router:route_request("login"),
|
||||||
"https://localhost:9292/epp/session/login" = epp_router:route_request(<<"login">>),
|
"https://localhost:9292/epp/session/login" = epp_router:route_request(<<"login">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
logout_url_case(_Config) ->
|
logout_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/session/logout" = epp_router:route_request("logout"),
|
"https://localhost:9292/epp/session/logout" = epp_router:route_request("logout"),
|
||||||
"https://localhost:9292/epp/session/logout" = epp_router:route_request(<<"logout">>),
|
"https://localhost:9292/epp/session/logout" = epp_router:route_request(<<"logout">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
check_url_case(_Config) ->
|
check_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/command/check" = epp_router:route_request("check"),
|
"https://localhost:9292/epp/command/check" = epp_router:route_request("check"),
|
||||||
"https://localhost:9292/epp/command/check" = epp_router:route_request(<<"check">>),
|
"https://localhost:9292/epp/command/check" = epp_router:route_request(<<"check">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
info_url_case(_Config) ->
|
info_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/command/info" = epp_router:route_request("info"),
|
"https://localhost:9292/epp/command/info" = epp_router:route_request("info"),
|
||||||
"https://localhost:9292/epp/command/info" = epp_router:route_request(<<"info">>),
|
"https://localhost:9292/epp/command/info" = epp_router:route_request(<<"info">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
poll_url_case(_Config) ->
|
poll_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/command/poll" = epp_router:route_request("poll"),
|
"https://localhost:9292/epp/command/poll" = epp_router:route_request("poll"),
|
||||||
"https://localhost:9292/epp/command/poll" = epp_router:route_request(<<"poll">>),
|
"https://localhost:9292/epp/command/poll" = epp_router:route_request(<<"poll">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
create_url_case(_Config) ->
|
create_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/command/create" = epp_router:route_request("create"),
|
"https://localhost:9292/epp/command/create" = epp_router:route_request("create"),
|
||||||
"https://localhost:9292/epp/command/create" = epp_router:route_request(<<"create">>),
|
"https://localhost:9292/epp/command/create" = epp_router:route_request(<<"create">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
delete_url_case(_Config) ->
|
delete_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/command/delete" = epp_router:route_request("delete"),
|
"https://localhost:9292/epp/command/delete" = epp_router:route_request("delete"),
|
||||||
"https://localhost:9292/epp/command/delete" = epp_router:route_request(<<"delete">>),
|
"https://localhost:9292/epp/command/delete" = epp_router:route_request(<<"delete">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
renew_url_case(_Config) ->
|
renew_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/command/renew" = epp_router:route_request("renew"),
|
"https://localhost:9292/epp/command/renew" = epp_router:route_request("renew"),
|
||||||
"https://localhost:9292/epp/command/renew" = epp_router:route_request(<<"renew">>),
|
"https://localhost:9292/epp/command/renew" = epp_router:route_request(<<"renew">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
update_url_case(_Config) ->
|
update_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/command/update" = epp_router:route_request("update"),
|
"https://localhost:9292/epp/command/update" = epp_router:route_request("update"),
|
||||||
"https://localhost:9292/epp/command/update" = epp_router:route_request(<<"update">>),
|
"https://localhost:9292/epp/command/update" = epp_router:route_request(<<"update">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
transfer_url_case(_Config) ->
|
transfer_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/command/transfer" = epp_router:route_request("transfer"),
|
"https://localhost:9292/epp/command/transfer" = epp_router:route_request("transfer"),
|
||||||
"https://localhost:9292/epp/command/transfer" = epp_router:route_request(<<"transfer">>),
|
"https://localhost:9292/epp/command/transfer" = epp_router:route_request(<<"transfer">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
error_url_case(_Config) ->
|
error_url_test_case(_Config) ->
|
||||||
"https://localhost:9292/epp/error" = epp_router:route_request("error"),
|
"https://localhost:9292/epp/error" = epp_router:route_request("error"),
|
||||||
"https://localhost:9292/epp/error" = epp_router:route_request(<<"error">>),
|
"https://localhost:9292/epp/error" = epp_router:route_request(<<"error">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
|
@ -3,23 +3,23 @@
|
||||||
-include_lib("common_test/include/ct.hrl").
|
-include_lib("common_test/include/ct.hrl").
|
||||||
|
|
||||||
-export([all/0]).
|
-export([all/0]).
|
||||||
-export([session_id_case/1, create_map_case/1, create_session_id_case/1,
|
-export([session_id_test_case/1, create_map_test_case/1, create_session_id_test_case/1,
|
||||||
frame_length_case/1, frame_length_to_receive_case/1,
|
frame_length_test_case/1, frame_length_to_receive_test_case/1,
|
||||||
frame_length_to_send_case/1, readable_ip_case/1]).
|
frame_length_to_send_test_case/1, readable_ip_test_case/1]).
|
||||||
|
|
||||||
all() -> [session_id_case, create_map_case, create_session_id_case,
|
all() -> [session_id_test_case, create_map_test_case, create_session_id_test_case,
|
||||||
frame_length_case, frame_length_to_receive_case,
|
frame_length_test_case, frame_length_to_receive_test_case,
|
||||||
frame_length_to_send_case, readable_ip_case].
|
frame_length_to_send_test_case, readable_ip_test_case].
|
||||||
|
|
||||||
%% Todo: these should be property tests, not unit tests.
|
%% Todo: these should be property tests, not unit tests.
|
||||||
session_id_case(_Config) ->
|
session_id_test_case(_Config) ->
|
||||||
Pid = spawn(fun () -> ok end),
|
Pid = spawn(fun () -> ok end),
|
||||||
SessionId = epp_util:session_id(Pid),
|
SessionId = epp_util:session_id(Pid),
|
||||||
true = is_list(SessionId),
|
true = is_list(SessionId),
|
||||||
true = length(SessionId) > 0,
|
true = length(SessionId) > 0,
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
create_map_case(_Config) ->
|
create_map_test_case(_Config) ->
|
||||||
Pid = spawn(fun () -> ok end),
|
Pid = spawn(fun () -> ok end),
|
||||||
Map = epp_util:create_map(Pid),
|
Map = epp_util:create_map(Pid),
|
||||||
Pid = maps:get("pid", Map),
|
Pid = maps:get("pid", Map),
|
||||||
|
@ -27,7 +27,7 @@ create_map_case(_Config) ->
|
||||||
true = is_float(maps:get("random", Map)),
|
true = is_float(maps:get("random", Map)),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
create_session_id_case(_Config) ->
|
create_session_id_test_case(_Config) ->
|
||||||
Pid = list_to_pid("<0.130.0>"),
|
Pid = list_to_pid("<0.130.0>"),
|
||||||
Random = 0.7131518292439796,
|
Random = 0.7131518292439796,
|
||||||
Time = "2019-05-23T14:47:52+03:00",
|
Time = "2019-05-23T14:47:52+03:00",
|
||||||
|
@ -37,25 +37,25 @@ create_session_id_case(_Config) ->
|
||||||
"88F49C2B1BDD6F2355BF4424A67C928DA7C5616B30F7C5B35F17747348AF61EF8723ED6BE6012D879CB3D6A7EC7A187660A56910ED896AE67DE533C212D" = Hash,
|
"88F49C2B1BDD6F2355BF4424A67C928DA7C5616B30F7C5B35F17747348AF61EF8723ED6BE6012D879CB3D6A7EC7A187660A56910ED896AE67DE533C212D" = Hash,
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
frame_length_case(_Config) ->
|
frame_length_test_case(_Config) ->
|
||||||
2 = epp_util:frame_length("aa"),
|
2 = epp_util:frame_length("aa"),
|
||||||
2 = epp_util:frame_length(<<"aa">>),
|
2 = epp_util:frame_length(<<"aa">>),
|
||||||
2 = epp_util:frame_length(<<"OÜ">>),
|
2 = epp_util:frame_length(<<"OÜ">>),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
frame_length_to_receive_case(_Config) ->
|
frame_length_to_receive_test_case(_Config) ->
|
||||||
2 = epp_util:frame_length_to_receive(6),
|
2 = epp_util:frame_length_to_receive(6),
|
||||||
0 = epp_util:frame_length_to_receive(4),
|
0 = epp_util:frame_length_to_receive(4),
|
||||||
{'EXIT', {function_clause, _}} =
|
{'EXIT', {function_clause, _}} =
|
||||||
(catch epp_util:frame_length_to_receive(-22)),
|
(catch epp_util:frame_length_to_receive(-22)),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
frame_length_to_send_case(_Config) ->
|
frame_length_to_send_test_case(_Config) ->
|
||||||
18 = epp_util:frame_length_to_send("<epp><command>"),
|
18 = epp_util:frame_length_to_send("<epp><command>"),
|
||||||
4 = epp_util:frame_length_to_send(""),
|
4 = epp_util:frame_length_to_send(""),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
readable_ip_case(_Config) ->
|
readable_ip_test_case(_Config) ->
|
||||||
<<"127.0.0.1">> = epp_util:readable_ip({127,0,0,1}),
|
<<"127.0.0.1">> = epp_util:readable_ip({127,0,0,1}),
|
||||||
{'EXIT', {function_clause, _}}
|
{'EXIT', {function_clause, _}}
|
||||||
= (catch epp_util:readable_ip({127,0,0,1,0})),
|
= (catch epp_util:readable_ip({127,0,0,1,0})),
|
||||||
|
|
|
@ -23,94 +23,96 @@
|
||||||
</user>").
|
</user>").
|
||||||
|
|
||||||
-export([all/0]).
|
-export([all/0]).
|
||||||
-export([parse_not_a_list_or_binary_case/1, parse_sample_valid_xml_binary_case/1,
|
-export([parse_not_a_list_or_binary_test_case/1,
|
||||||
parse_sample_valid_xml_list_case/1,
|
parse_sample_valid_xml_binary_test_case/1,
|
||||||
parse_sample_invalid_xml_binary_case/1,
|
parse_sample_valid_xml_list_test_case/1,
|
||||||
parse_sample_invalid_xml_list_case/1,
|
parse_sample_invalid_xml_binary_test_case/1,
|
||||||
find_cltrid_binary_case/1,
|
parse_sample_invalid_xml_list_test_case/1,
|
||||||
find_cltrid_empty_binary_case/1,
|
find_cltrid_binary_test_case/1,
|
||||||
find_cltrid_empty_list_case/1,
|
find_cltrid_empty_binary_test_case/1,
|
||||||
find_cltrid_list_case/1,
|
find_cltrid_empty_list_test_case/1,
|
||||||
get_command_success_case/1,
|
find_cltrid_list_test_case/1,
|
||||||
get_command_xml_not_epp_failure_case/1,
|
get_command_success_test_case/1,
|
||||||
get_command_failure_case/1]).
|
get_command_xml_not_epp_failure_test_case/1,
|
||||||
|
get_command_failure_test_case/1]).
|
||||||
|
|
||||||
all() -> [parse_not_a_list_or_binary_case, parse_sample_valid_xml_binary_case,
|
all() -> [parse_not_a_list_or_binary_test_case,
|
||||||
parse_sample_valid_xml_list_case,
|
parse_sample_valid_xml_binary_test_case,
|
||||||
parse_sample_invalid_xml_binary_case,
|
parse_sample_valid_xml_list_test_case,
|
||||||
parse_sample_invalid_xml_list_case,
|
parse_sample_invalid_xml_binary_test_case,
|
||||||
find_cltrid_binary_case,
|
parse_sample_invalid_xml_list_test_case,
|
||||||
find_cltrid_empty_binary_case,
|
find_cltrid_binary_test_case,
|
||||||
find_cltrid_empty_list_case,
|
find_cltrid_empty_binary_test_case,
|
||||||
find_cltrid_list_case,
|
find_cltrid_empty_list_test_case,
|
||||||
get_command_success_case,
|
find_cltrid_list_test_case,
|
||||||
get_command_xml_not_epp_failure_case,
|
get_command_success_test_case,
|
||||||
get_command_failure_case].
|
get_command_xml_not_epp_failure_test_case,
|
||||||
|
get_command_failure_test_case].
|
||||||
|
|
||||||
parse_not_a_list_or_binary_case(_Config) ->
|
parse_not_a_list_or_binary_test_case(_Config) ->
|
||||||
Input = 1234,
|
Input = 1234,
|
||||||
ExpectedOutput = {error, {fatal, {expected_binary_or_list}}},
|
ExpectedOutput = {error, {fatal, {expected_binary_or_list}}},
|
||||||
ExpectedOutput = epp_xml:parse(Input),
|
ExpectedOutput = epp_xml:parse(Input),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
parse_sample_valid_xml_list_case(_Config) ->
|
parse_sample_valid_xml_list_test_case(_Config) ->
|
||||||
Input = ?sampleCommandList,
|
Input = ?sampleCommandList,
|
||||||
{ok, Record} = epp_xml:parse(Input),
|
{ok, Record} = epp_xml:parse(Input),
|
||||||
true = is_record(Record, xmlElement),
|
true = is_record(Record, xmlElement),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
parse_sample_valid_xml_binary_case(_Config) ->
|
parse_sample_valid_xml_binary_test_case(_Config) ->
|
||||||
Input = list_to_binary(?sampleCommandList),
|
Input = list_to_binary(?sampleCommandList),
|
||||||
{ok, Record} = epp_xml:parse(Input),
|
{ok, Record} = epp_xml:parse(Input),
|
||||||
true = is_record(Record, xmlElement),
|
true = is_record(Record, xmlElement),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
parse_sample_invalid_xml_list_case(_Config) ->
|
parse_sample_invalid_xml_list_test_case(_Config) ->
|
||||||
Input = "Some text",
|
Input = "Some text",
|
||||||
{error, {fatal, _Details}} = epp_xml:parse(Input),
|
{error, {fatal, _Details}} = epp_xml:parse(Input),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
parse_sample_invalid_xml_binary_case(_Config) ->
|
parse_sample_invalid_xml_binary_test_case(_Config) ->
|
||||||
Input = list_to_binary("Some text"),
|
Input = list_to_binary("Some text"),
|
||||||
{error, {fatal, _Details}} = epp_xml:parse(Input),
|
{error, {fatal, _Details}} = epp_xml:parse(Input),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
%% find_cltrid
|
%% find_cltrid
|
||||||
find_cltrid_empty_list_case(_Config) ->
|
find_cltrid_empty_list_test_case(_Config) ->
|
||||||
Input = "",
|
Input = "",
|
||||||
nomatch = epp_xml:find_cltrid(Input),
|
nomatch = epp_xml:find_cltrid(Input),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
find_cltrid_list_case(_Config) ->
|
find_cltrid_list_test_case(_Config) ->
|
||||||
Input = list_to_binary(?sampleCommandList),
|
Input = list_to_binary(?sampleCommandList),
|
||||||
<<"sample1trid">> = epp_xml:find_cltrid(Input),
|
<<"sample1trid">> = epp_xml:find_cltrid(Input),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
find_cltrid_empty_binary_case(_Config) ->
|
find_cltrid_empty_binary_test_case(_Config) ->
|
||||||
Input = <<"">>,
|
Input = <<"">>,
|
||||||
nomatch = epp_xml:find_cltrid(Input),
|
nomatch = epp_xml:find_cltrid(Input),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
find_cltrid_binary_case(_Config) ->
|
find_cltrid_binary_test_case(_Config) ->
|
||||||
Input = ?sampleCommandList,
|
Input = ?sampleCommandList,
|
||||||
<<"sample1trid">> = epp_xml:find_cltrid(Input),
|
<<"sample1trid">> = epp_xml:find_cltrid(Input),
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
%% get_command
|
%% get_command
|
||||||
get_command_success_case(_Config) ->
|
get_command_success_test_case(_Config) ->
|
||||||
%% We require an existing xlmElement record to pass around.
|
%% We require an existing xlmElement record to pass around.
|
||||||
{ok, XMLElement} = epp_xml:parse(?sampleCommandList),
|
{ok, XMLElement} = epp_xml:parse(?sampleCommandList),
|
||||||
Command = epp_xml:get_command(XMLElement),
|
Command = epp_xml:get_command(XMLElement),
|
||||||
"login" = Command,
|
"login" = Command,
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
get_command_xml_not_epp_failure_case(_Config) ->
|
get_command_xml_not_epp_failure_test_case(_Config) ->
|
||||||
{ok, XMLElement} = epp_xml:parse(?validXMLNotEPPList),
|
{ok, XMLElement} = epp_xml:parse(?validXMLNotEPPList),
|
||||||
Command = epp_xml:get_command(XMLElement),
|
Command = epp_xml:get_command(XMLElement),
|
||||||
undefined = Command,
|
undefined = Command,
|
||||||
ok.
|
ok.
|
||||||
|
|
||||||
get_command_failure_case(_Config) ->
|
get_command_failure_test_case(_Config) ->
|
||||||
%% Can pass any garbage, should get back undefined.,
|
%% Can pass any garbage, should get back undefined.,
|
||||||
Command = epp_xml:get_command("Some random string"),
|
Command = epp_xml:get_command("Some random string"),
|
||||||
undefined = Command,
|
undefined = Command,
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue