1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
#!/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
# ---------------------------------------------------------
# This is the test for the JIRA issue ECC-686.
# It tests changing the subtype in the ECMWF local section
# ---------------------------------------------------------
label="bufr_ecc-686_test"
tempRules=temp.${label}.filter
tempBufr=temp.${label}.bufr
set_subtype()
{
oldSubtype=$1
newSubtype=$2
input=${data_dir}/bufr/aaen_55.bufr
cat > $tempRules << EOF
print " Setting oldSubtype $oldSubtype and newSubtype $newSubtype";
print " BEFORE: numObs=[localNumberOfObservations] satID=[satelliteID]";
transient old_localNumberOfObservations = localNumberOfObservations;
transient old_satelliteID = satelliteID;
set oldSubtype=$oldSubtype;
set newSubtype=$newSubtype;
print " AFTER: numObs=[localNumberOfObservations] satID=[satelliteID]";
set satelliteID = old_satelliteID;
set localNumberOfObservations = old_localNumberOfObservations;
print " RESTORE: numObs=[localNumberOfObservations] satID=[satelliteID]";
assert(localNumberOfObservations==128);
assert(satelliteID==209);
write;
EOF
${tools_dir}/codes_bufr_filter -o $tempBufr $tempRules $input
res=`${tools_dir}/bufr_get -p oldSubtype,newSubtype,localNumberOfObservations,satelliteID $tempBufr`
[ "$res" = "$oldSubtype $newSubtype 128 209" ]
rm -f $tempRules $tempBufr
}
# Non-special subType
set_subtype 30 256
# Special range: 31, 121 <= x <= 130
set_subtype 31 256
set_subtype 121 256
set_subtype 130 256
# oldSubtype = maximum 255 and newSubtype takes over
set_subtype 255 256
rm -f $tempRules $tempBufr
|
