1 /*
2 * des_crypt.c, DES encryption library routines
3 * Copyright (c) 2010, Oracle America, Inc.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions are
7 * met:
8 *
9 * * Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * * Redistributions in binary form must reproduce the above
12 * copyright notice, this list of conditions and the following
13 * disclaimer in the documentation and/or other materials
14 * provided with the distribution.
15 * * Neither the name of the "Oracle America, Inc." nor the names of its
16 * contributors may be used to endorse or promote products derived
17 * from this software without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
20 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
21 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
22 * FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
23 * COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
24 * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
26 * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
28 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
29 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
30 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 */
32
33 #include <sys/types.h>
34 #include <rpc/des_crypt.h>
35 #include <shlib-compat.h>
36 #include "des.h"
37
38 extern int _des_crypt (char *, unsigned, struct desparams *);
39
40 /*
41 * Copy 8 bytes
42 */
43 #define COPY8(src, dst) { \
44 register char *a = (char *) dst; \
45 register char *b = (char *) src; \
46 *a++ = *b++; *a++ = *b++; *a++ = *b++; *a++ = *b++; \
47 *a++ = *b++; *a++ = *b++; *a++ = *b++; *a++ = *b++; \
48 }
49
50 /*
51 * Copy multiple of 8 bytes
52 */
53 #define DESCOPY(src, dst, len) { \
54 register char *a = (char *) dst; \
55 register char *b = (char *) src; \
56 register int i; \
57 for (i = (int) len; i > 0; i -= 8) { \
58 *a++ = *b++; *a++ = *b++; *a++ = *b++; *a++ = *b++; \
59 *a++ = *b++; *a++ = *b++; *a++ = *b++; *a++ = *b++; \
60 } \
61 }
62
63 /*
64 * Common code to cbc_crypt() & ecb_crypt()
65 */
66 static int
common_crypt(char * key,char * buf,register unsigned len,unsigned mode,register struct desparams * desp)67 common_crypt (char *key, char *buf, register unsigned len,
68 unsigned mode, register struct desparams *desp)
69 {
70 register int desdev;
71
72 if ((len % 8) != 0 || len > DES_MAXDATA)
73 return DESERR_BADPARAM;
74
75 desp->des_dir =
76 ((mode & DES_DIRMASK) == DES_ENCRYPT) ? ENCRYPT : DECRYPT;
77
78 desdev = mode & DES_DEVMASK;
79 COPY8 (key, desp->des_key);
80 /*
81 * software
82 */
83 if (!_des_crypt (buf, len, desp))
84 return DESERR_HWERROR;
85
86 return desdev == DES_SW ? DESERR_NONE : DESERR_NOHWDEVICE;
87 }
88
89 /* Note: these cannot be excluded from the build yet, because they are
90 still used internally. */
91
92 /*
93 * CBC mode encryption
94 */
95 int
cbc_crypt(char * key,char * buf,unsigned int len,unsigned int mode,char * ivec)96 cbc_crypt (char *key, char *buf, unsigned int len, unsigned int mode,
97 char *ivec)
98 {
99 int err;
100 struct desparams dp;
101
102 dp.des_mode = CBC;
103 COPY8 (ivec, dp.des_ivec);
104 err = common_crypt (key, buf, len, mode, &dp);
105 COPY8 (dp.des_ivec, ivec);
106 return err;
107 }
hidden_nolink(cbc_crypt,libc,GLIBC_2_1)108 hidden_nolink (cbc_crypt, libc, GLIBC_2_1)
109
110 /*
111 * ECB mode encryption
112 */
113 int
114 ecb_crypt (char *key, char *buf, unsigned int len, unsigned int mode)
115 {
116 struct desparams dp;
117
118 dp.des_mode = ECB;
119 return common_crypt (key, buf, len, mode, &dp);
120 }
121 hidden_nolink (ecb_crypt, libc, GLIBC_2_1)
122