CA-419227 Move force_state_reset after refresh_vm

In the case of cross pool SXM, the running VM will be created
on destination host with initial halted state. The state shall
be changed by refresh_vm. The function force_state_reset before
it will incorrectly clear some vm config.
Move force_state_reset after refresh_vm fater refresh_vm in
pool_migrate_complete to solve it.

Signed-off-by: Changlei Li <changlei.li@cloud.com>

Author: changlei-li

ocaml/xapi/xapi_vm_migrate.ml

@@ -489,18 +489,18 @@ let pool_migrate_complete ~__context ~vm ~host:_ =
     ~value:`restart_device_model ;
   let dbg = Context.string_of_task __context in
   let queue_name = Xapi_xenops_queue.queue_of_vm ~__context ~self:vm in
-  (* Reset the state, which will update allowed operations, clear reservations
-     for halted VMs, disconnect devices *)
-  let power_state = Db.VM.get_power_state ~__context ~self:vm in
-  Xapi_vm_lifecycle.force_state_reset_keep_current_operations ~__context
-    ~self:vm ~value:power_state ;
   if Xapi_xenops.vm_exists_in_xenopsd queue_name dbg id then (
     remove_stale_pcis ~__context ~vm ;
     Xapi_xenops.set_resident_on ~__context ~self:vm ;
     Xapi_xenops.add_caches id ;
     Xapi_xenops.refresh_vm ~__context ~self:vm ;
     Monitor_dbcalls_cache.clear_cache_for_vm ~vm_uuid:id
   ) ;
+  (* Reset the state, which will update allowed operations, clear reservations
+     for halted VMs, disconnect devices *)
+  let power_state = Db.VM.get_power_state ~__context ~self:vm in
+  Xapi_vm_lifecycle.force_state_reset_keep_current_operations ~__context
+    ~self:vm ~value:power_state ;
   Xapi_vm_group_helpers.maybe_update_vm_anti_affinity_alert_for_vm ~__context
     ~vm