Rejecting connections improvement

- directly close a connection which has been rejected.
- fix a bug about the blacklist verification.
Only accept one connection from the same server at a time

Use a Data.Map to sort the connections.

Incoming: allow "trusted" domain to have more connections
Blacklist: fix mistake.

* I just invert the argument