/* 003.c COPYRIGHT FUJITSU LIMITED 2016-2019 */
/* Use pthread_create() takeover registers check. */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <pthread.h>
#include "common.h"

static void *child_function(void *arg)
{
	void *ret = (void *)-1;
	unsigned int vl = sve_get_vl();
	unsigned int vq = sve_vq_from_vl(vl);
	void *rd_buf = calloc(1, (vl * 35) + 15);
	void *cmp_buf = NULL, *align_cmp_buf = NULL;
	void *align_rd_buf = (void *)(((unsigned long)(rd_buf + 15)) & ~15UL);
	unsigned int fpscr[2] = { 0, 0 };

	if (!rd_buf) {
		printf("calloc() failed.\n");
		goto out;
	}
	read_sve(align_rd_buf, vq, fpscr);

	cmp_buf = calloc(1, (vl * 35) + 15);
	if (!cmp_buf) {
		printf("calloc() failed.\n");
		goto rd_free_out;
	}
	align_cmp_buf = (void *)(((unsigned long)(rd_buf + 15)) & ~15UL);
	gen_test_sve_low_128(align_cmp_buf, vq, vq);

	if (sve_compare(align_cmp_buf, align_rd_buf, vq)) {
		printf("child-thread register compare failed.\n");
		goto cmp_free_out;
	}

	/* success */
	ret = NULL;

cmp_free_out:
	free(cmp_buf);
rd_free_out:
	free(rd_buf);
out:
	pthread_exit(ret);
	return NULL;
}

TEST_FUNC(TEST_NUMBER, unused1, vq, unused2, unused3)
{
	void *ret;
	struct fpsimd_sve_state(vq) rd_buf;
	struct fpsimd_sve_state(vq) wr_buf;
	unsigned int fpscr[2] = { 0, 0 };
	pthread_t thread;

	print_test_overview(tp_num);

	memset(&rd_buf, 0, sizeof(rd_buf));
	memset(&wr_buf, 0, sizeof(wr_buf));

	gen_test_sve(&wr_buf, vq);
	write_sve(&wr_buf, vq, fpscr);
	read_sve(&rd_buf, vq, fpscr);

	if (sve_compare(&wr_buf, &rd_buf, vq)) {
		printf("parent-thread register compare failed.\n");
		printf("RESULT: NG.\n");
		return -1;
	}

	if (pthread_create(&thread, NULL, child_function, NULL)) {
		printf("pthread_create: error.\n");
		printf("RESULT: NG.\n");
		return -1;
	}

	if (pthread_join(thread, &ret)) {
		printf("pthread_join: error.\n");
		printf("RESULT: NG.\n");
		return -1;
	}

	if (ret == NULL) {
		printf("RESULT: OK.\n");
	} else {
		printf("RESULT: NG.\n");
	}
	return 0;
}