diff options
author | jpadkins <jacobpadkins@gmail.com> | 2017-03-22 16:46:55 +0300 |
---|---|---|
committer | jpadkins <jacobpadkins@gmail.com> | 2017-03-22 16:46:55 +0300 |
commit | 57f9723b6960aedae63fa83f596a87324548d246 (patch) | |
tree | d188f9d2a29b078b187f8faa88722171335ee3af /check/magma/servers/http | |
parent | 0caebe074d88e38ef7817eab9d15f44c73128c92 (diff) |
Added smtp helpers and http stubs
Diffstat (limited to 'check/magma/servers/http')
-rw-r--r-- | check/magma/servers/http/http_check.c | 66 | ||||
-rw-r--r-- | check/magma/servers/http/http_check.h | 15 | ||||
-rw-r--r-- | check/magma/servers/http/http_check_network.c | 67 |
3 files changed, 148 insertions, 0 deletions
diff --git a/check/magma/servers/http/http_check.c b/check/magma/servers/http/http_check.c new file mode 100644 index 00000000..63aeba6f --- /dev/null +++ b/check/magma/servers/http/http_check.c @@ -0,0 +1,66 @@ + +/** + * @file /check/magma/http_check.c + * + * @brief HTTP interface test functions. + */ + +#include "magma_check.h" + +START_TEST (check_http_network_basic_tcp_s) { + + log_disable(); + bool_t outcome = true; + server_t *server = NULL; + stringer_t *errmsg = MANAGEDBUF(1024); + + if (!(server = servers_get_by_protocol(HTTP, false))) { + st_sprint(errmsg, "No HTTP servers were configured to support TCP connections."); + outcome = false; + } + else if (status() && !check_http_network_basic_sthread(errmsg, server->network.port, false)) { + outcome = false; + } + else { + errmsg = NULL; + } + + log_test("HTTP / NETWORK / BASIC / TCP / SINGLE THREADED:", errmsg); + ck_assert_msg(outcome, st_char_get(errmsg)); +} +END_TEST + +START_TEST (check_http_network_basic_tls_s) { + + log_disable(); + bool_t outcome = true; + server_t *server = NULL; + stringer_t *errmsg = MANAGEDBUF(1024); + + if (!(server = servers_get_by_protocol(HTTP, true))) { + st_sprint(errmsg, "No HTTP servers were configured to support TLS connections."); + outcome = false; + } + else if (status() && !check_http_network_basic_sthread(errmsg, server->network.port, true)) { + outcome = false; + } + else { + errmsg = NULL; + } + + log_test("HTTP / NETWORK / BASIC / TLS / SINGLE THREADED:", errmsg); + ck_assert_msg(outcome, st_char_get(errmsg)); +} +END_TEST + +Suite * suite_check_http(void) { + + Suite *s = suite_create("\tHTTP"); + + suite_check_testcase(s, "HTTP", "HTTP Network Basic/ TCP/S", check_http_network_basic_tcp_s); + suite_check_testcase(s, "HTTP", "HTTP Network Basic/ TLS/S", check_http_network_basic_tls_s); + + return s; +} + + diff --git a/check/magma/servers/http/http_check.h b/check/magma/servers/http/http_check.h new file mode 100644 index 00000000..9062c337 --- /dev/null +++ b/check/magma/servers/http/http_check.h @@ -0,0 +1,15 @@ +/** + * @file /check/magma/servers/smtp/smtp_check.h + * + * @brief SMTP interface test functions. + */ + +#ifndef HTTP_CHECK_H +#define HTTP_CHECK_H + +/// smtp_check_network.c +bool_t check_http_network_basic_sthread(stringer_t *errmsg, uint32_t port, bool_t secure); + +Suite * suite_check_http(void); + +#endif diff --git a/check/magma/servers/http/http_check_network.c b/check/magma/servers/http/http_check_network.c new file mode 100644 index 00000000..8ba2359b --- /dev/null +++ b/check/magma/servers/http/http_check_network.c @@ -0,0 +1,67 @@ + +/** + * @file /magma/check/magma/servers/http/http_check_network.c + * + * @brief Functions used to test SMTP connections over a network connection. + * + */ + +#include "magma_check.h" + +/** + * @brief Reads lines from client and returns the value of Content-Length + * + * This function reads lines from the passed client until it finds the Content-Length + * line, at which point it parses the value and returns it. + * + * @param client A client_t containing the response of an HTTP request + * @return The value of Content-Length in the HTTP message header. + */ +size_t check_http_content_length_get(client_t *client, stringer_t *errmsg) { + + size_t location = 0; + uint32_t content_length; + placer_t cl_placer = pl_null(); + + while (st_cmp_ci_starts(&(client->line), NULLER("Content-Type:")) != 0) client_read_line(client); + + if (!st_search_chr(&(client->line), ' ', &location)) { + st_sprint(errmsg, "The Content-Length line is improperly formed."); + } + else if (pl_empty(cl_placer = pl_init(pl_data_get(client->line), pl_length_get(client->line) - location))) { + st_sprint(errmsg, "Failed to initialize content length placer."); + } + else if (!pl_inc(&cl_placer, pl_length_get(client->line) - location)) { + st_sprint(errmsg, "Failed to increment placer to location of content-length value."); + } + else if (uint32_conv_st(&cl_placer, &content_length)) { + st_sprint(errmsg, "Failed to convert the content-length string to a uint32"); + } + + return content_length; +} + +bool_t check_http_network_basic_sthread(stringer_t *errmsg, uint32_t port, bool_t secure) { + + size_t content_length; + client_t *client = NULL; + + // Test the connect banner. + if (!(client = client_connect("localhost", port)) || (secure && (client_secure(client) == -1)) || + client_status(client) != 1) { + + st_sprint(errmsg, "Failed to connect with the HTTP server."); + client_close(client); + return false; + } + else if (client_print(client, "GET / HTTP/1.1\r\nHost: localhost\r\n\r\n") != 35 || client_status(client) != 1 || + (content_length = check_http_content_length_get(client, errmsg))) { + + if (!errmsg) st_sprint(errmsg, "Failed to return a valid GET response."); + return false; + } + + client_close(client); + + return true; +} |