let server_configuration t =
  match t.mode with
  | `Server s -> Some s
  | other -> None