]> zoso.dev Git - libnemo.git/commitdiff
Commit snapshot from tweetnacl to modify for Nano.
authorChris Duncan <chris@zoso.dev>
Sat, 23 Nov 2024 08:39:39 +0000 (00:39 -0800)
committerChris Duncan <chris@zoso.dev>
Sat, 23 Nov 2024 08:39:39 +0000 (00:39 -0800)
src/lib/workers/nano25519.ts [new file with mode: 0644]

diff --git a/src/lib/workers/nano25519.ts b/src/lib/workers/nano25519.ts
new file mode 100644 (file)
index 0000000..fcc526e
--- /dev/null
@@ -0,0 +1,2392 @@
+(function(nacl) {\r
+       'use strict';\r
+       \r
+       // Ported in 2014 by Dmitry Chestnykh and Devi Mandiri.\r
+       // Public domain.\r
+       //\r
+       // Implementation derived from TweetNaCl version 20140427.\r
+       // See for details: http://tweetnacl.cr.yp.to/\r
+       \r
+       var gf = function(init) {\r
+               var i, r = new Float64Array(16);\r
+               if (init) for (i = 0; i < init.length; i++) r[i] = init[i];\r
+               return r;\r
+       };\r
+       \r
+       //  Pluggable, initialized in high-level API below.\r
+       var randombytes = function(/* x, n */) { throw new Error('no PRNG'); };\r
+       \r
+       var _0 = new Uint8Array(16);\r
+       var _9 = new Uint8Array(32); _9[0] = 9;\r
+       \r
+       var gf0 = gf(),\r
+                       gf1 = gf([1]),\r
+                       _121665 = gf([0xdb41, 1]),\r
+                       D = gf([0x78a3, 0x1359, 0x4dca, 0x75eb, 0xd8ab, 0x4141, 0x0a4d, 0x0070, 0xe898, 0x7779, 0x4079, 0x8cc7, 0xfe73, 0x2b6f, 0x6cee, 0x5203]),\r
+                       D2 = gf([0xf159, 0x26b2, 0x9b94, 0xebd6, 0xb156, 0x8283, 0x149a, 0x00e0, 0xd130, 0xeef3, 0x80f2, 0x198e, 0xfce7, 0x56df, 0xd9dc, 0x2406]),\r
+                       X = gf([0xd51a, 0x8f25, 0x2d60, 0xc956, 0xa7b2, 0x9525, 0xc760, 0x692c, 0xdc5c, 0xfdd6, 0xe231, 0xc0a4, 0x53fe, 0xcd6e, 0x36d3, 0x2169]),\r
+                       Y = gf([0x6658, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666, 0x6666]),\r
+                       I = gf([0xa0b0, 0x4a0e, 0x1b27, 0xc4ee, 0xe478, 0xad2f, 0x1806, 0x2f43, 0xd7a7, 0x3dfb, 0x0099, 0x2b4d, 0xdf0b, 0x4fc1, 0x2480, 0x2b83]);\r
+       \r
+       function ts64(x, i, h, l) {\r
+               x[i]   = (h >> 24) & 0xff;\r
+               x[i+1] = (h >> 16) & 0xff;\r
+               x[i+2] = (h >>  8) & 0xff;\r
+               x[i+3] = h & 0xff;\r
+               x[i+4] = (l >> 24)  & 0xff;\r
+               x[i+5] = (l >> 16)  & 0xff;\r
+               x[i+6] = (l >>  8)  & 0xff;\r
+               x[i+7] = l & 0xff;\r
+       }\r
+       \r
+       function vn(x, xi, y, yi, n) {\r
+               var i,d = 0;\r
+               for (i = 0; i < n; i++) d |= x[xi+i]^y[yi+i];\r
+               return (1 & ((d - 1) >>> 8)) - 1;\r
+       }\r
+       \r
+       function crypto_verify_16(x, xi, y, yi) {\r
+               return vn(x,xi,y,yi,16);\r
+       }\r
+       \r
+       function crypto_verify_32(x, xi, y, yi) {\r
+               return vn(x,xi,y,yi,32);\r
+       }\r
+       \r
+       function core_salsa20(o, p, k, c) {\r
+               var j0  = c[ 0] & 0xff | (c[ 1] & 0xff)<<8 | (c[ 2] & 0xff)<<16 | (c[ 3] & 0xff)<<24,\r
+                               j1  = k[ 0] & 0xff | (k[ 1] & 0xff)<<8 | (k[ 2] & 0xff)<<16 | (k[ 3] & 0xff)<<24,\r
+                               j2  = k[ 4] & 0xff | (k[ 5] & 0xff)<<8 | (k[ 6] & 0xff)<<16 | (k[ 7] & 0xff)<<24,\r
+                               j3  = k[ 8] & 0xff | (k[ 9] & 0xff)<<8 | (k[10] & 0xff)<<16 | (k[11] & 0xff)<<24,\r
+                               j4  = k[12] & 0xff | (k[13] & 0xff)<<8 | (k[14] & 0xff)<<16 | (k[15] & 0xff)<<24,\r
+                               j5  = c[ 4] & 0xff | (c[ 5] & 0xff)<<8 | (c[ 6] & 0xff)<<16 | (c[ 7] & 0xff)<<24,\r
+                               j6  = p[ 0] & 0xff | (p[ 1] & 0xff)<<8 | (p[ 2] & 0xff)<<16 | (p[ 3] & 0xff)<<24,\r
+                               j7  = p[ 4] & 0xff | (p[ 5] & 0xff)<<8 | (p[ 6] & 0xff)<<16 | (p[ 7] & 0xff)<<24,\r
+                               j8  = p[ 8] & 0xff | (p[ 9] & 0xff)<<8 | (p[10] & 0xff)<<16 | (p[11] & 0xff)<<24,\r
+                               j9  = p[12] & 0xff | (p[13] & 0xff)<<8 | (p[14] & 0xff)<<16 | (p[15] & 0xff)<<24,\r
+                               j10 = c[ 8] & 0xff | (c[ 9] & 0xff)<<8 | (c[10] & 0xff)<<16 | (c[11] & 0xff)<<24,\r
+                               j11 = k[16] & 0xff | (k[17] & 0xff)<<8 | (k[18] & 0xff)<<16 | (k[19] & 0xff)<<24,\r
+                               j12 = k[20] & 0xff | (k[21] & 0xff)<<8 | (k[22] & 0xff)<<16 | (k[23] & 0xff)<<24,\r
+                               j13 = k[24] & 0xff | (k[25] & 0xff)<<8 | (k[26] & 0xff)<<16 | (k[27] & 0xff)<<24,\r
+                               j14 = k[28] & 0xff | (k[29] & 0xff)<<8 | (k[30] & 0xff)<<16 | (k[31] & 0xff)<<24,\r
+                               j15 = c[12] & 0xff | (c[13] & 0xff)<<8 | (c[14] & 0xff)<<16 | (c[15] & 0xff)<<24;\r
+       \r
+               var x0 = j0, x1 = j1, x2 = j2, x3 = j3, x4 = j4, x5 = j5, x6 = j6, x7 = j7,\r
+                               x8 = j8, x9 = j9, x10 = j10, x11 = j11, x12 = j12, x13 = j13, x14 = j14,\r
+                               x15 = j15, u;\r
+       \r
+               for (var i = 0; i < 20; i += 2) {\r
+                       u = x0 + x12 | 0;\r
+                       x4 ^= u<<7 | u>>>(32-7);\r
+                       u = x4 + x0 | 0;\r
+                       x8 ^= u<<9 | u>>>(32-9);\r
+                       u = x8 + x4 | 0;\r
+                       x12 ^= u<<13 | u>>>(32-13);\r
+                       u = x12 + x8 | 0;\r
+                       x0 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x5 + x1 | 0;\r
+                       x9 ^= u<<7 | u>>>(32-7);\r
+                       u = x9 + x5 | 0;\r
+                       x13 ^= u<<9 | u>>>(32-9);\r
+                       u = x13 + x9 | 0;\r
+                       x1 ^= u<<13 | u>>>(32-13);\r
+                       u = x1 + x13 | 0;\r
+                       x5 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x10 + x6 | 0;\r
+                       x14 ^= u<<7 | u>>>(32-7);\r
+                       u = x14 + x10 | 0;\r
+                       x2 ^= u<<9 | u>>>(32-9);\r
+                       u = x2 + x14 | 0;\r
+                       x6 ^= u<<13 | u>>>(32-13);\r
+                       u = x6 + x2 | 0;\r
+                       x10 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x15 + x11 | 0;\r
+                       x3 ^= u<<7 | u>>>(32-7);\r
+                       u = x3 + x15 | 0;\r
+                       x7 ^= u<<9 | u>>>(32-9);\r
+                       u = x7 + x3 | 0;\r
+                       x11 ^= u<<13 | u>>>(32-13);\r
+                       u = x11 + x7 | 0;\r
+                       x15 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x0 + x3 | 0;\r
+                       x1 ^= u<<7 | u>>>(32-7);\r
+                       u = x1 + x0 | 0;\r
+                       x2 ^= u<<9 | u>>>(32-9);\r
+                       u = x2 + x1 | 0;\r
+                       x3 ^= u<<13 | u>>>(32-13);\r
+                       u = x3 + x2 | 0;\r
+                       x0 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x5 + x4 | 0;\r
+                       x6 ^= u<<7 | u>>>(32-7);\r
+                       u = x6 + x5 | 0;\r
+                       x7 ^= u<<9 | u>>>(32-9);\r
+                       u = x7 + x6 | 0;\r
+                       x4 ^= u<<13 | u>>>(32-13);\r
+                       u = x4 + x7 | 0;\r
+                       x5 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x10 + x9 | 0;\r
+                       x11 ^= u<<7 | u>>>(32-7);\r
+                       u = x11 + x10 | 0;\r
+                       x8 ^= u<<9 | u>>>(32-9);\r
+                       u = x8 + x11 | 0;\r
+                       x9 ^= u<<13 | u>>>(32-13);\r
+                       u = x9 + x8 | 0;\r
+                       x10 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x15 + x14 | 0;\r
+                       x12 ^= u<<7 | u>>>(32-7);\r
+                       u = x12 + x15 | 0;\r
+                       x13 ^= u<<9 | u>>>(32-9);\r
+                       u = x13 + x12 | 0;\r
+                       x14 ^= u<<13 | u>>>(32-13);\r
+                       u = x14 + x13 | 0;\r
+                       x15 ^= u<<18 | u>>>(32-18);\r
+               }\r
+                x0 =  x0 +  j0 | 0;\r
+                x1 =  x1 +  j1 | 0;\r
+                x2 =  x2 +  j2 | 0;\r
+                x3 =  x3 +  j3 | 0;\r
+                x4 =  x4 +  j4 | 0;\r
+                x5 =  x5 +  j5 | 0;\r
+                x6 =  x6 +  j6 | 0;\r
+                x7 =  x7 +  j7 | 0;\r
+                x8 =  x8 +  j8 | 0;\r
+                x9 =  x9 +  j9 | 0;\r
+               x10 = x10 + j10 | 0;\r
+               x11 = x11 + j11 | 0;\r
+               x12 = x12 + j12 | 0;\r
+               x13 = x13 + j13 | 0;\r
+               x14 = x14 + j14 | 0;\r
+               x15 = x15 + j15 | 0;\r
+       \r
+               o[ 0] = x0 >>>  0 & 0xff;\r
+               o[ 1] = x0 >>>  8 & 0xff;\r
+               o[ 2] = x0 >>> 16 & 0xff;\r
+               o[ 3] = x0 >>> 24 & 0xff;\r
+       \r
+               o[ 4] = x1 >>>  0 & 0xff;\r
+               o[ 5] = x1 >>>  8 & 0xff;\r
+               o[ 6] = x1 >>> 16 & 0xff;\r
+               o[ 7] = x1 >>> 24 & 0xff;\r
+       \r
+               o[ 8] = x2 >>>  0 & 0xff;\r
+               o[ 9] = x2 >>>  8 & 0xff;\r
+               o[10] = x2 >>> 16 & 0xff;\r
+               o[11] = x2 >>> 24 & 0xff;\r
+       \r
+               o[12] = x3 >>>  0 & 0xff;\r
+               o[13] = x3 >>>  8 & 0xff;\r
+               o[14] = x3 >>> 16 & 0xff;\r
+               o[15] = x3 >>> 24 & 0xff;\r
+       \r
+               o[16] = x4 >>>  0 & 0xff;\r
+               o[17] = x4 >>>  8 & 0xff;\r
+               o[18] = x4 >>> 16 & 0xff;\r
+               o[19] = x4 >>> 24 & 0xff;\r
+       \r
+               o[20] = x5 >>>  0 & 0xff;\r
+               o[21] = x5 >>>  8 & 0xff;\r
+               o[22] = x5 >>> 16 & 0xff;\r
+               o[23] = x5 >>> 24 & 0xff;\r
+       \r
+               o[24] = x6 >>>  0 & 0xff;\r
+               o[25] = x6 >>>  8 & 0xff;\r
+               o[26] = x6 >>> 16 & 0xff;\r
+               o[27] = x6 >>> 24 & 0xff;\r
+       \r
+               o[28] = x7 >>>  0 & 0xff;\r
+               o[29] = x7 >>>  8 & 0xff;\r
+               o[30] = x7 >>> 16 & 0xff;\r
+               o[31] = x7 >>> 24 & 0xff;\r
+       \r
+               o[32] = x8 >>>  0 & 0xff;\r
+               o[33] = x8 >>>  8 & 0xff;\r
+               o[34] = x8 >>> 16 & 0xff;\r
+               o[35] = x8 >>> 24 & 0xff;\r
+       \r
+               o[36] = x9 >>>  0 & 0xff;\r
+               o[37] = x9 >>>  8 & 0xff;\r
+               o[38] = x9 >>> 16 & 0xff;\r
+               o[39] = x9 >>> 24 & 0xff;\r
+       \r
+               o[40] = x10 >>>  0 & 0xff;\r
+               o[41] = x10 >>>  8 & 0xff;\r
+               o[42] = x10 >>> 16 & 0xff;\r
+               o[43] = x10 >>> 24 & 0xff;\r
+       \r
+               o[44] = x11 >>>  0 & 0xff;\r
+               o[45] = x11 >>>  8 & 0xff;\r
+               o[46] = x11 >>> 16 & 0xff;\r
+               o[47] = x11 >>> 24 & 0xff;\r
+       \r
+               o[48] = x12 >>>  0 & 0xff;\r
+               o[49] = x12 >>>  8 & 0xff;\r
+               o[50] = x12 >>> 16 & 0xff;\r
+               o[51] = x12 >>> 24 & 0xff;\r
+       \r
+               o[52] = x13 >>>  0 & 0xff;\r
+               o[53] = x13 >>>  8 & 0xff;\r
+               o[54] = x13 >>> 16 & 0xff;\r
+               o[55] = x13 >>> 24 & 0xff;\r
+       \r
+               o[56] = x14 >>>  0 & 0xff;\r
+               o[57] = x14 >>>  8 & 0xff;\r
+               o[58] = x14 >>> 16 & 0xff;\r
+               o[59] = x14 >>> 24 & 0xff;\r
+       \r
+               o[60] = x15 >>>  0 & 0xff;\r
+               o[61] = x15 >>>  8 & 0xff;\r
+               o[62] = x15 >>> 16 & 0xff;\r
+               o[63] = x15 >>> 24 & 0xff;\r
+       }\r
+       \r
+       function core_hsalsa20(o,p,k,c) {\r
+               var j0  = c[ 0] & 0xff | (c[ 1] & 0xff)<<8 | (c[ 2] & 0xff)<<16 | (c[ 3] & 0xff)<<24,\r
+                               j1  = k[ 0] & 0xff | (k[ 1] & 0xff)<<8 | (k[ 2] & 0xff)<<16 | (k[ 3] & 0xff)<<24,\r
+                               j2  = k[ 4] & 0xff | (k[ 5] & 0xff)<<8 | (k[ 6] & 0xff)<<16 | (k[ 7] & 0xff)<<24,\r
+                               j3  = k[ 8] & 0xff | (k[ 9] & 0xff)<<8 | (k[10] & 0xff)<<16 | (k[11] & 0xff)<<24,\r
+                               j4  = k[12] & 0xff | (k[13] & 0xff)<<8 | (k[14] & 0xff)<<16 | (k[15] & 0xff)<<24,\r
+                               j5  = c[ 4] & 0xff | (c[ 5] & 0xff)<<8 | (c[ 6] & 0xff)<<16 | (c[ 7] & 0xff)<<24,\r
+                               j6  = p[ 0] & 0xff | (p[ 1] & 0xff)<<8 | (p[ 2] & 0xff)<<16 | (p[ 3] & 0xff)<<24,\r
+                               j7  = p[ 4] & 0xff | (p[ 5] & 0xff)<<8 | (p[ 6] & 0xff)<<16 | (p[ 7] & 0xff)<<24,\r
+                               j8  = p[ 8] & 0xff | (p[ 9] & 0xff)<<8 | (p[10] & 0xff)<<16 | (p[11] & 0xff)<<24,\r
+                               j9  = p[12] & 0xff | (p[13] & 0xff)<<8 | (p[14] & 0xff)<<16 | (p[15] & 0xff)<<24,\r
+                               j10 = c[ 8] & 0xff | (c[ 9] & 0xff)<<8 | (c[10] & 0xff)<<16 | (c[11] & 0xff)<<24,\r
+                               j11 = k[16] & 0xff | (k[17] & 0xff)<<8 | (k[18] & 0xff)<<16 | (k[19] & 0xff)<<24,\r
+                               j12 = k[20] & 0xff | (k[21] & 0xff)<<8 | (k[22] & 0xff)<<16 | (k[23] & 0xff)<<24,\r
+                               j13 = k[24] & 0xff | (k[25] & 0xff)<<8 | (k[26] & 0xff)<<16 | (k[27] & 0xff)<<24,\r
+                               j14 = k[28] & 0xff | (k[29] & 0xff)<<8 | (k[30] & 0xff)<<16 | (k[31] & 0xff)<<24,\r
+                               j15 = c[12] & 0xff | (c[13] & 0xff)<<8 | (c[14] & 0xff)<<16 | (c[15] & 0xff)<<24;\r
+       \r
+               var x0 = j0, x1 = j1, x2 = j2, x3 = j3, x4 = j4, x5 = j5, x6 = j6, x7 = j7,\r
+                               x8 = j8, x9 = j9, x10 = j10, x11 = j11, x12 = j12, x13 = j13, x14 = j14,\r
+                               x15 = j15, u;\r
+       \r
+               for (var i = 0; i < 20; i += 2) {\r
+                       u = x0 + x12 | 0;\r
+                       x4 ^= u<<7 | u>>>(32-7);\r
+                       u = x4 + x0 | 0;\r
+                       x8 ^= u<<9 | u>>>(32-9);\r
+                       u = x8 + x4 | 0;\r
+                       x12 ^= u<<13 | u>>>(32-13);\r
+                       u = x12 + x8 | 0;\r
+                       x0 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x5 + x1 | 0;\r
+                       x9 ^= u<<7 | u>>>(32-7);\r
+                       u = x9 + x5 | 0;\r
+                       x13 ^= u<<9 | u>>>(32-9);\r
+                       u = x13 + x9 | 0;\r
+                       x1 ^= u<<13 | u>>>(32-13);\r
+                       u = x1 + x13 | 0;\r
+                       x5 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x10 + x6 | 0;\r
+                       x14 ^= u<<7 | u>>>(32-7);\r
+                       u = x14 + x10 | 0;\r
+                       x2 ^= u<<9 | u>>>(32-9);\r
+                       u = x2 + x14 | 0;\r
+                       x6 ^= u<<13 | u>>>(32-13);\r
+                       u = x6 + x2 | 0;\r
+                       x10 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x15 + x11 | 0;\r
+                       x3 ^= u<<7 | u>>>(32-7);\r
+                       u = x3 + x15 | 0;\r
+                       x7 ^= u<<9 | u>>>(32-9);\r
+                       u = x7 + x3 | 0;\r
+                       x11 ^= u<<13 | u>>>(32-13);\r
+                       u = x11 + x7 | 0;\r
+                       x15 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x0 + x3 | 0;\r
+                       x1 ^= u<<7 | u>>>(32-7);\r
+                       u = x1 + x0 | 0;\r
+                       x2 ^= u<<9 | u>>>(32-9);\r
+                       u = x2 + x1 | 0;\r
+                       x3 ^= u<<13 | u>>>(32-13);\r
+                       u = x3 + x2 | 0;\r
+                       x0 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x5 + x4 | 0;\r
+                       x6 ^= u<<7 | u>>>(32-7);\r
+                       u = x6 + x5 | 0;\r
+                       x7 ^= u<<9 | u>>>(32-9);\r
+                       u = x7 + x6 | 0;\r
+                       x4 ^= u<<13 | u>>>(32-13);\r
+                       u = x4 + x7 | 0;\r
+                       x5 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x10 + x9 | 0;\r
+                       x11 ^= u<<7 | u>>>(32-7);\r
+                       u = x11 + x10 | 0;\r
+                       x8 ^= u<<9 | u>>>(32-9);\r
+                       u = x8 + x11 | 0;\r
+                       x9 ^= u<<13 | u>>>(32-13);\r
+                       u = x9 + x8 | 0;\r
+                       x10 ^= u<<18 | u>>>(32-18);\r
+       \r
+                       u = x15 + x14 | 0;\r
+                       x12 ^= u<<7 | u>>>(32-7);\r
+                       u = x12 + x15 | 0;\r
+                       x13 ^= u<<9 | u>>>(32-9);\r
+                       u = x13 + x12 | 0;\r
+                       x14 ^= u<<13 | u>>>(32-13);\r
+                       u = x14 + x13 | 0;\r
+                       x15 ^= u<<18 | u>>>(32-18);\r
+               }\r
+       \r
+               o[ 0] = x0 >>>  0 & 0xff;\r
+               o[ 1] = x0 >>>  8 & 0xff;\r
+               o[ 2] = x0 >>> 16 & 0xff;\r
+               o[ 3] = x0 >>> 24 & 0xff;\r
+       \r
+               o[ 4] = x5 >>>  0 & 0xff;\r
+               o[ 5] = x5 >>>  8 & 0xff;\r
+               o[ 6] = x5 >>> 16 & 0xff;\r
+               o[ 7] = x5 >>> 24 & 0xff;\r
+       \r
+               o[ 8] = x10 >>>  0 & 0xff;\r
+               o[ 9] = x10 >>>  8 & 0xff;\r
+               o[10] = x10 >>> 16 & 0xff;\r
+               o[11] = x10 >>> 24 & 0xff;\r
+       \r
+               o[12] = x15 >>>  0 & 0xff;\r
+               o[13] = x15 >>>  8 & 0xff;\r
+               o[14] = x15 >>> 16 & 0xff;\r
+               o[15] = x15 >>> 24 & 0xff;\r
+       \r
+               o[16] = x6 >>>  0 & 0xff;\r
+               o[17] = x6 >>>  8 & 0xff;\r
+               o[18] = x6 >>> 16 & 0xff;\r
+               o[19] = x6 >>> 24 & 0xff;\r
+       \r
+               o[20] = x7 >>>  0 & 0xff;\r
+               o[21] = x7 >>>  8 & 0xff;\r
+               o[22] = x7 >>> 16 & 0xff;\r
+               o[23] = x7 >>> 24 & 0xff;\r
+       \r
+               o[24] = x8 >>>  0 & 0xff;\r
+               o[25] = x8 >>>  8 & 0xff;\r
+               o[26] = x8 >>> 16 & 0xff;\r
+               o[27] = x8 >>> 24 & 0xff;\r
+       \r
+               o[28] = x9 >>>  0 & 0xff;\r
+               o[29] = x9 >>>  8 & 0xff;\r
+               o[30] = x9 >>> 16 & 0xff;\r
+               o[31] = x9 >>> 24 & 0xff;\r
+       }\r
+       \r
+       function crypto_core_salsa20(out,inp,k,c) {\r
+               core_salsa20(out,inp,k,c);\r
+       }\r
+       \r
+       function crypto_core_hsalsa20(out,inp,k,c) {\r
+               core_hsalsa20(out,inp,k,c);\r
+       }\r
+       \r
+       var sigma = new Uint8Array([101, 120, 112, 97, 110, 100, 32, 51, 50, 45, 98, 121, 116, 101, 32, 107]);\r
+                                                       // "expand 32-byte k"\r
+       \r
+       function crypto_stream_salsa20_xor(c,cpos,m,mpos,b,n,k) {\r
+               var z = new Uint8Array(16), x = new Uint8Array(64);\r
+               var u, i;\r
+               for (i = 0; i < 16; i++) z[i] = 0;\r
+               for (i = 0; i < 8; i++) z[i] = n[i];\r
+               while (b >= 64) {\r
+                       crypto_core_salsa20(x,z,k,sigma);\r
+                       for (i = 0; i < 64; i++) c[cpos+i] = m[mpos+i] ^ x[i];\r
+                       u = 1;\r
+                       for (i = 8; i < 16; i++) {\r
+                               u = u + (z[i] & 0xff) | 0;\r
+                               z[i] = u & 0xff;\r
+                               u >>>= 8;\r
+                       }\r
+                       b -= 64;\r
+                       cpos += 64;\r
+                       mpos += 64;\r
+               }\r
+               if (b > 0) {\r
+                       crypto_core_salsa20(x,z,k,sigma);\r
+                       for (i = 0; i < b; i++) c[cpos+i] = m[mpos+i] ^ x[i];\r
+               }\r
+               return 0;\r
+       }\r
+       \r
+       function crypto_stream_salsa20(c,cpos,b,n,k) {\r
+               var z = new Uint8Array(16), x = new Uint8Array(64);\r
+               var u, i;\r
+               for (i = 0; i < 16; i++) z[i] = 0;\r
+               for (i = 0; i < 8; i++) z[i] = n[i];\r
+               while (b >= 64) {\r
+                       crypto_core_salsa20(x,z,k,sigma);\r
+                       for (i = 0; i < 64; i++) c[cpos+i] = x[i];\r
+                       u = 1;\r
+                       for (i = 8; i < 16; i++) {\r
+                               u = u + (z[i] & 0xff) | 0;\r
+                               z[i] = u & 0xff;\r
+                               u >>>= 8;\r
+                       }\r
+                       b -= 64;\r
+                       cpos += 64;\r
+               }\r
+               if (b > 0) {\r
+                       crypto_core_salsa20(x,z,k,sigma);\r
+                       for (i = 0; i < b; i++) c[cpos+i] = x[i];\r
+               }\r
+               return 0;\r
+       }\r
+       \r
+       function crypto_stream(c,cpos,d,n,k) {\r
+               var s = new Uint8Array(32);\r
+               crypto_core_hsalsa20(s,n,k,sigma);\r
+               var sn = new Uint8Array(8);\r
+               for (var i = 0; i < 8; i++) sn[i] = n[i+16];\r
+               return crypto_stream_salsa20(c,cpos,d,sn,s);\r
+       }\r
+       \r
+       function crypto_stream_xor(c,cpos,m,mpos,d,n,k) {\r
+               var s = new Uint8Array(32);\r
+               crypto_core_hsalsa20(s,n,k,sigma);\r
+               var sn = new Uint8Array(8);\r
+               for (var i = 0; i < 8; i++) sn[i] = n[i+16];\r
+               return crypto_stream_salsa20_xor(c,cpos,m,mpos,d,sn,s);\r
+       }\r
+       \r
+       /*\r
+       * Port of Andrew Moon's Poly1305-donna-16. Public domain.\r
+       * https://github.com/floodyberry/poly1305-donna\r
+       */\r
+       \r
+       var poly1305 = function(key) {\r
+               this.buffer = new Uint8Array(16);\r
+               this.r = new Uint16Array(10);\r
+               this.h = new Uint16Array(10);\r
+               this.pad = new Uint16Array(8);\r
+               this.leftover = 0;\r
+               this.fin = 0;\r
+       \r
+               var t0, t1, t2, t3, t4, t5, t6, t7;\r
+       \r
+               t0 = key[ 0] & 0xff | (key[ 1] & 0xff) << 8; this.r[0] = ( t0                     ) & 0x1fff;\r
+               t1 = key[ 2] & 0xff | (key[ 3] & 0xff) << 8; this.r[1] = ((t0 >>> 13) | (t1 <<  3)) & 0x1fff;\r
+               t2 = key[ 4] & 0xff | (key[ 5] & 0xff) << 8; this.r[2] = ((t1 >>> 10) | (t2 <<  6)) & 0x1f03;\r
+               t3 = key[ 6] & 0xff | (key[ 7] & 0xff) << 8; this.r[3] = ((t2 >>>  7) | (t3 <<  9)) & 0x1fff;\r
+               t4 = key[ 8] & 0xff | (key[ 9] & 0xff) << 8; this.r[4] = ((t3 >>>  4) | (t4 << 12)) & 0x00ff;\r
+               this.r[5] = ((t4 >>>  1)) & 0x1ffe;\r
+               t5 = key[10] & 0xff | (key[11] & 0xff) << 8; this.r[6] = ((t4 >>> 14) | (t5 <<  2)) & 0x1fff;\r
+               t6 = key[12] & 0xff | (key[13] & 0xff) << 8; this.r[7] = ((t5 >>> 11) | (t6 <<  5)) & 0x1f81;\r
+               t7 = key[14] & 0xff | (key[15] & 0xff) << 8; this.r[8] = ((t6 >>>  8) | (t7 <<  8)) & 0x1fff;\r
+               this.r[9] = ((t7 >>>  5)) & 0x007f;\r
+       \r
+               this.pad[0] = key[16] & 0xff | (key[17] & 0xff) << 8;\r
+               this.pad[1] = key[18] & 0xff | (key[19] & 0xff) << 8;\r
+               this.pad[2] = key[20] & 0xff | (key[21] & 0xff) << 8;\r
+               this.pad[3] = key[22] & 0xff | (key[23] & 0xff) << 8;\r
+               this.pad[4] = key[24] & 0xff | (key[25] & 0xff) << 8;\r
+               this.pad[5] = key[26] & 0xff | (key[27] & 0xff) << 8;\r
+               this.pad[6] = key[28] & 0xff | (key[29] & 0xff) << 8;\r
+               this.pad[7] = key[30] & 0xff | (key[31] & 0xff) << 8;\r
+       };\r
+       \r
+       poly1305.prototype.blocks = function(m, mpos, bytes) {\r
+               var hibit = this.fin ? 0 : (1 << 11);\r
+               var t0, t1, t2, t3, t4, t5, t6, t7, c;\r
+               var d0, d1, d2, d3, d4, d5, d6, d7, d8, d9;\r
+       \r
+               var h0 = this.h[0],\r
+                               h1 = this.h[1],\r
+                               h2 = this.h[2],\r
+                               h3 = this.h[3],\r
+                               h4 = this.h[4],\r
+                               h5 = this.h[5],\r
+                               h6 = this.h[6],\r
+                               h7 = this.h[7],\r
+                               h8 = this.h[8],\r
+                               h9 = this.h[9];\r
+       \r
+               var r0 = this.r[0],\r
+                               r1 = this.r[1],\r
+                               r2 = this.r[2],\r
+                               r3 = this.r[3],\r
+                               r4 = this.r[4],\r
+                               r5 = this.r[5],\r
+                               r6 = this.r[6],\r
+                               r7 = this.r[7],\r
+                               r8 = this.r[8],\r
+                               r9 = this.r[9];\r
+       \r
+               while (bytes >= 16) {\r
+                       t0 = m[mpos+ 0] & 0xff | (m[mpos+ 1] & 0xff) << 8; h0 += ( t0                     ) & 0x1fff;\r
+                       t1 = m[mpos+ 2] & 0xff | (m[mpos+ 3] & 0xff) << 8; h1 += ((t0 >>> 13) | (t1 <<  3)) & 0x1fff;\r
+                       t2 = m[mpos+ 4] & 0xff | (m[mpos+ 5] & 0xff) << 8; h2 += ((t1 >>> 10) | (t2 <<  6)) & 0x1fff;\r
+                       t3 = m[mpos+ 6] & 0xff | (m[mpos+ 7] & 0xff) << 8; h3 += ((t2 >>>  7) | (t3 <<  9)) & 0x1fff;\r
+                       t4 = m[mpos+ 8] & 0xff | (m[mpos+ 9] & 0xff) << 8; h4 += ((t3 >>>  4) | (t4 << 12)) & 0x1fff;\r
+                       h5 += ((t4 >>>  1)) & 0x1fff;\r
+                       t5 = m[mpos+10] & 0xff | (m[mpos+11] & 0xff) << 8; h6 += ((t4 >>> 14) | (t5 <<  2)) & 0x1fff;\r
+                       t6 = m[mpos+12] & 0xff | (m[mpos+13] & 0xff) << 8; h7 += ((t5 >>> 11) | (t6 <<  5)) & 0x1fff;\r
+                       t7 = m[mpos+14] & 0xff | (m[mpos+15] & 0xff) << 8; h8 += ((t6 >>>  8) | (t7 <<  8)) & 0x1fff;\r
+                       h9 += ((t7 >>> 5)) | hibit;\r
+       \r
+                       c = 0;\r
+       \r
+                       d0 = c;\r
+                       d0 += h0 * r0;\r
+                       d0 += h1 * (5 * r9);\r
+                       d0 += h2 * (5 * r8);\r
+                       d0 += h3 * (5 * r7);\r
+                       d0 += h4 * (5 * r6);\r
+                       c = (d0 >>> 13); d0 &= 0x1fff;\r
+                       d0 += h5 * (5 * r5);\r
+                       d0 += h6 * (5 * r4);\r
+                       d0 += h7 * (5 * r3);\r
+                       d0 += h8 * (5 * r2);\r
+                       d0 += h9 * (5 * r1);\r
+                       c += (d0 >>> 13); d0 &= 0x1fff;\r
+       \r
+                       d1 = c;\r
+                       d1 += h0 * r1;\r
+                       d1 += h1 * r0;\r
+                       d1 += h2 * (5 * r9);\r
+                       d1 += h3 * (5 * r8);\r
+                       d1 += h4 * (5 * r7);\r
+                       c = (d1 >>> 13); d1 &= 0x1fff;\r
+                       d1 += h5 * (5 * r6);\r
+                       d1 += h6 * (5 * r5);\r
+                       d1 += h7 * (5 * r4);\r
+                       d1 += h8 * (5 * r3);\r
+                       d1 += h9 * (5 * r2);\r
+                       c += (d1 >>> 13); d1 &= 0x1fff;\r
+       \r
+                       d2 = c;\r
+                       d2 += h0 * r2;\r
+                       d2 += h1 * r1;\r
+                       d2 += h2 * r0;\r
+                       d2 += h3 * (5 * r9);\r
+                       d2 += h4 * (5 * r8);\r
+                       c = (d2 >>> 13); d2 &= 0x1fff;\r
+                       d2 += h5 * (5 * r7);\r
+                       d2 += h6 * (5 * r6);\r
+                       d2 += h7 * (5 * r5);\r
+                       d2 += h8 * (5 * r4);\r
+                       d2 += h9 * (5 * r3);\r
+                       c += (d2 >>> 13); d2 &= 0x1fff;\r
+       \r
+                       d3 = c;\r
+                       d3 += h0 * r3;\r
+                       d3 += h1 * r2;\r
+                       d3 += h2 * r1;\r
+                       d3 += h3 * r0;\r
+                       d3 += h4 * (5 * r9);\r
+                       c = (d3 >>> 13); d3 &= 0x1fff;\r
+                       d3 += h5 * (5 * r8);\r
+                       d3 += h6 * (5 * r7);\r
+                       d3 += h7 * (5 * r6);\r
+                       d3 += h8 * (5 * r5);\r
+                       d3 += h9 * (5 * r4);\r
+                       c += (d3 >>> 13); d3 &= 0x1fff;\r
+       \r
+                       d4 = c;\r
+                       d4 += h0 * r4;\r
+                       d4 += h1 * r3;\r
+                       d4 += h2 * r2;\r
+                       d4 += h3 * r1;\r
+                       d4 += h4 * r0;\r
+                       c = (d4 >>> 13); d4 &= 0x1fff;\r
+                       d4 += h5 * (5 * r9);\r
+                       d4 += h6 * (5 * r8);\r
+                       d4 += h7 * (5 * r7);\r
+                       d4 += h8 * (5 * r6);\r
+                       d4 += h9 * (5 * r5);\r
+                       c += (d4 >>> 13); d4 &= 0x1fff;\r
+       \r
+                       d5 = c;\r
+                       d5 += h0 * r5;\r
+                       d5 += h1 * r4;\r
+                       d5 += h2 * r3;\r
+                       d5 += h3 * r2;\r
+                       d5 += h4 * r1;\r
+                       c = (d5 >>> 13); d5 &= 0x1fff;\r
+                       d5 += h5 * r0;\r
+                       d5 += h6 * (5 * r9);\r
+                       d5 += h7 * (5 * r8);\r
+                       d5 += h8 * (5 * r7);\r
+                       d5 += h9 * (5 * r6);\r
+                       c += (d5 >>> 13); d5 &= 0x1fff;\r
+       \r
+                       d6 = c;\r
+                       d6 += h0 * r6;\r
+                       d6 += h1 * r5;\r
+                       d6 += h2 * r4;\r
+                       d6 += h3 * r3;\r
+                       d6 += h4 * r2;\r
+                       c = (d6 >>> 13); d6 &= 0x1fff;\r
+                       d6 += h5 * r1;\r
+                       d6 += h6 * r0;\r
+                       d6 += h7 * (5 * r9);\r
+                       d6 += h8 * (5 * r8);\r
+                       d6 += h9 * (5 * r7);\r
+                       c += (d6 >>> 13); d6 &= 0x1fff;\r
+       \r
+                       d7 = c;\r
+                       d7 += h0 * r7;\r
+                       d7 += h1 * r6;\r
+                       d7 += h2 * r5;\r
+                       d7 += h3 * r4;\r
+                       d7 += h4 * r3;\r
+                       c = (d7 >>> 13); d7 &= 0x1fff;\r
+                       d7 += h5 * r2;\r
+                       d7 += h6 * r1;\r
+                       d7 += h7 * r0;\r
+                       d7 += h8 * (5 * r9);\r
+                       d7 += h9 * (5 * r8);\r
+                       c += (d7 >>> 13); d7 &= 0x1fff;\r
+       \r
+                       d8 = c;\r
+                       d8 += h0 * r8;\r
+                       d8 += h1 * r7;\r
+                       d8 += h2 * r6;\r
+                       d8 += h3 * r5;\r
+                       d8 += h4 * r4;\r
+                       c = (d8 >>> 13); d8 &= 0x1fff;\r
+                       d8 += h5 * r3;\r
+                       d8 += h6 * r2;\r
+                       d8 += h7 * r1;\r
+                       d8 += h8 * r0;\r
+                       d8 += h9 * (5 * r9);\r
+                       c += (d8 >>> 13); d8 &= 0x1fff;\r
+       \r
+                       d9 = c;\r
+                       d9 += h0 * r9;\r
+                       d9 += h1 * r8;\r
+                       d9 += h2 * r7;\r
+                       d9 += h3 * r6;\r
+                       d9 += h4 * r5;\r
+                       c = (d9 >>> 13); d9 &= 0x1fff;\r
+                       d9 += h5 * r4;\r
+                       d9 += h6 * r3;\r
+                       d9 += h7 * r2;\r
+                       d9 += h8 * r1;\r
+                       d9 += h9 * r0;\r
+                       c += (d9 >>> 13); d9 &= 0x1fff;\r
+       \r
+                       c = (((c << 2) + c)) | 0;\r
+                       c = (c + d0) | 0;\r
+                       d0 = c & 0x1fff;\r
+                       c = (c >>> 13);\r
+                       d1 += c;\r
+       \r
+                       h0 = d0;\r
+                       h1 = d1;\r
+                       h2 = d2;\r
+                       h3 = d3;\r
+                       h4 = d4;\r
+                       h5 = d5;\r
+                       h6 = d6;\r
+                       h7 = d7;\r
+                       h8 = d8;\r
+                       h9 = d9;\r
+       \r
+                       mpos += 16;\r
+                       bytes -= 16;\r
+               }\r
+               this.h[0] = h0;\r
+               this.h[1] = h1;\r
+               this.h[2] = h2;\r
+               this.h[3] = h3;\r
+               this.h[4] = h4;\r
+               this.h[5] = h5;\r
+               this.h[6] = h6;\r
+               this.h[7] = h7;\r
+               this.h[8] = h8;\r
+               this.h[9] = h9;\r
+       };\r
+       \r
+       poly1305.prototype.finish = function(mac, macpos) {\r
+               var g = new Uint16Array(10);\r
+               var c, mask, f, i;\r
+       \r
+               if (this.leftover) {\r
+                       i = this.leftover;\r
+                       this.buffer[i++] = 1;\r
+                       for (; i < 16; i++) this.buffer[i] = 0;\r
+                       this.fin = 1;\r
+                       this.blocks(this.buffer, 0, 16);\r
+               }\r
+       \r
+               c = this.h[1] >>> 13;\r
+               this.h[1] &= 0x1fff;\r
+               for (i = 2; i < 10; i++) {\r
+                       this.h[i] += c;\r
+                       c = this.h[i] >>> 13;\r
+                       this.h[i] &= 0x1fff;\r
+               }\r
+               this.h[0] += (c * 5);\r
+               c = this.h[0] >>> 13;\r
+               this.h[0] &= 0x1fff;\r
+               this.h[1] += c;\r
+               c = this.h[1] >>> 13;\r
+               this.h[1] &= 0x1fff;\r
+               this.h[2] += c;\r
+       \r
+               g[0] = this.h[0] + 5;\r
+               c = g[0] >>> 13;\r
+               g[0] &= 0x1fff;\r
+               for (i = 1; i < 10; i++) {\r
+                       g[i] = this.h[i] + c;\r
+                       c = g[i] >>> 13;\r
+                       g[i] &= 0x1fff;\r
+               }\r
+               g[9] -= (1 << 13);\r
+       \r
+               mask = (c ^ 1) - 1;\r
+               for (i = 0; i < 10; i++) g[i] &= mask;\r
+               mask = ~mask;\r
+               for (i = 0; i < 10; i++) this.h[i] = (this.h[i] & mask) | g[i];\r
+       \r
+               this.h[0] = ((this.h[0]       ) | (this.h[1] << 13)                    ) & 0xffff;\r
+               this.h[1] = ((this.h[1] >>>  3) | (this.h[2] << 10)                    ) & 0xffff;\r
+               this.h[2] = ((this.h[2] >>>  6) | (this.h[3] <<  7)                    ) & 0xffff;\r
+               this.h[3] = ((this.h[3] >>>  9) | (this.h[4] <<  4)                    ) & 0xffff;\r
+               this.h[4] = ((this.h[4] >>> 12) | (this.h[5] <<  1) | (this.h[6] << 14)) & 0xffff;\r
+               this.h[5] = ((this.h[6] >>>  2) | (this.h[7] << 11)                    ) & 0xffff;\r
+               this.h[6] = ((this.h[7] >>>  5) | (this.h[8] <<  8)                    ) & 0xffff;\r
+               this.h[7] = ((this.h[8] >>>  8) | (this.h[9] <<  5)                    ) & 0xffff;\r
+       \r
+               f = this.h[0] + this.pad[0];\r
+               this.h[0] = f & 0xffff;\r
+               for (i = 1; i < 8; i++) {\r
+                       f = (((this.h[i] + this.pad[i]) | 0) + (f >>> 16)) | 0;\r
+                       this.h[i] = f & 0xffff;\r
+               }\r
+       \r
+               mac[macpos+ 0] = (this.h[0] >>> 0) & 0xff;\r
+               mac[macpos+ 1] = (this.h[0] >>> 8) & 0xff;\r
+               mac[macpos+ 2] = (this.h[1] >>> 0) & 0xff;\r
+               mac[macpos+ 3] = (this.h[1] >>> 8) & 0xff;\r
+               mac[macpos+ 4] = (this.h[2] >>> 0) & 0xff;\r
+               mac[macpos+ 5] = (this.h[2] >>> 8) & 0xff;\r
+               mac[macpos+ 6] = (this.h[3] >>> 0) & 0xff;\r
+               mac[macpos+ 7] = (this.h[3] >>> 8) & 0xff;\r
+               mac[macpos+ 8] = (this.h[4] >>> 0) & 0xff;\r
+               mac[macpos+ 9] = (this.h[4] >>> 8) & 0xff;\r
+               mac[macpos+10] = (this.h[5] >>> 0) & 0xff;\r
+               mac[macpos+11] = (this.h[5] >>> 8) & 0xff;\r
+               mac[macpos+12] = (this.h[6] >>> 0) & 0xff;\r
+               mac[macpos+13] = (this.h[6] >>> 8) & 0xff;\r
+               mac[macpos+14] = (this.h[7] >>> 0) & 0xff;\r
+               mac[macpos+15] = (this.h[7] >>> 8) & 0xff;\r
+       };\r
+       \r
+       poly1305.prototype.update = function(m, mpos, bytes) {\r
+               var i, want;\r
+       \r
+               if (this.leftover) {\r
+                       want = (16 - this.leftover);\r
+                       if (want > bytes)\r
+                               want = bytes;\r
+                       for (i = 0; i < want; i++)\r
+                               this.buffer[this.leftover + i] = m[mpos+i];\r
+                       bytes -= want;\r
+                       mpos += want;\r
+                       this.leftover += want;\r
+                       if (this.leftover < 16)\r
+                               return;\r
+                       this.blocks(this.buffer, 0, 16);\r
+                       this.leftover = 0;\r
+               }\r
+       \r
+               if (bytes >= 16) {\r
+                       want = bytes - (bytes % 16);\r
+                       this.blocks(m, mpos, want);\r
+                       mpos += want;\r
+                       bytes -= want;\r
+               }\r
+       \r
+               if (bytes) {\r
+                       for (i = 0; i < bytes; i++)\r
+                               this.buffer[this.leftover + i] = m[mpos+i];\r
+                       this.leftover += bytes;\r
+               }\r
+       };\r
+       \r
+       function crypto_onetimeauth(out, outpos, m, mpos, n, k) {\r
+               var s = new poly1305(k);\r
+               s.update(m, mpos, n);\r
+               s.finish(out, outpos);\r
+               return 0;\r
+       }\r
+       \r
+       function crypto_onetimeauth_verify(h, hpos, m, mpos, n, k) {\r
+               var x = new Uint8Array(16);\r
+               crypto_onetimeauth(x,0,m,mpos,n,k);\r
+               return crypto_verify_16(h,hpos,x,0);\r
+       }\r
+       \r
+       function crypto_secretbox(c,m,d,n,k) {\r
+               var i;\r
+               if (d < 32) return -1;\r
+               crypto_stream_xor(c,0,m,0,d,n,k);\r
+               crypto_onetimeauth(c, 16, c, 32, d - 32, c);\r
+               for (i = 0; i < 16; i++) c[i] = 0;\r
+               return 0;\r
+       }\r
+       \r
+       function crypto_secretbox_open(m,c,d,n,k) {\r
+               var i;\r
+               var x = new Uint8Array(32);\r
+               if (d < 32) return -1;\r
+               crypto_stream(x,0,32,n,k);\r
+               if (crypto_onetimeauth_verify(c, 16,c, 32,d - 32,x) !== 0) return -1;\r
+               crypto_stream_xor(m,0,c,0,d,n,k);\r
+               for (i = 0; i < 32; i++) m[i] = 0;\r
+               return 0;\r
+       }\r
+       \r
+       function set25519(r, a) {\r
+               var i;\r
+               for (i = 0; i < 16; i++) r[i] = a[i]|0;\r
+       }\r
+       \r
+       function car25519(o) {\r
+               var i, v, c = 1;\r
+               for (i = 0; i < 16; i++) {\r
+                       v = o[i] + c + 65535;\r
+                       c = Math.floor(v / 65536);\r
+                       o[i] = v - c * 65536;\r
+               }\r
+               o[0] += c-1 + 37 * (c-1);\r
+       }\r
+       \r
+       function sel25519(p, q, b) {\r
+               var t, c = ~(b-1);\r
+               for (var i = 0; i < 16; i++) {\r
+                       t = c & (p[i] ^ q[i]);\r
+                       p[i] ^= t;\r
+                       q[i] ^= t;\r
+               }\r
+       }\r
+       \r
+       function pack25519(o, n) {\r
+               var i, j, b;\r
+               var m = gf(), t = gf();\r
+               for (i = 0; i < 16; i++) t[i] = n[i];\r
+               car25519(t);\r
+               car25519(t);\r
+               car25519(t);\r
+               for (j = 0; j < 2; j++) {\r
+                       m[0] = t[0] - 0xffed;\r
+                       for (i = 1; i < 15; i++) {\r
+                               m[i] = t[i] - 0xffff - ((m[i-1]>>16) & 1);\r
+                               m[i-1] &= 0xffff;\r
+                       }\r
+                       m[15] = t[15] - 0x7fff - ((m[14]>>16) & 1);\r
+                       b = (m[15]>>16) & 1;\r
+                       m[14] &= 0xffff;\r
+                       sel25519(t, m, 1-b);\r
+               }\r
+               for (i = 0; i < 16; i++) {\r
+                       o[2*i] = t[i] & 0xff;\r
+                       o[2*i+1] = t[i]>>8;\r
+               }\r
+       }\r
+       \r
+       function neq25519(a, b) {\r
+               var c = new Uint8Array(32), d = new Uint8Array(32);\r
+               pack25519(c, a);\r
+               pack25519(d, b);\r
+               return crypto_verify_32(c, 0, d, 0);\r
+       }\r
+       \r
+       function par25519(a) {\r
+               var d = new Uint8Array(32);\r
+               pack25519(d, a);\r
+               return d[0] & 1;\r
+       }\r
+       \r
+       function unpack25519(o, n) {\r
+               var i;\r
+               for (i = 0; i < 16; i++) o[i] = n[2*i] + (n[2*i+1] << 8);\r
+               o[15] &= 0x7fff;\r
+       }\r
+       \r
+       function A(o, a, b) {\r
+               for (var i = 0; i < 16; i++) o[i] = a[i] + b[i];\r
+       }\r
+       \r
+       function Z(o, a, b) {\r
+               for (var i = 0; i < 16; i++) o[i] = a[i] - b[i];\r
+       }\r
+       \r
+       function M(o, a, b) {\r
+               var v, c,\r
+                        t0 = 0,  t1 = 0,  t2 = 0,  t3 = 0,  t4 = 0,  t5 = 0,  t6 = 0,  t7 = 0,\r
+                        t8 = 0,  t9 = 0, t10 = 0, t11 = 0, t12 = 0, t13 = 0, t14 = 0, t15 = 0,\r
+                       t16 = 0, t17 = 0, t18 = 0, t19 = 0, t20 = 0, t21 = 0, t22 = 0, t23 = 0,\r
+                       t24 = 0, t25 = 0, t26 = 0, t27 = 0, t28 = 0, t29 = 0, t30 = 0,\r
+                       b0 = b[0],\r
+                       b1 = b[1],\r
+                       b2 = b[2],\r
+                       b3 = b[3],\r
+                       b4 = b[4],\r
+                       b5 = b[5],\r
+                       b6 = b[6],\r
+                       b7 = b[7],\r
+                       b8 = b[8],\r
+                       b9 = b[9],\r
+                       b10 = b[10],\r
+                       b11 = b[11],\r
+                       b12 = b[12],\r
+                       b13 = b[13],\r
+                       b14 = b[14],\r
+                       b15 = b[15];\r
+       \r
+               v = a[0];\r
+               t0 += v * b0;\r
+               t1 += v * b1;\r
+               t2 += v * b2;\r
+               t3 += v * b3;\r
+               t4 += v * b4;\r
+               t5 += v * b5;\r
+               t6 += v * b6;\r
+               t7 += v * b7;\r
+               t8 += v * b8;\r
+               t9 += v * b9;\r
+               t10 += v * b10;\r
+               t11 += v * b11;\r
+               t12 += v * b12;\r
+               t13 += v * b13;\r
+               t14 += v * b14;\r
+               t15 += v * b15;\r
+               v = a[1];\r
+               t1 += v * b0;\r
+               t2 += v * b1;\r
+               t3 += v * b2;\r
+               t4 += v * b3;\r
+               t5 += v * b4;\r
+               t6 += v * b5;\r
+               t7 += v * b6;\r
+               t8 += v * b7;\r
+               t9 += v * b8;\r
+               t10 += v * b9;\r
+               t11 += v * b10;\r
+               t12 += v * b11;\r
+               t13 += v * b12;\r
+               t14 += v * b13;\r
+               t15 += v * b14;\r
+               t16 += v * b15;\r
+               v = a[2];\r
+               t2 += v * b0;\r
+               t3 += v * b1;\r
+               t4 += v * b2;\r
+               t5 += v * b3;\r
+               t6 += v * b4;\r
+               t7 += v * b5;\r
+               t8 += v * b6;\r
+               t9 += v * b7;\r
+               t10 += v * b8;\r
+               t11 += v * b9;\r
+               t12 += v * b10;\r
+               t13 += v * b11;\r
+               t14 += v * b12;\r
+               t15 += v * b13;\r
+               t16 += v * b14;\r
+               t17 += v * b15;\r
+               v = a[3];\r
+               t3 += v * b0;\r
+               t4 += v * b1;\r
+               t5 += v * b2;\r
+               t6 += v * b3;\r
+               t7 += v * b4;\r
+               t8 += v * b5;\r
+               t9 += v * b6;\r
+               t10 += v * b7;\r
+               t11 += v * b8;\r
+               t12 += v * b9;\r
+               t13 += v * b10;\r
+               t14 += v * b11;\r
+               t15 += v * b12;\r
+               t16 += v * b13;\r
+               t17 += v * b14;\r
+               t18 += v * b15;\r
+               v = a[4];\r
+               t4 += v * b0;\r
+               t5 += v * b1;\r
+               t6 += v * b2;\r
+               t7 += v * b3;\r
+               t8 += v * b4;\r
+               t9 += v * b5;\r
+               t10 += v * b6;\r
+               t11 += v * b7;\r
+               t12 += v * b8;\r
+               t13 += v * b9;\r
+               t14 += v * b10;\r
+               t15 += v * b11;\r
+               t16 += v * b12;\r
+               t17 += v * b13;\r
+               t18 += v * b14;\r
+               t19 += v * b15;\r
+               v = a[5];\r
+               t5 += v * b0;\r
+               t6 += v * b1;\r
+               t7 += v * b2;\r
+               t8 += v * b3;\r
+               t9 += v * b4;\r
+               t10 += v * b5;\r
+               t11 += v * b6;\r
+               t12 += v * b7;\r
+               t13 += v * b8;\r
+               t14 += v * b9;\r
+               t15 += v * b10;\r
+               t16 += v * b11;\r
+               t17 += v * b12;\r
+               t18 += v * b13;\r
+               t19 += v * b14;\r
+               t20 += v * b15;\r
+               v = a[6];\r
+               t6 += v * b0;\r
+               t7 += v * b1;\r
+               t8 += v * b2;\r
+               t9 += v * b3;\r
+               t10 += v * b4;\r
+               t11 += v * b5;\r
+               t12 += v * b6;\r
+               t13 += v * b7;\r
+               t14 += v * b8;\r
+               t15 += v * b9;\r
+               t16 += v * b10;\r
+               t17 += v * b11;\r
+               t18 += v * b12;\r
+               t19 += v * b13;\r
+               t20 += v * b14;\r
+               t21 += v * b15;\r
+               v = a[7];\r
+               t7 += v * b0;\r
+               t8 += v * b1;\r
+               t9 += v * b2;\r
+               t10 += v * b3;\r
+               t11 += v * b4;\r
+               t12 += v * b5;\r
+               t13 += v * b6;\r
+               t14 += v * b7;\r
+               t15 += v * b8;\r
+               t16 += v * b9;\r
+               t17 += v * b10;\r
+               t18 += v * b11;\r
+               t19 += v * b12;\r
+               t20 += v * b13;\r
+               t21 += v * b14;\r
+               t22 += v * b15;\r
+               v = a[8];\r
+               t8 += v * b0;\r
+               t9 += v * b1;\r
+               t10 += v * b2;\r
+               t11 += v * b3;\r
+               t12 += v * b4;\r
+               t13 += v * b5;\r
+               t14 += v * b6;\r
+               t15 += v * b7;\r
+               t16 += v * b8;\r
+               t17 += v * b9;\r
+               t18 += v * b10;\r
+               t19 += v * b11;\r
+               t20 += v * b12;\r
+               t21 += v * b13;\r
+               t22 += v * b14;\r
+               t23 += v * b15;\r
+               v = a[9];\r
+               t9 += v * b0;\r
+               t10 += v * b1;\r
+               t11 += v * b2;\r
+               t12 += v * b3;\r
+               t13 += v * b4;\r
+               t14 += v * b5;\r
+               t15 += v * b6;\r
+               t16 += v * b7;\r
+               t17 += v * b8;\r
+               t18 += v * b9;\r
+               t19 += v * b10;\r
+               t20 += v * b11;\r
+               t21 += v * b12;\r
+               t22 += v * b13;\r
+               t23 += v * b14;\r
+               t24 += v * b15;\r
+               v = a[10];\r
+               t10 += v * b0;\r
+               t11 += v * b1;\r
+               t12 += v * b2;\r
+               t13 += v * b3;\r
+               t14 += v * b4;\r
+               t15 += v * b5;\r
+               t16 += v * b6;\r
+               t17 += v * b7;\r
+               t18 += v * b8;\r
+               t19 += v * b9;\r
+               t20 += v * b10;\r
+               t21 += v * b11;\r
+               t22 += v * b12;\r
+               t23 += v * b13;\r
+               t24 += v * b14;\r
+               t25 += v * b15;\r
+               v = a[11];\r
+               t11 += v * b0;\r
+               t12 += v * b1;\r
+               t13 += v * b2;\r
+               t14 += v * b3;\r
+               t15 += v * b4;\r
+               t16 += v * b5;\r
+               t17 += v * b6;\r
+               t18 += v * b7;\r
+               t19 += v * b8;\r
+               t20 += v * b9;\r
+               t21 += v * b10;\r
+               t22 += v * b11;\r
+               t23 += v * b12;\r
+               t24 += v * b13;\r
+               t25 += v * b14;\r
+               t26 += v * b15;\r
+               v = a[12];\r
+               t12 += v * b0;\r
+               t13 += v * b1;\r
+               t14 += v * b2;\r
+               t15 += v * b3;\r
+               t16 += v * b4;\r
+               t17 += v * b5;\r
+               t18 += v * b6;\r
+               t19 += v * b7;\r
+               t20 += v * b8;\r
+               t21 += v * b9;\r
+               t22 += v * b10;\r
+               t23 += v * b11;\r
+               t24 += v * b12;\r
+               t25 += v * b13;\r
+               t26 += v * b14;\r
+               t27 += v * b15;\r
+               v = a[13];\r
+               t13 += v * b0;\r
+               t14 += v * b1;\r
+               t15 += v * b2;\r
+               t16 += v * b3;\r
+               t17 += v * b4;\r
+               t18 += v * b5;\r
+               t19 += v * b6;\r
+               t20 += v * b7;\r
+               t21 += v * b8;\r
+               t22 += v * b9;\r
+               t23 += v * b10;\r
+               t24 += v * b11;\r
+               t25 += v * b12;\r
+               t26 += v * b13;\r
+               t27 += v * b14;\r
+               t28 += v * b15;\r
+               v = a[14];\r
+               t14 += v * b0;\r
+               t15 += v * b1;\r
+               t16 += v * b2;\r
+               t17 += v * b3;\r
+               t18 += v * b4;\r
+               t19 += v * b5;\r
+               t20 += v * b6;\r
+               t21 += v * b7;\r
+               t22 += v * b8;\r
+               t23 += v * b9;\r
+               t24 += v * b10;\r
+               t25 += v * b11;\r
+               t26 += v * b12;\r
+               t27 += v * b13;\r
+               t28 += v * b14;\r
+               t29 += v * b15;\r
+               v = a[15];\r
+               t15 += v * b0;\r
+               t16 += v * b1;\r
+               t17 += v * b2;\r
+               t18 += v * b3;\r
+               t19 += v * b4;\r
+               t20 += v * b5;\r
+               t21 += v * b6;\r
+               t22 += v * b7;\r
+               t23 += v * b8;\r
+               t24 += v * b9;\r
+               t25 += v * b10;\r
+               t26 += v * b11;\r
+               t27 += v * b12;\r
+               t28 += v * b13;\r
+               t29 += v * b14;\r
+               t30 += v * b15;\r
+       \r
+               t0  += 38 * t16;\r
+               t1  += 38 * t17;\r
+               t2  += 38 * t18;\r
+               t3  += 38 * t19;\r
+               t4  += 38 * t20;\r
+               t5  += 38 * t21;\r
+               t6  += 38 * t22;\r
+               t7  += 38 * t23;\r
+               t8  += 38 * t24;\r
+               t9  += 38 * t25;\r
+               t10 += 38 * t26;\r
+               t11 += 38 * t27;\r
+               t12 += 38 * t28;\r
+               t13 += 38 * t29;\r
+               t14 += 38 * t30;\r
+               // t15 left as is\r
+       \r
+               // first car\r
+               c = 1;\r
+               v =  t0 + c + 65535; c = Math.floor(v / 65536);  t0 = v - c * 65536;\r
+               v =  t1 + c + 65535; c = Math.floor(v / 65536);  t1 = v - c * 65536;\r
+               v =  t2 + c + 65535; c = Math.floor(v / 65536);  t2 = v - c * 65536;\r
+               v =  t3 + c + 65535; c = Math.floor(v / 65536);  t3 = v - c * 65536;\r
+               v =  t4 + c + 65535; c = Math.floor(v / 65536);  t4 = v - c * 65536;\r
+               v =  t5 + c + 65535; c = Math.floor(v / 65536);  t5 = v - c * 65536;\r
+               v =  t6 + c + 65535; c = Math.floor(v / 65536);  t6 = v - c * 65536;\r
+               v =  t7 + c + 65535; c = Math.floor(v / 65536);  t7 = v - c * 65536;\r
+               v =  t8 + c + 65535; c = Math.floor(v / 65536);  t8 = v - c * 65536;\r
+               v =  t9 + c + 65535; c = Math.floor(v / 65536);  t9 = v - c * 65536;\r
+               v = t10 + c + 65535; c = Math.floor(v / 65536); t10 = v - c * 65536;\r
+               v = t11 + c + 65535; c = Math.floor(v / 65536); t11 = v - c * 65536;\r
+               v = t12 + c + 65535; c = Math.floor(v / 65536); t12 = v - c * 65536;\r
+               v = t13 + c + 65535; c = Math.floor(v / 65536); t13 = v - c * 65536;\r
+               v = t14 + c + 65535; c = Math.floor(v / 65536); t14 = v - c * 65536;\r
+               v = t15 + c + 65535; c = Math.floor(v / 65536); t15 = v - c * 65536;\r
+               t0 += c-1 + 37 * (c-1);\r
+       \r
+               // second car\r
+               c = 1;\r
+               v =  t0 + c + 65535; c = Math.floor(v / 65536);  t0 = v - c * 65536;\r
+               v =  t1 + c + 65535; c = Math.floor(v / 65536);  t1 = v - c * 65536;\r
+               v =  t2 + c + 65535; c = Math.floor(v / 65536);  t2 = v - c * 65536;\r
+               v =  t3 + c + 65535; c = Math.floor(v / 65536);  t3 = v - c * 65536;\r
+               v =  t4 + c + 65535; c = Math.floor(v / 65536);  t4 = v - c * 65536;\r
+               v =  t5 + c + 65535; c = Math.floor(v / 65536);  t5 = v - c * 65536;\r
+               v =  t6 + c + 65535; c = Math.floor(v / 65536);  t6 = v - c * 65536;\r
+               v =  t7 + c + 65535; c = Math.floor(v / 65536);  t7 = v - c * 65536;\r
+               v =  t8 + c + 65535; c = Math.floor(v / 65536);  t8 = v - c * 65536;\r
+               v =  t9 + c + 65535; c = Math.floor(v / 65536);  t9 = v - c * 65536;\r
+               v = t10 + c + 65535; c = Math.floor(v / 65536); t10 = v - c * 65536;\r
+               v = t11 + c + 65535; c = Math.floor(v / 65536); t11 = v - c * 65536;\r
+               v = t12 + c + 65535; c = Math.floor(v / 65536); t12 = v - c * 65536;\r
+               v = t13 + c + 65535; c = Math.floor(v / 65536); t13 = v - c * 65536;\r
+               v = t14 + c + 65535; c = Math.floor(v / 65536); t14 = v - c * 65536;\r
+               v = t15 + c + 65535; c = Math.floor(v / 65536); t15 = v - c * 65536;\r
+               t0 += c-1 + 37 * (c-1);\r
+       \r
+               o[ 0] = t0;\r
+               o[ 1] = t1;\r
+               o[ 2] = t2;\r
+               o[ 3] = t3;\r
+               o[ 4] = t4;\r
+               o[ 5] = t5;\r
+               o[ 6] = t6;\r
+               o[ 7] = t7;\r
+               o[ 8] = t8;\r
+               o[ 9] = t9;\r
+               o[10] = t10;\r
+               o[11] = t11;\r
+               o[12] = t12;\r
+               o[13] = t13;\r
+               o[14] = t14;\r
+               o[15] = t15;\r
+       }\r
+       \r
+       function S(o, a) {\r
+               M(o, a, a);\r
+       }\r
+       \r
+       function inv25519(o, i) {\r
+               var c = gf();\r
+               var a;\r
+               for (a = 0; a < 16; a++) c[a] = i[a];\r
+               for (a = 253; a >= 0; a--) {\r
+                       S(c, c);\r
+                       if(a !== 2 && a !== 4) M(c, c, i);\r
+               }\r
+               for (a = 0; a < 16; a++) o[a] = c[a];\r
+       }\r
+       \r
+       function pow2523(o, i) {\r
+               var c = gf();\r
+               var a;\r
+               for (a = 0; a < 16; a++) c[a] = i[a];\r
+               for (a = 250; a >= 0; a--) {\r
+                               S(c, c);\r
+                               if(a !== 1) M(c, c, i);\r
+               }\r
+               for (a = 0; a < 16; a++) o[a] = c[a];\r
+       }\r
+       \r
+       function crypto_scalarmult(q, n, p) {\r
+               var z = new Uint8Array(32);\r
+               var x = new Float64Array(80), r, i;\r
+               var a = gf(), b = gf(), c = gf(),\r
+                               d = gf(), e = gf(), f = gf();\r
+               for (i = 0; i < 31; i++) z[i] = n[i];\r
+               z[31]=(n[31]&127)|64;\r
+               z[0]&=248;\r
+               unpack25519(x,p);\r
+               for (i = 0; i < 16; i++) {\r
+                       b[i]=x[i];\r
+                       d[i]=a[i]=c[i]=0;\r
+               }\r
+               a[0]=d[0]=1;\r
+               for (i=254; i>=0; --i) {\r
+                       r=(z[i>>>3]>>>(i&7))&1;\r
+                       sel25519(a,b,r);\r
+                       sel25519(c,d,r);\r
+                       A(e,a,c);\r
+                       Z(a,a,c);\r
+                       A(c,b,d);\r
+                       Z(b,b,d);\r
+                       S(d,e);\r
+                       S(f,a);\r
+                       M(a,c,a);\r
+                       M(c,b,e);\r
+                       A(e,a,c);\r
+                       Z(a,a,c);\r
+                       S(b,a);\r
+                       Z(c,d,f);\r
+                       M(a,c,_121665);\r
+                       A(a,a,d);\r
+                       M(c,c,a);\r
+                       M(a,d,f);\r
+                       M(d,b,x);\r
+                       S(b,e);\r
+                       sel25519(a,b,r);\r
+                       sel25519(c,d,r);\r
+               }\r
+               for (i = 0; i < 16; i++) {\r
+                       x[i+16]=a[i];\r
+                       x[i+32]=c[i];\r
+                       x[i+48]=b[i];\r
+                       x[i+64]=d[i];\r
+               }\r
+               var x32 = x.subarray(32);\r
+               var x16 = x.subarray(16);\r
+               inv25519(x32,x32);\r
+               M(x16,x16,x32);\r
+               pack25519(q,x16);\r
+               return 0;\r
+       }\r
+       \r
+       function crypto_scalarmult_base(q, n) {\r
+               return crypto_scalarmult(q, n, _9);\r
+       }\r
+       \r
+       function crypto_box_keypair(y, x) {\r
+               randombytes(x, 32);\r
+               return crypto_scalarmult_base(y, x);\r
+       }\r
+       \r
+       function crypto_box_beforenm(k, y, x) {\r
+               var s = new Uint8Array(32);\r
+               crypto_scalarmult(s, x, y);\r
+               return crypto_core_hsalsa20(k, _0, s, sigma);\r
+       }\r
+       \r
+       var crypto_box_afternm = crypto_secretbox;\r
+       var crypto_box_open_afternm = crypto_secretbox_open;\r
+       \r
+       function crypto_box(c, m, d, n, y, x) {\r
+               var k = new Uint8Array(32);\r
+               crypto_box_beforenm(k, y, x);\r
+               return crypto_box_afternm(c, m, d, n, k);\r
+       }\r
+       \r
+       function crypto_box_open(m, c, d, n, y, x) {\r
+               var k = new Uint8Array(32);\r
+               crypto_box_beforenm(k, y, x);\r
+               return crypto_box_open_afternm(m, c, d, n, k);\r
+       }\r
+       \r
+       var K = [\r
+               0x428a2f98, 0xd728ae22, 0x71374491, 0x23ef65cd,\r
+               0xb5c0fbcf, 0xec4d3b2f, 0xe9b5dba5, 0x8189dbbc,\r
+               0x3956c25b, 0xf348b538, 0x59f111f1, 0xb605d019,\r
+               0x923f82a4, 0xaf194f9b, 0xab1c5ed5, 0xda6d8118,\r
+               0xd807aa98, 0xa3030242, 0x12835b01, 0x45706fbe,\r
+               0x243185be, 0x4ee4b28c, 0x550c7dc3, 0xd5ffb4e2,\r
+               0x72be5d74, 0xf27b896f, 0x80deb1fe, 0x3b1696b1,\r
+               0x9bdc06a7, 0x25c71235, 0xc19bf174, 0xcf692694,\r
+               0xe49b69c1, 0x9ef14ad2, 0xefbe4786, 0x384f25e3,\r
+               0x0fc19dc6, 0x8b8cd5b5, 0x240ca1cc, 0x77ac9c65,\r
+               0x2de92c6f, 0x592b0275, 0x4a7484aa, 0x6ea6e483,\r
+               0x5cb0a9dc, 0xbd41fbd4, 0x76f988da, 0x831153b5,\r
+               0x983e5152, 0xee66dfab, 0xa831c66d, 0x2db43210,\r
+               0xb00327c8, 0x98fb213f, 0xbf597fc7, 0xbeef0ee4,\r
+               0xc6e00bf3, 0x3da88fc2, 0xd5a79147, 0x930aa725,\r
+               0x06ca6351, 0xe003826f, 0x14292967, 0x0a0e6e70,\r
+               0x27b70a85, 0x46d22ffc, 0x2e1b2138, 0x5c26c926,\r
+               0x4d2c6dfc, 0x5ac42aed, 0x53380d13, 0x9d95b3df,\r
+               0x650a7354, 0x8baf63de, 0x766a0abb, 0x3c77b2a8,\r
+               0x81c2c92e, 0x47edaee6, 0x92722c85, 0x1482353b,\r
+               0xa2bfe8a1, 0x4cf10364, 0xa81a664b, 0xbc423001,\r
+               0xc24b8b70, 0xd0f89791, 0xc76c51a3, 0x0654be30,\r
+               0xd192e819, 0xd6ef5218, 0xd6990624, 0x5565a910,\r
+               0xf40e3585, 0x5771202a, 0x106aa070, 0x32bbd1b8,\r
+               0x19a4c116, 0xb8d2d0c8, 0x1e376c08, 0x5141ab53,\r
+               0x2748774c, 0xdf8eeb99, 0x34b0bcb5, 0xe19b48a8,\r
+               0x391c0cb3, 0xc5c95a63, 0x4ed8aa4a, 0xe3418acb,\r
+               0x5b9cca4f, 0x7763e373, 0x682e6ff3, 0xd6b2b8a3,\r
+               0x748f82ee, 0x5defb2fc, 0x78a5636f, 0x43172f60,\r
+               0x84c87814, 0xa1f0ab72, 0x8cc70208, 0x1a6439ec,\r
+               0x90befffa, 0x23631e28, 0xa4506ceb, 0xde82bde9,\r
+               0xbef9a3f7, 0xb2c67915, 0xc67178f2, 0xe372532b,\r
+               0xca273ece, 0xea26619c, 0xd186b8c7, 0x21c0c207,\r
+               0xeada7dd6, 0xcde0eb1e, 0xf57d4f7f, 0xee6ed178,\r
+               0x06f067aa, 0x72176fba, 0x0a637dc5, 0xa2c898a6,\r
+               0x113f9804, 0xbef90dae, 0x1b710b35, 0x131c471b,\r
+               0x28db77f5, 0x23047d84, 0x32caab7b, 0x40c72493,\r
+               0x3c9ebe0a, 0x15c9bebc, 0x431d67c4, 0x9c100d4c,\r
+               0x4cc5d4be, 0xcb3e42b6, 0x597f299c, 0xfc657e2a,\r
+               0x5fcb6fab, 0x3ad6faec, 0x6c44198c, 0x4a475817\r
+       ];\r
+       \r
+       function crypto_hashblocks_hl(hh, hl, m, n) {\r
+               var wh = new Int32Array(16), wl = new Int32Array(16),\r
+                               bh0, bh1, bh2, bh3, bh4, bh5, bh6, bh7,\r
+                               bl0, bl1, bl2, bl3, bl4, bl5, bl6, bl7,\r
+                               th, tl, i, j, h, l, a, b, c, d;\r
+       \r
+               var ah0 = hh[0],\r
+                               ah1 = hh[1],\r
+                               ah2 = hh[2],\r
+                               ah3 = hh[3],\r
+                               ah4 = hh[4],\r
+                               ah5 = hh[5],\r
+                               ah6 = hh[6],\r
+                               ah7 = hh[7],\r
+       \r
+                               al0 = hl[0],\r
+                               al1 = hl[1],\r
+                               al2 = hl[2],\r
+                               al3 = hl[3],\r
+                               al4 = hl[4],\r
+                               al5 = hl[5],\r
+                               al6 = hl[6],\r
+                               al7 = hl[7];\r
+       \r
+               var pos = 0;\r
+               while (n >= 128) {\r
+                       for (i = 0; i < 16; i++) {\r
+                               j = 8 * i + pos;\r
+                               wh[i] = (m[j+0] << 24) | (m[j+1] << 16) | (m[j+2] << 8) | m[j+3];\r
+                               wl[i] = (m[j+4] << 24) | (m[j+5] << 16) | (m[j+6] << 8) | m[j+7];\r
+                       }\r
+                       for (i = 0; i < 80; i++) {\r
+                               bh0 = ah0;\r
+                               bh1 = ah1;\r
+                               bh2 = ah2;\r
+                               bh3 = ah3;\r
+                               bh4 = ah4;\r
+                               bh5 = ah5;\r
+                               bh6 = ah6;\r
+                               bh7 = ah7;\r
+       \r
+                               bl0 = al0;\r
+                               bl1 = al1;\r
+                               bl2 = al2;\r
+                               bl3 = al3;\r
+                               bl4 = al4;\r
+                               bl5 = al5;\r
+                               bl6 = al6;\r
+                               bl7 = al7;\r
+       \r
+                               // add\r
+                               h = ah7;\r
+                               l = al7;\r
+       \r
+                               a = l & 0xffff; b = l >>> 16;\r
+                               c = h & 0xffff; d = h >>> 16;\r
+       \r
+                               // Sigma1\r
+                               h = ((ah4 >>> 14) | (al4 << (32-14))) ^ ((ah4 >>> 18) | (al4 << (32-18))) ^ ((al4 >>> (41-32)) | (ah4 << (32-(41-32))));\r
+                               l = ((al4 >>> 14) | (ah4 << (32-14))) ^ ((al4 >>> 18) | (ah4 << (32-18))) ^ ((ah4 >>> (41-32)) | (al4 << (32-(41-32))));\r
+       \r
+                               a += l & 0xffff; b += l >>> 16;\r
+                               c += h & 0xffff; d += h >>> 16;\r
+       \r
+                               // Ch\r
+                               h = (ah4 & ah5) ^ (~ah4 & ah6);\r
+                               l = (al4 & al5) ^ (~al4 & al6);\r
+       \r
+                               a += l & 0xffff; b += l >>> 16;\r
+                               c += h & 0xffff; d += h >>> 16;\r
+       \r
+                               // K\r
+                               h = K[i*2];\r
+                               l = K[i*2+1];\r
+       \r
+                               a += l & 0xffff; b += l >>> 16;\r
+                               c += h & 0xffff; d += h >>> 16;\r
+       \r
+                               // w\r
+                               h = wh[i%16];\r
+                               l = wl[i%16];\r
+       \r
+                               a += l & 0xffff; b += l >>> 16;\r
+                               c += h & 0xffff; d += h >>> 16;\r
+       \r
+                               b += a >>> 16;\r
+                               c += b >>> 16;\r
+                               d += c >>> 16;\r
+       \r
+                               th = c & 0xffff | d << 16;\r
+                               tl = a & 0xffff | b << 16;\r
+       \r
+                               // add\r
+                               h = th;\r
+                               l = tl;\r
+       \r
+                               a = l & 0xffff; b = l >>> 16;\r
+                               c = h & 0xffff; d = h >>> 16;\r
+       \r
+                               // Sigma0\r
+                               h = ((ah0 >>> 28) | (al0 << (32-28))) ^ ((al0 >>> (34-32)) | (ah0 << (32-(34-32)))) ^ ((al0 >>> (39-32)) | (ah0 << (32-(39-32))));\r
+                               l = ((al0 >>> 28) | (ah0 << (32-28))) ^ ((ah0 >>> (34-32)) | (al0 << (32-(34-32)))) ^ ((ah0 >>> (39-32)) | (al0 << (32-(39-32))));\r
+       \r
+                               a += l & 0xffff; b += l >>> 16;\r
+                               c += h & 0xffff; d += h >>> 16;\r
+       \r
+                               // Maj\r
+                               h = (ah0 & ah1) ^ (ah0 & ah2) ^ (ah1 & ah2);\r
+                               l = (al0 & al1) ^ (al0 & al2) ^ (al1 & al2);\r
+       \r
+                               a += l & 0xffff; b += l >>> 16;\r
+                               c += h & 0xffff; d += h >>> 16;\r
+       \r
+                               b += a >>> 16;\r
+                               c += b >>> 16;\r
+                               d += c >>> 16;\r
+       \r
+                               bh7 = (c & 0xffff) | (d << 16);\r
+                               bl7 = (a & 0xffff) | (b << 16);\r
+       \r
+                               // add\r
+                               h = bh3;\r
+                               l = bl3;\r
+       \r
+                               a = l & 0xffff; b = l >>> 16;\r
+                               c = h & 0xffff; d = h >>> 16;\r
+       \r
+                               h = th;\r
+                               l = tl;\r
+       \r
+                               a += l & 0xffff; b += l >>> 16;\r
+                               c += h & 0xffff; d += h >>> 16;\r
+       \r
+                               b += a >>> 16;\r
+                               c += b >>> 16;\r
+                               d += c >>> 16;\r
+       \r
+                               bh3 = (c & 0xffff) | (d << 16);\r
+                               bl3 = (a & 0xffff) | (b << 16);\r
+       \r
+                               ah1 = bh0;\r
+                               ah2 = bh1;\r
+                               ah3 = bh2;\r
+                               ah4 = bh3;\r
+                               ah5 = bh4;\r
+                               ah6 = bh5;\r
+                               ah7 = bh6;\r
+                               ah0 = bh7;\r
+       \r
+                               al1 = bl0;\r
+                               al2 = bl1;\r
+                               al3 = bl2;\r
+                               al4 = bl3;\r
+                               al5 = bl4;\r
+                               al6 = bl5;\r
+                               al7 = bl6;\r
+                               al0 = bl7;\r
+       \r
+                               if (i%16 === 15) {\r
+                                       for (j = 0; j < 16; j++) {\r
+                                               // add\r
+                                               h = wh[j];\r
+                                               l = wl[j];\r
+       \r
+                                               a = l & 0xffff; b = l >>> 16;\r
+                                               c = h & 0xffff; d = h >>> 16;\r
+       \r
+                                               h = wh[(j+9)%16];\r
+                                               l = wl[(j+9)%16];\r
+       \r
+                                               a += l & 0xffff; b += l >>> 16;\r
+                                               c += h & 0xffff; d += h >>> 16;\r
+       \r
+                                               // sigma0\r
+                                               th = wh[(j+1)%16];\r
+                                               tl = wl[(j+1)%16];\r
+                                               h = ((th >>> 1) | (tl << (32-1))) ^ ((th >>> 8) | (tl << (32-8))) ^ (th >>> 7);\r
+                                               l = ((tl >>> 1) | (th << (32-1))) ^ ((tl >>> 8) | (th << (32-8))) ^ ((tl >>> 7) | (th << (32-7)));\r
+       \r
+                                               a += l & 0xffff; b += l >>> 16;\r
+                                               c += h & 0xffff; d += h >>> 16;\r
+       \r
+                                               // sigma1\r
+                                               th = wh[(j+14)%16];\r
+                                               tl = wl[(j+14)%16];\r
+                                               h = ((th >>> 19) | (tl << (32-19))) ^ ((tl >>> (61-32)) | (th << (32-(61-32)))) ^ (th >>> 6);\r
+                                               l = ((tl >>> 19) | (th << (32-19))) ^ ((th >>> (61-32)) | (tl << (32-(61-32)))) ^ ((tl >>> 6) | (th << (32-6)));\r
+       \r
+                                               a += l & 0xffff; b += l >>> 16;\r
+                                               c += h & 0xffff; d += h >>> 16;\r
+       \r
+                                               b += a >>> 16;\r
+                                               c += b >>> 16;\r
+                                               d += c >>> 16;\r
+       \r
+                                               wh[j] = (c & 0xffff) | (d << 16);\r
+                                               wl[j] = (a & 0xffff) | (b << 16);\r
+                                       }\r
+                               }\r
+                       }\r
+       \r
+                       // add\r
+                       h = ah0;\r
+                       l = al0;\r
+       \r
+                       a = l & 0xffff; b = l >>> 16;\r
+                       c = h & 0xffff; d = h >>> 16;\r
+       \r
+                       h = hh[0];\r
+                       l = hl[0];\r
+       \r
+                       a += l & 0xffff; b += l >>> 16;\r
+                       c += h & 0xffff; d += h >>> 16;\r
+       \r
+                       b += a >>> 16;\r
+                       c += b >>> 16;\r
+                       d += c >>> 16;\r
+       \r
+                       hh[0] = ah0 = (c & 0xffff) | (d << 16);\r
+                       hl[0] = al0 = (a & 0xffff) | (b << 16);\r
+       \r
+                       h = ah1;\r
+                       l = al1;\r
+       \r
+                       a = l & 0xffff; b = l >>> 16;\r
+                       c = h & 0xffff; d = h >>> 16;\r
+       \r
+                       h = hh[1];\r
+                       l = hl[1];\r
+       \r
+                       a += l & 0xffff; b += l >>> 16;\r
+                       c += h & 0xffff; d += h >>> 16;\r
+       \r
+                       b += a >>> 16;\r
+                       c += b >>> 16;\r
+                       d += c >>> 16;\r
+       \r
+                       hh[1] = ah1 = (c & 0xffff) | (d << 16);\r
+                       hl[1] = al1 = (a & 0xffff) | (b << 16);\r
+       \r
+                       h = ah2;\r
+                       l = al2;\r
+       \r
+                       a = l & 0xffff; b = l >>> 16;\r
+                       c = h & 0xffff; d = h >>> 16;\r
+       \r
+                       h = hh[2];\r
+                       l = hl[2];\r
+       \r
+                       a += l & 0xffff; b += l >>> 16;\r
+                       c += h & 0xffff; d += h >>> 16;\r
+       \r
+                       b += a >>> 16;\r
+                       c += b >>> 16;\r
+                       d += c >>> 16;\r
+       \r
+                       hh[2] = ah2 = (c & 0xffff) | (d << 16);\r
+                       hl[2] = al2 = (a & 0xffff) | (b << 16);\r
+       \r
+                       h = ah3;\r
+                       l = al3;\r
+       \r
+                       a = l & 0xffff; b = l >>> 16;\r
+                       c = h & 0xffff; d = h >>> 16;\r
+       \r
+                       h = hh[3];\r
+                       l = hl[3];\r
+       \r
+                       a += l & 0xffff; b += l >>> 16;\r
+                       c += h & 0xffff; d += h >>> 16;\r
+       \r
+                       b += a >>> 16;\r
+                       c += b >>> 16;\r
+                       d += c >>> 16;\r
+       \r
+                       hh[3] = ah3 = (c & 0xffff) | (d << 16);\r
+                       hl[3] = al3 = (a & 0xffff) | (b << 16);\r
+       \r
+                       h = ah4;\r
+                       l = al4;\r
+       \r
+                       a = l & 0xffff; b = l >>> 16;\r
+                       c = h & 0xffff; d = h >>> 16;\r
+       \r
+                       h = hh[4];\r
+                       l = hl[4];\r
+       \r
+                       a += l & 0xffff; b += l >>> 16;\r
+                       c += h & 0xffff; d += h >>> 16;\r
+       \r
+                       b += a >>> 16;\r
+                       c += b >>> 16;\r
+                       d += c >>> 16;\r
+       \r
+                       hh[4] = ah4 = (c & 0xffff) | (d << 16);\r
+                       hl[4] = al4 = (a & 0xffff) | (b << 16);\r
+       \r
+                       h = ah5;\r
+                       l = al5;\r
+       \r
+                       a = l & 0xffff; b = l >>> 16;\r
+                       c = h & 0xffff; d = h >>> 16;\r
+       \r
+                       h = hh[5];\r
+                       l = hl[5];\r
+       \r
+                       a += l & 0xffff; b += l >>> 16;\r
+                       c += h & 0xffff; d += h >>> 16;\r
+       \r
+                       b += a >>> 16;\r
+                       c += b >>> 16;\r
+                       d += c >>> 16;\r
+       \r
+                       hh[5] = ah5 = (c & 0xffff) | (d << 16);\r
+                       hl[5] = al5 = (a & 0xffff) | (b << 16);\r
+       \r
+                       h = ah6;\r
+                       l = al6;\r
+       \r
+                       a = l & 0xffff; b = l >>> 16;\r
+                       c = h & 0xffff; d = h >>> 16;\r
+       \r
+                       h = hh[6];\r
+                       l = hl[6];\r
+       \r
+                       a += l & 0xffff; b += l >>> 16;\r
+                       c += h & 0xffff; d += h >>> 16;\r
+       \r
+                       b += a >>> 16;\r
+                       c += b >>> 16;\r
+                       d += c >>> 16;\r
+       \r
+                       hh[6] = ah6 = (c & 0xffff) | (d << 16);\r
+                       hl[6] = al6 = (a & 0xffff) | (b << 16);\r
+       \r
+                       h = ah7;\r
+                       l = al7;\r
+       \r
+                       a = l & 0xffff; b = l >>> 16;\r
+                       c = h & 0xffff; d = h >>> 16;\r
+       \r
+                       h = hh[7];\r
+                       l = hl[7];\r
+       \r
+                       a += l & 0xffff; b += l >>> 16;\r
+                       c += h & 0xffff; d += h >>> 16;\r
+       \r
+                       b += a >>> 16;\r
+                       c += b >>> 16;\r
+                       d += c >>> 16;\r
+       \r
+                       hh[7] = ah7 = (c & 0xffff) | (d << 16);\r
+                       hl[7] = al7 = (a & 0xffff) | (b << 16);\r
+       \r
+                       pos += 128;\r
+                       n -= 128;\r
+               }\r
+       \r
+               return n;\r
+       }\r
+       \r
+       function crypto_hash(out, m, n) {\r
+               var hh = new Int32Array(8),\r
+                               hl = new Int32Array(8),\r
+                               x = new Uint8Array(256),\r
+                               i, b = n;\r
+       \r
+               hh[0] = 0x6a09e667;\r
+               hh[1] = 0xbb67ae85;\r
+               hh[2] = 0x3c6ef372;\r
+               hh[3] = 0xa54ff53a;\r
+               hh[4] = 0x510e527f;\r
+               hh[5] = 0x9b05688c;\r
+               hh[6] = 0x1f83d9ab;\r
+               hh[7] = 0x5be0cd19;\r
+       \r
+               hl[0] = 0xf3bcc908;\r
+               hl[1] = 0x84caa73b;\r
+               hl[2] = 0xfe94f82b;\r
+               hl[3] = 0x5f1d36f1;\r
+               hl[4] = 0xade682d1;\r
+               hl[5] = 0x2b3e6c1f;\r
+               hl[6] = 0xfb41bd6b;\r
+               hl[7] = 0x137e2179;\r
+       \r
+               crypto_hashblocks_hl(hh, hl, m, n);\r
+               n %= 128;\r
+       \r
+               for (i = 0; i < n; i++) x[i] = m[b-n+i];\r
+               x[n] = 128;\r
+       \r
+               n = 256-128*(n<112?1:0);\r
+               x[n-9] = 0;\r
+               ts64(x, n-8,  (b / 0x20000000) | 0, b << 3);\r
+               crypto_hashblocks_hl(hh, hl, x, n);\r
+       \r
+               for (i = 0; i < 8; i++) ts64(out, 8*i, hh[i], hl[i]);\r
+       \r
+               return 0;\r
+       }\r
+       \r
+       function add(p, q) {\r
+               var a = gf(), b = gf(), c = gf(),\r
+                               d = gf(), e = gf(), f = gf(),\r
+                               g = gf(), h = gf(), t = gf();\r
+       \r
+               Z(a, p[1], p[0]);\r
+               Z(t, q[1], q[0]);\r
+               M(a, a, t);\r
+               A(b, p[0], p[1]);\r
+               A(t, q[0], q[1]);\r
+               M(b, b, t);\r
+               M(c, p[3], q[3]);\r
+               M(c, c, D2);\r
+               M(d, p[2], q[2]);\r
+               A(d, d, d);\r
+               Z(e, b, a);\r
+               Z(f, d, c);\r
+               A(g, d, c);\r
+               A(h, b, a);\r
+       \r
+               M(p[0], e, f);\r
+               M(p[1], h, g);\r
+               M(p[2], g, f);\r
+               M(p[3], e, h);\r
+       }\r
+       \r
+       function cswap(p, q, b) {\r
+               var i;\r
+               for (i = 0; i < 4; i++) {\r
+                       sel25519(p[i], q[i], b);\r
+               }\r
+       }\r
+       \r
+       function pack(r, p) {\r
+               var tx = gf(), ty = gf(), zi = gf();\r
+               inv25519(zi, p[2]);\r
+               M(tx, p[0], zi);\r
+               M(ty, p[1], zi);\r
+               pack25519(r, ty);\r
+               r[31] ^= par25519(tx) << 7;\r
+       }\r
+       \r
+       function scalarmult(p, q, s) {\r
+               var b, i;\r
+               set25519(p[0], gf0);\r
+               set25519(p[1], gf1);\r
+               set25519(p[2], gf1);\r
+               set25519(p[3], gf0);\r
+               for (i = 255; i >= 0; --i) {\r
+                       b = (s[(i/8)|0] >> (i&7)) & 1;\r
+                       cswap(p, q, b);\r
+                       add(q, p);\r
+                       add(p, p);\r
+                       cswap(p, q, b);\r
+               }\r
+       }\r
+       \r
+       function scalarbase(p, s) {\r
+               var q = [gf(), gf(), gf(), gf()];\r
+               set25519(q[0], X);\r
+               set25519(q[1], Y);\r
+               set25519(q[2], gf1);\r
+               M(q[3], X, Y);\r
+               scalarmult(p, q, s);\r
+       }\r
+       \r
+       function crypto_sign_keypair(pk, sk, seeded) {\r
+               var d = new Uint8Array(64);\r
+               var p = [gf(), gf(), gf(), gf()];\r
+               var i;\r
+       \r
+               if (!seeded) randombytes(sk, 32);\r
+               crypto_hash(d, sk, 32);\r
+               d[0] &= 248;\r
+               d[31] &= 127;\r
+               d[31] |= 64;\r
+       \r
+               scalarbase(p, d);\r
+               pack(pk, p);\r
+       \r
+               for (i = 0; i < 32; i++) sk[i+32] = pk[i];\r
+               return 0;\r
+       }\r
+       \r
+       var L = new Float64Array([0xed, 0xd3, 0xf5, 0x5c, 0x1a, 0x63, 0x12, 0x58, 0xd6, 0x9c, 0xf7, 0xa2, 0xde, 0xf9, 0xde, 0x14, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0x10]);\r
+       \r
+       function modL(r, x) {\r
+               var carry, i, j, k;\r
+               for (i = 63; i >= 32; --i) {\r
+                       carry = 0;\r
+                       for (j = i - 32, k = i - 12; j < k; ++j) {\r
+                               x[j] += carry - 16 * x[i] * L[j - (i - 32)];\r
+                               carry = Math.floor((x[j] + 128) / 256);\r
+                               x[j] -= carry * 256;\r
+                       }\r
+                       x[j] += carry;\r
+                       x[i] = 0;\r
+               }\r
+               carry = 0;\r
+               for (j = 0; j < 32; j++) {\r
+                       x[j] += carry - (x[31] >> 4) * L[j];\r
+                       carry = x[j] >> 8;\r
+                       x[j] &= 255;\r
+               }\r
+               for (j = 0; j < 32; j++) x[j] -= carry * L[j];\r
+               for (i = 0; i < 32; i++) {\r
+                       x[i+1] += x[i] >> 8;\r
+                       r[i] = x[i] & 255;\r
+               }\r
+       }\r
+       \r
+       function reduce(r) {\r
+               var x = new Float64Array(64), i;\r
+               for (i = 0; i < 64; i++) x[i] = r[i];\r
+               for (i = 0; i < 64; i++) r[i] = 0;\r
+               modL(r, x);\r
+       }\r
+       \r
+       // Note: difference from C - smlen returned, not passed as argument.\r
+       function crypto_sign(sm, m, n, sk) {\r
+               var d = new Uint8Array(64), h = new Uint8Array(64), r = new Uint8Array(64);\r
+               var i, j, x = new Float64Array(64);\r
+               var p = [gf(), gf(), gf(), gf()];\r
+       \r
+               crypto_hash(d, sk, 32);\r
+               d[0] &= 248;\r
+               d[31] &= 127;\r
+               d[31] |= 64;\r
+       \r
+               var smlen = n + 64;\r
+               for (i = 0; i < n; i++) sm[64 + i] = m[i];\r
+               for (i = 0; i < 32; i++) sm[32 + i] = d[32 + i];\r
+       \r
+               crypto_hash(r, sm.subarray(32), n+32);\r
+               reduce(r);\r
+               scalarbase(p, r);\r
+               pack(sm, p);\r
+       \r
+               for (i = 32; i < 64; i++) sm[i] = sk[i];\r
+               crypto_hash(h, sm, n + 64);\r
+               reduce(h);\r
+       \r
+               for (i = 0; i < 64; i++) x[i] = 0;\r
+               for (i = 0; i < 32; i++) x[i] = r[i];\r
+               for (i = 0; i < 32; i++) {\r
+                       for (j = 0; j < 32; j++) {\r
+                               x[i+j] += h[i] * d[j];\r
+                       }\r
+               }\r
+       \r
+               modL(sm.subarray(32), x);\r
+               return smlen;\r
+       }\r
+       \r
+       function unpackneg(r, p) {\r
+               var t = gf(), chk = gf(), num = gf(),\r
+                               den = gf(), den2 = gf(), den4 = gf(),\r
+                               den6 = gf();\r
+       \r
+               set25519(r[2], gf1);\r
+               unpack25519(r[1], p);\r
+               S(num, r[1]);\r
+               M(den, num, D);\r
+               Z(num, num, r[2]);\r
+               A(den, r[2], den);\r
+       \r
+               S(den2, den);\r
+               S(den4, den2);\r
+               M(den6, den4, den2);\r
+               M(t, den6, num);\r
+               M(t, t, den);\r
+       \r
+               pow2523(t, t);\r
+               M(t, t, num);\r
+               M(t, t, den);\r
+               M(t, t, den);\r
+               M(r[0], t, den);\r
+       \r
+               S(chk, r[0]);\r
+               M(chk, chk, den);\r
+               if (neq25519(chk, num)) M(r[0], r[0], I);\r
+       \r
+               S(chk, r[0]);\r
+               M(chk, chk, den);\r
+               if (neq25519(chk, num)) return -1;\r
+       \r
+               if (par25519(r[0]) === (p[31]>>7)) Z(r[0], gf0, r[0]);\r
+       \r
+               M(r[3], r[0], r[1]);\r
+               return 0;\r
+       }\r
+       \r
+       function crypto_sign_open(m, sm, n, pk) {\r
+               var i;\r
+               var t = new Uint8Array(32), h = new Uint8Array(64);\r
+               var p = [gf(), gf(), gf(), gf()],\r
+                               q = [gf(), gf(), gf(), gf()];\r
+       \r
+               if (n < 64) return -1;\r
+       \r
+               if (unpackneg(q, pk)) return -1;\r
+       \r
+               for (i = 0; i < n; i++) m[i] = sm[i];\r
+               for (i = 0; i < 32; i++) m[i+32] = pk[i];\r
+               crypto_hash(h, m, n);\r
+               reduce(h);\r
+               scalarmult(p, q, h);\r
+       \r
+               scalarbase(q, sm.subarray(32));\r
+               add(p, q);\r
+               pack(t, p);\r
+       \r
+               n -= 64;\r
+               if (crypto_verify_32(sm, 0, t, 0)) {\r
+                       for (i = 0; i < n; i++) m[i] = 0;\r
+                       return -1;\r
+               }\r
+       \r
+               for (i = 0; i < n; i++) m[i] = sm[i + 64];\r
+               return n;\r
+       }\r
+       \r
+       var crypto_secretbox_KEYBYTES = 32,\r
+                       crypto_secretbox_NONCEBYTES = 24,\r
+                       crypto_secretbox_ZEROBYTES = 32,\r
+                       crypto_secretbox_BOXZEROBYTES = 16,\r
+                       crypto_scalarmult_BYTES = 32,\r
+                       crypto_scalarmult_SCALARBYTES = 32,\r
+                       crypto_box_PUBLICKEYBYTES = 32,\r
+                       crypto_box_SECRETKEYBYTES = 32,\r
+                       crypto_box_BEFORENMBYTES = 32,\r
+                       crypto_box_NONCEBYTES = crypto_secretbox_NONCEBYTES,\r
+                       crypto_box_ZEROBYTES = crypto_secretbox_ZEROBYTES,\r
+                       crypto_box_BOXZEROBYTES = crypto_secretbox_BOXZEROBYTES,\r
+                       crypto_sign_BYTES = 64,\r
+                       crypto_sign_PUBLICKEYBYTES = 32,\r
+                       crypto_sign_SECRETKEYBYTES = 64,\r
+                       crypto_sign_SEEDBYTES = 32,\r
+                       crypto_hash_BYTES = 64;\r
+       \r
+       nacl.lowlevel = {\r
+               crypto_core_hsalsa20: crypto_core_hsalsa20,\r
+               crypto_stream_xor: crypto_stream_xor,\r
+               crypto_stream: crypto_stream,\r
+               crypto_stream_salsa20_xor: crypto_stream_salsa20_xor,\r
+               crypto_stream_salsa20: crypto_stream_salsa20,\r
+               crypto_onetimeauth: crypto_onetimeauth,\r
+               crypto_onetimeauth_verify: crypto_onetimeauth_verify,\r
+               crypto_verify_16: crypto_verify_16,\r
+               crypto_verify_32: crypto_verify_32,\r
+               crypto_secretbox: crypto_secretbox,\r
+               crypto_secretbox_open: crypto_secretbox_open,\r
+               crypto_scalarmult: crypto_scalarmult,\r
+               crypto_scalarmult_base: crypto_scalarmult_base,\r
+               crypto_box_beforenm: crypto_box_beforenm,\r
+               crypto_box_afternm: crypto_box_afternm,\r
+               crypto_box: crypto_box,\r
+               crypto_box_open: crypto_box_open,\r
+               crypto_box_keypair: crypto_box_keypair,\r
+               crypto_hash: crypto_hash,\r
+               crypto_sign: crypto_sign,\r
+               crypto_sign_keypair: crypto_sign_keypair,\r
+               crypto_sign_open: crypto_sign_open,\r
+       \r
+               crypto_secretbox_KEYBYTES: crypto_secretbox_KEYBYTES,\r
+               crypto_secretbox_NONCEBYTES: crypto_secretbox_NONCEBYTES,\r
+               crypto_secretbox_ZEROBYTES: crypto_secretbox_ZEROBYTES,\r
+               crypto_secretbox_BOXZEROBYTES: crypto_secretbox_BOXZEROBYTES,\r
+               crypto_scalarmult_BYTES: crypto_scalarmult_BYTES,\r
+               crypto_scalarmult_SCALARBYTES: crypto_scalarmult_SCALARBYTES,\r
+               crypto_box_PUBLICKEYBYTES: crypto_box_PUBLICKEYBYTES,\r
+               crypto_box_SECRETKEYBYTES: crypto_box_SECRETKEYBYTES,\r
+               crypto_box_BEFORENMBYTES: crypto_box_BEFORENMBYTES,\r
+               crypto_box_NONCEBYTES: crypto_box_NONCEBYTES,\r
+               crypto_box_ZEROBYTES: crypto_box_ZEROBYTES,\r
+               crypto_box_BOXZEROBYTES: crypto_box_BOXZEROBYTES,\r
+               crypto_sign_BYTES: crypto_sign_BYTES,\r
+               crypto_sign_PUBLICKEYBYTES: crypto_sign_PUBLICKEYBYTES,\r
+               crypto_sign_SECRETKEYBYTES: crypto_sign_SECRETKEYBYTES,\r
+               crypto_sign_SEEDBYTES: crypto_sign_SEEDBYTES,\r
+               crypto_hash_BYTES: crypto_hash_BYTES,\r
+       \r
+               gf: gf,\r
+               D: D,\r
+               L: L,\r
+               pack25519: pack25519,\r
+               unpack25519: unpack25519,\r
+               M: M,\r
+               A: A,\r
+               S: S,\r
+               Z: Z,\r
+               pow2523: pow2523,\r
+               add: add,\r
+               set25519: set25519,\r
+               modL: modL,\r
+               scalarmult: scalarmult,\r
+               scalarbase: scalarbase,\r
+       };\r
+       \r
+       /* High-level API */\r
+       \r
+       function checkLengths(k, n) {\r
+               if (k.length !== crypto_secretbox_KEYBYTES) throw new Error('bad key size');\r
+               if (n.length !== crypto_secretbox_NONCEBYTES) throw new Error('bad nonce size');\r
+       }\r
+       \r
+       function checkBoxLengths(pk, sk) {\r
+               if (pk.length !== crypto_box_PUBLICKEYBYTES) throw new Error('bad public key size');\r
+               if (sk.length !== crypto_box_SECRETKEYBYTES) throw new Error('bad secret key size');\r
+       }\r
+       \r
+       function checkArrayTypes() {\r
+               for (var i = 0; i < arguments.length; i++) {\r
+                       if (!(arguments[i] instanceof Uint8Array))\r
+                               throw new TypeError('unexpected type, use Uint8Array');\r
+               }\r
+       }\r
+       \r
+       function cleanup(arr) {\r
+               for (var i = 0; i < arr.length; i++) arr[i] = 0;\r
+       }\r
+       \r
+       nacl.randomBytes = function(n) {\r
+               var b = new Uint8Array(n);\r
+               randombytes(b, n);\r
+               return b;\r
+       };\r
+       \r
+       nacl.secretbox = function(msg, nonce, key) {\r
+               checkArrayTypes(msg, nonce, key);\r
+               checkLengths(key, nonce);\r
+               var m = new Uint8Array(crypto_secretbox_ZEROBYTES + msg.length);\r
+               var c = new Uint8Array(m.length);\r
+               for (var i = 0; i < msg.length; i++) m[i+crypto_secretbox_ZEROBYTES] = msg[i];\r
+               crypto_secretbox(c, m, m.length, nonce, key);\r
+               return c.subarray(crypto_secretbox_BOXZEROBYTES);\r
+       };\r
+       \r
+       nacl.secretbox.open = function(box, nonce, key) {\r
+               checkArrayTypes(box, nonce, key);\r
+               checkLengths(key, nonce);\r
+               var c = new Uint8Array(crypto_secretbox_BOXZEROBYTES + box.length);\r
+               var m = new Uint8Array(c.length);\r
+               for (var i = 0; i < box.length; i++) c[i+crypto_secretbox_BOXZEROBYTES] = box[i];\r
+               if (c.length < 32) return null;\r
+               if (crypto_secretbox_open(m, c, c.length, nonce, key) !== 0) return null;\r
+               return m.subarray(crypto_secretbox_ZEROBYTES);\r
+       };\r
+       \r
+       nacl.secretbox.keyLength = crypto_secretbox_KEYBYTES;\r
+       nacl.secretbox.nonceLength = crypto_secretbox_NONCEBYTES;\r
+       nacl.secretbox.overheadLength = crypto_secretbox_BOXZEROBYTES;\r
+       \r
+       nacl.scalarMult = function(n, p) {\r
+               checkArrayTypes(n, p);\r
+               if (n.length !== crypto_scalarmult_SCALARBYTES) throw new Error('bad n size');\r
+               if (p.length !== crypto_scalarmult_BYTES) throw new Error('bad p size');\r
+               var q = new Uint8Array(crypto_scalarmult_BYTES);\r
+               crypto_scalarmult(q, n, p);\r
+               return q;\r
+       };\r
+       \r
+       nacl.scalarMult.base = function(n) {\r
+               checkArrayTypes(n);\r
+               if (n.length !== crypto_scalarmult_SCALARBYTES) throw new Error('bad n size');\r
+               var q = new Uint8Array(crypto_scalarmult_BYTES);\r
+               crypto_scalarmult_base(q, n);\r
+               return q;\r
+       };\r
+       \r
+       nacl.scalarMult.scalarLength = crypto_scalarmult_SCALARBYTES;\r
+       nacl.scalarMult.groupElementLength = crypto_scalarmult_BYTES;\r
+       \r
+       nacl.box = function(msg, nonce, publicKey, secretKey) {\r
+               var k = nacl.box.before(publicKey, secretKey);\r
+               return nacl.secretbox(msg, nonce, k);\r
+       };\r
+       \r
+       nacl.box.before = function(publicKey, secretKey) {\r
+               checkArrayTypes(publicKey, secretKey);\r
+               checkBoxLengths(publicKey, secretKey);\r
+               var k = new Uint8Array(crypto_box_BEFORENMBYTES);\r
+               crypto_box_beforenm(k, publicKey, secretKey);\r
+               return k;\r
+       };\r
+       \r
+       nacl.box.after = nacl.secretbox;\r
+       \r
+       nacl.box.open = function(msg, nonce, publicKey, secretKey) {\r
+               var k = nacl.box.before(publicKey, secretKey);\r
+               return nacl.secretbox.open(msg, nonce, k);\r
+       };\r
+       \r
+       nacl.box.open.after = nacl.secretbox.open;\r
+       \r
+       nacl.box.keyPair = function() {\r
+               var pk = new Uint8Array(crypto_box_PUBLICKEYBYTES);\r
+               var sk = new Uint8Array(crypto_box_SECRETKEYBYTES);\r
+               crypto_box_keypair(pk, sk);\r
+               return {publicKey: pk, secretKey: sk};\r
+       };\r
+       \r
+       nacl.box.keyPair.fromSecretKey = function(secretKey) {\r
+               checkArrayTypes(secretKey);\r
+               if (secretKey.length !== crypto_box_SECRETKEYBYTES)\r
+                       throw new Error('bad secret key size');\r
+               var pk = new Uint8Array(crypto_box_PUBLICKEYBYTES);\r
+               crypto_scalarmult_base(pk, secretKey);\r
+               return {publicKey: pk, secretKey: new Uint8Array(secretKey)};\r
+       };\r
+       \r
+       nacl.box.publicKeyLength = crypto_box_PUBLICKEYBYTES;\r
+       nacl.box.secretKeyLength = crypto_box_SECRETKEYBYTES;\r
+       nacl.box.sharedKeyLength = crypto_box_BEFORENMBYTES;\r
+       nacl.box.nonceLength = crypto_box_NONCEBYTES;\r
+       nacl.box.overheadLength = nacl.secretbox.overheadLength;\r
+       \r
+       nacl.sign = function(msg, secretKey) {\r
+               checkArrayTypes(msg, secretKey);\r
+               if (secretKey.length !== crypto_sign_SECRETKEYBYTES)\r
+                       throw new Error('bad secret key size');\r
+               var signedMsg = new Uint8Array(crypto_sign_BYTES+msg.length);\r
+               crypto_sign(signedMsg, msg, msg.length, secretKey);\r
+               return signedMsg;\r
+       };\r
+       \r
+       nacl.sign.open = function(signedMsg, publicKey) {\r
+               checkArrayTypes(signedMsg, publicKey);\r
+               if (publicKey.length !== crypto_sign_PUBLICKEYBYTES)\r
+                       throw new Error('bad public key size');\r
+               var tmp = new Uint8Array(signedMsg.length);\r
+               var mlen = crypto_sign_open(tmp, signedMsg, signedMsg.length, publicKey);\r
+               if (mlen < 0) return null;\r
+               var m = new Uint8Array(mlen);\r
+               for (var i = 0; i < m.length; i++) m[i] = tmp[i];\r
+               return m;\r
+       };\r
+       \r
+       nacl.sign.detached = function(msg, secretKey) {\r
+               var signedMsg = nacl.sign(msg, secretKey);\r
+               var sig = new Uint8Array(crypto_sign_BYTES);\r
+               for (var i = 0; i < sig.length; i++) sig[i] = signedMsg[i];\r
+               return sig;\r
+       };\r
+       \r
+       nacl.sign.detached.verify = function(msg, sig, publicKey) {\r
+               checkArrayTypes(msg, sig, publicKey);\r
+               if (sig.length !== crypto_sign_BYTES)\r
+                       throw new Error('bad signature size');\r
+               if (publicKey.length !== crypto_sign_PUBLICKEYBYTES)\r
+                       throw new Error('bad public key size');\r
+               var sm = new Uint8Array(crypto_sign_BYTES + msg.length);\r
+               var m = new Uint8Array(crypto_sign_BYTES + msg.length);\r
+               var i;\r
+               for (i = 0; i < crypto_sign_BYTES; i++) sm[i] = sig[i];\r
+               for (i = 0; i < msg.length; i++) sm[i+crypto_sign_BYTES] = msg[i];\r
+               return (crypto_sign_open(m, sm, sm.length, publicKey) >= 0);\r
+       };\r
+       \r
+       nacl.sign.keyPair = function() {\r
+               var pk = new Uint8Array(crypto_sign_PUBLICKEYBYTES);\r
+               var sk = new Uint8Array(crypto_sign_SECRETKEYBYTES);\r
+               crypto_sign_keypair(pk, sk);\r
+               return {publicKey: pk, secretKey: sk};\r
+       };\r
+       \r
+       nacl.sign.keyPair.fromSecretKey = function(secretKey) {\r
+               checkArrayTypes(secretKey);\r
+               if (secretKey.length !== crypto_sign_SECRETKEYBYTES)\r
+                       throw new Error('bad secret key size');\r
+               var pk = new Uint8Array(crypto_sign_PUBLICKEYBYTES);\r
+               for (var i = 0; i < pk.length; i++) pk[i] = secretKey[32+i];\r
+               return {publicKey: pk, secretKey: new Uint8Array(secretKey)};\r
+       };\r
+       \r
+       nacl.sign.keyPair.fromSeed = function(seed) {\r
+               checkArrayTypes(seed);\r
+               if (seed.length !== crypto_sign_SEEDBYTES)\r
+                       throw new Error('bad seed size');\r
+               var pk = new Uint8Array(crypto_sign_PUBLICKEYBYTES);\r
+               var sk = new Uint8Array(crypto_sign_SECRETKEYBYTES);\r
+               for (var i = 0; i < 32; i++) sk[i] = seed[i];\r
+               crypto_sign_keypair(pk, sk, true);\r
+               return {publicKey: pk, secretKey: sk};\r
+       };\r
+       \r
+       nacl.sign.publicKeyLength = crypto_sign_PUBLICKEYBYTES;\r
+       nacl.sign.secretKeyLength = crypto_sign_SECRETKEYBYTES;\r
+       nacl.sign.seedLength = crypto_sign_SEEDBYTES;\r
+       nacl.sign.signatureLength = crypto_sign_BYTES;\r
+       \r
+       nacl.hash = function(msg) {\r
+               checkArrayTypes(msg);\r
+               var h = new Uint8Array(crypto_hash_BYTES);\r
+               crypto_hash(h, msg, msg.length);\r
+               return h;\r
+       };\r
+       \r
+       nacl.hash.hashLength = crypto_hash_BYTES;\r
+       \r
+       nacl.verify = function(x, y) {\r
+               checkArrayTypes(x, y);\r
+               // Zero length arguments are considered not equal.\r
+               if (x.length === 0 || y.length === 0) return false;\r
+               if (x.length !== y.length) return false;\r
+               return (vn(x, 0, y, 0, x.length) === 0) ? true : false;\r
+       };\r
+       \r
+       nacl.setPRNG = function(fn) {\r
+               randombytes = fn;\r
+       };\r
+       \r
+       (function() {\r
+               // Initialize PRNG if environment provides CSPRNG.\r
+               // If not, methods calling randombytes will throw.\r
+               var crypto = typeof self !== 'undefined' ? (self.crypto || self.msCrypto) : null;\r
+               if (crypto && crypto.getRandomValues) {\r
+                       // Browsers.\r
+                       var QUOTA = 65536;\r
+                       nacl.setPRNG(function(x, n) {\r
+                               var i, v = new Uint8Array(n);\r
+                               for (i = 0; i < n; i += QUOTA) {\r
+                                       crypto.getRandomValues(v.subarray(i, i + Math.min(n - i, QUOTA)));\r
+                               }\r
+                               for (i = 0; i < n; i++) x[i] = v[i];\r
+                               cleanup(v);\r
+                       });\r
+               } else if (typeof require !== 'undefined') {\r
+                       // Node.js.\r
+                       crypto = require('crypto');\r
+                       if (crypto && crypto.randomBytes) {\r
+                               nacl.setPRNG(function(x, n) {\r
+                                       var i, v = crypto.randomBytes(n);\r
+                                       for (i = 0; i < n; i++) x[i] = v[i];\r
+                                       cleanup(v);\r
+                               });\r
+                       }\r
+               }\r
+       })();\r
+       \r
+       })(typeof module !== 'undefined' && module.exports ? module.exports : (self.nacl = self.nacl || {}));\r
+       
\ No newline at end of file