RetroArch/frontend/drivers/platform_wii.c
2022-12-15 14:34:22 +01:00

259 lines
7.0 KiB
C

/* RetroArch - A frontend for libretro.
* Copyright (C) 2010-2014 - Hans-Kristian Arntzen
* Copyright (C) 2011-2017 - Daniel De Matteis
* Copyright (C) 2012-2015 - Michael Lelli
*
* RetroArch 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 Found-
* ation, either version 3 of the License, or (at your option) any later version.
*
* RetroArch 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 RetroArch.
* If not, see <http://www.gnu.org/licenses/>.
*/
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <fat.h>
#include <gctypes.h>
#include <ogc/cache.h>
#include <ogc/system.h>
#include <ogc/usbstorage.h>
#include <ogc/lwp_threads.h>
#include <sdcard/wiisd_io.h>
#include <string/stdstring.h>
#include <file/file_path.h>
#include <retro_miscellaneous.h>
#ifdef HAVE_CONFIG_H
#include "../../config.h"
#endif
#if !defined(IS_SALAMANDER) && defined(HAVE_NETWORKING)
#include "../../network/netplay/netplay.h"
#endif
#include "../../paths.h"
#include "../../verbosity.h"
#define EXECUTE_ADDR ((uint8_t *) 0x91800000)
#define BOOTER_ADDR ((uint8_t *) 0x93000000)
#define ARGS_ADDR ((uint8_t *) 0x93200000)
extern uint8_t _binary_wii_app_booter_app_booter_bin_start[];
extern uint8_t _binary_wii_app_booter_app_booter_bin_end[];
#define booter_start _binary_wii_app_booter_app_booter_bin_start
#define booter_end _binary_wii_app_booter_app_booter_bin_end
#ifdef IS_SALAMANDER
char gx_rom_path[PATH_MAX_LENGTH];
#endif
static void dol_copy_argv_path(const char *dolpath, const char *argpath)
{
size_t t_len;
char tmp[PATH_MAX_LENGTH] = {0};
struct __argv *argv = (struct __argv *)ARGS_ADDR;
char *cmdline = NULL;
size_t len = 0;
memset(ARGS_ADDR, 0, sizeof(struct __argv));
cmdline = (char *)ARGS_ADDR + sizeof(struct __argv);
argv->argvMagic = ARGV_MAGIC;
argv->commandLine = cmdline;
/* a device-less fullpath */
if (dolpath[0] == '/')
{
char *dev = strchr(__system_argv->argv[0], ':');
t_len = dev - __system_argv->argv[0] + 1;
memcpy(cmdline, __system_argv->argv[0], t_len);
len += t_len;
}
/* a relative path */
else if (
(strstr(dolpath, "sd:/") != dolpath) &&
(strstr(dolpath, "usb:/") != dolpath) &&
(strstr(dolpath, "carda:/") != dolpath) &&
(strstr(dolpath, "cardb:/") != dolpath)
)
{
fill_pathname_parent_dir(tmp,
__system_argv->argv[0], sizeof(tmp));
t_len = strlen(tmp);
memcpy(cmdline, tmp, t_len);
len += t_len;
}
t_len = strlen(dolpath);
memcpy(cmdline + len, dolpath, t_len);
len += t_len;
cmdline[len++] = 0;
/* File must be split into two parts,
* the path and the actual filename
* done to be compatible with loaders. */
if (argpath && strrchr(argpath, '/') != NULL)
{
char *name = NULL;
/* basedir. */
fill_pathname_parent_dir(tmp, argpath, sizeof(tmp));
t_len = strlen(tmp);
memcpy(cmdline + len, tmp, t_len);
len += t_len;
cmdline[len++] = 0;
/* filename */
name = strrchr(argpath, '/') + 1;
t_len = strlen(name);
memcpy(cmdline + len, name, t_len);
len += t_len;
cmdline[len++] = 0;
}
cmdline[len++] = 0;
argv->length = len;
DCFlushRange(ARGS_ADDR, sizeof(struct __argv) + argv->length);
}
static void dol_copy_raw_argv(const char *dolpath,
const void *args, size_t size)
{
struct __argv *argv = (struct __argv*)ARGS_ADDR;
char *cmdline = (char*)++argv;
memset(argv, 0, sizeof(*argv));
argv->argvMagic = ARGV_MAGIC;
argv->commandLine = cmdline;
/* a device-less fullpath */
if (dolpath[0] == '/')
strlcpy(cmdline, __system_argv->argv[0],
strchr(__system_argv->argv[0], ':') - __system_argv->argv[0] + 2);
/* a relative path */
else if ( !string_starts_with_size(dolpath, "sd:/", STRLEN_CONST("sd:/"))
&& !string_starts_with_size(dolpath, "usb:/", STRLEN_CONST("usb:/"))
&& !string_starts_with_size(dolpath, "carda:/", STRLEN_CONST("carda:/"))
&& !string_starts_with_size(dolpath, "cardb:/", STRLEN_CONST("cardb:/")))
fill_pathname_parent_dir(cmdline, __system_argv->argv[0],
PATH_MAX_LENGTH);
/* fullpath */
else
*cmdline = '\0';
argv->length = (int)strlcat(cmdline, dolpath, PATH_MAX_LENGTH);
argv->length += 1;
memcpy(cmdline + argv->length, args, size);
argv->length += size;
DCFlushRange(argv, sizeof(*argv) + argv->length);
}
/* WARNING: after we move any data
* into EXECUTE_ADDR, we can no longer use any
* heap memory and are restricted to the stack only. */
void system_exec_wii(const char *_path, bool should_load_game)
{
char path[PATH_MAX_LENGTH];
char args[PATH_MAX_LENGTH];
size_t args_size;
size_t size;
FILE *fp;
void *dol;
#ifndef IS_SALAMANDER
bool verbosity = verbosity_is_enabled();
#endif
args_size = 0;
/* copy heap info into stack so it survives
* us moving the .dol into MEM2. */
strlcpy(path, _path, sizeof(path));
if (should_load_game)
{
#ifndef IS_SALAMANDER
#ifdef HAVE_NETWORKING
net_driver_state_t *net_st = networking_state_get_ptr();
if (net_st->fork_args.size)
{
memcpy(args, net_st->fork_args.args, net_st->fork_args.size);
args_size = net_st->fork_args.size;
}
else
#endif
strlcpy(args, path_get(RARCH_PATH_CONTENT), sizeof(args));
#else
strlcpy(args, gx_rom_path, sizeof(args));
#endif
}
fp = fopen(path, "rb");
if (!fp)
{
RARCH_ERR("Could not open DOL file %s.\n", path);
goto exit;
}
fseek(fp, 0, SEEK_END);
size = ftell(fp);
fseek(fp, 0, SEEK_SET);
/* try to allocate a buffer for it. if we can't, fail. */
dol = malloc(size);
if (!dol)
{
RARCH_ERR("Could not execute DOL file %s.\n", path);
fclose(fp);
goto exit;
}
fread(dol, 1, size, fp);
fclose(fp);
fatUnmount("carda:");
fatUnmount("cardb:");
fatUnmount("sd:");
fatUnmount("usb:");
__io_wiisd.shutdown();
__io_usbstorage.shutdown();
/* don't use memcpy, there might be an overlap. */
memmove(EXECUTE_ADDR, dol, size);
DCFlushRange(EXECUTE_ADDR, size);
if (args_size)
dol_copy_raw_argv(path, args, args_size);
else
dol_copy_argv_path(path, should_load_game ? args : NULL);
size = booter_end - booter_start;
memcpy(BOOTER_ADDR, booter_start, size);
DCFlushRange(BOOTER_ADDR, size);
SYS_ResetSystem(SYS_SHUTDOWN, 0, 0);
__lwp_thread_stopmultitasking((void (*)(void))BOOTER_ADDR);
exit:
#ifndef IS_SALAMANDER
if (verbosity)
verbosity_enable();
else
verbosity_disable();
#else
return;
#endif
}