♻️ Make the namespacing independent of the branding.

backend/src/app/migrations.clj

@@ -0,0 +1,116 @@
+;; This Source Code Form is subject to the terms of the Mozilla Public
+;; License, v. 2.0. If a copy of the MPL was not distributed with this
+;; file, You can obtain one at http://mozilla.org/MPL/2.0/.
+;;
+;; This Source Code Form is "Incompatible With Secondary Licenses", as
+;; defined by the Mozilla Public License, v. 2.0.
+;;
+;; Copyright (c) 2020 UXBOX Labs SL
+
+(ns app.migrations
+  (:require
+   [mount.core :as mount :refer [defstate]]
+   [app.db :as db]
+   [app.config :as cfg]
+   [app.util.migrations :as mg]))
+
+(def +migrations+
+  {:name "uxbox-main"
+   :steps
+   [{:desc "Add initial extensions and functions."
+     :name "0001-add-extensions"
+     :fn (mg/resource "migrations/0001-add-extensions.sql")}
+
+    {:desc "Add profile related tables"
+     :name "0002-add-profile-tables"
+     :fn (mg/resource "migrations/0002-add-profile-tables.sql")}
+
+    {:desc "Add project related tables"
+     :name "0003-add-project-tables"
+     :fn (mg/resource "migrations/0003-add-project-tables.sql")}
+
+    {:desc "Add tasks related tables"
+     :name "0004-add-tasks-tables"
+     :fn (mg/resource "migrations/0004-add-tasks-tables.sql")}
+
+    {:desc "Add libraries related tables"
+     :name "0005-add-libraries-tables"
+     :fn (mg/resource "migrations/0005-add-libraries-tables.sql")}
+
+    {:desc "Add presence related tables"
+     :name "0006-add-presence-tables"
+     :fn (mg/resource "migrations/0006-add-presence-tables.sql")}
+
+    {:desc "Drop version field from page table."
+     :name "0007-drop-version-field-from-page-table"
+     :fn (mg/resource "migrations/0007-drop-version-field-from-page-table.sql")}
+
+    {:desc "Add generic token related tables."
+     :name "0008-add-generic-token-table"
+     :fn (mg/resource "migrations/0008-add-generic-token-table.sql")}
+
+    {:desc "Drop the profile_email table"
+     :name "0009-drop-profile-email-table"
+     :fn (mg/resource "migrations/0009-drop-profile-email-table.sql")}
+
+    {:desc "Add new HTTP session table"
+     :name "0010-add-http-session-table"
+     :fn (mg/resource "migrations/0010-add-http-session-table.sql")}
+
+    {:desc "Add session_id field to page_change table"
+     :name "0011-add-session-id-field-to-page-change-table"
+     :fn (mg/resource "migrations/0011-add-session-id-field-to-page-change-table.sql")}
+
+    {:desc "Make libraries linked to a file"
+     :name "0012-make-libraries-linked-to-a-file"
+     :fn (mg/resource "migrations/0012-make-libraries-linked-to-a-file.sql")}
+
+    {:desc "Mark files shareable"
+     :name "0013-mark-files-shareable"
+     :fn (mg/resource "migrations/0013-mark-files-shareable.sql")}
+
+    {:desc "Refactor media storage"
+     :name "0014-refactor-media-storage.sql"
+     :fn (mg/resource "migrations/0014-refactor-media-storage.sql")}
+
+    {:desc "Improve and partition task related tables"
+     :name "0015-improve-tasks-tables"
+     :fn (mg/resource "migrations/0015-improve-tasks-tables.sql")}
+
+    {:desc "Truncate & alter tokens tables"
+     :name "0016-truncate-and-alter-tokens-table"
+     :fn (mg/resource "migrations/0016-truncate-and-alter-tokens-table.sql")}
+
+    {:desc "Link files to libraries"
+     :name "0017-link-files-to-libraries"
+     :fn (mg/resource "migrations/0017-link-files-to-libraries.sql")}
+
+    {:desc "Add file triming triggers"
+     :name "0018-add-file-trimming-triggers"
+     :fn (mg/resource "migrations/0018-add-file-trimming-triggers.sql")}
+
+    {:desc "Improve scheduled task tables"
+     :name "0019-add-improved-scheduled-tasks"
+     :fn (mg/resource "migrations/0019-add-improved-scheduled-tasks.sql")}
+
+    {:desc "Minor fixes to media object"
+     :name "0020-minor-fixes-to-media-object"
+     :fn (mg/resource "migrations/0020-minor-fixes-to-media-object.sql")}
+
+    {:desc "Improve http session tables"
+     :name "0021-http-session-improvements"
+     :fn (mg/resource "migrations/0021-http-session-improvements.sql")}
+    ]})
+
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+;; Entry point
+;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
+
+(defn migrate
+  []
+  (with-open [conn (db/open)]
+    (mg/setup! conn)
+    (mg/migrate! conn +migrations+)))
+
+(defstate migrations
+  :start (migrate))