File: fp2hdf.test

package info (click to toggle)
libhdf4 4.3.1-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 30,384 kB
  • sloc: ansic: 128,700; sh: 15,015; fortran: 12,444; java: 5,863; xml: 1,205; makefile: 794; yacc: 678; pascal: 418; perl: 360; javascript: 203; lex: 163; csh: 41
file content (128 lines) | stat: -rw-r--r-- 3,828 bytes parent folder | download | duplicates (7)
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
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
#! /bin/csh -f 
#                   Script for testing fp2hdf
#
# The input files used in this script for testing fp2hdf are 
# described in the file README.test.      
#
# Output files can be examined with hdfls to see if basic
# contents are there.  Those with raster images can be displayed
# using NCSA Image, DataScope, etc.  Those with floating point
# data can be examined using hdfed or DataScope.
# 
# Note: these tests are not exhaustive.  You may want to add some
# of your own, especially if you are doing something a little
# different from what we are testing for.  You may also want to 
# eliminate some of these tests if they are not relevant.
# 
set echo
# text (100x100) => SDS only 
./fp2hdf testfiles/fp2hdf/t100x100 -o o1 
#
# text => image only
./fp2hdf testfiles/fp2hdf/t100x100 -o o2 -r
#
# text => SDS and image
./fp2hdf testfiles/fp2hdf/t100x100 -o o3 -r -f
#
# hdf (100x100) => SDS and image
./fp2hdf testfiles/fp2hdf/h100x100 -o o4 -r -f
#
# hdf => SDS and image w palette
./fp2hdf testfiles/fp2hdf/h100x100 -o o5 -f -r -p testfiles/fp2hdf/pal.hdf
#
# hdf => 200x200 image, pixel replication 
./fp2hdf testfiles/fp2hdf/h100x100 -o o6 -r -e 200 200
#
# hdf => 200x200 image, bilinear interporlation 
./fp2hdf testfiles/fp2hdf/h100x100 -o o7 -r -i 200 200
#
# hdf => 40x120 interpolated image w palette
./fp2hdf testfiles/fp2hdf/h100x100 -o o8 -r -i 40 120 -p testfiles/fp2hdf/pal.hdf
#
# hdf => 40x120 pixel rep image w palette (should generate and error)
./fp2hdf testfiles/fp2hdf/h100x100 -o o9 -r -e 40 120 -p testfiles/fp2hdf/pal.hdf
#
# hdf (60x75) => 120x160 pixel rep image w palette
./fp2hdf testfiles/fp2hdf/h60x75 -o o10 -r -e 120 160 -p testfiles/fp2hdf/pal.hdf
#
# hdf (100x100, horizontal scale is non-uniform) => SDS and image w palette
./fp2hdf testfiles/fp2hdf/h100x100h -o o11 -f -r -p testfiles/fp2hdf/pal.hdf
#
# hdf (100x100, horiz and vert scales are non-uniform) => SDS and image w pal
./fp2hdf testfiles/fp2hdf/h100x100hv -o o12 -f -r -p testfiles/fp2hdf/pal.hdf
#
# hdf (60x75 vert scale is non-uniform) => 120x160 image with palette
./fp2hdf testfiles/fp2hdf/h60x75v -o o13 -r -e 120 160 -p testfiles/fp2hdf/pal.hdf
#
# hdf (60x75 no scales) => 120x150 pixel rep image with palette
./fp2hdf testfiles/fp2hdf/h60x75n -o o14 -r -e 120 150 -p testfiles/fp2hdf/pal.hdf
#
# From several files => a file with 100x100 images for all of them
./fp2hdf testfiles/fp2hdf/t100x100 testfiles/fp2hdf/h100x100 testfiles/fp2hdf/h100x100h testfiles/fp2hdf/h100x100hv testfiles/fp2hdf/h60x75 testfiles/fp2hdf/h60x75v -o o15 -r -e 100 100
#
# Now do test on the other set of input files
#
# C: text (3x4) => SDS 
./fp2hdf ctxtr2 -o o20 
#
# C: text (3x4x5) => SDS 
./fp2hdf ctxtr3 -o o21
#
# C: binary 32-bit (3x4) => SDS
./fp2hdf cb32r2 -o o22 
#
# C: binary 32-bit (3x4x5) => SDS 
./fp2hdf cb32r3 -o o23 
#
# C: binary 64-bit (3x4) => SDS 
./fp2hdf cb64r2 -o o24 
#
# C: binary 64-bit (3x4x5) => SDS 
./fp2hdf cb64r3 -o o25 
#
# C: text (3x4) => image
./fp2hdf ctxtr2 -o o26 -raster -e 50 50 
#
# C: binary (3x4) => image and SDS
./fp2hdf cb64r2 -o o27 -raster -i 50 50 -f
#
# 
# Fortran: text (3x4) => SDS 
./fp2hdf ftxtr2 -o o30 
#
# Fortran: text (3x4x5) => SDS 
./fp2hdf ftxtr3 -o o31
#
# Fortran: binary 32-bit (3x4) => SDS
./fp2hdf fb32r2 -o o32 
#
# Fortran: binary 32-bit (3x4x5) => SDS 
./fp2hdf fb32r3 -o o33 
#
# Fortran: binary 64-bit (3x4) => SDS 
./fp2hdf fb64r2 -o o34 
#
# Fortran: binary 64-bit (3x4x5) => SDS 
./fp2hdf fb64r3 -o o35 
#
# Fortran: text (3x4) => image
./fp2hdf ftxtr2 -o o36 -raster -e 50 50 
#
# Fortran: binary (3x4) => image and SDS
./fp2hdf fb64r2 -o o37 -raster -i 50 50 -f
#
# 
# Compare files o20-o27 with o30-o37.  They should be the same.
#
cmp o20 o30
cmp o21 o31
cmp o22 o32
cmp o23 o33
cmp o24 o34
cmp o25 o35
cmp o26 o36
cmp o27 o37

unset echo