Giraffe F#
Uno snippet F# per Giraffe che risponde alle richieste a /pixel.gif con la GIF vuota, decodificata una sola volta all'avvio.
Giraffe F#
open System
open Microsoft.AspNetCore.Builder
open Microsoft.Extensions.DependencyInjection
open Giraffe
let gif = Convert.FromBase64String "R0lGODlhAQABAIAAAP///wAAACH5BAEAAAAALAAAAAABAAEAAAICRAEAOw=="
let pixel: HttpHandler =
setHttpHeader "Content-Type" "image/gif"
>=> setHttpHeader "Cache-Control" "no-store"
>=> setBody gif
let webApp =
choose [
GET >=> route "/pixel.gif" >=> pixel
RequestErrors.NOT_FOUND "Not Found"
]
let builder = WebApplication.CreateBuilder()
builder.Services.AddGiraffe() |> ignore
let app = builder.Build()
app.UseGiraffe webApp
app.Run "http://0.0.0.0:8080"
Abbiamo eseguito questo snippet e confrontato i byte che ha restituito.
Verifica
curl -sI http://localhost:8080/pixel.gif