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<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, min(a_cols, b_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        (1..a.cols() + 1).for_each(|a_cols| {
224            (1..gadget_ct.cols() + 1).for_each(|b_cols| {
225                pt.elem_mut().zero();
226                elem_res.zero();
227
228                //let b_cols: usize = min(a_cols+1, gadget_ct.cols());
229
230                println!("a_cols: {} b_cols: {}", a_cols, b_cols);
231
232                // res_dft_0 = DFT(gct_[0] * ct[1] = a * (-bs' + s + e) = -cs' + as + e')
233                // res_dft_1 = DFT(gct_[1] * ct[1] = a * b = c)
234                gadget_product_core(
235                    params.module(),
236                    &mut res_dft_0,
237                    &mut res_dft_1,
238                    &a,
239                    a_cols,
240                    &gadget_ct,
241                    b_cols,
242                    &mut tmp_bytes,
243                );
244
245                // res_big_0 = IDFT(res_dft_0)
246                params
247                    .module()
248                    .vec_znx_idft_tmp_a(&mut res_big_0, &mut res_dft_0, b_cols);
249                // res_big_1 = IDFT(res_dft_1);
250                params
251                    .module()
252                    .vec_znx_idft_tmp_a(&mut res_big_1, &mut res_dft_1, b_cols);
253
254                // res_big_0 = normalize(res_big_0)
255                params.module().vec_znx_big_normalize(
256                    log_base2k,
257                    elem_res.at_mut(0),
258                    &res_big_0,
259                    &mut tmp_bytes,
260                );
261
262                // res_big_1 = normalize(res_big_1)
263                params.module().vec_znx_big_normalize(
264                    log_base2k,
265                    elem_res.at_mut(1),
266                    &res_big_1,
267                    &mut tmp_bytes,
268                );
269
270                // <(-c*sk1 + a*sk0 + e, a), (1, sk1)> = a*sk0 + e
271                decrypt_rlwe(
272                    params.module(),
273                    pt.elem_mut(),
274                    &elem_res,
275                    &sk1_svp_ppol,
276                    &mut tmp_bytes,
277                );
278
279                // a * sk0 + e - a*sk0 = e
280                params
281                    .module()
282                    .vec_znx_sub_inplace(pt.at_mut(0), &mut a_times_s);
283                pt.at_mut(0).normalize(log_base2k, &mut tmp_bytes);
284
285                //pt.at(0).print(pt.elem().cols(), 16);
286
287                let noise_have: f64 = pt.at(0).std(log_base2k).log2();
288
289                let var_a_err: f64;
290
291                if a_cols < a.cols() {
292                    var_a_err = 1f64 / 12f64;
293                } else {
294                    var_a_err = 0f64;
295                }
296
297                let a_logq: usize = a_cols * log_base2k;
298                let b_logq: usize = b_cols * log_base2k;
299                let var_msg: f64 = params.xs() as f64;
300
301                let noise_pred: f64 =
302                    params.noise_grlwe_product(var_msg, var_a_err, a_logq, b_logq);
303
304                assert!(noise_have <= noise_pred + 1.0);
305
306                println!("noise_pred: {}", noise_have);
307                println!("noise_have: {}", noise_pred);
308            });
309        });
310    }
311}
312
313impl Parameters {
314    pub fn noise_grlwe_product(
315        &self,
316        var_msg: f64,
317        var_a_err: f64,
318        a_logq: usize,
319        b_logq: usize,
320    ) -> f64 {
321        let n: f64 = self.n() as f64;
322        let var_xs: f64 = self.xs() as f64;
323
324        let var_gct_err_lhs: f64;
325        let var_gct_err_rhs: f64;
326        if b_logq < self.log_qp() {
327            let var_round: f64 = 1f64 / 12f64;
328            var_gct_err_lhs = var_round;
329            var_gct_err_rhs = var_round;
330        } else {
331            var_gct_err_lhs = self.xe() * self.xe();
332            var_gct_err_rhs = 0f64;
333        }
334
335        noise_grlwe_product(
336            n,
337            self.log_base2k(),
338            var_xs,
339            var_msg,
340            var_a_err,
341            var_gct_err_lhs,
342            var_gct_err_rhs,
343            a_logq,
344            b_logq,
345        )
346    }
347}
348
349pub fn noise_grlwe_product(
350    n: f64,
351    log_base2k: usize,
352    var_xs: f64,
353    var_msg: f64,
354    var_a_err: f64,
355    var_gct_err_lhs: f64,
356    var_gct_err_rhs: f64,
357    a_logq: usize,
358    b_logq: usize,
359) -> f64 {
360    let a_logq: usize = min(a_logq, b_logq);
361    let a_cols: usize = (a_logq + log_base2k - 1) / log_base2k;
362
363    let b_scale = 2.0f64.powi(b_logq as i32);
364    let a_scale: f64 = 2.0f64.powi((b_logq - a_logq) as i32);
365
366    let base: f64 = (1 << (log_base2k)) as f64;
367    let var_base: f64 = base * base / 12f64;
368
369    // lhs = a_cols * n * (var_base * var_gct_err_lhs + var_e_a * var_msg * p^2)
370    // rhs = a_cols * n * var_base * var_gct_err_rhs * var_xs
371    let mut noise: f64 =
372        (a_cols as f64) * n * var_base * (var_gct_err_lhs + var_xs * var_gct_err_rhs);
373    noise += var_msg * var_a_err * a_scale * a_scale;
374    noise = noise.sqrt();
375    noise /= b_scale;
376    noise.log2().min(-1.0) // max noise is [-2^{-1}, 2^{-1}]
377}