package Ġno . nav . sy fo . test helper . mock Ċ Ċ import Ġio . ktor . application .* Ċ import Ġio . ktor . response .* Ċ import Ġio . ktor . routing .* Ċ import Ġio . ktor . server . engine .* Ċ import Ġio . ktor . server . netty .* Ċ import Ġno . nav . sy fo . application . api . authentication . install Content Neg otiation Ċ import Ġno . nav . sy fo . client . journal post dist ri bus jon . Journal post dist ri bus jon Client . Companion . DI STRI BU ER _ JO URN AL POST _ PATH Ċ import Ġno . nav . sy fo . client . journal post dist ri bus jon . Journal post dist ri bus jon Response Ċ import Ġno . nav . sy fo . client . person . kont akt info .* Ċ import Ġno . nav . sy fo . client . person . op pf ol ging st il f elle . K Opp fol ging st il f elle Person DTO Ċ import Ġno . nav . sy fo . client . person . op pf ol ging st il f elle . KS y ket il fel led ag DTO Ċ import Ġno . nav . sy fo . client . person . op pf ol ging st il f elle . Opp fol ging st il f elle Client . Companion . IS PROXY _ SY FO SY K ET IL F EL LE _ OP P FOL GING ST IL F EL LE _ PERSON _ PATH Ċ import Ġno . nav . sy fo . domain . A ktor Id Ċ import Ġno . nav . sy fo . test helper . User Constants Ċ import Ġno . nav . sy fo . test helper . User Constants . AR BE ID ST AK ER _ AK TOR ID Ċ import Ġno . nav . sy fo . test helper . User Constants . AR BE ID ST AK ER _ AN N EN _ AK TOR ID Ċ import Ġno . nav . sy fo . test helper . User Constants . AR BE ID ST AK ER _ IK KE _ VAR SEL _ AK TOR ID Ċ import Ġno . nav . sy fo . test helper . User Constants . AR BE ID ST AK ER _ NO _ JO URN AL FOR ING _ AK TOR ID Ċ import Ġno . nav . sy fo . test helper . getRandom Port Ċ import Ġno . nav . sy fo . util . NAV _ PERSON ID ENTER _ HEADER Ċ import Ġno . nav . sy fo . util . getHeader Ċ import Ġjava . time . LocalDate Ċ import Ġjava . time . LocalDateTime Ċ import Ġjava . util .* Ċ Ċ fun Ġk Opp fol ging st il f elle Person DTO ( ĊĠĠĠ Ġakt or Id : ĠA ktor Id Ġ= ĠAR BE ID ST AK ER _ AK TOR ID , Ċ ) Ġ= ĠK Opp fol ging st il f elle Person DTO ( ĊĠĠĠ Ġakt or Id Ġ= Ġakt or Id . value , ĊĠĠĠ Ġt ids lin je Ġ= ĠlistOf ( ĊĠĠĠĠĠĠĠ ĠK Sy ket il fel led ag DTO ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġdag Ġ= ĠLocalDate . now (). minus Days ( 1 0 ), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġpriorit ert Sy ket il f elle bit Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġ), ĊĠĠĠĠĠĠĠ ĠK Sy ket il fel led ag DTO ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġdag Ġ= ĠLocalDate . now (). plus Days ( 1 0 ), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġpriorit ert Sy ket il f elle bit Ġ= Ġnull , ĊĠĠĠĠĠĠĠ Ġ), ĊĠĠĠ Ġ), ĊĠĠĠ Ġsist e Dag I Ar be id sg iver peri ode Ġ= ĠK Sy ket il fel led ag DTO ( ĊĠĠĠĠĠĠĠ Ġdag Ġ= ĠLocalDate . now (). plus Days ( 1 0 ), ĊĠĠĠĠĠĠĠ Ġpriorit ert Sy ket il f elle bit Ġ= Ġnull , ĊĠĠĠ Ġ), ĊĠĠĠ Ġant all B ru k te D ager Ġ= Ġ 0 , ĊĠĠĠ Ġopp br uk t Ar be id sg v ier peri ode Ġ= Ġfalse , ĊĠĠĠ Ġut sen del se st id sp unkt Ġ= ĠLocalDateTime . now (), Ċ ) Ċ Ċ fun Ġdigital Kont akt info B olk K an Vars les True ( person Ident Number : ĠString ) Ġ= ĠDigital Kont akt info B olk ( ĊĠĠĠ Ġkont akt info Ġ= Ġmap Of ( ĊĠĠĠĠĠĠĠ Ġperson Ident Number Ġto ĠDigital Kont akt info ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġe post ad resse Ġ= ĠUser Constants . PERSON _ EMAIL , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġkan Vars les Ġ= Ġtrue , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġre ser vert Ġ= Ġfalse , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmob il tele fon nummer Ġ= ĠUser Constants . PERSON _ TL F , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġperson ident Ġ= Ġperson Ident Number ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠ Ġ) Ċ ) Ċ Ċ val Ġdigital Kont akt info B olk K an Vars les False Ġ= ĠDigital Kont akt info B olk ( ĊĠĠĠ Ġkont akt info Ġ= Ġmap Of ( ĊĠĠĠĠĠĠĠ ĠUser Constants . AR BE ID ST AK ER _ IK KE _ VAR SEL . value Ġto ĠDigital Kont akt info ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġe post ad resse Ġ= ĠUser Constants . PERSON _ EMAIL , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġkan Vars les Ġ= Ġfalse , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġre ser vert Ġ= Ġtrue , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmob il tele fon nummer Ġ= ĠUser Constants . PERSON _ TL F , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġperson ident Ġ= ĠUser Constants . AR BE ID ST AK ER _ IK KE _ VAR SEL . value ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠ Ġ) Ċ ) Ċ Ċ class ĠI spro xy Mock Ġ{ ĊĠĠĠ Ġprivate Ġval Ġport Ġ= ĠgetRandom Port () ĊĠĠĠ Ġval Ġurl Ġ= Ġ" http :// localhost :$ port " ĊĠĠĠ Ġval Ġname Ġ= Ġ" is proxy " ĊĠĠĠ Ġval Ġserver Ġ= Ġmock I spro xy Server ( port ) ĊĊĠĠĠ Ġprivate Ġfun Ġmock I spro xy Server ( port : ĠInt ): ĠNet ty Application Engine Ġ{ ĊĠĠĠĠĠĠĠ Ġreturn Ġembedded Server ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġfactory Ġ= ĠNet ty , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġport Ġ= Ġport ĊĠĠĠĠĠĠĠ Ġ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġinstall Content Neg otiation () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġrouting Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġpost ( DI STRI BU ER _ JO URN AL POST _ PATH ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcall . respond ( Journal post dist ri bus jon Response ( best ill ings Id Ġ= ĠUUID . randomUUID (). toString ())) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġget ("$ IS PROXY _ SY FO SY K ET IL F EL LE _ OP P FOL GING ST IL F EL LE _ PERSON _ PATH /${ AR BE ID ST AK ER _ AK TOR ID . value }") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcall . respond ( k Opp fol ging st il f elle Person DTO ( AR BE ID ST AK ER _ AK TOR ID )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġget ("$ IS PROXY _ SY FO SY K ET IL F EL LE _ OP P FOL GING ST IL F EL LE _ PERSON _ PATH /${ AR BE ID ST AK ER _ AN N EN _ AK TOR ID . value }") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcall . respond ( k Opp fol ging st il f elle Person DTO ( AR BE ID ST AK ER _ AN N EN _ AK TOR ID )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġget ("$ IS PROXY _ SY FO SY K ET IL F EL LE _ OP P FOL GING ST IL F EL LE _ PERSON _ PATH /${ AR BE ID ST AK ER _ NO _ JO URN AL FOR ING _ AK TOR ID . value }") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcall . respond ( k Opp fol ging st il f elle Person DTO ( AR BE ID ST AK ER _ NO _ JO URN AL FOR ING _ AK TOR ID )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġget ("$ IS PROXY _ SY FO SY K ET IL F EL LE _ OP P FOL GING ST IL F EL LE _ PERSON _ PATH /${ AR BE ID ST AK ER _ IK KE _ VAR SEL _ AK TOR ID . value }") Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcall . respond ( k Opp fol ging st il f elle Person DTO ( AR BE ID ST AK ER _ IK KE _ VAR SEL _ AK TOR ID )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġget ( Kont akt inform as jon Client . IS PROXY _ DK IF _ K ONT AK TIN FORM AS J ON _ PATH ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġif Ġ( getHeader ( NAV _ PERSON ID ENTER _ HEADER ) Ġ== ĠUser Constants . AR BE ID ST AK ER _ IK KE _ VAR SEL . value ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcall . respond ( digital Kont akt info B olk K an Vars les False ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} Ġelse Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġcall . respond ( digital Kont akt info B olk K an Vars les True ( getHeader ( NAV _ PERSON ID ENTER _ HEADER ) !! )) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ċ } Ċ