2
0

16-dtls-certstatus.conf.in 1.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778
  1. # -*- mode: perl; -*-
  2. # Copyright 2016-2016 The OpenSSL Project Authors. All Rights Reserved.
  3. #
  4. # Licensed under the Apache License 2.0 (the "License"). You may not use
  5. # this file except in compliance with the License. You can obtain a copy
  6. # in the file LICENSE in the source distribution or at
  7. # https://www.openssl.org/source/license.html
  8. ## Test DTLS CertStatus messages
  9. use strict;
  10. use warnings;
  11. package ssltests;
  12. use OpenSSL::Test::Utils;
  13. our @tests = (
  14. {
  15. name => "certstatus-good",
  16. server => {
  17. extra => {
  18. "CertStatus" => "GoodResponse",
  19. },
  20. },
  21. client => {},
  22. test => {
  23. "Method" => "DTLS",
  24. "ExpectedResult" => "Success"
  25. }
  26. },
  27. {
  28. name => "certstatus-bad",
  29. server => {
  30. extra => {
  31. "CertStatus" => "BadResponse",
  32. },
  33. },
  34. client => {},
  35. test => {
  36. "Method" => "DTLS",
  37. "ExpectedResult" => "ClientFail"
  38. }
  39. }
  40. );
  41. our @tests_sctp = (
  42. {
  43. name => "certstatus-good",
  44. server => {
  45. extra => {
  46. "CertStatus" => "GoodResponse",
  47. },
  48. },
  49. client => {},
  50. test => {
  51. "Method" => "DTLS",
  52. "UseSCTP" => "Yes",
  53. "ExpectedResult" => "Success"
  54. }
  55. },
  56. {
  57. name => "certstatus-bad",
  58. server => {
  59. extra => {
  60. "CertStatus" => "BadResponse",
  61. },
  62. },
  63. client => {},
  64. test => {
  65. "Method" => "DTLS",
  66. "UseSCTP" => "Yes",
  67. "ExpectedResult" => "ClientFail"
  68. }
  69. },
  70. );
  71. push @tests, @tests_sctp unless disabled("sctp") || disabled("sock");