crypto/idea/i_ofb64.c

   1 /*
   2  * Copyright 1995-2020 The OpenSSL Project Authors. All Rights Reserved.
   3  *
   4  * Licensed under the Apache License 2.0 (the "License").  You may not use
   5  * this file except in compliance with the License.  You can obtain a copy
   6  * in the file LICENSE in the source distribution or at
   7  * https://www.openssl.org/source/license.html
   8  */
   9
  10 /*
  11  * IDEA low level APIs are deprecated for public use, but still ok for internal
  12  * use where we're using them to implement the higher level EVP interface, as is
  13  * the case here.
  14  */
  15 #include "internal/deprecated.h"
  16
  17 #include <openssl/idea.h>
  18 #include "idea_local.h"
  19
  20 /*
  21  * The input and output encrypted as though 64bit ofb mode is being used.
  22  * The extra state information to record how much of the 64bit block we have
  23  * used is contained in *num;
  24  */
  25 void IDEA_ofb64_encrypt(const unsigned char *in, unsigned char *out,
  26                         long length, IDEA_KEY_SCHEDULE *schedule,
  27                         unsigned char *ivec, int *num)
  28 {
  29     register unsigned long v0, v1, t;
  30     register int n = *num;
  31     register long l = length;
  32     unsigned char d[8];
  33     register char *dp;
  34     unsigned long ti[2];
  35     unsigned char *iv;
  36     int save = 0;
  37
  38     iv = (unsigned char *)ivec;
  39     n2l(iv, v0);
  40     n2l(iv, v1);
  41     ti[0] = v0;
  42     ti[1] = v1;
  43     dp = (char *)d;
  44     l2n(v0, dp);
  45     l2n(v1, dp);
  46     while (l--) {
  47         if (n == 0) {
  48             IDEA_encrypt((unsigned long *)ti, schedule);
  49             dp = (char *)d;
  50             t = ti[0];
  51             l2n(t, dp);
  52             t = ti[1];
  53             l2n(t, dp);
  54             save++;
  55         }
  56         *(out++) = *(in++) ^ d[n];
  57         n = (n + 1) & 0x07;
  58     }
  59     if (save) {
  60         v0 = ti[0];
  61         v1 = ti[1];
  62         iv = (unsigned char *)ivec;
  63         l2n(v0, iv);
  64         l2n(v1, iv);
  65     }
  66     t = v0 = v1 = ti[0] = ti[1] = 0;
  67     *num = n;
  68 }