-19

eio/tests/dune

reviewed

··· 14 14 (package tls-eio) 15 15 (package crypto-rng) 16 16 (package eio_main))) 17 17 - 18 18 - ; "dune runtest" just does a quick run with random inputs. 19 19 - ; 20 20 - ; To run with afl-fuzz instead (make sure you have a compiler with the afl option on!): 21 21 - ; 22 22 - ; dune runtest 23 23 - ; mkdir input 24 24 - ; echo hi > input/foo 25 25 - ; cp certificates/server.{key,pem} . 26 26 - ; afl-fuzz -m 1000 -i input -o output ./_build/default/eio/tests/fuzz.exe @@ 27 27 - 28 28 - (test 29 29 - (package tls-eio) 30 30 - (libraries crowbar tls-eio eio.mock logs logs.fmt crypto-rng test_helpers) 31 31 - (modules fuzz) 32 32 - (deps server.pem server.key) 33 33 - (name fuzz) 34 34 - (action 35 35 - (run %{test} --repeat 200)))

eio/tests/fuzz.ml eio/tests/fuzz/fuzz.ml

reviewed

+21

eio/tests/fuzz/dune

reviewed

··· 1 1 + ; "dune runtest" just does a quick run with random inputs. 2 2 + ; 3 3 + ; To run with afl-fuzz instead (make sure you have a compiler with the afl option on!): 4 4 + ; 5 5 + ; dune runtest 6 6 + ; mkdir input 7 7 + ; echo hi > input/foo 8 8 + ; cp certificates/server.{key,pem} . 9 9 + ; afl-fuzz -m 1000 -i input -o output ./_build/default/eio/tests/fuzz.exe @@ 10 10 + 11 11 + (copy_files ../../../certificates/*.key) 12 12 + 13 13 + (copy_files ../../../certificates/*.pem) 14 14 + 15 15 + (test 16 16 + (package tls-eio) 17 17 + (libraries crowbar tls-eio eio.mock logs logs.fmt crypto-rng test_helpers) 18 18 + (deps server.pem server.key) 19 19 + (name fuzz) 20 20 + (action 21 21 + (run %{test} --repeat 200)))

-6

tests/dh.pem

reviewed

··· 1 1 - -----BEGIN DH PARAMETERS----- 2 2 - MIGHAoGBAPmqFdDJzIT7OkV3ilTUbNK/vi8uosLWRg6BPoS3JdyUYchJgrXTX1wn 3 3 - YDOMD64s+5mONvFY4qOMBvdHgWYsppunnZT4UN18QkZeLuWslu12RiDUbI7HY5vY 4 4 - 0NX2NvKfBXVp0lChvM1v9s7N14ID3t7cXlfwu3IaAcs3jgc2ZR9TAgEC 5 5 - -----END DH PARAMETERS----- 6 6 -

-35

tests/dune

reviewed

··· 1 1 - (library 2 2 - (name testlib) 3 3 - (modules testlib) 4 4 - (libraries tls alcotest crypto-rng.unix ohex domain-name) 5 5 - (optional)) 6 6 - 7 7 - (test 8 8 - (name test) 9 9 - (package tls) 10 10 - (modules 11 11 - test 12 12 - unittests 13 13 - readertests 14 14 - readerwritertests 15 15 - writertests 16 16 - key_derivation) 17 17 - (libraries 18 18 - tls 19 19 - testlib 20 20 - crypto-rng.unix 21 21 - alcotest 22 22 - ohex 23 23 - digestif 24 24 - kdf.hkdf 25 25 - crypto 26 26 - crypto-ec 27 27 - crypto-pk 28 28 - x509 29 29 - logs.fmt 30 30 - fmt.tty)) 31 31 - 32 32 - (executable 33 33 - (name feedback) 34 34 - (modules feedback) 35 35 - (libraries tls x509 testlib cmdliner fmt.cli logs.fmt fmt.tty logs.cli))

-121

tests/feedback.ml

reviewed

··· 1 1 - module Flow = struct 2 2 - let rewrap_st = function `S _, st -> `S st | `C _, st -> `C st 3 3 - let unwrap_st = function `S st -> st | `C st -> st 4 4 - 5 5 - let can_handle_appdata st = 6 6 - not (Tls.Engine.handshake_in_progress (unwrap_st st)) 7 7 - 8 8 - let send_application_data state data = 9 9 - match Tls.Engine.send_application_data (unwrap_st state) data with 10 10 - | None -> None 11 11 - | Some (st', cs) -> Some (rewrap_st (state, st'), cs) 12 12 - 13 13 - let handle_tls ~tag state msg = 14 14 - let st, descr = 15 15 - match state with `S st -> (st, "server") | `C st -> (st, "client") 16 16 - in 17 17 - match msg with 18 18 - | None -> (state, None, None) 19 19 - | Some msg -> ( 20 20 - match Tls.Engine.handle_tls st msg with 21 21 - | Ok (_, Some `Eof, _, _) -> failwith "received eof" 22 22 - | Ok (st', _eof, `Response (Some ans), `Data appdata) -> 23 23 - (rewrap_st (state, st'), Some ans, appdata) 24 24 - | Ok (st', _eof, `Response None, `Data appdata) -> 25 25 - (rewrap_st (state, st'), None, appdata) 26 26 - | Error (a, _) -> 27 27 - failwith 28 28 - @@ Printf.sprintf "[%s] %s error: %s" tag descr 29 29 - (Tls.Engine.string_of_failure a)) 30 30 - end 31 31 - 32 32 - let loop_chatter ~certificate ~loops ~size = 33 33 - Printf.eprintf "Looping %d times, %d bytes.\n%!" loops size; 34 34 - 35 35 - let message = Crypto_rng.generate size 36 36 - and server = 37 37 - Tls.( 38 38 - Engine.server 39 39 - (Result.get_ok (Config.server ~certificates:(`Single certificate) ()))) 40 40 - and client, init = 41 41 - let authenticator ?ip:_ ~host:_ _ = Ok None in 42 42 - Tls.(Engine.client @@ Result.get_ok (Config.client ~authenticator ())) 43 43 - in 44 44 - Testlib.time @@ fun () -> 45 45 - let rec handshake srv cli cli_msg = 46 46 - let tag = "handshake" in 47 47 - let srv, ans, _ = Flow.handle_tls ~tag srv cli_msg in 48 48 - let cli, ans, _ = Flow.handle_tls ~tag cli ans in 49 49 - if Flow.can_handle_appdata cli && Flow.can_handle_appdata srv then (srv, cli) 50 50 - else handshake srv cli ans 51 51 - and chat srv cli data = function 52 52 - | 0 -> data 53 53 - | n -> 54 54 - let tag = "chat" in 55 55 - let simplex sender recv data = 56 56 - match Flow.send_application_data sender [ data ] with 57 57 - | None -> failwith @@ "can't send" 58 58 - | Some (sender', msg) -> ( 59 59 - match Flow.handle_tls ~tag recv (Some msg) with 60 60 - | recv', _, Some data' -> (sender', recv', data') 61 61 - | _, _, None -> failwith "expected data") 62 62 - in 63 63 - let cli, srv, data1 = simplex cli srv data in 64 64 - let srv, cli, data2 = simplex srv cli data1 in 65 65 - chat srv cli data2 (pred n) 66 66 - in 67 67 - let srv, cli = handshake (`S server) (`C client) (Some init) in 68 68 - let message' = chat srv cli message loops in 69 69 - if String.equal message message' then Ok () 70 70 - else Error "the message got corrupted :(" 71 71 - 72 72 - let string_of_file file = 73 73 - try 74 74 - let fh = open_in file in 75 75 - let content = really_input_string fh (in_channel_length fh) in 76 76 - close_in_noerr fh; 77 77 - content 78 78 - with _ -> invalid_arg "Error reading file" 79 79 - 80 80 - let load_priv () = 81 81 - let cert, key = 82 82 - if Sys.file_exists "./certificates/server.pem" then 83 83 - ("./certificates/server.pem", "./certificates/server.key") 84 84 - else ("server.pem", "server.key") 85 85 - in 86 86 - let cs1 = string_of_file cert and cs2 = string_of_file key in 87 87 - match 88 88 - (X509.Certificate.decode_pem_multiple cs1, X509.Private_key.decode_pem cs2) 89 89 - with 90 90 - | Ok certs, Ok key -> (certs, key) 91 91 - | Error (`Msg m), _ -> failwith ("can't parse certificates " ^ m) 92 92 - | _, Error (`Msg m) -> failwith ("can't parse private key " ^ m) 93 93 - 94 94 - let jump () loops size = 95 95 - let certificate = load_priv () in 96 96 - loop_chatter ~certificate ~loops ~size 97 97 - 98 98 - let setup_log style_renderer level = 99 99 - Fmt_tty.setup_std_outputs ?style_renderer (); 100 100 - Logs.set_level level; 101 101 - Logs.set_reporter (Logs_fmt.reporter ~dst:Format.std_formatter ()) 102 102 - 103 103 - open Cmdliner 104 104 - 105 105 - let setup_log = 106 106 - Term.(const setup_log $ Fmt_cli.style_renderer () $ Logs_cli.level ()) 107 107 - 108 108 - let loops = 109 109 - let doc = "Number of loops to take" in 110 110 - Arg.(value & opt int 10 & info ~docv:"LOOPS" ~doc [ "loops" ]) 111 111 - 112 112 - let size = 113 113 - let doc = "Bytes to exchange" in 114 114 - Arg.(value & opt int 1024 & info ~docv:"SIZE" ~doc [ "size" ]) 115 115 - 116 116 - let cmd = 117 117 - let term = Term.(const jump $ setup_log $ loops $ size) 118 118 - and info = Cmd.info "feedback" ~version:"%%VERSION_NUM%%" in 119 119 - Cmd.v info term 120 120 - 121 121 - let () = exit (Cmd.eval_result cmd)

-89

tests/interop-mbedtls-client2.sh

reviewed

··· 1 1 - #!/bin/sh 2 2 - 3 3 - port=4455 4 4 - polarssl="/opt/bin/mbedtls_ssl_client2 auth_mode=none server_port=" 5 5 - 6 6 - extra_args="" 7 7 - statfile="/tmp/test_server.status" 8 8 - 9 9 - testit () { 10 10 - /bin/sh -c "cd .. && ./_build/default/lwt/examples/test_server.exe $port > /dev/null && echo foo > $statfile" & 11 11 - 12 12 - sleep 0.3 13 13 - 14 14 - $polarssl$port $extra_args 2> /dev/null > /dev/null 15 15 - 16 16 - sleep 0.3 17 17 - 18 18 - if [ -e $statfile ]; then 19 19 - result=$(cat $statfile) 20 20 - if [ $result = "foo" ]; then 21 21 - echo "success with $extra_args" 22 22 - else 23 23 - echo "failure with $polarssl$port $extra_args (statfile there)" 24 24 - exit 1 25 25 - fi 26 26 - rm $statfile 27 27 - else 28 28 - echo "failure with $polarssl$port $extra_args" 29 29 - exit 1 30 30 - fi 31 31 - sleep 0.3 32 32 - port=$(expr $port + 1) 33 33 - } 34 34 - 35 35 - testit 36 36 - 37 37 - extra_args="force_version=tls1" 38 38 - testit 39 39 - 40 40 - extra_args="force_version=tls1_1" 41 41 - testit 42 42 - 43 43 - extra_args="force_version=tls1_2" 44 44 - testit 45 45 - 46 46 - ciphers=" 47 47 - TLS-DHE-RSA-WITH-AES-256-CBC-SHA 48 48 - TLS-DHE-RSA-WITH-AES-128-CBC-SHA 49 49 - TLS-DHE-RSA-WITH-3DES-EDE-CBC-SHA 50 50 - TLS-RSA-WITH-AES-256-CBC-SHA 51 51 - TLS-RSA-WITH-AES-128-CBC-SHA 52 52 - TLS-RSA-WITH-3DES-EDE-CBC-SHA 53 53 - TLS-RSA-WITH-RC4-128-SHA 54 54 - TLS-RSA-WITH-RC4-128-MD5" 55 55 - 56 56 - for i in $ciphers; do 57 57 - extra_args="force_ciphersuite=$i" 58 58 - testit 59 59 - 60 60 - extra_args="force_version=tls1 force_ciphersuite=$i" 61 61 - testit 62 62 - 63 63 - extra_args="force_version=tls1_1 force_ciphersuite=$i" 64 64 - testit 65 65 - 66 66 - extra_args="force_version=tls1_2 force_ciphersuite=$i" 67 67 - testit 68 68 - done 69 69 - 70 70 - tls12_ciphers=" 71 71 - TLS-DHE-RSA-WITH-AES-256-CCM 72 72 - TLS-DHE-RSA-WITH-AES-128-CCM 73 73 - TLS-DHE-RSA-WITH-AES-256-CBC-SHA256 74 74 - TLS-DHE-RSA-WITH-AES-128-CBC-SHA256 75 75 - TLS-DHE-RSA-WITH-AES-256-GCM-SHA384 76 76 - TLS-DHE-RSA-WITH-AES-128-GCM-SHA256 77 77 - TLS-RSA-WITH-AES-256-CCM 78 78 - TLS-RSA-WITH-AES-128-CCM 79 79 - TLS-RSA-WITH-AES-256-CBC-SHA256 80 80 - TLS-RSA-WITH-AES-128-CBC-SHA256 81 81 - TLS-RSA-WITH-AES-256-GCM-SHA384 82 82 - TLS-RSA-WITH-AES-128-GCM-SHA256" 83 83 - for i in $tls12_ciphers; do 84 84 - extra_args="force_ciphersuite=$i" 85 85 - testit 86 86 - 87 87 - extra_args="force_version=tls1_2 force_ciphersuite=$i" 88 88 - testit 89 89 - done

-82

tests/interop-openssl-sclient.sh

reviewed

··· 1 1 - #!/bin/sh 2 2 - 3 3 - port=4455 4 4 - s_client_args="s_client -quiet -connect 127.0.0.1:" 5 5 - 6 6 - extra_args="" 7 7 - statfile="/tmp/test_server.status" 8 8 - 9 9 - testit () { 10 10 - /bin/sh -c "cd ../ && ./_build/default/lwt/examples/test_server.exe $port > /dev/null && echo foo > $statfile" & 11 11 - 12 12 - sleep 0.3 13 13 - 14 14 - echo "GET /" | openssl $s_client_args$port $extra_args 2> /dev/null > /dev/null 15 15 - 16 16 - sleep 0.3 17 17 - 18 18 - if [ -e $statfile ]; then 19 19 - result=$(cat $statfile) 20 20 - if [ $result = "foo" ]; then 21 21 - echo "success with $extra_args" 22 22 - else 23 23 - echo "failure with openssl $s_client_args $extra_args (statfile there)" 24 24 - exit 1 25 25 - fi 26 26 - rm $statfile 27 27 - else 28 28 - echo "failure with openssl $s_client_args$port $extra_args (no statfile)" 29 29 - exit 1 30 30 - fi 31 31 - sleep 0.3 32 32 - port=$(expr $port + 1) 33 33 - } 34 34 - 35 35 - testit 36 36 - 37 37 - extra_args="-tls1" 38 38 - testit 39 39 - 40 40 - extra_args="-tls1_1" 41 41 - testit 42 42 - 43 43 - extra_args="-tls1_2" 44 44 - testit 45 45 - 46 46 - extra_args="-tls1_3" 47 47 - testit 48 48 - 49 49 - ciphers="DHE-RSA-AES256-SHA AES256-SHA DHE-RSA-AES128-SHA AES128-SHA ECDHE-RSA-AES256-SHA ECDHE-RSA-AES128-SHA ECDHE-ECDSA-AES128-SHA ECDHE-ECDSA-AES256-SHA" 50 50 - #OpenSSL <1.1.1: 51 51 - #EDH-RSA-DES-CBC3-SHA DES-CBC3-SHA 52 52 - for i in $ciphers; do 53 53 - extra_args="-cipher $i" 54 54 - testit 55 55 - 56 56 - extra_args="-tls1 -cipher $i" 57 57 - testit 58 58 - 59 59 - extra_args="-tls1_1 -cipher $i" 60 60 - testit 61 61 - 62 62 - extra_args="-tls1_2 -cipher $i" 63 63 - testit 64 64 - done 65 65 - 66 66 - tls12_ciphers="DHE-RSA-AES256-SHA256 AES256-SHA256 DHE-RSA-AES128-SHA256 AES128-SHA256 AES128-GCM-SHA256 DHE-RSA-AES128-GCM-SHA256 AES256-GCM-SHA384 DHE-RSA-AES256-GCM-SHA384 ECDHE-RSA-AES256-GCM-SHA384 ECDHE-RSA-AES128-GCM-SHA256 ECDHE-RSA-AES256-SHA384 ECDHE-RSA-AES128-SHA256 ECDHE-RSA-CHACHA20-POLY1305 DHE-RSA-CHACHA20-POLY1305 ECDHE-ECDSA-AES128-SHA256 ECDHE-ECDSA-AES256-SHA384 ECDHE-ECDSA-AES128-GCM-SHA256 ECDHE-ECDSA-AES256-GCM-SHA384 ECDHE-ECDSA-CHACHA20-POLY1305" 67 67 - for i in $tls12_ciphers; do 68 68 - extra_args="-cipher $i" 69 69 - testit 70 70 - 71 71 - extra_args="-tls1_2 -cipher $i" 72 72 - testit 73 73 - done 74 74 - 75 75 - tls13_ciphers="TLS_AES_256_GCM_SHA384 TLS_AES_128_GCM_SHA256 TLS_CHACHA20_POLY1305_SHA256" 76 76 - for i in $tls13_ciphers; do 77 77 - extra_args="-ciphersuites $i" 78 78 - testit 79 79 - 80 80 - extra_args="-tls1_3 -ciphersuites $i" 81 81 - testit 82 82 - done

-124

tests/interop-openssl-sserver.sh

reviewed

··· 1 1 - #!/bin/sh 2 2 - 3 3 - s_server_args="s_server -quiet -key ../certificates/server.key -cert ../certificates/server.pem -www -dhparam dh.pem " 4 4 - 5 5 - pidfile='/tmp/openssl.pid' 6 6 - 7 7 - extra_args="" 8 8 - 9 9 - testit () { 10 10 - /bin/sh -c "echo \$\$ > $pidfile && exec openssl $s_server_args $extra_args" & 11 11 - 12 12 - sleep 0.3 13 13 - 14 14 - ../_build/default/lwt/examples/test_client.exe > /dev/null 15 15 - 16 16 - if [ $? -eq 0 ]; then 17 17 - echo "success with $extra_args" 18 18 - else 19 19 - echo "failure with openssl $s_server_args $extra_args" 20 20 - exit 1 21 21 - fi 22 22 - cat $pidfile | xargs kill 23 23 - rm $pidfile 24 24 - sleep 0.5 25 25 - } 26 26 - 27 27 - testit 28 28 - 29 29 - extra_args="-tls1" 30 30 - testit 31 31 - 32 32 - extra_args="-tls1_1" 33 33 - testit 34 34 - 35 35 - extra_args="-tls1_2" 36 36 - testit 37 37 - 38 38 - extra_args="-tls1_3" 39 39 - testit 40 40 - 41 41 - ciphers="DHE-RSA-AES256-SHA AES256-SHA DHE-RSA-AES128-SHA AES128-SHA ECDHE-RSA-AES256-SHA ECDHE-RSA-AES128-SHA" 42 42 - #OpenSSL <1.1.1: 43 43 - #EDH-RSA-DES-CBC3-SHA DES-CBC3-SHA 44 44 - for i in $ciphers; do 45 45 - extra_args="-cipher $i" 46 46 - testit 47 47 - 48 48 - extra_args="-tls1 -cipher $i" 49 49 - testit 50 50 - 51 51 - extra_args="-tls1_1 -cipher $i" 52 52 - testit 53 53 - 54 54 - extra_args="-tls1_2 -cipher $i" 55 55 - testit 56 56 - done 57 57 - 58 58 - tls12_ciphers="DHE-RSA-AES256-SHA256 AES256-SHA256 DHE-RSA-AES128-SHA256 AES128-SHA256 AES128-GCM-SHA256 DHE-RSA-AES128-GCM-SHA256 AES256-GCM-SHA384 DHE-RSA-AES256-GCM-SHA384 ECDHE-RSA-AES256-GCM-SHA384 ECDHE-RSA-AES128-GCM-SHA256 ECDHE-RSA-AES256-SHA384 ECDHE-RSA-AES128-SHA256 ECDHE-RSA-CHACHA20-POLY1305 DHE-RSA-CHACHA20-POLY1305" 59 59 - for i in $tls12_ciphers; do 60 60 - extra_args="-cipher $i" 61 61 - testit 62 62 - 63 63 - extra_args="-tls1_2 -cipher $i" 64 64 - testit 65 65 - done 66 66 - 67 67 - tls13_ciphers="TLS_AES_256_GCM_SHA384 TLS_AES_128_GCM_SHA256 TLS_CHACHA20_POLY1305_SHA256" 68 68 - for i in $tls13_ciphers; do 69 69 - extra_args="-ciphersuites $i" 70 70 - testit 71 71 - 72 72 - extra_args="-tls1_3 -ciphersuites $i" 73 73 - testit 74 74 - done 75 75 - 76 76 - s_server_args="s_server -quiet -key ../certificates/server-ec.key -cert ../certificates/server-ec.pem -www -dhparam dh.pem " 77 77 - ec_ciphers="ECDHE-ECDSA-AES128-SHA ECDHE-ECDSA-AES256-SHA" 78 78 - ec_ciphers12="ECDHE-ECDSA-AES128-SHA256 ECDHE-ECDSA-AES256-SHA384 ECDHE-ECDSA-AES128-GCM-SHA256 ECDHE-ECDSA-AES256-GCM-SHA384 ECDHE-ECDSA-CHACHA20-POLY1305" 79 79 - 80 80 - extra_args="" 81 81 - testit 82 82 - 83 83 - extra_args="-tls1" 84 84 - testit 85 85 - 86 86 - extra_args="-tls1_1" 87 87 - testit 88 88 - 89 89 - extra_args="-tls1_2" 90 90 - testit 91 91 - 92 92 - extra_args="-tls1_3" 93 93 - testit 94 94 - 95 95 - for i in $ec_ciphers; do 96 96 - extra_args="-cipher $i" 97 97 - testit 98 98 - 99 99 - extra_args="-tls1 -cipher $i" 100 100 - testit 101 101 - 102 102 - extra_args="-tls1_1 -cipher $i" 103 103 - testit 104 104 - 105 105 - extra_args="-tls1_2 -cipher $i" 106 106 - testit 107 107 - done 108 108 - 109 109 - for i in $ec_ciphers12; do 110 110 - extra_args="-cipher $i" 111 111 - testit 112 112 - 113 113 - extra_args="-tls1_2 -cipher $i" 114 114 - testit 115 115 - done 116 116 - 117 117 - tls13_ciphers="TLS_AES_256_GCM_SHA384 TLS_AES_128_GCM_SHA256 TLS_CHACHA20_POLY1305_SHA256" 118 118 - for i in $tls13_ciphers; do 119 119 - extra_args="-ciphersuites $i" 120 120 - testit 121 121 - 122 122 - extra_args="-tls1_3 -ciphersuites $i" 123 123 - testit 124 124 - done

-834

tests/key_derivation.ml

reviewed

··· 1 1 - (* key derivation example trace taken from draft-ietf-tls-tls13-vectors-07 *) 2 2 - let cs = 3 3 - let module M = struct 4 4 - type t = string 5 5 - 6 6 - let pp = Ohex.pp_hexdump () 7 7 - let equal = String.equal 8 8 - end in 9 9 - (module M : Alcotest.TESTABLE with type t = M.t) 10 10 - 11 11 - let secret0 = 12 12 - Ohex.decode 13 13 - {| 14 14 - 33 ad 0a 1c 60 7e c0 3b 09 e6 cd 98 93 68 0c e2 15 15 - 10 ad f3 00 aa 1f 26 60 e1 b2 2e 10 f1 70 f9 2a 16 16 - |} 17 17 - 18 18 - let cipher = `AES_128_GCM_SHA256 19 19 - let hash = Tls.Ciphersuite.hash13 cipher 20 20 - let my_secret = ref None 21 21 - 22 22 - let extract_secret_early () = 23 23 - (* draft-ietf-tls-tls13-vectors-07 Sec 3*) 24 24 - let salt = "" and ikm = String.make 32 '\x00' in 25 25 - Alcotest.check cs __LOC__ secret0 (Hkdf.extract ~hash ~salt ikm); 26 26 - let t = Tls.Handshake_crypto13.(derive (empty cipher) ikm) in 27 27 - my_secret := Some t; 28 28 - Alcotest.check cs __LOC__ secret0 t.secret 29 29 - 30 30 - let expand0 = 31 31 - Ohex.decode 32 32 - {| 33 33 - 6f 26 15 a1 08 c7 02 c5 67 8f 54 fc 9d ba b6 97 34 34 - 16 c0 76 18 9c 48 25 0c eb ea c3 57 6c 36 11 ba 35 35 - |} 36 36 - 37 37 - let derive_hs_secret () = 38 38 - let module H = (val Digestif.module_of_hash' hash) in 39 39 - let hash_val = H.(to_raw_string (digest_string "")) in 40 40 - Alcotest.check cs __LOC__ expand0 41 41 - (Tls.Handshake_crypto13.derive_secret_no_hash hash secret0 ~ctx:hash_val 42 42 - "derived") 43 43 - 44 44 - let hs_secret = 45 45 - Ohex.decode 46 46 - {| 47 47 - 1d c8 26 e9 36 06 aa 6f dc 0a ad c1 2f 74 1b 01 48 48 - 04 6a a6 b9 9f 69 1e d2 21 a9 f0 ca 04 3f be ac 49 49 - |} 50 50 - 51 51 - (* TODO: ikm should be computed (ECDHE) from the key share in client hello (see 52 52 - below), and the private key written in the RFC. *) 53 53 - let ikm = 54 54 - Ohex.decode 55 55 - {| 56 56 - 8b d4 05 4f b5 5b 9d 63 fd fb ac f9 f0 4b 9f 0d 57 57 - 35 e6 d6 3f 53 75 63 ef d4 62 72 90 0f 89 49 2d 58 58 - |} 59 59 - 60 60 - let extract_handshake () = 61 61 - Alcotest.check cs __LOC__ hs_secret (Hkdf.extract ~hash ~salt:expand0 ikm); 62 62 - match !my_secret with 63 63 - | None -> Alcotest.fail "expected some secret" 64 64 - | Some t -> 65 65 - let t' = Tls.Handshake_crypto13.derive t ikm in 66 66 - my_secret := Some t'; 67 67 - Alcotest.check cs __LOC__ hs_secret t'.secret 68 68 - 69 69 - let ch = 70 70 - Ohex.decode 71 71 - {| 72 72 - 01 00 00 c0 03 03 cb 34 ec b1 e7 81 63 ba 1c 38 73 73 - c6 da cb 19 6a 6d ff a2 1a 8d 99 12 ec 18 a2 ef 74 74 - 62 83 02 4d ec e7 00 00 06 13 01 13 03 13 02 01 75 75 - 00 00 91 00 00 00 0b 00 09 00 00 06 73 65 72 76 76 76 - 65 72 ff 01 00 01 00 00 0a 00 14 00 12 00 1d 00 77 77 - 17 00 18 00 19 01 00 01 01 01 02 01 03 01 04 00 78 78 - 23 00 00 00 33 00 26 00 24 00 1d 00 20 99 38 1d 79 79 - e5 60 e4 bd 43 d2 3d 8e 43 5a 7d ba fe b3 c0 6e 80 80 - 51 c1 3c ae 4d 54 13 69 1e 52 9a af 2c 00 2b 00 81 81 - 03 02 03 04 00 0d 00 20 00 1e 04 03 05 03 06 03 82 82 - 02 03 08 04 08 05 08 06 04 01 05 01 06 01 02 01 83 83 - 04 02 05 02 06 02 02 02 00 2d 00 02 01 01 00 1c 84 84 - 00 02 40 01 85 85 - |} 86 86 - 87 87 - let sh = 88 88 - Ohex.decode 89 89 - {| 90 90 - 02 00 00 56 03 03 a6 af 06 a4 12 18 60 dc 5e 6e 91 91 - 60 24 9c d3 4c 95 93 0c 8a c5 cb 14 34 da c1 55 92 92 - 77 2e d3 e2 69 28 00 13 01 00 00 2e 00 33 00 24 93 93 - 00 1d 00 20 c9 82 88 76 11 20 95 fe 66 76 2b db 94 94 - f7 c6 72 e1 56 d6 cc 25 3b 83 3d f1 dd 69 b1 b0 95 95 - 4e 75 1f 0f 00 2b 00 02 03 04 96 96 - |} 97 97 - 98 98 - let c_hs_traffic_secret = 99 99 - Ohex.decode 100 100 - {| 101 101 - b3 ed db 12 6e 06 7f 35 a7 80 b3 ab f4 5e 2d 8f 102 102 - 3b 1a 95 07 38 f5 2e 96 00 74 6a 0e 27 a5 5a 21 103 103 - |} 104 104 - 105 105 - let read_handshake_key = 106 106 - Ohex.decode {| 107 107 - db fa a6 93 d1 76 2c 5b 66 6a f5 d9 50 25 8d 01 108 108 - |} 109 109 - 110 110 - let read_handshake_iv = Ohex.decode {| 111 111 - 5b d3 c7 1b 83 6e 0b 76 bb 73 26 5f 112 112 - |} 113 113 - 114 114 - let derive_c_hs_traffic () = 115 115 - let log = ch ^ sh in 116 116 - let hash_val = 117 117 - let module H = (val Digestif.module_of_hash' hash) in 118 118 - H.(to_raw_string (digest_string log)) 119 119 - in 120 120 - Alcotest.check cs __LOC__ c_hs_traffic_secret 121 121 - (Tls.Handshake_crypto13.derive_secret_no_hash hash hs_secret ~ctx:hash_val 122 122 - "c hs traffic"); 123 123 - match !my_secret with 124 124 - | None -> Alcotest.fail "expected my secret" 125 125 - | Some t -> 126 126 - let c_hs_traffic = 127 127 - Tls.Handshake_crypto13.derive_secret t "c hs traffic" log 128 128 - in 129 129 - Alcotest.check cs __LOC__ c_hs_traffic_secret c_hs_traffic; 130 130 - let key, iv = Tls.Handshake_crypto13.traffic_key cipher c_hs_traffic in 131 131 - Alcotest.check cs __LOC__ read_handshake_key key; 132 132 - Alcotest.check cs __LOC__ read_handshake_iv iv 133 133 - 134 134 - let derive_read_handshake_keys () = 135 135 - Alcotest.check cs __LOC__ read_handshake_key 136 136 - (Tls.Handshake_crypto13.derive_secret_no_hash hash c_hs_traffic_secret 137 137 - ~length:16 "key"); 138 138 - Alcotest.check cs __LOC__ read_handshake_iv 139 139 - (Tls.Handshake_crypto13.derive_secret_no_hash hash c_hs_traffic_secret 140 140 - ~length:12 "iv") 141 141 - 142 142 - let s_hs_traffic_secret = 143 143 - Ohex.decode 144 144 - {| 145 145 - b6 7b 7d 69 0c c1 6c 4e 75 e5 42 13 cb 2d 37 b4 146 146 - e9 c9 12 bc de d9 10 5d 42 be fd 59 d3 91 ad 38 147 147 - |} 148 148 - 149 149 - let write_handshake_key = 150 150 - Ohex.decode {| 151 151 - 3f ce 51 60 09 c2 17 27 d0 f2 e4 e8 6e e4 03 bc 152 152 - |} 153 153 - 154 154 - let write_handshake_iv = Ohex.decode {| 155 155 - 5d 31 3e b2 67 12 76 ee 13 00 0b 30 156 156 - |} 157 157 - 158 158 - let derive_s_hs_traffic () = 159 159 - let log = ch ^ sh in 160 160 - let hash_val = 161 161 - let module H = (val Digestif.module_of_hash' hash) in 162 162 - H.(to_raw_string (digest_string log)) 163 163 - in 164 164 - Alcotest.check cs __LOC__ s_hs_traffic_secret 165 165 - (Tls.Handshake_crypto13.derive_secret_no_hash hash hs_secret ~ctx:hash_val 166 166 - "s hs traffic"); 167 167 - match !my_secret with 168 168 - | None -> Alcotest.fail "expected my secret" 169 169 - | Some t -> 170 170 - let s_hs_traffic = 171 171 - Tls.Handshake_crypto13.derive_secret t "s hs traffic" log 172 172 - in 173 173 - Alcotest.check cs __LOC__ s_hs_traffic_secret s_hs_traffic; 174 174 - let key, iv = Tls.Handshake_crypto13.traffic_key cipher s_hs_traffic in 175 175 - Alcotest.check cs __LOC__ write_handshake_key key; 176 176 - Alcotest.check cs __LOC__ write_handshake_iv iv 177 177 - 178 178 - let derive_write_handshake_keys () = 179 179 - Alcotest.check cs __LOC__ write_handshake_key 180 180 - (Tls.Handshake_crypto13.derive_secret_no_hash hash s_hs_traffic_secret 181 181 - ~length:16 "key"); 182 182 - Alcotest.check cs __LOC__ write_handshake_iv 183 183 - (Tls.Handshake_crypto13.derive_secret_no_hash hash s_hs_traffic_secret 184 184 - ~length:12 "iv") 185 185 - 186 186 - let finished_expanded = 187 187 - Ohex.decode 188 188 - {| 189 189 - 00 8d 3b 66 f8 16 ea 55 9f 96 b5 37 e8 85 c3 1f 190 190 - c0 68 bf 49 2c 65 2f 01 f2 88 a1 d8 cd c1 9f c8 191 191 - |} 192 192 - 193 193 - let finished_key = 194 194 - Ohex.decode 195 195 - {| 196 196 - 9b 9b 14 1d 90 63 37 fb d2 cb dc e7 1d f4 de da 197 197 - 4a b4 2c 30 95 72 cb 7f ff ee 54 54 b7 8f 07 18 198 198 - |} 199 199 - 200 200 - let enc_ext = 201 201 - Ohex.decode 202 202 - {| 203 203 - 08 00 00 24 00 22 00 0a 00 14 00 12 00 1d 00 17 204 204 - 00 18 00 19 01 00 01 01 01 02 01 03 01 04 00 1c 205 205 - 00 02 40 01 00 00 00 00 206 206 - |} 207 207 - 208 208 - let cert = 209 209 - Ohex.decode 210 210 - {| 211 211 - 0b 00 01 b9 00 00 01 b5 00 01 b0 30 82 01 ac 30 212 212 - 82 01 15 a0 03 02 01 02 02 01 02 30 0d 06 09 2a 213 213 - 86 48 86 f7 0d 01 01 0b 05 00 30 0e 31 0c 30 0a 214 214 - 06 03 55 04 03 13 03 72 73 61 30 1e 17 0d 31 36 215 215 - 30 37 33 30 30 31 32 33 35 39 5a 17 0d 32 36 30 216 216 - 37 33 30 30 31 32 33 35 39 5a 30 0e 31 0c 30 0a 217 217 - 06 03 55 04 03 13 03 72 73 61 30 81 9f 30 0d 06 218 218 - 09 2a 86 48 86 f7 0d 01 01 01 05 00 03 81 8d 00 219 219 - 30 81 89 02 81 81 00 b4 bb 49 8f 82 79 30 3d 98 220 220 - 08 36 39 9b 36 c6 98 8c 0c 68 de 55 e1 bd b8 26 221 221 - d3 90 1a 24 61 ea fd 2d e4 9a 91 d0 15 ab bc 9a 222 222 - 95 13 7a ce 6c 1a f1 9e aa 6a f9 8c 7c ed 43 12 223 223 - 09 98 e1 87 a8 0e e0 cc b0 52 4b 1b 01 8c 3e 0b 224 224 - 63 26 4d 44 9a 6d 38 e2 2a 5f da 43 08 46 74 80 225 225 - 30 53 0e f0 46 1c 8c a9 d9 ef bf ae 8e a6 d1 d0 226 226 - 3e 2b d1 93 ef f0 ab 9a 80 02 c4 74 28 a6 d3 5a 227 227 - 8d 88 d7 9f 7f 1e 3f 02 03 01 00 01 a3 1a 30 18 228 228 - 30 09 06 03 55 1d 13 04 02 30 00 30 0b 06 03 55 229 229 - 1d 0f 04 04 03 02 05 a0 30 0d 06 09 2a 86 48 86 230 230 - f7 0d 01 01 0b 05 00 03 81 81 00 85 aa d2 a0 e5 231 231 - b9 27 6b 90 8c 65 f7 3a 72 67 17 06 18 a5 4c 5f 232 232 - 8a 7b 33 7d 2d f7 a5 94 36 54 17 f2 ea e8 f8 a5 233 233 - 8c 8f 81 72 f9 31 9c f3 6b 7f d6 c5 5b 80 f2 1a 234 234 - 03 01 51 56 72 60 96 fd 33 5e 5e 67 f2 db f1 02 235 235 - 70 2e 60 8c ca e6 be c1 fc 63 a4 2a 99 be 5c 3e 236 236 - b7 10 7c 3c 54 e9 b9 eb 2b d5 20 3b 1c 3b 84 e0 237 237 - a8 b2 f7 59 40 9b a3 ea c9 d9 1d 40 2d cc 0c c8 238 238 - f8 96 12 29 ac 91 87 b4 2b 4d e1 00 00 239 239 - |} 240 240 - 241 241 - let cert_verify = 242 242 - Ohex.decode 243 243 - {| 244 244 - 0f 00 00 84 08 04 00 80 5a 74 7c 5d 88 fa 9b d2 245 245 - e5 5a b0 85 a6 10 15 b7 21 1f 82 4c d4 84 14 5a 246 246 - b3 ff 52 f1 fd a8 47 7b 0b 7a bc 90 db 78 e2 d3 247 247 - 3a 5c 14 1a 07 86 53 fa 6b ef 78 0c 5e a2 48 ee 248 248 - aa a7 85 c4 f3 94 ca b6 d3 0b be 8d 48 59 ee 51 249 249 - 1f 60 29 57 b1 54 11 ac 02 76 71 45 9e 46 44 5c 250 250 - 9e a5 8c 18 1e 81 8e 95 b8 c3 fb 0b f3 27 84 09 251 251 - d3 be 15 2a 3d a5 04 3e 06 3d da 65 cd f5 ae a2 252 252 - 0d 53 df ac d4 2f 74 f3 253 253 - |} 254 254 - 255 255 - let derive_finished () = 256 256 - let log = String.concat "" [ ch; sh; enc_ext; cert; cert_verify ] in 257 257 - Alcotest.check cs __LOC__ finished_expanded 258 258 - (Tls.Handshake_crypto13.derive_secret_no_hash hash s_hs_traffic_secret 259 259 - "finished"); 260 260 - let module H = (val Digestif.module_of_hash' hash) in 261 261 - let hash_val = H.(to_raw_string (digest_string log)) in 262 262 - Alcotest.check cs __LOC__ finished_key 263 263 - H.(to_raw_string (hmac_string ~key:finished_expanded hash_val)); 264 264 - match !my_secret with 265 265 - | None -> Alcotest.fail "expected some secret" 266 266 - | Some t -> 267 267 - let s_hs_traffic = 268 268 - Tls.Handshake_crypto13.derive_secret t "s hs traffic" (ch ^ sh) 269 269 - in 270 270 - Alcotest.check cs __LOC__ s_hs_traffic_secret s_hs_traffic; 271 271 - Alcotest.check cs __LOC__ finished_key 272 272 - (Tls.Handshake_crypto13.finished t.hash s_hs_traffic log) 273 273 - 274 274 - let finished = 275 275 - Ohex.decode 276 276 - {| 277 277 - 14 00 00 20 9b 9b 14 1d 90 63 37 fb d2 cb dc e7 278 278 - 1d f4 de da 4a b4 2c 30 95 72 cb 7f ff ee 54 54 279 279 - b7 8f 07 18 280 280 - |} 281 281 - 282 282 - let master = 283 283 - Ohex.decode 284 284 - {| 285 285 - 43 de 77 e0 c7 77 13 85 9a 94 4d b9 db 25 90 b5 286 286 - 31 90 a6 5b 3e e2 e4 f1 2d d7 a0 bb 7c e2 54 b4 287 287 - |} 288 288 - 289 289 - let derive_master () = 290 290 - let module H = (val Digestif.module_of_hash' hash) in 291 291 - let hash_val = H.(to_raw_string (digest_string "")) in 292 292 - Alcotest.check cs __LOC__ master 293 293 - (Tls.Handshake_crypto13.derive_secret_no_hash hash hs_secret ~ctx:hash_val 294 294 - "derived") 295 295 - 296 296 - let master_secret = 297 297 - Ohex.decode 298 298 - {| 299 299 - 18 df 06 84 3d 13 a0 8b f2 a4 49 84 4c 5f 8a 47 300 300 - 80 01 bc 4d 4c 62 79 84 d5 a4 1d a8 d0 40 29 19 301 301 - |} 302 302 - 303 303 - let extract_master () = 304 304 - Alcotest.check cs __LOC__ master_secret 305 305 - (Hkdf.extract ~hash ~salt:master (String.make 32 '\x00')); 306 306 - match !my_secret with 307 307 - | None -> Alcotest.fail "expected my secret" 308 308 - | Some t -> 309 309 - let t' = Tls.Handshake_crypto13.derive t (String.make 32 '\x00') in 310 310 - my_secret := Some t'; 311 311 - Alcotest.check cs __LOC__ master_secret t'.secret 312 312 - 313 313 - let c_ap_traffic = 314 314 - Ohex.decode 315 315 - {| 316 316 - 9e 40 64 6c e7 9a 7f 9d c0 5a f8 88 9b ce 65 52 317 317 - 87 5a fa 0b 06 df 00 87 f7 92 eb b7 c1 75 04 a5 318 318 - |} 319 319 - 320 320 - let s_ap_traffic = 321 321 - Ohex.decode 322 322 - {| 323 323 - a1 1a f9 f0 55 31 f8 56 ad 47 11 6b 45 a9 50 32 324 324 - 82 04 b4 f4 4b fb 6b 3a 4b 4f 1f 3f cb 63 16 43 325 325 - |} 326 326 - 327 327 - let exp_master = 328 328 - Ohex.decode 329 329 - {| 330 330 - fe 22 f8 81 17 6e da 18 eb 8f 44 52 9e 67 92 c5 331 331 - 0c 9a 3f 89 45 2f 68 d8 ae 31 1b 43 09 d3 cf 50 332 332 - |} 333 333 - 334 334 - let app_write_key = 335 335 - Ohex.decode {| 336 336 - 9f 02 28 3b 6c 9c 07 ef c2 6b b9 f2 ac 92 e3 56 337 337 - |} 338 338 - 339 339 - let app_write_iv = Ohex.decode {| 340 340 - cf 78 2b 88 dd 83 54 9a ad f1 e9 84 341 341 - |} 342 342 - 343 343 - let app_read_key = 344 344 - Ohex.decode {| 345 345 - 17 42 2d da 59 6e d5 d9 ac d8 90 e3 c6 3f 50 51 346 346 - |} 347 347 - 348 348 - let app_read_iv = Ohex.decode {| 349 349 - 5b 78 92 3d ee 08 57 90 33 e5 23 d9 350 350 - |} 351 351 - 352 352 - let derive_traffic_keys () = 353 353 - let log = String.concat "" [ ch; sh; enc_ext; cert; cert_verify; finished ] in 354 354 - let module H = (val Digestif.module_of_hash' hash) in 355 355 - let hash_val = H.(to_raw_string (digest_string log)) in 356 356 - Alcotest.check cs __LOC__ c_ap_traffic 357 357 - (Tls.Handshake_crypto13.derive_secret_no_hash hash master_secret 358 358 - ~ctx:hash_val "c ap traffic"); 359 359 - Alcotest.check cs __LOC__ s_ap_traffic 360 360 - (Tls.Handshake_crypto13.derive_secret_no_hash hash master_secret 361 361 - ~ctx:hash_val "s ap traffic"); 362 362 - Alcotest.check cs __LOC__ exp_master 363 363 - (Tls.Handshake_crypto13.derive_secret_no_hash hash master_secret 364 364 - ~ctx:hash_val "exp master"); 365 365 - match !my_secret with 366 366 - | None -> Alcotest.fail "expected some secret" 367 367 - | Some t -> 368 368 - let c_ap_traffic' = 369 369 - Tls.Handshake_crypto13.derive_secret t "c ap traffic" log 370 370 - in 371 371 - Alcotest.check cs __LOC__ c_ap_traffic c_ap_traffic'; 372 372 - let key, iv = Tls.Handshake_crypto13.traffic_key cipher c_ap_traffic' in 373 373 - Alcotest.check cs __LOC__ app_read_key key; 374 374 - Alcotest.check cs __LOC__ app_read_iv iv; 375 375 - let s_ap_traffic' = 376 376 - Tls.Handshake_crypto13.derive_secret t "s ap traffic" log 377 377 - in 378 378 - Alcotest.check cs __LOC__ s_ap_traffic s_ap_traffic'; 379 379 - let key, iv = Tls.Handshake_crypto13.traffic_key cipher s_ap_traffic' in 380 380 - Alcotest.check cs __LOC__ app_write_key key; 381 381 - Alcotest.check cs __LOC__ app_write_iv iv 382 382 - 383 383 - let appdata_write () = 384 384 - Alcotest.check cs __LOC__ app_write_key 385 385 - (Tls.Handshake_crypto13.derive_secret_no_hash hash s_ap_traffic ~length:16 386 386 - "key"); 387 387 - Alcotest.check cs __LOC__ app_write_iv 388 388 - (Tls.Handshake_crypto13.derive_secret_no_hash hash s_ap_traffic ~length:12 389 389 - "iv") 390 390 - 391 391 - let appdata_read () = 392 392 - Alcotest.check cs __LOC__ app_read_key 393 393 - (Tls.Handshake_crypto13.derive_secret_no_hash hash c_ap_traffic ~length:16 394 394 - "key"); 395 395 - Alcotest.check cs __LOC__ app_read_iv 396 396 - (Tls.Handshake_crypto13.derive_secret_no_hash hash c_ap_traffic ~length:12 397 397 - "iv") 398 398 - 399 399 - let server_payload = 400 400 - Ohex.decode 401 401 - {| 402 402 - 08 00 00 24 00 22 00 0a 00 14 00 12 00 1d 00 17 403 403 - 00 18 00 19 01 00 01 01 01 02 01 03 01 04 00 1c 404 404 - 00 02 40 01 00 00 00 00 0b 00 01 b9 00 00 01 b5 405 405 - 00 01 b0 30 82 01 ac 30 82 01 15 a0 03 02 01 02 406 406 - 02 01 02 30 0d 06 09 2a 86 48 86 f7 0d 01 01 0b 407 407 - 05 00 30 0e 31 0c 30 0a 06 03 55 04 03 13 03 72 408 408 - 73 61 30 1e 17 0d 31 36 30 37 33 30 30 31 32 33 409 409 - 35 39 5a 17 0d 32 36 30 37 33 30 30 31 32 33 35 410 410 - 39 5a 30 0e 31 0c 30 0a 06 03 55 04 03 13 03 72 411 411 - 73 61 30 81 9f 30 0d 06 09 2a 86 48 86 f7 0d 01 412 412 - 01 01 05 00 03 81 8d 00 30 81 89 02 81 81 00 b4 413 413 - bb 49 8f 82 79 30 3d 98 08 36 39 9b 36 c6 98 8c 414 414 - 0c 68 de 55 e1 bd b8 26 d3 90 1a 24 61 ea fd 2d 415 415 - e4 9a 91 d0 15 ab bc 9a 95 13 7a ce 6c 1a f1 9e 416 416 - aa 6a f9 8c 7c ed 43 12 09 98 e1 87 a8 0e e0 cc 417 417 - b0 52 4b 1b 01 8c 3e 0b 63 26 4d 44 9a 6d 38 e2 418 418 - 2a 5f da 43 08 46 74 80 30 53 0e f0 46 1c 8c a9 419 419 - d9 ef bf ae 8e a6 d1 d0 3e 2b d1 93 ef f0 ab 9a 420 420 - 80 02 c4 74 28 a6 d3 5a 8d 88 d7 9f 7f 1e 3f 02 421 421 - 03 01 00 01 a3 1a 30 18 30 09 06 03 55 1d 13 04 422 422 - 02 30 00 30 0b 06 03 55 1d 0f 04 04 03 02 05 a0 423 423 - 30 0d 06 09 2a 86 48 86 f7 0d 01 01 0b 05 00 03 424 424 - 81 81 00 85 aa d2 a0 e5 b9 27 6b 90 8c 65 f7 3a 425 425 - 72 67 17 06 18 a5 4c 5f 8a 7b 33 7d 2d f7 a5 94 426 426 - 36 54 17 f2 ea e8 f8 a5 8c 8f 81 72 f9 31 9c f3 427 427 - 6b 7f d6 c5 5b 80 f2 1a 03 01 51 56 72 60 96 fd 428 428 - 33 5e 5e 67 f2 db f1 02 70 2e 60 8c ca e6 be c1 429 429 - fc 63 a4 2a 99 be 5c 3e b7 10 7c 3c 54 e9 b9 eb 430 430 - 2b d5 20 3b 1c 3b 84 e0 a8 b2 f7 59 40 9b a3 ea 431 431 - c9 d9 1d 40 2d cc 0c c8 f8 96 12 29 ac 91 87 b4 432 432 - 2b 4d e1 00 00 0f 00 00 84 08 04 00 80 5a 74 7c 433 433 - 5d 88 fa 9b d2 e5 5a b0 85 a6 10 15 b7 21 1f 82 434 434 - 4c d4 84 14 5a b3 ff 52 f1 fd a8 47 7b 0b 7a bc 435 435 - 90 db 78 e2 d3 3a 5c 14 1a 07 86 53 fa 6b ef 78 436 436 - 0c 5e a2 48 ee aa a7 85 c4 f3 94 ca b6 d3 0b be 437 437 - 8d 48 59 ee 51 1f 60 29 57 b1 54 11 ac 02 76 71 438 438 - 45 9e 46 44 5c 9e a5 8c 18 1e 81 8e 95 b8 c3 fb 439 439 - 0b f3 27 84 09 d3 be 15 2a 3d a5 04 3e 06 3d da 440 440 - 65 cd f5 ae a2 0d 53 df ac d4 2f 74 f3 14 00 00 441 441 - 20 9b 9b 14 1d 90 63 37 fb d2 cb dc e7 1d f4 de 442 442 - da 4a b4 2c 30 95 72 cb 7f ff ee 54 54 b7 8f 07 443 443 - 18 444 444 - |} 445 445 - 446 446 - let payload_is_good () = 447 447 - Alcotest.check cs __LOC__ server_payload 448 448 - (String.concat "" [ enc_ext; cert; cert_verify; finished ]) 449 449 - 450 450 - let server_payload_processed = 451 451 - Ohex.decode 452 452 - {| 453 453 - 17 03 03 02 a2 d1 ff 33 4a 56 f5 bf f6 59 4a 07 454 454 - cc 87 b5 80 23 3f 50 0f 45 e4 89 e7 f3 3a f3 5e 455 455 - df 78 69 fc f4 0a a4 0a a2 b8 ea 73 f8 48 a7 ca 456 456 - 07 61 2e f9 f9 45 cb 96 0b 40 68 90 51 23 ea 78 457 457 - b1 11 b4 29 ba 91 91 cd 05 d2 a3 89 28 0f 52 61 458 458 - 34 aa dc 7f c7 8c 4b 72 9d f8 28 b5 ec f7 b1 3b 459 459 - d9 ae fb 0e 57 f2 71 58 5b 8e a9 bb 35 5c 7c 79 460 460 - 02 07 16 cf b9 b1 18 3e f3 ab 20 e3 7d 57 a6 b9 461 461 - d7 47 76 09 ae e6 e1 22 a4 cf 51 42 73 25 25 0c 462 462 - 7d 0e 50 92 89 44 4c 9b 3a 64 8f 1d 71 03 5d 2e 463 463 - d6 5b 0e 3c dd 0c ba e8 bf 2d 0b 22 78 12 cb b3 464 464 - 60 98 72 55 cc 74 41 10 c4 53 ba a4 fc d6 10 92 465 465 - 8d 80 98 10 e4 b7 ed 1a 8f d9 91 f0 6a a6 24 82 466 466 - 04 79 7e 36 a6 a7 3b 70 a2 55 9c 09 ea d6 86 94 467 467 - 5b a2 46 ab 66 e5 ed d8 04 4b 4c 6d e3 fc f2 a8 468 468 - 94 41 ac 66 27 2f d8 fb 33 0e f8 19 05 79 b3 68 469 469 - 45 96 c9 60 bd 59 6e ea 52 0a 56 a8 d6 50 f5 63 470 470 - aa d2 74 09 96 0d ca 63 d3 e6 88 61 1e a5 e2 2f 471 471 - 44 15 cf 95 38 d5 1a 20 0c 27 03 42 72 96 8a 26 472 472 - 4e d6 54 0c 84 83 8d 89 f7 2c 24 46 1a ad 6d 26 473 473 - f5 9e ca ba 9a cb bb 31 7b 66 d9 02 f4 f2 92 a3 474 474 - 6a c1 b6 39 c6 37 ce 34 31 17 b6 59 62 22 45 31 475 475 - 7b 49 ee da 0c 62 58 f1 00 d7 d9 61 ff b1 38 64 476 476 - 7e 92 ea 33 0f ae ea 6d fa 31 c7 a8 4d c3 bd 7e 477 477 - 1b 7a 6c 71 78 af 36 87 90 18 e3 f2 52 10 7f 24 478 478 - 3d 24 3d c7 33 9d 56 84 c8 b0 37 8b f3 02 44 da 479 479 - 8c 87 c8 43 f5 e5 6e b4 c5 e8 28 0a 2b 48 05 2c 480 480 - f9 3b 16 49 9a 66 db 7c ca 71 e4 59 94 26 f7 d4 481 481 - 61 e6 6f 99 88 2b d8 9f c5 08 00 be cc a6 2d 6c 482 482 - 74 11 6d bd 29 72 fd a1 fa 80 f8 5d f8 81 ed be 483 483 - 5a 37 66 89 36 b3 35 58 3b 59 91 86 dc 5c 69 18 484 484 - a3 96 fa 48 a1 81 d6 b6 fa 4f 9d 62 d5 13 af bb 485 485 - 99 2f 2b 99 2f 67 f8 af e6 7f 76 91 3f a3 88 cb 486 486 - 56 30 c8 ca 01 e0 c6 5d 11 c6 6a 1e 2a c4 c8 59 487 487 - 77 b7 c7 a6 99 9b bf 10 dc 35 ae 69 f5 51 56 14 488 488 - 63 6c 0b 9b 68 c1 9e d2 e3 1c 0b 3b 66 76 30 38 489 489 - eb ba 42 f3 b3 8e dc 03 99 f3 a9 f2 3f aa 63 97 490 490 - 8c 31 7f c9 fa 66 a7 3f 60 f0 50 4d e9 3b 5b 84 491 491 - 5e 27 55 92 c1 23 35 ee 34 0b bc 4f dd d5 02 78 492 492 - 40 16 e4 b3 be 7e f0 4d da 49 f4 b4 40 a3 0c b5 493 493 - d2 af 93 98 28 fd 4a e3 79 4e 44 f9 4d f5 a6 31 494 494 - ed e4 2c 17 19 bf da bf 02 53 fe 51 75 be 89 8e 495 495 - 75 0e dc 53 37 0d 2b 496 496 - |} 497 497 - 498 498 - let processed_payload () = 499 499 - let buf = 500 500 - let t = 501 501 - String.make 1 502 502 - (Char.unsafe_chr (Tls.Packet.content_type_to_int Tls.Packet.HANDSHAKE)) 503 503 - in 504 504 - server_payload ^ t 505 505 - in 506 506 - let nonce = Tls.Tls_crypto.aead_nonce write_handshake_iv 0L in 507 507 - let key = Crypto.AES.GCM.of_secret write_handshake_key in 508 508 - let adata = 509 509 - Tls.Writer.assemble_hdr `TLS_1_2 (Tls.Packet.APPLICATION_DATA, "") 510 510 - in 511 511 - Bytes.set_uint16_be 512 512 - (Bytes.unsafe_of_string adata) 513 513 - 3 514 514 - (17 + String.length server_payload); 515 515 - let res = Crypto.AES.GCM.authenticate_encrypt ~key ~adata ~nonce buf in 516 516 - let data = 517 517 - Tls.Writer.assemble_hdr `TLS_1_2 (Tls.Packet.APPLICATION_DATA, res) 518 518 - in 519 519 - Alcotest.check cs __LOC__ server_payload_processed data 520 520 - 521 521 - let c_finished = 522 522 - Ohex.decode 523 523 - {| 524 524 - 14 00 00 20 a8 ec 43 6d 67 76 34 ae 52 5a c1 fc 525 525 - eb e1 1a 03 9e c1 76 94 fa c6 e9 85 27 b6 42 f2 526 526 - ed d5 ce 61 527 527 - |} 528 528 - 529 529 - let res_master = 530 530 - Ohex.decode 531 531 - {| 532 532 - 7d f2 35 f2 03 1d 2a 05 12 87 d0 2b 02 41 b0 bf 533 533 - da f8 6c c8 56 23 1f 2d 5a ba 46 c4 34 ec 19 6c 534 534 - |} 535 535 - 536 536 - let resumption () = 537 537 - let log = 538 538 - String.concat "" 539 539 - [ ch; sh; enc_ext; cert; cert_verify; finished; c_finished ] 540 540 - in 541 541 - let module H = (val Digestif.module_of_hash' hash) in 542 542 - let hash_val = H.(to_raw_string (digest_string log)) in 543 543 - Alcotest.check cs __LOC__ res_master 544 544 - (Tls.Handshake_crypto13.derive_secret_no_hash hash master_secret 545 545 - ~ctx:hash_val "res master"); 546 546 - match !my_secret with 547 547 - | None -> Alcotest.fail "expected some secret" 548 548 - | Some s -> 549 549 - Alcotest.check cs __LOC__ res_master 550 550 - (Tls.Handshake_crypto13.resumption s log) 551 551 - 552 552 - let private_key = 553 553 - let _modulus = 554 554 - Ohex.decode 555 555 - {| 556 556 - b4 bb 49 8f 82 79 30 3d 98 08 36 39 9b 36 c6 98 557 557 - 8c 0c 68 de 55 e1 bd b8 26 d3 90 1a 24 61 ea fd 558 558 - 2d e4 9a 91 d0 15 ab bc 9a 95 13 7a ce 6c 1a f1 559 559 - 9e aa 6a f9 8c 7c ed 43 12 09 98 e1 87 a8 0e e0 560 560 - cc b0 52 4b 1b 01 8c 3e 0b 63 26 4d 44 9a 6d 38 561 561 - e2 2a 5f da 43 08 46 74 80 30 53 0e f0 46 1c 8c 562 562 - a9 d9 ef bf ae 8e a6 d1 d0 3e 2b d1 93 ef f0 ab 563 563 - 9a 80 02 c4 74 28 a6 d3 5a 8d 88 d7 9f 7f 1e 3f 564 564 - |} 565 565 - and public_exponent = Ohex.decode "01 00 01" 566 566 - and _private_exponent = 567 567 - Ohex.decode 568 568 - {| 569 569 - 04 de a7 05 d4 3a 6e a7 20 9d d8 07 21 11 a8 3c 570 570 - 81 e3 22 a5 92 78 b3 34 80 64 1e af 7c 0a 69 85 571 571 - b8 e3 1c 44 f6 de 62 e1 b4 c2 30 9f 61 26 e7 7b 572 572 - 7c 41 e9 23 31 4b bf a3 88 13 05 dc 12 17 f1 6c 573 573 - 81 9c e5 38 e9 22 f3 69 82 8d 0e 57 19 5d 8c 84 574 574 - 88 46 02 07 b2 fa a7 26 bc f7 08 bb d7 db 7f 67 575 575 - 9f 89 34 92 fc 2a 62 2e 08 97 0a ac 44 1c e4 e0 576 576 - c3 08 8d f2 5a e6 79 23 3d f8 a3 bd a2 ff 99 41 577 577 - |} 578 578 - and prime1 = 579 579 - Ohex.decode 580 580 - {| 581 581 - e4 35 fb 7c c8 37 37 75 6d ac ea 96 ab 7f 59 a2 582 582 - cc 10 69 db 7d eb 19 0e 17 e3 3a 53 2b 27 3f 30 583 583 - a3 27 aa 0a aa bc 58 cd 67 46 6a f9 84 5f ad c6 584 584 - 75 fe 09 4a f9 2c 4b d1 f2 c1 bc 33 dd 2e 05 15 585 585 - |} 586 586 - and prime2 = 587 587 - Ohex.decode 588 588 - {| 589 589 - ca bd 3b c0 e0 43 86 64 c8 d4 cc 9f 99 97 7a 94 590 590 - d9 bb fe ad 8e 43 87 0a ba e3 f7 eb 8b 4e 0e ee 591 591 - 8a f1 d9 b4 71 9b a6 19 6c f2 cb ba ee eb f8 b3 592 592 - 49 0a fe 9e 9f fa 74 a8 8a a5 1f c6 45 62 93 03 593 593 - |} 594 594 - and _exponent1 = 595 595 - Ohex.decode 596 596 - {| 597 597 - 3f 57 34 5c 27 fe 1b 68 7e 6e 76 16 27 b7 8b 1b 598 598 - 82 64 33 dd 76 0f a0 be a6 a6 ac f3 94 90 aa 1b 599 599 - 47 cd a4 86 9d 68 f5 84 dd 5b 50 29 bd 32 09 3b 600 600 - 82 58 66 1f e7 15 02 5e 5d 70 a4 5a 08 d3 d3 19 601 601 - |} 602 602 - and _exponent2 = 603 603 - Ohex.decode 604 604 - {| 605 605 - 18 3d a0 13 63 bd 2f 28 85 ca cb dc 99 64 bf 47 606 606 - 64 f1 51 76 36 f8 64 01 28 6f 71 89 3c 52 cc fe 607 607 - 40 a6 c2 3d 0d 08 6b 47 c6 fb 10 d8 fd 10 41 e0 608 608 - 4d ef 7e 9a 40 ce 95 7c 41 77 94 e1 04 12 d1 39 609 609 - |} 610 610 - and _coefficient = 611 611 - Ohex.decode 612 612 - {| 613 613 - 83 9c a9 a0 85 e4 28 6b 2c 90 e4 66 99 7a 2c 68 614 614 - 1f 21 33 9a a3 47 78 14 e4 de c1 18 33 05 0e d5 615 615 - 0d d1 3c c0 38 04 8a 43 c5 9b 2a cc 41 68 89 c0 616 616 - 37 66 5f e5 af a6 05 96 9f 8c 01 df a5 ca 96 9d 617 617 - |} 618 618 - in 619 619 - let e = Crypto_pk.Z_extra.of_octets_be public_exponent 620 620 - and p = Crypto_pk.Z_extra.of_octets_be prime1 621 621 - and q = Crypto_pk.Z_extra.of_octets_be prime2 in 622 622 - match Crypto_pk.Rsa.priv_of_primes ~e ~p ~q with 623 623 - | Ok p -> p 624 624 - | Error (`Msg m) -> invalid_arg m 625 625 - 626 626 - let log = String.concat "" [ ch; sh; enc_ext; cert ] 627 627 - 628 628 - and cert = 629 629 - match X509.Certificate.decode_der (String.sub cert 11 0x01b0) with 630 630 - | Ok c -> Some c 631 631 - | Error _ -> None 632 632 - 633 633 - let self_signature () = 634 634 - let module H = (val Digestif.module_of_hash' hash) in 635 635 - match 636 636 - Tls.Handshake_common.signature `TLS_1_3 637 637 - ~context_string:"TLS 1.3, server CertificateVerify" 638 638 - H.(to_raw_string (digest_string log)) 639 639 - (Some [ `RSA_PSS_RSAENC_SHA256 ]) [ `RSA_PSS_RSAENC_SHA256 ] 640 640 - (`RSA private_key) 641 641 - with 642 642 - | Error _ -> Alcotest.fail "expected sth" 643 643 - | Ok data -> ( 644 644 - match 645 645 - Tls.Handshake_common.verify_digitally_signed `TLS_1_3 646 646 - ~context_string:"TLS 1.3, server CertificateVerify" 647 647 - [ `RSA_PSS_RSAENC_SHA256 ] data 648 648 - H.(to_raw_string (digest_string log)) 649 649 - cert 650 650 - with 651 651 - | Ok () -> () 652 652 - | Error e -> 653 653 - Alcotest.fail 654 654 - ("self-verification failed " ^ Tls.Engine.string_of_failure e)) 655 655 - 656 656 - let wire_signature () = 657 657 - (* let buf = Writer.assemble_handshake (CertificateVerify data) in 658 658 - Alcotest.check cs __LOC__ cert_verify buf *) 659 659 - let module H = (val Digestif.module_of_hash' hash) in 660 660 - match 661 661 - Tls.Handshake_common.verify_digitally_signed `TLS_1_3 662 662 - ~context_string:"TLS 1.3, server CertificateVerify" 663 663 - [ `RSA_PSS_RSAENC_SHA256 ] 664 664 - (String.sub cert_verify 4 (String.length cert_verify - 4)) 665 665 - H.(to_raw_string (digest_string log)) 666 666 - cert 667 667 - with 668 668 - | Ok () -> () 669 669 - | Error e -> 670 670 - Alcotest.fail 671 671 - ("trace-verification failed " ^ Tls.Engine.string_of_failure e) 672 672 - 673 673 - let res_secret_00 = 674 674 - Ohex.decode 675 675 - {| 676 676 - 4e cd 0e b6 ec 3b 4d 87 f5 d6 02 8f 92 2c a4 c5 677 677 - 85 1a 27 7f d4 13 11 c9 e6 2d 2c 94 92 e1 c4 f3 678 678 - |} 679 679 - 680 680 - let res_secret () = 681 681 - let nonce = String.make 2 '\x00' in 682 682 - Alcotest.check cs __LOC__ res_secret_00 683 683 - (Tls.Handshake_crypto13.derive_secret_no_hash hash res_master ~ctx:nonce 684 684 - "resumption"); 685 685 - Alcotest.check cs __LOC__ res_secret_00 686 686 - (Tls.Handshake_crypto13.res_secret hash res_master nonce) 687 687 - 688 688 - let early_secret1 = 689 689 - Ohex.decode 690 690 - {| 691 691 - 9b 21 88 e9 b2 fc 6d 64 d7 1d c3 29 90 0e 20 bb 692 692 - 41 91 50 00 f6 78 aa 83 9c bb 79 7c b7 d8 33 2c 693 693 - |} 694 694 - 695 695 - let early1 () = 696 696 - let salt = "" and ikm = res_secret_00 in 697 697 - Alcotest.check cs __LOC__ early_secret1 (Hkdf.extract ~hash ~salt ikm); 698 698 - let t = Tls.Handshake_crypto13.(derive (empty cipher) ikm) in 699 699 - my_secret := Some t; 700 700 - Alcotest.check cs __LOC__ early_secret1 t.secret 701 701 - 702 702 - let ch_res_prefix = 703 703 - Ohex.decode 704 704 - {| 705 705 - 01 00 01 fc 03 03 1b c3 ce b6 bb e3 9c ff 93 83 706 706 - 55 b5 a5 0a db 6d b2 1b 7a 6a f6 49 d7 b4 bc 41 707 707 - 9d 78 76 48 7d 95 00 00 06 13 01 13 03 13 02 01 708 708 - 00 01 cd 00 00 00 0b 00 09 00 00 06 73 65 72 76 709 709 - 65 72 ff 01 00 01 00 00 0a 00 14 00 12 00 1d 00 710 710 - 17 00 18 00 19 01 00 01 01 01 02 01 03 01 04 00 711 711 - 33 00 26 00 24 00 1d 00 20 e4 ff b6 8a c0 5f 8d 712 712 - 96 c9 9d a2 66 98 34 6c 6b e1 64 82 ba dd da fe 713 713 - 05 1a 66 b4 f1 8d 66 8f 0b 00 2a 00 00 00 2b 00 714 714 - 03 02 03 04 00 0d 00 20 00 1e 04 03 05 03 06 03 715 715 - 02 03 08 04 08 05 08 06 04 01 05 01 06 01 02 01 716 716 - 04 02 05 02 06 02 02 02 00 2d 00 02 01 01 00 1c 717 717 - 00 02 40 01 00 15 00 57 00 00 00 00 00 00 00 00 718 718 - 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 719 719 - 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 720 720 - 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 721 721 - 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 722 722 - 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 723 723 - 29 00 dd 00 b8 00 b2 2c 03 5d 82 93 59 ee 5f f7 724 724 - af 4e c9 00 00 00 00 26 2a 64 94 dc 48 6d 2c 8a 725 725 - 34 cb 33 fa 90 bf 1b 00 70 ad 3c 49 88 83 c9 36 726 726 - 7c 09 a2 be 78 5a bc 55 cd 22 60 97 a3 a9 82 11 727 727 - 72 83 f8 2a 03 a1 43 ef d3 ff 5d d3 6d 64 e8 61 728 728 - be 7f d6 1d 28 27 db 27 9c ce 14 50 77 d4 54 a3 729 729 - 66 4d 4e 6d a4 d2 9e e0 37 25 a6 a4 da fc d0 fc 730 730 - 67 d2 ae a7 05 29 51 3e 3d a2 67 7f a5 90 6c 5b 731 731 - 3f 7d 8f 92 f2 28 bd a4 0d da 72 14 70 f9 fb f2 732 732 - 97 b5 ae a6 17 64 6f ac 5c 03 27 2e 97 07 27 c6 733 733 - 21 a7 91 41 ef 5f 7d e6 50 5e 5b fb c3 88 e9 33 734 734 - 43 69 40 93 93 4a e4 d3 57 fa d6 aa cb 735 735 - |} 736 736 - 737 737 - let binder () = 738 738 - let module H = (val Digestif.module_of_hash' hash) in 739 739 - let binder_hash = 740 740 - Ohex.decode 741 741 - "63 22 4b 2e 45 73 f2 d3 45 4c a8 4b 9d 00 9a 04 f6 be 9e 05 71 1a 83 96 \ 742 742 - 47 3a ef a0 1e 92 4a 14" 743 743 - in 744 744 - Alcotest.check cs __LOC__ binder_hash 745 745 - H.(to_raw_string (digest_string ch_res_prefix)); 746 746 - match !my_secret with 747 747 - | None -> Alcotest.fail "expected secret" 748 748 - | Some s -> 749 749 - let prk = 750 750 - Ohex.decode 751 751 - "69 fe 13 1a 3b ba d5 d6 3c 64 ee bc c3 0e 39 5b 9d 81 07 72 6a 13 \ 752 752 - d0 74 e3 89 db c8 a4 e4 72 56" 753 753 - in 754 754 - Alcotest.check cs __LOC__ prk 755 755 - (Tls.Handshake_crypto13.derive_secret s "res binder" ""); 756 756 - let finished = 757 757 - Ohex.decode 758 758 - "3a dd 4f b2 d8 fd f8 22 a0 ca 3c f7 67 8e f5 e8 8d ae 99 01 41 c5 \ 759 759 - 92 4d 57 bb 6f a3 1b 9e 5f 9d" 760 760 - in 761 761 - Alcotest.check cs __LOC__ finished 762 762 - (Tls.Handshake_crypto13.finished hash prk ch_res_prefix) 763 763 - 764 764 - let x25519 () = 765 765 - let c_priv = 766 766 - Ohex.decode 767 767 - {| 768 768 - 49 af 42 ba 7f 79 94 85 2d 71 3e f2 78 4b cb ca 769 769 - a7 91 1d e2 6a dc 56 42 cb 63 45 40 e7 ea 50 05 770 770 - |} 771 771 - and c_keyshare = 772 772 - Ohex.decode 773 773 - {| 774 774 - 99 38 1d e5 60 e4 bd 43 d2 3d 8e 43 5a 7d ba fe 775 775 - b3 c0 6e 51 c1 3c ae 4d 54 13 69 1e 52 9a af 2c 776 776 - |} 777 777 - and s_priv = 778 778 - Ohex.decode 779 779 - {| 780 780 - b1 58 0e ea df 6d d5 89 b8 ef 4f 2d 56 52 57 8c 781 781 - c8 10 e9 98 01 91 ec 8d 05 83 08 ce a2 16 a2 1e 782 782 - |} 783 783 - and s_keyshare = 784 784 - Ohex.decode 785 785 - {| 786 786 - c9 82 88 76 11 20 95 fe 66 76 2b db f7 c6 72 e1 787 787 - 56 d6 cc 25 3b 83 3d f1 dd 69 b1 b0 4e 75 1f 0f 788 788 - |} 789 789 - in 790 790 - let check_pub pr pu = 791 791 - match Crypto_ec.X25519.secret_of_octets pr with 792 792 - | Ok (_, pub) -> Alcotest.check cs __LOC__ pu pub 793 793 - | Error _ -> Alcotest.fail "couldn't decode DH secret" 794 794 - in 795 795 - let check_one p ks = 796 796 - match Crypto_ec.X25519.secret_of_octets p with 797 797 - | Error _ -> Alcotest.fail "couldn't decode DH secret" 798 798 - | Ok (priv, _) -> ( 799 799 - match Crypto_ec.X25519.key_exchange priv ks with 800 800 - | Ok shared -> Alcotest.check cs __LOC__ ikm shared 801 801 - | Error _ -> Alcotest.fail "bad kex") 802 802 - in 803 803 - check_one c_priv s_keyshare; 804 804 - check_one s_priv c_keyshare; 805 805 - check_pub c_priv c_keyshare; 806 806 - check_pub s_priv s_keyshare 807 807 - 808 808 - let tests = 809 809 - [ 810 810 - ("initial extract", `Quick, extract_secret_early); 811 811 - ("initial derive", `Quick, derive_hs_secret); 812 812 - ("handshake extract", `Quick, extract_handshake); 813 813 - ("derive c hs", `Quick, derive_c_hs_traffic); 814 814 - ("derive s hs", `Quick, derive_s_hs_traffic); 815 815 - ("derive finished", `Quick, derive_finished); 816 816 - ("derive master", `Quick, derive_master); 817 817 - ("extract master", `Quick, extract_master); 818 818 - ("derive handshake keys", `Quick, derive_write_handshake_keys); 819 819 - ("derive traffic keys", `Quick, derive_traffic_keys); 820 820 - ("application write keys", `Quick, appdata_write); 821 821 - ("application read keys", `Quick, appdata_read); 822 822 - ("hs read keys", `Quick, derive_read_handshake_keys); 823 823 - ("resumption key", `Quick, resumption); 824 824 - ("payload", `Quick, payload_is_good); 825 825 - ("processed payload", `Quick, processed_payload); 826 826 - ("self signature", `Quick, self_signature); 827 827 - ("wire signature", `Quick, wire_signature); 828 828 - ("res secret", `Quick, res_secret); 829 829 - ("early resumed", `Quick, early1); 830 830 - ("binder", `Quick, binder); 831 831 - ("x25519", `Quick, x25519); 832 832 - ] 833 833 - 834 834 - let suite = [ ("key extraction and derivation", tests) ]

-12737

tests/readertests.ml

reviewed

··· 1 1 - open Tls 2 2 - open Testlib 3 3 - 4 4 - let good_any_version_parser major minor result _ = 5 5 - let ver = list_to_cstruct [ major; minor ] in 6 6 - match Reader.parse_any_version ver with 7 7 - | Ok v -> assert_equal v result 8 8 - | Error _ -> assert_failure "Version parser broken" 9 9 - 10 10 - let bad_any_version_parser major minor _ = 11 11 - let ver = list_to_cstruct [ major; minor ] in 12 12 - match Reader.parse_any_version ver with 13 13 - | Ok _ -> assert_failure "Version parser broken" 14 14 - | Error _ -> () 15 15 - 16 16 - let parse_any_version_too_short _ = 17 17 - let ver = list_to_cstruct [ 0 ] in 18 18 - match Reader.parse_any_version ver with 19 19 - | Ok _ -> assert_failure "Version parser broken" 20 20 - | Error _ -> () 21 21 - 22 22 - let any_version_parser_tests = 23 23 - [ 24 24 - good_any_version_parser 3 0 `SSL_3; 25 25 - good_any_version_parser 3 1 `TLS_1_0; 26 26 - good_any_version_parser 3 2 `TLS_1_1; 27 27 - good_any_version_parser 3 3 `TLS_1_2; 28 28 - good_any_version_parser 3 4 `TLS_1_3; 29 29 - good_any_version_parser 3 42 (`TLS_1_X 42); 30 30 - bad_any_version_parser 2 4; 31 31 - bad_any_version_parser 4 4; 32 32 - bad_any_version_parser 0 2; 33 33 - parse_any_version_too_short; 34 34 - ] 35 35 - 36 36 - let any_version_tests = 37 37 - List.mapi 38 38 - (fun i f -> "Parse any version " ^ string_of_int i >:: f) 39 39 - any_version_parser_tests 40 40 - 41 41 - let good_version_parser major minor result _ = 42 42 - let ver = list_to_cstruct [ major; minor ] in 43 43 - match Reader.parse_version ver with 44 44 - | Ok v -> assert_equal v result 45 45 - | Error _ -> assert_failure "Version parser broken" 46 46 - 47 47 - let bad_version_parser major minor _ = 48 48 - let ver = list_to_cstruct [ major; minor ] in 49 49 - match Reader.parse_version ver with 50 50 - | Ok _ -> assert_failure "Version parser broken" 51 51 - | Error _ -> () 52 52 - 53 53 - let parse_version_too_short _ = 54 54 - let ver = list_to_cstruct [ 0 ] in 55 55 - match Reader.parse_version ver with 56 56 - | Ok _ -> assert_failure "Version parser broken" 57 57 - | Error _ -> () 58 58 - 59 59 - let version_parser_tests = 60 60 - [ 61 61 - good_version_parser 3 1 `TLS_1_0; 62 62 - good_version_parser 3 2 `TLS_1_1; 63 63 - good_version_parser 3 3 `TLS_1_2; 64 64 - good_version_parser 3 4 `TLS_1_3; 65 65 - bad_version_parser 3 0; 66 66 - bad_version_parser 3 42; 67 67 - bad_version_parser 2 4; 68 68 - bad_version_parser 4 4; 69 69 - bad_version_parser 0 2; 70 70 - parse_version_too_short; 71 71 - ] 72 72 - 73 73 - let version_tests = 74 74 - List.mapi 75 75 - (fun i f -> "Parse version " ^ string_of_int i >:: f) 76 76 - version_parser_tests 77 77 - 78 78 - let good_record_parser (bytes, result) _ = 79 79 - let buf = list_to_cstruct bytes in 80 80 - let open Reader in 81 81 - match (parse_record buf, result) with 82 82 - | Ok (`Record ((hdr, x), f)), `Record ((rhdr, y), g) -> 83 83 - assert_equal rhdr hdr; 84 84 - assert_cs_eq y x; 85 85 - assert_cs_eq g f 86 86 - | Ok (`Fragment x), `Fragment y -> assert_cs_eq y x 87 87 - | Error (`Record_overflow x), `Overflow y -> assert_equal y x 88 88 - | Error (`Protocol_version (`Unknown_record x)), `UnknownVersion y -> 89 89 - assert_equal y x 90 90 - | Error (`Unexpected (`Content_type x)), `UnknownContent y -> assert_equal y x 91 91 - | _ -> assert_failure "record parser broken" 92 92 - 93 93 - let good_records = 94 94 - let open Core in 95 95 - let open Packet in 96 96 - let empty = "" in 97 97 - [ 98 98 - ( [ 20; 3; 1; 0; 0 ], 99 99 - `Record 100 100 - ( ({ content_type = CHANGE_CIPHER_SPEC; version = `TLS_1_0 }, empty), 101 101 - empty ) ); 102 102 - ( [ 21; 3; 2; 0; 0 ], 103 103 - `Record (({ content_type = ALERT; version = `TLS_1_1 }, empty), empty) ); 104 104 - ( [ 22; 3; 3; 0; 0 ], 105 105 - `Record (({ content_type = HANDSHAKE; version = `TLS_1_2 }, empty), empty) 106 106 - ); 107 107 - ( [ 23; 3; 0; 0; 0 ], 108 108 - `Record 109 109 - (({ content_type = APPLICATION_DATA; version = `SSL_3 }, empty), empty) 110 110 - ); 111 111 - ([ 16; 3; 1; 0; 0 ], `UnknownContent 16); 112 112 - ([ 19; 3; 1; 0; 0 ], `UnknownContent 19); 113 113 - ([ 20; 5; 1; 0; 0 ], `UnknownVersion (5, 1)); 114 114 - ([ 20; 3; 1; 0; 100 ], `Fragment (list_to_cstruct [ 20; 3; 1; 0; 100 ])); 115 115 - ([ 0 ], `Fragment (list_to_cstruct [ 0 ])); 116 116 - ([], `Fragment empty); 117 117 - ( [ 20; 3; 1; 0; 0; 0 ], 118 118 - `Record 119 119 - ( ({ content_type = CHANGE_CIPHER_SPEC; version = `TLS_1_0 }, empty), 120 120 - list_to_cstruct [ 0 ] ) ); 121 121 - ([ 0; 0; 0; 255; 255 ], `Overflow 65535); 122 122 - ([ 0; 0; 0; 72; 1 ], `Overflow 18433); 123 123 - ] 124 124 - 125 125 - let good_records_tests = 126 126 - List.mapi 127 127 - (fun i args -> "Good record " ^ string_of_int i >:: good_record_parser args) 128 128 - good_records 129 129 - 130 130 - let good_alert_parser (lvl, typ, expected) _ = 131 131 - let buf = list_to_cstruct [ lvl; typ ] in 132 132 - match Reader.parse_alert buf with 133 133 - | Ok al -> assert_equal al expected 134 134 - | Error _ -> assert_failure "alert parser broken" 135 135 - 136 136 - let good_alerts = 137 137 - let w = Packet.WARNING in 138 138 - let f = Packet.FATAL in 139 139 - [ 140 140 - (1, 0, (w, Packet.CLOSE_NOTIFY)); 141 141 - (2, 0, (f, Packet.CLOSE_NOTIFY)); 142 142 - (* (1, 10, (w, Packet.UNEXPECTED_MESSAGE)); *) 143 143 - (2, 10, (f, Packet.UNEXPECTED_MESSAGE)); 144 144 - (* (1, 20, (w, Packet.BAD_RECORD_MAC)); *) 145 145 - (2, 20, (f, Packet.BAD_RECORD_MAC)); 146 146 - (* (1, 22, (w, Packet.RECORD_OVERFLOW)); *) 147 147 - (2, 22, (f, Packet.RECORD_OVERFLOW)); 148 148 - (* (1, 40, (w, Packet.HANDSHAKE_FAILURE)); *) 149 149 - (2, 40, (f, Packet.HANDSHAKE_FAILURE)); 150 150 - (* (1, 42, (w, Packet.BAD_CERTIFICATE)); *) 151 151 - (2, 42, (f, Packet.BAD_CERTIFICATE)); 152 152 - (1, 45, (w, Packet.CERTIFICATE_EXPIRED)); 153 153 - (2, 45, (f, Packet.CERTIFICATE_EXPIRED)); 154 154 - (* (1, 50, (w, Packet.DECODE_ERROR)); *) 155 155 - (2, 50, (f, Packet.DECODE_ERROR)); 156 156 - (* (1, 70, (w, Packet.PROTOCOL_VERSION)); *) 157 157 - (2, 70, (f, Packet.PROTOCOL_VERSION)); 158 158 - (1, 90, (w, Packet.USER_CANCELED)); 159 159 - (* (2, 90, (f, Packet.USER_CANCELED)); *) 160 160 - (1, 100, (w, Packet.NO_RENEGOTIATION)); 161 161 - (* (2, 100, (f, Packet.NO_RENEGOTIATION)); *) 162 162 - (* (1, 110, (w, Packet.UNSUPPORTED_EXTENSION)); *) 163 163 - (2, 110, (f, Packet.UNSUPPORTED_EXTENSION)); 164 164 - (* (1, 112, (w, Packet.UNRECOGNIZED_NAME)); *) 165 165 - (2, 112, (f, Packet.UNRECOGNIZED_NAME)); 166 166 - (2, 120, (f, Packet.NO_APPLICATION_PROTOCOL)); 167 167 - ] 168 168 - 169 169 - let good_alert_tests = 170 170 - List.mapi 171 171 - (fun i args -> "Good alert " ^ string_of_int i >:: good_alert_parser args) 172 172 - good_alerts 173 173 - 174 174 - let alert_too_small _ = 175 175 - let buf = list_to_cstruct [ 0 ] in 176 176 - match Reader.parse_alert buf with 177 177 - | Ok _ -> assert_failure "short alert passes" 178 178 - | Error _ -> () 179 179 - 180 180 - let alert_too_small2 _ = 181 181 - let buf = list_to_cstruct [ 25 ] in 182 182 - match Reader.parse_alert buf with 183 183 - | Ok _ -> assert_failure "short alert passes" 184 184 - | Error _ -> () 185 185 - 186 186 - let bad_alerts_tests = 187 187 - [ "short alert" >:: alert_too_small; "short alert 2" >:: alert_too_small2 ] 188 188 - 189 189 - let good_dhparams = 190 190 - [ 191 191 - [ 192 192 - 0x01; 193 193 - 0x00; 194 194 - 0xf6; 195 195 - 0x42; 196 196 - 0x57; 197 197 - 0xb7; 198 198 - 0x08; 199 199 - 0x7f; 200 200 - 0x08; 201 201 - 0x17; 202 202 - 0x72; 203 203 - 0xa2; 204 204 - 0xba; 205 205 - 0xd6; 206 206 - 0xa9; 207 207 - 0x42; 208 208 - 0xf3; 209 209 - 0x05; 210 210 - 0xe8; 211 211 - 0xf9; 212 212 - 0x53; 213 213 - 0x11; 214 214 - 0x39; 215 215 - 0x4f; 216 216 - 0xb6; 217 217 - 0xf1; 218 218 - 0x6e; 219 219 - 0xb9; 220 220 - 0x4b; 221 221 - 0x38; 222 222 - 0x20; 223 223 - 0xda; 224 224 - 0x01; 225 225 - 0xa7; 226 226 - 0x56; 227 227 - 0xa3; 228 228 - 0x14; 229 229 - 0xe9; 230 230 - 0x8f; 231 231 - 0x40; 232 232 - 0x55; 233 233 - 0xf3; 234 234 - 0xd0; 235 235 - 0x07; 236 236 - 0xc6; 237 237 - 0xcb; 238 238 - 0x43; 239 239 - 0xa9; 240 240 - 0x94; 241 241 - 0xad; 242 242 - 0xf7; 243 243 - 0x4c; 244 244 - 0x64; 245 245 - 0x86; 246 246 - 0x49; 247 247 - 0xf8; 248 248 - 0x0c; 249 249 - 0x83; 250 250 - 0xbd; 251 251 - 0x65; 252 252 - 0xe9; 253 253 - 0x17; 254 254 - 0xd4; 255 255 - 0xa1; 256 256 - 0xd3; 257 257 - 0x50; 258 258 - 0xf8; 259 259 - 0xf5; 260 260 - 0x59; 261 261 - 0x5f; 262 262 - 0xdc; 263 263 - 0x76; 264 264 - 0x52; 265 265 - 0x4f; 266 266 - 0x3d; 267 267 - 0x3d; 268 268 - 0x8d; 269 269 - 0xdb; 270 270 - 0xce; 271 271 - 0x99; 272 272 - 0xe1; 273 273 - 0x57; 274 274 - 0x92; 275 275 - 0x59; 276 276 - 0xcd; 277 277 - 0xfd; 278 278 - 0xb8; 279 279 - 0xae; 280 280 - 0x74; 281 281 - 0x4f; 282 282 - 0xc5; 283 283 - 0xfc; 284 284 - 0x76; 285 285 - 0xbc; 286 286 - 0x83; 287 287 - 0xc5; 288 288 - 0x47; 289 289 - 0x30; 290 290 - 0x61; 291 291 - 0xce; 292 292 - 0x7c; 293 293 - 0xc9; 294 294 - 0x66; 295 295 - 0xff; 296 296 - 0x15; 297 297 - 0xf9; 298 298 - 0xbb; 299 299 - 0xfd; 300 300 - 0x91; 301 301 - 0x5e; 302 302 - 0xc7; 303 303 - 0x01; 304 304 - 0xaa; 305 305 - 0xd3; 306 306 - 0x5b; 307 307 - 0x9e; 308 308 - 0x8d; 309 309 - 0xa0; 310 310 - 0xa5; 311 311 - 0x72; 312 312 - 0x3a; 313 313 - 0xd4; 314 314 - 0x1a; 315 315 - 0xf0; 316 316 - 0xbf; 317 317 - 0x46; 318 318 - 0x00; 319 319 - 0x58; 320 320 - 0x2b; 321 321 - 0xe5; 322 322 - 0xf4; 323 323 - 0x88; 324 324 - 0xfd; 325 325 - 0x58; 326 326 - 0x4e; 327 327 - 0x49; 328 328 - 0xdb; 329 329 - 0xcd; 330 330 - 0x20; 331 331 - 0xb4; 332 332 - 0x9d; 333 333 - 0xe4; 334 334 - 0x91; 335 335 - 0x07; 336 336 - 0x36; 337 337 - 0x6b; 338 338 - 0x33; 339 339 - 0x6c; 340 340 - 0x38; 341 341 - 0x0d; 342 342 - 0x45; 343 343 - 0x1d; 344 344 - 0x0f; 345 345 - 0x7c; 346 346 - 0x88; 347 347 - 0xb3; 348 348 - 0x1c; 349 349 - 0x7c; 350 350 - 0x5b; 351 351 - 0x2d; 352 352 - 0x8e; 353 353 - 0xf6; 354 354 - 0xf3; 355 355 - 0xc9; 356 356 - 0x23; 357 357 - 0xc0; 358 358 - 0x43; 359 359 - 0xf0; 360 360 - 0xa5; 361 361 - 0x5b; 362 362 - 0x18; 363 363 - 0x8d; 364 364 - 0x8e; 365 365 - 0xbb; 366 366 - 0x55; 367 367 - 0x8c; 368 368 - 0xb8; 369 369 - 0x5d; 370 370 - 0x38; 371 371 - 0xd3; 372 372 - 0x34; 373 373 - 0xfd; 374 374 - 0x7c; 375 375 - 0x17; 376 376 - 0x57; 377 377 - 0x43; 378 378 - 0xa3; 379 379 - 0x1d; 380 380 - 0x18; 381 381 - 0x6c; 382 382 - 0xde; 383 383 - 0x33; 384 384 - 0x21; 385 385 - 0x2c; 386 386 - 0xb5; 387 387 - 0x2a; 388 388 - 0xff; 389 389 - 0x3c; 390 390 - 0xe1; 391 391 - 0xb1; 392 392 - 0x29; 393 393 - 0x40; 394 394 - 0x18; 395 395 - 0x11; 396 396 - 0x8d; 397 397 - 0x7c; 398 398 - 0x84; 399 399 - 0xa7; 400 400 - 0x0a; 401 401 - 0x72; 402 402 - 0xd6; 403 403 - 0x86; 404 404 - 0xc4; 405 405 - 0x03; 406 406 - 0x19; 407 407 - 0xc8; 408 408 - 0x07; 409 409 - 0x29; 410 410 - 0x7a; 411 411 - 0xca; 412 412 - 0x95; 413 413 - 0x0c; 414 414 - 0xd9; 415 415 - 0x96; 416 416 - 0x9f; 417 417 - 0xab; 418 418 - 0xd0; 419 419 - 0x0a; 420 420 - 0x50; 421 421 - 0x9b; 422 422 - 0x02; 423 423 - 0x46; 424 424 - 0xd3; 425 425 - 0x08; 426 426 - 0x3d; 427 427 - 0x66; 428 428 - 0xa4; 429 429 - 0x5d; 430 430 - 0x41; 431 431 - 0x9f; 432 432 - 0x9c; 433 433 - 0x7c; 434 434 - 0xbd; 435 435 - 0x89; 436 436 - 0x4b; 437 437 - 0x22; 438 438 - 0x19; 439 439 - 0x26; 440 440 - 0xba; 441 441 - 0xab; 442 442 - 0xa2; 443 443 - 0x5e; 444 444 - 0xc3; 445 445 - 0x55; 446 446 - 0xe9; 447 447 - 0x32; 448 448 - 0x0b; 449 449 - 0x3b; 450 450 - 0x00; 451 451 - 0x01; 452 452 - 0x02; 453 453 - 0x01; 454 454 - 0x00; 455 455 - 0x54; 456 456 - 0x7d; 457 457 - 0x06; 458 458 - 0xfb; 459 459 - 0x28; 460 460 - 0xe3; 461 461 - 0x64; 462 462 - 0x86; 463 463 - 0x53; 464 464 - 0x6e; 465 465 - 0xf0; 466 466 - 0xfc; 467 467 - 0xdc; 468 468 - 0x57; 469 469 - 0xb6; 470 470 - 0x86; 471 471 - 0xae; 472 472 - 0xa7; 473 473 - 0x20; 474 474 - 0xbc; 475 475 - 0xac; 476 476 - 0x76; 477 477 - 0x38; 478 478 - 0xf5; 479 479 - 0x64; 480 480 - 0x02; 481 481 - 0x9d; 482 482 - 0x19; 483 483 - 0x1a; 484 484 - 0xfe; 485 485 - 0x4d; 486 486 - 0x0d; 487 487 - 0x5a; 488 488 - 0xd3; 489 489 - 0xc6; 490 490 - 0x76; 491 491 - 0x9b; 492 492 - 0x33; 493 493 - 0x8d; 494 494 - 0x3a; 495 495 - 0x96; 496 496 - 0xcc; 497 497 - 0x3f; 498 498 - 0x72; 499 499 - 0xdf; 500 500 - 0x1d; 501 501 - 0x19; 502 502 - 0xd2; 503 503 - 0x61; 504 504 - 0x41; 505 505 - 0x95; 506 506 - 0x3a; 507 507 - 0x2d; 508 508 - 0x83; 509 509 - 0x7f; 510 510 - 0x4e; 511 511 - 0xbb; 512 512 - 0x48; 513 513 - 0xf4; 514 514 - 0x77; 515 515 - 0x05; 516 516 - 0xd3; 517 517 - 0x23; 518 518 - 0xff; 519 519 - 0x49; 520 520 - 0xd8; 521 521 - 0xc8; 522 522 - 0x70; 523 523 - 0x0a; 524 524 - 0x69; 525 525 - 0xd4; 526 526 - 0xf7; 527 527 - 0x64; 528 528 - 0xfa; 529 529 - 0x86; 530 530 - 0x8c; 531 531 - 0x94; 532 532 - 0x96; 533 533 - 0x41; 534 534 - 0x14; 535 535 - 0xf1; 536 536 - 0x6e; 537 537 - 0x6f; 538 538 - 0x09; 539 539 - 0x21; 540 540 - 0x2b; 541 541 - 0xd5; 542 542 - 0xfa; 543 543 - 0x52; 544 544 - 0x56; 545 545 - 0xf4; 546 546 - 0x44; 547 547 - 0x25; 548 548 - 0x29; 549 549 - 0xb2; 550 550 - 0x51; 551 551 - 0x4e; 552 552 - 0x57; 553 553 - 0xd7; 554 554 - 0x8b; 555 555 - 0xcb; 556 556 - 0x70; 557 557 - 0x3b; 558 558 - 0x94; 559 559 - 0x4f; 560 560 - 0x2b; 561 561 - 0xe2; 562 562 - 0xa7; 563 563 - 0xfc; 564 564 - 0xaa; 565 565 - 0x09; 566 566 - 0xd0; 567 567 - 0x82; 568 568 - 0x9e; 569 569 - 0xa8; 570 570 - 0x17; 571 571 - 0xbe; 572 572 - 0x84; 573 573 - 0xf0; 574 574 - 0x1a; 575 575 - 0xae; 576 576 - 0xe1; 577 577 - 0x97; 578 578 - 0x14; 579 579 - 0x7b; 580 580 - 0x74; 581 581 - 0xd4; 582 582 - 0x12; 583 583 - 0xf8; 584 584 - 0x96; 585 585 - 0xbe; 586 586 - 0xa9; 587 587 - 0x2e; 588 588 - 0xdd; 589 589 - 0xbe; 590 590 - 0x28; 591 591 - 0xcd; 592 592 - 0xe8; 593 593 - 0x9f; 594 594 - 0x67; 595 595 - 0x31; 596 596 - 0x98; 597 597 - 0xcb; 598 598 - 0x74; 599 599 - 0xae; 600 600 - 0xd4; 601 601 - 0x50; 602 602 - 0xa5; 603 603 - 0x77; 604 604 - 0xc4; 605 605 - 0xc1; 606 606 - 0x39; 607 607 - 0x9c; 608 608 - 0xcd; 609 609 - 0xc2; 610 610 - 0x8a; 611 611 - 0xfe; 612 612 - 0xe2; 613 613 - 0x77; 614 614 - 0x1c; 615 615 - 0x09; 616 616 - 0x75; 617 617 - 0x3e; 618 618 - 0xf7; 619 619 - 0x96; 620 620 - 0x6a; 621 621 - 0x92; 622 622 - 0x96; 623 623 - 0x06; 624 624 - 0x1e; 625 625 - 0x8d; 626 626 - 0x22; 627 627 - 0xdd; 628 628 - 0x58; 629 629 - 0xfe; 630 630 - 0x3d; 631 631 - 0x84; 632 632 - 0x56; 633 633 - 0x09; 634 634 - 0x17; 635 635 - 0xe2; 636 636 - 0x50; 637 637 - 0xb1; 638 638 - 0xf6; 639 639 - 0x61; 640 640 - 0x54; 641 641 - 0x6e; 642 642 - 0x5e; 643 643 - 0x94; 644 644 - 0xca; 645 645 - 0xf0; 646 646 - 0x40; 647 647 - 0x68; 648 648 - 0x84; 649 649 - 0xeb; 650 650 - 0xc1; 651 651 - 0x0c; 652 652 - 0x43; 653 653 - 0x3e; 654 654 - 0xbc; 655 655 - 0xb3; 656 656 - 0x0e; 657 657 - 0x81; 658 658 - 0x4d; 659 659 - 0xc0; 660 660 - 0x21; 661 661 - 0xdb; 662 662 - 0x97; 663 663 - 0xc6; 664 664 - 0x8b; 665 665 - 0x27; 666 666 - 0x10; 667 667 - 0x5c; 668 668 - 0xae; 669 669 - 0xe3; 670 670 - 0x6e; 671 671 - 0x66; 672 672 - 0x85; 673 673 - 0xaf; 674 674 - 0xff; 675 675 - 0x19; 676 676 - 0x8b; 677 677 - 0xf8; 678 678 - 0xd5; 679 679 - 0x93; 680 680 - 0x4b; 681 681 - 0xd2; 682 682 - 0xd8; 683 683 - 0x7c; 684 684 - 0x64; 685 685 - 0x04; 686 686 - 0xed; 687 687 - 0xce; 688 688 - 0x88; 689 689 - 0xce; 690 690 - 0xb8; 691 691 - 0x2c; 692 692 - 0x4f; 693 693 - 0xe0; 694 694 - 0xf5; 695 695 - 0x0d; 696 696 - 0x3a; 697 697 - 0xeb; 698 698 - 0x78; 699 699 - 0xee; 700 700 - 0xcf; 701 701 - 0x1a; 702 702 - 0xd1; 703 703 - 0x02; 704 704 - 0xcf; 705 705 - 0x0f; 706 706 - 0x68; 707 707 - 0xed; 708 708 - 0xd2; 709 709 - 0xca; 710 710 - 0xf6; 711 711 - ]; 712 712 - [ 713 713 - 0x01; 714 714 - 0x00; 715 715 - 0xf6; 716 716 - 0x42; 717 717 - 0x57; 718 718 - 0xb7; 719 719 - 0x08; 720 720 - 0x7f; 721 721 - 0x08; 722 722 - 0x17; 723 723 - 0x72; 724 724 - 0xa2; 725 725 - 0xba; 726 726 - 0xd6; 727 727 - 0xa9; 728 728 - 0x42; 729 729 - 0xf3; 730 730 - 0x05; 731 731 - 0xe8; 732 732 - 0xf9; 733 733 - 0x53; 734 734 - 0x11; 735 735 - 0x39; 736 736 - 0x4f; 737 737 - 0xb6; 738 738 - 0xf1; 739 739 - 0x6e; 740 740 - 0xb9; 741 741 - 0x4b; 742 742 - 0x38; 743 743 - 0x20; 744 744 - 0xda; 745 745 - 0x01; 746 746 - 0xa7; 747 747 - 0x56; 748 748 - 0xa3; 749 749 - 0x14; 750 750 - 0xe9; 751 751 - 0x8f; 752 752 - 0x40; 753 753 - 0x55; 754 754 - 0xf3; 755 755 - 0xd0; 756 756 - 0x07; 757 757 - 0xc6; 758 758 - 0xcb; 759 759 - 0x43; 760 760 - 0xa9; 761 761 - 0x94; 762 762 - 0xad; 763 763 - 0xf7; 764 764 - 0x4c; 765 765 - 0x64; 766 766 - 0x86; 767 767 - 0x49; 768 768 - 0xf8; 769 769 - 0x0c; 770 770 - 0x83; 771 771 - 0xbd; 772 772 - 0x65; 773 773 - 0xe9; 774 774 - 0x17; 775 775 - 0xd4; 776 776 - 0xa1; 777 777 - 0xd3; 778 778 - 0x50; 779 779 - 0xf8; 780 780 - 0xf5; 781 781 - 0x59; 782 782 - 0x5f; 783 783 - 0xdc; 784 784 - 0x76; 785 785 - 0x52; 786 786 - 0x4f; 787 787 - 0x3d; 788 788 - 0x3d; 789 789 - 0x8d; 790 790 - 0xdb; 791 791 - 0xce; 792 792 - 0x99; 793 793 - 0xe1; 794 794 - 0x57; 795 795 - 0x92; 796 796 - 0x59; 797 797 - 0xcd; 798 798 - 0xfd; 799 799 - 0xb8; 800 800 - 0xae; 801 801 - 0x74; 802 802 - 0x4f; 803 803 - 0xc5; 804 804 - 0xfc; 805 805 - 0x76; 806 806 - 0xbc; 807 807 - 0x83; 808 808 - 0xc5; 809 809 - 0x47; 810 810 - 0x30; 811 811 - 0x61; 812 812 - 0xce; 813 813 - 0x7c; 814 814 - 0xc9; 815 815 - 0x66; 816 816 - 0xff; 817 817 - 0x15; 818 818 - 0xf9; 819 819 - 0xbb; 820 820 - 0xfd; 821 821 - 0x91; 822 822 - 0x5e; 823 823 - 0xc7; 824 824 - 0x01; 825 825 - 0xaa; 826 826 - 0xd3; 827 827 - 0x5b; 828 828 - 0x9e; 829 829 - 0x8d; 830 830 - 0xa0; 831 831 - 0xa5; 832 832 - 0x72; 833 833 - 0x3a; 834 834 - 0xd4; 835 835 - 0x1a; 836 836 - 0xf0; 837 837 - 0xbf; 838 838 - 0x46; 839 839 - 0x00; 840 840 - 0x58; 841 841 - 0x2b; 842 842 - 0xe5; 843 843 - 0xf4; 844 844 - 0x88; 845 845 - 0xfd; 846 846 - 0x58; 847 847 - 0x4e; 848 848 - 0x49; 849 849 - 0xdb; 850 850 - 0xcd; 851 851 - 0x20; 852 852 - 0xb4; 853 853 - 0x9d; 854 854 - 0xe4; 855 855 - 0x91; 856 856 - 0x07; 857 857 - 0x36; 858 858 - 0x6b; 859 859 - 0x33; 860 860 - 0x6c; 861 861 - 0x38; 862 862 - 0x0d; 863 863 - 0x45; 864 864 - 0x1d; 865 865 - 0x0f; 866 866 - 0x7c; 867 867 - 0x88; 868 868 - 0xb3; 869 869 - 0x1c; 870 870 - 0x7c; 871 871 - 0x5b; 872 872 - 0x2d; 873 873 - 0x8e; 874 874 - 0xf6; 875 875 - 0xf3; 876 876 - 0xc9; 877 877 - 0x23; 878 878 - 0xc0; 879 879 - 0x43; 880 880 - 0xf0; 881 881 - 0xa5; 882 882 - 0x5b; 883 883 - 0x18; 884 884 - 0x8d; 885 885 - 0x8e; 886 886 - 0xbb; 887 887 - 0x55; 888 888 - 0x8c; 889 889 - 0xb8; 890 890 - 0x5d; 891 891 - 0x38; 892 892 - 0xd3; 893 893 - 0x34; 894 894 - 0xfd; 895 895 - 0x7c; 896 896 - 0x17; 897 897 - 0x57; 898 898 - 0x43; 899 899 - 0xa3; 900 900 - 0x1d; 901 901 - 0x18; 902 902 - 0x6c; 903 903 - 0xde; 904 904 - 0x33; 905 905 - 0x21; 906 906 - 0x2c; 907 907 - 0xb5; 908 908 - 0x2a; 909 909 - 0xff; 910 910 - 0x3c; 911 911 - 0xe1; 912 912 - 0xb1; 913 913 - 0x29; 914 914 - 0x40; 915 915 - 0x18; 916 916 - 0x11; 917 917 - 0x8d; 918 918 - 0x7c; 919 919 - 0x84; 920 920 - 0xa7; 921 921 - 0x0a; 922 922 - 0x72; 923 923 - 0xd6; 924 924 - 0x86; 925 925 - 0xc4; 926 926 - 0x03; 927 927 - 0x19; 928 928 - 0xc8; 929 929 - 0x07; 930 930 - 0x29; 931 931 - 0x7a; 932 932 - 0xca; 933 933 - 0x95; 934 934 - 0x0c; 935 935 - 0xd9; 936 936 - 0x96; 937 937 - 0x9f; 938 938 - 0xab; 939 939 - 0xd0; 940 940 - 0x0a; 941 941 - 0x50; 942 942 - 0x9b; 943 943 - 0x02; 944 944 - 0x46; 945 945 - 0xd3; 946 946 - 0x08; 947 947 - 0x3d; 948 948 - 0x66; 949 949 - 0xa4; 950 950 - 0x5d; 951 951 - 0x41; 952 952 - 0x9f; 953 953 - 0x9c; 954 954 - 0x7c; 955 955 - 0xbd; 956 956 - 0x89; 957 957 - 0x4b; 958 958 - 0x22; 959 959 - 0x19; 960 960 - 0x26; 961 961 - 0xba; 962 962 - 0xab; 963 963 - 0xa2; 964 964 - 0x5e; 965 965 - 0xc3; 966 966 - 0x55; 967 967 - 0xe9; 968 968 - 0x32; 969 969 - 0x0b; 970 970 - 0x3b; 971 971 - 0x00; 972 972 - 0x01; 973 973 - 0x02; 974 974 - 0x01; 975 975 - 0x00; 976 976 - 0x7d; 977 977 - 0x17; 978 978 - 0xb3; 979 979 - 0xc8; 980 980 - 0x40; 981 981 - 0xcd; 982 982 - 0xa0; 983 983 - 0x75; 984 984 - 0x5b; 985 985 - 0xa4; 986 986 - 0xe1; 987 987 - 0xed; 988 988 - 0xef; 989 989 - 0xd3; 990 990 - 0xed; 991 991 - 0x74; 992 992 - 0x8e; 993 993 - 0x3c; 994 994 - 0xd5; 995 995 - 0x37; 996 996 - 0x17; 997 997 - 0xe2; 998 998 - 0x2b; 999 999 - 0x3d; 1000 1000 - 0x4e; 1001 1001 - 0x20; 1002 1002 - 0x2b; 1003 1003 - 0xf4; 1004 1004 - 0xdc; 1005 1005 - 0x83; 1006 1006 - 0x5a; 1007 1007 - 0x8b; 1008 1008 - 0x86; 1009 1009 - 0xed; 1010 1010 - 0x7b; 1011 1011 - 0xa3; 1012 1012 - 0x8d; 1013 1013 - 0xfa; 1014 1014 - 0xb4; 1015 1015 - 0x3a; 1016 1016 - 0x72; 1017 1017 - 0x95; 1018 1018 - 0xca; 1019 1019 - 0x5a; 1020 1020 - 0xd9; 1021 1021 - 0xf9; 1022 1022 - 0x27; 1023 1023 - 0x08; 1024 1024 - 0x10; 1025 1025 - 0xec; 1026 1026 - 0x9b; 1027 1027 - 0x9b; 1028 1028 - 0x86; 1029 1029 - 0xad; 1030 1030 - 0xbe; 1031 1031 - 0xfe; 1032 1032 - 0x77; 1033 1033 - 0xcb; 1034 1034 - 0xf7; 1035 1035 - 0xf6; 1036 1036 - 0x03; 1037 1037 - 0x35; 1038 1038 - 0x9f; 1039 1039 - 0x16; 1040 1040 - 0x97; 1041 1041 - 0x72; 1042 1042 - 0x6e; 1043 1043 - 0x92; 1044 1044 - 0xb8; 1045 1045 - 0xd7; 1046 1046 - 0xd3; 1047 1047 - 0x09; 1048 1048 - 0x58; 1049 1049 - 0x1d; 1050 1050 - 0xd0; 1051 1051 - 0x8a; 1052 1052 - 0xeb; 1053 1053 - 0x16; 1054 1054 - 0xa9; 1055 1055 - 0x71; 1056 1056 - 0x9a; 1057 1057 - 0xf8; 1058 1058 - 0xb6; 1059 1059 - 0xc8; 1060 1060 - 0xcc; 1061 1061 - 0x63; 1062 1062 - 0x52; 1063 1063 - 0x8d; 1064 1064 - 0x8f; 1065 1065 - 0x93; 1066 1066 - 0x23; 1067 1067 - 0x1b; 1068 1068 - 0xa8; 1069 1069 - 0xfe; 1070 1070 - 0x3c; 1071 1071 - 0x17; 1072 1072 - 0x9b; 1073 1073 - 0xe6; 1074 1074 - 0x64; 1075 1075 - 0x3d; 1076 1076 - 0xab; 1077 1077 - 0x57; 1078 1078 - 0x0c; 1079 1079 - 0xb1; 1080 1080 - 0x17; 1081 1081 - 0x71; 1082 1082 - 0xc1; 1083 1083 - 0x40; 1084 1084 - 0x72; 1085 1085 - 0xc9; 1086 1086 - 0x42; 1087 1087 - 0x43; 1088 1088 - 0x68; 1089 1089 - 0x39; 1090 1090 - 0xa5; 1091 1091 - 0x7f; 1092 1092 - 0x63; 1093 1093 - 0x03; 1094 1094 - 0x7e; 1095 1095 - 0xff; 1096 1096 - 0xd6; 1097 1097 - 0x11; 1098 1098 - 0xe1; 1099 1099 - 0x1a; 1100 1100 - 0xe1; 1101 1101 - 0xd9; 1102 1102 - 0x2f; 1103 1103 - 0xa3; 1104 1104 - 0x4a; 1105 1105 - 0x93; 1106 1106 - 0x4f; 1107 1107 - 0x09; 1108 1108 - 0x79; 1109 1109 - 0xbd; 1110 1110 - 0x78; 1111 1111 - 0xf3; 1112 1112 - 0xf4; 1113 1113 - 0xe1; 1114 1114 - 0x44; 1115 1115 - 0x7d; 1116 1116 - 0xaf; 1117 1117 - 0x7b; 1118 1118 - 0xd7; 1119 1119 - 0x82; 1120 1120 - 0x11; 1121 1121 - 0xc9; 1122 1122 - 0xd9; 1123 1123 - 0x91; 1124 1124 - 0x01; 1125 1125 - 0x9a; 1126 1126 - 0x2c; 1127 1127 - 0xcb; 1128 1128 - 0xd1; 1129 1129 - 0x41; 1130 1130 - 0xcc; 1131 1131 - 0xf5; 1132 1132 - 0x5c; 1133 1133 - 0x9f; 1134 1134 - 0xb5; 1135 1135 - 0xa2; 1136 1136 - 0x7c; 1137 1137 - 0x8b; 1138 1138 - 0x2d; 1139 1139 - 0xf6; 1140 1140 - 0x16; 1141 1141 - 0xab; 1142 1142 - 0x68; 1143 1143 - 0x99; 1144 1144 - 0x99; 1145 1145 - 0x33; 1146 1146 - 0x80; 1147 1147 - 0x72; 1148 1148 - 0xee; 1149 1149 - 0xce; 1150 1150 - 0x13; 1151 1151 - 0xea; 1152 1152 - 0x3f; 1153 1153 - 0x62; 1154 1154 - 0xca; 1155 1155 - 0xfc; 1156 1156 - 0x56; 1157 1157 - 0xd6; 1158 1158 - 0x6d; 1159 1159 - 0xa2; 1160 1160 - 0x8a; 1161 1161 - 0xfe; 1162 1162 - 0xdf; 1163 1163 - 0x71; 1164 1164 - 0x7a; 1165 1165 - 0x82; 1166 1166 - 0x39; 1167 1167 - 0xd1; 1168 1168 - 0x5d; 1169 1169 - 0x09; 1170 1170 - 0x27; 1171 1171 - 0x26; 1172 1172 - 0x26; 1173 1173 - 0x5c; 1174 1174 - 0x6e; 1175 1175 - 0xab; 1176 1176 - 0x28; 1177 1177 - 0xb2; 1178 1178 - 0xa1; 1179 1179 - 0x6f; 1180 1180 - 0xb9; 1181 1181 - 0x08; 1182 1182 - 0x25; 1183 1183 - 0xd0; 1184 1184 - 0xa1; 1185 1185 - 0x68; 1186 1186 - 0x25; 1187 1187 - 0x31; 1188 1188 - 0xae; 1189 1189 - 0x4a; 1190 1190 - 0xef; 1191 1191 - 0x62; 1192 1192 - 0x99; 1193 1193 - 0xb6; 1194 1194 - 0x4d; 1195 1195 - 0xd2; 1196 1196 - 0xa9; 1197 1197 - 0x27; 1198 1198 - 0x20; 1199 1199 - 0x99; 1200 1200 - 0xc4; 1201 1201 - 0xdc; 1202 1202 - 0x44; 1203 1203 - 0x81; 1204 1204 - 0x0c; 1205 1205 - 0xc0; 1206 1206 - 0xfe; 1207 1207 - 0xa9; 1208 1208 - 0xab; 1209 1209 - 0xc9; 1210 1210 - 0xe8; 1211 1211 - 0x26; 1212 1212 - 0x00; 1213 1213 - 0x60; 1214 1214 - 0x40; 1215 1215 - 0x0e; 1216 1216 - 0xb4; 1217 1217 - 0x07; 1218 1218 - 0xfc; 1219 1219 - 0xcf; 1220 1220 - 0x7f; 1221 1221 - 0x93; 1222 1222 - 0xc5; 1223 1223 - 0x20; 1224 1224 - 0x10; 1225 1225 - 0x49; 1226 1226 - 0x72; 1227 1227 - 0xd2; 1228 1228 - 0x9b; 1229 1229 - 0x4b; 1230 1230 - 0x70; 1231 1231 - 0x03; 1232 1232 - ]; 1233 1233 - [ 1234 1234 - 0x01; 1235 1235 - 0x00; 1236 1236 - 0xf6; 1237 1237 - 0x42; 1238 1238 - 0x57; 1239 1239 - 0xb7; 1240 1240 - 0x08; 1241 1241 - 0x7f; 1242 1242 - 0x08; 1243 1243 - 0x17; 1244 1244 - 0x72; 1245 1245 - 0xa2; 1246 1246 - 0xba; 1247 1247 - 0xd6; 1248 1248 - 0xa9; 1249 1249 - 0x42; 1250 1250 - 0xf3; 1251 1251 - 0x05; 1252 1252 - 0xe8; 1253 1253 - 0xf9; 1254 1254 - 0x53; 1255 1255 - 0x11; 1256 1256 - 0x39; 1257 1257 - 0x4f; 1258 1258 - 0xb6; 1259 1259 - 0xf1; 1260 1260 - 0x6e; 1261 1261 - 0xb9; 1262 1262 - 0x4b; 1263 1263 - 0x38; 1264 1264 - 0x20; 1265 1265 - 0xda; 1266 1266 - 0x01; 1267 1267 - 0xa7; 1268 1268 - 0x56; 1269 1269 - 0xa3; 1270 1270 - 0x14; 1271 1271 - 0xe9; 1272 1272 - 0x8f; 1273 1273 - 0x40; 1274 1274 - 0x55; 1275 1275 - 0xf3; 1276 1276 - 0xd0; 1277 1277 - 0x07; 1278 1278 - 0xc6; 1279 1279 - 0xcb; 1280 1280 - 0x43; 1281 1281 - 0xa9; 1282 1282 - 0x94; 1283 1283 - 0xad; 1284 1284 - 0xf7; 1285 1285 - 0x4c; 1286 1286 - 0x64; 1287 1287 - 0x86; 1288 1288 - 0x49; 1289 1289 - 0xf8; 1290 1290 - 0x0c; 1291 1291 - 0x83; 1292 1292 - 0xbd; 1293 1293 - 0x65; 1294 1294 - 0xe9; 1295 1295 - 0x17; 1296 1296 - 0xd4; 1297 1297 - 0xa1; 1298 1298 - 0xd3; 1299 1299 - 0x50; 1300 1300 - 0xf8; 1301 1301 - 0xf5; 1302 1302 - 0x59; 1303 1303 - 0x5f; 1304 1304 - 0xdc; 1305 1305 - 0x76; 1306 1306 - 0x52; 1307 1307 - 0x4f; 1308 1308 - 0x3d; 1309 1309 - 0x3d; 1310 1310 - 0x8d; 1311 1311 - 0xdb; 1312 1312 - 0xce; 1313 1313 - 0x99; 1314 1314 - 0xe1; 1315 1315 - 0x57; 1316 1316 - 0x92; 1317 1317 - 0x59; 1318 1318 - 0xcd; 1319 1319 - 0xfd; 1320 1320 - 0xb8; 1321 1321 - 0xae; 1322 1322 - 0x74; 1323 1323 - 0x4f; 1324 1324 - 0xc5; 1325 1325 - 0xfc; 1326 1326 - 0x76; 1327 1327 - 0xbc; 1328 1328 - 0x83; 1329 1329 - 0xc5; 1330 1330 - 0x47; 1331 1331 - 0x30; 1332 1332 - 0x61; 1333 1333 - 0xce; 1334 1334 - 0x7c; 1335 1335 - 0xc9; 1336 1336 - 0x66; 1337 1337 - 0xff; 1338 1338 - 0x15; 1339 1339 - 0xf9; 1340 1340 - 0xbb; 1341 1341 - 0xfd; 1342 1342 - 0x91; 1343 1343 - 0x5e; 1344 1344 - 0xc7; 1345 1345 - 0x01; 1346 1346 - 0xaa; 1347 1347 - 0xd3; 1348 1348 - 0x5b; 1349 1349 - 0x9e; 1350 1350 - 0x8d; 1351 1351 - 0xa0; 1352 1352 - 0xa5; 1353 1353 - 0x72; 1354 1354 - 0x3a; 1355 1355 - 0xd4; 1356 1356 - 0x1a; 1357 1357 - 0xf0; 1358 1358 - 0xbf; 1359 1359 - 0x46; 1360 1360 - 0x00; 1361 1361 - 0x58; 1362 1362 - 0x2b; 1363 1363 - 0xe5; 1364 1364 - 0xf4; 1365 1365 - 0x88; 1366 1366 - 0xfd; 1367 1367 - 0x58; 1368 1368 - 0x4e; 1369 1369 - 0x49; 1370 1370 - 0xdb; 1371 1371 - 0xcd; 1372 1372 - 0x20; 1373 1373 - 0xb4; 1374 1374 - 0x9d; 1375 1375 - 0xe4; 1376 1376 - 0x91; 1377 1377 - 0x07; 1378 1378 - 0x36; 1379 1379 - 0x6b; 1380 1380 - 0x33; 1381 1381 - 0x6c; 1382 1382 - 0x38; 1383 1383 - 0x0d; 1384 1384 - 0x45; 1385 1385 - 0x1d; 1386 1386 - 0x0f; 1387 1387 - 0x7c; 1388 1388 - 0x88; 1389 1389 - 0xb3; 1390 1390 - 0x1c; 1391 1391 - 0x7c; 1392 1392 - 0x5b; 1393 1393 - 0x2d; 1394 1394 - 0x8e; 1395 1395 - 0xf6; 1396 1396 - 0xf3; 1397 1397 - 0xc9; 1398 1398 - 0x23; 1399 1399 - 0xc0; 1400 1400 - 0x43; 1401 1401 - 0xf0; 1402 1402 - 0xa5; 1403 1403 - 0x5b; 1404 1404 - 0x18; 1405 1405 - 0x8d; 1406 1406 - 0x8e; 1407 1407 - 0xbb; 1408 1408 - 0x55; 1409 1409 - 0x8c; 1410 1410 - 0xb8; 1411 1411 - 0x5d; 1412 1412 - 0x38; 1413 1413 - 0xd3; 1414 1414 - 0x34; 1415 1415 - 0xfd; 1416 1416 - 0x7c; 1417 1417 - 0x17; 1418 1418 - 0x57; 1419 1419 - 0x43; 1420 1420 - 0xa3; 1421 1421 - 0x1d; 1422 1422 - 0x18; 1423 1423 - 0x6c; 1424 1424 - 0xde; 1425 1425 - 0x33; 1426 1426 - 0x21; 1427 1427 - 0x2c; 1428 1428 - 0xb5; 1429 1429 - 0x2a; 1430 1430 - 0xff; 1431 1431 - 0x3c; 1432 1432 - 0xe1; 1433 1433 - 0xb1; 1434 1434 - 0x29; 1435 1435 - 0x40; 1436 1436 - 0x18; 1437 1437 - 0x11; 1438 1438 - 0x8d; 1439 1439 - 0x7c; 1440 1440 - 0x84; 1441 1441 - 0xa7; 1442 1442 - 0x0a; 1443 1443 - 0x72; 1444 1444 - 0xd6; 1445 1445 - 0x86; 1446 1446 - 0xc4; 1447 1447 - 0x03; 1448 1448 - 0x19; 1449 1449 - 0xc8; 1450 1450 - 0x07; 1451 1451 - 0x29; 1452 1452 - 0x7a; 1453 1453 - 0xca; 1454 1454 - 0x95; 1455 1455 - 0x0c; 1456 1456 - 0xd9; 1457 1457 - 0x96; 1458 1458 - 0x9f; 1459 1459 - 0xab; 1460 1460 - 0xd0; 1461 1461 - 0x0a; 1462 1462 - 0x50; 1463 1463 - 0x9b; 1464 1464 - 0x02; 1465 1465 - 0x46; 1466 1466 - 0xd3; 1467 1467 - 0x08; 1468 1468 - 0x3d; 1469 1469 - 0x66; 1470 1470 - 0xa4; 1471 1471 - 0x5d; 1472 1472 - 0x41; 1473 1473 - 0x9f; 1474 1474 - 0x9c; 1475 1475 - 0x7c; 1476 1476 - 0xbd; 1477 1477 - 0x89; 1478 1478 - 0x4b; 1479 1479 - 0x22; 1480 1480 - 0x19; 1481 1481 - 0x26; 1482 1482 - 0xba; 1483 1483 - 0xab; 1484 1484 - 0xa2; 1485 1485 - 0x5e; 1486 1486 - 0xc3; 1487 1487 - 0x55; 1488 1488 - 0xe9; 1489 1489 - 0x32; 1490 1490 - 0x0b; 1491 1491 - 0x3b; 1492 1492 - 0x00; 1493 1493 - 0x01; 1494 1494 - 0x02; 1495 1495 - 0x01; 1496 1496 - 0x00; 1497 1497 - 0x4e; 1498 1498 - 0x72; 1499 1499 - 0x1e; 1500 1500 - 0x54; 1501 1501 - 0x1d; 1502 1502 - 0x3b; 1503 1503 - 0x3c; 1504 1504 - 0xad; 1505 1505 - 0xc7; 1506 1506 - 0x42; 1507 1507 - 0xf4; 1508 1508 - 0x2b; 1509 1509 - 0xcc; 1510 1510 - 0xce; 1511 1511 - 0xc9; 1512 1512 - 0x71; 1513 1513 - 0x4a; 1514 1514 - 0x85; 1515 1515 - 0xa1; 1516 1516 - 0x21; 1517 1517 - 0xda; 1518 1518 - 0x81; 1519 1519 - 0x40; 1520 1520 - 0x6a; 1521 1521 - 0xeb; 1522 1522 - 0x8a; 1523 1523 - 0x0a; 1524 1524 - 0x0f; 1525 1525 - 0xca; 1526 1526 - 0x73; 1527 1527 - 0x32; 1528 1528 - 0x5f; 1529 1529 - 0xa9; 1530 1530 - 0x5c; 1531 1531 - 0x24; 1532 1532 - 0x21; 1533 1533 - 0x1d; 1534 1534 - 0x1d; 1535 1535 - 0xd6; 1536 1536 - 0x10; 1537 1537 - 0xe0; 1538 1538 - 0x7f; 1539 1539 - 0x9e; 1540 1540 - 0xc4; 1541 1541 - 0x86; 1542 1542 - 0x2f; 1543 1543 - 0xa3; 1544 1544 - 0xcc; 1545 1545 - 0xc2; 1546 1546 - 0x60; 1547 1547 - 0x5d; 1548 1548 - 0xed; 1549 1549 - 0x7f; 1550 1550 - 0x7d; 1551 1551 - 0xb7; 1552 1552 - 0xa2; 1553 1553 - 0x96; 1554 1554 - 0x4f; 1555 1555 - 0xe6; 1556 1556 - 0x81; 1557 1557 - 0x1b; 1558 1558 - 0x29; 1559 1559 - 0xf9; 1560 1560 - 0xf4; 1561 1561 - 0xc1; 1562 1562 - 0x00; 1563 1563 - 0x46; 1564 1564 - 0x68; 1565 1565 - 0x4d; 1566 1566 - 0x72; 1567 1567 - 0x0e; 1568 1568 - 0x36; 1569 1569 - 0x21; 1570 1570 - 0xc3; 1571 1571 - 0x46; 1572 1572 - 0xf2; 1573 1573 - 0x81; 1574 1574 - 0x83; 1575 1575 - 0xed; 1576 1576 - 0x30; 1577 1577 - 0x89; 1578 1578 - 0x3f; 1579 1579 - 0xd8; 1580 1580 - 0x98; 1581 1581 - 0x39; 1582 1582 - 0xe5; 1583 1583 - 0x46; 1584 1584 - 0x90; 1585 1585 - 0xeb; 1586 1586 - 0x68; 1587 1587 - 0xe6; 1588 1588 - 0x3b; 1589 1589 - 0x8f; 1590 1590 - 0xc5; 1591 1591 - 0xd3; 1592 1592 - 0xa7; 1593 1593 - 0xfe; 1594 1594 - 0x87; 1595 1595 - 0xd7; 1596 1596 - 0x14; 1597 1597 - 0x33; 1598 1598 - 0x5b; 1599 1599 - 0x70; 1600 1600 - 0x82; 1601 1601 - 0x82; 1602 1602 - 0x57; 1603 1603 - 0x2f; 1604 1604 - 0xd8; 1605 1605 - 0xb2; 1606 1606 - 0x91; 1607 1607 - 0xc3; 1608 1608 - 0xe5; 1609 1609 - 0x19; 1610 1610 - 0x15; 1611 1611 - 0x5b; 1612 1612 - 0x76; 1613 1613 - 0xe6; 1614 1614 - 0x94; 1615 1615 - 0x1a; 1616 1616 - 0xe9; 1617 1617 - 0x11; 1618 1618 - 0x2c; 1619 1619 - 0xa5; 1620 1620 - 0x57; 1621 1621 - 0x55; 1622 1622 - 0xf0; 1623 1623 - 0x20; 1624 1624 - 0x36; 1625 1625 - 0xc9; 1626 1626 - 0xe1; 1627 1627 - 0x32; 1628 1628 - 0x94; 1629 1629 - 0x26; 1630 1630 - 0x47; 1631 1631 - 0xb8; 1632 1632 - 0x10; 1633 1633 - 0x40; 1634 1634 - 0xc0; 1635 1635 - 0x47; 1636 1636 - 0xf6; 1637 1637 - 0x66; 1638 1638 - 0x53; 1639 1639 - 0x49; 1640 1640 - 0xe3; 1641 1641 - 0x85; 1642 1642 - 0xe1; 1643 1643 - 0x0e; 1644 1644 - 0x1e; 1645 1645 - 0xba; 1646 1646 - 0xc0; 1647 1647 - 0xb8; 1648 1648 - 0x97; 1649 1649 - 0x8b; 1650 1650 - 0x16; 1651 1651 - 0x8e; 1652 1652 - 0x48; 1653 1653 - 0x71; 1654 1654 - 0xdd; 1655 1655 - 0x88; 1656 1656 - 0x3a; 1657 1657 - 0x8b; 1658 1658 - 0x21; 1659 1659 - 0x89; 1660 1660 - 0xeb; 1661 1661 - 0x28; 1662 1662 - 0x8d; 1663 1663 - 0xaa; 1664 1664 - 0x97; 1665 1665 - 0xcf; 1666 1666 - 0x4a; 1667 1667 - 0x45; 1668 1668 - 0xa4; 1669 1669 - 0xb8; 1670 1670 - 0x7d; 1671 1671 - 0x0f; 1672 1672 - 0x1e; 1673 1673 - 0x29; 1674 1674 - 0xc1; 1675 1675 - 0xe2; 1676 1676 - 0xc3; 1677 1677 - 0x75; 1678 1678 - 0x43; 1679 1679 - 0xb5; 1680 1680 - 0xbf; 1681 1681 - 0xcf; 1682 1682 - 0x14; 1683 1683 - 0xa4; 1684 1684 - 0xea; 1685 1685 - 0x3e; 1686 1686 - 0xe5; 1687 1687 - 0x94; 1688 1688 - 0x0c; 1689 1689 - 0x32; 1690 1690 - 0x8a; 1691 1691 - 0x91; 1692 1692 - 0xcb; 1693 1693 - 0x47; 1694 1694 - 0x7f; 1695 1695 - 0x23; 1696 1696 - 0x5b; 1697 1697 - 0xe9; 1698 1698 - 0x79; 1699 1699 - 0x96; 1700 1700 - 0x7c; 1701 1701 - 0xdb; 1702 1702 - 0xbc; 1703 1703 - 0x32; 1704 1704 - 0xce; 1705 1705 - 0x96; 1706 1706 - 0xb5; 1707 1707 - 0x34; 1708 1708 - 0x68; 1709 1709 - 0x94; 1710 1710 - 0xbf; 1711 1711 - 0x4f; 1712 1712 - 0xd7; 1713 1713 - 0x16; 1714 1714 - 0x74; 1715 1715 - 0x4c; 1716 1716 - 0x52; 1717 1717 - 0xf2; 1718 1718 - 0x04; 1719 1719 - 0xfb; 1720 1720 - 0x6a; 1721 1721 - 0xe6; 1722 1722 - 0xb9; 1723 1723 - 0x07; 1724 1724 - 0x7c; 1725 1725 - 0x8f; 1726 1726 - 0x62; 1727 1727 - 0xdf; 1728 1728 - 0x13; 1729 1729 - 0xb7; 1730 1730 - 0x3e; 1731 1731 - 0xd6; 1732 1732 - 0x85; 1733 1733 - 0x12; 1734 1734 - 0x46; 1735 1735 - 0xfd; 1736 1736 - 0xb8; 1737 1737 - 0x2b; 1738 1738 - 0x30; 1739 1739 - 0x5e; 1740 1740 - 0x16; 1741 1741 - 0x25; 1742 1742 - 0x8e; 1743 1743 - 0x2a; 1744 1744 - 0x20; 1745 1745 - 0x01; 1746 1746 - 0x07; 1747 1747 - 0xe8; 1748 1748 - 0x5f; 1749 1749 - 0x0d; 1750 1750 - 0x77; 1751 1751 - 0x08; 1752 1752 - 0xd5; 1753 1753 - ]; 1754 1754 - [ 1755 1755 - 0x00; 1756 1756 - 0x80; 1757 1757 - 0xbb; 1758 1758 - 0xbc; 1759 1759 - 0x2d; 1760 1760 - 0xca; 1761 1761 - 0xd8; 1762 1762 - 0x46; 1763 1763 - 0x74; 1764 1764 - 0x90; 1765 1765 - 0x7c; 1766 1766 - 0x43; 1767 1767 - 0xfc; 1768 1768 - 0xf5; 1769 1769 - 0x80; 1770 1770 - 0xe9; 1771 1771 - 0xcf; 1772 1772 - 0xdb; 1773 1773 - 0xd9; 1774 1774 - 0x58; 1775 1775 - 0xa3; 1776 1776 - 0xf5; 1777 1777 - 0x68; 1778 1778 - 0xb4; 1779 1779 - 0x2d; 1780 1780 - 0x4b; 1781 1781 - 0x08; 1782 1782 - 0xee; 1783 1783 - 0xd4; 1784 1784 - 0xeb; 1785 1785 - 0x0f; 1786 1786 - 0xb3; 1787 1787 - 0x50; 1788 1788 - 0x4c; 1789 1789 - 0x6c; 1790 1790 - 0x03; 1791 1791 - 0x02; 1792 1792 - 0x76; 1793 1793 - 0xe7; 1794 1794 - 0x10; 1795 1795 - 0x80; 1796 1796 - 0x0c; 1797 1797 - 0x5c; 1798 1798 - 0xcb; 1799 1799 - 0xba; 1800 1800 - 0xa8; 1801 1801 - 0x92; 1802 1802 - 0x26; 1803 1803 - 0x14; 1804 1804 - 0xc5; 1805 1805 - 0xbe; 1806 1806 - 0xec; 1807 1807 - 0xa5; 1808 1808 - 0x65; 1809 1809 - 0xa5; 1810 1810 - 0xfd; 1811 1811 - 0xf1; 1812 1812 - 0xd2; 1813 1813 - 0x87; 1814 1814 - 0xa2; 1815 1815 - 0xbc; 1816 1816 - 0x04; 1817 1817 - 0x9b; 1818 1818 - 0xe6; 1819 1819 - 0x77; 1820 1820 - 0x80; 1821 1821 - 0x60; 1822 1822 - 0xe9; 1823 1823 - 0x1a; 1824 1824 - 0x92; 1825 1825 - 0xa7; 1826 1826 - 0x57; 1827 1827 - 0xe3; 1828 1828 - 0x04; 1829 1829 - 0x8f; 1830 1830 - 0x68; 1831 1831 - 0xb0; 1832 1832 - 0x76; 1833 1833 - 0xf7; 1834 1834 - 0xd3; 1835 1835 - 0x6c; 1836 1836 - 0xc8; 1837 1837 - 0xf2; 1838 1838 - 0x9b; 1839 1839 - 0xa5; 1840 1840 - 0xdf; 1841 1841 - 0x81; 1842 1842 - 0xdc; 1843 1843 - 0x2c; 1844 1844 - 0xa7; 1845 1845 - 0x25; 1846 1846 - 0xec; 1847 1847 - 0xe6; 1848 1848 - 0x62; 1849 1849 - 0x70; 1850 1850 - 0xcc; 1851 1851 - 0x9a; 1852 1852 - 0x50; 1853 1853 - 0x35; 1854 1854 - 0xd8; 1855 1855 - 0xce; 1856 1856 - 0xce; 1857 1857 - 0xef; 1858 1858 - 0x9e; 1859 1859 - 0xa0; 1860 1860 - 0x27; 1861 1861 - 0x4a; 1862 1862 - 0x63; 1863 1863 - 0xab; 1864 1864 - 0x1e; 1865 1865 - 0x58; 1866 1866 - 0xfa; 1867 1867 - 0xfd; 1868 1868 - 0x49; 1869 1869 - 0x88; 1870 1870 - 0xd0; 1871 1871 - 0xf6; 1872 1872 - 0x5d; 1873 1873 - 0x14; 1874 1874 - 0x67; 1875 1875 - 0x57; 1876 1876 - 0xda; 1877 1877 - 0x07; 1878 1878 - 0x1d; 1879 1879 - 0xf0; 1880 1880 - 0x45; 1881 1881 - 0xcf; 1882 1882 - 0xe1; 1883 1883 - 0x6b; 1884 1884 - 0x9b; 1885 1885 - 0x00; 1886 1886 - 0x01; 1887 1887 - 0x02; 1888 1888 - 0x00; 1889 1889 - 0x80; 1890 1890 - 0x4a; 1891 1891 - 0x2d; 1892 1892 - 0x33; 1893 1893 - 0x76; 1894 1894 - 0x4d; 1895 1895 - 0x32; 1896 1896 - 0x70; 1897 1897 - 0xf1; 1898 1898 - 0x94; 1899 1899 - 0x1a; 1900 1900 - 0xc1; 1901 1901 - 0x35; 1902 1902 - 0x63; 1903 1903 - 0x97; 1904 1904 - 0x62; 1905 1905 - 0xca; 1906 1906 - 0xcc; 1907 1907 - 0xd6; 1908 1908 - 0x2d; 1909 1909 - 0xfd; 1910 1910 - 0x23; 1911 1911 - 0x2d; 1912 1912 - 0x3a; 1913 1913 - 0x71; 1914 1914 - 0x03; 1915 1915 - 0xc4; 1916 1916 - 0x9d; 1917 1917 - 0x42; 1918 1918 - 0x93; 1919 1919 - 0x78; 1920 1920 - 0x8c; 1921 1921 - 0x32; 1922 1922 - 0xc4; 1923 1923 - 0x8b; 1924 1924 - 0x0d; 1925 1925 - 0xad; 1926 1926 - 0xdd; 1927 1927 - 0xe2; 1928 1928 - 0x30; 1929 1929 - 0x96; 1930 1930 - 0xf1; 1931 1931 - 0xb9; 1932 1932 - 0xef; 1933 1933 - 0x16; 1934 1934 - 0x72; 1935 1935 - 0x2e; 1936 1936 - 0x6d; 1937 1937 - 0x1f; 1938 1938 - 0xb9; 1939 1939 - 0x92; 1940 1940 - 0x5d; 1941 1941 - 0x17; 1942 1942 - 0xc5; 1943 1943 - 0x0f; 1944 1944 - 0x2b; 1945 1945 - 0x07; 1946 1946 - 0xc8; 1947 1947 - 0xae; 1948 1948 - 0xf7; 1949 1949 - 0x60; 1950 1950 - 0x3d; 1951 1951 - 0x53; 1952 1952 - 0x62; 1953 1953 - 0x2e; 1954 1954 - 0xb5; 1955 1955 - 0xe3; 1956 1956 - 0x0b; 1957 1957 - 0x20; 1958 1958 - 0x67; 1959 1959 - 0xb1; 1960 1960 - 0xdf; 1961 1961 - 0x57; 1962 1962 - 0x14; 1963 1963 - 0x59; 1964 1964 - 0xff; 1965 1965 - 0xca; 1966 1966 - 0xe6; 1967 1967 - 0x72; 1968 1968 - 0x5d; 1969 1969 - 0xd7; 1970 1970 - 0x1a; 1971 1971 - 0x98; 1972 1972 - 0x1e; 1973 1973 - 0xa1; 1974 1974 - 0x2b; 1975 1975 - 0xce; 1976 1976 - 0xf7; 1977 1977 - 0x9e; 1978 1978 - 0xcf; 1979 1979 - 0x45; 1980 1980 - 0x41; 1981 1981 - 0xa4; 1982 1982 - 0xa8; 1983 1983 - 0xdc; 1984 1984 - 0x98; 1985 1985 - 0xf7; 1986 1986 - 0x0d; 1987 1987 - 0x98; 1988 1988 - 0xf3; 1989 1989 - 0x47; 1990 1990 - 0x7a; 1991 1991 - 0xe3; 1992 1992 - 0x25; 1993 1993 - 0x41; 1994 1994 - 0x02; 1995 1995 - 0x31; 1996 1996 - 0x26; 1997 1997 - 0x1f; 1998 1998 - 0x4d; 1999 1999 - 0xbb; 2000 2000 - 0x36; 2001 2001 - 0xcd; 2002 2002 - 0xcc; 2003 2003 - 0x64; 2004 2004 - 0x74; 2005 2005 - 0xae; 2006 2006 - 0xb5; 2007 2007 - 0x19; 2008 2008 - 0xd9; 2009 2009 - 0xa3; 2010 2010 - 0xd6; 2011 2011 - 0x89; 2012 2012 - 0x6f; 2013 2013 - 0x9d; 2014 2014 - 0x02; 2015 2015 - 0xd4; 2016 2016 - 0x52; 2017 2017 - 0xdd; 2018 2018 - ]; 2019 2019 - [ 2020 2020 - 0x00; 2021 2021 - 0x80; 2022 2022 - 0xbb; 2023 2023 - 0xbc; 2024 2024 - 0x2d; 2025 2025 - 0xca; 2026 2026 - 0xd8; 2027 2027 - 0x46; 2028 2028 - 0x74; 2029 2029 - 0x90; 2030 2030 - 0x7c; 2031 2031 - 0x43; 2032 2032 - 0xfc; 2033 2033 - 0xf5; 2034 2034 - 0x80; 2035 2035 - 0xe9; 2036 2036 - 0xcf; 2037 2037 - 0xdb; 2038 2038 - 0xd9; 2039 2039 - 0x58; 2040 2040 - 0xa3; 2041 2041 - 0xf5; 2042 2042 - 0x68; 2043 2043 - 0xb4; 2044 2044 - 0x2d; 2045 2045 - 0x4b; 2046 2046 - 0x08; 2047 2047 - 0xee; 2048 2048 - 0xd4; 2049 2049 - 0xeb; 2050 2050 - 0x0f; 2051 2051 - 0xb3; 2052 2052 - 0x50; 2053 2053 - 0x4c; 2054 2054 - 0x6c; 2055 2055 - 0x03; 2056 2056 - 0x02; 2057 2057 - 0x76; 2058 2058 - 0xe7; 2059 2059 - 0x10; 2060 2060 - 0x80; 2061 2061 - 0x0c; 2062 2062 - 0x5c; 2063 2063 - 0xcb; 2064 2064 - 0xba; 2065 2065 - 0xa8; 2066 2066 - 0x92; 2067 2067 - 0x26; 2068 2068 - 0x14; 2069 2069 - 0xc5; 2070 2070 - 0xbe; 2071 2071 - 0xec; 2072 2072 - 0xa5; 2073 2073 - 0x65; 2074 2074 - 0xa5; 2075 2075 - 0xfd; 2076 2076 - 0xf1; 2077 2077 - 0xd2; 2078 2078 - 0x87; 2079 2079 - 0xa2; 2080 2080 - 0xbc; 2081 2081 - 0x04; 2082 2082 - 0x9b; 2083 2083 - 0xe6; 2084 2084 - 0x77; 2085 2085 - 0x80; 2086 2086 - 0x60; 2087 2087 - 0xe9; 2088 2088 - 0x1a; 2089 2089 - 0x92; 2090 2090 - 0xa7; 2091 2091 - 0x57; 2092 2092 - 0xe3; 2093 2093 - 0x04; 2094 2094 - 0x8f; 2095 2095 - 0x68; 2096 2096 - 0xb0; 2097 2097 - 0x76; 2098 2098 - 0xf7; 2099 2099 - 0xd3; 2100 2100 - 0x6c; 2101 2101 - 0xc8; 2102 2102 - 0xf2; 2103 2103 - 0x9b; 2104 2104 - 0xa5; 2105 2105 - 0xdf; 2106 2106 - 0x81; 2107 2107 - 0xdc; 2108 2108 - 0x2c; 2109 2109 - 0xa7; 2110 2110 - 0x25; 2111 2111 - 0xec; 2112 2112 - 0xe6; 2113 2113 - 0x62; 2114 2114 - 0x70; 2115 2115 - 0xcc; 2116 2116 - 0x9a; 2117 2117 - 0x50; 2118 2118 - 0x35; 2119 2119 - 0xd8; 2120 2120 - 0xce; 2121 2121 - 0xce; 2122 2122 - 0xef; 2123 2123 - 0x9e; 2124 2124 - 0xa0; 2125 2125 - 0x27; 2126 2126 - 0x4a; 2127 2127 - 0x63; 2128 2128 - 0xab; 2129 2129 - 0x1e; 2130 2130 - 0x58; 2131 2131 - 0xfa; 2132 2132 - 0xfd; 2133 2133 - 0x49; 2134 2134 - 0x88; 2135 2135 - 0xd0; 2136 2136 - 0xf6; 2137 2137 - 0x5d; 2138 2138 - 0x14; 2139 2139 - 0x67; 2140 2140 - 0x57; 2141 2141 - 0xda; 2142 2142 - 0x07; 2143 2143 - 0x1d; 2144 2144 - 0xf0; 2145 2145 - 0x45; 2146 2146 - 0xcf; 2147 2147 - 0xe1; 2148 2148 - 0x6b; 2149 2149 - 0x9b; 2150 2150 - 0x00; 2151 2151 - 0x01; 2152 2152 - 0x02; 2153 2153 - 0x00; 2154 2154 - 0x80; 2155 2155 - 0x0c; 2156 2156 - 0x00; 2157 2157 - 0xda; 2158 2158 - 0x79; 2159 2159 - 0x24; 2160 2160 - 0x02; 2161 2161 - 0x33; 2162 2162 - 0x29; 2163 2163 - 0xf5; 2164 2164 - 0x81; 2165 2165 - 0xc4; 2166 2166 - 0x67; 2167 2167 - 0x5a; 2168 2168 - 0x03; 2169 2169 - 0x2b; 2170 2170 - 0xbf; 2171 2171 - 0xaf; 2172 2172 - 0xd6; 2173 2173 - 0x76; 2174 2174 - 0xdd; 2175 2175 - 0x26; 2176 2176 - 0xdc; 2177 2177 - 0xd4; 2178 2178 - 0x38; 2179 2179 - 0x35; 2180 2180 - 0xc1; 2181 2181 - 0x7f; 2182 2182 - 0x3a; 2183 2183 - 0x9e; 2184 2184 - 0x02; 2185 2185 - 0x31; 2186 2186 - 0x73; 2187 2187 - 0x17; 2188 2188 - 0xf2; 2189 2189 - 0x68; 2190 2190 - 0x5f; 2191 2191 - 0xd4; 2192 2192 - 0xf0; 2193 2193 - 0x6a; 2194 2194 - 0x97; 2195 2195 - 0x51; 2196 2196 - 0xb2; 2197 2197 - 0x42; 2198 2198 - 0xb4; 2199 2199 - 0x8d; 2200 2200 - 0x35; 2201 2201 - 0x89; 2202 2202 - 0x29; 2203 2203 - 0x96; 2204 2204 - 0x27; 2205 2205 - 0xf7; 2206 2206 - 0x89; 2207 2207 - 0x59; 2208 2208 - 0x9b; 2209 2209 - 0x93; 2210 2210 - 0xb0; 2211 2211 - 0x4f; 2212 2212 - 0x85; 2213 2213 - 0x28; 2214 2214 - 0xfa; 2215 2215 - 0x10; 2216 2216 - 0xe7; 2217 2217 - 0x15; 2218 2218 - 0x09; 2219 2219 - 0x71; 2220 2220 - 0x10; 2221 2221 - 0x36; 2222 2222 - 0x01; 2223 2223 - 0x60; 2224 2224 - 0xcf; 2225 2225 - 0xe0; 2226 2226 - 0x37; 2227 2227 - 0xbb; 2228 2228 - 0xfd; 2229 2229 - 0xcd; 2230 2230 - 0xc3; 2231 2231 - 0x9e; 2232 2232 - 0x27; 2233 2233 - 0xf8; 2234 2234 - 0xf4; 2235 2235 - 0x90; 2236 2236 - 0xcd; 2237 2237 - 0x87; 2238 2238 - 0xd9; 2239 2239 - 0x5c; 2240 2240 - 0x92; 2241 2241 - 0x08; 2242 2242 - 0x44; 2243 2243 - 0x32; 2244 2244 - 0xb5; 2245 2245 - 0x2b; 2246 2246 - 0xe2; 2247 2247 - 0xa5; 2248 2248 - 0x72; 2249 2249 - 0xde; 2250 2250 - 0x97; 2251 2251 - 0x0c; 2252 2252 - 0x4f; 2253 2253 - 0xc7; 2254 2254 - 0x60; 2255 2255 - 0x8d; 2256 2256 - 0xe7; 2257 2257 - 0xcf; 2258 2258 - 0x64; 2259 2259 - 0xba; 2260 2260 - 0x7e; 2261 2261 - 0x0d; 2262 2262 - 0x0f; 2263 2263 - 0x91; 2264 2264 - 0x58; 2265 2265 - 0x0d; 2266 2266 - 0x47; 2267 2267 - 0x6c; 2268 2268 - 0x3f; 2269 2269 - 0xb8; 2270 2270 - 0x4f; 2271 2271 - 0xb9; 2272 2272 - 0x02; 2273 2273 - 0xc5; 2274 2274 - 0xcc; 2275 2275 - 0x72; 2276 2276 - 0x33; 2277 2277 - 0x33; 2278 2278 - 0xde; 2279 2279 - 0xf2; 2280 2280 - 0x8f; 2281 2281 - 0x6b; 2282 2282 - 0x8c; 2283 2283 - ]; 2284 2284 - [ 2285 2285 - 0x00; 2286 2286 - 0x80; 2287 2287 - 0xbb; 2288 2288 - 0xbc; 2289 2289 - 0x2d; 2290 2290 - 0xca; 2291 2291 - 0xd8; 2292 2292 - 0x46; 2293 2293 - 0x74; 2294 2294 - 0x90; 2295 2295 - 0x7c; 2296 2296 - 0x43; 2297 2297 - 0xfc; 2298 2298 - 0xf5; 2299 2299 - 0x80; 2300 2300 - 0xe9; 2301 2301 - 0xcf; 2302 2302 - 0xdb; 2303 2303 - 0xd9; 2304 2304 - 0x58; 2305 2305 - 0xa3; 2306 2306 - 0xf5; 2307 2307 - 0x68; 2308 2308 - 0xb4; 2309 2309 - 0x2d; 2310 2310 - 0x4b; 2311 2311 - 0x08; 2312 2312 - 0xee; 2313 2313 - 0xd4; 2314 2314 - 0xeb; 2315 2315 - 0x0f; 2316 2316 - 0xb3; 2317 2317 - 0x50; 2318 2318 - 0x4c; 2319 2319 - 0x6c; 2320 2320 - 0x03; 2321 2321 - 0x02; 2322 2322 - 0x76; 2323 2323 - 0xe7; 2324 2324 - 0x10; 2325 2325 - 0x80; 2326 2326 - 0x0c; 2327 2327 - 0x5c; 2328 2328 - 0xcb; 2329 2329 - 0xba; 2330 2330 - 0xa8; 2331 2331 - 0x92; 2332 2332 - 0x26; 2333 2333 - 0x14; 2334 2334 - 0xc5; 2335 2335 - 0xbe; 2336 2336 - 0xec; 2337 2337 - 0xa5; 2338 2338 - 0x65; 2339 2339 - 0xa5; 2340 2340 - 0xfd; 2341 2341 - 0xf1; 2342 2342 - 0xd2; 2343 2343 - 0x87; 2344 2344 - 0xa2; 2345 2345 - 0xbc; 2346 2346 - 0x04; 2347 2347 - 0x9b; 2348 2348 - 0xe6; 2349 2349 - 0x77; 2350 2350 - 0x80; 2351 2351 - 0x60; 2352 2352 - 0xe9; 2353 2353 - 0x1a; 2354 2354 - 0x92; 2355 2355 - 0xa7; 2356 2356 - 0x57; 2357 2357 - 0xe3; 2358 2358 - 0x04; 2359 2359 - 0x8f; 2360 2360 - 0x68; 2361 2361 - 0xb0; 2362 2362 - 0x76; 2363 2363 - 0xf7; 2364 2364 - 0xd3; 2365 2365 - 0x6c; 2366 2366 - 0xc8; 2367 2367 - 0xf2; 2368 2368 - 0x9b; 2369 2369 - 0xa5; 2370 2370 - 0xdf; 2371 2371 - 0x81; 2372 2372 - 0xdc; 2373 2373 - 0x2c; 2374 2374 - 0xa7; 2375 2375 - 0x25; 2376 2376 - 0xec; 2377 2377 - 0xe6; 2378 2378 - 0x62; 2379 2379 - 0x70; 2380 2380 - 0xcc; 2381 2381 - 0x9a; 2382 2382 - 0x50; 2383 2383 - 0x35; 2384 2384 - 0xd8; 2385 2385 - 0xce; 2386 2386 - 0xce; 2387 2387 - 0xef; 2388 2388 - 0x9e; 2389 2389 - 0xa0; 2390 2390 - 0x27; 2391 2391 - 0x4a; 2392 2392 - 0x63; 2393 2393 - 0xab; 2394 2394 - 0x1e; 2395 2395 - 0x58; 2396 2396 - 0xfa; 2397 2397 - 0xfd; 2398 2398 - 0x49; 2399 2399 - 0x88; 2400 2400 - 0xd0; 2401 2401 - 0xf6; 2402 2402 - 0x5d; 2403 2403 - 0x14; 2404 2404 - 0x67; 2405 2405 - 0x57; 2406 2406 - 0xda; 2407 2407 - 0x07; 2408 2408 - 0x1d; 2409 2409 - 0xf0; 2410 2410 - 0x45; 2411 2411 - 0xcf; 2412 2412 - 0xe1; 2413 2413 - 0x6b; 2414 2414 - 0x9b; 2415 2415 - 0x00; 2416 2416 - 0x01; 2417 2417 - 0x02; 2418 2418 - 0x00; 2419 2419 - 0x80; 2420 2420 - 0x7e; 2421 2421 - 0x8f; 2422 2422 - 0xc7; 2423 2423 - 0x38; 2424 2424 - 0x8a; 2425 2425 - 0xf8; 2426 2426 - 0xdd; 2427 2427 - 0x7a; 2428 2428 - 0xb2; 2429 2429 - 0x0a; 2430 2430 - 0x07; 2431 2431 - 0xdd; 2432 2432 - 0x00; 2433 2433 - 0xfb; 2434 2434 - 0x63; 2435 2435 - 0x58; 2436 2436 - 0x85; 2437 2437 - 0xde; 2438 2438 - 0xc7; 2439 2439 - 0x6a; 2440 2440 - 0xe0; 2441 2441 - 0x0a; 2442 2442 - 0x51; 2443 2443 - 0x06; 2444 2444 - 0x7b; 2445 2445 - 0x3e; 2446 2446 - 0xfd; 2447 2447 - 0xac; 2448 2448 - 0xfe; 2449 2449 - 0xe2; 2450 2450 - 0x7a; 2451 2451 - 0xf7; 2452 2452 - 0x3f; 2453 2453 - 0xcb; 2454 2454 - 0xb2; 2455 2455 - 0xfc; 2456 2456 - 0x30; 2457 2457 - 0x45; 2458 2458 - 0xfa; 2459 2459 - 0x2b; 2460 2460 - 0x74; 2461 2461 - 0xb7; 2462 2462 - 0x2f; 2463 2463 - 0xf5; 2464 2464 - 0xf9; 2465 2465 - 0x52; 2466 2466 - 0xef; 2467 2467 - 0x93; 2468 2468 - 0x3f; 2469 2469 - 0xdb; 2470 2470 - 0x7e; 2471 2471 - 0x00; 2472 2472 - 0xe7; 2473 2473 - 0xd4; 2474 2474 - 0xa4; 2475 2475 - 0x20; 2476 2476 - 0xbe; 2477 2477 - 0x2d; 2478 2478 - 0x6f; 2479 2479 - 0xde; 2480 2480 - 0x28; 2481 2481 - 0x6c; 2482 2482 - 0x74; 2483 2483 - 0x8b; 2484 2484 - 0x23; 2485 2485 - 0xc6; 2486 2486 - 0x14; 2487 2487 - 0xdc; 2488 2488 - 0xb9; 2489 2489 - 0x24; 2490 2490 - 0xca; 2491 2491 - 0x87; 2492 2492 - 0xe0; 2493 2493 - 0xe9; 2494 2494 - 0x5e; 2495 2495 - 0xb0; 2496 2496 - 0x4e; 2497 2497 - 0x55; 2498 2498 - 0x74; 2499 2499 - 0x54; 2500 2500 - 0x4d; 2501 2501 - 0x8a; 2502 2502 - 0x21; 2503 2503 - 0x26; 2504 2504 - 0x62; 2505 2505 - 0x28; 2506 2506 - 0x2a; 2507 2507 - 0xe6; 2508 2508 - 0xb1; 2509 2509 - 0x29; 2510 2510 - 0xdc; 2511 2511 - 0xcd; 2512 2512 - 0xda; 2513 2513 - 0x27; 2514 2514 - 0xc4; 2515 2515 - 0xcd; 2516 2516 - 0x8d; 2517 2517 - 0xd3; 2518 2518 - 0x47; 2519 2519 - 0x40; 2520 2520 - 0x05; 2521 2521 - 0x1f; 2522 2522 - 0xbb; 2523 2523 - 0x80; 2524 2524 - 0xef; 2525 2525 - 0xa0; 2526 2526 - 0xf4; 2527 2527 - 0x5a; 2528 2528 - 0x22; 2529 2529 - 0x7c; 2530 2530 - 0x4a; 2531 2531 - 0xe5; 2532 2532 - 0xb0; 2533 2533 - 0x59; 2534 2534 - 0x68; 2535 2535 - 0xa5; 2536 2536 - 0x3e; 2537 2537 - 0xbb; 2538 2538 - 0x6f; 2539 2539 - 0x62; 2540 2540 - 0x30; 2541 2541 - 0x20; 2542 2542 - 0xc1; 2543 2543 - 0x43; 2544 2544 - 0x91; 2545 2545 - 0xd2; 2546 2546 - 0x79; 2547 2547 - 0xf5; 2548 2548 - ]; 2549 2549 - [ 2550 2550 - 0x00; 2551 2551 - 0x80; 2552 2552 - 0xbb; 2553 2553 - 0xbc; 2554 2554 - 0x2d; 2555 2555 - 0xca; 2556 2556 - 0xd8; 2557 2557 - 0x46; 2558 2558 - 0x74; 2559 2559 - 0x90; 2560 2560 - 0x7c; 2561 2561 - 0x43; 2562 2562 - 0xfc; 2563 2563 - 0xf5; 2564 2564 - 0x80; 2565 2565 - 0xe9; 2566 2566 - 0xcf; 2567 2567 - 0xdb; 2568 2568 - 0xd9; 2569 2569 - 0x58; 2570 2570 - 0xa3; 2571 2571 - 0xf5; 2572 2572 - 0x68; 2573 2573 - 0xb4; 2574 2574 - 0x2d; 2575 2575 - 0x4b; 2576 2576 - 0x08; 2577 2577 - 0xee; 2578 2578 - 0xd4; 2579 2579 - 0xeb; 2580 2580 - 0x0f; 2581 2581 - 0xb3; 2582 2582 - 0x50; 2583 2583 - 0x4c; 2584 2584 - 0x6c; 2585 2585 - 0x03; 2586 2586 - 0x02; 2587 2587 - 0x76; 2588 2588 - 0xe7; 2589 2589 - 0x10; 2590 2590 - 0x80; 2591 2591 - 0x0c; 2592 2592 - 0x5c; 2593 2593 - 0xcb; 2594 2594 - 0xba; 2595 2595 - 0xa8; 2596 2596 - 0x92; 2597 2597 - 0x26; 2598 2598 - 0x14; 2599 2599 - 0xc5; 2600 2600 - 0xbe; 2601 2601 - 0xec; 2602 2602 - 0xa5; 2603 2603 - 0x65; 2604 2604 - 0xa5; 2605 2605 - 0xfd; 2606 2606 - 0xf1; 2607 2607 - 0xd2; 2608 2608 - 0x87; 2609 2609 - 0xa2; 2610 2610 - 0xbc; 2611 2611 - 0x04; 2612 2612 - 0x9b; 2613 2613 - 0xe6; 2614 2614 - 0x77; 2615 2615 - 0x80; 2616 2616 - 0x60; 2617 2617 - 0xe9; 2618 2618 - 0x1a; 2619 2619 - 0x92; 2620 2620 - 0xa7; 2621 2621 - 0x57; 2622 2622 - 0xe3; 2623 2623 - 0x04; 2624 2624 - 0x8f; 2625 2625 - 0x68; 2626 2626 - 0xb0; 2627 2627 - 0x76; 2628 2628 - 0xf7; 2629 2629 - 0xd3; 2630 2630 - 0x6c; 2631 2631 - 0xc8; 2632 2632 - 0xf2; 2633 2633 - 0x9b; 2634 2634 - 0xa5; 2635 2635 - 0xdf; 2636 2636 - 0x81; 2637 2637 - 0xdc; 2638 2638 - 0x2c; 2639 2639 - 0xa7; 2640 2640 - 0x25; 2641 2641 - 0xec; 2642 2642 - 0xe6; 2643 2643 - 0x62; 2644 2644 - 0x70; 2645 2645 - 0xcc; 2646 2646 - 0x9a; 2647 2647 - 0x50; 2648 2648 - 0x35; 2649 2649 - 0xd8; 2650 2650 - 0xce; 2651 2651 - 0xce; 2652 2652 - 0xef; 2653 2653 - 0x9e; 2654 2654 - 0xa0; 2655 2655 - 0x27; 2656 2656 - 0x4a; 2657 2657 - 0x63; 2658 2658 - 0xab; 2659 2659 - 0x1e; 2660 2660 - 0x58; 2661 2661 - 0xfa; 2662 2662 - 0xfd; 2663 2663 - 0x49; 2664 2664 - 0x88; 2665 2665 - 0xd0; 2666 2666 - 0xf6; 2667 2667 - 0x5d; 2668 2668 - 0x14; 2669 2669 - 0x67; 2670 2670 - 0x57; 2671 2671 - 0xda; 2672 2672 - 0x07; 2673 2673 - 0x1d; 2674 2674 - 0xf0; 2675 2675 - 0x45; 2676 2676 - 0xcf; 2677 2677 - 0xe1; 2678 2678 - 0x6b; 2679 2679 - 0x9b; 2680 2680 - 0x00; 2681 2681 - 0x01; 2682 2682 - 0x02; 2683 2683 - 0x00; 2684 2684 - 0x80; 2685 2685 - 0x73; 2686 2686 - 0x47; 2687 2687 - 0x2a; 2688 2688 - 0xde; 2689 2689 - 0x22; 2690 2690 - 0x94; 2691 2691 - 0x39; 2692 2692 - 0x77; 2693 2693 - 0x46; 2694 2694 - 0x25; 2695 2695 - 0xe2; 2696 2696 - 0x2d; 2697 2697 - 0x4f; 2698 2698 - 0x8d; 2699 2699 - 0x9e; 2700 2700 - 0x99; 2701 2701 - 0x10; 2702 2702 - 0xa2; 2703 2703 - 0x1a; 2704 2704 - 0xd6; 2705 2705 - 0xf1; 2706 2706 - 0xe6; 2707 2707 - 0x25; 2708 2708 - 0x7f; 2709 2709 - 0x76; 2710 2710 - 0xbe; 2711 2711 - 0x87; 2712 2712 - 0xf6; 2713 2713 - 0xff; 2714 2714 - 0xce; 2715 2715 - 0x7d; 2716 2716 - 0xd7; 2717 2717 - 0xd2; 2718 2718 - 0xee; 2719 2719 - 0xc5; 2720 2720 - 0x01; 2721 2721 - 0x0b; 2722 2722 - 0x14; 2723 2723 - 0xa1; 2724 2724 - 0xda; 2725 2725 - 0x0a; 2726 2726 - 0x56; 2727 2727 - 0x4f; 2728 2728 - 0xff; 2729 2729 - 0x8c; 2730 2730 - 0xdd; 2731 2731 - 0x84; 2732 2732 - 0x7c; 2733 2733 - 0xd8; 2734 2734 - 0xcc; 2735 2735 - 0xa8; 2736 2736 - 0xc1; 2737 2737 - 0xc3; 2738 2738 - 0xa1; 2739 2739 - 0xbf; 2740 2740 - 0x15; 2741 2741 - 0x38; 2742 2742 - 0xc9; 2743 2743 - 0x4f; 2744 2744 - 0xc3; 2745 2745 - 0x7b; 2746 2746 - 0xde; 2747 2747 - 0xf3; 2748 2748 - 0x37; 2749 2749 - 0xf3; 2750 2750 - 0x2f; 2751 2751 - 0x8e; 2752 2752 - 0x72; 2753 2753 - 0x4d; 2754 2754 - 0xfb; 2755 2755 - 0x69; 2756 2756 - 0xc6; 2757 2757 - 0x4d; 2758 2758 - 0xe4; 2759 2759 - 0x84; 2760 2760 - 0x46; 2761 2761 - 0x64; 2762 2762 - 0xe1; 2763 2763 - 0xb5; 2764 2764 - 0x02; 2765 2765 - 0xe8; 2766 2766 - 0xf9; 2767 2767 - 0xbd; 2768 2768 - 0x94; 2769 2769 - 0xbf; 2770 2770 - 0x40; 2771 2771 - 0x5e; 2772 2772 - 0x1f; 2773 2773 - 0xb6; 2774 2774 - 0x39; 2775 2775 - 0xb9; 2776 2776 - 0x0b; 2777 2777 - 0x1a; 2778 2778 - 0x79; 2779 2779 - 0xf1; 2780 2780 - 0xa6; 2781 2781 - 0x3d; 2782 2782 - 0xee; 2783 2783 - 0x7a; 2784 2784 - 0x02; 2785 2785 - 0xff; 2786 2786 - 0x62; 2787 2787 - 0x0d; 2788 2788 - 0xc6; 2789 2789 - 0x1e; 2790 2790 - 0xfb; 2791 2791 - 0x5a; 2792 2792 - 0xcd; 2793 2793 - 0x36; 2794 2794 - 0xee; 2795 2795 - 0x6d; 2796 2796 - 0x67; 2797 2797 - 0x5f; 2798 2798 - 0x81; 2799 2799 - 0xf4; 2800 2800 - 0xde; 2801 2801 - 0x62; 2802 2802 - 0x15; 2803 2803 - 0xb6; 2804 2804 - 0x9a; 2805 2805 - 0xf3; 2806 2806 - 0x24; 2807 2807 - 0xa2; 2808 2808 - 0xb3; 2809 2809 - 0x95; 2810 2810 - 0xdf; 2811 2811 - 0x6a; 2812 2812 - 0xa2; 2813 2813 - ]; 2814 2814 - ] 2815 2815 - 2816 2816 - let good_dh_param_parser xs _ = 2817 2817 - let buf = list_to_cstruct xs in 2818 2818 - match Reader.parse_dh_parameters buf with 2819 2819 - | Error _ -> assert_failure "dh params parser broken" 2820 2820 - | Ok (_, _, rst) -> assert_equal 0 (String.length rst) 2821 2821 - 2822 2822 - let good_dh_params_tests = 2823 2823 - List.mapi 2824 2824 - (fun i f -> 2825 2825 - "Parse good dh_param " ^ string_of_int i >:: good_dh_param_parser f) 2826 2826 - good_dhparams 2827 2827 - 2828 2828 - let bad_dh_param_parser buf _ = 2829 2829 - match Reader.parse_dh_parameters buf with 2830 2830 - | Error _ -> () 2831 2831 - | Ok (_, _, rst) -> 2832 2832 - if String.length rst = 0 then assert_failure "dh params parser broken" 2833 2833 - 2834 2834 - let bad_dh_params_tests = 2835 2835 - let param = list_to_cstruct (List.hd good_dhparams) in 2836 2836 - let l = String.length param in 2837 2837 - let bad_params = 2838 2838 - [ 2839 2839 - param ^ String.make 1 '\x00'; 2840 2840 - String.sub param 2 20; 2841 2841 - String.sub param 0 20; 2842 2842 - list_to_cstruct [ 2 ] ^ param; 2843 2843 - list_to_cstruct [ 0 ] ^ param; 2844 2844 - list_to_cstruct [ 0; 1 ] ^ param; 2845 2845 - list_to_cstruct [ 0; 0 ] ^ param; 2846 2846 - list_to_cstruct [ 0xff; 0xff ] ^ param; 2847 2847 - list_to_cstruct [ 0; 0xff ] ^ param; 2848 2848 - String.sub param 1 (String.length param - 1); 2849 2849 - String.sub param 0 (pred l); 2850 2850 - ] 2851 2851 - in 2852 2852 - let lastparam = list_to_cstruct (List.nth good_dhparams 5) in 2853 2853 - let l = String.length lastparam in 2854 2854 - let more_bad = 2855 2855 - [ 2856 2856 - String.sub lastparam 0 130 2857 2857 - ^ list_to_cstruct [ 0; 5; 1 ] 2858 2858 - ^ String.sub lastparam 130 (l - 130); 2859 2859 - String.sub lastparam 0 133 2860 2860 - ^ list_to_cstruct [ 0; 5; 1 ] 2861 2861 - ^ String.sub lastparam 133 (l - 133); 2862 2862 - ] 2863 2863 - in 2864 2864 - List.mapi 2865 2865 - (fun i f -> 2866 2866 - "Parse bad dh_param " ^ string_of_int i >:: bad_dh_param_parser f) 2867 2867 - (bad_params @ more_bad) 2868 2868 - 2869 2869 - let good_digitally_signed_1_2 = 2870 2870 - [ 2871 2871 - [ 2872 2872 - 0x06; 2873 2873 - 0x01; 2874 2874 - 0x01; 2875 2875 - 0x00; 2876 2876 - 0x30; 2877 2877 - 0x92; 2878 2878 - 0xf4; 2879 2879 - 0x70; 2880 2880 - 0xb1; 2881 2881 - 0x02; 2882 2882 - 0x0a; 2883 2883 - 0x51; 2884 2884 - 0xb6; 2885 2885 - 0x0e; 2886 2886 - 0x49; 2887 2887 - 0x1e; 2888 2888 - 0x16; 2889 2889 - 0x6d; 2890 2890 - 0x9f; 2891 2891 - 0xb5; 2892 2892 - 0xfe; 2893 2893 - 0x73; 2894 2894 - 0x5e; 2895 2895 - 0x2f; 2896 2896 - 0x18; 2897 2897 - 0xbc; 2898 2898 - 0xf7; 2899 2899 - 0x87; 2900 2900 - 0xab; 2901 2901 - 0x2c; 2902 2902 - 0xad; 2903 2903 - 0x7e; 2904 2904 - 0x54; 2905 2905 - 0x40; 2906 2906 - 0x99; 2907 2907 - 0x30; 2908 2908 - 0xa2; 2909 2909 - 0x2e; 2910 2910 - 0x55; 2911 2911 - 0xe0; 2912 2912 - 0xf3; 2913 2913 - 0x05; 2914 2914 - 0xe1; 2915 2915 - 0x81; 2916 2916 - 0x67; 2917 2917 - 0x78; 2918 2918 - 0x49; 2919 2919 - 0x29; 2920 2920 - 0xe6; 2921 2921 - 0x5d; 2922 2922 - 0x2c; 2923 2923 - 0x64; 2924 2924 - 0x57; 2925 2925 - 0xeb; 2926 2926 - 0x8c; 2927 2927 - 0x68; 2928 2928 - 0x24; 2929 2929 - 0xe1; 2930 2930 - 0xba; 2931 2931 - 0x69; 2932 2932 - 0x50; 2933 2933 - 0xc7; 2934 2934 - 0xda; 2935 2935 - 0x73; 2936 2936 - 0x9a; 2937 2937 - 0x02; 2938 2938 - 0xe4; 2939 2939 - 0xbc; 2940 2940 - 0xc0; 2941 2941 - 0x76; 2942 2942 - 0x65; 2943 2943 - 0xaf; 2944 2944 - 0x31; 2945 2945 - 0x93; 2946 2946 - 0xbc; 2947 2947 - 0x2f; 2948 2948 - 0x5c; 2949 2949 - 0xdb; 2950 2950 - 0xa5; 2951 2951 - 0x1d; 2952 2952 - 0x4e; 2953 2953 - 0xb2; 2954 2954 - 0x75; 2955 2955 - 0x0d; 2956 2956 - 0xb4; 2957 2957 - 0x22; 2958 2958 - 0x23; 2959 2959 - 0x05; 2960 2960 - 0x5b; 2961 2961 - 0x8c; 2962 2962 - 0xa0; 2963 2963 - 0x14; 2964 2964 - 0x4c; 2965 2965 - 0x64; 2966 2966 - 0xb9; 2967 2967 - 0x91; 2968 2968 - 0xa6; 2969 2969 - 0x22; 2970 2970 - 0xc2; 2971 2971 - 0x49; 2972 2972 - 0xaa; 2973 2973 - 0x41; 2974 2974 - 0xb0; 2975 2975 - 0x42; 2976 2976 - 0x04; 2977 2977 - 0x2a; 2978 2978 - 0x03; 2979 2979 - 0x03; 2980 2980 - 0x1e; 2981 2981 - 0x62; 2982 2982 - 0x74; 2983 2983 - 0x64; 2984 2984 - 0x98; 2985 2985 - 0xaf; 2986 2986 - 0xcf; 2987 2987 - 0x9a; 2988 2988 - 0xd0; 2989 2989 - 0x22; 2990 2990 - 0xa8; 2991 2991 - 0xf3; 2992 2992 - 0xa5; 2993 2993 - 0x0a; 2994 2994 - 0x0d; 2995 2995 - 0xe9; 2996 2996 - 0xdc; 2997 2997 - 0xe2; 2998 2998 - 0x89; 2999 2999 - 0xe5; 3000 3000 - 0x54; 3001 3001 - 0xa2; 3002 3002 - 0x28; 3003 3003 - 0x25; 3004 3004 - 0x69; 3005 3005 - 0x4e; 3006 3006 - 0xe5; 3007 3007 - 0xc3; 3008 3008 - 0xa6; 3009 3009 - 0x23; 3010 3010 - 0xd2; 3011 3011 - 0xeb; 3012 3012 - 0x67; 3013 3013 - 0x8a; 3014 3014 - 0xb8; 3015 3015 - 0x4a; 3016 3016 - 0xac; 3017 3017 - 0x19; 3018 3018 - 0x1d; 3019 3019 - 0x00; 3020 3020 - 0xa9; 3021 3021 - 0xec; 3022 3022 - 0xca; 3023 3023 - 0xeb; 3024 3024 - 0xf9; 3025 3025 - 0x79; 3026 3026 - 0x2c; 3027 3027 - 0x7c; 3028 3028 - 0x6e; 3029 3029 - 0x31; 3030 3030 - 0x7f; 3031 3031 - 0x64; 3032 3032 - 0x64; 3033 3033 - 0xa2; 3034 3034 - 0xfb; 3035 3035 - 0x93; 3036 3036 - 0xc5; 3037 3037 - 0x91; 3038 3038 - 0xa2; 3039 3039 - 0xad; 3040 3040 - 0x8e; 3041 3041 - 0x36; 3042 3042 - 0x07; 3043 3043 - 0xe8; 3044 3044 - 0x51; 3045 3045 - 0x0b; 3046 3046 - 0x08; 3047 3047 - 0x36; 3048 3048 - 0xb7; 3049 3049 - 0x78; 3050 3050 - 0xac; 3051 3051 - 0x21; 3052 3052 - 0x3d; 3053 3053 - 0xc9; 3054 3054 - 0xfb; 3055 3055 - 0xae; 3056 3056 - 0xab; 3057 3057 - 0xe5; 3058 3058 - 0xd9; 3059 3059 - 0x9c; 3060 3060 - 0xa7; 3061 3061 - 0xee; 3062 3062 - 0x5e; 3063 3063 - 0xcb; 3064 3064 - 0xab; 3065 3065 - 0x57; 3066 3066 - 0x9d; 3067 3067 - 0x62; 3068 3068 - 0x6c; 3069 3069 - 0x2e; 3070 3070 - 0xbd; 3071 3071 - 0x6d; 3072 3072 - 0x4a; 3073 3073 - 0xd0; 3074 3074 - 0x36; 3075 3075 - 0xb1; 3076 3076 - 0xa8; 3077 3077 - 0xf1; 3078 3078 - 0x22; 3079 3079 - 0xd8; 3080 3080 - 0x97; 3081 3081 - 0x5c; 3082 3082 - 0x24; 3083 3083 - 0xb3; 3084 3084 - 0x72; 3085 3085 - 0x55; 3086 3086 - 0x20; 3087 3087 - 0x39; 3088 3088 - 0x29; 3089 3089 - 0x26; 3090 3090 - 0x51; 3091 3091 - 0x3b; 3092 3092 - 0x9c; 3093 3093 - 0x48; 3094 3094 - 0x80; 3095 3095 - 0x25; 3096 3096 - 0xa9; 3097 3097 - 0xf4; 3098 3098 - 0xc1; 3099 3099 - 0xb0; 3100 3100 - 0x57; 3101 3101 - 0xd8; 3102 3102 - 0x3f; 3103 3103 - 0x54; 3104 3104 - 0x5e; 3105 3105 - 0x99; 3106 3106 - 0x27; 3107 3107 - 0x36; 3108 3108 - 0x81; 3109 3109 - 0xcd; 3110 3110 - 0x23; 3111 3111 - 0xf6; 3112 3112 - 0xaa; 3113 3113 - 0x84; 3114 3114 - 0x98; 3115 3115 - 0xf8; 3116 3116 - 0x66; 3117 3117 - 0x79; 3118 3118 - 0xe1; 3119 3119 - 0x16; 3120 3120 - 0xb9; 3121 3121 - 0xeb; 3122 3122 - 0xc6; 3123 3123 - 0x9a; 3124 3124 - 0x86; 3125 3125 - 0x90; 3126 3126 - 0xa6; 3127 3127 - 0xa2; 3128 3128 - 0x9d; 3129 3129 - 0x0d; 3130 3130 - 0x86; 3131 3131 - 0x32; 3132 3132 - ]; 3133 3133 - [ 3134 3134 - 0x06; 3135 3135 - 0x01; 3136 3136 - 0x01; 3137 3137 - 0x00; 3138 3138 - 0x8e; 3139 3139 - 0x02; 3140 3140 - 0x51; 3141 3141 - 0x93; 3142 3142 - 0x67; 3143 3143 - 0xe8; 3144 3144 - 0x68; 3145 3145 - 0xfe; 3146 3146 - 0x65; 3147 3147 - 0x61; 3148 3148 - 0xda; 3149 3149 - 0xf0; 3150 3150 - 0x25; 3151 3151 - 0x1a; 3152 3152 - 0x19; 3153 3153 - 0x5a; 3154 3154 - 0x36; 3155 3155 - 0x42; 3156 3156 - 0x11; 3157 3157 - 0xdd; 3158 3158 - 0x00; 3159 3159 - 0x2b; 3160 3160 - 0xf2; 3161 3161 - 0x38; 3162 3162 - 0x98; 3163 3163 - 0xef; 3164 3164 - 0x94; 3165 3165 - 0x42; 3166 3166 - 0xac; 3167 3167 - 0x3d; 3168 3168 - 0x82; 3169 3169 - 0xc7; 3170 3170 - 0x85; 3171 3171 - 0x72; 3172 3172 - 0xf3; 3173 3173 - 0xb7; 3174 3174 - 0x73; 3175 3175 - 0x4d; 3176 3176 - 0x6b; 3177 3177 - 0x64; 3178 3178 - 0x66; 3179 3179 - 0x6a; 3180 3180 - 0x89; 3181 3181 - 0x6d; 3182 3182 - 0x95; 3183 3183 - 0x67; 3184 3184 - 0xdb; 3185 3185 - 0xb7; 3186 3186 - 0x83; 3187 3187 - 0x1e; 3188 3188 - 0xb1; 3189 3189 - 0x7c; 3190 3190 - 0xf4; 3191 3191 - 0xb9; 3192 3192 - 0x60; 3193 3193 - 0xbd; 3194 3194 - 0x91; 3195 3195 - 0x26; 3196 3196 - 0xe0; 3197 3197 - 0x4c; 3198 3198 - 0x6c; 3199 3199 - 0x92; 3200 3200 - 0xc7; 3201 3201 - 0xc4; 3202 3202 - 0x8b; 3203 3203 - 0xb5; 3204 3204 - 0x8d; 3205 3205 - 0xaf; 3206 3206 - 0xfd; 3207 3207 - 0xaa; 3208 3208 - 0xd9; 3209 3209 - 0xcc; 3210 3210 - 0x2f; 3211 3211 - 0xaf; 3212 3212 - 0x6b; 3213 3213 - 0x18; 3214 3214 - 0xf7; 3215 3215 - 0x4f; 3216 3216 - 0xcd; 3217 3217 - 0x8d; 3218 3218 - 0x54; 3219 3219 - 0xe1; 3220 3220 - 0x70; 3221 3221 - 0x5c; 3222 3222 - 0xa9; 3223 3223 - 0xec; 3224 3224 - 0x85; 3225 3225 - 0xd9; 3226 3226 - 0x7b; 3227 3227 - 0x5b; 3228 3228 - 0xa2; 3229 3229 - 0x9a; 3230 3230 - 0x55; 3231 3231 - 0xc2; 3232 3232 - 0x5a; 3233 3233 - 0x87; 3234 3234 - 0xd4; 3235 3235 - 0xbe; 3236 3236 - 0x49; 3237 3237 - 0xf2; 3238 3238 - 0x03; 3239 3239 - 0x95; 3240 3240 - 0x50; 3241 3241 - 0x5f; 3242 3242 - 0x62; 3243 3243 - 0xa7; 3244 3244 - 0x4d; 3245 3245 - 0x13; 3246 3246 - 0x29; 3247 3247 - 0xae; 3248 3248 - 0x19; 3249 3249 - 0xcc; 3250 3250 - 0x2e; 3251 3251 - 0x21; 3252 3252 - 0x9b; 3253 3253 - 0x36; 3254 3254 - 0x60; 3255 3255 - 0xc4; 3256 3256 - 0xd7; 3257 3257 - 0x5a; 3258 3258 - 0x8f; 3259 3259 - 0xe2; 3260 3260 - 0x67; 3261 3261 - 0x73; 3262 3262 - 0x22; 3263 3263 - 0x85; 3264 3264 - 0x66; 3265 3265 - 0xbb; 3266 3266 - 0x00; 3267 3267 - 0x00; 3268 3268 - 0x97; 3269 3269 - 0x10; 3270 3270 - 0xbc; 3271 3271 - 0x19; 3272 3272 - 0x16; 3273 3273 - 0xce; 3274 3274 - 0x14; 3275 3275 - 0x8e; 3276 3276 - 0x27; 3277 3277 - 0x1e; 3278 3278 - 0x79; 3279 3279 - 0x3e; 3280 3280 - 0xbd; 3281 3281 - 0xc3; 3282 3282 - 0xc9; 3283 3283 - 0x5c; 3284 3284 - 0xc2; 3285 3285 - 0xbf; 3286 3286 - 0x7b; 3287 3287 - 0x83; 3288 3288 - 0xba; 3289 3289 - 0x00; 3290 3290 - 0x20; 3291 3291 - 0x18; 3292 3292 - 0x54; 3293 3293 - 0x0b; 3294 3294 - 0x09; 3295 3295 - 0x11; 3296 3296 - 0xb3; 3297 3297 - 0x0b; 3298 3298 - 0x75; 3299 3299 - 0x7d; 3300 3300 - 0xf6; 3301 3301 - 0xc7; 3302 3302 - 0x80; 3303 3303 - 0x76; 3304 3304 - 0x25; 3305 3305 - 0x3c; 3306 3306 - 0x3b; 3307 3307 - 0xdb; 3308 3308 - 0x67; 3309 3309 - 0xc5; 3310 3310 - 0xe7; 3311 3311 - 0x77; 3312 3312 - 0x0a; 3313 3313 - 0xe1; 3314 3314 - 0xbf; 3315 3315 - 0xd9; 3316 3316 - 0xc2; 3317 3317 - 0x6c; 3318 3318 - 0xc2; 3319 3319 - 0x3f; 3320 3320 - 0x37; 3321 3321 - 0x4b; 3322 3322 - 0xcf; 3323 3323 - 0x6c; 3324 3324 - 0x64; 3325 3325 - 0x53; 3326 3326 - 0x4a; 3327 3327 - 0xf3; 3328 3328 - 0x81; 3329 3329 - 0x6d; 3330 3330 - 0xd8; 3331 3331 - 0x13; 3332 3332 - 0xce; 3333 3333 - 0xb4; 3334 3334 - 0x84; 3335 3335 - 0x42; 3336 3336 - 0x7b; 3337 3337 - 0x73; 3338 3338 - 0x85; 3339 3339 - 0x11; 3340 3340 - 0xaa; 3341 3341 - 0x0e; 3342 3342 - 0x39; 3343 3343 - 0xd8; 3344 3344 - 0x99; 3345 3345 - 0x76; 3346 3346 - 0x5e; 3347 3347 - 0xe8; 3348 3348 - 0xe0; 3349 3349 - 0xbc; 3350 3350 - 0x08; 3351 3351 - 0xe6; 3352 3352 - 0x7b; 3353 3353 - 0xba; 3354 3354 - 0xc9; 3355 3355 - 0x6e; 3356 3356 - 0xdd; 3357 3357 - 0x63; 3358 3358 - 0x38; 3359 3359 - 0xca; 3360 3360 - 0x5b; 3361 3361 - 0x8b; 3362 3362 - 0x74; 3363 3363 - 0xed; 3364 3364 - 0x52; 3365 3365 - 0x04; 3366 3366 - 0xe3; 3367 3367 - 0x64; 3368 3368 - 0xe6; 3369 3369 - 0xdc; 3370 3370 - 0xfa; 3371 3371 - 0x1d; 3372 3372 - 0x46; 3373 3373 - 0xca; 3374 3374 - 0x5d; 3375 3375 - 0xf8; 3376 3376 - 0x18; 3377 3377 - 0x3e; 3378 3378 - 0xa7; 3379 3379 - 0x39; 3380 3380 - 0x7e; 3381 3381 - 0x19; 3382 3382 - 0xb9; 3383 3383 - 0x2f; 3384 3384 - 0x87; 3385 3385 - 0x5b; 3386 3386 - 0x2a; 3387 3387 - 0x55; 3388 3388 - 0x85; 3389 3389 - 0xe5; 3390 3390 - 0x9e; 3391 3391 - 0x92; 3392 3392 - 0x6b; 3393 3393 - 0x62; 3394 3394 - ]; 3395 3395 - [ 3396 3396 - 0x06; 3397 3397 - 0x01; 3398 3398 - 0x01; 3399 3399 - 0x00; 3400 3400 - 0x2b; 3401 3401 - 0x5b; 3402 3402 - 0x89; 3403 3403 - 0xfa; 3404 3404 - 0x67; 3405 3405 - 0x4b; 3406 3406 - 0x58; 3407 3407 - 0x45; 3408 3408 - 0xd4; 3409 3409 - 0x8f; 3410 3410 - 0x22; 3411 3411 - 0x4b; 3412 3412 - 0x53; 3413 3413 - 0x3b; 3414 3414 - 0x92; 3415 3415 - 0x2b; 3416 3416 - 0x37; 3417 3417 - 0x18; 3418 3418 - 0xcd; 3419 3419 - 0x05; 3420 3420 - 0xda; 3421 3421 - 0xb5; 3422 3422 - 0x85; 3423 3423 - 0x11; 3424 3424 - 0x23; 3425 3425 - 0x12; 3426 3426 - 0xdc; 3427 3427 - 0x18; 3428 3428 - 0xb5; 3429 3429 - 0x9f; 3430 3430 - 0xb0; 3431 3431 - 0x45; 3432 3432 - 0x16; 3433 3433 - 0xf3; 3434 3434 - 0x1c; 3435 3435 - 0xf8; 3436 3436 - 0x93; 3437 3437 - 0xb8; 3438 3438 - 0x8c; 3439 3439 - 0x37; 3440 3440 - 0xd5; 3441 3441 - 0x60; 3442 3442 - 0x68; 3443 3443 - 0xee; 3444 3444 - 0x75; 3445 3445 - 0x53; 3446 3446 - 0xa9; 3447 3447 - 0x5f; 3448 3448 - 0x22; 3449 3449 - 0x4e; 3450 3450 - 0x01; 3451 3451 - 0x2b; 3452 3452 - 0xb3; 3453 3453 - 0xb6; 3454 3454 - 0x3e; 3455 3455 - 0x29; 3456 3456 - 0xba; 3457 3457 - 0x2c; 3458 3458 - 0xef; 3459 3459 - 0xa8; 3460 3460 - 0x3f; 3461 3461 - 0x07; 3462 3462 - 0xa3; 3463 3463 - 0xfb; 3464 3464 - 0x91; 3465 3465 - 0xf8; 3466 3466 - 0x2c; 3467 3467 - 0x8d; 3468 3468 - 0x23; 3469 3469 - 0xe3; 3470 3470 - 0x8d; 3471 3471 - 0x26; 3472 3472 - 0x26; 3473 3473 - 0x11; 3474 3474 - 0xa4; 3475 3475 - 0xd9; 3476 3476 - 0xa0; 3477 3477 - 0xa4; 3478 3478 - 0x10; 3479 3479 - 0x11; 3480 3480 - 0x40; 3481 3481 - 0x1a; 3482 3482 - 0xad; 3483 3483 - 0xc3; 3484 3484 - 0xa4; 3485 3485 - 0x99; 3486 3486 - 0x5a; 3487 3487 - 0xae; 3488 3488 - 0x97; 3489 3489 - 0xae; 3490 3490 - 0x9b; 3491 3491 - 0x39; 3492 3492 - 0xdc; 3493 3493 - 0x98; 3494 3494 - 0xb3; 3495 3495 - 0x34; 3496 3496 - 0xe7; 3497 3497 - 0x08; 3498 3498 - 0xb4; 3499 3499 - 0x5f; 3500 3500 - 0xae; 3501 3501 - 0xa1; 3502 3502 - 0xf7; 3503 3503 - 0x79; 3504 3504 - 0x92; 3505 3505 - 0xd3; 3506 3506 - 0x8d; 3507 3507 - 0x23; 3508 3508 - 0x47; 3509 3509 - 0xa4; 3510 3510 - 0x8d; 3511 3511 - 0xa8; 3512 3512 - 0x1a; 3513 3513 - 0x4a; 3514 3514 - 0xae; 3515 3515 - 0x10; 3516 3516 - 0xd7; 3517 3517 - 0xf8; 3518 3518 - 0xe0; 3519 3519 - 0x7a; 3520 3520 - 0xf4; 3521 3521 - 0x52; 3522 3522 - 0x5a; 3523 3523 - 0xb0; 3524 3524 - 0xc3; 3525 3525 - 0x6f; 3526 3526 - 0x5a; 3527 3527 - 0x8a; 3528 3528 - 0x94; 3529 3529 - 0x75; 3530 3530 - 0xbf; 3531 3531 - 0x27; 3532 3532 - 0xc1; 3533 3533 - 0xbb; 3534 3534 - 0xb0; 3535 3535 - 0x5c; 3536 3536 - 0x66; 3537 3537 - 0x66; 3538 3538 - 0x60; 3539 3539 - 0x0d; 3540 3540 - 0xdd; 3541 3541 - 0xa8; 3542 3542 - 0xcf; 3543 3543 - 0x1b; 3544 3544 - 0xee; 3545 3545 - 0x6f; 3546 3546 - 0x33; 3547 3547 - 0x63; 3548 3548 - 0xec; 3549 3549 - 0xaa; 3550 3550 - 0x16; 3551 3551 - 0x15; 3552 3552 - 0x3a; 3553 3553 - 0xcc; 3554 3554 - 0x72; 3555 3555 - 0x6f; 3556 3556 - 0x9e; 3557 3557 - 0xc1; 3558 3558 - 0x06; 3559 3559 - 0xf3; 3560 3560 - 0x45; 3561 3561 - 0xec; 3562 3562 - 0x7f; 3563 3563 - 0x6b; 3564 3564 - 0x17; 3565 3565 - 0xab; 3566 3566 - 0xce; 3567 3567 - 0x63; 3568 3568 - 0x15; 3569 3569 - 0x8c; 3570 3570 - 0x0e; 3571 3571 - 0x61; 3572 3572 - 0x98; 3573 3573 - 0xd9; 3574 3574 - 0xc4; 3575 3575 - 0x68; 3576 3576 - 0xba; 3577 3577 - 0x56; 3578 3578 - 0x88; 3579 3579 - 0x0a; 3580 3580 - 0x46; 3581 3581 - 0xcc; 3582 3582 - 0x0c; 3583 3583 - 0xd9; 3584 3584 - 0x09; 3585 3585 - 0xea; 3586 3586 - 0x8f; 3587 3587 - 0xdb; 3588 3588 - 0x28; 3589 3589 - 0x35; 3590 3590 - 0x16; 3591 3591 - 0xa2; 3592 3592 - 0x5d; 3593 3593 - 0xfb; 3594 3594 - 0xc2; 3595 3595 - 0x93; 3596 3596 - 0xf3; 3597 3597 - 0xa5; 3598 3598 - 0x53; 3599 3599 - 0xe4; 3600 3600 - 0x94; 3601 3601 - 0xda; 3602 3602 - 0x45; 3603 3603 - 0xa9; 3604 3604 - 0x81; 3605 3605 - 0x0c; 3606 3606 - 0x43; 3607 3607 - 0x45; 3608 3608 - 0x67; 3609 3609 - 0xef; 3610 3610 - 0x70; 3611 3611 - 0x4a; 3612 3612 - 0x06; 3613 3613 - 0x67; 3614 3614 - 0xb1; 3615 3615 - 0xb6; 3616 3616 - 0x30; 3617 3617 - 0x19; 3618 3618 - 0x16; 3619 3619 - 0xb1; 3620 3620 - 0xeb; 3621 3621 - 0x28; 3622 3622 - 0x3c; 3623 3623 - 0x8b; 3624 3624 - 0x13; 3625 3625 - 0x94; 3626 3626 - 0x1a; 3627 3627 - 0x79; 3628 3628 - 0x8c; 3629 3629 - 0x92; 3630 3630 - 0x7b; 3631 3631 - 0xe0; 3632 3632 - 0xfb; 3633 3633 - 0xea; 3634 3634 - 0xd1; 3635 3635 - 0xfc; 3636 3636 - 0x50; 3637 3637 - 0xf8; 3638 3638 - 0xb7; 3639 3639 - 0x86; 3640 3640 - 0x76; 3641 3641 - 0xa1; 3642 3642 - 0x69; 3643 3643 - 0x81; 3644 3644 - 0x3e; 3645 3645 - 0xb1; 3646 3646 - 0x88; 3647 3647 - 0xf5; 3648 3648 - 0xa7; 3649 3649 - 0x05; 3650 3650 - 0xe9; 3651 3651 - 0xe1; 3652 3652 - 0xd1; 3653 3653 - 0x9e; 3654 3654 - 0xbc; 3655 3655 - 0x15; 3656 3656 - ]; 3657 3657 - [ 3658 3658 - 0x06; 3659 3659 - 0x01; 3660 3660 - 0x01; 3661 3661 - 0x00; 3662 3662 - 0x6c; 3663 3663 - 0x1b; 3664 3664 - 0xe8; 3665 3665 - 0x31; 3666 3666 - 0x7b; 3667 3667 - 0xab; 3668 3668 - 0x2b; 3669 3669 - 0x5f; 3670 3670 - 0xa0; 3671 3671 - 0x9f; 3672 3672 - 0x6d; 3673 3673 - 0x73; 3674 3674 - 0x43; 3675 3675 - 0x83; 3676 3676 - 0x67; 3677 3677 - 0xd2; 3678 3678 - 0x85; 3679 3679 - 0xae; 3680 3680 - 0x85; 3681 3681 - 0x56; 3682 3682 - 0x65; 3683 3683 - 0x6a; 3684 3684 - 0xf9; 3685 3685 - 0x82; 3686 3686 - 0xc0; 3687 3687 - 0x29; 3688 3688 - 0x48; 3689 3689 - 0x28; 3690 3690 - 0x9d; 3691 3691 - 0xd9; 3692 3692 - 0x2a; 3693 3693 - 0x23; 3694 3694 - 0xea; 3695 3695 - 0x8d; 3696 3696 - 0x0c; 3697 3697 - 0xc2; 3698 3698 - 0x9e; 3699 3699 - 0x8f; 3700 3700 - 0x84; 3701 3701 - 0xb6; 3702 3702 - 0x74; 3703 3703 - 0x5d; 3704 3704 - 0xaf; 3705 3705 - 0xdf; 3706 3706 - 0x0a; 3707 3707 - 0x39; 3708 3708 - 0x5f; 3709 3709 - 0x4a; 3710 3710 - 0x2c; 3711 3711 - 0xa0; 3712 3712 - 0xb8; 3713 3713 - 0x02; 3714 3714 - 0x20; 3715 3715 - 0xa6; 3716 3716 - 0x33; 3717 3717 - 0x3f; 3718 3718 - 0x22; 3719 3719 - 0x2b; 3720 3720 - 0x38; 3721 3721 - 0x49; 3722 3722 - 0x5f; 3723 3723 - 0x21; 3724 3724 - 0xea; 3725 3725 - 0x62; 3726 3726 - 0x1a; 3727 3727 - 0x73; 3728 3728 - 0xe4; 3729 3729 - 0x0a; 3730 3730 - 0x1f; 3731 3731 - 0xf5; 3732 3732 - 0xe0; 3733 3733 - 0x89; 3734 3734 - 0x8c; 3735 3735 - 0xb3; 3736 3736 - 0xdd; 3737 3737 - 0xf4; 3738 3738 - 0xef; 3739 3739 - 0xc8; 3740 3740 - 0x35; 3741 3741 - 0x8f; 3742 3742 - 0x60; 3743 3743 - 0xa2; 3744 3744 - 0x4c; 3745 3745 - 0x95; 3746 3746 - 0xf7; 3747 3747 - 0xcb; 3748 3748 - 0x8e; 3749 3749 - 0x1f; 3750 3750 - 0xf0; 3751 3751 - 0x15; 3752 3752 - 0xf4; 3753 3753 - 0x22; 3754 3754 - 0x01; 3755 3755 - 0x97; 3756 3756 - 0xb0; 3757 3757 - 0x59; 3758 3758 - 0x4e; 3759 3759 - 0x59; 3760 3760 - 0x40; 3761 3761 - 0x7c; 3762 3762 - 0x43; 3763 3763 - 0xdf; 3764 3764 - 0x1c; 3765 3765 - 0x35; 3766 3766 - 0x5f; 3767 3767 - 0x8d; 3768 3768 - 0xde; 3769 3769 - 0x26; 3770 3770 - 0x77; 3771 3771 - 0x0d; 3772 3772 - 0x47; 3773 3773 - 0xec; 3774 3774 - 0x84; 3775 3775 - 0x30; 3776 3776 - 0x7f; 3777 3777 - 0x0e; 3778 3778 - 0xf3; 3779 3779 - 0x17; 3780 3780 - 0x3b; 3781 3781 - 0x26; 3782 3782 - 0x8b; 3783 3783 - 0x35; 3784 3784 - 0x9d; 3785 3785 - 0xe2; 3786 3786 - 0x02; 3787 3787 - 0x49; 3788 3788 - 0x82; 3789 3789 - 0xa4; 3790 3790 - 0x4e; 3791 3791 - 0x0d; 3792 3792 - 0xb2; 3793 3793 - 0xd9; 3794 3794 - 0x5f; 3795 3795 - 0x83; 3796 3796 - 0x55; 3797 3797 - 0x8d; 3798 3798 - 0x56; 3799 3799 - 0xb2; 3800 3800 - 0x7e; 3801 3801 - 0x33; 3802 3802 - 0x11; 3803 3803 - 0x9f; 3804 3804 - 0x50; 3805 3805 - 0xfb; 3806 3806 - 0xf3; 3807 3807 - 0xaf; 3808 3808 - 0xa6; 3809 3809 - 0x96; 3810 3810 - 0x90; 3811 3811 - 0x52; 3812 3812 - 0x76; 3813 3813 - 0xea; 3814 3814 - 0xbd; 3815 3815 - 0x03; 3816 3816 - 0xde; 3817 3817 - 0x5c; 3818 3818 - 0x3a; 3819 3819 - 0xd7; 3820 3820 - 0x4f; 3821 3821 - 0x1c; 3822 3822 - 0x89; 3823 3823 - 0xe6; 3824 3824 - 0xb0; 3825 3825 - 0xa3; 3826 3826 - 0x39; 3827 3827 - 0x8a; 3828 3828 - 0xb1; 3829 3829 - 0x70; 3830 3830 - 0xb9; 3831 3831 - 0x1f; 3832 3832 - 0x2f; 3833 3833 - 0x25; 3834 3834 - 0x03; 3835 3835 - 0xe5; 3836 3836 - 0xd6; 3837 3837 - 0x87; 3838 3838 - 0x36; 3839 3839 - 0x62; 3840 3840 - 0xea; 3841 3841 - 0x4a; 3842 3842 - 0x8a; 3843 3843 - 0x60; 3844 3844 - 0xb5; 3845 3845 - 0x83; 3846 3846 - 0x20; 3847 3847 - 0x62; 3848 3848 - 0xd5; 3849 3849 - 0x58; 3850 3850 - 0x7e; 3851 3851 - 0x94; 3852 3852 - 0x19; 3853 3853 - 0x42; 3854 3854 - 0x4d; 3855 3855 - 0xc7; 3856 3856 - 0x48; 3857 3857 - 0xb2; 3858 3858 - 0xfb; 3859 3859 - 0xed; 3860 3860 - 0xfb; 3861 3861 - 0xd1; 3862 3862 - 0xc4; 3863 3863 - 0xfe; 3864 3864 - 0x7f; 3865 3865 - 0x48; 3866 3866 - 0xf9; 3867 3867 - 0xe2; 3868 3868 - 0xd4; 3869 3869 - 0x15; 3870 3870 - 0xd1; 3871 3871 - 0x2c; 3872 3872 - 0xe1; 3873 3873 - 0x73; 3874 3874 - 0x76; 3875 3875 - 0x77; 3876 3876 - 0xbf; 3877 3877 - 0x0c; 3878 3878 - 0x5a; 3879 3879 - 0xc3; 3880 3880 - 0x8b; 3881 3881 - 0xc2; 3882 3882 - 0x6a; 3883 3883 - 0xd7; 3884 3884 - 0x58; 3885 3885 - 0xce; 3886 3886 - 0xeb; 3887 3887 - 0x96; 3888 3888 - 0x58; 3889 3889 - 0x55; 3890 3890 - 0xfb; 3891 3891 - 0x35; 3892 3892 - 0x5a; 3893 3893 - 0x8d; 3894 3894 - 0x82; 3895 3895 - 0xaa; 3896 3896 - 0x2e; 3897 3897 - 0x7d; 3898 3898 - 0x0e; 3899 3899 - 0xd3; 3900 3900 - 0x8d; 3901 3901 - 0xb9; 3902 3902 - 0x6a; 3903 3903 - 0xfe; 3904 3904 - 0x02; 3905 3905 - 0xc3; 3906 3906 - 0xbc; 3907 3907 - 0xd2; 3908 3908 - 0x43; 3909 3909 - 0xe9; 3910 3910 - 0x4e; 3911 3911 - 0x72; 3912 3912 - 0xe6; 3913 3913 - 0xbd; 3914 3914 - 0xd2; 3915 3915 - 0x49; 3916 3916 - 0x63; 3917 3917 - 0xc5; 3918 3918 - ]; 3919 3919 - [ 3920 3920 - 0x06; 3921 3921 - 0x01; 3922 3922 - 0x01; 3923 3923 - 0x00; 3924 3924 - 0x23; 3925 3925 - 0x8d; 3926 3926 - 0x01; 3927 3927 - 0xf7; 3928 3928 - 0xce; 3929 3929 - 0xe3; 3930 3930 - 0xe9; 3931 3931 - 0xf8; 3932 3932 - 0xb4; 3933 3933 - 0x43; 3934 3934 - 0x5a; 3935 3935 - 0x48; 3936 3936 - 0x4c; 3937 3937 - 0x98; 3938 3938 - 0x45; 3939 3939 - 0x57; 3940 3940 - 0x45; 3941 3941 - 0x7a; 3942 3942 - 0x70; 3943 3943 - 0x6f; 3944 3944 - 0x02; 3945 3945 - 0xf9; 3946 3946 - 0x3e; 3947 3947 - 0x18; 3948 3948 - 0x16; 3949 3949 - 0x32; 3950 3950 - 0xce; 3951 3951 - 0x48; 3952 3952 - 0x49; 3953 3953 - 0x3d; 3954 3954 - 0x1b; 3955 3955 - 0xed; 3956 3956 - 0xbd; 3957 3957 - 0x96; 3958 3958 - 0x73; 3959 3959 - 0xb7; 3960 3960 - 0xb1; 3961 3961 - 0x26; 3962 3962 - 0xdf; 3963 3963 - 0x07; 3964 3964 - 0x6c; 3965 3965 - 0x2a; 3966 3966 - 0xd0; 3967 3967 - 0xc4; 3968 3968 - 0xc9; 3969 3969 - 0x7d; 3970 3970 - 0x79; 3971 3971 - 0xcc; 3972 3972 - 0x06; 3973 3973 - 0xb4; 3974 3974 - 0x9a; 3975 3975 - 0x56; 3976 3976 - 0x17; 3977 3977 - 0x43; 3978 3978 - 0xe5; 3979 3979 - 0x0d; 3980 3980 - 0xe6; 3981 3981 - 0x69; 3982 3982 - 0xd1; 3983 3983 - 0xbb; 3984 3984 - 0xe5; 3985 3985 - 0xf5; 3986 3986 - 0xc7; 3987 3987 - 0x9a; 3988 3988 - 0x2e; 3989 3989 - 0xed; 3990 3990 - 0xec; 3991 3991 - 0x97; 3992 3992 - 0xc9; 3993 3993 - 0x53; 3994 3994 - 0xb0; 3995 3995 - 0xab; 3996 3996 - 0xc6; 3997 3997 - 0x37; 3998 3998 - 0x99; 3999 3999 - 0x2f; 4000 4000 - 0xbc; 4001 4001 - 0xe5; 4002 4002 - 0x9b; 4003 4003 - 0xd7; 4004 4004 - 0xa2; 4005 4005 - 0xeb; 4006 4006 - 0xd8; 4007 4007 - 0x88; 4008 4008 - 0x29; 4009 4009 - 0xcf; 4010 4010 - 0x6f; 4011 4011 - 0x35; 4012 4012 - 0x64; 4013 4013 - 0xd0; 4014 4014 - 0x40; 4015 4015 - 0xed; 4016 4016 - 0xdd; 4017 4017 - 0xcd; 4018 4018 - 0x12; 4019 4019 - 0x9a; 4020 4020 - 0x93; 4021 4021 - 0xb0; 4022 4022 - 0x6c; 4023 4023 - 0xde; 4024 4024 - 0x75; 4025 4025 - 0x89; 4026 4026 - 0x5b; 4027 4027 - 0x19; 4028 4028 - 0x7b; 4029 4029 - 0xbb; 4030 4030 - 0xe7; 4031 4031 - 0x4f; 4032 4032 - 0xcf; 4033 4033 - 0x6f; 4034 4034 - 0x87; 4035 4035 - 0x85; 4036 4036 - 0x8a; 4037 4037 - 0xb8; 4038 4038 - 0xb3; 4039 4039 - 0x1e; 4040 4040 - 0xd2; 4041 4041 - 0xc3; 4042 4042 - 0x60; 4043 4043 - 0x51; 4044 4044 - 0x2c; 4045 4045 - 0x5b; 4046 4046 - 0xeb; 4047 4047 - 0xe3; 4048 4048 - 0x77; 4049 4049 - 0x40; 4050 4050 - 0x84; 4051 4051 - 0x75; 4052 4052 - 0x4f; 4053 4053 - 0x97; 4054 4054 - 0x1a; 4055 4055 - 0x55; 4056 4056 - 0x67; 4057 4057 - 0xf6; 4058 4058 - 0x75; 4059 4059 - 0x5b; 4060 4060 - 0xec; 4061 4061 - 0x61; 4062 4062 - 0x96; 4063 4063 - 0x30; 4064 4064 - 0x0f; 4065 4065 - 0x41; 4066 4066 - 0xc4; 4067 4067 - 0x02; 4068 4068 - 0x63; 4069 4069 - 0x05; 4070 4070 - 0x52; 4071 4071 - 0xc8; 4072 4072 - 0x76; 4073 4073 - 0x2a; 4074 4074 - 0x0b; 4075 4075 - 0x23; 4076 4076 - 0x6e; 4077 4077 - 0x97; 4078 4078 - 0x1f; 4079 4079 - 0x16; 4080 4080 - 0xb6; 4081 4081 - 0x68; 4082 4082 - 0x92; 4083 4083 - 0xc6; 4084 4084 - 0x2f; 4085 4085 - 0x9b; 4086 4086 - 0x1c; 4087 4087 - 0xe2; 4088 4088 - 0x2f; 4089 4089 - 0xf6; 4090 4090 - 0x02; 4091 4091 - 0x90; 4092 4092 - 0x1a; 4093 4093 - 0x51; 4094 4094 - 0xa7; 4095 4095 - 0x49; 4096 4096 - 0x43; 4097 4097 - 0x41; 4098 4098 - 0x31; 4099 4099 - 0x22; 4100 4100 - 0x3f; 4101 4101 - 0x9a; 4102 4102 - 0xd1; 4103 4103 - 0xe7; 4104 4104 - 0xd0; 4105 4105 - 0x6b; 4106 4106 - 0xe4; 4107 4107 - 0x82; 4108 4108 - 0x1f; 4109 4109 - 0xbd; 4110 4110 - 0x93; 4111 4111 - 0xca; 4112 4112 - 0xaf; 4113 4113 - 0x5d; 4114 4114 - 0xf5; 4115 4115 - 0x05; 4116 4116 - 0xf3; 4117 4117 - 0x9a; 4118 4118 - 0xb8; 4119 4119 - 0x3d; 4120 4120 - 0x19; 4121 4121 - 0x21; 4122 4122 - 0x8d; 4123 4123 - 0x0b; 4124 4124 - 0x20; 4125 4125 - 0x00; 4126 4126 - 0x5a; 4127 4127 - 0x21; 4128 4128 - 0x5f; 4129 4129 - 0x8e; 4130 4130 - 0x1a; 4131 4131 - 0x77; 4132 4132 - 0xd0; 4133 4133 - 0x70; 4134 4134 - 0xfb; 4135 4135 - 0x8c; 4136 4136 - 0x98; 4137 4137 - 0x9d; 4138 4138 - 0x63; 4139 4139 - 0xb3; 4140 4140 - 0x9a; 4141 4141 - 0x6a; 4142 4142 - 0x3f; 4143 4143 - 0xc3; 4144 4144 - 0x89; 4145 4145 - 0x43; 4146 4146 - 0xfe; 4147 4147 - 0x1c; 4148 4148 - 0xa7; 4149 4149 - 0x6f; 4150 4150 - 0xb6; 4151 4151 - 0xd6; 4152 4152 - 0x1f; 4153 4153 - 0xa9; 4154 4154 - 0x3e; 4155 4155 - 0x6c; 4156 4156 - 0xe2; 4157 4157 - 0x7a; 4158 4158 - 0x8e; 4159 4159 - 0x31; 4160 4160 - 0xbc; 4161 4161 - 0x8f; 4162 4162 - 0x4e; 4163 4163 - 0xe4; 4164 4164 - 0xc0; 4165 4165 - 0x36; 4166 4166 - 0x8d; 4167 4167 - 0x72; 4168 4168 - 0x01; 4169 4169 - 0xf4; 4170 4170 - 0x65; 4171 4171 - 0x71; 4172 4172 - 0xff; 4173 4173 - 0x16; 4174 4174 - 0xa6; 4175 4175 - 0xc7; 4176 4176 - 0x0a; 4177 4177 - 0x59; 4178 4178 - 0xf1; 4179 4179 - 0x18; 4180 4180 - ]; 4181 4181 - ] 4182 4182 - 4183 4183 - let good_digitally_signed_1_2_parser xs _ = 4184 4184 - let buf = list_to_cstruct xs in 4185 4185 - match Reader.parse_digitally_signed_1_2 buf with 4186 4186 - | Error _ -> assert_failure "digitally signed 1.2 parser broken" 4187 4187 - | Ok _ -> () 4188 4188 - 4189 4189 - let good_digitally_signed_1_2_tests = 4190 4190 - List.mapi 4191 4191 - (fun i f -> 4192 4192 - "Parse good digitally signed 1_2 " ^ string_of_int i 4193 4193 - >:: good_digitally_signed_1_2_parser f) 4194 4194 - good_digitally_signed_1_2 4195 4195 - 4196 4196 - let bad_dss_1_2 = 4197 4197 - let ds = list_to_cstruct (List.hd good_digitally_signed_1_2) in 4198 4198 - let l = String.length ds in 4199 4199 - [ 4200 4200 - String.sub ds 2 20; 4201 4201 - String.sub ds 0 20; 4202 4202 - list_to_cstruct [ 2 ] ^ ds; 4203 4203 - list_to_cstruct [ 0 ] ^ ds; 4204 4204 - list_to_cstruct [ 0; 1 ] ^ ds; 4205 4205 - list_to_cstruct [ 0; 0 ] ^ ds; 4206 4206 - list_to_cstruct [ 0xff; 0xff ] ^ ds; 4207 4207 - list_to_cstruct [ 0; 0xff ] ^ ds; 4208 4208 - String.sub ds 2 (String.length ds - 2); 4209 4209 - String.sub ds 0 (pred l); 4210 4210 - list_to_cstruct [ 7 ] ^ String.sub ds 1 (String.length ds - 1); 4211 4211 - list_to_cstruct [ 8 ] ^ String.sub ds 1 (String.length ds - 1); 4212 4212 - list_to_cstruct [ 1; 7 ] ^ String.sub ds 2 (String.length ds - 2); 4213 4213 - list_to_cstruct [ 7; 2 ] ^ String.sub ds 2 (String.length ds - 2); 4214 4214 - list_to_cstruct [ 1; 1; 1; 0xff ] ^ String.sub ds 4 (String.length ds - 4); 4215 4215 - list_to_cstruct [ 1; 1; 0xff; 0 ] ^ String.sub ds 4 (String.length ds - 4); 4216 4216 - ds ^ String.make 1 '\x00'; 4217 4217 - ] 4218 4218 - 4219 4219 - let bad_digitally_signed_1_2_parser buf _ = 4220 4220 - match Reader.parse_digitally_signed_1_2 buf with 4221 4221 - | Error _ -> () 4222 4222 - | Ok _ -> assert_failure "digitally signed 1.2 parser broken" 4223 4223 - 4224 4224 - let bad_digitally_signed_1_2_tests = 4225 4225 - List.mapi 4226 4226 - (fun i f -> 4227 4227 - "Parse bad digitally signed 1.2 " ^ string_of_int i 4228 4228 - >:: bad_digitally_signed_1_2_parser f) 4229 4229 - bad_dss_1_2 4230 4230 - 4231 4231 - let good_digitally_signed_parser xs _ = 4232 4232 - let buf = 4233 4233 - let b = list_to_cstruct xs in 4234 4234 - String.sub b 2 (String.length b - 2) 4235 4235 - in 4236 4236 - match Reader.parse_digitally_signed buf with 4237 4237 - | Error _ -> assert_failure "digitally signed parser broken" 4238 4238 - | Ok _ -> () 4239 4239 - 4240 4240 - let good_digitally_signed_tests = 4241 4241 - List.mapi 4242 4242 - (fun i f -> 4243 4243 - "Parse good digitally signed " ^ string_of_int i 4244 4244 - >:: good_digitally_signed_parser f) 4245 4245 - good_digitally_signed_1_2 4246 4246 - 4247 4247 - let bad_dss = 4248 4248 - let ds = 4249 4249 - let buf = list_to_cstruct (List.hd good_digitally_signed_1_2) in 4250 4250 - String.sub buf 2 (String.length buf - 2) 4251 4251 - in 4252 4252 - let l = String.length ds in 4253 4253 - [ 4254 4254 - list_to_cstruct [ 0xff; 0xff ] ^ ds; 4255 4255 - list_to_cstruct [ 0xff; 0xff ] ^ String.sub ds 2 (String.length ds - 2); 4256 4256 - String.sub ds 2 (String.length ds - 2); 4257 4257 - String.sub ds 0 (pred l); 4258 4258 - list_to_cstruct [ 1; 1 ] ^ String.sub ds 2 (String.length ds - 2); 4259 4259 - ds ^ String.make 1 '\x00'; 4260 4260 - ] 4261 4261 - 4262 4262 - let bad_digitally_signed_parser buf _ = 4263 4263 - match Reader.parse_digitally_signed buf with 4264 4264 - | Error _ -> () 4265 4265 - | Ok _ -> assert_failure "digitally signed parser broken" 4266 4266 - 4267 4267 - let bad_digitally_signed_tests = 4268 4268 - List.mapi 4269 4269 - (fun i f -> 4270 4270 - "Parse bad digitally signed " ^ string_of_int i 4271 4271 - >:: bad_digitally_signed_parser f) 4272 4272 - bad_dss 4273 4273 - 4274 4274 - let good_handshake_hdrs = 4275 4275 - let data = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11 ] in 4276 4276 - let empty = "" in 4277 4277 - [ 4278 4278 - ([ 0; 0; 0 ], (None, list_to_cstruct [ 0; 0; 0 ])); 4279 4279 - ([ 0; 0; 0; 0 ], (Some (list_to_cstruct [ 0; 0; 0; 0 ]), empty)); 4280 4280 - ([ 0; 0; 0; 0xFF ], (None, list_to_cstruct [ 0; 0; 0; 255 ])); 4281 4281 - ([ 0; 0; 1; 0 ], (None, list_to_cstruct [ 0; 0; 1; 0 ])); 4282 4282 - ( [ 16; 0; 0; 12 ] @ data, 4283 4283 - (Some (list_to_cstruct ([ 16; 0; 0; 12 ] @ data)), empty) ); 4284 4284 - ([ 16; 0; 0; 14 ] @ data, (None, list_to_cstruct ([ 16; 0; 0; 14 ] @ data))); 4285 4285 - ] 4286 4286 - 4287 4287 - let good_handshake_hdr_parser (xs, (hs, rest)) _ = 4288 4288 - let buf = list_to_cstruct xs in 4289 4289 - match (Reader.parse_handshake_frame buf, hs) with 4290 4290 - | (Some x, rest'), Some y -> 4291 4291 - assert_cs_eq y x; 4292 4292 - assert_cs_eq rest rest' 4293 4293 - | (None, rest'), None -> assert_cs_eq rest rest' 4294 4294 - | _ -> assert_failure "handshake_frame parser broken" 4295 4295 - 4296 4296 - let good_handshake_hdr_tests = 4297 4297 - List.mapi 4298 4298 - (fun i f -> 4299 4299 - "Parse good handshake header " ^ string_of_int i 4300 4300 - >:: good_handshake_hdr_parser f) 4301 4301 - good_handshake_hdrs 4302 4302 - 4303 4303 - (* 1byte type ; 3 byte length ; data *) 4304 4304 - let good_handshakes_no_data = 4305 4305 - [ 4306 4306 - ([ 0; 0; 0; 0 ], Core.HelloRequest); ([ 14; 0; 0; 0 ], Core.ServerHelloDone); 4307 4307 - ] 4308 4308 - 4309 4309 - let good_handshake_no_data_parser (xs, res) _ = 4310 4310 - let buf = list_to_cstruct xs in 4311 4311 - match Reader.parse_handshake buf with 4312 4312 - | Ok r -> assert_equal res r 4313 4313 - | Error _ -> assert_failure "handshake no data parser failed" 4314 4314 - 4315 4315 - let good_handshake_no_data_tests = 4316 4316 - List.mapi 4317 4317 - (fun i f -> 4318 4318 - "Parse good handshake " ^ string_of_int i 4319 4319 - >:: good_handshake_no_data_parser f) 4320 4320 - good_handshakes_no_data 4321 4321 - 4322 4322 - let bad_handshakes_no_data = 4323 4323 - [ 4324 4324 - [ 0; 0; 0; 3 ]; 4325 4325 - [ 14; 0; 0; 5 ]; 4326 4326 - [ 245; 0; 0; 0 ]; 4327 4327 - [ 0; 0; 0; 3; 0; 0; 0 ]; 4328 4328 - [ 14; 0; 0; 5; 0; 0; 0; 0; 0 ]; 4329 4329 - ] 4330 4330 - 4331 4331 - let bad_handshake_no_data_parser xs _ = 4332 4332 - let buf = list_to_cstruct xs in 4333 4333 - match Reader.parse_handshake buf with 4334 4334 - | Ok _ -> assert_failure "bad handshake no data parser failed" 4335 4335 - | Error _ -> () 4336 4336 - 4337 4337 - let bad_handshake_no_data_tests = 4338 4338 - List.mapi 4339 4339 - (fun i f -> 4340 4340 - "Parse bad handshake (no data) " ^ string_of_int i 4341 4341 - >:: bad_handshake_no_data_parser f) 4342 4342 - bad_handshakes_no_data 4343 4343 - 4344 4344 - let good_handshake_cstruct_data = 4345 4345 - let data = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11 ] in 4346 4346 - let data_cs = list_to_cstruct data in 4347 4347 - let gh1 = 4348 4348 - list_to_cstruct 4349 4349 - [ 4350 4350 - 0x30; 4351 4351 - 0x82; 4352 4352 - 0x05; 4353 4353 - 0xe0; 4354 4354 - 0x30; 4355 4355 - 0x82; 4356 4356 - 0x04; 4357 4357 - 0xc8; 4358 4358 - 0xa0; 4359 4359 - 0x03; 4360 4360 - 0x02; 4361 4361 - 0x01; 4362 4362 - 0x02; 4363 4363 - 0x02; 4364 4364 - 0x10; 4365 4365 - 0x0c; 4366 4366 - 0x00; 4367 4367 - 0x93; 4368 4368 - 0x10; 4369 4369 - 0xd2; 4370 4370 - 0x06; 4371 4371 - 0xdb; 4372 4372 - 0xe3; 4373 4373 - 0x37; 4374 4374 - 0x55; 4375 4375 - 0x35; 4376 4376 - 0x80; 4377 4377 - 0x11; 4378 4378 - 0x8d; 4379 4379 - 0xdc; 4380 4380 - 0x87; 4381 4381 - 0x30; 4382 4382 - 0x0d; 4383 4383 - 0x06; 4384 4384 - 0x09; 4385 4385 - 0x2a; 4386 4386 - 0x86; 4387 4387 - 0x48; 4388 4388 - 0x86; 4389 4389 - 0xf7; 4390 4390 - 0x0d; 4391 4391 - 0x01; 4392 4392 - 0x01; 4393 4393 - 0x0b; 4394 4394 - 0x05; 4395 4395 - 0x00; 4396 4396 - 0x30; 4397 4397 - 0x75; 4398 4398 - 0x31; 4399 4399 - 0x0b; 4400 4400 - 0x30; 4401 4401 - 0x09; 4402 4402 - 0x06; 4403 4403 - 0x03; 4404 4404 - 0x55; 4405 4405 - 0x04; 4406 4406 - 0x06; 4407 4407 - 0x13; 4408 4408 - 0x02; 4409 4409 - 0x55; 4410 4410 - 0x53; 4411 4411 - 0x31; 4412 4412 - 0x15; 4413 4413 - 0x30; 4414 4414 - 0x13; 4415 4415 - 0x06; 4416 4416 - 0x03; 4417 4417 - 0x55; 4418 4418 - 0x04; 4419 4419 - 0x0a; 4420 4420 - 0x13; 4421 4421 - 0x0c; 4422 4422 - 0x44; 4423 4423 - 0x69; 4424 4424 - 0x67; 4425 4425 - 0x69; 4426 4426 - 0x43; 4427 4427 - 0x65; 4428 4428 - 0x72; 4429 4429 - 0x74; 4430 4430 - 0x20; 4431 4431 - 0x49; 4432 4432 - 0x6e; 4433 4433 - 0x63; 4434 4434 - 0x31; 4435 4435 - 0x19; 4436 4436 - 0x30; 4437 4437 - 0x17; 4438 4438 - 0x06; 4439 4439 - 0x03; 4440 4440 - 0x55; 4441 4441 - 0x04; 4442 4442 - 0x0b; 4443 4443 - 0x13; 4444 4444 - 0x10; 4445 4445 - 0x77; 4446 4446 - 0x77; 4447 4447 - 0x77; 4448 4448 - 0x2e; 4449 4449 - 0x64; 4450 4450 - 0x69; 4451 4451 - 0x67; 4452 4452 - 0x69; 4453 4453 - 0x63; 4454 4454 - 0x65; 4455 4455 - 0x72; 4456 4456 - 0x74; 4457 4457 - 0x2e; 4458 4458 - 0x63; 4459 4459 - 0x6f; 4460 4460 - 0x6d; 4461 4461 - 0x31; 4462 4462 - 0x34; 4463 4463 - 0x30; 4464 4464 - 0x32; 4465 4465 - 0x06; 4466 4466 - 0x03; 4467 4467 - 0x55; 4468 4468 - 0x04; 4469 4469 - 0x03; 4470 4470 - 0x13; 4471 4471 - 0x2b; 4472 4472 - 0x44; 4473 4473 - 0x69; 4474 4474 - 0x67; 4475 4475 - 0x69; 4476 4476 - 0x43; 4477 4477 - 0x65; 4478 4478 - 0x72; 4479 4479 - 0x74; 4480 4480 - 0x20; 4481 4481 - 0x53; 4482 4482 - 0x48; 4483 4483 - 0x41; 4484 4484 - 0x32; 4485 4485 - 0x20; 4486 4486 - 0x45; 4487 4487 - 0x78; 4488 4488 - 0x74; 4489 4489 - 0x65; 4490 4490 - 0x6e; 4491 4491 - 0x64; 4492 4492 - 0x65; 4493 4493 - 0x64; 4494 4494 - 0x20; 4495 4495 - 0x56; 4496 4496 - 0x61; 4497 4497 - 0x6c; 4498 4498 - 0x69; 4499 4499 - 0x64; 4500 4500 - 0x61; 4501 4501 - 0x74; 4502 4502 - 0x69; 4503 4503 - 0x6f; 4504 4504 - 0x6e; 4505 4505 - 0x20; 4506 4506 - 0x53; 4507 4507 - 0x65; 4508 4508 - 0x72; 4509 4509 - 0x76; 4510 4510 - 0x65; 4511 4511 - 0x72; 4512 4512 - 0x20; 4513 4513 - 0x43; 4514 4514 - 0x41; 4515 4515 - 0x30; 4516 4516 - 0x1e; 4517 4517 - 0x17; 4518 4518 - 0x0d; 4519 4519 - 0x31; 4520 4520 - 0x34; 4521 4521 - 0x30; 4522 4522 - 0x34; 4523 4523 - 0x30; 4524 4524 - 0x38; 4525 4525 - 0x30; 4526 4526 - 0x30; 4527 4527 - 0x30; 4528 4528 - 0x30; 4529 4529 - 0x30; 4530 4530 - 0x30; 4531 4531 - 0x5a; 4532 4532 - 0x17; 4533 4533 - 0x0d; 4534 4534 - 0x31; 4535 4535 - 0x36; 4536 4536 - 0x30; 4537 4537 - 0x34; 4538 4538 - 0x31; 4539 4539 - 0x32; 4540 4540 - 0x31; 4541 4541 - 0x32; 4542 4542 - 0x30; 4543 4543 - 0x30; 4544 4544 - 0x30; 4545 4545 - 0x30; 4546 4546 - 0x5a; 4547 4547 - 0x30; 4548 4548 - 0x81; 4549 4549 - 0xf0; 4550 4550 - 0x31; 4551 4551 - 0x1d; 4552 4552 - 0x30; 4553 4553 - 0x1b; 4554 4554 - 0x06; 4555 4555 - 0x03; 4556 4556 - 0x55; 4557 4557 - 0x04; 4558 4558 - 0x0f; 4559 4559 - 0x0c; 4560 4560 - 0x14; 4561 4561 - 0x50; 4562 4562 - 0x72; 4563 4563 - 0x69; 4564 4564 - 0x76; 4565 4565 - 0x61; 4566 4566 - 0x74; 4567 4567 - 0x65; 4568 4568 - 0x20; 4569 4569 - 0x4f; 4570 4570 - 0x72; 4571 4571 - 0x67; 4572 4572 - 0x61; 4573 4573 - 0x6e; 4574 4574 - 0x69; 4575 4575 - 0x7a; 4576 4576 - 0x61; 4577 4577 - 0x74; 4578 4578 - 0x69; 4579 4579 - 0x6f; 4580 4580 - 0x6e; 4581 4581 - 0x31; 4582 4582 - 0x13; 4583 4583 - 0x30; 4584 4584 - 0x11; 4585 4585 - 0x06; 4586 4586 - 0x0b; 4587 4587 - 0x2b; 4588 4588 - 0x06; 4589 4589 - 0x01; 4590 4590 - 0x04; 4591 4591 - 0x01; 4592 4592 - 0x82; 4593 4593 - 0x37; 4594 4594 - 0x3c; 4595 4595 - 0x02; 4596 4596 - 0x01; 4597 4597 - 0x03; 4598 4598 - 0x13; 4599 4599 - 0x02; 4600 4600 - 0x55; 4601 4601 - 0x53; 4602 4602 - 0x31; 4603 4603 - 0x19; 4604 4604 - 0x30; 4605 4605 - 0x17; 4606 4606 - 0x06; 4607 4607 - 0x0b; 4608 4608 - 0x2b; 4609 4609 - 0x06; 4610 4610 - 0x01; 4611 4611 - 0x04; 4612 4612 - 0x01; 4613 4613 - 0x82; 4614 4614 - 0x37; 4615 4615 - 0x3c; 4616 4616 - 0x02; 4617 4617 - 0x01; 4618 4618 - 0x02; 4619 4619 - 0x13; 4620 4620 - 0x08; 4621 4621 - 0x44; 4622 4622 - 0x65; 4623 4623 - 0x6c; 4624 4624 - 0x61; 4625 4625 - 0x77; 4626 4626 - 0x61; 4627 4627 - 0x72; 4628 4628 - 0x65; 4629 4629 - 0x31; 4630 4630 - 0x10; 4631 4631 - 0x30; 4632 4632 - 0x0e; 4633 4633 - 0x06; 4634 4634 - 0x03; 4635 4635 - 0x55; 4636 4636 - 0x04; 4637 4637 - 0x05; 4638 4638 - 0x13; 4639 4639 - 0x07; 4640 4640 - 0x35; 4641 4641 - 0x31; 4642 4642 - 0x35; 4643 4643 - 0x37; 4644 4644 - 0x35; 4645 4645 - 0x35; 4646 4646 - 0x30; 4647 4647 - 0x31; 4648 4648 - 0x17; 4649 4649 - 0x30; 4650 4650 - 0x15; 4651 4651 - 0x06; 4652 4652 - 0x03; 4653 4653 - 0x55; 4654 4654 - 0x04; 4655 4655 - 0x09; 4656 4656 - 0x13; 4657 4657 - 0x0e; 4658 4658 - 0x35; 4659 4659 - 0x34; 4660 4660 - 0x38; 4661 4661 - 0x20; 4662 4662 - 0x34; 4663 4663 - 0x74; 4664 4664 - 0x68; 4665 4665 - 0x20; 4666 4666 - 0x53; 4667 4667 - 0x74; 4668 4668 - 0x72; 4669 4669 - 0x65; 4670 4670 - 0x65; 4671 4671 - 0x74; 4672 4672 - 0x31; 4673 4673 - 0x0e; 4674 4674 - 0x30; 4675 4675 - 0x0c; 4676 4676 - 0x06; 4677 4677 - 0x03; 4678 4678 - 0x55; 4679 4679 - 0x04; 4680 4680 - 0x11; 4681 4681 - 0x13; 4682 4682 - 0x05; 4683 4683 - 0x39; 4684 4684 - 0x34; 4685 4685 - 0x31; 4686 4686 - 0x30; 4687 4687 - 0x37; 4688 4688 - 0x31; 4689 4689 - 0x0b; 4690 4690 - 0x30; 4691 4691 - 0x09; 4692 4692 - 0x06; 4693 4693 - 0x03; 4694 4694 - 0x55; 4695 4695 - 0x04; 4696 4696 - 0x06; 4697 4697 - 0x13; 4698 4698 - 0x02; 4699 4699 - 0x55; 4700 4700 - 0x53; 4701 4701 - 0x31; 4702 4702 - 0x13; 4703 4703 - 0x30; 4704 4704 - 0x11; 4705 4705 - 0x06; 4706 4706 - 0x03; 4707 4707 - 0x55; 4708 4708 - 0x04; 4709 4709 - 0x08; 4710 4710 - 0x13; 4711 4711 - 0x0a; 4712 4712 - 0x43; 4713 4713 - 0x61; 4714 4714 - 0x6c; 4715 4715 - 0x69; 4716 4716 - 0x66; 4717 4717 - 0x6f; 4718 4718 - 0x72; 4719 4719 - 0x6e; 4720 4720 - 0x69; 4721 4721 - 0x61; 4722 4722 - 0x31; 4723 4723 - 0x16; 4724 4724 - 0x30; 4725 4725 - 0x14; 4726 4726 - 0x06; 4727 4727 - 0x03; 4728 4728 - 0x55; 4729 4729 - 0x04; 4730 4730 - 0x07; 4731 4731 - 0x13; 4732 4732 - 0x0d; 4733 4733 - 0x53; 4734 4734 - 0x61; 4735 4735 - 0x6e; 4736 4736 - 0x20; 4737 4737 - 0x46; 4738 4738 - 0x72; 4739 4739 - 0x61; 4740 4740 - 0x6e; 4741 4741 - 0x63; 4742 4742 - 0x69; 4743 4743 - 0x73; 4744 4744 - 0x63; 4745 4745 - 0x6f; 4746 4746 - 0x31; 4747 4747 - 0x15; 4748 4748 - 0x30; 4749 4749 - 0x13; 4750 4750 - 0x06; 4751 4751 - 0x03; 4752 4752 - 0x55; 4753 4753 - 0x04; 4754 4754 - 0x0a; 4755 4755 - 0x13; 4756 4756 - 0x0c; 4757 4757 - 0x47; 4758 4758 - 0x69; 4759 4759 - 0x74; 4760 4760 - 0x48; 4761 4761 - 0x75; 4762 4762 - 0x62; 4763 4763 - 0x2c; 4764 4764 - 0x20; 4765 4765 - 0x49; 4766 4766 - 0x6e; 4767 4767 - 0x63; 4768 4768 - 0x2e; 4769 4769 - 0x31; 4770 4770 - 0x13; 4771 4771 - 0x30; 4772 4772 - 0x11; 4773 4773 - 0x06; 4774 4774 - 0x03; 4775 4775 - 0x55; 4776 4776 - 0x04; 4777 4777 - 0x03; 4778 4778 - 0x13; 4779 4779 - 0x0a; 4780 4780 - 0x67; 4781 4781 - 0x69; 4782 4782 - 0x74; 4783 4783 - 0x68; 4784 4784 - 0x75; 4785 4785 - 0x62; 4786 4786 - 0x2e; 4787 4787 - 0x63; 4788 4788 - 0x6f; 4789 4789 - 0x6d; 4790 4790 - 0x30; 4791 4791 - 0x82; 4792 4792 - 0x01; 4793 4793 - 0x22; 4794 4794 - 0x30; 4795 4795 - 0x0d; 4796 4796 - 0x06; 4797 4797 - 0x09; 4798 4798 - 0x2a; 4799 4799 - 0x86; 4800 4800 - 0x48; 4801 4801 - 0x86; 4802 4802 - 0xf7; 4803 4803 - 0x0d; 4804 4804 - 0x01; 4805 4805 - 0x01; 4806 4806 - 0x01; 4807 4807 - 0x05; 4808 4808 - 0x00; 4809 4809 - 0x03; 4810 4810 - 0x82; 4811 4811 - 0x01; 4812 4812 - 0x0f; 4813 4813 - 0x00; 4814 4814 - 0x30; 4815 4815 - 0x82; 4816 4816 - 0x01; 4817 4817 - 0x0a; 4818 4818 - 0x02; 4819 4819 - 0x82; 4820 4820 - 0x01; 4821 4821 - 0x01; 4822 4822 - 0x00; 4823 4823 - 0xb1; 4824 4824 - 0xd4; 4825 4825 - 0xdc; 4826 4826 - 0x3c; 4827 4827 - 0xaf; 4828 4828 - 0xfd; 4829 4829 - 0xf3; 4830 4830 - 0x4e; 4831 4831 - 0xed; 4832 4832 - 0xc1; 4833 4833 - 0x67; 4834 4834 - 0xad; 4835 4835 - 0xe6; 4836 4836 - 0xcb; 4837 4837 - 0x22; 4838 4838 - 0xe8; 4839 4839 - 0xb7; 4840 4840 - 0xe2; 4841 4841 - 0xab; 4842 4842 - 0x28; 4843 4843 - 0xf2; 4844 4844 - 0xf7; 4845 4845 - 0xdc; 4846 4846 - 0x62; 4847 4847 - 0x70; 4848 4848 - 0x08; 4849 4849 - 0xd1; 4850 4850 - 0x0c; 4851 4851 - 0xaf; 4852 4852 - 0xd6; 4853 4853 - 0x16; 4854 4854 - 0x6a; 4855 4855 - 0x21; 4856 4856 - 0xb0; 4857 4857 - 0x36; 4858 4858 - 0x4b; 4859 4859 - 0x17; 4860 4860 - 0x0d; 4861 4861 - 0x36; 4862 4862 - 0x63; 4863 4863 - 0x04; 4864 4864 - 0xae; 4865 4865 - 0xbf; 4866 4866 - 0xea; 4867 4867 - 0x20; 4868 4868 - 0x51; 4869 4869 - 0x95; 4870 4870 - 0x65; 4871 4871 - 0x66; 4872 4872 - 0xf2; 4873 4873 - 0xbf; 4874 4874 - 0xb9; 4875 4875 - 0x4d; 4876 4876 - 0xa4; 4877 4877 - 0x0c; 4878 4878 - 0x29; 4879 4879 - 0xeb; 4880 4880 - 0xf5; 4881 4881 - 0x15; 4882 4882 - 0xb1; 4883 4883 - 0xe8; 4884 4884 - 0x35; 4885 4885 - 0xb3; 4886 4886 - 0x70; 4887 4887 - 0x10; 4888 4888 - 0x94; 4889 4889 - 0xd5; 4890 4890 - 0x1b; 4891 4891 - 0x59; 4892 4892 - 0xb4; 4893 4893 - 0x26; 4894 4894 - 0x0f; 4895 4895 - 0xd6; 4896 4896 - 0x83; 4897 4897 - 0x57; 4898 4898 - 0x59; 4899 4899 - 0x9d; 4900 4900 - 0xe1; 4901 4901 - 0x7c; 4902 4902 - 0x09; 4903 4903 - 0xdd; 4904 4904 - 0xe0; 4905 4905 - 0x13; 4906 4906 - 0xca; 4907 4907 - 0x4d; 4908 4908 - 0x6f; 4909 4909 - 0x43; 4910 4910 - 0x9b; 4911 4911 - 0xcd; 4912 4912 - 0xcf; 4913 4913 - 0x87; 4914 4914 - 0x3a; 4915 4915 - 0x15; 4916 4916 - 0xa7; 4917 4917 - 0x85; 4918 4918 - 0xdd; 4919 4919 - 0x66; 4920 4920 - 0x83; 4921 4921 - 0xed; 4922 4922 - 0x93; 4923 4923 - 0x0c; 4924 4924 - 0xfe; 4925 4925 - 0x2b; 4926 4926 - 0x6d; 4927 4927 - 0x38; 4928 4928 - 0x1c; 4929 4929 - 0x79; 4930 4930 - 0x88; 4931 4931 - 0x90; 4932 4932 - 0xcf; 4933 4933 - 0xad; 4934 4934 - 0x58; 4935 4935 - 0x18; 4936 4936 - 0x2d; 4937 4937 - 0x51; 4938 4938 - 0xd1; 4939 4939 - 0xc2; 4940 4940 - 0xa3; 4941 4941 - 0xf2; 4942 4942 - 0x47; 4943 4943 - 0x8c; 4944 4944 - 0x6f; 4945 4945 - 0x38; 4946 4946 - 0x09; 4947 4947 - 0xb9; 4948 4948 - 0xb8; 4949 4949 - 0xef; 4950 4950 - 0x4c; 4951 4951 - 0x93; 4952 4952 - 0x0b; 4953 4953 - 0xcb; 4954 4954 - 0x83; 4955 4955 - 0x94; 4956 4956 - 0x87; 4957 4957 - 0xea; 4958 4958 - 0xe0; 4959 4959 - 0xa3; 4960 4960 - 0xb5; 4961 4961 - 0xd9; 4962 4962 - 0x7b; 4963 4963 - 0x9b; 4964 4964 - 0x6b; 4965 4965 - 0x0f; 4966 4966 - 0x43; 4967 4967 - 0xf9; 4968 4968 - 0xca; 4969 4969 - 0xee; 4970 4970 - 0x80; 4971 4971 - 0x0d; 4972 4972 - 0x28; 4973 4973 - 0xa7; 4974 4974 - 0x76; 4975 4975 - 0xf1; 4976 4976 - 0x25; 4977 4977 - 0xf4; 4978 4978 - 0xc1; 4979 4979 - 0x35; 4980 4980 - 0x3c; 4981 4981 - 0xf6; 4982 4982 - 0x74; 4983 4983 - 0xad; 4984 4984 - 0xde; 4985 4985 - 0x6a; 4986 4986 - 0x33; 4987 4987 - 0x82; 4988 4988 - 0x7b; 4989 4989 - 0xdc; 4990 4990 - 0xfd; 4991 4991 - 0x4b; 4992 4992 - 0x76; 4993 4993 - 0xa7; 4994 4994 - 0xc2; 4995 4995 - 0xee; 4996 4996 - 0xf2; 4997 4997 - 0x6a; 4998 4998 - 0xbf; 4999 4999 - 0xa9; 5000 5000 - 0x24; 5001 5001 - 0xa6; 5002 5002 - 0x5f; 5003 5003 - 0xe7; 5004 5004 - 0x2e; 5005 5005 - 0x7c; 5006 5006 - 0x0e; 5007 5007 - 0xdb; 5008 5008 - 0xc3; 5009 5009 - 0x74; 5010 5010 - 0x73; 5011 5011 - 0xfa; 5012 5012 - 0x7e; 5013 5013 - 0xc6; 5014 5014 - 0xd8; 5015 5015 - 0xcf; 5016 5016 - 0x60; 5017 5017 - 0xeb; 5018 5018 - 0x36; 5019 5019 - 0x56; 5020 5020 - 0x21; 5021 5021 - 0xb6; 5022 5022 - 0xc1; 5023 5023 - 0x8a; 5024 5024 - 0xb8; 5025 5025 - 0x24; 5026 5026 - 0x82; 5027 5027 - 0x4d; 5028 5028 - 0x78; 5029 5029 - 0x24; 5030 5030 - 0xba; 5031 5031 - 0xe9; 5032 5032 - 0x1d; 5033 5033 - 0xa1; 5034 5034 - 0x8a; 5035 5035 - 0xa7; 5036 5036 - 0x87; 5037 5037 - 0xbe; 5038 5038 - 0x66; 5039 5039 - 0x25; 5040 5040 - 0x69; 5041 5041 - 0xbf; 5042 5042 - 0xbe; 5043 5043 - 0x3b; 5044 5044 - 0x72; 5045 5045 - 0x6e; 5046 5046 - 0x4f; 5047 5047 - 0xe0; 5048 5048 - 0xe4; 5049 5049 - 0x85; 5050 5050 - 0x25; 5051 5051 - 0x08; 5052 5052 - 0xb1; 5053 5053 - 0x91; 5054 5054 - 0x89; 5055 5055 - 0xb8; 5056 5056 - 0xd6; 5057 5057 - 0x74; 5058 5058 - 0x65; 5059 5059 - 0x76; 5060 5060 - 0x9b; 5061 5061 - 0x2c; 5062 5062 - 0x4f; 5063 5063 - 0x62; 5064 5064 - 0x1f; 5065 5065 - 0xa1; 5066 5066 - 0xfa; 5067 5067 - 0x3a; 5068 5068 - 0xbe; 5069 5069 - 0x9c; 5070 5070 - 0x24; 5071 5071 - 0xbf; 5072 5072 - 0x9f; 5073 5073 - 0xca; 5074 5074 - 0xb0; 5075 5075 - 0xc5; 5076 5076 - 0xc0; 5077 5077 - 0x67; 5078 5078 - 0x8d; 5079 5079 - 0x02; 5080 5080 - 0x03; 5081 5081 - 0x01; 5082 5082 - 0x00; 5083 5083 - 0x01; 5084 5084 - 0xa3; 5085 5085 - 0x82; 5086 5086 - 0x01; 5087 5087 - 0xee; 5088 5088 - 0x30; 5089 5089 - 0x82; 5090 5090 - 0x01; 5091 5091 - 0xea; 5092 5092 - 0x30; 5093 5093 - 0x1f; 5094 5094 - 0x06; 5095 5095 - 0x03; 5096 5096 - 0x55; 5097 5097 - 0x1d; 5098 5098 - 0x23; 5099 5099 - 0x04; 5100 5100 - 0x18; 5101 5101 - 0x30; 5102 5102 - 0x16; 5103 5103 - 0x80; 5104 5104 - 0x14; 5105 5105 - 0x3d; 5106 5106 - 0xd3; 5107 5107 - 0x50; 5108 5108 - 0xa5; 5109 5109 - 0xd6; 5110 5110 - 0xa0; 5111 5111 - 0xad; 5112 5112 - 0xee; 5113 5113 - 0xf3; 5114 5114 - 0x4a; 5115 5115 - 0x60; 5116 5116 - 0x0a; 5117 5117 - 0x65; 5118 5118 - 0xd3; 5119 5119 - 0x21; 5120 5120 - 0xd4; 5121 5121 - 0xf8; 5122 5122 - 0xf8; 5123 5123 - 0xd6; 5124 5124 - 0x0f; 5125 5125 - 0x30; 5126 5126 - 0x1d; 5127 5127 - 0x06; 5128 5128 - 0x03; 5129 5129 - 0x55; 5130 5130 - 0x1d; 5131 5131 - 0x0e; 5132 5132 - 0x04; 5133 5133 - 0x16; 5134 5134 - 0x04; 5135 5135 - 0x14; 5136 5136 - 0x6a; 5137 5137 - 0x43; 5138 5138 - 0x90; 5139 5139 - 0x7d; 5140 5140 - 0x3b; 5141 5141 - 0x98; 5142 5142 - 0x14; 5143 5143 - 0x72; 5144 5144 - 0x52; 5145 5145 - 0x95; 5146 5146 - 0x3a; 5147 5147 - 0xaa; 5148 5148 - 0x28; 5149 5149 - 0x0a; 5150 5150 - 0x43; 5151 5151 - 0xf8; 5152 5152 - 0x51; 5153 5153 - 0x7e; 5154 5154 - 0xd3; 5155 5155 - 0xa6; 5156 5156 - 0x30; 5157 5157 - 0x25; 5158 5158 - 0x06; 5159 5159 - 0x03; 5160 5160 - 0x55; 5161 5161 - 0x1d; 5162 5162 - 0x11; 5163 5163 - 0x04; 5164 5164 - 0x1e; 5165 5165 - 0x30; 5166 5166 - 0x1c; 5167 5167 - 0x82; 5168 5168 - 0x0a; 5169 5169 - 0x67; 5170 5170 - 0x69; 5171 5171 - 0x74; 5172 5172 - 0x68; 5173 5173 - 0x75; 5174 5174 - 0x62; 5175 5175 - 0x2e; 5176 5176 - 0x63; 5177 5177 - 0x6f; 5178 5178 - 0x6d; 5179 5179 - 0x82; 5180 5180 - 0x0e; 5181 5181 - 0x77; 5182 5182 - 0x77; 5183 5183 - 0x77; 5184 5184 - 0x2e; 5185 5185 - 0x67; 5186 5186 - 0x69; 5187 5187 - 0x74; 5188 5188 - 0x68; 5189 5189 - 0x75; 5190 5190 - 0x62; 5191 5191 - 0x2e; 5192 5192 - 0x63; 5193 5193 - 0x6f; 5194 5194 - 0x6d; 5195 5195 - 0x30; 5196 5196 - 0x0e; 5197 5197 - 0x06; 5198 5198 - 0x03; 5199 5199 - 0x55; 5200 5200 - 0x1d; 5201 5201 - 0x0f; 5202 5202 - 0x01; 5203 5203 - 0x01; 5204 5204 - 0xff; 5205 5205 - 0x04; 5206 5206 - 0x04; 5207 5207 - 0x03; 5208 5208 - 0x02; 5209 5209 - 0x05; 5210 5210 - 0xa0; 5211 5211 - 0x30; 5212 5212 - 0x1d; 5213 5213 - 0x06; 5214 5214 - 0x03; 5215 5215 - 0x55; 5216 5216 - 0x1d; 5217 5217 - 0x25; 5218 5218 - 0x04; 5219 5219 - 0x16; 5220 5220 - 0x30; 5221 5221 - 0x14; 5222 5222 - 0x06; 5223 5223 - 0x08; 5224 5224 - 0x2b; 5225 5225 - 0x06; 5226 5226 - 0x01; 5227 5227 - 0x05; 5228 5228 - 0x05; 5229 5229 - 0x07; 5230 5230 - 0x03; 5231 5231 - 0x01; 5232 5232 - 0x06; 5233 5233 - 0x08; 5234 5234 - 0x2b; 5235 5235 - 0x06; 5236 5236 - 0x01; 5237 5237 - 0x05; 5238 5238 - 0x05; 5239 5239 - 0x07; 5240 5240 - 0x03; 5241 5241 - 0x02; 5242 5242 - 0x30; 5243 5243 - 0x75; 5244 5244 - 0x06; 5245 5245 - 0x03; 5246 5246 - 0x55; 5247 5247 - 0x1d; 5248 5248 - 0x1f; 5249 5249 - 0x04; 5250 5250 - 0x6e; 5251 5251 - 0x30; 5252 5252 - 0x6c; 5253 5253 - 0x30; 5254 5254 - 0x34; 5255 5255 - 0xa0; 5256 5256 - 0x32; 5257 5257 - 0xa0; 5258 5258 - 0x30; 5259 5259 - 0x86; 5260 5260 - 0x2e; 5261 5261 - 0x68; 5262 5262 - 0x74; 5263 5263 - 0x74; 5264 5264 - 0x70; 5265 5265 - 0x3a; 5266 5266 - 0x2f; 5267 5267 - 0x2f; 5268 5268 - 0x63; 5269 5269 - 0x72; 5270 5270 - 0x6c; 5271 5271 - 0x33; 5272 5272 - 0x2e; 5273 5273 - 0x64; 5274 5274 - 0x69; 5275 5275 - 0x67; 5276 5276 - 0x69; 5277 5277 - 0x63; 5278 5278 - 0x65; 5279 5279 - 0x72; 5280 5280 - 0x74; 5281 5281 - 0x2e; 5282 5282 - 0x63; 5283 5283 - 0x6f; 5284 5284 - 0x6d; 5285 5285 - 0x2f; 5286 5286 - 0x73; 5287 5287 - 0x68; 5288 5288 - 0x61; 5289 5289 - 0x32; 5290 5290 - 0x2d; 5291 5291 - 0x65; 5292 5292 - 0x76; 5293 5293 - 0x2d; 5294 5294 - 0x73; 5295 5295 - 0x65; 5296 5296 - 0x72; 5297 5297 - 0x76; 5298 5298 - 0x65; 5299 5299 - 0x72; 5300 5300 - 0x2d; 5301 5301 - 0x67; 5302 5302 - 0x31; 5303 5303 - 0x2e; 5304 5304 - 0x63; 5305 5305 - 0x72; 5306 5306 - 0x6c; 5307 5307 - 0x30; 5308 5308 - 0x34; 5309 5309 - 0xa0; 5310 5310 - 0x32; 5311 5311 - 0xa0; 5312 5312 - 0x30; 5313 5313 - 0x86; 5314 5314 - 0x2e; 5315 5315 - 0x68; 5316 5316 - 0x74; 5317 5317 - 0x74; 5318 5318 - 0x70; 5319 5319 - 0x3a; 5320 5320 - 0x2f; 5321 5321 - 0x2f; 5322 5322 - 0x63; 5323 5323 - 0x72; 5324 5324 - 0x6c; 5325 5325 - 0x34; 5326 5326 - 0x2e; 5327 5327 - 0x64; 5328 5328 - 0x69; 5329 5329 - 0x67; 5330 5330 - 0x69; 5331 5331 - 0x63; 5332 5332 - 0x65; 5333 5333 - 0x72; 5334 5334 - 0x74; 5335 5335 - 0x2e; 5336 5336 - 0x63; 5337 5337 - 0x6f; 5338 5338 - 0x6d; 5339 5339 - 0x2f; 5340 5340 - 0x73; 5341 5341 - 0x68; 5342 5342 - 0x61; 5343 5343 - 0x32; 5344 5344 - 0x2d; 5345 5345 - 0x65; 5346 5346 - 0x76; 5347 5347 - 0x2d; 5348 5348 - 0x73; 5349 5349 - 0x65; 5350 5350 - 0x72; 5351 5351 - 0x76; 5352 5352 - 0x65; 5353 5353 - 0x72; 5354 5354 - 0x2d; 5355 5355 - 0x67; 5356 5356 - 0x31; 5357 5357 - 0x2e; 5358 5358 - 0x63; 5359 5359 - 0x72; 5360 5360 - 0x6c; 5361 5361 - 0x30; 5362 5362 - 0x42; 5363 5363 - 0x06; 5364 5364 - 0x03; 5365 5365 - 0x55; 5366 5366 - 0x1d; 5367 5367 - 0x20; 5368 5368 - 0x04; 5369 5369 - 0x3b; 5370 5370 - 0x30; 5371 5371 - 0x39; 5372 5372 - 0x30; 5373 5373 - 0x37; 5374 5374 - 0x06; 5375 5375 - 0x09; 5376 5376 - 0x60; 5377 5377 - 0x86; 5378 5378 - 0x48; 5379 5379 - 0x01; 5380 5380 - 0x86; 5381 5381 - 0xfd; 5382 5382 - 0x6c; 5383 5383 - 0x02; 5384 5384 - 0x01; 5385 5385 - 0x30; 5386 5386 - 0x2a; 5387 5387 - 0x30; 5388 5388 - 0x28; 5389 5389 - 0x06; 5390 5390 - 0x08; 5391 5391 - 0x2b; 5392 5392 - 0x06; 5393 5393 - 0x01; 5394 5394 - 0x05; 5395 5395 - 0x05; 5396 5396 - 0x07; 5397 5397 - 0x02; 5398 5398 - 0x01; 5399 5399 - 0x16; 5400 5400 - 0x1c; 5401 5401 - 0x68; 5402 5402 - 0x74; 5403 5403 - 0x74; 5404 5404 - 0x70; 5405 5405 - 0x73; 5406 5406 - 0x3a; 5407 5407 - 0x2f; 5408 5408 - 0x2f; 5409 5409 - 0x77; 5410 5410 - 0x77; 5411 5411 - 0x77; 5412 5412 - 0x2e; 5413 5413 - 0x64; 5414 5414 - 0x69; 5415 5415 - 0x67; 5416 5416 - 0x69; 5417 5417 - 0x63; 5418 5418 - 0x65; 5419 5419 - 0x72; 5420 5420 - 0x74; 5421 5421 - 0x2e; 5422 5422 - 0x63; 5423 5423 - 0x6f; 5424 5424 - 0x6d; 5425 5425 - 0x2f; 5426 5426 - 0x43; 5427 5427 - 0x50; 5428 5428 - 0x53; 5429 5429 - 0x30; 5430 5430 - 0x81; 5431 5431 - 0x88; 5432 5432 - 0x06; 5433 5433 - 0x08; 5434 5434 - 0x2b; 5435 5435 - 0x06; 5436 5436 - 0x01; 5437 5437 - 0x05; 5438 5438 - 0x05; 5439 5439 - 0x07; 5440 5440 - 0x01; 5441 5441 - 0x01; 5442 5442 - 0x04; 5443 5443 - 0x7c; 5444 5444 - 0x30; 5445 5445 - 0x7a; 5446 5446 - 0x30; 5447 5447 - 0x24; 5448 5448 - 0x06; 5449 5449 - 0x08; 5450 5450 - 0x2b; 5451 5451 - 0x06; 5452 5452 - 0x01; 5453 5453 - 0x05; 5454 5454 - 0x05; 5455 5455 - 0x07; 5456 5456 - 0x30; 5457 5457 - 0x01; 5458 5458 - 0x86; 5459 5459 - 0x18; 5460 5460 - 0x68; 5461 5461 - 0x74; 5462 5462 - 0x74; 5463 5463 - 0x70; 5464 5464 - 0x3a; 5465 5465 - 0x2f; 5466 5466 - 0x2f; 5467 5467 - 0x6f; 5468 5468 - 0x63; 5469 5469 - 0x73; 5470 5470 - 0x70; 5471 5471 - 0x2e; 5472 5472 - 0x64; 5473 5473 - 0x69; 5474 5474 - 0x67; 5475 5475 - 0x69; 5476 5476 - 0x63; 5477 5477 - 0x65; 5478 5478 - 0x72; 5479 5479 - 0x74; 5480 5480 - 0x2e; 5481 5481 - 0x63; 5482 5482 - 0x6f; 5483 5483 - 0x6d; 5484 5484 - 0x30; 5485 5485 - 0x52; 5486 5486 - 0x06; 5487 5487 - 0x08; 5488 5488 - 0x2b; 5489 5489 - 0x06; 5490 5490 - 0x01; 5491 5491 - 0x05; 5492 5492 - 0x05; 5493 5493 - 0x07; 5494 5494 - 0x30; 5495 5495 - 0x02; 5496 5496 - 0x86; 5497 5497 - 0x46; 5498 5498 - 0x68; 5499 5499 - 0x74; 5500 5500 - 0x74; 5501 5501 - 0x70; 5502 5502 - 0x3a; 5503 5503 - 0x2f; 5504 5504 - 0x2f; 5505 5505 - 0x63; 5506 5506 - 0x61; 5507 5507 - 0x63; 5508 5508 - 0x65; 5509 5509 - 0x72; 5510 5510 - 0x74; 5511 5511 - 0x73; 5512 5512 - 0x2e; 5513 5513 - 0x64; 5514 5514 - 0x69; 5515 5515 - 0x67; 5516 5516 - 0x69; 5517 5517 - 0x63; 5518 5518 - 0x65; 5519 5519 - 0x72; 5520 5520 - 0x74; 5521 5521 - 0x2e; 5522 5522 - 0x63; 5523 5523 - 0x6f; 5524 5524 - 0x6d; 5525 5525 - 0x2f; 5526 5526 - 0x44; 5527 5527 - 0x69; 5528 5528 - 0x67; 5529 5529 - 0x69; 5530 5530 - 0x43; 5531 5531 - 0x65; 5532 5532 - 0x72; 5533 5533 - 0x74; 5534 5534 - 0x53; 5535 5535 - 0x48; 5536 5536 - 0x41; 5537 5537 - 0x32; 5538 5538 - 0x45; 5539 5539 - 0x78; 5540 5540 - 0x74; 5541 5541 - 0x65; 5542 5542 - 0x6e; 5543 5543 - 0x64; 5544 5544 - 0x65; 5545 5545 - 0x64; 5546 5546 - 0x56; 5547 5547 - 0x61; 5548 5548 - 0x6c; 5549 5549 - 0x69; 5550 5550 - 0x64; 5551 5551 - 0x61; 5552 5552 - 0x74; 5553 5553 - 0x69; 5554 5554 - 0x6f; 5555 5555 - 0x6e; 5556 5556 - 0x53; 5557 5557 - 0x65; 5558 5558 - 0x72; 5559 5559 - 0x76; 5560 5560 - 0x65; 5561 5561 - 0x72; 5562 5562 - 0x43; 5563 5563 - 0x41; 5564 5564 - 0x2e; 5565 5565 - 0x63; 5566 5566 - 0x72; 5567 5567 - 0x74; 5568 5568 - 0x30; 5569 5569 - 0x0c; 5570 5570 - 0x06; 5571 5571 - 0x03; 5572 5572 - 0x55; 5573 5573 - 0x1d; 5574 5574 - 0x13; 5575 5575 - 0x01; 5576 5576 - 0x01; 5577 5577 - 0xff; 5578 5578 - 0x04; 5579 5579 - 0x02; 5580 5580 - 0x30; 5581 5581 - 0x00; 5582 5582 - 0x30; 5583 5583 - 0x0d; 5584 5584 - 0x06; 5585 5585 - 0x09; 5586 5586 - 0x2a; 5587 5587 - 0x86; 5588 5588 - 0x48; 5589 5589 - 0x86; 5590 5590 - 0xf7; 5591 5591 - 0x0d; 5592 5592 - 0x01; 5593 5593 - 0x01; 5594 5594 - 0x0b; 5595 5595 - 0x05; 5596 5596 - 0x00; 5597 5597 - 0x03; 5598 5598 - 0x82; 5599 5599 - 0x01; 5600 5600 - 0x01; 5601 5601 - 0x00; 5602 5602 - 0x6f; 5603 5603 - 0xe7; 5604 5604 - 0x6d; 5605 5605 - 0xcb; 5606 5606 - 0x82; 5607 5607 - 0xf3; 5608 5608 - 0xef; 5609 5609 - 0x90; 5610 5610 - 0x87; 5611 5611 - 0x09; 5612 5612 - 0xd7; 5613 5613 - 0x0f; 5614 5614 - 0x15; 5615 5615 - 0x22; 5616 5616 - 0x2c; 5617 5617 - 0x8c; 5618 5618 - 0xfe; 5619 5619 - 0xd3; 5620 5620 - 0xab; 5621 5621 - 0x1c; 5622 5622 - 0x8a; 5623 5623 - 0x96; 5624 5624 - 0xdb; 5625 5625 - 0x5d; 5626 5626 - 0x12; 5627 5627 - 0x5d; 5628 5628 - 0xd1; 5629 5629 - 0x78; 5630 5630 - 0xc0; 5631 5631 - 0x31; 5632 5632 - 0xb0; 5633 5633 - 0xff; 5634 5634 - 0x45; 5635 5635 - 0xc8; 5636 5636 - 0x89; 5637 5637 - 0xf7; 5638 5638 - 0x08; 5639 5639 - 0x98; 5640 5640 - 0x52; 5641 5641 - 0x17; 5642 5642 - 0x1f; 5643 5643 - 0x4c; 5644 5644 - 0x4b; 5645 5645 - 0x20; 5646 5646 - 0x64; 5647 5647 - 0x6a; 5648 5648 - 0x6d; 5649 5649 - 0xdb; 5650 5650 - 0x50; 5651 5651 - 0xd7; 5652 5652 - 0x10; 5653 5653 - 0xbe; 5654 5654 - 0x7e; 5655 5655 - 0xab; 5656 5656 - 0xfe; 5657 5657 - 0x2f; 5658 5658 - 0x80; 5659 5659 - 0xd8; 5660 5660 - 0xa9; 5661 5661 - 0x4a; 5662 5662 - 0x58; 5663 5663 - 0x41; 5664 5664 - 0x69; 5665 5665 - 0x81; 5666 5666 - 0x72; 5667 5667 - 0x19; 5668 5668 - 0x08; 5669 5669 - 0x83; 5670 5670 - 0x9b; 5671 5671 - 0x92; 5672 5672 - 0x10; 5673 5673 - 0x4e; 5674 5674 - 0x62; 5675 5675 - 0x2d; 5676 5676 - 0x7b; 5677 5677 - 0x46; 5678 5678 - 0x70; 5679 5679 - 0x43; 5680 5680 - 0x6e; 5681 5681 - 0xa3; 5682 5682 - 0x53; 5683 5683 - 0x13; 5684 5684 - 0x1f; 5685 5685 - 0xe2; 5686 5686 - 0x93; 5687 5687 - 0xa6; 5688 5688 - 0x23; 5689 5689 - 0x5b; 5690 5690 - 0xf7; 5691 5691 - 0x92; 5692 5692 - 0x3e; 5693 5693 - 0x37; 5694 5694 - 0x14; 5695 5695 - 0x75; 5696 5696 - 0x3b; 5697 5697 - 0xb9; 5698 5698 - 0x4b; 5699 5699 - 0x24; 5700 5700 - 0x41; 5701 5701 - 0x2e; 5702 5702 - 0xa5; 5703 5703 - 0x3d; 5704 5704 - 0x48; 5705 5705 - 0x0d; 5706 5706 - 0x0f; 5707 5707 - 0x99; 5708 5708 - 0xea; 5709 5709 - 0x1e; 5710 5710 - 0x42; 5711 5711 - 0x97; 5712 5712 - 0xc6; 5713 5713 - 0xfe; 5714 5714 - 0x95; 5715 5715 - 0xda; 5716 5716 - 0xab; 5717 5717 - 0x47; 5718 5718 - 0x9a; 5719 5719 - 0xcb; 5720 5720 - 0x2b; 5721 5721 - 0x03; 5722 5722 - 0xd6; 5723 5723 - 0x0d; 5724 5724 - 0x40; 5725 5725 - 0xc1; 5726 5726 - 0x0a; 5727 5727 - 0xf7; 5728 5728 - 0x78; 5729 5729 - 0x1a; 5730 5730 - 0xda; 5731 5731 - 0xb5; 5732 5732 - 0x83; 5733 5733 - 0xa4; 5734 5734 - 0xad; 5735 5735 - 0xb5; 5736 5736 - 0x99; 5737 5737 - 0x49; 5738 5738 - 0x20; 5739 5739 - 0x2e; 5740 5740 - 0xf8; 5741 5741 - 0x93; 5742 5742 - 0x3c; 5743 5743 - 0x1e; 5744 5744 - 0x6c; 5745 5745 - 0x3d; 5746 5746 - 0xd1; 5747 5747 - 0x3b; 5748 5748 - 0x23; 5749 5749 - 0x3a; 5750 5750 - 0x6b; 5751 5751 - 0x38; 5752 5752 - 0x2a; 5753 5753 - 0x7e; 5754 5754 - 0x62; 5755 5755 - 0x7a; 5756 5756 - 0x5f; 5757 5757 - 0xdd; 5758 5758 - 0x17; 5759 5759 - 0x05; 5760 5760 - 0x75; 5761 5761 - 0xd0; 5762 5762 - 0x24; 5763 5763 - 0x5d; 5764 5764 - 0xbe; 5765 5765 - 0x8d; 5766 5766 - 0xa8; 5767 5767 - 0x9a; 5768 5768 - 0x10; 5769 5769 - 0x44; 5770 5770 - 0xfa; 5771 5771 - 0xd2; 5772 5772 - 0xb4; 5773 5773 - 0xca; 5774 5774 - 0xef; 5775 5775 - 0xd7; 5776 5776 - 0xd0; 5777 5777 - 0xb5; 5778 5778 - 0x76; 5779 5779 - 0xa5; 5780 5780 - 0x26; 5781 5781 - 0x25; 5782 5782 - 0x1c; 5783 5783 - 0x08; 5784 5784 - 0x41; 5785 5785 - 0xd8; 5786 5786 - 0x64; 5787 5787 - 0x92; 5788 5788 - 0xa7; 5789 5789 - 0xaf; 5790 5790 - 0x7d; 5791 5791 - 0xfe; 5792 5792 - 0x88; 5793 5793 - 0x40; 5794 5794 - 0x39; 5795 5795 - 0x61; 5796 5796 - 0x0b; 5797 5797 - 0xc0; 5798 5798 - 0x48; 5799 5799 - 0x30; 5800 5800 - 0xa9; 5801 5801 - 0x82; 5802 5802 - 0x34; 5803 5803 - 0xad; 5804 5804 - 0xf7; 5805 5805 - 0x70; 5806 5806 - 0x46; 5807 5807 - 0x03; 5808 5808 - 0x7c; 5809 5809 - 0x35; 5810 5810 - 0x91; 5811 5811 - 0x3a; 5812 5812 - 0xd5; 5813 5813 - 0xbb; 5814 5814 - 0x24; 5815 5815 - 0xd8; 5816 5816 - 0x01; 5817 5817 - 0xbc; 5818 5818 - 0x14; 5819 5819 - 0xf0; 5820 5820 - 0xc3; 5821 5821 - 0x0f; 5822 5822 - 0x23; 5823 5823 - 0x3b; 5824 5824 - 0x58; 5825 5825 - 0x32; 5826 5826 - 0xba; 5827 5827 - 0x0f; 5828 5828 - 0x12; 5829 5829 - 0x6c; 5830 5830 - 0x66; 5831 5831 - 0x7a; 5832 5832 - 0x6d; 5833 5833 - 0x9d; 5834 5834 - 0xe4; 5835 5835 - 0xf0; 5836 5836 - 0xe5; 5837 5837 - 0x7c; 5838 5838 - 0x5d; 5839 5839 - 0x7e; 5840 5840 - 0x02; 5841 5841 - 0xd8; 5842 5842 - 0xd7; 5843 5843 - 0xac; 5844 5844 - 0x89; 5845 5845 - 0x97; 5846 5846 - 0x0b; 5847 5847 - 0x61; 5848 5848 - 0xb7; 5849 5849 - 0x36; 5850 5850 - 0x9f; 5851 5851 - 0xb0; 5852 5852 - 0x7d; 5853 5853 - 0x3b; 5854 5854 - 0xee; 5855 5855 - 0xb7; 5856 5856 - 0x33; 5857 5857 - 0x69; 5858 5858 - ] 5859 5859 - in 5860 5860 - let gh2 = 5861 5861 - list_to_cstruct 5862 5862 - [ 5863 5863 - 0x30; 5864 5864 - 0x82; 5865 5865 - 0x04; 5866 5866 - 0xb6; 5867 5867 - 0x30; 5868 5868 - 0x82; 5869 5869 - 0x03; 5870 5870 - 0x9e; 5871 5871 - 0xa0; 5872 5872 - 0x03; 5873 5873 - 0x02; 5874 5874 - 0x01; 5875 5875 - 0x02; 5876 5876 - 0x02; 5877 5877 - 0x10; 5878 5878 - 0x0c; 5879 5879 - 0x79; 5880 5880 - 0xa9; 5881 5881 - 0x44; 5882 5882 - 0xb0; 5883 5883 - 0x8c; 5884 5884 - 0x11; 5885 5885 - 0x95; 5886 5886 - 0x20; 5887 5887 - 0x92; 5888 5888 - 0x61; 5889 5889 - 0x5f; 5890 5890 - 0xe2; 5891 5891 - 0x6b; 5892 5892 - 0x1d; 5893 5893 - 0x83; 5894 5894 - 0x30; 5895 5895 - 0x0d; 5896 5896 - 0x06; 5897 5897 - 0x09; 5898 5898 - 0x2a; 5899 5899 - 0x86; 5900 5900 - 0x48; 5901 5901 - 0x86; 5902 5902 - 0xf7; 5903 5903 - 0x0d; 5904 5904 - 0x01; 5905 5905 - 0x01; 5906 5906 - 0x0b; 5907 5907 - 0x05; 5908 5908 - 0x00; 5909 5909 - 0x30; 5910 5910 - 0x6c; 5911 5911 - 0x31; 5912 5912 - 0x0b; 5913 5913 - 0x30; 5914 5914 - 0x09; 5915 5915 - 0x06; 5916 5916 - 0x03; 5917 5917 - 0x55; 5918 5918 - 0x04; 5919 5919 - 0x06; 5920 5920 - 0x13; 5921 5921 - 0x02; 5922 5922 - 0x55; 5923 5923 - 0x53; 5924 5924 - 0x31; 5925 5925 - 0x15; 5926 5926 - 0x30; 5927 5927 - 0x13; 5928 5928 - 0x06; 5929 5929 - 0x03; 5930 5930 - 0x55; 5931 5931 - 0x04; 5932 5932 - 0x0a; 5933 5933 - 0x13; 5934 5934 - 0x0c; 5935 5935 - 0x44; 5936 5936 - 0x69; 5937 5937 - 0x67; 5938 5938 - 0x69; 5939 5939 - 0x43; 5940 5940 - 0x65; 5941 5941 - 0x72; 5942 5942 - 0x74; 5943 5943 - 0x20; 5944 5944 - 0x49; 5945 5945 - 0x6e; 5946 5946 - 0x63; 5947 5947 - 0x31; 5948 5948 - 0x19; 5949 5949 - 0x30; 5950 5950 - 0x17; 5951 5951 - 0x06; 5952 5952 - 0x03; 5953 5953 - 0x55; 5954 5954 - 0x04; 5955 5955 - 0x0b; 5956 5956 - 0x13; 5957 5957 - 0x10; 5958 5958 - 0x77; 5959 5959 - 0x77; 5960 5960 - 0x77; 5961 5961 - 0x2e; 5962 5962 - 0x64; 5963 5963 - 0x69; 5964 5964 - 0x67; 5965 5965 - 0x69; 5966 5966 - 0x63; 5967 5967 - 0x65; 5968 5968 - 0x72; 5969 5969 - 0x74; 5970 5970 - 0x2e; 5971 5971 - 0x63; 5972 5972 - 0x6f; 5973 5973 - 0x6d; 5974 5974 - 0x31; 5975 5975 - 0x2b; 5976 5976 - 0x30; 5977 5977 - 0x29; 5978 5978 - 0x06; 5979 5979 - 0x03; 5980 5980 - 0x55; 5981 5981 - 0x04; 5982 5982 - 0x03; 5983 5983 - 0x13; 5984 5984 - 0x22; 5985 5985 - 0x44; 5986 5986 - 0x69; 5987 5987 - 0x67; 5988 5988 - 0x69; 5989 5989 - 0x43; 5990 5990 - 0x65; 5991 5991 - 0x72; 5992 5992 - 0x74; 5993 5993 - 0x20; 5994 5994 - 0x48; 5995 5995 - 0x69; 5996 5996 - 0x67; 5997 5997 - 0x68; 5998 5998 - 0x20; 5999 5999 - 0x41; 6000 6000 - 0x73; 6001 6001 - 0x73; 6002 6002 - 0x75; 6003 6003 - 0x72; 6004 6004 - 0x61; 6005 6005 - 0x6e; 6006 6006 - 0x63; 6007 6007 - 0x65; 6008 6008 - 0x20; 6009 6009 - 0x45; 6010 6010 - 0x56; 6011 6011 - 0x20; 6012 6012 - 0x52; 6013 6013 - 0x6f; 6014 6014 - 0x6f; 6015 6015 - 0x74; 6016 6016 - 0x20; 6017 6017 - 0x43; 6018 6018 - 0x41; 6019 6019 - 0x30; 6020 6020 - 0x1e; 6021 6021 - 0x17; 6022 6022 - 0x0d; 6023 6023 - 0x31; 6024 6024 - 0x33; 6025 6025 - 0x31; 6026 6026 - 0x30; 6027 6027 - 0x32; 6028 6028 - 0x32; 6029 6029 - 0x31; 6030 6030 - 0x32; 6031 6031 - 0x30; 6032 6032 - 0x30; 6033 6033 - 0x30; 6034 6034 - 0x30; 6035 6035 - 0x5a; 6036 6036 - 0x17; 6037 6037 - 0x0d; 6038 6038 - 0x32; 6039 6039 - 0x38; 6040 6040 - 0x31; 6041 6041 - 0x30; 6042 6042 - 0x32; 6043 6043 - 0x32; 6044 6044 - 0x31; 6045 6045 - 0x32; 6046 6046 - 0x30; 6047 6047 - 0x30; 6048 6048 - 0x30; 6049 6049 - 0x30; 6050 6050 - 0x5a; 6051 6051 - 0x30; 6052 6052 - 0x75; 6053 6053 - 0x31; 6054 6054 - 0x0b; 6055 6055 - 0x30; 6056 6056 - 0x09; 6057 6057 - 0x06; 6058 6058 - 0x03; 6059 6059 - 0x55; 6060 6060 - 0x04; 6061 6061 - 0x06; 6062 6062 - 0x13; 6063 6063 - 0x02; 6064 6064 - 0x55; 6065 6065 - 0x53; 6066 6066 - 0x31; 6067 6067 - 0x15; 6068 6068 - 0x30; 6069 6069 - 0x13; 6070 6070 - 0x06; 6071 6071 - 0x03; 6072 6072 - 0x55; 6073 6073 - 0x04; 6074 6074 - 0x0a; 6075 6075 - 0x13; 6076 6076 - 0x0c; 6077 6077 - 0x44; 6078 6078 - 0x69; 6079 6079 - 0x67; 6080 6080 - 0x69; 6081 6081 - 0x43; 6082 6082 - 0x65; 6083 6083 - 0x72; 6084 6084 - 0x74; 6085 6085 - 0x20; 6086 6086 - 0x49; 6087 6087 - 0x6e; 6088 6088 - 0x63; 6089 6089 - 0x31; 6090 6090 - 0x19; 6091 6091 - 0x30; 6092 6092 - 0x17; 6093 6093 - 0x06; 6094 6094 - 0x03; 6095 6095 - 0x55; 6096 6096 - 0x04; 6097 6097 - 0x0b; 6098 6098 - 0x13; 6099 6099 - 0x10; 6100 6100 - 0x77; 6101 6101 - 0x77; 6102 6102 - 0x77; 6103 6103 - 0x2e; 6104 6104 - 0x64; 6105 6105 - 0x69; 6106 6106 - 0x67; 6107 6107 - 0x69; 6108 6108 - 0x63; 6109 6109 - 0x65; 6110 6110 - 0x72; 6111 6111 - 0x74; 6112 6112 - 0x2e; 6113 6113 - 0x63; 6114 6114 - 0x6f; 6115 6115 - 0x6d; 6116 6116 - 0x31; 6117 6117 - 0x34; 6118 6118 - 0x30; 6119 6119 - 0x32; 6120 6120 - 0x06; 6121 6121 - 0x03; 6122 6122 - 0x55; 6123 6123 - 0x04; 6124 6124 - 0x03; 6125 6125 - 0x13; 6126 6126 - 0x2b; 6127 6127 - 0x44; 6128 6128 - 0x69; 6129 6129 - 0x67; 6130 6130 - 0x69; 6131 6131 - 0x43; 6132 6132 - 0x65; 6133 6133 - 0x72; 6134 6134 - 0x74; 6135 6135 - 0x20; 6136 6136 - 0x53; 6137 6137 - 0x48; 6138 6138 - 0x41; 6139 6139 - 0x32; 6140 6140 - 0x20; 6141 6141 - 0x45; 6142 6142 - 0x78; 6143 6143 - 0x74; 6144 6144 - 0x65; 6145 6145 - 0x6e; 6146 6146 - 0x64; 6147 6147 - 0x65; 6148 6148 - 0x64; 6149 6149 - 0x20; 6150 6150 - 0x56; 6151 6151 - 0x61; 6152 6152 - 0x6c; 6153 6153 - 0x69; 6154 6154 - 0x64; 6155 6155 - 0x61; 6156 6156 - 0x74; 6157 6157 - 0x69; 6158 6158 - 0x6f; 6159 6159 - 0x6e; 6160 6160 - 0x20; 6161 6161 - 0x53; 6162 6162 - 0x65; 6163 6163 - 0x72; 6164 6164 - 0x76; 6165 6165 - 0x65; 6166 6166 - 0x72; 6167 6167 - 0x20; 6168 6168 - 0x43; 6169 6169 - 0x41; 6170 6170 - 0x30; 6171 6171 - 0x82; 6172 6172 - 0x01; 6173 6173 - 0x22; 6174 6174 - 0x30; 6175 6175 - 0x0d; 6176 6176 - 0x06; 6177 6177 - 0x09; 6178 6178 - 0x2a; 6179 6179 - 0x86; 6180 6180 - 0x48; 6181 6181 - 0x86; 6182 6182 - 0xf7; 6183 6183 - 0x0d; 6184 6184 - 0x01; 6185 6185 - 0x01; 6186 6186 - 0x01; 6187 6187 - 0x05; 6188 6188 - 0x00; 6189 6189 - 0x03; 6190 6190 - 0x82; 6191 6191 - 0x01; 6192 6192 - 0x0f; 6193 6193 - 0x00; 6194 6194 - 0x30; 6195 6195 - 0x82; 6196 6196 - 0x01; 6197 6197 - 0x0a; 6198 6198 - 0x02; 6199 6199 - 0x82; 6200 6200 - 0x01; 6201 6201 - 0x01; 6202 6202 - 0x00; 6203 6203 - 0xd7; 6204 6204 - 0x53; 6205 6205 - 0xa4; 6206 6206 - 0x04; 6207 6207 - 0x51; 6208 6208 - 0xf8; 6209 6209 - 0x99; 6210 6210 - 0xa6; 6211 6211 - 0x16; 6212 6212 - 0x48; 6213 6213 - 0x4b; 6214 6214 - 0x67; 6215 6215 - 0x27; 6216 6216 - 0xaa; 6217 6217 - 0x93; 6218 6218 - 0x49; 6219 6219 - 0xd0; 6220 6220 - 0x39; 6221 6221 - 0xed; 6222 6222 - 0x0c; 6223 6223 - 0xb0; 6224 6224 - 0xb0; 6225 6225 - 0x00; 6226 6226 - 0x87; 6227 6227 - 0xf1; 6228 6228 - 0x67; 6229 6229 - 0x28; 6230 6230 - 0x86; 6231 6231 - 0x85; 6232 6232 - 0x8c; 6233 6233 - 0x8e; 6234 6234 - 0x63; 6235 6235 - 0xda; 6236 6236 - 0xbc; 6237 6237 - 0xb1; 6238 6238 - 0x40; 6239 6239 - 0x38; 6240 6240 - 0xe2; 6241 6241 - 0xd3; 6242 6242 - 0xf5; 6243 6243 - 0xec; 6244 6244 - 0xa5; 6245 6245 - 0x05; 6246 6246 - 0x18; 6247 6247 - 0xb8; 6248 6248 - 0x3d; 6249 6249 - 0x3e; 6250 6250 - 0xc5; 6251 6251 - 0x99; 6252 6252 - 0x17; 6253 6253 - 0x32; 6254 6254 - 0xec; 6255 6255 - 0x18; 6256 6256 - 0x8c; 6257 6257 - 0xfa; 6258 6258 - 0xf1; 6259 6259 - 0x0c; 6260 6260 - 0xa6; 6261 6261 - 0x64; 6262 6262 - 0x21; 6263 6263 - 0x85; 6264 6264 - 0xcb; 6265 6265 - 0x07; 6266 6266 - 0x10; 6267 6267 - 0x34; 6268 6268 - 0xb0; 6269 6269 - 0x52; 6270 6270 - 0x88; 6271 6271 - 0x2b; 6272 6272 - 0x1f; 6273 6273 - 0x68; 6274 6274 - 0x9b; 6275 6275 - 0xd2; 6276 6276 - 0xb1; 6277 6277 - 0x8f; 6278 6278 - 0x12; 6279 6279 - 0xb0; 6280 6280 - 0xb3; 6281 6281 - 0xd2; 6282 6282 - 0xe7; 6283 6283 - 0x88; 6284 6284 - 0x1f; 6285 6285 - 0x1f; 6286 6286 - 0xef; 6287 6287 - 0x38; 6288 6288 - 0x77; 6289 6289 - 0x54; 6290 6290 - 0x53; 6291 6291 - 0x5f; 6292 6292 - 0x80; 6293 6293 - 0x79; 6294 6294 - 0x3f; 6295 6295 - 0x2e; 6296 6296 - 0x1a; 6297 6297 - 0xaa; 6298 6298 - 0xa8; 6299 6299 - 0x1e; 6300 6300 - 0x4b; 6301 6301 - 0x2b; 6302 6302 - 0x0d; 6303 6303 - 0xab; 6304 6304 - 0xb7; 6305 6305 - 0x63; 6306 6306 - 0xb9; 6307 6307 - 0x35; 6308 6308 - 0xb7; 6309 6309 - 0x7d; 6310 6310 - 0x14; 6311 6311 - 0xbc; 6312 6312 - 0x59; 6313 6313 - 0x4b; 6314 6314 - 0xdf; 6315 6315 - 0x51; 6316 6316 - 0x4a; 6317 6317 - 0xd2; 6318 6318 - 0xa1; 6319 6319 - 0xe2; 6320 6320 - 0x0c; 6321 6321 - 0xe2; 6322 6322 - 0x90; 6323 6323 - 0x82; 6324 6324 - 0x87; 6325 6325 - 0x6a; 6326 6326 - 0xae; 6327 6327 - 0xea; 6328 6328 - 0xd7; 6329 6329 - 0x64; 6330 6330 - 0xd6; 6331 6331 - 0x98; 6332 6332 - 0x55; 6333 6333 - 0xe8; 6334 6334 - 0xfd; 6335 6335 - 0xaf; 6336 6336 - 0x1a; 6337 6337 - 0x50; 6338 6338 - 0x6c; 6339 6339 - 0x54; 6340 6340 - 0xbc; 6341 6341 - 0x11; 6342 6342 - 0xf2; 6343 6343 - 0xfd; 6344 6344 - 0x4a; 6345 6345 - 0xf2; 6346 6346 - 0x9d; 6347 6347 - 0xbb; 6348 6348 - 0x7f; 6349 6349 - 0x0e; 6350 6350 - 0xf4; 6351 6351 - 0xd5; 6352 6352 - 0xbe; 6353 6353 - 0x8e; 6354 6354 - 0x16; 6355 6355 - 0x89; 6356 6356 - 0x12; 6357 6357 - 0x55; 6358 6358 - 0xd8; 6359 6359 - 0xc0; 6360 6360 - 0x71; 6361 6361 - 0x34; 6362 6362 - 0xee; 6363 6363 - 0xf6; 6364 6364 - 0xdc; 6365 6365 - 0x2d; 6366 6366 - 0xec; 6367 6367 - 0xc4; 6368 6368 - 0x87; 6369 6369 - 0x25; 6370 6370 - 0x86; 6371 6371 - 0x8d; 6372 6372 - 0xd8; 6373 6373 - 0x21; 6374 6374 - 0xe4; 6375 6375 - 0xb0; 6376 6376 - 0x4d; 6377 6377 - 0x0c; 6378 6378 - 0x89; 6379 6379 - 0xdc; 6380 6380 - 0x39; 6381 6381 - 0x26; 6382 6382 - 0x17; 6383 6383 - 0xdd; 6384 6384 - 0xf6; 6385 6385 - 0xd7; 6386 6386 - 0x94; 6387 6387 - 0x85; 6388 6388 - 0xd8; 6389 6389 - 0x04; 6390 6390 - 0x21; 6391 6391 - 0x70; 6392 6392 - 0x9d; 6393 6393 - 0x6f; 6394 6394 - 0x6f; 6395 6395 - 0xff; 6396 6396 - 0x5c; 6397 6397 - 0xba; 6398 6398 - 0x19; 6399 6399 - 0xe1; 6400 6400 - 0x45; 6401 6401 - 0xcb; 6402 6402 - 0x56; 6403 6403 - 0x57; 6404 6404 - 0x28; 6405 6405 - 0x7e; 6406 6406 - 0x1c; 6407 6407 - 0x0d; 6408 6408 - 0x41; 6409 6409 - 0x57; 6410 6410 - 0xaa; 6411 6411 - 0xb7; 6412 6412 - 0xb8; 6413 6413 - 0x27; 6414 6414 - 0xbb; 6415 6415 - 0xb1; 6416 6416 - 0xe4; 6417 6417 - 0xfa; 6418 6418 - 0x2a; 6419 6419 - 0xef; 6420 6420 - 0x21; 6421 6421 - 0x23; 6422 6422 - 0x75; 6423 6423 - 0x1a; 6424 6424 - 0xad; 6425 6425 - 0x2d; 6426 6426 - 0x9b; 6427 6427 - 0x86; 6428 6428 - 0x35; 6429 6429 - 0x8c; 6430 6430 - 0x9c; 6431 6431 - 0x77; 6432 6432 - 0xb5; 6433 6433 - 0x73; 6434 6434 - 0xad; 6435 6435 - 0xd8; 6436 6436 - 0x94; 6437 6437 - 0x2d; 6438 6438 - 0xe4; 6439 6439 - 0xf3; 6440 6440 - 0x0c; 6441 6441 - 0x9d; 6442 6442 - 0xee; 6443 6443 - 0xc1; 6444 6444 - 0x4e; 6445 6445 - 0x62; 6446 6446 - 0x7e; 6447 6447 - 0x17; 6448 6448 - 0xc0; 6449 6449 - 0x71; 6450 6450 - 0x9e; 6451 6451 - 0x2c; 6452 6452 - 0xde; 6453 6453 - 0xf1; 6454 6454 - 0xf9; 6455 6455 - 0x10; 6456 6456 - 0x28; 6457 6457 - 0x19; 6458 6458 - 0x33; 6459 6459 - 0x02; 6460 6460 - 0x03; 6461 6461 - 0x01; 6462 6462 - 0x00; 6463 6463 - 0x01; 6464 6464 - 0xa3; 6465 6465 - 0x82; 6466 6466 - 0x01; 6467 6467 - 0x49; 6468 6468 - 0x30; 6469 6469 - 0x82; 6470 6470 - 0x01; 6471 6471 - 0x45; 6472 6472 - 0x30; 6473 6473 - 0x12; 6474 6474 - 0x06; 6475 6475 - 0x03; 6476 6476 - 0x55; 6477 6477 - 0x1d; 6478 6478 - 0x13; 6479 6479 - 0x01; 6480 6480 - 0x01; 6481 6481 - 0xff; 6482 6482 - 0x04; 6483 6483 - 0x08; 6484 6484 - 0x30; 6485 6485 - 0x06; 6486 6486 - 0x01; 6487 6487 - 0x01; 6488 6488 - 0xff; 6489 6489 - 0x02; 6490 6490 - 0x01; 6491 6491 - 0x00; 6492 6492 - 0x30; 6493 6493 - 0x0e; 6494 6494 - 0x06; 6495 6495 - 0x03; 6496 6496 - 0x55; 6497 6497 - 0x1d; 6498 6498 - 0x0f; 6499 6499 - 0x01; 6500 6500 - 0x01; 6501 6501 - 0xff; 6502 6502 - 0x04; 6503 6503 - 0x04; 6504 6504 - 0x03; 6505 6505 - 0x02; 6506 6506 - 0x01; 6507 6507 - 0x86; 6508 6508 - 0x30; 6509 6509 - 0x1d; 6510 6510 - 0x06; 6511 6511 - 0x03; 6512 6512 - 0x55; 6513 6513 - 0x1d; 6514 6514 - 0x25; 6515 6515 - 0x04; 6516 6516 - 0x16; 6517 6517 - 0x30; 6518 6518 - 0x14; 6519 6519 - 0x06; 6520 6520 - 0x08; 6521 6521 - 0x2b; 6522 6522 - 0x06; 6523 6523 - 0x01; 6524 6524 - 0x05; 6525 6525 - 0x05; 6526 6526 - 0x07; 6527 6527 - 0x03; 6528 6528 - 0x01; 6529 6529 - 0x06; 6530 6530 - 0x08; 6531 6531 - 0x2b; 6532 6532 - 0x06; 6533 6533 - 0x01; 6534 6534 - 0x05; 6535 6535 - 0x05; 6536 6536 - 0x07; 6537 6537 - 0x03; 6538 6538 - 0x02; 6539 6539 - 0x30; 6540 6540 - 0x34; 6541 6541 - 0x06; 6542 6542 - 0x08; 6543 6543 - 0x2b; 6544 6544 - 0x06; 6545 6545 - 0x01; 6546 6546 - 0x05; 6547 6547 - 0x05; 6548 6548 - 0x07; 6549 6549 - 0x01; 6550 6550 - 0x01; 6551 6551 - 0x04; 6552 6552 - 0x28; 6553 6553 - 0x30; 6554 6554 - 0x26; 6555 6555 - 0x30; 6556 6556 - 0x24; 6557 6557 - 0x06; 6558 6558 - 0x08; 6559 6559 - 0x2b; 6560 6560 - 0x06; 6561 6561 - 0x01; 6562 6562 - 0x05; 6563 6563 - 0x05; 6564 6564 - 0x07; 6565 6565 - 0x30; 6566 6566 - 0x01; 6567 6567 - 0x86; 6568 6568 - 0x18; 6569 6569 - 0x68; 6570 6570 - 0x74; 6571 6571 - 0x74; 6572 6572 - 0x70; 6573 6573 - 0x3a; 6574 6574 - 0x2f; 6575 6575 - 0x2f; 6576 6576 - 0x6f; 6577 6577 - 0x63; 6578 6578 - 0x73; 6579 6579 - 0x70; 6580 6580 - 0x2e; 6581 6581 - 0x64; 6582 6582 - 0x69; 6583 6583 - 0x67; 6584 6584 - 0x69; 6585 6585 - 0x63; 6586 6586 - 0x65; 6587 6587 - 0x72; 6588 6588 - 0x74; 6589 6589 - 0x2e; 6590 6590 - 0x63; 6591 6591 - 0x6f; 6592 6592 - 0x6d; 6593 6593 - 0x30; 6594 6594 - 0x4b; 6595 6595 - 0x06; 6596 6596 - 0x03; 6597 6597 - 0x55; 6598 6598 - 0x1d; 6599 6599 - 0x1f; 6600 6600 - 0x04; 6601 6601 - 0x44; 6602 6602 - 0x30; 6603 6603 - 0x42; 6604 6604 - 0x30; 6605 6605 - 0x40; 6606 6606 - 0xa0; 6607 6607 - 0x3e; 6608 6608 - 0xa0; 6609 6609 - 0x3c; 6610 6610 - 0x86; 6611 6611 - 0x3a; 6612 6612 - 0x68; 6613 6613 - 0x74; 6614 6614 - 0x74; 6615 6615 - 0x70; 6616 6616 - 0x3a; 6617 6617 - 0x2f; 6618 6618 - 0x2f; 6619 6619 - 0x63; 6620 6620 - 0x72; 6621 6621 - 0x6c; 6622 6622 - 0x34; 6623 6623 - 0x2e; 6624 6624 - 0x64; 6625 6625 - 0x69; 6626 6626 - 0x67; 6627 6627 - 0x69; 6628 6628 - 0x63; 6629 6629 - 0x65; 6630 6630 - 0x72; 6631 6631 - 0x74; 6632 6632 - 0x2e; 6633 6633 - 0x63; 6634 6634 - 0x6f; 6635 6635 - 0x6d; 6636 6636 - 0x2f; 6637 6637 - 0x44; 6638 6638 - 0x69; 6639 6639 - 0x67; 6640 6640 - 0x69; 6641 6641 - 0x43; 6642 6642 - 0x65; 6643 6643 - 0x72; 6644 6644 - 0x74; 6645 6645 - 0x48; 6646 6646 - 0x69; 6647 6647 - 0x67; 6648 6648 - 0x68; 6649 6649 - 0x41; 6650 6650 - 0x73; 6651 6651 - 0x73; 6652 6652 - 0x75; 6653 6653 - 0x72; 6654 6654 - 0x61; 6655 6655 - 0x6e; 6656 6656 - 0x63; 6657 6657 - 0x65; 6658 6658 - 0x45; 6659 6659 - 0x56; 6660 6660 - 0x52; 6661 6661 - 0x6f; 6662 6662 - 0x6f; 6663 6663 - 0x74; 6664 6664 - 0x43; 6665 6665 - 0x41; 6666 6666 - 0x2e; 6667 6667 - 0x63; 6668 6668 - 0x72; 6669 6669 - 0x6c; 6670 6670 - 0x30; 6671 6671 - 0x3d; 6672 6672 - 0x06; 6673 6673 - 0x03; 6674 6674 - 0x55; 6675 6675 - 0x1d; 6676 6676 - 0x20; 6677 6677 - 0x04; 6678 6678 - 0x36; 6679 6679 - 0x30; 6680 6680 - 0x34; 6681 6681 - 0x30; 6682 6682 - 0x32; 6683 6683 - 0x06; 6684 6684 - 0x04; 6685 6685 - 0x55; 6686 6686 - 0x1d; 6687 6687 - 0x20; 6688 6688 - 0x00; 6689 6689 - 0x30; 6690 6690 - 0x2a; 6691 6691 - 0x30; 6692 6692 - 0x28; 6693 6693 - 0x06; 6694 6694 - 0x08; 6695 6695 - 0x2b; 6696 6696 - 0x06; 6697 6697 - 0x01; 6698 6698 - 0x05; 6699 6699 - 0x05; 6700 6700 - 0x07; 6701 6701 - 0x02; 6702 6702 - 0x01; 6703 6703 - 0x16; 6704 6704 - 0x1c; 6705 6705 - 0x68; 6706 6706 - 0x74; 6707 6707 - 0x74; 6708 6708 - 0x70; 6709 6709 - 0x73; 6710 6710 - 0x3a; 6711 6711 - 0x2f; 6712 6712 - 0x2f; 6713 6713 - 0x77; 6714 6714 - 0x77; 6715 6715 - 0x77; 6716 6716 - 0x2e; 6717 6717 - 0x64; 6718 6718 - 0x69; 6719 6719 - 0x67; 6720 6720 - 0x69; 6721 6721 - 0x63; 6722 6722 - 0x65; 6723 6723 - 0x72; 6724 6724 - 0x74; 6725 6725 - 0x2e; 6726 6726 - 0x63; 6727 6727 - 0x6f; 6728 6728 - 0x6d; 6729 6729 - 0x2f; 6730 6730 - 0x43; 6731 6731 - 0x50; 6732 6732 - 0x53; 6733 6733 - 0x30; 6734 6734 - 0x1d; 6735 6735 - 0x06; 6736 6736 - 0x03; 6737 6737 - 0x55; 6738 6738 - 0x1d; 6739 6739 - 0x0e; 6740 6740 - 0x04; 6741 6741 - 0x16; 6742 6742 - 0x04; 6743 6743 - 0x14; 6744 6744 - 0x3d; 6745 6745 - 0xd3; 6746 6746 - 0x50; 6747 6747 - 0xa5; 6748 6748 - 0xd6; 6749 6749 - 0xa0; 6750 6750 - 0xad; 6751 6751 - 0xee; 6752 6752 - 0xf3; 6753 6753 - 0x4a; 6754 6754 - 0x60; 6755 6755 - 0x0a; 6756 6756 - 0x65; 6757 6757 - 0xd3; 6758 6758 - 0x21; 6759 6759 - 0xd4; 6760 6760 - 0xf8; 6761 6761 - 0xf8; 6762 6762 - 0xd6; 6763 6763 - 0x0f; 6764 6764 - 0x30; 6765 6765 - 0x1f; 6766 6766 - 0x06; 6767 6767 - 0x03; 6768 6768 - 0x55; 6769 6769 - 0x1d; 6770 6770 - 0x23; 6771 6771 - 0x04; 6772 6772 - 0x18; 6773 6773 - 0x30; 6774 6774 - 0x16; 6775 6775 - 0x80; 6776 6776 - 0x14; 6777 6777 - 0xb1; 6778 6778 - 0x3e; 6779 6779 - 0xc3; 6780 6780 - 0x69; 6781 6781 - 0x03; 6782 6782 - 0xf8; 6783 6783 - 0xbf; 6784 6784 - 0x47; 6785 6785 - 0x01; 6786 6786 - 0xd4; 6787 6787 - 0x98; 6788 6788 - 0x26; 6789 6789 - 0x1a; 6790 6790 - 0x08; 6791 6791 - 0x02; 6792 6792 - 0xef; 6793 6793 - 0x63; 6794 6794 - 0x64; 6795 6795 - 0x2b; 6796 6796 - 0xc3; 6797 6797 - 0x30; 6798 6798 - 0x0d; 6799 6799 - 0x06; 6800 6800 - 0x09; 6801 6801 - 0x2a; 6802 6802 - 0x86; 6803 6803 - 0x48; 6804 6804 - 0x86; 6805 6805 - 0xf7; 6806 6806 - 0x0d; 6807 6807 - 0x01; 6808 6808 - 0x01; 6809 6809 - 0x0b; 6810 6810 - 0x05; 6811 6811 - 0x00; 6812 6812 - 0x03; 6813 6813 - 0x82; 6814 6814 - 0x01; 6815 6815 - 0x01; 6816 6816 - 0x00; 6817 6817 - 0x9d; 6818 6818 - 0xb6; 6819 6819 - 0xd0; 6820 6820 - 0x90; 6821 6821 - 0x86; 6822 6822 - 0xe1; 6823 6823 - 0x86; 6824 6824 - 0x02; 6825 6825 - 0xed; 6826 6826 - 0xc5; 6827 6827 - 0xa0; 6828 6828 - 0xf0; 6829 6829 - 0x34; 6830 6830 - 0x1c; 6831 6831 - 0x74; 6832 6832 - 0xc1; 6833 6833 - 0x8d; 6834 6834 - 0x76; 6835 6835 - 0xcc; 6836 6836 - 0x86; 6837 6837 - 0x0a; 6838 6838 - 0xa8; 6839 6839 - 0xf0; 6840 6840 - 0x4a; 6841 6841 - 0x8a; 6842 6842 - 0x42; 6843 6843 - 0xd6; 6844 6844 - 0x3f; 6845 6845 - 0xc8; 6846 6846 - 0xa9; 6847 6847 - 0x4d; 6848 6848 - 0xad; 6849 6849 - 0x7c; 6850 6850 - 0x08; 6851 6851 - 0xad; 6852 6852 - 0xe6; 6853 6853 - 0xb6; 6854 6854 - 0x50; 6855 6855 - 0xb8; 6856 6856 - 0xa2; 6857 6857 - 0x1a; 6858 6858 - 0x4d; 6859 6859 - 0x88; 6860 6860 - 0x07; 6861 6861 - 0xb1; 6862 6862 - 0x29; 6863 6863 - 0x21; 6864 6864 - 0xdc; 6865 6865 - 0xe7; 6866 6866 - 0xda; 6867 6867 - 0xc6; 6868 6868 - 0x3c; 6869 6869 - 0x21; 6870 6870 - 0xe0; 6871 6871 - 0xe3; 6872 6872 - 0x11; 6873 6873 - 0x49; 6874 6874 - 0x70; 6875 6875 - 0xac; 6876 6876 - 0x7a; 6877 6877 - 0x1d; 6878 6878 - 0x01; 6879 6879 - 0xa4; 6880 6880 - 0xca; 6881 6881 - 0x11; 6882 6882 - 0x3a; 6883 6883 - 0x57; 6884 6884 - 0xab; 6885 6885 - 0x7d; 6886 6886 - 0x57; 6887 6887 - 0x2a; 6888 6888 - 0x40; 6889 6889 - 0x74; 6890 6890 - 0xfd; 6891 6891 - 0xd3; 6892 6892 - 0x1d; 6893 6893 - 0x85; 6894 6894 - 0x18; 6895 6895 - 0x50; 6896 6896 - 0xdf; 6897 6897 - 0x57; 6898 6898 - 0x47; 6899 6899 - 0x75; 6900 6900 - 0xa1; 6901 6901 - 0x7d; 6902 6902 - 0x55; 6903 6903 - 0x20; 6904 6904 - 0x2e; 6905 6905 - 0x47; 6906 6906 - 0x37; 6907 6907 - 0x50; 6908 6908 - 0x72; 6909 6909 - 0x8c; 6910 6910 - 0x7f; 6911 6911 - 0x82; 6912 6912 - 0x1b; 6913 6913 - 0xd2; 6914 6914 - 0x62; 6915 6915 - 0x8f; 6916 6916 - 0x2d; 6917 6917 - 0x03; 6918 6918 - 0x5a; 6919 6919 - 0xda; 6920 6920 - 0xc3; 6921 6921 - 0xc8; 6922 6922 - 0xa1; 6923 6923 - 0xce; 6924 6924 - 0x2c; 6925 6925 - 0x52; 6926 6926 - 0xa2; 6927 6927 - 0x00; 6928 6928 - 0x63; 6929 6929 - 0xeb; 6930 6930 - 0x73; 6931 6931 - 0xba; 6932 6932 - 0x71; 6933 6933 - 0xc8; 6934 6934 - 0x49; 6935 6935 - 0x27; 6936 6936 - 0x23; 6937 6937 - 0x97; 6938 6938 - 0x64; 6939 6939 - 0x85; 6940 6940 - 0x9e; 6941 6941 - 0x38; 6942 6942 - 0x0e; 6943 6943 - 0xad; 6944 6944 - 0x63; 6945 6945 - 0x68; 6946 6946 - 0x3c; 6947 6947 - 0xba; 6948 6948 - 0x52; 6949 6949 - 0x81; 6950 6950 - 0x58; 6951 6951 - 0x79; 6952 6952 - 0xa3; 6953 6953 - 0x2c; 6954 6954 - 0x0c; 6955 6955 - 0xdf; 6956 6956 - 0xde; 6957 6957 - 0x6d; 6958 6958 - 0xeb; 6959 6959 - 0x31; 6960 6960 - 0xf2; 6961 6961 - 0xba; 6962 6962 - 0xa0; 6963 6963 - 0x7c; 6964 6964 - 0x6c; 6965 6965 - 0xf1; 6966 6966 - 0x2c; 6967 6967 - 0xd4; 6968 6968 - 0xe1; 6969 6969 - 0xbd; 6970 6970 - 0x77; 6971 6971 - 0x84; 6972 6972 - 0x37; 6973 6973 - 0x03; 6974 6974 - 0xce; 6975 6975 - 0x32; 6976 6976 - 0xb5; 6977 6977 - 0xc8; 6978 6978 - 0x9a; 6979 6979 - 0x81; 6980 6980 - 0x1a; 6981 6981 - 0x4a; 6982 6982 - 0x92; 6983 6983 - 0x4e; 6984 6984 - 0x3b; 6985 6985 - 0x46; 6986 6986 - 0x9a; 6987 6987 - 0x85; 6988 6988 - 0xfe; 6989 6989 - 0x83; 6990 6990 - 0xa2; 6991 6991 - 0xf9; 6992 6992 - 0x9e; 6993 6993 - 0x8c; 6994 6994 - 0xa3; 6995 6995 - 0xcc; 6996 6996 - 0x0d; 6997 6997 - 0x5e; 6998 6998 - 0xb3; 6999 6999 - 0x3d; 7000 7000 - 0xcf; 7001 7001 - 0x04; 7002 7002 - 0x78; 7003 7003 - 0x8f; 7004 7004 - 0x14; 7005 7005 - 0x14; 7006 7006 - 0x7b; 7007 7007 - 0x32; 7008 7008 - 0x9c; 7009 7009 - 0xc7; 7010 7010 - 0x00; 7011 7011 - 0xa6; 7012 7012 - 0x5c; 7013 7013 - 0xc4; 7014 7014 - 0xb5; 7015 7015 - 0xa1; 7016 7016 - 0x55; 7017 7017 - 0x8d; 7018 7018 - 0x5a; 7019 7019 - 0x56; 7020 7020 - 0x68; 7021 7021 - 0xa4; 7022 7022 - 0x22; 7023 7023 - 0x70; 7024 7024 - 0xaa; 7025 7025 - 0x3c; 7026 7026 - 0x81; 7027 7027 - 0x71; 7028 7028 - 0xd9; 7029 7029 - 0x9d; 7030 7030 - 0xa8; 7031 7031 - 0x45; 7032 7032 - 0x3b; 7033 7033 - 0xf4; 7034 7034 - 0xe5; 7035 7035 - 0xf6; 7036 7036 - 0xa2; 7037 7037 - 0x51; 7038 7038 - 0xdd; 7039 7039 - 0xc7; 7040 7040 - 0x7b; 7041 7041 - 0x62; 7042 7042 - 0xe8; 7043 7043 - 0x6f; 7044 7044 - 0x0c; 7045 7045 - 0x74; 7046 7046 - 0xeb; 7047 7047 - 0xb8; 7048 7048 - 0xda; 7049 7049 - 0xf8; 7050 7050 - 0xbf; 7051 7051 - 0x87; 7052 7052 - 0x0d; 7053 7053 - 0x79; 7054 7054 - 0x50; 7055 7055 - 0x91; 7056 7056 - 0x90; 7057 7057 - 0x9b; 7058 7058 - 0x18; 7059 7059 - 0x3b; 7060 7060 - 0x91; 7061 7061 - 0x59; 7062 7062 - 0x27; 7063 7063 - 0xf1; 7064 7064 - 0x35; 7065 7065 - 0x28; 7066 7066 - 0x13; 7067 7067 - 0xab; 7068 7068 - 0x26; 7069 7069 - 0x7e; 7070 7070 - 0xd5; 7071 7071 - 0xf7; 7072 7072 - 0x7a; 7073 7073 - ] 7074 7074 - in 7075 7075 - 7076 7076 - [ 7077 7077 - ([ 12; 0; 0; 12 ] @ data, Core.ServerKeyExchange data_cs); 7078 7078 - ([ 20; 0; 0; 12 ] @ data, Core.Finished data_cs); 7079 7079 - ([ 16; 0; 0; 12 ] @ data, Core.ClientKeyExchange data_cs); 7080 7080 - ( [ 11; 0; 0; 3; 0; 0; 0 ], 7081 7081 - Core.Certificate (Writer.assemble_certificates []) ); 7082 7082 - ( [ 11; 0; 0; 18; 0; 0; 15; 0; 0; 12 ] @ data, 7083 7083 - Core.Certificate (Writer.assemble_certificates [ data_cs ]) ); 7084 7084 - ( [ 11; 0; 0; 33; 0; 0; 30; 0; 0; 12 ] @ data @ [ 0; 0; 12 ] @ data, 7085 7085 - Core.Certificate (Writer.assemble_certificates [ data_cs; data_cs ]) ); 7086 7086 - ( [ 7087 7087 - 0x0b; 7088 7088 - 0x00; 7089 7089 - 0x0a; 7090 7090 - 0xa7; 7091 7091 - 0x00; 7092 7092 - 0x0a; 7093 7093 - 0xa4; 7094 7094 - 0x00; 7095 7095 - 0x05; 7096 7096 - 0xe4; 7097 7097 - 0x30; 7098 7098 - 0x82; 7099 7099 - 0x05; 7100 7100 - 0xe0; 7101 7101 - 0x30; 7102 7102 - 0x82; 7103 7103 - 0x04; 7104 7104 - 0xc8; 7105 7105 - 0xa0; 7106 7106 - 0x03; 7107 7107 - 0x02; 7108 7108 - 0x01; 7109 7109 - 0x02; 7110 7110 - 0x02; 7111 7111 - 0x10; 7112 7112 - 0x0c; 7113 7113 - 0x00; 7114 7114 - 0x93; 7115 7115 - 0x10; 7116 7116 - 0xd2; 7117 7117 - 0x06; 7118 7118 - 0xdb; 7119 7119 - 0xe3; 7120 7120 - 0x37; 7121 7121 - 0x55; 7122 7122 - 0x35; 7123 7123 - 0x80; 7124 7124 - 0x11; 7125 7125 - 0x8d; 7126 7126 - 0xdc; 7127 7127 - 0x87; 7128 7128 - 0x30; 7129 7129 - 0x0d; 7130 7130 - 0x06; 7131 7131 - 0x09; 7132 7132 - 0x2a; 7133 7133 - 0x86; 7134 7134 - 0x48; 7135 7135 - 0x86; 7136 7136 - 0xf7; 7137 7137 - 0x0d; 7138 7138 - 0x01; 7139 7139 - 0x01; 7140 7140 - 0x0b; 7141 7141 - 0x05; 7142 7142 - 0x00; 7143 7143 - 0x30; 7144 7144 - 0x75; 7145 7145 - 0x31; 7146 7146 - 0x0b; 7147 7147 - 0x30; 7148 7148 - 0x09; 7149 7149 - 0x06; 7150 7150 - 0x03; 7151 7151 - 0x55; 7152 7152 - 0x04; 7153 7153 - 0x06; 7154 7154 - 0x13; 7155 7155 - 0x02; 7156 7156 - 0x55; 7157 7157 - 0x53; 7158 7158 - 0x31; 7159 7159 - 0x15; 7160 7160 - 0x30; 7161 7161 - 0x13; 7162 7162 - 0x06; 7163 7163 - 0x03; 7164 7164 - 0x55; 7165 7165 - 0x04; 7166 7166 - 0x0a; 7167 7167 - 0x13; 7168 7168 - 0x0c; 7169 7169 - 0x44; 7170 7170 - 0x69; 7171 7171 - 0x67; 7172 7172 - 0x69; 7173 7173 - 0x43; 7174 7174 - 0x65; 7175 7175 - 0x72; 7176 7176 - 0x74; 7177 7177 - 0x20; 7178 7178 - 0x49; 7179 7179 - 0x6e; 7180 7180 - 0x63; 7181 7181 - 0x31; 7182 7182 - 0x19; 7183 7183 - 0x30; 7184 7184 - 0x17; 7185 7185 - 0x06; 7186 7186 - 0x03; 7187 7187 - 0x55; 7188 7188 - 0x04; 7189 7189 - 0x0b; 7190 7190 - 0x13; 7191 7191 - 0x10; 7192 7192 - 0x77; 7193 7193 - 0x77; 7194 7194 - 0x77; 7195 7195 - 0x2e; 7196 7196 - 0x64; 7197 7197 - 0x69; 7198 7198 - 0x67; 7199 7199 - 0x69; 7200 7200 - 0x63; 7201 7201 - 0x65; 7202 7202 - 0x72; 7203 7203 - 0x74; 7204 7204 - 0x2e; 7205 7205 - 0x63; 7206 7206 - 0x6f; 7207 7207 - 0x6d; 7208 7208 - 0x31; 7209 7209 - 0x34; 7210 7210 - 0x30; 7211 7211 - 0x32; 7212 7212 - 0x06; 7213 7213 - 0x03; 7214 7214 - 0x55; 7215 7215 - 0x04; 7216 7216 - 0x03; 7217 7217 - 0x13; 7218 7218 - 0x2b; 7219 7219 - 0x44; 7220 7220 - 0x69; 7221 7221 - 0x67; 7222 7222 - 0x69; 7223 7223 - 0x43; 7224 7224 - 0x65; 7225 7225 - 0x72; 7226 7226 - 0x74; 7227 7227 - 0x20; 7228 7228 - 0x53; 7229 7229 - 0x48; 7230 7230 - 0x41; 7231 7231 - 0x32; 7232 7232 - 0x20; 7233 7233 - 0x45; 7234 7234 - 0x78; 7235 7235 - 0x74; 7236 7236 - 0x65; 7237 7237 - 0x6e; 7238 7238 - 0x64; 7239 7239 - 0x65; 7240 7240 - 0x64; 7241 7241 - 0x20; 7242 7242 - 0x56; 7243 7243 - 0x61; 7244 7244 - 0x6c; 7245 7245 - 0x69; 7246 7246 - 0x64; 7247 7247 - 0x61; 7248 7248 - 0x74; 7249 7249 - 0x69; 7250 7250 - 0x6f; 7251 7251 - 0x6e; 7252 7252 - 0x20; 7253 7253 - 0x53; 7254 7254 - 0x65; 7255 7255 - 0x72; 7256 7256 - 0x76; 7257 7257 - 0x65; 7258 7258 - 0x72; 7259 7259 - 0x20; 7260 7260 - 0x43; 7261 7261 - 0x41; 7262 7262 - 0x30; 7263 7263 - 0x1e; 7264 7264 - 0x17; 7265 7265 - 0x0d; 7266 7266 - 0x31; 7267 7267 - 0x34; 7268 7268 - 0x30; 7269 7269 - 0x34; 7270 7270 - 0x30; 7271 7271 - 0x38; 7272 7272 - 0x30; 7273 7273 - 0x30; 7274 7274 - 0x30; 7275 7275 - 0x30; 7276 7276 - 0x30; 7277 7277 - 0x30; 7278 7278 - 0x5a; 7279 7279 - 0x17; 7280 7280 - 0x0d; 7281 7281 - 0x31; 7282 7282 - 0x36; 7283 7283 - 0x30; 7284 7284 - 0x34; 7285 7285 - 0x31; 7286 7286 - 0x32; 7287 7287 - 0x31; 7288 7288 - 0x32; 7289 7289 - 0x30; 7290 7290 - 0x30; 7291 7291 - 0x30; 7292 7292 - 0x30; 7293 7293 - 0x5a; 7294 7294 - 0x30; 7295 7295 - 0x81; 7296 7296 - 0xf0; 7297 7297 - 0x31; 7298 7298 - 0x1d; 7299 7299 - 0x30; 7300 7300 - 0x1b; 7301 7301 - 0x06; 7302 7302 - 0x03; 7303 7303 - 0x55; 7304 7304 - 0x04; 7305 7305 - 0x0f; 7306 7306 - 0x0c; 7307 7307 - 0x14; 7308 7308 - 0x50; 7309 7309 - 0x72; 7310 7310 - 0x69; 7311 7311 - 0x76; 7312 7312 - 0x61; 7313 7313 - 0x74; 7314 7314 - 0x65; 7315 7315 - 0x20; 7316 7316 - 0x4f; 7317 7317 - 0x72; 7318 7318 - 0x67; 7319 7319 - 0x61; 7320 7320 - 0x6e; 7321 7321 - 0x69; 7322 7322 - 0x7a; 7323 7323 - 0x61; 7324 7324 - 0x74; 7325 7325 - 0x69; 7326 7326 - 0x6f; 7327 7327 - 0x6e; 7328 7328 - 0x31; 7329 7329 - 0x13; 7330 7330 - 0x30; 7331 7331 - 0x11; 7332 7332 - 0x06; 7333 7333 - 0x0b; 7334 7334 - 0x2b; 7335 7335 - 0x06; 7336 7336 - 0x01; 7337 7337 - 0x04; 7338 7338 - 0x01; 7339 7339 - 0x82; 7340 7340 - 0x37; 7341 7341 - 0x3c; 7342 7342 - 0x02; 7343 7343 - 0x01; 7344 7344 - 0x03; 7345 7345 - 0x13; 7346 7346 - 0x02; 7347 7347 - 0x55; 7348 7348 - 0x53; 7349 7349 - 0x31; 7350 7350 - 0x19; 7351 7351 - 0x30; 7352 7352 - 0x17; 7353 7353 - 0x06; 7354 7354 - 0x0b; 7355 7355 - 0x2b; 7356 7356 - 0x06; 7357 7357 - 0x01; 7358 7358 - 0x04; 7359 7359 - 0x01; 7360 7360 - 0x82; 7361 7361 - 0x37; 7362 7362 - 0x3c; 7363 7363 - 0x02; 7364 7364 - 0x01; 7365 7365 - 0x02; 7366 7366 - 0x13; 7367 7367 - 0x08; 7368 7368 - 0x44; 7369 7369 - 0x65; 7370 7370 - 0x6c; 7371 7371 - 0x61; 7372 7372 - 0x77; 7373 7373 - 0x61; 7374 7374 - 0x72; 7375 7375 - 0x65; 7376 7376 - 0x31; 7377 7377 - 0x10; 7378 7378 - 0x30; 7379 7379 - 0x0e; 7380 7380 - 0x06; 7381 7381 - 0x03; 7382 7382 - 0x55; 7383 7383 - 0x04; 7384 7384 - 0x05; 7385 7385 - 0x13; 7386 7386 - 0x07; 7387 7387 - 0x35; 7388 7388 - 0x31; 7389 7389 - 0x35; 7390 7390 - 0x37; 7391 7391 - 0x35; 7392 7392 - 0x35; 7393 7393 - 0x30; 7394 7394 - 0x31; 7395 7395 - 0x17; 7396 7396 - 0x30; 7397 7397 - 0x15; 7398 7398 - 0x06; 7399 7399 - 0x03; 7400 7400 - 0x55; 7401 7401 - 0x04; 7402 7402 - 0x09; 7403 7403 - 0x13; 7404 7404 - 0x0e; 7405 7405 - 0x35; 7406 7406 - 0x34; 7407 7407 - 0x38; 7408 7408 - 0x20; 7409 7409 - 0x34; 7410 7410 - 0x74; 7411 7411 - 0x68; 7412 7412 - 0x20; 7413 7413 - 0x53; 7414 7414 - 0x74; 7415 7415 - 0x72; 7416 7416 - 0x65; 7417 7417 - 0x65; 7418 7418 - 0x74; 7419 7419 - 0x31; 7420 7420 - 0x0e; 7421 7421 - 0x30; 7422 7422 - 0x0c; 7423 7423 - 0x06; 7424 7424 - 0x03; 7425 7425 - 0x55; 7426 7426 - 0x04; 7427 7427 - 0x11; 7428 7428 - 0x13; 7429 7429 - 0x05; 7430 7430 - 0x39; 7431 7431 - 0x34; 7432 7432 - 0x31; 7433 7433 - 0x30; 7434 7434 - 0x37; 7435 7435 - 0x31; 7436 7436 - 0x0b; 7437 7437 - 0x30; 7438 7438 - 0x09; 7439 7439 - 0x06; 7440 7440 - 0x03; 7441 7441 - 0x55; 7442 7442 - 0x04; 7443 7443 - 0x06; 7444 7444 - 0x13; 7445 7445 - 0x02; 7446 7446 - 0x55; 7447 7447 - 0x53; 7448 7448 - 0x31; 7449 7449 - 0x13; 7450 7450 - 0x30; 7451 7451 - 0x11; 7452 7452 - 0x06; 7453 7453 - 0x03; 7454 7454 - 0x55; 7455 7455 - 0x04; 7456 7456 - 0x08; 7457 7457 - 0x13; 7458 7458 - 0x0a; 7459 7459 - 0x43; 7460 7460 - 0x61; 7461 7461 - 0x6c; 7462 7462 - 0x69; 7463 7463 - 0x66; 7464 7464 - 0x6f; 7465 7465 - 0x72; 7466 7466 - 0x6e; 7467 7467 - 0x69; 7468 7468 - 0x61; 7469 7469 - 0x31; 7470 7470 - 0x16; 7471 7471 - 0x30; 7472 7472 - 0x14; 7473 7473 - 0x06; 7474 7474 - 0x03; 7475 7475 - 0x55; 7476 7476 - 0x04; 7477 7477 - 0x07; 7478 7478 - 0x13; 7479 7479 - 0x0d; 7480 7480 - 0x53; 7481 7481 - 0x61; 7482 7482 - 0x6e; 7483 7483 - 0x20; 7484 7484 - 0x46; 7485 7485 - 0x72; 7486 7486 - 0x61; 7487 7487 - 0x6e; 7488 7488 - 0x63; 7489 7489 - 0x69; 7490 7490 - 0x73; 7491 7491 - 0x63; 7492 7492 - 0x6f; 7493 7493 - 0x31; 7494 7494 - 0x15; 7495 7495 - 0x30; 7496 7496 - 0x13; 7497 7497 - 0x06; 7498 7498 - 0x03; 7499 7499 - 0x55; 7500 7500 - 0x04; 7501 7501 - 0x0a; 7502 7502 - 0x13; 7503 7503 - 0x0c; 7504 7504 - 0x47; 7505 7505 - 0x69; 7506 7506 - 0x74; 7507 7507 - 0x48; 7508 7508 - 0x75; 7509 7509 - 0x62; 7510 7510 - 0x2c; 7511 7511 - 0x20; 7512 7512 - 0x49; 7513 7513 - 0x6e; 7514 7514 - 0x63; 7515 7515 - 0x2e; 7516 7516 - 0x31; 7517 7517 - 0x13; 7518 7518 - 0x30; 7519 7519 - 0x11; 7520 7520 - 0x06; 7521 7521 - 0x03; 7522 7522 - 0x55; 7523 7523 - 0x04; 7524 7524 - 0x03; 7525 7525 - 0x13; 7526 7526 - 0x0a; 7527 7527 - 0x67; 7528 7528 - 0x69; 7529 7529 - 0x74; 7530 7530 - 0x68; 7531 7531 - 0x75; 7532 7532 - 0x62; 7533 7533 - 0x2e; 7534 7534 - 0x63; 7535 7535 - 0x6f; 7536 7536 - 0x6d; 7537 7537 - 0x30; 7538 7538 - 0x82; 7539 7539 - 0x01; 7540 7540 - 0x22; 7541 7541 - 0x30; 7542 7542 - 0x0d; 7543 7543 - 0x06; 7544 7544 - 0x09; 7545 7545 - 0x2a; 7546 7546 - 0x86; 7547 7547 - 0x48; 7548 7548 - 0x86; 7549 7549 - 0xf7; 7550 7550 - 0x0d; 7551 7551 - 0x01; 7552 7552 - 0x01; 7553 7553 - 0x01; 7554 7554 - 0x05; 7555 7555 - 0x00; 7556 7556 - 0x03; 7557 7557 - 0x82; 7558 7558 - 0x01; 7559 7559 - 0x0f; 7560 7560 - 0x00; 7561 7561 - 0x30; 7562 7562 - 0x82; 7563 7563 - 0x01; 7564 7564 - 0x0a; 7565 7565 - 0x02; 7566 7566 - 0x82; 7567 7567 - 0x01; 7568 7568 - 0x01; 7569 7569 - 0x00; 7570 7570 - 0xb1; 7571 7571 - 0xd4; 7572 7572 - 0xdc; 7573 7573 - 0x3c; 7574 7574 - 0xaf; 7575 7575 - 0xfd; 7576 7576 - 0xf3; 7577 7577 - 0x4e; 7578 7578 - 0xed; 7579 7579 - 0xc1; 7580 7580 - 0x67; 7581 7581 - 0xad; 7582 7582 - 0xe6; 7583 7583 - 0xcb; 7584 7584 - 0x22; 7585 7585 - 0xe8; 7586 7586 - 0xb7; 7587 7587 - 0xe2; 7588 7588 - 0xab; 7589 7589 - 0x28; 7590 7590 - 0xf2; 7591 7591 - 0xf7; 7592 7592 - 0xdc; 7593 7593 - 0x62; 7594 7594 - 0x70; 7595 7595 - 0x08; 7596 7596 - 0xd1; 7597 7597 - 0x0c; 7598 7598 - 0xaf; 7599 7599 - 0xd6; 7600 7600 - 0x16; 7601 7601 - 0x6a; 7602 7602 - 0x21; 7603 7603 - 0xb0; 7604 7604 - 0x36; 7605 7605 - 0x4b; 7606 7606 - 0x17; 7607 7607 - 0x0d; 7608 7608 - 0x36; 7609 7609 - 0x63; 7610 7610 - 0x04; 7611 7611 - 0xae; 7612 7612 - 0xbf; 7613 7613 - 0xea; 7614 7614 - 0x20; 7615 7615 - 0x51; 7616 7616 - 0x95; 7617 7617 - 0x65; 7618 7618 - 0x66; 7619 7619 - 0xf2; 7620 7620 - 0xbf; 7621 7621 - 0xb9; 7622 7622 - 0x4d; 7623 7623 - 0xa4; 7624 7624 - 0x0c; 7625 7625 - 0x29; 7626 7626 - 0xeb; 7627 7627 - 0xf5; 7628 7628 - 0x15; 7629 7629 - 0xb1; 7630 7630 - 0xe8; 7631 7631 - 0x35; 7632 7632 - 0xb3; 7633 7633 - 0x70; 7634 7634 - 0x10; 7635 7635 - 0x94; 7636 7636 - 0xd5; 7637 7637 - 0x1b; 7638 7638 - 0x59; 7639 7639 - 0xb4; 7640 7640 - 0x26; 7641 7641 - 0x0f; 7642 7642 - 0xd6; 7643 7643 - 0x83; 7644 7644 - 0x57; 7645 7645 - 0x59; 7646 7646 - 0x9d; 7647 7647 - 0xe1; 7648 7648 - 0x7c; 7649 7649 - 0x09; 7650 7650 - 0xdd; 7651 7651 - 0xe0; 7652 7652 - 0x13; 7653 7653 - 0xca; 7654 7654 - 0x4d; 7655 7655 - 0x6f; 7656 7656 - 0x43; 7657 7657 - 0x9b; 7658 7658 - 0xcd; 7659 7659 - 0xcf; 7660 7660 - 0x87; 7661 7661 - 0x3a; 7662 7662 - 0x15; 7663 7663 - 0xa7; 7664 7664 - 0x85; 7665 7665 - 0xdd; 7666 7666 - 0x66; 7667 7667 - 0x83; 7668 7668 - 0xed; 7669 7669 - 0x93; 7670 7670 - 0x0c; 7671 7671 - 0xfe; 7672 7672 - 0x2b; 7673 7673 - 0x6d; 7674 7674 - 0x38; 7675 7675 - 0x1c; 7676 7676 - 0x79; 7677 7677 - 0x88; 7678 7678 - 0x90; 7679 7679 - 0xcf; 7680 7680 - 0xad; 7681 7681 - 0x58; 7682 7682 - 0x18; 7683 7683 - 0x2d; 7684 7684 - 0x51; 7685 7685 - 0xd1; 7686 7686 - 0xc2; 7687 7687 - 0xa3; 7688 7688 - 0xf2; 7689 7689 - 0x47; 7690 7690 - 0x8c; 7691 7691 - 0x6f; 7692 7692 - 0x38; 7693 7693 - 0x09; 7694 7694 - 0xb9; 7695 7695 - 0xb8; 7696 7696 - 0xef; 7697 7697 - 0x4c; 7698 7698 - 0x93; 7699 7699 - 0x0b; 7700 7700 - 0xcb; 7701 7701 - 0x83; 7702 7702 - 0x94; 7703 7703 - 0x87; 7704 7704 - 0xea; 7705 7705 - 0xe0; 7706 7706 - 0xa3; 7707 7707 - 0xb5; 7708 7708 - 0xd9; 7709 7709 - 0x7b; 7710 7710 - 0x9b; 7711 7711 - 0x6b; 7712 7712 - 0x0f; 7713 7713 - 0x43; 7714 7714 - 0xf9; 7715 7715 - 0xca; 7716 7716 - 0xee; 7717 7717 - 0x80; 7718 7718 - 0x0d; 7719 7719 - 0x28; 7720 7720 - 0xa7; 7721 7721 - 0x76; 7722 7722 - 0xf1; 7723 7723 - 0x25; 7724 7724 - 0xf4; 7725 7725 - 0xc1; 7726 7726 - 0x35; 7727 7727 - 0x3c; 7728 7728 - 0xf6; 7729 7729 - 0x74; 7730 7730 - 0xad; 7731 7731 - 0xde; 7732 7732 - 0x6a; 7733 7733 - 0x33; 7734 7734 - 0x82; 7735 7735 - 0x7b; 7736 7736 - 0xdc; 7737 7737 - 0xfd; 7738 7738 - 0x4b; 7739 7739 - 0x76; 7740 7740 - 0xa7; 7741 7741 - 0xc2; 7742 7742 - 0xee; 7743 7743 - 0xf2; 7744 7744 - 0x6a; 7745 7745 - 0xbf; 7746 7746 - 0xa9; 7747 7747 - 0x24; 7748 7748 - 0xa6; 7749 7749 - 0x5f; 7750 7750 - 0xe7; 7751 7751 - 0x2e; 7752 7752 - 0x7c; 7753 7753 - 0x0e; 7754 7754 - 0xdb; 7755 7755 - 0xc3; 7756 7756 - 0x74; 7757 7757 - 0x73; 7758 7758 - 0xfa; 7759 7759 - 0x7e; 7760 7760 - 0xc6; 7761 7761 - 0xd8; 7762 7762 - 0xcf; 7763 7763 - 0x60; 7764 7764 - 0xeb; 7765 7765 - 0x36; 7766 7766 - 0x56; 7767 7767 - 0x21; 7768 7768 - 0xb6; 7769 7769 - 0xc1; 7770 7770 - 0x8a; 7771 7771 - 0xb8; 7772 7772 - 0x24; 7773 7773 - 0x82; 7774 7774 - 0x4d; 7775 7775 - 0x78; 7776 7776 - 0x24; 7777 7777 - 0xba; 7778 7778 - 0xe9; 7779 7779 - 0x1d; 7780 7780 - 0xa1; 7781 7781 - 0x8a; 7782 7782 - 0xa7; 7783 7783 - 0x87; 7784 7784 - 0xbe; 7785 7785 - 0x66; 7786 7786 - 0x25; 7787 7787 - 0x69; 7788 7788 - 0xbf; 7789 7789 - 0xbe; 7790 7790 - 0x3b; 7791 7791 - 0x72; 7792 7792 - 0x6e; 7793 7793 - 0x4f; 7794 7794 - 0xe0; 7795 7795 - 0xe4; 7796 7796 - 0x85; 7797 7797 - 0x25; 7798 7798 - 0x08; 7799 7799 - 0xb1; 7800 7800 - 0x91; 7801 7801 - 0x89; 7802 7802 - 0xb8; 7803 7803 - 0xd6; 7804 7804 - 0x74; 7805 7805 - 0x65; 7806 7806 - 0x76; 7807 7807 - 0x9b; 7808 7808 - 0x2c; 7809 7809 - 0x4f; 7810 7810 - 0x62; 7811 7811 - 0x1f; 7812 7812 - 0xa1; 7813 7813 - 0xfa; 7814 7814 - 0x3a; 7815 7815 - 0xbe; 7816 7816 - 0x9c; 7817 7817 - 0x24; 7818 7818 - 0xbf; 7819 7819 - 0x9f; 7820 7820 - 0xca; 7821 7821 - 0xb0; 7822 7822 - 0xc5; 7823 7823 - 0xc0; 7824 7824 - 0x67; 7825 7825 - 0x8d; 7826 7826 - 0x02; 7827 7827 - 0x03; 7828 7828 - 0x01; 7829 7829 - 0x00; 7830 7830 - 0x01; 7831 7831 - 0xa3; 7832 7832 - 0x82; 7833 7833 - 0x01; 7834 7834 - 0xee; 7835 7835 - 0x30; 7836 7836 - 0x82; 7837 7837 - 0x01; 7838 7838 - 0xea; 7839 7839 - 0x30; 7840 7840 - 0x1f; 7841 7841 - 0x06; 7842 7842 - 0x03; 7843 7843 - 0x55; 7844 7844 - 0x1d; 7845 7845 - 0x23; 7846 7846 - 0x04; 7847 7847 - 0x18; 7848 7848 - 0x30; 7849 7849 - 0x16; 7850 7850 - 0x80; 7851 7851 - 0x14; 7852 7852 - 0x3d; 7853 7853 - 0xd3; 7854 7854 - 0x50; 7855 7855 - 0xa5; 7856 7856 - 0xd6; 7857 7857 - 0xa0; 7858 7858 - 0xad; 7859 7859 - 0xee; 7860 7860 - 0xf3; 7861 7861 - 0x4a; 7862 7862 - 0x60; 7863 7863 - 0x0a; 7864 7864 - 0x65; 7865 7865 - 0xd3; 7866 7866 - 0x21; 7867 7867 - 0xd4; 7868 7868 - 0xf8; 7869 7869 - 0xf8; 7870 7870 - 0xd6; 7871 7871 - 0x0f; 7872 7872 - 0x30; 7873 7873 - 0x1d; 7874 7874 - 0x06; 7875 7875 - 0x03; 7876 7876 - 0x55; 7877 7877 - 0x1d; 7878 7878 - 0x0e; 7879 7879 - 0x04; 7880 7880 - 0x16; 7881 7881 - 0x04; 7882 7882 - 0x14; 7883 7883 - 0x6a; 7884 7884 - 0x43; 7885 7885 - 0x90; 7886 7886 - 0x7d; 7887 7887 - 0x3b; 7888 7888 - 0x98; 7889 7889 - 0x14; 7890 7890 - 0x72; 7891 7891 - 0x52; 7892 7892 - 0x95; 7893 7893 - 0x3a; 7894 7894 - 0xaa; 7895 7895 - 0x28; 7896 7896 - 0x0a; 7897 7897 - 0x43; 7898 7898 - 0xf8; 7899 7899 - 0x51; 7900 7900 - 0x7e; 7901 7901 - 0xd3; 7902 7902 - 0xa6; 7903 7903 - 0x30; 7904 7904 - 0x25; 7905 7905 - 0x06; 7906 7906 - 0x03; 7907 7907 - 0x55; 7908 7908 - 0x1d; 7909 7909 - 0x11; 7910 7910 - 0x04; 7911 7911 - 0x1e; 7912 7912 - 0x30; 7913 7913 - 0x1c; 7914 7914 - 0x82; 7915 7915 - 0x0a; 7916 7916 - 0x67; 7917 7917 - 0x69; 7918 7918 - 0x74; 7919 7919 - 0x68; 7920 7920 - 0x75; 7921 7921 - 0x62; 7922 7922 - 0x2e; 7923 7923 - 0x63; 7924 7924 - 0x6f; 7925 7925 - 0x6d; 7926 7926 - 0x82; 7927 7927 - 0x0e; 7928 7928 - 0x77; 7929 7929 - 0x77; 7930 7930 - 0x77; 7931 7931 - 0x2e; 7932 7932 - 0x67; 7933 7933 - 0x69; 7934 7934 - 0x74; 7935 7935 - 0x68; 7936 7936 - 0x75; 7937 7937 - 0x62; 7938 7938 - 0x2e; 7939 7939 - 0x63; 7940 7940 - 0x6f; 7941 7941 - 0x6d; 7942 7942 - 0x30; 7943 7943 - 0x0e; 7944 7944 - 0x06; 7945 7945 - 0x03; 7946 7946 - 0x55; 7947 7947 - 0x1d; 7948 7948 - 0x0f; 7949 7949 - 0x01; 7950 7950 - 0x01; 7951 7951 - 0xff; 7952 7952 - 0x04; 7953 7953 - 0x04; 7954 7954 - 0x03; 7955 7955 - 0x02; 7956 7956 - 0x05; 7957 7957 - 0xa0; 7958 7958 - 0x30; 7959 7959 - 0x1d; 7960 7960 - 0x06; 7961 7961 - 0x03; 7962 7962 - 0x55; 7963 7963 - 0x1d; 7964 7964 - 0x25; 7965 7965 - 0x04; 7966 7966 - 0x16; 7967 7967 - 0x30; 7968 7968 - 0x14; 7969 7969 - 0x06; 7970 7970 - 0x08; 7971 7971 - 0x2b; 7972 7972 - 0x06; 7973 7973 - 0x01; 7974 7974 - 0x05; 7975 7975 - 0x05; 7976 7976 - 0x07; 7977 7977 - 0x03; 7978 7978 - 0x01; 7979 7979 - 0x06; 7980 7980 - 0x08; 7981 7981 - 0x2b; 7982 7982 - 0x06; 7983 7983 - 0x01; 7984 7984 - 0x05; 7985 7985 - 0x05; 7986 7986 - 0x07; 7987 7987 - 0x03; 7988 7988 - 0x02; 7989 7989 - 0x30; 7990 7990 - 0x75; 7991 7991 - 0x06; 7992 7992 - 0x03; 7993 7993 - 0x55; 7994 7994 - 0x1d; 7995 7995 - 0x1f; 7996 7996 - 0x04; 7997 7997 - 0x6e; 7998 7998 - 0x30; 7999 7999 - 0x6c; 8000 8000 - 0x30; 8001 8001 - 0x34; 8002 8002 - 0xa0; 8003 8003 - 0x32; 8004 8004 - 0xa0; 8005 8005 - 0x30; 8006 8006 - 0x86; 8007 8007 - 0x2e; 8008 8008 - 0x68; 8009 8009 - 0x74; 8010 8010 - 0x74; 8011 8011 - 0x70; 8012 8012 - 0x3a; 8013 8013 - 0x2f; 8014 8014 - 0x2f; 8015 8015 - 0x63; 8016 8016 - 0x72; 8017 8017 - 0x6c; 8018 8018 - 0x33; 8019 8019 - 0x2e; 8020 8020 - 0x64; 8021 8021 - 0x69; 8022 8022 - 0x67; 8023 8023 - 0x69; 8024 8024 - 0x63; 8025 8025 - 0x65; 8026 8026 - 0x72; 8027 8027 - 0x74; 8028 8028 - 0x2e; 8029 8029 - 0x63; 8030 8030 - 0x6f; 8031 8031 - 0x6d; 8032 8032 - 0x2f; 8033 8033 - 0x73; 8034 8034 - 0x68; 8035 8035 - 0x61; 8036 8036 - 0x32; 8037 8037 - 0x2d; 8038 8038 - 0x65; 8039 8039 - 0x76; 8040 8040 - 0x2d; 8041 8041 - 0x73; 8042 8042 - 0x65; 8043 8043 - 0x72; 8044 8044 - 0x76; 8045 8045 - 0x65; 8046 8046 - 0x72; 8047 8047 - 0x2d; 8048 8048 - 0x67; 8049 8049 - 0x31; 8050 8050 - 0x2e; 8051 8051 - 0x63; 8052 8052 - 0x72; 8053 8053 - 0x6c; 8054 8054 - 0x30; 8055 8055 - 0x34; 8056 8056 - 0xa0; 8057 8057 - 0x32; 8058 8058 - 0xa0; 8059 8059 - 0x30; 8060 8060 - 0x86; 8061 8061 - 0x2e; 8062 8062 - 0x68; 8063 8063 - 0x74; 8064 8064 - 0x74; 8065 8065 - 0x70; 8066 8066 - 0x3a; 8067 8067 - 0x2f; 8068 8068 - 0x2f; 8069 8069 - 0x63; 8070 8070 - 0x72; 8071 8071 - 0x6c; 8072 8072 - 0x34; 8073 8073 - 0x2e; 8074 8074 - 0x64; 8075 8075 - 0x69; 8076 8076 - 0x67; 8077 8077 - 0x69; 8078 8078 - 0x63; 8079 8079 - 0x65; 8080 8080 - 0x72; 8081 8081 - 0x74; 8082 8082 - 0x2e; 8083 8083 - 0x63; 8084 8084 - 0x6f; 8085 8085 - 0x6d; 8086 8086 - 0x2f; 8087 8087 - 0x73; 8088 8088 - 0x68; 8089 8089 - 0x61; 8090 8090 - 0x32; 8091 8091 - 0x2d; 8092 8092 - 0x65; 8093 8093 - 0x76; 8094 8094 - 0x2d; 8095 8095 - 0x73; 8096 8096 - 0x65; 8097 8097 - 0x72; 8098 8098 - 0x76; 8099 8099 - 0x65; 8100 8100 - 0x72; 8101 8101 - 0x2d; 8102 8102 - 0x67; 8103 8103 - 0x31; 8104 8104 - 0x2e; 8105 8105 - 0x63; 8106 8106 - 0x72; 8107 8107 - 0x6c; 8108 8108 - 0x30; 8109 8109 - 0x42; 8110 8110 - 0x06; 8111 8111 - 0x03; 8112 8112 - 0x55; 8113 8113 - 0x1d; 8114 8114 - 0x20; 8115 8115 - 0x04; 8116 8116 - 0x3b; 8117 8117 - 0x30; 8118 8118 - 0x39; 8119 8119 - 0x30; 8120 8120 - 0x37; 8121 8121 - 0x06; 8122 8122 - 0x09; 8123 8123 - 0x60; 8124 8124 - 0x86; 8125 8125 - 0x48; 8126 8126 - 0x01; 8127 8127 - 0x86; 8128 8128 - 0xfd; 8129 8129 - 0x6c; 8130 8130 - 0x02; 8131 8131 - 0x01; 8132 8132 - 0x30; 8133 8133 - 0x2a; 8134 8134 - 0x30; 8135 8135 - 0x28; 8136 8136 - 0x06; 8137 8137 - 0x08; 8138 8138 - 0x2b; 8139 8139 - 0x06; 8140 8140 - 0x01; 8141 8141 - 0x05; 8142 8142 - 0x05; 8143 8143 - 0x07; 8144 8144 - 0x02; 8145 8145 - 0x01; 8146 8146 - 0x16; 8147 8147 - 0x1c; 8148 8148 - 0x68; 8149 8149 - 0x74; 8150 8150 - 0x74; 8151 8151 - 0x70; 8152 8152 - 0x73; 8153 8153 - 0x3a; 8154 8154 - 0x2f; 8155 8155 - 0x2f; 8156 8156 - 0x77; 8157 8157 - 0x77; 8158 8158 - 0x77; 8159 8159 - 0x2e; 8160 8160 - 0x64; 8161 8161 - 0x69; 8162 8162 - 0x67; 8163 8163 - 0x69; 8164 8164 - 0x63; 8165 8165 - 0x65; 8166 8166 - 0x72; 8167 8167 - 0x74; 8168 8168 - 0x2e; 8169 8169 - 0x63; 8170 8170 - 0x6f; 8171 8171 - 0x6d; 8172 8172 - 0x2f; 8173 8173 - 0x43; 8174 8174 - 0x50; 8175 8175 - 0x53; 8176 8176 - 0x30; 8177 8177 - 0x81; 8178 8178 - 0x88; 8179 8179 - 0x06; 8180 8180 - 0x08; 8181 8181 - 0x2b; 8182 8182 - 0x06; 8183 8183 - 0x01; 8184 8184 - 0x05; 8185 8185 - 0x05; 8186 8186 - 0x07; 8187 8187 - 0x01; 8188 8188 - 0x01; 8189 8189 - 0x04; 8190 8190 - 0x7c; 8191 8191 - 0x30; 8192 8192 - 0x7a; 8193 8193 - 0x30; 8194 8194 - 0x24; 8195 8195 - 0x06; 8196 8196 - 0x08; 8197 8197 - 0x2b; 8198 8198 - 0x06; 8199 8199 - 0x01; 8200 8200 - 0x05; 8201 8201 - 0x05; 8202 8202 - 0x07; 8203 8203 - 0x30; 8204 8204 - 0x01; 8205 8205 - 0x86; 8206 8206 - 0x18; 8207 8207 - 0x68; 8208 8208 - 0x74; 8209 8209 - 0x74; 8210 8210 - 0x70; 8211 8211 - 0x3a; 8212 8212 - 0x2f; 8213 8213 - 0x2f; 8214 8214 - 0x6f; 8215 8215 - 0x63; 8216 8216 - 0x73; 8217 8217 - 0x70; 8218 8218 - 0x2e; 8219 8219 - 0x64; 8220 8220 - 0x69; 8221 8221 - 0x67; 8222 8222 - 0x69; 8223 8223 - 0x63; 8224 8224 - 0x65; 8225 8225 - 0x72; 8226 8226 - 0x74; 8227 8227 - 0x2e; 8228 8228 - 0x63; 8229 8229 - 0x6f; 8230 8230 - 0x6d; 8231 8231 - 0x30; 8232 8232 - 0x52; 8233 8233 - 0x06; 8234 8234 - 0x08; 8235 8235 - 0x2b; 8236 8236 - 0x06; 8237 8237 - 0x01; 8238 8238 - 0x05; 8239 8239 - 0x05; 8240 8240 - 0x07; 8241 8241 - 0x30; 8242 8242 - 0x02; 8243 8243 - 0x86; 8244 8244 - 0x46; 8245 8245 - 0x68; 8246 8246 - 0x74; 8247 8247 - 0x74; 8248 8248 - 0x70; 8249 8249 - 0x3a; 8250 8250 - 0x2f; 8251 8251 - 0x2f; 8252 8252 - 0x63; 8253 8253 - 0x61; 8254 8254 - 0x63; 8255 8255 - 0x65; 8256 8256 - 0x72; 8257 8257 - 0x74; 8258 8258 - 0x73; 8259 8259 - 0x2e; 8260 8260 - 0x64; 8261 8261 - 0x69; 8262 8262 - 0x67; 8263 8263 - 0x69; 8264 8264 - 0x63; 8265 8265 - 0x65; 8266 8266 - 0x72; 8267 8267 - 0x74; 8268 8268 - 0x2e; 8269 8269 - 0x63; 8270 8270 - 0x6f; 8271 8271 - 0x6d; 8272 8272 - 0x2f; 8273 8273 - 0x44; 8274 8274 - 0x69; 8275 8275 - 0x67; 8276 8276 - 0x69; 8277 8277 - 0x43; 8278 8278 - 0x65; 8279 8279 - 0x72; 8280 8280 - 0x74; 8281 8281 - 0x53; 8282 8282 - 0x48; 8283 8283 - 0x41; 8284 8284 - 0x32; 8285 8285 - 0x45; 8286 8286 - 0x78; 8287 8287 - 0x74; 8288 8288 - 0x65; 8289 8289 - 0x6e; 8290 8290 - 0x64; 8291 8291 - 0x65; 8292 8292 - 0x64; 8293 8293 - 0x56; 8294 8294 - 0x61; 8295 8295 - 0x6c; 8296 8296 - 0x69; 8297 8297 - 0x64; 8298 8298 - 0x61; 8299 8299 - 0x74; 8300 8300 - 0x69; 8301 8301 - 0x6f; 8302 8302 - 0x6e; 8303 8303 - 0x53; 8304 8304 - 0x65; 8305 8305 - 0x72; 8306 8306 - 0x76; 8307 8307 - 0x65; 8308 8308 - 0x72; 8309 8309 - 0x43; 8310 8310 - 0x41; 8311 8311 - 0x2e; 8312 8312 - 0x63; 8313 8313 - 0x72; 8314 8314 - 0x74; 8315 8315 - 0x30; 8316 8316 - 0x0c; 8317 8317 - 0x06; 8318 8318 - 0x03; 8319 8319 - 0x55; 8320 8320 - 0x1d; 8321 8321 - 0x13; 8322 8322 - 0x01; 8323 8323 - 0x01; 8324 8324 - 0xff; 8325 8325 - 0x04; 8326 8326 - 0x02; 8327 8327 - 0x30; 8328 8328 - 0x00; 8329 8329 - 0x30; 8330 8330 - 0x0d; 8331 8331 - 0x06; 8332 8332 - 0x09; 8333 8333 - 0x2a; 8334 8334 - 0x86; 8335 8335 - 0x48; 8336 8336 - 0x86; 8337 8337 - 0xf7; 8338 8338 - 0x0d; 8339 8339 - 0x01; 8340 8340 - 0x01; 8341 8341 - 0x0b; 8342 8342 - 0x05; 8343 8343 - 0x00; 8344 8344 - 0x03; 8345 8345 - 0x82; 8346 8346 - 0x01; 8347 8347 - 0x01; 8348 8348 - 0x00; 8349 8349 - 0x6f; 8350 8350 - 0xe7; 8351 8351 - 0x6d; 8352 8352 - 0xcb; 8353 8353 - 0x82; 8354 8354 - 0xf3; 8355 8355 - 0xef; 8356 8356 - 0x90; 8357 8357 - 0x87; 8358 8358 - 0x09; 8359 8359 - 0xd7; 8360 8360 - 0x0f; 8361 8361 - 0x15; 8362 8362 - 0x22; 8363 8363 - 0x2c; 8364 8364 - 0x8c; 8365 8365 - 0xfe; 8366 8366 - 0xd3; 8367 8367 - 0xab; 8368 8368 - 0x1c; 8369 8369 - 0x8a; 8370 8370 - 0x96; 8371 8371 - 0xdb; 8372 8372 - 0x5d; 8373 8373 - 0x12; 8374 8374 - 0x5d; 8375 8375 - 0xd1; 8376 8376 - 0x78; 8377 8377 - 0xc0; 8378 8378 - 0x31; 8379 8379 - 0xb0; 8380 8380 - 0xff; 8381 8381 - 0x45; 8382 8382 - 0xc8; 8383 8383 - 0x89; 8384 8384 - 0xf7; 8385 8385 - 0x08; 8386 8386 - 0x98; 8387 8387 - 0x52; 8388 8388 - 0x17; 8389 8389 - 0x1f; 8390 8390 - 0x4c; 8391 8391 - 0x4b; 8392 8392 - 0x20; 8393 8393 - 0x64; 8394 8394 - 0x6a; 8395 8395 - 0x6d; 8396 8396 - 0xdb; 8397 8397 - 0x50; 8398 8398 - 0xd7; 8399 8399 - 0x10; 8400 8400 - 0xbe; 8401 8401 - 0x7e; 8402 8402 - 0xab; 8403 8403 - 0xfe; 8404 8404 - 0x2f; 8405 8405 - 0x80; 8406 8406 - 0xd8; 8407 8407 - 0xa9; 8408 8408 - 0x4a; 8409 8409 - 0x58; 8410 8410 - 0x41; 8411 8411 - 0x69; 8412 8412 - 0x81; 8413 8413 - 0x72; 8414 8414 - 0x19; 8415 8415 - 0x08; 8416 8416 - 0x83; 8417 8417 - 0x9b; 8418 8418 - 0x92; 8419 8419 - 0x10; 8420 8420 - 0x4e; 8421 8421 - 0x62; 8422 8422 - 0x2d; 8423 8423 - 0x7b; 8424 8424 - 0x46; 8425 8425 - 0x70; 8426 8426 - 0x43; 8427 8427 - 0x6e; 8428 8428 - 0xa3; 8429 8429 - 0x53; 8430 8430 - 0x13; 8431 8431 - 0x1f; 8432 8432 - 0xe2; 8433 8433 - 0x93; 8434 8434 - 0xa6; 8435 8435 - 0x23; 8436 8436 - 0x5b; 8437 8437 - 0xf7; 8438 8438 - 0x92; 8439 8439 - 0x3e; 8440 8440 - 0x37; 8441 8441 - 0x14; 8442 8442 - 0x75; 8443 8443 - 0x3b; 8444 8444 - 0xb9; 8445 8445 - 0x4b; 8446 8446 - 0x24; 8447 8447 - 0x41; 8448 8448 - 0x2e; 8449 8449 - 0xa5; 8450 8450 - 0x3d; 8451 8451 - 0x48; 8452 8452 - 0x0d; 8453 8453 - 0x0f; 8454 8454 - 0x99; 8455 8455 - 0xea; 8456 8456 - 0x1e; 8457 8457 - 0x42; 8458 8458 - 0x97; 8459 8459 - 0xc6; 8460 8460 - 0xfe; 8461 8461 - 0x95; 8462 8462 - 0xda; 8463 8463 - 0xab; 8464 8464 - 0x47; 8465 8465 - 0x9a; 8466 8466 - 0xcb; 8467 8467 - 0x2b; 8468 8468 - 0x03; 8469 8469 - 0xd6; 8470 8470 - 0x0d; 8471 8471 - 0x40; 8472 8472 - 0xc1; 8473 8473 - 0x0a; 8474 8474 - 0xf7; 8475 8475 - 0x78; 8476 8476 - 0x1a; 8477 8477 - 0xda; 8478 8478 - 0xb5; 8479 8479 - 0x83; 8480 8480 - 0xa4; 8481 8481 - 0xad; 8482 8482 - 0xb5; 8483 8483 - 0x99; 8484 8484 - 0x49; 8485 8485 - 0x20; 8486 8486 - 0x2e; 8487 8487 - 0xf8; 8488 8488 - 0x93; 8489 8489 - 0x3c; 8490 8490 - 0x1e; 8491 8491 - 0x6c; 8492 8492 - 0x3d; 8493 8493 - 0xd1; 8494 8494 - 0x3b; 8495 8495 - 0x23; 8496 8496 - 0x3a; 8497 8497 - 0x6b; 8498 8498 - 0x38; 8499 8499 - 0x2a; 8500 8500 - 0x7e; 8501 8501 - 0x62; 8502 8502 - 0x7a; 8503 8503 - 0x5f; 8504 8504 - 0xdd; 8505 8505 - 0x17; 8506 8506 - 0x05; 8507 8507 - 0x75; 8508 8508 - 0xd0; 8509 8509 - 0x24; 8510 8510 - 0x5d; 8511 8511 - 0xbe; 8512 8512 - 0x8d; 8513 8513 - 0xa8; 8514 8514 - 0x9a; 8515 8515 - 0x10; 8516 8516 - 0x44; 8517 8517 - 0xfa; 8518 8518 - 0xd2; 8519 8519 - 0xb4; 8520 8520 - 0xca; 8521 8521 - 0xef; 8522 8522 - 0xd7; 8523 8523 - 0xd0; 8524 8524 - 0xb5; 8525 8525 - 0x76; 8526 8526 - 0xa5; 8527 8527 - 0x26; 8528 8528 - 0x25; 8529 8529 - 0x1c; 8530 8530 - 0x08; 8531 8531 - 0x41; 8532 8532 - 0xd8; 8533 8533 - 0x64; 8534 8534 - 0x92; 8535 8535 - 0xa7; 8536 8536 - 0xaf; 8537 8537 - 0x7d; 8538 8538 - 0xfe; 8539 8539 - 0x88; 8540 8540 - 0x40; 8541 8541 - 0x39; 8542 8542 - 0x61; 8543 8543 - 0x0b; 8544 8544 - 0xc0; 8545 8545 - 0x48; 8546 8546 - 0x30; 8547 8547 - 0xa9; 8548 8548 - 0x82; 8549 8549 - 0x34; 8550 8550 - 0xad; 8551 8551 - 0xf7; 8552 8552 - 0x70; 8553 8553 - 0x46; 8554 8554 - 0x03; 8555 8555 - 0x7c; 8556 8556 - 0x35; 8557 8557 - 0x91; 8558 8558 - 0x3a; 8559 8559 - 0xd5; 8560 8560 - 0xbb; 8561 8561 - 0x24; 8562 8562 - 0xd8; 8563 8563 - 0x01; 8564 8564 - 0xbc; 8565 8565 - 0x14; 8566 8566 - 0xf0; 8567 8567 - 0xc3; 8568 8568 - 0x0f; 8569 8569 - 0x23; 8570 8570 - 0x3b; 8571 8571 - 0x58; 8572 8572 - 0x32; 8573 8573 - 0xba; 8574 8574 - 0x0f; 8575 8575 - 0x12; 8576 8576 - 0x6c; 8577 8577 - 0x66; 8578 8578 - 0x7a; 8579 8579 - 0x6d; 8580 8580 - 0x9d; 8581 8581 - 0xe4; 8582 8582 - 0xf0; 8583 8583 - 0xe5; 8584 8584 - 0x7c; 8585 8585 - 0x5d; 8586 8586 - 0x7e; 8587 8587 - 0x02; 8588 8588 - 0xd8; 8589 8589 - 0xd7; 8590 8590 - 0xac; 8591 8591 - 0x89; 8592 8592 - 0x97; 8593 8593 - 0x0b; 8594 8594 - 0x61; 8595 8595 - 0xb7; 8596 8596 - 0x36; 8597 8597 - 0x9f; 8598 8598 - 0xb0; 8599 8599 - 0x7d; 8600 8600 - 0x3b; 8601 8601 - 0xee; 8602 8602 - 0xb7; 8603 8603 - 0x33; 8604 8604 - 0x69; 8605 8605 - 0x00; 8606 8606 - 0x04; 8607 8607 - 0xba; 8608 8608 - 0x30; 8609 8609 - 0x82; 8610 8610 - 0x04; 8611 8611 - 0xb6; 8612 8612 - 0x30; 8613 8613 - 0x82; 8614 8614 - 0x03; 8615 8615 - 0x9e; 8616 8616 - 0xa0; 8617 8617 - 0x03; 8618 8618 - 0x02; 8619 8619 - 0x01; 8620 8620 - 0x02; 8621 8621 - 0x02; 8622 8622 - 0x10; 8623 8623 - 0x0c; 8624 8624 - 0x79; 8625 8625 - 0xa9; 8626 8626 - 0x44; 8627 8627 - 0xb0; 8628 8628 - 0x8c; 8629 8629 - 0x11; 8630 8630 - 0x95; 8631 8631 - 0x20; 8632 8632 - 0x92; 8633 8633 - 0x61; 8634 8634 - 0x5f; 8635 8635 - 0xe2; 8636 8636 - 0x6b; 8637 8637 - 0x1d; 8638 8638 - 0x83; 8639 8639 - 0x30; 8640 8640 - 0x0d; 8641 8641 - 0x06; 8642 8642 - 0x09; 8643 8643 - 0x2a; 8644 8644 - 0x86; 8645 8645 - 0x48; 8646 8646 - 0x86; 8647 8647 - 0xf7; 8648 8648 - 0x0d; 8649 8649 - 0x01; 8650 8650 - 0x01; 8651 8651 - 0x0b; 8652 8652 - 0x05; 8653 8653 - 0x00; 8654 8654 - 0x30; 8655 8655 - 0x6c; 8656 8656 - 0x31; 8657 8657 - 0x0b; 8658 8658 - 0x30; 8659 8659 - 0x09; 8660 8660 - 0x06; 8661 8661 - 0x03; 8662 8662 - 0x55; 8663 8663 - 0x04; 8664 8664 - 0x06; 8665 8665 - 0x13; 8666 8666 - 0x02; 8667 8667 - 0x55; 8668 8668 - 0x53; 8669 8669 - 0x31; 8670 8670 - 0x15; 8671 8671 - 0x30; 8672 8672 - 0x13; 8673 8673 - 0x06; 8674 8674 - 0x03; 8675 8675 - 0x55; 8676 8676 - 0x04; 8677 8677 - 0x0a; 8678 8678 - 0x13; 8679 8679 - 0x0c; 8680 8680 - 0x44; 8681 8681 - 0x69; 8682 8682 - 0x67; 8683 8683 - 0x69; 8684 8684 - 0x43; 8685 8685 - 0x65; 8686 8686 - 0x72; 8687 8687 - 0x74; 8688 8688 - 0x20; 8689 8689 - 0x49; 8690 8690 - 0x6e; 8691 8691 - 0x63; 8692 8692 - 0x31; 8693 8693 - 0x19; 8694 8694 - 0x30; 8695 8695 - 0x17; 8696 8696 - 0x06; 8697 8697 - 0x03; 8698 8698 - 0x55; 8699 8699 - 0x04; 8700 8700 - 0x0b; 8701 8701 - 0x13; 8702 8702 - 0x10; 8703 8703 - 0x77; 8704 8704 - 0x77; 8705 8705 - 0x77; 8706 8706 - 0x2e; 8707 8707 - 0x64; 8708 8708 - 0x69; 8709 8709 - 0x67; 8710 8710 - 0x69; 8711 8711 - 0x63; 8712 8712 - 0x65; 8713 8713 - 0x72; 8714 8714 - 0x74; 8715 8715 - 0x2e; 8716 8716 - 0x63; 8717 8717 - 0x6f; 8718 8718 - 0x6d; 8719 8719 - 0x31; 8720 8720 - 0x2b; 8721 8721 - 0x30; 8722 8722 - 0x29; 8723 8723 - 0x06; 8724 8724 - 0x03; 8725 8725 - 0x55; 8726 8726 - 0x04; 8727 8727 - 0x03; 8728 8728 - 0x13; 8729 8729 - 0x22; 8730 8730 - 0x44; 8731 8731 - 0x69; 8732 8732 - 0x67; 8733 8733 - 0x69; 8734 8734 - 0x43; 8735 8735 - 0x65; 8736 8736 - 0x72; 8737 8737 - 0x74; 8738 8738 - 0x20; 8739 8739 - 0x48; 8740 8740 - 0x69; 8741 8741 - 0x67; 8742 8742 - 0x68; 8743 8743 - 0x20; 8744 8744 - 0x41; 8745 8745 - 0x73; 8746 8746 - 0x73; 8747 8747 - 0x75; 8748 8748 - 0x72; 8749 8749 - 0x61; 8750 8750 - 0x6e; 8751 8751 - 0x63; 8752 8752 - 0x65; 8753 8753 - 0x20; 8754 8754 - 0x45; 8755 8755 - 0x56; 8756 8756 - 0x20; 8757 8757 - 0x52; 8758 8758 - 0x6f; 8759 8759 - 0x6f; 8760 8760 - 0x74; 8761 8761 - 0x20; 8762 8762 - 0x43; 8763 8763 - 0x41; 8764 8764 - 0x30; 8765 8765 - 0x1e; 8766 8766 - 0x17; 8767 8767 - 0x0d; 8768 8768 - 0x31; 8769 8769 - 0x33; 8770 8770 - 0x31; 8771 8771 - 0x30; 8772 8772 - 0x32; 8773 8773 - 0x32; 8774 8774 - 0x31; 8775 8775 - 0x32; 8776 8776 - 0x30; 8777 8777 - 0x30; 8778 8778 - 0x30; 8779 8779 - 0x30; 8780 8780 - 0x5a; 8781 8781 - 0x17; 8782 8782 - 0x0d; 8783 8783 - 0x32; 8784 8784 - 0x38; 8785 8785 - 0x31; 8786 8786 - 0x30; 8787 8787 - 0x32; 8788 8788 - 0x32; 8789 8789 - 0x31; 8790 8790 - 0x32; 8791 8791 - 0x30; 8792 8792 - 0x30; 8793 8793 - 0x30; 8794 8794 - 0x30; 8795 8795 - 0x5a; 8796 8796 - 0x30; 8797 8797 - 0x75; 8798 8798 - 0x31; 8799 8799 - 0x0b; 8800 8800 - 0x30; 8801 8801 - 0x09; 8802 8802 - 0x06; 8803 8803 - 0x03; 8804 8804 - 0x55; 8805 8805 - 0x04; 8806 8806 - 0x06; 8807 8807 - 0x13; 8808 8808 - 0x02; 8809 8809 - 0x55; 8810 8810 - 0x53; 8811 8811 - 0x31; 8812 8812 - 0x15; 8813 8813 - 0x30; 8814 8814 - 0x13; 8815 8815 - 0x06; 8816 8816 - 0x03; 8817 8817 - 0x55; 8818 8818 - 0x04; 8819 8819 - 0x0a; 8820 8820 - 0x13; 8821 8821 - 0x0c; 8822 8822 - 0x44; 8823 8823 - 0x69; 8824 8824 - 0x67; 8825 8825 - 0x69; 8826 8826 - 0x43; 8827 8827 - 0x65; 8828 8828 - 0x72; 8829 8829 - 0x74; 8830 8830 - 0x20; 8831 8831 - 0x49; 8832 8832 - 0x6e; 8833 8833 - 0x63; 8834 8834 - 0x31; 8835 8835 - 0x19; 8836 8836 - 0x30; 8837 8837 - 0x17; 8838 8838 - 0x06; 8839 8839 - 0x03; 8840 8840 - 0x55; 8841 8841 - 0x04; 8842 8842 - 0x0b; 8843 8843 - 0x13; 8844 8844 - 0x10; 8845 8845 - 0x77; 8846 8846 - 0x77; 8847 8847 - 0x77; 8848 8848 - 0x2e; 8849 8849 - 0x64; 8850 8850 - 0x69; 8851 8851 - 0x67; 8852 8852 - 0x69; 8853 8853 - 0x63; 8854 8854 - 0x65; 8855 8855 - 0x72; 8856 8856 - 0x74; 8857 8857 - 0x2e; 8858 8858 - 0x63; 8859 8859 - 0x6f; 8860 8860 - 0x6d; 8861 8861 - 0x31; 8862 8862 - 0x34; 8863 8863 - 0x30; 8864 8864 - 0x32; 8865 8865 - 0x06; 8866 8866 - 0x03; 8867 8867 - 0x55; 8868 8868 - 0x04; 8869 8869 - 0x03; 8870 8870 - 0x13; 8871 8871 - 0x2b; 8872 8872 - 0x44; 8873 8873 - 0x69; 8874 8874 - 0x67; 8875 8875 - 0x69; 8876 8876 - 0x43; 8877 8877 - 0x65; 8878 8878 - 0x72; 8879 8879 - 0x74; 8880 8880 - 0x20; 8881 8881 - 0x53; 8882 8882 - 0x48; 8883 8883 - 0x41; 8884 8884 - 0x32; 8885 8885 - 0x20; 8886 8886 - 0x45; 8887 8887 - 0x78; 8888 8888 - 0x74; 8889 8889 - 0x65; 8890 8890 - 0x6e; 8891 8891 - 0x64; 8892 8892 - 0x65; 8893 8893 - 0x64; 8894 8894 - 0x20; 8895 8895 - 0x56; 8896 8896 - 0x61; 8897 8897 - 0x6c; 8898 8898 - 0x69; 8899 8899 - 0x64; 8900 8900 - 0x61; 8901 8901 - 0x74; 8902 8902 - 0x69; 8903 8903 - 0x6f; 8904 8904 - 0x6e; 8905 8905 - 0x20; 8906 8906 - 0x53; 8907 8907 - 0x65; 8908 8908 - 0x72; 8909 8909 - 0x76; 8910 8910 - 0x65; 8911 8911 - 0x72; 8912 8912 - 0x20; 8913 8913 - 0x43; 8914 8914 - 0x41; 8915 8915 - 0x30; 8916 8916 - 0x82; 8917 8917 - 0x01; 8918 8918 - 0x22; 8919 8919 - 0x30; 8920 8920 - 0x0d; 8921 8921 - 0x06; 8922 8922 - 0x09; 8923 8923 - 0x2a; 8924 8924 - 0x86; 8925 8925 - 0x48; 8926 8926 - 0x86; 8927 8927 - 0xf7; 8928 8928 - 0x0d; 8929 8929 - 0x01; 8930 8930 - 0x01; 8931 8931 - 0x01; 8932 8932 - 0x05; 8933 8933 - 0x00; 8934 8934 - 0x03; 8935 8935 - 0x82; 8936 8936 - 0x01; 8937 8937 - 0x0f; 8938 8938 - 0x00; 8939 8939 - 0x30; 8940 8940 - 0x82; 8941 8941 - 0x01; 8942 8942 - 0x0a; 8943 8943 - 0x02; 8944 8944 - 0x82; 8945 8945 - 0x01; 8946 8946 - 0x01; 8947 8947 - 0x00; 8948 8948 - 0xd7; 8949 8949 - 0x53; 8950 8950 - 0xa4; 8951 8951 - 0x04; 8952 8952 - 0x51; 8953 8953 - 0xf8; 8954 8954 - 0x99; 8955 8955 - 0xa6; 8956 8956 - 0x16; 8957 8957 - 0x48; 8958 8958 - 0x4b; 8959 8959 - 0x67; 8960 8960 - 0x27; 8961 8961 - 0xaa; 8962 8962 - 0x93; 8963 8963 - 0x49; 8964 8964 - 0xd0; 8965 8965 - 0x39; 8966 8966 - 0xed; 8967 8967 - 0x0c; 8968 8968 - 0xb0; 8969 8969 - 0xb0; 8970 8970 - 0x00; 8971 8971 - 0x87; 8972 8972 - 0xf1; 8973 8973 - 0x67; 8974 8974 - 0x28; 8975 8975 - 0x86; 8976 8976 - 0x85; 8977 8977 - 0x8c; 8978 8978 - 0x8e; 8979 8979 - 0x63; 8980 8980 - 0xda; 8981 8981 - 0xbc; 8982 8982 - 0xb1; 8983 8983 - 0x40; 8984 8984 - 0x38; 8985 8985 - 0xe2; 8986 8986 - 0xd3; 8987 8987 - 0xf5; 8988 8988 - 0xec; 8989 8989 - 0xa5; 8990 8990 - 0x05; 8991 8991 - 0x18; 8992 8992 - 0xb8; 8993 8993 - 0x3d; 8994 8994 - 0x3e; 8995 8995 - 0xc5; 8996 8996 - 0x99; 8997 8997 - 0x17; 8998 8998 - 0x32; 8999 8999 - 0xec; 9000 9000 - 0x18; 9001 9001 - 0x8c; 9002 9002 - 0xfa; 9003 9003 - 0xf1; 9004 9004 - 0x0c; 9005 9005 - 0xa6; 9006 9006 - 0x64; 9007 9007 - 0x21; 9008 9008 - 0x85; 9009 9009 - 0xcb; 9010 9010 - 0x07; 9011 9011 - 0x10; 9012 9012 - 0x34; 9013 9013 - 0xb0; 9014 9014 - 0x52; 9015 9015 - 0x88; 9016 9016 - 0x2b; 9017 9017 - 0x1f; 9018 9018 - 0x68; 9019 9019 - 0x9b; 9020 9020 - 0xd2; 9021 9021 - 0xb1; 9022 9022 - 0x8f; 9023 9023 - 0x12; 9024 9024 - 0xb0; 9025 9025 - 0xb3; 9026 9026 - 0xd2; 9027 9027 - 0xe7; 9028 9028 - 0x88; 9029 9029 - 0x1f; 9030 9030 - 0x1f; 9031 9031 - 0xef; 9032 9032 - 0x38; 9033 9033 - 0x77; 9034 9034 - 0x54; 9035 9035 - 0x53; 9036 9036 - 0x5f; 9037 9037 - 0x80; 9038 9038 - 0x79; 9039 9039 - 0x3f; 9040 9040 - 0x2e; 9041 9041 - 0x1a; 9042 9042 - 0xaa; 9043 9043 - 0xa8; 9044 9044 - 0x1e; 9045 9045 - 0x4b; 9046 9046 - 0x2b; 9047 9047 - 0x0d; 9048 9048 - 0xab; 9049 9049 - 0xb7; 9050 9050 - 0x63; 9051 9051 - 0xb9; 9052 9052 - 0x35; 9053 9053 - 0xb7; 9054 9054 - 0x7d; 9055 9055 - 0x14; 9056 9056 - 0xbc; 9057 9057 - 0x59; 9058 9058 - 0x4b; 9059 9059 - 0xdf; 9060 9060 - 0x51; 9061 9061 - 0x4a; 9062 9062 - 0xd2; 9063 9063 - 0xa1; 9064 9064 - 0xe2; 9065 9065 - 0x0c; 9066 9066 - 0xe2; 9067 9067 - 0x90; 9068 9068 - 0x82; 9069 9069 - 0x87; 9070 9070 - 0x6a; 9071 9071 - 0xae; 9072 9072 - 0xea; 9073 9073 - 0xd7; 9074 9074 - 0x64; 9075 9075 - 0xd6; 9076 9076 - 0x98; 9077 9077 - 0x55; 9078 9078 - 0xe8; 9079 9079 - 0xfd; 9080 9080 - 0xaf; 9081 9081 - 0x1a; 9082 9082 - 0x50; 9083 9083 - 0x6c; 9084 9084 - 0x54; 9085 9085 - 0xbc; 9086 9086 - 0x11; 9087 9087 - 0xf2; 9088 9088 - 0xfd; 9089 9089 - 0x4a; 9090 9090 - 0xf2; 9091 9091 - 0x9d; 9092 9092 - 0xbb; 9093 9093 - 0x7f; 9094 9094 - 0x0e; 9095 9095 - 0xf4; 9096 9096 - 0xd5; 9097 9097 - 0xbe; 9098 9098 - 0x8e; 9099 9099 - 0x16; 9100 9100 - 0x89; 9101 9101 - 0x12; 9102 9102 - 0x55; 9103 9103 - 0xd8; 9104 9104 - 0xc0; 9105 9105 - 0x71; 9106 9106 - 0x34; 9107 9107 - 0xee; 9108 9108 - 0xf6; 9109 9109 - 0xdc; 9110 9110 - 0x2d; 9111 9111 - 0xec; 9112 9112 - 0xc4; 9113 9113 - 0x87; 9114 9114 - 0x25; 9115 9115 - 0x86; 9116 9116 - 0x8d; 9117 9117 - 0xd8; 9118 9118 - 0x21; 9119 9119 - 0xe4; 9120 9120 - 0xb0; 9121 9121 - 0x4d; 9122 9122 - 0x0c; 9123 9123 - 0x89; 9124 9124 - 0xdc; 9125 9125 - 0x39; 9126 9126 - 0x26; 9127 9127 - 0x17; 9128 9128 - 0xdd; 9129 9129 - 0xf6; 9130 9130 - 0xd7; 9131 9131 - 0x94; 9132 9132 - 0x85; 9133 9133 - 0xd8; 9134 9134 - 0x04; 9135 9135 - 0x21; 9136 9136 - 0x70; 9137 9137 - 0x9d; 9138 9138 - 0x6f; 9139 9139 - 0x6f; 9140 9140 - 0xff; 9141 9141 - 0x5c; 9142 9142 - 0xba; 9143 9143 - 0x19; 9144 9144 - 0xe1; 9145 9145 - 0x45; 9146 9146 - 0xcb; 9147 9147 - 0x56; 9148 9148 - 0x57; 9149 9149 - 0x28; 9150 9150 - 0x7e; 9151 9151 - 0x1c; 9152 9152 - 0x0d; 9153 9153 - 0x41; 9154 9154 - 0x57; 9155 9155 - 0xaa; 9156 9156 - 0xb7; 9157 9157 - 0xb8; 9158 9158 - 0x27; 9159 9159 - 0xbb; 9160 9160 - 0xb1; 9161 9161 - 0xe4; 9162 9162 - 0xfa; 9163 9163 - 0x2a; 9164 9164 - 0xef; 9165 9165 - 0x21; 9166 9166 - 0x23; 9167 9167 - 0x75; 9168 9168 - 0x1a; 9169 9169 - 0xad; 9170 9170 - 0x2d; 9171 9171 - 0x9b; 9172 9172 - 0x86; 9173 9173 - 0x35; 9174 9174 - 0x8c; 9175 9175 - 0x9c; 9176 9176 - 0x77; 9177 9177 - 0xb5; 9178 9178 - 0x73; 9179 9179 - 0xad; 9180 9180 - 0xd8; 9181 9181 - 0x94; 9182 9182 - 0x2d; 9183 9183 - 0xe4; 9184 9184 - 0xf3; 9185 9185 - 0x0c; 9186 9186 - 0x9d; 9187 9187 - 0xee; 9188 9188 - 0xc1; 9189 9189 - 0x4e; 9190 9190 - 0x62; 9191 9191 - 0x7e; 9192 9192 - 0x17; 9193 9193 - 0xc0; 9194 9194 - 0x71; 9195 9195 - 0x9e; 9196 9196 - 0x2c; 9197 9197 - 0xde; 9198 9198 - 0xf1; 9199 9199 - 0xf9; 9200 9200 - 0x10; 9201 9201 - 0x28; 9202 9202 - 0x19; 9203 9203 - 0x33; 9204 9204 - 0x02; 9205 9205 - 0x03; 9206 9206 - 0x01; 9207 9207 - 0x00; 9208 9208 - 0x01; 9209 9209 - 0xa3; 9210 9210 - 0x82; 9211 9211 - 0x01; 9212 9212 - 0x49; 9213 9213 - 0x30; 9214 9214 - 0x82; 9215 9215 - 0x01; 9216 9216 - 0x45; 9217 9217 - 0x30; 9218 9218 - 0x12; 9219 9219 - 0x06; 9220 9220 - 0x03; 9221 9221 - 0x55; 9222 9222 - 0x1d; 9223 9223 - 0x13; 9224 9224 - 0x01; 9225 9225 - 0x01; 9226 9226 - 0xff; 9227 9227 - 0x04; 9228 9228 - 0x08; 9229 9229 - 0x30; 9230 9230 - 0x06; 9231 9231 - 0x01; 9232 9232 - 0x01; 9233 9233 - 0xff; 9234 9234 - 0x02; 9235 9235 - 0x01; 9236 9236 - 0x00; 9237 9237 - 0x30; 9238 9238 - 0x0e; 9239 9239 - 0x06; 9240 9240 - 0x03; 9241 9241 - 0x55; 9242 9242 - 0x1d; 9243 9243 - 0x0f; 9244 9244 - 0x01; 9245 9245 - 0x01; 9246 9246 - 0xff; 9247 9247 - 0x04; 9248 9248 - 0x04; 9249 9249 - 0x03; 9250 9250 - 0x02; 9251 9251 - 0x01; 9252 9252 - 0x86; 9253 9253 - 0x30; 9254 9254 - 0x1d; 9255 9255 - 0x06; 9256 9256 - 0x03; 9257 9257 - 0x55; 9258 9258 - 0x1d; 9259 9259 - 0x25; 9260 9260 - 0x04; 9261 9261 - 0x16; 9262 9262 - 0x30; 9263 9263 - 0x14; 9264 9264 - 0x06; 9265 9265 - 0x08; 9266 9266 - 0x2b; 9267 9267 - 0x06; 9268 9268 - 0x01; 9269 9269 - 0x05; 9270 9270 - 0x05; 9271 9271 - 0x07; 9272 9272 - 0x03; 9273 9273 - 0x01; 9274 9274 - 0x06; 9275 9275 - 0x08; 9276 9276 - 0x2b; 9277 9277 - 0x06; 9278 9278 - 0x01; 9279 9279 - 0x05; 9280 9280 - 0x05; 9281 9281 - 0x07; 9282 9282 - 0x03; 9283 9283 - 0x02; 9284 9284 - 0x30; 9285 9285 - 0x34; 9286 9286 - 0x06; 9287 9287 - 0x08; 9288 9288 - 0x2b; 9289 9289 - 0x06; 9290 9290 - 0x01; 9291 9291 - 0x05; 9292 9292 - 0x05; 9293 9293 - 0x07; 9294 9294 - 0x01; 9295 9295 - 0x01; 9296 9296 - 0x04; 9297 9297 - 0x28; 9298 9298 - 0x30; 9299 9299 - 0x26; 9300 9300 - 0x30; 9301 9301 - 0x24; 9302 9302 - 0x06; 9303 9303 - 0x08; 9304 9304 - 0x2b; 9305 9305 - 0x06; 9306 9306 - 0x01; 9307 9307 - 0x05; 9308 9308 - 0x05; 9309 9309 - 0x07; 9310 9310 - 0x30; 9311 9311 - 0x01; 9312 9312 - 0x86; 9313 9313 - 0x18; 9314 9314 - 0x68; 9315 9315 - 0x74; 9316 9316 - 0x74; 9317 9317 - 0x70; 9318 9318 - 0x3a; 9319 9319 - 0x2f; 9320 9320 - 0x2f; 9321 9321 - 0x6f; 9322 9322 - 0x63; 9323 9323 - 0x73; 9324 9324 - 0x70; 9325 9325 - 0x2e; 9326 9326 - 0x64; 9327 9327 - 0x69; 9328 9328 - 0x67; 9329 9329 - 0x69; 9330 9330 - 0x63; 9331 9331 - 0x65; 9332 9332 - 0x72; 9333 9333 - 0x74; 9334 9334 - 0x2e; 9335 9335 - 0x63; 9336 9336 - 0x6f; 9337 9337 - 0x6d; 9338 9338 - 0x30; 9339 9339 - 0x4b; 9340 9340 - 0x06; 9341 9341 - 0x03; 9342 9342 - 0x55; 9343 9343 - 0x1d; 9344 9344 - 0x1f; 9345 9345 - 0x04; 9346 9346 - 0x44; 9347 9347 - 0x30; 9348 9348 - 0x42; 9349 9349 - 0x30; 9350 9350 - 0x40; 9351 9351 - 0xa0; 9352 9352 - 0x3e; 9353 9353 - 0xa0; 9354 9354 - 0x3c; 9355 9355 - 0x86; 9356 9356 - 0x3a; 9357 9357 - 0x68; 9358 9358 - 0x74; 9359 9359 - 0x74; 9360 9360 - 0x70; 9361 9361 - 0x3a; 9362 9362 - 0x2f; 9363 9363 - 0x2f; 9364 9364 - 0x63; 9365 9365 - 0x72; 9366 9366 - 0x6c; 9367 9367 - 0x34; 9368 9368 - 0x2e; 9369 9369 - 0x64; 9370 9370 - 0x69; 9371 9371 - 0x67; 9372 9372 - 0x69; 9373 9373 - 0x63; 9374 9374 - 0x65; 9375 9375 - 0x72; 9376 9376 - 0x74; 9377 9377 - 0x2e; 9378 9378 - 0x63; 9379 9379 - 0x6f; 9380 9380 - 0x6d; 9381 9381 - 0x2f; 9382 9382 - 0x44; 9383 9383 - 0x69; 9384 9384 - 0x67; 9385 9385 - 0x69; 9386 9386 - 0x43; 9387 9387 - 0x65; 9388 9388 - 0x72; 9389 9389 - 0x74; 9390 9390 - 0x48; 9391 9391 - 0x69; 9392 9392 - 0x67; 9393 9393 - 0x68; 9394 9394 - 0x41; 9395 9395 - 0x73; 9396 9396 - 0x73; 9397 9397 - 0x75; 9398 9398 - 0x72; 9399 9399 - 0x61; 9400 9400 - 0x6e; 9401 9401 - 0x63; 9402 9402 - 0x65; 9403 9403 - 0x45; 9404 9404 - 0x56; 9405 9405 - 0x52; 9406 9406 - 0x6f; 9407 9407 - 0x6f; 9408 9408 - 0x74; 9409 9409 - 0x43; 9410 9410 - 0x41; 9411 9411 - 0x2e; 9412 9412 - 0x63; 9413 9413 - 0x72; 9414 9414 - 0x6c; 9415 9415 - 0x30; 9416 9416 - 0x3d; 9417 9417 - 0x06; 9418 9418 - 0x03; 9419 9419 - 0x55; 9420 9420 - 0x1d; 9421 9421 - 0x20; 9422 9422 - 0x04; 9423 9423 - 0x36; 9424 9424 - 0x30; 9425 9425 - 0x34; 9426 9426 - 0x30; 9427 9427 - 0x32; 9428 9428 - 0x06; 9429 9429 - 0x04; 9430 9430 - 0x55; 9431 9431 - 0x1d; 9432 9432 - 0x20; 9433 9433 - 0x00; 9434 9434 - 0x30; 9435 9435 - 0x2a; 9436 9436 - 0x30; 9437 9437 - 0x28; 9438 9438 - 0x06; 9439 9439 - 0x08; 9440 9440 - 0x2b; 9441 9441 - 0x06; 9442 9442 - 0x01; 9443 9443 - 0x05; 9444 9444 - 0x05; 9445 9445 - 0x07; 9446 9446 - 0x02; 9447 9447 - 0x01; 9448 9448 - 0x16; 9449 9449 - 0x1c; 9450 9450 - 0x68; 9451 9451 - 0x74; 9452 9452 - 0x74; 9453 9453 - 0x70; 9454 9454 - 0x73; 9455 9455 - 0x3a; 9456 9456 - 0x2f; 9457 9457 - 0x2f; 9458 9458 - 0x77; 9459 9459 - 0x77; 9460 9460 - 0x77; 9461 9461 - 0x2e; 9462 9462 - 0x64; 9463 9463 - 0x69; 9464 9464 - 0x67; 9465 9465 - 0x69; 9466 9466 - 0x63; 9467 9467 - 0x65; 9468 9468 - 0x72; 9469 9469 - 0x74; 9470 9470 - 0x2e; 9471 9471 - 0x63; 9472 9472 - 0x6f; 9473 9473 - 0x6d; 9474 9474 - 0x2f; 9475 9475 - 0x43; 9476 9476 - 0x50; 9477 9477 - 0x53; 9478 9478 - 0x30; 9479 9479 - 0x1d; 9480 9480 - 0x06; 9481 9481 - 0x03; 9482 9482 - 0x55; 9483 9483 - 0x1d; 9484 9484 - 0x0e; 9485 9485 - 0x04; 9486 9486 - 0x16; 9487 9487 - 0x04; 9488 9488 - 0x14; 9489 9489 - 0x3d; 9490 9490 - 0xd3; 9491 9491 - 0x50; 9492 9492 - 0xa5; 9493 9493 - 0xd6; 9494 9494 - 0xa0; 9495 9495 - 0xad; 9496 9496 - 0xee; 9497 9497 - 0xf3; 9498 9498 - 0x4a; 9499 9499 - 0x60; 9500 9500 - 0x0a; 9501 9501 - 0x65; 9502 9502 - 0xd3; 9503 9503 - 0x21; 9504 9504 - 0xd4; 9505 9505 - 0xf8; 9506 9506 - 0xf8; 9507 9507 - 0xd6; 9508 9508 - 0x0f; 9509 9509 - 0x30; 9510 9510 - 0x1f; 9511 9511 - 0x06; 9512 9512 - 0x03; 9513 9513 - 0x55; 9514 9514 - 0x1d; 9515 9515 - 0x23; 9516 9516 - 0x04; 9517 9517 - 0x18; 9518 9518 - 0x30; 9519 9519 - 0x16; 9520 9520 - 0x80; 9521 9521 - 0x14; 9522 9522 - 0xb1; 9523 9523 - 0x3e; 9524 9524 - 0xc3; 9525 9525 - 0x69; 9526 9526 - 0x03; 9527 9527 - 0xf8; 9528 9528 - 0xbf; 9529 9529 - 0x47; 9530 9530 - 0x01; 9531 9531 - 0xd4; 9532 9532 - 0x98; 9533 9533 - 0x26; 9534 9534 - 0x1a; 9535 9535 - 0x08; 9536 9536 - 0x02; 9537 9537 - 0xef; 9538 9538 - 0x63; 9539 9539 - 0x64; 9540 9540 - 0x2b; 9541 9541 - 0xc3; 9542 9542 - 0x30; 9543 9543 - 0x0d; 9544 9544 - 0x06; 9545 9545 - 0x09; 9546 9546 - 0x2a; 9547 9547 - 0x86; 9548 9548 - 0x48; 9549 9549 - 0x86; 9550 9550 - 0xf7; 9551 9551 - 0x0d; 9552 9552 - 0x01; 9553 9553 - 0x01; 9554 9554 - 0x0b; 9555 9555 - 0x05; 9556 9556 - 0x00; 9557 9557 - 0x03; 9558 9558 - 0x82; 9559 9559 - 0x01; 9560 9560 - 0x01; 9561 9561 - 0x00; 9562 9562 - 0x9d; 9563 9563 - 0xb6; 9564 9564 - 0xd0; 9565 9565 - 0x90; 9566 9566 - 0x86; 9567 9567 - 0xe1; 9568 9568 - 0x86; 9569 9569 - 0x02; 9570 9570 - 0xed; 9571 9571 - 0xc5; 9572 9572 - 0xa0; 9573 9573 - 0xf0; 9574 9574 - 0x34; 9575 9575 - 0x1c; 9576 9576 - 0x74; 9577 9577 - 0xc1; 9578 9578 - 0x8d; 9579 9579 - 0x76; 9580 9580 - 0xcc; 9581 9581 - 0x86; 9582 9582 - 0x0a; 9583 9583 - 0xa8; 9584 9584 - 0xf0; 9585 9585 - 0x4a; 9586 9586 - 0x8a; 9587 9587 - 0x42; 9588 9588 - 0xd6; 9589 9589 - 0x3f; 9590 9590 - 0xc8; 9591 9591 - 0xa9; 9592 9592 - 0x4d; 9593 9593 - 0xad; 9594 9594 - 0x7c; 9595 9595 - 0x08; 9596 9596 - 0xad; 9597 9597 - 0xe6; 9598 9598 - 0xb6; 9599 9599 - 0x50; 9600 9600 - 0xb8; 9601 9601 - 0xa2; 9602 9602 - 0x1a; 9603 9603 - 0x4d; 9604 9604 - 0x88; 9605 9605 - 0x07; 9606 9606 - 0xb1; 9607 9607 - 0x29; 9608 9608 - 0x21; 9609 9609 - 0xdc; 9610 9610 - 0xe7; 9611 9611 - 0xda; 9612 9612 - 0xc6; 9613 9613 - 0x3c; 9614 9614 - 0x21; 9615 9615 - 0xe0; 9616 9616 - 0xe3; 9617 9617 - 0x11; 9618 9618 - 0x49; 9619 9619 - 0x70; 9620 9620 - 0xac; 9621 9621 - 0x7a; 9622 9622 - 0x1d; 9623 9623 - 0x01; 9624 9624 - 0xa4; 9625 9625 - 0xca; 9626 9626 - 0x11; 9627 9627 - 0x3a; 9628 9628 - 0x57; 9629 9629 - 0xab; 9630 9630 - 0x7d; 9631 9631 - 0x57; 9632 9632 - 0x2a; 9633 9633 - 0x40; 9634 9634 - 0x74; 9635 9635 - 0xfd; 9636 9636 - 0xd3; 9637 9637 - 0x1d; 9638 9638 - 0x85; 9639 9639 - 0x18; 9640 9640 - 0x50; 9641 9641 - 0xdf; 9642 9642 - 0x57; 9643 9643 - 0x47; 9644 9644 - 0x75; 9645 9645 - 0xa1; 9646 9646 - 0x7d; 9647 9647 - 0x55; 9648 9648 - 0x20; 9649 9649 - 0x2e; 9650 9650 - 0x47; 9651 9651 - 0x37; 9652 9652 - 0x50; 9653 9653 - 0x72; 9654 9654 - 0x8c; 9655 9655 - 0x7f; 9656 9656 - 0x82; 9657 9657 - 0x1b; 9658 9658 - 0xd2; 9659 9659 - 0x62; 9660 9660 - 0x8f; 9661 9661 - 0x2d; 9662 9662 - 0x03; 9663 9663 - 0x5a; 9664 9664 - 0xda; 9665 9665 - 0xc3; 9666 9666 - 0xc8; 9667 9667 - 0xa1; 9668 9668 - 0xce; 9669 9669 - 0x2c; 9670 9670 - 0x52; 9671 9671 - 0xa2; 9672 9672 - 0x00; 9673 9673 - 0x63; 9674 9674 - 0xeb; 9675 9675 - 0x73; 9676 9676 - 0xba; 9677 9677 - 0x71; 9678 9678 - 0xc8; 9679 9679 - 0x49; 9680 9680 - 0x27; 9681 9681 - 0x23; 9682 9682 - 0x97; 9683 9683 - 0x64; 9684 9684 - 0x85; 9685 9685 - 0x9e; 9686 9686 - 0x38; 9687 9687 - 0x0e; 9688 9688 - 0xad; 9689 9689 - 0x63; 9690 9690 - 0x68; 9691 9691 - 0x3c; 9692 9692 - 0xba; 9693 9693 - 0x52; 9694 9694 - 0x81; 9695 9695 - 0x58; 9696 9696 - 0x79; 9697 9697 - 0xa3; 9698 9698 - 0x2c; 9699 9699 - 0x0c; 9700 9700 - 0xdf; 9701 9701 - 0xde; 9702 9702 - 0x6d; 9703 9703 - 0xeb; 9704 9704 - 0x31; 9705 9705 - 0xf2; 9706 9706 - 0xba; 9707 9707 - 0xa0; 9708 9708 - 0x7c; 9709 9709 - 0x6c; 9710 9710 - 0xf1; 9711 9711 - 0x2c; 9712 9712 - 0xd4; 9713 9713 - 0xe1; 9714 9714 - 0xbd; 9715 9715 - 0x77; 9716 9716 - 0x84; 9717 9717 - 0x37; 9718 9718 - 0x03; 9719 9719 - 0xce; 9720 9720 - 0x32; 9721 9721 - 0xb5; 9722 9722 - 0xc8; 9723 9723 - 0x9a; 9724 9724 - 0x81; 9725 9725 - 0x1a; 9726 9726 - 0x4a; 9727 9727 - 0x92; 9728 9728 - 0x4e; 9729 9729 - 0x3b; 9730 9730 - 0x46; 9731 9731 - 0x9a; 9732 9732 - 0x85; 9733 9733 - 0xfe; 9734 9734 - 0x83; 9735 9735 - 0xa2; 9736 9736 - 0xf9; 9737 9737 - 0x9e; 9738 9738 - 0x8c; 9739 9739 - 0xa3; 9740 9740 - 0xcc; 9741 9741 - 0x0d; 9742 9742 - 0x5e; 9743 9743 - 0xb3; 9744 9744 - 0x3d; 9745 9745 - 0xcf; 9746 9746 - 0x04; 9747 9747 - 0x78; 9748 9748 - 0x8f; 9749 9749 - 0x14; 9750 9750 - 0x14; 9751 9751 - 0x7b; 9752 9752 - 0x32; 9753 9753 - 0x9c; 9754 9754 - 0xc7; 9755 9755 - 0x00; 9756 9756 - 0xa6; 9757 9757 - 0x5c; 9758 9758 - 0xc4; 9759 9759 - 0xb5; 9760 9760 - 0xa1; 9761 9761 - 0x55; 9762 9762 - 0x8d; 9763 9763 - 0x5a; 9764 9764 - 0x56; 9765 9765 - 0x68; 9766 9766 - 0xa4; 9767 9767 - 0x22; 9768 9768 - 0x70; 9769 9769 - 0xaa; 9770 9770 - 0x3c; 9771 9771 - 0x81; 9772 9772 - 0x71; 9773 9773 - 0xd9; 9774 9774 - 0x9d; 9775 9775 - 0xa8; 9776 9776 - 0x45; 9777 9777 - 0x3b; 9778 9778 - 0xf4; 9779 9779 - 0xe5; 9780 9780 - 0xf6; 9781 9781 - 0xa2; 9782 9782 - 0x51; 9783 9783 - 0xdd; 9784 9784 - 0xc7; 9785 9785 - 0x7b; 9786 9786 - 0x62; 9787 9787 - 0xe8; 9788 9788 - 0x6f; 9789 9789 - 0x0c; 9790 9790 - 0x74; 9791 9791 - 0xeb; 9792 9792 - 0xb8; 9793 9793 - 0xda; 9794 9794 - 0xf8; 9795 9795 - 0xbf; 9796 9796 - 0x87; 9797 9797 - 0x0d; 9798 9798 - 0x79; 9799 9799 - 0x50; 9800 9800 - 0x91; 9801 9801 - 0x90; 9802 9802 - 0x9b; 9803 9803 - 0x18; 9804 9804 - 0x3b; 9805 9805 - 0x91; 9806 9806 - 0x59; 9807 9807 - 0x27; 9808 9808 - 0xf1; 9809 9809 - 0x35; 9810 9810 - 0x28; 9811 9811 - 0x13; 9812 9812 - 0xab; 9813 9813 - 0x26; 9814 9814 - 0x7e; 9815 9815 - 0xd5; 9816 9816 - 0xf7; 9817 9817 - 0x7a; 9818 9818 - ], 9819 9819 - Core.Certificate (Writer.assemble_certificates [ gh1; gh2 ]) ); 9820 9820 - ] 9821 9821 - 9822 9822 - let cmp_handshake_cstruct hs hs' = 9823 9823 - Core.( 9824 9824 - match (hs, hs') with 9825 9825 - | Finished xs, Finished ys -> assert_cs_eq xs ys 9826 9826 - | ServerKeyExchange xs, ServerKeyExchange ys -> assert_cs_eq xs ys 9827 9827 - | Certificate xs, Certificate ys -> assert_cs_eq xs ys 9828 9828 - | ClientKeyExchange xs, ClientKeyExchange ys -> assert_cs_eq xs ys 9829 9829 - | _ -> assert_failure "handshake cstruct data parser broken") 9830 9830 - 9831 9831 - let good_handshake_cstruct_data_parser (xs, res) _ = 9832 9832 - let buf = list_to_cstruct xs in 9833 9833 - match Reader.parse_handshake buf with 9834 9834 - | Ok r -> cmp_handshake_cstruct r res 9835 9835 - | Error _ -> assert_failure "handshake cstruct data parser failed" 9836 9836 - 9837 9837 - let good_handshake_cstruct_data_tests = 9838 9838 - List.mapi 9839 9839 - (fun i f -> 9840 9840 - "Parse good handshake " ^ string_of_int i 9841 9841 - >:: good_handshake_cstruct_data_parser f) 9842 9842 - good_handshake_cstruct_data 9843 9843 - 9844 9844 - let bad_handshake_cstruct_data = 9845 9845 - let data = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11 ] in 9846 9846 - [ 9847 9847 - [ 12; 0; 0; 13 ] @ data; 9848 9848 - [ 12; 0; 0; 11 ] @ data; 9849 9849 - [ 20; 0; 1; 12 ] @ data; 9850 9850 - [ 20; 0; 0; 11 ] @ data; 9851 9851 - [ 16; 0; 0; 15; 0; 12 ] @ data; 9852 9852 - [ 25; 0; 0; 14; 0; 12 ] @ data; 9853 9853 - [ 255; 0; 0; 14; 0; 12 ] @ data; 9854 9854 - [ 11; 0; 0; 17; 0; 0; 15; 0; 0; 12 ] @ data; 9855 9855 - ] 9856 9856 - 9857 9857 - let bad_handshake_cstruct_data_parser xs _ = 9858 9858 - let buf = list_to_cstruct xs in 9859 9859 - match Reader.parse_handshake buf with 9860 9860 - | Ok _ -> assert_failure "bad handshake cstruct parser won" 9861 9861 - | Error _ -> () 9862 9862 - 9863 9863 - let bad_handshake_cstruct_data_tests = 9864 9864 - List.mapi 9865 9865 - (fun i f -> 9866 9866 - "Parse bad handshake " ^ string_of_int i 9867 9867 - >:: bad_handshake_cstruct_data_parser f) 9868 9868 - bad_handshake_cstruct_data 9869 9869 - 9870 9870 - let bad_certificate_cstruct_data = 9871 9871 - let data = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11 ] in 9872 9872 - [ 9873 9873 - [ 11; 0; 0; 3; 0; 0; 2 ]; 9874 9874 - [ 11; 0; 0; 4; 0; 0; 0; 0 ]; 9875 9875 - [ 11; 0; 0; 18; 0; 0; 15; 0; 0; 11 ] @ data; 9876 9876 - [ 11; 0; 0; 18; 0; 0; 14; 0; 0; 11 ] @ data; 9877 9877 - [ 11; 0; 0; 33; 0; 0; 29; 0; 0; 12 ] @ data @ [ 0; 0; 12 ] @ data; 9878 9878 - [ 11; 0; 0; 33; 0; 0; 31; 0; 0; 12 ] @ data @ [ 0; 0; 12 ] @ data; 9879 9879 - [ 11; 0; 0; 33; 0; 0; 30; 0; 0; 11 ] @ data @ [ 0; 0; 12 ] @ data; 9880 9880 - ] 9881 9881 - 9882 9882 - let bad_certificate_cstruct_data_parser xs _ = 9883 9883 - let buf = list_to_cstruct xs in 9884 9884 - Reader.( 9885 9885 - match parse_handshake buf with 9886 9886 - | Ok (Core.Certificate cs) -> ( 9887 9887 - match Reader.parse_certificates cs with 9888 9888 - | Ok _ -> assert_failure "bad certificate parser won" 9889 9889 - | Error _ -> ()) 9890 9890 - | _ -> assert_failure "should've been a certificate") 9891 9891 - 9892 9892 - let bad_certificate_cstruct_data_tests = 9893 9893 - List.mapi 9894 9894 - (fun i f -> 9895 9895 - "Parse bad certificate " ^ string_of_int i 9896 9896 - >:: bad_certificate_cstruct_data_parser f) 9897 9897 - bad_certificate_cstruct_data 9898 9898 - 9899 9899 - let good_client_hellos = 9900 9900 - (* I rolled the dice 16 times *) 9901 9901 - let rnd = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] in 9902 9902 - let rand = rnd @ rnd in 9903 9903 - let client_random = list_to_cstruct rand in 9904 9904 - Core.( 9905 9905 - let ch : client_hello = 9906 9906 - { 9907 9907 - client_version = `TLS_1_2; 9908 9908 - client_random; 9909 9909 - sessionid = None; 9910 9910 - ciphersuites = []; 9911 9911 - extensions = []; 9912 9912 - } 9913 9913 - in 9914 9914 - [ 9915 9915 - (* versions *) 9916 9916 - ( [ 1; 0; 0; 38; 3; 3 ] @ rand 9917 9917 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ], 9918 9918 - ch ); 9919 9919 - ( [ 1; 0; 0; 38; 3; 0 ] @ rand 9920 9920 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ], 9921 9921 - { ch with client_version = `SSL_3 } ); 9922 9922 - ( [ 1; 0; 0; 38; 3; 1 ] @ rand 9923 9923 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ], 9924 9924 - { ch with client_version = `TLS_1_0 } ); 9925 9925 - ( [ 1; 0; 0; 38; 3; 2 ] @ rand 9926 9926 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ], 9927 9927 - { ch with client_version = `TLS_1_1 } ); 9928 9928 - ( [ 1; 0; 0; 38; 3; 4 ] @ rand 9929 9929 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ], 9930 9930 - { ch with client_version = `TLS_1_3 } ); 9931 9931 - ( [ 1; 0; 0; 38; 3; 5 ] @ rand 9932 9932 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ], 9933 9933 - { ch with client_version = `TLS_1_X 5 } ); 9934 9934 - (* well-formed compression (not available in higher layer) *) 9935 9935 - ( [ 1; 0; 0; 39; 3; 3 ] @ rand 9936 9936 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 1; 0 (* exts *) ], 9937 9937 - ch ); 9938 9938 - ( [ 1; 0; 0; 40; 3; 3 ] @ rand 9939 9939 - @ [ 9940 9940 - (* session id *) 0; (* cipher *) 0; 0; (* comp *) 2; 0; 1; (* exts *) 9941 9941 - ], 9942 9942 - ch ); 9943 9943 - (* ciphersuites *) 9944 9944 - ( [ 1; 0; 0; 40; 3; 3 ] @ rand 9945 9945 - @ [ 9946 9946 - (* session id *) 9947 9947 - 0; 9948 9948 - (* cipher *) 9949 9949 - 0; 9950 9950 - 2; 9951 9951 - 0; 9952 9952 - 0x0A; 9953 9953 - (* comp *) 9954 9954 - 0; 9955 9955 - (* exts *) 9956 9956 - ], 9957 9957 - { ch with ciphersuites = [ Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA ] } ); 9958 9958 - ( [ 1; 0; 0; 42; 3; 3 ] @ rand 9959 9959 - @ [ 9960 9960 - (* session id *) 9961 9961 - 0; 9962 9962 - (* cipher *) 9963 9963 - 0; 9964 9964 - 4; 9965 9965 - 0; 9966 9966 - 0x0A; 9967 9967 - 0; 9968 9968 - 0x16; 9969 9969 - (* comp *) 9970 9970 - 0; 9971 9971 - (* exts *) 9972 9972 - ], 9973 9973 - { 9974 9974 - ch with 9975 9975 - ciphersuites = 9976 9976 - Packet. 9977 9977 - [ 9978 9978 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 9979 9979 - ]; 9980 9980 - } ); 9981 9981 - (* ignore unknown ciphersuite *) 9982 9982 - ( [ 1; 0; 0; 42; 3; 3 ] @ rand 9983 9983 - @ [ 9984 9984 - (* session id *) 9985 9985 - 0; 9986 9986 - (* cipher *) 9987 9987 - 0; 9988 9988 - 4; 9989 9989 - 0; 9990 9990 - 0x0A; 9991 9991 - 0; 9992 9992 - 0x47; 9993 9993 - (* comp *) 9994 9994 - 0; 9995 9995 - (* exts *) 9996 9996 - ], 9997 9997 - { ch with ciphersuites = [ Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA ] } ); 9998 9998 - (* ignore unknown compression method *) 9999 9999 - ( [ 1; 0; 0; 40; 3; 3 ] @ rand 10000 10000 - @ [ 10001 10001 - (* session id *) 10002 10002 - 0; 10003 10003 - (* cipher *) 10004 10004 - 0; 10005 10005 - 0; 10006 10006 - (* comp *) 10007 10007 - 2; 10008 10008 - 0; 10009 10009 - 42; 10010 10010 - (* exts *) 10011 10011 - ], 10012 10012 - ch ); 10013 10013 - (* TODO: unknown extensions should be ignored (check again with rfc) *) 10014 10014 - (* TODO: validate client_hello: 10015 10015 - - non-empty ciphersuites 10016 10016 - - no duplicated ciphersuites 10017 10017 - - those required by protocol version should be in the list! 10018 10018 - - no duplicated extensions 10019 10019 - - no unsupported extensions (SignatureAlgorithms in TLS < 1.2) 10020 10020 - - empty ServerName extension is useless 10021 10021 - *) 10022 10022 - 10023 10023 - (* combine ciphersuite + compression *) 10024 10024 - ( [ 1; 0; 0; 44; 3; 3 ] @ rand 10025 10025 - @ [ 10026 10026 - (* session id *) 10027 10027 - 0; 10028 10028 - (* cipher *) 10029 10029 - 0; 10030 10030 - 4; 10031 10031 - 0; 10032 10032 - 0x0A; 10033 10033 - 0; 10034 10034 - 0x16; 10035 10035 - (* comp *) 10036 10036 - 2; 10037 10037 - 0; 10038 10038 - 1; 10039 10039 - (* exts *) 10040 10040 - ], 10041 10041 - { 10042 10042 - ch with 10043 10043 - ciphersuites = 10044 10044 - Packet. 10045 10045 - [ 10046 10046 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 10047 10047 - ]; 10048 10048 - } ); 10049 10049 - (* session id *) 10050 10050 - ( [ 1; 0; 0; 41; 3; 3 ] @ rand 10051 10051 - @ [ 10052 10052 - (* session id *) 10053 10053 - 3; 10054 10054 - 1; 10055 10055 - 2; 10056 10056 - 3; 10057 10057 - (* cipher *) 10058 10058 - 0; 10059 10059 - 0; 10060 10060 - (* comp *) 10061 10061 - 0; 10062 10062 - (* exts *) 10063 10063 - ], 10064 10064 - { ch with sessionid = Some (list_to_cstruct [ 1; 2; 3 ]) } ); 10065 10065 - (* combine ciphersuite + compression + session id *) 10066 10066 - ( [ 1; 0; 0; 47; 3; 3 ] @ rand 10067 10067 - @ [ 10068 10068 - (* session id *) 10069 10069 - 3; 10070 10070 - 1; 10071 10071 - 2; 10072 10072 - 3; 10073 10073 - (* cipher *) 10074 10074 - 0; 10075 10075 - 4; 10076 10076 - 0; 10077 10077 - 0x0A; 10078 10078 - 0; 10079 10079 - 0x16; 10080 10080 - (* comp *) 10081 10081 - 2; 10082 10082 - 0; 10083 10083 - 1; 10084 10084 - (* exts *) 10085 10085 - ], 10086 10086 - { 10087 10087 - ch with 10088 10088 - ciphersuites = 10089 10089 - Packet. 10090 10090 - [ 10091 10091 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 10092 10092 - ]; 10093 10093 - sessionid = Some (list_to_cstruct [ 1; 2; 3 ]); 10094 10094 - } ); 10095 10095 - (* extensions *) 10096 10096 - (* empty *) 10097 10097 - ( [ 1; 0; 0; 40; 3; 3 ] @ rand 10098 10098 - @ [ 10099 10099 - (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0; (* exts *) 0; 0; 10100 10100 - ], 10101 10101 - ch ); 10102 10102 - (* some hostname *) 10103 10103 - ( [ 1; 0; 0; 52; 3; 3 ] @ rand 10104 10104 - @ [ 10105 10105 - (* session id *) 10106 10106 - 0; 10107 10107 - (* cipher *) 10108 10108 - 0; 10109 10109 - 0; 10110 10110 - (* comp *) 10111 10111 - 0; 10112 10112 - (* exts *) 10113 10113 - 0; 10114 10114 - 12; 10115 10115 - 0; 10116 10116 - 0; 10117 10117 - 0; 10118 10118 - 8; 10119 10119 - 0; 10120 10120 - 6; 10121 10121 - 0; 10122 10122 - 0; 10123 10123 - 3; 10124 10124 - 102; 10125 10125 - 111; 10126 10126 - 111; 10127 10127 - ], 10128 10128 - { ch with extensions = [ make_hostname_ext "foo" ] } ); 10129 10129 - (* some other hostname *) 10130 10130 - ( [ 1; 0; 0; 59; 3; 3 ] @ rand 10131 10131 - @ [ 10132 10132 - (* session id *) 10133 10133 - 0; 10134 10134 - (* cipher *) 10135 10135 - 0; 10136 10136 - 0; 10137 10137 - (* comp *) 10138 10138 - 0; 10139 10139 - (* exts *) 10140 10140 - 0; 10141 10141 - 19; 10142 10142 - 0; 10143 10143 - 0; 10144 10144 - 0; 10145 10145 - 15; 10146 10146 - 0; 10147 10147 - 13; 10148 10148 - 0; 10149 10149 - 0; 10150 10150 - 10; 10151 10151 - 102; 10152 10152 - 111; 10153 10153 - 111; 10154 10154 - 98; 10155 10155 - 97; 10156 10156 - 114; 10157 10157 - 46; 10158 10158 - 99; 10159 10159 - 111; 10160 10160 - 109; 10161 10161 - ], 10162 10162 - { ch with extensions = [ make_hostname_ext "foobar.com" ] } ); 10163 10163 - (* max fragment length *) 10164 10164 - ( [ 1; 0; 0; 45; 3; 3 ] @ rand 10165 10165 - @ [ 10166 10166 - (* session id *) 10167 10167 - 0; 10168 10168 - (* cipher *) 10169 10169 - 0; 10170 10170 - 0; 10171 10171 - (* comp *) 10172 10172 - 0; 10173 10173 - (* exts *) 10174 10174 - 0; 10175 10175 - 5; 10176 10176 - 0; 10177 10177 - 1; 10178 10178 - 0; 10179 10179 - 1; 10180 10180 - 3; 10181 10181 - ], 10182 10182 - { ch with extensions = [ `MaxFragmentLength Packet.TWO_11 ] } ); 10183 10183 - (* empty SupportedGroups *) 10184 10184 - ( [ 1; 0; 0; 46; 3; 3 ] @ rand 10185 10185 - @ [ 10186 10186 - (* session id *) 10187 10187 - 0; 10188 10188 - (* cipher *) 10189 10189 - 0; 10190 10190 - 0; 10191 10191 - (* comp *) 10192 10192 - 0; 10193 10193 - (* exts *) 10194 10194 - 0; 10195 10195 - 6; 10196 10196 - 0; 10197 10197 - 0xA; 10198 10198 - 0; 10199 10199 - 2; 10200 10200 - 0; 10201 10201 - 0; 10202 10202 - ], 10203 10203 - { ch with extensions = [ `SupportedGroups [] ] } ); 10204 10204 - (* one supported group *) 10205 10205 - ( [ 1; 0; 0; 48; 3; 3 ] @ rand 10206 10206 - @ [ 10207 10207 - (* session id *) 10208 10208 - 0; 10209 10209 - (* cipher *) 10210 10210 - 0; 10211 10211 - 0; 10212 10212 - (* comp *) 10213 10213 - 0; 10214 10214 - (* exts *) 10215 10215 - 0; 10216 10216 - 8; 10217 10217 - 0; 10218 10218 - 0xA; 10219 10219 - 0; 10220 10220 - 4; 10221 10221 - 0; 10222 10222 - 2; 10223 10223 - 0; 10224 10224 - 25; 10225 10225 - ], 10226 10226 - { ch with extensions = [ `SupportedGroups [ Packet.SECP521R1 ] ] } ); 10227 10227 - (* two supported groups *) 10228 10228 - ( [ 1; 0; 0; 50; 3; 3 ] @ rand 10229 10229 - @ [ 10230 10230 - (* session id *) 10231 10231 - 0; 10232 10232 - (* cipher *) 10233 10233 - 0; 10234 10234 - 0; 10235 10235 - (* comp *) 10236 10236 - 0; 10237 10237 - (* exts *) 10238 10238 - 0; 10239 10239 - 10; 10240 10240 - 0; 10241 10241 - 0xA; 10242 10242 - 0; 10243 10243 - 6; 10244 10244 - 0; 10245 10245 - 4; 10246 10246 - 0; 10247 10247 - 25; 10248 10248 - 0; 10249 10249 - 24; 10250 10250 - ], 10251 10251 - { 10252 10252 - ch with 10253 10253 - extensions = [ `SupportedGroups Packet.[ SECP521R1; SECP384R1 ] ]; 10254 10254 - } ); 10255 10255 - (* three supported groups, one unknown *) 10256 10256 - ( [ 1; 0; 0; 52; 3; 3 ] @ rand 10257 10257 - @ [ 10258 10258 - (* session id *) 10259 10259 - 0; 10260 10260 - (* cipher *) 10261 10261 - 0; 10262 10262 - 0; 10263 10263 - (* comp *) 10264 10264 - 0; 10265 10265 - (* exts *) 10266 10266 - 0; 10267 10267 - 12; 10268 10268 - 0; 10269 10269 - 0xA; 10270 10270 - 0; 10271 10271 - 8; 10272 10272 - 0; 10273 10273 - 6; 10274 10274 - 0; 10275 10275 - 25; 10276 10276 - 0xFF; 10277 10277 - 0xFF; 10278 10278 - 0; 10279 10279 - 24; 10280 10280 - ], 10281 10281 - { 10282 10282 - ch with 10283 10283 - extensions = [ `SupportedGroups Packet.[ SECP521R1; SECP384R1 ] ]; 10284 10284 - } ); 10285 10285 - (* secure renegotiation *) 10286 10286 - ( [ 1; 0; 0; 47; 3; 3 ] @ rand 10287 10287 - @ [ 10288 10288 - (* session id *) 10289 10289 - 0; 10290 10290 - (* cipher *) 10291 10291 - 0; 10292 10292 - 0; 10293 10293 - (* comp *) 10294 10294 - 0; 10295 10295 - (* exts *) 10296 10296 - 0; 10297 10297 - 7; 10298 10298 - 0xFF; 10299 10299 - 1; 10300 10300 - 0; 10301 10301 - 3; 10302 10302 - 2; 10303 10303 - 1; 10304 10304 - 2; 10305 10305 - ], 10306 10306 - { 10307 10307 - ch with 10308 10308 - extensions = [ `SecureRenegotiation (list_to_cstruct [ 1; 2 ]) ]; 10309 10309 - } ); 10310 10310 - (* Padding *) 10311 10311 - ( [ 1; 0; 0; 47; 3; 3 ] @ rand 10312 10312 - @ [ 10313 10313 - (* session id *) 10314 10314 - 0; 10315 10315 - (* cipher *) 10316 10316 - 0; 10317 10317 - 0; 10318 10318 - (* comp *) 10319 10319 - 0; 10320 10320 - (* exts *) 10321 10321 - 0; 10322 10322 - 7; 10323 10323 - 0; 10324 10324 - 21; 10325 10325 - 0; 10326 10326 - 3; 10327 10327 - 0; 10328 10328 - 0; 10329 10329 - 0; 10330 10330 - ], 10331 10331 - { ch with extensions = [ `Padding 3 ] } ); 10332 10332 - (* signature algorithm *) 10333 10333 - ( [ 1; 0; 0; 46; 3; 3 ] @ rand 10334 10334 - @ [ 10335 10335 - (* session id *) 10336 10336 - 0; 10337 10337 - (* cipher *) 10338 10338 - 0; 10339 10339 - 0; 10340 10340 - (* comp *) 10341 10341 - 0; 10342 10342 - (* exts *) 10343 10343 - 0; 10344 10344 - 6; 10345 10345 - 0; 10346 10346 - 13; 10347 10347 - 0; 10348 10348 - 2; 10349 10349 - 0; 10350 10350 - 0; 10351 10351 - ], 10352 10352 - { ch with extensions = [ `SignatureAlgorithms [] ] } ); 10353 10353 - ( [ 1; 0; 0; 48; 3; 3 ] @ rand 10354 10354 - @ [ 10355 10355 - (* session id *) 10356 10356 - 0; 10357 10357 - (* cipher *) 10358 10358 - 0; 10359 10359 - 0; 10360 10360 - (* comp *) 10361 10361 - 0; 10362 10362 - (* exts *) 10363 10363 - 0; 10364 10364 - 8; 10365 10365 - 0; 10366 10366 - 13; 10367 10367 - 0; 10368 10368 - 4; 10369 10369 - 0; 10370 10370 - 2; 10371 10371 - 1; 10372 10372 - 1; 10373 10373 - ], 10374 10374 - { ch with extensions = [ `SignatureAlgorithms [ `RSA_PKCS1_MD5 ] ] } ); 10375 10375 - ( [ 1; 0; 0; 50; 3; 3 ] @ rand 10376 10376 - @ [ 10377 10377 - (* session id *) 10378 10378 - 0; 10379 10379 - (* cipher *) 10380 10380 - 0; 10381 10381 - 0; 10382 10382 - (* comp *) 10383 10383 - 0; 10384 10384 - (* exts *) 10385 10385 - 0; 10386 10386 - 10; 10387 10387 - 0; 10388 10388 - 13; 10389 10389 - 0; 10390 10390 - 6; 10391 10391 - 0; 10392 10392 - 4; 10393 10393 - 2; 10394 10394 - 1; 10395 10395 - 1; 10396 10396 - 1; 10397 10397 - ], 10398 10398 - { 10399 10399 - ch with 10400 10400 - extensions = 10401 10401 - [ `SignatureAlgorithms [ `RSA_PKCS1_SHA1; `RSA_PKCS1_MD5 ] ]; 10402 10402 - } ); 10403 10403 - (* unknown one *) 10404 10404 - ( [ 1; 0; 0; 52; 3; 3 ] @ rand 10405 10405 - @ [ 10406 10406 - (* session id *) 10407 10407 - 0; 10408 10408 - (* cipher *) 10409 10409 - 0; 10410 10410 - 0; 10411 10411 - (* comp *) 10412 10412 - 0; 10413 10413 - (* exts *) 10414 10414 - 0; 10415 10415 - 12; 10416 10416 - 0; 10417 10417 - 13; 10418 10418 - 0; 10419 10419 - 8; 10420 10420 - 0; 10421 10421 - 6; 10422 10422 - 42; 10423 10423 - 42; 10424 10424 - 2; 10425 10425 - 1; 10426 10426 - 1; 10427 10427 - 1; 10428 10428 - ], 10429 10429 - { 10430 10430 - ch with 10431 10431 - extensions = 10432 10432 - [ `SignatureAlgorithms [ `RSA_PKCS1_SHA1; `RSA_PKCS1_MD5 ] ]; 10433 10433 - } ); 10434 10434 - (* ALPN *) 10435 10435 - ( [ 1; 0; 0; 58; 3; 3 ] @ rand 10436 10436 - @ [ 10437 10437 - (* session id *) 10438 10438 - 0; 10439 10439 - (* cipher *) 10440 10440 - 0; 10441 10441 - 0; 10442 10442 - (* comp *) 10443 10443 - 0; 10444 10444 - (* exts *) 10445 10445 - 0; 10446 10446 - 18; 10447 10447 - 0; 10448 10448 - 16; 10449 10449 - 0; 10450 10450 - 14; 10451 10451 - 0; 10452 10452 - 12; 10453 10453 - (* h2 *) 10454 10454 - 2; 10455 10455 - 104; 10456 10456 - 50; 10457 10457 - (* http/1.1*) 10458 10458 - 8; 10459 10459 - 104; 10460 10460 - 116; 10461 10461 - 116; 10462 10462 - 112; 10463 10463 - 47; 10464 10464 - 49; 10465 10465 - 46; 10466 10466 - 49; 10467 10467 - ], 10468 10468 - { ch with extensions = [ `ALPN [ "h2"; "http/1.1" ] ] } ); 10469 10469 - (* combinations from the real world *) 10470 10470 - ( [ 10471 10471 - 0x01; 10472 10472 - (* hello *) 10473 10473 - 0x00; 10474 10474 - 0x00; 10475 10475 - 0xaf; 10476 10476 - (* length *) 10477 10477 - 0x03; 10478 10478 - 0x01; 10479 10479 - (* version *) 10480 10480 - 0x7c; 10481 10481 - 0x53; 10482 10482 - 0x05; 10483 10483 - 0x72; 10484 10484 - 0x7a; 10485 10485 - 0x1b; 10486 10486 - 0x84; 10487 10487 - 0x70; 10488 10488 - 0x30; 10489 10489 - 0x89; 10490 10490 - 0xef; 10491 10491 - 0xad; 10492 10492 - 0xfb; 10493 10493 - 0x56; 10494 10494 - 0xc1; 10495 10495 - 0x3d; 10496 10496 - 0x73; 10497 10497 - 0x4b; 10498 10498 - 0xc7; 10499 10499 - 0xcb; 10500 10500 - 0x8c; 10501 10501 - 0xc8; 10502 10502 - 0x75; 10503 10503 - 0x43; 10504 10504 - 0x01; 10505 10505 - 0x12; 10506 10506 - 0x32; 10507 10507 - 0xd6; 10508 10508 - 0x74; 10509 10509 - 0x87; 10510 10510 - 0xcb; 10511 10511 - 0x18; 10512 10512 - (* random *) 10513 10513 - 0x00; 10514 10514 - (* session id *) 10515 10515 - 0x00; 10516 10516 - 0x68; 10517 10517 - (* ciphersuites *) 10518 10518 - 0xc0; 10519 10519 - 0x14; 10520 10520 - 0xc0; 10521 10521 - 0x0a; 10522 10522 - 0xc0; 10523 10523 - 0x22; 10524 10524 - 0xc0; 10525 10525 - 0x21; 10526 10526 - 0x00; 10527 10527 - 0x39; 10528 10528 - 0x00; 10529 10529 - 0x38; 10530 10530 - 0x00; 10531 10531 - 0x88; 10532 10532 - 0x00; 10533 10533 - 0x87; 10534 10534 - 0xc0; 10535 10535 - 0x0f; 10536 10536 - 0xc0; 10537 10537 - 0x05; 10538 10538 - 0x00; 10539 10539 - 0x35; 10540 10540 - 0x00; 10541 10541 - 0x84; 10542 10542 - 0xc0; 10543 10543 - 0x12; 10544 10544 - 0xc0; 10545 10545 - 0x08; 10546 10546 - 0xc0; 10547 10547 - 0x1c; 10548 10548 - 0xc0; 10549 10549 - 0x1b; 10550 10550 - 0x00; 10551 10551 - 0x16; 10552 10552 - 0x00; 10553 10553 - 0x13; 10554 10554 - 0xc0; 10555 10555 - 0x0d; 10556 10556 - 0xc0; 10557 10557 - 0x03; 10558 10558 - 0x00; 10559 10559 - 0x0a; 10560 10560 - 0xc0; 10561 10561 - 0x13; 10562 10562 - 0xc0; 10563 10563 - 0x09; 10564 10564 - 0xc0; 10565 10565 - 0x1f; 10566 10566 - 0xc0; 10567 10567 - 0x1e; 10568 10568 - 0x00; 10569 10569 - 0x33; 10570 10570 - 0x00; 10571 10571 - 0x32; 10572 10572 - 0x00; 10573 10573 - 0x9a; 10574 10574 - 0x00; 10575 10575 - 0x99; 10576 10576 - 0x00; 10577 10577 - 0x45; 10578 10578 - 0x00; 10579 10579 - 0x44; 10580 10580 - 0xc0; 10581 10581 - 0x0e; 10582 10582 - 0xc0; 10583 10583 - 0x04; 10584 10584 - 0x00; 10585 10585 - 0x2f; 10586 10586 - 0x00; 10587 10587 - 0x96; 10588 10588 - 0x00; 10589 10589 - 0x41; 10590 10590 - 0x00; 10591 10591 - 0x07; 10592 10592 - 0xc0; 10593 10593 - 0x11; 10594 10594 - 0xc0; 10595 10595 - 0x07; 10596 10596 - 0xc0; 10597 10597 - 0x0c; 10598 10598 - 0xc0; 10599 10599 - 0x02; 10600 10600 - 0x00; 10601 10601 - 0x05; 10602 10602 - 0x00; 10603 10603 - 0x04; 10604 10604 - 0x00; 10605 10605 - 0x15; 10606 10606 - 0x00; 10607 10607 - 0x12; 10608 10608 - 0x00; 10609 10609 - 0x09; 10610 10610 - 0x00; 10611 10611 - 0x14; 10612 10612 - 0x00; 10613 10613 - 0x11; 10614 10614 - 0x00; 10615 10615 - 0x08; 10616 10616 - 0x00; 10617 10617 - 0x06; 10618 10618 - 0x00; 10619 10619 - 0x03; 10620 10620 - 0x00; 10621 10621 - 0xff; 10622 10622 - 0x01; 10623 10623 - 0x00; 10624 10624 - (* compression *) 10625 10625 - 0x00; 10626 10626 - 0x1e; 10627 10627 - (* extensions *) 10628 10628 - 0x00; 10629 10629 - 0x0a; 10630 10630 - 0x00; 10631 10631 - 0x08; 10632 10632 - (* elliptic curves *) 10633 10633 - 0x00; 10634 10634 - 0x06; 10635 10635 - 0x00; 10636 10636 - 0x19; 10637 10637 - 0x00; 10638 10638 - 0x18; 10639 10639 - 0x00; 10640 10640 - 0x17; 10641 10641 - 0x00; 10642 10642 - 0x10; 10643 10643 - 0x00; 10644 10644 - 0x0e; 10645 10645 - 0x00; 10646 10646 - 0x0c; 10647 10647 - (* ALPN *) 10648 10648 - 0x02; 10649 10649 - 0x68; 10650 10650 - 0x32; 10651 10651 - 0x08; 10652 10652 - 0x68; 10653 10653 - 0x74; 10654 10654 - 0x74; 10655 10655 - 0x70; 10656 10656 - 0x2f; 10657 10657 - 0x31; 10658 10658 - 0x2e; 10659 10659 - 0x31; 10660 10660 - ] 10661 10661 - (* 0x00; 0x23; 0x00; 0x00; (* sessionticket_tls *) 10662 10662 - 0x00; 0x0f; 0x00; 0x01; 0x01 (* heartbeat *) *), 10663 10663 - { 10664 10664 - ch with 10665 10665 - client_version = `TLS_1_0; 10666 10666 - client_random = 10667 10667 - list_to_cstruct 10668 10668 - [ 10669 10669 - 0x7c; 10670 10670 - 0x53; 10671 10671 - 0x05; 10672 10672 - 0x72; 10673 10673 - 0x7a; 10674 10674 - 0x1b; 10675 10675 - 0x84; 10676 10676 - 0x70; 10677 10677 - 0x30; 10678 10678 - 0x89; 10679 10679 - 0xef; 10680 10680 - 0xad; 10681 10681 - 0xfb; 10682 10682 - 0x56; 10683 10683 - 0xc1; 10684 10684 - 0x3d; 10685 10685 - 0x73; 10686 10686 - 0x4b; 10687 10687 - 0xc7; 10688 10688 - 0xcb; 10689 10689 - 0x8c; 10690 10690 - 0xc8; 10691 10691 - 0x75; 10692 10692 - 0x43; 10693 10693 - 0x01; 10694 10694 - 0x12; 10695 10695 - 0x32; 10696 10696 - 0xd6; 10697 10697 - 0x74; 10698 10698 - 0x87; 10699 10699 - 0xcb; 10700 10700 - 0x18; 10701 10701 - ]; 10702 10702 - ciphersuites = 10703 10703 - Packet. 10704 10704 - [ 10705 10705 - TLS_ECDHE_RSA_WITH_AES_256_CBC_SHA; 10706 10706 - TLS_ECDHE_ECDSA_WITH_AES_256_CBC_SHA; 10707 10707 - TLS_DHE_RSA_WITH_AES_256_CBC_SHA; 10708 10708 - TLS_RSA_WITH_AES_256_CBC_SHA; 10709 10709 - TLS_ECDHE_RSA_WITH_3DES_EDE_CBC_SHA; 10710 10710 - TLS_ECDHE_ECDSA_WITH_3DES_EDE_CBC_SHA; 10711 10711 - TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 10712 10712 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; 10713 10713 - TLS_ECDHE_RSA_WITH_AES_128_CBC_SHA; 10714 10714 - TLS_ECDHE_ECDSA_WITH_AES_128_CBC_SHA; 10715 10715 - TLS_DHE_RSA_WITH_AES_128_CBC_SHA; 10716 10716 - TLS_RSA_WITH_AES_128_CBC_SHA; 10717 10717 - TLS_EMPTY_RENEGOTIATION_INFO_SCSV; 10718 10718 - ]; 10719 10719 - extensions = 10720 10720 - [ 10721 10721 - `SupportedGroups Packet.[ SECP521R1; SECP384R1; SECP256R1 ]; 10722 10722 - `ALPN [ "h2"; "http/1.1" ]; 10723 10723 - ]; 10724 10724 - } ); 10725 10725 - ( [ 10726 10726 - 0x01; 10727 10727 - (* client hello *) 10728 10728 - 0x00; 10729 10729 - 0x01; 10730 10730 - 0xc6; 10731 10731 - (* length *) 10732 10732 - 0x03; 10733 10733 - 0x03; 10734 10734 - (* protocol version *) 10735 10735 - 0xb7; 10736 10736 - 0x36; 10737 10737 - 0xeb; 10738 10738 - 0x21; 10739 10739 - 0xec; 10740 10740 - 0x81; 10741 10741 - 0x4d; 10742 10742 - 0x01; 10743 10743 - 0xfc; 10744 10744 - 0xf4; 10745 10745 - 0xe2; 10746 10746 - 0x06; 10747 10747 - 0x9a; 10748 10748 - 0x34; 10749 10749 - 0xb7; 10750 10750 - 0x21; 10751 10751 - 0xe1; 10752 10752 - 0x23; 10753 10753 - 0x6f; 10754 10754 - 0xbe; 10755 10755 - 0x50; 10756 10756 - 0xbf; 10757 10757 - 0xfe; 10758 10758 - 0x33; 10759 10759 - 0x9b; 10760 10760 - 0xc9; 10761 10761 - 0x5b; 10762 10762 - 0x20; 10763 10763 - 0x0e; 10764 10764 - 0x15; 10765 10765 - 0x02; 10766 10766 - 0x27; 10767 10767 - (* random *) 10768 10768 - 0x00; 10769 10769 - (* session id *) 10770 10770 - 0x00; 10771 10771 - 0xa0; 10772 10772 - (* ciphersuites *) 10773 10773 - 0xc0; 10774 10774 - 0x30; 10775 10775 - 0xc0; 10776 10776 - 0x2c; 10777 10777 - 0xc0; 10778 10778 - 0x28; 10779 10779 - 0xc0; 10780 10780 - 0x24; 10781 10781 - 0xc0; 10782 10782 - 0x14; 10783 10783 - 0xc0; 10784 10784 - 0x0a; 10785 10785 - 0xc0; 10786 10786 - 0x22; 10787 10787 - 0xc0; 10788 10788 - 0x21; 10789 10789 - 0x00; 10790 10790 - 0xa3; 10791 10791 - 0x00; 10792 10792 - 0x9f; 10793 10793 - 0x00; 10794 10794 - 0x6b; 10795 10795 - 0x00; 10796 10796 - 0x6a; 10797 10797 - 0x00; 10798 10798 - 0x39; 10799 10799 - 0x00; 10800 10800 - 0x38; 10801 10801 - 0x00; 10802 10802 - 0x88; 10803 10803 - 0x00; 10804 10804 - 0x87; 10805 10805 - 0xc0; 10806 10806 - 0x32; 10807 10807 - 0xc0; 10808 10808 - 0x2e; 10809 10809 - 0xc0; 10810 10810 - 0x2a; 10811 10811 - 0xc0; 10812 10812 - 0x26; 10813 10813 - 0xc0; 10814 10814 - 0x0f; 10815 10815 - 0xc0; 10816 10816 - 0x05; 10817 10817 - 0x00; 10818 10818 - 0x9d; 10819 10819 - 0x00; 10820 10820 - 0x3d; 10821 10821 - 0x00; 10822 10822 - 0x35; 10823 10823 - 0x00; 10824 10824 - 0x84; 10825 10825 - 0xc0; 10826 10826 - 0x12; 10827 10827 - 0xc0; 10828 10828 - 0x08; 10829 10829 - 0xc0; 10830 10830 - 0x1c; 10831 10831 - 0xc0; 10832 10832 - 0x1b; 10833 10833 - 0x00; 10834 10834 - 0x16; 10835 10835 - 0x00; 10836 10836 - 0x13; 10837 10837 - 0xc0; 10838 10838 - 0x0d; 10839 10839 - 0xc0; 10840 10840 - 0x03; 10841 10841 - 0x00; 10842 10842 - 0x0a; 10843 10843 - 0xc0; 10844 10844 - 0x2f; 10845 10845 - 0xc0; 10846 10846 - 0x2b; 10847 10847 - 0xc0; 10848 10848 - 0x27; 10849 10849 - 0xc0; 10850 10850 - 0x23; 10851 10851 - 0xc0; 10852 10852 - 0x13; 10853 10853 - 0xc0; 10854 10854 - 0x09; 10855 10855 - 0xc0; 10856 10856 - 0x1f; 10857 10857 - 0xc0; 10858 10858 - 0x1e; 10859 10859 - 0x00; 10860 10860 - 0xa2; 10861 10861 - 0x00; 10862 10862 - 0x9e; 10863 10863 - 0x00; 10864 10864 - 0x67; 10865 10865 - 0x00; 10866 10866 - 0x40; 10867 10867 - 0x00; 10868 10868 - 0x33; 10869 10869 - 0x00; 10870 10870 - 0x32; 10871 10871 - 0x00; 10872 10872 - 0x9a; 10873 10873 - 0x00; 10874 10874 - 0x99; 10875 10875 - 0x00; 10876 10876 - 0x45; 10877 10877 - 0x00; 10878 10878 - 0x44; 10879 10879 - 0xc0; 10880 10880 - 0x31; 10881 10881 - 0xc0; 10882 10882 - 0x2d; 10883 10883 - 0xc0; 10884 10884 - 0x29; 10885 10885 - 0xc0; 10886 10886 - 0x25; 10887 10887 - 0xc0; 10888 10888 - 0x0e; 10889 10889 - 0xc0; 10890 10890 - 0x04; 10891 10891 - 0x00; 10892 10892 - 0x9c; 10893 10893 - 0x00; 10894 10894 - 0x3c; 10895 10895 - 0x00; 10896 10896 - 0x2f; 10897 10897 - 0x00; 10898 10898 - 0x96; 10899 10899 - 0x00; 10900 10900 - 0x41; 10901 10901 - 0x00; 10902 10902 - 0x07; 10903 10903 - 0xc0; 10904 10904 - 0x11; 10905 10905 - 0xc0; 10906 10906 - 0x07; 10907 10907 - 0xc0; 10908 10908 - 0x0c; 10909 10909 - 0xc0; 10910 10910 - 0x02; 10911 10911 - 0x00; 10912 10912 - 0x05; 10913 10913 - 0x00; 10914 10914 - 0x04; 10915 10915 - 0x00; 10916 10916 - 0x15; 10917 10917 - 0x00; 10918 10918 - 0x12; 10919 10919 - 0x00; 10920 10920 - 0x09; 10921 10921 - 0x00; 10922 10922 - 0x14; 10923 10923 - 0x00; 10924 10924 - 0x11; 10925 10925 - 0x00; 10926 10926 - 0x08; 10927 10927 - 0x00; 10928 10928 - 0x06; 10929 10929 - 0x00; 10930 10930 - 0x03; 10931 10931 - 0x00; 10932 10932 - 0xff; 10933 10933 - 0x01; 10934 10934 - 0x00; 10935 10935 - (* compression *) 10936 10936 - 0x00; 10937 10937 - 0xFD; 10938 10938 - (* extensions *) 10939 10939 - 0x00; 10940 10940 - 0x0a; 10941 10941 - 0x00; 10942 10942 - 0x08; 10943 10943 - (* ec curves *) 10944 10944 - 0x00; 10945 10945 - 0x06; 10946 10946 - 0x00; 10947 10947 - 0x19; 10948 10948 - 0x00; 10949 10949 - 0x18; 10950 10950 - 0x00; 10951 10951 - 0x17; 10952 10952 - (* 0x00; 0x23; 0x00; 0x00; *) 10953 10953 - 0x00; 10954 10954 - 0x0d; 10955 10955 - 0x00; 10956 10956 - 0x0c; 10957 10957 - (* signature algorithms *) 10958 10958 - 0x00; 10959 10959 - 0x0a; 10960 10960 - 0x06; 10961 10961 - 0x01; 10962 10962 - 0x05; 10963 10963 - 0x01; 10964 10964 - 0x04; 10965 10965 - 0x01; 10966 10966 - 0x03; 10967 10967 - 0x01; 10968 10968 - 0x02; 10969 10969 - 0x01; 10970 10970 - 0x00; 10971 10971 - 0x15; 10972 10972 - 0x00; 10973 10973 - 0xcb; 10974 10974 - (* padding *) 10975 10975 - 0x00; 10976 10976 - 0x00; 10977 10977 - 0x00; 10978 10978 - 0x00; 10979 10979 - 0x00; 10980 10980 - 0x00; 10981 10981 - 0x00; 10982 10982 - 0x00; 10983 10983 - 0x00; 10984 10984 - 0x00; 10985 10985 - 0x00; 10986 10986 - 0x00; 10987 10987 - 0x00; 10988 10988 - 0x00; 10989 10989 - 0x00; 10990 10990 - 0x00; 10991 10991 - 0x00; 10992 10992 - 0x00; 10993 10993 - 0x00; 10994 10994 - 0x00; 10995 10995 - 0x00; 10996 10996 - 0x00; 10997 10997 - 0x00; 10998 10998 - 0x00; 10999 10999 - 0x00; 11000 11000 - 0x00; 11001 11001 - 0x00; 11002 11002 - 0x00; 11003 11003 - 0x00; 11004 11004 - 0x00; 11005 11005 - 0x00; 11006 11006 - 0x00; 11007 11007 - 0x00; 11008 11008 - 0x00; 11009 11009 - 0x00; 11010 11010 - 0x00; 11011 11011 - 0x00; 11012 11012 - 0x00; 11013 11013 - 0x00; 11014 11014 - 0x00; 11015 11015 - 0x00; 11016 11016 - 0x00; 11017 11017 - 0x00; 11018 11018 - 0x00; 11019 11019 - 0x00; 11020 11020 - 0x00; 11021 11021 - 0x00; 11022 11022 - 0x00; 11023 11023 - 0x00; 11024 11024 - 0x00; 11025 11025 - 0x00; 11026 11026 - 0x00; 11027 11027 - 0x00; 11028 11028 - 0x00; 11029 11029 - 0x00; 11030 11030 - 0x00; 11031 11031 - 0x00; 11032 11032 - 0x00; 11033 11033 - 0x00; 11034 11034 - 0x00; 11035 11035 - 0x00; 11036 11036 - 0x00; 11037 11037 - 0x00; 11038 11038 - 0x00; 11039 11039 - 0x00; 11040 11040 - 0x00; 11041 11041 - 0x00; 11042 11042 - 0x00; 11043 11043 - 0x00; 11044 11044 - 0x00; 11045 11045 - 0x00; 11046 11046 - 0x00; 11047 11047 - 0x00; 11048 11048 - 0x00; 11049 11049 - 0x00; 11050 11050 - 0x00; 11051 11051 - 0x00; 11052 11052 - 0x00; 11053 11053 - 0x00; 11054 11054 - 0x00; 11055 11055 - 0x00; 11056 11056 - 0x00; 11057 11057 - 0x00; 11058 11058 - 0x00; 11059 11059 - 0x00; 11060 11060 - 0x00; 11061 11061 - 0x00; 11062 11062 - 0x00; 11063 11063 - 0x00; 11064 11064 - 0x00; 11065 11065 - 0x00; 11066 11066 - 0x00; 11067 11067 - 0x00; 11068 11068 - 0x00; 11069 11069 - 0x00; 11070 11070 - 0x00; 11071 11071 - 0x00; 11072 11072 - 0x00; 11073 11073 - 0x00; 11074 11074 - 0x00; 11075 11075 - 0x00; 11076 11076 - 0x00; 11077 11077 - 0x00; 11078 11078 - 0x00; 11079 11079 - 0x00; 11080 11080 - 0x00; 11081 11081 - 0x00; 11082 11082 - 0x00; 11083 11083 - 0x00; 11084 11084 - 0x00; 11085 11085 - 0x00; 11086 11086 - 0x00; 11087 11087 - 0x00; 11088 11088 - 0x00; 11089 11089 - 0x00; 11090 11090 - 0x00; 11091 11091 - 0x00; 11092 11092 - 0x00; 11093 11093 - 0x00; 11094 11094 - 0x00; 11095 11095 - 0x00; 11096 11096 - 0x00; 11097 11097 - 0x00; 11098 11098 - 0x00; 11099 11099 - 0x00; 11100 11100 - 0x00; 11101 11101 - 0x00; 11102 11102 - 0x00; 11103 11103 - 0x00; 11104 11104 - 0x00; 11105 11105 - 0x00; 11106 11106 - 0x00; 11107 11107 - 0x00; 11108 11108 - 0x00; 11109 11109 - 0x00; 11110 11110 - 0x00; 11111 11111 - 0x00; 11112 11112 - 0x00; 11113 11113 - 0x00; 11114 11114 - 0x00; 11115 11115 - 0x00; 11116 11116 - 0x00; 11117 11117 - 0x00; 11118 11118 - 0x00; 11119 11119 - 0x00; 11120 11120 - 0x00; 11121 11121 - 0x00; 11122 11122 - 0x00; 11123 11123 - 0x00; 11124 11124 - 0x00; 11125 11125 - 0x00; 11126 11126 - 0x00; 11127 11127 - 0x00; 11128 11128 - 0x00; 11129 11129 - 0x00; 11130 11130 - 0x00; 11131 11131 - 0x00; 11132 11132 - 0x00; 11133 11133 - 0x00; 11134 11134 - 0x00; 11135 11135 - 0x00; 11136 11136 - 0x00; 11137 11137 - 0x00; 11138 11138 - 0x00; 11139 11139 - 0x00; 11140 11140 - 0x00; 11141 11141 - 0x00; 11142 11142 - 0x00; 11143 11143 - 0x00; 11144 11144 - 0x00; 11145 11145 - 0x00; 11146 11146 - 0x00; 11147 11147 - 0x00; 11148 11148 - 0x00; 11149 11149 - 0x00; 11150 11150 - 0x00; 11151 11151 - 0x00; 11152 11152 - 0x00; 11153 11153 - 0x00; 11154 11154 - 0x00; 11155 11155 - 0x00; 11156 11156 - 0x00; 11157 11157 - 0x00; 11158 11158 - 0x00; 11159 11159 - 0x00; 11160 11160 - 0x00; 11161 11161 - 0x00; 11162 11162 - 0x00; 11163 11163 - 0x00; 11164 11164 - 0x00; 11165 11165 - 0x00; 11166 11166 - 0x00; 11167 11167 - 0x00; 11168 11168 - 0x00; 11169 11169 - 0x00; 11170 11170 - 0x00; 11171 11171 - 0x00; 11172 11172 - 0x00; 11173 11173 - 0x00; 11174 11174 - 0x00; 11175 11175 - 0x00; 11176 11176 - 0x00; 11177 11177 - 0x00; 11178 11178 - 0x00; 11179 11179 - 0x10; 11180 11180 - 0x00; 11181 11181 - 0x0e; 11182 11182 - 0x00; 11183 11183 - 0x0c; 11184 11184 - (* ALPN *) 11185 11185 - 0x02; 11186 11186 - 0x68; 11187 11187 - 0x32; 11188 11188 - 0x08; 11189 11189 - 0x68; 11190 11190 - 0x74; 11191 11191 - 0x74; 11192 11192 - 0x70; 11193 11193 - 0x2f; 11194 11194 - 0x31; 11195 11195 - 0x2e; 11196 11196 - 0x31; 11197 11197 - ], 11198 11198 - { 11199 11199 - ch with 11200 11200 - client_version = `TLS_1_2; 11201 11201 - client_random = 11202 11202 - list_to_cstruct 11203 11203 - [ 11204 11204 - 0xb7; 11205 11205 - 0x36; 11206 11206 - 0xeb; 11207 11207 - 0x21; 11208 11208 - 0xec; 11209 11209 - 0x81; 11210 11210 - 0x4d; 11211 11211 - 0x01; 11212 11212 - 0xfc; 11213 11213 - 0xf4; 11214 11214 - 0xe2; 11215 11215 - 0x06; 11216 11216 - 0x9a; 11217 11217 - 0x34; 11218 11218 - 0xb7; 11219 11219 - 0x21; 11220 11220 - 0xe1; 11221 11221 - 0x23; 11222 11222 - 0x6f; 11223 11223 - 0xbe; 11224 11224 - 0x50; 11225 11225 - 0xbf; 11226 11226 - 0xfe; 11227 11227 - 0x33; 11228 11228 - 0x9b; 11229 11229 - 0xc9; 11230 11230 - 0x5b; 11231 11231 - 0x20; 11232 11232 - 0x0e; 11233 11233 - 0x15; 11234 11234 - 0x02; 11235 11235 - 0x27; 11236 11236 - ]; 11237 11237 - ciphersuites = 11238 11238 - Packet. 11239 11239 - [ 11240 11240 - TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384; 11241 11241 - TLS_ECDHE_ECDSA_WITH_AES_256_GCM_SHA384; 11242 11242 - TLS_ECDHE_RSA_WITH_AES_256_CBC_SHA384; 11243 11243 - TLS_ECDHE_ECDSA_WITH_AES_256_CBC_SHA384; 11244 11244 - TLS_ECDHE_RSA_WITH_AES_256_CBC_SHA; 11245 11245 - TLS_ECDHE_ECDSA_WITH_AES_256_CBC_SHA; 11246 11246 - TLS_DHE_RSA_WITH_AES_256_GCM_SHA384; 11247 11247 - TLS_DHE_RSA_WITH_AES_256_CBC_SHA256; 11248 11248 - TLS_DHE_RSA_WITH_AES_256_CBC_SHA; 11249 11249 - TLS_RSA_WITH_AES_256_GCM_SHA384; 11250 11250 - TLS_RSA_WITH_AES_256_CBC_SHA256; 11251 11251 - TLS_RSA_WITH_AES_256_CBC_SHA; 11252 11252 - TLS_ECDHE_RSA_WITH_3DES_EDE_CBC_SHA; 11253 11253 - TLS_ECDHE_ECDSA_WITH_3DES_EDE_CBC_SHA; 11254 11254 - TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 11255 11255 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; 11256 11256 - TLS_ECDHE_RSA_WITH_AES_128_GCM_SHA256; 11257 11257 - TLS_ECDHE_ECDSA_WITH_AES_128_GCM_SHA256; 11258 11258 - TLS_ECDHE_RSA_WITH_AES_128_CBC_SHA256; 11259 11259 - TLS_ECDHE_ECDSA_WITH_AES_128_CBC_SHA256; 11260 11260 - TLS_ECDHE_RSA_WITH_AES_128_CBC_SHA; 11261 11261 - TLS_ECDHE_ECDSA_WITH_AES_128_CBC_SHA; 11262 11262 - TLS_DHE_RSA_WITH_AES_128_GCM_SHA256; 11263 11263 - TLS_DHE_RSA_WITH_AES_128_CBC_SHA256; 11264 11264 - TLS_DHE_RSA_WITH_AES_128_CBC_SHA; 11265 11265 - TLS_RSA_WITH_AES_128_GCM_SHA256; 11266 11266 - TLS_RSA_WITH_AES_128_CBC_SHA256; 11267 11267 - TLS_RSA_WITH_AES_128_CBC_SHA; 11268 11268 - TLS_EMPTY_RENEGOTIATION_INFO_SCSV; 11269 11269 - ]; 11270 11270 - extensions = 11271 11271 - [ 11272 11272 - `SupportedGroups Packet.[ SECP521R1; SECP384R1; SECP256R1 ]; 11273 11273 - `SignatureAlgorithms 11274 11274 - [ 11275 11275 - `RSA_PKCS1_SHA512; 11276 11276 - `RSA_PKCS1_SHA384; 11277 11277 - `RSA_PKCS1_SHA256; 11278 11278 - `RSA_PKCS1_SHA224; 11279 11279 - `RSA_PKCS1_SHA1; 11280 11280 - ]; 11281 11281 - `Padding 203; 11282 11282 - `ALPN [ "h2"; "http/1.1" ]; 11283 11283 - ]; 11284 11284 - } ); 11285 11285 - ( [ 11286 11286 - 0x01; 11287 11287 - (* client hello *) 11288 11288 - 0x00; 11289 11289 - 0x00; 11290 11290 - 0x74; 11291 11291 - (* length *) 11292 11292 - 0x03; 11293 11293 - 0x04; 11294 11294 - (* version *) 11295 11295 - 0xf1; 11296 11296 - 0xb2; 11297 11297 - 0x50; 11298 11298 - 0x16; 11299 11299 - 0x4b; 11300 11300 - 0x77; 11301 11301 - 0x50; 11302 11302 - 0xb3; 11303 11303 - 0xdc; 11304 11304 - 0xcb; 11305 11305 - 0x1c; 11306 11306 - 0x6a; 11307 11307 - 0xae; 11308 11308 - 0x1a; 11309 11309 - 0x94; 11310 11310 - 0x87; 11311 11311 - 0xc4; 11312 11312 - 0x17; 11313 11313 - 0xbb; 11314 11314 - 0xa4; 11315 11315 - 0xf7; 11316 11316 - 0x92; 11317 11317 - 0xf8; 11318 11318 - 0x16; 11319 11319 - 0x56; 11320 11320 - 0x12; 11321 11321 - 0x03; 11322 11322 - 0x38; 11323 11323 - 0x1e; 11324 11324 - 0xe5; 11325 11325 - 0xc1; 11326 11326 - 0xae; 11327 11327 - (* client random *) 11328 11328 - 0x00; 11329 11329 - (* session id *) 11330 11330 - 0x00; 11331 11331 - 0x10; 11332 11332 - 0x00; 11333 11333 - 0x35; 11334 11334 - 0x00; 11335 11335 - 0x39; 11336 11336 - 0x00; 11337 11337 - 0x2f; 11338 11338 - 0x00; 11339 11339 - 0x33; 11340 11340 - 0x00; 11341 11341 - 0x16; 11342 11342 - 0x00; 11343 11343 - 0x0a; 11344 11344 - 0x00; 11345 11345 - 0x05; 11346 11346 - 0x00; 11347 11347 - 0x04; 11348 11348 - (* ciphersuites *) 11349 11349 - 0x01; 11350 11350 - 0x00; 11351 11351 - (* compression *) 11352 11352 - 0x00; 11353 11353 - 0x3b; 11354 11354 - (* extensions *) 11355 11355 - 0xff; 11356 11356 - 0x01; 11357 11357 - 0x00; 11358 11358 - 0x01; 11359 11359 - 0x00; 11360 11360 - (* secure reneg *) 11361 11361 - 0x00; 11362 11362 - 0x00; 11363 11363 - 0x00; 11364 11364 - 0x10; 11365 11365 - 0x00; 11366 11366 - 0x0e; 11367 11367 - 0x00; 11368 11368 - 0x00; 11369 11369 - 0x0b; 11370 11370 - 0x65; 11371 11371 - 0x78; 11372 11372 - 0x61; 11373 11373 - 0x6d; 11374 11374 - 0x70; 11375 11375 - 0x6c; 11376 11376 - 0x65; 11377 11377 - 0x2e; 11378 11378 - 0x63; 11379 11379 - 0x6f; 11380 11380 - 0x6d; 11381 11381 - (* SNI example.com *) 11382 11382 - 0x00; 11383 11383 - 0x0d; 11384 11384 - 0x00; 11385 11385 - 0x0c; 11386 11386 - 0x00; 11387 11387 - 0x0a; 11388 11388 - 0x06; 11389 11389 - 0x01; 11390 11390 - 0x05; 11391 11391 - 0x01; 11392 11392 - 0x04; 11393 11393 - 0x01; 11394 11394 - 0x02; 11395 11395 - 0x01; 11396 11396 - 0x01; 11397 11397 - 0x01; 11398 11398 - (* SignatureAlgorithms *) 11399 11399 - 0x00; 11400 11400 - 0x10; 11401 11401 - 0x00; 11402 11402 - 0x0e; 11403 11403 - 0x00; 11404 11404 - 0x0c; 11405 11405 - (* ALPN *) 11406 11406 - 0x02; 11407 11407 - 0x68; 11408 11408 - 0x32; 11409 11409 - 0x08; 11410 11410 - 0x68; 11411 11411 - 0x74; 11412 11412 - 0x74; 11413 11413 - 0x70; 11414 11414 - 0x2f; 11415 11415 - 0x31; 11416 11416 - 0x2e; 11417 11417 - 0x31; 11418 11418 - ], 11419 11419 - { 11420 11420 - ch with 11421 11421 - client_version = `TLS_1_3; 11422 11422 - client_random = 11423 11423 - list_to_cstruct 11424 11424 - [ 11425 11425 - 0xf1; 11426 11426 - 0xb2; 11427 11427 - 0x50; 11428 11428 - 0x16; 11429 11429 - 0x4b; 11430 11430 - 0x77; 11431 11431 - 0x50; 11432 11432 - 0xb3; 11433 11433 - 0xdc; 11434 11434 - 0xcb; 11435 11435 - 0x1c; 11436 11436 - 0x6a; 11437 11437 - 0xae; 11438 11438 - 0x1a; 11439 11439 - 0x94; 11440 11440 - 0x87; 11441 11441 - 0xc4; 11442 11442 - 0x17; 11443 11443 - 0xbb; 11444 11444 - 0xa4; 11445 11445 - 0xf7; 11446 11446 - 0x92; 11447 11447 - 0xf8; 11448 11448 - 0x16; 11449 11449 - 0x56; 11450 11450 - 0x12; 11451 11451 - 0x03; 11452 11452 - 0x38; 11453 11453 - 0x1e; 11454 11454 - 0xe5; 11455 11455 - 0xc1; 11456 11456 - 0xae; 11457 11457 - ]; 11458 11458 - ciphersuites = 11459 11459 - Packet. 11460 11460 - [ 11461 11461 - TLS_RSA_WITH_AES_256_CBC_SHA; 11462 11462 - TLS_DHE_RSA_WITH_AES_256_CBC_SHA; 11463 11463 - TLS_RSA_WITH_AES_128_CBC_SHA; 11464 11464 - TLS_DHE_RSA_WITH_AES_128_CBC_SHA; 11465 11465 - TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 11466 11466 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; 11467 11467 - ]; 11468 11468 - extensions = 11469 11469 - [ 11470 11470 - `SecureRenegotiation ""; 11471 11471 - make_hostname_ext "example.com"; 11472 11472 - `SignatureAlgorithms 11473 11473 - [ 11474 11474 - `RSA_PKCS1_SHA512; 11475 11475 - `RSA_PKCS1_SHA384; 11476 11476 - `RSA_PKCS1_SHA256; 11477 11477 - `RSA_PKCS1_SHA1; 11478 11478 - `RSA_PKCS1_MD5; 11479 11479 - ]; 11480 11480 - `ALPN [ "h2"; "http/1.1" ]; 11481 11481 - ]; 11482 11482 - } ); 11483 11483 - ]) 11484 11484 - 11485 11485 - let cmp_client_hellos ch ch' = 11486 11486 - let open Core in 11487 11487 - assert_equal ch.client_version ch'.client_version; 11488 11488 - assert_cs_eq ch.client_random ch'.client_random; 11489 11489 - assert_sessionid_equal ch.sessionid ch'.sessionid; 11490 11490 - assert_lists_eq assert_equal ch.ciphersuites ch'.ciphersuites; 11491 11491 - assert_lists_eq assert_client_extension_equal ch.extensions ch'.extensions 11492 11492 - 11493 11493 - let good_client_hellos_parser (xs, res) _ = 11494 11494 - let buf = list_to_cstruct xs in 11495 11495 - match Reader.parse_handshake buf with 11496 11496 - | Ok (Core.ClientHello ch) -> cmp_client_hellos ch res 11497 11497 - | _ -> assert_failure "handshake client hello parser failed" 11498 11498 - 11499 11499 - let good_client_hellos_tests = 11500 11500 - List.mapi 11501 11501 - (fun i f -> 11502 11502 - "Parse good client hello " ^ string_of_int i 11503 11503 - >:: good_client_hellos_parser f) 11504 11504 - good_client_hellos 11505 11505 - 11506 11506 - let bad_client_hellos = 11507 11507 - (* I rolled the dice 16 times *) 11508 11508 - let rnd = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] in 11509 11509 - let rand = rnd @ rnd in 11510 11510 - [ 11511 11511 - (* versions *) 11512 11512 - [ 1; 0; 0; 38; 4; 3 ] @ rand 11513 11513 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ]; 11514 11514 - (* invalid length *) 11515 11515 - [ 1; 0; 0; 39; 3; 3 ] @ rand 11516 11516 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ]; 11517 11517 - (* should be broken as well due to missing compression_algos *) 11518 11518 - [ 1; 0; 0; 38; 3; 3 ] @ rand 11519 11519 - @ [ (* session id *) 1; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ]; 11520 11520 - (* ciphersuites *) 11521 11521 - [ 1; 0; 0; 40; 3; 3 ] @ rand 11522 11522 - @ [ (* session id *) 0; (* cipher *) 0; 1; 0; 0; (* comp *) 0 (* exts *) ]; 11523 11523 - [ 1; 0; 0; 40; 3; 3 ] @ rand 11524 11524 - @ [ (* session id *) 0; (* cipher *) 0; 3; 0; 0; (* comp *) 0 (* exts *) ]; 11525 11525 - [ 1; 0; 0; 40; 3; 3 ] @ rand 11526 11526 - @ [ (* session id *) 0; (* cipher *) 1; 3; 0; 0; (* comp *) 0 (* exts *) ]; 11527 11527 - (* extensions *) 11528 11528 - (* empty *) 11529 11529 - [ 1; 0; 0; 40; 3; 3 ] @ rand 11530 11530 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0; (* exts *) 0; 1 ]; 11531 11531 - (* some hostname *) 11532 11532 - [ 1; 0; 0; 52; 3; 3 ] @ rand 11533 11533 - @ [ 11534 11534 - (* session id *) 11535 11535 - 0; 11536 11536 - (* cipher *) 11537 11537 - 0; 11538 11538 - 0; 11539 11539 - (* comp *) 11540 11540 - 0; 11541 11541 - (* exts *) 11542 11542 - 0; 11543 11543 - 12; 11544 11544 - 0; 11545 11545 - 0; 11546 11546 - 0; 11547 11547 - 8; 11548 11548 - 0; 11549 11549 - 6; 11550 11550 - 0; 11551 11551 - 0; 11552 11552 - 4; 11553 11553 - 102; 11554 11554 - 111; 11555 11555 - 111; 11556 11556 - ]; 11557 11557 - [ 1; 0; 0; 52; 3; 3 ] @ rand 11558 11558 - @ [ 11559 11559 - (* session id *) 11560 11560 - 0; 11561 11561 - (* cipher *) 11562 11562 - 0; 11563 11563 - 0; 11564 11564 - (* comp *) 11565 11565 - 0; 11566 11566 - (* exts *) 11567 11567 - 0; 11568 11568 - 12; 11569 11569 - 0; 11570 11570 - 0; 11571 11571 - 0; 11572 11572 - 8; 11573 11573 - 0; 11574 11574 - 6; 11575 11575 - 0; 11576 11576 - 0; 11577 11577 - 4; 11578 11578 - 102; 11579 11579 - 111; 11580 11580 - 111; 11581 11581 - 111; 11582 11582 - ]; 11583 11583 - [ 1; 0; 0; 52; 3; 3 ] @ rand 11584 11584 - @ [ 11585 11585 - (* session id *) 11586 11586 - 0; 11587 11587 - (* cipher *) 11588 11588 - 0; 11589 11589 - 0; 11590 11590 - (* comp *) 11591 11591 - 0; 11592 11592 - (* exts *) 11593 11593 - 0; 11594 11594 - 12; 11595 11595 - 0; 11596 11596 - 0; 11597 11597 - 0; 11598 11598 - 8; 11599 11599 - 0; 11600 11600 - 7; 11601 11601 - 0; 11602 11602 - 0; 11603 11603 - 4; 11604 11604 - 102; 11605 11605 - 111; 11606 11606 - 111; 11607 11607 - 111; 11608 11608 - ]; 11609 11609 - [ 1; 0; 0; 52; 3; 3 ] @ rand 11610 11610 - @ [ 11611 11611 - (* session id *) 11612 11612 - 0; 11613 11613 - (* cipher *) 11614 11614 - 0; 11615 11615 - 0; 11616 11616 - (* comp *) 11617 11617 - 0; 11618 11618 - (* exts *) 11619 11619 - 0; 11620 11620 - 12; 11621 11621 - 0; 11622 11622 - 0; 11623 11623 - 0; 11624 11624 - 9; 11625 11625 - 0; 11626 11626 - 7; 11627 11627 - 0; 11628 11628 - 0; 11629 11629 - 4; 11630 11630 - 102; 11631 11631 - 111; 11632 11632 - 111; 11633 11633 - 111; 11634 11634 - ]; 11635 11635 - [ 1; 0; 0; 52; 3; 3 ] @ rand 11636 11636 - @ [ 11637 11637 - (* session id *) 11638 11638 - 0; 11639 11639 - (* cipher *) 11640 11640 - 0; 11641 11641 - 0; 11642 11642 - (* comp *) 11643 11643 - 0; 11644 11644 - (* exts *) 11645 11645 - 0; 11646 11646 - 13; 11647 11647 - 0; 11648 11648 - 0; 11649 11649 - 0; 11650 11650 - 9; 11651 11651 - 0; 11652 11652 - 7; 11653 11653 - 0; 11654 11654 - 0; 11655 11655 - 4; 11656 11656 - 102; 11657 11657 - 111; 11658 11658 - 111; 11659 11659 - 111; 11660 11660 - ]; 11661 11661 - [ 1; 0; 0; 52; 3; 3 ] @ rand 11662 11662 - @ [ 11663 11663 - (* session id *) 11664 11664 - 0; 11665 11665 - (* cipher *) 11666 11666 - 0; 11667 11667 - 0; 11668 11668 - (* comp *) 11669 11669 - 0; 11670 11670 - (* exts *) 11671 11671 - 0; 11672 11672 - 12; 11673 11673 - 0; 11674 11674 - 0; 11675 11675 - 0; 11676 11676 - 8; 11677 11677 - 0; 11678 11678 - 5; 11679 11679 - 0; 11680 11680 - 0; 11681 11681 - 2; 11682 11682 - 102; 11683 11683 - 111; 11684 11684 - 111; 11685 11685 - ]; 11686 11686 - (* multiple hostnames - legal in RFC, not accepted by any implementation *) 11687 11687 - [ 1; 0; 0; 58; 3; 3 ] @ rand 11688 11688 - @ [ 11689 11689 - (* session id *) 11690 11690 - 0; 11691 11691 - (* cipher *) 11692 11692 - 0; 11693 11693 - 0; 11694 11694 - (* comp *) 11695 11695 - 0; 11696 11696 - (* exts *) 11697 11697 - 0; 11698 11698 - 18; 11699 11699 - 0; 11700 11700 - 0; 11701 11701 - 0; 11702 11702 - 14; 11703 11703 - 0; 11704 11704 - 12; 11705 11705 - 0; 11706 11706 - 0; 11707 11707 - 3; 11708 11708 - 102; 11709 11709 - 111; 11710 11710 - 111; 11711 11711 - 0; 11712 11712 - 0; 11713 11713 - 3; 11714 11714 - 98; 11715 11715 - 97; 11716 11716 - 114; 11717 11717 - ]; 11718 11718 - (* empty SupportedGroups *) 11719 11719 - [ 1; 0; 0; 46; 3; 3 ] @ rand 11720 11720 - @ [ 11721 11721 - (* session id *) 11722 11722 - 0; 11723 11723 - (* cipher *) 11724 11724 - 0; 11725 11725 - 0; 11726 11726 - (* comp *) 11727 11727 - 0; 11728 11728 - (* exts *) 11729 11729 - 0; 11730 11730 - 6; 11731 11731 - 0; 11732 11732 - 0xA; 11733 11733 - 0; 11734 11734 - 1; 11735 11735 - 0; 11736 11736 - 0; 11737 11737 - ]; 11738 11738 - [ 1; 0; 0; 46; 3; 3 ] @ rand 11739 11739 - @ [ 11740 11740 - (* session id *) 11741 11741 - 0; 11742 11742 - (* cipher *) 11743 11743 - 0; 11744 11744 - 0; 11745 11745 - (* comp *) 11746 11746 - 0; 11747 11747 - (* exts *) 11748 11748 - 0; 11749 11749 - 5; 11750 11750 - 0; 11751 11751 - 0xA; 11752 11752 - 0; 11753 11753 - 2; 11754 11754 - 0; 11755 11755 - 0; 11756 11756 - ]; 11757 11757 - [ 1; 0; 0; 46; 3; 3 ] @ rand 11758 11758 - @ [ 11759 11759 - (* session id *) 11760 11760 - 0; 11761 11761 - (* cipher *) 11762 11762 - 0; 11763 11763 - 0; 11764 11764 - (* comp *) 11765 11765 - 0; 11766 11766 - (* exts *) 11767 11767 - 0; 11768 11768 - 6; 11769 11769 - 0; 11770 11770 - 0xA; 11771 11771 - 0; 11772 11772 - 2; 11773 11773 - 0; 11774 11774 - 1; 11775 11775 - ]; 11776 11776 - [ 1; 0; 0; 47; 3; 3 ] @ rand 11777 11777 - @ [ 11778 11778 - (* session id *) 11779 11779 - 0; 11780 11780 - (* cipher *) 11781 11781 - 0; 11782 11782 - 0; 11783 11783 - (* comp *) 11784 11784 - 0; 11785 11785 - (* exts *) 11786 11786 - 0; 11787 11787 - 7; 11788 11788 - 0; 11789 11789 - 0xA; 11790 11790 - 0; 11791 11791 - 3; 11792 11792 - 0; 11793 11793 - 1; 11794 11794 - 0; 11795 11795 - ]; 11796 11796 - [ 1; 0; 0; 50; 3; 3 ] @ rand 11797 11797 - @ [ 11798 11798 - (* session id *) 11799 11799 - 0; 11800 11800 - (* cipher *) 11801 11801 - 0; 11802 11802 - 0; 11803 11803 - (* comp *) 11804 11804 - 0; 11805 11805 - (* exts *) 11806 11806 - 0; 11807 11807 - 10; 11808 11808 - 0; 11809 11809 - 0xA; 11810 11810 - 0; 11811 11811 - 6; 11812 11812 - 0; 11813 11813 - 2; 11814 11814 - 0; 11815 11815 - 25; 11816 11816 - 0; 11817 11817 - 20; 11818 11818 - ]; 11819 11819 - (* secure renegotiation *) 11820 11820 - [ 1; 0; 0; 47; 3; 3 ] @ rand 11821 11821 - @ [ 11822 11822 - (* session id *) 11823 11823 - 0; 11824 11824 - (* cipher *) 11825 11825 - 0; 11826 11826 - 0; 11827 11827 - (* comp *) 11828 11828 - 0; 11829 11829 - (* exts *) 11830 11830 - 0; 11831 11831 - 7; 11832 11832 - 0xFF; 11833 11833 - 1; 11834 11834 - 0; 11835 11835 - 5; 11836 11836 - 2; 11837 11837 - 1; 11838 11838 - 2; 11839 11839 - ]; 11840 11840 - [ 1; 0; 0; 49; 3; 3 ] @ rand 11841 11841 - @ [ 11842 11842 - (* session id *) 11843 11843 - 0; 11844 11844 - (* cipher *) 11845 11845 - 0; 11846 11846 - 0; 11847 11847 - (* comp *) 11848 11848 - 0; 11849 11849 - (* exts *) 11850 11850 - 0; 11851 11851 - 7; 11852 11852 - 0xFF; 11853 11853 - 1; 11854 11854 - 0; 11855 11855 - 5; 11856 11856 - 2; 11857 11857 - 1; 11858 11858 - 2; 11859 11859 - 3; 11860 11860 - 4; 11861 11861 - ]; 11862 11862 - [ 1; 0; 0; 49; 3; 3 ] @ rand 11863 11863 - @ [ 11864 11864 - (* session id *) 11865 11865 - 0; 11866 11866 - (* cipher *) 11867 11867 - 0; 11868 11868 - 0; 11869 11869 - (* comp *) 11870 11870 - 0; 11871 11871 - (* exts *) 11872 11872 - 0; 11873 11873 - 9; 11874 11874 - 0xFF; 11875 11875 - 1; 11876 11876 - 0; 11877 11877 - 3; 11878 11878 - 2; 11879 11879 - 1; 11880 11880 - 2; 11881 11881 - 3; 11882 11882 - 4; 11883 11883 - ]; 11884 11884 - [ 1; 0; 0; 49; 3; 3 ] @ rand 11885 11885 - @ [ 11886 11886 - (* session id *) 11887 11887 - 0; 11888 11888 - (* cipher *) 11889 11889 - 0; 11890 11890 - 0; 11891 11891 - (* comp *) 11892 11892 - 0; 11893 11893 - (* exts *) 11894 11894 - 0; 11895 11895 - 9; 11896 11896 - 0xFF; 11897 11897 - 1; 11898 11898 - 0; 11899 11899 - 5; 11900 11900 - 10; 11901 11901 - 1; 11902 11902 - 2; 11903 11903 - 3; 11904 11904 - 4; 11905 11905 - ]; 11906 11906 - [ 1; 0; 0; 49; 3; 3 ] @ rand 11907 11907 - @ [ 11908 11908 - (* session id *) 11909 11909 - 0; 11910 11910 - (* cipher *) 11911 11911 - 0; 11912 11912 - 0; 11913 11913 - (* comp *) 11914 11914 - 0; 11915 11915 - (* exts *) 11916 11916 - 0; 11917 11917 - 9; 11918 11918 - 0xFF; 11919 11919 - 1; 11920 11920 - 0; 11921 11921 - 5; 11922 11922 - 2; 11923 11923 - 1; 11924 11924 - 2; 11925 11925 - 3; 11926 11926 - 4; 11927 11927 - ]; 11928 11928 - (* max fragment length *) 11929 11929 - [ 1; 0; 0; 46; 3; 3 ] @ rand 11930 11930 - @ [ 11931 11931 - (* session id *) 11932 11932 - 0; 11933 11933 - (* cipher *) 11934 11934 - 0; 11935 11935 - 0; 11936 11936 - (* comp *) 11937 11937 - 0; 11938 11938 - (* exts *) 11939 11939 - 0; 11940 11940 - 6; 11941 11941 - 0; 11942 11942 - 1; 11943 11943 - 0; 11944 11944 - 2; 11945 11945 - 3; 11946 11946 - 4; 11947 11947 - ]; 11948 11948 - [ 1; 0; 0; 44; 3; 3 ] @ rand 11949 11949 - @ [ 11950 11950 - (* session id *) 11951 11951 - 0; 11952 11952 - (* cipher *) 11953 11953 - 0; 11954 11954 - 0; 11955 11955 - (* comp *) 11956 11956 - 0; 11957 11957 - (* exts *) 11958 11958 - 0; 11959 11959 - 4; 11960 11960 - 0; 11961 11961 - 1; 11962 11962 - 0; 11963 11963 - 0; 11964 11964 - ]; 11965 11965 - [ 1; 0; 0; 45; 3; 3 ] @ rand 11966 11966 - @ [ 11967 11967 - (* session id *) 11968 11968 - 0; 11969 11969 - (* cipher *) 11970 11970 - 0; 11971 11971 - 0; 11972 11972 - (* comp *) 11973 11973 - 0; 11974 11974 - (* exts *) 11975 11975 - 0; 11976 11976 - 5; 11977 11977 - 0; 11978 11978 - 1; 11979 11979 - 0; 11980 11980 - 1; 11981 11981 - 42; 11982 11982 - ]; 11983 11983 - (* Padding *) 11984 11984 - [ 1; 0; 0; 47; 3; 3 ] @ rand 11985 11985 - @ [ 11986 11986 - (* session id *) 11987 11987 - 0; 11988 11988 - (* cipher *) 11989 11989 - 0; 11990 11990 - 0; 11991 11991 - (* comp *) 11992 11992 - 0; 11993 11993 - (* exts *) 11994 11994 - 0; 11995 11995 - 7; 11996 11996 - 0; 11997 11997 - 21; 11998 11998 - 0; 11999 11999 - 3; 12000 12000 - 1; 12001 12001 - 2; 12002 12002 - 3; 12003 12003 - ]; 12004 12004 - [ 1; 0; 0; 47; 3; 3 ] @ rand 12005 12005 - @ [ 12006 12006 - (* session id *) 12007 12007 - 0; 12008 12008 - (* cipher *) 12009 12009 - 0; 12010 12010 - 0; 12011 12011 - (* comp *) 12012 12012 - 0; 12013 12013 - (* exts *) 12014 12014 - 0; 12015 12015 - 7; 12016 12016 - 0; 12017 12017 - 21; 12018 12018 - 0; 12019 12019 - 5; 12020 12020 - 0; 12021 12021 - 0; 12022 12022 - 0; 12023 12023 - ]; 12024 12024 - [ 1; 0; 0; 47; 3; 3 ] @ rand 12025 12025 - @ [ 12026 12026 - (* session id *) 12027 12027 - 0; 12028 12028 - (* cipher *) 12029 12029 - 0; 12030 12030 - 0; 12031 12031 - (* comp *) 12032 12032 - 0; 12033 12033 - (* exts *) 12034 12034 - 0; 12035 12035 - 9; 12036 12036 - 0; 12037 12037 - 21; 12038 12038 - 0; 12039 12039 - 5; 12040 12040 - 0; 12041 12041 - 0; 12042 12042 - 0; 12043 12043 - ]; 12044 12044 - [ 1; 0; 0; 49; 3; 3 ] @ rand 12045 12045 - @ [ 12046 12046 - (* session id *) 12047 12047 - 0; 12048 12048 - (* cipher *) 12049 12049 - 0; 12050 12050 - 0; 12051 12051 - (* comp *) 12052 12052 - 0; 12053 12053 - (* exts *) 12054 12054 - 0; 12055 12055 - 9; 12056 12056 - 0; 12057 12057 - 21; 12058 12058 - 0; 12059 12059 - 5; 12060 12060 - 0; 12061 12061 - 0; 12062 12062 - 0; 12063 12063 - ]; 12064 12064 - [ 1; 0; 0; 46; 3; 3 ] @ rand 12065 12065 - @ [ 12066 12066 - (* session id *) 12067 12067 - 0; 12068 12068 - (* cipher *) 12069 12069 - 0; 12070 12070 - 0; 12071 12071 - (* comp *) 12072 12072 - 0; 12073 12073 - (* exts *) 12074 12074 - 0; 12075 12075 - 7; 12076 12076 - 0; 12077 12077 - 21; 12078 12078 - 0; 12079 12079 - 3; 12080 12080 - 0; 12081 12081 - 0; 12082 12082 - 0; 12083 12083 - ]; 12084 12084 - [ 1; 0; 0; 47; 3; 3 ] @ rand 12085 12085 - @ [ 12086 12086 - (* session id *) 12087 12087 - 0; 12088 12088 - (* cipher *) 12089 12089 - 0; 12090 12090 - 0; 12091 12091 - (* comp *) 12092 12092 - 0; 12093 12093 - (* exts *) 12094 12094 - 0; 12095 12095 - 7; 12096 12096 - 0; 12097 12097 - 21; 12098 12098 - 0; 12099 12099 - 2; 12100 12100 - 0; 12101 12101 - 0; 12102 12102 - 0; 12103 12103 - ]; 12104 12104 - (* sig hash *) 12105 12105 - [ 1; 0; 0; 47; 3; 3 ] @ rand 12106 12106 - @ [ 12107 12107 - (* session id *) 12108 12108 - 0; 12109 12109 - (* cipher *) 12110 12110 - 0; 12111 12111 - 0; 12112 12112 - (* comp *) 12113 12113 - 0; 12114 12114 - (* exts *) 12115 12115 - 0; 12116 12116 - 7; 12117 12117 - 0; 12118 12118 - 13; 12119 12119 - 0; 12120 12120 - 3; 12121 12121 - 0; 12122 12122 - 1; 12123 12123 - 0; 12124 12124 - ]; 12125 12125 - [ 1; 0; 0; 47; 3; 3 ] @ rand 12126 12126 - @ [ 12127 12127 - (* session id *) 12128 12128 - 0; 12129 12129 - (* cipher *) 12130 12130 - 0; 12131 12131 - 0; 12132 12132 - (* comp *) 12133 12133 - 0; 12134 12134 - (* exts *) 12135 12135 - 0; 12136 12136 - 7; 12137 12137 - 0; 12138 12138 - 13; 12139 12139 - 0; 12140 12140 - 3; 12141 12141 - 0; 12142 12142 - 0; 12143 12143 - 0; 12144 12144 - ]; 12145 12145 - ] 12146 12146 - 12147 12147 - let bad_client_hello_parser xs _ = 12148 12148 - let buf = list_to_cstruct xs in 12149 12149 - match Reader.parse_handshake buf with 12150 12150 - | Ok _ -> assert_failure "bad client hello parser won" 12151 12151 - | Error _ -> () 12152 12152 - 12153 12153 - let bad_client_hello_tests = 12154 12154 - List.mapi 12155 12155 - (fun i f -> 12156 12156 - "Parse bad client hello " ^ string_of_int i >:: bad_client_hello_parser f) 12157 12157 - bad_client_hellos 12158 12158 - 12159 12159 - let good_server_hellos = 12160 12160 - (* I rolled the dice 16 times *) 12161 12161 - let rnd = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] in 12162 12162 - let rand = rnd @ rnd in 12163 12163 - let server_random = list_to_cstruct rand in 12164 12164 - Core.( 12165 12165 - let sh : server_hello = 12166 12166 - { 12167 12167 - server_version = `TLS_1_2; 12168 12168 - server_random; 12169 12169 - sessionid = None; 12170 12170 - ciphersuite = `RSA_WITH_AES_128_CCM; 12171 12171 - extensions = []; 12172 12172 - } 12173 12173 - in 12174 12174 - [ 12175 12175 - (* versions *) 12176 12176 - ( [ 2; 0; 0; 38; 3; 3 ] @ rand 12177 12177 - @ [ 12178 12178 - (* session id *) 0; (* cipher *) 0xc0; 0x9c; (* comp *) 0; (* exts *) 12179 12179 - ], 12180 12180 - sh ); 12181 12181 - ( [ 2; 0; 0; 38; 3; 1 ] @ rand 12182 12182 - @ [ 12183 12183 - (* session id *) 0; (* cipher *) 0xc0; 0x9c; (* comp *) 0; (* exts *) 12184 12184 - ], 12185 12185 - { sh with server_version = `TLS_1_0 } ); 12186 12186 - ( [ 2; 0; 0; 38; 3; 2 ] @ rand 12187 12187 - @ [ 12188 12188 - (* session id *) 0; (* cipher *) 0xc0; 0x9c; (* comp *) 0; (* exts *) 12189 12189 - ], 12190 12190 - { sh with server_version = `TLS_1_1 } ); 12191 12191 - (* session id *) 12192 12192 - ( [ 2; 0; 0; 41; 3; 3 ] @ rand 12193 12193 - @ [ 12194 12194 - (* session id *) 12195 12195 - 3; 12196 12196 - 1; 12197 12197 - 2; 12198 12198 - 3; 12199 12199 - (* cipher *) 12200 12200 - 0xc0; 12201 12201 - 0x9c; 12202 12202 - (* comp *) 12203 12203 - 0; 12204 12204 - (* exts *) 12205 12205 - ], 12206 12206 - { sh with sessionid = Some (list_to_cstruct [ 1; 2; 3 ]) } ); 12207 12207 - (* ciphersuite *) 12208 12208 - ( [ 2; 0; 0; 38; 3; 3 ] @ rand 12209 12209 - @ [ 12210 12210 - (* session id *) 0; (* cipher *) 0xc0; 0x9d; (* comp *) 0; (* exts *) 12211 12211 - ], 12212 12212 - { sh with ciphersuite = `RSA_WITH_AES_256_CCM } ); 12213 12213 - (* extensions *) 12214 12214 - (* empty *) 12215 12215 - ( [ 2; 0; 0; 40; 3; 3 ] @ rand 12216 12216 - @ [ 12217 12217 - (* session id *) 12218 12218 - 0; 12219 12219 - (* cipher *) 12220 12220 - 0xc0; 12221 12221 - 0x9c; 12222 12222 - (* comp *) 12223 12223 - 0; 12224 12224 - (* exts *) 12225 12225 - 0; 12226 12226 - 0; 12227 12227 - ], 12228 12228 - sh ); 12229 12229 - (* empty hostname *) 12230 12230 - ( [ 2; 0; 0; 44; 3; 3 ] @ rand 12231 12231 - @ [ 12232 12232 - (* session id *) 12233 12233 - 0; 12234 12234 - (* cipher *) 12235 12235 - 0xc0; 12236 12236 - 0x9c; 12237 12237 - (* comp *) 12238 12238 - 0; 12239 12239 - (* exts *) 12240 12240 - 0; 12241 12241 - 4; 12242 12242 - 0; 12243 12243 - 0; 12244 12244 - 0; 12245 12245 - 0; 12246 12246 - ], 12247 12247 - { sh with extensions = [ `Hostname ] } ); 12248 12248 - (* ALPN *) 12249 12249 - ( [ 2; 0; 0; 49; 3; 3 ] @ rand 12250 12250 - @ [ 12251 12251 - (* session id *) 12252 12252 - 0; 12253 12253 - (* cipher *) 12254 12254 - 0xc0; 12255 12255 - 0x9c; 12256 12256 - (* comp *) 12257 12257 - 0; 12258 12258 - (* exts *) 12259 12259 - 0; 12260 12260 - 9; 12261 12261 - 0; 12262 12262 - 16; 12263 12263 - 0; 12264 12264 - 5; 12265 12265 - 0; 12266 12266 - 3; 12267 12267 - 2; 12268 12268 - 104; 12269 12269 - 50; 12270 12270 - ], 12271 12271 - { sh with extensions = [ `ALPN "h2" ] } ); 12272 12272 - (* TODO: chosen ciphersuite must not be renegotiation (0x00ff) *) 12273 12273 - 12274 12274 - (* TODO: validation of extensions 12275 12275 - - ServerName, if present, should be None 12276 12276 - - Padding is not allowed 12277 12277 - - EC stuff must be present if EC ciphersuite chosen 12278 12278 - - protocol version dependencies (SignatureAlgorithm) 12279 12279 - - no duplicates! 12280 12280 - - only those which are in a client hello are allowed 12281 12281 - - is there an ordering? 12282 12282 - *) 12283 12283 - ( [ 12284 12284 - 0x02; 12285 12285 - (* typ *) 12286 12286 - 0x00; 12287 12287 - 0x00; 12288 12288 - 0x5A; 12289 12289 - (* len *) 12290 12290 - 0x03; 12291 12291 - 0x03; 12292 12292 - (* version *) 12293 12293 - 0x53; 12294 12294 - 0x66; 12295 12295 - 0x2d; 12296 12296 - 0xf0; 12297 12297 - 0x1b; 12298 12298 - 0x61; 12299 12299 - 0x55; 12300 12300 - 0x8f; 12301 12301 - 0x74; 12302 12302 - 0x2a; 12303 12303 - 0xbf; 12304 12304 - 0xf4; 12305 12305 - 0x99; 12306 12306 - 0x86; 12307 12307 - 0x30; 12308 12308 - 0x99; 12309 12309 - 0x32; 12310 12310 - 0xe4; 12311 12311 - 0xd0; 12312 12312 - 0x1e; 12313 12313 - 0x2b; 12314 12314 - 0xa9; 12315 12315 - 0x2e; 12316 12316 - 0x86; 12317 12317 - 0x7b; 12318 12318 - 0xeb; 12319 12319 - 0x03; 12320 12320 - 0x00; 12321 12321 - 0xf9; 12322 12322 - 0x11; 12323 12323 - 0x3e; 12324 12324 - 0xc5; 12325 12325 - (* random *) 12326 12326 - 0x20; 12327 12327 - (* session ID *) 12328 12328 - 0xd1; 12329 12329 - 0x54; 12330 12330 - 0xd9; 12331 12331 - 0x05; 12332 12332 - 0x61; 12333 12333 - 0x41; 12334 12334 - 0x53; 12335 12335 - 0x33; 12336 12336 - 0xb2; 12337 12337 - 0xf0; 12338 12338 - 0x13; 12339 12339 - 0x78; 12340 12340 - 0x1a; 12341 12341 - 0x17; 12342 12342 - 0xb3; 12343 12343 - 0x1d; 12344 12344 - 0x09; 12345 12345 - 0xf6; 12346 12346 - 0x59; 12347 12347 - 0x70; 12348 12348 - 0xfe; 12349 12349 - 0x5d; 12350 12350 - 0x58; 12351 12351 - 0x22; 12352 12352 - 0xfa; 12353 12353 - 0x8c; 12354 12354 - 0x5c; 12355 12355 - 0x89; 12356 12356 - 0xe9; 12357 12357 - 0xa2; 12358 12358 - 0xb4; 12359 12359 - 0x70; 12360 12360 - 0x00; 12361 12361 - 0x2f; 12362 12362 - (* cipher *) 12363 12363 - 0x00; 12364 12364 - (* compression *) 12365 12365 - 0x00; 12366 12366 - 0x12; 12367 12367 - (* extensions *) 12368 12368 - 0x00; 12369 12369 - 0x00; 12370 12370 - 0x00; 12371 12371 - 0x00; 12372 12372 - (* servername *) 12373 12373 - 0xff; 12374 12374 - 0x01; 12375 12375 - 0x00; 12376 12376 - 0x01; 12377 12377 - 0x00; 12378 12378 - (* secure renegotiation *) 12379 12379 - 0x00; 12380 12380 - 0x10; 12381 12381 - 0x00; 12382 12382 - 0x05; 12383 12383 - 0x00; 12384 12384 - 0x03; 12385 12385 - (* ALPN *) 12386 12386 - 0x02; 12387 12387 - 0x68; 12388 12388 - 0x32; 12389 12389 - ], 12390 12390 - { 12391 12391 - sh with 12392 12392 - ciphersuite = `RSA_WITH_AES_128_CBC_SHA; 12393 12393 - server_random = 12394 12394 - list_to_cstruct 12395 12395 - [ 12396 12396 - 0x53; 12397 12397 - 0x66; 12398 12398 - 0x2d; 12399 12399 - 0xf0; 12400 12400 - 0x1b; 12401 12401 - 0x61; 12402 12402 - 0x55; 12403 12403 - 0x8f; 12404 12404 - 0x74; 12405 12405 - 0x2a; 12406 12406 - 0xbf; 12407 12407 - 0xf4; 12408 12408 - 0x99; 12409 12409 - 0x86; 12410 12410 - 0x30; 12411 12411 - 0x99; 12412 12412 - 0x32; 12413 12413 - 0xe4; 12414 12414 - 0xd0; 12415 12415 - 0x1e; 12416 12416 - 0x2b; 12417 12417 - 0xa9; 12418 12418 - 0x2e; 12419 12419 - 0x86; 12420 12420 - 0x7b; 12421 12421 - 0xeb; 12422 12422 - 0x03; 12423 12423 - 0x00; 12424 12424 - 0xf9; 12425 12425 - 0x11; 12426 12426 - 0x3e; 12427 12427 - 0xc5; 12428 12428 - ]; 12429 12429 - sessionid = 12430 12430 - Some 12431 12431 - (list_to_cstruct 12432 12432 - [ 12433 12433 - 0xd1; 12434 12434 - 0x54; 12435 12435 - 0xd9; 12436 12436 - 0x05; 12437 12437 - 0x61; 12438 12438 - 0x41; 12439 12439 - 0x53; 12440 12440 - 0x33; 12441 12441 - 0xb2; 12442 12442 - 0xf0; 12443 12443 - 0x13; 12444 12444 - 0x78; 12445 12445 - 0x1a; 12446 12446 - 0x17; 12447 12447 - 0xb3; 12448 12448 - 0x1d; 12449 12449 - 0x09; 12450 12450 - 0xf6; 12451 12451 - 0x59; 12452 12452 - 0x70; 12453 12453 - 0xfe; 12454 12454 - 0x5d; 12455 12455 - 0x58; 12456 12456 - 0x22; 12457 12457 - 0xfa; 12458 12458 - 0x8c; 12459 12459 - 0x5c; 12460 12460 - 0x89; 12461 12461 - 0xe9; 12462 12462 - 0xa2; 12463 12463 - 0xb4; 12464 12464 - 0x70; 12465 12465 - ]); 12466 12466 - extensions = [ `Hostname; `SecureRenegotiation ""; `ALPN "h2" ]; 12467 12467 - } ); 12468 12468 - ( [ 12469 12469 - 0x02; 12470 12470 - 0x00; 12471 12471 - 0x00; 12472 12472 - 0x51; 12473 12473 - 0x03; 12474 12474 - 0x03; 12475 12475 - 0x53; 12476 12476 - 0x66; 12477 12477 - 0x2f; 12478 12478 - 0xb7; 12479 12479 - 0x35; 12480 12480 - 0x3a; 12481 12481 - 0x42; 12482 12482 - 0xee; 12483 12483 - 0x1c; 12484 12484 - 0xe6; 12485 12485 - 0xed; 12486 12486 - 0x63; 12487 12487 - 0x8a; 12488 12488 - 0x1d; 12489 12489 - 0x3d; 12490 12490 - 0xb3; 12491 12491 - 0x71; 12492 12492 - 0x9c; 12493 12493 - 0xf5; 12494 12494 - 0x64; 12495 12495 - 0x45; 12496 12496 - 0xc5; 12497 12497 - 0xe9; 12498 12498 - 0xf4; 12499 12499 - 0x11; 12500 12500 - 0x8b; 12501 12501 - 0x9f; 12502 12502 - 0x41; 12503 12503 - 0x5a; 12504 12504 - 0x5f; 12505 12505 - 0xf1; 12506 12506 - 0xf6; 12507 12507 - 0x20; 12508 12508 - 0xdf; 12509 12509 - 0xe1; 12510 12510 - 0x09; 12511 12511 - 0x8a; 12512 12512 - 0x42; 12513 12513 - 0xf0; 12514 12514 - 0x25; 12515 12515 - 0xc7; 12516 12516 - 0xbd; 12517 12517 - 0xe5; 12518 12518 - 0xe9; 12519 12519 - 0x02; 12520 12520 - 0x6a; 12521 12521 - 0x03; 12522 12522 - 0xaf; 12523 12523 - 0xb4; 12524 12524 - 0x70; 12525 12525 - 0x80; 12526 12526 - 0xe9; 12527 12527 - 0x2f; 12528 12528 - 0x07; 12529 12529 - 0x3f; 12530 12530 - 0x53; 12531 12531 - 0xd3; 12532 12532 - 0xc8; 12533 12533 - 0x97; 12534 12534 - 0x3f; 12535 12535 - 0xc4; 12536 12536 - 0x44; 12537 12537 - 0x23; 12538 12538 - 0xf5; 12539 12539 - 0x94; 12540 12540 - 0x00; 12541 12541 - 0x2f; 12542 12542 - 0x00; 12543 12543 - 0x00; 12544 12544 - 0x09; 12545 12545 - 0x00; 12546 12546 - 0x00; 12547 12547 - 0x00; 12548 12548 - 0x00; 12549 12549 - 0xff; 12550 12550 - 0x01; 12551 12551 - 0x00; 12552 12552 - 0x01; 12553 12553 - 0x00; 12554 12554 - ], 12555 12555 - { 12556 12556 - sh with 12557 12557 - ciphersuite = `RSA_WITH_AES_128_CBC_SHA; 12558 12558 - server_random = 12559 12559 - list_to_cstruct 12560 12560 - [ 12561 12561 - 0x53; 12562 12562 - 0x66; 12563 12563 - 0x2f; 12564 12564 - 0xb7; 12565 12565 - 0x35; 12566 12566 - 0x3a; 12567 12567 - 0x42; 12568 12568 - 0xee; 12569 12569 - 0x1c; 12570 12570 - 0xe6; 12571 12571 - 0xed; 12572 12572 - 0x63; 12573 12573 - 0x8a; 12574 12574 - 0x1d; 12575 12575 - 0x3d; 12576 12576 - 0xb3; 12577 12577 - 0x71; 12578 12578 - 0x9c; 12579 12579 - 0xf5; 12580 12580 - 0x64; 12581 12581 - 0x45; 12582 12582 - 0xc5; 12583 12583 - 0xe9; 12584 12584 - 0xf4; 12585 12585 - 0x11; 12586 12586 - 0x8b; 12587 12587 - 0x9f; 12588 12588 - 0x41; 12589 12589 - 0x5a; 12590 12590 - 0x5f; 12591 12591 - 0xf1; 12592 12592 - 0xf6; 12593 12593 - ]; 12594 12594 - sessionid = 12595 12595 - Some 12596 12596 - (list_to_cstruct 12597 12597 - [ 12598 12598 - 0xdf; 12599 12599 - 0xe1; 12600 12600 - 0x09; 12601 12601 - 0x8a; 12602 12602 - 0x42; 12603 12603 - 0xf0; 12604 12604 - 0x25; 12605 12605 - 0xc7; 12606 12606 - 0xbd; 12607 12607 - 0xe5; 12608 12608 - 0xe9; 12609 12609 - 0x02; 12610 12610 - 0x6a; 12611 12611 - 0x03; 12612 12612 - 0xaf; 12613 12613 - 0xb4; 12614 12614 - 0x70; 12615 12615 - 0x80; 12616 12616 - 0xe9; 12617 12617 - 0x2f; 12618 12618 - 0x07; 12619 12619 - 0x3f; 12620 12620 - 0x53; 12621 12621 - 0xd3; 12622 12622 - 0xc8; 12623 12623 - 0x97; 12624 12624 - 0x3f; 12625 12625 - 0xc4; 12626 12626 - 0x44; 12627 12627 - 0x23; 12628 12628 - 0xf5; 12629 12629 - 0x94; 12630 12630 - ]); 12631 12631 - extensions = [ `Hostname; `SecureRenegotiation "" ]; 12632 12632 - } ); 12633 12633 - ]) 12634 12634 - 12635 12635 - let cmp_server_hellos sh sh' = 12636 12636 - let open Core in 12637 12637 - assert_equal sh.server_version sh'.server_version; 12638 12638 - assert_cs_eq sh.server_random sh'.server_random; 12639 12639 - assert_sessionid_equal sh.sessionid sh'.sessionid; 12640 12640 - assert_equal sh.ciphersuite sh'.ciphersuite; 12641 12641 - assert_lists_eq assert_server_extension_equal sh.extensions sh'.extensions 12642 12642 - 12643 12643 - let good_server_hellos_parser (xs, res) _ = 12644 12644 - let buf = list_to_cstruct xs in 12645 12645 - match Reader.parse_handshake buf with 12646 12646 - | Ok (Core.ServerHello sh) -> cmp_server_hellos sh res 12647 12647 - | _ -> assert_failure "handshake server hello parser failed" 12648 12648 - 12649 12649 - let good_server_hellos_tests = 12650 12650 - List.mapi 12651 12651 - (fun i f -> 12652 12652 - "Parse good server hello " ^ string_of_int i 12653 12653 - >:: good_server_hellos_parser f) 12654 12654 - good_server_hellos 12655 12655 - 12656 12656 - let bad_server_hellos = 12657 12657 - (* I rolled the dice 16 times *) 12658 12658 - let rnd = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] in 12659 12659 - let rand = rnd @ rnd in 12660 12660 - [ 12661 12661 - [ 2; 0; 0; 38; 3; 0 ] @ rand 12662 12662 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ]; 12663 12663 - [ 2; 0; 0; 38; 3; 4 ] @ rand 12664 12664 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ]; 12665 12665 - [ 2; 0; 0; 30; 4; 3 ] @ rand 12666 12666 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ]; 12667 12667 - [ 2; 0; 0; 38; 4; 3 ] @ rand 12668 12668 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ]; 12669 12669 - [ 2; 0; 0; 44; 3; 3 ] @ rand 12670 12670 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ]; 12671 12671 - [ 2; 0; 0; 38; 3; 3 ] @ rand 12672 12672 - @ [ (* session id *) 0; (* cipher *) 0xFF; 0xFF; (* comp *) 0 (* exts *) ]; 12673 12673 - [ 2; 0; 0; 38; 3; 3 ] @ rand 12674 12674 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 42 (* exts *) ]; 12675 12675 - (* session id *) 12676 12676 - [ 2; 0; 0; 40; 3; 3 ] @ rand 12677 12677 - @ [ (* session id *) 3; 1; 2; (* cipher *) 0; 0; (* comp *) 0 (* exts *) ]; 12678 12678 - (* extensions *) 12679 12679 - (* empty *) 12680 12680 - [ 2; 0; 0; 40; 3; 3 ] @ rand 12681 12681 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0; (* exts *) 0; 1 ]; 12682 12682 - [ 2; 0; 0; 41; 3; 3 ] @ rand 12683 12683 - @ [ (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0; (* exts *) 0; 1 ]; 12684 12684 - [ 2; 0; 0; 41; 3; 3 ] @ rand 12685 12685 - @ [ 12686 12686 - (* session id *) 0; (* cipher *) 0; 0; (* comp *) 0; (* exts *) 0; 1; 0; 12687 12687 - ]; 12688 12688 - (* ALPN ext with a list of protocols *) 12689 12689 - [ 2; 0; 0; 46; 3; 3 ] @ rand 12690 12690 - @ [ 12691 12691 - (* session id *) 12692 12692 - 0; 12693 12693 - (* cipher *) 12694 12694 - 0; 12695 12695 - 0; 12696 12696 - (* comp *) 12697 12697 - 0; 12698 12698 - (* exts *) 12699 12699 - 0; 12700 12700 - 18; 12701 12701 - 0; 12702 12702 - 16; 12703 12703 - 0; 12704 12704 - 8; 12705 12705 - 0; 12706 12706 - 6; 12707 12707 - 3; 12708 12708 - 0x41; 12709 12709 - 0x41; 12710 12710 - 3; 12711 12711 - 0x42; 12712 12712 - 0x42; 12713 12713 - ]; 12714 12714 - ] 12715 12715 - 12716 12716 - let bad_server_hellos_parser xs _ = 12717 12717 - let buf = list_to_cstruct xs in 12718 12718 - match Reader.parse_handshake buf with 12719 12719 - | Ok _ -> assert_failure "handshake server hello parser succeeded" 12720 12720 - | Error _ -> () 12721 12721 - 12722 12722 - let bad_server_hellos_tests = 12723 12723 - List.mapi 12724 12724 - (fun i f -> 12725 12725 - "Parse bad server hello " ^ string_of_int i >:: bad_server_hellos_parser f) 12726 12726 - bad_server_hellos 12727 12727 - 12728 12728 - let reader_tests = 12729 12729 - any_version_tests @ version_tests @ good_records_tests @ good_alert_tests 12730 12730 - @ bad_alerts_tests @ good_dh_params_tests @ bad_dh_params_tests 12731 12731 - @ good_digitally_signed_1_2_tests @ bad_digitally_signed_1_2_tests 12732 12732 - @ good_digitally_signed_tests @ bad_digitally_signed_tests 12733 12733 - @ good_handshake_hdr_tests @ good_handshake_no_data_tests 12734 12734 - @ bad_handshake_no_data_tests @ good_handshake_cstruct_data_tests 12735 12735 - @ bad_handshake_cstruct_data_tests @ bad_certificate_cstruct_data_tests 12736 12736 - @ good_client_hellos_tests @ bad_client_hello_tests @ good_server_hellos_tests 12737 12737 - @ bad_server_hellos_tests

-532

tests/readerwritertests.ml

reviewed

··· 1 1 - open Tls 2 2 - open Testlib 3 3 - 4 4 - let readerwriter_version v _ = 5 5 - let buf = Writer.assemble_protocol_version v in 6 6 - match Reader.parse_version buf with 7 7 - | Ok ver -> ( 8 8 - assert_equal v ver; 9 9 - (* lets get crazy and do it one more time *) 10 10 - let buf' = Writer.assemble_protocol_version v in 11 11 - match Reader.parse_version buf' with 12 12 - | Ok ver' -> assert_equal v ver' 13 13 - | Error _ -> assert_failure "read and write version broken") 14 14 - | Error _ -> assert_failure "read and write version broken" 15 15 - 16 16 - let version_tests = 17 17 - [ 18 18 - "ReadWrite version TLS-1.0" >:: readerwriter_version `TLS_1_0; 19 19 - "ReadWrite version TLS-1.1" >:: readerwriter_version `TLS_1_1; 20 20 - "ReadWrite version TLS-1.2" >:: readerwriter_version `TLS_1_2; 21 21 - ] 22 22 - 23 23 - let readerwriter_header (v, ct, cs) _ = 24 24 - let buf = Writer.assemble_hdr v (ct, cs) in 25 25 - match Reader.parse_record buf with 26 26 - | Ok (`Record ((hdr, payload), f)) -> ( 27 27 - let open Core in 28 28 - assert_equal 0 (String.length f); 29 29 - assert_equal (v :> tls_any_version) hdr.version; 30 30 - assert_equal ct hdr.content_type; 31 31 - assert_cs_eq cs payload; 32 32 - let buf' = Writer.assemble_hdr v (hdr.content_type, payload) in 33 33 - match Reader.parse_record buf' with 34 34 - | Ok (`Record ((hdr, payload), f)) -> 35 35 - assert_equal 0 (String.length f); 36 36 - assert_equal (v :> tls_any_version) hdr.version; 37 37 - assert_equal ct hdr.content_type; 38 38 - assert_cs_eq cs payload 39 39 - | _ -> assert_failure "inner header broken") 40 40 - | _ -> assert_failure "header broken" 41 41 - 42 42 - let header_tests = 43 43 - let a = 44 44 - list_to_cstruct [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] 45 45 - in 46 46 - [ 47 47 - "ReadWrite header" >:: readerwriter_header (`TLS_1_0, Packet.HANDSHAKE, a); 48 48 - "ReadWrite header" >:: readerwriter_header (`TLS_1_1, Packet.HANDSHAKE, a); 49 49 - "ReadWrite header" >:: readerwriter_header (`TLS_1_2, Packet.HANDSHAKE, a); 50 50 - "ReadWrite header" 51 51 - >:: readerwriter_header (`TLS_1_0, Packet.APPLICATION_DATA, a); 52 52 - "ReadWrite header" 53 53 - >:: readerwriter_header (`TLS_1_1, Packet.APPLICATION_DATA, a); 54 54 - "ReadWrite header" 55 55 - >:: readerwriter_header (`TLS_1_2, Packet.APPLICATION_DATA, a); 56 56 - "ReadWrite header" 57 57 - >:: readerwriter_header (`TLS_1_0, Packet.CHANGE_CIPHER_SPEC, a); 58 58 - "ReadWrite header" 59 59 - >:: readerwriter_header (`TLS_1_1, Packet.CHANGE_CIPHER_SPEC, a); 60 60 - "ReadWrite header" 61 61 - >:: readerwriter_header (`TLS_1_2, Packet.CHANGE_CIPHER_SPEC, a); 62 62 - "ReadWrite header" >:: readerwriter_header (`TLS_1_0, Packet.ALERT, a); 63 63 - "ReadWrite header" >:: readerwriter_header (`TLS_1_1, Packet.ALERT, a); 64 64 - "ReadWrite header" >:: readerwriter_header (`TLS_1_2, Packet.ALERT, a); 65 65 - ] 66 66 - 67 67 - let readerwriter_alert (lvl, typ) _ = 68 68 - let buf, expl = 69 69 - match lvl with 70 70 - | None -> (Writer.assemble_alert typ, Packet.FATAL) 71 71 - | Some l -> (Writer.assemble_alert ~level:l typ, l) 72 72 - in 73 73 - match Reader.parse_alert buf with 74 74 - | Ok (l', t') -> ( 75 75 - assert_equal expl l'; 76 76 - assert_equal typ t'; 77 77 - (* lets get crazy and do it one more time *) 78 78 - let buf' = Writer.assemble_alert ~level:l' t' in 79 79 - match Reader.parse_alert buf' with 80 80 - | Ok (l'', t'') -> 81 81 - assert_equal expl l''; 82 82 - assert_equal typ t'' 83 83 - | Error _ -> assert_failure "inner read and write alert broken") 84 84 - | Error _ -> assert_failure "read and write alert broken" 85 85 - 86 86 - let rw_alert_tests = 87 87 - Packet. 88 88 - [ 89 89 - (None, CLOSE_NOTIFY); 90 90 - (None, UNEXPECTED_MESSAGE); 91 91 - (None, BAD_RECORD_MAC); 92 92 - (None, RECORD_OVERFLOW); 93 93 - (None, HANDSHAKE_FAILURE); 94 94 - (None, BAD_CERTIFICATE); 95 95 - (None, CERTIFICATE_EXPIRED); 96 96 - (None, DECODE_ERROR); 97 97 - (None, PROTOCOL_VERSION); 98 98 - (None, UNSUPPORTED_EXTENSION); 99 99 - (None, UNRECOGNIZED_NAME); 100 100 - (None, NO_APPLICATION_PROTOCOL); 101 101 - (Some FATAL, CLOSE_NOTIFY); 102 102 - (Some FATAL, UNEXPECTED_MESSAGE); 103 103 - (Some FATAL, BAD_RECORD_MAC); 104 104 - (Some FATAL, RECORD_OVERFLOW); 105 105 - (Some FATAL, HANDSHAKE_FAILURE); 106 106 - (Some FATAL, BAD_CERTIFICATE); 107 107 - (Some FATAL, CERTIFICATE_EXPIRED); 108 108 - (Some FATAL, DECODE_ERROR); 109 109 - (Some FATAL, PROTOCOL_VERSION); 110 110 - (Some FATAL, UNSUPPORTED_EXTENSION); 111 111 - (Some FATAL, UNRECOGNIZED_NAME); 112 112 - (Some FATAL, NO_APPLICATION_PROTOCOL); 113 113 - (Some WARNING, CLOSE_NOTIFY); 114 114 - (* ( Some WARNING, UNEXPECTED_MESSAGE ) ; 115 115 - ( Some WARNING, BAD_RECORD_MAC ) ; 116 116 - ( Some WARNING, DECRYPTION_FAILED ) ; 117 117 - ( Some WARNING, RECORD_OVERFLOW ) ; 118 118 - ( Some WARNING, DECOMPRESSION_FAILURE ) ; 119 119 - ( Some WARNING, HANDSHAKE_FAILURE ) ; *) 120 120 - (Some FATAL, BAD_CERTIFICATE); 121 121 - (Some FATAL, CERTIFICATE_EXPIRED); 122 122 - (* ( Some WARNING, UNKNOWN_CA ) ; 123 123 - ( Some WARNING, ACCESS_DENIED ) ; 124 124 - ( Some WARNING, DECODE_ERROR ) ; 125 125 - ( Some WARNING, DECRYPT_ERROR ) ; *) 126 126 - (* ( Some WARNING, PROTOCOL_VERSION ) ; 127 127 - ( Some WARNING, INSUFFICIENT_SECURITY ) ; 128 128 - ( Some WARNING, INTERNAL_ERROR ) ; *) 129 129 - (Some WARNING, USER_CANCELED); 130 130 - (Some WARNING, NO_RENEGOTIATION); 131 131 - (* ( Some WARNING, UNSUPPORTED_EXTENSION ) ; *) 132 132 - (Some FATAL, UNRECOGNIZED_NAME); 133 133 - ] 134 134 - 135 135 - let rw_alert_tests = 136 136 - List.mapi 137 137 - (fun i f -> "RW alert " ^ string_of_int i >:: readerwriter_alert f) 138 138 - rw_alert_tests 139 139 - 140 140 - let assert_dh_eq a b = 141 141 - Core.(assert_cs_eq a.dh_p b.dh_p); 142 142 - Core.(assert_cs_eq a.dh_g b.dh_g); 143 143 - Core.(assert_cs_eq a.dh_Ys b.dh_Ys) 144 144 - 145 145 - let readerwriter_dh_params params _ = 146 146 - let buf = Writer.assemble_dh_parameters params in 147 147 - match Reader.parse_dh_parameters buf with 148 148 - | Ok (p, raw, rst) -> ( 149 149 - assert_equal (String.length rst) 0; 150 150 - assert_dh_eq p params; 151 151 - assert_equal buf raw; 152 152 - (* lets get crazy and do it one more time *) 153 153 - let buf' = Writer.assemble_dh_parameters p in 154 154 - match Reader.parse_dh_parameters buf' with 155 155 - | Ok (p', raw', rst') -> 156 156 - assert_equal (String.length rst') 0; 157 157 - assert_dh_eq p' params; 158 158 - assert_equal buf raw' 159 159 - | Error _ -> assert_failure "inner read and write dh params broken") 160 160 - | Error _ -> assert_failure "read and write dh params broken" 161 161 - 162 162 - let rw_dh_params = 163 163 - let a = 164 164 - list_to_cstruct [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] 165 165 - in 166 166 - let emp = list_to_cstruct [] in 167 167 - Core. 168 168 - [ 169 169 - { dh_p = emp; dh_g = emp; dh_Ys = emp }; 170 170 - { dh_p = a; dh_g = emp; dh_Ys = emp }; 171 171 - { dh_p = emp; dh_g = a; dh_Ys = emp }; 172 172 - { dh_p = emp; dh_g = emp; dh_Ys = a }; 173 173 - { dh_p = a ^ a; dh_g = a ^ a; dh_Ys = a ^ a }; 174 174 - ] 175 175 - 176 176 - let rw_dh_tests = 177 177 - List.mapi 178 178 - (fun i f -> "RW dh_param " ^ string_of_int i >:: readerwriter_dh_params f) 179 179 - rw_dh_params 180 180 - 181 181 - let readerwriter_digitally_signed params _ = 182 182 - let buf = Writer.assemble_digitally_signed params in 183 183 - match Reader.parse_digitally_signed buf with 184 184 - | Ok params' -> ( 185 185 - assert_cs_eq params params'; 186 186 - (* lets get crazy and do it one more time *) 187 187 - let buf' = Writer.assemble_digitally_signed params' in 188 188 - match Reader.parse_digitally_signed buf' with 189 189 - | Ok params'' -> assert_cs_eq params params'' 190 190 - | Error _ -> assert_failure "inner read and write digitally signed broken" 191 191 - ) 192 192 - | Error _ -> assert_failure "read and write digitally signed broken" 193 193 - 194 194 - let rw_ds_params = 195 195 - let a = 196 196 - list_to_cstruct [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] 197 197 - in 198 198 - let emp = list_to_cstruct [] in 199 199 - [ a; a ^ a; emp; emp ^ a ] 200 200 - 201 201 - let rw_ds_tests = 202 202 - List.mapi 203 203 - (fun i f -> 204 204 - "RW digitally signed " ^ string_of_int i 205 205 - >:: readerwriter_digitally_signed f) 206 206 - rw_ds_params 207 207 - 208 208 - let readerwriter_digitally_signed_1_2 (sigalg, params) _ = 209 209 - let buf = Writer.assemble_digitally_signed_1_2 sigalg params in 210 210 - match Reader.parse_digitally_signed_1_2 buf with 211 211 - | Ok (sigalg', params') -> ( 212 212 - assert_equal sigalg sigalg'; 213 213 - assert_cs_eq params params'; 214 214 - (* lets get crazy and do it one more time *) 215 215 - let buf' = Writer.assemble_digitally_signed_1_2 sigalg' params' in 216 216 - match Reader.parse_digitally_signed_1_2 buf' with 217 217 - | Ok (sigalg'', params'') -> 218 218 - assert_equal sigalg sigalg''; 219 219 - assert_cs_eq params params'' 220 220 - | Error _ -> 221 221 - assert_failure "inner read and write digitally signed 1.2 broken") 222 222 - | Error _ -> assert_failure "read and write digitally signed 1.2 broken" 223 223 - 224 224 - let rec cartesian_product f a b = 225 225 - match b with 226 226 - | [] -> [] 227 227 - | e :: rt -> List.map (fun x -> f x e) a @ cartesian_product f a rt 228 228 - 229 229 - let rw_ds_1_2_params = 230 230 - let a = 231 231 - list_to_cstruct [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] 232 232 - in 233 233 - let emp = list_to_cstruct [] in 234 234 - let cs = [ a; a ^ a; emp; emp ^ a ] in 235 235 - let sig_algs = 236 236 - [ 237 237 - `RSA_PKCS1_MD5; 238 238 - `RSA_PKCS1_SHA1; 239 239 - `RSA_PKCS1_SHA224; 240 240 - `RSA_PKCS1_SHA256; 241 241 - `RSA_PKCS1_SHA384; 242 242 - `RSA_PKCS1_SHA512; 243 243 - `RSA_PSS_RSAENC_SHA256; 244 244 - `RSA_PSS_RSAENC_SHA384; 245 245 - `RSA_PSS_RSAENC_SHA512; 246 246 - ] 247 247 - in 248 248 - cartesian_product (fun sigalg c -> (sigalg, c)) sig_algs cs 249 249 - 250 250 - let rw_ds_1_2_tests = 251 251 - List.mapi 252 252 - (fun i f -> 253 253 - "RW digitally signed 1.2 " ^ string_of_int i 254 254 - >:: readerwriter_digitally_signed_1_2 f) 255 255 - rw_ds_1_2_params 256 256 - 257 257 - let rw_handshake_no_data hs _ = 258 258 - let buf = Writer.assemble_handshake hs in 259 259 - match Reader.parse_handshake buf with 260 260 - | Ok hs' -> ( 261 261 - assert_equal hs hs'; 262 262 - (* lets get crazy and do it one more time *) 263 263 - let buf' = Writer.assemble_handshake hs' in 264 264 - match Reader.parse_handshake buf' with 265 265 - | Ok hs'' -> assert_equal hs hs'' 266 266 - | Error _ -> assert_failure "handshake no data inner failed") 267 267 - | Error _ -> assert_failure "handshake no data failed" 268 268 - 269 269 - let rw_handshakes_no_data_vals = [ Core.HelloRequest; Core.ServerHelloDone ] 270 270 - 271 271 - let rw_handshake_no_data_tests = 272 272 - List.mapi 273 273 - (fun i f -> 274 274 - "handshake no data " ^ string_of_int i >:: rw_handshake_no_data f) 275 275 - rw_handshakes_no_data_vals 276 276 - 277 277 - let rw_handshake_cstruct_data hs _ = 278 278 - let buf = Writer.assemble_handshake hs in 279 279 - match Reader.parse_handshake buf with 280 280 - | Ok hs' -> ( 281 281 - Readertests.cmp_handshake_cstruct hs hs'; 282 282 - (* lets get crazy and do it one more time *) 283 283 - let buf' = Writer.assemble_handshake hs' in 284 284 - match Reader.parse_handshake buf' with 285 285 - | Ok hs'' -> Readertests.cmp_handshake_cstruct hs hs'' 286 286 - | Error _ -> assert_failure "handshake cstruct data inner failed") 287 287 - | Error _ -> assert_failure "handshake cstruct data failed" 288 288 - 289 289 - let rw_handshake_cstruct_data_vals = 290 290 - let data_cs = list_to_cstruct [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11 ] in 291 291 - let emp = list_to_cstruct [] in 292 292 - Core. 293 293 - [ 294 294 - ServerKeyExchange emp; 295 295 - ServerKeyExchange data_cs; 296 296 - Finished emp; 297 297 - Finished data_cs; 298 298 - ClientKeyExchange emp; 299 299 - ClientKeyExchange data_cs; 300 300 - Certificate (Writer.assemble_certificates []); 301 301 - Certificate (Writer.assemble_certificates [ data_cs ]); 302 302 - Certificate (Writer.assemble_certificates [ data_cs; data_cs ]); 303 303 - Certificate (Writer.assemble_certificates [ data_cs; emp ]); 304 304 - Certificate (Writer.assemble_certificates [ emp; data_cs ]); 305 305 - Certificate (Writer.assemble_certificates [ emp; data_cs; emp ]); 306 306 - Certificate (Writer.assemble_certificates [ emp; data_cs; emp; data_cs ]); 307 307 - ] 308 308 - 309 309 - let rw_handshake_cstruct_data_tests = 310 310 - List.mapi 311 311 - (fun i f -> 312 312 - "handshake cstruct data " ^ string_of_int i 313 313 - >:: rw_handshake_cstruct_data f) 314 314 - rw_handshake_cstruct_data_vals 315 315 - 316 316 - let rw_handshake_client_hello hs _ = 317 317 - let buf = Writer.assemble_handshake hs in 318 318 - match Reader.parse_handshake buf with 319 319 - | Ok hs' -> ( 320 320 - Core.( 321 321 - match (hs, hs') with 322 322 - | ClientHello ch, ClientHello ch' -> 323 323 - Readertests.cmp_client_hellos ch ch' 324 324 - | _ -> assert_failure "handshake client hello broken"); 325 325 - (* lets get crazy and do it one more time *) 326 326 - let buf' = Writer.assemble_handshake hs' in 327 327 - match Reader.parse_handshake buf' with 328 328 - | Ok hs'' -> ( 329 329 - Core.( 330 330 - match (hs, hs'') with 331 331 - | ClientHello ch, ClientHello ch'' -> 332 332 - Readertests.cmp_client_hellos ch ch'' 333 333 - | _ -> assert_failure "handshake client hello broken")) 334 334 - | Error _ -> assert_failure "handshake client hello inner failed") 335 335 - | Error _ -> assert_failure "handshake client hello failed" 336 336 - 337 337 - let rw_handshake_client_hello_vals = 338 338 - let rnd = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] in 339 339 - let client_random = list_to_cstruct (rnd @ rnd) in 340 340 - Core.( 341 341 - let ch : client_hello = 342 342 - { 343 343 - client_version = `TLS_1_2; 344 344 - client_random; 345 345 - sessionid = None; 346 346 - ciphersuites = []; 347 347 - extensions = []; 348 348 - } 349 349 - in 350 350 - [ 351 351 - ClientHello ch; 352 352 - ClientHello { ch with client_version = `TLS_1_0 }; 353 353 - ClientHello { ch with client_version = `TLS_1_1 }; 354 354 - ClientHello 355 355 - { ch with ciphersuites = [ Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA ] }; 356 356 - ClientHello 357 357 - { 358 358 - ch with 359 359 - ciphersuites = 360 360 - Packet. 361 361 - [ 362 362 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; 363 363 - TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 364 364 - TLS_RSA_WITH_AES_256_CBC_SHA; 365 365 - ]; 366 366 - }; 367 367 - ClientHello { ch with sessionid = Some (list_to_cstruct rnd) }; 368 368 - ClientHello { ch with sessionid = Some client_random }; 369 369 - ClientHello 370 370 - { 371 371 - ch with 372 372 - ciphersuites = 373 373 - Packet. 374 374 - [ 375 375 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; 376 376 - TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 377 377 - TLS_RSA_WITH_AES_256_CBC_SHA; 378 378 - ]; 379 379 - sessionid = Some client_random; 380 380 - }; 381 381 - ClientHello { ch with extensions = [ make_hostname_ext "foobar" ] }; 382 382 - ClientHello { ch with extensions = [ make_hostname_ext "foobarblubb" ] }; 383 383 - ClientHello 384 384 - { 385 385 - ch with 386 386 - extensions = 387 387 - [ 388 388 - make_hostname_ext "foobarblubb"; 389 389 - `SupportedGroups Packet.[ SECP521R1; SECP384R1 ]; 390 390 - ]; 391 391 - }; 392 392 - ClientHello { ch with extensions = [ `ALPN [ "h2"; "http/1.1" ] ] }; 393 393 - ClientHello 394 394 - { 395 395 - ch with 396 396 - extensions = 397 397 - [ 398 398 - make_hostname_ext "foobarblubb"; 399 399 - `SupportedGroups Packet.[ SECP521R1; SECP384R1 ]; 400 400 - `SignatureAlgorithms [ `RSA_PKCS1_MD5 ]; 401 401 - `ALPN [ "h2"; "http/1.1" ]; 402 402 - ]; 403 403 - }; 404 404 - ClientHello 405 405 - { 406 406 - ch with 407 407 - ciphersuites = 408 408 - Packet. 409 409 - [ 410 410 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; 411 411 - TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 412 412 - TLS_RSA_WITH_AES_256_CBC_SHA; 413 413 - ]; 414 414 - sessionid = Some client_random; 415 415 - extensions = [ make_hostname_ext "foobarblubb" ]; 416 416 - }; 417 417 - ClientHello 418 418 - { 419 419 - ch with 420 420 - ciphersuites = 421 421 - Packet. 422 422 - [ 423 423 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; 424 424 - TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 425 425 - TLS_RSA_WITH_AES_256_CBC_SHA; 426 426 - ]; 427 427 - sessionid = Some client_random; 428 428 - extensions = 429 429 - [ 430 430 - make_hostname_ext "foobarblubb"; 431 431 - `SupportedGroups Packet.[ SECP521R1; SECP384R1 ]; 432 432 - `SignatureAlgorithms [ `RSA_PKCS1_SHA1; `RSA_PKCS1_SHA512 ]; 433 433 - `ALPN [ "h2"; "http/1.1" ]; 434 434 - ]; 435 435 - }; 436 436 - ClientHello 437 437 - { 438 438 - ch with 439 439 - ciphersuites = 440 440 - Packet. 441 441 - [ 442 442 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; 443 443 - TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 444 444 - TLS_RSA_WITH_AES_256_CBC_SHA; 445 445 - ]; 446 446 - sessionid = Some client_random; 447 447 - extensions = 448 448 - [ 449 449 - make_hostname_ext "foobarblubb"; 450 450 - `SupportedGroups Packet.[ SECP521R1; SECP384R1 ]; 451 451 - `SignatureAlgorithms [ `RSA_PKCS1_MD5; `RSA_PKCS1_SHA256 ]; 452 452 - `SecureRenegotiation client_random; 453 453 - `ALPN [ "h2"; "http/1.1" ]; 454 454 - ]; 455 455 - }; 456 456 - ]) 457 457 - 458 458 - let rw_handshake_client_hello_tests = 459 459 - List.mapi 460 460 - (fun i f -> 461 461 - "handshake client hello " ^ string_of_int i 462 462 - >:: rw_handshake_client_hello f) 463 463 - rw_handshake_client_hello_vals 464 464 - 465 465 - let rw_handshake_server_hello hs _ = 466 466 - let buf = Writer.assemble_handshake hs in 467 467 - match Reader.parse_handshake buf with 468 468 - | Ok hs' -> ( 469 469 - Core.( 470 470 - match (hs, hs') with 471 471 - | ServerHello sh, ServerHello sh' -> 472 472 - Readertests.cmp_server_hellos sh sh' 473 473 - | _ -> assert_failure "handshake server hello broken"); 474 474 - (* lets get crazy and do it one more time *) 475 475 - let buf' = Writer.assemble_handshake hs' in 476 476 - match Reader.parse_handshake buf' with 477 477 - | Ok hs'' -> ( 478 478 - Core.( 479 479 - match (hs, hs'') with 480 480 - | ServerHello sh, ServerHello sh'' -> 481 481 - Readertests.cmp_server_hellos sh sh'' 482 482 - | _ -> assert_failure "handshake server hello broken")) 483 483 - | Error _ -> assert_failure "handshake server hello inner failed") 484 484 - | Error _ -> assert_failure "handshake server hello failed" 485 485 - 486 486 - let rw_handshake_server_hello_vals = 487 487 - let rnd = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] in 488 488 - let server_random = list_to_cstruct (rnd @ rnd) in 489 489 - Core.( 490 490 - let sh : server_hello = 491 491 - { 492 492 - server_version = `TLS_1_2; 493 493 - server_random; 494 494 - sessionid = None; 495 495 - ciphersuite = `RSA_WITH_AES_256_CCM; 496 496 - extensions = []; 497 497 - } 498 498 - in 499 499 - [ 500 500 - ServerHello sh; 501 501 - ServerHello { sh with server_version = `TLS_1_0 }; 502 502 - ServerHello { sh with server_version = `TLS_1_1 }; 503 503 - ServerHello { sh with sessionid = Some server_random }; 504 504 - ServerHello 505 505 - { sh with sessionid = Some server_random; extensions = [ `Hostname ] }; 506 506 - ServerHello 507 507 - { 508 508 - sh with 509 509 - sessionid = Some server_random; 510 510 - extensions = [ `Hostname; `SecureRenegotiation server_random ]; 511 511 - }; 512 512 - ServerHello 513 513 - { 514 514 - sh with 515 515 - sessionid = Some server_random; 516 516 - extensions = 517 517 - [ `Hostname; `SecureRenegotiation server_random; `ALPN "h2" ]; 518 518 - }; 519 519 - ]) 520 520 - 521 521 - let rw_handshake_server_hello_tests = 522 522 - List.mapi 523 523 - (fun i f -> 524 524 - "handshake server hello " ^ string_of_int i 525 525 - >:: rw_handshake_server_hello f) 526 526 - rw_handshake_server_hello_vals 527 527 - 528 528 - let readerwriter_tests = 529 529 - version_tests @ header_tests @ rw_alert_tests @ rw_dh_tests @ rw_ds_tests 530 530 - @ rw_ds_1_2_tests @ rw_handshake_no_data_tests 531 531 - @ rw_handshake_cstruct_data_tests @ rw_handshake_client_hello_tests 532 532 - @ rw_handshake_server_hello_tests

-1

tests/server.key

reviewed

··· 1 1 - ../certificates/server.key

-1

tests/server.pem

reviewed

··· 1 1 - ../certificates/server.pem

-6

tests/test.ml

reviewed

··· 1 1 - let () = 2 2 - Fmt_tty.setup_std_outputs (); 3 3 - Logs.set_level (Some Logs.Debug); 4 4 - Logs.set_reporter (Logs_fmt.reporter ~dst:Format.std_formatter ()); 5 5 - Crypto_rng_unix.use_default (); 6 6 - Alcotest.run "tls" (Unittests.suite @ Key_derivation.suite)

-80

tests/testlib.ml

reviewed

··· 1 1 - let () = Crypto_rng_unix.use_default () 2 2 - 3 3 - let time f = 4 4 - let t1 = Sys.time () in 5 5 - let r = f () in 6 6 - let t2 = Sys.time () in 7 7 - Printf.eprintf "[time] %f.04 s\n%!" (t2 -. t1); 8 8 - r 9 9 - 10 10 - let list_to_cstruct xs = 11 11 - let buf = Bytes.create (List.length xs) in 12 12 - List.iteri (Bytes.set_uint8 buf) xs; 13 13 - Bytes.unsafe_to_string buf 14 14 - 15 15 - let uint16_to_cstruct i = 16 16 - let buf = Bytes.create 2 in 17 17 - Bytes.set_uint16_be buf 0 i; 18 18 - buf 19 19 - 20 20 - let hexdump_to_str cs = Ohex.encode cs 21 21 - 22 22 - (* OUnit2 compatibility shims *) 23 23 - 24 24 - let assert_failure msg = Alcotest.fail msg 25 25 - 26 26 - let assert_equal ?cmp ?printer ?msg expected actual = 27 27 - let equal = 28 28 - match cmp with Some f -> f expected actual | None -> expected = actual 29 29 - in 30 30 - if not equal then 31 31 - match (printer, msg) with 32 32 - | Some p, Some m -> 33 33 - Alcotest.failf "%s: expected %s, got %s" m (p expected) (p actual) 34 34 - | Some p, None -> 35 35 - Alcotest.failf "expected %s, got %s" (p expected) (p actual) 36 36 - | None, Some m -> Alcotest.fail m 37 37 - | None, None -> Alcotest.fail "assert_equal" 38 38 - 39 39 - let assert_bool msg b = if not b then Alcotest.fail msg 40 40 - let ( >:: ) name f = (name, `Quick, fun () -> f ()) 41 41 - 42 42 - let assert_cs_eq ?msg cs1 cs2 = 43 43 - assert_equal ~cmp:String.equal ~printer:hexdump_to_str ?msg cs1 cs2 44 44 - 45 45 - let rec assert_lists_eq comparison a b = 46 46 - match (a, b) with 47 47 - | [], [] -> () 48 48 - | a :: r1, b :: r2 -> 49 49 - comparison a b; 50 50 - assert_lists_eq comparison r1 r2 51 51 - | _ -> assert_failure "lists not equal" 52 52 - 53 53 - let assert_sessionid_equal a b = 54 54 - match (a, b) with 55 55 - | None, None -> () 56 56 - | Some x, Some y -> assert_cs_eq x y 57 57 - | _ -> assert_failure "session id not equal" 58 58 - 59 59 - let assert_client_extension_equal a b = 60 60 - match (a, b) with 61 61 - | `Hostname a, `Hostname b -> assert_equal a b 62 62 - | `MaxFragmentLength a, `MaxFragmentLength b -> assert_equal a b 63 63 - | `SupportedGroups a, `SupportedGroups b -> assert_lists_eq assert_equal a b 64 64 - | `SecureRenegotiation a, `SecureRenegotiation b -> assert_cs_eq a b 65 65 - | `Padding a, `Padding b -> assert_equal a b 66 66 - | `SignatureAlgorithms a, `SignatureAlgorithms b -> 67 67 - assert_lists_eq (fun sa sa' -> assert_equal sa sa') a b 68 68 - | `ALPN a, `ALPN b -> assert_lists_eq assert_equal a b 69 69 - | _ -> assert_failure "extensions did not match" 70 70 - 71 71 - let assert_server_extension_equal a b = 72 72 - match (a, b) with 73 73 - | `Hostname, `Hostname -> () 74 74 - | `MaxFragmentLength a, `MaxFragmentLength b -> assert_equal a b 75 75 - | `SecureRenegotiation a, `SecureRenegotiation b -> assert_cs_eq a b 76 76 - | `ALPN a, `ALPN b -> assert_equal a b 77 77 - | _ -> assert_failure "extensions did not match" 78 78 - 79 79 - let make_hostname_ext h = 80 80 - `Hostname (Domain_name.of_string_exn h |> Domain_name.host_exn)

-6

tests/unittests.ml

reviewed

··· 1 1 - let suite = 2 2 - [ 3 3 - ("reader", Readertests.reader_tests); 4 4 - ("writer", Writertests.writer_tests); 5 5 - ("reader_writer", Readerwritertests.readerwriter_tests); 6 6 - ]

-2542

tests/writertests.ml

reviewed

··· 1 1 - open Tls 2 2 - open Testlib 3 3 - 4 4 - let version_assembler (ver, res) _ = 5 5 - let buf = Writer.assemble_protocol_version ver in 6 6 - assert_cs_eq buf res 7 7 - 8 8 - let version_assembler_tests = 9 9 - [ 10 10 - (`TLS_1_0, list_to_cstruct [ 3; 1 ]); 11 11 - (`TLS_1_1, list_to_cstruct [ 3; 2 ]); 12 12 - (`TLS_1_2, list_to_cstruct [ 3; 3 ]); 13 13 - ] 14 14 - 15 15 - let version_tests = 16 16 - List.mapi 17 17 - (fun i f -> "Assemble version " ^ string_of_int i >:: version_assembler f) 18 18 - version_assembler_tests 19 19 - 20 20 - let hdr_assembler (ver, ct, cs, res) _ = 21 21 - let buf = Writer.assemble_hdr ver (ct, list_to_cstruct cs) in 22 22 - let res' = list_to_cstruct res in 23 23 - assert_cs_eq buf res' 24 24 - 25 25 - let hdr_assembler_tests = 26 26 - [ 27 27 - (`TLS_1_2, Packet.CHANGE_CIPHER_SPEC, [], [ 20; 3; 3; 0; 0 ]); 28 28 - (`TLS_1_1, Packet.CHANGE_CIPHER_SPEC, [], [ 20; 3; 2; 0; 0 ]); 29 29 - (`TLS_1_0, Packet.CHANGE_CIPHER_SPEC, [], [ 20; 3; 1; 0; 0 ]); 30 30 - ( `TLS_1_2, 31 31 - Packet.CHANGE_CIPHER_SPEC, 32 32 - [ 0; 0; 0 ], 33 33 - [ 20; 3; 3; 0; 3; 0; 0; 0 ] ); 34 34 - (`TLS_1_2, Packet.ALERT, [], [ 21; 3; 3; 0; 0 ]); 35 35 - (`TLS_1_1, Packet.ALERT, [], [ 21; 3; 2; 0; 0 ]); 36 36 - (`TLS_1_0, Packet.ALERT, [], [ 21; 3; 1; 0; 0 ]); 37 37 - (`TLS_1_2, Packet.ALERT, [ 0; 0; 0 ], [ 21; 3; 3; 0; 3; 0; 0; 0 ]); 38 38 - (`TLS_1_2, Packet.HANDSHAKE, [], [ 22; 3; 3; 0; 0 ]); 39 39 - (`TLS_1_1, Packet.HANDSHAKE, [], [ 22; 3; 2; 0; 0 ]); 40 40 - (`TLS_1_0, Packet.HANDSHAKE, [], [ 22; 3; 1; 0; 0 ]); 41 41 - (`TLS_1_2, Packet.HANDSHAKE, [ 0; 0; 0 ], [ 22; 3; 3; 0; 3; 0; 0; 0 ]); 42 42 - (`TLS_1_2, Packet.APPLICATION_DATA, [], [ 23; 3; 3; 0; 0 ]); 43 43 - (`TLS_1_1, Packet.APPLICATION_DATA, [], [ 23; 3; 2; 0; 0 ]); 44 44 - (`TLS_1_0, Packet.APPLICATION_DATA, [], [ 23; 3; 1; 0; 0 ]); 45 45 - (`TLS_1_2, Packet.APPLICATION_DATA, [ 0; 0; 0 ], [ 23; 3; 3; 0; 3; 0; 0; 0 ]); 46 46 - ] 47 47 - 48 48 - let hdr_tests = 49 49 - List.mapi 50 50 - (fun i f -> "Assemble header " ^ string_of_int i >:: hdr_assembler f) 51 51 - hdr_assembler_tests 52 52 - 53 53 - let alert_assembler (level, t, res) _ = 54 54 - let buf = 55 55 - match level with 56 56 - | None -> Writer.assemble_alert t 57 57 - | Some l -> Writer.assemble_alert ~level:l t 58 58 - in 59 59 - let res' = list_to_cstruct res in 60 60 - assert_cs_eq buf res' 61 61 - 62 62 - let alert_assembler_tests = 63 63 - Packet. 64 64 - [ 65 65 - (None, CLOSE_NOTIFY, [ 2; 0 ]); 66 66 - (None, UNEXPECTED_MESSAGE, [ 2; 10 ]); 67 67 - (None, BAD_RECORD_MAC, [ 2; 20 ]); 68 68 - (None, RECORD_OVERFLOW, [ 2; 22 ]); 69 69 - (None, HANDSHAKE_FAILURE, [ 2; 40 ]); 70 70 - (None, BAD_CERTIFICATE, [ 2; 42 ]); 71 71 - (None, CERTIFICATE_EXPIRED, [ 2; 45 ]); 72 72 - (None, DECODE_ERROR, [ 2; 50 ]); 73 73 - (None, PROTOCOL_VERSION, [ 2; 70 ]); 74 74 - (None, USER_CANCELED, [ 2; 90 ]); 75 75 - (None, NO_RENEGOTIATION, [ 2; 100 ]); 76 76 - (None, UNSUPPORTED_EXTENSION, [ 2; 110 ]); 77 77 - (None, UNRECOGNIZED_NAME, [ 2; 112 ]); 78 78 - (None, NO_APPLICATION_PROTOCOL, [ 2; 120 ]); 79 79 - (Some FATAL, CLOSE_NOTIFY, [ 2; 0 ]); 80 80 - (Some FATAL, UNEXPECTED_MESSAGE, [ 2; 10 ]); 81 81 - (Some FATAL, BAD_RECORD_MAC, [ 2; 20 ]); 82 82 - (Some FATAL, RECORD_OVERFLOW, [ 2; 22 ]); 83 83 - (Some FATAL, HANDSHAKE_FAILURE, [ 2; 40 ]); 84 84 - (Some FATAL, BAD_CERTIFICATE, [ 2; 42 ]); 85 85 - (Some FATAL, CERTIFICATE_EXPIRED, [ 2; 45 ]); 86 86 - (Some FATAL, DECODE_ERROR, [ 2; 50 ]); 87 87 - (Some FATAL, PROTOCOL_VERSION, [ 2; 70 ]); 88 88 - (Some FATAL, USER_CANCELED, [ 2; 90 ]); 89 89 - (Some FATAL, NO_RENEGOTIATION, [ 2; 100 ]); 90 90 - (Some FATAL, UNSUPPORTED_EXTENSION, [ 2; 110 ]); 91 91 - (Some FATAL, UNRECOGNIZED_NAME, [ 2; 112 ]); 92 92 - (Some FATAL, NO_APPLICATION_PROTOCOL, [ 2; 120 ]); 93 93 - (Some WARNING, CLOSE_NOTIFY, [ 1; 0 ]); 94 94 - (Some WARNING, UNEXPECTED_MESSAGE, [ 1; 10 ]); 95 95 - (Some WARNING, BAD_RECORD_MAC, [ 1; 20 ]); 96 96 - (Some WARNING, RECORD_OVERFLOW, [ 1; 22 ]); 97 97 - (Some WARNING, HANDSHAKE_FAILURE, [ 1; 40 ]); 98 98 - (Some WARNING, BAD_CERTIFICATE, [ 1; 42 ]); 99 99 - (Some WARNING, CERTIFICATE_EXPIRED, [ 1; 45 ]); 100 100 - (Some WARNING, DECODE_ERROR, [ 1; 50 ]); 101 101 - (Some WARNING, PROTOCOL_VERSION, [ 1; 70 ]); 102 102 - (Some WARNING, USER_CANCELED, [ 1; 90 ]); 103 103 - (Some WARNING, NO_RENEGOTIATION, [ 1; 100 ]); 104 104 - (Some WARNING, UNSUPPORTED_EXTENSION, [ 1; 110 ]); 105 105 - (Some WARNING, UNRECOGNIZED_NAME, [ 1; 112 ]); 106 106 - ] 107 107 - 108 108 - let alert_tests = 109 109 - List.mapi 110 110 - (fun i f -> "Assemble alert " ^ string_of_int i >:: alert_assembler f) 111 111 - alert_assembler_tests 112 112 - 113 113 - let ccs_test _ = 114 114 - let buf = Writer.assemble_change_cipher_spec in 115 115 - assert_cs_eq buf (list_to_cstruct [ 1 ]) 116 116 - 117 117 - let dh_assembler (p, res) _ = 118 118 - let buf = Writer.assemble_dh_parameters p in 119 119 - assert_cs_eq buf res 120 120 - 121 121 - let dh_assembler_tests = 122 122 - let a = 123 123 - list_to_cstruct [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] 124 124 - in 125 125 - let le = list_to_cstruct [ 0; 16 ] in 126 126 - let le2 = list_to_cstruct [ 0; 32 ] in 127 127 - let emp, empl = (list_to_cstruct [], list_to_cstruct [ 0; 0 ]) in 128 128 - Core. 129 129 - [ 130 130 - ({ dh_p = a; dh_g = a; dh_Ys = a }, le ^ a ^ le ^ a ^ le ^ a); 131 131 - ( { dh_p = a ^ a; dh_g = a; dh_Ys = a ^ a }, 132 132 - le2 ^ a ^ a ^ le ^ a ^ le2 ^ a ^ a ); 133 133 - ({ dh_p = emp; dh_g = emp; dh_Ys = emp }, empl ^ empl ^ empl); 134 134 - ({ dh_p = a; dh_g = emp; dh_Ys = emp }, le ^ a ^ empl ^ empl); 135 135 - ({ dh_p = emp; dh_g = a; dh_Ys = emp }, empl ^ le ^ a ^ empl); 136 136 - ({ dh_p = emp; dh_g = emp; dh_Ys = a }, empl ^ empl ^ le ^ a); 137 137 - ({ dh_p = emp; dh_g = a; dh_Ys = a }, empl ^ le ^ a ^ le ^ a); 138 138 - ({ dh_p = a; dh_g = a; dh_Ys = emp }, le ^ a ^ le ^ a ^ empl); 139 139 - ({ dh_p = a; dh_g = emp; dh_Ys = a }, le ^ a ^ empl ^ le ^ a); 140 140 - ] 141 141 - 142 142 - let dh_tests = 143 143 - List.mapi 144 144 - (fun i f -> "Assemble dh parameters " ^ string_of_int i >:: dh_assembler f) 145 145 - dh_assembler_tests 146 146 - 147 147 - let ds_assembler (p, res) _ = 148 148 - let buf = Writer.assemble_digitally_signed p in 149 149 - assert_cs_eq buf res 150 150 - 151 151 - let ds_assembler_tests = 152 152 - let a = 153 153 - list_to_cstruct [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] 154 154 - in 155 155 - let le = list_to_cstruct [ 0; 16 ] in 156 156 - let le2 = list_to_cstruct [ 0; 32 ] in 157 157 - let emp, empl = (list_to_cstruct [], list_to_cstruct [ 0; 0 ]) in 158 158 - [ (a, le ^ a); (a ^ a, le2 ^ a ^ a); (emp, empl) ] 159 159 - 160 160 - let ds_tests = 161 161 - List.mapi 162 162 - (fun i f -> 163 163 - "Assemble digitally signed " ^ string_of_int i >:: ds_assembler f) 164 164 - ds_assembler_tests 165 165 - 166 166 - let ds_1_2_assembler (sigalg, p, res) _ = 167 167 - let buf = Writer.assemble_digitally_signed_1_2 sigalg p in 168 168 - assert_cs_eq buf res 169 169 - 170 170 - let ds_1_2_assembler_tests = 171 171 - let a = 172 172 - list_to_cstruct [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] 173 173 - in 174 174 - let le = list_to_cstruct [ 0; 16 ] in 175 175 - let le2 = list_to_cstruct [ 0; 32 ] in 176 176 - let emp, empl = (list_to_cstruct [], list_to_cstruct [ 0; 0 ]) in 177 177 - [ 178 178 - (`RSA_PKCS1_MD5, a, list_to_cstruct [ 1; 1 ] ^ le ^ a); 179 179 - (`RSA_PKCS1_SHA1, a ^ a, list_to_cstruct [ 2; 1 ] ^ le2 ^ a ^ a); 180 180 - (`RSA_PSS_RSAENC_SHA256, emp, list_to_cstruct [ 8; 4 ] ^ empl); 181 181 - ] 182 182 - 183 183 - let ds_1_2_tests = 184 184 - List.mapi 185 185 - (fun i f -> 186 186 - "Assemble digitally signed 1.2 " ^ string_of_int i >:: ds_1_2_assembler f) 187 187 - ds_1_2_assembler_tests 188 188 - 189 189 - let handshake_assembler (h, res) _ = 190 190 - let res' = list_to_cstruct res in 191 191 - let buf = Writer.assemble_handshake h in 192 192 - assert_cs_eq buf res' 193 193 - 194 194 - let handshake_assembler_tests = 195 195 - let a_l = [ 0; 1; 2; 3; 4; 5; 6; 7; 8; 9; 10; 11; 12; 13; 14; 15 ] in 196 196 - let a_cs = list_to_cstruct a_l in 197 197 - let le = [ 0; 0; 16 ] in 198 198 - let le2 = [ 0; 0; 32 ] in 199 199 - let emp, empl = (list_to_cstruct [], [ 0; 0; 0 ]) in 200 200 - Core. 201 201 - [ 202 202 - (HelloRequest, [ 0; 0; 0; 0 ]); 203 203 - (ServerHelloDone, [ 14; 0; 0; 0 ]); 204 204 - (Finished a_cs, [ 20 ] @ le @ a_l); 205 205 - (Finished emp, [ 20 ] @ empl); 206 206 - (Finished (a_cs ^ a_cs), [ 20 ] @ le2 @ a_l @ a_l); 207 207 - (ClientKeyExchange emp, [ 16; 0; 0; 0 ]); 208 208 - (ClientKeyExchange a_cs, [ 16; 0; 0; 16 ] @ a_l); 209 209 - (ClientKeyExchange (a_cs ^ a_cs), [ 16; 0; 0; 32 ] @ a_l @ a_l); 210 210 - (ServerKeyExchange emp, [ 12 ] @ empl); 211 211 - (ServerKeyExchange a_cs, [ 12 ] @ le @ a_l); 212 212 - (ServerKeyExchange (a_cs ^ a_cs), [ 12 ] @ le2 @ a_l @ a_l); 213 213 - (Certificate (Writer.assemble_certificates []), [ 11; 0; 0; 3; 0; 0; 0 ]); 214 214 - ( Certificate (Writer.assemble_certificates [ emp ]), 215 215 - [ 11; 0; 0; 6; 0; 0; 3; 0; 0; 0 ] ); 216 216 - ( Certificate (Writer.assemble_certificates [ emp; emp ]), 217 217 - [ 11; 0; 0; 9; 0; 0; 6; 0; 0; 0; 0; 0; 0 ] ); 218 218 - ( Certificate (Writer.assemble_certificates [ a_cs ]), 219 219 - [ 11; 0; 0; 22; 0; 0; 19 ] @ le @ a_l ); 220 220 - ( Certificate (Writer.assemble_certificates [ a_cs; emp ]), 221 221 - [ 11; 0; 0; 25; 0; 0; 22 ] @ le @ a_l @ [ 0; 0; 0 ] ); 222 222 - ( Certificate (Writer.assemble_certificates [ emp; a_cs ]), 223 223 - [ 11; 0; 0; 25; 0; 0; 22; 0; 0; 0 ] @ le @ a_l ); 224 224 - ( Certificate (Writer.assemble_certificates [ emp; a_cs; emp ]), 225 225 - [ 11; 0; 0; 28; 0; 0; 25; 0; 0; 0 ] @ le @ a_l @ [ 0; 0; 0 ] ); 226 226 - ( Certificate (Writer.assemble_certificates [ a_cs; emp; a_cs ]), 227 227 - [ 11; 0; 0; 44; 0; 0; 41 ] @ le @ a_l @ [ 0; 0; 0 ] @ le @ a_l ); 228 228 - ( Certificate (Writer.assemble_certificates [ a_cs; emp; a_cs; emp ]), 229 229 - [ 11; 0; 0; 47; 0; 0; 44 ] @ le @ a_l @ [ 0; 0; 0 ] @ le @ a_l 230 230 - @ [ 0; 0; 0 ] ); 231 231 - ( ClientHello 232 232 - { 233 233 - client_version = `TLS_1_2; 234 234 - client_random = a_cs ^ a_cs; 235 235 - sessionid = None; 236 236 - ciphersuites = []; 237 237 - extensions = []; 238 238 - }, 239 239 - [ 1; 0; 0; 39; 3; 3 ] @ a_l @ a_l @ [ 0; 0; 0; 1; 0 ] ); 240 240 - ( ClientHello 241 241 - { 242 242 - client_version = `TLS_1_1; 243 243 - client_random = a_cs ^ a_cs; 244 244 - sessionid = None; 245 245 - ciphersuites = []; 246 246 - extensions = []; 247 247 - }, 248 248 - [ 1; 0; 0; 39; 3; 2 ] @ a_l @ a_l @ [ 0; 0; 0; 1; 0 ] ); 249 249 - ( ClientHello 250 250 - { 251 251 - client_version = `TLS_1_0; 252 252 - client_random = a_cs ^ a_cs; 253 253 - sessionid = None; 254 254 - ciphersuites = []; 255 255 - extensions = []; 256 256 - }, 257 257 - [ 1; 0; 0; 39; 3; 1 ] @ a_l @ a_l @ [ 0; 0; 0; 1; 0 ] ); 258 258 - ( ClientHello 259 259 - { 260 260 - client_version = `TLS_1_2; 261 261 - client_random = a_cs ^ a_cs; 262 262 - sessionid = None; 263 263 - ciphersuites = [ Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA ]; 264 264 - extensions = []; 265 265 - }, 266 266 - [ 1; 0; 0; 41; 3; 3 ] @ a_l @ a_l @ [ 0; 0; 2; 0; 0x0a; 1; 0 ] ); 267 267 - ( ClientHello 268 268 - { 269 269 - client_version = `TLS_1_2; 270 270 - client_random = a_cs ^ a_cs; 271 271 - sessionid = None; 272 272 - ciphersuites = 273 273 - Packet. 274 274 - [ 275 275 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; 276 276 - TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 277 277 - TLS_RSA_WITH_AES_128_CBC_SHA; 278 278 - TLS_DHE_RSA_WITH_AES_128_CBC_SHA; 279 279 - ]; 280 280 - extensions = []; 281 281 - }, 282 282 - [ 1; 0; 0; 47; 3; 3 ] @ a_l @ a_l 283 283 - @ [ 0; 0; 8; 0; 0x0A; 0; 0x16; 0; 0x2F; 0; 0x33; 1; 0 ] ); 284 284 - ( ClientHello 285 285 - { 286 286 - client_version = `TLS_1_2; 287 287 - client_random = a_cs ^ a_cs; 288 288 - sessionid = None; 289 289 - ciphersuites = 290 290 - Packet. 291 291 - [ 292 292 - TLS_RSA_WITH_3DES_EDE_CBC_SHA; 293 293 - TLS_DHE_RSA_WITH_3DES_EDE_CBC_SHA; 294 294 - TLS_RSA_WITH_AES_128_CBC_SHA; 295 295 - TLS_DHE_RSA_WITH_AES_128_CBC_SHA; 296 296 - ]; 297 297 - extensions = 298 298 - [ 299 299 - `SignatureAlgorithms 300 300 - [ 301 301 - `RSA_PKCS1_SHA512; 302 302 - `RSA_PKCS1_SHA384; 303 303 - `RSA_PKCS1_SHA256; 304 304 - `RSA_PKCS1_SHA224; 305 305 - `RSA_PKCS1_SHA1; 306 306 - ]; 307 307 - ]; 308 308 - }, 309 309 - [ 1; 0; 0; 65; 3; 3 ] @ a_l @ a_l 310 310 - @ [ 311 311 - 0; 312 312 - 0; 313 313 - 8; 314 314 - 0; 315 315 - 0x0A; 316 316 - 0; 317 317 - 0x16; 318 318 - 0; 319 319 - 0x2F; 320 320 - 0; 321 321 - 0x33; 322 322 - 1; 323 323 - 0; 324 324 - 0; 325 325 - 0x10; 326 326 - 0x00; 327 327 - 0x0d; 328 328 - 0x00; 329 329 - 0x0c; 330 330 - (* signature algorithms *) 331 331 - 0x00; 332 332 - 0x0a; 333 333 - 0x06; 334 334 - 0x01; 335 335 - 0x05; 336 336 - 0x01; 337 337 - 0x04; 338 338 - 0x01; 339 339 - 0x03; 340 340 - 0x01; 341 341 - 0x02; 342 342 - 0x01; 343 343 - ] ); 344 344 - ( ClientHello 345 345 - { 346 346 - client_version = `TLS_1_2; 347 347 - client_random = a_cs ^ a_cs; 348 348 - sessionid = None; 349 349 - ciphersuites = [ Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA ]; 350 350 - extensions = [ `ALPN [ "h2"; "http/1.1" ] ]; 351 351 - }, 352 352 - [ 1; 0; 0; 61; 3; 3 ] @ a_l @ a_l 353 353 - @ [ 354 354 - 0; 355 355 - 0; 356 356 - 2; 357 357 - 0; 358 358 - 0x0A; 359 359 - 1; 360 360 - 0; 361 361 - 0; 362 362 - 18; 363 363 - 0; 364 364 - 16; 365 365 - 0; 366 366 - 14; 367 367 - 0; 368 368 - 12; 369 369 - 2; 370 370 - 104; 371 371 - 50; 372 372 - 8; 373 373 - 104; 374 374 - 116; 375 375 - 116; 376 376 - 112; 377 377 - 47; 378 378 - 49; 379 379 - 46; 380 380 - 49; 381 381 - ] ); 382 382 - ( ClientHello 383 383 - { 384 384 - client_version = `TLS_1_2; 385 385 - client_random = a_cs ^ a_cs; 386 386 - sessionid = None; 387 387 - ciphersuites = [ Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA ]; 388 388 - extensions = [ make_hostname_ext "foo" ]; 389 389 - }, 390 390 - [ 1; 0; 0; 55; 3; 3 ] @ a_l @ a_l 391 391 - @ [ 392 392 - 0; 393 393 - 0; 394 394 - 2; 395 395 - 0; 396 396 - 0x0A; 397 397 - 1; 398 398 - 0; 399 399 - 0; 400 400 - 12; 401 401 - 0; 402 402 - 0; 403 403 - 0; 404 404 - 8; 405 405 - 0; 406 406 - 6; 407 407 - 0; 408 408 - 0; 409 409 - 3; 410 410 - 102; 411 411 - 111; 412 412 - 111; 413 413 - ] ); 414 414 - ( ClientHello 415 415 - { 416 416 - client_version = `TLS_1_2; 417 417 - client_random = a_cs ^ a_cs; 418 418 - sessionid = None; 419 419 - ciphersuites = [ Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA ]; 420 420 - extensions = [ make_hostname_ext "foofoofoofoofoofoofoofoofoofoo" ]; 421 421 - }, 422 422 - [ 1; 0; 0; 82; 3; 3 ] @ a_l @ a_l 423 423 - @ [ 424 424 - 0; 425 425 - 0; 426 426 - 2; 427 427 - 0; 428 428 - 0x0A; 429 429 - 1; 430 430 - 0; 431 431 - 0; 432 432 - 39; 433 433 - 0; 434 434 - 0; 435 435 - 0; 436 436 - 35; 437 437 - 0; 438 438 - 33; 439 439 - 0; 440 440 - 0; 441 441 - 30; 442 442 - 102; 443 443 - 111; 444 444 - 111; 445 445 - 102; 446 446 - 111; 447 447 - 111; 448 448 - 102; 449 449 - 111; 450 450 - 111; 451 451 - 102; 452 452 - 111; 453 453 - 111; 454 454 - 102; 455 455 - 111; 456 456 - 111; 457 457 - 102; 458 458 - 111; 459 459 - 111; 460 460 - 102; 461 461 - 111; 462 462 - 111; 463 463 - 102; 464 464 - 111; 465 465 - 111; 466 466 - 102; 467 467 - 111; 468 468 - 111; 469 469 - 102; 470 470 - 111; 471 471 - 111; 472 472 - ] ); 473 473 - ( ClientHello 474 474 - { 475 475 - client_version = `TLS_1_2; 476 476 - client_random = a_cs ^ a_cs; 477 477 - sessionid = None; 478 478 - ciphersuites = [ Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA ]; 479 479 - extensions = 480 480 - [ 481 481 - make_hostname_ext 482 482 - "foofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoo.foofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoo.foofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoof"; 483 483 - ]; 484 484 - }, 485 485 - [ 1; 0; 0; 232; 3; 3 ] @ a_l @ a_l 486 486 - @ [ 487 487 - 0; 488 488 - 0; 489 489 - 2; 490 490 - 0; 491 491 - 0x0A; 492 492 - 1; 493 493 - 0; 494 494 - 0; 495 495 - 189; 496 496 - 0; 497 497 - 0; 498 498 - 0; 499 499 - 185; 500 500 - 0; 501 501 - 183; 502 502 - 0; 503 503 - 0; 504 504 - 180; 505 505 - 102; 506 506 - 111; 507 507 - 111; 508 508 - 102; 509 509 - 111; 510 510 - 111; 511 511 - 102; 512 512 - 111; 513 513 - 111; 514 514 - 102; 515 515 - 111; 516 516 - 111; 517 517 - 102; 518 518 - 111; 519 519 - 111; 520 520 - 102; 521 521 - 111; 522 522 - 111; 523 523 - 102; 524 524 - 111; 525 525 - 111; 526 526 - 102; 527 527 - 111; 528 528 - 111; 529 529 - 102; 530 530 - 111; 531 531 - 111; 532 532 - 102; 533 533 - 111; 534 534 - 111; 535 535 - 102; 536 536 - 111; 537 537 - 111; 538 538 - 102; 539 539 - 111; 540 540 - 111; 541 541 - 102; 542 542 - 111; 543 543 - 111; 544 544 - 102; 545 545 - 111; 546 546 - 111; 547 547 - 102; 548 548 - 111; 549 549 - 111; 550 550 - 102; 551 551 - 111; 552 552 - 111; 553 553 - 102; 554 554 - 111; 555 555 - 111; 556 556 - 102; 557 557 - 111; 558 558 - 111; 559 559 - 102; 560 560 - 111; 561 561 - 111; 562 562 - 102; 563 563 - 111; 564 564 - 111; 565 565 - 46; 566 566 - 102; 567 567 - 111; 568 568 - 111; 569 569 - 102; 570 570 - 111; 571 571 - 111; 572 572 - 102; 573 573 - 111; 574 574 - 111; 575 575 - 102; 576 576 - 111; 577 577 - 111; 578 578 - 102; 579 579 - 111; 580 580 - 111; 581 581 - 102; 582 582 - 111; 583 583 - 111; 584 584 - 102; 585 585 - 111; 586 586 - 111; 587 587 - 102; 588 588 - 111; 589 589 - 111; 590 590 - 102; 591 591 - 111; 592 592 - 111; 593 593 - 102; 594 594 - 111; 595 595 - 111; 596 596 - 102; 597 597 - 111; 598 598 - 111; 599 599 - 102; 600 600 - 111; 601 601 - 111; 602 602 - 102; 603 603 - 111; 604 604 - 111; 605 605 - 102; 606 606 - 111; 607 607 - 111; 608 608 - 102; 609 609 - 111; 610 610 - 111; 611 611 - 102; 612 612 - 111; 613 613 - 111; 614 614 - 102; 615 615 - 111; 616 616 - 111; 617 617 - 102; 618 618 - 111; 619 619 - 111; 620 620 - 102; 621 621 - 111; 622 622 - 111; 623 623 - 102; 624 624 - 111; 625 625 - 111; 626 626 - 46; 627 627 - 102; 628 628 - 111; 629 629 - 111; 630 630 - 102; 631 631 - 111; 632 632 - 111; 633 633 - 102; 634 634 - 111; 635 635 - 111; 636 636 - 102; 637 637 - 111; 638 638 - 111; 639 639 - 102; 640 640 - 111; 641 641 - 111; 642 642 - 102; 643 643 - 111; 644 644 - 111; 645 645 - 102; 646 646 - 111; 647 647 - 111; 648 648 - 102; 649 649 - 111; 650 650 - 111; 651 651 - 102; 652 652 - 111; 653 653 - 111; 654 654 - 102; 655 655 - 111; 656 656 - 111; 657 657 - 102; 658 658 - 111; 659 659 - 111; 660 660 - 102; 661 661 - 111; 662 662 - 111; 663 663 - 102; 664 664 - 111; 665 665 - 111; 666 666 - 102; 667 667 - 111; 668 668 - 111; 669 669 - 102; 670 670 - 111; 671 671 - 111; 672 672 - 102; 673 673 - 111; 674 674 - 111; 675 675 - 102; 676 676 - 111; 677 677 - 111; 678 678 - 102; 679 679 - 111; 680 680 - 111; 681 681 - 102; 682 682 - 111; 683 683 - 111; 684 684 - 102; 685 685 - ] ); 686 686 - (* this one is the smallest which needs extra padding 687 687 - (due to its size being > 256 and < 511) *) 688 688 - ( ClientHello 689 689 - { 690 690 - client_version = `TLS_1_2; 691 691 - client_random = a_cs ^ a_cs; 692 692 - sessionid = None; 693 693 - ciphersuites = [ Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA ]; 694 694 - extensions = 695 695 - [ 696 696 - make_hostname_ext 697 697 - "foofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoo.foofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoo.foofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoo.foofoofoofoofoofoofo"; 698 698 - ]; 699 699 - }, 700 700 - [ 1; 0; 1; 0xFC; 3; 3 ] @ a_l @ a_l 701 701 - @ [ 702 702 - 0; 703 703 - 0; 704 704 - 2; 705 705 - 0; 706 706 - 0x0A; 707 707 - 1; 708 708 - 0; 709 709 - 1; 710 710 - 0xD1; 711 711 - 0; 712 712 - 0; 713 713 - 0; 714 714 - 0xD0; 715 715 - 0; 716 716 - 0xCE; 717 717 - 0; 718 718 - 0; 719 719 - 0xCB; 720 720 - 102; 721 721 - 111; 722 722 - 111; 723 723 - 102; 724 724 - 111; 725 725 - 111; 726 726 - 102; 727 727 - 111; 728 728 - 111; 729 729 - 102; 730 730 - 111; 731 731 - 111; 732 732 - 102; 733 733 - 111; 734 734 - 111; 735 735 - 102; 736 736 - 111; 737 737 - 111; 738 738 - 102; 739 739 - 111; 740 740 - 111; 741 741 - 102; 742 742 - 111; 743 743 - 111; 744 744 - 102; 745 745 - 111; 746 746 - 111; 747 747 - 102; 748 748 - 111; 749 749 - 111; 750 750 - 102; 751 751 - 111; 752 752 - 111; 753 753 - 102; 754 754 - 111; 755 755 - 111; 756 756 - 102; 757 757 - 111; 758 758 - 111; 759 759 - 102; 760 760 - 111; 761 761 - 111; 762 762 - 102; 763 763 - 111; 764 764 - 111; 765 765 - 102; 766 766 - 111; 767 767 - 111; 768 768 - 102; 769 769 - 111; 770 770 - 111; 771 771 - 102; 772 772 - 111; 773 773 - 111; 774 774 - 102; 775 775 - 111; 776 776 - 111; 777 777 - 102; 778 778 - 111; 779 779 - 111; 780 780 - 46; 781 781 - 102; 782 782 - 111; 783 783 - 111; 784 784 - 102; 785 785 - 111; 786 786 - 111; 787 787 - 102; 788 788 - 111; 789 789 - 111; 790 790 - 102; 791 791 - 111; 792 792 - 111; 793 793 - 102; 794 794 - 111; 795 795 - 111; 796 796 - 102; 797 797 - 111; 798 798 - 111; 799 799 - 102; 800 800 - 111; 801 801 - 111; 802 802 - 102; 803 803 - 111; 804 804 - 111; 805 805 - 102; 806 806 - 111; 807 807 - 111; 808 808 - 102; 809 809 - 111; 810 810 - 111; 811 811 - 102; 812 812 - 111; 813 813 - 111; 814 814 - 102; 815 815 - 111; 816 816 - 111; 817 817 - 102; 818 818 - 111; 819 819 - 111; 820 820 - 102; 821 821 - 111; 822 822 - 111; 823 823 - 102; 824 824 - 111; 825 825 - 111; 826 826 - 102; 827 827 - 111; 828 828 - 111; 829 829 - 102; 830 830 - 111; 831 831 - 111; 832 832 - 102; 833 833 - 111; 834 834 - 111; 835 835 - 102; 836 836 - 111; 837 837 - 111; 838 838 - 102; 839 839 - 111; 840 840 - 111; 841 841 - 46; 842 842 - 102; 843 843 - 111; 844 844 - 111; 845 845 - 102; 846 846 - 111; 847 847 - 111; 848 848 - 102; 849 849 - 111; 850 850 - 111; 851 851 - 102; 852 852 - 111; 853 853 - 111; 854 854 - 102; 855 855 - 111; 856 856 - 111; 857 857 - 102; 858 858 - 111; 859 859 - 111; 860 860 - 102; 861 861 - 111; 862 862 - 111; 863 863 - 102; 864 864 - 111; 865 865 - 111; 866 866 - 102; 867 867 - 111; 868 868 - 111; 869 869 - 102; 870 870 - 111; 871 871 - 111; 872 872 - 102; 873 873 - 111; 874 874 - 111; 875 875 - 102; 876 876 - 111; 877 877 - 111; 878 878 - 102; 879 879 - 111; 880 880 - 111; 881 881 - 102; 882 882 - 111; 883 883 - 111; 884 884 - 102; 885 885 - 111; 886 886 - 111; 887 887 - 102; 888 888 - 111; 889 889 - 111; 890 890 - 102; 891 891 - 111; 892 892 - 111; 893 893 - 102; 894 894 - 111; 895 895 - 111; 896 896 - 102; 897 897 - 111; 898 898 - 111; 899 899 - 102; 900 900 - 111; 901 901 - 111; 902 902 - 46; 903 903 - 102; 904 904 - 111; 905 905 - 111; 906 906 - 102; 907 907 - 111; 908 908 - 111; 909 909 - 102; 910 910 - 111; 911 911 - 111; 912 912 - 102; 913 913 - 111; 914 914 - 111; 915 915 - 102; 916 916 - 111; 917 917 - 111; 918 918 - 102; 919 919 - 111; 920 920 - 111; 921 921 - 102; 922 922 - 111; 923 923 - 0; 924 924 - 21; 925 925 - 0; 926 926 - 0xF9; 927 927 - 0; 928 928 - 0; 929 929 - 0; 930 930 - 0; 931 931 - 0; 932 932 - 0; 933 933 - 0; 934 934 - 0; 935 935 - 0; 936 936 - 0; 937 937 - 0; 938 938 - 0; 939 939 - 0; 940 940 - 0; 941 941 - 0; 942 942 - 0; 943 943 - 0; 944 944 - 0; 945 945 - 0; 946 946 - 0; 947 947 - 0; 948 948 - 0; 949 949 - 0; 950 950 - 0; 951 951 - 0; 952 952 - 0; 953 953 - 0; 954 954 - 0; 955 955 - 0; 956 956 - 0; 957 957 - 0; 958 958 - 0; 959 959 - 0; 960 960 - 0; 961 961 - 0; 962 962 - 0; 963 963 - 0; 964 964 - 0; 965 965 - 0; 966 966 - 0; 967 967 - 0; 968 968 - 0; 969 969 - 0; 970 970 - 0; 971 971 - 0; 972 972 - 0; 973 973 - 0; 974 974 - 0; 975 975 - 0; 976 976 - 0; 977 977 - 0; 978 978 - 0; 979 979 - 0; 980 980 - 0; 981 981 - 0; 982 982 - 0; 983 983 - 0; 984 984 - 0; 985 985 - 0; 986 986 - 0; 987 987 - 0; 988 988 - 0; 989 989 - 0; 990 990 - 0; 991 991 - 0; 992 992 - 0; 993 993 - 0; 994 994 - 0; 995 995 - 0; 996 996 - 0; 997 997 - 0; 998 998 - 0; 999 999 - 0; 1000 1000 - 0; 1001 1001 - 0; 1002 1002 - 0; 1003 1003 - 0; 1004 1004 - 0; 1005 1005 - 0; 1006 1006 - 0; 1007 1007 - 0; 1008 1008 - 0; 1009 1009 - 0; 1010 1010 - 0; 1011 1011 - 0; 1012 1012 - 0; 1013 1013 - 0; 1014 1014 - 0; 1015 1015 - 0; 1016 1016 - 0; 1017 1017 - 0; 1018 1018 - 0; 1019 1019 - 0; 1020 1020 - 0; 1021 1021 - 0; 1022 1022 - 0; 1023 1023 - 0; 1024 1024 - 0; 1025 1025 - 0; 1026 1026 - 0; 1027 1027 - 0; 1028 1028 - 0; 1029 1029 - 0; 1030 1030 - 0; 1031 1031 - 0; 1032 1032 - 0; 1033 1033 - 0; 1034 1034 - 0; 1035 1035 - 0; 1036 1036 - 0; 1037 1037 - 0; 1038 1038 - 0; 1039 1039 - 0; 1040 1040 - 0; 1041 1041 - 0; 1042 1042 - 0; 1043 1043 - 0; 1044 1044 - 0; 1045 1045 - 0; 1046 1046 - 0; 1047 1047 - 0; 1048 1048 - 0; 1049 1049 - 0; 1050 1050 - 0; 1051 1051 - 0; 1052 1052 - 0; 1053 1053 - 0; 1054 1054 - 0; 1055 1055 - 0; 1056 1056 - 0; 1057 1057 - 0; 1058 1058 - 0; 1059 1059 - 0; 1060 1060 - 0; 1061 1061 - 0; 1062 1062 - 0; 1063 1063 - 0; 1064 1064 - 0; 1065 1065 - 0; 1066 1066 - 0; 1067 1067 - 0; 1068 1068 - 0; 1069 1069 - 0; 1070 1070 - 0; 1071 1071 - 0; 1072 1072 - 0; 1073 1073 - 0; 1074 1074 - 0; 1075 1075 - 0; 1076 1076 - 0; 1077 1077 - 0; 1078 1078 - 0; 1079 1079 - 0; 1080 1080 - 0; 1081 1081 - 0; 1082 1082 - 0; 1083 1083 - 0; 1084 1084 - 0; 1085 1085 - 0; 1086 1086 - 0; 1087 1087 - 0; 1088 1088 - 0; 1089 1089 - 0; 1090 1090 - 0; 1091 1091 - 0; 1092 1092 - 0; 1093 1093 - 0; 1094 1094 - 0; 1095 1095 - 0; 1096 1096 - 0; 1097 1097 - 0; 1098 1098 - 0; 1099 1099 - 0; 1100 1100 - 0; 1101 1101 - 0; 1102 1102 - 0; 1103 1103 - 0; 1104 1104 - 0; 1105 1105 - 0; 1106 1106 - 0; 1107 1107 - 0; 1108 1108 - 0; 1109 1109 - 0; 1110 1110 - 0; 1111 1111 - 0; 1112 1112 - 0; 1113 1113 - 0; 1114 1114 - 0; 1115 1115 - 0; 1116 1116 - 0; 1117 1117 - 0; 1118 1118 - 0; 1119 1119 - 0; 1120 1120 - 0; 1121 1121 - 0; 1122 1122 - 0; 1123 1123 - 0; 1124 1124 - 0; 1125 1125 - 0; 1126 1126 - 0; 1127 1127 - 0; 1128 1128 - 0; 1129 1129 - 0; 1130 1130 - 0; 1131 1131 - 0; 1132 1132 - 0; 1133 1133 - 0; 1134 1134 - 0; 1135 1135 - 0; 1136 1136 - 0; 1137 1137 - 0; 1138 1138 - 0; 1139 1139 - 0; 1140 1140 - 0; 1141 1141 - 0; 1142 1142 - 0; 1143 1143 - 0; 1144 1144 - 0; 1145 1145 - 0; 1146 1146 - 0; 1147 1147 - 0; 1148 1148 - 0; 1149 1149 - 0; 1150 1150 - 0; 1151 1151 - 0; 1152 1152 - 0; 1153 1153 - 0; 1154 1154 - 0; 1155 1155 - 0; 1156 1156 - 0; 1157 1157 - 0; 1158 1158 - 0; 1159 1159 - 0; 1160 1160 - 0; 1161 1161 - 0; 1162 1162 - 0; 1163 1163 - 0; 1164 1164 - 0; 1165 1165 - 0; 1166 1166 - 0; 1167 1167 - 0; 1168 1168 - 0; 1169 1169 - 0; 1170 1170 - 0; 1171 1171 - 0; 1172 1172 - 0; 1173 1173 - 0; 1174 1174 - 0; 1175 1175 - 0; 1176 1176 - ] ); 1177 1177 - (* this one is the biggest which needs no extra padding *) 1178 1178 - ( ClientHello 1179 1179 - { 1180 1180 - client_version = `TLS_1_2; 1181 1181 - client_random = a_cs ^ a_cs; 1182 1182 - sessionid = None; 1183 1183 - ciphersuites = [ Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA ]; 1184 1184 - extensions = 1185 1185 - [ 1186 1186 - make_hostname_ext 1187 1187 - "foofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoo.foofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoo.foofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoofoo.foofoofoofoofoof"; 1188 1188 - ]; 1189 1189 - }, 1190 1190 - [ 1; 0; 0; 251; 3; 3 ] @ a_l @ a_l 1191 1191 - @ [ 1192 1192 - 0; 1193 1193 - 0; 1194 1194 - 2; 1195 1195 - 0; 1196 1196 - 0x0A; 1197 1197 - 1; 1198 1198 - 0; 1199 1199 - 0; 1200 1200 - 208; 1201 1201 - 0; 1202 1202 - 0; 1203 1203 - 0; 1204 1204 - 204; 1205 1205 - 0; 1206 1206 - 202; 1207 1207 - 0; 1208 1208 - 0; 1209 1209 - 199; 1210 1210 - 102; 1211 1211 - 111; 1212 1212 - 111; 1213 1213 - 102; 1214 1214 - 111; 1215 1215 - 111; 1216 1216 - 102; 1217 1217 - 111; 1218 1218 - 111; 1219 1219 - 102; 1220 1220 - 111; 1221 1221 - 111; 1222 1222 - 102; 1223 1223 - 111; 1224 1224 - 111; 1225 1225 - 102; 1226 1226 - 111; 1227 1227 - 111; 1228 1228 - 102; 1229 1229 - 111; 1230 1230 - 111; 1231 1231 - 102; 1232 1232 - 111; 1233 1233 - 111; 1234 1234 - 102; 1235 1235 - 111; 1236 1236 - 111; 1237 1237 - 102; 1238 1238 - 111; 1239 1239 - 111; 1240 1240 - 102; 1241 1241 - 111; 1242 1242 - 111; 1243 1243 - 102; 1244 1244 - 111; 1245 1245 - 111; 1246 1246 - 102; 1247 1247 - 111; 1248 1248 - 111; 1249 1249 - 102; 1250 1250 - 111; 1251 1251 - 111; 1252 1252 - 102; 1253 1253 - 111; 1254 1254 - 111; 1255 1255 - 102; 1256 1256 - 111; 1257 1257 - 111; 1258 1258 - 102; 1259 1259 - 111; 1260 1260 - 111; 1261 1261 - 102; 1262 1262 - 111; 1263 1263 - 111; 1264 1264 - 102; 1265 1265 - 111; 1266 1266 - 111; 1267 1267 - 102; 1268 1268 - 111; 1269 1269 - 111; 1270 1270 - 46; 1271 1271 - 102; 1272 1272 - 111; 1273 1273 - 111; 1274 1274 - 102; 1275 1275 - 111; 1276 1276 - 111; 1277 1277 - 102; 1278 1278 - 111; 1279 1279 - 111; 1280 1280 - 102; 1281 1281 - 111; 1282 1282 - 111; 1283 1283 - 102; 1284 1284 - 111; 1285 1285 - 111; 1286 1286 - 102; 1287 1287 - 111; 1288 1288 - 111; 1289 1289 - 102; 1290 1290 - 111; 1291 1291 - 111; 1292 1292 - 102; 1293 1293 - 111; 1294 1294 - 111; 1295 1295 - 102; 1296 1296 - 111; 1297 1297 - 111; 1298 1298 - 102; 1299 1299 - 111; 1300 1300 - 111; 1301 1301 - 102; 1302 1302 - 111; 1303 1303 - 111; 1304 1304 - 102; 1305 1305 - 111; 1306 1306 - 111; 1307 1307 - 102; 1308 1308 - 111; 1309 1309 - 111; 1310 1310 - 102; 1311 1311 - 111; 1312 1312 - 111; 1313 1313 - 102; 1314 1314 - 111; 1315 1315 - 111; 1316 1316 - 102; 1317 1317 - 111; 1318 1318 - 111; 1319 1319 - 102; 1320 1320 - 111; 1321 1321 - 111; 1322 1322 - 102; 1323 1323 - 111; 1324 1324 - 111; 1325 1325 - 102; 1326 1326 - 111; 1327 1327 - 111; 1328 1328 - 102; 1329 1329 - 111; 1330 1330 - 111; 1331 1331 - 46; 1332 1332 - 102; 1333 1333 - 111; 1334 1334 - 111; 1335 1335 - 102; 1336 1336 - 111; 1337 1337 - 111; 1338 1338 - 102; 1339 1339 - 111; 1340 1340 - 111; 1341 1341 - 102; 1342 1342 - 111; 1343 1343 - 111; 1344 1344 - 102; 1345 1345 - 111; 1346 1346 - 111; 1347 1347 - 102; 1348 1348 - 111; 1349 1349 - 111; 1350 1350 - 102; 1351 1351 - 111; 1352 1352 - 111; 1353 1353 - 102; 1354 1354 - 111; 1355 1355 - 111; 1356 1356 - 102; 1357 1357 - 111; 1358 1358 - 111; 1359 1359 - 102; 1360 1360 - 111; 1361 1361 - 111; 1362 1362 - 102; 1363 1363 - 111; 1364 1364 - 111; 1365 1365 - 102; 1366 1366 - 111; 1367 1367 - 111; 1368 1368 - 102; 1369 1369 - 111; 1370 1370 - 111; 1371 1371 - 102; 1372 1372 - 111; 1373 1373 - 111; 1374 1374 - 102; 1375 1375 - 111; 1376 1376 - 111; 1377 1377 - 102; 1378 1378 - 111; 1379 1379 - 111; 1380 1380 - 102; 1381 1381 - 111; 1382 1382 - 111; 1383 1383 - 102; 1384 1384 - 111; 1385 1385 - 111; 1386 1386 - 102; 1387 1387 - 111; 1388 1388 - 111; 1389 1389 - 102; 1390 1390 - 111; 1391 1391 - 111; 1392 1392 - 46; 1393 1393 - 102; 1394 1394 - 111; 1395 1395 - 111; 1396 1396 - 102; 1397 1397 - 111; 1398 1398 - 111; 1399 1399 - 102; 1400 1400 - 111; 1401 1401 - 111; 1402 1402 - 102; 1403 1403 - 111; 1404 1404 - 111; 1405 1405 - 102; 1406 1406 - 111; 1407 1407 - 111; 1408 1408 - 102; 1409 1409 - ] ); 1410 1410 - (* this one is the biggest which needs no extra padding, and no exts *) 1411 1411 - ( ClientHello 1412 1412 - { 1413 1413 - client_version = `TLS_1_2; 1414 1414 - client_random = a_cs ^ a_cs; 1415 1415 - sessionid = None; 1416 1416 - ciphersuites = 1417 1417 - [ 1418 1418 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1419 1419 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1420 1420 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1421 1421 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1422 1422 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1423 1423 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1424 1424 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1425 1425 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1426 1426 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1427 1427 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1428 1428 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1429 1429 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1430 1430 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1431 1431 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1432 1432 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1433 1433 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1434 1434 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1435 1435 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1436 1436 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1437 1437 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1438 1438 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1439 1439 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1440 1440 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1441 1441 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1442 1442 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1443 1443 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1444 1444 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1445 1445 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1446 1446 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1447 1447 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1448 1448 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1449 1449 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1450 1450 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1451 1451 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1452 1452 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1453 1453 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1454 1454 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1455 1455 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1456 1456 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1457 1457 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1458 1458 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1459 1459 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1460 1460 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1461 1461 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1462 1462 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1463 1463 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1464 1464 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1465 1465 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1466 1466 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1467 1467 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1468 1468 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1469 1469 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1470 1470 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1471 1471 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1472 1472 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1473 1473 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1474 1474 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1475 1475 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1476 1476 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1477 1477 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1478 1478 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1479 1479 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1480 1480 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1481 1481 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1482 1482 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1483 1483 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1484 1484 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1485 1485 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1486 1486 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1487 1487 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1488 1488 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1489 1489 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1490 1490 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1491 1491 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1492 1492 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1493 1493 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1494 1494 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1495 1495 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1496 1496 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1497 1497 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1498 1498 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1499 1499 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1500 1500 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1501 1501 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1502 1502 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1503 1503 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1504 1504 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1505 1505 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1506 1506 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1507 1507 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1508 1508 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1509 1509 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1510 1510 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1511 1511 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1512 1512 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1513 1513 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1514 1514 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1515 1515 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1516 1516 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1517 1517 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1518 1518 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1519 1519 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1520 1520 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1521 1521 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1522 1522 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1523 1523 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1524 1524 - ]; 1525 1525 - extensions = []; 1526 1526 - }, 1527 1527 - [ 1; 0; 0; 251; 3; 3 ] @ a_l @ a_l 1528 1528 - @ [ 1529 1529 - 0; 1530 1530 - 0; 1531 1531 - 212; 1532 1532 - 0; 1533 1533 - 0x0A; 1534 1534 - 0; 1535 1535 - 0x0A; 1536 1536 - 0; 1537 1537 - 0x0A; 1538 1538 - 0; 1539 1539 - 0x0A; 1540 1540 - 0; 1541 1541 - 0x0A; 1542 1542 - 0; 1543 1543 - 0x0A; 1544 1544 - 0; 1545 1545 - 0x0A; 1546 1546 - 0; 1547 1547 - 0x0A; 1548 1548 - 0; 1549 1549 - 0x0A; 1550 1550 - 0; 1551 1551 - 0x0A; 1552 1552 - 0; 1553 1553 - 0x0A; 1554 1554 - 0; 1555 1555 - 0x0A; 1556 1556 - 0; 1557 1557 - 0x0A; 1558 1558 - 0; 1559 1559 - 0x0A; 1560 1560 - 0; 1561 1561 - 0x0A; 1562 1562 - 0; 1563 1563 - 0x0A; 1564 1564 - 0; 1565 1565 - 0x0A; 1566 1566 - 0; 1567 1567 - 0x0A; 1568 1568 - 0; 1569 1569 - 0x0A; 1570 1570 - 0; 1571 1571 - 0x0A; 1572 1572 - 0; 1573 1573 - 0x0A; 1574 1574 - 0; 1575 1575 - 0x0A; 1576 1576 - 0; 1577 1577 - 0x0A; 1578 1578 - 0; 1579 1579 - 0x0A; 1580 1580 - 0; 1581 1581 - 0x0A; 1582 1582 - 0; 1583 1583 - 0x0A; 1584 1584 - 0; 1585 1585 - 0x0A; 1586 1586 - 0; 1587 1587 - 0x0A; 1588 1588 - 0; 1589 1589 - 0x0A; 1590 1590 - 0; 1591 1591 - 0x0A; 1592 1592 - 0; 1593 1593 - 0x0A; 1594 1594 - 0; 1595 1595 - 0x0A; 1596 1596 - 0; 1597 1597 - 0x0A; 1598 1598 - 0; 1599 1599 - 0x0A; 1600 1600 - 0; 1601 1601 - 0x0A; 1602 1602 - 0; 1603 1603 - 0x0A; 1604 1604 - 0; 1605 1605 - 0x0A; 1606 1606 - 0; 1607 1607 - 0x0A; 1608 1608 - 0; 1609 1609 - 0x0A; 1610 1610 - 0; 1611 1611 - 0x0A; 1612 1612 - 0; 1613 1613 - 0x0A; 1614 1614 - 0; 1615 1615 - 0x0A; 1616 1616 - 0; 1617 1617 - 0x0A; 1618 1618 - 0; 1619 1619 - 0x0A; 1620 1620 - 0; 1621 1621 - 0x0A; 1622 1622 - 0; 1623 1623 - 0x0A; 1624 1624 - 0; 1625 1625 - 0x0A; 1626 1626 - 0; 1627 1627 - 0x0A; 1628 1628 - 0; 1629 1629 - 0x0A; 1630 1630 - 0; 1631 1631 - 0x0A; 1632 1632 - 0; 1633 1633 - 0x0A; 1634 1634 - 0; 1635 1635 - 0x0A; 1636 1636 - 0; 1637 1637 - 0x0A; 1638 1638 - 0; 1639 1639 - 0x0A; 1640 1640 - 0; 1641 1641 - 0x0A; 1642 1642 - 0; 1643 1643 - 0x0A; 1644 1644 - 0; 1645 1645 - 0x0A; 1646 1646 - 0; 1647 1647 - 0x0A; 1648 1648 - 0; 1649 1649 - 0x0A; 1650 1650 - 0; 1651 1651 - 0x0A; 1652 1652 - 0; 1653 1653 - 0x0A; 1654 1654 - 0; 1655 1655 - 0x0A; 1656 1656 - 0; 1657 1657 - 0x0A; 1658 1658 - 0; 1659 1659 - 0x0A; 1660 1660 - 0; 1661 1661 - 0x0A; 1662 1662 - 0; 1663 1663 - 0x0A; 1664 1664 - 0; 1665 1665 - 0x0A; 1666 1666 - 0; 1667 1667 - 0x0A; 1668 1668 - 0; 1669 1669 - 0x0A; 1670 1670 - 0; 1671 1671 - 0x0A; 1672 1672 - 0; 1673 1673 - 0x0A; 1674 1674 - 0; 1675 1675 - 0x0A; 1676 1676 - 0; 1677 1677 - 0x0A; 1678 1678 - 0; 1679 1679 - 0x0A; 1680 1680 - 0; 1681 1681 - 0x0A; 1682 1682 - 0; 1683 1683 - 0x0A; 1684 1684 - 0; 1685 1685 - 0x0A; 1686 1686 - 0; 1687 1687 - 0x0A; 1688 1688 - 0; 1689 1689 - 0x0A; 1690 1690 - 0; 1691 1691 - 0x0A; 1692 1692 - 0; 1693 1693 - 0x0A; 1694 1694 - 0; 1695 1695 - 0x0A; 1696 1696 - 0; 1697 1697 - 0x0A; 1698 1698 - 0; 1699 1699 - 0x0A; 1700 1700 - 0; 1701 1701 - 0x0A; 1702 1702 - 0; 1703 1703 - 0x0A; 1704 1704 - 0; 1705 1705 - 0x0A; 1706 1706 - 0; 1707 1707 - 0x0A; 1708 1708 - 0; 1709 1709 - 0x0A; 1710 1710 - 0; 1711 1711 - 0x0A; 1712 1712 - 0; 1713 1713 - 0x0A; 1714 1714 - 0; 1715 1715 - 0x0A; 1716 1716 - 0; 1717 1717 - 0x0A; 1718 1718 - 0; 1719 1719 - 0x0A; 1720 1720 - 0; 1721 1721 - 0x0A; 1722 1722 - 0; 1723 1723 - 0x0A; 1724 1724 - 0; 1725 1725 - 0x0A; 1726 1726 - 0; 1727 1727 - 0x0A; 1728 1728 - 0; 1729 1729 - 0x0A; 1730 1730 - 0; 1731 1731 - 0x0A; 1732 1732 - 0; 1733 1733 - 0x0A; 1734 1734 - 0; 1735 1735 - 0x0A; 1736 1736 - 0; 1737 1737 - 0x0A; 1738 1738 - 0; 1739 1739 - 0x0A; 1740 1740 - 0; 1741 1741 - 0x0A; 1742 1742 - 0; 1743 1743 - 0x0A; 1744 1744 - 1; 1745 1745 - 0; 1746 1746 - ] ); 1747 1747 - (* add one more, and we get into padding no exts *) 1748 1748 - ( ClientHello 1749 1749 - { 1750 1750 - client_version = `TLS_1_2; 1751 1751 - client_random = a_cs ^ a_cs; 1752 1752 - sessionid = None; 1753 1753 - ciphersuites = 1754 1754 - [ 1755 1755 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1756 1756 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1757 1757 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1758 1758 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1759 1759 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1760 1760 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1761 1761 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1762 1762 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1763 1763 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1764 1764 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1765 1765 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1766 1766 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1767 1767 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1768 1768 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1769 1769 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1770 1770 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1771 1771 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1772 1772 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1773 1773 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1774 1774 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1775 1775 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1776 1776 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1777 1777 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1778 1778 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1779 1779 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1780 1780 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1781 1781 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1782 1782 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1783 1783 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1784 1784 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1785 1785 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1786 1786 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1787 1787 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1788 1788 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1789 1789 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1790 1790 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1791 1791 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1792 1792 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1793 1793 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1794 1794 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1795 1795 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1796 1796 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1797 1797 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1798 1798 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1799 1799 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1800 1800 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1801 1801 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1802 1802 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1803 1803 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1804 1804 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1805 1805 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1806 1806 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1807 1807 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1808 1808 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1809 1809 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1810 1810 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1811 1811 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1812 1812 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1813 1813 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1814 1814 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1815 1815 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1816 1816 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1817 1817 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1818 1818 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1819 1819 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1820 1820 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1821 1821 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1822 1822 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1823 1823 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1824 1824 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1825 1825 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1826 1826 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1827 1827 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1828 1828 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1829 1829 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1830 1830 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1831 1831 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1832 1832 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1833 1833 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1834 1834 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1835 1835 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1836 1836 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1837 1837 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1838 1838 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1839 1839 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1840 1840 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1841 1841 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1842 1842 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1843 1843 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1844 1844 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1845 1845 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1846 1846 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1847 1847 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1848 1848 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1849 1849 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1850 1850 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1851 1851 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1852 1852 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1853 1853 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1854 1854 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1855 1855 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1856 1856 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1857 1857 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1858 1858 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1859 1859 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1860 1860 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1861 1861 - Packet.TLS_RSA_WITH_3DES_EDE_CBC_SHA; 1862 1862 - ]; 1863 1863 - extensions = []; 1864 1864 - }, 1865 1865 - [ 1; 0; 1; 0xFC; 3; 3 ] @ a_l @ a_l 1866 1866 - @ [ 1867 1867 - 0; 1868 1868 - 0; 1869 1869 - 214; 1870 1870 - 0; 1871 1871 - 0x0A; 1872 1872 - 0; 1873 1873 - 0x0A; 1874 1874 - 0; 1875 1875 - 0x0A; 1876 1876 - 0; 1877 1877 - 0x0A; 1878 1878 - 0; 1879 1879 - 0x0A; 1880 1880 - 0; 1881 1881 - 0x0A; 1882 1882 - 0; 1883 1883 - 0x0A; 1884 1884 - 0; 1885 1885 - 0x0A; 1886 1886 - 0; 1887 1887 - 0x0A; 1888 1888 - 0; 1889 1889 - 0x0A; 1890 1890 - 0; 1891 1891 - 0x0A; 1892 1892 - 0; 1893 1893 - 0x0A; 1894 1894 - 0; 1895 1895 - 0x0A; 1896 1896 - 0; 1897 1897 - 0x0A; 1898 1898 - 0; 1899 1899 - 0x0A; 1900 1900 - 0; 1901 1901 - 0x0A; 1902 1902 - 0; 1903 1903 - 0x0A; 1904 1904 - 0; 1905 1905 - 0x0A; 1906 1906 - 0; 1907 1907 - 0x0A; 1908 1908 - 0; 1909 1909 - 0x0A; 1910 1910 - 0; 1911 1911 - 0x0A; 1912 1912 - 0; 1913 1913 - 0x0A; 1914 1914 - 0; 1915 1915 - 0x0A; 1916 1916 - 0; 1917 1917 - 0x0A; 1918 1918 - 0; 1919 1919 - 0x0A; 1920 1920 - 0; 1921 1921 - 0x0A; 1922 1922 - 0; 1923 1923 - 0x0A; 1924 1924 - 0; 1925 1925 - 0x0A; 1926 1926 - 0; 1927 1927 - 0x0A; 1928 1928 - 0; 1929 1929 - 0x0A; 1930 1930 - 0; 1931 1931 - 0x0A; 1932 1932 - 0; 1933 1933 - 0x0A; 1934 1934 - 0; 1935 1935 - 0x0A; 1936 1936 - 0; 1937 1937 - 0x0A; 1938 1938 - 0; 1939 1939 - 0x0A; 1940 1940 - 0; 1941 1941 - 0x0A; 1942 1942 - 0; 1943 1943 - 0x0A; 1944 1944 - 0; 1945 1945 - 0x0A; 1946 1946 - 0; 1947 1947 - 0x0A; 1948 1948 - 0; 1949 1949 - 0x0A; 1950 1950 - 0; 1951 1951 - 0x0A; 1952 1952 - 0; 1953 1953 - 0x0A; 1954 1954 - 0; 1955 1955 - 0x0A; 1956 1956 - 0; 1957 1957 - 0x0A; 1958 1958 - 0; 1959 1959 - 0x0A; 1960 1960 - 0; 1961 1961 - 0x0A; 1962 1962 - 0; 1963 1963 - 0x0A; 1964 1964 - 0; 1965 1965 - 0x0A; 1966 1966 - 0; 1967 1967 - 0x0A; 1968 1968 - 0; 1969 1969 - 0x0A; 1970 1970 - 0; 1971 1971 - 0x0A; 1972 1972 - 0; 1973 1973 - 0x0A; 1974 1974 - 0; 1975 1975 - 0x0A; 1976 1976 - 0; 1977 1977 - 0x0A; 1978 1978 - 0; 1979 1979 - 0x0A; 1980 1980 - 0; 1981 1981 - 0x0A; 1982 1982 - 0; 1983 1983 - 0x0A; 1984 1984 - 0; 1985 1985 - 0x0A; 1986 1986 - 0; 1987 1987 - 0x0A; 1988 1988 - 0; 1989 1989 - 0x0A; 1990 1990 - 0; 1991 1991 - 0x0A; 1992 1992 - 0; 1993 1993 - 0x0A; 1994 1994 - 0; 1995 1995 - 0x0A; 1996 1996 - 0; 1997 1997 - 0x0A; 1998 1998 - 0; 1999 1999 - 0x0A; 2000 2000 - 0; 2001 2001 - 0x0A; 2002 2002 - 0; 2003 2003 - 0x0A; 2004 2004 - 0; 2005 2005 - 0x0A; 2006 2006 - 0; 2007 2007 - 0x0A; 2008 2008 - 0; 2009 2009 - 0x0A; 2010 2010 - 0; 2011 2011 - 0x0A; 2012 2012 - 0; 2013 2013 - 0x0A; 2014 2014 - 0; 2015 2015 - 0x0A; 2016 2016 - 0; 2017 2017 - 0x0A; 2018 2018 - 0; 2019 2019 - 0x0A; 2020 2020 - 0; 2021 2021 - 0x0A; 2022 2022 - 0; 2023 2023 - 0x0A; 2024 2024 - 0; 2025 2025 - 0x0A; 2026 2026 - 0; 2027 2027 - 0x0A; 2028 2028 - 0; 2029 2029 - 0x0A; 2030 2030 - 0; 2031 2031 - 0x0A; 2032 2032 - 0; 2033 2033 - 0x0A; 2034 2034 - 0; 2035 2035 - 0x0A; 2036 2036 - 0; 2037 2037 - 0x0A; 2038 2038 - 0; 2039 2039 - 0x0A; 2040 2040 - 0; 2041 2041 - 0x0A; 2042 2042 - 0; 2043 2043 - 0x0A; 2044 2044 - 0; 2045 2045 - 0x0A; 2046 2046 - 0; 2047 2047 - 0x0A; 2048 2048 - 0; 2049 2049 - 0x0A; 2050 2050 - 0; 2051 2051 - 0x0A; 2052 2052 - 0; 2053 2053 - 0x0A; 2054 2054 - 0; 2055 2055 - 0x0A; 2056 2056 - 0; 2057 2057 - 0x0A; 2058 2058 - 0; 2059 2059 - 0x0A; 2060 2060 - 0; 2061 2061 - 0x0A; 2062 2062 - 0; 2063 2063 - 0x0A; 2064 2064 - 0; 2065 2065 - 0x0A; 2066 2066 - 0; 2067 2067 - 0x0A; 2068 2068 - 0; 2069 2069 - 0x0A; 2070 2070 - 0; 2071 2071 - 0x0A; 2072 2072 - 0; 2073 2073 - 0x0A; 2074 2074 - 0; 2075 2075 - 0x0A; 2076 2076 - 0; 2077 2077 - 0x0A; 2078 2078 - 0; 2079 2079 - 0x0A; 2080 2080 - 0; 2081 2081 - 0x0A; 2082 2082 - 0; 2083 2083 - 0x0A; 2084 2084 - 1; 2085 2085 - 0; 2086 2086 - 0; 2087 2087 - 0xFD; 2088 2088 - 0; 2089 2089 - 0x15; 2090 2090 - 0; 2091 2091 - 0xF9; 2092 2092 - 0; 2093 2093 - 0; 2094 2094 - 0; 2095 2095 - 0; 2096 2096 - 0; 2097 2097 - 0; 2098 2098 - 0; 2099 2099 - 0; 2100 2100 - 0; 2101 2101 - 0; 2102 2102 - 0; 2103 2103 - 0; 2104 2104 - 0; 2105 2105 - 0; 2106 2106 - 0; 2107 2107 - 0; 2108 2108 - 0; 2109 2109 - 0; 2110 2110 - 0; 2111 2111 - 0; 2112 2112 - 0; 2113 2113 - 0; 2114 2114 - 0; 2115 2115 - 0; 2116 2116 - 0; 2117 2117 - 0; 2118 2118 - 0; 2119 2119 - 0; 2120 2120 - 0; 2121 2121 - 0; 2122 2122 - 0; 2123 2123 - 0; 2124 2124 - 0; 2125 2125 - 0; 2126 2126 - 0; 2127 2127 - 0; 2128 2128 - 0; 2129 2129 - 0; 2130 2130 - 0; 2131 2131 - 0; 2132 2132 - 0; 2133 2133 - 0; 2134 2134 - 0; 2135 2135 - 0; 2136 2136 - 0; 2137 2137 - 0; 2138 2138 - 0; 2139 2139 - 0; 2140 2140 - 0; 2141 2141 - 0; 2142 2142 - 0; 2143 2143 - 0; 2144 2144 - 0; 2145 2145 - 0; 2146 2146 - 0; 2147 2147 - 0; 2148 2148 - 0; 2149 2149 - 0; 2150 2150 - 0; 2151 2151 - 0; 2152 2152 - 0; 2153 2153 - 0; 2154 2154 - 0; 2155 2155 - 0; 2156 2156 - 0; 2157 2157 - 0; 2158 2158 - 0; 2159 2159 - 0; 2160 2160 - 0; 2161 2161 - 0; 2162 2162 - 0; 2163 2163 - 0; 2164 2164 - 0; 2165 2165 - 0; 2166 2166 - 0; 2167 2167 - 0; 2168 2168 - 0; 2169 2169 - 0; 2170 2170 - 0; 2171 2171 - 0; 2172 2172 - 0; 2173 2173 - 0; 2174 2174 - 0; 2175 2175 - 0; 2176 2176 - 0; 2177 2177 - 0; 2178 2178 - 0; 2179 2179 - 0; 2180 2180 - 0; 2181 2181 - 0; 2182 2182 - 0; 2183 2183 - 0; 2184 2184 - 0; 2185 2185 - 0; 2186 2186 - 0; 2187 2187 - 0; 2188 2188 - 0; 2189 2189 - 0; 2190 2190 - 0; 2191 2191 - 0; 2192 2192 - 0; 2193 2193 - 0; 2194 2194 - 0; 2195 2195 - 0; 2196 2196 - 0; 2197 2197 - 0; 2198 2198 - 0; 2199 2199 - 0; 2200 2200 - 0; 2201 2201 - 0; 2202 2202 - 0; 2203 2203 - 0; 2204 2204 - 0; 2205 2205 - 0; 2206 2206 - 0; 2207 2207 - 0; 2208 2208 - 0; 2209 2209 - 0; 2210 2210 - 0; 2211 2211 - 0; 2212 2212 - 0; 2213 2213 - 0; 2214 2214 - 0; 2215 2215 - 0; 2216 2216 - 0; 2217 2217 - 0; 2218 2218 - 0; 2219 2219 - 0; 2220 2220 - 0; 2221 2221 - 0; 2222 2222 - 0; 2223 2223 - 0; 2224 2224 - 0; 2225 2225 - 0; 2226 2226 - 0; 2227 2227 - 0; 2228 2228 - 0; 2229 2229 - 0; 2230 2230 - 0; 2231 2231 - 0; 2232 2232 - 0; 2233 2233 - 0; 2234 2234 - 0; 2235 2235 - 0; 2236 2236 - 0; 2237 2237 - 0; 2238 2238 - 0; 2239 2239 - 0; 2240 2240 - 0; 2241 2241 - 0; 2242 2242 - 0; 2243 2243 - 0; 2244 2244 - 0; 2245 2245 - 0; 2246 2246 - 0; 2247 2247 - 0; 2248 2248 - 0; 2249 2249 - 0; 2250 2250 - 0; 2251 2251 - 0; 2252 2252 - 0; 2253 2253 - 0; 2254 2254 - 0; 2255 2255 - 0; 2256 2256 - 0; 2257 2257 - 0; 2258 2258 - 0; 2259 2259 - 0; 2260 2260 - 0; 2261 2261 - 0; 2262 2262 - 0; 2263 2263 - 0; 2264 2264 - 0; 2265 2265 - 0; 2266 2266 - 0; 2267 2267 - 0; 2268 2268 - 0; 2269 2269 - 0; 2270 2270 - 0; 2271 2271 - 0; 2272 2272 - 0; 2273 2273 - 0; 2274 2274 - 0; 2275 2275 - 0; 2276 2276 - 0; 2277 2277 - 0; 2278 2278 - 0; 2279 2279 - 0; 2280 2280 - 0; 2281 2281 - 0; 2282 2282 - 0; 2283 2283 - 0; 2284 2284 - 0; 2285 2285 - 0; 2286 2286 - 0; 2287 2287 - 0; 2288 2288 - 0; 2289 2289 - 0; 2290 2290 - 0; 2291 2291 - 0; 2292 2292 - 0; 2293 2293 - 0; 2294 2294 - 0; 2295 2295 - 0; 2296 2296 - 0; 2297 2297 - 0; 2298 2298 - 0; 2299 2299 - 0; 2300 2300 - 0; 2301 2301 - 0; 2302 2302 - 0; 2303 2303 - 0; 2304 2304 - 0; 2305 2305 - 0; 2306 2306 - 0; 2307 2307 - 0; 2308 2308 - 0; 2309 2309 - 0; 2310 2310 - 0; 2311 2311 - 0; 2312 2312 - 0; 2313 2313 - 0; 2314 2314 - 0; 2315 2315 - 0; 2316 2316 - 0; 2317 2317 - 0; 2318 2318 - 0; 2319 2319 - 0; 2320 2320 - 0; 2321 2321 - 0; 2322 2322 - 0; 2323 2323 - 0; 2324 2324 - 0; 2325 2325 - 0; 2326 2326 - 0; 2327 2327 - 0; 2328 2328 - 0; 2329 2329 - 0; 2330 2330 - 0; 2331 2331 - 0; 2332 2332 - 0; 2333 2333 - 0; 2334 2334 - 0; 2335 2335 - 0; 2336 2336 - 0; 2337 2337 - 0; 2338 2338 - 0; 2339 2339 - 0; 2340 2340 - 0; 2341 2341 - ] ); 2342 2342 - ( ServerHello 2343 2343 - { 2344 2344 - server_version = `TLS_1_2; 2345 2345 - server_random = a_cs ^ a_cs; 2346 2346 - sessionid = None; 2347 2347 - ciphersuite = `RSA_WITH_AES_128_CCM; 2348 2348 - extensions = []; 2349 2349 - }, 2350 2350 - [ 2; 0; 0; 38; 3; 3 ] @ a_l @ a_l 2351 2351 - @ [ 2352 2352 - (* session id *) 0; (* cipher *) 0xc0; 0x9c; (* comp *) 0; (* exts *) 2353 2353 - ] ); 2354 2354 - ( ServerHello 2355 2355 - { 2356 2356 - server_version = `TLS_1_1; 2357 2357 - server_random = a_cs ^ a_cs; 2358 2358 - sessionid = None; 2359 2359 - ciphersuite = `RSA_WITH_AES_128_CCM; 2360 2360 - extensions = []; 2361 2361 - }, 2362 2362 - [ 2; 0; 0; 38; 3; 2 ] @ a_l @ a_l 2363 2363 - @ [ 2364 2364 - (* session id *) 0; (* cipher *) 0xc0; 0x9c; (* comp *) 0; (* exts *) 2365 2365 - ] ); 2366 2366 - ( ServerHello 2367 2367 - { 2368 2368 - server_version = `TLS_1_0; 2369 2369 - server_random = a_cs ^ a_cs; 2370 2370 - sessionid = None; 2371 2371 - ciphersuite = `RSA_WITH_AES_128_CCM; 2372 2372 - extensions = []; 2373 2373 - }, 2374 2374 - [ 2; 0; 0; 38; 3; 1 ] @ a_l @ a_l 2375 2375 - @ [ 2376 2376 - (* session id *) 0; (* cipher *) 0xc0; 0x9c; (* comp *) 0; (* exts *) 2377 2377 - ] ); 2378 2378 - ( ServerHello 2379 2379 - { 2380 2380 - server_version = `TLS_1_0; 2381 2381 - server_random = a_cs ^ a_cs; 2382 2382 - sessionid = Some a_cs; 2383 2383 - ciphersuite = `RSA_WITH_AES_128_CCM; 2384 2384 - extensions = []; 2385 2385 - }, 2386 2386 - [ 2; 0; 0; 54; 3; 1 ] @ a_l @ a_l (* session id *) @ [ 16 ] 2387 2387 - @ a_l 2388 2388 - @ [ (* cipher *) 0xc0; 0x9c; (* comp *) 0 (* exts *) ] ); 2389 2389 - ( ServerHello 2390 2390 - { 2391 2391 - server_version = `TLS_1_2; 2392 2392 - server_random = a_cs ^ a_cs; 2393 2393 - sessionid = None; 2394 2394 - ciphersuite = `RSA_WITH_AES_128_CCM; 2395 2395 - extensions = [ `Hostname ]; 2396 2396 - }, 2397 2397 - [ 2; 0; 0; 44; 3; 3 ] @ a_l @ a_l 2398 2398 - @ [ 2399 2399 - (* session id *) 2400 2400 - 0; 2401 2401 - (* cipher *) 2402 2402 - 0xc0; 2403 2403 - 0x9c; 2404 2404 - (* comp *) 2405 2405 - 0; 2406 2406 - (* exts *) 2407 2407 - 0; 2408 2408 - 4; 2409 2409 - 0; 2410 2410 - 0; 2411 2411 - 0; 2412 2412 - 0; 2413 2413 - ] ); 2414 2414 - ( ServerHello 2415 2415 - { 2416 2416 - server_version = `TLS_1_2; 2417 2417 - server_random = a_cs ^ a_cs; 2418 2418 - sessionid = None; 2419 2419 - ciphersuite = `RSA_WITH_AES_128_CCM; 2420 2420 - extensions = [ `SecureRenegotiation "" ]; 2421 2421 - }, 2422 2422 - [ 2; 0; 0; 45; 3; 3 ] @ a_l @ a_l 2423 2423 - @ [ 2424 2424 - (* session id *) 2425 2425 - 0; 2426 2426 - (* cipher *) 2427 2427 - 0xc0; 2428 2428 - 0x9c; 2429 2429 - (* comp *) 2430 2430 - 0; 2431 2431 - (* exts *) 2432 2432 - 0; 2433 2433 - 5; 2434 2434 - 0xFF; 2435 2435 - 1; 2436 2436 - 0; 2437 2437 - 1; 2438 2438 - 0; 2439 2439 - ] ); 2440 2440 - ( ServerHello 2441 2441 - { 2442 2442 - server_version = `TLS_1_2; 2443 2443 - server_random = a_cs ^ a_cs; 2444 2444 - sessionid = None; 2445 2445 - ciphersuite = `RSA_WITH_AES_128_CCM; 2446 2446 - extensions = [ `Hostname; `SecureRenegotiation "" ]; 2447 2447 - }, 2448 2448 - [ 2; 0; 0; 49; 3; 3 ] @ a_l @ a_l 2449 2449 - @ [ 2450 2450 - (* session id *) 2451 2451 - 0; 2452 2452 - (* cipher *) 2453 2453 - 0xc0; 2454 2454 - 0x9c; 2455 2455 - (* comp *) 2456 2456 - 0; 2457 2457 - (* exts *) 2458 2458 - 0; 2459 2459 - 9; 2460 2460 - 0; 2461 2461 - 0; 2462 2462 - 0; 2463 2463 - 0; 2464 2464 - 0xFF; 2465 2465 - 1; 2466 2466 - 0; 2467 2467 - 1; 2468 2468 - 0; 2469 2469 - ] ); 2470 2470 - ( ServerHello 2471 2471 - { 2472 2472 - server_version = `TLS_1_2; 2473 2473 - server_random = a_cs ^ a_cs; 2474 2474 - sessionid = None; 2475 2475 - ciphersuite = `RSA_WITH_AES_128_CCM; 2476 2476 - extensions = [ `SecureRenegotiation ""; `Hostname ]; 2477 2477 - }, 2478 2478 - [ 2; 0; 0; 49; 3; 3 ] @ a_l @ a_l 2479 2479 - @ [ 2480 2480 - (* session id *) 2481 2481 - 0; 2482 2482 - (* cipher *) 2483 2483 - 0xc0; 2484 2484 - 0x9c; 2485 2485 - (* comp *) 2486 2486 - 0; 2487 2487 - (* exts *) 2488 2488 - 0; 2489 2489 - 9; 2490 2490 - 0xFF; 2491 2491 - 1; 2492 2492 - 0; 2493 2493 - 1; 2494 2494 - 0; 2495 2495 - 0; 2496 2496 - 0; 2497 2497 - 0; 2498 2498 - 0; 2499 2499 - ] ); 2500 2500 - ( ServerHello 2501 2501 - { 2502 2502 - server_version = `TLS_1_2; 2503 2503 - server_random = a_cs ^ a_cs; 2504 2504 - sessionid = None; 2505 2505 - ciphersuite = `RSA_WITH_AES_128_CCM; 2506 2506 - extensions = [ `ALPN "h2" ]; 2507 2507 - }, 2508 2508 - [ 2; 0; 0; 49; 3; 3 ] @ a_l @ a_l 2509 2509 - @ [ 2510 2510 - (* session id *) 2511 2511 - 0; 2512 2512 - (* cipher *) 2513 2513 - 0xc0; 2514 2514 - 0x9c; 2515 2515 - (* comp *) 2516 2516 - 0; 2517 2517 - (* exts *) 2518 2518 - 0; 2519 2519 - 9; 2520 2520 - 0; 2521 2521 - 16; 2522 2522 - 0; 2523 2523 - 5; 2524 2524 - 0; 2525 2525 - 3; 2526 2526 - 2; 2527 2527 - 104; 2528 2528 - 50; 2529 2529 - ] ); 2530 2530 - (* | CertificateRequest of certificate_request *) 2531 2531 - ] 2532 2532 - 2533 2533 - let handshake_tests = 2534 2534 - List.mapi 2535 2535 - (fun i f -> 2536 2536 - "Assemble handshake " ^ string_of_int i >:: handshake_assembler f) 2537 2537 - handshake_assembler_tests 2538 2538 - 2539 2539 - let writer_tests = 2540 2540 - version_tests @ hdr_tests @ alert_tests 2541 2541 - @ [ "CCS " >:: ccs_test ] 2542 2542 - @ dh_tests @ ds_tests @ ds_1_2_tests @ handshake_tests