mirror of https://github.com/ecmwf/eccodes.git
Tools: Remove unused options
This commit is contained in:
Shahram Najm
parent
3e4f38d4e8
commit
a72e9bf75a
|
|
@ -36,7 +36,6 @@ const char* grib_tool_description="List content of GTS files printing values of
|
|||
"some keys.\n\tIt does not fail when a key is not found.";
|
||||
const char* grib_tool_name="gts_ls";
|
||||
const char* grib_tool_usage="[options] file file ...";
|
||||
/*static char* new_handle="";*/
|
||||
|
||||
int grib_options_count=sizeof(grib_options)/sizeof(grib_option);
|
||||
int mode=0;
|
||||
|
|
|
|||
104
tools/taf_get.c
104
tools/taf_get.c
|
|
@ -40,10 +40,7 @@ const char* grib_tool_name="taf_get";
|
|||
const char* grib_tool_usage="[options] file file ...";
|
||||
|
||||
int grib_options_count=sizeof(grib_options)/sizeof(grib_option);
|
||||
double lat=0;
|
||||
double lon=0;
|
||||
int mode=0;
|
||||
grib_nearest* n=NULL;
|
||||
|
||||
int main(int argc, char *argv[]) { return grib_tool(argc,argv);}
|
||||
|
||||
|
|
@ -66,82 +63,6 @@ int grib_tool_init(grib_runtime_options* options)
|
|||
options->print_statistics=0;
|
||||
options->default_print_width=-1;
|
||||
|
||||
if (options->latlon) {
|
||||
|
||||
lat = strtod(options->latlon,&end);
|
||||
if (*end != ',') {
|
||||
printf("ERROR: wrong latitude value\n");
|
||||
exit(1);
|
||||
}
|
||||
lon= strtod(++end,&end1);
|
||||
|
||||
mode=GRIB_NEAREST_SAME_POINT | GRIB_NEAREST_SAME_GRID;
|
||||
|
||||
if (end1 && *end1 == ',') {
|
||||
end1++;
|
||||
if (*end1 != '0') {
|
||||
p=end1;
|
||||
while (*p != ',' && *p !='\0') p++;
|
||||
if (*end1 == '4') {
|
||||
options->latlon_mode=4;
|
||||
} else if (*end1 == '1') {
|
||||
options->latlon_mode=1;
|
||||
} else {
|
||||
printf("ERROR %s: wrong mode given in option -l\n",grib_tool_name);
|
||||
exit(1);
|
||||
}
|
||||
}
|
||||
if (*p == ',') {
|
||||
p++;
|
||||
options->latlon_mask=strdup(p);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
}
|
||||
|
||||
if (options->latlon && options->latlon_mask) {
|
||||
FILE* f=NULL;
|
||||
grib_handle* hh;
|
||||
f=fopen(options->latlon_mask,"r");
|
||||
if(!f) {
|
||||
perror(options->latlon_mask);
|
||||
exit(1);
|
||||
}
|
||||
hh=grib_handle_new_from_file(0,f,&ret);
|
||||
fclose(f);
|
||||
GRIB_CHECK_NOLINE(ret,0);
|
||||
n=grib_nearest_new(hh,&ret);
|
||||
GRIB_CHECK_NOLINE(ret,0);
|
||||
GRIB_CHECK_NOLINE(grib_nearest_find(n,hh,lat,lon,mode,
|
||||
options->lats,options->lons,options->mask_values,options->distances,options->indexes,&size),0);
|
||||
grib_nearest_delete(n);
|
||||
n=NULL;
|
||||
grib_handle_delete( hh);
|
||||
|
||||
options->latlon_idx=-1;
|
||||
max=options->distances[0];
|
||||
for (i=0;i<4;i++)
|
||||
if (max<options->distances[i]) {max=options->distances[i];}
|
||||
min=max;
|
||||
for (i=0;i<4;i++) {
|
||||
if ((min >= options->distances[i]) && (options->mask_values[i] >= 0.5)) {
|
||||
options->latlon_idx=i;
|
||||
min = options->distances[i];
|
||||
}
|
||||
}
|
||||
|
||||
if (options->latlon_idx<0){
|
||||
min=0;
|
||||
options->latlon_idx=0;
|
||||
for (i=1;i<4;i++)
|
||||
if (min>options->distances[i]) {
|
||||
min = options->distances[i];
|
||||
options->latlon_idx=i;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
|
@ -150,7 +71,6 @@ int grib_tool_new_filename_action(grib_runtime_options* options,const char* file
|
|||
return 0;
|
||||
}
|
||||
|
||||
|
||||
int grib_tool_new_file_action(grib_runtime_options* options,grib_tools_file* file)
|
||||
{
|
||||
return 0;
|
||||
|
|
@ -169,27 +89,6 @@ int grib_tool_new_handle_action(grib_runtime_options* options,grib_handle* h)
|
|||
if (err != GRIB_SUCCESS && options->fail) exit(err);
|
||||
}
|
||||
|
||||
if (options->latlon) {
|
||||
int err=0;
|
||||
double min;
|
||||
int i;
|
||||
if (!n) n=grib_nearest_new(h,&err);
|
||||
GRIB_CHECK_NOLINE(err,0);
|
||||
GRIB_CHECK_NOLINE(grib_nearest_find(n,h,lat,lon,mode,
|
||||
options->lats,options->lons,options->values,
|
||||
options->distances,options->indexes,&size),0);
|
||||
min=options->distances[0];
|
||||
options->latlon_idx=0;
|
||||
i=0;
|
||||
for (i=1;i<4;i++) {
|
||||
if (min>options->distances[i]) {
|
||||
min=options->distances[i];
|
||||
options->latlon_idx=i;
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
|
@ -206,9 +105,6 @@ void grib_tool_print_key_values(grib_runtime_options* options,grib_handle* h)
|
|||
|
||||
int grib_tool_finalise_action(grib_runtime_options* options)
|
||||
{
|
||||
|
||||
if (n) grib_nearest_delete(n);
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -41,7 +41,6 @@ const char* grib_tool_description="List content of TAF files printing values of
|
|||
"some keys.\n\tIt does not fail when a key is not found.";
|
||||
const char* grib_tool_name="taf_ls";
|
||||
const char* grib_tool_usage="[options] file file ...";
|
||||
static char* new_handle="";
|
||||
|
||||
int grib_options_count=sizeof(grib_options)/sizeof(grib_option);
|
||||
double lat=0;
|
||||
|
|
@ -155,67 +154,6 @@ int grib_tool_new_handle_action(grib_runtime_options* options, grib_handle* h)
|
|||
if( err != GRIB_SUCCESS && options->fail) exit(err);
|
||||
}
|
||||
|
||||
if (options->latlon) {
|
||||
int err=0;
|
||||
double min;
|
||||
if (!n) n=grib_nearest_new(h,&err);
|
||||
GRIB_CHECK_NOLINE(err,0);
|
||||
GRIB_CHECK_NOLINE(grib_nearest_find(n,h,lat,lon,0,
|
||||
options->lats,options->lons,options->values,
|
||||
options->distances,options->indexes,&size),0);
|
||||
|
||||
if (!options->latlon_mask) {
|
||||
min=options->distances[0];
|
||||
options->latlon_idx=0;
|
||||
i=0;
|
||||
for (i=1;i<4;i++) {
|
||||
if (min>options->distances[i]) {
|
||||
min=options->distances[i];
|
||||
options->latlon_idx=i;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if (json) {
|
||||
char* s="\n[\n";
|
||||
double missingValue=9999;
|
||||
char value[MAX_STRING_LEN];
|
||||
size_t len=MAX_STRING_LEN;
|
||||
printf("%s",new_handle);
|
||||
printf( "{\n");
|
||||
print_key_values(options,h);
|
||||
printf("\n, \"selected\" : %d",options->latlon_idx);
|
||||
printf(", \"method\" : ");
|
||||
if (options->latlon_mask) printf("\"nearest_land\"");
|
||||
else printf("\"nearest\"");
|
||||
printf("\n, \"neighbours\" : ");
|
||||
for (i=0;i<4;i++) {
|
||||
printf("%s",s);
|
||||
len=MAX_STRING_LEN;
|
||||
printf("{\"index\" : %d, \"latitude\" : %g, \"longitude\" : %g, \"distance\" : %g, "
|
||||
"\"distance_unit\" : \"km\", ",
|
||||
(int)options->indexes[i],options->lats[i],options->lons[i],
|
||||
options->distances[i]);
|
||||
if (grib_get_double_element(h,"values",options->indexes[i],&v) == GRIB_SUCCESS) {
|
||||
if (v==missingValue) printf("\"value\" : null ");
|
||||
else printf("\"value\" : %g ",v);
|
||||
}
|
||||
|
||||
if (grib_get_string( h,"units",value,&len)==GRIB_SUCCESS)
|
||||
printf(", \"unit\" : \"%s\"",value);
|
||||
|
||||
if (options->latlon_mask)
|
||||
printf(", \"mask_value\"=%.2f",options->mask_values[i]);
|
||||
printf("}");
|
||||
s="\n,";
|
||||
}
|
||||
|
||||
printf("\n]");
|
||||
printf("\n}");
|
||||
}
|
||||
|
||||
}
|
||||
new_handle="\n,";
|
||||
return 0;
|
||||
}
|
||||
|
||||
|
|
@ -236,34 +174,6 @@ void grib_tool_print_key_values(grib_runtime_options* options,grib_handle* h)
|
|||
/* this is executed after the last message in the last file is processed */
|
||||
int grib_tool_finalise_action(grib_runtime_options* options)
|
||||
{
|
||||
int i=0;
|
||||
if (options->latlon && options->verbose) {
|
||||
|
||||
printf("Input Point: latitude=%.2f longitude=%.2f\n",lat,lon);
|
||||
printf("Grid Point chosen #%d index=%d latitude=%.2f longitude=%.2f distance=%.2f (Km)\n",
|
||||
options->latlon_idx+1,(int)options->indexes[options->latlon_idx],
|
||||
options->lats[options->latlon_idx],
|
||||
options->lons[options->latlon_idx],
|
||||
options->distances[options->latlon_idx]);
|
||||
|
||||
if (options->latlon_mask) {
|
||||
printf("Mask values:\n");
|
||||
for (i=0;i<4;i++) {
|
||||
printf("- %d - index=%d latitude=%.2f longitude=%.2f distance=%.2f (Km) value=%.2f\n",
|
||||
i+1,(int)options->indexes[i],options->lats[i],options->lons[i],
|
||||
options->distances[i],options->mask_values[i]);
|
||||
}
|
||||
} else {
|
||||
printf("Other grid Points\n");
|
||||
for (i=0;i<4;i++) {
|
||||
printf("- %d - index=%d latitude=%.2f longitude=%.2f distance=%.2f (Km)\n",
|
||||
i+1,(int)options->indexes[i],options->lats[i],options->lons[i],
|
||||
options->distances[i]);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
if (n) grib_nearest_delete(n);
|
||||
if (json) printf("\n]\n");
|
||||
|
||||
return 0;
|
||||
|
|
|
|||
Loading…
Reference in New Issue