/* RetroArch - A frontend for libretro.

* Copyright (C) 2010-2014 - Hans-Kristian Arntzen

* Copyright (C) 2011-2014 - Daniel De Matteis

*

* RetroArch is free software: you can redistribute it and/or modify it under the terms

* of the GNU General Public License as published by the Free Software Found-

* ation, either version 3 of the License, or (at your option) any later version.

*

* RetroArch is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;

* without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR

* PURPOSE. See the GNU General Public License for more details.

*

* You should have received a copy of the GNU General Public License along with RetroArch.

* If not, see <http://www.gnu.org/licenses/>.

*/

#include "driver.h"

#include "general.h"

#include "file.h"

#include "libretro.h"

#include <stdio.h>

#include <string.h>

#include <math.h>

#include "compat/posix_string.h"

#include "audio/utils.h"

#include "audio/resampler.h"

#include "gfx/thread_wrapper.h"

#include "audio/thread_wrapper.h"

#include "audio/dsp_filter.h"

#include "gfx/gfx_common.h"

#ifdef HAVE_X11

#include "gfx/context/x11_common.h"

#endif

#ifdef HAVE_MENU

#include "frontend/menu/menu_common.h"

#endif

#ifdef HAVE_CONFIG_H

#include "config.h"

#endif

static const audio_driver_t *audio_drivers[] = {

#ifdef HAVE_ALSA

&audio_alsa,

#ifndef __QNX__

&audio_alsathread,

#endif

#endif

#if defined(HAVE_OSS) || defined(HAVE_OSS_BSD)

&audio_oss,

#endif

#ifdef HAVE_RSOUND

&audio_rsound,

#endif

#ifdef HAVE_COREAUDIO

&audio_coreaudio,

#endif

#ifdef HAVE_AL

&audio_openal,

#endif

#ifdef HAVE_SL

&audio_opensl,

#endif

#ifdef HAVE_ROAR

&audio_roar,

#endif

#ifdef HAVE_JACK

&audio_jack,

#endif

#ifdef HAVE_SDL

&audio_sdl,

#endif

#ifdef HAVE_XAUDIO

&audio_xa,

#endif

#ifdef HAVE_DSOUND

&audio_dsound,

#endif

#ifdef HAVE_PULSE

&audio_pulse,

#endif

#ifdef __CELLOS_LV2__

&audio_ps3,

#endif

#ifdef XENON

&audio_xenon360,

#endif

#ifdef GEKKO

&audio_gx,

#endif

#ifdef EMSCRIPTEN

&audio_rwebaudio,

#endif

#ifdef PSP

&audio_psp1,

#endif

#ifdef HAVE_NULLAUDIO

&audio_null,

#endif

NULL,

};

static const video_driver_t *video_drivers[] = {

#ifdef HAVE_OPENGL

&video_gl,

#endif

#ifdef XENON

&video_xenon360,

#endif

#if defined(_XBOX) && (defined(HAVE_D3D8) || defined(HAVE_D3D9)) || defined(HAVE_WIN32_D3D9)

&video_d3d,

#endif

#ifdef SN_TARGET_PSP2

&video_vita,

#endif

#ifdef PSP

&video_psp1,

#endif

#ifdef HAVE_SDL

&video_sdl,

#endif

#ifdef HAVE_XVIDEO

&video_xvideo,

#endif

#ifdef GEKKO

&video_gx,

#endif

#ifdef HAVE_VG

&video_vg,

#endif

#ifdef HAVE_NULLVIDEO

&video_null,

#endif

#ifdef HAVE_OMAP

&video_omap,

#endif

#ifdef HAVE_EXYNOS

&video_exynos,

#endif

NULL,

};

static const input_driver_t *input_drivers[] = {

#ifdef __CELLOS_LV2__

&input_ps3,

#endif

#if defined(SN_TARGET_PSP2) || defined(PSP)

&input_psp,

#endif

#ifdef HAVE_SDL

&input_sdl,

#endif

#ifdef HAVE_DINPUT

&input_dinput,

#endif

#ifdef HAVE_X11

&input_x,

#endif

#ifdef XENON

&input_xenon360,

#endif

#if defined(HAVE_XINPUT2) || defined(HAVE_XINPUT_XBOX1)

&input_xinput,

#endif

#ifdef GEKKO

&input_gx,

#endif

#ifdef ANDROID

&input_android,

#endif

#ifdef HAVE_UDEV

&input_udev,

#endif

#if defined(__linux__) && !defined(ANDROID)

&input_linuxraw,

#endif

#if defined(IOS) || defined(OSX) //< Don't use __APPLE__ as it breaks basic SDL builds

&input_apple,

#endif

#ifdef __QNX__

&input_qnx,

#endif

#ifdef EMSCRIPTEN

&input_rwebinput,

#endif

#ifdef HAVE_NULLINPUT

&input_null,

#endif

NULL,

};

#ifdef HAVE_OSK

#include "driver-contexts/osk_driver.c"

#endif

#ifdef HAVE_CAMERA

#include "driver-contexts/camera_driver.c"

#endif

#ifdef HAVE_LOCATION

#include "driver-contexts/location_driver.c"

#endif

#ifdef HAVE_MENU

#include "driver-contexts/menu_driver.c"

#endif

static int find_audio_driver_index(const char *driver)

{

unsigned i;

for (i = 0; audio_drivers[i]; i++)

if (strcasecmp(driver, audio_drivers[i]->ident) == 0)

return i;

return -1;

}

static int find_video_driver_index(const char *driver)

{

unsigned i;

for (i = 0; video_drivers[i]; i++)

if (strcasecmp(driver, video_drivers[i]->ident) == 0)

return i;

return -1;

}

static int find_input_driver_index(const char *driver)

{

unsigned i;

for (i = 0; input_drivers[i]; i++)

if (strcasecmp(driver, input_drivers[i]->ident) == 0)

return i;

return -1;

}

static void find_audio_driver(void)

{

int i = find_audio_driver_index(g_settings.audio.driver);

if (i >= 0)

driver.audio = audio_drivers[i];

else

{

unsigned d;

RARCH_ERR("Couldn't find any audio driver named \"%s\"\n", g_settings.audio.driver);

RARCH_LOG_OUTPUT("Available audio drivers are:\n");

for (d = 0; audio_drivers[d]; d++)

RARCH_LOG_OUTPUT("\t%s\n", audio_drivers[d]->ident);

RARCH_WARN("Going to default to first audio driver...\n");

driver.audio = audio_drivers[0];

if (!driver.audio)

rarch_fail(1, "find_audio_driver()");

}

}

void find_prev_audio_driver(void)

{

int i = find_audio_driver_index(g_settings.audio.driver);

if (i > 0)

strlcpy(g_settings.audio.driver, audio_drivers[i - 1]->ident, sizeof(g_settings.audio.driver));

else

RARCH_WARN("Couldn't find any previous audio driver (current one: \"%s\").\n", g_settings.audio.driver);

}

void find_next_audio_driver(void)

{

int i = find_audio_driver_index(g_settings.audio.driver);

if (i >= 0 && audio_drivers[i + 1])

strlcpy(g_settings.audio.driver, audio_drivers[i + 1]->ident, sizeof(g_settings.audio.driver));

else

RARCH_WARN("Couldn't find any next audio driver (current one: \"%s\").\n", g_settings.audio.driver);

}

static void find_video_driver(void)

{

#if defined(HAVE_OPENGL) && defined(HAVE_FBO)

if (g_extern.system.hw_render_callback.context_type)

{

RARCH_LOG("Using HW render, OpenGL driver forced.\n");

driver.video = &video_gl;

return;

}

#endif

int i = find_video_driver_index(g_settings.video.driver);

if (i >= 0)

driver.video = video_drivers[i];

else

{

unsigned d;

RARCH_ERR("Couldn't find any video driver named \"%s\"\n", g_settings.video.driver);

RARCH_LOG_OUTPUT("Available video drivers are:\n");

for (d = 0; video_drivers[d]; d++)

RARCH_LOG_OUTPUT("\t%s\n", video_drivers[d]->ident);

RARCH_WARN("Going to default to first video driver...\n");

driver.video = video_drivers[0];

if (!driver.video)

rarch_fail(1, "find_video_driver()");

}

}

void find_prev_video_driver(void)

{

// No need to enforce GL if HW render. This is done at driver initialize anyways.

int i = find_video_driver_index(g_settings.video.driver);

if (i > 0)

strlcpy(g_settings.video.driver, video_drivers[i - 1]->ident, sizeof(g_settings.video.driver));

else

RARCH_WARN("Couldn't find any previous video driver (current one: \"%s\").\n", g_settings.video.driver);

}

void find_next_video_driver(void)

{

// No need to enforce GL if HW render. This is done at driver initialize anyways.

int i = find_video_driver_index(g_settings.video.driver);

if (i >= 0 && video_drivers[i + 1])

strlcpy(g_settings.video.driver, video_drivers[i + 1]->ident, sizeof(g_settings.video.driver));

else

RARCH_WARN("Couldn't find any next video driver (current one: \"%s\").\n", g_settings.video.driver);

}

static void find_input_driver(void)

{

int i = find_input_driver_index(g_settings.input.driver);

if (i >= 0)

driver.input = input_drivers[i];

else

{

unsigned d;

RARCH_ERR("Couldn't find any input driver named \"%s\"\n", g_settings.input.driver);

RARCH_LOG_OUTPUT("Available input drivers are:\n");

for (d = 0; input_drivers[d]; d++)

RARCH_LOG_OUTPUT("\t%s\n", input_drivers[d]->ident);

RARCH_WARN("Going to default to first input driver...\n");

driver.input = input_drivers[0];

if (!driver.input)

rarch_fail(1, "find_input_driver()");

}

}

void find_prev_input_driver(void)

{

int i = find_input_driver_index(g_settings.input.driver);

if (i > 0)

strlcpy(g_settings.input.driver, input_drivers[i - 1]->ident, sizeof(g_settings.input.driver));

else

RARCH_ERR("Couldn't find any previous input driver (current one: \"%s\").\n", g_settings.input.driver);

}

void find_next_input_driver(void)

{

int i = find_input_driver_index(g_settings.input.driver);

if (i >= 0 && input_drivers[i + 1])

strlcpy(g_settings.input.driver, input_drivers[i + 1]->ident, sizeof(g_settings.input.driver));

else

RARCH_ERR("Couldn't find any next input driver (current one: \"%s\").\n", g_settings.input.driver);

}

void init_drivers_pre(void)

{

find_audio_driver();

find_video_driver();

find_input_driver();

#ifdef HAVE_CAMERA

find_camera_driver();

#endif

#ifdef HAVE_LOCATION

find_location_driver();

#endif

#ifdef HAVE_OSK

find_osk_driver();

#endif

#ifdef HAVE_MENU

find_menu_driver();

#endif

}

static void adjust_system_rates(void)

{

g_extern.system.force_nonblock = false;

const struct retro_system_timing *info = &g_extern.system.av_info.timing;

if (info->fps <= 0.0 || info->sample_rate <= 0.0)

return;

float timing_skew = fabs(1.0f - info->fps / g_settings.video.refresh_rate);

if (timing_skew > 0.05f) // We don't want to adjust pitch too much. If we have extreme cases, just don't readjust at all.

{

RARCH_LOG("Timings deviate too much. Will not adjust. (Display = %.2f Hz, Game = %.2f Hz)\n",

g_settings.video.refresh_rate,

(float)info->fps);

// We won't be able to do VSync reliably as game FPS > monitor FPS.

if (info->fps > g_settings.video.refresh_rate)

{

g_extern.system.force_nonblock = true;

RARCH_LOG("Game FPS > Monitor FPS. Cannot rely on VSync.\n");

}

g_settings.audio.in_rate = info->sample_rate;

}

else

g_settings.audio.in_rate = info->sample_rate *

(g_settings.video.refresh_rate / info->fps);

RARCH_LOG("Set audio input rate to: %.2f Hz.\n", g_settings.audio.in_rate);

if (driver.video_data)

{

if (g_extern.system.force_nonblock)

video_set_nonblock_state_func(true);

else

driver_set_nonblock_state(driver.nonblock_state);

}

}

void driver_set_monitor_refresh_rate(float hz)

{

char msg[256];

snprintf(msg, sizeof(msg), "Setting refresh rate to: %.3f Hz.", hz);

msg_queue_push(g_extern.msg_queue, msg, 1, 180);

RARCH_LOG("%s\n", msg);

g_settings.video.refresh_rate = hz;

adjust_system_rates();

g_extern.audio_data.orig_src_ratio =

g_extern.audio_data.src_ratio =

(double)g_settings.audio.out_rate / g_settings.audio.in_rate;

}

void driver_set_nonblock_state(bool nonblock)

{

// Only apply non-block-state for video if we're using vsync.

if (g_extern.video_active && driver.video_data)

{

bool video_nb = nonblock;

if (!g_settings.video.vsync || g_extern.system.force_nonblock)

video_nb = true;

video_set_nonblock_state_func(video_nb);

}

if (g_extern.audio_active && driver.audio_data)

audio_set_nonblock_state_func(g_settings.audio.sync ? nonblock : true);

g_extern.audio_data.chunk_size = nonblock ?

g_extern.audio_data.nonblock_chunk_size : g_extern.audio_data.block_chunk_size;

}

bool driver_set_rumble_state(unsigned port, enum retro_rumble_effect effect, uint16_t strength)

{

if (driver.input && driver.input_data && driver.input->set_rumble)

return driver.input->set_rumble(driver.input_data, port, effect, strength);

else

return false;

}

bool driver_set_sensor_state(unsigned port, enum retro_sensor_action action, unsigned rate)

{

if (driver.input && driver.input_data && driver.input->set_sensor_state)

return driver.input->set_sensor_state(driver.input_data, port, action, rate);

else

return false;

}

float driver_sensor_get_input(unsigned port, unsigned id)

{

if (driver.input && driver.input_data && driver.input->get_sensor_input)

return driver.input->get_sensor_input(driver.input_data, port, id);

else

return 0.0f;

}

uintptr_t driver_get_current_framebuffer(void)

{

#ifdef HAVE_FBO

if (driver.video_poke && driver.video_poke->get_current_framebuffer)

return driver.video_poke->get_current_framebuffer(driver.video_data);

else

#endif

return 0;

}

retro_proc_address_t driver_get_proc_address(const char *sym)

{

#ifdef HAVE_FBO

if (driver.video_poke && driver.video_poke->get_proc_address)

return driver.video_poke->get_proc_address(driver.video_data, sym);

else

#endif

return NULL;

}

bool driver_update_system_av_info(const struct retro_system_av_info *info)

{

g_extern.system.av_info = *info;

rarch_reinit_drivers();

// Cannot continue recording with different parameters.

// Take the easiest route out and just restart the recording.

#ifdef HAVE_RECORD

if (g_extern.rec)

{

static const char *msg = "Restarting FFmpeg recording due to driver reinit.";

msg_queue_push(g_extern.msg_queue, msg, 2, 180);

RARCH_WARN("%s\n", msg);

rarch_deinit_recording();

rarch_init_recording();

}

#endif

return true;

}

#ifdef HAVE_MENU

static void init_menu(void)

{

if (driver.menu)

return;

find_menu_driver();

if (!(driver.menu = (menu_handle_t*)menu_init(driver.menu_ctx)))

{

RARCH_ERR("Cannot initialize menu.\n");

rarch_fail(1, "init_menu()");

}

}

#endif

void init_drivers(void)

{

driver.video_data_own = false;

driver.audio_data_own = false;

driver.input_data_own = false;

#ifdef HAVE_CAMERA

driver.camera_data_own = false;

#endif

#ifdef HAVE_LOCATION

driver.location_data_own = false;

#endif

#ifdef HAVE_OSK

driver.osk_data_own = false;

#endif

#ifdef HAVE_MENU

// By default, we want the menu to persist through driver reinits.

driver.menu_data_own = true;

#endif

adjust_system_rates();

g_extern.frame_count = 0;

init_video_input();

if (!driver.video_cache_context_ack && g_extern.system.hw_render_callback.context_reset)

g_extern.system.hw_render_callback.context_reset();

driver.video_cache_context_ack = false;

init_audio();

#ifdef HAVE_CAMERA

// Only initialize camera driver if we're ever going to use it.

if (g_extern.camera_active)

init_camera();

#endif

#ifdef HAVE_LOCATION

// Only initialize location driver if we're ever going to use it.

if (g_extern.location_active)

init_location();

#endif

#ifdef HAVE_OSK

init_osk();

#endif

#ifdef HAVE_MENU

init_menu();

if (driver.menu && driver.menu_ctx && driver.menu_ctx->context_reset)

driver.menu_ctx->context_reset(driver.menu);

#endif

// Keep non-throttled state as good as possible.

if (driver.nonblock_state)

driver_set_nonblock_state(driver.nonblock_state);

g_extern.system.frame_time_last = 0;

}

void rarch_deinit_filter(void)

{

rarch_softfilter_free(g_extern.filter.filter);

free(g_extern.filter.buffer);

memset(&g_extern.filter, 0, sizeof(g_extern.filter));

}

static void deinit_pixel_converter(void)

{

scaler_ctx_gen_reset(&driver.scaler);

memset(&driver.scaler, 0, sizeof(driver.scaler));

free(driver.scaler_out);

driver.scaler_out = NULL;

}

static void deinit_shader_dir(void)

{

// It handles NULL, no worries :D

dir_list_free(g_extern.shader_dir.list);

g_extern.shader_dir.list = NULL;

g_extern.shader_dir.ptr = 0;

}

static void compute_monitor_fps_statistics(void)

{

if (g_settings.video.threaded)

{

RARCH_LOG("Monitor FPS estimation is disabled for threaded video.\n");

return;

}

if (g_extern.measure_data.frame_time_samples_count < 2 * MEASURE_FRAME_TIME_SAMPLES_COUNT)

{

RARCH_LOG("Does not have enough samples for monitor refresh rate estimation. Requires to run for at least %u frames.\n",

2 * MEASURE_FRAME_TIME_SAMPLES_COUNT);

return;

}

double avg_fps = 0.0;

double stddev = 0.0;

unsigned samples = 0;

if (driver_monitor_fps_statistics(&avg_fps, &stddev, &samples))

{

RARCH_LOG("Average monitor Hz: %.6f Hz. (%.3f %% frame time deviation, based on %u last samples).\n",

avg_fps, 100.0 * stddev, samples);

}

}

void uninit_drivers(void)

{

uninit_audio();

if (g_extern.system.hw_render_callback.context_destroy && !driver.video_cache_context)

g_extern.system.hw_render_callback.context_destroy();

#ifdef HAVE_MENU

if (driver.menu && driver.menu_ctx && driver.menu_ctx->context_destroy)

driver.menu_ctx->context_destroy(driver.menu);

if (!driver.menu_data_own)

{

menu_free(driver.menu);

driver.menu = NULL;

}

#endif

uninit_video_input();

if (!driver.video_data_own)

driver.video_data = NULL;

#ifdef HAVE_CAMERA

if (!driver.camera_data_own)

{

uninit_camera();

driver.camera_data = NULL;

}

#endif

#ifdef HAVE_LOCATION

if (!driver.location_data_own)

{

uninit_location();

driver.location_data = NULL;

}

#endif

#ifdef HAVE_OSK

if (!driver.osk_data_own)

{

uninit_osk();

driver.osk_data = NULL;

}

#endif

if (!driver.input_data_own)

driver.input_data = NULL;

if (!driver.audio_data_own)

driver.audio_data = NULL;

}

void rarch_init_dsp_filter(void)

{

rarch_deinit_dsp_filter();

if (!*g_settings.audio.dsp_plugin)

return;

g_extern.audio_data.dsp = rarch_dsp_filter_new(g_settings.audio.dsp_plugin, g_settings.audio.in_rate);

if (!g_extern.audio_data.dsp)

RARCH_ERR("[DSP]: Failed to initialize DSP filter \"%s\".\n", g_settings.audio.dsp_plugin);

}

void rarch_deinit_dsp_filter(void)

{

if (g_extern.audio_data.dsp)

rarch_dsp_filter_free(g_extern.audio_data.dsp);

g_extern.audio_data.dsp = NULL;

}

void init_audio(void)

{

audio_convert_init_simd();

// Resource leaks will follow if audio is initialized twice.

if (driver.audio_data)

return;

// Accomodate rewind since at some point we might have two full buffers.

size_t max_bufsamples = AUDIO_CHUNK_SIZE_NONBLOCKING * 2;

size_t outsamples_max = max_bufsamples * AUDIO_MAX_RATIO * g_settings.slowmotion_ratio;

// Used for recording even if audio isn't enabled.

rarch_assert(g_extern.audio_data.conv_outsamples = (int16_t*)malloc(outsamples_max * sizeof(int16_t)));

g_extern.audio_data.block_chunk_size = AUDIO_CHUNK_SIZE_BLOCKING;

g_extern.audio_data.nonblock_chunk_size = AUDIO_CHUNK_SIZE_NONBLOCKING;

g_extern.audio_data.chunk_size = g_extern.audio_data.block_chunk_size;

// Needs to be able to hold full content of a full max_bufsamples in addition to its own.

rarch_assert(g_extern.audio_data.rewind_buf = (int16_t*)malloc(max_bufsamples * sizeof(int16_t)));

g_extern.audio_data.rewind_size = max_bufsamples;

if (!g_settings.audio.enable)

{

g_extern.audio_active = false;

return;

}

find_audio_driver();

#ifdef HAVE_THREADS

if (g_extern.system.audio_callback.callback)

{

RARCH_LOG("Starting threaded audio driver ...\n");

if (!rarch_threaded_audio_init(&driver.audio, &driver.audio_data,

*g_settings.audio.device ? g_settings.audio.device : NULL,

g_settings.audio.out_rate, g_settings.audio.latency,

driver.audio))

{

RARCH_ERR("Cannot open threaded audio driver ... Exiting ...\n");

rarch_fail(1, "init_audio()");

}

}

else

#endif

{

driver.audio_data = audio_init_func(*g_settings.audio.device ? g_settings.audio.device : NULL,

g_settings.audio.out_rate, g_settings.audio.latency);

}

if (!driver.audio_data)

{

RARCH_ERR("Failed to initialize audio driver. Will continue without audio.\n");

g_extern.audio_active = false;

}

g_extern.audio_data.use_float = false;

if (g_extern.audio_active && driver.audio->use_float && audio_use_float_func())

g_extern.audio_data.use_float = true;

if (!g_settings.audio.sync && g_extern.audio_active)

{

audio_set_nonblock_state_func(true);

g_extern.audio_data.chunk_size = g_extern.audio_data.nonblock_chunk_size;

}

g_extern.audio_data.orig_src_ratio =

g_extern.audio_data.src_ratio =

(double)g_settings.audio.out_rate / g_settings.audio.in_rate;

if (!rarch_resampler_realloc(&g_extern.audio_data.resampler_data, &g_extern.audio_data.resampler,

g_settings.audio.resampler, g_extern.audio_data.orig_src_ratio))

{

RARCH_ERR("Failed to initialize resampler \"%s\".\n", g_settings.audio.resampler);

g_extern.audio_active = false;

}

rarch_assert(g_extern.audio_data.data = (float*)malloc(max_bufsamples * sizeof(float)));

g_extern.audio_data.data_ptr = 0;

rarch_assert(g_settings.audio.out_rate < g_settings.audio.in_rate * AUDIO_MAX_RATIO);

rarch_assert(g_extern.audio_data.outsamples = (float*)malloc(outsamples_max * sizeof(float)));

g_extern.audio_data.rate_control = false;

if (!g_extern.system.audio_callback.callback && g_extern.audio_active && g_settings.audio.rate_control)

{

if (driver.audio->buffer_size && driver.audio->write_avail)

{

g_extern.audio_data.driver_buffer_size = audio_buffer_size_func();

g_extern.audio_data.rate_control = true;

}

else

RARCH_WARN("Audio rate control was desired, but driver does not support needed features.\n");

}

rarch_init_dsp_filter();

g_extern.measure_data.buffer_free_samples_count = 0;

if (g_extern.audio_active && !g_extern.audio_data.mute && g_extern.system.audio_callback.callback) // Threaded driver is initially stopped.

audio_start_func();

}

static void compute_audio_buffer_statistics(void)

{

unsigned i, samples;

samples = min(g_extern.measure_data.buffer_free_samples_count, AUDIO_BUFFER_FREE_SAMPLES_COUNT);

if (samples < 3)

return;

uint64_t accum = 0;

for (i = 1; i < samples; i++)

accum += g_extern.measure_data.buffer_free_samples[i];

int avg = accum / (samples - 1);

uint64_t accum_var = 0;

for (i = 1; i < samples; i++)

{

int diff = avg - g_extern.measure_data.buffer_free_samples[i];

accum_var += diff * diff;

}

unsigned stddev = (unsigned)sqrt((double)accum_var / (samples - 2));

float avg_filled = 1.0f - (float)avg / g_extern.audio_data.driver_buffer_size;

float deviation = (float)stddev / g_extern.audio_data.driver_buffer_size;

unsigned low_water_size = g_extern.audio_data.driver_buffer_size * 3 / 4;

unsigned high_water_size = g_extern.audio_data.driver_buffer_size / 4;

unsigned low_water_count = 0;

unsigned high_water_count = 0;

for (i = 1; i < samples; i++)

{

if (g_extern.measure_data.buffer_free_samples[i] >= low_water_size)

low_water_count++;

else if (g_extern.measure_data.buffer_free_samples[i] <= high_water_size)

high_water_count++;

}

RARCH_LOG("Average audio buffer saturation: %.2f %%, standard deviation (percentage points): %.2f %%.\n",

avg_filled * 100.0, deviation * 100.0);

RARCH_LOG("Amount of time spent close to underrun: %.2f %%. Close to blocking: %.2f %%.\n",

(100.0 * low_water_count) / (samples - 1),

(100.0 * high_water_count) / (samples - 1));

}

bool driver_monitor_fps_statistics(double *refresh_rate, double *deviation, unsigned *sample_points)

{

unsigned i;

if (g_settings.video.threaded)

return false;

unsigned samples = min(MEASURE_FRAME_TIME_SAMPLES_COUNT, g_extern.measure_data.frame_time_samples_count);

if (samples < 2)

return false;

// Measure statistics on frame time (microsecs), *not* FPS.

retro_time_t accum = 0;

for (i = 0; i < samples; i++)

accum += g_extern.measure_data.frame_time_samples[i];

#if 0

for (i = 0; i < samples; i++)

RARCH_LOG("Interval #%u: %d usec / frame.\n",

i, (int)g_extern.measure_data.frame_time_samples[i]);

#endif

retro_time_t avg = accum / samples;

retro_time_t accum_var = 0;

// Drop first measurement. It is likely to be bad.

for (i = 0; i < samples; i++)

{

retro_time_t diff = g_extern.measure_data.frame_time_samples[i] - avg;

accum_var += diff * diff;

}

*deviation = sqrt((double)accum_var / (samples - 1)) / avg;

*refresh_rate = 1000000.0 / avg;

*sample_points = samples;

return true;

}

void uninit_audio(void)

{

if (driver.audio_data && driver.audio)

driver.audio->free(driver.audio_data);

free(g_extern.audio_data.conv_outsamples);

g_extern.audio_data.conv_outsamples = NULL;

g_extern.audio_data.data_ptr = 0;

free(g_extern.audio_data.rewind_buf);

g_extern.audio_data.rewind_buf = NULL;

if (!g_settings.audio.enable)

{

g_extern.audio_active = false;

return;

}

rarch_resampler_freep(&g_extern.audio_data.resampler, &g_extern.audio_data.resampler_data);

free(g_extern.audio_data.data);

g_extern.audio_data.data = NULL;

free(g_extern.audio_data.outsamples);

g_extern.audio_data.outsamples = NULL;

rarch_deinit_dsp_filter();

compute_audio_buffer_statistics();

}

void rarch_init_filter(enum retro_pixel_format colfmt)

{

rarch_deinit_filter();

#ifndef HAVE_FILTERS_BUILTIN

if (!*g_settings.video.filter_path)

return;

#endif

// Deprecated format. Gets pre-converted.

if (colfmt == RETRO_PIXEL_FORMAT_0RGB1555)

colfmt = RETRO_PIXEL_FORMAT_RGB565;

if (g_extern.system.hw_render_callback.context_type)

{

RARCH_WARN("Cannot use CPU filters when hardware rendering is used.\n");

return;

}

struct retro_game_geometry *geom = &g_extern.system.av_info.geometry;

unsigned width = geom->max_width;

unsigned height = geom->max_height;

unsigned pow2_x = 0;

unsigned pow2_y = 0;

unsigned maxsize = 0;

#ifndef HAVE_FILTERS_BUILTIN

RARCH_LOG("Loading softfilter from \"%s\"\n", g_settings.video.filter_path);

#endif

g_extern.filter.filter = rarch_softfilter_new(g_settings.video.filter_path,

RARCH_SOFTFILTER_THREADS_AUTO, colfmt, width, height);

if (!g_extern.filter.filter)

{

RARCH_ERR("Failed to load filter.\n");

return;

}

rarch_softfilter_get_max_output_size(g_extern.filter.filter, &width, &height);

pow2_x = next_pow2(width);

pow2_y = next_pow2(height);

maxsize = max(pow2_x, pow2_y);

g_extern.filter.scale = maxsize / RARCH_SCALE_BASE;

g_extern.filter.out_rgb32 = rarch_softfilter_get_output_format(g_extern.filter.filter) == RETRO_PIXEL_FORMAT_XRGB8888;

g_extern.filter.out_bpp = g_extern.filter.out_rgb32 ? sizeof(uint32_t) : sizeof(uint16_t);

// TODO: Aligned output.

g_extern.filter.buffer = malloc(width * height * g_extern.filter.out_bpp);

if (!g_extern.filter.buffer)

goto error;

return;

error:

RARCH_ERR("Softfilter initialization failed.\n");

rarch_deinit_filter();

}

static void init_shader_dir(void)

{

unsigned i;

if (!*g_settings.video.shader_dir)

return;

g_extern.shader_dir.list = dir_list_new(g_settings.video.shader_dir, "cg|cgp|glsl|glslp", false);

if (!g_extern.shader_dir.list || g_extern.shader_dir.list->size == 0)