xref: /netbsd-src/external/gpl3/gdb.old/dist/gdb/python/py-newobjfileevent.c (revision 53b02e147d4ed531c0d2a5ca9b3e8026ba3e99b5)
1 /* Python interface to new object file loading events.
2 
3    Copyright (C) 2011-2019 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-event.h"
22 
23 static gdbpy_ref<>
24 create_new_objfile_event_object (struct objfile *objfile)
25 {
26   gdbpy_ref<> objfile_event
27     = create_event_object (&new_objfile_event_object_type);
28   if (objfile_event == NULL)
29     return NULL;
30 
31   gdbpy_ref<> py_objfile = objfile_to_objfile_object (objfile);
32   if (py_objfile == NULL || evpy_add_attribute (objfile_event.get (),
33 						"new_objfile",
34 						py_objfile.get ()) < 0)
35     return NULL;
36 
37   return objfile_event;
38 }
39 
40 /* Callback function which notifies observers when a new objfile event occurs.
41    This function will create a new Python new_objfile event object.
42    Return -1 if emit fails.  */
43 
44 int
45 emit_new_objfile_event (struct objfile *objfile)
46 {
47   if (evregpy_no_listeners_p (gdb_py_events.new_objfile))
48     return 0;
49 
50   gdbpy_ref<> event = create_new_objfile_event_object (objfile);
51   if (event != NULL)
52     return evpy_emit_event (event.get (), gdb_py_events.new_objfile);
53   return -1;
54 }
55 
56 
57 /* Subroutine of emit_clear_objfiles_event to simplify it.  */
58 
59 static gdbpy_ref<>
60 create_clear_objfiles_event_object (void)
61 {
62   gdbpy_ref<> objfile_event
63     = create_event_object (&clear_objfiles_event_object_type);
64   if (objfile_event == NULL)
65     return NULL;
66 
67   gdbpy_ref<> py_progspace = pspace_to_pspace_object (current_program_space);
68   if (py_progspace == NULL || evpy_add_attribute (objfile_event.get (),
69 						  "progspace",
70 						  py_progspace.get ()) < 0)
71     return NULL;
72 
73   return objfile_event;
74 }
75 
76 /* Callback function which notifies observers when the "clear objfiles"
77    event occurs.
78    This function will create a new Python clear_objfiles event object.
79    Return -1 if emit fails.  */
80 
81 int
82 emit_clear_objfiles_event (void)
83 {
84   if (evregpy_no_listeners_p (gdb_py_events.clear_objfiles))
85     return 0;
86 
87   gdbpy_ref<> event = create_clear_objfiles_event_object ();
88   if (event != NULL)
89     return evpy_emit_event (event.get (), gdb_py_events.clear_objfiles);
90   return -1;
91 }
92