[server] Implement EntitlementServiceUBP.hasPaidSubscription

[jankeromnes]

Description

• Implement hasPaidSubscription logic in EntitlementServiceUBP.

Drive-by fix:

• No longer "force" "more resources" in usage-based billing -- users can choose their resources, so we can deprecate userGetsMoreResources with usage-based billing (but it's still used by Chargebee customers)

Related Issue(s)

Fixes #12169

How to test

1. Create a team called "Gitpod Something" to enable the Usage-Based flag for your user and team
2. Don't add a credit card just yet
3. Try starting multiple workspaces in parallel -- at 4 parallel workspaces, you should start seeing a paywall that prevents you from starting more (until the currently-running workspaces are stopped again)
4. Once a workspace is running, you should not be able to extend the workspace timeout (i.e. no "clock" button in the IDE bottom bar)
5. Now, upgrade your team to paid by adding a credit card
6. Once upgraded, you should now be able to start up to 16 parallel workspaces before seeing a paywall
7. You should also be able to extend the workspace timeout (using the "clock" button in the IDE bottom bar)

Release Notes

NONE

Documentation

Werft options:

• /werft with-preview
• /werft with-payment

[jankeromnes]

Hmm, I thought we'd be able to test the Usage-Based free tier, but since it's not implemented, we can't (so I crossed out steps 2 and 3 in the test plan):

Also, unrelatedly, while opening several workspaces, I got a few of these error pages too. Looks like this retryAfter mechanism isn't properly supported in CreateWorkspace:

[jankeromnes]

Hmm, I wasn't able to extend my workspace timeout (no clock button) 🤔 I guess this isn't quite ready yet & needs more debugging.

EDIT: Hmm, of course, when you add debug logs, then it works 100% fine. 🙄 ✅

[AlexTugarev]

👍🏻 to unblock!

Maybe it would be good to simplify the promise races here ;-)

/hold

[jankeromnes]

Thanks! Good suggestion -- adjusted the code, and tested again, still works as intended. 🚀

/unblock

[geropl]

/unhold

I think that's what @jankeromnes wanted to do here.