1*e0c4386eSCy Schubert#! /usr/bin/env perl
2*e0c4386eSCy Schubert# Copyright 2017 The OpenSSL Project Authors. All Rights Reserved.
3*e0c4386eSCy Schubert#
4*e0c4386eSCy Schubert# Licensed under the Apache License 2.0 (the "License").  You may not use
5*e0c4386eSCy Schubert# this file except in compliance with the License.  You can obtain a copy
6*e0c4386eSCy Schubert# in the file LICENSE in the source distribution or at
7*e0c4386eSCy Schubert# https://www.openssl.org/source/license.html
8*e0c4386eSCy Schubert
9*e0c4386eSCy Schubert
10*e0c4386eSCy Schubertuse OpenSSL::Test::Utils;
11*e0c4386eSCy Schubertuse OpenSSL::Test qw/:DEFAULT srctop_file/;
12*e0c4386eSCy Schubert
13*e0c4386eSCy Schubertsetup("test_sslbuffers");
14*e0c4386eSCy Schubert
15*e0c4386eSCy Schubertplan skip_all => "No suitable TLS/SSL protocol is supported by this OpenSSL build"
16*e0c4386eSCy Schubert    if alldisabled(available_protocols("tls"));
17*e0c4386eSCy Schubert
18*e0c4386eSCy Schubertplan tests => 1;
19*e0c4386eSCy Schubert
20*e0c4386eSCy Schubertok(run(test(["sslbuffertest", srctop_file("apps", "server.pem"),
21*e0c4386eSCy Schubert             srctop_file("apps", "server.pem")])), "running sslbuffertest");
22