/*

  Simple DirectMedia Layer

  Copyright (C) 1997-2014 Sam Lantinga <slouken@libsdl.org>

  This software is provided 'as-is', without any express or implied

  warranty.  In no event will the authors be held liable for any damages

  arising from the use of this software.

  Permission is granted to anyone to use this software for any purpose,

  including commercial applications, and to alter it and redistribute it

  freely, subject to the following restrictions:

  1. The origin of this software must not be misrepresented; you must not

     claim that you wrote the original software. If you use this software

     in a product, an acknowledgment in the product documentation would be

     appreciated but is not required.

  2. Altered source versions must be plainly marked as such, and must not be

     misrepresented as being the original software.

  3. This notice may not be removed or altered from any source distribution.

*/

/* Ported from original test\common.c file. */

#include "SDL_config.h"

#include "SDL_test.h"

#include <stdio.h>

#define VIDEO_USAGE \

"[--video driver] [--renderer driver] [--gldebug] [--info all|video|modes|render|event] [--log all|error|system|audio|video|render|input] [--display N] [--fullscreen | --fullscreen-desktop | --windows N] [--title title] [--icon icon.bmp] [--center | --position X,Y] [--geometry WxH] [--min-geometry WxH] [--max-geometry WxH] [--logical WxH] [--scale N] [--depth N] [--refresh R] [--vsync] [--noframe] [--resize] [--minimize] [--maximize] [--grab] [--allow-highdpi]"

#define AUDIO_USAGE \

"[--rate N] [--format U8|S8|U16|U16LE|U16BE|S16|S16LE|S16BE] [--channels N] [--samples N]"

SDLTest_CommonState *

SDLTest_CommonCreateState(char **argv, Uint32 flags)

{

    SDLTest_CommonState *state = (SDLTest_CommonState *)SDL_calloc(1, sizeof(*state));

    if (!state) {

        SDL_OutOfMemory();

        return NULL;

    }

    /* Initialize some defaults */

    state->argv = argv;

    state->flags = flags;

    state->window_title = argv[0];

    state->window_flags = 0;

    state->window_x = SDL_WINDOWPOS_UNDEFINED;

    state->window_y = SDL_WINDOWPOS_UNDEFINED;

    state->window_w = DEFAULT_WINDOW_WIDTH;

    state->window_h = DEFAULT_WINDOW_HEIGHT;

    state->num_windows = 1;

    state->audiospec.freq = 22050;

    state->audiospec.format = AUDIO_S16;

    state->audiospec.channels = 2;

    state->audiospec.samples = 2048;

    /* Set some very sane GL defaults */

    state->gl_red_size = 3;

    state->gl_green_size = 3;

    state->gl_blue_size = 2;

    state->gl_alpha_size = 0;

    state->gl_buffer_size = 0;

    state->gl_depth_size = 16;

    state->gl_stencil_size = 0;

    state->gl_double_buffer = 1;

    state->gl_accum_red_size = 0;

    state->gl_accum_green_size = 0;

    state->gl_accum_blue_size = 0;

    state->gl_accum_alpha_size = 0;

    state->gl_stereo = 0;

    state->gl_multisamplebuffers = 0;

    state->gl_multisamplesamples = 0;

    state->gl_retained_backing = 1;

    state->gl_accelerated = -1;

    state->gl_debug = 0;

    return state;

}

int

SDLTest_CommonArg(SDLTest_CommonState * state, int index)

{

    char **argv = state->argv;

    if (SDL_strcasecmp(argv[index], "--video") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->videodriver = argv[index];

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--renderer") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->renderdriver = argv[index];

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--gldebug") == 0) {

        state->gl_debug = 1;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--info") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        if (SDL_strcasecmp(argv[index], "all") == 0) {

            state->verbose |=

                (VERBOSE_VIDEO | VERBOSE_MODES | VERBOSE_RENDER |

                 VERBOSE_EVENT);

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "video") == 0) {

            state->verbose |= VERBOSE_VIDEO;

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "modes") == 0) {

            state->verbose |= VERBOSE_MODES;

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "render") == 0) {

            state->verbose |= VERBOSE_RENDER;

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "event") == 0) {

            state->verbose |= VERBOSE_EVENT;

            return 2;

        }

        return -1;

    }

    if (SDL_strcasecmp(argv[index], "--log") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        if (SDL_strcasecmp(argv[index], "all") == 0) {

            SDL_LogSetAllPriority(SDL_LOG_PRIORITY_VERBOSE);

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "error") == 0) {

            SDL_LogSetPriority(SDL_LOG_CATEGORY_ERROR, SDL_LOG_PRIORITY_VERBOSE);

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "system") == 0) {

            SDL_LogSetPriority(SDL_LOG_CATEGORY_SYSTEM, SDL_LOG_PRIORITY_VERBOSE);

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "audio") == 0) {

            SDL_LogSetPriority(SDL_LOG_CATEGORY_AUDIO, SDL_LOG_PRIORITY_VERBOSE);

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "video") == 0) {

            SDL_LogSetPriority(SDL_LOG_CATEGORY_VIDEO, SDL_LOG_PRIORITY_VERBOSE);

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "render") == 0) {

            SDL_LogSetPriority(SDL_LOG_CATEGORY_RENDER, SDL_LOG_PRIORITY_VERBOSE);

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "input") == 0) {

            SDL_LogSetPriority(SDL_LOG_CATEGORY_INPUT, SDL_LOG_PRIORITY_VERBOSE);

            return 2;

        }

        return -1;

    }

    if (SDL_strcasecmp(argv[index], "--display") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->display = SDL_atoi(argv[index]);

        if (SDL_WINDOWPOS_ISUNDEFINED(state->window_x)) {

            state->window_x = SDL_WINDOWPOS_UNDEFINED_DISPLAY(state->display);

            state->window_y = SDL_WINDOWPOS_UNDEFINED_DISPLAY(state->display);

        }

        if (SDL_WINDOWPOS_ISCENTERED(state->window_x)) {

            state->window_x = SDL_WINDOWPOS_CENTERED_DISPLAY(state->display);

            state->window_y = SDL_WINDOWPOS_CENTERED_DISPLAY(state->display);

        }

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--fullscreen") == 0) {

        state->window_flags |= SDL_WINDOW_FULLSCREEN;

        state->num_windows = 1;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--fullscreen-desktop") == 0) {

        state->window_flags |= SDL_WINDOW_FULLSCREEN_DESKTOP;

        state->num_windows = 1;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--allow-highdpi") == 0) {

        state->window_flags |= SDL_WINDOW_ALLOW_HIGHDPI;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--windows") == 0) {

        ++index;

        if (!argv[index] || !SDL_isdigit(*argv[index])) {

            return -1;

        }

        if (!(state->window_flags & SDL_WINDOW_FULLSCREEN)) {

            state->num_windows = SDL_atoi(argv[index]);

        }

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--title") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->window_title = argv[index];

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--icon") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->window_icon = argv[index];

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--center") == 0) {

        state->window_x = SDL_WINDOWPOS_CENTERED;

        state->window_y = SDL_WINDOWPOS_CENTERED;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--position") == 0) {

        char *x, *y;

        ++index;

        if (!argv[index]) {

            return -1;

        }

        x = argv[index];

        y = argv[index];

        while (*y && *y != ',') {

            ++y;

        }

        if (!*y) {

            return -1;

        }

        *y++ = '\0';

        state->window_x = SDL_atoi(x);

        state->window_y = SDL_atoi(y);

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--geometry") == 0) {

        char *w, *h;

        ++index;

        if (!argv[index]) {

            return -1;

        }

        w = argv[index];

        h = argv[index];

        while (*h && *h != 'x') {

            ++h;

        }

        if (!*h) {

            return -1;

        }

        *h++ = '\0';

        state->window_w = SDL_atoi(w);

        state->window_h = SDL_atoi(h);

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--min-geometry") == 0) {

        char *w, *h;

        ++index;

        if (!argv[index]) {

            return -1;

        }

        w = argv[index];

        h = argv[index];

        while (*h && *h != 'x') {

            ++h;

        }

        if (!*h) {

            return -1;

        }

        *h++ = '\0';

        state->window_minW = SDL_atoi(w);

        state->window_minH = SDL_atoi(h);

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--max-geometry") == 0) {

        char *w, *h;

        ++index;

        if (!argv[index]) {

            return -1;

        }

        w = argv[index];

        h = argv[index];

        while (*h && *h != 'x') {

            ++h;

        }

        if (!*h) {

            return -1;

        }

        *h++ = '\0';

        state->window_maxW = SDL_atoi(w);

        state->window_maxH = SDL_atoi(h);

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--logical") == 0) {

        char *w, *h;

        ++index;

        if (!argv[index]) {

            return -1;

        }

        w = argv[index];

        h = argv[index];

        while (*h && *h != 'x') {

            ++h;

        }

        if (!*h) {

            return -1;

        }

        *h++ = '\0';

        state->logical_w = SDL_atoi(w);

        state->logical_h = SDL_atoi(h);

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--scale") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->scale = (float)SDL_atof(argv[index]);

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--depth") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->depth = SDL_atoi(argv[index]);

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--refresh") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->refresh_rate = SDL_atoi(argv[index]);

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--vsync") == 0) {

        state->render_flags |= SDL_RENDERER_PRESENTVSYNC;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--noframe") == 0) {

        state->window_flags |= SDL_WINDOW_BORDERLESS;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--resize") == 0) {

        state->window_flags |= SDL_WINDOW_RESIZABLE;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--minimize") == 0) {

        state->window_flags |= SDL_WINDOW_MINIMIZED;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--maximize") == 0) {

        state->window_flags |= SDL_WINDOW_MAXIMIZED;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--grab") == 0) {

        state->window_flags |= SDL_WINDOW_INPUT_GRABBED;

        return 1;

    }

    if (SDL_strcasecmp(argv[index], "--rate") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->audiospec.freq = SDL_atoi(argv[index]);

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--format") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        if (SDL_strcasecmp(argv[index], "U8") == 0) {

            state->audiospec.format = AUDIO_U8;

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "S8") == 0) {

            state->audiospec.format = AUDIO_S8;

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "U16") == 0) {

            state->audiospec.format = AUDIO_U16;

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "U16LE") == 0) {

            state->audiospec.format = AUDIO_U16LSB;

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "U16BE") == 0) {

            state->audiospec.format = AUDIO_U16MSB;

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "S16") == 0) {

            state->audiospec.format = AUDIO_S16;

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "S16LE") == 0) {

            state->audiospec.format = AUDIO_S16LSB;

            return 2;

        }

        if (SDL_strcasecmp(argv[index], "S16BE") == 0) {

            state->audiospec.format = AUDIO_S16MSB;

            return 2;

        }

        return -1;

    }

    if (SDL_strcasecmp(argv[index], "--channels") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->audiospec.channels = (Uint8) SDL_atoi(argv[index]);

        return 2;

    }

    if (SDL_strcasecmp(argv[index], "--samples") == 0) {

        ++index;

        if (!argv[index]) {

            return -1;

        }

        state->audiospec.samples = (Uint16) SDL_atoi(argv[index]);

        return 2;

    }

    if ((SDL_strcasecmp(argv[index], "-h") == 0)

        || (SDL_strcasecmp(argv[index], "--help") == 0)) {

        /* Print the usage message */

        return -1;

    }

    if (SDL_strcmp(argv[index], "-NSDocumentRevisionsDebugMode") == 0) {

    /* Debug flag sent by Xcode */

        return 2;

    }

    return 0;

}

const char *

SDLTest_CommonUsage(SDLTest_CommonState * state)

{

    switch (state->flags & (SDL_INIT_VIDEO | SDL_INIT_AUDIO)) {

    case SDL_INIT_VIDEO:

        return VIDEO_USAGE;

    case SDL_INIT_AUDIO:

        return AUDIO_USAGE;

    case (SDL_INIT_VIDEO | SDL_INIT_AUDIO):

        return VIDEO_USAGE " " AUDIO_USAGE;

    default:

        return "";

    }

}

static void

SDLTest_PrintRendererFlag(Uint32 flag)

{

    switch (flag) {

    case SDL_RENDERER_PRESENTVSYNC:

        fprintf(stderr, "PresentVSync");

        break;

    case SDL_RENDERER_ACCELERATED:

        fprintf(stderr, "Accelerated");

        break;

    default:

        fprintf(stderr, "0x%8.8x", flag);

        break;

    }

}

static void

SDLTest_PrintPixelFormat(Uint32 format)

{

    switch (format) {

    case SDL_PIXELFORMAT_UNKNOWN:

        fprintf(stderr, "Unknwon");

        break;

    case SDL_PIXELFORMAT_INDEX1LSB:

        fprintf(stderr, "Index1LSB");

        break;

    case SDL_PIXELFORMAT_INDEX1MSB:

        fprintf(stderr, "Index1MSB");

        break;

    case SDL_PIXELFORMAT_INDEX4LSB:

        fprintf(stderr, "Index4LSB");

        break;

    case SDL_PIXELFORMAT_INDEX4MSB:

        fprintf(stderr, "Index4MSB");

        break;

    case SDL_PIXELFORMAT_INDEX8:

        fprintf(stderr, "Index8");

        break;

    case SDL_PIXELFORMAT_RGB332:

        fprintf(stderr, "RGB332");

        break;

    case SDL_PIXELFORMAT_RGB444:

        fprintf(stderr, "RGB444");

        break;

    case SDL_PIXELFORMAT_RGB555:

        fprintf(stderr, "RGB555");

        break;

    case SDL_PIXELFORMAT_BGR555:

        fprintf(stderr, "BGR555");

        break;

    case SDL_PIXELFORMAT_ARGB4444:

        fprintf(stderr, "ARGB4444");

        break;

    case SDL_PIXELFORMAT_ABGR4444:

        fprintf(stderr, "ABGR4444");

        break;

    case SDL_PIXELFORMAT_ARGB1555:

        fprintf(stderr, "ARGB1555");