1 /* md5file.c --- Test the MD5 file password function.
2  * Copyright (C) 2002-2021 Simon Josefsson
3  *
4  * This file is part of GNU SASL.
5  *
6  * This program is free software: you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation, either version 3 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
18  *
19  */
20 
21 #ifdef HAVE_CONFIG_H
22 #include "config.h"
23 #endif
24 
25 #include <stdio.h>
26 #include <stdarg.h>
27 #include <stdlib.h>
28 #include <string.h>
29 #include <gsasl.h>
30 
31 #include "utils.h"
32 
33 /* Should match values from cram-md5.pwd. */
34 #define BILL "bill"
35 #define BILL_PASSWD "hubba-hubba"
36 
37 void
doit(void)38 doit (void)
39 {
40   const char *md5file;
41   char key[BUFSIZ];
42   size_t keylen = BUFSIZ - 1;
43   int res;
44 
45   md5file = getenv ("MD5FILE");
46   if (md5file)
47     {
48       char *p;
49       if ((p = strchr (md5file, '=')))
50 	md5file = p;
51     }
52 
53   if (!md5file)
54     md5file = "cram-md5.pwd";
55 
56   keylen = sizeof (key) - 1;
57   res = gsasl_md5pwd_get_password ("non-existing-file", "user", key, &keylen);
58   if (res == GSASL_FOPEN_ERROR)
59     success ("non-existing-file OK\n");
60   else
61     fail ("non-existing-file FAIL (%d): %s\n", res, gsasl_strerror (res));
62 
63   keylen = sizeof (key) - 1;
64   res = gsasl_md5pwd_get_password (md5file, BILL, key, &keylen);
65   if (res == GSASL_OK)
66     success ("user-found OK\n");
67   else
68     fail ("user-found FAIL (%d): %s\n", res, gsasl_strerror (res));
69   if (keylen != strlen (BILL_PASSWD)
70       || memcmp (key, BILL_PASSWD, keylen) != 0)
71     fail ("user-password FAIL (%lu): %.*s\n",
72 	  (unsigned long) keylen, (int) keylen, key);
73   else
74     success ("user-password OK\n");
75 
76   keylen = 5;
77   res = gsasl_md5pwd_get_password (md5file, BILL, key, &keylen);
78   if (res == GSASL_TOO_SMALL_BUFFER)
79     success ("too-small-buffer OK\n");
80   else
81     fail ("too-small-buffer FAIL (%d): %s\n", res, gsasl_strerror (res));
82 
83   keylen = sizeof (key) - 1;
84   res = gsasl_md5pwd_get_password (md5file, "user", key, &keylen);
85   if (res == GSASL_AUTHENTICATION_ERROR)
86     success ("no-such-user OK\n");
87   else
88     fail ("no-such-user FAIL (%d): %s\n", res, gsasl_strerror (res));
89 }
90