provisioning/core/nulib/servers/delete.nu

171 lines
7.6 KiB
Plaintext
Raw Normal View History

use lib_provisioning *
# > Delete Server
export def "main delete" [
name?: string # Server hostname in settings
...args # Args for create command
--infra (-i): string # Infra directory
--keepstorage # keep storage
--settings (-s): string # Settings path
--yes (-y) # confirm delete
--outfile (-o): string # Output file
--serverpos (-p): int # Server position in settings
--check (-c) # Only check mode no servers will be created
--wait (-w) # Wait servers to be created
--select: string # Select with task as option
--debug (-x) # Use Debug mode
--xm # Debug with PROVISIONING_METADATA
--xc # Debuc for task and services locally PROVISIONING_DEBUG_CHECK
--xr # Debug for remote servers PROVISIONING_DEBUG_REMOTE
--xld # Log level with DEBUG PROVISIONING_LOG_LEVEL=debug
--metadata # Error with metadata (-xm)
--notitles # not tittles
--helpinfo (-h) # For more details use options "help" (no dashes)
--out: string # Print Output format: json, yaml, text (default)
]: nothing -> nothing {
if ($out | is-not-empty) {
$env.PROVISIONING_OUT = $out
$env.PROVISIONING_NO_TERMINAL = true
}
provisioning_init $helpinfo "servers delete" $args
if $debug { $env.PROVISIONING_DEBUG = true }
if $metadata { $env.PROVISIONING_METADATA = true }
if $name != null and $name != "h" and $name != "help" and not ($name | str contains "storage") {
let curr_settings = (find_get_settings --infra $infra --settings $settings)
if ($curr_settings.data.servers | find $name| length) == 0 {
_print $"πŸ›‘ invalid name ($name)"
exit 1
}
}
let task = if ($args | length) > 0 {
($args| get 0)
} else {
let str_task = (($env.PROVISIONING_ARGS? | default "") | str replace "delete " " " )
let str_task = if $name != null {
($str_task | str replace $name "")
} else {
$str_task
}
($str_task | str trim | split row " " | get -o 0 | default "" |
split row "-" | get -o 0 | default "" | str trim )
}
let other = if ($args | length) > 0 { ($args| skip 1) } else { "" }
let ops = $"($env.PROVISIONING_ARGS? | default "") " | str replace $"($task) " "" | str trim
let run_delete = {
let curr_settings = (find_get_settings --infra $infra --settings $settings)
$env.WK_CNPROV = $curr_settings.wk_path
on_delete_servers $curr_settings $keepstorage $wait $name $serverpos
}
match $task {
"" if $name == "h" => {
^$"($env.PROVISIONING_NAME)" -mod server delete --help --notitles
},
"" if $name == "help" => {
^$"($env.PROVISIONING_NAME)" -mod server delete --help
_print (provisioning_options "delete")
},
"" if ($name | default "" | str contains "storage") => {
let curr_settings = (find_get_settings --infra $infra --settings $settings)
on_delete_server_storage $curr_settings $wait "" $serverpos
},
"" | "d"| "delete" => {
if not $yes or not (($env.PROVISIONING_ARGS? | default "") | str contains "--yes") {
_print $"Run (_ansi red_bold)delete servers(_ansi reset) (_ansi green_bold)($name)(_ansi reset) type (_ansi green_bold)yes(_ansi reset) ? "
let user_input = (input --numchar 3)
if $user_input != "yes" and $user_input != "YES" {
exit 1
}
}
let result = desktop_run_notify $"($env.PROVISIONING_NAME) servers delete" "-> " $run_delete --timeout 11sec
},
_ => {
invalid_task "servers delete" $task --end
}
}
if not $env.PROVISIONING_DEBUG { end_run "" }
}
export def on_delete_server_storage [
settings: record # Settings record
wait: bool # Wait for creation
hostname?: string # Server hostname in settings
serverpos?: int # Server position in settings
]: nothing -> list {
#use lib_provisioning *
#use utils.nu *
let match_hostname = if $hostname != null and $hostname != "" {
$hostname
} else if $serverpos != null {
let total = $settings.data.servers | length
let pos = if $serverpos == 0 {
_print $"Use number form 1 to ($total)"
$serverpos
} else if $serverpos <= $total {
$serverpos - 1
} else {
(throw-error $"πŸ›‘ server pos" $"($serverpos) from ($total) servers"
"on_create" --span (metadata $serverpos).span)
exit 1
}
($settings.data.servers | get $pos).hostname
}
_print $"Delete storage (_ansi blue_bold)($settings.data.servers | length)(_ansi reset) server\(s\) in parallel (_ansi blue_bold)>>> πŸŒ₯ >>> (_ansi reset)\n"
$settings.data.servers | enumerate | par-each { |it|
if ($match_hostname == null or $match_hostname == "" or $it.item.hostname == $match_hostname) {
if not (mw_delete_server_storage $settings $it.item false) {
return false
}
_print $"\n(_ansi blue_reverse)----πŸŒ₯ ----πŸŒ₯ ----πŸŒ₯ ---- oOo ----πŸŒ₯ ----πŸŒ₯ ----πŸŒ₯ ---- (_ansi reset)\n"
}
}
}
export def on_delete_servers [
settings: record # Settings record
keep_storage: bool # keep storage
wait: bool # Wait for creation
hostname?: string # Server hostname in settings
serverpos?: int # Server position in settings
]: nothing -> record {
#use lib_provisioning *
#use utils.nu *
let match_hostname = if $hostname != null and $hostname != "" {
$hostname
} else if $serverpos != null {
let total = $settings.data.servers | length
let pos = if $serverpos == 0 {
_print $"Use number form 1 to ($total)"
$serverpos
} else if $serverpos <= $total {
$serverpos - 1
} else {
(throw-error $"πŸ›‘ server pos" $"($serverpos) from ($total) servers"
"on_create" --span (metadata $serverpos).span)
exit 1
}
($settings.data.servers | get $pos).hostname
}
_print $"Delete (_ansi blue_bold)($match_hostname | length)(_ansi reset) server\(s\) in parallel (_ansi blue_bold)>>> πŸŒ₯ >>> (_ansi reset)\n"
$settings.data.servers | enumerate | par-each { |it|
if ( $match_hostname == null or $match_hostname == "" or $it.item.hostname == $match_hostname) {
if ($it.item | get -o lock | default false) {
_print ($"(_ansi green)($it.item.hostname)(_ansi reset) is set to (_ansi purple)lock state(_ansi reset).\n" +
$"Set (_ansi red)lock(_ansi reset) to False to allow delete. ")
} else {
if (mw_delete_server $settings $it.item $keep_storage false) {
if $env.PROVISIONING_DEBUG { _print $"\n(_ansi red) error ($it.item.hostname)(_ansi reset)\n" }
}
}
}
}
_print $"\n(_ansi blue_reverse)----πŸŒ₯ ----πŸŒ₯ ----πŸŒ₯ ---- oOo ----πŸŒ₯ ----πŸŒ₯ ----πŸŒ₯ ---- (_ansi reset)\n"
for server in $settings.data.servers {
if ($server | get -o lock | default false) { continue }
let already_created = (mw_server_exists $server false)
if ($already_created) {
if $env.PROVISIONING_DEBUG { _print $"\n(_ansi red) error ($server.hostname)(_ansi reset)\n" }
} else {
mw_clean_cache $settings $server false
}
}
{ status: true, error: "" }
}