/*
    sprite.cpp
    Copyright (C) 2007 Acekard, www.acekard.com
    Copyright (C) 2007-2009 somebody
    Copyright (C) 2009 yellow wood goblin

    SPDX-License-Identifier: GPL-3.0-or-later
*/

#include "sprite.h"
#include <nds.h>

cSprite::cSprite(u8 id) {
    init(id);
}

cSprite::~cSprite() {}

void cSprite::sysinit() {
    oamInit(&oamMain, SpriteMapping_Bmp_1D_128, true);

    for (int i = 0; i < 128; i++) {
        oamMain.oamMemory[i].attribute[0] = ATTR0_DISABLED;
        oamMain.oamMemory[i].attribute[1] = 0;
        oamMain.oamMemory[i].attribute[2] = 0;
        oamMain.oamMemory[i].filler = 0;
    }

    oamUpdate(&oamMain);
    oamEnable(&oamMain);
}

void cSprite::init(u16 id) {
    _id = id;

    _size = SS_SIZE_32;

    _shape = SS_SHAPE_SQUARE;

    _bufferOffset = 0;

    _priority = 2;

    _entry = &oamMain.oamMemory[_id];
    _affine = &oamMain.oamRotationMemory[_id];

    // initial x = 0, hidden, bitmap obj mode, square shape
    _entry->attribute[0] = ATTR0_DISABLED | ATTR0_BMP | ATTR0_SQUARE | 0;

    // initial y = 0, size = 32x32, Affine Transformation Parameter group 0
    _entry->attribute[1] = ATTR1_SIZE_32 | ATTR1_ROTDATA(_id) | 0;

    // initial alpha = 15, buffer offset = 0, display priority 0
    _entry->attribute[2] = ATTR2_ALPHA(15) | ATTR2_PRIORITY(0) | 0;

    setScale(1, 1);
}

void cSprite::show() {
    _entry->attribute[0] = (_entry->attribute[0] & (~0x0300)) | ATTR0_ROTSCALE_DOUBLE | ATTR0_BMP;
}

void cSprite::hide() {
    _entry->attribute[0] = (_entry->attribute[0] & (~0x0300)) | ATTR0_DISABLED;
}

void cSprite::setAlpha(u8 alpha) {
    oamSetAlpha(&oamMain, _id, alpha);
}

void cSprite::setPosition(u16 x, u8 y) {
    u8 offset = 0;
    switch (_size) {
        case SS_SIZE_8:
            offset = 4;
            break;
        case SS_SIZE_16:
            offset = 8;
            break;
        case SS_SIZE_32:
            offset = 16;
            break;
        case SS_SIZE_64:
            offset = 32;
            break;
        default:
            offset = 0;
    };
    x -= offset;
    _x = x & 0x1FF;
    y -= offset;
    _y = y & 0xFF;

    oamSetXY(&oamMain, _id, _x, _y);
}

void cSprite::setSize(SPRITE_SIZE size) {
    _size = size;
    _entry->attribute[1] = (_entry->attribute[1] & (~0xC000)) | _size;
}

void cSprite::setShape(SPRITE_SHAPE shape) {
    _shape = shape;
    _entry->attribute[1] = (_entry->attribute[0] & (~0xC000)) | _shape;
}

u16* cSprite::buffer() {
    return SPRITE_GFX + (_bufferOffset * 64);
}

void cSprite::setBufferOffset(u32 offset) {
    _bufferOffset = offset;
    _entry->attribute[2] = (_entry->attribute[2] & (~0x3FF)) | offset;
}

void cSprite::setScale(float scaleX, float scaleY) {
    _scaleX = scaleX;
    _scaleY = scaleY;

    scaleX = 1 / scaleX;
    scaleY = 1 / scaleY;

    u8 decimalX = (u8)((scaleX - (int)scaleX) * 256);
    u8 integerX = (u8)((int)scaleX) & 0x7f;
    u8 decimalY = (u8)((scaleY - (int)scaleY) * 256);
    u8 integerY = (u8)((int)scaleY) & 0x7f;

    _affine->hdx = (integerX << 8) | decimalX;
    _affine->hdy = 0;
    _affine->vdx = 0;
    _affine->vdy = (integerY << 8) | decimalY;
}

void cSprite::setPriority(u8 priority) {
    _priority = priority;
    oamSetPriority(&oamMain, _id, _priority);
}

bool cSprite::visible() {
    return (_entry->attribute[0] & 0x0300) != 0x0200;
}