ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-12 15:01:38 +03:00
Code Issues Packages Projects Releases Wiki Activity

graph-store: backup overwritten graphs to clay

Browse Source
This commit is contained in:
Liam Fitzgerald 2020-12-11 11:38:12 +10:00
parent 95cf71c1e6
commit 37bb4e9bfe
No known key found for this signature in database
GPG Key ID: D390E12C61D1CFFB
1 changed files with 13 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
pkg/arvo/app/graph-store.hoon
View File

@ -260,13 +260,21 @@
=/ old-graph=(unit marked-graph:store)
(~(get by graphs) resource)
?> (validate-graph graph mark)
=/ clay-backup=(list card)
?~ old-graph ~
=/ =wire
backup+(en-path:res resource)
=/ =update:store
[%0 now.bowl %add-graph resource p.u.old-graph q.u.old-graph %.y]
=/ =cage
graph-update+!>(update)
=/ =soba:clay
[(welp wire /[(scot %da now.bowl)]/graph-update) ins+cage]~
[%pass wire %arvo %c %info %home &+soba]~
:_ %_ state
graphs (~(put by graphs) resource [graph mark])
update-logs (~(put by update-logs) resource (gas:orm-log ~ ~))
archive
?~ old-graph
(~(del by archive) resource)
(~(put by archive) resource u.old-graph)
archive (~(del by archive) resource)
::
validators
?~ mark validators
@ -274,6 +282,7 @@
==
%- zing
:~ (give [/updates /keys ~] [%add-graph resource graph mark overwrite])
clay-backup
?~ mark ~
?: (~(has in validators) u.mark) ~
=/ wire /validator/[u.mark]