mirror of
https://github.com/moodle/moodle.git
synced 2025-01-19 14:27:22 +01:00
ebc3bd2b24
Moodle tables. ie user -> userid in many tables, plus in user_students start -> starttime and end -> endtime I've just done all this as carefully as I could ... I don't think I missed anything but it's pretty intensive work and I'd be fooling myself if I didn't think I'd missed a couple. Note that this version should pretty much be able to bootstrap itself using PostgreSQL now ... but this is untested
445 lines
16 KiB
PHP
445 lines
16 KiB
PHP
<?PHP // $Id$
|
|
|
|
include_once("$CFG->dirroot/files/mimetypes.php");
|
|
|
|
define("OFFLINE", "0");
|
|
define("UPLOADSINGLE", "1");
|
|
|
|
$ASSIGNMENT_TYPE = array (OFFLINE => get_string("typeoffline", "assignment"),
|
|
UPLOADSINGLE => get_string("typeuploadsingle", "assignment") );
|
|
|
|
|
|
function assignment_add_instance($assignment) {
|
|
// Given an object containing all the necessary data,
|
|
// (defined by the form in mod.html) this function
|
|
// will create a new instance and return the id number
|
|
// of the new instance.
|
|
|
|
$assignment->timemodified = time();
|
|
|
|
$assignment->timedue = make_timestamp($assignment->dueyear, $assignment->duemonth, $assignment->dueday,
|
|
$assignment->duehour, $assignment->dueminute);
|
|
|
|
return insert_record("assignment", $assignment);
|
|
}
|
|
|
|
|
|
function assignment_update_instance($assignment) {
|
|
// Given an object containing all the necessary data,
|
|
// (defined by the form in mod.html) this function
|
|
// will update an existing instance with new data.
|
|
|
|
$assignment->timemodified = time();
|
|
$assignment->timedue = make_timestamp($assignment->dueyear, $assignment->duemonth, $assignment->dueday,
|
|
$assignment->duehour, $assignment->dueminute);
|
|
$assignment->id = $assignment->instance;
|
|
|
|
return update_record("assignment", $assignment);
|
|
}
|
|
|
|
|
|
function assignment_delete_instance($id) {
|
|
// Given an ID of an instance of this module,
|
|
// this function will permanently delete the instance
|
|
// and any data that depends on it.
|
|
|
|
if (! $assignment = get_record("assignment", "id", "$id")) {
|
|
return false;
|
|
}
|
|
|
|
$result = true;
|
|
|
|
if (! delete_records("assignment_submissions", "assignment", "$assignment->id")) {
|
|
$result = false;
|
|
}
|
|
|
|
if (! delete_records("assignment", "id", "$assignment->id")) {
|
|
$result = false;
|
|
}
|
|
|
|
return $result;
|
|
}
|
|
|
|
function assignment_user_outline($course, $user, $mod, $assignment) {
|
|
if ($submission = assignment_get_submission($assignment, $user)) {
|
|
|
|
if ($submission->grade) {
|
|
$result->info = get_string("grade").": $submission->grade";
|
|
}
|
|
$result->time = $submission->timemodified;
|
|
return $result;
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
function assignment_user_complete($course, $user, $mod, $assignment) {
|
|
if ($submission = assignment_get_submission($assignment, $user)) {
|
|
if ($basedir = assignment_file_area($assignment, $user)) {
|
|
if ($files = get_directory_list($basedir)) {
|
|
$countfiles = count($files)." ".get_string("uploadedfiles", "assignment");
|
|
foreach ($files as $file) {
|
|
$countfiles .= "; $file";
|
|
}
|
|
}
|
|
}
|
|
|
|
print_simple_box_start();
|
|
echo "<P><FONT SIZE=1>";
|
|
echo get_string("lastmodified").": ";
|
|
echo userdate($submission->timemodified);
|
|
echo assignment_print_difference($assignment->timedue - $submission->timemodified);
|
|
echo "</FONT></P>";
|
|
|
|
assignment_print_user_files($assignment, $user);
|
|
|
|
echo "<BR>";
|
|
|
|
assignment_print_feedback($course, $submission);
|
|
|
|
print_simple_box_end();
|
|
|
|
} else {
|
|
print_string("notsubmittedyet", "assignment");
|
|
}
|
|
}
|
|
|
|
|
|
function assignment_cron () {
|
|
// Function to be run periodically according to the moodle cron
|
|
// Finds all assignment notifications that have yet to be mailed out, and mails them
|
|
|
|
global $CFG, $USER;
|
|
|
|
$cutofftime = time() - $CFG->maxeditingtime;
|
|
|
|
if ($submissions = assignment_get_unmailed_submissions($cutofftime)) {
|
|
$timenow = time();
|
|
|
|
foreach ($submissions as $submission) {
|
|
|
|
echo "Processing assignment submission $submission->id\n";
|
|
|
|
if (! $user = get_record("user", "id", "$submission->userid")) {
|
|
echo "Could not find user $post->userid\n";
|
|
continue;
|
|
}
|
|
|
|
$USER->lang = $user->lang;
|
|
|
|
if (! $course = get_record("course", "id", "$submission->course")) {
|
|
echo "Could not find course $submission->course\n";
|
|
continue;
|
|
}
|
|
|
|
if (! isstudent($course->id, $user->id) and !isteacher($course->id, $user->id)) {
|
|
continue; // Not an active participant
|
|
}
|
|
|
|
if (! $teacher = get_record("user", "id", "$submission->teacher")) {
|
|
echo "Could not find teacher $submission->teacher\n";
|
|
continue;
|
|
}
|
|
|
|
if (! $mod = get_coursemodule_from_instance("assignment", $submission->assignment, $course->id)) {
|
|
echo "Could not find course module for assignment id $submission->assignment\n";
|
|
continue;
|
|
}
|
|
|
|
$strassignments = get_string("modulenameplural", "assignment");
|
|
$strassignment = get_string("modulename", "assignment");
|
|
|
|
$postsubject = "$course->shortname: $strassignments: $submission->name";
|
|
$posttext = "$course->shortname -> $strassignments -> $submission->name\n";
|
|
$posttext .= "---------------------------------------------------------------------\n";
|
|
$posttext .= "$teacher->firstname $teacher->lastname has posted some feedback on your\n";
|
|
$posttext .= "assignment submission for '$submission->name'\n\n";
|
|
$posttext .= "You can see it appended to your assignment submission:\n";
|
|
$posttext .= " $CFG->wwwroot/mod/assignment/view.php?id=$mod->id\n";
|
|
$posttext .= "---------------------------------------------------------------------\n";
|
|
if ($user->mailformat == 1) { // HTML
|
|
$posthtml = "<P><FONT FACE=sans-serif>".
|
|
"<A HREF=\"$CFG->wwwroot/course/view.php?id=$course->id\">$course->shortname</A> ->".
|
|
"<A HREF=\"$CFG->wwwroot/mod/assignment/index.php?id=$course->id\">$strassignments</A> ->".
|
|
"<A HREF=\"$CFG->wwwroot/mod/assignment/view.php?id=$mod->id\">$submission->name</A></FONT></P>";
|
|
$posthtml .= "<HR><FONT FACE=sans-serif>";
|
|
$posthtml .= "<P>$teacher->firstname $teacher->lastname has posted some feedback on your";
|
|
$posthtml .= " assignment submission for '<B>$submission->name</B>'</P>";
|
|
$posthtml .= "<P>You can see it <A HREF=\"$CFG->wwwroot/mod/assignment/view.php?id=$mod->id\">";
|
|
$posthtml .= "appended to your assignment submission</A>.</P></FONT><HR>";
|
|
} else {
|
|
$posthtml = "";
|
|
}
|
|
|
|
if (! email_to_user($user, $teacher, $postsubject, $posttext, $posthtml)) {
|
|
echo "Error: assignment cron: Could not send out mail for id $submission->id to user $user->id ($user->email)\n";
|
|
}
|
|
if (! set_field("assignment_submissions", "mailed", "1", "id", "$submission->id")) {
|
|
echo "Could not update the mailed field for id $submission->id\n";
|
|
}
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
function assignment_print_recent_activity(&$logs, $isteacher=false) {
|
|
global $CFG, $COURSE_TEACHER_COLOR;
|
|
|
|
$content = false;
|
|
$assignments = NULL;
|
|
|
|
foreach ($logs as $log) {
|
|
if ($log->module == "assignment" and $log->action == "upload") {
|
|
$assignments[$log->info] = assignment_log_info($log);
|
|
$assignments[$log->info]->time = $log->time;
|
|
$assignments[$log->info]->url = $log->url;
|
|
}
|
|
}
|
|
|
|
if ($assignments) {
|
|
$content = true;
|
|
print_headline(get_string("newsubmissions", "assignment").":");
|
|
foreach ($assignments as $assignment) {
|
|
$date = userdate($assignment->time, "%d %b, %H:%M");
|
|
echo "<P><FONT SIZE=1>$date - $assignment->firstname $assignment->lastname<BR>";
|
|
echo "\"<A HREF=\"$CFG->wwwroot/mod/assignment/$assignment->url\">";
|
|
echo "$assignment->name";
|
|
echo "</A>\"</FONT></P>";
|
|
}
|
|
}
|
|
|
|
return $content;
|
|
}
|
|
|
|
function assignment_grades($assignmentid) {
|
|
/// Must return an array of grades, indexed by user, and a max grade.
|
|
|
|
$return->grades = get_records_menu("assignment_submissions", "assignment",
|
|
$assignmentid, "", "userid,grade");
|
|
$return->maxgrade = get_field("assignment", "grade", "id", "$assignmentid");
|
|
return $return;
|
|
}
|
|
|
|
/// SQL STATEMENTS //////////////////////////////////////////////////////////////////
|
|
|
|
function assignment_log_info($log) {
|
|
global $CFG;
|
|
return get_record_sql("SELECT a.name, u.firstname, u.lastname
|
|
FROM {$CFG->prefix}assignment a,
|
|
{$CFG->prefix}user u
|
|
WHERE a.id = '$log->info'
|
|
AND u.id = '$log->userid'");
|
|
}
|
|
|
|
function assignment_get_all_submissions($assignment) {
|
|
/// Return all assignment submissions by ENROLLED students
|
|
global $CFG;
|
|
return get_records_sql("SELECT a.*
|
|
FROM {$CFG->prefix}assignment_submissions a,
|
|
{$CFG->prefix}user_students s
|
|
WHERE a.userid = s.userid
|
|
AND s.course = '$assignment->course'
|
|
AND a.assignment = '$assignment->id'
|
|
ORDER BY a.timemodified DESC");
|
|
}
|
|
|
|
function assignment_get_users_done($assignment) {
|
|
/// Return list of users who have done an assignment
|
|
global $CFG;
|
|
return get_records_sql("SELECT u.*
|
|
FROM {$CFG->prefix}user u,
|
|
{$CFG->prefix}user_students s,
|
|
{$CFG->prefix}assignment_submissions a
|
|
WHERE s.course = '$assignment->course'
|
|
AND s.userid = u.id
|
|
AND u.id = a.userid
|
|
AND a.assignment = '$assignment->id'
|
|
ORDER BY a.timemodified DESC");
|
|
}
|
|
|
|
function assignment_get_unmailed_submissions($cutofftime) {
|
|
/// Return list of marked submissions that have not been mailed out
|
|
global $CFG;
|
|
return get_records_sql("SELECT s.*, a.course, a.name
|
|
FROM {$CFG->prefix}assignment_submissions s,
|
|
{$CFG->prefix}assignment a
|
|
WHERE s.mailed = 0
|
|
AND s.timemarked < $cutofftime
|
|
AND s.timemarked > 0
|
|
AND s.assignment = a.id");
|
|
}
|
|
|
|
|
|
//////////////////////////////////////////////////////////////////////////////////////
|
|
|
|
function assignment_file_area_name($assignment, $user) {
|
|
// Creates a directory file name, suitable for make_upload_directory()
|
|
global $CFG;
|
|
|
|
return "$assignment->course/$CFG->moddata/assignment/$assignment->id/$user->id";
|
|
}
|
|
|
|
function assignment_file_area($assignment, $user) {
|
|
return make_upload_directory( assignment_file_area_name($assignment, $user) );
|
|
}
|
|
|
|
function assignment_get_submission($assignment, $user) {
|
|
return get_record("assignment_submissions", "assignment", $assignment->id, "userid", $user->id);
|
|
}
|
|
|
|
function assignment_print_difference($time) {
|
|
if ($time < 0) {
|
|
$timetext = get_string("late", "assignment", format_time($time));
|
|
return " (<FONT COLOR=RED>$timetext</FONT>)";
|
|
} else {
|
|
$timetext = get_string("early", "assignment", format_time($time));
|
|
return " ($timetext)";
|
|
}
|
|
}
|
|
|
|
function assignment_print_submission($assignment, $user, $submission, $teachers, $grades) {
|
|
global $THEME;
|
|
|
|
echo "\n<TABLE BORDER=1 CELLSPACING=0 valign=top cellpadding=10 align=center>";
|
|
|
|
echo "\n<TR>";
|
|
if ($assignment->type == OFFLINE) {
|
|
echo "\n<TD BGCOLOR=\"$THEME->body\" WIDTH=35 VALIGN=TOP>";
|
|
} else {
|
|
echo "\n<TD ROWSPAN=2 BGCOLOR=\"$THEME->body\" WIDTH=35 VALIGN=TOP>";
|
|
}
|
|
print_user_picture($user->id, $assignment->course, $user->picture);
|
|
echo "</TD>";
|
|
echo "<TD NOWRAP BGCOLOR=\"$THEME->cellheading\">$user->firstname $user->lastname";
|
|
if ($submission->timemodified) {
|
|
echo " <FONT SIZE=1>".get_string("lastmodified").": ";
|
|
echo userdate($submission->timemodified);
|
|
echo assignment_print_difference($assignment->timedue - $submission->timemodified);
|
|
echo "</FONT>";
|
|
}
|
|
echo "</TR>";
|
|
|
|
if ($assignment->type != OFFLINE) {
|
|
echo "\n<TR><TD BGCOLOR=\"$THEME->cellcontent\">";
|
|
if ($submission->timemodified) {
|
|
assignment_print_user_files($assignment, $user);
|
|
} else {
|
|
print_string("notsubmittedyet", "assignment");
|
|
}
|
|
echo "</TD></TR>";
|
|
}
|
|
|
|
echo "\n<TR>";
|
|
echo "<TD WIDTH=35 VALIGN=TOP>";
|
|
if (!$submission->teacher) {
|
|
$submission->teacher = $USER->id;
|
|
}
|
|
print_user_picture($submission->teacher, $assignment->course, $teachers[$submission->teacher]->picture);
|
|
if ($submission->timemodified > $submission->timemarked) {
|
|
echo "<TD BGCOLOR=\"$THEME->cellheading2\">";
|
|
} else {
|
|
echo "<TD BGCOLOR=\"$THEME->cellheading\">";
|
|
}
|
|
echo get_string("feedback", "assignment").":";
|
|
choose_from_menu($grades, "g$submission->id", $submission->grade, get_string("grade")."...");
|
|
if ($submission->timemarked) {
|
|
echo " <FONT SIZE=1>".userdate($submission->timemarked)."</FONT>";
|
|
}
|
|
echo "<BR><TEXTAREA NAME=\"c$submission->id\" ROWS=6 COLS=60 WRAP=virtual>";
|
|
p($submission->comment);
|
|
echo "</TEXTAREA><BR>";
|
|
echo "</TD></TR>";
|
|
|
|
echo "</TABLE><BR CLEAR=ALL>\n";
|
|
}
|
|
|
|
function assignment_print_feedback($course, $submission) {
|
|
global $CFG, $THEME, $RATING;
|
|
|
|
if (! $teacher = get_record("user", "id", $submission->teacher)) {
|
|
error("Weird assignment error");
|
|
}
|
|
|
|
echo "\n<TABLE BORDER=0 CELLPADDING=1 CELLSPACING=1 ALIGN=CENTER><TR><TD BGCOLOR=#888888>";
|
|
echo "\n<TABLE BORDER=0 CELLPADDING=3 CELLSPACING=0 VALIGN=TOP>";
|
|
|
|
echo "\n<TR>";
|
|
echo "\n<TD ROWSPAN=3 BGCOLOR=\"$THEME->body\" WIDTH=35 VALIGN=TOP>";
|
|
print_user_picture($teacher->id, $course->id, $teacher->picture);
|
|
echo "</TD>";
|
|
echo "<TD NOWRAP WIDTH=100% BGCOLOR=\"$THEME->cellheading\">$teacher->firstname $teacher->lastname";
|
|
echo " <FONT SIZE=2><I>".userdate($submission->timemarked)."</I>";
|
|
echo "</TR>";
|
|
|
|
echo "\n<TR><TD WIDTH=100% BGCOLOR=\"$THEME->cellcontent\">";
|
|
|
|
echo "<P ALIGN=RIGHT><FONT SIZE=-1><I>";
|
|
if ($submission->grade) {
|
|
echo get_string("grade").": $submission->grade";
|
|
} else {
|
|
echo get_string("nograde");
|
|
}
|
|
echo "</I></FONT></P>";
|
|
|
|
echo text_to_html($submission->comment);
|
|
echo "</TD></TR></TABLE>";
|
|
echo "</TD></TR></TABLE>";
|
|
}
|
|
|
|
|
|
function assignment_print_user_files($assignment, $user) {
|
|
// Arguments are objects
|
|
|
|
global $CFG;
|
|
|
|
$filearea = assignment_file_area_name($assignment, $user);
|
|
|
|
if ($basedir = assignment_file_area($assignment, $user)) {
|
|
if ($files = get_directory_list($basedir)) {
|
|
foreach ($files as $file) {
|
|
$icon = mimeinfo("icon", $file);
|
|
if ($CFG->slasharguments) {
|
|
$ffurl = "file.php/$filearea/$file";
|
|
} else {
|
|
$ffurl = "file.php?file=/$filearea/$file";
|
|
}
|
|
|
|
echo "<IMG SRC=\"$CFG->wwwroot/files/pix/$icon\" HEIGHT=16 WIDTH=16 BORDER=0 ALT=\"File\">";
|
|
echo " <A TARGET=\"uploadedfile\" HREF=\"$CFG->wwwroot/$ffurl\">$file</A>";
|
|
echo "<BR>";
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
function assignment_delete_user_files($assignment, $user, $exception) {
|
|
// Deletes all the user files in the assignment area for a user
|
|
// EXCEPT for any file named $exception
|
|
|
|
if ($basedir = assignment_file_area($assignment, $user)) {
|
|
if ($files = get_directory_list($basedir)) {
|
|
foreach ($files as $file) {
|
|
if ($file != $exception) {
|
|
unlink("$basedir/$file");
|
|
notify("Existing file '$file' has been deleted!");
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
function assignment_print_upload_form($assignment) {
|
|
// Arguments are objects
|
|
|
|
echo "<DIV ALIGN=CENTER>";
|
|
echo "<FORM ENCTYPE=\"multipart/form-data\" METHOD=\"POST\" ACTION=upload.php>";
|
|
echo " <INPUT TYPE=hidden NAME=MAX_FILE_SIZE value=\"$assignment->maxfilesize\">";
|
|
echo " <INPUT TYPE=hidden NAME=id VALUE=\"$assignment->id\">";
|
|
echo " <INPUT NAME=\"newfile\" TYPE=\"file\" size=\"50\">";
|
|
echo " <INPUT TYPE=submit NAME=save VALUE=\"".get_string("uploadthisfile")."\">";
|
|
echo "</FORM>";
|
|
echo "</DIV>";
|
|
}
|
|
|
|
?>
|