fix: sync monoforum suggested post flow

deploy/migrations/0134_suggested_post_effective_publish_date.up.sql

@@ -0,0 +1,93 @@
+-- TDesktop omits schedule_date for "Publish Now", while the approval action
+-- renderer always formats an absolute publication date.  Backfill rows written
+-- by the initial lifecycle implementation and keep current/history/difference
+-- projections on the same effective timestamp.
+UPDATE channel_messages m
+SET suggested_post = jsonb_set(
+        m.suggested_post,
+        '{ScheduleDate}',
+        to_jsonb(a.created_at),
+        true
+    )
+FROM suggested_post_approvals a
+WHERE a.schedule_date = 0
+  AND a.state IN ('scheduled', 'published', 'completed', 'refunded')
+  AND m.channel_id = a.monoforum_id
+  AND m.id = a.suggestion_message_id
+  AND COALESCE((m.suggested_post->>'Accepted')::boolean, false)
+  AND COALESCE((m.suggested_post->>'ScheduleDate')::integer, 0) = 0;
+
+UPDATE channel_messages m
+SET action = jsonb_set(
+        m.action,
+        '{SuggestedPostScheduleDate}',
+        to_jsonb(a.created_at),
+        true
+    )
+FROM suggested_post_approvals a
+WHERE a.schedule_date = 0
+  AND a.state IN ('scheduled', 'published', 'completed', 'refunded')
+  AND m.channel_id = a.monoforum_id
+  AND m.id = a.approval_service_message_id
+  AND m.action->>'Type' = 'suggested_post_approval'
+  AND NOT COALESCE((m.action->>'SuggestedPostRejected')::boolean, false)
+  AND NOT COALESCE((m.action->>'SuggestedPostBalanceTooLow')::boolean, false)
+  AND COALESCE((m.action->>'SuggestedPostScheduleDate')::integer, 0) = 0;
+
+UPDATE channel_update_events e
+SET payload = jsonb_set(
+        e.payload,
+        '{message,SuggestedPost,ScheduleDate}',
+        to_jsonb(a.created_at),
+        true
+    )
+FROM suggested_post_approvals a
+WHERE a.schedule_date = 0
+  AND a.state IN ('scheduled', 'published', 'completed', 'refunded')
+  AND e.channel_id = a.monoforum_id
+  AND e.message_id = a.suggestion_message_id
+  AND e.event_type = 'edit_channel_message'
+  AND COALESCE((e.payload #>> '{message,SuggestedPost,Accepted}')::boolean, false)
+  AND COALESCE((e.payload #>> '{message,SuggestedPost,ScheduleDate}')::integer, 0) = 0;
+
+UPDATE channel_update_events e
+SET payload = jsonb_set(
+        e.payload,
+        '{message,Action,SuggestedPostScheduleDate}',
+        to_jsonb(a.created_at),
+        true
+    )
+FROM suggested_post_approvals a
+WHERE a.schedule_date = 0
+  AND a.state IN ('scheduled', 'published', 'completed', 'refunded')
+  AND e.channel_id = a.monoforum_id
+  AND e.message_id = a.approval_service_message_id
+  AND e.event_type = 'new_channel_message'
+  AND e.payload #>> '{message,Action,Type}' = 'suggested_post_approval'
+  AND NOT COALESCE((e.payload #>> '{message,Action,SuggestedPostRejected}')::boolean, false)
+  AND NOT COALESCE((e.payload #>> '{message,Action,SuggestedPostBalanceTooLow}')::boolean, false)
+  AND COALESCE((e.payload #>> '{message,Action,SuggestedPostScheduleDate}')::integer, 0) = 0;
+
+UPDATE suggested_post_approvals
+SET schedule_date = created_at,
+    updated_at = GREATEST(updated_at, created_at)
+WHERE schedule_date = 0
+  AND state IN ('scheduled', 'published', 'completed', 'refunded');
+
+ALTER TABLE suggested_post_approvals
+    DROP CONSTRAINT suggested_post_approvals_shape_check;
+
+ALTER TABLE suggested_post_approvals
+    ADD CONSTRAINT suggested_post_approvals_shape_check CHECK (
+        monoforum_id>0 AND suggestion_message_id>0 AND parent_channel_id>0 AND
+        actor_user_id>0 AND payer_user_id>0 AND created_at>0 AND updated_at>=created_at AND
+        state IN ('balance_low','rejected','scheduled','published','completed','refunded') AND
+        price_kind IN ('','stars','ton') AND price_amount>=0 AND price_nanos BETWEEN 0 AND 999999999 AND
+        ((price_kind='' AND price_amount=0 AND price_nanos=0) OR
+         (price_kind='stars' AND price_amount>0) OR
+         (price_kind='ton' AND price_amount>0 AND price_nanos=0)) AND
+        schedule_date>=0 AND
+        (state IN ('balance_low','rejected') OR schedule_date>0) AND
+        approval_service_message_id>=0 AND published_message_id>=0 AND
+        settlement_due>=0 AND final_service_message_id>=0
+    );