feat: implement summarise_response

Author: janbritz

lang/en/qtype_questionpy.php

@@ -78,6 +78,9 @@
 $string['request_error'] = 'The {$a->requestmethod} request to "{$a->uri}" failed with the error code "{$a->errorcode}" and'
     . ' status code {$a->statuscode} ({$a->reasonphrase}).';
 $string['response'] = 'Response';
+$string['response_summary_dynamic_data'] = 'Dynamic Data';
+$string['response_summary_files'] = 'Files';
+$string['response_summary_form_data'] = 'Form Data';
 $string['same_version_different_hash_error'] = 'A package with the same version but different hash already exists.';
 $string['scoring_state'] = 'QuestionPy Scoring State';
 $string['search_all_header'] = 'All ({$a})';

question.php

@@ -335,9 +335,44 @@ public function is_same_response(array $prevresponse, array $newresponse): bool
      *
      * @param array $response a response, as might be passed to {@see grade_response()}.
      * @return string a plain text summary of that response, that could be used in reports.
+     * @throws moodle_exception
      */
     public function summarise_response(array $response) {
-        return '';
+        $summary = '';
+
+        $qpyresponse = utils::get_qpy_response($response);
+
+        if ($qpyresponse) {
+            $qpyresponse = get_object_vars($qpyresponse);
+            $dynamicdata = get_object_vars($qpyresponse['data'] ?? (object) []);
+            unset($qpyresponse['data']);
+
+            if ($qpyresponse) {
+                $summary .= get_string('response_summary_form_data', 'qtype_questionpy') . ':';
+
+                ksort($qpyresponse);
+                foreach ($qpyresponse as $key => $value) {
+                    $summary .= $key . ': ' . $value . ';';
+                }
+            }
+
+            if ($dynamicdata) {
+                $summary .= get_string('response_summary_dynamic_data', 'qtype_questionpy') . ':';
+                foreach ($dynamicdata as $key => $value) {
+                    $summary .= $key . ': ' . json_encode($value) . ';';
+                }
+            }
+        }
+
+        $fileloader = $response[constants::QT_VAR_RESPONSE_FILES] ?? null;
+        if ($fileloader) {
+            $summary .= get_string('response_summary_files', 'qtype_questionpy') . ':';
+            foreach ($fileloader->get_files() as $file) {
+                $summary .= $file->get_filename() . ' (' . display_size($file->get_filesize()) . ');';
+            }
+        }
+
+        return $summary ?: '-';
     }
 
     /**