Return to m68k.h CVS log

Up to [HATARI the Atari ST Emulator] / hatari / src / cpu

Annotation of hatari/src/cpu/m68k.h, revision 1.1

1.1     ! root        1: /*
        !             2:   * UAE - The Un*x Amiga Emulator
        !             3:   *
        !             4:   * MC68000 emulation - machine dependent bits
        !             5:   *
        !             6:   * Copyright 1996 Bernd Schmidt
        !             7:   * Copyright 2004-2005 Richard Drummond
        !             8:   */
        !             9: 
        !            10:  /*
        !            11:   * Machine dependent structure for holding the 68k CCR flags
        !            12:   */
        !            13: struct flag_struct {
        !            14:     unsigned int cznv;
        !            15:     unsigned int x;
        !            16: };
        !            17: 
        !            18: extern struct flag_struct regflags;
        !            19: 
        !            20: /*
        !            21:  * The bits in the cznv field in the above structure are assigned to
        !            22:  * allow the easy mirroring of the x86 condition flags. (For example,
        !            23:  * from the AX register - the x86 overflow flag can be copied to AL
        !            24:  * with a setto %AL instr and the other flags copied to AH with an
        !            25:  * lahf instr).
        !            26:  *
        !            27:  * The 68k CZNV flags are thus assinged in cznv as:
        !            28:  *
        !            29:  * <--AL-->  <--AH-->
        !            30:  * 76543210  FEDCBA98 --------- ---------
        !            31:  * xxxxxxxV  NZxxxxxC xxxxxxxxx xxxxxxxxx
        !            32:  */
        !            33: 
        !            34: #define FLAGBIT_N      15
        !            35: #define FLAGBIT_Z      14
        !            36: #define FLAGBIT_C      8
        !            37: #define FLAGBIT_V      0
        !            38: #define FLAGBIT_X      8
        !            39: 
        !            40: #define FLAGVAL_N      (1 << FLAGBIT_N)
        !            41: #define FLAGVAL_Z      (1 << FLAGBIT_Z)
        !            42: #define FLAGVAL_C      (1 << FLAGBIT_C)
        !            43: #define FLAGVAL_V      (1 << FLAGBIT_V)
        !            44: #define FLAGVAL_X      (1 << FLAGBIT_X)
        !            45: 
        !            46: #define SET_ZFLG(y)    (regflags.cznv = (regflags.cznv & ~FLAGVAL_Z) | (((y) ? 1 : 0) << FLAGBIT_Z))
        !            47: #define SET_CFLG(y)    (regflags.cznv = (regflags.cznv & ~FLAGVAL_C) | (((y) ? 1 : 0) << FLAGBIT_C))
        !            48: #define SET_VFLG(y)    (regflags.cznv = (regflags.cznv & ~FLAGVAL_V) | (((y) ? 1 : 0) << FLAGBIT_V))
        !            49: #define SET_NFLG(y)    (regflags.cznv = (regflags.cznv & ~FLAGVAL_N) | (((y) ? 1 : 0) << FLAGBIT_N))
        !            50: #define SET_XFLG(y)    (regflags.x    = ((y) ? 1 : 0) << FLAGBIT_X)
        !            51: 
        !            52: #define GET_ZFLG()     ((regflags.cznv >> FLAGBIT_Z) & 1)
        !            53: #define GET_CFLG()     ((regflags.cznv >> FLAGBIT_C) & 1)
        !            54: #define GET_VFLG()     ((regflags.cznv >> FLAGBIT_V) & 1)
        !            55: #define GET_NFLG()     ((regflags.cznv >> FLAGBIT_N) & 1)
        !            56: #define GET_XFLG()     ((regflags.x    >> FLAGBIT_X) & 1)
        !            57: 
        !            58: #define CLEAR_CZNV()   (regflags.cznv  = 0)
        !            59: #define GET_CZNV()     (regflags.cznv)
        !            60: #define IOR_CZNV(X)    (regflags.cznv |= (X))
        !            61: #define SET_CZNV(X)    (regflags.cznv  = (X))
        !            62: 
        !            63: #define COPY_CARRY() (regflags.x = regflags.cznv)
        !            64: 
        !            65: 
        !            66: /*
        !            67:  * Test CCR condition
        !            68:  */
        !            69: STATIC_INLINE int cctrue (int cc)
        !            70: {
        !            71:     uae_u32 cznv = regflags.cznv;
        !            72: 
        !            73:     switch (cc) {
        !            74:        case 0:  return 1;                                                              /*                              T  */
        !            75:        case 1:  return 0;                                                              /*                              F  */
        !            76:        case 2:  return (cznv & (FLAGVAL_C | FLAGVAL_Z)) == 0;                          /* !CFLG && !ZFLG               HI */
        !            77:        case 3:  return (cznv & (FLAGVAL_C | FLAGVAL_Z)) != 0;                          /*  CFLG || ZFLG                LS */
        !            78:        case 4:  return (cznv & FLAGVAL_C) == 0;                                        /* !CFLG                        CC */
        !            79:        case 5:  return (cznv & FLAGVAL_C) != 0;                                        /*  CFLG                        CS */
        !            80:        case 6:  return (cznv & FLAGVAL_Z) == 0;                                        /* !ZFLG                        NE */
        !            81:        case 7:  return (cznv & FLAGVAL_Z) != 0;                                        /*  ZFLG                        EQ */
        !            82:        case 8:  return (cznv & FLAGVAL_V) == 0;                                        /* !VFLG                        VC */
        !            83:        case 9:  return (cznv & FLAGVAL_V) != 0;                                        /*  VFLG                        VS */
        !            84:        case 10: return (cznv & FLAGVAL_N) == 0;                                        /* !NFLG                        PL */
        !            85:        case 11: return (cznv & FLAGVAL_N) != 0;                                        /*  NFLG                        MI */
        !            86:        case 12: return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & FLAGVAL_N) == 0;  /*  NFLG == VFLG                GE */
        !            87:        case 13: return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & FLAGVAL_N) != 0;  /*  NFLG != VFLG                LT */
        !            88:        case 14: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V);                           /* ZFLG && (NFLG == VFLG)       GT */
        !            89:                 return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & (FLAGVAL_N | FLAGVAL_Z)) == 0;
        !            90:        case 15: cznv &= (FLAGVAL_N | FLAGVAL_Z | FLAGVAL_V);                           /* ZFLG && (NFLG != VFLG)       LE */
        !            91:                 return (((cznv << (FLAGBIT_N - FLAGBIT_V)) ^ cznv) & (FLAGVAL_N | FLAGVAL_Z)) != 0;
        !            92:     }
        !            93:     return 0;
        !            94: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.