/*!A cross-platform build utility based on Lua * * Licensed under the Apache License, Version 2.0 (the "License"); * you may not use this file except in compliance with the License. * You may obtain a copy of the License at * * http://www.apache.org/licenses/LICENSE-2.0 * * Unless required by applicable law or agreed to in writing, software * distributed under the License is distributed on an "AS IS" BASIS, * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. * See the License for the specific language governing permissions and * limitations under the License. * * Copyright (C) 2015-present, Xmake Open Source Community. * * @author ruki * @file rand128.c * */ /* ////////////////////////////////////////////////////////////////////////////////////// * trace */ #define TB_TRACE_MODULE_NAME "rand128" #define TB_TRACE_MODULE_DEBUG (0) /* ////////////////////////////////////////////////////////////////////////////////////// * includes */ #include "prefix.h" /* ////////////////////////////////////////////////////////////////////////////////////// * implementation */ tb_int_t xm_hash_rand128(lua_State *lua) { tb_assert_and_check_return_val(lua, 0); static union { tb_byte_t b[16]; tb_uint64_t word[2]; } s_seed = { 0 }; if (!s_seed.word[0] && !s_seed.word[1]) { s_seed.word[0] = (tb_uint64_t)tb_uclock(); s_seed.word[1] = (tb_uint64_t)tb_uclock(); } s_seed.word[0] = xm_hash_xorshift128(s_seed.word); s_seed.word[1] = xm_hash_xorshift128(s_seed.word); tb_char_t s[256]; tb_size_t n = xm_hash_make_cstr(s, s_seed.b, 16); lua_pushlstring(lua, s, n); return 1; }