mirror of
https://github.com/aaru-dps/Aaru.Checksums.Native.git
synced 2025-12-16 11:14:29 +00:00
128 lines
3.6 KiB
C
128 lines
3.6 KiB
C
/*
|
|
* This file is part of the Aaru Data Preservation Suite.
|
|
* Copyright (c) 2019-2023 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 "crc32.h"
|
|
|
|
AARU_EXPORT crc32_ctx* AARU_CALL crc32_init(void)
|
|
{
|
|
crc32_ctx* ctx = (crc32_ctx*)malloc(sizeof(crc32_ctx));
|
|
|
|
if(!ctx) return NULL;
|
|
|
|
ctx->crc = CRC32_ISO_SEED;
|
|
|
|
return ctx;
|
|
}
|
|
|
|
AARU_EXPORT int AARU_CALL crc32_update(crc32_ctx* ctx, const uint8_t* data, uint32_t len)
|
|
{
|
|
if(!ctx || !data) return -1;
|
|
|
|
#if defined(__x86_64__) || defined(__amd64) || defined(_M_AMD64) || defined(_M_X64) || defined(__I386__) || \
|
|
defined(__i386__) || defined(__THW_INTEL) || defined(_M_IX86)
|
|
if(have_clmul())
|
|
{
|
|
ctx->crc = ~crc32_clmul(~ctx->crc, data, (long)len);
|
|
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
#if defined(__aarch64__) || defined(_M_ARM64) || defined(__arm__) || defined(_M_ARM)
|
|
#if __ARM_ARCH >= 8
|
|
if(have_arm_crc32())
|
|
{
|
|
ctx->crc = armv8_crc32_little(ctx->crc, data, len);
|
|
|
|
return 0;
|
|
}
|
|
#endif
|
|
if(have_neon())
|
|
{
|
|
ctx->crc = ~crc32_vmull(~ctx->crc, data, len);
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
crc32_slicing(&ctx->crc, data, len);
|
|
return 0;
|
|
}
|
|
|
|
AARU_EXPORT void AARU_CALL crc32_slicing(uint32_t* previous_crc, const uint8_t* data, long len)
|
|
{
|
|
// Unroll according to Intel slicing by uint8_t
|
|
// http://www.intel.com/technology/comms/perfnet/download/CRC_generators.pdf
|
|
// http://sourceforge.net/projects/slicing-by-8/
|
|
uint32_t c;
|
|
const uint32_t* current;
|
|
const uint8_t* current_char = (const uint8_t*)data;
|
|
const size_t unroll = 4;
|
|
const size_t bytes_at_once = 8 * unroll;
|
|
uintptr_t unaligned_length = (4 - (((uintptr_t)current_char) & 3)) & 3;
|
|
|
|
c = *previous_crc;
|
|
|
|
while((len != 0) && (unaligned_length != 0))
|
|
{
|
|
c = (c >> 8) ^ crc32_table[0][(c & 0xFF) ^ *current_char++];
|
|
len--;
|
|
unaligned_length--;
|
|
}
|
|
|
|
current = (const uint32_t*)current_char;
|
|
|
|
while(len >= bytes_at_once)
|
|
{
|
|
size_t unrolling;
|
|
for(unrolling = 0; unrolling < unroll; unrolling++)
|
|
{
|
|
uint32_t one = *current++ ^ c;
|
|
uint32_t two = *current++;
|
|
// TODO: Big endian!
|
|
c = crc32_table[0][(two >> 24) & 0xFF] ^ crc32_table[1][(two >> 16) & 0xFF] ^
|
|
crc32_table[2][(two >> 8) & 0xFF] ^ crc32_table[3][two & 0xFF] ^ crc32_table[4][(one >> 24) & 0xFF] ^
|
|
crc32_table[5][(one >> 16) & 0xFF] ^ crc32_table[6][(one >> 8) & 0xFF] ^ crc32_table[7][one & 0xFF];
|
|
}
|
|
|
|
len -= bytes_at_once;
|
|
}
|
|
|
|
current_char = (const uint8_t*)current;
|
|
|
|
while(len-- != 0) c = (c >> 8) ^ crc32_table[0][(c & 0xFF) ^ *current_char++];
|
|
|
|
*previous_crc = c;
|
|
}
|
|
|
|
AARU_EXPORT int AARU_CALL crc32_final(crc32_ctx* ctx, uint32_t* crc)
|
|
{
|
|
if(!ctx) return -1;
|
|
|
|
*crc = ctx->crc ^ CRC32_ISO_SEED;
|
|
|
|
return 0;
|
|
}
|
|
|
|
AARU_EXPORT void AARU_CALL crc32_free(crc32_ctx* ctx)
|
|
{
|
|
if(ctx) free(ctx);
|
|
} |