mirror of
https://github.com/mkxp-z/mkxp-z.git
synced 2025-08-23 15:23:44 +02:00
13c0657691
Any relative paths that the game tries to access in libretro builds will now be relative to whatever is the current working directory in the Ruby sandbox, which will also now be initialized to the game directory during initialization. Before, all of the bindings that took paths were hardcoded to prepend the path with the game directory.
99 lines
3.6 KiB
C++
99 lines
3.6 KiB
C++
/*
|
|
** binding-util.cpp
|
|
**
|
|
** This file is part of mkxp.
|
|
**
|
|
** Copyright (C) 2013 - 2021 Amaryllis Kulla <ancurio@mapleshrine.eu>
|
|
**
|
|
** mkxp is free software: you can redistribute it and/or modify
|
|
** it under the terms of the GNU General Public License as published by
|
|
** the Free Software Foundation, either version 2 of the License, or
|
|
** (at your option) any later version.
|
|
**
|
|
** mkxp is distributed in the hope that it will be useful,
|
|
** but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
** GNU General Public License for more details.
|
|
**
|
|
** You should have received a copy of the GNU General Public License
|
|
** along with mkxp. If not, see <http://www.gnu.org/licenses/>.
|
|
*/
|
|
|
|
#include "binding-util.h"
|
|
#include "filesystem.h"
|
|
|
|
using namespace mkxp_sandbox;
|
|
|
|
void mkxp_sandbox::set_private_data(VALUE obj, void *ptr) {
|
|
/* RGSS's behavior is to just leak memory if a disposable is reinitialized,
|
|
* with the original disposable being left permanently instantiated,
|
|
* but that's (1) bad, and (2) would currently cause memory access issues
|
|
* when things like a sprite's src_rect inevitably get GC'd, so we're not
|
|
* copying that. */
|
|
|
|
wasm_ptr_t data = sb()->rtypeddata_data(obj);
|
|
|
|
// Free the old value if it already exists (initialize called twice?)
|
|
if (*(wasm_ptr_t *)(**sb() + data) != 0 && *(void **)(**sb() + *(wasm_ptr_t *)(**sb() + data)) != ptr) {
|
|
sb()->rtypeddata_dfree(obj, *(wasm_ptr_t *)(**sb() + data));
|
|
*(wasm_ptr_t *)(**sb() + data) = 0;
|
|
}
|
|
|
|
if (*(wasm_ptr_t *)(**sb() + data) == 0) {
|
|
wasm_ptr_t buf = sb()->sandbox_malloc(sizeof(void *));
|
|
*(void **)(**sb() + buf) = ptr;
|
|
*(wasm_ptr_t *)(**sb() + data) = buf;
|
|
}
|
|
}
|
|
|
|
wasm_size_t get_length::operator()(VALUE obj) {
|
|
BOOST_ASIO_CORO_REENTER (this) {
|
|
SANDBOX_AWAIT_AND_SET(id, rb_intern, "length");
|
|
SANDBOX_AWAIT_AND_SET(length_value, rb_funcall, obj, id, 0);
|
|
SANDBOX_AWAIT_AND_SET(result, rb_num2ulong, length_value);
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
wasm_size_t get_bytesize::operator()(VALUE obj) {
|
|
BOOST_ASIO_CORO_REENTER (this) {
|
|
SANDBOX_AWAIT_AND_SET(id, rb_intern, "bytesize");
|
|
SANDBOX_AWAIT_AND_SET(length_value, rb_funcall, obj, id, 0);
|
|
SANDBOX_AWAIT_AND_SET(result, rb_num2ulong, length_value);
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
VALUE wrap_property::operator()(VALUE self, void *ptr, const char *iv, VALUE klass) {
|
|
BOOST_ASIO_CORO_REENTER (this) {
|
|
SANDBOX_AWAIT_AND_SET(obj, rb_obj_alloc, klass);
|
|
set_private_data(obj, ptr);
|
|
SANDBOX_AWAIT(rb_iv_set, self, iv, obj);
|
|
}
|
|
|
|
return obj;
|
|
}
|
|
|
|
void log_backtrace::operator()(VALUE exception) {
|
|
BOOST_ASIO_CORO_REENTER (this) {
|
|
SANDBOX_AWAIT(rb_p, exception);
|
|
SANDBOX_AWAIT_AND_SET(id, rb_intern, "backtrace");
|
|
SANDBOX_AWAIT_AND_SET(backtrace, rb_funcall, exception, id, 0);
|
|
SANDBOX_AWAIT_AND_SET(id, rb_intern, "join");
|
|
SANDBOX_AWAIT_AND_SET(separator, rb_str_new_cstr, "\n\t");
|
|
SANDBOX_AWAIT_AND_SET(backtrace, rb_funcall, backtrace, id, 1, separator);
|
|
SANDBOX_AWAIT_AND_SET(backtrace_str, rb_string_value_cstr, &backtrace);
|
|
mkxp_retro::log_printf(RETRO_LOG_ERROR, "%s\n", **sb() + backtrace_str);
|
|
}
|
|
}
|
|
|
|
void update_cwd::operator()() {
|
|
BOOST_ASIO_CORO_REENTER (this) {
|
|
SANDBOX_AWAIT_AND_SET(id, rb_intern, "pwd");
|
|
SANDBOX_AWAIT_AND_SET(value, rb_funcall, sb()->rb_cDir(), id, 0);
|
|
SANDBOX_AWAIT_AND_SET(ptr, rb_string_value_cstr, &value);
|
|
FileSystem::chdir((const char *)(**sb() + ptr));
|
|
}
|
|
}
|