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_DISTANCES_KEY "Distances"
23 #define CONFIG_TOWERSORT_KEY "Towersort"
24 #define CONFIG_BOOKMARK_GROUP "Bookmarks"
25 #define CONFIG_RECENT_GROUP "Recent"
26 #define CONFIG_SEEN_CREDITS_KEY "seen_credits"
27 #define CONFIG_DIRECTORY "/home/user/.config/belltower"
28 #define CONFIG_FILENAME CONFIG_DIRECTORY "/belltower.ini"
31 * Somewhat arbitrary minimum number of belltowers in
32 * one country for the country to be considered to have
35 #define MANY_BELLTOWERS 10
37 char *distances_settings[] = {
39 "Distances are measured in...",
45 char *towersort_settings[] = {
47 "Towers are sorted by...",
50 "Days until practice night",
61 gint settings_value[G_N_ELEMENTS (settings)] = { 0, };
82 LocationGPSDevice *device;
83 GKeyFile *static_content;
87 /** stop scanning the database */
89 /** ignore this one */
91 /** add this one to the list */
97 We should really do this by looking at the header row of the table.
98 They might decide to put in new columns some day.
145 char* fields[MAX_FIELDS];
149 static void show_towers_from_list (GSList *list, gchar *list_name);
150 static void free_tower_list (GSList *list);
153 show_message (char *message)
155 HildonNote* note = HILDON_NOTE
156 (hildon_note_new_information (GTK_WINDOW (window),
158 "Some message was supposed to be here."));
159 gtk_dialog_run (GTK_DIALOG (note));
160 gtk_widget_destroy (GTK_WIDGET (note));
164 * Loads the content of the static and dynamic data files.
165 * Possibly puts up a warning if we can't load the static file.
172 static_content = g_key_file_new ();
174 if (!g_key_file_load_from_file (static_content,
175 "/usr/share/belltower/static.ini",
179 show_message ("Could not load static content. Attempting to continue.");
182 config = g_key_file_new ();
183 /* it doesn't matter if this fails */
184 g_key_file_load_from_file (config,
186 G_KEY_FILE_KEEP_COMMENTS,
189 for (i=0; i<G_N_ELEMENTS (settings); i++)
191 gchar *value = g_key_file_get_string (config,
192 CONFIG_GENERAL_GROUP,
196 settings_value[i] = 0;
201 char **cursor = settings[i]+2;
205 if (strcmp (value, *cursor)==0)
207 settings_value[i] = j;
218 * Saves the dynamic data file to disk.
219 * Puts up a message if there was any error.
226 g_mkdir_with_parents (CONFIG_DIRECTORY, 0700);
228 data = g_key_file_to_data (config, NULL, NULL);
230 if (!g_file_set_contents (CONFIG_FILENAME,
235 show_message ("Could not write config file.");
242 distance_to_tower (tower *details)
248 const double km_to_miles = 1.609344;
250 tower_lat = strtod(details->fields[FieldLat], &endptr);
251 if (*endptr) return -1;
252 tower_long = strtod(details->fields[FieldLong], &endptr);
253 if (*endptr) return -1;
255 km_distance = location_distance_between (device->fix->latitude,
256 device->fix->longitude,
259 if (settings_value[SETTINGS_DISTANCES]==DISTANCES_KILOMETRES)
260 return (int) km_distance;
262 return (int) (km_distance / km_to_miles);
266 distance_to_tower_str (tower *details)
268 int distance = distance_to_tower (details);
272 return g_strdup ("unknown");
274 else if (settings_value[SETTINGS_DISTANCES]==DISTANCES_KILOMETRES)
276 return g_strdup_printf("%dkm", (int) distance);
280 return g_strdup_printf("%dmi", (int) distance);
285 * Returns the number of days from today until
286 * the tower's practice night. If the tower's
287 * practice night is unknown, returns 9: this
288 * means that such towers always sort to the end.
291 days_until_practice_night (tower *details)
293 /* let's not use the date parsing routines, because
294 * we might get confused by locales, and the day names
295 * used in Dove are constant
297 time_t now = time (NULL);
298 struct tm *calendar = localtime (&now);
299 const char* dove_days = "SunMonTueWedThuFriSat";
303 if (strcmp (details->fields[FieldPracticeNight], "")==0)
309 found = strstr (dove_days, details->fields[FieldPracticeNight]);
316 practice_night = (found-dove_days)/3;
318 return ((practice_night+7)-calendar->tm_wday)%7;
322 call_dbus (DBusBusType type,
329 DBusGConnection *connection;
330 GError *error = NULL;
334 connection = dbus_g_bus_get (type,
336 if (connection == NULL)
338 show_message (error->message);
339 g_error_free (error);
343 proxy = dbus_g_proxy_new_for_name (connection, name, path, interface);
346 if (!dbus_g_proxy_call (proxy, method, &error,
347 G_TYPE_STRING, parameter,
351 show_message (error->message);
352 g_error_free (error);
357 show_browser (gchar *url)
359 call_dbus (DBUS_BUS_SESSION,
360 "com.nokia.osso_browser",
361 "/com/nokia/osso_browser/request",
362 "com.nokia.osso_browser",
367 typedef FilterResult (*ParseDoveCallback)(tower *details, gpointer data);
368 typedef void (*ButtonCallback)(void);
370 GtkWidget *tower_window, *buttons, *tower_table;
374 add_table_field (char *name,
381 g_object_get(tower_table, "n-rows", &row);
385 gtk_table_resize (GTK_TABLE (tower_table), row, 2);
387 label = GTK_LABEL (gtk_label_new (NULL));
388 str = g_strdup_printf("<b>%s</b>", name);
389 gtk_label_set_markup (label, str);
391 gtk_label_set_justify (label, GTK_JUSTIFY_RIGHT);
392 gtk_table_attach_defaults (GTK_TABLE (tower_table),
396 label = GTK_LABEL (gtk_label_new (value));
397 gtk_label_set_justify (label, GTK_JUSTIFY_LEFT);
398 gtk_table_attach_defaults (GTK_TABLE (tower_table),
404 add_button (char *label,
405 ButtonCallback callback)
409 button = gtk_button_new_with_label (label);
410 g_signal_connect (button, "clicked", G_CALLBACK (callback), NULL);
411 hildon_app_menu_append (menu, GTK_BUTTON (button));
412 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
413 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
415 g_signal_connect (button, "clicked", G_CALLBACK (callback), NULL);
416 gtk_box_pack_end (GTK_BOX (buttons), button, FALSE, FALSE, 0);
420 char *tower_displayed = NULL;
421 char *tower_website = NULL;
422 char *tower_map = NULL;
423 char *tower_directions = NULL;
424 char *peals_list = NULL;
426 #define BUTTON_BOOKMARKED_YES "Remove from bookmarks"
427 #define BUTTON_BOOKMARKED_NO "Bookmark"
430 bookmark_toggled (GtkButton *button,
433 if (g_key_file_get_boolean (config,
434 CONFIG_BOOKMARK_GROUP,
439 /* it's bookmarked; remove the bookmark */
441 if (!g_key_file_remove_key (config,
442 CONFIG_BOOKMARK_GROUP,
446 show_message ("Could not remove bookmark.");
451 gtk_button_set_label (button,
452 BUTTON_BOOKMARKED_NO);
456 /* it's not bookmarked; add a bookmark */
458 g_key_file_set_boolean (config,
459 CONFIG_BOOKMARK_GROUP,
464 gtk_button_set_label (button,
465 BUTTON_BOOKMARKED_YES);
470 show_tower_website (void)
472 show_browser (tower_website);
476 show_tower_map (void)
478 show_browser (tower_map);
482 show_tower_directions (void)
484 if (tower_directions)
486 show_browser (tower_directions);
490 show_message ("I don't know where you are!");
495 show_peals_list (void)
497 show_browser (peals_list);
501 get_countries_cb (tower *details,
504 GHashTable *hash = (GHashTable *)data;
507 if (details->serial==0)
508 return TRUE; /* header row */
510 if (!g_hash_table_lookup_extended (hash,
511 details->fields[FieldCountry],
514 g_hash_table_insert (hash,
515 g_strdup(details->fields[FieldCountry]),
516 GINT_TO_POINTER (0));
520 g_hash_table_replace (hash,
521 g_strdup(details->fields[FieldCountry]),
522 GINT_TO_POINTER (GPOINTER_TO_INT (value)+1));
525 return FILTER_IGNORE;
536 } country_and_county;
539 get_counties_cb (tower *details,
542 country_cb_data *d = (country_cb_data *)data;
544 if (details->serial==0)
545 return FILTER_IGNORE; /* header row */
547 if (strcmp(details->fields[FieldCountry], d->country_name)!=0)
548 return FILTER_IGNORE; /* wrong country */
550 if (!g_hash_table_lookup_extended (d->hash,
551 details->fields[FieldCounty],
554 g_hash_table_insert (d->hash,
555 g_strdup(details->fields[FieldCounty]),
556 g_strdup (details->fields[FieldCounty]));
559 return FILTER_IGNORE;
563 get_nearby_towers_cb (tower *details,
566 if (details->serial==0)
567 return FILTER_IGNORE; /* header row */
569 if (distance_to_tower (details) <= GPOINTER_TO_INT (distance))
571 return FILTER_ACCEPT;
575 return FILTER_IGNORE;
580 get_towers_by_county_cb (tower *details,
583 country_and_county *cac = (country_and_county *) data;
585 if ((!cac->county || strcmp (cac->county, details->fields[FieldCounty])==0) &&
586 (!cac->country || strcmp (cac->country, details->fields[FieldCountry])==0))
588 return FILTER_ACCEPT;
592 return FILTER_IGNORE;
597 get_towers_by_search_cb (tower *details,
600 char *s = (char *) data;
602 if (strcasestr(details->fields[FieldCountry], s) ||
603 strcasestr(details->fields[FieldCounty], s) ||
604 strcasestr(details->fields[FieldDedication], s) ||
605 strcasestr(details->fields[FieldPlace], s))
607 return FILTER_ACCEPT;
611 return FILTER_IGNORE;
616 * A filter which accepts towers based on whether they
617 * appear in a particular group in the config file.
619 * \param details the candidate tower
620 * \param data pointer to a char* which names the group
623 get_group_of_towers_cb (tower *details,
626 if (g_key_file_has_key (config,
628 details->fields[FieldPrimaryKey],
631 return FILTER_ACCEPT;
635 return FILTER_IGNORE;
640 * Removes the oldest entry from the [Recent] group in the config
641 * file until there are only five entries left. Does not save
642 * the file; you have to do that.
645 remove_old_recent_entries (void)
652 gint oldest_date = 0;
653 gchar *oldest_tower = NULL;
656 /* It is a bit inefficient to do this every
657 * time we go around the loop. However, it
658 * makes the code far simpler, and we almost
659 * never go around more than once.
661 towers = g_key_file_get_keys (config,
666 if (count <= MAX_RECENT)
667 /* everything's fine */
670 for (i=0; i<count; i++)
672 gint date = g_key_file_get_integer (config,
680 if (oldest_date==0 ||
683 oldest_tower = towers[i];
690 g_key_file_remove_key (config,
698 while (count > MAX_RECENT);
702 single_tower_cb (tower *details,
706 GtkWidget *hbox, *button;
709 gchar *primary_key = (gchar*) data;
712 if (strcmp(details->fields[FieldPrimaryKey], primary_key)!=0)
714 /* not this one; keep going */
715 return FILTER_IGNORE;
718 tower_window = hildon_stackable_window_new ();
720 str = g_strdup_printf("%s, %s",
721 details->fields[FieldDedication],
722 details->fields[FieldPlace]);
724 hildon_window_set_markup (HILDON_WINDOW (tower_window),
728 hbox = gtk_hbox_new (FALSE, 0);
729 tower_table = gtk_table_new (0, 2, FALSE);
730 buttons = gtk_vbox_new (TRUE, 0);
731 menu = HILDON_APP_MENU (hildon_app_menu_new ());
733 distance = distance_to_tower_str(details);
735 add_table_field ("Distance", distance);
736 add_table_field ("Postcode", details->fields[FieldPostcode]);
737 add_table_field ("County", details->fields[FieldCounty]);
738 add_table_field ("Country", details->fields[FieldCountry]);
739 add_table_field ("Diocese", details->fields[FieldDiocese]);
740 add_table_field ("Practice night", details->fields[FieldPracticeNight]);
741 add_table_field ("Bells", details->fields[FieldBells]);
745 tenor_weight = atoi (details->fields[FieldWt]);
746 str = g_strdup_printf("%dcwt %dqr %dlb in %s",
748 (tenor_weight % 112)/28,
750 details->fields[FieldNote]
752 add_table_field ("Tenor", str);
755 if (strcmp(details->fields[FieldWebPage], "")!=0)
757 add_button ("Tower website", show_tower_website);
759 add_button ("Peals", show_peals_list);
760 add_button ("Map", show_tower_map);
761 add_button ("Directions", show_tower_directions);
763 /* don't use a toggle button: it looks stupid */
764 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
765 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
766 g_key_file_get_boolean (config,
767 CONFIG_BOOKMARK_GROUP,
768 details->fields[FieldPrimaryKey],
770 BUTTON_BOOKMARKED_YES: BUTTON_BOOKMARKED_NO,
772 g_signal_connect (button, "clicked", G_CALLBACK (bookmark_toggled), NULL);
773 gtk_box_pack_start (GTK_BOX (buttons), button, FALSE, FALSE, 0);
775 gtk_widget_show_all (GTK_WIDGET (menu));
776 hildon_window_set_app_menu (HILDON_WINDOW (tower_window), menu);
778 gtk_box_pack_end (GTK_BOX (hbox), buttons, TRUE, TRUE, 0);
779 gtk_box_pack_end (GTK_BOX (hbox), tower_table, TRUE, TRUE, 0);
781 gtk_container_add (GTK_CONTAINER (tower_window), hbox);
783 g_free (tower_website);
784 tower_website = g_strdup_printf ("http://%s", details->fields[FieldWebPage]);
786 peals_list = g_strdup_printf ("http://www.pealbase.ismysite.co.uk/felstead/tbid.php?tid=%s",
787 details->fields[FieldTowerBase]);
789 tower_map = g_strdup_printf ("http://maps.google.com/maps?q=%s,%s",
790 details->fields[FieldLat],
791 details->fields[FieldLong]);
792 g_free (tower_directions);
793 if (device->fix->fields & LOCATION_GPS_DEVICE_LATLONG_SET)
795 tower_directions = g_strdup_printf ("http://maps.google.com/maps?q=%f,%f+to+%s,%s",
796 device->fix->latitude,
797 device->fix->longitude,
798 details->fields[FieldLat],
799 details->fields[FieldLong]);
801 g_free (tower_displayed);
802 tower_displayed = g_strdup (details->fields[FieldPrimaryKey]);
804 g_key_file_set_integer (config,
808 remove_old_recent_entries ();
811 gtk_widget_show_all (GTK_WIDGET (tower_window));
817 * A tower that was accepted by a filter.
826 found_tower_new (tower *basis)
828 FoundTower* result = g_new (FoundTower, 1);
830 switch (settings_value[SETTINGS_TOWERSORT])
832 case TOWERSORT_DISTANCE:
833 result->sortkey = g_strdup_printf ("%5d %s",
834 distance_to_tower (basis),
835 basis->fields[FieldPlace]);
837 case TOWERSORT_PRACTICE:
838 result->sortkey = g_strdup_printf ("%d %s",
839 days_until_practice_night (basis),
840 basis->fields[FieldPlace]);
842 case TOWERSORT_BELLS:
843 result->sortkey = g_strdup_printf ("%10s", basis->fields[FieldBells]);
845 case TOWERSORT_WEIGHT:
846 result->sortkey = g_strdup_printf ("%10s", basis->fields[FieldWt]);
850 result->sortkey = g_strdup (basis->fields[FieldPlace]);
853 result->primarykey = g_strdup (basis->fields[FieldPrimaryKey]);
855 if (device->fix->fields & LOCATION_GPS_DEVICE_LATLONG_SET)
857 gchar *distance = distance_to_tower_str (basis);
858 result->displayname = g_strdup_printf ("%s, %s (%s, %s) (%s)",
859 basis->fields[FieldDedication],
860 basis->fields[FieldPlace],
861 basis->fields[FieldBells],
862 basis->fields[FieldPracticeNight],
868 result->displayname = g_strdup_printf ("%s, %s (%s, %s)",
869 basis->fields[FieldDedication],
870 basis->fields[FieldPlace],
871 basis->fields[FieldBells],
872 basis->fields[FieldPracticeNight]);
879 found_tower_free (FoundTower *tower)
881 g_free (tower->sortkey);
882 g_free (tower->primarykey);
883 g_free (tower->displayname);
888 * Comparison function for FoundTower objects.
890 * \param a a FoundTower
891 * \param b another FoundTower
893 gint found_tower_compare (gconstpointer a,
896 FoundTower *fta = (FoundTower *)a;
897 FoundTower *ftb = (FoundTower *)b;
899 return strcmp (fta->sortkey, ftb->sortkey);
903 * Calls a given function once for each tower in the world.
904 * (The first call, however, is a header row.)
906 * \param callback The function to call.
907 * \param data Arbitrary data to pass to the callback.
908 * \param dialogue_title If non-NULL, a list will be displayed
909 * with the results. This is the title
910 * used for that dialogue. (The dialogue
911 * will automatically free filter_results.)
914 parse_dove (ParseDoveCallback callback,
916 gchar *dialogue_title)
918 FILE *dove = fopen("/usr/share/belltower/dove.txt", "r");
919 char tower_rec[4096];
922 gboolean seen_newline;
923 GSList *filter_results = NULL;
927 show_message ("Cannot open Dove database!");
933 while (fgets (tower_rec, sizeof (tower_rec), dove))
935 seen_newline = FALSE;
936 result.fields[0] = tower_rec;
938 for (i=tower_rec; *i; i++) {
943 if (*i=='\\' || *i=='\n')
947 result.fields[result.n_fields] = i+1;
953 /* keep it simple, stupid */
954 show_message ("Line too long, cannot continue.");
958 if (strcmp (result.fields[FieldCountry], "")==0)
960 result.fields[FieldCountry] = "England";
963 switch (callback (&result, data))
974 filter_results = g_slist_insert_sorted (filter_results,
975 found_tower_new (&result),
976 found_tower_compare);
986 show_towers_from_list (filter_results,
991 free_tower_list (filter_results);
996 show_tower (char *primary_key)
998 parse_dove (single_tower_cb, primary_key, NULL);
1002 free_tower_list (GSList *list)
1004 GSList *cursor = list;
1008 found_tower_free ((FoundTower*) cursor->data);
1009 cursor = cursor->next;
1012 g_slist_free (list);
1016 * Displays a list of towers for the user to choose from.
1017 * When one is chosen, we go to the display page for that tower.
1018 * If there are none, this will tell the user there were none.
1019 * If there is only one, we go straight to its display page.
1021 * \param list a GSList of FoundTower objects.
1022 * \param list_name the title for the dialogue.
1025 show_towers_from_list (GSList *list,
1029 GtkWidget *selector;
1035 hildon_banner_show_information(window,
1037 "No towers found.");
1043 /* only one; don't bother showing the list */
1044 FoundTower* found = (FoundTower*) list->data;
1046 hildon_banner_show_information(window,
1048 "One tower found.");
1049 show_tower (found->primarykey);
1051 free_tower_list (list);
1055 dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
1056 selector = hildon_touch_selector_new_text ();
1057 gtk_window_set_title (GTK_WINDOW (dialog), list_name);
1059 for (cursor=list; cursor; cursor=cursor->next)
1061 FoundTower* found = (FoundTower*) cursor->data;
1062 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
1063 found->displayname);
1066 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
1067 HILDON_TOUCH_SELECTOR (selector));
1069 gtk_widget_show_all (GTK_WIDGET (dialog));
1071 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
1073 GList *rows = hildon_touch_selector_get_selected_rows (HILDON_TOUCH_SELECTOR (selector),
1075 GtkTreePath *path = (GtkTreePath*) rows->data;
1076 gint *indices = gtk_tree_path_get_indices (path);
1081 gtk_widget_destroy (GTK_WIDGET (dialog));
1085 FoundTower *found = (FoundTower *) g_slist_nth_data (list, result);
1086 show_tower (found->primarykey);
1089 free_tower_list (list);
1092 static gint strcmp_f (gconstpointer a,
1095 return strcmp ((char*)a, (char*)b);
1099 put_areas_into_list (gpointer key,
1103 GSList **list = (GSList **)data;
1104 *list = g_slist_insert_sorted (*list,
1110 nearby_towers (void)
1112 if (!(device->fix->fields & LOCATION_GPS_DEVICE_LATLONG_SET))
1114 show_message ("I don't know where you are!");
1118 parse_dove (get_nearby_towers_cb,
1119 settings_value[SETTINGS_DISTANCES]==DISTANCES_KILOMETRES?
1120 GINT_TO_POINTER (80) :
1121 GINT_TO_POINTER (50),
1122 settings_value[SETTINGS_DISTANCES]==DISTANCES_KILOMETRES?
1123 "Towers within eighty kilometres of you":
1124 "Towers within fifty miles of you");
1128 towers_by_subarea (gchar *area)
1130 GtkWidget *dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
1131 GtkWidget *selector = hildon_touch_selector_new_text ();
1132 GHashTable *hash = g_hash_table_new_full (g_str_hash,
1136 GSList *list=NULL, *cursor;
1137 gchar *title = g_strdup_printf ("Areas of %s", area);
1138 country_cb_data d = { hash, area };
1139 country_and_county cac = { area, NULL };
1141 gtk_window_set_title (GTK_WINDOW (dialog), title);
1144 parse_dove (get_counties_cb, &d, NULL);
1146 g_hash_table_foreach (hash,
1147 put_areas_into_list,
1150 for (cursor=list; cursor; cursor=cursor->next)
1152 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
1156 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
1157 HILDON_TOUCH_SELECTOR (selector));
1159 gtk_widget_show_all (GTK_WIDGET (dialog));
1161 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
1164 cac.county = g_strdup (hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector)));
1165 title = g_strdup_printf ("Towers in %s",
1168 parse_dove (get_towers_by_county_cb,
1171 g_free (cac.county);
1174 g_hash_table_unref (hash);
1175 gtk_widget_destroy (GTK_WIDGET (dialog));
1179 * Maps a hash table from country names to counts of belltowers to a
1180 * newly-created hash table mapping country names to display
1181 * names, containing only those countries which have many
1182 * (or few) belltowers.
1184 * \param source the source table
1185 * \param want_many true if you want countries with many belltowers;
1186 * false if you want countries with few.
1189 get_countries_with_many (GHashTable *source,
1192 GHashTable *result = g_hash_table_new_full (g_str_hash,
1196 GList *countries = g_hash_table_get_keys (source);
1197 GList *cursor = countries;
1202 GPOINTER_TO_INT (g_hash_table_lookup (source,
1203 cursor->data)) >= MANY_BELLTOWERS;
1205 if (has_many == want_many)
1207 g_hash_table_insert (result,
1208 g_strdup (cursor->data),
1209 g_strdup (cursor->data));
1212 cursor = cursor->next;
1215 g_list_free (countries);
1219 #define COUNTRIES_WITH_MANY "Countries with many belltowers"
1220 #define COUNTRIES_WITH_FEW "Countries with few belltowers"
1223 * Displays a list of areas of the world with many (or few)
1224 * belltowers. If you ask for the areas with many, it include
1225 * a link to the areas with few.
1227 * \param countries_with_many True to list countries with many;
1228 * false to list countries with few.
1231 towers_by_area_with_many (gboolean countries_with_many)
1233 GtkWidget *dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
1234 GtkWidget *selector = hildon_touch_selector_new_text ();
1235 GHashTable *countries_to_counts = g_hash_table_new_full (g_str_hash,
1239 GHashTable *country_names;
1240 GSList *list = NULL, *cursor;
1241 gchar *result = NULL;
1243 gtk_window_set_title (GTK_WINDOW (dialog),
1244 countries_with_many?
1245 COUNTRIES_WITH_MANY : COUNTRIES_WITH_FEW);
1247 parse_dove (get_countries_cb, countries_to_counts, NULL);
1249 country_names = get_countries_with_many (countries_to_counts,
1250 countries_with_many);
1252 g_hash_table_foreach (country_names,
1253 put_areas_into_list,
1256 for (cursor=list; cursor; cursor=cursor->next)
1258 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
1262 if (countries_with_many)
1264 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
1265 COUNTRIES_WITH_FEW);
1268 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
1269 HILDON_TOUCH_SELECTOR (selector));
1271 gtk_widget_show_all (GTK_WIDGET (dialog));
1273 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
1275 result = g_strdup (hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector)));
1278 g_hash_table_unref (countries_to_counts);
1279 g_hash_table_unref (country_names);
1280 gtk_widget_destroy (GTK_WIDGET (dialog));
1284 if (countries_with_many)
1286 /* these countries have many towers, so
1287 * show the sub-areas
1289 if (strcmp (result, COUNTRIES_WITH_FEW)==0)
1290 towers_by_area_with_many (FALSE);
1292 towers_by_subarea (result);
1296 country_and_county cac = { result, NULL };
1297 gchar *title = g_strdup_printf ("Belltowers in %s",
1300 parse_dove (get_towers_by_county_cb,
1312 * Shows all the towers in areas with many towers.
1315 towers_by_area (void)
1317 towers_by_area_with_many (TRUE);
1321 show_bookmarks (void)
1323 parse_dove (get_group_of_towers_cb,
1324 CONFIG_BOOKMARK_GROUP,
1331 GtkWidget *terms = gtk_dialog_new_with_buttons ("What are you looking for?",
1332 GTK_WINDOW (window),
1333 GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
1337 GtkWidget *entry = gtk_entry_new ();
1339 gtk_box_pack_end (GTK_BOX (GTK_DIALOG (terms)->vbox),
1340 entry, TRUE, TRUE, 0);
1342 gtk_widget_show_all (GTK_WIDGET (terms));
1344 if (gtk_dialog_run (GTK_DIALOG (terms))==GTK_RESPONSE_OK)
1346 parse_dove (get_towers_by_search_cb,
1347 (char*) gtk_entry_get_text (GTK_ENTRY (entry)),
1351 gtk_widget_destroy (GTK_WIDGET (terms));
1355 recent_towers (void)
1357 parse_dove (get_group_of_towers_cb,
1358 CONFIG_RECENT_GROUP,
1359 "Towers you have recently viewed");
1363 * Displays a web page.
1364 * (Perhaps this should be merged with show_browser().)
1366 * \param url The URL.
1369 show_web_page (GtkButton *dummy,
1376 * Shows the credits.
1378 * \param source If non-null, we were called from a button press,
1379 * so always show the credits. If null, we were called
1380 * automatically on startup, so show the credits if
1381 * they haven't already been seen.
1384 show_credits (GtkButton *source,
1387 gboolean from_button = (source!=NULL);
1388 GtkWidget *dialog, *label, *button;
1391 g_key_file_get_boolean (config,
1392 CONFIG_GENERAL_GROUP,
1393 CONFIG_SEEN_CREDITS_KEY,
1400 dialog = gtk_dialog_new_with_buttons ("Credits",
1401 GTK_WINDOW (window),
1402 GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
1406 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1407 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1408 "Welcome to Belltower. The program is \xc2\xa9 2009 Thomas Thurman.",
1409 "View the program's home page.");
1410 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1411 "http://belltower.garage.maemo.org");
1412 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1416 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1417 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1418 "This program is provided under the GNU GPL, with no warranty.",
1419 "View the GNU General Public Licence.");
1420 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1421 "http://www.gnu.org/copyleft/gpl.html");
1422 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1426 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1427 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1428 "The data comes from Dove's Guide for Church Bell Ringers.",
1429 "View Dove's Guide.");
1430 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1431 "http://dove.cccbr.org.uk");
1432 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1436 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
1437 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
1438 "The belfry image is \xc2\xa9 Amanda Slater, cc-by-sa.",
1439 "View the original photograph.");
1440 g_signal_connect (button, "clicked", G_CALLBACK (show_web_page),
1441 "http://www.flickr.com/photos/pikerslanefarm/3398769335/");
1442 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1446 gtk_widget_show_all (GTK_WIDGET (dialog));
1448 g_key_file_set_boolean (config,
1449 CONFIG_GENERAL_GROUP,
1450 CONFIG_SEEN_CREDITS_KEY,
1456 settings_dialogue (void)
1458 GtkWidget *dialog, *button;
1459 GtkWidget *selector[G_N_ELEMENTS (settings)];
1462 dialog = gtk_dialog_new_with_buttons ("Settings",
1463 GTK_WINDOW (window),
1464 GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
1468 for (i=0; i<G_N_ELEMENTS (settings); i++)
1470 char **cursor = settings[i]+2;
1471 selector[i] = hildon_touch_selector_new_text ();
1475 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector[i]), *cursor);
1479 hildon_touch_selector_set_active (HILDON_TOUCH_SELECTOR (selector[i]), 0, settings_value[i]);
1481 button = hildon_picker_button_new (HILDON_SIZE_AUTO, HILDON_BUTTON_ARRANGEMENT_VERTICAL);
1482 hildon_button_set_title (HILDON_BUTTON (button), settings[i][1]);
1483 hildon_picker_button_set_selector (HILDON_PICKER_BUTTON (button),
1484 HILDON_TOUCH_SELECTOR (selector[i]));
1485 gtk_box_pack_start (GTK_BOX (GTK_DIALOG (dialog)->vbox),
1490 gtk_widget_show_all (GTK_WIDGET (GTK_DIALOG(dialog)->vbox));
1491 gtk_dialog_run (GTK_DIALOG (dialog));
1493 for (i=0; i<G_N_ELEMENTS (settings); i++)
1495 GList *rows = hildon_touch_selector_get_selected_rows (HILDON_TOUCH_SELECTOR (selector[i]),
1497 GtkTreePath *path = (GtkTreePath*) rows->data;
1498 gint *indices = gtk_tree_path_get_indices (path);
1500 g_key_file_set_string (config,
1501 CONFIG_GENERAL_GROUP,
1503 hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector[i])));
1505 settings_value[i] = *indices;
1509 gtk_widget_destroy (GTK_WIDGET (dialog));
1513 main(int argc, char **argv)
1515 GtkWidget *bell, *button, *hbox;
1516 GdkPixbuf *bell_picture;
1518 gtk_init (&argc, &argv);
1519 g_set_application_name ("Belltower");
1521 device = g_object_new (LOCATION_TYPE_GPS_DEVICE, NULL);
1523 window = hildon_stackable_window_new ();
1524 gtk_window_set_title (GTK_WINDOW (window), "Belltower");
1525 g_signal_connect (G_OBJECT (window), "delete_event", G_CALLBACK (gtk_main_quit), NULL);
1527 bell_picture = gdk_pixbuf_new_from_file ("/usr/share/belltower/bells1.jpg", NULL);
1529 buttons = gtk_vbox_new (TRUE, 0);
1530 menu = HILDON_APP_MENU (hildon_app_menu_new ());
1532 add_button ("Nearby", nearby_towers);
1533 add_button ("Recent", recent_towers);
1534 add_button ("Bookmarks", show_bookmarks);
1535 add_button ("By area", towers_by_area);
1536 add_button ("Search", tower_search);
1537 /* This won't be a button on the main screen
1538 * for always, but we'll put it there for now
1539 * to work around a hildon bug.
1541 add_button ("Settings", settings_dialogue);
1543 /* extra buttons for the app menu */
1544 button = gtk_button_new_with_label ("Credits");
1545 g_signal_connect (button, "clicked", G_CALLBACK (show_credits), NULL);
1546 hildon_app_menu_append (menu, GTK_BUTTON (button));
1548 gtk_widget_show_all (GTK_WIDGET (menu));
1549 hildon_window_set_app_menu (HILDON_WINDOW (window), menu);
1551 hbox = gtk_hbox_new (FALSE, 0);
1552 gtk_box_pack_end (GTK_BOX (hbox), buttons, TRUE, TRUE, 0);
1553 gtk_box_pack_end (GTK_BOX (hbox),
1554 gtk_image_new_from_pixbuf (bell_picture),
1557 gtk_container_add (GTK_CONTAINER (window), hbox);
1558 gtk_widget_show_all (GTK_WIDGET (window));
1561 show_credits (NULL, NULL);
1565 return EXIT_SUCCESS;