mirror of
https://github.com/penpot/penpot.git
synced 2025-05-24 04:56:10 +02:00
60 lines
1.7 KiB
Clojure
60 lines
1.7 KiB
Clojure
;; 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/.
|
|
;;
|
|
;; Copyright (c) 2019 Andrey Antukh <niwi@niwi.nz>
|
|
|
|
(ns uxbox.services.queries.projects
|
|
(:require
|
|
[clojure.spec.alpha :as s]
|
|
[promesa.core :as p]
|
|
[uxbox.common.spec :as us]
|
|
[uxbox.db :as db]
|
|
[uxbox.services.queries :as sq]
|
|
[uxbox.services.util :as su]
|
|
[uxbox.util.blob :as blob]))
|
|
|
|
(declare decode-row)
|
|
|
|
;; --- Query: Projects
|
|
|
|
(def ^:private sql:projects
|
|
"with projects as (
|
|
select p.*,
|
|
(select count(*) from file as f
|
|
where f.project_id = p.id and deleted_at is null) as file_count
|
|
from project as p
|
|
inner join team_profile_rel as tpr on (tpr.team_id = p.team_id)
|
|
where tpr.profile_id = $1
|
|
and (tpr.is_admin = true or
|
|
tpr.is_owner = true or
|
|
tpr.can_edit = true)
|
|
union
|
|
select p.*,
|
|
(select count(*) from file as f
|
|
where f.project_id = p.id and deleted_at is null)
|
|
from project as p
|
|
inner join project_profile_rel as ppr on (ppr.project_id = p.id)
|
|
where ppr.profile_id = $1
|
|
and (ppr.is_admin = true or
|
|
ppr.is_owner = true or
|
|
ppr.can_edit = true)
|
|
)
|
|
select *
|
|
from projects
|
|
where team_id = $2
|
|
order by created_at asc")
|
|
|
|
(s/def ::team-id ::us/uuid)
|
|
(s/def ::profile-id ::us/uuid)
|
|
|
|
(s/def ::projects-by-team
|
|
(s/keys :req-un [::profile-id ::team-id]))
|
|
|
|
(defn projects-by-team [profile-id team-id]
|
|
(db/query db/pool [sql:projects profile-id team-id]))
|
|
|
|
(sq/defquery ::projects-by-team
|
|
[{:keys [profile-id team-id]}]
|
|
(projects-by-team profile-id team-id))
|
|
|