Snap Frameworkを使用してサーバーサイドにオブジェクトを保存するにはどうすればよいですか？

Question

この質問はすでに2010年に尋ねられましたが、今日はより良い回答があるかもしれないと思います。 基本的には、何らかのオブジェクトを格納してすべての要求にアクセスする必要があります。理想的には、要求内からそのオブジェクトを変更できるようにしたいと考えています（MVarまたはIORefがそうするでしょう）。

スナップショットチュートリアルでは、可能性があると思われるようですが、スナップレットの使い方がほとんど説明されています（このチュートリアルは結局のためのものです）、この「App」オブジェクトの動作や保存方法。私はスナップレットを必要としない私のケースにそれをどのように適用するか分かりません（私はAPIを作っているので、Heistは必要ありません）。

ので、デフォルトのコード与えられた：私はどこかに私がsomeHandlerに使用できることをいくつかのオブジェクトを「登録」し、これを変更するにはどうすればよい

site :: Snap() 
site = do 
    ifTop (writeBS "hello world") <|> 
    route [ ("stuff/:param", someHandler) ] <|> 
    dir "static" (serveDirectory ".") 

を？ 2010年の答えは、すべてのハンドラに部分的に適用するだけですが、これはうまくいくはずですが、Snapletチュートリアルではより良い方法が必要だと思っています。

Answer 1

スナップショットチュートリアルの「Working with State」セクションでは、ローカルステートの操作方法について説明しています。上記の「スナップレットの概要」セクションの2番目のコードを見ると、Lensを使用してデータタイプを初期化するときの状態の設定方法がわかります。

あなたがこれらのことにどれほど親しんでいるのかよく分かりませんが、Lensでは大きな値のデータにアクセス（つまり読み書き/調整）することができます。この場合のサーバーの状態全体は、サーバーが存在するときに初期化されるデータの1つのブロブ（レコードタイプ値）として表されます。

注意：_companyName :: IORef B.ByteString <は、この例では変更可能な状態であり、「状態を処理する」というセクションが変更されています。彼らはそのURLにHTTP GETまたはPOSTを受け取り、新しい "name"パラメータ（POST）でそれを更新して新しい状態を返すか、GETの場合は現在の状態を返します。