rand.h

Go to the documentation of this file.

 
#ifndef LIBA_RAND_H
#define LIBA_RAND_H
 
#include "a.h"

 
/* clang-format off */
#define A_RAND_LCG48_INIT {A_U64_C(0x5DEECE66D), A_U16_C(0xB), {A_U16_C(0x330E), A_U16_C(0xABCD), A_U16_C(0x1234)}}
/* clang-format on */
 
typedef struct a_rand_lcg48 a_rand_lcg48;
 
#if defined(__cplusplus)
namespace a
{
typedef struct a_rand_lcg48 rand_lcg48;
} /* namespace a */
extern "C" {
#endif /* __cplusplus */
#if !defined A_HAVE_INLINE || defined(LIBA_RAND_C)
#undef A_INTERN
#define A_INTERN A_PUBLIC extern
#endif /* A_HAVE_INLINE */

A_EXTERN A_NONULL((1)) void a_rand_lcg48_init(a_rand_lcg48 *ctx, a_i64 x);
A_EXTERN A_NONULL((1)) void a_rand_lcg48_seed(a_rand_lcg48 *ctx, a_u16 const x[3]);
A_EXTERN A_NONULL((1, 2)) a_u64 a_rand_lcg48_next(a_rand_lcg48 *ctx, a_u16 x[3]);

A_INTERN A_NONULL((1)) a_i32 a_rand_lcg48i(a_rand_lcg48 *ctx);
A_EXTERN A_NONULL((1, 2)) a_i32 a_rand_lcg48i_(a_rand_lcg48 *ctx, a_u16 x[3]);
A_INTERN A_NONULL((1)) a_u32 a_rand_lcg48u(a_rand_lcg48 *ctx);
A_EXTERN A_NONULL((1, 2)) a_u32 a_rand_lcg48u_(a_rand_lcg48 *ctx, a_u16 x[3]);
A_INTERN A_NONULL((1)) a_f64 a_rand_lcg48f(a_rand_lcg48 *ctx);
A_EXTERN A_NONULL((1, 2)) a_f64 a_rand_lcg48f_(a_rand_lcg48 *ctx, a_u16 x[3]);

A_EXTERN A_NONULL((1)) void a_rand_lcg48_shuf(a_rand_lcg48 *ctx, void *ptr, a_size num, a_size siz);
 
#if !defined A_HAVE_INLINE || defined(LIBA_RAND_C)
#undef A_INTERN
#define A_INTERN static A_INLINE
#endif /* A_HAVE_INLINE */
#if defined(__cplusplus)
} /* extern "C" */
#endif /* __cplusplus */

struct a_rand_lcg48
{
    a_u64 a; 
    a_u16 c; 
    a_u16 x[3]; 
#if defined(__cplusplus)
    A_INLINE void init(a_i64 x_) { a_rand_lcg48_init(this, x_); }
    A_INLINE void seed(a_u16 const x_[3] = A_NULL) { a_rand_lcg48_seed(this, x_); }
    A_INLINE A_NONULL((2)) a_u64 next(a_u16 x_[3]) { return a_rand_lcg48_next(this, x_); }
    A_INLINE a_i32 i(a_u16 x_[3] = A_NULL)
    {
        if (x_) { return a_rand_lcg48i_(this, x_); }
        return a_rand_lcg48i_(this, x);
    }

    A_INLINE a_u32 u(a_u16 x_[3] = A_NULL)
    {
        if (x_) { return a_rand_lcg48u_(this, x_); }
        return a_rand_lcg48u_(this, x);
    }

    A_INLINE a_f64 f(a_u16 x_[3] = A_NULL)
    {
        if (x_) { return a_rand_lcg48f_(this, x_); }
        return a_rand_lcg48f_(this, x);
    }

    A_INLINE void shuf(void *ptr, a_size num, a_size siz)
    {
        a_rand_lcg48_shuf(this, ptr, num, siz);
    }
#endif /* __cplusplus */
};
 
#if defined(LIBA_RAND_C)
#undef A_INTERN
#define A_INTERN A_INLINE
#endif /* LIBA_RAND_C */
#if defined(A_HAVE_INLINE) || defined(LIBA_RAND_C)
 
A_INTERN a_i32 a_rand_lcg48i(a_rand_lcg48 *ctx) { return a_rand_lcg48i_(ctx, ctx->x); }
A_INTERN a_u32 a_rand_lcg48u(a_rand_lcg48 *ctx) { return a_rand_lcg48u_(ctx, ctx->x); }
A_INTERN a_f64 a_rand_lcg48f(a_rand_lcg48 *ctx) { return a_rand_lcg48f_(ctx, ctx->x); }
 
#endif /* A_HAVE_INLINE */
#if defined(LIBA_RAND_C)
#undef A_INTERN
#define A_INTERN static A_INLINE
#endif /* LIBA_RAND_C */

 
#endif /* a/rand.h */