James/tricu
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Arboricx bundle format 1.1

Browse Source 
We don't need SHA verification or Merkle dags in our transport bundle. Content
stores can handle both bundle and term verification and hashing.
This commit is contained in:
James Eversole
2026-05-11 19:53:37 -05:00
parent e0b1e95729
commit 31bf7094f4
45 changed files with 4032 additions and 7127 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
lib/arboricx-common.tri
View File

@@ -61,22 +61,22 @@ readSectionRecord = (bs :
bindResult (readBytes 2 afterSectionFlags)
(compression afterCompression :
bindResult (readBytes 2 afterCompression)
(digestAlgorithm afterDigestAlgorithm :
bindResult (readBytes 8 afterDigestAlgorithm)
(reserved1 afterReserved1 :
bindResult (readBytes 8 afterReserved1)
(offset afterOffset :
bindResult (readBytes 8 afterOffset)
(length afterLength :
bindResult (readBytes 32 afterLength)
(digest afterDigest :
bindResult (readBytes 4 afterLength)
(reserved2 afterReserved2 :
ok
(pair sectionId
(pair sectionVersion
(pair sectionFlags
(pair compression
(pair digestAlgorithm
(pair reserved1
(pair offset
(pair length digest)))))))
afterDigest)))))))))
(pair length reserved2)))))))
afterReserved2)))))))))
readSectionDirectory_ = y (self bs sectionCount i acc :
matchBool
@@ -126,7 +126,7 @@ sectionRecordCompression = (sectionRecord :
payload)
sectionRecord)
sectionRecordDigestAlgorithm = (sectionRecord :
sectionRecordReserved1 = (sectionRecord :
matchPair
(_ payload :
matchPair
@@ -136,7 +136,7 @@ sectionRecordDigestAlgorithm = (sectionRecord :
matchPair
(_ payload4 :
matchPair
(digestAlgorithm _ : digestAlgorithm)
(reserved1 _ : reserved1)
payload4)
payload3)
payload2)
@@ -186,7 +186,7 @@ sectionRecordLength = (sectionRecord :
payload)
sectionRecord)
sectionRecordDigest = (sectionRecord :
sectionRecordReserved2 = (sectionRecord :
matchPair
(_ payload :
matchPair
@@ -200,7 +200,7 @@ sectionRecordDigest = (sectionRecord :
matchPair
(_ payload6 :
matchPair
(_ digest : digest)
(_ reserved2 : reserved2)
payload6)
payload5)
payload4)