1 files changed, 114 insertions, 0 deletions
diff --git a/nihil.ucl/object.cc b/nihil.ucl/object.cc
new file mode 100644
index 0000000..53fc4c7
--- /dev/null
+++ b/nihil.ucl/object.cc
@@ -0,0 +1,114 @@
+/*
+ * This source code is released into the public domain.
+ */
+
+module;
+
+#include <cstdlib>
+#include <string>
+#include <utility>
+
+#include <ucl.h>
+
+module nihil.ucl;
+
+namespace nihil::ucl {
+
+object::object(ref_t, ::ucl_object_t const *object)
+	: m_object(::ucl_object_ref(object))
+{
+}
+
+object::object(noref_t, ::ucl_object_t *object)
+	: m_object(object)
+{
+}
+
+object::~object() {
+	if (m_object != nullptr)
+		::ucl_object_unref(m_object);
+}
+
+object::object(object &&other) noexcept
+	: m_object(std::exchange(other.m_object, nullptr))
+{}
+
+object::object(object const &other)
+	: m_object(nullptr)
+{
+	m_object = ::ucl_object_copy(other.get_ucl_object());
+	if (m_object == nullptr)
+		throw std::runtime_error("failed to copy UCL object");
+}
+
+auto object::operator=(this object &self, object &&other) noexcept
+	-> object &
+{
+	if (&self != &other)
+		self.m_object = std::exchange(other.m_object, nullptr);
+	return self;
+}
+
+auto object::operator=(this object &self, object const &other) -> object &
+{
+	return self = object(other);
+}
+
+auto object::ref(this object const &self) -> object
+{
+	return object(nihil::ucl::ref, self.get_ucl_object());
+}
+
+auto object::type(this object const &self) -> object_type
+{
+	auto utype = ::ucl_object_type(self.get_ucl_object());
+	return static_cast<object_type>(utype);
+}
+
+auto object::get_ucl_object(this object &self) -> ::ucl_object_t *
+{
+	if (self.m_object == nullptr)
+		throw std::logic_error("attempt to access empty UCL object");
+	return self.m_object;
+}
+
+auto object::get_ucl_object(this object const &self) -> ::ucl_object_t const *
+{
+	if (self.m_object == nullptr)
+		throw std::logic_error("attempt to access empty UCL object");
+	return self.m_object;
+}
+
+// Return the key of this object.
+auto object::key(this object const &self) -> std::string_view
+{
+	auto dlen = std::size_t{};
+	auto const *dptr = ::ucl_object_keyl(self.get_ucl_object(),
+					     &dlen);
+	return {dptr, dlen};
+}
+
+auto swap(object &a, object &b) -> void
+{
+	std::swap(a.m_object, b.m_object);
+}
+
+auto operator<=>(object const &lhs, object const &rhs) -> std::strong_ordering
+{
+	auto cmp = ::ucl_object_compare(lhs.get_ucl_object(),
+					rhs.get_ucl_object());
+
+	if (cmp < 0)
+		return std::strong_ordering::less;
+	else if (cmp > 0)
+		return std::strong_ordering::greater;
+	else
+		return std::strong_ordering::equal;
+}
+
+auto operator==(object const &lhs, object const &rhs) -> bool
+{
+	return (lhs <=> rhs) == std::strong_ordering::equal;
+}
+
+} // namespace nihil::ucl