Imported Upstream version 2.7.1
[platform/upstream/nettle.git] / sec-tabselect.c
1 /* sec-tabselect.c */
2
3 /* nettle, low-level cryptographics library
4  *
5  * Copyright (C) 2013 Niels Möller
6  *
7  * The nettle library is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU Lesser General Public License as published by
9  * the Free Software Foundation; either version 2.1 of the License, or (at your
10  * option) any later version.
11  *
12  * The nettle library is distributed in the hope that it will be useful, but
13  * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14  * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
15  * License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public License
18  * along with the nettle library; see the file COPYING.LIB.  If not, write to
19  * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
20  * MA 02111-1301, USA.
21  */
22
23 /* Development of Nettle's ECC support was funded by the .SE Internet Fund. */
24
25 #if HAVE_CONFIG_H
26 # include "config.h"
27 #endif
28
29 #include <assert.h>
30
31 #include "ecc-internal.h"
32
33 /* Copy the k'th element of the table out tn elements, each of size
34    rn. Always read complete table. Similar to gmp's mpn_tabselect. */
35 /* FIXME: Should we need to volatile declare anything? */
36 void
37 sec_tabselect (mp_limb_t *rp, mp_size_t rn,
38                const mp_limb_t *table, unsigned tn,
39                unsigned k)
40 {
41   const mp_limb_t *end = table + tn * rn;
42   const mp_limb_t *p;
43   mp_size_t i;
44   
45   assert (k < tn);
46   mpn_zero (rp, rn);
47   for (p = table; p < end; p += rn, k--)
48     {
49       mp_limb_t mask = - (mp_limb_t) (k == 0);
50       for (i = 0; i < rn; i++)
51         rp[i] += mask & p[i];
52     }
53 }