Yggdrasil

Documentation

data YggdrasilEngine

Constructors

SQLite

PostgreSQL

MySQL

Instances

Generic YggdrasilEngine

Defined in Yggdrasil

Associated Types

type Rep YggdrasilEngine :: Type -> Type

Methods

from :: YggdrasilEngine -> Rep YggdrasilEngine x

to :: Rep YggdrasilEngine x -> YggdrasilEngine

Show YggdrasilEngine

Defined in Yggdrasil

Methods

showsPrec :: Int -> YggdrasilEngine -> ShowS

show :: YggdrasilEngine -> String

showList :: [YggdrasilEngine] -> ShowS

Eq YggdrasilEngine

Defined in Yggdrasil

Methods

(==) :: YggdrasilEngine -> YggdrasilEngine -> Bool

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

type Rep YggdrasilEngine

Defined in Yggdrasil

type Rep YggdrasilEngine = D1 ('MetaData "YggdrasilEngine" "Yggdrasil" "yggdrasil-schema-1.0.0.5-9vOeiteFiEZAt0hnKym7Vn" 'False) (C1 ('MetaCons "SQLite" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "PostgreSQL" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "MySQL" 'PrefixI 'False) (U1 :: Type -> Type)))

data Yggdrasil

Constructors

Yggdrasil

Fields

• databaseFilePath :: Text
• migrationsDirectoryPath :: Text
• runMigrations :: Bool
• engine :: YggdrasilEngine

Instances

Generic Yggdrasil

Defined in Yggdrasil

Associated Types

type Rep Yggdrasil :: Type -> Type

Methods

from :: Yggdrasil -> Rep Yggdrasil x

to :: Rep Yggdrasil x -> Yggdrasil

Show Yggdrasil

Defined in Yggdrasil

Methods

showsPrec :: Int -> Yggdrasil -> ShowS

show :: Yggdrasil -> String

showList :: [Yggdrasil] -> ShowS

Eq Yggdrasil

Defined in Yggdrasil

Methods

(==) :: Yggdrasil -> Yggdrasil -> Bool

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

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "databaseFilePath" k Yggdrasil Yggdrasil a b

Defined in Yggdrasil

Methods

labelOptic :: Optic k NoIx Yggdrasil Yggdrasil a b

(k ~ A_Lens, a ~ YggdrasilEngine, b ~ YggdrasilEngine) => LabelOptic "engine" k Yggdrasil Yggdrasil a b

Defined in Yggdrasil

Methods

labelOptic :: Optic k NoIx Yggdrasil Yggdrasil a b

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "migrationsDirectoryPath" k Yggdrasil Yggdrasil a b

Defined in Yggdrasil

Methods

labelOptic :: Optic k NoIx Yggdrasil Yggdrasil a b

(k ~ A_Lens, a ~ Bool, b ~ Bool) => LabelOptic "runMigrations" k Yggdrasil Yggdrasil a b

Defined in Yggdrasil

Methods

labelOptic :: Optic k NoIx Yggdrasil Yggdrasil a b

type Rep Yggdrasil

Defined in Yggdrasil

type Rep Yggdrasil = D1 ('MetaData "Yggdrasil" "Yggdrasil" "yggdrasil-schema-1.0.0.5-9vOeiteFiEZAt0hnKym7Vn" 'False) (C1 ('MetaCons "Yggdrasil" 'PrefixI 'True) ((S1 ('MetaSel ('Just "databaseFilePath") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "migrationsDirectoryPath") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "runMigrations") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: S1 ('MetaSel ('Just "engine") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 YggdrasilEngine))))

data RanMigration

Constructors

RanMigration Text Int Text UTCTime

Instances

Generic RanMigration

Defined in Yggdrasil

Associated Types

type Rep RanMigration :: Type -> Type

Methods

from :: RanMigration -> Rep RanMigration x

to :: Rep RanMigration x -> RanMigration

Show RanMigration

Defined in Yggdrasil

Methods

showsPrec :: Int -> RanMigration -> ShowS

show :: RanMigration -> String

showList :: [RanMigration] -> ShowS

Eq RanMigration

Defined in Yggdrasil

Methods

(==) :: RanMigration -> RanMigration -> Bool

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

FromRow RanMigration

Defined in Yggdrasil

Methods

fromRow :: RowParser RanMigration

type Rep RanMigration

Defined in Yggdrasil

type Rep RanMigration = D1 ('MetaData "RanMigration" "Yggdrasil" "yggdrasil-schema-1.0.0.5-9vOeiteFiEZAt0hnKym7Vn" 'False) (C1 ('MetaCons "RanMigration" 'PrefixI 'False) ((S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)) :*: (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 UTCTime))))

defaultYggdrasil :: Yggdrasil

runYggdrasil :: MonadIO m => Yggdrasil -> m ()

getSortedMigrationFiles :: MonadIO m => Yggdrasil -> m [(Int, Text)]

toIntOrder :: (Text, Text) -> (Maybe Int, Text)

explodeMigrationPath :: Text -> Maybe (Text, Text)

liftTupleMaybeFromFst :: (Maybe a, b) -> Maybe (a, b)

parseTextToSqlStatements :: Text -> [Text]

runMigration :: MonadIO m => Yggdrasil -> (Int, Text) -> m ()

getRanMigrations :: MonadIO m => Yggdrasil -> m [(Int, Text)]