Re: [PATCH] gnu: Add tracker.

[Ludovic Courtès]

address@hidden skribis:

> i made changes to the patch, i disable 'make check' because i found
> two errors during this phase:
>
> a) "Tracker-WARNING **: Locale '0' is not set, defaulting to C locale"
>    For this case i set LANG "en_US.UTF-8".
> b) "Unable to load /var/lib/dbus/machine-id or /etc/machine-id"
>    For this i set DBUS_FATAL_WARNINGS" "0", but the error stay.

I’ve addressed these issues in the attached patch.  However, there’s
still a couple of test failures; probably not too hard to address, but
I’m running out of time.  ;-)

Would you or anyone like to continue?

Thanks,
Ludo’.

>From d72a22ea23ce7f8dd05c8d8b512691f72943f7ef Mon Sep 17 00:00:00 2001
From: Rene Saavedra <address@hidden>
Date: Tue, 8 Mar 2016 10:28:17 +0100
Subject: [PATCH] gnu: Add Tracker.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

* gnu/packages/gnome.scm (tracker): New variable.
* gnu/packages/patches/tracker-dbus-test.patch: New file.
* gnu-system.am (dist_patch_DATA): Add it.

Co-authored-by: Ludovic Courtès <address@hidden>
---
 gnu-system.am                                |  1 +
 gnu/packages/gnome.scm                       | 61 ++++++++++++++++++++++++++++
 gnu/packages/patches/tracker-dbus-test.patch | 14 +++++++
 3 files changed, 76 insertions(+)
 create mode 100644 gnu/packages/patches/tracker-dbus-test.patch

diff --git a/gnu-system.am b/gnu-system.am
index f4f1b89..9d37933 100644
--- a/gnu-system.am
+++ b/gnu-system.am
@@ -730,6 +730,7 @@ dist_patch_DATA =                                           
\
   gnu/packages/patches/tk-find-library.patch                   \
   gnu/packages/patches/tophat-build-with-later-seqan.patch     \
   gnu/packages/patches/torsocks-dns-test.patch                 \
+  gnu/packages/patches/tracker-dbus-test.patch                 \
   gnu/packages/patches/tvtime-gcc41.patch                      \
   gnu/packages/patches/tvtime-pngoutput.patch                  \
   gnu/packages/patches/tvtime-videodev2.patch                  \
diff --git a/gnu/packages/gnome.scm b/gnu/packages/gnome.scm
index c945c0e..25243ee 100644
--- a/gnu/packages/gnome.scm
+++ b/gnu/packages/gnome.scm
@@ -72,6 +72,7 @@
   #:use-module (gnu packages ibus)
   #:use-module (gnu packages iso-codes)
   #:use-module (gnu packages libcanberra)
+  #:use-module (gnu packages libunistring)
   #:use-module (gnu packages linux)
   #:use-module (gnu packages libusb)
   #:use-module (gnu packages lirc)
@@ -4866,3 +4867,63 @@ command-line interface.  It can record part or all of an 
X display for a
 specified duration and save it as a GIF encoded animated image file.")
       (home-page "https://git.gnome.org/browse/byzanz";)
       (license license:gpl2+))))
+
+(define-public tracker
+  (package
+    (name "tracker")
+    (version "1.7.2")
+    (source (origin
+              (method url-fetch)
+              (uri (string-append "mirror://gnome/sources/" name "/"
+                                  (version-major+minor version) "/"
+                                  name "-" version ".tar.xz"))
+              (sha256
+               (base32
+                "1m6hys71n6faf6qx719vh8n4y2y63x7cygzh1rq56flvwa0fnxxx"))
+              (patches (list (search-patch "tracker-dbus-test.patch")))))
+    (build-system glib-or-gtk-build-system)
+    (arguments
+     '(#:phases (modify-phases %standard-phases
+                  (delete 'check)
+                  (add-after 'install 'check
+                    ;; Tests in libtracker-data expect the GLib schemas and
+                    ;; stop-words database to be installed.
+                    (assoc-ref %standard-phases 'check))
+                  (add-before 'check 'pre-check
+                    (lambda* (#:key outputs #:allow-other-keys)
+                      ;; tracker-locale.c insists on checking 'LANG'.
+                      (setenv "LANG" "en_US.utf8")
+
+                      ;; No /etc/machine-id.
+                      (setenv "DBUS_FATAL_WARNINGS" "0")
+
+                      ;; Help tests find GLib schemas.
+                      (setenv "XDG_DATA_DIRS"
+                              (string-append (assoc-ref outputs "out")
+                                             "/share"))
+                      #t)))))
+    (native-inputs
+     `(("glib" ,glib) ;; XXX: fail with glib-compile-schemas, gio-2.0.
+       ("gobject-introspection" ,gobject-introspection)
+       ("intltool" ,intltool)
+       ("pkg-config" ,pkg-config)
+       ("uuidgen" ,util-linux)
+       ("xsltproc" ,libxslt)))
+    (inputs
+     `(("libpng" ,libpng)
+       ("libunistring" ,libunistring)
+       ("libxml2" ,libxml2)
+       ("sqlite" ,sqlite)
+       ("zlib" ,zlib)))
+    (home-page "https://wiki.gnome.org/Projects/Tracker";)
+    (synopsis "User information store, search tool, and indexer")
+    (description
+     "Tracker is a semantic data storage for desktop and mobile devices.
+Tracker uses W3C standards for RDF ontologies using Nepomuk with SPARQL to 
query
+and update the data.  Tracker is a central repository of user information, that
+provides two big benefits for the user; shared data between applications and
+information which is relational to other information.")
+    (license (list license:lgpl2.1+  ;; XXX: libtracker, tracker-extract.
+                                     ;; XXX: tracker-utils, gvdb.
+                   license:gpl2+     ;; XXX: everything else.
+                   license:bsd-3)))) ;; XXX: libstemmer.
diff --git a/gnu/packages/patches/tracker-dbus-test.patch 
b/gnu/packages/patches/tracker-dbus-test.patch
new file mode 100644
index 0000000..4767290
--- /dev/null
+++ b/gnu/packages/patches/tracker-dbus-test.patch
@@ -0,0 +1,14 @@
+Skip the 'tracker-file-notifier-test' since it wants to start
+dbus-daemon and insists on having /etc/machine-id, which is
+missing in the build environment.
+
+--- tracker-1.7.2/tests/libtracker-miner/tracker-file-notifier-test.c  
2016-03-07 17:07:31.167013848 +0100
++++ tracker-1.7.2/tests/libtracker-miner/tracker-file-notifier-test.c  
2016-03-07 17:07:42.419104703 +0100
+@@ -752,6 +752,7 @@ main (gint    argc,
+       g_test_init (&argc, &argv, NULL);
+ 
+       g_test_message ("Testing file notifier");
++      return g_test_run ();                     /* Skip! */
+ 
+       /* Crawling */
+       test_add ("/libtracker-miner/file-notifier/crawling-non-recursive",
-- 
2.6.3