git.sur5r.net Git - bacula/bacula/blob - bacula/src/wx-console/authenticate.c

   1 /*
   2  *
   3  *   Bacula UA authentication. Provides authentication with
   4  *     the Director.
   5  *
   6  *     Kern Sibbald, June MMI
   7  *
   8  *    This routine runs as a thread and must be thread reentrant.
   9  *
  10  *  Basic tasks done here:
  11  *
  12  */
  13 /*
  14    Copyright (C) 2001-2005 Kern Sibbald
  15
  16    This program is free software; you can redistribute it and/or
  17    modify it under the terms of the GNU General Public License
  18    version 2 as amended with additional clauses defined in the
  19    file LICENSE in the main source directory.
  20
  21    This program is distributed in the hope that it will be useful,
  22    but WITHOUT ANY WARRANTY; without even the implied warranty of
  23    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  24    the file LICENSE for additional details.
  25
  26  */
  27
  28 /* _("...") macro returns a wxChar*, so if we need a char*, we need to convert it with:
  29  * wxString(_("...")).mb_str(*wxConvCurrent) */
  30
  31 #include <wx/intl.h>
  32
  33 #include "bacula.h"
  34 #include "console_conf.h"
  35 #include "jcr.h"
  36
  37 #include "csprint.h"
  38
  39 void senditf(char *fmt, ...);
  40 void sendit(char *buf);
  41
  42 /* Commands sent to Director */
  43 static char hello[]    = "Hello %s calling\n";
  44
  45 /* Response from Director */
  46 static char OKhello[]   = "1000 OK:";
  47
  48 /* Forward referenced functions */
  49
  50 /*
  51  * Authenticate Director
  52  */
  53 int authenticate_director(JCR *jcr, DIRRES *director, CONRES *cons)
  54 {
  55    BSOCK *dir = jcr->dir_bsock;
  56    int tls_local_need = BNET_TLS_NONE;
  57    int tls_remote_need = BNET_TLS_NONE;
  58    char bashed_name[MAX_NAME_LENGTH];
  59    char *password;
  60    TLS_CONTEXT *tls_ctx = NULL;
  61
  62    /*
  63     * Send my name to the Director then do authentication
  64     */
  65    if (cons) {
  66       bstrncpy(bashed_name, cons->hdr.name, sizeof(bashed_name));
  67       bash_spaces(bashed_name);
  68       password = cons->password;
  69       /* TLS Requirement */
  70       if (cons->tls_enable) {
  71          if (cons->tls_require) {
  72             tls_local_need = BNET_TLS_REQUIRED;
  73          } else {
  74             tls_local_need = BNET_TLS_OK;
  75          }
  76       }
  77
  78       tls_ctx = cons->tls_ctx;
  79    } else {
  80       bstrncpy(bashed_name, "*UserAgent*", sizeof(bashed_name));
  81       password = director->password;
  82       /* TLS Requirement */
  83       if (director->tls_enable) {
  84          if (director->tls_require) {
  85             tls_local_need = BNET_TLS_REQUIRED;
  86          } else {
  87             tls_local_need = BNET_TLS_OK;
  88          }
  89       }
  90
  91       tls_ctx = director->tls_ctx;
  92    }
  93
  94
  95    /* Timeout Hello after 5 mins */
  96    btimer_t *tid = start_bsock_timer(dir, 60 * 5);
  97    bnet_fsend(dir, hello, bashed_name);
  98
  99    if (!cram_md5_get_auth(dir, password, &tls_remote_need) ||
 100        !cram_md5_auth(dir, password, tls_local_need)) {
 101       goto bail_out;
 102    }
 103
 104    /* Verify that the remote host is willing to meet our TLS requirements */
 105    if (tls_remote_need < tls_local_need && tls_local_need != BNET_TLS_OK && tls_remote_need != BNET_TLS_OK) {
 106       csprint(_("Authorization problem:"
 107               " Remote server did not advertise required TLS support.\n"));
 108       goto bail_out;
 109    }
 110
 111    /* Verify that we are willing to meet the remote host's requirements */
 112    if (tls_remote_need > tls_local_need && tls_local_need != BNET_TLS_OK && tls_remote_need != BNET_TLS_OK) {
 113       csprint(_("Authorization problem:"
 114               " Remote server requires TLS.\n"));
 115       goto bail_out;
 116    }
 117
 118    /* Is TLS Enabled? */
 119    if (have_tls) {
 120       if (tls_local_need >= BNET_TLS_OK && tls_remote_need >= BNET_TLS_OK) {
 121          /* Engage TLS! Full Speed Ahead! */
 122          if (!bnet_tls_client(tls_ctx, dir)) {
 123             csprint(_("TLS negotiation failed\n"));
 124             goto bail_out;
 125          }
 126       }
 127    }
 128
 129    Dmsg1(6, ">dird: %s", dir->msg);
 130    if (bnet_recv(dir) <= 0) {
 131       csprint(_("Bad response to Hello command: ERR="), CS_DATA);
 132       csprint(bnet_strerror(dir), CS_DATA);
 133       csprint("\n", CS_DATA);
 134       goto bail_out;
 135    }
 136    Dmsg1(10, "<dird: %s", dir->msg);
 137    if (strncmp(dir->msg, OKhello, sizeof(OKhello)-1) != 0) {
 138       csprint(_("Director rejected Hello command\n"), CS_DATA);
 139       goto bail_out;
 140    } else {
 141       csprint(dir->msg, CS_DATA);
 142    }
 143    stop_bsock_timer(tid);
 144    return 1;
 145
 146 bail_out:
 147    stop_bsock_timer(tid);
 148    csprint( _("Director authorization problem.\nMost likely the passwords do not agree.\nIf you are using TLS, there may have been a certificate validation error during the TLS handshake.\nPlease see http://www.bacula.org/rel-manual/faq.html#AuthorizationErrors for help.\n"));
 149    return 0;
 150
 151 }