123456789101112131415161718192021222324252627282930313233343536373839404142434445 |
- # -*- mode: perl; -*-
- # Copyright 2016-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
- ## Test CertStatus messages
- use strict;
- use warnings;
- package ssltests;
- our @tests = (
- {
- name => "certstatus-good",
- server => {
- extra => {
- "CertStatus" => "GoodResponse",
- },
- },
- client => {},
- test => {
- "Method" => "TLS",
- "ExpectedResult" => "Success"
- }
- },
- {
- name => "certstatus-bad",
- server => {
- extra => {
- "CertStatus" => "BadResponse",
- },
- },
- client => {},
- test => {
- "Method" => "TLS",
- "ExpectedResult" => "ClientFail"
- }
- },
- );
|