When creating sockets, do all work at fd level first

When errors happen during the socket creation process, we want
to be able to clean up by closing the socket fd, and not have to
worry about leaking an incompletely configured fd into some
Lisp object.