2 * Challenge Response Authentication Method using MD5 (CRAM-MD5)
4 * cram-md5 is based on RFC2104.
6 * Written for Bacula by Kern E. Sibbald, May MMI.
11 Copyright (C) 2000, 2001, 2002 Kern Sibbald and John Walker
13 This library is free software; you can redistribute it and/or
14 modify it under the terms of the GNU Lesser General Public
15 License as published by the Free Software Foundation; either
16 version 2.1 of the License, or (at your option) any later version.
18 This library is distributed in the hope that it will be useful,
19 but WITHOUT ANY WARRANTY; without even the implied warranty of
20 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
21 Lesser General Public License for more details.
23 You should have received a copy of the GNU Lesser General Public
24 License along with this library; if not, write to the Free
25 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston,
32 /* Authorize other end */
33 int cram_md5_auth(BSOCK *bs, char *password, int ssl_need)
43 gettimeofday(&t1, &tz);
45 gettimeofday(&t2, &tz);
47 srandom((t1.tv_sec&0xffff) * (t2.tv_usec&0xff));
48 if (!gethostname(host, sizeof(host))) {
49 bstrncpy(host, my_name, sizeof(host));
51 bsnprintf(chal, sizeof(chal), "<%u.%u@%s>", (uint32_t)random(), (uint32_t)time(NULL), host);
52 if (!bnet_fsend(bs, "auth cram-md5 %s ssl=%d\n", chal, ssl_need)) {
56 if (!bnet_ssl_client(bs, password, ssl_need)) {
60 Dmsg1(99, "sent challenge: %s", bs->msg);
61 if (bnet_wait_data(bs, 180) <= 0 || bnet_recv(bs) <= 0) {
65 hmac_md5((uint8_t *)chal, strlen(chal), (uint8_t *)password, strlen(password), hmac);
66 bin_to_base64(host, (char *)hmac, 16);
67 ok = strcmp(mp_chr(bs->msg), host) == 0;
68 Dmsg3(99, "Authenticate %s: wanted %s, got %s\n",
69 ok ? "OK" : "NOT OK", host, bs->msg);
71 bnet_fsend(bs, "1000 OK auth\n");
73 Dmsg1(100, "PW: %s\n", password);
74 bnet_fsend(bs, "1999 Authorization failed.\n");
80 /* Get authorization from other end */
81 int cram_md5_get_auth(BSOCK *bs, char *password, int ssl_need)
85 int ssl_has; /* This is what the other end has */
87 if (bnet_recv(bs) <= 0) {
91 if (bs->msglen >= MAXSTRING) {
92 Dmsg1(99, "Wanted auth cram... Got: %s", bs->msg);
96 if (sscanf(mp_chr(bs->msg), "auth cram-md5 %s ssl=%d\n", chal, &ssl_has) != 2) {
97 ssl_has = BNET_SSL_NONE;
98 if (sscanf(mp_chr(bs->msg), "auth cram-md5 %s\n", chal) != 1) {
99 bnet_fsend(bs, "1999 Authorization failed.\n");
100 Dmsg1(100, "Cannot scan challenge: %s\n", bs->msg);
105 if (!bnet_ssl_server(bs, password, ssl_need, ssl_has)) {
109 hmac_md5((uint8_t *)chal, strlen(chal), (uint8_t *)password, strlen(password), hmac);
110 bs->msglen = bin_to_base64(mp_chr(bs->msg), (char *)hmac, 16) + 1;
111 if (!bnet_send(bs)) {
112 Dmsg0(100, "Send response failed.\n");
115 Dmsg1(99, "sending resp to challenge: %s\n", bs->msg);
116 if (bnet_wait_data(bs, 180) <= 0 || bnet_recv(bs) <= 0) {
120 if (strcmp(mp_chr(bs->msg), "1000 OK auth\n") == 0) {
123 Dmsg1(100, "PW: %s\n", password);