// test_objectIO.cpp

#include <ulib/internal/common.h>
#include <ulib/internal/objectIO.h>

#include <ulib/debug/trace.h>
#include <ulib/debug/common.h>
#include <ulib/debug/error_memory.h>

class Prima {
public:
   U_MEMORY_TEST

   const char* a;

   Prima() { a = "io_sono_la_classe_Prima"; }

   bool operator==(const Prima& l) { return (memcmp(a, l.a, strlen(a)) == 0); }

   friend istream& operator>>(istream& is,       Prima& l);
   friend ostream& operator<<(ostream& os, const Prima& l);
};

istream& operator>>(istream& is, Prima& l)
{
   static char buffer1[128];

   is >> buffer1;

   l.a = buffer1;

   return is;
}

ostream& operator<<(ostream& os, const Prima& l) 
{
   U_TRACE(5, "Prima::operator<<()")

   U_DUMP_OBJECT(l) // per simulare ricorsione in U_OBJECT_TO_TRACE()

   os << l.a;

   return os;
}

class Seconda {
public:
   U_MEMORY_TEST

   const char* b;

   Seconda() { b = "io_sono_la_classe_Seconda"; }

   bool operator==(const Seconda& l) { return (memcmp(b, l.b, strlen(b)) == 0); }

   friend istream& operator>>(istream& is,       Seconda& l);
   friend ostream& operator<<(ostream& os, const Seconda& l);
};

istream& operator>>(istream& is, Seconda& l)
{
   static char buffer2[128];

   is >> buffer2;

   l.b = buffer2;

   return is;
}

ostream& operator<<(ostream& os, const Seconda& l)
{
   U_TRACE(5+256, "Seconda::operator<<()")

   Prima a1;

   U_DUMP_OBJECT(a1) // per simulare ricorsione in U_OBJECT_TO_TRACE()

   os << l.b;

   return os;
}

int U_EXPORT main(int argc, char** argv)
{
   U_ULIB_INIT(argv);

   (void) putenv((char*)("UTRACE_SIGNAL=5 10k 0"));

   raise(SIGUSR2); // trace on/off

   U_TRACE(5, "main(%d)", argc)

   U_SET_LOCATION_INFO;
   Prima a, a1;

   U_SET_LOCATION_INFO;
   Seconda b, b1;

   U_DUMP_OBJECT(a)
   U_DUMP_OBJECT(b)

   U_INTERNAL_DUMP("Prima = %O Seconda = %O", U_OBJECT_TO_TRACE(a), U_OBJECT_TO_TRACE(b))

   U_SET_LOCATION_INFO;

   const char* a_str = UObject2String(a);

   U_SET_LOCATION_INFO;

   if (memcmp(a_str, U_CONSTANT_TO_PARAM("io_sono_la_classe_Prima"))) U_ERROR("Error on UObject2String()...", 0);

   UString2Object(U_CONSTANT_TO_PARAM("io_sono_la_classe_Prima"), a1);

   if (!(a == a1)) U_ERROR("Error on UString2Object()...", 0);

   const char* b_str = UObject2String(b);

   if (memcmp(b_str, U_CONSTANT_TO_PARAM("io_sono_la_classe_Seconda"))) U_ERROR("Error on UObject2String()...", 0);

   UString2Object(U_CONSTANT_TO_PARAM("io_sono_la_classe_Seconda"), b1);

   if (!(b == b1)) U_ERROR("Error on UString2Object()...", 0);
}