Server : Apache/2.4.41 (Ubuntu) System : Linux absol.cf 5.4.0-198-generic #218-Ubuntu SMP Fri Sep 27 20:18:53 UTC 2024 x86_64 User : www-data ( 33) PHP Version : 7.4.33 Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,pcntl_unshare, Directory :  /var/lib/gems/2.5.0/gems/eventmachine-1.2.7/tests/

Upload File : current_dir [ Writeable ] document_root [ Writeable ]

require 'em_test_helper'

class TestSSLMethods < Test::Unit::TestCase

  module ServerHandler
    def post_init
      start_tls
    end

    def ssl_handshake_completed
      $server_called_back = true
      $server_cert_value = get_peer_cert
      $server_cipher_bits = get_cipher_bits
      $server_cipher_name = get_cipher_name
      $server_cipher_protocol = get_cipher_protocol
    end
  end

  module ClientHandler
    def post_init
      start_tls
    end

    def ssl_handshake_completed
      $client_called_back = true
      $client_cert_value = get_peer_cert
      $client_cipher_bits = get_cipher_bits
      $client_cipher_name = get_cipher_name
      $client_cipher_protocol = get_cipher_protocol
      EM.stop_event_loop
    end
  end

  def test_ssl_methods
    omit_unless(EM.ssl?)
    omit_if(rbx?)
    $server_called_back, $client_called_back = false, false
    $server_cert_value, $client_cert_value = nil, nil
    $server_cipher_bits, $client_cipher_bits = nil, nil
    $server_cipher_name, $client_cipher_name = nil, nil
    $server_cipher_protocol, $client_cipher_protocol = nil, nil

    EM.run {
      EM.start_server("127.0.0.1", 9999, ServerHandler)
      EM.connect("127.0.0.1", 9999, ClientHandler)
    }

    assert($server_called_back)
    assert($client_called_back)

    assert($server_cert_value.is_a?(NilClass))
    assert($client_cert_value.is_a?(String))

    assert($client_cipher_bits > 0)
    assert_equal($client_cipher_bits, $server_cipher_bits)

    assert($client_cipher_name.length > 0)
    assert_match(/AES/, $client_cipher_name)
    assert_equal($client_cipher_name, $server_cipher_name)

    assert_match(/TLS/, $client_cipher_protocol)
    assert_equal($client_cipher_protocol, $server_cipher_protocol)
  end

end