[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 *vbox, *hbox, *image, *continuebtn;

    /* 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, "[%d] %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, "%d", 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	{
364663aa	283	GtkWidget vbox, hbox, image, continuebtn;
30c4dd91 RR	284
	285	/* start the main vbox */
	286	gtk_widget_push_composite_child ();
	287	vbox = gtk_vbox_new (FALSE, 8);
	288	gtk_container_set_border_width (GTK_CONTAINER(vbox), 8);
	289	gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dlg)->vbox), vbox, TRUE, TRUE, 5);
	290
	291
	292	/* add the icon+message hbox */
	293	hbox = gtk_hbox_new (FALSE, 0);
	294	gtk_box_pack_start (GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
	295
	296	/* icon */
	297	image = gtk_image_new_from_stock (GTK_STOCK_DIALOG_ERROR, GTK_ICON_SIZE_DIALOG);
	298	gtk_box_pack_start (GTK_BOX(hbox), image, FALSE, FALSE, 12);
	299
	300	{
	301	GtkWidget vbox2, info;
	302
	303	/* message */
	304	vbox2 = gtk_vbox_new (FALSE, 0);
	305	gtk_box_pack_start (GTK_BOX (hbox), vbox2, TRUE, TRUE, 0);
	306	info = gtk_label_new ("An assertion failed!");
	307	gtk_box_pack_start (GTK_BOX(vbox2), info, TRUE, TRUE, 8);
	308
	309	/* assert message */
	310	dlg->message = gtk_label_new (NULL);
	311	gtk_label_set_selectable (GTK_LABEL (dlg->message), TRUE);
	312	gtk_label_set_line_wrap (GTK_LABEL (dlg->message), TRUE);
	313	gtk_label_set_justify (GTK_LABEL (dlg->message), GTK_JUSTIFY_LEFT);
	314	gtk_widget_set_size_request (GTK_WIDGET(dlg->message), 450, -1);
	315
	316	gtk_box_pack_end (GTK_BOX(vbox2), GTK_WIDGET(dlg->message), TRUE, TRUE, 8);
	317	}
	318
	319	/* add the expander */
	320	#if GTK_CHECK_VERSION(2,4,0)
	321	if (!gtk_check_version (2, 4, 0))
	322	{
	323	dlg->expander = gtk_expander_new_with_mnemonic ("Back_trace:");
	324	gtk_box_pack_start (GTK_BOX(vbox), dlg->expander, TRUE, TRUE, 0);
	325	g_signal_connect (GTK_EXPANDER(dlg->expander), "activate",
	326	G_CALLBACK(gtk_assert_dialog_expander_callback), dlg);
	327	}
	328	else
	329	#endif
	330	{
61011e91	331	/* if GtkExpander is unavailable, then use a static frame instead */
30c4dd91 RR	332	dlg->expander = gtk_frame_new ("Back_trace:");
	333	gtk_box_pack_start (GTK_BOX(vbox), dlg->expander, TRUE, TRUE, 0);
	334	}
	335
	336	{
	337	GtkWidget hbox, vbox, button, sw;
	338
	339	/* create expander's vbox */
	340	vbox = gtk_vbox_new (FALSE, 0);
	341	gtk_container_add (GTK_CONTAINER (dlg->expander), vbox);
	342
	343	/* add a scrollable window under the expander */
	344	sw = gtk_scrolled_window_new (NULL, NULL);
	345	gtk_scrolled_window_set_shadow_type (GTK_SCROLLED_WINDOW (sw), GTK_SHADOW_ETCHED_IN);
	346	gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (sw), GTK_POLICY_AUTOMATIC,
	347	GTK_POLICY_AUTOMATIC);
	348	gtk_box_pack_start (GTK_BOX(vbox), sw, TRUE, TRUE, 8);
	349
	350	/* add the treeview to the scrollable window */
	351	dlg->treeview = gtk_assert_dialog_create_backtrace_list_model ();
	352	gtk_widget_set_size_request (GTK_WIDGET(dlg->treeview), -1, 180);
	353	gtk_container_add (GTK_CONTAINER (sw), dlg->treeview);
	354
	355	/* create button's hbox */
	356	hbox = gtk_hbutton_box_new ();
	357	gtk_box_pack_end (GTK_BOX(vbox), hbox, FALSE, FALSE, 0);
	358	gtk_button_box_set_layout (GTK_BUTTON_BOX(hbox), GTK_BUTTONBOX_END);
	359
	360	/* add the buttons */
	361	#if GTK_CHECK_VERSION(2,4,0)
	362	if (!gtk_check_version (2, 4, 0))
	363	{
	364	/* add this button only if GTK supports GtkFileChooserDialog */
	365	button = gtk_assert_dialog_add_button_to (GTK_BOX(hbox), "Save to _file",
	366	GTK_STOCK_SAVE, GTK_RESPONSE_NONE);
	367	g_signal_connect (button, "clicked",
	368	G_CALLBACK(gtk_assert_dialog_save_backtrace_callback), dlg);
	369	}
	370	#endif
	371
	372	button = gtk_assert_dialog_add_button_to (GTK_BOX(hbox), "Copy to clip_board",
	373	GTK_STOCK_COPY, GTK_RESPONSE_NONE);
	374	g_signal_connect (button, "clicked", G_CALLBACK(gtk_assert_dialog_copy_callback), dlg);
	375	}
	376
364663aa VZ	377	/* add the checkbutton */
	378	dlg->shownexttime = gtk_check_button_new_with_mnemonic("Show this _dialog the next time");
	379	gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON(dlg->shownexttime), TRUE);
	380	gtk_box_pack_end (GTK_BOX(GTK_DIALOG(dlg)->action_area), dlg->shownexttime, FALSE, TRUE, 8);
	381
	382	/* add the stop button */
30c4dd91	383	gtk_assert_dialog_add_button (dlg, "_Stop", GTK_STOCK_QUIT, GTK_ASSERT_DIALOG_STOP);
30c4dd91	384
364663aa VZ	385	/* add the continue button */
364663aa VZ	386	continuebtn = gtk_assert_dialog_add_button (dlg, "_Continue", GTK_STOCK_YES, GTK_ASSERT_DIALOG_CONTINUE);
190b9344	387	gtk_dialog_set_default_response (GTK_DIALOG (dlg), GTK_ASSERT_DIALOG_CONTINUE);
364663aa VZ	388	g_signal_connect (continuebtn, "clicked", G_CALLBACK(gtk_assert_dialog_continue_callback), dlg);
364663aa VZ	389
30c4dd91 RR	390	/* complete creation */
	391	dlg->callback = NULL;
	392	dlg->userdata = NULL;
	393
	394	/* the resizeable property of this window is modified by the expander:
	395	when it's collapsed, the window must be non-resizeable! */
	396	gtk_window_set_resizable (GTK_WINDOW (dlg), FALSE);
	397	gtk_widget_pop_composite_child ();
	398	gtk_widget_show_all (GTK_WIDGET(dlg));
	399	}
	400
	401
	402
	403	/* ----------------------------------------------------------------------------
	404	GtkAssertDialog public API
	405	---------------------------------------------------------------------------- */
	406
	407	gchar gtk_assert_dialog_get_message (GtkAssertDialog dlg)
	408	{
	409	/* NOTES:
	410	1) returned string must g_free()d !
	411	2) Pango markup is automatically stripped off by GTK
	412	*/
	413	return g_strdup (gtk_label_get_text (GTK_LABEL(dlg->message)));
	414	}
	415
	416	gchar gtk_assert_dialog_get_backtrace (GtkAssertDialog dlg)
	417	{
8829531c VZ	418	gchar function, arguments, sourcefile, linenum;
8829531c VZ	419	guint count;
30c4dd91 RR	420
	421	GtkTreeModel *model;
	422	GtkTreeIter iter;
	423	GString *string;
	424
	425	g_return_val_if_fail (GTK_IS_ASSERT_DIALOG (dlg), NULL);
	426	model = gtk_tree_view_get_model (GTK_TREE_VIEW(dlg->treeview));
	427	string = g_string_new("");
	428
	429	/* iterate over the list */
	430	if (!gtk_tree_model_get_iter_first (model, &iter))
	431	return NULL;
	432
	433	do
	434	{
	435	/* append this stack frame's info to the string */
	436	gtk_tree_model_get (model, &iter,
	437	STACKFRAME_LEVEL_COLIDX, &count,
	438	FUNCTION_NAME_COLIDX, &function,
	439	FUNCTION_ARGS_COLIDX, &arguments,
	440	SOURCE_FILE_COLIDX, &sourcefile,
	441	LINE_NUMBER_COLIDX, &linenum,
	442	-1);
	443
8829531c VZ	444	g_string_append_printf (string, "[%d] %s(%s)",
8829531c VZ	445	count, function, arguments);
30c4dd91	446	if (sourcefile[0] != '\0')
8829531c VZ	447	g_string_append_printf (string, " %s", sourcefile);
	448	if (linenum[0] != '\0')
	449	g_string_append_printf (string, ":%s", linenum);
	450	g_string_append (string, "\n");
30c4dd91 RR	451
	452	g_free (function);
	453	g_free (arguments);
	454	g_free (sourcefile);
8829531c	455	g_free (linenum);
30c4dd91 RR	456
	457	} while (gtk_tree_model_iter_next (model, &iter));
	458
	459	/* returned string must g_free()d */
	460	return g_string_free (string, FALSE);
	461	}
	462
	463	void gtk_assert_dialog_set_message(GtkAssertDialog dlg, const gchar msg)
	464	{
7c1bf4c1 VZ	465	/* prepend and append the <b> tag
	466	NOTE: g_markup_printf_escaped() is not used because it's available
	467	only for glib >= 2.4 */
	468	gchar *escaped_msg = g_markup_escape_text (msg, -1);
	469	gchar *decorated_msg = g_strdup_printf ("<b>%s</b>", escaped_msg);
30c4dd91 RR	470
	471	g_return_if_fail (GTK_IS_ASSERT_DIALOG (dlg));
	472	gtk_label_set_markup (GTK_LABEL(dlg->message), decorated_msg);
	473
	474	g_free (decorated_msg);
7c1bf4c1	475	g_free (escaped_msg);
30c4dd91 RR	476	}
	477
	478	void gtk_assert_dialog_set_backtrace_callback(GtkAssertDialog *assertdlg,
	479	GtkAssertDialogStackFrameCallback callback,
	480	void *userdata)
	481	{
	482	assertdlg->callback = callback;
	483	assertdlg->userdata = userdata;
	484
	485	if (gtk_check_version (2, 4, 0))
	486	{
61011e91 VZ	487	/* we need to immediately process the stack trace as we're not using
61011e91 VZ	488	an expander since GTK does not support it */
30c4dd91 RR	489	gtk_assert_dialog_process_backtrace (assertdlg);
	490	}
	491	}
	492
	493	void gtk_assert_dialog_append_stack_frame(GtkAssertDialog *dlg,
	494	const gchar *function,
	495	const gchar *arguments,
	496	const gchar *sourcefile,
	497	guint line_number)
	498	{
	499	GtkTreeModel *model;
	500	GtkTreeIter iter;
8829531c	501	GString *linenum;
30c4dd91 RR	502	gint count;
	503
	504	g_return_if_fail (GTK_IS_ASSERT_DIALOG (dlg));
	505	model = gtk_tree_view_get_model (GTK_TREE_VIEW(dlg->treeview));
	506
	507	/* how many items are in the list up to now ? */
	508	count = gtk_tree_model_iter_n_children (model, NULL);
	509
8829531c VZ	510	linenum = g_string_new("");
	511	if ( line_number != 0 )
	512	g_string_printf (linenum, "%d", line_number);
	513
30c4dd91 RR	514	/* add data to the list store */
	515	gtk_list_store_append (GTK_LIST_STORE(model), &iter);
	516	gtk_list_store_set (GTK_LIST_STORE(model), &iter,
	517	STACKFRAME_LEVEL_COLIDX, count+1, /* start from 1 and not from 0 */
	518	FUNCTION_NAME_COLIDX, function,
	519	FUNCTION_ARGS_COLIDX, arguments,
	520	SOURCE_FILE_COLIDX, sourcefile,
8829531c	521	LINE_NUMBER_COLIDX, linenum->str,
30c4dd91	522	-1);
8829531c VZ	523
8829531c VZ	524	g_string_free (linenum, TRUE);
30c4dd91 RR	525	}
	526
	527	GtkWidget *gtk_assert_dialog_new(void)
	528	{
	529	GtkAssertDialog *dialog = g_object_new (GTK_TYPE_ASSERT_DIALOG, NULL);
	530
	531	return GTK_WIDGET (dialog);
	532	}
	533
	534	#ifdef __cplusplus
	535	}
	536	#endif /* __cplusplus */