src/stable/randomcmwc.cpp


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64

/*
 * Copyright (C) 2007-2019 Xagasoft, All rights reserved.
 *
 * This file is part of the libbu++ library and is released under the
 * terms of the license contained in the file LICENSE.
 */

#include "bu/randomcmwc.h"

#include "bu/randombasic.h"

#define PHI 0x9e3779b9

Bu::RandomCmwc::RandomCmwc( int32_t iSeed ) :
    q( 0 ),
    c( 362436 )
{
    q = new uint32_t[4096];
    seed( iSeed );
}

Bu::RandomCmwc::~RandomCmwc()
{
    delete[] q;
}

void Bu::RandomCmwc::seed( int32_t iSeed )
{
    i = 4095;
    c = 362436;

    Bu::RandomBasic rb;
    rb.seed( iSeed );

    for( int j = 0; j < 4096; j++ )
        q[j] = rb.rand();

    c = rb.rand();

    return;
    q[0] = (uint32_t)rb.rand();
    q[1] = (uint32_t)rb.rand() + PHI;
    q[2] = (uint32_t)rb.rand() + PHI + PHI;

    for (int j = 3; j < 4096; j++)
        q[j] = q[j - 3] ^ q[j - 2] ^ PHI ^ j;
}

int32_t Bu::RandomCmwc::rand()
{
    uint64_t t, a = 18782LL;
    uint32_t x, r = 0xfffffffe;
    i = (i + 1) & 4095;
    t = a * q[i] + c;
    c = (t >> 32);
    x = t + c;
    if( x < c )
    {
        x++;
        c++;
    }
    return (q[i] = r - x);
}