3 * an app to find belltowers under Maemo 5
5 * Copyright (c) 2009 Thomas Thurman <tthurman@gnome.org>
6 * Released under the GPL
13 #include <hildon/hildon.h>
15 #include <location/location-gps-device.h>
16 #include <location/location-distance-utils.h>
17 #include <dbus/dbus-glib.h>
20 #define CONFIG_GENERAL_GROUP "General"
21 #define CONFIG_BOOKMARK_GROUP "Bookmarks"
22 #define CONFIG_SEEN_CREDITS_KEY "seen_credits"
23 #define CONFIG_DIRECTORY "/home/user/.config/belltower"
24 #define CONFIG_FILENAME CONFIG_DIRECTORY "/belltower.ini"
27 LocationGPSDevice *device;
28 GKeyFile *static_content;
32 /** stop scanning the database */
34 /** ignore this one */
36 /** add this one to the list */
42 We should really do this by looking at the header row of the table.
43 They might decide to put in new columns some day.
90 char* fields[MAX_FIELDS];
95 show_message (char *message)
97 HildonNote* note = HILDON_NOTE
98 (hildon_note_new_information (GTK_WINDOW (window),
100 "Some message was supposed to be here."));
101 gtk_dialog_run (GTK_DIALOG (note));
102 gtk_widget_destroy (GTK_WIDGET (note));
106 * Loads the content of the static and dynamic data files.
107 * Possibly puts up a warning if we can't load the static file.
112 static_content = g_key_file_new ();
114 if (!g_key_file_load_from_file (static_content,
115 "/usr/share/belltower/static.ini",
119 show_message ("Could not load static content. Attempting to continue.");
122 config = g_key_file_new ();
123 /* it doesn't matter if this fails */
124 g_key_file_load_from_file (config,
126 G_KEY_FILE_KEEP_COMMENTS,
131 * Saves the dynamic data file to disk.
132 * Puts up a message if there was any error.
139 g_mkdir_with_parents (CONFIG_DIRECTORY, 0700);
141 data = g_key_file_to_data (config, NULL, NULL);
143 if (!g_file_set_contents (CONFIG_FILENAME,
148 show_message ("Could not write config file.");
155 distance_to_tower (tower *details)
161 const double km_to_miles = 1.609344;
163 tower_lat = strtod(details->fields[FieldLat], &endptr);
164 if (*endptr) return -1;
165 tower_long = strtod(details->fields[FieldLong], &endptr);
166 if (*endptr) return -1;
168 km_distance = location_distance_between (device->fix->latitude,
169 device->fix->longitude,
173 return (int) (km_distance / km_to_miles);
177 distance_to_tower_str (tower *details)
179 int miles = distance_to_tower (details);
183 return g_strdup ("unknown");
187 return g_strdup_printf("%dmi", (int) miles);
192 call_dbus (DBusBusType type,
199 DBusGConnection *connection;
200 GError *error = NULL;
204 connection = dbus_g_bus_get (type,
206 if (connection == NULL)
208 show_message (error->message);
209 g_error_free (error);
213 proxy = dbus_g_proxy_new_for_name (connection, name, path, interface);
216 if (!dbus_g_proxy_call (proxy, method, &error,
217 G_TYPE_STRING, parameter,
221 show_message (error->message);
222 g_error_free (error);
227 show_browser (gchar *url)
229 call_dbus (DBUS_BUS_SESSION,
230 "com.nokia.osso_browser",
231 "/com/nokia/osso_browser/request",
232 "com.nokia.osso_browser",
237 typedef FilterResult (*ParseDoveCallback)(tower *details, gpointer data);
238 typedef void (*ButtonCallback)(void);
240 GtkWidget *tower_window, *buttons, *tower_table;
244 add_table_field (char *name,
251 g_object_get(tower_table, "n-rows", &row);
255 gtk_table_resize (GTK_TABLE (tower_table), row, 2);
257 label = GTK_LABEL (gtk_label_new (NULL));
258 str = g_strdup_printf("<b>%s</b>", name);
259 gtk_label_set_markup (label, str);
261 gtk_label_set_justify (label, GTK_JUSTIFY_RIGHT);
262 gtk_table_attach_defaults (GTK_TABLE (tower_table),
266 label = GTK_LABEL (gtk_label_new (value));
267 gtk_label_set_justify (label, GTK_JUSTIFY_LEFT);
268 gtk_table_attach_defaults (GTK_TABLE (tower_table),
274 add_button (char *label,
275 ButtonCallback callback)
279 button = gtk_button_new_with_label (label);
280 g_signal_connect (button, "clicked", G_CALLBACK (callback), NULL);
281 hildon_app_menu_append (menu, GTK_BUTTON (button));
282 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
283 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
285 g_signal_connect (button, "clicked", G_CALLBACK (callback), NULL);
286 gtk_box_pack_end (GTK_BOX (buttons), button, FALSE, FALSE, 0);
290 char *tower_displayed = NULL;
291 char *tower_website = NULL;
292 char *tower_map = NULL;
293 char *tower_directions = NULL;
294 char *peals_list = NULL;
296 #define BUTTON_BOOKMARKED_YES "Remove from bookmarks"
297 #define BUTTON_BOOKMARKED_NO "Bookmark"
300 bookmark_toggled (GtkButton *button,
303 if (g_key_file_get_boolean (config,
304 CONFIG_BOOKMARK_GROUP,
309 /* it's bookmarked; remove the bookmark */
311 if (!g_key_file_remove_key (config,
312 CONFIG_BOOKMARK_GROUP,
316 show_message ("Could not remove bookmark.");
321 gtk_button_set_label (button,
322 BUTTON_BOOKMARKED_NO);
326 /* it's not bookmarked; add a bookmark */
328 g_key_file_set_boolean (config,
329 CONFIG_BOOKMARK_GROUP,
334 gtk_button_set_label (button,
335 BUTTON_BOOKMARKED_YES);
340 show_tower_website (void)
342 show_browser (tower_website);
346 show_tower_map (void)
348 show_browser (tower_map);
352 show_peals_list (void)
354 show_browser (peals_list);
358 get_countries_cb (tower *details,
361 GHashTable *hash = (GHashTable *)data;
363 if (details->serial==0)
364 return TRUE; /* header row */
366 if (!g_hash_table_lookup_extended (hash,
367 details->fields[FieldCountry],
370 g_hash_table_insert (hash,
371 g_strdup(details->fields[FieldCountry]),
372 g_strdup (details->fields[FieldCountry]));
375 return FILTER_IGNORE;
386 } country_and_county;
389 get_counties_cb (tower *details,
392 country_cb_data *d = (country_cb_data *)data;
394 if (details->serial==0)
395 return FILTER_IGNORE; /* header row */
397 if (strcmp(details->fields[FieldCountry], d->country_name)!=0)
398 return FILTER_IGNORE; /* wrong country */
400 if (!g_hash_table_lookup_extended (d->hash,
401 details->fields[FieldCounty],
404 g_hash_table_insert (d->hash,
405 g_strdup(details->fields[FieldCounty]),
406 g_strdup (details->fields[FieldCounty]));
409 return FILTER_IGNORE;
413 get_nearby_towers_cb (tower *details,
416 if (details->serial==0)
417 return FILTER_IGNORE; /* header row */
419 if (distance_to_tower (details) < 50)
421 return FILTER_ACCEPT;
425 return FILTER_IGNORE;
430 get_towers_by_county_cb (tower *details,
433 country_and_county *cac = (country_and_county *) data;
435 if ((!cac->county || strcmp (cac->county, details->fields[FieldCounty])==0) &&
436 (!cac->country || strcmp (cac->country, details->fields[FieldCountry])==0))
438 return FILTER_ACCEPT;
442 return FILTER_IGNORE;
447 get_towers_by_search_cb (tower *details,
450 char *s = (char *) data;
452 if (strcasestr(details->fields[FieldCountry], s) ||
453 strcasestr(details->fields[FieldCounty], s) ||
454 strcasestr(details->fields[FieldDedication], s) ||
455 strcasestr(details->fields[FieldPlace], s))
457 return FILTER_ACCEPT;
461 return FILTER_IGNORE;
466 get_bookmarked_towers_cb (tower *details,
469 if (g_key_file_get_boolean (config,
470 CONFIG_BOOKMARK_GROUP,
471 details->fields[FieldPrimaryKey],
474 return FILTER_ACCEPT;
478 return FILTER_IGNORE;
483 single_tower_cb (tower *details,
487 GtkWidget *hbox, *button;
490 gchar *primary_key = (gchar*) data;
493 if (strcmp(details->fields[FieldPrimaryKey], primary_key)!=0)
495 /* not this one; keep going */
496 return FILTER_IGNORE;
499 tower_window = hildon_stackable_window_new ();
501 if (g_str_has_prefix (details->fields[FieldDedication],
504 /* FIXME: This needs to be cleverer, because we can have
505 * e.g. "S Peter and S Paul".
506 * May have to use regexps.
507 * Reallocation in general even when unchanged is okay,
508 * because it's the common case (most towers are S Something)
511 /* FIXME: Since we're passing this in as markup,
512 * we need to escape the strings.
515 str = g_strdup_printf("S<sup>t</sup> %s, %s",
516 details->fields[FieldDedication]+2,
517 details->fields[FieldPlace]);
522 str = g_strdup_printf("%s, %s",
523 details->fields[FieldDedication],
524 details->fields[FieldPlace]);
527 hildon_window_set_markup (HILDON_WINDOW (tower_window),
531 hbox = gtk_hbox_new (FALSE, 0);
532 tower_table = gtk_table_new (0, 2, FALSE);
533 buttons = gtk_vbox_new (TRUE, 0);
534 menu = HILDON_APP_MENU (hildon_app_menu_new ());
536 miles = distance_to_tower_str(details);
538 add_table_field ("Distance", miles);
539 add_table_field ("Postcode", details->fields[FieldPostcode]);
540 add_table_field ("County", details->fields[FieldCounty]);
541 add_table_field ("Country", details->fields[FieldCountry]);
542 add_table_field ("Diocese", details->fields[FieldDiocese]);
543 add_table_field ("Practice night", details->fields[FieldPracticeNight]);
544 add_table_field ("Bells", details->fields[FieldBells]);
548 tenor_weight = atoi (details->fields[FieldWt]);
549 str = g_strdup_printf("%dcwt %dqr %dlb in %s",
551 (tenor_weight % 112)/28,
553 details->fields[FieldNote]
555 add_table_field ("Tenor", str);
558 if (strcmp(details->fields[FieldWebPage], "")!=0)
560 add_button ("Tower website", show_tower_website);
562 add_button ("Peals", show_peals_list);
563 add_button ("Map", show_tower_map);
564 add_button ("Directions", NULL);
566 /* don't use a toggle button: it looks stupid */
567 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
568 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
569 g_key_file_get_boolean (config,
570 CONFIG_BOOKMARK_GROUP,
571 details->fields[FieldPrimaryKey],
573 BUTTON_BOOKMARKED_YES: BUTTON_BOOKMARKED_NO,
575 g_signal_connect (button, "clicked", G_CALLBACK (bookmark_toggled), NULL);
576 gtk_box_pack_start (GTK_BOX (buttons), button, FALSE, FALSE, 0);
578 gtk_widget_show_all (GTK_WIDGET (menu));
579 hildon_window_set_app_menu (HILDON_WINDOW (tower_window), menu);
581 gtk_box_pack_end (GTK_BOX (hbox), buttons, TRUE, TRUE, 0);
582 gtk_box_pack_end (GTK_BOX (hbox), tower_table, TRUE, TRUE, 0);
584 gtk_container_add (GTK_CONTAINER (tower_window), hbox);
586 g_free (tower_website);
587 tower_website = g_strdup_printf ("http://%s", details->fields[FieldWebPage]);
589 peals_list = g_strdup_printf ("http://www.pealbase.ismysite.co.uk/felstead/tbid.php?tid=%s",
590 details->fields[FieldTowerBase]);
592 tower_map = g_strdup_printf ("http://maps.google.com/maps?q=%s,%s",
593 details->fields[FieldLat],
594 details->fields[FieldLong]);
595 g_free (tower_displayed);
596 tower_displayed = g_strdup (details->fields[FieldPrimaryKey]);
598 gtk_widget_show_all (GTK_WIDGET (tower_window));
604 * A tower that was accepted by a filter.
613 found_tower_new (tower *basis)
615 FoundTower* result = g_new (FoundTower, 1);
617 result->sortkey = g_strdup (basis->fields[FieldPrimaryKey]);
618 result->primarykey = g_strdup (basis->fields[FieldPrimaryKey]);
620 if (device->fix->fields & LOCATION_GPS_DEVICE_LATLONG_SET)
622 gchar *distance = distance_to_tower_str (basis);
623 result->displayname = g_strdup_printf ("%s, %s (%s, %s) (%s)",
624 basis->fields[FieldDedication],
625 basis->fields[FieldPlace],
626 basis->fields[FieldBells],
627 basis->fields[FieldPracticeNight],
633 result->displayname = g_strdup_printf ("%s, %s (%s, %s)",
634 basis->fields[FieldDedication],
635 basis->fields[FieldPlace],
636 basis->fields[FieldBells],
637 basis->fields[FieldPracticeNight]);
644 found_tower_free (FoundTower *tower)
646 g_free (tower->sortkey);
647 g_free (tower->primarykey);
648 g_free (tower->displayname);
653 parse_dove (ParseDoveCallback callback,
654 GSList **filter_results,
657 FILE *dove = fopen("/usr/share/belltower/dove.txt", "r");
658 char tower_rec[4096];
661 gboolean seen_newline;
665 show_message ("Cannot open Dove database!");
671 while (fgets (tower_rec, sizeof (tower_rec), dove))
673 seen_newline = FALSE;
674 result.fields[0] = tower_rec;
676 for (i=tower_rec; *i; i++) {
681 if (*i=='\\' || *i=='\n')
685 result.fields[result.n_fields] = i+1;
691 /* keep it simple, stupid */
692 show_message ("Line too long, cannot continue.");
696 if (strcmp (result.fields[FieldCountry], "")==0)
698 result.fields[FieldCountry] = "England";
701 switch (callback (&result, data))
714 *filter_results = g_slist_append (*filter_results,
715 found_tower_new (&result));
726 show_tower (char *primary_key)
728 parse_dove (single_tower_cb, NULL, primary_key);
732 show_towers_from_list (GSList *list)
742 hildon_banner_show_information(window,
750 /* only one; don't bother showing the list */
751 FoundTower* found = (FoundTower*) list->data;
753 hildon_banner_show_information(window,
756 show_tower (found->primarykey);
758 /* FIXME: and free the list */
762 dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
763 selector = hildon_touch_selector_new_text ();
765 for (cursor=list; cursor; cursor=cursor->next)
767 FoundTower* found = (FoundTower*) cursor->data;
768 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
772 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
773 HILDON_TOUCH_SELECTOR (selector));
775 gtk_widget_show_all (GTK_WIDGET (dialog));
777 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
779 GList *rows = hildon_touch_selector_get_selected_rows (HILDON_TOUCH_SELECTOR (selector),
781 GtkTreePath *path = (GtkTreePath*) rows->data;
782 gint *indices = gtk_tree_path_get_indices (path);
787 gtk_widget_destroy (GTK_WIDGET (dialog));
791 FoundTower *found = (FoundTower *) g_slist_nth_data (list, result);
792 show_tower (found->primarykey);
795 /* FIXME: and free the list */
798 static gint strcmp_f (gconstpointer a,
801 return strcmp ((char*)a, (char*)b);
805 put_areas_into_list (gpointer key,
809 GSList **list = (GSList **)data;
810 *list = g_slist_insert_sorted (*list,
818 GSList *matches = NULL;
820 if (!(device->fix->fields & LOCATION_GPS_DEVICE_LATLONG_SET))
822 show_message ("I don't know where you are!");
826 parse_dove (get_nearby_towers_cb,
830 show_towers_from_list (matches);
834 towers_by_subarea (gchar *area)
836 GtkWidget *dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
837 GtkWidget *selector = hildon_touch_selector_new_text ();
838 GHashTable *hash = g_hash_table_new_full (g_str_hash,
842 GSList *list=NULL, *cursor;
843 gchar *title = g_strdup_printf ("Areas of %s", area);
844 country_cb_data d = { hash, area };
845 country_and_county cac = { area, NULL };
847 gtk_window_set_title (GTK_WINDOW (dialog), title);
850 parse_dove (get_counties_cb, NULL, &d);
852 g_hash_table_foreach (hash,
856 for (cursor=list; cursor; cursor=cursor->next)
858 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
862 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
863 HILDON_TOUCH_SELECTOR (selector));
865 gtk_widget_show_all (GTK_WIDGET (dialog));
867 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
869 GSList *matches = NULL;
870 cac.county = strdup (hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector)));
872 parse_dove (get_towers_by_county_cb,
877 show_towers_from_list (matches);
879 g_hash_table_unref (hash);
880 gtk_widget_destroy (GTK_WIDGET (dialog));
884 towers_by_area (void)
886 GtkWidget *dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
887 GtkWidget *selector = hildon_touch_selector_new_text ();
888 GHashTable *hash = g_hash_table_new_full (g_str_hash,
892 GSList *list = NULL, *cursor;
893 gchar *result = NULL;
895 gtk_window_set_title (GTK_WINDOW (dialog), "Areas of the world");
897 parse_dove (get_countries_cb, NULL, hash);
899 g_hash_table_foreach (hash,
903 for (cursor=list; cursor; cursor=cursor->next)
905 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
909 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
910 HILDON_TOUCH_SELECTOR (selector));
912 gtk_widget_show_all (GTK_WIDGET (dialog));
914 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
916 result = g_strdup (hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector)));
918 g_hash_table_unref (hash);
919 gtk_widget_destroy (GTK_WIDGET (dialog));
923 towers_by_subarea (result);
929 show_bookmarks (void)
931 GSList *matches = NULL;
933 parse_dove (get_bookmarked_towers_cb,
937 show_towers_from_list (matches);
943 GtkWidget *terms = gtk_dialog_new_with_buttons ("What are you looking for?",
945 GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
949 GtkWidget *entry = gtk_entry_new ();
950 GSList *matches = NULL;
952 gtk_box_pack_end (GTK_BOX (GTK_DIALOG (terms)->vbox),
953 entry, TRUE, TRUE, 0);
955 gtk_widget_show_all (GTK_WIDGET (terms));
957 if (gtk_dialog_run (GTK_DIALOG (terms))==GTK_RESPONSE_OK)
959 GSList *matches = NULL;
961 parse_dove (get_towers_by_search_cb,
963 (char*) gtk_entry_get_text (GTK_ENTRY (entry)));
965 show_towers_from_list (matches);
968 gtk_widget_destroy (GTK_WIDGET (terms));
974 show_message ("This is not yet implemented.");
978 * Displays a web page.
979 * (Perhaps this should be merged with show_browser().)
981 * \param url The URL.
984 show_web_page (GtkButton *dummy,
993 * \param source If non-null, we were called from a button press,
994 * so always show the credits. If null, we were called
995 * automatically on startup, so show the credits if
996 * they haven't already been seen.
999 show_credits (GtkButton *source,
1002 gboolean from_button = (source!=NULL);
1003 GtkWidget *dialog, *label, *button;
1006 g_key_file_get_boolean (config,
1007 CONFIG_GENERAL_GROUP,
1008 CONFIG_SEEN_CREDITS_KEY,
1015 dialog = gtk_dialog_new_with_buttons ("Credits",
1016 GTK_WINDOW (window),
1017 GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
1021 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1022 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1023 "View the GNU General Public Licence",
1024 "This program is provided under the GPL, with no warranty.");
1025 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1026 "www.gnu.org/copyleft/gpl.html");
1027 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1031 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1032 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1033 "View Dove's Guide for Church Bell Ringers",
1034 "The source of this program's data.");
1035 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1036 "http://dove.cccbr.org.uk");
1037 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1041 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1042 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1043 "View belfry photograph",
1044 "Image \xc2\xa9 Amanda Slater, cc-by-sa.");
1045 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1046 "http://www.flickr.com/photos/pikerslanefarm/3398769335/");
1047 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1051 gtk_widget_show_all (GTK_WIDGET (dialog));
1053 g_key_file_set_boolean (config,
1054 CONFIG_GENERAL_GROUP,
1055 CONFIG_SEEN_CREDITS_KEY,
1061 main(int argc, char **argv)
1063 GtkWidget *bell, *button, *hbox;
1064 GdkPixbuf *bell_picture;
1066 gtk_init (&argc, &argv);
1067 g_set_application_name ("Belltower");
1069 device = g_object_new (LOCATION_TYPE_GPS_DEVICE, NULL);
1071 window = hildon_stackable_window_new ();
1072 gtk_window_set_title (GTK_WINDOW (window), "Belltower");
1073 g_signal_connect (G_OBJECT (window), "delete_event", G_CALLBACK (gtk_main_quit), NULL);
1075 bell_picture = gdk_pixbuf_new_from_file ("/usr/share/belltower/bells1.jpg", NULL);
1077 buttons = gtk_vbox_new (TRUE, 0);
1078 menu = HILDON_APP_MENU (hildon_app_menu_new ());
1080 add_button ("Nearby", nearby_towers);
1081 add_button ("Recent", recent_towers);
1082 add_button ("Bookmarks", show_bookmarks);
1083 add_button ("By area", towers_by_area);
1084 add_button ("Search", tower_search);
1086 /* extra buttons for the app menu */
1087 button = gtk_button_new_with_label ("Credits");
1088 g_signal_connect (button, "clicked", G_CALLBACK (show_credits), NULL);
1089 hildon_app_menu_append (menu, GTK_BUTTON (button));
1091 gtk_widget_show_all (GTK_WIDGET (menu));
1092 hildon_window_set_app_menu (HILDON_WINDOW (window), menu);
1094 hbox = gtk_hbox_new (FALSE, 0);
1095 gtk_box_pack_end (GTK_BOX (hbox), buttons, TRUE, TRUE, 0);
1096 gtk_box_pack_end (GTK_BOX (hbox),
1097 gtk_image_new_from_pixbuf (bell_picture),
1100 gtk_container_add (GTK_CONTAINER (window), hbox);
1101 gtk_widget_show_all (GTK_WIDGET (window));
1104 show_credits (NULL, NULL);
1108 return EXIT_SUCCESS;