Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
OpenHarmony
Third Party Openssl
提交
a61710b8
T
Third Party Openssl
项目概览
OpenHarmony
/
Third Party Openssl
12 个月 前同步成功
通知
8
Star
18
Fork
1
代码
文件
提交
分支
Tags
贡献者
分支图
Diff
Issue
0
列表
看板
标记
里程碑
合并请求
0
Wiki
0
Wiki
分析
仓库
DevOps
项目成员
Pages
T
Third Party Openssl
项目概览
项目概览
详情
发布
仓库
仓库
文件
提交
分支
标签
贡献者
分支图
比较
Issue
0
Issue
0
列表
看板
标记
里程碑
合并请求
0
合并请求
0
Pages
分析
分析
仓库分析
DevOps
Wiki
0
Wiki
成员
成员
收起侧边栏
关闭侧边栏
动态
分支图
创建新Issue
提交
Issue看板
体验新版 GitCode,发现更多精彩内容 >>
提交
a61710b8
编写于
7月 23, 2007
作者:
A
Andy Polyakov
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
Allow for option to skip hardware support.
上级
20f7563f
变更
1
隐藏空白更改
内联
并排
Showing
1 changed file
with
22 addition
and
9 deletion
+22
-9
crypto/aes/asm/aes-s390x.pl
crypto/aes/asm/aes-s390x.pl
+22
-9
未找到文件。
crypto/aes/asm/aes-s390x.pl
浏览文件 @
a61710b8
...
...
@@ -31,6 +31,8 @@
# Implement AES_set_[en|de]crypt_key. Key schedule setup is avoided
# for 128-bit keys, if hardware support is detected.
$softonly
=
0
;
# allow hardware support
$t1
=
"
%r0
";
$t2
=
"
%r1
";
$t3
=
"
%r2
";
$inp
=
"
%r2
";
...
...
@@ -171,6 +173,8 @@ $code.=<<___;
.type AES_encrypt,\@function
AES_encrypt:
stg $ra,112($sp)
___
$code
.=<<
___
if
(
!
$softonly
);
lghi
%r0
,
10
c
%r0
,
240
(
$key
)
jne
.
Lesoft
...
...
@@ -199,10 +203,11 @@ AES_encrypt:
bras
$ra
,
.
Lekey_internal
# postponed key schedule setup
lmg
$inp
,
$key
,
16
(
$sp
)
.
Lesoft:
___
$code
.=
<<___;
stmg %r3,%r13,24($sp)
bras $tbl,1f
1: aghi $tbl,AES_Te-.
larl $tbl,AES_Te
llgf $s0,0($inp)
llgf $s1,4($inp)
...
...
@@ -493,6 +498,8 @@ $code.=<<___;
.type AES_decrypt,\@function
AES_decrypt:
stg $ra,112($sp)
___
$code
.=<<
___
if
(
!
$softonly
);
lghi
%r0
,
10
c
%r0
,
240
(
$key
)
jne
.
Ldsoft
...
...
@@ -522,10 +529,11 @@ AES_decrypt:
bras
$ra
,
.
Ldkey_internal
# postponed key schedule setup
lmg
$inp
,
$key
,
16
(
$sp
)
.
Ldsoft:
___
$code
.=
<<___;
stmg %r3,%r13,24($sp)
bras $tbl,1f
1: aghi $tbl,AES_Td-.
larl $tbl,AES_Td
llgf $s0,0($inp)
llgf $s1,4($inp)
...
...
@@ -731,6 +739,8 @@ AES_set_encrypt_key:
.align 4
.Lproceed128:
___
$code
.=<<
___
if
(
!
$softonly
);
lghi
%r0
,
0
# query capability vector
la
%r1
,
16
(
$sp
)
.
long
0xb92e0042
# km %r4,%r2
...
...
@@ -745,13 +755,13 @@ AES_set_encrypt_key:
st
$t1
,
240
(
$key
)
lghi
%r2
,
0
br
%r14
___
$code
.=
<<___;
.align 16
.Lekey_internal:
stmg %r6,%r13,48($sp) # all non-volatile regs
bras $tbl,1f
1: aghi $tbl,AES_Te+2048-.
larl $tbl,AES_Te+2048
llgf $s0,0($inp)
llgf $s1,4($inp)
...
...
@@ -914,7 +924,7 @@ AES_set_encrypt_key:
la $i1,0($i1,$tbl)
la $i2,0($i2,$tbl)
la $i3,0($i3,$tbl)
icm $t2,1
,0($t2) # Te4[rk[11]>>0]
llgc $t2
,0($t2) # Te4[rk[11]>>0]
icm $t2,2,0($i1) # Te4[rk[11]>>8]<<8
icm $t2,4,0($i2) # Te4[rk[11]>>16]<<16
icm $t2,8,0($i3) # Te4[rk[11]>>24]<<24
...
...
@@ -949,7 +959,8 @@ AES_set_decrypt_key:
lg $ra,112($sp)
ltgr %r2,%r2
bnzr $ra
___
$code
.=<<
___
if
(
!
$softonly
);
lghi
$t1
,
10
c
$t1
,
240
(
$key
)
jne
.
Lgo
...
...
@@ -969,6 +980,8 @@ AES_set_decrypt_key:
bras
$ra
,
.
Lekey_internal
lg
$key
,
32
(
$sp
)
lg
$ra
,
40
(
$sp
)
___
$code
.=
<<___;
.Lgo: llgf $rounds,240($key)
la $i1,0($key)
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录