Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
Menu
Open sidebar
mpim-sw
libcdi
Commits
b5ecae73
Commit
b5ecae73
authored
Feb 21, 2014
by
Uwe Schulzweida
Browse files
grib_api: debug patch from Florian and Daniel
parent
af9ea711
Changes
4
Expand all
Hide whitespace changes
Inline
Side-by-side
ChangeLog
View file @
b5ecae73
2014-02-21 Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
* grib_api: debug patch from Florian and Daniel
2014-02-20 Uwe Schulzweida <Uwe.Schulzweida@zmaw.de>
* grib2: set stepUnits after changing the template [Bug #4500]
...
...
src/cdi_int.c
View file @
b5ecae73
...
...
@@ -67,6 +67,7 @@ int CDI_Debug = 0; /* If set to 1, debugging */
static
int
STREAM_Debug
=
0
;
/* If set to 1, debugging */
int
cdiGribApiDebug
=
0
;
int
cdiDefaultLeveltype
=
-
1
;
static
int
cdiDataUnreduced
=
0
;
static
int
cdiSortName
=
0
;
...
...
@@ -178,6 +179,9 @@ void cdiInitialize(void)
gribSetConst
(
1
);
// 1: Don't pack constant fields on regular grids
#endif
value
=
cdiGetenvInt
(
"CDI_GRIBAPI_DEBUG"
);
if
(
value
>=
0
)
cdiGribApiDebug
=
(
int
)
value
;
value
=
cdiGetenvInt
(
"CDI_REGULARGRID"
);
if
(
value
>=
0
)
cdiDataUnreduced
=
(
int
)
value
;
...
...
@@ -388,26 +392,12 @@ int streamSize(void)
void
cdiDefGlobal
(
const
char
*
string
,
int
val
)
{
if
(
strcmp
(
string
,
"REGULARGRID"
)
==
0
)
{
cdiDataUnreduced
=
val
;
}
else
if
(
strcmp
(
string
,
"SORTNAME"
)
==
0
)
{
cdiSortName
=
val
;
}
else
if
(
strcmp
(
string
,
"HAVE_MISSVAL"
)
==
0
)
{
cdiHaveMissval
=
val
;
}
else
if
(
strcmp
(
string
,
"NC_CHUNKSIZEHINT"
)
==
0
)
{
cdiNcChunksizehint
=
val
;
}
else
{
Warning
(
"Unsupported global key: %s"
,
string
);
}
if
(
strcmp
(
string
,
"REGULARGRID"
)
==
0
)
cdiDataUnreduced
=
val
;
else
if
(
strcmp
(
string
,
"GRIBAPI_DEBUG"
)
==
0
)
cdiGribApiDebug
=
val
;
else
if
(
strcmp
(
string
,
"SORTNAME"
)
==
0
)
cdiSortName
=
val
;
else
if
(
strcmp
(
string
,
"HAVE_MISSVAL"
)
==
0
)
cdiHaveMissval
=
val
;
else
if
(
strcmp
(
string
,
"NC_CHUNKSIZEHINT"
)
==
0
)
cdiNcChunksizehint
=
val
;
else
Warning
(
"Unsupported global key: %s"
,
string
);
}
...
...
src/cdi_int.h
View file @
b5ecae73
...
...
@@ -265,6 +265,7 @@ stream_t;
extern
int
CDI_Debug
;
/* If set to 1, debuggig (default 0) */
extern
int
cdiGribApiDebug
;
extern
double
cdiDefaultMissval
;
extern
int
cdiDefaultInstID
;
extern
int
cdiDefaultModelID
;
...
...
src/stream_gribapi.c
View file @
b5ecae73
This diff is collapsed.
Click to expand it.
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment