(** as above but works on in_channels *)
val sockname_of_in_channel: in_channel -> Unix.sockaddr
+ (* TODO replace with Buffer.add_channel which does almost the same :-((( *)
(** reads from an input channel till it End_of_file and returns what has been
read; if limit is given returned buffer will contains at most first 'limit'
bytes read from input channel *)