1/* Copyright (c) 2013-2015 Jeffrey Pfau
  2 *
  3 * This Source Code Form is subject to the terms of the Mozilla Public
  4 * License, v. 2.0. If a copy of the MPL was not distributed with this
  5 * file, You can obtain one at http://mozilla.org/MPL/2.0/. */
  6
  7#include "gba/renderers/video-software.h"
  8#include "gba/supervisor/context.h"
  9#include "gba/video.h"
 10#include "util/gui.h"
 11#include "util/gui/file-select.h"
 12#include "util/gui/font.h"
 13#include "util/memory.h"
 14
 15#include "3ds-vfs.h"
 16
 17#include <3ds.h>
 18#include <sf2d.h>
 19
 20FS_archive sdmcArchive;
 21
 22static void GBA3DSLog(struct GBAThread* thread, enum GBALogLevel level, const char* format, va_list args);
 23static Handle logFile;
 24
 25static void _drawStart(void) {
 26	sf2d_start_frame(GFX_BOTTOM, GFX_LEFT);
 27}
 28static void _drawEnd(void) {
 29	sf2d_end_frame();
 30	sf2d_swapbuffers();
 31}
 32
 33static int _pollInput(void) {
 34	hidScanInput();
 35	int keys = 0;
 36	int activeKeys = hidKeysHeld();
 37	if (activeKeys & KEY_X) {
 38		keys |= 1 << GUI_INPUT_CANCEL;
 39	}
 40	if (activeKeys & KEY_B) {
 41		keys |= 1 << GUI_INPUT_BACK;
 42	}
 43	if (activeKeys & KEY_A) {
 44		keys |= 1 << GUI_INPUT_SELECT;
 45	}
 46	if (activeKeys & KEY_LEFT) {
 47		keys |= 1 << GUI_INPUT_LEFT;
 48	}
 49	if (activeKeys & KEY_RIGHT) {
 50		keys |= 1 << GUI_INPUT_RIGHT;
 51	}
 52	if (activeKeys & KEY_UP) {
 53		keys |= 1 << GUI_INPUT_UP;
 54	}
 55	if (activeKeys & KEY_DOWN) {
 56		keys |= 1 << GUI_INPUT_DOWN;
 57	}
 58	return keys;
 59}
 60
 61int main() {
 62	struct GBAContext context;
 63	srvInit();
 64	aptInit();
 65	hidInit(0);
 66	fsInit();
 67	sdmcInit();
 68
 69	sf2d_init();
 70	sf2d_set_clear_color(0);
 71	sf2d_texture* tex = sf2d_create_texture(256, 256, TEXFMT_RGB565, SF2D_PLACE_RAM);
 72	memset(tex->data, 0, 256 * 256 * 2);
 73
 74	sdmcArchive = (FS_archive) {
 75		ARCH_SDMC,
 76		(FS_path) { PATH_EMPTY, 1, (const u8*)"" },
 77		0, 0
 78	};
 79	FSUSER_OpenArchive(0, &sdmcArchive);
 80	FSUSER_OpenFile(0, &logFile, sdmcArchive, FS_makePath(PATH_CHAR, "/mgba.log"), FS_OPEN_WRITE | FS_OPEN_CREATE, FS_ATTRIBUTE_NONE);
 81
 82	struct GUIFont* font = GUIFontCreate();
 83
 84	GBAContextInit(&context, 0);
 85	struct GBAOptions opts = {
 86		.useBios = true,
 87		.logLevel = 0,
 88		.idleOptimization = IDLE_LOOP_REMOVE
 89	};
 90	GBAConfigLoadDefaults(&context.config, &opts);
 91	context.gba->logHandler = GBA3DSLog;
 92	context.gba->logLevel = 0;
 93
 94	struct GBAVideoSoftwareRenderer renderer;
 95	GBAVideoSoftwareRendererCreate(&renderer);
 96	renderer.outputBuffer = anonymousMemoryMap(256 * VIDEO_VERTICAL_PIXELS * 2);
 97	renderer.outputBufferStride = 256;
 98	GBAVideoAssociateRenderer(&context.gba->video, &renderer.d);
 99
100	if (!font) {
101		goto cleanup;
102	}
103
104	struct GUIParams params = {
105		320, 240,
106		font, _drawStart, _drawEnd, _pollInput
107	};
108
109	char currentPath[256] = "";
110	while (aptMainLoop()) {
111		char path[256];
112		if (!selectFile(&params, "/", path, currentPath, sizeof(path), GBAIsROM)) {
113			break;
114		}
115		_drawStart();
116		GUIFontPrintf(font, 160, (GUIFontHeight(font) + 240) / 2, GUI_TEXT_CENTER, 0xFFFFFFFF, "Loading...");
117		_drawEnd();
118		if (!GBAContextLoadROM(&context, path, true)) {
119			continue;
120		}
121		if (!GBAContextStart(&context)) {
122			continue;
123		}
124		while (aptMainLoop()) {
125			hidScanInput();
126			int activeKeys = hidKeysHeld() & 0x3FF;
127			if (hidKeysDown() & KEY_X) {
128				break;
129			}
130			GBAContextFrame(&context, activeKeys);
131			GX_SetDisplayTransfer(0, renderer.outputBuffer, GX_BUFFER_DIM(256, VIDEO_VERTICAL_PIXELS), tex->data, GX_BUFFER_DIM(256, VIDEO_VERTICAL_PIXELS), 0x000002202);
132			GSPGPU_FlushDataCache(0, tex->data, 256 * VIDEO_VERTICAL_PIXELS * 2);
133			gspWaitForPPF();
134			_drawStart();
135			sf2d_draw_texture_scale(tex, 40, 296, 1, -1);
136			_drawEnd();
137		}
138		GBAContextStop(&context);
139	}
140	GBAContextDeinit(&context);
141
142cleanup:
143	mappedMemoryFree(renderer.outputBuffer, 0);
144
145	FSFILE_Close(logFile);
146
147	sf2d_free_texture(tex);
148	sf2d_fini();
149
150	sdmcExit();
151	fsExit();
152	gfxExit();
153	hidExit();
154	aptExit();
155	srvExit();
156	return 0;
157}
158
159static void GBA3DSLog(struct GBAThread* thread, enum GBALogLevel level, const char* format, va_list args) {
160	UNUSED(thread);
161	UNUSED(level);
162	char out[256];
163	u64 size;
164	u32 written;
165	size_t len = vsnprintf(out, sizeof(out), format, args);
166	if (len >= 256) {
167		len = 255;
168	}
169	out[len] = '\n';
170	FSFILE_GetSize(logFile, &size);
171	FSFILE_Write(logFile, &written, size, out, len + 1, FS_WRITE_FLUSH);
172}