OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [gdb/] [gdbserver/] [event-loop.c] - Diff between revs 834 and 842

Only display areas with differences | Details | Blame | View Log

Rev 834 Rev 842
/* Event loop machinery for the remote server for GDB.
/* Event loop machinery for the remote server for GDB.
   Copyright (C) 1999, 2000, 2001, 2002, 2005, 2006, 2007, 2008, 2010
   Copyright (C) 1999, 2000, 2001, 2002, 2005, 2006, 2007, 2008, 2010
   Free Software Foundation, Inc.
   Free Software Foundation, Inc.
 
 
   This file is part of GDB.
   This file is part of GDB.
 
 
   This program is free software; you can redistribute it and/or modify
   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
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 3 of the License, or
   the Free Software Foundation; either version 3 of the License, or
   (at your option) any later version.
   (at your option) any later version.
 
 
   This program is distributed in the hope that it will be useful,
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
   GNU General Public License for more details.
 
 
   You should have received a copy of the GNU General Public License
   You should have received a copy of the GNU General Public License
   along with this program.  If not, see <http://www.gnu.org/licenses/>. */
   along with this program.  If not, see <http://www.gnu.org/licenses/>. */
 
 
/* Based on src/gdb/event-loop.c.  */
/* Based on src/gdb/event-loop.c.  */
 
 
#include "server.h"
#include "server.h"
 
 
#include <sys/types.h>
#include <sys/types.h>
#include <string.h>
#include <string.h>
#include <sys/time.h>
#include <sys/time.h>
 
 
#ifdef USE_WIN32API
#ifdef USE_WIN32API
#include <windows.h>
#include <windows.h>
#include <io.h>
#include <io.h>
#endif
#endif
 
 
#ifdef HAVE_ERRNO_H
#ifdef HAVE_ERRNO_H
#include <errno.h>
#include <errno.h>
#endif
#endif
 
 
#ifdef HAVE_UNISTD_H
#ifdef HAVE_UNISTD_H
#include <unistd.h>
#include <unistd.h>
#endif
#endif
 
 
typedef struct gdb_event gdb_event;
typedef struct gdb_event gdb_event;
typedef void (event_handler_func) (int);
typedef void (event_handler_func) (int);
 
 
/* Tell create_file_handler what events we are interested in.  */
/* Tell create_file_handler what events we are interested in.  */
 
 
#define GDB_READABLE    (1<<1)
#define GDB_READABLE    (1<<1)
#define GDB_WRITABLE    (1<<2)
#define GDB_WRITABLE    (1<<2)
#define GDB_EXCEPTION   (1<<3)
#define GDB_EXCEPTION   (1<<3)
 
 
/* Events are queued by calling async_queue_event and serviced later
/* Events are queued by calling async_queue_event and serviced later
   on by do_one_event.  An event can be, for instance, a file
   on by do_one_event.  An event can be, for instance, a file
   descriptor becoming ready to be read.  Servicing an event simply
   descriptor becoming ready to be read.  Servicing an event simply
   means that the procedure PROC will be called.  We have 2 queues,
   means that the procedure PROC will be called.  We have 2 queues,
   one for file handlers that we listen to in the event loop, and one
   one for file handlers that we listen to in the event loop, and one
   for the file handlers+events that are ready.  The procedure PROC
   for the file handlers+events that are ready.  The procedure PROC
   associated with each event is always the same (handle_file_event).
   associated with each event is always the same (handle_file_event).
   Its duty is to invoke the handler associated with the file
   Its duty is to invoke the handler associated with the file
   descriptor whose state change generated the event, plus doing other
   descriptor whose state change generated the event, plus doing other
   cleanups and such.  */
   cleanups and such.  */
 
 
struct gdb_event
struct gdb_event
  {
  {
    /* Procedure to call to service this event.  */
    /* Procedure to call to service this event.  */
    event_handler_func *proc;
    event_handler_func *proc;
 
 
    /* File descriptor that is ready.  */
    /* File descriptor that is ready.  */
    int fd;
    int fd;
 
 
    /* Next in list of events or NULL.  */
    /* Next in list of events or NULL.  */
    struct gdb_event *next_event;
    struct gdb_event *next_event;
  };
  };
 
 
/* Information about each file descriptor we register with the event
/* Information about each file descriptor we register with the event
   loop.  */
   loop.  */
 
 
typedef struct file_handler
typedef struct file_handler
  {
  {
    /* File descriptor.  */
    /* File descriptor.  */
    int fd;
    int fd;
 
 
    /* Events we want to monitor.  */
    /* Events we want to monitor.  */
    int mask;
    int mask;
 
 
    /* Events that have been seen since the last time.  */
    /* Events that have been seen since the last time.  */
    int ready_mask;
    int ready_mask;
 
 
    /* Procedure to call when fd is ready.  */
    /* Procedure to call when fd is ready.  */
    handler_func *proc;
    handler_func *proc;
 
 
    /* Argument to pass to proc.  */
    /* Argument to pass to proc.  */
    gdb_client_data client_data;
    gdb_client_data client_data;
 
 
    /* Was an error detected on this fd?  */
    /* Was an error detected on this fd?  */
    int error;
    int error;
 
 
    /* Next registered file descriptor.  */
    /* Next registered file descriptor.  */
    struct file_handler *next_file;
    struct file_handler *next_file;
  }
  }
file_handler;
file_handler;
 
 
/* Event queue:
/* Event queue:
 
 
   Events can be inserted at the front of the queue or at the end of
   Events can be inserted at the front of the queue or at the end of
   the queue.  Events will be extracted from the queue for processing
   the queue.  Events will be extracted from the queue for processing
   starting from the head.  Therefore, events inserted at the head of
   starting from the head.  Therefore, events inserted at the head of
   the queue will be processed in a last in first out fashion, while
   the queue will be processed in a last in first out fashion, while
   those inserted at the tail of the queue will be processed in a
   those inserted at the tail of the queue will be processed in a
   first in first out manner.  All the fields are NULL if the queue is
   first in first out manner.  All the fields are NULL if the queue is
   empty.  */
   empty.  */
 
 
static struct
static struct
  {
  {
    /* The first pending event.  */
    /* The first pending event.  */
    gdb_event *first_event;
    gdb_event *first_event;
 
 
    /* The last pending event.  */
    /* The last pending event.  */
    gdb_event *last_event;
    gdb_event *last_event;
  }
  }
event_queue;
event_queue;
 
 
/* Gdb_notifier is just a list of file descriptors gdb is interested
/* Gdb_notifier is just a list of file descriptors gdb is interested
   in.  These are the input file descriptor, and the target file
   in.  These are the input file descriptor, and the target file
   descriptor.  Each of the elements in the gdb_notifier list is
   descriptor.  Each of the elements in the gdb_notifier list is
   basically a description of what kind of events gdb is interested
   basically a description of what kind of events gdb is interested
   in, for each fd.  */
   in, for each fd.  */
 
 
static struct
static struct
  {
  {
    /* Ptr to head of file handler list.  */
    /* Ptr to head of file handler list.  */
    file_handler *first_file_handler;
    file_handler *first_file_handler;
 
 
    /* Masks to be used in the next call to select.  Bits are set in
    /* Masks to be used in the next call to select.  Bits are set in
       response to calls to create_file_handler.  */
       response to calls to create_file_handler.  */
    fd_set check_masks[3];
    fd_set check_masks[3];
 
 
    /* What file descriptors were found ready by select.  */
    /* What file descriptors were found ready by select.  */
    fd_set ready_masks[3];
    fd_set ready_masks[3];
 
 
    /* Number of valid bits (highest fd value + 1). (for select) */
    /* Number of valid bits (highest fd value + 1). (for select) */
    int num_fds;
    int num_fds;
  }
  }
gdb_notifier;
gdb_notifier;
 
 
/* Insert an event object into the gdb event queue.
/* Insert an event object into the gdb event queue.
 
 
   EVENT_PTR points to the event to be inserted into the queue.  The
   EVENT_PTR points to the event to be inserted into the queue.  The
   caller must allocate memory for the event.  It is freed after the
   caller must allocate memory for the event.  It is freed after the
   event has ben handled.  Events in the queue will be processed head
   event has ben handled.  Events in the queue will be processed head
   to tail, therefore, events will be processed first in first
   to tail, therefore, events will be processed first in first
   out.  */
   out.  */
 
 
static void
static void
async_queue_event (gdb_event *event_ptr)
async_queue_event (gdb_event *event_ptr)
{
{
  /* The event will become the new last_event.  */
  /* The event will become the new last_event.  */
 
 
  event_ptr->next_event = NULL;
  event_ptr->next_event = NULL;
  if (event_queue.first_event == NULL)
  if (event_queue.first_event == NULL)
    event_queue.first_event = event_ptr;
    event_queue.first_event = event_ptr;
  else
  else
    event_queue.last_event->next_event = event_ptr;
    event_queue.last_event->next_event = event_ptr;
  event_queue.last_event = event_ptr;
  event_queue.last_event = event_ptr;
}
}
 
 
/* Process one event.  If an event was processed, 1 is returned
/* Process one event.  If an event was processed, 1 is returned
   otherwise 0 is returned.  Scan the queue from head to tail,
   otherwise 0 is returned.  Scan the queue from head to tail,
   processing therefore the high priority events first, by invoking
   processing therefore the high priority events first, by invoking
   the associated event handler procedure.  */
   the associated event handler procedure.  */
 
 
static int
static int
process_event (void)
process_event (void)
{
{
  gdb_event *event_ptr, *prev_ptr;
  gdb_event *event_ptr, *prev_ptr;
  event_handler_func *proc;
  event_handler_func *proc;
  int fd;
  int fd;
 
 
  /* Look in the event queue to find an event that is ready
  /* Look in the event queue to find an event that is ready
     to be processed.  */
     to be processed.  */
 
 
  for (event_ptr = event_queue.first_event;
  for (event_ptr = event_queue.first_event;
       event_ptr != NULL;
       event_ptr != NULL;
       event_ptr = event_ptr->next_event)
       event_ptr = event_ptr->next_event)
    {
    {
      /* Call the handler for the event.  */
      /* Call the handler for the event.  */
 
 
      proc = event_ptr->proc;
      proc = event_ptr->proc;
      fd = event_ptr->fd;
      fd = event_ptr->fd;
 
 
      /* Let's get rid of the event from the event queue.  We need to
      /* Let's get rid of the event from the event queue.  We need to
         do this now because while processing the event, since the
         do this now because while processing the event, since the
         proc function could end up jumping out to the caller of this
         proc function could end up jumping out to the caller of this
         function.  In that case, we would have on the event queue an
         function.  In that case, we would have on the event queue an
         event which has been processed, but not deleted.  */
         event which has been processed, but not deleted.  */
 
 
      if (event_queue.first_event == event_ptr)
      if (event_queue.first_event == event_ptr)
        {
        {
          event_queue.first_event = event_ptr->next_event;
          event_queue.first_event = event_ptr->next_event;
          if (event_ptr->next_event == NULL)
          if (event_ptr->next_event == NULL)
            event_queue.last_event = NULL;
            event_queue.last_event = NULL;
        }
        }
      else
      else
        {
        {
          prev_ptr = event_queue.first_event;
          prev_ptr = event_queue.first_event;
          while (prev_ptr->next_event != event_ptr)
          while (prev_ptr->next_event != event_ptr)
            prev_ptr = prev_ptr->next_event;
            prev_ptr = prev_ptr->next_event;
 
 
          prev_ptr->next_event = event_ptr->next_event;
          prev_ptr->next_event = event_ptr->next_event;
          if (event_ptr->next_event == NULL)
          if (event_ptr->next_event == NULL)
            event_queue.last_event = prev_ptr;
            event_queue.last_event = prev_ptr;
        }
        }
      free (event_ptr);
      free (event_ptr);
 
 
      /* Now call the procedure associated with the event.  */
      /* Now call the procedure associated with the event.  */
      (*proc) (fd);
      (*proc) (fd);
      return 1;
      return 1;
    }
    }
 
 
  /* This is the case if there are no event on the event queue.  */
  /* This is the case if there are no event on the event queue.  */
  return 0;
  return 0;
}
}
 
 
/* Add a file handler/descriptor to the list of descriptors we are
/* Add a file handler/descriptor to the list of descriptors we are
   interested in.  FD is the file descriptor for the file/stream to be
   interested in.  FD is the file descriptor for the file/stream to be
   listened to.  MASK is a combination of READABLE, WRITABLE,
   listened to.  MASK is a combination of READABLE, WRITABLE,
   EXCEPTION.  PROC is the procedure that will be called when an event
   EXCEPTION.  PROC is the procedure that will be called when an event
   occurs for FD.  CLIENT_DATA is the argument to pass to PROC.  */
   occurs for FD.  CLIENT_DATA is the argument to pass to PROC.  */
 
 
static void
static void
create_file_handler (int fd, int mask, handler_func *proc,
create_file_handler (int fd, int mask, handler_func *proc,
                     gdb_client_data client_data)
                     gdb_client_data client_data)
{
{
  file_handler *file_ptr;
  file_handler *file_ptr;
 
 
  /* Do we already have a file handler for this file? (We may be
  /* Do we already have a file handler for this file? (We may be
     changing its associated procedure).  */
     changing its associated procedure).  */
  for (file_ptr = gdb_notifier.first_file_handler;
  for (file_ptr = gdb_notifier.first_file_handler;
       file_ptr != NULL;
       file_ptr != NULL;
       file_ptr = file_ptr->next_file)
       file_ptr = file_ptr->next_file)
    if (file_ptr->fd == fd)
    if (file_ptr->fd == fd)
      break;
      break;
 
 
  /* It is a new file descriptor.  Add it to the list.  Otherwise,
  /* It is a new file descriptor.  Add it to the list.  Otherwise,
     just change the data associated with it.  */
     just change the data associated with it.  */
  if (file_ptr == NULL)
  if (file_ptr == NULL)
    {
    {
      file_ptr = xmalloc (sizeof (*file_ptr));
      file_ptr = xmalloc (sizeof (*file_ptr));
      file_ptr->fd = fd;
      file_ptr->fd = fd;
      file_ptr->ready_mask = 0;
      file_ptr->ready_mask = 0;
      file_ptr->next_file = gdb_notifier.first_file_handler;
      file_ptr->next_file = gdb_notifier.first_file_handler;
      gdb_notifier.first_file_handler = file_ptr;
      gdb_notifier.first_file_handler = file_ptr;
 
 
      if (mask & GDB_READABLE)
      if (mask & GDB_READABLE)
        FD_SET (fd, &gdb_notifier.check_masks[0]);
        FD_SET (fd, &gdb_notifier.check_masks[0]);
      else
      else
        FD_CLR (fd, &gdb_notifier.check_masks[0]);
        FD_CLR (fd, &gdb_notifier.check_masks[0]);
 
 
      if (mask & GDB_WRITABLE)
      if (mask & GDB_WRITABLE)
        FD_SET (fd, &gdb_notifier.check_masks[1]);
        FD_SET (fd, &gdb_notifier.check_masks[1]);
      else
      else
        FD_CLR (fd, &gdb_notifier.check_masks[1]);
        FD_CLR (fd, &gdb_notifier.check_masks[1]);
 
 
      if (mask & GDB_EXCEPTION)
      if (mask & GDB_EXCEPTION)
        FD_SET (fd, &gdb_notifier.check_masks[2]);
        FD_SET (fd, &gdb_notifier.check_masks[2]);
      else
      else
        FD_CLR (fd, &gdb_notifier.check_masks[2]);
        FD_CLR (fd, &gdb_notifier.check_masks[2]);
 
 
      if (gdb_notifier.num_fds <= fd)
      if (gdb_notifier.num_fds <= fd)
        gdb_notifier.num_fds = fd + 1;
        gdb_notifier.num_fds = fd + 1;
    }
    }
 
 
  file_ptr->proc = proc;
  file_ptr->proc = proc;
  file_ptr->client_data = client_data;
  file_ptr->client_data = client_data;
  file_ptr->mask = mask;
  file_ptr->mask = mask;
}
}
 
 
/* Wrapper function for create_file_handler.  */
/* Wrapper function for create_file_handler.  */
 
 
void
void
add_file_handler (int fd, handler_func *proc, gdb_client_data client_data)
add_file_handler (int fd, handler_func *proc, gdb_client_data client_data)
{
{
  create_file_handler (fd, GDB_READABLE | GDB_EXCEPTION, proc, client_data);
  create_file_handler (fd, GDB_READABLE | GDB_EXCEPTION, proc, client_data);
}
}
 
 
/* Remove the file descriptor FD from the list of monitored fd's:
/* Remove the file descriptor FD from the list of monitored fd's:
   i.e. we don't care anymore about events on the FD.  */
   i.e. we don't care anymore about events on the FD.  */
 
 
void
void
delete_file_handler (int fd)
delete_file_handler (int fd)
{
{
  file_handler *file_ptr, *prev_ptr = NULL;
  file_handler *file_ptr, *prev_ptr = NULL;
  int i;
  int i;
 
 
  /* Find the entry for the given file. */
  /* Find the entry for the given file. */
 
 
  for (file_ptr = gdb_notifier.first_file_handler;
  for (file_ptr = gdb_notifier.first_file_handler;
       file_ptr != NULL;
       file_ptr != NULL;
       file_ptr = file_ptr->next_file)
       file_ptr = file_ptr->next_file)
    if (file_ptr->fd == fd)
    if (file_ptr->fd == fd)
      break;
      break;
 
 
  if (file_ptr == NULL)
  if (file_ptr == NULL)
    return;
    return;
 
 
  if (file_ptr->mask & GDB_READABLE)
  if (file_ptr->mask & GDB_READABLE)
    FD_CLR (fd, &gdb_notifier.check_masks[0]);
    FD_CLR (fd, &gdb_notifier.check_masks[0]);
  if (file_ptr->mask & GDB_WRITABLE)
  if (file_ptr->mask & GDB_WRITABLE)
    FD_CLR (fd, &gdb_notifier.check_masks[1]);
    FD_CLR (fd, &gdb_notifier.check_masks[1]);
  if (file_ptr->mask & GDB_EXCEPTION)
  if (file_ptr->mask & GDB_EXCEPTION)
    FD_CLR (fd, &gdb_notifier.check_masks[2]);
    FD_CLR (fd, &gdb_notifier.check_masks[2]);
 
 
  /* Find current max fd.  */
  /* Find current max fd.  */
 
 
  if ((fd + 1) == gdb_notifier.num_fds)
  if ((fd + 1) == gdb_notifier.num_fds)
    {
    {
      gdb_notifier.num_fds--;
      gdb_notifier.num_fds--;
      for (i = gdb_notifier.num_fds; i; i--)
      for (i = gdb_notifier.num_fds; i; i--)
        {
        {
          if (FD_ISSET (i - 1, &gdb_notifier.check_masks[0])
          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[1])
              || FD_ISSET (i - 1, &gdb_notifier.check_masks[2]))
              || FD_ISSET (i - 1, &gdb_notifier.check_masks[2]))
            break;
            break;
        }
        }
      gdb_notifier.num_fds = i;
      gdb_notifier.num_fds = i;
    }
    }
 
 
  /* Deactivate the file descriptor, by clearing its mask, so that it
  /* Deactivate the file descriptor, by clearing its mask, so that it
     will not fire again.  */
     will not fire again.  */
 
 
  file_ptr->mask = 0;
  file_ptr->mask = 0;
 
 
  /* Get rid of the file handler in the file handler list.  */
  /* Get rid of the file handler in the file handler list.  */
  if (file_ptr == gdb_notifier.first_file_handler)
  if (file_ptr == gdb_notifier.first_file_handler)
    gdb_notifier.first_file_handler = file_ptr->next_file;
    gdb_notifier.first_file_handler = file_ptr->next_file;
  else
  else
    {
    {
      for (prev_ptr = gdb_notifier.first_file_handler;
      for (prev_ptr = gdb_notifier.first_file_handler;
           prev_ptr->next_file != file_ptr;
           prev_ptr->next_file != file_ptr;
           prev_ptr = prev_ptr->next_file)
           prev_ptr = prev_ptr->next_file)
        ;
        ;
      prev_ptr->next_file = file_ptr->next_file;
      prev_ptr->next_file = file_ptr->next_file;
    }
    }
  free (file_ptr);
  free (file_ptr);
}
}
 
 
/* Handle the given event by calling the procedure associated to the
/* Handle the given event by calling the procedure associated to the
   corresponding file handler.  Called by process_event indirectly,
   corresponding file handler.  Called by process_event indirectly,
   through event_ptr->proc.  EVENT_FILE_DESC is file descriptor of the
   through event_ptr->proc.  EVENT_FILE_DESC is file descriptor of the
   event in the front of the event queue.  */
   event in the front of the event queue.  */
 
 
static void
static void
handle_file_event (int event_file_desc)
handle_file_event (int event_file_desc)
{
{
  file_handler *file_ptr;
  file_handler *file_ptr;
  int mask;
  int mask;
 
 
  /* Search the file handler list to find one that matches the fd in
  /* Search the file handler list to find one that matches the fd in
     the event.  */
     the event.  */
  for (file_ptr = gdb_notifier.first_file_handler; file_ptr != NULL;
  for (file_ptr = gdb_notifier.first_file_handler; file_ptr != NULL;
       file_ptr = file_ptr->next_file)
       file_ptr = file_ptr->next_file)
    {
    {
      if (file_ptr->fd == event_file_desc)
      if (file_ptr->fd == event_file_desc)
        {
        {
          /* See if the desired events (mask) match the received
          /* See if the desired events (mask) match the received
             events (ready_mask).  */
             events (ready_mask).  */
 
 
          if (file_ptr->ready_mask & GDB_EXCEPTION)
          if (file_ptr->ready_mask & GDB_EXCEPTION)
            {
            {
              fprintf (stderr, "Exception condition detected on fd %d\n",
              fprintf (stderr, "Exception condition detected on fd %d\n",
                       file_ptr->fd);
                       file_ptr->fd);
              file_ptr->error = 1;
              file_ptr->error = 1;
            }
            }
          else
          else
            file_ptr->error = 0;
            file_ptr->error = 0;
          mask = file_ptr->ready_mask & file_ptr->mask;
          mask = file_ptr->ready_mask & file_ptr->mask;
 
 
          /* Clear the received events for next time around.  */
          /* Clear the received events for next time around.  */
          file_ptr->ready_mask = 0;
          file_ptr->ready_mask = 0;
 
 
          /* If there was a match, then call the handler.  */
          /* If there was a match, then call the handler.  */
          if (mask != 0)
          if (mask != 0)
            (*file_ptr->proc) (file_ptr->error, file_ptr->client_data);
            (*file_ptr->proc) (file_ptr->error, file_ptr->client_data);
          break;
          break;
        }
        }
    }
    }
}
}
 
 
/* Create a file event, to be enqueued in the event queue for
/* Create a file event, to be enqueued in the event queue for
   processing.  The procedure associated to this event is always
   processing.  The procedure associated to this event is always
   handle_file_event, which will in turn invoke the one that was
   handle_file_event, which will in turn invoke the one that was
   associated to FD when it was registered with the event loop.  */
   associated to FD when it was registered with the event loop.  */
 
 
static gdb_event *
static gdb_event *
create_file_event (int fd)
create_file_event (int fd)
{
{
  gdb_event *file_event_ptr;
  gdb_event *file_event_ptr;
 
 
  file_event_ptr = xmalloc (sizeof (gdb_event));
  file_event_ptr = xmalloc (sizeof (gdb_event));
  file_event_ptr->proc = handle_file_event;
  file_event_ptr->proc = handle_file_event;
  file_event_ptr->fd = fd;
  file_event_ptr->fd = fd;
  return file_event_ptr;
  return file_event_ptr;
}
}
 
 
/* Called by do_one_event to wait for new events on the monitored file
/* Called by do_one_event to wait for new events on the monitored file
   descriptors.  Queue file events as they are detected by the poll.
   descriptors.  Queue file events as they are detected by the poll.
   If there are no events, this function will block in the call to
   If there are no events, this function will block in the call to
   select.  Return -1 if there are no files descriptors to monitor,
   select.  Return -1 if there are no files descriptors to monitor,
   otherwise return 0.  */
   otherwise return 0.  */
 
 
static int
static int
wait_for_event (void)
wait_for_event (void)
{
{
  file_handler *file_ptr;
  file_handler *file_ptr;
  gdb_event *file_event_ptr;
  gdb_event *file_event_ptr;
  int num_found = 0;
  int num_found = 0;
 
 
  /* Make sure all output is done before getting another event.  */
  /* Make sure all output is done before getting another event.  */
  fflush (stdout);
  fflush (stdout);
  fflush (stderr);
  fflush (stderr);
 
 
  if (gdb_notifier.num_fds == 0)
  if (gdb_notifier.num_fds == 0)
    return -1;
    return -1;
 
 
  gdb_notifier.ready_masks[0] = gdb_notifier.check_masks[0];
  gdb_notifier.ready_masks[0] = gdb_notifier.check_masks[0];
  gdb_notifier.ready_masks[1] = gdb_notifier.check_masks[1];
  gdb_notifier.ready_masks[1] = gdb_notifier.check_masks[1];
  gdb_notifier.ready_masks[2] = gdb_notifier.check_masks[2];
  gdb_notifier.ready_masks[2] = gdb_notifier.check_masks[2];
  num_found = select (gdb_notifier.num_fds,
  num_found = select (gdb_notifier.num_fds,
                      &gdb_notifier.ready_masks[0],
                      &gdb_notifier.ready_masks[0],
                      &gdb_notifier.ready_masks[1],
                      &gdb_notifier.ready_masks[1],
                      &gdb_notifier.ready_masks[2],
                      &gdb_notifier.ready_masks[2],
                      NULL);
                      NULL);
 
 
  /* Clear the masks after an error from select.  */
  /* Clear the masks after an error from select.  */
  if (num_found == -1)
  if (num_found == -1)
    {
    {
      FD_ZERO (&gdb_notifier.ready_masks[0]);
      FD_ZERO (&gdb_notifier.ready_masks[0]);
      FD_ZERO (&gdb_notifier.ready_masks[1]);
      FD_ZERO (&gdb_notifier.ready_masks[1]);
      FD_ZERO (&gdb_notifier.ready_masks[2]);
      FD_ZERO (&gdb_notifier.ready_masks[2]);
#ifdef EINTR
#ifdef EINTR
      /* Dont print anything if we got a signal, let gdb handle
      /* Dont print anything if we got a signal, let gdb handle
         it.  */
         it.  */
      if (errno != EINTR)
      if (errno != EINTR)
        perror_with_name ("select");
        perror_with_name ("select");
#endif
#endif
    }
    }
 
 
  /* Enqueue all detected file events.  */
  /* Enqueue all detected file events.  */
 
 
  for (file_ptr = gdb_notifier.first_file_handler;
  for (file_ptr = gdb_notifier.first_file_handler;
       file_ptr != NULL && num_found > 0;
       file_ptr != NULL && num_found > 0;
       file_ptr = file_ptr->next_file)
       file_ptr = file_ptr->next_file)
    {
    {
      int mask = 0;
      int mask = 0;
 
 
      if (FD_ISSET (file_ptr->fd, &gdb_notifier.ready_masks[0]))
      if (FD_ISSET (file_ptr->fd, &gdb_notifier.ready_masks[0]))
        mask |= GDB_READABLE;
        mask |= GDB_READABLE;
      if (FD_ISSET (file_ptr->fd, &gdb_notifier.ready_masks[1]))
      if (FD_ISSET (file_ptr->fd, &gdb_notifier.ready_masks[1]))
        mask |= GDB_WRITABLE;
        mask |= GDB_WRITABLE;
      if (FD_ISSET (file_ptr->fd, &gdb_notifier.ready_masks[2]))
      if (FD_ISSET (file_ptr->fd, &gdb_notifier.ready_masks[2]))
        mask |= GDB_EXCEPTION;
        mask |= GDB_EXCEPTION;
 
 
      if (!mask)
      if (!mask)
        continue;
        continue;
      else
      else
        num_found--;
        num_found--;
 
 
      /* Enqueue an event only if this is still a new event for this
      /* Enqueue an event only if this is still a new event for this
         fd.  */
         fd.  */
 
 
      if (file_ptr->ready_mask == 0)
      if (file_ptr->ready_mask == 0)
        {
        {
          file_event_ptr = create_file_event (file_ptr->fd);
          file_event_ptr = create_file_event (file_ptr->fd);
          async_queue_event (file_event_ptr);
          async_queue_event (file_event_ptr);
        }
        }
      file_ptr->ready_mask = mask;
      file_ptr->ready_mask = mask;
    }
    }
 
 
  return 0;
  return 0;
}
}
 
 
/* Start up the event loop.  This is the entry point to the event
/* Start up the event loop.  This is the entry point to the event
   loop.  */
   loop.  */
 
 
void
void
start_event_loop (void)
start_event_loop (void)
{
{
  /* Loop until there is nothing to do.  This is the entry point to
  /* Loop until there is nothing to do.  This is the entry point to
     the event loop engine.  If nothing is ready at this time, wait
     the event loop engine.  If nothing is ready at this time, wait
     for something to happen (via wait_for_event), then process it.
     for something to happen (via wait_for_event), then process it.
     Return when there are no longer event sources to wait for.  */
     Return when there are no longer event sources to wait for.  */
 
 
  while (1)
  while (1)
    {
    {
      /* Any events already waiting in the queue?  */
      /* Any events already waiting in the queue?  */
      if (process_event ())
      if (process_event ())
        continue;
        continue;
 
 
      /* Wait for a new event.  If wait_for_event returns -1, we
      /* Wait for a new event.  If wait_for_event returns -1, we
         should get out because this means that there are no event
         should get out because this means that there are no event
         sources left.  This will make the event loop stop, and the
         sources left.  This will make the event loop stop, and the
         application exit.  */
         application exit.  */
 
 
      if (wait_for_event () < 0)
      if (wait_for_event () < 0)
        return;
        return;
    }
    }
 
 
  /* We are done with the event loop.  There are no more event sources
  /* We are done with the event loop.  There are no more event sources
     to listen to.  So we exit gdbserver.  */
     to listen to.  So we exit gdbserver.  */
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.