#ifdef HAVE_CONFIG_H
# include "config.h"
#endif
#include <stdio.h>

#include "QF/ui/view.h"

static ecs_registry_t *test_reg;

enum {
	test_href,
};

static const component_t test_components[] = {
	[test_href] = {
		.size = sizeof (hierref_t),
		.create = 0,//create_href,
		.name = "href",
	},
};

typedef struct {
	struct {
		int         xlen, ylen;
	};
	int         bol_suppress;
	struct {
		struct {
			int         xpos, ypos;
		};
		struct {
			int         xrel, yrel;
		};
		struct {
			int         xabs, yabs;
		};
	} expect;
} testdata_t;

#define array_size(array) (sizeof (array) / sizeof(array[0]))

static testdata_t right_down_views[] = {
	{{ 48, 8}, 0, { {  0, 0}, {  0,  0}, {  8, 16} }},	// 0
	{{128, 8}, 0, { { 48, 0}, { 48,  0}, { 56, 16} }},
	{{ 64, 8}, 0, { {176, 0}, {176,  0}, {184, 16} }},

	{{ 32, 8}, 0, { {  0, 0}, {  0,  8}, {  8, 24} }},	// 3
	{{224, 8}, 0, { { 32, 0}, { 32,  8}, { 40, 24} }},

	{{ 64, 8}, 0, { {  0, 0}, {  0, 16}, {  8, 32} }},	// 5
	{{ 64, 8}, 0, { { 64, 0}, { 64, 16}, { 72, 32} }},
	{{ 64, 8}, 0, { {128, 0}, {128, 16}, {136, 32} }},
	{{ 32, 8}, 0, { {192, 0}, {192, 16}, {200, 32} }},

	{{288, 8}, 0, { {  0, 0}, {  0, 24}, {  8, 40} }},	// 9

	{{ 48, 8}, 0, { {  0, 0}, {  0, 32}, {  8, 48} }},	// 10
	{{128, 8}, 0, { { 48, 0}, { 48, 32}, { 56, 48} }},
	{{ 64, 8}, 0, { {176, 0}, {176, 32}, {184, 48} }},
};
#define right_down_count array_size(right_down_views)

static testdata_t right_up_views[] = {
	{{ 48, 8}, 0, { {  0, 0}, {  0,248}, {  8,264} }},	// 0
	{{128, 8}, 0, { { 48, 0}, { 48,248}, { 56,264} }},
	{{ 64, 8}, 0, { {176, 0}, {176,248}, {184,264} }},

	{{ 32, 8}, 0, { {  0, 0}, {  0,240}, {  8,256} }},	// 3
	{{224, 8}, 0, { { 32, 0}, { 32,240}, { 40,256} }},

	{{ 64, 8}, 0, { {  0, 0}, {  0,232}, {  8,248} }},	// 5
	{{ 64, 8}, 0, { { 64, 0}, { 64,232}, { 72,248} }},
	{{ 64, 8}, 0, { {128, 0}, {128,232}, {136,248} }},
	{{ 32, 8}, 0, { {192, 0}, {192,232}, {200,248} }},

	{{288, 8}, 0, { {  0, 0}, {  0,224}, {  8,240} }},	// 9

	{{ 48, 8}, 0, { {  0, 0}, {  0,216}, {  8,232} }},	// 10
	{{128, 8}, 0, { { 48, 0}, { 48,216}, { 56,232} }},
	{{ 64, 8}, 0, { {176, 0}, {176,216}, {184,232} }},
};
#define right_up_count array_size(right_up_views)

static testdata_t left_down_views[] = {
	{{ 48, 8}, 0, { {208, 0}, {208,  0}, {216, 16} }},	// 0
	{{128, 8}, 0, { { 80, 0}, { 80,  0}, { 88, 16} }},
	{{ 64, 8}, 0, { { 16, 0}, { 16,  0}, { 24, 16} }},

	{{ 32, 8}, 0, { {224, 0}, {224,  8}, {232, 24} }},	// 3
	{{224, 8}, 0, { {  0, 0}, {  0,  8}, {  8, 24} }},

	{{ 64, 8}, 0, { {192, 0}, {192, 16}, {200, 32} }},	// 5
	{{ 64, 8}, 0, { {128, 0}, {128, 16}, {136, 32} }},
	{{ 64, 8}, 0, { { 64, 0}, { 64, 16}, { 72, 32} }},
	{{ 32, 8}, 0, { { 32, 0}, { 32, 16}, { 40, 32} }},

	{{288, 8}, 0, { {-32, 0}, {-32, 24}, {-24, 40} }},	// 9

	{{ 48, 8}, 0, { {208, 0}, {208, 32}, {216, 48} }},	// 10
	{{128, 8}, 0, { { 80, 0}, { 80, 32}, { 88, 48} }},
	{{ 64, 8}, 0, { { 16, 0}, { 16, 32}, { 24, 48} }},
};
#define left_down_count array_size(left_down_views)

static testdata_t left_up_views[] = {
	{{ 48, 8}, 0, { {208, 0}, {208,248}, {216,264} }},	// 0
	{{128, 8}, 0, { { 80, 0}, { 80,248}, { 88,264} }},
	{{ 64, 8}, 0, { { 16, 0}, { 16,248}, { 24,264} }},

	{{ 32, 8}, 0, { {224, 0}, {224,240}, {232,256} }},	// 3
	{{224, 8}, 0, { {  0, 0}, {  0,240}, {  8,256} }},

	{{ 64, 8}, 0, { {192, 0}, {192,232}, {200,248} }},	// 5
	{{ 64, 8}, 0, { {128, 0}, {128,232}, {136,248} }},
	{{ 64, 8}, 0, { { 64, 0}, { 64,232}, { 72,248} }},
	{{ 32, 8}, 0, { { 32, 0}, { 32,232}, { 40,248} }},

	{{288, 8}, 0, { {-32, 0}, {-32,224}, {-24,240} }},	// 9

	{{ 48, 8}, 0, { {208, 0}, {208,216}, {216,232} }},	// 10
	{{128, 8}, 0, { { 80, 0}, { 80,216}, { 88,232} }},
	{{ 64, 8}, 0, { { 16, 0}, { 16,216}, { 24,232} }},
};
#define left_up_count array_size(left_up_views)

static testdata_t down_right_views[] = {
	{{ 8, 48}, 0, { { 0,  0}, {  0,  0}, {  8, 16} }},	// 0
	{{ 8,128}, 0, { { 0, 48}, {  0, 48}, {  8, 64} }},
	{{ 8, 64}, 0, { { 0,176}, {  0,176}, {  8,192} }},

	{{ 8, 32}, 0, { { 0,  0}, {  8,  0}, { 16, 16} }},	// 3
	{{ 8,224}, 0, { { 0, 32}, {  8, 32}, { 16, 48} }},

	{{ 8, 64}, 0, { { 0,  0}, { 16,  0}, { 24, 16} }},	// 5
	{{ 8, 64}, 0, { { 0, 64}, { 16, 64}, { 24, 80} }},
	{{ 8, 64}, 0, { { 0,128}, { 16,128}, { 24,144} }},
	{{ 8, 32}, 0, { { 0,192}, { 16,192}, { 24,208} }},

	{{ 8,288}, 0, { { 0,  0}, { 24,  0}, { 32, 16} }},	// 9

	{{ 8, 48}, 0, { { 0,  0}, { 32,  0}, { 40, 16} }},	// 10
	{{ 8,128}, 0, { { 0, 48}, { 32, 48}, { 40, 64} }},
	{{ 8, 64}, 0, { { 0,176}, { 32,176}, { 40,192} }},
};
#define down_right_count array_size(down_right_views)

static testdata_t up_right_views[] = {
	{{ 8, 48}, 0, { { 0,208}, {  0,208}, {  8,224} }},	// 0
	{{ 8,128}, 0, { { 0, 80}, {  0, 80}, {  8, 96} }},
	{{ 8, 64}, 0, { { 0, 16}, {  0, 16}, {  8, 32} }},

	{{ 8, 32}, 0, { { 0,224}, {  8,224}, { 16,240} }},	// 3
	{{ 8,224}, 0, { { 0,  0}, {  8,  0}, { 16, 16} }},

	{{ 8, 64}, 0, { { 0,192}, { 16,192}, { 24,208} }},	// 5
	{{ 8, 64}, 0, { { 0,128}, { 16,128}, { 24,144} }},
	{{ 8, 64}, 0, { { 0, 64}, { 16, 64}, { 24, 80} }},
	{{ 8, 32}, 0, { { 0, 32}, { 16, 32}, { 24, 48} }},

	{{ 8,288}, 0, { { 0,-32}, { 24,-32}, { 32,-16} }},	// 9

	{{ 8, 48}, 0, { { 0,208}, { 32,208}, { 40,224} }},	// 10
	{{ 8,128}, 0, { { 0, 80}, { 32, 80}, { 40, 96} }},
	{{ 8, 64}, 0, { { 0, 16}, { 32, 16}, { 40, 32} }},
};
#define up_right_count array_size(up_right_views)

static testdata_t down_left_views[] = {
	{{ 8, 48}, 0, { { 0,  0}, {248,  0}, {256, 16} }},	// 0
	{{ 8,128}, 0, { { 0, 48}, {248, 48}, {256, 64} }},
	{{ 8, 64}, 0, { { 0,176}, {248,176}, {256,192} }},

	{{ 8, 32}, 0, { { 0,  0}, {240,  0}, {248, 16} }},	// 3
	{{ 8,224}, 0, { { 0, 32}, {240, 32}, {248, 48} }},

	{{ 8, 64}, 0, { { 0,  0}, {232,  0}, {240, 16} }},	// 5
	{{ 8, 64}, 0, { { 0, 64}, {232, 64}, {240, 80} }},
	{{ 8, 64}, 0, { { 0,128}, {232,128}, {240,144} }},
	{{ 8, 32}, 0, { { 0,192}, {232,192}, {240,208} }},

	{{ 8,288}, 0, { { 0,  0}, {224,  0}, {232, 16} }},	// 9

	{{ 8, 48}, 0, { { 0,  0}, {216,  0}, {224, 16} }},	// 10
	{{ 8,128}, 0, { { 0, 48}, {216, 48}, {224, 64} }},
	{{ 8, 64}, 0, { { 0,176}, {216,176}, {224,192} }},
};
#define down_left_count array_size(down_left_views)

static testdata_t up_left_views[] = {
	{{ 8, 48}, 0, { { 0,208}, {248,208}, {256,224} }},	// 0
	{{ 8,128}, 0, { { 0, 80}, {248, 80}, {256, 96} }},
	{{ 8, 64}, 0, { { 0, 16}, {248, 16}, {256, 32} }},

	{{ 8, 32}, 0, { { 0,224}, {240,224}, {248,240} }},	// 3
	{{ 8,224}, 0, { { 0,  0}, {240,  0}, {248, 16} }},

	{{ 8, 64}, 0, { { 0,192}, {232,192}, {240,208} }},	// 5
	{{ 8, 64}, 0, { { 0,128}, {232,128}, {240,144} }},
	{{ 8, 64}, 0, { { 0, 64}, {232, 64}, {240, 80} }},
	{{ 8, 32}, 0, { { 0, 32}, {232, 32}, {240, 48} }},

	{{ 8,288}, 0, { { 0,-32}, {224,-32}, {232,-16} }},	// 9

	{{ 8, 48}, 0, { { 0,208}, {216,208}, {224,224} }},	// 10
	{{ 8,128}, 0, { { 0, 80}, {216, 80}, {224, 96} }},
	{{ 8, 64}, 0, { { 0, 16}, {216, 16}, {224, 32} }},
};
#define up_left_count array_size(up_left_views)

static void
print_view (view_t view)
{
	view_t      parent = View_GetParent (view);
	view_pos_t  pos = View_GetPos (view);
	view_pos_t  len = View_GetLen (view);
	view_pos_t  rel = View_GetRel (view);
	view_pos_t  abs = View_GetAbs (view);
	printf ("%s[%3d %3d %3d %3d %3d %3d %3d %3d]\n",
			View_Valid (parent) ? "    " : "****",
			pos.x, pos.y, len.x, len.y, rel.x, rel.y, abs.x, abs.y);
}

static int
test_flow (testdata_t *child_views, int count,
		   void (*flow) (view_t, view_pos_t))
{
	view_t      flow_view = View_New (test_reg, test_href, nullview);
	View_SetPos (flow_view, 0, 0);
	View_SetLen (flow_view, 256, 256);
	View_SetGravity (flow_view, grav_northwest);
	View_SetOnResize (flow_view, flow);

	for (int i = 0; i < count; i++) {
		testdata_t *td = &child_views[i];
		view_t      child = View_New (test_reg, test_href, flow_view);
		View_SetPos (child, 0, 0);
		View_SetLen (child, td->xlen, td->ylen);
		View_SetGravity (child, grav_flow);
		View_Control (child)->bol_suppress = td->bol_suppress;
	}

	View_SetPos (flow_view, 8, 16);
	View_UpdateHierarchy (flow_view);

	int         ret = 0;
	__auto_type ref = View_GetRef (flow_view);
	hierarchy_t *h = ref->hierarchy;
	uint32_t   *childIndex = h->childIndex;
	uint32_t   *childCount = h->childCount;
	uint32_t   *ent = h->ent;
	view_pos_t *pos = h->components[view_pos];
	view_pos_t *rel = h->components[view_rel];
	view_pos_t *abs = h->components[view_abs];
	for (uint32_t i = 0; i < childCount[ref->index]; i++) {
		testdata_t *td = &child_views[i];
		uint32_t    child = childIndex[ref->index] + i;
		if (pos[child].x != td->expect.xpos
			|| pos[child].y != td->expect.ypos
			|| rel[child].x != td->expect.xrel
			|| rel[child].y != td->expect.yrel
			|| abs[child].x != td->expect.xabs
			|| abs[child].y != td->expect.yabs) {
			ret = 1;
			printf ("child %d misflowed:\n"
					"    [%3d %3d         %3d %3d %3d %3d]\n", i,
					td->expect.xpos, td->expect.ypos,
					td->expect.xrel, td->expect.yrel,
					td->expect.xabs, td->expect.yabs);
			print_view ((view_t) { .reg = test_reg, .id = ent[child],
									.comp = flow_view.comp});
		}
	}
	return ret;
}

int
main (void)
{
	int         ret = 0;

	test_reg = ECS_NewRegistry ();
	ECS_RegisterComponents (test_reg, test_components, 1);
	ECS_CreateComponentPools (test_reg);

	if (test_flow (right_down_views, right_down_count, view_flow_right_down)) {
		printf ("right-down failed\n");
		ret = 1;
	}
	if (test_flow (right_up_views, right_up_count, view_flow_right_up)) {
		printf ("right-up failed\n");
		ret = 1;
	}
	if (test_flow (left_down_views, left_down_count, view_flow_left_down)) {
		printf ("left-down failed\n");
		ret = 1;
	}
	if (test_flow (left_up_views, left_up_count, view_flow_left_up)) {
		printf ("left-up failed\n");
		ret = 1;
	}

	if (test_flow (down_right_views, down_right_count, view_flow_down_right)) {
		printf ("down-right failed\n");
		ret = 1;
	}
	if (test_flow (up_right_views, up_right_count, view_flow_up_right)) {
		printf ("up-right failed\n");
		ret = 1;
	}
	if (test_flow (down_left_views, down_left_count, view_flow_down_left)) {
		printf ("down-left failed\n");
		ret = 1;
	}
	if (test_flow (up_left_views, up_left_count, view_flow_up_left)) {
		printf ("up-left failed\n");
		ret = 1;
	}
	return ret;
}