-- [**Project page**](https://wasp-lang.dev)
-- [**Docs**](https://wasp-lang.dev/docs)
-
-Wasp (**W**eb **A**pplication **Sp**ecification Language) is a declarative DSL (domain-specific language) for developing, building and deploying modern full-stack web apps with less code.
+Wasp (**W**eb **A**pplication **Sp**ecification) is a Rails-like framework for React, Node.js and Prisma.
+Build your app in a day and deploy it with a single CLI command!
-Concepts such as *app*, *page*, *user*, *login*, *frontend*, *production*, etc. are baked into the language, bringing a new level of expressiveness and allowing you to get more work done with fewer lines of code.
+### Why is Wasp awesome
+- ๐ **Quick start**: Due to its expressiveness, you can create and deploy a production-ready web app from scratch with very few lines of concise, consistent, declarative code.
+- ๐ **No boilerplate**: By abstracting away complex full-stack features, there is less boilerplate code. That means less code to maintain and understand! It also means easier upgrades.
+- ๐ **No lock-in**: You can deploy Wasp app anywhere you like. There is no lock-in into specific providers, you have full control over the code (and can actually check it out in .wasp/ dir if you are interested ).
-While describing high-level features with Wasp, you still write the rest of your logic in your favorite technologies (currently React, NodeJS, Prisma).
+### Features
+ ๐ Full-stack Auth, ๐๏ธ RPC (Client <-> Server), ๐ Simple Deployment, โ ๏ธJobs, โ๏ธ Email Sending, ๐ Full-stack Type Safety, ...
+### Code example
+Simple Wasp config file in which you describe the high-level details of your web app:
```js
// file: main.wasp
-app TodoApp {
- title: "Todo App",
- wasp: { version: "^0.7.0" }
+app todoApp {
+ title: "ToDo App", // visible in the browser tab
+ wasp: { version: "^0.10.0" },
+ auth: { // full-stack auth out-of-the-box
+ userEntity: User, methods: { email: {...} }
+ }
}
route RootRoute { path: "/", to: MainPage }
page MainPage {
- component: import Main from "@ext/pages/Main.jsx" // Importing React component.
+ authRequired: true, // Limit access to logged in users.
+ component: import Main from "@client/Main.tsx" // Your React code.
}
query getTasks {
- fn: import { getTasks } from "@ext/queries.js", // Importing NodeJS code.
- entities: [Task]
+ fn: import { getTasks } from "@server/tasks.js", // Your Node.js code.
+ entities: [Task] // Automatic cache invalidation.
}
-entity Task {=psl
+entity Task {=psl // Your Prisma data model.
id Int @id @default(autoincrement())
description String
isDone Boolean @default(false)
psl=}
```
-Source files (`.wasp`, `.js(x)`, `.css`, ...) are compiled by `waspc` (Wasp compiler) into the web technology stack of your choice (currently React + NodeJS/ExpressJS + Prisma).
+The rest of the code you write in React / Node.js / Prisma and just reference it from the .wasp file.
:arrow_forward: Check out [TodoApp example](/examples/tutorials/TodoApp) for the complete code example. :arrow_backward:
-Why is Wasp awesome:
-- **Quick start**: Due to its expressiveness, you can create and deploy a production-ready web app from scratch with very few lines of concise, consistent, declarative code.
-- **Flexible**: When you need more control than Wasp offers, you can write code in existing technologies such as js/html/css/... and combine it with Wasp code!
-- **No lock-in**: If Wasp becomes too limiting for you, simply eject and continue with the generated source code, which is human-readable.
+### How it works
+
+
+
+Given a simple .wasp configuration file that describes the high-level details of your web app, and .js(x)/.css/..., source files with your unique logic, Wasp compiler generates the full source of your web app in the target stack: front-end, back-end and deployment.
+
+This unique approach is what makes Wasp "smart" and gives it its super powers!
For more information about Wasp, check [**docs**](https://wasp-lang.dev/docs).
@@ -72,9 +82,9 @@ Run
```
curl -sSL https://get.wasp-lang.dev/installer.sh | sh
```
-to install Wasp on OSX/Linux. From there, just follow the instructions to run your first app in less than a minute!
+to install Wasp on OSX/Linux/WSL(Win). From there, just follow the instructions to run your first app in less than a minute!
-For more details (including installing on Windows) check out [the docs](https://wasp-lang.dev/docs).
+For more details check out [the docs](https://wasp-lang.dev/docs).
# This repository
@@ -86,7 +96,7 @@ Currently, Wasp is in beta, with most features flushed out and working well.
However, there are still a lot of improvements and additions that we have in mind for the future, and we are working on them constantly, so you can expect a lot of changes and improvements in the future.
As Wasp grows further, it should allow the development of web apps of increasing complexity!
-While the idea is to support multiple web tech stacks in the future, right now we are focusing on the specific stack: React + react-query, NodeJS + ExpressJS, Prisma. We might yet change that as time goes on, taking trends into account, but for now, this is serving us well to develop compiler and language.
+While the idea is to support multiple web tech stacks in the future, right now we are focusing on the specific stack: React + react-query, NodeJS + ExpressJS, Prisma. We might yet change that as time goes on, taking trends into account, but for now, this is serving us well to develop Wasp.
# Contributing
@@ -94,6 +104,8 @@ Any way you want to contribute is a good way :)!
The best place to start is to check out [waspc/](waspc/), where you can find detailed steps for the first time contributors + technical details about the Wasp compiler.
+Core of Wasp is built in Haskell, but there is also a lot of non-Haskell parts of Wasp, so you will certainly be able to find something for you!
+
Even if you don't plan to submit any code, just joining the discussion on discord [](https://discord.gg/rzdnErX) and giving your feedback is already great and helps a lot (motivates us and helps us figure out how to shape Wasp)!
You can also:
diff --git a/examples/realworld/README.md b/examples/realworld/README.md
index 9410bdd64..d9441ba4a 100644
--- a/examples/realworld/README.md
+++ b/examples/realworld/README.md
@@ -8,15 +8,9 @@ Here, we implement it in Wasp, by following their [specification](https://realwo
This app is deployed at https://wasp-rwa.netlify.app/ .
# Development
-
-### Database
-Wasp needs postgre database running - provide it with database connection URL via env var `DATABASE_URL` - best to do it via .env file.
-
-Easy way to get going with postgresql database: run db with `docker run --rm --publish 5432:5432 -v postgresql-data:/var/lib/postgresql/data --env POSTGRES_PASSWORD=devpass postgres`.
-`DATABASE_URL` in this case is `postgresql://postgres:devpass@localhost:5432/postgres`.
-
### Running
-`wasp start`
+`wasp start` to run the client and the server.
+`wasp start db` to run the dev database.
## TODO
diff --git a/examples/realworld/main.wasp b/examples/realworld/main.wasp
index af48395a9..5e6a100b9 100644
--- a/examples/realworld/main.wasp
+++ b/examples/realworld/main.wasp
@@ -1,6 +1,6 @@
app Conduit {
wasp: {
- version: "^0.8.0"
+ version: "^0.10.0"
},
title: "Conduit",
@@ -17,7 +17,10 @@ app Conduit {
onAuthFailedRedirectTo: "/login"
},
- db: { system: PostgreSQL },
+ db: {
+ system: PostgreSQL,
+ seeds: [ import { devSeedSimple } from "@server/seeds.js" ]
+ },
dependencies: [
("prop-types", "15.7.2"),
@@ -30,8 +33,6 @@ app Conduit {
]
}
-
-
// ----------------- Pages ------------------ //
route RootRoute { path: "/", to: MainPage }
diff --git a/examples/realworld/src/client/MainPage.jsx b/examples/realworld/src/client/MainPage.jsx
index 407afe1bd..01af818b5 100644
--- a/examples/realworld/src/client/MainPage.jsx
+++ b/examples/realworld/src/client/MainPage.jsx
@@ -11,7 +11,7 @@ import Chip from '@material-ui/core/Chip'
import Paper from '@material-ui/core/Paper';
import { makeStyles } from '@material-ui/core/styles'
-import useAuth from '@wasp/auth/useAuth.js'
+import useAuth from '@wasp/auth/useAuth'
import { useQuery } from '@wasp/queries'
import getTags from '@wasp/queries/getTags'
diff --git a/examples/realworld/src/client/Navbar.jsx b/examples/realworld/src/client/Navbar.jsx
index 3a0235e5d..f4cc18c36 100644
--- a/examples/realworld/src/client/Navbar.jsx
+++ b/examples/realworld/src/client/Navbar.jsx
@@ -7,7 +7,7 @@ import Button from '@material-ui/core/Button'
import Typography from '@material-ui/core/Typography'
import { makeStyles } from '@material-ui/core/styles'
-import useAuth from '@wasp/auth/useAuth.js'
+import useAuth from '@wasp/auth/useAuth'
const useStyles = makeStyles((theme) => ({
diff --git a/examples/realworld/src/client/article/components/ArticleViewPage.jsx b/examples/realworld/src/client/article/components/ArticleViewPage.jsx
index 244b7edfb..81313f990 100644
--- a/examples/realworld/src/client/article/components/ArticleViewPage.jsx
+++ b/examples/realworld/src/client/article/components/ArticleViewPage.jsx
@@ -17,7 +17,7 @@ import Chip from '@material-ui/core/Chip'
import Button from '@material-ui/core/Button'
import { makeStyles } from '@material-ui/core/styles'
-import useAuth from '@wasp/auth/useAuth.js'
+import useAuth from '@wasp/auth/useAuth'
import { useQuery } from '@wasp/queries'
import getArticle from '@wasp/queries/getArticle'
diff --git a/examples/realworld/src/client/user/components/UserProfilePage.jsx b/examples/realworld/src/client/user/components/UserProfilePage.jsx
index 60d4287ef..f3de5987a 100644
--- a/examples/realworld/src/client/user/components/UserProfilePage.jsx
+++ b/examples/realworld/src/client/user/components/UserProfilePage.jsx
@@ -9,7 +9,7 @@ import Box from '@material-ui/core/Box'
import Button from '@material-ui/core/Button'
import { makeStyles } from '@material-ui/core/styles'
-import useAuth from '@wasp/auth/useAuth.js'
+import useAuth from '@wasp/auth/useAuth'
import { useQuery } from '@wasp/queries'
import getUser from '@wasp/queries/getUser'
diff --git a/examples/realworld/src/client/user/components/UserSettingsPage.jsx b/examples/realworld/src/client/user/components/UserSettingsPage.jsx
index 729f52eb3..d9766db8b 100644
--- a/examples/realworld/src/client/user/components/UserSettingsPage.jsx
+++ b/examples/realworld/src/client/user/components/UserSettingsPage.jsx
@@ -7,7 +7,7 @@ import TextField from '@material-ui/core/TextField'
import Button from '@material-ui/core/Button'
import { makeStyles } from '@material-ui/core/styles'
-import logout from '@wasp/auth/logout.js'
+import logout from '@wasp/auth/logout'
import updateUser from '@wasp/actions/updateUser'
diff --git a/examples/realworld/src/server/seeds.js b/examples/realworld/src/server/seeds.js
new file mode 100644
index 000000000..97ffcdc22
--- /dev/null
+++ b/examples/realworld/src/server/seeds.js
@@ -0,0 +1,29 @@
+import { createArticle } from './article/actions.js'
+
+export const devSeedSimple = async (prismaClient) => {
+ const user = await createUser(prismaClient, {
+ username: "RiuTheDog",
+ password: "bark1234",
+ email: "riu@wasp-lang.dev"
+ })
+
+ await createArticle(
+ {
+ title: "The Art of Barking",
+ description: "Elevate your barking to another level by following advice of a master barkerer Riu",
+ markdownContent: (
+ "# Barking - what is it really?"
+ + "\n\nThe fact that wolves don't bark but dogs do already tells us a lot about barking: "
+ + "it can't be studied without also studying humans and their influence on dogs."
+ + "\n\nTODO: bark bark bark"
+ ),
+ tags: [{ name: 'barking' }, { name: 'dogs' }]
+ },
+ { user, entities: { Article: prismaClient.article } }
+ )
+}
+
+async function createUser (prismaClient, data) {
+ const { password, ...newUser } = await prismaClient.user.create({ data })
+ return newUser
+}
\ No newline at end of file
diff --git a/examples/thoughts/main.wasp b/examples/thoughts/main.wasp
index b0a31356a..59d8758e6 100644
--- a/examples/thoughts/main.wasp
+++ b/examples/thoughts/main.wasp
@@ -1,20 +1,21 @@
app Thoughts {
wasp: {
- version: "^0.8.0"
+ version: "^0.10.0"
},
title: "Thoughts",
- db: { system: PostgreSQL },
+ db: {
+ system: PostgreSQL,
+ seeds: [ import { devSeedBasic } from "@server/seeds.js" ]
+ },
auth: {
userEntity: User,
- methods: {
- usernameAndPassword: {}
- },
+ methods: { usernameAndPassword: {} },
onAuthFailedRedirectTo: "/login"
},
dependencies: [
("react-markdown", "6.0.1"),
("color-hash", "2.0.1")
- ]
+ ],
}
route MainRoute { path: "/", to: MainPage }
diff --git a/examples/thoughts/src/client/LoginPage.jsx b/examples/thoughts/src/client/LoginPage.jsx
index 36538d3a4..35e47ce24 100644
--- a/examples/thoughts/src/client/LoginPage.jsx
+++ b/examples/thoughts/src/client/LoginPage.jsx
@@ -1,17 +1,19 @@
import React from 'react'
import { Link } from 'react-router-dom'
-import LoginForm from '@wasp/auth/forms/Login'
+import { LoginForm } from '@wasp/auth/forms/Login'
import addWaspSourceHeader from './addWaspSourceHeader'
const LoginPage = (props) => {
return (
<>
-
-
-
- I don't have an account yet (go to signup).
-
+
+
+
+
+ I don't have an account yet (go to signup).
+
+
)
}
diff --git a/examples/thoughts/src/client/SignupPage.jsx b/examples/thoughts/src/client/SignupPage.jsx
index a8ebc5479..a6c47ad40 100644
--- a/examples/thoughts/src/client/SignupPage.jsx
+++ b/examples/thoughts/src/client/SignupPage.jsx
@@ -1,17 +1,19 @@
import React from 'react'
import { Link } from 'react-router-dom'
-import SignupForm from '@wasp/auth/forms/Signup'
+import { SignupForm } from '@wasp/auth/forms/Signup'
import addWaspSourceHeader from './addWaspSourceHeader'
const SignupPage = (props) => {
return (
<>
-
-
-
- I already have an account (go to login).
-
+
+
+
+
+ I already have an account (go to login).
+
+
+
+
+
+ I don't have an account yet (go to signup).
+
+
)
}
-export default LoginPage
+export default LoginPage
\ No newline at end of file
diff --git a/examples/tutorials/TodoApp/src/client/SignupPage.jsx b/examples/tutorials/TodoApp/src/client/SignupPage.jsx
index f06c2e75a..5e0d79005 100644
--- a/examples/tutorials/TodoApp/src/client/SignupPage.jsx
+++ b/examples/tutorials/TodoApp/src/client/SignupPage.jsx
@@ -1,17 +1,19 @@
import { Link } from 'react-router-dom'
-import SignupForm from '@wasp/auth/forms/Signup'
+import { SignupForm } from '@wasp/auth/forms/Signup'
const SignupPage = () => {
return (
<>
-
-
-
- I already have an account (go to login).
-
+
+
+
+
+ I already have an account (go to login).
+
+
)
}
-export default SignupPage
+export default SignupPage
\ No newline at end of file
diff --git a/examples/waspleau/main.wasp b/examples/waspleau/main.wasp
index 758392b34..fd1ecf4ed 100644
--- a/examples/waspleau/main.wasp
+++ b/examples/waspleau/main.wasp
@@ -1,6 +1,6 @@
app waspleau {
wasp: {
- version: "^0.8.0"
+ version: "^0.10.0"
},
title: "Waspleau",
diff --git a/waspc/ChangeLog.md b/waspc/ChangeLog.md
index 01ef25853..6727b6f58 100644
--- a/waspc/ChangeLog.md
+++ b/waspc/ChangeLog.md
@@ -1,5 +1,233 @@
# Changelog
+## v0.10.0
+
+### Breaking changes
+
+- We changed `LoginForm` and `SignupForm` to use a named export instead of a default export, this means you must use them like this:
+ - `import { LoginForm } from '@wasp/auth/forms/Login'`
+ - `import { SignupForm } from '@wasp/auth/Signup'`
+- We renamed `useAuth.js` to `useAuth.ts` and you should import it like this: `import useAuth from '@wasp/auth/useAuth'` (without the `.js` extension)
+- We changed the type arguments for `useQuery` and `useAction` hooks. They now take two arguments (the `Error` type argument was removed):
+ - `Input` - This type argument specifies the type for the **request's payload**.
+ - `Output` - This type argument specifies the type for the **resposne's payload**.
+
+### Full-stack type safety for Operations
+Frontend code can now infer correct payload/response types for Queries and Actions from their definitions on the server.
+
+Define a Query on the server:
+```typescript
+export const getTask: GetTaskInfo, Task> =
+ async ({ id }, context) => {
+ // ...
+ }
+```
+
+Get properly typed functions and data on the frontend:
+```typescript
+import { useQuery } from "@wasp/queries"
+// Wasp knows the type of `getTask` thanks to your backend definition.
+import getTask from "@wasp/queries/getTask"
+
+export const TaskInfo = () => {
+ const {
+ // TypeScript knows `task` is a `Task | undefined` thanks to the
+ // backend definition.
+ data: task,
+ // TypeScript knows `isError` is a `boolean`.
+ isError,
+ // TypeScript knows `error` is of type `Error`.
+ error,
+ // TypeScript knows the second argument must be a `Pick` thanks
+ // to the backend definition.
+ } = useQuery(getTask, { id: 1 })
+
+ if (isError) {
+ return
Error during fetching tasks: {error.message || "unknown"}
+ }
+
+ // TypeScript forces you to perform this check.
+ return taskInfo === undefined ? (
+
Waiting for info...
+ ) : (
+
{taskInfo}
+ )
+}
+```
+The same feature is available for Actions.
+
+### Payloads compatible with Superjson
+Client and the server can now communicate with richer payloads.
+
+Return a Superjson-compatible object from your Operation:
+```typescript
+type FooInfo = { foos: Foo[], message: string, queriedAt: Date }
+
+const getFoos: GetFoo = (_args, context) => {
+ const foos = context.entities.Foo.findMany()
+ return {
+ foos,
+ message: "Here are some foos!",
+ queriedAt: new Date(),
+ }
+}
+```
+And seamlessly use it on the frontend:
+
+```typescript
+import getfoos from "@wasp/queries/getTask"
+
+const { data } = useQuery(getfoos)
+const { foos, message, queriedAt } = data
+// foos: Foo[]
+// message: string
+// queriedAt: Date
+```
+
+### E-mail authentication
+
+You can now use e-mail authentication in your Wasp app! This means that users can sign up and log in using their e-mail address. You get e-mail verification and password reset out of the box.
+
+```c
+app MyApp {
+ // ...
+ auth: {
+ // ...
+ email: {
+ fromField: {
+ name: "ToDO App",
+ email: "hello@itsme.com"
+ },
+ emailVerification: {
+ allowUnverifiedLogin: false,
+ getEmailContentFn: import { getVerificationEmailContent } from "@server/auth/email.js",
+ clientRoute: EmailVerificationRoute,
+ },
+ passwordReset: {
+ getEmailContentFn: import { getPasswordResetEmailContent } from "@server/auth/email.js",
+ clientRoute: PasswordResetRoute
+ },
+ },
+ }
+}
+```
+
+You can only use one of e-mail or username & password authentication in your app. You can't use both at the same time.
+
+### Auth UI components
+
+Wasp now provides a set of UI components for authentication. You can use them to quickly build a login and signup page for your app. The UI changes dynamically based on your Wasp config.
+
+We provide `LoginForm`, `SignupForm`, `ForgotPassworForm`, `ResetPasswordForm` and`VerifyEmailForm` components. You can import them from `@wasp/auth/forms` like:
+
+```js
+import { LoginForm } from '@wasp/auth/forms/Login'
+import { SignupForm } from '@wasp/auth/forms/Signup'
+import { ForgotPasswordForm } from '@wasp/auth/forms/ForgotPassword'
+import { ResetPasswordForm } from '@wasp/auth/forms/ResetPassword'
+import { VerifyEmailForm } from '@wasp/auth/forms/VerifyEmail'
+```
+
+### Database seeding
+You can now define JS/TS functions for seeding the database!
+
+```c
+app MyApp {
+ // ...
+ db: {
+ seeds: [
+ import { devSeedSimple } from "@server/dbSeeds.js",
+ import { prodSeed } from "@server/dbSeeds.js",
+ ]
+ }
+}
+```
+
+```js
+import { createTask } from './actions.js'
+
+export const devSeedSimple = async (prismaClient) => {
+ const { password, ...newUser } = await prismaClient.user.create({
+ username: "RiuTheDog", password: "bark1234"
+ })
+ await createTask(
+ { description: "Chase the cat" },
+ { user: newUser, entities: { Task: prismaClient.task } }
+ )
+}
+
+//...
+```
+
+Run `wasp db seed` to run database seeding. If there is only one seed, it will run that one, or it will interactively ask you to pick one.
+You can also do `wasp db seed ` to run a seed with specific name: for example, for the case above, you could do `wasp db seed prodSeed`.
+
+
+### The `api` keyword for defining an arbitrary endpoint and URL
+Need a specific endpoint, like `/healthcheck` or `/foo/callback`? Or need complete control of the response? Use an `api` to define one by tying a JS function to any HTTP method and path! For example:
+```ts
+// main.wasp
+api fooBar {
+ fn: import { foo } from "@server/apis.js",
+ entities: [Task],
+ httpRoute: (GET, "/foo/callback")
+}
+
+// server/api.ts
+import { FooBar } from '@wasp/apis/types'
+
+export const fooBar : FooBar = (req, res, context) => {
+ res.set('Access-Control-Allow-Origin', '*') // Example of modifying headers to override Wasp default CORS middleware.
+ res.json({ msg: `Hello, ${context.user?.username || "stranger"}!` })
+}
+```
+
+### E-mail sending support
+
+Wasp now supports sending e-mails! You can use the `emailSender` app property to configure the e-mail provider and optionally the `defaultFrom` address. Then, you can use the `send` function in your backend code to send e-mails.
+
+```ts
+// main.wasp
+app MyApp {
+ emailSender: {
+ provider: SendGrid,
+ defaultFrom: {
+ name: "My App",
+ email: "myapp@domain.com"
+ },
+ },
+}
+
+// server/actions.ts
+import { emailSender } from '@wasp/email/index.js'
+
+// In some action handler...
+const info = await emailSender.send({
+ to: 'user@domain.com',
+ subject: 'Saying hello',
+ text: 'Hello world',
+ html: 'Hello world'
+})
+```
+
+### `wasp start db` -> Wasp can now run your dev database for you with a single command
+
+Moving from SQLite to PostgreSQL with Wasp can feel like increase in complexity, because suddenly you have to care about running your PostgreSQL database, providing connection URL for it via env var, and if you checkout somebody's else Wasp project, or your old Wasp project that you have no memory of any more, you also have to figure all that out.
+
+To help with that, we now added `wasp start db`, which runs a development database for you!
+That it, all you need to do is run `wasp start db` and you are good to go. No env var setting, no remembering how to run the db.
+
+NOTE: Requires `docker` to be installed and in `PATH`, and docker daemon to be running.
+
+### `wasp test client` -> Wasp can now test your web app code
+By leveraging Vitest and some supporting libraries, Wasp now makes it super easy to add unit tests and React component tests to your frontend codebase.
+
+### `pg-boss` upgraded to latest version (8.4.2)
+This `pg-boss` release fixes an issue where the node server would exit due to an unhandled exception when the DB connection was lost.
+
+### Bug fixes
+- Starts the process of removing the coupling between `usernameAndPassword` and social logins. Now, your `userEntity` no longer requires a `username` or `password` field if you only want to use Google/GitHub for auth.
+
## v0.9.0
### BREAKING CHANGES
@@ -10,7 +238,7 @@
We moved away from using Create React App for the client app. This means that dev startup time will be much faster and we are following the latest best practices for building web apps with React.
### Express `app` and http `server` available in server `setupFn`
-- Wasp now passes in a context to the server `setupFn` that contains Express `app` and http `server` objects. This can be used as an escape hatch for things like custom routes or WebSocket support.
+Wasp now passes in a context to the server `setupFn` that contains Express `app` and http `server` objects. This can be used as an escape hatch for things like custom routes or WebSocket support.
## v0.8.2
diff --git a/waspc/cabal.project b/waspc/cabal.project
index 3077866d8..a129678a1 100644
--- a/waspc/cabal.project
+++ b/waspc/cabal.project
@@ -20,4 +20,4 @@ jobs: $ncpus
test-show-details: direct
-- WARNING: Run cabal update if your local package index is older than this date.
-index-state: 2022-03-22T14:16:26Z
+index-state: 2023-03-09T09:15:49Z
diff --git a/waspc/cli/exe/Main.hs b/waspc/cli/exe/Main.hs
index b02cfdd3d..fec6b91ee 100644
--- a/waspc/cli/exe/Main.hs
+++ b/waspc/cli/exe/Main.hs
@@ -5,6 +5,7 @@ import qualified Control.Concurrent.Async as Async
import qualified Control.Exception as E
import Control.Monad (void)
import Data.Char (isSpace)
+import Data.List (intercalate)
import Main.Utf8 (withUtf8)
import System.Environment (getArgs)
import Wasp.Cli.Command (runCommand)
@@ -14,14 +15,19 @@ import qualified Wasp.Cli.Command.Call as Command.Call
import Wasp.Cli.Command.Clean (clean)
import Wasp.Cli.Command.Compile (compile)
import Wasp.Cli.Command.CreateNewProject (createNewProject)
-import Wasp.Cli.Command.Db (runDbCommand, studio)
+import Wasp.Cli.Command.Db (runDbCommand)
import qualified Wasp.Cli.Command.Db.Migrate as Command.Db.Migrate
+import qualified Wasp.Cli.Command.Db.Reset as Command.Db.Reset
+import qualified Wasp.Cli.Command.Db.Seed as Command.Db.Seed
+import qualified Wasp.Cli.Command.Db.Studio as Command.Db.Studio
import Wasp.Cli.Command.Deploy (deploy)
import Wasp.Cli.Command.Deps (deps)
import Wasp.Cli.Command.Dockerfile (printDockerfile)
import Wasp.Cli.Command.Info (info)
import Wasp.Cli.Command.Start (start)
+import qualified Wasp.Cli.Command.Start.Db as Command.Start.Db
import qualified Wasp.Cli.Command.Telemetry as Telemetry
+import Wasp.Cli.Command.Test (test)
import Wasp.Cli.Command.Uninstall (uninstall)
import Wasp.Cli.Command.WaspLS (runWaspLS)
import Wasp.Cli.Terminal (title)
@@ -33,8 +39,9 @@ main :: IO ()
main = withUtf8 . (`E.catch` handleInternalErrors) $ do
args <- getArgs
let commandCall = case args of
- ["new", projectName] -> Command.Call.New projectName
+ ("new" : projectName : newArgs) -> Command.Call.New projectName newArgs
["start"] -> Command.Call.Start
+ ["start", "db"] -> Command.Call.StartDb
["clean"] -> Command.Call.Clean
["compile"] -> Command.Call.Compile
("db" : dbArgs) -> Command.Call.Db dbArgs
@@ -50,13 +57,15 @@ main = withUtf8 . (`E.catch` handleInternalErrors) $ do
["completion:list"] -> Command.Call.BashCompletionListCommands
("waspls" : _) -> Command.Call.WaspLS
("deploy" : deployArgs) -> Command.Call.Deploy deployArgs
+ ("test" : testArgs) -> Command.Call.Test testArgs
_ -> Command.Call.Unknown args
telemetryThread <- Async.async $ runCommand $ Telemetry.considerSendingData commandCall
case commandCall of
- Command.Call.New projectName -> runCommand $ createNewProject projectName
+ Command.Call.New projectName newArgs -> runCommand $ createNewProject projectName newArgs
Command.Call.Start -> runCommand start
+ Command.Call.StartDb -> runCommand Command.Start.Db.start
Command.Call.Clean -> runCommand clean
Command.Call.Compile -> runCommand compile
Command.Call.Db dbArgs -> dbCli dbArgs
@@ -73,6 +82,7 @@ main = withUtf8 . (`E.catch` handleInternalErrors) $ do
Command.Call.Unknown _ -> printUsage
Command.Call.WaspLS -> runWaspLS
Command.Call.Deploy deployArgs -> runCommand $ deploy deployArgs
+ Command.Call.Test testArgs -> runCommand $ test testArgs
-- If sending of telemetry data is still not done 1 second since commmand finished, abort it.
-- We also make sure here to catch all errors that might get thrown and silence them.
@@ -89,36 +99,46 @@ printUsage :: IO ()
printUsage =
putStrLn $
unlines
+{- ORMOLU_DISABLE -}
[ title "USAGE",
- " wasp [command-args]",
- "",
+ " wasp [command-args]",
+ "",
title "COMMANDS",
title " GENERAL",
- cmd " new Creates new Wasp project.",
- cmd " version Prints current version of CLI.",
- cmd " waspls Run Wasp Language Server. Add --help to get more info.",
- cmd " completion Prints help on bash completion.",
- cmd " uninstall Removes Wasp from your system.",
+ cmd " new [args] Creates a new Wasp project.",
+ " OPTIONS:",
+ " -t|--template ",
+ " Check out the templates list here: https://github.com/wasp-lang/starters",
+ "",
+ cmd " version Prints current version of CLI.",
+ cmd " waspls Run Wasp Language Server. Add --help to get more info.",
+ cmd " completion Prints help on bash completion.",
+ cmd " uninstall Removes Wasp from your system.",
title " IN PROJECT",
- cmd " start Runs Wasp app in development mode, watching for file changes.",
- cmd " db [args] Executes a database command. Run 'wasp db' for more info.",
- cmd " clean Deletes all generated code and other cached artifacts. Wasp equivalent of 'have you tried closing and opening it again?'.",
- cmd " build Generates full web app code, ready for deployment. Use when deploying or ejecting.",
- cmd " deploy Deploys your Wasp app to cloud hosting providers.",
- cmd " telemetry Prints telemetry status.",
- cmd " deps Prints the dependencies that Wasp uses in your project.",
- cmd " dockerfile Prints the contents of the Wasp generated Dockerfile.",
- cmd " info Prints basic information about current Wasp project.",
- "",
+ cmd " start Runs Wasp app in development mode, watching for file changes.",
+ cmd " start db Starts managed development database for you.",
+ cmd " db [args] Executes a database command. Run 'wasp db' for more info.",
+ cmd " clean Deletes all generated code and other cached artifacts.",
+ " Wasp equivalent of 'have you tried closing and opening it again?'.",
+ cmd " build Generates full web app code, ready for deployment. Use when deploying or ejecting.",
+ cmd " deploy Deploys your Wasp app to cloud hosting providers.",
+ cmd " telemetry Prints telemetry status.",
+ cmd " deps Prints the dependencies that Wasp uses in your project.",
+ cmd " dockerfile Prints the contents of the Wasp generated Dockerfile.",
+ cmd " info Prints basic information about current Wasp project.",
+ cmd " test Executes tests in your project.",
+ "",
title "EXAMPLES",
- " wasp new MyApp",
- " wasp start",
- " wasp db migrate-dev",
- "",
- Term.applyStyles [Term.Green] "Docs:" ++ " https://wasp-lang.dev/docs",
+ " wasp new MyApp",
+ " wasp new MyApp -t waspello",
+ " wasp start",
+ " wasp db migrate-dev",
+ "",
+ Term.applyStyles [Term.Green] "Docs:" ++ " https://wasp-lang.dev/docs",
Term.applyStyles [Term.Magenta] "Discord (chat):" ++ " https://discord.gg/rzdnErX",
- Term.applyStyles [Term.Cyan] "Newsletter:" ++ " https://wasp-lang.dev/#signup"
+ Term.applyStyles [Term.Cyan] "Newsletter:" ++ " https://wasp-lang.dev/#signup"
]
+{- ORMOLU_ENABLE -}
printVersion :: IO ()
printVersion = do
@@ -128,44 +148,56 @@ printVersion = do
"",
"If you wish to install/switch to the latest version of Wasp, do:",
" curl -sSL https://get.wasp-lang.dev/installer.sh | sh -s",
- "or do",
- " curl -sSL https://get.wasp-lang.dev/installer.sh | sh -s -- -v x.y.z",
- "if you want specific x.y.z version of Wasp.",
"",
- "Check https://github.com/wasp-lang/wasp/releases for the list of valid versions, include the latest one."
+ "If you want specific x.y.z version of Wasp, do:",
+ " curl -sSL https://get.wasp-lang.dev/installer.sh | sh -s -- -v x.y.z",
+ "",
+ "Check https://github.com/wasp-lang/wasp/releases for the list of valid versions, including the latest one."
]
-- TODO(matija): maybe extract to a separate module, e.g. DbCli.hs?
dbCli :: [String] -> IO ()
dbCli args = case args of
+ ["start"] -> runCommand Command.Start.Db.start
"migrate-dev" : optionalMigrateArgs -> runDbCommand $ Command.Db.Migrate.migrateDev optionalMigrateArgs
- ["studio"] -> runDbCommand studio
+ ["reset"] -> runDbCommand Command.Db.Reset.reset
+ ["seed"] -> runDbCommand $ Command.Db.Seed.seed Nothing
+ ["seed", seedName] -> runDbCommand $ Command.Db.Seed.seed $ Just seedName
+ ["studio"] -> runDbCommand Command.Db.Studio.studio
_ -> printDbUsage
printDbUsage :: IO ()
printDbUsage =
putStrLn $
unlines
+{- ORMOLU_DISABLE -}
[ title "USAGE",
- " wasp db [command-args]",
- "",
+ " wasp db [command-args]",
+ "",
title "COMMANDS",
- cmd
- ( " migrate-dev Ensures dev database corresponds to the current state of schema(entities):\n"
- <> " - Generates a new migration if there are changes in the schema.\n"
- <> " - Applies any pending migrations to the database either using the supplied migration name or asking for one.\n"
- <> "\nOPTIONS:\n"
- <> " --name [migration-name]\n"
- <> " --create-only\n"
- ),
- cmd " studio GUI for inspecting your database.",
- "",
+ cmd " start Alias for `wasp start db`.",
+ cmd " reset Drops all data and tables from development database and re-applies all migrations.",
+ cmd " seed [name] Executes a db seed function (specified via app.db.seeds).",
+ cmd " If there are multiple seeds, you can specify a seed to execute by providing its name,",
+ cmd " or if not then you will be asked to provide the name interactively.",
+ cmd $ intercalate "\n" [
+ " migrate-dev Ensures dev database corresponds to the current state of schema(entities):",
+ " - Generates a new migration if there are changes in the schema.",
+ " - Applies any pending migrations to the database either using the",
+ " supplied migration name or asking for one.",
+ " OPTIONS:",
+ " --name [migration-name]",
+ " --create-only"
+ ],
+ cmd " studio GUI for inspecting your database.",
+ "",
title "EXAMPLES",
- " wasp db migrate-dev",
- " wasp db migrate-dev --name \"Added User entity\"",
- " wasp db migrate-dev --create-only",
- " wasp db studio"
+ " wasp db migrate-dev",
+ " wasp db migrate-dev --name \"Added User entity\"",
+ " wasp db migrate-dev --create-only",
+ " wasp db studio"
]
+{- ORMOLU_ENABLE -}
cmd :: String -> String
cmd = mapFirstWord (Term.applyStyles [Term.Yellow, Term.Bold])
diff --git a/waspc/cli/src/Wasp/Cli/Command/Build.hs b/waspc/cli/src/Wasp/Cli/Command/Build.hs
index 6aed94fdb..906de11f0 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Build.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Build.hs
@@ -21,10 +21,10 @@ import Wasp.Cli.Command.Message (cliSendMessageC)
import qualified Wasp.Cli.Common as Common
import Wasp.Cli.Message (cliSendMessage)
import Wasp.CompileOptions (CompileOptions (..))
+import qualified Wasp.Generator
import Wasp.Generator.Monad (GeneratorWarning (GeneratorNeedsMigrationWarning))
-import Wasp.Lib (CompileError, CompileWarning)
-import qualified Wasp.Lib
import qualified Wasp.Message as Msg
+import Wasp.Project (CompileError, CompileWarning)
-- | Builds Wasp project that the current working directory is part of.
-- Does all the steps, from analysis to generation, and at the end writes generated code
@@ -61,7 +61,7 @@ build = do
buildIO ::
Path' Abs (Dir Common.WaspProjectDir) ->
- Path' Abs (Dir Wasp.Lib.ProjectRootDir) ->
+ Path' Abs (Dir Wasp.Generator.ProjectRootDir) ->
IO ([CompileWarning], [CompileError])
buildIO waspProjectDir buildDir = compileIOWithOptions options waspProjectDir buildDir
where
diff --git a/waspc/cli/src/Wasp/Cli/Command/Call.hs b/waspc/cli/src/Wasp/Cli/Command/Call.hs
index e931cf4ae..994dae1a9 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Call.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Call.hs
@@ -1,12 +1,13 @@
module Wasp.Cli.Command.Call where
data Call
- = New String -- project name
+ = New ProjectName Arguments -- project name, new args
| Start
+ | StartDb
| Clean
| Uninstall
| Compile
- | Db [String] -- db args
+ | Db Arguments -- db args
| Build
| Version
| Telemetry
@@ -17,5 +18,10 @@ data Call
| GenerateBashCompletionScript
| BashCompletionListCommands
| WaspLS
- | Deploy [String] -- deploy cmd passthrough args
- | Unknown [String] -- all args
+ | Deploy Arguments -- deploy cmd passthrough args
+ | Test Arguments -- "client" | "server", then test cmd passthrough args
+ | Unknown Arguments -- all args
+
+type ProjectName = String
+
+type Arguments = [String]
diff --git a/waspc/cli/src/Wasp/Cli/Command/Common.hs b/waspc/cli/src/Wasp/Cli/Command/Common.hs
index e15d789d6..a7642711a 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Common.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Common.hs
@@ -1,24 +1,25 @@
module Wasp.Cli.Command.Common
( findWaspProjectRootDirFromCwd,
findWaspProjectRoot,
+ readWaspCompileInfo,
+ throwIfExeIsNotAvailable,
)
where
-import Control.Monad (unless, when)
-import Control.Monad.Except (throwError)
-import Control.Monad.IO.Class (liftIO)
+import Control.Monad.Except
+import qualified Control.Monad.Except as E
import Data.Maybe (fromJust)
import StrongPath (Abs, Dir, Path')
import qualified StrongPath as SP
-import System.Directory
- ( doesFileExist,
- doesPathExist,
- getCurrentDirectory,
- )
+import StrongPath.Operations
+import System.Directory (doesFileExist, doesPathExist, findExecutable, getCurrentDirectory)
import qualified System.FilePath as FP
import Wasp.Cli.Command (Command, CommandError (..))
import Wasp.Cli.Common (dotWaspRootFileInWaspProjectDir)
-import Wasp.Common (WaspProjectDir)
+import qualified Wasp.Cli.Common as Cli.Common
+import Wasp.Project (WaspProjectDir)
+import Wasp.Util (ifM)
+import qualified Wasp.Util.IO as IOUtil
findWaspProjectRoot :: Path' Abs (Dir ()) -> Command (Path' Abs (Dir WaspProjectDir))
findWaspProjectRoot currentDir = do
@@ -45,3 +46,23 @@ findWaspProjectRootDirFromCwd :: Command (Path' Abs (Dir WaspProjectDir))
findWaspProjectRootDirFromCwd = do
absCurrentDir <- liftIO getCurrentDirectory
findWaspProjectRoot (fromJust $ SP.parseAbsDir absCurrentDir)
+
+readWaspCompileInfo :: Path' Abs (Dir WaspProjectDir) -> IO String
+readWaspCompileInfo waspDir =
+ ifM
+ (IOUtil.doesFileExist dotWaspInfoFile)
+ (IOUtil.readFile dotWaspInfoFile)
+ (return "No compile information found")
+ where
+ dotWaspInfoFile =
+ waspDir Cli.Common.dotWaspDirInWaspProjectDir
+ Cli.Common.generatedCodeDirInDotWaspDir
+ Cli.Common.dotWaspInfoFileInGeneratedCodeDir
+
+throwIfExeIsNotAvailable :: String -> String -> Command ()
+throwIfExeIsNotAvailable exeName explanationMsg = do
+ liftIO (findExecutable exeName) >>= \case
+ Just _ -> return ()
+ Nothing ->
+ E.throwError $
+ CommandError ("Couldn't find `" <> exeName <> "` executable") explanationMsg
diff --git a/waspc/cli/src/Wasp/Cli/Command/Compile.hs b/waspc/cli/src/Wasp/Cli/Command/Compile.hs
index bb9231ceb..8c6c62010 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Compile.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Compile.hs
@@ -6,6 +6,8 @@ module Wasp.Cli.Command.Compile
defaultCompileOptions,
printCompilationResult,
printWarningsAndErrorsIfAny,
+ analyze,
+ analyzeWithOptions,
)
where
@@ -14,6 +16,7 @@ import Control.Monad.Except (throwError)
import Control.Monad.IO.Class (liftIO)
import Data.List (intercalate)
import StrongPath (Abs, Dir, Path', ())
+import qualified Wasp.AppSpec as AS
import Wasp.Cli.Command (Command, CommandError (..))
import Wasp.Cli.Command.Common
( findWaspProjectRootDirFromCwd,
@@ -21,11 +24,11 @@ import Wasp.Cli.Command.Common
import Wasp.Cli.Command.Message (cliSendMessageC)
import qualified Wasp.Cli.Common as Common
import Wasp.Cli.Message (cliSendMessage)
-import Wasp.Common (WaspProjectDir)
import Wasp.CompileOptions (CompileOptions (..))
-import Wasp.Lib (CompileError, CompileWarning)
-import qualified Wasp.Lib
+import qualified Wasp.Generator
import qualified Wasp.Message as Msg
+import Wasp.Project (CompileError, CompileWarning, WaspProjectDir)
+import qualified Wasp.Project
-- | Same like 'compileWithOptions', but with default compile options.
compile :: Command [CompileWarning]
@@ -98,18 +101,18 @@ formatErrorOrWarningMessages = intercalate "\n" . map ("- " ++)
-- in given outDir directory.
compileIO ::
Path' Abs (Dir WaspProjectDir) ->
- Path' Abs (Dir Wasp.Lib.ProjectRootDir) ->
+ Path' Abs (Dir Wasp.Generator.ProjectRootDir) ->
IO ([CompileWarning], [CompileError])
compileIO waspProjectDir outDir =
compileIOWithOptions (defaultCompileOptions waspProjectDir) waspProjectDir outDir
compileIOWithOptions ::
CompileOptions ->
- Path' Abs (Dir Common.WaspProjectDir) ->
- Path' Abs (Dir Wasp.Lib.ProjectRootDir) ->
+ Path' Abs (Dir WaspProjectDir) ->
+ Path' Abs (Dir Wasp.Generator.ProjectRootDir) ->
IO ([CompileWarning], [CompileError])
compileIOWithOptions options waspProjectDir outDir =
- Wasp.Lib.compile waspProjectDir outDir options
+ Wasp.Project.compile waspProjectDir outDir options
defaultCompileOptions :: Path' Abs (Dir WaspProjectDir) -> CompileOptions
defaultCompileOptions waspProjectDir =
@@ -121,3 +124,19 @@ defaultCompileOptions waspProjectDir =
sendMessage = cliSendMessage,
generatorWarningsFilter = id
}
+
+analyze :: Path' Abs (Dir WaspProjectDir) -> Command AS.AppSpec
+analyze waspProjectDir = do
+ analyzeWithOptions waspProjectDir $ defaultCompileOptions waspProjectDir
+
+-- | Analyzes Wasp project that the current working directory is a part of and returns
+-- AppSpec. So same like compilation, but it stops before any code generation.
+-- Throws if there were any compilation errors.
+analyzeWithOptions :: Path' Abs (Dir WaspProjectDir) -> CompileOptions -> Command AS.AppSpec
+analyzeWithOptions waspProjectDir options = do
+ liftIO (Wasp.Project.analyzeWaspProject waspProjectDir options) >>= \case
+ Left errors ->
+ throwError $
+ CommandError "Analyzing wasp project failed" $
+ show (length errors) <> " errors found:\n" <> formatErrorOrWarningMessages errors
+ Right spec -> return spec
diff --git a/waspc/cli/src/Wasp/Cli/Command/CreateNewProject.hs b/waspc/cli/src/Wasp/Cli/Command/CreateNewProject.hs
index 9bfc62806..43489f58e 100644
--- a/waspc/cli/src/Wasp/Cli/Command/CreateNewProject.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/CreateNewProject.hs
@@ -3,50 +3,63 @@ module Wasp.Cli.Command.CreateNewProject
)
where
+import Control.Monad (when)
import Control.Monad.Except (throwError)
import Control.Monad.IO.Class (liftIO)
import Data.List (intercalate)
+import Data.Maybe (isJust)
+import qualified Data.Text as T
import Path.IO (copyDirRecur, doesDirExist)
import StrongPath (Abs, Dir, Path, Path', System, parseAbsDir, reldir, relfile, ())
import StrongPath.Path (toPathAbsDir)
import System.Directory (getCurrentDirectory)
import qualified System.FilePath as FP
+import System.Process (callCommand)
import Text.Printf (printf)
+import UnliftIO.Exception (SomeException, try)
import Wasp.Analyzer.Parser (isValidWaspIdentifier)
import Wasp.Cli.Command (Command, CommandError (..))
-import Wasp.Common (WaspProjectDir)
-import qualified Wasp.Common as Common (WaspProjectDir)
+import Wasp.Cli.Command.Call (Arguments, ProjectName)
+import Wasp.Cli.Command.Message (cliSendMessageC)
import qualified Wasp.Data as Data
-import Wasp.Util (indent, kebabToCamelCase)
+import qualified Wasp.Message as Msg
+import Wasp.Project (WaspProjectDir)
+import qualified Wasp.SemanticVersion as SV
+import Wasp.Util (indent, kebabToCamelCase, whenM)
import qualified Wasp.Util.IO as IOUtil
import qualified Wasp.Util.Terminal as Term
import qualified Wasp.Version as WV
data ProjectInfo = ProjectInfo
{ _projectName :: String,
- _appName :: String
+ _appName :: String,
+ _templateName :: Maybe String
}
-createNewProject :: String -> Command ()
-createNewProject projectNameCandidate = do
- projectInfo <- parseProjectInfo projectNameCandidate
+createNewProject :: ProjectName -> Arguments -> Command ()
+createNewProject projectName newArgs = do
+ projectInfo <- parseProjectInfo projectName newArgs
createWaspProjectDir projectInfo
liftIO $ printGettingStartedInstructions $ _projectName projectInfo
where
- printGettingStartedInstructions :: String -> IO ()
- printGettingStartedInstructions projectName = do
- putStrLn $ Term.applyStyles [Term.Green] ("Created new Wasp app in ./" ++ projectName ++ " directory!")
+ printGettingStartedInstructions :: ProjectName -> IO ()
+ printGettingStartedInstructions projectFolder = do
+ putStrLn $ Term.applyStyles [Term.Green] ("Created new Wasp app in ./" ++ projectFolder ++ " directory!")
putStrLn "To run it, do:"
putStrLn ""
- putStrLn $ Term.applyStyles [Term.Bold] (" cd " ++ projectName)
+ putStrLn $ Term.applyStyles [Term.Bold] (" cd " ++ projectFolder)
putStrLn $ Term.applyStyles [Term.Bold] " wasp start"
--- Takes a project name String
--- Returns either the ProjectInfo type that contains both the Project name
--- and the App name (which might be the same), or an error describing why the name is invalid
-parseProjectInfo :: String -> Command ProjectInfo
-parseProjectInfo name
- | isValidWaspIdentifier appName = return $ ProjectInfo name appName
+parseProjectInfo :: ProjectName -> Arguments -> Command ProjectInfo
+parseProjectInfo projectName newArgs = case newArgs of
+ [] -> createProjectInfo projectName Nothing
+ [templateFlag, templateName] | templateFlag `elem` ["--template", "-t"] -> createProjectInfo projectName (Just templateName)
+ [templateFlag] | templateFlag `elem` ["--template", "-t"] -> throwProjectCreationError "You must provide a template name."
+ _anyOtherArgs -> throwProjectCreationError "Invalid arguments for 'wasp new' command."
+
+createProjectInfo :: ProjectName -> Maybe String -> Command ProjectInfo
+createProjectInfo name templateName
+ | isValidWaspIdentifier appName = return $ ProjectInfo {_projectName = name, _appName = appName, _templateName = templateName}
| otherwise =
throwProjectCreationError $
intercalate
@@ -60,17 +73,25 @@ parseProjectInfo name
appName = kebabToCamelCase name
createWaspProjectDir :: ProjectInfo -> Command ()
-createWaspProjectDir projectInfo = do
+createWaspProjectDir projectInfo@ProjectInfo {_templateName = template} = do
absWaspProjectDir <- getAbsoluteWaspProjectDir projectInfo
dirExists <- doesDirExist $ toPathAbsDir absWaspProjectDir
- if dirExists
- then throwProjectCreationError $ show absWaspProjectDir ++ " is an existing directory"
- else liftIO $ do
- initializeProjectFromSkeleton absWaspProjectDir
- writeMainWaspFile absWaspProjectDir projectInfo
+
+ when dirExists $
+ throwProjectCreationError $
+ show absWaspProjectDir ++ " is an existing directory"
+
+ createProjectFromProjectInfo absWaspProjectDir
+ where
+ createProjectFromProjectInfo absWaspProjectDir = do
+ if isJust template
+ then createProjectFromTemplate absWaspProjectDir projectInfo
+ else liftIO $ do
+ initializeProjectFromSkeleton absWaspProjectDir
+ writeMainWaspFile absWaspProjectDir projectInfo
getAbsoluteWaspProjectDir :: ProjectInfo -> Command (Path System Abs (Dir WaspProjectDir))
-getAbsoluteWaspProjectDir (ProjectInfo projectName _) = do
+getAbsoluteWaspProjectDir (ProjectInfo projectName _ _) = do
absCwd <- liftIO getCurrentDirectory
case parseAbsDir $ absCwd FP. projectName of
Right sp -> return sp
@@ -79,21 +100,21 @@ getAbsoluteWaspProjectDir (ProjectInfo projectName _) = do
"Failed to parse absolute path to wasp project dir: " ++ show err
-- Copies prepared files to the new project directory.
-initializeProjectFromSkeleton :: Path' Abs (Dir Common.WaspProjectDir) -> IO ()
+initializeProjectFromSkeleton :: Path' Abs (Dir WaspProjectDir) -> IO ()
initializeProjectFromSkeleton absWaspProjectDir = do
dataDir <- Data.getAbsDataDirPath
let absSkeletonDir = dataDir [reldir|Cli/templates/new|]
copyDirRecur (toPathAbsDir absSkeletonDir) (toPathAbsDir absWaspProjectDir)
writeMainWaspFile :: Path System Abs (Dir WaspProjectDir) -> ProjectInfo -> IO ()
-writeMainWaspFile waspProjectDir (ProjectInfo projectName appName) = IOUtil.writeFile absMainWaspFile mainWaspFileContent
+writeMainWaspFile waspProjectDir (ProjectInfo projectName appName _) = IOUtil.writeFile absMainWaspFile mainWaspFileContent
where
absMainWaspFile = waspProjectDir [relfile|main.wasp|]
mainWaspFileContent =
unlines
[ "app %s {" `printf` appName,
" wasp: {",
- " version: \"^%s\"" `printf` show WV.waspVersion,
+ " version: \"%s\"" `printf` waspVersionBounds,
" },",
" title: \"%s\"" `printf` projectName,
"}",
@@ -104,5 +125,63 @@ writeMainWaspFile waspProjectDir (ProjectInfo projectName appName) = IOUtil.writ
"}"
]
+createProjectFromTemplate :: Path System Abs (Dir WaspProjectDir) -> ProjectInfo -> Command ()
+createProjectFromTemplate absWaspProjectDir ProjectInfo {_appName = appName, _projectName = projectName, _templateName = maybeTemplateName} = do
+ cliSendMessageC $ Msg.Start "Creating project from template..."
+
+ templatePath <- getPathToRemoteTemplate maybeTemplateName
+
+ let projectDir = projectName
+
+ fetchTemplate templatePath projectDir
+ ensureTemplateWasFetched
+
+ replacePlaceholdersInWaspFile
+ where
+ getPathToRemoteTemplate :: Maybe String -> Command String
+ getPathToRemoteTemplate = \case
+ Just templateName -> return $ waspTemplatesRepo ++ "/" ++ templateName
+ Nothing -> throwProjectCreationError "Template name is not provided."
+ where
+ -- gh: prefix means Github repo
+ waspTemplatesRepo = "gh:wasp-lang/starters"
+
+ fetchTemplate :: String -> String -> Command ()
+ fetchTemplate templatePath projectDir = do
+ liftIO (try executeCmd) >>= \case
+ Left (e :: SomeException) -> throwProjectCreationError $ "Failed to create project from template: " ++ show e
+ Right _ -> return ()
+ where
+ executeCmd = callCommand $ unwords command
+ command = ["npx", "giget@latest", templatePath, projectDir]
+
+ -- gitget doesn't fail if the template dir doesn't exist in the repo, so we need to check if the directory exists.
+ ensureTemplateWasFetched :: Command ()
+ ensureTemplateWasFetched =
+ whenM (liftIO $ IOUtil.isDirectoryEmpty absWaspProjectDir) $
+ throwProjectCreationError "Are you sure that the template exists? ๐ค Check the list of templates here: https://github.com/wasp-lang/starters"
+
+ replacePlaceholdersInWaspFile :: Command ()
+ replacePlaceholdersInWaspFile = liftIO $ do
+ mainWaspFileContent <- IOUtil.readFileStrict absMainWaspFile
+
+ let replacedContent =
+ foldl
+ (\acc (placeholder, value) -> T.replace (T.pack placeholder) (T.pack value) acc)
+ mainWaspFileContent
+ replacements
+
+ IOUtil.writeFileFromText absMainWaspFile replacedContent
+ where
+ absMainWaspFile = absWaspProjectDir [relfile|main.wasp|]
+ replacements =
+ [ ("__waspAppName__", appName),
+ ("__waspProjectName__", projectName),
+ ("__waspVersion__", waspVersionBounds)
+ ]
+
+waspVersionBounds :: String
+waspVersionBounds = show (SV.backwardsCompatibleWith WV.waspVersion)
+
throwProjectCreationError :: String -> Command a
throwProjectCreationError = throwError . CommandError "Project creation failed"
diff --git a/waspc/cli/src/Wasp/Cli/Command/Db.hs b/waspc/cli/src/Wasp/Cli/Command/Db.hs
index afb2d7ff4..66abe13d9 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Db.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Db.hs
@@ -1,23 +1,13 @@
module Wasp.Cli.Command.Db
( runDbCommand,
- studio,
)
where
-import Control.Concurrent (newChan)
-import Control.Concurrent.Async (concurrently)
-import Control.Monad.IO.Class (liftIO)
-import StrongPath (())
import Wasp.Cli.Command (Command, runCommand)
import Wasp.Cli.Command.Common (findWaspProjectRootDirFromCwd)
import Wasp.Cli.Command.Compile (compileWithOptions, defaultCompileOptions)
-import Wasp.Cli.Command.Message (cliSendMessageC)
-import qualified Wasp.Cli.Common as Common
import Wasp.CompileOptions (CompileOptions (generatorWarningsFilter))
-import Wasp.Generator.DbGenerator.Jobs (runStudio)
-import Wasp.Generator.Job.IO (readJobMessagesAndPrintThemPrefixed)
import Wasp.Generator.Monad (GeneratorWarning (GeneratorNeedsMigrationWarning))
-import qualified Wasp.Message as Msg
runDbCommand :: Command a -> IO ()
runDbCommand = runCommand . makeDbCommand
@@ -44,17 +34,3 @@ makeDbCommand cmd = do
_ -> True
)
}
-
--- TODO(matija): should we extract this into a separate file, like we did for migrate?
-studio :: Command ()
-studio = do
- waspProjectDir <- findWaspProjectRootDirFromCwd
- let genProjectDir =
- waspProjectDir Common.dotWaspDirInWaspProjectDir
- Common.generatedCodeDirInDotWaspDir
-
- cliSendMessageC $ Msg.Start "Running studio..."
- chan <- liftIO newChan
-
- _ <- liftIO $ concurrently (readJobMessagesAndPrintThemPrefixed chan) (runStudio genProjectDir chan)
- error "This should never happen, studio should never stop."
diff --git a/waspc/cli/src/Wasp/Cli/Command/Db/Migrate.hs b/waspc/cli/src/Wasp/Cli/Command/Db/Migrate.hs
index 9d487d7d6..d1cd7d802 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Db/Migrate.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Db/Migrate.hs
@@ -13,12 +13,11 @@ import Wasp.Cli.Command.Common
)
import Wasp.Cli.Command.Message (cliSendMessageC)
import qualified Wasp.Cli.Common as Cli.Common
-import Wasp.Common (DbMigrationsDir)
-import qualified Wasp.Common
import Wasp.Generator.Common (ProjectRootDir)
import Wasp.Generator.DbGenerator.Common (MigrateArgs (..), defaultMigrateArgs)
import qualified Wasp.Generator.DbGenerator.Operations as DbOps
import qualified Wasp.Message as Msg
+import Wasp.Project.Db.Migrations (DbMigrationsDir, dbMigrationsDirInWaspProjectDir)
-- | NOTE(shayne): Performs database schema migration (based on current schema) in the generated project.
-- This assumes the wasp project migrations dir was copied from wasp source project by a previous compile.
@@ -26,14 +25,13 @@ import qualified Wasp.Message as Msg
migrateDev :: [String] -> Command ()
migrateDev optionalMigrateArgs = do
waspProjectDir <- findWaspProjectRootDirFromCwd
- let waspDbMigrationsDir = waspProjectDir Wasp.Common.dbMigrationsDirInWaspProjectDir
+ let waspDbMigrationsDir = waspProjectDir dbMigrationsDirInWaspProjectDir
let projectRootDir =
waspProjectDir
Cli.Common.dotWaspDirInWaspProjectDir
Cli.Common.generatedCodeDirInDotWaspDir
migrateDatabase optionalMigrateArgs projectRootDir waspDbMigrationsDir
- generatePrismaClients projectRootDir
migrateDatabase :: [String] -> Path' Abs (Dir ProjectRootDir) -> Path' Abs (Dir DbMigrationsDir) -> Command ()
migrateDatabase optionalMigrateArgs projectRootDir dbMigrationsDir = do
@@ -46,14 +44,6 @@ migrateDatabase optionalMigrateArgs projectRootDir dbMigrationsDir = do
migrateArgs <- liftEither $ parseMigrateArgs optionalMigrateArgs
ExceptT $ DbOps.migrateDevAndCopyToSource dbMigrationsDir projectRootDir migrateArgs
-generatePrismaClients :: Path' Abs (Dir ProjectRootDir) -> Command ()
-generatePrismaClients projectRootDir = do
- cliSendMessageC $ Msg.Start "Generating prisma clients..."
- generatePrismaClientsResult <- liftIO $ DbOps.generatePrismaClients projectRootDir
- case generatePrismaClientsResult of
- Left err -> throwError $ CommandError "Could not generate Prisma clients" err
- Right () -> cliSendMessageC $ Msg.Success "Prisma clients successfully generated."
-
-- | Basic parsing of db-migrate args. In the future, we could use a smarter parser
-- for this (and all other CLI arg parsing).
parseMigrateArgs :: [String] -> Either String MigrateArgs
diff --git a/waspc/cli/src/Wasp/Cli/Command/Db/Reset.hs b/waspc/cli/src/Wasp/Cli/Command/Db/Reset.hs
new file mode 100644
index 000000000..bf5154720
--- /dev/null
+++ b/waspc/cli/src/Wasp/Cli/Command/Db/Reset.hs
@@ -0,0 +1,25 @@
+module Wasp.Cli.Command.Db.Reset
+ ( reset,
+ )
+where
+
+import Control.Monad.IO.Class (liftIO)
+import StrongPath (())
+import Wasp.Cli.Command (Command)
+import Wasp.Cli.Command.Common (findWaspProjectRootDirFromCwd)
+import Wasp.Cli.Command.Message (cliSendMessageC)
+import qualified Wasp.Cli.Common as Common
+import Wasp.Generator.DbGenerator.Operations (dbReset)
+import qualified Wasp.Message as Msg
+
+reset :: Command ()
+reset = do
+ waspProjectDir <- findWaspProjectRootDirFromCwd
+ let genProjectDir =
+ waspProjectDir Common.dotWaspDirInWaspProjectDir Common.generatedCodeDirInDotWaspDir
+
+ cliSendMessageC $ Msg.Start "Resetting the database..."
+
+ liftIO (dbReset genProjectDir) >>= \case
+ Left errorMsg -> cliSendMessageC $ Msg.Failure "Database reset failed" errorMsg
+ Right () -> cliSendMessageC $ Msg.Success "Database reset successfully!"
diff --git a/waspc/cli/src/Wasp/Cli/Command/Db/Seed.hs b/waspc/cli/src/Wasp/Cli/Command/Db/Seed.hs
new file mode 100644
index 000000000..bfa8daa27
--- /dev/null
+++ b/waspc/cli/src/Wasp/Cli/Command/Db/Seed.hs
@@ -0,0 +1,93 @@
+module Wasp.Cli.Command.Db.Seed
+ ( seed,
+ )
+where
+
+import qualified Control.Monad.Except as E
+import Control.Monad.IO.Class (liftIO)
+import Data.List (intercalate)
+import Data.List.NonEmpty (NonEmpty ((:|)))
+import qualified Data.List.NonEmpty as NE
+import StrongPath (())
+import Text.Printf (printf)
+import qualified Wasp.AppSpec as AS
+import qualified Wasp.AppSpec.App as AS.App
+import qualified Wasp.AppSpec.App.Db as AS.Db
+import qualified Wasp.AppSpec.ExtImport as AS.ExtImport
+import qualified Wasp.AppSpec.Valid as ASV
+import Wasp.Cli.Command (Command, CommandError (CommandError))
+import Wasp.Cli.Command.Common (findWaspProjectRootDirFromCwd)
+import Wasp.Cli.Command.Compile (analyze)
+import Wasp.Cli.Command.Message (cliSendMessageC)
+import qualified Wasp.Cli.Common as Common
+import Wasp.Generator.DbGenerator.Operations (dbSeed)
+import qualified Wasp.Message as Msg
+
+seed :: Maybe String -> Command ()
+seed maybeUserProvidedSeedName = do
+ waspProjectDir <- findWaspProjectRootDirFromCwd
+ let genProjectDir =
+ waspProjectDir Common.dotWaspDirInWaspProjectDir Common.generatedCodeDirInDotWaspDir
+
+ appSpec <- analyze waspProjectDir
+
+ nameOfSeedToRun <- obtainNameOfExistingSeedToRun maybeUserProvidedSeedName appSpec
+
+ cliSendMessageC $ Msg.Start $ "Running database seed " <> nameOfSeedToRun <> "..."
+
+ liftIO (dbSeed genProjectDir nameOfSeedToRun) >>= \case
+ Left errorMsg -> cliSendMessageC $ Msg.Failure "Database seeding failed" errorMsg
+ Right () -> cliSendMessageC $ Msg.Success "Database seeded successfully!"
+
+obtainNameOfExistingSeedToRun :: Maybe String -> AS.AppSpec -> Command String
+obtainNameOfExistingSeedToRun maybeUserProvidedSeedName spec = do
+ seedNames <- getSeedNames <$> getSeedsFromAppSpecOrThrowIfNone
+ case maybeUserProvidedSeedName of
+ Just name -> parseUserProvidedSeedName name seedNames
+ Nothing -> case seedNames of
+ seedName :| [] -> return seedName
+ _seedNames -> liftIO $ askUserToChooseFromSeedNames seedNames
+ where
+ askUserToChooseFromSeedNames :: NE.NonEmpty String -> IO String
+ askUserToChooseFromSeedNames seedNames = do
+ putStrLn "Choose a seed to run:"
+ mapM_ (\(i, n) -> putStrLn $ printf " [%d] %s" i n) $ zip [1 :: Int ..] (NE.toList seedNames)
+ putStrLn "Type a number (e.g. 1 or 2):"
+ chosenNumber <- getLine
+ case parseNumberInRange (1, length seedNames) chosenNumber of
+ Right idx -> return $ seedNames NE.!! (idx - 1)
+ Left errMsg -> do
+ putStrLn $ "Invalid number (" <> errMsg <> "), please try again.\n"
+ askUserToChooseFromSeedNames seedNames
+
+ parseNumberInRange :: (Int, Int) -> String -> Either String Int
+ parseNumberInRange (minNum, maxNum) strNum =
+ case reads strNum of
+ [(num, _)] ->
+ if num >= minNum && num <= maxNum
+ then Right num
+ else Left "number out of range"
+ _notANum -> Left "not a number"
+
+ parseUserProvidedSeedName :: String -> NE.NonEmpty String -> Command String
+ parseUserProvidedSeedName userProvidedSeedName seedNames =
+ if userProvidedSeedName `elem` seedNames
+ then return userProvidedSeedName
+ else
+ (E.throwError . CommandError "Invalid seed name") $
+ "There is no seed with the name " <> userProvidedSeedName <> "."
+ <> ("\nValid seed names are: " <> intercalate ", " (NE.toList seedNames) <> ".")
+
+ getSeedsFromAppSpecOrThrowIfNone :: Command (NE.NonEmpty AS.ExtImport.ExtImport)
+ getSeedsFromAppSpecOrThrowIfNone = case getDbSeeds spec of
+ Just seeds@(_ : _) -> return $ NE.fromList seeds
+ _noSeeds ->
+ (E.throwError . CommandError "No seeds defined") $
+ "You haven't defined any database seeding functions, so there is nothing to run!\n"
+ <> "To do so, define seeding functions via app.db.seeds in your Wasp config."
+
+ getSeedNames :: (Functor f) => f AS.ExtImport.ExtImport -> f String
+ getSeedNames seeds = AS.ExtImport.importIdentifier <$> seeds
+
+getDbSeeds :: AS.AppSpec -> Maybe [AS.ExtImport.ExtImport]
+getDbSeeds spec = AS.Db.seeds =<< AS.App.db (snd $ ASV.getApp spec)
diff --git a/waspc/cli/src/Wasp/Cli/Command/Db/Studio.hs b/waspc/cli/src/Wasp/Cli/Command/Db/Studio.hs
new file mode 100644
index 000000000..02cab075c
--- /dev/null
+++ b/waspc/cli/src/Wasp/Cli/Command/Db/Studio.hs
@@ -0,0 +1,29 @@
+module Wasp.Cli.Command.Db.Studio
+ ( studio,
+ )
+where
+
+import Control.Concurrent (newChan)
+import Control.Concurrent.Async (concurrently)
+import Control.Monad.IO.Class (liftIO)
+import StrongPath (())
+import Wasp.Cli.Command (Command)
+import Wasp.Cli.Command.Common (findWaspProjectRootDirFromCwd)
+import Wasp.Cli.Command.Message (cliSendMessageC)
+import qualified Wasp.Cli.Common as Common
+import Wasp.Generator.DbGenerator.Jobs (runStudio)
+import Wasp.Generator.Job.IO (readJobMessagesAndPrintThemPrefixed)
+import qualified Wasp.Message as Msg
+
+studio :: Command ()
+studio = do
+ waspProjectDir <- findWaspProjectRootDirFromCwd
+ let genProjectDir =
+ waspProjectDir Common.dotWaspDirInWaspProjectDir Common.generatedCodeDirInDotWaspDir
+
+ cliSendMessageC $ Msg.Start "Running studio..."
+
+ chan <- liftIO newChan
+ _ <- liftIO $ readJobMessagesAndPrintThemPrefixed chan `concurrently` runStudio genProjectDir chan
+
+ error "This should never happen, studio should never stop."
diff --git a/waspc/cli/src/Wasp/Cli/Command/Deploy.hs b/waspc/cli/src/Wasp/Cli/Command/Deploy.hs
index 8ec04df84..4b68eeaab 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Deploy.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Deploy.hs
@@ -7,13 +7,15 @@ import Control.Monad.IO.Class (liftIO)
import System.Environment (getExecutablePath)
import Wasp.Cli.Command (Command)
import Wasp.Cli.Command.Common (findWaspProjectRootDirFromCwd)
-import qualified Wasp.Lib as Lib
+import qualified Wasp.Project.Deployment
deploy :: [String] -> Command ()
deploy cmdArgs = do
waspProjectDir <- findWaspProjectRootDirFromCwd
liftIO $ do
- -- `getExecutablePath` has some caveats: https://frasertweedale.github.io/blog-fp/posts/2022-05-10-improved-executable-path-queries.html
- -- Once we upgrade to GHC 9.4 we should change to `executablePath`, but this should be ok for our purposes.
+ -- `getExecutablePath` has some caveats:
+ -- https://frasertweedale.github.io/blog-fp/posts/2022-05-10-improved-executable-path-queries.html
+ -- Once we upgrade to GHC 9.4 we should change to `executablePath`, but this should be ok for
+ -- our purposes.
waspExePath <- getExecutablePath
- Lib.deploy waspExePath waspProjectDir cmdArgs
+ Wasp.Project.Deployment.deploy waspExePath waspProjectDir cmdArgs
diff --git a/waspc/cli/src/Wasp/Cli/Command/Deps.hs b/waspc/cli/src/Wasp/Cli/Command/Deps.hs
index ed7d5acd3..18d0bad11 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Deps.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Deps.hs
@@ -14,7 +14,7 @@ import Wasp.Cli.Terminal (title)
import qualified Wasp.Generator.NpmDependencies as N
import qualified Wasp.Generator.ServerGenerator as ServerGenerator
import qualified Wasp.Generator.WebAppGenerator as WebAppGenerator
-import Wasp.Lib (analyzeWaspProject)
+import Wasp.Project (analyzeWaspProject)
import qualified Wasp.Util.Terminal as Term
deps :: Command ()
diff --git a/waspc/cli/src/Wasp/Cli/Command/Dockerfile.hs b/waspc/cli/src/Wasp/Cli/Command/Dockerfile.hs
index 320b3fc8f..84461398d 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Dockerfile.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Dockerfile.hs
@@ -9,7 +9,7 @@ import qualified Data.Text.IO as T.IO
import Wasp.Cli.Command (Command, CommandError (..))
import Wasp.Cli.Command.Common (findWaspProjectRootDirFromCwd)
import Wasp.Cli.Command.Compile (defaultCompileOptions)
-import Wasp.Lib (compileAndRenderDockerfile)
+import Wasp.Project (compileAndRenderDockerfile)
printDockerfile :: Command ()
printDockerfile = do
diff --git a/waspc/cli/src/Wasp/Cli/Command/Info.hs b/waspc/cli/src/Wasp/Cli/Command/Info.hs
index e3fd9e299..a623502dd 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Info.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Info.hs
@@ -5,45 +5,43 @@ module Wasp.Cli.Command.Info
)
where
-import Control.Arrow
-import Control.Monad.Except
+import Control.Arrow ()
+import Control.Monad.Except (MonadIO (liftIO))
import StrongPath (Abs, Dir, Path', fromRelFile)
-import StrongPath.Operations
+import StrongPath.Operations ()
import System.Directory (getFileSize)
-import qualified Wasp.Analyzer as Analyzer
-import qualified Wasp.AppSpec.App as AS.App
-import qualified Wasp.AppSpec.Core.Decl as AS (Decl, takeDecls)
+import qualified Wasp.AppSpec.Valid as ASV
import Wasp.Cli.Command (Command)
-import Wasp.Cli.Command.Common (findWaspProjectRootDirFromCwd)
+import Wasp.Cli.Command.Common (findWaspProjectRootDirFromCwd, readWaspCompileInfo)
+import Wasp.Cli.Command.Compile (analyze)
import Wasp.Cli.Command.Message (cliSendMessageC)
-import qualified Wasp.Cli.Common as Cli.Common
+import Wasp.Cli.Command.Start.Db (getDbSystem)
import Wasp.Cli.Terminal (title)
-import Wasp.Common (WaspProjectDir)
-import Wasp.Error (showCompilerErrorForTerminal)
-import Wasp.Lib (findWaspFile)
import qualified Wasp.Message as Msg
-import Wasp.Util (ifM)
+import Wasp.Project (WaspProjectDir)
import qualified Wasp.Util.IO as IOUtil
import qualified Wasp.Util.Terminal as Term
info :: Command ()
info = do
waspDir <- findWaspProjectRootDirFromCwd
- compileInfo <- liftIO $ readCompileInformation waspDir
+
+ compileInfo <- liftIO $ readWaspCompileInfo waspDir
projectSize <- liftIO $ readDirectorySizeMB waspDir
- declsOrError <- liftIO $ parseWaspFile waspDir
- case declsOrError of
- Left err -> cliSendMessageC $ Msg.Failure "Info failed" err
- Right decls -> do
- cliSendMessageC $
- Msg.Info $
- unlines
- [ "",
- title "Project information",
- printInfo "Name" (fst $ head $ AS.takeDecls @AS.App.App decls),
- printInfo "Last compile" compileInfo,
- printInfo "Project size" projectSize
- ]
+
+ appSpec <- analyze waspDir
+ let (appName, app) = ASV.getApp appSpec
+
+ cliSendMessageC $
+ Msg.Info $
+ unlines
+ [ "",
+ title "Project information",
+ printInfo "Name" appName,
+ printInfo "Database system" $ show $ getDbSystem app,
+ printInfo "Last compile" compileInfo,
+ printInfo "Project dir size" projectSize
+ ]
printInfo :: String -> String -> String
printInfo key value = Term.applyStyles [Term.Cyan] key ++ ": " <> Term.applyStyles [Term.White] value
@@ -52,26 +50,3 @@ readDirectorySizeMB :: Path' Abs (Dir WaspProjectDir) -> IO String
readDirectorySizeMB path = (++ " MB") . show . (`div` 1000000) . sum <$> allFileSizes
where
allFileSizes = IOUtil.listDirectoryDeep path >>= mapM (getFileSize . fromRelFile)
-
-readCompileInformation :: Path' Abs (Dir WaspProjectDir) -> IO String
-readCompileInformation waspDir =
- ifM
- (IOUtil.doesFileExist dotWaspInfoFile)
- (IOUtil.readFile dotWaspInfoFile)
- (return "No compile information found")
- where
- dotWaspInfoFile =
- waspDir Cli.Common.dotWaspDirInWaspProjectDir
- Cli.Common.generatedCodeDirInDotWaspDir
- Cli.Common.dotWaspInfoFileInGeneratedCodeDir
-
-parseWaspFile :: Path' Abs (Dir WaspProjectDir) -> IO (Either String [AS.Decl])
-parseWaspFile waspDir = runExceptT $ do
- waspFile <- ExceptT $ findWaspFile waspDir
- waspStr <- liftIO $ IOUtil.readFile waspFile
- liftEither $ left (annotateErrorForCli waspFile waspStr) $ Analyzer.analyze waspStr
- where
- annotateErrorForCli waspFile waspStr =
- ("Couldn't parse .wasp file:\n" ++)
- . showCompilerErrorForTerminal (waspFile, waspStr)
- . Analyzer.getErrorMessageAndCtx
diff --git a/waspc/cli/src/Wasp/Cli/Command/Start.hs b/waspc/cli/src/Wasp/Cli/Command/Start.hs
index 7beffda21..83dd41569 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Start.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Start.hs
@@ -15,9 +15,9 @@ import Wasp.Cli.Command.Compile (compile, printWarningsAndErrorsIfAny)
import Wasp.Cli.Command.Message (cliSendMessageC)
import Wasp.Cli.Command.Watch (watch)
import qualified Wasp.Cli.Common as Common
-import Wasp.Lib (CompileError, CompileWarning)
-import qualified Wasp.Lib
+import qualified Wasp.Generator
import qualified Wasp.Message as Msg
+import Wasp.Project (CompileError, CompileWarning)
-- | Does initial compile of wasp code and then runs the generated project.
-- It also listens for any file changes and recompiles and restarts generated project accordingly.
@@ -41,7 +41,7 @@ start = do
-- 'watch') once jobs from 'start' quiet down a bit.
ongoingCompilationResultMVar <- newMVar (warnings, [])
let watchWaspProjectSource = watch waspRoot outDir ongoingCompilationResultMVar
- let startGeneratedWebApp = Wasp.Lib.start outDir (onJobsQuietDown ongoingCompilationResultMVar)
+ let startGeneratedWebApp = Wasp.Generator.start outDir (onJobsQuietDown ongoingCompilationResultMVar)
-- In parallel:
-- 1. watch for any changes in the Wasp project, be it users wasp code or users JS/HTML/...
-- code. On any change, Wasp is recompiled (and generated code is re-generated).
diff --git a/waspc/cli/src/Wasp/Cli/Command/Start/Db.hs b/waspc/cli/src/Wasp/Cli/Command/Start/Db.hs
new file mode 100644
index 000000000..1f0b9b38e
--- /dev/null
+++ b/waspc/cli/src/Wasp/Cli/Command/Start/Db.hs
@@ -0,0 +1,177 @@
+module Wasp.Cli.Command.Start.Db
+ ( start,
+ getDbSystem,
+ waspDevDbDockerVolumePrefix,
+ )
+where
+
+import Control.Monad (when)
+import qualified Control.Monad.Except as E
+import Control.Monad.IO.Class (liftIO)
+import Data.Maybe (fromMaybe, isJust)
+import StrongPath (Abs, Dir, File', Path', Rel, fromRelFile)
+import System.Environment (lookupEnv)
+import System.Process (callCommand)
+import Text.Printf (printf)
+import qualified Wasp.AppSpec as AS
+import qualified Wasp.AppSpec.App as AS.App
+import qualified Wasp.AppSpec.App.Db as AS.App.Db
+import qualified Wasp.AppSpec.Valid as ASV
+import Wasp.Cli.Command (Command, CommandError (CommandError))
+import Wasp.Cli.Command.Common (findWaspProjectRootDirFromCwd, throwIfExeIsNotAvailable)
+import Wasp.Cli.Command.Compile (analyze)
+import Wasp.Cli.Command.Message (cliSendMessageC)
+import Wasp.Cli.Common (WaspProjectDir)
+import qualified Wasp.Message as Msg
+import Wasp.Project.Db (databaseUrlEnvVarName)
+import Wasp.Project.Db.Dev (makeDevDbUniqueId)
+import qualified Wasp.Project.Db.Dev.Postgres as Dev.Postgres
+import Wasp.Project.Env (dotEnvServer)
+import Wasp.Util (whenM)
+import qualified Wasp.Util.Network.Socket as Socket
+
+-- | Starts a "managed" dev database, where "managed" means that
+-- Wasp creates it and connects the Wasp app with it.
+-- Wasp is smart while doing this so it checks which database is specified
+-- in Wasp configuration and spins up a database of appropriate type.
+start :: Command ()
+start = do
+ waspProjectDir <- findWaspProjectRootDirFromCwd
+ appSpec <- analyze waspProjectDir
+
+ throwIfCustomDbAlreadyInUse appSpec
+
+ let (appName, app) = ASV.getApp appSpec
+ case getDbSystem app of
+ AS.App.Db.SQLite -> noteSQLiteDoesntNeedStart
+ AS.App.Db.PostgreSQL -> startPostgreDevDb waspProjectDir appName
+ where
+ noteSQLiteDoesntNeedStart =
+ cliSendMessageC . Msg.Info $
+ "Nothing to do! You are all good, you are using SQLite which doesn't need to be started."
+
+throwIfCustomDbAlreadyInUse :: AS.AppSpec -> Command ()
+throwIfCustomDbAlreadyInUse spec = do
+ throwIfDbUrlInEnv
+ throwIfDbUrlInServerDotEnv spec
+ where
+ throwIfDbUrlInEnv :: Command ()
+ throwIfDbUrlInEnv = do
+ dbUrl <- liftIO $ lookupEnv databaseUrlEnvVarName
+ when (isJust dbUrl) $
+ throwCustomDbAlreadyInUseError
+ ( "Wasp has detected existing " <> databaseUrlEnvVarName <> " var in your environment.\n"
+ <> "To have Wasp run the dev database for you, make sure you remove that env var first."
+ )
+
+ throwIfDbUrlInServerDotEnv :: AS.AppSpec -> Command ()
+ throwIfDbUrlInServerDotEnv appSpec =
+ when (isThereDbUrlInServerDotEnv appSpec) $
+ throwCustomDbAlreadyInUseError
+ ( printf
+ ( "Wasp has detected that you have defined %s env var in your %s file.\n"
+ <> "To have Wasp run the dev database for you, make sure you remove that env var first."
+ )
+ databaseUrlEnvVarName
+ (fromRelFile (dotEnvServer :: Path' (Rel WaspProjectDir) File'))
+ )
+ where
+ isThereDbUrlInServerDotEnv = any ((== databaseUrlEnvVarName) . fst) . AS.devEnvVarsServer
+
+ throwCustomDbAlreadyInUseError :: String -> Command ()
+ throwCustomDbAlreadyInUseError msg =
+ E.throwError $ CommandError "You are using custom database already" msg
+
+getDbSystem :: AS.App.App -> AS.App.Db.DbSystem
+getDbSystem app =
+ fromMaybe AS.App.Db.SQLite (AS.App.db app >>= AS.App.Db.system)
+
+startPostgreDevDb :: Path' Abs (Dir WaspProjectDir) -> String -> Command ()
+startPostgreDevDb waspProjectDir appName = do
+ throwIfExeIsNotAvailable
+ "docker"
+ "To run PostgreSQL dev database, Wasp needs `docker` installed and in PATH."
+ throwIfDevDbPortIsAlreadyInUse
+
+ cliSendMessageC . Msg.Info $
+ unlines
+ [ "โจ Starting a PostgreSQL dev database (based on your Wasp config) โจ",
+ "",
+ "Additional info:",
+ " โน Connection URL, in case you might want to connect with external tools:",
+ " " <> connectionUrl,
+ " โน Database data is persisted in a docker volume with the following name"
+ <> " (useful to know if you will want to delete it at some point):",
+ " " <> dockerVolumeName
+ ]
+
+ cliSendMessageC $ Msg.Info "..."
+
+ -- NOTE: POSTGRES_PASSWORD, POSTGRES_USER, POSTGRES_DB below are really used by the docker image
+ -- only when initializing the database -> if it already exists, they will be ignored.
+ -- This is how the postgres Docker image works.
+ let command =
+ printf
+ ( unwords
+ [ "docker run",
+ "--name %s",
+ "--rm",
+ "--publish %d:5432",
+ "-v %s:/var/lib/postgresql/data",
+ "--env POSTGRES_PASSWORD=%s",
+ "--env POSTGRES_USER=%s",
+ "--env POSTGRES_DB=%s",
+ "postgres"
+ ]
+ )
+ dockerContainerName
+ Dev.Postgres.defaultDevPort
+ dockerVolumeName
+ Dev.Postgres.defaultDevPass
+ Dev.Postgres.defaultDevUser
+ dbName
+ liftIO $ callCommand command
+ where
+ dockerVolumeName = makeWaspDevDbDockerVolumeName waspProjectDir appName
+ dockerContainerName = makeWaspDevDbDockerContainerName waspProjectDir appName
+ dbName = Dev.Postgres.makeDevDbName waspProjectDir appName
+ connectionUrl = Dev.Postgres.makeDevConnectionUrl waspProjectDir appName
+
+ throwIfDevDbPortIsAlreadyInUse :: Command ()
+ throwIfDevDbPortIsAlreadyInUse = do
+ -- I am checking both conditions because of Docker having virtual network on Mac which
+ -- always gives precedence to native ports so checking only if we can open the port is
+ -- not enough because we can open it even if Docker container is already bound to that port.
+ whenM (liftIO $ Socket.checkIfPortIsInUse devDbSocketAddress) throwPortAlreadyInUseError
+ whenM (liftIO $ Socket.checkIfPortIsAcceptingConnections devDbSocketAddress) throwPortAlreadyInUseError
+ where
+ devDbSocketAddress = Socket.makeLocalHostSocketAddress $ fromIntegral Dev.Postgres.defaultDevPort
+ throwPortAlreadyInUseError =
+ E.throwError $
+ CommandError
+ "Port already in use"
+ ( printf
+ "Wasp can't run PostgreSQL dev database for you since port %d is already in use."
+ Dev.Postgres.defaultDevPort
+ )
+
+-- | Docker volume name unique for the Wasp project with specified path and name.
+makeWaspDevDbDockerVolumeName :: Path' Abs (Dir WaspProjectDir) -> String -> String
+makeWaspDevDbDockerVolumeName waspProjectDir appName =
+ take maxDockerVolumeNameLength $
+ waspDevDbDockerVolumePrefix <> "-" <> makeDevDbUniqueId waspProjectDir appName
+
+waspDevDbDockerVolumePrefix :: String
+waspDevDbDockerVolumePrefix = "wasp-dev-db"
+
+maxDockerVolumeNameLength :: Int
+maxDockerVolumeNameLength = 255
+
+-- | Docker container name unique for the Wasp project with specified path and name.
+makeWaspDevDbDockerContainerName :: Path' Abs (Dir WaspProjectDir) -> String -> String
+makeWaspDevDbDockerContainerName waspProjectDir appName =
+ take maxDockerContainerNameLength $
+ waspDevDbDockerVolumePrefix <> "-" <> makeDevDbUniqueId waspProjectDir appName
+
+maxDockerContainerNameLength :: Int
+maxDockerContainerNameLength = 63
diff --git a/waspc/cli/src/Wasp/Cli/Command/Test.hs b/waspc/cli/src/Wasp/Cli/Command/Test.hs
new file mode 100644
index 000000000..bc263cdbf
--- /dev/null
+++ b/waspc/cli/src/Wasp/Cli/Command/Test.hs
@@ -0,0 +1,48 @@
+module Wasp.Cli.Command.Test
+ ( test,
+ )
+where
+
+import Control.Concurrent.Async (race)
+import Control.Concurrent.MVar (newMVar)
+import Control.Monad.Except (throwError)
+import Control.Monad.IO.Class (liftIO)
+import StrongPath (Abs, Dir, ())
+import StrongPath.Types (Path')
+import Wasp.Cli.Command (Command, CommandError (..))
+import Wasp.Cli.Command.Common (findWaspProjectRootDirFromCwd)
+import Wasp.Cli.Command.Compile (compile)
+import Wasp.Cli.Command.Message (cliSendMessageC)
+import Wasp.Cli.Command.Watch (watch)
+import qualified Wasp.Cli.Common as Common
+import qualified Wasp.Generator
+import Wasp.Generator.Common (ProjectRootDir)
+import qualified Wasp.Message as Msg
+
+test :: [String] -> Command ()
+test [] = throwError $ CommandError "Not enough arguments" "Expected: wasp test client "
+test ("client" : args) = watchAndTest $ Wasp.Generator.testWebApp args
+test ("server" : _args) = throwError $ CommandError "Invalid arguments" "Server testing not yet implemented."
+test _ = throwError $ CommandError "Invalid arguments" "Expected: wasp test client "
+
+watchAndTest :: (Path' Abs (Dir ProjectRootDir) -> IO (Either String ())) -> Command ()
+watchAndTest testRunner = do
+ waspRoot <- findWaspProjectRootDirFromCwd
+ let outDir = waspRoot Common.dotWaspDirInWaspProjectDir Common.generatedCodeDirInDotWaspDir
+
+ cliSendMessageC $ Msg.Start "Starting compilation and setup phase. Hold tight..."
+
+ warnings <- compile
+
+ cliSendMessageC $ Msg.Start "Watching for file changes and running tests ..."
+
+ watchOrStartResult <- liftIO $ do
+ ongoingCompilationResultMVar <- newMVar (warnings, [])
+ let watchWaspProjectSource = watch waspRoot outDir ongoingCompilationResultMVar
+ watchWaspProjectSource `race` testRunner outDir
+
+ case watchOrStartResult of
+ Left () -> error "This should never happen, listening for file changes should never end but it did."
+ Right startResult -> case startResult of
+ Left testError -> throwError $ CommandError "Test failed" testError
+ Right () -> return ()
diff --git a/waspc/cli/src/Wasp/Cli/Command/Uninstall.hs b/waspc/cli/src/Wasp/Cli/Command/Uninstall.hs
index 0ee7f7395..85fdf291a 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Uninstall.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Uninstall.hs
@@ -9,6 +9,7 @@ import StrongPath (fromAbsDir, fromAbsFile, ())
import System.Exit (die)
import Wasp.Cli.Command (Command)
import Wasp.Cli.Command.Message (cliSendMessageC)
+import Wasp.Cli.Command.Start.Db (waspDevDbDockerVolumePrefix)
import Wasp.Cli.FileSystem
( getHomeDir,
getUserCacheDir,
@@ -24,7 +25,12 @@ uninstall :: Command ()
uninstall = do
cliSendMessageC $ Msg.Start "Uninstalling Wasp ..."
liftIO removeWaspFiles
- cliSendMessageC $ Msg.Success "Uninstalled Wasp"
+ cliSendMessageC $ Msg.Success "Uninstalled Wasp."
+ cliSendMessageC $
+ Msg.Info $
+ "If you have used Wasp to run dev database for you, you might want to make sure you also"
+ <> " deleted all the docker volumes it might have created."
+ <> (" You can easily list them by doing `docker volume ls | grep " <> waspDevDbDockerVolumePrefix <> "`.")
removeWaspFiles :: IO ()
removeWaspFiles = do
diff --git a/waspc/cli/src/Wasp/Cli/Command/Watch.hs b/waspc/cli/src/Wasp/Cli/Command/Watch.hs
index 9dd10bb2c..5689e0be5 100644
--- a/waspc/cli/src/Wasp/Cli/Command/Watch.hs
+++ b/waspc/cli/src/Wasp/Cli/Command/Watch.hs
@@ -17,9 +17,9 @@ import qualified System.FilePath as FP
import Wasp.Cli.Command.Compile (compileIO, printCompilationResult)
import qualified Wasp.Cli.Common as Common
import Wasp.Cli.Message (cliSendMessage)
-import Wasp.Lib (CompileError, CompileWarning)
-import qualified Wasp.Lib
+import qualified Wasp.Generator.Common as Wasp.Generator
import qualified Wasp.Message as Msg
+import Wasp.Project (CompileError, CompileWarning, WaspProjectDir)
-- TODO: Idea: Read .gitignore file, and ignore everything from it. This will then also cover the
-- .wasp dir, and users can easily add any custom stuff they want ignored. But, we also have to
@@ -32,8 +32,8 @@ import qualified Wasp.Message as Msg
-- (warnings, errors) of the latest (re)compile whenever it happens. If there is already
-- something in the MVar, it will get overwritten.
watch ::
- Path' Abs (Dir Common.WaspProjectDir) ->
- Path' Abs (Dir Wasp.Lib.ProjectRootDir) ->
+ Path' Abs (Dir WaspProjectDir) ->
+ Path' Abs (Dir Wasp.Generator.ProjectRootDir) ->
MVar ([CompileWarning], [CompileError]) ->
IO ()
watch waspProjectDir outDir ongoingCompilationResultMVar = FSN.withManager $ \mgr -> do
diff --git a/waspc/cli/src/Wasp/Cli/Common.hs b/waspc/cli/src/Wasp/Cli/Common.hs
index cece47fef..282cf40df 100644
--- a/waspc/cli/src/Wasp/Cli/Common.hs
+++ b/waspc/cli/src/Wasp/Cli/Common.hs
@@ -18,8 +18,8 @@ where
import StrongPath (Dir, File', Path', Rel, reldir, relfile)
import Wasp.AppSpec.ExternalCode (SourceExternalCodeDir)
-import Wasp.Common (WaspProjectDir)
import qualified Wasp.Generator.Common
+import Wasp.Project (WaspProjectDir)
import qualified Wasp.Util.Terminal as Term
data DotWaspDir -- Here we put everything that wasp generates.
diff --git a/waspc/data/Generator/templates/react-app/public/images/github-logo-icon.png b/waspc/data/Generator/templates/react-app/public/images/github-logo-icon.png
deleted file mode 100644
index 6cb3b705d..000000000
Binary files a/waspc/data/Generator/templates/react-app/public/images/github-logo-icon.png and /dev/null differ
diff --git a/waspc/data/Generator/templates/react-app/public/images/google-logo-icon.png b/waspc/data/Generator/templates/react-app/public/images/google-logo-icon.png
deleted file mode 100644
index a4a9918da..000000000
Binary files a/waspc/data/Generator/templates/react-app/public/images/google-logo-icon.png and /dev/null differ
diff --git a/waspc/data/Generator/templates/react-app/src/actions/_action.js b/waspc/data/Generator/templates/react-app/src/actions/_action.js
deleted file mode 100644
index 1d768b2f6..000000000
--- a/waspc/data/Generator/templates/react-app/src/actions/_action.js
+++ /dev/null
@@ -1,7 +0,0 @@
-{{={= =}=}}
-import { createAction } from './core'
-
-export default createAction(
- '{= actionRoute =}',
- {=& entitiesArray =},
-)
diff --git a/waspc/data/Generator/templates/react-app/src/actions/_action.ts b/waspc/data/Generator/templates/react-app/src/actions/_action.ts
new file mode 100644
index 000000000..57a158956
--- /dev/null
+++ b/waspc/data/Generator/templates/react-app/src/actions/_action.ts
@@ -0,0 +1,10 @@
+{{={= =}=}}
+import { createAction } from './core'
+{=& operationTypeImportStmt =}
+
+const action = createAction<{= operationTypeName =}>(
+ '{= actionRoute =}',
+ {=& entitiesArray =},
+)
+
+export default action
diff --git a/waspc/data/Generator/templates/react-app/src/actions/core.d.ts b/waspc/data/Generator/templates/react-app/src/actions/core.d.ts
index 8a38c25e3..fa31f329f 100644
--- a/waspc/data/Generator/templates/react-app/src/actions/core.d.ts
+++ b/waspc/data/Generator/templates/react-app/src/actions/core.d.ts
@@ -1,3 +1,13 @@
-import { Action } from '.'
+import { type Action } from '.'
+import type { Expand, _Awaited, _ReturnType } from '../universal/types'
-export function createAction(actionRoute: string, entitiesUsed: unknown[]): Action
+export function createAction(
+ actionRoute: string,
+ entitiesUsed: unknown[]
+): ActionFor
+
+type ActionFor = Expand<
+ Action[0], _Awaited<_ReturnType>>
+>
+
+type GenericBackendAction = (args: never, context: any) => unknown
diff --git a/waspc/data/Generator/templates/react-app/src/actions/core.js b/waspc/data/Generator/templates/react-app/src/actions/core.js
index 3258f0d85..440e90614 100644
--- a/waspc/data/Generator/templates/react-app/src/actions/core.js
+++ b/waspc/data/Generator/templates/react-app/src/actions/core.js
@@ -1,10 +1,12 @@
-import { callOperation } from '../operations'
+import { callOperation, makeOperationRoute } from '../operations'
import {
registerActionInProgress,
registerActionDone,
} from '../operations/resources'
-export function createAction(actionRoute, entitiesUsed) {
+export function createAction(relativeActionRoute, entitiesUsed) {
+ const actionRoute = makeOperationRoute(relativeActionRoute)
+
async function internalAction(args, specificOptimisticUpdateDefinitions) {
registerActionInProgress(specificOptimisticUpdateDefinitions)
try {
diff --git a/waspc/data/Generator/templates/react-app/src/actions/index.ts b/waspc/data/Generator/templates/react-app/src/actions/index.ts
index 292f8849b..5e4dfedd1 100644
--- a/waspc/data/Generator/templates/react-app/src/actions/index.ts
+++ b/waspc/data/Generator/templates/react-app/src/actions/index.ts
@@ -5,9 +5,12 @@ import {
UseMutationOptions,
useQueryClient,
} from '@tanstack/react-query'
-import { Query } from '../queries';
+import { type Query } from '../queries';
-export type Action = (args?: Input) => Promise
- 
- 
+ 
+
+Given a simple .wasp configuration file that describes the high-level details of your web app, and .js(x)/.css/..., source files with your unique logic, Wasp compiler generates the full source of your web app in the target stack: front-end, back-end and deployment.
+
+This unique approach is what makes Wasp "smart" and gives it its super powers!
For more information about Wasp, check [**docs**](https://wasp-lang.dev/docs).
@@ -72,9 +82,9 @@ Run
```
curl -sSL https://get.wasp-lang.dev/installer.sh | sh
```
-to install Wasp on OSX/Linux. From there, just follow the instructions to run your first app in less than a minute!
+to install Wasp on OSX/Linux/WSL(Win). From there, just follow the instructions to run your first app in less than a minute!
-For more details (including installing on Windows) check out [the docs](https://wasp-lang.dev/docs).
+For more details check out [the docs](https://wasp-lang.dev/docs).
# This repository
@@ -86,7 +96,7 @@ Currently, Wasp is in beta, with most features flushed out and working well.
However, there are still a lot of improvements and additions that we have in mind for the future, and we are working on them constantly, so you can expect a lot of changes and improvements in the future.
As Wasp grows further, it should allow the development of web apps of increasing complexity!
-While the idea is to support multiple web tech stacks in the future, right now we are focusing on the specific stack: React + react-query, NodeJS + ExpressJS, Prisma. We might yet change that as time goes on, taking trends into account, but for now, this is serving us well to develop compiler and language.
+While the idea is to support multiple web tech stacks in the future, right now we are focusing on the specific stack: React + react-query, NodeJS + ExpressJS, Prisma. We might yet change that as time goes on, taking trends into account, but for now, this is serving us well to develop Wasp.
# Contributing
@@ -94,6 +104,8 @@ Any way you want to contribute is a good way :)!
The best place to start is to check out [waspc/](waspc/), where you can find detailed steps for the first time contributors + technical details about the Wasp compiler.
+Core of Wasp is built in Haskell, but there is also a lot of non-Haskell parts of Wasp, so you will certainly be able to find something for you!
+
Even if you don't plan to submit any code, just joining the discussion on discord [](https://discord.gg/rzdnErX) and giving your feedback is already great and helps a lot (motivates us and helps us figure out how to shape Wasp)!
You can also:
diff --git a/examples/realworld/README.md b/examples/realworld/README.md
index 9410bdd64..d9441ba4a 100644
--- a/examples/realworld/README.md
+++ b/examples/realworld/README.md
@@ -8,15 +8,9 @@ Here, we implement it in Wasp, by following their [specification](https://realwo
This app is deployed at https://wasp-rwa.netlify.app/ .
# Development
-
-### Database
-Wasp needs postgre database running - provide it with database connection URL via env var `DATABASE_URL` - best to do it via .env file.
-
-Easy way to get going with postgresql database: run db with `docker run --rm --publish 5432:5432 -v postgresql-data:/var/lib/postgresql/data --env POSTGRES_PASSWORD=devpass postgres`.
-`DATABASE_URL` in this case is `postgresql://postgres:devpass@localhost:5432/postgres`.
-
### Running
-`wasp start`
+`wasp start` to run the client and the server.
+`wasp start db` to run the dev database.
## TODO
diff --git a/examples/realworld/main.wasp b/examples/realworld/main.wasp
index af48395a9..5e6a100b9 100644
--- a/examples/realworld/main.wasp
+++ b/examples/realworld/main.wasp
@@ -1,6 +1,6 @@
app Conduit {
wasp: {
- version: "^0.8.0"
+ version: "^0.10.0"
},
title: "Conduit",
@@ -17,7 +17,10 @@ app Conduit {
onAuthFailedRedirectTo: "/login"
},
- db: { system: PostgreSQL },
+ db: {
+ system: PostgreSQL,
+ seeds: [ import { devSeedSimple } from "@server/seeds.js" ]
+ },
dependencies: [
("prop-types", "15.7.2"),
@@ -30,8 +33,6 @@ app Conduit {
]
}
-
-
// ----------------- Pages ------------------ //
route RootRoute { path: "/", to: MainPage }
diff --git a/examples/realworld/src/client/MainPage.jsx b/examples/realworld/src/client/MainPage.jsx
index 407afe1bd..01af818b5 100644
--- a/examples/realworld/src/client/MainPage.jsx
+++ b/examples/realworld/src/client/MainPage.jsx
@@ -11,7 +11,7 @@ import Chip from '@material-ui/core/Chip'
import Paper from '@material-ui/core/Paper';
import { makeStyles } from '@material-ui/core/styles'
-import useAuth from '@wasp/auth/useAuth.js'
+import useAuth from '@wasp/auth/useAuth'
import { useQuery } from '@wasp/queries'
import getTags from '@wasp/queries/getTags'
diff --git a/examples/realworld/src/client/Navbar.jsx b/examples/realworld/src/client/Navbar.jsx
index 3a0235e5d..f4cc18c36 100644
--- a/examples/realworld/src/client/Navbar.jsx
+++ b/examples/realworld/src/client/Navbar.jsx
@@ -7,7 +7,7 @@ import Button from '@material-ui/core/Button'
import Typography from '@material-ui/core/Typography'
import { makeStyles } from '@material-ui/core/styles'
-import useAuth from '@wasp/auth/useAuth.js'
+import useAuth from '@wasp/auth/useAuth'
const useStyles = makeStyles((theme) => ({
diff --git a/examples/realworld/src/client/article/components/ArticleViewPage.jsx b/examples/realworld/src/client/article/components/ArticleViewPage.jsx
index 244b7edfb..81313f990 100644
--- a/examples/realworld/src/client/article/components/ArticleViewPage.jsx
+++ b/examples/realworld/src/client/article/components/ArticleViewPage.jsx
@@ -17,7 +17,7 @@ import Chip from '@material-ui/core/Chip'
import Button from '@material-ui/core/Button'
import { makeStyles } from '@material-ui/core/styles'
-import useAuth from '@wasp/auth/useAuth.js'
+import useAuth from '@wasp/auth/useAuth'
import { useQuery } from '@wasp/queries'
import getArticle from '@wasp/queries/getArticle'
diff --git a/examples/realworld/src/client/user/components/UserProfilePage.jsx b/examples/realworld/src/client/user/components/UserProfilePage.jsx
index 60d4287ef..f3de5987a 100644
--- a/examples/realworld/src/client/user/components/UserProfilePage.jsx
+++ b/examples/realworld/src/client/user/components/UserProfilePage.jsx
@@ -9,7 +9,7 @@ import Box from '@material-ui/core/Box'
import Button from '@material-ui/core/Button'
import { makeStyles } from '@material-ui/core/styles'
-import useAuth from '@wasp/auth/useAuth.js'
+import useAuth from '@wasp/auth/useAuth'
import { useQuery } from '@wasp/queries'
import getUser from '@wasp/queries/getUser'
diff --git a/examples/realworld/src/client/user/components/UserSettingsPage.jsx b/examples/realworld/src/client/user/components/UserSettingsPage.jsx
index 729f52eb3..d9766db8b 100644
--- a/examples/realworld/src/client/user/components/UserSettingsPage.jsx
+++ b/examples/realworld/src/client/user/components/UserSettingsPage.jsx
@@ -7,7 +7,7 @@ import TextField from '@material-ui/core/TextField'
import Button from '@material-ui/core/Button'
import { makeStyles } from '@material-ui/core/styles'
-import logout from '@wasp/auth/logout.js'
+import logout from '@wasp/auth/logout'
import updateUser from '@wasp/actions/updateUser'
diff --git a/examples/realworld/src/server/seeds.js b/examples/realworld/src/server/seeds.js
new file mode 100644
index 000000000..97ffcdc22
--- /dev/null
+++ b/examples/realworld/src/server/seeds.js
@@ -0,0 +1,29 @@
+import { createArticle } from './article/actions.js'
+
+export const devSeedSimple = async (prismaClient) => {
+ const user = await createUser(prismaClient, {
+ username: "RiuTheDog",
+ password: "bark1234",
+ email: "riu@wasp-lang.dev"
+ })
+
+ await createArticle(
+ {
+ title: "The Art of Barking",
+ description: "Elevate your barking to another level by following advice of a master barkerer Riu",
+ markdownContent: (
+ "# Barking - what is it really?"
+ + "\n\nThe fact that wolves don't bark but dogs do already tells us a lot about barking: "
+ + "it can't be studied without also studying humans and their influence on dogs."
+ + "\n\nTODO: bark bark bark"
+ ),
+ tags: [{ name: 'barking' }, { name: 'dogs' }]
+ },
+ { user, entities: { Article: prismaClient.article } }
+ )
+}
+
+async function createUser (prismaClient, data) {
+ const { password, ...newUser } = await prismaClient.user.create({ data })
+ return newUser
+}
\ No newline at end of file
diff --git a/examples/thoughts/main.wasp b/examples/thoughts/main.wasp
index b0a31356a..59d8758e6 100644
--- a/examples/thoughts/main.wasp
+++ b/examples/thoughts/main.wasp
@@ -1,20 +1,21 @@
app Thoughts {
wasp: {
- version: "^0.8.0"
+ version: "^0.10.0"
},
title: "Thoughts",
- db: { system: PostgreSQL },
+ db: {
+ system: PostgreSQL,
+ seeds: [ import { devSeedBasic } from "@server/seeds.js" ]
+ },
auth: {
userEntity: User,
- methods: {
- usernameAndPassword: {}
- },
+ methods: { usernameAndPassword: {} },
onAuthFailedRedirectTo: "/login"
},
dependencies: [
("react-markdown", "6.0.1"),
("color-hash", "2.0.1")
- ]
+ ],
}
route MainRoute { path: "/", to: MainPage }
diff --git a/examples/thoughts/src/client/LoginPage.jsx b/examples/thoughts/src/client/LoginPage.jsx
index 36538d3a4..35e47ce24 100644
--- a/examples/thoughts/src/client/LoginPage.jsx
+++ b/examples/thoughts/src/client/LoginPage.jsx
@@ -1,17 +1,19 @@
import React from 'react'
import { Link } from 'react-router-dom'
-import LoginForm from '@wasp/auth/forms/Login'
+import { LoginForm } from '@wasp/auth/forms/Login'
import addWaspSourceHeader from './addWaspSourceHeader'
const LoginPage = (props) => {
return (
<>
-