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>
23 LocationGPSDevice *device;
26 /** stop scanning the database */
28 /** ignore this one */
30 /** add this one to the list */
36 We should really do this by looking at the header row of the table.
37 They might decide to put in new columns some day.
84 char* fields[MAX_FIELDS];
89 show_message (char *message)
91 HildonNote* note = HILDON_NOTE
92 (hildon_note_new_information (GTK_WINDOW (window),
94 "Some message was supposed to be here."));
95 gtk_dialog_run (GTK_DIALOG (note));
96 gtk_widget_destroy (GTK_WIDGET (note));
100 distance_to_tower (tower *details)
106 const double km_to_miles = 1.609344;
108 tower_lat = strtod(details->fields[FieldLat], &endptr);
109 if (*endptr) return -1;
110 tower_long = strtod(details->fields[FieldLong], &endptr);
111 if (*endptr) return -1;
113 km_distance = location_distance_between (device->fix->latitude,
114 device->fix->longitude,
118 return (int) (km_distance / km_to_miles);
122 distance_to_tower_str (tower *details)
124 int miles = distance_to_tower (details);
128 return g_strdup ("unknown");
132 return g_strdup_printf("%dmi", (int) miles);
137 call_dbus (DBusBusType type,
144 DBusGConnection *connection;
145 GError *error = NULL;
149 connection = dbus_g_bus_get (type,
151 if (connection == NULL)
153 show_message (error->message);
154 g_error_free (error);
158 proxy = dbus_g_proxy_new_for_name (connection, name, path, interface);
161 if (!dbus_g_proxy_call (proxy, method, &error,
162 G_TYPE_STRING, parameter,
166 show_message (error->message);
167 g_error_free (error);
172 show_browser (gchar *url)
174 call_dbus (DBUS_BUS_SESSION,
175 "com.nokia.osso_browser",
176 "/com/nokia/osso_browser/request",
177 "com.nokia.osso_browser",
182 typedef FilterResult (*ParseDoveCallback)(tower *details, gpointer data);
183 typedef void (*ButtonCallback)(void);
185 GtkWidget *tower_window, *buttons, *tower_table;
189 add_table_field (char *name,
196 g_object_get(tower_table, "n-rows", &row);
200 gtk_table_resize (GTK_TABLE (tower_table), row, 2);
202 label = GTK_LABEL (gtk_label_new (NULL));
203 str = g_strdup_printf("<b>%s</b>", name);
204 gtk_label_set_markup (label, str);
206 gtk_label_set_justify (label, GTK_JUSTIFY_RIGHT);
207 gtk_table_attach_defaults (GTK_TABLE (tower_table),
211 label = GTK_LABEL (gtk_label_new (value));
212 gtk_label_set_justify (label, GTK_JUSTIFY_LEFT);
213 gtk_table_attach_defaults (GTK_TABLE (tower_table),
219 add_button (char *label,
220 ButtonCallback callback)
224 button = gtk_button_new_with_label (label);
225 g_signal_connect (button, "clicked", G_CALLBACK (callback), NULL);
226 hildon_app_menu_append (menu, GTK_BUTTON (button));
227 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
228 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
230 g_signal_connect (button, "clicked", G_CALLBACK (callback), NULL);
231 gtk_box_pack_end (GTK_BOX (buttons), button, FALSE, FALSE, 0);
236 bookmark_toggled (GtkButton *button,
239 show_message ("Bookmarks are not yet implemented.");
242 char *tower_website = NULL;
243 char *tower_map = NULL;
244 char *tower_directions = NULL;
245 char *peals_list = NULL;
248 show_tower_website (void)
250 show_browser (tower_website);
254 show_tower_map (void)
256 show_browser (tower_map);
260 show_peals_list (void)
262 show_browser (peals_list);
266 get_countries_cb (tower *details,
269 GHashTable *hash = (GHashTable *)data;
271 if (details->serial==0)
272 return TRUE; /* header row */
274 if (!g_hash_table_lookup_extended (hash,
275 details->fields[FieldCountry],
278 g_hash_table_insert (hash,
279 g_strdup(details->fields[FieldCountry]),
280 g_strdup (details->fields[FieldCountry]));
283 return FILTER_IGNORE;
294 } country_and_county;
297 get_counties_cb (tower *details,
300 country_cb_data *d = (country_cb_data *)data;
302 if (details->serial==0)
303 return FILTER_IGNORE; /* header row */
305 if (strcmp(details->fields[FieldCountry], d->country_name)!=0)
306 return FILTER_IGNORE; /* wrong country */
308 if (!g_hash_table_lookup_extended (d->hash,
309 details->fields[FieldCounty],
312 g_hash_table_insert (d->hash,
313 g_strdup(details->fields[FieldCounty]),
314 g_strdup (details->fields[FieldCounty]));
317 return FILTER_IGNORE;
321 get_nearby_towers_cb (tower *details,
324 if (details->serial==0)
325 return FILTER_IGNORE; /* header row */
327 if (distance_to_tower (details) < 50)
329 return FILTER_ACCEPT;
333 return FILTER_IGNORE;
338 get_towers_by_county_cb (tower *details,
341 country_and_county *cac = (country_and_county *) data;
343 if ((!cac->county || strcmp (cac->county, details->fields[FieldCounty])==0) &&
344 (!cac->country || strcmp (cac->country, details->fields[FieldCountry])==0))
346 return FILTER_ACCEPT;
350 return FILTER_IGNORE;
355 get_towers_by_search_cb (tower *details,
358 char *s = (char *) data;
360 if (strcasestr(details->fields[FieldCountry], s) ||
361 strcasestr(details->fields[FieldCounty], s) ||
362 strcasestr(details->fields[FieldDedication], s) ||
363 strcasestr(details->fields[FieldPlace], s))
365 return FILTER_ACCEPT;
369 return FILTER_IGNORE;
374 single_tower_cb (tower *details,
378 GtkWidget *hbox, *button;
381 gchar *primary_key = (gchar*) data;
384 if (strcmp(details->fields[FieldPrimaryKey], primary_key)!=0)
386 /* not this one; keep going */
387 return FILTER_IGNORE;
390 tower_window = hildon_stackable_window_new ();
392 if (g_str_has_prefix (details->fields[FieldDedication],
395 /* FIXME: This needs to be cleverer, because we can have
396 * e.g. "S Peter and S Paul".
397 * May have to use regexps.
398 * Reallocation in general even when unchanged is okay,
399 * because it's the common case (most towers are S Something)
402 /* FIXME: Since we're passing this in as markup,
403 * we need to escape the strings.
406 str = g_strdup_printf("S<sup>t</sup> %s, %s",
407 details->fields[FieldDedication]+2,
408 details->fields[FieldPlace]);
413 str = g_strdup_printf("%s, %s",
414 details->fields[FieldDedication],
415 details->fields[FieldPlace]);
418 hildon_window_set_markup (HILDON_WINDOW (tower_window),
422 hbox = gtk_hbox_new (FALSE, 0);
423 tower_table = gtk_table_new (0, 2, FALSE);
424 buttons = gtk_vbox_new (TRUE, 0);
425 menu = HILDON_APP_MENU (hildon_app_menu_new ());
427 miles = distance_to_tower_str(details);
429 add_table_field ("Distance", miles);
430 add_table_field ("Postcode", details->fields[FieldPostcode]);
431 add_table_field ("County", details->fields[FieldCounty]);
432 add_table_field ("Country", details->fields[FieldCountry]);
433 add_table_field ("Diocese", details->fields[FieldDiocese]);
434 add_table_field ("Practice night", details->fields[FieldPracticeNight]);
435 add_table_field ("Bells", details->fields[FieldBells]);
439 tenor_weight = atoi (details->fields[FieldWt]);
440 str = g_strdup_printf("%dcwt %dqr %dlb in %s",
442 (tenor_weight % 112)/28,
444 details->fields[FieldNote]
446 add_table_field ("Tenor", str);
449 if (strcmp(details->fields[FieldWebPage], "")!=0)
451 add_button ("Tower website", show_tower_website);
453 add_button ("Peals", show_peals_list);
454 add_button ("Map", show_tower_map);
455 add_button ("Directions", NULL);
457 /* don't use a toggle button: it looks stupid */
458 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
459 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
461 g_signal_connect (button, "clicked", G_CALLBACK (bookmark_toggled), NULL);
462 gtk_box_pack_start (GTK_BOX (buttons), button, FALSE, FALSE, 0);
464 gtk_widget_show_all (GTK_WIDGET (menu));
465 hildon_window_set_app_menu (HILDON_WINDOW (tower_window), menu);
467 gtk_box_pack_end (GTK_BOX (hbox), buttons, TRUE, TRUE, 0);
468 gtk_box_pack_end (GTK_BOX (hbox), tower_table, TRUE, TRUE, 0);
470 gtk_container_add (GTK_CONTAINER (tower_window), hbox);
472 g_free (tower_website);
473 tower_website = g_strdup_printf ("http://%s", details->fields[FieldWebPage]);
475 peals_list = g_strdup_printf ("http://www.pealbase.ismysite.co.uk/felstead/tbid.php?tid=%s",
476 details->fields[FieldTowerBase]);
478 tower_map = g_strdup_printf ("http://maps.google.com/maps?q=%s,%s",
479 details->fields[FieldLat],
480 details->fields[FieldLong]);
481 gtk_widget_show_all (GTK_WIDGET (tower_window));
487 * A tower that was accepted by a filter.
496 found_tower_new (tower *basis)
498 FoundTower* result = g_new (FoundTower, 1);
500 result->sortkey = g_strdup (basis->fields[FieldPrimaryKey]);
501 result->primarykey = g_strdup (basis->fields[FieldPrimaryKey]);
503 if (device->fix->fields & LOCATION_GPS_DEVICE_LATLONG_SET)
505 gchar *distance = distance_to_tower_str (basis);
506 result->displayname = g_strdup_printf ("%s, %s (%s, %s) (%s)",
507 basis->fields[FieldDedication],
508 basis->fields[FieldPlace],
509 basis->fields[FieldBells],
510 basis->fields[FieldPracticeNight],
516 result->displayname = g_strdup_printf ("%s, %s (%s, %s)",
517 basis->fields[FieldDedication],
518 basis->fields[FieldPlace],
519 basis->fields[FieldBells],
520 basis->fields[FieldPracticeNight]);
527 found_tower_free (FoundTower *tower)
529 g_free (tower->sortkey);
530 g_free (tower->primarykey);
531 g_free (tower->displayname);
536 parse_dove (ParseDoveCallback callback,
537 GSList **filter_results,
540 FILE *dove = fopen("/usr/share/belltower/dove.txt", "r");
541 char tower_rec[4096];
544 gboolean seen_newline;
548 show_message ("Cannot open Dove database!");
554 while (fgets (tower_rec, sizeof (tower_rec), dove))
556 seen_newline = FALSE;
557 result.fields[0] = tower_rec;
559 for (i=tower_rec; *i; i++) {
564 if (*i=='\\' || *i=='\n')
568 result.fields[result.n_fields] = i+1;
574 /* keep it simple, stupid */
575 show_message ("Line too long, cannot continue.");
579 if (strcmp (result.fields[FieldCountry], "")==0)
581 result.fields[FieldCountry] = "England";
584 switch (callback (&result, data))
597 *filter_results = g_slist_append (*filter_results,
598 found_tower_new (&result));
609 show_tower (char *primary_key)
611 parse_dove (single_tower_cb, NULL, primary_key);
615 show_towers_from_list (GSList *list)
625 hildon_banner_show_information(window,
633 /* only one; don't bother showing the list */
634 FoundTower* found = (FoundTower*) list->data;
636 hildon_banner_show_information(window,
639 show_tower (found->primarykey);
641 /* FIXME: and free the list */
645 dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
646 selector = hildon_touch_selector_new_text ();
648 for (cursor=list; cursor; cursor=cursor->next)
650 FoundTower* found = (FoundTower*) cursor->data;
651 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
655 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
656 HILDON_TOUCH_SELECTOR (selector));
658 gtk_widget_show_all (GTK_WIDGET (dialog));
660 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
662 GList *rows = hildon_touch_selector_get_selected_rows (HILDON_TOUCH_SELECTOR (selector),
664 GtkTreePath *path = (GtkTreePath*) rows->data;
665 gint *indices = gtk_tree_path_get_indices (path);
670 gtk_widget_destroy (GTK_WIDGET (dialog));
674 FoundTower *found = (FoundTower *) g_slist_nth_data (list, result);
675 show_tower (found->primarykey);
678 /* FIXME: and free the list */
681 static gint strcmp_f (gconstpointer a,
684 return strcmp ((char*)a, (char*)b);
688 put_areas_into_list (gpointer key,
692 GSList **list = (GSList **)data;
693 *list = g_slist_insert_sorted (*list,
701 GSList *matches = NULL;
703 if (!(device->fix->fields & LOCATION_GPS_DEVICE_LATLONG_SET))
705 show_message ("I don't know where you are!");
709 parse_dove (get_nearby_towers_cb,
713 show_towers_from_list (matches);
717 towers_by_subarea (gchar *area)
719 GtkWidget *dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
720 GtkWidget *selector = hildon_touch_selector_new_text ();
721 GHashTable *hash = g_hash_table_new_full (g_str_hash,
725 GSList *list=NULL, *cursor;
726 gchar *title = g_strdup_printf ("Areas of %s", area);
727 country_cb_data d = { hash, area };
728 country_and_county cac = { area, NULL };
730 gtk_window_set_title (GTK_WINDOW (dialog), title);
733 parse_dove (get_counties_cb, NULL, &d);
735 g_hash_table_foreach (hash,
739 for (cursor=list; cursor; cursor=cursor->next)
741 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
745 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
746 HILDON_TOUCH_SELECTOR (selector));
748 gtk_widget_show_all (GTK_WIDGET (dialog));
750 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
752 GSList *matches = NULL;
753 cac.county = strdup (hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector)));
755 parse_dove (get_towers_by_county_cb,
760 show_towers_from_list (matches);
762 g_hash_table_unref (hash);
763 gtk_widget_destroy (GTK_WIDGET (dialog));
767 towers_by_area (void)
769 GtkWidget *dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
770 GtkWidget *selector = hildon_touch_selector_new_text ();
771 GHashTable *hash = g_hash_table_new_full (g_str_hash,
775 GSList *list = NULL, *cursor;
776 gchar *result = NULL;
778 gtk_window_set_title (GTK_WINDOW (dialog), "Areas of the world");
780 parse_dove (get_countries_cb, NULL, hash);
782 g_hash_table_foreach (hash,
786 for (cursor=list; cursor; cursor=cursor->next)
788 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
792 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
793 HILDON_TOUCH_SELECTOR (selector));
795 gtk_widget_show_all (GTK_WIDGET (dialog));
797 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
799 result = g_strdup (hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector)));
801 g_hash_table_unref (hash);
802 gtk_widget_destroy (GTK_WIDGET (dialog));
806 towers_by_subarea (result);
812 show_bookmarks (void)
814 /* well, there are currently no bookmarks,
815 because you can't set them. */
817 show_towers_from_list (NULL);
823 GtkWidget *terms = gtk_dialog_new_with_buttons ("What are you looking for?",
825 GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
829 GtkWidget *entry = gtk_entry_new ();
830 GSList *matches = NULL;
832 gtk_box_pack_end (GTK_BOX (GTK_DIALOG (terms)->vbox),
833 entry, TRUE, TRUE, 0);
835 gtk_widget_show_all (GTK_WIDGET (terms));
837 if (gtk_dialog_run (GTK_DIALOG (terms))==GTK_RESPONSE_OK)
839 GSList *matches = NULL;
841 parse_dove (get_towers_by_search_cb,
843 (char*) gtk_entry_get_text (GTK_ENTRY (entry)));
845 show_towers_from_list (matches);
848 gtk_widget_destroy (GTK_WIDGET (terms));
854 show_message ("This is not yet implemented.");
858 main(int argc, char **argv)
860 GtkWidget *bell, *button, *hbox;
861 GdkPixbuf *bell_picture;
863 gtk_init (&argc, &argv);
864 g_set_application_name ("Belltower");
866 device = g_object_new (LOCATION_TYPE_GPS_DEVICE, NULL);
868 window = hildon_stackable_window_new ();
869 gtk_window_set_title (GTK_WINDOW (window), "Belltower");
870 g_signal_connect (G_OBJECT (window), "delete_event", G_CALLBACK (gtk_main_quit), NULL);
872 bell_picture = gdk_pixbuf_new_from_file ("/usr/share/belltower/bells1.jpg", NULL);
874 buttons = gtk_vbox_new (TRUE, 0);
875 menu = HILDON_APP_MENU (hildon_app_menu_new ());
877 add_button ("Nearby", nearby_towers);
878 add_button ("Recent", recent_towers);
879 add_button ("Bookmarks", show_bookmarks);
880 add_button ("By area", towers_by_area);
881 add_button ("Search", tower_search);
883 /* extra buttons for the app menu */
884 button = gtk_button_new_with_label ("Credits");
885 hildon_app_menu_append (menu, GTK_BUTTON (button));
886 hildon_app_menu_append (menu, GTK_BUTTON (button));
888 gtk_widget_show_all (GTK_WIDGET (menu));
889 hildon_window_set_app_menu (HILDON_WINDOW (window), menu);
891 hbox = gtk_hbox_new (FALSE, 0);
892 gtk_box_pack_end (GTK_BOX (hbox), buttons, TRUE, TRUE, 0);
893 gtk_box_pack_end (GTK_BOX (hbox),
894 gtk_image_new_from_pixbuf (bell_picture),
897 gtk_container_add (GTK_CONTAINER (window), hbox);
898 gtk_widget_show_all (GTK_WIDGET (window));