Fix view destruction upon shutdown.
[libchamplain:potyl-perl.git] / demos / url-marker.c
1 /*
2  * Copyright (C) 2009 Emmanuel Rodriguez <emmanuel.rodriguez@gmail.com>
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
17  */
18
19 #include <champlain/champlain.h>
20 #include <libsoup/soup.h>
21 #include <gdk-pixbuf/gdk-pixbuf.h>
22
23 /* The data needed for constructing a marker */
24 typedef struct {
25   ChamplainLayer *layer;
26   gdouble latitude;
27   gdouble longitude;
28 } MarkerData;
29
30 /**
31  * Returns a GdkPixbuf from a given SoupMessage. This function assumes that the
32  * message has completed successfully.
33  * If there's an error building the GdkPixbuf the function will return NULL and
34  * set error accordingly.
35  *
36  * The GdkPixbuf has to be freed with g_object_unref.
37  */
38 static GdkPixbuf*
39 pixbuf_new_from_message (SoupMessage *message,
40     GError **error)
41 {
42   const gchar *mime_type = NULL;
43   GdkPixbufLoader *loader = NULL;
44   GdkPixbuf *pixbuf = NULL;
45   gboolean pixbuf_is_open = FALSE;
46
47   *error = NULL;
48
49   /*  Use a pixbuf loader that can load images of the same mime-type as the
50       message.
51   */
52   mime_type = soup_message_headers_get (message->response_headers,
53       "Content-Type");
54   loader = gdk_pixbuf_loader_new_with_mime_type (mime_type, error);
55   if (loader != NULL)
56     pixbuf_is_open = TRUE;
57   if (*error != NULL)
58     goto cleanup;
59
60
61   gdk_pixbuf_loader_write (
62       loader,
63       message->response_body->data,
64       message->response_body->length,
65       error);
66   if (*error != NULL)
67     goto cleanup;
68
69   gdk_pixbuf_loader_close (loader, error);
70   pixbuf_is_open = FALSE;
71   if (*error != NULL)
72     goto cleanup;
73
74   pixbuf = gdk_pixbuf_loader_get_pixbuf (loader);
75   if (pixbuf == NULL)
76     goto cleanup;
77   g_object_ref (G_OBJECT (pixbuf));
78
79 cleanup:
80   if (pixbuf_is_open)
81       gdk_pixbuf_loader_close (loader, NULL);
82
83   if (loader != NULL)
84       g_object_unref (G_OBJECT (loader));
85
86   return pixbuf;
87 }
88
89 /**
90  * Transforms a GdkPixbuf into a ClutterTexture.
91  * If there's an error building the ClutterActor (the texture) the function
92  * will return NULL and set error accordingly.
93  *
94  * If you are using ClutterGtk, you can also use gtk_clutter_texture_set_from_pixbuf
95  * instead of cluter_texture_set_from_rgb_data.
96  *
97  * The ClutterActor has to be freed with clutter_actor_destroy.
98  */
99 static ClutterActor*
100 texture_new_from_pixbuf (GdkPixbuf *pixbuf, GError **error)
101 {
102   ClutterActor *texture = NULL;
103   const guchar *data;
104   gboolean has_alpha, success;
105   int width, height, rowstride;
106   ClutterTextureFlags flags = 0;
107
108   *error = NULL;
109
110   data = gdk_pixbuf_get_pixels (pixbuf);
111   width = gdk_pixbuf_get_width (pixbuf);
112   height = gdk_pixbuf_get_height (pixbuf);
113   has_alpha = gdk_pixbuf_get_has_alpha (pixbuf);
114   rowstride = gdk_pixbuf_get_rowstride (pixbuf);
115
116   texture = clutter_texture_new ();
117   success = clutter_texture_set_from_rgb_data (CLUTTER_TEXTURE (texture),
118       data,
119       has_alpha,
120       width,
121       height,
122       rowstride,
123       (has_alpha ? 4 : 3),
124       flags,
125       error);
126
127   if (!success)
128     {
129       clutter_actor_destroy (CLUTTER_ACTOR (texture));
130       texture = NULL;
131     }
132
133   return texture;
134 }
135
136 /**
137  * Called when an image has been downloaded. This callback will transform the
138  * image data (binary chunk sent by the remote web server) into a valid Clutter
139  * actor (a texture) and will use this as the source image for a new marker.
140  * The marker will then be added to an existing layer.
141  *
142  * This callback expects the parameter data to be a valid ChamplainLayer.
143  */
144 static void
145 image_downloaded_cb (SoupSession *session,
146     SoupMessage *message,
147     gpointer data)
148 {
149   MarkerData *marker_data = NULL;
150   SoupURI *uri = NULL;
151   char *url = NULL;
152   GError *error = NULL;
153   GdkPixbuf *pixbuf = NULL;
154   ClutterActor *texture = NULL;
155   ClutterActor *marker = NULL;
156
157   if (data == NULL)
158     goto cleanup;
159   marker_data = (MarkerData *) data;
160
161   /* Deal only with finished messages */
162   uri = soup_message_get_uri (message);
163   url = soup_uri_to_string (uri, FALSE);
164   if (! SOUP_STATUS_IS_SUCCESSFUL (message->status_code))
165     {
166       g_print ("Download of %s failed with error code %d\n", url,
167           message->status_code);
168       goto cleanup;
169     }
170
171   pixbuf = pixbuf_new_from_message (message, &error);
172   if (error != NULL)
173     {
174       g_print ("Failed to convert %s into an image: %s\n", url, error->message);
175       goto cleanup;
176     }
177
178   /* Then transform the pixbuf into a texture */
179   texture = texture_new_from_pixbuf (pixbuf, &error);
180   if (error != NULL)
181     {
182       g_print ("Failed to convert %s into a texture: %s\n", url,
183         error->message);
184       goto cleanup;
185     }
186
187   /* Finally create a marker with the texture */
188   marker = champlain_marker_new_with_image (texture);
189   texture = NULL;
190   champlain_base_marker_set_position (CHAMPLAIN_BASE_MARKER (marker),
191       marker_data->latitude, marker_data->longitude);
192   clutter_container_add (CLUTTER_CONTAINER (marker_data->layer), marker, NULL);
193   clutter_actor_show_all (marker);
194
195 cleanup:
196   g_object_unref (marker_data->layer);
197   g_free (marker_data);
198   g_free (url);
199
200   if (error != NULL)
201     g_error_free (error);
202
203   if (pixbuf != NULL)
204     g_object_unref (G_OBJECT (pixbuf));
205
206   if (texture != NULL)
207     clutter_actor_destroy (CLUTTER_ACTOR (texture));
208 }
209
210 /**
211  * Creates a marker at the given position with an image that's downloaded from
212  * the given URL.
213  *
214  */
215 static void
216 create_marker_from_url (ChamplainLayer *layer,
217     SoupSession *session,
218     gdouble latitude,
219     gdouble longitude,
220     const gchar *url)
221 {
222   SoupMessage *message;
223   MarkerData *data;
224
225   data = g_new0(MarkerData, 1);
226   data->layer = g_object_ref (layer);
227   data->latitude = latitude;
228   data->longitude = longitude;
229
230   message = soup_message_new ("GET", url);
231   soup_session_queue_message (session, message, image_downloaded_cb, data);
232 }
233
234 int
235 main (int argc, char *argv[])
236 {
237   ClutterActor *view, *stage;
238   ChamplainLayer *layer;
239   SoupSession *session;
240
241   g_thread_init (NULL);
242   clutter_init (&argc, &argv);
243
244   stage = clutter_stage_get_default ();
245   clutter_actor_set_size (stage, 800, 600);
246
247   /* Create the map view */
248   view = champlain_view_new ();
249   clutter_actor_set_size (CLUTTER_ACTOR (view), 800, 600);
250   clutter_container_add_actor (CLUTTER_CONTAINER (stage), view);
251
252   /* Create the markers and marker layer */
253   layer = champlain_layer_new ();
254   champlain_view_add_layer (CHAMPLAIN_VIEW (view), layer);
255   session = soup_session_async_new ();
256   create_marker_from_url (layer, session, 48.218611, 17.146397,
257       "http://hexten.net/cpan-faces/potyl.jpg");
258   create_marker_from_url (layer, session, 48.21066, 16.31476,
259       "http://hexten.net/cpan-faces/jkutej.jpg");
260   create_marker_from_url (layer, session, 48.14838, 17.10791,
261       "http://bratislava.pm.org/images/whoiswho/jnthn.jpg");
262
263   /* Finish initialising the map view */
264   g_object_set (G_OBJECT (view), "zoom-level", 10,
265       "scroll-mode", CHAMPLAIN_SCROLL_MODE_KINETIC, NULL);
266   champlain_view_center_on (CHAMPLAIN_VIEW (view), 48.22, 16.8);
267
268   clutter_actor_show_all (stage);
269   clutter_main ();
270
271   g_object_unref (session);
272
273   clutter_actor_destroy (view);
274   return 0;
275 }