#include "dolphin/dvd/fstload.h"
#include "dolphin/os/OS.h"
#include "string.h"

// .bss
static unsigned char bb2Buf[63]; // size: 0x3F, address: 0x0

// .sbss
static unsigned long status; // size: 0x4, address: 0x0
static struct DVDBB2 * bb2; // size: 0x4, address: 0x4
static struct DVDDiskID * idTmp; // size: 0x4, address: 0x8

// functions
static void cb(long result, struct DVDCommandBlock * block);
void __fstLoad();

static void cb(long result, struct DVDCommandBlock * block) {
    if (result > 0) {
        switch(status) {
            case 0:
                status = 1;
                DVDReadAbsAsyncForBS(block, bb2, 0x20, 0x420, cb);
                return;
            case 1:
                status = 2;
                DVDReadAbsAsyncForBS(block, bb2->FSTAddress, (bb2->FSTLength + 0x1F) & 0xFFFFFFE0, bb2->FSTPosition, cb);
            default:
                return;
        }
    }
    if (result == -1) {
        return;
    } else if (result == -4) {
        status = 0;
        DVDReset();
        DVDReadDiskID(block, idTmp, cb);
    }
}

void __fstLoad() {
    struct OSBootInfo * bootInfo;
    struct DVDDiskID * id;
    unsigned char idTmpBuf[63];
    long state;
    void * arenaHi;
    static struct DVDCommandBlock block;

    arenaHi = OSGetArenaHi();
    bootInfo = (void*)OSPhysicalToCached(0);
    idTmp = (void*)OSRoundUp32B(idTmpBuf);
    bb2 = (void*)OSRoundUp32B(bb2Buf);
    DVDReset();
    DVDReadDiskID(&block, idTmp, cb);
    while (1) {
        state = DVDGetDriveStatus();
        if (state == 0) {
            break;
        }

        // weird switch that seemingly wont do anything but break out of its own switch. What was this for? Early DVD development pre-hardware?
        switch(state) {
            case DVD_STATE_FATAL_ERROR: break;
            case DVD_STATE_BUSY: break;
            case DVD_STATE_WAITING: break;
            case DVD_STATE_COVER_CLOSED: break;
            case DVD_STATE_NO_DISK: break;
            case DVD_STATE_COVER_OPEN: break;
            case DVD_STATE_MOTOR_STOPPED: break;
        }
    }
    bootInfo->fst_location = (void*)bb2->FSTAddress;
    bootInfo->fst_max_length = bb2->FSTMaxLength;
    id = &bootInfo->disk_info;
    memcpy(id, idTmp, sizeof(DVDDiskID));
    OSReport("\n");
    OSReport("  Game Name ... %c%c%c%c\n", id->game_name[0], id->game_name[1], id->game_name[2], id->game_name[3]);
    OSReport("  Company ..... %c%c\n", id->company[0], id->company[1]);
    OSReport("  Disk # ...... %d\n", id->disk_number);
    OSReport("  Game ver .... %d\n", id->game_version);
    OSReport("  Streaming ... %s\n", !(id->is_streaming) ? "OFF" : "ON");
    OSReport("\n");
    OSSetArenaHi(bb2->FSTAddress);
}