shithub: mc

ref: 814c5bcd2efc3bb9139a56a1e0eae177437f4f56
dir: /lib/crypto/test/ctbig.myr/

use std
use crypto
use testr

const Nbit = 128
const Nfunky = 79

const main = {
	testr.run([
		/* normal */
		[.name="add", .fn={ctx
			do(ctx, crypto.ctadd, Nbit,
				"5192296858610368357189246603769160",
				"5192296858534810493479828944327220", 
				"75557863709417659441940")
		}],
		[.name="sub", .fn={ctx
			do(ctx, crypto.ctsub, Nbit,
				"5192296858459252629770411284885280",
				"5192296858534810493479828944327220", 
				"75557863709417659441940")
		}],
		[.name="mul", .fn={ctx
			do(ctx, crypto.ctmul, Nbit,
				"392318858376010676506814412592879878824393346033951606800",
				"5192296858534810493479828944327220", 
				"75557863709417659441940")
		}],
		
		[.name="addfunky", .fn={ctx
			do(ctx, crypto.ctadd, Nfunky,
				"75540728658750274549064",
				"5192296858534810493479828944327220", 
				"75557863709417659441940")
		}],
		[.name="subfunky", .fn={ctx
			do(ctx, crypto.ctsub, Nfunky,
				"528887911047229543018272",
				"5192296858534810493479828944327220", 
				"75557863709417659441940")
		}],
		[.name="mulfunky", .fn={ctx
			do(ctx, crypto.ctmul, Nfunky,
				"434472066238453871708176",
				"5192296858534810493479828944327220", 
				"75557863709417659441940")
		}],
		//[.name="div", .fn={ctx
		//	do(ctx, div,
		//		"75557863709417659441940",
		//		"392318858376010676506814412592879878824393346033951606800",
		//		"5192296858534810493479828944327220")
		//}],
		//[.name="mod", .fn={ctx
		//	do(ctx, mod,
		//		"75557863709417659441940",
		//		"392318858376010676506814412592879878824393346033951606800",
		//		"5192296858534810493479828944327220")
		//}],
		//[.name="modpow", .fn={ctx
		//	r = do(ctx, crypto.ctsub,
		//		"5192296858459252629770411284885280"
		//		"5192296858534810493479828944327220", 
		//		"75557863709417659441940")
		//}],

	][:])
}

//const div = {r, a, b
//	var z
//
//	z = crypto.ctzero(a.nbit)
//	crypto.ctdivmod(r, z, a, b)
//}
//
//const mod = {r, a, b
//	var z
//
//	z = crypto.ctzero(a.nbit)
//	crypto.ctdivmod(z, r, a, b)
//}
//
const do = {ctx, op, nbit, estr, astr, bstr
	var r, a, ai, b, bi, e, ei

	r = crypto.ctzero(nbit)
	ei = std.get(std.bigparse(estr))
	ai = std.get(std.bigparse(astr))
	bi = std.get(std.bigparse(bstr))
	e = crypto.big2ct(ei, nbit)
	a = crypto.big2ct(ai, nbit)
	b = crypto.big2ct(bi, nbit)

	std.bigfree(ei)
	std.bigfree(ai)
	std.bigfree(bi)

	op(r, a, b)

	testr.eq(ctx, r, e)

	crypto.ctfree(r)
	crypto.ctfree(e)
	crypto.ctfree(a)
	crypto.ctfree(b)
}