daveadmin/dobetternorge-tools
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Korrespond: add Refine pass with jurisdiction-scoped formal citations

Browse Source 
After the first draft is rendered, a "Refine with citations" panel offers a
3rd-pass rewrite scoped to the user's choice of Norwegian law, ECHR (EMK +
HUDOC case law), or both. Refine pulls fresh corpus chunks limited to the
chosen jurisdiction's slices, rewrites inline cites in formal style ("jf.
forvaltningsloven § 17", "jf. Strand Lobben m.fl. mot Norge, EMD-37283/13,
§§ 207–214"), and appends a Rettskilder block listing every authority.
Hard-RAG grounding carries through — refine cannot cite anything that
wasn't retrieved. Costs 1 additional credit; the original draft stays in
place and the refined version appears below it.

Co-Authored-By: Claude Opus 4.7 <noreply@anthropic.com>
This commit is contained in:
davegilligan
2026-05-19 11:50:36 +02:00
parent b78a49e060
commit 5d8ae6b447
4 changed files with 696 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files
api/korrespond-refine.php
+120
View File
@@ -0,0 +1,120 @@
<?php
declare(strict_types=1);
require_once __DIR__ . '/../includes/bootstrap.php';
require_once __DIR__ . '/../includes/KorrespondAgent.php';
dbnToolsRequireMethod('POST');
dbnToolsRequireAuth();
@ini_set('output_buffering', '0');
@ini_set('zlib.output_compression', '0');
@ini_set('implicit_flush', '1');
while (ob_get_level() > 0) { @ob_end_clean(); }
ob_implicit_flush(true);
header('Content-Type: application/x-ndjson; charset=utf-8');
header('Cache-Control: no-store');
header('X-Accel-Buffering: no');
$startTime = microtime(true);
$language = 'en';
$emit = function (string $event, array $payload = []) use ($startTime): void {
$payload['event'] = $event;
$payload['t_ms'] = (int)round((microtime(true) - $startTime) * 1000);
echo json_encode($payload, JSON_UNESCAPED_UNICODE | JSON_UNESCAPED_SLASHES) . "\n";
@flush();
};
try {
$raw = file_get_contents('php://input');
if ($raw === false || strlen($raw) > 200000) {
throw new DbnToolsHttpException('Request body unreadable or too large.', 413, 'body_too_large');
}
$input = json_decode((string)$raw, true);
if (!is_array($input)) {
throw new DbnToolsHttpException('Request body must be valid JSON.', 400, 'invalid_json');
}
$language = dbnToolsNormalizeLanguage($input['language'] ?? 'en');
$jurisdiction = $input['jurisdiction'] ?? 'norwegian';
if (!in_array($jurisdiction, ['norwegian', 'echr', 'both'], true)) {
throw new DbnToolsHttpException('Invalid jurisdiction.', 422, 'invalid_jurisdiction');
}
$originalDraftNo = trim((string)($input['original_draft_no'] ?? ''));
if ($originalDraftNo === '') {
throw new DbnToolsHttpException('original_draft_no is required.', 422, 'missing_original_draft');
}
if (mb_strlen($originalDraftNo, 'UTF-8') > 12000) {
throw new DbnToolsHttpException('original_draft_no is too large.', 413, 'original_too_large');
}
$classify = is_array($input['classify'] ?? null) ? $input['classify'] : [];
$intake = is_array($input['intake'] ?? null) ? $input['intake'] : [];
// Sanitise intake to expected fields only
$allowedBodies = ['barnehage','school_1_10','sfo','nav','bufdir','barnevernet',
'kommune_other','statsforvalter','trygderetten','tingrett','other'];
$allowedOutput = ['email','formal','filing','call_prep'];
$allowedTone = ['cooperative','neutral','firm','adversarial','warm'];
$intake = [
'recipient_body' => in_array($intake['recipient_body'] ?? '', $allowedBodies, true) ? $intake['recipient_body'] : 'other',
'output_type' => in_array($intake['output_type'] ?? '', $allowedOutput, true) ? $intake['output_type'] : 'email',
'tone' => in_array($intake['tone'] ?? '', $allowedTone, true) ? $intake['tone'] : 'neutral',
'language' => $language,
'goal' => mb_substr(trim((string)($intake['goal'] ?? '')), 0, 600, 'UTF-8'),
];
// Credit gate (refine is a paid pass)
$ftUid = dbnToolsFreeTierCheck('korrespond_refine');
$ftRemaining = dbnToolsFreeTierDeduct($ftUid, 'korrespond_refine');
if ($ftRemaining >= 0) {
header('X-Credits-Remaining: ' . $ftRemaining);
}
$emit('start', [
'jurisdiction' => $jurisdiction,
'body' => $intake['recipient_body'],
'language' => $language,
]);
$agent = new DbnKorrespondAgent();
$result = $agent->refine($intake, $classify, $originalDraftNo, $jurisdiction, $emit);
$result['ok'] = true;
$result['latency_ms'] = (int)round((microtime(true) - $startTime) * 1000);
dbnToolsLogMetadata([
'tool' => 'korrespond_refine',
'language' => $language,
'ok' => true,
'latency_ms' => $result['latency_ms'],
'source_count' => is_array($result['cited_law'] ?? null) ? count($result['cited_law']) : 0,
'deployment' => 'gpt-4o',
'jurisdiction' => $jurisdiction,
]);
$emit('final', ['result' => $result]);
} catch (DbnToolsHttpException $e) {
$latency = (int)round((microtime(true) - $startTime) * 1000);
dbnToolsLogMetadata([
'tool' => 'korrespond_refine',
'language' => $language,
'ok' => false,
'latency_ms' => $latency,
'error_code' => $e->errorCode,
]);
$emit('error', ['code' => $e->errorCode, 'message' => $e->getMessage(), 'status' => $e->status]);
} catch (Throwable $e) {
error_log('Korrespond refine fatal: ' . $e->getMessage());
$latency = (int)round((microtime(true) - $startTime) * 1000);
dbnToolsLogMetadata([
'tool' => 'korrespond_refine',
'language' => $language,
'ok' => false,
'latency_ms' => $latency,
'error_code' => 'internal_error',
]);
$emit('error', ['code' => 'internal_error', 'message' => 'Korrespond refine could not complete this request.']);
}