File tree 2 files changed +5
-3
lines changed
2 files changed +5
-3
lines changed Original file line number Diff line number Diff line change @@ -121,6 +121,7 @@ register-codec [
121
121
;data: enbase data 2
122
122
]
123
123
INTEGER [
124
+ ;@@ TODO: review if the null skipping is correct!
124
125
if data/1 = 0 [data: next data]
125
126
]
126
127
]
Original file line number Diff line number Diff line change 1
1
REBOL [
2
2
title: "REBOL3 TLSv1.2 protocol scheme"
3
- name: ' tls
4
- type: ' module
3
+ name: tls
4
+ type: module
5
5
author: rights: ["Richard 'Cyphre' Smolak" "Oldes" "Brian Dickens (Hostilefork)" ]
6
6
version: 0.7.4
7
7
history: [
@@ -1599,7 +1599,8 @@ TLS-parse-handshake-message: function [
1599
1599
rsa_fixed_dh [
1600
1600
log-more "Checking signature using RSA_fixed_DH"
1601
1601
der: decode 'der signature
1602
- signature: join der/2/2 der/2/4
1602
+ ;@@ Review: der codec skips null char, which is needed here (reason for `head` calls)!
1603
+ signature: join head der/2/2 head der/2/4
1603
1604
;? ctx/pub-key
1604
1605
;? signature
1605
1606
;? ctx/pub-key
You can’t perform that action at this time.
0 commit comments