plugins/debug-manager/locals.c

   1 /* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 4; tab-width: 4 -*- */
   2 /*
   3     locals.c
   4     Copyright (C) 2000  Kh. Naba Kumar Singh
   5
   6     This program is free software; you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation; either version 2 of the License, or
   9     (at your option) any laterdversion.
  10
  11     This program is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License
  17     along with this program; if not, write to the Free Software
  18     Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
  19 */
  20 #ifdef HAVE_CONFIG_H
  21 #  include <config.h>
  22 #endif
  23
  24 #include "locals.h"
  25
  26 #include "debug_tree.h"
  27
  28 #include "queue.h"
  29
  30 /*#define DEBUG*/
  31 #include <libanjuta/anjuta-debug.h>
  32
  33
  34 typedef struct _DmaThreadLocal
  35 {
  36         GtkTreeModel *model;
  37         gint thread;
  38         guint frame;
  39 } DmaThreadLocal;
  40
  41 typedef struct _DmaThreadAndFrame
  42 {
  43         gint thread;
  44         guint frame;
  45 } DmaThreadAndFrame;
  46
  47 struct _Locals
  48 {
  49         AnjutaPlugin *plugin;
  50         DmaDebuggerQueue *debugger;
  51
  52         GtkWidget *main_w;
  53         DebugTree *debug_tree;
  54
  55         DmaThreadLocal* current;
  56         GList *list;
  57 };
  58
  59 static void
  60 locals_updated (const gpointer data, gpointer user_data, GError *error)
  61 {
  62         const GList *list = (const GList *)data;
  63         Locals *self = (Locals*) user_data;
  64
  65         g_return_if_fail (self != NULL);
  66
  67         if (error != NULL)
  68                 return;
  69
  70         if (g_list_length ((GList*)list) < 1)
  71                 return;
  72
  73         debug_tree_update_all(self->debug_tree);
  74         debug_tree_replace_list (self->debug_tree, list);
  75         debug_tree_update_all(self->debug_tree);
  76 }
  77
  78 /* Private functions
  79  *---------------------------------------------------------------------------*/
  80
  81 static void
  82 create_locals_gui (Locals *self)
  83 {
  84         g_return_if_fail (self->debug_tree == NULL);
  85         g_return_if_fail (self->main_w == NULL);
  86
  87         self->debug_tree = debug_tree_new (self->plugin);
  88         debug_tree_connect (self->debug_tree, self->debugger);
  89
  90         /* Create local window */
  91         GtkWidget *main_w;
  92
  93         main_w = gtk_scrolled_window_new (NULL, NULL);
  94         gtk_widget_show (main_w);
  95         gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (main_w),
  96                                                                         GTK_POLICY_AUTOMATIC,
  97                                                                         GTK_POLICY_AUTOMATIC);
  98         gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (main_w),
  99                                                                                  GTK_SHADOW_IN);
 100         gtk_container_add (GTK_CONTAINER (main_w), debug_tree_get_tree_widget (self->debug_tree));
 101         gtk_widget_show_all (main_w);
 102         self->main_w = main_w;
 103
 104         anjuta_shell_add_widget (self->plugin->shell,
 105                                                          self->main_w,
 106                                                          /* This is the list of local variables. */
 107                                                          "AnjutaDebuggerLocals", _("Locals"),
 108                                                          "gdb-locals-icon", ANJUTA_SHELL_PLACEMENT_BOTTOM,
 109                                                          NULL);
 110 }
 111
 112 static void
 113 destroy_locals_gui (Locals *self)
 114 {
 115         if (self->debug_tree != NULL)
 116         {
 117                 debug_tree_free (self->debug_tree);
 118                 self->debug_tree = NULL;
 119         }
 120
 121         if (self->main_w != NULL)
 122         {
 123                 gtk_widget_destroy (GTK_WIDGET (self->main_w));
 124                 self->main_w = NULL;
 125         }
 126 }
 127
 128 static void
 129 on_clear_locals (gpointer data, gpointer user_data)
 130 {
 131         DmaThreadLocal *frame = (DmaThreadLocal *) data;
 132         Locals *self = (Locals *)user_data;
 133
 134         debug_tree_remove_model (self->debug_tree, frame->model);
 135         g_object_unref (G_OBJECT (frame->model));
 136         g_free (frame);
 137 }
 138
 139 static void
 140 dma_thread_clear_all_locals (Locals *self)
 141 {
 142         /* Clear all GtkListStore */
 143         g_list_foreach (self->list, (GFunc)on_clear_locals, self);
 144         g_list_free (self->list);
 145
 146         self->current = NULL;
 147         self->list = NULL;
 148 }
 149
 150 static gboolean
 151 on_find_local (gconstpointer a, gconstpointer b)
 152 {
 153         const DmaThreadLocal *frame = (const DmaThreadLocal *)a;
 154         const DmaThreadAndFrame *comp = (const DmaThreadAndFrame *)b;
 155
 156         return !((frame->thread == comp->thread) && (frame->frame == comp->frame));
 157 }
 158
 159 static DmaThreadLocal *
 160 dma_thread_find_local (Locals *self, gint thread, guint frame)
 161 {
 162         GList *list;
 163         DmaThreadAndFrame comp = {thread, frame};
 164
 165         list = g_list_find_custom (self->list, (gconstpointer) &comp, on_find_local);
 166
 167         return list == NULL ? NULL : (DmaThreadLocal *)list->data;
 168 }
 169
 170 static void
 171 dma_thread_add_local (Locals *self, GtkTreeModel *model, gint thread, guint frame)
 172 {
 173         DmaThreadLocal *local;
 174
 175         local = g_new (DmaThreadLocal, 1);
 176         local->thread = thread;
 177         local->frame = frame;
 178         local->model = model;
 179         g_object_ref (G_OBJECT (model));
 180
 181         self->list = g_list_append (self->list, local);
 182         self->current = local;
 183 }
 184
 185 /* Private functions
 186  *---------------------------------------------------------------------------*/
 187
 188 static void locals_update (Locals *self, gint thread)
 189 {
 190         dma_thread_clear_all_locals (self);
 191
 192         dma_thread_add_local (self, debug_tree_get_model (self->debug_tree), thread, 0);
 193
 194         dma_queue_list_local (self->debugger, locals_updated, self);
 195 }
 196
 197 static void
 198 locals_change_frame (Locals *self, guint frame, gint thread)
 199 {
 200         DmaThreadLocal *local;
 201
 202         /* Check if we really need a change */
 203         if ((self->current != NULL) && (self->current->thread == thread) && (self->current->frame == frame)) return;
 204
 205         local = dma_thread_find_local (self, thread, frame);
 206         if (local != NULL)
 207         {
 208                 /* Find frame already read */
 209                 self->current = local;
 210                 debug_tree_set_model (self->debug_tree, self->current->model);
 211
 212                 return;
 213         }
 214
 215         debug_tree_new_model (self->debug_tree);
 216         dma_thread_add_local (self, debug_tree_get_model (self->debug_tree), thread, frame);
 217         dma_queue_list_local (self->debugger, locals_updated, self);
 218 }
 219
 220 static void
 221 on_program_moved (Locals *self, guint pid, gint thread)
 222 {
 223         locals_update (self, thread);
 224 }
 225
 226 static void
 227 on_frame_changed (Locals *self, guint frame, gint thread)
 228 {
 229         /* Change thread and frame*/
 230         locals_change_frame (self, frame, thread);
 231 }
 232
 233 static void
 234 on_program_exited (Locals *self)
 235 {
 236         /* Disconnect signals */
 237         g_signal_handlers_disconnect_by_func (self->plugin, on_program_exited, self);
 238         g_signal_handlers_disconnect_by_func (self->plugin, on_program_moved, self);
 239         g_signal_handlers_disconnect_by_func (self->plugin, on_frame_changed, self);
 240
 241         dma_thread_clear_all_locals (self);
 242
 243         destroy_locals_gui (self);
 244 }
 245
 246 static void
 247 on_program_started (Locals *self)
 248 {
 249         if (!dma_debugger_queue_is_supported (self->debugger, HAS_VARIABLE)) return;
 250
 251         create_locals_gui (self);
 252
 253         g_signal_connect_swapped (self->plugin, "program-exited", G_CALLBACK (on_program_exited), self);
 254         g_signal_connect_swapped (self->plugin, "program-moved", G_CALLBACK (on_program_moved), self);
 255         g_signal_connect_swapped (self->plugin, "frame-changed", G_CALLBACK (on_frame_changed), self);
 256 }
 257
 258 /* Public function
 259  *---------------------------------------------------------------------------*/
 260
 261 gchar*
 262 locals_find_variable_value (Locals *l, const gchar *name)
 263 {
 264         return debug_tree_find_variable_value (l->debug_tree, name);
 265 }
 266
 267 /* Constructor & Destructor
 268  *---------------------------------------------------------------------------*/
 269
 270 Locals *
 271 locals_new (DebugManagerPlugin *plugin)
 272 {
 273         Locals *self = g_new0 (Locals, 1);
 274
 275         self->plugin = ANJUTA_PLUGIN (plugin);
 276         self->debugger = dma_debug_manager_get_queue (plugin);
 277
 278         g_signal_connect_swapped (self->plugin, "program-started", G_CALLBACK (on_program_started), self);
 279
 280         return self;
 281 }
 282
 283 void
 284 locals_free (Locals *self)
 285 {
 286         g_return_if_fail (self != NULL);
 287
 288         g_signal_handlers_disconnect_matched (self->plugin, G_SIGNAL_MATCH_DATA, 0, 0, NULL, NULL, self);
 289
 290         dma_thread_clear_all_locals (self);
 291
 292         /* Destroy gui */
 293         destroy_locals_gui (self);
 294
 295         g_free (self);
 296 }