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