1/*	$OpenBSD: xform.c,v 1.16 2001/08/28 12:20:43 ben Exp $	*/
2/*-
3 * The authors of this code are John Ioannidis (ji@tla.org),
4 * Angelos D. Keromytis (kermit@csd.uch.gr),
5 * Niels Provos (provos@physnet.uni-hamburg.de) and
6 * Damien Miller (djm@mindrot.org).
7 *
8 * This code was written by John Ioannidis for BSD/OS in Athens, Greece,
9 * in November 1995.
10 *
11 * Ported to OpenBSD and NetBSD, with additional transforms, in December 1996,
12 * by Angelos D. Keromytis.
13 *
14 * Additional transforms and features in 1997 and 1998 by Angelos D. Keromytis
15 * and Niels Provos.
16 *
17 * Additional features in 1999 by Angelos D. Keromytis.
18 *
19 * AES XTS implementation in 2008 by Damien Miller
20 *
21 * Copyright (C) 1995, 1996, 1997, 1998, 1999 by John Ioannidis,
22 * Angelos D. Keromytis and Niels Provos.
23 *
24 * Copyright (C) 2001, Angelos D. Keromytis.
25 *
26 * Copyright (C) 2008, Damien Miller
27 * Copyright (c) 2014 The FreeBSD Foundation
28 * All rights reserved.
29 *
30 * Portions of this software were developed by John-Mark Gurney
31 * under sponsorship of the FreeBSD Foundation and
32 * Rubicon Communications, LLC (Netgate).
33 *
34 * Permission to use, copy, and modify this software with or without fee
35 * is hereby granted, provided that this entire notice is included in
36 * all copies of any software which is or includes a copy or
37 * modification of this software.
38 * You may use this code under the GNU public license if you so wish. Please
39 * contribute changes back to the authors under this freer than GPL license
40 * so that we may further the use of strong encryption without limitations to
41 * all.
42 *
43 * THIS SOFTWARE IS BEING PROVIDED "AS IS", WITHOUT ANY EXPRESS OR
44 * IMPLIED WARRANTY. IN PARTICULAR, NONE OF THE AUTHORS MAKES ANY
45 * REPRESENTATION OR WARRANTY OF ANY KIND CONCERNING THE
46 * MERCHANTABILITY OF THIS SOFTWARE OR ITS FITNESS FOR ANY PARTICULAR
47 * PURPOSE.
48 */
49
50#include <sys/cdefs.h>
51__FBSDID("$FreeBSD$");
52
53#include <crypto/des/des.h>
54#include <opencrypto/xform_enc.h>
55
56static	int des3_setkey(u_int8_t **, u_int8_t *, int);
57static	void des3_encrypt(caddr_t, u_int8_t *);
58static	void des3_decrypt(caddr_t, u_int8_t *);
59static	void des3_zerokey(u_int8_t **);
60
61/* Encryption instances */
62struct enc_xform enc_xform_3des = {
63	CRYPTO_3DES_CBC, "3DES",
64	DES3_BLOCK_LEN, DES3_BLOCK_LEN, TRIPLE_DES_MIN_KEY,
65	TRIPLE_DES_MAX_KEY,
66	des3_encrypt,
67	des3_decrypt,
68	des3_setkey,
69	des3_zerokey,
70	NULL,
71};
72
73/*
74 * Encryption wrapper routines.
75 */
76static void
77des3_encrypt(caddr_t key, u_int8_t *blk)
78{
79	des_cblock *cb = (des_cblock *) blk;
80	des_key_schedule *p = (des_key_schedule *) key;
81
82	des_ecb3_encrypt(cb, cb, p[0], p[1], p[2], DES_ENCRYPT);
83}
84
85static void
86des3_decrypt(caddr_t key, u_int8_t *blk)
87{
88	des_cblock *cb = (des_cblock *) blk;
89	des_key_schedule *p = (des_key_schedule *) key;
90
91	des_ecb3_encrypt(cb, cb, p[0], p[1], p[2], DES_DECRYPT);
92}
93
94static int
95des3_setkey(u_int8_t **sched, u_int8_t *key, int len)
96{
97	des_key_schedule *p;
98	int err;
99
100	p = KMALLOC(3*sizeof (des_key_schedule),
101		M_CRYPTO_DATA, M_NOWAIT|M_ZERO);
102	if (p != NULL) {
103		des_set_key((des_cblock *)(key +  0), p[0]);
104		des_set_key((des_cblock *)(key +  8), p[1]);
105		des_set_key((des_cblock *)(key + 16), p[2]);
106		err = 0;
107	} else
108		err = ENOMEM;
109	*sched = (u_int8_t *) p;
110	return err;
111}
112
113static void
114des3_zerokey(u_int8_t **sched)
115{
116	bzero(*sched, 3*sizeof (des_key_schedule));
117	KFREE(*sched, M_CRYPTO_DATA);
118	*sched = NULL;
119}
120