2014-04-23 11:19:37 +00:00
|
|
|
|
/*
|
|
|
|
|
* Copyright (C) 2014 FH Bielefeld
|
|
|
|
|
*
|
|
|
|
|
* This file is part of a FH Bielefeld project.
|
|
|
|
|
*
|
|
|
|
|
* This library is free software; you can redistribute it and/or
|
|
|
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
|
|
|
* License as published by the Free Software Foundation; either
|
|
|
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
|
|
|
*
|
|
|
|
|
* This library is distributed in the hope that it will be useful,
|
|
|
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
|
* Lesser General Public License for more details.
|
|
|
|
|
*
|
|
|
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
|
|
|
* License along with this library; if not, write to the Free Software
|
|
|
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
|
|
|
|
|
* MA 02110-1301 USA
|
|
|
|
|
*/
|
|
|
|
|
|
2014-05-02 11:00:00 +00:00
|
|
|
|
#include "ntru_decrypt.h"
|
2014-05-03 11:51:00 +00:00
|
|
|
|
#include "poly.h"
|
2014-05-03 12:03:03 +00:00
|
|
|
|
#include "context.h"
|
2014-05-02 11:00:00 +00:00
|
|
|
|
|
|
|
|
|
/*
|
|
|
|
|
* Legend
|
|
|
|
|
*
|
2014-05-03 12:03:03 +00:00
|
|
|
|
* N : maximal degree of the polynom
|
2014-05-02 11:00:00 +00:00
|
|
|
|
* q : "is given" (... mod q)
|
|
|
|
|
* p : "is given" (... mod p)
|
|
|
|
|
* f : private key
|
|
|
|
|
* Fp: inverse of "modulo p"
|
|
|
|
|
* e : encrypted message
|
|
|
|
|
* a : result of first multiplication (StarMultiply(f, e, a, N, q))
|
|
|
|
|
* d : result of second multiplication (StarMultiply(a, Fp , d, N, p)), decrypted message
|
|
|
|
|
* */
|
|
|
|
|
|
2014-05-02 10:18:33 +00:00
|
|
|
|
// Require: N , q, p, secret key f , inverse polynomial Fp , and encrypted message e.
|
2014-05-03 12:03:03 +00:00
|
|
|
|
int ntru_decrypt(pb_poly *encr_msg, pb_poly *private_key, ntru_context *context, char ** decr_msg){
|
2014-05-03 12:57:05 +00:00
|
|
|
|
// toDo fp = ?
|
2014-05-02 11:00:00 +00:00
|
|
|
|
|
2014-05-03 12:07:12 +00:00
|
|
|
|
unsigned int q = context->q;
|
|
|
|
|
unsigned int p = context->p;
|
|
|
|
|
unsigned int N = context->N;
|
|
|
|
|
|
|
|
|
|
// StarMultiply(f, e, a, N, q)
|
2014-05-03 12:57:05 +00:00
|
|
|
|
pb_poly *a = build_polynom(NULL, N, context);
|
2014-05-03 12:03:03 +00:00
|
|
|
|
pb_starmultiply(private_key, encr_msg, a, context, q);
|
2014-05-02 11:00:00 +00:00
|
|
|
|
|
2014-05-03 12:57:05 +00:00
|
|
|
|
mp_int mp_q;
|
|
|
|
|
mp_int mp_qdiv2;
|
|
|
|
|
mp_int zero;
|
|
|
|
|
|
|
|
|
|
init_integer(&mp_q);
|
|
|
|
|
init_integer(&mp_qdiv2);
|
|
|
|
|
init_integer(&zero);
|
|
|
|
|
|
|
|
|
|
MP_SET_INT(&mp_q, q);
|
|
|
|
|
mp_div_2(&mp_q, mp_qdiv2);
|
|
|
|
|
mp_zero(&zero);
|
|
|
|
|
|
2014-05-02 10:18:33 +00:00
|
|
|
|
for(int i = 0, i < N, i++){
|
2014-05-03 12:57:05 +00:00
|
|
|
|
if(mp_cmp(&(a->terms[i]),&zero) == MP_LT) { // Make all coefficients positive
|
|
|
|
|
a->terms[i] = a->terms[i] + q;
|
2014-05-02 10:18:33 +00:00
|
|
|
|
}
|
2014-05-03 12:57:05 +00:00
|
|
|
|
if(mp_cmp(&(a->terms[i]), &mp_qdiv2) == MP_GT) { // Shift coefficients of a into range (−q/2, q/2)
|
|
|
|
|
a->terms[i] = a->terms[i] - mp_q;
|
2014-05-02 10:18:33 +00:00
|
|
|
|
}
|
|
|
|
|
}
|
2014-05-03 11:51:00 +00:00
|
|
|
|
//toDo StarMultiply(a, Fp , d, N, p)
|
2014-05-02 11:00:00 +00:00
|
|
|
|
|
2014-05-02 10:18:33 +00:00
|
|
|
|
// {Decode returns the decrypted message, d, through the argument list.}
|
2014-05-02 11:00:00 +00:00
|
|
|
|
return d;
|
|
|
|
|
}
|