arnaucube
arnaucube/phantom-zonePublic Self-hosted repository
phantom-zone/src/bool/print_noise.rs
src/bool/print_noise.rsRaw
  1use std::{fmt::Debug, iter::Sum};
  2
  3use itertools::izip;
  4use num_traits::{FromPrimitive, PrimInt, Zero};
  5use rand_distr::uniform::SampleUniform;
  6
  7use crate::{
  8    backend::{GetModulus, Modulus},
  9    decomposer::{Decomposer, NumInfo, RlweDecomposer},
 10    lwe::{decrypt_lwe, lwe_key_switch},
 11    parameters::{BoolParameters, CiphertextModulus},
 12    random::{DefaultSecureRng, RandomFillUniformInModulus},
 13    rgsw::{
 14        decrypt_rlwe, rlwe_auto, rlwe_auto_scratch_rows, RlweCiphertextMutRef, RlweKskRef,
 15        RuntimeScratchMutRef,
 16    },
 17    utils::{encode_x_pow_si_with_emebedding_factor, tests::Stats, TryConvertFrom1},
 18    ArithmeticOps, ClientKey, MatrixEntity, MatrixMut, ModInit, Ntt, NttInit, RowEntity, RowMut,
 19    VectorOps,
 20};
 21
 22use super::keys::tests::{ideal_sk_lwe, ideal_sk_rlwe};
 23
 24pub(crate) trait CollectRuntimeServerKeyStats {
 25    type M;
 26    /// RGSW ciphertext X^{s[s_index]} in evaluation domain where `s` the LWE
 27    /// secret
 28    fn rgsw_cts_lwe_si(&self, s_index: usize) -> &Self::M;
 29    /// Auto key in evaluation domain for automorphism g^k. For auto key for
 30    /// automorphism corresponding to -g, set k = 0
 31    fn galois_key_for_auto(&self, k: usize) -> &Self::M;
 32    /// LWE key switching key
 33    fn lwe_ksk(&self) -> &Self::M;
 34}
 35
 36#[derive(Default)]
 37struct ServerKeyStats<T> {
 38    /// Distribution of noise in RGSW ciphertexts
 39    ///
 40    /// We collect statistics for RLWE'(-sm) separately from RLWE'(m) because
 41    /// non-interactive protocol differents between the two. Although we expect
 42    /// the distribution of noise in both to be the same.
 43    brk_rgsw_cts: (Stats<T>, Stats<T>),
 44    /// Distribtion of noise added to RLWE ciphertext after automorphism using
 45    /// Server auto keys.
 46    post_1_auto: Stats<T>,
 47    /// Distribution of noise added in LWE key switching from LWE_{q, s} to
 48    /// LWE_{q, z} where `z` is ideal LWE secret and `s` is ideal RLWE secret
 49    /// using Server's LWE key switching key.
 50    post_lwe_key_switch: Stats<T>,
 51}
 52
 53impl<T: PrimInt + FromPrimitive + Debug + Sum> ServerKeyStats<T>
 54where
 55    T: for<'a> Sum<&'a T>,
 56{
 57    fn new() -> Self {
 58        ServerKeyStats {
 59            brk_rgsw_cts: (Stats::default(), Stats::default()),
 60            post_1_auto: Stats::default(),
 61            post_lwe_key_switch: Stats::default(),
 62        }
 63    }
 64
 65    fn add_noise_brk_rgsw_cts_nsm(&mut self, noise: &[T]) {
 66        self.brk_rgsw_cts.0.add_many_samples(noise);
 67    }
 68
 69    fn add_noise_brk_rgsw_cts_m(&mut self, noise: &[T]) {
 70        self.brk_rgsw_cts.1.add_many_samples(noise);
 71    }
 72
 73    fn add_noise_post_1_auto(&mut self, noise: &[T]) {
 74        self.post_1_auto.add_many_samples(&noise);
 75    }
 76
 77    fn add_noise_post_kwe_key_switch(&mut self, noise: &[T]) {
 78        self.post_lwe_key_switch.add_many_samples(&noise);
 79    }
 80
 81    fn merge_in(&mut self, other: &Self) {
 82        self.brk_rgsw_cts.0.merge_in(&other.brk_rgsw_cts.0);
 83        self.brk_rgsw_cts.1.merge_in(&other.brk_rgsw_cts.1);
 84
 85        self.post_1_auto.merge_in(&other.post_1_auto);
 86        self.post_lwe_key_switch
 87            .merge_in(&other.post_lwe_key_switch);
 88    }
 89}
 90
 91fn collect_server_key_stats<
 92    M: MatrixEntity + MatrixMut,
 93    D: Decomposer<Element = M::MatElement>,
 94    NttOp: NttInit<CiphertextModulus<M::MatElement>> + Ntt<Element = M::MatElement>,
 95    ModOp: VectorOps<Element = M::MatElement>
 96        + ArithmeticOps<Element = M::MatElement>
 97        + ModInit<M = CiphertextModulus<M::MatElement>>
 98        + GetModulus<M = CiphertextModulus<M::MatElement>, Element = M::MatElement>,
 99    S: CollectRuntimeServerKeyStats<M = M>,
100>(
101    parameters: BoolParameters<M::MatElement>,
102    client_keys: &[ClientKey],
103    server_key: &S,
104) -> ServerKeyStats<i64>
105where
106    M::R: RowMut + RowEntity + TryConvertFrom1<[i32], CiphertextModulus<M::MatElement>> + Clone,
107    M::MatElement: Copy + PrimInt + FromPrimitive + SampleUniform + Zero + Debug + NumInfo,
108{
109    let ideal_sk_rlwe = ideal_sk_rlwe(client_keys);
110    let ideal_sk_lwe = ideal_sk_lwe(client_keys);
111
112    let embedding_factor = (2 * parameters.rlwe_n().0) / parameters.br_q();
113    let rlwe_n = parameters.rlwe_n().0;
114    let rlwe_q = parameters.rlwe_q();
115    let lwe_q = parameters.lwe_q();
116    let rlwe_modop = ModOp::new(rlwe_q.clone());
117    let rlwe_nttop = NttOp::new(rlwe_q, rlwe_n);
118    let lwe_modop = ModOp::new(*parameters.lwe_q());
119
120    let rlwe_x_rgsw_decomposer = parameters.rlwe_rgsw_decomposer::<D>();
121    let (rlwe_x_rgsw_gadget_a, rlwe_x_rgsw_gadget_b) = (
122        rlwe_x_rgsw_decomposer.a().gadget_vector(),
123        rlwe_x_rgsw_decomposer.b().gadget_vector(),
124    );
125
126    let lwe_ks_decomposer = parameters.lwe_decomposer::<D>();
127
128    let mut server_key_stats = ServerKeyStats::new();
129
130    let mut rng = DefaultSecureRng::new();
131
132    // RGSW ciphertext noise
133    // Check noise in RGSW ciphertexts of ideal LWE secret elements
134    {
135        ideal_sk_lwe.iter().enumerate().for_each(|(s_index, s_i)| {
136            let rgsw_ct_i = server_key.rgsw_cts_lwe_si(s_index);
137
138            // X^{s[i]}
139            let m_si = encode_x_pow_si_with_emebedding_factor::<M::R, _>(
140                *s_i,
141                embedding_factor,
142                rlwe_n,
143                rlwe_q,
144            );
145
146            // RLWE'(-sm)
147            let mut neg_s_eval = M::R::try_convert_from(ideal_sk_rlwe.as_slice(), rlwe_q);
148            rlwe_modop.elwise_neg_mut(neg_s_eval.as_mut());
149            rlwe_nttop.forward(neg_s_eval.as_mut());
150
151            for j in 0..rlwe_x_rgsw_decomposer.a().decomposition_count().0 {
152                // RLWE(B^{j} * -s[X]*X^{s_lwe[i]})
153
154                // -s[X]*X^{s_lwe[i]}*B_j
155                let mut m_ideal = m_si.clone();
156                rlwe_nttop.forward(m_ideal.as_mut());
157                rlwe_modop.elwise_mul_mut(m_ideal.as_mut(), neg_s_eval.as_ref());
158                rlwe_nttop.backward(m_ideal.as_mut());
159                rlwe_modop.elwise_scalar_mul_mut(m_ideal.as_mut(), &rlwe_x_rgsw_gadget_a[j]);
160
161                // RLWE(-s*X^{s_lwe[i]}*B_j)
162                let mut rlwe_ct = M::zeros(2, rlwe_n);
163                rlwe_ct
164                    .get_row_mut(0)
165                    .copy_from_slice(rgsw_ct_i.get_row_slice(j));
166                rlwe_ct.get_row_mut(1).copy_from_slice(
167                    rgsw_ct_i.get_row_slice(j + rlwe_x_rgsw_decomposer.a().decomposition_count().0),
168                );
169                // RGSW ciphertexts are in eval domain. We put RLWE ciphertexts back in
170                // coefficient domain
171                rlwe_ct
172                    .iter_rows_mut()
173                    .for_each(|r| rlwe_nttop.backward(r.as_mut()));
174
175                let mut m_back = M::R::zeros(rlwe_n);
176                decrypt_rlwe(
177                    &rlwe_ct,
178                    &ideal_sk_rlwe,
179                    &mut m_back,
180                    &rlwe_nttop,
181                    &rlwe_modop,
182                );
183
184                // diff
185                rlwe_modop.elwise_sub_mut(m_back.as_mut(), m_ideal.as_ref());
186                server_key_stats.add_noise_brk_rgsw_cts_nsm(&Vec::<i64>::try_convert_from(
187                    m_back.as_ref(),
188                    rlwe_q,
189                ));
190            }
191
192            // RLWE'(m)
193            for j in 0..rlwe_x_rgsw_decomposer.b().decomposition_count().0 {
194                // RLWE(B^{j} * X^{s_lwe[i]})
195
196                // X^{s_lwe[i]}*B_j
197                let mut m_ideal = m_si.clone();
198                rlwe_modop.elwise_scalar_mul_mut(m_ideal.as_mut(), &rlwe_x_rgsw_gadget_b[j]);
199
200                // RLWE(X^{s_lwe[i]}*B_j)
201                let mut rlwe_ct = M::zeros(2, rlwe_n);
202                rlwe_ct.get_row_mut(0).copy_from_slice(
203                    rgsw_ct_i.get_row_slice(
204                        j + (2 * rlwe_x_rgsw_decomposer.a().decomposition_count().0),
205                    ),
206                );
207                rlwe_ct
208                    .get_row_mut(1)
209                    .copy_from_slice(rgsw_ct_i.get_row_slice(
210                        j + (2 * rlwe_x_rgsw_decomposer.a().decomposition_count().0)
211                            + rlwe_x_rgsw_decomposer.b().decomposition_count().0,
212                    ));
213                rlwe_ct
214                    .iter_rows_mut()
215                    .for_each(|r| rlwe_nttop.backward(r.as_mut()));
216
217                let mut m_back = M::R::zeros(rlwe_n);
218                decrypt_rlwe(
219                    &rlwe_ct,
220                    &ideal_sk_rlwe,
221                    &mut m_back,
222                    &rlwe_nttop,
223                    &rlwe_modop,
224                );
225
226                // diff
227                rlwe_modop.elwise_sub_mut(m_back.as_mut(), m_ideal.as_ref());
228                server_key_stats.add_noise_brk_rgsw_cts_m(&Vec::<i64>::try_convert_from(
229                    m_back.as_ref(),
230                    rlwe_q,
231                ));
232            }
233        });
234    }
235
236    // Noise in ciphertext after 1 auto
237    // For each auto key g^k. Sample random polynomial m(X) and multiply with
238    // -s(X^{g^k}) using key corresponding to auto g^k. Then check the noise in
239    // resutling RLWE(m(X) * -s(X^{g^k}))
240    {
241        let neg_s = {
242            let mut s = M::R::try_convert_from(ideal_sk_rlwe.as_slice(), rlwe_q);
243            rlwe_modop.elwise_neg_mut(s.as_mut());
244            s
245        };
246        let g = parameters.g();
247        let br_q = parameters.br_q();
248        let g_dlogs = parameters.auto_element_dlogs();
249        let auto_decomposer = parameters.auto_decomposer::<D>();
250        let mut scratch_matrix = M::zeros(rlwe_auto_scratch_rows(&auto_decomposer), rlwe_n);
251        let mut scratch_matrix_ref = RuntimeScratchMutRef::new(scratch_matrix.as_mut());
252
253        g_dlogs.iter().for_each(|k| {
254            let g_pow_k = if *k == 0 {
255                -(g as isize)
256            } else {
257                (g.pow(*k as u32) % br_q) as isize
258            };
259
260            // Send s(X) -> s(X^{g^k})
261            let (auto_index_map, auto_sign_map) = crate::rgsw::generate_auto_map(rlwe_n, g_pow_k);
262            let mut neg_s_g_k = M::R::zeros(rlwe_n);
263            izip!(
264                neg_s.as_ref().iter(),
265                auto_index_map.iter(),
266                auto_sign_map.iter()
267            )
268            .for_each(|(el, to_index, to_sign)| {
269                if !to_sign {
270                    neg_s_g_k.as_mut()[*to_index] = rlwe_modop.neg(el);
271                } else {
272                    neg_s_g_k.as_mut()[*to_index] = *el;
273                }
274            });
275
276            let mut m = M::R::zeros(rlwe_n);
277            RandomFillUniformInModulus::random_fill(&mut rng, rlwe_q, m.as_mut());
278
279            // We want -m(X^{g^k})s(X^{g^k}) after key switch
280            let want_m = {
281                let mut m_g_k_eval = M::R::zeros(rlwe_n);
282                // send m(X) -> m(X^{g^k})
283                izip!(
284                    m.as_ref().iter(),
285                    auto_index_map.iter(),
286                    auto_sign_map.iter()
287                )
288                .for_each(|(el, to_index, to_sign)| {
289                    if !to_sign {
290                        m_g_k_eval.as_mut()[*to_index] = rlwe_modop.neg(el);
291                    } else {
292                        m_g_k_eval.as_mut()[*to_index] = *el;
293                    }
294                });
295
296                rlwe_nttop.forward(m_g_k_eval.as_mut());
297                let mut s_g_k = neg_s_g_k.clone();
298                rlwe_nttop.forward(s_g_k.as_mut());
299                rlwe_modop.elwise_mul_mut(m_g_k_eval.as_mut(), s_g_k.as_ref());
300                rlwe_nttop.backward(m_g_k_eval.as_mut());
301                m_g_k_eval
302            };
303
304            // RLWE auto sends part A, A(X), of RLWE to A(X^{g^k}) and then multiplies it
305            // with -s(X^{g^k}) using auto key. Deliberately set RLWE = (0, m(X))
306            // (ie. m in part A) to get back RLWE(-m(X^{g^k})s(X^{g^k}))
307            let mut rlwe = M::zeros(2, rlwe_n);
308            rlwe.get_row_mut(0).copy_from_slice(m.as_ref());
309
310            rlwe_auto(
311                &mut RlweCiphertextMutRef::new(rlwe.as_mut()),
312                &RlweKskRef::new(
313                    server_key.galois_key_for_auto(*k).as_ref(),
314                    auto_decomposer.decomposition_count().0,
315                ),
316                &mut scratch_matrix_ref,
317                &auto_index_map,
318                &auto_sign_map,
319                &rlwe_modop,
320                &rlwe_nttop,
321                &auto_decomposer,
322                false,
323            );
324
325            // decrypt RLWE(-m(X)s(X^{g^k]}))
326            let mut back_m = M::R::zeros(rlwe_n);
327            decrypt_rlwe(&rlwe, &ideal_sk_rlwe, &mut back_m, &rlwe_nttop, &rlwe_modop);
328
329            // check difference
330            let mut diff = back_m;
331            rlwe_modop.elwise_sub_mut(diff.as_mut(), want_m.as_ref());
332            server_key_stats
333                .add_noise_post_1_auto(&Vec::<i64>::try_convert_from(diff.as_ref(), rlwe_q));
334        });
335
336        // sample random m
337
338        // key switch
339    }
340
341    // LWE Key switch
342    // LWE key switches LWE_in = LWE_{Q_ks,N, s}(m) = (b, a_0, ... a_N) -> LWE_out =
343    // LWE_{Q_{ks}, n, z}(m) = (b', a'_0, ..., a'n)
344    // If LWE_in = (0, a = {a_0, ..., a_N}), then LWE_out = LWE(-a \cdot s_{rlwe})
345    for _ in 0..100 {
346        let mut lwe_in = M::R::zeros(rlwe_n + 1);
347        RandomFillUniformInModulus::random_fill(&mut rng, lwe_q, &mut lwe_in.as_mut()[1..]);
348
349        // Key switch
350        let mut lwe_out = M::R::zeros(parameters.lwe_n().0 + 1);
351        lwe_key_switch(
352            &mut lwe_out,
353            &lwe_in,
354            server_key.lwe_ksk(),
355            &lwe_modop,
356            &lwe_ks_decomposer,
357        );
358
359        // -a \cdot s
360        let mut want_m = M::MatElement::zero();
361        izip!(lwe_in.as_ref().iter().skip(1), ideal_sk_rlwe.iter()).for_each(|(a, b)| {
362            want_m = lwe_modop.add(
363                &want_m,
364                &lwe_modop.mul(a, &lwe_q.map_element_from_i64(*b as i64)),
365            );
366        });
367        want_m = lwe_modop.neg(&want_m);
368
369        // decrypt lwe out
370        let back_m = decrypt_lwe(&lwe_out, &ideal_sk_lwe, &lwe_modop);
371
372        let noise = lwe_modop.sub(&want_m, &back_m);
373        server_key_stats.add_noise_post_kwe_key_switch(&vec![lwe_q.map_element_to_i64(&noise)]);
374    }
375
376    server_key_stats
377    // Auto keys noise
378
379    // Ksk noise
380}
381
382#[cfg(test)]
383mod tests {
384    use itertools::Itertools;
385
386    #[test]
387    #[cfg(feature = "interactive_mp")]
388    fn interactive_key_noise() {
389        use crate::{
390            aggregate_public_key_shares, aggregate_server_key_shares,
391            bool::{
392                evaluator::InteractiveMultiPartyCrs,
393                keys::{key_size::KeySize, ServerKeyEvaluationDomain},
394            },
395            gen_client_key, gen_mp_keys_phase2, interactive_multi_party_round1_share,
396            parameters::CiphertextModulus,
397            random::DefaultSecureRng,
398            set_common_reference_seed, set_parameter_set,
399            utils::WithLocal,
400            BoolEvaluator, DefaultDecomposer, ModularOpsU64, NttBackendU64,
401        };
402
403        use super::*;
404
405        set_parameter_set(crate::ParameterSelector::InteractiveLTE8Party);
406        set_common_reference_seed(InteractiveMultiPartyCrs::random().seed);
407        let parties = 8;
408
409        let mut server_key_stats = ServerKeyStats::default();
410        let mut server_key_share_size = 0usize;
411
412        for i in 0..2 {
413            let cks = (0..parties).map(|_| gen_client_key()).collect_vec();
414            let pk_shares = cks
415                .iter()
416                .map(|k| interactive_multi_party_round1_share(k))
417                .collect_vec();
418
419            let pk = aggregate_public_key_shares(&pk_shares);
420            let server_key_shares = cks
421                .iter()
422                .enumerate()
423                .map(|(index, k)| gen_mp_keys_phase2(k, index, parties, &pk))
424                .collect_vec();
425
426            // In 0th iteration measure server key size
427            if i == 0 {
428                // Server key share size of user with last id may not equal server key share
429                // sizes of other users if LWE dimension does not divides number of parties.
430                server_key_share_size = std::cmp::max(
431                    server_key_shares.first().unwrap().size(),
432                    server_key_shares.last().unwrap().size(),
433                );
434            }
435
436            // println!("Size: {}", server_key_shares[0].size());
437            let seeded_server_key = aggregate_server_key_shares(&server_key_shares);
438            let server_key_eval =
439                ServerKeyEvaluationDomain::<_, _, DefaultSecureRng, NttBackendU64>::from(
440                    &seeded_server_key,
441                );
442
443            let parameters = BoolEvaluator::with_local(|e| e.parameters().clone());
444            server_key_stats.merge_in(&collect_server_key_stats::<
445                _,
446                DefaultDecomposer<u64>,
447                NttBackendU64,
448                ModularOpsU64<CiphertextModulus<u64>>,
449                _,
450            >(parameters, &cks, &server_key_eval));
451        }
452
453        println!(
454            "Common reference seeded server key share key size: {} Bits",
455            server_key_share_size
456        );
457
458        println!(
459            "Rgsw nsm std log2 {}",
460            server_key_stats.brk_rgsw_cts.0.std_dev().log2()
461        );
462        println!(
463            "Rgsw m std log2 {}",
464            server_key_stats.brk_rgsw_cts.1.std_dev().log2()
465        );
466        println!(
467            "rlwe post 1 auto std log2 {}",
468            server_key_stats.post_1_auto.std_dev().log2()
469        );
470        println!(
471            "key switching noise rlwe secret s to lwe secret z std log2 {}",
472            server_key_stats.post_lwe_key_switch.std_dev().log2()
473        );
474    }
475
476    #[test]
477    #[cfg(feature = "non_interactive_mp")]
478    fn non_interactive_key_noise() {
479        use crate::{
480            aggregate_server_key_shares,
481            bool::{
482                evaluator::NonInteractiveMultiPartyCrs,
483                keys::{key_size::KeySize, NonInteractiveServerKeyEvaluationDomain},
484            },
485            decomposer::DefaultDecomposer,
486            gen_client_key, gen_server_key_share,
487            parameters::CiphertextModulus,
488            random::DefaultSecureRng,
489            set_common_reference_seed, set_parameter_set,
490            utils::WithLocal,
491            BoolEvaluator, ModularOpsU64, NttBackendU64,
492        };
493
494        use super::*;
495
496        set_parameter_set(crate::ParameterSelector::NonInteractiveLTE8Party);
497        set_common_reference_seed(NonInteractiveMultiPartyCrs::random().seed);
498        let parties = 8;
499
500        let mut server_key_stats = ServerKeyStats::default();
501        let mut server_key_share_size = 0;
502        for i in 0..2 {
503            let cks = (0..parties).map(|_| gen_client_key()).collect_vec();
504            let server_key_shares = cks
505                .iter()
506                .enumerate()
507                .map(|(user_id, k)| gen_server_key_share(user_id, parties, k))
508                .collect_vec();
509
510            // Collect server key size in the 0th iteration
511            if i == 0 {
512                // Server key share size may differ for user with last id from
513                // the share size of other users if the LWE dimension `n` is not
514                // divisible by no. of parties.
515                server_key_share_size = std::cmp::max(
516                    server_key_shares.first().unwrap().size(),
517                    server_key_shares.last().unwrap().size(),
518                );
519            }
520
521            let server_key = aggregate_server_key_shares(&server_key_shares);
522
523            let server_key_eval = NonInteractiveServerKeyEvaluationDomain::<
524                _,
525                _,
526                DefaultSecureRng,
527                NttBackendU64,
528            >::from(&server_key);
529
530            let parameters = BoolEvaluator::with_local(|e| e.parameters().clone());
531            server_key_stats.merge_in(&collect_server_key_stats::<
532                _,
533                DefaultDecomposer<u64>,
534                NttBackendU64,
535                ModularOpsU64<CiphertextModulus<u64>>,
536                _,
537            >(parameters, &cks, &server_key_eval));
538        }
539
540        println!(
541            "Common reference seeded server key share key size: {} Bits",
542            server_key_share_size
543        );
544        println!(
545            "Rgsw nsm std log2 {}",
546            server_key_stats.brk_rgsw_cts.0.std_dev().abs().log2()
547        );
548        println!(
549            "Rgsw m std log2 {}",
550            server_key_stats.brk_rgsw_cts.1.std_dev().abs().log2()
551        );
552        println!(
553            "rlwe post 1 auto std log2 {}",
554            server_key_stats.post_1_auto.std_dev().abs().log2()
555        );
556        println!(
557            "key switching noise rlwe secret s to lwe secret z std log2 {}",
558            server_key_stats.post_lwe_key_switch.std_dev().abs().log2()
559        );
560    }
561
562    #[test]
563    #[cfg(feature = "non_interactive_mp")]
564    fn enc_under_sk_and_key_switch() {
565        use rand::{thread_rng, Rng};
566
567        use crate::{
568            aggregate_server_key_shares,
569            bool::{keys::tests::ideal_sk_rlwe, ni_mp_api::NonInteractiveBatchedFheBools},
570            gen_client_key, gen_server_key_share,
571            rgsw::decrypt_rlwe,
572            set_common_reference_seed, set_parameter_set,
573            utils::{tests::Stats, TryConvertFrom1, WithLocal},
574            BoolEvaluator, Encoder, Encryptor, KeySwitchWithId, ModInit, ModularOpsU64,
575            NttBackendU64, NttInit, ParameterSelector, VectorOps,
576        };
577
578        set_parameter_set(ParameterSelector::NonInteractiveLTE2Party);
579        set_common_reference_seed([2; 32]);
580
581        let parties = 2;
582
583        let cks = (0..parties).map(|_| gen_client_key()).collect_vec();
584
585        let key_shares = cks
586            .iter()
587            .enumerate()
588            .map(|(user_index, ck)| gen_server_key_share(user_index, parties, ck))
589            .collect_vec();
590
591        let seeded_server_key = aggregate_server_key_shares(&key_shares);
592        seeded_server_key.set_server_key();
593
594        let parameters = BoolEvaluator::with_local(|e| e.parameters().clone());
595        let nttop = NttBackendU64::new(parameters.rlwe_q(), parameters.rlwe_n().0);
596        let rlwe_q_modop = ModularOpsU64::new(*parameters.rlwe_q());
597
598        let m = (0..parameters.rlwe_n().0)
599            .map(|_| thread_rng().gen_bool(0.5))
600            .collect_vec();
601        let ct: NonInteractiveBatchedFheBools<_> = cks[0].encrypt(m.as_slice());
602        let ct = ct.key_switch(0);
603
604        let ideal_rlwe_sk = ideal_sk_rlwe(&cks);
605
606        let message = m
607            .iter()
608            .map(|b| parameters.rlwe_q().encode(*b))
609            .collect_vec();
610
611        let mut m_out = vec![0u64; parameters.rlwe_n().0];
612        decrypt_rlwe(
613            &ct.data[0],
614            &ideal_rlwe_sk,
615            &mut m_out,
616            &nttop,
617            &rlwe_q_modop,
618        );
619
620        let mut diff = m_out;
621        rlwe_q_modop.elwise_sub_mut(diff.as_mut_slice(), message.as_ref());
622
623        let mut stats = Stats::new();
624        stats.add_many_samples(&Vec::<i64>::try_convert_from(
625            diff.as_slice(),
626            parameters.rlwe_q(),
627        ));
628        println!("Noise std log2: {}", stats.std_dev().abs().log2());
629    }
630
631    #[test]
632    fn mod_switch_noise() {
633        // Experiment to check mod switch noise using different secret dist in
634        // multi-party setting
635
636        use itertools::izip;
637        use num_traits::ToPrimitive;
638
639        use crate::{
640            backend::{Modulus, ModulusPowerOf2},
641            parameters::SecretKeyDistribution,
642            random::{DefaultSecureRng, RandomFillGaussian, RandomFillUniformInModulus},
643            utils::{fill_random_ternary_secret_with_hamming_weight, tests::Stats},
644            ArithmeticOps, ModInit,
645        };
646
647        fn mod_switch(v: u64, q_from: u64, q_to: u64) -> f64 {
648            (v as f64) * (q_to as f64) / q_from as f64
649        }
650
651        fn mod_switch_round(v: u64, q_from: u64, q_to: u64) -> u64 {
652            mod_switch(v, q_from, q_to).round().to_u64().unwrap()
653        }
654
655        fn mod_switch_odd(v: u64, q_from: u64, q_to: u64) -> u64 {
656            let odd_v = mod_switch(v, q_from, q_to).floor().to_u64().unwrap();
657            odd_v + ((odd_v & 1) ^ 1)
658        }
659
660        fn sample_secret(n: usize, dist: &SecretKeyDistribution) -> Vec<i32> {
661            let mut s = vec![0i32; n];
662            let mut rng = DefaultSecureRng::new();
663
664            match dist {
665                SecretKeyDistribution::ErrorDistribution => {
666                    RandomFillGaussian::random_fill(&mut rng, s.as_mut_slice());
667                }
668                SecretKeyDistribution::TernaryDistribution => {
669                    fill_random_ternary_secret_with_hamming_weight(&mut s, n >> 1, &mut rng);
670                }
671            }
672
673            s
674        }
675
676        let parties = 2;
677        let q_from = 1 << 40;
678        let q_to = 1 << 20;
679        let n = 480;
680        let lweq_in_modop = ModulusPowerOf2::new(q_from);
681        let lweq_out_modop = ModulusPowerOf2::new(q_to);
682        let secret_dist = SecretKeyDistribution::ErrorDistribution;
683
684        let mut stats_ms_noise = Stats::new();
685        let mut stats_ms_rounding_err = Stats::new();
686
687        for _ in 0..1000000 {
688            let mut rng = DefaultSecureRng::new();
689
690            // sample secrets
691
692            let s = {
693                let mut s = vec![0i32; n];
694                for _ in 0..parties {
695                    let temp = sample_secret(n, &secret_dist);
696                    izip!(s.iter_mut(), temp.iter()).for_each(|(si, ti)| {
697                        *si = *si + *ti;
698                    });
699                }
700                s
701            };
702
703            let m = 10;
704
705            // LWE encryption without noise
706            let mut lwe_in = vec![0u64; n + 1];
707            {
708                RandomFillUniformInModulus::random_fill(&mut rng, &q_from, &mut lwe_in[1..]);
709                let mut b = m;
710                izip!(lwe_in.iter().skip(1), s.iter()).for_each(|(ai, si)| {
711                    b = lweq_in_modop.add(
712                        &b,
713                        &lweq_in_modop.mul(ai, &q_from.map_element_from_i64(*si as i64)),
714                    );
715                });
716                lwe_in[0] = b;
717            }
718
719            // Mod switch
720            let lwe_out = lwe_in
721                .iter()
722                .map(|v| {
723                    // mod_switch_round(*v, q_from, q_to)
724                    mod_switch_odd(*v, q_from, q_to)
725                })
726                .collect_vec();
727
728            let rounding_errors = izip!(lwe_out.iter(), lwe_in.iter())
729                .map(|(v_out, v_in)| {
730                    let r_i = mod_switch(*v_in, q_from, q_to) - (*v_out as f64);
731                    r_i
732                })
733                .collect_vec();
734            stats_ms_rounding_err.add_many_samples(&rounding_errors);
735
736            // LWE decrypt and calculate ms noise
737            let mut m_back = 0;
738            izip!(lwe_out.iter().skip(1), s.iter()).for_each(|(ai, si)| {
739                m_back = lweq_out_modop.add(
740                    &m_back,
741                    &lweq_out_modop.mul(ai, &q_from.map_element_from_i64(*si as i64)),
742                );
743            });
744            m_back = lweq_out_modop.sub(&lwe_out[0], &m_back);
745            let noise = lweq_out_modop.sub(&m_back, &m);
746            stats_ms_noise.add_many_samples(&vec![q_to.map_element_to_i64(&noise)]);
747        }
748
749        println!("ms noise variance: {}", stats_ms_noise.variance());
750        println!("ms rounding errors mean: {}", stats_ms_rounding_err.mean());
751        println!(
752            "ms rounding errors variance: {}",
753            stats_ms_rounding_err.variance()
754        );
755    }
756}