This commit is contained in:
Joey Hess 2012-07-05 10:34:47 -06:00
parent 530c1b092a
commit bd2c4c982d

View file

@ -16,9 +16,9 @@ all the other git clones, at both the git level and the key/value level.
* Poll transfer in progress info files for changes (use inotify again! * Poll transfer in progress info files for changes (use inotify again!
wow! hammer, meet nail..), and update the TransferInfo Map **done** wow! hammer, meet nail..), and update the TransferInfo Map **done**
* enqueue Transfers (Uploads) as new files are added to the annex by * enqueue Transfers (Uploads) as new files are added to the annex by
Watcher. Watcher. **done**
* enqueue Tranferrs (Downloads) as new dangling symlinks are noticed by * enqueue Tranferrs (Downloads) as new dangling symlinks are noticed by
Watcher. Watcher. **done**
* Write basic Transfer handling thread. Multiple such threads need to be * Write basic Transfer handling thread. Multiple such threads need to be
able to be run at once. Each will need its own independant copy of the able to be run at once. Each will need its own independant copy of the
Annex state monad. Annex state monad.
@ -82,10 +82,7 @@ anyway.
### transfer tracking ### transfer tracking
* Upload added to queue by the watcher thread when it adds content. Transfer threads started/stopped as necessary to move data.
* Download added to queue by the watcher thread when it seens new symlinks
that lack content.
* Transfer threads started/stopped as necessary to move data.
(May sometimes want multiple threads downloading, or uploading, or even both.) (May sometimes want multiple threads downloading, or uploading, or even both.)
startTransfer :: TransferQueue -> Transfer -> Annex () startTransfer :: TransferQueue -> Transfer -> Annex ()