*
* http://www.radix.net/~cknudsen *
* -------------------------------------------- *
* This program is free software; you can redistribute it and/or modify it *
* under the terms of the GNU General Public License as published by the *
* Free Software Foundation; either version 2 of the License, or (at your *
* option) any later version. *
\**************************************************************************/
/* $Id$ */
$phpgw_info["flags"]["noheader"]="True";
$phpgw_info["flags"]["currentapp"]="calendar";
include("../header.inc.php");
// Input time format "2359"
function add_duration($time, $duration)
{
$hour = (int)($time / 10000);
$min = $time % 100;
$minutes = $hour * 60 + $min + $duration;
$h = $minutes / 60;
$m = $minutes % 60;
$ret = sprintf ("%d%02d",$h,$m);
//echo "add_duration ( $time, $duration ) = $ret
";
return $ret;
}
// check to see if two events overlap
function times_overlap($time1, $duration1, $time2, $duration2)
{
//echo "times_overlap ( $time1, $duration1, $time2, $duration2 )
";
$hour1 = (int) ($time1 / 100);
$min1 = $time1 % 100;
$hour2 = (int) ($time2 / 100);
$min2 = $time2 % 100;
// convert to minutes since midnight
$tmins1start = $hour1 * 60 + $min1;
$tmins1end = $tmins1start + $duration1;
$tmins2start = $hour2 * 60 + $min2;
$tmins2end = $tmins2start + $duration2;
//echo "tmins1start=$tmins1start, tmins1end=$tmins1end, tmins2start="
// . "$tmins2start, tmins2end=$tmins2end
";
if ($tmins1start >= $tmins2start && $tmins1start <= $tmins2end)
return true;
if ($tmins1end >= $tmins2start && $tmins1end <= $tmins2end)
return true;
if ($tmins2start >= $tmins1start && $tmins2start <= $tmins1end)
return true;
if ($tmins2end >= $tmins1start && $tmins2end <= $tmins1end)
return true;
return false;
}
$phpgw->db->lock(array('webcal_entry','webcal_entry_user','webcal_entry_groups',
'webcal_entry_repeats'));
// first check for any schedule conflicts
if (strlen($hour) > 0) {
$date = mktime(0,0,0,$month,$day,$year);
if ($phpgw_info["user"]["preferences"]["common"]["timeformat"] == "12") {
$hour %= 12;
if ($ampm == "pm")
$hour += 12;
}
$sql = "SELECT webcal_entry_user.cal_login, webcal_entry.cal_time," .
"webcal_entry.cal_duration, webcal_entry.cal_name, " .
"webcal_entry.cal_id, webcal_entry.cal_access " .
"FROM webcal_entry, webcal_entry_user " .
"WHERE webcal_entry.cal_id = webcal_entry_user.cal_id " .
"AND webcal_entry.cal_date = " . date("Ymd", $date) . " AND ( ";
for ($i = 0; $i < count($participants); $i++) {
if ($i) $sql .= " OR ";
$sql .= " webcal_entry_user.cal_login = '" . $participants[$i] . "'";
}
$sql .= " )";
$phpgw->db->query($sql);
$time1 = sprintf("%d:%02d", $hour, $minute);
$duration1 = sprintf("%d", $duration);
while ($phpgw->db->next_record()) {
// see if either event overlaps one another
if ($phpgw->db->f(4) != $id) {
$time2 = $phpgw->db->f(1);
$duration2 = $phpgw->db->f(2);
if (times_overlap($time1, $duration1, $time2, $duration2)) {
$overlap .= "";
if ($phpgw->db->f(5) == 'R' && $phpgw->db->f(0) != $login)
$overlap .= "(PRIVATE)";
else {
$overlap .= "link("view.php",
"id=".$phpgw->db->f(4))."\">"
. $phpgw->db->f(3) . "";
}
$overlap .= " (" . display_time($time2);
if ($duration2 > 0)
$overlap .= "-" . display_time(add_duration($time2,$duration2))
. ")";
}
}
}
}
if ($overlap)
$error = lang("The following conflicts with the suggested time:",
$overlap);
if (! $error) {
// now add the entries
if ($id != 0) {
$phpgw->db->query("DELETE FROM webcal_entry WHERE cal_id = $id");
$phpgw->db->query("DELETE FROM webcal_entry_user WHERE cal_id = $id");
$phpgw->db->query("DELETE FROM webcal_entry_repeats WHERE cal_id = $id");
$phpgw->db->query("DELETE FROM webcal_entry_groups WHERE cal_id = $id");
}
$sql = "INSERT INTO webcal_entry (cal_create_by, cal_date, " .
"cal_time, cal_mod_date, cal_mod_time, cal_duration, cal_priority, " .
"cal_access, cal_type, cal_name, cal_description ) " .
"VALUES ('" . $phpgw_info["user"]["account_id"] . "', ";
$date = mktime(0,0,0,$month,$day,$year);
$sql .= date("Ymd", $date) . ", ";
if (strlen($hour) > 0) {
if ($phpgw_info["user"]["preferences"]["common"]["timeformat"] == "12") {
$hour %= 12;
if ($ampm == "pm")
$hour += 12;
}
$sql .= sprintf("%02d%02d00, ",$hour,$minute);
} else
$sql .= "'-1', ";
$sql .= date("Ymd") . ", " . date("Gis") . ", ";
$sql .= sprintf("%d, ",$duration);
$sql .= sprintf("%d, ",$priority);
$sql .= "'$access', ";
if ($rpt_type != 'none')
$sql .= "'M', ";
else
$sql .= "'E', ";
if (strlen($name) == 0)
$name = "Unnamed Event";
$sql .= "'" . addslashes($name) . "', ";
if (! $description)
$sql .= "'" . addslashes($name) . "')";
else
$sql .= "'" . addslashes($description) . "' )";
$error = "";
$phpgw->db->query($sql);
$phpgw->db->query("SELECT MAX(cal_id) FROM webcal_entry");
$phpgw->db->next_record();
$id = $phpgw->db->f(0);
while ($participant = each($participants)) {
$phpgw->db->query("INSERT INTO webcal_entry_user (cal_id,cal_login,cal_status ) "
. "VALUES ($id, '" . $participant[1] . "', 'A')");
}
if (strlen($rpt_type) || ! strcmp($rpt_type,'none') == 0) {
// clearly, we want to delete the old repeats, before inserting new...
$phpgw->db->query("delete from webcal_entry_repeats where cal_id='$id'");
$freq = ($rpt_freq?$rpt_freq:1);
if ($rpt_end_use) {
$end = "'" . date("Ymd",mktime(0,0,0,$rpt_month,$rpt_day,$rpt_year))
. "'";
} else
$end = 0;
if ($rpt_type == 'weekly') {
$days = ($rpt_sun?'y':'n')
. ($rpt_mon?'y':'n')
. ($rpt_tue?'y':'n')
. ($rpt_wed?'y':'n')
. ($rpt_thu?'y':'n')
. ($rpt_fri?'y':'n')
. ($rpt_sat?'y':'n');
} else {
$days = "nnnnnnn";
}
$phpgw->db->query("insert into webcal_entry_repeats (cal_id,cal_type,"
. "cal_end,cal_days,cal_frequency) values($id,'$rpt_type',"
. "$end,'$days',$freq)");
}
$phpgw->db->query("insert into webcal_entry_groups values ($id,'"
. $phpgw->accounts->array_to_string($access,$n_groups) . "') ");
Header("Location: ".$phpgw->link("index.php","year=$year&month=$month&cd=14"));
}
$phpgw->common->phpgw_header();
?>
Scheduling Conflict
x - x conflicts with the following existing calendar entries:", display_time($time),display_time(add_duration($time,$duration))); ?>
?>
Error
db->unlock();
$phpgw->common->phpgw_footer();