2003-06-08 Andrew Cagney <cagney@redhat.com>
[deliverable/binutils-gdb.git] / gdb / event-loop.c
index 7e3e02c890c3e55d948b57ac18db0da45cf3e0fe..c8d12f925df3a0925ba3c7ccb974b84d30e73228 100644 (file)
@@ -1,5 +1,5 @@
 /* Event loop machinery for GDB, the GNU debugger.
-   Copyright 1999 Free Software Foundation, Inc.
+   Copyright 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
    Written by Elena Zannoni <ezannoni@cygnus.com> of Cygnus Solutions.
 
    This file is part of GDB.
    Boston, MA 02111-1307, USA. */
 
 #include "defs.h"
-#include "top.h"
 #include "event-loop.h"
 #include "event-top.h"
+
 #ifdef HAVE_POLL
+#if defined (HAVE_POLL_H)
 #include <poll.h>
-#else
-#include <sys/types.h>
-#endif
-#include <errno.h>
-#include <setjmp.h>
-#include <sys/time.h>
-
-/* Type of the mask arguments to select. */
-
-#ifndef NO_FD_SET
-#define SELECT_MASK fd_set
-#else
-#ifndef _AIX
-typedef long fd_mask;
-#endif
-#if defined(_IBMR2)
-#define SELECT_MASK void
-#else
-#define SELECT_MASK int
+#elif defined (HAVE_SYS_POLL_H)
+#include <sys/poll.h>
 #endif
 #endif
 
-/* Define "NBBY" (number of bits per byte) if it's not already defined. */
-
-#ifndef NBBY
-#define NBBY 8
-#endif
-
-
-/* Define the number of fd_masks in an fd_set */
-
-#ifndef FD_SETSIZE
-#ifdef OPEN_MAX
-#define FD_SETSIZE OPEN_MAX
-#else
-#define FD_SETSIZE 256
-#endif
-#endif
-#if !defined(howmany)
-#define howmany(x, y) (((x)+((y)-1))/(y))
-#endif
-#ifndef NFDBITS
-#define NFDBITS NBBY*sizeof(fd_mask)
-#endif
-#define MASK_SIZE howmany(FD_SETSIZE, NFDBITS)
-
+#include <sys/types.h>
+#include "gdb_string.h"
+#include <errno.h>
+#include <sys/time.h>
 
 typedef struct gdb_event gdb_event;
 typedef void (event_handler_func) (int);
@@ -84,7 +48,7 @@ typedef void (event_handler_func) (int);
    ready. The procedure PROC associated with each event is always the
    same (handle_file_event).  Its duty is to invoke the handler
    associated with the file descriptor whose state change generated
-   the event, plus doing other cleanups adn such. */
+   the event, plus doing other cleanups and such. */
 
 struct gdb_event
   {
@@ -159,57 +123,47 @@ event_queue;
 /* As of 1999-04-30 only the input file descriptor is registered with the
    event loop. */
 
+/* Do we use poll or select ? */
 #ifdef HAVE_POLL
-/* Poll based implementation of the notifier. */
+#define USE_POLL 1
+#else
+#define USE_POLL 0
+#endif /* HAVE_POLL */
+
+static unsigned char use_poll = USE_POLL;
 
 static struct
   {
     /* Ptr to head of file handler list. */
     file_handler *first_file_handler;
 
+#ifdef HAVE_POLL
     /* Ptr to array of pollfd structures. */
     struct pollfd *poll_fds;
 
-    /* Number of file descriptors to monitor. */
-    int num_fds;
-
     /* Timeout in milliseconds for calls to poll(). */
-    int timeout;
-
-    /* Flag to tell whether the timeout value shuld be used. */
-    int timeout_valid;
-  }
-gdb_notifier;
-
-#else /* ! HAVE_POLL */
-
-/* Select based implementation of the notifier. */
-
-static struct
-  {
-    /* Ptr to head of file handler list. */
-    file_handler *first_file_handler;
+    int poll_timeout;
+#endif
 
     /* Masks to be used in the next call to select.
        Bits are set in response to calls to create_file_handler. */
-    fd_mask check_masks[3 * MASK_SIZE];
+    fd_set check_masks[3];
 
     /* What file descriptors were found ready by select. */
-    fd_mask ready_masks[3 * MASK_SIZE];
+    fd_set ready_masks[3];
 
-    /* Number of valid bits (highest fd value + 1). */
+    /* Number of file descriptors to monitor. (for poll) */
+    /* Number of valid bits (highest fd value + 1). (for select) */
     int num_fds;
 
     /* Time structure for calls to select(). */
-    struct timeval timeout;
+    struct timeval select_timeout;
 
-    /* Flag to tell whether the timeout struct should be used. */
+    /* Flag to tell whether the timeout should be used. */
     int timeout_valid;
   }
 gdb_notifier;
 
-#endif /* HAVE_POLL */
-
 /* Structure associated with a timer. PROC will be executed at the
    first occasion after WHEN. */
 struct gdb_timer
@@ -246,7 +200,7 @@ static struct
   }
 sighandler_list;
 
-/* Is any of the handlers ready?  Check this variable using
+/* Are any of the handlers ready?  Check this variable using
    check_async_ready. This is used by process_event, to determine
    whether or not to invoke the invoke_async_signal_handler
    function. */
@@ -256,7 +210,6 @@ static void create_file_handler (int fd, int mask, handler_func * proc, gdb_clie
 static void invoke_async_signal_handler (void);
 static void handle_file_event (int event_file_desc);
 static int gdb_wait_for_event (void);
-static int gdb_do_one_event (void *data);
 static int check_async_ready (void);
 static void async_queue_event (gdb_event * event_ptr, queue_position position);
 static gdb_event *create_file_event (int fd);
@@ -375,9 +328,9 @@ process_event (void)
          if (event_ptr->next_event == NULL)
            event_queue.last_event = prev_ptr;
        }
-      free ((char *) event_ptr);
+      xfree (event_ptr);
 
-      /* Now call the procedure associted with the event. */
+      /* Now call the procedure associated with the event. */
       (*proc) (fd);
       return 1;
     }
@@ -390,9 +343,9 @@ process_event (void)
    wait for something to happen (via gdb_wait_for_event), then process
    it.  Returns >0 if something was done otherwise returns <0 (this
    can happen if there are no event sources to wait for).  If an error
-   occures catch_errors() which calls this function returns zero. */
+   occurs catch_errors() which calls this function returns zero. */
 
-static int
+int
 gdb_do_one_event (void *data)
 {
   /* Any events already waiting in the queue? */
@@ -400,26 +353,26 @@ gdb_do_one_event (void *data)
     {
       return 1;
     }
-  
+
   /* Are any timers that are ready? If so, put an event on the queue. */
   poll_timers ();
-  
+
   /* Wait for a new event.  If gdb_wait_for_event returns -1,
      we should get out because this means that there are no
      event sources left. This will make the event loop stop,
      and the application exit. */
-  
+
   if (gdb_wait_for_event () < 0)
     {
       return -1;
     }
-  
+
   /* Handle any new events occurred while waiting. */
   if (process_event ())
     {
       return 1;
     }
-  
+
   /* If gdb_wait_for_event has returned 1, it means that one
      event has been handled. We break out of the loop. */
   return 1;
@@ -439,15 +392,30 @@ start_event_loop (void)
      longer any event sources registered. */
   while (1)
     {
-      int result = catch_errors (gdb_do_one_event, 0, "", RETURN_MASK_ALL);
-      if (result < 0)
+      int gdb_result;
+
+      gdb_result = catch_errors (gdb_do_one_event, 0, "", RETURN_MASK_ALL);
+      if (gdb_result < 0)
        break;
-      if (result == 0)
+
+      /* If we long-jumped out of do_one_event, we probably
+         didn't get around to resetting the prompt, which leaves
+         readline in a messed-up state.  Reset it here. */
+
+      if (gdb_result == 0)
        {
          /* FIXME: this should really be a call to a hook that is
             interface specific, because interfaces can display the
             prompt in their own way. */
          display_gdb_prompt (0);
+         /* This call looks bizarre, but it is required.  If the user
+            entered a command that caused an error,
+            after_char_processing_hook won't be called from
+            rl_callback_read_char_wrapper.  Using a cleanup there
+            won't work, since we want this function to be called
+            after a new prompt is printed.  */
+         if (after_char_processing_hook)
+           (*after_char_processing_hook) ();
          /* Maybe better to set a flag to be checked somewhere as to
             whether display the prompt or not. */
        }
@@ -466,10 +434,37 @@ void
 add_file_handler (int fd, handler_func * proc, gdb_client_data client_data)
 {
 #ifdef HAVE_POLL
-  create_file_handler (fd, POLLIN, proc, client_data);
+  struct pollfd fds;
+#endif
+
+  if (use_poll)
+    {
+#ifdef HAVE_POLL
+      /* Check to see if poll () is usable. If not, we'll switch to
+         use select. This can happen on systems like
+         m68k-motorola-sys, `poll' cannot be used to wait for `stdin'.
+         On m68k-motorola-sysv, tty's are not stream-based and not
+         `poll'able. */
+      fds.fd = fd;
+      fds.events = POLLIN;
+      if (poll (&fds, 1, 0) == 1 && (fds.revents & POLLNVAL))
+       use_poll = 0;
 #else
-  create_file_handler (fd, GDB_READABLE | GDB_EXCEPTION, proc, client_data);
+      internal_error (__FILE__, __LINE__,
+                     "use_poll without HAVE_POLL");
+#endif /* HAVE_POLL */
+    }
+  if (use_poll)
+    {
+#ifdef HAVE_POLL
+      create_file_handler (fd, POLLIN, proc, client_data);
+#else
+      internal_error (__FILE__, __LINE__,
+                     "use_poll without HAVE_POLL");
 #endif
+    }
+  else
+    create_file_handler (fd, GDB_READABLE | GDB_EXCEPTION, proc, client_data);
 }
 
 /* Add a file handler/descriptor to the list of descriptors we are
@@ -487,10 +482,6 @@ create_file_handler (int fd, int mask, handler_func * proc, gdb_client_data clie
 {
   file_handler *file_ptr;
 
-#ifndef HAVE_POLL
-  int index, bit;
-#endif
-
   /* Do we already have a file handler for this file? (We may be
      changing its associated procedure). */
   for (file_ptr = gdb_notifier.first_file_handler; file_ptr != NULL;
@@ -509,51 +500,52 @@ create_file_handler (int fd, int mask, handler_func * proc, gdb_client_data clie
       file_ptr->ready_mask = 0;
       file_ptr->next_file = gdb_notifier.first_file_handler;
       gdb_notifier.first_file_handler = file_ptr;
-#ifdef HAVE_POLL
-      gdb_notifier.num_fds++;
-#endif
-    }
-  file_ptr->proc = proc;
-  file_ptr->client_data = client_data;
-  file_ptr->mask = mask;
 
+      if (use_poll)
+       {
 #ifdef HAVE_POLL
+         gdb_notifier.num_fds++;
+         if (gdb_notifier.poll_fds)
+           gdb_notifier.poll_fds =
+             (struct pollfd *) xrealloc (gdb_notifier.poll_fds,
+                                         (gdb_notifier.num_fds
+                                          * sizeof (struct pollfd)));
+         else
+           gdb_notifier.poll_fds =
+             (struct pollfd *) xmalloc (sizeof (struct pollfd));
+         (gdb_notifier.poll_fds + gdb_notifier.num_fds - 1)->fd = fd;
+         (gdb_notifier.poll_fds + gdb_notifier.num_fds - 1)->events = mask;
+         (gdb_notifier.poll_fds + gdb_notifier.num_fds - 1)->revents = 0;
+#else
+         internal_error (__FILE__, __LINE__,
+                         "use_poll without HAVE_POLL");
+#endif /* HAVE_POLL */
+       }
+      else
+       {
+         if (mask & GDB_READABLE)
+           FD_SET (fd, &gdb_notifier.check_masks[0]);
+         else
+           FD_CLR (fd, &gdb_notifier.check_masks[0]);
 
-  if (gdb_notifier.poll_fds)
-    gdb_notifier.poll_fds =
-      (struct pollfd *) realloc (gdb_notifier.poll_fds,
-                          (gdb_notifier.num_fds) * sizeof (struct pollfd));
-  else
-    gdb_notifier.poll_fds =
-      (struct pollfd *) xmalloc (sizeof (struct pollfd));
-  (gdb_notifier.poll_fds + gdb_notifier.num_fds - 1)->fd = fd;
-  (gdb_notifier.poll_fds + gdb_notifier.num_fds - 1)->events = mask;
-  (gdb_notifier.poll_fds + gdb_notifier.num_fds - 1)->revents = 0;
-
-#else /* ! HAVE_POLL */
-
-  index = fd / (NBBY * sizeof (fd_mask));
-  bit = 1 << (fd % (NBBY * sizeof (fd_mask)));
-
-  if (mask & GDB_READABLE)
-    gdb_notifier.check_masks[index] |= bit;
-  else
-    gdb_notifier.check_masks[index] &= ~bit;
-
-  if (mask & GDB_WRITABLE)
-    (gdb_notifier.check_masks + MASK_SIZE)[index] |= bit;
-  else
-    (gdb_notifier.check_masks + MASK_SIZE)[index] &= ~bit;
+         if (mask & GDB_WRITABLE)
+           FD_SET (fd, &gdb_notifier.check_masks[1]);
+         else
+           FD_CLR (fd, &gdb_notifier.check_masks[1]);
 
-  if (mask & GDB_EXCEPTION)
-    (gdb_notifier.check_masks + 2 * (MASK_SIZE))[index] |= bit;
-  else
-    (gdb_notifier.check_masks + 2 * (MASK_SIZE))[index] &= ~bit;
+         if (mask & GDB_EXCEPTION)
+           FD_SET (fd, &gdb_notifier.check_masks[2]);
+         else
+           FD_CLR (fd, &gdb_notifier.check_masks[2]);
 
-  if (gdb_notifier.num_fds <= fd)
-    gdb_notifier.num_fds = fd + 1;
+         if (gdb_notifier.num_fds <= fd)
+           gdb_notifier.num_fds = fd + 1;
+       }
+    }
 
-#endif /* HAVE_POLL */
+  file_ptr->proc = proc;
+  file_ptr->client_data = client_data;
+  file_ptr->mask = mask;
 }
 
 /* Remove the file descriptor FD from the list of monitored fd's: 
@@ -562,11 +554,10 @@ void
 delete_file_handler (int fd)
 {
   file_handler *file_ptr, *prev_ptr = NULL;
-  int i, j;
+  int i;
+#ifdef HAVE_POLL
+  int j;
   struct pollfd *new_poll_fds;
-#ifndef HAVE_POLL
-  int index, bit;
-  unsigned long flags;
 #endif
 
   /* Find the entry for the given file. */
@@ -581,61 +572,57 @@ delete_file_handler (int fd)
   if (file_ptr == NULL)
     return;
 
+  if (use_poll)
+    {
 #ifdef HAVE_POLL
-  /* Create a new poll_fds array by copying every fd's information but the
-     one we want to get rid of. */
+      /* Create a new poll_fds array by copying every fd's information but the
+         one we want to get rid of. */
 
-  new_poll_fds =
-    (struct pollfd *) xmalloc ((gdb_notifier.num_fds - 1) * sizeof (struct pollfd));
+      new_poll_fds =
+       (struct pollfd *) xmalloc ((gdb_notifier.num_fds - 1) * sizeof (struct pollfd));
 
-  for (i = 0, j = 0; i < gdb_notifier.num_fds; i++)
-    {
-      if ((gdb_notifier.poll_fds + i)->fd != fd)
+      for (i = 0, j = 0; i < gdb_notifier.num_fds; i++)
        {
-         (new_poll_fds + j)->fd = (gdb_notifier.poll_fds + i)->fd;
-         (new_poll_fds + j)->events = (gdb_notifier.poll_fds + i)->events;
-         (new_poll_fds + j)->revents = (gdb_notifier.poll_fds + i)->revents;
-         j++;
+         if ((gdb_notifier.poll_fds + i)->fd != fd)
+           {
+             (new_poll_fds + j)->fd = (gdb_notifier.poll_fds + i)->fd;
+             (new_poll_fds + j)->events = (gdb_notifier.poll_fds + i)->events;
+             (new_poll_fds + j)->revents = (gdb_notifier.poll_fds + i)->revents;
+             j++;
+           }
        }
+      xfree (gdb_notifier.poll_fds);
+      gdb_notifier.poll_fds = new_poll_fds;
+      gdb_notifier.num_fds--;
+#else
+      internal_error (__FILE__, __LINE__,
+                     "use_poll without HAVE_POLL");
+#endif /* HAVE_POLL */
     }
-  free (gdb_notifier.poll_fds);
-  gdb_notifier.poll_fds = new_poll_fds;
-  gdb_notifier.num_fds--;
-
-#else /* ! HAVE_POLL */
-
-  index = fd / (NBBY * sizeof (fd_mask));
-  bit = 1 << (fd % (NBBY * sizeof (fd_mask)));
-
-  if (file_ptr->mask & GDB_READABLE)
-    gdb_notifier.check_masks[index] &= ~bit;
-  if (file_ptr->mask & GDB_WRITABLE)
-    (gdb_notifier.check_masks + MASK_SIZE)[index] &= ~bit;
-  if (file_ptr->mask & GDB_EXCEPTION)
-    (gdb_notifier.check_masks + 2 * (MASK_SIZE))[index] &= ~bit;
+  else
+    {
+      if (file_ptr->mask & GDB_READABLE)
+       FD_CLR (fd, &gdb_notifier.check_masks[0]);
+      if (file_ptr->mask & GDB_WRITABLE)
+       FD_CLR (fd, &gdb_notifier.check_masks[1]);
+      if (file_ptr->mask & GDB_EXCEPTION)
+       FD_CLR (fd, &gdb_notifier.check_masks[2]);
 
-  /* Find current max fd. */
+      /* Find current max fd. */
 
-  if ((fd + 1) == gdb_notifier.num_fds)
-    {
-      for (gdb_notifier.num_fds = 0; index >= 0; index--)
+      if ((fd + 1) == gdb_notifier.num_fds)
        {
-         flags = gdb_notifier.check_masks[index]
-           | (gdb_notifier.check_masks + MASK_SIZE)[index]
-           | (gdb_notifier.check_masks + 2 * (MASK_SIZE))[index];
-         if (flags)
+         gdb_notifier.num_fds--;
+         for (i = gdb_notifier.num_fds; i; i--)
            {
-             for (i = (NBBY * sizeof (fd_mask)); i > 0; i--)
-               {
-                 if (flags & (((unsigned long) 1) << (i - 1)))
-                   break;
-               }
-             gdb_notifier.num_fds = index * (NBBY * sizeof (fd_mask)) + i;
-             break;
+             if (FD_ISSET (i - 1, &gdb_notifier.check_masks[0])
+                 || FD_ISSET (i - 1, &gdb_notifier.check_masks[1])
+                 || FD_ISSET (i - 1, &gdb_notifier.check_masks[2]))
+               break;
            }
+         gdb_notifier.num_fds = i;
        }
     }
-#endif /* HAVE_POLL */
 
   /* Deactivate the file descriptor, by clearing its mask, 
      so that it will not fire again. */
@@ -653,7 +640,7 @@ delete_file_handler (int fd)
        ;
       prev_ptr->next_file = file_ptr->next_file;
     }
-  free ((char *) file_ptr);
+  xfree (file_ptr);
 }
 
 /* Handle the given event by calling the procedure associated to the
@@ -687,36 +674,44 @@ handle_file_event (int event_file_desc)
          /* See if the desired events (mask) match the received
             events (ready_mask). */
 
+         if (use_poll)
+           {
 #ifdef HAVE_POLL
-         error_mask = POLLHUP | POLLERR | POLLNVAL;
-         mask = (file_ptr->ready_mask & file_ptr->mask) |
-           (file_ptr->ready_mask & error_mask);
-         error_mask_returned = mask & error_mask;
+             error_mask = POLLHUP | POLLERR | POLLNVAL;
+             mask = (file_ptr->ready_mask & file_ptr->mask) |
+               (file_ptr->ready_mask & error_mask);
+             error_mask_returned = mask & error_mask;
 
-         if (error_mask_returned != 0)
-           {
-             /* Work in progress. We may need to tell somebody what
-                kind of error we had. */
-             /*if (error_mask_returned & POLLHUP)
-                printf_unfiltered ("Hangup detected on fd %d\n", file_ptr->fd);
-                if (error_mask_returned & POLLERR)
-                printf_unfiltered ("Error detected on fd %d\n", file_ptr->fd);
-                if (error_mask_returned & POLLNVAL)
-                printf_unfiltered ("Invalid fd %d\n", file_ptr->fd); */
-             file_ptr->error = 1;
+             if (error_mask_returned != 0)
+               {
+                 /* Work in progress. We may need to tell somebody what
+                    kind of error we had. */
+                 if (error_mask_returned & POLLHUP)
+                   printf_unfiltered ("Hangup detected on fd %d\n", file_ptr->fd);
+                 if (error_mask_returned & POLLERR)
+                   printf_unfiltered ("Error detected on fd %d\n", file_ptr->fd);
+                 if (error_mask_returned & POLLNVAL)
+                   printf_unfiltered ("Invalid or non-`poll'able fd %d\n", file_ptr->fd);
+                 file_ptr->error = 1;
+               }
+             else
+               file_ptr->error = 0;
+#else
+             internal_error (__FILE__, __LINE__,
+                             "use_poll without HAVE_POLL");
+#endif /* HAVE_POLL */
            }
          else
-           file_ptr->error = 0;
-#else /* ! HAVE_POLL */
-         if (file_ptr->ready_mask & GDB_EXCEPTION)
            {
-             printf_unfiltered ("Exception condition detected on fd %d\n", file_ptr->fd);
-             file_ptr->error = 1;
+             if (file_ptr->ready_mask & GDB_EXCEPTION)
+               {
+                 printf_unfiltered ("Exception condition detected on fd %d\n", file_ptr->fd);
+                 file_ptr->error = 1;
+               }
+             else
+               file_ptr->error = 0;
+             mask = file_ptr->ready_mask & file_ptr->mask;
            }
-         else
-           file_ptr->error = 0;
-         mask = file_ptr->ready_mask & file_ptr->mask;
-#endif /* HAVE_POLL */
 
          /* Clear the received events for next time around. */
          file_ptr->ready_mask = 0;
@@ -744,10 +739,6 @@ gdb_wait_for_event (void)
   int num_found = 0;
   int i;
 
-#ifndef HAVE_POLL
-  int mask, bit, index;
-#endif
-
   /* Make sure all output is done before getting another event. */
   gdb_flush (gdb_stdout);
   gdb_flush (gdb_stderr);
@@ -755,104 +746,116 @@ gdb_wait_for_event (void)
   if (gdb_notifier.num_fds == 0)
     return -1;
 
+  if (use_poll)
+    {
 #ifdef HAVE_POLL
-  num_found =
-    poll (gdb_notifier.poll_fds,
-         (unsigned long) gdb_notifier.num_fds,
-         gdb_notifier.timeout_valid ? gdb_notifier.timeout : -1);
-
-  /* Don't print anything if we get out of poll because of a
-     signal. */
-  if (num_found == -1 && errno != EINTR)
-    perror_with_name ("Poll");
-
-#else /* ! HAVE_POLL */
-  memcpy (gdb_notifier.ready_masks,
-         gdb_notifier.check_masks,
-         3 * MASK_SIZE * sizeof (fd_mask));
-  num_found = select (gdb_notifier.num_fds,
-                     (SELECT_MASK *) & gdb_notifier.ready_masks[0],
-                     (SELECT_MASK *) & gdb_notifier.ready_masks[MASK_SIZE],
-                 (SELECT_MASK *) & gdb_notifier.ready_masks[2 * MASK_SIZE],
-                 gdb_notifier.timeout_valid ? &gdb_notifier.timeout : NULL);
-
-  /* Clear the masks after an error from select. */
-  if (num_found == -1)
+      num_found =
+       poll (gdb_notifier.poll_fds,
+             (unsigned long) gdb_notifier.num_fds,
+             gdb_notifier.timeout_valid ? gdb_notifier.poll_timeout : -1);
+
+      /* Don't print anything if we get out of poll because of a
+         signal. */
+      if (num_found == -1 && errno != EINTR)
+       perror_with_name ("Poll");
+#else
+      internal_error (__FILE__, __LINE__,
+                     "use_poll without HAVE_POLL");
+#endif /* HAVE_POLL */
+    }
+  else
     {
-      memset (gdb_notifier.ready_masks,
-             0, 3 * MASK_SIZE * sizeof (fd_mask));
-      /* Dont print anything is we got a signal, let gdb handle it. */
-      if (errno != EINTR)
-       perror_with_name ("Select");
+      gdb_notifier.ready_masks[0] = gdb_notifier.check_masks[0];
+      gdb_notifier.ready_masks[1] = gdb_notifier.check_masks[1];
+      gdb_notifier.ready_masks[2] = gdb_notifier.check_masks[2];
+      num_found = select (gdb_notifier.num_fds,
+                         &gdb_notifier.ready_masks[0],
+                         &gdb_notifier.ready_masks[1],
+                         &gdb_notifier.ready_masks[2],
+                         gdb_notifier.timeout_valid
+                         ? &gdb_notifier.select_timeout : NULL);
+
+      /* Clear the masks after an error from select. */
+      if (num_found == -1)
+       {
+         FD_ZERO (&gdb_notifier.ready_masks[0]);
+         FD_ZERO (&gdb_notifier.ready_masks[1]);
+         FD_ZERO (&gdb_notifier.ready_masks[2]);
+         /* Dont print anything is we got a signal, let gdb handle it. */
+         if (errno != EINTR)
+           perror_with_name ("Select");
+       }
     }
-#endif /* HAVE_POLL */
 
   /* Enqueue all detected file events. */
 
+  if (use_poll)
+    {
 #ifdef HAVE_POLL
+      for (i = 0; (i < gdb_notifier.num_fds) && (num_found > 0); i++)
+       {
+         if ((gdb_notifier.poll_fds + i)->revents)
+           num_found--;
+         else
+           continue;
 
-  for (i = 0; (i < gdb_notifier.num_fds) && (num_found > 0); i++)
-    {
-      if ((gdb_notifier.poll_fds + i)->revents)
-       num_found--;
-      else
-       continue;
+         for (file_ptr = gdb_notifier.first_file_handler;
+              file_ptr != NULL;
+              file_ptr = file_ptr->next_file)
+           {
+             if (file_ptr->fd == (gdb_notifier.poll_fds + i)->fd)
+               break;
+           }
+
+         if (file_ptr)
+           {
+             /* Enqueue an event only if this is still a new event for
+                this fd. */
+             if (file_ptr->ready_mask == 0)
+               {
+                 file_event_ptr = create_file_event (file_ptr->fd);
+                 async_queue_event (file_event_ptr, TAIL);
+               }
+           }
 
+         file_ptr->ready_mask = (gdb_notifier.poll_fds + i)->revents;
+       }
+#else
+      internal_error (__FILE__, __LINE__,
+                     "use_poll without HAVE_POLL");
+#endif /* HAVE_POLL */
+    }
+  else
+    {
       for (file_ptr = gdb_notifier.first_file_handler;
-          file_ptr != NULL;
+          (file_ptr != NULL) && (num_found > 0);
           file_ptr = file_ptr->next_file)
        {
-         if (file_ptr->fd == (gdb_notifier.poll_fds + i)->fd)
-           break;
-       }
+         int mask = 0;
+
+         if (FD_ISSET (file_ptr->fd, &gdb_notifier.ready_masks[0]))
+           mask |= GDB_READABLE;
+         if (FD_ISSET (file_ptr->fd, &gdb_notifier.ready_masks[1]))
+           mask |= GDB_WRITABLE;
+         if (FD_ISSET (file_ptr->fd, &gdb_notifier.ready_masks[2]))
+           mask |= GDB_EXCEPTION;
+
+         if (!mask)
+           continue;
+         else
+           num_found--;
 
-      if (file_ptr)
-       {
          /* Enqueue an event only if this is still a new event for
             this fd. */
+
          if (file_ptr->ready_mask == 0)
            {
              file_event_ptr = create_file_event (file_ptr->fd);
              async_queue_event (file_event_ptr, TAIL);
            }
+         file_ptr->ready_mask = mask;
        }
-
-      file_ptr->ready_mask = (gdb_notifier.poll_fds + i)->revents;
-    }
-
-#else /* ! HAVE_POLL */
-  for (file_ptr = gdb_notifier.first_file_handler;
-       (file_ptr != NULL) && (num_found > 0);
-       file_ptr = file_ptr->next_file)
-    {
-      index = file_ptr->fd / (NBBY * sizeof (fd_mask));
-      bit = 1 << (file_ptr->fd % (NBBY * sizeof (fd_mask)));
-      mask = 0;
-
-      if (gdb_notifier.ready_masks[index] & bit)
-       mask |= GDB_READABLE;
-      if ((gdb_notifier.ready_masks + MASK_SIZE)[index] & bit)
-       mask |= GDB_WRITABLE;
-      if ((gdb_notifier.ready_masks + 2 * (MASK_SIZE))[index] & bit)
-       mask |= GDB_EXCEPTION;
-
-      if (!mask)
-       continue;
-      else
-       num_found--;
-
-      /* Enqueue an event only if this is still a new event for
-         this fd. */
-
-      if (file_ptr->ready_mask == 0)
-       {
-         file_event_ptr = create_file_event (file_ptr->fd);
-         async_queue_event (file_event_ptr, TAIL);
-       }
-      file_ptr->ready_mask = mask;
     }
-#endif /* HAVE_POLL */
-
   return 0;
 }
 \f
@@ -945,7 +948,7 @@ delete_async_signal_handler (async_signal_handler ** async_handler_ptr)
       if (sighandler_list.last_handler == (*async_handler_ptr))
        sighandler_list.last_handler = prev_ptr;
     }
-  free ((char *) (*async_handler_ptr));
+  xfree ((*async_handler_ptr));
   (*async_handler_ptr) = NULL;
 }
 
@@ -1052,7 +1055,7 @@ delete_timer (int id)
        ;
       prev_timer->next = timer_ptr->next;
     }
-  free ((char *) timer_ptr);
+  xfree (timer_ptr);
 
   gdb_notifier.timeout_valid = 0;
 }
@@ -1082,8 +1085,8 @@ handle_timer_event (int dummy)
       saved_timer = timer_ptr;
       timer_ptr = timer_ptr->next;
       /* Call the procedure associated with that timer. */
-      (*saved_timer->proc) (timer_ptr->client_data);
-      free (saved_timer);
+      (*saved_timer->proc) (saved_timer->client_data);
+      xfree (saved_timer);
     }
 
   gdb_notifier.timeout_valid = 0;
@@ -1114,8 +1117,11 @@ poll_timers (void)
        }
 
       /* Oops it expired already. Tell select / poll to return
-         immediately. */
-      if (delta.tv_sec < 0)
+         immediately. (Cannot simply test if delta.tv_sec is negative
+         because time_t might be unsigned.)  */
+      if (timer_list.first_timer->when.tv_sec < time_now.tv_sec
+         || (timer_list.first_timer->when.tv_sec == time_now.tv_sec
+             && timer_list.first_timer->when.tv_usec < time_now.tv_usec))
        {
          delta.tv_sec = 0;
          delta.tv_usec = 0;
@@ -1131,12 +1137,20 @@ poll_timers (void)
 
       /* Now we need to update the timeout for select/ poll, because we
          don't want to sit there while this timer is expiring. */
+      if (use_poll)
+       {
 #ifdef HAVE_POLL
-      gdb_notifier.timeout = delta.tv_sec * 1000;
+         gdb_notifier.poll_timeout = delta.tv_sec * 1000;
 #else
-      gdb_notifier.timeout.tv_sec = delta.tv_sec;
-      gdb_notifier.timeout.tv_usec = delta.tv_usec;
-#endif
+         internal_error (__FILE__, __LINE__,
+                         "use_poll without HAVE_POLL");
+#endif /* HAVE_POLL */
+       }
+      else
+       {
+         gdb_notifier.select_timeout.tv_sec = delta.tv_sec;
+         gdb_notifier.select_timeout.tv_usec = delta.tv_usec;
+       }
       gdb_notifier.timeout_valid = 1;
     }
   else
This page took 0.036213 seconds and 4 git commands to generate.