Update Resources to be "user-stamped" (created/modifiedBy)

Author: CarsonF

dbschema/engagement.esdl

@@ -76,6 +76,8 @@ module default {
       insert Engagement::DedicationCeremony {
         createdAt := datetime_of_statement(),
         modifiedAt := datetime_of_statement(),
+        createdBy := assert_exists(currentUser),
+        modifiedBy := assert_exists(currentUser),
         engagement := __new__,
         project := __new__.project,
         projectContext := __new__.projectContext,
@@ -128,6 +130,8 @@ module default {
       insert Engagement::CertificationCeremony {
         createdAt := datetime_of_statement(),
         modifiedAt := datetime_of_statement(),
+        createdBy := assert_exists(currentUser),
+        modifiedBy := assert_exists(currentUser),
         engagement := __new__,
         project := __new__.project,
         projectContext := __new__.projectContext,

dbschema/file.esdl

@@ -25,15 +25,9 @@ module File {
     # optional to have tri-state. idk if needed but that's what I implemented in neo4j
     public: bool;
 
-    required createdBy: default::User {
-      default := default::currentUser;
-    };
-    required modifiedBy: default::User {
-      default := default::currentUser;
-      rewrite update using (default::currentUser);
-      # TODO trigger change up the tree
-      # TODO trigger re-eval on node delete?
-    };
+    # TODO trigger change up the tree
+    # TODO trigger re-eval on node delete?
+    # modifiedBy: default::User
 
     # TODO trigger directories evaluate
     required size: int64;

dbschema/project.esdl

@@ -106,6 +106,8 @@ module default {
       insert default::Budget {
         createdAt := datetime_of_statement(),
         modifiedAt := datetime_of_statement(),
+        createdBy := assert_exists(currentUser),
+        modifiedBy := assert_exists(currentUser),
         project := __new__,
         projectContext := __new__.projectContext,
       }

dbschema/prompt-variant-response.esdl

@@ -1,12 +1,12 @@
 module Prompt {
-  abstract type PromptVariantResponse extending Mixin::Embedded, Mixin::Timestamped, Mixin::Owned {
+  abstract type PromptVariantResponse extending default::Resource, Mixin::Embedded {
     annotation description := "An instance of a prompt and the responses per variant.";
 
     promptId: default::nanoid;
     responses := .<pvr[is VariantResponse];
   }
 
-  type VariantResponse extending Mixin::Timestamped, Mixin::Owned {
+  type VariantResponse extending Mixin::UserStamped, Mixin::Timestamped {
     annotation description := "A response (for a variant) to an instance of a prompt.";
 
     required pvr: PromptVariantResponse;

dbschema/resource.esdl

@@ -1,3 +1,3 @@
 module default {
-  abstract type Resource extending Mixin::Timestamped {}
+  abstract type Resource extending Mixin::UserStamped, Mixin::Timestamped;
 }

dbschema/z.timestamped.esdl renamed to dbschema/z.stamped.esdl

@@ -1,4 +1,15 @@
 module Mixin {
+  abstract type UserStamped {
+    required createdBy: default::User {
+      readonly := true;
+      default := default::currentUser;
+    };
+    required modifiedBy: default::User {
+      default := default::currentUser;
+      rewrite update using (default::currentUser);
+    };
+  }
+
   abstract type Timestamped {
     required createdAt: datetime {
       default := datetime_of_statement();
@@ -8,5 +19,5 @@ module Mixin {
       default := datetime_of_statement(); # default here helps editor know it's not required.
       rewrite update using (datetime_of_statement());
     };
-  };
+  }
 }