authenticate.c

   1 /*
   2  * Support rsync daemon authentication.
   3  *
   4  * Copyright (C) 1998-2000 Andrew Tridgell
   5  * Copyright (C) 2002-2007 Wayne Davison
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License version 3 as
   9  * published by the Free Software Foundation.
  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 along
  17  * with this program; if not, visit the http://fsf.org website.
  18  */
  19
  20 #include "rsync.h"
  21
  22 extern char *password_file;
  23
  24 /***************************************************************************
  25 encode a buffer using base64 - simple and slow algorithm. null terminates
  26 the result.
  27   ***************************************************************************/
  28 void base64_encode(const char *buf, int len, char *out, int pad)
  29 {
  30         char *b64 = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
  31         int bit_offset, byte_offset, idx, i;
  32         const uchar *d = (const uchar *)buf;
  33         int bytes = (len*8 + 5)/6;
  34
  35         for (i = 0; i < bytes; i++) {
  36                 byte_offset = (i*6)/8;
  37                 bit_offset = (i*6)%8;
  38                 if (bit_offset < 3) {
  39                         idx = (d[byte_offset] >> (2-bit_offset)) & 0x3F;
  40                 } else {
  41                         idx = (d[byte_offset] << (bit_offset-2)) & 0x3F;
  42                         if (byte_offset+1 < len) {
  43                                 idx |= (d[byte_offset+1] >> (8-(bit_offset-2)));
  44                         }
  45                 }
  46                 out[i] = b64[idx];
  47         }
  48
  49         while (pad && (i % 4))
  50                 out[i++] = '=';
  51
  52         out[i] = '\0';
  53 }
  54
  55 /* Generate a challenge buffer and return it base64-encoded. */
  56 static void gen_challenge(const char *addr, char *challenge)
  57 {
  58         char input[32];
  59         char digest[MAX_DIGEST_LEN];
  60         struct timeval tv;
  61         int len;
  62
  63         memset(input, 0, sizeof input);
  64
  65         strlcpy(input, addr, 17);
  66         sys_gettimeofday(&tv);
  67         SIVAL(input, 16, tv.tv_sec);
  68         SIVAL(input, 20, tv.tv_usec);
  69         SIVAL(input, 24, getpid());
  70
  71         sum_init(0);
  72         sum_update(input, sizeof input);
  73         len = sum_end(digest);
  74
  75         base64_encode(digest, len, challenge, 0);
  76 }
  77
  78
  79 /* Return the secret for a user from the secret file, null terminated.
  80  * Maximum length is len (not counting the null). */
  81 static int get_secret(int module, const char *user, char *secret, int len)
  82 {
  83         const char *fname = lp_secrets_file(module);
  84         STRUCT_STAT st;
  85         int fd, ok = 1;
  86         const char *p;
  87         char ch, *s;
  88
  89         if (!fname || !*fname)
  90                 return 0;
  91
  92         if ((fd = open(fname, O_RDONLY)) < 0)
  93                 return 0;
  94
  95         if (do_stat(fname, &st) == -1) {
  96                 rsyserr(FLOG, errno, "stat(%s)", fname);
  97                 ok = 0;
  98         } else if (lp_strict_modes(module)) {
  99                 if ((st.st_mode & 06) != 0) {
 100                         rprintf(FLOG, "secrets file must not be other-accessible (see strict modes option)\n");
 101                         ok = 0;
 102                 } else if (MY_UID() == 0 && st.st_uid != 0) {
 103                         rprintf(FLOG, "secrets file must be owned by root when running as root (see strict modes)\n");
 104                         ok = 0;
 105                 }
 106         }
 107         if (!ok) {
 108                 rprintf(FLOG, "continuing without secrets file\n");
 109                 close(fd);
 110                 return 0;
 111         }
 112
 113         if (*user == '#') {
 114                 /* Reject attempt to match a comment. */
 115                 close(fd);
 116                 return 0;
 117         }
 118
 119         /* Try to find a line that starts with the user name and a ':'. */
 120         p = user;
 121         while (1) {
 122                 if (read(fd, &ch, 1) != 1) {
 123                         close(fd);
 124                         return 0;
 125                 }
 126                 if (ch == '\n')
 127                         p = user;
 128                 else if (p) {
 129                         if (*p == ch)
 130                                 p++;
 131                         else if (!*p && ch == ':')
 132                                 break;
 133                         else
 134                                 p = NULL;
 135                 }
 136         }
 137
 138         /* Slurp the secret into the "secret" buffer. */
 139         s = secret;
 140         while (len > 0) {
 141                 if (read(fd, s, 1) != 1 || *s == '\n')
 142                         break;
 143                 if (*s == '\r')
 144                         continue;
 145                 s++;
 146                 len--;
 147         }
 148         *s = '\0';
 149         close(fd);
 150
 151         return 1;
 152 }
 153
 154 static const char *getpassf(const char *filename)
 155 {
 156         STRUCT_STAT st;
 157         char buffer[512], *p;
 158         int fd, n, ok = 1;
 159         const char *envpw = getenv("RSYNC_PASSWORD");
 160
 161         if (!filename)
 162                 return NULL;
 163
 164         if ((fd = open(filename,O_RDONLY)) < 0) {
 165                 rsyserr(FERROR, errno, "could not open password file \"%s\"",
 166                         filename);
 167                 if (envpw)
 168                         rprintf(FERROR, "falling back to RSYNC_PASSWORD environment variable.\n");
 169                 return NULL;
 170         }
 171
 172         if (do_stat(filename, &st) == -1) {
 173                 rsyserr(FERROR, errno, "stat(%s)", filename);
 174                 ok = 0;
 175         } else if ((st.st_mode & 06) != 0) {
 176                 rprintf(FERROR,"password file must not be other-accessible\n");
 177                 ok = 0;
 178         } else if (MY_UID() == 0 && st.st_uid != 0) {
 179                 rprintf(FERROR,"password file must be owned by root when running as root\n");
 180                 ok = 0;
 181         }
 182         if (!ok) {
 183                 rprintf(FERROR,"continuing without password file\n");
 184                 if (envpw)
 185                         rprintf(FERROR, "using RSYNC_PASSWORD environment variable.\n");
 186                 close(fd);
 187                 return NULL;
 188         }
 189
 190         if (envpw)
 191                 rprintf(FERROR, "RSYNC_PASSWORD environment variable ignored\n");
 192
 193         n = read(fd, buffer, sizeof buffer - 1);
 194         close(fd);
 195         if (n > 0) {
 196                 buffer[n] = '\0';
 197                 if ((p = strtok(buffer, "\n\r")) != NULL)
 198                         return strdup(p);
 199         }
 200
 201         return NULL;
 202 }
 203
 204 /* Generate an MD4 hash created from the combination of the password
 205  * and the challenge string and return it base64-encoded. */
 206 static void generate_hash(const char *in, const char *challenge, char *out)
 207 {
 208         char buf[MAX_DIGEST_LEN];
 209         int len;
 210
 211         sum_init(0);
 212         sum_update(in, strlen(in));
 213         sum_update(challenge, strlen(challenge));
 214         len = sum_end(buf);
 215
 216         base64_encode(buf, len, out, 0);
 217 }
 218
 219 /* Possibly negotiate authentication with the client.  Use "leader" to
 220  * start off the auth if necessary.
 221  *
 222  * Return NULL if authentication failed.  Return "" if anonymous access.
 223  * Otherwise return username.
 224  */
 225 char *auth_server(int f_in, int f_out, int module, const char *host,
 226                   const char *addr, const char *leader)
 227 {
 228         char *users = lp_auth_users(module);
 229         char challenge[MAX_DIGEST_LEN*2];
 230         char line[BIGPATHBUFLEN];
 231         char secret[512];
 232         char pass2[MAX_DIGEST_LEN*2];
 233         char *tok, *pass;
 234
 235         /* if no auth list then allow anyone in! */
 236         if (!users || !*users)
 237                 return "";
 238
 239         gen_challenge(addr, challenge);
 240
 241         io_printf(f_out, "%s%s\n", leader, challenge);
 242
 243         if (!read_line(f_in, line, sizeof line - 1)
 244          || (pass = strchr(line, ' ')) == NULL) {
 245                 rprintf(FLOG, "auth failed on module %s from %s (%s): "
 246                         "invalid challenge response\n",
 247                         lp_name(module), host, addr);
 248                 return NULL;
 249         }
 250         *pass++ = '\0';
 251
 252         if (!(users = strdup(users)))
 253                 out_of_memory("auth_server");
 254
 255         for (tok = strtok(users, " ,\t"); tok; tok = strtok(NULL, " ,\t")) {
 256                 if (wildmatch(tok, line))
 257                         break;
 258         }
 259         free(users);
 260
 261         if (!tok) {
 262                 rprintf(FLOG, "auth failed on module %s from %s (%s): "
 263                         "unauthorized user\n",
 264                         lp_name(module), host, addr);
 265                 return NULL;
 266         }
 267
 268         memset(secret, 0, sizeof secret);
 269         if (!get_secret(module, line, secret, sizeof secret - 1)) {
 270                 memset(secret, 0, sizeof secret);
 271                 rprintf(FLOG, "auth failed on module %s from %s (%s): "
 272                         "missing secret for user \"%s\"\n",
 273                         lp_name(module), host, addr, line);
 274                 return NULL;
 275         }
 276
 277         generate_hash(secret, challenge, pass2);
 278         memset(secret, 0, sizeof secret);
 279
 280         if (strcmp(pass, pass2) != 0) {
 281                 rprintf(FLOG, "auth failed on module %s from %s (%s): "
 282                         "password mismatch\n",
 283                         lp_name(module), host, addr);
 284                 return NULL;
 285         }
 286
 287         return strdup(line);
 288 }
 289
 290 void auth_client(int fd, const char *user, const char *challenge)
 291 {
 292         const char *pass;
 293         char pass2[MAX_DIGEST_LEN*2];
 294
 295         if (!user || !*user)
 296                 user = "nobody";
 297
 298         if (!(pass = getpassf(password_file))
 299          && !(pass = getenv("RSYNC_PASSWORD"))) {
 300                 /* XXX: cyeoh says that getpass is deprecated, because
 301                  * it may return a truncated password on some systems,
 302                  * and it is not in the LSB.
 303                  *
 304                  * Andrew Klein says that getpassphrase() is present
 305                  * on Solaris and reads up to 256 characters.
 306                  *
 307                  * OpenBSD has a readpassphrase() that might be more suitable.
 308                  */
 309                 pass = getpass("Password: ");
 310         }
 311
 312         if (!pass)
 313                 pass = "";
 314
 315         generate_hash(pass, challenge, pass2);
 316         io_printf(fd, "%s %s\n", user, pass2);
 317 }