mirror of https://github.com/ecmwf/eccodes.git
83 lines
2.5 KiB
C
83 lines
2.5 KiB
C
/*
|
|
* Copyright 2005-2019 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 "grib_api_internal.h"
|
|
|
|
static void usage (const char *prog)
|
|
{
|
|
printf ("usage: %s infile\n", prog);
|
|
exit (1);
|
|
}
|
|
|
|
static unsigned char buffer[50000000];
|
|
|
|
int main (int argc, char *argv[])
|
|
{
|
|
char *filename;
|
|
FILE *f;
|
|
grib_handle *h = NULL;
|
|
grib_context *c;
|
|
size_t size = 0;
|
|
int ret = 0;
|
|
size_t bufsize = sizeof (buffer);
|
|
long count, step, edition, totalLength;
|
|
char gridType[50], levelType[50], level[50], shortName[50];
|
|
size_t gridTypelen = sizeof (gridType);
|
|
size_t levelTypelen = sizeof (levelType);
|
|
size_t levellen = sizeof (level);
|
|
size_t shortNamelen = sizeof (shortName);
|
|
size_t len;
|
|
|
|
if (argc != 2)
|
|
usage (argv[0]);
|
|
filename = argv[1];
|
|
|
|
f = fopen (filename, "rb");
|
|
if (!f) {
|
|
perror (filename);
|
|
exit (1);
|
|
}
|
|
c = grib_context_get_default ();
|
|
|
|
size = bufsize;
|
|
count = 1;
|
|
while ((ret = grib_read_any_from_file (c, f, buffer, &size)) == GRIB_SUCCESS) {
|
|
if ((1)) {
|
|
h = grib_handle_new_from_message_copy (c, buffer, size);
|
|
if (!h) {
|
|
printf ("unable to new from message\n");
|
|
exit (1);
|
|
}
|
|
else {
|
|
grib_get_long (h, "edition", &edition);
|
|
grib_get_long (h, "step", &step);
|
|
grib_get_long (h, "totalLength", &totalLength);
|
|
len = gridTypelen;
|
|
grib_get_string (h, "gridType", gridType, &len);
|
|
len = levelTypelen;
|
|
GRIB_CHECK (grib_get_string (h, "levelType", levelType, &len), 0);
|
|
len = levellen;
|
|
grib_get_string (h, "level", level, &len);
|
|
len = shortNamelen;
|
|
grib_get_string (h, "shortName", shortName, &len);
|
|
printf ("- %3ld -\t ed=%ld\t size=%8ld totalLength=%8ld \t %s\t %s\t %s\t level=%s\t step=%ld\n",
|
|
count, edition, (long) size, totalLength, shortName, gridType, levelType, level, step);
|
|
grib_handle_delete (h);
|
|
}
|
|
}
|
|
else {
|
|
printf ("MESSAGE #%ld\n", count);
|
|
}
|
|
size = bufsize;
|
|
count++;
|
|
}
|
|
|
|
return 0;
|
|
}
|