Skip to content
体验新版
项目
组织
正在加载...
登录
切换导航
打开侧边栏
OpenHarmony
Third Party Openssl
提交
cde245bd
T
Third Party Openssl
项目概览
OpenHarmony
/
Third Party Openssl
1 年多 前同步成功
通知
9
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看板
提交
cde245bd
编写于
3月 18, 2000
作者:
R
Richard Levitte
浏览文件
操作
浏览文件
下载
电子邮件补丁
差异文件
Small bugs in the test scripts removed.
上级
1f515cfe
变更
2
隐藏空白更改
内联
并排
Showing
2 changed file
with
6 addition
and
6 deletion
+6
-6
test/testenc.com
test/testenc.com
+2
-2
test/testssl.com
test/testssl.com
+4
-4
未找到文件。
test/testenc.com
浏览文件 @
cde245bd
...
...
@@ -28,9 +28,9 @@ $ backup/compare 'test' 'test'-clear
$ if $severity .ne. 1 then exit 3
$ delete 'test'-cipher;*,'test'-clear;*
$
$ define/user sys$output 'test'-cipher-commands
.
$ define/user sys$output 'test'-cipher-commands
$ 'cmd' list-cipher-commands
$ open/read f 'test'-cipher-commands
.
$ open/read f 'test'-cipher-commands
$ loop_cipher_commands:
$ read/end=loop_cipher_commands_end f i
$ write sys$output i
...
...
test/testssl.com
浏览文件 @
cde245bd
...
...
@@ -19,12 +19,12 @@ $ cert=p2
$ endif
$ ssltest := mcr 'texe_dir'ssltest -key 'key' -cert 'cert' -c_key 'key' -c_cert 'cert'
$
$ define/user sys$output test
-ssltest
-output.
$ define/user sys$output test
ssl-x509
-output.
$ define/user sys$error nla0:
$ mcr 'exe_dir'openssl x509 -in 'cert' -text -noout
$ set noon
$ define/user sys$error nla0:
$ search/output=nla0: testssl-
ssltest
-output. "DSA Public Key"/exact
$ search/output=nla0: testssl-
x509
-output. "DSA Public Key"/exact
$ if $severity .eq. 1
$ then
$ dsa_cert := YES
...
...
@@ -32,7 +32,7 @@ $ else
$ dsa_cert := NO
$ endif
$ set on
$ delete testssl-
ssltest
-output.;*
$ delete testssl-
x509
-output.;*
$
$ if p3 .eqs. ""
$ then
...
...
@@ -186,5 +186,5 @@ $ goto exit
$ exit3:
$ RET = 3
$ exit:
$ delete certs.tmp;*
$
if p3 .eqs. "" then
delete certs.tmp;*
$ exit 'RET'
编辑
预览
Markdown
is supported
0%
请重试
或
添加新附件
.
添加附件
取消
You are about to add
0
people
to the discussion. Proceed with caution.
先完成此消息的编辑!
取消
想要评论请
注册
或
登录