[wip] A proper test for sequence and timout test for STARTIN_UP

I think you should register, then starting and hold at that point. Then in the loop:

1) Generate a list of 1 to 20 events of type Function element of [starting_service, set_service_offline, set_service_online, service_status]
2) Call Final_State = foldl(fun(Action, Current_State) -> uffda_client:Action(Service_Name), uffda_client:service_status(Service_Name) end
3) Decide if Final_State is correct for the sequence.