/********************************************************
 *  ██████╗  ██████╗████████╗██╗
 * ██╔════╝ ██╔════╝╚══██╔══╝██║
 * ██║  ███╗██║        ██║   ██║
 * ██║   ██║██║        ██║   ██║
 * ╚██████╔╝╚██████╗   ██║   ███████╗
 *  ╚═════╝  ╚═════╝   ╚═╝   ╚══════╝
 * Geophysical Computational Tools & Library (GCTL)
 *
 * Copyright (c) 2022  Yi Zhang (yizhang-geo@zju.edu.cn)
 *
 * GCTL is distributed under a dual licensing scheme. You can redistribute 
 * it and/or modify it under the terms of the GNU Lesser General Public 
 * License as published by the Free Software Foundation, either version 2 
 * of the License, or (at your option) any later version. You should have 
 * received a copy of the GNU Lesser General Public License along with this 
 * program. If not, see <http://www.gnu.org/licenses/>.
 * 
 * If the terms and conditions of the LGPL v.2. would prevent you from using 
 * the GCTL, please consider the option to obtain a commercial license for a 
 * fee. These licenses are offered by the GCTL's original author. As a rule, 
 * licenses are provided "as-is", unlimited in time for a one time fee. Please 
 * send corresponding requests to: yizhang-geo@zju.edu.cn. Please do not forget 
 * to include some description of your company and the realm of its activities. 
 * Also add information on how to contact you by electronic and paper mail.
 ******************************************************/

#include "gctl/io.h"
#include "gctl/utility.h"

int main(int argc, char* argv[]) try
{
	gctl::flags_parser fp;
	fp.set_proname("ncget");
	fp.set_proinfo("Extract an individual data set from the the Netcdf's .nc file. \
This program is a toolkit of the GCTL package. The GCTL comes with ABSOLUTE NO WARRANTY. \
Please see instructions or contact the author for more information.");
	fp.add_opt('i', "in-file", required_argument, NULL, "Input file name. The .nc file extension is not needed.", "<filename>", true);
	fp.add_opt('o', "out-file", required_argument, NULL, "Output file name. The .nc file extension is not needed.", "<filename>", false);
	fp.add_opt('d', "data-set", required_argument, NULL, "Name of the target data set.", "<data-name>", true);
	fp.add_opt('x', "x-axis", required_argument, NULL, "Name of the x-axis. The default is 'x'.", "<axis-name>", false);
	fp.add_opt('y', "y-axis", required_argument, NULL, "Name of the y-axis. The default is 'y'.", "<axis-name>", false);
	fp.add_opt('l', "limit", required_argument, NULL, "Set limit range for the output data", "<zmin>/<zmax>", false);
	fp.add_opt('h', "help", no_argument, NULL, "Show help information.", 0, false);
	fp.configure(argc, argv);

	if(argc == 1 || fp.set_opt('h'))
	{
		fp.show_help_page();
		return 0;
	}

	double zmin = NAN, zmax = NAN;
	std::string in_name, data_name, out_name, x_name, y_name, data_limit;
	fp.get_argv({'i', 'o', 'd', 'x', 'y', 'l'}, {&in_name, &out_name, &data_name, &x_name, &y_name, &data_limit});
	if (data_limit != "NULL") gctl::parse_string_to_value(data_limit, '/', true, zmin, zmax);
	if (out_name == "NULL") out_name = "Untitled";
	if (x_name == "NULL") x_name = "x";
	if (y_name == "NULL") y_name = "y";

	// 查看是否通过强制参数检查
	if (!fp.pass_mandatory()) return 0;

	gctl::array<double> out_x, out_y, out_data;
	gctl::read_netcdf_axis(in_name, out_x, x_name);
	gctl::read_netcdf_axis(in_name, out_y, y_name);
	gctl::read_netcdf_grid(in_name, out_data, x_name, y_name, data_name);
	gctl::save_netcdf_grid(out_name, out_data, out_x, out_y, x_name, y_name, data_name, zmin, zmax);
	return 0;
}
catch(std::exception &e)
{
	GCTL_ShowWhatError(e.what(), GCTL_ERROR_ERROR, 0, 0, 0);
}