[libchamplain] Add launcher.js: A champlain javascript demo

[Pierre-Luc Beaudoin <plbeaudoin src gnome org>]

commit 7137f9325e9007690360cb3e479a73a3b94b800e
Author: Simon Wenner <simon wenner ch>
Date:   Fri Feb 26 23:40:09 2010 +0100

    Add launcher.js: A champlain javascript demo
    
    luncher.js implements the same application as its c equivalent, but
    uses the javascript bindings provided by gobject-introspection.
    The demo has no implementation of the marker layer and printing the
    coordinates of a mouse click does currently not work.

 demos/Makefile.am |    6 ++-
 demos/launcher.js |  133 +++++++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 138 insertions(+), 1 deletions(-)
---
diff --git a/demos/Makefile.am b/demos/Makefile.am
index 9792f3a..1d273d1 100644
--- a/demos/Makefile.am
+++ b/demos/Makefile.am
@@ -34,4 +34,8 @@ local_rendering_LDADD = $(GTK_DEPS_LIBS) $(DEPS_LIBS) \
 		../champlain/libchamplain-0.5.la
 endif
 
-EXTRA_DIST= markers.h
+EXTRA_DIST = markers.h
+
+if HAVE_INTROSPECTION
+EXTRA_DIST += launcher.js
+endif
diff --git a/demos/launcher.js b/demos/launcher.js
new file mode 100755
index 0000000..8043d63
--- /dev/null
+++ b/demos/launcher.js
@@ -0,0 +1,133 @@
+#!/usr/bin/env gjs
+/*
+ * Copyright (C) 2010 Simon Wenner <simon wenner ch>
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2.1 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+ */
+
+/**
+ * Champlain launcher example in Javascript.
+ *
+ * Dependencies:
+ *  * gobject-introspection
+ *  * Build Champlain with '--enable-introspection'
+ *  * Gjs: http://live.gnome.org/Gjs
+ *
+ * If you installed Champlain in /usr/local you have to run:
+ * export GI_TYPELIB_PATH=$GI_TYPELIB_PATH:/usr/local/lib/girepository-1.0/
+ */
+
+const Lang = imports.lang;
+const Clutter = imports.gi.Clutter;
+const Champlain = imports.gi.Champlain;
+
+Clutter.init (0, null);
+
+const PADDING = 10;
+
+function make_button (text)
+{
+  let white = new Clutter.Color ({red:0xff, blue:0xff, green:0xff, alpha:0xff});
+  let black = new Clutter.Color ({red:0x00, blue:0x00, green:0x00, alpha:0xff});
+
+  let button = new Clutter.Group ();
+
+  let button_bg = new Clutter.Rectangle ({color:white});
+  button.add_actor (button_bg);
+  button.set_opacity (0xcc);
+
+  let button_text = new Clutter.Text ({font_name:"Sans 10", text:text, color:black});
+  button.add_actor (button_text);
+
+  let [width, height] = button_text.get_size();
+  button_bg.set_size (width + PADDING * 2, height + PADDING * 2);
+  button_bg.set_position (0, 0);
+  button_text.set_position (PADDING, PADDING);
+
+  return button;
+}
+
+function map_view_button_release_cb (actor, event)
+{
+  // FIXME: it does not print and GLib.printf does not work.
+  if (event.button != 1 || event.click_count > 1)
+    return false;
+
+  let[ok, lat, lon] = view.get_coords_from_event (event);
+  if (ok)
+    log ("Map clicked at %f, %f \n", lat, lon);
+
+  return true;
+}
+
+let stage = Clutter.Stage.get_default ();
+stage.title = "Champlain Javascript Example";
+stage.set_size (800, 600);
+
+/* Create the map view */
+let view = new Champlain.View();
+view.set_size (800, 600);
+stage.add_actor (view);
+
+/* Create the buttons */
+let buttons = new Clutter.Group ();
+let total_width = 0;
+buttons.set_position (PADDING, PADDING);
+
+let button = make_button ("Zoom in");
+buttons.add_actor (button);
+button.set_reactive (true);
+
+let width = button.width;
+total_width += width + PADDING;
+button.connect ("button-release-event", Lang.bind (view,
+    function (actor, event)
+      {
+        view.zoom_in ();
+        return true;
+      }));
+
+let button = make_button ("Zoom out");
+buttons.add_actor (button);
+button.set_reactive (true);
+button.set_position (total_width, 0);
+
+let width = button.width;
+total_width += width + PADDING;
+button.connect ("button-release-event", Lang.bind (view,
+    function (actor, event)
+      {
+        view.zoom_out ();
+        return true;
+      }));
+
+stage.add_actor (buttons);
+
+/* Create the markers and marker layer */
+// TODO
+
+/* Connect to the click event */
+view.set_reactive (true);
+view.connect ("button-release-event", Lang.bind (view,
+    map_view_button_release_cb));
+
+/* Finish initialising the map view */
+view.zoom_level = 12;
+view.scroll_mode = Champlain.ScrollMode.KINETIC;
+view.center_on (45.466, -73.75);
+
+stage.show ();
+Clutter.main ();
+stage.destroy ();