changed sun algorithm
[livewp] / applet / src / livewp-rules.c
1 /*
2  * This file is part of Live Wallpaper (livewp)
3  * 
4  * Copyright (C) 2010 Vlad Vasiliev
5  * Copyright (C) 2010 Tanya Makova
6  *       for the code
7  * 
8  * This software is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public License
10  * as published by the Free Software Foundation; either version 2.1 of
11  * the License, or (at your option) any later version.
12  * 
13  * This software is distributed in the hope that it will be useful, but
14  * WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16  * Lesser General Public License for more details.
17  * 
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with this software; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
21  * 02110-1301 USA
22 */
23 /*******************************************************************************/
24
25 #include "livewp-rules.h"
26
27 /*******************************************************************************/
28
29 void get_localtime(int * year, int * month, int * day, int * hour, int * min, int * zone)
30 {
31     time_t timet;
32     struct tm nt;
33     time(&timet);
34     localtime_r(&timet, &nt);
35     *year = nt.tm_year + 1900;
36     *month = nt.tm_mon + 1;
37     *day = nt.tm_mday;
38     *hour = nt.tm_hour;
39     *min = nt.tm_min;
40     *zone = nt.tm_gmtoff/3600;
41   /* 
42  *year = 2010;
43     *month = 3;
44     *day = 24;
45     *hour = 16;
46     *min = 20;
47     *zone = 2;*/
48 }
49
50 void get_coord(double * lat, double * lon)
51 {
52     *lat = 55.166666;
53     *lon = 30.166666;
54 }
55
56 double
57 get_max_sun_alt(double lon, double lat, int year, int month, int day, int zone)
58 {
59     int h1, m1, h2, m2, h, m;
60     time_t t1, t2, t;
61     struct tm tm1, tm2;
62     double alt, hour1, hour2, hh, x;
63     int hour, min;
64
65     sun_rise_set(lon, lat,
66                  year, month, day, 
67                  zone,
68                  &h1, &m1, &h2, &m2);
69     //printf("h1=%d m1=%d h2=%d m2=%d\n", h1, m1, h2, m2);
70     
71     hour1 = (double)h1 + (double)m1/60;
72     hour2 = (double)h2 + (double)m2/60;
73
74     hh = (hour2 - hour1) / 2 + hour1;
75     h = floor(hh);
76     m = (modf(hh, &x) * 60);
77     
78     alt = altitude(lon, lat, year, month, day, h, m, zone);
79     //printf("alt = %f \n", alt);
80     return alt;
81 }
82
83 void get_sun_pos(double * alt, double * azm)
84 {
85     int year, month, day, hour, min, zone;
86     double lat, lon, alt_max;
87     get_localtime(&year, &month, &day, &hour, &min, &zone);
88     get_coord(&lat, &lon);
89     alt_max = get_max_sun_alt(lon, lat, year, month, day, zone);
90     *alt = altitude(lon, lat, year, month, day, hour, min, zone);
91     *alt = *alt / (alt_max + 5); // sun height in percent
92
93     *azm = azimuth(lon, lat, year, month, day, hour, min, zone);
94     //if south latitude
95     if (lat < 0){
96         *azm = 75 + (75 - *azm);
97         *azm = fmod(*azm, 380);
98     }
99     *azm = (*azm - 75) / 190; // sun azimuth in percent
100 }
101 time_t get_next_sunrise()
102 {
103     return time(NULL) + 60*60*8;
104 }
105 time_t get_next_sunset()
106 {
107         return time(NULL) + 60*60*12;
108 }
109
110 int get_daytime()
111 {
112     double alt, azm;
113     get_sun_pos(&alt, &azm);
114     alt = alt * 100;
115     azm = azm * 100;
116     //printf("alt = %f azm=%f\n", alt, azm);
117     if (alt <= -7) return TIME_NIGHT;
118     if (alt > -7 && alt < 7 && azm < 50) return TIME_SUNRISE;
119     if (alt > -7 && alt < 7 && azm > 50) return TIME_SUNSET;
120     if (alt >= 7) return TIME_DAY;
121     
122 }
123 int get_moon_phase()
124
125     int year, month, day, hour, min, zone;
126     double phase;
127     get_localtime(&year, &month, &day, &hour, &min, &zone);
128     phase = moon_phase(year, month, day) * 100;
129     printf("ph = %f\n", phase);
130     if (phase <= 3 || phase >=97) return MOON_NONE;
131     if (phase > 5 && phase <= 25) return MOON_GROWS;
132     if (phase > 25 && phase <= 45) return MOON_GROWSHALF;
133     if (phase > 45 && phase <= 55) return MOON_FULL;
134     if (phase > 55 && phase <= 75) return MOON_DECREASHALF;
135     if (phase > 75 && phase < 97) return MOON_DECREAS;
136 }