package Ġcom . github . ker ub istan . ker ub . planner . steps . vm . pause Ċ Ċ import Ġcom . github . ker ub istan . ker ub . model . Host Ċ import Ġcom . github . ker ub istan . ker ub . model . VirtualMachine Ċ import Ġcom . github . ker ub istan . ker ub . model . VirtualMachine Status Ċ import Ġcom . github . ker ub istan . ker ub . model . dynamic . VirtualMachine Dynamic Ċ import Ġcom . github . ker ub istan . ker ub . planner . Operation al State Ċ import Ġcom . github . ker ub istan . ker ub . planner . steps . Operation al Step Ver ifications Ċ import Ġorg . junit . Assert . assertEquals Ċ import Ġorg . junit . Test Ċ import Ġjava . math . BigInteger Ċ import Ġjava . util . UUID Ċ Ċ class ĠPause VirtualMachine Test Ġ: ĠOperation al Step Ver ifications () Ġ{ ĊĊ ĉ val Ġvm Ġ= ĠVirtual Machine ( Ċĉĉ ĉ id Ġ= ĠUUID . randomUUID (), Ċĉĉ ĉ name Ġ= Ġ" vm - 1 " Ċ ĉ ) ĊĊ ĉ val Ġhost Ġ= ĠHost ( Ċĉĉ ĉ id Ġ= ĠUUID . randomUUID (), Ċĉĉ ĉ address Ġ= Ġ" host - 1 ", Ċĉĉ ĉ publicKey Ġ= Ġ"", Ċĉĉ ĉ dedicated Ġ= Ġtrue Ċ ĉ ) ĊĊ ĉ val Ġstate Ġ= ĠOperation al State . from Lists ( Ċĉĉ ĉ vms Ġ= ĠlistOf ( vm ), Ċĉĉ ĉ vm Dyn s Ġ= ĠlistOf ( Ċĉĉĉĉ ĉ VirtualMachine Dynamic ( Ċĉĉĉĉĉĉ ĉ id Ġ= Ġvm . id , Ċĉĉĉĉĉĉ ĉ status Ġ= ĠVirtual Machine Status . Up , Ċĉĉĉĉĉĉ ĉ host Id Ġ= Ġhost . id , Ċĉĉĉĉĉĉ ĉ memory Used Ġ= ĠBigInteger (" 1 2 3 4 5 6 7 ") Ċĉĉĉĉ ĉ ) Ċĉĉ ĉ ), Ċĉĉ ĉ hosts Ġ= ĠlistOf ( host ) Ċ ĉ ) ĊĊ ĉ override Ġval Ġstep Ġ= ĠPause VirtualMachine ( vm , Ġhost ) ĊĊ ĉ @ Test Ċ ĉ fun Ġtake () Ġ{ Ċĉ ĉ val Ġtransformed Ġ= ĠPause VirtualMachine ( vm , Ġhost ). take ( state ) Ċĉ ĉ assertEquals ( VirtualMachine Status . Paused , Ġtransformed . vms [ vm . id ]?. dynamic !!. status ) Ċ ĉ } Ċ }