CAMLprim value ml_gtkmisc_init(value unit)
{
/* Since these are declared const, must force gcc to call them! */
GType t =
gtk_gamma_curve_get_type() +
gtk_statusbar_get_type() +
#ifdef HASGTK210
gtk_status_icon_get_type() +
#endif
gtk_calendar_get_type() +
gtk_drawing_area_get_type() +
gtk_curve_get_type() +
gtk_misc_get_type() +
gtk_arrow_get_type() +
gtk_image_get_type() +
gtk_label_get_type() +
gtk_tips_query_get_type() +
gtk_pixmap_get_type() +
gtk_hseparator_get_type() +
gtk_vseparator_get_type() +
gtk_preview_get_type () +
gtk_font_selection_get_type() +
gtk_color_selection_get_type();
return Val_GType(t);
}
static GtkTreeModel*
create_tree_model (void)
{
GtkTreeStore *store;
gint i;
GType *t;
/* Make the tree more interesting */
/* - we need this magic here so we are sure the type ends up being
* registered and gcc doesn't optimize away the code */
g_type_class_unref (g_type_class_ref (gtk_scrolled_window_get_type ()));
g_type_class_unref (g_type_class_ref (gtk_label_get_type ()));
g_type_class_unref (g_type_class_ref (gtk_scrollbar_get_type ()));
g_type_class_unref (g_type_class_ref (pango_layout_get_type ()));
t = get_model_types ();
store = gtk_tree_store_new (N_COLUMNS,
t[0], t[1], t[2],
t[3], t[4], t[5],
t[6], t[7], t[8]);
i = 0;
while (i < G_TYPE_FUNDAMENTAL_MAX)
{
typesystem_recurse (i, NULL, store);
++i;
}
return GTK_TREE_MODEL (store);
}
/*
* Initializes the GbWidget structure.
* I've placed this at the end of the file so we don't have to include
* declarations of all the functions.
*/
GbWidget *
gb_label_init ()
{
/* Initialise the GTK type */
volatile GtkType type;
type = gtk_label_get_type ();
/* Initialize the GbWidget structure */
gb_widget_init_struct (&gbwidget);
/* Fill in the pixmap struct & tooltip */
gbwidget.pixmap_struct = label_xpm;
gbwidget.tooltip = _("Label");
/* Fill in any functions that this GbWidget has */
gbwidget.gb_widget_new = gb_label_new;
gbwidget.gb_widget_create_properties = gb_label_create_properties;
gbwidget.gb_widget_get_properties = gb_label_get_properties;
gbwidget.gb_widget_set_properties = gb_label_set_properties;
gbwidget.gb_widget_write_source = gb_label_write_source;
/*
gbwidget.gb_widget_create_popup_menu = gb_label_create_popup_menu;
*/
return &gbwidget;
}
static GtkTreeModel*
create_tree_model (void)
{
GtkTreeStore *store;
gint i;
GType *t;
volatile GType dummy; /* G_GNUC_CONST makes the optimizer remove
* get_type calls if you don't do something
* like this
*/
/* Make the tree more interesting */
dummy = gtk_scrolled_window_get_type ();
dummy = gtk_label_get_type ();
dummy = gtk_hscrollbar_get_type ();
dummy = gtk_vscrollbar_get_type ();
dummy = pango_layout_get_type ();
t = get_model_types ();
store = gtk_tree_store_new (N_COLUMNS,
t[0], t[1], t[2],
t[3], t[4], t[5],
t[6], t[7], t[8]);
i = 0;
while (i < G_TYPE_FUNDAMENTAL_MAX)
{
typesystem_recurse (i, NULL, store);
++i;
}
return GTK_TREE_MODEL (store);
}
static void
load_types (void)
{
volatile GType type;
type = gtk_radio_button_get_type ();
type = gtk_label_get_type ();
}
static void
gtk_label_add_layoutable_interface ()
{
static const GInterfaceInfo layoutable_info =
{
(GInterfaceInitFunc) gtk_label_layoutable_init,
NULL,
NULL
};
g_type_add_interface_static (gtk_label_get_type (),
GTK_TYPE_LAYOUTABLE,
&layoutable_info);
}
guint
gtk_clip_label_get_type ()
{
static guint label_type = 0;
if (!label_type)
{
GtkTypeInfo clip_label_info =
{
"GtkClipLabel",
sizeof (GtkClipLabel),
sizeof (GtkClipLabelClass),
(GtkClassInitFunc) gtk_clip_label_class_init,
(GtkObjectInitFunc) NULL,
(GtkArgSetFunc) NULL,
(GtkArgGetFunc) NULL
};
label_type = gtk_type_unique (gtk_label_get_type (), &clip_label_info);
}
return label_type;
}
void testColors()
{
for (int testBits = 0; testBits < (1 << 4); testBits++)
{
GdkRGBA colorFore;
{
GtkWidgetPath* widgetPath = gtk_widget_path_new();
gint pathPos = gtk_widget_path_append_type(widgetPath, gtk_tooltip_get_type());
#if GTK_CHECK_VERSION(3,20,0)
if (testBits & 1)
gtk_widget_path_iter_set_object_name(widgetPath, pathPos, "tooltip");
#else
// Silence the warning
(void)pathPos;
#endif
if (testBits & 2)
gtk_widget_path_append_type(widgetPath, gtk_label_get_type());
GtkStyleContext* styleContext = gtk_style_context_new();
gtk_style_context_set_path(styleContext, widgetPath);
gtk_widget_path_free(widgetPath);
if (testBits & 4)
gtk_style_context_add_class(styleContext, GTK_STYLE_CLASS_BACKGROUND);
if (testBits & 8)
gtk_style_context_add_class(styleContext, GTK_STYLE_CLASS_TOOLTIP);
gtk_style_context_get_color(styleContext, GTK_STATE_FLAG_NORMAL, &colorFore);
g_object_unref(styleContext);
}
GdkRGBA colorBack;
{
GtkWidgetPath* widgetPath = gtk_widget_path_new();
gint pathPos = gtk_widget_path_append_type(widgetPath, gtk_tooltip_get_type());
#if GTK_CHECK_VERSION(3,20,0)
if (testBits & 1)
gtk_widget_path_iter_set_object_name(widgetPath, pathPos, "tooltip");
#else
// Silence the warning
(void)pathPos;
#endif
if (testBits & 2)
gtk_widget_path_append_type(widgetPath, gtk_label_get_type());
GtkStyleContext* styleContext = gtk_style_context_new();
gtk_style_context_set_path(styleContext, widgetPath);
gtk_widget_path_free(widgetPath);
if (testBits & 4)
gtk_style_context_add_class(styleContext, GTK_STYLE_CLASS_BACKGROUND);
if (testBits & 8)
gtk_style_context_add_class(styleContext, GTK_STYLE_CLASS_TOOLTIP);
gtk_style_context_get_background_color(styleContext, GTK_STATE_FLAG_NORMAL, &colorBack);
g_object_unref(styleContext);
}
printf
(
"%c%c%c%c fore=%s back=%s\n",
(testBits & 1) ? '1' : '-',
(testBits & 2) ? '2' : '-',
(testBits & 4) ? '3' : '-',
(testBits & 8) ? '4' : '-',
format_GdkRGBA(colorFore).c_str(),
format_GdkRGBA(colorBack).c_str()
);
}
}
(GtkArgSetFunc) NULL,
(GtkArgGetFunc) NULL
};
label_type = gtk_type_unique (gtk_label_get_type (), &clip_label_info);
}
return label_type;
}
static void
gtk_clip_label_class_init (GtkClipLabelClass *class)
{
GtkWidgetClass *widget_class;
parent_class = gtk_type_class (gtk_label_get_type ());
widget_class = (GtkWidgetClass*) class;
widget_class->size_request = gtk_clip_label_size_request;
widget_class->size_allocate = gtk_clip_label_size_allocate;
}
void
gtk_clip_label_set (GtkLabel *label,
const char *str)
{
gtk_label_set_text (label, str);
}
GtkWidget*
gtk_clip_label_new (const char *str)
static void
save_got_message(CamelFolder *folder, const char *uid, CamelMimeMessage *msg, void *d)
{
struct _save_data *data = d;
GtkDialog *dialog;
GtkWidget *w, *tree;
GtkTreeStore *model;
GtkCellRenderer *renderer;
/* not found, the mailer will show an error box for this */
if (msg == NULL) {
free_data(data);
return;
}
data->msg = msg;
camel_object_ref(msg);
dialog = (GtkDialog *)gtk_dialog_new_with_buttons(_("Save attachments"),
NULL, /* target->parent? */
0,
GTK_STOCK_CANCEL, GTK_RESPONSE_CANCEL,
GTK_STOCK_SAVE, GTK_RESPONSE_OK,
NULL);
w = gtk_file_chooser_button_new (_("Select save base name"), GTK_FILE_CHOOSER_ACTION_OPEN);
data->entry = w;
g_object_set(w, "filechooser_action", GTK_FILE_CHOOSER_ACTION_SAVE, NULL);
gtk_widget_show(w);
gtk_box_pack_start((GtkBox *)dialog->vbox, w, FALSE, TRUE, 6);
g_signal_connect(GTK_FILE_CHOOSER_BUTTON (w), "selection-changed", G_CALLBACK(entry_changed), data);
model = gtk_tree_store_new(5, G_TYPE_BOOLEAN, G_TYPE_STRING, G_TYPE_STRING, G_TYPE_STRING, G_TYPE_POINTER);
data->model = model;
fill_model(msg, model);
tree = gtk_tree_view_new_with_model((GtkTreeModel *)model);
data->tree = tree;
gtk_widget_show(tree);
gtk_tree_view_expand_all((GtkTreeView *)tree);
renderer = gtk_cell_renderer_text_new();
gtk_tree_view_insert_column_with_attributes((GtkTreeView *)tree, -1,
_("MIME Type"), renderer, "text", 1, NULL);
gtk_tree_view_set_expander_column((GtkTreeView *)tree, gtk_tree_view_get_column((GtkTreeView *)tree, 0));
renderer = gtk_cell_renderer_toggle_new();
g_object_set(renderer, "activatable", TRUE, NULL);
g_signal_connect(renderer, "toggled", G_CALLBACK(toggle_changed), data);
gtk_tree_view_insert_column_with_attributes((GtkTreeView *)tree, -1,
_("Save"), renderer, "active", 0, NULL);
renderer = gtk_cell_renderer_text_new();
gtk_tree_view_insert_column_with_attributes((GtkTreeView *)tree, -1,
_("Name"), renderer, "text", 2, NULL);
w = g_object_new(gtk_frame_get_type(),
"shadow_type", GTK_SHADOW_NONE,
"label_widget", g_object_new(gtk_label_get_type(),
"label", "<span weight=\"bold\">Attachments</span>",
"use_markup", TRUE,
"xalign", 0.0, NULL),
"child", g_object_new(gtk_alignment_get_type(),
"left_padding", 12,
"top_padding", 6,
"child", g_object_new(gtk_scrolled_window_get_type(),
"hscrollbar_policy", GTK_POLICY_AUTOMATIC,
"vscrollbar_policy", GTK_POLICY_AUTOMATIC,
"shadow_type", GTK_SHADOW_IN,
"child", tree,
NULL),
NULL),
NULL);
gtk_widget_show_all(w);
gtk_box_pack_start((GtkBox *)dialog->vbox, w, TRUE, TRUE, 0);
g_signal_connect(dialog, "response", G_CALLBACK(save_response), data);
gtk_window_set_default_size((GtkWindow *)dialog, 500, 500);
gtk_widget_show((GtkWidget *)dialog);
}
static void clock_class_init(ClockClass *klass){
GtkObjectClass *object_class = (GtkObjectClass *)klass;
object_class->destroy = clock_destroy;
parent_class = gtk_type_class(gtk_label_get_type());
}
