aboutsummaryrefslogtreecommitdiff
path: root/src/Endpoints
diff options
context:
space:
mode:
authoradambrangenberg <adabran06@gmail.com>2025-12-24 07:18:04 +0100
committeradambrangenberg <adabran06@gmail.com>2025-12-24 07:18:04 +0100
commit4da55d6434f6077f35466c9c0dfe3c29ee33f984 (patch)
tree2e5935721696c26a9be09b24b5a2457d71398b0d /src/Endpoints
parent3e2060422ed51096fc71148c55c47d5767593846 (diff)
Protecting CapabilitiesEndpoint via Auth
Diffstat (limited to 'src/Endpoints')
-rw-r--r--src/Endpoints/CapabilitiesEndpoint.hs7
1 files changed, 5 insertions, 2 deletions
diff --git a/src/Endpoints/CapabilitiesEndpoint.hs b/src/Endpoints/CapabilitiesEndpoint.hs
index 92fefba..5c1ffde 100644
--- a/src/Endpoints/CapabilitiesEndpoint.hs
+++ b/src/Endpoints/CapabilitiesEndpoint.hs
@@ -8,6 +8,8 @@ import Servant
import qualified Data.Map as Map
import Model.Capabilities
+import Auth (AuthProtect)
+import Data.User (User (..))
----------------------------------------------------------------------------------------------------
type CapabilitiesAPI = GetCapabilities
@@ -17,10 +19,11 @@ capabilitiesServer = handleCapabilitiesGet
--- GET /_matrix/client/v3/capabilities ------------------------------------------------------------
type GetCapabilities = "_matrix" :> "client" :> "v3" :> "capabilities"
+ :> AuthProtect "user-auth"
:> Get '[JSON] CapabilitiesResponse
-handleCapabilitiesGet :: Handler CapabilitiesResponse
-handleCapabilitiesGet = return $ CapabilitiesResponse
+handleCapabilitiesGet :: User -> Handler CapabilitiesResponse
+handleCapabilitiesGet _ = return $ CapabilitiesResponse
{ pid_changes = BooleanCapability False
, change_password = BooleanCapability False
, get_login_token = BooleanCapability False