Packages

spotless

3.1.0
7.0.0 6.1.0 6.0.0 5.0.0 4.0.0 3.5.1 3.5.0 3.4.1 3.4.0 3.3.0 3.2.0 3.1.1 3.1.0 3.0.0 2.4.0 2.3.1 2.3.0 2.2.0 2.1.0 2.0.0 1.1.2 1.1.1 1.1.0 1.0.0 0.2.0 0.1.2 0.1.1 0.1.0

Instant OAuth integration for personal projects. Supports PKCE, DPoP, PAR.

HexDocs

Current section

Files

Jump to
Readme
28 Versions
5 Dependencies
Dependants
Files
Activity
spotless src spotless httpx.gleam
Raw

src/spotless/httpx.gleam 

import gleam/list

import gleam/string



pub type Challenge {

  Challenge(auth_schema: String, params: List(Param))

}



pub fn challenge_to_string(challenge) {

  let Challenge(auth_schema, params) = challenge

  let params = params |> list.map(param_to_string) |> string.join(", ")

  auth_schema <> " " <> params

}



pub type Param {

  Token68(String)

  Param(String, String)

}



fn param_to_string(param) {

  case param {

    Token68(token) -> token

    Param(key, value) -> key <> "=" <> value |> escape_quoted

  }

}



fn escape_quoted(string) {

  let content =

    string

    |> string.replace("\\", "\\\\")

    |> string.replace("\"", "\\\"")

  "\"" <> content <> "\""

}