fix(resources): get all build resources

src/elm/Api/Operations.elm

@@ -20,6 +20,8 @@ module Api.Operations exposing
     , enableRepo
     , expandPipelineConfig
     , finishAuthentication
+    , getAllBuildServices
+    , getAllBuildSteps
     , getBuild
     , getBuildGraph
     , getBuildServiceLog
@@ -681,6 +683,31 @@ getBuildSteps baseUrl session options =
         |> withAuth session
 
 
+{-| getAllBuildSteps : retrieves all steps for a build.
+-}
+getAllBuildSteps :
+    String
+    -> Session
+    ->
+        { a
+            | org : String
+            , repo : String
+            , build : String
+        }
+    -> Request Vela.Step
+getAllBuildSteps baseUrl session options =
+    get baseUrl
+        (Api.Endpoint.Steps
+            (Just 1)
+            (Just 100)
+            options.org
+            options.repo
+            options.build
+        )
+        Vela.decodeStep
+        |> withAuth session
+
+
 {-| getBuildServices : retrieves services for a build.
 -}
 getBuildServices :
@@ -708,6 +735,31 @@ getBuildServices baseUrl session options =
         |> withAuth session
 
 
+{-| getAllBuildServices : retrieves all services for a build.
+-}
+getAllBuildServices :
+    String
+    -> Session
+    ->
+        { a
+            | org : String
+            , repo : String
+            , build : String
+        }
+    -> Request Vela.Service
+getAllBuildServices baseUrl session options =
+    get baseUrl
+        (Api.Endpoint.Services
+            (Just 1)
+            (Just 100)
+            options.org
+            options.repo
+            options.build
+        )
+        Vela.decodeService
+        |> withAuth session
+
+
 {-| getBuildStepLog : retrieves a log for a step.
 -}
 getBuildStepLog :

src/elm/Effect.elm

@@ -9,7 +9,7 @@ module Effect exposing
     , sendCmd, sendMsg
     , pushRoute, replaceRoute, loadExternalUrl
     , map, toCmd
-    , addAlertError, addAlertSuccess, addDeployment, addFavorites, addOrgSecret, addRepoSchedule, addRepoSecret, addSharedSecret, alertsUpdate, approveBuild, cancelBuild, chownRepo, clearRedirect, deleteOrgSecret, deleteRepoSchedule, deleteRepoSecret, deleteSharedSecret, disableRepo, downloadFile, enableRepo, expandPipelineConfig, finishAuthentication, focusOn, getBuild, getBuildGraph, getBuildServiceLog, getBuildServices, getBuildStepLog, getBuildSteps, getCurrentUser, getCurrentUserShared, getDashboard, getOrgBuilds, getOrgRepos, getOrgSecret, getOrgSecrets, getPipelineConfig, getPipelineTemplates, getRepo, getRepoBuilds, getRepoBuildsShared, getRepoDeployments, getRepoHooks, getRepoHooksShared, getRepoSchedule, getRepoSchedules, getRepoSecret, getRepoSecrets, getSettings, getSharedSecret, getSharedSecrets, getWorkers, handleHttpError, logout, pushPath, redeliverHook, repairRepo, replacePath, replaceRouteRemoveTabHistorySkipDomFocus, restartBuild, setRedirect, setTheme, updateFavicon, updateFavorite, updateOrgSecret, updateRepo, updateRepoSchedule, updateRepoSecret, updateSettings, updateSharedSecret, updateSourceReposShared
+    , addAlertError, addAlertSuccess, addDeployment, addFavorites, addOrgSecret, addRepoSchedule, addRepoSecret, addSharedSecret, alertsUpdate, approveBuild, cancelBuild, chownRepo, clearRedirect, deleteOrgSecret, deleteRepoSchedule, deleteRepoSecret, deleteSharedSecret, disableRepo, downloadFile, enableRepo, expandPipelineConfig, finishAuthentication, focusOn, getAllBuildServices, getAllBuildSteps, getBuild, getBuildGraph, getBuildServiceLog, getBuildServices, getBuildStepLog, getBuildSteps, getCurrentUser, getCurrentUserShared, getDashboard, getOrgBuilds, getOrgRepos, getOrgSecret, getOrgSecrets, getPipelineConfig, getPipelineTemplates, getRepo, getRepoBuilds, getRepoBuildsShared, getRepoDeployments, getRepoHooks, getRepoHooksShared, getRepoSchedule, getRepoSchedules, getRepoSecret, getRepoSecrets, getSettings, getSharedSecret, getSharedSecrets, getWorkers, handleHttpError, logout, pushPath, redeliverHook, repairRepo, replacePath, replaceRouteRemoveTabHistorySkipDomFocus, restartBuild, setRedirect, setTheme, updateFavicon, updateFavorite, updateOrgSecret, updateRepo, updateRepoSchedule, updateRepoSecret, updateSettings, updateSharedSecret, updateSourceReposShared
     )
 
 {-|
@@ -791,6 +791,26 @@ getBuildSteps options =
         |> sendCmd
 
 
+getAllBuildSteps :
+    { baseUrl : String
+    , session : Auth.Session.Session
+    , onResponse : Result (Http.Detailed.Error String) ( Http.Metadata, List Vela.Step ) -> msg
+    , org : String
+    , repo : String
+    , build : String
+    }
+    -> Effect msg
+getAllBuildSteps options =
+    Api.tryAll
+        options.onResponse
+        (Api.Operations.getAllBuildSteps
+            options.baseUrl
+            options.session
+            options
+        )
+        |> sendCmd
+
+
 getBuildServices :
     { baseUrl : String
     , session : Auth.Session.Session
@@ -813,6 +833,26 @@ getBuildServices options =
         |> sendCmd
 
 
+getAllBuildServices :
+    { baseUrl : String
+    , session : Auth.Session.Session
+    , onResponse : Result (Http.Detailed.Error String) ( Http.Metadata, List Vela.Service ) -> msg
+    , org : String
+    , repo : String
+    , build : String
+    }
+    -> Effect msg
+getAllBuildServices options =
+    Api.tryAll
+        options.onResponse
+        (Api.Operations.getAllBuildServices
+            options.baseUrl
+            options.session
+            options
+        )
+        |> sendCmd
+
+
 getBuildStepLog :
     { baseUrl : String
     , session : Auth.Session.Session

src/elm/Pages/Org_/Repo_/Build_.elm

@@ -195,7 +195,7 @@ init shared route () =
       , logFollow = 0
       }
     , Effect.batch
-        [ Effect.getBuildSteps
+        [ Effect.getAllBuildSteps
             { baseUrl = shared.velaAPIBaseURL
             , session = shared.session
             , onResponse =
@@ -206,8 +206,6 @@ init shared route () =
                             |> Maybe.withDefault "false"
                             |> (==) "false"
                     }
-            , pageNumber = Nothing
-            , perPage = Just 100
             , org = route.params.org
             , repo = route.params.repo
             , build = route.params.build
@@ -547,12 +545,10 @@ update shared route msg model =
         -- REFRESH
         Tick options ->
             ( model
-            , Effect.getBuildSteps
+            , Effect.getAllBuildSteps
                 { baseUrl = shared.velaAPIBaseURL
                 , session = shared.session
                 , onResponse = GetBuildStepsRefreshResponse
-                , pageNumber = Nothing
-                , perPage = Just 100
                 , org = route.params.org
                 , repo = route.params.repo
                 , build = route.params.build

src/elm/Pages/Org_/Repo_/Build_/Services.elm

@@ -195,12 +195,10 @@ init shared route () =
       , logFollow = 0
       }
     , Effect.batch
-        [ Effect.getBuildServices
+        [ Effect.getAllBuildServices
             { baseUrl = shared.velaAPIBaseURL
             , session = shared.session
             , onResponse = GetBuildServicesResponse
-            , pageNumber = Nothing
-            , perPage = Just 100
             , org = route.params.org
             , repo = route.params.repo
             , build = route.params.build
@@ -538,12 +536,10 @@ update shared route msg model =
         -- REFRESH
         Tick options ->
             ( model
-            , Effect.getBuildServices
+            , Effect.getAllBuildServices
                 { baseUrl = shared.velaAPIBaseURL
                 , session = shared.session
                 , onResponse = GetBuildServicesRefreshResponse
-                , pageNumber = Nothing
-                , perPage = Just 100
                 , org = route.params.org
                 , repo = route.params.repo
                 , build = route.params.build

src/elm/Vela.elm

@@ -74,9 +74,11 @@ module Vela exposing
     , decodeSchedules
     , decodeSecret
     , decodeSecrets
+    , decodeService
     , decodeServices
     , decodeSettings
     , decodeSourceRepositories
+    , decodeStep
     , decodeSteps
     , decodeUser
     , decodeWorkers