Andrew Boyson / crypto

Dependents:   oldheating gps motorhome heating

Revision:
17:93feb2a51d58
Parent:
9:f354b4859b0b
--- a/tls/tls-mac.c	Sun Oct 06 08:00:30 2019 +0000
+++ b/tls/tls-mac.c	Thu Oct 10 07:38:13 2019 +0000
@@ -21,8 +21,14 @@
     HmacSha1Start (&md, macKey, macKeyLength);
     uint8_t prequel[8 + 5];
     uint8_t *p = prequel;
-    for (int i = 0; i < 7; i++) *p++ = 0; //sequence
-    *p++ = sequence;
+    *p++ = sequence >> 56;
+    *p++ = sequence >> 48;
+    *p++ = sequence >> 40;
+    *p++ = sequence >> 32;
+    *p++ = sequence >> 24;
+    *p++ = sequence >> 16;
+    *p++ = sequence >>  8;
+    *p++ = sequence >>  0;
     *p++ = contentType;
     *p++ = versionH;
     *p++ = versionL;