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];
88 gboolean gps_working = FALSE;
89 double current_lat = 40.2452778;
90 double current_long = -75.65;;
93 show_message (char *message)
95 HildonNote* note = HILDON_NOTE
96 (hildon_note_new_information (GTK_WINDOW (window),
98 "Some message was supposed to be here."));
99 gtk_dialog_run (GTK_DIALOG (note));
100 gtk_widget_destroy (GTK_WIDGET (note));
104 distance_to_tower (tower *details)
110 const double km_to_miles = 1.609344;
112 tower_lat = strtod(details->fields[FieldLat], &endptr);
113 if (*endptr) return -1;
114 tower_long = strtod(details->fields[FieldLong], &endptr);
115 if (*endptr) return -1;
117 km_distance = location_distance_between (current_lat,
122 return (int) (km_distance / km_to_miles);
126 distance_to_tower_str (tower *details)
128 int miles = distance_to_tower (details);
132 return g_strdup ("unknown");
136 return g_strdup_printf("%dmi", (int) miles);
141 call_dbus (DBusBusType type,
148 DBusGConnection *connection;
149 GError *error = NULL;
153 connection = dbus_g_bus_get (type,
155 if (connection == NULL)
157 show_message (error->message);
158 g_error_free (error);
162 proxy = dbus_g_proxy_new_for_name (connection, name, path, interface);
165 if (!dbus_g_proxy_call (proxy, method, &error,
166 G_TYPE_STRING, parameter,
170 show_message (error->message);
171 g_error_free (error);
176 show_browser (gchar *url)
178 call_dbus (DBUS_BUS_SESSION,
179 "com.nokia.osso_browser",
180 "/com/nokia/osso_browser/request",
181 "com.nokia.osso_browser",
186 typedef FilterResult (*ParseDoveCallback)(tower *details, gpointer data);
187 typedef void (*ButtonCallback)(void);
189 GtkWidget *tower_window, *buttons, *tower_table;
193 add_table_field (char *name,
200 g_object_get(tower_table, "n-rows", &row);
204 gtk_table_resize (GTK_TABLE (tower_table), row, 2);
206 label = GTK_LABEL (gtk_label_new (NULL));
207 str = g_strdup_printf("<b>%s</b>", name);
208 gtk_label_set_markup (label, str);
210 gtk_label_set_justify (label, GTK_JUSTIFY_RIGHT);
211 gtk_table_attach_defaults (GTK_TABLE (tower_table),
215 label = GTK_LABEL (gtk_label_new (value));
216 gtk_label_set_justify (label, GTK_JUSTIFY_LEFT);
217 gtk_table_attach_defaults (GTK_TABLE (tower_table),
223 add_button (char *label,
224 ButtonCallback callback)
228 button = gtk_button_new_with_label (label);
229 g_signal_connect (button, "clicked", G_CALLBACK (callback), NULL);
230 hildon_app_menu_append (menu, GTK_BUTTON (button));
231 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
232 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
234 g_signal_connect (button, "clicked", G_CALLBACK (callback), NULL);
235 gtk_box_pack_end (GTK_BOX (buttons), button, FALSE, FALSE, 0);
240 bookmark_toggled (GtkButton *button,
243 show_message ("Bookmarks are not yet implemented.");
246 char *tower_website = NULL;
247 char *tower_map = NULL;
248 char *tower_directions = NULL;
249 char *peals_list = NULL;
252 show_tower_website (void)
254 show_browser (tower_website);
258 show_tower_map (void)
260 show_browser (tower_map);
264 show_peals_list (void)
266 show_browser (peals_list);
270 get_countries_cb (tower *details,
273 GHashTable *hash = (GHashTable *)data;
275 if (details->serial==0)
276 return TRUE; /* header row */
278 if (!g_hash_table_lookup_extended (hash,
279 details->fields[FieldCountry],
282 g_hash_table_insert (hash,
283 g_strdup(details->fields[FieldCountry]),
284 g_strdup (details->fields[FieldCountry]));
287 return FILTER_IGNORE;
298 } country_and_county;
301 get_counties_cb (tower *details,
304 country_cb_data *d = (country_cb_data *)data;
306 if (details->serial==0)
307 return FILTER_IGNORE; /* header row */
309 if (strcmp(details->fields[FieldCountry], d->country_name)!=0)
310 return FILTER_IGNORE; /* wrong country */
312 if (!g_hash_table_lookup_extended (d->hash,
313 details->fields[FieldCounty],
316 g_hash_table_insert (d->hash,
317 g_strdup(details->fields[FieldCounty]),
318 g_strdup (details->fields[FieldCounty]));
321 return FILTER_IGNORE;
325 get_nearby_towers_cb (tower *details,
328 if (details->serial==0)
329 return FILTER_IGNORE; /* header row */
331 if (distance_to_tower (details) < 50)
333 return FILTER_ACCEPT;
337 return FILTER_IGNORE;
342 get_towers_by_county_cb (tower *details,
345 country_and_county *cac = (country_and_county *) data;
347 if ((!cac->county || strcmp (cac->county, details->fields[FieldCounty])==0) &&
348 (!cac->country || strcmp (cac->country, details->fields[FieldCountry])==0))
350 return FILTER_ACCEPT;
354 return FILTER_IGNORE;
359 get_towers_by_search_cb (tower *details,
362 char *s = (char *) data;
364 if (strcasestr(details->fields[FieldCountry], s) ||
365 strcasestr(details->fields[FieldCounty], s) ||
366 strcasestr(details->fields[FieldDedication], s) ||
367 strcasestr(details->fields[FieldPlace], s))
369 return FILTER_ACCEPT;
373 return FILTER_IGNORE;
378 single_tower_cb (tower *details,
382 GtkWidget *hbox, *button;
385 gchar *primary_key = (gchar*) data;
388 if (strcmp(details->fields[FieldPrimaryKey], primary_key)!=0)
390 /* not this one; keep going */
391 return FILTER_IGNORE;
394 tower_window = hildon_stackable_window_new ();
396 if (g_str_has_prefix (details->fields[FieldDedication],
399 /* FIXME: This needs to be cleverer, because we can have
400 * e.g. "S Peter and S Paul".
401 * May have to use regexps.
402 * Reallocation in general even when unchanged is okay,
403 * because it's the common case (most towers are S Something)
406 /* FIXME: Since we're passing this in as markup,
407 * we need to escape the strings.
410 str = g_strdup_printf("S<sup>t</sup> %s, %s",
411 details->fields[FieldDedication]+2,
412 details->fields[FieldPlace]);
417 str = g_strdup_printf("%s, %s",
418 details->fields[FieldDedication],
419 details->fields[FieldPlace]);
422 hildon_window_set_markup (HILDON_WINDOW (tower_window),
426 hbox = gtk_hbox_new (FALSE, 0);
427 tower_table = gtk_table_new (0, 2, FALSE);
428 buttons = gtk_vbox_new (TRUE, 0);
429 menu = HILDON_APP_MENU (hildon_app_menu_new ());
431 miles = distance_to_tower_str(details);
433 add_table_field ("Distance", miles);
434 add_table_field ("Postcode", details->fields[FieldPostcode]);
435 add_table_field ("County", details->fields[FieldCounty]);
436 add_table_field ("Country", details->fields[FieldCountry]);
437 add_table_field ("Diocese", details->fields[FieldDiocese]);
438 add_table_field ("Practice night", details->fields[FieldPracticeNight]);
439 add_table_field ("Bells", details->fields[FieldBells]);
443 tenor_weight = atoi (details->fields[FieldWt]);
444 str = g_strdup_printf("%dcwt %dqr %dlb in %s",
446 (tenor_weight % 112)/28,
448 details->fields[FieldNote]
450 add_table_field ("Tenor", str);
453 add_button ("Tower website", show_tower_website);
454 add_button ("Peals", show_peals_list);
455 add_button ("Map", show_tower_map);
456 add_button ("Directions", NULL);
458 /* don't use a toggle button: it looks stupid */
459 button = hildon_button_new_with_text (HILDON_SIZE_AUTO_WIDTH | HILDON_SIZE_FINGER_HEIGHT,
460 HILDON_BUTTON_ARRANGEMENT_VERTICAL,
462 g_signal_connect (button, "clicked", G_CALLBACK (bookmark_toggled), NULL);
463 gtk_box_pack_start (GTK_BOX (buttons), button, FALSE, FALSE, 0);
465 gtk_widget_show_all (GTK_WIDGET (menu));
466 hildon_window_set_app_menu (HILDON_WINDOW (tower_window), menu);
468 gtk_box_pack_end (GTK_BOX (hbox), buttons, TRUE, TRUE, 0);
469 gtk_box_pack_end (GTK_BOX (hbox), tower_table, TRUE, TRUE, 0);
471 gtk_container_add (GTK_CONTAINER (tower_window), hbox);
473 g_free (tower_website);
474 tower_website = g_strdup_printf ("http://%s", details->fields[FieldWebPage]);
476 peals_list = g_strdup_printf ("http://www.pealbase.ismysite.co.uk/felstead/tbid.php?tid=%s",
477 details->fields[FieldTowerBase]);
479 tower_map = g_strdup_printf ("http://maps.google.com/maps?q=%s,%s",
480 details->fields[FieldLat],
481 details->fields[FieldLong]);
482 gtk_widget_show_all (GTK_WIDGET (tower_window));
488 * A tower that was accepted by a filter.
497 found_tower_new (tower *basis)
499 FoundTower* result = g_new (FoundTower, 1);
501 result->sortkey = g_strdup (basis->fields[FieldPrimaryKey]);
502 result->primarykey = g_strdup (basis->fields[FieldPrimaryKey]);
506 gchar *distance = distance_to_tower_str (basis);
507 result->displayname = g_strdup_printf ("%s, %s (%s, %s) (%s)",
508 basis->fields[FieldDedication],
509 basis->fields[FieldPlace],
510 basis->fields[FieldBells],
511 basis->fields[FieldPracticeNight],
517 result->displayname = g_strdup_printf ("%s, %s (%s, %s)",
518 basis->fields[FieldDedication],
519 basis->fields[FieldPlace],
520 basis->fields[FieldBells],
521 basis->fields[FieldPracticeNight]);
528 found_tower_free (FoundTower *tower)
530 g_free (tower->sortkey);
531 g_free (tower->primarykey);
532 g_free (tower->displayname);
537 parse_dove (ParseDoveCallback callback,
538 GSList **filter_results,
541 FILE *dove = fopen("/usr/share/belltower/dove.txt", "r");
542 char tower_rec[4096];
545 gboolean seen_newline;
549 show_message ("Cannot open Dove database!");
555 while (fgets (tower_rec, sizeof (tower_rec), dove))
557 seen_newline = FALSE;
558 result.fields[0] = tower_rec;
560 for (i=tower_rec; *i; i++) {
565 if (*i=='\\' || *i=='\n')
569 result.fields[result.n_fields] = i+1;
575 /* keep it simple, stupid */
576 show_message ("Line too long, cannot continue.");
580 if (strcmp (result.fields[FieldCountry], "")==0)
582 result.fields[FieldCountry] = "England";
585 switch (callback (&result, data))
598 *filter_results = g_slist_append (*filter_results,
599 found_tower_new (&result));
610 show_tower (char *primary_key)
612 parse_dove (single_tower_cb, NULL, primary_key);
616 show_towers_from_list (GSList *list)
626 hildon_banner_show_information(window,
634 /* only one; don't bother showing the list */
635 FoundTower* found = (FoundTower*) list->data;
637 hildon_banner_show_information(window,
640 show_tower (found->primarykey);
642 /* FIXME: and free the list */
646 dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
647 selector = hildon_touch_selector_new_text ();
649 for (cursor=list; cursor; cursor=cursor->next)
651 FoundTower* found = (FoundTower*) cursor->data;
652 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
656 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
657 HILDON_TOUCH_SELECTOR (selector));
659 gtk_widget_show_all (GTK_WIDGET (dialog));
661 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
663 GList *rows = hildon_touch_selector_get_selected_rows (HILDON_TOUCH_SELECTOR (selector),
665 GtkTreePath *path = (GtkTreePath*) rows->data;
666 gint *indices = gtk_tree_path_get_indices (path);
671 gtk_widget_destroy (GTK_WIDGET (dialog));
675 FoundTower *found = (FoundTower *) g_slist_nth_data (list, result);
676 show_tower (found->primarykey);
679 /* FIXME: and free the list */
682 static gint strcmp_f (gconstpointer a,
685 return strcmp ((char*)a, (char*)b);
689 put_areas_into_list (gpointer key,
693 GSList **list = (GSList **)data;
694 *list = g_slist_insert_sorted (*list,
702 GSList *matches = NULL;
706 show_message ("I don't know where you are!");
710 parse_dove (get_nearby_towers_cb,
714 show_towers_from_list (matches);
718 towers_by_subarea (gchar *area)
720 GtkWidget *dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
721 GtkWidget *selector = hildon_touch_selector_new_text ();
722 GHashTable *hash = g_hash_table_new_full (g_str_hash,
726 GSList *list=NULL, *cursor;
727 gchar *title = g_strdup_printf ("Areas of %s", area);
728 country_cb_data d = { hash, area };
729 country_and_county cac = { area, NULL };
731 gtk_window_set_title (GTK_WINDOW (dialog), title);
734 parse_dove (get_counties_cb, NULL, &d);
736 g_hash_table_foreach (hash,
740 for (cursor=list; cursor; cursor=cursor->next)
742 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
746 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
747 HILDON_TOUCH_SELECTOR (selector));
749 gtk_widget_show_all (GTK_WIDGET (dialog));
751 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
753 GSList *matches = NULL;
754 cac.county = strdup (hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector)));
756 parse_dove (get_towers_by_county_cb,
761 show_towers_from_list (matches);
763 g_hash_table_unref (hash);
764 gtk_widget_destroy (GTK_WIDGET (dialog));
768 towers_by_area (void)
770 GtkWidget *dialog = hildon_picker_dialog_new (GTK_WINDOW (window));
771 GtkWidget *selector = hildon_touch_selector_new_text ();
772 GHashTable *hash = g_hash_table_new_full (g_str_hash,
776 GSList *list = NULL, *cursor;
777 gchar *result = NULL;
779 gtk_window_set_title (GTK_WINDOW (dialog), "Areas of the world");
781 parse_dove (get_countries_cb, NULL, hash);
783 g_hash_table_foreach (hash,
787 for (cursor=list; cursor; cursor=cursor->next)
789 hildon_touch_selector_append_text (HILDON_TOUCH_SELECTOR (selector),
793 hildon_picker_dialog_set_selector (HILDON_PICKER_DIALOG (dialog),
794 HILDON_TOUCH_SELECTOR (selector));
796 gtk_widget_show_all (GTK_WIDGET (dialog));
798 if (gtk_dialog_run (GTK_DIALOG (dialog))==GTK_RESPONSE_OK)
800 result = g_strdup (hildon_touch_selector_get_current_text (HILDON_TOUCH_SELECTOR (selector)));
802 g_hash_table_unref (hash);
803 gtk_widget_destroy (GTK_WIDGET (dialog));
807 towers_by_subarea (result);
813 show_bookmarks (void)
820 GtkWidget *terms = gtk_dialog_new_with_buttons ("What are you looking for?",
822 GTK_DIALOG_MODAL|GTK_DIALOG_DESTROY_WITH_PARENT,
826 GtkWidget *entry = gtk_entry_new ();
827 GSList *matches = NULL;
829 gtk_box_pack_end (GTK_BOX (GTK_DIALOG (terms)->vbox),
830 entry, TRUE, TRUE, 0);
832 gtk_widget_show_all (GTK_WIDGET (terms));
834 if (gtk_dialog_run (GTK_DIALOG (terms))==GTK_RESPONSE_OK)
836 GSList *matches = NULL;
838 parse_dove (get_towers_by_search_cb,
840 (char*) gtk_entry_get_text (GTK_ENTRY (entry)));
842 show_towers_from_list (matches);
845 gtk_widget_destroy (GTK_WIDGET (terms));
856 gps_working = (device->fix->fields & LOCATION_GPS_DEVICE_LATLONG_SET)!=0;
860 current_lat = device->fix->latitude;
861 current_long = device->fix->longitude;
866 main(int argc, char **argv)
868 GtkWidget *bell, *button, *hbox;
869 GdkPixbuf *bell_picture;
871 gtk_init (&argc, &argv);
872 g_set_application_name ("Belltower");
874 device = g_object_new (LOCATION_TYPE_GPS_DEVICE, NULL);
876 /* FIXME and call that when the location changes, too */
878 window = hildon_stackable_window_new ();
879 gtk_window_set_title (GTK_WINDOW (window), "Belltower");
880 g_signal_connect (G_OBJECT (window), "delete_event", G_CALLBACK (gtk_main_quit), NULL);
882 bell_picture = gdk_pixbuf_new_from_file ("/usr/share/belltower/bells1.jpg", NULL);
884 buttons = gtk_vbox_new (TRUE, 0);
885 menu = HILDON_APP_MENU (hildon_app_menu_new ());
887 add_button ("Nearby", nearby_towers);
888 add_button ("Recent", recent_towers);
889 add_button ("Bookmarks", show_bookmarks);
890 add_button ("By area", towers_by_area);
891 add_button ("Search", tower_search);
893 /* extra buttons for the app menu */
894 button = gtk_button_new_with_label ("Credits");
895 hildon_app_menu_append (menu, GTK_BUTTON (button));
896 hildon_app_menu_append (menu, GTK_BUTTON (button));
898 gtk_widget_show_all (GTK_WIDGET (menu));
899 hildon_window_set_app_menu (HILDON_WINDOW (window), menu);
901 hbox = gtk_hbox_new (FALSE, 0);
902 gtk_box_pack_end (GTK_BOX (hbox), buttons, TRUE, TRUE, 0);
903 gtk_box_pack_end (GTK_BOX (hbox),
904 gtk_image_new_from_pixbuf (bell_picture),
907 gtk_container_add (GTK_CONTAINER (window), hbox);
908 gtk_widget_show_all (GTK_WIDGET (window));