[Window] Rename property "pinned" to "stick"
[tilda-gobject.git] / tilda-window.c
1 #include "tilda.h"
2 #include "tilda-window.h"
3 #include "tilda-window-dbus-glue.h"
4
5 /**
6  * Find the TildaTerminal corresponding to the currently selected
7  * tab in self->notebook. This could go away if TildaTerminal were
8  * a proper subclass of GtkWidget.
9  */
10 static TildaTerminal *
11 tilda_window_find_current_terminal (TildaWindow *self)
12 {
13         gint i;
14         TildaTerminal *ret;
15         gint current_page = gtk_notebook_get_current_page (GTK_NOTEBOOK(self->notebook));
16         GtkWidget *box = gtk_notebook_get_nth_page (GTK_NOTEBOOK(self->notebook), current_page);
17
18         for (i=0; i<self->terms->len; ++i)
19         {
20                 ret = g_ptr_array_index (self->terms, i);
21
22                 if (ret->hbox == box)
23                         return ret;
24         }
25
26         g_printerr ("FIXME: unable to find current terminal!\n");
27         return NULL;
28 }
29
30 static gint
31 tilda_window_find_next_free_terminal_number (TildaWindow *tw)
32 {
33         gint i, j;
34         gboolean found;
35
36         for (i=0; i<INT_MAX; ++i)
37         {
38                 found = FALSE;
39
40                 for (j=0; j<tw->terms->len; ++j)
41                 {
42                         TildaTerminal *tt = g_ptr_array_index (tw->terms, j);
43
44                         if (tt->number == i)
45                         {
46                                 found = TRUE;
47                                 break;
48                         }
49                 }
50
51                 if (!found)
52                         return i;
53         }
54
55         return 0;
56 }
57
58 static gboolean
59 tilda_window_add_term (TildaWindow *tw)
60 {
61         gint number;
62         TildaTerminal *tt;
63
64         number = tilda_window_find_next_free_terminal_number (tw);
65         tt = g_object_new (TILDA_TYPE_TERMINAL,
66                                            "number", number,
67                                            "window-number", tw->number,
68                                            "parent-window", tw,
69                                            NULL);
70         g_ptr_array_add (tw->terms, tt);
71
72         GtkWidget *label = gtk_label_new ("Tilda");
73         gint index = gtk_notebook_prepend_page (GTK_NOTEBOOK(tw->notebook), tt->hbox, label);
74         gtk_notebook_set_tab_label_packing (GTK_NOTEBOOK(tw->notebook), tt->hbox, TRUE, TRUE, GTK_PACK_END);
75         //gtk_notebook_set_current_page (GTK_NOTEBOOK(tw->notebook), index);
76
77         if (gtk_notebook_get_n_pages (GTK_NOTEBOOK(tw->notebook)) > 1)
78                 gtk_notebook_set_show_tabs (GTK_NOTEBOOK(tw->notebook), TRUE);
79
80         return TRUE;
81 }
82
83 /**
84  * Remove the TildaTerminal with the given number from the given
85  * TildaWindow.
86  *
87  * Return: TRUE on success, FALSE otherwise.
88  */
89 gboolean
90 tilda_window_remove_term (TildaWindow *tw, gint terminal_number)
91 {
92         gint i;
93
94         for (i=0; i<tw->terms->len; ++i)
95         {
96                 TildaTerminal *tt = g_ptr_array_index (tw->terms, i);
97
98                 if (tt->number == terminal_number)
99                 {
100                         gint notebook_index = gtk_notebook_page_num (GTK_NOTEBOOK(tw->notebook), tt->hbox);
101
102                         /* Make sure the index was valid */
103                         if (notebook_index == -1)
104                         {
105                                 g_printerr ("DEBUG ERROR: Bad Notebook Tab\n");
106                                 return FALSE;
107                         }
108
109                         /* Actually remove the terminal */
110                         gtk_notebook_remove_page (GTK_NOTEBOOK (tw->notebook), notebook_index);
111
112                         /* We should hide the tabs if there is only one tab left */
113                         if (gtk_notebook_get_n_pages (GTK_NOTEBOOK (tw->notebook)) == 1)
114                                 gtk_notebook_set_show_tabs (GTK_NOTEBOOK (tw->notebook), FALSE);
115
116 #if 0
117                         // FIXME FIXME FIXME: need to actually do the stuff below
118                         /* With no pages left, it's time to leave the program */
119                         if (gtk_notebook_get_n_pages (GTK_NOTEBOOK (tw->notebook)) < 1)
120                                 gtk_main_quit ();
121 #endif
122
123                         /* Remove the term from our lists, then free it */
124                         g_ptr_array_remove_fast (tw->terms, tt);
125                         g_object_unref (G_OBJECT(tt));
126
127                         /* Leave the loop, we're done */
128                         break;
129                 }
130         }
131
132         return TRUE;
133 }
134
135 /**
136  * This sets up the given TildaWindow for the capability of real
137  * transparency, if the X server is capable of it. */
138 static void
139 tilda_window_setup_real_transparency (TildaWindow *self)
140 {
141         GdkScreen *screen;
142         GdkColormap *colormap;
143
144         screen = gtk_widget_get_screen (GTK_WIDGET(self->window));
145         colormap = gdk_screen_get_rgba_colormap (screen);
146
147         /* If possible, set the RGBA colormap so VTE can use real alpha
148          * channels for transparency. */
149         if (colormap != NULL && gdk_screen_is_composited (screen))
150         {
151                 gtk_widget_set_colormap (GTK_WIDGET(self->window), colormap);
152                 self->have_real_transparency = TRUE;
153                 return;
154         }
155
156         self->have_real_transparency = FALSE;
157 }
158
159 static void
160 tilda_window_keybinding_cb (const gchar *keystr, gpointer data)
161 {
162         TildaWindow *self = TILDA_WINDOW(data);
163         TildaTerminal *tt;
164         g_print ("tilda_window_keybinding_cb() called! -- window %d\n", self->number);
165
166         // FIXME: this doesn't handle animation!
167
168         switch (self->state)
169         {
170                 case WINDOW_UP:
171                         /* Pull Down */
172                         tomboy_window_present_hardcore (GTK_WINDOW(self->window));
173                         self->state = WINDOW_DOWN;
174
175                         // Focusing the term here works perfectly, near as I can tell
176                         tt = tilda_window_find_current_terminal (self);
177                         gtk_widget_grab_focus (GTK_WIDGET(tt->vte_term));
178                         break;
179
180                 case WINDOW_DOWN:
181                         /* Pull Up */
182                         gtk_widget_hide (GTK_WIDGET(self->window));
183                         self->state = WINDOW_UP;
184                         break;
185
186                 default:
187                         g_printerr ("FIXME: the window is in a bad state!\n");
188
189                         /* Pretend we're down, for good measure.... */
190                         self->state = WINDOW_DOWN;
191                         break;
192         }
193 }
194
195 /**
196  * Attempt to bind the new_key to show this window.
197  *
198  * Return: TRUE if successful, FALSE otherwise.
199  */
200 static gboolean
201 tilda_window_try_to_bind_key (TildaWindow *self, const gchar *new_key)
202 {
203         gboolean ret = FALSE;
204
205         /* Make sure the new key is not null in any way */
206         if (new_key == NULL || strcmp("", new_key) == 0)
207                 return FALSE;
208
209         /* Unbind if we were set */
210         if (self->key)
211                 tomboy_keybinder_unbind (self->key, tilda_window_keybinding_cb, self);
212
213         ret = tomboy_keybinder_bind (new_key, tilda_window_keybinding_cb, self);
214
215         /* If it was successful, update the self->key variable and be done with it */
216         if (ret)
217         {
218                 g_free (self->key);
219                 self->key = g_strdup (new_key);
220                 return TRUE;
221         }
222
223         g_printerr ("Keybinding unsuccessful. Reverting to original key\n");
224
225         /* Not successful, so rebind the old key, and return FALSE */
226         if (self->key != NULL && strcmp("",self->key) != 0)
227         {
228                 ret = tomboy_keybinder_bind (self->key, tilda_window_keybinding_cb, self);
229
230                 /* Check that it went ok */
231                 if (!ret)
232                         g_printerr ("Unable to bind original key as well! Oh shit...\n");
233         }
234         else
235                 g_printerr ("No original key to revert to!\n");
236
237         return FALSE;
238 }
239
240 static void
241 tilda_window_dbus_register_object (TildaWindow *tw)
242 {
243         gchar *object_path;
244
245         // Register this object with DBus
246         object_path = g_strdup_printf ("/net/sourceforge/Tilda/Window%d", tw->number);
247         dbus_g_connection_register_g_object (dbus_connection, object_path, G_OBJECT(tw));
248         g_free (object_path);
249 }
250
251 /*******************************************************************************
252  * ALL GOBJECT STUFF BELOW PLEASE
253  ******************************************************************************/
254
255 static GObjectClass *parent_class = NULL;
256
257 enum tilda_window_properties {
258         TILDA_WINDOW_NUMBER = 1,
259
260         TILDA_WINDOW_KEY,
261
262         TILDA_WINDOW_HEIGHT,
263         TILDA_WINDOW_WIDTH,
264         TILDA_WINDOW_X_POSITION,
265         TILDA_WINDOW_Y_POSITION,
266
267         TILDA_WINDOW_TAB_POSITION,
268         TILDA_WINDOW_ANIMATION_ORIENTATION,
269         TILDA_WINDOW_ANIMATION_DELAY,
270
271         TILDA_WINDOW_KEEP_ABOVE,
272         TILDA_WINDOW_SKIP_TASKBAR_HINT,
273         TILDA_WINDOW_STICK,
274         TILDA_WINDOW_HIDDEN_AT_START,
275         TILDA_WINDOW_CENTERED_HORIZONTALLY,
276         TILDA_WINDOW_CENTERED_VERTICALLY,
277
278         TILDA_WINDOW_HAVE_REAL_TRANSPARENCY,
279 };
280
281 static void
282 tilda_window_instance_init (GTypeInstance *instance,
283                                                         gpointer       g_class)
284 {
285         TildaWindow *self = (TildaWindow *) instance;
286         self->dispose_has_run = FALSE;
287
288         /* Initialize all properties */
289         self->window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
290         self->notebook = gtk_notebook_new ();
291         self->terms = g_ptr_array_new ();
292
293         /* Somewhat of a "poison" value, incase we don't set this */
294         self->number = 0xdeadbeef;
295
296         self->state = WINDOW_UP;
297 }
298
299 static void
300 tilda_window_set_property (GObject      *object,
301                                                    guint         property_id,
302                                                    const GValue *value,
303                                                    GParamSpec   *pspec)
304 {
305         TildaWindow *self = (TildaWindow *) object;
306
307         switch (property_id) {
308
309                 case TILDA_WINDOW_NUMBER:
310                         self->number = g_value_get_int (value);
311                         g_print ("window number: %d\n", self->number);
312                         break;
313
314                 case TILDA_WINDOW_KEY:
315                         tilda_window_try_to_bind_key (self, g_value_get_string (value));
316                         g_print ("window key: %s\n", self->key);
317                         break;
318
319                 case TILDA_WINDOW_HEIGHT:
320                         self->height = g_value_get_int (value);
321                         gtk_widget_set_size_request (self->window, self->width, self->height);
322                         gtk_window_resize (GTK_WINDOW(self->window), self->width, self->height);
323                         g_print ("window height: %d\n", self->height);
324                         break;
325
326                 case TILDA_WINDOW_WIDTH:
327                         self->width = g_value_get_int (value);
328                         gtk_widget_set_size_request (self->window, self->width, self->height);
329                         gtk_window_resize (GTK_WINDOW(self->window), self->width, self->height);
330                         g_print ("window width: %d\n", self->width);
331                         break;
332
333                 case TILDA_WINDOW_X_POSITION:
334                         self->x_position = g_value_get_int (value);
335                         gtk_window_move (GTK_WINDOW(self->window), self->x_position, self->y_position);
336                         g_print ("window x position: %d\n", self->x_position);
337                         break;
338
339                 case TILDA_WINDOW_Y_POSITION:
340                         self->y_position = g_value_get_int (value);
341                         gtk_window_move (GTK_WINDOW(self->window), self->x_position, self->y_position);
342                         g_print ("window y position: %d\n", self->y_position);
343                         break;
344
345                 case TILDA_WINDOW_TAB_POSITION:
346                         self->tab_position = g_value_get_int (value);
347                         g_print ("window tab position: %d\n", self->tab_position);
348                         break;
349
350                 case TILDA_WINDOW_ANIMATION_ORIENTATION:
351                         self->animation_orientation = g_value_get_int (value);
352                         g_print ("window animation orientation: %d\n", self->animation_orientation);
353                         break;
354
355                 case TILDA_WINDOW_ANIMATION_DELAY:
356                         self->animation_delay = g_value_get_int (value);
357                         g_print ("window animation delay: %d\n", self->animation_delay);
358                         break;
359
360                 case TILDA_WINDOW_KEEP_ABOVE:
361                         self->keep_above = g_value_get_boolean (value);
362                         g_print ("window keep above: %d\n", self->keep_above);
363                         break;
364
365                 case TILDA_WINDOW_SKIP_TASKBAR_HINT:
366                         self->skip_taskbar_hint = g_value_get_boolean (value);
367                         gtk_window_set_skip_taskbar_hint (GTK_WINDOW(self->window), self->skip_taskbar_hint);
368                         g_print ("window skip taskbar hint: %d\n", self->skip_taskbar_hint);
369                         break;
370
371                 case TILDA_WINDOW_STICK:
372                         self->stick = g_value_get_boolean (value);
373
374                         /* This is moderately ugly, but GTK+ does it this way... */
375                         self->stick ? gtk_window_stick (GTK_WINDOW(self->window))
376                                                 : gtk_window_unstick (GTK_WINDOW(self->window));
377                         g_print ("window stick: %d\n", self->stick);
378                         break;
379
380                 case TILDA_WINDOW_HIDDEN_AT_START:
381                         self->hidden_at_start = g_value_get_boolean (value);
382                         g_print ("window hidden at start: %d\n", self->hidden_at_start);
383                         break;
384
385                 case TILDA_WINDOW_CENTERED_HORIZONTALLY:
386                         self->centered_horizontally = g_value_get_boolean (value);
387                         g_print ("window centered horizontally: %d\n", self->centered_horizontally);
388                         break;
389
390                 case TILDA_WINDOW_CENTERED_VERTICALLY:
391                         self->centered_vertically = g_value_get_boolean (value);
392                         g_print ("window centered vertically: %d\n", self->centered_vertically);
393                         break;
394
395                 case TILDA_WINDOW_HAVE_REAL_TRANSPARENCY:
396                         self->have_real_transparency = g_value_get_boolean (value);
397                         g_print ("window have real transp: %d\n", self->have_real_transparency);
398                         break;
399
400                 default:
401                         /* We don't have this property */
402                         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
403                         break;
404         }
405 }
406
407 static void
408 tilda_window_get_property (GObject    *object,
409                                                    guint       property_id,
410                                                    GValue     *value,
411                                                    GParamSpec *pspec)
412 {
413         TildaWindow *self = (TildaWindow *) object;
414
415         switch (property_id) {
416
417                 case TILDA_WINDOW_NUMBER:
418                         g_value_set_int (value, self->number);
419                         break;
420
421                 case TILDA_WINDOW_KEY:
422                         g_value_set_string (value, self->key);
423                         break;
424
425                 case TILDA_WINDOW_HEIGHT:
426                         g_value_set_int (value, self->height);
427                         break;
428
429                 case TILDA_WINDOW_WIDTH:
430                         g_value_set_int (value, self->width);
431                         break;
432
433                 case TILDA_WINDOW_X_POSITION:
434                         g_value_set_int (value, self->x_position);
435                         break;
436
437                 case TILDA_WINDOW_Y_POSITION:
438                         g_value_set_int (value, self->y_position);
439                         break;
440
441                 case TILDA_WINDOW_TAB_POSITION:
442                         g_value_set_int (value, self->tab_position);
443                         break;
444
445                 case TILDA_WINDOW_ANIMATION_ORIENTATION:
446                         g_value_set_int (value, self->animation_orientation);
447                         break;
448
449                 case TILDA_WINDOW_ANIMATION_DELAY:
450                         g_value_set_int (value, self->animation_delay);
451                         break;
452
453                 case TILDA_WINDOW_KEEP_ABOVE:
454                         g_value_set_boolean (value, self->keep_above);
455                         break;
456
457                 case TILDA_WINDOW_SKIP_TASKBAR_HINT:
458                         g_value_set_boolean (value, self->skip_taskbar_hint);
459                         break;
460
461                 case TILDA_WINDOW_STICK:
462                         g_value_set_boolean (value, self->stick);
463                         break;
464
465                 case TILDA_WINDOW_HIDDEN_AT_START:
466                         g_value_set_boolean (value, self->hidden_at_start);
467                         break;
468
469                 case TILDA_WINDOW_CENTERED_HORIZONTALLY:
470                         g_value_set_boolean (value, self->centered_horizontally);
471                         break;
472
473                 case TILDA_WINDOW_CENTERED_VERTICALLY:
474                         g_value_set_boolean (value, self->centered_vertically);
475                         break;
476
477                 case TILDA_WINDOW_HAVE_REAL_TRANSPARENCY:
478                         g_value_set_boolean (value, self->have_real_transparency);
479                         break;
480
481                 default:
482                         /* We don't have this property */
483                         G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
484                         break;
485         }
486 }
487
488 static GObject *
489 tilda_window_constructor (GType                  type,
490                                                   guint                  n_construct_properties,
491                                                   GObjectConstructParam *construct_properties)
492 {
493         GObject *obj;
494         TildaWindow *self;
495
496         /* Invoke parent constructor */
497         TildaWindowClass *klass;
498         klass = TILDA_WINDOW_CLASS (g_type_class_peek (TILDA_TYPE_WINDOW));
499         obj = parent_class->constructor (type,
500                                                                          n_construct_properties,
501                                                                          construct_properties);
502
503         /* Do other stuff here. The object is ready to go now, and all
504          * ctor properties have been set.
505          *
506          * TODO: This is the place to do DBus-init */
507         self = TILDA_WINDOW(obj);
508
509         /* Register this object with DBus */
510         tilda_window_dbus_register_object (self);
511
512         /* Try to set up real transparency */
513         tilda_window_setup_real_transparency (self);
514
515         gtk_container_add (GTK_CONTAINER(self->window), self->notebook);
516         gtk_widget_show (self->notebook);
517
518         // FIXME: Remove these, and replace with reads from the config system
519         g_object_set (G_OBJECT(self), "key", "F2", NULL);
520         g_object_set (G_OBJECT(self), "x-position", 0, "y-position", 0, NULL);
521         g_object_set (G_OBJECT(self), "height", 400, "width", 1680, NULL);
522
523         gtk_window_set_decorated (GTK_WINDOW(self->window), FALSE);
524
525         tilda_window_add_term (self);
526         tilda_window_add_term (self);
527         gtk_widget_show_all (self->window);
528         self->state = WINDOW_DOWN;
529
530         return obj;
531 }
532
533 static void
534 my_unref (gpointer data, gpointer user_data)
535 {
536         g_object_unref (G_OBJECT(data));
537 }
538
539 static void
540 tilda_window_dispose (GObject *obj)
541 {
542         TildaWindow *self = (TildaWindow *) obj;
543
544         /* We don't want to run dispose twice, so just return immediately */
545         if (self->dispose_has_run)
546                 return;
547
548         /*
549          * In dispose, you are supposed to free all types referenced from this
550          * object which might themselves hold a reference to self. Generally,
551          * the most simple solution is to unref all members on which you own a
552          * reference.
553          *
554          * NOTE: See the following for how to deal with GtkObject-derived things:
555          * http://library.gnome.org/devel/gtk/unstable/GtkObject.html
556          */
557         g_ptr_array_foreach (self->terms, my_unref, NULL);
558         gtk_widget_destroy (self->window);
559
560         /* Chain up to the parent class */
561         G_OBJECT_CLASS (parent_class)->dispose (obj);
562 }
563
564 static void
565 tilda_window_finalize (GObject *obj)
566 {
567         TildaWindow *self = (TildaWindow *) obj;
568
569         /*
570          * Here, complete the object's destruction.
571          * You might not need to do much...
572          */
573         // TODO: g_free() any primitives here
574         g_ptr_array_free (self->terms, TRUE);
575
576
577         /* Chain up to the parent class */
578         G_OBJECT_CLASS (parent_class)->finalize (obj);
579 }
580
581 static void
582 tilda_window_class_init (gpointer g_class,
583                                                  gpointer g_class_data)
584 {
585         GObjectClass *gobject_class = G_OBJECT_CLASS (g_class);
586         TildaWindowClass *klass = TILDA_WINDOW_CLASS (g_class);
587         GParamSpec *pspec;
588
589         /* Hook our functions to this type */
590         gobject_class->set_property = tilda_window_set_property;
591         gobject_class->get_property = tilda_window_get_property;
592         gobject_class->dispose = tilda_window_dispose;
593         gobject_class->finalize = tilda_window_finalize;
594         gobject_class->constructor = tilda_window_constructor;
595
596         parent_class = g_type_class_peek_parent (klass);
597
598         /* Install all of the properties */
599         pspec = g_param_spec_int ("number",
600                                                           "Window number",
601                                                           "Set window's number",
602                                                           0,            // min value
603                                                           INT_MAX,      // max value
604                                                           0,            // def value
605                                                           G_PARAM_CONSTRUCT_ONLY | G_PARAM_READWRITE);
606
607         g_object_class_install_property (gobject_class,
608                                                                          TILDA_WINDOW_NUMBER,
609                                                                          pspec);
610
611         pspec = g_param_spec_string ("key",
612                                                                  "Window's drop-down keybinding",
613                                                                  NULL,
614                                                                  NULL,
615                                                                  G_PARAM_READWRITE);
616
617         g_object_class_install_property (gobject_class,
618                                                                          TILDA_WINDOW_KEY,
619                                                                          pspec);
620
621         pspec = g_param_spec_int ("height",
622                                                           "Window's height",
623                                                           NULL,
624                                                           0,
625                                                           INT_MAX,
626                                                           0,
627                                                           G_PARAM_READWRITE);
628
629         g_object_class_install_property (gobject_class,
630                                                                          TILDA_WINDOW_HEIGHT,
631                                                                          pspec);
632
633         pspec = g_param_spec_int ("width",
634                                                           "Window's width",
635                                                           NULL,
636                                                           0,
637                                                           INT_MAX,
638                                                           0,
639                                                           G_PARAM_READWRITE);
640
641         g_object_class_install_property (gobject_class,
642                                                                          TILDA_WINDOW_WIDTH,
643                                                                          pspec);
644
645         pspec = g_param_spec_int ("x-position",
646                                                           "Window's x position",
647                                                           NULL,
648                                                           0,
649                                                           INT_MAX,
650                                                           0,
651                                                           G_PARAM_READWRITE);
652
653         g_object_class_install_property (gobject_class,
654                                                                          TILDA_WINDOW_X_POSITION,
655                                                                          pspec);
656
657         pspec = g_param_spec_int ("y-position",
658                                                           "Window's y position",
659                                                           NULL,
660                                                           0,
661                                                           INT_MAX,
662                                                           0,
663                                                           G_PARAM_READWRITE);
664
665         g_object_class_install_property (gobject_class,
666                                                                          TILDA_WINDOW_Y_POSITION,
667                                                                          pspec);
668
669         pspec = g_param_spec_int ("tab-position",
670                                                           "Window's tab position",
671                                                           NULL,
672                                                           0,
673                                                           INT_MAX,
674                                                           0,
675                                                           G_PARAM_READWRITE);
676
677         g_object_class_install_property (gobject_class,
678                                                                          TILDA_WINDOW_TAB_POSITION,
679                                                                          pspec);
680
681         pspec = g_param_spec_int ("animation-orientation",
682                                                           "Window's animation orientation",
683                                                           NULL,
684                                                           0,
685                                                           INT_MAX,
686                                                           0,
687                                                           G_PARAM_READWRITE);
688
689         g_object_class_install_property (gobject_class,
690                                                                          TILDA_WINDOW_ANIMATION_ORIENTATION,
691                                                                          pspec);
692
693         pspec = g_param_spec_int ("animation-delay",
694                                                           "Amount of time in milliseconds between animation intervals",
695                                                           NULL,
696                                                           0,
697                                                           INT_MAX,
698                                                           0,
699                                                           G_PARAM_READWRITE);
700
701         g_object_class_install_property (gobject_class,
702                                                                          TILDA_WINDOW_ANIMATION_DELAY,
703                                                                          pspec);
704
705         pspec = g_param_spec_boolean ("keep-above",
706                                                                   "Keep this window above all others",
707                                                                   NULL,
708                                                                   FALSE,
709                                                                   G_PARAM_READWRITE);
710
711         g_object_class_install_property (gobject_class,
712                                                                          TILDA_WINDOW_KEEP_ABOVE,
713                                                                          pspec);
714
715         pspec = g_param_spec_boolean ("skip-taskbar-hint",
716                                                                   "Hide this window in the taskbar if TRUE",
717                                                                   NULL,
718                                                                   FALSE,
719                                                                   G_PARAM_READWRITE);
720
721         g_object_class_install_property (gobject_class,
722                                                                          TILDA_WINDOW_SKIP_TASKBAR_HINT,
723                                                                          pspec);
724
725         pspec = g_param_spec_boolean ("stick",
726                                                                   "Display this window on all workspaces",
727                                                                   NULL,
728                                                                   FALSE,
729                                                                   G_PARAM_READWRITE);
730
731         g_object_class_install_property (gobject_class,
732                                                                          TILDA_WINDOW_STICK,
733                                                                          pspec);
734
735         pspec = g_param_spec_boolean ("hidden-at-start",
736                                                                   "Hide the window when it is first created",
737                                                                   NULL,
738                                                                   FALSE,
739                                                                   G_PARAM_READWRITE);
740
741         g_object_class_install_property (gobject_class,
742                                                                          TILDA_WINDOW_HIDDEN_AT_START,
743                                                                          pspec);
744
745         pspec = g_param_spec_boolean ("centered-horizontally",
746                                                                   "Center the window horizontally",
747                                                                   NULL,
748                                                                   FALSE,
749                                                                   G_PARAM_READWRITE);
750
751         g_object_class_install_property (gobject_class,
752                                                                          TILDA_WINDOW_CENTERED_HORIZONTALLY,
753                                                                          pspec);
754
755         pspec = g_param_spec_boolean ("centered-vertically",
756                                                                   "Center the window vertically",
757                                                                   NULL,
758                                                                   FALSE,
759                                                                   G_PARAM_READWRITE);
760
761         g_object_class_install_property (gobject_class,
762                                                                          TILDA_WINDOW_CENTERED_VERTICALLY,
763                                                                          pspec);
764
765         pspec = g_param_spec_boolean ("have-real-transparency",
766                                                                   NULL, NULL, FALSE, G_PARAM_READABLE);
767
768         g_object_class_install_property (gobject_class,
769                                                                          TILDA_WINDOW_HAVE_REAL_TRANSPARENCY,
770                                                                          pspec);
771
772         /* TODO: more properties */
773
774         /* Hook the TildaWindow type into DBus */
775         dbus_g_object_type_install_info (tilda_window_get_type(), &dbus_glib_tilda_window_object_info);
776 }
777
778 GType
779 tilda_window_get_type (void)
780 {
781         static GType type = 0;
782
783         if (type == 0)
784         {
785                 static const GTypeInfo info = {
786                         sizeof (TildaWindowClass),
787                         NULL,   /* base_init */
788                         NULL,   /* base_finalize */
789                         tilda_window_class_init,        /* class_init */
790                         NULL,   /* class_finalize */
791                         NULL,   /* class_data */
792                         sizeof (TildaWindow),
793                         0,              /* n_preallocs */
794                         tilda_window_instance_init,     /* instance_init */
795                 };
796
797                 type = g_type_register_static (G_TYPE_OBJECT,
798                                                                            "TildaWindowType",
799                                                                            &info,
800                                                                            0);
801         }
802
803         return type;
804 }
805
806 #if 0
807
808 int main (int argc, char *argv[])
809 {
810         GObject *tw;
811         gint test_number = INT_MIN;
812
813         /* Initialize the GObject type system */
814         g_type_init ();
815         gtk_init (&argc, &argv);
816
817         tw = g_object_new (TILDA_TYPE_WINDOW, "number", 10, NULL);
818         g_object_get (G_OBJECT (tw), "number", &test_number, NULL);
819         g_assert (test_number == 10);
820
821         g_object_unref (G_OBJECT (tw));
822
823         tw = g_object_new (TILDA_TYPE_WINDOW, "number", 22, NULL);
824         g_object_get (G_OBJECT (tw), "number", &test_number, NULL);
825         g_assert (test_number == 22);
826
827         gtk_main ();
828
829         g_object_unref (G_OBJECT (tw));
830
831         return 0;
832 }
833
834 #endif
835
836 /* vim: set ts=4 sts=4 sw=4 noet tw=112: */