arnaucube
arnaucube/poulpyPublic Self-hosted repository
poulpy/rlwe/src/gadget_product.rs
rlwe/src/gadget_product.rsRaw
  1use crate::{
  2    ciphertext::Ciphertext,
  3    elem::{Elem, ElemCommon, ElemVecZnx, VecZnxCommon},
  4    parameters::Parameters,
  5};
  6use base2k::{Module, VecZnxDft, VecZnxDftOps, VmpPMat, VmpPMatOps};
  7use std::cmp::min;
  8
  9pub fn gadget_product_tmp_bytes(
 10    module: &Module,
 11    log_base2k: usize,
 12    res_log_q: usize,
 13    in_log_q: usize,
 14    gct_rows: usize,
 15    gct_log_q: usize,
 16) -> usize {
 17    let gct_cols: usize = (gct_log_q + log_base2k - 1) / log_base2k;
 18    let in_cols: usize = (in_log_q + log_base2k - 1) / log_base2k;
 19    let out_cols: usize = (res_log_q + log_base2k - 1) / log_base2k;
 20    module.vmp_apply_dft_to_dft_tmp_bytes(out_cols, in_cols, gct_rows, gct_cols)
 21}
 22
 23impl Parameters {
 24    pub fn gadget_product_tmp_bytes(
 25        &self,
 26        res_log_q: usize,
 27        in_log_q: usize,
 28        gct_rows: usize,
 29        gct_log_q: usize,
 30    ) -> usize {
 31        gadget_product_tmp_bytes(
 32            self.module(),
 33            self.log_base2k(),
 34            res_log_q,
 35            in_log_q,
 36            gct_rows,
 37            gct_log_q,
 38        )
 39    }
 40}
 41
 42/// Evaluates the gadget product res <- a x b.
 43///
 44/// # Arguments
 45///
 46/// * `module`: backend support for operations mod (X^N + 1).
 47/// * `res`: an [Elem] to store (-cs + m * a + e, c) with res_ncols cols.
 48/// * `a`: a [VecZnx] of a_ncols cols.
 49/// * `b`: a [Ciphertext<VmpPMat>] as a vector of (-Bs + m * 2^{-k} + E, B)
 50///       containing b_nrows [VecZnx], each of b_ncols cols.
 51///
 52/// # Computation
 53///
 54/// res = sum[min(a_ncols, b_nrows)] decomp(a, i) * (-B[i]s + m * 2^{-k*i} + E[i], B[i])
 55///     = (cs + m * a + e, c) with min(res_cols, b_cols) cols.
 56pub fn gadget_product_core<const OVERWRITE: bool, T>(
 57    module: &Module,
 58    res_dft_0: &mut VecZnxDft,
 59    res_dft_1: &mut VecZnxDft,
 60    a: &T,
 61    a_cols: usize,
 62    b: &Ciphertext<VmpPMat>,
 63    b_cols: usize,
 64    tmp_bytes: &mut [u8],
 65) where
 66    T: VecZnxCommon<Owned = T>,
 67    Elem<T>: ElemVecZnx<T>,
 68{
 69    assert!(b_cols <= b.cols());
 70    module.vec_znx_dft(res_dft_1, a, a_cols);
 71    module.vmp_apply_dft_to_dft(res_dft_0, res_dft_1, b.at(0), tmp_bytes);
 72    module.vmp_apply_dft_to_dft_inplace(res_dft_1, b.at(1), tmp_bytes);
 73}
 74
 75/*
 76// res_big[a * (G0|G1)] <- IDFT(res_dft[a * (G0|G1)])
 77module.vec_znx_idft_tmp_a(&mut res_big_0, &mut res_dft_0, b_cols);
 78module.vec_znx_idft_tmp_a(&mut res_big_1, &mut res_dft_1, b_cols);
 79
 80// res_big <- res[0] + res_big[a*G0]
 81module.vec_znx_big_add_small_inplace(&mut res_big_0, res.at(0));
 82module.vec_znx_big_normalize(log_base2k, res.at_mut(0), &res_big_0, tmp_bytes_carry);
 83
 84if OVERWRITE {
 85    // res[1] = normalize(res_big[a*G1])
 86    module.vec_znx_big_normalize(log_base2k, res.at_mut(1), &res_big_1, tmp_bytes_carry);
 87} else {
 88    // res[1] = normalize(res_big[a*G1] + res[1])
 89    module.vec_znx_big_add_small_inplace(&mut res_big_1, res.at(1));
 90    module.vec_znx_big_normalize(log_base2k, res.at_mut(1), &res_big_1, tmp_bytes_carry);
 91}
 92*/
 93
 94#[cfg(test)]
 95mod test {
 96    use crate::{
 97        ciphertext::{Ciphertext, new_gadget_ciphertext},
 98        decryptor::decrypt_rlwe,
 99        elem::{Elem, ElemCommon, ElemVecZnx},
100        encryptor::encrypt_grlwe_sk,
101        gadget_product::gadget_product_core,
102        keys::SecretKey,
103        parameters::{Parameters, ParametersLiteral},
104        plaintext::Plaintext,
105    };
106    use base2k::{
107        FFT64, Infos, Sampling, SvpPPolOps, VecZnx, VecZnxApi, VecZnxBig, VecZnxBigOps, VecZnxDft,
108        VecZnxDftOps, VecZnxOps, VmpPMat,
109    };
110    use sampling::source::{Source, new_seed};
111
112    #[test]
113    fn test_gadget_product_core() {
114        let log_base2k: usize = 10;
115        let q_cols: usize = 7;
116        let p_cols: usize = 1;
117
118        // Basic parameters with enough limbs to test edge cases
119        let params_lit: ParametersLiteral = ParametersLiteral {
120            log_n: 12,
121            log_q: q_cols * log_base2k,
122            log_p: p_cols * log_base2k,
123            log_base2k: log_base2k,
124            log_scale: 20,
125            xe: 3.2,
126            xs: 1 << 11,
127        };
128
129        let params: Parameters = Parameters::new::<FFT64>(&params_lit);
130
131        // scratch space
132        let mut tmp_bytes: Vec<u8> =
133            vec![
134                0u8;
135                params.decrypt_rlwe_tmp_byte(params.log_qp())
136                    | params.encrypt_rlwe_sk_tmp_bytes(params.log_qp())
137                    | params.gadget_product_tmp_bytes(
138                        params.log_qp(),
139                        params.log_qp(),
140                        params.cols_qp(),
141                        params.log_qp()
142                    )
143                    | params.encrypt_grlwe_sk_tmp_bytes(params.cols_qp(), params.log_qp())
144            ];
145
146        // Samplers for public and private randomness
147        let mut source_xe: Source = Source::new(new_seed());
148        let mut source_xa: Source = Source::new(new_seed());
149        let mut source_xs: Source = Source::new(new_seed());
150
151        // Two secret keys
152        let mut sk0: SecretKey = SecretKey::new(params.module());
153        sk0.fill_ternary_hw(params.xs(), &mut source_xs);
154        let mut sk0_svp_ppol: base2k::SvpPPol = params.module().new_svp_ppol();
155        params.module().svp_prepare(&mut sk0_svp_ppol, &sk0.0);
156
157        let mut sk1: SecretKey = SecretKey::new(params.module());
158        sk1.fill_ternary_hw(params.xs(), &mut source_xs);
159        let mut sk1_svp_ppol: base2k::SvpPPol = params.module().new_svp_ppol();
160        params.module().svp_prepare(&mut sk1_svp_ppol, &sk1.0);
161
162        // The gadget ciphertext
163        let mut gadget_ct: Ciphertext<VmpPMat> = new_gadget_ciphertext(
164            params.module(),
165            log_base2k,
166            params.cols_qp(),
167            params.log_qp(),
168        );
169
170        // gct = [-b*sk1 + g(sk0) + e, b]
171        encrypt_grlwe_sk(
172            params.module(),
173            &mut gadget_ct,
174            &sk0.0,
175            &sk1_svp_ppol,
176            &mut source_xa,
177            &mut source_xe,
178            params.xe(),
179            &mut tmp_bytes,
180        );
181
182        // Intermediate buffers
183        let mut res_dft_0: VecZnxDft = params.module().new_vec_znx_dft(gadget_ct.cols());
184        let mut res_dft_1: VecZnxDft = params.module().new_vec_znx_dft(gadget_ct.cols());
185        let mut res_big_0: VecZnxBig = res_dft_0.as_vec_znx_big();
186        let mut res_big_1: VecZnxBig = res_dft_1.as_vec_znx_big();
187
188        // Input polynopmial, uniformly distributed
189        let mut a: VecZnx = params.module().new_vec_znx(params.cols_q());
190        params
191            .module()
192            .fill_uniform(log_base2k, &mut a, params.cols_q(), &mut source_xa);
193
194        // res = g^-1(a) * gct
195        let mut elem_res: Elem<VecZnx> =
196            Elem::<VecZnx>::new(params.module(), log_base2k, params.log_qp(), 2);
197
198        // Ideal output = a * s
199        let mut a_dft: VecZnxDft = params.module().new_vec_znx_dft(a.cols());
200        let mut a_big: VecZnxBig = a_dft.as_vec_znx_big();
201        let mut a_times_s: VecZnx = params.module().new_vec_znx(a.cols());
202
203        // a * sk0
204        params
205            .module()
206            .svp_apply_dft(&mut a_dft, &sk0_svp_ppol, &a, a.cols());
207        params
208            .module()
209            .vec_znx_idft_tmp_a(&mut a_big, &mut a_dft, a.cols());
210        params.module().vec_znx_big_normalize(
211            params.log_base2k(),
212            &mut a_times_s,
213            &a_big,
214            &mut tmp_bytes,
215        );
216
217        // Plaintext for decrypted output of gadget product
218        let mut pt: Plaintext<VecZnx> =
219            Plaintext::<VecZnx>::new(params.module(), params.log_base2k(), params.log_qp());
220
221        // Iterates over all possible cols values for input/output polynomials and gadget ciphertext.
222
223        pt.elem_mut().zero();
224        elem_res.zero();
225
226        let a_cols: usize = a.cols() - 1;
227        let b_cols: usize = gadget_ct.cols();
228
229        println!("a_cols: {} b_cols: {}", a_cols, b_cols);
230
231        // res_dft_0 = DFT(gct_[0] * ct[1] = a * (-bs' + s + e) = -cs' + as + e')
232        // res_dft_1 = DFT(gct_[1] * ct[1] = a * b = c)
233        gadget_product_core::<true, _>(
234            params.module(),
235            &mut res_dft_0,
236            &mut res_dft_1,
237            &a,
238            a_cols,
239            &gadget_ct,
240            b_cols,
241            &mut tmp_bytes,
242        );
243
244        // res_big_0 = IDFT(res_dft_0)
245        params
246            .module()
247            .vec_znx_idft_tmp_a(&mut res_big_0, &mut res_dft_0, b_cols);
248        // res_big_1 = IDFT(res_dft_1);
249        params
250            .module()
251            .vec_znx_idft_tmp_a(&mut res_big_1, &mut res_dft_1, b_cols);
252
253        // res_big_0 = normalize(res_big_0)
254        params.module().vec_znx_big_normalize(
255            log_base2k,
256            elem_res.at_mut(0),
257            &res_big_0,
258            &mut tmp_bytes,
259        );
260
261        // res_big_1 = normalize(res_big_1)
262        params.module().vec_znx_big_normalize(
263            log_base2k,
264            elem_res.at_mut(1),
265            &res_big_1,
266            &mut tmp_bytes,
267        );
268
269        // <(-c*sk1 + a*sk0 + e, a), (1, sk1)> = a*sk0 + e
270        decrypt_rlwe(
271            params.module(),
272            pt.elem_mut(),
273            &elem_res,
274            &sk1_svp_ppol,
275            &mut tmp_bytes,
276        );
277
278        // a * sk0 + e - a*sk0 = e
279        params
280            .module()
281            .vec_znx_sub_inplace(pt.at_mut(0), &mut a_times_s);
282        pt.at_mut(0).normalize(log_base2k, &mut tmp_bytes);
283
284        pt.at(0).print(pt.elem().cols(), 16);
285
286        println!("noise_have: {}", pt.at(0).std(log_base2k).log2());
287
288        let var_a_err: f64;
289
290        if a_cols < a.cols() {
291            var_a_err = 1f64 / 12f64;
292        } else {
293            var_a_err = 0f64;
294        }
295
296        let a_logq: usize = a_cols * log_base2k;
297        let b_logq: usize = b_cols * log_base2k;
298        let var_msg: f64 = params.xs() as f64;
299        println!(
300            "noise_pred: {}",
301            params.noise_grlwe_product(var_msg, var_a_err, a_logq, b_logq)
302        );
303    }
304}
305
306impl Parameters {
307    pub fn noise_grlwe_product(
308        &self,
309        var_msg: f64,
310        var_a_err: f64,
311        a_logq: usize,
312        b_logq: usize,
313    ) -> f64 {
314        let n: f64 = self.n() as f64;
315        let var_xs: f64 = self.xs() as f64;
316
317        let var_gct_err_lhs: f64;
318        let var_gct_err_rhs: f64;
319        if b_logq < self.log_qp() {
320            let var_round: f64 = 1f64 / 12f64;
321            var_gct_err_lhs = var_round;
322            var_gct_err_rhs = var_round;
323        } else {
324            var_gct_err_lhs = self.xe() * self.xe();
325            var_gct_err_rhs = 0f64;
326        }
327
328        noise_grlwe_product(
329            n,
330            self.log_base2k(),
331            var_xs,
332            var_msg,
333            var_a_err,
334            var_gct_err_lhs,
335            var_gct_err_rhs,
336            a_logq,
337            b_logq,
338        )
339    }
340}
341
342pub fn noise_grlwe_product(
343    n: f64,
344    log_base2k: usize,
345    var_xs: f64,
346    var_msg: f64,
347    var_a_err: f64,
348    var_gct_err_lhs: f64,
349    var_gct_err_rhs: f64,
350    a_logq: usize,
351    b_logq: usize,
352) -> f64 {
353    let a_cols: usize = (a_logq + log_base2k - 1) / log_base2k;
354    let b_cols: usize = (b_logq + log_base2k - 1) / log_base2k;
355
356    let b_scale = 2.0f64.powi(b_logq as i32);
357    let a_scale: f64 = 2.0f64.powi((b_logq - a_logq) as i32);
358
359    let base: f64 = (1 << (log_base2k)) as f64;
360    let var_base: f64 = base * base / 12f64;
361    let var_round: f64 = 1f64 / 12f64;
362
363    // lhs = a_cols * n * (var_base * var_gct_err_lhs + var_e_a * var_msg * p^2)
364    // rhs = a_cols * n * var_base * var_gct_err_rhs * var_xs
365    let mut noise: f64 =
366        (a_cols as f64) * n * var_base * (var_gct_err_lhs + var_xs * var_gct_err_rhs);
367    noise += var_msg * var_a_err * a_scale * a_scale;
368    noise = noise.sqrt();
369    noise /= b_scale;
370    noise.log2()
371}