test/ssl_test.tmpl

   1 [{-$testname-}]
   2 ssl_conf = {-$testname-}-ssl
   3
   4 [{-$testname-}-ssl]
   5 server = {-$testname-}-server
   6 client = {-$testname-}-client{-
   7     # The following sections are optional.
   8     $OUT = "";
   9     if (%server2) {
  10         $OUT .= "\nserver2 = $testname-server2";
  11     } elsif ($reuse_server2) {
  12         $OUT .= "\nserver2 = $testname-server";
  13     }
  14     if (%resume_server) {
  15         $OUT .= "\nresume-server = $testname-resume-server";
  16     } elsif ($reuse_resume_server) {
  17         $OUT .= "\nresume-server = $testname-server";
  18     }
  19     if (%resume_client) {
  20         $OUT .= "\nresume-client = $testname-resume-client";
  21     } elsif ($reuse_resume_client) {
  22         $OUT .= "\nresume-client = $testname-client";
  23     }
  24 -}
  25
  26 [{-$testname-}-server]
  27 {-
  28     foreach my $key (sort keys %server) {
  29         $OUT .= qq{$key} . " = " . qq{$server{$key}\n} if defined $server{$key};
  30     }
  31     if (%server2) {
  32         $OUT .= "\n[$testname-server2]\n";
  33         foreach my $key (sort keys %server2) {
  34             $OUT .= qq{$key} . " = " . qq{$server2{$key}\n} if defined $server2{$key};
  35         }
  36     }
  37     if (%resume_server) {
  38         $OUT .= "\n[$testname-resume-server]\n";
  39         foreach my $key (sort keys %resume_server) {
  40             $OUT .= qq{$key} . " = " . qq{$resume_server{$key}\n} if defined $resume_server{$key};
  41         }
  42     }
  43 -}
  44 [{-$testname-}-client]
  45 {-
  46     foreach my $key (sort keys %client) {
  47         $OUT .= qq{$key} . " = " . qq{$client{$key}\n} if defined $client{$key};
  48     }
  49     if (%resume_client) {
  50         $OUT .= "\n[$testname-resume-client]\n";
  51         foreach my $key (sort keys %resume_client) {
  52             $OUT .= qq{$key} . " = " . qq{$resume_client{$key}\n} if defined $resume_client{$key};
  53         }
  54     }
  55 -}
  56 [test-{-$idx-}]
  57 {-
  58     foreach my $key (sort keys %test) {
  59         $OUT .= qq{$key} ." = " . qq{$test{$key}\n} if defined $test{$key};
  60     }
  61 -}