mirror of
https://github.com/status-im/status-mobile.git
synced 2025-02-09 15:24:34 +00:00
48 lines
1.8 KiB
Clojure
48 lines
1.8 KiB
Clojure
(ns status-im.db
|
|
(:require [schema.core :as s :include-macros true]))
|
|
|
|
;; schema of app-db
|
|
(def schema {:greeting s/Str})
|
|
|
|
(def default-view :chat-list)
|
|
|
|
;; initial state of app-db
|
|
(def app-db {:identity-password "replace-me-with-user-entered-password"
|
|
:identity "me"
|
|
:contacts []
|
|
:contacts-ids #{}
|
|
:selected-contacts #{}
|
|
:current-chat-id "console"
|
|
:chat {:command nil
|
|
:last-message nil}
|
|
:chats {}
|
|
:chats-updated-signal 0
|
|
:show-actions false
|
|
:new-participants #{}
|
|
:signed-up true
|
|
:view-id default-view
|
|
:navigation-stack (list default-view)
|
|
;; TODO fix hardcoded values
|
|
:photo-path nil
|
|
:username "My Name"
|
|
:phone-number "3147984309"
|
|
:email "myemail@gmail.com"
|
|
:status "Hi, this is my status"
|
|
:current-tag nil})
|
|
|
|
(def protocol-initialized-path [:protocol-initialized])
|
|
(defn chat-input-text-path [chat-id]
|
|
[:chats chat-id :input-text])
|
|
(defn chat-staged-commands-path [chat-id]
|
|
[:chats chat-id :staged-commands])
|
|
(defn chat-command-path [chat-id]
|
|
[:chats chat-id :command-input :command])
|
|
(defn chat-command-to-msg-id-path [chat-id]
|
|
[:chats chat-id :command-input :to-msg-id])
|
|
(defn chat-command-content-path [chat-id]
|
|
[:chats chat-id :command-input :content])
|
|
(defn chat-command-requests-path [chat-id]
|
|
[:chats chat-id :command-requests])
|
|
(defn chat-command-request-path [chat-id msg-id]
|
|
[:chats chat-id :command-requests msg-id])
|