Refactor project structure

2 files changed, 0 insertions, 197 deletions

diff --git a/src/chef/pages/admin/api.clj b/src/chef/pages/admin/api.clj
deleted file mode 100644
index 1119607..0000000
--- a/src/chef/pages/admin/api.clj
+++ /dev/null
@@ -1,126 +0,0 @@
-(ns chef.pages.admin.api
-  (:require [chef.utils :as cutils]
-            [chef.database :as cdb]
-            [clojure.string :as cstr]
-            [next.jdbc :as jdbc]
-            [honey.sql :as sql]
-            [ring.util.response :as ruresp]
-            [clojure.java.io :as cjio])
-  (:import java.io.File))
-
-(defn create-category [req]
-  (cutils/auth-only req
-                    (jdbc/execute! @cdb/db
-                                   (sql/format {:insert-into [:categories]
-                                                :values      [(merge {:name   "New category"
-                                                                      :parent (or (get-in req [:params "parent"])
-                                                                                  -1)})]}))
-                    (-> (ruresp/created "Created.")
-                        (ruresp/header "HX-Refresh" "true"))))
-
-(defn- delete-category-children! [id]
-  (let [children (->> (sql/format {:select [:*]
-                                   :from   [:categories]
-                                   :where  [:= :parent id]})
-                      (jdbc/execute! @cdb/db)
-                      (map #(:categories/id %)))]
-    (doseq [child children]
-      (jdbc/execute! @cdb/db
-                     (sql/format {:delete-from [:categories]
-                                  :where       [:= :id child]}))
-      (delete-category-children! child))))
-
-(defn delete-category [req]
-  (cutils/auth-only req
-                    (if-let [id (try (Integer/parseInt (get-in req [:path-params :id]))
-                                     (catch Exception _ nil))]
-                      (when (not= id -1)
-                        (do (jdbc/execute! @cdb/db
-                                           (sql/format {:delete-from [:categories]
-                                                        :where       [:= :id id]}))
-                            (delete-category-children! id)
-                            (-> (ruresp/response "Deleted.")
-                                (ruresp/header "HX-Refresh" "true"))))
-                      (ruresp/bad-request "Bad request."))))
-
-(defn edit-category [req]
-  (cutils/auth-only req
-                    (if-let [id (try (Integer/parseInt (get-in req [:path-params :id]))
-                                     (catch Exception _ nil))]
-                      (do (when-let [name (get-in req [:params "name"])]
-                            (jdbc/execute! @cdb/db (sql/format {:update :categories
-                                                                :set    {:name name}
-                                                                :where  [:= :id id]})))
-                          (when-let [question (get-in req [:params "question"])]
-                            (jdbc/execute! @cdb/db (sql/format {:update :categories
-                                                                :set    {:question question}
-                                                                :where  [:= :id id]})))
-                          (ruresp/response "Updated."))
-                      (ruresp/bad-request "Bad request."))))
-
-(defn create-recipe [req]
-  (cutils/auth-only req
-                    (jdbc/execute! @cdb/db
-                                   (sql/format {:insert-into [:recipes]
-                                                :values      [{:title "New recipe"}]}))
-                    (-> (ruresp/created "Created.")
-                        (ruresp/header "HX-Refresh" "true"))))
-
-(defn delete-recipe [req]
-  (cutils/auth-only req
-                    (if-let [id (try (Integer/parseInt (get-in req [:path-params :id]))
-                                     (catch Exception _ nil))]
-                      (do (jdbc/execute! @cdb/db
-                                         (sql/format {:delete-from [:recipes]
-                                                      :where       [:= :id id]}))
-                          (-> (ruresp/response "Deleted.")
-                              (ruresp/header "HX-Refresh" "true")))
-                      (ruresp/bad-request "Bad request."))))
-
-(defn edit-recipe [req]
-  (cutils/auth-only req
-                    (let [id (try (Integer/parseInt (get-in req [:path-params :id]))
-                                  (catch Exception _ nil))
-                          ingredients (get-in req [:params "ingredients"])]
-                      (if (and (some? id)
-                               (cutils/valid-ingredients? ingredients))
-                        (do (when-let [thumbnail (get-in req [:params "thumbnail"])]
-                              (when-let [existing-thumbnail-file (->> {:select [:*]
-                                                                       :from   [:recipes]
-                                                                       :where  [:= :id id]}
-                                                                      sql/format
-                                                                      (jdbc/execute! @cdb/db)
-                                                                      first
-                                                                      cutils/get-thumbnail-file)]
-                                (.delete ^File existing-thumbnail-file))
-                              (cjio/copy (:tempfile thumbnail)
-                                         (File. (str "./thumbnails/" id "."
-                                                     (-> thumbnail
-                                                         :filename
-                                                         (cstr/split #"\.")
-                                                         last)))))
-                            (jdbc/execute! @cdb/db
-                                           (sql/format {:update :recipes
-                                                        :set    {:title       (get-in req [:params "title"])
-                                                                 :category    (get-in req [:params "category"])
-                                                                 :unit        (get-in req [:params "ingredients-unit"])
-                                                                 :ingredients ingredients
-                                                                 :preparation (get-in req [:params "preparation"])}
-                                                        :where  [:= :id id]}))
-                            (ruresp/response "Saved."))
-                        (ruresp/bad-request "Bad request.")))))
-
-(defn delete-thumbnail [req]
-  (cutils/auth-only req
-                    (if-let [id (try (Integer/parseInt (get-in req [:path-params :id]))
-                                     (catch Exception _ nil))]
-                      (when-let [thumbnail-file (->> {:select [:*]
-                                                      :from   [:recipes]
-                                                      :where  [:= :id id]}
-                                                     sql/format
-                                                     (jdbc/execute! @cdb/db)
-                                                     first
-                                                     cutils/get-thumbnail-file)]
-                        (.delete ^File thumbnail-file)
-                        (ruresp/response "Done."))
-                      (ruresp/bad-request "Bad request."))))
diff --git a/src/chef/pages/admin/recipe_editor.clj b/src/chef/pages/admin/recipe_editor.clj
deleted file mode 100644
index cc30942..0000000
--- a/src/chef/pages/admin/recipe_editor.clj
+++ /dev/null
@@ -1,71 +0,0 @@
-(ns chef.pages.admin.recipe-editor
-  (:require [hiccup2.core :as html]
-            [hiccup.util :as hutil]
-            [honey.sql :as sql]
-            [next.jdbc :as jdbc]
-            [chef.database :as cdb]
-            [ring.util.response :as ruresp]
-            [chef.utils :as cutils]))
-
-(defn render [recipe]
-  (cutils/gen-page "chef - Rezept bearbeiten"
-                   [:div {:style {:margin-left "1em"}}
-                    [:h1 "Rezept bearbeiten"]
-                    [:form {:style   {:width "50%"}
-                            :hx-post (str "/api/admin/edit-recipe/" (:recipes/id recipe))
-                            :hx-swap "none"
-                            :enctype "multipart/form-data"}
-                     [:input {:type  :text :name "title" :placeholder "Titel"
-                              :value (:recipes/title recipe)}]
-                     [:div {:style {:display :flex}}
-                      [:p {:style {:margin-right "0.5em"}} "Thumbnail: "]
-                      [:input {:type  :file :name "thumbnail"
-                               :style {:height  :fit-content
-                                       :padding "0.3em"}}]]
-                     [:button {:class      ["button" "error"]
-                               :hx-trigger "click"
-                               :hx-delete  (str "/api/admin/delete-thumbnail/" (:recipes/id recipe))
-                               :hx-swap    :none}
-                      "Thumbnail entfernen"]
-                     [:h2 "Kategorie"]
-                     [:select {:name "category"}
-                      (for [category (->> (sql/format {:select [:*]
-                                                       :from   [:categories]})
-                                          (jdbc/execute! @cdb/db)
-                                          (filter #(pos? (:categories/id %))))]
-                        [:option {:value    (:categories/id category)
-                                  :selected (= (:categories/id category) (:recipes/category recipe))}
-                         (cutils/category-path category)])]
-                     [:h2 "Zutaten"]
-                     [:div {:style {:display :flex}}
-                      [:p {:style {:margin-right "0.5em"}} "Pro"]
-                      [:select {:name  "ingredients-unit"
-                                :style {:height  :fit-content
-                                        :padding "0.3em"}}
-                       [:option {:value 0 :selected (= (:recipes/unit recipe) 0)} "Portion"]
-                       [:option {:value 1 :selected (= (:recipes/unit recipe) 1)} "Person"]]
-                      [:p ":"]]
-                     [:textarea {:name "ingredients"}
-                      (:recipes/ingredients recipe)]
-                     [:p "(Je Zeile eine Zutat, in dem Format " [:code "[Beschreibung der Zutat]=[Menge als Zahl][Einheit der Menge]"] ".)"]
-                     [:h2 "Zubereitung"]
-                     [:textarea {:name "preparation"}
-                      (:recipes/preparation recipe)]
-                     [:button {:type  :submit
-                               :style {:margin-top "1em"}} "Speichern"]]]
-                   [:script (hutil/raw-string "window.addEventListener(\"htmx:afterRequest\", () => window.close())")]))
-
-(defn handler [req]
-  (cutils/auth-only req
-                    (if-let [id (try (Integer/parseInt (get-in req [:path-params :id]))
-                                     (catch Exception _ nil))]
-                      (->> (sql/format {:select [:*]
-                                        :from   [:recipes]
-                                        :where  [:= :id id]})
-                           (jdbc/execute! @cdb/db)
-                           first
-                           render
-                           html/html
-                           str
-                           ruresp/response)
-                      (ruresp/bad-request "Bad request."))))