diff options
| -rw-r--r-- | Emakefile | 8 | ||||
| -rw-r--r-- | test/ctls_test.erl | 20 |
2 files changed, 25 insertions, 3 deletions
@@ -1,3 +1,5 @@ -%% erl -make (-*- erlang -*-) -{"src/*", [debug_info, {i, "include/"}, {outdir, "ebin/"}]}. -{"test/*", [debug_info, {i, "include/"}, {outdir, "ebin/"}]}. +%% erl -make (-*- erlang -*-) +{["src/*", "test/*"], + [debug_info, + {i, "include/"}, + {outdir, "ebin/"}]}. diff --git a/test/ctls_test.erl b/test/ctls_test.erl new file mode 100644 index 0000000..1d8438c --- /dev/null +++ b/test/ctls_test.erl @@ -0,0 +1,20 @@ +-module(ctls_test). +-include_lib("eunit/include/eunit.hrl"). + +%% Requires that ctls is running (or, at the moment, that v1 has been +%% installed as an mod_esi module -- use https_server:start()). + +add_chain_test_() -> + {setup, + fun() -> + Url = "https://flimsytest:8080/ct/v1/add_chain", + Input = "{\"chain\": [\"some test data\"]}", + {OK, {{_, RC, _}, _, _}} = httpc:request(post, {Url, [], [], Input}, [], []), + %% TODO: Verify signature. + {OK, RC} + end, + fun(_) -> ok end, + fun({OK, RC}) -> + [?_assertEqual(ok, OK), + ?_assertEqual(RC, 200)] + end}. |