2024-06-21 11:31:19 +00:00
|
|
|
#!/bin/sh
|
|
|
|
|
# (C) Copyright 2005- ECMWF.
|
|
|
|
|
#
|
|
|
|
|
# This software is licensed under the terms of the Apache Licence Version 2.0
|
|
|
|
|
# which can be obtained at http://www.apache.org/licenses/LICENSE-2.0.
|
|
|
|
|
#
|
|
|
|
|
# In applying this licence, ECMWF does not waive the privileges and immunities granted to it by
|
|
|
|
|
# virtue of its status as an intergovernmental organisation nor does it submit to any jurisdiction.
|
|
|
|
|
#
|
|
|
|
|
|
|
|
|
|
. ./include.ctest.sh
|
|
|
|
|
|
|
|
|
|
label="grib_ecc-1846_test"
|
|
|
|
|
tempGrib=temp.$label.grib
|
|
|
|
|
tempFilt=temp.$label.filt
|
|
|
|
|
tempLog=temp.$label.log
|
|
|
|
|
tempOut=temp.$label.txt
|
|
|
|
|
tempRef=temp.$label.ref
|
|
|
|
|
|
|
|
|
|
sample=$ECCODES_SAMPLES_PATH/GRIB2.tmpl
|
|
|
|
|
|
|
|
|
|
${tools_dir}/grib_set -s generatingProcessIdentifier=1,backgroundProcess=1 $sample $tempGrib
|
|
|
|
|
grib_check_key_equals $tempGrib modelName,modelVersion "AIFS v1"
|
|
|
|
|
|
|
|
|
|
${tools_dir}/grib_set -s generatingProcessIdentifier=154 $sample $tempGrib
|
|
|
|
|
grib_check_key_equals $tempGrib modelName,modelVersion "IFS cy48r1"
|
|
|
|
|
|
|
|
|
|
${tools_dir}/grib_set -s generatingProcessIdentifier=100 $sample $tempGrib
|
|
|
|
|
grib_check_key_equals $tempGrib modelName,modelVersion "IFS unknown"
|
|
|
|
|
|
2024-06-21 12:51:03 +00:00
|
|
|
# Keys are read-only (may change this later)
|
|
|
|
|
set +e
|
|
|
|
|
${tools_dir}/grib_set -s modelName=AIFS $sample $tempGrib 2>$tempLog
|
|
|
|
|
status=$?
|
|
|
|
|
set -e
|
|
|
|
|
[ $status -ne 0 ]
|
|
|
|
|
grep -q "Value is read only" $tempLog
|
|
|
|
|
|
|
|
|
|
set +e
|
|
|
|
|
${tools_dir}/grib_set -s modelVersion=cy48r1 $sample $tempGrib 2>$tempLog
|
|
|
|
|
status=$?
|
|
|
|
|
set -e
|
|
|
|
|
[ $status -ne 0 ]
|
|
|
|
|
grep -q "Value is read only" $tempLog
|
|
|
|
|
|
|
|
|
|
|
2024-06-21 11:31:19 +00:00
|
|
|
# Clean up
|
|
|
|
|
rm -f $tempGrib $tempFilt $tempLog $tempOut $tempRef
|
