e0a651945c
Add copyright to most .pl files This does NOT cover any .pl file that has other copyright in it. Most of those are Andy's but some are public domain. Fix typo's in some existing files. Reviewed-by: Richard Levitte <levitte@openssl.org>
131 lines
3.2 KiB
C
131 lines
3.2 KiB
C
/*
|
|
* Copyright 2012, Samuel Neves <sneves@dei.uc.pt>.
|
|
* Copyright 2016 The OpenSSL Project Authors. All Rights Reserved.
|
|
*
|
|
* Licensed under the OpenSSL licenses (the "License");
|
|
* you may not use this file except in compliance with the License.
|
|
* You may obtain a copy of the License at
|
|
* https://www.openssl.org/source/license.html
|
|
* or in the file LICENSE in the source distribution.
|
|
*/
|
|
|
|
/*
|
|
* Derived from the BLAKE2 reference implementation written by Samuel Neves.
|
|
* More information about the BLAKE2 hash function and its implementations
|
|
* can be found at https://blake2.net.
|
|
*/
|
|
|
|
#include <string.h>
|
|
#include "e_os.h"
|
|
|
|
static ossl_inline uint32_t load32(const uint8_t *src)
|
|
{
|
|
const union {
|
|
long one;
|
|
char little;
|
|
} is_endian = { 1 };
|
|
|
|
if (is_endian.little) {
|
|
uint32_t w;
|
|
memcpy(&w, src, sizeof(w));
|
|
return w;
|
|
} else {
|
|
uint32_t w = ((uint32_t)src[0])
|
|
| ((uint32_t)src[1] << 8)
|
|
| ((uint32_t)src[2] << 16)
|
|
| ((uint32_t)src[3] << 24);
|
|
return w;
|
|
}
|
|
}
|
|
|
|
static ossl_inline uint64_t load64(const uint8_t *src)
|
|
{
|
|
const union {
|
|
long one;
|
|
char little;
|
|
} is_endian = { 1 };
|
|
|
|
if (is_endian.little) {
|
|
uint64_t w;
|
|
memcpy(&w, src, sizeof(w));
|
|
return w;
|
|
} else {
|
|
uint64_t w = ((uint64_t)src[0])
|
|
| ((uint64_t)src[1] << 8)
|
|
| ((uint64_t)src[2] << 16)
|
|
| ((uint64_t)src[3] << 24)
|
|
| ((uint64_t)src[4] << 32)
|
|
| ((uint64_t)src[5] << 40)
|
|
| ((uint64_t)src[6] << 48)
|
|
| ((uint64_t)src[7] << 56);
|
|
return w;
|
|
}
|
|
}
|
|
|
|
static ossl_inline void store32(uint8_t *dst, uint32_t w)
|
|
{
|
|
const union {
|
|
long one;
|
|
char little;
|
|
} is_endian = { 1 };
|
|
|
|
if (is_endian.little) {
|
|
memcpy(dst, &w, sizeof(w));
|
|
} else {
|
|
uint8_t *p = (uint8_t *)dst;
|
|
int i;
|
|
|
|
for (i = 0; i < 4; i++)
|
|
p[i] = (uint8_t)(w >> (8 * i));
|
|
}
|
|
}
|
|
|
|
static ossl_inline void store64(uint8_t *dst, uint64_t w)
|
|
{
|
|
const union {
|
|
long one;
|
|
char little;
|
|
} is_endian = { 1 };
|
|
|
|
if (is_endian.little) {
|
|
memcpy(dst, &w, sizeof(w));
|
|
} else {
|
|
uint8_t *p = (uint8_t *)dst;
|
|
int i;
|
|
|
|
for (i = 0; i < 8; i++)
|
|
p[i] = (uint8_t)(w >> (8 * i));
|
|
}
|
|
}
|
|
|
|
static ossl_inline uint64_t load48(const uint8_t *src)
|
|
{
|
|
uint64_t w = ((uint64_t)src[0])
|
|
| ((uint64_t)src[1] << 8)
|
|
| ((uint64_t)src[2] << 16)
|
|
| ((uint64_t)src[3] << 24)
|
|
| ((uint64_t)src[4] << 32)
|
|
| ((uint64_t)src[5] << 40);
|
|
return w;
|
|
}
|
|
|
|
static ossl_inline void store48(uint8_t *dst, uint64_t w)
|
|
{
|
|
uint8_t *p = (uint8_t *)dst;
|
|
p[0] = (uint8_t)w;
|
|
p[1] = (uint8_t)(w>>8);
|
|
p[2] = (uint8_t)(w>>16);
|
|
p[3] = (uint8_t)(w>>24);
|
|
p[4] = (uint8_t)(w>>32);
|
|
p[5] = (uint8_t)(w>>40);
|
|
}
|
|
|
|
static ossl_inline uint32_t rotr32(const uint32_t w, const unsigned int c)
|
|
{
|
|
return (w >> c) | (w << (32 - c));
|
|
}
|
|
|
|
static ossl_inline uint64_t rotr64(const uint64_t w, const unsigned int c)
|
|
{
|
|
return (w >> c) | (w << (64 - c));
|
|
}
|