r.external: testsuite added (#2291)

This PR adds a testsuite (based on `r.in.gdal` testsuite).

raster/r.external/testsuite/data/generate_data.sh

@@ -0,0 +1,20 @@
+#!/bin/bash
+# This script requires the GRASS 7 North Carolina location
+
+export GRASS_OVERWRITE=1
+
+# 2D output
+g.region raster=elevation -p
+g.region res=100 -p
+
+r.out.gdal input=elevation output=elevation.tif format=GTiff
+r.out.gdal input=elevation output=elevation.tiff format=GTiff
+r.out.gdal input=elevation output=elevation.asc format=AAIGrid
+r.out.gdal input=elevation output=elevation.nc format=netCDF
+
+# 3D output
+g.region b=0 t=5 res3=100 tbres=1 -p3
+
+r.to.rast3 input=elevation output=elevation3d
+r3.out.netcdf input=elevation3d output=elevation3d.nc
+

raster/r.external/testsuite/test_r_external.py

@@ -0,0 +1,261 @@
+"""Test of r.external
+
+@author Markus Neteler
+"""
+from grass.gunittest.case import TestCase
+
+
+class TestGdalImport(TestCase):
+    @classmethod
+    def setUpClass(cls):
+        """Use temporary region settings"""
+        cls.use_temp_region()
+
+    @classmethod
+    def tearDownClass(cls):
+        """!Remove the temporary region"""
+        cls.del_temp_region()
+
+    def tearDown(self):
+        self.runModule(
+            "g.remove", type="raster", flags="f", pattern="test_external_map*"
+        )
+
+    def test_1(self):
+
+        self.assertModule(
+            "r.external",
+            "Register GTiff Format",
+            input="data/elevation.tif",
+            output="test_external_map",
+        )
+
+        self.runModule("g.region", raster="test_external_map")
+
+        # Output of r.univar
+        univar_string = """n=20250
+                         null_cells=0
+                         cells=20250
+                         min=56.1364936828613
+                         max=156.221710205078
+                         range=100.085216522217
+                         mean=110.358078733845
+                         mean_of_abs=110.358078733845
+                         stddev=20.3247267738233
+                         variance=413.09451843057
+                         coeff_var=18.4170719597623
+                         sum=2234751.09436035"""
+
+        self.assertRasterFitsUnivar(
+            raster="test_external_map", reference=univar_string, precision=3
+        )
+
+    def test_2(self):
+
+        self.assertModule(
+            "r.external",
+            "Register GTiff Format",
+            input="data/elevation.tiff",
+            output="test_external_map",
+        )
+
+        self.runModule("g.region", raster="test_external_map")
+
+        # Output of r.univar
+        univar_string = """n=20250
+                         null_cells=0
+                         cells=20250
+                         min=56.1364936828613
+                         max=156.221710205078
+                         range=100.085216522217
+                         mean=110.358078733845
+                         mean_of_abs=110.358078733845
+                         stddev=20.3247267738233
+                         variance=413.09451843057
+                         coeff_var=18.4170719597623
+                         sum=2234751.09436035"""
+
+        self.assertRasterFitsUnivar(
+            raster="test_external_map", reference=univar_string, precision=3
+        )
+
+    def test_3(self):
+
+        self.assertModule(
+            "r.external",
+            "Register AAIGrid Format",
+            input="data/elevation.asc",
+            output="test_external_map",
+        )
+
+        self.runModule("g.region", raster="test_external_map")
+
+        # Output of r.univar
+        univar_string = """n=20250
+                         null_cells=0
+                         cells=20250
+                         min=56.1364936828613
+                         max=156.221710205078
+                         range=100.085216522217
+                         mean=110.358078733845
+                         mean_of_abs=110.358078733845
+                         stddev=20.3247267738233
+                         variance=413.09451843057
+                         coeff_var=18.4170719597623
+                         sum=2234751.09436035"""
+
+        self.assertRasterFitsUnivar(
+            raster="test_external_map", reference=univar_string, precision=3
+        )
+
+    def test_4(self):
+
+        self.assertModule(
+            "r.external",
+            "Register netCDF Format",
+            input="data/elevation.nc",
+            output="test_external_map",
+        )
+
+        self.runModule("g.region", raster="test_external_map")
+
+        # Output of r.univar
+        univar_string = """n=20250
+                         null_cells=0
+                         cells=20250
+                         min=56.1364936828613
+                         max=156.221710205078
+                         range=100.085216522217
+                         mean=110.358078733845
+                         mean_of_abs=110.358078733845
+                         stddev=20.3247267738233
+                         variance=413.09451843057
+                         coeff_var=18.4170719597623
+                         sum=2234751.09436035"""
+
+        self.assertRasterFitsUnivar(
+            raster="test_external_map", reference=univar_string, precision=3
+        )
+
+    def test_netCDF_3d_1(self):
+
+        self.assertModule(
+            "r.external",
+            "Register netCDF Format",
+            input="data/elevation3d.nc",
+            flags="o",
+            output="test_external_map",
+        )
+
+        # Output of r.info
+        info_string = """north=228500
+                       south=215000
+                       east=645000
+                       west=630000
+                       nsres=100
+                       ewres=100
+                       rows=135
+                       cols=150
+                       cells=20250
+                       datatype=FCELL
+                       ncats=0"""
+
+        self.assertRasterFitsInfo(
+            raster="test_external_map.1", reference=info_string, precision=3
+        )
+        self.assertRasterFitsInfo(
+            raster="test_external_map.2", reference=info_string, precision=3
+        )
+        self.assertRasterFitsInfo(
+            raster="test_external_map.3", reference=info_string, precision=3
+        )
+        self.assertRasterFitsInfo(
+            raster="test_external_map.4", reference=info_string, precision=3
+        )
+        self.assertRasterFitsInfo(
+            raster="test_external_map.5", reference=info_string, precision=3
+        )
+
+    def test_netCDF_3d_2(self):
+
+        self.assertModule(
+            "r.external",
+            "Register netCDF Format",
+            input="data/elevation3d.nc",
+            flags="o",
+            output="test_external_map",
+        )
+
+        # Output of r.info
+        info_string = """north=228500
+                       south=215000
+                       east=645000
+                       west=630000
+                       nsres=100
+                       ewres=100
+                       rows=135
+                       cols=150
+                       cells=20250
+                       datatype=FCELL
+                       ncats=0"""
+
+        self.assertRasterFitsInfo(
+            raster="test_external_map.1", reference=info_string, precision=3
+        )
+        self.assertRasterFitsInfo(
+            raster="test_external_map.2", reference=info_string, precision=3
+        )
+        self.assertRasterFitsInfo(
+            raster="test_external_map.3", reference=info_string, precision=3
+        )
+        self.assertRasterFitsInfo(
+            raster="test_external_map.4", reference=info_string, precision=3
+        )
+        self.assertRasterFitsInfo(
+            raster="test_external_map.5", reference=info_string, precision=3
+        )
+
+    def test_netCDF_3d_3(self):
+
+        self.assertModule(
+            "r.external",
+            "Register netCDF Format",
+            input="data/elevation3d.nc",
+            flags="o",
+            band=2,
+            output="test_external_map",
+        )
+
+        # Output of r.info
+        info_string = """north=228500
+                       south=215000
+                       east=645000
+                       west=630000
+                       nsres=100
+                       ewres=100
+                       rows=135
+                       cols=150
+                       cells=20250
+                       datatype=FCELL
+                       ncats=0"""
+
+        self.assertRasterFitsInfo(
+            raster="test_external_map", reference=info_string, precision=3
+        )
+
+
+class TestExternalImportFails(TestCase):
+    def test_error_handling_1(self):
+        # Wrong band number
+        self.assertModuleFail(
+            "r.external",
+            input="data/elevation.nc",
+            band="-1",
+            output="test_external_map",
+        )
+
+
+if __name__ == "__main__":
+    from grass.gunittest.main import test
+
+    test()