Skip to content

Instantly share code, notes, and snippets.

@apeyroux

apeyroux/gist:8117832

Last active January 1, 2016 08:19
Show Gist options
  • Save apeyroux/8117832 to your computer and use it in GitHub Desktop.
Save apeyroux/8117832 to your computer and use it in GitHub Desktop.
Download ZIP
Force the solicitation of tiles on #OSM cache server
Raw
gistfile1.hs
import HSlippyMap
main = do
mapM (\(x,y) -> mapM (\y'-> print $ "http://openstreetmap.asi.mi/" ++ show z ++ "/" ++ show x ++ "/" ++ show y' ++ ".png") y) [(x,\
[(minimum [tymin, tymax])..(maximum [tymin,tymax])]) | x <- [(minimum [txmin, txmax])..(maximum [txmin, txmax])]]
where
min = tileFromLatLong 49.13 3.05 8
max = tileFromLatLong 48.57 1.66 8
txmin = tx min
txmax = tx max
tymax = ty min
tymin = ty max
z = tz min
@apeyroux
Copy link
Author

HSlippyMap Exemple

Why ?

Force the solicitation of tiles on #OSM cache server

Install

cabal install HSlippyMap
ghc --make thislpaste.hs

Use

ja@x220:/codaz/HSlippyMap$ ./hsl | xargs wget -nv -O NULL --output-file osm.asi.log
ja@x220:/codaz/HSlippyMap$ cat osm.asi.log
2013-12-24 22:04:46 URL:http://tile.openstreetmap.org/8/129/87.png [37753/37753] -> "NULL" [1]
2013-12-24 22:04:46 URL:http://tile.openstreetmap.org/8/129/88.png [36997/36997] -> "NULL" [1]
2013-12-24 22:04:46 URL:http://tile.openstreetmap.org/8/130/87.png [36749/36749] -> "NULL" [1]
2013-12-24 22:04:47 URL:http://tile.openstreetmap.org/8/130/88.png [35550/35550] -> "NULL" [1]
FINISHED --2013-12-24 22:04:47--
Total wall clock time: 0,7s
Downloaded: 4 files, 144K in 0,4s (364 KB/s)

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment