akhansari

The OAuth Bible

I tried to make this as understandable as possible for any party reading it which means that the wording, references, and terminology used may not reflect that of a technical paper or resource. Excuse me if you may for I wish all to understand this, and not just those with a degree in understanding legal or technical jargon.

Created with love by Nijikokun @ Mashape, the team behing the OSS API management layer Kong, and Mashape Analytics for visualizing and monitoring API traffic.

---

Hey! Interested in simplifying the process to consume OAuth services like twitter, facebook, github, and thousands more? Check out Guardian, it was built with simplicity, security, and ease of use in mind, allowing you to consume OAuth in a single request.

akhansari

#r "nuget: Microsoft.Extensions.Http, 6.0.0"

let factory =
    ServiceCollection()
        .AddHttpClient("dummy")
            .ConfigureHttpClient(fun c ->
                printfn "dummy configured"
                c.BaseAddress <- Uri "https://dummyjson.com"
                c.Timeout <- TimeSpan.FromMinutes 2.)
            .Services

akhansari

Invoke-Expression (&starship init powershell)
Set-PSReadLineOption -PredictionSource HistoryAndPlugin
Set-PSReadLineOption -PredictionViewStyle ListView
Invoke-Expression (& zoxide init --hook 'pwd' powershell | Out-String)
Set-Alias -Name ee -Value extLauncher

akhansari

namespace EsBankAccount.Account;

using Events = IReadOnlyCollection<IEvent>;

public record Transaction(decimal Amount, DateTime Date);

// events
public interface IEvent { } // used to mimic a discriminated union
public record Deposited(Transaction Transaction) : IEvent;
public record Withdrawn(Transaction Transaction) : IEvent;

akhansari

type Pins = int
let [<Literal>] MaxPins : Pins = 10

type Frame =
    | Strike of Pins
    | Spare of Pins * Pins
    | Open of Pins * Pins
    | Pending of Pins
    | Final of Pins * Pins option * Pins option

akhansari

[core]
  excludesFile = ~/.gitignore
[user]
  name = My Name

[includeIf "gitdir:~/git/"]
  path = ~/.gitconfig-work
[includeIf "gitdir:~/github/"]
  path = ~/.gitconfig-home

akhansari

module AsyncSeq =
    open System.Collections.Generic
    open System.Threading.Tasks
    
    let cancelled (cancellationToken: CancellationToken) =
        Task.FromCanceled<bool> cancellationToken
        |> ValueTask<bool>

    let ofSeq (sq: Task<'T> seq) = {
        new IAsyncEnumerable<'T> with

akhansari

(*
| Method |    Mean |   Error |  StdDev | Allocated |
|------- |--------:|--------:|--------:|----------:|
|   Task | 15.99 s | 0.107 s | 0.095 s |    314 KB |
|  Async | 16.02 s | 0.089 s | 0.079 s |    990 KB |
*)

open System.Threading.Tasks
open BenchmarkDotNet.Attributes
open BenchmarkDotNet.Running

akhansari

Scoop

• firacode
• windows-terminal
• starship
• gopass
• pass-winmenu-nogpg
• micro
• nodejs
• jq

akhansari

[<AutoOpen>]
module Helpers =
    let rec (|NestedHttpRequestException|_|) (e: exn) =
        match e with
        | null -> None
        | :? Net.Http.HttpRequestException as e -> Some e
        | e -> (|NestedHttpRequestException|_|) e.InnerException

[<RequireQualifiedAccess>]
module ConsulKv =