github/penpot
1
0
Fork 0
mirror of https://github.com/penpot/penpot.git synced 2026-04-25 11:18:36 +00:00
Code Issues Packages Projects Releases Wiki Activity

✨ Add unique email domains to telemetry report (#8819)

Browse Source 
Extend the telemetry payload with a sorted list of unique email domains
extracted from all registered profile email addresses. The new
:email-domains field is populated via a single SQL query using
split_part and DISTINCT, and is included in the stats sent when
telemetry is enabled.

Also update the tasks-telemetry-test to assert the new field is present
and contains the expected domain values.
This commit is contained in:
Andrey Antukh 2026-04-01 11:49:50 +02:00 committed by GitHub
parent 0337607a1b
commit 81b1b253f1
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
2 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
backend/src/app/tasks/telemetry.clj
View File

@ -129,6 +129,12 @@
(->> [sql:team-averages] (->> [sql:team-averages]
(db/exec-one! conn))) (db/exec-one! conn)))
(defn- get-email-domains
[conn]
(let [sql "SELECT DISTINCT split_part(email, '@', 2) AS domain FROM profile ORDER BY 1"]
(->> (db/exec! conn [sql])
(mapv :domain))))
(defn- get-enabled-auth-providers (defn- get-enabled-auth-providers
[conn] [conn]
(let [sql (str "SELECT auth_backend AS backend, count(*) AS total " (let [sql (str "SELECT auth_backend AS backend, count(*) AS total "
@ -192,7 +198,8 @@
:total-fonts (get-num-fonts conn) :total-fonts (get-num-fonts conn)
:total-comments (get-num-comments conn) :total-comments (get-num-comments conn)
:total-file-changes (get-num-file-changes conn) :total-file-changes (get-num-file-changes conn)
:total-touched-files (get-num-touched-files conn)} :total-touched-files (get-num-touched-files conn)
:email-domains (get-email-domains conn)}
(merge (merge
(get-team-averages conn) (get-team-averages conn)
(get-jvm-stats) (get-jvm-stats)

4
backend/test/backend_tests/tasks_telemetry_test.clj
View File

@ -42,4 +42,6 @@
(t/is (contains? data :avg-files-on-project)) (t/is (contains? data :avg-files-on-project))
(t/is (contains? data :max-projects-on-team)) (t/is (contains? data :max-projects-on-team))
(t/is (contains? data :avg-files-on-project)) (t/is (contains? data :avg-files-on-project))
(t/is (contains? data :version)))))) (t/is (contains? data :version))
(t/is (contains? data :email-domains))
(t/is (= ["nodomain.com"] (:email-domains data)))))))