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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [gdb/] [gdb-events.c] - Diff between revs 827 and 840

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 827 Rev 840
/* User Interface Events.
/* User Interface Events.
 
 
   Copyright (C) 1999, 2001, 2002, 2004, 2005, 2007, 2008
   Copyright (C) 1999, 2001, 2002, 2004, 2005, 2007, 2008
   Free Software Foundation, Inc.
   Free Software Foundation, Inc.
 
 
   Contributed by Cygnus Solutions.
   Contributed by Cygnus Solutions.
 
 
   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/>.  */
 
 
/* Work in progress */
/* Work in progress */
 
 
/* This file was created with the aid of ``gdb-events.sh''.
/* This file was created with the aid of ``gdb-events.sh''.
 
 
   The bourn shell script ``gdb-events.sh'' creates the files
   The bourn shell script ``gdb-events.sh'' creates the files
   ``new-gdb-events.c'' and ``new-gdb-events.h and then compares
   ``new-gdb-events.c'' and ``new-gdb-events.h and then compares
   them against the existing ``gdb-events.[hc]''.  Any differences
   them against the existing ``gdb-events.[hc]''.  Any differences
   found being reported.
   found being reported.
 
 
   If editing this file, please also run gdb-events.sh and merge any
   If editing this file, please also run gdb-events.sh and merge any
   changes into that script. Conversely, when making sweeping changes
   changes into that script. Conversely, when making sweeping changes
   to this file, modifying gdb-events.sh and using its output may
   to this file, modifying gdb-events.sh and using its output may
   prove easier.  */
   prove easier.  */
 
 
 
 
#include "defs.h"
#include "defs.h"
#include "gdb-events.h"
#include "gdb-events.h"
#include "gdbcmd.h"
#include "gdbcmd.h"
 
 
static struct gdb_events null_event_hooks;
static struct gdb_events null_event_hooks;
static struct gdb_events queue_event_hooks;
static struct gdb_events queue_event_hooks;
static struct gdb_events *current_event_hooks = &null_event_hooks;
static struct gdb_events *current_event_hooks = &null_event_hooks;
 
 
int gdb_events_debug;
int gdb_events_debug;
static void
static void
show_gdb_events_debug (struct ui_file *file, int from_tty,
show_gdb_events_debug (struct ui_file *file, int from_tty,
                       struct cmd_list_element *c, const char *value)
                       struct cmd_list_element *c, const char *value)
{
{
  fprintf_filtered (file, _("Event debugging is %s.\n"), value);
  fprintf_filtered (file, _("Event debugging is %s.\n"), value);
}
}
 
 
 
 
void
void
breakpoint_create_event (int b)
breakpoint_create_event (int b)
{
{
  if (gdb_events_debug)
  if (gdb_events_debug)
    fprintf_unfiltered (gdb_stdlog, "breakpoint_create_event\n");
    fprintf_unfiltered (gdb_stdlog, "breakpoint_create_event\n");
  if (!current_event_hooks->breakpoint_create)
  if (!current_event_hooks->breakpoint_create)
    return;
    return;
  current_event_hooks->breakpoint_create (b);
  current_event_hooks->breakpoint_create (b);
}
}
 
 
void
void
breakpoint_delete_event (int b)
breakpoint_delete_event (int b)
{
{
  if (gdb_events_debug)
  if (gdb_events_debug)
    fprintf_unfiltered (gdb_stdlog, "breakpoint_delete_event\n");
    fprintf_unfiltered (gdb_stdlog, "breakpoint_delete_event\n");
  if (!current_event_hooks->breakpoint_delete)
  if (!current_event_hooks->breakpoint_delete)
    return;
    return;
  current_event_hooks->breakpoint_delete (b);
  current_event_hooks->breakpoint_delete (b);
}
}
 
 
void
void
breakpoint_modify_event (int b)
breakpoint_modify_event (int b)
{
{
  if (gdb_events_debug)
  if (gdb_events_debug)
    fprintf_unfiltered (gdb_stdlog, "breakpoint_modify_event\n");
    fprintf_unfiltered (gdb_stdlog, "breakpoint_modify_event\n");
  if (!current_event_hooks->breakpoint_modify)
  if (!current_event_hooks->breakpoint_modify)
    return;
    return;
  current_event_hooks->breakpoint_modify (b);
  current_event_hooks->breakpoint_modify (b);
}
}
 
 
void
void
tracepoint_create_event (int number)
tracepoint_create_event (int number)
{
{
  if (gdb_events_debug)
  if (gdb_events_debug)
    fprintf_unfiltered (gdb_stdlog, "tracepoint_create_event\n");
    fprintf_unfiltered (gdb_stdlog, "tracepoint_create_event\n");
  if (!current_event_hooks->tracepoint_create)
  if (!current_event_hooks->tracepoint_create)
    return;
    return;
  current_event_hooks->tracepoint_create (number);
  current_event_hooks->tracepoint_create (number);
}
}
 
 
void
void
tracepoint_delete_event (int number)
tracepoint_delete_event (int number)
{
{
  if (gdb_events_debug)
  if (gdb_events_debug)
    fprintf_unfiltered (gdb_stdlog, "tracepoint_delete_event\n");
    fprintf_unfiltered (gdb_stdlog, "tracepoint_delete_event\n");
  if (!current_event_hooks->tracepoint_delete)
  if (!current_event_hooks->tracepoint_delete)
    return;
    return;
  current_event_hooks->tracepoint_delete (number);
  current_event_hooks->tracepoint_delete (number);
}
}
 
 
void
void
tracepoint_modify_event (int number)
tracepoint_modify_event (int number)
{
{
  if (gdb_events_debug)
  if (gdb_events_debug)
    fprintf_unfiltered (gdb_stdlog, "tracepoint_modify_event\n");
    fprintf_unfiltered (gdb_stdlog, "tracepoint_modify_event\n");
  if (!current_event_hooks->tracepoint_modify)
  if (!current_event_hooks->tracepoint_modify)
    return;
    return;
  current_event_hooks->tracepoint_modify (number);
  current_event_hooks->tracepoint_modify (number);
}
}
 
 
void
void
architecture_changed_event (void)
architecture_changed_event (void)
{
{
  if (gdb_events_debug)
  if (gdb_events_debug)
    fprintf_unfiltered (gdb_stdlog, "architecture_changed_event\n");
    fprintf_unfiltered (gdb_stdlog, "architecture_changed_event\n");
  if (!current_event_hooks->architecture_changed)
  if (!current_event_hooks->architecture_changed)
    return;
    return;
  current_event_hooks->architecture_changed ();
  current_event_hooks->architecture_changed ();
}
}
 
 
struct gdb_events *
struct gdb_events *
deprecated_set_gdb_event_hooks (struct gdb_events *vector)
deprecated_set_gdb_event_hooks (struct gdb_events *vector)
{
{
  struct gdb_events *old_events = current_event_hooks;
  struct gdb_events *old_events = current_event_hooks;
  if (vector == NULL)
  if (vector == NULL)
    current_event_hooks = &queue_event_hooks;
    current_event_hooks = &queue_event_hooks;
  else
  else
    current_event_hooks = vector;
    current_event_hooks = vector;
  return old_events;
  return old_events;
}
}
 
 
void
void
clear_gdb_event_hooks (void)
clear_gdb_event_hooks (void)
{
{
  deprecated_set_gdb_event_hooks (&null_event_hooks);
  deprecated_set_gdb_event_hooks (&null_event_hooks);
}
}
 
 
enum gdb_event
enum gdb_event
{
{
  breakpoint_create,
  breakpoint_create,
  breakpoint_delete,
  breakpoint_delete,
  breakpoint_modify,
  breakpoint_modify,
  tracepoint_create,
  tracepoint_create,
  tracepoint_delete,
  tracepoint_delete,
  tracepoint_modify,
  tracepoint_modify,
  architecture_changed,
  architecture_changed,
  nr_gdb_events
  nr_gdb_events
};
};
 
 
struct breakpoint_create
struct breakpoint_create
  {
  {
    int b;
    int b;
  };
  };
 
 
struct breakpoint_delete
struct breakpoint_delete
  {
  {
    int b;
    int b;
  };
  };
 
 
struct breakpoint_modify
struct breakpoint_modify
  {
  {
    int b;
    int b;
  };
  };
 
 
struct tracepoint_create
struct tracepoint_create
  {
  {
    int number;
    int number;
  };
  };
 
 
struct tracepoint_delete
struct tracepoint_delete
  {
  {
    int number;
    int number;
  };
  };
 
 
struct tracepoint_modify
struct tracepoint_modify
  {
  {
    int number;
    int number;
  };
  };
 
 
struct event
struct event
  {
  {
    enum gdb_event type;
    enum gdb_event type;
    struct event *next;
    struct event *next;
    union
    union
      {
      {
        struct breakpoint_create breakpoint_create;
        struct breakpoint_create breakpoint_create;
        struct breakpoint_delete breakpoint_delete;
        struct breakpoint_delete breakpoint_delete;
        struct breakpoint_modify breakpoint_modify;
        struct breakpoint_modify breakpoint_modify;
        struct tracepoint_create tracepoint_create;
        struct tracepoint_create tracepoint_create;
        struct tracepoint_delete tracepoint_delete;
        struct tracepoint_delete tracepoint_delete;
        struct tracepoint_modify tracepoint_modify;
        struct tracepoint_modify tracepoint_modify;
      }
      }
    data;
    data;
  };
  };
struct event *pending_events;
struct event *pending_events;
struct event *delivering_events;
struct event *delivering_events;
 
 
static void
static void
append (struct event *new_event)
append (struct event *new_event)
{
{
  struct event **event = &pending_events;
  struct event **event = &pending_events;
  while ((*event) != NULL)
  while ((*event) != NULL)
    event = &((*event)->next);
    event = &((*event)->next);
  (*event) = new_event;
  (*event) = new_event;
  (*event)->next = NULL;
  (*event)->next = NULL;
}
}
 
 
static void
static void
queue_breakpoint_create (int b)
queue_breakpoint_create (int b)
{
{
  struct event *event = XMALLOC (struct event);
  struct event *event = XMALLOC (struct event);
  event->type = breakpoint_create;
  event->type = breakpoint_create;
  event->data.breakpoint_create.b = b;
  event->data.breakpoint_create.b = b;
  append (event);
  append (event);
}
}
 
 
static void
static void
queue_breakpoint_delete (int b)
queue_breakpoint_delete (int b)
{
{
  struct event *event = XMALLOC (struct event);
  struct event *event = XMALLOC (struct event);
  event->type = breakpoint_delete;
  event->type = breakpoint_delete;
  event->data.breakpoint_delete.b = b;
  event->data.breakpoint_delete.b = b;
  append (event);
  append (event);
}
}
 
 
static void
static void
queue_breakpoint_modify (int b)
queue_breakpoint_modify (int b)
{
{
  struct event *event = XMALLOC (struct event);
  struct event *event = XMALLOC (struct event);
  event->type = breakpoint_modify;
  event->type = breakpoint_modify;
  event->data.breakpoint_modify.b = b;
  event->data.breakpoint_modify.b = b;
  append (event);
  append (event);
}
}
 
 
static void
static void
queue_tracepoint_create (int number)
queue_tracepoint_create (int number)
{
{
  struct event *event = XMALLOC (struct event);
  struct event *event = XMALLOC (struct event);
  event->type = tracepoint_create;
  event->type = tracepoint_create;
  event->data.tracepoint_create.number = number;
  event->data.tracepoint_create.number = number;
  append (event);
  append (event);
}
}
 
 
static void
static void
queue_tracepoint_delete (int number)
queue_tracepoint_delete (int number)
{
{
  struct event *event = XMALLOC (struct event);
  struct event *event = XMALLOC (struct event);
  event->type = tracepoint_delete;
  event->type = tracepoint_delete;
  event->data.tracepoint_delete.number = number;
  event->data.tracepoint_delete.number = number;
  append (event);
  append (event);
}
}
 
 
static void
static void
queue_tracepoint_modify (int number)
queue_tracepoint_modify (int number)
{
{
  struct event *event = XMALLOC (struct event);
  struct event *event = XMALLOC (struct event);
  event->type = tracepoint_modify;
  event->type = tracepoint_modify;
  event->data.tracepoint_modify.number = number;
  event->data.tracepoint_modify.number = number;
  append (event);
  append (event);
}
}
 
 
static void
static void
queue_architecture_changed (void)
queue_architecture_changed (void)
{
{
  struct event *event = XMALLOC (struct event);
  struct event *event = XMALLOC (struct event);
  event->type = architecture_changed;
  event->type = architecture_changed;
  append (event);
  append (event);
}
}
 
 
void
void
gdb_events_deliver (struct gdb_events *vector)
gdb_events_deliver (struct gdb_events *vector)
{
{
  /* Just zap any events left around from last time. */
  /* Just zap any events left around from last time. */
  while (delivering_events != NULL)
  while (delivering_events != NULL)
    {
    {
      struct event *event = delivering_events;
      struct event *event = delivering_events;
      delivering_events = event->next;
      delivering_events = event->next;
      xfree (event);
      xfree (event);
    }
    }
  /* Process any pending events.  Because one of the deliveries could
  /* Process any pending events.  Because one of the deliveries could
     bail out we move everything off of the pending queue onto an
     bail out we move everything off of the pending queue onto an
     in-progress queue where it can, later, be cleaned up if
     in-progress queue where it can, later, be cleaned up if
     necessary. */
     necessary. */
  delivering_events = pending_events;
  delivering_events = pending_events;
  pending_events = NULL;
  pending_events = NULL;
  while (delivering_events != NULL)
  while (delivering_events != NULL)
    {
    {
      struct event *event = delivering_events;
      struct event *event = delivering_events;
      switch (event->type)
      switch (event->type)
        {
        {
        case breakpoint_create:
        case breakpoint_create:
          vector->breakpoint_create
          vector->breakpoint_create
            (event->data.breakpoint_create.b);
            (event->data.breakpoint_create.b);
          break;
          break;
        case breakpoint_delete:
        case breakpoint_delete:
          vector->breakpoint_delete
          vector->breakpoint_delete
            (event->data.breakpoint_delete.b);
            (event->data.breakpoint_delete.b);
          break;
          break;
        case breakpoint_modify:
        case breakpoint_modify:
          vector->breakpoint_modify
          vector->breakpoint_modify
            (event->data.breakpoint_modify.b);
            (event->data.breakpoint_modify.b);
          break;
          break;
        case tracepoint_create:
        case tracepoint_create:
          vector->tracepoint_create
          vector->tracepoint_create
            (event->data.tracepoint_create.number);
            (event->data.tracepoint_create.number);
          break;
          break;
        case tracepoint_delete:
        case tracepoint_delete:
          vector->tracepoint_delete
          vector->tracepoint_delete
            (event->data.tracepoint_delete.number);
            (event->data.tracepoint_delete.number);
          break;
          break;
        case tracepoint_modify:
        case tracepoint_modify:
          vector->tracepoint_modify
          vector->tracepoint_modify
            (event->data.tracepoint_modify.number);
            (event->data.tracepoint_modify.number);
          break;
          break;
        case architecture_changed:
        case architecture_changed:
          vector->architecture_changed ();
          vector->architecture_changed ();
          break;
          break;
        }
        }
      delivering_events = event->next;
      delivering_events = event->next;
      xfree (event);
      xfree (event);
    }
    }
}
}
 
 
void _initialize_gdb_events (void);
void _initialize_gdb_events (void);
void
void
_initialize_gdb_events (void)
_initialize_gdb_events (void)
{
{
  struct cmd_list_element *c;
  struct cmd_list_element *c;
  queue_event_hooks.breakpoint_create = queue_breakpoint_create;
  queue_event_hooks.breakpoint_create = queue_breakpoint_create;
  queue_event_hooks.breakpoint_delete = queue_breakpoint_delete;
  queue_event_hooks.breakpoint_delete = queue_breakpoint_delete;
  queue_event_hooks.breakpoint_modify = queue_breakpoint_modify;
  queue_event_hooks.breakpoint_modify = queue_breakpoint_modify;
  queue_event_hooks.tracepoint_create = queue_tracepoint_create;
  queue_event_hooks.tracepoint_create = queue_tracepoint_create;
  queue_event_hooks.tracepoint_delete = queue_tracepoint_delete;
  queue_event_hooks.tracepoint_delete = queue_tracepoint_delete;
  queue_event_hooks.tracepoint_modify = queue_tracepoint_modify;
  queue_event_hooks.tracepoint_modify = queue_tracepoint_modify;
  queue_event_hooks.architecture_changed = queue_architecture_changed;
  queue_event_hooks.architecture_changed = queue_architecture_changed;
 
 
  add_setshow_zinteger_cmd ("event", class_maintenance,
  add_setshow_zinteger_cmd ("event", class_maintenance,
                            &gdb_events_debug, _("\
                            &gdb_events_debug, _("\
Set event debugging."), _("\
Set event debugging."), _("\
Show event debugging."), _("\
Show event debugging."), _("\
When non-zero, event/notify debugging is enabled."),
When non-zero, event/notify debugging is enabled."),
                            NULL,
                            NULL,
                            show_gdb_events_debug,
                            show_gdb_events_debug,
                            &setdebuglist, &showdebuglist);
                            &setdebuglist, &showdebuglist);
}
}
 
 

powered by: WebSVN 2.1.0

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