215 |
int: begin |
int: begin |
216 |
int: length (power of 2, 2 ^ 15) |
int: length (power of 2, 2 ^ 15) |
217 |
|
|
218 |
Chock/unchock every 10 seconds |
Choke/unchoke every 10 seconds |
219 |
*) |
*) |
220 |
|
|
221 |
|
|
276 |
| Ping -> "Ping" |
| Ping -> "Ping" |
277 |
| PeerID s -> Printf.sprintf "PeerID [%s]" (String.escaped s) |
| PeerID s -> Printf.sprintf "PeerID [%s]" (String.escaped s) |
278 |
|
|
279 |
let parser opcode m = |
let parsing opcode m = |
280 |
match opcode with |
match opcode with |
281 |
0 -> Choke |
0 -> Choke |
282 |
| 1 -> Unchoke |
| 1 -> Unchoke |