qdev: split out UI portions into a new function
[qemu.git] / target-sparc / helper.c
1 /*
2 * Misc Sparc helpers
3 *
4 * Copyright (c) 2003-2005 Fabrice Bellard
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, see <http://www.gnu.org/licenses/>.
18 */
19
20 #include "cpu.h"
21 #include "host-utils.h"
22 #include "helper.h"
23 #include "sysemu.h"
24
25 void helper_raise_exception(CPUState *env, int tt)
26 {
27 env->exception_index = tt;
28 cpu_loop_exit(env);
29 }
30
31 void helper_debug(CPUState *env)
32 {
33 env->exception_index = EXCP_DEBUG;
34 cpu_loop_exit(env);
35 }
36
37 #ifdef TARGET_SPARC64
38 target_ulong helper_popc(target_ulong val)
39 {
40 return ctpop64(val);
41 }
42
43 void helper_tick_set_count(void *opaque, uint64_t count)
44 {
45 #if !defined(CONFIG_USER_ONLY)
46 cpu_tick_set_count(opaque, count);
47 #endif
48 }
49
50 uint64_t helper_tick_get_count(void *opaque)
51 {
52 #if !defined(CONFIG_USER_ONLY)
53 return cpu_tick_get_count(opaque);
54 #else
55 return 0;
56 #endif
57 }
58
59 void helper_tick_set_limit(void *opaque, uint64_t limit)
60 {
61 #if !defined(CONFIG_USER_ONLY)
62 cpu_tick_set_limit(opaque, limit);
63 #endif
64 }
65 #endif
66
67 static target_ulong helper_udiv_common(CPUState *env, target_ulong a,
68 target_ulong b, int cc)
69 {
70 int overflow = 0;
71 uint64_t x0;
72 uint32_t x1;
73
74 x0 = (a & 0xffffffff) | ((int64_t) (env->y) << 32);
75 x1 = (b & 0xffffffff);
76
77 if (x1 == 0) {
78 helper_raise_exception(env, TT_DIV_ZERO);
79 }
80
81 x0 = x0 / x1;
82 if (x0 > 0xffffffff) {
83 x0 = 0xffffffff;
84 overflow = 1;
85 }
86
87 if (cc) {
88 env->cc_dst = x0;
89 env->cc_src2 = overflow;
90 env->cc_op = CC_OP_DIV;
91 }
92 return x0;
93 }
94
95 target_ulong helper_udiv(CPUState *env, target_ulong a, target_ulong b)
96 {
97 return helper_udiv_common(env, a, b, 0);
98 }
99
100 target_ulong helper_udiv_cc(CPUState *env, target_ulong a, target_ulong b)
101 {
102 return helper_udiv_common(env, a, b, 1);
103 }
104
105 static target_ulong helper_sdiv_common(CPUState *env, target_ulong a,
106 target_ulong b, int cc)
107 {
108 int overflow = 0;
109 int64_t x0;
110 int32_t x1;
111
112 x0 = (a & 0xffffffff) | ((int64_t) (env->y) << 32);
113 x1 = (b & 0xffffffff);
114
115 if (x1 == 0) {
116 helper_raise_exception(env, TT_DIV_ZERO);
117 }
118
119 x0 = x0 / x1;
120 if ((int32_t) x0 != x0) {
121 x0 = x0 < 0 ? 0x80000000 : 0x7fffffff;
122 overflow = 1;
123 }
124
125 if (cc) {
126 env->cc_dst = x0;
127 env->cc_src2 = overflow;
128 env->cc_op = CC_OP_DIV;
129 }
130 return x0;
131 }
132
133 target_ulong helper_sdiv(CPUState *env, target_ulong a, target_ulong b)
134 {
135 return helper_sdiv_common(env, a, b, 0);
136 }
137
138 target_ulong helper_sdiv_cc(CPUState *env, target_ulong a, target_ulong b)
139 {
140 return helper_sdiv_common(env, a, b, 1);
141 }