Return to op_template.h CVS log

Up to [Qemu by Fabrice Bellard] / qemu / target-alpha

Annotation of qemu/target-alpha/op_template.h, revision 1.1

1.1     ! root        1: /*
        !             2:  *  Alpha emulation cpu micro-operations templates for qemu.
        !             3:  *
        !             4:  *  Copyright (c) 2007 Jocelyn Mayer
        !             5:  *
        !             6:  * This library is free software; you can redistribute it and/or
        !             7:  * modify it under the terms of the GNU Lesser General Public
        !             8:  * License as published by the Free Software Foundation; either
        !             9:  * version 2 of the License, or (at your option) any later version.
        !            10:  *
        !            11:  * This library is distributed in the hope that it will be useful,
        !            12:  * but WITHOUT ANY WARRANTY; without even the implied warranty of
        !            13:  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
        !            14:  * Lesser General Public License for more details.
        !            15:  *
        !            16:  * You should have received a copy of the GNU Lesser General Public
        !            17:  * License along with this library; if not, write to the Free Software
        !            18:  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
        !            19:  */
        !            20: 
        !            21: /* Optimized constant loads */
        !            22: #if REG < 3
        !            23: void OPPROTO glue(op_reset_T, REG) (void)
        !            24: {
        !            25:     glue(T, REG) = 0;
        !            26:     RETURN();
        !            27: }
        !            28: 
        !            29: #if !defined(HOST_SPARC) && !defined(HOST_SPARC64)
        !            30: void OPPROTO glue(op_reset_FT, REG) (void)
        !            31: {
        !            32:     glue(FT, REG) = 0;
        !            33:     RETURN();
        !            34: }
        !            35: #else
        !            36: void OPPROTO glue(op_reset_FT, REG) (void)
        !            37: {
        !            38:     glue(helper_reset_FT, REG)();
        !            39:     RETURN();
        !            40: }
        !            41: #endif
        !            42: 
        !            43: /* XXX: This can be great on most RISC machines */
        !            44: #if !defined(__i386__) && !defined(__x86_64__)
        !            45: void OPPROTO glue(op_set_s16_T, REG) (void)
        !            46: {
        !            47:     glue(T, REG) = (int16_t)PARAM(1);
        !            48:     RETURN();
        !            49: }
        !            50: 
        !            51: void OPPROTO glue(op_set_u16_T, REG) (void)
        !            52: {
        !            53:     glue(T, REG) = (uint16_t)PARAM(1);
        !            54:     RETURN();
        !            55: }
        !            56: #endif
        !            57: 
        !            58: void OPPROTO glue(op_set_s32_T, REG) (void)
        !            59: {
        !            60:     glue(T, REG) = (int32_t)PARAM(1);
        !            61:     RETURN();
        !            62: }
        !            63: 
        !            64: void OPPROTO glue(op_set_u32_T, REG) (void)
        !            65: {
        !            66:     glue(T, REG) = (uint32_t)PARAM(1);
        !            67:     RETURN();
        !            68: }
        !            69: 
        !            70: #if 0 // Qemu does not know how to do this...
        !            71: void OPPROTO glue(op_set_64_T, REG) (void)
        !            72: {
        !            73:     glue(T, REG) = (int64_t)PARAM(1);
        !            74:     RETURN();
        !            75: }
        !            76: #else
        !            77: void OPPROTO glue(op_set_64_T, REG) (void)
        !            78: {
        !            79:     glue(T, REG) = ((int64_t)PARAM(1) << 32) | (int64_t)PARAM(2);
        !            80:     RETURN();
        !            81: }
        !            82: #endif
        !            83: 
        !            84: #endif /* REG < 3 */
        !            85: 
        !            86: /* Fixed-point register moves */
        !            87: #if REG < 31
        !            88: void OPPROTO glue(op_load_T0_ir, REG) (void)
        !            89: {
        !            90:     T0 = env->ir[REG];
        !            91:     RETURN();
        !            92: }
        !            93: 
        !            94: void OPPROTO glue(op_load_T1_ir, REG) (void)
        !            95: {
        !            96:     T1 = env->ir[REG];
        !            97:     RETURN();
        !            98: }
        !            99: 
        !           100: void OPPROTO glue(op_load_T2_ir, REG) (void)
        !           101: {
        !           102:     T2 = env->ir[REG];
        !           103:     RETURN();
        !           104: }
        !           105: 
        !           106: void OPPROTO glue(op_store_T0_ir, REG) (void)
        !           107: {
        !           108:     env->ir[REG] = T0;
        !           109:     RETURN();
        !           110: }
        !           111: 
        !           112: void OPPROTO glue(op_store_T1_ir, REG) (void)
        !           113: {
        !           114:     env->ir[REG] = T1;
        !           115:     RETURN();
        !           116: }
        !           117: 
        !           118: void OPPROTO glue(op_store_T2_ir, REG) (void)
        !           119: {
        !           120:     env->ir[REG] = T2;
        !           121:     RETURN();
        !           122: }
        !           123: 
        !           124: void OPPROTO glue(op_cmov_ir, REG) (void)
        !           125: {
        !           126:     if (T0)
        !           127:         env->ir[REG] = T1;
        !           128:     RETURN();
        !           129: }
        !           130: 
        !           131: /* floating point registers moves */
        !           132: void OPPROTO glue(op_load_FT0_fir, REG) (void)
        !           133: {
        !           134:     FT0 = env->fir[REG];
        !           135:     RETURN();
        !           136: }
        !           137: 
        !           138: void OPPROTO glue(op_load_FT1_fir, REG) (void)
        !           139: {
        !           140:     FT1 = env->fir[REG];
        !           141:     RETURN();
        !           142: }
        !           143: 
        !           144: void OPPROTO glue(op_load_FT2_fir, REG) (void)
        !           145: {
        !           146:     FT2 = env->fir[REG];
        !           147:     RETURN();
        !           148: }
        !           149: 
        !           150: void OPPROTO glue(op_store_FT0_fir, REG) (void)
        !           151: {
        !           152:     env->fir[REG] = FT0;
        !           153:     RETURN();
        !           154: }
        !           155: 
        !           156: void OPPROTO glue(op_store_FT1_fir, REG) (void)
        !           157: {
        !           158:     env->fir[REG] = FT1;
        !           159:     RETURN();
        !           160: }
        !           161: 
        !           162: void OPPROTO glue(op_store_FT2_fir, REG) (void)
        !           163: {
        !           164:     env->fir[REG] = FT2;
        !           165:     RETURN();
        !           166: }
        !           167: 
        !           168: void OPPROTO glue(op_cmov_fir, REG) (void)
        !           169: {
        !           170:     helper_cmov_fir(REG);
        !           171:     RETURN();
        !           172: }
        !           173: #endif /* REG < 31 */
        !           174: 
        !           175: #undef REG

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