[wxWidgets.git] / src / gtk / assertdlg_gtk.c

/* ///////////////////////////////////////////////////////////////////////////
// Name:        assertdlg_gtk.c
// Purpose:     GtkAssertDialog
// Author:      Francesco Montorsi
// Id:          $Id$
// Copyright:   (c) 2006 Francesco Montorsi
// Licence:     wxWindows licence
/////////////////////////////////////////////////////////////////////////// */

#ifdef VMS
#define XCheckIfEvent XCHECKIFEVENT
#endif

#include "wx/platform.h"
#include "wx/gtk/assertdlg_gtk.h"

#ifdef __cplusplus
extern "C" {
#endif /* __cplusplus */

#include <gtk/gtk.h>

/* For FILE */
#include <stdio.h>


#if GTK_CHECK_VERSION(2,4,0)
#include <gtk/gtkexpander.h>
#endif


/* ----------------------------------------------------------------------------
   Constants
 ---------------------------------------------------------------------------- */

/*
   NB: when changing order of the columns also update the gtk_list_store_new() call
       in gtk_assert_dialog_create_backtrace_list_model() function
 */
#define STACKFRAME_LEVEL_COLIDX        0
#define FUNCTION_NAME_COLIDX           1
#define SOURCE_FILE_COLIDX             2
#define LINE_NUMBER_COLIDX             3
#define FUNCTION_ARGS_COLIDX           4


/* ----------------------------------------------------------------------------
   GtkAssertDialog helpers
 ---------------------------------------------------------------------------- */

GtkWidget *gtk_assert_dialog_add_button_to (GtkBox *box, const gchar *label,
                                            const gchar *stock, gint response_id)
{
    /* create the button */
    GtkWidget *button = gtk_button_new_with_mnemonic (label);
    GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);

#if GTK_CHECK_VERSION(2,6,0)
    if (!gtk_check_version (2, 6, 0))
    {
        /* add a stock icon inside it */
        GtkWidget *image = gtk_image_new_from_stock (stock, GTK_ICON_SIZE_BUTTON);
        gtk_button_set_image (GTK_BUTTON (button), image);
    }
#endif

    /* add to the given (container) widget */
    if (box)
        gtk_box_pack_end (box, button, FALSE, TRUE, 8);

    return button;
}

GtkWidget *gtk_assert_dialog_add_button (GtkAssertDialog *dlg, const gchar *label,
                                         const gchar *stock, gint response_id)
{
    /* create the button */
    GtkWidget *button = gtk_assert_dialog_add_button_to (NULL, label, stock, response_id);

    /* add the button to the dialog's action area */
    gtk_dialog_add_action_widget (GTK_DIALOG (dlg), button, response_id);

    return button;
}

void gtk_assert_dialog_append_text_column (GtkWidget *treeview, const gchar *name, int index)
{
    GtkCellRenderer *renderer;
    GtkTreeViewColumn *column;

    renderer = gtk_cell_renderer_text_new ();
    column = gtk_tree_view_column_new_with_attributes (name, renderer,
                                                       "text", index, NULL);
    gtk_tree_view_insert_column (GTK_TREE_VIEW (treeview), column, index);
    gtk_tree_view_column_set_resizable (column, TRUE);
    gtk_tree_view_column_set_reorderable (column, TRUE);
}

GtkWidget *gtk_assert_dialog_create_backtrace_list_model ()
{
    GtkListStore *store;
    GtkWidget *treeview;

    /* create list store */
    store = gtk_list_store_new (5,
                                G_TYPE_UINT,        /* stack frame number */
                                G_TYPE_STRING,      /* function name      */
                                G_TYPE_STRING,      /* source file name   */
                                G_TYPE_STRING,      /* line number        */
                                G_TYPE_STRING);     /* function arguments */

    /* create the tree view */
    treeview = gtk_tree_view_new_with_model (GTK_TREE_MODEL(store));
    g_object_unref (store);
    gtk_tree_view_set_rules_hint (GTK_TREE_VIEW (treeview), TRUE);

    /* append columns */
    gtk_assert_dialog_append_text_column(treeview, "#", STACKFRAME_LEVEL_COLIDX);
    gtk_assert_dialog_append_text_column(treeview, "Function name", FUNCTION_NAME_COLIDX);
    gtk_assert_dialog_append_text_column(treeview, "Function args", FUNCTION_ARGS_COLIDX);
    gtk_assert_dialog_append_text_column(treeview, "Source file", SOURCE_FILE_COLIDX);
    gtk_assert_dialog_append_text_column(treeview, "Line #", LINE_NUMBER_COLIDX);

    return treeview;
}

void gtk_assert_dialog_process_backtrace (GtkAssertDialog *dlg)
{
    /* set busy cursor */
    GdkWindow *parent = GTK_WIDGET(dlg)->window;
    GdkCursor *cur = gdk_cursor_new (GDK_WATCH);
    gdk_window_set_cursor (parent, cur);
    gdk_flush ();

    (*dlg->callback)(dlg->userdata);

    /* toggle busy cursor */
    gdk_window_set_cursor (parent, NULL);
    gdk_cursor_unref (cur);
}


/* ----------------------------------------------------------------------------
   GtkAssertDialog signal handlers
 ---------------------------------------------------------------------------- */

/* GtkFileChooserDialog and GtkExpander are only available in GTK+ >= 2.4 */
#if GTK_CHECK_VERSION(2,4,0)

void gtk_assert_dialog_expander_callback (GtkWidget *widget, GtkAssertDialog *dlg)
{
    /* status is not yet updated so we need to invert it to get the new one */
    gboolean expanded = !gtk_expander_get_expanded (GTK_EXPANDER(dlg->expander));
    gtk_window_set_resizable (GTK_WINDOW (dlg), expanded);

    if (dlg->callback == NULL)      /* was the backtrace already processed? */
        return;

    gtk_assert_dialog_process_backtrace (dlg);

    /* mark the work as done (so that next activate we won't call the callback again) */
    dlg->callback = NULL;
}

void gtk_assert_dialog_save_backtrace_callback (GtkWidget *widget, GtkAssertDialog *dlg)
{
    GtkWidget *dialog;

    dialog = gtk_file_chooser_dialog_new ("Save assert info to file", GTK_WINDOW(dlg),
                                          GTK_FILE_CHOOSER_ACTION_SAVE,
                                          GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
                                          GTK_STOCK_SAVE, GTK_RESPONSE_ACCEPT,
                                          NULL);

    if (gtk_dialog_run (GTK_DIALOG (dialog)) == GTK_RESPONSE_ACCEPT)
    {
        char *filename, *msg, *backtrace;
        FILE *fp;

        filename = gtk_file_chooser_get_filename (GTK_FILE_CHOOSER (dialog));
        if ( filename )
        {
            msg = gtk_assert_dialog_get_message (dlg);
            backtrace = gtk_assert_dialog_get_backtrace (dlg);

            /* open the file and write all info inside it */
            fp = fopen (filename, "w");
            if (fp)
            {
                fprintf (fp, "ASSERT INFO:\n%s\n\nBACKTRACE:\n%s", msg, backtrace);
                fclose (fp);
            }

            g_free (filename);
            g_free (msg);
            g_free (backtrace);
        }
    }

    gtk_widget_destroy (dialog);
}
#endif /* GTK+ 2.4+ */

void gtk_assert_dialog_copy_callback (GtkWidget *widget, GtkAssertDialog *dlg)
{
    char *msg, *backtrace;
    GtkClipboard *clipboard;
    GString *str;

    msg = gtk_assert_dialog_get_message (dlg);
    backtrace = gtk_assert_dialog_get_backtrace (dlg);

    /* combine both in a single string */
    str = g_string_new("");
    g_string_printf (str, "ASSERT INFO:\n%s\n\nBACKTRACE:\n%s\n\n", msg, backtrace);

    /* copy everything in default clipboard */
    clipboard = gtk_clipboard_get (GDK_SELECTION_CLIPBOARD);
    gtk_clipboard_set_text (clipboard, str->str, str->len);

    /* copy everything in primary clipboard too */
    clipboard = gtk_clipboard_get (GDK_SELECTION_PRIMARY);
    gtk_clipboard_set_text (clipboard, str->str, str->len);

    g_free (msg);
    g_free (backtrace);
    g_string_free (str, TRUE);
}

void gtk_assert_dialog_continue_callback (GtkWidget *widget, GtkAssertDialog *dlg)
{
    gint response =
        gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON(dlg->shownexttime)) ?
            GTK_ASSERT_DIALOG_CONTINUE : GTK_ASSERT_DIALOG_CONTINUE_SUPPRESSING;

    gtk_dialog_response (GTK_DIALOG(dlg), response);
}


/* ----------------------------------------------------------------------------
   GtkAssertDialogClass implementation
 ---------------------------------------------------------------------------- */

static void     gtk_assert_dialog_init              (GtkAssertDialog        *self);
static void     gtk_assert_dialog_class_init        (GtkAssertDialogClass *klass);


GtkType gtk_assert_dialog_get_type (void)
{
    static GtkType assert_dialog_type = 0;

    if (!assert_dialog_type)
    {
        const GTypeInfo assert_dialog_info =
        {
            sizeof (GtkAssertDialogClass),
            NULL,           /* base_init */
            NULL,           /* base_finalize */
            (GClassInitFunc) gtk_assert_dialog_class_init,
            NULL,           /* class_finalize */
            NULL,           /* class_data */
            sizeof (GtkAssertDialog),
            16,             /* n_preallocs */
            (GInstanceInitFunc) gtk_assert_dialog_init,
            NULL
        };
        assert_dialog_type = g_type_register_static (GTK_TYPE_DIALOG, "GtkAssertDialog", &assert_dialog_info, (GTypeFlags)0);
    }

    return assert_dialog_type;
}

void gtk_assert_dialog_class_init(GtkAssertDialogClass *klass)
{
    /* no special initializations required */
}

void gtk_assert_dialog_init(GtkAssertDialog *dlg)
{
    GtkWidget *continuebtn;

    {
        GtkWidget *vbox, *hbox, *image;

        /* start the main vbox */
        gtk_widget_push_composite_child ();
        vbox = gtk_vbox_new (FALSE, 8);
        gtk_container_set_border_width (GTK_CONTAINER(vbox), 8);
        gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dlg)->vbox), vbox, TRUE, TRUE, 5);


        /* add the icon+message hbox */
        hbox = gtk_hbox_new (FALSE, 0);
        gtk_box_pack_start (GTK_BOX(vbox), hbox, FALSE, FALSE, 0);

        /* icon */
        image = gtk_image_new_from_stock (GTK_STOCK_DIALOG_ERROR, GTK_ICON_SIZE_DIALOG);
        gtk_box_pack_start (GTK_BOX(hbox), image, FALSE, FALSE, 12);

        {
            GtkWidget *vbox2, *info;

            /* message */
            vbox2 = gtk_vbox_new (FALSE, 0);
            gtk_box_pack_start (GTK_BOX (hbox), vbox2, TRUE, TRUE, 0);
            info = gtk_label_new ("An assertion failed!");
            gtk_box_pack_start (GTK_BOX(vbox2), info, TRUE, TRUE, 8);

            /* assert message */
            dlg->message = gtk_label_new (NULL);
            gtk_label_set_selectable (GTK_LABEL (dlg->message), TRUE);
            gtk_label_set_line_wrap (GTK_LABEL (dlg->message), TRUE);
            gtk_label_set_justify (GTK_LABEL (dlg->message), GTK_JUSTIFY_LEFT);
            gtk_widget_set_size_request (GTK_WIDGET(dlg->message), 450, -1);

            gtk_box_pack_end (GTK_BOX(vbox2), GTK_WIDGET(dlg->message), TRUE, TRUE, 8);
        }

        /* add the expander */
#if GTK_CHECK_VERSION(2,4,0)
        if (!gtk_check_version (2, 4, 0))
        {
            dlg->expander = gtk_expander_new_with_mnemonic ("Back_trace:");
            gtk_box_pack_start (GTK_BOX(vbox), dlg->expander, TRUE, TRUE, 0);
            g_signal_connect (GTK_EXPANDER(dlg->expander), "activate",
                              G_CALLBACK(gtk_assert_dialog_expander_callback), dlg);
        }
        else
#endif
        {
            /* if GtkExpander is unavailable, then use a static frame instead */
            dlg->expander = gtk_frame_new ("Back_trace:");
            gtk_box_pack_start (GTK_BOX(vbox), dlg->expander, TRUE, TRUE, 0);
        }
    }

    {
        GtkWidget *hbox, *vbox, *button, *sw;

        /* create expander's vbox */
        vbox = gtk_vbox_new (FALSE, 0);
        gtk_container_add (GTK_CONTAINER (dlg->expander), vbox);

        /* add a scrollable window under the expander */
        sw = gtk_scrolled_window_new (NULL, NULL);
        gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (sw), GTK_SHADOW_ETCHED_IN);
        gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw), GTK_POLICY_AUTOMATIC,
                                        GTK_POLICY_AUTOMATIC);
        gtk_box_pack_start (GTK_BOX(vbox), sw, TRUE, TRUE, 8);

        /* add the treeview to the scrollable window */
        dlg->treeview = gtk_assert_dialog_create_backtrace_list_model ();
        gtk_widget_set_size_request (GTK_WIDGET(dlg->treeview), -1, 180);
        gtk_container_add (GTK_CONTAINER (sw), dlg->treeview);

        /* create button's hbox */
        hbox = gtk_hbutton_box_new ();
        gtk_box_pack_end (GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
        gtk_button_box_set_layout (GTK_BUTTON_BOX(hbox), GTK_BUTTONBOX_END);

        /* add the buttons */
#if GTK_CHECK_VERSION(2,4,0)
        if (!gtk_check_version (2, 4, 0))
        {
            /* add this button only if GTK supports GtkFileChooserDialog */
            button = gtk_assert_dialog_add_button_to (GTK_BOX(hbox), "Save to _file",
                                                    GTK_STOCK_SAVE, GTK_RESPONSE_NONE);
            g_signal_connect (button, "clicked",
                              G_CALLBACK(gtk_assert_dialog_save_backtrace_callback), dlg);
        }
#endif

        button = gtk_assert_dialog_add_button_to (GTK_BOX(hbox), "Copy to clip_board",
                                                  GTK_STOCK_COPY, GTK_RESPONSE_NONE);
        g_signal_connect (button, "clicked", G_CALLBACK(gtk_assert_dialog_copy_callback), dlg);
    }

    /* add the checkbutton */
    dlg->shownexttime = gtk_check_button_new_with_mnemonic("Show this _dialog the next time");
    gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON(dlg->shownexttime), TRUE);
    gtk_box_pack_end (GTK_BOX(GTK_DIALOG(dlg)->action_area), dlg->shownexttime, FALSE, TRUE, 8);

    /* add the stop button */
    gtk_assert_dialog_add_button (dlg, "_Stop", GTK_STOCK_QUIT, GTK_ASSERT_DIALOG_STOP);

    /* add the continue button */
    continuebtn = gtk_assert_dialog_add_button (dlg, "_Continue", GTK_STOCK_YES, GTK_ASSERT_DIALOG_CONTINUE);
    gtk_dialog_set_default_response (GTK_DIALOG (dlg), GTK_ASSERT_DIALOG_CONTINUE);
    g_signal_connect (continuebtn, "clicked", G_CALLBACK(gtk_assert_dialog_continue_callback), dlg);

    /* complete creation */
    dlg->callback = NULL;
    dlg->userdata = NULL;

    /* the resizeable property of this window is modified by the expander:
       when it's collapsed, the window must be non-resizeable! */
    gtk_window_set_resizable (GTK_WINDOW (dlg), FALSE);
    gtk_widget_pop_composite_child ();
    gtk_widget_show_all (GTK_WIDGET(dlg));
}


/* ----------------------------------------------------------------------------
   GtkAssertDialog public API
 ---------------------------------------------------------------------------- */

gchar *gtk_assert_dialog_get_message (GtkAssertDialog *dlg)
{
    /* NOTES:
       1) returned string must g_free()d !
       2) Pango markup is automatically stripped off by GTK
    */
    return g_strdup (gtk_label_get_text (GTK_LABEL(dlg->message)));
}

gchar *gtk_assert_dialog_get_backtrace (GtkAssertDialog *dlg)
{
    gchar *function, *arguments, *sourcefile, *linenum;
    guint count;

    GtkTreeModel *model;
    GtkTreeIter iter;
    GString *string;

    g_return_val_if_fail (GTK_IS_ASSERT_DIALOG (dlg), NULL);
    model = gtk_tree_view_get_model (GTK_TREE_VIEW(dlg->treeview));
    string = g_string_new("");

    /* iterate over the list */
    if (!gtk_tree_model_get_iter_first (model, &iter))
        return NULL;

    do
    {
        /* append this stack frame's info to the string */
        gtk_tree_model_get (model, &iter,
                            STACKFRAME_LEVEL_COLIDX, &count,
                            FUNCTION_NAME_COLIDX, &function,
                            FUNCTION_ARGS_COLIDX, &arguments,
                            SOURCE_FILE_COLIDX, &sourcefile,
                            LINE_NUMBER_COLIDX, &linenum,
                            -1);

        g_string_append_printf (string, "[%u] %s(%s)",
                                count, function, arguments);
        if (sourcefile[0] != '\0')
            g_string_append_printf (string, " %s", sourcefile);
        if (linenum[0] != '\0')
            g_string_append_printf (string, ":%s", linenum);
        g_string_append (string, "\n");

        g_free (function);
        g_free (arguments);
        g_free (sourcefile);
        g_free (linenum);

    } while (gtk_tree_model_iter_next (model, &iter));

    /* returned string must g_free()d */
    return g_string_free (string, FALSE);
}

void gtk_assert_dialog_set_message(GtkAssertDialog *dlg, const gchar *msg)
{
    /* prepend and append the <b> tag
       NOTE: g_markup_printf_escaped() is not used because it's available
             only for glib >= 2.4 */
    gchar *escaped_msg = g_markup_escape_text (msg, -1);
    gchar *decorated_msg = g_strdup_printf ("<b>%s</b>", escaped_msg);

    g_return_if_fail (GTK_IS_ASSERT_DIALOG (dlg));
    gtk_label_set_markup (GTK_LABEL(dlg->message), decorated_msg);

    g_free (decorated_msg);
    g_free (escaped_msg);
}

void gtk_assert_dialog_set_backtrace_callback(GtkAssertDialog *assertdlg,
                                              GtkAssertDialogStackFrameCallback callback,
                                              void *userdata)
{
    assertdlg->callback = callback;
    assertdlg->userdata = userdata;

    if (gtk_check_version (2, 4, 0))
    {
        /* we need to immediately process the stack trace as we're not using
           an expander since GTK does not support it */
        gtk_assert_dialog_process_backtrace (assertdlg);
    }
}

void gtk_assert_dialog_append_stack_frame(GtkAssertDialog *dlg,
                                          const gchar *function,
                                          const gchar *arguments,
                                          const gchar *sourcefile,
                                          guint line_number)
{
    GtkTreeModel *model;
    GtkTreeIter iter;
    GString *linenum;
    gint count;

    g_return_if_fail (GTK_IS_ASSERT_DIALOG (dlg));
    model = gtk_tree_view_get_model (GTK_TREE_VIEW(dlg->treeview));

    /* how many items are in the list up to now ? */
    count = gtk_tree_model_iter_n_children (model, NULL);

    linenum = g_string_new("");
    if ( line_number != 0 )
        g_string_printf (linenum, "%u", line_number);

    /* add data to the list store */
    gtk_list_store_append (GTK_LIST_STORE(model), &iter);
    gtk_list_store_set (GTK_LIST_STORE(model), &iter,
                        STACKFRAME_LEVEL_COLIDX, count+1,     /* start from 1 and not from 0 */
                        FUNCTION_NAME_COLIDX, function,
                        FUNCTION_ARGS_COLIDX, arguments,
                        SOURCE_FILE_COLIDX, sourcefile,
                        LINE_NUMBER_COLIDX, linenum->str,
                        -1);

    g_string_free (linenum, TRUE);
}

GtkWidget *gtk_assert_dialog_new(void)
{
    GtkAssertDialog *dialog = g_object_new (GTK_TYPE_ASSERT_DIALOG, NULL);

    return GTK_WIDGET (dialog);
}

#ifdef __cplusplus
}
#endif /* __cplusplus */
Commit	Line	Data
30c4dd91 RR	1	/* ///////////////////////////////////////////////////////////////////////////
	2	// Name: assertdlg_gtk.c
	3	// Purpose: GtkAssertDialog
	4	// Author: Francesco Montorsi
	5	// Id: $Id$
	6	// Copyright: (c) 2006 Francesco Montorsi
	7	// Licence: wxWindows licence
	8	/////////////////////////////////////////////////////////////////////////// */
	9
	10	#ifdef VMS
	11	#define XCheckIfEvent XCHECKIFEVENT
	12	#endif
	13
	14	#include "wx/platform.h"
	15	#include "wx/gtk/assertdlg_gtk.h"
	16
	17	#ifdef __cplusplus
	18	extern "C" {
	19	#endif /* __cplusplus */
	20
	21	#include <gtk/gtk.h>
	22
3a2d0cec JS	23	/* For FILE */
	24	#include <stdio.h>
	25
30c4dd91 RR	26
	27	#if GTK_CHECK_VERSION(2,4,0)
	28	#include <gtk/gtkexpander.h>
	29	#endif
	30
	31
	32	/* ----------------------------------------------------------------------------
	33	Constants
	34	---------------------------------------------------------------------------- */
	35
61011e91 VZ	36	/*
	37	NB: when changing order of the columns also update the gtk_list_store_new() call
	38	in gtk_assert_dialog_create_backtrace_list_model() function
	39	*/
30c4dd91 RR	40	#define STACKFRAME_LEVEL_COLIDX 0
	41	#define FUNCTION_NAME_COLIDX 1
	42	#define SOURCE_FILE_COLIDX 2
	43	#define LINE_NUMBER_COLIDX 3
	44	#define FUNCTION_ARGS_COLIDX 4
	45
	46
	47
	48
	49	/* ----------------------------------------------------------------------------
	50	GtkAssertDialog helpers
	51	---------------------------------------------------------------------------- */
	52
	53	GtkWidget gtk_assert_dialog_add_button_to (GtkBox box, const gchar *label,
	54	const gchar *stock, gint response_id)
	55	{
	56	/* create the button */
	57	GtkWidget *button = gtk_button_new_with_mnemonic (label);
	58	GTK_WIDGET_SET_FLAGS (button, GTK_CAN_DEFAULT);
	59
	60	#if GTK_CHECK_VERSION(2,6,0)
	61	if (!gtk_check_version (2, 6, 0))
	62	{
	63	/* add a stock icon inside it */
	64	GtkWidget *image = gtk_image_new_from_stock (stock, GTK_ICON_SIZE_BUTTON);
	65	gtk_button_set_image (GTK_BUTTON (button), image);
	66	}
	67	#endif
	68
	69	/* add to the given (container) widget */
	70	if (box)
	71	gtk_box_pack_end (box, button, FALSE, TRUE, 8);
	72
	73	return button;
	74	}
	75
364663aa VZ	76	GtkWidget gtk_assert_dialog_add_button (GtkAssertDialog dlg, const gchar *label,
364663aa VZ	77	const gchar *stock, gint response_id)
30c4dd91 RR	78	{
	79	/* create the button */
	80	GtkWidget *button = gtk_assert_dialog_add_button_to (NULL, label, stock, response_id);
	81
	82	/* add the button to the dialog's action area */
	83	gtk_dialog_add_action_widget (GTK_DIALOG (dlg), button, response_id);
364663aa VZ	84
364663aa VZ	85	return button;
30c4dd91 RR	86	}
	87
	88	void gtk_assert_dialog_append_text_column (GtkWidget treeview, const gchar name, int index)
	89	{
	90	GtkCellRenderer *renderer;
	91	GtkTreeViewColumn *column;
	92
	93	renderer = gtk_cell_renderer_text_new ();
	94	column = gtk_tree_view_column_new_with_attributes (name, renderer,
	95	"text", index, NULL);
	96	gtk_tree_view_insert_column (GTK_TREE_VIEW (treeview), column, index);
	97	gtk_tree_view_column_set_resizable (column, TRUE);
	98	gtk_tree_view_column_set_reorderable (column, TRUE);
	99	}
	100
	101	GtkWidget *gtk_assert_dialog_create_backtrace_list_model ()
	102	{
	103	GtkListStore *store;
	104	GtkWidget *treeview;
	105
	106	/* create list store */
	107	store = gtk_list_store_new (5,
61011e91 VZ	108	G_TYPE_UINT, /* stack frame number */
	109	G_TYPE_STRING, /* function name */
	110	G_TYPE_STRING, /* source file name */
	111	G_TYPE_STRING, /* line number */
	112	G_TYPE_STRING); /* function arguments */
30c4dd91 RR	113
	114	/* create the tree view */
	115	treeview = gtk_tree_view_new_with_model (GTK_TREE_MODEL(store));
	116	g_object_unref (store);
	117	gtk_tree_view_set_rules_hint (GTK_TREE_VIEW (treeview), TRUE);
	118
61011e91	119	/* append columns */
30c4dd91 RR	120	gtk_assert_dialog_append_text_column(treeview, "#", STACKFRAME_LEVEL_COLIDX);
	121	gtk_assert_dialog_append_text_column(treeview, "Function name", FUNCTION_NAME_COLIDX);
	122	gtk_assert_dialog_append_text_column(treeview, "Function args", FUNCTION_ARGS_COLIDX);
	123	gtk_assert_dialog_append_text_column(treeview, "Source file", SOURCE_FILE_COLIDX);
	124	gtk_assert_dialog_append_text_column(treeview, "Line #", LINE_NUMBER_COLIDX);
	125
	126	return treeview;
	127	}
	128
	129	void gtk_assert_dialog_process_backtrace (GtkAssertDialog *dlg)
	130	{
	131	/* set busy cursor */
	132	GdkWindow *parent = GTK_WIDGET(dlg)->window;
	133	GdkCursor *cur = gdk_cursor_new (GDK_WATCH);
	134	gdk_window_set_cursor (parent, cur);
	135	gdk_flush ();
	136
	137	(*dlg->callback)(dlg->userdata);
	138
	139	/* toggle busy cursor */
	140	gdk_window_set_cursor (parent, NULL);
	141	gdk_cursor_unref (cur);
	142	}
	143
	144
	145
	146	/* ----------------------------------------------------------------------------
	147	GtkAssertDialog signal handlers
	148	---------------------------------------------------------------------------- */
	149
61011e91 VZ	150	/* GtkFileChooserDialog and GtkExpander are only available in GTK+ >= 2.4 */
61011e91 VZ	151	#if GTK_CHECK_VERSION(2,4,0)
30c4dd91 RR	152
	153	void gtk_assert_dialog_expander_callback (GtkWidget widget, GtkAssertDialog dlg)
	154	{
61011e91	155	/* status is not yet updated so we need to invert it to get the new one */
30c4dd91 RR	156	gboolean expanded = !gtk_expander_get_expanded (GTK_EXPANDER(dlg->expander));
	157	gtk_window_set_resizable (GTK_WINDOW (dlg), expanded);
	158
	159	if (dlg->callback == NULL) /* was the backtrace already processed? */
	160	return;
	161
	162	gtk_assert_dialog_process_backtrace (dlg);
	163
	164	/* mark the work as done (so that next activate we won't call the callback again) */
	165	dlg->callback = NULL;
	166	}
	167
	168	void gtk_assert_dialog_save_backtrace_callback (GtkWidget widget, GtkAssertDialog dlg)
	169	{
	170	GtkWidget *dialog;
	171
	172	dialog = gtk_file_chooser_dialog_new ("Save assert info to file", GTK_WINDOW(dlg),
	173	GTK_FILE_CHOOSER_ACTION_SAVE,
	174	GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
	175	GTK_STOCK_SAVE, GTK_RESPONSE_ACCEPT,
	176	NULL);
	177
	178	if (gtk_dialog_run (GTK_DIALOG (dialog)) == GTK_RESPONSE_ACCEPT)
	179	{
	180	char filename, msg, *backtrace;
	181	FILE *fp;
	182
	183	filename = gtk_file_chooser_get_filename (GTK_FILE_CHOOSER (dialog));
4b5a7d3d VZ	184	if ( filename )
	185	{
	186	msg = gtk_assert_dialog_get_message (dlg);
	187	backtrace = gtk_assert_dialog_get_backtrace (dlg);
	188
	189	/* open the file and write all info inside it */
	190	fp = fopen (filename, "w");
	191	if (fp)
	192	{
	193	fprintf (fp, "ASSERT INFO:\n%s\n\nBACKTRACE:\n%s", msg, backtrace);
	194	fclose (fp);
	195	}
	196
	197	g_free (filename);
	198	g_free (msg);
	199	g_free (backtrace);
	200	}
30c4dd91 RR	201	}
	202
	203	gtk_widget_destroy (dialog);
	204	}
61011e91	205	#endif /* GTK+ 2.4+ */
30c4dd91 RR	206
	207	void gtk_assert_dialog_copy_callback (GtkWidget widget, GtkAssertDialog dlg)
	208	{
	209	char msg, backtrace;
	210	GtkClipboard *clipboard;
	211	GString *str;
	212
	213	msg = gtk_assert_dialog_get_message (dlg);
	214	backtrace = gtk_assert_dialog_get_backtrace (dlg);
	215
	216	/* combine both in a single string */
	217	str = g_string_new("");
	218	g_string_printf (str, "ASSERT INFO:\n%s\n\nBACKTRACE:\n%s\n\n", msg, backtrace);
	219
	220	/* copy everything in default clipboard */
	221	clipboard = gtk_clipboard_get (GDK_SELECTION_CLIPBOARD);
	222	gtk_clipboard_set_text (clipboard, str->str, str->len);
	223
	224	/* copy everything in primary clipboard too */
	225	clipboard = gtk_clipboard_get (GDK_SELECTION_PRIMARY);
	226	gtk_clipboard_set_text (clipboard, str->str, str->len);
	227
	228	g_free (msg);
	229	g_free (backtrace);
	230	g_string_free (str, TRUE);
	231	}
	232
364663aa VZ	233	void gtk_assert_dialog_continue_callback (GtkWidget widget, GtkAssertDialog dlg)
	234	{
	235	gint response =
	236	gtk_toggle_button_get_active (GTK_TOGGLE_BUTTON(dlg->shownexttime)) ?
	237	GTK_ASSERT_DIALOG_CONTINUE : GTK_ASSERT_DIALOG_CONTINUE_SUPPRESSING;
	238
	239	gtk_dialog_response (GTK_DIALOG(dlg), response);
	240	}
	241
30c4dd91 RR	242
	243	/* ----------------------------------------------------------------------------
	244	GtkAssertDialogClass implementation
	245	---------------------------------------------------------------------------- */
	246
	247	static void gtk_assert_dialog_init (GtkAssertDialog *self);
	248	static void gtk_assert_dialog_class_init (GtkAssertDialogClass *klass);
	249
	250
	251	GtkType gtk_assert_dialog_get_type (void)
	252	{
	253	static GtkType assert_dialog_type = 0;
364663aa	254
30c4dd91 RR	255	if (!assert_dialog_type)
30c4dd91 RR	256	{
de4a74e2	257	const GTypeInfo assert_dialog_info =
30c4dd91 RR	258	{
	259	sizeof (GtkAssertDialogClass),
	260	NULL, /* base_init */
	261	NULL, /* base_finalize */
	262	(GClassInitFunc) gtk_assert_dialog_class_init,
	263	NULL, /* class_finalize */
	264	NULL, /* class_data */
	265	sizeof (GtkAssertDialog),
	266	16, /* n_preallocs */
	267	(GInstanceInitFunc) gtk_assert_dialog_init,
	268	NULL
	269	};
	270	assert_dialog_type = g_type_register_static (GTK_TYPE_DIALOG, "GtkAssertDialog", &assert_dialog_info, (GTypeFlags)0);
	271	}
	272
	273	return assert_dialog_type;
	274	}
	275
	276	void gtk_assert_dialog_class_init(GtkAssertDialogClass *klass)
	277	{
	278	/* no special initializations required */
	279	}
	280
	281	void gtk_assert_dialog_init(GtkAssertDialog *dlg)
	282	{
31c6672c	283	GtkWidget *continuebtn;
30c4dd91	284
31c6672c VZ	285	{
31c6672c VZ	286	GtkWidget vbox, hbox, *image;
30c4dd91	287
31c6672c VZ	288	/* start the main vbox */
	289	gtk_widget_push_composite_child ();
	290	vbox = gtk_vbox_new (FALSE, 8);
	291	gtk_container_set_border_width (GTK_CONTAINER(vbox), 8);
	292	gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dlg)->vbox), vbox, TRUE, TRUE, 5);
30c4dd91	293
30c4dd91	294
31c6672c VZ	295	/* add the icon+message hbox */
	296	hbox = gtk_hbox_new (FALSE, 0);
	297	gtk_box_pack_start (GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
30c4dd91	298
31c6672c VZ	299	/* icon */
	300	image = gtk_image_new_from_stock (GTK_STOCK_DIALOG_ERROR, GTK_ICON_SIZE_DIALOG);
	301	gtk_box_pack_start (GTK_BOX(hbox), image, FALSE, FALSE, 12);
30c4dd91	302
31c6672c VZ	303	{
	304	GtkWidget vbox2, info;
	305
	306	/* message */
	307	vbox2 = gtk_vbox_new (FALSE, 0);
	308	gtk_box_pack_start (GTK_BOX (hbox), vbox2, TRUE, TRUE, 0);
	309	info = gtk_label_new ("An assertion failed!");
	310	gtk_box_pack_start (GTK_BOX(vbox2), info, TRUE, TRUE, 8);
	311
	312	/* assert message */
	313	dlg->message = gtk_label_new (NULL);
	314	gtk_label_set_selectable (GTK_LABEL (dlg->message), TRUE);
	315	gtk_label_set_line_wrap (GTK_LABEL (dlg->message), TRUE);
	316	gtk_label_set_justify (GTK_LABEL (dlg->message), GTK_JUSTIFY_LEFT);
	317	gtk_widget_set_size_request (GTK_WIDGET(dlg->message), 450, -1);
	318
	319	gtk_box_pack_end (GTK_BOX(vbox2), GTK_WIDGET(dlg->message), TRUE, TRUE, 8);
	320	}
	321
	322	/* add the expander */
30c4dd91	323	#if GTK_CHECK_VERSION(2,4,0)
31c6672c VZ	324	if (!gtk_check_version (2, 4, 0))
	325	{
	326	dlg->expander = gtk_expander_new_with_mnemonic ("Back_trace:");
	327	gtk_box_pack_start (GTK_BOX(vbox), dlg->expander, TRUE, TRUE, 0);
	328	g_signal_connect (GTK_EXPANDER(dlg->expander), "activate",
	329	G_CALLBACK(gtk_assert_dialog_expander_callback), dlg);
	330	}
	331	else
30c4dd91	332	#endif
31c6672c VZ	333	{
	334	/* if GtkExpander is unavailable, then use a static frame instead */
	335	dlg->expander = gtk_frame_new ("Back_trace:");
	336	gtk_box_pack_start (GTK_BOX(vbox), dlg->expander, TRUE, TRUE, 0);
	337	}
30c4dd91 RR	338	}
	339
	340	{
	341	GtkWidget hbox, vbox, button, sw;
	342
	343	/* create expander's vbox */
	344	vbox = gtk_vbox_new (FALSE, 0);
	345	gtk_container_add (GTK_CONTAINER (dlg->expander), vbox);
	346
	347	/* add a scrollable window under the expander */
	348	sw = gtk_scrolled_window_new (NULL, NULL);
	349	gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (sw), GTK_SHADOW_ETCHED_IN);
	350	gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw), GTK_POLICY_AUTOMATIC,
	351	GTK_POLICY_AUTOMATIC);
	352	gtk_box_pack_start (GTK_BOX(vbox), sw, TRUE, TRUE, 8);
	353
	354	/* add the treeview to the scrollable window */
	355	dlg->treeview = gtk_assert_dialog_create_backtrace_list_model ();
	356	gtk_widget_set_size_request (GTK_WIDGET(dlg->treeview), -1, 180);
	357	gtk_container_add (GTK_CONTAINER (sw), dlg->treeview);
	358
	359	/* create button's hbox */
	360	hbox = gtk_hbutton_box_new ();
	361	gtk_box_pack_end (GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
	362	gtk_button_box_set_layout (GTK_BUTTON_BOX(hbox), GTK_BUTTONBOX_END);
	363
	364	/* add the buttons */
	365	#if GTK_CHECK_VERSION(2,4,0)
	366	if (!gtk_check_version (2, 4, 0))
	367	{
	368	/* add this button only if GTK supports GtkFileChooserDialog */
	369	button = gtk_assert_dialog_add_button_to (GTK_BOX(hbox), "Save to _file",
	370	GTK_STOCK_SAVE, GTK_RESPONSE_NONE);
	371	g_signal_connect (button, "clicked",
	372	G_CALLBACK(gtk_assert_dialog_save_backtrace_callback), dlg);
	373	}
	374	#endif
	375
	376	button = gtk_assert_dialog_add_button_to (GTK_BOX(hbox), "Copy to clip_board",
	377	GTK_STOCK_COPY, GTK_RESPONSE_NONE);
	378	g_signal_connect (button, "clicked", G_CALLBACK(gtk_assert_dialog_copy_callback), dlg);
	379	}
	380
364663aa VZ	381	/* add the checkbutton */
	382	dlg->shownexttime = gtk_check_button_new_with_mnemonic("Show this _dialog the next time");
	383	gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON(dlg->shownexttime), TRUE);
	384	gtk_box_pack_end (GTK_BOX(GTK_DIALOG(dlg)->action_area), dlg->shownexttime, FALSE, TRUE, 8);
	385
	386	/* add the stop button */
30c4dd91	387	gtk_assert_dialog_add_button (dlg, "_Stop", GTK_STOCK_QUIT, GTK_ASSERT_DIALOG_STOP);
30c4dd91	388
364663aa VZ	389	/* add the continue button */
364663aa VZ	390	continuebtn = gtk_assert_dialog_add_button (dlg, "_Continue", GTK_STOCK_YES, GTK_ASSERT_DIALOG_CONTINUE);
190b9344	391	gtk_dialog_set_default_response (GTK_DIALOG (dlg), GTK_ASSERT_DIALOG_CONTINUE);
364663aa VZ	392	g_signal_connect (continuebtn, "clicked", G_CALLBACK(gtk_assert_dialog_continue_callback), dlg);
364663aa VZ	393
30c4dd91 RR	394	/* complete creation */
	395	dlg->callback = NULL;
	396	dlg->userdata = NULL;
	397
	398	/* the resizeable property of this window is modified by the expander:
	399	when it's collapsed, the window must be non-resizeable! */
	400	gtk_window_set_resizable (GTK_WINDOW (dlg), FALSE);
	401	gtk_widget_pop_composite_child ();
	402	gtk_widget_show_all (GTK_WIDGET(dlg));
	403	}
	404
	405
	406
	407	/* ----------------------------------------------------------------------------
	408	GtkAssertDialog public API
	409	---------------------------------------------------------------------------- */
	410
	411	gchar gtk_assert_dialog_get_message (GtkAssertDialog dlg)
	412	{
	413	/* NOTES:
	414	1) returned string must g_free()d !
	415	2) Pango markup is automatically stripped off by GTK
	416	*/
	417	return g_strdup (gtk_label_get_text (GTK_LABEL(dlg->message)));
	418	}
	419
	420	gchar gtk_assert_dialog_get_backtrace (GtkAssertDialog dlg)
	421	{
8829531c VZ	422	gchar function, arguments, sourcefile, linenum;
8829531c VZ	423	guint count;
30c4dd91 RR	424
	425	GtkTreeModel *model;
	426	GtkTreeIter iter;
	427	GString *string;
	428
	429	g_return_val_if_fail (GTK_IS_ASSERT_DIALOG (dlg), NULL);
	430	model = gtk_tree_view_get_model (GTK_TREE_VIEW(dlg->treeview));
	431	string = g_string_new("");
	432
	433	/* iterate over the list */
	434	if (!gtk_tree_model_get_iter_first (model, &iter))
	435	return NULL;
	436
	437	do
	438	{
	439	/* append this stack frame's info to the string */
	440	gtk_tree_model_get (model, &iter,
	441	STACKFRAME_LEVEL_COLIDX, &count,
	442	FUNCTION_NAME_COLIDX, &function,
	443	FUNCTION_ARGS_COLIDX, &arguments,
	444	SOURCE_FILE_COLIDX, &sourcefile,
	445	LINE_NUMBER_COLIDX, &linenum,
	446	-1);
	447
31c6672c	448	g_string_append_printf (string, "[%u] %s(%s)",
8829531c	449	count, function, arguments);
30c4dd91	450	if (sourcefile[0] != '\0')
8829531c VZ	451	g_string_append_printf (string, " %s", sourcefile);
	452	if (linenum[0] != '\0')
	453	g_string_append_printf (string, ":%s", linenum);
	454	g_string_append (string, "\n");
30c4dd91 RR	455
	456	g_free (function);
	457	g_free (arguments);
	458	g_free (sourcefile);
8829531c	459	g_free (linenum);
30c4dd91 RR	460
	461	} while (gtk_tree_model_iter_next (model, &iter));
	462
	463	/* returned string must g_free()d */
	464	return g_string_free (string, FALSE);
	465	}
	466
	467	void gtk_assert_dialog_set_message(GtkAssertDialog dlg, const gchar msg)
	468	{
7c1bf4c1 VZ	469	/* prepend and append the <b> tag
	470	NOTE: g_markup_printf_escaped() is not used because it's available
	471	only for glib >= 2.4 */
	472	gchar *escaped_msg = g_markup_escape_text (msg, -1);
	473	gchar *decorated_msg = g_strdup_printf ("<b>%s</b>", escaped_msg);
30c4dd91 RR	474
	475	g_return_if_fail (GTK_IS_ASSERT_DIALOG (dlg));
	476	gtk_label_set_markup (GTK_LABEL(dlg->message), decorated_msg);
	477
	478	g_free (decorated_msg);
7c1bf4c1	479	g_free (escaped_msg);
30c4dd91 RR	480	}
	481
	482	void gtk_assert_dialog_set_backtrace_callback(GtkAssertDialog *assertdlg,
	483	GtkAssertDialogStackFrameCallback callback,
	484	void *userdata)
	485	{
	486	assertdlg->callback = callback;
	487	assertdlg->userdata = userdata;
	488
	489	if (gtk_check_version (2, 4, 0))
	490	{
61011e91 VZ	491	/* we need to immediately process the stack trace as we're not using
61011e91 VZ	492	an expander since GTK does not support it */
30c4dd91 RR	493	gtk_assert_dialog_process_backtrace (assertdlg);
	494	}
	495	}
	496
	497	void gtk_assert_dialog_append_stack_frame(GtkAssertDialog *dlg,
	498	const gchar *function,
	499	const gchar *arguments,
	500	const gchar *sourcefile,
	501	guint line_number)
	502	{
	503	GtkTreeModel *model;
	504	GtkTreeIter iter;
8829531c	505	GString *linenum;
30c4dd91 RR	506	gint count;
	507
	508	g_return_if_fail (GTK_IS_ASSERT_DIALOG (dlg));
	509	model = gtk_tree_view_get_model (GTK_TREE_VIEW(dlg->treeview));
	510
	511	/* how many items are in the list up to now ? */
	512	count = gtk_tree_model_iter_n_children (model, NULL);
	513
8829531c VZ	514	linenum = g_string_new("");
8829531c VZ	515	if ( line_number != 0 )
31c6672c	516	g_string_printf (linenum, "%u", line_number);
8829531c	517
30c4dd91 RR	518	/* add data to the list store */
	519	gtk_list_store_append (GTK_LIST_STORE(model), &iter);
	520	gtk_list_store_set (GTK_LIST_STORE(model), &iter,
	521	STACKFRAME_LEVEL_COLIDX, count+1, /* start from 1 and not from 0 */
	522	FUNCTION_NAME_COLIDX, function,
	523	FUNCTION_ARGS_COLIDX, arguments,
	524	SOURCE_FILE_COLIDX, sourcefile,
8829531c	525	LINE_NUMBER_COLIDX, linenum->str,
30c4dd91	526	-1);
8829531c VZ	527
8829531c VZ	528	g_string_free (linenum, TRUE);
30c4dd91 RR	529	}
	530
	531	GtkWidget *gtk_assert_dialog_new(void)
	532	{
	533	GtkAssertDialog *dialog = g_object_new (GTK_TYPE_ASSERT_DIALOG, NULL);
	534
	535	return GTK_WIDGET (dialog);
	536	}
	537
	538	#ifdef __cplusplus
	539	}
	540	#endif /* __cplusplus */