#define PK_IMPL_MEM
#define PK_IMPL_STR

#include "../pkstr.h"

#include "../pkmacros.h"

#include <stdio.h>

int main(int argc, char *argv[])
{
	(void)argc;
	(void)argv;
	(void)stdout;

	struct pk_str s;
	struct pk_cstr cs;
	struct pk_str os;
	struct pk_cstr ocs;

	struct pk_membucket *bkt = pk_mem_bucket_create("test-pkstr", PK_MEM_DEFAULT_BUCKET_SIZE, PK_MEMBUCKET_FLAG_NONE);
	pk_mem_bucket_set_client_mem_bucket(bkt);

	// cstring_to_pk_str
	{
		s = cstring_to_pk_str("this is a test");
		PK_LOGV_INF("cstring_to_pk_str: '%s' '%i' '%i'\n", s.val, s.length, s.reserved);
	}

	// cstring_to_pk_cstr
	{
		cs = cstring_to_pk_cstr("this is a const test");
		PK_LOGV_INF("cstring_to_pk_cstr: '%s' '%i' '%i'\n", cs.val, cs.length, cs.reserved);
	}

	// pk_cstr_to_pk_str
	{
		os = pk_cstr_to_pk_str(&cs);
		PK_LOGV_INF("pk_cstr_to_pk_str: '%s' '%i' '%i'\n", os.val, os.length, os.reserved);
	}

	// pk_str_to_pk_cstr
	{
		ocs = pk_str_to_pk_cstr(&s);
		PK_LOGV_INF("pk_str_to_pk_cstr: '%s' '%i' '%i'\n", ocs.val, ocs.length, ocs.reserved);
	}

	// pk_compare_str
	{
		os = cstring_to_pk_str("this is a different test");
		PK_LOGV_INF("pk_compare_str, ('%s' cmp '%s') = '%i'\n", s.val, os.val, pk_compare_str(&s, &os));
	}

	// pk_compare_cstr
	{
		ocs = cstring_to_pk_cstr("this is a different const test");
		PK_LOGV_INF("pk_compare_cstr, ('%s' cmp '%s') = '%i'\n", ocs.val, cs.val, pk_compare_cstr(&ocs, &cs));
	}

	// pk_clone_pk_str
	{
		s = cstring_to_pk_str("this is a clone test");
		os = pk_str_clone(&s, nullptr);
		if (s.length != os.length) return 1;
		if (os.reserved == 0) return 1;
		if (s.val == os.val) return 1;
		if (os.val == nullptr) return 1;
		PK_LOGV_INF("pk_clone_pk_str, ('%s' to '%s')\n", s.val, os.val);
		pk_delete(os.val, os.reserved, nullptr);
	}

	// pk_clone_pk_cstr
	{
		cs = cstring_to_pk_cstr("this is a const clone test");
		ocs = pk_cstr_clone(&cs, nullptr);
		if (cs.length != ocs.length) return 1;
		if (ocs.reserved == 0) return 1;
		if (cs.val == ocs.val) return 1;
		if (ocs.val == nullptr) return 1;
		PK_LOGV_INF("pk_clone_pk_cstr, ('%s' to '%s')\n", cs.val, ocs.val);
		pk_delete(ocs.val, ocs.reserved, nullptr);
	}

	pk_mem_bucket_destroy(bkt);
	bkt = nullptr;

	return 0;
}