1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
<?vsp
declare sid, mbox, digest, id, mu, rc, webid, accept, fmt, cb, ep, gr, vtype any;
rc := 0;
accept := http_request_header_full (lines, 'Accept', '*/*');
fmt := DB.DBA.HTTP_RDF_GET_ACCEPT_BY_Q (accept);
if (fmt = 'application/json')
http_header ('Content-Type: application/json\r\n');
if (not is_https_ctx ())
goto failed;
sid := {?'confirm'};
gr := null;
rc := WEBID_AUTH_GEN_2 (null, 0, null, 1, 0, webid, gr, 0, vtype);
mbox := (select VS_UID from VSPX_SESSION where VS_SID = sid and VS_REALM = 'mv');
cb := (select VS_STATE from VSPX_SESSION where VS_SID = sid and VS_REALM = 'mv');
if (cb is not null)
cb := get_keyword ('callback', deserialize (cb));
else
cb := null;
if (rc and mbox is not null)
{
digest := sha1_digest (mbox);
id := sprintf ('http://%{URIQADefaultHost}s/mv/data/') || bin2hex (cast (decode_base64 (digest) as varbinary));
mu := 'mailto:' || mbox;
ep := sprintf ('http://%{URIQADefaultHost}s/sparql-auth/');
sparql insert into graph iri ('http://localhost/mv')
{
`iri (?:id)` <http://vocab.deri.ie/void#inDataset> <http://localhost/mv> .
<http://localhost/mv> <http://rdfs.org/ns/void#sparqlEndpoint> `iri(?:ep)` .
`iri (?:id)` foaf:primaryTopic `iri(?:webid)` .
`iri(?:webid)` foaf:mbox_sha1sum ?:digest .
};
if (length (cb))
{
declare c any;
c := case when strchr (cb, '?') is null then '?' else '&' end;
http_status_set (302);
http_header (sprintf ('Location: %s%sid=%U\r\n', cb, c, id));
return;
}
if (fmt = 'application/json')
{
http (sprintf ('{"status":"verified", "document_url":"%s"}', id));
return;
}
}
failed:
if (fmt = 'application/json') -- failure
{
http_status_set (400);
http ('{"status":"failed"}');
return;
}
?>
<html>
<head>
<title>Mail confirmation service</title>
</head>
<body>
<?vsp if (rc and mbox is not null) { ?>
<h1>Your e-mail is confirmed</h1><div>The document descriptor can be seen at <a href="<?V id ?>"><?V id ?></a></div>
<?vsp } else { ?>
<h1>You are not authenticated.</h1>
<?vsp }?>
</body>
</html>
|
