Rename shell-mode buffer to the destination host-name in SSH login 

Emacs natively support rename shell-mode buffer by appending numbers in each buffer.  But it does not make any sense. I used to login to many different machines through Emacs shell-mode, so I'd like to have buffer name represent the host-name I am working on. Just like what many terminals do.