void clean_env(const char *name)
{
int i;
char *u_name;
const char *env_prefix = "MONITOR_";
const char *env;
int env_prefix_len;
char **tokens;
u_name = G_store_upper(name);
env_prefix_len = strlen(env_prefix);
tokens = NULL;
for (i = 0; (env = G_get_env_name(i)); i++) {
if (strncmp(env_prefix, env, env_prefix_len) != 0)
continue;
tokens = G_tokenize(env, "_");
if (G_number_of_tokens(tokens) != 3 ||
strcmp(tokens[1], u_name) != 0)
continue;
G_unsetenv(env);
i--; /* env has been removed for the list */
G_free_tokens(tokens);
tokens = NULL;
}
G_unsetenv("MONITOR");
}
int main(int argc, char *argv[])
{
struct GModule *module;
struct Option *start_opt, *select_opt, *stop_opt, *output_opt,
*width_opt, *height_opt, *bgcolor_opt, *res_opt;
struct Flag *list_flag, *selected_flag, *select_flag, *release_flag,
*cmd_flag, *truecolor_flag, *update_flag, *x_flag, *sfile_flag;
int nopts, ret;
const char *mon;
G_gisinit(argv[0]);
module = G_define_module();
G_add_keyword(_("display"));
G_add_keyword(_("graphics"));
G_add_keyword(_("monitors"));
module->description = _("Controls graphics display monitors from the command line.");
start_opt = G_define_option();
start_opt->key = "start";
start_opt->type = TYPE_STRING;
start_opt->description = _("Name of monitor to start");
start_opt->options = "wx0,wx1,wx2,wx3,wx4,wx5,wx6,wx7,png,ps,html,cairo";
start_opt->guisection = _("Manage");
stop_opt = G_define_option();
stop_opt->key = "stop";
stop_opt->type = TYPE_STRING;
stop_opt->description = _("Name of monitor to stop");
stop_opt->options = "wx0,wx1,wx2,wx3,wx4,wx5,wx6,wx7,png,ps,html,cairo";
stop_opt->guisection = _("Manage");
select_opt = G_define_option();
select_opt->key = "select";
select_opt->type = TYPE_STRING;
select_opt->description = _("Name of monitor to select");
select_opt->options = "wx0,wx1,wx2,wx3,wx4,wx5,wx6,wx7,png,ps,html,cairo";
select_opt->guisection = _("Manage");
width_opt = G_define_option();
width_opt->key = "width";
width_opt->label = _("Width for display monitor if not set by GRASS_RENDER_WIDTH");
width_opt->description = _("Default value: 720");
width_opt->type = TYPE_INTEGER;
width_opt->key_desc = "value";
width_opt->guisection = _("Settings");
height_opt = G_define_option();
height_opt->key = "height";
height_opt->label = _("Height for display monitor if not set by GRASS_RENDER_HEIGHT");
height_opt->description = _("Default value: 480");
height_opt->type = TYPE_INTEGER;
height_opt->key_desc = "value";
height_opt->guisection = _("Settings");
res_opt = G_define_option();
res_opt->key = "resolution";
res_opt->label = _("Dimensions of display monitor versus current size");
res_opt->description = _("Example: resolution=2 enlarge display monitor twice to 1280x960");
res_opt->type = TYPE_INTEGER;
res_opt->key_desc = "value";
res_opt->guisection = _("Settings");
bgcolor_opt = G_define_standard_option(G_OPT_CN);
bgcolor_opt->key = "bgcolor";
bgcolor_opt->label = _("Background color");
bgcolor_opt->answer = DEFAULT_BG_COLOR;
bgcolor_opt->guisection = _("Settings");
output_opt = G_define_standard_option(G_OPT_F_OUTPUT);
output_opt->required = NO;
output_opt->label = _("Name for output file (when starting new monitor)");
output_opt->description = _("Ignored for 'wx' monitors");
output_opt->guisection = _("Settings");
list_flag = G_define_flag();
list_flag->key = 'l';
list_flag->description = _("List running monitors and exit");
list_flag->guisection = _("Print");
selected_flag = G_define_flag();
selected_flag->key = 'p';
selected_flag->description = _("Print name of currently selected monitor and exit");
selected_flag->guisection = _("Print");
cmd_flag = G_define_flag();
cmd_flag->key = 'c';
cmd_flag->description = _("Print commands for currently selected monitor and exit");
cmd_flag->guisection = _("Print");
sfile_flag = G_define_flag();
sfile_flag->key = 'g';
sfile_flag->description =
_("Print path to support files of currently selected monitor and exit");
select_flag = G_define_flag();
select_flag->key = 's';
select_flag->description = _("Do not automatically select when starting");
select_flag->guisection = _("Manage");
release_flag = G_define_flag();
release_flag->key = 'r';
release_flag->description = _("Release and stop currently selected monitor and exit");
release_flag->guisection = _("Manage");
truecolor_flag = G_define_flag();
truecolor_flag->key = 't';
truecolor_flag->description = _("Disable true colors");
truecolor_flag->guisection = _("Settings");
update_flag = G_define_flag();
update_flag->key = 'u';
update_flag->label = _("Open output file in update mode");
update_flag->description = _("Requires --overwrite flag");
update_flag->guisection = _("Settings");
x_flag = G_define_flag();
x_flag->key = 'x';
x_flag->label = _("Launch light-weight wx monitor without toolbars and statusbar");
x_flag->description = _("Requires 'start=wx0-7'");
x_flag->guisection = _("Settings");
if (G_parser(argc, argv))
exit(EXIT_FAILURE);
if (x_flag->answer && start_opt->answer && strncmp(start_opt->answer, "wx", 2) != 0)
G_warning(_("Flag -%c has effect only for wx monitors (%s=wx0-7)"),
x_flag->key, start_opt->key);
if (selected_flag->answer || release_flag->answer ||
cmd_flag->answer || sfile_flag->answer) {
if (list_flag->answer)
G_warning(_("Flag -%c ignored"), list_flag->key);
mon = G_getenv_nofatal("MONITOR");
if (mon) {
if (selected_flag->answer) {
G_verbose_message(_("Currently selected monitor:"));
fprintf(stdout, "%s\n", mon);
}
else if (cmd_flag->answer) {
G_message(_("List of commands for monitor <%s>:"), mon);
list_cmd(mon, stdout);
}
else if (sfile_flag->answer) {
list_files(mon, stdout);
}
else if (mon) { /* release */
G_unsetenv("MONITOR");
G_verbose_message(_("Monitor <%s> released"), mon);
ret = stop_mon(mon);
}
}
else
G_important_message(_("No monitor selected"));
exit(EXIT_SUCCESS);
}
if (list_flag->answer) {
print_list(stdout);
exit(EXIT_SUCCESS);
}
nopts = 0;
if (start_opt->answer)
nopts++;
if (stop_opt->answer)
nopts++;
if (select_opt->answer)
nopts++;
if (nopts != 1)
G_fatal_error(_("Either <%s>, <%s> or <%s> must be given"),
start_opt->key, stop_opt->key, select_opt->key);
if (output_opt->answer &&
(!start_opt->answer || strncmp(start_opt->answer, "wx", 2) == 0))
G_warning(_("Option <%s> ignored"), output_opt->key);
if (start_opt->answer) {
int width, height;
width = width_opt->answer ? atoi(width_opt->answer) : 0;
height = height_opt->answer ? atoi(height_opt->answer) : 0;
if (width < 1) {
char *env_width = getenv("GRASS_RENDER_WIDTH");
if (env_width)
width = atoi(env_width);
}
if (height < 1) {
char *env_height = getenv("GRASS_RENDER_HEIGHT");
if (env_height)
height = atoi(env_height);
}
if (width < 1)
width = DEFAULT_WIDTH;
if (height < 1)
height = DEFAULT_HEIGHT;
if (res_opt->answer) {
int res;
res = atoi(res_opt->answer);
width *= res;
height *= res;
}
G_debug(1, "Monitor width/height = %d/%d", width, height);
ret = start_mon(start_opt->answer, output_opt->answer, !select_flag->answer,
width, height, bgcolor_opt->answer,
!truecolor_flag->answer, x_flag->answer, update_flag->answer);
if (output_opt->answer && !update_flag->answer) {
D_open_driver();
D_setup_unity(0);
D_erase(bgcolor_opt->answer);
D_close_driver();
}
}
if (stop_opt->answer)
ret = stop_mon(stop_opt->answer);
if (select_opt->answer)
ret = select_mon(select_opt->answer);
if (ret != 0)
exit(EXIT_FAILURE);
exit(EXIT_SUCCESS);
}
