#!/bin/bash

GDAL_TILE_PROCESSES=16
GDAL_TILE_ZOOMS=8-14
GDAL_SAMPLING_WARP=cubic
GDAL_SAMPLING_TILE=antialias

# Create virtual dataset with coordinates
gdal_translate -of VRT -a_srs EPSG:4326 -outsize 300% 300% -gcp 5778.0 7332.0 24 56 -gcp 20547.0 7251.0 26 56 -gcp 21210.0 33735.0 26 54 -gcp 5910.0 33864.0 24 54 1941_Strassenkarte_der_Baltischen_Laender_Blatt_6_Litauen__Ostblatt_mapywig_COMP60.jpg 1941_Strassenkarte_der_Baltischen_Laender_Blatt_6_Litauen__Ostblatt_mapywig_COMP60.vrt

# Add cutline to VRT
gdalwarp -r $GDAL_SAMPLING_WARP -tps -dstalpha -cutline_srs EPSG:4326 \
  -cutline "POLYGON(($(echo -e "1071.0 1572.0\n12942.0 1493.9638009049775\n24967.5 1559.9969834087483\n24904.5 35867.996983408746\n13068.0 35909.98190045249\n1185.0 36030.00150829562" | \
  gdaltransform -tps -output_xy 1941_Strassenkarte_der_Baltischen_Laender_Blatt_6_Litauen__Ostblatt_mapywig_COMP60.vrt | \
  awk 'NR==1{first=$0} {printf "%s %s,", $1,$2} END{print " " first}')))" \
  1941_Strassenkarte_der_Baltischen_Laender_Blatt_6_Litauen__Ostblatt_mapywig_COMP60.vrt 1941_Strassenkarte_der_Baltischen_Laender_Blatt_6_Litauen__Ostblatt_mapywig_COMP60.cut.vrt

# Generate tiles
gdal2tiles.py -r $GDAL_SAMPLING_TILE --xyz -z $GDAL_TILE_ZOOMS -x --processes=$GDAL_TILE_PROCESSES 1941_Strassenkarte_der_Baltischen_Laender_Blatt_6_Litauen__Ostblatt_mapywig_COMP60.cut.vrt 1941_Strassenkarte_der_Baltischen_Laender_Blatt_6_Litauen__Ostblatt_mapywig_COMP60.xyz