Initial commit
This commit is contained in:
commit
bd4fe8fc62
21
.envrc
Normal file
21
.envrc
Normal file
@ -0,0 +1,21 @@
|
||||
if ! has nix_direnv_version || ! nix_direnv_version 2.3.0; then
|
||||
source_url "https://raw.githubusercontent.com/nix-community/nix-direnv/2.3.0/direnvrc" "sha256-Dmd+j63L84wuzgyjITIfSxSD57Tx7v51DMxVZOsiUD8="
|
||||
fi
|
||||
|
||||
use flake . --impure --accept-flake-config
|
||||
|
||||
# Include .env file if it exists locally. Use the .env file to load env vars that you don't want to commit to git
|
||||
if [ -f .env ]
|
||||
then
|
||||
set -o allexport
|
||||
source .env
|
||||
set +o allexport
|
||||
fi
|
||||
# Add your env vars here
|
||||
#
|
||||
# E.g. export AWS_ACCESS_KEY_ID="XXXXX"
|
||||
|
||||
# SMTP config for local development.
|
||||
export SMTP_HOST="127.0.0.1" # On some computers may need `127.0.1.1` instead.
|
||||
export SMTP_PORT="1025"
|
||||
export SMTP_ENCRYPTION="Unencrypted"
|
4
.ghci
Normal file
4
.ghci
Normal file
@ -0,0 +1,4 @@
|
||||
:set -XNoImplicitPrelude
|
||||
:def loadFromIHP \file -> (System.Environment.getEnv "IHP_LIB") >>= (\ihpLib -> readFile (ihpLib <> "/" <> file))
|
||||
:loadFromIHP applicationGhciConfig
|
||||
import IHP.Prelude
|
3
.gitattributes
vendored
Normal file
3
.gitattributes
vendored
Normal file
@ -0,0 +1,3 @@
|
||||
* text=auto eol=lf
|
||||
*.sql text
|
||||
*.hs text
|
28
.gitignore
vendored
Normal file
28
.gitignore
vendored
Normal file
@ -0,0 +1,28 @@
|
||||
.DS_Store
|
||||
.idea
|
||||
.env
|
||||
tmp
|
||||
result
|
||||
node_modules
|
||||
bin
|
||||
*.iml
|
||||
Generated
|
||||
dist
|
||||
dist-newstyle
|
||||
*.dyn_hi
|
||||
*.dyn_o
|
||||
*.hi
|
||||
*.o
|
||||
build
|
||||
gen
|
||||
del
|
||||
static/prod.*
|
||||
Config/client_session_key.aes
|
||||
|
||||
# Ignore locally checked out IHP version
|
||||
IHP
|
||||
|
||||
# devenv.sh
|
||||
.devenv*
|
||||
devenv.local.nix
|
||||
.direnv
|
415
.stylish-haskell.yaml
Normal file
415
.stylish-haskell.yaml
Normal file
@ -0,0 +1,415 @@
|
||||
# stylish-haskell configuration file
|
||||
# ==================================
|
||||
|
||||
# The stylish-haskell tool is mainly configured by specifying steps. These steps
|
||||
# are a list, so they have an order, and one specific step may appear more than
|
||||
# once (if needed). Each file is processed by these steps in the given order.
|
||||
steps:
|
||||
# Convert some ASCII sequences to their Unicode equivalents. This is disabled
|
||||
# by default.
|
||||
# - unicode_syntax:
|
||||
# # In order to make this work, we also need to insert the UnicodeSyntax
|
||||
# # language pragma. If this flag is set to true, we insert it when it's
|
||||
# # not already present. You may want to disable it if you configure
|
||||
# # language extensions using some other method than pragmas. Default:
|
||||
# # true.
|
||||
# add_language_pragma: true
|
||||
|
||||
# Format module header
|
||||
#
|
||||
# Currently, this option is not configurable and will format all exports and
|
||||
# module declarations to minimize diffs
|
||||
#
|
||||
# - module_header:
|
||||
# # How many spaces use for indentation in the module header.
|
||||
# indent: 4
|
||||
#
|
||||
# # Should export lists be sorted? Sorting is only performed within the
|
||||
# # export section, as delineated by Haddock comments.
|
||||
# sort: true
|
||||
#
|
||||
# # See `separate_lists` for the `imports` step.
|
||||
# separate_lists: true
|
||||
#
|
||||
# # When to break the "where".
|
||||
# # Possible values:
|
||||
# # - exports: only break when there is an explicit export list.
|
||||
# # - single: only break when the export list counts more than one export.
|
||||
# # - inline: only break when the export list is too long. This is
|
||||
# # determined by the `columns` setting. Not applicable when the export
|
||||
# # list contains comments as newlines will be required.
|
||||
# # - always: always break before the "where".
|
||||
# break_where: exports
|
||||
#
|
||||
# # Where to put open bracket
|
||||
# # Possible values:
|
||||
# # - same_line: put open bracket on the same line as the module name, before the
|
||||
# # comment of the module
|
||||
# # - next_line: put open bracket on the next line, after module comment
|
||||
# open_bracket: next_line
|
||||
|
||||
# Format record definitions. This is disabled by default.
|
||||
#
|
||||
# You can control the layout of record fields. The only rules that can't be configured
|
||||
# are these:
|
||||
#
|
||||
# - "|" is always aligned with "="
|
||||
# - "," in fields is always aligned with "{"
|
||||
# - "}" is likewise always aligned with "{"
|
||||
#
|
||||
# - records:
|
||||
# # How to format equals sign between type constructor and data constructor.
|
||||
# # Possible values:
|
||||
# # - "same_line" -- leave "=" AND data constructor on the same line as the type constructor.
|
||||
# # - "indent N" -- insert a new line and N spaces from the beginning of the next line.
|
||||
# equals: "indent 2"
|
||||
#
|
||||
# # How to format first field of each record constructor.
|
||||
# # Possible values:
|
||||
# # - "same_line" -- "{" and first field goes on the same line as the data constructor.
|
||||
# # - "indent N" -- insert a new line and N spaces from the beginning of the data constructor
|
||||
# first_field: "indent 2"
|
||||
#
|
||||
# # How many spaces to insert between the column with "," and the beginning of the comment in the next line.
|
||||
# field_comment: 2
|
||||
#
|
||||
# # How many spaces to insert before "deriving" clause. Deriving clauses are always on separate lines.
|
||||
# deriving: 2
|
||||
#
|
||||
# # How many spaces to insert before "via" clause counted from indentation of deriving clause
|
||||
# # Possible values:
|
||||
# # - "same_line" -- "via" part goes on the same line as "deriving" keyword.
|
||||
# # - "indent N" -- insert a new line and N spaces from the beginning of "deriving" keyword.
|
||||
# via: "indent 2"
|
||||
#
|
||||
# # Sort typeclass names in the "deriving" list alphabetically.
|
||||
# sort_deriving: true
|
||||
#
|
||||
# # Whether or not to break enums onto several lines
|
||||
# #
|
||||
# # Default: false
|
||||
# break_enums: false
|
||||
#
|
||||
# # Whether or not to break single constructor data types before `=` sign
|
||||
# #
|
||||
# # Default: true
|
||||
# break_single_constructors: true
|
||||
#
|
||||
# # Whether or not to curry constraints on function.
|
||||
# #
|
||||
# # E.g: @allValues :: Enum a => Bounded a => Proxy a -> [a]@
|
||||
# #
|
||||
# # Instead of @allValues :: (Enum a, Bounded a) => Proxy a -> [a]@
|
||||
# #
|
||||
# # Default: false
|
||||
# curried_context: false
|
||||
|
||||
# Align the right hand side of some elements. This is quite conservative
|
||||
# and only applies to statements where each element occupies a single
|
||||
# line.
|
||||
# Possible values:
|
||||
# - always - Always align statements.
|
||||
# - adjacent - Align statements that are on adjacent lines in groups.
|
||||
# - never - Never align statements.
|
||||
# All default to always.
|
||||
- simple_align:
|
||||
cases: always
|
||||
top_level_patterns: always
|
||||
records: always
|
||||
multi_way_if: always
|
||||
|
||||
# Import cleanup
|
||||
- imports:
|
||||
# There are different ways we can align names and lists.
|
||||
#
|
||||
# - global: Align the import names and import list throughout the entire
|
||||
# file.
|
||||
#
|
||||
# - file: Like global, but don't add padding when there are no qualified
|
||||
# imports in the file.
|
||||
#
|
||||
# - group: Only align the imports per group (a group is formed by adjacent
|
||||
# import lines).
|
||||
#
|
||||
# - none: Do not perform any alignment.
|
||||
#
|
||||
# Default: global.
|
||||
align: none
|
||||
|
||||
# The following options affect only import list alignment.
|
||||
#
|
||||
# List align has following options:
|
||||
#
|
||||
# - after_alias: Import list is aligned with end of import including
|
||||
# 'as' and 'hiding' keywords.
|
||||
#
|
||||
# > import qualified Data.List as List (concat, foldl, foldr, head,
|
||||
# > init, last, length)
|
||||
#
|
||||
# - with_alias: Import list is aligned with start of alias or hiding.
|
||||
#
|
||||
# > import qualified Data.List as List (concat, foldl, foldr, head,
|
||||
# > init, last, length)
|
||||
#
|
||||
# - with_module_name: Import list is aligned `list_padding` spaces after
|
||||
# the module name.
|
||||
#
|
||||
# > import qualified Data.List as List (concat, foldl, foldr, head,
|
||||
# init, last, length)
|
||||
#
|
||||
# This is mainly intended for use with `pad_module_names: false`.
|
||||
#
|
||||
# > import qualified Data.List as List (concat, foldl, foldr, head,
|
||||
# init, last, length, scanl, scanr, take, drop,
|
||||
# sort, nub)
|
||||
#
|
||||
# - new_line: Import list starts always on new line.
|
||||
#
|
||||
# > import qualified Data.List as List
|
||||
# > (concat, foldl, foldr, head, init, last, length)
|
||||
#
|
||||
# - repeat: Repeat the module name to align the import list.
|
||||
#
|
||||
# > import qualified Data.List as List (concat, foldl, foldr, head)
|
||||
# > import qualified Data.List as List (init, last, length)
|
||||
#
|
||||
# Default: after_alias
|
||||
list_align: after_alias
|
||||
|
||||
# Right-pad the module names to align imports in a group:
|
||||
#
|
||||
# - true: a little more readable
|
||||
#
|
||||
# > import qualified Data.List as List (concat, foldl, foldr,
|
||||
# > init, last, length)
|
||||
# > import qualified Data.List.Extra as List (concat, foldl, foldr,
|
||||
# > init, last, length)
|
||||
#
|
||||
# - false: diff-safe
|
||||
#
|
||||
# > import qualified Data.List as List (concat, foldl, foldr, init,
|
||||
# > last, length)
|
||||
# > import qualified Data.List.Extra as List (concat, foldl, foldr,
|
||||
# > init, last, length)
|
||||
#
|
||||
# Default: true
|
||||
pad_module_names: true
|
||||
|
||||
# Long list align style takes effect when import is too long. This is
|
||||
# determined by 'columns' setting.
|
||||
#
|
||||
# - inline: This option will put as much specs on same line as possible.
|
||||
#
|
||||
# - new_line: Import list will start on new line.
|
||||
#
|
||||
# - new_line_multiline: Import list will start on new line when it's
|
||||
# short enough to fit to single line. Otherwise it'll be multiline.
|
||||
#
|
||||
# - multiline: One line per import list entry.
|
||||
# Type with constructor list acts like single import.
|
||||
#
|
||||
# > import qualified Data.Map as M
|
||||
# > ( empty
|
||||
# > , singleton
|
||||
# > , ...
|
||||
# > , delete
|
||||
# > )
|
||||
#
|
||||
# Default: inline
|
||||
long_list_align: inline
|
||||
|
||||
# Align empty list (importing instances)
|
||||
#
|
||||
# Empty list align has following options
|
||||
#
|
||||
# - inherit: inherit list_align setting
|
||||
#
|
||||
# - right_after: () is right after the module name:
|
||||
#
|
||||
# > import Vector.Instances ()
|
||||
#
|
||||
# Default: inherit
|
||||
empty_list_align: inherit
|
||||
|
||||
# List padding determines indentation of import list on lines after import.
|
||||
# This option affects 'long_list_align'.
|
||||
#
|
||||
# - <integer>: constant value
|
||||
#
|
||||
# - module_name: align under start of module name.
|
||||
# Useful for 'file' and 'group' align settings.
|
||||
#
|
||||
# Default: 4
|
||||
list_padding: 4
|
||||
|
||||
# Separate lists option affects formatting of import list for type
|
||||
# or class. The only difference is single space between type and list
|
||||
# of constructors, selectors and class functions.
|
||||
#
|
||||
# - true: There is single space between Foldable type and list of it's
|
||||
# functions.
|
||||
#
|
||||
# > import Data.Foldable (Foldable (fold, foldl, foldMap))
|
||||
#
|
||||
# - false: There is no space between Foldable type and list of it's
|
||||
# functions.
|
||||
#
|
||||
# > import Data.Foldable (Foldable(fold, foldl, foldMap))
|
||||
#
|
||||
# Default: true
|
||||
separate_lists: true
|
||||
|
||||
# Space surround option affects formatting of import lists on a single
|
||||
# line. The only difference is single space after the initial
|
||||
# parenthesis and a single space before the terminal parenthesis.
|
||||
#
|
||||
# - true: There is single space associated with the enclosing
|
||||
# parenthesis.
|
||||
#
|
||||
# > import Data.Foo ( foo )
|
||||
#
|
||||
# - false: There is no space associated with the enclosing parenthesis
|
||||
#
|
||||
# > import Data.Foo (foo)
|
||||
#
|
||||
# Default: false
|
||||
space_surround: false
|
||||
|
||||
# Post qualify option moves any qualifies found in import declarations
|
||||
# to the end of the declaration. This also adjust padding for any
|
||||
# unqualified import declarations.
|
||||
#
|
||||
# - true: Qualified as <module name> is moved to the end of the
|
||||
# declaration.
|
||||
#
|
||||
# > import Data.Bar
|
||||
# > import Data.Foo qualified as F
|
||||
#
|
||||
# - false: Qualified remains in the default location and unqualified
|
||||
# imports are padded to align with qualified imports.
|
||||
#
|
||||
# > import Data.Bar
|
||||
# > import qualified Data.Foo as F
|
||||
#
|
||||
# Default: false
|
||||
post_qualify: false
|
||||
|
||||
# Language pragmas
|
||||
- language_pragmas:
|
||||
# We can generate different styles of language pragma lists.
|
||||
#
|
||||
# - vertical: Vertical-spaced language pragmas, one per line.
|
||||
#
|
||||
# - compact: A more compact style.
|
||||
#
|
||||
# - compact_line: Similar to compact, but wrap each line with
|
||||
# `{-# LANGUAGE #-}'.
|
||||
#
|
||||
# - vertical_compact: Similar to vertical, but use only one language pragma.
|
||||
#
|
||||
# Default: vertical.
|
||||
style: vertical
|
||||
|
||||
# Align affects alignment of closing pragma brackets.
|
||||
#
|
||||
# - true: Brackets are aligned in same column.
|
||||
#
|
||||
# - false: Brackets are not aligned together. There is only one space
|
||||
# between actual import and closing bracket.
|
||||
#
|
||||
# Default: true
|
||||
align: true
|
||||
|
||||
# stylish-haskell can detect redundancy of some language pragmas. If this
|
||||
# is set to true, it will remove those redundant pragmas. Default: true.
|
||||
remove_redundant: true
|
||||
|
||||
# Language prefix to be used for pragma declaration, this allows you to
|
||||
# use other options non case-sensitive like "language" or "Language".
|
||||
# If a non correct String is provided, it will default to: LANGUAGE.
|
||||
language_prefix: LANGUAGE
|
||||
|
||||
# Replace tabs by spaces. This is disabled by default.
|
||||
# - tabs:
|
||||
# # Number of spaces to use for each tab. Default: 8, as specified by the
|
||||
# # Haskell report.
|
||||
# spaces: 8
|
||||
|
||||
# Remove trailing whitespace
|
||||
- trailing_whitespace: {}
|
||||
|
||||
# Squash multiple spaces between the left and right hand sides of some
|
||||
# elements into single spaces. Basically, this undoes the effect of
|
||||
# simple_align but is a bit less conservative.
|
||||
# - squash: {}
|
||||
|
||||
# A common setting is the number of columns (parts of) code will be wrapped
|
||||
# to. Different steps take this into account.
|
||||
#
|
||||
# Set this to null to disable all line wrapping.
|
||||
#
|
||||
# Default: 80.
|
||||
columns: 80
|
||||
|
||||
# By default, line endings are converted according to the OS. You can override
|
||||
# preferred format here.
|
||||
#
|
||||
# - native: Native newline format. CRLF on Windows, LF on other OSes.
|
||||
#
|
||||
# - lf: Convert to LF ("\n").
|
||||
#
|
||||
# - crlf: Convert to CRLF ("\r\n").
|
||||
#
|
||||
# Default: native.
|
||||
newline: native
|
||||
|
||||
# Sometimes, language extensions are specified in a cabal file or from the
|
||||
# command line instead of using language pragmas in the file. stylish-haskell
|
||||
# needs to be aware of these, so it can parse the file correctly.
|
||||
#
|
||||
# No language extensions are enabled by default.
|
||||
language_extensions:
|
||||
- BangPatterns
|
||||
- BlockArguments
|
||||
- BlockArguments
|
||||
- DataKinds
|
||||
- DefaultSignatures
|
||||
- DeriveDataTypeable
|
||||
- DeriveGeneric
|
||||
- DerivingVia
|
||||
- DisambiguateRecordFields
|
||||
- DuplicateRecordFields
|
||||
- EmptyDataDeriving
|
||||
- FlexibleContexts
|
||||
- FlexibleInstances
|
||||
- FunctionalDependencies
|
||||
- ImplicitParams
|
||||
- InstanceSigs
|
||||
- LambdaCase
|
||||
- MultiParamTypeClasses
|
||||
- MultiWayIf
|
||||
- MultiWayIf
|
||||
- NamedFieldPuns
|
||||
- NoImplicitPrelude
|
||||
- OverloadedLabels
|
||||
- OverloadedStrings
|
||||
- PackageImports
|
||||
- PartialTypeSignatures
|
||||
- PartialTypeSignatures
|
||||
- QuasiQuotes
|
||||
- Rank2Types
|
||||
- RecordWildCards
|
||||
- ScopedTypeVariables
|
||||
- StandaloneDeriving
|
||||
- TemplateHaskell
|
||||
- TypeApplications
|
||||
- TypeFamilies
|
||||
- TypeOperators
|
||||
- TypeSynonymInstances
|
||||
- UndecidableInstances
|
||||
|
||||
# Attempt to find the cabal file in ancestors of the current directory, and
|
||||
# parse options (currently only language extensions) from that.
|
||||
#
|
||||
# Default: true
|
||||
cabal: true
|
71
App.cabal
Normal file
71
App.cabal
Normal file
@ -0,0 +1,71 @@
|
||||
-- This file is only a stub file, please see default.nix for adding dependencies.
|
||||
--
|
||||
-- Learn more about dependency management in IHP: https://ihp.digitallyinduced.com/Guide/package-management.html
|
||||
--
|
||||
-- If you're looking at this file because you're trying to integrate a HLS or other tooling with your IHP project, check out the documentation on Editors and Tooling: https://ihp.digitallyinduced.com/Guide/editors.html
|
||||
--
|
||||
-- This cabal file is inside your project as some haskell tools only work when there's a cabal file. It's not actually used for anything besides providing support for haskell tools.
|
||||
--
|
||||
|
||||
name: App
|
||||
version: 0.1.0.0
|
||||
-- synopsis:
|
||||
-- description:
|
||||
license: AllRightsReserved
|
||||
license-file: LICENSE
|
||||
author: Developers
|
||||
maintainer: developers@example.com
|
||||
-- copyright:
|
||||
-- category:
|
||||
build-type: Simple
|
||||
cabal-version: >=1.10
|
||||
|
||||
executable App
|
||||
main-is: Main.hs
|
||||
-- other-modules:
|
||||
-- other-extensions:
|
||||
build-depends:
|
||||
ihp,
|
||||
base,
|
||||
wai,
|
||||
text
|
||||
hs-source-dirs: .
|
||||
default-language: Haskell2010
|
||||
extensions:
|
||||
OverloadedStrings
|
||||
, NoImplicitPrelude
|
||||
, ImplicitParams
|
||||
, Rank2Types
|
||||
, DisambiguateRecordFields
|
||||
, NamedFieldPuns
|
||||
, DuplicateRecordFields
|
||||
, OverloadedLabels
|
||||
, FlexibleContexts
|
||||
, TypeSynonymInstances
|
||||
, FlexibleInstances
|
||||
, QuasiQuotes
|
||||
, TypeFamilies
|
||||
, PackageImports
|
||||
, ScopedTypeVariables
|
||||
, RecordWildCards
|
||||
, TypeApplications
|
||||
, DataKinds
|
||||
, InstanceSigs
|
||||
, DeriveGeneric
|
||||
, MultiParamTypeClasses
|
||||
, TypeOperators
|
||||
, DeriveDataTypeable
|
||||
, MultiWayIf
|
||||
, UndecidableInstances
|
||||
, BlockArguments
|
||||
, PartialTypeSignatures
|
||||
, LambdaCase
|
||||
, DefaultSignatures
|
||||
, EmptyDataDeriving
|
||||
, BangPatterns
|
||||
, BlockArguments
|
||||
, MultiWayIf
|
||||
, FunctionalDependencies
|
||||
, PartialTypeSignatures
|
||||
, StandaloneDeriving
|
||||
, DerivingVia
|
0
Application/Fixtures.sql
Normal file
0
Application/Fixtures.sql
Normal file
5
Application/Helper/Controller.hs
Normal file
5
Application/Helper/Controller.hs
Normal file
@ -0,0 +1,5 @@
|
||||
module Application.Helper.Controller where
|
||||
|
||||
import IHP.ControllerPrelude
|
||||
|
||||
-- Here you can add functions which are available in all your controllers
|
5
Application/Helper/View.hs
Normal file
5
Application/Helper/View.hs
Normal file
@ -0,0 +1,5 @@
|
||||
module Application.Helper.View where
|
||||
|
||||
import IHP.ViewPrelude
|
||||
|
||||
-- Here you can add functions which are available in all your views
|
1
Application/Schema.sql
Normal file
1
Application/Schema.sql
Normal file
@ -0,0 +1 @@
|
||||
-- Your database schema. Use the Schema Designer at http://localhost:8001/ to add some tables.
|
12
Application/Script/Prelude.hs
Normal file
12
Application/Script/Prelude.hs
Normal file
@ -0,0 +1,12 @@
|
||||
module Application.Script.Prelude
|
||||
( module IHP.ControllerPrelude
|
||||
, module Generated.Types
|
||||
, module IHP.Prelude
|
||||
, module IHP.ScriptSupport
|
||||
)
|
||||
where
|
||||
|
||||
import IHP.Prelude
|
||||
import IHP.ControllerPrelude
|
||||
import Generated.Types
|
||||
import IHP.ScriptSupport
|
11
Config/Config.hs
Normal file
11
Config/Config.hs
Normal file
@ -0,0 +1,11 @@
|
||||
module Config where
|
||||
|
||||
import IHP.Prelude
|
||||
import IHP.Environment
|
||||
import IHP.FrameworkConfig
|
||||
|
||||
config :: ConfigBuilder
|
||||
config = do
|
||||
-- See https://ihp.digitallyinduced.com/Guide/config.html
|
||||
-- for what you can do here
|
||||
pure ()
|
0
Config/nix/haskell-packages/.keep
Normal file
0
Config/nix/haskell-packages/.keep
Normal file
7
Config/nix/nixpkgs-config.nix
Normal file
7
Config/nix/nixpkgs-config.nix
Normal file
@ -0,0 +1,7 @@
|
||||
# See https://ihp.digitallyinduced.com/Guide/package-management.html
|
||||
{ ihp, additionalNixpkgsOptions, ... }:
|
||||
import "${toString ihp}/NixSupport/make-nixpkgs-from-options.nix" {
|
||||
ihp = ihp;
|
||||
haskellPackagesDir = ./haskell-packages/.;
|
||||
additionalNixpkgsOptions = additionalNixpkgsOptions;
|
||||
}
|
21
Main.hs
Normal file
21
Main.hs
Normal file
@ -0,0 +1,21 @@
|
||||
module Main where
|
||||
import IHP.Prelude
|
||||
|
||||
import Config
|
||||
import qualified IHP.Server
|
||||
import IHP.RouterSupport
|
||||
import IHP.FrameworkConfig
|
||||
import IHP.Job.Types
|
||||
import Web.FrontController
|
||||
import Web.Types
|
||||
|
||||
instance FrontController RootApplication where
|
||||
controllers = [
|
||||
mountFrontController WebApplication
|
||||
]
|
||||
|
||||
instance Worker RootApplication where
|
||||
workers _ = []
|
||||
|
||||
main :: IO ()
|
||||
main = IHP.Server.run config
|
17
Makefile
Normal file
17
Makefile
Normal file
@ -0,0 +1,17 @@
|
||||
CSS_FILES += ${IHP}/static/vendor/bootstrap.min.css
|
||||
CSS_FILES += ${IHP}/static/vendor/flatpickr.min.css
|
||||
CSS_FILES += static/app.css
|
||||
|
||||
JS_FILES += ${IHP}/static/vendor/jquery-3.6.0.slim.min.js
|
||||
JS_FILES += ${IHP}/static/vendor/timeago.js
|
||||
JS_FILES += ${IHP}/static/vendor/popper.min.js
|
||||
JS_FILES += ${IHP}/static/vendor/bootstrap.min.js
|
||||
JS_FILES += ${IHP}/static/vendor/flatpickr.js
|
||||
JS_FILES += ${IHP}/static/helpers.js
|
||||
JS_FILES += ${IHP}/static/vendor/morphdom-umd.min.js
|
||||
JS_FILES += ${IHP}/static/vendor/turbolinks.js
|
||||
JS_FILES += ${IHP}/static/vendor/turbolinksInstantClick.js
|
||||
JS_FILES += ${IHP}/static/vendor/turbolinksMorphdom.js
|
||||
|
||||
include ${IHP}/Makefile.dist
|
||||
|
13
Web/Controller/Prelude.hs
Normal file
13
Web/Controller/Prelude.hs
Normal file
@ -0,0 +1,13 @@
|
||||
module Web.Controller.Prelude
|
||||
( module Web.Types
|
||||
, module Application.Helper.Controller
|
||||
, module IHP.ControllerPrelude
|
||||
, module Generated.Types
|
||||
)
|
||||
where
|
||||
|
||||
import Web.Types
|
||||
import Application.Helper.Controller
|
||||
import IHP.ControllerPrelude
|
||||
import Generated.Types
|
||||
import Web.Routes
|
6
Web/Controller/Static.hs
Normal file
6
Web/Controller/Static.hs
Normal file
@ -0,0 +1,6 @@
|
||||
module Web.Controller.Static where
|
||||
import Web.Controller.Prelude
|
||||
import Web.View.Static.Welcome
|
||||
|
||||
instance Controller StaticController where
|
||||
action WelcomeAction = render WelcomeView
|
19
Web/FrontController.hs
Normal file
19
Web/FrontController.hs
Normal file
@ -0,0 +1,19 @@
|
||||
module Web.FrontController where
|
||||
|
||||
import IHP.RouterPrelude
|
||||
import Web.Controller.Prelude
|
||||
import Web.View.Layout (defaultLayout)
|
||||
|
||||
-- Controller Imports
|
||||
import Web.Controller.Static
|
||||
|
||||
instance FrontController WebApplication where
|
||||
controllers =
|
||||
[ startPage WelcomeAction
|
||||
-- Generator Marker
|
||||
]
|
||||
|
||||
instance InitControllerContext WebApplication where
|
||||
initContext = do
|
||||
setLayout defaultLayout
|
||||
initAutoRefresh
|
7
Web/Routes.hs
Normal file
7
Web/Routes.hs
Normal file
@ -0,0 +1,7 @@
|
||||
module Web.Routes where
|
||||
import IHP.RouterPrelude
|
||||
import Generated.Types
|
||||
import Web.Types
|
||||
|
||||
-- Generator Marker
|
||||
instance AutoRoute StaticController
|
10
Web/Types.hs
Normal file
10
Web/Types.hs
Normal file
@ -0,0 +1,10 @@
|
||||
module Web.Types where
|
||||
|
||||
import IHP.Prelude
|
||||
import IHP.ModelSupport
|
||||
import Generated.Types
|
||||
|
||||
data WebApplication = WebApplication deriving (Eq, Show)
|
||||
|
||||
|
||||
data StaticController = WelcomeAction deriving (Eq, Show, Data)
|
74
Web/View/Layout.hs
Normal file
74
Web/View/Layout.hs
Normal file
@ -0,0 +1,74 @@
|
||||
module Web.View.Layout (defaultLayout, Html) where
|
||||
|
||||
import IHP.ViewPrelude
|
||||
import IHP.Environment
|
||||
import Generated.Types
|
||||
import IHP.Controller.RequestContext
|
||||
import Web.Types
|
||||
import Web.Routes
|
||||
import Application.Helper.View
|
||||
|
||||
defaultLayout :: Html -> Html
|
||||
defaultLayout inner = [hsx|
|
||||
<!DOCTYPE html>
|
||||
<html lang="en">
|
||||
<head>
|
||||
{metaTags}
|
||||
|
||||
{stylesheets}
|
||||
{scripts}
|
||||
|
||||
<title>{pageTitleOrDefault "App"}</title>
|
||||
</head>
|
||||
<body>
|
||||
<div class="container mt-4">
|
||||
{renderFlashMessages}
|
||||
{inner}
|
||||
</div>
|
||||
</body>
|
||||
</html>
|
||||
|]
|
||||
|
||||
-- The 'assetPath' function used below appends a `?v=SOME_VERSION` to the static assets in production
|
||||
-- This is useful to avoid users having old CSS and JS files in their browser cache once a new version is deployed
|
||||
-- See https://ihp.digitallyinduced.com/Guide/assets.html for more details
|
||||
|
||||
stylesheets :: Html
|
||||
stylesheets = [hsx|
|
||||
<link rel="stylesheet" href={assetPath "/vendor/bootstrap-5.2.1/bootstrap.min.css"}/>
|
||||
<link rel="stylesheet" href={assetPath "/vendor/flatpickr.min.css"}/>
|
||||
<link rel="stylesheet" href={assetPath "/app.css"}/>
|
||||
|]
|
||||
|
||||
scripts :: Html
|
||||
scripts = [hsx|
|
||||
{when isDevelopment devScripts}
|
||||
<script src={assetPath "/vendor/jquery-3.6.0.slim.min.js"}></script>
|
||||
<script src={assetPath "/vendor/timeago.js"}></script>
|
||||
<script src={assetPath "/vendor/popper-2.11.6.min.js"}></script>
|
||||
<script src={assetPath "/vendor/bootstrap-5.2.1/bootstrap.min.js"}></script>
|
||||
<script src={assetPath "/vendor/flatpickr.js"}></script>
|
||||
<script src={assetPath "/vendor/morphdom-umd.min.js"}></script>
|
||||
<script src={assetPath "/vendor/turbolinks.js"}></script>
|
||||
<script src={assetPath "/vendor/turbolinksInstantClick.js"}></script>
|
||||
<script src={assetPath "/vendor/turbolinksMorphdom.js"}></script>
|
||||
<script src={assetPath "/helpers.js"}></script>
|
||||
<script src={assetPath "/ihp-auto-refresh.js"}></script>
|
||||
<script src={assetPath "/app.js"}></script>
|
||||
|]
|
||||
|
||||
devScripts :: Html
|
||||
devScripts = [hsx|
|
||||
<script id="livereload-script" src={assetPath "/livereload.js"} data-ws={liveReloadWebsocketUrl}></script>
|
||||
|]
|
||||
|
||||
metaTags :: Html
|
||||
metaTags = [hsx|
|
||||
<meta charset="utf-8"/>
|
||||
<meta name="viewport" content="width=device-width, initial-scale=1, shrink-to-fit=no"/>
|
||||
<meta property="og:title" content="App"/>
|
||||
<meta property="og:type" content="website"/>
|
||||
<meta property="og:url" content="TODO"/>
|
||||
<meta property="og:description" content="TODO"/>
|
||||
{autoRefreshMeta}
|
||||
|]
|
14
Web/View/Prelude.hs
Normal file
14
Web/View/Prelude.hs
Normal file
@ -0,0 +1,14 @@
|
||||
module Web.View.Prelude
|
||||
( module IHP.ViewPrelude
|
||||
, module Web.View.Layout
|
||||
, module Generated.Types
|
||||
, module Web.Types
|
||||
, module Application.Helper.View
|
||||
) where
|
||||
|
||||
import IHP.ViewPrelude
|
||||
import Web.View.Layout
|
||||
import Generated.Types
|
||||
import Web.Types
|
||||
import Web.Routes ()
|
||||
import Application.Helper.View
|
42
Web/View/Static/Welcome.hs
Normal file
42
Web/View/Static/Welcome.hs
Normal file
@ -0,0 +1,42 @@
|
||||
module Web.View.Static.Welcome where
|
||||
import Web.View.Prelude
|
||||
|
||||
data WelcomeView = WelcomeView
|
||||
|
||||
instance View WelcomeView where
|
||||
html WelcomeView = [hsx|
|
||||
<div style="background-color: #657b83; padding: 2rem; color:hsla(196, 13%, 96%, 1); border-radius: 4px">
|
||||
<div style="max-width: 800px; margin-left: auto; margin-right: auto">
|
||||
<h1 style="margin-bottom: 2rem; font-size: 2rem; font-weight: 300; border-bottom: 1px solid white; padding-bottom: 0.25rem; border-color: hsla(196, 13%, 60%, 1)">
|
||||
IHP
|
||||
</h1>
|
||||
|
||||
<h2 style="margin-top: 0; margin-bottom: 0rem; font-weight: 900; font-size: 3rem">
|
||||
It's working!
|
||||
</h2>
|
||||
|
||||
<p style="margin-top: 1rem; font-size: 1.75rem; font-weight: 600; color:hsla(196, 13%, 80%, 1)">
|
||||
Your new application is up and running.
|
||||
</p>
|
||||
|
||||
<p>
|
||||
<a
|
||||
href="https://ihp.digitallyinduced.com/Slack"
|
||||
style="margin-top: 2rem; background-color: #268bd2; padding: 1rem; border-radius: 3px; color: hsla(205, 69%, 98%, 1); text-decoration: none; font-weight: bold; display: inline-block; box-shadow: 0 4px 6px hsla(205, 69%, 0%, 0.08); transition: box-shadow 0.2s; transition: transform 0.2s;"
|
||||
target="_blank"
|
||||
>Join our community on Slack!</a>
|
||||
</p>
|
||||
|
||||
<a href="https://ihp.digitallyinduced.com/Guide/your-first-project.html" style="margin-top: 2rem; background-color: #268bd2; padding: 1rem; border-radius: 3px; color: hsla(205, 69%, 98%, 1); text-decoration: none; font-weight: bold; display: inline-block; box-shadow: 0 4px 6px hsla(205, 69%, 0%, 0.08); transition: box-shadow 0.2s; transition: transform 0.2s;" target="_blank">
|
||||
Learn the Next Steps in the Documentation
|
||||
</a>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div style="max-width: 800px; margin-left: auto; margin-right: auto; margin-top: 4rem">
|
||||
<img src="/ihp-welcome-icon.svg" alt="/ihp-welcome-icon" style="width:100%;">
|
||||
<p style="color: hsla(196, 13%, 50%, 1); margin-top: 4rem">
|
||||
You can modify this start page by making changes to "./Web/View/Static/Welcome.hs".
|
||||
</p>
|
||||
</div>
|
||||
|]
|
9
default.nix
Normal file
9
default.nix
Normal file
@ -0,0 +1,9 @@
|
||||
# For backwards compatibility using flake.nix
|
||||
(import
|
||||
(
|
||||
fetchTarball {
|
||||
url = "https://github.com/edolstra/flake-compat/archive/35bb57c0c8d8b62bbfd284272c928ceb64ddbde9.tar.gz";
|
||||
sha256 = "sha256:1prd9b1xx8c0sfwnyzkspplh30m613j42l1k789s521f4kv4c2z2";
|
||||
}
|
||||
)
|
||||
{ src = ./.; }).defaultNix
|
672
flake.lock
Normal file
672
flake.lock
Normal file
@ -0,0 +1,672 @@
|
||||
{
|
||||
"nodes": {
|
||||
"devenv": {
|
||||
"inputs": {
|
||||
"flake-compat": "flake-compat",
|
||||
"nix": "nix",
|
||||
"nixpkgs": [
|
||||
"ihp",
|
||||
"nixpkgs"
|
||||
],
|
||||
"pre-commit-hooks": "pre-commit-hooks"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1694422554,
|
||||
"narHash": "sha256-s5NTPzT66yIMmau+ZGP7q9z4NjgceDETL4xZ6HJ/TBg=",
|
||||
"owner": "cachix",
|
||||
"repo": "devenv",
|
||||
"rev": "63d20fe09aa09060ea9ec9bb6d582c025402ba15",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "cachix",
|
||||
"repo": "devenv",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"devenv_2": {
|
||||
"inputs": {
|
||||
"flake-compat": "flake-compat_2",
|
||||
"nix": "nix_2",
|
||||
"nixpkgs": [
|
||||
"ihp",
|
||||
"ihp-boilerplate",
|
||||
"ihp",
|
||||
"nixpkgs"
|
||||
],
|
||||
"pre-commit-hooks": "pre-commit-hooks_2"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1686054274,
|
||||
"narHash": "sha256-93aebyN7EMmeFFXisFIvp28UEbrozu79vd3pKPjvNR0=",
|
||||
"owner": "cachix",
|
||||
"repo": "devenv",
|
||||
"rev": "c51a56bac8853c019241fe8d821c0a0d82422835",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "cachix",
|
||||
"repo": "devenv",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"flake-compat": {
|
||||
"flake": false,
|
||||
"locked": {
|
||||
"lastModified": 1673956053,
|
||||
"narHash": "sha256-4gtG9iQuiKITOjNQQeQIpoIB6b16fm+504Ch3sNKLd8=",
|
||||
"owner": "edolstra",
|
||||
"repo": "flake-compat",
|
||||
"rev": "35bb57c0c8d8b62bbfd284272c928ceb64ddbde9",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "edolstra",
|
||||
"repo": "flake-compat",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"flake-compat_2": {
|
||||
"flake": false,
|
||||
"locked": {
|
||||
"lastModified": 1673956053,
|
||||
"narHash": "sha256-4gtG9iQuiKITOjNQQeQIpoIB6b16fm+504Ch3sNKLd8=",
|
||||
"owner": "edolstra",
|
||||
"repo": "flake-compat",
|
||||
"rev": "35bb57c0c8d8b62bbfd284272c928ceb64ddbde9",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "edolstra",
|
||||
"repo": "flake-compat",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"flake-parts": {
|
||||
"inputs": {
|
||||
"nixpkgs-lib": "nixpkgs-lib"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1693611461,
|
||||
"narHash": "sha256-aPODl8vAgGQ0ZYFIRisxYG5MOGSkIczvu2Cd8Gb9+1Y=",
|
||||
"owner": "hercules-ci",
|
||||
"repo": "flake-parts",
|
||||
"rev": "7f53fdb7bdc5bb237da7fefef12d099e4fd611ca",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "hercules-ci",
|
||||
"repo": "flake-parts",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"flake-parts_2": {
|
||||
"inputs": {
|
||||
"nixpkgs-lib": "nixpkgs-lib_2"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1685662779,
|
||||
"narHash": "sha256-cKDDciXGpMEjP1n6HlzKinN0H+oLmNpgeCTzYnsA2po=",
|
||||
"owner": "hercules-ci",
|
||||
"repo": "flake-parts",
|
||||
"rev": "71fb97f0d875fd4de4994dfb849f2c75e17eb6c3",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "hercules-ci",
|
||||
"repo": "flake-parts",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"flake-utils": {
|
||||
"inputs": {
|
||||
"systems": "systems"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1685518550,
|
||||
"narHash": "sha256-o2d0KcvaXzTrPRIo0kOLV0/QXHhDQ5DTi+OxcjO8xqY=",
|
||||
"owner": "numtide",
|
||||
"repo": "flake-utils",
|
||||
"rev": "a1720a10a6cfe8234c0e93907ffe81be440f4cef",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "numtide",
|
||||
"repo": "flake-utils",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"flake-utils_2": {
|
||||
"locked": {
|
||||
"lastModified": 1667395993,
|
||||
"narHash": "sha256-nuEHfE/LcWyuSWnS8t12N1wc105Qtau+/OdUAjtQ0rA=",
|
||||
"owner": "numtide",
|
||||
"repo": "flake-utils",
|
||||
"rev": "5aed5285a952e0b949eb3ba02c12fa4fcfef535f",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "numtide",
|
||||
"repo": "flake-utils",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"gitignore": {
|
||||
"inputs": {
|
||||
"nixpkgs": [
|
||||
"ihp",
|
||||
"devenv",
|
||||
"pre-commit-hooks",
|
||||
"nixpkgs"
|
||||
]
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1660459072,
|
||||
"narHash": "sha256-8DFJjXG8zqoONA1vXtgeKXy68KdJL5UaXR8NtVMUbx8=",
|
||||
"owner": "hercules-ci",
|
||||
"repo": "gitignore.nix",
|
||||
"rev": "a20de23b925fd8264fd7fad6454652e142fd7f73",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "hercules-ci",
|
||||
"repo": "gitignore.nix",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"gitignore_2": {
|
||||
"inputs": {
|
||||
"nixpkgs": [
|
||||
"ihp",
|
||||
"ihp-boilerplate",
|
||||
"ihp",
|
||||
"devenv",
|
||||
"pre-commit-hooks",
|
||||
"nixpkgs"
|
||||
]
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1660459072,
|
||||
"narHash": "sha256-8DFJjXG8zqoONA1vXtgeKXy68KdJL5UaXR8NtVMUbx8=",
|
||||
"owner": "hercules-ci",
|
||||
"repo": "gitignore.nix",
|
||||
"rev": "a20de23b925fd8264fd7fad6454652e142fd7f73",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "hercules-ci",
|
||||
"repo": "gitignore.nix",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"ihp": {
|
||||
"inputs": {
|
||||
"devenv": "devenv",
|
||||
"flake-parts": "flake-parts",
|
||||
"ihp-boilerplate": "ihp-boilerplate",
|
||||
"nix-filter": "nix-filter",
|
||||
"nixpkgs": "nixpkgs_2",
|
||||
"systems": "systems_3"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1700013490,
|
||||
"narHash": "sha256-oQz7ZBrHe6WwYMwnxxUgnYM55CuH5Oxjz6mrLnYbB7U=",
|
||||
"owner": "digitallyinduced",
|
||||
"repo": "ihp",
|
||||
"rev": "d59a65d71943cb506eee3ad6255f017963237359",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "digitallyinduced",
|
||||
"ref": "v1.2",
|
||||
"repo": "ihp",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"ihp-boilerplate": {
|
||||
"inputs": {
|
||||
"devenv": [
|
||||
"ihp",
|
||||
"ihp-boilerplate",
|
||||
"ihp",
|
||||
"devenv"
|
||||
],
|
||||
"flake-parts": [
|
||||
"ihp",
|
||||
"ihp-boilerplate",
|
||||
"ihp",
|
||||
"flake-parts"
|
||||
],
|
||||
"ihp": "ihp_2",
|
||||
"nixpkgs": [
|
||||
"ihp",
|
||||
"ihp-boilerplate",
|
||||
"ihp",
|
||||
"nixpkgs"
|
||||
],
|
||||
"systems": [
|
||||
"ihp",
|
||||
"ihp-boilerplate",
|
||||
"ihp",
|
||||
"systems"
|
||||
]
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1689954789,
|
||||
"narHash": "sha256-RsgD1YGSlx+K/GkTspOdg/tz47PyZZDc66PzfFZvqBk=",
|
||||
"owner": "digitallyinduced",
|
||||
"repo": "ihp-boilerplate",
|
||||
"rev": "832d1a5aed4dc3625486c82b06a1d07024267680",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "digitallyinduced",
|
||||
"repo": "ihp-boilerplate",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"ihp-boilerplate_2": {
|
||||
"flake": false,
|
||||
"locked": {
|
||||
"lastModified": 1686165507,
|
||||
"narHash": "sha256-ZaP8GfqjZDnMayPcvWxEqnZmRs4ixf5O5d1Ba867m4c=",
|
||||
"owner": "digitallyinduced",
|
||||
"repo": "ihp-boilerplate",
|
||||
"rev": "ff63ce46b6fb68f1b8b3cdb0bdd6749f7ef1df93",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "digitallyinduced",
|
||||
"ref": "nicolas/flake",
|
||||
"repo": "ihp-boilerplate",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"ihp_2": {
|
||||
"inputs": {
|
||||
"devenv": "devenv_2",
|
||||
"flake-parts": "flake-parts_2",
|
||||
"ihp-boilerplate": "ihp-boilerplate_2",
|
||||
"nixpkgs": "nixpkgs",
|
||||
"systems": "systems_2"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1689949405,
|
||||
"narHash": "sha256-o0ZSDaDFgwbXqozHfcXKxW4FeF7JqaGprAh6r7NhvhE=",
|
||||
"owner": "digitallyinduced",
|
||||
"repo": "ihp",
|
||||
"rev": "e6c6eaf1d089423a03e586cd25d1eda39f5a6b11",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "digitallyinduced",
|
||||
"ref": "v1.1",
|
||||
"repo": "ihp",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"lowdown-src": {
|
||||
"flake": false,
|
||||
"locked": {
|
||||
"lastModified": 1633514407,
|
||||
"narHash": "sha256-Dw32tiMjdK9t3ETl5fzGrutQTzh2rufgZV4A/BbxuD4=",
|
||||
"owner": "kristapsdz",
|
||||
"repo": "lowdown",
|
||||
"rev": "d2c2b44ff6c27b936ec27358a2653caaef8f73b8",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "kristapsdz",
|
||||
"repo": "lowdown",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"lowdown-src_2": {
|
||||
"flake": false,
|
||||
"locked": {
|
||||
"lastModified": 1633514407,
|
||||
"narHash": "sha256-Dw32tiMjdK9t3ETl5fzGrutQTzh2rufgZV4A/BbxuD4=",
|
||||
"owner": "kristapsdz",
|
||||
"repo": "lowdown",
|
||||
"rev": "d2c2b44ff6c27b936ec27358a2653caaef8f73b8",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "kristapsdz",
|
||||
"repo": "lowdown",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nix": {
|
||||
"inputs": {
|
||||
"lowdown-src": "lowdown-src",
|
||||
"nixpkgs": [
|
||||
"ihp",
|
||||
"devenv",
|
||||
"nixpkgs"
|
||||
],
|
||||
"nixpkgs-regression": "nixpkgs-regression"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1676545802,
|
||||
"narHash": "sha256-EK4rZ+Hd5hsvXnzSzk2ikhStJnD63odF7SzsQ8CuSPU=",
|
||||
"owner": "domenkozar",
|
||||
"repo": "nix",
|
||||
"rev": "7c91803598ffbcfe4a55c44ac6d49b2cf07a527f",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "domenkozar",
|
||||
"ref": "relaxed-flakes",
|
||||
"repo": "nix",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nix-filter": {
|
||||
"locked": {
|
||||
"lastModified": 1694434370,
|
||||
"narHash": "sha256-7yfdTR4mCvWZ39Q6HUcsa18tr0mg+fJZSaHE/63rwoo=",
|
||||
"owner": "numtide",
|
||||
"repo": "nix-filter",
|
||||
"rev": "d6381c442f79f2f1fdfde00521c3d15d6c21218e",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "numtide",
|
||||
"repo": "nix-filter",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nix_2": {
|
||||
"inputs": {
|
||||
"lowdown-src": "lowdown-src_2",
|
||||
"nixpkgs": [
|
||||
"ihp",
|
||||
"ihp-boilerplate",
|
||||
"ihp",
|
||||
"devenv",
|
||||
"nixpkgs"
|
||||
],
|
||||
"nixpkgs-regression": "nixpkgs-regression_2"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1676545802,
|
||||
"narHash": "sha256-EK4rZ+Hd5hsvXnzSzk2ikhStJnD63odF7SzsQ8CuSPU=",
|
||||
"owner": "domenkozar",
|
||||
"repo": "nix",
|
||||
"rev": "7c91803598ffbcfe4a55c44ac6d49b2cf07a527f",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "domenkozar",
|
||||
"ref": "relaxed-flakes",
|
||||
"repo": "nix",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nixpkgs": {
|
||||
"locked": {
|
||||
"lastModified": 1681488673,
|
||||
"narHash": "sha256-PmojOyePBNvbY3snYE7NAQHTLB53t7Ro+pgiJ4wPCuk=",
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "a95ed9fe764c3ba2bf2d2fa223012c379cd6b32e",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "a95ed9fe764c3ba2bf2d2fa223012c379cd6b32e",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nixpkgs-lib": {
|
||||
"locked": {
|
||||
"dir": "lib",
|
||||
"lastModified": 1693471703,
|
||||
"narHash": "sha256-0l03ZBL8P1P6z8MaSDS/MvuU8E75rVxe5eE1N6gxeTo=",
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "3e52e76b70d5508f3cec70b882a29199f4d1ee85",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"dir": "lib",
|
||||
"owner": "NixOS",
|
||||
"ref": "nixos-unstable",
|
||||
"repo": "nixpkgs",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nixpkgs-lib_2": {
|
||||
"locked": {
|
||||
"dir": "lib",
|
||||
"lastModified": 1685564631,
|
||||
"narHash": "sha256-8ywr3AkblY4++3lIVxmrWZFzac7+f32ZEhH/A8pNscI=",
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "4f53efe34b3a8877ac923b9350c874e3dcd5dc0a",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"dir": "lib",
|
||||
"owner": "NixOS",
|
||||
"ref": "nixos-unstable",
|
||||
"repo": "nixpkgs",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nixpkgs-regression": {
|
||||
"locked": {
|
||||
"lastModified": 1643052045,
|
||||
"narHash": "sha256-uGJ0VXIhWKGXxkeNnq4TvV3CIOkUJ3PAoLZ3HMzNVMw=",
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "215d4d0fd80ca5163643b03a33fde804a29cc1e2",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "215d4d0fd80ca5163643b03a33fde804a29cc1e2",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nixpkgs-regression_2": {
|
||||
"locked": {
|
||||
"lastModified": 1643052045,
|
||||
"narHash": "sha256-uGJ0VXIhWKGXxkeNnq4TvV3CIOkUJ3PAoLZ3HMzNVMw=",
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "215d4d0fd80ca5163643b03a33fde804a29cc1e2",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "215d4d0fd80ca5163643b03a33fde804a29cc1e2",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nixpkgs-stable": {
|
||||
"locked": {
|
||||
"lastModified": 1685801374,
|
||||
"narHash": "sha256-otaSUoFEMM+LjBI1XL/xGB5ao6IwnZOXc47qhIgJe8U=",
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "c37ca420157f4abc31e26f436c1145f8951ff373",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "NixOS",
|
||||
"ref": "nixos-23.05",
|
||||
"repo": "nixpkgs",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nixpkgs-stable_2": {
|
||||
"locked": {
|
||||
"lastModified": 1678872516,
|
||||
"narHash": "sha256-/E1YwtMtFAu2KUQKV/1+KFuReYPANM2Rzehk84VxVoc=",
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "9b8e5abb18324c7fe9f07cb100c3cd4a29cda8b8",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "NixOS",
|
||||
"ref": "nixos-22.11",
|
||||
"repo": "nixpkgs",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"nixpkgs_2": {
|
||||
"locked": {
|
||||
"lastModified": 1696291921,
|
||||
"narHash": "sha256-isKgVAoUxuxYEuO3Q4xhbfKcZrF/+UkJtOTv0eb/W5E=",
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "ea0284a3da391822909be5e98a60c1e62572a7dc",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "NixOS",
|
||||
"repo": "nixpkgs",
|
||||
"rev": "ea0284a3da391822909be5e98a60c1e62572a7dc",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"pre-commit-hooks": {
|
||||
"inputs": {
|
||||
"flake-compat": [
|
||||
"ihp",
|
||||
"devenv",
|
||||
"flake-compat"
|
||||
],
|
||||
"flake-utils": "flake-utils",
|
||||
"gitignore": "gitignore",
|
||||
"nixpkgs": [
|
||||
"ihp",
|
||||
"devenv",
|
||||
"nixpkgs"
|
||||
],
|
||||
"nixpkgs-stable": "nixpkgs-stable"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1688056373,
|
||||
"narHash": "sha256-2+SDlNRTKsgo3LBRiMUcoEUb6sDViRNQhzJquZ4koOI=",
|
||||
"owner": "cachix",
|
||||
"repo": "pre-commit-hooks.nix",
|
||||
"rev": "5843cf069272d92b60c3ed9e55b7a8989c01d4c7",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "cachix",
|
||||
"repo": "pre-commit-hooks.nix",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"pre-commit-hooks_2": {
|
||||
"inputs": {
|
||||
"flake-compat": [
|
||||
"ihp",
|
||||
"ihp-boilerplate",
|
||||
"ihp",
|
||||
"devenv",
|
||||
"flake-compat"
|
||||
],
|
||||
"flake-utils": "flake-utils_2",
|
||||
"gitignore": "gitignore_2",
|
||||
"nixpkgs": [
|
||||
"ihp",
|
||||
"ihp-boilerplate",
|
||||
"ihp",
|
||||
"devenv",
|
||||
"nixpkgs"
|
||||
],
|
||||
"nixpkgs-stable": "nixpkgs-stable_2"
|
||||
},
|
||||
"locked": {
|
||||
"lastModified": 1682596858,
|
||||
"narHash": "sha256-Hf9XVpqaGqe/4oDGr30W8HlsWvJXtMsEPHDqHZA6dDg=",
|
||||
"owner": "cachix",
|
||||
"repo": "pre-commit-hooks.nix",
|
||||
"rev": "fb58866e20af98779017134319b5663b8215d912",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "cachix",
|
||||
"repo": "pre-commit-hooks.nix",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"root": {
|
||||
"inputs": {
|
||||
"devenv": [
|
||||
"ihp",
|
||||
"devenv"
|
||||
],
|
||||
"flake-parts": [
|
||||
"ihp",
|
||||
"flake-parts"
|
||||
],
|
||||
"ihp": "ihp",
|
||||
"nixpkgs": [
|
||||
"ihp",
|
||||
"nixpkgs"
|
||||
],
|
||||
"systems": [
|
||||
"ihp",
|
||||
"systems"
|
||||
]
|
||||
}
|
||||
},
|
||||
"systems": {
|
||||
"locked": {
|
||||
"lastModified": 1681028828,
|
||||
"narHash": "sha256-Vy1rq5AaRuLzOxct8nz4T6wlgyUR7zLU309k9mBC768=",
|
||||
"owner": "nix-systems",
|
||||
"repo": "default",
|
||||
"rev": "da67096a3b9bf56a91d16901293e51ba5b49a27e",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "nix-systems",
|
||||
"repo": "default",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"systems_2": {
|
||||
"locked": {
|
||||
"lastModified": 1681028828,
|
||||
"narHash": "sha256-Vy1rq5AaRuLzOxct8nz4T6wlgyUR7zLU309k9mBC768=",
|
||||
"owner": "nix-systems",
|
||||
"repo": "default",
|
||||
"rev": "da67096a3b9bf56a91d16901293e51ba5b49a27e",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "nix-systems",
|
||||
"repo": "default",
|
||||
"type": "github"
|
||||
}
|
||||
},
|
||||
"systems_3": {
|
||||
"locked": {
|
||||
"lastModified": 1681028828,
|
||||
"narHash": "sha256-Vy1rq5AaRuLzOxct8nz4T6wlgyUR7zLU309k9mBC768=",
|
||||
"owner": "nix-systems",
|
||||
"repo": "default",
|
||||
"rev": "da67096a3b9bf56a91d16901293e51ba5b49a27e",
|
||||
"type": "github"
|
||||
},
|
||||
"original": {
|
||||
"owner": "nix-systems",
|
||||
"repo": "default",
|
||||
"type": "github"
|
||||
}
|
||||
}
|
||||
},
|
||||
"root": "root",
|
||||
"version": 7
|
||||
}
|
145
flake.nix
Normal file
145
flake.nix
Normal file
@ -0,0 +1,145 @@
|
||||
{
|
||||
inputs = {
|
||||
ihp.url = "github:digitallyinduced/ihp/v1.2";
|
||||
nixpkgs.follows = "ihp/nixpkgs";
|
||||
flake-parts.follows = "ihp/flake-parts";
|
||||
devenv.follows = "ihp/devenv";
|
||||
systems.follows = "ihp/systems";
|
||||
};
|
||||
|
||||
outputs = inputs@{ self, nixpkgs, ihp, flake-parts, systems, ... }:
|
||||
flake-parts.lib.mkFlake { inherit inputs; } {
|
||||
|
||||
systems = import systems;
|
||||
imports = [ ihp.flakeModules.default ];
|
||||
|
||||
perSystem = { pkgs, ... }: {
|
||||
ihp = {
|
||||
enable = true;
|
||||
projectPath = ./.;
|
||||
packages = with pkgs; [
|
||||
# Native dependencies, e.g. imagemagick
|
||||
];
|
||||
haskellPackages = p: with p; [
|
||||
# Haskell dependencies go here
|
||||
p.ihp
|
||||
cabal-install
|
||||
base
|
||||
wai
|
||||
text
|
||||
|
||||
# Uncomment on local development for testing
|
||||
# hspec
|
||||
];
|
||||
};
|
||||
|
||||
# Custom configuration that will start with `devenv up`
|
||||
devenv.shells.default = {
|
||||
# Start Mailhog on local development to catch outgoing emails
|
||||
# services.mailhog.enable = true;
|
||||
|
||||
# Custom processes that don't appear in https://devenv.sh/reference/options/
|
||||
processes = {
|
||||
# Uncomment if you use tailwindcss.
|
||||
# tailwind.exec = "tailwindcss -c tailwind/tailwind.config.js -i ./tailwind/app.css -o static/app.css --watch=always";
|
||||
};
|
||||
};
|
||||
};
|
||||
|
||||
# Adding the new NixOS configuration for "qa"
|
||||
# See https://ihp.digitallyinduced.com/Guide/deployment.html#deploying-with-deploytonixos for more info
|
||||
# Used to deploy the IHP application to AWS.
|
||||
#
|
||||
# Change the `CHANGE-ME` to your correct config.
|
||||
flake.nixosConfigurations."qa" = nixpkgs.lib.nixosSystem {
|
||||
system = "x86_64-linux";
|
||||
specialArgs = inputs;
|
||||
modules = [
|
||||
"${nixpkgs}/nixos/modules/virtualisation/amazon-image.nix"
|
||||
ihp.nixosModules.appWithPostgres
|
||||
({ lib, pkgs, ... }: {
|
||||
|
||||
networking.firewall = {
|
||||
enable = true;
|
||||
allowedTCPPorts = [ 22 80 443 ];
|
||||
};
|
||||
|
||||
# Enable the Let's encrypt certificate
|
||||
security.acme.defaults.email = "CHANGE-ME@example.com";
|
||||
|
||||
# Accept the terms of service of the Let's encrypt provider.
|
||||
security.acme.acceptTerms = true;
|
||||
|
||||
services.nginx = {
|
||||
virtualHosts."CHANGE-ME.com" = {
|
||||
# Uncomment to have http auth with username `foo` and password `bar`.
|
||||
# basicAuth = { foo = "bar"; };
|
||||
};
|
||||
};
|
||||
|
||||
# Logging to AWS CloudWatch
|
||||
# services.vector = {
|
||||
# enable = true;
|
||||
# journaldAccess = true;
|
||||
# settings = {
|
||||
# sources.journald = {
|
||||
# type = "journald";
|
||||
# # Log only the services we care about
|
||||
# include_units = ["app.service" "nginx.service" "worker.service"];
|
||||
# };
|
||||
|
||||
# sinks.out = {
|
||||
# group_name = "CHANGE-ME";
|
||||
# stream_name = "CHANGE-ME";
|
||||
# # Change the region to the correct one, e.g. `us-east-1`
|
||||
# region = "CHANGE-ME";
|
||||
# auth = {
|
||||
# access_key_id = "CHANGE-ME";
|
||||
# secret_access_key = "CHANGE-ME";
|
||||
# };
|
||||
# inputs = ["journald"];
|
||||
# type = "aws_cloudwatch_logs";
|
||||
# compression = "gzip";
|
||||
# encoding.codec = "json";
|
||||
# };
|
||||
# };
|
||||
# };
|
||||
|
||||
services.ihp = {
|
||||
domain = "CHANGE-ME.com";
|
||||
migrations = ./Application/Migration;
|
||||
schema = ./Application/Schema.sql;
|
||||
fixtures = ./Application/Fixtures.sql;
|
||||
sessionSecret = "CHANGE-ME";
|
||||
additionalEnvVars = {
|
||||
# Uncomment to use a custom database URL
|
||||
# DATABASE_URL = "postgresql://postgres:...CHANGE-ME";
|
||||
|
||||
# Uncomment to use a custom session secret, ensuring sessions aren't invalidated
|
||||
# on each deploy.
|
||||
# Learn how to create the secret key in https://ihp.digitallyinduced.com/Guide/deployment.html#ihpsessionsecret
|
||||
# IHP_SESSION_SECRET = "CHANGE-ME";
|
||||
|
||||
SMTP_HOST = "email-smtp.eu-west-1.amazonaws.com";
|
||||
SMTP_PORT = "587";
|
||||
SMTP_ENCRYPTION = "STARTTLS";
|
||||
|
||||
SMTP_USER = "CHANGE-ME";
|
||||
SMTP_PASSWORD = "CHANGE-ME";
|
||||
|
||||
AWS_ACCESS_KEY_ID = "CHANGE-ME";
|
||||
AWS_SECRET_ACCESS_KEY = "CHANGE-ME";
|
||||
};
|
||||
};
|
||||
# As we use a pre-built AMI on AWS,
|
||||
# it is essential to enable automatic updates.
|
||||
# @see https://nixos.wiki/wiki/Automatic_system_upgrades
|
||||
system.autoUpgrade.enable = true;
|
||||
# Keep as is. See https://nixos.wiki/wiki/FAQ/When_do_I_update_stateVersion
|
||||
system.stateVersion = "23.05";
|
||||
})
|
||||
];
|
||||
};
|
||||
|
||||
};
|
||||
}
|
4
hie.yaml
Normal file
4
hie.yaml
Normal file
@ -0,0 +1,4 @@
|
||||
# Used by haskell-language-server to find GHC settings
|
||||
cradle:
|
||||
bios:
|
||||
shell: "$IHP/.hie-bios"
|
0
static/app.css
Normal file
0
static/app.css
Normal file
3
static/app.js
Normal file
3
static/app.js
Normal file
@ -0,0 +1,3 @@
|
||||
$(document).on('ready turbolinks:load', function () {
|
||||
// This is called on the first page load *and* also when the page is changed by turbolinks
|
||||
});
|
0
static/favicon.ico
Normal file
0
static/favicon.ico
Normal file
1
static/ihp-welcome-icon.svg
Normal file
1
static/ihp-welcome-icon.svg
Normal file
File diff suppressed because one or more lines are too long
After Width: | Height: | Size: 9.1 KiB |
Loading…
Reference in New Issue
Block a user