'; + $output = link_to_popup_window('/mod/assignment/type/program/source.php?id=' . $this->cm->id . '&userid=' . $userid . '&file=' . $file, $file . ' source code', $file, 710, 780, $file, 'none', true, 'button' . $userid); + } + } + } + $output = '
' . $output . '
';
+ return $output;
+ }
+
+ /**
+ * Produces a list of links to the files uploaded by a user
+ *
+ * @param $userid int optional id of the user. If 0 then $USER->id is used.
+ * @param $return boolean optional defaults to false. If true the list is returned rather than printed
+ * @return string optional
+ */
+ function print_user_files($userid = 0, $return = false) {
+ global $CFG, $USER;
+ if (!$userid) {
+ if (!isloggedin()) {
+ return '';
+ }
+ $userid = $USER->id;
+ }
+ $filearea = $this->file_area_name($userid);
+ $output = '';
+ if ($basedir = $this->file_area($userid)) {
+ if ($files = get_directory_list($basedir)) {
+ require_once ($CFG->libdir . '/filelib.php');
+ foreach ($files as $key => $file) {
+ $icon = mimeinfo('icon', $file);
+ if ($CFG->slasharguments) {
+ $ffurl = "$CFG->wwwroot/file.php/$filearea/$file";
+ } else {
+ $ffurl = "$CFG->wwwroot/file.php?file=/$filearea/$file";
+ }
+ #$output .= ''; + // Syntax Highlighert source code + $output = link_to_popup_window('/mod/assignment/type/program/source.php?id=' . $this->cm->id . '&userid=' . $userid . '&file=' . $file, $file . ' source code', $file, 710, 780, $file, 'none', true, 'button' . $userid); + } + } + } + $output = '
' . $output . '
';
+ if ($return) {
+ return $output;
+ }
+ echo $output;
+ }
+
+ /**
+ * Return the programming language of this instance
+ *
+ * @return string Programming language
+ */
+ function get_language() {
+ $lang = '';
+ if ($ass = get_record('assignment', 'id', $this->cm->instance))
+ $lang = $ass->lang;
+ return $lang;
+ }
+
+ /**
+ * Display programming language for this assignment
+ */
+ function view_lang() {
+ $lang = $this->get_language();
+ if (!empty ($lang)) {
+ print_simple_box_start('center', '', '', 0, 'generalbox', 'dates');
+ $formatoptions = new stdClass;
+ $formatoptions->noclean = true;
+ echo format_text('Programing language: ' . get_string('lang' . $lang, 'assignment'), $this->assignment->format, $formatoptions);
+ print_simple_box_end();
+ }
+ }
+
+ /**
+ * Print grade progress
+ */
+ function print_loading() {
+ global $CFG;
+ print_simple_box_start('center', '30%', '', '', 'generalbox', 'intro');
+ echo '' . get_string('loading', 'assignment') . '
'; + echo '
' . $this->print_student_answer($auser->id) . userdate($auser->timemodified) . '
';
+ } else {
+ $studentmodified = '' . userdate($auser->timemarked) . '
';
+ if ($quickgrade) {
+ $grade = '' . choose_from_menu(make_grades_menu($this->assignment->grade), 'menu[' . $auser->id . ']', $auser->grade, get_string('nograde'), '', -1, true, false, $tabindex++) . '
';
+ } else {
+ $grade = '' . $this->display_grade($auser->grade) . '
';
+ }
+ } else {
+ $teachermodified = '' . choose_from_menu(make_grades_menu($this->assignment->grade), 'menu[' . $auser->id . ']', $auser->grade, get_string('nograde'), '', -1, true, false, $tabindex++) . '
';
+ } else {
+ $grade = '' . $this->display_grade($auser->grade) . '
';
+ }
+ }
+
+ ///Print Comment
+ if ($quickgrade) {
+ $comment = '';
+ } else {
+ $comment = '' . shorten_text(strip_tags($auser->submissioncomment), 15) . '
';
+ }
+ } else {
+ $studentmodified = '' . choose_from_menu(make_grades_menu($this->assignment->grade), 'menu[' . $auser->id . ']', $auser->grade, get_string('nograde'), '', -1, true, false, $tabindex++) . '
';
+ } else {
+ $grade = '-
';
+ }
+
+ if ($quickgrade) {
+ $comment = '';
+ } else {
+ $comment = '' . $compileerrors . '
';
+
+ ///Print Runtime errors
+ $runtimeerrors = ($this->get_errors_number($auser->submissionid)>0) ? 'Yes' : 'No';
+ $runtimeerrors = '' . $runtimeerrors . '
';
+
+ if (empty ($auser->status)) { /// Confirm we have exclusively 0 or 1
+ $auser->status = 0;
+ } else {
+ $auser->status = 1;
+ }
+
+ $buttontext = ($auser->status == 1) ? $strupdate : $strgrade;
+
+ ///No more buttons, we use popups ;-).
+ $button = link_to_popup_window('/mod/assignment/submissions.php?id=' . $this->cm->id . '&userid=' . $auser->id . '&mode=single' . '&offset=' . $offset++, 'grade' . $auser->id, $buttontext, 500, 780, $buttontext, 'none', true, 'button' . $auser->id);
+ $status = '' . $button . '
';
+ $row = array (
+ $picture,
+ fullname($auser
+ ), $grade, $compileerrors, $runtimeerrors, $comment, $studentmodified, $teachermodified, $status);
+ $table->add_data($row);
+ }
+ }
+
+ /// Print quickgrade form around the table
+ if ($quickgrade) {
+ echo '';
+ }
+
+ /// End of fast grading form
+ /// Mini form for setting user preference
+ echo ''; + echo ''; + + ///End of mini form + print_footer($this->course); + } + + /** + * Display a single submission, ready for grading on a popup window + * + * This default method prints the teacher info and submissioncomment box at the top and + * the student info and submission at the bottom. + * This method also fetches the necessary data in order to be able to + * provide a "Next submission" button. + * Calls preprocess_submission() to give assignment type plug-ins a chance + * to process submissions before they are graded + * This method gets its arguments from the page parameters userid and offset + */ + function display_submission($extra_javascript = '') { + global $CFG; + + $userid = required_param('userid', PARAM_INT); + $offset = required_param('offset', PARAM_INT); //offset for where to start looking for student. + + if (!$user = get_record('user', 'id', $userid)) { + error('No such user!'); + } + + if (!$submission = $this->get_submission($user->id)) { + $submission = $this->prepare_new_submission($userid); + } + + if (isset($submission->id)) { + $comp = $this->get_compile($submission->id); + } + + if ($submission->timemodified > $submission->timemarked) { + $subtype = 'assignmentnew'; + } else { + $subtype = 'assignmentold'; + } + + /// construct SQL, using current offset to find the data of the next student + $course = $this->course; + $assignment = $this->assignment; + $cm = $this->cm; + + /// Get all teachers and students + $currentgroup = get_current_group($course->id); + if ($currentgroup) { + $users = get_group_users($currentgroup); + } else { + $users = get_course_users($course->id); + } + + $select = 'SELECT u.id, u.firstname, u.lastname, u.picture, + s.id AS submissionid, s.grade, s.submissioncomment, se.compileerrors, + s.timemodified, s.timemarked '; + $sql = 'FROM ' . $CFG->prefix . 'user u ' . 'LEFT JOIN ' . $CFG->prefix . 'assignment_submissions s ON u.id = s.userid + AND s.assignment = ' . $this->assignment->id . ' ' . 'LEFT JOIN ' . $CFG->prefix . 'assignment_epaile_submissions se ON s.id = se.submission ' . 'WHERE u.id IN (' . implode(',', array_keys($users)) . ') '; + + require_once ($CFG->libdir . '/tablelib.php'); + if ($sort = flexible_table :: get_sql_sort('mod-assignment-submissions')) { + $sort = 'ORDER BY ' . $sort . ' '; + } + + $nextid = 0; + if (($auser = get_records_sql($select . $sql . $sort, $offset +1, 1)) !== false) { + $nextuser = array_shift($auser); + /// Calculate user status + $nextuser->status = ($nextuser->timemarked > 0) && ($nextuser->timemarked >= $nextuser->timemodified); + $nextid = $nextuser->id; + } + + print_header(get_string('feedback', 'assignment') . ':' . fullname($user, true) . ':' . format_string($this->assignment->name)); + + /// Print any extra javascript needed for saveandnext + echo $extra_javascript; + + ///Some javascript to help with setting up >.> + echo '' . "\n"; + echo '
| '; + print_user_picture($user->id, $this->course->id, $user->picture); + echo ' | '; + echo '';
+ echo ' ';
+ echo ' ';
+
+ $this->print_user_files($user->id);
+ if(isset($comp))
+ $this->print_user_errors($user->id,$comp->compileerrors, '');
+ echo '' . fullname($user, true) . ' ';
+
+ if ($submission->timemodified) {
+ echo '' . userdate($submission->timemodified) . $this->display_lateness($submission->timemodified) . ' ';
+ }
+ echo ' | ';
+ echo '
| '; + if ($submission->teacher) { + $teacher = get_record('user', 'id', $submission->teacher); + } else { + global $USER; + $teacher = $USER; + } + print_user_picture($teacher->id, $this->course->id, $teacher->picture); + echo ' | '; + echo ''; + $customfeedback = $this->custom_feedbackform($submission, true); + if (!empty ($customfeedback)) { + echo $customfeedback; + } + echo ' |
Compile errors:
'; + $output .= '
' . $compileerrors . '
'; + $output .= 'Runtime output:
'; + $output .= '
' . $runtimeerrors . '
' . $output . '
';
+
+ if ($return) {
+ return $clear . $output;
+ }
+
+ echo $clear . $output;
+ }
+
+ /**
+ * This function returns an
+ * array of possible memory sizes in an array, translated to the
+ * local language.
+ *
+ * @uses SORT_NUMERIC
+ * @param int $sizebytes Moodle site $CGF->assignment_maxmem
+ * @return array
+ */
+ function get_max_memory_usages($sitebytes=0) {
+ global $CFG;
+
+ // Get max size
+ $maxsize = $sitebytes;
+
+ $memusage[$maxsize] = display_size($maxsize);
+
+ $sizelist = array(10240, 51200, 102400, 512000, 1048576, 2097152,
+ 5242880, 10485760);
+
+ // Allow maxbytes to be selected if it falls outside the above boundaries
+ if( isset($CFG->maxmem) && !in_array($CFG->maxmem, $sizelist) ){
+ $sizelist[] = $CFG->maxbytes;
+ }
+
+ foreach ($sizelist as $sizebytes) {
+ if ($sizebytes < $maxsize) {
+ $memusage[$sizebytes] = display_size($sizebytes);
+ }
+ }
+
+ krsort($memusage, SORT_NUMERIC);
+
+ return $memusage;
+ }
+
+ /**
+ * This function returns an
+ * array of possible CPU time (in seconds) in an array
+ *
+ * @uses SORT_NUMERIC
+ * @param int $time Moodle site $CGF->assignment_maxcpu
+ * @return array
+ */
+ function get_max_cpu_times($time=0) {
+ global $CFG;
+
+ // Get max size
+ $maxtime = $time;
+
+ $cputime[$maxtime] = $maxtime.' secs';
+
+ $timelist = array(1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 20, 25, 30, 40, 50, 60);
+
+ // Allow maxtime to be selected if it falls outside the above boundaries
+ if( isset($CFG->maxcpu) && !in_array($CFG->maxcpu, $timelist) ){
+ $cputime[] = $CFG->maxbytes;
+ }
+
+ foreach ($timelist as $timesecs) {
+ if ($timesecs < $maxtime) {
+ $cputime[$timesecs] = $timesecs.' secs';
+ }
+ }
+
+ krsort($cputime, SORT_NUMERIC);
+
+ return $cputime;
+ }
+}
+
+/**
+ * OTHER GENERAL FUNCTIONS FOR PROGRAM ASSIGNMENTS
+ */
+
+/**
+ * Returns an array of installed programming languages indexed and sorted by name
+ *
+ * @return array The index is the name of the assignment type, the value its full name from the language strings
+ */
+function assignment_program_languages() {
+ global $CFG;
+ $lang = array ();
+ $dir = $CFG->dirroot . '/mod/assignment/type/program/languages/';
+ $files = get_directory_list($dir);
+ $names = preg_replace('/\.(\w+)/', '', $files); // Replace file extension with nothing
+ foreach ($names as $name) {
+ $lang[$name] = get_string('lang' . $name, 'assignment');
+ }
+ asort($lang);
+ return $lang;
+}
+
+/**
+ * This function returns an
+ * array of possible CPU time (in seconds) in an array
+ *
+ * This is done by calling the get_max_cpu_times() method of the assignment type class
+ */
+function assignment_program_get_max_cpu_times($time=0) {
+ $ass = new assignment_program();
+
+ return $ass->get_max_cpu_times($time);
+}
+
+/**
+ * This function returns an
+ * array of possible memory sizes in an array, translated to the
+ * local language.
+ *
+ * This is done by calling the get_max_memory_usages() method of the assignment type class
+ */
+function assignment_program_get_max_memory_usages($sitebytes=0) {
+ $ass = new assignment_program();
+
+ return $ass->get_max_memory_usages($sitebytes);
+}
+?>
diff --git a/mod/assignment/type/program/db/mysql.sql b/mod/assignment/type/program/db/mysql.sql
new file mode 100644
index 00000000000..f24ae7cae71
--- /dev/null
+++ b/mod/assignment/type/program/db/mysql.sql
@@ -0,0 +1,56 @@
+--
+-- Table structure for table `mdl_assignment_epaile_results`
+--
+
+CREATE TABLE `prefix_assignment_epaile_results` (
+ `id` bigint(10) NOT NULL auto_increment,
+ `submission` bigint(10) NOT NULL,
+ `test` bigint(10) NOT NULL,
+ `runtime` bigint(10) NOT NULL,
+ `status` varchar(50) collate utf8_unicode_ci NOT NULL COMMENT 'Possible values: Accepted, Wrong answer, Internal error',
+ `output` varchar(255) collate utf8_unicode_ci default NULL COMMENT 'Program output',
+ `error` text collate utf8_unicode_ci COMMENT 'Runtime error',
+ PRIMARY KEY (`id`)
+) ENGINE=MyISAM DEFAULT CHARSET=utf8 COLLATE=utf8_unicode_ci COMMENT='Test results' AUTO_INCREMENT=1 ;
+
+-- --------------------------------------------------------
+
+--
+-- Table structure for table `mdl_assignment_epaile_submissions`
+--
+
+CREATE TABLE `prefix_assignment_epaile_submissions` (
+ `id` bigint(10) unsigned NOT NULL auto_increment,
+ `submission` bigint(10) unsigned NOT NULL default '0',
+ `compileerrors` text collate utf8_unicode_ci,
+ `compiletime` bigint(10) NOT NULL default '0',
+ PRIMARY KEY (`id`),
+ KEY `prefix_epaisubm_epa_ix` (`submission`)
+) ENGINE=MyISAM DEFAULT CHARSET=utf8 COLLATE=utf8_unicode_ci COMMENT='Info about submitted assignments' AUTO_INCREMENT=1 ;
+
+-- --------------------------------------------------------
+
+--
+-- Table structure for table `mdl_assignment_epaile_tests`
+--
+
+CREATE TABLE `prefix_assignment_epaile_tests ` (
+ `id` bigint(10) unsigned NOT NULL auto_increment,
+ `assignment` bigint(10) unsigned NOT NULL default '0',
+ `input` varchar(255) collate utf8_unicode_ci NOT NULL COMMENT 'Program input',
+ `output` varchar(255) collate utf8_unicode_ci NOT NULL COMMENT 'Expected output',
+ PRIMARY KEY (`id`),
+ KEY `prefix_epaitest_epa_ix` (`assignment`)
+) ENGINE=MyISAM DEFAULT CHARSET=utf8 COLLATE=utf8_unicode_ci COMMENT='Info about assignment tests' AUTO_INCREMENT=1 ;
+
+-- --------------------------------------------------------
+
+--
+-- Add new field to `assignment` table
+--
+ALTER TABLE `prefix_assignment` ADD `lang` VARCHAR( 50 ) CHARACTER SET utf8 COLLATE utf8_unicode_ci NULL AFTER `var5` ;
+
+--
+-- Some values for `config` table
+--
+ INSERT INTO `prefix_config` (`name`,`value`) VALUES ('assignment_maxmem', '512000'),('assignment_maxcpu', '15');
\ No newline at end of file
diff --git a/mod/assignment/type/program/js/tests.js b/mod/assignment/type/program/js/tests.js
new file mode 100644
index 00000000000..5ffe5ffbd7b
--- /dev/null
+++ b/mod/assignment/type/program/js/tests.js
@@ -0,0 +1,105 @@
+
\ No newline at end of file
diff --git a/mod/assignment/type/program/languages/bash.sh b/mod/assignment/type/program/languages/bash.sh
new file mode 100644
index 00000000000..e7b6a13e953
--- /dev/null
+++ b/mod/assignment/type/program/languages/bash.sh
@@ -0,0 +1,44 @@
+#!/bin/sh
+
+# Bash compile wrapper-script for 'test_solution.sh'.
+# See that script for syntax and more info.
+#
+# This script does not actually "compile" the source, but writes a
+# shell script that will function as the executable: when called, it
+# will execute the source with the correct interpreter syntax, thus
+# allowing this interpreted source to be used transparantly as if it
+# was compiled to a standalone binary.
+#
+# NOTICE: this compiler script cannot be used with the USE_CHROOT
+# configuration option turned on! (Unless proper preconfiguration of
+# the chroot environment has been taken care of.)
+
+SOURCE="$1"
+DEST="$2"
+
+RUNOPTIONS="--noprofile --norc -r -p"
+
+# Check for '#!' interpreter line: don't allow it to prevent teams
+# from passing options to the interpreter.
+if grep '^#!' $SOURCE &>/dev/null ; then
+ echo "Error: interpreter statement(s) found:"
+ grep -n '^#!' $SOURCE
+ exit 1
+fi
+
+# Check bash syntax:
+bash $RUNOPTIONS -n $SOURCE
+EXITCODE=$?
+[ "$EXITCODE" -ne 0 ] && exit $EXITCODE
+
+# Write executing script:
+cat > $DEST <
+
+  Test
+ |
+ |
| + : + | ++ : + | +
| Test |
+ |
| : | +: | +
 |
+
+ +
+ + + + + + + \ No newline at end of file diff --git a/mod/assignment/type/program/source.php b/mod/assignment/type/program/source.php new file mode 100644 index 00000000000..47995905cf8 --- /dev/null +++ b/mod/assignment/type/program/source.php @@ -0,0 +1,95 @@ +instance)) { + error(get_string('error_invalidepaileid','assignment')); + } + + if (!$course = get_record('course', 'id', $assignment->course)) { + error(get_string('error_misconfiguredcourse','assignment')); + } + } else { + if (!$assignment = get_record('assignment', 'id', $e)) { + error(get_string('error_incorrectmodule','assignment')); + } + if (!$course = get_record('course', 'id', $assignment->course)) { + error(get_string('error_misconfiguredcourse','assignment')); + } + if (!$cm = get_coursemodule_from_instance('assignment', $assignment->id, $course->id)) { + error(get_string('error_invalidcoursemodule','assignment')); + } + } + + if(!$userid) + error(get_string('nouser','assignment')); + + if(!$file) + error(get_string('nosuchfile','assignment')); + + require_login($course->id, false, $cm); + + // Load up the required assignment code + require('assignment.class.php'); + $assignmentinstance = new assignment_program($cm->id, $assignment, $cm, $course); + + $filearea = $assignmentinstance->file_area_name($userid); + + if ($basedir = $assignmentinstance->file_area($userid)) { + require_once($CFG->libdir.'/filelib.php'); + + if ($CFG->slasharguments) { + $ffurl = "$CFG->dataroot/$filearea/$file"; + } else { + $ffurl = "$CFG->dataroot/$filearea/$file"; + } + } + + if($gestor = fopen($ffurl,'r')) { + $code = fread($gestor, filesize($ffurl)); + fclose($gestor); + } else { + error(get_string('filereaderror','assignment')); + } + + $lang = $assignmentinstance->get_language(); + + include('source.html'); +?> \ No newline at end of file diff --git a/mod/assignment/type/program/syntaxhighlighter/Scripts/clipboard.swf b/mod/assignment/type/program/syntaxhighlighter/Scripts/clipboard.swf new file mode 100644 index 00000000000..2cfe37185b2 Binary files /dev/null and b/mod/assignment/type/program/syntaxhighlighter/Scripts/clipboard.swf differ diff --git a/mod/assignment/type/program/syntaxhighlighter/Scripts/shBrushCSharp.js b/mod/assignment/type/program/syntaxhighlighter/Scripts/shBrushCSharp.js new file mode 100644 index 00000000000..b8beffb5618 --- /dev/null +++ b/mod/assignment/type/program/syntaxhighlighter/Scripts/shBrushCSharp.js @@ -0,0 +1,32 @@ +dp.sh.Brushes.CSharp = function() +{ + var keywords = 'abstract as base bool break byte case catch char checked class const ' + + 'continue decimal default delegate do double else enum event explicit ' + + 'extern false finally fixed float for foreach get goto if implicit in int ' + + 'interface internal is lock long namespace new null object operator out ' + + 'override params private protected public readonly ref return sbyte sealed set ' + + 'short sizeof stackalloc static string struct switch this throw true try ' + + 'typeof uint ulong unchecked unsafe ushort using virtual void while'; + + this.regexList = [ + // There's a slight problem with matching single line comments and figuring out + // a difference between // and ///. Using lookahead and lookbehind solves the + // problem, unfortunately JavaScript doesn't support lookbehind. So I'm at a + // loss how to translate that regular expression to JavaScript compatible one. +// { regex: new RegExp('(?) + | () + | (<)*(\w+)*\s*(\w+)\s*=\s*(".*?"|'.*?'|\w+)(/*>)* + | () + */ + var index = 0; + var match = null; + var regex = null; + + // Match CDATA in the following format + // (\<|<)\!\[[\w\s]*?\[(.|\s)*?\]\](\>|>) + this.GetMatches(new RegExp('(\<|<)\\!\\[[\\w\\s]*?\\[(.|\\s)*?\\]\\](\>|>)', 'gm'), 'cdata'); + + // Match comments + // (\<|<)!--\s*.*\s*?--(\>|>) + this.GetMatches(new RegExp('(\<|<)!--\\s*.*\\s*?--(\>|>)', 'gm'), 'comments'); + + // Match attributes and their values + // (:|\w+)\s*=\s*(".*?"|\'.*?\'|\w+)* + regex = new RegExp('([:\\w-\.]+)\\s*=\\s*(".*?"|\'.*?\'|\\w+)*|(\\w+)', 'gm'); // Thanks to Tomi Blinnikka of Yahoo! for fixing namespaces in attributes + while((match = regex.exec(this.code)) != null) + { + if(match[1] == null) + { + continue; + } + + push(this.matches, new dp.sh.Match(match[1], match.index, 'attribute')); + + // if xml is invalid and attribute has no property value, ignore it + if(match[2] != undefined) + { + push(this.matches, new dp.sh.Match(match[2], match.index + match[0].indexOf(match[2]), 'attribute-value')); + } + } + + // Match opening and closing tag brackets + // (\<|<)/*\?*(?!\!)|/*\?*(\>|>) + this.GetMatches(new RegExp('(\<|<)/*\\?*(?!\\!)|/*\\?*(\>|>)', 'gm'), 'tag'); + + // Match tag names + // (\<|<)/*\?*\s*(\w+) + regex = new RegExp('(?:\<|<)/*\\?*\\s*([:\\w-\.]+)', 'gm'); + while((match = regex.exec(this.code)) != null) + { + push(this.matches, new dp.sh.Match(match[1], match.index + match[0].indexOf(match[1]), 'tag-name')); + } +} diff --git a/mod/assignment/type/program/syntaxhighlighter/Scripts/shCore.js b/mod/assignment/type/program/syntaxhighlighter/Scripts/shCore.js new file mode 100644 index 00000000000..e3ee84be2d8 --- /dev/null +++ b/mod/assignment/type/program/syntaxhighlighter/Scripts/shCore.js @@ -0,0 +1,414 @@ +var dp={sh:{Toolbar:{},Utils:{},RegexLib:{},Brushes:{},Strings:{AboutDialog:"dp.SyntaxHighlighter Version: {V}©2004-2007 Alex Gorbatchev. |
"+_d.div.innerHTML+"
");
+_f.close();
+_e.contentWindow.focus();
+_e.contentWindow.print();
+alert("Printing...");
+document.body.removeChild(_e);
+}},About:{label:"?",func:function(_10){
+var wnd=window.open("","_blank","dialog,width=300,height=150,scrollbars=0");
+var doc=wnd.document;
+dp.sh.Utils.CopyStyles(doc,window.document);
+doc.write(dp.sh.Strings.AboutDialog.replace("{V}",dp.sh.Version));
+doc.close();
+wnd.focus();
+}}};
+dp.sh.Toolbar.Create=function(_13){
+var div=document.createElement("DIV");
+div.className="tools";
+for(var _15 in dp.sh.Toolbar.Commands){
+var cmd=dp.sh.Toolbar.Commands[_15];
+if(cmd.check!=null&&!cmd.check(_13)){
+continue;
+}
+div.innerHTML+=""+cmd.label+"";
+}
+return div;
+};
+dp.sh.Toolbar.Command=function(_17,_18){
+var n=_18;
+while(n!=null&&n.className.indexOf("dp-highlighter")==-1){
+n=n.parentNode;
+}
+if(n!=null){
+dp.sh.Toolbar.Commands[_17].func(_18,n.highlighter);
+}
+};
+dp.sh.Utils.CopyStyles=function(_1a,_1b){
+var _1c=_1b.getElementsByTagName("link");
+for(var i=0;i<_1c.length;i++){
+if(_1c[i].rel.toLowerCase()=="stylesheet"){
+_1a.write("");
+}
+}
+};
+dp.sh.RegexLib={MultiLineCComments:new RegExp("/\\*[\\s\\S]*?\\*/","gm"),SingleLineCComments:new RegExp("//.*$","gm"),SingleLinePerlComments:new RegExp("#.*$","gm"),DoubleQuotedString:new RegExp("\"(?:\\.|(\\\\\\\")|[^\\\"\"])*\"","g"),SingleQuotedString:new RegExp("'(?:\\.|(\\\\\\')|[^\\''])*'","g")};
+dp.sh.Match=function(_1e,_1f,css){
+this.value=_1e;
+this.index=_1f;
+this.length=_1e.length;
+this.css=css;
+};
+dp.sh.Highlighter=function(){
+this.noGutter=false;
+this.addControls=true;
+this.collapse=false;
+this.tabsToSpaces=true;
+this.wrapColumn=80;
+this.showColumns=true;
+};
+dp.sh.Highlighter.SortCallback=function(m1,m2){
+if(m1.index"); +for(var i=0;i<_2c.length;i++){ +_2b=this.CreateElement("SPAN"); +_2b.className=css; +_2b.innerHTML=_2c[i]; +this.div.appendChild(_2b); +if(i+1<_2c.length){ +this.div.appendChild(this.CreateElement("BR")); +} +} +}else{ +_2b.className=css; +_2b.innerHTML=str; +this.div.appendChild(_2b); +} +}else{ +_2b.innerHTML=str; +this.div.appendChild(_2b); +} +}; +dp.sh.Highlighter.prototype.IsInside=function(_2e){ +if(_2e==null||_2e.length==0){ +return false; +} +for(var i=0;i
dp.SyntaxHighlighter Version: {V}©2004-2007 Alex Gorbatchev. |
' + highlighter.div.innerHTML + '
');
+ doc.close();
+
+ iframe.contentWindow.focus();
+ iframe.contentWindow.print();
+
+ alert('Printing...');
+
+ document.body.removeChild(iframe);
+ }
+ },
+
+ About: {
+ label: '?',
+ func: function(highlighter)
+ {
+ var wnd = window.open('', '_blank', 'dialog,width=300,height=150,scrollbars=0');
+ var doc = wnd.document;
+
+ dp.sh.Utils.CopyStyles(doc, window.document);
+
+ doc.write(dp.sh.Strings.AboutDialog.replace('{V}', dp.sh.Version));
+ doc.close();
+ wnd.focus();
+ }
+ }
+};
+
+// creates a with all toolbar links
+dp.sh.Toolbar.Create = function(highlighter)
+{
+ var div = document.createElement('DIV');
+
+ div.className = 'tools';
+
+ for(var name in dp.sh.Toolbar.Commands)
+ {
+ var cmd = dp.sh.Toolbar.Commands[name];
+
+ if(cmd.check != null && !cmd.check(highlighter))
+ continue;
+
+ div.innerHTML += '' + cmd.label + '';
+ }
+
+ return div;
+}
+
+// executes toolbar command by name
+dp.sh.Toolbar.Command = function(name, sender)
+{
+ var n = sender;
+
+ while(n != null && n.className.indexOf('dp-highlighter') == -1)
+ n = n.parentNode;
+
+ if(n != null)
+ dp.sh.Toolbar.Commands[name].func(sender, n.highlighter);
+}
+
+// copies all from 'target' window to 'dest'
+dp.sh.Utils.CopyStyles = function(destDoc, sourceDoc)
+{
+ var links = sourceDoc.getElementsByTagName('link');
+
+ for(var i = 0; i < links.length; i++)
+ if(links[i].rel.toLowerCase() == 'stylesheet')
+ destDoc.write('');
+}
+
+//
+// Common reusable regular expressions
+//
+dp.sh.RegexLib = {
+ MultiLineCComments : new RegExp('/\\*[\\s\\S]*?\\*/', 'gm'),
+ SingleLineCComments : new RegExp('//.*$', 'gm'),
+ SingleLinePerlComments : new RegExp('#.*$', 'gm'),
+ DoubleQuotedString : new RegExp('"(?:\\.|(\\\\\\")|[^\\""])*"','g'),
+ SingleQuotedString : new RegExp("'(?:\\.|(\\\\\\')|[^\\''])*'", 'g')
+};
+
+//
+// Match object
+//
+dp.sh.Match = function(value, index, css)
+{
+ this.value = value;
+ this.index = index;
+ this.length = value.length;
+ this.css = css;
+}
+
+//
+// Highlighter object
+//
+dp.sh.Highlighter = function()
+{
+ this.noGutter = false;
+ this.addControls = true;
+ this.collapse = false;
+ this.tabsToSpaces = true;
+ this.wrapColumn = 80;
+ this.showColumns = true;
+}
+
+// static callback for the match sorting
+dp.sh.Highlighter.SortCallback = function(m1, m2)
+{
+ // sort matches by index first
+ if(m1.index < m2.index)
+ return -1;
+ else if(m1.index > m2.index)
+ return 1;
+ else
+ {
+ // if index is the same, sort by length
+ if(m1.length < m2.length)
+ return -1;
+ else if(m1.length > m2.length)
+ return 1;
+ }
+ return 0;
+}
+
+dp.sh.Highlighter.prototype.CreateElement = function(name)
+{
+ var result = document.createElement(name);
+ result.highlighter = this;
+ return result;
+}
+
+// gets a list of all matches for a given regular expression
+dp.sh.Highlighter.prototype.GetMatches = function(regex, css)
+{
+ var index = 0;
+ var match = null;
+
+ while((match = regex.exec(this.code)) != null)
+ this.matches[this.matches.length] = new dp.sh.Match(match[0], match.index, css);
+}
+
+dp.sh.Highlighter.prototype.AddBit = function(str, css)
+{
+ if(str == null || str.length == 0)
+ return;
+
+ var span = this.CreateElement('SPAN');
+
+// str = str.replace(/&/g, '&');
+ str = str.replace(/ /g, ' ');
+ str = str.replace(//g, '>');
+ str = str.replace(/\n/gm, ' '); + + // when adding a piece of code, check to see if it has line breaks in it + // and if it does, wrap individual line breaks with span tags + if(css != null) + { + if((/br/gi).test(str)) + { + var lines = str.split('
'); + + for(var i = 0; i < lines.length; i++) + { + span = this.CreateElement('SPAN'); + span.className = css; + span.innerHTML = lines[i]; + + this.div.appendChild(span); + + // don't add a
for the last line + if(i + 1 < lines.length) + this.div.appendChild(this.CreateElement('BR')); + } + } + else + { + span.className = css; + span.innerHTML = str; + this.div.appendChild(span); + } + } + else + { + span.innerHTML = str; + this.div.appendChild(span); + } +} + +// checks if one match is inside any other match +dp.sh.Highlighter.prototype.IsInside = function(match) +{ + if(match == null || match.length == 0) + return false; + + for(var i = 0; i < this.matches.length; i++) + { + var c = this.matches[i]; + + if(c == null) + continue; + + if((match.index > c.index) && (match.index < c.index + c.length)) + return true; + } + + return false; +} + +dp.sh.Highlighter.prototype.ProcessRegexList = function() +{ + for(var i = 0; i < this.regexList.length; i++) + this.GetMatches(this.regexList[i].regex, this.regexList[i].css); +} + +dp.sh.Highlighter.prototype.ProcessSmartTabs = function(code) +{ + var lines = code.split('\n'); + var result = ''; + var tabSize = 4; + var tab = '\t'; + + // This function inserts specified amount of spaces in the string + // where a tab is while removing that given tab. + function InsertSpaces(line, pos, count) + { + var left = line.substr(0, pos); + var right = line.substr(pos + 1, line.length); // pos + 1 will get rid of the tab + var spaces = ''; + + for(var i = 0; i < count; i++) + spaces += ' '; + + return left + spaces + right; + } + + // This function process one line for 'smart tabs' + function ProcessLine(line, tabSize) + { + if(line.indexOf(tab) == -1) + return line; + + var pos = 0; + + while((pos = line.indexOf(tab)) != -1) + { + // This is pretty much all there is to the 'smart tabs' logic. + // Based on the position within the line and size of a tab, + // calculate the amount of spaces we need to insert. + var spaces = tabSize - pos % tabSize; + + line = InsertSpaces(line, pos, spaces); + } + + return line; + } + + // Go through all the lines and do the 'smart tabs' magic. + for(var i = 0; i < lines.length; i++) + result += ProcessLine(lines[i], tabSize) + '\n'; + + return result; +} + +dp.sh.Highlighter.prototype.SwitchToList = function() +{ + // thanks to Lachlan Donald from SitePoint.com for this
tag fix. + var html = this.div.innerHTML.replace(/<(br)\/?>/gi, '\n'); + var lines = html.split('\n'); + + if(this.addControls == true) + this.bar.appendChild(dp.sh.Toolbar.Create(this)); + + // add columns ruler + if(this.showColumns) + { + var div = this.CreateElement('div'); + var columns = this.CreateElement('div'); + var showEvery = 10; + var i = 1; + + while(i <= 150) + { + if(i % showEvery == 0) + { + div.innerHTML += i; + i += (i + '').length; + } + else + { + div.innerHTML += '·'; + i++; + } + } + + columns.className = 'columns'; + columns.appendChild(div); + this.bar.appendChild(columns); + } + + for(var i = 0, lineIndex = this.firstLine; i < lines.length - 1; i++, lineIndex++) + { + var li = this.CreateElement('LI'); + var span = this.CreateElement('SPAN'); + + // uses .line1 and .line2 css styles for alternating lines + li.className = (i % 2 == 0) ? 'alt' : ''; + span.innerHTML = lines[i] + ' '; + + li.appendChild(span); + this.ol.appendChild(li); + } + + this.div.innerHTML = ''; +} + +dp.sh.Highlighter.prototype.Highlight = function(code) +{ + function Trim(str) + { + return str.replace(/^\s*(.*?)[\s\n]*$/g, '$1'); + } + + function Chop(str) + { + return str.replace(/\n*$/, '').replace(/^\n*/, ''); + } + + function Unindent(str) + { + var lines = str.split('\n'); + var indents = new Array(); + var regex = new RegExp('^\\s*', 'g'); + var min = 1000; + + // go through every line and check for common number of indents + for(var i = 0; i < lines.length && min > 0; i++) + { + if(Trim(lines[i]).length == 0) + continue; + + var matches = regex.exec(lines[i]); + + if(matches != null && matches.length > 0) + min = Math.min(matches[0].length, min); + } + + // trim minimum common number of white space from the begining of every line + if(min > 0) + for(var i = 0; i < lines.length; i++) + lines[i] = lines[i].substr(min); + + return lines.join('\n'); + } + + // This function returns a portions of the string from pos1 to pos2 inclusive + function Copy(string, pos1, pos2) + { + return string.substr(pos1, pos2 - pos1); + } + + var pos = 0; + + if(code == null) + code = ''; + + this.originalCode = code; + this.code = Chop(Unindent(code)); + this.div = this.CreateElement('DIV'); + this.bar = this.CreateElement('DIV'); + this.ol = this.CreateElement('OL'); + this.matches = new Array(); + + this.div.className = 'dp-highlighter'; + this.div.highlighter = this; + + this.bar.className = 'bar'; + + // set the first line + this.ol.start = this.firstLine; + + if(this.CssClass != null) + this.ol.className = this.CssClass; + + if(this.collapse) + this.div.className += ' collapsed'; + + if(this.noGutter) + this.div.className += ' nogutter'; + + // replace tabs with spaces + if(this.tabsToSpaces == true) + this.code = this.ProcessSmartTabs(this.code); + + this.ProcessRegexList(); + + // if no matches found, add entire code as plain text + if(this.matches.length == 0) + { + this.AddBit(this.code, null); + this.SwitchToList(); + this.div.appendChild(this.ol); + return; + } + + // sort the matches + this.matches = this.matches.sort(dp.sh.Highlighter.SortCallback); + + // The following loop checks to see if any of the matches are inside + // of other matches. This process would get rid of highligted strings + // inside comments, keywords inside strings and so on. + for(var i = 0; i < this.matches.length; i++) + if(this.IsInside(this.matches[i])) + this.matches[i] = null; + + // Finally, go through the final list of matches and pull the all + // together adding everything in between that isn't a match. + for(var i = 0; i < this.matches.length; i++) + { + var match = this.matches[i]; + + if(match == null || match.length == 0) + continue; + + this.AddBit(Copy(this.code, pos, match.index), null); + this.AddBit(match.value, match.css); + + pos = match.index + match.length; + } + + this.AddBit(this.code.substr(pos), null); + + this.SwitchToList(); + this.div.appendChild(this.bar); + this.div.appendChild(this.ol); +} + +dp.sh.Highlighter.prototype.GetKeywords = function(str) +{ + return '\\b' + str.replace(/ /g, '\\b|\\b') + '\\b'; +} + +// highlightes all elements identified by name and gets source code from specified property +dp.sh.HighlightAll = function(name, showGutter /* optional */, showControls /* optional */, collapseAll /* optional */, firstLine /* optional */, showColumns /* optional */) +{ + function FindValue() + { + var a = arguments; + + for(var i = 0; i < a.length; i++) + { + if(a[i] == null) + continue; + + if(typeof(a[i]) == 'string' && a[i] != '') + return a[i] + ''; + + if(typeof(a[i]) == 'object' && a[i].value != '') + return a[i].value + ''; + } + + return null; + } + + function IsOptionSet(value, list) + { + for(var i = 0; i < list.length; i++) + if(list[i] == value) + return true; + + return false; + } + + function GetOptionValue(name, list, defaultValue) + { + var regex = new RegExp('^' + name + '\\[(\\w+)\\]$', 'gi'); + var matches = null; + + for(var i = 0; i < list.length; i++) + if((matches = regex.exec(list[i])) != null) + return matches[1]; + + return defaultValue; + } + + function FindTagsByName(list, name, tagName) + { + var tags = document.getElementsByTagName(tagName); + + for(var i = 0; i < tags.length; i++) + if(tags[i].getAttribute('name') == name) + list.push(tags[i]); + } + + var elements = []; + var highlighter = null; + var registered = {}; + var propertyName = 'innerHTML'; + + // for some reason IE doesn't find by name, however it does see them just fine by tag name... + FindTagsByName(elements, name, 'pre'); + FindTagsByName(elements, name, 'textarea'); + + if(elements.length == 0) + return; + + // register all brushes + for(var brush in dp.sh.Brushes) + { + var aliases = dp.sh.Brushes[brush].Aliases; + + if(aliases == null) + continue; + + for(var i = 0; i < aliases.length; i++) + registered[aliases[i]] = brush; + } + + for(var i = 0; i < elements.length; i++) + { + var element = elements[i]; + var options = FindValue( + element.attributes['class'], element.className, + element.attributes['language'], element.language + ); + var language = ''; + + if(options == null) + continue; + + options = options.split(':'); + + language = options[0].toLowerCase(); + + if(registered[language] == null) + continue; + + // instantiate a brush + highlighter = new dp.sh.Brushes[registered[language]](); + + // hide the original element + element.style.display = 'none'; + + highlighter.noGutter = (showGutter == null) ? IsOptionSet('nogutter', options) : !showGutter; + highlighter.addControls = (showControls == null) ? !IsOptionSet('nocontrols', options) : showControls; + highlighter.collapse = (collapseAll == null) ? IsOptionSet('collapse', options) : collapseAll; + highlighter.showColumns = (showColumns == null) ? IsOptionSet('showcolumns', options) : showColumns; + + // write out custom brush style + if(highlighter.Style) + document.write(''); + + // first line idea comes from Andrew Collington, thanks! + highlighter.firstLine = (firstLine == null) ? parseInt(GetOptionValue('firstline', options, 1)) : firstLine; + + highlighter.Highlight(element[propertyName]); + + highlighter.source = element; + + element.parentNode.insertBefore(highlighter.div, element); + } +} diff --git a/mod/assignment/type/program/syntaxhighlighter/Styles/SyntaxHighlighter.css b/mod/assignment/type/program/syntaxhighlighter/Styles/SyntaxHighlighter.css new file mode 100644 index 00000000000..709058d0eb6 --- /dev/null +++ b/mod/assignment/type/program/syntaxhighlighter/Styles/SyntaxHighlighter.css @@ -0,0 +1,158 @@ +.dp-highlighter +{ + font-family: "Consolas", "Courier New", Courier, mono; + font-size: 12px; + background-color: #E7E5DC; + width: 99%; + overflow: auto; + margin: 18px 0px 18px 0px; + padding-top: 1px; /* adds a little border on top when controls are hidden */ +} + +.dp-highlighter .bar +{ + padding-left: 45px; +} + +.dp-highlighter.collapsed .bar, +.dp-highlighter.nogutter .bar +{ + padding-left: 0px; +} + +.dp-highlighter ol +{ + list-style: decimal; /* for ie */ + list-style: decimal-leading-zero; /* better look for others */ + background-color: #fff; + margin: 0px 0px 1px 45px; /* 1px bottom margin seems to fix occasional Firefox scrolling */ + padding: 0px; + color: #5C5C5C; +} + +.dp-highlighter.nogutter ol +{ + list-style-type: none !important; + margin-left: 0px; +} + +.dp-highlighter ol li, +.dp-highlighter .columns div +{ + border-left: 3px solid #6CE26C; + background-color: #f8f8f8; + padding-left: 10px; + line-height: 14px; +} + +.dp-highlighter.nogutter ol li, +.dp-highlighter.nogutter .columns div +{ + border: 0; +} + +.dp-highlighter .columns +{ + color: gray; + overflow: hidden; + width: 100%; +} + +.dp-highlighter .columns div +{ + padding-bottom: 5px; +} + +.dp-highlighter ol li.alt +{ + background-color: #fff; +} + +.dp-highlighter ol li span +{ + color: Black; +} + +/* Adjust some properties when collapsed */ + +.dp-highlighter.collapsed ol +{ + margin: 0px; +} + +.dp-highlighter.collapsed ol li +{ + display: none; +} + +/* Additional modifications when in print-view */ + +.dp-highlighter.printing +{ + border: none; +} + +.dp-highlighter.printing .tools +{ + display: none !important; +} + +.dp-highlighter.printing li +{ + display: list-item !important; +} + +/* Styles for the tools */ + +.dp-highlighter .tools +{ + padding: 3px 8px 3px 10px; + font: 9px Verdana, Geneva, Arial, Helvetica, sans-serif; + color: silver; + background-color: #f8f8f8; + text-align1: right; + padding-bottom: 10px; + border-left: 3px solid #6CE26C; +} + +.dp-highlighter.nogutter .tools +{ + border-left: 0; +} + +.dp-highlighter.collapsed .tools +{ + border-bottom: 0; +} + +.dp-highlighter .tools a +{ + font-size: 9px; + color: #a0a0a0; + text-decoration: none; + margin-right: 10px; +} + +.dp-highlighter .tools a:hover +{ + color: red; + text-decoration: underline; +} + +/* About dialog styles */ + +.dp-about { background-color: #fff; margin: 0px; padding: 0px; } +.dp-about table { width: 100%; height: 100%; font-size: 11px; font-family: Tahoma, Verdana, Arial, sans-serif !important; } +.dp-about td { padding: 10px; vertical-align: top; } +.dp-about .copy { border-bottom: 1px solid #ACA899; height: 95%; } +.dp-about .title { color: red; font-weight: bold; } +.dp-about .para { margin: 0 0 4px 0; } +.dp-about .footer { background-color: #ECEADB; border-top: 1px solid #fff; text-align: right; } +.dp-about .close { font-size: 11px; font-family: Tahoma, Verdana, Arial, sans-serif !important; background-color: #ECEADB; width: 60px; height: 22px; } + +/* Language specific styles */ + +.dp-highlighter .comment, .dp-highlighter .comments { color: #008200; } +.dp-highlighter .string { color: blue; } +.dp-highlighter .keyword { color: #069; font-weight: bold; } +.dp-highlighter .preprocessor { color: gray; } diff --git a/mod/assignment/type/program/syntaxhighlighter/Styles/TestPages.css b/mod/assignment/type/program/syntaxhighlighter/Styles/TestPages.css new file mode 100644 index 00000000000..ec8f8512537 --- /dev/null +++ b/mod/assignment/type/program/syntaxhighlighter/Styles/TestPages.css @@ -0,0 +1,63 @@ +@import url(undohtml.css); + +body +{ + background-color: #fff; + font-family: Verdana, Arial, Helvetica, sans-serif; + font-size: 12px; + padding: 20px; +} + +h1, h2, h3 { font-weight: normal; margin: 0px 0px 10px 0px; } +h1 { font-size: 200%; border-bottom: 5px solid #f0f0f0; padding-bottom: 5px; font-family: "Trebuchet MS", Trebuchet, Verdana, sans-serif; } +h2 { font-size: 150%; margin-left: 20%; } +h3 { font-size: 120%; } + +li a +{ + color: blue; + text-decoration: none; +} + +li a:hover +{ + background-color: #FFFF00 !important; +} + +li a:visited +{ + background-color: #ececec; +} + +.layout +{ + position: relative; +} + +.column1 +{ + width: 15%; + border-right: 15px solid silver; + background-color: #f0f0f0; + padding-top: 10px; + padding-bottom: 10px; +} + +.column1 h3 +{ + margin-left: 10px; +} + +.column2 +{ + position: absolute; + left: 20%; + top: 0px; + width: 75%; +} + +.footer +{ + margin-top: 20px; + width: 15%; +} \ No newline at end of file diff --git a/mod/assignment/type/program/syntaxhighlighter/Templates/Test.dwt b/mod/assignment/type/program/syntaxhighlighter/Templates/Test.dwt new file mode 100644 index 00000000000..a041ff9f285 --- /dev/null +++ b/mod/assignment/type/program/syntaxhighlighter/Templates/Test.dwt @@ -0,0 +1,80 @@ + + + + +
dp.SyntaxHighlighter 1.4.1 Tests and Samples (dreamprojections.com/syntaxhighlighter)
+ +Title
+ +
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+Languages:
+-
+
- C# +
- CSS +
- C++ +
- Delphi +
- Java +
- JavaScript +
- PHP +
- Python +
- Ruby +
- SQL +
- Visual Basic +
- XML / HTML +
Features:
+-
+
- Smart tabs +
- First line +
- Expand code +
- Show columns +
- No gutter +
- No controls +
+Text body before.
+
+ +
+Text body after. +
++ +
++ +
+Text body after. +