let socket_file = Filename.concat Cam_config.socket_dir (Printf.sprintf ".cameleon_%s" Cam_messages.login)