Merge from vendor branch NCURSES:
[dragonfly.git] / lib / libcrypt / crypt.c
1 /*
2  * Copyright (c) 1999
3  *      Mark Murray.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  *
14  * THIS SOFTWARE IS PROVIDED BY MARK MURRAY AND CONTRIBUTORS ``AS IS'' AND
15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17  * ARE DISCLAIMED.  IN NO EVENT SHALL MARK MURRAY OR CONTRIBUTORS BE LIABLE
18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24  * SUCH DAMAGE.
25  *
26  * $FreeBSD: src/lib/libcrypt/crypt.c,v 1.14.2.2 2001/05/24 12:20:02 markm Exp $
27  * $DragonFly: src/lib/libcrypt/crypt.c,v 1.2 2003/06/17 04:26:49 dillon Exp $
28  *
29  * $FreeBSD: src/lib/libcrypt/crypt.c,v 1.14.2.2 2001/05/24 12:20:02 markm Exp $
30  */
31
32 #include <sys/types.h>
33 #include <string.h>
34 #include <libutil.h>
35 #include "crypt.h"
36
37 static const struct {
38         const char *const name;
39         char *(*const func)(const char *, const char *);
40         const char *const magic;
41 } crypt_types[] = {
42 #ifdef HAS_DES
43         {
44                 "des",
45                 crypt_des,
46                 NULL
47         },
48 #endif
49         {
50                 "md5",
51                 crypt_md5,
52                 "$1$"
53         },
54 #ifdef HAS_BLOWFISH
55         {
56                 "blf",
57                 crypt_blowfish,
58                 "$2"
59         },
60 #endif
61         {
62                 NULL,
63                 NULL
64         }
65 };
66
67 static int crypt_type = -1;
68
69 static void
70 crypt_setdefault(void)
71 {
72         char *def;
73         int i;
74
75         if (crypt_type != -1)
76                 return;
77         def = auth_getval("crypt_default");
78         if (def == NULL) {
79                 crypt_type = 0;
80                 return;
81         }
82         for (i = 0; i < sizeof(crypt_types) / sizeof(crypt_types[0]) - 1; i++) {
83                 if (strcmp(def, crypt_types[i].name) == 0) {
84                         crypt_type = i;
85                         return;
86                 }
87         }
88         crypt_type = 0;
89 }
90
91 const char *
92 crypt_get_format(void)
93 {
94
95         crypt_setdefault();
96         return (crypt_types[crypt_type].name);
97 }
98
99 int
100 crypt_set_format(char *type)
101 {
102         int i;
103
104         crypt_setdefault();
105         for (i = 0; i < sizeof(crypt_types) / sizeof(crypt_types[0]) - 1; i++) {
106                 if (strcmp(type, crypt_types[i].name) == 0) {
107                         crypt_type = i;
108                         return (1);
109                 }
110         }
111         return (0);
112 }
113
114 char *
115 crypt(char *passwd, char *salt)
116 {
117         int i;
118
119         crypt_setdefault();
120         for (i = 0; i < sizeof(crypt_types) / sizeof(crypt_types[0]) - 1; i++) {
121                 if (crypt_types[i].magic != NULL && strncmp(salt,
122                     crypt_types[i].magic, strlen(crypt_types[i].magic)) == 0)
123                         return (crypt_types[i].func(passwd, salt));
124         }
125         return (crypt_types[crypt_type].func(passwd, salt));
126 }