#include "test_str8_list.h"
#include "str8.h"
#include "tester.h"

TestFuncResult test_str8_list_get(void) {
  bool result;

  Str8 s1 = wapp_str8_lit("1");
  Str8 s2 = wapp_str8_lit("2");
  Str8 s3 = wapp_str8_lit("3");
  Str8 s4 = wapp_str8_lit("4");
  Str8 s5 = wapp_str8_lit("5");

  Str8List list = {0};
  Str8Node n1   = { .string = &s1 };
  Str8Node n2   = { .string = &s2 };
  Str8Node n3   = { .string = &s3 };
  Str8Node n4   = { .string = &s4 };
  Str8Node n5   = { .string = &s5 };

  wapp_str8_list_push_back(&list, &n1);
  wapp_str8_list_push_back(&list, &n2);
  wapp_str8_list_push_back(&list, &n3);
  wapp_str8_list_push_back(&list, &n4);
  wapp_str8_list_push_back(&list, &n5);

  Str8Node *node = wapp_str8_list_get(&list, 0);
  result = node->string == &s1 && wapp_str8_equal(node->string, &s1);

  node = wapp_str8_list_get(&list, 1);
  result = result && node->string == &s2 && wapp_str8_equal(node->string, &s2);

  node = wapp_str8_list_get(&list, 2);
  result = result && node->string == &s3 && wapp_str8_equal(node->string, &s3);

  node = wapp_str8_list_get(&list, 3);
  result = result && node->string == &s4 && wapp_str8_equal(node->string, &s4);

  node = wapp_str8_list_get(&list, 4);
  result = result && node->string == &s5 && wapp_str8_equal(node->string, &s5);

  return wapp_tester_result(result);
}

TestFuncResult test_str8_list_push_front(void) {
  bool result;

  Str8 s1 = wapp_str8_lit("1");
  Str8 s2 = wapp_str8_lit("2");
  Str8 s3 = wapp_str8_lit("3");

  Str8List list = {0};
  Str8Node n1   = { .string = &s1 };
  Str8Node n2   = { .string = &s2 };
  Str8Node n3   = { .string = &s3 };

  wapp_str8_list_push_front(&list, &n1);
  result = list.first == list.last && list.first == &n1 && list.first->string == &s1 && list.total_size == 1 && list.node_count == 1;

  wapp_str8_list_push_front(&list, &n2);
  result = result && list.first == &n2 && list.first->string == &s2 && list.total_size == 2 && list.node_count == 2;

  wapp_str8_list_push_front(&list, &n3);
  result = result && list.first == &n3 && list.first->string == &s3 && list.total_size == 3 && list.node_count == 3;

  return wapp_tester_result(result);
}

TestFuncResult test_str8_list_push_back(void) {
  bool result;

  Str8 s1 = wapp_str8_lit("1");
  Str8 s2 = wapp_str8_lit("2");
  Str8 s3 = wapp_str8_lit("3");

  Str8List list = {0};
  Str8Node n1   = { .string = &s1 };
  Str8Node n2   = { .string = &s2 };
  Str8Node n3   = { .string = &s3 };

  wapp_str8_list_push_back(&list, &n1);
  result = list.first == list.last && list.last == &n1 && list.last->string == &s1 && list.total_size == 1 && list.node_count == 1;

  wapp_str8_list_push_back(&list, &n2);
  result = result && list.last == &n2 && list.last->string == &s2 && list.total_size == 2 && list.node_count == 2;

  wapp_str8_list_push_back(&list, &n3);
  result = result && list.last == &n3 && list.last->string == &s3 && list.total_size == 3 && list.node_count == 3;

  return wapp_tester_result(result);
}

TestFuncResult test_str8_list_insert(void) {
  bool result;

  Str8 s1 = wapp_str8_lit("1");
  Str8 s2 = wapp_str8_lit("2");
  Str8 s3 = wapp_str8_lit("3");
  Str8 s4 = wapp_str8_lit("4");
  Str8 s5 = wapp_str8_lit("5");
  Str8 s6 = wapp_str8_lit("6");
  Str8 s7 = wapp_str8_lit("7");

  Str8List list = {0};
  Str8Node n1   = { .string = &s1 };
  Str8Node n2   = { .string = &s2 };
  Str8Node n3   = { .string = &s3 };
  Str8Node n4   = { .string = &s4 };
  Str8Node n5   = { .string = &s5 };
  Str8Node n6   = { .string = &s6 };
  Str8Node n7   = { .string = &s7 };

  wapp_str8_list_push_back(&list, &n1);
  wapp_str8_list_push_back(&list, &n2);
  wapp_str8_list_push_back(&list, &n3);
  wapp_str8_list_push_back(&list, &n4);
  wapp_str8_list_push_back(&list, &n5);

  Str8Node *node;
  wapp_str8_list_insert(&list, &n6, 2);
  node   = wapp_str8_list_get(&list, 2);
  result = node != NULL && node->string == &s6 && list.total_size == 6 && list.node_count == 6;
  wapp_str8_list_insert(&list, &n7, 5);
  node   = wapp_str8_list_get(&list, 5);
  result = result && node != NULL && node->string == &s7 && list.total_size == 7 && list.node_count == 7;

  return wapp_tester_result(result);
}

TestFuncResult test_str8_list_pop_front(void) {
  bool result;

  Str8 s1 = wapp_str8_lit("1");
  Str8 s2 = wapp_str8_lit("2");
  Str8 s3 = wapp_str8_lit("3");
  Str8 s4 = wapp_str8_lit("4");
  Str8 s5 = wapp_str8_lit("5");

  Str8List list = {0};
  Str8Node n1   = { .string = &s1 };
  Str8Node n2   = { .string = &s2 };
  Str8Node n3   = { .string = &s3 };
  Str8Node n4   = { .string = &s4 };
  Str8Node n5   = { .string = &s5 };

  wapp_str8_list_push_back(&list, &n1);
  wapp_str8_list_push_back(&list, &n2);
  wapp_str8_list_push_back(&list, &n3);
  wapp_str8_list_push_back(&list, &n4);
  wapp_str8_list_push_back(&list, &n5);

  Str8Node *node = wapp_str8_list_pop_front(&list);
  result = node == &n1 && node->string == &s1 && wapp_str8_equal(node->string, &s1) && list.total_size == 4 && list.node_count == 4;

  node = wapp_str8_list_pop_front(&list);
  result = result && node == &n2 && node->string == &s2 && wapp_str8_equal(node->string, &s2) && list.total_size == 3 && list.node_count == 3;

  node = wapp_str8_list_pop_front(&list);
  result = result && node == &n3 && node->string == &s3 && wapp_str8_equal(node->string, &s3) && list.total_size == 2 && list.node_count == 2;

  node = wapp_str8_list_pop_front(&list);
  result = result && node == &n4 && node->string == &s4 && wapp_str8_equal(node->string, &s4) && list.total_size == 1 && list.node_count == 1;

  node = wapp_str8_list_pop_front(&list);
  result = result && node == &n5 && node->string == &s5 && wapp_str8_equal(node->string, &s5) && list.total_size == 0 && list.node_count == 0;

  return wapp_tester_result(result);
}

TestFuncResult test_str8_list_pop_back(void) {
  bool result;

  Str8 s1 = wapp_str8_lit("1");
  Str8 s2 = wapp_str8_lit("2");
  Str8 s3 = wapp_str8_lit("3");
  Str8 s4 = wapp_str8_lit("4");
  Str8 s5 = wapp_str8_lit("5");

  Str8List list = {0};
  Str8Node n1   = { .string = &s1 };
  Str8Node n2   = { .string = &s2 };
  Str8Node n3   = { .string = &s3 };
  Str8Node n4   = { .string = &s4 };
  Str8Node n5   = { .string = &s5 };

  wapp_str8_list_push_front(&list, &n1);
  wapp_str8_list_push_front(&list, &n2);
  wapp_str8_list_push_front(&list, &n3);
  wapp_str8_list_push_front(&list, &n4);
  wapp_str8_list_push_front(&list, &n5);

  Str8Node *node = wapp_str8_list_pop_back(&list);
  result = node == &n1 && node->string == &s1 && wapp_str8_equal(node->string, &s1) && list.total_size == 4 && list.node_count == 4;

  node = wapp_str8_list_pop_back(&list);
  result = result && node == &n2 && node->string == &s2 && wapp_str8_equal(node->string, &s2) && list.total_size == 3 && list.node_count == 3;

  node = wapp_str8_list_pop_back(&list);
  result = result && node == &n3 && node->string == &s3 && wapp_str8_equal(node->string, &s3) && list.total_size == 2 && list.node_count == 2;

  node = wapp_str8_list_pop_back(&list);
  result = result && node == &n4 && node->string == &s4 && wapp_str8_equal(node->string, &s4) && list.total_size == 1 && list.node_count == 1;

  node = wapp_str8_list_pop_back(&list);
  result = result && node == &n5 && node->string == &s5 && wapp_str8_equal(node->string, &s5) && list.total_size == 0 && list.node_count == 0;

  return wapp_tester_result(result);
}

TestFuncResult test_str8_list_remove(void) {
  bool result;

  Str8 s1 = wapp_str8_lit("1");
  Str8 s2 = wapp_str8_lit("2");
  Str8 s3 = wapp_str8_lit("3");
  Str8 s4 = wapp_str8_lit("4");
  Str8 s5 = wapp_str8_lit("5");

  Str8List list = {0};
  Str8Node n1   = { .string = &s1 };
  Str8Node n2   = { .string = &s2 };
  Str8Node n3   = { .string = &s3 };
  Str8Node n4   = { .string = &s4 };
  Str8Node n5   = { .string = &s5 };

  wapp_str8_list_push_back(&list, &n1);
  wapp_str8_list_push_back(&list, &n2);
  wapp_str8_list_push_back(&list, &n3);
  wapp_str8_list_push_back(&list, &n4);
  wapp_str8_list_push_back(&list, &n5);

  Str8Node *node = wapp_str8_list_remove(&list, 0);
  result = node == &n1 && node->string == &s1 && wapp_str8_equal(node->string, &s1) && list.total_size == 4 && list.node_count == 4;

  node = wapp_str8_list_remove(&list, 0);
  result = result && node == &n2 && node->string == &s2 && wapp_str8_equal(node->string, &s2) && list.total_size == 3 && list.node_count == 3;

  node = wapp_str8_list_remove(&list, 0);
  result = result && node == &n3 && node->string == &s3 && wapp_str8_equal(node->string, &s3) && list.total_size == 2 && list.node_count == 2;

  node = wapp_str8_list_remove(&list, 0);
  result = result && node == &n4 && node->string == &s4 && wapp_str8_equal(node->string, &s4) && list.total_size == 1 && list.node_count == 1;

  node = wapp_str8_list_remove(&list, 0);
  result = result && node == &n5 && node->string == &s5 && wapp_str8_equal(node->string, &s5) && list.total_size == 0 && list.node_count == 0;

  return wapp_tester_result(result);
}