feat(article-emotions): setup && re-org config

Author: mydearxym

config/config.exs

@@ -60,6 +60,21 @@ config :groupher_server, :customization,
   display_density: "20",
   sidebar_communities_index: %{}
 
+config :groupher_server, :article,
+  supported_emotions: [:downvote, :beer, :heart, :biceps, :orz, :confused, :pill, :popcorn],
+  # NOTE: if you want to add/remove emotion, just edit the list below
+  # and migrate the field to table "articles_comments_users_emotions"
+  comment_supported_emotions: [
+    :downvote,
+    :beer,
+    :heart,
+    :biceps,
+    :orz,
+    :confused,
+    :pill,
+    :popcorn
+  ]
+
 config :groupher_server, GroupherServerWeb.Gettext, default_locale: "zh_CN", locales: ~w(en zh_CN)
 
 config :groupher_server, :cloud_assets,

lib/groupher_server/cms/article_comment.ex

@@ -25,9 +25,6 @@ defmodule GroupherServer.CMS.ArticleComment do
   @max_participator_count 5
   @max_parent_replies_count 3
 
-  # NOTE: if you want to add/remove emotion, just edit the list below
-  # and migrate the field to table "articles_comments_users_emotions"
-  @supported_emotions [:downvote, :beer, :heart, :biceps, :orz, :confused, :pill, :popcorn]
   @max_latest_emotion_users_count 5
 
   @delete_hint "this comment is deleted"

lib/groupher_server/cms/article_comment_user_emotion.ex

@@ -1,8 +1,10 @@
 defmodule GroupherServer.CMS.ArticleCommentUserEmotion.Macros do
+  import Helper.Utils, only: [get_config: 2]
+
   alias GroupherServer.CMS
   alias CMS.ArticleComment
 
-  @supported_emotions ArticleComment.supported_emotions()
+  @supported_emotions get_config(:article, :comment_supported_emotions)
 
   defmacro emotion_fields() do
     @supported_emotions
@@ -21,11 +23,12 @@ defmodule GroupherServer.CMS.ArticleCommentUserEmotion do
   use Ecto.Schema
   import Ecto.Changeset
   import GroupherServer.CMS.ArticleCommentUserEmotion.Macros
+  import Helper.Utils, only: [get_config: 2]
 
   alias GroupherServer.{Accounts, CMS}
   alias CMS.ArticleComment
 
-  @supported_emotions ArticleComment.supported_emotions()
+  @supported_emotions get_config(:article, :comment_supported_emotions)
 
   @required_fields ~w(article_comment_id user_id recived_user_id)a
   # @optional_fields ~w(downvote beer heart biceps orz confused pill)a

lib/groupher_server/cms/delegates/article_comment.ex

@@ -8,6 +8,7 @@ defmodule GroupherServer.CMS.Delegate.ArticleComment do
 
   import GroupherServer.CMS.Helper.Matcher2
   import ShortMaps
+  import Helper.Utils, only: [get_config: 2]
 
   alias Helper.Types, as: T
   alias Helper.{ORM, QueryBuilder}
@@ -17,9 +18,9 @@ defmodule GroupherServer.CMS.Delegate.ArticleComment do
   alias CMS.{ArticleComment, ArticlePinedComment, Embeds}
   alias Ecto.Multi
 
+  @supported_emotions get_config(:article, :comment_supported_emotions)
   @max_participator_count ArticleComment.max_participator_count()
   @default_emotions Embeds.ArticleCommentEmotion.default_emotions()
-  @supported_emotions ArticleComment.supported_emotions()
   @delete_hint ArticleComment.delete_hint()
 
   @default_comment_meta Embeds.ArticleCommentMeta.default_meta()

lib/groupher_server/cms/embeds/article_comment_emotion.ex

@@ -8,10 +8,12 @@ defmodule GroupherServer.CMS.Embeds.ArticleCommentEmotion.Macros do
     field(:viewer_has_beered, :boolean, default: false, virtual: true)
     embeds_many(:latest_beer_users, Embeds.User, on_replace: :delete)
   """
+  import Helper.Utils, only: [get_config: 2]
+
   alias GroupherServer.CMS
-  alias CMS.{ArticleComment, Embeds}
+  alias CMS.Embeds
 
-  @supported_emotions ArticleComment.supported_emotions()
+  @supported_emotions get_config(:article, :comment_supported_emotions)
 
   defmacro emotion_fields() do
     @supported_emotions
@@ -35,11 +37,9 @@ defmodule GroupherServer.CMS.Embeds.ArticleCommentEmotion do
 
   import Ecto.Changeset
   import GroupherServer.CMS.Embeds.ArticleCommentEmotion.Macros
+  import Helper.Utils, only: [get_config: 2]
 
-  alias GroupherServer.CMS.ArticleComment
-
-  @supported_emotions ArticleComment.supported_emotions()
-
+  @supported_emotions get_config(:article, :comment_supported_emotions)
   @optional_fields Enum.map(@supported_emotions, &:"#{&1}_count") ++
                      Enum.map(@supported_emotions, &:"#{&1}_user_logins")
 

lib/groupher_server/cms/embeds/article_emotion.ex

@@ -0,0 +1,74 @@
+defmodule GroupherServer.CMS.Embeds.ArticleEmotion.Macros do
+  @moduledoc """
+  general fields for each emotion
+
+  e.g:
+    field(:beer_count, :integer, default: 0)
+    field(:beer_user_logins, :string)
+    field(:viewer_has_beered, :boolean, default: false, virtual: true)
+    embeds_many(:latest_beer_users, Embeds.User, on_replace: :delete)
+  """
+  import Helper.Utils, only: [get_config: 2]
+
+  alias GroupherServer.CMS
+  alias CMS.Embeds
+
+  @supported_emotions get_config(:article, :supported_emotions)
+
+  defmacro emotion_fields() do
+    @supported_emotions
+    |> Enum.map(fn emotion ->
+      quote do
+        field(unquote(:"#{emotion}_count"), :integer, default: 0)
+        field(unquote(:"#{emotion}_user_logins"), {:array, :string}, default: [])
+        field(unquote(:"viewer_has_#{emotion}ed"), :boolean, default: false, virtual: true)
+        embeds_many(unquote(:"latest_#{emotion}_users"), Embeds.User, on_replace: :delete)
+      end
+    end)
+  end
+end
+
+defmodule GroupherServer.CMS.Embeds.ArticleEmotion do
+  @moduledoc """
+  general article meta info for article-like content, like post, job, works ...
+  """
+  use Ecto.Schema
+  use Accessible
+
+  import Ecto.Changeset
+  import GroupherServer.CMS.Embeds.ArticleEmotion.Macros
+  import Helper.Utils, only: [get_config: 2]
+
+  @supported_emotions get_config(:article, :supported_emotions)
+
+  @optional_fields Enum.map(@supported_emotions, &:"#{&1}_count") ++
+                     Enum.map(@supported_emotions, &:"#{&1}_user_logins")
+
+  @doc "default emotion status for article comment"
+  # for create comment and test usage
+  def default_emotions() do
+    @supported_emotions
+    |> Enum.reduce([], fn emotion, acc ->
+      acc ++
+        [
+          "#{emotion}_count": 0,
+          "latest_#{emotion}_users": [],
+          "#{emotion}_user_logins": [],
+          "viewer_has_#{emotion}ed": false
+        ]
+    end)
+    |> Enum.into(%{})
+  end
+
+  embedded_schema do
+    emotion_fields()
+  end
+
+  def changeset(struct, params) do
+    struct
+    |> cast(params, @optional_fields)
+
+    # |> cast_embed(:latest_downvote_users, required: false, with: &Embeds.User.changeset/2)
+    # |> ...
+  end
+end

lib/groupher_server/cms/post.ex

@@ -72,6 +72,9 @@ defmodule GroupherServer.CMS.Post do
     # 评论参与者，只保留最近 5 个
     embeds_many(:article_comments_participators, Accounts.User, on_replace: :delete)
 
+    #
+    embeds_one(:emotions, Embeds.ArticleEmotion, on_replace: :update)
+
     # The keys are inflected from the schema names!
     # see https://hexdocs.pm/ecto/Ecto.Schema.html
     many_to_many(

lib/groupher_server_web/schema/Helper/fields.ex

@@ -5,10 +5,9 @@ defmodule GroupherServerWeb.Schema.Helper.Fields do
   import Helper.Utils, only: [get_config: 2]
 
   alias GroupherServer.{Accounts, CMS}
-  alias CMS.{ArticleComment}
 
   @page_size get_config(:general, :page_size)
-  @supported_emotions ArticleComment.supported_emotions()
+  @supported_emotions get_config(:article, :comment_supported_emotions)
   @supported_collect_folder_threads Accounts.CollectFolder.supported_threads()
 
   defmacro timestamp_fields do

priv/repo/migrations/20210510005623_add_emotions_to_post.exs

@@ -0,0 +1,9 @@
+defmodule GroupherServer.Repo.Migrations.AddEmotionsToPost do
+  use Ecto.Migration
+
+  def change do
+    alter table(:cms_posts) do
+      add(:emotions, :map)
+    end
+  end
+end