analytics/lib/plausible_web/controllers/billing_controller.ex
RobertJoonas 8cc7bce689
Restrict subscribing to a plan when exceeding its limits + warning for losing feature access (#3461)
* fix the styling of the red text notice under checkout link

* avoid some code repetition

* simplify rendering the change_plan_link

* refactor disabling checkout link and showing disabled message

* disable change plan and upgrade link when exceeding pageview limit

* disable checkout when exceeding team member limit

* disable checkout when site limit exceeded

* extract checkout related code in a separate function

* stick to a single order of features

* losing features warning

* fix back link from change-plan-preview

* create Quota.exceeded_limits function

* restrict subscribing with exceeded limits on the API level too

* use with instead of case

Co-authored-by: Vini Brasil <vini@hey.com>

* use :map type instead of :any for user

Co-authored-by: Vini Brasil <vini@hey.com>

* create Quota.usage function

---------

Co-authored-by: Vini Brasil <vini@hey.com>
2023-10-26 18:20:38 +03:00

204 lines
6.4 KiB
Elixir

defmodule PlausibleWeb.BillingController do
use PlausibleWeb, :controller
use Plausible.Repo
require Logger
require Plausible.Billing.Subscription.Status
alias Plausible.Billing
alias Plausible.Billing.{Plans, Subscription}
plug PlausibleWeb.RequireAccountPlug
def ping_subscription(%Plug.Conn{} = conn, _params) do
subscribed? = Billing.has_active_subscription?(conn.assigns.current_user.id)
json(conn, %{is_subscribed: subscribed?})
end
def upgrade(conn, _params) do
user = conn.assigns[:current_user]
cond do
Plausible.Auth.enterprise_configured?(user) ->
redirect(conn, to: Routes.billing_path(conn, :upgrade_to_enterprise_plan))
user.subscription && user.subscription.status == Subscription.Status.active() ->
redirect(conn, to: Routes.billing_path(conn, :change_plan_form))
true ->
render(conn, "upgrade.html",
skip_plausible_tracking: true,
usage: Plausible.Billing.Quota.monthly_pageview_usage(user),
user: user,
layout: {PlausibleWeb.LayoutView, "focus.html"}
)
end
end
def choose_plan(conn, _params) do
user = conn.assigns.current_user
if FunWithFlags.enabled?(:business_tier, for: user) do
render(conn, "choose_plan.html",
skip_plausible_tracking: true,
user: user,
layout: {PlausibleWeb.LayoutView, "focus.html"},
connect_live_socket: true
)
else
render_error(conn, 404)
end
end
def upgrade_to_enterprise_plan(conn, _params) do
user = Plausible.Users.with_subscription(conn.assigns.current_user)
{latest_enterprise_plan, price} = Plans.latest_enterprise_plan_with_price(user)
subscription_resumable? = Plausible.Billing.Subscriptions.resumable?(user.subscription)
subscribed_to_latest? =
subscription_resumable? &&
user.subscription.paddle_plan_id == latest_enterprise_plan.paddle_plan_id
cond do
user.subscription &&
user.subscription.status in [
Subscription.Status.past_due(),
Subscription.Status.paused()
] ->
redirect(conn, to: Routes.auth_path(conn, :user_settings))
subscribed_to_latest? ->
render(conn, "change_enterprise_plan_contact_us.html",
skip_plausible_tracking: true,
layout: {PlausibleWeb.LayoutView, "focus.html"}
)
true ->
render(conn, "upgrade_to_enterprise_plan.html",
user: user,
latest_enterprise_plan: latest_enterprise_plan,
price: price,
subscription_resumable: subscription_resumable?,
contact_link: "https://plausible.io/contact",
skip_plausible_tracking: true,
layout: {PlausibleWeb.LayoutView, "focus.html"}
)
end
end
def upgrade_enterprise_plan(conn, _params) do
# DEPRECATED - For some time we need to ensure that the existing
# links sent out to customers will lead the user to the right place
redirect(conn, to: Routes.billing_path(conn, :upgrade_to_enterprise_plan))
end
def upgrade_success(conn, _params) do
render(conn, "upgrade_success.html", layout: {PlausibleWeb.LayoutView, "focus.html"})
end
def change_plan_form(conn, _params) do
user = conn.assigns[:current_user]
subscription = Billing.active_subscription_for(user.id)
cond do
Plausible.Auth.enterprise_configured?(user) ->
redirect(conn, to: Routes.billing_path(conn, :upgrade_to_enterprise_plan))
subscription ->
render(conn, "change_plan.html",
skip_plausible_tracking: true,
subscription: subscription,
layout: {PlausibleWeb.LayoutView, "focus.html"}
)
true ->
redirect(conn, to: Routes.billing_path(conn, :upgrade))
end
end
def change_enterprise_plan(conn, _params) do
# DEPRECATED - For some time we need to ensure that the existing
# links sent out to customers will lead the user to the right place
redirect(conn, to: Routes.billing_path(conn, :upgrade_to_enterprise_plan))
end
def change_plan_preview(conn, %{"plan_id" => new_plan_id}) do
with {:ok, {subscription, preview_info}} <-
preview_subscription(conn.assigns.current_user, new_plan_id) do
back_action =
if FunWithFlags.enabled?(:business_tier, for: conn.assigns.current_user) do
:choose_plan
else
:change_plan_form
end
render(conn, "change_plan_preview.html",
back_link: Routes.billing_path(conn, back_action),
skip_plausible_tracking: true,
subscription: subscription,
preview_info: preview_info,
layout: {PlausibleWeb.LayoutView, "focus.html"}
)
else
_ ->
redirect(conn, to: Routes.billing_path(conn, :upgrade))
end
end
def change_plan(conn, %{"new_plan_id" => new_plan_id}) do
case Billing.change_plan(conn.assigns.current_user, new_plan_id) do
{:ok, _subscription} ->
conn
|> put_flash(:success, "Plan changed successfully")
|> redirect(to: "/settings")
{:error, e} ->
msg =
case e do
%{exceeded_limits: exceeded_limits} ->
"Unable to subscribe to this plan because the following limits are exceeded: #{inspect(exceeded_limits)}"
%{"code" => 147} ->
# https://developer.paddle.com/api-reference/intro/api-error-codes
"We were unable to charge your card. Click 'update billing info' to update your payment details and try again."
%{"message" => msg} when not is_nil(msg) ->
msg
_ ->
"Something went wrong. Please try again or contact support at support@plausible.io"
end
Sentry.capture_message("Error changing plans",
extra: %{
errors: inspect(e),
message: msg,
new_plan_id: new_plan_id,
user_id: conn.assigns[:current_user].id
}
)
conn
|> put_flash(:error, msg)
|> redirect(to: "/settings")
end
end
defp preview_subscription(%{id: user_id}, new_plan_id) do
subscription = Billing.active_subscription_for(user_id)
if subscription do
with {:ok, preview_info} <- Billing.change_plan_preview(subscription, new_plan_id) do
{:ok, {subscription, preview_info}}
end
else
{:error, :no_subscription}
end
end
def preview_susbcription(_, _) do
{:error, :no_user_id}
end
end