visaljs 0.0.1 → 0.0.3

package/runtime/third_party/bearssl/src/int/i15_add.c

@@ -1,46 +0,0 @@
-/*
- * Copyright (c) 2017 Thomas Pornin <pornin@bolet.org>
- *
- * Permission is hereby granted, free of charge, to any person obtaining 
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- *
- * The above copyright notice and this permission notice shall be 
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
- * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
- * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- * SOFTWARE.
- */
-
-#include "inner.h"
-
-/* see inner.h */
-uint32_t
-br_i15_add(uint16_t *a, const uint16_t *b, uint32_t ctl)
-{
-	uint32_t cc;
-	size_t u, m;
-
-	cc = 0;
-	m = (a[0] + 31) >> 4;
-	for (u = 1; u < m; u ++) {
-		uint32_t aw, bw, naw;
-
-		aw = a[u];
-		bw = b[u];
-		naw = aw + bw + cc;
-		cc = naw >> 15;
-		a[u] = MUX(ctl, naw & 0x7FFF, aw);
-	}
-	return cc;
-}

package/runtime/third_party/bearssl/src/int/i15_bitlen.c

@@ -1,44 +0,0 @@
-/*
- * Copyright (c) 2017 Thomas Pornin <pornin@bolet.org>
- *
- * Permission is hereby granted, free of charge, to any person obtaining 
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- *
- * The above copyright notice and this permission notice shall be 
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
- * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
- * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- * SOFTWARE.
- */
-
-#include "inner.h"
-
-/* see inner.h */
-uint32_t
-br_i15_bit_length(uint16_t *x, size_t xlen)
-{
-	uint32_t tw, twk;
-
-	tw = 0;
-	twk = 0;
-	while (xlen -- > 0) {
-		uint32_t w, c;
-
-		c = EQ(tw, 0);
-		w = x[xlen];
-		tw = MUX(c, w, tw);
-		twk = MUX(c, (uint32_t)xlen, twk);
-	}
-	return (twk << 4) + BIT_LENGTH(tw);
-}

package/runtime/third_party/bearssl/src/int/i15_decmod.c

@@ -1,124 +0,0 @@
-/*
- * Copyright (c) 2017 Thomas Pornin <pornin@bolet.org>
- *
- * Permission is hereby granted, free of charge, to any person obtaining 
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- *
- * The above copyright notice and this permission notice shall be 
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
- * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
- * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- * SOFTWARE.
- */
-
-#include "inner.h"
-
-/* see inner.h */
-uint32_t
-br_i15_decode_mod(uint16_t *x, const void *src, size_t len, const uint16_t *m)
-{
-	/*
-	 * Two-pass algorithm: in the first pass, we determine whether the
-	 * value fits; in the second pass, we do the actual write.
-	 *
-	 * During the first pass, 'r' contains the comparison result so
-	 * far:
-	 *  0x00000000   value is equal to the modulus
-	 *  0x00000001   value is greater than the modulus
-	 *  0xFFFFFFFF   value is lower than the modulus
-	 *
-	 * Since we iterate starting with the least significant bytes (at
-	 * the end of src[]), each new comparison overrides the previous
-	 * except when the comparison yields 0 (equal).
-	 *
-	 * During the second pass, 'r' is either 0xFFFFFFFF (value fits)
-	 * or 0x00000000 (value does not fit).
-	 *
-	 * We must iterate over all bytes of the source, _and_ possibly
-	 * some extra virtual bytes (with value 0) so as to cover the
-	 * complete modulus as well. We also add 4 such extra bytes beyond
-	 * the modulus length because it then guarantees that no accumulated
-	 * partial word remains to be processed.
-	 */
-	const unsigned char *buf;
-	size_t mlen, tlen;
-	int pass;
-	uint32_t r;
-
-	buf = src;
-	mlen = (m[0] + 15) >> 4;
-	tlen = (mlen << 1);
-	if (tlen < len) {
-		tlen = len;
-	}
-	tlen += 4;
-	r = 0;
-	for (pass = 0; pass < 2; pass ++) {
-		size_t u, v;
-		uint32_t acc;
-		int acc_len;
-
-		v = 1;
-		acc = 0;
-		acc_len = 0;
-		for (u = 0; u < tlen; u ++) {
-			uint32_t b;
-
-			if (u < len) {
-				b = buf[len - 1 - u];
-			} else {
-				b = 0;
-			}
-			acc |= (b << acc_len);
-			acc_len += 8;
-			if (acc_len >= 15) {
-				uint32_t xw;
-
-				xw = acc & (uint32_t)0x7FFF;
-				acc_len -= 15;
-				acc = b >> (8 - acc_len);
-				if (v <= mlen) {
-					if (pass) {
-						x[v] = r & xw;
-					} else {
-						uint32_t cc;
-
-						cc = (uint32_t)CMP(xw, m[v]);
-						r = MUX(EQ(cc, 0), r, cc);
-					}
-				} else {
-					if (!pass) {
-						r = MUX(EQ(xw, 0), r, 1);
-					}
-				}
-				v ++;
-			}
-		}
-
-		/*
-		 * When we reach this point at the end of the first pass:
-		 * r is either 0, 1 or -1; we want to set r to 0 if it
-		 * is equal to 0 or 1, and leave it to -1 otherwise.
-		 *
-		 * When we reach this point at the end of the second pass:
-		 * r is either 0 or -1; we want to leave that value
-		 * untouched. This is a subcase of the previous.
-		 */
-		r >>= 1;
-		r |= (r << 1);
-	}
-
-	x[0] = m[0];
-	return r & (uint32_t)1;
-}

package/runtime/third_party/bearssl/src/int/i15_decode.c

@@ -1,56 +0,0 @@
-/*
- * Copyright (c) 2017 Thomas Pornin <pornin@bolet.org>
- *
- * Permission is hereby granted, free of charge, to any person obtaining 
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- *
- * The above copyright notice and this permission notice shall be 
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
- * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
- * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- * SOFTWARE.
- */
-
-#include "inner.h"
-
-/* see inner.h */
-void
-br_i15_decode(uint16_t *x, const void *src, size_t len)
-{
-	const unsigned char *buf;
-	size_t v;
-	uint32_t acc;
-	int acc_len;
-
-	buf = src;
-	v = 1;
-	acc = 0;
-	acc_len = 0;
-	while (len -- > 0) {
-		uint32_t b;
-
-		b = buf[len];
-		acc |= (b << acc_len);
-		acc_len += 8;
-		if (acc_len >= 15) {
-			x[v ++] = acc & 0x7FFF;
-			acc_len -= 15;
-			acc >>= 15;
-		}
-	}
-	if (acc_len != 0) {
-		x[v ++] = acc;
-	}
-	x[0] = br_i15_bit_length(x + 1, v - 1);
-}

package/runtime/third_party/bearssl/src/int/i15_decred.c

@@ -1,100 +0,0 @@
-/*
- * Copyright (c) 2017 Thomas Pornin <pornin@bolet.org>
- *
- * Permission is hereby granted, free of charge, to any person obtaining 
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- *
- * The above copyright notice and this permission notice shall be 
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
- * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
- * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- * SOFTWARE.
- */
-
-#include "inner.h"
-
-/* see inner.h */
-void
-br_i15_decode_reduce(uint16_t *x,
-	const void *src, size_t len, const uint16_t *m)
-{
-	uint32_t m_ebitlen, m_rbitlen;
-	size_t mblen, k;
-	const unsigned char *buf;
-	uint32_t acc;
-	int acc_len;
-
-	/*
-	 * Get the encoded bit length.
-	 */
-	m_ebitlen = m[0];
-
-	/*
-	 * Special case for an invalid (null) modulus.
-	 */
-	if (m_ebitlen == 0) {
-		x[0] = 0;
-		return;
-	}
-
-	/*
-	 * Clear the destination.
-	 */
-	br_i15_zero(x, m_ebitlen);
-
-	/*
-	 * First decode directly as many bytes as possible. This requires
-	 * computing the actual bit length.
-	 */
-	m_rbitlen = m_ebitlen >> 4;
-	m_rbitlen = (m_ebitlen & 15) + (m_rbitlen << 4) - m_rbitlen;
-	mblen = (m_rbitlen + 7) >> 3;
-	k = mblen - 1;
-	if (k >= len) {
-		br_i15_decode(x, src, len);
-		x[0] = m_ebitlen;
-		return;
-	}
-	buf = src;
-	br_i15_decode(x, buf, k);
-	x[0] = m_ebitlen;
-
-	/*
-	 * Input remaining bytes, using 15-bit words.
-	 */
-	acc = 0;
-	acc_len = 0;
-	while (k < len) {
-		uint32_t v;
-
-		v = buf[k ++];
-		acc = (acc << 8) | v;
-		acc_len += 8;
-		if (acc_len >= 15) {
-			br_i15_muladd_small(x, acc >> (acc_len - 15), m);
-			acc_len -= 15;
-			acc &= ~((uint32_t)-1 << acc_len);
-		}
-	}
-
-	/*
-	 * We may have some bits accumulated. We then perform a shift to
-	 * be able to inject these bits as a full 15-bit word.
-	 */
-	if (acc_len != 0) {
-		acc = (acc | (x[1] << acc_len)) & 0x7FFF;
-		br_i15_rshift(x, 15 - acc_len);
-		br_i15_muladd_small(x, acc, m);
-	}
-}

package/runtime/third_party/bearssl/src/int/i15_encode.c

@@ -1,56 +0,0 @@
-/*
- * Copyright (c) 2017 Thomas Pornin <pornin@bolet.org>
- *
- * Permission is hereby granted, free of charge, to any person obtaining 
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- *
- * The above copyright notice and this permission notice shall be 
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
- * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
- * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- * SOFTWARE.
- */
-
-#include "inner.h"
-
-/* see inner.h */
-void
-br_i15_encode(void *dst, size_t len, const uint16_t *x)
-{
-	unsigned char *buf;
-	size_t u, xlen;
-	uint32_t acc;
-	int acc_len;
-
-	xlen = (x[0] + 15) >> 4;
-	if (xlen == 0) {
-		memset(dst, 0, len);
-		return;
-	}
-	u = 1;
-	acc = 0;
-	acc_len = 0;
-	buf = dst;
-	while (len -- > 0) {
-		if (acc_len < 8) {
-			if (u <= xlen) {
-				acc += (uint32_t)x[u ++] << acc_len;
-			}
-			acc_len += 15;
-		}
-		buf[len] = (unsigned char)acc;
-		acc >>= 8;
-		acc_len -= 8;
-	}
-}

package/runtime/third_party/bearssl/src/int/i15_fmont.c

@@ -1,59 +0,0 @@
-/*
- * Copyright (c) 2017 Thomas Pornin <pornin@bolet.org>
- *
- * Permission is hereby granted, free of charge, to any person obtaining 
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- *
- * The above copyright notice and this permission notice shall be 
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
- * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
- * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- * SOFTWARE.
- */
-
-#include "inner.h"
-
-/* see inner.h */
-void
-br_i15_from_monty(uint16_t *x, const uint16_t *m, uint16_t m0i)
-{
-	size_t len, u, v;
-
-	len = (m[0] + 15) >> 4;
-	for (u = 0; u < len; u ++) {
-		uint32_t f, cc;
-
-		f = MUL15(x[1], m0i) & 0x7FFF;
-		cc = 0;
-		for (v = 0; v < len; v ++) {
-			uint32_t z;
-
-			z = (uint32_t)x[v + 1] + MUL15(f, m[v + 1]) + cc;
-			cc = z >> 15;
-			if (v != 0) {
-				x[v] = z & 0x7FFF;
-			}
-		}
-		x[len] = cc;
-	}
-
-	/*
-	 * We may have to do an extra subtraction, but only if the
-	 * value in x[] is indeed greater than or equal to that of m[],
-	 * which is why we must do two calls (first call computes the
-	 * carry, second call performs the subtraction only if the carry
-	 * is 0).
-	 */
-	br_i15_sub(x, m, NOT(br_i15_sub(x, m, 0)));
-}

package/runtime/third_party/bearssl/src/int/i15_iszero.c

@@ -1,39 +0,0 @@
-/*
- * Copyright (c) 2017 Thomas Pornin <pornin@bolet.org>
- *
- * Permission is hereby granted, free of charge, to any person obtaining 
- * a copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to
- * permit persons to whom the Software is furnished to do so, subject to
- * the following conditions:
- *
- * The above copyright notice and this permission notice shall be 
- * included in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, 
- * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND 
- * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
- * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
- * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
- * SOFTWARE.
- */
-
-#include "inner.h"
-
-/* see inner.h */
-uint32_t
-br_i15_iszero(const uint16_t *x)
-{
-	uint32_t z;
-	size_t u;
-
-	z = 0;
-	for (u = (x[0] + 15) >> 4; u > 0; u --) {
-		z |= x[u];
-	}
-	return ~(z | -z) >> 31;
-}