Common Lisp bittorrent