summaryrefslogtreecommitdiff
path: root/basic
diff options
context:
space:
mode:
Diffstat (limited to 'basic')
-rw-r--r--basic/inc/pch/precompiled_sb.hxx2
-rw-r--r--basic/source/runtime/methods.cxx46
2 files changed, 40 insertions, 8 deletions
diff --git a/basic/inc/pch/precompiled_sb.hxx b/basic/inc/pch/precompiled_sb.hxx
index 8ed406da7931..d797b0b9cc39 100644
--- a/basic/inc/pch/precompiled_sb.hxx
+++ b/basic/inc/pch/precompiled_sb.hxx
@@ -30,7 +30,6 @@
#include <com/sun/star/uno/XInterface.hpp>
#include <com/sun/star/util/DateTime.hpp>
#include <comphelper/processfactory.hxx>
-#include <comphelper/random.hxx>
#include <comphelper/string.hxx>
#include <config_features.h>
#include <config_version.h>
@@ -46,6 +45,7 @@
#include <osl/file.hxx>
#include <osl/process.h>
#include <osl/time.h>
+#include <random>
#include <rtl/character.hxx>
#include <rtl/instance.hxx>
#include <rtl/math.hxx>
diff --git a/basic/source/runtime/methods.cxx b/basic/source/runtime/methods.cxx
index 377b66c3d703..a2bb3467e015 100644
--- a/basic/source/runtime/methods.cxx
+++ b/basic/source/runtime/methods.cxx
@@ -47,7 +47,6 @@
#include "errobject.hxx"
#include <comphelper/processfactory.hxx>
-#include <comphelper/random.hxx>
#include <comphelper/string.hxx>
#include <com/sun/star/uno/Sequence.hxx>
@@ -61,6 +60,8 @@
#include <boost/scoped_array.hpp>
#include <boost/scoped_ptr.hpp>
+#include <random>
+
using namespace comphelper;
using namespace osl;
using namespace com::sun::star;
@@ -3518,6 +3519,38 @@ RTLFUNC(Format)
}
}
+namespace {
+
+// note: BASIC does not use comphelper::random, because
+// Randomize(int) must be supported and should not affect non-BASIC random use
+struct RandomNumberGenerator
+{
+ std::mt19937 global_rng;
+
+ RandomNumberGenerator()
+ {
+ try
+ {
+ std::random_device rd;
+ // initialises the state of the global random number generator
+ // should only be called once.
+ // (note, a few std::variate_generator<> (like normal) have their
+ // own state which would need a reset as well to guarantee identical
+ // sequence of numbers, e.g. via myrand.distribution().reset())
+ global_rng.seed(rd() ^ time(nullptr));
+ }
+ catch (std::runtime_error& e)
+ {
+ SAL_WARN("basic", "Using std::random_device failed: " << e.what());
+ global_rng.seed(time(nullptr));
+ }
+ }
+};
+
+class theRandomNumberGenerator : public rtl::Static<RandomNumberGenerator, theRandomNumberGenerator> {};
+
+}
+
RTLFUNC(Randomize)
{
(void)pBasic;
@@ -3531,12 +3564,9 @@ RTLFUNC(Randomize)
if( rPar.Count() == 2 )
{
nSeed = (int)rPar.Get(1)->GetInteger();
+ theRandomNumberGenerator::get().global_rng.seed(nSeed);
}
- else
- {
- nSeed = (int)time(NULL);
- }
- comphelper::rng::reseed(nSeed);
+ // without parameter, no need to do anything - RNG is seeded at first use
}
RTLFUNC(Rnd)
@@ -3550,7 +3580,9 @@ RTLFUNC(Rnd)
}
else
{
- rPar.Get(0)->PutDouble(comphelper::rng::uniform_real_distribution());
+ std::uniform_real_distribution<double> dist(0.0, 1.0);
+ double const tmp(dist(theRandomNumberGenerator::get().global_rng));
+ rPar.Get(0)->PutDouble(tmp);
}
}