Expand DES_cbc_encrypt() in cbc_enc.c.

Copy ncbc_enc.c where it was previously #included, then clean up with
`unifdef -m -DCBC_ENC_C__DONT_UPDATE_IV`.

Discussed with tb@

diff --git a/lib/libcrypto/des/cbc_enc.c b/lib/libcrypto/des/cbc_enc.c
index 6c1ec71..1f11cc3 100644 (file)
--- a/lib/libcrypto/des/cbc_enc.c
+++ b/lib/libcrypto/des/cbc_enc.c
@@ -1,4 +1,4 @@
-/* $OpenBSD: cbc_enc.c,v 1.4 2023/07/08 07:11:07 beck Exp $ */
+/* $OpenBSD: cbc_enc.c,v 1.5 2024/08/31 14:25:04 jsing Exp $ */
 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
  * All rights reserved.
  *
@@ -56,6 +56,76 @@
  * [including the GNU Public Licence.]
  */
 
-#define CBC_ENC_C__DONT_UPDATE_IV
+#include "des_local.h"
 
-#include "ncbc_enc.c" /* des_cbc_encrypt */
+void
+DES_cbc_encrypt(const unsigned char *in, unsigned char *out, long length,
+    DES_key_schedule *_schedule, DES_cblock *ivec, int enc)
+{
+       DES_LONG tin0, tin1;
+       DES_LONG tout0, tout1, xor0, xor1;
+       long l = length;
+       DES_LONG tin[2];
+       unsigned char *iv;
+
+       iv = &(*ivec)[0];
+
+       if (enc) {
+               c2l(iv, tout0);
+               c2l(iv, tout1);
+               for (l -= 8; l >= 0; l -= 8) {
+                       c2l(in, tin0);
+                       c2l(in, tin1);
+                       tin0 ^= tout0;
+                       tin[0] = tin0;
+                       tin1 ^= tout1;
+                       tin[1] = tin1;
+                       DES_encrypt1((DES_LONG *)tin, _schedule, DES_ENCRYPT);
+                       tout0 = tin[0];
+                       l2c(tout0, out);
+                       tout1 = tin[1];
+                       l2c(tout1, out);
+               }
+               if (l != -8) {
+                       c2ln(in, tin0, tin1, l + 8);
+                       tin0 ^= tout0;
+                       tin[0] = tin0;
+                       tin1 ^= tout1;
+                       tin[1] = tin1;
+                       DES_encrypt1((DES_LONG *)tin, _schedule, DES_ENCRYPT);
+                       tout0 = tin[0];
+                       l2c(tout0, out);
+                       tout1 = tin[1];
+                       l2c(tout1, out);
+               }
+       } else {
+               c2l(iv, xor0);
+               c2l(iv, xor1);
+               for (l -= 8; l >= 0; l -= 8) {
+                       c2l(in, tin0);
+                       tin[0] = tin0;
+                       c2l(in, tin1);
+                       tin[1] = tin1;
+                       DES_encrypt1((DES_LONG *)tin, _schedule, DES_DECRYPT);
+                       tout0 = tin[0] ^ xor0;
+                       tout1 = tin[1] ^ xor1;
+                       l2c(tout0, out);
+                       l2c(tout1, out);
+                       xor0 = tin0;
+                       xor1 = tin1;
+               }
+               if (l != -8) {
+                       c2l(in, tin0);
+                       tin[0] = tin0;
+                       c2l(in, tin1);
+                       tin[1] = tin1;
+                       DES_encrypt1((DES_LONG *)tin, _schedule, DES_DECRYPT);
+                       tout0 = tin[0] ^ xor0;
+                       tout1 = tin[1] ^ xor1;
+                       l2cn(tout0, tout1, out, l + 8);
+               }
+       }
+       tin0 = tin1 = tout0 = tout1 = xor0 = xor1 = 0;
+       tin[0] = tin[1] = 0;
+}
+LCRYPTO_ALIAS(DES_cbc_encrypt);