#define SDL_MAIN_USE_CALLBACKS
#include <SDL3/SDL.h>
#include <SDL3/SDL_main.h>
#include <SDL3/SDL_properties.h>
#include <SDL3_image/SDL_image.h>
#include <SDL3_mixer/SDL_mixer.h>

#include <sdl3game/assets.h>
#include <sdl3game/error.h>
#include <sdl3game/iterator.h>
#include <sdl3game/tilemap.h>
#include <sdl3game/heap.h>
#include <sdl3game/game.h>
#include <sdl3game/controller.h>
#include <sdl3game/draw.h>
#include <sdl3game/sprite.h>
#include <sdl3game/actor.h>
#include <sdl3game/registry.h>
#include <sdl3game/text.h>

int numsprites = 8;
char *spritepaths[] = {
  "assets/sprites/little_guy_walking_left.json",
  "assets/sprites/little_guy_walking_right.json",
  "assets/sprites/little_guy_walking_up.json",
  "assets/sprites/little_guy_walking_down.json",
  "assets/sprites/little_guy_facing_left.json",
  "assets/sprites/little_guy_facing_right.json",
  "assets/sprites/little_guy_facing_up.json",
  "assets/sprites/little_guy_facing_down.json"
};

char dirnamebuf[1024];

akerr_ErrorContext AKERR_NOIGNORE *music_toggle(actor *obj, SDL_Event *event)
{
    SDL_PropertiesID bgmprops = 0;
    PREPARE_ERROR(errctx);
    if ( MIX_TrackPlaying(game.tracks[GAME_AUDIO_TRACK_BGM]) ) {
	FAIL_ZERO_RETURN(
	    errctx,
	    MIX_StopTrack(game.tracks[GAME_AUDIO_TRACK_BGM], 0),
	    AKERR_SDL,
	    "%s",
	    SDL_GetError());
    } else {
	SDL_SetNumberProperty(bgmprops, MIX_PROP_PLAY_LOOPS_NUMBER, -1);
	FAIL_ZERO_RETURN(
	    errctx,
	    MIX_PlayTrack(game.tracks[GAME_AUDIO_TRACK_BGM], bgmprops),
	    AKERR_SDL,
	    "%s",
	    SDL_GetError());
    }
    SUCCEED_RETURN(errctx);
}

akerr_ErrorContext AKERR_NOIGNORE *user_breakpoint(actor *obj, SDL_Event *event)
{
    PREPARE_ERROR(errctx);
    SDL_Log("User breakpoint hit");
    SUCCEED_RETURN(errctx);
}

SDL_AppResult SDL_AppInit(void **appstate, int argc, char *argv[])
{
    SDL3GControl control;
    actor *actorptr = NULL;
    *appstate = (void *)&game.state;
    PREPARE_ERROR(errctx);
    ATTEMPT {
	FAIL_ZERO_BREAK(errctx, appstate, AKERR_NULLPOINTER, "NULL appstate pointer");

	strcpy((char *)&game.name, "sdl3-gametest");
	strcpy((char *)&game.version, "0.0.1");
	strcpy((char *)&game.uri, "net.aklabs.games.sdl3-gametest");
	game.screenwidth = 640;
	game.screenheight = 480;
	
	CATCH(errctx, GAME_init());

	for ( int i = 0; i < numsprites ; i++) {
	    strcpy((char *)&dirnamebuf, spritepaths[i]);
	    CATCH(errctx, sprite_load_json((char *)&dirnamebuf));
	}
	strcpy((char *)&dirnamebuf, "assets/characters/littleguy.json");
	CATCH(errctx, character_load_json((char *)&dirnamebuf));
	CATCH(errctx, heap_next_actor(&actorptr));
	CATCH(errctx, actor_initialize((actor *)actorptr, "player"));
	actorptr->basechar = SDL_GetPointerProperty(
	    REGISTRY_CHARACTER,
	    "little guy",
	    NULL);
	FAIL_ZERO_BREAK(errctx, actorptr->basechar, AKERR_REGISTRY, "Can't load character 'little guy' from the registry");
	actorptr->movement_controls_face = false;
	actorptr->state = (ACTOR_STATE_ALIVE | ACTOR_STATE_FACE_LEFT);
	actorptr->x = 320;
	actorptr->y = 240;
	actorptr->visible = true;

	strcpy((char *)&dirnamebuf, "assets/memories.mp3");
	CATCH(errctx, load_start_bgm((char *)&dirnamebuf));

	strcpy((char *)&dirnamebuf, "assets/tilemap.tmj");
	CATCH(errctx, tilemap_load((char *)&dirnamebuf, (tilemap *)&gamemap));

	CATCH(errctx, SDL3G_controller_default(0, "player", 0, 0));
	
	// set custom control maps */
	memset((void *)&control, 0x00, sizeof(SDL3GControl));
	
	// Breakpoint
	control.key = SDLK_ESCAPE;
	control.event_on = SDL_EVENT_KEY_DOWN;
	control.handler_on = &user_breakpoint;
	CATCH(errctx, SDL3G_controller_pushmap(0, &control));

 	// Toggle the music
	control.key = SDLK_M;
	control.event_on = SDL_EVENT_KEY_DOWN;
	control.handler_on = &music_toggle;
	CATCH(errctx, SDL3G_controller_pushmap(0, &control));

	CATCH(errctx, text_loadFont("C64Pro", "assets/C64_Pro-STYLE.ttf", 18));
	
    } CLEANUP {
    } PROCESS(errctx) {
    } HANDLE_DEFAULT(errctx) {
	LOG_ERROR(errctx);
	return SDL_APP_FAILURE;
    } FINISH_NORETURN(errctx);
      
    return SDL_APP_CONTINUE;
}

SDL_AppResult SDL_AppEvent(void *appstate, SDL_Event *event)
{
    PREPARE_ERROR(errctx);

    ATTEMPT {
	FAIL_ZERO_BREAK(errctx, appstate, AKERR_NULLPOINTER, "NULL appstate pointer");
	FAIL_ZERO_BREAK(errctx, event, AKERR_NULLPOINTER, "NULL event pointer");
	
	CATCH(errctx, controller_handle_event(appstate, event));
	if (event->type == SDL_EVENT_QUIT) {
	    return SDL_APP_SUCCESS;  /* end the program, reporting success to the OS. */
	}
    } CLEANUP {
    } PROCESS(errctx) {
    } FINISH_NORETURN(errctx);
    return SDL_APP_CONTINUE;  /* carry on with the program! */
}

SDL_AppResult SDL_AppIterate(void *appstate)
{
    //SDL_FRect dest;
    //b2Vec2 position;
    int i = 0;
    iterator opflags;
    char fpsText[32];

    PREPARE_ERROR(errctx);

    GAME_updateFPS();
    
    BITMASK_CLEAR(opflags.flags);
    BITMASK_ADD(opflags.flags, ITERATOR_OP_UPDATE);
    BITMASK_ADD(opflags.flags, ITERATOR_OP_RENDER);
    BITMASK_ADD(opflags.flags, ITERATOR_OP_LAYERMASK);
  
    for ( i = 0; i < TILEMAP_MAX_LAYERS; i++ ) {
	opflags.layerid = i;
	ATTEMPT {
	    CATCH(errctx, tilemap_draw(renderer, (tilemap *)&gamemap, &camera, i));
	    SDL_EnumerateProperties(REGISTRY_ACTOR, &registry_iterate_actor, (void *)&opflags);
	} CLEANUP {
	} PROCESS(errctx) {
	} HANDLE_DEFAULT(errctx) {
	    LOG_ERROR(errctx);
	    return SDL_APP_FAILURE;
	} FINISH_NORETURN(errctx);
    }
    ATTEMPT {
	memset((char *)&fpsText, 0x00, 32);
	snprintf((char *)&fpsText, 31, "FPS : %d", game.fps);
	CATCH(errctx, text_renderTextAt(
		  SDL_GetPointerProperty(
		      REGISTRY_FONT,
		      "C64Pro",
		      NULL),
		  (char *)&fpsText,
		  (SDL_Color){255, 255, 255, 255},
		  0,
		  450,
		  10)
	    );
    } CLEANUP {
	SDL_RenderPresent(renderer);
    } PROCESS(errctx) {
    } HANDLE_DEFAULT(errctx) {
	LOG_ERROR(errctx);
	return SDL_APP_FAILURE;
    } FINISH_NORETURN(errctx);

    return SDL_APP_CONTINUE;
}

void SDL_AppQuit(void *appstate, SDL_AppResult result)
{
    /* SDL will clean up the window/renderer for us. */
    // SDL_DestroyTexture(ball.texture);
    //b2DestroyWorld(physicsWorldId);
    SDL_Log("Freeing music resources");
    if ( bgm != NULL ) {
	//Mix_FreeMusic(bgm);
    }
    SDL_Log("Quitting mixer");
    // Mix_Quit();
}