123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778 |
- use strict;
- use warnings;
- package ssltests;
- use OpenSSL::Test::Utils;
- our @tests = (
- {
- name => "certstatus-good",
- server => {
- extra => {
- "CertStatus" => "GoodResponse",
- },
- },
- client => {},
- test => {
- "Method" => "DTLS",
- "ExpectedResult" => "Success"
- }
- },
- {
- name => "certstatus-bad",
- server => {
- extra => {
- "CertStatus" => "BadResponse",
- },
- },
- client => {},
- test => {
- "Method" => "DTLS",
- "ExpectedResult" => "ClientFail"
- }
- }
- );
- our @tests_sctp = (
- {
- name => "certstatus-good",
- server => {
- extra => {
- "CertStatus" => "GoodResponse",
- },
- },
- client => {},
- test => {
- "Method" => "DTLS",
- "UseSCTP" => "Yes",
- "ExpectedResult" => "Success"
- }
- },
- {
- name => "certstatus-bad",
- server => {
- extra => {
- "CertStatus" => "BadResponse",
- },
- },
- client => {},
- test => {
- "Method" => "DTLS",
- "UseSCTP" => "Yes",
- "ExpectedResult" => "ClientFail"
- }
- },
- );
- push @tests, @tests_sctp unless disabled("sctp") || disabled("sock");
|