#define CGLTF_IMPLEMENTATION
#include "../cgltf.h"

#include <algorithm>
#include <cmath>
#include <cstdio>
#include <limits>

static bool is_near(cgltf_float a, cgltf_float b)
{
	return std::abs(a - b) < 10 * std::numeric_limits<cgltf_float>::min();
}

int main(int argc, char** argv)
{
	if (argc < 2)
	{
		printf("err\n");
		return -1;
	}

	cgltf_options options = {};
	cgltf_data* data = NULL;
	cgltf_result result = cgltf_parse_file(&options, argv[1], &data);

	if (result == cgltf_result_success)
		result = cgltf_load_buffers(&options, data, argv[1]);

	if (strstr(argv[1], "Draco"))
	{
		cgltf_free(data);
		return 0;
	}

	if (result != cgltf_result_success)
		return result;

	//const cgltf_accessor* blobs = data->accessors;
	cgltf_float element_float[16];
	cgltf_uint element_uint[4];
	for (cgltf_size blob_index = 0; blob_index < data->accessors_count; ++blob_index)
	{
		const cgltf_accessor* blob = data->accessors + blob_index;
		if (blob->is_sparse)
		{
			cgltf_size nfloats = cgltf_num_components(blob->type) * blob->count;
			cgltf_float* dense = (cgltf_float*) malloc(nfloats * sizeof(cgltf_float));
			if (cgltf_accessor_unpack_floats(blob, dense, nfloats) < nfloats) {
				printf("Unable to completely unpack a sparse accessor.\n");
				return -1;
			}
			free(dense);
			continue;
		}
		if (blob->has_max && blob->has_min)
		{
			cgltf_float min0 = std::numeric_limits<float>::max();
			cgltf_float max0 = std::numeric_limits<float>::lowest();
			for (cgltf_size index = 0; index < blob->count; index++)
			{
				cgltf_accessor_read_float(blob, index, element_float, 16);
				min0 = std::min(min0, element_float[0]);
				max0 = std::max(max0, element_float[0]);
			}
			if (!is_near(min0, blob->min[0]) || !is_near(max0, blob->max[0]))
			{
				printf("Computed [%f, %f] but expected [%f, %f]\n", min0, max0, blob->min[0], blob->max[0]);
				return -1;
			}
		}
		if (blob->has_max && blob->has_min && blob->component_type != cgltf_component_type_r_32f && blob->component_type != cgltf_component_type_invalid)
		{
			cgltf_uint min0 = std::numeric_limits<unsigned int>::max();
			cgltf_uint max0 = std::numeric_limits<unsigned int>::lowest();
			for ( cgltf_size index = 0; index < blob->count; index++ )
			{
				cgltf_accessor_read_uint( blob, index, element_uint, 4 );
				min0 = std::min( min0, element_uint[0] );
				max0 = std::max( max0, element_uint[0] );
			}
			if ( min0 != (unsigned int) blob->min[0] || max0 != (unsigned int) blob->max[0] )
			{
				printf( "Computed [%u, %u] but expected [%u, %u]\n", min0, max0, (unsigned int) blob->min[0], (unsigned int) blob->max[0] );
				return -1;
			}
		}
	}

	cgltf_free(data);

	return result;
}