1 // Copyright (c) 2012- PPSSPP Project.
2
3 // This program is free software: you can redistribute it and/or modify
4 // it under the terms of the GNU General Public License as published by
5 // the Free Software Foundation, version 2.0 or later versions.
6
7 // This program is distributed in the hope that it will be useful,
8 // but WITHOUT ANY WARRANTY; without even the implied warranty of
9 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
10 // GNU General Public License 2.0 for more details.
11
12 // A copy of the GPL 2.0 should have been included with the program.
13 // If not, see http://www.gnu.org/licenses/
14
15 // Official git repository and contact information can be found at
16 // https://github.com/hrydgard/ppsspp and http://www.ppsspp.org/.
17
18 // Mersenne Twister random number generator module.
19
20 #define SFMT_MEXP 19937
21 #include "ext/sfmt19937/SFMT.h"
22
23 #include "Common/Log.h"
24 #include "Core/HLE/HLE.h"
25 #include "Core/HLE/FunctionWrappers.h"
26 #include "Core/HLE/sceSfmt19937.h"
27
28
sceSfmt19937InitGenRand(u32 sfmt,u32 seed)29 static int sceSfmt19937InitGenRand(u32 sfmt, u32 seed) {
30 if (!Memory::IsValidAddress(sfmt)) {
31 ERROR_LOG(HLE, "sceSfmt19937InitGenRand(sfmt=%08x, seed=%08x) - bad address(es)", sfmt, seed);
32 return -1;
33 }
34 INFO_LOG(HLE, "sceSfmt19937InitGenRand(sfmt=%08x, seed=%08x)", sfmt, seed);
35
36 sfmt_t *psfmt = (sfmt_t *)Memory::GetPointerUnchecked(sfmt);
37 sfmt_init_gen_rand(psfmt, seed);
38
39 return 0;
40 }
41
sceSfmt19937InitByArray(u32 sfmt,u32 seeds,int seedslen)42 static int sceSfmt19937InitByArray(u32 sfmt, u32 seeds, int seedslen) {
43 if (!Memory::IsValidAddress(sfmt) || !Memory::IsValidAddress(seeds) || !Memory::IsValidAddress(seeds + 4 * (seedslen - 1))) {
44 ERROR_LOG(HLE, "sceSfmt19937InitByArray(sfmt=%08x, seeds=%08x, seedslen=%08x) - bad address(es)", sfmt, seeds, seedslen);
45 return -1;
46 }
47 INFO_LOG(HLE, "sceSfmt19937InitByArray(sfmt=%08x, seeds=%08x, seedslen=%08x)", sfmt, seeds, seedslen);
48
49 sfmt_t *psfmt = (sfmt_t *)Memory::GetPointerUnchecked(sfmt);
50 uint32_t *pseeds = (uint32_t *)Memory::GetPointerUnchecked(seeds);
51 sfmt_init_by_array(psfmt, pseeds, seedslen);
52
53 return 0;
54 }
55
sceSfmt19937GenRand32(u32 sfmt)56 static u32 sceSfmt19937GenRand32(u32 sfmt) {
57 if (!Memory::IsValidAddress(sfmt)) {
58 ERROR_LOG(HLE, "sceSfmt19937GenRand32(sfmt=%08x) - bad address(es)", sfmt);
59 return -1;
60 }
61 INFO_LOG(HLE, "sceSfmt19937GenRand32(sfmt=%08x)", sfmt);
62
63 sfmt_t *psfmt = (sfmt_t *)Memory::GetPointerUnchecked(sfmt);
64 u32 ret = sfmt_genrand_uint32(psfmt);
65
66 return ret;
67 }
68
sceSfmt19937GenRand64(u32 sfmt)69 static u64 sceSfmt19937GenRand64(u32 sfmt) {
70 if (!Memory::IsValidAddress(sfmt)) {
71 ERROR_LOG(HLE, "sceSfmt19937GenRand64(sfmt=%08x) - bad address(es)", sfmt);
72 return -1;
73 }
74 INFO_LOG(HLE, "sceSfmt19937GenRand64(sfmt=%08x)", sfmt);
75
76 sfmt_t *psfmt = (sfmt_t *)Memory::GetPointerUnchecked(sfmt);
77 u64 ret = sfmt_genrand_uint64(psfmt);
78
79 return ret;
80 }
81
sceSfmt19937FillArray32(u32 sfmt,u32 array,int arraylen)82 static int sceSfmt19937FillArray32(u32 sfmt, u32 array, int arraylen) {
83 if (!Memory::IsValidAddress(sfmt) || !Memory::IsValidAddress(array) || !Memory::IsValidAddress(array + 4 * (arraylen - 1))) {
84 ERROR_LOG(HLE, "sceSfmt19937FillArray32(sfmt=%08x, ar=%08x, arlen=%08x) - bad address(es)", sfmt, array, arraylen);
85 return -1;
86 }
87 INFO_LOG(HLE, "sceSfmt19937FillArray32(sfmt=%08x, ar=%08x, arlen=%08x)", sfmt, array, arraylen);
88
89 sfmt_t *psfmt = (sfmt_t *)Memory::GetPointerUnchecked(sfmt);
90 uint32_t *parray = (uint32_t *)Memory::GetPointerUnchecked(array);
91 sfmt_fill_array32(psfmt, parray, arraylen);
92
93 return 0;
94 }
95
sceSfmt19937FillArray64(u32 sfmt,u32 array,int arraylen)96 static int sceSfmt19937FillArray64(u32 sfmt, u32 array, int arraylen) {
97 if (!Memory::IsValidAddress(sfmt) || !Memory::IsValidAddress(array) || !Memory::IsValidAddress(array + 8 * (arraylen - 1))) {
98 ERROR_LOG(HLE, "sceSfmt19937FillArray64(sfmt=%08x, ar=%08x, arlen=%08x) - bad address(es)", sfmt, array, arraylen);
99 return -1;
100 }
101 INFO_LOG(HLE, "sceSfmt19937FillArray64(sfmt=%08x, ar=%08x, arlen=%08x)", sfmt, array, arraylen);
102
103 sfmt_t *psfmt = (sfmt_t *)Memory::GetPointerUnchecked(sfmt);
104 uint64_t *parray = (uint64_t *)Memory::GetPointerUnchecked(array);
105 sfmt_fill_array64(psfmt, parray, arraylen);
106
107 return 0;
108 }
109
110 const HLEFunction sceSfmt19937[] =
111 {
112 {0X161ACEB2, &WrapI_UU<sceSfmt19937InitGenRand>, "sceSfmt19937InitGenRand", 'i', "xx" },
113 {0XDD5A5D6C, &WrapI_UUI<sceSfmt19937InitByArray>, "sceSfmt19937InitByArray", 'i', "xxi"},
114 {0XB33FE749, &WrapU_U<sceSfmt19937GenRand32>, "sceSfmt19937GenRand32", 'x', "x" },
115 {0XD5AC9F99, &WrapU64_U<sceSfmt19937GenRand64>, "sceSfmt19937GenRand64", 'X', "x" },
116 {0XDB025BFA, &WrapI_UUI<sceSfmt19937FillArray32>, "sceSfmt19937FillArray32", 'i', "xxi"},
117 {0XEE2938C4, &WrapI_UUI<sceSfmt19937FillArray64>, "sceSfmt19937FillArray64", 'i', "xxi"},
118 };
119
Register_sceSfmt19937()120 void Register_sceSfmt19937()
121 {
122 RegisterModule("sceSfmt19937", ARRAY_SIZE(sceSfmt19937), sceSfmt19937);
123 }
124