diff options
author | Richard Levitte <levitte@openssl.org> | 2016-12-07 22:44:47 +0100 |
---|---|---|
committer | Richard Levitte <richard@levitte.org> | 2016-12-08 13:32:47 +0100 |
commit | b1bbee13d9f4e55a8f5592c417dd336012cbeebe (patch) | |
tree | d8394d488a0b7aa6d1fb92e91b052b95dc8719df /test | |
parent | aff927e84c3bce5b7ebc2cc72f99a571ea89c2b1 (diff) |
Add a test for the UI API
The best way to test the UI interface is currently by using an openssl
command that uses password_callback. The only one that does this is
'genrsa'.
Since password_callback uses a UI method derived from UI_OpenSSL(), it
ensures that one gets tested well enough as well.
Reviewed-by: Rich Salz <rsalz@openssl.org>
(Merged from https://github.com/openssl/openssl/pull/2040)
(cherry picked from commit 17ac8eaf611b588cca251ba63b187e7d9c7edb83)
Diffstat (limited to 'test')
-rw-r--r-- | test/recipes/03-test_ui.t | 30 |
1 files changed, 30 insertions, 0 deletions
diff --git a/test/recipes/03-test_ui.t b/test/recipes/03-test_ui.t new file mode 100644 index 0000000000..b1065d1bdb --- /dev/null +++ b/test/recipes/03-test_ui.t @@ -0,0 +1,30 @@ +#! /usr/bin/env perl +# Copyright 2015-2016 The OpenSSL Project Authors. All Rights Reserved. +# +# Licensed under the OpenSSL license (the "License"). You may not use +# this file except in compliance with the License. You can obtain a copy +# in the file LICENSE in the source distribution or at +# https://www.openssl.org/source/license.html + +use strict; +use warnings; +use OpenSSL::Test; + +setup("test_ui"); + +plan tests => 1; + +note <<"EOF"; +The best way to test the UI interface is currently by using an openssl +command that uses password_callback. The only one that does this is +'genrsa'. +Since password_callback uses a UI method derived from UI_OpenSSL(), it +ensures that one gets tested well enough as well. +EOF + +my $outfile = "rsa_$$.pem"; +ok(run(app(["openssl", "genrsa", "-passout", "pass:password", "-aes128", + "-out", $outfile])), + "Checking that genrsa with a password works properly"); + +unlink $outfile; |