MegaStore

A Module for taking a directory of images (for example) and turning them into a key referencable data structure that will efficiently store all images. Here is a quick crash course:

       a1  <- loadFile "s1.png"
       a2  <- loadFile "s2.png"
       a3  <- loadFile "s3.png"

       let testSet = KeyStore [("s1", a1), ("s2", a2), ("s3", a3)]
       saveStore ".testtestSet" testSet

       loadedContents <- loadStore ".testtestSet.keystore"
       autoUnpack "./results" loadedContents
   

Records

newtype MegaStore

The MegaStore Data Type itself, fundamentally it is a List of Tuples

Constructors

MegaStore

Fields

• _contents :: [(Text, ByteString)]

  the contents of the MegaStore, while made for images it is acknowledged anything that satisfies the constraint/assertion may be a KeyStore

Instances

Show MegaStore

Defined in MegaStore

Methods

showsPrec :: Int -> MegaStore -> ShowS

show :: MegaStore -> String

showList :: [MegaStore] -> ShowS

Binary MegaStore

The MegaStore Data Type's instance for serializing the data structure to file type,

Defined in MegaStore

Methods

put :: MegaStore -> Put

get :: Get MegaStore

putList :: [MegaStore] -> Put

Eq MegaStore

Defined in MegaStore

Methods

(==) :: MegaStore -> MegaStore -> Bool

(/=) :: MegaStore -> MegaStore -> Bool

Ord MegaStore

Defined in MegaStore

Methods

compare :: MegaStore -> MegaStore -> Ordering

(<) :: MegaStore -> MegaStore -> Bool

(<=) :: MegaStore -> MegaStore -> Bool

(>) :: MegaStore -> MegaStore -> Bool

(>=) :: MegaStore -> MegaStore -> Bool

max :: MegaStore -> MegaStore -> MegaStore

min :: MegaStore -> MegaStore -> MegaStore

I/O Functions

saveStore :: String -> MegaStore -> IO ()

Writes a MegaStore to physical memory, it does so via Data.ByteString.Lazy.WriteFile Where the data is compressed and encoded to Strict ByteStrings

loadStore :: FilePath -> IO MegaStore

Read a MegaStore from file system path, it reads the file, decodes, and decompresses the data

loadFile :: FilePath -> IO ByteString

Load an Image as a ByteString via Path

loadDirectory :: FilePath -> IO [ByteString]

Load a directory of Images as ByteStrings via FilePath

createMegaStoreWithBulk :: [ByteString] -> Text -> MegaStore

Pass a List of ByteStrings (this is intended to work with loadImageDirectory), and a String for a naming scheme (ie: S results in [S0..]) Example (Loading a Directory all at once): @ assets <- loadDirectory "./assets" saveStore ".testtestSet" $ createMegastoreWithBulk assets "s"

unpackStore :: ByteString -> IO (Image PixelRGBA8)

Convert a ByteString back into it's original Image Data Type

unpackStore' :: String -> Image PixelRGBA8 -> IO ()

Convert a ByteString back into it's original Image File Type You have the added option of designating where the file will be savved

autoUnpack :: String -> MegaStore -> IO ()

Similar to unpackStore' except that it will turn an entire MegaStore record into it's Original Image File Type(s) and save the result at a designated file save path

Utility Functions

append :: (Text, ByteString) -> MegaStore -> MegaStore

Key can be Str here which will be hashed, either way it will end up as a (String, BS.ByteString)

search :: String -> [(Text, ByteString)] -> Maybe ByteString

This takes a key and returns a strict bytestring if the key is valid, Nothing is returned otherwise

keyExists :: String -> [(Text, ByteString)] -> Bool

all the side effects of search come with this function

remove :: String -> MegaStore -> MegaStore

Search the entire store for a key and delete it's associated entry

remove' :: Int -> MegaStore -> MegaStore

Remove an entry by literal index in the MegaStore

megastoreToMap :: MegaStore -> Map Text ByteString

Convenience Function for easy conversion to a Data.Map

mapToMegaStore :: Map Text ByteString -> MegaStore

Convenience Function for easy conversion from a Data.Map