MT#9177 Adapt API to new device bootstrap.

lib/NGCP/Panel/Controller/API/PbxDevices.pm

@@ -250,7 +250,8 @@ sub POST :Allow {
                     identifier => $resource->{identifier},
                     station_name => $resource->{station_name},
                 });
-            NGCP::Panel::Utils::DeviceBootstrap::bootstrap_config($c, $device, $customer);
+            my $err = NGCP::Panel::Utils::DeviceBootstrap::dispatch($c, 'register', $device);
+            die $err if($err);
             for my $line ( @{$resource->{lines}} ) {
                 $device->autoprov_field_device_lines->create($line);
             }

lib/NGCP/Panel/Controller/API/PbxDevicesItem.pm

@@ -176,6 +176,7 @@ sub DELETE :Allow {
         my $device = $self->item_by_id($c, $id);
         last unless $self->resource_exists($c, pbxdevice => $device);
         try {
+            NGCP::Panel::Utils::DeviceBootstrap::dispatch($c, 'unregister', $device, $device->identifier);
             $device->delete;
         } catch($e) {
             $c->log->error("Failed to delete pbx field device with id '$id': $e");

lib/NGCP/Panel/Role/API/PbxDevices.pm

@@ -191,6 +191,13 @@ sub update_item {
     }
 
     my $lines = delete $resource->{lines};
+    my $old_identifier = $item->identifier;
+    unless($old_identifier eq $resource->{identifier}) {
+        my $err = NGCP::Panel::Utils::DeviceBootstrap::dispatch(
+            $c, 'register', $item, $old_identifier
+        );
+        die $err if $err;
+    }
     $item->update($resource);
     
     return $item;