core: contact aliases (#968)

src/Simplex/Chat/Migrations/M20220824_profiles_local_alias.hs

@@ -0,0 +1,17 @@
+{-# LANGUAGE QuasiQuotes #-}
+
+module Simplex.Chat.Migrations.M20220824_profiles_local_alias where
+
+import Database.SQLite.Simple (Query)
+import Database.SQLite.Simple.QQ (sql)
+
+m20220824_profiles_local_alias :: Query
+m20220824_profiles_local_alias =
+  [sql|
+PRAGMA ignore_check_constraints=ON;
+
+ALTER TABLE contact_profiles ADD COLUMN local_alias TEXT DEFAULT '' CHECK (local_alias NOT NULL);
+UPDATE contact_profiles SET local_alias = '';
+
+PRAGMA ignore_check_constraints=OFF;
+|]

src/Simplex/Chat/Migrations/chat_schema.sql

@@ -14,7 +14,8 @@ CREATE TABLE contact_profiles(
   updated_at TEXT CHECK(updated_at NOT NULL),
   image TEXT,
   user_id INTEGER DEFAULT NULL REFERENCES users ON DELETE CASCADE,
-  incognito INTEGER
+  incognito INTEGER,
+  local_alias TEXT DEFAULT '' CHECK(local_alias NOT NULL)
 );
 CREATE INDEX contact_profiles_index ON contact_profiles(
   display_name,