3
#include "orthophoto.h"
6
FILE *I_fopen_group_init_old();
7
FILE *I_fopen_group_init_new();
9
#define INITIAL_FILE "INIT_EXP"
11
int I_read_init_info(FILE * fd, struct Ortho_Camera_Exp_Init *init_info)
14
double XC, YC, ZC, omega, phi, kappa;
15
double XCv, YCv, ZCv, omegav, phiv, kappav;
18
G_getl(buf, sizeof buf, fd);
20
if (sscanf(buf, "INITIAL XC %lf \n", &XC) == 1)
21
init_info->XC_init = XC;
22
G_getl(buf, sizeof buf, fd);
24
if (sscanf(buf, "INITIAL YC %lf \n", &YC) == 1)
25
init_info->YC_init = YC;
26
G_getl(buf, sizeof buf, fd);
28
if (sscanf(buf, "INITIAL ZC %lf \n", &ZC) == 1)
29
init_info->ZC_init = ZC;
30
G_getl(buf, sizeof buf, fd);
32
if (sscanf(buf, "INITIAL OMEGA %lf \n", &omega) == 1)
33
init_info->omega_init = omega;
34
G_getl(buf, sizeof buf, fd);
36
if (sscanf(buf, "INITIAL PHI %lf \n", &phi) == 1)
37
init_info->phi_init = phi;
38
G_getl(buf, sizeof buf, fd);
40
if (sscanf(buf, "INITIAL KAPPA %lf \n", &kappa) == 1)
41
init_info->kappa_init = kappa;
43
G_getl(buf, sizeof buf, fd);
45
if (sscanf(buf, "VARIANCE XC %lf \n", &XCv) == 1)
46
init_info->XC_var = XCv;
47
G_getl(buf, sizeof buf, fd);
49
if (sscanf(buf, "VARIANCE YC %lf \n", &YCv) == 1)
50
init_info->YC_var = YCv;
51
G_getl(buf, sizeof buf, fd);
53
if (sscanf(buf, "VARIANCE ZC %lf \n", &ZCv) == 1)
54
init_info->ZC_var = ZCv;
55
G_getl(buf, sizeof buf, fd);
57
if (sscanf(buf, "VARIANCE OMEGA %lf \n", &omegav) == 1)
58
init_info->omega_var = omegav;
59
G_getl(buf, sizeof buf, fd);
61
if (sscanf(buf, "VARIANCE PHI %lf \n", &phiv) == 1)
62
init_info->phi_var = phiv;
63
G_getl(buf, sizeof buf, fd);
65
if (sscanf(buf, "VARIANCE KAPPA %lf \n", &kappav) == 1)
66
init_info->kappa_var = kappav;
67
G_getl(buf, sizeof buf, fd);
69
if (sscanf(buf, "STATUS (1=OK, 0=NOT OK) %d \n", &status) == 1)
70
init_info->status = status;
74
int I_write_init_info(FILE * fd, struct Ortho_Camera_Exp_Init *init_info)
76
fprintf(fd, "INITIAL XC %f \n", init_info->XC_init);
77
fprintf(fd, "INITIAL YC %f \n", init_info->YC_init);
78
fprintf(fd, "INITIAL ZC %f \n", init_info->ZC_init);
79
fprintf(fd, "INITIAL OMEGA %f \n", init_info->omega_init);
80
fprintf(fd, "INITIAL PHI %f \n", init_info->phi_init);
81
fprintf(fd, "INITIAL KAPPA %f \n", init_info->kappa_init);
83
fprintf(fd, "VARIANCE XC %f \n", init_info->XC_var);
84
fprintf(fd, "VARIANCE YC %f \n", init_info->YC_var);
85
fprintf(fd, "VARIANCE ZC %f \n", init_info->ZC_var);
86
fprintf(fd, "VARIANCE OMEGA %f \n", init_info->omega_var);
87
fprintf(fd, "VARIANCE PHI %f \n", init_info->phi_var);
88
fprintf(fd, "VARIANCE KAPPA %f \n", init_info->kappa_var);
89
fprintf(fd, "STATUS (1=OK, 0=NOT OK) %d \n", init_info->status);
94
int I_get_init_info(char *group, struct Ortho_Camera_Exp_Init *init_info)
100
fd = I_fopen_group_init_old(group);
102
sprintf(msg, "unable to open camera initial file %s in %s",
108
stat = I_read_init_info(fd, init_info);
111
sprintf(msg, "bad format in camera initial file %s in %s",
119
int I_put_init_info(char *group, struct Ortho_Camera_Exp_Init *init_info)
124
fd = I_fopen_group_init_new(group);
126
sprintf(msg, "unable to open camera initial file %s in %s",
132
I_write_init_info(fd, init_info);