1 | <?php |
---|
2 | |
---|
3 | /** |
---|
4 | * Function to include which handles building a free/busy response to |
---|
5 | * be used in either the REPORT, response to a POST, or response to a |
---|
6 | * a freebusy GET request. |
---|
7 | */ |
---|
8 | |
---|
9 | include_once('iCalendar.php'); |
---|
10 | include_once('RRule-v2.php'); |
---|
11 | include_once("drivers_ldap.php"); |
---|
12 | |
---|
13 | |
---|
14 | function get_freebusy( $path_match, $mail, $range_start, $range_end, $bin_privs = null ) { |
---|
15 | global $request; |
---|
16 | |
---|
17 | // printf( "Path: %s\n", $path_match); |
---|
18 | // print_r($range_start); |
---|
19 | // print_r($range_end); |
---|
20 | $fbq_start=$range_start; |
---|
21 | $fbq_end=$range_end; |
---|
22 | //if ( !isset($bin_privs) ) $bin_privs = $request->Privileges(); |
---|
23 | if ( !isset($range_start) || !isset($range_end) ) { |
---|
24 | $request->DoResponse( 400, 'All valid freebusy requests MUST contain a time-range filter' ); |
---|
25 | } |
---|
26 | $filtro = "mail=".$mail; |
---|
27 | $atributos = array("uidNumber"); |
---|
28 | $uidnumber = ldapDrivers::requestAtributo($filtro, $atributos); |
---|
29 | if ($uidnumber == false) { |
---|
30 | dbg_error_log( "POST", "Responding with free/busy error: email usuario não encontrado no diretorio"); |
---|
31 | $request->DoResponse( 501, 'Database error'); |
---|
32 | } |
---|
33 | $cpfuser = $uidnumber['uidNumber']; |
---|
34 | |
---|
35 | //8888888888888888888888 Comentado para funcionar com Expresso owner: gabriel Malheiros 10.12.2010 8888888888888888888888888888888888888 |
---|
36 | // $params = array( ':path_match' => $path_match, ':start' => $range_start->UTC(), ':end' => $range_end->UTC() ); |
---|
37 | // $where = ' WHERE caldav_data.dav_name ~ :path_match '; |
---|
38 | // $where .= 'AND rrule_event_overlaps( dtstart, dtend, rrule, :start, :end) '; |
---|
39 | // $where .= "AND caldav_data.caldav_type IN ( 'VEVENT', 'VTODO' ) "; |
---|
40 | // $where .= "AND (calendar_item.transp != 'TRANSPARENT' OR calendar_item.transp IS NULL) "; |
---|
41 | // $where .= "AND (calendar_item.status != 'CANCELLED' OR calendar_item.status IS NULL) "; |
---|
42 | // $where .= "AND collection.is_calendar AND collection.schedule_transp = 'opaque' "; |
---|
43 | |
---|
44 | // if ( $bin_privs != privilege_to_bits('all') ) { |
---|
45 | // $where .= "AND (calendar_item.class != 'PRIVATE' OR calendar_item.class IS NULL) "; |
---|
46 | // } |
---|
47 | |
---|
48 | |
---|
49 | // $fbtimes = array(); |
---|
50 | // $sql = 'SELECT caldav_data.caldav_data, calendar_item.rrule, calendar_item.transp, calendar_item.status, '; |
---|
51 | // $sql .= "to_char(calendar_item.dtstart at time zone 'GMT',".iCalendar::SqlUTCFormat().') AS start, '; |
---|
52 | // $sql .= "to_char(calendar_item.dtend at time zone 'GMT',".iCalendar::SqlUTCFormat().') AS finish '; |
---|
53 | // $sql .= 'FROM caldav_data INNER JOIN calendar_item USING(dav_id,user_no,dav_name,collection_id) '; |
---|
54 | // $sql .= 'INNER JOIN collection USING(collection_id)'; |
---|
55 | // $sql .= $where; |
---|
56 | // if ( isset($c->strict_result_ordering) && $c->strict_result_ordering ) $sql .= ' ORDER BY dav_id'; |
---|
57 | // $qry = new AwlQuery( $sql, $params ); |
---|
58 | // if ( $qry->Exec("REPORT",__LINE__,__FILE__) && $qry->rows() > 0 ) { |
---|
59 | // while( $calendar_object = $qry->Fetch() ) { |
---|
60 | // $extra = ''; |
---|
61 | // if ( $calendar_object->status == 'TENTATIVE' ) { |
---|
62 | // $extra = ';BUSY-TENTATIVE'; |
---|
63 | // } |
---|
64 | // dbg_error_log( "REPORT", " FreeBusy: Not transparent, tentative or cancelled: %s, %s", $calendar_object->start, $calendar_object->finish ); |
---|
65 | // $ics = new vComponent($calendar_object->caldav_data); |
---|
66 | // $expanded = expand_event_instances($ics, $range_start, $range_end); |
---|
67 | // $expansion = $expanded->GetComponents( array('VEVENT'=>true,'VTODO'=>true,'VJOURNAL'=>true) ); |
---|
68 | // foreach( $expansion AS $k => $v ) { |
---|
69 | // echo "=====================================================\n"; |
---|
70 | // printf( "Type: %s\n", $v->GetType()); |
---|
71 | // print_r($v); |
---|
72 | // echo "-----------------------------------------------------\n"; |
---|
73 | // $start_date = $v->GetProperty('DTSTART'); |
---|
74 | // if ( !isset($start_date) ) continue; |
---|
75 | // $start_date = new RepeatRuleDateTime($start_date->Value()); |
---|
76 | // $duration = $v->GetProperty('DURATION'); |
---|
77 | // $duration = ( !isset($duration) ? 'P1D' : $duration->Value()); |
---|
78 | // $end_date = clone($start_date); |
---|
79 | // $end_date->modify( $duration ); |
---|
80 | // if ( $end_date < $range_start || $start_date > $range_end ) continue; |
---|
81 | // $thisfb = $start_date->UTC() .'/'. $end_date->UTC() . $extra; |
---|
82 | // array_push( $fbtimes, $thisfb ); |
---|
83 | // } |
---|
84 | // } |
---|
85 | // } |
---|
86 | |
---|
87 | $qry = new AwlQuery( "SELECT p.cal_id,p.cal_type,p.datetime,p.edatetime,p.is_public,u.cal_status from phpgw_cal as p inner join phpgw_cal_user as u on p.cal_id = u.cal_id where p.owner= :id or u.cal_login = :id and u.cal_status != 'R';", array(':id' => $cpfuser)); |
---|
88 | if ( $qry->Exec("POST",__LINE__,__FILE__) && $qry->rows() > 0 ) { |
---|
89 | $fbtypee = array(); |
---|
90 | $fbtype = ""; |
---|
91 | while( $calendar_object = $qry->Fetch() ) { |
---|
92 | if ( $calendar_object->is_public == 1 ) { |
---|
93 | if ( $calendar_object->cal_status == 'A' ) { |
---|
94 | $extra = ';BUSY'; |
---|
95 | } |
---|
96 | elseif ( $calendar_object->cal_status == 'U' ) { |
---|
97 | $extra = ';BUSY-UNAVAILABLE'; |
---|
98 | } |
---|
99 | elseif ( $calendar_object->cal_status == 'T' ) { |
---|
100 | $extra = ';BUSY-TENTATIVE'; |
---|
101 | } |
---|
102 | else |
---|
103 | { |
---|
104 | $extra = ';FREE'; |
---|
105 | } |
---|
106 | switch ( $calendar_object->cal_type ) { |
---|
107 | case "E": |
---|
108 | dbg_error_log( "POST", " FreeBusy: nao recorrente: %s, %s", $calendar_object->datetime, $calendar_object->edatetime ); |
---|
109 | // $busy_tentative[] = $calendar_object; |
---|
110 | $dateTime = date_create($fbq_start); |
---|
111 | $DT_START = $dateTime->format("U"); |
---|
112 | $dateTime_end = date_create($fbq_end ); |
---|
113 | $DT_END = $dateTime_end->format("U"); |
---|
114 | if ( $calendar_object->datetime >= $DT_START && $calendar_object->edatetime <= $DT_END) |
---|
115 | { if(isset($fbtype)){ |
---|
116 | |
---|
117 | $busydate_s = dataSegundosParaT($calendar_object->datetime,1); |
---|
118 | $busydate_e = dataSegundosParaT($calendar_object->edatetime,1); |
---|
119 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
120 | array_push( $fbtypee, $fbtype); |
---|
121 | } |
---|
122 | else |
---|
123 | { |
---|
124 | $busydate_s = dataSegundosParaT($calendar_object->datetime,1); |
---|
125 | $busydate_e = dataSegundosParaT($calendar_object->edatetime,1); |
---|
126 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
127 | array_push( $fbtypee, $fbtype); |
---|
128 | } |
---|
129 | } |
---|
130 | break; |
---|
131 | |
---|
132 | case "M": |
---|
133 | // Cancelled events are ignored |
---|
134 | dbg_error_log( "POST", " FreeBusy: recorrente: %s, %s", $calendar_object->datetime, $calendar_object->edatetime ); |
---|
135 | $dateTime = date_create($fbq_start); |
---|
136 | $DT_START = $dateTime->format("U"); |
---|
137 | $dateTime_end = date_create($fbq_end ); |
---|
138 | $DT_END = $dateTime_end->format("U"); |
---|
139 | $hora_extra = $dateTime->format("G") * 3600; |
---|
140 | $difer = $calendar_object->edatetime - $calendar_object->datetime; |
---|
141 | $qryp = new PgQuery( "SELECT * from phpgw_cal_repeats where cal_id = ? ", $calendar_object->cal_id); |
---|
142 | if ( $qryp->Exec("POST",__LINE__,__FILE__) && $qryp->rows > 0 ) { |
---|
143 | $calendar_repeats = $qryp->Fetch(); |
---|
144 | if ( $calendar_repeats->recur_enddate >= $DT_START && $calendar_repeats->recur_enddate <= $DT_END ) |
---|
145 | { $next_cal = date_create($calendar_object->datetime); |
---|
146 | |
---|
147 | $data_diferencial =$DT_START - $calendar_object->datetime; |
---|
148 | // while ($data_incrementa <= $calendar_repeats->recur_enddate) |
---|
149 | $intervalo = ($calendar_repeats->recur_interval == 0) ? "1" : "$calendar_repeats->recur_interval"; |
---|
150 | switch ( $calendar_repeats->recur_type ) |
---|
151 | { |
---|
152 | case "1": |
---|
153 | $modulo = $intervalo * 86400; |
---|
154 | $soma = $data_diferencial % $modulo; |
---|
155 | dbg_error_log( "POST", " FreeBusy: diario: %s", $data_diferencial); |
---|
156 | $data_incrementa = $DT_START - $soma; |
---|
157 | while ($data_incrementa <= $calendar_repeats->recur_enddate) |
---|
158 | { if ($data_incrementa >= $DT_START ) |
---|
159 | { |
---|
160 | $end = $data_incrementa + $difer; |
---|
161 | $busydate_s = dataSegundosParaT($data_incrementa,1); |
---|
162 | $busydate_e = dataSegundosParaT($end,1); |
---|
163 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
164 | array_push( $fbtypee, $fbtype); |
---|
165 | } |
---|
166 | $data_incrementa = $data_incrementa + 86400 * $intervalo; |
---|
167 | } |
---|
168 | break; |
---|
169 | case "2": |
---|
170 | $modulo = $intervalo * 86400; |
---|
171 | $soma = $data_diferencial % $modulo; |
---|
172 | $data_incrementa = $DT_START - $soma; |
---|
173 | dbg_error_log( "POST", " FreeBusy: semanal: %s", $soma ); |
---|
174 | while ($data_incrementa <= $calendar_repeats->recur_enddate) |
---|
175 | { |
---|
176 | $difer_semana = $DT_START - $data_incrementa; |
---|
177 | if ($data_incrementa >= $DT_START || $difer_semana <= 604800 ) |
---|
178 | |
---|
179 | { |
---|
180 | $semana = str_split(converte_semana($calendar_repeats->recur_data)); |
---|
181 | $lef = count($semana); |
---|
182 | for ( $i=0;$i<$lef;$i++ ) |
---|
183 | { |
---|
184 | $obj_semana = dataSegundosParaT($data_incrementa,1); |
---|
185 | $dia_semana = date_create($obj_semana); |
---|
186 | $week = $dia_semana->format("w") + 1; |
---|
187 | $diferenca = $semana[$i] - $week; |
---|
188 | $data_semana = $data_incrementa + $diferenca * 86400; |
---|
189 | $end = $data_semana + $difer; |
---|
190 | $busydate_s = dataSegundosParaT($data_semana,1); |
---|
191 | $busydate_e = dataSegundosParaT($end,1); |
---|
192 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
193 | array_push( $fbtypee, $fbtype); |
---|
194 | } |
---|
195 | } |
---|
196 | $data_incrementa = $data_incrementa + 604800 * $intervalo; |
---|
197 | } |
---|
198 | break; |
---|
199 | case "3": |
---|
200 | $data_incrementa = $calendar_object->datetime; |
---|
201 | while ($data_incrementa <= $calendar_repeats->recur_enddate) |
---|
202 | dbg_error_log( "POST", " FreeBusy: mensal: %s", $soma ); |
---|
203 | { if ($data_incrementa >= $DT_START ) |
---|
204 | { |
---|
205 | $end = $data_incrementa + $difer; |
---|
206 | $busydate_s = dataSegundosParaT($data_incrementa,1); |
---|
207 | $busydate_e = dataSegundosParaT($end,1); |
---|
208 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
209 | array_push( $fbtypee, $fbtype); |
---|
210 | } |
---|
211 | $i =$intervalo; |
---|
212 | while ( $i>0 ) |
---|
213 | { $mes_data = date_create($data_incrementa); |
---|
214 | $dias_mes = $mes_data->format("t"); |
---|
215 | $data_incrementa = $data_incrementa + 86400 * $dias_mes; |
---|
216 | $mes_data = date_create($data_incrementa); |
---|
217 | $dias_mes = $mes_data->format("t"); |
---|
218 | $i--; |
---|
219 | } |
---|
220 | } |
---|
221 | break; |
---|
222 | |
---|
223 | case "4": |
---|
224 | $obj_mes = dataSegundosParaT($calendar_object->datetime,1); |
---|
225 | $data_mes = date_create($obj_mes); |
---|
226 | $mes = $data_mes->format("m"); |
---|
227 | $ano = $data_mes->format("Y"); |
---|
228 | $algo = "${ano}${mes}01T000000Z"; |
---|
229 | $dia_primeiro = date_create($algo); |
---|
230 | // $semana_mes = $data_mes->format("W") - $dia_primeiro->format("W"); |
---|
231 | $difer_semana = $calendar_object->datetime - $dia_primeiro->format("U"); |
---|
232 | $dividendo = $difer_semana / 604800; |
---|
233 | $semana_mes = str_split($dividendo); |
---|
234 | $dia_semana = $data_mes->format("D"); |
---|
235 | switch ($semana_mes[0]) |
---|
236 | {case "0": |
---|
237 | $final = "+0 week $dia_semana"; |
---|
238 | break; |
---|
239 | case "1": |
---|
240 | $final = "+1 week $dia_semana"; |
---|
241 | break; |
---|
242 | case "2": |
---|
243 | $final = "+2 week $dia_semana"; |
---|
244 | break; |
---|
245 | case "3": |
---|
246 | $final = "+3 week $dia_semana"; |
---|
247 | break; |
---|
248 | case "5": |
---|
249 | $final = "-1 week $dia_semana"; |
---|
250 | break; |
---|
251 | } |
---|
252 | $data_incrementa = $calendar_object->datetime; |
---|
253 | while ($data_incrementa <= $DT_END) |
---|
254 | { |
---|
255 | $obj_mes = dataSegundosParaT($data_incrementa,1); |
---|
256 | $mes_data = date_create($obj_mes); |
---|
257 | |
---|
258 | if ($data_incrementa >= $DT_START ) |
---|
259 | { |
---|
260 | $end = $data_incrementa + $difer; |
---|
261 | $busydate_s = dataSegundosParaT($data_incrementa,1); |
---|
262 | $busydate_e = dataSegundosParaT($end,1); |
---|
263 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
264 | array_push( $fbtypee, $fbtype); |
---|
265 | } |
---|
266 | $data_proc = dataSegundosParaT($data_incrementa,1); |
---|
267 | $data_mais = date("U",strtotime("$data_proc +${intervalo} month")); |
---|
268 | $mes = date("M",$data_mais); |
---|
269 | $ano = date("Y",$data_mais); |
---|
270 | $hora = date("G",$data_mais); |
---|
271 | $minuto = date("i",$data_mais); |
---|
272 | $data_incrementa = date("U",strtotime("$final ${mes} ${ano}")); |
---|
273 | $data_incrementa = $data_incrementa + $hora * 60 * 60 + $minuto * 60; |
---|
274 | |
---|
275 | } |
---|
276 | |
---|
277 | break; |
---|
278 | |
---|
279 | |
---|
280 | case "5": |
---|
281 | $obj_mes = dataSegundosParaT($calendar_object->datetime,1); |
---|
282 | $date_mes = date_create($obj_mes); |
---|
283 | $mes = $date_mes->format("m"); |
---|
284 | $ano = $date_mes->format("Y"); |
---|
285 | $dia = $date_mes->format("d"); |
---|
286 | $hora = $date_mes->format("G"); |
---|
287 | $minuto = $date_mes->format("i"); |
---|
288 | $data_incrementa = $calendar_object->datetime ; |
---|
289 | dbg_error_log( "POST", " FreeBusy: anual: %s", $soma ); |
---|
290 | while ($data_incrementa <= $calendar_repeats->recur_enddate) |
---|
291 | { if ($data_incrementa >= $DT_START ) |
---|
292 | { |
---|
293 | $data_incrementa = $data_incrementa + $hora * 60 * 60 + $minuto * 60; |
---|
294 | $end = $data_incrementa + $difer; |
---|
295 | $busydate_s = dataSegundosParaT($data_incrementa,1); |
---|
296 | $busydate_e = dataSegundosParaT($end,1); |
---|
297 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
298 | array_push( $fbtypee, $fbtype); |
---|
299 | } |
---|
300 | $i =$intervalo; |
---|
301 | while ($i>0) |
---|
302 | { |
---|
303 | $data_incrementa = date("U",strtotime("$ano-$mes-$dia +1 year")); |
---|
304 | $data_incrementa = $data_incrementa + $hora * 60 * 60 + $minuto * 60; |
---|
305 | $i++; |
---|
306 | } |
---|
307 | |
---|
308 | } |
---|
309 | break; |
---|
310 | |
---|
311 | } |
---|
312 | |
---|
313 | } |
---|
314 | else |
---|
315 | { if ( $calendar_repeats->recur_enddate >= $DT_START || $calendar_repeats->recur_enddate == 0 ) |
---|
316 | {$next_cal = date_create($calendar_object->datetime); |
---|
317 | |
---|
318 | $data_diferencial =$DT_START - $calendar_object->datetime; |
---|
319 | // while ($data_incrementa <= $calendar_repeats->recur_enddate) |
---|
320 | $intervalo = ($calendar_repeats->recur_interval == 0) ? "1" : "$calendar_repeats->recur_interval"; |
---|
321 | switch ( $calendar_repeats->recur_type ) |
---|
322 | { |
---|
323 | case "1": |
---|
324 | $modulo = $intervalo * 86400; |
---|
325 | $soma = $data_diferencial % $modulo; |
---|
326 | //$hora_extra = $dateTime->format("G") * 3600; |
---|
327 | dbg_error_log( "POST", " FreeBusy: diario: %s", $soma ); |
---|
328 | $data_incrementa = $DT_START - $soma; |
---|
329 | while ($data_incrementa <= $DT_END) |
---|
330 | { if ($data_incrementa >= $DT_START ) |
---|
331 | { |
---|
332 | $end = $data_incrementa + $difer; |
---|
333 | $busydate_s = dataSegundosParaT($data_incrementa,1); |
---|
334 | $busydate_e = dataSegundosParaT($end,1); |
---|
335 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
336 | array_push( $fbtypee, $fbtype); |
---|
337 | } |
---|
338 | $data_incrementa = $data_incrementa + 86400 * $intervalo; |
---|
339 | } |
---|
340 | break; |
---|
341 | case "2": |
---|
342 | $modulo = $intervalo * 86400; |
---|
343 | $soma = $data_diferencial % $modulo; |
---|
344 | $data_incrementa = $DT_START - $soma; |
---|
345 | while ($data_incrementa <= $DT_END) |
---|
346 | { |
---|
347 | $difer_semana = $DT_START - $data_incrementa; |
---|
348 | if ($data_incrementa >= $DT_START || $difer_semana <= 604800 ) |
---|
349 | { |
---|
350 | $semana = str_split(converte_semana($calendar_repeats->recur_data)); |
---|
351 | $lef = count($semana); |
---|
352 | for ( $i=0;$i<$lef;$i++ ) |
---|
353 | { |
---|
354 | $obj_semana = dataSegundosParaT($data_incrementa,1); |
---|
355 | $dia_semana = date_create($obj_semana); |
---|
356 | $week = $dia_semana->format("w") + 1; |
---|
357 | $diferenca = $semana[$i] - $week; |
---|
358 | $data_semana = $data_incrementa + $diferenca * 86400; |
---|
359 | $end = $data_semana + $difer; |
---|
360 | $busydate_s = dataSegundosParaT($data_semana,1); |
---|
361 | $busydate_e = dataSegundosParaT($end,1); |
---|
362 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
363 | array_push( $fbtypee, $fbtype); |
---|
364 | } |
---|
365 | } |
---|
366 | $data_incrementa = $data_incrementa + 604800 * $intervalo; |
---|
367 | } |
---|
368 | break; |
---|
369 | case "3": |
---|
370 | $data_incrementa = $calendar_object->datetime; |
---|
371 | dbg_error_log( "POST", " FreeBusy: mensal: %s", $soma ); |
---|
372 | while ($data_incrementa <= $DT_END) |
---|
373 | { if ($data_incrementa >= $DT_START ) |
---|
374 | { |
---|
375 | $end = $data_incrementa + $difer; |
---|
376 | $busydate_s = dataSegundosParaT($data_incrementa,1); |
---|
377 | $busydate_e = dataSegundosParaT($end,1); |
---|
378 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
379 | array_push( $fbtypee, $fbtype); |
---|
380 | } |
---|
381 | $i =$intervalo; |
---|
382 | while ( $i>0 ) |
---|
383 | { |
---|
384 | $obj_mes = dataSegundosParaT($data_incrementa,1); |
---|
385 | $mes_data = date_create($obj_mes); |
---|
386 | $dias_mes = $mes_data->format("t"); |
---|
387 | $data_incrementa = $data_incrementa + 86400 * $dias_mes; |
---|
388 | $obj_mes = dataSegundosParaT($data_incrementa,1); |
---|
389 | $mes_data = date_create($obj_mes); |
---|
390 | $dias_mes = $mes_data->format("t"); |
---|
391 | $i--; |
---|
392 | } |
---|
393 | } |
---|
394 | break; |
---|
395 | |
---|
396 | case "4": |
---|
397 | $obj_mes = dataSegundosParaT($calendar_object->datetime,1); |
---|
398 | $data_mes = date_create($obj_mes); |
---|
399 | $mes = $data_mes->format("m"); |
---|
400 | $ano = $data_mes->format("Y"); |
---|
401 | $algo = "${ano}${mes}01T000000Z"; |
---|
402 | $dia_primeiro = date_create($algo); |
---|
403 | //$semana_mes = $data_mes->format("W") - $dia_primeiro->format("W"); |
---|
404 | $difer_semana = $calendar_object->datetime - $dia_primeiro->format("U"); |
---|
405 | $dividendo = $difer_semana / 604800; |
---|
406 | $semana_mes = str_split($dividendo); |
---|
407 | $dia_semana = $data_mes->format("D"); |
---|
408 | switch ($semana_mes[0]) |
---|
409 | {case "0": |
---|
410 | $final = "+0 week $dia_semana"; |
---|
411 | break; |
---|
412 | case "1": |
---|
413 | $final = "+1 week $dia_semana"; |
---|
414 | break; |
---|
415 | case "2": |
---|
416 | $final = "+2 week $dia_semana"; |
---|
417 | break; |
---|
418 | case "3": |
---|
419 | $final = "+3 week $dia_semana"; |
---|
420 | break; |
---|
421 | case "5": |
---|
422 | $final = "-1 week $dia_semana"; |
---|
423 | break; |
---|
424 | } |
---|
425 | |
---|
426 | $data_incrementa = $calendar_object->datetime; |
---|
427 | while ($data_incrementa <= $DT_END) |
---|
428 | { |
---|
429 | $obj_mes = dataSegundosParaT($data_incrementa,1); |
---|
430 | $mes_data = date_create($obj_mes); |
---|
431 | |
---|
432 | if ($data_incrementa >= $DT_START ) |
---|
433 | { |
---|
434 | $end = $data_incrementa + $difer; |
---|
435 | $busydate_s = dataSegundosParaT($data_incrementa,1); |
---|
436 | $busydate_e = dataSegundosParaT($end,1); |
---|
437 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
438 | array_push( $fbtypee, $fbtype); |
---|
439 | } |
---|
440 | $data_proc = dataSegundosParaT($data_incrementa,1); |
---|
441 | $data_mais = date("U",strtotime("$data_proc +${intervalo} month")); |
---|
442 | $mes = date("M",$data_mais); |
---|
443 | $ano = date("Y",$data_mais); |
---|
444 | $hora = date("G",$data_mais); |
---|
445 | $minuto = date("i",$data_mais); |
---|
446 | $data_incrementa = date("U",strtotime("$final ${mes} ${ano}")); |
---|
447 | $data_incrementa = $data_incrementa + $hora * 60 * 60 + $minuto * 60; |
---|
448 | } |
---|
449 | break; |
---|
450 | |
---|
451 | |
---|
452 | case "5": |
---|
453 | $obj_mes = dataSegundosParaT($calendar_object->datetime,1); |
---|
454 | $date_mes = date_create($obj_mes); |
---|
455 | $mes = $date_mes->format("m"); |
---|
456 | $ano = $date_mes->format("Y"); |
---|
457 | $dia = $date_mes->format("d"); |
---|
458 | dbg_error_log( "POST", " FreeBusy: Anual: %s", $soma ); |
---|
459 | $hora = $date_mes->format("G"); |
---|
460 | $minuto = $date_mes->format("i"); |
---|
461 | $data_incrementa = $calendar_object->datetime ; |
---|
462 | while ($data_incrementa <= $DT_END) |
---|
463 | { if ($data_incrementa >= $DT_START ) |
---|
464 | { |
---|
465 | $end = $data_incrementa + $difer; |
---|
466 | $busydate_s = dataSegundosParaT($data_incrementa,1); |
---|
467 | $busydate_e = dataSegundosParaT($end,1); |
---|
468 | $fbtype = "$busydate_s/$busydate_e,".$extra; |
---|
469 | array_push( $fbtypee, $fbtype); |
---|
470 | } |
---|
471 | $i = $intervalo; |
---|
472 | while ( $i>0 ) |
---|
473 | { |
---|
474 | $data_incrementa = date("U",strtotime("$ano-$mes-$dia +1 year")); |
---|
475 | $data_incrementa = $data_incrementa + $hora * 60 * 60 + $minuto * 60; |
---|
476 | $i--; |
---|
477 | } |
---|
478 | |
---|
479 | } |
---|
480 | break; |
---|
481 | |
---|
482 | } |
---|
483 | |
---|
484 | |
---|
485 | |
---|
486 | } |
---|
487 | } |
---|
488 | } |
---|
489 | break; |
---|
490 | |
---|
491 | //default: |
---|
492 | // dbg_error_log( "POST", " FreeBusy: Not transparent, tentative or cancelled: %s, %s", $calendar_object->start, $calendar_object->finish ); |
---|
493 | // $busy[] = $calendar_object; |
---|
494 | // break; |
---|
495 | } |
---|
496 | } |
---|
497 | } |
---|
498 | } |
---|
499 | |
---|
500 | |
---|
501 | |
---|
502 | |
---|
503 | $freebusy = new iCalComponent(); |
---|
504 | $freebusy->SetType('VFREEBUSY'); |
---|
505 | $freebusy->AddProperty('DTSTAMP', date('Ymd\THis\Z')); |
---|
506 | $freebusy->AddProperty('DTSTART', $range_start->UTC()); |
---|
507 | $freebusy->AddProperty('DTEND', $range_end->UTC()); |
---|
508 | |
---|
509 | sort( $fbtypee ); |
---|
510 | foreach( $fbtypee AS $k => $v ) { |
---|
511 | $text = explode(';',$v,2); |
---|
512 | $freebusy->AddProperty( 'FREEBUSY', $text[0], (isset($text[1]) ? array('FBTYPE' => $text[1]) : null) ); |
---|
513 | } |
---|
514 | |
---|
515 | return $freebusy; |
---|
516 | } |
---|
517 | function dataSegundosParaT($dataseg, $opcao = 0){ |
---|
518 | if ($opcao!=1){ |
---|
519 | $teste = getdate($dataseg); |
---|
520 | return date("Ymd\THis",$teste[0]); |
---|
521 | } |
---|
522 | $HorarioTimeZone = new DateTimeZone(date_default_timezone_get()); |
---|
523 | $HorarioTime = new DateTime("now", $HorarioTimeZone); |
---|
524 | $teste = getdate($dataseg - $HorarioTimeZone->getoffset($HorarioTime)); |
---|
525 | return date("Ymd\THis\Z",$teste[0]); |
---|
526 | } |
---|
527 | function converte_semana($sema){ |
---|
528 | $retorna = ""; |
---|
529 | $param = 1; |
---|
530 | while( $param <= 64 ){ |
---|
531 | $numero = $sema & $param; |
---|
532 | if ( $numero != 0 ){ |
---|
533 | switch ($numero){ |
---|
534 | case 1: |
---|
535 | $retorna .= "1"; |
---|
536 | break; |
---|
537 | case 2: |
---|
538 | $retorna .= "2"; |
---|
539 | break; |
---|
540 | case 4: |
---|
541 | $retorna .= "3"; |
---|
542 | break; |
---|
543 | case 8: |
---|
544 | $retorna .= "4"; |
---|
545 | break; |
---|
546 | case 16: |
---|
547 | $retorna .= "5"; |
---|
548 | break; |
---|
549 | case 32: |
---|
550 | $retorna .= "6"; |
---|
551 | break; |
---|
552 | case 64: |
---|
553 | $retorna .= "7"; |
---|
554 | break; |
---|
555 | default: |
---|
556 | continue; |
---|
557 | } |
---|
558 | } |
---|
559 | $param = $param * 2; |
---|
560 | } |
---|
561 | //$nova = substr($retorna, 0, -1); |
---|
562 | return $retorna; |
---|
563 | } |
---|