feat(server): add option to delete backups while deleting server and … (#221)

Author: ka-myl

CHANGELOG.md

@@ -5,6 +5,9 @@ See updating [Changelog example here](https://keepachangelog.com/en/1.0.0/)
 
 ## [Unreleased]
 
+### Added
+- new `Backups` field for `DeleteServerAndStoragesRequest` that controls if backups should be kept or deleted while deleting the server
+
 ## [6.0.0]
 
 ### Added

upcloud/request/server.go

@@ -360,11 +360,16 @@ func (r *DeleteServerRequest) RequestURL() string {
 
 // DeleteServerAndStoragesRequest represents a request to delete a server and all attached storages
 type DeleteServerAndStoragesRequest struct {
-	UUID string
+	UUID    string
+	Backups DeleteStorageBackupsMode
 }
 
 // RequestURL implements the Request interface
 func (r *DeleteServerAndStoragesRequest) RequestURL() string {
+	if r.Backups != "" {
+		return fmt.Sprintf("/server/%s/?storages=1&backups=%s", r.UUID, r.Backups)
+	}
+
 	return fmt.Sprintf("/server/%s/?storages=1", r.UUID)
 }
 

upcloud/request/server_test.go

@@ -356,6 +356,27 @@ func TestDeleteServerAndStoragesRequest(t *testing.T) {
 	}
 
 	assert.Equal(t, "/server/foo/?storages=1", request.RequestURL())
+
+	request = DeleteServerAndStoragesRequest{
+		UUID:    "bar",
+		Backups: DeleteStorageBackupsModeDelete,
+	}
+
+	assert.Equal(t, "/server/bar/?storages=1&backups=delete", request.RequestURL())
+
+	request = DeleteServerAndStoragesRequest{
+		UUID:    "baz",
+		Backups: DeleteStorageBackupsModeKeepLatest,
+	}
+
+	assert.Equal(t, "/server/baz/?storages=1&backups=keep_latest", request.RequestURL())
+
+	request = DeleteServerAndStoragesRequest{
+		UUID:    "fizz",
+		Backups: DeleteStorageBackupsModeKeep,
+	}
+
+	assert.Equal(t, "/server/fizz/?storages=1&backups=keep", request.RequestURL())
 }
 
 // TestTagServerRequest tests that TestTagServer behaves correctly