1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
|
/* test_sun_moon.c: Test for Sun and Moon computations
*
* SPDX-FileCopyrightText: 2009 Frank Solensky
* SPDX-FileCopyrightText: 2011, 2012, 2015 Giovanni Campagna
* SPDX-License-Identifier: GPL-2.0-or-later
*/
#include "config.h"
#include <glib.h>
#include <string.h>
#include <time.h>
#include "gweather-weather.h"
#include "gweather-private.h"
int
main (int argc, char **argv)
{
GWeatherInfo *info;
GOptionContext* context;
GError* error = NULL;
gdouble latitude, longitude;
gchar* gtime = NULL;
GDate gdate;
struct tm tm;
time_t phases[4];
const GOptionEntry entries[] = {
{ "latitude", 0, 0, G_OPTION_ARG_DOUBLE, &latitude,
"observer's latitude in degrees north", NULL },
{ "longitude", 0, 0, G_OPTION_ARG_DOUBLE, &longitude,
"observer's longitude in degrees east", NULL },
{ "time", 0, 0, G_OPTION_ARG_STRING, >ime,
"time in seconds from Unix epoch", NULL },
{ NULL }
};
context = g_option_context_new ("- test libgweather sun/moon calculations");
g_option_context_add_main_entries (context, entries, NULL);
g_option_context_parse (context, &argc, &argv, &error);
if (error) {
perror (error->message);
return error->code;
}
else if (latitude < -90. || latitude > 90.) {
perror ("invalid latitude: should be [-90 .. 90]");
return -1;
} else if (longitude < -180. || longitude > 180.) {
perror ("invalid longitude: should be [-180 .. 180]");
return -1;
}
info = g_object_new (GWEATHER_TYPE_INFO, NULL);
info->location.latitude = DEGREES_TO_RADIANS(latitude);
info->location.longitude = DEGREES_TO_RADIANS(longitude);
info->location.latlon_valid = TRUE;
info->valid = TRUE;
if (gtime != NULL) {
// printf(" gtime=%s\n", gtime);
g_date_set_parse(&gdate, gtime);
g_date_to_struct_tm(&gdate, &tm);
info->current_time = mktime(&tm);
} else {
info->current_time = time(NULL);
}
_gweather_info_ensure_sun (info);
_gweather_info_ensure_moon (info);
printf (" Latitude %7.3f %c Longitude %7.3f %c for %s All times UTC\n",
fabs(latitude), (latitude >= 0. ? 'N' : 'S'),
fabs(longitude), (longitude >= 0. ? 'E' : 'W'),
asctime(gmtime(&info->current_time)));
printf("daytime: %s\n", gweather_info_is_daytime(info) ? "yes" : "no");
printf("sunrise: %s",
(info->sunriseValid ? ctime(&info->sunrise) : "(invalid)\n"));
printf("sunset: %s",
(info->sunsetValid ? ctime(&info->sunset) : "(invalid)\n"));
if (info->moonValid) {
printf("moonphase: %g\n", info->moonphase);
printf("moonlat: %g\n", info->moonlatitude);
if (gweather_info_get_upcoming_moonphases(info, phases)) {
printf(" New: %s", asctime(gmtime(&phases[0])));
printf(" 1stQ: %s", asctime(gmtime(&phases[1])));
printf(" Full: %s", asctime(gmtime(&phases[2])));
printf(" 3rdQ: %s", asctime(gmtime(&phases[3])));
}
}
return 0;
}
|