changed license to GPL v2
[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 General Public License
10  * as published by the Free Software Foundation; either version 2 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     /* coordinates St.-Petersburg */
53     *lat = 59.883333;
54     *lon = 30.25;
55
56     /* coordinates Vitebsk */
57     //*lat = 55.166666;
58     //*lon = 30.133333;
59
60
61 }
62
63 double
64 get_max_sun_alt(double lon, double lat, int year, int month, int day, int zone)
65 {
66     int h1, m1, h2, m2, h, m;
67     struct tm;
68     double alt, hour1, hour2, hh, x;
69
70     sun_rise_set(lon, lat,
71                  year, month, day, 
72                  zone,
73                  &h1, &m1, &h2, &m2);
74     //printf("h1=%d m1=%d h2=%d m2=%d\n", h1, m1, h2, m2);
75     
76     hour1 = (double)h1 + (double)m1/60;
77     hour2 = (double)h2 + (double)m2/60;
78
79     hh = (hour2 - hour1) / 2 + hour1;
80     h = floor(hh);
81     m = (modf(hh, &x) * 60);
82     
83     alt = altitude(lon, lat, year, month, day, h, m, zone);
84     //printf("alt = %f \n", alt);
85     return alt;
86 }
87
88 void get_sun_pos(double * alt, double * azm)
89 {
90     int year, month, day, hour, min, zone;
91     double lat, lon, alt_max;
92     get_localtime(&year, &month, &day, &hour, &min, &zone);
93     get_coord(&lat, &lon);
94     alt_max = get_max_sun_alt(lon, lat, year, month, day, zone);
95     *alt = altitude(lon, lat, year, month, day, hour, min, zone);
96     //printf("max = %f alt = %f ",alt_max, *alt);
97     *alt = *alt / (alt_max + 10); // sun height in percent
98     //printf("alt1 = %f \n", *alt);
99
100     *azm = azimuth(lon, lat, year, month, day, hour, min, zone);
101     //printf("azm = %f ", *azm);
102     //if south latitude
103     if (lat < 0){
104         *azm = 75 + (75 - *azm);
105         *azm = fmod(*azm, 380);
106     }
107     *azm = (*azm - 75) / 210; // sun azimuth in percent
108     //printf("azm1 = %f \n", *azm);
109 }
110 time_t get_next_sunrise()
111 {
112     return time(NULL) + 60*60*8;
113 }
114 time_t get_next_sunset()
115 {
116         return time(NULL) + 60*60*12;
117 }
118
119 int get_daytime()
120 {
121     double alt, azm;
122     get_sun_pos(&alt, &azm);
123     alt = alt * 100;
124     azm = azm * 100;
125     //printf("alt = %f azm=%f\n", alt, azm);
126     if (alt <= -7) return TIME_NIGHT;
127     if (alt > -7 && alt < 7 && azm < 50) return TIME_SUNRISE;
128     if (alt > -7 && alt < 7 && azm > 50) return TIME_SUNSET;
129     if (alt >= 7) return TIME_DAY;
130     return TIME_DAY;
131 }
132
133 int get_moon_phase()
134
135     int year, month, day, hour, min, zone;
136     double phase;
137     get_localtime(&year, &month, &day, &hour, &min, &zone);
138     phase = moon_phase(year, month, day) * 100;
139     /* printf("ph = %f\n", phase); */
140     if (phase <= 3 || phase >=97) return MOON_NONE;
141     if (phase > 5 && phase <= 25) return MOON_GROWS;
142     if (phase > 25 && phase <= 45) return MOON_GROWSHALF;
143     if (phase > 45 && phase <= 55) return MOON_FULL;
144     if (phase > 55 && phase <= 75) return MOON_DECREASHALF;
145     if (phase > 75 && phase < 97) return MOON_DECREAS;
146     return MOON_NONE;
147
148 }
149
150 gint 
151 fast_rnd(gint max)
152 {
153     guint offset = 12923; 
154     guint multiplier = 4079; 
155     static guint seed = 123;
156
157     seed = seed * multiplier + offset;
158     return (gint)(seed % max);
159 }
160 void 
161 get_sun_screen_pos(double alt, double azm, gint * x, gint * y)
162 {
163     gint y0 = 365;// - уровень горизонта
164     *x = (int)(azm * 800) - 64;
165     *y = (int)((1 - alt) * y0) - 64;
166     //fprintf(stderr, "sun pos alt=%f azm=%f x=%d y=%d\n", alt, azm, *x, *y);
167 }
168