#!/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 3730.5 2365.6409116175655 23.170550000000002 55.75 -gcp 18526.5 2405.126181211784 23.837216666666666 55.75 -gcp 18615.0 32900.086992773766 23.837216666666666 55 -gcp 3556.5 32781.98513062813 23.170550000000002 55 Lietuv.un_Latv.dienvidu_dalas_top.kartes_Varni-Kelme-Baisogala_6828_A1_L35_2_04.JPG Lietuv.un_Latv.dienvidu_dalas_top.kartes_Varni-Kelme-Baisogala_6828_A1_L35_2_04.vrt

# Add cutline to VRT
gdalwarp -r $GDAL_SAMPLING_WARP -tps -dstalpha -cutline_srs EPSG:4326 \
  -cutline "POLYGON(($(echo -e "9792.75 2402.2649916712935\n1057.5 2347.5008328706276\n987.0 32758.49916712937\n9817.5 32827.5\n18616.875 32897.62479178234\n18592.5 22991.24791782343\n18573.0 12512.897556912827\n18527.25 2403.0" | \
  gdaltransform -tps -output_xy Lietuv.un_Latv.dienvidu_dalas_top.kartes_Varni-Kelme-Baisogala_6828_A1_L35_2_04.vrt | \
  awk 'NR==1{first=$0} {printf "%s %s,", $1,$2} END{print " " first}')))" \
  Lietuv.un_Latv.dienvidu_dalas_top.kartes_Varni-Kelme-Baisogala_6828_A1_L35_2_04.vrt Lietuv.un_Latv.dienvidu_dalas_top.kartes_Varni-Kelme-Baisogala_6828_A1_L35_2_04.cut.vrt

# Generate tiles
gdal2tiles.py -r $GDAL_SAMPLING_TILE --xyz -z $GDAL_TILE_ZOOMS -x --processes=$GDAL_TILE_PROCESSES Lietuv.un_Latv.dienvidu_dalas_top.kartes_Varni-Kelme-Baisogala_6828_A1_L35_2_04.cut.vrt Lietuv.un_Latv.dienvidu_dalas_top.kartes_Varni-Kelme-Baisogala_6828_A1_L35_2_04.xyz