Upgrade v4

.config/dotnet-tools.json

@@ -0,0 +1,30 @@
+{
+  "version": 1,
+  "isRoot": true,
+  "tools": {
+    "paket": {
+      "version": "7.0.2",
+      "commands": [
+        "paket"
+      ]
+    },
+    "fable": {
+      "version": "3.7.5",
+      "commands": [
+        "fable"
+      ]
+    },
+    "fantomas-tool": {
+      "version": "4.7.1",
+      "commands": [
+        "fantomas"
+      ]
+    },
+    "femto": {
+      "version": "0.12.0",
+      "commands": [
+        "femto"
+      ]
+    }
+  }
+}

.editorconfig

@@ -0,0 +1,12 @@
+root = true
+
+[*]
+indent_style = space
+indent_size = 4
+charset = utf-8
+trim_trailing_whitespace = true
+insert_final_newline = false
+
+[src/Client/*.fs]
+# Feliz style
+fsharp_single_argument_web_mode=true

.gitignore

@@ -1,3 +1,24 @@
+.fable/
+*.fs.js
+*.fs.js.map
+.fake/
+.farmer/
+.idea/
+.ionide/
+.vs/
+deploy/
+obj/
+bin/
+output/
+packages/
+paket-files/
+node_modules/
+release.cmd
+release.sh
+*.orig
+*.DotSettings.user
+*.fsproj.user
+
 # See http://help.github.com/ignore-files/ for more about ignoring files.
 
 # dependencies

.npmrc

@@ -0,0 +1 @@
+engine-strict=true

.vscode/extensions.json

@@ -0,0 +1,15 @@
+{
+    // See http://go.microsoft.com/fwlink/?LinkId=827846 to learn about workspace recommendations.
+    // Extension identifier format: ${publisher}.${name}. Example: vscode.csharp
+
+    // List of extensions which should be recommended for users of this workspace.
+    "recommendations": [
+        "ionide.ionide-fsharp",
+        "ms-dotnettools.csharp",
+        "editorconfig.editorconfig"
+    ],
+    // List of extensions recommended by VS Code that should not be recommended for users of this workspace.
+    "unwantedRecommendations": [
+
+    ]
+}

Build.fs

@@ -0,0 +1,83 @@
+open Fake.Core
+open Fake.IO
+open Farmer
+open Farmer.Builders
+
+open Helpers
+
+initializeContext()
+
+let sharedPath = Path.getFullName "src/Shared"
+let serverPath = Path.getFullName "src/Server"
+let clientPath = Path.getFullName "src/Client"
+let deployPath = Path.getFullName "deploy"
+let sharedTestsPath = Path.getFullName "tests/Shared"
+let serverTestsPath = Path.getFullName "tests/Server"
+let clientTestsPath = Path.getFullName "tests/Client"
+
+Target.create "Clean" (fun _ ->
+    Shell.cleanDir deployPath
+    run dotnet "fable clean --yes" clientPath // Delete *.fs.js files created by Fable
+)
+
+Target.create "InstallClient" (fun _ -> run npm "install" ".")
+
+Target.create "Bundle" (fun _ ->
+    [ "server", dotnet $"publish -c Release -o \"{deployPath}\"" serverPath
+      "client", dotnet "fable -o output -s --run npm run build" clientPath ]
+    |> runParallel
+)
+
+Target.create "Azure" (fun _ ->
+    let web = webApp {
+        name "safestack_realworld_example_app"
+        operating_system OS.Windows
+        runtime_stack Runtime.DotNet60
+        zip_deploy "deploy"
+    }
+    let deployment = arm {
+        location Location.WestEurope
+        add_resource web
+    }
+
+    deployment
+    |> Deploy.execute "safestack_realworld_example_app" Deploy.NoParameters
+    |> ignore
+)
+
+Target.create "Run" (fun _ ->
+    run dotnet "build" sharedPath
+    [ "server", dotnet "watch run" serverPath
+      "client", dotnet "fable watch -o output -s --run npm run start" clientPath ]
+    |> runParallel
+)
+
+Target.create "RunTests" (fun _ ->
+    run dotnet "build" sharedTestsPath
+    [ "server", dotnet "watch run" serverTestsPath
+      "client", dotnet "fable watch -o output -s --run npm run test:live" clientTestsPath ]
+    |> runParallel
+)
+
+Target.create "Format" (fun _ ->
+    run dotnet "fantomas . -r" "src"
+)
+
+open Fake.Core.TargetOperators
+
+let dependencies = [
+    "Clean"
+        ==> "InstallClient"
+        ==> "Bundle"
+        ==> "Azure"
+
+    "Clean"
+        ==> "InstallClient"
+        ==> "Run"
+
+    "InstallClient"
+        ==> "RunTests"
+]
+
+[<EntryPoint>]
+let main args = runOrDefault args

Build.fsproj

@@ -0,0 +1,11 @@
+<Project Sdk="Microsoft.NET.Sdk">
+  <PropertyGroup>
+    <OutputType>Exe</OutputType>
+    <TargetFramework>net6.0</TargetFramework>
+  </PropertyGroup>
+  <ItemGroup>
+    <Compile Include="Helpers.fs" />
+    <Compile Include="Build.fs" />
+  </ItemGroup>
+  <Import Project=".paket\Paket.Restore.targets" />
+</Project>

Helpers.fs

@@ -0,0 +1,104 @@
+module Helpers
+
+open Fake.Core
+
+let initializeContext () =
+    let execContext = Context.FakeExecutionContext.Create false "build.fsx" [ ]
+    Context.setExecutionContext (Context.RuntimeContext.Fake execContext)
+
+module Proc =
+    module Parallel =
+        open System
+
+        let locker = obj()
+
+        let colors =
+            [| ConsoleColor.Blue
+               ConsoleColor.Yellow
+               ConsoleColor.Magenta
+               ConsoleColor.Cyan
+               ConsoleColor.DarkBlue
+               ConsoleColor.DarkYellow
+               ConsoleColor.DarkMagenta
+               ConsoleColor.DarkCyan |]
+
+        let print color (colored: string) (line: string) =
+            lock locker
+                (fun () ->
+                    let currentColor = Console.ForegroundColor
+                    Console.ForegroundColor <- color
+                    Console.Write colored
+                    Console.ForegroundColor <- currentColor
+                    Console.WriteLine line)
+
+        let onStdout index name (line: string) =
+            let color = colors.[index % colors.Length]
+            if isNull line then
+                print color $"{name}: --- END ---" ""
+            else if String.isNotNullOrEmpty line then
+                print color $"{name}: " line
+
+        let onStderr name (line: string) =
+            let color = ConsoleColor.Red
+            if isNull line |> not then
+                print color $"{name}: " line
+
+        let redirect (index, (name, createProcess)) =
+            createProcess
+            |> CreateProcess.redirectOutputIfNotRedirected
+            |> CreateProcess.withOutputEvents (onStdout index name) (onStderr name)
+
+        let printStarting indexed =
+            for (index, (name, c: CreateProcess<_>)) in indexed do
+                let color = colors.[index % colors.Length]
+                let wd =
+                    c.WorkingDirectory
+                    |> Option.defaultValue ""
+                let exe = c.Command.Executable
+                let args = c.Command.Arguments.ToStartInfo
+                print color $"{name}: {wd}> {exe} {args}" ""
+
+        let run cs =
+            cs
+            |> Seq.toArray
+            |> Array.indexed
+            |> fun x -> printStarting x; x
+            |> Array.map redirect
+            |> Array.Parallel.map Proc.run
+
+let createProcess exe arg dir =
+    CreateProcess.fromRawCommandLine exe arg
+    |> CreateProcess.withWorkingDirectory dir
+    |> CreateProcess.ensureExitCode
+
+let dotnet = createProcess "dotnet"
+let npm =
+    let npmPath =
+        match ProcessUtils.tryFindFileOnPath "npm" with
+        | Some path -> path
+        | None ->
+            "npm was not found in path. Please install it and make sure it's available from your path. " +
+            "See https://safe-stack.github.io/docs/quickstart/#install-pre-requisites for more info"
+            |> failwith
+
+    createProcess npmPath
+
+let run proc arg dir =
+    proc arg dir
+    |> Proc.run
+    |> ignore
+
+let runParallel processes =
+    processes
+    |> Proc.Parallel.run
+    |> ignore
+
+let runOrDefault args =
+    try
+        match args with
+        | [| target |] -> Target.runOrDefault target
+        | _ -> Target.runOrDefault "Run"
+        0
+    with e ->
+        printfn "%A" e
+        1

README.md

@@ -1,23 +1,57 @@
-# ![RealWorld Example App](logo.png)
+# SAFE Template
 
-> ### [YOUR_FRAMEWORK] codebase containing real world examples (CRUD, auth, advanced patterns, etc) that adheres to the [RealWorld](https://github.com/gothinkster/realworld) spec and API.
+This template can be used to generate a full-stack web application using the [SAFE Stack](https://safe-stack.github.io/). It was created using the dotnet [SAFE Template](https://safe-stack.github.io/docs/template-overview/). If you want to learn more about the template why not start with the [quick start](https://safe-stack.github.io/docs/quickstart/) guide?
 
+## Install pre-requisites
 
-### [Demo](https://demo.realworld.io/)    [RealWorld](https://github.com/gothinkster/realworld)
+You'll need to install the following pre-requisites in order to build SAFE applications
 
+* [.NET Core SDK](https://www.microsoft.com/net/download) 6.0 or higher
+* [Node 16](https://nodejs.org/en/download/)
 
-This codebase was created to demonstrate a fully fledged fullstack application built with **[YOUR_FRAMEWORK]** including CRUD operations, authentication, routing, pagination, and more.
+## Starting the application
 
-We've gone to great lengths to adhere to the **[YOUR_FRAMEWORK]** community styleguides & best practices.
+Before you run the project **for the first time only** you must install dotnet "local tools" with this command:
 
-For more information on how to this works with other frontends/backends, head over to the [RealWorld](https://github.com/gothinkster/realworld) repo.
+```bash
+dotnet tool restore
+```
 
+To concurrently run the server and the client components in watch mode use the following command:
 
-# How it works
+```bash
+dotnet run
+```
 
-> Describe the general architecture of your app here
+Then open `http://localhost:8080` in your browser.
 
-# Getting started
+The build project in root directory contains a couple of different build targets. You can specify them after `--` (target name is case-insensitive).
 
-> npm install, npm start, etc.
+To run concurrently server and client tests in watch mode (you can run this command in parallel to the previous one in new terminal):
 
+```bash
+dotnet run -- RunTests
+```
+
+Client tests are available under `http://localhost:8081` in your browser and server tests are running in watch mode in console.
+
+Finally, there are `Bundle` and `Azure` targets that you can use to package your app and deploy to Azure, respectively:
+
+```bash
+dotnet run -- Bundle
+dotnet run -- Azure
+```
+
+## SAFE Stack Documentation
+
+If you want to know more about the full Azure Stack and all of it's components (including Azure) visit the official [SAFE documentation](https://safe-stack.github.io/docs/).
+
+You will find more documentation about the used F# components at the following places:
+
+* [Saturn](https://saturnframework.org/)
+* [Fable](https://fable.io/docs/)
+* [Elmish](https://elmish.github.io/elmish/)
+
+# MISC
+
+install Feliz.Router, see https://www.compositional-it.com/news-blog/elmish-navigation-with-feliz-router/