|
|
|
|
<?php
|
|
|
|
|
/* For licensing terms, see /license.txt */
|
|
|
|
|
/**
|
|
|
|
|
* Script to move users from one course to another if they haven't taken the
|
|
|
|
|
* test in the first course.
|
|
|
|
|
* This script includes logic and side-effects, which is contrary to PSR-1, but
|
|
|
|
|
* it is not considered as a "finished" script to be included in Chamilo.
|
|
|
|
|
* Refs BT#8845
|
|
|
|
|
*/
|
|
|
|
|
/**
|
|
|
|
|
* Init
|
|
|
|
|
*/
|
|
|
|
|
die('Remove the "die()" line to execute this script'.PHP_EOL);
|
|
|
|
|
require __DIR__.'/../../main/inc/global.inc.php';
|
|
|
|
|
// Define origin and destination courses' code
|
|
|
|
|
$originCourse = 'XYZ2014';
|
|
|
|
|
$destinationCourse = 'XYZ2014C2';
|
|
|
|
|
// Set to true to only show what it would do
|
|
|
|
|
$debug = true;
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
* Check and move users
|
|
|
|
|
*/
|
|
|
|
|
$output = moveUserFromCourseToCourse($originCourse, $destinationCourse, $debug);
|
|
|
|
|
if (empty($output)) {
|
|
|
|
|
$output = 'No output';
|
|
|
|
|
}
|
|
|
|
|
/**
|
|
|
|
|
* Output on screen (use in HTTP only for now)
|
|
|
|
|
*/
|
|
|
|
|
echo '<!DOCTYPE html><html lang="en">'.
|
|
|
|
|
'<head>'.
|
|
|
|
|
'<meta charset="utf-8">'.
|
|
|
|
|
'<link href="'.api_get_path(WEB_CODE_PATH).'css/base.css" media="all" rel="stylesheet" type="text/css" />'.
|
|
|
|
|
'</head>'.
|
|
|
|
|
'<body>'.
|
|
|
|
|
$output.
|
|
|
|
|
'</body></html>';
|
|
|
|
|
|
|
|
|
|
/**
|
|
|
|
|
* Moves a user from course A to course B "the hard way", by only changing
|
|
|
|
|
* the course_rel_user table. This does not remove any data registered in
|
|
|
|
|
* course A, as per requirements.
|
|
|
|
|
* @param string $originCourse Origin course's code
|
|
|
|
|
* @param string $destinationCourse Destination course's code
|
|
|
|
|
* @param bool $debug Whether to only show potential action, or to execute them
|
|
|
|
|
* @return string Output string
|
|
|
|
|
*/
|
|
|
|
|
function moveUserFromCourseToCourse($originCourse, $destinationCourse, $debug = true)
|
|
|
|
|
{
|
|
|
|
|
$eol = PHP_EOL;
|
|
|
|
|
$output = '';
|
|
|
|
|
if (PHP_SAPI != 'cli') {
|
|
|
|
|
$eol = "<br />".$eol;
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
if (empty($originCourse)) {
|
|
|
|
|
return $output;
|
|
|
|
|
} else {
|
|
|
|
|
$originCourse = Database::escape_string($originCourse);
|
|
|
|
|
}
|
|
|
|
|
if (empty($destinationCourse)) {
|
|
|
|
|
return $output;
|
|
|
|
|
} else {
|
|
|
|
|
$destinationCourse = Database::escape_string($destinationCourse);
|
|
|
|
|
}
|
|
|
|
|
$output .= 'Moving students who have no exe results from course '.$originCourse.' to course '.$destinationCourse.$eol;
|
|
|
|
|
$tableCRU = Database::get_main_table(TABLE_MAIN_COURSE_USER);
|
|
|
|
|
$tableTEE = Database::get_main_table(TABLE_STATISTIC_TRACK_E_EXERCISES);
|
|
|
|
|
$courseId = api_get_course_int_id($originCourse);
|
|
|
|
|
// Get the users who have passed an exam in the course of origin
|
|
|
|
|
$sql = "SELECT distinct(exe_user_id) FROM $tableTEE
|
|
|
|
|
WHERE c_id = $courseId";
|
|
|
|
|
//AND status != 'incomplete'";
|
|
|
|
|
$output .= "$sql".$eol;
|
|
|
|
|
$res = Database::query($sql);
|
|
|
|
|
$users = array(); // users list in array format
|
|
|
|
|
while ($row = Database::fetch_row($res)) {
|
|
|
|
|
$users[] = $row[0];
|
|
|
|
|
}
|
|
|
|
|
// Now get the list of users subscribed to the course of origin
|
|
|
|
|
$sql = "SELECT user_id
|
|
|
|
|
FROM $tableCRU
|
|
|
|
|
WHERE status = ".STUDENT."
|
|
|
|
|
AND c_id = '$courseId'";
|
|
|
|
|
$output .= "$sql".$eol;
|
|
|
|
|
$res = Database::query($sql);
|
|
|
|
|
$numUsers = Database::num_rows($res);
|
|
|
|
|
if ($numUsers < 1) {
|
|
|
|
|
return $output; //no user registered in first course
|
|
|
|
|
}
|
|
|
|
|
// Now get the list of users subscribed to the course of origin
|
|
|
|
|
$sqlDestination = "SELECT user_id
|
|
|
|
|
FROM $tableCRU
|
|
|
|
|
WHERE status = ".STUDENT."
|
|
|
|
|
AND course_code = '$destinationCourse'";
|
|
|
|
|
$output .= "$sqlDestination".$eol;
|
|
|
|
|
$resDestination = Database::query($sqlDestination);
|
|
|
|
|
$destinationUsers = array();
|
|
|
|
|
while ($row = Database::fetch_assoc($resDestination)) {
|
|
|
|
|
$destinationUsers[] = $row['user_id'];
|
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
// List of users with no attempt
|
|
|
|
|
$noAttemptUsers = array();
|
|
|
|
|
// List of users with an attempt
|
|
|
|
|
$attemptUsers = array();
|
|
|
|
|
$i = 0;
|
|
|
|
|
$output .= '<ul>';
|
|
|
|
|
while ($row = Database::fetch_assoc($res)) {
|
|
|
|
|
$i++;
|
|
|
|
|
// If there are results from
|
|
|
|
|
if (in_array($row['user_id'], $users)) {
|
|
|
|
|
// This user has already attempted
|
|
|
|
|
$u = api_get_user_info($row['user_id']);
|
|
|
|
|
$attemptUsers[$row['user_id']] = $u;
|
|
|
|
|
$output .= '<li class="muted">';
|
|
|
|
|
$output .= $i.' - User '.$u['lastname'].' '.$u['firstname'].' <'.$u['email'].'> has results.';
|
|
|
|
|
$output .= '</li>'.PHP_EOL;
|
|
|
|
|
} else {
|
|
|
|
|
// This user hasn't attempted anything
|
|
|
|
|
$u = api_get_user_info($row['user_id']);
|
|
|
|
|
if (in_array($row['user_id'], $destinationUsers)) {
|
|
|
|
|
$output .= '<li class="muted">';
|
|
|
|
|
$output .= $i.' - User '.$u['lastname'].' '.$u['firstname'].' <'.$u['email'].'> has no results but is already in the destination course.'.$eol;
|
|
|
|
|
$output .= '</li>'.PHP_EOL;
|
|
|
|
|
} else {
|
|
|
|
|
$output .= '<li class="">';
|
|
|
|
|
$output .= $i.' - User '.$u['lastname'].' '.$u['firstname'].' <'.$u['email'].'> has no results and will be moved.'.$eol;
|
|
|
|
|
$noAttemptUsers[$row['user_id']] = $u;
|
|
|
|
|
$output .= '</li>'.PHP_EOL;
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
}
|
|
|
|
|
$output .= '</ul>';
|
|
|
|
|
if ($debug) {
|
|
|
|
|
return $output;
|
|
|
|
|
}
|
|
|
|
|
// If not debug mode, execute the move!
|
|
|
|
|
$j = 0;
|
|
|
|
|
foreach ($noAttemptUsers as $userId => $userInfo) {
|
|
|
|
|
// unsubscribe
|
|
|
|
|
$sql = "DELETE FROM $tableCRU WHERE course_code = '$originCourse' AND user_id = $userId";
|
|
|
|
|
$output .= $sql.$eol;
|
|
|
|
|
Database::query($sql);
|
|
|
|
|
$sql = "INSERT INTO $tableCRU (course_code, user_id, status)
|
|
|
|
|
VALUES ('$destinationCourse', $userId, ".STUDENT.")";
|
|
|
|
|
$output .= $sql.$eol;
|
|
|
|
|
Database::query($sql);
|
|
|
|
|
$j++;
|
|
|
|
|
}
|
|
|
|
|
$output .= "$j users have been moved".$eol;
|
|
|
|
|
return $output;
|
|
|
|
|
}
|
