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>
21 #define CONFIG_GENERAL_GROUP "General"
22 #define CONFIG_BOOKMARK_GROUP "Bookmarks"
23 #define CONFIG_RECENT_GROUP "Recent"
24 #define CONFIG_SEEN_CREDITS_KEY "seen_credits"
25 #define CONFIG_DIRECTORY "/home/user/.config/belltower"
26 #define CONFIG_FILENAME CONFIG_DIRECTORY "/belltower.ini"
29 * Somewhat arbitrary minimum number of belltowers in
30 * one country for the country to be considered to have
33 #define MANY_BELLTOWERS 10
36 LocationGPSDevice *device;
37 GKeyFile *static_content;
41 /** stop scanning the database */
43 /** ignore this one */
45 /** add this one to the list */
51 We should really do this by looking at the header row of the table.
52 They might decide to put in new columns some day.
99 char* fields[MAX_FIELDS];
103 static void show_towers_from_list (GSList *list, gchar *list_name);
104 static void free_tower_list (GSList *list);
107 show_message (char *message)
109 HildonNote* note = HILDON_NOTE
110 (hildon_note_new_information (GTK_WINDOW (window),
112 "Some message was supposed to be here."));
113 gtk_dialog_run (GTK_DIALOG (note));
114 gtk_widget_destroy (GTK_WIDGET (note));
118 * Loads the content of the static and dynamic data files.
119 * Possibly puts up a warning if we can't load the static file.
124 static_content = g_key_file_new ();
126 if (!g_key_file_load_from_file (static_content,
127 "/usr/share/belltower/static.ini",
131 show_message ("Could not load static content. Attempting to continue.");
134 config = g_key_file_new ();
135 /* it doesn't matter if this fails */
136 g_key_file_load_from_file (config,
138 G_KEY_FILE_KEEP_COMMENTS,
143 * Saves the dynamic data file to disk.
144 * Puts up a message if there was any error.
151 g_mkdir_with_parents (CONFIG_DIRECTORY, 0700);
153 data = g_key_file_to_data (config, NULL, NULL);
155 if (!g_file_set_contents (CONFIG_FILENAME,
160 show_message ("Could not write config file.");
167 distance_to_tower (tower *details)
173 const double km_to_miles = 1.609344;
175 tower_lat = strtod(details->fields[FieldLat], &endptr);
176 if (*endptr) return -1;
177 tower_long = strtod(details->fields[FieldLong], &endptr);
178 if (*endptr) return -1;
180 km_distance = location_distance_between (device->fix->latitude,
181 device->fix->longitude,
185 return (int) (km_distance / km_to_miles);
189 distance_to_tower_str (tower *details)
191 int miles = distance_to_tower (details);
195 return g_strdup ("unknown");
199 return g_strdup_printf("%dmi", (int) miles);
204 call_dbus (DBusBusType type,
211 DBusGConnection *connection;
212 GError *error = NULL;
216 connection = dbus_g_bus_get (type,
218 if (connection == NULL)
220 show_message (error->message);
221 g_error_free (error);
225 proxy = dbus_g_proxy_new_for_name (connection, name, path, interface);
228 if (!dbus_g_proxy_call (proxy, method, &error,
229 G_TYPE_STRING, parameter,
233 show_message (error->message);
234 g_error_free (error);
239 show_browser (gchar *url)
241 call_dbus (DBUS_BUS_SESSION,
242 "com.nokia.osso_browser",
243 "/com/nokia/osso_browser/request",
244 "com.nokia.osso_browser",
249 typedef FilterResult (*ParseDoveCallback)(tower *details, gpointer data);
250 typedef void (*ButtonCallback)(void);
252 GtkWidget *tower_window, *buttons, *tower_table;
256 add_table_field (char *name,
263 g_object_get(tower_table, "n-rows", &row);
267 gtk_table_resize (GTK_TABLE (tower_table), row, 2);
269 label = GTK_LABEL (gtk_label_new (NULL));
270 str = g_strdup_printf("<b>%s</b>", name);
271 gtk_label_set_markup (label, str);
273 gtk_label_set_justify (label, GTK_JUSTIFY_RIGHT);
274 gtk_table_attach_defaults (GTK_TABLE (tower_table),
278 label = GTK_LABEL (gtk_label_new (value));
279 gtk_label_set_justify (label, GTK_JUSTIFY_LEFT);
280 gtk_table_attach_defaults (GTK_TABLE (tower_table),
286 add_button (char *label,
287 ButtonCallback callback)
291 button = gtk_button_new_with_label (label);
292 g_signal_connect (button, "clicked", G_CALLBACK (callback), NULL);
293 hildon_app_menu_append (menu, GTK_BUTTON (button));
294 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
295 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
297 g_signal_connect (button, "clicked", G_CALLBACK (callback), NULL);
298 gtk_box_pack_end (GTK_BOX (buttons), button, FALSE, FALSE, 0);
302 char *tower_displayed = NULL;
303 char *tower_website = NULL;
304 char *tower_map = NULL;
305 char *tower_directions = NULL;
306 char *peals_list = NULL;
308 #define BUTTON_BOOKMARKED_YES "Remove from bookmarks"
309 #define BUTTON_BOOKMARKED_NO "Bookmark"
312 bookmark_toggled (GtkButton *button,
315 if (g_key_file_get_boolean (config,
316 CONFIG_BOOKMARK_GROUP,
321 /* it's bookmarked; remove the bookmark */
323 if (!g_key_file_remove_key (config,
324 CONFIG_BOOKMARK_GROUP,
328 show_message ("Could not remove bookmark.");
333 gtk_button_set_label (button,
334 BUTTON_BOOKMARKED_NO);
338 /* it's not bookmarked; add a bookmark */
340 g_key_file_set_boolean (config,
341 CONFIG_BOOKMARK_GROUP,
346 gtk_button_set_label (button,
347 BUTTON_BOOKMARKED_YES);
352 show_tower_website (void)
354 show_browser (tower_website);
358 show_tower_map (void)
360 show_browser (tower_map);
364 show_peals_list (void)
366 show_browser (peals_list);
370 get_countries_cb (tower *details,
373 GHashTable *hash = (GHashTable *)data;
376 if (details->serial==0)
377 return TRUE; /* header row */
379 if (!g_hash_table_lookup_extended (hash,
380 details->fields[FieldCountry],
383 g_hash_table_insert (hash,
384 g_strdup(details->fields[FieldCountry]),
385 GINT_TO_POINTER (0));
389 g_hash_table_replace (hash,
390 g_strdup(details->fields[FieldCountry]),
391 GINT_TO_POINTER (GPOINTER_TO_INT (value)+1));
394 return FILTER_IGNORE;
405 } country_and_county;
408 get_counties_cb (tower *details,
411 country_cb_data *d = (country_cb_data *)data;
413 if (details->serial==0)
414 return FILTER_IGNORE; /* header row */
416 if (strcmp(details->fields[FieldCountry], d->country_name)!=0)
417 return FILTER_IGNORE; /* wrong country */
419 if (!g_hash_table_lookup_extended (d->hash,
420 details->fields[FieldCounty],
423 g_hash_table_insert (d->hash,
424 g_strdup(details->fields[FieldCounty]),
425 g_strdup (details->fields[FieldCounty]));
428 return FILTER_IGNORE;
432 get_nearby_towers_cb (tower *details,
435 if (details->serial==0)
436 return FILTER_IGNORE; /* header row */
438 if (distance_to_tower (details) < 50)
440 return FILTER_ACCEPT;
444 return FILTER_IGNORE;
449 get_towers_by_county_cb (tower *details,
452 country_and_county *cac = (country_and_county *) data;
454 if ((!cac->county || strcmp (cac->county, details->fields[FieldCounty])==0) &&
455 (!cac->country || strcmp (cac->country, details->fields[FieldCountry])==0))
457 return FILTER_ACCEPT;
461 return FILTER_IGNORE;
466 get_towers_by_search_cb (tower *details,
469 char *s = (char *) data;
471 if (strcasestr(details->fields[FieldCountry], s) ||
472 strcasestr(details->fields[FieldCounty], s) ||
473 strcasestr(details->fields[FieldDedication], s) ||
474 strcasestr(details->fields[FieldPlace], s))
476 return FILTER_ACCEPT;
480 return FILTER_IGNORE;
485 * A filter which accepts towers based on whether they
486 * appear in a particular group in the config file.
488 * \param details the candidate tower
489 * \param data pointer to a char* which names the group
492 get_group_of_towers_cb (tower *details,
495 if (g_key_file_has_key (config,
497 details->fields[FieldPrimaryKey],
500 return FILTER_ACCEPT;
504 return FILTER_IGNORE;
509 * Removes the oldest entry from the [Recent] group in the config
510 * file until there are only five entries left. Does not save
511 * the file; you have to do that.
514 remove_old_recent_entries (void)
521 gint oldest_date = 0;
522 gchar *oldest_tower = NULL;
525 /* It is a bit inefficient to do this every
526 * time we go around the loop. However, it
527 * makes the code far simpler, and we almost
528 * never go around more than once.
530 towers = g_key_file_get_keys (config,
535 if (count <= MAX_RECENT)
536 /* everything's fine */
539 for (i=0; i<count; i++)
541 gint date = g_key_file_get_integer (config,
549 if (oldest_date==0 ||
552 oldest_tower = towers[i];
559 g_key_file_remove_key (config,
567 while (count > MAX_RECENT);
571 single_tower_cb (tower *details,
575 GtkWidget *hbox, *button;
578 gchar *primary_key = (gchar*) data;
581 if (strcmp(details->fields[FieldPrimaryKey], primary_key)!=0)
583 /* not this one; keep going */
584 return FILTER_IGNORE;
587 tower_window = hildon_stackable_window_new ();
589 if (g_str_has_prefix (details->fields[FieldDedication],
592 /* FIXME: This needs to be cleverer, because we can have
593 * e.g. "S Peter and S Paul".
594 * May have to use regexps.
595 * Reallocation in general even when unchanged is okay,
596 * because it's the common case (most towers are S Something)
599 /* FIXME: Since we're passing this in as markup,
600 * we need to escape the strings.
603 str = g_strdup_printf("S<sup>t</sup> %s, %s",
604 details->fields[FieldDedication]+2,
605 details->fields[FieldPlace]);
610 str = g_strdup_printf("%s, %s",
611 details->fields[FieldDedication],
612 details->fields[FieldPlace]);
615 hildon_window_set_markup (HILDON_WINDOW (tower_window),
619 hbox = gtk_hbox_new (FALSE, 0);
620 tower_table = gtk_table_new (0, 2, FALSE);
621 buttons = gtk_vbox_new (TRUE, 0);
622 menu = HILDON_APP_MENU (hildon_app_menu_new ());
624 miles = distance_to_tower_str(details);
626 add_table_field ("Distance", miles);
627 add_table_field ("Postcode", details->fields[FieldPostcode]);
628 add_table_field ("County", details->fields[FieldCounty]);
629 add_table_field ("Country", details->fields[FieldCountry]);
630 add_table_field ("Diocese", details->fields[FieldDiocese]);
631 add_table_field ("Practice night", details->fields[FieldPracticeNight]);
632 add_table_field ("Bells", details->fields[FieldBells]);
636 tenor_weight = atoi (details->fields[FieldWt]);
637 str = g_strdup_printf("%dcwt %dqr %dlb in %s",
639 (tenor_weight % 112)/28,
641 details->fields[FieldNote]
643 add_table_field ("Tenor", str);
646 if (strcmp(details->fields[FieldWebPage], "")!=0)
648 add_button ("Tower website", show_tower_website);
650 add_button ("Peals", show_peals_list);
651 add_button ("Map", show_tower_map);
652 add_button ("Directions", NULL);
654 /* don't use a toggle button: it looks stupid */
655 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
656 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
657 g_key_file_get_boolean (config,
658 CONFIG_BOOKMARK_GROUP,
659 details->fields[FieldPrimaryKey],
661 BUTTON_BOOKMARKED_YES: BUTTON_BOOKMARKED_NO,
663 g_signal_connect (button, "clicked", G_CALLBACK (bookmark_toggled), NULL);
664 gtk_box_pack_start (GTK_BOX (buttons), button, FALSE, FALSE, 0);
666 gtk_widget_show_all (GTK_WIDGET (menu));
667 hildon_window_set_app_menu (HILDON_WINDOW (tower_window), menu);
669 gtk_box_pack_end (GTK_BOX (hbox), buttons, TRUE, TRUE, 0);
670 gtk_box_pack_end (GTK_BOX (hbox), tower_table, TRUE, TRUE, 0);
672 gtk_container_add (GTK_CONTAINER (tower_window), hbox);
674 g_free (tower_website);
675 tower_website = g_strdup_printf ("http://%s", details->fields[FieldWebPage]);
677 peals_list = g_strdup_printf ("http://www.pealbase.ismysite.co.uk/felstead/tbid.php?tid=%s",
678 details->fields[FieldTowerBase]);
680 tower_map = g_strdup_printf ("http://maps.google.com/maps?q=%s,%s",
681 details->fields[FieldLat],
682 details->fields[FieldLong]);
683 g_free (tower_displayed);
684 tower_displayed = g_strdup (details->fields[FieldPrimaryKey]);
686 g_key_file_set_integer (config,
690 remove_old_recent_entries ();
693 gtk_widget_show_all (GTK_WIDGET (tower_window));
699 * A tower that was accepted by a filter.
708 found_tower_new (tower *basis)
710 FoundTower* result = g_new (FoundTower, 1);
712 result->sortkey = g_strdup (basis->fields[FieldPrimaryKey]);
713 result->primarykey = g_strdup (basis->fields[FieldPrimaryKey]);
715 if (device->fix->fields & LOCATION_GPS_DEVICE_LATLONG_SET)
717 gchar *distance = distance_to_tower_str (basis);
718 result->displayname = g_strdup_printf ("%s, %s (%s, %s) (%s)",
719 basis->fields[FieldDedication],
720 basis->fields[FieldPlace],
721 basis->fields[FieldBells],
722 basis->fields[FieldPracticeNight],
728 result->displayname = g_strdup_printf ("%s, %s (%s, %s)",
729 basis->fields[FieldDedication],
730 basis->fields[FieldPlace],
731 basis->fields[FieldBells],
732 basis->fields[FieldPracticeNight]);
739 found_tower_free (FoundTower *tower)
741 g_free (tower->sortkey);
742 g_free (tower->primarykey);
743 g_free (tower->displayname);
748 * Calls a given function once for each tower in the world.
749 * (The first call, however, is a header row.)
751 * \param callback The function to call.
752 * \param data Arbitrary data to pass to the callback.
753 * \param dialogue_title If non-NULL, a list will be displayed
754 * with the results. This is the title
755 * used for that dialogue. (The dialogue
756 * will automatically free filter_results.)
759 parse_dove (ParseDoveCallback callback,
761 gchar *dialogue_title)
763 FILE *dove = fopen("/usr/share/belltower/dove.txt", "r");
764 char tower_rec[4096];
767 gboolean seen_newline;
768 GSList *filter_results = NULL;
772 show_message ("Cannot open Dove database!");
778 while (fgets (tower_rec, sizeof (tower_rec), dove))
780 seen_newline = FALSE;
781 result.fields[0] = tower_rec;
783 for (i=tower_rec; *i; i++) {
788 if (*i=='\\' || *i=='\n')
792 result.fields[result.n_fields] = i+1;
798 /* keep it simple, stupid */
799 show_message ("Line too long, cannot continue.");
803 if (strcmp (result.fields[FieldCountry], "")==0)
805 result.fields[FieldCountry] = "England";
808 switch (callback (&result, data))
819 filter_results = g_slist_append (filter_results,
820 found_tower_new (&result));
830 show_towers_from_list (filter_results,
835 free_tower_list (filter_results);
840 show_tower (char *primary_key)
842 parse_dove (single_tower_cb, primary_key, NULL);
846 free_tower_list (GSList *list)
848 GSList *cursor = list;
852 found_tower_free ((FoundTower*) cursor->data);
853 cursor = cursor->next;
860 * Displays a list of towers for the user to choose from.
861 * When one is chosen, we go to the display page for that tower.
862 * If there are none, this will tell the user there were none.
863 * If there is only one, we go straight to its display page.
865 * \param list a GSList of FoundTower objects.
866 * \param list_name the title for the dialogue.
869 show_towers_from_list (GSList *list,
879 hildon_banner_show_information(window,
887 /* only one; don't bother showing the list */
888 FoundTower* found = (FoundTower*) list->data;
890 hildon_banner_show_information(window,
893 show_tower (found->primarykey);
895 free_tower_list (list);
899 dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
900 selector = hildon_touch_selector_new_text ();
901 gtk_window_set_title (GTK_WINDOW (dialog), list_name);
903 for (cursor=list; cursor; cursor=cursor->next)
905 FoundTower* found = (FoundTower*) cursor->data;
906 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
910 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
911 HILDON_TOUCH_SELECTOR (selector));
913 gtk_widget_show_all (GTK_WIDGET (dialog));
915 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
917 GList *rows = hildon_touch_selector_get_selected_rows (HILDON_TOUCH_SELECTOR (selector),
919 GtkTreePath *path = (GtkTreePath*) rows->data;
920 gint *indices = gtk_tree_path_get_indices (path);
925 gtk_widget_destroy (GTK_WIDGET (dialog));
929 FoundTower *found = (FoundTower *) g_slist_nth_data (list, result);
930 show_tower (found->primarykey);
933 free_tower_list (list);
936 static gint strcmp_f (gconstpointer a,
939 return strcmp ((char*)a, (char*)b);
943 put_areas_into_list (gpointer key,
947 GSList **list = (GSList **)data;
948 *list = g_slist_insert_sorted (*list,
956 if (!(device->fix->fields & LOCATION_GPS_DEVICE_LATLONG_SET))
958 show_message ("I don't know where you are!");
962 parse_dove (get_nearby_towers_cb,
964 "Towers within fifty miles of you");
968 towers_by_subarea (gchar *area)
970 GtkWidget *dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
971 GtkWidget *selector = hildon_touch_selector_new_text ();
972 GHashTable *hash = g_hash_table_new_full (g_str_hash,
976 GSList *list=NULL, *cursor;
977 gchar *title = g_strdup_printf ("Areas of %s", area);
978 country_cb_data d = { hash, area };
979 country_and_county cac = { area, NULL };
981 gtk_window_set_title (GTK_WINDOW (dialog), title);
984 parse_dove (get_counties_cb, &d, NULL);
986 g_hash_table_foreach (hash,
990 for (cursor=list; cursor; cursor=cursor->next)
992 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
996 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
997 HILDON_TOUCH_SELECTOR (selector));
999 gtk_widget_show_all (GTK_WIDGET (dialog));
1001 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
1004 cac.county = g_strdup (hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector)));
1005 title = g_strdup_printf ("Towers in %s",
1008 parse_dove (get_towers_by_county_cb,
1011 g_free (cac.county);
1014 g_hash_table_unref (hash);
1015 gtk_widget_destroy (GTK_WIDGET (dialog));
1019 * Maps a hash table from country names to counts of belltowers to a
1020 * newly-created hash table mapping country names to display
1021 * names, containing only those countries which have many
1022 * (or few) belltowers.
1024 * \param source the source table
1025 * \param want_many true if you want countries with many belltowers;
1026 * false if you want countries with few.
1029 get_countries_with_many (GHashTable *source,
1032 GHashTable *result = g_hash_table_new_full (g_str_hash,
1036 GList *countries = g_hash_table_get_keys (source);
1037 GList *cursor = countries;
1042 GPOINTER_TO_INT (g_hash_table_lookup (source,
1043 cursor->data)) >= MANY_BELLTOWERS;
1045 if (has_many == want_many)
1047 g_hash_table_insert (result,
1048 g_strdup (cursor->data),
1049 g_strdup (cursor->data));
1052 cursor = cursor->next;
1055 g_list_free (countries);
1059 #define COUNTRIES_WITH_MANY "Countries with many belltowers"
1060 #define COUNTRIES_WITH_FEW "Countries with few belltowers"
1063 * Displays a list of areas of the world with many (or few)
1064 * belltowers. If you ask for the areas with many, it include
1065 * a link to the areas with few.
1067 * \param countries_with_many True to list countries with many;
1068 * false to list countries with few.
1071 towers_by_area_with_many (gboolean countries_with_many)
1073 GtkWidget *dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
1074 GtkWidget *selector = hildon_touch_selector_new_text ();
1075 GHashTable *countries_to_counts = g_hash_table_new_full (g_str_hash,
1079 GHashTable *country_names;
1080 GSList *list = NULL, *cursor;
1081 gchar *result = NULL;
1083 gtk_window_set_title (GTK_WINDOW (dialog),
1084 countries_with_many?
1085 COUNTRIES_WITH_MANY : COUNTRIES_WITH_FEW);
1087 parse_dove (get_countries_cb, countries_to_counts, NULL);
1089 country_names = get_countries_with_many (countries_to_counts,
1090 countries_with_many);
1092 g_hash_table_foreach (country_names,
1093 put_areas_into_list,
1096 for (cursor=list; cursor; cursor=cursor->next)
1098 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
1102 if (countries_with_many)
1104 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
1105 COUNTRIES_WITH_FEW);
1108 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
1109 HILDON_TOUCH_SELECTOR (selector));
1111 gtk_widget_show_all (GTK_WIDGET (dialog));
1113 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
1115 result = g_strdup (hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector)));
1118 g_hash_table_unref (countries_to_counts);
1119 g_hash_table_unref (country_names);
1120 gtk_widget_destroy (GTK_WIDGET (dialog));
1124 if (countries_with_many)
1126 /* these countries have many towers, so
1127 * show the sub-areas
1129 if (strcmp (result, COUNTRIES_WITH_FEW)==0)
1130 towers_by_area_with_many (FALSE);
1132 towers_by_subarea (result);
1136 country_and_county cac = { result, NULL };
1137 gchar *title = g_strdup_printf ("Belltowers in %s",
1140 parse_dove (get_towers_by_county_cb,
1152 * Shows all the towers in areas with many towers.
1155 towers_by_area (void)
1157 towers_by_area_with_many (TRUE);
1161 show_bookmarks (void)
1163 parse_dove (get_group_of_towers_cb,
1164 CONFIG_BOOKMARK_GROUP,
1171 GtkWidget *terms = gtk_dialog_new_with_buttons ("What are you looking for?",
1172 GTK_WINDOW (window),
1173 GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
1177 GtkWidget *entry = gtk_entry_new ();
1179 gtk_box_pack_end (GTK_BOX (GTK_DIALOG (terms)->vbox),
1180 entry, TRUE, TRUE, 0);
1182 gtk_widget_show_all (GTK_WIDGET (terms));
1184 if (gtk_dialog_run (GTK_DIALOG (terms))==GTK_RESPONSE_OK)
1186 parse_dove (get_towers_by_search_cb,
1187 (char*) gtk_entry_get_text (GTK_ENTRY (entry)),
1191 gtk_widget_destroy (GTK_WIDGET (terms));
1195 recent_towers (void)
1197 parse_dove (get_group_of_towers_cb,
1198 CONFIG_RECENT_GROUP,
1199 "Towers you have recently viewed");
1203 * Displays a web page.
1204 * (Perhaps this should be merged with show_browser().)
1206 * \param url The URL.
1209 show_web_page (GtkButton *dummy,
1216 * Shows the credits.
1218 * \param source If non-null, we were called from a button press,
1219 * so always show the credits. If null, we were called
1220 * automatically on startup, so show the credits if
1221 * they haven't already been seen.
1224 show_credits (GtkButton *source,
1227 gboolean from_button = (source!=NULL);
1228 GtkWidget *dialog, *label, *button;
1231 g_key_file_get_boolean (config,
1232 CONFIG_GENERAL_GROUP,
1233 CONFIG_SEEN_CREDITS_KEY,
1240 dialog = gtk_dialog_new_with_buttons ("Credits",
1241 GTK_WINDOW (window),
1242 GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
1246 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1247 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1248 "Welcome to Belltower. The program is \xc2\xa9 2009 Thomas Thurman.",
1249 "View the program's home page.");
1250 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1251 "http://belltower.garage.maemo.org");
1252 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1256 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1257 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1258 "This program is provided under the GNU GPL, with no warranty.",
1259 "View the GNU General Public Licence.");
1260 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1261 "http://www.gnu.org/copyleft/gpl.html");
1262 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1266 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1267 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1268 "The data comes from Dove's Guide for Church Bell Ringers.",
1269 "View Dove's Guide.");
1270 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1271 "http://dove.cccbr.org.uk");
1272 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1276 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1277 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1278 "The belfry image is \xc2\xa9 Amanda Slater, cc-by-sa.",
1279 "View the original photograph.");
1280 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1281 "http://www.flickr.com/photos/pikerslanefarm/3398769335/");
1282 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1286 gtk_widget_show_all (GTK_WIDGET (dialog));
1288 g_key_file_set_boolean (config,
1289 CONFIG_GENERAL_GROUP,
1290 CONFIG_SEEN_CREDITS_KEY,
1296 main(int argc, char **argv)
1298 GtkWidget *bell, *button, *hbox;
1299 GdkPixbuf *bell_picture;
1301 gtk_init (&argc, &argv);
1302 g_set_application_name ("Belltower");
1304 device = g_object_new (LOCATION_TYPE_GPS_DEVICE, NULL);
1306 window = hildon_stackable_window_new ();
1307 gtk_window_set_title (GTK_WINDOW (window), "Belltower");
1308 g_signal_connect (G_OBJECT (window), "delete_event", G_CALLBACK (gtk_main_quit), NULL);
1310 bell_picture = gdk_pixbuf_new_from_file ("/usr/share/belltower/bells1.jpg", NULL);
1312 buttons = gtk_vbox_new (TRUE, 0);
1313 menu = HILDON_APP_MENU (hildon_app_menu_new ());
1315 add_button ("Nearby", nearby_towers);
1316 add_button ("Recent", recent_towers);
1317 add_button ("Bookmarks", show_bookmarks);
1318 add_button ("By area", towers_by_area);
1319 add_button ("Search", tower_search);
1321 /* extra buttons for the app menu */
1322 button = gtk_button_new_with_label ("Credits");
1323 g_signal_connect (button, "clicked", G_CALLBACK (show_credits), NULL);
1324 hildon_app_menu_append (menu, GTK_BUTTON (button));
1326 gtk_widget_show_all (GTK_WIDGET (menu));
1327 hildon_window_set_app_menu (HILDON_WINDOW (window), menu);
1329 hbox = gtk_hbox_new (FALSE, 0);
1330 gtk_box_pack_end (GTK_BOX (hbox), buttons, TRUE, TRUE, 0);
1331 gtk_box_pack_end (GTK_BOX (hbox),
1332 gtk_image_new_from_pixbuf (bell_picture),
1335 gtk_container_add (GTK_CONTAINER (window), hbox);
1336 gtk_widget_show_all (GTK_WIDGET (window));
1339 show_credits (NULL, NULL);
1343 return EXIT_SUCCESS;