From 8c640a262969ef44cd8bc0e0abe95e2a54f4c3f5 Mon Sep 17 00:00:00 2001
From: Marcos Magueta <maguetamarcos@gmail.com>
Date: Thu, 5 Mar 2026 23:42:15 -0300
Subject: ocaml re-migration

---
 shared/librelational_engine/library.cpp | 23 +++++++++++++++++++++++
 1 file changed, 23 insertions(+)
 create mode 100644 shared/librelational_engine/library.cpp

(limited to 'shared/librelational_engine/library.cpp')

diff --git a/shared/librelational_engine/library.cpp b/shared/librelational_engine/library.cpp
new file mode 100644
index 0000000..a9b4c81
--- /dev/null
+++ b/shared/librelational_engine/library.cpp
@@ -0,0 +1,23 @@
+#include <iostream>
+#include <openssl/sha.h>
+#include <iomanip>
+#include <sstream>
+#include <cstring>
+
+#include <sys/stat.h>
+
+extern "C" {
+#include "library.h"
+
+    extern void compute_hash(char* computed_hash, const char *content) {
+        unsigned char hash[SHA256_DIGEST_LENGTH];
+        SHA256_CTX sha256;
+        SHA256_Init(&sha256);
+        SHA256_Update(&sha256, content, std::strlen(content));
+        SHA256_Final(hash, &sha256);
+        std::stringstream ss;
+        for (int i = 0; i < SHA256_DIGEST_LENGTH; i++)
+            ss << std::hex << std::setw(2) << std::setfill('0') << static_cast<int>(hash[i]);
+        std::memcpy(computed_hash, ss.str().c_str(), HASH_SIZE);
+    }
+}
-- 
cgit v1.2.3