427b6d5b52e14e3f1f4ccf75fd2ae7ab0f9712f3
[platform/upstream/binutils.git] / gdb / python / py-evts.c
1 /* Python interface to inferior events.
2
3    Copyright (C) 2009-2013 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 "defs.h"
21 #include "py-events.h"
22
23 #ifdef IS_PY3K
24 static struct PyModuleDef EventModuleDef =
25 {
26   PyModuleDef_HEAD_INIT,
27   "gdb.events",
28   NULL,
29   -1, 
30   NULL,
31   NULL,
32   NULL,
33   NULL,
34   NULL
35 };
36 #endif
37
38 /* Initialize python events.  */
39
40 static int CPYCHECKER_NEGATIVE_RESULT_SETS_EXCEPTION
41 add_new_registry (eventregistry_object **registryp, char *name)
42 {
43   *registryp = create_eventregistry_object ();
44
45   if (*registryp == NULL)
46     goto fail;
47
48   if (PyModule_AddObject (gdb_py_events.module,
49                              name,
50                              (PyObject *)(*registryp)) < 0)
51     goto fail;
52
53   return 0;
54
55   fail:
56    Py_XDECREF (*registryp);
57    return -1;
58 }
59
60 void
61 gdbpy_initialize_py_events (void)
62 {
63 #ifdef IS_PY3K
64   gdb_py_events.module = PyModule_Create (&EventModuleDef);
65 #else
66   gdb_py_events.module = Py_InitModule ("events", NULL);
67 #endif
68
69   if (!gdb_py_events.module)
70     goto fail;
71
72   if (add_new_registry (&gdb_py_events.stop, "stop") < 0)
73     goto fail;
74
75   if (add_new_registry (&gdb_py_events.cont, "cont") < 0)
76     goto fail;
77
78   if (add_new_registry (&gdb_py_events.exited, "exited") < 0)
79     goto fail;
80
81   if (add_new_registry (&gdb_py_events.new_objfile, "new_objfile") < 0)
82     goto fail;
83
84 #ifndef IS_PY3K
85   Py_INCREF (gdb_py_events.module);
86 #endif
87   if (PyModule_AddObject (gdb_module,
88                           "events",
89                           (PyObject *) gdb_py_events.module) < 0)
90     goto fail;
91
92   return;
93
94   fail:
95    gdbpy_print_stack ();
96 }