package Ġprojekt or . route Ċ Ċ import Ġio . ktor . application . call Ċ import Ġio . ktor . http . HttpStatusCode Ċ import Ġio . ktor . response . respond Ċ import Ġio . ktor . routing . Route Ċ import Ġio . ktor . routing . get Ċ import Ġio . ktor . util . get OrFail Ċ import Ġprojekt or . server . api . Public Id Ċ import Ġprojekt or . tests uite . TestSuite Search Criteria Ċ import Ġprojekt or . tests uite . TestSuite Service Ċ Ċ fun ĠRoute . test Su ites ( test Suite Service : ĠTest Suite Service ) Ġ{ ĊĠĠĠ Ġget ("/ run /{ public Id }/ suite /{ test Suite Idx }/ system Err ") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġpublic Id Ġ= Ġcall . parameters . get OrFail (" public Id ") ĊĠĠĠĠĠĠĠ Ġval Ġtest Suite Idx Ġ= Ġcall . parameters . get OrFail (" test Suite Idx "). toInt () ĊĊĠĠĠĠĠĠĠ Ġval Ġtest Suite System Err Ġ= Ġtest Suite Service . fetch TestSuite System Err ( Public Id ( public Id ), Ġtest Suite Idx ) ĊĊĠĠĠĠĠĠĠ Ġcall . respond ( HttpStatusCode . OK , Ġtest Suite System Err ) ĊĠĠĠ Ġ} ĊĠĠĠ Ġget ("/ run /{ public Id }/ suite /{ test Suite Idx }/ system Out ") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġpublic Id Ġ= Ġcall . parameters . get OrFail (" public Id ") ĊĠĠĠĠĠĠĠ Ġval Ġtest Suite Idx Ġ= Ġcall . parameters . get OrFail (" test Suite Idx "). toInt () ĊĊĠĠĠĠĠĠĠ Ġval Ġtest Suite System Out Ġ= Ġtest Suite Service . fetch TestSuite System Out ( Public Id ( public Id ), Ġtest Suite Idx ) ĊĊĠĠĠĠĠĠĠ Ġcall . respond ( HttpStatusCode . OK , Ġtest Suite System Out ) ĊĠĠĠ Ġ} ĊĠĠĠ Ġget ("/ run /{ public Id }/ suite /{ test Suite Idx }") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġpublic Id Ġ= Ġcall . parameters . get OrFail (" public Id ") ĊĠĠĠĠĠĠĠ Ġval Ġtest Suite Idx Ġ= Ġcall . parameters . get OrFail (" test Suite Idx "). toInt () ĊĊĠĠĠĠĠĠĠ Ġval Ġtest Suite Ġ= Ġtest Suite Service . fetch TestSuite ( Public Id ( public Id ), Ġtest Suite Idx ) ĊĊĠĠĠĠĠĠĠ Ġtest Suite ?. let Ġ{ Ġcall . respond ( HttpStatusCode . OK , Ġtest Suite ) Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ?: Ġcall . respond ( HttpStatusCode . NotFound ) ĊĠĠĠ Ġ} ĊĠĠĠ Ġget ("/ run /{ public Id }/ su ites ") Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġpublic Id Ġ= Ġcall . parameters . get OrFail (" public Id ") ĊĊĠĠĠĠĠĠĠ Ġval ĠpackageName Ġ= Ġcall . request . query Parameters [" package "] ĊĠĠĠĠĠĠĠ Ġval Ġfailed Only Ġ= Ġcall . request . query Parameters [" failed "] ?. to Boolean () Ġ?: Ġfalse ĊĊĠĠĠĠĠĠĠ Ġval Ġtest Suite Search Criteria Ġ= ĠTest Suite Search Criteria ( packageName , Ġfailed Only ) ĊĊĠĠĠĠĠĠĠ Ġval Ġtest Su ites Ġ= Ġtest Suite Service . fetch Test Su ites ( Public Id ( public Id ), Ġtest Suite Search Criteria ) ĊĊĠĠĠĠĠĠĠ Ġcall . respond ( HttpStatusCode . OK , Ġtest Su ites ) ĊĠĠĠ Ġ} Ċ } Ċ