Avoid infinite wait reading secrets file.
[rsync.git] / authenticate.c
index 30bc53db26c92874ca3a2d0df151b7aa85cd4a00..c92746c6926f49e23fd38ce7b76c2e74d9c17df0 100644 (file)
@@ -1,38 +1,41 @@
-/* 
-   Copyright (C) Andrew Tridgell 1998
-   
-   This program is free software; you can redistribute it and/or modify
-   it under the terms of the GNU General Public License as published by
-   the Free Software Foundation; either version 2 of the License, or
-   (at your option) any later version.
-   
-   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., 675 Mass Ave, Cambridge, MA 02139, USA.
-*/
-
-/* support rsync authentication */
+/*
+ * Support rsync daemon authentication.
+ *
+ * Copyright (C) 1998-2000 Andrew Tridgell
+ * Copyright (C) 2002-2014 Wayne Davison
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 3 of the License, or
+ * (at your option) any later version.
+ *
+ * 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, visit the http://fsf.org website.
+ */
+
 #include "rsync.h"
+#include "itypes.h"
+
+extern int read_only;
+extern char *password_file;
 
 /***************************************************************************
 encode a buffer using base64 - simple and slow algorithm. null terminates
 the result.
   ***************************************************************************/
-static void base64_encode(char *buf, int len, char *out)
+void base64_encode(const char *buf, int len, char *out, int pad)
 {
        char *b64 = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";
        int bit_offset, byte_offset, idx, i;
-       unsigned char *d = (unsigned char *)buf;
+       const uchar *d = (const uchar *)buf;
        int bytes = (len*8 + 5)/6;
 
-       memset(out, 0, bytes+1);
-
-       for (i=0;i<bytes;i++) {
+       for (i = 0; i < bytes; i++) {
                byte_offset = (i*6)/8;
                bit_offset = (i*6)%8;
                if (bit_offset < 3) {
@@ -45,241 +48,326 @@ static void base64_encode(char *buf, int len, char *out)
                }
                out[i] = b64[idx];
        }
+
+       while (pad && (i % 4))
+               out[i++] = '=';
+
+       out[i] = '\0';
 }
 
-/* create a 16 byte challenge buffer */
-static void gen_challenge(char *addr, char *challenge)
+/* Generate a challenge buffer and return it base64-encoded. */
+static void gen_challenge(const char *addr, char *challenge)
 {
        char input[32];
+       char digest[MAX_DIGEST_LEN];
        struct timeval tv;
+       int len;
 
-       memset(input, 0, sizeof(input));
+       memset(input, 0, sizeof input);
 
-       strlcpy((char *)input, addr, 17);
+       strlcpy(input, addr, 17);
        sys_gettimeofday(&tv);
        SIVAL(input, 16, tv.tv_sec);
        SIVAL(input, 20, tv.tv_usec);
        SIVAL(input, 24, getpid());
 
-       sum_init();
-       sum_update(input, sizeof(input));
-       sum_end(challenge);
+       sum_init(0);
+       sum_update(input, sizeof input);
+       len = sum_end(digest);
+
+       base64_encode(digest, len, challenge, 0);
 }
 
+/* Generate an MD4 hash created from the combination of the password
+ * and the challenge string and return it base64-encoded. */
+static void generate_hash(const char *in, const char *challenge, char *out)
+{
+       char buf[MAX_DIGEST_LEN];
+       int len;
+
+       sum_init(0);
+       sum_update(in, strlen(in));
+       sum_update(challenge, strlen(challenge));
+       len = sum_end(buf);
+
+       base64_encode(buf, len, out, 0);
+}
 
-/* return the secret for a user from the sercret file. maximum length
-   is len. null terminate it */
-static int get_secret(int module, char *user, char *secret, int len)
+/* Return the secret for a user from the secret file, null terminated.
+ * Maximum length is len (not counting the null). */
+static const char *check_secret(int module, const char *user, const char *group,
+                               const char *challenge, const char *pass)
 {
-       char *fname = lp_secrets_file(module);
-       int fd, found=0;
-       char line[MAXPATHLEN];
-       char *p, *pass=NULL;
+       char line[1024];
+       char pass2[MAX_DIGEST_LEN*2];
+       const char *fname = lp_secrets_file(module);
        STRUCT_STAT st;
        int ok = 1;
-       extern int am_root;
+       int user_len = strlen(user);
+       int group_len = group ? strlen(group) : 0;
+       char *err;
+       FILE *fh;
 
-       if (!fname || !*fname) return 0;
+       if (!fname || !*fname || (fh = fopen(fname, "r")) == NULL)
+               return "no secrets file";
 
-       fd = open(fname,O_RDONLY);
-       if (fd == -1) return 0;
-
-       if (do_stat(fname, &st) == -1) {
-               rprintf(FERROR,"stat(%s) : %s\n", fname, strerror(errno));
+       if (do_fstat(fileno(fh), &st) == -1) {
+               rsyserr(FLOG, errno, "fstat(%s)", fname);
                ok = 0;
        } else if (lp_strict_modes(module)) {
                if ((st.st_mode & 06) != 0) {
-                       rprintf(FERROR,"secrets file must not be other-accessible (see strict modes option)\n");
+                       rprintf(FLOG, "secrets file must not be other-accessible (see strict modes option)\n");
                        ok = 0;
-               } else if (am_root && (st.st_uid != 0)) {
-                       rprintf(FERROR,"secrets file must be owned by root when running as root (see strict modes)\n");
+               } else if (MY_UID() == 0 && st.st_uid != 0) {
+                       rprintf(FLOG, "secrets file must be owned by root when running as root (see strict modes)\n");
                        ok = 0;
                }
        }
        if (!ok) {
-               rprintf(FERROR,"continuing without secrets file\n");
-               close(fd);
-               return 0;
+               fclose(fh);
+               return "ignoring secrets file";
        }
 
-       while (!found) {
-               int i = 0;
-               memset(line, 0, sizeof(line));
-               while (i<(sizeof(line)-1)) {
-                       if (read(fd, &line[i], 1) != 1) {
-                               memset(line, 0, sizeof(line));
-                               close(fd);
-                               return 0;
-                       }
-                       if (line[i] == '\r') continue;
-                       if (line[i] == '\n') break;
-                       i++;
+       if (*user == '#') {
+               /* Reject attempt to match a comment. */
+               fclose(fh);
+               return "invalid username";
+       }
+
+       /* Try to find a line that starts with the user (or @group) name and a ':'. */
+       err = "secret not found";
+       while ((user || group) && fgets(line, sizeof line, fh) != NULL) {
+               const char **ptr, *s = strtok(line, "\n\r");
+               int len;
+               if (!s)
+                       continue;
+               if (*s == '@') {
+                       ptr = &group;
+                       len = group_len;
+                       s++;
+               } else {
+                       ptr = &user;
+                       len = user_len;
                }
-               line[i] = 0;
-               if (line[0] == '#') continue;
-               p = strchr(line,':');
-               if (!p) continue;
-               *p = 0;
-               if (strcmp(user, line)) continue;
-               pass = p+1;
-               found = 1;
+               if (!*ptr || strncmp(s, *ptr, len) != 0 || s[len] != ':')
+                       continue;
+               generate_hash(s+len+1, challenge, pass2);
+               if (strcmp(pass, pass2) == 0) {
+                       err = NULL;
+                       break;
+               }
+               err = "password mismatch";
+               *ptr = NULL; /* Don't look for name again. */
        }
 
-       close(fd);
-       if (!found) return 0;
+       fclose(fh);
+
+       memset(line, 0, sizeof line);
+       memset(pass2, 0, sizeof pass2);
 
-       strlcpy(secret, pass, len);
-       return 1;
+       return err;
 }
 
-static char *getpassf(char *filename)
+static const char *getpassf(const char *filename)
 {
-       char buffer[100];
-       int fd=0;
        STRUCT_STAT st;
-       int ok = 1;
-       extern int am_root;
-       char *envpw=getenv("RSYNC_PASSWORD");
-
-       if (!filename) return NULL;
+       char buffer[512], *p;
+       int n;
 
-       if ( (fd=open(filename,O_RDONLY)) == -1) {
-               rprintf(FERROR,"could not open password file \"%s\"\n",filename);
-               if (envpw) rprintf(FERROR,"falling back to RSYNC_PASSWORD environment variable.\n");    
-               return NULL;
-       }
-       
-       if (do_stat(filename, &st) == -1) {
-               rprintf(FERROR,"stat(%s) : %s\n", filename, strerror(errno));
-               ok = 0;
-       } else if ((st.st_mode & 06) != 0) {
-               rprintf(FERROR,"password file must not be other-accessible\n");
-               ok = 0;
-       } else if (am_root && (st.st_uid != 0)) {
-               rprintf(FERROR,"password file must be owned by root when running as root\n");
-               ok = 0;
-       }
-       if (!ok) {
-               rprintf(FERROR,"continuing without password file\n");
-               if (envpw) rprintf(FERROR,"using RSYNC_PASSWORD environment variable.\n");
-               close(fd);
+       if (!filename)
                return NULL;
-       }
 
-       if (envpw) rprintf(FERROR,"RSYNC_PASSWORD environment variable ignored\n");
+       if (strcmp(filename, "-") == 0) {
+               n = fgets(buffer, sizeof buffer, stdin) == NULL ? -1 : (int)strlen(buffer);
+       } else {
+               int fd;
 
-       buffer[sizeof(buffer)-1]='\0';
-       if (read(fd,buffer,sizeof(buffer)-1) > 0)
-       {
-               char *p = strtok(buffer,"\n\r");
-               close(fd);
-               if (p) p = strdup(p);
-               return p;
-       }       
+               if ((fd = open(filename,O_RDONLY)) < 0) {
+                       rsyserr(FERROR, errno, "could not open password file %s", filename);
+                       exit_cleanup(RERR_SYNTAX);
+               }
 
-       return NULL;
-}
+               if (do_stat(filename, &st) == -1) {
+                       rsyserr(FERROR, errno, "stat(%s)", filename);
+                       exit_cleanup(RERR_SYNTAX);
+               }
+               if ((st.st_mode & 06) != 0) {
+                       rprintf(FERROR, "ERROR: password file must not be other-accessible\n");
+                       exit_cleanup(RERR_SYNTAX);
+               }
+               if (MY_UID() == 0 && st.st_uid != 0) {
+                       rprintf(FERROR, "ERROR: password file must be owned by root when running as root\n");
+                       exit_cleanup(RERR_SYNTAX);
+               }
 
-/* generate a 16 byte hash from a password and challenge */
-static void generate_hash(char *in, char *challenge, char *out)
-{
-       char buf[16];
+               n = read(fd, buffer, sizeof buffer - 1);
+               close(fd);
+       }
 
-       sum_init();
-       sum_update(in, strlen(in));
-       sum_update(challenge, strlen(challenge));
-       sum_end(buf);
+       if (n > 0) {
+               buffer[n] = '\0';
+               if ((p = strtok(buffer, "\n\r")) != NULL)
+                       return strdup(p);
+       }
 
-       base64_encode(buf, 16, out);
+       rprintf(FERROR, "ERROR: failed to read a password from %s\n", filename);
+       exit_cleanup(RERR_SYNTAX);
 }
 
-/* possible negotiate authentication with the client. Use "leader" to
-   start off the auth if necessary 
-
-   return NULL if authentication failed
-
-   return "" if anonymous access
-
-   otherwise return username
-*/
-char *auth_server(int fd, int module, char *addr, char *leader)
+/* Possibly negotiate authentication with the client.  Use "leader" to
+ * start off the auth if necessary.
+ *
+ * Return NULL if authentication failed.  Return "" if anonymous access.
+ * Otherwise return username.
+ */
+char *auth_server(int f_in, int f_out, int module, const char *host,
+                 const char *addr, const char *leader)
 {
        char *users = lp_auth_users(module);
-       char challenge[16];
-       char b64_challenge[30];
-       char line[MAXPATHLEN];
-       static char user[100];
-       char secret[100];
-       char pass[30];
-       char pass2[30];
-       char *tok;
+       char challenge[MAX_DIGEST_LEN*2];
+       char line[BIGPATHBUFLEN];
+       char **auth_uid_groups = NULL;
+       int auth_uid_groups_cnt = -1;
+       const char *err = NULL;
+       int group_match = -1;
+       char *tok, *pass;
+       char opt_ch = '\0';
 
        /* if no auth list then allow anyone in! */
-       if (!users || !*users) return "";
+       if (!users || !*users)
+               return "";
 
        gen_challenge(addr, challenge);
-       
-       base64_encode(challenge, 16, b64_challenge);
 
-       io_printf(fd,"%s%s\n", leader, b64_challenge);
+       io_printf(f_out, "%s%s\n", leader, challenge);
 
-       if (!read_line(fd, line, sizeof(line)-1)) {
+       if (!read_line_old(f_in, line, sizeof line, 0)
+        || (pass = strchr(line, ' ')) == NULL) {
+               rprintf(FLOG, "auth failed on module %s from %s (%s): "
+                       "invalid challenge response\n",
+                       lp_name(module), host, addr);
                return NULL;
        }
+       *pass++ = '\0';
+
+       if (!(users = strdup(users)))
+               out_of_memory("auth_server");
+
+       for (tok = strtok(users, " ,\t"); tok; tok = strtok(NULL, " ,\t")) {
+               char *opts;
+               /* See if the user appended :deny, :ro, or :rw. */
+               if ((opts = strchr(tok, ':')) != NULL) {
+                       *opts++ = '\0';
+                       opt_ch = isUpper(opts) ? toLower(opts) : *opts;
+                       if (opt_ch == 'r') { /* handle ro and rw */
+                               opt_ch = isUpper(opts+1) ? toLower(opts+1) : opts[1];
+                               if (opt_ch == 'o')
+                                       opt_ch = 'r';
+                               else if (opt_ch != 'w')
+                                       opt_ch = '\0';
+                       } else if (opt_ch != 'd') /* if it's not deny, ignore it */
+                               opt_ch = '\0';
+               } else
+                       opt_ch = '\0';
+               if (*tok != '@') {
+                       /* Match the username */
+                       if (wildmatch(tok, line))
+                               break;
+               } else {
+#ifdef HAVE_GETGROUPLIST
+                       int j;
+                       /* See if authorizing user is a real user, and if so, see
+                        * if it is in a group that matches tok+1 wildmat. */
+                       if (auth_uid_groups_cnt < 0) {
+                               gid_t gid_list[64];
+                               uid_t auth_uid;
+                               auth_uid_groups_cnt = sizeof gid_list / sizeof (gid_t);
+                               if (!user_to_uid(line, &auth_uid, False)
+                                || getallgroups(auth_uid, gid_list, &auth_uid_groups_cnt) != NULL)
+                                       auth_uid_groups_cnt = 0;
+                               else {
+                                       if ((auth_uid_groups = new_array(char *, auth_uid_groups_cnt)) == NULL)
+                                               out_of_memory("auth_server");
+                                       for (j = 0; j < auth_uid_groups_cnt; j++)
+                                               auth_uid_groups[j] = gid_to_group(gid_list[j]);
+                               }
+                       }
+                       for (j = 0; j < auth_uid_groups_cnt; j++) {
+                               if (auth_uid_groups[j] && wildmatch(tok+1, auth_uid_groups[j])) {
+                                       group_match = j;
+                                       break;
+                               }
+                       }
+                       if (group_match >= 0)
+                               break;
+#else
+                       rprintf(FLOG, "your computer doesn't support getgrouplist(), so no @group authorization is possible.\n");
+#endif
+               }
+       }
 
-       memset(user, 0, sizeof(user));
-       memset(pass, 0, sizeof(pass));
+       free(users);
 
-       if (sscanf(line,"%99s %29s", user, pass) != 2) {
-               return NULL;
+       if (!tok)
+               err = "no matching rule";
+       else if (opt_ch == 'd')
+               err = "denied by rule";
+       else {
+               char *group = group_match >= 0 ? auth_uid_groups[group_match] : NULL;
+               err = check_secret(module, line, group, challenge, pass);
        }
 
-       users = strdup(users);
-       if (!users) return NULL;
+       memset(challenge, 0, sizeof challenge);
+       memset(pass, 0, strlen(pass));
 
-       for (tok=strtok(users," ,\t"); tok; tok = strtok(NULL," ,\t")) {
-               if (strcmp(tok, user) == 0) break;
+       if (auth_uid_groups) {
+               int j;
+               for (j = 0; j < auth_uid_groups_cnt; j++) {
+                       if (auth_uid_groups[j])
+                               free(auth_uid_groups[j]);
+               }
+               free(auth_uid_groups);
        }
-       free(users);
 
-       if (!tok) {
-               return NULL;
-       }
-       
-       memset(secret, 0, sizeof(secret));
-       if (!get_secret(module, user, secret, sizeof(secret)-1)) {
-               memset(secret, 0, sizeof(secret));
+       if (err) {
+               rprintf(FLOG, "auth failed on module %s from %s (%s) for %s: %s\n",
+                       lp_name(module), host, addr, line, err);
                return NULL;
        }
 
-       generate_hash(secret, b64_challenge, pass2);
-       memset(secret, 0, sizeof(secret));
-       
-       if (strcmp(pass, pass2) == 0)
-               return user;
+       if (opt_ch == 'r')
+               read_only = 1;
+       else if (opt_ch == 'w')
+               read_only = 0;
 
-       return NULL;
+       return strdup(line);
 }
 
-
-void auth_client(int fd, char *user, char *challenge)
+void auth_client(int fd, const char *user, const char *challenge)
 {
-       char *pass;
-       char pass2[30];
-       extern char *password_file;
-
-       if (!user || !*user) return;
-
-       if (!(pass=getpassf(password_file)) && !(pass=getenv("RSYNC_PASSWORD"))) {
+       const char *pass;
+       char pass2[MAX_DIGEST_LEN*2];
+
+       if (!user || !*user)
+               user = "nobody";
+
+       if (!(pass = getpassf(password_file))
+        && !(pass = getenv("RSYNC_PASSWORD"))) {
+               /* XXX: cyeoh says that getpass is deprecated, because
+                * it may return a truncated password on some systems,
+                * and it is not in the LSB.
+                 *
+                 * Andrew Klein says that getpassphrase() is present
+                 * on Solaris and reads up to 256 characters.
+                 *
+                 * OpenBSD has a readpassphrase() that might be more suitable.
+                 */
                pass = getpass("Password: ");
        }
 
-       if (!pass || !*pass) {
+       if (!pass)
                pass = "";
-       }
 
        generate_hash(pass, challenge, pass2);
        io_printf(fd, "%s %s\n", user, pass2);
 }
-
-