kit add gitlab.com/kit-lang/packages/kit-oauth.git

import Kit.Oauth as OAuth

main = fn =>
  config = OAuth.github "client-id" "client-secret" "http://localhost:3000/callback" ["read:user", "user:email"]

  state = OAuth.generate-state
  auth-url = OAuth.authorize-url config state

  println "打开此授权URL："
  println auth-url

main

match OAuth.exchange-code http-auth config code
  | Ok tokens ->
    println "令牌类型：${tokens.token-type}"
    println "过期时间：${Int.to-string tokens.expires-in} 秒"
  | Err err ->
    println "OAuth错误：${err}"

verifier = "abcdefghijklmnopqrstuvwxyz0123456789-._~abc"
state = OAuth.generate-state
auth-url = OAuth.authorize-url-pkce config state verifier

match OAuth.exchange-code-pkce http-auth config code verifier
  | Ok tokens -> println "已收到访问令牌"
  | Err err -> println "OAuth错误：${err}"

config = OAuth.custom "client-id" "client-secret" "https://auth.example.com/oauth/authorize" "https://auth.example.com/oauth/token" "https://app.example.com/oauth/callback" ["api:read", "api:write"]

match OAuth.client-credentials http-auth config
  | Ok tokens ->
    println "已收到访问令牌"
  | Err err ->
    println "OAuth错误：${err}"

match OAuth.refresh-token http-auth config refresh-token
  | Ok tokens -> println "已刷新访问令牌"
  | Err err -> println "刷新失败：${err}"

match OAuth.get http-auth "https://api.example.com/user" tokens.access-token
  | Ok response ->
    println "状态码：${Int.to-string response.status}"
    println response.body
  | Error err ->
    println "API错误：${err}"

json-body = "{\"name\":\"Kit\"}"

match OAuth.post http-auth "https://api.example.com/resources" json-body tokens.access-token
  | Ok response -> println "已创建：${Int.to-string response.status}"
  | Error err -> println "API错误：${err}"

kit run examples/github.kit
kit run examples/client-credentials.kit

kit build examples/github.kit && ./github

kit test

kit test --coverage

kit dev

kit parity --failures-only

kit doc

kit task clean

kit install