bc55c1ec7f464ba1fc03ea077cd7be4e95293bc2
[ctsim.git] / src / ifinfo.cpp
1 /*****************************************************************************
2 ** FILE IDENTIFICATION
3 **
4 **   Name:          ifinfo.cpp
5 **   Purpose:       Display information about an image file
6 **   Programmer:    Kevin Rosenberg
7 **   Date Started:  April 2000
8 **
9 **  This is part of the CTSim program
10 **  Copyright (C) 1983-2000 Kevin Rosenberg
11 **
12 **  $Id: ifinfo.cpp,v 1.4 2000/06/08 16:43:10 kevin Exp $
13 **
14 **  This program is free software; you can redistribute it and/or modify
15 **  it under the terms of the GNU General Public License (version 2) as
16 **  published by the Free Software Foundation.
17 **
18 **  This program is distributed in the hope that it will be useful,
19 **  but WITHOUT ANY WARRANTY; without even the implied warranty of
20 **  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
21 **  GNU General Public License for more details.
22 **
23 **  You should have received a copy of the GNU General Public License
24 **  along with this program; if not, write to the Free Software
25 **  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
26 ******************************************************************************/
27
28 /* FILE
29  *   ifinfo.c             Display info on sdf files
30  */
31
32 #include "ct.h"
33
34 enum { O_LABELS, O_STATS, O_NO_STATS, O_NO_LABELS, O_VERBOSE, O_HELP, O_VERSION, O_DEBUG };
35
36 static struct option my_options[] =
37 {
38   {"labels", 0, 0, O_LABELS},
39   {"no-labels", 0, 0, O_NO_LABELS},
40   {"stats", 0, 0, O_STATS},
41   {"no-stats", 0, 0, O_NO_STATS},
42   {"debug", 0, 0, O_DEBUG},
43   {"verbose", 0, 0, O_VERBOSE},
44   {"help", 0, 0, O_HELP},
45   {"version", 0, 0, O_VERSION},
46   {0, 0, 0, 0}
47 };
48
49 void 
50 ifinfo_usage (const char *program)
51 {
52   fprintf(stdout, "usage: %s infile [OPTIONS]\n", kbasename(program));
53   fprintf(stdout, "Imagefile information\n");
54   fprintf(stdout, "\n");
55   fprintf(stdout, "     infile       Name of input SDF file\n");
56   fprintf(stdout, "     --display    Display image\n");
57   fprintf(stdout, "     --labels     Print image labels (default)\n");
58   fprintf(stdout, "     --no-labels  Do not print image labels\n");
59   fprintf(stdout, "     --stats      Print image statistics (default)\n");
60   fprintf(stdout, "     --no-stats   Do not print image statistics\n");
61   fprintf(stdout, "     --debug      Debug mode\n");
62   fprintf(stdout, "     --verbose    Verbose mode\n");
63   fprintf(stdout, "     --version    Print version\n");
64   fprintf(stdout, "     --help       Print this help message\n");
65 }
66
67 int 
68 ifinfo_main (int argc, char *const argv[])
69 {
70   ImageFile *im;
71   char *in_file;
72   int opt_verbose = 0;
73   int opt_stats = 1;
74   int opt_labels = 1;
75   int opt_debug = 0;
76
77   while (1)
78     {
79       int c = getopt_long (argc, argv, "", my_options, NULL);
80       
81       if (c == -1)
82         break;
83       
84       switch (c)
85         {
86         case O_LABELS:
87           opt_labels = 1;
88           break;
89         case O_STATS:
90           opt_stats = 1;
91           break;
92         case O_NO_LABELS:
93           opt_labels = 0;
94           break;
95         case O_NO_STATS:
96           opt_stats = 0;
97           break;
98         case O_VERBOSE:
99           opt_verbose = 1;
100           break;
101         case O_DEBUG:
102           opt_debug = 0;
103           break;
104         case O_VERSION:
105 #ifdef VERSION
106           fprintf(stdout, "Version %s\n", VERSION);
107 #else
108           fprintf(stderr, "Unknown version number");
109 #endif
110           exit(0);
111         case O_HELP:
112         case '?':
113           ifinfo_usage(argv[0]);
114           return (0);
115         default:
116           ifinfo_usage(argv[0]);
117           return (1);
118         }
119     }
120
121   if (optind + 1 != argc)
122     {
123       ifinfo_usage(argv[0]);
124       return (1);
125     }
126   
127   in_file = argv[optind];
128
129   im = new ImageFile (in_file);
130   if (! im->adf.fileRead ()) {
131     sys_error (ERR_WARNING, "Unable to read file %s", in_file);
132     return (1);
133   }
134
135   if (opt_labels) 
136     {
137       int nlabels = im->adf.getNumLabels();
138       int i;
139
140       for (i = 0; i < nlabels; i++)
141         {
142             Array2dFileLabel label;
143             im->adf.labelRead (label, i);
144
145             string str;
146             label.getDateString (str);
147
148             if (label.getLabelType() == Array2dFileLabel::L_HISTORY) {
149               cout << "History: " << label.getLabelString() << endl;
150               cout << "  calc time = " << label.getCalcTime() << " secs" << endl;
151               cout << "  Timestamp = " << str << endl;
152             } else if (label.getLabelType() == Array2dFileLabel::L_USER) {
153               cout << "Note: " <<  label.getLabelString() << endl;
154               cout << "  Timestamp = %s" << str << endl;
155           }
156         }
157     }
158
159   if (opt_stats)
160     {
161       double minfound = HUGE_VAL, maxfound = -HUGE_VAL;
162       double mode = 0, mean = 0, stddev = 0;
163       double spread;
164       int hist[256];
165       int ibin, nbin = 256;
166       int max_bin, max_binindex; 
167       double maxbin;
168       int ix, iy;
169
170       maxbin = nbin - 1;
171       ImageFileArray v = im->getArray();
172       int nx = im->nx();
173       int ny = im->ny();
174
175       for (ix = 0; ix < nx; ix++)
176         {
177           for (iy = 0; iy < ny; iy++)
178             {
179               if (v[ix][iy] > maxfound)
180                 maxfound = v[ix][iy];
181               if (v[ix][iy] < minfound)
182                 minfound = v[ix][iy];
183               mean += v[ix][iy];
184             }
185         }
186       spread = maxfound - minfound;
187       if (spread == 0)
188         mode = minfound;
189       else
190         {
191           for (ibin = 0; ibin < nbin; ibin++)
192             hist[ibin] = 0;
193           for (ix = 0; ix < nx; ix++)
194             {
195               for (iy = 0; iy < ny; iy++)
196                 {
197                   int b = (int) ((((v[ix][iy] - minfound) / spread) * (double) maxbin) + 0.5);
198                   hist[b]++;
199                 }
200             }
201           max_binindex = 0;
202           max_bin = -1;
203           for (ibin = 0; ibin < nbin; ibin++)
204             {
205               if (hist[ibin] > max_bin)
206                 {
207                   max_bin = hist[ibin];
208                   max_binindex = ibin;
209                 }
210             }
211           mode = (((double) max_binindex) * spread / ((double) maxbin)) + minfound;
212         }
213
214       mean /= nx * ny;
215       for (ix = 0; ix < nx; ix++)
216         {
217           for (iy = 0; iy < ny; iy++)
218             {
219               double diff = (v[ix][iy] - mean);
220               stddev += diff * diff;
221             }
222         }
223       stddev = sqrt(stddev / (nx * ny));
224       cout << "nx=" << nx << endl;
225       cout << "nx=" << ny << endl;
226       cout << "min=" << minfound << endl;
227       cout << "max=" << maxfound << endl;
228       cout << "mean=" << mean << endl;
229       cout << "mode=" << mode << endl;
230       cout << "stddef=" << stddev << endl;
231     }
232   
233   return (0);
234 }
235
236 #ifndef NO_MAIN
237 int 
238 main (int argc, char *const argv[])
239 {
240   return (ifinfo_main(argc, argv));
241 }
242 #endif