data

backend/:database.db/CURRENT

@@ -1 +1 @@
-MANIFEST-000013
+MANIFEST-000040

backend/sql/functions/auth.surql

@@ -0,0 +1,12 @@
+DEFINE FUNCTION auth::sessiontoken::new($user: uuid) {
+    LET $token = rand::string(64);
+
+    CREATE SessionToken CONTENT {
+        id: rand::uuid::v4(),
+        created: time::now(),
+        expires: time::now() + 7d,
+        token: $token,
+        user: Entity:user,
+    };
+}
+

backend/sql/functions/friend.surql

@@ -1,26 +1,28 @@
 DEFINE FUNCTION friend::request($from: uuid, $to: uuid) {
-    CREATE FriendRequest SET
-        in = Entity:from,
-        out = Entity:to,
-        created = time::now(),
+    RELATE Entity:from -> FriendRequest -> Entity:to
+    content {
+        created = time::now()
+    };
 }
 
-DEFINE FUNCTION friend::accept($request: record<FriendRequest>) {
+DEFINE FUNCTION friend::accept($from: uuid, $to: uuid) {
 
-    LET $fsid = uuid::new();
+    -- check if there is a friend request
 
-    CREATE Friendship SET
-        dm_channel = channel::new(),
-        id = $fsid,
-        since = time::now(),   
+    IF !HasFriendRequest WHERE out = Entity:from AND in = Entity:to {
+        RETURN;
+    }
 
-    CREATE HasFriendShip SET
-        in = Entity:request.in,
-        out = Friendship:fsid,
-        nickname = Entity:request.out.displayname,
+    LET $fsid: uuid = rand::uuid::v4();
+    CREATE Friendship SET id = $fsid, channel_id = fn::channel::new(), since = time::now();
+    RELATE Entity:from -> HasFriendship -> Friendship:fsid CONTENT { nickname = Entity:from.displayname };
+    RELATE Entity:to -> HasFriendship -> Friendship:fsid CONTENT { nickname = Entity:to.displayname };
+}
 
-    CREATE HasFriendShip SET
-        in = Entity:request.out,
-        out = Friendship:fsid,
-        nickname = Entity:request.in.displayname,
+DEFINE FUNCTION friend::reject($from: uuid, $to: uuid) {
+    DELETE Entity:from -> FriendRequest WHERE out = Entity:to
+}
+
+DEFINE FUNCTION friend::remove($from: uuid, $to: uuid) {
+    DELETE Entity:from -> HasFriendship -> Friendship WHERE <- HasFriendship.out <- Entity:to
 }

backend/sql/functions/icon.surql

@@ -0,0 +1,4 @@
+DEFINE FUNCTION icon::default() {
+    RETURN "/static/public/server_default.png";
+}
+

backend/sql/functions/server.surql

@@ -1,11 +1,26 @@
-DEFINE FUNCTION server::join($server_id: uuid, $entity_id: uuid) {
+DEFINE FUNCTION server::join($server: uuid, $entity: uuid) {
+    LET $user = (SELECT displayname FROM Entity WHERE id = $entity);
+    RELATE Entity:entity -> HasServer -> Server:server CONTENT {
+        joined: time::now(),
+        nickname: $user.displayname
+    };
+}
 
-    LET $user = (SELECT displayname FROM Entity WHERE id = $entity_id)[0];
+DEFINE FUNCTION server::leave($server: uuid, $entity: uuid) {
+    DELETE HasServer WHERE out = Server:server AND in = Entity:entity;
+    DELETE HasRole WHERE in = Entity:entity AND ->Role.server = Server:server;
+}
 
-    CREATE HasServer SET
-        in = Entity:entity_id,
-        out = Server:server_id,
-        nickname = $user.displayname,
-        permissions = [],
-        joined = time::now(),
+DEFINE FUNCTION server::new($name: string, $creator: uuid) {
+    LET $id = rand::uuid::v4();
+
+    CREATE Server CONTENT {
+        created: time::now(),
+        name: $name,
+        owner: $creator,
+        id: $id,
+        icon_uri: fn::icon::default(),
+    };
+
+    fn::server::join($id, $creator)
 }