將Word8轉換為[Word8]

Question

我正在使用庫Network.Pcap ，它具有toBS的功能

toBS :: (PktHdr, Ptr Word8) -> IO (PktHdr, B.ByteString)
toBS (hdr, ptr) = do
    let len = hdrCaptureLength hdr
    s <- B.create (fromIntegral len) $ \p -> B.memcpy p ptr (fromIntegral len)
    return (hdr, s)

現在，我正在打開ByteString的包裝，這給了我所需的[Word8] 。 我正在尋找避免解壓ByteString並直接獲取[Word8] 。

（1）這個功能存在嗎？ （2）如果沒有，請問我如何進行操作？

Answer 1

我對那些庫不熟悉，但是您不能這樣做嗎？

import Foreign.Marshal.Array

toByteList :: PktHdr -> Ptr Word8 -> IO [Word8]
toByteList hdr ptr = peekArray (fromIntegral (hdrCaptureLength hdr)) ptr