Upgrade GDB from 7.4.1 to 7.6.1 on the vendor branch
[dragonfly.git] / contrib / gdb-7 / gdb / python / py-exitedevent.c
CommitLineData
c50c785c
JM
1/* Python interface to inferior exit events.
2
ef5ccd6c 3 Copyright (C) 2009-2013 Free Software Foundation, Inc.
c50c785c
JM
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
ef5ccd6c 20#include "defs.h"
c50c785c
JM
21#include "py-event.h"
22
23static PyTypeObject exited_event_object_type;
24
25static PyObject *
a45ae5f8 26create_exited_event_object (const LONGEST *exit_code, struct inferior *inf)
c50c785c
JM
27{
28 PyObject *exited_event;
ef5ccd6c 29 PyObject *inf_obj = NULL;
c50c785c
JM
30
31 exited_event = create_event_object (&exited_event_object_type);
32
33 if (!exited_event)
34 goto fail;
35
ef5ccd6c
JM
36 if (exit_code)
37 {
38 PyObject *exit_code_obj = PyLong_FromLongLong (*exit_code);
39 int failed;
40
41 if (exit_code_obj == NULL)
42 goto fail;
43
44 failed = evpy_add_attribute (exited_event, "exit_code",
45 exit_code_obj) < 0;
46 Py_DECREF (exit_code_obj);
47 if (failed)
48 goto fail;
49 }
c50c785c 50
a45ae5f8
JM
51 inf_obj = inferior_to_inferior_object (inf);
52 if (!inf_obj || evpy_add_attribute (exited_event,
53 "inferior",
54 inf_obj) < 0)
55 goto fail;
ef5ccd6c 56 Py_DECREF (inf_obj);
a45ae5f8 57
c50c785c
JM
58 return exited_event;
59
ef5ccd6c
JM
60 fail:
61 Py_XDECREF (inf_obj);
62 Py_XDECREF (exited_event);
63 return NULL;
c50c785c
JM
64}
65
66/* Callback that is used when an exit event occurs. This function
67 will create a new Python exited event object. */
68
69int
a45ae5f8 70emit_exited_event (const LONGEST *exit_code, struct inferior *inf)
c50c785c
JM
71{
72 PyObject *event;
73
74 if (evregpy_no_listeners_p (gdb_py_events.exited))
75 return 0;
76
a45ae5f8 77 event = create_exited_event_object (exit_code, inf);
c50c785c
JM
78
79 if (event)
80 return evpy_emit_event (event, gdb_py_events.exited);
81
82 return -1;
83}
84
85
86GDBPY_NEW_EVENT_TYPE (exited,
87 "gdb.ExitedEvent",
88 "ExitedEvent",
89 "GDB exited event object",
90 event_object_type,
91 static);