* fileio.c: Integer overflow issues with file modes.

(Fset_file_modes, auto_save_1): Don't assume EMACS_INT fits in int.

diff --git a/src/ChangeLog b/src/ChangeLog
index 869e2637cf45b69b19ac4729a8b2c7148eb67669..c516a346a89c8a7f592135691993f37f98465e6c 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,8 @@
 2011-07-18  Paul Eggert  <eggert@cs.ucla.edu>
 
+       * fileio.c: Integer overflow issues with file modes.
+       (Fset_file_modes, auto_save_1): Don't assume EMACS_INT fits in int.
+
        * charset.c (read_hex): New arg OVERFLOW.  All uses changed.
        Remove unreachable code.
        (read_hex, load_charset_map_from_file): Check for integer overflow.

diff --git a/src/fileio.c b/src/fileio.c
index bdea302a0d6a5088dc9c710b2ed8ef18292aa5b8..af11e92705921ee33f1ceb23fdfcfdeccf67ffcc 100644 (file)
--- a/src/fileio.c
+++ b/src/fileio.c
@@ -2893,7 +2893,7 @@ symbolic notation, like the `chmod' command from GNU Coreutils.  */)
 
   encoded_absname = ENCODE_FILE (absname);
 
-  if (chmod (SSDATA (encoded_absname), XINT (mode)) < 0)
+  if (chmod (SSDATA (encoded_absname), XINT (mode) & 07777) < 0)
     report_file_error ("Doing chmod", Fcons (absname, Qnil));
 
   return Qnil;
@@ -5095,11 +5095,11 @@ auto_save_1 (void)
     {
       if (stat (SSDATA (BVAR (current_buffer, filename)), &st) >= 0)
        /* But make sure we can overwrite it later!  */
-       auto_save_mode_bits = st.st_mode | 0600;
+       auto_save_mode_bits = (st.st_mode | 0600) & 0777;
       else if ((modes = Ffile_modes (BVAR (current_buffer, filename)),
                INTEGERP (modes)))
        /* Remote files don't cooperate with stat.  */
-       auto_save_mode_bits = XINT (modes) | 0600;
+       auto_save_mode_bits = (XINT (modes) | 0600) & 0777;
     }
 
   return