Added ADLER32.

adler32.c

@@ -0,0 +1,65 @@
+/*
+ * This file is part of the Aaru Data Preservation Suite.
+ * Copyright (c) 2019-2021 Natalia Portillo.
+ *
+ * This library is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License as
+ * published by the Free Software Foundation; either version 2.1 of the
+ * License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, see <http://www.gnu.org/licenses/>.
+ */
+
+#include <stdint.h>
+#include <stdlib.h>
+
+#include "library.h"
+#include "adler32.h"
+
+adler32_ctx* adler32_init()
+{
+    adler32_ctx* ctx;
+
+    ctx = (adler32_ctx*)malloc(sizeof(adler32_ctx));
+
+    if(!ctx) return NULL;
+
+    ctx->sum1 = 1;
+    ctx->sum2 = 0;
+
+    return ctx;
+}
+
+int adler32_update(adler32_ctx* ctx, const uint8_t* data, uint32_t len)
+{
+    if(!ctx || !data) return -1;
+
+    for(uint32_t i = 0; i < len; i++)
+    {
+        ctx->sum1 = (ctx->sum1 + data[i]) % ADLER_MODULE;
+        ctx->sum2 = (ctx->sum2 + ctx->sum1) % ADLER_MODULE;
+    }
+
+    return 0;
+}
+
+int adler32_final(adler32_ctx* ctx, uint32_t* checksum)
+{
+    if(!ctx) return -1;
+
+    *checksum = (ctx->sum2 << 16) | ctx->sum1;
+    return 0;
+}
+
+void adler32_free(adler32_ctx* ctx)
+{
+    if(!ctx) return;
+
+    free(ctx);
+}