mirror of
https://github.com/moodle/moodle.git
synced 2025-04-21 00:12:56 +02:00
MDL-7996 Add ods export support
This commit is contained in:
skodak
parent
3402a6f345
commit
9c61ba4d88
@ -37,6 +37,9 @@
|
||||
if ($action == 'stats') {
|
||||
grade_stats();
|
||||
exit();
|
||||
} else if ($action == 'ods') {
|
||||
grade_download('ods', $id);
|
||||
exit();
|
||||
} else if ($action == 'excel') {
|
||||
grade_download('xls', $id);
|
||||
exit();
|
||||
|
||||
@ -1290,7 +1290,67 @@ function grade_download($download, $id) {
|
||||
} // a new Moodle nesting record? ;-)
|
||||
|
||||
/// OK, we have all the data, now present it to the user
|
||||
if ($download == "xls" and confirm_sesskey()) {
|
||||
/// OK, we have all the data, now present it to the user
|
||||
if ($download == "ods" and confirm_sesskey()) {
|
||||
require_once("../lib/odslib.class.php");
|
||||
|
||||
/// Calculate file name
|
||||
$downloadfilename = clean_filename("$course->shortname $strgrades.ods");
|
||||
/// Creating a workbook
|
||||
$workbook = new MoodleODSWorkbook("-");
|
||||
/// Sending HTTP headers
|
||||
$workbook->send($downloadfilename);
|
||||
/// Adding the worksheet
|
||||
$myxls =& $workbook->add_worksheet($strgrades);
|
||||
|
||||
/// Print names of all the fields
|
||||
$myxls->write_string(0,0,get_string("firstname"));
|
||||
$myxls->write_string(0,1,get_string("lastname"));
|
||||
$myxls->write_string(0,2,get_string("idnumber"));
|
||||
$myxls->write_string(0,3,get_string("institution"));
|
||||
$myxls->write_string(0,4,get_string("department"));
|
||||
$myxls->write_string(0,5,get_string("email"));
|
||||
$pos=6;
|
||||
foreach ($columns as $column) {
|
||||
$myxls->write_string(0,$pos++,strip_tags($column));
|
||||
}
|
||||
$myxls->write_string(0,$pos,get_string("total"));
|
||||
|
||||
/// Print all the lines of data.
|
||||
$i = 0;
|
||||
if (!empty($grades)) {
|
||||
foreach ($grades as $studentid => $studentgrades) {
|
||||
$i++;
|
||||
$student = $students[$studentid];
|
||||
if (empty($totals[$student->id])) {
|
||||
$totals[$student->id] = '';
|
||||
}
|
||||
|
||||
$myxls->write_string($i,0,$student->firstname);
|
||||
$myxls->write_string($i,1,$student->lastname);
|
||||
$myxls->write_string($i,2,$student->idnumber);
|
||||
$myxls->write_string($i,3,$student->institution);
|
||||
$myxls->write_string($i,4,$student->department);
|
||||
$myxls->write_string($i,5,$student->email);
|
||||
$j=6;
|
||||
foreach ($studentgrades as $grade) {
|
||||
if (is_numeric($grade)) {
|
||||
$myxls->write_number($i,$j++,strip_tags($grade));
|
||||
}
|
||||
else {
|
||||
$myxls->write_string($i,$j++,strip_tags($grade));
|
||||
}
|
||||
}
|
||||
$myxls->write_number($i,$j,$totals[$student->id]);
|
||||
}
|
||||
}
|
||||
|
||||
/// Close the workbook
|
||||
$workbook->close();
|
||||
|
||||
exit;
|
||||
|
||||
} else if ($download == "xls" and confirm_sesskey()) {
|
||||
require_once("../lib/excellib.class.php");
|
||||
|
||||
/// Calculate file name
|
||||
@ -2893,7 +2953,7 @@ function grade_set_letter_grades() {
|
||||
|
||||
function grade_download_form($type='both') {
|
||||
global $course,$USER, $action, $cview;
|
||||
if ($type != 'both' and $type != 'excel' and $type != 'text') {
|
||||
if ($type != 'both' and $type != 'ods' and $type != 'excel' and $type != 'text') {
|
||||
$type = 'both';
|
||||
}
|
||||
|
||||
@ -2902,6 +2962,12 @@ function grade_download_form($type='both') {
|
||||
$options['id'] = $course->id;
|
||||
$options['sesskey'] = $USER->sesskey;
|
||||
|
||||
if ($type == 'both' || $type == 'ods') {
|
||||
$options['action'] = 'ods';
|
||||
echo '<td align="center">';
|
||||
print_single_button("index.php", $options, get_string("downloadods"));
|
||||
echo '</td>';
|
||||
}
|
||||
if ($type == 'both' || $type == 'excel') {
|
||||
$options['action'] = 'excel';
|
||||
echo '<td align="center">';
|
||||
|
||||
@ -375,6 +375,7 @@ $string['documentation'] = 'Moodle Documentation';
|
||||
$string['donotask'] = 'Do Not Ask';
|
||||
$string['down'] = 'Down';
|
||||
$string['downloadexcel'] = 'Download in Excel format';
|
||||
$string['downloadods'] = 'Download in ODS format';
|
||||
$string['downloadtext'] = 'Download in text format';
|
||||
$string['doyouagree'] = 'Have you read these conditions and understood them?';
|
||||
$string['duplicate'] = 'Duplicate';
|
||||
|
||||
345
lib/odslib.class.php
Normal file
345
lib/odslib.class.php
Normal file
@ -0,0 +1,345 @@
|
||||
<?php // $Id$
|
||||
|
||||
///////////////////////////////////////////////////////////////////////////
|
||||
// //
|
||||
// NOTICE OF COPYRIGHT //
|
||||
// //
|
||||
// Moodle - Modular Object-Oriented Dynamic Learning Environment //
|
||||
// http://moodle.com //
|
||||
// //
|
||||
// Copyright (C) 2001-3001 Martin Dougiamas http://dougiamas.com //
|
||||
// (C) 2001-3001 Eloy Lafuente (stronk7) http://contiento.com //
|
||||
// (C) 2001-3001 Petr Skoda (skodak) //
|
||||
// //
|
||||
// This program is free software; you can redistribute it and/or modify //
|
||||
// it under the terms of the GNU General Public License as published by //
|
||||
// the Free Software Foundation; either version 2 of the License, or //
|
||||
// (at your option) any later version. //
|
||||
// //
|
||||
// This program is distributed in the hope that it will be useful, //
|
||||
// but WITHOUT ANY WARRANTY; without even the implied warranty of //
|
||||
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the //
|
||||
// GNU General Public License for more details: //
|
||||
// //
|
||||
// http://www.gnu.org/copyleft/gpl.html //
|
||||
// //
|
||||
///////////////////////////////////////////////////////////////////////////
|
||||
|
||||
// This code uses parts of the Minimalistic creator of OASIS OpenDocument
|
||||
// from phpMyAdmin (www.phpmyadmin.net)
|
||||
// files: libraries/opendocument.lib.php and libraries/export/ods.php
|
||||
// and also parts of the original MoodleExcelWorkbook class.
|
||||
|
||||
class MoodleODSWorkbook {
|
||||
var $worksheets = array();
|
||||
var $filename;
|
||||
|
||||
function MoodleODSWorkbook($filename) {
|
||||
$this->filename = $filename;
|
||||
}
|
||||
|
||||
/* Create one Moodle Worksheet
|
||||
* @param string $name Name of the sheet
|
||||
*/
|
||||
function &add_worksheet($name = '') {
|
||||
/// Create the Moodle Worksheet. Returns one pointer to it
|
||||
$ws =& new MoodleODSWorksheet($name);
|
||||
$this->worksheets[] =& $ws;
|
||||
return $ws;
|
||||
}
|
||||
|
||||
/* Close the Moodle Workbook
|
||||
*/
|
||||
function close() {
|
||||
global $CFG;
|
||||
require_once($CFG->libdir.'/filelib.php');
|
||||
|
||||
$dir = 'temp/ods/'.time();
|
||||
make_upload_directory($dir, false);
|
||||
make_upload_directory($dir.'/META-INF', false);
|
||||
$dir = "$CFG->dataroot/$dir";
|
||||
$files = array();
|
||||
|
||||
$handle = fopen("$dir/mimetype", 'w');
|
||||
fwrite($handle, get_ods_mimetype());
|
||||
$files[] = "$dir/mimetype";
|
||||
|
||||
$handle = fopen("$dir/content.xml", 'w');
|
||||
fwrite($handle, get_ods_content($this->worksheets));
|
||||
$files[] = "$dir/content.xml";
|
||||
|
||||
$handle = fopen("$dir/meta.xml", 'w');
|
||||
fwrite($handle, get_ods_meta());
|
||||
$files[] = "$dir/meta.xml";
|
||||
|
||||
$handle = fopen("$dir/styles.xml", 'w');
|
||||
fwrite($handle, get_ods_styles());
|
||||
$files[] = "$dir/styles.xml";
|
||||
|
||||
$handle = fopen("$dir/META-INF/manifest.xml", 'w');
|
||||
fwrite($handle, get_ods_manifest());
|
||||
$files[] = "$dir/META-INF";
|
||||
|
||||
$filename = "$dir/result.ods";
|
||||
zip_files($files, $filename);
|
||||
|
||||
$handle = fopen($filename, 'rb');
|
||||
$contents = fread($handle, filesize($filename));
|
||||
fclose($handle);
|
||||
|
||||
remove_dir($dir); // cleanup the temp directory
|
||||
|
||||
send_file($contents, $this->filename, 0, 0, true, true, 'application/vnd.oasis.opendocument.spreadsheet');
|
||||
}
|
||||
|
||||
/* Not required to use
|
||||
* @param string $name Name of the downloaded file
|
||||
*/
|
||||
function send($filename) {
|
||||
$this->filename = $filename;
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
class MoodleODSWorksheet {
|
||||
var $data = array();
|
||||
var $name;
|
||||
|
||||
|
||||
/* Constructs one Moodle Worksheet.
|
||||
* @param string $filename The name of the file
|
||||
*/
|
||||
function ODSWorksheet($name) {
|
||||
$this->name = $name;
|
||||
}
|
||||
|
||||
/* Write one string somewhere in the worksheet
|
||||
* @param integer $row Zero indexed row
|
||||
* @param integer $col Zero indexed column
|
||||
* @param string $str The string to write
|
||||
* @param mixed $format The XF format for the cell
|
||||
*/
|
||||
function write_string($row, $col, $str, $format=0) {
|
||||
if (!array_key_exists($row, $this->data)) {
|
||||
$this->data[$row] = array();
|
||||
}
|
||||
$this->data[$row][$col] = new object();
|
||||
$this->data[$row][$col]->value = $str;
|
||||
$this->data[$row][$col]->type = 'string';
|
||||
}
|
||||
|
||||
/* Write one number somewhere in the worksheet
|
||||
* @param integer $row Zero indexed row
|
||||
* @param integer $col Zero indexed column
|
||||
* @param float $num The number to write
|
||||
* @param mixed $format The XF format for the cell
|
||||
*/
|
||||
function write_number($row, $col, $num, $format=0) {
|
||||
if (!array_key_exists($row, $this->data)) {
|
||||
$this->data[$row] = array();
|
||||
}
|
||||
$this->data[$row][$col] = new object();
|
||||
$this->data[$row][$col]->value = $num;
|
||||
$this->data[$row][$col]->type = 'float';
|
||||
}
|
||||
|
||||
/* Write one url somewhere in the worksheet
|
||||
* @param integer $row Zero indexed row
|
||||
* @param integer $col Zero indexed column
|
||||
* @param string $url The url to write
|
||||
* @param mixed $format The XF format for the cell
|
||||
*/
|
||||
function write_url($row, $col, $url, $format=0) {
|
||||
if (!array_key_exists($row, $this->data)) {
|
||||
$this->data[$row] = array();
|
||||
}
|
||||
$this->data[$row][$col] = new object();
|
||||
$this->data[$row][$col]->value = $url;
|
||||
$this->data[$row][$col]->type = 'string';
|
||||
}
|
||||
|
||||
/* Write one blanck somewhere in the worksheet
|
||||
* @param integer $row Zero indexed row
|
||||
* @param integer $col Zero indexed column
|
||||
* @param mixed $format The XF format for the cell
|
||||
*/
|
||||
function write_blank($row, $col, $format=0) {
|
||||
if (array_key_exists($row, $this->data)) {
|
||||
unset($this->data[$row][$col]);
|
||||
}
|
||||
}
|
||||
|
||||
/* Write anything somewhere in the worksheet
|
||||
* Type will be automatically detected
|
||||
* @param integer $row Zero indexed row
|
||||
* @param integer $col Zero indexed column
|
||||
* @param mixed $token What we are writing
|
||||
* @param mixed $format The XF format for the cell
|
||||
*/
|
||||
function write($row, $col, $token, $format=0) {
|
||||
|
||||
/// Analyse what are we trying to send
|
||||
if (preg_match("/^([+-]?)(?=\d|\.\d)\d*(\.\d*)?([Ee]([+-]?\d+))?$/", $token)) {
|
||||
/// Match number
|
||||
return $this->write_number($row, $col, $token, $format);
|
||||
} elseif (preg_match("/^[fh]tt?p:\/\//", $token)) {
|
||||
/// Match http or ftp URL
|
||||
return $this->write_url($row, $col, $token, '', $format);
|
||||
} elseif (preg_match("/^mailto:/", $token)) {
|
||||
/// Match mailto:
|
||||
return $this->write_url($row, $col, $token, '', $format);
|
||||
} elseif (preg_match("/^(?:in|ex)ternal:/", $token)) {
|
||||
/// Match internal or external sheet link
|
||||
return $this->write_url($row, $col, $token, '', $format);
|
||||
} elseif (preg_match("/^=/", $token)) {
|
||||
/// Match formula
|
||||
return $this->write_formula($row, $col, $token, $format);
|
||||
} elseif (preg_match("/^@/", $token)) {
|
||||
/// Match formula
|
||||
return $this->write_formula($row, $col, $token, $format);
|
||||
} elseif ($token == '') {
|
||||
/// Match blank
|
||||
return $this->write_blank($row, $col, $format);
|
||||
} else {
|
||||
/// Default: match string
|
||||
return $this->write_string($row, $col, $token, $format);
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
function get_ods_content(&$worksheets) {
|
||||
|
||||
/// header
|
||||
$buffer =
|
||||
'<?xml version="1.0" encoding="UTF-8"?' . '>'
|
||||
. '<office:document-content xmlns:office="urn:oasis:names:tc:opendocument:xmlns:office:1.0" '
|
||||
. 'xmlns:text="urn:oasis:names:tc:opendocument:xmlns:text:1.0" '
|
||||
. 'xmlns:table="urn:oasis:names:tc:opendocument:xmlns:table:1.0" '
|
||||
. 'xmlns:style="urn:oasis:names:tc:opendocument:xmlns:style:1.0" '
|
||||
. 'xmlns:fo="urn:oasis:names:tc:opendocument:xmlns:xsl-fo-compatible:1.0" office:version="1.0">'
|
||||
. '<office:body>'
|
||||
. '<office:spreadsheet>';
|
||||
|
||||
foreach($worksheets as $ws) {
|
||||
/// worksheet header
|
||||
$buffer .= '<table:table table:name="' . htmlspecialchars($ws->name) . '">';
|
||||
|
||||
$nr = 0;
|
||||
$nc = 0;
|
||||
foreach($ws->data as $rkey=>$row) {
|
||||
if ($rkey > $nr) {
|
||||
$nr = $rkey;
|
||||
}
|
||||
foreach($row as $ckey=>$col) {
|
||||
if ($ckey > $nc) {
|
||||
$nc = $ckey;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
for($r=0; $r<=$nr; $r++) {
|
||||
$buffer .= '<table:table-row>';
|
||||
for($c=0; $c<=$nc; $c++) {
|
||||
if (isset($ws->data[$r][$c])) {
|
||||
$buffer .= '<table:table-cell office:value-type="' . $ws->data[$r][$c]->type . '">'
|
||||
. '<text:p>' . htmlspecialchars($ws->data[$r][$c]->value) . '</text:p>'
|
||||
. '</table:table-cell>';
|
||||
} else {
|
||||
$buffer .= '<table:table-cell/>';
|
||||
}
|
||||
}
|
||||
$buffer .= '</table:table-row>';
|
||||
}
|
||||
/// worksheet footer
|
||||
$buffer .= '</table:table>';
|
||||
|
||||
}
|
||||
|
||||
/// footer
|
||||
$buffer .= '</office:spreadsheet></office:body></office:document-content>';
|
||||
|
||||
return $buffer;
|
||||
}
|
||||
|
||||
function get_ods_mimetype() {
|
||||
return 'application/vnd.oasis.opendocument.spreadsheet';
|
||||
}
|
||||
|
||||
function get_ods_meta() {
|
||||
global $CFG;
|
||||
return
|
||||
'<?xml version="1.0" encoding="UTF-8"?'. '>'
|
||||
. '<office:document-meta '
|
||||
. 'xmlns:office="urn:oasis:names:tc:opendocument:xmlns:office:1.0" '
|
||||
. 'xmlns:meta="urn:oasis:names:tc:opendocument:xmlns:meta:1.0" '
|
||||
. 'office:version="1.0">'
|
||||
. '<office:meta>'
|
||||
. '<meta:generator>Moodle ' . $CFG->version. '</meta:generator>'
|
||||
. '<meta:initial-creator>Moodle ' . $CFG->version . '</meta:initial-creator>'
|
||||
. '<meta:creation-date>' . strftime('%Y-%m-%dT%H:%M:%S') . '</meta:creation-date>'
|
||||
. '</office:meta>'
|
||||
. '</office:document-meta>';
|
||||
}
|
||||
|
||||
function get_ods_styles() {
|
||||
return
|
||||
'<?xml version="1.0" encoding="UTF-8"?' . '>'
|
||||
. '<office:document-styles xmlns:office="urn:oasis:names:tc:opendocument:xmlns:office:1.0" '
|
||||
. 'xmlns:text="urn:oasis:names:tc:opendocument:xmlns:text:1.0" '
|
||||
. 'xmlns:table="urn:oasis:names:tc:opendocument:xmlns:table:1.0" '
|
||||
. 'xmlns:style="urn:oasis:names:tc:opendocument:xmlns:style:1.0" '
|
||||
. 'xmlns:fo="urn:oasis:names:tc:opendocument:xmlns:xsl-fo-compatible:1.0" office:version="1.0">'
|
||||
. '<office:font-face-decls>'
|
||||
. '<style:font-face style:name="Arial Unicode MS" svg:font-family="\'Arial Unicode MS\'" style:font-pitch="variable"/>'
|
||||
. '<style:font-face style:name="DejaVu Sans1" svg:font-family="\'DejaVu Sans\'" style:font-pitch="variable"/>'
|
||||
. '<style:font-face style:name="HG Mincho Light J" svg:font-family="\'HG Mincho Light J\'" style:font-pitch="variable"/>'
|
||||
. '<style:font-face style:name="DejaVu Serif" svg:font-family="\'DejaVu Serif\'" style:font-family-generic="roman" style:font-pitch="variable"/>'
|
||||
. '<style:font-face style:name="Thorndale" svg:font-family="Thorndale" style:font-family-generic="roman" style:font-pitch="variable"/>'
|
||||
. '<style:font-face style:name="DejaVu Sans" svg:font-family="\'DejaVu Sans\'" style:font-family-generic="swiss" style:font-pitch="variable"/>'
|
||||
. '</office:font-face-decls>'
|
||||
. '<office:styles>'
|
||||
. '<style:default-style style:family="paragraph">'
|
||||
. '<style:paragraph-properties fo:hyphenation-ladder-count="no-limit" style:text-autospace="ideograph-alpha" style:punctuation-wrap="hanging" style:line-break="strict" style:tab-stop-distance="0.4925in" style:writing-mode="page"/>'
|
||||
. '<style:text-properties style:use-window-font-color="true" style:font-name="DejaVu Serif" fo:font-size="12pt" fo:language="en" fo:country="US" style:font-name-asian="DejaVu Sans1" style:font-size-asian="12pt" style:language-asian="none" style:country-asian="none" style:font-name-complex="DejaVu Sans1" style:font-size-complex="12pt" style:language-complex="none" style:country-complex="none" fo:hyphenate="false" fo:hyphenation-remain-char-count="2" fo:hyphenation-push-char-count="2"/>'
|
||||
. '</style:default-style>'
|
||||
. '<style:style style:name="Standard" style:family="paragraph" style:class="text"/>'
|
||||
. '<style:style style:name="Text_body" style:display-name="Text body" style:family="paragraph" style:parent-style-name="Standard" style:class="text">'
|
||||
. '<style:paragraph-properties fo:margin-top="0in" fo:margin-bottom="0.0835in"/>'
|
||||
. '</style:style>'
|
||||
. '<style:style style:name="Heading" style:family="paragraph" style:parent-style-name="Standard" style:next-style-name="Text_body" style:class="text">'
|
||||
. '<style:paragraph-properties fo:margin-top="0.1665in" fo:margin-bottom="0.0835in" fo:keep-with-next="always"/>'
|
||||
. '<style:text-properties style:font-name="DejaVu Sans" fo:font-size="14pt" style:font-name-asian="DejaVu Sans1" style:font-size-asian="14pt" style:font-name-complex="DejaVu Sans1" style:font-size-complex="14pt"/>'
|
||||
. '</style:style>'
|
||||
. '<style:style style:name="Heading_1" style:display-name="Heading 1" style:family="paragraph" style:parent-style-name="Heading" style:next-style-name="Text_body" style:class="text" style:default-outline-level="1">'
|
||||
. '<style:text-properties style:font-name="Thorndale" fo:font-size="24pt" fo:font-weight="bold" style:font-name-asian="HG Mincho Light J" style:font-size-asian="24pt" style:font-weight-asian="bold" style:font-name-complex="Arial Unicode MS" style:font-size-complex="24pt" style:font-weight-complex="bold"/>'
|
||||
. '</style:style>'
|
||||
. '<style:style style:name="Heading_2" style:display-name="Heading 2" style:family="paragraph" style:parent-style-name="Heading" style:next-style-name="Text_body" style:class="text" style:default-outline-level="2">'
|
||||
. '<style:text-properties style:font-name="DejaVu Serif" fo:font-size="18pt" fo:font-weight="bold" style:font-name-asian="DejaVu Sans1" style:font-size-asian="18pt" style:font-weight-asian="bold" style:font-name-complex="DejaVu Sans1" style:font-size-complex="18pt" style:font-weight-complex="bold"/>'
|
||||
. '</style:style>'
|
||||
. '</office:styles>'
|
||||
. '<office:automatic-styles>'
|
||||
. '<style:page-layout style:name="pm1">'
|
||||
. '<style:page-layout-properties fo:page-width="8.2673in" fo:page-height="11.6925in" style:num-format="1" style:print-orientation="portrait" fo:margin-top="1in" fo:margin-bottom="1in" fo:margin-left="1.25in" fo:margin-right="1.25in" style:writing-mode="lr-tb" style:footnote-max-height="0in">'
|
||||
. '<style:footnote-sep style:width="0.0071in" style:distance-before-sep="0.0398in" style:distance-after-sep="0.0398in" style:adjustment="left" style:rel-width="25%" style:color="#000000"/>'
|
||||
. '</style:page-layout-properties>'
|
||||
. '<style:header-style/>'
|
||||
. '<style:footer-style/>'
|
||||
. '</style:page-layout>'
|
||||
. '</office:automatic-styles>'
|
||||
. '<office:master-styles>'
|
||||
. '<style:master-page style:name="Standard" style:page-layout-name="pm1"/>'
|
||||
. '</office:master-styles>'
|
||||
. '</office:document-styles>';
|
||||
}
|
||||
|
||||
function get_ods_manifest() {
|
||||
return
|
||||
'<?xml version="1.0" encoding="UTF-8"?' . '>'
|
||||
. '<manifest:manifest xmlns:manifest="urn:oasis:names:tc:opendocument:xmlns:manifest:1.0">'
|
||||
. '<manifest:file-entry manifest:media-type="application/vnd.oasis.opendocument.spreadsheet" manifest:full-path="/"/>'
|
||||
. '<manifest:file-entry manifest:media-type="text/xml" manifest:full-path="content.xml"/>'
|
||||
. '<manifest:file-entry manifest:media-type="text/xml" manifest:full-path="meta.xml"/>'
|
||||
. '<manifest:file-entry manifest:media-type="text/xml" manifest:full-path="styles.xml"/>'
|
||||
. '</manifest:manifest>';
|
||||
}
|
||||
?>
|
||||
Loading…
x
Reference in New Issue
Block a user