pair_server_tests.c

Go to the documentation of this file.

/*
 *   This library is free software; you can redistribute it and/or
 *   modify it under the terms of the GNU Lesser General Public
 *   License as published by the Free Software Foundation; either
 *   version 2.1 of the License, or (at your option) any later version.
 *
 *   This library is distributed in the hope that it will be useful,
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
 *   Lesser General Public License for more details.
 *
 *   You should have received a copy of the GNU Lesser General Public
 *   License along with this library; if not, write to the Free Software
 *   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
 */
 
/** Tests for a AVP manipulation and search API.
 *
 * @file src/lib/server/pair_server_tests.c
 * @author Jorge Pereira <jpereira@freeradius.org>
 * @copyright 2020 Network RADIUS SAS (legal@networkradius.com)
 */
 
static void test_init(void);
#  define TEST_INIT  test_init()
 
#include <freeradius-devel/util/test/acutest.h>
#include <freeradius-devel/util/test/acutest_helpers.h>
#include <freeradius-devel/util/test/pair_test_helpers.h>
 
#include <freeradius-devel/util/conf.h>
 
#include <freeradius-devel/server/pair.h>
#include <freeradius-devel/server/request.h>
 
#ifdef HAVE_GPERFTOOLS_PROFILER_H
#  include <gperftools/profiler.h>
#endif
 
static TALLOC_CTX       *autofree;
static fr_pair_list_t   test_pairs;
static fr_dict_t        *test_dict;
 
 
/** Global initialisation
 */
static void test_init(void)
{
        autofree = talloc_autofree_context();
        if (!autofree) {
        error:
                fr_perror("pair_tests");
                fr_exit_now(EXIT_FAILURE);
        }
 
        /*
         *      Mismatch between the binary and the libraries it depends on
         */
        if (fr_check_lib_magic(RADIUSD_MAGIC_NUMBER) < 0) goto error;
 
        if (fr_dict_test_init(autofree, &test_dict, NULL) < 0) goto error;
 
        /* Initialize the "test_pairs" list */
        fr_pair_list_init(&test_pairs);
 
        if (fr_pair_test_list_alloc(autofree, &test_pairs, NULL) < 0) goto error;
 
        if (request_global_init() < 0) goto error;
}
 
static request_t *request_fake_alloc(void)
{
        request_t       *request;
 
        /*
         *      Create and initialize the new request.
         */
        request = request_local_alloc_external(autofree, (&(request_init_args_t){ .namespace = test_dict }));
 
        request->packet = fr_packet_alloc(request, false);
        TEST_CHECK(request->packet != NULL);
 
        request->reply = fr_packet_alloc(request, false);
        TEST_CHECK(request->reply != NULL);
 
        return request;
}
 
/*
 *      Tests functions
 */
static void test_pair_append_request(void)
{
        fr_pair_t      *local_vp;
        fr_pair_t      *vp;
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Add 'Test-Integer' in 'request_pairs' using pair_append_request()");
        TEST_CHECK(pair_append_request(&local_vp, fr_dict_attr_test_uint32) == 0);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        TEST_CHECK((vp = fr_pair_list_head(&request->request_pairs)) != NULL);
        PAIR_VERIFY(vp);
 
        TEST_MSG("Set vp = 12345");
        vp->vp_uint32 = 12345;
        TEST_CHECK(vp->vp_uint32 == 12345);
        TEST_MSG("Expected %s == 12345", fr_dict_attr_test_uint32->name);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_append_reply(void)
{
        fr_pair_t      *local_vp;
        fr_pair_t      *vp;
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Add 'Test-Integer' in 'reply_pairs' using pair_append_reply()");
        TEST_CHECK(pair_append_reply(&local_vp, fr_dict_attr_test_uint32) == 0);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        TEST_CHECK((vp = fr_pair_list_head(&request->reply_pairs)) != NULL);
        PAIR_VERIFY(vp);
 
        TEST_MSG("Set vp = 12345");
        vp->vp_uint32 = 12345;
 
        TEST_CHECK(vp->vp_uint32 == 12345);
        TEST_MSG("Expected %s == 12345", fr_dict_attr_test_uint32->name);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_append_control(void)
{
        fr_pair_t      *local_vp;
        fr_pair_t      *vp;
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Add 'Test-Integer' in 'control_pairs' using pair_append_control()");
        TEST_CHECK(pair_append_control(&local_vp, fr_dict_attr_test_uint32) == 0);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        TEST_CHECK((vp = fr_pair_list_head(&request->control_pairs)) != NULL);
        PAIR_VERIFY(vp);
 
        TEST_MSG("Set vp = 12345");
        vp->vp_uint32 = 12345;
 
        TEST_CHECK(vp->vp_uint32 == 12345);
        TEST_MSG("Expected %s == 12345", fr_dict_attr_test_uint32->name);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_append_session_state(void)
{
        fr_pair_t      *local_vp;
        fr_pair_t      *vp;
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Add 'Test-Integer' in 'control_pairs' using pair_append_session_state()");
        TEST_CHECK(pair_append_session_state(&local_vp, fr_dict_attr_test_uint32) == 0);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        TEST_CHECK((vp = fr_pair_list_head(&request->session_state_pairs)) != NULL);
        PAIR_VERIFY(vp);
 
        TEST_MSG("Set vp = 12345");
        vp->vp_uint32 = 12345;
 
        TEST_CHECK(vp->vp_uint32 == 12345);
        TEST_MSG("Expected %s == 12345", fr_dict_attr_test_uint32->name);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_update_request(void)
{
        fr_pair_t      *vp;
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Update 'Test-Integer' in 'request_pairs' using pair_update_request()");
        TEST_CHECK(pair_update_request(&vp, fr_dict_attr_test_uint32) == 0);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        PAIR_VERIFY(vp);
 
        TEST_MSG("Set vp = 112233");
        vp->vp_uint32 = 112233;
 
        TEST_CASE("Expected fr_dict_attr_test_uint32 (vp->vp_uint32 == 112233)");
        TEST_CHECK((vp = fr_pair_find_by_da(&request->request_pairs, NULL, fr_dict_attr_test_uint32)) != NULL);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        PAIR_VERIFY(vp);
 
        TEST_MSG("Checking if vp == 12345");
        /*
         * Such 'vp != NULL' just to mute clang "warning: Dereference of null pointer"
         */
        TEST_CHECK(vp && vp->vp_uint32 == 112233);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_update_reply(void)
{
        fr_pair_t      *vp;
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Update 'Test-Integer' in 'reply_pairs' using pair_update_request()");
        TEST_CHECK(pair_update_reply(&vp, fr_dict_attr_test_uint32) == 0);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        PAIR_VERIFY(vp);
 
        TEST_MSG("Set vp = 3333");
        vp->vp_uint32 = 3333;
 
        TEST_CASE("Expected fr_dict_attr_test_uint32 (vp->vp_uint32 == 3333)");
        TEST_CHECK((vp = fr_pair_find_by_da(&request->reply_pairs, NULL, fr_dict_attr_test_uint32)) != NULL);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        PAIR_VERIFY(vp);
 
        TEST_CHECK(vp && vp->vp_uint32 == 3333);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_update_control(void)
{
        fr_pair_t      *vp;
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Update 'Test-Integer' in 'control_pairs' using pair_update_control()");
        TEST_CHECK(pair_update_control(&vp, fr_dict_attr_test_uint32) == 0);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        PAIR_VERIFY(vp);
 
        TEST_MSG("Set vp = 44444");
        vp->vp_uint32 = 44444;
 
        TEST_CASE("Expected fr_dict_attr_test_uint32 (vp->vp_uint32 == 44444)");
        TEST_CHECK((vp = fr_pair_find_by_da(&request->control_pairs, NULL, fr_dict_attr_test_uint32)) != NULL);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        PAIR_VERIFY(vp);
 
        TEST_CHECK(vp && vp->vp_uint32 == 44444);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_update_session_state(void)
{
        fr_pair_t      *vp;
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Update 'Test-Integer' in 'state' using pair_update_session_state()");
        TEST_CHECK(pair_update_session_state(&vp, fr_dict_attr_test_uint32) == 0);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        PAIR_VERIFY(vp);
 
        TEST_MSG("Set vp = 7890");
        vp->vp_uint32 = 7890;
 
        TEST_CASE("Expected fr_dict_attr_test_uint32 (vp->vp_uint32 == 7890)");
        TEST_CHECK((vp = fr_pair_find_by_da(&request->session_state_pairs, NULL, fr_dict_attr_test_uint32)) != NULL);
 
        TEST_CASE("Validating PAIR_VERIFY()");
        PAIR_VERIFY(vp);
 
        TEST_CHECK(vp && vp->vp_uint32 == 7890);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_delete_request(void)
{
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Copy 'test_pairs' into 'request->request_pairs'");
        TEST_CHECK(fr_pair_list_copy(autofree, &request->request_pairs, &test_pairs) > 0);
 
        TEST_CASE("Delete 'Test-Integer' in 'request->request_pairs' using pair_delete_request()");
        TEST_CHECK(pair_delete_request(fr_dict_attr_test_uint32) > 0);
 
        TEST_CASE("The 'Test-Integer' shouldn't exist in 'request->request_pairs'");
        TEST_CHECK(fr_pair_find_by_da(&request->request_pairs, NULL, fr_dict_attr_test_uint32) == NULL);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_delete_reply(void)
{
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Copy 'test_pairs' into 'request->reply_pairs'");
        TEST_CHECK(fr_pair_list_copy(autofree, &request->reply_pairs, &test_pairs) > 0);
 
        TEST_CASE("Delete 'Test-Integer' in 'request->reply_pairs' using pair_delete_reply()");
        TEST_CHECK(pair_delete_reply(fr_dict_attr_test_uint32) > 0);
 
        TEST_CASE("The 'Test-Integer' shouldn't exist in 'request->reply_pairs'");
        TEST_CHECK(fr_pair_find_by_da(&request->reply_pairs, NULL, fr_dict_attr_test_uint32) == NULL);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_delete_control(void)
{
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Copy 'test_pairs' into 'request->control_pairs'");
        TEST_CHECK(fr_pair_list_copy(autofree, &request->control_pairs, &test_pairs) > 0);
 
        TEST_CASE("Delete 'Test-Integer' in 'request->control_pairs' using pair_delete_control()");
        TEST_CHECK(pair_delete_control(fr_dict_attr_test_uint32) > 0);
 
        TEST_CASE("The 'Test-Integer' shouldn't exist in 'request->control_pairs'");
        TEST_CHECK(fr_pair_find_by_da(&request->control_pairs, NULL, fr_dict_attr_test_uint32) == NULL);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
static void test_pair_delete_session_state(void)
{
        request_t      *request = request_fake_alloc();
 
        TEST_CASE("Copy 'test_pairs' into 'request->state'");
        TEST_CHECK(fr_pair_list_copy(autofree, &request->session_state_pairs, &test_pairs) > 0);
 
        TEST_CASE("Delete 'Test-Integer' in 'request->state' using pair_delete_session_state()");
        TEST_CHECK(pair_delete_session_state(fr_dict_attr_test_uint32) > 0);
 
        TEST_CASE("The 'Test-Integer' shouldn't exist in 'request->state'");
        TEST_CHECK(fr_pair_find_by_da(&request->session_state_pairs, NULL, fr_dict_attr_test_uint32) == NULL);
 
        TEST_CHECK_RET(talloc_free(request), 0);
}
 
TEST_LIST = {
        /*
         *      Add pairs
         */
        { "pair_append_request",          test_pair_append_request },
        { "pair_append_reply",            test_pair_append_reply },
        { "pair_append_control",          test_pair_append_control },
        { "pair_append_session_state",    test_pair_append_session_state },
 
        /*
         *      Update pairs
         */
        { "pair_update_request",       test_pair_update_request },
        { "pair_update_reply",         test_pair_update_reply },
        { "pair_update_control",       test_pair_update_control },
        { "pair_update_session_state", test_pair_update_session_state },
 
        /*
         *      Delete pairs
         */
        { "pair_delete_request",       test_pair_delete_request },
        { "pair_delete_reply",         test_pair_delete_reply },
        { "pair_delete_control",       test_pair_delete_control },
        { "pair_delete_session_state", test_pair_delete_session_state },
 
        TEST_TERMINATOR
};