Added getuser and gethost to rshell.cpp