static function settags_api($user, $qreq, $prow)
{
global $Conf;
if ($qreq->cancelsettags) {
json_exit(["ok" => true]);
}
if ($prow && !$user->can_view_paper($prow)) {
json_exit(["ok" => false, "error" => "No such paper."]);
}
// save tags using assigner
$x = array("paper,action,tag");
if ($prow) {
if (isset($qreq->tags)) {
$x[] = "{$prow->paperId},tag,all#clear";
foreach (TagInfo::split($qreq->tags) as $t) {
$x[] = "{$prow->paperId},tag," . CsvGenerator::quote($t);
}
}
foreach (TagInfo::split((string) $qreq->addtags) as $t) {
$x[] = "{$prow->paperId},tag," . CsvGenerator::quote($t);
}
foreach (TagInfo::split((string) $qreq->deltags) as $t) {
$x[] = "{$prow->paperId},tag," . CsvGenerator::quote($t . "#clear");
}
} else {
if (isset($qreq->tagassignment)) {
$pids = [];
$pid = -1;
foreach (preg_split('/[\\s,]+/', $qreq->tagassignment) as $w) {
if ($w !== "" && ctype_digit($w)) {
$pid = intval($w);
} else {
if ($w !== "" && $pid > 0) {
$x[] = "{$pid},tag," . CsvGenerator::quote($w);
$pids[$pid] = true;
}
}
}
}
}
$assigner = new AssignmentSet($user, $user->is_admin_force());
$assigner->parse(join("\n", $x));
$error = join("<br />", $assigner->errors_html());
$ok = $assigner->execute();
// exit
if ($ok && $prow) {
$prow->load_tags();
$treport = self::tagreport($user, $prow);
if ($treport->warnings) {
$Conf->warnMsg(join("<br>", $treport->warnings));
}
$taginfo = (object) ["ok" => true, "pid" => $prow->paperId];
$prow->add_tag_info_json($taginfo, $user);
json_exit($taginfo, true);
} else {
if ($ok) {
$p = [];
$result = Dbl::qe_raw($Conf->paperQuery($user, ["paperId" => array_keys($pids), "tags" => true]));
while ($prow = PaperInfo::fetch($result, $user)) {
$p[$prow->paperId] = (object) [];
$prow->add_tag_info_json($p[$prow->paperId], $user);
}
json_exit(["ok" => true, "p" => $p]);
} else {
json_exit(["ok" => false, "error" => $error], true);
}
}
}
