X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=bacula%2Fsrc%2Flib%2Fcram-md5.c;h=ac582a8fbd383414efa348b1395e0d75bb131844;hb=04ed7aa59b3c185e750b4d36260afa945612a497;hp=be1ed8db4c529b3446719b58932b7a502ef53b8a;hpb=eed718dc04cfc8da8d691cf1185d444df5d0a9c3;p=bacula%2Fbacula diff --git a/bacula/src/lib/cram-md5.c b/bacula/src/lib/cram-md5.c index be1ed8db4c..ac582a8fbd 100644 --- a/bacula/src/lib/cram-md5.c +++ b/bacula/src/lib/cram-md5.c @@ -1,41 +1,60 @@ +/* + Bacula® - The Network Backup Solution + + Copyright (C) 2001-2007 Free Software Foundation Europe e.V. + + The main author of Bacula is Kern Sibbald, with contributions from + many others, a complete list can be found in the file AUTHORS. + This program is Free Software; you can redistribute it and/or + modify it under the terms of version two of the GNU General Public + License as published by the Free Software Foundation and included + in the file LICENSE. + + This program is distributed in the hope that it will be useful, but + WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA + 02110-1301, USA. + + Bacula® is a registered trademark of Kern Sibbald. + The licensor of Bacula is the Free Software Foundation Europe + (FSFE), Fiduciary Program, Sumatrastrasse 25, 8006 Zürich, + Switzerland, email:ftf@fsfeurope.org. +*/ /* * Challenge Response Authentication Method using MD5 (CRAM-MD5) * * cram-md5 is based on RFC2104. - * + * * Written for Bacula by Kern E. Sibbald, May MMI. * * Version $Id$ */ -/* - Copyright (C) 2000, 2001, 2002 Kern Sibbald and John Walker - - This library is free software; you can redistribute it and/or - modify it under the terms of the GNU Lesser General Public - License as published by the Free Software Foundation; either - version 2.1 of the License, or (at your option) any later version. - This library is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU - Lesser General Public License for more details. +#include "bacula.h" - You should have received a copy of the GNU Lesser General Public - License along with this library; if not, write to the Free - Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, - MA 02111-1307, USA. +const int dbglvl = 50; +/* Authorize other end + * Codes that tls_local_need and tls_remote_need can take: + * BNET_TLS_NONE I cannot do tls + * BNET_TLS_OK I can do tls, but it is not required on my end + * BNET_TLS_REQUIRED tls is required on my end + * + * Returns: false if authentication failed + * true if OK */ - -#include "bacula.h" - -/* Authorize other end */ -int cram_md5_auth(BSOCK *bs, char *password, int ssl_need) +bool cram_md5_challenge(BSOCK *bs, const char *password, int tls_local_need, int compatible) { struct timeval t1; struct timeval t2; struct timezone tz; - int i, ok; + int i; + bool ok; char chal[MAXSTRING]; char host[MAXSTRING]; uint8_t hmac[20]; @@ -48,79 +67,98 @@ int cram_md5_auth(BSOCK *bs, char *password, int ssl_need) if (!gethostname(host, sizeof(host))) { bstrncpy(host, my_name, sizeof(host)); } + /* Send challenge -- no hashing yet */ bsnprintf(chal, sizeof(chal), "<%u.%u@%s>", (uint32_t)random(), (uint32_t)time(NULL), host); - if (!bnet_fsend(bs, "auth cram-md5 %s ssl=%d\n", chal, ssl_need)) { - return 0; - } - - if (!bnet_ssl_client(bs, password, ssl_need)) { - return 0; + if (compatible) { + Dmsg2(dbglvl, "send: auth cram-md5 %s ssl=%d\n", chal, tls_local_need); + if (!bs->fsend("auth cram-md5 %s ssl=%d\n", chal, tls_local_need)) { + Dmsg1(dbglvl, "Bnet send challenge error.\n", bs->bstrerror()); + return false; + } + } else { + /* Old non-compatible system */ + Dmsg2(dbglvl, "send: auth cram-md5 %s ssl=%d\n", chal, tls_local_need); + if (!bs->fsend("auth cram-md5 %s ssl=%d\n", chal, tls_local_need)) { + Dmsg1(dbglvl, "Bnet send challenge error.\n", bs->bstrerror()); + return false; + } } - Dmsg1(99, "sent challenge: %s", bs->msg); - if (bnet_wait_data(bs, 180) <= 0 || bnet_recv(bs) <= 0) { + /* Read hashed response to challenge */ + if (bs->wait_data(180) <= 0 || bs->recv() <= 0) { + Dmsg1(dbglvl, "Bnet receive challenge response error.\n", bs->bstrerror()); bmicrosleep(5, 0); - return 0; + return false; } + + /* Attempt to duplicate hash with our password */ hmac_md5((uint8_t *)chal, strlen(chal), (uint8_t *)password, strlen(password), hmac); - bin_to_base64(host, (char *)hmac, 16); - ok = strcmp(mp_chr(bs->msg), host) == 0; - Dmsg3(99, "Authenticate %s: wanted %s, got %s\n", - ok ? "OK" : "NOT OK", host, bs->msg); + bin_to_base64(host, sizeof(host), (char *)hmac, 16, compatible); + ok = strcmp(bs->msg, host) == 0; + if (ok) { + Dmsg1(dbglvl, "Authenticate OK %s\n", host); + } else { + bin_to_base64(host, sizeof(host), (char *)hmac, 16, false); + ok = strcmp(bs->msg, host) == 0; + if (!ok) { + Dmsg2(dbglvl, "Authenticate NOT OK: wanted %s, got %s\n", host, bs->msg); + } + } if (ok) { - bnet_fsend(bs, "1000 OK auth\n"); + bs->fsend("1000 OK auth\n"); } else { - Dmsg1(100, "PW: %s\n", password); - bnet_fsend(bs, "1999 Authorization failed.\n"); + Dmsg1(dbglvl, "Auth failed PW: %s\n", password); + bs->fsend(_("1999 Authorization failed.\n")); bmicrosleep(5, 0); } return ok; } -/* Get authorization from other end */ -int cram_md5_get_auth(BSOCK *bs, char *password, int ssl_need) +/* Respond to challenge from other end */ +bool cram_md5_respond(BSOCK *bs, const char *password, int *tls_remote_need, int *compatible) { char chal[MAXSTRING]; uint8_t hmac[20]; - int ssl_has; /* This is what the other end has */ - if (bnet_recv(bs) <= 0) { + *compatible = false; + if (bs->recv() <= 0) { bmicrosleep(5, 0); - return 0; + return false; } if (bs->msglen >= MAXSTRING) { - Dmsg1(99, "Wanted auth cram... Got: %s", bs->msg); + Dmsg1(dbglvl, "Msg too long wanted auth cram... Got: %s", bs->msg); bmicrosleep(5, 0); - return 0; + return false; } - if (sscanf(mp_chr(bs->msg), "auth cram-md5 %s ssl=%d\n", chal, &ssl_has) != 2) { - ssl_has = BNET_SSL_NONE; - if (sscanf(mp_chr(bs->msg), "auth cram-md5 %s\n", chal) != 1) { - bnet_fsend(bs, "1999 Authorization failed.\n"); - Dmsg1(100, "Cannot scan challenge: %s\n", bs->msg); - bmicrosleep(5, 0); - return 0; + Dmsg1(100, "cram-get received: %s", bs->msg); + if (sscanf(bs->msg, "auth cram-md5c %s ssl=%d", chal, tls_remote_need) == 2) { + *compatible = true; + } else if (sscanf(bs->msg, "auth cram-md5 %s ssl=%d", chal, tls_remote_need) != 2) { + if (sscanf(bs->msg, "auth cram-md5 %s\n", chal) != 1) { + Dmsg1(dbglvl, "Cannot scan challenge: %s", bs->msg); + bs->fsend(_("1999 Authorization failed.\n")); + bmicrosleep(5, 0); + return false; } } - if (!bnet_ssl_server(bs, password, ssl_need, ssl_has)) { - return 0; - } hmac_md5((uint8_t *)chal, strlen(chal), (uint8_t *)password, strlen(password), hmac); - bs->msglen = bin_to_base64(mp_chr(bs->msg), (char *)hmac, 16) + 1; - if (!bnet_send(bs)) { - Dmsg0(100, "Send response failed.\n"); - return 0; + bs->msglen = bin_to_base64(bs->msg, 50, (char *)hmac, 16, *compatible) + 1; +// Dmsg3(100, "get_auth: chal=%s pw=%s hmac=%s\n", chal, password, bs->msg); + if (!bs->send()) { + Dmsg1(dbglvl, "Send challenge failed. ERR=%s\n", bs->bstrerror()); + return false; } Dmsg1(99, "sending resp to challenge: %s\n", bs->msg); - if (bnet_wait_data(bs, 180) <= 0 || bnet_recv(bs) <= 0) { + if (bs->wait_data(180) <= 0 || bs->recv() <= 0) { + Dmsg1(dbglvl, "Receive chanllenge response failed. ERR=%s\n", bs->bstrerror()); bmicrosleep(5, 0); - return 0; + return false; } - if (strcmp(mp_chr(bs->msg), "1000 OK auth\n") == 0) { - return 1; + if (strcmp(bs->msg, "1000 OK auth\n") == 0) { + return true; } - Dmsg1(100, "PW: %s\n", password); + Dmsg1(dbglvl, "Received bad response: %s\n", bs->msg); bmicrosleep(5, 0); - return 0; + return false; }