--- nono/m88xx0/m88100.h 2026/04/29 17:05:11 1.1.1.13 +++ nono/m88xx0/m88100.h 2026/04/29 17:05:56 1.1.1.17 @@ -7,27 +7,25 @@ #pragma once #include "header.h" -#include "branchhistory.h" -#include "bus.h" -#include "m88200.h" -#include -#include - -// 外部リクエストフラグ -// XXX m680x0 側にもよく似たものがあってどうしたもんか -#define CPU_REQ_INTR (0x00000020) // 命令後に割り込みチェック -class MPU88xx0Device; - -// m88100 レジスタイメージを保持する構造体。 -// この構造体はコピーや比較をするので、ポインタとかは置かないこと。 -struct m88100reg +// 定数。 +struct M88100 { // PID(cr0) + // 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 + // +---------------+---------------+---------------+-------------+-+ + // | 0 | REV | VER |M| + // +---------------+---------------+---------------+-------------+-+ static const uint32 PID_REV_MASK = 0x0000ff00; // 0 = MC88100 static const uint32 PID_VER_MASK = 0x000000fe; static const uint32 PID_MASTER = 0x00000001; + // PSR(cr1) + // 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 + // +-+-+-+-+-------+---------------+---------------+-------+-+-+-+-+ + // |S|B|S|C| |D|M|I|S| + // |U|O|E| | 0 |1|X|N|F| + // +-+-+-+-+-------+---------------+---------------+-------+-+-+-+-+ static const uint32 PSR_SUPER = 0x80000000; static const uint32 PSR_BO_LE = 0x40000000; // ByteOrder(Little) static const uint32 PSR_SER = 0x20000000; @@ -38,11 +36,20 @@ struct m88100reg static const uint32 PSR_SFRZ = 0x00000001; // Shadow Freeze // 例外処理で使用される S*IP + // 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 + // +---------------+---------------+---------------+-----------+-+-+ + // | S*IP |V|E| + // +---------------+---------------+---------------+-----------+-+-+ static const uint32 SIP_MASK = 0xfffffffcU; static const uint32 SIP_V = 0x00000002; static const uint32 SIP_E = 0x00000001; // DMTn、データ例外 + // 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 9 8 7 6 5 4 3 2 1 0 + // +---------------+---------------+-+-+-+-+-------+-+-+-+-+-+-+-+-+ + // | |B|D|D|L| |S|E|E|E|E|W|V| + // | 0 |O|A|B|K| DREG | |3|2|1|0|R| | + // +---------------+---------------+-+-+-+-+-------+-+-+-+-+-+-+-+-+ static const uint32 DM_BO = 0x00008000; static const uint32 DM_DAS = 0x00004000; static const uint32 DM_DOUB1 = 0x00002000; @@ -186,26 +193,94 @@ struct m88100reg static const uint32 FPCR_EFOVF = 0x00000002; // Enable Overflow static const uint32 FPCR_EFINX = 0x00000001; // Enable Inexact + // 例外ベクタ。 + static const uint32 EXCVEC_RESET = 0; + static const uint32 EXCVEC_INTERRUPT = 1; + static const uint32 EXCVEC_INST = 2; + static const uint32 EXCVEC_DATA = 3; + static const uint32 EXCVEC_MISALIGNED = 4; + static const uint32 EXCVEC_UNIMPL_OP = 5; + static const uint32 EXCVEC_PRIV = 6; + static const uint32 EXCVEC_BOUNDS = 7; + static const uint32 EXCVEC_INT_DIV = 8; + static const uint32 EXCVEC_INT_OVF = 9; + static const uint32 EXCVEC_ERROR = 10; + static const uint32 EXCVEC_SFU1_PRECISE = 114; + static const uint32 EXCVEC_SFU1_IMPRECISE = 115; + static const uint32 EXCVEC_SFU2_PRECISE = 116; + static const uint32 EXCVEC_SFU3_PRECISE = 118; + static const uint32 EXCVEC_SFU4_PRECISE = 120; + static const uint32 EXCVEC_SFU5_PRECISE = 122; + static const uint32 EXCVEC_SFU6_PRECISE = 124; + static const uint32 EXCVEC_SFU7_PRECISE = 126; + + // 例外の優先順位 (LSB 側が優先度高)。一部カテゴリ分けも兼ねる。 + // + // 優先度 例外 + // 1 RESET + // 1 (ERROR) + // 2 INST + // 3 UNIMPL_OP + // 4 PRIV + // 5 INTERNAL … 内部発生例外のうちトラップ以外 + // 5 TRAP … 内部発生例外のうちトラップのみ + // -- (OUTER) …これ以降のどれかが立っているという代表ビット + // 6 INTERRUPT + // 7 SFU_IMPRECISE + // 8 DATA + // + // ERROR 例外は Table. 6-2 には載ってないけど、実質ダブルバスフォールト + // なので、リセットに準じる高さの気がする…。 + // TRAP は他の内部発生例外 (INTERNAL) とは区別が必要なので分けてある。 + // INTERNAL と TRAP はこの優先度だけでなくベクタ情報も必要。 + // INTERRUPT と DATA はどちらが起きても同時に処理するので、 + // どちらかを立てたまま OUTER ビットで処理させる。 + // SFU_IMPRECISE は未調査。 + static const uint32 EXCPRI_RESET = (1U << 0); + static const uint32 EXCPRI_ERROR = (1U << 1); + static const uint32 EXCPRI_INST = (1U << 2); + static const uint32 EXCPRI_UNIMPL_OP = (1U << 3); + static const uint32 EXCPRI_PRIV = (1U << 4); + static const uint32 EXCPRI_INTERNAL = (1U << 5); + static const uint32 EXCPRI_TRAP = (1U << 6); + static const uint32 EXCPRI_OUTER = (1U << 7); + static const uint32 EXCPRI_INTERRUPT = (1U << 8); + static const uint32 EXCPRI_SFU_IMPRECISE = (1U << 9); + static const uint32 EXCPRI_DATA = (1U << 10); + static const uint32 EXCPRI_OUTER_MASK = + EXCPRI_INTERRUPT | EXCPRI_SFU_IMPRECISE | EXCPRI_DATA; + + // 32bit 命令コードからディスパッチ用の 12bit に変換。 + // ops と disasm で使うため。 + static uint32 op32_to_12(uint32 op) { + return ((op >> 20) & 0x0fc0) | ((op >> 10) & 0x003f); + } +}; + +// m88100 レジスタイメージを保持する構造体。 +// この構造体はコピーや比較をするので、ポインタとかは置かないこと。 +struct m88100reg +{ // 頻繁にアクセスしそうな変数はオフセットの若いほうに持ってきておく。 // 実行中の命令 - uint64 opX = 0; + uint64 opX {}; // プリフェッチ命令 - uint64 opF = 0; + uint64 opF {}; - uint32 xip = 0; - uint32 nip = 0; - uint32 fip = 0; + uint32 xip {}; + uint32 nip {}; + uint32 fip {}; uint32 r[32] {}; union { uint32 cr[21] {}; struct { - uint32 pid; // cr0 + uint32 pid; // cr0 (ReadOnly) uint32 psr; // cr1 uint32 epsr; // cr2 uint32 ssbr; // cr3 - uint32 sxip; // cr4 + uint32 sxip; // cr4 (ReadOnly) uint32 snip; // cr5 uint32 sfip; // cr6 uint32 vbr; // cr7 @@ -238,233 +313,7 @@ struct m88100reg }; }; - // 直近のデータアクセスアドレス - uint32 lastaddr; - - // スーパーバイザ/ユーザモードなら true - bool IsSuper() const { return (psr & PSR_SUPER) != 0; } - bool IsUser() const { return (psr & PSR_SUPER) == 0; } - - // 割り込みが許可なら true - bool IsIntrEnable() const { return (psr & PSR_IND) == 0; } - - // SFU1(FPU)が有効なら true - bool IsFPUEnable() const { return (psr & PSR_SFD1) == 0; } - - // MXM (Misaligned Access Enable) なら true - bool IsMXM() const { return (psr & PSR_MXM) != 0; } - - // キャリーフラグが立っていれば 1 を返す - uint32 GetCY() const { return (psr >> 28) & 1; } - - // キャリーフラグをセットする。 - // cy のうち最下位ビットのみ参照する (呼び出し側はマスクせず渡してよい) - void SetCY(uint cy) { - psr &= ~PSR_C; - psr |= ((cy & 1) << 28); - } - static const uint32 fcr_mask[11]; static const char * const sipname[3]; static const char * const dmt_en_str[16]; }; - -class m88kcpu : public m88100reg -{ - static const uint64 DELAYSLOT = 1ULL << 62; - - enum ExceptionKind - { - NORMAL, - DATA, - ERROR, - INTR, - TRAP, - }; - - public: - static const uint32 CPU_STATE_NORMAL = 0; - static const uint32 CPU_STATE_STOP = 1; // 疑似 STOP 状態 - - public: - m88kcpu(MPU88xx0Device *dev_); - virtual ~m88kcpu(); - - void PowerOn(); - uint64 Reset(); - - int Exec(); - int ExecPseudoStop(); - - // 割り込み信号線が変化したことの通知を受ける。 - // level は 0 か 1。 - void Interrupt(int level); - - // PID.VERSION を設定する (初期化時に呼ぶ) - void SetVersion(uint32 version); - - // クラス外部からの xip 取得 - uint32 GetXIP() const { return xip; } - - // クラス外部からの vbr 取得 - uint32 GetVBR() const { return vbr; } - - // op が>=0ならバスエラーは起きていない - // そのときに DELAYSLOT bit が 0 ならば通常 - // bit32 が 1 ならば遅延スロット命令 - // op が負数ならバスエラーが起きた - // そのときに DELAYSLOT bit が 1 ならば通常バスエラー - // bit32 が 0 ならば遅延スロットでのバスエラー - // バスエラーかどうかのチェックのほうが回数が多いため、 - // バスエラー優先にしたい。 - - static bool OpIsBusErr(uint64 op) { - return (int64)op < 0; - } - - // op が DelaySlot 実行なら true を返す。デバッガで表示用に使う。 - static bool OpIsDelay(uint64 op) { - return (OpIsBusErr(op) ? ~op : op) & DELAYSLOT; - } - - // サイクルを加算 (m88200 から使う) - // 今は単純に加算しているだけでオーバーラップなどは考慮してない - void AddCycle(int32 wait) { used_cycle += wait; } - - std::atomic atomic_reqflag {}; // リクエストフラグ - - // CPU の状態 - uint32 cpu_state {}; - - // [0] 命令バス - // [1] データバス - std::array cmmu {}; - - // ブランチ履歴 (例外履歴を含む) - BranchHistory_m88xx0 brhist { BranchHistory::BrHist }; - // 例外履歴のみ - BranchHistory_m88xx0 exhist { BranchHistory::ExHistOnly }; - - // 32bit 命令コードからディスパッチ用の 12bit に変換。 - static uint32 op32_to_12(uint32 op) { - return ((op >> 20) & 0x0fc0) | ((op >> 10) & 0x003f); - } - - // 疑似 STOP 状態に入る機能を有効にする場合 true - bool pseudo_stop_enable {}; - - // DOS call エミュレーションコールバックを設定する - void SetFLineCallback(bool (*callback)(m88kcpu *, void *), void *arg); - - private: - uint64 fetch() { - nip = fip; - opF = cmmu[0].load_32(fip); - fip += 4; - return opF; - } - - void Prefetch(); - - // PSR を newpsr に変更する。 - // CY ビットは特別にこの関数を経由しないで変更してよいことにする。 - void SetPSR(uint32 newpsr) - { - psr = newpsr; - SetPSR(); - } - // 更新された psr に基づいて、PSR 変更によって必要な処理をする。 - // CY ビットを変更した場合は呼ばなくてよいことにする。 - void SetPSR() - { - // CMMU に S/U 信号を出す - cmmu[0].SetSuper(IsSuper()); - cmmu[1].SetSuper(IsSuper()); - } - - // FPxS1, FPxS2 レジスタを設定 - void SetFPxS(uint32& h, uint32& l, double src, uint32 t); - void SetFPS1(double src, uint32 t1) { SetFPxS(fphs1, fpls1, src, t1); } - void SetFPS2(double src, uint32 t2) { SetFPxS(fphs2, fpls2, src, t2); } - void SetFPS1(uint32 src) { fpls1 = src; } - void SetFPS2(uint32 src) { fpls2 = src; } - // FP Result を FPIT, FPRH, FPRL レジスタに設定 - void SetFPRx(double src); - - void Exception(int vec); - void ExceptionCore(int vec, ExceptionKind cause); - uint32 Calcdmt(uint32 flag); - void ReadDataException32(uint32 addr, uint32 flag); - void ReadDataException64(uint32 addr, uint32 flag); - void WriteDataException32(uint32 addr, uint32 flag); - void WriteDataException64(uint32 addr, uint32 flag); - void XmemDataException(uint32 addr, uint32 flag); - void FPPreciseException(uint32 cause, double s2); - void FPPreciseException(uint32 cause, double s1, double s2); - void FPPreciseException(uint32 cause); - void FPImpreciseException(uint32 cause); - - // ブランチ処理用 - void EnterBranch(uint32 toaddr); - void ExitBranch(); - void ExitDelayBranch(); - uint32 nop_counter {}; // STOP 検出用の nop 命令カウンタ - - // ロードストア命令用の下処理 - bool ldst_usr(uint32& usr); - uint32 ldst_scale(uint32 size); - bool ldst_align(uint32 size, uint32& addr); - // 浮動小数点数命令用の処理 - void ops_int(int mode); - -#define OP_PROTO(name) void __CONCAT(op_,name)() -#include "m88100ops.h" -OP_PROTO(illegal); -#undef OP_PROTO - - void op_unimpl() { - printf("unimplemented op XIP=%08x opX=%08x\n", xip, (uint32)opX); - } - void fpu_unimpl(); - - // 今のところサイクルを正確に実装するのは無理なので - // 適当に全部積み上げてある。 - - // 電源オンからの累積消費サイクル - uint64 used_cycle {}; - - // ペンディング中の割り込みレベル - int intr_pending {}; - - // float,double と整数値の相互変換 - static float u2f(uint32 u) { - float v; - memcpy(&v, &u, sizeof(v)); - return v; - } - static double u2d(uint64 u) { - double v; - memcpy(&v, &u, sizeof(v)); - return v; - } - static uint32 f2u(float v) { - uint32 u; - memcpy(&u, &v, sizeof(u)); - return u; - } - static uint64 d2u(double v) { - uint64 u; - memcpy(&u, &v, sizeof(u)); - return u; - } - - void ChangeState(uint32 new_state); - - int instruction_in_stop {}; - - MPU88xx0Device *dev {}; - - // DOS call エミュレーション - bool (*fline_callback)(m88kcpu *, void *) = NULL; - void *fline_arg {}; -};