coulomb/inter-hub
2
0
Fork 0
generated from coulomb/repo-seed
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

feat: add v2 api consumer bootstrap endpoints

Browse Source
This commit is contained in:
Bernd Worsch
2026-05-19 01:56:48 +02:00
parent e1c0f46a67
commit 75ad691dd6
8 changed files with 285 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
Web/Routes.hs
View File

@@ -280,6 +280,26 @@ instance HasPath ApiV2HubCapabilityManifestsController where
pathTo ApiV2UpdateHubCapabilityManifestAction { hubCapabilityManifestId } = "/api/v2/hub-capability-manifests/" <> tshow hubCapabilityManifestId
pathTo ApiV2ActivateHubCapabilityManifestAction { hubCapabilityManifestId } = "/api/v2/hub-capability-manifests/" <> tshow hubCapabilityManifestId <> "/activate"
instance CanRoute ApiV2ApiConsumersController where
parseRoute' = do
_ <- string "/api/v2/api-consumers"
choice
[ do endOfInput; pure ApiV2IndexApiConsumersAction
, do _ <- string "/"; cId <- parseUUID
choice
[ do _ <- string "/api-keys"; endOfInput
pure ApiV2CreateApiConsumerKeyAction { apiConsumerId = Id cId }
, do endOfInput
pure ApiV2ShowApiConsumerAction { apiConsumerId = Id cId }
]
]
instance HasPath ApiV2ApiConsumersController where
pathTo ApiV2IndexApiConsumersAction = "/api/v2/api-consumers"
pathTo ApiV2ShowApiConsumerAction { apiConsumerId } = "/api/v2/api-consumers/" <> tshow apiConsumerId
pathTo ApiV2CreateApiConsumerAction = "/api/v2/api-consumers"
pathTo ApiV2CreateApiConsumerKeyAction { apiConsumerId } = "/api/v2/api-consumers/" <> tshow apiConsumerId <> "/api-keys"
instance CanRoute ApiV2WidgetPatternsController where
parseRoute' = do
_ <- string "/api/v2/widget-patterns"