Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
openeuler
qemu
提交
145cdb40
Q
qemu
项目概览
openeuler
/
qemu
通知
10
Star
0
Fork
0
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
0
列表
看板
标记
里程碑
合并请求
0
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
Q
qemu
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
0
Issue
0
列表
看板
标记
里程碑
合并请求
0
合并请求
0
Pages
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
145cdb40
编写于
8月 22, 2012
作者:
R
Richard Henderson
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
target-s390: Convert STNSM, STOSM
Signed-off-by:
N
Richard Henderson
<
rth@twiddle.net
>
上级
a05d2b6b
变更
2
隐藏空白更改
内联
并排
Showing
2 changed file
with
29 addition
and
18 deletion
+29
-18
target-s390x/insn-data.def
target-s390x/insn-data.def
+4
-0
target-s390x/translate.c
target-s390x/translate.c
+25
-18
未找到文件。
target-s390x/insn-data.def
浏览文件 @
145cdb40
...
...
@@ -444,4 +444,8 @@
C(0x010e, SAM64, E, Z, 0, 0, 0, 0, 0, 0)
/* SET SYSTEM MASK */
C(0x8000, SSM, S, Z, 0, m2_8u, 0, 0, ssm, 0)
/* STORE THEN AND SYSTEM MASK */
C(0xac00, STNSM, SI, Z, la1, 0, 0, 0, stnosm, 0)
/* STORE THEN OR SYSTEM MASK */
C(0xad00, STOSM, SI, Z, la1, 0, 0, 0, stnosm, 0)
#endif /* CONFIG_USER_ONLY */
target-s390x/translate.c
浏览文件 @
145cdb40
...
...
@@ -2226,7 +2226,7 @@ static void disas_s390_insn(CPUS390XState *env, DisasContext *s)
TCGv_i32
tmp32_1
,
tmp32_2
;
unsigned
char
opc
;
uint64_t
insn
;
int
op
,
r1
,
r2
,
r3
,
d1
,
d2
,
x2
,
b1
,
b2
,
i2
,
r1b
;
int
op
,
r1
,
r2
,
r3
,
d1
,
d2
,
x2
,
b1
,
b2
,
r1b
;
TCGv_i32
vl
;
opc
=
cpu_ldub_code
(
env
,
s
->
pc
);
...
...
@@ -2284,23 +2284,6 @@ static void disas_s390_insn(CPUS390XState *env, DisasContext *s)
tcg_temp_free_i32
(
tmp32_2
);
break
;
#ifndef CONFIG_USER_ONLY
case
0xac
:
/* STNSM D1(B1),I2 [SI] */
case
0xad
:
/* STOSM D1(B1),I2 [SI] */
check_privileged
(
s
);
insn
=
ld_code4
(
env
,
s
->
pc
);
tmp
=
decode_si
(
s
,
insn
,
&
i2
,
&
b1
,
&
d1
);
tmp2
=
tcg_temp_new_i64
();
tcg_gen_shri_i64
(
tmp2
,
psw_mask
,
56
);
tcg_gen_qemu_st8
(
tmp2
,
tmp
,
get_mem_index
(
s
));
if
(
opc
==
0xac
)
{
tcg_gen_andi_i64
(
psw_mask
,
psw_mask
,
((
uint64_t
)
i2
<<
56
)
|
0x00ffffffffffffffULL
);
}
else
{
tcg_gen_ori_i64
(
psw_mask
,
psw_mask
,
(
uint64_t
)
i2
<<
56
);
}
tcg_temp_free_i64
(
tmp
);
tcg_temp_free_i64
(
tmp2
);
break
;
case
0xae
:
/* SIGP R1,R3,D2(B2) [RS] */
check_privileged
(
s
);
insn
=
ld_code4
(
env
,
s
->
pc
);
...
...
@@ -3485,6 +3468,30 @@ static ExitStatus op_ssm(DisasContext *s, DisasOps *o)
tcg_gen_deposit_i64
(
psw_mask
,
psw_mask
,
o
->
in2
,
56
,
8
);
return
NO_EXIT
;
}
static
ExitStatus
op_stnosm
(
DisasContext
*
s
,
DisasOps
*
o
)
{
uint64_t
i2
=
get_field
(
s
->
fields
,
i2
);
TCGv_i64
t
;
check_privileged
(
s
);
/* It is important to do what the instruction name says: STORE THEN.
If we let the output hook perform the store then if we fault and
restart, we'll have the wrong SYSTEM MASK in place. */
t
=
tcg_temp_new_i64
();
tcg_gen_shri_i64
(
t
,
psw_mask
,
56
);
tcg_gen_qemu_st8
(
t
,
o
->
addr1
,
get_mem_index
(
s
));
tcg_temp_free_i64
(
t
);
if
(
s
->
fields
->
op
==
0xac
)
{
tcg_gen_andi_i64
(
psw_mask
,
psw_mask
,
(
i2
<<
56
)
|
0x00ffffffffffffffull
);
}
else
{
tcg_gen_ori_i64
(
psw_mask
,
psw_mask
,
i2
<<
56
);
}
return
NO_EXIT
;
}
#endif
static
ExitStatus
op_st8
(
DisasContext
*
s
,
DisasOps
*
o
)
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录