/* RetroArch - A frontend for libretro. * Copyright (C) 2010-2014 - Hans-Kristian Arntzen * Copyright (C) 2011-2014 - Daniel De Matteis * Copyright (C) 2012-2014 - 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 . */ #include "boolean.h" #include "libretro.h" #include #include #include #include #include #include "driver.h" #include "file.h" #include "general.h" #include "dynamic.h" #include "performance.h" #include "audio/utils.h" #include "record/ffemu.h" #include "rewind.h" #include "movie.h" #include "compat/strl.h" #include "screenshot.h" #include "cheats.h" #include "compat/getopt_rarch.h" #include "compat/posix_string.h" #include "input/keyboard_line.h" #include "input/input_common.h" #include "git_version.h" #include "intl/intl.h" #ifdef HAVE_MENU #include "frontend/menu/menu_common.h" #endif #ifdef _WIN32 #ifdef _XBOX #include #else #define WIN32_LEAN_AND_MEAN #include #endif #include "msvc/msvc_compat.h" #endif /* To avoid continous switching if we hold the button down, we require * that the button must go from pressed to unpressed back to pressed * to be able to toggle between then. */ static void check_fast_forward_button(void) { bool new_button_state = input_key_pressed_func(RARCH_FAST_FORWARD_KEY); bool new_hold_button_state = input_key_pressed_func(RARCH_FAST_FORWARD_HOLD_KEY); static bool old_button_state = false; static bool old_hold_button_state = false; if (new_button_state && !old_button_state) { driver.nonblock_state = !driver.nonblock_state; driver_set_nonblock_state(driver.nonblock_state); } else if (old_hold_button_state != new_hold_button_state) { driver.nonblock_state = new_hold_button_state; driver_set_nonblock_state(driver.nonblock_state); } old_button_state = new_button_state; old_hold_button_state = new_hold_button_state; } static bool take_screenshot_viewport(void) { char screenshot_path[PATH_MAX]; const char *screenshot_dir = NULL; uint8_t *buffer = NULL; bool retval = false; struct rarch_viewport vp = {0}; if (driver.video && driver.video->viewport_info) driver.video->viewport_info(driver.video_data, &vp); if (!vp.width || !vp.height) return false; if (!(buffer = (uint8_t*)malloc(vp.width * vp.height * 3))) return false; if (driver.video && driver.video->read_viewport) if (!driver.video->read_viewport(driver.video_data, buffer)) goto done; screenshot_dir = g_settings.screenshot_directory; if (!*g_settings.screenshot_directory) { fill_pathname_basedir(screenshot_path, g_extern.basename, sizeof(screenshot_path)); screenshot_dir = screenshot_path; } /* Data read from viewport is in bottom-up order, suitable for BMP. */ if (!screenshot_dump(screenshot_dir, buffer, vp.width, vp.height, vp.width * 3, true)) goto done; retval = true; done: if (buffer) free(buffer); return retval; } static bool take_screenshot_raw(void) { char screenshot_path[PATH_MAX]; const void *data = g_extern.frame_cache.data; unsigned width = g_extern.frame_cache.width; unsigned height = g_extern.frame_cache.height; int pitch = g_extern.frame_cache.pitch; const char *screenshot_dir = g_settings.screenshot_directory; if (!*g_settings.screenshot_directory) { fill_pathname_basedir(screenshot_path, g_extern.basename, sizeof(screenshot_path)); screenshot_dir = screenshot_path; } /* Negative pitch is needed as screenshot takes bottom-up, * but we use top-down. */ return screenshot_dump(screenshot_dir, (const uint8_t*)data + (height - 1) * pitch, width, height, -pitch, false); } static void take_screenshot(void) { bool viewport_read = false; bool ret = false; const char *msg = NULL; /* No way to infer screenshot directory. */ if ((!*g_settings.screenshot_directory) && (!*g_extern.basename)) return; viewport_read = (g_settings.video.gpu_screenshot || g_extern.system.hw_render_callback.context_type != RETRO_HW_CONTEXT_NONE) && driver.video->read_viewport && driver.video->viewport_info; /* Clear out message queue to avoid OSD fonts to appear on screenshot. */ msg_queue_clear(g_extern.msg_queue); if (viewport_read) { #ifdef HAVE_MENU /* Avoid taking screenshot of GUI overlays. */ if (driver.video_poke && driver.video_poke->set_texture_enable) driver.video_poke->set_texture_enable(driver.video_data, false, false); #endif if (driver.video) rarch_render_cached_frame(); } if (viewport_read) ret = take_screenshot_viewport(); else if (g_extern.frame_cache.data && (g_extern.frame_cache.data != RETRO_HW_FRAME_BUFFER_VALID)) ret = take_screenshot_raw(); else RARCH_ERR(RETRO_LOG_TAKE_SCREENSHOT_ERROR); if (ret) { RARCH_LOG(RETRO_LOG_TAKE_SCREENSHOT); msg = RETRO_MSG_TAKE_SCREENSHOT; } else { RARCH_WARN(RETRO_LOG_TAKE_SCREENSHOT_FAILED); msg = RETRO_MSG_TAKE_SCREENSHOT_FAILED; } msg_queue_push(g_extern.msg_queue, msg, 1, g_extern.is_paused ? 1 : 180); if (g_extern.is_paused) rarch_render_cached_frame(); } static void readjust_audio_input_rate(void) { int avail = driver.audio->write_avail(driver.audio_data); //RARCH_LOG_OUTPUT("Audio buffer is %u%% full\n", // (unsigned)(100 - (avail * 100) / g_extern.audio_data.driver_buffer_size)); unsigned write_index = g_extern.measure_data.buffer_free_samples_count++ & (AUDIO_BUFFER_FREE_SAMPLES_COUNT - 1); int half_size = g_extern.audio_data.driver_buffer_size / 2; int delta_mid = avail - half_size; double direction = (double)delta_mid / half_size; double adjust = 1.0 + g_settings.audio.rate_control_delta * direction; g_extern.measure_data.buffer_free_samples[write_index] = avail; g_extern.audio_data.src_ratio = g_extern.audio_data.orig_src_ratio * adjust; //RARCH_LOG_OUTPUT("New rate: %lf, Orig rate: %lf\n", // g_extern.audio_data.src_ratio, g_extern.audio_data.orig_src_ratio); } static void deinit_gpu_recording(void) { if (g_extern.record_gpu_buffer) free(g_extern.record_gpu_buffer); g_extern.record_gpu_buffer = NULL; } static void init_recording(void) { struct ffemu_params params = {0}; const struct retro_system_av_info *info = {0}; if (!g_extern.recording_enable) return; if (g_extern.libretro_dummy) { RARCH_WARN(RETRO_LOG_INIT_RECORDING_SKIPPED); return; } if (!g_settings.video.gpu_record && g_extern.system.hw_render_callback.context_type) { RARCH_WARN("Libretro core is hardware rendered. Must use post-shaded recording as well.\n"); return; } RARCH_LOG("Custom timing given: FPS: %.4f, Sample rate: %.4f\n", (float)g_extern.system.av_info.timing.fps, (float)g_extern.system.av_info.timing.sample_rate); info = (const struct retro_system_av_info*)&g_extern.system.av_info; params.out_width = info->geometry.base_width; params.out_height = info->geometry.base_height; params.fb_width = info->geometry.max_width; params.fb_height = info->geometry.max_height; params.channels = 2; params.filename = g_extern.record_path; params.fps = g_extern.system.av_info.timing.fps; params.samplerate = g_extern.system.av_info.timing.sample_rate; params.pix_fmt = (g_extern.system.pix_fmt == RETRO_PIXEL_FORMAT_XRGB8888) ? FFEMU_PIX_ARGB8888 : FFEMU_PIX_RGB565; params.config = NULL; if (*g_extern.record_config) params.config = g_extern.record_config; if (g_settings.video.gpu_record && driver.video->read_viewport) { struct rarch_viewport vp = {0}; if (driver.video && driver.video->viewport_info) driver.video->viewport_info(driver.video_data, &vp); if (!vp.width || !vp.height) { RARCH_ERR("Failed to get viewport information from video driver. " "Cannot start recording ...\n"); return; } params.out_width = vp.width; params.out_height = vp.height; params.fb_width = next_pow2(vp.width); params.fb_height = next_pow2(vp.height); if (g_settings.video.force_aspect && (g_extern.system.aspect_ratio > 0.0f)) params.aspect_ratio = g_extern.system.aspect_ratio; else params.aspect_ratio = (float)vp.width / vp.height; params.pix_fmt = FFEMU_PIX_BGR24; g_extern.record_gpu_width = vp.width; g_extern.record_gpu_height = vp.height; RARCH_LOG("Detected viewport of %u x %u\n", vp.width, vp.height); g_extern.record_gpu_buffer = (uint8_t*)malloc(vp.width * vp.height * 3); if (!g_extern.record_gpu_buffer) { RARCH_ERR("Failed to allocate GPU record buffer.\n"); return; } } else { if (g_extern.record_width || g_extern.record_height) { params.out_width = g_extern.record_width; params.out_height = g_extern.record_height; } if (g_settings.video.force_aspect && (g_extern.system.aspect_ratio > 0.0f)) params.aspect_ratio = g_extern.system.aspect_ratio; else params.aspect_ratio = (float)params.out_width / params.out_height; if (g_settings.video.post_filter_record && g_extern.filter.filter) { unsigned max_width = 0; unsigned max_height = 0; if (g_extern.filter.out_rgb32) params.pix_fmt = FFEMU_PIX_ARGB8888; else params.pix_fmt = FFEMU_PIX_RGB565; rarch_softfilter_get_max_output_size(g_extern.filter.filter, &max_width, &max_height); params.fb_width = next_pow2(max_width); params.fb_height = next_pow2(max_height); } } RARCH_LOG("Recording to %s @ %ux%u. (FB size: %ux%u pix_fmt: %u)\n", g_extern.record_path, params.out_width, params.out_height, params.fb_width, params.fb_height, (unsigned)params.pix_fmt); if (!ffemu_init_first(&g_extern.rec_driver, &g_extern.rec, ¶ms)) { RARCH_ERR(RETRO_LOG_INIT_RECORDING_FAILED); deinit_gpu_recording(); } } static void deinit_recording(void) { if (!g_extern.rec || !g_extern.rec_driver) return; if (g_extern.rec_driver->finalize) g_extern.rec_driver->finalize(g_extern.rec); if (g_extern.rec_driver->free) g_extern.rec_driver->free(g_extern.rec); g_extern.rec = NULL; g_extern.rec_driver = NULL; deinit_gpu_recording(); } static void recording_dump_frame(const void *data, unsigned width, unsigned height, size_t pitch) { struct ffemu_video_data ffemu_data = {0}; ffemu_data.pitch = pitch; ffemu_data.width = width; ffemu_data.height = height; ffemu_data.data = data; if (g_extern.record_gpu_buffer) { struct rarch_viewport vp = {0}; if (driver.video && driver.video->viewport_info) driver.video->viewport_info(driver.video_data, &vp); if (!vp.width || !vp.height) { RARCH_WARN("Viewport size calculation failed! Will continue using raw data. This will probably not work right ...\n"); deinit_gpu_recording(); recording_dump_frame(data, width, height, pitch); return; } /* User has resized. We kinda have a problem now. */ if (vp.width != g_extern.record_gpu_width || vp.height != g_extern.record_gpu_height) { static const char msg[] = "Recording terminated due to resize."; RARCH_WARN("%s\n", msg); msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, msg, 1, 180); deinit_recording(); return; } /* Big bottleneck. * Since we might need to do read-backs asynchronously, * it might take 3-4 times before this returns true. */ if (driver.video && driver.video->read_viewport) if (!driver.video->read_viewport(driver.video_data, g_extern.record_gpu_buffer)) return; ffemu_data.pitch = g_extern.record_gpu_width * 3; ffemu_data.width = g_extern.record_gpu_width; ffemu_data.height = g_extern.record_gpu_height; ffemu_data.data = g_extern.record_gpu_buffer + (ffemu_data.height - 1) * ffemu_data.pitch; ffemu_data.pitch = -ffemu_data.pitch; } if (!g_extern.record_gpu_buffer) ffemu_data.is_dupe = !data; if (g_extern.rec_driver && g_extern.rec_driver->push_video) g_extern.rec_driver->push_video(g_extern.rec, &ffemu_data); } static void video_frame(const void *data, unsigned width, unsigned height, size_t pitch) { const char *msg = NULL; if (!g_extern.video_active) return; g_extern.frame_cache.data = data; g_extern.frame_cache.width = width; g_extern.frame_cache.height = height; g_extern.frame_cache.pitch = pitch; if (g_extern.system.pix_fmt == RETRO_PIXEL_FORMAT_0RGB1555 && data && data != RETRO_HW_FRAME_BUFFER_VALID) { RARCH_PERFORMANCE_INIT(video_frame_conv); RARCH_PERFORMANCE_START(video_frame_conv); driver.scaler.in_width = width; driver.scaler.in_height = height; driver.scaler.out_width = width; driver.scaler.out_height = height; driver.scaler.in_stride = pitch; driver.scaler.out_stride = width * sizeof(uint16_t); scaler_ctx_scale(&driver.scaler, driver.scaler_out, data); data = driver.scaler_out; pitch = driver.scaler.out_stride; RARCH_PERFORMANCE_STOP(video_frame_conv); } /* Slightly messy code, * but we really need to do processing before blocking on VSync * for best possible scheduling. */ if (g_extern.rec && (!g_extern.filter.filter || !g_settings.video.post_filter_record || !data || g_extern.record_gpu_buffer) ) recording_dump_frame(data, width, height, pitch); msg = msg_queue_pull(g_extern.msg_queue); driver.current_msg = msg; if (g_extern.filter.filter && data) { unsigned owidth = 0; unsigned oheight = 0; unsigned opitch = 0; rarch_softfilter_get_output_size(g_extern.filter.filter, &owidth, &oheight, width, height); opitch = owidth * g_extern.filter.out_bpp; RARCH_PERFORMANCE_INIT(softfilter_process); RARCH_PERFORMANCE_START(softfilter_process); rarch_softfilter_process(g_extern.filter.filter, g_extern.filter.buffer, opitch, data, width, height, pitch); RARCH_PERFORMANCE_STOP(softfilter_process); if (g_extern.rec && g_settings.video.post_filter_record) recording_dump_frame(g_extern.filter.buffer, owidth, oheight, opitch); data = g_extern.filter.buffer; width = owidth; height = oheight; pitch = opitch; } if (!driver.video->frame(driver.video_data, data, width, height, pitch, msg)) g_extern.video_active = false; } void rarch_render_cached_frame(void) { const void *frame = g_extern.frame_cache.data; void *recording = g_extern.rec; /* Cannot allow recording when pushing duped frames. */ g_extern.rec = NULL; if (frame == RETRO_HW_FRAME_BUFFER_VALID) frame = NULL; /* Dupe */ /* Not 100% safe, since the library might have * freed the memory, but no known implementations do this. * It would be really stupid at any rate ... */ video_frame(frame, g_extern.frame_cache.width, g_extern.frame_cache.height, g_extern.frame_cache.pitch); g_extern.rec = recording; } static bool audio_flush(const int16_t *data, size_t samples) { const void *output_data = NULL; unsigned output_frames = 0; size_t output_size = sizeof(float); struct resampler_data src_data = {0}; struct rarch_dsp_data dsp_data = {0}; if (g_extern.rec) { struct ffemu_audio_data ffemu_data = {0}; ffemu_data.data = data; ffemu_data.frames = samples / 2; if (g_extern.rec_driver && g_extern.rec_driver->push_audio) g_extern.rec_driver->push_audio(g_extern.rec, &ffemu_data); } if (g_extern.is_paused || g_extern.audio_data.mute) return true; if (!g_extern.audio_active) return false; RARCH_PERFORMANCE_INIT(audio_convert_s16); RARCH_PERFORMANCE_START(audio_convert_s16); audio_convert_s16_to_float(g_extern.audio_data.data, data, samples, g_extern.audio_data.volume_gain); RARCH_PERFORMANCE_STOP(audio_convert_s16); dsp_data.input = g_extern.audio_data.data; dsp_data.input_frames = samples >> 1; if (g_extern.audio_data.dsp) { RARCH_PERFORMANCE_INIT(audio_dsp); RARCH_PERFORMANCE_START(audio_dsp); rarch_dsp_filter_process(g_extern.audio_data.dsp, &dsp_data); RARCH_PERFORMANCE_STOP(audio_dsp); } src_data.data_in = dsp_data.output ? dsp_data.output : g_extern.audio_data.data; src_data.input_frames = dsp_data.output ? dsp_data.output_frames : (samples >> 1); src_data.data_out = g_extern.audio_data.outsamples; if (g_extern.audio_data.rate_control) readjust_audio_input_rate(); src_data.ratio = g_extern.audio_data.src_ratio; if (g_extern.is_slowmotion) src_data.ratio *= g_settings.slowmotion_ratio; RARCH_PERFORMANCE_INIT(resampler_proc); RARCH_PERFORMANCE_START(resampler_proc); rarch_resampler_process(g_extern.audio_data.resampler, g_extern.audio_data.resampler_data, &src_data); RARCH_PERFORMANCE_STOP(resampler_proc); output_data = g_extern.audio_data.outsamples; output_frames = src_data.output_frames; if (!g_extern.audio_data.use_float) { RARCH_PERFORMANCE_INIT(audio_convert_float); RARCH_PERFORMANCE_START(audio_convert_float); audio_convert_float_to_s16(g_extern.audio_data.conv_outsamples, (const float*)output_data, output_frames * 2); RARCH_PERFORMANCE_STOP(audio_convert_float); output_data = g_extern.audio_data.conv_outsamples; output_size = sizeof(int16_t); } if (driver.audio->write(driver.audio_data, output_data, output_frames * output_size * 2) < 0) { RARCH_ERR(RETRO_LOG_AUDIO_WRITE_FAILED); return false; } return true; } static void audio_sample_rewind(int16_t left, int16_t right) { g_extern.audio_data.rewind_buf[--g_extern.audio_data.rewind_ptr] = right; g_extern.audio_data.rewind_buf[--g_extern.audio_data.rewind_ptr] = left; } static size_t audio_sample_batch_rewind(const int16_t *data, size_t frames) { size_t i; size_t samples = frames << 1; for (i = 0; i < samples; i++) g_extern.audio_data.rewind_buf[--g_extern.audio_data.rewind_ptr] = data[i]; return frames; } static void audio_sample(int16_t left, int16_t right) { g_extern.audio_data.conv_outsamples[g_extern.audio_data.data_ptr++] = left; g_extern.audio_data.conv_outsamples[g_extern.audio_data.data_ptr++] = right; if (g_extern.audio_data.data_ptr < g_extern.audio_data.chunk_size) return; g_extern.audio_active = audio_flush(g_extern.audio_data.conv_outsamples, g_extern.audio_data.data_ptr) && g_extern.audio_active; g_extern.audio_data.data_ptr = 0; } static size_t audio_sample_batch(const int16_t *data, size_t frames) { if (frames > (AUDIO_CHUNK_SIZE_NONBLOCKING >> 1)) frames = AUDIO_CHUNK_SIZE_NONBLOCKING >> 1; g_extern.audio_active = audio_flush(data, frames << 1) && g_extern.audio_active; return frames; } #ifdef HAVE_OVERLAY static inline void input_poll_overlay(void) { input_overlay_state_t old_key_state; unsigned i, j, device; uint16_t key_mod = 0; bool polled = false; memcpy(old_key_state.keys, driver.overlay_state.keys, sizeof(driver.overlay_state.keys)); memset(&driver.overlay_state, 0, sizeof(driver.overlay_state)); device = input_overlay_full_screen(driver.overlay) ? RARCH_DEVICE_POINTER_SCREEN : RETRO_DEVICE_POINTER; for (i = 0; driver.input->input_state(driver.input_data, NULL, 0, device, i, RETRO_DEVICE_ID_POINTER_PRESSED); i++) { int16_t x = driver.input->input_state(driver.input_data, NULL, 0, device, i, RETRO_DEVICE_ID_POINTER_X); int16_t y = driver.input->input_state(driver.input_data, NULL, 0, device, i, RETRO_DEVICE_ID_POINTER_Y); input_overlay_state_t polled_data; input_overlay_poll(driver.overlay, &polled_data, x, y); driver.overlay_state.buttons |= polled_data.buttons; for (j = 0; j < ARRAY_SIZE(driver.overlay_state.keys); j++) driver.overlay_state.keys[j] |= polled_data.keys[j]; /* Fingers pressed later take prio and matched up * with overlay poll priorities. */ for (j = 0; j < 4; j++) if (polled_data.analog[j]) driver.overlay_state.analog[j] = polled_data.analog[j]; polled = true; } key_mod |= (OVERLAY_GET_KEY(&driver.overlay_state, RETROK_LSHIFT) || OVERLAY_GET_KEY(&driver.overlay_state, RETROK_RSHIFT)) ? RETROKMOD_SHIFT : 0; key_mod |= (OVERLAY_GET_KEY(&driver.overlay_state, RETROK_LCTRL) || OVERLAY_GET_KEY(&driver.overlay_state, RETROK_RCTRL)) ? RETROKMOD_CTRL : 0; key_mod |= (OVERLAY_GET_KEY(&driver.overlay_state, RETROK_LALT) || OVERLAY_GET_KEY(&driver.overlay_state, RETROK_RALT)) ? RETROKMOD_ALT : 0; key_mod |= (OVERLAY_GET_KEY(&driver.overlay_state, RETROK_LMETA) || OVERLAY_GET_KEY(&driver.overlay_state, RETROK_RMETA)) ? RETROKMOD_META : 0; /* CAPSLOCK SCROLLOCK NUMLOCK */ for (i = 0; i < ARRAY_SIZE(driver.overlay_state.keys); i++) { if (driver.overlay_state.keys[i] != old_key_state.keys[i]) { uint32_t orig_bits = old_key_state.keys[i]; uint32_t new_bits = driver.overlay_state.keys[i]; for (j = 0; j < 32; j++) if ((orig_bits & (1 << j)) != (new_bits & (1 << j))) input_keyboard_event(new_bits & (1 << j), i * 32 + j, 0, key_mod); } } /* Map "analog" buttons to analog axes like regular input drivers do. */ for (j = 0; j < 4; j++) { if (!driver.overlay_state.analog[j]) { unsigned bind_plus = RARCH_ANALOG_LEFT_X_PLUS + 2 * j; unsigned bind_minus = bind_plus + 1; driver.overlay_state.analog[j] += (driver.overlay_state.buttons & (1ULL << bind_plus)) ? 0x7fff : 0; driver.overlay_state.analog[j] -= (driver.overlay_state.buttons & (1ULL << bind_minus)) ? 0x7fff : 0; } } /* Check for analog_dpad_mode. * Map analogs to d-pad buttons when configured. */ switch (g_settings.input.analog_dpad_mode[0]) { case ANALOG_DPAD_LSTICK: case ANALOG_DPAD_RSTICK: { unsigned analog_base = g_settings.input.analog_dpad_mode[0] == ANALOG_DPAD_LSTICK ? 0 : 2; float analog_x = (float)driver.overlay_state.analog[analog_base + 0] / 0x7fff; float analog_y = (float)driver.overlay_state.analog[analog_base + 1] / 0x7fff; driver.overlay_state.buttons |= (analog_x <= -g_settings.input.axis_threshold) ? (1ULL << RETRO_DEVICE_ID_JOYPAD_LEFT) : 0; driver.overlay_state.buttons |= (analog_x >= g_settings.input.axis_threshold) ? (1ULL << RETRO_DEVICE_ID_JOYPAD_RIGHT) : 0; driver.overlay_state.buttons |= (analog_y <= -g_settings.input.axis_threshold) ? (1ULL << RETRO_DEVICE_ID_JOYPAD_UP) : 0; driver.overlay_state.buttons |= (analog_y >= g_settings.input.axis_threshold) ? (1ULL << RETRO_DEVICE_ID_JOYPAD_DOWN) : 0; break; } default: break; } if (polled) input_overlay_post_poll(driver.overlay); else input_overlay_poll_clear(driver.overlay); } #endif void rarch_input_poll(void) { if (driver.input && driver.input->poll) driver.input->poll(driver.input_data); #ifdef HAVE_OVERLAY if (driver.overlay) input_poll_overlay(); #endif #ifdef HAVE_COMMAND if (driver.command) rarch_cmd_poll(driver.command); #endif } /* Turbo scheme: If turbo button is held, all buttons pressed except * for D-pad will go into a turbo mode. Until the button is * released again, the input state will be modulated by a periodic pulse * defined by the configured duty cycle. */ static bool input_apply_turbo(unsigned port, unsigned id, bool res) { if (res && g_extern.turbo_frame_enable[port]) g_extern.turbo_enable[port] |= (1 << id); else if (!res) g_extern.turbo_enable[port] &= ~(1 << id); if (g_extern.turbo_enable[port] & (1 << id)) return res && ((g_extern.turbo_count % g_settings.input.turbo_period) < g_settings.input.turbo_duty_cycle); return res; } static int16_t input_state(unsigned port, unsigned device, unsigned index, unsigned id) { int16_t res = 0; device &= RETRO_DEVICE_MASK; if (g_extern.bsv.movie && g_extern.bsv.movie_playback) { int16_t ret; if (bsv_movie_get_input(g_extern.bsv.movie, &ret)) return ret; g_extern.bsv.movie_end = true; } static const struct retro_keybind *binds[MAX_PLAYERS] = { g_settings.input.binds[0], g_settings.input.binds[1], g_settings.input.binds[2], g_settings.input.binds[3], g_settings.input.binds[4], g_settings.input.binds[5], g_settings.input.binds[6], g_settings.input.binds[7], g_settings.input.binds[8], g_settings.input.binds[9], g_settings.input.binds[10], g_settings.input.binds[11], g_settings.input.binds[12], g_settings.input.binds[13], g_settings.input.binds[14], g_settings.input.binds[15], }; if (!driver.block_libretro_input && (id < RARCH_FIRST_META_KEY || device == RETRO_DEVICE_KEYBOARD)) res = driver.input->input_state(driver.input_data, binds, port, device, index, id); #ifdef HAVE_OVERLAY if (device == RETRO_DEVICE_JOYPAD && port == 0) res |= driver.overlay_state.buttons & (UINT64_C(1) << id) ? 1 : 0; else if (device == RETRO_DEVICE_KEYBOARD && port == 0 && id < RETROK_LAST) res |= OVERLAY_GET_KEY(&driver.overlay_state, id) ? 1 : 0; else if (device == RETRO_DEVICE_ANALOG && port == 0) { unsigned base = (index == RETRO_DEVICE_INDEX_ANALOG_RIGHT) ? 2 : 0; base += (id == RETRO_DEVICE_ID_ANALOG_Y) ? 1 : 0; if (driver.overlay_state.analog[base]) res = driver.overlay_state.analog[base]; } #endif /* Don't allow turbo for D-pad. */ if (device == RETRO_DEVICE_JOYPAD && (id < RETRO_DEVICE_ID_JOYPAD_UP || id > RETRO_DEVICE_ID_JOYPAD_RIGHT)) res = input_apply_turbo(port, id, res); if (g_extern.bsv.movie && !g_extern.bsv.movie_playback) bsv_movie_set_input(g_extern.bsv.movie, res); return res; } #if !defined(_WIN32) && !defined(GLOBAL_CONFIG_DIR) #if defined(__HAIKU__) #define GLOBAL_CONFIG_DIR "/system/settings" #else #define GLOBAL_CONFIG_DIR "/etc" #endif #endif #ifdef _WIN32 #define RARCH_DEFAULT_CONF_PATH_STR "\n\t\tDefaults to retroarch.cfg in same directory as retroarch.exe.\n\t\tIf a default config is not found, " RETRO_FRONTEND " will attempt to create one." #else #define RARCH_DEFAULT_CONF_PATH_STR "\n\t\tBy default looks for config in $XDG_CONFIG_HOME/retroarch/retroarch.cfg,\n\t\t$HOME/.config/retroarch/retroarch.cfg,\n\t\tand $HOME/.retroarch.cfg.\n\t\tIf a default config is not found," RETRO_FRONTEND " will attempt to create one based on the skeleton config (" GLOBAL_CONFIG_DIR "/retroarch.cfg)." #endif #include "config.features.h" #define _PSUPP(var, name, desc) printf("\t%s:\n\t\t%s: %s\n", name, desc, _##var##_supp ? "yes" : "no") static void print_features(void) { puts(""); puts("Features:"); _PSUPP(sdl, "SDL", "SDL drivers"); _PSUPP(sdl2, "SDL2", "SDL2 drivers"); _PSUPP(x11, "X11", "X11 drivers"); _PSUPP(wayland, "wayland", "Wayland drivers"); _PSUPP(thread, "Threads", "Threading support"); _PSUPP(opengl, "OpenGL", "OpenGL driver"); _PSUPP(kms, "KMS", "KMS/EGL context support"); _PSUPP(udev, "UDEV", "UDEV/EVDEV input driver support"); _PSUPP(egl, "EGL", "EGL context support"); _PSUPP(vg, "OpenVG", "OpenVG output support"); _PSUPP(xvideo, "XVideo", "XVideo output"); _PSUPP(alsa, "ALSA", "audio driver"); _PSUPP(oss, "OSS", "audio driver"); _PSUPP(jack, "Jack", "audio driver"); _PSUPP(rsound, "RSound", "audio driver"); _PSUPP(roar, "RoarAudio", "audio driver"); _PSUPP(pulse, "PulseAudio", "audio driver"); _PSUPP(dsound, "DirectSound", "audio driver"); _PSUPP(xaudio, "XAudio2", "audio driver"); _PSUPP(zlib, "zlib", "PNG encode/decode and .zip extraction"); _PSUPP(al, "OpenAL", "audio driver"); _PSUPP(dylib, "External", "External filter and plugin support"); _PSUPP(cg, "Cg", "Cg pixel shaders"); _PSUPP(libxml2, "libxml2", "libxml2 XML parsing"); _PSUPP(sdl_image, "SDL_image", "SDL_image image loading"); _PSUPP(fbo, "FBO", "OpenGL render-to-texture (multi-pass shaders)"); _PSUPP(dynamic, "Dynamic", "Dynamic run-time loading of libretro library"); _PSUPP(ffmpeg, "FFmpeg", "On-the-fly recording of gameplay with libavcodec"); _PSUPP(freetype, "FreeType", "TTF font rendering with FreeType"); _PSUPP(netplay, "Netplay", "Peer-to-peer netplay"); _PSUPP(python, "Python", "Script support in shaders"); } #undef _PSUPP static void print_compiler(FILE *file) { fprintf(file, "\nCompiler: "); #if defined(_MSC_VER) fprintf(file, "MSVC (%d) %u-bit\n", _MSC_VER, (unsigned) (CHAR_BIT * sizeof(size_t))); #elif defined(__SNC__) fprintf(file, "SNC (%d) %u-bit\n", __SN_VER__, (unsigned)(CHAR_BIT * sizeof(size_t))); #elif defined(_WIN32) && defined(__GNUC__) fprintf(file, "MinGW (%d.%d.%d) %u-bit\n", __GNUC__, __GNUC_MINOR__, __GNUC_PATCHLEVEL__, (unsigned) (CHAR_BIT * sizeof(size_t))); #elif defined(__clang__) fprintf(file, "Clang/LLVM (%s) %u-bit\n", __clang_version__, (unsigned)(CHAR_BIT * sizeof(size_t))); #elif defined(__GNUC__) fprintf(file, "GCC (%d.%d.%d) %u-bit\n", __GNUC__, __GNUC_MINOR__, __GNUC_PATCHLEVEL__, (unsigned) (CHAR_BIT * sizeof(size_t))); #else fprintf(file, "Unknown compiler %u-bit\n", (unsigned)(CHAR_BIT * sizeof(size_t))); #endif fprintf(file, "Built: %s\n", __DATE__); } static void print_help(void) { puts("==================================================================="); #ifdef HAVE_GIT_VERSION printf(RETRO_FRONTEND ": Frontend for libretro -- v" PACKAGE_VERSION " -- %s --\n", rarch_git_version); #else puts(RETRO_FRONTEND ": Frontend for libretro -- v" PACKAGE_VERSION " --"); #endif print_compiler(stdout); puts("==================================================================="); puts("Usage: retroarch [content file] [options...]"); puts("\t-h/--help: Show this help message."); puts("\t--menu: Do not require content or libretro core to be loaded, starts directly in menu."); puts("\t\tIf no arguments are passed to " RETRO_FRONTEND ", it is equivalent to using --menu as only argument."); puts("\t--features: Prints available features compiled into " RETRO_FRONTEND "."); puts("\t-s/--save: Path for save file (*.srm)."); puts("\t-f/--fullscreen: Start " RETRO_FRONTEND " in fullscreen regardless of config settings."); puts("\t-S/--savestate: Path to use for save states. If not selected, *.state will be assumed."); puts("\t-c/--config: Path for config file." RARCH_DEFAULT_CONF_PATH_STR); puts("\t--appendconfig: Extra config files are loaded in, and take priority over config selected in -c (or default)."); puts("\t\tMultiple configs are delimited by ','."); #ifdef HAVE_DYNAMIC puts("\t-L/--libretro: Path to libretro implementation. Overrides any config setting."); #endif puts("\t--subsystem: Use a subsystem of the libretro core. Multiple content files are loaded as multiple arguments."); puts("\t\tIf a content file is skipped, use a blank (\"\") command line argument"); puts("\t\tContent must be loaded in an order which depends on the particular subsystem used."); puts("\t\tSee verbose log output to learn how a particular subsystem wants content to be loaded."); printf("\t-N/--nodevice: Disconnects controller device connected to port (1 to %d).\n", MAX_PLAYERS); printf("\t-A/--dualanalog: Connect a DualAnalog controller to port (1 to %d).\n", MAX_PLAYERS); printf("\t-d/--device: Connect a generic device into port of the device (1 to %d).\n", MAX_PLAYERS); puts("\t\tFormat is port:ID, where ID is an unsigned number corresponding to the particular device.\n"); puts("\t-P/--bsvplay: Playback a BSV movie file."); puts("\t-R/--bsvrecord: Start recording a BSV movie file from the beginning."); puts("\t-M/--sram-mode: Takes an argument telling how SRAM should be handled in the session."); puts("\t\t{no,}load-{no,}save describes if SRAM should be loaded, and if SRAM should be saved."); puts("\t\tDo note that noload-save implies that save files will be deleted and overwritten."); #ifdef HAVE_NETPLAY puts("\t-H/--host: Host netplay as player 1."); puts("\t-C/--connect: Connect to netplay as player 2."); puts("\t--port: Port used to netplay. Default is 55435."); puts("\t-F/--frames: Sync frames when using netplay."); puts("\t--spectate: Netplay will become spectating mode."); puts("\t\tHost can live stream the game content to players that connect."); puts("\t\tHowever, the client will not be able to play. Multiple clients can connect to the host."); #endif puts("\t--nick: Picks a username (for use with netplay). Not mandatory."); #if defined(HAVE_NETWORK_CMD) && defined(HAVE_NETPLAY) puts("\t--command: Sends a command over UDP to an already running " RETRO_FRONTEND " process."); puts("\t\tAvailable commands are listed if command is invalid."); #endif #ifdef HAVE_COMPRESSION puts("\t-z/--carchive: Path to a compressed container containing the main content file.\n\t\tThe main content file has to be specified as a subfile, for example like this:\n\t\t ./retroarch -Lmylib.so -z myfile.7z myfile.7z/myrom.rom ."); #endif puts("\t-r/--record: Path to record video file.\n\t\tUsing .mkv extension is recommended."); puts("\t--recordconfig: Path to settings used during recording."); puts("\t--size: Overrides output video size when recording (format: WIDTHxHEIGHT)."); puts("\t-v/--verbose: Verbose logging."); puts("\t-U/--ups: Specifies path for UPS patch that will be applied to content."); puts("\t--bps: Specifies path for BPS patch that will be applied to content."); puts("\t--ips: Specifies path for IPS patch that will be applied to content."); puts("\t--no-patch: Disables all forms of content patching."); puts("\t-D/--detach: Detach " RETRO_FRONTEND " from the running console. Not relevant for all platforms.\n"); } static void set_basename(const char *path) { char *dst = NULL; strlcpy(g_extern.fullpath, path, sizeof(g_extern.fullpath)); strlcpy(g_extern.basename, path, sizeof(g_extern.basename)); if ((dst = strrchr(g_extern.basename, '.'))) *dst = '\0'; } static void set_special_paths(char **argv, unsigned num_content) { unsigned i; union string_list_elem_attr attr; /* First content file is the significant one. */ set_basename(argv[0]); g_extern.subsystem_fullpaths = string_list_new(); rarch_assert(g_extern.subsystem_fullpaths); attr.i = 0; for (i = 0; i < num_content; i++) string_list_append(g_extern.subsystem_fullpaths, argv[i], attr); /* We defer SRAM path updates until we can resolve it. * It is more complicated for special content types. */ if (!g_extern.has_set_state_path) fill_pathname_noext(g_extern.savestate_name, g_extern.basename, ".state", sizeof(g_extern.savestate_name)); if (path_is_directory(g_extern.savestate_name)) { fill_pathname_dir(g_extern.savestate_name, g_extern.basename, ".state", sizeof(g_extern.savestate_name)); RARCH_LOG("Redirecting save state to \"%s\".\n", g_extern.savestate_name); } /* If this is already set, * do not overwrite it as this was initialized before in * a menu or otherwise. */ if (!*g_settings.system_directory) fill_pathname_basedir(g_settings.system_directory, argv[0], sizeof(g_settings.system_directory)); } static void set_paths(const char *path) { set_basename(path); if (!g_extern.has_set_save_path) fill_pathname_noext(g_extern.savefile_name, g_extern.basename, ".srm", sizeof(g_extern.savefile_name)); if (!g_extern.has_set_state_path) fill_pathname_noext(g_extern.savestate_name, g_extern.basename, ".state", sizeof(g_extern.savestate_name)); if (path_is_directory(g_extern.savefile_name)) { fill_pathname_dir(g_extern.savefile_name, g_extern.basename, ".srm", sizeof(g_extern.savefile_name)); RARCH_LOG("Redirecting save file to \"%s\".\n", g_extern.savefile_name); } if (path_is_directory(g_extern.savestate_name)) { fill_pathname_dir(g_extern.savestate_name, g_extern.basename, ".state", sizeof(g_extern.savestate_name)); RARCH_LOG("Redirecting save state to \"%s\".\n", g_extern.savestate_name); } /* If this is already set, do not overwrite it * as this was initialized before in a menu or otherwise. */ if (!*g_settings.system_directory) fill_pathname_basedir(g_settings.system_directory, path, sizeof(g_settings.system_directory)); } static void parse_input(int argc, char *argv[]) { g_extern.libretro_no_content = false; g_extern.libretro_dummy = false; g_extern.has_set_save_path = false; g_extern.has_set_state_path = false; g_extern.has_set_libretro = false; g_extern.has_set_libretro_directory = false; g_extern.has_set_verbosity = false; g_extern.has_set_netplay_mode = false; g_extern.has_set_username = false; g_extern.has_set_netplay_ip_address = false; g_extern.has_set_netplay_delay_frames = false; g_extern.has_set_netplay_ip_port = false; g_extern.ups_pref = false; g_extern.bps_pref = false; g_extern.ips_pref = false; *g_extern.ups_name = '\0'; *g_extern.bps_name = '\0'; *g_extern.ips_name = '\0'; *g_extern.subsystem = '\0'; if (argc < 2) { g_extern.libretro_dummy = true; return; } /* Make sure we can call parse_input several times ... */ optind = 0; int val = 0; const struct option opts[] = { #ifdef HAVE_DYNAMIC { "libretro", 1, NULL, 'L' }, #endif { "menu", 0, &val, 'M' }, { "help", 0, NULL, 'h' }, { "save", 1, NULL, 's' }, { "fullscreen", 0, NULL, 'f' }, { "record", 1, NULL, 'r' }, { "recordconfig", 1, &val, 'R' }, { "size", 1, &val, 's' }, { "verbose", 0, NULL, 'v' }, { "config", 1, NULL, 'c' }, { "appendconfig", 1, &val, 'C' }, { "nodevice", 1, NULL, 'N' }, { "dualanalog", 1, NULL, 'A' }, { "device", 1, NULL, 'd' }, { "savestate", 1, NULL, 'S' }, { "bsvplay", 1, NULL, 'P' }, { "bsvrecord", 1, NULL, 'R' }, { "sram-mode", 1, NULL, 'M' }, #ifdef HAVE_NETPLAY { "host", 0, NULL, 'H' }, { "connect", 1, NULL, 'C' }, { "frames", 1, NULL, 'F' }, { "port", 1, &val, 'p' }, { "spectate", 0, &val, 'S' }, #endif { "nick", 1, &val, 'N' }, #if defined(HAVE_NETWORK_CMD) && defined(HAVE_NETPLAY) { "command", 1, &val, 'c' }, #endif { "ups", 1, NULL, 'U' }, { "bps", 1, &val, 'B' }, { "ips", 1, &val, 'I' }, { "no-patch", 0, &val, 'n' }, { "detach", 0, NULL, 'D' }, { "features", 0, &val, 'f' }, { "subsystem", 1, NULL, 'Z' }, #ifdef HAVE_COMPRESSION { "carchive", 0, NULL, 'z' }, #endif { NULL, 0, NULL, 0 } }; #define FFMPEG_RECORD_ARG "r:" #ifdef HAVE_DYNAMIC #define DYNAMIC_ARG "L:" #else #define DYNAMIC_ARG #endif #ifdef HAVE_NETPLAY #define NETPLAY_ARG "HC:F:" #else #define NETPLAY_ARG #endif #ifdef HAVE_COMPRESSION #define COMPRESS_ARG "z:" #else #define COMPRESS_ARG #endif #define BSV_MOVIE_ARG "P:R:M:" const char *optstring = "hs:fvS:A:c:U:DN:d:" BSV_MOVIE_ARG NETPLAY_ARG DYNAMIC_ARG FFMPEG_RECORD_ARG COMPRESS_ARG; for (;;) { val = 0; int c = getopt_long(argc, argv, optstring, opts, NULL); int port; if (c == -1) break; switch (c) { case 'h': print_help(); exit(0); case 'Z': strlcpy(g_extern.subsystem, optarg, sizeof(g_extern.subsystem)); break; case 'd': { unsigned id = 0; port = 0; struct string_list *list = string_split(optarg, ":"); if (list && list->size == 2) { port = strtol(list->elems[0].data, NULL, 0); id = strtoul(list->elems[1].data, NULL, 0); } string_list_free(list); if (port < 1 || port > MAX_PLAYERS) { RARCH_ERR("Connect device to a valid port.\n"); print_help(); rarch_fail(1, "parse_input()"); } g_settings.input.libretro_device[port - 1] = id; g_extern.has_set_libretro_device[port - 1] = true; break; } case 'A': port = strtol(optarg, NULL, 0); if (port < 1 || port > MAX_PLAYERS) { RARCH_ERR("Connect dualanalog to a valid port.\n"); print_help(); rarch_fail(1, "parse_input()"); } g_settings.input.libretro_device[port - 1] = RETRO_DEVICE_ANALOG; g_extern.has_set_libretro_device[port - 1] = true; break; case 's': strlcpy(g_extern.savefile_name, optarg, sizeof(g_extern.savefile_name)); g_extern.has_set_save_path = true; break; case 'f': g_extern.force_fullscreen = true; break; case 'S': strlcpy(g_extern.savestate_name, optarg, sizeof(g_extern.savestate_name)); g_extern.has_set_state_path = true; break; case 'v': g_extern.verbosity = true; g_extern.has_set_verbosity = true; break; case 'N': port = strtol(optarg, NULL, 0); if (port < 1 || port > MAX_PLAYERS) { RARCH_ERR("Disconnect device from a valid port.\n"); print_help(); rarch_fail(1, "parse_input()"); } g_settings.input.libretro_device[port - 1] = RETRO_DEVICE_NONE; g_extern.has_set_libretro_device[port - 1] = true; break; case 'c': strlcpy(g_extern.config_path, optarg, sizeof(g_extern.config_path)); break; case 'r': strlcpy(g_extern.record_path, optarg, sizeof(g_extern.record_path)); g_extern.recording_enable = true; break; #ifdef HAVE_DYNAMIC case 'L': if (path_is_directory(optarg)) { *g_settings.libretro = '\0'; strlcpy(g_settings.libretro_directory, optarg, sizeof(g_settings.libretro_directory)); g_extern.has_set_libretro = true; g_extern.has_set_libretro_directory = true; RARCH_WARN("Using old --libretro behavior. Setting libretro_directory to \"%s\" instead.\n", optarg); } else { strlcpy(g_settings.libretro, optarg, sizeof(g_settings.libretro)); g_extern.has_set_libretro = true; } break; #endif #ifdef HAVE_COMPRESSION case 'z': strlcpy(g_extern.carchive_path, optarg, sizeof(g_extern.carchive_path)); g_extern.is_carchive = true; break; #endif case 'P': case 'R': strlcpy(g_extern.bsv.movie_start_path, optarg, sizeof(g_extern.bsv.movie_start_path)); g_extern.bsv.movie_start_playback = (c == 'P'); g_extern.bsv.movie_start_recording = (c == 'R'); break; case 'M': if (strcmp(optarg, "noload-nosave") == 0) { g_extern.sram_load_disable = true; g_extern.sram_save_disable = true; } else if (strcmp(optarg, "noload-save") == 0) g_extern.sram_load_disable = true; else if (strcmp(optarg, "load-nosave") == 0) g_extern.sram_save_disable = true; else if (strcmp(optarg, "load-save") != 0) { RARCH_ERR("Invalid argument in --sram-mode.\n"); print_help(); rarch_fail(1, "parse_input()"); } break; #ifdef HAVE_NETPLAY case 'H': g_extern.has_set_netplay_ip_address = true; g_extern.netplay_enable = true; *g_extern.netplay_server = '\0'; break; case 'C': g_extern.has_set_netplay_ip_address = true; g_extern.netplay_enable = true; strlcpy(g_extern.netplay_server, optarg, sizeof(g_extern.netplay_server)); break; case 'F': g_extern.netplay_sync_frames = strtol(optarg, NULL, 0); g_extern.has_set_netplay_delay_frames = true; break; #endif case 'U': strlcpy(g_extern.ups_name, optarg, sizeof(g_extern.ups_name)); g_extern.ups_pref = true; break; case 'D': #if defined(_WIN32) && !defined(_XBOX) FreeConsole(); #endif break; case 0: switch (val) { case 'M': g_extern.libretro_dummy = true; break; #ifdef HAVE_NETPLAY case 'p': g_extern.has_set_netplay_ip_port = true; g_extern.netplay_port = strtoul(optarg, NULL, 0); break; case 'S': g_extern.has_set_netplay_mode = true; g_extern.netplay_is_spectate = true; break; #endif case 'N': g_extern.has_set_username = true; strlcpy(g_settings.username, optarg, sizeof(g_settings.username)); break; #if defined(HAVE_NETWORK_CMD) && defined(HAVE_NETPLAY) case 'c': if (network_cmd_send(optarg)) exit(0); else rarch_fail(1, "network_cmd_send()"); break; #endif case 'C': strlcpy(g_extern.append_config_path, optarg, sizeof(g_extern.append_config_path)); break; case 'B': strlcpy(g_extern.bps_name, optarg, sizeof(g_extern.bps_name)); g_extern.bps_pref = true; break; case 'I': strlcpy(g_extern.ips_name, optarg, sizeof(g_extern.ips_name)); g_extern.ips_pref = true; break; case 'n': g_extern.block_patch = true; break; case 's': { if (sscanf(optarg, "%ux%u", &g_extern.record_width, &g_extern.record_height) != 2) { RARCH_ERR("Wrong format for --size.\n"); print_help(); rarch_fail(1, "parse_input()"); } break; } case 'R': strlcpy(g_extern.record_config, optarg, sizeof(g_extern.record_config)); break; case 'f': print_features(); exit(0); default: break; } break; case '?': print_help(); rarch_fail(1, "parse_input()"); default: RARCH_ERR("Error parsing arguments.\n"); rarch_fail(1, "parse_input()"); } } if (g_extern.libretro_dummy) { if (optind < argc) { RARCH_ERR("--menu was used, but content file was passed as well.\n"); rarch_fail(1, "parse_input()"); } } else if (!*g_extern.subsystem && optind < argc) set_paths(argv[optind]); else if (*g_extern.subsystem && optind < argc) set_special_paths(argv + optind, argc - optind); else g_extern.libretro_no_content = true; /* Copy SRM/state dirs used, so they can be reused on reentrancy. */ if (g_extern.has_set_save_path && path_is_directory(g_extern.savefile_name)) strlcpy(g_extern.savefile_dir, g_extern.savefile_name, sizeof(g_extern.savefile_dir)); if (g_extern.has_set_state_path && path_is_directory(g_extern.savestate_name)) strlcpy(g_extern.savestate_dir, g_extern.savestate_name, sizeof(g_extern.savestate_dir)); } static void init_controllers(void) { unsigned i; for (i = 0; i < MAX_PLAYERS; i++) { unsigned device = g_settings.input.libretro_device[i]; const struct retro_controller_description *desc = NULL; const char *ident = NULL; if (i < g_extern.system.num_ports) desc = libretro_find_controller_description( &g_extern.system.ports[i], device); if (desc) ident = desc->desc; if (!ident) { /* If we're trying to connect a completely unknown device, * revert back to JOYPAD. */ if (device != RETRO_DEVICE_JOYPAD && device != RETRO_DEVICE_NONE) { /* Do not fix g_settings.input.libretro_device[i], * because any use of dummy core will reset this, * which is not a good idea. */ RARCH_WARN("Input device ID %u is unknown to this libretro implementation. Using RETRO_DEVICE_JOYPAD.\n", device); device = RETRO_DEVICE_JOYPAD; } ident = "Joypad"; } if (device == RETRO_DEVICE_NONE) { RARCH_LOG("Disconnecting device from port %u.\n", i + 1); pretro_set_controller_port_device(i, device); } else if (device != RETRO_DEVICE_JOYPAD) { /* Some cores do not properly range check port argument. * This is broken behavior of course, but avoid breaking * cores needlessly. */ RARCH_LOG("Connecting %s (ID: %u) to port %u.\n", ident, device, i + 1); pretro_set_controller_port_device(i, device); } } } static inline bool load_save_files(void) { unsigned i; if (!g_extern.savefiles || g_extern.sram_load_disable) return false; for (i = 0; i < g_extern.savefiles->size; i++) load_ram_file(g_extern.savefiles->elems[i].data, g_extern.savefiles->elems[i].attr.i); return true; } static inline bool save_files(void) { unsigned i; if (!g_extern.savefiles || !g_extern.use_sram) return false; for (i = 0; i < g_extern.savefiles->size; i++) { unsigned type = g_extern.savefiles->elems[i].attr.i; const char *path = g_extern.savefiles->elems[i].data; RARCH_LOG("Saving RAM type #%u to \"%s\".\n", type, path); save_ram_file(path, type); } return true; } static void init_msg_queue(void) { if (!g_extern.msg_queue) rarch_assert(g_extern.msg_queue = msg_queue_new(8)); } void rarch_deinit_msg_queue(void) { if (g_extern.msg_queue) msg_queue_free(g_extern.msg_queue); g_extern.msg_queue = NULL; } static void init_cheats(void) { bool allow_cheats = true; #ifdef HAVE_NETPLAY allow_cheats &= !g_extern.netplay; #endif allow_cheats &= !g_extern.bsv.movie; if (!allow_cheats) return; if (*g_settings.cheat_database) g_extern.cheat = cheat_manager_new(g_settings.cheat_database); } static void deinit_cheats(void) { if (g_extern.cheat) cheat_manager_free(g_extern.cheat); g_extern.cheat = NULL; } static void init_rewind(void) { void *state = NULL; #ifdef HAVE_NETPLAY if (g_extern.netplay) return; #endif if (!g_settings.rewind_enable || g_extern.state_manager) return; if (g_extern.system.audio_callback.callback) { RARCH_ERR(RETRO_LOG_REWIND_INIT_FAILED_THREADED_AUDIO); return; } g_extern.state_size = pretro_serialize_size(); if (!g_extern.state_size) { RARCH_ERR(RETRO_LOG_REWIND_INIT_FAILED_NO_SAVESTATES); return; } RARCH_LOG(RETRO_MSG_REWIND_INIT "%u MB\n", (unsigned)(g_settings.rewind_buffer_size / 1000000)); g_extern.state_manager = state_manager_new(g_extern.state_size, g_settings.rewind_buffer_size); if (!g_extern.state_manager) RARCH_WARN(RETRO_LOG_REWIND_INIT_FAILED); state_manager_push_where(g_extern.state_manager, &state); pretro_serialize(state, g_extern.state_size); state_manager_push_do(g_extern.state_manager); } static void deinit_rewind(void) { #ifdef HAVE_NETPLAY if (g_extern.netplay) return; #endif if (g_extern.state_manager) state_manager_free(g_extern.state_manager); g_extern.state_manager = NULL; } static void init_movie(void) { if (g_extern.bsv.movie_start_playback) { if (!(g_extern.bsv.movie = bsv_movie_init(g_extern.bsv.movie_start_path, RARCH_MOVIE_PLAYBACK))) { RARCH_ERR("Failed to load movie file: \"%s\".\n", g_extern.bsv.movie_start_path); rarch_fail(1, "init_movie()"); } g_extern.bsv.movie_playback = true; msg_queue_push(g_extern.msg_queue, "Starting movie playback.", 2, 180); RARCH_LOG("Starting movie playback.\n"); g_settings.rewind_granularity = 1; } else if (g_extern.bsv.movie_start_recording) { char msg[PATH_MAX]; snprintf(msg, sizeof(msg), "Starting movie record to \"%s\".", g_extern.bsv.movie_start_path); msg_queue_clear(g_extern.msg_queue); if ((g_extern.bsv.movie = bsv_movie_init(g_extern.bsv.movie_start_path, RARCH_MOVIE_RECORD))) { msg_queue_push(g_extern.msg_queue, msg, 1, 180); RARCH_LOG("Starting movie record to \"%s\".\n", g_extern.bsv.movie_start_path); g_settings.rewind_granularity = 1; } else { msg_queue_push(g_extern.msg_queue, "Failed to start movie record.", 1, 180); RARCH_ERR("Failed to start movie record.\n"); } } } static void deinit_movie(void) { if (g_extern.bsv.movie) bsv_movie_free(g_extern.bsv.movie); g_extern.bsv.movie = NULL; } #define RARCH_DEFAULT_PORT 55435 #ifdef HAVE_NETPLAY static void init_netplay(void) { struct retro_callbacks cbs = {0}; if (!g_extern.netplay_enable) return; if (g_extern.bsv.movie_start_playback) { RARCH_WARN(RETRO_LOG_MOVIE_STARTED_INIT_NETPLAY_FAILED); return; } cbs.frame_cb = video_frame; cbs.sample_cb = audio_sample; cbs.sample_batch_cb = audio_sample_batch; cbs.state_cb = input_state; if (*g_extern.netplay_server) { RARCH_LOG("Connecting to netplay host...\n"); g_extern.netplay_is_client = true; } else RARCH_LOG("Waiting for client...\n"); g_extern.netplay = netplay_new( g_extern.netplay_is_client ? g_extern.netplay_server : NULL, g_extern.netplay_port ? g_extern.netplay_port : RARCH_DEFAULT_PORT, g_extern.netplay_sync_frames, &cbs, g_extern.netplay_is_spectate, g_settings.username); if (!g_extern.netplay) { g_extern.netplay_is_client = false; RARCH_WARN(RETRO_LOG_INIT_NETPLAY_FAILED); if (g_extern.msg_queue) msg_queue_push(g_extern.msg_queue, RETRO_MSG_INIT_NETPLAY_FAILED, 0, 180); } } static void deinit_netplay(void) { if (g_extern.netplay) netplay_free(g_extern.netplay); g_extern.netplay = NULL; } #endif #ifdef HAVE_COMMAND static void init_command(void) { if (!g_settings.stdin_cmd_enable && !g_settings.network_cmd_enable) return; if (g_settings.stdin_cmd_enable && driver.stdin_claimed) { RARCH_WARN("stdin command interface is desired, but input driver has already claimed stdin.\n" "Cannot use this command interface.\n"); } if (!(driver.command = rarch_cmd_new(g_settings.stdin_cmd_enable && !driver.stdin_claimed, g_settings.network_cmd_enable, g_settings.network_cmd_port))) RARCH_ERR("Failed to initialize command interface.\n"); } static void deinit_command(void) { if (driver.command) rarch_cmd_free(driver.command); driver.command = NULL; } #endif #ifdef HAVE_NETPLAY static void init_libretro_cbs_netplay(void) { if (!g_extern.netplay) return; pretro_set_video_refresh(g_extern.netplay_is_spectate ? video_frame : video_frame_net); pretro_set_audio_sample(g_extern.netplay_is_spectate ? audio_sample : audio_sample_net); pretro_set_audio_sample_batch(g_extern.netplay_is_spectate ? audio_sample_batch : audio_sample_batch_net); pretro_set_input_state(g_extern.netplay_is_spectate ? (g_extern.netplay_is_client ? input_state_spectate_client : input_state_spectate) : input_state_net); } #endif static void init_libretro_cbs(void) { pretro_set_video_refresh(video_frame); pretro_set_audio_sample(audio_sample); pretro_set_audio_sample_batch(audio_sample_batch); pretro_set_input_state(input_state); pretro_set_input_poll(rarch_input_poll); #ifdef HAVE_NETPLAY init_libretro_cbs_netplay(); #endif } #if defined(HAVE_THREADS) static void init_autosave(void) { unsigned i; if (g_settings.autosave_interval < 1 || !g_extern.savefiles) return; if (!(g_extern.autosave = (autosave_t**)calloc(g_extern.savefiles->size, sizeof(*g_extern.autosave)))) return; g_extern.num_autosave = g_extern.savefiles->size; for (i = 0; i < g_extern.savefiles->size; i++) { const char *path = g_extern.savefiles->elems[i].data; unsigned type = g_extern.savefiles->elems[i].attr.i; if (pretro_get_memory_size(type) > 0) { g_extern.autosave[i] = autosave_new(path, pretro_get_memory_data(type), pretro_get_memory_size(type), g_settings.autosave_interval); if (!g_extern.autosave[i]) RARCH_WARN(RETRO_LOG_INIT_AUTOSAVE_FAILED); } } } static void deinit_autosave(void) { unsigned i; for (i = 0; i < g_extern.num_autosave; i++) autosave_free(g_extern.autosave[i]); if (g_extern.autosave) free(g_extern.autosave); g_extern.autosave = NULL; g_extern.num_autosave = 0; } #endif static void set_savestate_auto_index(void) { char state_dir[PATH_MAX], state_base[PATH_MAX]; size_t i; struct string_list *dir_list = NULL; unsigned max_index = 0; if (!g_settings.savestate_auto_index) return; /* Find the file in the same directory as g_extern.savestate_name * with the largest numeral suffix. * * E.g. /foo/path/content.state, will try to find * /foo/path/content.state%d, where %d is the largest number available. */ fill_pathname_basedir(state_dir, g_extern.savestate_name, sizeof(state_dir)); fill_pathname_base(state_base, g_extern.savestate_name, sizeof(state_base)); if (!(dir_list = dir_list_new(state_dir, NULL, false))) return; for (i = 0; i < dir_list->size; i++) { char elem_base[PATH_MAX]; const char *dir_elem = dir_list->elems[i].data; fill_pathname_base(elem_base, dir_elem, sizeof(elem_base)); if (strstr(elem_base, state_base) != elem_base) continue; const char *end = dir_elem + strlen(dir_elem); while ((end > dir_elem) && isdigit(end[-1])) end--; unsigned index = strtoul(end, NULL, 0); if (index > max_index) max_index = index; } dir_list_free(dir_list); g_settings.state_slot = max_index; RARCH_LOG("Found last state slot: #%d\n", g_settings.state_slot); } static void deinit_savefiles(void) { if (g_extern.savefiles) string_list_free(g_extern.savefiles); g_extern.savefiles = NULL; } static void fill_pathnames(void) { deinit_savefiles(); g_extern.savefiles = string_list_new(); rarch_assert(g_extern.savefiles); if (*g_extern.subsystem) { /* For subsystems, we know exactly which RAM types are supported. */ unsigned i, j; const struct retro_subsystem_info *info = (const struct retro_subsystem_info*)libretro_find_subsystem_info( g_extern.system.special, g_extern.system.num_special, g_extern.subsystem); /* We'll handle this error gracefully later. */ unsigned num_content = min(info ? info->num_roms : 0, g_extern.subsystem_fullpaths ? g_extern.subsystem_fullpaths->size : 0); bool use_sram_dir = path_is_directory(g_extern.savefile_name); for (i = 0; i < num_content; i++) { for (j = 0; j < info->roms[i].num_memory; j++) { union string_list_elem_attr attr; char path[PATH_MAX], ext[32]; const struct retro_subsystem_memory_info *mem = (const struct retro_subsystem_memory_info*) &info->roms[i].memory[j]; snprintf(ext, sizeof(ext), ".%s", mem->extension); if (use_sram_dir) { /* Redirect content fullpath to save directory. */ strlcpy(path, g_extern.savefile_name, sizeof(path)); fill_pathname_dir(path, g_extern.subsystem_fullpaths->elems[i].data, ext, sizeof(path)); } else { fill_pathname(path, g_extern.subsystem_fullpaths->elems[i].data, ext, sizeof(path)); } attr.i = mem->type; string_list_append(g_extern.savefiles, path, attr); } } /* Let other relevant paths be inferred from the main SRAM location. */ if (!g_extern.has_set_save_path) fill_pathname_noext(g_extern.savefile_name, g_extern.basename, ".srm", sizeof(g_extern.savefile_name)); if (path_is_directory(g_extern.savefile_name)) { fill_pathname_dir(g_extern.savefile_name, g_extern.basename, ".srm", sizeof(g_extern.savefile_name)); RARCH_LOG("Redirecting save file to \"%s\".\n", g_extern.savefile_name); } } else { char savefile_name_rtc[PATH_MAX]; union string_list_elem_attr attr; attr.i = RETRO_MEMORY_SAVE_RAM; string_list_append(g_extern.savefiles, g_extern.savefile_name, attr); /* Infer .rtc save path from save ram path. */ attr.i = RETRO_MEMORY_RTC; fill_pathname(savefile_name_rtc, g_extern.savefile_name, ".rtc", sizeof(savefile_name_rtc)); string_list_append(g_extern.savefiles, savefile_name_rtc, attr); } fill_pathname(g_extern.bsv.movie_path, g_extern.savefile_name, "", sizeof(g_extern.bsv.movie_path)); if (*g_extern.basename) { if (!*g_extern.ups_name) fill_pathname_noext(g_extern.ups_name, g_extern.basename, ".ups", sizeof(g_extern.ups_name)); if (!*g_extern.bps_name) fill_pathname_noext(g_extern.bps_name, g_extern.basename, ".bps", sizeof(g_extern.bps_name)); if (!*g_extern.ips_name) fill_pathname_noext(g_extern.ips_name, g_extern.basename, ".ips", sizeof(g_extern.ips_name)); } } static void load_auto_state(void) { char savestate_name_auto[PATH_MAX]; #ifdef HAVE_NETPLAY if (g_extern.netplay_enable && !g_extern.netplay_is_spectate) return; #endif if (!g_settings.savestate_auto_load) return; fill_pathname_noext(savestate_name_auto, g_extern.savestate_name, ".auto", sizeof(savestate_name_auto)); if (path_file_exists(savestate_name_auto)) { char msg[PATH_MAX]; bool ret = load_state(savestate_name_auto); RARCH_LOG("Found auto savestate in: %s\n", savestate_name_auto); snprintf(msg, sizeof(msg), "Auto-loading savestate from \"%s\" %s.", savestate_name_auto, ret ? "succeeded" : "failed"); msg_queue_push(g_extern.msg_queue, msg, 1, 180); RARCH_LOG("%s\n", msg); } } static bool save_auto_state(void) { char savestate_name_auto[PATH_MAX]; if (!g_settings.savestate_auto_save || g_extern.libretro_dummy || g_extern.libretro_no_content) return false; fill_pathname_noext(savestate_name_auto, g_extern.savestate_name, ".auto", sizeof(savestate_name_auto)); bool ret = save_state(savestate_name_auto); RARCH_LOG("Auto save state to \"%s\" %s.\n", savestate_name_auto, ret ? "succeeded" : "failed"); return true; } /* Save or load state here. */ static void rarch_load_state(const char *path, char *msg, size_t sizeof_msg) { if (load_state(path)) { if (g_settings.state_slot < 0) snprintf(msg, sizeof_msg, "Loaded state from slot #-1 (auto)."); else snprintf(msg, sizeof_msg, "Loaded state from slot #%d.", g_settings.state_slot); } else snprintf(msg, sizeof_msg, "Failed to load state from \"%s\".", path); } static void rarch_save_state(const char *path, char *msg, size_t sizeof_msg) { if (save_state(path)) { if (g_settings.state_slot < 0) snprintf(msg, sizeof_msg, "Saved state to slot #-1 (auto)."); else snprintf(msg, sizeof_msg, "Saved state to slot #%d.", g_settings.state_slot); } else snprintf(msg, sizeof_msg, "Failed to save state to \"%s\".", path); } static void main_state(unsigned cmd) { char path[PATH_MAX], msg[PATH_MAX]; if (g_settings.state_slot > 0) snprintf(path, sizeof(path), "%s%d", g_extern.savestate_name, g_settings.state_slot); else if (g_settings.state_slot < 0) snprintf(path, sizeof(path), "%s.auto", g_extern.savestate_name); else strlcpy(path, g_extern.savestate_name, sizeof(path)); if (pretro_serialize_size()) { if (cmd == RARCH_CMD_SAVE_STATE) rarch_save_state(path, msg, sizeof(msg)); else if (cmd == RARCH_CMD_LOAD_STATE) rarch_load_state(path, msg, sizeof(msg)); } else strlcpy(msg, "Core does not support save states.", sizeof(msg)); msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, msg, 2, 180); RARCH_LOG("%s\n", msg); } static void check_savestates(bool immutable) { static bool old_should_savestate = false; bool should_savestate = input_key_pressed_func(RARCH_SAVE_STATE_KEY); if (should_savestate && !old_should_savestate) rarch_main_command(RARCH_CMD_SAVE_STATE); old_should_savestate = should_savestate; if (!immutable) { static bool old_should_loadstate = false; bool should_loadstate = input_key_pressed_func(RARCH_LOAD_STATE_KEY); if (!should_savestate && should_loadstate && !old_should_loadstate) rarch_main_command(RARCH_CMD_LOAD_STATE); old_should_loadstate = should_loadstate; } } static void set_fullscreen(bool fullscreen) { g_settings.video.fullscreen = fullscreen; driver.video_cache_context = g_extern.system.hw_render_callback.cache_context; driver.video_cache_context_ack = false; rarch_main_command(RARCH_CMD_RESET_CONTEXT); driver.video_cache_context = false; /* Poll input to avoid possibly stale data to corrupt things. */ if (driver.input) driver.input->poll(driver.input_data); } bool rarch_check_fullscreen(void) { /* If we go fullscreen we drop all drivers and * reinitialize to be safe. */ static bool was_pressed = false; bool pressed = input_key_pressed_func(RARCH_FULLSCREEN_TOGGLE_KEY); bool toggle = pressed && !was_pressed; if (toggle) { g_settings.video.fullscreen = !g_settings.video.fullscreen; rarch_main_command(RARCH_CMD_REINIT); } was_pressed = pressed; return toggle; } static void state_slot(void) { char msg[PATH_MAX]; if (g_extern.msg_queue) msg_queue_clear(g_extern.msg_queue); snprintf(msg, sizeof(msg), "State slot: %d", g_settings.state_slot); if (g_extern.msg_queue) msg_queue_push(g_extern.msg_queue, msg, 1, 180); RARCH_LOG("%s\n", msg); } static void check_stateslots(void) { /* Save state slots */ static bool old_should_slot_increase = false; static bool old_should_slot_decrease = false; bool should_slot_increase = input_key_pressed_func(RARCH_STATE_SLOT_PLUS); bool should_slot_decrease = input_key_pressed_func(RARCH_STATE_SLOT_MINUS); if (should_slot_increase && !old_should_slot_increase) { g_settings.state_slot++; state_slot(); } old_should_slot_increase = should_slot_increase; if (should_slot_decrease && !old_should_slot_decrease) { if (g_settings.state_slot > 0) g_settings.state_slot--; state_slot(); } old_should_slot_decrease = should_slot_decrease; } static inline void flush_rewind_audio(void) { if (!g_extern.frame_is_reverse) return; /* We just rewound. Flush rewind audio buffer. */ g_extern.audio_active = audio_flush(g_extern.audio_data.rewind_buf + g_extern.audio_data.rewind_ptr, g_extern.audio_data.rewind_size - g_extern.audio_data.rewind_ptr) && g_extern.audio_active; g_extern.frame_is_reverse = false; } static inline void setup_rewind_audio(void) { unsigned i; /* Push audio ready to be played. */ g_extern.audio_data.rewind_ptr = g_extern.audio_data.rewind_size; for (i = 0; i < g_extern.audio_data.data_ptr; i += 2) { g_extern.audio_data.rewind_buf[--g_extern.audio_data.rewind_ptr] = g_extern.audio_data.conv_outsamples[i + 1]; g_extern.audio_data.rewind_buf[--g_extern.audio_data.rewind_ptr] = g_extern.audio_data.conv_outsamples[i + 0]; } g_extern.audio_data.data_ptr = 0; } static void check_rewind(void) { static bool first = true; flush_rewind_audio(); if (first) { first = false; return; } if (!g_extern.state_manager) return; if (input_key_pressed_func(RARCH_REWIND)) { const void *buf = NULL; msg_queue_clear(g_extern.msg_queue); if (state_manager_pop(g_extern.state_manager, &buf)) { g_extern.frame_is_reverse = true; setup_rewind_audio(); msg_queue_push(g_extern.msg_queue, RETRO_MSG_REWINDING, 0, g_extern.is_paused ? 1 : 30); pretro_unserialize(buf, g_extern.state_size); if (g_extern.bsv.movie) bsv_movie_frame_rewind(g_extern.bsv.movie); } else msg_queue_push(g_extern.msg_queue, RETRO_MSG_REWIND_REACHED_END, 0, 30); } else { static unsigned cnt = 0; cnt = (cnt + 1) % (g_settings.rewind_granularity ? g_settings.rewind_granularity : 1); /* Avoid possible SIGFPE. */ if ((cnt == 0) || g_extern.bsv.movie) { void *state = NULL; state_manager_push_where(g_extern.state_manager, &state); RARCH_PERFORMANCE_INIT(rewind_serialize); RARCH_PERFORMANCE_START(rewind_serialize); pretro_serialize(state, g_extern.state_size); RARCH_PERFORMANCE_STOP(rewind_serialize); state_manager_push_do(g_extern.state_manager); } } pretro_set_audio_sample(g_extern.frame_is_reverse ? audio_sample_rewind : audio_sample); pretro_set_audio_sample_batch(g_extern.frame_is_reverse ? audio_sample_batch_rewind : audio_sample_batch); } static void check_slowmotion(void) { g_extern.is_slowmotion = input_key_pressed_func(RARCH_SLOWMOTION); if (!g_extern.is_slowmotion) return; if (g_settings.video.black_frame_insertion) rarch_render_cached_frame(); msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, g_extern.frame_is_reverse ? "Slow motion rewind." : "Slow motion.", 0, 30); } static void check_movie_record(bool pressed) { if (!pressed) return; if (g_extern.bsv.movie) { msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, RETRO_MSG_MOVIE_RECORD_STOPPING, 2, 180); RARCH_LOG(RETRO_LOG_MOVIE_RECORD_STOPPING); deinit_movie(); } else { char path[PATH_MAX], msg[PATH_MAX]; g_settings.rewind_granularity = 1; if (g_settings.state_slot > 0) { snprintf(path, sizeof(path), "%s%d.bsv", g_extern.bsv.movie_path, g_settings.state_slot); } else { snprintf(path, sizeof(path), "%s.bsv", g_extern.bsv.movie_path); } snprintf(msg, sizeof(msg), "Starting movie record to \"%s\".", path); g_extern.bsv.movie = bsv_movie_init(path, RARCH_MOVIE_RECORD); msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, g_extern.bsv.movie ? msg : "Failed to start movie record.", 1, 180); if (g_extern.bsv.movie) RARCH_LOG("Starting movie record to \"%s\".\n", path); else RARCH_ERR("Failed to start movie record.\n"); } } static void check_movie_playback(bool pressed) { if (g_extern.bsv.movie_end || pressed) { msg_queue_push(g_extern.msg_queue, RETRO_MSG_MOVIE_PLAYBACK_ENDED, 1, 180); RARCH_LOG(RETRO_LOG_MOVIE_PLAYBACK_ENDED); deinit_movie(); g_extern.bsv.movie_end = false; g_extern.bsv.movie_playback = false; } } static void check_movie(void) { static bool old_button = false; bool new_button = input_key_pressed_func(RARCH_MOVIE_RECORD_TOGGLE); bool pressed = new_button && !old_button; if (g_extern.bsv.movie_playback) check_movie_playback(pressed); else check_movie_record(pressed); old_button = new_button; } static void check_pause(void) { static bool old_state = false; static bool old_focus = true; bool focus = true; bool has_set_audio_stop = false; bool has_set_audio_start = false; bool new_state = input_key_pressed_func(RARCH_PAUSE_TOGGLE); /* FRAMEADVANCE will set us into pause mode. */ new_state |= !g_extern.is_paused && input_key_pressed_func(RARCH_FRAMEADVANCE); if (g_settings.pause_nonactive) focus = driver.video->focus(driver.video_data); if (focus && new_state && !old_state) { g_extern.is_paused = !g_extern.is_paused; if (g_extern.is_paused) { RARCH_LOG("Paused.\n"); has_set_audio_stop = true; } else { RARCH_LOG("Unpaused.\n"); has_set_audio_start = true; } } else if (focus && !old_focus) { RARCH_LOG("Unpaused.\n"); g_extern.is_paused = false; has_set_audio_start = true; } else if (!focus && old_focus) { RARCH_LOG("Paused.\n"); g_extern.is_paused = true; has_set_audio_stop = true; } if (has_set_audio_stop) rarch_main_command(RARCH_CMD_AUDIO_STOP); if (has_set_audio_start) rarch_main_command(RARCH_CMD_AUDIO_START); if (g_extern.is_paused && g_settings.video.black_frame_insertion) rarch_render_cached_frame(); old_focus = focus; old_state = new_state; } static void check_oneshot(void) { static bool old_state = false; static bool old_rewind_state = false; bool new_state = input_key_pressed_func(RARCH_FRAMEADVANCE); bool new_rewind_state = input_key_pressed_func(RARCH_REWIND); g_extern.is_oneshot = (new_state && !old_state); old_state = new_state; /* Rewind buttons works like FRAMEREWIND when paused. * We will one-shot in that case. */ g_extern.is_oneshot |= new_rewind_state && !old_rewind_state; old_rewind_state = new_rewind_state; } static void check_reset(void) { static bool old_state = false; bool new_state = input_key_pressed_func(RARCH_RESET); if (new_state && !old_state) rarch_main_command(RARCH_CMD_RESET); old_state = new_state; } static void check_turbo(void) { unsigned i; static const struct retro_keybind *binds[MAX_PLAYERS] = { g_settings.input.binds[0], g_settings.input.binds[1], g_settings.input.binds[2], g_settings.input.binds[3], g_settings.input.binds[4], g_settings.input.binds[5], g_settings.input.binds[6], g_settings.input.binds[7], g_settings.input.binds[8], g_settings.input.binds[9], g_settings.input.binds[10], g_settings.input.binds[11], g_settings.input.binds[12], g_settings.input.binds[13], g_settings.input.binds[14], g_settings.input.binds[15], }; g_extern.turbo_count++; if (driver.block_libretro_input) memset(g_extern.turbo_frame_enable, 0, sizeof(g_extern.turbo_frame_enable)); else { for (i = 0; i < MAX_PLAYERS; i++) g_extern.turbo_frame_enable[i] = driver.input->input_state(driver.input_data, binds, i, RETRO_DEVICE_JOYPAD, 0, RARCH_TURBO_ENABLE); } } static void check_shader_dir(void) { static bool old_pressed_next = false; static bool old_pressed_prev = false; bool should_apply = false; bool pressed_next = false; bool pressed_prev = false; if (!g_extern.shader_dir.list || !driver.video->set_shader) return; pressed_next = input_key_pressed_func(RARCH_SHADER_NEXT); pressed_prev = input_key_pressed_func(RARCH_SHADER_PREV); if (pressed_next && !old_pressed_next) { should_apply = true; g_extern.shader_dir.ptr = (g_extern.shader_dir.ptr + 1) % g_extern.shader_dir.list->size; } else if (pressed_prev && !old_pressed_prev) { should_apply = true; if (g_extern.shader_dir.ptr == 0) g_extern.shader_dir.ptr = g_extern.shader_dir.list->size - 1; else g_extern.shader_dir.ptr--; } if (should_apply) { char msg[512]; const char *shader = g_extern.shader_dir.list->elems[g_extern.shader_dir.ptr].data; enum rarch_shader_type type = RARCH_SHADER_NONE; const char *ext = path_get_extension(shader); if (strcmp(ext, "glsl") == 0 || strcmp(ext, "glslp") == 0) type = RARCH_SHADER_GLSL; else if (strcmp(ext, "cg") == 0 || strcmp(ext, "cgp") == 0) type = RARCH_SHADER_CG; if (type == RARCH_SHADER_NONE) return; msg_queue_clear(g_extern.msg_queue); snprintf(msg, sizeof(msg), "Shader #%u: \"%s\".", (unsigned)g_extern.shader_dir.ptr, shader); msg_queue_push(g_extern.msg_queue, msg, 1, 120); RARCH_LOG("Applying shader \"%s\".\n", shader); if (!driver.video->set_shader(driver.video_data, type, shader)) RARCH_WARN("Failed to apply shader.\n"); } old_pressed_next = pressed_next; old_pressed_prev = pressed_prev; } static void check_cheats(void) { bool pressed_next = false; bool pressed_prev = false; bool pressed_toggle = false; static bool old_pressed_prev = false; static bool old_pressed_next = false; static bool old_pressed_toggle = false; if (!g_extern.cheat) return; pressed_next = input_key_pressed_func(RARCH_CHEAT_INDEX_PLUS); pressed_prev = input_key_pressed_func(RARCH_CHEAT_INDEX_MINUS); pressed_toggle = input_key_pressed_func(RARCH_CHEAT_TOGGLE); if (pressed_next && !old_pressed_next) cheat_manager_index_next(g_extern.cheat); else if (pressed_prev && !old_pressed_prev) cheat_manager_index_prev(g_extern.cheat); else if (pressed_toggle && !old_pressed_toggle) cheat_manager_toggle(g_extern.cheat); old_pressed_prev = pressed_prev; old_pressed_next = pressed_next; old_pressed_toggle = pressed_toggle; } void rarch_disk_control_append_image(const char *path) { char msg[512]; unsigned new_index; const struct retro_disk_control_callback *control = (const struct retro_disk_control_callback*)&g_extern.system.disk_control; struct retro_game_info info = {0}; rarch_disk_control_set_eject(true, false); control->add_image_index(); new_index = control->get_num_images(); if (!new_index) return; new_index--; info.path = path; control->replace_image_index(new_index, &info); rarch_disk_control_set_index(new_index); snprintf(msg, sizeof(msg), "Appended disk: %s", path); RARCH_LOG("%s\n", msg); msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, msg, 0, 180); #if defined(HAVE_THREADS) deinit_autosave(); #endif /* TODO: Need to figure out what to do with subsystems case. */ if (!*g_extern.subsystem) { /* Update paths for our new image. * If we actually use append_image, we assume that we * started out in a single disk case, and that this way * of doing it makes the most sense. */ set_paths(path); fill_pathnames(); } #if defined(HAVE_THREADS) init_autosave(); #endif rarch_disk_control_set_eject(false, false); } void rarch_disk_control_set_eject(bool new_state, bool log) { char msg[256]; const struct retro_disk_control_callback *control = (const struct retro_disk_control_callback*)&g_extern.system.disk_control; bool error = false; if (!control->get_num_images) return; *msg = '\0'; if (control->set_eject_state(new_state)) snprintf(msg, sizeof(msg), "%s virtual disk tray.", new_state ? "Ejected" : "Closed"); else { error = true; snprintf(msg, sizeof(msg), "Failed to %s virtual disk tray.", new_state ? "eject" : "close"); } if (*msg) { if (error) RARCH_ERR("%s\n", msg); else RARCH_LOG("%s\n", msg); /* Only noise in menu. */ if (log) { msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, msg, 1, 180); } } } void rarch_disk_control_set_index(unsigned next_index) { char msg[256]; unsigned num_disks; const struct retro_disk_control_callback *control = (const struct retro_disk_control_callback*)&g_extern.system.disk_control; bool error = false; if (!control->get_num_images) return; *msg = '\0'; num_disks = control->get_num_images(); if (control->set_image_index(next_index)) { if (next_index < num_disks) snprintf(msg, sizeof(msg), "Setting disk %u of %u in tray.", next_index + 1, num_disks); else strlcpy(msg, "Removed disk from tray.", sizeof(msg)); } else { if (next_index < num_disks) snprintf(msg, sizeof(msg), "Failed to set disk %u of %u.", next_index + 1, num_disks); else strlcpy(msg, "Failed to remove disk from tray.", sizeof(msg)); error = true; } if (*msg) { if (error) RARCH_ERR("%s\n", msg); else RARCH_LOG("%s\n", msg); msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, msg, 1, 180); } } static void check_disk(void) { bool pressed_eject = false; bool pressed_next = false; static bool old_pressed_eject = false; static bool old_pressed_next = false; const struct retro_disk_control_callback *control = (const struct retro_disk_control_callback*)&g_extern.system.disk_control; if (!control->get_num_images) return; pressed_eject = input_key_pressed_func(RARCH_DISK_EJECT_TOGGLE); pressed_next = input_key_pressed_func(RARCH_DISK_NEXT); if (pressed_eject && !old_pressed_eject) { bool new_state = !control->get_eject_state(); rarch_disk_control_set_eject(new_state, true); } else if (pressed_next && !old_pressed_next) { unsigned num_disks = control->get_num_images(); unsigned current = control->get_image_index(); if (num_disks && num_disks != UINT_MAX) { /* Use "no disk" state when index == num_disks. */ unsigned next_index = current >= num_disks ? 0 : ((current + 1) % (num_disks + 1)); rarch_disk_control_set_index(next_index); } else RARCH_ERR("Got invalid disk index from libretro.\n"); } old_pressed_eject = pressed_eject; old_pressed_next = pressed_next; } static void check_screenshot(void) { static bool old_pressed = false; bool pressed = input_key_pressed_func(RARCH_SCREENSHOT); if (pressed && !old_pressed) rarch_main_command(RARCH_CMD_TAKE_SCREENSHOT); old_pressed = pressed; } static void check_mute(void) { static bool old_pressed = false; bool pressed = input_key_pressed_func(RARCH_MUTE); if (!g_extern.audio_active) return; if (pressed && !old_pressed) { g_extern.audio_data.mute = !g_extern.audio_data.mute; const char *msg = g_extern.audio_data.mute ? "Audio muted." : "Audio unmuted."; msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, msg, 1, 180); if (driver.audio_data) { if (g_extern.audio_data.mute) driver.audio->stop(driver.audio_data); else if (!driver.audio->start(driver.audio_data)) { RARCH_ERR("Failed to unmute audio.\n"); g_extern.audio_active = false; } } RARCH_LOG("%s\n", msg); } old_pressed = pressed; } static void check_volume(void) { char msg[256]; float db_change = 0.0f; bool pressed_up = input_key_pressed_func(RARCH_VOLUME_UP); bool pressed_down = input_key_pressed_func(RARCH_VOLUME_DOWN); if (!pressed_up && !pressed_down) return; if (pressed_up) db_change += 0.5f; if (pressed_down) db_change -= 0.5f; g_extern.audio_data.volume_db += db_change; g_extern.audio_data.volume_db = max(g_extern.audio_data.volume_db, -80.0f); g_extern.audio_data.volume_db = min(g_extern.audio_data.volume_db, 12.0f); snprintf(msg, sizeof(msg), "Volume: %.1f dB", g_extern.audio_data.volume_db); msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, msg, 1, 180); RARCH_LOG("%s\n", msg); g_extern.audio_data.volume_gain = db_to_gain(g_extern.audio_data.volume_db); } #ifdef HAVE_NETPLAY static void check_netplay_flip(void) { static bool old_pressed = false; bool pressed = input_key_pressed_func(RARCH_NETPLAY_FLIP); if (pressed && !old_pressed) netplay_flip_players(g_extern.netplay); old_pressed = pressed; rarch_check_fullscreen(); } #endif void rarch_check_block_hotkey(void) { static const struct retro_keybind *bind = &g_settings.input.binds[0][RARCH_ENABLE_HOTKEY]; bool use_hotkey_enable, enable_hotkey; /* Don't block the check to RARCH_ENABLE_HOTKEY * unless we're really supposed to. */ driver.block_hotkey = driver.block_input; // If we haven't bound anything to this, always allow hotkeys. use_hotkey_enable = bind->key != RETROK_UNKNOWN || bind->joykey != NO_BTN || bind->joyaxis != AXIS_NONE; enable_hotkey = input_key_pressed_func(RARCH_ENABLE_HOTKEY); driver.block_hotkey = driver.block_input || (use_hotkey_enable && !enable_hotkey); /* If we hold ENABLE_HOTKEY button, block all libretro input to allow * hotkeys to be bound to same keys as RetroPad. */ driver.block_libretro_input = use_hotkey_enable && enable_hotkey; } #ifdef HAVE_OVERLAY void rarch_check_overlay(void) { static bool old_pressed = false; bool pressed = input_key_pressed_func(RARCH_OVERLAY_NEXT); if (!driver.overlay) return; if (pressed && !old_pressed) input_overlay_next(driver.overlay); old_pressed = pressed; } #endif static void check_grab_mouse_toggle(void) { static bool old_pressed = false; static bool grab_mouse_state = false; bool pressed = input_key_pressed_func(RARCH_GRAB_MOUSE_TOGGLE) && driver.input->grab_mouse; if (pressed && !old_pressed) { grab_mouse_state = !grab_mouse_state; RARCH_LOG("Grab mouse state: %s.\n", grab_mouse_state ? "yes" : "no"); driver.input->grab_mouse(driver.input_data, grab_mouse_state); if (driver.video_poke && driver.video_poke->show_mouse) driver.video_poke->show_mouse(driver.video_data, !grab_mouse_state); } old_pressed = pressed; } static void check_flip(void) { check_pause(); check_oneshot(); if (rarch_check_fullscreen() && g_extern.is_paused) rarch_render_cached_frame(); if (g_extern.is_paused && !g_extern.is_oneshot) return; check_fast_forward_button(); check_stateslots(); check_savestates(g_extern.bsv.movie); check_rewind(); check_slowmotion(); check_movie(); check_shader_dir(); check_cheats(); check_disk(); check_reset(); } static void do_state_checks(void) { rarch_check_block_hotkey(); check_screenshot(); check_mute(); check_volume(); check_turbo(); check_grab_mouse_toggle(); #ifdef HAVE_OVERLAY rarch_check_overlay(); #endif #ifdef HAVE_NETPLAY if (g_extern.netplay) check_netplay_flip(); else #endif check_flip(); } static void init_state(void) { g_extern.video_active = true; g_extern.audio_active = true; } static void deinit_log_file(void) { if (g_extern.log_file) fclose(g_extern.log_file); g_extern.log_file = NULL; } void rarch_main_clear_state(void) { unsigned i; memset(&g_settings, 0, sizeof(g_settings)); deinit_log_file(); memset(&g_extern, 0, sizeof(g_extern)); init_state(); for (i = 0; i < MAX_PLAYERS; i++) g_settings.input.libretro_device[i] = RETRO_DEVICE_JOYPAD; init_msg_queue(); } #ifdef HAVE_ZLIB #define DEFAULT_EXT "zip" #else #define DEFAULT_EXT "" #endif static void init_system_info(void) { struct retro_system_info *info = (struct retro_system_info*) &g_extern.system.info; pretro_get_system_info(info); if (!info->library_name) info->library_name = "Unknown"; if (!info->library_version) info->library_version = "v0"; #ifdef RARCH_CONSOLE snprintf(g_extern.title_buf, sizeof(g_extern.title_buf), "%s %s", info->library_name, info->library_version); #else snprintf(g_extern.title_buf, sizeof(g_extern.title_buf), RETRO_FRONTEND " : %s %s", info->library_name, info->library_version); #endif strlcpy(g_extern.system.valid_extensions, info->valid_extensions ? info->valid_extensions : DEFAULT_EXT, sizeof(g_extern.system.valid_extensions)); g_extern.system.block_extract = info->block_extract; } static void init_system_av_info(void) { pretro_get_system_av_info(&g_extern.system.av_info); g_extern.frame_limit.last_frame_time = rarch_get_time_usec(); } static void verify_api_version(void) { RARCH_LOG("Version of libretro API: %u\n", pretro_api_version()); RARCH_LOG("Compiled against API: %u\n", RETRO_API_VERSION); if (pretro_api_version() != RETRO_API_VERSION) RARCH_WARN(RETRO_LOG_LIBRETRO_ABI_BREAK); } /* Make sure we haven't compiled for something we cannot run. * Ideally, code would get swapped out depending on CPU support, but this will do for now. */ static void validate_cpu_features(void) { uint64_t cpu = rarch_get_cpu_features(); (void)cpu; #define FAIL_CPU(simd_type) do { \ RARCH_ERR(simd_type " code is compiled in, but CPU does not support this feature. Cannot continue.\n"); \ rarch_fail(1, "validate_cpu_features()"); \ } while(0) #ifdef __SSE__ if (!(cpu & RETRO_SIMD_SSE)) FAIL_CPU("SSE"); #endif #ifdef __SSE2__ if (!(cpu & RETRO_SIMD_SSE2)) FAIL_CPU("SSE2"); #endif #ifdef __AVX__ if (!(cpu & RETRO_SIMD_AVX)) FAIL_CPU("AVX"); #endif } static void init_sram(void) { g_extern.use_sram = g_extern.use_sram && !g_extern.sram_save_disable #ifdef HAVE_NETPLAY && (!g_extern.netplay || !g_extern.netplay_is_client) #endif ; if (g_extern.use_sram) { #if defined(HAVE_THREADS) init_autosave(); #endif } else RARCH_LOG("SRAM will not be saved.\n"); } static void deinit_core(void) { pretro_unload_game(); pretro_deinit(); uninit_libretro_sym(); } int rarch_main_init(int argc, char *argv[]) { int sjlj_ret; init_state(); if ((sjlj_ret = setjmp(g_extern.error_sjlj_context)) > 0) { RARCH_ERR("Fatal error received in: \"%s\"\n", g_extern.error_string); return sjlj_ret; } g_extern.error_in_init = true; parse_input(argc, argv); if (g_extern.verbosity) { RARCH_LOG_OUTPUT("=== Build ======================================="); print_compiler(stderr); RARCH_LOG_OUTPUT("Version: %s\n", PACKAGE_VERSION); #ifdef HAVE_GIT_VERSION RARCH_LOG_OUTPUT("Git: %s\n", rarch_git_version); #endif RARCH_LOG_OUTPUT("=================================================\n"); } validate_cpu_features(); config_load(); init_libretro_sym(g_extern.libretro_dummy); init_system_info(); init_drivers_pre(); verify_api_version(); pretro_init(); g_extern.use_sram = !g_extern.libretro_dummy && !g_extern.libretro_no_content; if (g_extern.libretro_no_content && !g_extern.libretro_dummy) { if (!init_content_file()) goto error; } else if (!g_extern.libretro_dummy) { fill_pathnames(); if (!init_content_file()) goto error; set_savestate_auto_index(); if (load_save_files()) RARCH_LOG("Skipping SRAM load.\n"); load_auto_state(); init_movie(); #ifdef HAVE_NETPLAY init_netplay(); #endif } init_libretro_cbs(); init_system_av_info(); init_drivers(); #ifdef HAVE_COMMAND init_command(); #endif init_rewind(); init_controllers(); init_recording(); init_sram(); init_cheats(); g_extern.error_in_init = false; g_extern.main_is_init = true; return 0; error: deinit_core(); uninit_drivers(); g_extern.main_is_init = false; return 1; } static inline bool check_enter_menu(void) { static bool old_rmenu_toggle = true; bool rmenu_toggle = input_key_pressed_func(RARCH_MENU_TOGGLE) || (g_extern.libretro_dummy && !old_rmenu_toggle); /* Always go into menu if dummy core is loaded. */ if (rmenu_toggle && !old_rmenu_toggle) { rarch_main_set_state(RARCH_ACTION_STATE_MENU_PREINIT); old_rmenu_toggle = true; g_extern.system.frame_time_last = 0; return true; } old_rmenu_toggle = rmenu_toggle; return false; } static inline void update_frame_time(void) { retro_time_t time = 0; retro_time_t delta = 0; bool is_locked_fps = false; if (!g_extern.system.frame_time.callback) return; time = rarch_get_time_usec(); is_locked_fps = g_extern.is_paused || driver.nonblock_state; is_locked_fps |= !!g_extern.rec; if (!g_extern.system.frame_time_last || is_locked_fps) delta = g_extern.system.frame_time.reference; else delta = time - g_extern.system.frame_time_last; if (!is_locked_fps && g_extern.is_slowmotion) delta /= g_settings.slowmotion_ratio; g_extern.system.frame_time_last = is_locked_fps ? 0 : time; g_extern.system.frame_time.callback(delta); } static inline void limit_frame_time(void) { if (g_settings.fastforward_ratio < 0.0f) return; g_extern.frame_limit.minimum_frame_time = (retro_time_t) roundf(1000000.0f / (g_extern.system.av_info.timing.fps * g_settings.fastforward_ratio)); retro_time_t current = rarch_get_time_usec(); retro_time_t target = g_extern.frame_limit.last_frame_time + g_extern.frame_limit.minimum_frame_time; retro_time_t to_sleep_ms = (target - current) / 1000; if (to_sleep_ms > 0) { rarch_sleep((unsigned int)to_sleep_ms); /* Combat jitter a bit. */ g_extern.frame_limit.last_frame_time += g_extern.frame_limit.minimum_frame_time; } else g_extern.frame_limit.last_frame_time = rarch_get_time_usec(); } /* TODO - can we refactor command.c to do this? Should be local and not * stdin or network-based */ void rarch_main_set_state(unsigned cmd) { frontend_loop = NULL; switch (cmd) { case RARCH_ACTION_STATE_MENU_PREINIT: g_extern.lifecycle_state |= (1ULL << MODE_MENU_PREINIT); break; case RARCH_ACTION_STATE_MENU_PREINIT_FINISHED: g_extern.lifecycle_state &= ~(1ULL << MODE_MENU_PREINIT); break; case RARCH_ACTION_STATE_LOAD_CONTENT: g_extern.lifecycle_state |= (1ULL << MODE_LOAD_GAME); break; case RARCH_ACTION_STATE_LOAD_CONTENT_FINISHED: g_extern.lifecycle_state &= ~(1ULL << MODE_LOAD_GAME); break; case RARCH_ACTION_STATE_RUNNING: g_extern.lifecycle_state |= (1ULL << MODE_GAME); break; case RARCH_ACTION_STATE_RUNNING_FINISHED: g_extern.lifecycle_state &= ~(1ULL << MODE_GAME); break; case RARCH_ACTION_STATE_MENU_RUNNING: g_extern.lifecycle_state |= (1ULL << MODE_MENU); break; case RARCH_ACTION_STATE_MENU_RUNNING_FINISHED: g_extern.lifecycle_state &= ~(1ULL << MODE_MENU); break; case RARCH_ACTION_STATE_EXITSPAWN: g_extern.lifecycle_state |= (1ULL << MODE_EXITSPAWN); break; case RARCH_ACTION_STATE_QUIT: rarch_main_set_state(RARCH_ACTION_STATE_MENU_RUNNING_FINISHED); rarch_main_set_state(RARCH_ACTION_STATE_RUNNING_FINISHED); break; case RARCH_ACTION_STATE_FLUSH_INPUT: g_extern.lifecycle_state |= (1ULL << MODE_CLEAR_INPUT); break; case RARCH_ACTION_STATE_FLUSH_INPUT_FINISHED: g_extern.lifecycle_state &= ~(1ULL << MODE_CLEAR_INPUT); break; case RARCH_ACTION_STATE_NONE: default: break; } if (g_extern.lifecycle_state & (1ULL << MODE_CLEAR_INPUT)) frontend_loop = main_entry_iterate_clear_input; else if (g_extern.lifecycle_state & (1ULL << MODE_LOAD_GAME)) frontend_loop = main_entry_iterate_load_content; else if (g_extern.lifecycle_state & (1ULL << MODE_GAME)) frontend_loop = main_entry_iterate_content; #ifdef HAVE_MENU else if (g_extern.lifecycle_state & (1ULL << MODE_MENU_PREINIT)) frontend_loop = main_entry_iterate_menu_preinit; else if (g_extern.lifecycle_state & (1ULL << MODE_MENU)) frontend_loop = main_entry_iterate_menu; #endif } void rarch_main_command(unsigned cmd) { bool boolean = false; switch (cmd) { case RARCH_CMD_LOAD_CONTENT: #ifdef HAVE_DYNAMIC rarch_main_command(RARCH_CMD_LOAD_CORE); rarch_main_set_state(RARCH_ACTION_STATE_LOAD_CONTENT); #else rarch_environment_cb(RETRO_ENVIRONMENT_SET_LIBRETRO_PATH, (void*)g_settings.libretro); rarch_environment_cb(RETRO_ENVIRONMENT_EXEC, (void*)g_extern.fullpath); #endif break; case RARCH_CMD_LOAD_CORE: #ifdef HAVE_MENU if (driver.menu) rarch_update_system_info(&g_extern.menu.info, &driver.menu->load_no_content); #endif break; case RARCH_CMD_LOAD_STATE: /* Disallow savestate load when we absolutely cannot change game state. */ if (g_extern.bsv.movie) return; #ifdef HAVE_NETPLAY if (g_extern.netplay) return; #endif main_state(cmd); rarch_main_set_state(RARCH_ACTION_STATE_RUNNING); break; case RARCH_CMD_RESET: RARCH_LOG(RETRO_LOG_RESETTING_CONTENT); msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, "Reset.", 1, 120); pretro_reset(); /* bSNES since v073r01 resets controllers to JOYPAD * after a reset, so just enforce it here. */ init_controllers(); rarch_main_set_state(RARCH_ACTION_STATE_RUNNING); break; case RARCH_CMD_SAVE_STATE: if (g_settings.savestate_auto_index) g_settings.state_slot++; main_state(cmd); rarch_main_set_state(RARCH_ACTION_STATE_RUNNING); break; case RARCH_CMD_TAKE_SCREENSHOT: take_screenshot(); break; case RARCH_CMD_PREPARE_DUMMY: *g_extern.fullpath = '\0'; #ifdef HAVE_MENU if (driver.menu) driver.menu->load_no_content = false; #endif rarch_main_set_state(RARCH_ACTION_STATE_LOAD_CONTENT); g_extern.system.shutdown = false; break; case RARCH_CMD_QUIT: g_extern.system.shutdown = true; break; case RARCH_CMD_REINIT: set_fullscreen(g_settings.video.fullscreen); break; case RARCH_CMD_REWIND: if (g_settings.rewind_enable) init_rewind(); else deinit_rewind(); break; case RARCH_CMD_AUTOSAVE: #ifdef HAVE_THREADS deinit_autosave(); init_autosave(); #endif break; case RARCH_CMD_AUDIO_STOP: if (driver.audio_data) driver.audio->stop(driver.audio_data); break; case RARCH_CMD_AUDIO_START: if (driver.audio_data && !g_extern.audio_data.mute && !driver.audio->start(driver.audio_data)) { RARCH_ERR("Failed to start audio driver. Will continue without audio.\n"); g_extern.audio_active = false; } break; case RARCH_CMD_OVERLAY_INIT: #ifdef HAVE_OVERLAY if (!*g_settings.input.overlay) break; driver.overlay = input_overlay_new(g_settings.input.overlay); if (!driver.overlay) RARCH_ERR("Failed to load overlay.\n"); #endif break; case RARCH_CMD_OVERLAY_DEINIT: #ifdef HAVE_OVERLAY if (driver.overlay) input_overlay_free(driver.overlay); driver.overlay = NULL; memset(&driver.overlay_state, 0, sizeof(driver.overlay_state)); #endif break; case RARCH_CMD_OVERLAY_REINIT: rarch_main_command(RARCH_CMD_OVERLAY_DEINIT); rarch_main_command(RARCH_CMD_OVERLAY_INIT); break; case RARCH_CMD_DSP_FILTER_INIT: rarch_main_command(RARCH_CMD_DSP_FILTER_DEINIT); if (!*g_settings.audio.dsp_plugin) break; g_extern.audio_data.dsp = rarch_dsp_filter_new( g_settings.audio.dsp_plugin, g_extern.audio_data.in_rate); if (!g_extern.audio_data.dsp) RARCH_ERR("[DSP]: Failed to initialize DSP filter \"%s\".\n", g_settings.audio.dsp_plugin); break; case RARCH_CMD_DSP_FILTER_DEINIT: if (g_extern.audio_data.dsp) rarch_dsp_filter_free(g_extern.audio_data.dsp); g_extern.audio_data.dsp = NULL; break; case RARCH_CMD_RECORD_INIT: init_recording(); break; case RARCH_CMD_RECORD_DEINIT: deinit_recording(); break; case RARCH_CMD_HISTORY_INIT: if (!g_extern.history) g_extern.history = content_playlist_init( g_settings.content_history_path, g_settings.content_history_size); break; case RARCH_CMD_HISTORY_DEINIT: if (g_extern.history) content_playlist_free(g_extern.history); g_extern.history = NULL; break; case RARCH_CMD_CORE_INFO_INIT: core_info_list_free(g_extern.core_info); g_extern.core_info = NULL; if (*g_settings.libretro_directory) g_extern.core_info = core_info_list_new(g_settings.libretro_directory); #ifdef HAVE_MENU if (driver.menu_ctx && driver.menu_ctx->init_core_info) driver.menu_ctx->init_core_info(driver.menu); #endif break; case RARCH_CMD_VIDEO_APPLY_STATE_CHANGES: if (driver.video_data && driver.video_poke && driver.video_poke->apply_state_changes) driver.video_poke->apply_state_changes(driver.video_data); break; case RARCH_CMD_VIDEO_SET_NONBLOCKING_STATE: boolean = true; /* fall-through */ case RARCH_CMD_VIDEO_SET_BLOCKING_STATE: if (driver.video && driver.video->set_nonblock_state) driver.video->set_nonblock_state(driver.video_data, boolean); break; case RARCH_CMD_VIDEO_SET_ASPECT_RATIO: if (driver.video_data && driver.video_poke && driver.video_poke->set_aspect_ratio) driver.video_poke->set_aspect_ratio(driver.video_data, g_settings.video.aspect_ratio_idx); break; case RARCH_CMD_AUDIO_SET_NONBLOCKING_STATE: boolean = true; /* fall-through */ case RARCH_CMD_AUDIO_SET_BLOCKING_STATE: if (driver.audio && driver.audio->set_nonblock_state) driver.audio->set_nonblock_state(driver.audio_data, boolean); break; case RARCH_CMD_OVERLAY_SET_SCALE_FACTOR: #ifdef HAVE_OVERLAY if (driver.overlay) input_overlay_set_scale_factor(driver.overlay, g_settings.input.overlay_scale); #endif break; case RARCH_CMD_OVERLAY_SET_ALPHA_MOD: #ifdef HAVE_OVERLAY if (driver.overlay) input_overlay_set_alpha_mod(driver.overlay, g_settings.input.overlay_opacity); #endif break; case RARCH_CMD_RESET_CONTEXT: uninit_drivers(); init_drivers(); break; case RARCH_CMD_QUIT_RETROARCH: rarch_main_set_state(RARCH_ACTION_STATE_QUIT); break; case RARCH_CMD_RESUME: rarch_main_set_state(RARCH_ACTION_STATE_RUNNING); break; case RARCH_CMD_RESTART_RETROARCH: #if defined(GEKKO) && defined(HW_RVL) fill_pathname_join(g_extern.fullpath, g_defaults.core_dir, SALAMANDER_FILE, sizeof(g_extern.fullpath)); #endif rarch_main_set_state(RARCH_ACTION_STATE_RUNNING_FINISHED); rarch_main_set_state(RARCH_ACTION_STATE_EXITSPAWN); break; case RARCH_CMD_MENU_SAVE_CONFIG: { /* Save a new config to a file. Filename is based * on heuristics to avoid typing. */ char config_dir[PATH_MAX], config_name[PATH_MAX], config_path[PATH_MAX], msg[PATH_MAX]; bool found_path = false; *config_dir = '\0'; if (*g_settings.menu_config_directory) strlcpy(config_dir, g_settings.menu_config_directory, sizeof(config_dir)); else if (*g_extern.config_path) /* Fallback */ fill_pathname_basedir(config_dir, g_extern.config_path, sizeof(config_dir)); else { const char *msg = "Config directory not set. Cannot save new config."; msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, msg, 1, 180); RARCH_ERR("%s\n", msg); return; } /* Infer file name based on libretro core. */ if (*g_settings.libretro && path_file_exists(g_settings.libretro)) { unsigned i; /* In case of collision, find an alternative name. */ for (i = 0; i < 16; i++) { char tmp[64]; fill_pathname_base(config_name, g_settings.libretro, sizeof(config_name)); path_remove_extension(config_name); fill_pathname_join(config_path, config_dir, config_name, sizeof(config_path)); *tmp = '\0'; if (i) snprintf(tmp, sizeof(tmp), "-%u.cfg", i); else strlcpy(tmp, ".cfg", sizeof(tmp)); strlcat(config_path, tmp, sizeof(config_path)); if (!path_file_exists(config_path)) { found_path = true; break; } } } /* Fallback to system time... */ if (!found_path) { RARCH_WARN("Cannot infer new config path. Use current time.\n"); fill_dated_filename(config_name, "cfg", sizeof(config_name)); fill_pathname_join(config_path, config_dir, config_name, sizeof(config_path)); } if (config_save_file(config_path)) { strlcpy(g_extern.config_path, config_path, sizeof(g_extern.config_path)); snprintf(msg, sizeof(msg), "Saved new config to \"%s\".", config_path); RARCH_LOG("%s\n", msg); } else { snprintf(msg, sizeof(msg), "Failed saving config to \"%s\".", config_path); RARCH_ERR("%s\n", msg); } msg_queue_clear(g_extern.msg_queue); msg_queue_push(g_extern.msg_queue, msg, 1, 180); } break; case RARCH_CMD_SHADERS_APPLY_CHANGES: #ifdef HAVE_MENU { unsigned shader_type = RARCH_SHADER_NONE; if (driver.menu_ctx && driver.menu_ctx->backend && driver.menu_ctx->backend->shader_manager_get_type) shader_type = driver.menu_ctx->backend->shader_manager_get_type( driver.menu->shader); if (driver.menu->shader->passes && shader_type != RARCH_SHADER_NONE && driver.menu_ctx && driver.menu_ctx->backend && driver.menu_ctx->backend->shader_manager_save_preset) driver.menu_ctx->backend->shader_manager_save_preset(NULL, true); else { shader_type = gfx_shader_parse_type("", DEFAULT_SHADER_TYPE); if (shader_type == RARCH_SHADER_NONE) { #if defined(HAVE_GLSL) shader_type = RARCH_SHADER_GLSL; #elif defined(HAVE_CG) || defined(HAVE_HLSL) shader_type = RARCH_SHADER_CG; #endif } if (driver.menu_ctx && driver.menu_ctx->backend && driver.menu_ctx->backend->shader_manager_set_preset) driver.menu_ctx->backend->shader_manager_set_preset( NULL, shader_type, NULL); } } #endif break; } } bool rarch_main_iterate(void) { unsigned i; /* SHUTDOWN on consoles should exit RetroArch completely. */ if (g_extern.system.shutdown) return false; /* Time to drop? */ if (input_key_pressed_func(RARCH_QUIT_KEY) || !driver.video->alive(driver.video_data)) return false; if (check_enter_menu()) return false; /* Enter menu, don't exit. */ if (g_extern.exec) { g_extern.exec = false; return false; } /* Checks for stuff like fullscreen, save states, etc. */ do_state_checks(); if (g_extern.is_paused && !g_extern.is_oneshot) { rarch_input_poll(); rarch_sleep(10); return true; } /* Run libretro for one frame. */ #if defined(HAVE_THREADS) lock_autosave(); #endif #ifdef HAVE_NETPLAY if (g_extern.netplay) netplay_pre_frame(g_extern.netplay); #endif if (g_extern.bsv.movie) bsv_movie_set_frame_start(g_extern.bsv.movie); if (g_extern.system.camera_callback.caps) driver_camera_poll(); /* Update binds for analog dpad modes. */ for (i = 0; i < MAX_PLAYERS; i++) { input_push_analog_dpad(g_settings.input.binds[i], g_settings.input.analog_dpad_mode[i]); input_push_analog_dpad(g_settings.input.autoconf_binds[i], g_settings.input.analog_dpad_mode[i]); } if ((g_settings.video.frame_delay > 0) && !driver.nonblock_state) rarch_sleep(g_settings.video.frame_delay); update_frame_time(); pretro_run(); limit_frame_time(); for (i = 0; i < MAX_PLAYERS; i++) { input_pop_analog_dpad(g_settings.input.binds[i]); input_pop_analog_dpad(g_settings.input.autoconf_binds[i]); } if (g_extern.bsv.movie) bsv_movie_set_frame_end(g_extern.bsv.movie); #ifdef HAVE_NETPLAY if (g_extern.netplay) netplay_post_frame(g_extern.netplay); #endif #if defined(HAVE_THREADS) unlock_autosave(); #endif return true; } static void deinit_temporary_content(void) { unsigned i; if (g_extern.temporary_content) { for (i = 0; i < g_extern.temporary_content->size; i++) { const char *path = g_extern.temporary_content->elems[i].data; RARCH_LOG("Removing temporary content file: %s.\n", path); if (remove(path) < 0) RARCH_ERR("Failed to remove temporary file: %s.\n", path); } string_list_free(g_extern.temporary_content); } g_extern.temporary_content = NULL; } static void deinit_subsystem_fullpaths(void) { if (g_extern.subsystem_fullpaths) string_list_free(g_extern.subsystem_fullpaths); g_extern.subsystem_fullpaths = NULL; } void rarch_main_deinit(void) { #ifdef HAVE_NETPLAY deinit_netplay(); #endif #ifdef HAVE_COMMAND deinit_command(); #endif #if defined(HAVE_THREADS) if (g_extern.use_sram) deinit_autosave(); #endif deinit_recording(); save_files(); deinit_rewind(); deinit_cheats(); deinit_movie(); save_auto_state(); deinit_core(); uninit_drivers(); deinit_temporary_content(); deinit_subsystem_fullpaths(); deinit_savefiles(); g_extern.main_is_init = false; } void rarch_playlist_push(content_playlist_t *playlist, const char *path) { char tmp[PATH_MAX]; if (!playlist || !g_extern.libretro_dummy) return; /* path can be relative here. * Ensure we're pushing absolute path. */ strlcpy(tmp, path, sizeof(tmp)); if (*tmp) path_resolve_realpath(tmp, sizeof(tmp)); if (g_extern.system.no_content || *tmp) content_playlist_push(playlist, *tmp ? tmp : NULL, g_settings.libretro, g_extern.system.info.library_name); } void rarch_playlist_load_content(content_playlist_t *playlist, unsigned index) { const char *path = NULL; const char *core_path = NULL; content_playlist_get_index(playlist, index, &path, &core_path, NULL); strlcpy(g_settings.libretro, core_path, sizeof(g_settings.libretro)); rarch_environment_cb(RETRO_ENVIRONMENT_EXEC, (void*)path); rarch_main_command(RARCH_CMD_LOAD_CORE); } void rarch_main_init_wrap(const struct rarch_main_wrap *args, int *argc, char **argv) { *argc = 0; argv[(*argc)++] = strdup("retroarch"); if (!args->no_content) { if (args->content_path) { RARCH_LOG("Using content: %s.\n", args->content_path); argv[(*argc)++] = strdup(args->content_path); } else { RARCH_LOG("No content, starting dummy core.\n"); argv[(*argc)++] = strdup("--menu"); } } if (args->sram_path) { argv[(*argc)++] = strdup("-s"); argv[(*argc)++] = strdup(args->sram_path); } if (args->state_path) { argv[(*argc)++] = strdup("-S"); argv[(*argc)++] = strdup(args->state_path); } if (args->config_path) { argv[(*argc)++] = strdup("-c"); argv[(*argc)++] = strdup(args->config_path); } #ifdef HAVE_DYNAMIC if (args->libretro_path) { argv[(*argc)++] = strdup("-L"); argv[(*argc)++] = strdup(args->libretro_path); } #endif if (args->verbose) argv[(*argc)++] = strdup("-v"); #ifdef HAVE_FILE_LOGGER for (i = 0; i < *argc; i++) RARCH_LOG("arg #%d: %s\n", i, argv[i]); #endif } /* When selection is presented back, returns 0. * If it can make a decision right now, returns -1. */ int rarch_defer_core(core_info_list_t *core_info, const char *dir, const char *path, char *deferred_path, size_t sizeof_deferred_path) { const core_info_t *info = NULL; size_t supported = 0; fill_pathname_join(deferred_path, dir, path, sizeof_deferred_path); if (core_info) core_info_list_get_supported_cores(core_info, deferred_path, &info, &supported); /* Can make a decision right now. */ if (supported == 1) { strlcpy(g_extern.fullpath, deferred_path, sizeof(g_extern.fullpath)); if (path_file_exists(info->path)) strlcpy(g_settings.libretro, info->path, sizeof(g_settings.libretro)); return -1; } return 0; } /* Quite intrusive and error prone. * Likely to have lots of small bugs. * Cleanly exit the main loop to ensure that all the tiny details * get set properly. * * This should mitigate most of the smaller bugs. */ bool rarch_replace_config(const char *path) { /* If config file to be replaced is the same as the * current config file, exit. */ if (!strcmp(path, g_extern.config_path)) return false; if (g_settings.config_save_on_exit && *g_extern.config_path) config_save_file(g_extern.config_path); strlcpy(g_extern.config_path, path, sizeof(g_extern.config_path)); g_extern.block_config_read = false; *g_settings.libretro = '\0'; /* Load core in new config. */ rarch_main_command(RARCH_CMD_PREPARE_DUMMY); return true; } void rarch_update_system_info(struct retro_system_info *_info, bool *load_no_content) { const core_info_t *info = NULL; #if defined(HAVE_DYNAMIC) libretro_free_system_info(_info); if (!(*g_settings.libretro)) return; libretro_get_system_info(g_settings.libretro, _info, load_no_content); #endif if (!g_extern.core_info) return; if (!core_info_list_get_info(g_extern.core_info, g_extern.core_info_current, g_settings.libretro)) return; /* Keep track of info for the currently selected core. */ info = (const core_info_t*)g_extern.core_info_current; if (!g_extern.verbosity) return; RARCH_LOG("[Core Info]:\n"); if (info->display_name) RARCH_LOG("Display Name = %s\n", info->display_name); if (info->supported_extensions) RARCH_LOG("Supported Extensions = %s\n", info->supported_extensions); if (info->authors) RARCH_LOG("Authors = %s\n", info->authors); if (info->permissions) RARCH_LOG("Permissions = %s\n", info->permissions); }