The Gnome Chemistry Utils  0.14.0
gcuperiodic.c
1 /*
2  * Gnome Chemisty Utils
3  * gcuperiodic.c
4  *
5  * Copyright (C) 2002-2012 Jean Bréfort <jean.brefort@normalesup.org>
6  *
7  * This program is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License as
9  * published by the Free Software Foundation; either version 3 of the
10  * License, or (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License
18  * along with this program; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301
20  * USA
21  */
22 
23 #include "config.h"
24 #include "gcuperiodic.h"
25 #include <gcu/chemistry.h>
26 #include <goffice/goffice.h>
27 #include <string.h>
28 #include <stdio.h>
29 #include <stdlib.h>
30 #include <gsf/gsf-impl-utils.h>
31 #include <glib/gi18n-lib.h>
32 
33 struct _GcuPeriodic
34 {
35  GtkBin bin;
36 
37  GtkGrid *grid;
38  GtkToggleButton* buttons[119];
39  GtkLabel* labels[119];
40  double red[119], blue[119], green[119];
41  GtkNotebook *book;
42  guint Z;
43  gboolean can_unselect;
44  unsigned colorstyle;
45  GArray *colorschemes;
46  unsigned nbschemes;
47  unsigned tips;
48 };
49 
50 struct _GcuPeriodicClass
51 {
52  GtkBinClass parent_class;
53 
54  void (* element_changed_event)(GcuPeriodic *periodic);
55 };
56 
57 GType
58 gcu_periodic_color_style_get_type (void)
59 {
60  static GType etype = 0;
61  if (etype == 0) {
62  static const GEnumValue values[] = {
63  { GCU_PERIODIC_COLOR_NONE, "GCU_PERIODIC_COLOR_NONE", "none" },
64  { GCU_PERIODIC_COLOR_DEFAULT, "GCU_PERIODIC_COLOR_DEFAULT", "default" },
65  { 0, NULL, NULL }
66  };
67  etype = g_enum_register_static ("GcuPeriodicColorStyle", values);
68  }
69  return etype;
70 }
71 #define GCU_TYPE_PERIODIC_COLOR_STYLE_TYPE (gcu_periodic_color_style_get_type())
72 
73 static GtkBinClass *parent_class = NULL;
74 
75 struct ColorScheme {
76  GcuPeriodicColorFunc f;
77  int page;
78  gpointer data;
79 };
80 
81 enum {
82  ELEMENT_CHANGED,
83  LAST_SIGNAL
84 };
85 
86 enum {
87  PROP_0,
88  PROP_CAN_UNSELECT,
89  PROP_COLOR_STYLE
90 };
91 
92 static guint gcu_periodic_signals[LAST_SIGNAL] = { 0 };
93 
94 void on_clicked (GtkToggleButton *button, GcuPeriodic* periodic)
95 {
96  static gboolean change = FALSE;
97  if (button != periodic->buttons[0]) {
98  const gchar* name;
99  change = TRUE;
100  if (periodic->buttons[0])
101  gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (periodic->buttons[0]), FALSE);
102  periodic->buttons[0] = button;
103  name = gtk_buildable_get_name (GTK_BUILDABLE (periodic->buttons[0]));
104  periodic->Z = atoi (name + 3);
105  g_signal_emit (periodic, gcu_periodic_signals[ELEMENT_CHANGED], 0, periodic->Z);
106  change = FALSE;
107  } else if (!change) {
108  if (periodic->can_unselect) {
109  periodic->buttons[0] = NULL;
110  periodic->Z = 0;
111  g_signal_emit (periodic, gcu_periodic_signals[ELEMENT_CHANGED], 0, 0);
112  } else if (periodic->buttons[0])
113  gtk_toggle_button_set_active (GTK_TOGGLE_BUTTON (periodic->buttons[0]), TRUE);
114  }
115 }
116 
117 static void
118 gcu_periodic_set_property (GObject *object,
119  guint param_id,
120  const GValue *value,
121  GParamSpec *pspec)
122 {
123  GcuPeriodic *periodic;
124  g_return_if_fail (object != NULL);
125  g_return_if_fail (GCU_IS_PERIODIC (object));
126 
127  periodic = GCU_PERIODIC (object);
128 
129  switch (param_id) {
130  case PROP_CAN_UNSELECT:
131  periodic->can_unselect = g_value_get_boolean (value);
132  break;
133 
134  case PROP_COLOR_STYLE: {
135  unsigned style = g_value_get_uint (value);
136  if (style < GCU_PERIODIC_COLOR_MAX + periodic->nbschemes) {
137  periodic->colorstyle = style;
138  int page = (style >= GCU_PERIODIC_COLOR_MAX)?
139  g_array_index (periodic->colorschemes, struct ColorScheme, style - GCU_PERIODIC_COLOR_MAX).page: 0;
140  gtk_notebook_set_current_page (periodic->book, page);
141  gcu_periodic_set_colors (periodic);
142  } else
143  g_warning (_("Out of range value %d for property \"color-style\" for GcuPeriodic instance %p\n"), style, periodic);
144  break;
145  }
146 
147  default:
148  G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
149  break;
150  }
151 }
152 
153 static void
154 gcu_periodic_get_property (GObject *object,
155  guint param_id,
156  GValue *value,
157  GParamSpec *pspec)
158 {
159  GcuPeriodic *periodic;
160 
161  g_return_if_fail (object != NULL);
162  g_return_if_fail (GCU_IS_PERIODIC (object));
163 
164  periodic = GCU_PERIODIC (object);
165 
166  switch (param_id) {
167  case PROP_CAN_UNSELECT:
168  g_value_set_boolean (value, periodic->can_unselect);
169  break;
170 
171  case PROP_COLOR_STYLE:
172  g_value_set_uint (value, periodic->colorstyle);
173  break;
174 
175  default:
176  G_OBJECT_WARN_INVALID_PROPERTY_ID (object, param_id, pspec);
177  break;
178  }
179 }
180 
181 static void gcu_periodic_get_preferred_height (GtkWidget *w, gint *minimum_height, gint *natural_height)
182 {
183  GtkWidget *child = gtk_bin_get_child (GTK_BIN (w));
184  gboolean visible = FALSE;
185  if (child)
186  g_object_get (G_OBJECT (child), "visible", &visible, NULL);
187  if (visible)
188  gtk_widget_get_preferred_height (child, minimum_height, natural_height);
189  else
190  *minimum_height = *natural_height = 0;
191 }
192 
193 static void gcu_periodic_get_preferred_width (GtkWidget *w, gint *minimum_width, gint *natural_width)
194 {
195  GtkWidget *child = gtk_bin_get_child (GTK_BIN (w));
196  gboolean visible = FALSE;
197  if (child)
198  g_object_get (G_OBJECT (child), "visible", &visible, NULL);
199  if (visible)
200  gtk_widget_get_preferred_width (child, minimum_width, natural_width);
201  else
202  *minimum_width = *natural_width = 0;
203 }
204 
205 static void gcu_periodic_size_allocate (GtkWidget *w, GtkAllocation *alloc)
206 {
207  GtkWidget *child = gtk_bin_get_child (GTK_BIN (w));
208  gboolean visible = FALSE;
209  if (child)
210  g_object_get (G_OBJECT (child), "visible", &visible, NULL);
211  if (visible)
212  gtk_widget_size_allocate (child, alloc);
213  (GTK_WIDGET_CLASS (parent_class))->size_allocate (w, alloc);
214 }
215 
216 static void gcu_periodic_finalize (GObject *object)
217 {
218  GcuPeriodic *periodic = (GcuPeriodic*) object;
219 
220  g_array_free (periodic->colorschemes, FALSE);
221 
222  if (G_OBJECT_CLASS (parent_class)->finalize)
223  (* G_OBJECT_CLASS (parent_class)->finalize) (object);
224 }
225 
226 static void gcu_periodic_class_init (GcuPeriodicClass *klass)
227 {
228  GObjectClass *gobject_class = G_OBJECT_CLASS (klass);
229  GtkWidgetClass *widget_class = GTK_WIDGET_CLASS (klass);
230  parent_class = (GtkBinClass*) g_type_class_peek_parent (klass);
231 
232  gobject_class->set_property = gcu_periodic_set_property;
233  gobject_class->get_property = gcu_periodic_get_property;
234  klass->element_changed_event = NULL;
235  gcu_periodic_signals[ELEMENT_CHANGED] =
236  g_signal_new ("element_changed",
237  G_TYPE_FROM_CLASS(gobject_class),
238  G_SIGNAL_RUN_LAST,
239  G_STRUCT_OFFSET(GcuPeriodicClass, element_changed_event),
240  NULL, NULL,
241  g_cclosure_marshal_VOID__UINT,
242  G_TYPE_NONE, 1,
243  G_TYPE_UINT
244  );
245  g_object_class_install_property
246  (gobject_class,
247  PROP_CAN_UNSELECT,
248  g_param_spec_boolean ("can_unselect", NULL, NULL,
249  FALSE,
250  (G_PARAM_READABLE | G_PARAM_WRITABLE)));
251  g_object_class_install_property
252  (gobject_class,
253  PROP_COLOR_STYLE,
254  g_param_spec_uint ("color-style", NULL, NULL,
255  GCU_PERIODIC_COLOR_NONE, G_MAXUINT,
256  GCU_PERIODIC_COLOR_NONE,
257  (G_PARAM_READABLE | G_PARAM_WRITABLE)));
258  gobject_class->finalize = gcu_periodic_finalize;
259  widget_class->get_preferred_height = gcu_periodic_get_preferred_height;
260  widget_class->get_preferred_width = gcu_periodic_get_preferred_width;
261  widget_class->size_allocate = gcu_periodic_size_allocate;
262 }
263 
264 static void on_draw (GtkWidget *w, cairo_t *cr, GcuPeriodic *periodic)
265 {
266  if (periodic->colorstyle != GCU_PERIODIC_COLOR_NONE) {
267  GtkAllocation alloc;
268  unsigned i = GPOINTER_TO_UINT (g_object_get_data (G_OBJECT (w), "elt"));
269  gtk_widget_get_allocation (w, &alloc);
270  cairo_rectangle (cr, 0, 0, alloc.width, alloc.height);
271  cairo_set_source_rgb (cr, periodic->red[i], periodic->green[i], periodic->blue[i]);
272  cairo_fill (cr);
273  }
274  GTK_WIDGET_CLASS (G_OBJECT_GET_CLASS (w))->draw (w, cr);
275 }
276 
277 static void gcu_periodic_init (GcuPeriodic *periodic)
278 {
279  GtkBuilder* xml;
280  char name[8] = "elt";
281  GtkToggleButton* button;
282  int i;
283  xml = go_gtk_builder_load (UIDIR"/gcuperiodic.ui", GETTEXT_PACKAGE, NULL);
284  g_return_if_fail (xml);
285  periodic->grid = GTK_GRID (gtk_builder_get_object (xml, "periodic-grid"));
286  periodic->book = GTK_NOTEBOOK (gtk_builder_get_object (xml, "book"));
287  periodic->colorstyle = GCU_PERIODIC_COLOR_NONE;
288  memset(periodic->buttons, 0, sizeof (GtkToggleButton*) * 119);
289  for (i = 1; i <= 118; i++) {
290  sprintf(name + 3, "%d", i);
291  button = (GtkToggleButton*) gtk_builder_get_object (xml, name);
292  if (GTK_IS_TOGGLE_BUTTON (button)) {
293  gtk_widget_set_tooltip_text (GTK_WIDGET(button), gcu_element_get_name(i));
294  periodic->buttons[i] = button;
295  periodic->labels[i] = GTK_LABEL (gtk_bin_get_child (GTK_BIN (button)));
296  g_object_set_data (G_OBJECT (periodic->labels[i]), "elt", GUINT_TO_POINTER (i));
297  g_signal_connect (G_OBJECT (button), "toggled", G_CALLBACK (on_clicked), periodic);
298  g_signal_connect (G_OBJECT (periodic->labels[i]), "draw", G_CALLBACK (on_draw), periodic);
299  }
300  }
301  periodic->Z = 0;
302  gtk_container_add (GTK_CONTAINER (periodic), GTK_WIDGET (periodic->grid));
303  gtk_widget_show_all (GTK_WIDGET (periodic));
304  periodic->colorschemes = g_array_new (FALSE, FALSE, sizeof (struct ColorScheme));
305  g_object_unref (xml);
306 }
307 
308 GSF_CLASS (GcuPeriodic, gcu_periodic,
309  gcu_periodic_class_init, gcu_periodic_init,
310  GTK_TYPE_BIN)
311 
312 GtkWidget* gcu_periodic_new ()
313 {
314  return GTK_WIDGET (g_object_new (GCU_TYPE_PERIODIC, NULL));
315 }
316 
317 guint gcu_periodic_get_element(GcuPeriodic* periodic)
318 {
319  g_return_val_if_fail(GCU_IS_PERIODIC(periodic), 0);
320  return periodic->Z;
321 }
322 
323 void gcu_periodic_set_element (GcuPeriodic* periodic, guint element)
324 {
325  g_return_if_fail(GCU_IS_PERIODIC(periodic));
326  if (periodic->can_unselect && periodic->buttons[0]) gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(periodic->buttons[0]), FALSE);
327  if (element)
328  {
329  gtk_toggle_button_set_active(periodic->buttons[element], TRUE);
330  periodic->buttons[0] = periodic->buttons[element];
331  periodic->Z = element;
332  }
333  else if (periodic->can_unselect)
334  {
335  periodic->buttons[0] = NULL;
336  periodic->Z = 0;
337  }
338 }
339 
340 void gcu_periodic_set_colors(GcuPeriodic *periodic)
341 {
342  const double *colors;
343  PangoAttribute *attr;
344  PangoAttrList *l;
345  int i;
346  GdkRGBA rgba;
347  rgba.alpha = 1.;
348  GcuPeriodicColorFunc func = NULL;
349  gpointer data = NULL;
350  if (periodic->colorstyle >= GCU_PERIODIC_COLOR_MAX) {
351  func = g_array_index (periodic->colorschemes, struct ColorScheme, periodic->colorstyle - GCU_PERIODIC_COLOR_MAX).f;
352  data = g_array_index (periodic->colorschemes, struct ColorScheme, periodic->colorstyle - GCU_PERIODIC_COLOR_MAX).data;
353  }
354  for (i = 1; i <= 118; i++)
355  {
356  if (!periodic->labels[i])
357  continue;
358  switch (periodic->colorstyle)
359  {
360  case GCU_PERIODIC_COLOR_NONE:
361  l = pango_attr_list_new ();
362  gtk_label_set_attributes (periodic->labels[i], l);
363  break;
364  case GCU_PERIODIC_COLOR_DEFAULT:
365  colors = gcu_element_get_default_color(i);
366  periodic->red[i] = colors[0];
367  periodic->green[i] = colors[1];
368  periodic->blue[i] = colors[2];
369  if (colors[0] > 0.6 || colors[1] > 0.6 || colors[2] > 0.6)
370  attr = pango_attr_foreground_new (0, 0, 0);
371  else
372  attr = pango_attr_foreground_new (65535, 65535, 65535);
373  attr->start_index = 0;
374  attr->end_index = 100;
375  l = pango_attr_list_new ();
376  pango_attr_list_insert (l, attr);
377  gtk_label_set_attributes (periodic->labels[i], l);
378  break;
379  default: {
380  func (i, &rgba, data);
381  periodic->red[i] = rgba.red;
382  periodic->green[i] = rgba.green;
383  periodic->blue[i] = rgba.blue;
384  if (rgba.red > 0.6 || rgba.green > 0.6 || rgba.blue > 0.6)
385  attr = pango_attr_foreground_new (0, 0, 0);
386  else
387  attr = pango_attr_foreground_new (65535, 65535, 65535);
388  attr->start_index = 0;
389  attr->end_index = 100;
390  l = pango_attr_list_new ();
391  pango_attr_list_insert (l, attr);
392  gtk_label_set_attributes (periodic->labels[i], l);
393  break;
394  }
395  }
396  }
397 }
398 
399 int gcu_periodic_add_color_scheme (GcuPeriodic *periodic,
400  GcuPeriodicColorFunc func, GtkWidget *extra_widget, gpointer user_data)
401 {
402  struct ColorScheme s;
403  s.f = func;
404  if (extra_widget)
405  s.page = gtk_notebook_append_page (periodic->book, extra_widget, NULL);
406  else
407  s.page = 0;
408  s.data = user_data;
409  g_array_append_val (periodic->colorschemes, s);
410  return GCU_PERIODIC_COLOR_MAX + periodic->nbschemes++;
411 }
412 
413 void gcu_periodic_set_tips (GcuPeriodic *periodic, unsigned scheme)
414 {
415  if (scheme != periodic->tips) {
416  int i;
417  periodic->tips = scheme;
418  switch (scheme) {
419  default:
420  case GCU_PERIODIC_TIP_NAME:
421  for (i = 1; i <= 118; i++) {
422  if (periodic->buttons[i])
423  gtk_widget_set_tooltip_text (GTK_WIDGET (periodic->buttons[i]), gcu_element_get_name (i));
424  }
425  break;
426  case GCU_PERIODIC_TIP_STANDARD:
427  for (i = 1; i <= 118; i++) {
428  GtkWidget *win, *grid, *w;
429  char *markup, *str;
430  char const *conf;
431  if (!periodic->buttons[i])
432  continue;
433  win = gtk_window_new (GTK_WINDOW_POPUP);
434  gtk_widget_set_name (win, "gtk-tooltip");
435  grid = gtk_grid_new ();
436  gtk_container_add (GTK_CONTAINER (win), grid);
437  w = GTK_WIDGET (g_object_new (GTK_TYPE_LABEL, "xalign", 0., NULL));
438  markup = g_strdup_printf ("%u", i);
439  gtk_label_set_text (GTK_LABEL (w), markup);
440  g_free (markup);
441  gtk_grid_attach (GTK_GRID (grid), w, 0, 0, 1, 1);
442  str = gcu_element_get_weight_as_string (i);
443  conf = gcu_element_get_electronic_configuration (i);
444  w = GTK_WIDGET (g_object_new (GTK_TYPE_LABEL, "justify", GTK_JUSTIFY_CENTER, NULL));
445  markup = g_strdup_printf ("<span face=\"Sans\" size=\"xx-large\">%s</span>\n%s\n%s\n%s",
446  gcu_element_get_symbol (i), gcu_element_get_name (i), (conf)? conf: "", (str)? str: "");
447  g_free (str);
448  gtk_label_set_markup (GTK_LABEL (w), markup);
449  g_free (markup);
450  gtk_grid_attach (GTK_GRID (grid), w, 0, 1, 1, 1);
451  gtk_widget_show_all (grid);
452  gtk_widget_set_tooltip_window (GTK_WIDGET (periodic->buttons[i]), GTK_WINDOW (win));
453  }
454  break;
455  }
456  }
457 }
Generated on Tue Jan 1 2013 22:29:22 for The Gnome Chemistry Utils by   doxygen 1.8.1.2