Statistics
| Branch: | Revision:

root / target-alpha / op_template.h @ 5fafdf24

History | View | Annotate | Download (3.2 kB)

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
void OPPROTO glue(op_reset_FT, REG) (void)
30
{
31
    glue(FT, REG) = 0;
32
    RETURN();
33
}
34

    
35
/* XXX: This can be great on most RISC machines */
36
#if !defined(__i386__) && !defined(__x86_64__)
37
void OPPROTO glue(op_set_s16_T, REG) (void)
38
{
39
    glue(T, REG) = (int16_t)PARAM(1);
40
    RETURN();
41
}
42

    
43
void OPPROTO glue(op_set_u16_T, REG) (void)
44
{
45
    glue(T, REG) = (uint16_t)PARAM(1);
46
    RETURN();
47
}
48
#endif
49

    
50
void OPPROTO glue(op_set_s32_T, REG) (void)
51
{
52
    glue(T, REG) = (int32_t)PARAM(1);
53
    RETURN();
54
}
55

    
56
void OPPROTO glue(op_set_u32_T, REG) (void)
57
{
58
    glue(T, REG) = (uint32_t)PARAM(1);
59
    RETURN();
60
}
61

    
62
#if 0 // Qemu does not know how to do this...
63
void OPPROTO glue(op_set_64_T, REG) (void)
64
{
65
    glue(T, REG) = (int64_t)PARAM(1);
66
    RETURN();
67
}
68
#else
69
void OPPROTO glue(op_set_64_T, REG) (void)
70
{
71
    glue(T, REG) = ((int64_t)PARAM(1) << 32) | (int64_t)PARAM(2);
72
    RETURN();
73
}
74
#endif
75

    
76
#endif /* REG < 3 */
77

    
78
/* Fixed-point register moves */
79
#if REG < 31
80
void OPPROTO glue(op_load_T0_ir, REG) (void)
81
{
82
    T0 = env->ir[REG];
83
    RETURN();
84
}
85

    
86
void OPPROTO glue(op_load_T1_ir, REG) (void)
87
{
88
    T1 = env->ir[REG];
89
    RETURN();
90
}
91

    
92
void OPPROTO glue(op_load_T2_ir, REG) (void)
93
{
94
    T2 = env->ir[REG];
95
    RETURN();
96
}
97

    
98
void OPPROTO glue(op_store_T0_ir, REG) (void)
99
{
100
    env->ir[REG] = T0;
101
    RETURN();
102
}
103

    
104
void OPPROTO glue(op_store_T1_ir, REG) (void)
105
{
106
    env->ir[REG] = T1;
107
    RETURN();
108
}
109

    
110
void OPPROTO glue(op_store_T2_ir, REG) (void)
111
{
112
    env->ir[REG] = T2;
113
    RETURN();
114
}
115

    
116
void OPPROTO glue(op_cmov_ir, REG) (void)
117
{
118
    if (T0)
119
        env->ir[REG] = T1;
120
    RETURN();
121
}
122

    
123
/* floating point registers moves */
124
void OPPROTO glue(op_load_FT0_fir, REG) (void)
125
{
126
    FT0 = env->fir[REG];
127
    RETURN();
128
}
129

    
130
void OPPROTO glue(op_load_FT1_fir, REG) (void)
131
{
132
    FT1 = env->fir[REG];
133
    RETURN();
134
}
135

    
136
void OPPROTO glue(op_load_FT2_fir, REG) (void)
137
{
138
    FT2 = env->fir[REG];
139
    RETURN();
140
}
141

    
142
void OPPROTO glue(op_store_FT0_fir, REG) (void)
143
{
144
    env->fir[REG] = FT0;
145
    RETURN();
146
}
147

    
148
void OPPROTO glue(op_store_FT1_fir, REG) (void)
149
{
150
    env->fir[REG] = FT1;
151
    RETURN();
152
}
153

    
154
void OPPROTO glue(op_store_FT2_fir, REG) (void)
155
{
156
    env->fir[REG] = FT2;
157
    RETURN();
158
}
159

    
160
void OPPROTO glue(op_cmov_fir, REG) (void)
161
{
162
    helper_cmov_fir(REG);
163
    RETURN();
164
}
165
#endif /* REG < 31 */
166

    
167
#undef REG