crater-browser-http

pub(all) suberror HttpError {
  NetworkError(String)
  InvalidUrl(String)
  TimeoutError
  CorsError(String)
  SandboxError(String)
  CorsBlocked(String)
  PreflightFailed(String)
}

pub(all) enum CredentialsMode {
  Omit
  SameOrigin
  Include
} derive(Eq, 
@moonbitlang/core/debug.Debug
Debug)

pub(all) struct FetchOptions {
  http_method : String
  headers : Map[String, String]
  body : String
  timeout_ms : Int
  mode : RequestMode
  credentials : CredentialsMode
  origin : String
  sandbox : RequestSandbox
}

pub(all) struct HttpResponse {
  status : Int
  headers : Map[String, String]
  body : String
}

pub(all) enum RequestMode {
  Navigate
  SameOrigin
  NoCors
  Cors
} derive(Eq, 
@moonbitlang/core/debug.Debug
Debug)

pub(all) enum RequestSandbox {
  Open
  SameOrigin
  Allowlist(Array[String])
} derive(
@moonbitlang/core/debug.Debug
Debug)

fn enforce_cors_response(url : String, options : FetchOptions, response : HttpResponse) -> HttpResponse raise HttpError

async fn fetch(url : String, options? : FetchOptions) -> HttpResponse raise HttpError

fn get_header(headers : Map[String, String], name : String) -> String?

fn headers_to_json(headers : Map[String, String]) -> String