contrib/gdb-7/gdb/python/py-evts.c

   1 /* Python interface to inferior events.
   2
   3    Copyright (C) 2009, 2010, 2011 Free Software Foundation, Inc.
   4
   5    This file is part of GDB.
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 3 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  19
  20 #include "py-events.h"
  21
  22 /* Initialize python events.  */
  23
  24 static int
  25 add_new_registry (eventregistry_object **registryp, char *name)
  26 {
  27   *registryp = create_eventregistry_object ();
  28
  29   if (*registryp == NULL)
  30     goto fail;
  31
  32   if (PyModule_AddObject (gdb_py_events.module,
  33                              name,
  34                              (PyObject *)(*registryp)) < 0)
  35     goto fail;
  36
  37   return 0;
  38
  39   fail:
  40    Py_XDECREF (*registryp);
  41    return -1;
  42 }
  43
  44 void
  45 gdbpy_initialize_py_events (void)
  46 {
  47   gdb_py_events.module = Py_InitModule ("events", NULL);
  48
  49   if (!gdb_py_events.module)
  50     goto fail;
  51
  52   if (add_new_registry (&gdb_py_events.stop, "stop") < 0)
  53     goto fail;
  54
  55   if (add_new_registry (&gdb_py_events.cont, "cont") < 0)
  56     goto fail;
  57
  58   if (add_new_registry (&gdb_py_events.exited, "exited") < 0)
  59     goto fail;
  60
  61   Py_INCREF (gdb_py_events.module);
  62   if (PyModule_AddObject (gdb_module,
  63                           "events",
  64                           (PyObject *) gdb_py_events.module) < 0)
  65     goto fail;
  66
  67   return;
  68
  69   fail:
  70    gdbpy_print_stack ();
  71 }