Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
OpenHarmony
Third Party Openssl
提交
cc373a37
T
Third Party Openssl
项目概览
OpenHarmony
/
Third Party Openssl
1 年多 前同步成功
通知
10
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看板
提交
cc373a37
编写于
1月 28, 2016
作者:
R
Rich Salz
提交者:
Rich Salz
1月 28, 2016
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
Remove extraneous output from util/mk scripts
Reviewed-by:
N
Richard Levitte
<
levitte@openssl.org
>
上级
45bf87a0
变更
2
隐藏空白更改
内联
并排
Showing
2 changed file
with
9 addition
and
13 deletion
+9
-13
util/mkdef.pl
util/mkdef.pl
+9
-12
util/mkerr.pl
util/mkerr.pl
+0
-1
未找到文件。
util/mkdef.pl
浏览文件 @
cc373a37
...
...
@@ -1028,7 +1028,8 @@ sub reduce_platforms
return
$ret
;
}
sub
info_string
{
sub
info_string
{
(
my
$symbol
,
my
$exist
,
my
$platforms
,
my
$kind
,
my
$algorithms
)
=
@_
;
my
%a
=
defined
(
$algorithms
)
?
...
...
@@ -1046,13 +1047,13 @@ sub info_string {
return
$ret
;
}
sub
maybe_add_info
{
sub
maybe_add_info
{
(
my
$name
,
*nums
,
my
@symbols
)
=
@_
;
my
$sym
;
my
$new_info
=
0
;
my
%syms
=
();
print
STDERR
"
Updating
$name
info
\n
";
foreach
$sym
(
@symbols
)
{
(
my
$s
,
my
$i
)
=
split
/\\/
,
$sym
;
if
(
defined
(
$nums
{
$s
}))
{
...
...
@@ -1076,12 +1077,11 @@ sub maybe_add_info {
}
}
if
(
$new_info
)
{
print
STDERR
"
$n
ew_info
old symbols got an info update
\n
";
print
STDERR
"
$n
ame
:
$new_info
old symbols have updated info
\n
";
if
(
!
$do_rewrite
)
{
print
STDERR
"
You should do a rewrite to fix this.
\n
";
}
}
else
{
print
STDERR
"
No old symbols needed info update
\n
";
}
}
...
...
@@ -1171,7 +1171,8 @@ sub print_test_file
}
}
sub
get_version
{
sub
get_version
{
return
$config
{
version
};
}
...
...
@@ -1431,8 +1432,6 @@ sub rewrite_numbers
(
*OUT
,
$name
,
*nums
,
@symbols
)
=
@_
;
my
$thing
;
print
STDERR
"
Rewriting
$name
\n
";
my
@r
=
grep
(
/^\w+(\{[0-9]+\})?\\.*?:.*?:\w+\(\w+\)/
,
@symbols
);
my
$r
;
my
%r
;
my
%rsyms
;
foreach
$r
(
@r
)
{
...
...
@@ -1481,8 +1480,6 @@ sub update_numbers
(
$basevers
,
$vers
)
=
get_openssl_version
();
print
STDERR
"
Updating
$name
numbers
\n
";
my
@r
=
grep
(
/^\w+(\{[0-9]+\})?\\.*?:.*?:\w+\(\w+\)/
,
@symbols
);
my
$r
;
my
%r
;
my
%rsyms
;
foreach
$r
(
@r
)
{
...
...
@@ -1512,9 +1509,9 @@ sub update_numbers
}
}
if
(
$new_syms
)
{
print
STDERR
"
$n
ew_syms
New symbols added
\n
";
print
STDERR
"
$n
ame
: Added
$new_syms
new symbols
\n
";
}
else
{
print
STDERR
"
No New symbols A
dded
\n
";
print
STDERR
"
$name
: No new symbols a
dded
\n
";
}
}
...
...
util/mkerr.pl
浏览文件 @
cc373a37
...
...
@@ -384,7 +384,6 @@ foreach $lib (keys %csrc)
my
$hfile
=
$hinc
{
$lib
};
my
$cfile
=
$csrc
{
$lib
};
if
(
!
$fnew
{
$lib
}
&&
!
$rnew
{
$lib
})
{
print
STDERR
"
$lib
:
\t\t
No new error codes
\n
";
next
unless
$rebuild
;
}
else
{
print
STDERR
"
$lib
:
\t\t
$fnew
{
$lib
} New Functions,
";
...
...
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录