|
|
|
<?php
|
|
|
|
use Engelsystem\ShiftsFilter;
|
|
|
|
|
|
|
|
function Shifts_by_room($room) {
|
|
|
|
$result = sql_select("SELECT * FROM `Shifts` WHERE `RID`=" . sql_escape($room['RID']) . " ORDER BY `start`");
|
|
|
|
if ($result === false) {
|
|
|
|
engelsystem_error("Unable to load shifts.");
|
|
|
|
}
|
|
|
|
return $result;
|
|
|
|
}
|
|
|
|
|
|
|
|
function Shifts_by_ShiftsFilter(ShiftsFilter $shiftsFilter, $user) {
|
|
|
|
$SQL = "SELECT DISTINCT `Shifts`.*, `ShiftTypes`.`name`, `Room`.`Name` as `room_name`, nat2.`special_needs` > 0 AS 'has_special_needs'
|
|
|
|
FROM `Shifts`
|
|
|
|
INNER JOIN `Room` USING (`RID`)
|
|
|
|
INNER JOIN `ShiftTypes` ON (`ShiftTypes`.`id` = `Shifts`.`shifttype_id`)
|
|
|
|
LEFT JOIN (
|
|
|
|
SELECT COUNT(*) AS special_needs , nat3.`shift_id`
|
|
|
|
FROM `NeededAngelTypes` AS nat3
|
|
|
|
WHERE `shift_id` IS NOT NULL
|
|
|
|
GROUP BY nat3.`shift_id`
|
|
|
|
) AS nat2 ON nat2.`shift_id` = `Shifts`.`SID`
|
|
|
|
INNER JOIN `NeededAngelTypes` AS nat
|
|
|
|
ON nat.`count` != 0
|
|
|
|
AND nat.`angel_type_id` IN (" . implode(',', $shiftsFilter->getTypes()) . ")
|
|
|
|
AND (
|
|
|
|
(nat2.`special_needs` > 0 AND nat.`shift_id` = `Shifts`.`SID`)
|
|
|
|
OR
|
|
|
|
(
|
|
|
|
(nat2.`special_needs` = 0 OR nat2.`special_needs` IS NULL)
|
|
|
|
AND nat.`room_id` = `RID`)
|
|
|
|
)
|
|
|
|
LEFT JOIN (
|
|
|
|
SELECT se.`SID`, se.`TID`, COUNT(*) as count
|
|
|
|
FROM `ShiftEntry` AS se GROUP BY se.`SID`, se.`TID`
|
|
|
|
) AS entries ON entries.`SID` = `Shifts`.`SID` AND entries.`TID` = nat.`angel_type_id`
|
|
|
|
WHERE `Shifts`.`RID` IN (" . implode(',', $shiftsFilter->getRooms()) . ")
|
|
|
|
AND `start` BETWEEN " . $shiftsFilter->getStartTime() . " AND " . $shiftsFilter->getEndTime();
|
|
|
|
|
|
|
|
if (count($shiftsFilter->getFilled()) == 1) {
|
|
|
|
if ($shiftsFilter->getFilled()[0] == ShiftsFilter::FILLED_FREE) {
|
|
|
|
$SQL .= "
|
|
|
|
AND (
|
|
|
|
nat.`count` > entries.`count` OR entries.`count` IS NULL
|
|
|
|
OR EXISTS (
|
|
|
|
SELECT `SID`
|
|
|
|
FROM `ShiftEntry`
|
|
|
|
WHERE `UID` = '" . sql_escape($user['UID']) . "'
|
|
|
|
AND `ShiftEntry`.`SID` = `Shifts`.`SID`
|
|
|
|
)
|
|
|
|
)";
|
|
|
|
} elseif ($_SESSION['user_shifts']['filled'][0] == ShiftsFilter::FILLED_FILLED) {
|
|
|
|
$SQL .= "
|
|
|
|
AND (
|
|
|
|
nat.`count` <= entries.`count`
|
|
|
|
OR EXISTS (
|
|
|
|
SELECT `SID`
|
|
|
|
FROM `ShiftEntry`
|
|
|
|
WHERE `UID` = '" . sql_escape($user['UID']) . "'
|
|
|
|
AND `ShiftEntry`.`SID` = `Shifts`.`SID`
|
|
|
|
)
|
|
|
|
)";
|
|
|
|
}
|
|
|
|
}
|
|
|
|
$SQL .= "
|
|
|
|
ORDER BY `start`";
|
|
|
|
|
|
|
|
$result = sql_select($SQL);
|
|
|
|
if ($result === false) {
|
|
|
|
engelsystem_error("Unable to load shifts by filter.");
|
|
|
|
}
|
|
|
|
return $result;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Check if a shift collides with other shifts (in time).
|
|
|
|
*
|
|
|
|
* @param Shift $shift
|
|
|
|
* @param array<Shift> $shifts
|
|
|
|
*/
|
|
|
|
function Shift_collides($shift, $shifts) {
|
|
|
|
foreach ($shifts as $other_shift) {
|
|
|
|
if ($shift['SID'] != $other_shift['SID']) {
|
|
|
|
if (! ($shift['start'] >= $other_shift['end'] || $shift['end'] <= $other_shift['start'])) {
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Returns true if a shift has no more free slots for angels.
|
|
|
|
*
|
|
|
|
* @param int $shift_id
|
|
|
|
* ID of the shift to check
|
|
|
|
*/
|
|
|
|
function Shift_occupied($shift_id) {
|
|
|
|
$needed_angeltypes = NeededAngelTypes_by_shift($shift['SID']);
|
|
|
|
|
|
|
|
foreach ($needed_angeltypes as $needed_angeltype) {
|
|
|
|
if ($needed_angeltype['angel_type_id'] == $angeltype['id']) {
|
|
|
|
if ($needed_angeltype['taken'] < $needed_angeltype['count']) {
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
return true;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Check if an angel can sign up for given shift.
|
|
|
|
*
|
|
|
|
* @param Shift $shift
|
|
|
|
* @param AngelType $angeltype
|
|
|
|
* @param array<Shift> $user_shifts
|
|
|
|
*/
|
|
|
|
function Shift_signup_allowed($shift, $angeltype, $user_angeltype = null, $user_shifts = null) {
|
|
|
|
global $user, $privileges;
|
|
|
|
|
|
|
|
if ($user_shifts == null) {
|
|
|
|
$user_shifts = Shifts_by_user($user);
|
|
|
|
}
|
|
|
|
|
|
|
|
if ($user_angeltype == null) {
|
|
|
|
$user_angeltype = UserAngelType_by_User_and_AngelType($user, $angeltype);
|
|
|
|
}
|
|
|
|
|
|
|
|
$signed_up = false;
|
|
|
|
foreach ($user_shifts as $user_shift) {
|
|
|
|
if ($user_shift['SID'] == $shift['SID']) {
|
|
|
|
$signed_up = true;
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
// you canot join if shift is full
|
|
|
|
$user_may_join_shift = ! Shift_occupied($shift['SID']);
|
|
|
|
|
|
|
|
// you cannot join if user alread joined a parallel or this shift
|
|
|
|
$user_may_join_shift &= ! Shift_collides($shift, $user_shifts);
|
|
|
|
|
|
|
|
// you cannot join if you already singed up for this shift
|
|
|
|
$user_may_join_shift &= ! $signed_up;
|
|
|
|
|
|
|
|
// you cannot join if user is not of this angel type
|
|
|
|
$user_may_join_shift &= $user_angeltype != null;
|
|
|
|
|
|
|
|
// you cannot join if you are not confirmed
|
|
|
|
if ($angeltype['restricted'] == 1 && $user_angeltype != null) {
|
|
|
|
$user_may_join_shift &= isset($user_angeltype['confirm_user_id']);
|
|
|
|
}
|
|
|
|
|
|
|
|
// you can only join if the shift is in future
|
|
|
|
$user_may_join_shift &= time() < $shift['start'];
|
|
|
|
|
|
|
|
// User shift admins may join anybody in every shift
|
|
|
|
$user_may_join_shift |= in_array('user_shifts_admin', $privileges);
|
|
|
|
|
|
|
|
return $user_may_join_shift;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Delete a shift by its external id.
|
|
|
|
*/
|
|
|
|
function Shift_delete_by_psid($shift_psid) {
|
|
|
|
return sql_query("DELETE FROM `Shifts` WHERE `PSID`='" . sql_escape($shift_psid) . "'");
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Delete a shift.
|
|
|
|
*/
|
|
|
|
function Shift_delete($shift_id) {
|
|
|
|
mail_shift_delete(Shift($shift_id));
|
|
|
|
|
|
|
|
$result = sql_query("DELETE FROM `Shifts` WHERE `SID`='" . sql_escape($shift_id) . "'");
|
|
|
|
if ($result === false) {
|
|
|
|
engelsystem_error('Unable to delete shift.');
|
|
|
|
}
|
|
|
|
return $result;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Update a shift.
|
|
|
|
*/
|
|
|
|
function Shift_update($shift) {
|
|
|
|
global $user;
|
|
|
|
$shift['name'] = ShiftType($shift['shifttype_id'])['name'];
|
|
|
|
mail_shift_change(Shift($shift['SID']), $shift);
|
|
|
|
|
|
|
|
return sql_query("UPDATE `Shifts` SET
|
|
|
|
`shifttype_id`='" . sql_escape($shift['shifttype_id']) . "',
|
|
|
|
`start`='" . sql_escape($shift['start']) . "',
|
|
|
|
`end`='" . sql_escape($shift['end']) . "',
|
|
|
|
`RID`='" . sql_escape($shift['RID']) . "',
|
|
|
|
`title`=" . sql_null($shift['title']) . ",
|
|
|
|
`URL`=" . sql_null($shift['URL']) . ",
|
|
|
|
`PSID`=" . sql_null($shift['PSID']) . ",
|
|
|
|
`edited_by_user_id`='" . sql_escape($user['UID']) . "',
|
|
|
|
`edited_at_timestamp`=" . time() . "
|
|
|
|
WHERE `SID`='" . sql_escape($shift['SID']) . "'");
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Update a shift by its external id.
|
|
|
|
*/
|
|
|
|
function Shift_update_by_psid($shift) {
|
|
|
|
$shift_source = sql_select("SELECT `SID` FROM `Shifts` WHERE `PSID`=" . $shift['PSID']);
|
|
|
|
if ($shift_source === false) {
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
if (count($shift_source) == 0) {
|
|
|
|
return null;
|
|
|
|
}
|
|
|
|
$shift['SID'] = $shift_source[0]['SID'];
|
|
|
|
return Shift_update($shift);
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Create a new shift.
|
|
|
|
*
|
|
|
|
* @return new shift id or false
|
|
|
|
*/
|
|
|
|
function Shift_create($shift) {
|
|
|
|
global $user;
|
|
|
|
$result = sql_query("INSERT INTO `Shifts` SET
|
|
|
|
`shifttype_id`='" . sql_escape($shift['shifttype_id']) . "',
|
|
|
|
`start`='" . sql_escape($shift['start']) . "',
|
|
|
|
`end`='" . sql_escape($shift['end']) . "',
|
|
|
|
`RID`='" . sql_escape($shift['RID']) . "',
|
|
|
|
`title`=" . sql_null($shift['title']) . ",
|
|
|
|
`URL`=" . sql_null($shift['URL']) . ",
|
|
|
|
`PSID`=" . sql_null($shift['PSID']) . ",
|
|
|
|
`created_by_user_id`='" . sql_escape($user['UID']) . "',
|
|
|
|
`created_at_timestamp`=" . time());
|
|
|
|
if ($result === false) {
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
return sql_id();
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Return users shifts.
|
|
|
|
*/
|
|
|
|
function Shifts_by_user($user) {
|
|
|
|
$result = sql_select("
|
|
|
|
SELECT `ShiftTypes`.`id` as `shifttype_id`, `ShiftTypes`.`name`, `ShiftEntry`.*, `Shifts`.*, `Room`.*
|
|
|
|
FROM `ShiftEntry`
|
|
|
|
JOIN `Shifts` ON (`ShiftEntry`.`SID` = `Shifts`.`SID`)
|
|
|
|
JOIN `ShiftTypes` ON (`ShiftTypes`.`id` = `Shifts`.`shifttype_id`)
|
|
|
|
JOIN `Room` ON (`Shifts`.`RID` = `Room`.`RID`)
|
|
|
|
WHERE `UID`='" . sql_escape($user['UID']) . "'
|
|
|
|
ORDER BY `start`
|
|
|
|
");
|
|
|
|
if ($result === false) {
|
|
|
|
engelsystem_error('Unable to load users shifts.');
|
|
|
|
}
|
|
|
|
return $result;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Returns Shift by id.
|
|
|
|
*
|
|
|
|
* @param $shift_id Shift
|
|
|
|
* ID
|
|
|
|
*/
|
|
|
|
function Shift($shift_id) {
|
|
|
|
$shifts_source = sql_select("
|
|
|
|
SELECT `Shifts`.*, `ShiftTypes`.`name`
|
|
|
|
FROM `Shifts`
|
|
|
|
JOIN `ShiftTypes` ON (`ShiftTypes`.`id` = `Shifts`.`shifttype_id`)
|
|
|
|
WHERE `SID`='" . sql_escape($shift_id) . "'");
|
|
|
|
$shiftsEntry_source = sql_select("SELECT `id`, `TID` , `UID` , `freeloaded` FROM `ShiftEntry` WHERE `SID`='" . sql_escape($shift_id) . "'");
|
|
|
|
|
|
|
|
if ($shifts_source === false) {
|
|
|
|
engelsystem_error('Unable to load shift.');
|
|
|
|
}
|
|
|
|
|
|
|
|
if (empty($shifts_source)) {
|
|
|
|
return null;
|
|
|
|
}
|
|
|
|
|
|
|
|
$result = $shifts_source[0];
|
|
|
|
|
|
|
|
$result['ShiftEntry'] = $shiftsEntry_source;
|
|
|
|
$result['NeedAngels'] = [];
|
|
|
|
|
|
|
|
$temp = NeededAngelTypes_by_shift($shift_id);
|
|
|
|
foreach ($temp as $e) {
|
|
|
|
$result['NeedAngels'][] = [
|
|
|
|
'TID' => $e['angel_type_id'],
|
|
|
|
'count' => $e['count'],
|
|
|
|
'restricted' => $e['restricted'],
|
|
|
|
'taken' => $e['taken']
|
|
|
|
];
|
|
|
|
}
|
|
|
|
|
|
|
|
return $result;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* Returns all shifts with needed angeltypes and count of subscribed jobs.
|
|
|
|
*/
|
|
|
|
function Shifts() {
|
|
|
|
$shifts_source = sql_select("
|
|
|
|
SELECT `ShiftTypes`.`name`, `Shifts`.*, `Room`.`RID`, `Room`.`Name` as `room_name`
|
|
|
|
FROM `Shifts`
|
|
|
|
JOIN `ShiftTypes` ON (`ShiftTypes`.`id` = `Shifts`.`shifttype_id`)
|
|
|
|
JOIN `Room` ON `Room`.`RID` = `Shifts`.`RID`
|
|
|
|
");
|
|
|
|
if ($shifts_source === false) {
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
foreach ($shifts_source as &$shift) {
|
|
|
|
$needed_angeltypes = NeededAngelTypes_by_shift($shift['SID']);
|
|
|
|
if ($needed_angeltypes === false) {
|
|
|
|
return false;
|
|
|
|
}
|
|
|
|
|
|
|
|
$shift['angeltypes'] = $needed_angeltypes;
|
|
|
|
}
|
|
|
|
|
|
|
|
return $shifts_source;
|
|
|
|
}
|
|
|
|
|
|
|
|
?>
|