diff options
Diffstat (limited to 'usr/src/lib/libcrypt/common/des.c')
-rw-r--r-- | usr/src/lib/libcrypt/common/des.c | 186 |
1 files changed, 186 insertions, 0 deletions
diff --git a/usr/src/lib/libcrypt/common/des.c b/usr/src/lib/libcrypt/common/des.c new file mode 100644 index 0000000000..61fcd3c407 --- /dev/null +++ b/usr/src/lib/libcrypt/common/des.c @@ -0,0 +1,186 @@ +/* + * CDDL HEADER START + * + * The contents of this file are subject to the terms of the + * Common Development and Distribution License, Version 1.0 only + * (the "License"). You may not use this file except in compliance + * with the License. + * + * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE + * or http://www.opensolaris.org/os/licensing. + * See the License for the specific language governing permissions + * and limitations under the License. + * + * When distributing Covered Code, include this CDDL HEADER in each + * file and include the License file at usr/src/OPENSOLARIS.LICENSE. + * If applicable, add the following below this CDDL HEADER, with the + * fields enclosed by brackets "[]" replaced with your own identifying + * information: Portions Copyright [yyyy] [name of copyright owner] + * + * CDDL HEADER END + */ +/* + * Copyright 2005 Sun Microsystems, Inc. All rights reserved. + * Use is subject to license terms. + */ + +/* Copyright (c) 1983, 1984, 1985, 1986, 1987, 1988, 1989 AT&T */ +/* All Rights Reserved */ + +/* + * Portions of this source code were derived from Berkeley 4.3 BSD + * under license from the Regents of the University of California. + */ + +#pragma ident "%Z%%M% %I% %E% SMI" +/*LINTLIBRARY*/ + +/* + * DES encryption library routines + */ + +#include <sys/types.h> + +#include <rpc/des_crypt.h> +#include <sys/stat.h> +#include <fcntl.h> +#include <unistd.h> +#include <stropts.h> +#ifdef sun +#include <sys/ioctl.h> +#include <sys/des.h> +#ifdef _KERNEL +#include <sys/conf.h> +#define getdesfd() (cdevsw[11].d_open(0, 0) ? -1 : 0) +#define ioctl(a, b, c) (cdevsw[11].d_ioctl(0, b, c, 0) ? -1 : 0) +#ifndef CRYPT +#define __des_crypt(a, b, c) 0 +#endif +#else +#define getdesfd() (open("/dev/des", 0, 0)) +#endif +#else +#include <des/des.h> +#endif + +#include "des_soft.h" + +/* + * To see if chip is installed + */ +#define UNOPENED (-2) + +/* + * Copy 8 bytes + */ +#define COPY8(src, dst) { \ + char *a = (char *) dst; \ + char *b = (char *) src; \ + *a++ = *b++; *a++ = *b++; *a++ = *b++; *a++ = *b++; \ + *a++ = *b++; *a++ = *b++; *a++ = *b++; *a++ = *b++; \ +} + +/* + * Copy multiple of 8 bytes + */ +#define DESCOPY(src, dst, len) { \ + char *a = (char *) dst; \ + char *b = (char *) src; \ + int i; \ + for (i = (int) len; i > 0; i -= 8) { \ + *a++ = *b++; *a++ = *b++; *a++ = *b++; *a++ = *b++; \ + *a++ = *b++; *a++ = *b++; *a++ = *b++; *a++ = *b++; \ + } \ +} +static int common_crypt(char *, char *, unsigned, unsigned, struct desparams *); + +/* + * CBC mode encryption + */ +int +cbc_crypt(char *key, char *buf, size_t len, unsigned int mode, char *ivec) +{ + int err = 0; + +/* EXPORT DELETE START */ + struct desparams dp; + + dp.des_mode = CBC; + COPY8(ivec, dp.des_ivec); + err = common_crypt(key, buf, len, mode, &dp); + COPY8(dp.des_ivec, ivec); +/* EXPORT DELETE END */ + return (err); +} + + +/* + * ECB mode encryption + */ +int +ecb_crypt(char *key, char *buf, size_t len, unsigned int mode) +{ + int ret = 0; + +/* EXPORT DELETE START */ + struct desparams dp; + + dp.des_mode = ECB; + ret = common_crypt(key, buf, len, mode, &dp); +/* EXPORT DELETE END */ + return (ret); +} + + +/* EXPORT DELETE START */ +/* + * Common code to cbc_crypt() & ecb_crypt() + */ +static int +common_crypt(char *key, char *buf, unsigned len, unsigned mode, struct desparams *desp) +{ + int desdev; + int res; + int g_desfd = UNOPENED; + + if ((len % 8) != 0 || len > DES_MAXDATA) { + return (DESERR_BADPARAM); + } + desp->des_dir = + ((mode & DES_DIRMASK) == DES_ENCRYPT) ? ENCRYPT : DECRYPT; + + desdev = mode & DES_DEVMASK; + COPY8(key, desp->des_key); +#ifdef sun + if (desdev == DES_HW) { + if (g_desfd < 0) { + if (g_desfd == -1 || (g_desfd = getdesfd()) < 0) { + goto software; /* no hardware device */ + } + } + + /* + * hardware + */ + desp->des_len = len; + if (len <= DES_QUICKLEN) { + DESCOPY(buf, desp->des_data, len); + res = ioctl(g_desfd, (int)DESIOCQUICK, (char *) desp); + DESCOPY(desp->des_data, buf, len); + } else { + desp->des_buf = (u_char *) buf; + res = ioctl(g_desfd, (int)DESIOCBLOCK, (char *) desp); + } + return (res == 0 ? DESERR_NONE : DESERR_HWERROR); + } +software: +#endif + /* + * software + */ + if (!__des_crypt(buf, len, desp)) { + return (DESERR_HWERROR); + } + return (desdev == DES_SW ? DESERR_NONE : DESERR_NOHWDEVICE); +} +/* EXPORT DELETE END */ |