1 /*- 2 * Copyright (c) 1999 Mark Murray 3 * Copyright (c) 2014 Dag-Erling Smørgrav 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 15 * THIS SOFTWARE IS PROVIDED BY MARK MURRAY AND CONTRIBUTORS ``AS IS'' AND 16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 18 * ARE DISCLAIMED. IN NO EVENT SHALL MARK MURRAY OR CONTRIBUTORS BE LIABLE 19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 25 * SUCH DAMAGE. 26 */ 27 28 #include <sys/cdefs.h> 29 __FBSDID("$FreeBSD$"); 30 31 #include <sys/types.h> 32 33 #include <libutil.h> 34 #include <string.h> 35 #include <unistd.h> 36 37 #include "crypt.h" 38 39 /* 40 * List of supported crypt(3) formats. 41 * 42 * The default algorithm is the last entry in the list (second-to-last 43 * array element since the last is a sentinel). The reason for placing 44 * the default last rather than first is that DES needs to be at the 45 * bottom for the algorithm guessing logic in crypt(3) to work correctly, 46 * and it needs to be the default for backward compatibility. 47 */ 48 static const struct crypt_format { 49 const char *name; 50 int (*func)(const char *, const char *, char *); 51 const char *magic; 52 } crypt_formats[] = { 53 { "md5", crypt_md5, "$1$" }, 54 #ifdef HAS_BLOWFISH 55 { "blf", crypt_blowfish, "$2" }, 56 #endif 57 { "nth", crypt_nthash, "$3$" }, 58 { "sha256", crypt_sha256, "$5$" }, 59 { "sha512", crypt_sha512, "$6$" }, 60 #ifdef HAS_DES 61 { "des", crypt_des, "_" }, 62 #endif 63 64 /* sentinel */ 65 { NULL, NULL, NULL } 66 }; 67 68 static const struct crypt_format *crypt_format = 69 &crypt_formats[(sizeof crypt_formats / sizeof *crypt_formats) - 2]; 70 71 #define DES_SALT_ALPHABET \ 72 "./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz" 73 74 /* 75 * Returns the name of the currently selected format. 76 */ 77 const char * 78 crypt_get_format(void) 79 { 80 81 return (crypt_format->name); 82 } 83 84 /* 85 * Selects the format to use for subsequent crypt(3) invocations. 86 */ 87 int 88 crypt_set_format(const char *format) 89 { 90 const struct crypt_format *cf; 91 92 for (cf = crypt_formats; cf->name != NULL; ++cf) { 93 if (strcasecmp(cf->name, format) == 0) { 94 crypt_format = cf; 95 return (1); 96 } 97 } 98 return (0); 99 } 100 101 /* 102 * Hash the given password with the given salt. If the salt begins with a 103 * magic string (e.g. "$6$" for sha512), the corresponding format is used; 104 * otherwise, the currently selected format is used. 105 */ 106 char * 107 crypt_r(const char *passwd, const char *salt, struct crypt_data *data) 108 { 109 const struct crypt_format *cf; 110 int (*func)(const char *, const char *, char *); 111 #ifdef HAS_DES 112 int len; 113 #endif 114 115 for (cf = crypt_formats; cf->name != NULL; ++cf) 116 if (cf->magic != NULL && strstr(salt, cf->magic) == salt) { 117 func = cf->func; 118 goto match; 119 } 120 #ifdef HAS_DES 121 len = strlen(salt); 122 if ((len == 13 || len == 2) && strspn(salt, DES_SALT_ALPHABET) == len) { 123 func = crypt_des; 124 goto match; 125 } 126 #endif 127 func = crypt_format->func; 128 match: 129 if (func(passwd, salt, data->__buf) != 0) 130 return (NULL); 131 return (data->__buf); 132 } 133 134 char * 135 crypt(const char *passwd, const char *salt) 136 { 137 static struct crypt_data data; 138 139 return (crypt_r(passwd, salt, &data)); 140 } 141