implement chunk logs

Slightly tricky as they are not normal UUIDBased logs, but are instead maps
from (uuid, chunksize) to chunkcount.

This commit was sponsored by Frank Thomas.
This commit is contained in:
Joey Hess 2014-07-24 16:23:36 -04:00
parent bbdb2c04d5
commit e2c44bf656
8 changed files with 134 additions and 39 deletions

View file

@ -9,12 +9,11 @@ module Remote.Helper.Chunked where
import Utility.DataUnits
import Types.Remote
import Logs.Chunk.Pure (ChunkSize)
import qualified Data.Map as M
import Data.Int
type ChunkSize = Int64
data ChunkConfig
= NoChunks
| UnpaddedChunks ChunkSize