function save_comment($text, $is_response, $roundnum)
{
global $Me, $Conf, $prow, $crow;
if ($crow) {
$roundnum = (int) $crow->commentRound;
}
// If I have a review token for this paper, save under that anonymous user.
$user = $Me;
if ((!$crow || $crow->contactId != $Me->contactId) && ($cid = $Me->review_token_cid($prow)) && (!$crow || $crow->contactId == $cid)) {
$user = Contact::find_by_id($cid);
}
$req = array("visibility" => @$_REQUEST["visibility"], "submit" => $is_response && @$_REQUEST["submitresponse"], "text" => $text, "tags" => @$_REQUEST["commenttags"], "blind" => @$_REQUEST["blind"]);
if ($is_response && !$crow) {
$cinfo = new CommentInfo((object) array("commentType" => COMMENTTYPE_RESPONSE, "commentRound" => $roundnum), $prow);
} else {
$cinfo = new CommentInfo($crow, $prow);
}
$ok = $cinfo->save($req, $user);
$what = $is_response ? "Response" : "Comment";
$confirm = false;
if (!$ok && $is_response) {
$crows = $Conf->comment_rows($Conf->comment_query("paperId={$prow->paperId} and (commentType&" . COMMENTTYPE_RESPONSE . ")!=0 and commentRound={$roundnum}"), $Me);
reset($crows);
$cur_response = @current($crows);
if ($cur_response && $cur_response->comment == $text) {
$cinfo = new CommentInfo($cur_response, $prow);
$ok = true;
} else {
$confirm = Ht::xmsg("error", "A response was entered concurrently by another user. Reload to see it.");
}
}
if (!$ok) {
/* nada */
} else {
if ($is_response && (!$cinfo->commentId || $cinfo->commentType & COMMENTTYPE_DRAFT)) {
if ($cinfo->commentId) {
$confirm = 'Response saved. <strong>This draft response will not be shown to reviewers.</strong>';
} else {
$confirm = 'Response deleted.';
}
$isuf = $roundnum ? "_{$roundnum}" : "";
if (($dl = $Conf->printableTimeSetting("resp_done{$isuf}")) != "N/A") {
$confirm .= " You have until {$dl} to submit the response.";
}
$confirm = Ht::xmsg("warning", $confirm);
} else {
if ($is_response) {
$rname = $Conf->resp_round_text($roundnum);
$confirm = Ht::xmsg("confirm", ($rname ? "{$rname} response" : "Response") . ' submitted.');
} else {
if ($cinfo->commentId) {
$confirm = Ht::xmsg("confirm", "Comment saved.");
} else {
$confirm = Ht::xmsg("confirm", "Comment deleted.");
}
}
}
}
$j = array("ok" => $ok);
if ($cinfo->commentId) {
$j["cmt"] = $cinfo->unparse_json($Me);
}
if ($confirm) {
$j["msg"] = $confirm;
}
$Conf->ajaxExit($j);
}
function show($prow, $rrows, $rrow, &$options)
{
global $Conf, $Opt, $Me, $useRequest;
if (!$options) {
$options = array();
}
$editmode = defval($options, "edit", false);
$reviewOrdinal = unparseReviewOrdinal($rrow);
self::check_review_author_seen($prow, $rrow, $Me);
if (!$editmode) {
$rj = $this->unparse_review_json($prow, $rrow, $Me);
if (get($options, "editmessage")) {
$rj->message_html = $options["editmessage"];
}
$Conf->echoScript("review_form.add_review(" . json_encode($rj) . ");\n");
return;
}
// From here on, edit mode.
$forceShow = $Me->is_admin_force() ? "&forceShow=1" : "";
$reviewLinkArgs = "p={$prow->paperId}" . ($rrow ? "&r={$reviewOrdinal}" : "") . "&m=re" . $forceShow;
$reviewPostLink = hoturl_post("review", $reviewLinkArgs);
$reviewDownloadLink = hoturl("review", $reviewLinkArgs . "&downloadForm=1" . $forceShow);
echo Ht::form($reviewPostLink, array("class" => "revcard")), '<div class="aahc">', Ht::hidden_default_submit("default", "");
if ($rrow) {
echo Ht::hidden("version", defval($rrow, "reviewEditVersion", 0) + 1);
}
echo '<div class="revcard" id="r', $reviewOrdinal, '"><div class="revcard_head">';
// Links
if ($rrow) {
echo '<div class="floatright"><a href="' . hoturl("review", "r={$reviewOrdinal}&text=1" . $forceShow) . '" class="xx">', Ht::img("txt.png", "[Text]", "b"), " <u>Plain text</u></a>", "</div>";
}
echo "<h3>";
if ($rrow) {
echo '<a href="', hoturl("review", "r={$reviewOrdinal}" . $forceShow), '" class="q">Edit Review';
if ($rrow->reviewSubmitted) {
echo " #", $reviewOrdinal;
}
echo "</a>";
} else {
echo "Write Review";
}
echo "</h3>\n";
$open = $sep = " <span class='revinfo'>";
$xsep = " <span class='barsep'>·</span> ";
$showtoken = $rrow && $Me->review_token_cid($prow, $rrow);
$type = "";
if ($rrow && $Me->can_view_review_round($prow, $rrow, null)) {
$type = review_type_icon($rrow->reviewType);
if ($rrow->reviewRound > 0 && $Me->can_view_review_round($prow, $rrow, null)) {
$type .= " <span class=\"revround\" title=\"Review round\">" . htmlspecialchars($Conf->round_name($rrow->reviewRound, true)) . "</span>";
}
}
if ($rrow && $Me->can_view_review_identity($prow, $rrow, null) && (!$showtoken || !Contact::is_anonymous_email($rrow->email))) {
echo $sep, $rrow->reviewBlind ? "[" : "", Text::user_html($rrow), $rrow->reviewBlind ? "]" : "", " ", $type;
$sep = $xsep;
} else {
if ($type) {
echo $sep, $type;
$sep = $xsep;
}
}
if ($showtoken) {
echo $sep, "Review token ", encode_token((int) $rrow->reviewToken);
$sep = $xsep;
}
if ($rrow && $rrow->reviewModified > 0 && $Me->can_view_review_time($prow, $rrow)) {
echo $sep, "Updated ", $Conf->printableTime($rrow->reviewModified);
$sep = $xsep;
}
if ($sep != $open) {
echo "</span>\n";
}
if (defval($options, "editmessage")) {
echo "<div class='hint'>", defval($options, "editmessage"), "</div>\n";
}
// download?
echo '<hr class="c" />';
echo "<table class='revoff'><tr>\n <td><strong>Offline reviewing</strong> </td>\n <td>Upload form: <input type='file' name='uploadedFile' accept='text/plain' size='30' />\n ", Ht::submit("uploadForm", "Go"), "</td>\n </tr><tr>\n <td></td>\n <td><a href='{$reviewDownloadLink}'>Download form</a>\n <span class='barsep'>·</span>\n <span class='hint'><strong>Tip:</strong> Use <a href='", hoturl("search"), "'>Search</a> or <a href='", hoturl("offline"), "'>Offline reviewing</a> to download or upload many forms at once.</span></td>\n </tr></table></div>\n";
// ready?
$ready = $useRequest ? defval($_REQUEST, "ready") : !($rrow && $rrow->reviewModified && !$rrow->reviewSubmitted);
// review card
echo '<div class="revcard_body">';
// administrator?
$admin = $Me->allow_administer($prow);
if ($rrow && !$Me->is_my_review($rrow) && $admin) {
echo Ht::xmsg("info", "This isn’t your review, but as an administrator you can still make changes.");
}
// delegate?
if ($rrow && !$rrow->reviewSubmitted && $rrow->contactId == $Me->contactId && $rrow->reviewType == REVIEW_SECONDARY) {
$ndelegated = 0;
foreach ($rrows as $rr) {
if ($rr->reviewType == REVIEW_EXTERNAL && $rr->requestedBy == $rrow->contactId) {
$ndelegated++;
}
}
if ($ndelegated == 0) {
$t = "As a secondary reviewer, you can <a href=\"" . hoturl("assign", "p={$rrow->paperId}") . "\">delegate this review to an external reviewer</a>, but if your external reviewer declines to review the paper, you should complete this review yourself.";
} else {
if ($rrow->reviewNeedsSubmit == 0) {
$t = "A delegated external reviewer has submitted their review, but you can still complete your own if you’d like.";
} else {
$t = "Your delegated external reviewer has not yet submitted a review. If they do not, you should complete this review yourself.";
}
}
echo Ht::xmsg("info", $t);
}
// top save changes
if ($Me->timeReview($prow, $rrow) || $admin) {
$buttons = $this->_review_buttons($prow, $rrow, "top", $reviewPostLink);
echo Ht::actions($buttons, array("class" => "aab", "style" => "margin-top:0"));
}
// blind?
if ($Conf->review_blindness() == Conf::BLIND_OPTIONAL) {
echo '<div class="revet"><span class="revfn">', Ht::checkbox_h("blind", 1, $useRequest ? defval($_REQUEST, 'blind') : !$rrow || $rrow->reviewBlind), " ", Ht::label("Anonymous review"), "</span><hr class=\"c\" /></div>\n", '<div class="revhint">', htmlspecialchars(Conf::$gShortName), " allows either anonymous or open review. Check this box to submit your review anonymously (the authors won’t know who wrote the review).</div>\n", '<div class="g"></div>', "\n";
}
// form body
$this->webFormRows($Me, $prow, $rrow, $useRequest);
// review actions
if ($Me->timeReview($prow, $rrow) || $admin) {
$buttons = $this->_review_buttons($prow, $rrow, "bottom", $reviewPostLink);
echo Ht::actions($buttons, array("class" => "aab", "style" => "margin-bottom:0"));
if ($rrow && $rrow->reviewSubmitted && !$admin) {
echo '<div class="hint">Only administrators can remove or unsubmit the review at this point.</div>';
}
}
echo "</div></div></div></form>\n\n";
Ht::stash_script('hiliter_children("form.revcard")', "form_revcard");
}
function output_ajax($values = null, $div = false)
{
if ($values === false || $values === true) {
$values = array("ok" => $values);
} else {
if ($values === null) {
$values = array();
} else {
if (is_object($values)) {
$values = get_object_vars($values);
}
}
}
$t = "";
if (session_id() !== "" && ($msgs = $this->session("msgs", array()))) {
$this->save_session("msgs", null);
foreach ($msgs as $msg) {
if (($msg[0] === "merror" || $msg[0] === "xmerror") && !isset($values["error"])) {
$values["error"] = $msg[1];
}
if ($div) {
$t .= Ht::xmsg($msg[0], $msg[1]);
} else {
$t .= "<span class=\"{$msg['0']}\">{$msg['1']}</span>";
}
}
}
if ($t !== "") {
$values["response"] = $t . get_s($values, "response");
}
if (isset($_REQUEST["jsontext"]) && $_REQUEST["jsontext"]) {
header("Content-Type: text/plain");
} else {
header("Content-Type: application/json");
}
if (check_post()) {
header("Access-Control-Allow-Origin: *");
}
echo json_encode($values);
}
static function tagreport_api($user, $qreq, $prow)
{
global $Conf;
$treport = self::tagreport($user, $prow);
$response = "";
if (count($treport->warnings)) {
$response .= Ht::xmsg("warning", join("<br>", $treport->warnings));
}
if (count($treport->messages)) {
$response .= Ht::xmsg("info", join("<br>", $treport->messages));
}
json_exit(["ok" => $treport->ok, "response" => $response], true);
}
