blob: 41fa2f34569adb068a2e26fb5b90eddb6e2da0b2 [file] [log] [blame]
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +01001/*
2 * Elliptic curves over GF(p): curve-specific data and functions
3 *
4 * Copyright (C) 2006-2013, Brainspark B.V.
5 *
6 * This file is part of PolarSSL (http://www.polarssl.org)
7 * Lead Maintainer: Paul Bakker <polarssl_maintainer at polarssl.org>
8 *
9 * All rights reserved.
10 *
11 * This program is free software; you can redistribute it and/or modify
12 * it under the terms of the GNU General Public License as published by
13 * the Free Software Foundation; either version 2 of the License, or
14 * (at your option) any later version.
15 *
16 * This program is distributed in the hope that it will be useful,
17 * but WITHOUT ANY WARRANTY; without even the implied warranty of
18 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 * GNU General Public License for more details.
20 *
21 * You should have received a copy of the GNU General Public License along
22 * with this program; if not, write to the Free Software Foundation, Inc.,
23 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
24 */
25
26#include "polarssl/config.h"
27
28#if defined(POLARSSL_ECP_C)
29
30#include "polarssl/ecp.h"
31
Paul Bakker498fd352013-12-02 22:17:24 +010032#if defined(_MSC_VER) && !defined(inline)
33#define inline _inline
34#else
35#if defined(__ARMCC_VERSION) && !defined(inline)
36#define inline __inline
37#endif /* __ARMCC_VERSION */
38#endif /*_MSC_VER */
39
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +010040/*
41 * Conversion macros for embedded constants:
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +010042 * build lists of t_uint's from lists of unsigned char's grouped by 8, 4 or 2
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +010043 */
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +010044#if defined(POLARSSL_HAVE_INT8)
45
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +010046#define BYTES_TO_T_UINT_8( a, b, c, d, e, f, g, h ) \
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +010047 a, b, c, d, e, f, g, h
48
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +010049#define BYTES_TO_T_UINT_4( a, b, c, d ) \
50 a, b, c, d
51
52#define BYTES_TO_T_UINT_2( a, b ) \
53 a, b
54
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +010055#elif defined(POLARSSL_HAVE_INT16)
56
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +010057#define BYTES_TO_T_UINT_2( a, b ) \
58 ( (t_uint) a << 0 ) | \
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +010059 ( (t_uint) b << 8 )
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +010060
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +010061#define BYTES_TO_T_UINT_4( a, b, c, d ) \
62 BYTES_TO_T_UINT_2( a, b ), \
63 BYTES_TO_T_UINT_2( c, d )
64
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +010065#define BYTES_TO_T_UINT_8( a, b, c, d, e, f, g, h ) \
66 BYTES_TO_T_UINT_2( a, b ), \
67 BYTES_TO_T_UINT_2( c, d ), \
68 BYTES_TO_T_UINT_2( e, f ), \
69 BYTES_TO_T_UINT_2( g, h )
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +010070
71#elif defined(POLARSSL_HAVE_INT32)
72
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +010073#define BYTES_TO_T_UINT_4( a, b, c, d ) \
74 ( (t_uint) a << 0 ) | \
75 ( (t_uint) b << 8 ) | \
76 ( (t_uint) c << 16 ) | \
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +010077 ( (t_uint) d << 24 )
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +010078
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +010079#define BYTES_TO_T_UINT_2( a, b ) \
80 BYTES_TO_T_UINT_4( a, b, 0, 0 )
81
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +010082#define BYTES_TO_T_UINT_8( a, b, c, d, e, f, g, h ) \
Manuel Pégourié-Gonnard69ab3542013-12-12 15:50:08 +010083 BYTES_TO_T_UINT_4( a, b, c, d ), \
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +010084 BYTES_TO_T_UINT_4( e, f, g, h )
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +010085
86#else /* 64-bits */
87
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +010088#define BYTES_TO_T_UINT_8( a, b, c, d, e, f, g, h ) \
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +010089 ( (t_uint) a << 0 ) | \
90 ( (t_uint) b << 8 ) | \
91 ( (t_uint) c << 16 ) | \
92 ( (t_uint) d << 24 ) | \
93 ( (t_uint) e << 32 ) | \
94 ( (t_uint) f << 40 ) | \
95 ( (t_uint) g << 48 ) | \
96 ( (t_uint) h << 56 )
97
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +010098#define BYTES_TO_T_UINT_4( a, b, c, d ) \
99 BYTES_TO_T_UINT_8( a, b, c, d, 0, 0, 0, 0 )
100
101#define BYTES_TO_T_UINT_2( a, b ) \
102 BYTES_TO_T_UINT_8( a, b, 0, 0, 0, 0, 0, 0 )
103
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100104#endif /* bits in t_uint */
105
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100106/*
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +0100107 * Note: the constants are in little-endian order
108 * to be directly usable in MPIs
109 */
110
111/*
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100112 * Domain parameters for secp192r1
113 */
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100114#if defined(POLARSSL_ECP_DP_SECP192R1_ENABLED)
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100115static t_uint secp192r1_p[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100116 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
117 BYTES_TO_T_UINT_8( 0xFE, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
118 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100119};
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100120static t_uint secp192r1_b[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100121 BYTES_TO_T_UINT_8( 0xB1, 0xB9, 0x46, 0xC1, 0xEC, 0xDE, 0xB8, 0xFE ),
122 BYTES_TO_T_UINT_8( 0x49, 0x30, 0x24, 0x72, 0xAB, 0xE9, 0xA7, 0x0F ),
123 BYTES_TO_T_UINT_8( 0xE7, 0x80, 0x9C, 0xE5, 0x19, 0x05, 0x21, 0x64 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100124};
125static t_uint secp192r1_gx[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100126 BYTES_TO_T_UINT_8( 0x12, 0x10, 0xFF, 0x82, 0xFD, 0x0A, 0xFF, 0xF4 ),
127 BYTES_TO_T_UINT_8( 0x00, 0x88, 0xA1, 0x43, 0xEB, 0x20, 0xBF, 0x7C ),
128 BYTES_TO_T_UINT_8( 0xF6, 0x90, 0x30, 0xB0, 0x0E, 0xA8, 0x8D, 0x18 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100129};
130static t_uint secp192r1_gy[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100131 BYTES_TO_T_UINT_8( 0x11, 0x48, 0x79, 0x1E, 0xA1, 0x77, 0xF9, 0x73 ),
132 BYTES_TO_T_UINT_8( 0xD5, 0xCD, 0x24, 0x6B, 0xED, 0x11, 0x10, 0x63 ),
133 BYTES_TO_T_UINT_8( 0x78, 0xDA, 0xC8, 0xFF, 0x95, 0x2B, 0x19, 0x07 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100134};
135static t_uint secp192r1_n[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100136 BYTES_TO_T_UINT_8( 0x31, 0x28, 0xD2, 0xB4, 0xB1, 0xC9, 0x6B, 0x14 ),
137 BYTES_TO_T_UINT_8( 0x36, 0xF8, 0xDE, 0x99, 0xFF, 0xFF, 0xFF, 0xFF ),
138 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100139};
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100140#endif /* POLARSSL_ECP_DP_SECP192R1_ENABLED */
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100141
142/*
143 * Domain parameters for secp224r1
144 */
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100145#if defined(POLARSSL_ECP_DP_SECP224R1_ENABLED)
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100146static t_uint secp224r1_p[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100147 BYTES_TO_T_UINT_8( 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 ),
148 BYTES_TO_T_UINT_8( 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0xFF ),
149 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
150 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0x00, 0x00, 0x00, 0x00 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100151};
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100152static t_uint secp224r1_b[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100153 BYTES_TO_T_UINT_8( 0xB4, 0xFF, 0x55, 0x23, 0x43, 0x39, 0x0B, 0x27 ),
154 BYTES_TO_T_UINT_8( 0xBA, 0xD8, 0xBF, 0xD7, 0xB7, 0xB0, 0x44, 0x50 ),
155 BYTES_TO_T_UINT_8( 0x56, 0x32, 0x41, 0xF5, 0xAB, 0xB3, 0x04, 0x0C ),
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +0100156 BYTES_TO_T_UINT_4( 0x85, 0x0A, 0x05, 0xB4 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100157};
158static t_uint secp224r1_gx[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100159 BYTES_TO_T_UINT_8( 0x21, 0x1D, 0x5C, 0x11, 0xD6, 0x80, 0x32, 0x34 ),
160 BYTES_TO_T_UINT_8( 0x22, 0x11, 0xC2, 0x56, 0xD3, 0xC1, 0x03, 0x4A ),
161 BYTES_TO_T_UINT_8( 0xB9, 0x90, 0x13, 0x32, 0x7F, 0xBF, 0xB4, 0x6B ),
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +0100162 BYTES_TO_T_UINT_4( 0xBD, 0x0C, 0x0E, 0xB7 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100163};
164static t_uint secp224r1_gy[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100165 BYTES_TO_T_UINT_8( 0x34, 0x7E, 0x00, 0x85, 0x99, 0x81, 0xD5, 0x44 ),
166 BYTES_TO_T_UINT_8( 0x64, 0x47, 0x07, 0x5A, 0xA0, 0x75, 0x43, 0xCD ),
167 BYTES_TO_T_UINT_8( 0xE6, 0xDF, 0x22, 0x4C, 0xFB, 0x23, 0xF7, 0xB5 ),
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +0100168 BYTES_TO_T_UINT_4( 0x88, 0x63, 0x37, 0xBD ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100169};
170static t_uint secp224r1_n[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100171 BYTES_TO_T_UINT_8( 0x3D, 0x2A, 0x5C, 0x5C, 0x45, 0x29, 0xDD, 0x13 ),
172 BYTES_TO_T_UINT_8( 0x3E, 0xF0, 0xB8, 0xE0, 0xA2, 0x16, 0xFF, 0xFF ),
173 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +0100174 BYTES_TO_T_UINT_4( 0xFF, 0xFF, 0xFF, 0xFF ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100175};
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100176#endif /* POLARSSL_ECP_DP_SECP224R1_ENABLED */
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100177
178/*
179 * Domain parameters for secp256r1
180 */
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100181#if defined(POLARSSL_ECP_DP_SECP256R1_ENABLED)
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100182static t_uint secp256r1_p[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100183 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
184 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0x00, 0x00, 0x00, 0x00 ),
185 BYTES_TO_T_UINT_8( 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 ),
186 BYTES_TO_T_UINT_8( 0x01, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0xFF ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100187};
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100188static t_uint secp256r1_b[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100189 BYTES_TO_T_UINT_8( 0x4B, 0x60, 0xD2, 0x27, 0x3E, 0x3C, 0xCE, 0x3B ),
190 BYTES_TO_T_UINT_8( 0xF6, 0xB0, 0x53, 0xCC, 0xB0, 0x06, 0x1D, 0x65 ),
191 BYTES_TO_T_UINT_8( 0xBC, 0x86, 0x98, 0x76, 0x55, 0xBD, 0xEB, 0xB3 ),
192 BYTES_TO_T_UINT_8( 0xE7, 0x93, 0x3A, 0xAA, 0xD8, 0x35, 0xC6, 0x5A ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100193};
194static t_uint secp256r1_gx[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100195 BYTES_TO_T_UINT_8( 0x96, 0xC2, 0x98, 0xD8, 0x45, 0x39, 0xA1, 0xF4 ),
196 BYTES_TO_T_UINT_8( 0xA0, 0x33, 0xEB, 0x2D, 0x81, 0x7D, 0x03, 0x77 ),
197 BYTES_TO_T_UINT_8( 0xF2, 0x40, 0xA4, 0x63, 0xE5, 0xE6, 0xBC, 0xF8 ),
198 BYTES_TO_T_UINT_8( 0x47, 0x42, 0x2C, 0xE1, 0xF2, 0xD1, 0x17, 0x6B ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100199};
200static t_uint secp256r1_gy[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100201 BYTES_TO_T_UINT_8( 0xF5, 0x51, 0xBF, 0x37, 0x68, 0x40, 0xB6, 0xCB ),
202 BYTES_TO_T_UINT_8( 0xCE, 0x5E, 0x31, 0x6B, 0x57, 0x33, 0xCE, 0x2B ),
203 BYTES_TO_T_UINT_8( 0x16, 0x9E, 0x0F, 0x7C, 0x4A, 0xEB, 0xE7, 0x8E ),
204 BYTES_TO_T_UINT_8( 0x9B, 0x7F, 0x1A, 0xFE, 0xE2, 0x42, 0xE3, 0x4F ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100205};
206static t_uint secp256r1_n[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100207 BYTES_TO_T_UINT_8( 0x51, 0x25, 0x63, 0xFC, 0xC2, 0xCA, 0xB9, 0xF3 ),
208 BYTES_TO_T_UINT_8( 0x84, 0x9E, 0x17, 0xA7, 0xAD, 0xFA, 0xE6, 0xBC ),
209 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
210 BYTES_TO_T_UINT_8( 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0xFF ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100211};
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100212#endif /* POLARSSL_ECP_DP_SECP256R1_ENABLED */
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100213
214/*
215 * Domain parameters for secp384r1
216 */
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100217#if defined(POLARSSL_ECP_DP_SECP384R1_ENABLED)
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100218static t_uint secp384r1_p[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100219 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0x00, 0x00, 0x00, 0x00 ),
220 BYTES_TO_T_UINT_8( 0x00, 0x00, 0x00, 0x00, 0xFF, 0xFF, 0xFF, 0xFF ),
221 BYTES_TO_T_UINT_8( 0xFE, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
222 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
223 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
224 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100225};
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100226static t_uint secp384r1_b[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100227 BYTES_TO_T_UINT_8( 0xEF, 0x2A, 0xEC, 0xD3, 0xED, 0xC8, 0x85, 0x2A ),
228 BYTES_TO_T_UINT_8( 0x9D, 0xD1, 0x2E, 0x8A, 0x8D, 0x39, 0x56, 0xC6 ),
229 BYTES_TO_T_UINT_8( 0x5A, 0x87, 0x13, 0x50, 0x8F, 0x08, 0x14, 0x03 ),
230 BYTES_TO_T_UINT_8( 0x12, 0x41, 0x81, 0xFE, 0x6E, 0x9C, 0x1D, 0x18 ),
231 BYTES_TO_T_UINT_8( 0x19, 0x2D, 0xF8, 0xE3, 0x6B, 0x05, 0x8E, 0x98 ),
232 BYTES_TO_T_UINT_8( 0xE4, 0xE7, 0x3E, 0xE2, 0xA7, 0x2F, 0x31, 0xB3 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100233};
234static t_uint secp384r1_gx[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100235 BYTES_TO_T_UINT_8( 0xB7, 0x0A, 0x76, 0x72, 0x38, 0x5E, 0x54, 0x3A ),
236 BYTES_TO_T_UINT_8( 0x6C, 0x29, 0x55, 0xBF, 0x5D, 0xF2, 0x02, 0x55 ),
237 BYTES_TO_T_UINT_8( 0x38, 0x2A, 0x54, 0x82, 0xE0, 0x41, 0xF7, 0x59 ),
238 BYTES_TO_T_UINT_8( 0x98, 0x9B, 0xA7, 0x8B, 0x62, 0x3B, 0x1D, 0x6E ),
239 BYTES_TO_T_UINT_8( 0x74, 0xAD, 0x20, 0xF3, 0x1E, 0xC7, 0xB1, 0x8E ),
240 BYTES_TO_T_UINT_8( 0x37, 0x05, 0x8B, 0xBE, 0x22, 0xCA, 0x87, 0xAA ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100241};
242static t_uint secp384r1_gy[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100243 BYTES_TO_T_UINT_8( 0x5F, 0x0E, 0xEA, 0x90, 0x7C, 0x1D, 0x43, 0x7A ),
244 BYTES_TO_T_UINT_8( 0x9D, 0x81, 0x7E, 0x1D, 0xCE, 0xB1, 0x60, 0x0A ),
245 BYTES_TO_T_UINT_8( 0xC0, 0xB8, 0xF0, 0xB5, 0x13, 0x31, 0xDA, 0xE9 ),
246 BYTES_TO_T_UINT_8( 0x7C, 0x14, 0x9A, 0x28, 0xBD, 0x1D, 0xF4, 0xF8 ),
247 BYTES_TO_T_UINT_8( 0x29, 0xDC, 0x92, 0x92, 0xBF, 0x98, 0x9E, 0x5D ),
248 BYTES_TO_T_UINT_8( 0x6F, 0x2C, 0x26, 0x96, 0x4A, 0xDE, 0x17, 0x36 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100249};
250static t_uint secp384r1_n[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100251 BYTES_TO_T_UINT_8( 0x73, 0x29, 0xC5, 0xCC, 0x6A, 0x19, 0xEC, 0xEC ),
252 BYTES_TO_T_UINT_8( 0x7A, 0xA7, 0xB0, 0x48, 0xB2, 0x0D, 0x1A, 0x58 ),
253 BYTES_TO_T_UINT_8( 0xDF, 0x2D, 0x37, 0xF4, 0x81, 0x4D, 0x63, 0xC7 ),
254 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
255 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
256 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100257};
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100258#endif /* POLARSSL_ECP_DP_SECP384R1_ENABLED */
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100259
260/*
261 * Domain parameters for secp521r1
262 */
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100263#if defined(POLARSSL_ECP_DP_SECP521R1_ENABLED)
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100264static t_uint secp521r1_p[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100265 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
266 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
267 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
268 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
269 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
270 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
271 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
272 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +0100273 BYTES_TO_T_UINT_2( 0xFF, 0x01 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100274};
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100275static t_uint secp521r1_b[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100276 BYTES_TO_T_UINT_8( 0x00, 0x3F, 0x50, 0x6B, 0xD4, 0x1F, 0x45, 0xEF ),
277 BYTES_TO_T_UINT_8( 0xF1, 0x34, 0x2C, 0x3D, 0x88, 0xDF, 0x73, 0x35 ),
278 BYTES_TO_T_UINT_8( 0x07, 0xBF, 0xB1, 0x3B, 0xBD, 0xC0, 0x52, 0x16 ),
279 BYTES_TO_T_UINT_8( 0x7B, 0x93, 0x7E, 0xEC, 0x51, 0x39, 0x19, 0x56 ),
280 BYTES_TO_T_UINT_8( 0xE1, 0x09, 0xF1, 0x8E, 0x91, 0x89, 0xB4, 0xB8 ),
281 BYTES_TO_T_UINT_8( 0xF3, 0x15, 0xB3, 0x99, 0x5B, 0x72, 0xDA, 0xA2 ),
282 BYTES_TO_T_UINT_8( 0xEE, 0x40, 0x85, 0xB6, 0xA0, 0x21, 0x9A, 0x92 ),
283 BYTES_TO_T_UINT_8( 0x1F, 0x9A, 0x1C, 0x8E, 0x61, 0xB9, 0x3E, 0x95 ),
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +0100284 BYTES_TO_T_UINT_2( 0x51, 0x00 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100285};
286static t_uint secp521r1_gx[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100287 BYTES_TO_T_UINT_8( 0x66, 0xBD, 0xE5, 0xC2, 0x31, 0x7E, 0x7E, 0xF9 ),
288 BYTES_TO_T_UINT_8( 0x9B, 0x42, 0x6A, 0x85, 0xC1, 0xB3, 0x48, 0x33 ),
289 BYTES_TO_T_UINT_8( 0xDE, 0xA8, 0xFF, 0xA2, 0x27, 0xC1, 0x1D, 0xFE ),
290 BYTES_TO_T_UINT_8( 0x28, 0x59, 0xE7, 0xEF, 0x77, 0x5E, 0x4B, 0xA1 ),
291 BYTES_TO_T_UINT_8( 0xBA, 0x3D, 0x4D, 0x6B, 0x60, 0xAF, 0x28, 0xF8 ),
292 BYTES_TO_T_UINT_8( 0x21, 0xB5, 0x3F, 0x05, 0x39, 0x81, 0x64, 0x9C ),
293 BYTES_TO_T_UINT_8( 0x42, 0xB4, 0x95, 0x23, 0x66, 0xCB, 0x3E, 0x9E ),
294 BYTES_TO_T_UINT_8( 0xCD, 0xE9, 0x04, 0x04, 0xB7, 0x06, 0x8E, 0x85 ),
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +0100295 BYTES_TO_T_UINT_2( 0xC6, 0x00 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100296};
297static t_uint secp521r1_gy[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100298 BYTES_TO_T_UINT_8( 0x50, 0x66, 0xD1, 0x9F, 0x76, 0x94, 0xBE, 0x88 ),
299 BYTES_TO_T_UINT_8( 0x40, 0xC2, 0x72, 0xA2, 0x86, 0x70, 0x3C, 0x35 ),
300 BYTES_TO_T_UINT_8( 0x61, 0x07, 0xAD, 0x3F, 0x01, 0xB9, 0x50, 0xC5 ),
301 BYTES_TO_T_UINT_8( 0x40, 0x26, 0xF4, 0x5E, 0x99, 0x72, 0xEE, 0x97 ),
302 BYTES_TO_T_UINT_8( 0x2C, 0x66, 0x3E, 0x27, 0x17, 0xBD, 0xAF, 0x17 ),
303 BYTES_TO_T_UINT_8( 0x68, 0x44, 0x9B, 0x57, 0x49, 0x44, 0xF5, 0x98 ),
304 BYTES_TO_T_UINT_8( 0xD9, 0x1B, 0x7D, 0x2C, 0xB4, 0x5F, 0x8A, 0x5C ),
305 BYTES_TO_T_UINT_8( 0x04, 0xC0, 0x3B, 0x9A, 0x78, 0x6A, 0x29, 0x39 ),
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +0100306 BYTES_TO_T_UINT_2( 0x18, 0x01 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100307};
308static t_uint secp521r1_n[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100309 BYTES_TO_T_UINT_8( 0x09, 0x64, 0x38, 0x91, 0x1E, 0xB7, 0x6F, 0xBB ),
310 BYTES_TO_T_UINT_8( 0xAE, 0x47, 0x9C, 0x89, 0xB8, 0xC9, 0xB5, 0x3B ),
311 BYTES_TO_T_UINT_8( 0xD0, 0xA5, 0x09, 0xF7, 0x48, 0x01, 0xCC, 0x7F ),
312 BYTES_TO_T_UINT_8( 0x6B, 0x96, 0x2F, 0xBF, 0x83, 0x87, 0x86, 0x51 ),
313 BYTES_TO_T_UINT_8( 0xFA, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
314 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
315 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
316 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
Manuel Pégourié-Gonnard14a96c52013-12-11 12:15:28 +0100317 BYTES_TO_T_UINT_2( 0xFF, 0x01 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100318};
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100319#endif /* POLARSSL_ECP_DP_SECP521R1_ENABLED */
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100320
Manuel Pégourié-Gonnard18e3ec92014-01-11 15:22:07 +0100321#if defined(POLARSSL_ECP_DP_SECP224K1_ENABLED)
322static t_uint secp224k1_p[] = {
323 BYTES_TO_T_UINT_8( 0x6D, 0xE5, 0xFF, 0xFF, 0xFE, 0xFF, 0xFF, 0xFF ),
324 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
325 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
326 BYTES_TO_T_UINT_4( 0xFF, 0xFF, 0xFF, 0xFF ),
327};
328static t_uint secp224k1_a[] = {
329 BYTES_TO_T_UINT_2( 0x00, 0x00 ),
330};
331static t_uint secp224k1_b[] = {
332 BYTES_TO_T_UINT_2( 0x05, 0x00 ),
333};
334static t_uint secp224k1_gx[] = {
335 BYTES_TO_T_UINT_8( 0x5C, 0xA4, 0xB7, 0xB6, 0x0E, 0x65, 0x7E, 0x0F ),
336 BYTES_TO_T_UINT_8( 0xA9, 0x75, 0x70, 0xE4, 0xE9, 0x67, 0xA4, 0x69 ),
337 BYTES_TO_T_UINT_8( 0xA1, 0x28, 0xFC, 0x30, 0xDF, 0x99, 0xF0, 0x4D ),
338 BYTES_TO_T_UINT_4( 0x33, 0x5B, 0x45, 0xA1 ),
339};
340static t_uint secp224k1_gy[] = {
341 BYTES_TO_T_UINT_8( 0xA5, 0x61, 0x6D, 0x55, 0xDB, 0x4B, 0xCA, 0xE2 ),
342 BYTES_TO_T_UINT_8( 0x59, 0xBD, 0xB0, 0xC0, 0xF7, 0x19, 0xE3, 0xF7 ),
343 BYTES_TO_T_UINT_8( 0xD6, 0xFB, 0xCA, 0x82, 0x42, 0x34, 0xBA, 0x7F ),
344 BYTES_TO_T_UINT_4( 0xED, 0x9F, 0x08, 0x7E ),
345};
346static t_uint secp224k1_n[] = {
347 BYTES_TO_T_UINT_8( 0xF7, 0xB1, 0x9F, 0x76, 0x71, 0xA9, 0xF0, 0xCA ),
348 BYTES_TO_T_UINT_8( 0x84, 0x61, 0xEC, 0xD2, 0xE8, 0xDC, 0x01, 0x00 ),
349 BYTES_TO_T_UINT_8( 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 ),
350 BYTES_TO_T_UINT_8( 0x00, 0x00, 0x00, 0x00, 0x01, 0x00, 0x00, 0x00 ),
351};
352#endif /* POLARSSL_ECP_DP_SECP224K1_ENABLED */
353
Manuel Pégourié-Gonnardf51c8fc2014-01-10 18:17:18 +0100354#if defined(POLARSSL_ECP_DP_SECP256K1_ENABLED)
355static t_uint secp256k1_p[] = {
356 BYTES_TO_T_UINT_8( 0x2F, 0xFC, 0xFF, 0xFF, 0xFE, 0xFF, 0xFF, 0xFF ),
357 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
358 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
359 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
360};
361static t_uint secp256k1_a[] = {
362 BYTES_TO_T_UINT_2( 0x00, 0x00 ),
363};
364static t_uint secp256k1_b[] = {
365 BYTES_TO_T_UINT_2( 0x07, 0x00 ),
366};
367static t_uint secp256k1_gx[] = {
368 BYTES_TO_T_UINT_8( 0x98, 0x17, 0xF8, 0x16, 0x5B, 0x81, 0xF2, 0x59 ),
369 BYTES_TO_T_UINT_8( 0xD9, 0x28, 0xCE, 0x2D, 0xDB, 0xFC, 0x9B, 0x02 ),
370 BYTES_TO_T_UINT_8( 0x07, 0x0B, 0x87, 0xCE, 0x95, 0x62, 0xA0, 0x55 ),
371 BYTES_TO_T_UINT_8( 0xAC, 0xBB, 0xDC, 0xF9, 0x7E, 0x66, 0xBE, 0x79 ),
372};
373static t_uint secp256k1_gy[] = {
374 BYTES_TO_T_UINT_8( 0xB8, 0xD4, 0x10, 0xFB, 0x8F, 0xD0, 0x47, 0x9C ),
375 BYTES_TO_T_UINT_8( 0x19, 0x54, 0x85, 0xA6, 0x48, 0xB4, 0x17, 0xFD ),
376 BYTES_TO_T_UINT_8( 0xA8, 0x08, 0x11, 0x0E, 0xFC, 0xFB, 0xA4, 0x5D ),
377 BYTES_TO_T_UINT_8( 0x65, 0xC4, 0xA3, 0x26, 0x77, 0xDA, 0x3A, 0x48 ),
378};
379static t_uint secp256k1_n[] = {
380 BYTES_TO_T_UINT_8( 0x41, 0x41, 0x36, 0xD0, 0x8C, 0x5E, 0xD2, 0xBF ),
381 BYTES_TO_T_UINT_8( 0x3B, 0xA0, 0x48, 0xAF, 0xE6, 0xDC, 0xAE, 0xBA ),
382 BYTES_TO_T_UINT_8( 0xFE, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
383 BYTES_TO_T_UINT_8( 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF ),
384};
385#endif /* POLARSSL_ECP_DP_SECP256K1_ENABLED */
386
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100387/*
388 * Domain parameters for brainpoolP256r1 (RFC 5639 3.4)
389 */
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100390#if defined(POLARSSL_ECP_DP_BP256R1_ENABLED)
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100391static t_uint brainpoolP256r1_p[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100392 BYTES_TO_T_UINT_8( 0x77, 0x53, 0x6E, 0x1F, 0x1D, 0x48, 0x13, 0x20 ),
393 BYTES_TO_T_UINT_8( 0x28, 0x20, 0x26, 0xD5, 0x23, 0xF6, 0x3B, 0x6E ),
394 BYTES_TO_T_UINT_8( 0x72, 0x8D, 0x83, 0x9D, 0x90, 0x0A, 0x66, 0x3E ),
395 BYTES_TO_T_UINT_8( 0xBC, 0xA9, 0xEE, 0xA1, 0xDB, 0x57, 0xFB, 0xA9 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100396};
397static t_uint brainpoolP256r1_a[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100398 BYTES_TO_T_UINT_8( 0xD9, 0xB5, 0x30, 0xF3, 0x44, 0x4B, 0x4A, 0xE9 ),
399 BYTES_TO_T_UINT_8( 0x6C, 0x5C, 0xDC, 0x26, 0xC1, 0x55, 0x80, 0xFB ),
400 BYTES_TO_T_UINT_8( 0xE7, 0xFF, 0x7A, 0x41, 0x30, 0x75, 0xF6, 0xEE ),
401 BYTES_TO_T_UINT_8( 0x57, 0x30, 0x2C, 0xFC, 0x75, 0x09, 0x5A, 0x7D ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100402};
403static t_uint brainpoolP256r1_b[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100404 BYTES_TO_T_UINT_8( 0xB6, 0x07, 0x8C, 0xFF, 0x18, 0xDC, 0xCC, 0x6B ),
405 BYTES_TO_T_UINT_8( 0xCE, 0xE1, 0xF7, 0x5C, 0x29, 0x16, 0x84, 0x95 ),
406 BYTES_TO_T_UINT_8( 0xBF, 0x7C, 0xD7, 0xBB, 0xD9, 0xB5, 0x30, 0xF3 ),
407 BYTES_TO_T_UINT_8( 0x44, 0x4B, 0x4A, 0xE9, 0x6C, 0x5C, 0xDC, 0x26 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100408};
409static t_uint brainpoolP256r1_gx[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100410 BYTES_TO_T_UINT_8( 0x62, 0x32, 0xCE, 0x9A, 0xBD, 0x53, 0x44, 0x3A ),
411 BYTES_TO_T_UINT_8( 0xC2, 0x23, 0xBD, 0xE3, 0xE1, 0x27, 0xDE, 0xB9 ),
412 BYTES_TO_T_UINT_8( 0xAF, 0xB7, 0x81, 0xFC, 0x2F, 0x48, 0x4B, 0x2C ),
413 BYTES_TO_T_UINT_8( 0xCB, 0x57, 0x7E, 0xCB, 0xB9, 0xAE, 0xD2, 0x8B ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100414};
415static t_uint brainpoolP256r1_gy[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100416 BYTES_TO_T_UINT_8( 0x97, 0x69, 0x04, 0x2F, 0xC7, 0x54, 0x1D, 0x5C ),
417 BYTES_TO_T_UINT_8( 0x54, 0x8E, 0xED, 0x2D, 0x13, 0x45, 0x77, 0xC2 ),
418 BYTES_TO_T_UINT_8( 0xC9, 0x1D, 0x61, 0x14, 0x1A, 0x46, 0xF8, 0x97 ),
419 BYTES_TO_T_UINT_8( 0xFD, 0xC4, 0xDA, 0xC3, 0x35, 0xF8, 0x7E, 0x54 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100420};
421static t_uint brainpoolP256r1_n[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100422 BYTES_TO_T_UINT_8( 0xA7, 0x56, 0x48, 0x97, 0x82, 0x0E, 0x1E, 0x90 ),
423 BYTES_TO_T_UINT_8( 0xF7, 0xA6, 0x61, 0xB5, 0xA3, 0x7A, 0x39, 0x8C ),
424 BYTES_TO_T_UINT_8( 0x71, 0x8D, 0x83, 0x9D, 0x90, 0x0A, 0x66, 0x3E ),
425 BYTES_TO_T_UINT_8( 0xBC, 0xA9, 0xEE, 0xA1, 0xDB, 0x57, 0xFB, 0xA9 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100426};
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100427#endif /* POLARSSL_ECP_DP_BP256R1_ENABLED */
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100428
429/*
430 * Domain parameters for brainpoolP384r1 (RFC 5639 3.6)
431 */
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100432#if defined(POLARSSL_ECP_DP_BP384R1_ENABLED)
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100433static t_uint brainpoolP384r1_p[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100434 BYTES_TO_T_UINT_8( 0x53, 0xEC, 0x07, 0x31, 0x13, 0x00, 0x47, 0x87 ),
435 BYTES_TO_T_UINT_8( 0x71, 0x1A, 0x1D, 0x90, 0x29, 0xA7, 0xD3, 0xAC ),
436 BYTES_TO_T_UINT_8( 0x23, 0x11, 0xB7, 0x7F, 0x19, 0xDA, 0xB1, 0x12 ),
437 BYTES_TO_T_UINT_8( 0xB4, 0x56, 0x54, 0xED, 0x09, 0x71, 0x2F, 0x15 ),
438 BYTES_TO_T_UINT_8( 0xDF, 0x41, 0xE6, 0x50, 0x7E, 0x6F, 0x5D, 0x0F ),
439 BYTES_TO_T_UINT_8( 0x28, 0x6D, 0x38, 0xA3, 0x82, 0x1E, 0xB9, 0x8C ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100440};
441static t_uint brainpoolP384r1_a[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100442 BYTES_TO_T_UINT_8( 0x26, 0x28, 0xCE, 0x22, 0xDD, 0xC7, 0xA8, 0x04 ),
443 BYTES_TO_T_UINT_8( 0xEB, 0xD4, 0x3A, 0x50, 0x4A, 0x81, 0xA5, 0x8A ),
444 BYTES_TO_T_UINT_8( 0x0F, 0xF9, 0x91, 0xBA, 0xEF, 0x65, 0x91, 0x13 ),
445 BYTES_TO_T_UINT_8( 0x87, 0x27, 0xB2, 0x4F, 0x8E, 0xA2, 0xBE, 0xC2 ),
446 BYTES_TO_T_UINT_8( 0xA0, 0xAF, 0x05, 0xCE, 0x0A, 0x08, 0x72, 0x3C ),
447 BYTES_TO_T_UINT_8( 0x0C, 0x15, 0x8C, 0x3D, 0xC6, 0x82, 0xC3, 0x7B ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100448};
449static t_uint brainpoolP384r1_b[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100450 BYTES_TO_T_UINT_8( 0x11, 0x4C, 0x50, 0xFA, 0x96, 0x86, 0xB7, 0x3A ),
451 BYTES_TO_T_UINT_8( 0x94, 0xC9, 0xDB, 0x95, 0x02, 0x39, 0xB4, 0x7C ),
452 BYTES_TO_T_UINT_8( 0xD5, 0x62, 0xEB, 0x3E, 0xA5, 0x0E, 0x88, 0x2E ),
453 BYTES_TO_T_UINT_8( 0xA6, 0xD2, 0xDC, 0x07, 0xE1, 0x7D, 0xB7, 0x2F ),
454 BYTES_TO_T_UINT_8( 0x7C, 0x44, 0xF0, 0x16, 0x54, 0xB5, 0x39, 0x8B ),
455 BYTES_TO_T_UINT_8( 0x26, 0x28, 0xCE, 0x22, 0xDD, 0xC7, 0xA8, 0x04 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100456};
457static t_uint brainpoolP384r1_gx[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100458 BYTES_TO_T_UINT_8( 0x1E, 0xAF, 0xD4, 0x47, 0xE2, 0xB2, 0x87, 0xEF ),
459 BYTES_TO_T_UINT_8( 0xAA, 0x46, 0xD6, 0x36, 0x34, 0xE0, 0x26, 0xE8 ),
460 BYTES_TO_T_UINT_8( 0xE8, 0x10, 0xBD, 0x0C, 0xFE, 0xCA, 0x7F, 0xDB ),
461 BYTES_TO_T_UINT_8( 0xE3, 0x4F, 0xF1, 0x7E, 0xE7, 0xA3, 0x47, 0x88 ),
462 BYTES_TO_T_UINT_8( 0x6B, 0x3F, 0xC1, 0xB7, 0x81, 0x3A, 0xA6, 0xA2 ),
463 BYTES_TO_T_UINT_8( 0xFF, 0x45, 0xCF, 0x68, 0xF0, 0x64, 0x1C, 0x1D ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100464};
465static t_uint brainpoolP384r1_gy[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100466 BYTES_TO_T_UINT_8( 0x15, 0x53, 0x3C, 0x26, 0x41, 0x03, 0x82, 0x42 ),
467 BYTES_TO_T_UINT_8( 0x11, 0x81, 0x91, 0x77, 0x21, 0x46, 0x46, 0x0E ),
468 BYTES_TO_T_UINT_8( 0x28, 0x29, 0x91, 0xF9, 0x4F, 0x05, 0x9C, 0xE1 ),
469 BYTES_TO_T_UINT_8( 0x64, 0x58, 0xEC, 0xFE, 0x29, 0x0B, 0xB7, 0x62 ),
470 BYTES_TO_T_UINT_8( 0x52, 0xD5, 0xCF, 0x95, 0x8E, 0xEB, 0xB1, 0x5C ),
471 BYTES_TO_T_UINT_8( 0xA4, 0xC2, 0xF9, 0x20, 0x75, 0x1D, 0xBE, 0x8A ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100472};
473static t_uint brainpoolP384r1_n[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100474 BYTES_TO_T_UINT_8( 0x65, 0x65, 0x04, 0xE9, 0x02, 0x32, 0x88, 0x3B ),
475 BYTES_TO_T_UINT_8( 0x10, 0xC3, 0x7F, 0x6B, 0xAF, 0xB6, 0x3A, 0xCF ),
476 BYTES_TO_T_UINT_8( 0xA7, 0x25, 0x04, 0xAC, 0x6C, 0x6E, 0x16, 0x1F ),
477 BYTES_TO_T_UINT_8( 0xB3, 0x56, 0x54, 0xED, 0x09, 0x71, 0x2F, 0x15 ),
478 BYTES_TO_T_UINT_8( 0xDF, 0x41, 0xE6, 0x50, 0x7E, 0x6F, 0x5D, 0x0F ),
479 BYTES_TO_T_UINT_8( 0x28, 0x6D, 0x38, 0xA3, 0x82, 0x1E, 0xB9, 0x8C ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100480};
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100481#endif /* POLARSSL_ECP_DP_BP384R1_ENABLED */
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100482
483/*
484 * Domain parameters for brainpoolP512r1 (RFC 5639 3.7)
485 */
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100486#if defined(POLARSSL_ECP_DP_BP512R1_ENABLED)
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100487static t_uint brainpoolP512r1_p[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100488 BYTES_TO_T_UINT_8( 0xF3, 0x48, 0x3A, 0x58, 0x56, 0x60, 0xAA, 0x28 ),
489 BYTES_TO_T_UINT_8( 0x85, 0xC6, 0x82, 0x2D, 0x2F, 0xFF, 0x81, 0x28 ),
490 BYTES_TO_T_UINT_8( 0xE6, 0x80, 0xA3, 0xE6, 0x2A, 0xA1, 0xCD, 0xAE ),
491 BYTES_TO_T_UINT_8( 0x42, 0x68, 0xC6, 0x9B, 0x00, 0x9B, 0x4D, 0x7D ),
492 BYTES_TO_T_UINT_8( 0x71, 0x08, 0x33, 0x70, 0xCA, 0x9C, 0x63, 0xD6 ),
493 BYTES_TO_T_UINT_8( 0x0E, 0xD2, 0xC9, 0xB3, 0xB3, 0x8D, 0x30, 0xCB ),
494 BYTES_TO_T_UINT_8( 0x07, 0xFC, 0xC9, 0x33, 0xAE, 0xE6, 0xD4, 0x3F ),
495 BYTES_TO_T_UINT_8( 0x8B, 0xC4, 0xE9, 0xDB, 0xB8, 0x9D, 0xDD, 0xAA ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100496};
497static t_uint brainpoolP512r1_a[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100498 BYTES_TO_T_UINT_8( 0xCA, 0x94, 0xFC, 0x77, 0x4D, 0xAC, 0xC1, 0xE7 ),
499 BYTES_TO_T_UINT_8( 0xB9, 0xC7, 0xF2, 0x2B, 0xA7, 0x17, 0x11, 0x7F ),
500 BYTES_TO_T_UINT_8( 0xB5, 0xC8, 0x9A, 0x8B, 0xC9, 0xF1, 0x2E, 0x0A ),
501 BYTES_TO_T_UINT_8( 0xA1, 0x3A, 0x25, 0xA8, 0x5A, 0x5D, 0xED, 0x2D ),
502 BYTES_TO_T_UINT_8( 0xBC, 0x63, 0x98, 0xEA, 0xCA, 0x41, 0x34, 0xA8 ),
503 BYTES_TO_T_UINT_8( 0x10, 0x16, 0xF9, 0x3D, 0x8D, 0xDD, 0xCB, 0x94 ),
504 BYTES_TO_T_UINT_8( 0xC5, 0x4C, 0x23, 0xAC, 0x45, 0x71, 0x32, 0xE2 ),
505 BYTES_TO_T_UINT_8( 0x89, 0x3B, 0x60, 0x8B, 0x31, 0xA3, 0x30, 0x78 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100506};
507static t_uint brainpoolP512r1_b[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100508 BYTES_TO_T_UINT_8( 0x23, 0xF7, 0x16, 0x80, 0x63, 0xBD, 0x09, 0x28 ),
509 BYTES_TO_T_UINT_8( 0xDD, 0xE5, 0xBA, 0x5E, 0xB7, 0x50, 0x40, 0x98 ),
510 BYTES_TO_T_UINT_8( 0x67, 0x3E, 0x08, 0xDC, 0xCA, 0x94, 0xFC, 0x77 ),
511 BYTES_TO_T_UINT_8( 0x4D, 0xAC, 0xC1, 0xE7, 0xB9, 0xC7, 0xF2, 0x2B ),
512 BYTES_TO_T_UINT_8( 0xA7, 0x17, 0x11, 0x7F, 0xB5, 0xC8, 0x9A, 0x8B ),
513 BYTES_TO_T_UINT_8( 0xC9, 0xF1, 0x2E, 0x0A, 0xA1, 0x3A, 0x25, 0xA8 ),
514 BYTES_TO_T_UINT_8( 0x5A, 0x5D, 0xED, 0x2D, 0xBC, 0x63, 0x98, 0xEA ),
515 BYTES_TO_T_UINT_8( 0xCA, 0x41, 0x34, 0xA8, 0x10, 0x16, 0xF9, 0x3D ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100516};
517static t_uint brainpoolP512r1_gx[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100518 BYTES_TO_T_UINT_8( 0x22, 0xF8, 0xB9, 0xBC, 0x09, 0x22, 0x35, 0x8B ),
519 BYTES_TO_T_UINT_8( 0x68, 0x5E, 0x6A, 0x40, 0x47, 0x50, 0x6D, 0x7C ),
520 BYTES_TO_T_UINT_8( 0x5F, 0x7D, 0xB9, 0x93, 0x7B, 0x68, 0xD1, 0x50 ),
521 BYTES_TO_T_UINT_8( 0x8D, 0xD4, 0xD0, 0xE2, 0x78, 0x1F, 0x3B, 0xFF ),
522 BYTES_TO_T_UINT_8( 0x8E, 0x09, 0xD0, 0xF4, 0xEE, 0x62, 0x3B, 0xB4 ),
523 BYTES_TO_T_UINT_8( 0xC1, 0x16, 0xD9, 0xB5, 0x70, 0x9F, 0xED, 0x85 ),
524 BYTES_TO_T_UINT_8( 0x93, 0x6A, 0x4C, 0x9C, 0x2E, 0x32, 0x21, 0x5A ),
525 BYTES_TO_T_UINT_8( 0x64, 0xD9, 0x2E, 0xD8, 0xBD, 0xE4, 0xAE, 0x81 ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100526};
527static t_uint brainpoolP512r1_gy[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100528 BYTES_TO_T_UINT_8( 0x92, 0x08, 0xD8, 0x3A, 0x0F, 0x1E, 0xCD, 0x78 ),
529 BYTES_TO_T_UINT_8( 0x06, 0x54, 0xF0, 0xA8, 0x2F, 0x2B, 0xCA, 0xD1 ),
530 BYTES_TO_T_UINT_8( 0xAE, 0x63, 0x27, 0x8A, 0xD8, 0x4B, 0xCA, 0x5B ),
531 BYTES_TO_T_UINT_8( 0x5E, 0x48, 0x5F, 0x4A, 0x49, 0xDE, 0xDC, 0xB2 ),
532 BYTES_TO_T_UINT_8( 0x11, 0x81, 0x1F, 0x88, 0x5B, 0xC5, 0x00, 0xA0 ),
533 BYTES_TO_T_UINT_8( 0x1A, 0x7B, 0xA5, 0x24, 0x00, 0xF7, 0x09, 0xF2 ),
534 BYTES_TO_T_UINT_8( 0xFD, 0x22, 0x78, 0xCF, 0xA9, 0xBF, 0xEA, 0xC0 ),
535 BYTES_TO_T_UINT_8( 0xEC, 0x32, 0x63, 0x56, 0x5D, 0x38, 0xDE, 0x7D ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100536};
537static t_uint brainpoolP512r1_n[] = {
Manuel Pégourié-Gonnard95b45b72013-12-11 12:03:23 +0100538 BYTES_TO_T_UINT_8( 0x69, 0x00, 0xA9, 0x9C, 0x82, 0x96, 0x87, 0xB5 ),
539 BYTES_TO_T_UINT_8( 0xDD, 0xDA, 0x5D, 0x08, 0x81, 0xD3, 0xB1, 0x1D ),
540 BYTES_TO_T_UINT_8( 0x47, 0x10, 0xAC, 0x7F, 0x19, 0x61, 0x86, 0x41 ),
541 BYTES_TO_T_UINT_8( 0x19, 0x26, 0xA9, 0x4C, 0x41, 0x5C, 0x3E, 0x55 ),
542 BYTES_TO_T_UINT_8( 0x70, 0x08, 0x33, 0x70, 0xCA, 0x9C, 0x63, 0xD6 ),
543 BYTES_TO_T_UINT_8( 0x0E, 0xD2, 0xC9, 0xB3, 0xB3, 0x8D, 0x30, 0xCB ),
544 BYTES_TO_T_UINT_8( 0x07, 0xFC, 0xC9, 0x33, 0xAE, 0xE6, 0xD4, 0x3F ),
545 BYTES_TO_T_UINT_8( 0x8B, 0xC4, 0xE9, 0xDB, 0xB8, 0x9D, 0xDD, 0xAA ),
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100546};
Manuel Pégourié-Gonnardbaee5d42013-12-06 13:38:41 +0100547#endif /* POLARSSL_ECP_DP_BP512R1_ENABLED */
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100548
549/*
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100550 * Create an MPI from embedded constants
551 * (assumes len is an exact multiple of sizeof t_uint)
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100552 */
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100553static inline void ecp_mpi_load( mpi *X, const t_uint *p, size_t len )
554{
555 X->s = 1;
556 X->n = len / sizeof( t_uint );
557 X->p = (t_uint *) p;
558}
559
560/*
Manuel Pégourié-Gonnard73cc01d2013-12-06 12:41:30 +0100561 * Set an MPI to static value 1
562 */
563static inline void ecp_mpi_set1( mpi *X )
564{
565 static t_uint one[] = { 1 };
566 X->s = 1;
567 X->n = 1;
568 X->p = one;
569}
570
571/*
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100572 * Make group available from embedded constants
573 */
574static int ecp_group_load( ecp_group *grp,
575 const t_uint *p, size_t plen,
576 const t_uint *a, size_t alen,
577 const t_uint *b, size_t blen,
578 const t_uint *gx, size_t gxlen,
579 const t_uint *gy, size_t gylen,
580 const t_uint *n, size_t nlen)
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100581{
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100582 ecp_mpi_load( &grp->P, p, plen );
Manuel Pégourié-Gonnard9854fe92013-12-02 16:30:43 +0100583 if( a != NULL )
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100584 ecp_mpi_load( &grp->A, a, alen );
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100585 ecp_mpi_load( &grp->B, b, blen );
586 ecp_mpi_load( &grp->N, n, nlen );
Manuel Pégourié-Gonnard9854fe92013-12-02 16:30:43 +0100587
Manuel Pégourié-Gonnard731d08b2013-12-06 12:16:10 +0100588 ecp_mpi_load( &grp->G.X, gx, gxlen );
589 ecp_mpi_load( &grp->G.Y, gy, gylen );
Manuel Pégourié-Gonnard73cc01d2013-12-06 12:41:30 +0100590 ecp_mpi_set1( &grp->G.Z );
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100591
592 grp->pbits = mpi_msb( &grp->P );
593 grp->nbits = mpi_msb( &grp->N );
594
Manuel Pégourié-Gonnard1f82b042013-12-06 12:51:50 +0100595 grp->h = 1;
596
Manuel Pégourié-Gonnard73cc01d2013-12-06 12:41:30 +0100597 return( 0 );
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100598}
599
600#if defined(POLARSSL_ECP_NIST_OPTIM)
601/* Forward declarations */
Manuel Pégourié-Gonnard3d7053a2013-12-04 20:51:13 +0100602#if defined(POLARSSL_ECP_DP_SECP192R1_ENABLED)
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100603static int ecp_mod_p192( mpi * );
Manuel Pégourié-Gonnard3d7053a2013-12-04 20:51:13 +0100604#endif
605#if defined(POLARSSL_ECP_DP_SECP224R1_ENABLED)
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100606static int ecp_mod_p224( mpi * );
Manuel Pégourié-Gonnard3d7053a2013-12-04 20:51:13 +0100607#endif
608#if defined(POLARSSL_ECP_DP_SECP256R1_ENABLED)
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100609static int ecp_mod_p256( mpi * );
Manuel Pégourié-Gonnard3d7053a2013-12-04 20:51:13 +0100610#endif
611#if defined(POLARSSL_ECP_DP_SECP384R1_ENABLED)
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100612static int ecp_mod_p384( mpi * );
Manuel Pégourié-Gonnard3d7053a2013-12-04 20:51:13 +0100613#endif
614#if defined(POLARSSL_ECP_DP_SECP521R1_ENABLED)
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100615static int ecp_mod_p521( mpi * );
Manuel Pégourié-Gonnard3d7053a2013-12-04 20:51:13 +0100616#endif
617#if defined(POLARSSL_ECP_DP_M255_ENABLED)
618static int ecp_mod_p255( mpi * );
619#endif
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100620
621#define NIST_MODP( P ) grp->modp = ecp_mod_ ## P;
622#else
623#define NIST_MODP( P )
Manuel Pégourié-Gonnard3d7053a2013-12-04 20:51:13 +0100624#endif /* POLARSSL_ECP_NIST_OPTIM */
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100625
Manuel Pégourié-Gonnard81e1b102013-12-06 13:28:05 +0100626#define LOAD_GROUP_A( G ) ecp_group_load( grp, \
627 G ## _p, sizeof( G ## _p ), \
628 G ## _a, sizeof( G ## _a ), \
629 G ## _b, sizeof( G ## _b ), \
630 G ## _gx, sizeof( G ## _gx ), \
631 G ## _gy, sizeof( G ## _gy ), \
632 G ## _n, sizeof( G ## _n ) )
633
634#define LOAD_GROUP( G ) ecp_group_load( grp, \
635 G ## _p, sizeof( G ## _p ), \
636 NULL, 0, \
637 G ## _b, sizeof( G ## _b ), \
638 G ## _gx, sizeof( G ## _gx ), \
639 G ## _gy, sizeof( G ## _gy ), \
640 G ## _n, sizeof( G ## _n ) )
641
Paul Bakker0c0476f2013-12-19 16:20:53 +0100642#if defined(POLARSSL_ECP_DP_M255_ENABLED)
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100643/*
Manuel Pégourié-Gonnard66153662013-12-03 14:12:26 +0100644 * Specialized function for creating the Curve25519 group
645 */
646static int ecp_use_curve25519( ecp_group *grp )
647{
648 int ret;
649
650 /* Actually ( A + 2 ) / 4 */
651 MPI_CHK( mpi_read_string( &grp->A, 16, "01DB42" ) );
652
653 /* P = 2^255 - 19 */
654 MPI_CHK( mpi_lset( &grp->P, 1 ) );
655 MPI_CHK( mpi_shift_l( &grp->P, 255 ) );
656 MPI_CHK( mpi_sub_int( &grp->P, &grp->P, 19 ) );
657 grp->pbits = mpi_msb( &grp->P );
658
Manuel Pégourié-Gonnard312d2e82013-12-04 11:08:01 +0100659 /* Y intentionaly not set, since we use x/z coordinates.
660 * This is used as a marker to identify Montgomery curves! */
661 MPI_CHK( mpi_lset( &grp->G.X, 9 ) );
662 MPI_CHK( mpi_lset( &grp->G.Z, 1 ) );
663 mpi_free( &grp->G.Y );
664
Manuel Pégourié-Gonnard66153662013-12-03 14:12:26 +0100665 /* Actually, the required msb for private keys */
666 grp->nbits = 254;
667
668cleanup:
669 if( ret != 0 )
670 ecp_group_free( grp );
671
672 return( ret );
673}
Paul Bakker0c0476f2013-12-19 16:20:53 +0100674#endif /* POLARSSL_ECP_DP_M255_ENABLED */
Manuel Pégourié-Gonnard66153662013-12-03 14:12:26 +0100675
676/*
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100677 * Set a group using well-known domain parameters
678 */
679int ecp_use_known_dp( ecp_group *grp, ecp_group_id id )
680{
Manuel Pégourié-Gonnard66153662013-12-03 14:12:26 +0100681 ecp_group_free( grp );
682
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100683 grp->id = id;
684
685 switch( id )
686 {
687#if defined(POLARSSL_ECP_DP_SECP192R1_ENABLED)
688 case POLARSSL_ECP_DP_SECP192R1:
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100689 NIST_MODP( p192 );
Manuel Pégourié-Gonnard9854fe92013-12-02 16:30:43 +0100690 return( LOAD_GROUP( secp192r1 ) );
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100691#endif /* POLARSSL_ECP_DP_SECP192R1_ENABLED */
692
693#if defined(POLARSSL_ECP_DP_SECP224R1_ENABLED)
694 case POLARSSL_ECP_DP_SECP224R1:
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100695 NIST_MODP( p224 );
Manuel Pégourié-Gonnard9854fe92013-12-02 16:30:43 +0100696 return( LOAD_GROUP( secp224r1 ) );
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100697#endif /* POLARSSL_ECP_DP_SECP224R1_ENABLED */
698
699#if defined(POLARSSL_ECP_DP_SECP256R1_ENABLED)
700 case POLARSSL_ECP_DP_SECP256R1:
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100701 NIST_MODP( p256 );
Manuel Pégourié-Gonnard9854fe92013-12-02 16:30:43 +0100702 return( LOAD_GROUP( secp256r1 ) );
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100703#endif /* POLARSSL_ECP_DP_SECP256R1_ENABLED */
704
705#if defined(POLARSSL_ECP_DP_SECP384R1_ENABLED)
706 case POLARSSL_ECP_DP_SECP384R1:
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100707 NIST_MODP( p384 );
Manuel Pégourié-Gonnard9854fe92013-12-02 16:30:43 +0100708 return( LOAD_GROUP( secp384r1 ) );
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100709#endif /* POLARSSL_ECP_DP_SECP384R1_ENABLED */
710
711#if defined(POLARSSL_ECP_DP_SECP521R1_ENABLED)
712 case POLARSSL_ECP_DP_SECP521R1:
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100713 NIST_MODP( p521 );
Manuel Pégourié-Gonnard9854fe92013-12-02 16:30:43 +0100714 return( LOAD_GROUP( secp521r1 ) );
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100715#endif /* POLARSSL_ECP_DP_SECP521R1_ENABLED */
716
Manuel Pégourié-Gonnard18e3ec92014-01-11 15:22:07 +0100717#if defined(POLARSSL_ECP_DP_SECP224K1_ENABLED)
718 case POLARSSL_ECP_DP_SECP224K1:
719 return( LOAD_GROUP_A( secp224k1 ) );
720#endif /* POLARSSL_ECP_DP_SECP224K1_ENABLED */
721
Manuel Pégourié-Gonnardf51c8fc2014-01-10 18:17:18 +0100722#if defined(POLARSSL_ECP_DP_SECP256K1_ENABLED)
723 case POLARSSL_ECP_DP_SECP256K1:
724 return( LOAD_GROUP_A( secp256k1 ) );
725#endif /* POLARSSL_ECP_DP_SECP256K1_ENABLED */
726
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100727#if defined(POLARSSL_ECP_DP_BP256R1_ENABLED)
728 case POLARSSL_ECP_DP_BP256R1:
Manuel Pégourié-Gonnard81e1b102013-12-06 13:28:05 +0100729 return( LOAD_GROUP_A( brainpoolP256r1 ) );
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100730#endif /* POLARSSL_ECP_DP_BP256R1_ENABLED */
731
732#if defined(POLARSSL_ECP_DP_BP384R1_ENABLED)
733 case POLARSSL_ECP_DP_BP384R1:
Manuel Pégourié-Gonnard81e1b102013-12-06 13:28:05 +0100734 return( LOAD_GROUP_A( brainpoolP384r1 ) );
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100735#endif /* POLARSSL_ECP_DP_BP384R1_ENABLED */
736
737#if defined(POLARSSL_ECP_DP_BP512R1_ENABLED)
738 case POLARSSL_ECP_DP_BP512R1:
Manuel Pégourié-Gonnard81e1b102013-12-06 13:28:05 +0100739 return( LOAD_GROUP_A( brainpoolP512r1 ) );
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100740#endif /* POLARSSL_ECP_DP_BP512R1_ENABLED */
741
Manuel Pégourié-Gonnard66153662013-12-03 14:12:26 +0100742#if defined(POLARSSL_ECP_DP_M255_ENABLED)
743 case POLARSSL_ECP_DP_M255:
Manuel Pégourié-Gonnard3d7053a2013-12-04 20:51:13 +0100744 grp->modp = ecp_mod_p255;
Manuel Pégourié-Gonnard66153662013-12-03 14:12:26 +0100745 return( ecp_use_curve25519( grp ) );
746#endif /* POLARSSL_ECP_DP_M255_ENABLED */
747
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100748 default:
749 ecp_group_free( grp );
750 return( POLARSSL_ERR_ECP_FEATURE_UNAVAILABLE );
751 }
752}
753
754#if defined(POLARSSL_ECP_NIST_OPTIM)
755/*
756 * Fast reduction modulo the primes used by the NIST curves.
757 *
758 * These functions are critical for speed, but not needed for correct
759 * operations. So, we make the choice to heavily rely on the internals of our
760 * bignum library, which creates a tight coupling between these functions and
761 * our MPI implementation. However, the coupling between the ECP module and
762 * MPI remains loose, since these functions can be deactivated at will.
763 */
764
765#if defined(POLARSSL_ECP_DP_SECP192R1_ENABLED)
766/*
767 * Compared to the way things are presented in FIPS 186-3 D.2,
768 * we proceed in columns, from right (least significant chunk) to left,
769 * adding chunks to N in place, and keeping a carry for the next chunk.
770 * This avoids moving things around in memory, and uselessly adding zeros,
771 * compared to the more straightforward, line-oriented approach.
772 *
773 * For this prime we need to handle data in chunks of 64 bits.
774 * Since this is always a multiple of our basic t_uint, we can
775 * use a t_uint * to designate such a chunk, and small loops to handle it.
776 */
777
778/* Add 64-bit chunks (dst += src) and update carry */
779static inline void add64( t_uint *dst, t_uint *src, t_uint *carry )
780{
781 unsigned char i;
782 t_uint c = 0;
783 for( i = 0; i < 8 / sizeof( t_uint ); i++, dst++, src++ )
784 {
785 *dst += c; c = ( *dst < c );
786 *dst += *src; c += ( *dst < *src );
787 }
788 *carry += c;
789}
790
791/* Add carry to a 64-bit chunk and update carry */
792static inline void carry64( t_uint *dst, t_uint *carry )
793{
794 unsigned char i;
795 for( i = 0; i < 8 / sizeof( t_uint ); i++, dst++ )
796 {
797 *dst += *carry;
798 *carry = ( *dst < *carry );
799 }
800}
801
802#define WIDTH 8 / sizeof( t_uint )
803#define A( i ) N->p + i * WIDTH
804#define ADD( i ) add64( p, A( i ), &c )
805#define NEXT p += WIDTH; carry64( p, &c )
806#define LAST p += WIDTH; *p = c; while( ++p < end ) *p = 0
807
808/*
809 * Fast quasi-reduction modulo p192 (FIPS 186-3 D.2.1)
810 */
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100811static int ecp_mod_p192( mpi *N )
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100812{
813 int ret;
814 t_uint c = 0;
815 t_uint *p, *end;
816
817 /* Make sure we have enough blocks so that A(5) is legal */
818 MPI_CHK( mpi_grow( N, 6 * WIDTH ) );
819
820 p = N->p;
821 end = p + N->n;
822
823 ADD( 3 ); ADD( 5 ); NEXT; // A0 += A3 + A5
824 ADD( 3 ); ADD( 4 ); ADD( 5 ); NEXT; // A1 += A3 + A4 + A5
825 ADD( 4 ); ADD( 5 ); LAST; // A2 += A4 + A5
826
827cleanup:
828 return( ret );
829}
830
831#undef WIDTH
832#undef A
833#undef ADD
834#undef NEXT
835#undef LAST
836#endif /* POLARSSL_ECP_DP_SECP192R1_ENABLED */
837
838#if defined(POLARSSL_ECP_DP_SECP224R1_ENABLED) || \
839 defined(POLARSSL_ECP_DP_SECP256R1_ENABLED) || \
840 defined(POLARSSL_ECP_DP_SECP384R1_ENABLED)
841/*
842 * The reader is advised to first understand ecp_mod_p192() since the same
843 * general structure is used here, but with additional complications:
844 * (1) chunks of 32 bits, and (2) subtractions.
845 */
846
847/*
848 * For these primes, we need to handle data in chunks of 32 bits.
849 * This makes it more complicated if we use 64 bits limbs in MPI,
850 * which prevents us from using a uniform access method as for p192.
851 *
852 * So, we define a mini abstraction layer to access 32 bit chunks,
853 * load them in 'cur' for work, and store them back from 'cur' when done.
854 *
855 * While at it, also define the size of N in terms of 32-bit chunks.
856 */
857#define LOAD32 cur = A( i );
858
859#if defined(POLARSSL_HAVE_INT8) /* 8 bit */
860
861#define MAX32 N->n / 4
862#define A( j ) (uint32_t)( N->p[4*j+0] ) | \
863 ( N->p[4*j+1] << 8 ) | \
864 ( N->p[4*j+2] << 16 ) | \
865 ( N->p[4*j+3] << 24 )
866#define STORE32 N->p[4*i+0] = (t_uint)( cur ); \
867 N->p[4*i+1] = (t_uint)( cur >> 8 ); \
868 N->p[4*i+2] = (t_uint)( cur >> 16 ); \
869 N->p[4*i+3] = (t_uint)( cur >> 24 );
870
871#elif defined(POLARSSL_HAVE_INT16) /* 16 bit */
872
873#define MAX32 N->n / 2
874#define A( j ) (uint32_t)( N->p[2*j] ) | ( N->p[2*j+1] << 16 )
875#define STORE32 N->p[2*i+0] = (t_uint)( cur ); \
876 N->p[2*i+1] = (t_uint)( cur >> 16 );
877
878#elif defined(POLARSSL_HAVE_INT32) /* 32 bit */
879
880#define MAX32 N->n
881#define A( j ) N->p[j]
882#define STORE32 N->p[i] = cur;
883
884#else /* 64-bit */
885
886#define MAX32 N->n * 2
887#define A( j ) j % 2 ? (uint32_t)( N->p[j/2] >> 32 ) : (uint32_t)( N->p[j/2] )
888#define STORE32 \
889 if( i % 2 ) { \
890 N->p[i/2] &= 0x00000000FFFFFFFF; \
891 N->p[i/2] |= ((t_uint) cur) << 32; \
892 } else { \
893 N->p[i/2] &= 0xFFFFFFFF00000000; \
894 N->p[i/2] |= (t_uint) cur; \
895 }
896
897#endif /* sizeof( t_uint ) */
898
899/*
900 * Helpers for addition and subtraction of chunks, with signed carry.
901 */
902static inline void add32( uint32_t *dst, uint32_t src, signed char *carry )
903{
904 *dst += src;
905 *carry += ( *dst < src );
906}
907
908static inline void sub32( uint32_t *dst, uint32_t src, signed char *carry )
909{
910 *carry -= ( *dst < src );
911 *dst -= src;
912}
913
914#define ADD( j ) add32( &cur, A( j ), &c );
915#define SUB( j ) sub32( &cur, A( j ), &c );
916
917/*
918 * Helpers for the main 'loop'
919 * (see fix_negative for the motivation of C)
920 */
921#define INIT( b ) \
922 int ret; \
923 signed char c = 0, cc; \
924 uint32_t cur; \
925 size_t i = 0, bits = b; \
926 mpi C; \
927 t_uint Cp[ b / 8 / sizeof( t_uint) + 1 ]; \
928 \
929 C.s = 1; \
930 C.n = b / 8 / sizeof( t_uint) + 1; \
931 C.p = Cp; \
932 memset( Cp, 0, C.n * sizeof( t_uint ) ); \
933 \
934 MPI_CHK( mpi_grow( N, b * 2 / 8 / sizeof( t_uint ) ) ); \
935 LOAD32;
936
937#define NEXT \
938 STORE32; i++; LOAD32; \
939 cc = c; c = 0; \
940 if( cc < 0 ) \
941 sub32( &cur, -cc, &c ); \
942 else \
943 add32( &cur, cc, &c ); \
944
945#define LAST \
946 STORE32; i++; \
947 cur = c > 0 ? c : 0; STORE32; \
948 cur = 0; while( ++i < MAX32 ) { STORE32; } \
949 if( c < 0 ) fix_negative( N, c, &C, bits );
950
951/*
952 * If the result is negative, we get it in the form
953 * c * 2^(bits + 32) + N, with c negative and N positive shorter than 'bits'
954 */
955static inline int fix_negative( mpi *N, signed char c, mpi *C, size_t bits )
956{
957 int ret;
958
959 /* C = - c * 2^(bits + 32) */
960#if !defined(POLARSSL_HAVE_INT64)
961 ((void) bits);
962#else
963 if( bits == 224 )
964 C->p[ C->n - 1 ] = ((t_uint) -c) << 32;
965 else
966#endif
967 C->p[ C->n - 1 ] = (t_uint) -c;
968
969 /* N = - ( C - N ) */
970 MPI_CHK( mpi_sub_abs( N, C, N ) );
971 N->s = -1;
972
973cleanup:
974
975 return( ret );
976}
977
978#if defined(POLARSSL_ECP_DP_SECP224R1_ENABLED)
979/*
980 * Fast quasi-reduction modulo p224 (FIPS 186-3 D.2.2)
981 */
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +0100982static int ecp_mod_p224( mpi *N )
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +0100983{
984 INIT( 224 );
985
986 SUB( 7 ); SUB( 11 ); NEXT; // A0 += -A7 - A11
987 SUB( 8 ); SUB( 12 ); NEXT; // A1 += -A8 - A12
988 SUB( 9 ); SUB( 13 ); NEXT; // A2 += -A9 - A13
989 SUB( 10 ); ADD( 7 ); ADD( 11 ); NEXT; // A3 += -A10 + A7 + A11
990 SUB( 11 ); ADD( 8 ); ADD( 12 ); NEXT; // A4 += -A11 + A8 + A12
991 SUB( 12 ); ADD( 9 ); ADD( 13 ); NEXT; // A5 += -A12 + A9 + A13
992 SUB( 13 ); ADD( 10 ); LAST; // A6 += -A13 + A10
993
994cleanup:
995 return( ret );
996}
997#endif /* POLARSSL_ECP_DP_SECP224R1_ENABLED */
998
999#if defined(POLARSSL_ECP_DP_SECP256R1_ENABLED)
1000/*
1001 * Fast quasi-reduction modulo p256 (FIPS 186-3 D.2.3)
1002 */
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +01001003static int ecp_mod_p256( mpi *N )
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +01001004{
1005 INIT( 256 );
1006
1007 ADD( 8 ); ADD( 9 );
1008 SUB( 11 ); SUB( 12 ); SUB( 13 ); SUB( 14 ); NEXT; // A0
1009
1010 ADD( 9 ); ADD( 10 );
1011 SUB( 12 ); SUB( 13 ); SUB( 14 ); SUB( 15 ); NEXT; // A1
1012
1013 ADD( 10 ); ADD( 11 );
1014 SUB( 13 ); SUB( 14 ); SUB( 15 ); NEXT; // A2
1015
1016 ADD( 11 ); ADD( 11 ); ADD( 12 ); ADD( 12 ); ADD( 13 );
1017 SUB( 15 ); SUB( 8 ); SUB( 9 ); NEXT; // A3
1018
1019 ADD( 12 ); ADD( 12 ); ADD( 13 ); ADD( 13 ); ADD( 14 );
1020 SUB( 9 ); SUB( 10 ); NEXT; // A4
1021
1022 ADD( 13 ); ADD( 13 ); ADD( 14 ); ADD( 14 ); ADD( 15 );
1023 SUB( 10 ); SUB( 11 ); NEXT; // A5
1024
1025 ADD( 14 ); ADD( 14 ); ADD( 15 ); ADD( 15 ); ADD( 14 ); ADD( 13 );
1026 SUB( 8 ); SUB( 9 ); NEXT; // A6
1027
1028 ADD( 15 ); ADD( 15 ); ADD( 15 ); ADD( 8 );
1029 SUB( 10 ); SUB( 11 ); SUB( 12 ); SUB( 13 ); LAST; // A7
1030
1031cleanup:
1032 return( ret );
1033}
1034#endif /* POLARSSL_ECP_DP_SECP256R1_ENABLED */
1035
1036#if defined(POLARSSL_ECP_DP_SECP384R1_ENABLED)
1037/*
1038 * Fast quasi-reduction modulo p384 (FIPS 186-3 D.2.4)
1039 */
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +01001040static int ecp_mod_p384( mpi *N )
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +01001041{
1042 INIT( 384 );
1043
1044 ADD( 12 ); ADD( 21 ); ADD( 20 );
1045 SUB( 23 ); NEXT; // A0
1046
1047 ADD( 13 ); ADD( 22 ); ADD( 23 );
1048 SUB( 12 ); SUB( 20 ); NEXT; // A2
1049
1050 ADD( 14 ); ADD( 23 );
1051 SUB( 13 ); SUB( 21 ); NEXT; // A2
1052
1053 ADD( 15 ); ADD( 12 ); ADD( 20 ); ADD( 21 );
1054 SUB( 14 ); SUB( 22 ); SUB( 23 ); NEXT; // A3
1055
1056 ADD( 21 ); ADD( 21 ); ADD( 16 ); ADD( 13 ); ADD( 12 ); ADD( 20 ); ADD( 22 );
1057 SUB( 15 ); SUB( 23 ); SUB( 23 ); NEXT; // A4
1058
1059 ADD( 22 ); ADD( 22 ); ADD( 17 ); ADD( 14 ); ADD( 13 ); ADD( 21 ); ADD( 23 );
1060 SUB( 16 ); NEXT; // A5
1061
1062 ADD( 23 ); ADD( 23 ); ADD( 18 ); ADD( 15 ); ADD( 14 ); ADD( 22 );
1063 SUB( 17 ); NEXT; // A6
1064
1065 ADD( 19 ); ADD( 16 ); ADD( 15 ); ADD( 23 );
1066 SUB( 18 ); NEXT; // A7
1067
1068 ADD( 20 ); ADD( 17 ); ADD( 16 );
1069 SUB( 19 ); NEXT; // A8
1070
1071 ADD( 21 ); ADD( 18 ); ADD( 17 );
1072 SUB( 20 ); NEXT; // A9
1073
1074 ADD( 22 ); ADD( 19 ); ADD( 18 );
1075 SUB( 21 ); NEXT; // A10
1076
1077 ADD( 23 ); ADD( 20 ); ADD( 19 );
1078 SUB( 22 ); LAST; // A11
1079
1080cleanup:
1081 return( ret );
1082}
1083#endif /* POLARSSL_ECP_DP_SECP384R1_ENABLED */
1084
1085#undef A
1086#undef LOAD32
1087#undef STORE32
1088#undef MAX32
1089#undef INIT
1090#undef NEXT
1091#undef LAST
1092
1093#endif /* POLARSSL_ECP_DP_SECP224R1_ENABLED ||
1094 POLARSSL_ECP_DP_SECP256R1_ENABLED ||
1095 POLARSSL_ECP_DP_SECP384R1_ENABLED */
1096
1097#if defined(POLARSSL_ECP_DP_SECP521R1_ENABLED)
1098/*
1099 * Here we have an actual Mersenne prime, so things are more straightforward.
1100 * However, chunks are aligned on a 'weird' boundary (521 bits).
1101 */
1102
1103/* Size of p521 in terms of t_uint */
1104#define P521_WIDTH ( 521 / 8 / sizeof( t_uint ) + 1 )
1105
1106/* Bits to keep in the most significant t_uint */
1107#if defined(POLARSSL_HAVE_INT8)
1108#define P521_MASK 0x01
1109#else
1110#define P521_MASK 0x01FF
1111#endif
1112
1113/*
1114 * Fast quasi-reduction modulo p521 (FIPS 186-3 D.2.5)
1115 * Write N as A1 + 2^521 A0, return A0 + A1
1116 */
Manuel Pégourié-Gonnard3ee90002013-12-02 17:14:48 +01001117static int ecp_mod_p521( mpi *N )
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +01001118{
1119 int ret;
1120 size_t i;
1121 mpi M;
1122 t_uint Mp[P521_WIDTH + 1];
1123 /* Worst case for the size of M is when t_uint is 16 bits:
1124 * we need to hold bits 513 to 1056, which is 34 limbs, that is
1125 * P521_WIDTH + 1. Otherwise P521_WIDTH is enough. */
1126
1127 if( N->n < P521_WIDTH )
1128 return( 0 );
1129
1130 /* M = A1 */
1131 M.s = 1;
1132 M.n = N->n - ( P521_WIDTH - 1 );
1133 if( M.n > P521_WIDTH + 1 )
1134 M.n = P521_WIDTH + 1;
1135 M.p = Mp;
1136 memcpy( Mp, N->p + P521_WIDTH - 1, M.n * sizeof( t_uint ) );
1137 MPI_CHK( mpi_shift_r( &M, 521 % ( 8 * sizeof( t_uint ) ) ) );
1138
1139 /* N = A0 */
1140 N->p[P521_WIDTH - 1] &= P521_MASK;
1141 for( i = P521_WIDTH; i < N->n; i++ )
1142 N->p[i] = 0;
1143
1144 /* N = A0 + A1 */
1145 MPI_CHK( mpi_add_abs( N, N, &M ) );
1146
1147cleanup:
1148 return( ret );
1149}
1150
1151#undef P521_WIDTH
1152#undef P521_MASK
1153#endif /* POLARSSL_ECP_DP_SECP521R1_ENABLED */
1154
1155#endif /* POLARSSL_ECP_NIST_OPTIM */
1156
Manuel Pégourié-Gonnard3d7053a2013-12-04 20:51:13 +01001157#if defined(POLARSSL_ECP_DP_M255_ENABLED)
1158
1159/* Size of p255 in terms of t_uint */
1160#define P255_WIDTH ( 255 / 8 / sizeof( t_uint ) + 1 )
1161
1162/*
1163 * Fast quasi-reduction modulo p255 = 2^255 - 19
1164 * Write N as A1 + 2^255 A1, return A0 + 19 * A1
1165 */
1166static int ecp_mod_p255( mpi *N )
1167{
1168 int ret;
1169 size_t i;
1170 mpi M;
1171 t_uint Mp[P255_WIDTH + 2];
1172
1173 if( N->n < P255_WIDTH )
1174 return( 0 );
1175
1176 /* M = A1 */
1177 M.s = 1;
1178 M.n = N->n - ( P255_WIDTH - 1 );
1179 if( M.n > P255_WIDTH + 1 )
1180 M.n = P255_WIDTH + 1;
1181 M.p = Mp;
1182 memset( Mp, 0, sizeof Mp );
1183 memcpy( Mp, N->p + P255_WIDTH - 1, M.n * sizeof( t_uint ) );
1184 MPI_CHK( mpi_shift_r( &M, 255 % ( 8 * sizeof( t_uint ) ) ) );
1185 M.n++; /* Make room for multiplication by 19 */
1186
1187 /* N = A0 */
1188 mpi_set_bit( N, 255, 0 );
1189 for( i = P255_WIDTH; i < N->n; i++ )
1190 N->p[i] = 0;
1191
1192 /* N = A0 + 19 * A1 */
1193 MPI_CHK( mpi_mul_int( &M, &M, 19 ) );
1194 MPI_CHK( mpi_add_abs( N, N, &M ) );
1195
1196cleanup:
1197 return( ret );
1198}
1199#endif /* POLARSSL_ECP_DP_M255_ENABLED */
1200
Manuel Pégourié-Gonnard32b04c12013-12-02 15:49:09 +01001201#endif