mos656x.h

/*
 * This file is part of libsidplayfp, a SID player engine.
 *
 * Copyright 2011-2020 Leandro Nini <drfiemost@users.sourceforge.net>
 * Copyright 2009-2014 VICE Project
 * Copyright 2007-2010 Antti Lankila
 * Copyright 2001 Simon White
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
 */
 
#ifndef MOS656X_H
#define MOS656X_H
 
#include <cstdint>
 
#include "lightpen.h"
#include "sprites.h"
#include "Event.h"
#include "EventCallback.h"
#include "EventScheduler.h"
 
#include "sidcxx11.h"
 
namespace libsidplayfp
{

class MOS656X : private Event
{
public:
    enum class model_t
    {
        MOS6567R56A = 0  
        ,MOS6567R8       
        ,MOS6569         
        ,MOS6572         
        ,MOS6573         
    };
 
private:
    using ClockFunc = event_clock_t (MOS656X::*)();
 
    using model_data_t = struct
    {
        unsigned int rasterLines;
        unsigned int cyclesPerLine;
        ClockFunc clock;
    };
 
private:
    static const model_data_t modelData[];

    static constexpr int IRQ_RASTER = 1 << 0;

    static constexpr int IRQ_LIGHTPEN = 1 << 3;

    static constexpr unsigned int FIRST_DMA_LINE = 0x30;

    static constexpr unsigned int LAST_DMA_LINE = 0xf7;
 
private:
    ClockFunc clock;

    event_clock_t rasterClk;

    EventScheduler &eventScheduler;

    unsigned int cyclesPerLine;

    unsigned int maxRasters;

    unsigned int lineCycle;

    unsigned int rasterY;

    unsigned int yscroll;

    bool areBadLinesEnabled;

    bool isBadLine;

    bool rasterYIRQCondition;

    bool vblanking;

    bool lpAsserted;

    uint8_t irqFlags;

    uint8_t irqMask;

    uint8_t regs[0x40] = {0};

    Lightpen lp;

    Sprites sprites;
 
    EventCallback<MOS656X> badLineStateChangeEvent;
 
    EventCallback<MOS656X> rasterYIRQEdgeDetectorEvent;
 
    EventCallback<MOS656X> lightpenTriggerEvent;
 
private:
    event_clock_t clockPAL();
    event_clock_t clockNTSC();
    event_clock_t clockOldNTSC();

    void handleIrqState();

    void badLineStateChange() { setBA(!isBadLine); }

    void rasterYIRQEdgeDetector()
    {
        const bool oldRasterYIRQCondition = rasterYIRQCondition;
        rasterYIRQCondition = rasterY == readRasterLineIRQ();
        if (!oldRasterYIRQCondition && rasterYIRQCondition)
            activateIRQFlag(IRQ_RASTER);
    }
 
    void lightpenTrigger()
    {
        // Synchronise simulation
        sync();
 
        if (lp.trigger(lineCycle, rasterY))
        {
            activateIRQFlag(IRQ_LIGHTPEN);
        }
    }

    void activateIRQFlag(int flag)
    {
        irqFlags |= flag;
        handleIrqState();
    }

    inline unsigned int readRasterLineIRQ() const
    {
        return regs[0x12] + ((regs[0x11] & 0x80) << 1);
    }

    inline bool readDEN() const { return (regs[0x11] & 0x10) != 0; }
 
    inline bool evaluateIsBadLine() const
    {
        return areBadLinesEnabled
            && rasterY >= FIRST_DMA_LINE
            && rasterY <= LAST_DMA_LINE
            && (rasterY & 7) == yscroll;
    }

    inline unsigned int oldRasterY() const
    {
        return (rasterY > 0 ? rasterY : maxRasters) - 1;
    }
 
    inline void sync()
    {
        eventScheduler.cancel(*this);
        event();
    }

    inline void checkVblank()
    {
        // IRQ occurred (xraster != 0)
        if (rasterY == (maxRasters - 1))
        {
            vblanking = true;
        }
 
        // Check DEN bit on first cycle of the line following the first DMA line
        if (rasterY == FIRST_DMA_LINE
            && !areBadLinesEnabled
            && readDEN())
        {
            areBadLinesEnabled = true;
        }
 
        // Disallow bad lines after the last possible one has passed
        if (rasterY == LAST_DMA_LINE)
        {
            areBadLinesEnabled = false;
        }
 
        isBadLine = false;
 
        if (!vblanking)
        {
            rasterY++;
            rasterYIRQEdgeDetector();
            if ((rasterY == FIRST_DMA_LINE) && !areBadLinesEnabled)
                areBadLinesEnabled = readDEN();
        }
 
        if (evaluateIsBadLine())
            isBadLine = true;
    }

    inline void vblank()
    {
        if (vblanking)
        {
            vblanking = false;
            rasterY = 0;
            rasterYIRQEdgeDetector();
            lp.untrigger();
            if (lpAsserted && lp.retrigger())
            {
                activateIRQFlag(IRQ_LIGHTPEN);
            }
        }
    }

    template<int n>
    inline void startDma()
    {
        if (sprites.isDma(0x01 << n))
            setBA(false);
    }

    template<int n>
    inline void endDma()
    {
        if (!sprites.isDma(0x06 << n))
            setBA(true);
    }

    inline void startBadline()
    {
        if (isBadLine)
            setBA(false);
    }
 
protected:
    MOS656X(EventScheduler &scheduler);
    ~MOS656X() = default;
 
    // Environment Interface
    virtual void interrupt(bool state) = 0;
    virtual void setBA(bool state) = 0;

    uint8_t read(uint_least8_t addr);

    void write(uint_least8_t addr, uint8_t data);
 
public:
    void event() override;

    void chip(model_t model);

    void triggerLightpen();

    void clearLightpen();

    void reset();
 
    static const char *credits();
};
 
// Template specializations

template<>
inline void MOS656X::startDma<0>()
{
    setBA(!sprites.isDma(0x01));
}

template<>
inline void MOS656X::endDma<7>()
{
    setBA(true);
}
 
}
 
#endif // MOS656X_H