gnark-plonky2-verifier/fri/fri.go
fri/fri.goRaw
1package fri
2
3import (
4 "fmt"
5 "math"
6 "math/big"
7 "math/bits"
8
9 "github.com/consensys/gnark-crypto/field/goldilocks"
10 "github.com/consensys/gnark/frontend"
11 gl "github.com/succinctlabs/gnark-plonky2-verifier/goldilocks"
12 "github.com/succinctlabs/gnark-plonky2-verifier/poseidon"
13 "github.com/succinctlabs/gnark-plonky2-verifier/types"
14 "github.com/succinctlabs/gnark-plonky2-verifier/variables"
15)
16
17type Chip struct {
18 api frontend.API `gnark:"-"`
19 gl gl.Chip `gnark:"-"`
20 poseidonBN254Chip *poseidon.BN254Chip `gnark:"-"`
21 commonData *types.CommonCircuitData `gnark:"-"`
22 friParams *types.FriParams `gnark:"-"`
23}
24
25func NewChip(
26 api frontend.API,
27 commonData *types.CommonCircuitData,
28 friParams *types.FriParams,
29) *Chip {
30 poseidonBN254Chip := poseidon.NewBN254Chip(api)
31 return &Chip{
32 api: api,
33 poseidonBN254Chip: poseidonBN254Chip,
34 commonData: commonData,
35 friParams: friParams,
36 gl: *gl.New(api),
37 }
38}
39
40func (f *Chip) GetInstance(zeta gl.QuadraticExtensionVariable) InstanceInfo {
41 zetaBatch := BatchInfo{
42 Point: zeta,
43 Polynomials: friAllPolys(f.commonData),
44 }
45
46 g := gl.PrimitiveRootOfUnity(f.commonData.DegreeBits)
47 zetaNext := f.gl.MulExtension(
48 gl.NewVariable(g.Uint64()).ToQuadraticExtension(),
49 zeta,
50 )
51
52 zetaNextBath := BatchInfo{
53 Point: zetaNext,
54 Polynomials: friZSPolys(f.commonData),
55 }
56
57 return InstanceInfo{
58 Oracles: friOracles(f.commonData),
59 Batches: []BatchInfo{zetaBatch, zetaNextBath},
60 }
61}
62
63func (f *Chip) ToOpenings(c variables.OpeningSet) Openings {
64 values := c.Constants // num_constants + 1
65 values = append(values, c.PlonkSigmas...) // num_routed_wires
66 values = append(values, c.Wires...) // num_wires
67 values = append(values, c.PlonkZs...) // num_challenges
68 values = append(values, c.PartialProducts...) // num_challenges * num_partial_products
69 values = append(values, c.QuotientPolys...) // num_challenges * quotient_degree_factor
70 zetaBatch := OpeningBatch{Values: values}
71 zetaNextBatch := OpeningBatch{Values: c.PlonkZsNext}
72 return Openings{Batches: []OpeningBatch{zetaBatch, zetaNextBatch}}
73}
74
75func (f *Chip) assertLeadingZeros(powWitness gl.Variable, friConfig types.FriConfig) {
76 // Asserts that powWitness'es big-endian bit representation has at least `leading_zeros` leading zeros.
77 // Note that this is assuming that the Goldilocks field is being used. Specfically that the
78 // field is 64 bits long
79 maxPowWitness := uint64(math.Pow(2, float64(64-friConfig.ProofOfWorkBits))) - 1
80 reducedPowWitness := f.gl.Reduce(powWitness)
81 f.api.AssertIsLessOrEqual(reducedPowWitness.Limb, frontend.Variable(maxPowWitness))
82}
83
84func (f *Chip) fromOpeningsAndAlpha(
85 openings *Openings,
86 alpha gl.QuadraticExtensionVariable,
87) []gl.QuadraticExtensionVariable {
88 // One reduced opening for all openings evaluated at point Zeta.
89 // Another one for all openings evaluated at point Zeta * Omega (which is only PlonkZsNext polynomial)
90
91 reducedOpenings := make([]gl.QuadraticExtensionVariable, 0, 2)
92 for _, batch := range openings.Batches {
93 reducedOpenings = append(reducedOpenings, f.gl.ReduceWithPowers(batch.Values, alpha))
94 }
95
96 return reducedOpenings
97}
98
99func (f *Chip) verifyMerkleProofToCapWithCapIndex(
100 leafData []gl.Variable,
101 leafIndexBits []frontend.Variable,
102 capIndexBits []frontend.Variable,
103 merkleCap variables.FriMerkleCap,
104 proof *variables.FriMerkleProof,
105) {
106 currentDigest := f.poseidonBN254Chip.HashOrNoop(leafData)
107 for i, sibling := range proof.Siblings {
108 bit := leafIndexBits[i]
109
110 var inputs poseidon.BN254State
111 inputs[0] = frontend.Variable(0)
112 inputs[1] = frontend.Variable(0)
113 inputs[2] = f.api.Select(bit, sibling, currentDigest)
114 inputs[3] = f.api.Select(bit, currentDigest, sibling)
115 state := f.poseidonBN254Chip.Poseidon(inputs)
116
117 currentDigest = state[0]
118 }
119
120 // We assume that the cap_height is 4. Create two levels of the Lookup2 circuit
121 if len(capIndexBits) != 4 || len(merkleCap) != 16 {
122 errorMsg, _ := fmt.Printf(
123 "capIndexBits length should be 4 and the merkleCap length should be 16. Actual values (capIndexBits: %d, merkleCap: %d)\n",
124 len(capIndexBits),
125 len(merkleCap),
126 )
127 panic(errorMsg)
128 }
129
130 const NUM_LEAF_LOOKUPS = 4
131 var leafLookups [NUM_LEAF_LOOKUPS]poseidon.BN254HashOut
132 // First create the "leaf" lookup2 circuits
133 // The will use the least significant bits of the capIndexBits array
134 for i := 0; i < NUM_LEAF_LOOKUPS; i++ {
135 leafLookups[i] = f.api.Lookup2(
136 capIndexBits[0], capIndexBits[1],
137 merkleCap[i*NUM_LEAF_LOOKUPS], merkleCap[i*NUM_LEAF_LOOKUPS+1], merkleCap[i*NUM_LEAF_LOOKUPS+2], merkleCap[i*NUM_LEAF_LOOKUPS+3],
138 )
139 }
140
141 // Use the most 2 significant bits of the capIndexBits array for the "root" lookup
142 merkleCapEntry := f.api.Lookup2(capIndexBits[2], capIndexBits[3], leafLookups[0], leafLookups[1], leafLookups[2], leafLookups[3])
143 f.api.AssertIsEqual(currentDigest, merkleCapEntry)
144}
145
146func (f *Chip) verifyInitialProof(xIndexBits []frontend.Variable, proof *variables.FriInitialTreeProof, initialMerkleCaps []variables.FriMerkleCap, capIndexBits []frontend.Variable) {
147 if len(proof.EvalsProofs) != len(initialMerkleCaps) {
148 panic("length of eval proofs in fri proof should equal length of initial merkle caps")
149 }
150
151 for i := 0; i < len(initialMerkleCaps); i++ {
152 evals := proof.EvalsProofs[i].Elements
153 merkleProof := proof.EvalsProofs[i].MerkleProof
154 cap := initialMerkleCaps[i]
155 f.verifyMerkleProofToCapWithCapIndex(evals, xIndexBits, capIndexBits, cap, &merkleProof)
156 }
157}
158
159func (f *Chip) expFromBitsConstBase(
160 base goldilocks.Element,
161 exponentBits []frontend.Variable,
162) gl.Variable {
163 product := gl.One()
164 for i, bit := range exponentBits {
165 // If the bit is on, we multiply product by base^pow.
166 // We can arithmetize this as:
167 // product *= 1 + bit (base^pow - 1)
168 // product = (base^pow - 1) product bit + product
169 pow := int64(1 << i)
170 basePow := goldilocks.NewElement(0)
171 basePow.Exp(base, big.NewInt(pow))
172 basePowVariable := gl.NewVariable(basePow.Uint64() - 1)
173 product = f.gl.Add(
174 f.gl.Mul(
175 f.gl.Mul(
176 basePowVariable,
177 product,
178 ),
179 gl.NewVariable(bit),
180 ),
181 product,
182 )
183 }
184 return product
185}
186
187func (f *Chip) calculateSubgroupX(
188 xIndexBits []frontend.Variable,
189 nLog uint64,
190) gl.Variable {
191 // Compute x from its index
192 // `subgroup_x` is `subgroup[x_index]`, i.e., the actual field element in the domain.
193 // OPTIMIZE - Make these as global values
194 g := gl.NewVariable(gl.MULTIPLICATIVE_GROUP_GENERATOR.Uint64())
195 base := gl.PrimitiveRootOfUnity(nLog)
196
197 // Create a reverse list of xIndexBits
198 xIndexBitsRev := make([]frontend.Variable, 0)
199 for i := len(xIndexBits) - 1; i >= 0; i-- {
200 xIndexBitsRev = append(xIndexBitsRev, xIndexBits[i])
201 }
202
203 product := f.expFromBitsConstBase(base, xIndexBitsRev)
204
205 return f.gl.Mul(g, product)
206}
207
208func (f *Chip) friCombineInitial(
209 instance InstanceInfo,
210 proof variables.FriInitialTreeProof,
211 friAlpha gl.QuadraticExtensionVariable,
212 subgroupX_QE gl.QuadraticExtensionVariable,
213 precomputedReducedEval []gl.QuadraticExtensionVariable,
214) gl.QuadraticExtensionVariable {
215 sum := gl.ZeroExtension()
216
217 if len(instance.Batches) != len(precomputedReducedEval) {
218 panic("len(openings) != len(precomputedReducedEval)")
219 }
220
221 for i := 0; i < len(instance.Batches); i++ {
222 batch := instance.Batches[i]
223 reducedOpenings := precomputedReducedEval[i]
224
225 point := batch.Point
226 evals := make([]gl.QuadraticExtensionVariable, 0)
227 for _, polynomial := range batch.Polynomials {
228 evals = append(
229 evals,
230 gl.QuadraticExtensionVariable{
231 proof.EvalsProofs[polynomial.OracleIndex].Elements[polynomial.PolynomialInfo],
232 gl.Zero(),
233 },
234 )
235 }
236
237 reducedEvals := f.gl.ReduceWithPowers(evals, friAlpha)
238 numerator := f.gl.SubExtensionNoReduce(reducedEvals, reducedOpenings)
239 denominator := f.gl.SubExtension(subgroupX_QE, point)
240 sum = f.gl.MulExtension(f.gl.ExpExtension(friAlpha, uint64(len(evals))), sum)
241 sum = f.gl.MulAddExtension(
242 numerator,
243 f.gl.InverseExtension(denominator),
244 sum,
245 )
246 }
247
248 return sum
249}
250
251func (f *Chip) finalPolyEval(finalPoly variables.PolynomialCoeffs, point gl.QuadraticExtensionVariable) gl.QuadraticExtensionVariable {
252 ret := gl.ZeroExtension()
253 for i := len(finalPoly.Coeffs) - 1; i >= 0; i-- {
254 ret = f.gl.MulAddExtension(ret, point, finalPoly.Coeffs[i])
255 }
256 return ret
257}
258
259func (f *Chip) interpolate(
260 x gl.QuadraticExtensionVariable,
261 xPoints []gl.QuadraticExtensionVariable,
262 yPoints []gl.QuadraticExtensionVariable,
263 barycentricWeights []gl.QuadraticExtensionVariable,
264) gl.QuadraticExtensionVariable {
265 if len(xPoints) != len(yPoints) || len(xPoints) != len(barycentricWeights) {
266 panic("length of xPoints, yPoints, and barycentricWeights are inconsistent")
267 }
268
269 lX := gl.OneExtension()
270 for i := 0; i < len(xPoints); i++ {
271 lX = f.gl.SubMulExtension(x, xPoints[i], lX)
272 }
273
274 sum := gl.ZeroExtension()
275 for i := 0; i < len(xPoints); i++ {
276 sum = f.gl.AddExtension(
277 f.gl.MulExtension(
278 f.gl.DivExtension(
279 barycentricWeights[i],
280 f.gl.SubExtension(
281 x,
282 xPoints[i],
283 ),
284 ),
285 yPoints[i],
286 ),
287 sum,
288 )
289 }
290
291 interpolation := f.gl.MulExtension(lX, sum)
292
293 returnField := interpolation
294 // Now check if x is already within the xPoints
295 for i := 0; i < len(xPoints); i++ {
296 returnField = f.gl.Lookup(
297 f.gl.IsZero(f.gl.SubExtension(x, xPoints[i])),
298 returnField,
299 yPoints[i],
300 )
301 }
302
303 return returnField
304}
305
306func (f *Chip) computeEvaluation(
307 x gl.Variable,
308 xIndexWithinCosetBits []frontend.Variable,
309 arityBits uint64,
310 evals []gl.QuadraticExtensionVariable,
311 beta gl.QuadraticExtensionVariable,
312) gl.QuadraticExtensionVariable {
313 arity := 1 << arityBits
314 if (len(evals)) != arity {
315 panic("len(evals) ! arity")
316 }
317 if arityBits > 8 {
318 panic("currently assuming that arityBits is <= 8")
319 }
320
321 g := gl.PrimitiveRootOfUnity(arityBits)
322 gInv := goldilocks.NewElement(0)
323 gInv.Exp(g, big.NewInt(int64(arity-1)))
324
325 // The evaluation vector needs to be reordered first. Permute the evals array such that each
326 // element's new index is the bit reverse of it's original index.
327 // OPTIMIZE - Since the size of the evals array should be constant (e.g. 2^arityBits),
328 // we can just hard code the permutation.
329 permutedEvals := make([]gl.QuadraticExtensionVariable, len(evals))
330 for i := uint8(0); i < uint8(len(evals)); i++ {
331 newIndex := bits.Reverse8(i) >> arityBits
332 permutedEvals[newIndex] = evals[i]
333 }
334
335 // Want `g^(arity - rev_x_index_within_coset)` as in the out-of-circuit version. Compute it
336 // as `(g^-1)^rev_x_index_within_coset`.
337 revXIndexWithinCosetBits := make([]frontend.Variable, len(xIndexWithinCosetBits))
338 for i := 0; i < len(xIndexWithinCosetBits); i++ {
339 revXIndexWithinCosetBits[len(xIndexWithinCosetBits)-1-i] = xIndexWithinCosetBits[i]
340 }
341 start := f.expFromBitsConstBase(gInv, revXIndexWithinCosetBits)
342 cosetStart := f.gl.Mul(start, x)
343
344 xPoints := make([]gl.QuadraticExtensionVariable, len(evals))
345 yPoints := permutedEvals
346
347 // OPTIMIZE: Make g_F a constant
348 g_F := gl.NewVariable(g.Uint64()).ToQuadraticExtension()
349 xPoints[0] = gl.QuadraticExtensionVariable{cosetStart, gl.Zero()}
350 for i := 1; i < len(evals); i++ {
351 xPoints[i] = f.gl.MulExtension(xPoints[i-1], g_F)
352 }
353
354 // OPTIMIZE: This is n^2. Is there a way to do this better?
355 // Compute the barycentric weights
356 barycentricWeights := make([]gl.QuadraticExtensionVariable, len(xPoints))
357 for i := 0; i < len(xPoints); i++ {
358 barycentricWeights[i] = gl.OneExtension()
359 for j := 0; j < len(xPoints); j++ {
360 if i != j {
361 barycentricWeights[i] = f.gl.SubMulExtension(
362 xPoints[i],
363 xPoints[j],
364 barycentricWeights[i],
365 )
366 }
367 }
368 // Take the inverse of the barycentric weights
369 // OPTIMIZE: Can provide a witness to this value
370 barycentricWeights[i] = f.gl.InverseExtension(barycentricWeights[i])
371 }
372
373 return f.interpolate(beta, xPoints, yPoints, barycentricWeights)
374}
375
376func (f *Chip) verifyQueryRound(
377 instance InstanceInfo,
378 challenges *variables.FriChallenges,
379 precomputedReducedEval []gl.QuadraticExtensionVariable,
380 initialMerkleCaps []variables.FriMerkleCap,
381 proof *variables.FriProof,
382 xIndex gl.Variable,
383 n uint64,
384 nLog uint64,
385 roundProof *variables.FriQueryRound,
386) {
387 // Note assertNoncanonicalIndicesOK does not add any constraints, it's a sanity check on the config
388 assertNoncanonicalIndicesOK(*f.friParams)
389
390 xIndex = f.gl.Reduce(xIndex)
391 xIndexBits := f.api.ToBinary(xIndex.Limb, 64)[0 : f.friParams.DegreeBits+f.friParams.Config.RateBits]
392 capIndexBits := xIndexBits[len(xIndexBits)-int(f.friParams.Config.CapHeight):]
393
394 f.verifyInitialProof(xIndexBits, &roundProof.InitialTreesProof, initialMerkleCaps, capIndexBits)
395
396 subgroupX := f.calculateSubgroupX(
397 xIndexBits,
398 nLog,
399 )
400
401 subgroupX_QE := subgroupX.ToQuadraticExtension()
402
403 oldEval := f.friCombineInitial(
404 instance,
405 roundProof.InitialTreesProof,
406 challenges.FriAlpha,
407 subgroupX_QE,
408 precomputedReducedEval,
409 )
410
411 for i, arityBits := range f.friParams.ReductionArityBits {
412 evals := roundProof.Steps[i].Evals
413
414 cosetIndexBits := xIndexBits[arityBits:]
415 xIndexWithinCosetBits := xIndexBits[:arityBits]
416
417 // Assumes that the arity bits will be 4. That means that the range of
418 // xIndexWithCoset is [0,2^4-1]. This is based on plonky2's circuit recursive
419 // config: https://github.com/mir-protocol/plonky2/blob/main/plonky2/src/plonk/circuit_data.rs#L63
420 // Will use a two levels tree of 4-selector gadgets.
421 if arityBits != 4 {
422 panic("assuming arity bits is 4")
423 }
424
425 const NUM_LEAF_LOOKUPS = 4
426 var leafLookups [NUM_LEAF_LOOKUPS]gl.QuadraticExtensionVariable
427 // First create the "leaf" lookup2 circuits
428 // The will use the least significant bits of the xIndexWithCosetBits array
429 for i := 0; i < NUM_LEAF_LOOKUPS; i++ {
430 leafLookups[i] = f.gl.Lookup2(
431 xIndexWithinCosetBits[0],
432 xIndexWithinCosetBits[1],
433 evals[i*NUM_LEAF_LOOKUPS],
434 evals[i*NUM_LEAF_LOOKUPS+1],
435 evals[i*NUM_LEAF_LOOKUPS+2],
436 evals[i*NUM_LEAF_LOOKUPS+3],
437 )
438 }
439
440 // Use the most 2 significant bits of the xIndexWithCosetBits array for the "root" lookup
441 newEval := f.gl.Lookup2(
442 xIndexWithinCosetBits[2],
443 xIndexWithinCosetBits[3],
444 leafLookups[0],
445 leafLookups[1],
446 leafLookups[2],
447 leafLookups[3],
448 )
449
450 f.gl.AssertIsEqual(newEval[0], oldEval[0])
451 f.gl.AssertIsEqual(newEval[1], oldEval[1])
452
453 oldEval = f.computeEvaluation(
454 subgroupX,
455 xIndexWithinCosetBits,
456 arityBits,
457 evals,
458 challenges.FriBetas[i],
459 )
460
461 // Convert evals (array of QE) to fields by taking their 0th degree coefficients
462 fieldEvals := make([]gl.Variable, 0, 2*len(evals))
463 for j := 0; j < len(evals); j++ {
464 fieldEvals = append(fieldEvals, evals[j][0])
465 fieldEvals = append(fieldEvals, evals[j][1])
466 }
467 f.verifyMerkleProofToCapWithCapIndex(
468 fieldEvals,
469 cosetIndexBits,
470 capIndexBits,
471 proof.CommitPhaseMerkleCaps[i],
472 &roundProof.Steps[i].MerkleProof,
473 )
474
475 // Update the point x to x^arity.
476 for j := uint64(0); j < arityBits; j++ {
477 subgroupX = f.gl.Mul(subgroupX, subgroupX)
478 }
479
480 xIndexBits = cosetIndexBits
481 }
482
483 subgroupX_QE = subgroupX.ToQuadraticExtension()
484 finalPolyEval := f.finalPolyEval(proof.FinalPoly, subgroupX_QE)
485
486 f.gl.AssertIsEqual(oldEval[0], finalPolyEval[0])
487 f.gl.AssertIsEqual(oldEval[1], finalPolyEval[1])
488}
489
490func (f *Chip) VerifyFriProof(
491 instance InstanceInfo,
492 openings Openings,
493 friChallenges *variables.FriChallenges,
494 initialMerkleCaps []variables.FriMerkleCap,
495 friProof *variables.FriProof,
496) {
497 // Not adding any constraints but a sanity check on the proof shape matching the friParams (constant).
498 validateFriProofShape(friProof, instance, f.friParams)
499
500 // Check POW
501 f.assertLeadingZeros(friChallenges.FriPowResponse, f.friParams.Config)
502
503 // Check that parameters are coherent. Not adding any constraints but a sanity check
504 // on the proof shape matching the friParams.
505 if int(f.friParams.Config.NumQueryRounds) != len(friProof.QueryRoundProofs) {
506 panic("Number of query rounds does not match config.")
507 }
508
509 precomputedReducedEvals := f.fromOpeningsAndAlpha(&openings, friChallenges.FriAlpha)
510
511 // Size of the LDE domain.
512 nLog := f.friParams.DegreeBits + f.friParams.Config.RateBits
513 n := uint64(math.Pow(2, float64(nLog)))
514
515 if len(friChallenges.FriQueryIndices) != len(friProof.QueryRoundProofs) {
516 panic(fmt.Sprintf(
517 "Number of query indices (%d) should equal number of query round proofs (%d)",
518 len(friChallenges.FriQueryIndices),
519 len(friProof.QueryRoundProofs),
520 ))
521 }
522
523 for idx, xIndex := range friChallenges.FriQueryIndices {
524 roundProof := friProof.QueryRoundProofs[idx]
525
526 f.verifyQueryRound(
527 instance,
528 friChallenges,
529 precomputedReducedEvals,
530 initialMerkleCaps,
531 friProof,
532 xIndex,
533 n,
534 nLog,
535 &roundProof,
536 )
537 }
538}