#define _CRT_SECURE_NO_WARNINGS
#include <iostream>
#include <tuple>
#include <cstring>

#include "gtest/gtest.h"

#include "libimp/fmt.h"

TEST(fmt, spec) {
  EXPECT_STREQ(imp::spec("hello")(123).fstr.data(), "hello");
  EXPECT_EQ(imp::spec("hello")(123).param , 123);
  EXPECT_STREQ(imp::spec("hello")("world").fstr.data(), "hello");
  EXPECT_STREQ(imp::spec("hello")("world").param , "world");
}

TEST(fmt, to_string) {
  std::string joined;
  imp::fmt_context ctx(joined);

  auto check = [&](auto &&txt, auto &&...val) {
    ctx.reset();
    EXPECT_TRUE(imp::to_string(ctx, std::forward<decltype(val)>(val)...));
    ctx.finish();
    EXPECT_EQ(joined, std::forward<decltype(txt)>(txt));
  };

  /// \brief string
  check("", "");
  check("%what%", "%what%");
  check("    %what%", "%what%", "10");
  check("%what%    ", "%what%", "-10");

  /// \brief character
  check("A", 'A');
  check("A", L'A');
  check("A", u'A');
  check("A", U'A');

  /// \brief numeric
  check("123"       , (signed char)123      );
  check("-65"       , (signed char)-321     );
  check("123"       , (unsigned char)123    );
  check("65"        , (unsigned char)321    );
  check("123"       , (short)123            );
  check("-321"      , (short)-321           );
  check("123"       , (unsigned short)123   );
  check("321"       , (unsigned short)321   );
  check("-7949"     , (short)123123         );
  check("6359"      , (short)-321321        );
  check("57587"     , (unsigned short)123123);
  check("59177"     , (unsigned short)321321);
  check("123123"    , 123123                );
  check("-321321"   , -321321               );
  check("123123"    , 123123u               );
  check("321321"    , 321321u               );
  check("123123"    , 123123ll              );
  check("-321321"   , -321321ll             );
  check("123123"    , 123123ull             );
  check("321321"    , 321321ull             );
  check("1e0f3"     , 123123, "x"           );
  check("1e0f3"     , 123123u, "x"          );
  check("1CAAB5C3B3", 123123123123ll, "X"   );
  check("1CAAB5C3B3", 123123123123ull, "X"  );

  /// \brief floating point
  check("123.123"     , 123.123f, ".3");
  check("0123.12300"  , 123.123, "010.5");
  check("123.123000"  , 123.123l, "010.6");
  check("1.500000e+00", 1.5, "e");
  check("1.500000E+00", 1.5, "E");
  double r = 0.0;
  ctx.reset(); EXPECT_TRUE(imp::to_string(ctx, 0.0/r)); ctx.finish();
  std::cout << joined << "\n";
  ctx.reset(); EXPECT_TRUE(imp::to_string(ctx, 1.0/r)); ctx.finish();
  std::cout << joined << "\n";

  /// \brief pointer
  check("null", nullptr);
  int *p = (int *)0x0f013a04;
  ctx.reset(); EXPECT_TRUE(imp::to_string(ctx, (void *)p)); ctx.finish();
  std::cout << joined << "\n";

  /// \brief date and time
  auto tp = std::chrono::system_clock::now();
  auto tt = std::chrono::system_clock::to_time_t(tp);
  auto tm = *std::localtime(&tt);
  ctx.reset(); EXPECT_TRUE(imp::to_string(ctx, tm)); ctx.finish();
  std::cout << joined << "\n";
  std::string tm_str = joined;
  ctx.reset(); EXPECT_TRUE(imp::to_string(ctx, tp)); ctx.finish();
  EXPECT_EQ(tm_str, joined);
}

TEST(fmt, fmt) {
  char const txt[] = "hello world.";

  /// \brief hello world
  auto s = imp::fmt("hello", " ", "world", ".");
  EXPECT_EQ(s, txt);

  /// \brief chrono
  std::cout << imp::fmt('[', std::chrono::system_clock::now(), "] ", s) << "\n";

  /// \brief long string
  s = imp::fmt(imp::spec("4096")(txt));
  std::string test(4096, ' ');
  std::memcpy(&test[test.size() - sizeof(txt) + 1], txt, sizeof(txt) - 1);
  EXPECT_EQ(s, test);
}

namespace {

class foo {};

bool tag_invoke(decltype(imp::fmt_to), imp::fmt_context &, foo arg) noexcept(false) {
  throw arg;
  return {};
}

} // namespace

TEST(fmt, throw) {
  EXPECT_THROW(std::ignore = imp::fmt(foo{}), foo);
}