diff --git a/Dockerfile b/Dockerfile index ae9f5b2..918809c 100644 --- a/Dockerfile +++ b/Dockerfile @@ -52,7 +52,6 @@ RUN cp src/server/farm dist/; \ FROM farm as run WORKDIR /farm/dist -RUN touch /farmdb/db ENTRYPOINT ["./farm"] CMD ["-:a50"] # CMD ./farm diff --git a/src/server/db.scm b/src/server/db.scm index 4bf76d6..b7cc89d 100644 --- a/src/server/db.scm +++ b/src/server/db.scm @@ -11,6 +11,11 @@ body ...))))) (define (create-tables) + (when (not (file-exists? *db*)) + (call-with-output-file *db* + (lambda (output-port) + ;; Empty body, no content to write to the file + ))) (with-db (db) (exec (sql db "create table if not exists users(id INTEGER PRIMARY KEY, username TEXT, email TEXT, password TEXT, salt TEXT);")) (exec (sql db "create table if not exists sessions(bindings TEXT, session_id TEXT PRIMARY KEY);"))