* src/arscan.c (ar_scan): Restrict length for sscanf of ar_mode.

diff --git a/src/arscan.c b/src/arscan.c
index 9a0a7a0cc831ec9c1038017978b4077d74a551b7..2dc39f7b2eede45dbb3c972766b64f2b4c14b583 100644 (file)
--- a/src/arscan.c
+++ b/src/arscan.c
@@ -703,7 +703,7 @@ ar_scan (const char *archive, ar_member_func_t function, const void *arg)
         }
 
 #ifndef M_XENIX
-        sscanf (TOCHAR (member_header.ar_mode), "%o", &eltmode);
+        sscanf (TOCHAR (member_header.ar_mode), "%8o", &eltmode);
         eltsize = atol (TOCHAR (member_header.ar_size));
 #else   /* Xenix.  */
         eltmode = (unsigned short int) member_header.ar_mode;