HCoop / jackhill / guix / guix.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
gnu: geos: Update to 3.8.0.
[jackhill/guix/guix.git] / gnu / packages / geo.scm
CommitLineData
03c1662e
LF		 1;;; GNU Guix --- Functional package management for GNU
2;;; Copyright © 2016 Leo Famulari <leo@famulari.name>
ad1ff78d 3;;; Copyright © 2016 Alex Griffin <a@ajgrf.com>
f6c507e1 4;;; Copyright © 2017, 2018 Björn Höfling <bjoern.hoefling@bjoernhoefling.de>
257c826c 5;;; Copyright © 2018, 2019 Tobias Geerinckx-Rice <me@tobias.gr>
8d26f48e 6;;; Copyright © 2018 Ricardo Wurmus <rekado@elephly.net>
d33afa26 7;;; Copyright © 2018, 2019 Arun Isaac <arunisaac@systemreboot.net>
3d60f426 8;;; Copyright © 2018 Joshua Sierles, Nextjournal <joshua@nextjournal.com>
6dd0e41d 9;;; Copyright © 2018, 2019 Julien Lepiller <julien@lepiller.eu>
ed72a133 10;;; Copyright © 2019 Guillaume Le Vaillant <glv@posteo.net>
0f7b8a7f 11;;; Copyright © 2019 Efraim Flashner <efraim@flashner.co.il>
41b4b713 12;;; Copyright © 2019 Wiktor Żelazny <wzelazny@vurv.cz>
53c9b398 13;;; Copyright © 2019 Hartmut Goebel <h.goebel@crazy-compilers.com>
03c1662e
LF		 14;;;
15;;; This file is part of GNU Guix.
16;;;
17;;; GNU Guix is free software; you can redistribute it and/or modify it
18;;; under the terms of the GNU General Public License as published by
19;;; the Free Software Foundation; either version 3 of the License, or (at
20;;; your option) any later version.
21;;;
22;;; GNU Guix is distributed in the hope that it will be useful, but
23;;; WITHOUT ANY WARRANTY; without even the implied warranty of
24;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
25;;; GNU General Public License for more details.
26;;;
27;;; You should have received a copy of the GNU General Public License
28;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
29
30(define-module (gnu packages geo)
6dd0e41d 31 #:use-module (guix build-system ant)
8fa3451c 32 #:use-module (guix build-system cmake)
03c1662e 33 #:use-module (guix build-system glib-or-gtk)
065d0125 34 #:use-module (guix build-system gnu)
be7c64ba 35 #:use-module (guix build-system go)
5339d2bb 36 #:use-module (guix build-system meson)
f25e1e24 37 #:use-module (guix build-system python)
f2b005f6 38 #:use-module (guix build-system scons)
3d60f426 39 #:use-module (guix build-system r)
03c1662e 40 #:use-module (guix download)
d56af1ff 41 #:use-module (guix git-download)
f041db86 42 #:use-module (guix svn-download)
065d0125 43 #:use-module ((guix licenses) #:prefix license:)
03c1662e
LF		 44 #:use-module (guix packages)
45 #:use-module (guix utils)
0f7b8a7f 46 #:use-module (gnu packages astronomy)
ed72a133 47 #:use-module (gnu packages autotools)
f2b005f6 48 #:use-module (gnu packages boost)
f25e1e24 49 #:use-module (gnu packages check)
1a39141d 50 #:use-module (gnu packages compression)
f2b005f6 51 #:use-module (gnu packages databases)
889e94e3
JL		 52 #:use-module (gnu packages datastructures)
53 #:use-module (gnu packages documentation)
0f7b8a7f 54 #:use-module (gnu packages fonts)
f2b005f6 55 #:use-module (gnu packages fontutils)
03c1662e
LF		 56 #:use-module (gnu packages glib)
57 #:use-module (gnu packages gnome)
58 #:use-module (gnu packages gtk)
1a39141d 59 #:use-module (gnu packages image)
f2b005f6 60 #:use-module (gnu packages icu4c)
f041db86 61 #:use-module (gnu packages java)
b0e2299a 62 #:use-module (gnu packages lua)
996e45cb 63 #:use-module (gnu packages pcre)
2b9be1a6 64 #:use-module (gnu packages perl)
03c1662e 65 #:use-module (gnu packages pkg-config)
dc8621a2 66 #:use-module (gnu packages protobuf)
f2b005f6 67 #:use-module (gnu packages python)
0a71e34e 68 #:use-module (gnu packages python-web)
44d10b1f 69 #:use-module (gnu packages python-xyz)
0f7b8a7f 70 #:use-module (gnu packages qt)
cd0322a3 71 #:use-module (gnu packages sqlite)
5b19776e 72 #:use-module (gnu packages web)
03c1662e 73 #:use-module (gnu packages webkit)
a2a53274 74 #:use-module (gnu packages wxwidgets)
03c1662e
LF		 75 #:use-module (gnu packages xml))
76
a7607572
BH		 77(define-public geos
78 (package
79 (name "geos")
d33afa26 80 (version "3.8.0")
a7607572
BH		 81 (source (origin
82 (method url-fetch)
83 (uri (string-append "http://download.osgeo.org/geos/geos-"
84 version
85 ".tar.bz2"))
86 (sha256
87 (base32
d33afa26 88 "1mb2v9fy1gnbjhcgv0xny11ggfb17vkzsajdyibigwsxr4ylq4cr"))))
a7607572
BH		 89 (build-system gnu-build-system)
90 (arguments `(#:phases
91 (modify-phases %standard-phases
92 (add-after
93 'unpack 'patch-test-shebangs
94 (lambda _
95 (substitute* '("tests/xmltester/testrunner.sh"
96 "tests/geostest/testrunner.sh")
97 (("/bin/sh") (which "sh")))
98 #t)))))
99 (inputs
100 `(("glib" ,glib)))
101 (home-page "https://geos.osgeo.org/")
102 (synopsis "Geometry Engine for Geographic Information Systems")
103 (description
104 "GEOS provides a spatial object model and fundamental geometric
105functions. It is a C++ port of the Java Topology Suite (JTS). As such,
106it aims to contain the complete functionality of JTS in C++. This
107includes all the OpenGIS Simple Features for SQL spatial predicate
108functions and spatial operators, as well as specific JTS enhanced
109topology functions.")
110 (license (list license:lgpl2.1+ ; Main distribution.
111 license:zlib ; tests/xmltester/tinyxml/*
112 license:public-domain)))) ; include/geos/timeval.h
113
03c1662e
LF		 114(define-public gnome-maps
115 (package
116 (name "gnome-maps")
62f0e9bd 117 (version "3.32.2.1")
03c1662e
LF		 118 (source (origin
119 (method url-fetch)
120 (uri (string-append "mirror://gnome/sources/" name "/"
121 (version-major+minor version) "/"
122 name "-" version ".tar.xz"))
123 (sha256
124 (base32
62f0e9bd 125 "1m191iq1gjaqz79ci3dkbmwrkxp7pzknngimlf5bqib5x8yairlb"))))
5339d2bb 126 (build-system meson-build-system)
03c1662e 127 (arguments
5339d2bb 128 `(#:glib-or-gtk? #t
03c1662e
LF		 129 #:phases
130 (modify-phases %standard-phases
b0a7c0c3
EF		 131 (add-after 'unpack 'skip-gtk-update-icon-cache
132 ;; Don't create 'icon-theme.cache'.
133 (lambda _
134 (substitute* "meson_post_install.py"
135 (("gtk-update-icon-cache") "true"))
136 #t))
67bd376b
KK		 137 (add-after 'install 'wrap
138 (lambda* (#:key inputs outputs #:allow-other-keys)
139 (let ((out (assoc-ref outputs "out"))
140 (gi-typelib-path (getenv "GI_TYPELIB_PATH"))
5339d2bb
RW		 141 (geocode-glib-path (string-append
142 (assoc-ref inputs "geocode-glib")
143 "/lib"))
67bd376b 144 (goa-path (string-append
2cf1e37c 145 (assoc-ref inputs "gnome-online-accounts:lib")
67bd376b 146 "/lib"))
2cf1e37c
KK		 147 (gdk-pixbuf-path (string-append
148 (assoc-ref inputs "gdk-pixbuf")
149 "/lib"))
67bd376b
KK		 150 (webkitgtk-path (string-append
151 (assoc-ref inputs "webkitgtk")
152 "/lib")))
153 (wrap-program (string-append out "/bin/gnome-maps")
154 `("GI_TYPELIB_PATH" ":" prefix (,gi-typelib-path))
03c1662e 155
67bd376b 156 ;; There seems to be no way to embed the path of
5339d2bb 157 ;; libgoa-1.0.so.0, libwebkit2gtk-4.0.so.37,
2cf1e37c
KK		 158 ;; libgdk_pixbuf-2.0.so, libjavascriptcoregtk-4.0.so.18, and
159 ;; libgeocode-glib.so.0
5339d2bb
RW		 160 `("LD_LIBRARY_PATH" ":" prefix (,goa-path
161 ,webkitgtk-path
2cf1e37c 162 ,gdk-pixbuf-path
5339d2bb 163 ,geocode-glib-path)))
67bd376b 164 #t))))))
03c1662e 165 (native-inputs
b0a7c0c3 166 `(("gobject-introspection" ,gobject-introspection)
03c1662e
LF		 167 ("intltool" ,intltool)
168 ("pkg-config" ,pkg-config)))
169 (inputs
170 `(("folks" ,folks)
171 ("libchamplain" ,libchamplain)
172 ("libgee" ,libgee)
8d26f48e
RW		 173 ("libsecret" ,libsecret)
174 ("libsoup" ,libsoup)
175 ("libgweather" ,libgweather)
03c1662e 176 ("libxml2" ,libxml2)
2cf1e37c 177 ("gdk-pixbuf" ,gdk-pixbuf+svg)
8d26f48e 178 ("glib-networking" ,glib-networking)
03c1662e
LF		 179 ("geoclue" ,geoclue)
180 ("geocode-glib" ,geocode-glib)
181 ("gfbgraph" ,gfbgraph)
182 ("gjs" ,gjs)
183 ("glib" ,glib)
2cf1e37c 184 ("gnome-online-accounts:lib" ,gnome-online-accounts "lib")
8d26f48e 185 ("gsettings-desktop-schemas" ,gsettings-desktop-schemas)
03c1662e
LF		 186 ("rest" ,rest)
187 ("webkitgtk" ,webkitgtk)))
188 (propagated-inputs
189 `(("gtk+3" ,gtk+)))
190 (synopsis "Graphical map viewer and wayfinding program")
191 (description "GNOME Maps is a graphical map viewer. It uses map data from
192the OpenStreetMap project. It can provide directions for walking, bicycling,
193and driving.")
194 (home-page "https://wiki.gnome.org/Apps/Maps")
065d0125
BH		 195 (license license:gpl2+)))
196
22c7c775
BH		 197(define-public libgaiagraphics
198 (package
199 (name "libgaiagraphics")
200 (version "0.5")
201 (source
202 (origin
203 (method url-fetch)
204 (uri (string-append "https://www.gaia-gis.it/gaia-sins/libgaiagraphics-"
205 version ".tar.gz"))
206 (sha256
207 (base32
208 "076afqv417ag3hfvnif0qc7qscmnq1dsf6y431yygwgf34rjkayc"))))
209 (build-system gnu-build-system)
210 (native-inputs
211 `(("pkg-config" ,pkg-config)))
212 (inputs
213 `(("cairo" ,cairo)
214 ("libpng" ,libpng)
56e53392 215 ("libjpeg-turbo" ,libjpeg-turbo)
22c7c775
BH		 216 ("libtiff" ,libtiff)
217 ("libgeotiff" ,libgeotiff)
218 ("proj.4" ,proj.4)
219 ("libxml2" ,libxml2)
220 ("zlib" ,zlib)))
221 (synopsis "Gaia common graphics support")
222 (description "libgaiagraphics is a library supporting
223 common-utility raster handling methods.")
224 (home-page "https://www.gaia-gis.it/fossil/libgaiagraphics/index")
225 (license license:lgpl3+)))
226
1a39141d
BH		 227(define-public libgeotiff
228 (package
229 (name "libgeotiff")
a3783aca 230 (version "1.4.3")
1a39141d
BH		 231 (source
232 (origin
233 (method url-fetch)
234 (uri (string-append "http://download.osgeo.org/geotiff/libgeotiff/libgeotiff-"
235 version ".tar.gz"))
236 (sha256
a3783aca 237 (base32 "0rbjqixi4c8yz19larlzq6jda0px2gpmpp9c52cyhplbjsdhsldq"))
1a39141d
BH		 238 (modules '((guix build utils)))
239 (snippet
240 '(begin
241 ;; Remove .csv files, distributed from EPSG under a restricted
242 ;; license. See LICENSE for full license text.
243 (for-each delete-file (find-files "." "\\.csv$"))
244 ;; Now that we have removed the csv files, we need to modify the Makefile.
245 (substitute* "Makefile.in"
246 (("^all-am: .*$")
247 "all-am: Makefile $(LTLIBRARIES) $(HEADERS) geo_config.h\n")
248 (("^install-data-am: .*$")
6cbee49d
MW		 249 "install-data-am: install-includeHEADERS"))
250 #t))))
1a39141d
BH		 251 (build-system gnu-build-system)
252 (inputs
253 `(("libjpeg-turbo" ,libjpeg-turbo)
254 ("libtiff" ,libtiff)
255 ("proj.4" ,proj.4)
256 ("zlib" ,zlib)))
257 (arguments
258 `(#:configure-flags
259 (list (string-append "--with-zlib")
260 (string-append "--with-jpeg")
261 (string-append "--with-libtiff=" (assoc-ref %build-inputs "libtiff")))))
262 (synopsis "Library for handling GeoTIFF (geographic enabled TIFF)")
263 (description "libgeotiff is a library on top of libtiff for reading and
264writing GeoTIFF information tags.")
265 (home-page "https://trac.osgeo.org/geotiff/")
266 ;; This is a mixture of various contributions under different licenses.
267 ;; Note that the EPSG database is NOT "free to use" as the LICENSE file
268 ;; states, as its commercial redistribution is restricted. Hence, we have
269 ;; removed it from the package.
270 (license (list license:public-domain
271 license:x11
272 license:bsd-3
273 (license:non-copyleft "file://LICENSE"
274 "See LICENSE in the distribution.")))))
275
f6c507e1
BH		 276(define-public libspatialite
277 (package
278 (name "libspatialite")
279 (version "4.3.0a")
280 (source
281 (origin
282 (method url-fetch)
283 (uri (string-append "https://www.gaia-gis.it/gaia-sins/libspatialite-"
284 version ".tar.gz"))
285 (sha256
286 (base32
287 "16d4lpl7xrm9zy4gphy6nwanpjp8wn9g4wq2i2kh8abnlhq01448"))))
288 (build-system gnu-build-system)
289 (native-inputs
290 `(("pkg-config" ,pkg-config)))
291 (inputs
292 `(("freexl" ,freexl)
293 ("geos" ,geos)
294 ("libxml2" ,libxml2)
295 ("proj.4" ,proj.4)
296 ("sqlite" ,sqlite)
297 ("zlib" ,zlib)))
298 (arguments
299 `(#:phases
300 (modify-phases %standard-phases
301 ;; 3 tests are failing, ignore them:
302 (add-after 'unpack 'ignore-broken-tests
303 (lambda _
304 (substitute* '("test/Makefile.in")
305 (("\tcheck_sql_stm.*" all) "\tcheck_multithread$(EXEEXT) \\\n")
306 (("(\tch.*) check_v.*ble2.*$" all vt1) (string-append vt1 " \\\n"))
307 (("\tch.* (check_v.*ble4.*)$" all vt4) (string-append "\t" vt4)))
308 #t)))))
309 (synopsis "Extend SQLite to support Spatial SQL capabilities")
310 (description
311 "SpatiaLite is a library intended to extend the SQLite core to support
312fully fledged Spatial SQL capabilities.")
313 (home-page "https://www.gaia-gis.it/fossil/libspatialite/index")
314 ;; For the genuine libspatialite-sources holds:
315 ;; Any of the licenses MPL1.1, GPL2+ or LGPL2.1+ may be picked.
316 ;; Files under src/control_points are from GRASS
317 ;; and are licensed under GPL2+ only.
318 ;; src/md5.[ch]: Placed into the public domain by Alexander Peslyak.
319 (license (list license:gpl2+
320 license:lgpl2.1+
321 license:mpl1.1
322 license:public-domain))))
323
065d0125
BH		 324(define-public proj.4
325 (package
326 (name "proj.4")
327 (version "4.9.3")
328 (source (origin
329 (method url-fetch)
330 (uri (string-append "http://download.osgeo.org/proj/proj-"
331 version ".tar.gz"))
332 (sha256
333 (base32
334 "1xw5f427xk9p2nbsj04j6m5zyjlyd66sbvl2bkg8hd1kx8pm9139"))))
335 (build-system gnu-build-system)
336 (arguments
337 `(#:phases
338 (modify-phases %standard-phases
339 (add-after 'unpack 'patch-test-paths
340 (lambda _
341 (substitute* '("nad/test27"
342 "nad/test83"
343 "nad/testvarious"
344 "nad/testdatumfile"
345 "nad/testflaky"
346 "nad/testIGNF")
347 (("/bin/rm") (which "rm")))
348 #t))
349 ;; Precision problems on i686 and other platforms. See:
350 ;; https://web.archive.org/web/20151006134301/http://trac.osgeo.org/proj/ticket/255
351 ;; Disable failing test.
352 (add-after 'patch-test-paths 'ignore-failing-tests
353 (lambda _
354 (substitute* '("nad/Makefile.in")
355 (("\tPROJ_LIB.*" all) (string-append "#" all)))
356 #t)))))
357 (inputs
358 `(("glib" ,glib)))
359 (home-page "http://proj4.org/")
360 (synopsis "Cartographic Projections Library")
361 (description
362 "Proj.4 is a library for converting coordinates between cartographic
363projections.")
364 (license (list license:expat
365 ;; src/PJ_patterson.c
366 license:asl2.0
367 ;; src/geodesic.c/h
368 license:x11
369 ;; Embedded EPSG database.
370 (license:non-copyleft "http://www.epsg.org/TermsOfUse")
371 ;; cmake/*
372 license:boost1.0))))
f2b005f6
AI		 373
374(define-public mapnik
375 (package
376 (name "mapnik")
377 (version "3.0.18")
378 (source
379 (origin
380 (method url-fetch)
381 (uri (string-append "https://github.com/mapnik/mapnik/releases/download/v"
382 version "/mapnik-v" version ".tar.bz2"))
383 (sha256
384 (base32
385 "06frcikaj2mgz3abfk5h0z4j3hbksi0zikwjngbjv4p5f3pwxf8q"))))
386 (build-system scons-build-system)
387 (inputs
388 `(("boost" ,boost)
389 ("cairo" ,cairo)
390 ("freetype" ,freetype)
391 ("harfbuzz" ,harfbuzz)
392 ("icu4c" ,icu4c)
393 ("libjpeg-turbo" ,libjpeg-turbo)
394 ("libpng" ,libpng)
395 ("libtiff" ,libtiff)
396 ("libwebp" ,libwebp)
397 ("libxml2" ,libxml2)
398 ("proj.4" ,proj.4)
399 ("sqlite" ,sqlite)
400 ("zlib" ,zlib)))
401 (native-inputs
402 `(("pkg-config" ,pkg-config)))
403 (arguments
404 `(#:scons ,scons-python2
405 #:scons-flags
406 (list "CC=gcc"
407 (string-append "PREFIX=" %output)
408 (string-append "CUSTOM_LDFLAGS=-Wl,-rpath=" %output "/lib"))))
409 (home-page "http://mapnik.org/")
410 (synopsis "Toolkit for developing mapping applications")
411 (description "Mapnik is a toolkit for developing mapping applications. It
412is basically a collection of geographic objects like maps, layers,
413datasources, features, and geometries. At its core is a C++ shared library
414providing algorithms and patterns for spatial data access and visualization.
415The library does not rely on any specific windowing system and can be deployed
416to any server environment. It is intended to play fair in a multi-threaded
417environment and is aimed primarily, but not exclusively, at web-based
418development.")
419 (license (list license:lgpl2.1+
420 ;; demo/viewer, demo/python/rundemo.py
421 license:gpl2+
422 ;; deps/boost, deps/mapbox, deps/agg/include/agg_conv_offset.h
423 license:boost1.0
424 ;; deps/mapnik/sparsehash
425 license:bsd-3
426 ;; deps/agg
427 (license:non-copyleft "file://deps/agg/copying")))))
428
f25e1e24
AI		 429(define-public python2-mapnik
430 (package
431 (name "python2-mapnik")
432 (version "3.0.16")
433 (source
434 (origin
435 (method url-fetch)
436 (uri (string-append "https://github.com/mapnik/python-mapnik/archive/v"
437 version ".tar.gz"))
438 (file-name (string-append name "-" version ".tar.gz"))
439 (sha256
440 (base32
441 "0w7wg72gnwmbjani9sqk42p2jwqkrl9hsdkawahni5m05xsifcb4"))))
442 (build-system python-build-system)
443 (inputs
444 `(("boost" ,boost)
445 ("harfbuzz" ,harfbuzz)
446 ("icu4c" ,icu4c)
447 ("libjpeg-turbo" ,libjpeg-turbo)
448 ("libpng" ,libpng)
449 ("libtiff" ,libtiff)
450 ("libwebp" ,libwebp)
451 ("mapnik" ,mapnik)
452 ("proj.4" ,proj.4)
453 ("python2-pycairo" ,python2-pycairo)))
454 (native-inputs
455 (let ((test-data-input
456 (lambda (repository version hash)
457 (origin
458 (method url-fetch)
459 (uri (string-append "https://github.com/mapnik/" repository
460 "/archive/v" version ".tar.gz"))
461 (file-name (string-append "python-mapnik-" repository
462 "-" version ".tar.gz"))
463 (sha256 (base32 hash))))))
464 `(("python2-nose" ,python2-nose)
465 ;; Test data is released as separate tarballs
466 ("test-data"
467 ,(test-data-input "test-data" "3.0.18"
468 "10cvgn5gxn8ldrszj24zr1vzm5w76kqk4s7bl2zzp5yvkhh8lj1n"))
469 ("test-data-visual"
470 ,(test-data-input "test-data-visual" "3.0.18"
471 "1cb9ghy8sis0w5fkp0dvwxdqqx44rhs9a9w8g9r9i7md1c40r80i")))))
472 (arguments
473 `(#:python ,python-2 ; Python 3 support is incomplete, and the build fails
474 #:phases
475 (modify-phases %standard-phases
476 ;; Unpack test data into the source tree
477 (add-after 'unpack 'unpack-submodules
478 (lambda* (#:key inputs #:allow-other-keys)
479 (let ((unpack (lambda (source target)
480 (with-directory-excursion target
481 (invoke "tar" "xvf" (assoc-ref inputs source)
482 "--strip-components=1")))))
483 (unpack "test-data" "test/data")
484 (unpack "test-data-visual" "test/data-visual"))))
485 ;; Skip failing tests
486 (add-after 'unpack 'skip-tests
487 (lambda _
488 (let ((skipped-tests (list "test_vrt_referring_to_missing_files"
489 "test_unicode_regex_replace"
490 "test_proj_antimeridian_bbox"
491 "test_render_with_scale_factor")))
492 (substitute* "setup.cfg"
493 (("\\[nosetests\\]" all)
494 (string-append all "\nexclude=^("
495 (string-join skipped-tests "|") ")$")))))))))
496 (home-page "https://github.com/mapnik/python-mapnik")
497 (synopsis "Python bindings for Mapnik")
498 (description "This package provides Python bindings for Mapnik.")
499 (license license:lgpl2.1+)))
a2a53274
BH		 500
501(define-public spatialite-gui
502 (package
503 (name "spatialite-gui")
504 (version "1.7.1")
505 (source
506 (origin
507 (method url-fetch)
508 (uri (string-append "https://www.gaia-gis.it/gaia-sins/spatialite_gui-"
509 version ".tar.gz"))
510 (sha256
511 (base32
512 "1r05dz9pyc8vsd2wbqxcsracpfbaamz470rcyp2myfpqwznv376b"))))
513 (build-system gnu-build-system)
514 (native-inputs
515 `(("pkg-config" ,pkg-config)))
516 (inputs
517 `(("freexl" ,freexl)
518 ("geos" ,geos)
519 ("libgaiagraphics" ,libgaiagraphics)
520 ("libspatialite" ,libspatialite)
521 ("libxml2" ,libxml2)
522 ("proj.4" ,proj.4)
523 ("sqlite" ,sqlite)
524 ("wxwidgets" ,wxwidgets-2)
525 ("zlib" ,zlib)))
526 (synopsis "Graphical user interface for SpatiaLite")
527 (description "Spatialite-gui provides a visual interface for viewing and
528 maintaining a spatialite database. You can easily see the structure of the
529 tables and data contents using point and click functions, many of which
530 construct common SQL queries, or craft your own SQL queries.")
531 (home-page "https://www.gaia-gis.it/fossil/spatialite_gui/index")
532 (license license:gpl3+)))
3d60f426 533
996e45cb
JL		 534(define-public gdal
535 (package
536 (name "gdal")
537 (version "2.2.4")
538 (source (origin
539 (method url-fetch)
540 (uri (string-append
541 "http://download.osgeo.org/gdal/" version "/gdal-"
542 version ".tar.gz"))
543 (sha256
544 (base32
545 "1951f7b69x3d1vic0rmq92q8f4bj3hbxnxmj5jl0cc3zg0isgmdr"))
546 (modules '((guix build utils)))
547 (snippet
548 `(begin
549 ;; TODO: frmts contains a lot more bundled code.
550 (for-each delete-file-recursively
551 ;; bundled code
552 '("frmts/png/libpng"
553 "frmts/gif/giflib"
554 "frmts/jpeg/libjpeg"
555 "frmts/jpeg/libjpeg12"
556 "frmts/gtiff/libtiff"
557 "frmts/gtiff/libgeotiff"
558 "frmts/zlib"
559 "ogr/ogrsf_frmts/geojson/libjson"))))))
560 (build-system gnu-build-system)
561 (arguments
562 `(#:tests? #f
563 #:configure-flags
564 (let-syntax ((with (syntax-rules ()
565 ((_ option input)
566 (string-append option "="
567 (assoc-ref %build-inputs input))))))
568 (list
569 ;; TODO: --with-pcidsk, --with-pcraster
570 (with "--with-freexl" "freexl")
571 (with "--with-libjson-c" "json-c")
572 (with "--with-png" "libpng")
573 (with "--with-webp" "libwebp")
574 (with "--with-gif" "giflib")
109f022e 575 (with "--with-jpeg" "libjpeg-turbo")
996e45cb
JL		 576 (with "--with-libtiff" "libtiff")
577 (with "--with-geotiff" "libgeotiff")
578 (with "--with-libz" "zlib")
579 "--with-pcre"))
580 #:phases
581 (modify-phases %standard-phases
582 (add-before 'build 'fix-path
583 (lambda _
584 (substitute* "frmts/mrf/mrf_band.cpp"
585 (("\"../zlib/zlib.h\"") "<zlib.h>")))))))
586 (inputs
587 `(("freexl" ,freexl)
588 ("geos" ,geos)
589 ("giflib" ,giflib)
590 ("json-c" ,json-c)
591 ("libgeotiff" ,libgeotiff)
592 ("libjpeg-turbo" ,libjpeg-turbo)
593 ("libpng" ,libpng)
594 ("libtiff" ,libtiff)
595 ("libwebp" ,libwebp)
596 ("pcre" ,pcre)
597 ("zlib" ,zlib)))
598 (home-page "http://www.gdal.org/")
599 (synopsis "Raster and vector geospatial data format library")
600 (description "GDAL is a translator library for raster and vector geospatial
601data formats. As a library, it presents a single raster abstract data model
602and single vector abstract data model to the calling application for all
603supported formats. It also comes with a variety of useful command line
604utilities for data translation and processing.")
605 (license (list
606 ;; general license
607 license:expat
608 ;; frmts/gtiff/tif_float.c, frmts/pcraster/libcsf,
609 ;; ogr/ogrsf_frmts/dxf/intronurbs.cpp, frmts/pdf/pdfdataset.cpp
610 ;; frmts/mrf/
611 license:bsd-3
612 ;; frmts/hdf4/hdf-eos/*
613 ;; similar to the expat license, but without guarantee exclusion
614 (license:non-copyleft "file://frmts/hdf4/hdf-eos/README")
615 ;; frmts/grib/degrib/
616 license:public-domain ; with guarantee exclusion
617 ;; port/cpl_minizip*
618 ;; Some bsd-inspired license
619 (license:non-copyleft "file://port/LICENCE_minizip")
620 ;; alg/internal_libqhull
621 ;; Some 5-clause license
622 (license:non-copyleft "file://alg/internal_libqhull/COPYING.txt")
623 ;; frmts/mrf/libLERC
624 license:asl2.0))))
2b9be1a6 625
a18a27be
SB		 626(define-public python-gdal
627 (package (inherit gdal)
628 (name "python-gdal")
629 (build-system python-build-system)
630 (arguments
631 '(#:tests? #f ; no tests
632 #:phases
633 (modify-phases %standard-phases
634 (add-before 'build 'chdir
635 (lambda _
636 (chdir "swig/python")
637 #t)))))
638 (native-inputs '())
639 (propagated-inputs
640 `(("python-numpy" ,python-numpy)))
641 (inputs
642 `(("gdal" ,gdal)))
643 (synopsis "GDAL (Geospatial Data Abstraction Library) python bindings")))
644
2b9be1a6
JL		 645(define-public postgis
646 (package
647 (name "postgis")
6d18427f 648 (version "2.4.8")
2b9be1a6
JL		 649 (source (origin
650 (method url-fetch)
651 (uri (string-append "https://download.osgeo.org/postgis/source/postgis-"
652 version ".tar.gz"))
653 (sha256
654 (base32
6d18427f 655 "0nanza15xzfhbpbq49p1xqz96dgbsam5332y9zj6snmz2mq685ll"))))
2b9be1a6
JL		 656 (build-system gnu-build-system)
657 (arguments
658 `(#:tests? #f
659 #:make-flags
660 (list (string-append "datadir=" (assoc-ref %outputs "out") "/share")
661 (string-append "docdir="(assoc-ref %outputs "out") "/share/doc")
662 (string-append "pkglibdir="(assoc-ref %outputs "out") "/lib")
663 (string-append "bindir=" (assoc-ref %outputs "out") "/bin"))
664 #:phases
665 (modify-phases %standard-phases
666 (add-before 'build 'fix-install-path
667 (lambda* (#:key outputs #:allow-other-keys)
668 (substitute* '("raster/loader/Makefile" "raster/scripts/python/Makefile")
669 (("\\$\\(DESTDIR\\)\\$\\(PGSQL_BINDIR\\)")
670 (string-append (assoc-ref outputs "out") "/bin"))))))))
671 (inputs
672 `(("gdal" ,gdal)
673 ("geos" ,geos)
674 ("libxml2" ,libxml2)
675 ("pcre" ,pcre)
676 ("postgresql" ,postgresql)
677 ("proj.4" ,proj.4)))
678 (native-inputs
679 `(("perl" ,perl)
680 ("pkg-config" ,pkg-config)))
681 (home-page "https://postgis.net")
682 (synopsis "Spatial database extender for PostgreSQL")
683 (description "PostGIS is a spatial database extender for PostgreSQL
684object-relational database. It adds support for geographic objects allowing
8e3f06c9
JL		 685location queries to be run in SQL. This package provides a PostgreSQL
686extension.")
2b9be1a6
JL		 687 (license (list
688 ;; General license
689 license:gpl2+
690 ;; loader/dbfopen, safileio.*, shapefil.h, shpopen.c
691 license:expat
692 ;; loader/getopt.*
693 license:public-domain
694 ;; doc/xsl
695 license:bsd-3 ; files only say "BSD"
696 ;; doc
697 license:cc-by-sa3.0))))
be7c64ba
JL		 698
699(define-public tegola
700 (package
701 (name "tegola")
702 (version "0.7.0")
703 (source (origin
704 (method url-fetch)
705 (uri (string-append
706 "https://github.com/go-spatial/tegola/archive/v"
707 version ".tar.gz"))
708 (file-name (string-append name "-" version ".tar.gz"))
709 (sha256
710 (base32
711 "09vnzxfn0r70kmd776kcdfqxhzdj11syxa0b27z4ci1k367v7viw"))))
712 (build-system go-build-system)
713 (arguments
714 `(#:import-path "github.com/go-spatial/tegola/cmd/tegola"
d9ef50b3 715 #:unpack-path "github.com/go-spatial/tegola"
be7c64ba
JL		 716 #:phases
717 (modify-phases %standard-phases
718 (add-before 'build 'set-version
719 (lambda _
d9ef50b3 720 (with-directory-excursion "src/github.com/go-spatial/tegola"
be7c64ba
JL		 721 (substitute* '("cmd/tegola/cmd/root.go"
722 "cmd/tegola_lambda/main.go")
723 (("version not set") ,version)))
be7c64ba
JL		 724 #t)))))
725 (home-page "http://tegola.io")
726 (synopsis "Vector tile server for maps")
727 (description "Tegola is a free vector tile server written in Go. Tegola
728takes geospatial data and slices it into vector tiles that can be efficiently
729delivered to any client.")
730 (license (list
731 license:expat
732 ;; Some packages in vendor have other licenses
733 license:asl2.0
734 license:bsd-2
735 license:bsd-3
736 license:wtfpl2))))
3bd7611e
JL		 737
738(define-public imposm3
739 (package
740 (name "imposm3")
741 (version "0.6.0-alpha.4")
742 (source
743 (origin
744 (method url-fetch)
745 (uri (string-append "https://github.com/omniscale/imposm3/archive/v"
746 version ".tar.gz"))
747 (file-name (string-append name "-" version ".tar.gz"))
748 (sha256
749 (base32
750 "06f0kwmv52yd5m9jlckqxqmkf0cnqy3hamakrvg9lspplyqrds80"))))
751 (build-system go-build-system)
752 (arguments
753 `(#:import-path "github.com/omniscale/imposm3/cmd/imposm"
bdc0c20c 754 #:unpack-path "github.com/omniscale/imposm3"
3bd7611e
JL		 755 #:phases
756 (modify-phases %standard-phases
3bd7611e
JL		 757 (add-before 'build 'set-version
758 (lambda _
759 (substitute* "src/github.com/omniscale/imposm3/version.go"
760 (("0.0.0-dev") ,version))
761 #t)))))
762 (inputs
763 `(("geos" ,geos)
764 ("leveldb" ,leveldb)))
765 (home-page "https://imposm.org/")
766 (synopsis "OpenStreetMap importer for PostGIS")
767 (description "Imposm is an importer for OpenStreetMap data. It reads PBF
768files and imports the data into PostgreSQL/PostGIS databases. It is designed
769to create databases that are optimized for rendering/tile/map-services.")
770 (license (list
771 license:asl2.0
772 ;; Some dependencies in vendor have different licenses
773 license:expat
774 license:bsd-2
775 license:bsd-3))))
8fa3451c 776
889e94e3
JL		 777(define-public libosmium
778 (package
779 (name "libosmium")
780 (version "2.14.2")
781 (source
f4daf250
TGR		 782 (origin
783 (method git-fetch)
784 (uri (git-reference
785 (url "https://github.com/osmcode/libosmium.git")
786 (commit (string-append "v" version))))
787 (file-name (git-file-name name version))
788 (sha256
789 (base32 "123ri1l0a2b9fljgpwsl7z2w4i3kmgxz79d4ns9z4mwbp8sw0250"))))
889e94e3
JL		 790 (build-system cmake-build-system)
791 (propagated-inputs
792 `(("boost" ,boost)
793 ("expat" ,expat)
794 ("gdal" ,gdal)
795 ("geos" ,geos)
796 ("proj.4" ,proj.4)
797 ("protozero" ,protozero)
798 ("sparsehash" ,sparsehash)
799 ("zlib" ,zlib)))
800 (native-inputs
801 `(("doxygen" ,doxygen)))
802 (home-page "https://osmcode.org/libosmium/")
803 (synopsis "C++ library for working with OpenStreetMap data")
804 (description "Libosmium is a fast and flexible C++ library for working with
805OpenStreetMap data.")
806 (license license:boost1.0)))
b0e2299a
JL		 807
808(define-public osm2pgsql
809 (package
810 (name "osm2pgsql")
811 (version "0.96.0")
82b47fd9
TGR		 812 (source
813 (origin
814 (method git-fetch)
815 (uri (git-reference
816 (url "https://github.com/openstreetmap/osm2pgsql.git")
817 (commit version)))
818 (file-name (git-file-name name version))
819 (sha256
820 (base32 "032cydh8ynaqfhdzmkvgbmqyjql668y6qln1l59l2s3ni9963bbl"))
821 (modules '((guix build utils)))
822 (snippet
823 '(begin
824 (delete-file-recursively "contrib/protozero")
825 (delete-file-recursively "contrib/libosmium")
826 #t))))
b0e2299a
JL		 827 (build-system cmake-build-system)
828 (arguments
829 `(#:tests? #f; tests fail because we need to setup a database
830 #:configure-flags
831 (list (string-append "-DOSMIUM_INCLUDE_DIR="
832 (assoc-ref %build-inputs "libosmium")
833 "/include")
834 (string-append "-DPROTOZERO_INCLUDE_DIR="
835 (assoc-ref %build-inputs "protozero")
836 "/include"))))
837 (inputs
838 `(("boost" ,boost)
839 ("expat" ,expat)
840 ("libosmium" ,libosmium)
841 ("lua" ,lua)
842 ("postgresql" ,postgresql)
843 ("proj.4" ,proj.4)
844 ("protozero" ,protozero)
845 ("zlib" ,zlib)))
846 (native-inputs
847 `(("python-2" ,python-2)
848 ("python2-psycopg2" ,python2-psycopg2)))
849 (home-page "https://github.com/openstreetmap/osm2pgsql")
850 (synopsis "OSM data importer to postgresql")
851 (description "Osm2pgsql is a tool for loading OpenStreetMap data into a
852PostgreSQL / PostGIS database suitable for applications like rendering into a
853map, geocoding with Nominatim, or general analysis.")
854 (license license:gpl2+)))
6f91223f
JL		 855
856(define-public tippecanoe
857 (package
858 (name "tippecanoe")
859 (version "1.31.5")
8f33d05e
TGR		 860 (source
861 (origin
862 (method git-fetch)
863 (uri (git-reference
864 (url "https://github.com/mapbox/tippecanoe.git")
865 (commit version)))
866 (file-name (git-file-name name version))
867 (sha256
868 (base32 "1m0x931a945sr7axyhcvpwh798m58hx1zxh6ikgf9gsgqhdhmszz"))))
6f91223f
JL		 869 (build-system gnu-build-system)
870 (arguments
871 `(#:phases
872 (modify-phases %standard-phases (delete 'configure))
873 #:test-target "test"
874 #:make-flags
875 (list "CC=gcc"
876 (string-append "PREFIX=" (assoc-ref %outputs "out")))))
877 (inputs
878 `(("perl" ,perl)
879 ("sqlite" ,sqlite)
880 ("zlib" ,zlib)))
881 (home-page "https://github.com/mapbox/tippecanoe")
882 (synopsis "Vector tile server for maps")
883 (description "Tippecanoe creates scale-independent view of data, so that
884the texture and density of features is visible at every zoom level, instead of
885dropping features at lower levels.")
886 (license license:bsd-2)))
ed72a133
GLV		 887
888(define-public osmctools
889 (package
890 (name "osmctools")
891 (version "0.9")
892 (source
893 (origin
894 (method git-fetch)
895 (uri (git-reference
896 (url "https://gitlab.com/osm-c-tools/osmctools")
897 (commit version)))
898 (file-name (git-file-name name version))
899 (sha256
900 (base32
901 "1m8d3r1q1v05pkr8k9czrmb4xjszw6hvgsf3kn9pf0v14gpn4r8f"))))
902 (build-system gnu-build-system)
903 (native-inputs
904 `(("autoconf" ,autoconf)
905 ("automake" ,automake)))
906 (inputs
907 `(("zlib" ,zlib)))
908 (home-page "https://gitlab.com/osm-c-tools/osmctools")
909 (synopsis "Tools to convert, filter and update OpenStreetMap data files")
910 (description "This project contains a few tools which are used in the
911OpenStreetMap project. They can be used to convert, filter and update
912OpenStreetMap data files.")
913 (license license:agpl3)))
ee34be73
GLV		 914
915(define-public osm-gps-map
916 (package
917 (name "osm-gps-map")
918 (version "1.1.0")
919 (source
920 (origin
921 (method url-fetch)
922 (uri (string-append
923 "https://github.com/nzjrs/osm-gps-map/releases/download/"
924 version "/osm-gps-map-" version ".tar.gz"))
925 (sha256
926 (base32
927 "11imsf4cz1dpxdjh178k2s29axmq86rkfg1pqmn7incyxmjzhbwg"))))
928 (build-system gnu-build-system)
929 (native-inputs
930 `(("gnome-common" ,gnome-common)
931 ("gtk-doc" ,gtk-doc)
932 ("pkg-config" ,pkg-config)))
933 (inputs
934 `(("cairo" ,cairo)
935 ("glib" ,glib)
936 ("gobject-introspection" ,gobject-introspection)
937 ("gtk+" ,gtk+)
938 ("libsoup" ,libsoup)))
939 (home-page "https://nzjrs.github.io/osm-gps-map/")
940 (synopsis "GTK+ widget for displaying OpenStreetMap tiles")
941 (description
942 "This package provides a GTK+ widget (and Python bindings) that when
943given GPS coordinates,draws a GPS track, and points of interest on a moving
944map display. Downloads map data from a number of websites, including
945@url{https://www.openstreetmap.org}.")
946 (license license:gpl2+)))
0f7b8a7f
EF		 947
948(define-public xygrib
949 (package
950 (name "xygrib")
29bdabb6 951 (version "1.2.6.1")
0f7b8a7f
EF		 952 (source (origin
953 (method git-fetch)
954 (uri (git-reference
955 (url "https://github.com/opengribs/XyGrib.git")
956 (commit (string-append "v" version))))
957 (file-name (git-file-name name version))
958 (sha256
959 (base32
29bdabb6 960 "0xzsm8pr0zjk3f8j880fg5n82jyxn8xf1330qmmq1fqv7rsrg9ia"))
0f7b8a7f
EF		 961 (modules '((guix build utils)))
962 (snippet
963 '(begin (delete-file-recursively "data/fonts") #t))))
964 (build-system cmake-build-system)
965 (arguments
966 `(#:phases
967 (modify-phases %standard-phases
968 (add-after 'unpack 'patch-directories
969 (lambda* (#:key inputs #:allow-other-keys)
970 (let ((jpeg (assoc-ref inputs "openjpeg"))
971 (font (assoc-ref inputs "font-liberation")))
972 (substitute* "CMakeLists.txt"
973 ;; Find libjpeg.
974 (("/usr") jpeg)
975 ;; Fix install locations.
976 (("set\\(PREFIX_BIN.*") "set(PREFIX_BIN \"bin\")\n")
977 (("set\\(PREFIX_PKGDATA.*") "set(PREFIX_PKGDATA \"share/${PROJECT_NAME}\")\n")
978 ;; Skip looking for the static library.
979 (("\"libnova.a\"") ""))
980 ;; Don't use the bundled font-liberation.
981 (substitute* "src/util/Font.cpp"
982 (("Util::pathFonts\\(\\)\\+\"liberation-fonts/\"")
983 (string-append "\"" font "/share/fonts/truetype/\"")))
984 (substitute* "src/util/Util.h"
985 (("pathData\\(\\)\\+\"data/fonts/\"")
986 (string-append "\"" font "/share/fonts/\""))))
987 #t)))
988 #:tests? #f)) ; no tests
989 (native-inputs
990 `(("qttools" ,qttools)))
991 (inputs
992 `(("bzip2" ,bzip2)
993 ("font-liberation" ,font-liberation)
994 ("libnova" ,libnova)
995 ("libpng" ,libpng)
996 ("openjpeg" ,openjpeg)
997 ("proj.4" ,proj.4)
998 ("qtbase" ,qtbase)
999 ("zlib" ,zlib)))
1000 (synopsis "Weather Forecast Visualization")
1001 (description
1002 "XyGrib is a Grib file reader and visualizes meteorological data providing
1003an off-line capability to analyse weather forecasts or hindcasts. It is
1004intended to be used as a capable weather work station for anyone with a serious
1005interest in examining weather. This would include members of the sailing
1006community, private and sport aviators, farmers, weather buffs and many more.
1007XyGrib is the continuation of the zyGrib software package with a new team of
1008volunteers.")
1009 (home-page "https://opengribs.org")
1010 (license license:gpl3+)))
41b4b713
WŻ		 1011
1012(define-public libspatialindex
1013 (package
1014 (name "libspatialindex")
1015 (version "1.8.5")
1016 (source
1017 (origin
1018 (method url-fetch)
1019 (uri (string-append "https://download.osgeo.org/libspatialindex/"
1020 "spatialindex-src-" version ".tar.gz"))
1021 (sha256
1022 (base32
1023 "1vxzm7kczwnb6qdmc0hb00z8ykx11zk3sb68gc7rch4vrfi4dakw"))))
1024 (build-system gnu-build-system)
1025 (home-page "https://libspatialindex.org")
1026 (synopsis "Spatial indexing library")
1027 (description "The purpose of this library is to provide:
1028
1029@itemize
1030 @item An extensible framework that will support robust spatial indexing
1031methods.
1032 @item Support for sophisticated spatial queries. Range, point location,
1033 nearest neighbor and k-nearest neighbor as well as parametric queries (defined
1034by spatial constraints) should be easy to deploy and run.
1035 @item Easy to use interfaces for inserting, deleting and updating information.
1036 @item Wide variety of customization capabilities. Basic index and storage
1037characteristics like the page size, node capacity, minimum fan-out, splitting
1038algorithm, etc. should be easy to customize.
1039 @item Index persistence. Internal memory and external memory structures
1040should be supported. Clustered and non-clustered indices should be easy to be
1041persisted.
1042@end itemize
1043")
1044 (license license:expat)))
6dd0e41d
JL		 1045
1046(define-public java-jmapviewer
1047 (package
1048 (name "java-jmapviewer")
1049 (version "2.12")
1050 (source (origin
1051 (method url-fetch)
1052 (uri (string-append "https://svn.openstreetmap.org/applications/"
1053 "viewer/jmapviewer/releases/" version
1054 "/JMapViewer-" version "-Source.zip"))
1055 (sha256
1056 (base32
1057 "08hbqsbs859v4m5d90560fdifavd1apnpz9v9iry1v31dsvy5707"))))
1058 (build-system ant-build-system)
1059 (native-inputs
1060 `(("unzip" ,unzip)))
1061 (arguments
1062 `(#:build-target "pack"
1063 #:tests? #f; No tests
1064 #:phases
1065 (modify-phases %standard-phases
1066 (add-before 'build 'clean
1067 (lambda* _
1068 (invoke "ant" "clean")))
1069 (replace 'install
1070 (lambda* (#:key outputs #:allow-other-keys)
1071 (let ((dir (string-append (assoc-ref outputs "out") "/share/java/")))
1072 (mkdir-p dir)
1073 (copy-file "JMapViewer.jar" (string-append dir "JMapViewer.jar"))))))))
1074 (home-page "https://wiki.openstreetmap.org/wiki/JMapViewer")
1075 (synopsis "OSM map integration in Java")
1076 (description "JMapViewer is a Java component which allows to easily
1077integrate an OSM map view into your Java application. It is maintained as
1078an independent project by the JOSM team.")
1079 (license license:gpl2)))
f041db86
JL		 1080
1081(define-public josm
1082 (package
1083 (name "josm")
5c1bd7b8 1084 (version "15553")
f041db86
JL		 1085 (source (origin
1086 (method svn-fetch)
1087 (uri (svn-reference
1088 (url "https://josm.openstreetmap.de/svn/trunk")
1089 (revision (string->number version))
1090 (recursive? #f)))
1091 (sha256
1092 (base32
5c1bd7b8 1093 "091pbcn4fnmk42fmxplhis3nw5dbljf6ws8acyhx5dflyn49xzmx"))
f041db86
JL		 1094 (file-name (string-append name "-" version "-checkout"))
1095 (modules '((guix build utils)))
1096 (snippet
1097 '(begin
1098 (for-each delete-file (find-files "." ".*.jar$"))
1099 #t))))
1100 (build-system ant-build-system)
1101 (native-inputs
1102 `(("javacc" ,javacc)))
1103 (inputs
1104 `(("java-commons-jcs" ,java-commons-jcs)
1105 ("java-commons-compress" ,java-commons-compress)
1106 ("java-jmapviewer" ,java-jmapviewer)
1107 ("java-jsonp-api" ,java-jsonp-api)
1108 ("java-jsonp-impl" ,java-jsonp-impl); runtime dependency
1109 ("java-metadata-extractor" ,java-metadata-extractor)
1110 ("java-openjfx-media" ,java-openjfx-media)
1111 ("java-signpost-core" ,java-signpost-core)
1112 ("java-svg-salamander" ,java-svg-salamander)))
1113 (arguments
1114 `(#:tests? #f
1115 #:jar-name "josm.jar"
1116 #:phases
1117 (modify-phases %standard-phases
1118 (add-after 'unpack 'rm-build.xml
1119 (lambda* _
1120 (delete-file "build.xml")
1121 #t))
1122 (add-before 'build 'fix-revision
1123 (lambda* _
1124 (with-output-to-file "REVISION.XML"
1125 (lambda _
1126 (display
1127 (string-append "<info><entry><commit revision=\"" ,version "\">"
1128 "<date>1970-01-01 00:00:00 +0000</date>"
1129 "</commit></entry></info>"))))
1130 #t))
1131 (add-before 'build 'fix-classpath
1132 (lambda* (#:key inputs #:allow-other-keys)
1133 (setenv "CLASSPATH"
1134 (string-join
1135 (filter
1136 (lambda (s)
1137 (let ((source (assoc-ref inputs "source")))
1138 (not (equal? (substring s 0 (string-length source)) source))))
1139 (string-split (getenv "CLASSPATH") #\:))
1140 ":"))
1141 #t))
1142 (add-before 'build 'generate-parser
1143 (lambda* _
1144 (let* ((dir "src/org/openstreetmap/josm/gui/mappaint/mapcss")
1145 (out (string-append dir "/parsergen"))
1146 (file (string-append dir "/MapCSSParser.jj")))
1147 (mkdir-p "src/org/openstreetmap/josm/gui/mappaint/mapcss/parsergen")
1148 (invoke "javacc" "-DEBUG_PARSER=false"
1149 "-DEBUG_TOKEN_MANAGER=false" "-JDK_VERSION=1.8"
1150 "-GRAMMAR_ENCODING=UTF-8"
1151 (string-append "-OUTPUT_DIRECTORY=" out)
1152 file))
1153 #t))
1154 (add-after 'build 'generate-epsg
1155 (lambda _
1156 (system* "javac" "scripts/BuildProjectionDefinitions.java"
1157 "-cp" "build/classes")
1158 (mkdir-p "data/projection")
1159 (with-output-to-file "data/projection/custom-epsg"
1160 (lambda _ (display "")))
1161 (invoke "java" "-cp" "build/classes:scripts:."
1162 "BuildProjectionDefinitions" ".")
1163 #t))
1164 (add-after 'generate-epsg 'copy-data
1165 (lambda _
1166 (mkdir-p "build/classes")
1167 (rename-file "data" "build/classes/data")
1168 #t))
1169 (add-before 'install 'regenerate-jar
1170 (lambda _
1171 ;; We need to regenerate the jar file to add data.
1172 (delete-file "build/jar/josm.jar")
1173 (invoke "jar" "-cf" "build/jar/josm.jar" "-C"
1174 "build/classes" ".")
1175 #t))
1176 (add-before 'build 'copy-styles
1177 (lambda _
1178 (mkdir-p "build/classes")
1179 (rename-file "styles" "build/classes/styles")
1180 #t))
1181 (add-before 'build 'copy-images
1182 (lambda _
1183 (mkdir-p "build/classes")
1184 (rename-file "images" "build/classes/images")
1185 #t))
1186 (add-before 'build 'copy-revision
1187 (lambda _
1188 (mkdir-p "build/classes")
1189 (with-output-to-file "build/classes/REVISION"
1190 (lambda _
1191 (display
1192 (string-append "Revision: " ,version "\n"
1193 "Is-Local-Build: true\n"
1194 "Build-Date: 1970-01-01 00:00:00 +0000\n"))))
1195 #t))
1196 (add-after 'install 'install-bin
1197 (lambda* (#:key outputs inputs #:allow-other-keys)
1198 (let* ((out (assoc-ref outputs "out"))
1199 (bin (string-append out "/bin")))
1200 (mkdir-p bin)
1201 (with-output-to-file (string-append bin "/josm")
1202 (lambda _
1203 (display
1204 (string-append "#!/bin/sh\n"
1205 (assoc-ref inputs "jdk") "/bin/java"
1206 " -cp " out "/share/java/josm.jar:"
1207 (getenv "CLASSPATH")
1208 " org.openstreetmap.josm.gui.MainApplication"))))
1209 (chmod (string-append bin "/josm") #o755))
1210 #t)))))
1211 (home-page "https://josm.openstreetmap.de")
1212 (synopsis "OSM editor")
1213 (description "JOSM is an extensible editor for OpenStreetMap (OSM). It
1214supports loading GPX tracks, background imagery and OSM data from local
1215sources as well as from online sources and allows to edit the OSM data (nodes,
1216ways, and relations) and their metadata tags.")
1217 (license license:gpl2+)))
53c9b398
HG		 1218
1219(define-public libmaxminddb
1220 (package
1221 (name "libmaxminddb")
1222 (version "1.4.2")
1223 (source
1224 (origin
1225 (method url-fetch)
1226 (uri (string-append "https://github.com/maxmind/libmaxminddb"
1227 "/releases/download/" version "/"
1228 "/libmaxminddb-" version ".tar.gz"))
1229 (sha256
1230 (base32 "0mnimbaxnnarlw7g1rh8lpxsyf7xnmzwcczcc3lxw8xyf6ljln6x"))))
1231 (build-system gnu-build-system)
1232 (arguments
1233 `(#:phases
1234 (modify-phases %standard-phases
1235 (add-before 'configure 'set-cc-to-gcc
1236 (lambda _
1237 (setenv "CC" "gcc"))))))
1238 (native-inputs
1239 `(("perl" ,perl)))
1240 (home-page "https://maxmind.github.io/libmaxminddb/")
1241 (synopsis "C library for the MaxMind DB file format")
1242 (description "The libmaxminddb library provides a C library for reading
1243MaxMind DB files, including the GeoIP2 databases from MaxMind. The MaxMind DB
1244format is a custom, but open, binary format designed to facilitate fast
1245lookups of IP addresses while allowing flexibility in the type of data
1246associated with an address.")
1247 (license license:asl2.0)))
b1414a81
HG		 1248
1249(define-public python-maxminddb
1250 (package
1251 (name "python-maxminddb")
1252 (version "1.5.1")
1253 (source
1254 (origin
1255 (method url-fetch)
1256 (uri (pypi-uri "maxminddb" version))
1257 (sha256
1258 (base32
1259 "0y9giw81k4wdmpryr4k42w50z292mf364a6vs1vxf83ksc9ig6j4"))))
1260 (build-system python-build-system)
1261 (arguments
1262 `(#:tests? #f)) ;; Tests require a copy of the maxmind database
1263 (inputs
1264 `(("libmaxminddb" ,libmaxminddb)))
1265 (home-page "http://www.maxmind.com/")
1266 (synopsis "Reader for the MaxMind DB format")
1267 (description "MaxMind DB is a binary file format that stores data indexed
1268by IP address subnets (IPv4 or IPv6). This is a Python module for reading
1269MaxMind DB files.")
1270 (license license:asl2.0)))
0a71e34e
HG		 1271
1272(define-public python-geoip2
1273 (package
1274 (name "python-geoip2")
1275 (version "2.9.0")
1276 (source
1277 (origin
1278 (method url-fetch)
1279 (uri (pypi-uri "geoip2" version))
1280 (sha256
1281 (base32
1282 "1w7cay5q6zawjzivqbwz5cqx1qbdjw6kbriccb7l46p7b39fkzzp"))))
1283 (build-system python-build-system)
1284 (arguments
1285 `(#:tests? #f)) ;; Tests require a copy of the maxmind database
1286 (inputs
1287 `(("python-maxminddb" ,python-maxminddb)
1288 ("python-requests" ,python-requests)))
1289 (home-page "http://www.maxmind.com/")
1290 (synopsis "MaxMind GeoIP2 API")
1291 (description "Provides an API for the GeoIP2 web services and databases.
1292The API also works with MaxMind’s free GeoLite2 databases.")
1293 (license license:asl2.0)))
jackhill's copy of GNU Guix: https://guix.gnu.org/