mirror of
https://github.com/openssl/openssl.git
synced 2024-12-21 06:09:35 +08:00
251c48183b
Fixes #14559 The intitial implementation of the gets() function tried using the next bio's gets() function. For a file BIO this returned incorrect data for binary data containing 0x00. Just buffering all data during gets() did not work however since some applications open and close the bio multiple times when dealing with pem files containing multiple entries.. This does not work when reading from stdin unless the data if buffered one byte at a time. Reviewed-by: Tomas Mraz <tomas@openssl.org> Reviewed-by: Paul Dale <pauli@openssl.org> (Merged from https://github.com/openssl/openssl/pull/14599)
30 lines
897 B
Perl
30 lines
897 B
Perl
#! /usr/bin/env perl
|
|
# Copyright 2021 The OpenSSL Project Authors. All Rights Reserved.
|
|
#
|
|
# Licensed under the Apache License 2.0 (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 qw(:DEFAULT srctop_file);
|
|
|
|
setup('test_bio_readbuffer');
|
|
|
|
my $pemfile = srctop_file("test", "certs", "leaf.pem");
|
|
my $derfile = 'readbuffer_leaf.der';
|
|
|
|
plan tests => 3;
|
|
|
|
ok(run(app([ 'openssl', 'x509', '-inform', 'PEM', '-in', $pemfile,
|
|
'-outform', 'DER', '-out', $derfile])),
|
|
"Generate a DER certificate");
|
|
|
|
ok(run(test(["bio_readbuffer_test", $derfile])),
|
|
"Running bio_readbuffer_test $derfile");
|
|
|
|
ok(run(test(["bio_readbuffer_test", $pemfile])),
|
|
"Running bio_readbuffer_test $pemfile");
|