From 6be4e25c66e805218c851d67157e4d1ddc0a761e Mon Sep 17 00:00:00 2001
From: Even Rouault <even.rouault@spatialys.com>
Date: Tue, 10 Nov 2020 14:40:17 +0100
Subject: cct: allow @filename syntax

Similarly as for projinfo, allow "cct @filename" to mean read filename and
use its content as if it was provided inline. Useful for WKT or PROJJSON

And a tiny improvements, when the object definition contains ':', only try
proj_create_from_database() if the left part (authority name) matches a known
authority, to avoid a warning.
---
 test/cli/testcct | 93 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 93 insertions(+)

(limited to 'test/cli/testcct')

diff --git a/test/cli/testcct b/test/cli/testcct
index bbe698bd..db7c70a9 100755
--- a/test/cli/testcct
+++ b/test/cli/testcct
@@ -44,6 +44,99 @@ echo "3541658.0000 948985.0000 5201384.0000 2020.5" >> b
 $EXE EPSG:8366 a b >>${OUT}
 /bin/rm a b
 
+cat > in.wkt <<EOF
+COORDINATEOPERATION["ITRF2014 to ETRF2014 (1)",
+    VERSION["EUREF-Eur"],
+    SOURCECRS[
+        GEODCRS["ITRF2014",
+            DYNAMIC[
+                FRAMEEPOCH[2010]],
+            DATUM["International Terrestrial Reference Frame 2014",
+                ELLIPSOID["GRS 1980",6378137,298.257222101,
+                    LENGTHUNIT["metre",1]]],
+            PRIMEM["Greenwich",0,
+                ANGLEUNIT["degree",0.0174532925199433]],
+            CS[Cartesian,3],
+                AXIS["(X)",geocentricX,
+                    ORDER[1],
+                    LENGTHUNIT["metre",1]],
+                AXIS["(Y)",geocentricY,
+                    ORDER[2],
+                    LENGTHUNIT["metre",1]],
+                AXIS["(Z)",geocentricZ,
+                    ORDER[3],
+                    LENGTHUNIT["metre",1]],
+            ID["EPSG",7789]]],
+    TARGETCRS[
+        GEODCRS["ETRF2014",
+            DATUM["European Terrestrial Reference Frame 2014",
+                ELLIPSOID["GRS 1980",6378137,298.257222101,
+                    LENGTHUNIT["metre",1]]],
+            PRIMEM["Greenwich",0,
+                ANGLEUNIT["degree",0.0174532925199433]],
+            CS[Cartesian,3],
+                AXIS["(X)",geocentricX,
+                    ORDER[1],
+                    LENGTHUNIT["metre",1]],
+                AXIS["(Y)",geocentricY,
+                    ORDER[2],
+                    LENGTHUNIT["metre",1]],
+                AXIS["(Z)",geocentricZ,
+                    ORDER[3],
+                    LENGTHUNIT["metre",1]],
+            ID["EPSG",8401]]],
+    METHOD["Time-dependent Position Vector tfm (geocentric)",
+        ID["EPSG",1053]],
+    PARAMETER["X-axis translation",0,
+        LENGTHUNIT["millimetre",0.001],
+        ID["EPSG",8605]],
+    PARAMETER["Y-axis translation",0,
+        LENGTHUNIT["millimetre",0.001],
+        ID["EPSG",8606]],
+    PARAMETER["Z-axis translation",0,
+        LENGTHUNIT["millimetre",0.001],
+        ID["EPSG",8607]],
+    PARAMETER["X-axis rotation",0,
+        ANGLEUNIT["milliarc-second",4.84813681109536E-09],
+        ID["EPSG",8608]],
+    PARAMETER["Y-axis rotation",0,
+        ANGLEUNIT["milliarc-second",4.84813681109536E-09],
+        ID["EPSG",8609]],
+    PARAMETER["Z-axis rotation",0,
+        ANGLEUNIT["milliarc-second",4.84813681109536E-09],
+        ID["EPSG",8610]],
+    PARAMETER["Scale difference",0,
+        SCALEUNIT["parts per billion",1E-09],
+        ID["EPSG",8611]],
+    PARAMETER["Rate of change of X-axis translation",0,
+        LENGTHUNIT["millimetres per year",3.16887651727315E-11],
+        ID["EPSG",1040]],
+    PARAMETER["Rate of change of Y-axis translation",0,
+        LENGTHUNIT["millimetres per year",3.16887651727315E-11],
+        ID["EPSG",1041]],
+    PARAMETER["Rate of change of Z-axis translation",0,
+        LENGTHUNIT["millimetres per year",3.16887651727315E-11],
+        ID["EPSG",1042]],
+    PARAMETER["Rate of change of X-axis rotation",0.085,
+        ANGLEUNIT["milliarc-seconds per year",1.53631468932076E-16],
+        ID["EPSG",1043]],
+    PARAMETER["Rate of change of Y-axis rotation",0.531,
+        ANGLEUNIT["milliarc-seconds per year",1.53631468932076E-16],
+        ID["EPSG",1044]],
+    PARAMETER["Rate of change of Z-axis rotation",-0.77,
+        ANGLEUNIT["milliarc-seconds per year",1.53631468932076E-16],
+        ID["EPSG",1045]],
+    PARAMETER["Rate of change of Scale difference",0,
+        SCALEUNIT["parts per billion per year",3.16887651727315E-17],
+        ID["EPSG",1046]],
+    PARAMETER["Parameter reference epoch",1989,
+        TIMEUNIT["year",31556925.445],
+        ID["EPSG",1047]]]
+EOF
+echo "Test cct with WKT in a file" >> ${OUT}
+echo "3541657.3778 948984.2343 5201383.5231 2020.5" | $EXE @in.wkt >>${OUT}
+rm in.wkt
+
 # do 'diff' with distribution results
 echo "diff ${OUT} with testcct_out.dist"
 diff -u ${OUT} ${TEST_CLI_DIR}/testcct_out.dist
-- 
cgit v1.2.3