umac-nh-n.c

   1 /* umac-nh-n.c
   2  */
   3
   4 /* nettle, low-level cryptographics library
   5  *
   6  * Copyright (C) 2013 Niels Möller
   7  *
   8  * The nettle library is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU Lesser General Public License as published by
  10  * the Free Software Foundation; either version 2.1 of the License, or (at your
  11  * option) any later version.
  12  *
  13  * The nettle library is distributed in the hope that it will be useful, but
  14  * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
  15  * or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public
  16  * License for more details.
  17  *
  18  * You should have received a copy of the GNU Lesser General Public License
  19  * along with the nettle library; see the file COPYING.LIB.  If not, write to
  20  * the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston,
  21  * MA 02111-1301, USA.
  22  */
  23
  24 #if HAVE_CONFIG_H
  25 # include "config.h"
  26 #endif
  27
  28 #include <assert.h>
  29 #include <string.h>
  30
  31 #include "umac.h"
  32 #include "macros.h"
  33
  34 void
  35 _umac_nh_n (uint64_t *out, unsigned n, const uint32_t *key,
  36             unsigned length, const uint8_t *msg)
  37 {
  38   assert (length > 0);
  39   assert (length <= 1024);
  40   assert (length % 32 == 0);
  41
  42   memset(out, 0, n*sizeof(*out));
  43
  44   for (;length > 0; length -= 32, msg += 32, key += 8)
  45     {
  46       uint32_t a0, a1, b0, b1;
  47       unsigned i;
  48       a0 = LE_READ_UINT32 (msg);
  49       a1 = LE_READ_UINT32 (msg + 4);
  50       b0 = LE_READ_UINT32 (msg + 16);
  51       b1 = LE_READ_UINT32 (msg + 20);
  52       for (i = 0; i < n; i++)
  53         out[i] += (uint64_t) (a0 + key[0+4*i]) * (b0 + key[4+4*i])
  54           + (uint64_t) (a1 + key[1+4*i]) * (b1 + key[5+4*i]);
  55       a0 = LE_READ_UINT32 (msg + 8);
  56       a1 = LE_READ_UINT32 (msg + 12);
  57       b0 = LE_READ_UINT32 (msg + 24);
  58       b1 = LE_READ_UINT32 (msg + 28);
  59       for (i = 0; i < n; i++)
  60         out[i] += (uint64_t) (a0 + key[2+4*i]) * (b0 + key[6+4*i])
  61           + (uint64_t) (a1 + key[3+4*i]) * (b1 + key[7+4*i]);
  62     }
  63 }