db.clj

(defn get-users
  "Return users, their apps, routes, and services"
  []
  (let [[users apps routes sb] (load-data)]
    (for [user (vals users)]
      (let [uapps (filter #(= (:owner_id %) (:id user)) (vals apps))]
        (merge user {:apps (for [app uapps]
                             (merge app {:routes (filter #(= (:app_id %) (:id app)) (vals routes))}))})))))