json-parser: Refactor server.hs.