/* PipeWire */
/* SPDX-FileCopyrightText: Copyright © 2019 Wim Taymans */
/* SPDX-License-Identifier: MIT */

#include "config.h"

#include "pwtest.h"
#include "pipewire/array.h"

PWTEST(array_test_abi)
{
	/* array */
#if defined(__x86_64__) && defined(__LP64__)
	pwtest_int_eq(sizeof(struct pw_array), 32U);
	return PWTEST_PASS;
#else
	fprintf(stderr, "Unknown arch: pw_array is size %zd\n", sizeof(struct pw_array));
	return PWTEST_SKIP;
#endif
}

PWTEST(array_test)
{
	struct pw_array arr;
	uint32_t *ptr;
	uint32_t vals[] = { 0, 100, 0x8a, 0 };
	size_t i;

	pw_array_init(&arr, 64);
	pwtest_int_eq(SPA_N_ELEMENTS(vals), 4U);

	pwtest_int_eq(pw_array_get_len(&arr, uint32_t), 0U);
	pwtest_bool_false(pw_array_check_index(&arr, 0, uint32_t));
	pwtest_ptr_eq(pw_array_first(&arr), pw_array_end(&arr));
	pw_array_for_each(ptr, &arr)
		pwtest_fail_if_reached();

	for (i = 0; i < 4; i++) {
		ptr = (uint32_t*)pw_array_add(&arr, sizeof(uint32_t));
		*ptr = vals[i];
	}

	pwtest_int_eq(pw_array_get_len(&arr, uint32_t), 4U);
	pwtest_bool_true(pw_array_check_index(&arr, 2, uint32_t));
	pwtest_bool_true(pw_array_check_index(&arr, 3, uint32_t));
	pwtest_bool_false(pw_array_check_index(&arr, 4, uint32_t));

	i = 0;
	pw_array_for_each(ptr, &arr) {
		pwtest_int_eq(*ptr, vals[i++]);
	}

	/* remove second */
	ptr = pw_array_get_unchecked(&arr, 2, uint32_t);
	pwtest_ptr_notnull(ptr);
	pw_array_remove(&arr, ptr);
	pwtest_int_eq(pw_array_get_len(&arr, uint32_t), 3U);
	pwtest_bool_false(pw_array_check_index(&arr, 3, uint32_t));
	ptr = pw_array_get_unchecked(&arr, 2, uint32_t);
	pwtest_ptr_notnull(ptr);
	pwtest_int_eq(*ptr, vals[3]);

	/* remove first */
	ptr = pw_array_get_unchecked(&arr, 0, uint32_t);
	pwtest_ptr_notnull(ptr);
	pw_array_remove(&arr, ptr);
	pwtest_int_eq(pw_array_get_len(&arr, uint32_t), 2U);
	ptr = pw_array_get_unchecked(&arr, 0, uint32_t);
	pwtest_ptr_notnull(ptr);
	pwtest_int_eq(*ptr, vals[1]);

	/* iterate */
	ptr = (uint32_t*)pw_array_first(&arr);
	pwtest_bool_true(pw_array_check(&arr, ptr));
	pwtest_int_eq(*ptr, vals[1]);
	ptr++;
	pwtest_bool_true(pw_array_check(&arr, ptr));
	pwtest_int_eq(*ptr, vals[3]);
	ptr++;
	pwtest_bool_false(pw_array_check(&arr, ptr));

	pw_array_reset(&arr);
	pwtest_int_eq(pw_array_get_len(&arr, uint32_t), 0U);

	pw_array_clear(&arr);

	return PWTEST_PASS;
}

PWTEST(array_clear)
{
	struct pw_array arr;
	uint32_t *ptr;
	uint32_t vals[] = { 0, 100, 0x8a, 0 };
	size_t i;

	pw_array_init(&arr, 64);

	for (i = 0; i < 4; i++) {
		ptr = (uint32_t*)pw_array_add(&arr, sizeof(uint32_t));
		*ptr = vals[i];
	}
	pwtest_int_eq(pw_array_get_len(&arr, uint32_t), 4U);
	pw_array_clear(&arr);
	pwtest_int_eq(pw_array_get_len(&arr, uint32_t), 0U);

	for (i = 0; i < 4; i++) {
		ptr = (uint32_t*)pw_array_add(&arr, sizeof(uint32_t));
		*ptr = vals[i];
	}
	pwtest_int_eq(pw_array_get_len(&arr, uint32_t), 4U);
	pw_array_clear(&arr);
	pwtest_int_eq(pw_array_get_len(&arr, uint32_t), 0U);

	return PWTEST_PASS;
}

PWTEST_SUITE(pw_array)
{
	pwtest_add(array_test_abi, PWTEST_NOARG);
	pwtest_add(array_test, PWTEST_NOARG);
	pwtest_add(array_clear, PWTEST_NOARG);

	return PWTEST_PASS;
}