2
/****************************************************************************
5
* AUTHOR(S): Mike Baba, DBA Systems, Inc. (original contributor)
6
* Markus Neteler <neteler itc.it>,
7
* Roberto Flor <flor itc.it>,
8
* Bernhard Reiter <bernhard intevation.de>,
9
* Glynn Clements <glynn gclements.plus.com>
12
* PURPOSE: Creates or modifies entries in a camera initial exposure
13
* station file for imagery group referenced by a sub-block
14
* COPYRIGHT: (C) 1999-2008 by the GRASS Development Team
16
* This program is free software under the GNU General Public
17
* License (>=v2). Read the file COPYING that comes with GRASS
20
*****************************************************************************/
25
#include <grass/gis.h>
26
#include <grass/glocale.h>
30
int main(int argc, char *argv[])
32
struct GModule *module;
33
struct Option *group_opt;
38
/* must run in a term window */
39
G_putenv("GRASS_UI_TERM", "1");
43
module = G_define_module();
44
module->keywords = _("imagery, orthorectify");
46
_("Interactively creates or modifies entries in a camera "
47
"initial exposure station file for imagery group referenced "
50
group_opt = G_define_standard_option(G_OPT_I_GROUP);
51
group_opt->description =
52
_("Name of imagery group for ortho-rectification");
54
if (G_parser(argc, argv))
58
strcpy(name, group_opt->answer);
61
strcpy(group.name, name);
63
if (!I_find_group(group.name)) {
64
G_fatal_error(_("Group [%s] not found"), name);
66
G_debug(1, "Found group %s", group.name);
70
I_get_Ortho_Image_Group_Ref(group.name, &group.group_ref);
71
nfiles = block.block_ref.nfiles;
72
G_debug(1, "Got group ref");
76
/* get initial camera exposure infor */
77
if (I_find_initial(group.name)) {
79
I_get_init_info(group.name, &group.camera_exp);
83
mod_init_info(have_old, &group.camera_exp);
86
I_put_init_info(group.name, &group.camera_exp);