engelsystem/includes/controller/shift_entries_controller.php

<?php

/**
 * Sign up for a shift.
 */
function shift_entry_add_controller()
{
    global $privileges, $user;

    if (isset($_REQUEST['shift_id']) && preg_match("/^[0-9]*$/", $_REQUEST['shift_id'])) {
        $shift_id = $_REQUEST['shift_id'];
    } else {
        redirect(page_link_to('user_shifts'));
    }

    // Locations laden
    $rooms = sql_select("SELECT * FROM `Room` WHERE `show`='Y' ORDER BY `Name`");
    $room_array = [];
    foreach ($rooms as $room) {
        $room_array[$room['RID']] = $room['Name'];
    }

    $shift = Shift($shift_id);
    $shift['Name'] = $room_array[$shift['RID']];
    if ($shift == null) {
        redirect(page_link_to('user_shifts'));
    }

    if (isset($_REQUEST['type_id']) && preg_match("/^[0-9]*$/", $_REQUEST['type_id'])) {
        $type_id = $_REQUEST['type_id'];
    } else {
        redirect(page_link_to('user_shifts'));
    }

    if (in_array('user_shifts_admin', $privileges) || in_array('shiftentry_edit_angeltype_supporter', $privileges)) {
        $type = AngelType($type_id);
    } else {
        $type = sql_select("
            SELECT * FROM `UserAngelTypes`
            JOIN `AngelTypes` ON (`UserAngelTypes`.`angeltype_id` = `AngelTypes`.`id`)
            WHERE `AngelTypes`.`id` = '" . sql_escape($type_id) . "'
            AND (
                `AngelTypes`.`restricted` = 0
                OR (
                    `UserAngelTypes`.`user_id` = '" . sql_escape($user['UID']) . "'
                    AND NOT `UserAngelTypes`.`confirm_user_id` IS NULL
                )
            )
        ");
        $type = $type[0];
    }

    if ($type == null) {
        redirect(page_link_to('user_shifts'));
    }

    if (
        isset($_REQUEST['user_id'])
        && preg_match("/^[0-9]*$/", $_REQUEST['user_id'])
        && (
            in_array('user_shifts_admin', $privileges)
            || in_array('shiftentry_edit_angeltype_supporter', $privileges)
        )
    ) {
        $user_id = $_REQUEST['user_id'];
    } else {
        $user_id = $user['UID'];
    }

    $needed_angeltype = NeededAngeltype_by_Shift_and_Angeltype($shift, $type);
    $shift_entries = ShiftEntries_by_shift_and_angeltype($shift['SID'], $type['id']);

    $shift_signup_allowed = Shift_signup_allowed(
        User($user_id),
        $shift,
        $type,
        null,
        null,
        $needed_angeltype,
        $shift_entries
    );
    if (!$shift_signup_allowed->isSignupAllowed()) {
        error(_("You are not allowed to sign up for this shift. Maybe shift is full or already running."));
        redirect(shift_link($shift));
    }

    if (isset($_REQUEST['submit'])) {
        $selected_type_id = $type_id;
        if (in_array('user_shifts_admin', $privileges) || in_array('shiftentry_edit_angeltype_supporter',
                $privileges)
        ) {
            if (sql_num_query("SELECT * FROM `User` WHERE `UID`='" . sql_escape($user_id) . "' LIMIT 1") == 0) {
                redirect(page_link_to('user_shifts'));
            }

            if (
                isset($_REQUEST['angeltype_id'])
                && test_request_int('angeltype_id')
                && sql_num_query("SELECT * FROM `AngelTypes` WHERE `id`='" . sql_escape($_REQUEST['angeltype_id']) . "' LIMIT 1") > 0
            ) {
                $selected_type_id = $_REQUEST['angeltype_id'];
            }
        }

        if (sql_num_query("SELECT * FROM `ShiftEntry` WHERE `SID`='" . sql_escape($shift['SID']) . "' AND `UID` = '" . sql_escape($user_id) . "'")) {
            return error("This angel does already have an entry for this shift.", true);
        }

        $freeloaded = $shift['freeloaded'];
        $freeload_comment = $shift['freeload_comment'];
        if (in_array("user_shifts_admin", $privileges)) {
            $freeloaded = isset($_REQUEST['freeloaded']);
            $freeload_comment = strip_request_item_nl('freeload_comment');
        }

        $comment = strip_request_item_nl('comment');
        $result = ShiftEntry_create([
            'SID'              => $shift_id,
            'TID'              => $selected_type_id,
            'UID'              => $user_id,
            'Comment'          => $comment,
            'freeloaded'       => $freeloaded,
            'freeload_comment' => $freeload_comment
        ]);
        if ($result === false) {
            engelsystem_error('Unable to create shift entry.');
        }

        if (
            $type['restricted'] == 0
            && sql_num_query("
              SELECT * FROM `UserAngelTypes`
              INNER JOIN `AngelTypes` ON `AngelTypes`.`id` = `UserAngelTypes`.`angeltype_id`
              WHERE `angeltype_id` = '" . sql_escape($selected_type_id) . "' 
              AND `user_id` = '" . sql_escape($user_id) . "'
            ") == 0
        ) {
            sql_query("INSERT INTO `UserAngelTypes` (`user_id`, `angeltype_id`) VALUES ('" . sql_escape($user_id) . "', '" . sql_escape($selected_type_id) . "')");
        }

        $user_source = User($user_id);
        engelsystem_log("User " . User_Nick_render($user_source) . " signed up for shift " . $shift['name'] . " from " . date("Y-m-d H:i",
                $shift['start']) . " to " . date("Y-m-d H:i", $shift['end']));
        success(_("You are subscribed. Thank you!") . ' <a href="' . page_link_to('user_myshifts') . '">' . _("My shifts") . ' &raquo;</a>');
        redirect(shift_link($shift));
    }

    if (in_array('user_shifts_admin', $privileges)) {
        $users = sql_select("
            SELECT *, (SELECT count(*) FROM `ShiftEntry` WHERE `freeloaded`=1 AND `ShiftEntry`.`UID`=`User`.`UID`) AS `freeloaded`
            FROM `User`
            ORDER BY `Nick`
        ");
        $users_select = [];
        foreach ($users as $usr) {
            $users_select[$usr['UID']] = $usr['Nick'] . ($usr['freeloaded'] == 0 ? "" : " (" . _("Freeloader") . ")");
        }
        $user_text = html_select_key('user_id', 'user_id', $users_select, $user['UID']);

        $angeltypes_source = sql_select("SELECT * FROM `AngelTypes` ORDER BY `name`");
        $angeltypes = [];
        foreach ($angeltypes_source as $angeltype) {
            $angeltypes[$angeltype['id']] = $angeltype['name'];
        }
        $angeltype_select = html_select_key('angeltype_id', 'angeltype_id', $angeltypes, $type['id']);
    } elseif (in_array('shiftentry_edit_angeltype_supporter', $privileges)) {
        $users = Users_by_angeltype($type);
        $users_select = [];
        foreach ($users as $usr) {
            if (!$type['restricted'] || $usr['confirm_user_id'] != null) {
                $users_select[$usr['UID']] = $usr['Nick'];
            }
        }
        $user_text = html_select_key('user_id', 'user_id', $users_select, $user['UID']);

        $angeltypes_source = User_angeltypes($user);
        $angeltypes = [];
        foreach ($angeltypes_source as $angeltype) {
            if ($angeltype['supporter']) {
                $angeltypes[$angeltype['id']] = $angeltype['name'];
            }
            $angeltype_select = html_select_key('angeltype_id', 'angeltype_id', $angeltypes, $type['id']);
        }
    } else {
        $user_text = User_Nick_render($user);
        $angeltype_select = $type['name'];
    }

    return ShiftEntry_edit_view($user_text, date("Y-m-d H:i", $shift['start']) . ' &ndash; ' . date('Y-m-d H:i',
            $shift['end']) . ' (' . shift_length($shift) . ')', $shift['Name'], $shift['name'], $angeltype_select, "",
        false, null, in_array('user_shifts_admin', $privileges));
}

/**
 * Remove somebody from a shift.
 */
function shift_entry_delete_controller()
{
    global $privileges, $user;

    if (!isset($_REQUEST['entry_id']) || !test_request_int('entry_id')) {
        redirect(page_link_to('user_shifts'));
    }
    $entry_id = $_REQUEST['entry_id'];

    $shift_entry_source = sql_select("
        SELECT
            `User`.`Nick`,
            `ShiftEntry`.`Comment`,
            `ShiftEntry`.`UID`,
            `ShiftTypes`.`name`,
            `Shifts`.*,
            `Room`.`Name`,
            `AngelTypes`.`name` AS `angel_type`,
            `AngelTypes`.`id` AS `angeltype_id`
        FROM `ShiftEntry`
        JOIN `User` ON (`User`.`UID`=`ShiftEntry`.`UID`)
        JOIN `AngelTypes` ON (`ShiftEntry`.`TID` = `AngelTypes`.`id`)
        JOIN `Shifts` ON (`ShiftEntry`.`SID` = `Shifts`.`SID`)
        JOIN `ShiftTypes` ON (`ShiftTypes`.`id` = `Shifts`.`shifttype_id`)
        JOIN `Room` ON (`Shifts`.`RID` = `Room`.`RID`)
        WHERE `ShiftEntry`.`id`='" . sql_escape($entry_id) . "'");
    if (count($shift_entry_source) > 0) {
        $shift_entry_source = $shift_entry_source[0];

        if (!in_array('user_shifts_admin', $privileges) && (!in_array('shiftentry_edit_angeltype_supporter',
                    $privileges) || !User_is_AngelType_supporter($user, AngelType($shift_entry_source['angeltype_id'])))
        ) {
            redirect(page_link_to('user_shifts'));
        }

        $result = ShiftEntry_delete($entry_id);
        if ($result === false) {
            engelsystem_error('Unable to delete shift entry.');
        }

        engelsystem_log(
            "Deleted " . User_Nick_render($shift_entry_source) . "'s shift: " . $shift_entry_source['name']
            . " at " . $shift_entry_source['Name']
            . " from " . date("Y-m-d H:i", $shift_entry_source['start'])
            . " to " . date("Y-m-d H:i", $shift_entry_source['end'])
            . " as " . $shift_entry_source['angel_type']
        );
        success(_("Shift entry deleted."));
    } else {
        error(_("Entry not found."));
    }
    redirect(shift_link($shift_entry_source));
}