lib.php

<?php

defined('MOODLE_INTERNAL') || die();

require_once $CFG->dirroot . '/lib/adodb/adodb.inc.php';
require_once $CFG->dirroot . '/group/lib.php';

if (file_exists($CFG->dirroot .'/blocks/cegep/lib_'. $CFG->block_cegep_name .'.php')) {
    require_once($CFG->dirroot .'/blocks/cegep/lib_'. $CFG->block_cegep_name .'.php');
}

$enrolsettings = get_config('enrol_database');
foreach ($enrolsettings as $setting_key => $setting_value) {
    $keyname = 'enrol_' . $setting_key;
    $CFG->$keyname = $setting_value;
//    echo "$keyname $setting_value" . '<br />';
}
unset($enrolsettings);

/**
 * Get the content for the admin cegep block
 */
function cegep_local_get_block_content() {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_get_block_content')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_get_block_content');
    } else {
        $content = new stdClass;
        return $content;
    }
}

/**
 * Return current term in yyyys (year/semester) format
 */
function cegep_local_current_term() {
    return cegep_local_date_to_datecode();
}

/* Converts SISDBSOURCE (eg: Clara/Datamart) data format into SISDB standard format
 */
function cegep_local_sisdbsource_decode($field, $data) {

    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_sisdbsource_decode')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_sisdbsource_decode', $field, $data);
    } else {
        return 1;
    }
}

/**
 * Return the Moodle category id according to course type
 */
function cegep_local_course_category($category) {

    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_course_category')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_course_category', $category);
    } else {
        return 1;
    }
}

/**
 * Return the SIS db source select to execute (students)
 * This select statement must return the following columns :
 * - CourseCampus
 * - CourseTerm
 * - CourseNumber
 * - CourseTitle
 * - CourseGroup
 * - StudentNo
 * - StudentFirstName
 * - StudentLastName
 * - StudentProgram
 * - StudentProgramName
 * - StudentProgramYear
 */
function cegep_local_sisdbsource_select_students($term) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_sisdbsource_select_students')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_sisdbsource_select_students', $term);
    } else {
        return 1;
    }
}

/**
 * Return the SIS db source select to execute (teachers)
 * This select statement must return the following columns :
 * - TeacherNumber
 * - CourseNumber
 * - CourseGroup
 * - CourseTerm
 */
function cegep_local_sisdbsource_select_teachers($term) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_sisdbsource_select_teachers')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_sisdbsource_select_teachers', $term);
    } else {
        return 1;
    }
}

/**
 * Return course creation menu for the MyMoodle block variant.
 * Allows teacher to easily create courses.
 */
function cegep_local_get_create_course_menu() {
    global $CFG;

    if (function_exists('cegep_' . $CFG->block_cegep_name . '_get_create_course_menu')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_get_create_course_menu', $term);
    } else {
        global $USER, $OUTPUT;

        $content = new stdClass();
        $content->items = array();
        $content->icons = array();

        $term = cegep_local_current_term();
        $courses = array();

        if (!cegep_local_is_teacher($USER->idnumber, $term)) {
            return $content;
        }

        $enrolments = cegep_local_get_teacher_enrolments($USER->idnumber, $term);

        foreach ($enrolments as $enrolment) {
            // Skip already displayed courses
            if (in_array($enrolment['coursecode'], $courses)) {
                continue;
            }

            // Check if course title is empty
            if (!empty($enrolment['coursetitle'])) {
                $coursetitle = $enrolment['coursetitle'];
            } else {
                $coursetitle = get_string('cousetitlemissing','block_cegep');
            }

            $coursetitle .= " ({$enrolment['coursecode']})";

            $content->items[] = html_writer::tag('a', $coursetitle, array('href' => $CFG->wwwroot.'/blocks/cegep/block_cegep_createcourse.php?coursecode=' . $enrolment['coursecode']));
            $content->icons[] = html_writer::empty_tag('img', array('src'=>$OUTPUT->pix_url('t/add'), 'alt'=>get_string('add'), 'class'=>'smallicon'));

            array_push($courses, $enrolment['coursecode']);
        }

        return $content;
    }
}

/**
 * Return enrolment data for a specified teacher idnumber and term
 */
function cegep_local_get_teacher_enrolments($idnumber, $term) {
    global $CFG;

    $enrolments = array();

    // Prepare external SIS database connection
    if ($sisdb = sisdb_connect()) {
        $sisdb->Execute("SET NAMES 'utf8'");
    }
    else {
        error_log('[SIS_DB] Could not make a connection');
        print_error('dbconnectionfailed','error');
    }

    $idnumber = cegep_local_get_real_teacher_idnumber($idnumber);

    $select = "
            SELECT DISTINCT
                cg.coursecode AS coursecode,
                cg.group AS coursegroup,
                c.title AS coursetitle,
                cg.term AS term
            FROM `$CFG->sisdb_name`.teacher_enrolment te
            LEFT JOIN `$CFG->sisdb_name`.coursegroup cg ON cg.id = te.coursegroup_id
            LEFT JOIN `$CFG->sisdb_name`.course c ON c.coursecode = cg.coursecode
            WHERE
                te.idnumber = '$idnumber' AND
                cg.term >= $term
            ORDER BY term, coursecode;";

    $sisdb_rs = $sisdb->Execute($select);

    while ($sisdb_rs && !$sisdb_rs->EOF) {
        $enrolment = array();
        $enrolment['coursecode'] = $sisdb_rs->fields['coursecode'];
        $enrolment['coursegroup'] = $sisdb_rs->fields['coursegroup'];
        $enrolment['coursetitle'] = $sisdb_rs->fields['coursetitle'];
        $enrolment['term'] = $sisdb_rs->fields['term'];
        array_push($enrolments, $enrolment);
        $sisdb_rs->moveNext();
    }

    $sisdb->Close();

    return $enrolments;
}

/**
 * Returns a $course object with idnumber and category
 */
function cegep_local_new_course_template($coursecode) {
    global $CFG, $USER, $DB;

    if (function_exists('cegep_' . $CFG->block_cegep_name . '_create_course')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_create_course', $coursecode, $term, $meta);
    } else {

        // Prepare external SIS database connection
        if ($sisdb = sisdb_connect()) {
            $sisdb->Execute("SET NAMES 'utf8'");
        }
        else {
            error_log('[SIS_DB] Could not make a connection');
            print_error('dbconnectionfailed','error');
        }

        // Validate coursecode
        $select_course = "SELECT * FROM `$CFG->sisdb_name`.`course` WHERE `coursecode` = '$coursecode' LIMIT 1";
        $result = $sisdb->execute($select_course);
        if ($result->RecordCount() < 1) {
            $sisdb->close();
            print_error("Le code de cours demandé n'existe pas!");
            return false;
        }

        // Build course object
        $course = new StdClass;

        // Course idnumber
        $coursecode = strtoupper($coursecode);
        $coursemaxid = $DB->get_record_sql("SELECT MAX(CONVERT(SUBSTRING_INDEX(`idnumber`, '_', -1), UNSIGNED)) as num FROM `mdl_course` WHERE idnumber LIKE '$coursecode%'");
        if ($coursemaxid->num === null) {
            $course->idnumber = $coursecode . '_0';
        } else {
            $course->idnumber = $coursecode . '_' . ($coursemaxid->num + 1);
        }

        // Course category
        if (($p = strpos($course->idnumber, '_')) !== false) {
            $course_category_lenght = $p;
        } else {
            $course_category_lenght = strlen($course->idnumber);
        }
        if (strlen($course_category_lenght) > 8) {
            $course_category = substr($course->idnumber, 3, 3);
        } else {
            $course_category = substr($course->idnumber, 0, 3);
        }
        $course->category = cegep_local_course_category($course_category);
        if (!$course->category) {
            $sisdb->close();
            return false;
        }

        $sisdb->close();
        return $course;
    }
}

/**
 * Prepare a select query for execution. Most Cegeps won't need this.
 */
function cegep_local_prepare_select_query($query) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_prepare_select_query')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_prepare_select_query', $query);
    }
    else {
        return $query;
    }
}

/**
 * Convert a term code (YYYYS) into a string,
 * like 'Fall 2009' or 'Winter 2010'.
 */
function cegep_local_term_to_string($code) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_term_to_string')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_term_to_string', $code);
    }
    else {
        $year = substr($code, 0, 4);
        $semester = substr($code, 4, 1);

        $str = '';

        switch ($semester) {
            case '1':
                $str = get_string("winter", "block_cegep") . ' ';
                break;
            case '2':
                $str = get_string("summer", "block_cegep") . ' ';
                break;
            case '3':
                $str = get_string("fall", "block_cegep") . ' ';
                break;
            default:
                $str = get_string("fall", "block_cegep") . ' ';
                break;
        }

        $str .= $year;
        return $str;
    }
}

/* Decrements a term, in the form of YYYYS. */
function cegep_local_decrement_term($term, $number = 1) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_decrement_term')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_decrement_term', $code);
    } else {
        $year = substr($term, 0, 4);
        $semester = substr($term, 4, 1);
        while ($number > 0) {
            if ($semester == 1) {
                $semester = 3;
                $year--;
            }
            else {
                $semester--;
            }
            $number--;
        }
        return $year . $semester;
    }
}

/**
 * Create an enrolment in the external enrolments database
 */
function cegep_local_enrol_user($courseidnumber, $username, $rolename = '', $coursegroup_id = NULL, $program_idyear = NULL, $request_id = NULL) {
    global $CFG, $DB;

    if (function_exists('cegep_' . $CFG->block_cegep_name . '_create_enrolment')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_create_enrolment', $courseidnumber, $username, $request_id);
    } else {

        if (empty($courseidnumber)) {
            print_error("Le cours n'a pas de numéro d'identification!");
            return false;
        }

        if (empty($username)) {
            print_error("Le nom d'utilisateur à inscrire est vide!");
            return false;
        }

        if (empty($rolename)) {
            $rolename = $CFG->block_cegep_studentrole;
        }

        (is_null($coursegroup_id)) ? ($coursegroup_id = 'NULL') : ($coursegroup_id = "'${coursegroup_id}'");
        (is_null($program_idyear)) ? ($program_idyear = 'NULL') : ($program_idyear = "'${program_idyear}'");
        (is_null($request_id)) ? ($request_id = 'NULL') : ($request_id = "'${request_id}'");

        // Insert enrolment in external DB
        $enroldb = enroldb_connect();
        $insert = "INSERT INTO `$CFG->enrol_dbname`.`$CFG->enrol_remoteenroltable` (`$CFG->enrol_remotecoursefield` , `$CFG->enrol_remoteuserfield` , `$CFG->enrol_remoterolefield` , `coursegroup_id` , `program_idyear` , `request_id`) VALUES ('$courseidnumber', '" . $username . "', '$rolename', $coursegroup_id, $program_idyear, $request_id);";
        $result = $enroldb->Execute($insert);

        if (!$result) {
            trigger_error($enroldb->ErrorMsg() .' STATEMENT: '. $insert, E_USER_ERROR);
            $enroldb->Close();
            return false;
        }

                // If user exists in database, assign its role right away and add to group
        if ($user = $DB->get_record('user', array($CFG->enrol_localuserfield => $username))) {
            $course = $DB->get_record('course', array($CFG->enrol_localcoursefield => $courseidnumber));
            $role = $DB->get_record('role', array($CFG->enrol_localrolefield => $rolename));
            $context = get_context_instance(CONTEXT_COURSE, $course->id);
            if ($course && $role) {
                $enrol = enrol_get_plugin('database');
                $instance = $DB->get_record('enrol', array('courseid' => $course->id, 'enrol' => 'database'), '*', IGNORE_MULTIPLE);
                if (!$instance) {
                    $enrolid = $enrol->add_instance($course);
                    $instance = $DB->get_record('enrol', array('id' => $enrolid));
                }
                $enrol->enrol_user($instance, $user->id, $role->id, 0, 0, ENROL_USER_ACTIVE);
            }
        }
        $enroldb->Close();
        return true;
    }
}

/*
 * Delete all course enrolments from external enrolments DB
 * (ie. when a course is deleted)
 */
function cegep_delete_course_enrolments($course) {
    global $CFG;

    $enroldb = enroldb_connect();

    $delete = "DELETE FROM `$CFG->enrol_dbname`.`$CFG->enrol_remoteenroltable` WHERE `$CFG->enrol_remotecoursefield` = '$course->idnumber';";

    $result = $enroldb->Execute($delete);

    if (!$result) {
        notify(get_string('errordeletingenrolment','block_cegep'));
        $enroldb->Close();
        return false;
    } else {
        notify(get_string('coursegroupunenrolled','block_cegep',array($enroldb->Affected_Rows())));
        $enroldb->Close();
        return true;
    }
}

function sisdbsource_connect() {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_sisdbsource_connect')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_sisdbsource_connect', $CFG->sisdbsource_type, $CFG->sisdbsource_host, $CFG->sisdbsource_name, $CFG->sisdbsource_user, $CFG->sisdbsource_pass);
    }
    else {
        return cegep_dbconnect($CFG->sisdbsource_type, $CFG->sisdbsource_host, $CFG->sisdbsource_name, $CFG->sisdbsource_user, $CFG->sisdbsource_pass);
    }
}

function sisdb_connect() {
    global $CFG;
    return cegep_dbconnect($CFG->sisdb_type, $CFG->sisdb_host, $CFG->sisdb_name, $CFG->sisdb_user, $CFG->sisdb_pass);
}

function enroldb_connect() {
    global $CFG;
    return cegep_dbconnect($CFG->enrol_dbtype, $CFG->enrol_dbhost, $CFG->enrol_dbname, $CFG->enrol_dbuser, $CFG->enrol_dbpass);
}

function cegep_dbconnect($type, $host, $name, $user, $pass) {

    // Try to connect to the external database (forcing new connection)
    $db = ADONewConnection($type);
    if ($db->Connect($host, $user, $pass, $name, true)) {
        $db->SetFetchMode(ADODB_FETCH_ASSOC); ///Set Assoc mode always after DB connection
        return $db;
    } else {
        trigger_error("Error connecting to DB backend with: "
                      . "$host, $user, $pass, $name");
        return false;
    }
}

function cegep_local_student_needs_updating($resultat) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_student_needs_updating')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_student_needs_updating', $resultat);
    }
    else {
        // to be implemented
    }
}

function cegep_local_get_sisdb_student_insert($code_etudiant, $last_name, $first_name, $program, $programyear) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_get_sisdb_student_insert')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_get_sisdb_student_insert', $code_etudiant, $last_name, $first_name, $program, $programyear);
    }
    else {
        // to be implemented
    }
}

function cegep_local_get_sisdb_student_update($code_etudiant, $last_name, $first_name, $program, $programyear) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_get_sisdb_student_update')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_get_sisdb_student_update', $code_etudiant, $last_name, $first_name, $program, $programyear);
    }
    else {
        // to be implemented
    }
}

function cegep_local_update_program_enrolment($code_etudiant, $student_role, $program_idyear) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_update_program_enrolment')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_update_program_enrolment', $code_etudiant, $student_role, $program_idyear);
    }
    else {
        // to be implemented
        return;
    }
}

function cegep_local_date_to_datecode($date = null) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_date_to_datecode')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_date_to_datecode', $date);
    }
    else {
        if(!$date) {
            $date = date('Y-m-d');
        }

        $code = date('Y', strtotime($date));

        switch (substr($date, 5, 2)) {
            case '01':
            case '02':
            case '03':
            case '04':
            case '05':
                $code .= '1';
                break;

            case '06':
            case '07':
                $code .= '2';
                break;

            case '08':
            case '09':
            case '10':
            case '11':
            case '12':
                $code .= '3';
                break;
            default:
                trigger_error('Wrong date given', E_USER_WARNING);
        }
        return $code;
    }
}

/* Get an array of coursegroups/sections for any given course,
 * optionally limited by teacher enrolment.
 */
function cegep_local_get_coursegroups($course_idnumber, $teacher_idnumber = '') {
    global $CFG, $sisdb;

    $coursecode = substr($course_idnumber, 0, strpos($course_idnumber, '_'));
    if (empty($coursecode)) {
        $coursecode = $course_idnumber;
    }

    $term = cegep_local_current_term();

    $select = "SELECT * FROM `$CFG->sisdb_name`.`coursegroup` WHERE `coursecode` = '$coursecode' AND `term` >= $term;";
    $coursegroups_rs = $sisdb->Execute($select);

    if (!$coursegroups_rs) {
        trigger_error($enroldb->ErrorMsg() .' STATEMENT: '. $select, E_USER_ERROR);
        return false;
    }

    $coursegroups = array();
    $teacher_enrolments = array();
    if (!empty($teacher_idnumber)) {
        $teacher_enrolments = cegep_local_get_teacher_enrolments($teacher_idnumber, $term);
    }

    while (!$coursegroups_rs->EOF) {
        $coursegroup = array();
        $coursegroup['id'] = $coursegroups_rs->fields['id'];
        $coursegroup['coursecode'] = $coursegroups_rs->fields['coursecode'];
        $coursegroup['group'] = $coursegroups_rs->fields['group'];
        $coursegroup['term'] = $coursegroups_rs->fields['term'];

        // Count student enrolments in SIS
        $select = "SELECT COUNT(`username`) AS numberofstudents FROM `$CFG->sisdb_name`.`student_enrolment` WHERE coursegroup_id = $coursegroup[id];";
        $coursegroup['numberofstudents'] = $sisdb->Execute($select)->fields['numberofstudents'];

        // If teacher_idnumber is specified, return only coursegroups/sections in which that teacher is enrolled in SIS
        if (!empty($teacher_idnumber)) {
            foreach ($teacher_enrolments as $teacher_enrolment) {
                if ($teacher_enrolment['coursecode'] === $coursegroup['coursecode'] && $teacher_enrolment['coursegroup'] === $coursegroup['group']) {
                    array_push($coursegroups, $coursegroup);
                    break;
                }
            }
        } else {
            array_push($coursegroups, $coursegroup);
        }
        $coursegroups_rs->MoveNext();
    }
    return $coursegroups;
}

/* Get an array of coursegroups/sections that have been
 * enrolled in a given Moodle course. Use the global $COURSE.
 */
function cegep_local_get_enrolled_coursegroups($course_idnumber) {
    global $CFG, $enroldb, $sisdb;

    $select = "SELECT DISTINCT `coursegroup_id`, COUNT(`coursegroup_id`) AS numberofstudents FROM `$CFG->enrol_remoteenroltable` WHERE `$CFG->enrol_remotecoursefield`='". $course_idnumber . "' AND `$CFG->enrol_remoterolefield` = '$CFG->block_cegep_studentrole' AND `coursegroup_id` IS NOT NULL GROUP BY `coursegroup_id` ORDER BY `coursegroup_id`;";

    $coursegroups_rs = $enroldb->Execute($select);

    if (!$coursegroups_rs) {
        trigger_error($enroldb->ErrorMsg() .' STATEMENT: '. $select, E_USER_ERROR);
        return false;
    }

    $coursegroups = array();

    while (!$coursegroups_rs->EOF) {
        $coursegroup = array();
        $coursegroup['id'] = $coursegroups_rs->fields['coursegroup_id'];
        $coursegroup['numberofstudents'] = $coursegroups_rs->fields['numberofstudents'];

        $select = "SELECT * FROM `$CFG->sisdb_name`.`coursegroup` WHERE id = $coursegroup[id];";
        $coursegroup_sis = $sisdb->Execute($select)->fields;
        $coursegroup['coursecode'] = $coursegroup_sis['coursecode'];
        $coursegroup['group'] = $coursegroup_sis['group'];
        $coursegroup['term'] = $coursegroup_sis['term'];

        array_push($coursegroups, $coursegroup);
        $coursegroups_rs->MoveNext();
    }
    return $coursegroups;
}

/* Get an array of coursegroups/sections that are available
 * for enrollement in a given Moodle course.
 */
function cegep_local_get_unenrolled_coursegroups($course_idnumber, $user_idnumber) {
    $coursegroups = array();

    if (!$all_coursegroups = cegep_local_get_coursegroups($course_idnumber, $user_idnumber)) {
        return false;
    }

    $enrolled_coursegroups = cegep_local_get_enrolled_coursegroups($course_idnumber);
    foreach ($all_coursegroups as $coursegroup) {
        foreach ($enrolled_coursegroups as $enrolled_coursegroup) {
            if ($coursegroup['id'] == $enrolled_coursegroup['id']) {
                continue 2;
            }
        }
        array_push($coursegroups, $coursegroup);
    }
    return $coursegroups;
}

/**
 * Get a coursegroup id.
 */
function cegep_local_get_coursegroup_id($coursecode, $coursegroup, $term) {
    global $CFG, $sisdb;

    if (function_exists('cegep_' . $CFG->block_cegep_name . '_get_coursegroup_id')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_get_coursegroup_id', $coursecode, $coursegroup, $term);
    }
    else {
        // Fetch record of the coursegroup from SIS
        $select_coursegroup = "SELECT id FROM `$CFG->sisdb_name`.`coursegroup` WHERE `coursecode` = ? AND `group` = ? AND `term` = ?;";
        return $sisdb->Execute($select_coursegroup, array($coursecode, $coursegroup, $term))->fields['id'];
    }
}

/**
 * Get a coursegroup info (coursecode, group no. and term) from coursegroup id.
 */
function cegep_local_get_coursegroup($coursegroup_id) {
    global $CFG, $sisdb;

    if (function_exists('cegep_' . $CFG->block_cegep_name . '_get_coursegroup')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_get_coursegroup', $coursegroup_id);
    }
    else {
        // Fetch record of the coursegroup from SIS
        $select_coursegroup = "SELECT * FROM `$CFG->sisdb_name`.`coursegroup` WHERE `id` = ?;";
        return $sisdb->Execute($select_coursegroup, array($coursegroup_id))->fields;
    }
}


/**
 * Enrol a coursegroup/section into a Moodle course.
 * Accepts either the coursegroup id OR coursecode, coursegroup
 * and term for the coursegroup/section to enrol.
 */
function cegep_local_enrol_coursegroup() {
    global $CFG, $COURSE, $DB, $enroldb, $sisdb;

    $args = func_get_args();

    if (count($args) == 1) {
        $coursegroup_id = $args[0];
    }
    elseif (count($args) == 3) {
        $coursegroup_id = cegep_local_get_coursegroup_id($args[0], $args[1], $args[2]);
        $coursegroup = $args[1];
    } else {
        return FALSE;
    }

    // Fetch records of students enrolled into this course from SIS
    $select_students = "SELECT * FROM `$CFG->sisdb_name`.`student_enrolment` WHERE `coursegroup_id` = $coursegroup_id;";
    $students_rs = $sisdb->Execute($select_students);

    // Fail if can't find coursegroup id or student list
    if (!$coursegroup_id || !$students_rs) {
        return FALSE;
    }

    $context = get_context_instance(CONTEXT_COURSE, $COURSE->id);
    $student_role = $DB->get_record('role', array($CFG->enrol_localrolefield => $CFG->block_cegep_studentrole));

    // Go through each student and insert Moodle external enrolment database record
    $students_enrolled = array();
    while ($students_rs && !$students_rs->EOF) {
        $student = $students_rs->fields;
        if (!cegep_local_enrol_user($COURSE->idnumber, $student['username'], $CFG->block_cegep_studentrole, $coursegroup_id)) {
            return FALSE;
        } else {
            array_push($students_enrolled, $student['username']);
        }
        $students_rs->MoveNext();
    }

    return $students_enrolled;
}

function cegep_local_get_real_teacher_idnumber($idnumber) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_get_real_teacher_idnumber')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_get_real_teacher_idnumber', $idnumber);
    } else {
        return $idnumber;
    }
}

function cegep_local_get_course_title($coursecode) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_get_course_title')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_get_course_title', $coursecode);
    } else {

        // Prepare external SIS database connection
        if ($sisdb = sisdb_connect()) {
            $sisdb->Execute("SET NAMES 'utf8'");
        }
        else {
            error_log('[SIS_DB] Could not make a connection');
            print_error('dbconnectionfailed','error');
        }

        $select = "SELECT title FROM `$CFG->sisdb_name`.course WHERE coursecode = '$coursecode' LIMIT 1";
        $sisdb_rs = $sisdb->Execute($select);

        $title = false;
        while ($sisdb_rs && !$sisdb_rs->EOF) {
            $title = $sisdb_rs->fields['title'];
            $sisdb_rs->moveNext();
        }

        $sisdb->Close();

        return $title;

    }
}

function cegep_local_is_teacher($idnumber, $term) {
    global $CFG;
    if (function_exists('cegep_' . $CFG->block_cegep_name . '_is_teacher')) {
        return call_user_func('cegep_' . $CFG->block_cegep_name . '_is_teacher', $idnumber, $term);
    } else {

        // Prepare external SIS database connection
        if ($sisdb = sisdb_connect()) {
            $sisdb->Execute("SET NAMES 'utf8'");
        }
        else {
            error_log('[SIS_DB] Could not make a connection');
            print_error('dbconnectionfailed','error');
        }

        $idnumber = cegep_local_get_real_teacher_idnumber($idnumber);
        $is_teacher = FALSE;

        $select = "SELECT idnumber FROM `$CFG->sisdb_name`.teacher_enrolment WHERE idnumber = '$idnumber' AND term >= $term;";
        $sisdb_rs = $sisdb->Execute($select);
        if (!$sisdb_rs->EOF) {
            $is_teacher = TRUE;
        }

        $sisdb->Close();

        return $is_teacher;

    }
}

?>