upstream

5 files changed, 69 insertions, 54 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 2aa0e157afe..2b5b6fd0602 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,25 @@
+2011-08-18  Eli Zaretskii  <eliz@gnu.org>
+
+        * bidi.c (bidi_get_type): If bidi_type_table reports zero as the
+        character bidirectional type, use STRONG_L instead.  Fixes crashes
+        in a buffer produced by `describe-categories'.
+
+        * dispextern.h (struct bidi_it): Move disp_pos and disp_prop_p
+        members before the level stack, so they would be saved and
+        restored when copying iterator state.  Fixes incorrect reordering
+        around TABs covered by display properties.
+
+2011-08-18  Andreas Schwab  <schwab@linux-m68k.org>
+
+        * process.c (Fnetwork_interface_list): Correctly determine buffer
+        size.
+
+2011-08-17  Chong Yidong  <cyd@stupidchicken.com>
+
+        * eval.c (internal_condition_case, internal_condition_case_1)
+        (internal_condition_case_2, internal_condition_case_n): Remove
+        unnecessary aborts (Bug#9081).
+
 2011-08-17  Eli Zaretskii  <eliz@gnu.org>
 
         * lread.c (Fload) [DOS_NT]: If `openp' returns -2, but the file
@@ -61,7 +83,7 @@
 2011-08-14  Kenichi Handa  <handa@m17n.org>
 
         * process.c (create_process): Call setup_process_coding_systems
-        after the pid of the process is set to -1.
+        after the pid of the process is set to -1 (Bug#8162).
 
 2011-08-14  Eli Zaretskii  <eliz@gnu.org>
 
diff --git a/src/bidi.c b/src/bidi.c
index c0eee33ab3f..7517eca5aed 100644
--- a/src/bidi.c
+++ b/src/bidi.c
@@ -108,6 +108,8 @@ bidi_get_type (int ch, bidi_dir_t override)
     abort ();
 
   default_type = (bidi_type_t) XINT (CHAR_TABLE_REF (bidi_type_table, ch));
+  if (default_type == 0)
+    default_type = STRONG_L;
 
   if (override == NEUTRAL_DIR)
     return default_type;
diff --git a/src/dispextern.h b/src/dispextern.h
index 3927ddf82bb..4d890fe6a37 100644
--- a/src/dispextern.h
+++ b/src/dispextern.h
@@ -1869,6 +1869,9 @@ struct bidi_it {
   EMACS_INT ignore_bn_limit;    /* position until which to ignore BNs */
   bidi_dir_t sor;               /* direction of start-of-run in effect */
   int scan_dir;                 /* direction of text scan, 1: forw, -1: back */
+  EMACS_INT disp_pos;           /* position of display string after ch */
+  int disp_prop_p;              /* if non-zero, there really is a
+                                   `display' property/string at disp_pos */
   int stack_idx;                /* index of current data on the stack */
   /* Note: Everything from here on is not copied/saved when the bidi
      iterator state is saved, pushed, or popped.  So only put here
@@ -1877,9 +1880,6 @@ struct bidi_it {
   struct bidi_string_data string;       /* string to reorder */
   bidi_dir_t paragraph_dir;     /* current paragraph direction */
   EMACS_INT separator_limit;    /* where paragraph separator should end */
-  EMACS_INT disp_pos;           /* position of display string after ch */
-  int disp_prop_p;              /* if non-zero, there really is a
-                                   `display' property/string at disp_pos */
   unsigned first_elt : 1;       /* if non-zero, examine current char first */
   unsigned new_paragraph : 1;   /* if non-zero, we expect a new paragraph */
   unsigned frame_window_p : 1;  /* non-zero if displaying on a GUI frame */
diff --git a/src/eval.c b/src/eval.c
index ef169e80e27..e37425020c9 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1461,13 +1461,6 @@ internal_condition_case (Lisp_Object (*bfun) (void), Lisp_Object handlers,
   struct catchtag c;
   struct handler h;
 
-  /* Since Fsignal will close off all calls to x_catch_errors,
-     we will get the wrong results if some are not closed now.  */
-#if HAVE_X_WINDOWS
-  if (x_catching_errors ())
-    abort ();
-#endif
-
   c.tag = Qnil;
   c.val = Qnil;
   c.backlist = backtrace_list;
@@ -1506,13 +1499,6 @@ internal_condition_case_1 (Lisp_Object (*bfun) (Lisp_Object), Lisp_Object arg,
   struct catchtag c;
   struct handler h;
 
-  /* Since Fsignal will close off all calls to x_catch_errors,
-     we will get the wrong results if some are not closed now.  */
-#if HAVE_X_WINDOWS
-  if (x_catching_errors ())
-    abort ();
-#endif
-
   c.tag = Qnil;
   c.val = Qnil;
   c.backlist = backtrace_list;
@@ -1555,13 +1541,6 @@ internal_condition_case_2 (Lisp_Object (*bfun) (Lisp_Object, Lisp_Object),
   struct catchtag c;
   struct handler h;
 
-  /* Since Fsignal will close off all calls to x_catch_errors,
-     we will get the wrong results if some are not closed now.  */
-#if HAVE_X_WINDOWS
-  if (x_catching_errors ())
-    abort ();
-#endif
-
   c.tag = Qnil;
   c.val = Qnil;
   c.backlist = backtrace_list;
@@ -1604,13 +1583,6 @@ internal_condition_case_n (Lisp_Object (*bfun) (ptrdiff_t, Lisp_Object *),
   struct catchtag c;
   struct handler h;
 
-  /* Since Fsignal will close off all calls to x_catch_errors,
-     we will get the wrong results if some are not closed now.  */
-#if HAVE_X_WINDOWS
-  if (x_catching_errors ())
-    abort ();
-#endif
-
   c.tag = Qnil;
   c.val = Qnil;
   c.backlist = backtrace_list;
diff --git a/src/process.c b/src/process.c
index 71a6f91a7bb..2125478907f 100644
--- a/src/process.c
+++ b/src/process.c
@@ -3580,38 +3580,57 @@ format; see the description of ADDRESS in `make-network-process'.  */)
   if (s < 0)
     return Qnil;
 
- again:
-  buf_size *= 2;
-  buf = xrealloc(buf, buf_size);
-  if (!buf)
+  ifconf.ifc_buf = 0;
+  ifconf.ifc_len = 0;
+  if (ioctl (s, SIOCGIFCONF, &ifconf) == 0 && ifconf.ifc_len > 0)
     {
-      close (s);
-      return Qnil;
+      ifconf.ifc_buf = xmalloc (ifconf.ifc_len);
+      if (ifconf.ifc_buf == NULL)
+        {
+          close (s);
+          return Qnil;
+        }
+      if (ioctl (s, SIOCGIFCONF, &ifconf))
+        {
+          close (s);
+          xfree (ifconf.ifc_buf);
+          return Qnil;
+        }
     }
+  else
+    do
+      {
+        buf_size *= 2;
+        buf = xrealloc (buf, buf_size);
+        if (!buf)
+          {
+            close (s);
+            return Qnil;
+          }
 
-  ifconf.ifc_buf = buf;
-  if (ioctl (s, SIOCGIFCONF, &ifconf))
-    {
-      close (s);
-      xfree (buf);
-      return Qnil;
-    }
+        ifconf.ifc_buf = buf;
+        ifconf.ifc_len = buf_size;
+        if (ioctl (s, SIOCGIFCONF, &ifconf))
+          {
+            close (s);
+            xfree (buf);
+            return Qnil;
+          }
 
-  if (ifconf.ifc_len == buf_size)
-    goto again;
+      }
+    while (ifconf.ifc_len == buf_size);
 
   close (s);
 
   res = Qnil;
-  for (ifreq = ifconf.ifc_req;
-       (char *) ifreq < (char *) (ifconf.ifc_req) + ifconf.ifc_len;
-       )
+  ifreq = ifconf.ifc_req;
+  while ((char *) ifreq < (char *) ifconf.ifc_req + ifconf.ifc_len)
     {
       struct ifreq *ifq = ifreq;
 #ifdef HAVE_STRUCT_IFREQ_IFR_ADDR_SA_LEN
-#define SIZEOF_IFREQ(sif)                                               \
-      ((sif)->ifr_addr.sa_len < sizeof(struct sockaddr) ?               \
-       sizeof((*sif)) : sizeof ((sif)->ifr_name) + sif->ifr_addr.sa_len)
+#define SIZEOF_IFREQ(sif)                                               \
+      ((sif)->ifr_addr.sa_len < sizeof (struct sockaddr)                \
+       ? sizeof (*(sif)) : sizeof ((sif)->ifr_name) + (sif)->ifr_addr.sa_len)
 
       int len = SIZEOF_IFREQ (ifq);
 #else
@@ -3619,7 +3638,7 @@ format; see the description of ADDRESS in `make-network-process'.  */)
 #endif
       char namebuf[sizeof (ifq->ifr_name) + 1];
       i += len;
-      ifreq = (struct ifreq*) ((char*) ifreq + len);
+      ifreq = (struct ifreq *) ((char *) ifreq + len);
 
       if (ifq->ifr_addr.sa_family != AF_INET)
         continue;