Make volume derive Show
Add volume to SinkInfo
Add Monad.Context (volume setting)
Add synchronouse volume setter