レイジーIOの強制評価

Question

私のプログラムはネットワークソケットから行を読み込んでディスクに書き込みます。行は本当に長くて文字列がひどいので、私は遅延バイト文字列を使い始めました。

• 開いているファイルをhPut
• 近いファイルのファイルに
• 書き込みバイト文字列を書き込むために：今ではHaskellは実際にディスクへの全バイト文字列を洗い流す、そうせずにディスクファイルハンドルにhClose過ぎて行くようです

を読み取るための

開いているファイルは、通常openFile: resource busy (file is locked)になります。

評価を強制し、ファイルを閉じる前にすべてのバイト文字列が書き込まれるのを待つことができるので、その操作後にファイルが実際に閉じられていることを確認できますか？

Answer 1

他の唯一の答えは「何か他のものを使用する」バラエティなので、私自身のソリューションを投稿しています。 hCloseの後にこの関数を使用すると、レイジー書き込みが完了するまでスレッドが停止します。

waitForLazyIO location = do 
    t <- liftIO $ try $ openFile location AppendMode 
    handle t 
    where 
     handle (Right v) = hClose v 
     handle (Left e) 
      -- Add some sleep if you expect the write operation to be slow. 
      | isAlreadyInUseError e = waitForLazyIO location 
      | otherwise = throwError $ show e 

Answer 2

遅延I/Oと遅延バイト文字列の代わりに厳密なバイト文字列で厳密なI/Oを使用してみてください。

これがあまりにも効率が悪いと判明した場合は、conduitまたは同様のパッケージをお試しください。